Hallo ich habe einen Wecker im Sithdesign gemacht natürlich habe ich hilfe bekommen von schnuffel,raupi und RR04 danke euch nochmal
Hier das script
Spoiler anzeigen
#include <GUIConstants.au3>
$sithpic = @ScriptDir & "\DarthVaderROTSV1.jpg"
$griff = @ScriptDir & "\so.jpg"
$1 = @ScriptDir & "\so.jpg"
$2 = @ScriptDir & "\so.jpg"
$3 = @ScriptDir & "\so.jpg"
$4 = @ScriptDir & "\so.jpg"
$5 = @ScriptDir & "\pfeil-runter-rot.gif"
Opt("guioneventmode", 1)
Global $check1 = 0, $check2 = 0, $Start = 0, $song = 0, $check3 = 0, $Name, $Var
GUICreate("Sithwecker by Sithlord95", 258, 312, 190, 125)
GUISetBkColor(0x000000)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
$Input1 = GUICtrlCreateInput(@HOUR & ":" & @MIN & ":" & @SEC, 0, 24, 209, 21)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label1 = GUICtrlCreateLabel("Trage die Weckzeit ein", 0, 0, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 120, 80, 17, 17)
$Label4 = GUICtrlCreateLabel("Mit Messagebox?", 0, 56, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Mit Beeptönen?", 0, 104, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 120, 128, 17, 17)
$Button1 = GUICtrlCreateButton("Starten", 48, 152, 161, 33, 0)
$Pic1 = GUICtrlCreatePic($sithpic, 0, 192, 257, 116)
$griff = GUICtrlCreatePic($griff, 208, 0, 50, 17)
$Graphic1 = GUICtrlCreatePic($1, 208, 56, 50, 17)
$Graphic2 = GUICtrlCreatePic($2, 208, 24, 50, 17)
$Graphic3 = GUICtrlCreatePic($3, 208, 104, 50, 17)
$Button2 = GUICtrlCreateButton("Eigener Song", 0, 128, 89, 25, 0)
GUICtrlSetState(-1, $GUI_DISABLE)
$Graphic4 = GUICtrlCreatePic($4, 208, 128, 49, 17)
$Label3 = GUICtrlCreateLabel("Eigenen Song?", 136, 128, 76, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 224, 168, 17, 17)
$Graphic5 = GUICtrlCreatePic($5, 224, 144, 17, 25)
GUISetState(@SW_SHOW)
GUICtrlSetOnEvent($Checkbox3, "_check3")
GUICtrlSetOnEvent($Button1, "_start")
GUICtrlSetOnEvent($Checkbox1, "_check1")
GUICtrlSetOnEvent($Checkbox2, "_check2")
GUICtrlSetOnEvent($Button2, "_Soundwahl")
While 1
If $Start = 1 And GUICtrlRead($Input1) = @HOUR & ":" & @MIN & ":" & @SEC Then
If $check1 = 1 Then
MsgBox(0, "Weckzeit", "Die Weckzeit ist erreicht ", "15")
EndIf
If $check2 = 1 Then
Beep(1500, 500)
Beep(2000, 500)
Beep(1000, 1000)
EndIf
If $song = 1 Then
SoundPlay($Var, 0)
EndIf
EndIf
Sleep(10)
WEnd
Func _start()
$Start = 1
EndFunc ;==>_start
Func _check1()
If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then
$check1 = 1
Else
$check1 = 0
EndIf
EndFunc ;==>_check1
Func _check2()
If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
$check2 = 1
Else
$check2 = 0
EndIf
EndFunc ;==>_check2
Func _Exit()
Exit
EndFunc ;==>_Exit
Func _check3()
If BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState($Button2, $GUI_ENABLE)
Else
$check3 = 0
GUICtrlSetState($Button2, $GUI_DISABLE)
EndIf
EndFunc ;==>_check3
Func _Soundwahl()
Local $message = "Bitte wähle einen Song."
Local $Temp, $Name
$Var = FileOpenDialog($message, @WindowsDir & "\", "Musik (*.mp3;)", 1)
If @error Then
MsgBox(4096, "", "Keine Datei(en) ausgewählt")
GUICtrlSetState($Checkbox3,$GUI_UNCHECKED)
GUICtrlSetState($Button2, $GUI_DISABLE)
Return
Else
$Temp = StringSplit($Var, "\")
$Name = $Temp[UBound($Temp) - 1]
MsgBox(0,"Titelauswahl",$Name)
$song = 1
EndIf
EndFunc ;==>_Soundwahl
hier der download mit der exe und den bildern ...
autoit.de/wcf/attachment/4466/
ich hoffe es gefällt euch und ich bekomme rückmeldung wie es euch gefällt das design und so vielleciht auch verbesserungs vorschläge
hier is noch ein script danke raupi falles es nich bei euch läuft
Spoiler anzeigen
#include <GUIConstants.au3>
#include <Sound.au3>
$sithpic = @ScriptDir & "\DarthVaderROTSV1.jpg"
$griff = @ScriptDir & "\so.jpg"
$1 = @ScriptDir & "\so.jpg"
$2 = @ScriptDir & "\so.jpg"
$3 = @ScriptDir & "\so.jpg"
$4 = @ScriptDir & "\so.jpg"
$5 = @ScriptDir & "\pfeil-runter-rot.gif"
Opt("guioneventmode", 1)
Global $check1 = 0, $check2 = 0, $Start = 0, $song = 0, $check3 = 0, $Name, $Var,$Sound
GUICreate("Sithwecker by Sithlord95", 258, 312, 190, 125)
GUISetBkColor(0x000000)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
$Input1 = GUICtrlCreateInput(@HOUR & ":" & @MIN & ":" & @SEC, 0, 24, 209, 21)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label1 = GUICtrlCreateLabel("Trage die Weckzeit ein", 0, 0, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 120, 80, 17, 17)
$Label4 = GUICtrlCreateLabel("Mit Messagebox?", 0, 56, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Mit Beeptönen?", 0, 104, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 120, 128, 17, 17)
$Button1 = GUICtrlCreateButton("Starten", 48, 152, 161, 33, 0)
$Pic1 = GUICtrlCreatePic($sithpic, 0, 192, 257, 116)
$griff = GUICtrlCreatePic($griff, 208, 0, 50, 17)
$Graphic1 = GUICtrlCreatePic($1, 208, 56, 50, 17)
$Graphic2 = GUICtrlCreatePic($2, 208, 24, 50, 17)
$Graphic3 = GUICtrlCreatePic($3, 208, 104, 50, 17)
$Button2 = GUICtrlCreateButton("Eigener Song", 0, 128, 89, 25, 0)
GUICtrlSetState(-1, $GUI_DISABLE)
$Graphic4 = GUICtrlCreatePic($4, 208, 128, 49, 17)
$Label3 = GUICtrlCreateLabel("Eigenen Song?", 136, 128, 76, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 224, 168, 17, 17)
$Graphic5 = GUICtrlCreatePic($5, 224, 144, 17, 25)
GUISetState(@SW_SHOW)
GUICtrlSetOnEvent($Checkbox3, "_check3")
GUICtrlSetOnEvent($Button1, "_start")
GUICtrlSetOnEvent($Checkbox1, "_check1")
GUICtrlSetOnEvent($Checkbox2, "_check2")
GUICtrlSetOnEvent($Button2, "_Soundwahl")
While 1
If $Start = 1 And GUICtrlRead($Input1) = @HOUR & ":" & @MIN & ":" & @SEC Then
If $check1 = 1 Then
MsgBox(0, "Weckzeit", "Die Weckzeit ist erreicht ", "15")
EndIf
If $check2 = 1 Then
Beep(1500, 500)
Beep(2000, 500)
Beep(1000, 1000)
EndIf
If $song = 1 Then
_SoundPlay($sound, 0)
;~ SoundPlay($Var, 1)
EndIf
EndIf
Sleep(10)
WEnd
_SoundClose($sound)
Func _start()
$Start = 1
EndFunc ;==>_start
Func _check1()
If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then
$check1 = 1
Else
$check1 = 0
EndIf
EndFunc ;==>_check1
Func _check2()
If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
$check2 = 1
Else
$check2 = 0
EndIf
EndFunc ;==>_check2
Func _Exit()
Exit
EndFunc ;==>_Exit
Func _check3()
If BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState($Button2, $GUI_ENABLE)
Else
$check3 = 0
GUICtrlSetState($Button2, $GUI_DISABLE)
EndIf
EndFunc ;==>_check3
Func _Soundwahl()
Local $message = "Bitte wähle einen Song."
Local $Temp, $Name
$Var = FileOpenDialog($message, @WindowsDir & "\", "Musik (*.mp3;)", 1)
If @error Then
MsgBox(4096, "", "Keine Datei(en) ausgewählt")
GUICtrlSetState($Checkbox3,$GUI_UNCHECKED)
GUICtrlSetState($Button2, $GUI_DISABLE)
Return
Else
$sound = _SoundOpen($Var, "Sound")
$Temp = StringSplit($Var, "\")
$Name = $Temp[UBound($Temp) - 1]
MsgBox(0,"Titelauswahl",$Name)
$song = 1
EndIf
EndFunc ;==>_Soundwahl
hier nochmal falls ihr das andere ncih findet in der mitte^^autoit.de/wcf/attachment/4466/
Edit Oscar: Spoiler gesetzt. Bitte bei längeren Scripten zusätzlich zu den AutoIt-Tags auch die Spoiler-Tags benutzen.