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

pt3: also fix pt3_lib

Browse Source
This commit is contained in:
Vince Weaver 2019-06-08 00:51:51 -04:00
parent 3186056500
commit ea4e5f44f2
2 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pt3_lib/pt3_lib.s
View File

@ -1482,12 +1482,14 @@ slide_step_positive1:
dey ; 2 dey ; 2
lda (PATTERN_L),Y ; load byte, set as slide_step low ; 5 lda (PATTERN_L),Y ; load byte, set as slide_step low ; 5
plp ; 4 plp ; 4
clc ; 2
bpl slide_step_positive2 ; 3 bpl slide_step_positive2 ; 3
;-1 ;-1
eor #$ff ; 2 eor #$ff ; 2
adc #$0 ;+carry set by earlier CMP ; 2 sec ; 2
slide_step_positive2: slide_step_positive2:
adc #$0 ; 2
sta note_a+NOTE_TONE_SLIDE_STEP_L,X ; 5 sta note_a+NOTE_TONE_SLIDE_STEP_L,X ; 5
bcc skip_step_inc1 ; 3 bcc skip_step_inc1 ; 3
inc note_a+NOTE_TONE_SLIDE_STEP_H,X ; 7 inc note_a+NOTE_TONE_SLIDE_STEP_H,X ; 7

6
pt3_player/pt3_lib.s
View File

@ -1481,12 +1481,12 @@ slide_step_positive1:
sta note_a+NOTE_TONE_SLIDE_STEP_H,X ; 5 sta note_a+NOTE_TONE_SLIDE_STEP_H,X ; 5
dey ; 2 dey ; 2
lda (PATTERN_L),Y ; load byte, set as slide_step low ; 5 lda (PATTERN_L),Y ; load byte, set as slide_step low ; 5
plp plp ; 4
clc ; 4 clc ; 2
bpl slide_step_positive2 ; 3 bpl slide_step_positive2 ; 3
;-1 ;-1
eor #$ff ; 2 eor #$ff ; 2
sec sec ; 2
slide_step_positive2: slide_step_positive2:
adc #$0 ; 2 adc #$0 ; 2