SUBSEQUENCE
I2C2MIDI V.2
SCALE: %8
@MODULARBEAT
CV IN: HARMONIZER
IN 1: ADVANCE CHORD
IN 2: STOP CHORD
IN 3: SAMPLE CV IN
IN 4: RESET
PARAM KNOB: CHORD VELOCITY
TR 1: CHORD TRIGGER
TR 2: NEW PATTERN TRIGGER
TR 3: HARMONIZER TRIGGER
TR 4: HARM. ALT (REST/TIE)
CV 1-3: CHORD
CV 4: HARMONIZER PITCH
#1
I && GTE P.I [Link] ! Y; R ! R
IF && I T: J [Link] 3
IF && Y T: PN.I 3 0; J PN 3 0
IF + I Y: $ 6; TR.P * 2 Y; Y 0
IF && I != K J: TR.P 2
K J; [Link] 999 1; $ 8; $ 9
#2
IF STATE 2: I2M.C B K 0; BRK
IF ! I: I2M.C B K 0; K + X 1
J VN [Link] 0 P 63 C I; A * A 12
I2M.C.L C K; [Link] C I J
IF == I X: I2M.C C A PRM; K A
CV * + I 1 < I 3 N + J A; B C
#3
I P 62; K * / IN + I 1 12
PRT 1 [Link] K P 63 C WRP IN 0 I
CV 4 PRT 1; TR.P 3
I OR != PRT 1 PRT 2 != J R
TR.P * 4 I; PRT 2 PRT 1; J R
#4
IF STATE $: Y 1; BRK
I == [Link] 31; J [Link]
IF I: P 63 J; PRT 8 J; BRK
J [Link]; K + [Link] * Z 8
IF J: [Link] [Link]
P K * + [Link] 1 J
#5
J [Link]; K [Link]; I LT J 12
IF == J 13: T K
IF I: Z - J 8; T 0
IF I: [Link].V 13 0; $ 6
IF > J 13: P + J 47 + K 2
L 0 31: $ * 7 == J 12
#6
Z ? T [Link] 3 Z; J PN 1 Z
K * Z 8; [Link] + Z 8
[Link] K; [Link] + K J
P.I - K 1
L [Link] + [Link] 7: $ 7
IF T: D [Link] 3; [Link] 3
#7
J ? [Link] GT I 9 LT I 12
ELSE: [Link] I J; BRK
K WRP I 0 7
[Link].L K ? LTE K PN 1 Z 13 3
IF ! P I: [Link].V K 0; BRK
[Link] + + * K 14 15 P I
#8
[Link].L 9 2 2; K [Link]
[Link].L + D 8 6; J + * Z 8 K
S: TR.P NZ J
IF != [Link] 8: BRK
PN 1 Z K; [Link].L 8 3 3
L 0 K: [Link].L I 13; [Link] J
#M
L 0 7: [Link].L I 0 0; X P 61
J [Link]; C ? J WRP J 1 7 C
L 0 X: A > J 7; $ * 2 NZ J
[Link].L WRP P.I 0 7 3 3
L 15 30: [Link].L I 2 2; [Link]
[Link].L + PN.I 3 15 7 7
#I
J ? [Link] 1 == [Link] 15
K [Link]
PN 3 [Link] - * + [Link] 1 J 1
[Link] ? J K -1; K [Link] 3
PN.L 3 ? + PN 3 K 1 16 K
D [Link] 3; [Link] 3; $ 8
#P
64 4 4 1
1 1 1 1
0 0 0 0
0 3 3 15
0 0 0 0
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 -1
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
2 0 0 0
2 0 0 0
0 0 0 0
#G
0000000010000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
0000000000000000
1000000000000000
0000000000000000
0000000000000000
0000000000000000
0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0