JInT_Wacom

superclass: JInT

2007, 2008  Till Bovermann (Bielefeld University)

implements JInT for a Wacom Tablet (supported: Intuos, Graphire, Bamboo)

Server.default = s = Server.internal; 

s.boot;

k = JInT_Wacom.new;

k.start;

// get information on device

k.info

k[\pos].action = {|me| me.value.postln}

k[\pos].action = nil

k[\x].action = {|me| me.value.postln};

k[\y].action = {|me| me.value.postln};

k[\g].action = {|me| me.value.postln};

k[\h].action = {|me| me.value.postln};

k[\u].action = {|me| me.value.postln};

k[\d].action = {|me| me.value.postln};

k[\r].action = {|me| me.value.postln};

k[\l].action = {|me| me.value.postln};

k[\t].action = {|me| me.value.postln};

k[\z].action = {|me| me.value.postln};

k[\y].action = nil;

k[\x].action = nil;

k[\g].action = nil;

k[\h].action = nil;

k[\u].action = nil;

k[\d].action = nil;

k[\r].action = nil;

k[\l].action = nil;

k[\t].action = nil;

k[\z].action = nil;

k[\z].inspect;

k[\t].inspect;

k[\l].inspect;

k[\r].inspect;

k[\d].inspect;

k[\h].inspect;

k[\g].inspect;

k[\x].inspect;

k[\y].inspect;

k.controllers[6]

set(0, 0)

p = ProxySpace.push(s)

~a = {

k[\pos].kr.poll;

SinOsc.ar!2;

}

(

~a = {

var ctls = k[\pos].kr;

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

}

)

~a.play

~a.stop

(

~a = {

var ctl = k[\pos].kr;

var pFreq = k[\press].kr.range(0, 10).poll;

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) * k[\press].kr.range(0,1);

}

)

~a.play

g

k.stop