Hi guys, basically i've started to follow tutorials that i have found on this site and gone through them to learn about scripting.
For this script i didn't write it myself i was following a tutorial by The_Rs_Monkey
I've experimented with changing a few things from the final script to get it to work. I and was just looking for some pointers on what to look at next.
Basically it will log-on fine but it won't begin to chop the wood...i think its done it like once... I select the colours right before i run the script and everything....
Thank you in advance
heres the code...
P.S. before you rip into me...remember this is my first attempt and i havent bin able to put anti-ban etc on yet because i havent learnt that much yet lol
Code:{ Script By Ash With ALOT! help from... The_Rs_Monkey's tutorial on www.srl-forums.com } program New; {.include SRL/SRL.scar} const LoadsPerPlayer = 10; //Number of loads before Moving onto the next user. TreeColor = 4156042; //Colour of the tree you wish to chop. WaitPerTree = 5000; //Time to wait before clicking another tree. procedure DeclarePlayers; begin NumberOfPlayers(1) Players[0].Name := ''; //Please enter your Runescape User name. Players[0].Pass := ''; //Please enter your Runesacpe Password. Players[0].Nick := 'shma'; //Please enter a nick E.G. if your username is donkey enter 'onke' Players[0].Active := True; //Is this player active? {Players[1].Name := ''; //Please enter your Runescape User name. Players[1].Pass := ''; //Please enter your Runesacpe Password. Players[1].Nick := ''; //Please enter a nick E.G. if your username is donkey enter 'onke' Players[1].Active := True; //Is this player active? } { LoadPlayerArray(Players); } end; procedure ChopTree; var x,y, MyMark : integer; begin if not loggedin then Exit; MarkTime(MyMark); repeat if FindObj(x, y, 'hop', TreeColor, 20) then begin Mouse(x, y, 0, 0, False); if ChooseOption('hop') then begin Wait(WaitPerTree); Exit; //Successfull chop so exit. end; end else begin writeln('Could not find Tree.'); end; if TimeFromMark(MyMark) > (1*30*100) then //If no chop within 30 secs then exit begin Logout; Exit; end; until false end; {var level : integer;} begin SetupSRL; DeclarePlayers; if Loggedin then LogOut; LoginPlayer; //level := GetSkillLevel('Woodcutting'); writeln('logged in'); repeat ChopTree; if InvFull then begin DropToPosition(2,28); Inc(Players[CurrentPlayer].Banked); if Players[CurrentPlayer].Banked mod LoadsPerPlayer = 0 then begin NextPlayer(True); end; end; if not Loggedin then NextPlayer(False); until false end.



Reply With Quote




Thanks yeh that was what was stopping it working. Its running now, so i put it in the my first script section...obviously i added antirandom and anti ban. But yeh thanks guys you really helped me
so yeh thanks
