[autoit]finde meinen fehler nit :(

[DerEinsatz]

hi^^ mir war langweilig da wollt eich mir schnell nen eigenen alarm bot machen der zu bestimmter zeit halt i-was macht (als test ne msgbox macht)

abe er klappt i-wie nit hier mal der code:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUI()

func GUI()
$Form2 = GUICreate("alarmbot", 413, 145, 303, 219)
$Input1 = GUICtrlCreateInput("", 16, 16, 145, 21)
GUICtrlSetData(-1, IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "1.alarm: ", "10:00:00"))
$Input2 = GUICtrlCreateInput("", 16, 48, 145, 21)
GUICtrlSetData(-1, IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "2.alarm: ", "10:00:00"))
$Button1 = GUICtrlCreateButton("start", 16, 80, 377, 25, 0)
$Button4 = GUICtrlCreateButton("einstellungen speichern", 16, 112, 377, 25, 0)
$alarm1 = GUICtrlCreatelabel("1.alarmzeit", 184, 16, 209, 25, 0)
$alarm2 = GUICtrlCreatelabel("2.alarmzeit", 184, 48, 209, 25, 0)
GUISetState(@SW_SHOW)
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $Button1
			GUISetState (@sw_minimize)
	GUIDelete ()
case $Button4
	IniWrite("Einstellungen.ini", "Einstellungen", "1.alarm: ", GUICtrlRead($Input1))
				IniWrite("Einstellungen.ini", "Einstellungen", "2.alarm: ", GUICtrlRead($Input2))
	EndSwitch
WEnd
endfunc



$zeit = Return @Hour & ":" & @Min & ":" & @SEC
select
	Case $zeit = GUICtrlRead($alarm1)
		_Anweisung1()
	Case $zeit = GUICtrlRead($alarm2)
		_Anweisung2()
EndSelect
	


Func _Anweisung1()
msgbox (0,"lol")
EndFunc

Func _Anweisung2()
msgbox (0,"lol")
EndFunc

ist ja eig nichts schweres aber i-wie steh ich gerade aufm schlauch.... (morgen endlich ferien!!!!!!!!!!!!!!!!!!!!)

[kknb]

du solltest erstmal die fehler abarbeiten die dir scite beim starten wirft. dann musst du in ner schleife prüfen welche uhrzeit gerade ist und dementsprechen drauf reagieren.

hab mal nen kleines beispiel für eine uhrzeit gemacht, kannst dann selber einfach um die 2. zeit erweitern.

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("TrayIconDebug",1)
$1=IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "1.alarm: ", "10:00:00")
$2=IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "2.alarm: ", "10:00:00")

global $alarm1, $alarm2
$Form2 = GUICreate("alarmbot", 413, 120, 303, 219)
$Input1 = GUICtrlCreateInput($1, 16, 16, 145, 21)
$Input2 = GUICtrlCreateInput($2, 16, 48, 145, 21)
$Button1 = GUICtrlCreateButton("start", 16, 80, 377, 25, 0)

$alarm1 = GUICtrlCreatelabel("1.alarmzeit", 184, 16, 209, 25, 0)
$alarm2 = GUICtrlCreatelabel("2.alarmzeit", 184, 48, 209, 25, 0)
GUISetState(@SW_SHOW)

go()
func go()
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $Button1
			IniWrite("Einstellungen.ini", "Einstellungen", "1.alarm: ", GUICtrlRead($Input1))
			IniWrite("Einstellungen.ini", "Einstellungen", "2.alarm: ", GUICtrlRead($Input2))
			start()
	EndSwitch
WEnd
endfunc

func start()
		$1=IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "1.alarm: ", "10:00:00")
		$2=IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "2.alarm: ", "10:00:00")
		$zeit = @Hour & ":" & @Min & ":" & @SEC
	while $1 <> $zeit
		sleep(500)
		$zeit = @Hour & ":" & @Min & ":" & @SEC
		ToolTip($zeit)
	wend
	MsgBox(0,"","bla bla")
EndFunc

[felixli93]

du hattest einige viele fehler drin!
vergleiche am besten mal das hier:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUI()

func GUI()
$Form2 = GUICreate("alarmbot", 413, 145, 303, 219)
Global $Input1 = GUICtrlCreateInput("", 16, 16, 145, 21)
GUICtrlSetData(-1, IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "1.alarm: ", "10:00:00"))
Global $Input2 = GUICtrlCreateInput("", 16, 48, 145, 21)
GUICtrlSetData(-1, IniRead(@ScriptDir & "\Einstellungen.ini", "Einstellungen", "2.alarm: ", "10:00:00"))
$Button1 = GUICtrlCreateButton("start", 16, 80, 377, 25, 0)
$Button4 = GUICtrlCreateButton("einstellungen speichern", 16, 112, 377, 25, 0)
$alarm1 = GUICtrlCreatelabel("1.alarmzeit", 184, 16, 209, 25, 0)
$alarm2 = GUICtrlCreatelabel("2.alarmzeit", 184, 48, 209, 25, 0)
GUISetState(@SW_SHOW)
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $Button1
			Global $alarmzeit1 = GUICtrlRead($input1)
			Global $alarmzeit2 = GUICtrlRead($input2)
			GUIDelete ()
			ExitLoop
case $Button4
	IniWrite("Einstellungen.ini", "Einstellungen", "1.alarm: ", GUICtrlRead($Input1))
				IniWrite("Einstellungen.ini", "Einstellungen", "2.alarm: ", GUICtrlRead($Input2))
	EndSwitch
WEnd
endfunc


while 1
	$zeit = @Hour & ":" & @Min & ":" & @SEC
	If $zeit = $alarmzeit1 Then
		_anweisung1 ()
	ElseIf $zeit = $alarmzeit2 Then
		_anweisung2 ()
	EndIf
WEnd

Func _Anweisung1()
msgbox (0,"lol","lol")
EndFunc

Func _Anweisung2()
msgbox (0,"lol","lol")
EndFunc

nochmal mit deinem

so geht das ding jetzt