Jump to content

Music PLayer


bang
 Share

Recommended Posts

A music player finnish!!

beta run then

#include <guiconstants.au3>
#include <Guilistview.au3>
HotKeySet("{pgup}","unhide")
$hwnd = GUICreate("PLAYER",670,541)
$addtoplaylist=GUICtrlCreateButton("Add file", 320, 500, 60, 30)
$asveplaylist=GUICtrlCreateButton("Save",460,500,60,30)
$removefromplaylist=GUICtrlCreateButton("Remove", 390, 500, 60, 30)
$unhidelabel=GUICtrlCreateLabel("Unhide agin un page up!!!!!!!!!!!!!!!!!!!!!!!",400,250)
$hider=GuiCtrlCreateButton("Hide", 330, 190, 330, 60)
$playlist=GUICtrlCreateListView("Name|Song",5, 15, 310, 500)
_GUICtrlListViewSetColumnWidth ($playlist, 0, 75)
_GUICtrllistviewsetcolumnWidth ($playlist,100,700)
$volumeslider=GUICtrlCreateSlider(360, 140, 290, 40)
GUICtrlSetLimit(-1,500,0)
GUICtrlSetData(-1,100,"")
$playbutton=GUICtrlCreateButton("Play",330, 50, 100, 60)
$stopbutton=GUICtrlCreateButton("Stop",560, 50, 100, 60)
GUICtrlCreateLabel("The playlist",0,0)
DllCall ( "user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 2000, "long", 0x00080000 )
GUISetState ( )

While  1
    $msg = GUIGetMsg()
Switch $msg

Case $volumeslider
    volume()

Case $playbutton
    $readsong= _GUICtrlListViewGetItemText ($playlist, -1, 1)
    SoundPlay($readsong)

Case $hider
    WinSetState("PLAYER","",@SW_HIDE)

Case $stopbutton
    SoundPlay("C:\STOP.mp3")

Case $GUI_EVENT_CLOSE
    exiter()

Case $removefromplaylist
    _GUICtrlListViewDeleteItemsSelected($playlist)

Case $addtoplaylist
    $thedialogaddfiles=FileOpenDialog("Open","C:\","(*.wma;*.Mp3;*.Wav;)")
    $Inputbox=InputBox("Name","Name on song")
    _GUICtrlListViewInsertItem($playlist,-1,$Inputbox&"|"&$thedialogaddfiles)

EndSwitch
WEnd

Func exiter()
DllCall ( "user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 2000, "long", 0x00090000 )
Exit
EndFunc

Func volume()
    SoundSetWaveVolume($volumeslider)
EndFunc

Func unhide()
    WinSetState("PLAYER","",@SW_SHOW)
EndFunc

Func Save()
EndFunc
Link to comment
Share on other sites

that slider doesnt work at so it should it set the wavevolume up to what u have selected

Edited by rambo3889
My Scripts:Radioblog Club Music DownloaderOther stuff:Fun movieIm serious read the help file it helps :PFight 'Till you drop. Never stop, You Cant give up. Til you reach the top Fight! you’re the best in town Fight!
Link to comment
Share on other sites

This is one of the reasons you cant use it on the school mother"#%¤"#

Edited by FuZi0h
[~FuZi0h~]ScriptRipping? = ┴¬┴¬┴┴¬ (My word for sucks.)'FuZi0h, Liope and Rambo3889 4-EvaHelp me by pressin This!all clicks appreciated :)
Link to comment
Share on other sites

BAng your are a !@#$ Ripper ! .. Stupid mother-!@#$ you dont know what i mean , but you post , Its from me , i am good ... NOOB !

Yes bang is a script ripper and he should be perm banned from this forum and it should be ip ban.. so we dont see hes face again
Link to comment
Share on other sites

thats just pathetic, bang.

i'm disappointed you even did it a secont time!

Thats the way!

but unfortunetly he does'nt care about others

Remember he made it all by "himself" :o he's so great :geek:

Edited by FuZi0h
[~FuZi0h~]ScriptRipping? = ┴¬┴¬┴┴¬ (My word for sucks.)'FuZi0h, Liope and Rambo3889 4-EvaHelp me by pressin This!all clicks appreciated :)
Link to comment
Share on other sites

HERE IS THE EVIDENCE that says it was me there made it:

Three pictures

1 says when i did made my autoit3 file on my desktop and show when it have be changed last

and that says that my autoit file was last changed before he made this post

Second is the source from that autoit3 file

3: is more source he have just changed my source a little bit and the

And i know that my func save() is different but that because when i send my file to bang then later i did change that save file

Edited by rambo3889
My Scripts:Radioblog Club Music DownloaderOther stuff:Fun movieIm serious read the help file it helps :PFight 'Till you drop. Never stop, You Cant give up. Til you reach the top Fight! you’re the best in town Fight!
Link to comment
Share on other sites

Guest
This topic is now closed to further replies.
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...