Vindicator209 Posted October 12, 2006 Posted October 12, 2006 (edited) How could I stop a running song, without closing the prgram as I do now... expandcollapse popup;C:\Documents and Settings\Kyle\My Documents\AU3\Battle, V2\System Scripts\PDXNORMEDIT.wav #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, 116) 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 (I know youve all seen this (or a version if this) like 50 times already, but I really need help...) Edited October 12, 2006 by MethodZero [center]"When you look at old, classic games like Snake, you often put it off because it's such a simple game, but it's only when you actually try and create your own unique game from scratch, do you finally appreciate those games."[/center][center]Don't ask for answers if you haven't TRIED yet![/center][center]Most answers can be answered in the help file! Use it![/center]
GaryFrost Posted October 12, 2006 Posted October 12, 2006 SoundPlay("") SciTE for AutoItDirections for Submitting Standard UDFs Don't argue with an idiot; people watching may not be able to tell the difference.
Vindicator209 Posted October 13, 2006 Author Posted October 13, 2006 ahhh... im stupid.. thanks [center]"When you look at old, classic games like Snake, you often put it off because it's such a simple game, but it's only when you actually try and create your own unique game from scratch, do you finally appreciate those games."[/center][center]Don't ask for answers if you haven't TRIED yet![/center][center]Most answers can be answered in the help file! Use it![/center]
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now