Code:
Func TrainBarrack($x, $y, $z)
GUICtrlSetData($Results, "Func TrainBarrack" & @CRLF, -1)
While 1
If $RunState = False Then
ExitLoop
EndIf
ControlClick ($HWnD, "","", "left", "1", 100*$x_ratio, 100*$y_ratio) ; Making sure no Barrack active
sleep(1000)
ControlClick ($HWnD, "","", "left", "1", $x, $y)
Sleep(3000) ;Long sleep for slow Machines
ControlClick ($HWnD, "","", "left", "1", 600, 620)
Sleep(3000) ;Long sleep for slow Machines
$Pixel = _ColorCheckVariation(Hex(PixelGetColor(377, 546, $HWnD),6), Hex(0xD03838,6),20)
If $Pixel = True Then
$FullArmy = True
EndIf