i need to bot!
01-11-2012, 10:50 PM
So, I have been working on a script, and I have been coming across this error :( i am kinda new to Simba, so, I will be thankful for any advice!
I also am having trouble on logging in :-/. If anyone would know any working logging in 'declare players', plz tell me :D
program Script;
{$DEFINE Smart}
{$i SRL\SRL.scar}
{$i sps/sps.simba}
Procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
with Players[0] do
begin
Name := 'XXXXXXX';
Pass := 'XXXXXXX';
Pin := '';
BoxRewards := ['XP','xp','lamp'];
LampSkill := 'Farming';
Active := True;
end;
end;
var
X, Y, pieshell : Integer;
procedure LoadDTM;
begin
pieshellDTM := DTMFromString('78DA636C676060486040014BAB3DC034239 4C' +
'F381948A830A0012654350F81841501353F80441401352780 C426' +
'026AFA80C40E026A2280C41E026ADC89B00BE4A79504D4280 2892' +
'904D448028942026AA488081F2520E14D408D261171610024 4C08' +
'A8B103123A04D4441291365281840C11E9670601352F81440 F013' +
'59F8044357E3500B7E31420');
end;
procedure Findpieshell;
begin
Recult:= FindDTM(pie shellDTM, X, Y, MIX1, MIY1, MIX2, MIY2);
if Find pie shell then
Mouse(x,y, 0, 0, True);
end;
begin
SetUpSRL;
ActivateClient;
DeclarePlayers;
FreeDTM(PieShellDTM);
LoadDTM;
Findpieshell;
end.
Thanks for any help xD, I know I have been posting a lot ... :-(
I also am having trouble on logging in :-/. If anyone would know any working logging in 'declare players', plz tell me :D
program Script;
{$DEFINE Smart}
{$i SRL\SRL.scar}
{$i sps/sps.simba}
Procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
with Players[0] do
begin
Name := 'XXXXXXX';
Pass := 'XXXXXXX';
Pin := '';
BoxRewards := ['XP','xp','lamp'];
LampSkill := 'Farming';
Active := True;
end;
end;
var
X, Y, pieshell : Integer;
procedure LoadDTM;
begin
pieshellDTM := DTMFromString('78DA636C676060486040014BAB3DC034239 4C' +
'F381948A830A0012654350F81841501353F80441401352780 C426' +
'026AFA80C40E026A2280C41E026ADC89B00BE4A79504D4280 2892' +
'904D448028942026AA488081F2520E14D408D261171610024 4C08' +
'A8B103123A04D4441291365281840C11E9670601352F81440 F013' +
'59F8044357E3500B7E31420');
end;
procedure Findpieshell;
begin
Recult:= FindDTM(pie shellDTM, X, Y, MIX1, MIY1, MIX2, MIY2);
if Find pie shell then
Mouse(x,y, 0, 0, True);
end;
begin
SetUpSRL;
ActivateClient;
DeclarePlayers;
FreeDTM(PieShellDTM);
LoadDTM;
Findpieshell;
end.
Thanks for any help xD, I know I have been posting a lot ... :-(