Fixed bug with center scroll eventually overflowing.

This commit is contained in:
Martin Haye 2015-06-29 08:47:42 -07:00
parent cf55e06347
commit 03e0117537

View File

@ -554,6 +554,9 @@ SetWnd LDA evalStkL+SW_TOP,X ;get top coord
JSR GetOfst
LDA HgrHrz
STA LfMrgn ;that's the left margin for scrolling
LDA #0
STA TtlScrl ;clear centering variables
STA WrdWdth
RTS
;Routine: Scroll screen up 1 character line