mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2025-03-04 03:29:29 +00:00
Recover A before calling SCR1SOFT.
This commit is contained in:
parent
1a34016be0
commit
84bebe9088
@ -738,6 +738,7 @@ SCR1LINE PHA
|
|||||||
DEX
|
DEX
|
||||||
BPL :L0
|
BPL :L0
|
||||||
PLA
|
PLA
|
||||||
|
PHA
|
||||||
INC A
|
INC A
|
||||||
JSR CHARADDRY ; VDUADDR=>line A+1
|
JSR CHARADDRY ; VDUADDR=>line A+1
|
||||||
INC TXTWINRGT
|
INC TXTWINRGT
|
||||||
@ -783,6 +784,7 @@ SCR1LINE PHA
|
|||||||
BMI :L2
|
BMI :L2
|
||||||
SCR1LNDONE DEC TXTWINRGT
|
SCR1LNDONE DEC TXTWINRGT
|
||||||
BIT VDUSCREEN
|
BIT VDUSCREEN
|
||||||
|
PLA
|
||||||
BMI SCR1SOFT ; Scroll graphics screen
|
BMI SCR1SOFT ; Scroll graphics screen
|
||||||
RTS
|
RTS
|
||||||
SCR1LINEGS LDX TXTWINLFT
|
SCR1LINEGS LDX TXTWINLFT
|
||||||
|
Loading…
x
Reference in New Issue
Block a user