AutoHotkey Homepage AutoHotkey Community
Let's help each other out
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

CornerAmp !!!
Goto page 1, 2  Next
 
Post new topic   Reply to topic    AutoHotkey Community Forum Index -> Scripts & Functions
View previous topic :: View next topic  
Author Message
compuboy_r



Joined: 04 May 2004
Posts: 68

PostPosted: Fri Sep 03, 2004 12:38 pm    Post subject: CornerAmp !!! Reply with quote

Just run this script and move your mouse pointer to the Top-Left corner of the screen

Code:
#Persistent
;#InstallMouseHook force
DetectHiddenWindows, On
CoordMode,Mouse ,Screen
SetTitleMatchMode, 2
SetTimer, Mouse ,200
wincue = 0
;-------------- READ WINAMP PATH FROM REGISTRY -----------

RegRead, winamppath, HKLM,Software\Compuboy\CornerAmp,WinampPath
ifNotExist %winamppath%\winamp.exe
{
   FileSelectFolder,winamppath,,0,Select Winamp Directory (Must Contain Winamp.exe)
   ifnotExist %winamppath%\winamp.exe
   {
   MsgBox,0,Error,Winamp Not Found
   Exitapp
   }
   RegWrite,REG_SZ,HKEY_LOCAL_MACHINE,Software\Compuboy\CornerAmp,WinampPath,%winamppath%
   winamppath = %winamppath%
}

;------------ GENERATE THE WINAMP PLAYBACK MENU

Menu,PlayBack,Add,Prevous,prevtrack
Menu,PlayBack,Add,Play,playpause
Menu,PlayBack,Add,Pause,playpause
Menu,PlayBack,Add,Stop,stop
Menu,PlayBack,Add,Next,nexttrack
Menu,PlayBack,Add,
Menu,PlayBack,Add,Stop w/ fadeout,stopfade
Menu,PlayBack,Add,Stop after current,stopafter
Menu,PlayBack,Add,Back 5 seconds,seekback
Menu,PlayBack,Add,Fwd 5 seconds,seekforward
Menu,PlayBack,Add,Start of list,liststart
Menu,PlayBack,Add,End of list,listend
Menu,PlayBack,Add,
Menu,PlayBack,Add,10 tracks back,trackback
Menu,PlayBack,Add,10 tracks fwd,trackfwd
Menu,PlayBack,Add,
Menu,PlayBack,Add,Jump to time,jumptime
Menu,PlayBack,Add,Jump to file,jumpfile



;---------GENERATE THE PLAY MENU

Menu,Play,Add,File...,playfile
Menu,Play,Add,Url...,playurl
Menu,Play,Add,Folder...,playfolder






return

;---------------- END OF INITIALISATION---------




show:
;------------ CHECK WHETHER WINAMP IS RUNNING OR NOT
IfWinNotExist ahk_class Winamp v1.x
{
   Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-,Execute
   Menu,playlist,disable,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-
   Menu,playlist,add
   Menu,playlist,add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Run Winamp,runclose
   Menu,Playlist,show
   Menu,Playlist,DeleteAll
   return
}
;------------GENERATE WINCUE MENU
ifwinexist,ahk_class WinCue
{
   wincue = 1
   ControlGetText,wincueedit,Edit1,ahk_class WinCue
   Menu,Wincue,Add,Current Search - %wincueedit%,changewincue
   Menu,Wincue,Add,Change Search,changewincue
   Menu,Wincue,disable,Current Search - %wincueedit%
   Menu,Wincue,add,Show Wincue,showwincue
}
else
wincue = 0


;-------------------- CREATE TOP ENTRIES OF CORNER AMP MENU
index = 1
Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-,Execute
Menu,playlist,disable,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-
Menu,playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%PlayBack,:PlayBack
Menu,playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Play,:Play
if wincue = 1
   Menu,playlist,add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Wincue,:Wincue
Menu,playlist,add
Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: Winamp Playlist `:`:-,Execute
Menu,playlist,disable,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: Winamp Playlist `:`:-

;-------------------- GET THE CURRENT SONG FROM WINAMP AND MAKE IT WRITE WINAMP.M3U

SendMessage, 0x400, 0, 120,,ahk_class Winamp v1.x
SendMessage, 0x400, , 125,,ahk_class Winamp v1.x
   current = %errorlevel%
   current++

;-------- READ WINAMP.M3U AND ADD TO MENU
Loop, Read,%winamppath%\Winamp.m3u
{
   IfInString, A_LoopReadLine, #EXTINF
   {   
      StringGetPos, pos,A_LoopReadLine,`,
      pos++
      StringTrimLeft, item,A_LoopReadLine,%pos%
      StringLeft,item,item,33
      if index = %current%             ;CHECK WHETHER THE SONG IS CURRENT OR NOT
      {
         Menu,Playlist,Add,->%index%.%A_SPACE%%item%,Execute
      }
      else
      {
         Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%%index%.%A_SPACE%%item%,Execute
      }
      index++
   }
      
}
   Menu,Playlist,Add
   Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Clear Winamp Playlist,ClearPL
   Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Exit Winamp,runclose
   Menu,Playlist,show      ;SHOW MENU
   Menu,Playlist,DeleteAll      ;CLEAR ALL MENU ITEMS
   if wincue = 1
      Menu,Wincue,DeleteAll
return

Execute:
   StringGetPos, pos2,A_ThisMenuItem,.,
   StringLeft,listindex,A_ThisMenuItem,%pos2%     ;EXTRACT THE SONG NUMBER
   StringReplace,listindex,listindex,->,
   listindex--
   PostMessage, 0x400, %listindex%, 121,,ahk_class Winamp v1.x      ;ASK WINAMP TO PLAY SONG
   PostMessage, 0x111, 40045,,,ahk_class Winamp v1.x

return   

;-------- CHECK IF MOUSE IS ON THE TOP MOST CORNER
Mouse:
   MouseGetPos,x,y
   If x < 5
      If y < 5
         Goto show
return

;----- CLEAR WINAMP PLAYLIST

ClearPL:
   SendMessage, 0x400, 0, 101,,ahk_class Winamp v1.x
return







;___________WINAMP PART


;___________PLAY/PAUSE
;^!MButton::
playpause:
SendMessage, 0x400,0,104,,ahk_class Winamp v1.x
   if errorlevel = 0
   {
   SendMessage, 0x111,40045,,,ahk_class Winamp v1.x
   }
   
   else
   {
   SendMessage, 0x111,40046,,,ahk_class Winamp v1.x
   }

return

;____________PREVIOUS TRACK
;^!LButton::
prevtrack:
   PostMessage, 0x111,40044,,,ahk_class Winamp v1.x
return

;_______________NEXT TRACK
;^!RButton::
nexttrack:
   PostMessage, 0x111,40048,,,ahk_class Winamp v1.x
return

;_______________STOP
;^+MButton::
stop:
   PostMessage, 0x111,40047,,,ahk_class Winamp v1.x
return

;_______________STOPFADE

stopfade:
   PostMessage, 0x111,40147,,,ahk_class Winamp v1.x
return


;_______________STOP AFTER CURRENT

stopafter:
   PostMessage, 0x111,40157,,,ahk_class Winamp v1.x
return





;_______________RUN/CLOSE WINAMP
;^+!MButton::
runclose:
   IfWinExist ,ahk_class Winamp v1.x
   {
   PostMessage, 0x111,40001,,,ahk_class Winamp v1.x
   }

   else
   {
   run,%winamppath%\winamp.exe ;change winamp path here
   }
return

;_________________SEEK FORWARD
;^+RButton::
seekforward:
   SendMessage, 0x400,0,105,,ahk_class Winamp v1.x
   if errorlevel <> -1
   {
   errorlevel += 5000
   PostMessage, 0x400,%errorlevel%,106,,ahk_class Winamp v1.x
   }
return

;__________________SEEK BACKWARD
;^+LButton::
seekback:
   SendMessage, 0x400,0,105,,ahk_class Winamp v1.x
   if errorlevel <> -1
   {
   errorlevel -= 5000
   PostMessage, 0x400,%errorlevel%,106,,ahk_class Winamp v1.x
   }
return



;_______________LIST START

liststart:
   PostMessage, 0x111,40154,,,ahk_class Winamp v1.x
return


;_______________LIST END

listend:
   PostMessage, 0x111,40158,,,ahk_class Winamp v1.x
return


;_______________TRACK BACK

trackback:
   PostMessage, 0x111,40197,,,ahk_class Winamp v1.x
return


;_______________TRACK FWD

trackfwd:
   SendMessage, 0x400, , 125,,ahk_class Winamp v1.x
   current = %errorlevel%
   current += 10
   PostMessage, 0x400, %current%, 121,,ahk_class Winamp v1.x
   PostMessage, 0x111, 40045,,,ahk_class Winamp v1.x
return

;_______________JUMP TIME

jumptime:
   PostMessage, 0x111,40193,,,ahk_class Winamp v1.x
return

;_______________JUMP FILE
jumpfile:
   PostMessage, 0x111,40194,,,ahk_class Winamp v1.x
return

;______________PLAY FILE
playfile:
   PostMessage, 0x111,40029,,,ahk_class Winamp v1.x
return
   
;_____________PLAY URL
playurl:
   PostMessage, 0x111,40155,,,ahk_class Winamp v1.x
return


playfolder:
   FileSelectFolder, foltoplay,,0,Select the Song Folder
   run,%winamppath%\winamp.exe "%foltoplay%"
return
;__________________END WINAMP



;____________________WINCUE

changewincue:
   InputBox,wincuesearch,Wincue,Enter the seach string,,180,115
   ControlSetText,Edit1,%wincuesearch%,ahk_class WinCue
return

showwincue:
   Winshow,ahk_class WinCue
return
Back to top
View user's profile Send private message
Chris
Site Admin


Joined: 02 Mar 2004
Posts: 10480

PostPosted: Fri Sep 03, 2004 5:26 pm    Post subject: Reply with quote

My impression is that this allows you to control Winamp without its window having to be active. Sounds like a great thing for gamers.

In any case, it's very elaborate. Thanks for sharing it.
Back to top
View user's profile Send private message Send e-mail
Rajat



Joined: 28 Mar 2004
Posts: 1718

PostPosted: Fri Sep 03, 2004 8:08 pm    Post subject: Reply with quote

works great!
very nice script.
_________________
Back to top
View user's profile Send private message
compuboy_r



Joined: 04 May 2004
Posts: 68

PostPosted: Sun Sep 05, 2004 4:15 am    Post subject: New CornerAmp!!! Reply with quote

New CornerAmp!!!

Added Playlist Support.

Just Change the Playlist Folder ( using the tray icon ) to the folder where u have kept all your favourite .M3U Playlists.

Now Move Your Mouse to TopLeft Corner of the Screen

***** Please Download the Latest Version of AutoHotkey ( With Menu Bug Fixed before using This Script ******

For a More Better Version see this
www.dhost.info/compuboy/controlamp


Code:
#Persistent
DetectHiddenWindows, On
CoordMode,Mouse ,Screen
SetTitleMatchMode, 2
SetTimer, Mouse ,200
wincue = 0
;-------------- READ WINAMP PATH FROM REGISTRY -----------

RegRead, winamppath, HKLM,Software\Compuboy\CornerAmp,WinampPath
ifNotExist %winamppath%\winamp.exe
{
   FileSelectFolder,winamppath,,0,Select Winamp Directory (Must Contain Winamp.exe)
   ifnotExist %winamppath%\winamp.exe
   {
   MsgBox,0,Error,Winamp Not Found
   Exitapp
   }
   RegWrite,REG_SZ,HKEY_LOCAL_MACHINE,Software\Compuboy\CornerAmp,WinampPath,%winamppath%
   winamppath = %winamppath%
}

;_________________ WORK WITH MY PLAYLISTS

RegRead, plfolder,HKCU,Software\Compuboy\ControlAmp,PlayListFolder

Menu,tray,NoStandard
Menu,tray,add,PlayListFolder %plfolder%,changeplfol
Menu,tray,disable,PlayListFolder %plfolder%
Menu,tray,add,Change PlayListFolder,changeplfol
Menu,tray,add,Update PlayLists,MyPlaylist
Menu,MyPlaylist,Add,Playlist,Myplaylist
Menu,MyPlaylist,disable,Playlist
Menu,tray,Add,Exit,Exitapp

;------------ GENERATE THE WINAMP PLAYBACK MENU

Menu,PlayBack,Add,Prevous,prevtrack
Menu,PlayBack,Add,Play,playpause
Menu,PlayBack,Add,Pause,playpause
Menu,PlayBack,Add,Stop,stop
Menu,PlayBack,Add,Next,nexttrack
Menu,PlayBack,Add,
Menu,PlayBack,Add,Stop w/ fadeout,stopfade
Menu,PlayBack,Add,Stop after current,stopafter
Menu,PlayBack,Add,Back 5 seconds,seekback
Menu,PlayBack,Add,Fwd 5 seconds,seekforward
Menu,PlayBack,Add,Start of list,liststart
Menu,PlayBack,Add,End of list,listend
Menu,PlayBack,Add,
Menu,PlayBack,Add,10 tracks back,trackback
Menu,PlayBack,Add,10 tracks fwd,trackfwd
Menu,PlayBack,Add,
Menu,PlayBack,Add,Jump to time,jumptime
Menu,PlayBack,Add,Jump to file,jumpfile



;---------GENERATE THE PLAY MENU

Menu,Play,Add,File...,playfile
Menu,Play,Add,Url...,playurl
Menu,Play,Add,Folder...,playfolder




ifexist %plfolder%\*.m3u
   goto, MyPlaylist
else
   Menu,tray,disable,Update PlayLists
return

;---------------- END OF INITIALISATION---------




show:
;------------ CHECK WHETHER WINAMP IS RUNNING OR NOT

IfWinNotExist ahk_class Winamp v1.x
{
   Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-,Execute
   Menu,playlist,disable,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-
   Menu,playlist,add
   Menu,playlist,add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%MyPlaylists,:MyPlaylist
   Menu,playlist,add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Update PlayLists,MyPlaylist
   Menu,playlist,add
   Menu,playlist,add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Run Winamp,runclose
   Menu,Playlist,show
   Menu,Playlist,DeleteAll
   return
}
;------------GENERATE WINCUE MENU
ifwinexist,ahk_class WinCue
{
   wincue = 1
   ControlGetText,wincueedit,Edit1,ahk_class WinCue
   Menu,Wincue,Add,Current Search - %wincueedit%,changewincue
   Menu,Wincue,Add,Change Search,changewincue
   Menu,Wincue,disable,Current Search - %wincueedit%
   Menu,Wincue,add,Show Wincue,showwincue
}
else
wincue = 0


;-------------------- CREATE TOP ENTRIES OF CORNER AMP MENU
index = 1
Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-,Execute
Menu,playlist,disable,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: CornerAmp Playlist `:`:-
Menu,playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%PlayBack,:PlayBack
Menu,playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Play,:Play
if wincue = 1
   Menu,playlist,add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Wincue,:Wincue
Menu,playlist,add
Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%My Playlists,:MyPlaylist
Menu,playlist,add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Update PlayLists,MyPlaylist
Menu,playlist,add

Menu,Winamp Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: Winamp Playlist `:`:-,Execute
Menu,Winamp playlist,disable,%A_SPACE%%A_SPACE%%A_SPACE%-`:`: Winamp Playlist `:`:-

;-------------------- GET THE CURRENT SONG FROM WINAMP AND MAKE IT WRITE WINAMP.M3U

SendMessage, 0x400, 0, 120,,ahk_class Winamp v1.x
SendMessage, 0x400, , 125,,ahk_class Winamp v1.x
   current = %errorlevel%
   current++

;-------- READ WINAMP.M3U AND ADD TO MENU
Loop, Read,%winamppath%\Winamp.m3u
{
   IfInString, A_LoopReadLine, #EXTINF
   {   
      StringGetPos, pos,A_LoopReadLine,`,
      pos++
      StringTrimLeft, item,A_LoopReadLine,%pos%
      StringLeft,item,item,33
      if index = %current%             ;CHECK WHETHER THE SONG IS CURRENT OR NOT
      {
         Menu,Winamp Playlist,Add,->%index%.%A_SPACE%%item%,Execute
      }
      else
      {
         Menu,Winamp Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%%index%.%A_SPACE%%item%,Execute
      }
      index++
   }
      
}
   
   ;Menu,Playlist,Add
   
   Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Winamp Playlist,:Winamp Playlist
   Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Clear Winamp Playlist,ClearPL
   Menu,Playlist,Add,%A_SPACE%%A_SPACE%%A_SPACE%%A_SPACE%Exit Winamp,runclose
   
   
   Menu,Playlist,show      ;SHOW MENU
   Menu,Playlist,DeleteAll
   Menu,Winamp Playlist,DeleteAll      ;CLEAR ALL MENU ITEMS
   if wincue = 1
      Menu,Wincue,DeleteAll
return

Execute:
   StringGetPos, pos2,A_ThisMenuItem,.,
   StringLeft,listindex,A_ThisMenuItem,%pos2%     ;EXTRACT THE SONG NUMBER
   StringReplace,listindex,listindex,->,
   listindex--
   PostMessage, 0x400, %listindex%, 121,,ahk_class Winamp v1.x      ;ASK WINAMP TO PLAY SONG
   PostMessage, 0x111, 40045,,,ahk_class Winamp v1.x

return   

;-------- CHECK IF MOUSE IS ON THE TOP MOST CORNER
Mouse:
   MouseGetPos,x,y
   If x < 3
      If y < 3
         Goto show
return

;----- CLEAR WINAMP PLAYLIST

ClearPL:
   SendMessage, 0x400, 0, 101,,ahk_class Winamp v1.x
return







;___________WINAMP PART


;___________PLAY/PAUSE
;^!MButton::
playpause:
SendMessage, 0x400,0,104,,ahk_class Winamp v1.x
   if errorlevel = 0
   {
   SendMessage, 0x111,40045,,,ahk_class Winamp v1.x
   }
   
   else
   {
   SendMessage, 0x111,40046,,,ahk_class Winamp v1.x
   }

return

;____________PREVIOUS TRACK
;^!LButton::
prevtrack:
   PostMessage, 0x111,40044,,,ahk_class Winamp v1.x
return

;_______________NEXT TRACK
;^!RButton::
nexttrack:
   PostMessage, 0x111,40048,,,ahk_class Winamp v1.x
return

;_______________STOP
;^+MButton::
stop:
   PostMessage, 0x111,40047,,,ahk_class Winamp v1.x
return

;_______________STOPFADE

stopfade:
   PostMessage, 0x111,40147,,,ahk_class Winamp v1.x
return


;_______________STOP AFTER CURRENT

stopafter:
   PostMessage, 0x111,40157,,,ahk_class Winamp v1.x
return





;_______________RUN/CLOSE WINAMP
;^+!MButton::
runclose:
   IfWinExist ,ahk_class Winamp v1.x
   {
   PostMessage, 0x111,40001,,,ahk_class Winamp v1.x
   }

   else
   {
   run,%winamppath%\winamp.exe ;change winamp path here
   }
return

;_________________SEEK FORWARD
;^+RButton::
seekforward:
   SendMessage, 0x400,0,105,,ahk_class Winamp v1.x
   if errorlevel <> -1
   {
   errorlevel += 5000
   PostMessage, 0x400,%errorlevel%,106,,ahk_class Winamp v1.x
   }
return

;__________________SEEK BACKWARD
;^+LButton::
seekback:
   SendMessage, 0x400,0,105,,ahk_class Winamp v1.x
   if errorlevel <> -1
   {
   errorlevel -= 5000
   PostMessage, 0x400,%errorlevel%,106,,ahk_class Winamp v1.x
   }
return



;_______________LIST START

liststart:
   PostMessage, 0x111,40154,,,ahk_class Winamp v1.x
return


;_______________LIST END

listend:
   PostMessage, 0x111,40158,,,ahk_class Winamp v1.x
return


;_______________TRACK BACK

trackback:
   PostMessage, 0x111,40197,,,ahk_class Winamp v1.x
return


;_______________TRACK FWD

trackfwd:
   SendMessage, 0x400, , 125,,ahk_class Winamp v1.x
   current = %errorlevel%
   current += 10
   PostMessage, 0x400, %current%, 121,,ahk_class Winamp v1.x
   PostMessage, 0x111, 40045,,,ahk_class Winamp v1.x
return

;_______________JUMP TIME

jumptime:
   PostMessage, 0x111,40193,,,ahk_class Winamp v1.x
return

;_______________JUMP FILE
jumpfile:
   PostMessage, 0x111,40194,,,ahk_class Winamp v1.x
return

;______________PLAY FILE
playfile:
   PostMessage, 0x111,40029,,,ahk_class Winamp v1.x
return
   
;_____________PLAY URL
playurl:
   PostMessage, 0x111,40155,,,ahk_class Winamp v1.x
return


playfolder:
   FileSelectFolder, foltoplay,,0,Select the Song Folder
   ifexist %foltoplay%
      run,%winamppath%\winamp.exe "%foltoplay%"
return
;__________________END WINAMP



;____________________WINCUE

changewincue:
   InputBox,wincuesearch,Wincue,Enter the seach string,,180,115
   ControlSetText,Edit1,%wincuesearch%,ahk_class WinCue
return

showwincue:
   Winshow,ahk_class WinCue
return



MyPlaylist:

Menu,MyPlaylist,DeleteAll
Loop, %plfolder%\*.m3u ,0,0
{
   
   StringReplace, menutitle,A_LoopFileName,.m3u
   index = 1      
   Loop, Read,%A_LoopFileFullPath%
   {
      Menu,%menutitle%,Add,- `:`: Play All `:`: -,ExecutePL 
      IfInString, A_LoopReadLine, #EXTINF
      {   
         StringGetPos, pos,A_LoopReadLine,`,
         pos++
         StringTrimLeft, item,A_LoopReadLine,%pos%
         StringLeft,item,item,33
         Menu,%menutitle%,Add,%index%.%A_SPACE%%item%,ExecuteMyPL
         index++
      }
         
   }

   Menu,MyPlaylist,Add,%menutitle%,:%menutitle%

}
return


ExecuteMyPL:
index = 1
ThisMenuItem = %A_ThisMenuItem%
ThisMenu = %A_ThisMenu%
StringGetPos,pos,ThisMenuItem,.
StringLeft,filepos,ThisMenuItem,%pos%


   Loop,Read,%plfolder%\%ThisMenu%.m3u
   {
      temp = %index%
      temp--
      If filepos = %temp%
      {
               Run %winamppath%\winamp.exe "%A_LoopReadLine%",%plfolder%
               break
      }
      
      IfinString,A_LoopReadLine,#EXTINF
         index++
   }
return


changeplfol:
   FileSelectFolder,newplfol,,2,Select Folder for PlayLists
   RegWrite,REG_SZ,HKCU,Software\Compuboy\ControlAmp,PlayListFolder,%newplfol%
   if plfolder = %newplfol%
   {
   }
   else
   {
      Menu,tray,rename,PlayListFolder %plfolder%,PlayListFolder %newplfol%
      Menu,tray,disable,PlayListFolder %newplfol%
      plfolder = %newplfol%
   }
   
   ifexist %plfolder%\*.m3u
   {
      gosub, MyPlaylist
      Menu,tray,enable,Update PlayLists
   }
   else
      Menu,tray,disable,Update PlayLists
return


ExecutePL:
   Run %winamppath%\winamp.exe "%plfolder%\%A_ThisMenu%.m3u",%plfolder%
return

Exitapp:
   Exitapp
return
Back to top
View user's profile Send private message
Chris
Site Admin


Joined: 02 Mar 2004
Posts: 10480

PostPosted: Sun Sep 05, 2004 2:10 pm    Post subject: Reply with quote

I tried it and it's very nice. You probably have some more refinements in mind for it. For example: 1) Having a configuration section at the top that allows hotkeys to be optionally specfied for the various functions (and preferably shown to the right of the corresponding menu item as a reminder); 2) Some basic instructions to help someone jump right in and start using it.

Update: I visitied your page and saw that you have extensive instructions and usage info there. If you would like, I can post a link from the script showcase to your page.
Back to top
View user's profile Send private message Send e-mail
compuboy_r



Joined: 04 May 2004
Posts: 68

PostPosted: Sun Sep 05, 2004 5:42 pm    Post subject: Reply with quote

Thanks for visiting my page.

Yes, you can any time add link to my page.

Hmm.., that configuration section ok i will do it but i think it would take some time as right now i m busy preparing for my exams, but would do it as soon as i get time.

compuboy_r
Back to top
View user's profile Send private message
compuboy_r



Joined: 04 May 2004
Posts: 68

PostPosted: Mon Sep 06, 2004 8:21 pm    Post subject: Reply with quote

I have implemented the DirMenu to ControlAmp.

The current one is available for download at

www.dhost.info/compuboy

compuboy_r[/url]
Back to top
View user's profile Send private message
Wingfat



Joined: 23 Aug 2004
Posts: 193
Location: East Bay, California USA

PostPosted: Wed Sep 15, 2004 6:25 pm    Post subject: Reply with quote

Can this be done for other music programs insetead of WinAmp? I used to love WinAmp but now after version 2.5 there has been way way too much spy ware and background apps that go with it. I would like something like this script for maybe Window Media player (even though I got voice command set up for it) or maybe for Music Match JukeBox, well maybe not Music Match now they have been bought out by Yahoo. Cool
Back to top
View user's profile Send private message
compuboy_r



Joined: 04 May 2004
Posts: 68

PostPosted: Wed Sep 15, 2004 6:44 pm    Post subject: Reply with quote

SPYWARE in Winamp 5.05 !!!! Shocked

By The Way, for juke box and other players this script wont work and i will have to see to it that are other players controlable.

All things except Winamp Playlist might be done easily.
Back to top
View user's profile Send private message
Wingfat



Joined: 23 Aug 2004
Posts: 193
Location: East Bay, California USA

PostPosted: Wed Sep 15, 2004 6:48 pm    Post subject: Reply with quote

cool thanks for the info.
And yes Spyware in WInamp from version 3 on up.
Back to top
View user's profile Send private message
Jon



Joined: 28 Apr 2004
Posts: 373

PostPosted: Wed Sep 15, 2004 7:35 pm    Post subject: Reply with quote

Hi Wingfat, Where have you heard that there is spyware in winamp?
Back to top
View user's profile Send private message Send e-mail
Wingfat



Joined: 23 Aug 2004
Posts: 193
Location: East Bay, California USA

PostPosted: Wed Sep 15, 2004 8:17 pm    Post subject: Reply with quote

Websense website has some info on the Spyware in winamp. Plus i am a NetWork admin and the Guy that works above me is very very strict on what user can put on their systems. He has also said that winamp was now full of spyware. My spybot Search and Destroy aslo finds left over stuff after a fresh install of it.
Back to top
View user's profile Send private message
Jon



Joined: 28 Apr 2004
Posts: 373

PostPosted: Wed Sep 15, 2004 8:37 pm    Post subject: Reply with quote

Oh right, I'll look into that. I know it can recieve information from you but I think it is all voluntary. Only if you choose to give it. I also remember there used to be a bug in winamp. Something to do with a skin that someone made for winamp infected you with spyware.

There is a program very similar to Winamp called QCD which you can get from here that you might want to try-

http://www.quinnware.com/
Back to top
View user's profile Send private message Send e-mail
Wingfat



Joined: 23 Aug 2004
Posts: 193
Location: East Bay, California USA

PostPosted: Wed Sep 15, 2004 8:48 pm    Post subject: Reply with quote

thanks Jon i will check that one out.
But there is nothing like useing Voice command for Windows Media player. It is pretty cool, not sure you all have tried it or not, but i think it is bundeled with WinXP Plus. Which can be downloaded pretty easy for free.
With it you can open playlists, singel files by name or groups of music based on Genre. Like i can say: "DJ open Genre Rock" and it will search all my MP3s for just rock and start playing them. it has voluem controlls and much more. Check it out if you can. Cool
Back to top
View user's profile Send private message
Jon



Joined: 28 Apr 2004
Posts: 373

PostPosted: Wed Sep 15, 2004 8:58 pm    Post subject: Reply with quote

That sounds good. The problem is that our computer is in the living room so people might think I've gone mad if I start talking to the PC Smile . That's one reason I don't use the voice recignition in office.

Who knows, maybe we'll have voice recignition in autohotkey one day Cool
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic    AutoHotkey Community Forum Index -> Scripts & Functions All times are GMT
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You can post new topics in this forum
You can reply to topics in this forum


Powered by phpBB © 2001, 2005 phpBB Group