diff --git a/demosplash/credits.s b/demosplash/credits.s index 8fd93461..4d1622f9 100644 --- a/demosplash/credits.s +++ b/demosplash/credits.s @@ -16,7 +16,7 @@ credits: sta FRAME_PLAY_PAGE jsr update_pt3_play - jsr pt3_write_lc_4 + jsr pt3_write_lc_5 lda #credits_text = >(credits_text_end-1), error, "credits_text crosses page" + + + +fake_music_play: + + ; 1237-6 = 1231-1 - 3 = 1227 + + ; Try X=60 Y=4 cycles=1225R2 + +; jsr clear_ay_both + + nop + + ldy #4 ; 2 +uloop1: ldx #60 ; 2 +uloop2: dex ; 2 + bne uloop2 ; 2nt/3 + dey ; 2 + bne uloop1 ; 2nt/3 + + rts diff --git a/demosplash/escape.s b/demosplash/escape.s index 0de9ed9f..e0edac8d 100644 --- a/demosplash/escape.s +++ b/demosplash/escape.s @@ -1580,18 +1580,16 @@ escape_keys: .byte 'A',25 ; slower .byte 'A',25 ; stop - - - .byte 'A',5 ; down .byte 'A',10 ; faster .byte 'A',40 ; faster .byte 'Z',25 ; slower .byte 'Z',25 ; stop .byte ' '+$80,30 ; shoot - .byte 'A',5 ; down + .byte 'Z',5 ; down + .byte 'Z',10 ; faster + .byte 'A',30 ; faster .byte 'A',10 ; faster - .byte 'A',40 ; faster .byte 27+$80,2 diff --git a/demosplash/pt3_lib_write_lc.s b/demosplash/pt3_lib_write_lc.s index f7751291..9838cd8c 100644 --- a/demosplash/pt3_lib_write_lc.s +++ b/demosplash/pt3_lib_write_lc.s @@ -20,6 +20,25 @@ lc4_frame_decode_loop: rts +pt3_write_lc_5: + + ; page offset + lda #0 + sta FRAME_PAGE + +lc5_frame_decode_loop: + + jsr pt3_set_pages + + jsr pt3_write_lc + + lda FRAME_PAGE + cmp #5 + bne lc5_frame_decode_loop + + rts + + ;============================== ; write one page of frame data pt3_write_lc_1: @@ -114,7 +133,8 @@ music_addr_table: .byte $e6,$e7,$e8,$e9,$ea,$eb,$ec,$ed,$ee,$ef,$f0,$BB,$CC,$DD,$EE,$FF .byte $db,$dc,$dd,$de,$df,$e0,$e1,$e2,$e3,$e4,$e5,$BB,$CC,$DD,$EE,$FF .byte $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$BB,$CC,$DD,$EE,$FF -.byte $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$BB,$CC,$DD,$EE,$FF +;.byte $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$BB,$CC,$DD,$EE,$FF +.byte $14,$15,$16,$17,$18,$19,$1A,$1B,$1C,$1D,$1E,$BB,$CC,$DD,$EE,$FF music_table_end: .assert >music_table_begin = >music_table_end, error, "music_table crosses page"