mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-01-14 13:33:48 +00:00
pt3: fix bug in portamento code
only noticed with IR.pt3 test something else is wrong playing that file but it passes validation now
This commit is contained in:
parent
26e7d2f990
commit
3186056500
@ -1481,13 +1481,15 @@ 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 ; 4
|
plp
|
||||||
|
clc ; 4
|
||||||
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
|
||||||
|
|
||||||
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
|
||||||
|
Loading…
x
Reference in New Issue
Block a user