FF5EAETimes played: ffffff$char(10)$if2(%play_counter%, No stats yet)
$char(10)$char(10)
FF5EAELast played: FFFFFF$char(10)$if(%last_played%,$substr(%last_played%,6,7)/$substr(%last_played%,9,10)/$substr(%last_played%,1,4)' @ '$ifgreater($substr(%last_played%,12,13),12,$sub($substr(%last_played%,12,13),12),$substr(%last_played%,12,13))':'$substr(%last_played%,15,16) $ifgreater($substr(%last_played%,12,13),12,PM,AM), No stats yet)
$char(10)$char(10)
FF5EAEFirst played: FFFFFF$char(10)$if(%FIRST_PLAYED%,$substr(%FIRST_PLAYED%,6,7)/$substr(%FIRST_PLAYED%,9,10)/$substr(%FIRST_PLAYED%,1,4)' @ '$ifgreater($substr(%FIRST_PLAYED%,12,13),12,$sub($substr(%FIRST_PLAYED%,12,13),12),$substr(%FIRST_PLAYED%,12,13))':'$substr(%FIRST_PLAYED%,15,16) $ifgreater($substr(%FIRST_PLAYED%,12,13),12,PM,AM), No stats yet)
$char(10)$char(10)

$progress(%_time_elapsed_seconds%, %_time_total_seconds%, 20,'#','=')

$pad_right($muldiv(%_time_elapsed_seconds%,100,%_length_seconds%),3)'%'

// code by theLiberator (except progress bar)

$char(1)CDCAE8D$get(head)Mode: $get(info)$if(%_trackinfo_nowplaying%,$if(%_ispaused%,Current Song 'DECDC5[Paused]',Current Song),Follow Cursor$if(%_ispaused%,DECDC5' [Paused]'))$char(10)

$puts(theme,1)

// Original code by necropimp, then modified by AstreaEdge, and again by KockRoach
// Habla likes things his way, and modified it more.
// Further modified by theLiberator
// Best viewed with vert pad 10, hor pad 8, line space 3, Calibri 8pt bold font, black background
// lots of info needs lots of space 8)

// !!!!BEGIN USER CONFIGURATION!!!!

// Show Artist? (1 = show, 0 = don't show)
$puts(arts,1)

// Show Album?
$puts(albs,1)

// Show Title?
$puts(tils,1)

// Info Heading Color e.g. "Title:"
$puts(head,b09a86)

// Info Color, e.g. "Black Dog"
$puts(info,F3EAE0)

// Info Annotation Color (e.g. "kbps" is the annotation)
$puts(anno,F3EAE0)

// Separator
$puts(text2,DECDC5)
$puts(text1,735240)
$puts(fadeend,000000)
$puts(seplen,23)
$puts(sepchar,'-')

////////////////////////////////////////////////
////!!!END USER CONFIGURATION!!////
//////////////////////////////////////////////

// Day Conversion
$puts(day,$substr(%last_played%,9,10))
$if(%last_played%,
$if($strcmp($left($get(day),1),0),$puts(day,$right($get(day),1))))
$if($strcmp($get(day),11),$puts(xx,th),
$if($strcmp($get(day),12),$puts(xx,th),
$if($strcmp($get(day),13),$puts(xx,th),
$if($strcmp($right($get(day),1),1),$puts(xx,st),
$if($strcmp($right($get(day),1),2),$puts(xx,nd),
$if($strcmp($right($get(day),1),3),$puts(xx,rd),
$puts(xx,th)))))))

// Month Conversion
$puts(month,$substr(%last_played%,6,7))
$puts(month_name,$select($get(month),
Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nov,Dec))

// Year Conversion
$puts(year,$substr(%last_played%,1,4))

// Time Conversion
$puts(hour,$substr(%last_played%,12,13))
$puts(min,$substr(%last_played%,14,16))
$puts(sec,$substr(%last_played%,17,19))

// 24 Hour to 12 Hour Conversion
$if($strcmp($left($get(hour),1),0),$puts(hour1,$right($get(h our),1)))
$if($strcmp($left($get(hour),1),1),$puts(hour1,$sub($get(hou r),12)))
$if($strcmp($left($get(hour),1),2),$puts(hour1,$sub($get(hou r),12)))
$if($strcmp($get(hour),00),$puts(hour1,12))
$if($strcmp($get(hour),10),$puts(hour1,10))
$if($strcmp($get(hour),11),$puts(hour1,11))
$if($strcmp($get(hour),12),$puts(hour1,12))

// AM/PM Conversion
$if($strcmp($get(hour),00),$puts(yy,am))
$if($strcmp($get(hour),10),$puts(yy,am))
$if($strcmp($get(hour),11),$puts(yy,am))
$if($strcmp($get(hour),12),$puts(yy,pm))
$if($strcmp($get(hour),24),$puts(yy,am))
$if($strcmp($left($get(hour),1),0),$puts(yy,am))
$if($strcmp($left($get(hour),1),1),$puts(yy,pm))
$if($strcmp($left($get(hour),1),2),$puts(yy,pm))

// Date Format
$puts(time_of_year,$get(month_name) $get(day)$get(xx)','$get(year))

// Time Format
$puts(time_of_day,$get(hour)$get(min)$get(sec))

// SONG INFO SEPARATOR
$char(1)C$transition($repeat($get(sepchar),$get(seplen)),$ge t(fadeend),$get(text1))$transition($repeat($get(sepchar),$ge t(seplen)),$get(text1),$get(fadeend))

$char(10)$get(text1)'[' $get(text2)S o n g I n f o $get(text1)']'$char(10)

$if($strcmp(1,$get(tils)),$if(%title%,$get(head)Title: $if(%title%,$get(info)$cut(%title%,100)
$ifgreater($len(%title%),100,'...',))$char(10),$get(info)%_f ilename%$char(10)),)
$if($strcmp(1,$get(arts)),$if(%artist%,$get(head)Artist: $get(info)%artist%$char(10),),)
$if($strcmp(1,$get(albs)),$if(%album%,$get(head)Album: $get(info)$cut(%album%,100)
$ifgreater($len(%album%),100,'...',)$char(10),),)
$if(%date%,$get(head)Date: $get(info)%date%$char(10),)
$if(%genre%,$get(head)Genre: $get(info)%genre%$char(10),)

// TECH INFO SEPARATOR
$char(1)C$transition($repeat($get(sepchar),$get(seplen)),$ge t(fadeend),$get(text1))$transition($repeat($get(sepchar),$ge t(seplen)),$get(text1),$get(fadeend))

$char(10)$get(text1)'[' $get(text2)T e c h I n f o $get(text1)']'$char(10)

$get(head)Length: $get(info)$if(%_isplaying%,%_time_elapsed%$get(anno)$if(%_le ngth%, / %_length%,)$if(%_time_elapsed%, / $muldiv(%_time_elapsed_seconds%,100,%_length_seconds%)'%')$i f(%_length%, / -%_time_remaining%),%_length%)$char(10)
$get(head)Quality: $if(%__codec%, $get(info)%__codec%) $get(info)
$if2(%__bitrate_dynamic%,%__bitrate%) $get(anno)Kb/s $if($stricmp(%__codec%,mp3),$if($stricmp(%__extrainfo%,vbr), VBR,CBR))
$char(10)
$if(%__lame_version%,$get(head)Encoder: $get(info)$left(%__lame_version%,4) $right(%__lame_version%,4) [$upper(%__lame_profile%)]$char(10),)
$if(%__flac_vendor%,$get(head)Encoder: $get(info)$if($stricmp(%__flac_vendor%,reference libFLAC 1.1.2 20050205),FLAC 1.1.2 -8)$char(10),)
$if(%__mpc_profile%,$get(head)MPC Profile: $get(info)%__mpc_profile%$char(10),)
$get(head)Compression: $get(info)$div(1411,%__bitrate%).$substr($muldiv(1411,100,%_ _bitrate%),2,3):1 '('$get(info)$muldiv(%__bitrate%,100,1411)$get(anno)'% of original quality)'$char(10)
$get(head)Channel Mode: $get(info)$if($stricmp($codec(),MP3),$get(space2)$caps(%__mp 3_stereo_mode%),
$if(%__channels%,$ifgreater(%__channels%,1,Stereo,Mono),'?') )$char(10)
$if(%__bitspersample%,$get(head)Bitdepth: $get(info)%__bitspersample% bits/sample$char(10),)
$if(%__samplerate%,$get(head)Samplerate: $get(info)$div(%__samplerate%,1000).$substr(%__samplerate%,3 ,3) KHz $char(10))
$if(%_filesize%,$get(head)Filesize: $get(info)
$div(%_filesize%,1048576).$left($num($muldiv($mod(%_filesize %,1048576),100,1048576),2),2) $get(anno)'MB'$char(10),)

$if(%last_played%,
// PLAY STATS SEPARATOR
$char(1)C$transition($repeat($get(sepchar),$get(seplen)),$ge t(fadeend),$get(text1))$transition($repeat($get(sepchar),$ge t(seplen)),$get(text1),$get(fadeend))

$char(10)$get(text1)'[' $get(text2)P l a y S t a t s $get(text1)']'$char(10),)


$if(%play_counter%,$get(head)Played: $get(info)%play_counter% times total$char(10),)
$if(%last_played%,$get(head)Last played on: $get(info)$get(time_of_year) at $get(time_of_day)$char(10),)
$if(%rating%,$get(head)My rating: $get(info)%rating% stars$char(10),)

$puts(mode,warmth)

// Per album colours
$if($strcmp($get(mode),album),
$set_global(hue1,$add($mod($div($crc32(%album%),135),255),1))
$set_global(sat1,120)
)

$if($strcmp($get(mode),fading),
// Fading saturation
$set_global(sat1,$sub(255,$mul($sub(%tracknumber%,1),$div(205,$if(%totaltracks%,$sub(%totaltracks%,1),10)))))
$set_global(hue1,$add(%tracknumber%,5))
)

$if($strcmp($get(mode),warmth),
// Warmth
$set_global(sat1,$mul(10,$add(%play_counter%,1)))
$set_global(hue1,$add(10,$mul(%play_counter%,1)))
)

$if($strcmp($get(mode),rainbow),
// RAINBOW MODE !!
$set_global(hue1,$mul($div(240,$if(%totaltracks%,%totaltracks%,60)),$sub(%tracknumber%,1)))
$set_global(sat1,260)
)

$if($strcmp($get(mode),normal),
// Normal colours;]
$set_global(sat1,25)
$set_global(hue1,140)
)