SRL Archive - Archive

Boonce - SRL Member Application Form


Boonce

2007-09-17 02:34:24

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

What is the meaning to life?


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


Programming Knowledge
PHP, Python, Java

Other Communitys
D2jsp, Chivalry Legions

How Long have You Played Runescape
5 weeks

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

I am currently studying Software Engineering at Newcastle University (NSW, Australia).

In my spare time I play Runescape or what I've started to do; code so I don't have to play Runescape as much. :D

The other day I made a little upload script at http://boonce.org/ just for funzies, which is free to anybody who wants to use it.

I haven't made many scripts in scar yet however here's one I made for use in W16 airs (as it gets tedious typing a lot). It is not very advanced I must say.

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


program BoonceAirRuneGrind;
{.include SRL/SRL.scar}
{.include SRL/SRL/extended/xText.scar}
{.include SRL/SRL/extended/xMouseFlag.scar}

var
x, y : Integer;

const
Pay = '2000'; // How much to pay for a 25 ess load.
Spam = 'open 2k'; // Spam to tell people you're a crafter!

procedure GoSpam;
begin
TypeSend(Spam +chr(13));
end;

procedure GivePayEss;
begin //GivePayEss
// Slot 1 - Give gold
CMouse(585, 227, 11, 11, False);
Wait(250+random(250));
MMouse(0, 82, 4, 2);
GetMousePos(x, y);
Mouse(x, y, 0, 0, True);
Wait(250+random(250));
TypeSend(Pay +chr(13));

// Wait 250-750ms
Wait(250+random(250));

// Slot 2 - Give Ess
CMouse(626, 227, 11, 11, False);
Wait(250+random(250));
MMouse(0, 82, 4, 2);
GetMousePos(x, y);
Mouse(x, y, 0, 0, True);
TypeSend('25' +chr(13));


// Wait 250-750ms
Wait(250+random(500));

// Click Accept
CMouse(257, 191, 24, 10, True);
end; //GivePayEss





begin // Main program.
repeat
if IsFKeyDown(1) then
begin
GoSpam();
Wait(1000+random(500));
end;
if IsFKeyDown(2) then
begin
GivePayEss();
Wait(1000+random(500));
end;
until IsFKeyDown(12)
end. //Main Program

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

MasterKill

2007-09-17 02:52:13

sorry but this is not good enough for members. try again later when you got a very good and advanced script.

no, sorry

~alex~

2007-09-17 02:52:14

Good attempt however this isn't advanced enough for SRL members. Try reading up more in tutorial island and come back in a month.

elementalelf

2007-09-17 03:04:57

hahahah you are at newwy uni? ill be there in 2 years :) (mechatronics engineering)
where abouts in newcastle are you from? warners bay here

Oh, as for the app, im withholding my vote because i cant vote no to someone from my area :P

omgwtf? it turns out i have known this guy for about 5 years, he went to my old high school….

wierd.

shaunthasheep

2007-09-17 18:46:20

The script is incomplete. You need multiplayer, anti-randoms, and optional anti-ban. We are looking that you can make a complete script (say a powerminer), and also a script that doesn't require a human to be present to run. You look like you'll learn the SCAR language very rapidly, however you have to wait 1 month 'till you are allowed to apply again. Also note that it will let you apply at any time, but you must wait 1 month or your application will be closed, no matter what.

YoHoJo

2007-09-17 18:57:19

Closed for Above Reasons