Item detail/infodisplay for foob

//normal colour:
$puts(nclr,$rgb(0,255,255))

//normal dark colour
$puts(dclr,$rgb(46,112,112))

//end-of-track colour:
$puts(eotclr,$rgb(255,62,96))

//warning colour:
$puts(wclr,$rgb(255,204,0))

//font:
$puts(font,$set_font(BPdotsSquares,20,))

//threshold for warning colour (playback time):
$puts(nes,$ifgreater(%playback_time_remaining_seconds%,15,0,1))

//playback indicators
$puts(_3,$mod(%playback_time_seconds%,3))
$puts(_f1,$get(dclr)>$get(nclr)>$get(dclr)>>)
$puts(_f2,$get(dclr)>>$get(nclr)>$get(dclr)>)
$puts(_f3,$get(nclr)>$get(dclr)>>$get(nclr)>)
$puts(playback,$ifequal($get(_3),0,$get(_f1),)$ifequal($get(_3),1,$get(_f2),)$ifequal($get(_3),2,$get(_f3),)$get(nclr))

$puts(indicator,$if(%isplaying%,$if(%ispaused%,$get(wclr)PAUSED,' '$get(playback)' ')) )

$get(nclr)$get(font)

$get(indicator)%title%$get(nclr)$crlf()

$ifequal($get(nes),1,$get(eotclr),)-%playback_time_remaining% / %length%$ifequal($get(nes),1,$get(nclr),)
' • '%channels% %codec%' @ '%bitrate%'kbps, '%samplerate%'Hz'