little bug found + modified train timing to compensate for barbarians speed boost
EDIT: maintenance! they're removing the boost! LOL
so bad timing :D
the idle function with bugfix only
Code:
Func Idle() ;Sequence that runs until Full Army
Local $TimeIdle = 0 ;In Seconds
While $fullArmy = False
Local $hTimer = TimerInit()
If _Sleep(1000) Then ExitLoop
checkMainScreen()
If _Sleep(1000) Then ExitLoop
ZoomOut()
$iCollectCounter += 1
If $iCollectCounter > $COLLECTATCOUNT Then ; This is prevent from collecting all the time which isn't needed anyway
Collect()
If _Sleep(1000) Or $RunState = False Then ExitLoop
$iCollectCounter = 0
EndIf
Train()
If _Sleep(1000) Then ExitLoop
DropTrophy()
If $fullArmy Then ExitLoop
If _Sleep(1000) Then ExitLoop
$iDonateCounter += 1
If $iDonateCounter > $DONATEATCOUNT Then
DonateCC()
If _Sleep(1000) Or $RunState = False Then ExitLoop
$iDonateCounter = 0
EndIf
SetLog("~~~Waiting for full army~~~")
If _Sleep(30000) Then ExitLoop
Click(1, 1) ;Click Away
$TimeIdle += Round(TimerDiff($hTimer) / 1000, 2) ;In Seconds
SetLog("Time Idle: " & Floor(Floor($TimeIdle / 60) / 60) & " hours " & Floor(Mod(Floor($TimeIdle / 60), 60)) & " minutes " & Floor(Mod($TimeIdle, 60)) & " seconds")
WEnd
EndFunc ;==>Idle