2 files changed, 36 insertions(+), 6 deletions(-)

M orca.tal
M untitled.orca

@@ 6,7 6,6 @@
 		- Display short timer
 		- Drag Selection
 		- sharp notes
-		- Draw VU
 		- Change BPM
 		- Insert mode
 )


@@ 192,6 191,8 @@ BRK
 
 	( paused ) .timer/alive LDZ #01 JCN [ BRK ]
 
+	;draw-meter JSR2
+
 	.timer/beat LDZ #01 + DUP .timer/beat STZ
 
 	( skip ) #08 = #01 JCN [ BRK ]


@@ 974,7 975,7 @@ RTN
 	STH2kr #0008 ++ .Screen/x DEO2
 		#0f AND GET-CHAR #20 - #00 SWP 8** ;font ++ .Screen/addr DEO2
 	#21 .Screen/color DEO
-	
+
 	( Positiony )
 	STH2kr #0010 ++ .Screen/x DEO2
 	.selection/y1 LDZ


@@ 1012,6 1013,35 @@ RTN
 
 RTN
 
+@draw-meter ( -- )
+	
+	.toolbar/y1 LDZ2 #0001 -- .Screen/y DEO2
+
+	( merge channels )
+	.Audio0/output DEI DUP #0f AND STH #04 SFT STH
+	.Audio1/output DEI DUP #0f AND STH #04 SFT STH
+		ROTr ADDr ROTr ROTr ADDr SWPr
+	.Audio2/output DEI DUP #0f AND STH #04 SFT STH
+		ROTr ADDr ROTr ROTr ADDr SWPr
+	.Audio3/output DEI DUP #0f AND STH #04 SFT STH
+		ROTr ADDr ROTr ROTr ADDr SWPr
+
+	( draw )
+	#08 #00
+	&loop
+		.toolbar/x2 LDZ2 #0028 -- .Screen/x DEO2
+		OVR OVRr STHr #04 / < .Screen/color DEO
+		.toolbar/x2 LDZ2 #0026 -- .Screen/x DEO2
+		OVR STHkr #04 / < .Screen/color DEO
+		.Screen/y DEI2 #0001 ++ .Screen/y DEO2
+		( incr ) DECR
+		GTHk ,&loop JCN
+	POP2
+
+	POP2r
+
+RTN
+
 @draw-state ( -- )
 	
 	.toolbar/x2 LDZ2 #0008 -- .Screen/x DEO2

@@ 2,10 2,10 @@
 .#.DEMO.......................#..........
 .........................................
 ..1AC..1BC..1CC..1DC..1FC...G............
-...d....b....1...........................
+...d....b....8...........................
 .........................................
 ...H...1IC...J....K...1LC..1MC...........
-........7..............1....c............
+........4..............1....c............
 .........................................
 ...O....P....Q....R....T....U............
 ..................0......................


@@ 13,8 13,8 @@
 ...V....X....Y....Z......................
 ..................0......................
 .........................................
-.........................................
-.........................................
+.......................D5................
+........................=03C.............
 .........................................
 .........................................
 .........................................