Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-02-05 21:34:30 +00:00
Code Issues Projects Releases Wiki Activity

pt3: extraneous iny in portamento

Browse Source 
sounds good, let's dump and compare
This commit is contained in:
Vince Weaver 2019-05-13 22:41:07 -04:00
parent d9dd7c9090
commit b834506cac
2 changed files with 38 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
pt3_player/pt3_dumper.s
View File

@ -192,13 +192,16 @@ no_frame_oflo:
; STOP EARLY for DEBUGGING ; STOP EARLY for DEBUGGING
lda FRAMEL ; lda FRAMEL
cmp #$A4 ; cmp #$A4
bne checkcheck ; bne checkcheck
lda FRAMEH ; lda FRAMEH
cmp #$1 ; cmp #$1
beq all_done ; beq all_done
checkcheck: ;checkcheck:
; check if end
lda DONE_PLAYING lda DONE_PLAYING
bne all_done bne all_done
jmp main_loop jmp main_loop

29
pt3_player/pt3_lib.s
View File

@ -221,6 +221,7 @@ sample_b1: .byte $0
; Header offsets ; Header offsets
PT3_VERSION = $D
PT3_HEADER_FREQUENCY = $63 PT3_HEADER_FREQUENCY = $63
PT3_PATTERN_LOC_L = $67 PT3_PATTERN_LOC_L = $67
PT3_PATTERN_LOC_H = $68 PT3_PATTERN_LOC_H = $68
@ -404,6 +405,33 @@ pt3_init_song:
sta pt3_envelope_period_h sta pt3_envelope_period_h
sta pt3_envelope_type sta pt3_envelope_type
;============================
; calculate patterns in song
; FIXME: is this necessary? can just end when we hit FF playing?
ldy #0
length_loop:
lda PT3_LOC+PT3_PATTERN_TABLE,Y
iny
cmp #$ff
bne length_loop
sty pt3_music_len
;======================
; calculate version
lda #6
sta pt3_version
lda PT3_LOC+PT3_VERSION
cmp #'0'
bcc not_ascii_number ; blt
cmp #'9'
bcs not_ascii_number ; bge
sec
sbc #'0'
sta pt3_version
not_ascii_number:
rts rts
e_slide_amount: .byte $0 e_slide_amount: .byte $0
@ -1344,7 +1372,6 @@ effect_2_small: ; FIXME: make smaller
sta note_a+NOTE_TONE_SLIDE_DELAY,X sta note_a+NOTE_TONE_SLIDE_DELAY,X
sta note_a+NOTE_TONE_SLIDE_COUNT,X sta note_a+NOTE_TONE_SLIDE_COUNT,X
iny
iny iny
iny iny