Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-09-10 08:54:51 +00:00
Code Issues Projects Releases Wiki Activity

pt3_player: some more smc code, remove a zp variable

Browse Source
This commit is contained in:
Peter Ferrie 2019-06-18 13:07:24 -04:00 committed by Vince Weaver
parent fe6a317d6a
commit d518a1ba26
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pt3_player/mockingboard_a.s
View File

@ -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

5
pt3_player/zp.inc
View File

@ -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