uxn

commit 3474b3a4f1e3e1b07a8a63f247e0dfcc890e846d
parent b86049925ab683aa1ed2e50b2ca2be87b01150a0
Author: neauoire <aliceffekt@gmail.com>
Date:   Wed, 21 Apr 2021 12:46:40 -0700

Minor cleanup

Diffstat:
M
projects/examples/dev.audio.usm
 | 
12
++++++------

1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/projects/examples/dev.audio.usm b/projects/examples/dev.audio.usm
@@ -9,7 +9,7 @@
 )
 
 @timer $1
-@song [ &note $1 ]
+@progress $1
 
 ( devices )
 
@@ -38,7 +38,7 @@ BRK
 	( skip ) .timer PEK #10 NEQ ;silence JNZ2
 
 	( get note )
-	;melody #00 .song/note PEK ADD2 GET ( -- note )
+	;melody #00 .progress PEK ADD2 GET ( -- note )
 
 	( play note )
 	DUP #80 ORA .Audio/pitch DEO ( -- note ) ( OR note with #80 and set the audio pitch to it. )
@@ -49,11 +49,11 @@ BRK
 
 	( draw note )
 	#00 SWP #0004 MUL2 #0100 SUB2 .Screen/y DEO2 ( calculate the y position of a dot. TODO make this not upside down )
-	#00 .song/note PEK #0008 MUL2 .Screen/x DEO2 ( calculate the x position of a dot )
+	#00 .progress PEK #0008 MUL2 .Screen/x DEO2 ( calculate the x position of a dot )
 	;dot .Screen/addr DEO2 ( set the sprite for a dot )
 	#21  .Screen/color DEO ( draw a dot )
 
-	( incr ) .song/note PEK #01 ADD #20 MOD .song/note POK
+	( incr ) .progress PEK #01 ADD #20 MOD .progress POK
 
 	#00 .timer POK
 
@@ -86,7 +86,7 @@ BRK
 
 BRK
 
-( song data. note ff is used for a rest. )
+( song data, #ff is used for a rest )
 
 @melody [ 
 	54 52 54 4f 4b 4f 48 ff
@@ -95,6 +95,6 @@ BRK
 	56 52 54 52 54 50 54 ff
 ] 
 
-( dot sprite for on-screen )
+( dot sprite )
 	 
 @dot [ 003c 7eff 7e3c 0000 ]