QUOTE(mazy @ Mar 6 2006, 05:36 AM)
you're correct about the globals, Squeller ...
I didn't port it to the globals yet and I believe it's not possible e.g. to define variables which refer to themselves. There may be other problems. I tried but it wasn't possible to port the "$puts(var," to "var=". Isn't too important, as I want to have vir's
(THANKS, VIR!) solution only in one column.
QUOTE
edit: please post screenshots of your results, i would be interested in seeing it

CLICK!I chose a simple solution with only a unique background color in one column (I may let it vary mod(2) later, some copy and paste job etc.) Somehow I like it as it is. This is my fullscreen fb2k on a notebook attached to the living room stereo.
Makes the playlists more neat, better for your "eye navigation"

This is the "#" columns color code till the background color (I snipped a lot as it has globals):
CODE
//Basic color
$puts(r_basic,80)$puts(r_amp,10)
$puts(g_basic,80)$puts(g_amp,10)
$puts(b_basic,80)$puts(b_amp,10)
//Maximum value of color components to add/substract
$puts(compbits,15)
$puts(hashmul,4)
$puts(allbits,$mul($mul($get(compbits),$get(compbits)),$get(compbits)))
$puts(dpath,$replace(%_directoryname%,
,00032,-,00045,.,00046,/,00047,
0,00048,1,00049,2,00050,3,00051,4,00052,5,00053,6,00054,7,00055,8,00056,9,00057,
A,00065,B,00066,C,00067,D,00068,E,00069,
F,00070,G,00071,H,00072,I,00073,J,00074,
K,00075,L,00076,M,00077,N,00078,O,00079,
P,00080,Q,00081,R,00082,S,00083,T,00084,
U,00085,V,00086,W,00087,X,00088,Y,00089,
Z,00090,
\,00092,_,00095,
a,00097,b,00098,c,00099,d,00100,e,00101,
f,00102,g,00103,h,00104,i,00105,j,00106,
k,00107,l,00108,m,00109,n,00110,o,00111,
p,00112,q,00113,r,00114,s,00115,t,00116,
u,00117,v,00118,w,00119,x,00120,y,00121,
z,00122,
~,00126))
//Initialisation
$puts(hash,0)
//Loop
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
$puts(hash,$mod($add($mul($get(hash),$get(hashmul)),$right($get(dpath),5)),$get(allbits)))
$puts(dpath,$substr($get(dpath),1,$sub($len($get(dpath)),5)))
//End of loop
//Setting color
//Here is an actual color code
$puts(b,$mod($div($div($get(hash),$get(compbits)),$get(compbits)),$get(compbits)))
$puts(b,$sub($add($mul($get(b),$get(b_amp)),$get(b_basic)),$div($mul($get(compbits),$get(b_amp)),2)))
$puts(g,$mod($div($get(hash),$get(compbits)),$get(compbits)))
$puts(g,$sub($add($mul($get(g),$get(g_amp)),$get(g_basic)),$div($mul($get(compbits),$get(g_amp)),2)))
$puts(r,$mod($get(hash),$get(compbits)))
$puts(r,$sub($add($mul($get®,$get(r_amp)),$get(r_basic)),$div($mul($get(compbits),$get(r_amp)),2)))
// text snipped
|
//selected text snipped
|
// background
$if(%_isplaying%,
%_playback%,
$if($strcmp($mod(%_playlist_number%,2),1),$hex($ifgreater($get(b),255,255,$get(b)),2)
$hex($ifgreater($get(g),255,255,$get(g)),2)
$hex($ifgreater($get®,255,255,$get®),2),$hex($ifgreater($get(b),255,255,$get(b)),2)
$hex($ifgreater($get(g),255,255,$get(g)),2)
$hex($ifgreater($get®,255,255,$get®),2))
)|
// snipped
Moderation: CODE to CODEBOX.