SRL Archive - Archive

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

What is the meaning to life?

42

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


Programming Knowledge
Scar, Visual Basic

Other Communitys
Sythe, Scar-Scripts

How Long have You Played Runescape
3 Years

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

I play Runescape almost everyday, macro about every second day.

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

Here is one of my very first scripts, my Auto Bone-Buryer Version 2!

{.Script Info:
# ScriptName  = Auto Bone-Buryer
# Author      = Christopher Malone
# Description = Runescape Bone-Buryer
# Version     = 2
# Date        = Monday 15 January 2007
# Comments    = Runescape Auto
/Script Info}
program BoneBuryer;
begin
movemousesmooth (224,167)
wait(1500)
clickmouse (224,167,false)
wait(1500)
movemousesmooth (204,212)
wait(1500)
clickmouse (204,212,true)
wait(2000)
movemousesmooth (474,78)
wait(1500)
clickmouse (474,78,true)
wait(1500)
movemousesmooth (94,76)
wait(1500)
clickmouse (94,76,false)
wait(1500)
movemousesmooth (80,146)
wait(1500)
clickmouse (80,146,true)
wait(1500)
movemousesmooth (485,41)
wait(1750)
clickmouse (485,41,true)
wait(1750)
movemousesmooth (584,229)
wait(1750)
clickmouse (584,229,true)
wait(1750)
clickmouse (626,229,true)
wait(1750)
clickmouse (668,229,true)
wait(1750)
clickmouse (710,229,true)
wait(1750)
clickmouse (585,264,true)
wait(1750)
clickmouse (627,264,true)
wait(1750)
clickmouse (668,264,true)
wait(1750)
clickmouse (708,264,true)
wait(1750)
clickmouse (583,300,true)
wait(1750)
clickmouse (625,300,true)
wait(1750)
clickmouse (668,300,true)
wait(1750)
clickmouse (711,300,true)
wait(1750)
clickmouse (583,336,true)
wait(1750)
clickmouse (627,336,true)
wait(1750)
clickmouse (668,336,true)
wait(1750)
clickmouse (709,336,true)
wait(1750)
clickmouse (584,372,true)
wait(1750)
clickmouse (626,372,true)
wait(1750)
clickmouse (667,372,true)
wait(1750)
clickmouse (711,372,true)
wait(1750)
clickmouse (584,407,true)
wait(1750)
clickmouse (624,407,true)
wait(1750)
clickmouse (667,407,true)
wait(1750)
clickmouse (710,407,true)
wait(1750)
clickmouse (584,445,true)
wait(1750)
clickmouse (627,445,true)
wait(1750)
clickmouse (669,445,true)
wait(1750)
clickmouse (710,445,true)
wait(1750)
clickmouse (710,445,true)
wait(1750)
end.

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

ClickMouse=Ban
And you need to use SRl include in your script.
add

{.include SRL/SRL.scar}

into your script.
Use SRL's

Mouse(x,y,ranx,rany:Integer,Left:Boolean);

instead of Clickmouse.

this could be a lot shorter:

procedure BuryBones;
begin
repeat
if(FindColor(x,y,color,coords,coords,coords,coords))then
Mouse(x,y,2,2,true);
wait(200+random(100));
until(not(FincColor(x,y,color,coords,coords,coords,coords)));
end;
begin
BuryBones
end.

so I'd suggest doing something like that instead of making it click every spot in inventory.. and as said above, do NOT use MoveMouseSmooth and ClickMouse.. those will get you banned very quickly, instead use MMouse for moving mouse, and Mouse for clicking, read my tut, links in sig "things the beginner tuts don't teach you" that should help you in learning those.. but its a no from me dude.