• 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
    [autoit]


    #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")

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    If $Start = 1 And GUICtrlRead($Input1) = @HOUR & ":" & @MIN & ":" & @SEC Then
    If $check1 = 1 Then
    MsgBox(0, "Weckzeit", "Die Weckzeit ist erreicht :P ", "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

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit] [autoit][/autoit] [autoit]

    Func _check2()
    If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
    $check2 = 1
    Else
    $check2 = 0
    EndIf
    EndFunc ;==>_check2
    Func _Exit()
    Exit
    EndFunc ;==>_Exit

    [/autoit] [autoit][/autoit] [autoit]

    Func _check3()
    If BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
    GUICtrlSetState($Button2, $GUI_ENABLE)
    Else
    $check3 = 0
    GUICtrlSetState($Button2, $GUI_DISABLE)

    [/autoit] [autoit][/autoit] [autoit]

    EndIf
    EndFunc ;==>_check3

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit]


    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
    [autoit]


    #include <GUIConstants.au3>
    #include <Sound.au3>

    [/autoit] [autoit][/autoit] [autoit]

    $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")

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    If $Start = 1 And GUICtrlRead($Input1) = @HOUR & ":" & @MIN & ":" & @SEC Then
    If $check1 = 1 Then
    MsgBox(0, "Weckzeit", "Die Weckzeit ist erreicht :P ", "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

    [/autoit] [autoit][/autoit] [autoit]

    Func _check2()
    If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
    $check2 = 1
    Else
    $check2 = 0
    EndIf
    EndFunc ;==>_check2
    Func _Exit()
    Exit
    EndFunc ;==>_Exit

    [/autoit] [autoit][/autoit] [autoit]

    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

    [/autoit] [autoit][/autoit] [autoit]

    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")

    [/autoit] [autoit][/autoit] [autoit]

    $Temp = StringSplit($Var, "\")
    $Name = $Temp[UBound($Temp) - 1]
    MsgBox(0,"Titelauswahl",$Name)
    $song = 1
    EndIf
    EndFunc ;==>_Soundwahl

    [/autoit]

    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.

    3 Mal editiert, zuletzt von Oscar (19. April 2009 um 00:13)

    • Offizieller Beitrag

    Pack mal die Sith-Wecker.au3 in deine Rar-Datei .