If anyone can look at this and help me please do so

[Blue90]

program Powerminer;
{$DEFINE SMART}
{$i SRL\SRL.scar}
{$i SRL\SRL\Misc\Stats.simba}
{$i SRL\SRL.simba}
{$i SRL\SRL\Misc\Debug.simba}

Spell Names :
'wind rush','wind strike','confuse','water strike', 'earth strike',
'weaken','fire strike','wind bolt','course','blind',

Const
SERVER = 61;
MEMBERS = False;
SRLStats_Username = ''
SRLStats_Password = ''
NumberOfPlayers = 1; //How many players will be playing
StartPlayer = 0; //Start what number in the category
LoadsPerLogin=15; //Loads the player has done
LoadsTotal = 9999;
AntiBDrop= True;
DropGems= True;
SleepyWeepie= 7;
YDebug= False;
BreakEvery = 120;
BreakFor = 3;

Version= '0.01';

Procedure DeclarePlayers;
var i:integer;
begin
NumberOfPlayers(NumbOfPlayers);
CurrentPlayer := StartPlayer;
for i := 0 to NumbOfPlayers-1 do
Players[i].BoxRewards := ['mote', 'ostume', 'XP', 'Gem', 'ithril', 'oal', 'une', 'oins'];

with Players[0] do
begin
Name := ''; //Player username.
Pass := ''; //Player password.
Nick := ''; //Player nickname - 3-4 letters of Player username.
Active := True;
Integers[1] := 4; //1=BrightCopper,2=DarkCopper,3=Tin,4=Iron.
Integers[2] := 4; //Seconds to try mining rock before clicking another.
end;


Procedure StatsGuise (wat:String);
begin
Status(wat);
Disguise(wat);
end;

Function CheckAndClick(X,Y:Integer):Boolean;
Begin
MMouse(x, y, 5, 5);
{Wait(100 + Random(50));
If CountUpColor('B', 41, 5, 86, 24, 70, 140) Then}
If WaitUpTextMulti(['Mine','ine'], 150) Then
Begin
Result:=True;
GetMousePos(x, y);
Mouse(x, y, 0, 0,True);
Wait(100+Random(50));
FFlag(0);
End;

Procedure Antiban;
Begin
Case Random(192) Of
0: HoverSkill('Mining', True);
1: Begin PickUpMouse; SleepAndMoveMouse(3000 + Random(500)); End;
2: ExamineInv('False');
3: RandomAngle(1);
4: Begin GameTab(Tab_Stats); Wait(1500 + Random(500)); GameTab(Tab_Inv); End;
5: HoverSkill('random', False);
End;
End;

Procedure Failsafe (Reason:String);
begin (CurrentPlayer).Log:Reason;
Logout;
Stats_Commit;
ProgressReport;
TerminateScript;
end;

Function MineOre;
Begin
///FindObjCustom(x, y, ['att', 'ack'], [123456, 345678], 5);
if FindObjCustom(xaxis,yaxis,('Mine Rocks','Mine'),('1651770','1915713','1453105','152 3785'],30') Then
Writeln('Yay')
end;

begin
SetupSRL;
DeclarePlayers;
Repeat
MineOre;
Until(false);

end.



Getting

[Hint] C:\Simba\Includes\SRL/SRL/core/antirandoms/pinball.scar(37:3): Variable 'MA' never used at line 36
[Error] (13:3): Duplicate identifier 'NumberOfPlayers' at line 12

But ive tried to add the includes for the antirandoms..

[Sin]

program Powerminer;


Spell Names :
'wind rush','wind strike','confuse','water strike', 'earth strike',
'weaken','fire strike','wind bolt','course','blind',

Am i missing something here? :s


Btw, we use Simba, not srl, change all endings to .simba.

[Blue90]

What the hell, I deleted those I dont even know where that came from..Thanks i'll change my endings