-odac -m0 -M0 sr = 48000 ksmps = 64 nchnls = 2 0dbfs = 1 seed 0 #include "wavetables.udo" #define SCSS_MIDI ## #define SCSS_BOOT_INSTRUMENT #run_shit# #include "scss/base.udo" icategory = scss_registercategory("sine", "play_sine1") scss_registerinstr(icategory, ({{ { "name": "play_sine1", "parameters": [ {"name": "frequency", "default": 440, "max": 880, "min": 220} ] } }})) instr play_sine1 icategoryid = p4 ; just used by scss_seqparam(iparamnum) itimeindex = p5 kamp line 0.2, p3, 0 a1 oscil kamp, chnget:i("play_sine1_frequency") scss_catout(a1, a1) endin scss_registerinstr(icategory, ({{ { "name": "play_sine2", "parameters": [ {"name": "frequency", "default": 4400, "max": 8800, "min": 220} ] } }})) instr play_sine2 kamp line 0, p3, 0.2 a1 oscil kamp, 880, gifnSquare scss_catout(a1, a1) endin icategory = scss_registercategory("bass", "play_bass1") scss_registerinstr(icategory, ({{ { "name": "play_bass1", "parameters": [ {"name": "wobble", "default": 0.5, "max": 1, "min": 0.1} ] } }})) instr play_bass1 kamp line 0.2, p3, 0 a1 oscil kamp, 220 scss_catout(a1, a1) endin scss_registerinstr(icategory, ({{ { "name": "play_bass2" } }})) instr play_bass2 kamp line 0.2, p3, 0 a1 oscil kamp, 110 scss_catout(a1, a1) endin instr run_shit prints "run shit\n" index1 = 0 while (index1 < lenarray(giscss_stfn_trig, 1)) do index2 = 0 while (index2 < lenarray(giscss_stfn_trig, 2)) do seq_randtable giscss_stfn_trig[index1][index2] seq_randtable giscss_stfn_dur[index1][index2] index2 += 1 od index1 += 1 od prints "OK then\n\n\n" endin instr test_change1 prints "change 1\n" kval line 120, p3, 160 chnset kval, "scss_bpm" endin instr test_change2 prints "change 2\n" kval line 160, p3, 100 chnset kval, "scss_bpm" endin f0 z