SRL Archive - RS3 Outdated / Broken Scripts

[RS2]Auto Alchemy v2.0


Mr. Doctor

2007-02-14 21:38:34

Ok im back and made a auto alchemy script since everyone wants a auto clicker for a alchemy thing, why not make a auto alchemy? :confused:
When it gets better im gonna test it out and maybe sell it when it gets to the last version(i might sell it). :redface:

creds to:the srl manua :sasmokin: l, junior :cartman: and rest to myself :D .

————–
anti ban |
anti randoms |
short setup |
auto-cast |
auto-wait |
high+low alch |
and other |
stuff :p |
————–

The alcher==

{ ********* ** ** * ********* ""
** ** ** *********** ** ** ** ********
$ ** ** ** ** ** ***** ** ** **
** ** ** $ ** ** ** ** ** ** ** $ ********
**** ** ** ** ** ** * **** **
** ********** ** ** ** * ** ********
$ $ $
****** ** ********** ** ******** ******** $
** $$ ** ** ** ** ** ** *
********** ** ** ******* ******** ********
** ** ** ** ** ** ** ** ** $
** ** ** ********** ** ** ******** ** **
________________________________________________________________________________
+=++=++=++=++=++=++=++=++=++=+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=50; //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.')
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;
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
disguisescar('a done script')
srlrandomsreport;
logout;
proggy;
terminatescript;
end.

Enjoy! :cartman:

legendaryhero90

2007-02-14 22:02:56

hmmm…
it looks like an auto clicker to me….

Rencuz

2007-02-15 00:33:00

You can use SRLRandomsReport;

Mr. Doctor

2007-02-15 15:29:37

From: Rencuz
You can use SRLRandomsReport;


Yeah im using that in my other version.

the scar noob

2007-02-16 15:39:30

hmmm…
it looks like an auto clicker to me….

Why? It isn't perfect, i know, but hey it's his first script! (or somekinda like that)
It does what it has to do…

the scar noob

2007-02-16 15:41:33

From: legendaryhero90
hmmm…
it looks like an auto clicker to me….


Why? I know it isn't a perfect script, but hey, it does what it suppose to do…

Mr. Doctor

2007-02-16 16:09:34

Plz dont double post.

the scar noob

2007-02-16 16:15:24

ow sorry, i didn't knew i double posted, sorry