Thatsgreat2345 Posted January 2, 2006 Share Posted January 2, 2006 Yes I know their are other topics and i was looking at them but they didnt help me cuz lazy cats thingy was down and the whole mcisendstring larry made didnt work for mp3's so does anyone have any suggestions using DLL calls but which DLLs? heres my code expandcollapse popup#NoTrayIcon #include <GuiConstants.au3> GuiCreate("Music Player", 309, 76,(@DesktopWidth-309)/2, (@DesktopHeight-76)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) GUISetBkColor (0x000000) $Play = GuiCtrlCreateButton("Play", 10, 10, 50, 20) $Song = GuiCtrlCreateButton("Search", 70, 10, 50, 20) $Mute = GuiCtrlCreateButton("Mute", 130, 10, 50, 20) $stop = GuiCtrlCreateButton("Stop", 190, 10, 50, 20) $exit = GuiCtrlCreateButton("Exit", 250, 10, 50, 20) $slider = GUICtrlCreateSlider (150,50,100,40) GUICtrlSetData($Slider,100) GUICtrlSetLimit ($Slider,100,0) $Label_8 = GuiCtrlCreateLabel("Thatsgreat2345", 10, 50, 80, 20) GUICtrlSetColor(-1,0xff0000) GUICtrlSetResizing (-1,$GUI_DOCKLEFT) GuiSetState() func stop() while 1 sleep(100) wend endfunc Do $msg = GUIGetMsg () Select Case $msg = $stop soundplay("C:\exit.mp3") Case $msg = $Song $playsong=FileOpenDialog ("Choose music", "", "Musicfiles(*.mp3;*.wma;*.wav;*.wave;*.mid;*)") Case $msg = $play Soundplay ($playsong) Case $msg = $Mute send("{VOLUME_MUTE}") Case $msg = $slider SoundSetWaveVolume (GUICtrlRead($slider)) Case $msg = $exit exit EndSelect Until $msg = $GUI_EVENT_CLOSE Link to comment Share on other sites More sharing options...
Helge Posted January 2, 2006 Share Posted January 2, 2006 (edited) Haven't bothered to upload a newer version, but here's some UDFs I made some while ago..They do work with SoundPlay so they shouldn't be all that difficult to use. Good luck.Edit : files deleted... get them http://www.autoitscript.com/fileman/users/Helge/udfs.htm#sound instead. Edited June 24, 2006 by Helge Link to comment Share on other sites More sharing options...
Simucal Posted June 24, 2006 Share Posted June 24, 2006 Haven't bothered to upload a newer version, but here's some UDFs I made some while ago.. They do work with SoundPlay so they shouldn't be all that difficult to use. Good luck. Sound.au3 Sound_test.au3 Mwuahaha... nothing like bringing posts from 7 months ago back from the dead. In case anyone else needs this, try: #include <extprop.au3> $path = FileOpenDialog("Select a file to read attributes",@ScriptDir,"All (*.*)") $prop = _GetExtProperty($path,21) ConsoleWrite("Duration: "&$prop&@CRLF) Get extprop.au3 from: http://www.autoitscript.com/forum/index.php?showtopic=25859 AutoIt Scripts:Aimbot: Proof of Concept - PixelSearching Aimbot with several search/autoshoot/lock-on techniques.Sliding Toolbar - Add a nice Sliding Toolbar to your next script. Click the link to see an animation of it in action!FontInfo UDF - Get list of system fonts, or search to see if a particular font is installed.Get Extended Property UDF - Retrieve a files extended properties (e.g., video/image dimensions, file version, bitrate of song/video, etc) Link to comment Share on other sites More sharing options...
Xenobiologist Posted June 24, 2006 Share Posted June 24, 2006 Hi Simucal, I like your func. Works great! I use it to get a printable playlist of mp3 CDs with Nr., songname, length ... So long, Mega Scripts & functions Organize Includes Let Scite organize the include files Yahtzee The game "Yahtzee" (Kniffel, DiceLion) LoginWrapper Secure scripts by adding a query (authentication) _RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...) Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc. MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times Link to comment Share on other sites More sharing options...
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