Sign in to follow this  
Followers 0
Serendipity

Pandora current song playing to Ventrilo comment

2 posts in this topic

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

Share this post


Link to post
Share on other sites



Nvm... I figured it out just had to get the right hex codes.

Share this post


Link to post
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
Sign in to follow this  
Followers 0