10-26-2025, 02:36 PM
(This post was last modified: 10-26-2025, 05:00 PM by Cocosunshine.)
I really like this, thank you. I was able to send the output on my cv 16 expander, this is how it works for me. I have a module that doesn't recognize the trig one shot, maybe if I modify the env shape it will work, if that's possible. But it works great with the Rample module for now.
00 | GLOB CLKO
01 | TRIG TR 4
02 | CALC CNT 0001
03 | CALC RNDM =0=7
04 | CALC S&H 0003
05 | SKIP 01 < 04=0
06 | CALC IF = 02=0 SETV V A SRC
07 | SKIP 01 >= 04=1
08 | CALC IF = 02=7 SETV V A SRC
09 | SKIP 01 < 04=1
0A | CALC IF = 02=4 SETV V B SRC
0B | SKIP 01 >= 04=1
0C | CALC IF = 02=3 SETV V B SRC
0D | VAR # A SRC CV16 EV10 1-1 ; Main Kick
0E | VAR # B SRC CV16 EV10 1-2 ; Snare
0F | CALC IF = VA=1 SETV V C SRC
10 | CALC IF = VB=1 SETV V C SRC
11 | SKIP 03 = VC=1
12 | SKIP 01 < 04=3
13 | GLOB CLKO CV16 EV10 1-3 ; Accent / Offbeat (hi-hat) or Bass
14 | CALC RNDM =0=7
15 | SKIP 01 < 14=6
16 | CALC IF = 02=0 SETV V D SRC
17 | VAR # D SRC CV16 EV10 1-4 ; Rare accent of something on the beat, could be a loop.
00 | GLOB CLKO
01 | TRIG TR 4
02 | CALC CNT 0001
03 | CALC RNDM =0=7
04 | CALC S&H 0003
05 | SKIP 01 < 04=0
06 | CALC IF = 02=0 SETV V A SRC
07 | SKIP 01 >= 04=1
08 | CALC IF = 02=7 SETV V A SRC
09 | SKIP 01 < 04=1
0A | CALC IF = 02=4 SETV V B SRC
0B | SKIP 01 >= 04=1
0C | CALC IF = 02=3 SETV V B SRC
0D | VAR # A SRC CV16 EV10 1-1 ; Main Kick
0E | VAR # B SRC CV16 EV10 1-2 ; Snare
0F | CALC IF = VA=1 SETV V C SRC
10 | CALC IF = VB=1 SETV V C SRC
11 | SKIP 03 = VC=1
12 | SKIP 01 < 04=3
13 | GLOB CLKO CV16 EV10 1-3 ; Accent / Offbeat (hi-hat) or Bass
14 | CALC RNDM =0=7
15 | SKIP 01 < 14=6
16 | CALC IF = 02=0 SETV V D SRC
17 | VAR # D SRC CV16 EV10 1-4 ; Rare accent of something on the beat, could be a loop.