$puts(str1,"%title%"[ by %artist%][ / %album%][ '('%genre%[, %date%]')'])
$puts(str2,$upper($replace(%filename_ext%,%filename%.,)) $if(%__bitrate_nominal%,VBR '('%__bitrate%kbps average')' at %bitrate%kbps,[%codec_profile% $if($or($strstr(%codec_profile%,VBR),$strstr(%codec_profile%,ABR)),'('%__bitrate%kbps average')' )]at %bitrate%kbps)',' %samplerate%Hz / $cwb_splitnum($div($muldiv(%filesize%,1000,1024),1000),',')kb)
$puts(str3,$if(%play_count%,Played: %play_count% time$if($stricmp(%play_count%,1),,s),Never Played)$if(%last_played%,$puts(lpdiff,$cwb_datediff(%last_played%,%cwb_systemdate%))',' Last Played: $ifgreater(1,$get(lpdiff),Today,$ifgreater(2,$get(lpdiff),Yesterday,$get(lpdiff) days ago '('$num($substr(%last_played%,9,10),1)-$num($substr(%last_played%,6,7),1)-$substr(%last_played%,1,4)')')),)$if(%first_played%,$puts(fpm,$substr(%first_played%,9,10)) / First Played: $num($get(fpm),1)$ifgreater(2,$get(fpm),st,$ifgreater(3,$get(fpm),nd,$ifgreater(4,$get(fpm),rd,th))) of $select($substr(%first_played%,6,7),January,February,March,April,May,June,July,Auguest,September,October,November,December)',' $substr(%first_played%,1,4)))
$puts(panelbg,245-245-245)
$puts(imagedir,'C:\Program Files\foobar2000\images\itunes\')

// background
$drawrect(,,,,brushcolor-$get(panelbg) pencolor-null)
$imageabs2(,,,,,,0,0,$get(imagedir)trackinfo1.png,)

// audioscrobbler
$if($or($greater($muldiv(%playback_time_seconds%,100,%length_seconds%),49),$greater(%playback_time_seconds%,239)),$imageabs2(,,,,,,$sub(%_width%,88),3,$get(imagedir)as.png,))

// curved edges
$drawrect(0,3,1,1,brushcolor-$get(panelbg) pencolor-null)
$drawrect($sub(%_width%,1),3,1,1,brushcolor-$get(panelbg) pencolor-null)
$drawrect(0,57,1,1,brushcolor-$get(panelbg) pencolor-null)
$drawrect($sub(%_width%,1),57,1,1,brushcolor-$get(panelbg) pencolor-null)

$if(%isplaying%,

// progress bar
$drawrect($muldiv(%_width%,15,100),41,$muldiv(%_width%,70,100),9,brushcolor-null pencolor-240-240-240)
$drawrect($add($muldiv(%_width%,15,100),2),43,$ifgreater($muldiv($sub($muldiv(%_width%,70,100),4),%playback_time_seconds%,%length_seconds%),0,$muldiv($sub($muldiv(%_width%,70,100),4),%playback_time_seconds%,%length_seconds%),1),5,brushcolor-240-240-240 pencolor-null)
$alignabs($sub($muldiv(%_width%,15,100),35),38,35,14,center,middle)$font(calibri,8,bold,240-240-240)$if2(%playback_time%,0:00)
$alignabs($muldiv(%_width%,85,100),38,35,14,center,middle)$font(calibri,8,bold,240-240-240)$if2(%length%,0:00)
$alignabs(20,9,$sub(%_width%,40),14,center,middle)$font(calibri,9,bold,240-240-240)

// interchanging text
$select($add($mod(%playback_time_seconds%,15),1),
$get(str1),$get(str1),$get(str1),$get(str1),$get(str1),
$get(str2),$get(str2),$get(str2),$get(str2),$get(str2),
$get(str3),$get(str3),$get(str3),$get(str3),$get(str3))

// autorating system
$if(%rating%,$puts(rating,%rating%),$puts(rating,$sub(%play_count%,$div($cwb_datediff(%cwb_systemdatetime%,%first_played%),28))))
$if($greater($get(rating),5),$puts(rating,5))
$if($greater(0,$get(rating)),$puts(rating,0))
$imageabs2(,,,,,,$div($sub(%_width%,58),2),24,$get(imagedir)r$get(rating).png,)

// properties & open dir
$button($sub(%_width%,15),26,0,0,9,9,$get(imagedir)info.png,$get(imagedir)infoh.png,properties,)
$button(6,26,0,0,9,9,$get(imagedir)dir.png,$get(imagedir)dirh.png,open directory,)

,

// not playing..
$alignabs($div($sub(%_width%,50),2),6,50,48,center,middle)
$font(wingdings,25,bold,230-230-230)v

)