okay thx
#closed pls
€dit:
#open
noch eine frage was muss machen damit er auch in anderen fenstern schreibt?
z.B. in 4Story als GE-Bot??
hier nochmal den Code:
PHP Code:
MsgBox (0,"HotKeys", "HotKeys: [ESC]=Exit, [+]=Start, [#]=pause")
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
HotKeySet("{ESC}", "_Exit") ;==> die HotKeys
HotKeySet("{+}", "_Start")
HotKeySet("{#}", "_Pause")
Global $bPaused = False
GUICreate("GE-Bot by IZEROI", 350, 200) ;==> Das ist die GUI
$Tastenfeld = GUICtrlCreateInput("", 20, 35)
$Zeitfeld = GUICtrlCreateInput("", 20, 115)
$startbutton = GUICtrlCreateButton("Start", 250, 33)
$stoppbutton = GUICtrlCreateButton("Pause/Weiter", 250, 113)
GUICtrlCreateLabel("Taste", 10, 10)
GUICtrlCreateLabel("Createt by IZEROI using e*pvpers", 50, 160)
GUICtrlCreateLabel("Zeitabstand in (ms)", 10, 90)
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $startbutton
_Send()
EndSwitch
WEnd
Func _Start()
_Send()
EndFunc ;==>_Start
Func _Pause()
$bPaused = Not $bPaused
AdlibRegister("_Stop", 10)
EndFunc ;==>_Pause
Func _Exit()
Exit
EndFunc ;==>_Exit
Func _Send()
$Send = GUICtrlRead($Tastenfeld)
$Sleep = GUICtrlRead($Zeitfeld)
If $Sleep = "" Then $Sleep = 50
If Not $Send = "" Then
While 1
Send($Send)
Sleep($Sleep)
WEnd
Else
MsgBox(0, "Error", "Bitte Schreibe etwas in die Felder")
EndIf
EndFunc ;==>_Send
Func WM_COMMAND($hWnd, $nMsg, $wParam, $lParam)
Local $hButton = $stoppbutton
$hButton = GUICtrlGetHandle($hButton)
If $lParam = $hButton Then
$bPaused = Not $bPaused
AdlibRegister("_Stop", 10)
EndIf
EndFunc ;==>WM_COMMAND
Func _Stop()
AdlibUnRegister("_Stop")
While $bPaused And Sleep(10)
If GUIGetMsg() = -3 Then Exit
WEnd
EndFunc ;==>_Stop
