[sc-users] Color

[Jesper Elén <jesper.elen@xxxxxxxxxxxxxxxxxxxxxx>]

Hi list, for some reason I can't set color when doing this inversion.
Color.hsv( 360 - (i/360), 1, 1 ).set;

but this works:

Color.hsv( i/360, 1, 1 ).set;

Jesper  


(
"spectra", 
{ arg out=0, freq=7000, range=0.1, amp=1.0, pan=0.0;
var env;
Out.ar(out, Pan2.ar( BPF.ar( WhiteNoise.ar( amp ), freq, range ), pan ))
}).send(s);

)


(  var syn, hue;
w = "Spectra", Rect( 100, 300, 1080, 300 )).front;
x = SCRangeSlider( w, Rect( 0, 260, 1080, 30 )).backColor_( Color.gray ).knobColor_( Color.black );
x.lo_( 0.3 );
x.hi_( 0.4 );
w.drawHook = {
360.do({ arg i;
Color.hsv( i/360, 1, 1 ).set;
Pen.width = 3;
Pen.moveTo( Point( i*3, 0 ));

Pen.lineTo( Point( i*3, 250 ));
Pen.stroke
});	
};
w.refresh;
syn = Synth( \spectra );	
x.action_({
syn.set( \freq, ( x.lo + ( (x.hi - x.lo) / 2 ) * 20000 ).max( 0.01 ), \range, (x.hi - x.lo).max(0.01) );  
});
w.onClose_( {  syn.free } );		



)