Brauch mal Hilfe ;D

[.SpeedLinK]

Wollte mir ein kleinen Tastenbot für Rappelz machen der nur 3 Tasten immer drückt aber ich weis jetzt nicht mehr weiter wie ichs machen soll hier mal mein progi wie es aussehen soll ;D wär schön wenn mir das mal einer machen könnte

der bot soll die Tasten 1,2,3,4 drücken und alle 60 sekunden die Tab taste

PHP Code:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("LevelBot by SpeedLink", 618, 259, 320, 133)
$Pic1 = GUICtrlCreatePic("C:\Users\Daniel\Desktop\24.jpg", 0, 0, 617, 257, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Button1 = GUICtrlCreateButton("Start", 16, 8, 137, 41, 0)
$Button2 = GUICtrlCreateButton("Pause", 448, 8, 145, 41, 0)
$Button3 = GUICtrlCreateButton("Ende", 216, 208, 145, 41, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd 


Ps: bin noch ein Noob in AutoIt bitte nicht so streng sein,hoffe ich bekomme geholfen natürlich gibts auch ein dickes Thx von mir ^.^

[K1ramoX]

Da:

#include <StaticConstants.au3>
#include <WindowsConstants.au3>

AdlibRegister("_Tab", 60000) ;alle 60 sekunden (600000 Millisekunden = 60 Sekunden) die funktion _Tab ausführen/callen

$Form1 = GUICreate("LevelBot by SpeedLink", 618, 259, 320, 133)
$Pic1 = GUICtrlCreatePic("C:\Users\Daniel\Desktop\24.jpg", 0, 0, 617, 257, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Button1 = GUICtrlCreateButton("Start", 16, 8, 137, 41, 0)
$Button2 = GUICtrlCreateButton("Pause", 448, 8, 145, 41, 0)
$Button3 = GUICtrlCreateButton("Ende", 216, 208, 145, 41, 0)
GUISetState(@SW_SHOW)

Send("{1}") ;tasten 1 bis 5 drücken
Send("{2}")
Send("{3}")
Send("{4}")

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case -3
            Exit

    EndSwitch
WEnd

Func _Tab() ;funktion für´s tab drücken
	Send("{TAB}") ;tab drücken
EndFunc

[.SpeedLinK]

komisch wenn ich auf start drück passiert nix >.< hab ich was falsch gemacht beim programm schreiben?

[K1ramoX]

Liegt daran dass du nicht gesagt hast dass du es mit den Buttons möchtest. Hier:

#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("LevelBot by SpeedLink", 618, 259, 320, 133)
$Pic1 = GUICtrlCreatePic("C:\Users\Daniel\Desktop\24.jpg", 0, 0, 617, 257, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$Button1 = GUICtrlCreateButton("Start", 16, 8, 137, 41, 0)
$Button2 = GUICtrlCreateButton("Pause", 448, 8, 145, 41, 0)
$Button3 = GUICtrlCreateButton("Ende", 216, 208, 145, 41, 0)
GUISetState(@SW_SHOW)

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case -3
			Exit
		Case $Button1 ;wenn der start button gedrückt wird
			_Start()
		Case $Button2 ;wenn der pause button gedrückt wird
			AdlibUnRegister("_Tab")
		Case $Button3 ;wenn der ende button gedrückt wird
			Exit
	EndSwitch
WEnd

Func _Start()
	AdlibRegister("_Tab", 60000) ;alle 60 sekunden (600000 Millisekunden = 60 Sekunden) die funktion _Tab ausführen/callen
	Send("{1}") ;tasten 1 bis 5 drücken
	Send("{2}")
	Send("{3}")
	Send("{4}")
EndFunc   ;==>_Start

Func _Tab() ;funktion für´s tab drücken
	Send("{TAB}") ;tab drücken
EndFunc   ;==>_Tab

Alle 60 Sekunden Tab und einmaliges senden der Tasten 1-4 ;o

[Njahs]

Oder du machst es so:

 Spoiler

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Opt("SendKeyDelay",100)

Global $Pause = False, $Tab = 60000

#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("LevelBot by SpeedLink", 618, 259, 320, 133)
$Pic1 = GUICtrlCreatePic("C:\Users\Daniel\Desktop\24.jpg", 0, 0, 617, 257, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$StartBtn = GUICtrlCreateButton("Start", 16, 8, 137, 41, 0)
$PauseBtn = GUICtrlCreateButton("Pause", 448, 8, 145, 41, 0)
$EndBtn = GUICtrlCreateButton("Ende", 216, 208, 145, 41, 0)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $StartBtn
			Global $Timer = 0

			If $Pause = False Then
				$Timer = TimerInit()

				While 1
					$nMsg = GUIGetMsg()
					Switch $nMsg
						Case $PauseBtn
							$Pause = True
						Case $EndBtn
							Exit
					EndSwitch

					If TimerDiff($Timer) >= $Tab Then
						Global $Timer = 0
						Send("{TAB}")
						ExitLoop
					Else
						Send("{1}")
						Send("{2}")
						Send("{3}")
						Send("{4}")
					EndIf

					If $Pause = True Then ExitLoop
				WEnd
			EndIf
		Case $PauseBtn
			$Pause = True
		Case $EndBtn
			Exit

	EndSwitch
WEnd

PS: Guck dich doch mal in der Tutorial sektion um, dort
gibt's gute Tutorials, z.B.