ĽâÖ՝Ę#žZtr Play^$if(%_ispaused%,||, $if(%_isplaying%, $if($strcmp($mod(%_time_elapsed_seconds%,2),0),►,)))  ˙˙˙˙ÁTitle;$if(%bonustrack%,%_lited%|%_lited% * ) $if($and(%_mark_never_played%,$not($greater($if3(%play_counter%,%play counter%),0))),%_maind%|%_maind%$if2(%title%,$replace($if($stricmp($left(%_path_raw%,7),'http://'),%_path_raw%,%_filename%),'_',' ','%20',' ')), $replace($if2(%title%,$replace($if($stricmp($left(%_path_raw%,7),'http://'),%_path_raw%,%_filename%),'_',' ','%20',' ')),'(',%_maind%|%_maind%'(',')',')','[',%_maind%|%_maind%'[',']',']','<',%_maind%|%_maind%'<','>','>')) $if(%_xvarious%,[%_lited%|%_lited% • %_maind%|%_maind%%artist%])Č ◊*;*-s-*  ˙˙˙˙KTitle_SĂ$if($and(%_mark_never_played%,$not($greater($if3(%play_counter%,%play counter%),0))),%_maind%|%_maind%$if2(%title%,$replace($if($stricmp($left(%_path_raw%,7),'http://'),%_path_raw%,%_filename%),'_',' ','%20',' ')), $replace($if2(%title%,$replace($if($stricmp($left(%_path_raw%,7),'http://'),%_path_raw%,%_filename%),'_',' ','%20',' ')),'(',%_maind%|%_maind%'(',')',')','[',%_maind%|%_maind%'[',']',']','<',%_maind%|%_maind%'<','>','>'))d ◊*;*-s-*  ˙˙˙˙ŠTime.[%_time_elapsed%$if(%_length%, / )][%_length%]D  ˙˙˙˙Ű< Play^$if(%_ispaused%,||, $if(%_isplaying%, $if($strcmp($mod(%_time_elapsed_seconds%,2),0),◄,)))   ˙˙˙˙¤---------------||%_bline%|%_blines% ◊*;*-s-*  ˙˙˙˙SAlbum_S$if(%album%,%album%[ CD$num(%disc%,1)]) $if(%discname%,$if(%_isplaying%,%_dark%|%_dark%,%_darkd%|%_darkd%)' ('%discname%')')L$if(%_isplaying%,%_darkp%|%_darkp%,%_dark%|%_dark%)| %_bartist%|%_bartists%d ◊*;*-s-*  ˙˙˙˙¤---------------||%_bline%|%_blines% ◊*;*-s-*  ˙˙˙˙űBitrate'$if2(%__bitrate_dynamic%,[%__bitrate%])L$if(%_isplaying%,%_litep%|%_litep%,%_lite%|%_lite%)| %_bartist%|%_bartists% ◊*;*-s-*  ˙˙˙˙¤---------------||%_bline%|%_blines% ◊*;*-s-*  ˙˙˙˙Codec6$codec() $if($stricmp($codec(),MP3),[ %__extrainfo%])L$if(%_isplaying%,%_litep%|%_litep%,%_lite%|%_lite%)| %_bartist%|%_bartists%< ◊*;*-s-*  ˙˙˙˙¤---------------||%_bline%|%_blines% ◊*;*-s-*  ˙˙˙˙• + ReplayGainź$if(%__replaygain_track_gain%,●,$if(%_isplaying%,%_lite%|%_lite%,%_lited%|%_lited%)○) $if(%__replaygain_album_gain%,●,$if(%_isplaying%,%_lite%|%_lite%,%_lited%|%_lited%)○)L$if(%_isplaying%,%_litep%|%_litep%,%_lite%|%_lite%)| %_bartist%|%_bartists% ◊*;*-s-*  ˙˙˙˙š---------------||%_bline%|%_blines%  ˙˙˙˙đ # Counter$$if3(%play_counter%,%play counter%,)&%_main%|%_main%|%_bartist%|%_bartists%$num($sub(100,%_hotness%),3) ◊*;*-s-*  ˙˙˙˙š---------------||%_bline%|%_blines%  ˙˙˙˙ź File path<$if(%_isplaying%,%_darkp%|%_darkp%,%_dark%|%_dark%)%_path%d  ˙˙˙˙‚ # File Size $if(%_isplaying%,%_darkp%|%_darkp%,%_dark%|%_dark%) $num($left($num($muldiv(%_filesize%,100,1048576),6),4),1) .$right($muldiv(%_filesize%,100,1048576),2) MBL$if(%_isplaying%,%_litep%|%_litep%,%_lite%|%_lite%)| %_bnumber%|%_bnumbers%$num(%_filesize%,16)<  ˙˙˙˙š---------------||%_bline%|%_blines%  ˙˙˙˙ Hotness●ƒ$blend(%_unselbg%,%_hotcolor%,%_hotness%,100)| $blend(%_unselbg%,%_hotcolor%,%_hotness%,100)| %_unselbg%| %_unselbg%$num($sub(100,%_hotness%),3)  ˙˙˙˙›///// SOAP v0.74b ///// by mixcherry // // Changelog: // // 0.74b 050511 // - added alternative (which is now default ;)) 'Album Info' column // (info displayed in a box). // If you want to switch between the different styles, you have to // enable all 3 '[alt] Album' columns and disable normal 'Album' // column. // Many, many thanks to Insolent for inspiration!! :) // - again: optimized the code a bit to make it a little faster (not // much, tho) // // // --- CONFIGURATION BEGIN --- // // // Choose colour scheme: // 1 - mixcherry [ Selected item frame = (203,168,129) ] // 2 - Codename : Opus Blue [ Selected item frame = (132,148,174) ] // 3 - Green Apple [ Selected item frame = (113,135,123) ] // 4 - xxx [ Selected item frame = (x,x,x) ] $puts(scheme,4) // // Specify the name of the folder where you store your 'single' files: $puts(singles_directory,'=S=') // // Specify the prefix to the name of the folder with 'various artists' album: $puts(various_directory,'VA - ') // // Dim all the files that have never been played (0 = OFF, 1 = ON): $puts(mark_never_played,1) // // Calculate 'Rating' from 'Play Counter': // If this option is set to 0, then the 'rating' or 'trackrating' tag is used. // Otherwise, the song will get (play_counter div pc2rg_divider) // 'rating marks', e.g. if you've listened 17 times to the song and // the pc2rg_divider=3, then the song will get 5 'rating marks' (of maximum 6). $puts(pc2rg_divider,2) // // // --- CONFIGURATION END --- // // // DETECTING SINGLETRACK (in albums mode) $if($not(%tracknumber%),xsingle=1, $if(%singletrack%,xsingle=1, $if($not(%album%),xsingle=1, $if($strstr($upper(%_path%),$upper($get(singles_directory))),xsingle=1)))) // DETECTING VARIOUS ARTISTS (in albums mode) $if($or(%various%,%album artist%,%performer%),xvarious=1, $if($stricmp($get(various_directory),$left(%_directoryname%,$len2($get(various_directory)))),xvarious=1, $if($stricmp($get(various_directory),$left($directory(%_path%,2),$len2($get(various_directory)))),xvarious=1))) // EXPORTING SETTINGS $if($strcmp(1,$get(mark_never_played)),mark_never_played=1) $if($greater($get(pc2rg_divider),0),pc2rg_divider=$get(pc2rg_divider)) // COLOR SCHEMES $select($get(scheme), // --- 01 --- // Backgrounds bmain=ECF3F3bmains=F4F8F8bartist=CCECF4bartists=E0F4F8bnumber=BDD1E3bnumbers=D7E3EEbline=81A8CBblines=B3CBE0 // Texts main=60639mainp=60639maind=536992dark=536992darkp=1E2555darkd=81A8CBlite=81A8CBlitep=536992lited=B3CBE0, // --- 02 --- // Backgrounds bmain=F6F8F8bmains=FFFFFFbartist=ECEFEFbartists=F8F9F9bnumber=D3B6A6bnumbers=DFCABEbline=AE9484blines=C6B3A8 // Texts main=390606mainp=390606maind=8A5F50dark=8A5F50darkp=4C1B17darkd=AE8772lite=AE8772litep=805548lited=CDAF9E, // --- 03 --- // Backgrounds bmain=F6FEFCbmains=E9FBF9bartist=B8C2B6bartists=E9FBF9bnumber=A3AD9Abnumbers=E9FBF9bline=7B8771blines=E9FBF9unselbg=A3AD9Aselbg=A3AD9A // Texts main=444C3Dmainp=444C3Dmaind=74A5AEdark=606957darkp=444C3Ddarkd=7B8771lite=7B8771litep=444C3Dlited=98A390, // --- 04 --- // Backgrounds bmain=BBC2BBbmains=A7AFA7bartist=A7AFA7bartists=88938Dbnumber=88938Dbnumbers=88938Dbline=4A584Ablines=4A584A // Texts main=000000mainp=666666maind=666666dark=000000darkp=000000darkd=000000lite=000000litep=000000lited=000000 ) //////////////// // Settings // //////////////// playtext=FFFFFF warnbitratecolor=00FFFF badbitratecolor=0000FF notaddedcolor=00FFFF hotcolor=fcfef6 ///////////////////////////////////////// // HOTNESS - an algorithm for meta-rating ///////////////////////////////////////// // 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,14) $puts(baselinedecay,7) // begin decay immediately? (1=yes, 0=no) $puts(begindecaynow,1) // default rating for unrated songs $puts(avgrating,3) // calculate "age": the number of days the song has been in the library $if(%added%, $puts(age, $sub( $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% ), $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) ) ) ), $puts(age,$mul(%play_counter%,$get(baselinefrequency))) ) // calculate "recentness": number of days since song was last played $puts(recentness, $sub( $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% ), $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) ) ) ) // calculate "decay": the specific decay period $puts(decay,$div($mul(%play_counter%,$get(baselinefrequency),$get(baselinedecay),$if2(%rating%,$get(avgrating))),$mul($max($get(age),$get(baselinefrequency)),3))) // calculate "hotness" hotness=$div($mul($max($sub($get(decay),$add($get(recentness),$get(begindecaynow))),0),100),$get(decay)) ////////////////////////////// decay=$get(decay) recentness=$get(recentness) age=$get(age) metarating=$div($mul($if2(%rating%,$get(avgrating)),%play_counter%,100),$get(age))F$if(%_isplaying%,%_mainp%|%_mainp%,%_main%|%_main%)|%_bmain%|%_bmains%üţö„”Ž  ˙˙˙ŔŔŔ˙˙˙˙˙˙ 9 řřö <ő˙˙˙î"Arial<ő˙˙˙"Arial<ő˙˙˙"Arial˙˙˙˙