sa: lyrics playing nicely now

This commit is contained in:
Vince Weaver 2018-05-21 15:12:53 -04:00
parent 9bf37a7611
commit 50b8e21e7c
3 changed files with 26 additions and 5 deletions

View File

@ -255,9 +255,30 @@ done_interrupt:
lyric_loop:
lda (LYRICSL),Y
beq done_lyric
cmp #10
bcs lyric_home
draw_ascii_art:
;
;
jmp lyric_continue
lyric_home:
cmp #12
bne lyric_char
tya
pha
jsr HOME
pla
tay
jmp lyric_continue
lyric_char:
jsr COUT1
lyric_continue:
iny
jmp lyric_loop
done_lyric:
; adjust pointer
sec

View File

@ -214,8 +214,6 @@
.byte $00,$EC,$E9,$F6,$E5,$AE,$8D,$00
; 2316 "\f"
.byte $0C,$0C,$00
; 2397 "\v"
.byte $5D,$0B,$00
; 2400 "\iForms "
.byte $60,$C6,$EF,$F2,$ED,$F3,$A0,$00
; 2412 "\iFORM-"
@ -474,8 +472,6 @@
.byte $4A,$E5,$EE,$E4,$F5,$ED,$00
; 4950 "\i:\n\n"
.byte $56,$BA,$8D,$8D,$00
; 4962 "\v"
.byte $62,$0B,$00
; 5088 "\iOne "
.byte $E0,$CF,$EE,$E5,$A0,$00
; 5100 "\ilast "

View File

@ -255,7 +255,6 @@ load_song:
;=========================
lda #$0
sta FRAME_COUNT
sta COPY_OFFSET
sta DECOMPRESS_TIME
sta COPY_TIME
@ -265,6 +264,11 @@ load_song:
lda #3
sta CHUNKSIZE
; We buffer one frame so start out one frame behind
lda #$ff
sta FRAME_COUNT
;===========================
; Setup KRW file
;===========================