learning2breathe
2007-09-27 20:02:59
<!– BEGIN TEMPLATE: formanswers –>
learning2breathe - SRL Member Application Form
learning2breathe
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
yes
I heard about it on RS2 and and searched "SCAR" and found you.
Programming Knowledge
Java
Other Communitys
www.scar-scripts.com
How Long have You Played Runescape
about 6 years
Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.
I am still learning SRL and SCAR, its a great tool! I want to become a member to help out as much as i can because you guys took the time to create this web site for every one else, you could have easily sold this program, its absolutely great. Even thought i do not know much about this yet, im learning and i want to give back as much as i can.
thanks for taking the time to read this.
"learning2breathe"
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
——————————————————
<!– END TEMPLATE: formanswers –>
learning2breathe - SRL Member Application Form
learning2breathe
What is the meaning to life?
Where you Referred to SRL? If yes, by whom?
yes
I heard about it on RS2 and and searched "SCAR" and found you.
Programming Knowledge
Java
Other Communitys
www.scar-scripts.com
How Long have You Played Runescape
about 6 years
Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.
I am still learning SRL and SCAR, its a great tool! I want to become a member to help out as much as i can because you guys took the time to create this web site for every one else, you could have easily sold this program, its absolutely great. Even thought i do not know much about this yet, im learning and i want to give back as much as i can.
thanks for taking the time to read this.
"learning2breathe"
——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted
Program;
{.Include SRL/SRL.scar}
var
Teletimes : integer;
Const
//////AutoTalker
Line1='Hello World';
HitEnter=false; //Hit enter after saying Line1
//////Inventory Dropper
DropEverything=false;
//////Auto Seller
SellAmount=10; //Sell what amount each time (1,5,10)
SellRow=1; //Row 1-4 (Horizontal
SellCol=1; //Column 1-7 (Vertical)
//////Auto Teleport
WaitTime=2000; //Wait time between spells in MILISECONDS
RepeatTimes=5; //How many times to teleport. Put 0 if you dont wish to use.
Procedure SellCoordinates(x, y, amount: Integer);
begin
end;
Procedure Typer;
begin
If(IsFKeydown(2))then
begin
SendText(Line1);
wait(200);
If(Hitenter = true)then
Sendkeys(chr(13));
end else;
end;
Procedure ClearInventory;
begin
If(IsFkeydown(3))then
begin
DropAll;
end else;
end;
Procedure StayLoggedIn;
begin
If(IsFkeydown(4))then
begin
wait(2000+random(2000));
repeat
Case Random(4) of
0: KeyDown(vk_up);
1: KeyDown(vk_right);
2: KeyDown(vk_left);
3: KeyDown(vk_down);
end;
sleep(2000+random(4000));
KeyUp(vk_up);
KeyUp(vk_right);
KeyUp(vk_left);
KeyUp(vk_down);
wait(500+random(1000));
until(IsFKeyDown(4))
end else
end;
Procedure AutoSell;
begin
If(IsFKeyDown(5))then
begin
GetMousePos(x,y);
wait(10);
end else
end;
Procedure AutoTele;
begin
if(IsFKeyDown(6))then
begin
Writeln('Move mouse over desired Teleport');
wait(1000);
Writeln('3 Seconds');
wait(1000);
Writeln('2 Seconds');
wait(1000);
Writeln('1 Second');
wait(1000);
GetMousePos(x,y);
Repeat
MMouse(x,y,1,2);
wait(25+random(73));
Mouse(x,y,2,1,true);
TeleTimes:=TeleTimes + 1;
Wait(WaitTime+random(1500))
Until(TeleTimes = RepeatTimes)
end else
end;
Begin
SetupSRL;
repeat
StayLoggedIn;
wait(10);
Typer;
wait-end.——————————————————
<!– END TEMPLATE: formanswers –>