Simba Code:
program new;
{$i srl/srl/misc/smart.scar}
{$i srl/srl.scar}
Var
x, y: Integer;
Procedure DeclarePlayer;
Begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name :='';
Players[0].Pass :='';
Players[0].Nick :='';
Players[0].Active:=True;
End;
Procedure Coaltobag;
Begin
Mouse(620, 232, 7, 7, True);
MMouse(577, 228, 2, 2);
Wait(200+random(100));
Mouse(x, y, 0, 0,True);
End;
Begin
Smart_Server := 8;
Smart_Members := False;
Smart_Signed := True;
Smart_SuperDetail := False;
ClearDebug;
SetupSrl;
DeclarePlayer;
LoginPlayer;
Coaltobag;
end.
After Running it Clicks The Coal And Moves To Coal Bag And then Goes Of to top Corner ?