JInT_WISE

superclass: JInT

/**

2007  Till Bovermann (Bielefeld University)

*/

implements basic [JustInTerface] for an IRCAM WISEbox.

Server.default = s = Server.internal; 

s.boot;

(

// set up the WISEBox

"nc -u -l -p 7500 | nc -u localhost 57120".unixCmd

)

k = JInT_WISE.new

k.start

k.controllers[0].action = {|me| me.value.postln}

k.controllers[0].action = nil

// get information on device

k.info

p = ProxySpace.push(s)

~a = {

k[\j0].kr.poll;

SinOsc.ar;

}

(

~a = {

// var ctls = k.at([\j0, \j1, \j2, \j3, \j4, \j5, \j6, \j7, \j8, \j9]).kr.poll;

// var ctls = k[\j5].kr.poll;

var ctls = In.kr((2..7));

Splay.ar(SinOsc.ar(Array.geom(ctls.size, 150, 1.5).reverse) * LFPulse.ar(ctls.range(1, 2 0)).lag(0.01))

}

)

~a.play

~a = {SinOsc.ar(k[\j12].kr.poll)}

~a = {

// var amp = k[\j10].kr.range(-0.1, 1).max(0);

var ctl = k[\j8].kr;

var pFreq = k[\j10].kr.range(0, 20);

Splay.ar(({|i| SinOsc.ar(ctl.exprange((10 - (i+1)) * 50, (10 - (i+1)) * 100).lag(i*1), mul: 0.05)}!20).scramble) * LFPulse.ar(pFreq).lag(0.01);

}

~a.play

k.stop