SRL Archive - Archive

lancelot074 - SRL Member Application Form


Lancelot074

2007-08-22 11:10:13

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

What is the meaning to life?


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


Programming Knowledge
Java, C++

Other Communitys
None really

How Long have You Played Runescape
2 years

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

I am an intermediate scripter, over the time being at this site, I have never posted, instead I studied scripts and started to try to make my own, and I finally did; I think it's time i tried to apply

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


program New;
{.include OSi.txt}

const Fire = 3584499; //Change only if needed

Procedure Cook(FishType:integer);
var c,Cooked,RawFish,rawx,rawy,firex,firey,subx,suby:integer;
begin
case FishType of
0:begin RawFish := BitmapFromString(8, 4,
'000001874D23804921834C21874D238D5123975725000001000001' +
'874D23804921874D23905325995928A35E2A000001000001874D23' +
'834C218D5123000001000001000001000000000000000001000001' +
'000001000000000000000000000000'); subx:=20; suby:=20; end;//Lobster
1:begin RawFish := BitmapFromString(4, 4,
'000001B9AEADBFB6B6C6BEBE000001C4BBBACBC4C4D4CECE000001' +
'CDC6C5D6D0D0DAD4D4000000000001000001000001'); subx:=-2; suby:=20; end;//Trout
2:begin RawFish := BitmapFromString(4, 4,
'000001A98B86AE908AB59691000001B2938DBB9A95C1A49E000001' +
'BC9C97C2A5A1C4A9A5000000000001000001000001'); subx:=-2; suby:=20; end;//Salmon
3:begin RawFish := BitmapFromString(5, 2,
'564D42000001CAB7ADA67A5F000001000001DACEC7CFBEB6000001' +
'302020'); subx:=0; suby:=8; end; //Shrimp
end;
while(FindBitmapToleranceIn(RawFish,rawx,rawy,560,210,730,465,50))and(FindColorSpiralTolerance(firex,firey,Fire,5,5,514,337,20))do
begin
Mouse(rawx-subx,rawy-suby,25,25,true);
Mouse(firex,firey,3,3,true);
c:=0;
while(FindBitmapToleranceIn(RawFish,x,y,rawx-10,rawy-10,rawx+10,rawy+10,50))and(c<30)do
begin
c:=c+1;
wait(75+random(25));
end;
Cooked:=Cooked+1;
status('Cooked: '+inttostr(Cooked));
wait(100+random(300));
end;
end;

begin
SetupOSi;
Cook(3);
end.

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

Killerdou

2007-08-22 11:12:18

you really need multiplayer and use anti randoms from srl, nice try though:)

n3ss3s

2007-08-22 11:18:36

Thats a good beginning!

But, acknowledge that you dont have to be SRL Member to surf the free part of the forums.

SRL Members Forums are for "approved" scripters, and the SRL Members Forum includes more stuff for their needs. Better and maybe faster help for their problems, better scripts, they will hear the news before the free community and so on, but however, if you wish to become SRL Member some time,
you should know:

DTMs and/or BitMaps.
Walking
Failsafes
Making a decent complex script
Utilize multiplayer well.

Lancelot074

2007-08-22 11:23:34

OK then, I will study more and learn how to apply those to my script, then I'll apply again:)

GoF

2007-08-22 13:03:39

Kind of similar to this…



Procedure CookFish;
var c,rawx,rawy,rangex,rangey:integer;
begin
while(FindBitmapToleranceIn(RawFish,rawx,rawy,560,210,730,465,30))and
(FindColorSpiralTolerance(rangex,rangey,RangeColor,5,5,514,337,20))and
(not(UnderAttack))do
begin
FindRandoms;
Mouse(rawx-subx,rawy-suby,25,25,true);
Mouse(rangex,rangey,3,3,true);
c:=0;
while((FindBitmapToleranceIn(RawFish,x,y,rawx-15,rawy-15,rawx+15,rawy+15,30))and(c<20))or(c<3)do
begin
c:=c+1;
wait(200+random(100));
FindRandoms;
end;
CookCount:=CookCount+1;
Report('Cooking');
end;
end;

Procedure LoadBmps;
begin
case FishType of
0:begin RawFish := BitmapFromString(8, 4,
'000001874D23804921834C21874D238D5123975725000001000001' +
'874D23804921874D23905325995928A35E2A000001000001874D23' +
'834C218D5123000001000001000001000000000000000001000001' +
'000001000000000000000000000000'); subx:=20; suby:=20; end;//Lobster
1:begin RawFish := BitmapFromString(4, 4,
'000001B9AEADBFB6B6C6BEBE000001C4BBBACBC4C4D4CECE000001' +
'CDC6C5D6D0D0DAD4D4000000000001000001000001'); subx:=-2; suby:=20; end;//Trout
2:begin RawFish := BitmapFromString(4, 4,
'000001A98B86AE908AB59691000001B2938DBB9A95C1A49E000001' +
'BC9C97C2A5A1C4A9A5000000000001000001000001'); subx:=-2; suby:=20; end;//Salmon
3:begin RawFish := BitmapFromString(5, 2,
'564D42000001CAB7ADA67A5F000001000001DACEC7CFBEB6000001' +
'302020'); subx:=0; suby:=8; end; //Shrimp
4:begin RawFish := BitmapFromString(5, 6,
'000001D3B3D9C395CCAE7BB79C7FA1000001D6C7DACFBDD3C9B4CD' +
'000001000001CCB7CFC4ACC9000001302020000001C0A6C5BB9FC0' +
'000001302020000001B495BA000001302020302020000001C9B4CD' +
'000001302020564D42'); subx:=18; suby:=10; end;//Sowrdfish
5:begin RawFish := BitmapFromString(4, 5,
'564D42000001B7ADAC5F5858000001C2BAB9C9C2C1CFC9C9000001' +
'CDC6C5D8D2D1DBD6D6000001D9D3D3DCD8D8E0DCDC000001FBFAFA' +
'F5F3F3F0EEEE'); subx:=-4; suby:=15; end; //Herring
6:begin RawFish := BitmapFromString(6, 6,
'001C00001C00001C00001C00001C00C2BAB9001C00CDC6C5001C00' +
'001C00CAC3C2C7C0C0001C00D2CCCC001C00001C00CFC9C9CFC7C7' +
'D9D3D3D9D3D3D8D2D1D6D1D0D5CFCFD3CDCDDFDADADED9D9DCD8D8' +
'DBD6D6DED9D9DCD8D8E8E4E4EAE7E7E9E6E6000001000001000001' +
''); subx:=5; suby:=17; end; //Tuna
7:begin RawFish := BitmapFromString(4, 5,
'0000010000013D6F3F509052345B34478049599E5A5DA55E529253' +
'62AF6367B7686ABE6C6ABE6C6EC46F71CA737DD37F8AAE8A8AAE8A' +
'8AAE8A83D484'); subx:=8; suby:=8; end; //Sardine
8:begin RawFish := BitmapFromString(6, 5,
'000001617B626782676E8B6E7493750000016079606580666A876B' +
'718F71769576000001475A474E624E546A545A715A87AB877E9F7E' +
'506650546A545A715A60796091B79284A785586F585B745D617B62' +
'9FC09F93BA93000001'); subx:=16; suby:=3; end; //Pike
9:begin RawFish := BitmapFromString(5, 4,
'707079797A8483838D78788200000185858F8989951410106C6C75' +
'00000100000190909C4E4E545B5B6358585F00000187879162626A' +
'55555B000001'); subx:=20; suby:=7; end; //Anchovies
10:begin RawFish := BitmapFromString(6, 7,
'6F6F8C70718E7374927777967A7A9A7F7FA07777967A7A9A7C7C9C' +
'7F7FA08081A28484A57F7FA08283A48586A88888AC8B8BAF8E8FB3' +
'8586A87E7E887E7E887E7E887E7E880000018888AC7E7E887E7E88' +
'7E7E887E7E880000018B8BAF7E7E887E7E887E7E887E7E887E7E88' +
'0000010000010000010000017E7E887E7E88'); subx:=6; suby:=14; end; //Cod
11:begin RawFish := BitmapFromString(6, 4,
'887F7E8379797A71718A81807A71710000018C8282877D7C9B9090' +
'8C82827C7373000001AA9E9EACA0A09C91918E84847E7575000001' +
'000001A49897978D8C8A81807C7373000001'); subx:=19; suby:=17; end; //Shark
12:begin RawFish := BitmapFromString(6, 4,
'00000184834A89884E8E8D509392539897559291739A9A7AA2A180' +
'A6A55EABA960B0AE639E9D7DA5A584605959B4B490BBBA96C0BF9D' +
'A9A987605959BABA94C0BF9DC4C4A5CDCC73'); subx:=-2; suby:=12; end; //Mackerel
13:begin RawFish := BitmapFromString(5, 5,
'001D00001D00CB8172C98071C77E70001D00001D00D18576CF8474' +
'CD8373D48F81D48F81D38C7ED38C7ED38A7BD69689D69689D7978C' +
'D69689D59387DBA59B000001000001000001000001'); subx:=7; suby:=18; end; //Bass
end;
end;

From some ancient cooking script by odie.. Busted? Or something :p

Lancelot074

2007-08-22 13:05:30

That is alot longer than my script, i could use that to study off of I guess.

n3ss3s

2007-08-22 15:04:52

Its busted, I guess.

IEatJ00erBaybees

2007-08-22 16:55:56

I think he copied this. This script used oSi. I'll check scar-scripts.com to find out.

http://www.scar-scripts.com/view/64

There we go. My first copybusted point? ^_^

LordGregGreg

2007-08-22 16:58:23

NO
You have not been helpfull onn srl forums enough to deserve this.

What makes this comunity good for both the pros and the learners is the helpfull people involved in it.

Please, take the time to let us know who you are, help some people out, then reaply in a month.

WhiteShadow

2007-08-22 17:19:40

Osi, wow, that script is probably at least 4 years old.

RAM

2007-08-22 17:28:06

From: lancelot074
That is alot longer than my script, i could use that to study off of I guess.


ROFL

Edit:…..this made me laugh so hard, I peed myself, but I'm back with a fresh pair of boxers…

Welcome to the forums….

Please take the time to read the rules and make sure you understand them…..

Please visit tutorial island and learn how to wrie your own script….

Please take the time to make some positive contributions to the community, so we may get to know you a bit better….

While it is understood, that everyone makes mistakes, it is frowned on to plagiarize scripts, especially for the soul purpose of trying to gain membership…..Even if you do make a great script, you must now wait 30 more days to reapply…and hopefully this application will just be a bad memory….

Good luck….

R0b0t1

2007-08-22 18:13:52

Pwned Chicka Owned!