Unexpected error?

[Vindicator209]

expandcollapse popup

#include <GuiConstants.au3>

GuiCreate("The Paradox- Music Player by Kyle Moy", 550, 60,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$Input_2 = GuiCtrlCreateInput("", 10, 10, 530, 20)
$Button_3 = GuiCtrlCreateButton("Play", 10, 30, 30, 20)
$Button_4 = GuiCtrlCreateButton("Stop", 40, 30, 30, 20)
$Button_5 = GuiCtrlCreateButton("Mute", 70, 30, 30, 20)
$Button_6 = GuiCtrlCreateButton("EXIT", 510, 30, 30, 20)
$Input_8 = GuiCtrlCreateInput("", 480, 30, 30, 20)
$Slider_7 = GuiCtrlCreateSlider(100, 30, 380, 20)
GUICtrlSetData($Slider_7,100)
GuiSetState(@SW_SHOW)
GuiSetState()
SplashImageOn ("","PARADOX.BMP", 550, 120, 0, 0, 1)
WinSetOnTop ( "The Paradox- Music Player by Kyle Moy", "", 1)
$trackmenu = GuiCtrlCreateContextMenu ()
$aboutitem = GuiCtrlCreateMenuitem ("About",$trackmenu)
$readme = GuiCtrlCreateMenuitem ("Read Me File",$trackmenu)
GuiCtrlCreateMenuitem ("",$trackmenu)
$exititem = GuiCtrlCreateMenuitem ("Exit",$trackmenu)

$Mute=0
While 1
    $sound=GUICtrlRead($Slider_7)
    GUICtrlSetData($Input_8,$sound)
    $soundfin=GUICtrlRead($Input_8)
    SoundSetWaveVolume($soundfin)
    $msg = GuiGetMsg()
        If $msg = $exititem Or $msg = -3 Or $msg = -1 Then ExitLoop
    If $msg = $aboutitem Then Msgbox(0,"About The Paradox","The Paradox- Music Player was made by Kyle Moy(Vindicator) In October,2006")
If $msg = $readme Then Run("notepad.exe Read Me.ini")
    Select
        Case $msg = $Button_4
        GUICtrlSetState ($Button_3, $GUI_ENABLE)
        GUICtrlSetState ($Button_4, $GUI_DISABLE)
        Run("The Paradox.exe")
        Exit
        Case $msg = $Button_3
        GUICtrlSetState ($Button_4, $GUI_ENABLE)
        GUICtrlSetState ($Button_3, $GUI_DISABLE)
        $Musicfromcomp=GUICtrlRead($Input_2)
        SoundPlay($Musicfromcomp)
        
    Case $msg = $Button_5
        If $Mute=1 Then
        GUICtrlSetData($Slider_7,100)
            $Mute=0
        Else
        GUICtrlSetData($Slider_7,0)
        $Mute=1
        EndIF
    Case $msg = $Button_6
    Exit
        Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
        ;;;
    EndSelect
WEnd
Exit
;PROJECT CLOSED

Ok, on one of my computers, a window keeps coming up like "line 0 Blah.....blah" "expecting select command before end select" or something like that, but now it wont come up any more, the script will just close when I run it, i even tried on another computer. it worked... any idea what could be my problem?

[zcoacoaz]

It works on my computer...