akash22
05-26-2012, 09:57 PM
Hey guys i was wondering what was wrong with this, i followed the tutorial buy it says [Error] (125:1): Identifier expected at line 124
Compiling failed
Program DTM;
{.include SRL/SRL.simba}
Var
Arrow:integer;
X,y:integer;
Procedure LoadDTM;
Begin
Arrow := DTMFromString('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZi gN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA');
End;
Procedure FindItem;
Begin
If FindDTM(Arrow,x,y,MIX1,MIY1,MIX2,MIY2)THEN
Begin
MMouse(x,y,5,5);
If Isuptext('Arrow') then
Begin
mouse(x,y,5,5,true);
end else
WriteIn('No DTM found');
end;
end;
Begin
SetupSRL: // MAIN LOOP
ActivateClient;
LoadDTM; // Call the loading first
FindItem;
FreeDTM(ArrowDTM)
Compiling failed
Program DTM;
{.include SRL/SRL.simba}
Var
Arrow:integer;
X,y:integer;
Procedure LoadDTM;
Begin
Arrow := DTMFromString('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZi gN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA');
End;
Procedure FindItem;
Begin
If FindDTM(Arrow,x,y,MIX1,MIY1,MIX2,MIY2)THEN
Begin
MMouse(x,y,5,5);
If Isuptext('Arrow') then
Begin
mouse(x,y,5,5,true);
end else
WriteIn('No DTM found');
end;
end;
Begin
SetupSRL: // MAIN LOOP
ActivateClient;
LoadDTM; // Call the loading first
FindItem;
FreeDTM(ArrowDTM)