SRL Archive - Archive

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

What is the meaning to life?


Where you Referred to SRL? If yes, by whom?
yes
Sythe.org

Programming Knowledge
C #, some java

Other Communitys
sythe.org RScheata.com

How Long have You Played Runescape
6-7 years

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

i have built computers before
created an internet browser in C #
i have a few levels of a breakout game i made… still in progress

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

{jacoby6000}
{awesome powerminer}


program PowerMiner;

const

startupwait = 10000;//delay after starting script

rockcolor1 = 0;//choose your three colors

rockcolor2 = 0;//choose your three colors

rockcolor3 = 0;// choose your three colors

mininginterval = 25000;// time between ores

rockstomine = 0;//how many rocks you wanna mine

{.include SRL/SRL.scar}



procedure PowerMiner;


var
i, x, y: integer;
begin
cleardebug;
writeln('Yo the miner will begin soon dawg')





wait(startupwait+random(1000))
repeat




if (FindColor(x, y, rockcolor1, 0, 0, 517, 337)) or
(FindColor(x, y, rockcolor2, 0, 0, 517, 337)) or
(FindColor(x, y, rockcolor3, 0, 0, 517, 337))then
mmouse(x,y,2,2)
mouse(x,y,1,1,true)
i:= i + 1
if (invfull = true) then
writeln('dumping ores')
dropall;
cleardebug;
writeln('you got: ' + inttostr(i))
writeln('you dropped: ' + inttostr(i))
writeln('it worked for ' + timerunning)

wait(mininginterval+random(1000))
until i = rockstomine


writeln('it worked for this amount of time w00t ' + timerunning)
writeln('you mined ' + inttostr(i))
writeln('you dropped ' +inttostr(i))
end;


begin
setupsrl
PowerMiner
end.

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

Sorry, too simple IMO. Nice first try, I look froward to a better app from you in a month.
In the meantime, good luck, and have fun!

(For now it is a no, sorry)