You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

76 lines
2.0 KiB
Python

FluidDataSet : UGen {
var <> synth, <> server;
*kr{ |name, dims|
^this.multiNew('control',name, dims);
}
*new{ |server, name, dims|
var synth, instance;
server = server ? Server.default;
synth = {instance = FluidDataSet.kr(name,dims)}.play(server);
instance.server = server;
instance.synth = synth;
^instance
}
*new1 { |rate, name, dims|
var ascii = name.ascii;
^super.new1(*[rate, ascii.size].addAll(ascii)++dims);
}
init { |size...chars|
//Send the number of inputs (size of provider string) as specialIndex,
//so server plugin knows what's going on
specialIndex = -1;
inputs = [size].addAll(chars);
}
addPoint{|label, buffer, action|
this.pr_sendMsg(\addPoint,[label,buffer.asUGenInput],action);
}
getPoint{|label, buffer, action|
this.pr_sendMsg(\getPoint,[label,buffer.asUGenInput],action);
}
updatePoint{|label, buffer, action|
this.pr_sendMsg(\updatePoint,[label,buffer.asUGenInput],action);
}
deletePoint{|label,buffer, action|
this.pr_sendMsg(\deletePoint,[label,buffer.asUGenInput],action);
}
cols {|action|
this.pr_sendMsg(\cols,[],action,[numbers(FluidMessageResponse,_,1,_)]);
}
read{|filename,action|
this.pr_sendMsg(\read,[filename],action);
}
write{|filename,action|
this.pr_sendMsg(\write,[filename],action);
}
size { |action|
this.pr_sendMsg(\size,[],action,[numbers(FluidMessageResponse,_,1,_)]);
}
clear { |action|
this.pr_sendMsg(\clear,[],action);
}
pr_sendMsg { |msg, args, action,parser|
OSCFunc(
{ |msg|
var result = FluidMessageResponse.collectArgs(parser,msg.drop(3));
if(result.notNil){action.value(result)}{action.value};
},'/'++msg
).oneShot;
this.server.listSendMsg(['/u_cmd',this.synth.nodeID,this.synthIndex,msg].addAll(args));
}
}