akkida2
2008-08-31 07:25:01
<!– BEGIN TEMPLATE: formanswers –>
akkida2 - SRL Member Application Form
akkida2
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
no
Programming Knowledge
Delphi
Other Communitys
Sythe
How Long have You Played Runescape
2002
Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.
Well im 19 year old man from Finland. I graduated university for few months ago. Now Im programming for one corporation some electric calculators.
Few months ago I got interested in scripting with SCAR, and now I'm learning it every day to get better and better.
Id like to get member so I can read good scripts and get better scripter, (not copy them :D). And I'd also like to share my scripts to only members so they wouldn't get detected.
And third why I'd like to get members is because I would want to use your amazing scripts.
And here is my first script wich is kind old and I have made it better and few other scripts but i want to share them with only members.
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
——————————————————
<!– END TEMPLATE: formanswers –>
akkida2 - SRL Member Application Form
akkida2
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
no
Programming Knowledge
Delphi
Other Communitys
Sythe
How Long have You Played Runescape
2002
Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.
Well im 19 year old man from Finland. I graduated university for few months ago. Now Im programming for one corporation some electric calculators.
Few months ago I got interested in scripting with SCAR, and now I'm learning it every day to get better and better.
Id like to get member so I can read good scripts and get better scripter, (not copy them :D). And I'd also like to share my scripts to only members so they wouldn't get detected.
And third why I'd like to get members is because I would want to use your amazing scripts.
And here is my first script wich is kind old and I have made it better and few other scripts but i want to share them with only members.
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
program New;
var
ore1: string;
ore2: string;
furnacex: integer;
furnacey: integer;
bankx: integer;
banky: integer;
booth1: integer;
booth2: integer;
kababx: integer;
kababy: integer;
mithx: integer;
mithy: integer;
coalx: integer;
coaly: integer;
procedure openbank;
begin;
findcolor(booth1,booth2,6060167,0,0,999,999)
clickmouse(booth1,booth2,true);
wait(500);
clickmouse(booth1,booth2,false);
wait(500);
booth2:=(booth2+45);
wait(100);
clickmouse(booth1,booth2,true);
wait(2500);
end;
procedure getmithrel;
begin;
findcolor(mithx,mithy,7359820,0,0,999,999);
wait(2500);
mithx:=(mithx-10);
mithy:=(mithy+10);
movemousesmooth(96,78);
wait(250);
clickmouse(96,78,false);
wait(500);
mithy:=(mithy+89);
movemousesmooth(96,117);
wait(250);
clickmouse(96,117,true);
wait(750);
end;
procedure getcoal;
begin;
findcolor(mithx,mithy,7359820,0,0,999,999);
wait(500);
mithx:=(mithx-10);
mithy:=(mithy+10);
movemousesmooth(143,78);
wait(250);
clickmouse(143,78,false);
wait(500);
mithy:=(mithy+89);
movemousesmooth(143,157);
wait(250);
clickmouse(143,157,true);
wait(750);
end;
procedure gotofurnace;
begin;
wait(1500);
movemousesmooth(486,46);
clickmouse(486,46,true);
wait(5000);
findcolor(kababx,kababy,1349913,0,0,999,999)
movemousesmooth(kababx,kababy);
wait(5000);
clickmouse(kababx,kababy,true);
end;
procedure furnacetwo;
begin;
wait(1500);
findcolor(furnacex,furnacey,1638399,0,0,999,
movemousesmooth(furnacex,furnacey);
wait(5000);
clickmouse(furnacex,furnacey,true);
end;
procedure furnaceclk;
begin;
wait(1500);
movemousesmooth(225,67);
clickmouse(225,67,true);
wait(5000);
movemousesmooth(225,67);
wait(1500);
clickmouse(225,67,true);
wait(1500);
movemousesmooth(360,416);
wait(1500);
clickmouse(360,416,false);
wait(1500);
movemousesmooth(361,452);
wait(10000);
clickmouse(361,452,true);
end;
procedure gobankin;
begin;
findcolor(coalx,coaly,5495791,0,0,999,999);
wait(150);
movemousesmooth(coalx,coaly);
wait(750);
clickmouse(coalx,coaly,true);
wait(150);
end;
begin
ore1:='5' //set varables here
ore2:='23'
openbank;;
wait(750);
getmithrel;
wait(750);
getcoal;
wait(2500);
gotofurnace;
wait(6500);
furnacetwo;
wait(750);
furnaceclk;
wait(750);
gobankin;
wait(150);
end.
——————————————————
<!– END TEMPLATE: formanswers –>