SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
0wn 4 skill - SRL Member Application Form
0wn 4 skill

What is the meaning to life?


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

Programming Knowledge


Other Communitys
Sythe

How Long have You Played Runescape
About 2 years

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

Hey, Im James. I live in the UK, North East England.
I enjoy all sports and in my spare time I enjoy scripting scar.
I would say that scar plays a bigger role in my life than runescape does. I like to look over scripts and see what I can understand. I admit that I am fairly new to scar, however, I can make quite complex scripts. And even if you are pro at scar you are always still learning (or so I heard).
I was making a Barbarian Banker and Fisher using normal SRL commands and Scar functions but then I heard about reflection. This is why I present to you my script using reflection.
If you were to test the script you would find that it works for hours and hours. My thread hasnt really look of yet. However, I think if reflection was promoted abit more, The script would definatley hit a top script spot; one similar to munks - forefeathers, it works in a similar way. Fishes and Banks for a certain amount of time, then sleeps, repeats. Thankyou for your time in reading this short paragraph about me.
I give thanks to all the people who wrote tutorials on Scar and I hope that they understand how helpful they have been to me.

Thankyou.

Yours Sincerely,
James Bell (0wn 4 skill)

P.S I would just like to say how great Method is. He really was a great help to me.

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

Program BarbarianFishernBankerRelection;
{.Include SRL\SRL\Misc\Smart.Scar}
{.Include SRL\SRL.Scar}
{.Include SRL\SRL\Reflection\Reflection.Scar}

/////////////////////////////////////////////////////
//  _____                    ___       _    _ _ _  //
// |  _  |                  /   |     | |  (_) | | //
// | |/  |_      ___ __    / /| |  ___| | ___| | | //
// |  /| \ \ /\ / /  _ \  / /_| | / __| |/ / | | | //
// \ |_/ /\ V  V /| | | | \___  | \__ \   <| | | | //
//  \___/  \_/\_/ |_| |_|     |_/ |___/_|\_\_|_|_| //
/////////////////////////////////////////////////////
  //Start in Edgeville Bank or the FishingSpot//
  // Setup Lines 21-24 33-53 and off you go!  //
  // Have Fly Fishing Rod and Feathers in Inv //
  //////////////////////////////////////////////

Const
  SRLStatsID='';//Your SRL stats ID
  SRLStatsPass='';//Your SRL Stats Password
  SleepEvery=9;// 9 mins works good.
  SleepForHowLong=1;//Lets keep it short shall we? Random 1-1.5mins will be added.
  SmartWorld='world16'; //Change number if you want a different world.

Var
   x,y, FlyRod, Bankes, Walkesbank, Walkesfish, LTD: Integer;
   TimesSlept, Fishes, Mark, WhirlPoolAvoid, Tries : Integer;

Procedure DeclarePlayers;
Begin

  HowManyPlayers := 2;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;

  Players[0].Name :='';
  Players[0].Pass :='';
  Players[0].Nick :='';
  Players[0].Active:=True;
  Players[0].Integers[0]:=200;//Number Of Loads. I do 10ish an hour on lvl 70 fish.

  Players[1].Name :='';
  Players[1].Pass :='';
  Players[1].Nick :='';
  Players[1].Active:=True;
  Players[1].Integers[0]:=200;//Number Of Loads

  {Players[2].Name :='';
  Players[2].Pass :='';
  Players[2].Nick :='';
  Players[2].Active:=True;
  Players[2].Integer[0]:=1;//Number Of Loads}

  Writeln('Using '+IntToStr(HowManyPlayers)+' Players!');
  Writeln('Doing '+IntToStr(Players[CurrentPlayer].Integers[0])+' Loads!');

end;

Procedure SetupSmart;
Begin
  SmartSetup(SmartWorld, True, True, False);
  Wait(1000);
  SetTargetDC(SmartGetDC);
end;



Procedure OwnAntiBan;
Begin
  If Not LoggedIn then Exit;
  case Random(20) of
    1: RandomRClick;
    2: Begin
         HoverSkill('Fishing', False);
         Wait(1000+Random(800));
       end;
    3: RandomMovement;
    4: BoredHuman;
    6: DoEmote(400 +Random(90));
    7: Begin
         GameTab(1+Random(12));
         Wait(RandomRange(800,1200));
         GameTab(4);
       end;
    8: PickUpMouse;
    9: Begin
          MMouse(Random(500),Random(500),0,0);
       end;
    10: Sleep(RandomRange(1000,3000));
    end;
  GameTab(4);
end;


Procedure LoadDTMs(DTM: String);
begin
  Case lowercase(DTM) Of
    'flyrod':
    begin

    FlyRod := DTMFromString('78DA8DD2CB0E82301445D12204796940DEA0F' +
         '1FFFFD27367C4C93E0C360356DAB4DCAC4F29BDD2DF935DAA777C' +
         '9FC00CCA0226F6DA0C738079281F30ADF2055319EB94CA1B4CA1E' +
         'C6072E3EC776504532B0398467982E994164CAC511BFFAB021367' +
         '2AC1CC4A016631CC66EC15F3958389B9B881398DBD76E37E56A53' +
         '3EEA70733F16CFC00FDE603D0');

    end;
  end;
end;

Procedure Proggy; Forward;

{My Location finder. Checks between two points and returns where you are.}
Function FindLocation: String;
Var
  Me: TMe;
Begin
  If Not LoggedIn then Exit;
  Me:= GetMe;
  GetMyPos;

  If PointInBox(Me.Tile, IntToBox(3090, 3486, 3100, 3500)) then
   Result:='AtBank';

  If PointInBox(Me.Tile, IntToBox(3100, 3420, 3112, 3435)) then
   Result:='AtFishingSpot';

  If (Result = '') then
  begin
    Writeln('Not In any place?');
    Logout;
    Result:='NoLocation';
    Proggy;
    Players[CurrentPlayer].Active := False;
    NextPlayer(Players[CurrentPlayer].Active);
  end;
end;


function WalkPath(Path: TPointArray; Tol, R_FFlag: Integer): Boolean;
var
  Count : Integer;
begin
  Count:= 0;
  repeat

    Result:= WalkToTile(Path[Count], Tol, R_FFlag);
    if (not Result) then
    Result:= WalkToTile(Path[Count], tol, R_FFlag);

    Count:= Count + 1;
  until (not Result) or (Count > High(Path));
end;





function LoadPath(Which:String): TPointArray;
begin
  Case Lowercase(which) of
  'walkfishe':
  Begin

  SetLength(Result, 8);

  Result[0] := Point(3094, 3484);
  Result[1] := Point(3100, 3476);
  Result[2] := Point(3099, 3466);
  Result[3] := Point(3088, 3462);
  Result[4] := Point(3090, 3451);
  Result[5] := Point(3093, 3442);
  Result[6] := Point(3099, 3435);
  Result[7] := Point(3103, 3425);

  end;

  'walkfishz':
  Begin

  SetLength(Result, 8);

  Result[0] := Point(3088, 3485);
  Result[1] := Point(3081, 3477);
  Result[2] := Point(3081, 3466);
  Result[3] := Point(3088, 3456);
  Result[4] := Point(3091, 3445);
  Result[5] := Point(3095, 3436);
  Result[6] := Point(3102, 3433);
  Result[7] := Point(3104, 3425);

  end;

  'walkbanke':
  Begin

  SetLength(Result, 8);

  Result[0] := Point(3101, 3433);
  Result[1] := Point(3093, 3441);
  Result[2] := Point(3091, 3449);
  Result[3] := Point(3087, 3461);
  Result[4] := Point(3094, 3465);
  Result[5] := Point(3099, 3473);
  Result[6] := Point(3094, 3484);
  Result[7] := Point(3095, 3491);

  end;

  'walkbankz':
  Begin

  SetLength(Result, 9);

  Result[0] := Point(3102, 3433);
  Result[1] := Point(3093, 3441);
  Result[2] := Point(3094, 3450);
  Result[3] := Point(3089, 3457);
  Result[4] := Point(3084, 3465);
  Result[5] := Point(3081, 3475);
  Result[6] := Point(3081, 3483);
  Result[7] := Point(3089, 3486);
  Result[8] := Point(3095, 3492);

  end;
 end;
end;



Procedure WalkToFish;

Begin
  If Not LoggedIn Then Exit;
  Case Random(2) of
    0: SetRun(True);
    1: SetRun(False);
  end;
  GameTab(4);
  Case Random(2) of
    0: WalkPath(LoadPath('walkfishe'),2, 4);
    1: WalkPath(LoadPath('walkfishz'),2, 4);
  end;
  Wait(500+Random(300));
  WalkesFish:=Walkesfish+1;
end;

Procedure WalkToBank;

Begin
  If Not LoggedIn Then Exit;
  SetRun(False);
  Case Random(2) of
    0:WalkPath(LoadPath('walkbanke'), 2, 4);
    1:WalkPath(LoadPath('walkbankz'), 2, 2);
  end;
  Wait(500+Random(300));
  Walkesbank:=Walkesbank+1;
end;

Function HaveWeGotFeathers: Boolean;
Begin
  If Not LoggedIn then Exit;
  GameTab(4);
  Result:= FindColorTolerance(x,y, 11119028, 554, 205, 640, 244, 10);
end;

Procedure FeatherMessage;
Begin
  Writeln('No Feathers on this account, switching players.')
  Logout;
  Players[CurrentPlayer].Active := False;
  NextPlayer(Players[CurrentPlayer].Active);
end;



Function HaveWeGotFlyRod: Boolean;
begin
  if not LoggedIn then Exit;
  Gametab(4);
  Result:= FindColorTolerance(x,y, 873327, MIX1,MIY1,MIX2,MIY2, 20);
end;



Function WithdrawFlyRod: Boolean;
Begin
  If Not LoggedIn then Exit;
  If Not BankScreen then Exit;
    LoadDTMs('FlyRod');
    If FindDTM(flyrod,x,y,MSX1,MSY1,MSX2,MSY2) then
      Begin
        MMouse(x,y,3,3);
        IsUpText('ithdra');
        GetMousePos(x,y);
        Mouse(x,y,0,0,true);
        Writeln('Got new Fly Rod')
        Result:=True;
      end else
        Begin
          CloseBank;
          Writeln('Out of Rods on this account... Logging out... Buy more!');
          Logout;
          WriteLn('No FlyRods on this account');
          Players[CurrentPlayer].Active := False;
          NextPlayer(Players[CurrentPlayer].Active);
     end;
  FreeDTM(Flyrod);
end;

Procedure GoGetFlyRod;
Var
Tries: Integer;
Begin
    Begin
      If FindLocation='AtBank' then
        Begin
          Repeat
            OpenBankFast('eb');
            Tries:=Tries+1
          Until (BankScreen) or (Tries>5);
          Wait(1000+Random(500));
          WithdrawFlyRod;
      end;
        If FindLocation='AtFishingSpot' then
          Begin
            WalkToBank;
            Repeat
              OpenBankFast('eb');
              Tries:=Tries+1;
            Until (BankScreen) or (Tries>5)
            WithdrawFlyRod;
            WalkToFish;
          end;
    end;
end;


Procedure FindFlyRodFloor;
Begin
  If Not LoggedIn Then Exit;
  Gametab(4);
  If HaveWeGotFlyRod then exit;
  begin
    MakeCompass('W');
    SetAngle(True);
    If FindObj(x,y, 'rod' , 805217, 15) then
    begin
      writeln('Found the lost rod');
      Mouse(x,y,3,3,true);
      R_FFlag(0);
      MakeCompass('N');
      If HaveWeGotFlyRod then exit;
    end else
    begin
      Writeln('We lost the rod!');
      MakeCompass('N');
      GoGetFlyRod;
    end;
  end;
End;

{My Fishing Spot Finder. Returns True if found. Will find any fishing spot}
Function FindFishingSpotTrue:Boolean;
var
  FishingSpot: array of TNPC;
  I: Integer;
begin
  If Not Loggedin Then Exit;
  FishingSpot := SortNPCs(GetNPCsByID(328));
  for I := 0 to High(FishingSpot) do
    If FishingSpot[i].MS.X<>0 then
    begin
      Result:=True;
    if (Result) then exit;
  end;
end;


{My Fishing Spot Finder Returns Co-Ords of x,y. Will Find Any Fishing Spot.}
Procedure FindFishingSpot(var x,y: Integer);
var
  FishingSpot: array of TNPC;
  I: Integer;
begin
  If Not Loggedin Then Exit;
  FishingSpot := SortNPCs(GetNPCsByID(328));
  for I := 0 to High(FishingSpot) do
    If FishingSpot[i].MS.X<>0 then
    begin
      x := FishingSpot[I].MS.X;
      y := FishingSpot[I].MS.Y;
  end;
end;


Procedure DepositFished;
Begin
  If Not Loggedin then Exit;
  If FindLocation='AtBank' then
    Begin
      SetAngle(True);
      Repeat
        OpenBankFast('eb');
        Tries:=Tries+1;
        Wait(2000+Random(1000));
      Until (BankScreen) or (Tries>5);
      If BankScreen then
      Begin
        Deposit(3, 28,true);
        Case Random(2) of
          0: CloseBank;
        end;
        Bankes:=Bankes+1;
        Fishes:=Fishes+26;
        LTD:=LTD+1;
        Writeln('Desposited Items');
        Proggy;
      end else
      Begin
        Writeln('Could Not find BankScreen');
      end;
    end;
end;


{My Whirl Pool Finder. Returns True if found.}
Function FindWhirlPool: Boolean;
var
  WhirlPool: array of TNPC;
  I: Integer;
begin
  WhirlPool := SortNPCs(GetNPCsByID(405));
  for I := 0 to High(WhirlPool) do
    if WhirlPool[I].MS.X<>0 then
    begin
      Result := True;
      if (Result) then Exit;
    end;
end;

{This Procedure moves spot if a whirlpool is found.}
Procedure MoveSpotIfWhirlPool;
Begin
  If Not Loggedin then exit;
  If FindWhirlPool then
    Begin
      FindFishingSpot(x,y);
      Mouse(x,y,3,3,true);
      Writeln('Avoided WhirlPool');
      WhirlPoolAvoid:=WhirlPoolAvoid + 1;
    end else
      Begin
        WalkToTile(IntToPoint(3110, 3433), 3, 0);
        Wait(1500+Random(100));
        FindFishingSpot(x,y);
        Mouse(x,y,3,3,true);
        WhirlPoolAvoid:=WhirlPoolAvoid + 1;
      end;
 end;


function AreWeFishing: Boolean;
Var
 Me:TMe;
begin
  Me:= GetMe;
  Result := (InRange(Me.Animation,618,623));
end;


Procedure DoFishing;
Var
 Me:TMe;
Begin
Me:= GetMe;
If FindLocation='AtFishingSpot' then
  Begin
    Writeln('Doing Fishing');
    Repeat
     GameTab(4);
     If Not HaveWeGotFlyRod then FindFlyRodFloor;
     If Not AreWeFishing then
     Begin
       MakeCompass('N');
       SetAngle(true);
       If FindFishingSpotTrue then
         Begin
           FindFishingSpot(x,y);
           Case Random(2) of
            0: Begin
               Mouse(x,y,3,3,true);
               end;
            1: Begin
               Mouse(x,y,3,3,false);
               Wait(500+Random(300));
               ChooseOption('ure');
               end;
            end;
         end else
           WalkToTile(IntToPoint(3110, 3433), 2, 0);
           If FindFishingSpotTrue then
             Begin
               FindFishingSpot(x,y);
               Case Random(2) of
                 0: Begin
                      Mouse(x,y,3,3,true);
                    end;
                 1: Begin
                      Mouse(x,y,3,3,false);
                      Wait(500+Random(300));
                      ChooseOption('ure');
                    end;
                 end;
             end else
               WalkToTile(IntToPoint(3102, 3424), 2, 0);
         end;
       OwnAntiBan;
       If FindWhirlPool then MoveSpotIfWhirlPool;
       If Me.InFight then
       Begin
         Writeln('Oh shit, fight, lets get out of here.');
         SetRun(True);
         WalkToBank;
         DepositFished;
     end else
     Begin
       FindNormalRandoms;
       OwnAntiBan;
       Wait(RandomRange(2000, 4000));
       If FindWhirlPool then MoveSpotIfWhirlPool;
       If Me.InFight then
       Begin
         WalkToBank;
       end;
     end;
     Until(InvFull);
  end;
  If InvFull then
    Begin
        WalkToBank;
        DepositFished;
        WalkToFish;
    end;
end;



Procedure Signature;
Begin
  ClearDebug;
  Writeln('Thankyou For using...............')
  Wait(300);
  Writeln(' _____                    ___       _    _ _ _');
  Wait(300);
  Writeln('|  _  |                  /   |     | |  (_) | |');
  Wait(300);
  Writeln('| |/  |_      ___ __    / /| |  ___| | ___| | |');
  Wait(300);
  Writeln('|  /| \ \ /\ / /  _ \  / /_| | / __| |/ / | | |');
  Wait(300);
  Writeln('\ |_/ /\ V  V /| | | | \___  | \__ \   <| | | |');
  Wait(300);
  Writeln(' \___/  \_/\_/ |_| |_|     |_/ |___/_|\_\_|_|_|');
  Wait(300);
  Writeln('Barbarian Fisher And Banker!!')
  Wait(2500);
  ClearDebug;
end;

Procedure Sleepy;
Begin
  If Not LoggedIn then Exit;
  Begin
    Logout;
    TimesSlept:=TimesSlept+1;
    Writeln('Sleeping... zzzZZZZzzzzzzZZZZzzzzzz');
    Sleep(SleepForHowLong*60000+RandomRange(60000,90000));
    Writeln('Finished Sleeping... Your Characted feels refreshed.');
  end;
end;

Procedure Proggy;
begin
  writeln('--------------------------------------');
  writeln('|Barbarian-Fisher-Banker-0wn 4 skill-|');
  writeln('|------------------------------------|');
  Writeln('   Ran For  ' +TimeRunning);
  writeln('   Did '+inttostr(Bankes)+' loads!');
  writeln('   Banked '+inttostr(Fishes)+' Fishes!')
  writeln('   Walked to bank '+inttostr(walkesbank)+' times');
  writeln('   Walked to fish '+inttostr(walkesfish)+' times');
  writeln('   Avoided '+inttostr(WhirlpoolAvoid)+' Whirlpools!');
  writeln('   Slept '+IntToStr(TimesSlept)+' times!');
  writeln('-------------------------------------|');
  writeln('|   Thank you for using my script!   |');
  writeln('-------------------------------------|');
end;

procedure Stats;
begin
  writeln('--------------------------------------');
  writeln('|Barbarian-Fisher-Banker-0wn 4 skill-|');
  writeln('|------------------------------------|');
  Writeln('   Ran For  ' +TimeRunning);
  writeln('   Did '+inttostr(Bankes)+' loads!');
  ReportVars[0]:=ReportVars[0]+Bankes;
  writeln('   Banked '+inttostr(Fishes)+' Fishes!');
  ReportVars[1]:=ReportVars[1]+Fishes;
  writeln('   Walked to bank '+inttostr(walkesbank)+' times');
  ReportVars[2]:=ReportVars[2]+walkesbank;
  writeln('   Walked to fish '+inttostr(walkesfish)+' times');
  ReportVars[3]:=ReportVars[3]+walkesfish;
  writeln('   Avoided '+inttostr(WhirlpoolAvoid)+' Whirlpools!');
  ReportVars[4]:=ReportVars[4]+WhirlPoolAvoid;
  writeln('   Slept '+IntToStr(TimesSlept)+' times!');
  ReportVars[5]:=ReportVars[5]+TimesSlept;
  writeln('-------------------------------------|');
  writeln('|   Thank you for using my script!   |');
  writeln('-------------------------------------|');
  SRLRandomsReport;
  SendSRLReport;
end;


Procedure MainLoop;
Begin
  LoginPlayer;
  SetChat('off',2);
  If Not LoggedIn then Exit;
  If FindLocation='AtBank' then
  Begin
    If Not HaveWeGotFeathers then FeatherMessage;
    If HaveWeGotFlyRod then
    Begin
        If (InvCount>3) then
          Begin
            Writeln('Banking Fish!');
            DepositFished;
        end else
          Begin
            Writeln('We Are at bank, no fish are present');
            Writeln('Walking to Fishing Spot');
            WalkToFish;
          end;
     end else
       GoGetFlyRod;
     end;
  Begin
  If FindLocation='AtFishingSpot' then
    Begin
    If Not HaveWeGotFeathers then FeatherMessage;
    If HaveWeGotFlyRod then
      Begin
          DoFishing;
      end else
      Begin
        GoGetFlyRod;
      end;
   end;
end;
end;


procedure SRLstats;
begin
  SetupSRL;
  ScriptID := '963';
  if ((SRLStatsID = '') or (SRLStatsPass = ''))then
  begin
    Writeln('Please get a SRL Stats ID');
    TerminateScript;
  end else
  begin
    SRLID := SRLStatsID;
    SRLPassword := SRLStatsPass;
  end;
end;

Begin
  SetupSmart;
  SetupSRL;
  SRLStats;
  Signature;
  DeclarePlayers;
   Repeat
    MarkTime(Mark);
      Repeat
        MainLoop;
        If (TimeFromMark(Mark)> SleepEvery*60000) then break;
        If (LTD>=(Players[CurrentPlayer].Integers[0])) then Break;
      Until(LTD>=(Players[CurrentPlayer].Integers[0])) or (Not (LoggedIn));
      If (TimeFromMark(Mark)> SleepEvery*60000) then
      Begin
      If FindLocation='AtFishes' then
        WalkToBank;
        Sleepy;
      end;
      Begin
      If FindLocation='AtBank' then
        Sleepy;
      end;
      If (LTD>=(Players[CurrentPlayer].Integers[0])) then
      Begin
        Writeln('Loads done on this player, changing players');
        Logout;
        NextPlayer(False);
        LTD:=0;
      end;
    Stats;
   Until (False);
Logout;
Proggy;
Writeln('All Players are inactive');
end.

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

Scar tags. (Without not bad either forces you to read it :p
Standards.

looks good, not voting yet.

Okay, sorted, thanx Hermpie.

looks like a good script

*holds vote*

good enough, yes from me.

sorry I'm not giving any tips couse I have a plane to catch, cya.

Thanks for the vote.

Who voted No and for what reason? Please tell me.

Running the script right now. working well. Been working with you and learning a few things. I think you'll make a good addition. voting yes!

Thanx Ransom.

idk i dont think Reflection should be accepted in mems app quite simple

sorry if anyone disagree's

no from me too

no, Reflection without much of a back up = too easy

From: MasterKill
good enough, yes from me.

sorry I'm not giving any tips couse I have a plane to catch, cya.

Where are you going ? :)

And I dunno what to vote :p You gotta be more active, and also fix your standards =\

Ya I have to agree with Pinky / ~~Joker~~ haha.
All the hard stuff is simplified using reflection.

No from me.

Well, all I can say is thanx for the feedback. I have ran this on my main for 7 hours straight. I have no doubt that this is a good script.

@ Hy71194, What do you mean by more active?

Reflection scripts should not be in members apps. No

No it is to dependant on reflection there are no radial walks
you use a case to load 1 dtm

Bankes:=Bankes+1;
Fishes:=Fishes+26;

you should use a dtm to count else it give false proggys what if you get a random

quite alot of useless code im not to fussed about it tho but its best to not have some people will say know if your standards arnt good

 If Not LoggedIn Then Exit;
  Begin
     WalkPath(LoadPath('walkfish'),2, 3);
  end;

not enough failsafes

also you do not free your dtm which = memory leaks = lag

Okay, well. Thanx for all your feedback, seems like my application is heading towards failure. Thanks to all who voted.

You have the knowledge and are a good scripter you just havent used it in the script only use reflection as a backup or make it highly failsafed

No.

Reflection Script With Not Every Reflection Proc Called Backed Up = No…

You can't cheat your self in with reflection.

The reason I havent Backed it up etc is because it doesnt need it. Ive ran this for hours and hours. I can leave it running all day today.

From: 0wn 4 skill
The reason I havent Backed it up etc is because it doesnt need it. Ive ran this for hours and hours. I can leave it running all day today.

but what happens when the hooks get updated, script becomes outdated…. reflection should be used with failsafes each time scripts cant solely rely on reflection

no from me sorry

When the hooks get updated, i will update the script? Im not going to just let it fall. Im using it for myself currently, as we speak.
I have two 2 hour proggy and plan to get a 10 hour one today.

Doh, yes from here.

I'm Holding off on this one. You had a lot of fairly worthless functions that just sort of daisy chained together. Functions aren't bad, but there is such a thing as being TOO simple

dude hooks get outdated.. you cant do anything about it just wait…

thats what we mean..

reflection imo and prob others is quite simple. i dont really think its much work just getting tiles…

So what if it uses reflection, if you have the power to use it, why not, it make a nice, solid script that works. This script shows great failsafes, supports multiple accounts, it's long enough, and clearly shows you know what you are doing. Unless there is a rule somewhere about using reflections when you are applying for members, you get a big Yes from me.

ok look than everyone can apply like that , not even knowing the basics of scar. i just learned reflection in like 1-2 hrs…

i didnt even put effort just read the tut, okay i used the pathmaker… got it done lmfao no effort seriously.
makes the script done, but what about the old srl :(?

From: ~~Joker~~
ok look than everyone can apply like that , not even knowing the basics of scar. i just learned reflection in like 1-2 hrs…

i didnt even put effort just read the tut, okay i used the pathmaker… got it done lmfao no effort seriously.
makes the script done, but what about the old srl :(?

How about a rule gets set into place about only using limited/no reflection in an application, must use some form of radial walking/color finding, and other from now on. I'm just saying this person knows the mechanics of how scripting works, shows good failsafes, and other things. If Scar is going to be used for RuneScape, I think Reflection should be made a standard because all RuneScape bots need it. The only reason it isn't is because Scar can be used for other things, but if we are dealing with RuneScape specific things, go reflection all the way! I say as long as reflections is being supported and updates here on SRL, I see no reason not to use it in every RuneScape script.

im sure wizzup wrote it some were in the members section general news??

No, you need to figure out some regular functions. You have no TPA's, or DDTM's. Sorry.

Fix it up a bit, reflection is great, but its not skilled.

I changed the script to what the latest edition is. It worked for 4 hours and runescape updated for someone. Here is my latest proggy:

I have connection problems.

--------------------------------------
|Barbarian-Fisher-Banker-0wn 4 skill-|
|------------------------------------|
   Ran For  3 Hours, 0 Minutes and 23 Seconds
   Did 33 loads!
   Banked 858 Fishes!
   Walked to bank 34 times
   Walked to fish 33 times
   Avoided 0 Whirlpools!
   Slept 13 times!
-------------------------------------|
|   Thank you for using my script!   |
-------------------------------------|

@ Rune Hacker, i really appreciate your support, but even if i did get in now, i wouldnt feel that everyone agreed on it.

From: Boingpie
O.o, version 1.6 looks nice. Reflection helps in the walking i see. Ima try out this one over night on 2 players. Happy to test for you. Its just a coinsidence that you released this as just as i decided to get my fishing up. Im glad you did thought, this script rocks.
Oh and you should apply for members with this, i think it rocks and it is pretty much flawless, i could get 10hr+ long proggies but my comp always fails me. Gl if u do

Proof that it works well. I please ask you all to re-condsider!

I am not allowed to vote yet (well noone told me not to but i wont yet), but the point isnt to make an extremely well working script (ironic eh?) but to make it work with complex ideas, my first app was denied even though it worked amazingly! I made a version with TPA's, more radialwalking, did work quite as well (still works fine) but the point is to show what you can do…

I realise this, but whats the point of making something complex when something simple works much better? Its just scripting for a game at the end of the day. I dont expect to get an honours degree. Do you think that making it more complex makes me a better scripter? :) Sure, i could make a 1400 line script, but why? I thought I would demonstrate how a simple script can be good, if not better than a complex, autocoloring, 3 course dinner making one :p

From: 0wn 4 skill
I realise this, but whats the point of making something complex when something simple works much better? Its just scripting for a game at the end of the day. I dont expect to get an honours degree. Do you think that making it more complex makes me a better scripter? :) Sure, i could make a 1400 line script, but why? I thought I would demonstrate how a simple script can be good, if not better than a complex, autocoloring, 3 course dinner making one :p

You are applying for SRL members, an honor in our community, it tells everyone else "i earned this through my scripting ability and people trust and like me"… It may be hard to accept, but swallow your pride, add some better failsafes and come back whenever you can (if you dont get in), dont forget, people vote on attitude as well, if you take this gracefully then you will be able to apply in as low as 2 weeks (as i was) and people will say "hey,he didnt get it last time but he didnt argue much and just took our advse"… it will get you a lot farther than people saying "that guy is a prick i wont vote for him even if he makes a 3 course dinner making one", thats all, you will get members if you put your mind to it and take peoples advise :D

I will tell you what peoples advise is… "Its a great script, but since its reflection, we dont like it. Sorry, better luck next time."

Correct me if im wrong…

From: 0wn 4 skill
I will tell you what peoples advise is… "Its a great script, but since its reflection, we dont like it. Sorry, better luck next time."

Correct me if im wrong…

I am, dont take this stuff personally, its just you suck at scripting (LOL JK)…

But take heed to the peoples words below :D

From: Waddo
No it is to dependant on reflection there are no radial walks
you use a case to load 1 dtm

Bankes:=Bankes+1;
Fishes:=Fishes+26;

you should use a dtm to count else it give false proggys what if you get a random

quite alot of useless code im not to fussed about it tho but its best to not have some people will say know if your standards arnt good

 If Not LoggedIn Then Exit;
  Begin
     WalkPath(LoadPath('walkfish'),2, 3);
  end;

not enough failsafes

also you do not free your dtm which = memory leaks = lag

From: Timer
No.

Reflection Script With Not Every Reflection Proc Called Backed Up = No…

You can't cheat your self in with reflection.

From: Bonfield
but what happens when the hooks get updated, script becomes outdated…. reflection should be used with failsafes each time scripts cant solely rely on reflection

no from me sorry

From: Nava2
No, you need to figure out some regular functions. You have no TPA's, or DDTM's. Sorry.

Fix it up a bit, reflection is great, but its not skilled.

I hope you do, and if this fails then apply again, it wont take you long to make it use RadialWalk and whatnot and add failsafes, you will have waiting time between this app and your next application, trust me… :D

Yes, you have just backed up what I said. People dont like reflection.
How come Rune Hacker said the opposite to everyone else? He is open minded, embracing something new. Just because its reflection doesnt mean its any less than a normal script.

From: 0wn 4 skill
Yes, you have just backed up what I said. People dont like reflection.
How come Rune Hacker said the opposite to everyone else? He is open minded, embracing something new. Just because its reflection doesnt mean its any less than a normal script.

It's a RuneScape script, thus should use reflection like all other runescape bots, why not. But becoming a member isn't about making a working script, it's about making a well thought out script with a failsafe at every possible place and the use of most of SRL's functions to your advantage showing you know how to script. I guess make a normal, SRL script to get in and once your in, then make all the working script you want with your new experience scripting for Scar and SRL. Reflection isn't 100% solid due to runescape's updates and such, so still every reflection function should have a failsafe which your script doesn't have. Other bots can have 20 line working scripts, but when dealing with Scar, it's more well known for it's color finding and need for failsafes which makes scripts much longer, but makes Scar useful for any game really. I don't even see why people use Scar for RuneScape autoing when there are such better bots out there, I just use Scar for flash games and other little utilities lol.

Proof that it works well. I please ask you all to re-condsider!

We all know that reflection works and it works well that is why it doesnt give us a realistic view of your scripting abilities. Reflection is just too simple and is the new easy way out of complex scripting - which for the most scripts is always the map walking. Us members want to see that you can find ways to work around problems which is why we look for failsafes. I agree with runehacker in the sense that if your script had a reflection base but had radial walking and dtm finding as failsafes we could see this. The fact that the would be hardest parts of your script are all made 100x simpler by using reflection doesn't show us anything. and it certainly doesnt come off as you utilizing SRL as best as you can, considering that up to 3-4 weeks ago Reflection never existed in SRL's library.
So yes I understand where youre coming from but still you need to come back with either a reflection scipt with a whole lotta failsafe procedures or a non-reflection script.

The Reason why I have used only one dtm because 3/10 times ive used, the dtms fail. Color finding is just the same except more reliable.

if youre talking about DTM's for the inventory then youre making the DTMs wrong… make them using the black and make the center have a tol of 255. If youre talking about the MM and walking try using DDTMs or changing the tol and area size for the points.

9-12, quite a close call. I thank all who have voted (yes AND no)

Any last thoughts?

NO

You did not use

TPA
DDTM
DTM
ETC

Those things are considered "SKILLS".

Reflections
Other Easy s***

Those things are considered … "NOT SKILLS" because all you did was write like 5 lines to make a flawless function.

Its nice your script is flawless, but seriously, think about me and like 5000 people who applied without using reflection. We work too damn hard making the flawless script without using reflections. So really, learn some SKILLS. Like come on, any jack hole can make this script in 5 minuites.

So, your point is: I made a long script that took me ages and probably doesnt work so therefore you have to do the same!

Its just pointless making a long script when this works well and flawlessly.

its not kinda like that basically, you have to show more knowlage of the color based code.

From: 0wn 4 skill
So, your point is: I made a long script that took me ages and probably doesnt work so therefore you have to do the same!

Its just pointless making a long script when this works well and flawlessly.

To some extent yes, but this application isn't about testing how flawlessly you can make a script do something. I can make a script that flawlessly adds 1+1. Every time even! would that get me a membership? Nope, not on your life.

If you have to use reflections, then make your script do more.

Seems like you're not getting in this time, sorry.
You may try again in one month, good luck.
Closed.