From 377d005c57bfa0bf9e51acd85a3405b6398e0789 Mon Sep 17 00:00:00 2001
From: Nihilazo <nico@itwont.work>
Date: Wed, 26 May 2021 16:58:58 +0100
Subject: [PATCH] draw blank notes as ---

---
 main.usm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/main.usm b/main.usm
index 296178f..a2b57df 100644
--- a/main.usm
+++ b/main.usm
@@ -238,12 +238,19 @@ RTN
 ( draw-note draws a byte as a note name and number on the screen )
 @draw-note ( byte )
    DUP #0c DIV #01 SUB STH ( stash octave )
-   DUP #6c LTH ,&note JCN ( if note is in range, draw note, otherwise continue to draw a rest )
+   DUP #6c LTH ,&blank JCN ( if note is in range, draw note, otherwise continue to draw a rest )
    #3b ;draw-char JSR2
    #00 ;draw-char JSR2
    #3d ;draw-char JSR2 ( draws "[ ]" )
    POPr ( remove octave from returnstack ) POP
    RTN
+   &blank
+   DUP #00 NEQ ,&note JCN ( if note is blank, draw a "---" )
+   #0d ;draw-char JSR2
+   #0d ;draw-char JSR2
+   #0d ;draw-char JSR2
+   POPr POP
+   RTN
    &note
    #0c MOD #00 SWP ;notes ADD2 LDA DUP #7f AND ;draw-char JSR2
    #80 AND ,&else JCN ( if the high bit is unset )