User:Beto/foobar2000/Archives

From Hydrogenaudio Knowledgebase
< User:Beto‎ | foobar2000
Revision as of 19:09, 28 June 2007 by Beto (Talk | contribs)

(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

You find here older versions of my foobar page.

foobar2000 current screenshot

My current foobar

This is my current foobar. It is based in columnsUI with single column playlist. The single column code is based in mazy's wonderful testcase presented here and tweaked by me.

There are also three trackinfo mod panels to display details about the current playing song and the progressbar (on top of the screenshot).

At the right you can find album art panel that displays the cover of the CD that is playing.

Right below the blue foo browser panels make it easier to navigate through the media library.

foobar2000 scripts and codes

trackinfo mod panels code

top panel

This code scrolls the title of the music if it is larger that the panel width.

//lenght of scrolling
$puts(len,70)

//title
$puts(title,$if2(%title%,No title))

//core code
$align(right,top)
$font(calibri bold,22,glow-7-123-167 glowexpand-1,255-255-255)
$if(%_isplaying%,
$iflonger($get(title),$get(len),

//scroll code
$puts(diff,$sub($len($get(title)),$get(len)))
$puts(start,$add(1,$mod(%_time_elapsed_seconds%,$get(diff))))
$puts(start2,$select($add($div($add(1,$mod( %_time_elapsed_seconds%,$mul($get(diff),2))),$add($get(diff),1)),1),$get(start),$sub($add($get(diff),1),$get(start))))
$substr($get(title),$get(start2),$add($get(start2),$get(len)))

//end of scroll code
,$get(title))$char(10)
$font(candara bold,16,shadow,)
$align(right,bottom)

//artist
$if($meta(album artist),$meta(album artist)' / '%artist%,
$if($meta(performer),$meta(performer)' / '%artist%,
$if2(%artist%,No artist)))$char(10)
,
'Stopped')

//overlay image
$imageabs(0,0,images\overlay.png,)

bottom panel

//genre and style lenght
$puts(item_len,$len($if2(%genre%,No genre)' | '$if2(%style%,No style)))
$puts(item_con,$if2(%genre%,No genre)' | '$if2(%style%,No style))

// Streaming
$if(%_time_total%,,$puts(stream,1))

// Rating
$puts(rtchar,«)

// Last played
$puts(last_played_year,$substr(%last_played%,1,4))
$puts(last_played_month,$substr(%last_played%,6,7))
$puts(last_played_day,$substr(%last_played%,9,10))
$puts(last_played_hour,$substr(%last_played%,12,13))
$puts(last_played_min,$substr(%last_played%,15,16))
$puts(last_played_sec,$substr(%last_played%,18,19))

// Compression ratios
$puts(compr_perc,$muldiv(%__bitrate%,100,1411))
$puts(compr_idx,$div(100,$get(compr_perc))'.'$cut($muldiv($mod(100,$get(compr_perc)),1000,$get(compr_perc)),2))

//Core code
$align(left,top)
$font(tahoma,8,bold,255-255-255)
$if(%_isplaying%,
$ifgreater($get(item_len),100,
$cut($get(item_con),99)'...',
$get(item_con)
)
$align(right,top)
$if2(%album%,No album)$if(%album subtitle%,': '%album subtitle%)' | '$if2(%date%,No date)' | '$if2(%publisher%,No publisher)$char(10)
$if(%_ispaused%,$font(,,bold,255-0-0)'[Paused] ')$font(tahoma,8,bold,255-255-255)$if(%_isplaying%,'['[%_time_elapsed%]$if(%_time_total%,'/'%_time_total%)']')$if(%_isplaying%,$if($get(stream),' [Streaming]',' ['$muldiv(%_time_elapsed_seconds%,100,%_length_seconds%)'%]'))$char(10)
[%__codec%]' '[%bitrate%Kbps]
$if($stricmp(%__encoding%,lossy),
' ['%__encoding%']'$char(10)$char(10),
' ['$get(compr_perc)'%] ['%__encoding%']'$char(10)$char(10))

$if(%rating%,$font(wingdings,9,,)
$repeat($get(rtchar),%rating%)$font(,,,18-173-224)$repeat($get(rtchar),$sub(5,%rating%))$font(calibri,8,bold,255-255-255),
$font(tahoma,7,bold,255-255-255)This track has no rating)' | '
$if(%last_played%,
$ifgreater(%play_count%,1,Played %play_count% times,Played %play_count% time),
This song was never played)
$if(%last_played%,' | Last Played '$get(last_played_day)/$get(last_played_month)/$get(last_played_year)' at '$get(last_played_hour):$get(last_played_min))
,
$align(right,top)'Stopped')

progress bar

$padding(0,0)
$drawrect(,,,10,brushcolor-173-231-252 pencolor-18-173-224)

$puts(progress,$muldiv(%playback_time_seconds%,$sub(%_width%,4),%length_seconds%))

$ifgreater($get(progress),0,
$padding(2,2)$drawrect(,,$get(progress),6,brushcolor-18-173-224 pencolor-null),)

single column playlist code

group by

[%album artist%] %album%

item display

$puts(item_len,$len(%tracknumber%'. '%subalbum%': '$if($meta(album artist),%artist%' - '%title%,%title%)': '%subtitle%))
$puts(item_con,$replace([%tracknumber%'. '][%subalbum%': ']$if($meta(album artist),%artist%' - '%title%,%title%)[': '%subtitle%],'(',$font(calibri bold italic,8,$if(%isplaying%,glow-192-192-192 glowalpha-130,),$if(%_selected%,255-0-0,170-170-170))'('))
$if($strcmp($mod(%_playlist_number%,2),1),
$drawrect(,,,,brushcolor-245-245-245 pencolor-null))
$padding(2,0)
$font(calibri bold,8,$if(%isplaying%,glow-192-192-192 glowalpha-130,),$if(%_selected%,255-0-0,170-170-170))
$ifgreater($get(item_len),182,
$cut($get(item_con),181)'...',
$get(item_con)
)
$alignabs(6,13,%_width%,%_height%,,)
$font(CubicFive10,5,nocleartype,190-190-190)
[%length% | ]
[$info(bitrate) kbps]
$alignabs(0,-1,$sub(%_width%,36),%_height%,right,)
$if($not(%__replaygain_track_gain%),$font(,,,255-0-0)T,)
$if($not(%__replaygain_album_gain%),$font(,,,255-0-0)A,)
$alignabs(0,-1,$sub(%_width%,2),%_height%,right,)
$font(CubicFive10,5,nocleartype,190-190-190)
[%play_count%x]
//$if(%cwb_queueindex%, '['%cwb_queueindexes%/%cwb_queuelength%']')
$alignabs(0,10,$sub(%_width%,2),%_height%,right,)
$font(Wingdings,8,glow-190-190-190 glowexpand-1,250-250-250)
$repeat(«,%rating%)

group display

$puts(ar_w,$calcwidth($longest(%album artist%,%artist%)))
$padding(1,0)
$drawrect(,,,,brushcolor-119-213-249 pencolor-51-191-238)$padding(4,1)
$align(left,top)$font(calibri bold,8,,255-255-255)
$font(,,bold glow-51-191-238,)
%album%[': '%album subtitle%]
$alignabs(0,0,$sub(%_width%,$get(ar_w),14),%_height%,right,)
$font(cubicfive10,5,,18-173-224)
[%encodedby%]
$align(right,top)$font(calibri bold,8,,255-255-255)
$if2(%album artist%,%artist%)
$drawrect($sub(%_width%,$get(ar_w),18),-1,3,%_height%,brushcolor-51-191-238 pencolor-null)
$drawrect($sub(%_width%,$get(ar_w),17),-1,1,%_height%,brushcolor-250-250-250 pencolor-null)
$alignabs(6,15,%_width%,%_height%,,)
$font(CubicFive12,5,nocleartype,18-173-224)
[%date% | ][%genre%][ | %publisher%]
$alignabs(0,14,$sub(%_width%,$get(ar_w),14),%_height%,right,)
$font(cubicfive10,5,,)
[%rippedby%]
$imageabs($sub(%_width%,$get(ar_w),98),0,images\playlist-refl.png,)
$imageabs($sub(%_width%,87),0,images\playlist-refl.png,)