Beiträge von Bappu

HI
Ich bin neu hier und wollte mich erstmal vorstellen.
Ich heiße Tim, bin 16 Jahre alt und komme aus Hessen

So zu meinem Problem.. ich habe ein kleines Script, das will ich über die GUI Steuern also mit Start,Pause,Ende halt erstmal nur die Grundfunktionen...leider funktioniert es nicht wie ich es gerne hätte
Ich kann die Funktionen nur einmal aufrufen danach wechselt er nicht mehr zwischen den Funktionen hin und her wie ich es gerne hätte...
Mein Code:

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

;Global Varsglobal $pause = FALSE;Pause = 1 Skript Stops, Pause = 0 Strikpt Starts

#Region ### START Koda GUI section ### Form=$Form1 = GUICreate("BoxCollector", 419, 228, 281, 167)$Label1 = GUICtrlCreateLabel("Iwas by Bappu", 8, 8, 223, 27)GUICtrlSetFont(-1, 14, 800, 0, "Deneane")$Label2 = GUICtrlCreateLabel("Need Help ? Visit http://www.grazy-games.de ", 0, 208, 173, 17)$start = GUICtrlCreateButton("Start (s)", 0, 176, 75, 25)$pause = GUICtrlCreateButton("Pause (p)", 80, 176, 75, 25)$Label3 = GUICtrlCreateLabel("Logfile:", 270, 12, 55, 20)GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")$Log = GUICtrlCreateEdit("", 272, 32, 137, 185)GUICtrlSetData(-1, "Log")$BonusBox = GUICtrlCreateCheckbox("Do 1", 8, 40, 177, 17)GUICtrlSetState(-1, $GUI_CHECKED)GUICtrlSetFont(-1, 10, 400, 0, "Deneane")$Checkbox1 = GUICtrlCreateCheckbox("Do 2", 8, 64, 177, 17)GUICtrlSetState(-1, $GUI_CHECKED)GUICtrlSetFont(-1, 10, 400, 0, "Deneane")$Checkbox2 = GUICtrlCreateCheckbox("Do 3", 8, 88, 177, 17)GUICtrlSetState(-1, $GUI_CHECKED)GUICtrlSetFont(-1, 10, 400, 0, "Deneane")$Label4 = GUICtrlCreateLabel("Some Text", 8, 104, 96, 20)GUICtrlSetFont(-1, 10, 400, 0, "Deneane")$Checkbox3 = GUICtrlCreateCheckbox("Do 4 if Do3 is false", 8, 120, 185, 17)GUICtrlSetFont(-1, 10, 400, 0, "Deneane")$Checkbox4 = GUICtrlCreateCheckbox("Do 5 if Do3 is true", 8, 144, 161, 17)GUICtrlSetFont(-1, 10, 400, 0, "Deneane")$exit = GUICtrlCreateButton("Exit (e)", 160, 176, 75, 25)GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###
While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $start _Start() Case $pause _Pause() Case $exit _Exit() EndSwitchWEnd
Func _Start() $pause = FALSE While $pause = FALSE MsgBox(48,"Start","Script Started...") Sleep(1500) WEndEndFunc
Func _Pause() $pause = TRUE While $pause = TRUE Sleep(1500) MsgBox(48,"Paused","Pause...") WEndEndFunc
Func _Exit() MsgBox(48, "Byebye!", "See you!") Exit 0EndFunc

Das Script hat bis jetzt noch keinen Sinn sondern ist einfach nur zum üben

OT:

• Programme, die anderen, auch Freunden, einen Schreck einjagen sollen oder sich sonst über andere Nutzer lustig machen ("Spaßviren") --- Das ist doch ein Scherz oder ? :'D

Mfg Bappu