Ok, i finished my first script which was just a high alcher i would like to attempt to make a high and low alcher. also how do u make it stop alching when the item u alch is all gone?
here is the script help me out on improving it and stuff.
SCAR Code:
program autoalcher;
{.include srl/SRL.scar}
{.include srl/srl/core/antirandoms.scar}
const
highalch=true //true for high alch false for low alch
procedure Declareplayers;
begin
HowManyPlayers:=1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer:=0;
Players[0].Name :='USERNAME HERE' //PlayerName
Players[0].Pass :='PASSWORD HERE' //Password
Players[0].Nick :='NICK NAME HERE' //Players nick name( a few letters from playername)
Players[0].Loc :=''; //leave this alone
Players[0].Active:=True;// Leave this alone 2
NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars);
end;
procedure alch;
begin
if(highalch = true)then begin
highalch;
or
if(highalch = False)then begin
lowalch;
end;
procedure highalch;
begin
mouse(711,372,5,5,true)
randoms;
wait(2000+random(500));
mouse(711,372,5,5,true)
randoms;
end;
procedure settab;
begin
gametab(7)
randoms;
end;
procedure lowalch;
begin
mouse(708,294,5,5,true)
randoms;
wait(2000+random(500));
randoms;
mouse(708,294,5,5,true)
end;
procedure randoms;
begin
FindNormalRandoms;
if(FindFight)then begin
RunAwayDirection('N');
wait(10000+random(5000));
RunBack;
end;
procedure main;
SetupSRL;
Declareplayers;
settab;
randoms;
repeat
if(highalch=true)then highalch;
if(highalch-false)then lowalch;
end.