Jump to content

Pandora current song playing to Ventrilo comment


Recommended Posts

Hello everyone I have searched and searched for a script to grab Pandora or Last.fm window title and post it in my vent comment for my music bot but I have not been successful. I have found 1 script but when I compile it and run it I get nothing at all it doesn't seem to be doing anything accept running in the background. Ill post the script below if anyone could help me to edit this thing to work properly I would really appreciate that.

Opt("WinTitleMatchMode", 2)
Global $lastfm, $previous, $Paused, $hwndvent, $hwndlast
HotKeySet("{ESC}", "TogglePause")

Func TogglePause()
$Paused = NOT $Paused
While $Paused
ToolTip("Press ESC to continue or ALT+ESC to stop the script.",0,0)
HotKeySet("!{ESC}", "Exitt")
sleep(100)
WEnd
ToolTip("")
EndFunc

Func Exitt()
Exit
EndFunc



Func TitleUpdate()
$hwndvent = (HWND(0x0001098C))
$hwndlast = (HWND(0x00040828))
ControlClick($hwndvent, "Comment", 1060)
sleep(500)
$lastfm = WinGetTitle($hwndlast)
ControlSend("Comment - Advanced ", "", "", $lastfm & " @ Last.FM" )
sleep(500)
ControlClick("Comment - Advanced", "OK", 1)
sleep(4000)
$previous = $lastfm
EndFunc

While 1
if $previous = WinGetTitle($hwndlast) Then
Sleep (10000)
Else
TitleUpdate()
EndIf

wend

Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

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