Jupelius Posted April 15, 2007 Posted April 15, 2007 Hi everyone, just registered here and this is my first post I have done few searchs but have found nothing so I made own thread about this. How to see current song playing in winamp with AutoIt? Do I need any .dlls to do it? I need only artist and song Thanks!
BrettF Posted April 15, 2007 Posted April 15, 2007 Hi everyone, just registered here and this is my first post I have done few searchs but have found nothing so I made own thread about this.How to see current song playing in winamp with AutoIt? Do I need any .dlls to do it?I need only artist and song Thanks!Try doing a google search on winamp + object. You should get something that can help you .... Vist my blog!UDFs: Opens The Default Mail Client | _LoginBox | Convert Reg to AU3 | BASS.au3 (BASS.dll) (Includes various BASS Libraries) | MultiLang.au3 (Multi-Language GUIs!)Example Scripts: Computer Info Telnet Server | "Secure" HTTP Server (Based on Manadar's Server)Software: AAMP- Advanced AutoIt Media Player | WorldCam | AYTU - Youtube Uploader Tutorials: Learning to Script with AutoIt V3Projects (Hardware + AutoIt): ArduinoUseful Links: AutoIt 1-2-3 | The AutoIt Downloads Section: | SciTE4AutoIt3 Full Version!
Jupelius Posted April 15, 2007 Author Posted April 15, 2007 I havent found anything about it. Someone knows how to do this?
Moderators big_daddy Posted April 16, 2007 Moderators Posted April 16, 2007 It's still pretty basic, but you should be able to get the information you need with this.Winamp Automation Library
jvanegmond Posted April 16, 2007 Posted April 16, 2007 (edited) Uhmm... The easy way: expandcollapse popup#include <ARray.au3> $a = WinampGet() If @error Then MsgBox(0, "", "no songs are played") Else MsgBox(0, "", $a) EndIf Func WinampGet() Opt("WinTitleMatchMode",2 ) $sTitle = WinGetTitle(" - Winamp") If $sTitle = 0 Then SetError(1) Return 0 ;no songs are being played. Else $sTitle = StringReplace($sTitle, " - Winamp", "") While 1 If StringLeft($sTitle,1) <> "." Then $sTitle = StringTrimLeft($sTitle,1) Else $sTitle = StringTrimLeft($sTitle,1) ExitLoop EndIf WEnd $string = StringSplit($sTitle, " - ", 1) If StringRight($string[2], 8) = "[Paused]" Then $string[2] = StringTrimRight($string[2], 9) ElseIf StringRight($string[2], 9) = "[Stopped]" Then $string[2] = StringTrimRight($string[2], 10) EndIf $string[1] = StringStripWS($string[1],7) ;artist $string[2] = StringStripWS($string[2],7) ;song Return $string[2] EndIf EndFunc This is some of my ancient stuff.. Edited April 16, 2007 by Manadar github.com/jvanegmond
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