#TITLE 19-tet Modal Musical Test
#COMPOSER Diptera
#PROGRAMER 2005 Stevie Hryciw

;	--------
;	|macros|
;	--------

@v0 =	{ 15 15 14 14 14 13 13 12 12 11 11 10 10 9 9 8 8 7 6 5 4 }

@0 =	{ 0 0 3 3 2 }
@1 =	{ 2 2 3 3 0 }

;	-------
;	|tempo|
;	-------

AB	t93

;	------------
;	|initialize|
;	------------

A	l8 o4 q8 @v0 @@1
B	l8 o5 q8 @v0 @@0

;	----------
;	|sequence|
;	----------

AB	L

;	A minor mode

A	l8 @v0 q8 @@1	r @n$00FE @n$011B @n$00FE @n$013C @n$00FE @n$0154 @n$00FE @n$017B @n$01A7	l4 @n$01FC @n$01C7 @n$01A7 @n$017B					@n$01A7,2.
B	l4 @v0 q8 @@0	r4 @n$02A8 @n$02F7 @n$034F @n$038F						l8 @n$034F @n$03F9 @n$02F7 @n$03F9 @n$02A8 @n$03F9 @n$04F1 @n$046E	@n$03F9,2.

;	A subminor mode

A	l8 @v0 q8 @@1	r @n$00FE @n$0125 @n$00FE @n$0147 @n$00FE @n$0154 @n$00FE @n$017B @n$01B7	l4 @n$01FC @n$01C7 @n$01B7 @n$017B					@n$01B7,2.
B	l4 @v0 q8 @@0	r4 @n$02A8 @n$02F7 @n$036E @n$038F						l8 @n$036E @n$03F9 @n$02F7 @n$03F9 @n$02A8 @n$03F9 @n$0520 @n$0498	@n$03F9,2.

;	A major mode

A	l8 @v0 q8 @@0	r @n$00FE @n$0111 @n$00FE @n$0130 @n$00FE @n$0154 @n$00FE @n$017B @n$0198	l4 @n$01FC @n$01C7 @n$0198 @n$017B					@n$0198,2.
B	l4 @v0 q8 @@1	r4 @n$02A8 @n$02F7 @n$0331 @n$038F						l8 @n$0331 @n$03F9 @n$02F7 @n$03F9 @n$02A8 @n$03F9 @n$04C4 @n$0445	@n$03F9,2.

;	A supermajor mode

A	l8 @v0 q8 @@0	r @n$00FE @n$0107 @n$00FE @n$0125 @n$00FE @n$0154 @n$00FE @n$017B @n$0189	l4 @n$01FC @n$01C7 @n$0189 @n$017B					@n$0189,2.
B	l4 @v0 q8 @@1	r4 @n$02A8 @n$02F7 @n$0313 @n$038F						l8 @n$0313 @n$03F9 @n$02F7 @n$03F9 @n$02A8 @n$03F9 @n$0498 @n$041E	@n$03F9,2.