Mercurial > repos > simple16

diff audio.s16 @ 24:4c9dbfa30a66

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Implemented audio
author Michael Pavone <pavone@retrodev.com>
date Thu, 31 Mar 2016 00:07:37 -0700
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/audio.s16	Thu Mar 31 00:07:37 2016 -0700
@@ -0,0 +1,33 @@
+	;48000 x 16 / VALUE = FREQ
+	;48000 x 16 = VALUE * FREQ
+	;48000 x 16 / FREQ = VALUE
+	;A  = 440Hz ~ 1745 = $6D1
+	;C# = 554.365Hz ~ 1385 = $569
+	;E  = 659.255Hz ~ 1165 = $48D
+	
+	;Channel A
+	ldim $D1, r0
+	ldimh $6, r0
+	outi 4, r0
+	
+	;Channel B
+	ldim $69, r0
+	ldimh $5, r0
+	outi 5, r0
+	
+	;Channel C
+	ldim $8D, r0
+	ldimh $4, r0
+	outi 6, r0
+	
+	;Channel D
+	ldim $A2, r0
+	ldimh $D, r0
+	outi 7, r0
+	
+	ldim $FF, r0
+	ldimh $FF, r0
+	outi 8, r0
+	outi 9, r0
+done
+	bra done
\ No newline at end of file