3 files changed, 29 insertions(+), 1 deletions(-)

A etc/include
A etc/io.orca
M src/library.tal

@@ 0,0 1,3 @@
+#...........................#
+#.Body.of.included.file.....#
+#...........................#

@@ 0,0 1,25 @@
+.................................................................................................
+.................................................................................................
+........#.synth.#.......=04c............#.will.play.C4.#.........................................
+.................................................................................................
+........#.midi..#.......:04c............#.will.print.1.#.........................................
+.................................................................................................
+........#.pitch.#.......;4c.............#.will.print.1.#.........................................
+.................................................................................................
+........#.byte..#......./31.............#.will.print.1.#.........................................
+.................................................................................................
+........#.self..#.......$include.................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................
+.................................................................................................

@@ 614,7 614,7 @@ JMP2r
 		DUP LIT '. NEQ ,&normalize JCN
 			( default to max ) POP #7f ,&continue JMP
 		&normalize
-		;base128 &continue SWP
+		;base128 JSR2 &continue SWP
 	( get channel ) [ LIT &ch $1 ]
 
 	( note on )