BEWARE: DO NOT USE TILL THIS PROCEDURE IS FIXED
Code:
Procedure findore;
Begin
wait(2000)
if (FindColorSpiralTolerance(x, y, coppercolor, MSX1, MSY1, MSX2, MSY2,1)) or
(FindColorTolerance(x, y, tincolor, MSX1, MSY1, MSX2, MSY2,1)) or
(FindColorTolerance(x, y, ironcolor, MSX1, MSY1, MSX2, MSY2,1)) or
(FindColorTolerance(x, y, goldcolor, MSX1, MSY1, MSX2, MSY2,1)) or
(FindColorTolerance(x, y, coalcolor, MSX1, MSY1, MSX2, MSY2,1)) Then
Movemousesmooth(x,y)
wait(1000)
Clickmouse(x,y,false)
wait(1000)
ChooseOption(x,y, 'ine');
If invfull then
End;