For .58:
CODE
$puts(Q,$mod($div($get(COUNT),256),2))
$if($strcmp($get(Q),0),$puts(L,$mod($get(COUNT),256)),$puts(L,$sub(255,$mod($get(COUNT),256))))
$puts(HEX10,A)$puts(HEX11,B)$puts(HEX12,C)$puts(HEX13,D)$puts(HEX14,E)$puts(HEX15,F)
$puts(H,$get(L))$puts(T,$div($get(H),16))
$if($greater(10,$get(T)),$puts(V,$get(T)),$puts(V,$get(HEX$get(T))))
$puts(T,$sub($get(H),$mul($div($get(H),16),16)))
$if($greater(10,$get(T)),$puts(V,$get(V)$get(T)),$puts(V,$get(V)$get(HEX$get(T))))
$puts(BWG,$get(V)$get(V)$get(V))
// Playlist #
1212d0|1212d0$num(%_playlist_number%,4)':'
// Display replaygain indicator
$if(%__replaygain_album_gain%,9a3a45|9a3a45ώ,)
$if($and(%__replaygain_track_gain%, $not(%__replaygain_album_gain%)),5b2329|5b2329ώ,)
$if(%__replaygain_track_gain%%__replaygain_album_gain%,,0000FF|0000FFω)
$if(%_isplaying%,
$if(%title%,00e9f4|00e9f4$padcut($if(%artist%,%artist%,),25) $if(%tracknumber%,$padcut(DDDDDD|DDDDDD-00e9f4|00e9f4 $num(%tracknumber%,2) ,36),DDDDDD|DDDDDD- ) $padcut($if(%title%,0000FF|0000FF- 00e9f4|00e9f4%title%,),70) $if(%date%,$padcut( DDDDDD|DDDDDD-00e9f4|00e9f4 '['%date%']',41), - '[ ]')
$if(%album%,$padcut(- 00e9f4|00e9f4%album%,52),$padcut('- ',35)), $padcut(808080%_filename%BF408F,85)NO TAGS FOUND!$padcut(,33)),
$if(%title%,0078b9|1189ca$padcut($if(%artist%,%artist%,),25) $if(%tracknumber%,$padcut(DDDDDD|DDDDDD-1212d0|0000ff $num(%tracknumber%,2) ,36),DDDDDD|DDDDDD- ) $padcut($if(%title%,0000FF|0000FF- DDDDDD|EEEEEE%title%,),70) $if(%date%,$padcut( -0078b9|1189ca '['%date%']',26), - '[ ]')
$if(%album%,$padcut(- 5B5B5B%album%,45),$padcut('- ',35)), $padcut(808080%_filename%BF408F,85)NO TAGS FOUND!$padcut(,33))
)
[c4c441|FFFF80%_length%]$get(BWG)|$get(BWG)³FFB0FF|FFB0FF$pad_right($num(%__bitrate%,3),3)C080FF|C080FFkbps
Screenshot is
here.
And here's an interesting snippet. It could probably be made a bit tighter, but oh well. It's a gradient thing that fades from one color to another. (Screenshot
here)
CODE
// Define Gradient Start Color
$puts(R1,20)$puts(G1,254)$puts(B1,254)
// Define Gradient End Color
$puts(R2,254)$puts(G2,220)$puts(B2,1)
// Set Fade Speed
$puts(FS,5)
// Cycle RGB value for gradient
$puts(COUNT,$mul($get(FS),$sub(%_playlist_number%,1)))
$puts(RDIF,$sub($get(R2),$get(R1)))
$puts(GDIF,$sub($get(G2),$get(G1)))
$puts(BDIF,$sub($get(B2),$get(B1)))
$puts(BIGDIF,$max($max($get(RDIF),$get(GDIF)),$get(BDIF)))
$if($greater($get(BIGDIF),0),,$puts(BIGDIF,$mul($get(BIGDIF),-1)))
$puts(RSC,$div($mul($get(RDIF),$get(COUNT)),$get(BIGDIF)))
$puts(GSC,$div($mul($get(GDIF),$get(COUNT)),$get(BIGDIF)))
$puts(BSC,$div($mul($get(BDIF),$get(COUNT)),$get(BIGDIF)))
$puts(RDIR,$mod($div($get(RSC),$get(RDIF)),2))
$puts(GDIR,$mod($div($get(GSC),$get(GDIF)),2))
$puts(BDIR,$mod($div($get(BSC),$get(BDIF)),2))
$if($greater($get(RDIF),0),$puts(RDIR,$add($get(RDIR),1)),$puts(RDIR,$add($get(RDIR),1)))
$if($greater($get(GDIF),0),$puts(RDIR,$add($get(RDIR),1)),$puts(GDIR,$add($get(GDIR),1)))
$if($greater($get(BDIF),0),$puts(RDIR,$add($get(RDIR),1)),$puts(BDIR,$add($get(BDIR),1)))
$puts(RT,$mod($get(RSC),$get(RDIF)))
$puts(GT,$mod($get(GSC),$get(GDIF)))
$puts(BT,$mod($get(BSC),$get(BDIF)))
$if($strcmp($get(RDIF),0),$puts(R,0),$select($get(RDIR),$puts(R,$add($get(R1),$get(RT))),$puts(R,$sub($get(R2),$get(RT)))))
$if($strcmp($get(GDIF),0),$puts(G,0),$select($get(GDIR),$puts(G,$add($get(G1),$get(GT))),$puts(G,$sub($get(G2),$get(GT)))))
$if($strcmp($get(BDIF),0),$puts(B,0),$select($get(BDIR),$puts(B,$add($get(B1),$get(BT))),$puts(B,$sub($get(B2),$get(BT)))))
// Create Hex Code for Gradient
$puts(HEX10,A)$puts(HEX11,B)$puts(HEX12,C)$puts(HEX13,D)
$puts(HEX14,E)$puts(HEX15,F)
// Blue
$puts(H,$get(B))$puts(T,$div($get(H),16))
$if($greater(10,$get(T)),$puts(V,$get(T)),$puts(V,$get(HEX$get(T))))
$puts(T,$sub($get(H),$mul($div($get(H),16),16)))
$if($greater(10,$get(T)),$puts(V,$get(V)$get(T)),$puts(V,$get(V)$get(HEX$get(T))))
$puts(HEX,$get(HEX)$get(V))
// Green
$puts(H,$get(G))$puts(T,$div($get(H),16))
$if($greater(10,$get(T)),$puts(V,$get(T)),$puts(V,$get(HEX$get(T))))
$puts(T,$sub($get(H),$mul($div($get(H),16),16)))
$if($greater(10,$get(T)),$puts(V,$get(V)$get(T)),$puts(V,$get(V)$get(HEX$get(T))))
$puts(HEX,$get(HEX)$get(V))
// Red
$puts(H,$get(R))$puts(T,$div($get(H),16))
$if($greater(10,$get(T)),$puts(V,$get(T)),$puts(V,$get(HEX$get(T))))
$puts(T,$sub($get(H),$mul($div($get(H),16),16)))
$if($greater(10,$get(T)),$puts(V,$get(V)$get(T)),$puts(V,$get(V)$get(HEX$get(T))))
$puts(HEX,$get(HEX)$get(V))
Should be self-explanatory. You put the starting RGB value in R1,G1, and B1 and the end in R2,G2, and B2. The final hex code is in the variable HEX. To use that you just need something like:
CODE
$get(HEX)
Look at the colors!
If you find any bugs/see any way to make the code smaller, i'd like to know!