chestercs 2 жил өмнө
parent
commit
7ed4be9510
1 өөрчлөгдсөн 13 нэмэгдсэн , 12 устгасан
  1. 13 12
      klanhaboru_main.au3

+ 13 - 12
klanhaboru_main.au3

@@ -2,8 +2,8 @@
 ConsoleWrite(";; Klanhaboru fun by ChesTeRcs@2023" & @CRLF & @CRLF)
 
 #Region === Configurations
-   AutoItSetOption("SendKeyDelay",      0)
-   AutoItSetOption("SendKeyDownDelay",  0)
+   AutoItSetOption("SendKeyDelay",      1)
+   AutoItSetOption("SendKeyDownDelay",  1)
    AutoItSetOption("WinTitleMatchMode", 2)
    AutoItSetOption("TrayAutoPause"     ,0)
 
@@ -16,16 +16,17 @@ ConsoleWrite(";; Klanhaboru fun by ChesTeRcs@2023" & @CRLF & @CRLF)
    Global $traytip = 					IniRead(@ScriptDir & "/config.ini", "Options", "trayTip", 		true)
    Global $debug = 						IniRead(@ScriptDir & "/config.ini", "Options", "debug", 		false)
    Global $gyujtogetesEventTimer = 		eventStart(0)   ; delay task after bot started with seconds (default: 0)
-   Global $trainUnitsEventTimer = 		eventStart(0)   ; delay task after bot started with seconds (default: 0)
-   Global $trainLovassagEventTimer = 	eventStart(0) 	; delay task after bot started with seconds (default: 0)
-   Global $trainMachinesEventTimer = 	eventStart(0) 	; delay task after bot started with seconds (default: 0)
+   Global $gyujtogetesEventTimer2 = 	eventStart(0)   ; delay task after bot started with seconds (default: 0)
+   Global $trainUnitsEventTimer = 		eventStart(3600)   ; delay task after bot started with seconds (default: 0)
+   Global $trainLovassagEventTimer = 	eventStart(3600) 	; delay task after bot started with seconds (default: 0)
+   Global $trainMachinesEventTimer = 	eventStart(3600) 	; delay task after bot started with seconds (default: 0)
    Global $epitesEventTimer = 			eventStart(0)   ; delay task after bot started with seconds (default: 0)
    Global $trainKnightEventTimer = 		eventStart(0)   ; delay task after bot started with seconds (default: 0)
    Global $sendAttackEventTimer = 		eventStart(0)   ; delay task after bot started with seconds (default: 0)
    Global $diamondGatheringEventTimer = eventStart(0)   ; delay task after bot started with seconds (default: 0)
 
    Global $pageLoadTime = 				400 			; inMs
-   Global $sleepTimesInEndOfTasks = 	0				; inMs
+   Global $sleepTimesInEndOfTasks = 	2200				; inMs
 #EndRegion
 
 
@@ -33,9 +34,9 @@ ConsoleWrite(";; Klanhaboru fun by ChesTeRcs@2023" & @CRLF & @CRLF)
 While loopEnd()
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Gyûjtögetés
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  sendAll, mode,		landzsas, kardforgato, bardos, ijasz, 		konnyulovas, lovasijasz, nehezlovas, lovag 			(-1 meant to send all unit button)
+   $gyujtogetesEventTimer2 = 	gyujtogetes(false, 2, 	-1, 0, 0, 0,		-1, -1, -1, 0,					 	$gyujtogetesEventTimer2)
    $gyujtogetesEventTimer = 	gyujtogetes(false, 3, 	0, 0, 0, 0,		-1, -1, -1, 0,					 	$gyujtogetesEventTimer)
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Train Units
-   ;;;;;;;;;;;;;;;;;;;;;;;;;;;  landzsas, kardforgato, bardos, ijasz  (can be -1 what is meant to all unit button)
    $trainUnitsEventTimer = 		trainUnits(				0, 10, 0, 0, 						 			7200, 	$trainUnitsEventTimer)
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Train Lovassag
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  kem, konnyulovas, lovasijasz, nehezlovas  (can be -1 what is meant to all unit button)
@@ -46,15 +47,15 @@ While loopEnd()
 
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Építés
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Options: main, barracks, stable, watchtower, smith, place, statue, market, wood, stone, iron, farm, storage, hide, wall
-   ;$epitesEventTimer = 			epites(					"farm", 							 			3600,	$epitesEventTimer)
+   $epitesEventTimer = 			epites(					"stone", 							 			3600,	$epitesEventTimer)
 
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Train Knight
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;
-   $trainKnightEventTimer = 	trainKnight(															9000,	$trainKnightEventTimer)
+   ;$trainKnightEventTimer = 	trainKnight(															9000,	$trainKnightEventTimer)
 
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Send Attack
-   ;;;;;;;;;;;;;;;;;;;;;;;;;;;  $x, $y,	 $landzsas, $kardforgato, $bardos, $ijasz, 	$kem, $konnyulovas, $lovasijasz, $nehezlovas, 	$kos, $katapult, 	$lovag, $nemes, $eventTimer, $repeatTimer
-   $sendAttackEventTimer = 		sendAttack(490, 562,    0, 0, 0, 0,   		1, 0, 0, 0,    0, 0, 0, 0, 	3600,	$sendAttackEventTimer)  ; 10800 - 3h
+   ;;;;;;;;;;;;;;;;;;;;;;;;;;;  $x, $y,	 $landzsas, $kardforgato, $bardos, $ijasz, 	$kem, $konnyulovas, $lovasijasz, $nehezlovas, 	$kos, $katapult, 	$lovag, $nemes, $eventTimer
+   $sendAttackEventTimer = 		sendAttack(490, 562,    0, 250, 0, 0,   		0, 0, 0, 0,    0, 0, 1, 0, 	3750,	$sendAttackEventTimer)  ; 10800 - 3h
 
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;  Diamon Gathering event
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -204,7 +205,7 @@ Func sendAttack($x, $y, $landzsas, $kardforgato, $bardos, $ijasz, $kem, $konnyul
    If ($x = null or $y = null) Then Return $eventTimer
    TraytipGG("Send Attack started!" & @CRLF)
    openNewTab()
-   navigateUrl(getGameUrl("place"), false)
+   navigateUrl(getGameUrl("place", "command"), false)
    sendUnits($landzsas, $kardforgato, $bardos, $ijasz)
    sendLovassag($kem, $konnyulovas, $lovasijasz, $nehezlovas)
    sendMachines($kos, $katapult)