HuHu wollte dis jetzt mit Koda bearbeiten.
Doch natürlich funzt mal wieder alles nicht.
Nur das Grundscript.
Aber sobald ich den code von Koda einfüge funktioniert es nicht wenn ich die Tasten drücke und auch nicht wenn ich auf die Buttons drücke.
könnte mir mal jmd. erklären wie man dis hinkriegt ???
--------------------------------------------------------------------------------------------------
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\MAtze\Desktop\Klickermania.kxf
$Klickermania = GUICreate("Klickermania", 633, 448, 216, 158, BitOR($WS_MAXIMIZEBOX,$WS_MINIMIZEBOX,$WS_SIZEBOX, $WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_OVERLAP PEDWINDOW,$WS_TILEDWINDOW,$WS_MAXIMIZE,$WS_POPUP,$ WS_POPUPWINDOW,$WS_GROUP,$WS_TABSTOP,$WS_BORDER,$W S_CLIPSIBLINGS,$DS_MODALFRAME,$DS_SETFOREGROUND,$D S_CONTEXTHELP), 0)
GUISetIcon("C:\Dokumente und Einstellungen\MAtze\Desktop\Icon\Matze.ico")
GUISetCursor (2)
GUISetBkColor(0x000080)
$Button1 = GUICtrlCreateButton("Start- (F5)", 208, 24, 201, 73, 0)
$Button2 = GUICtrlCreateButton("Zum Beenden F7 drücken", 64, 280, 497, 89, 0)
$Button3 = GUICtrlCreateButton("Pause (F6)", 112, 144, 401, 81, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Klickermania
Case $Klickermania
Case $Klickermania
Case $Klickermania
Case $Button1
Send ("{F5}")
Case $Button2
Send ("{F7}")
Case $Button3
Send ("{F6}")
EndSwitch
WEnd
MsgBox(64,"Copyright", "Copyright Matthias Zalder")
HotKeySet ( "{F5}" , "Start" )
HotKeySet ( "{F7}" , "Ende" )
Hotkeyset( "{F6}" , "Pause" )
Global $Paused
while (1)
sleep(500)
wend;
Func Start ()
While (1)
MouseClick("left", "508", "510", 1, 0)
Sleep (500)
Wend
EndFunc
Func Ende ()
Exit
EndFunc
Func Pause()
$Paused = Not $Paused
While $Paused
Sleep(50)
WEnd
EndFunc
----------------------------------------------------------
Hoffe auf baldige Antwort
mfg noob