Music Banter - View Single Post - Foobar2000 - Support and Discussions
View Single Post
Old 01-31-2010, 10:45 AM   #15 (permalink)
noise
thirsty ears
 
noise's Avatar
 
Join Date: Sep 2009
Location: Boulder
Posts: 742
Default

ok here it is. it's a real mess, apologies for that. hopefully you can follow it well enough to be able to change some things to suit your system. you'll have to change the paths to the image directories since i didn't use relative paths in the script.

the height is fixed, but the width should adjust to the panel you put it in.

bitrate changes color red to green depending on how good it is

flag images are from here, just rename to suit your tags:
alpak on deviantART

filetype icons:
A set of icons for different audio file types - Hydrogenaudio Forums

oh, and you need the Playback Statistics component to display some of the info.

Code:
// Global

$puts(1,$rgb(234,0,0))
$puts(2,$rgb(224,41,00))
$puts(3,$rgb(215,78,0))
$puts(4,$rgb(205,112,0))
$puts(5,$rgb(195,142,0))
$puts(6,$rgb(186,169,0))
$puts(7,$rgb(160,176,0))
$puts(8,$rgb(121,167,0))
$puts(9,$rgb(86,157,0))
$puts(10,$rgb(54,147,0))
$puts(11,$rgb(25,138,0))
$puts(12,$rgb(0,128,0))

$drawrect(0,0,%_width%,15,brushcolor-50-100-140)
$alignabs(0,0,%_width%,15,center,middle)$rgb(255,255,255)NOW PLAYING

$drawrect(0,150,%_width%,15, brushcolor-50-100-140)
$alignabs(0,150,%_width%,15,center,middle)$rgb(255,255,255)TECHNICAL

$drawrect(0,225,%_width%,15, brushcolor-50-100-140)
$alignabs(0,225,%_width%,15,center,middle)$rgb(255,255,255)STATISTICS

// PerTrack

$imageabs2(60,60,0,0,60,60,$sub(%_width%,75),75,D:\Apps\No Install\Audio\Players\foobar2000 CUI\images\Flags\%country%.png,)
$imageabs2(60,60,0,0,60,60,$sub(%_width%,74),163,D:\Apps\No Install\Audio\Players\foobar2000 CUI\images\Types\%codec%.png,)

$alignabs(0,15,65,15,right,)Title:
$alignabs(0,30,65,15,right,)Rating:
$alignabs(0,45,65,15,right,)Artist:
$alignabs(0,60,65,15,right,)Album:
$alignabs(0,75,65,15,right,)Type:
$alignabs(0,90,65,15,right,)Date:
$alignabs(0,105,65,15,right,)Genre:
$alignabs(0,120,65,15,right,)Style:
$alignabs(0,135,65,15,right,)Comments:
$alignabs(0,165,65,15,right,)Codec:
$alignabs(0,180,65,15,right,)Bitrate:
$alignabs(0,195,65,15,right,)Track Gain:
$alignabs(0,210,65,15,right,)Album Gain:
$alignabs(0,240,65,15,right,)Play Count:
$alignabs(0,255,65,15,right,)Last Played:
$alignabs(0,270,65,15,right,)Length:


$alignabs(70,15,$sub(%_width%,60),15,,)$rgb(50,100,140,0,0,0)$replace($replace(%title%,')',')'$rgb(50,100,140,0,0,0)),'(',$rgb(133,176,211,94,74,83)'(')

$alignabs(70,30,$sub(%_width%,60),15,,)
$puts(mychar,$char(9733)$char(8202))
$rgb(245,175,92,225,155,72)
$ifgreater(%rating%,0,
$repeat(★,%rating%)
$repeat($rgb(230,230,230,210,210,210)★,$sub(5,%rating%))
,
$repeat($rgb(230,230,230,210,210,210)★,5)
)

$alignabs(70,45,$sub(%_width%,60),15,,)$rgb(60,100,60)%artist%

$alignabs(70,60,$sub(%_width%,60),15,,)$puts(normal,$rgb(60,100,60))
$puts(light,$rgb(164,180,134))
$puts(bright,$rgb(205,135,52))
$get(normal)
$replace(%album%,
'(',$get(light)'(',
')',')'$get(normal),
'[single]',,
'EP',,
'12"',,
'7"',)
$if(%discnumber%,
$get(sep)$rgb(0,0,255) '['Disc %discnumber%[ of %totaldiscs%]']'
,)

$alignabs(70,75,$sub(%_width%,60),15,,)
$puts(normal,$rgb(60,100,60,30,50,30))
$puts(light,$rgb(164,180,134,82,90,67))
$puts(bright,$rgb(205,135,52,82,90,67))

$get(normal)
$replace($ifequal($strcmp(%live%,A),1,%release type% '('Live')',%release type%),
'(',$get(light)'(',
')',')'$get(normal),
'[',$get(bright)'[',
']',']'$get(normal),
'EP',$get(bright)'[EP]',
'12"',$get(bright)'[12"]',
'7"',$get(bright)'[7"]',
'Single',$get(bright)'['Single']')


$alignabs(70,90,$sub(%_width%,60),15,,)$rgb(50,100,140)%date%

$alignabs(70,105,$sub(%_width%,60),15,,)$rgb(50,100,140)%genre%

$alignabs(70,120,$sub(%_width%,60),15,,)$rgb(50,100,140)%style%

$alignabs(70,135,$sub(%_width%,60),15,,)$rgb(50,100,140)$if2(%comments%,...)

$alignabs(70,165,$sub(%_width%,60),15,,)$rgb(50,100,140)%codec% [%codec_profile%]

$alignabs(70,195,$sub(%_width%,60),15,,)$if(%replaygain_track_gain%,$rgb(50,100,140)%replaygain_track_gain%,$rgb(234,0,0)$char(215))

$alignabs(70,210,$sub(%_width%,60),15,,)$if(%replaygain_album_gain%,$rgb(50,100,140)%replaygain_album_gain%,$rgb(234,0,0)$char(215))

$alignabs(70,240,$sub(%_width%,60),15,,)$rgb(50,100,140)%play_count% $ifequal(%play_count%,1,time,times)

$alignabs(70,255,$sub(%_width%,60),15,,)$rgb(140,150,160)$rgb(50,100,140)$if2(%last_played%,Never)


// PerSecond
$alignabs(70,270,$sub(%_width%,60),15,,)$rgb(50,100,160)%length%$rgb(140,150,160)' [- '%playback_time_remaining%']'

$alignabs(70,180,$sub(%_width%,60),15,,)
$rgb(140,150,160)

$ifgreater(%bitrate%,0,$get(1),)
$ifgreater(%bitrate%,49,$get(2),)
$ifgreater(%bitrate%,74,$get(3),)
$ifgreater(%bitrate%,99,$get(4),)
$ifgreater(%bitrate%,124,$get(5),)
$ifgreater(%bitrate%,149,$get(6),)
$ifgreater(%bitrate%,174,$get(7),)
$ifgreater(%bitrate%,199,$get(8),)
$ifgreater(%bitrate%,224,$get(9),)
$ifgreater(%bitrate%,249,$get(10),)
$ifgreater(%bitrate%,274,$get(11),)
$ifgreater(%bitrate%,299,$get(12),)

%bitrate% $rgb(50,100,140)kbps
__________________
my flac collection
noise is offline   Reply With Quote