MP3 player

[i542]

I asked myself: 'What player users use? Maybe it needs some simple and not too big MP3 player?'. So, if you want something more simplier and more smaller, you're come to right place! MP3WAV player will fit your needs!

It is simple: two steps and music playing.

• Open file you want play
• Press Play button

Interested? More informations in readme.

i542

EDIT: Current version: 1.1

MP3_player_1.1.zip

Edited July 15, 2006 by i542

[broodplank]

here's a fading in addon

SoundSetWaveVolume("0)

for $a=0 to 100

sleep(30)

SoundSetWaveVolume(""& $a &"")

next

[i542]

here's a fading in addon

SoundSetWaveVolume("0)

for $a=0 to 100

sleep(30)

SoundSetWaveVolume(""& $a &"")

next

Nice ! I marked with red all errors (probably with that " before zero script willn't run). But, I will add it in 1.1.

i542

[Daniel W.]

expandcollapse popup

Opt("GUIOnEventMode" ,  1 )
Opt("TrayMenuMode",1)

#include <GUIConstants.au3>

TraySetIcon(@Scriptdir & "\mp3player.ico")
TraySetTooltip("MP3 player 1.0")
$run = TrayCreateItem("Run")
$exit = TrayCreateItem("Exit")

Global $song = "no"

$player = GUICreate("MP3\WAV player", 119, 90, 192, 125, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_TOPMOST))
$play = GUICtrlCreateButton("Play", 3, 3, 58, 25)
$stop = GUICtrlCreateButton("Stop", 63, 3, 52, 25)
$open = GUICtrlCreateButton("Open", 63, 57, 52, 25)
$setvol = GUICtrlCreateButton("Set volume", 3, 30, 58, 25)
$close = GUICtrlCreateButton("Close", 63, 30, 52, 25)
$noterun = GUICtrlCreateButton("Notes", 3, 57, 58, 25)
$notes = GUICreate("Notes", 248, 264, 192, 125, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_TOPMOST))
$nedit= GUICtrlCreateEdit("", 3, 3, 241, 223, -1, $WS_EX_CLIENTEDGE)
$nclose = GUICtrlCreateButton("Close", 3, 228, 103, 25)
$setvolume = GUICreate("Set volume", 287, 50, 192, 125, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_TOPMOST))
$volslider = GUICtrlCreateSlider(6, 6, 280, 25)
GUICtrlSetData($volslider,100)
GUICtrlCreateLabel("Min", 12, 33, 21, 17)
GUICtrlCreateLabel("Max", 255, 30, 24, 17)
$volokay= GUICtrlCreateButton("OK", 126, 24, 34, 19)

GUISetState(@SW_HIDE, $setvolume)
GUISetState(@SW_SHOW,$player)
GUISetState(@SW_HIDE, $notes)

GUICtrlSetOnEvent( $exit , "_Exit" )
GUISetOnEvent( $GUI_EVENT_CLOSE , "_ExitHide" )
GUICtrlSetOnEvent( $close , "_ExitHide" )
GUICtrlSetOnEvent( $play , "_Play" )
GUICtrlSetOnEvent( $noterun , "_Note" )
GUICtrlSetOnEvent( $volokay , "_Vol" )
GUICtrlSetOnEvent( $stop , "_Soundplay" )
GUICtrlSetOnEvent( $nclose , "_nclose" )
GUICtrlSetOnEvent( $setvol , "_SetVol" )
GUICtrlSetOnEvent( $open , "_Open" )

Func  _Open()
    $song = FileOpenDialog("Open",@MyDocumentsDir,"MP3 files (*.mp3)|WAV files (*.wav)")
EndFunc

Func _SetVol()
    GUISetState(@SW_SHOW,$setvolume )
EndFunc

Func _nclose()
    $array=MouseGetPos()
    GuiSetState(@SW_HIDE, $notes )
EndFunc

Func _Soundplay()
    SoundPlay("")
EndFunc

FUnc _ExitHide()
    GuiSetState(@SW_HIDE, $player)
    GUISetState(@SW_HIDE, $setvolume)
    GUISetState(@SW_HIDE, $notes)
EndFunc

Func _Vol()
    SoundSetWaveVolume(GUICtrlRead( $volslider ) )
    GUISetState(@SW_HIDE,$setvolume)
EndFunc

Func _Note()
    GUISetState(@SW_SHOW, $notes)
EndFunc

Func _Play()
    If $song = "no" Then
        MsgBox(16,"No file to play","No file to play. Select OPEN command.")
    Else
        SoundPlay($song)
    EndIf   
EndFunc

Func _Exit()
    Exit
EndFunc

While 1
    $tmsg = TrayGetMsg()
    ToolTip("")
    Select
        Case $tmsg = $run
            GUISetState(@SW_HIDE, $setvolume)
            GUISetState(@SW_SHOW,$player)
            GUISetState(@SW_HIDE, $notes)
    EndSelect
WEnd

Here is the code without running through a big while loop. So it doesnt need much cpu

[Vicks]

maybe some skin, and you really need previous and back or else its not consider a meida player

[cppman]

previous and back button for it to be a media player? lol...

a media player can be as simple as opening a predefined file and playing it once then closing.

i don't have WinRAR or any other rar file programs, mind putting it as a .zip?

[Vicks]

not to be rude, but in my though of mind it isn't a media player without previous and next or atleast not a media player i would use, not trying to be mean you have a nice script but i have alot of music and im pretty lazy and well playing games it is hard work to keep opening up each song, but i like it maybe you can add thoses to functions if you would like, its just an idea

[jvanegmond]

Nice ! I marked with red all errors (probably with that " before zero script willn't run). But, I will add it in 1.1.

i542

Omg, you just said you wanted a simple media player. And you take the first change to get to put some more in then you don't really need.

[i542]

not to be rude, but in my though of mind it isn't a media player without previous and next or atleast not a media player i would use, not trying to be mean you have a nice script but i have alot of music and im pretty lazy and well playing games it is hard work to keep opening up each song, but i like it maybe you can add thoses to functions if you would like, its just an idea

Yes, I will think about that. Sorry, too busy , can't before sunday.

maybe some skin

How?

Here is the code without running through a big while loop. So it doesnt need much cpu

I don't prefer working in functions. CPU isn't big problem (except me... ).

i don't have WinRAR or any other rar file programs, mind putting it as a .zip?

I promiss next version in zip, or can download from www.download.com if want.

i542

[i542]

Omg, you just said you wanted a simple media player. And you take the first change to get to put some more in then you don't really need.

Yes, but I can put it in Set volume.

[jvanegmond]

Yes, but I can put it in Set volume.

Windows comes with a standard volume control. You are just editing this by the command you are using, so it's kind of double. I think you shouldn't do it if you want to keep it simple.

[i542]

Windows comes with a standard volume control. You are just editing this by the command you are using, so it's kind of double. I think you shouldn't do it if you want to keep it simple.

Yes, but that volume control has very big GUI, and isn't more better I have only one control for all?

i542

[jvanegmond]

Yes, but that volume control has very big GUI, and isn't more better I have only one control for all?

i542

Do you think 447 by 270 is very big for a window that can be turned on and off in the blink of an eye? I don't.

Plus, you can always just single click the volume tray.

Edit: (i'm just helping you getting this topic on top )

Edited July 15, 2006 by Manadar

[i542]

Do you think 447 by 270 is very big for a window that can be turned on and off in the blink of an eye? I don't.

Plus, you can always just single click the volume tray.

Edit: (i'm just helping you getting this topic on top )

No problem.

1.1 is NOT some special summer pack (you will get it for 7 days) but I've going at some island and can't develop nothing. For pack (.ZIP file!!!!!) look first post.

i542