mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2024-06-27 12:29:27 +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…
Reference in New Issue
Block a user