akash22
2012-05-26 17:57:04
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('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZigN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA');
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('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZigN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA');
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)