SRL Archive - News and General

SRL PUBLIC REVISION #33

SRL Revision #33 is here!

Here is a list of changes:

Additions to Randoms

• MimeSolver. SRL now attempts to solve mime
• Maze Solver should be functional
• Certer Solver added

Additions to Core

• function MsToTime(MS, StrType: Integer): string; to timing.scar
• function RunEnergy(Min: Integer): Boolean; to GameTab.scar
• Laptop Mouse Options
• ColorArray: TIntegerArray to TAutoColorInfo in globals.scar
• GetColorsBox(x1, y1, x2, y2): TIntegerArray to Colors.scar
• procedure Notes(SwitchOn: Boolean); to bank.scar
• OptionsExist(txt: TStringArray; MoveMouse: boolean): boolean; to Text.scar
• function GetColorArrayInfo to colors.scar
• function GetBestColor to colors.scar
• function CreateAutoColorInfo to colors.scar
• procedure DebugColorArray(C: TIntegerArray);
• WithdrawItem and WithdrawItemEx

Additions to Misc

• Added GrandExchange.scar
• DeleteValueInIntArray to arrayLoader.scar
• DeleteValueInStrArray to arrayLoader.scar
• DeleteValueInBoolArray to arrayLoader.scar
• DeleteValueInFloatArray to arrayLoader.scar

Additions to Skills

• FindFishSpotsTPA(var VTPA: TPointArray):boolean to Fishing.scar
• FindFishSpot(var xx, yy: integer; which: string): boolean to Fishing.scar
• new Courses to GetCourseXP in Agiliy.scar

Changes to Randoms

• Fixed bugs in IrokiPlugin
• Fixed Mime.scar
• Fixed Forester
• Changes in Mordaut
• Improved Evil bob
• Improved Prison Pete detection
• New door finding for Pinball.scar
• Sandwich lady now solves 'bread roll' and 'pie' as well

Changes To Core

• Changed ChooseOptionMultiEx to function ChooseOptionMultiEx(Texts: TStringArray; TextType: String; Action: fnct_ActionOptions): Boolean; in Text.scar
• Fixed srl_Implode
• Fixed GetAmount
• Fixed FixBank for when a person does not have the scroll bar
• Fixed FindItems
• Fixed CloseWindow now works with most windows.
• Updated FindDirtRoadColor
• Improved MakeCompass
• Improved FindSymbols
• Updated all functions using the Flag Colours.
• Updated SetChats to use the new Filter
• TypeSendEx(Text: String; PressEnter: Boolean); added.
• SetFightMode now accepts a variant.
• FindFight fixed for the new HP bars.

Changes To Misc

• Added Buttons, Bank Pin and Reward Box to SRLPlayerForm in users.scar
• Updated Fishing Equipment Bitmaps in bitmaps.scar
• Updated Fighting.scar for new HP Bars.
• Changed TakeScreenshot to use a box rather than whole screen each time, old version preserved.

Changes to Skills

• Fixed Cast in magic.scar
• Updated GetCourseXP in Agility.scar
• Prayer.scar updated.
• New HP Bar functions added to Fighting.scar
• InFight/InFightAt fixed.

Side Notes:
SRL is now compatible with all versions of SCAR. Although the current version works with all versions less than 3.20d, SRL may move to 3.20+ in the future due to limitations in older versions.

Some additional instructions:
Rev #33 comes with some modifications to various plugins including WizzyPlugin.dll, IrokiPlugin.dll and NAIRI.dll. WizzyPlugin was updated to include some more functions. IrokiPlugin was added and NAIRI removed.

YOU MUST MANUALLY DELETE NAIRI.dll and NAIRI.dpp AS WELL AS MOVING THE PLUGINS THE USUAL WAY.


Yours truly,
SRL Development Team.

Enjoy mates!. :)

W00p cheers devs :)

T~M

AND IN BIGGER AND BETTER NEWS!

I got my avvy back <3

Kill the avatar, Nava2.

Also, The Game.

Also, nice work.

NNNNOOOOOO!!!! It bigger than before!

T~M

Im glad we got the next revision, dev is still > reg.

Why so mean to boxxy? There are lovers + haters. If you hate, download an image blocker addon in firefox. And right click and click the lovely block image button.

Then we won't have to hear you guys saying noooo boxxy!!!!!

Sorry for going offtopic.

YAY #33!!! #33 <- all with 3!!!!

So this is still for 3.15?

A lot of improvements, well done developers :)

yay new rev
love you devs gay way

~shut

From: noidea
So this is still for 3.15?

Yeah, there is a few of conversions in Overwrite.scar.

Much <3 devs.
~Eerik~

From: noidea
So this is still for 3.15?

In theory.

Don't think that's been tested.

Nava has his avvy back <333

I don't want to switch to 3.2, until it is absolutly necissary (When SRL fully converts).

From: noidea
I don't want to switch to 3.2, until it is absolutly necissary (When SRL fully converts).

That would be now.

From: Torrent of Flame
Nava has his avvy back <333

no! its <33 :p lol

T~M

Look at the ads boxxy has brought us lol. G-Strings~!

Hmm, is the distance in flag fixed too?

Gratz ppl!

Also Nava you forgot to mention the changes in Prayer.scar as well, that RM committed

Gratz again, good work guys!

Thanks guys for this :) Mabey it's time to go Scar 3.20 :)


~Home

boo

Naice <3

Sweet! :D Hope random solving works, i'm writing up a script which works best when randoms can be solved :p

Nava,

{*******************************************************************************
function SetFightMode(oFightMode: Integer): Boolean;
By: Nielsie95, Quickmarch, Timer, and Nava2
Description: Sets fight mode.  Returns false if failed to set desired mode.
*******************************************************************************}

function SetFightMode(oFightMode: Variant): Boolean;
var
  i, x, y : Integer;
  b: TBox;
  cmbBoxes: array of TBox;
  strs: array of array of String;
begin
  Result := False;
  if not(Loggedin)then Exit;
  GameTab(1);
  Wait(200 + Random(777));

  cmbBoxes := [IntToBox(575, 255, 630, 290), IntToBox(660, 255, 710, 290), IntToBox(575, 310, 630, 345), IntToBox(660, 310, 710, 345)];
  strs := [TStringArray(['attack', 'att']), TStringArray(['strength', 'str']), TStringArray(['controlled', 'control', 'ctrl', 'multi']), TStringArray(['defence', 'def', 'defense'])];
  oFightMode := LowerCase(oFightMode);
  case VarType(oFightMode) of
    3: begin b := cmbBoxes[Integer(oFightMode) - 1]; r := oFightMode; end;
    256: for x := 0 to 3 do
         begin
           i := High(strs[x]);
           for y := 0 to i do
             if oFightMode = strs[x][y] then
             begin
               b := cmbBoxes[x];
               r := x + 1;
               Break;
             end;
           if b.x1 <> 0 then Break;
         end;
  end;
  i := 0;
  while (i < 4) and (not Result) do
  begin
    Mouse(RandomRange(b.x1, b.x2), RandomRange(b.y1, b.y2), 0, 0, True);
    Wait(200 + Random(300));
    Inc(i);
    Result := FindColorTolerance(x, y, 1777020, b.x1, b.y1, b.x2, b.y2, 2);
  end;
  if (not Result) and (r = 4) then
    SetFightMode(3);
end;

You should use mine on the thread…it is better…

function SetFightModeEx(oFightMode: Variant): Boolean;
var
  x, y : Integer;
  Boxes : TBoxArray;
begin
  if not(Loggedin)then Exit;
  GameTab(1);
  Wait(200 + Random(777));
  if VarType(oFightMode) = 3 then
    oFightMode := IntToStr(oFightMode);
  Boxes := [IntToBox(575, 255, 630, 290), IntToBox(660, 255, 710, 290),
            IntToBox(575, 310, 630, 345), IntToBox(660, 310, 710, 345)];
  case oFightMode of
    '1', 'attack', 'att' : begin end;// so doesn't cause problem with the else
    '2', 'strength', 'str' : Boxes[0] := Boxes[1];
    '3', 'multi' : Boxes[0] := Boxes[2];
    '4', 'defence', 'defense', 'def' : Boxes[0] := Boxes[3];
  else
    begin
       SRL_Warn('SetFightModeEx', 'oFightMode not set correctly!', warn_AllVersions);
      exit;
    end;
  end;
  result := FindColorTolerance(x, y, 1777020, Boxes[0].x1, Boxes[0].y1, Boxes[0].x2, Boxes[0].y2, 2);
  if not result then
  begin
     MouseBox(Boxes[0].x1, Boxes[0].y1, Boxes[0].x2, Boxes[0].y2, 1);
    result := true;
  end;
end;

Good work devs

From: Da 0wner
Nava,

{*******************************************************************************
function SetFightMode(oFightMode: Integer): Boolean;
By: Nielsie95, Quickmarch, Timer, and Nava2
Description: Sets fight mode.  Returns false if failed to set desired mode.
*******************************************************************************}

function SetFightMode(oFightMode: Variant): Boolean;
var
  i, x, y : Integer;
  b: TBox;
  cmbBoxes: array of TBox;
  strs: array of array of String;
begin
  Result := False;
  if not(Loggedin)then Exit;
  GameTab(1);
  Wait(200 + Random(777));

  cmbBoxes := [IntToBox(575, 255, 630, 290), IntToBox(660, 255, 710, 290), IntToBox(575, 310, 630, 345), IntToBox(660, 310, 710, 345)];
  strs := [TStringArray(['attack', 'att']), TStringArray(['strength', 'str']), TStringArray(['controlled', 'control', 'ctrl', 'multi']), TStringArray(['defence', 'def', 'defense'])];
  oFightMode := LowerCase(oFightMode);
  case VarType(oFightMode) of
    3: begin b := cmbBoxes[Integer(oFightMode) - 1]; r := oFightMode; end;
    256: for x := 0 to 3 do
         begin
           i := High(strs[x]);
           for y := 0 to i do
             if oFightMode = strs[x][y] then
             begin
               b := cmbBoxes[x];
               r := x + 1;
               Break;
             end;
           if b.x1 <> 0 then Break;
         end;
  end;
  i := 0;
  while (i < 4) and (not Result) do
  begin
    Mouse(RandomRange(b.x1, b.x2), RandomRange(b.y1, b.y2), 0, 0, True);
    Wait(200 + Random(300));
    Inc(i);
    Result := FindColorTolerance(x, y, 1777020, b.x1, b.y1, b.x2, b.y2, 2);
  end;
  if (not Result) and (r = 4) then
    SetFightMode(3);
end;

You should use mine on the thread…it is better…

function SetFightModeEx(oFightMode: Variant): Boolean;
var
  x, y : Integer;
  Boxes : TBoxArray;
begin
  if not(Loggedin)then Exit;
  GameTab(1);
  Wait(200 + Random(777));
  if VarType(oFightMode) = 3 then
    oFightMode := IntToStr(oFightMode);
  Boxes := [IntToBox(575, 255, 630, 290), IntToBox(660, 255, 710, 290),
            IntToBox(575, 310, 630, 345), IntToBox(660, 310, 710, 345)];
  case oFightMode of
    '1', 'attack', 'att' : begin end;// so doesn't cause problem with the else
    '2', 'strength', 'str' : Boxes[0] := Boxes[1];
    '3', 'multi' : Boxes[0] := Boxes[2];
    '4', 'defence', 'defense', 'def' : Boxes[0] := Boxes[3];
  else
    begin
       SRL_Warn('SetFightModeEx', 'oFightMode not set correctly!', warn_AllVersions);
      exit;
    end;
  end;
  result := FindColorTolerance(x, y, 1777020, Boxes[0].x1, Boxes[0].y1, Boxes[0].x2, Boxes[0].y2, 2);
  if not result then
  begin
     MouseBox(Boxes[0].x1, Boxes[0].y1, Boxes[0].x2, Boxes[0].y2, 1);
    result := true;
  end;
end;

Yours doesn't work. Also, it doesn't allow for the easy addition of more options.

I thank you for trying to help though.

Test before you talk Nava. Mine DOES work. Tested it many times before posting.

Da 0wner's does work btw..

I would call them about the same on extensibility. But I would rate Da Owner's higher on readability ;). Although Nava2 does have a disadvantage because he has to make it backwards compatible. Quite a situation

Yours doesn't work. Also, it doesn't allow for the easy addition of more options.

Really? All I think you would have to do is change the case lines and add an additional string.

Thanks devs for yalls hardwork :)

From: Simtoon
stupid devs i wanted to release #33

Huh? What are you talking about? You are not a developer O_O.

From: Da 0wner
Huh? What are you talking about? You are not a developer O_O.

I think he was joking lol

It was still a retarded thing to say.

Da Owner is t3h s3x :D, it really works :).

Awesome job on the changelog!

Good job bois.

Once again, a fantastic job. Thank you to all the devs. I can see all the hard work that has gone into this rev.

Good work devs! I love the work you do for our community :)
rs-based or not, <3<3

From: Nava2
AND IN BIGGER AND BETTER NEWS!

I got my avvy back <3

NOOOOOOOOOO I LOVED YOUR AVVY BEFORE =(

nice on the updates tho guys :)

Awsome update ;O

@Da 0wner, it does work, my apologies. I read the MouseBox as Mouse. :)

I don't really get while the while loop is there, I think I'm going to just remove it.

Well done :D

what is this about?
Failed when compiling
Line 96: [Error] (17151:14): Unknown identifier 'Mime_AnalyzeAnimation' in script C:\Program Files\SCAR 3.20\includes\SRL/SRL/Core/AntiRandoms/Mime.scar
i have updated i think
EDIT: fixed it i just had to update scar

Move your plugins dude.

how do i update this?

sorry n00b question but we all have to learn

Great work guys!

And gratz for the avy back XD

One question:do all randoms work now or are there still some with no solvers?

Ty

woot ok couple of things:
1. ok woot awesome job new rev <33
2. will this cause any issues with scripts?
3. has anyone seen if the Mime random is better now? XD
4. time to get to mining :D making an 85 miner to sell >:)

From: hessels92
how do i update this?

sorry n00b question but we all have to learn

Have a read of this wiki article:
http://www.villavu.com/wiki/index.php/Installing_and_Setting_up_SRL

From: tico2
Great work guys!

And gratz for the avy back XD

One question:do all randoms work now or are there still some with no solvers?

Ty

No Leo and Molly solver still do not have a (partly) working solver yet. Mime was added this revision and Certer and Maze were fixed.

From: tomtuff
woot ok couple of things:
1. ok woot awesome job new rev <33
2. will this cause any issues with scripts?
3. has anyone seen if the Mime random is better now? XD
4. time to get to mining :D making an 85 miner to sell >:)

There aren't many updates that will break scripts, we try to maintain backwards compatibility between revisions. However SetAllChats has had to change slighly to add the Game filter.