Album Scroller, select album by its cover.

background

hey this is the very first one of the few hundred music related script i have made for my own purpose ,now i thought il share it.

this basic i have far better versions with , alphabetical search , play by just scanning the cd barcode ect ,these may be released later when i got more time.

what is it ?

this simply a basic script for scrolling through all your albums ...providing they are mp3s and in standard windows music folder format , including having the album cover jpeg along with the mp3s.

how does it work ?

what you need ?

you need you make a txt file with all you music directories and call it "musiclist.txt"

eg

E:\My Music\artist\Away From The Sun
E:\My Music\artist2\album name
-------------------------------------------------
-------------------------------------------------
-------------------------------------------------

i have a script to do this but is not great stuctured or would make much sense. therefore i have not included it.

enjoy

cheers for checking this out



;ALBUM SCROLL EXAMPLE for winamp 
;by luke 
;july 2008







; CONTROLS

; Mouse wheelup : move up album covers		
; Mouse wheeldown : move down album covers             
; Mouse middle button : play 	



; BEFORE use , you need to.......


; !! (1)  please make a standard unknown cover image called "no.jpg" 
;     (2) make your music list this scripts looks for "musiclist.txt"




			
			



			
;----------------------------------------------
; help section not required if working ok !!




IfNotExist %A_WorkingDir%\musiclist.txt
{
 
msgbox , you need to make a musiclist text file !eg ,`nE:\My Music\artist1\ABLUM`nE:\My Music\artist2\ABLUM `nE:\My Music\artist3\ABLUM



return

}


IfNotExist %A_WorkingDir%\nocover.jpg
{
    SplashTextOn, 300, 50, !, no "no cover" jpg found  Downloading image. Please wait...
   URLDownloadToFile http://img165.imageshack.us/img165/3126/nofh2.jpg, nocover.jpg
URLDownloadToFile https://ahknet.autohotkey.com/~corr/ahk.bmp, ahk.bmp
   
    SplashTextOff
}

;-------------------------------------------------------------------------------------








#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.














Gui, Add, Picture, x6 y10 w240 h210 V3, 
Gui, Add, Text, x6 y230 w240 h70 v2, Text
Gui, Show, x131 y91 h310, ALBUM SCROLL
WinSet,Transparent, 240,ALBUM SCROLL




inifile= mainconfig.ini 		;this stores the the txt line varible 
IniWrite, 3,%inifile%, picontrol, count




start:
loopr =





Iniread, lineno, %inifile%, picontrol, count  ;read the starting line number from .ini 





FileReadLine, line, musiclist.txt, %lineno%







rty = %Line%




;*********************artist / album text*********************************************


StringSplit, Fieldr, rty, \


GuiControl, ,2,ARTIST:%Fieldr3%`nALBUM:%Fieldr4% 	; this simply puts the artist text


	

;*********************search for jpegs*********************************************



{
Loop, %rty%\*.jpg, ,1  ; Recurse into subfolders for .jpgs




loopr = %A_LoopFileFullPath%




if loopr =
{
GuiControl, ,3, nocover.jpg  ;if no jpg cover is found set a default picture. 

}

else 





GuiControl, ,3,%loopr%    ;if jpg cover is found set the cover picture


}
return



;***************************************************************************



wheelUP::


endp := Add (1 + lineno)   			 ; add one to the current line 

IniWrite, %endp%,%inifile%, picontrol, count	; write the count to the ini file

goto,start					; reload 
return





wheeldown::

endp := Add (lineno - 1)			; take one from the current line 

IniWrite, %endp%,%inifile%, picontrol, count	; write the count to the ini file

goto,start					; reload
return




MButton::

sleep,500


run, c:\program files\winamp\winamp.exe "%rty%"		; play the album in winamp ect.
return	







GuiClose:
ExitApp

Sign In