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

dya: not enough cycles for rasterbars

Browse Source
This commit is contained in:
Vince Weaver 2018-11-20 10:33:36 -05:00
parent f5c91a3097
commit b26ee7c7d4
2 changed files with 11 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
dya/chiptune_player.s
View File

@ -41,16 +41,12 @@ chiptune_setup:
sta CV sta CV
sta DONE_PLAYING sta DONE_PLAYING
sta MB_CHUNK_OFFSET sta MB_CHUNK_OFFSET
sta DECODE_ERROR sta DECODE_ERROR ; clear out error message
; lda #0
; lda #4 ; start at DEMO4
; lda #7 ; start at LYRA
; lda #10 ; start at SDEMO
sta WHICH_FILE sta WHICH_FILE
lda #$ff ; Disable the rasterbars for now, they take too long :(
; lda #$ff
sta RASTERBARS_ON sta RASTERBARS_ON
; print detection message ; print detection message
@ -152,10 +148,10 @@ mockingboard_found:
; Loop forever ; Loop forever
;============================ ;============================
main_loop: main_loop:
lda DECODE_ERROR lda DECODE_ERROR ; see if an error happened
beq check_copy beq check_copy
sei sei ; turn off music
brk brk ; if so, stop
check_copy: check_copy:
lda COPY_TIME lda COPY_TIME
@ -176,7 +172,7 @@ check_copy_loop:
sta COPY_TIME sta COPY_TIME
check_decompress: check_decompress:
lda DECOMPRESS_TIME lda DECOMPRESS_TIME ; see if it is time to decompress
beq check_done ; if zero, skip beq check_done ; if zero, skip
jsr setup_next_subsong ; decompress jsr setup_next_subsong ; decompress
@ -473,9 +469,9 @@ setup_next_subsong:
adc #0 adc #0
sta LZ4_SRC+1 sta LZ4_SRC+1
lda #>UNPACK_BUFFER1 ; original unpacked data offset lda #>UNPACK_BUFFER2 ; original unpacked data offset
sta LZ4_DST+1 sta LZ4_DST+1
lda #<UNPACK_BUFFER1 lda #<UNPACK_BUFFER2
sta LZ4_DST sta LZ4_DST

4
dya/interrupt_handler.s
View File

@ -204,8 +204,8 @@ wraparound_to_a:
sta DECODER_STATE sta DECODER_STATE
sta COPY_TIME ; start copying sta COPY_TIME ; start copying
lda DECOMPRESS_TIME lda DECOMPRESS_TIME ; Trouble if decompressing
beq blah beq blah ; takes too long?
lda #1 lda #1
sta DECODE_ERROR sta DECODE_ERROR
blah: blah: