View this PageEdit this PageUploads to this PageHistory of this PageTop of the SwikiRecent ChangesSearch the SwikiHelp Guide

Super Genre Creator

A small tool generate the next big wave in dace music

This is quite possibly the most complex sc patch in existance...
download file: super_genre_generator.rtf
var terms, output;
var window, compView, display;

terms = [
	"break ",
	"nrg ",
	"core ",
	"hard ",
	"tech ",
	"psy ",
	"happy ",
	"and ",
	"nuclear ",
	"intelligent ",
	"step ",
	"horizontal ",
	"dark ",
	"soft ",
	"uk ",
	"spagetti ",
	"cowboy ",
	"japanese ",
	"smooth ",
	"epic ",
	"micro ",
	"candy ",
	"rave ",
	"techno ",
	"old school ",
	"proto ",
	"progressive ",
	"industrial ",
	"deep ",
	"acid ",
	"future ",
	"hip ",
	"dub ",
	"ambient ",
	"nu-",
	"high ",
	"art ",
	"tribal ",
	"brit ",
	"funky ",
	"speed ",
	"ghetto ",
	"tempo ",
	"minimal ",
	"experimental ",
	"2-",
	"4-",
	"UK ",
	"Cali ",
	"NY ",
	"Detroit ",
	"laptop ",
	"horror ",
	"sushi ",
	"insane ",
	"power ",
	"polar ",
	"electro ",
	"artic ",
	"day ",
	"east coast ",
	"west coast ",
	"broken ",
	"dirty ",
	"ultra ",
	"trash ",
	"death ",
	"garage ",
	"techno ",
	"house ",
	"giggle",
	"butterfly ",
	"fast ",
	"slow ",
	"freaky ",
	"sleepy "
];

window = SCWindow("Trend Setter", Rect(0,0,300, 95), false).front;
window.view.background_(Color.white);	

compView = SCCompositeView(window, Rect(5, 5, 290, 85))
	.background_(Color.black);
	
SCStaticText(compView, Rect(10, 10, 280, 15))
	.background_(Color.white)
	.string_("Genre Generator");
	
SCButton(compView, Rect(10, 30, 280, 15))
	.states_([["Generate", Color.white, Color.grey]])
	.action_({
		var phrase = "";
		rrand(2,5).do({
			phrase = phrase ++ terms.choose;
		});
		output = phrase;
		display.string_(phrase);
	});
	
display = SCStaticText(compView, Rect(10, 50, 280, 15))
	.background_(Color.white)
	.string_("");
	
SCButton(compView, Rect(10, 70, 280, 15))
	.states_([["Speak", Color.white, Color.grey]])
	.action_({
		display.string.speak;
	});
****
/*
authors so far:
casey basichis
*/


Link to this Page