mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2024-06-15 19:29:32 +00:00
SHR: initialize all locals on mode change
This commit is contained in:
parent
f6f6c20c37
commit
8f0564f38f
|
@ -971,8 +971,10 @@ SHRVDU24 >>> ENTMAIN
|
||||||
|
|
||||||
|
|
||||||
* Reset graphics window
|
* Reset graphics window
|
||||||
|
* Initialize other locals (called on MODE)
|
||||||
SHRVDU26 >>> ENTMAIN
|
SHRVDU26 >>> ENTMAIN
|
||||||
STZ SHRWINLFT+0
|
|
||||||
|
STZ SHRWINLFT+0 ; Graphics window
|
||||||
STZ SHRWINLFT+1
|
STZ SHRWINLFT+1
|
||||||
STZ SHRWINBTM+0
|
STZ SHRWINBTM+0
|
||||||
STZ SHRWINBTM+1
|
STZ SHRWINBTM+1
|
||||||
|
@ -984,6 +986,14 @@ SHRVDU26 >>> ENTMAIN
|
||||||
STA SHRWINTOP+0
|
STA SHRWINTOP+0
|
||||||
LDA #>199
|
LDA #>199
|
||||||
STA SHRWINTOP+1
|
STA SHRWINTOP+1
|
||||||
|
|
||||||
|
STZ SHRXPIXEL+0 ; Other locals
|
||||||
|
STZ SHRXPIXEL+1
|
||||||
|
STZ SHRYPIXEL+0
|
||||||
|
STZ SHRYPIXEL+1
|
||||||
|
STZ SHRCURROUT
|
||||||
|
STZ SHRPREVOUT
|
||||||
|
|
||||||
>>> XF2AUX,VDU26RET
|
>>> XF2AUX,VDU26RET
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user