mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-07-13 22:29:14 +00:00
mode7: music restarts properly when restarting
This commit is contained in:
parent
60f306dd5c
commit
cadce8fbb4
@ -278,9 +278,11 @@ credits:
|
|||||||
.byte 14 ; 10
|
.byte 14 ; 10
|
||||||
.asciiz "UTOPIA BBS"
|
.asciiz "UTOPIA BBS"
|
||||||
.byte 10 ; 18
|
.byte 10 ; 18
|
||||||
.asciiz "FORD PERFECT (SIC)"
|
;.asciiz "FORD PERFECT (SIC)"
|
||||||
|
.asciiz "AAAAAAAAAAAAAAAAAA"
|
||||||
.byte 14 ; 10
|
.byte 14 ; 10
|
||||||
.asciiz "PIANOMAN08"
|
;.asciiz "PIANOMAN08"
|
||||||
|
.asciiz "AAAAAAAAAA"
|
||||||
.byte 12 ; 13
|
.byte 12 ; 13
|
||||||
.asciiz "THE 7HORSEMEN"
|
.asciiz "THE 7HORSEMEN"
|
||||||
.byte 9 ; 20
|
.byte 9 ; 20
|
||||||
|
@ -268,22 +268,12 @@ increment_done:
|
|||||||
;=================================
|
;=================================
|
||||||
|
|
||||||
done_interrupt:
|
done_interrupt:
|
||||||
; jmp exit_interrupt
|
jmp exit_interrupt
|
||||||
|
|
||||||
quiet_exit:
|
quiet_exit:
|
||||||
; sta DONE_PLAYING
|
lda #1
|
||||||
; jsr clear_ay_both
|
sta DONE_PLAYING
|
||||||
|
jsr clear_ay_both
|
||||||
;=====================================
|
|
||||||
; clear register area
|
|
||||||
;=====================================
|
|
||||||
; ldx #13 ; 2
|
|
||||||
; lda #0 ; 2
|
|
||||||
;mb_clear_reg:
|
|
||||||
; sta REGISTER_DUMP,X ; clear register value ; 4
|
|
||||||
; sta REGISTER_OLD,X ; clear old values ; 4
|
|
||||||
; dex ; 2
|
|
||||||
; bpl mb_clear_reg ; 2nt/3
|
|
||||||
|
|
||||||
exit_interrupt:
|
exit_interrupt:
|
||||||
|
|
||||||
|
@ -52,7 +52,7 @@ start:
|
|||||||
; Mockingboard start
|
; Mockingboard start
|
||||||
;================================
|
;================================
|
||||||
|
|
||||||
main_loop:
|
|
||||||
|
|
||||||
mockingboard_setup:
|
mockingboard_setup:
|
||||||
sei ; disable interrupts just in case
|
sei ; disable interrupts just in case
|
||||||
@ -98,7 +98,7 @@ mockingboard_setup:
|
|||||||
;============================
|
;============================
|
||||||
; Start Playing
|
; Start Playing
|
||||||
;============================
|
;============================
|
||||||
|
main_loop:
|
||||||
lda #0
|
lda #0
|
||||||
sta DONE_PLAYING
|
sta DONE_PLAYING
|
||||||
sta WHICH_CHUNK
|
sta WHICH_CHUNK
|
||||||
|
Loading…
Reference in New Issue
Block a user