Func atkAlgorithmKingQueen()
	If (GUICtrlRead($chkKingAttackAllBases) == $GUI_CHECKED) Then
		While 1
			For $i = 0 To 6
				If $atkTroops[$i][0] = "King" Then
					$kingSlot = $i
					Click(68 + (72 * $kingSlot), 595)
					SetLog("Dropping King")
					If _Sleep(2000) Or $RunState = False Then ExitLoop (2)
					Click($TopLeft[0][0], $TopLeft[0][1], 1, 1, $iRandomFactor)
					If _Sleep(5000) Or $RunState = False Then ExitLoop (2)
					Click(68 + (72 * $kingSlot), 595)
					SetLog("Activating King's power")
				EndIf
			Next
			ExitLoop
		WEnd
	EndIf