First attempt at calibrating frequency

2022-10-31 21:13:13 -04:00 · 2022-10-31 21:13:13 -04:00 · e969d2cceb
parent 76ca965adb
commit e969d2cceb
4 changed files with 494 additions and 494 deletions
--- a/applecorn.po
+++ b/applecorn.po
--- a/2
+++ b/2
@ -6,7 +6,7 @@
 # SOUND statements.
 #

-base=123.47 / 16.0
+base=123.47 / 16.0 * 1.573

 print("\nFREQHIGH");
 for i in range(0,256):
--- a/mainmem.audio.s
+++ b/mainmem.audio.s
@ -761,7 +761,7 @@ ENSQINIT    LDX   #3
            LDY   #10                       ; Five oscillators enabled
            JSR   ENSQWRTDOC
            LDY   #$00                      ; Amplitude for osc #4 (timer)
-            LDA   #$20                      ; Frequency for osc #4 (timer)
+            LDA   #33+1                     ; Freq G2+1/8 tone = 99.46Hz
            LDX   #$04
            JSR   ENSQNOTE                  ; Start oscillator 4
            LDX   #$A4                      ; Control register for osc #4
--- a/mainmem.freq.s
+++ b/mainmem.freq.s