Sign in to follow this  
Followers 0

Auto Tunes

10 posts in this topic

Posted (edited)

#include <GUIConstants.au3>
#include <Misc.au3>
$win = WinGetTitle( "" )
$pos = WinGetPos( $win )
$Object = ObjCreate("iTunes.Application")
$Form1 = GUICreate("auto tunes", 45, 15, $pos[2]+$pos[0]-(@DesktopWidth/10), $pos[1]+4, BitOR ($WS_POPUP,$WS_BORDER))
$Button1 = GUICtrlCreateButton("<<", 0, 0, 15, 15, 0)
$Button2 = GUICtrlCreateButton(">", 15, 0, 15, 15, 0)
$Button3 = GUICtrlCreateButton(">>", 30, 0, 15, 15, 0)
GUISetState(@SW_SHOW)
WinActivate( $win )
AdlibEnable( "move" )
While 1
    $nMsg = GUIGetMsg()
    Select
        Case $GUI_EVENT_CLOSE = $nMsg
            Exit
        Case $Button1 = $nMsg Or _IsPressed("B1")
            $Object.PreviousTrack
        Case $Button2 = $nMsg Or _IsPressed("B3")
            $Object.PlayPause
            Sleep(300)
        Case $Button3 = $nMsg Or _IsPressed("B0")
            $Object.NextTrack
    EndSelect
WEnd
Func move()
    WinSetOnTop( HWnd($Form1), "", 1 )
    $win = WinGetTitle( "" )
    If $win = "Program Manager" Or $win = "Start Menu"  Then
        WinMove( HWnd($Form1), "", @DesktopWidth-@DesktopWidth/18, @DesktopHeight-@DesktopHeight/15)
    ElseIf $win = "auto tunes" Or $win = "" Then
        ;do nothing
    Else
        $pos = WinGetPos( $win )
        WinMove( HWnd($Form1), "", $pos[2]+$pos[0]-(@DesktopWidth/10), $pos[1]+4 )
    EndIf
EndFunc

Edited by www.CyberZeroCool.com

Share this post


Link to post
Share on other sites



Posted

nice ;)

Works fine with me :lmao:

Share this post


Link to post
Share on other sites

Posted

Looks good, too bad I don't have iTunes.

Share this post


Link to post
Share on other sites

Posted

hehe nice idea. i like it. works fine... except when u switch to desktop the gui is sometiomes there and sometimes not.

Share this post


Link to post
Share on other sites

Posted

I like this, its really simple and great.

Share this post


Link to post
Share on other sites

Posted (edited)

@gafrost

That is a cool program but this is supposed to be simpler

@ALL

Thanks guys, I will work on the desktop thing.

Edited by www.CyberZeroCool.com

Share this post


Link to post
Share on other sites

Posted

Updated code: check first post.

When your on the desktop or start menu it will site by the clock.

When you are on auto tuner or a window with no name it will not do anything.

let me know if there are problems with placement. My screen is 1280X1024

Share this post


Link to post
Share on other sites

Posted

Thats better, but my screen res is at 1400 x 1050

Share this post


Link to post
Share on other sites

Posted

Thats better, but my screen res is at 1400 x 1050

what is the problem with your? it should work on all screens.

UPDATED AGAIN: check first post.

I remove the pause and changed the play to "PlayPause"

AND...

I add the ability to play, pause, next, and previous from your keyboard media keys. I tunes already has this but you have to be in i tunes for it to work. Now it always works.

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

  • Recently Browsing   0 members

    No registered users viewing this page.