Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-27 17:29:49 +00:00
Code Issues Projects Releases Wiki Activity

pt3_player: remove commented out GetNoteFreq() code

Browse Source
This commit is contained in:
Vince Weaver 2019-09-11 11:10:36 -04:00
parent b2da3af2d8
commit 4583337bd0
1 changed files with 2 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
pt3_player/pt3_lib.s
View File

@ -904,8 +904,7 @@ note_not_too_high:
; w = GetNoteFreq(j,pt3->frequency_table); ; w = GetNoteFreq(j,pt3->frequency_table);
tay ; for GetNoteFreq tay ; for GetNoteFreq later
; jsr GetNoteFreq
; a->tone = (a->tone + a->tone_sliding + w) & 0xfff; ; a->tone = (a->tone + a->tone_sliding + w) & 0xfff;
@ -921,15 +920,11 @@ note_not_too_high:
clc ;;can be removed if ADC SLIDING_H cannot overflow clc ;;can be removed if ADC SLIDING_H cannot overflow
temp_word_l1_smc: temp_word_l1_smc:
lda #$d1 lda #$d1
;freq_l_smc:
; adc #$d1 ; GetNoteFreq
adc NoteTable_low,Y ; GetNoteFreq adc NoteTable_low,Y ; GetNoteFreq
sta note_a+NOTE_TONE_L,X sta note_a+NOTE_TONE_L,X
temp_word_h1_smc: temp_word_h1_smc:
lda #$d1 lda #$d1
;freq_h_smc: adc NoteTable_high,Y ; GetNoteFreq
; adc #$d1 ; GetNoteFreq
adc NoteTable_high,Y
and #$0f and #$0f
sta note_a+NOTE_TONE_H,X sta note_a+NOTE_TONE_H,X
@ -1709,23 +1704,18 @@ skip_step_inc1:
sty TEMP ; save Y sty TEMP ; save Y
prev_note_smc: prev_note_smc:
ldy #$d1 ldy #$d1
; jsr GetNoteFreq
; lda freq_l_smc+1
lda NoteTable_low,Y ; GetNoteFreq lda NoteTable_low,Y ; GetNoteFreq
sta temp_word_l2_smc+1 sta temp_word_l2_smc+1
lda NoteTable_high,Y ; GetNoteFreq lda NoteTable_high,Y ; GetNoteFreq
; lda freq_h_smc+1
sta temp_word_h2_smc+1 sta temp_word_h2_smc+1
ldy note_a+NOTE_NOTE,X ldy note_a+NOTE_NOTE,X
; jsr GetNoteFreq
lda NoteTable_low,Y ; GetNoteFreq lda NoteTable_low,Y ; GetNoteFreq
sec sec
temp_word_l2_smc: temp_word_l2_smc:
sbc #$d1 sbc #$d1
sta note_a+NOTE_TONE_DELTA_L,X sta note_a+NOTE_TONE_DELTA_L,X
; lda freq_h_smc+1
lda NoteTable_high,Y ; GetNoteFreq lda NoteTable_high,Y ; GetNoteFreq
temp_word_h2_smc: temp_word_h2_smc:
sbc #$d1 sbc #$d1
@ -2412,26 +2402,6 @@ done_do_frame:
rts ; 6 rts ; 6
;======================================
; GetNoteFreq
;======================================
; Return frequency from lookup table
; Which note is in A
; return in freq_l/freq_h
;GetNoteFreq:
; sty PT3_TEMP ; 3
; tay ; 2
; lda NoteTable_high,Y ; 4+
; sta freq_h_smc+1 ; 4
; lda NoteTable_low,Y ; 4+
; sta freq_l_smc+1 ; 4
; ldy PT3_TEMP ; 3
; rts ; 6
;===========
;base0_v3_high: ;base0_v3_high: