Skript schließt sich sofort?

12/27/2014 21:00 xEr0r#1
Ja Leute hab mir seid langem mal wieder AutoIt runtergeladen, wollte damit einen einfachen Klickbot machen, allerdings schließt sich Die .exe sofort.

(die #includes hab ich aus nem alten Skript einfach so übernommen also nicht wundern)

Hier der code:

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ProgressConstants.au3>
#Region ### START Koda GUI section ### Form=

$iniread1 = IniRead(@ScriptDir & "\Key-Einstellungen.ini", "Start-Key", "", 0)
$iniread2 = IniRead(@ScriptDir & "\Key-Einstellungen.ini", "Exit-Key", "", 0)


;-----------------------------------------------------------------------------

$Form1 = GUICreate("Moneymaker", 373, 235, 540, 197)
$Label1 = GUICtrlCreateLabel("Start Taste:", 16, 40, 109, 20)
$Input1 = GUICtrlCreateInput($iniread1, 168, 32, 145, 24)
$Label2 = GUICtrlCreateLabel("Beenden Taste:", 16, 96, 109, 20)
$Input2 = GUICtrlCreateInput($iniread2, 168, 96, 145, 24)
$Button1 = GUICtrlCreateButton("Einstellungen übernehmen", 64, 152, 249, 49, $WS_GROUP)
$Label3 = GUICtrlCreateLabel("Version 1.0", 290, 210)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Func _save()
	$read1 = GUICtrlRead($Input1)
	$read2 = GUICtrlRead($Input2)
	IniWrite(@ScriptDir & "\Key-Einstellungen.ini", "Start-Key", "", $read1)
	IniWrite(@ScriptDir & "\Key-Einstellungen.ini", "Exit-Key", "", $read2)
	Sleep(500)
	MsgBox(0, "Erfolgreich", "Die Einstellungen wurden erfolgreich übernommen")
EndFunc

HotKeySet($iniread1, "_start")
HotKeySet($iniread2, "_Exit")

func _start()
	While 1
		MouseClick("Left", 648, 401)
		for $i = 0 to 9
			MouseClick("Right", 1094, 148)
		Next
		MouseClick("Left", 1253, 395)
		MouseClick("Left", 1283, 395)
		MouseClick("Left", 1311, 392)
		MouseClick("Left", 1346, 394)
		MouseClick("Left", 1218, 422)
		MouseClick("Left", 1248, 422)
		MouseClick("Left", 1282, 422)
		MouseClick("Left", 1314, 422)
		MouseClick("Left", 1344, 422)
	WEnd
EndFunc

func _Exit()
	Exit
EndFunc
12/27/2014 21:16 DeluxeDose#2
Script läuft einfach nur einmal durch, dir fehlt im Script die "Endlosschleife", dass es offen bleibt.

Fügst dass hinzu, sollte es das machen was du willst.
Code:
#EndRegion ### END Koda GUI section ###

While True
	If GUIGetMsg() = -3 then Exit
WEnd
Solltest außerdem schauen, dass du die HotKeys in ner separaten Funktion definierst, weil aktuell wäre "0" immer dein HotKey für Exit und Start (außer es gibt die ini schon).

MfG
12/27/2014 21:19 xEr0r#3
ahh danke
ja die gibts schon
12/27/2014 21:21 alpines#4
Wenn dann bitte vernünftig.
Code:
While GUIGetMsg() <> -3
	Sleep(10)
WEnd