Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-10-24 23:25:28 +00:00
Code Issues Projects Releases Wiki Activity

optimize amplitude code

Browse Source
This commit is contained in:
Peter Ferrie 2019-06-01 00:29:56 -04:00 committed by Vince Weaver
parent 6f56cfc254
commit d0d0e06f1c
1 changed files with 6 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
pt3_player/pt3_lib.s
View File

@ -707,17 +707,15 @@ calc_amplitude:
; adjust amplitude sliding ; adjust amplitude sliding
lda sample_b0 ; if ((b0 & 0x80)!=0) { bit sample_b0 ; if ((b0 & 0x80)!=0) {
and #$80 bpl done_amp_sliding ; so if top bit not set, skip
beq done_amp_sliding ; so if top bit not set, skip
;================================ ;================================
; if top bits 0b11 then slide up ; if top bits 0b11 then slide up
; if top buts 0b10 then slide down ; if top buts 0b10 then slide down
lda sample_b0 ; if ((b0&0x40)!=0) { ; if ((b0 & 0x40)!=0) {
and #$40 bvc amp_slide_down
beq amp_slide_down
amp_slide_up: amp_slide_up:
; if (a->amplitude_sliding < 15) { ; if (a->amplitude_sliding < 15) {
@ -730,7 +728,7 @@ amp_slide_up:
asu_signed: asu_signed:
bpl done_amp_sliding ; skip if A>=15 bpl done_amp_sliding ; skip if A>=15
inc note_a+NOTE_AMPLITUDE_SLIDING,X ; a->amplitude_sliding++; inc note_a+NOTE_AMPLITUDE_SLIDING,X ; a->amplitude_sliding++;
jmp done_amp_sliding bne done_amp_sliding
amp_slide_down: amp_slide_down:
; if (a->amplitude_sliding > -15) { ; if (a->amplitude_sliding > -15) {
@ -759,7 +757,7 @@ done_amp_sliding:
check_amp_lo: check_amp_lo:
bpl check_amp_hi bpl check_amp_hi
lda #0 lda #0
jmp write_clamp_amplitude beq write_clamp_amplitude
check_amp_hi: check_amp_hi:
cmp #16 cmp #16