This will be eally simple if your going to hop worlds and open up the store... All you need to do is make a bitmap for the cosmic runes like
SCAR Code:
program CosmicBuyer;
{.include Srl/srl.scar}
Procedure BuyTehCosmics;
Begin
If (FindbitMapIn(CosmicRune, x, y, MSx1, MSy1, MSx2, MSy2)) Then
Begin
Mouse(x, y, 10, 10, False);
Wait(250+random(250));
ChooseOption('uy');
Wait(250+random(250));
End;
end;
begin
BuyTehCosmics;
End.
and if you buy them only one at a time your going to want something like this.
SCAR Code:
program CosmicBuyer;
{.include Srl/srl.scar}
var
a : Integer;
Procedure BuyTehCosmics;
Begin
If (FindbitMapIn(CosmicRune, x, y, MSx1, MSy1, MSx2, MSy2)) Then
Begin
Repeat
Mouse(x, y, 10, 10, False);
Wait(250+random(250));
ChooseOption('uy');
a:=A+1;
Until(a >= 100)
End;
end;
begin
BuyTehCosmics;
End.
hope this helped
if you have anymore questions just ask Note: You will have to make the bitmap yourself!!
~lVlaverick~