MARKOV SEQUENCER X5 ENHNCD

N1=0 4    N2=5 9   N3=10 14
N4=15 19  N5=20 25

PRM: RECORD
TI.P1: 1=MARKOV 0=SEQ
TI.P2: CHANGE P.N 0 SCALE 
  5 MAX : 0-4 5-9 10-14 ETC...
TI.P3: REQ VARIATION AMOUNT
TI.P4: MARKOV TRI PROBABILITY

TR 1 : TRIGGER 
CV 1: NOTE

TR 2 IS FOR VISUAL FEEDBACK 
ONLY (WHEN IN MARKOV MODE)



#1
IF ! TI.PRM 3: A >> TI.PRM 1 8
PROB RSH TI.PRM 3 8: A RAND 2
IF GT A 0: SCRIPT 2
IF EQ A 0: T 1
ELSE: T 2
L 6 7: SCRIPT I

#2
PROB / TI.PRM 4 163: SCRIPT 3
DEL 1: A 0
B QT TI.PRM 2 5

#3
P.N 0
SCRIPT 4
CV 1 N P.HERE
TR.PULSE 1
X - P.I B
O 0

#4
P.N 1
P.I MUL X 5
IF GT P.I 24: P.I / P.I B
SUB O 1
L 1 5: SCRIPT 5

#5
P.N 1
Y O
Z P.HERE
IF GT Y 0: P.I ADD P.I 1
P.N 0
PROB Z: P.I + - Y 1 B

#6
IF NZ >> PRM 8: D 1
ELSE: D 0
P.N 2
P.NEXT
IF == D 1: P.HERE TR 1
IF NZ P.HERE: TR.PULSE T

#7
P.N 3
P.NEXT
IF == D 1: P.HERE ADD X B
C P.HERE
IF == A 0: SCRIPT 8

#8
P.N 0
P.I C
CV 1 N P.HERE

#M
M 30
P.N 4
IF EQ P.I 0: TR.PULSE 4
TI.PRM.MAP 2 0 25

#I
O 0
O.MIN 0
O.MAX 5
M.ACT 1
L 1 4: TO.TR.TIME I 25
X P.I

#P
41	64	64	64
1	1	1	1
0	0	0	0
43	24	15	15

0	20	1	0
4	50	1	1
7	50	1	2
9	0	1	2
12	20	1	2
0	0	0	0
5	0	0	4
6	80	0	0
7	0	1	1
13	0	0	1
0	50	0	1
5	0	0	1
9	0	1	0
12	0	1	0
17	0	1	0
0	50	1	0
4	0	0	2
12	0	0	3
13	0	0	3
16	0	0	3
0	50	1	3
0	0	1	3
0	0	1	2
0	50	1	2
0	0	1	3
0	0	0	2
0	0	0	2
0	0	1	2
0	0	1	3
0	0	1	2
0	0	0	2
0	0	0	3
0	0	1	3
0	0	0	3
0	0	1	2
0	0	0	2
0	0	1	2
0	0	0	2
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	0	3
0	0	1	3
0	0	0	3
0	0	0	3
0	0	1	3
0	0	1	3
0	0	1	3
0	0	0	3
0	0	0	3
0	0	1	3
0	0	1	3
0	0	0	0
0	0	0	0
0	0	0	0