All pastes #119396 Raw Edit

pike

public text v1 · immutable
·published 2006-08-06 21:03 UTC
rendered paste body
/me enjoys 
$puts(BTRT,$div($mul(%_filesize%,8),%_length_seconds%))
$puts(BTRT,$if2(%__bitrate%kbps,$ifgreater($len($get(BTRT)),4,$div($get(BTRT),1024)kbps,$get(BTRT)bps)))
$puts(RG,$left(%__replaygain_track_gain%,$add($strchr(%__replaygain_track_gain%,.),2))db)
$puts(SEP,$select($add($mod($rand(),5),1),||,'//',\\,>>,**))

$puts(DEF,
$if(%title%,
''%title%'' [by %artist% ])

$if(%album%%date%%tracknumber%,
$get(SEP) [$if(%album%,%date%:,date:%date%)]
[%album%]
['('%album artist%')']
[/[%disc%.]$num(%tracknumber%,2)])

$if($not($and(%artist%,%title%)),$if($stricmp($left(%_path_raw%,7),'http://'),%_path_raw%,$get(SEP) %_filename_ext%))

 $get(SEP) 
[<$meta_sep(genre,/)> ]
$codec()
$if(%__mod_channels%,'('%__mod_channels% chan'nels)')
$if($or($and(%_length%,%_filesize%),%__bitrate%),@$get(BTRT)
$if($and($stricmp($codec(),MP3),$not(%__extrainfo%)),'(cbr)'))
$if(%__replaygain_track_gain%,@$get(RG)) 

$if($and(%_time_elapsed_seconds%,%_time_total_seconds%),$get(SEP) $progress(%_time_elapsed_seconds%, %_time_total_seconds%, 20,'['%_time_elapsed%']','='))
)

$select(1,
//1 - default
//2 - Mix .NFO release
//3 - np list
//4 - html version
//5 - caps default

$lower($get(DEF))

,

$num(%tracknumber%,2). $if(%album artist%,%artist% - )%title% {%_length%}

,

''%title%'' by %artist% '('%album%')'

,

<li>%artist% - %title% {%_length%}</li>

,

$get(DEF)

)