՝#Ztr$set_style(text,FFFFFF,FFFFFF) $set_style(back,FFFFFF,FFFFFF)   *-s-*;*Singles*  $if(%_isplaying%, 0|0 $select($add(1,$mod(%_time_elapsed_seconds%,10)), 'l:.l:.:.',':l::.:..','.:..::..',':l:.:...','ll::..:.','.l:.::..','::.:l:..','.::l:..:',':.:l:..:','.:l:..l.') , $num(%_playlist_number%,2))X$if(%_isplaying%, $set_style(back,0,4F4F4F)$set_style(text,FFFFFF,FFFFFF)$set_style(frame-left,1,999999)$set_style(frame-top,1,999999)$set_style(frame-bottom,1,999999)$set_style(frame-right,0,999999) , $set_style(text,B4B4B4,969696) $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) )%_playlist_number% ( *-s-*;*Singles*  Album InfornationI$if($strcmp($directory(%_path%,1),Single Tracks) , $tab()$if2(%artist%,no artist) :: $if2(%album%,no album) , $if($strcmp($tracknumber(),01), $if($strcmp(1,%various%),Various Artists,%artist%) , $if($strcmp($tracknumber(),02), [%album%] , $if($strcmp($tracknumber(),03), [%genre%] $tab()[%date%] ) ) ) )$if($strcmp($tracknumber(),01), $set_style(text,FFFFFF,FFFFFF) $set_style(back,54C49C,54C49C) $set_style(frame-left,1,0) $set_style(frame-right,0,0) $set_style(frame-bottom,0,0) $set_style(frame-top,1,0) , $if($strcmp($tracknumber(),02), $set_style(text,FFFFFF,FFFFFF) $set_style(back,54C49C,54C49C) $set_style(frame-left,1,0) $set_style(frame-right,1,0) $set_style(frame-bottom,0,0) $set_style(frame-top,0,0) , $if($strcmp($tracknumber(),03), $set_style(text,FFFFFF,FFFFFF) $set_style(back,54C49C,54C49C) $set_style(frame-left,1,0) $set_style(frame-right,1,0) $set_style(frame-bottom,1,0) $set_style(frame-top,0,0) , $set_style(text,0,0) $set_style(back,FFFFFF,FFFFFF) $if($strcmp($directory(%_path%,1),Single Tracks),,$set_style(frame-right,1,A8A8A8)) ) ) )$if2($if($strcmp(1,%various%),%album%),[%artist%]) ب$if2(%album%,[%venue%]) ب[%disc%] ب$num(%tracknumber%,3) ب%_path_raw% COMMENT *-s-*;*Singles*  # For Albums//$char(8594) $if(%_isplaying%, 0|0 $select($add(1,$mod(%_time_elapsed_seconds%,10)), 'l:.l:.',':l::.:','.:..::',':l:.:.','ll::.:','.l:.:.','::.:l:','.::l::',':.:l:.','.:l:.l') , $if($strcmp($directory(%_path%,1),Single Tracks) ,::,737373|737373$num(%tracknumber%,2)) )$set_style(text,0,0) $if($strcmp($directory(%_path%,1),Single Tracks),$set_style(back,FFFFFF,D1D1D1), $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) $if($strcmp(%tracknumber%,%totaltracks%),$set_style(frame-bottom,1,A8A8A8)) ) $if($strcmp($tracknumber(),01), $set_style(text,FFFFFF,FFFFFF) $set_style(back,54C49C,54C49C) $set_style(frame-bottom,1,0) $set_style(frame-top,1,0) ) TRACKNUMBER *-s-*;*Singles*   Artist % $if2([%artist%],0000FF|0000FFn/a)N$if(%_isplaying%, $set_style(back,0,4F4F4F)$set_style(text,FFFFFF,FFFFFF)$set_style(frame-left,0,999999)$set_style(frame-top,1,999999)$set_style(frame-bottom,1,999999)$set_style(frame-right,0,999999) , $set_style(text,0,0) $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) ) [%artist%] ARTIST *-s-*;*Singles*  Album"$if2([%album%],0000FF|0000FFn/a)N$if(%_isplaying%, $set_style(back,0,4F4F4F)$set_style(text,FFFFFF,FFFFFF)$set_style(frame-left,0,999999)$set_style(frame-top,1,999999)$set_style(frame-bottom,1,999999)$set_style(frame-right,0,999999) , $set_style(text,0,0) $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) ) [%album%] ALBUM *-s-*;*Singles*  Title$if(%title%, $if(%_isplaying%,[%title%] $tab()[%_time_elapsed%] / [%_length%],[%title%]$tab()[%_length%]) , $if(%_isplaying%,0|0$char(8594) n/a,n/a) ) N$if(%_isplaying%, $set_style(back,0,4F4F4F)$set_style(text,FFFFFF,FFFFFF)$set_style(frame-left,0,999999)$set_style(frame-top,1,999999)$set_style(frame-bottom,1,999999)$set_style(frame-right,0,999999) , $set_style(text,0,0) $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) ) [%title%] TITLE *-s-*;*Singles*  Title & Lengthc$if(%_isplaying%, $if(%title%,$if($strcmp(1,%various%),[%artist% :: ][%title%],$if(%performer%, %performer% :: )%title%),%_filename_ext%) $tab()0|0 [%_time_elapsed% / ][%_length%] , $if(%title%,$if($strcmp(1,%various%),[%artist% :: ][%title%],$if(%performer%, %performer% :: )%title%),%_filename_ext%) $tab()737373|737373[%_length%] )$set_style(text,0,0) $if($strcmp($directory(%_path%,1),Single Tracks),$set_style(back,FFFFFF,D1D1D1), $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) $if($strcmp(%tracknumber%,%totaltracks%),$set_style(frame-bottom,1,A8A8A8)) ) $if($strcmp($tracknumber(),01), $set_style(text,FFFFFF,FFFFFF) $set_style(back,54C49C,54C49C) $set_style(frame-bottom,1,0) $set_style(frame-top,1,0) ) [%title%] TITLE *-s-*;*Singles* , Genre $if2(%genre%,0|0n/a)N$if(%_isplaying%, $set_style(back,0,4F4F4F)$set_style(text,FFFFFF,FFFFFF)$set_style(frame-left,0,999999)$set_style(frame-top,1,999999)$set_style(frame-bottom,1,999999)$set_style(frame-right,0,999999) , $set_style(text,0,0) $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) ) [%genre%] GENREd *-s-*;*Singles*  Type$if($strcmp(%__codec%,Vorbis),Ogg , $if($strcmp(%__codec%,PCM),Wav , $if($strcmp(%__codec%,MP3),Mp3 , $if($strcmp(%__codec%,FLAC),Flac , $caps(%__codec%) ) ) ) ) $if2(%__bitrate_dynamic%,%__bitrate%) kb/sN$if(%_isplaying%, $set_style(back,0,4F4F4F)$set_style(text,FFFFFF,FFFFFF)$set_style(frame-left,0,999999)$set_style(frame-top,1,999999)$set_style(frame-bottom,1,999999)$set_style(frame-right,0,999999) , $set_style(text,0,0) $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) )![%_codec%] ب$num(%__bitrate%,4) F *-s-*;*Singles*  t al ar g y #$if($strcmp($tracknumber(),01), $if(%title%,FFFFFF|FFFFFF√,0000FF|0000FFx) $if(%album%,FFFFFF|FFFFFF√,0000FF|0000FFx) $if(%artist%,FFFFFF|FFFFFF√,0000FF|0000FFx) $if(%genre%,FFFFFF|FFFFFF√,0000FF|0000FFx) $if(%date%,FFFFFF|FFFFFF√,0000FF|0000FF'x') $if(%tracknumber%,FFFFFF|FFFFFF√,0000FF|0000FFx) , $if(%title%,000000|000000√,0000FF|0000FFx) $if(%album%,000000|000000√,0000FF|0000FFx) $if(%artist%,000000|000000√,0000FF|0000FFx) $if(%genre%,000000|000000√,0000FF|0000FFx) $if(%date%,000000|000000√,0000FF|0000FFx) $if(%tracknumber%,000000|000000√,0000FF|0000FFx) ) $set_style(text,0,0) $if($strcmp($directory(%_path%,1),Single Tracks),$set_style(back,FFFFFF,D1D1D1), $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) $if($strcmp(%tracknumber%,%totaltracks%),$set_style(frame-bottom,1,A8A8A8)) ) $if($strcmp($tracknumber(),01), $set_style(text,FFFFFF,FFFFFF) $set_style(back,54C49C,54C49C) $set_style(frame-bottom,1,0) $set_style(frame-top,1,0) )$if(%title%,1,2) $if(%artist%,1,2) $if($or(%album%,%venue%),1,2) $if(%tracknumber%,1,2) $if(%date%,1,2) $if(%genre%,1,2) $if(%publisher%,1,2) $if(%conductor%,1,2) $if(%comment%,1,2) TOTALTRACKSh *-s-*;*Singles*  t al ar g y #$puts(xcolor,0000FF|0000FF) $if(%title%,√,$get(xcolor)x) $if(%album%,√,$get(xcolor)x) $if(%artist%,√,$get(xcolor)x) $if(%genre%,√,$get(xcolor)x) $if(%date%,√,$get(xcolor)x) $if(%tracknumber%,√,$get(xcolor)x)X$if(%_isplaying%, $set_style(back,0,4F4F4F) $set_style(text,FFFFFF,FFFFFF) $set_style(frame-left,0,999999) $set_style(frame-top,1,999999) $set_style(frame-bottom,1,999999) $set_style(frame-right,1,999999) , $set_style(text,0,0) $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) )$if(%title%,1,2) $if(%artist%,1,2) $if($or(%album%,%venue%),1,2) $if(%tracknumber%,1,2) $if(%date%,1,2) $if(%genre%,1,2) $if(%publisher%,1,2) $if(%conductor%,1,2) $if(%comment%,1,2) R *-s-*;*Singles*  Codec & Bitrate$if(%__codec%, %__codec%) $tab()$if(%__bitrate%,%__bitrate%) Kb/s $if($stricmp(%__codec%,mp3),$if($stricmp(%__extrainfo%,vbr),VBR,CBR))$set_style(text,0,0) $if($strcmp($directory(%_path%,1),Single Tracks),$set_style(back,FFFFFF,D1D1D1), $if($strcmp($mod(%_playlist_number%,2),0),$set_style(back,FFFFFF,D1D1D1),$set_style(back,EEEEEE,B5B5B5)) $if($strcmp(%tracknumber%,%totaltracks%),$set_style(frame-bottom,1,A8A8A8))$set_style(frame-right,1,A8A8A8)) $if($strcmp($tracknumber(),01), $set_style(text,FFFFFF,FFFFFF) $set_style(back,54C49C,54C49C) $set_style(frame-bottom,1,0) $set_style(frame-top,1,0) $set_style(frame-right,1,0) ) x d  Gap 2>$set_style(text,FFFFFF,FFFFFF) $set_style(back,FFFFFF,FFFFFF)   *-s-*;*Singles*   $set_global(codec,$replace($codec(),'Vorbis','Ogg',codec(),'Monkey$char(27)s Audio','APE') %__bitrate% kbps$if([%__extrainfo%],' VBR',$if($stricmp($codec(),'MP3'),' CBR'))) $set_global(folder,$replace($trim($caps2(%__directoryname%)),'_',' ','%20',' ',' ',' ')) ///////////////////////////////////////// // HOTNESS - an algorithm for meta-rating // hourly decay version ///////////////////////////////////////// // baselines: define baseline frequency and decay periods // // baselinefrequency: decrease if songs stay hot too long // baselinedecay: decrease if too many songs are hot // $puts(baselinefrequency,20) $puts(baselinedecay,14) // default rating for unrated songs $puts(avgrating,3) // convert baselines to hours $puts(baselinefrequency,$mul($get(baselinefrequency),24)) $puts(baselinedecay,$mul($get(baselinedecay),24)) // calculate "age": the number of hours the song has been in the library $if(%added%, $puts(age, $sub( $add( $mul( $add( $mul($right(%_system_year%,2),365), $select(%_system_month%,0,31,59,90,120,151,181,212,243,273,304,334), $add($div($right(%_system_year%,2),4),$if($or($greater(%_system_month%,2),$greater($mod(%_system_year%,4),0)),1,0)), %_system_day% ), 24 ), %_system_hour% ) , $mul( $add( $mul($substr(%added%,3,4),365), $select($substr(%added%,5,6),0,31,59,90,120,151,181,212,243,273,304,334), $add($div($substr(%added%,3,4),4),$if($or($greater($substr(%added%,5,6),2),$greater($mod($substr(%added%,1,4),4),0)),1,0)), $right(%added%,2) ), 24 ) ) ) , $puts(age,$mul(%play_count%,$get(baselinefrequency))) ) // calculate "recentness": number of hours since song was last played $puts(recentness, $sub( $add( $mul( $add( $mul($right(%_system_year%,2),365), $select(%_system_month%,0,31,59,90,120,151,181,212,243,273,304,334), $add($div($right(%_system_year%,2),4),$if($or($greater(%_system_month%,2),$greater($mod(%_system_year%,4),0)),1,0)), %_system_day% ), 24 ), %_system_hour% ) , $add( $mul( $add( $mul($substr(%last_played%,3,4),365), $select($substr(%last_played%,6,7),0,31,59,90,120,151,181,212,243,273,304,334), $add($div($substr(%last_played%,3,4),4),$if($or($greater($substr(%last_played%,6,7),2),$greater($mod($substr(%last_played%,1,4),4),0)),1,0)), $substr(%last_played%,9,10) ), 24 ), $substr(%last_played%,12,13) ) ) ) // calculate "decay": the specific decay period $puts(decay,$div($mul(%play_count%,$get(baselinefrequency),$get(baselinedecay),$if2(%rating%,$get(avgrating))),$mul($max($get(age),$get(baselinefrequency)),3))) // calculate "hotness" hotness=$div($mul($max($sub($get(decay),$get(recentness)),0),100),$get(decay)) T!"#$%&'   TT T  <"Calibri<"Calibri<"Calibri<"Calibri:%_filename_ext% $tab() $if($strcmp(%__codec%,Vorbis),Ogg , $if($strcmp(%__codec%,PCM),Wav , $if($strcmp(%__codec%,MP3),Mp3 , $if($strcmp(%__codec%,FLAC),Flac , $caps2(%__codec%) ) ) ) ) $if2(%__bitrate_dynamic%,%__bitrate%)kb/s %samplerate%Hz %channels%' | '[%playback_time% / ][%length%]%title%[%artist% - ]%title%