P1nky
2007-02-12 12:48:00
i have been lookin 1 past month well if any1 got one please post tyvm
*must have*
-anti ban <<<<<must have please
-anti random
*must have*
-anti ban <<<<<must have please
-anti random
2007-02-12 12:48:00
2007-02-12 17:30:42
2007-02-12 17:35:15
2007-02-12 17:39:00
2007-02-12 17:44:23
2007-02-12 22:13:29
2007-02-13 08:25:39
From: Junkj
I could make one right now and i think i have one,ill post it tommorow ill check if it works.
And one more thing,high or low alc?
2007-02-13 18:12:28
From: Junkj
I could make one right now and i think i have one,ill post it tommorow ill check if it works.
And one more thing,high or low alc?
2007-02-15 11:26:36
2007-02-15 14:37:47
{ ********* ** ** * ********* ""
** ** ** *********** ** ** ** ********
$ ** ** ** ** ** ***** ** ** **
** ** ** $ ** ** ** ** ** ** ** $ ********
**** ** ** ** ** ** * **** **
** ********** ** ** ** * ** ********
$ $ $
****** ** ********** ** ******** ******** $
** $$ ** ** ** ** ** ** *
********** ** ** ******* ******** ********
** ** ** ** ** ** ** ** ** $
** ** ** ********** ** ** ******** ** **
________________________________________________________________________________
+=++=++=++=++=++=++=++=++=++=+Read+At=Risk!++=++=++=++=++=++=++=++=++=++=++=++=+
ok im made a alcher wich i never thought i can do when i got back from my break.
I used the srl manual to help me with it so here it is, the new script from me!!
+=++=++=++=++=++=++=++=++=++=+++=+JunkJ+=++=++=++=++=++=++=++=++=++=++=++=++=++=
not responsible for any banned acounts.
dead?not my problem.
must have the item your alching in the 2nd inventory slot
Anti randoms
Anti ban
-------------------------------------------------------------------------------}
program autoalcher;
{.include srl/srl.scar}
{.include srl/srl/skill/magic.scar}
{.include srl/srl/misc/trade.scar}
var
alched :integer;
traded :integer;
randomfoundormod :integer;
const
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
highorlow=('?');//do you want to high alch or low alch? just put low or high
howmanyalchs=1000;//how many alchs do you want to do
name=('hobo');//your RS2 name
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
procedure alchitdude;
begin
if(highorlow=('high'))then
begin
castspell(35)
useitem(2)
wait(4000+Random(1000))
alched:=howmanyalchs+1
end else
if(highorlow=('low'))then
begin
castspell(14)
useitem(2)
wait(4000+Random(1000))
alched:=howmanyalchs+1
end;
end;
procedure findthetrade;
begin
if(findtrade)then
Accepttrade;
wait(5000)
Decline;
typesend('nty, now scoot im busy')
traded:=traded+1
end;
procedure hatetherandoms;
begin
FindNormalRandoms;
if (FindTalk) then
begin
Writeln('talking or found a talk');
randomfoundormod:=randomfoundormod+1
if (FindMime) then
begin
writeln('lucky you, a mime!');
randomfoundormod:=randomfoundormod+1
if (FindMaze) then
begin
writeln('found maze');
randomfoundormod:=randomfoundormod+1
if (SolveFrog) then
begin
writeln('solved a frog');
randomfoundormod:=randomfoundormod+1
if (Findmod)then
begin
writeln('its the moderater!,AHHH!');
randomfoundormod:=randomfoundormod+1
if (solvepinball)then
begin
writeln('solved a pinball...');
randomfoundormod:=randomfoundormod+1
if (findforester) then
begin
writeln('found forester');
randomfoundormod:=randomfoundormod+1
if(findscaperune)then
begin
createscaperune;
writeln('found scape rune');
randomfoundormod:=randomfoundormod+1
end;
end;
end;
end;
end;
end;
end;
end;
end;
procedure hello;
begin
if (inchat('hello'))or
(inchat('hi'))or
(inchat('hey'))or
(inchat('yo'))or
(inchat(name))then
typesend('hey')
end;
procedure whatsup;
begin
if (inchat('whats up'))or
(inchat('whats new'))or
(inchat('whats the 411'))then
typesend('nothing')
end;
procedure friends;
begin
if (inchat('friends'))or
(inchat('frends'))or
(inchat('buddys'))or
(inchat('add'))or
(inchat('add me'))then
typesend('sorry,got lots of them')
end;
procedure hatenoobcallers;
begin
if (inchat('noob'))or
(inchat('noobie'))or
(inchat('nub'))or
(inchat('choob'))or
(inchat('froobie'))or
(inchat('choobie'))or
(inchat('froob'))or
(inchat('nubie'))then
typesend('so i dont care,i play it for a reason.')
typesend('blah blah blah a dailt basis for everyone')
typesend('omfg why does everyone do this?!?')
end;
procedure proggy;
begin
writeln('!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=');
writeln('It finished or stopped in ' + (timerunning));
writeln('It alched ' + inttostr(howmanyalchs) + ' times');
writeln('Found ' + inttostr(randomfoundormod) + ' randoms or talks or mods');
writeln('You have been traded ' + inttostr(traded) + ' times');
writeln('!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=');
end;
procedure thereaper;
begin
if(wearedead)then
begin
disguisescar('a dead script')
writeln('you died not me!');
proggy;
logout;
terminatescript;
end;
end;
procedure theintro;
begin
Writeln('**************************************************');
writeln('**|You are now using my wonderful alcher!Enjoy!|**');
writeln('*****|your doing ' + (highorlow) + ' alchemy|*****');
Writeln('*******|your current name is ' + (name) + '|******');
Writeln('**************************************************');
end;
begin
disguisescar('a running script')
SetUpSRL;
ActivateClient;
ClearDebug;
theintro;
repeat
findnormalrandoms;
thereaper;
alchitdude;
hatetherandoms;
hatenoobcallers;
whatsup;
hello;
until(howmanyalchs=howmanyalchs)
if(howmanyalchs=howmanyalchs)then
cleardebug;
disguisescar('a done script')
srlrandomsreport;
logout;
proggy;
terminatescript;
end.
2007-02-16 17:15:50
2007-02-17 12:12:10
2007-02-18 06:16:35
procedure hatetherandoms;
begin
FindNormalRandoms;
if (FindTalk) then
begin
Writeln('talking or found a talk');
randomfoundormod:=randomfoundormod+1
end;
if (FindMime) then
begin
writeln('lucky you, a mime!');
randomfoundormod:=randomfoundormod+1
end;
if (FindMaze) then
begin
writeln('found maze');
randomfoundormod:=randomfoundormod+1
end;
if (SolveFrog) then
begin
writeln('solved a frog');
randomfoundormod:=randomfoundormod+1
end;
if (Findmod)then
begin
writeln('its the moderater!,AHHH!');
randomfoundormod:=randomfoundormod+1
end;
if (solvepinball)then
begin
writeln('solved a pinball...');
randomfoundormod:=randomfoundormod+1
end;
if (findforester) then
begin
writeln('found forester');
randomfoundormod:=randomfoundormod+1
end;
if(findscaperune)then
begin
createscaperune;
writeln('found scape rune');
randomfoundormod:=randomfoundormod+1
end;
end;