mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-09-10 08:54:51 +00:00
pt3_player: some more smc code, remove a zp variable
This commit is contained in:
parent
fe6a317d6a
commit
d518a1ba26
@ -81,7 +81,7 @@ reset_ay_both:
|
|||||||
clear_ay_both:
|
clear_ay_both:
|
||||||
ldx #14
|
ldx #14
|
||||||
lda #0
|
lda #0
|
||||||
sta MB_VALUE
|
sta MB_VALUE_smc+1
|
||||||
clear_ay_left_loop:
|
clear_ay_left_loop:
|
||||||
; Write sequence
|
; Write sequence
|
||||||
; Inactive -> Latch Address -> Inactive -> Write Data -> Inactive
|
; Inactive -> Latch Address -> Inactive -> Write Data -> Inactive
|
||||||
@ -104,7 +104,8 @@ write_ay_both:
|
|||||||
sty MOCK_6522_ORB2 ; 3
|
sty MOCK_6522_ORB2 ; 3
|
||||||
|
|
||||||
; value
|
; value
|
||||||
lda MB_VALUE ; 3
|
MB_VALUE_smc:
|
||||||
|
lda #$d1 ; 2
|
||||||
sta MOCK_6522_ORA1 ; put value on PA1 ; 3
|
sta MOCK_6522_ORA1 ; put value on PA1 ; 3
|
||||||
sta MOCK_6522_ORA2 ; put value on PA2 ; 3
|
sta MOCK_6522_ORA2 ; put value on PA2 ; 3
|
||||||
lda #MOCK_AY_WRITE ; ; 2
|
lda #MOCK_AY_WRITE ; ; 2
|
||||||
@ -114,7 +115,7 @@ write_ay_both:
|
|||||||
sty MOCK_6522_ORB2 ; 3
|
sty MOCK_6522_ORB2 ; 3
|
||||||
|
|
||||||
;===========
|
;===========
|
||||||
; 45
|
; 44
|
||||||
dex
|
dex
|
||||||
bpl clear_ay_left_loop
|
bpl clear_ay_left_loop
|
||||||
rts
|
rts
|
||||||
|
@ -67,9 +67,8 @@ ORNAMENT_H = $03
|
|||||||
SAMPLE_L = $04
|
SAMPLE_L = $04
|
||||||
SAMPLE_H = $05
|
SAMPLE_H = $05
|
||||||
|
|
||||||
WHICH_FILE = $62
|
WHICH_FILE = $63
|
||||||
LOOP = $63
|
LOOP = $64
|
||||||
MB_VALUE = $64
|
|
||||||
MB_ADDRL = $65
|
MB_ADDRL = $65
|
||||||
MB_ADDRH = $66
|
MB_ADDRH = $66
|
||||||
DONE_PLAYING = $67
|
DONE_PLAYING = $67
|
||||||
|
Loading…
Reference in New Issue
Block a user