SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
Mylesmadness - SRL Member Application Form
Mylesmadness

What is the meaning to life?


Where you Referred to SRL? If yes, by whom?



Programming Knowledge
Tiny bit of java and html

Other Communitys
Kyab.asssoft.org

How Long have You Played Runescape
3 years

Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.

Hello all,
This is my 4th and hopefully final time applying. The first time was terrible. The second time I applied with the script with almost no fail-safes. The third time it was 10 yeses and 6 noses but I still got declined but I got to apply in two weeks instead of four thanks to wizzup?. Well I hope you like it and if you did last time, you will even more. A few credits, well one and he is going to hate me for saying this but footballjds. Without you, I would have never had wanted to finish this.
Sincerely,
Myles

——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted

{======================================================================]
[           NAME        : MEM                                          ]
[           WRITER      : MylesMadness                                 ]
[           CATEGORY    : Mineing                                      ]
[           DESCRIPTION : Mines Iron and Banks It                      ]
[           USAGE       : Start In Varock East Bank                    ]
[           AUTOCOLOR   : Yes                                          ]
[           NOTES       : None                                         ]
[======================================================================]
[                           Instructions.                              ]
[======================================================================]
[ 1. USE Runescape with Low Detail, Very Bright.                       ]
[ 2. Set your Screen to 32 bit TRUE color.                             ]
[ 3. Set Playernames and Passwords in DeclarePlayers.                  ]
[ 4. Start script Logged In!                                           ]
[======================================================================}
program MEM;
{.include srl/srl.scar}
{.include srl/srl/misc/Users.scar}

var
  x, y, Loads, Item, Ore, RRoadDTM, Pick, PickStatis, Gem: integer;
  RoadMP: TDTMPointDef;
  RoadSP: array[0..2] of TDTMPointDef;
  RoadDTM: TDTM;

procedure LoadDDTM;
begin
  RoadMP.x := 623;
  RoadMP.y := 60;
  RoadMP.areasize := 1;
  RoadMP.areashape := 0;
  RoadMP.color := FindVarrockRoadColor;
  RoadMP.tolerance := 6;

  RoadSP[0].x := 632;
  RoadSP[0].y := 30;
  RoadSP[0].areasize := 5;
  RoadSP[0].areashape := 0;
  RoadSP[0].color := FindVarrockRoadColor;
  RoadSP[0].tolerance := 6;

  RoadSP[1].x := 637;
  RoadSP[1].y := 84;
  RoadSP[1].areasize := 5;
  RoadSP[1].areashape := 0;
  RoadSP[1].color := FindVarrockRoadColor;
  RoadSP[1].tolerance := 6;

  RoadSP[2].x := 600;
  RoadSP[2].y := 62;
  RoadSP[2].areasize := 5;
  RoadSP[2].areashape := 0;
  RoadSP[2].color := FindVarrockRoadColor;
  RoadSP[2].tolerance := 6;

  RoadDTM.MainPoint := RoadMP;
  RoadDTM.SubPoints := RoadSP;
  RRoadDTM := AddDTM(RoadDTM);
end;

procedure LoadDtms;
begin
  Pick := DTMFromString('78DA6374666260B8C980026C83A2197418191' +
    '88088E13F10300600D53C6440038C4824903601AAB94D408D1B50' +
    'CD3D026A40EEB946408D05A69B31D4F800D5DCC5AF0600BD720D0' +
    '9');
  Gem := DTMFromString('78DA637467646088624001826293197480C24' +
    '0C4F01F0818DD80AC200634C0884402694F202B9D801A7F202B86' +
    '801A1B202B96801A7B202B95801A5F202B84801A5B22D4F801596' +
    '9F8D500009D5F0ABE');
  Ore := DTMFromString('78DA63CC63626078CA8002BCF594187418191' +
    '88088E13F1030D600D53C6040038C4824908E05AA794E404D1650' +
    'CD27026A8A806A6E1050930C54738F809A0AA09AD7F8D500003D9' +
    '90E24');
end;

procedure NoBan;
var
  OldTab, I, R: integer;
begin
  if (not (LoggedIn)) then
    Exit;
  case Random(250) of
    0, 10, 11, 12, 13, 14: MMouse(Random(MSX2), Random(MSY2), random(5), random(5))
      1, 15, 16, 17:
      begin
        R := Random(3) + 1;
        repeat
          MMouse(Random(MSX2), Random(MSY2), random(5), random(5))
            Inc(I)
        until (I = R)
      end;
    2, 18, 19, 20:
      begin
        HoverSkill('Mining', false);
        GameTab(4)
      end;
    3, 21, 22, 23:
      begin
        HoverSkill('random', false);
        GameTab(4);
      end;
    4, 24, 25:
      begin
        OldTab := GetCurrentTab;
        GameTab(Random(14) + 1)
          GameTab(OldTab)
      end;
    5: PickUpMouse;
    6: AlmostLogOut;
    7: RandomRClick;
    8: begin
        if FindColor(x, y, 16711422, MMX1, MMY1, MMX2, MMY2) then
          case random(5) of
            0: TypeSend('Whats up?');
            1: TypeSend('Mining lvls?');
            2: TypeSend('Mine levels?');
            3: TypeSend('Sup?');
          end;
      end;
    9: begin
        MakeCompass('N');
        wait(10 + random(5));
        MakeCompass('S');
        wait(10 + random(5));
        MakeCompass('N');
      end;
    10: begin
        SetAngle(false)
        wait(10 + random(10));
        SetAngle(True)
      end;
    11: begin
        SetAngle(false)
        wait(10 + random(5));
        Makecompass('E')
        wait(10 + random(5));
        SetAngle(True)
        wait(10 + random(5));
        Makecompass('S')
        wait(10 + random(5));
        SetAngle(false)
        wait(10 + random(5));
        Makecompass('W')
        wait(10 + random(5));
        SetAngle(True)
        wait(10 + random(5));
        Makecompass('N')
          wait(10 + random(5));
      end;
  end;
end;

function ToTab: Integer;
begin
  if GetCurrentTab = 4 then
    Result := 5
  else
    Result := 4
end;

function GotPick: Integer;
begin
  if (not (LoggedIn)) then
    Exit;
  if FindDtm(Pick, x, y, MIX1, MIY1, MIX2, MIY2) then
  begin
    if GetCurrentTab = 4 then
      Result := 1
    else
      Result := 0
      exit;
  end else
    begin
      GameTab(ToTab)
      if FindDtm(Pick, x, y, MIX1, MIY1, MIX2, MIY2) then
        Result := 0
      else
        Result := 2
    end;
end;

procedure RespondBack(Find, Say: TStringArray);
var
  I, R: Integer;
begin
  for I := 0 to GetArrayLength(Find) - 1 do
    if InChat(Find[I]) then
    begin
      If not GetBlackChatMessage = Players[CurrentPlayer].Name then
        begin
          Writeln('Found Text ' + Find[I] + ', Responding')
          R := Random(GetArrayLength(say));
          Typesend(Say[R])
          Writeln('Said ' + Say[R])
          exit;
        end;
    end;
end;

procedure DoResponding;
begin
  if (not (LoggedIn)) then
    Exit;
  RespondBack(['hello', 'hi', 'yo', 'Hey'], ['hello', 'hi', 'yo', 'Hey'])
  RespondBack(['mining lvls', 'mine lvls'], ['Im ' + IntToStr(Players[CurrentPlayer].level[15]), 'Im ' + IntToStr(Players[CurrentPlayer].level[15]) + '. You?', IntToStr(Players[CurrentPlayer].level[15])])
  RespondBack(['respond', 'talk'], ['what?', 'no', 'why?'])
end;

procedure WalkMine;
begin
  if (not (LoggedIn)) then
    Exit;
  if not RadialRoadWalk(FindVarrockRoadColor, 45, 60, 70, 3, 3) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 70, 85, 70, 3, 3) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 150, 170, 70, 3, 3) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 160, 180, 70, 3, 3) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 185, 180, 70, 3, 3) then
    Logout;
  if FindColor(x, y, FindStoneColor, MMX1, MMY1, MMX2, MMY2) then
  begin
    Mouse(x, y, 2, 2, True)
    flag;
  end else
    Logout;
end;

procedure WalkBank;
begin
  if (not (LoggedIn)) then
    Exit;
  if not RadialRoadWalk(FindVarrockRoadColor, 10, 25, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 370, 350, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 0, 1, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 360, 330, 70, 2, 2) then
    logout;
  if DtmRotated(RRoadDTM, x, y, MMX1, MMY1, MMX2, MMY2) then
  begin
    if not RadialRoadWalk(FindVarrockRoadColor, 280, 265, 70, 2, 2) then
      logout;
    if not RadialRoadWalk(FindVarrockRoadColor, 280, 260, 70, 2, 2) then
      logout;
    if findsymbol(x, y, 'Bank') then
      begin
        Mouse(x, y, 2, 2, True)
        flag;
      end else
        Logout;
  end;
end;

procedure Bankit;
begin
  if (not (LoggedIn)) then
    Exit;
  if (findbank('veb')) then
  begin
    if FindDtm(Ore, x, y, MIX1, MIY1, MIX2, MIY2) then
    begin
      Mouse(x, y, 2, 2, False)
      ChooseOption('al')
      Loads := Loads + 1;
    end;
    if FindDtm(Gem, x, y, MIX1, MIY1, MIX2, MIY2) then
    begin
      Mouse(x, y, 2, 2, False)
      ChooseOption('al')
    end;
  end else
  begin
    Writeln('We couldnt find the bank. Logging out')
    logout;
  end;
end;

procedure HitRock;
var
  trys: integer;
begin
  if (not (LoggedIn)) then
    Exit;
  repeat
    if (FindObjCustom(x, y, ['ine'], [2832993], 6)) then
    begin
      Mouse(x, y, 1, 1, True);
      exit;
    end else
    begin
      Inc(trys)
    end;
  until (trys > 5)
    Writeln('I Think were lost. Logging out')
    Logout;
end;

function FindGas: boolean; //Colors from Masterkills Varock miner
begin
  if not LoggedIn then exit;
  if FindColorTolerance(x, y, 10596274, 200, 150, 500, 500, 1)
    or FindColorTolerance(x, y, 8950933, 200, 150, 500, 500, 1)
    or FindColorTolerance(x, y, 9017755, 200, 150, 500, 500, 1)
    or FindColorTolerance(x, y, 7900302, 200, 150, 500, 500, 1) then
    Result := True;
end;

procedure DoAntiGasStuff;
begin
  if (not (LoggedIn)) then
    Exit;
  if FindGas then
  begin
    Mouse(MSCX, MSCY, 200, 200, True)
    GameTab(5 - PickStatis)
    if FindDtm(Pick, x, y, MIX1, MIY1, MIX2, MIY2) then
      begin
        Writeln('We avoided the gas')
      end else
      begin
        Writeln('We Lost The Pick :( Logging out')
        Logout;
      end;
        flag; //Just to make sure the flag is gone
  end;
end;

procedure Mine1;
var
  MineTime: integer;
begin
  if (not (LoggedIn)) then
    Exit;
  Item := PickStatis;
  repeat
    HitRock;
    MarkTime(MineTime);
    Item := Item + 1;
    DoAntiGasStuff;
    FindNormalRandoms;
    repeat
      NoBan;
      DoResponding;
    until ExistsItem(Item) or (TimeFromMark(MineTime) > 5000)
  until (invfull)
end;

begin
  SRLPlayerForm(True, [], ['Loads'], [], [])
  setupsrl;
  LoadDtms;
  ActivateClient;
  if (not (LoggedIn)) then Loginplayer;
  repeat
    Players[CurrentPlayer].level[15] := GetSkillInfo('mining', False)
    LoadDDTM;
    PickStatis := Gotpick;
    if PickStatis = 2 then
      logout;
    repeat
      WalkMine;
      Mine1;
      WalkBank;
      Bankit;
    until (not (LoggedIn) or (Players[CurrentPlayer].Integers[0] = Loads))
      NextPlayer(LoggedIn)
      Loads := 0;
  until (false)
end.

——————————————————
<!– END TEMPLATE: formanswers –>

I need to get off but i noticed something! -> Work on your standarts

im not going to vote in this app.

I like the way you made your own responder. Yes from me.

Thanks wizzy and who ever else voted yes. Also, Yeah my standers are terrible. I'll work on those the next time have some free time.

Eh, The first thing I notice is you spell mining wrong. It has no multiplayer. You use findobj for the main part of the script - mining.

Edit: Yep, no multiplayer at all, even though you have nextplayers….I don't know how this can be a yes.

Its been awhile since I voted, so I'll just wait untill some1 more ppl add their input.

There's a lot of crap code in this script, no offense.

This script could be shortened and cleaned up quite a bit.

You probably didn't test this… Which you should have. Because if you did, you should have gotten an error because some of your anti ban things (RandomRClick) were in srl 3.6 (?) and were taken out in 3.7 (?). So it shouldn't compile with the latest srl.

Anyways, lots of improvements could have been made, but it shows you know how to script. Keep working at it though, and try taking a lot of the crap out of the script if you know what I mean. Make it look a little more, professional :)

Yes from me.

RandomRClick was removed? Really? It still compiles and runs fine for me.

Edit:Its the first procedure in antiban.scar

RespondBack(['hello', 'hi', 'yo', 'Hey'], ['hello', 'hi', 'yo', 'Hey'])

Won't that respond to its sefl?

So it would…
Edit:Fixed…I Think
Edit,Edit:JackLKrawl, How is the no multiplayer? Also how is use find obj bad? You liked the script last time it was just about the same thing but the walking works and the pick doesn't have to be in your inv.

From: Mylesmadness
RandomRClick was removed? Really? It still compiles and runs fine for me.

Edit:Its the first procedure in antiban.scar

Hmmm.. Well, they took it out before, and I guess they put it back in in a newer version since I checked :p

From: Mylesmadness
So it would…
Edit:Fixed…I Think
Edit,Edit:JackLKrawl, How is the no multiplayer? Also how is use find obj bad? You liked the script last time it was just about the same thing but the walking works and the pick doesn't have to be in your inv.

I didn't notice, findobj isn't a bad choice, but theres no failsafe for if it does not find it on the screen, except to go to the nextplayer which is not there =/

  if FindDtm(RRoadDTM, x, y, MMX1, MMY1, MMX2, MMY2) then

This should be DTMRotated

        flag; //Just to make sure the flag is gone

Flag doesn't work anymore apparently, so you could do

if FlagPresent then FFlag(0);

I don't know, I'll probably vote yes if you fix the multiplayer, because I think you know this stuff.

Flag worked last night…DTMRotated is not needed because the compass is always the same way and if you logout it will next player because I made nextplayer work if it logs out.

From: Mylesmadness
Flag worked last night…DTMRotated is not needed because the compass is always the same way and if you logout it will next player because I made nextplayer work if it logs out.

No, YOU HAVE NO MULTIPLAYER. ARGGhh.

Since when was the compass always in the same direction?

  if FindDtm(RRoadDTM, x, y, MMX1, MMY1, MMX2, MMY2) then

This should be DTMRotated
May/May not…It works fine if you use usual findDTM, depends how you make your DDTM[Areasize]

        flag; //Just to make sure the flag is gone

Flag doesn't work anymore apparently, so you could do

if FlagPresent then FFlag(0);

If you mean Radialwalk then there is built in Flag(0), why should do it twice?

I don't know, I'll probably vote yes if you fix the multiplayer, because I think you know this stuff.

Look the end of mainloop:

NextPlayer(LoggedIn)

Thats all he needs

I didn't looked it trough much but main loop was okay, but when he got Nextplayer in middle of some procedure then its bad ^^

A yes from me…

From: Mylesmadness
Flag worked last night…DTMRotated is not needed because the compass is always the same way and if you logout it will next player because I made nextplayer work if it logs out.

-20 to + 20 degrees off.. So if you making ddtm use aresize 2 or 3

Anyways, try to not put nextplayer middle of *something*
Instead do logout;
Then script breaks out of repeatloop and goes on nextplayer…

edit: How got all okay in multiplayer…

@ Jack: ahem…

begin
  SRLPlayerForm(True, [], ['Loads'], [], [])
  setupsrl;
  LoadDtms;
  ActivateClient;
  if (not (LoggedIn)) then Loginplayer;
  repeat
    Players[CurrentPlayer].level[15] := GetSkillInfo('mining', False)
    LoadDDTM;
    PickStatis := Gotpick;
    if PickStatis = 2 then
      logout;
    repeat
      WalkMine;
      Mine1;
      WalkBank;
      Bankit;
    until (not (LoggedIn) or (Players[CurrentPlayer].Integers[0] = Loads))
      NextPlayer(LoggedIn)
      Loads := 0;
  until (false)
end.
 

but JAD is actually right, i'm sure you didn't test this, because it has a few specific mistakes :p for ecample to bank all it has to be 'Al' instead of 'al' and this would probably also give a problem:

until (not (LoggedIn) or (Players[CurrentPlayer].Integers[0] = Loads))
// until (not LoggedIn)or(Players[CurrentPlayer].Integers[0] = Loads)

well thinking again it might not give an error, btu i think it does. well i voted yes last time, and it seems that wizzy isn't gonna close the topic all of a sudden this time :p so can you guess what my vote is?

ps: you still have to work on those standards. please.

edit: do you really need to reload your DTM in the mainloop? can't you just load it once? And ur walking is a bit…unreliable :p

edit2: @richk

     If not GetBlackChatMessage = Players[CurrentPlayer].Name then

~RM

From: Rasta Magician
do you really need to reload your DTM in the mainloop? can't you just load it once?

The road color changes when you logout. So I need to re do it

edit2: @richk

If not GetBlackChatMessage = Players[CurrentPlayer].Name then

That wasn't there when he posted.

@ Jack: ahem…

Thank you. Also I'm now using DTMRotated now

From: Negaal

  if FindDtm(RRoadDTM, x, y, MMX1, MMY1, MMX2, MMY2) then

This should be DTMRotated
May/May not…It works fine if you use usual findDTM, depends how you make your DDTM[Areasize]

        flag; //Just to make sure the flag is gone

Flag doesn't work anymore apparently, so you could do

if FlagPresent then FFlag(0);

If you mean Radialwalk then there is built in Flag(0), why should do it twice?

I don't know, I'll probably vote yes if you fix the multiplayer, because I think you know this stuff.

Look the end of mainloop:

NextPlayer(LoggedIn)

Thats all he needs

I didn't looked it trough much but main loop was okay, but when he got Nextplayer in middle of some procedure then its bad ^^

A yes from me…



-20 to + 20 degrees off.. So if you making ddtm use aresize 2 or 3

Anyways, try to not put nextplayer middle of *something*
Instead do logout;
Then script breaks out of repeatloop and goes on nextplayer…

edit: How got all okay in multiplayer…

No DeclarePlayers

SrlPlayerForm:p

From: Mylesmadness
SrlPlayerForm:p

I know, I saw that, but I thought you were supposed to declare more?
Edit: Yep, I'm wrong. Yes

nope

Yess from me! good luck!!!

EDIT:
every one vote NO, this guy has a Bad attatude.

If an admin sees this please change my vote b4 to a no, thank you.

Thanks for the yes football. We are great friends(Most of the time ;)) and have shared ideas and code and helped each other for a while. It means a lot.

From: footballjds
Yess from me! good luck!!!
every one vote yes, this guy has a good attitude and show potential!
and JackLkrawl… its called player form… look into it!:duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh:
and :duh: :duh: Player forms ownzez! even though i have NO idea how to use it :p

Reread.

edit:me being dumb…

Jack i read everythng. you should just look into it b4 jumping to conclusions about somthing being/not being there.

no the other thing while we were doing the banking;)

From: footballjds
Jack i read everythng

He admitted he was wrong

edit:Me being dumb some more. sorry about this double post, refreshed.

Oops JacK, :p

I vote yes, it looks like a good script, and you will learn more and faster if u become a srl member.

Thanks zytex, Your right when i see all the members scripts and see how well there coded I am going to learn faster.

From: footballjds
Yess from me! good luck!!!
every one vote yes, this guy has a good attitude and show potential!
and JackLkrawl… its called player form… look into it!:duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh: :duh:
and :duh: :duh: Player forms ownzez! even though i have NO idea how to use it :p

You have to read this:p

Yes. It's not perfect but you understand it all.

Thanks Richk

good luck myles! and it looks like your in!

negaal.. haha, look i was jk with jack, because he said somthing to me:

He's just a little bit…Special.

From: footballjds
good luck myles! and it looks like your in!

negaal.. haha, look i was jk with jack, because he said somthing to me:

I'm beginning to believe you are more than a little bit special.

sorry that this is offensive and off topic, if a mod doesn't like it, tell me b4 da infraction please.

FUCK YOU JACKLKRAWL!

jk:rolleyes:
not

From: Wizzup?
I like the way you made your own responder. Yes from me.

Agreed

jds and jack please take it to the bbq pits >.> you guys keep attack each other all the time.

oh and myles, there's an option to delete your own pst if that re happens ;) do a quick edit and on the bottom right corner there's a delete button.

~RM

*Sigh*…must I always be the odd one out? By the way, I was the first 'no' vote, in case you're wondering.

77 lines of antiban. No failsafes in the walking…except a logout. You should try to make your own object finders. SRLs aren't exactly great. I have no idea what's going on in FindGas…seems too inefficient. In DoAntiGasStuff…you have 200 randomness on the points. I'm pretty sure that might try clicking off the runescape screen…in which case you won't avoid the gas. Not much to say about the main loop.

 if not RadialRoadWalk(FindVarrockRoadColor, 185, 180, 70, 3, 3) then
    Logout;
  if FindColorTolerance(x, y, 3563916, MMX1, MMY1, MMX2, MMY2, 10) then
  begin
    Mouse(x, y, 2, 2, True)
    flag;
  end else
    Logout;

santa that looks like fail safes :duh:
myles i think there is a srl procedure to click and wait until flag is gone instead of: Mouse(x, y, 2, 2, True)
flag;
i think its called plantflag?:rolleyes:

From: footballjds

 if not RadialRoadWalk(FindVarrockRoadColor, 185, 180, 70, 3, 3) then
    Logout;
  if FindColorTolerance(x, y, 3563916, MMX1, MMY1, MMX2, MMY2, 10) then
  begin
    Mouse(x, y, 2, 2, True)
    flag;
  end else
    Logout;

santa that looks like fail safes :duh:
myles i think there is a srl procedure to click and wait until flag is gone instead of: Mouse(x, y, 2, 2, True)
flag;
i think its called plantflag?:rolleyes:

Not really. If it doesn't find the VarrockRoadColor, it searches with a weak tolerance in a box.
Even with the idea to search from the bottom left section of the MM, this would have been more logical.

  if not RadialRoadWalk(FindVarrockRoadColor, 185, 180, 70, 3, 3) then
    Logout;
  if FindVarrockRoadColor then
    if FindColorTolerance(x, y, FindVarrockRoadColor, MMX1, MMY1, MMX2, MMY2, 10) then
    begin
      Mouse(x, y, 2, 2, True)
      flag;
    end else
      Logout;

What I would have done was scan with StartRadial and EndRadial as increasing variables in a repeat until.
His NoBan was also pretty weak, as most of it was MMouse - which is not even detected by Jagex, and a very solid 'MakeCompass' antiban. What it should have been was

repeat
  case random(4) of
    0: AString := 'S';
    1: AString := 'W';
    2: AString := 'E';
    3: AString := 'N';
  end;
  MakeCompass(AString);
until (AString = 'N');

for the compass bit, and what was left? Only RandomRClick if PickUpMouse doesn't include a click. I don't think hoverskill works, I guess it could because of the gametab changing. SetAngle wasn't a bad choice though.

Now stop dissing Santa Football, because he's right. His only failsafe was 'Logout,' there was no clever use of cases,

case RadialRoadWalk(FindVarrockRoadColor, 185, 180, 70, 3, 3) of
  True: writeln('Success');
  False: begin
           writeln('Fail');
           SomeFailSafe;
         end;
end;

it was all just if then else logout.

i wasn't dissing him, but atleast it logs out instead of continuing and getting lost!:rolleyes:

From: footballjds
i wasn't dissing him, but atleast it logs out instead of continuing and getting lost!:rolleyes:

So how long do you think it would run with RadialRoadWalk being the sole beef? No symbols, no DTMs along the way? Do you know what a failsafe is?

yes i do, and yes he should have more symbols and ddtms… but i used neither and still got in… i think that at least it loggs out.. lolz…
DDTMS would be very good.. but i don't think there is enough symbols to walk… just use some ddtms to stay on track myles :p

From: footballjds
yes i do, and yes he should have more symbols and ddtms… but i used neither and still got in… i think that at least it loggs out.. lolz…
DDTMS would be very good.. but i don't think there is enough symbols to walk… just use some ddtms to stay on track myles :p

Well, you could use the mining symbol for instance, his only symbol in there is for the bank. Yes, there are enough Symbols. There is that little Members area in SE Varrock if I remember correctly, there should be a lot of symbols. So you couldn't necessarily click the symbols, but you could add to the x value if you don't find the Road. You could scan for the Yew symbol to make sure you aren't North. You could scan the MS for rats and guards, there are actually a lot of things you could do.

Edit:

From: Rasta Magician
jds and jack please take it to the bbq pits >.> you guys keep attack each other all the time.

oh and myles, there's an option to delete your own pst if that re happens ;) do a quick edit and on the bottom right corner there's a delete button.

~RM

There isn't unless you're a member in the members forum. Remember when I triple posted in mine? I had to get Wizzup to do it for me (I got saved XD)

From: JackLKrawl

  if not RadialRoadWalk(FindVarrockRoadColor, 185, 180, 70, 3, 3) then
    Logout;
  if FindVarrockRoadColor then
    if FindColorTolerance(x, y, FindVarrockRoadColor, MMX1, MMY1, MMX2, MMY2, 10) then
    begin
      Mouse(x, y, 2, 2, True)
      flag;
    end else
      Logout;

That's would not work because 1.) FindVarrockRoadColor doesn't return a Boolean. 2.) its not meant to click on the road but the rocks instead.

From: Mylesmadness
That's would not work because 1.) FindVarrockRoadColor doesn't return a Boolean. 2.) its not meant to click on the road but the rocks instead.

If you're trying to click inside the mine, why not just use FindStoneColor?

{*******************************************************************************
function FindStoneColor: Integer;
By: Tarajunky
Description: Autodetecs Stone (Mine Rock) Color on Minimap
*******************************************************************************}

Awsome! Great idea

if FindVarrockRoadColor > 0 then is what I should have said.
Actually, I think if FindVarrockRoadColor then would work. 0 is the only return thats false, right? Or does that not apply to SCAR?
Edit: Nope, it has to be > 0.

he was havng problems with find varrock road color finding the wall color :p

was is the key word :p anyway i could have done that but why do it when the chances of it not finding aren't high at all unless some idiot tries to run it when hes not in varock.

From: Mylesmadness
was is the key word :p anyway i could have done that but why do it when the chances of it not finding aren't high at all unless some idiot tries to run it when hes not in varock.

I didn't understand a word you wrote.

what im saying is its not needed unless your not in varock when you start

MYles has acted like a real jerk lately… :-( if i could change my vote i would.

that means if an admin reads this and could, would you change my vote?

From: Mylesmadness
what im saying is its not needed unless your not in varock when you start

Then why did you use it?

From: footballjds
MYles has acted like a real jerk lately… :-( if i could change my vote i would.

that means if an admin reads this and could, would you change my vote?

What did he do?

From: footballjds
MYles has acted like a real jerk lately… :-( if i could change my vote i would.

that means if an admin reads this and could, would you change my vote?

What happens out of srl stays out of srl. If an admin/mod reads this, Delete his post please.

From: JackLKrawl
Then why did you use it?

I was talking about your method

From: Mylesmadness
What happens out of srl stays out of srl. If an admin/mod reads this, Delete his post please.

I was talking about your method

What happens outside SRL gives us an inside look on what your real attitude is…not the way you act in front of us. Plus, you have no authority to request that his post be deleted.

Well I'm not going to be the one to bring it up and football if your going to be the one, let me talk to you in like an hour on aim.

Football is offline…

From: Mylesmadness
What happens out of srl stays out of srl. If an admin/mod reads this, Delete his post please.

I was talking about your method

It's pretty hard to use RadialWalk without tolerance.

He'll be on sometime and read it

From: JackLKrawl
It's pretty hard to use RadialWalk without tolerance.

It's not with auto color

I need to stop with the refreshing.

From: Mylesmadness
He'll be on sometime and read it
It's not with auto color

I don't understand you.

procedure WalkBank;
begin
  if (not (LoggedIn)) then
    Exit;
  if not RadialRoadWalk(FindVarrockRoadColor, 10, 25, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 370, 350, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 0, 1, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 360, 330, 70, 2, 2) then
    logout;
  if DtmRotated(RRoadDTM, x, y, MMX1, MMY1, MMX2, MMY2) then
  begin
    if not RadialRoadWalk(FindVarrockRoadColor, 280, 265, 70, 2, 2) then
      logout;
    if not RadialRoadWalk(FindVarrockRoadColor, 280, 260, 70, 2, 2) then
      logout;
    if findsymbol(x, y, 'Bank') then
      begin
        Mouse(x, y, 2, 2, True)
        flag;
      end else
        Logout;
  end;
end;

From: JackLKrawl
I don't understand you.

procedure WalkBank;
begin
  if (not (LoggedIn)) then
    Exit;
  if not RadialRoadWalk(FindVarrockRoadColor, 10, 25, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 370, 350, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 0, 1, 70, 2, 2) then
    Logout;
  if not RadialRoadWalk(FindVarrockRoadColor, 360, 330, 70, 2, 2) then
    logout;
  if DtmRotated(RRoadDTM, x, y, MMX1, MMY1, MMX2, MMY2) then
  begin
    if not RadialRoadWalk(FindVarrockRoadColor, 280, 265, 70, 2, 2) then
      logout;
    if not RadialRoadWalk(FindVarrockRoadColor, 280, 260, 70, 2, 2) then
      logout;
    if findsymbol(x, y, 'Bank') then
      begin
        Mouse(x, y, 2, 2, True)
        flag;
      end else
        Logout;
  end;
end;

What don't you understand. FindVarrockRoadcolor doesn't need tol.

From: Mylesmadness
What don't you understand. FindVarrockRoadcolor doesn't need tol.

Well why did you not use 'FindVarrockRoadColor' in your 'FindColorTolerance' "backup"?

I had no FindColorTolerance I don't know where you got that but the only time i used in my walking is from clicking on the mine

Reread the first post on the top of page 3.

Santa if you still wana know what happened then catch me on AIM or IM or MSN sometime.

From: JackLKrawl
Reread the first post on the top of page 3.

Yeah thats supposed to click on the rocks. If you look in the script now thats auto color.

From: footballjds
Santa if you still wana know what happened then catch me on AIM or IM or MSN sometime.

Are you going to tell what you did? You know the one you were just daring me to post about.

From: Mylesmadness
Yeah thats supposed to click on the rocks. If you look in the script now thats auto color.

Are you going to tell what you did? You know the one you were just daring me to post about.

Threatening SRL Members isn't safe ;)

From: Mylesmadness
Yeah thats supposed to click on the rocks. If you look in the script now thats auto color.

Are you going to tell what you did? You know the one you were just daring me to post about.

OOOoohh I see, I'm sorry. I thought that was the varrock road =/

From: Santa_Clause
Threatening SRL Members isn't safe ;)

I really should just end this before it gets worse but something he said made me get to the way I was. Me and footballjds worked it out and we're cool.

10-6 works for me :)

In!

(My first In! as an admin, yay :D)