canto.scd

// Canto Ostinato :: Simeon Ten Holt
//
// version for harp and electronics
// W. Snoei 2012

(
/*
RoundView.dontRefresh = false;

RoundView.dontRefresh = true;
*/

~canto = ~canto ? EM();

~canto.latency = ((s.options.hardwareBufferSize * 1) + 64)/44100;

~canto.path = thisProcess.nowExecutingPath.dirname;

~canto.fileNames = [
	"midi import",
	"play",
	"window",
	"icontrols",
	"reverb",
	"recbuf",
	//"loop",
	"delays",
	"revDelay",
	"freeze",
	"fastFreeze",
	"clicks",
	"bass drum",
	"beats",
	"nanokontrol",
].collect({ |item| ~canto.path +/+ "canto" + item ++ ".scd" });

~canto.fileNames.do(_.load);

~canto.fileWindow !? _.close;

~canto.fileWindow = Window( "canto files", 
		Rect( 9, 366, 130, (~canto.fileNames.size * 20) + 4 ) 
).front;

~canto.fileWindow.addFlowLayout;

~canto.fileNames.do({ |item|
	RoundButton( ~canto.fileWindow, 122 @ 16 )
		.label_( item.basename )
		.action_({ Document.open( item ) });
});

~canto.startAll = { |evt|
	evt.delay.global.start;
	evt.delay.input.start;
	evt.delay.input.amp = 0;
	evt.ir.start;
	evt.start;
	NanoKONTROL.setScene(0);
};

~canto.endAll = { |evt|
	evt.end;
	evt.ir.stop;
	[
		\delay,
		\revDelay,
	].do({ |item| 
		evt[item].global.end;
		evt[item].input.end;
	});
	
	[
		\freeze1,
		\fastFreeze,
		\fastFreeze2,
		\clicks,
	].do({ |item| 
		evt[item].end;
	});
};

)