HotKeySet("{F10}","TogglePause")
HotKeySet("{ESC}","Quit")
HotKeySet("{1}","ToolBuild")
HotKeySet("{2}","GoldBuild")
HotKeySet("{0}","Start")
HotKeySet("{4}","Load")
HotKeySet("{3}","Save")

Local $Paused

Local $varLoop = 0
Local $iCordsT1 = -123 ; Tool Cord X
Local $iCordsT2 = 155 ; Tool Cord Y
Local $iColorT1 = 0xEEE3E3 ; Tool Color
Local $iColorT2 = 0xEEEEEE
Local $iCordsT1G = -126 ; Tool Cord X GOLD
Local $iCordsT2G = 155 ; Tool Cord Y GOLD
Local $iColorT1G = 0xD7D7D7 ; Tool Color GOLD
Local $iColorT2G = 0xEEEEEE
Local $iCordsG1 = -502 ; Gold Cord X
Local $iCordsG2 = 110 ; Gold Cord Y
Local $iColorG1 = 0xFFE85B ; Gold Color
Local $iColorG2 = 0xEEEEEE
Local $iCordsG1G = -505 ; Gold Cord X GOLD
Local $iCordsG2G = 108 ; Gold Cord Y GOLD
Local $iColorG1G = 0xFFEA60 ; Gold Color GOLD
Local $iColorG2G = 0xEEEEEE
Local $iCordsP1 = -857
Local $iCordsP2 = 291

Local $iToolX1 = 0
Local $iToolY1 = 0
Local $iToolX2 = 0
Local $iToolY2 = 0
Local $iToolX3 = 0
Local $iToolY3 = 0
Local $iToolX4 = 0
Local $iToolY4 = 0
Local $iToolX5 = 0
Local $iToolY5 = 0
Local $iToolX6 = 0
Local $iToolY6 = 0
Local $iToolX7 = 0
Local $iToolY7 = 0
Local $iToolX8 = 0
Local $iToolY8 = 0
Local $iToolX9 = 0
Local $iToolY9 = 0
Local $iToolX10 = 0
Local $iToolY10 = 0

Local $iGoldX1 = 0
Local $iGoldY1 = 0
Local $iGoldX2 = 0
Local $iGoldY2 = 0
Local $iGoldX3 = 0
Local $iGoldY3 = 0
Local $iGoldX4 = 0
Local $iGoldY4 = 0
Local $iGoldX5 = 0
Local $iGoldY5 = 0
Local $iGoldX6 = 0
Local $iGoldY6 = 0
Local $iGoldX7 = 0
Local $iGoldY7 = 0
Local $iGoldX8 = 0
Local $iGoldY8 = 0
Local $iGoldX9 = 0
Local $iGoldY9 = 0
Local $iGoldX10 = 0
Local $iGoldY10 = 0
Local $iGoldX11 = 0
Local $iGoldY11 = 0
Local $iGoldX12 = 0
Local $iGoldY12 = 0
Local $iGoldX13 = 0
Local $iGoldY13 = 0
Local $iGoldX14 = 0
Local $iGoldY14 = 0
Local $iGoldX15 = 0
Local $iGoldY15 = 0
Local $iGoldX16 = 0
Local $iGoldY16 = 0
Local $iGoldX17 = 0
Local $iGoldY17 = 0
Local $iGoldX18 = 0
Local $iGoldY18 = 0
Local $iGoldX19 = 0
Local $iGoldY19 = 0
Local $iGoldX20 = 0
Local $iGoldY20 = 0
Local $iGoldX21 = 0
Local $iGoldY21 = 0
Local $iGoldX22 = 0
Local $iGoldY22 = 0
Local $iGoldX23 = 0
Local $iGoldY23 = 0
Local $iGoldX24 = 0
Local $iGoldY24 = 0
Local $iGoldX25 = 0
Local $iGoldY25 = 0
Local $iGoldX26 = 0
Local $iGoldY26 = 0
Local $iGoldX27 = 0
Local $iGoldY27 = 0
Local $iGoldX28 = 0
Local $iGoldY28 = 0
Local $iGoldX29 = 0
Local $iGoldY29 = 0
Local $iGoldX30 = 0
Local $iGoldY30 = 0

Local $iColorSchatz = 0

Local $iStart = 0
Local $aCordsA = 0

Func Quit()
   Exit
EndFunc

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused

   WEnd
EndFunc

Func ToolBuild()
   If $iToolX1 = 0 And $iToolY1 = 0 Then
	  $iToolX1 = MouseGetPos(0)
	  $iToolY1 = MouseGetPos(1)
   ElseIf $iToolX2 = 0 And $iToolY2 = 0 Then
	  $iToolX2 = MouseGetPos(0)
	  $iToolY2 = MouseGetPos(1)
   ElseIf $iToolX3 = 0 And $iToolY3 = 0 Then
	  $iToolX3 = MouseGetPos(0)
	  $iToolY3 = MouseGetPos(1)
   ElseIf $iToolX4 = 0 And $iToolY4 = 0 Then
	  $iToolX4 = MouseGetPos(0)
	  $iToolY4 = MouseGetPos(1)
   ElseIf $iToolX5 = 0 And $iToolY5 = 0 Then
	  $iToolX5 = MouseGetPos(0)
	  $iToolY5 = MouseGetPos(1)
   ElseIf $iToolX6 = 0 And $iToolY6 = 0 Then
	  $iToolX6 = MouseGetPos(0)
	  $iToolY6 = MouseGetPos(1)
   ElseIf $iToolX7 = 0 And $iToolY7 = 0 Then
	  $iToolX7 = MouseGetPos(0)
	  $iToolY7 = MouseGetPos(1)
   ElseIf $iToolX8 = 0 And $iToolY8 = 0 Then
	  $iToolX8 = MouseGetPos(0)
	  $iToolY8 = MouseGetPos(1)
   ElseIf $iToolX9 = 0 And $iToolY9 = 0 Then
	  $iToolX9 = MouseGetPos(0)
	  $iToolY9 = MouseGetPos(1)
   ElseIf $iToolX10 = 0 And $iToolY10 = 0 Then
	  $iToolX10 = MouseGetPos(0)
	  $iToolY10 = MouseGetPos(1)
   EndIf
EndFunc

Func GoldBuild()
   If $iGoldX1 = 0 And $iGoldY1 = 0 Then
	  $iGoldX1 = MouseGetPos(0)
	  $iGoldY1 = MouseGetPos(1)
   ElseIf $iGoldX2 = 0 And $iGoldY2 = 0 Then
	  $iGoldX2 = MouseGetPos(0)
	  $iGoldY2 = MouseGetPos(1)
   ElseIf $iGoldX3 = 0 And $iGoldY3 = 0 Then
	  $iGoldX3 = MouseGetPos(0)
	  $iGoldY3 = MouseGetPos(1)
   ElseIf $iGoldX4 = 0 And $iGoldY4 = 0 Then
	  $iGoldX4 = MouseGetPos(0)
	  $iGoldY4 = MouseGetPos(1)
   ElseIf $iGoldX5 = 0 And $iGoldY5 = 0 Then
	  $iGoldX5 = MouseGetPos(0)
	  $iGoldY5 = MouseGetPos(1)
   ElseIf $iGoldX6 = 0 And $iGoldY6 = 0 Then
	  $iGoldX6 = MouseGetPos(0)
	  $iGoldY6 = MouseGetPos(1)
   ElseIf $iGoldX7 = 0 And $iGoldY7 = 0 Then
	  $iGoldX7 = MouseGetPos(0)
	  $iGoldY7 = MouseGetPos(1)
   ElseIf $iGoldX8 = 0 And $iGoldY8 = 0 Then
	  $iGoldX8 = MouseGetPos(0)
	  $iGoldY8 = MouseGetPos(1)
   ElseIf $iGoldX9 = 0 And $iGoldY9 = 0 Then
	  $iGoldX9 = MouseGetPos(0)
	  $iGoldY9 = MouseGetPos(1)
   ElseIf $iGoldX10 = 0 And $iGoldY10 = 0 Then
	  $iGoldX10 = MouseGetPos(0)
	  $iGoldY10 = MouseGetPos(1)
   ElseIf $iGoldX11 = 0 And $iGoldY11 = 0 Then
	  $iGoldX11 = MouseGetPos(0)
	  $iGoldY11 = MouseGetPos(1)
   ElseIf $iGoldX12 = 0 And $iGoldY12 = 0 Then
	  $iGoldX12 = MouseGetPos(0)
	  $iGoldY12 = MouseGetPos(1)
   ElseIf $iGoldX13 = 0 And $iGoldY13 = 0 Then
	  $iGoldX13 = MouseGetPos(0)
	  $iGoldY13 = MouseGetPos(1)
   ElseIf $iGoldX14 = 0 And $iGoldY14 = 0 Then
	  $iGoldX14 = MouseGetPos(0)
	  $iGoldY14 = MouseGetPos(1)
   ElseIf $iGoldX15 = 0 And $iGoldY15 = 0 Then
	  $iGoldX15 = MouseGetPos(0)
	  $iGoldY15 = MouseGetPos(1)
   ElseIf $iGoldX16 = 0 And $iGoldY16 = 0 Then
	  $iGoldX16 = MouseGetPos(0)
	  $iGoldY16 = MouseGetPos(1)
   ElseIf $iGoldX17 = 0 And $iGoldY17 = 0 Then
	  $iGoldX17 = MouseGetPos(0)
	  $iGoldY17 = MouseGetPos(1)
   ElseIf $iGoldX18 = 0 And $iGoldY18 = 0 Then
	  $iGoldX18 = MouseGetPos(0)
	  $iGoldY18 = MouseGetPos(1)
   ElseIf $iGoldX19 = 0 And $iGoldY19 = 0 Then
	  $iGoldX19 = MouseGetPos(0)
	  $iGoldY19 = MouseGetPos(1)
   ElseIf $iGoldX20 = 0 And $iGoldY20 = 0 Then
	  $iGoldX20 = MouseGetPos(0)
	  $iGoldY20 = MouseGetPos(1)
   ElseIf $iGoldX21 = 0 And $iGoldY21 = 0 Then
	  $iGoldX21 = MouseGetPos(0)
	  $iGoldY21 = MouseGetPos(1)
   ElseIf $iGoldX22 = 0 And $iGoldY22 = 0 Then
	  $iGoldX22 = MouseGetPos(0)
	  $iGoldY22 = MouseGetPos(1)
   ElseIf $iGoldX23 = 0 And $iGoldY23 = 0 Then
	  $iGoldX23 = MouseGetPos(0)
	  $iGoldY23 = MouseGetPos(1)
   ElseIf $iGoldX24 = 0 And $iGoldY24 = 0 Then
	  $iGoldX24 = MouseGetPos(0)
	  $iGoldY24 = MouseGetPos(1)
   ElseIf $iGoldX25 = 0 And $iGoldY25 = 0 Then
	  $iGoldX25 = MouseGetPos(0)
	  $iGoldY25 = MouseGetPos(1)
   ElseIf $iGoldX26 = 0 And $iGoldY26 = 0 Then
	  $iGoldX26 = MouseGetPos(0)
	  $iGoldY26 = MouseGetPos(1)
   ElseIf $iGoldX27 = 0 And $iGoldY27 = 0 Then
	  $iGoldX27 = MouseGetPos(0)
	  $iGoldY27 = MouseGetPos(1)
   ElseIf $iGoldX28 = 0 And $iGoldY28 = 0 Then
	  $iGoldX28 = MouseGetPos(0)
	  $iGoldY28 = MouseGetPos(1)
   ElseIf $iGoldX29 = 0 And $iGoldY29 = 0 Then
	  $iGoldX29 = MouseGetPos(0)
	  $iGoldY29 = MouseGetPos(1)
   ElseIf $iGoldX30 = 0 And $iGoldY30 = 0 Then
	  $iGoldX30 = MouseGetPos(0)
	  $iGoldY30 = MouseGetPos(1)
   EndIf
EndFunc

Func Start()
   $aCordsA = MouseGetPos()
   $iStart = 1
EndFunc

Func Save()
   Iniwrite("FoE.ini", "ToolValues", "ToolX1", $iToolX1)
   Iniwrite("FoE.ini", "ToolValues", "ToolY1", $iToolY1)
   Iniwrite("FoE.ini", "ToolValues", "ToolX2", $iToolX2)
   Iniwrite("FoE.ini", "ToolValues", "ToolY2", $iToolY2)
   Iniwrite("FoE.ini", "ToolValues", "ToolX3", $iToolX3)
   Iniwrite("FoE.ini", "ToolValues", "ToolY3", $iToolY3)
   Iniwrite("FoE.ini", "ToolValues", "ToolX4", $iToolX4)
   Iniwrite("FoE.ini", "ToolValues", "ToolY4", $iToolY4)
   Iniwrite("FoE.ini", "ToolValues", "ToolX5", $iToolX5)
   Iniwrite("FoE.ini", "ToolValues", "ToolY5", $iToolY5)
   Iniwrite("FoE.ini", "ToolValues", "ToolX6", $iToolX6)
   Iniwrite("FoE.ini", "ToolValues", "ToolY6", $iToolY6)
   Iniwrite("FoE.ini", "ToolValues", "ToolX7", $iToolX7)
   Iniwrite("FoE.ini", "ToolValues", "ToolY7", $iToolY7)
   Iniwrite("FoE.ini", "ToolValues", "ToolX8", $iToolX8)
   Iniwrite("FoE.ini", "ToolValues", "ToolY8", $iToolY8)
   Iniwrite("FoE.ini", "ToolValues", "ToolX9", $iToolX9)
   Iniwrite("FoE.ini", "ToolValues", "ToolY9", $iToolY9)
   Iniwrite("FoE.ini", "ToolValues", "ToolX10", $iToolX10)
   Iniwrite("FoE.ini", "ToolValues", "ToolY10", $iToolY10)
   Iniwrite("FoE.ini", "GoldValues", "GoldX1", $iGoldX1)
   Iniwrite("FoE.ini", "GoldValues", "GoldY1", $iGoldY1)
   Iniwrite("FoE.ini", "GoldValues", "GoldX2", $iGoldX2)
   Iniwrite("FoE.ini", "GoldValues", "GoldY2", $iGoldY2)
   Iniwrite("FoE.ini", "GoldValues", "GoldX3", $iGoldX3)
   Iniwrite("FoE.ini", "GoldValues", "GoldY3", $iGoldY3)
   Iniwrite("FoE.ini", "GoldValues", "GoldX4", $iGoldX4)
   Iniwrite("FoE.ini", "GoldValues", "GoldY4", $iGoldY4)
   Iniwrite("FoE.ini", "GoldValues", "GoldX5", $iGoldX5)
   Iniwrite("FoE.ini", "GoldValues", "GoldY5", $iGoldY5)
   Iniwrite("FoE.ini", "GoldValues", "GoldX6", $iGoldX6)
   Iniwrite("FoE.ini", "GoldValues", "GoldY6", $iGoldY6)
   Iniwrite("FoE.ini", "GoldValues", "GoldX7", $iGoldX7)
   Iniwrite("FoE.ini", "GoldValues", "GoldY7", $iGoldY7)
   Iniwrite("FoE.ini", "GoldValues", "GoldX8", $iGoldX8)
   Iniwrite("FoE.ini", "GoldValues", "GoldY8", $iGoldY8)
   Iniwrite("FoE.ini", "GoldValues", "GoldX9", $iGoldX9)
   Iniwrite("FoE.ini", "GoldValues", "GoldY9", $iGoldY9)
   Iniwrite("FoE.ini", "GoldValues", "GoldX10", $iGoldX10)
   Iniwrite("FoE.ini", "GoldValues", "GoldY10", $iGoldY10)
   Iniwrite("FoE.ini", "GoldValues", "GoldX11", $iGoldX11)
   Iniwrite("FoE.ini", "GoldValues", "GoldY11", $iGoldY11)
   Iniwrite("FoE.ini", "GoldValues", "GoldX12", $iGoldX12)
   Iniwrite("FoE.ini", "GoldValues", "GoldY12", $iGoldY12)
   Iniwrite("FoE.ini", "GoldValues", "GoldX13", $iGoldX13)
   Iniwrite("FoE.ini", "GoldValues", "GoldY13", $iGoldY13)
   Iniwrite("FoE.ini", "GoldValues", "GoldX14", $iGoldX14)
   Iniwrite("FoE.ini", "GoldValues", "GoldY14", $iGoldY14)
   Iniwrite("FoE.ini", "GoldValues", "GoldX15", $iGoldX15)
   Iniwrite("FoE.ini", "GoldValues", "GoldY15", $iGoldY15)
   Iniwrite("FoE.ini", "GoldValues", "GoldX16", $iGoldX16)
   Iniwrite("FoE.ini", "GoldValues", "GoldY16", $iGoldY16)
   Iniwrite("FoE.ini", "GoldValues", "GoldX17", $iGoldX17)
   Iniwrite("FoE.ini", "GoldValues", "GoldY17", $iGoldY17)
   Iniwrite("FoE.ini", "GoldValues", "GoldX18", $iGoldX18)
   Iniwrite("FoE.ini", "GoldValues", "GoldY18", $iGoldY18)
   Iniwrite("FoE.ini", "GoldValues", "GoldX19", $iGoldX19)
   Iniwrite("FoE.ini", "GoldValues", "GoldY19", $iGoldY19)
   Iniwrite("FoE.ini", "GoldValues", "GoldX20", $iGoldX20)
   Iniwrite("FoE.ini", "GoldValues", "GoldY20", $iGoldY20)
   Iniwrite("FoE.ini", "GoldValues", "GoldX21", $iGoldX21)
   Iniwrite("FoE.ini", "GoldValues", "GoldY21", $iGoldY21)
   Iniwrite("FoE.ini", "GoldValues", "GoldX22", $iGoldX22)
   Iniwrite("FoE.ini", "GoldValues", "GoldY22", $iGoldY22)
   Iniwrite("FoE.ini", "GoldValues", "GoldX23", $iGoldX23)
   Iniwrite("FoE.ini", "GoldValues", "GoldY23", $iGoldY23)
   Iniwrite("FoE.ini", "GoldValues", "GoldX24", $iGoldX24)
   Iniwrite("FoE.ini", "GoldValues", "GoldY24", $iGoldY24)
   Iniwrite("FoE.ini", "GoldValues", "GoldX25", $iGoldX25)
   Iniwrite("FoE.ini", "GoldValues", "GoldY25", $iGoldY25)
   Iniwrite("FoE.ini", "GoldValues", "GoldX26", $iGoldX26)
   Iniwrite("FoE.ini", "GoldValues", "GoldY26", $iGoldY26)
   Iniwrite("FoE.ini", "GoldValues", "GoldX27", $iGoldX27)
   Iniwrite("FoE.ini", "GoldValues", "GoldY27", $iGoldY27)
   Iniwrite("FoE.ini", "GoldValues", "GoldX28", $iGoldX28)
   Iniwrite("FoE.ini", "GoldValues", "GoldY28", $iGoldY28)
   Iniwrite("FoE.ini", "GoldValues", "GoldX29", $iGoldX29)
   Iniwrite("FoE.ini", "GoldValues", "GoldY29", $iGoldY29)
   Iniwrite("FoE.ini", "GoldValues", "GoldX30", $iGoldX30)
   Iniwrite("FoE.ini", "GoldValues", "GoldY30", $iGoldY30)
EndFunc

Func Load()
   Local $iToolX1 = IniRead("FoE.ini", "ToolValues", "ToolX1", "0")
   Local $iToolY1 = IniRead("FoE.ini", "ToolValues", "ToolY1", "0")
   Local $iToolX2 = IniRead("FoE.ini", "ToolValues", "ToolX2", "0")
   Local $iToolY2 = IniRead("FoE.ini", "ToolValues", "ToolY2", "0")
   Local $iToolX3 = IniRead("FoE.ini", "ToolValues", "ToolX3", "0")
   Local $iToolY3 = IniRead("FoE.ini", "ToolValues", "ToolY3", "0")
   Local $iToolX4 = IniRead("FoE.ini", "ToolValues", "ToolX4", "0")
   Local $iToolY4 = IniRead("FoE.ini", "ToolValues", "ToolY4", "0")
   Local $iToolX5 = IniRead("FoE.ini", "ToolValues", "ToolX5", "0")
   Local $iToolY5 = IniRead("FoE.ini", "ToolValues", "ToolY5", "0")
   Local $iToolX6 = IniRead("FoE.ini", "ToolValues", "ToolX6", "0")
   Local $iToolY6 = IniRead("FoE.ini", "ToolValues", "ToolY6", "0")
   Local $iToolX7 = IniRead("FoE.ini", "ToolValues", "ToolX7", "0")
   Local $iToolY7 = IniRead("FoE.ini", "ToolValues", "ToolY7", "0")
   Local $iToolX8 = IniRead("FoE.ini", "ToolValues", "ToolX8", "0")
   Local $iToolY8 = IniRead("FoE.ini", "ToolValues", "ToolY8", "0")
   Local $iToolX9 = IniRead("FoE.ini", "ToolValues", "ToolX9", "0")
   Local $iToolY9 = IniRead("FoE.ini", "ToolValues", "ToolY9", "0")
   Local $iToolX10 = IniRead("FoE.ini", "ToolValues", "ToolX10", "0")
   Local $iToolY10 = IniRead("FoE.ini", "ToolValues", "ToolY10", "0")
   Local $aGoldX1 = IniRead("FoE.ini", "GoldValues", "GoldX1", "0")
   Local $aGoldY1 = IniRead("FoE.ini", "GoldValues", "GoldY1", "0")
   Local $aGoldX2 = IniRead("FoE.ini", "GoldValues", "GoldX2", "0")
   Local $aGoldY2 = IniRead("FoE.ini", "GoldValues", "GoldY2", "0")
   Local $aGoldX3 = IniRead("FoE.ini", "GoldValues", "GoldX3", "0")
   Local $aGoldY3 = IniRead("FoE.ini", "GoldValues", "GoldY3", "0")
   Local $aGoldX4 = IniRead("FoE.ini", "GoldValues", "GoldX4", "0")
   Local $aGoldY4 = IniRead("FoE.ini", "GoldValues", "GoldY4", "0")
   Local $aGoldX5 = IniRead("FoE.ini", "GoldValues", "GoldX5", "0")
   Local $aGoldY5 = IniRead("FoE.ini", "GoldValues", "GoldY5", "0")
   Local $aGoldX6 = IniRead("FoE.ini", "GoldValues", "GoldX6", "0")
   Local $aGoldY6 = IniRead("FoE.ini", "GoldValues", "GoldY6", "0")
   Local $aGoldX7 = IniRead("FoE.ini", "GoldValues", "GoldX7", "0")
   Local $aGoldY7 = IniRead("FoE.ini", "GoldValues", "GoldY7", "0")
   Local $aGoldX8 = IniRead("FoE.ini", "GoldValues", "GoldX8", "0")
   Local $aGoldY8 = IniRead("FoE.ini", "GoldValues", "GoldY8", "0")
   Local $aGoldX9 = IniRead("FoE.ini", "GoldValues", "GoldX9", "0")
   Local $aGoldY9 = IniRead("FoE.ini", "GoldValues", "GoldY9", "0")
   Local $aGoldX10 = IniRead("FoE.ini", "GoldValues", "GoldX10", "0")
   Local $aGoldY10 = IniRead("FoE.ini", "GoldValues", "GoldY10", "0")
   Local $aGoldX11 = IniRead("FoE.ini", "GoldValues", "GoldX11", "0")
   Local $aGoldY11 = IniRead("FoE.ini", "GoldValues", "GoldY11", "0")
   Local $aGoldX12 = IniRead("FoE.ini", "GoldValues", "GoldX12", "0")
   Local $aGoldY12 = IniRead("FoE.ini", "GoldValues", "GoldY12", "0")
   Local $aGoldX13 = IniRead("FoE.ini", "GoldValues", "GoldX13", "0")
   Local $aGoldY13 = IniRead("FoE.ini", "GoldValues", "GoldY13", "0")
   Local $aGoldX14 = IniRead("FoE.ini", "GoldValues", "GoldX14", "0")
   Local $aGoldY14 = IniRead("FoE.ini", "GoldValues", "GoldY14", "0")
   Local $aGoldX15 = IniRead("FoE.ini", "GoldValues", "GoldX15", "0")
   Local $aGoldY15 = IniRead("FoE.ini", "GoldValues", "GoldY15", "0")
   Local $aGoldX16 = IniRead("FoE.ini", "GoldValues", "GoldX16", "0")
   Local $aGoldY16 = IniRead("FoE.ini", "GoldValues", "GoldY16", "0")
   Local $aGoldX17 = IniRead("FoE.ini", "GoldValues", "GoldX17", "0")
   Local $aGoldY17 = IniRead("FoE.ini", "GoldValues", "GoldY17", "0")
   Local $aGoldX18 = IniRead("FoE.ini", "GoldValues", "GoldX18", "0")
   Local $aGoldY18 = IniRead("FoE.ini", "GoldValues", "GoldY18", "0")
   Local $aGoldX19 = IniRead("FoE.ini", "GoldValues", "GoldX19", "0")
   Local $aGoldY19 = IniRead("FoE.ini", "GoldValues", "GoldY19", "0")
   Local $aGoldX20 = IniRead("FoE.ini", "GoldValues", "GoldX20", "0")
   Local $aGoldY20 = IniRead("FoE.ini", "GoldValues", "GoldY20", "0")
   Local $aGoldX21 = IniRead("FoE.ini", "GoldValues", "GoldX21", "0")
   Local $aGoldY21 = IniRead("FoE.ini", "GoldValues", "GoldY21", "0")
   Local $aGoldX22 = IniRead("FoE.ini", "GoldValues", "GoldX22", "0")
   Local $aGoldY22 = IniRead("FoE.ini", "GoldValues", "GoldY22", "0")
   Local $aGoldX23 = IniRead("FoE.ini", "GoldValues", "GoldX23", "0")
   Local $aGoldY23 = IniRead("FoE.ini", "GoldValues", "GoldY23", "0")
   Local $aGoldX24 = IniRead("FoE.ini", "GoldValues", "GoldX24", "0")
   Local $aGoldY24 = IniRead("FoE.ini", "GoldValues", "GoldY24", "0")
   Local $aGoldX25 = IniRead("FoE.ini", "GoldValues", "GoldX25", "0")
   Local $aGoldY25 = IniRead("FoE.ini", "GoldValues", "GoldY25", "0")
   Local $aGoldX26 = IniRead("FoE.ini", "GoldValues", "GoldX26", "0")
   Local $aGoldY26 = IniRead("FoE.ini", "GoldValues", "GoldY26", "0")
   Local $aGoldX27 = IniRead("FoE.ini", "GoldValues", "GoldX27", "0")
   Local $aGoldY27 = IniRead("FoE.ini", "GoldValues", "GoldY27", "0")
   Local $aGoldX28 = IniRead("FoE.ini", "GoldValues", "GoldX28", "0")
   Local $aGoldY28 = IniRead("FoE.ini", "GoldValues", "GoldY28", "0")
   Local $aGoldX29 = IniRead("FoE.ini", "GoldValues", "GoldX29", "0")
   Local $aGoldY29 = IniRead("FoE.ini", "GoldValues", "GoldY29", "0")
   Local $aGoldX30 = IniRead("FoE.ini", "GoldValues", "GoldX30", "0")
   Local $aGoldY30 = IniRead("FoE.ini", "GoldValues", "GoldY30", "0")
EndFunc

Do

   If $iStart = 1 Then
	  Local $iColorT2 = PixelGetColor( $iCordsT1, $iCordsT2)
	  Local $iColorT2G = PixelGetColor( $iCordsT1G, $iCordsT2G)
   EndIf

   If $iStart = 1 Then
	  Local $iColorG2 = PixelGetColor( $iCordsG1, $iCordsG2)
	  Local $iColorG2G = PixelGetColor( $iCordsG1G, $iCordsG2G)
   EndIf

   If $iStart = 1 Then
	  Local $iColorSchatz = PixelGetColor( -1225, 52)
   EndIf

   If $iColorSchatz = 0x517A29 And $iStart = 1 Then
	  MouseClick( "left", $aCordsA[0], $aCordsA[1])
	  Sleep(1000)
	  MouseClick( "left", -1250, 55)
	  Sleep(2000)
	  MouseClick( "left", -485, 648) ; 1
	  Sleep(200)
	  MouseClick( "left", -284, 678) ; 2
	  Sleep(200)
	  MouseClick( "left", -385, 603) ; 3
	  Sleep(200)
	  MouseClick( "left", -289, 534) ; 4
	  Sleep(200)
	  MouseClick( "left", -421, 494) ; 5
	  Sleep(200)
	  MouseClick( "left", -518, 525) ; 6
	  Sleep(1000)
	  MouseClick( "left", -654, 405)
	  Sleep(1000)
	  MouseClick( "left", -217, 380)
	  Sleep(200)
	  MouseMove( $aCordsA[0], $aCordsA[1])
   EndIf

   If $iColorT1 = $iColorT2 And $iStart = 1 Then
	  MouseClick( "left", $aCordsA[0], $aCordsA[1])
	  Sleep(3000)
	  $iColorT2 = 0
	  If $iToolX1 <> 0 And $iToolY1 <> 0 Then
		 MouseClick( "left", $iToolX1, $iToolY1)
		 Sleep(200)
	  EndIf
	  If $iToolX2 <> 0 And $iToolY2 <> 0 Then
		 MouseClick( "left", $iToolX2, $iToolY2)
		 Sleep(200)
	  EndIf
	  If $iToolX3 <> 0 And $iToolY3 <> 0 Then
		 MouseClick( "left", $iToolX3, $iToolY3)
		 Sleep(200)
	  EndIf
	  If $iToolX4 <> 0 And $iToolY4 <> 0 Then
		 MouseClick( "left", $iToolX4, $iToolY4)
		 Sleep(200)
	  EndIf
	  If $iToolX5 <> 0 And $iToolY5 <> 0 Then
		 MouseClick( "left", $iToolX5, $iToolY5)
		 Sleep(200)
	  EndIf
	  If $iToolX6 <> 0 And $iToolY6 <> 0 Then
		 MouseClick( "left", $iToolX6, $iToolY6)
		 Sleep(200)
	  EndIf
	  If $iToolX7 <> 0 And $iToolY7 <> 0 Then
		 MouseClick( "left", $iToolX7, $iToolY7)
		 Sleep(200)
	  EndIf
	  If $iToolX8 <> 0 And $iToolY8 <> 0 Then
		 MouseClick( "left", $iToolX8, $iToolY8)
		 Sleep(200)
	  EndIf
	  If $iToolX9 <> 0 And $iToolY9 <> 0 Then
		 MouseClick( "left", $iToolX9, $iToolY9)
		 Sleep(200)
	  EndIf
	  If $iToolX10 <> 0 And $iToolY10 <> 0 Then
		 MouseClick( "left", $iToolX10, $iToolY10)
		 Sleep(200)
	  EndIf
	  Sleep(3000)
	  If $iToolX1 <> 0 And $iToolY1 <> 0 Then
		 MouseClick( "left", $iToolX1, $iToolY1)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX2 <> 0 And $iToolY2 <> 0 Then
		 MouseClick( "left", $iToolX2, $iToolY2)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX3 <> 0 And $iToolY3 <> 0 Then
		 MouseClick( "left", $iToolX3, $iToolY3)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX4 <> 0 And $iToolY4 <> 0 Then
		 MouseClick( "left", $iToolX4, $iToolY4)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX5 <> 0 And $iToolY5 <> 0 Then
		 MouseClick( "left", $iToolX5, $iToolY5)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX6 <> 0 And $iToolY6 <> 0 Then
		 MouseClick( "left", $iToolX6, $iToolY6)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX7 <> 0 And $iToolY7 <> 0 Then
		 MouseClick( "left", $iToolX7, $iToolY7)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX8 <> 0 And $iToolY8 <> 0 Then
		 MouseClick( "left", $iToolX8, $iToolY8)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX9 <> 0 And $iToolY9 <> 0 Then
		 MouseClick( "left", $iToolX9, $iToolY9)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX10 <> 0 And $iToolY10 <> 0 Then
		 MouseClick( "left", $iToolX10, $iToolY10)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  MouseMove( $aCordsA[0], $aCordsA[1])
   EndIf

   If $iColorG1 = $iColorG2 And $iStart = 1 Then
	  MouseClick( "left", $aCordsA[0], $aCordsA[1])
	  Sleep(3000)
	  $iColorG2 = 0
	  If $iGoldX1 <> 0 And $iGoldY1 <> 0 Then
		 MouseClick( "left", $iGoldX1, $iGoldY1)
		 Sleep(200)
	  EndIf
	  If $iGoldX2 <> 0 And $iGoldY2 <> 0 Then
		 MouseClick( "left", $iGoldX2, $iGoldY2)
		 Sleep(200)
	  EndIf
	  If $iGoldX3 <> 0 And $iGoldY3 <> 0 Then
		 MouseClick( "left", $iGoldX3, $iGoldY3)
		 Sleep(200)
	  EndIf
	  If $iGoldX4 <> 0 And $iGoldY4 <> 0 Then
		 MouseClick( "left", $iGoldX4, $iGoldY4)
		 Sleep(200)
	  EndIf
	  If $iGoldX5 <> 0 And $iGoldY5 <> 0 Then
		 MouseClick( "left", $iGoldX5, $iGoldY5)
		 Sleep(200)
	  EndIf
	  If $iGoldX6 <> 0 And $iGoldY6 <> 0 Then
		 MouseClick( "left", $iGoldX6, $iGoldY6)
		 Sleep(200)
	  EndIf
	  If $iGoldX7 <> 0 And $iGoldY7 <> 0 Then
		 MouseClick( "left", $iGoldX7, $iGoldY7)
		 Sleep(200)
	  EndIf
	  If $iGoldX8 <> 0 And $iGoldY8 <> 0 Then
		 MouseClick( "left", $iGoldX8, $iGoldY8)
		 Sleep(200)
	  EndIf
	  If $iGoldX9 <> 0 And $iGoldY9 <> 0 Then
		 MouseClick( "left", $iGoldX9, $iGoldY9)
		 Sleep(200)
	  EndIf
	  If $iGoldX10 <> 0 And $iGoldY10 <> 0 Then
		 MouseClick( "left", $iGoldX10, $iGoldY10)
		 Sleep(200)
	  EndIf
	  If $iGoldX11 <> 0 And $iGoldY11 <> 0 Then
		 MouseClick( "left", $iGoldX11, $iGoldY11)
		 Sleep(200)
	  EndIf
	  If $iGoldX12 <> 0 And $iGoldY12 <> 0 Then
		 MouseClick( "left", $iGoldX12, $iGoldY12)
		 Sleep(200)
	  EndIf
	  If $iGoldX13 <> 0 And $iGoldY13 <> 0 Then
		 MouseClick( "left", $iGoldX13, $iGoldY13)
		 Sleep(200)
	  EndIf
	  If $iGoldX14 <> 0 And $iGoldY14 <> 0 Then
		 MouseClick( "left", $iGoldX14, $iGoldY14)
		 Sleep(200)
	  EndIf
	  If $iGoldX15 <> 0 And $iGoldY15 <> 0 Then
		 MouseClick( "left", $iGoldX15, $iGoldY15)
		 Sleep(200)
	  EndIf
	  If $iGoldX16 <> 0 And $iGoldY16 <> 0 Then
		 MouseClick( "left", $iGoldX16, $iGoldY16)
		 Sleep(200)
	  EndIf
	  If $iGoldX17 <> 0 And $iGoldY17 <> 0 Then
		 MouseClick( "left", $iGoldX17, $iGoldY17)
		 Sleep(200)
	  EndIf
	  If $iGoldX18 <> 0 And $iGoldY18 <> 0 Then
		 MouseClick( "left", $iGoldX18, $iGoldY18)
		 Sleep(200)
	  EndIf
	  If $iGoldX19 <> 0 And $iGoldY19 <> 0 Then
		 MouseClick( "left", $iGoldX19, $iGoldY19)
		 Sleep(200)
	  EndIf
	  If $iGoldX20 <> 0 And $iGoldY20 <> 0 Then
		 MouseClick( "left", $iGoldX20, $iGoldY20)
		 Sleep(200)
	  EndIf
	  If $iGoldX21 <> 0 And $iGoldY21 <> 0 Then
		 MouseClick( "left", $iGoldX21, $iGoldY21)
		 Sleep(200)
	  EndIf
	  If $iGoldX22 <> 0 And $iGoldY22 <> 0 Then
		 MouseClick( "left", $iGoldX22, $iGoldY22)
		 Sleep(200)
	  EndIf
	  If $iGoldX23 <> 0 And $iGoldY23 <> 0 Then
		 MouseClick( "left", $iGoldX23, $iGoldY23)
		 Sleep(200)
	  EndIf
	  If $iGoldX24 <> 0 And $iGoldY24 <> 0 Then
		 MouseClick( "left", $iGoldX24, $iGoldY24)
		 Sleep(200)
	  EndIf
	  If $iGoldX25 <> 0 And $iGoldY25 <> 0 Then
		 MouseClick( "left", $iGoldX25, $iGoldY25)
		 Sleep(200)
	  EndIf
	  If $iGoldX26 <> 0 And $iGoldY26 <> 0 Then
		 MouseClick( "left", $iGoldX26, $iGoldY26)
		 Sleep(200)
	  EndIf
	  If $iGoldX27 <> 0 And $iGoldY27 <> 0 Then
		 MouseClick( "left", $iGoldX27, $iGoldY27)
		 Sleep(200)
	  EndIf
	  If $iGoldX28 <> 0 And $iGoldY28 <> 0 Then
		 MouseClick( "left", $iGoldX28, $iGoldY28)
		 Sleep(200)
	  EndIf
	  If $iGoldX29 <> 0 And $iGoldY29 <> 0 Then
		 MouseClick( "left", $iGoldX29, $iGoldY29)
		 Sleep(200)
	  EndIf
	  If $iGoldX30 <> 0 And $iGoldY30 <> 0 Then
		 MouseClick( "left", $iGoldX30, $iGoldY30)
		 Sleep(200)
	  EndIf
	  MouseMove( $aCordsA[0], $aCordsA[1])
   EndIf

   If $iColorT1G = $iColorT2G And $iStart = 1 Then
	  MouseClick( "left", $aCordsA[0], $aCordsA[1])
	  Sleep(3000)
	  $iColorT2 = 0
	  If $iToolX1 <> 0 And $iToolY1 <> 0 Then
		 MouseClick( "left", $iToolX1, $iToolY1)
		 Sleep(200)
	  EndIf
	  If $iToolX2 <> 0 And $iToolY2 <> 0 Then
		 MouseClick( "left", $iToolX2, $iToolY2)
		 Sleep(200)
	  EndIf
	  If $iToolX3 <> 0 And $iToolY3 <> 0 Then
		 MouseClick( "left", $iToolX3, $iToolY3)
		 Sleep(200)
	  EndIf
	  If $iToolX4 <> 0 And $iToolY4 <> 0 Then
		 MouseClick( "left", $iToolX4, $iToolY4)
		 Sleep(200)
	  EndIf
	  If $iToolX5 <> 0 And $iToolY5 <> 0 Then
		 MouseClick( "left", $iToolX5, $iToolY5)
		 Sleep(200)
	  EndIf
	  If $iToolX6 <> 0 And $iToolY6 <> 0 Then
		 MouseClick( "left", $iToolX6, $iToolY6)
		 Sleep(200)
	  EndIf
	  If $iToolX7 <> 0 And $iToolY7 <> 0 Then
		 MouseClick( "left", $iToolX7, $iToolY7)
		 Sleep(200)
	  EndIf
	  If $iToolX8 <> 0 And $iToolY8 <> 0 Then
		 MouseClick( "left", $iToolX8, $iToolY8)
		 Sleep(200)
	  EndIf
	  If $iToolX9 <> 0 And $iToolY9 <> 0 Then
		 MouseClick( "left", $iToolX9, $iToolY9)
		 Sleep(200)
	  EndIf
	  If $iToolX10 <> 0 And $iToolY10 <> 0 Then
		 MouseClick( "left", $iToolX10, $iToolY10)
		 Sleep(200)
	  EndIf
	  Sleep(3000)
	  If $iToolX1 <> 0 And $iToolY1 <> 0 Then
		 MouseClick( "left", $iToolX1, $iToolY1)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX2 <> 0 And $iToolY2 <> 0 Then
		 MouseClick( "left", $iToolX2, $iToolY2)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX3 <> 0 And $iToolY3 <> 0 Then
		 MouseClick( "left", $iToolX3, $iToolY3)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX4 <> 0 And $iToolY4 <> 0 Then
		 MouseClick( "left", $iToolX4, $iToolY4)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX5 <> 0 And $iToolY5 <> 0 Then
		 MouseClick( "left", $iToolX5, $iToolY5)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX6 <> 0 And $iToolY6 <> 0 Then
		 MouseClick( "left", $iToolX6, $iToolY6)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX7 <> 0 And $iToolY7 <> 0 Then
		 MouseClick( "left", $iToolX7, $iToolY7)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX8 <> 0 And $iToolY8 <> 0 Then
		 MouseClick( "left", $iToolX8, $iToolY8)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX9 <> 0 And $iToolY9 <> 0 Then
		 MouseClick( "left", $iToolX9, $iToolY9)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  If $iToolX10 <> 0 And $iToolY10 <> 0 Then
		 MouseClick( "left", $iToolX10, $iToolY10)
		 Sleep(200)
		 MouseClick( "left", $iCordsP1, $iCordsP2)
		 Sleep(400)
	  EndIf
	  MouseMove( $aCordsA[0], $aCordsA[1])
   EndIf

   If $iColorG1G = $iColorG2G And $iStart = 1 Then
	  MouseClick( "left", $aCordsA[0], $aCordsA[1])
	  Sleep(3000)
	  $iColorG2 = 0
	  If $iGoldX1 <> 0 And $iGoldY1 <> 0 Then
		 MouseClick( "left", $iGoldX1, $iGoldY1)
		 Sleep(200)
	  EndIf
	  If $iGoldX2 <> 0 And $iGoldY2 <> 0 Then
		 MouseClick( "left", $iGoldX2, $iGoldY2)
		 Sleep(200)
	  EndIf
	  If $iGoldX3 <> 0 And $iGoldY3 <> 0 Then
		 MouseClick( "left", $iGoldX3, $iGoldY3)
		 Sleep(200)
	  EndIf
	  If $iGoldX4 <> 0 And $iGoldY4 <> 0 Then
		 MouseClick( "left", $iGoldX4, $iGoldY4)
		 Sleep(200)
	  EndIf
	  If $iGoldX5 <> 0 And $iGoldY5 <> 0 Then
		 MouseClick( "left", $iGoldX5, $iGoldY5)
		 Sleep(200)
	  EndIf
	  If $iGoldX6 <> 0 And $iGoldY6 <> 0 Then
		 MouseClick( "left", $iGoldX6, $iGoldY6)
		 Sleep(200)
	  EndIf
	  If $iGoldX7 <> 0 And $iGoldY7 <> 0 Then
		 MouseClick( "left", $iGoldX7, $iGoldY7)
		 Sleep(200)
	  EndIf
	  If $iGoldX8 <> 0 And $iGoldY8 <> 0 Then
		 MouseClick( "left", $iGoldX8, $iGoldY8)
		 Sleep(200)
	  EndIf
	  If $iGoldX9 <> 0 And $iGoldY9 <> 0 Then
		 MouseClick( "left", $iGoldX9, $iGoldY9)
		 Sleep(200)
	  EndIf
	  If $iGoldX10 <> 0 And $iGoldY10 <> 0 Then
		 MouseClick( "left", $iGoldX10, $iGoldY10)
		 Sleep(200)
	  EndIf
	  If $iGoldX11 <> 0 And $iGoldY11 <> 0 Then
		 MouseClick( "left", $iGoldX11, $iGoldY11)
		 Sleep(200)
	  EndIf
	  If $iGoldX12 <> 0 And $iGoldY12 <> 0 Then
		 MouseClick( "left", $iGoldX12, $iGoldY12)
		 Sleep(200)
	  EndIf
	  If $iGoldX13 <> 0 And $iGoldY13 <> 0 Then
		 MouseClick( "left", $iGoldX13, $iGoldY13)
		 Sleep(200)
	  EndIf
	  If $iGoldX14 <> 0 And $iGoldY14 <> 0 Then
		 MouseClick( "left", $iGoldX14, $iGoldY14)
		 Sleep(200)
	  EndIf
	  If $iGoldX15 <> 0 And $iGoldY15 <> 0 Then
		 MouseClick( "left", $iGoldX15, $iGoldY15)
		 Sleep(200)
	  EndIf
	  If $iGoldX16 <> 0 And $iGoldY16 <> 0 Then
		 MouseClick( "left", $iGoldX16, $iGoldY16)
		 Sleep(200)
	  EndIf
	  If $iGoldX17 <> 0 And $iGoldY17 <> 0 Then
		 MouseClick( "left", $iGoldX17, $iGoldY17)
		 Sleep(200)
	  EndIf
	  If $iGoldX18 <> 0 And $iGoldY18 <> 0 Then
		 MouseClick( "left", $iGoldX18, $iGoldY18)
		 Sleep(200)
	  EndIf
	  If $iGoldX19 <> 0 And $iGoldY19 <> 0 Then
		 MouseClick( "left", $iGoldX19, $iGoldY19)
		 Sleep(200)
	  EndIf
	  If $iGoldX20 <> 0 And $iGoldY20 <> 0 Then
		 MouseClick( "left", $iGoldX20, $iGoldY20)
		 Sleep(200)
	  EndIf
	  If $iGoldX21 <> 0 And $iGoldY21 <> 0 Then
		 MouseClick( "left", $iGoldX21, $iGoldY21)
		 Sleep(200)
	  EndIf
	  If $iGoldX22 <> 0 And $iGoldY22 <> 0 Then
		 MouseClick( "left", $iGoldX22, $iGoldY22)
		 Sleep(200)
	  EndIf
	  If $iGoldX23 <> 0 And $iGoldY23 <> 0 Then
		 MouseClick( "left", $iGoldX23, $iGoldY23)
		 Sleep(200)
	  EndIf
	  If $iGoldX24 <> 0 And $iGoldY24 <> 0 Then
		 MouseClick( "left", $iGoldX24, $iGoldY24)
		 Sleep(200)
	  EndIf
	  If $iGoldX25 <> 0 And $iGoldY25 <> 0 Then
		 MouseClick( "left", $iGoldX25, $iGoldY25)
		 Sleep(200)
	  EndIf
	  If $iGoldX26 <> 0 And $iGoldY26 <> 0 Then
		 MouseClick( "left", $iGoldX26, $iGoldY26)
		 Sleep(200)
	  EndIf
	  If $iGoldX27 <> 0 And $iGoldY27 <> 0 Then
		 MouseClick( "left", $iGoldX27, $iGoldY27)
		 Sleep(200)
	  EndIf
	  If $iGoldX28 <> 0 And $iGoldY28 <> 0 Then
		 MouseClick( "left", $iGoldX28, $iGoldY28)
		 Sleep(200)
	  EndIf
	  If $iGoldX29 <> 0 And $iGoldY29 <> 0 Then
		 MouseClick( "left", $iGoldX29, $iGoldY29)
		 Sleep(200)
	  EndIf
	  If $iGoldX30 <> 0 And $iGoldY30 <> 0 Then
		 MouseClick( "left", $iGoldX30, $iGoldY30)
		 Sleep(200)
	  EndIf
	  MouseMove( $aCordsA[0], $aCordsA[1])
   EndIf

   Sleep(400)

Until $varLoop = 1