Bug fixes

- Positive scroll values now clamped
This commit is contained in:
Quinn Dunki 2015-01-13 13:00:39 -08:00
parent 54d869195c
commit 28956650ff
3 changed files with 8 additions and 2 deletions

View File

@ -2,8 +2,6 @@
Known issues Known issues
------------ ------------
- Negative cursor positions unsupported
- Positive scroll values unsupported
- Hitting Reset in app that uses windows and desktop (no mouse needed) seems to mess up screen holes for Disk II - Hitting Reset in app that uses windows and desktop (no mouse needed) seems to mess up screen holes for Disk II
- Mashing a button with mouse in Applesoft will cause Undefined Statement error - Mashing a button with mouse in Applesoft will cause Undefined Statement error
- Repainting a view while the mouse cursor is on it will cause artifacts when mouse moves - Repainting a view while the mouse cursor is on it will cause artifacts when mouse moves

View File

@ -973,6 +973,10 @@ WGScrollX:
LDY_ACTIVEVIEW LDY_ACTIVEVIEW
pla pla
bmi WGScrollX_Store
lda #0 ; Prevent positive scroll values
WGScrollX_Store:
sta WG_VIEWRECORDS+5,y sta WG_VIEWRECORDS+5,y
jsr cacheClipPlanes ; Scroll offset changed, so clipping cache is stale jsr cacheClipPlanes ; Scroll offset changed, so clipping cache is stale
@ -1043,6 +1047,10 @@ WGScrollY:
LDY_ACTIVEVIEW LDY_ACTIVEVIEW
pla pla
bmi WGScrollY_Store
lda #0 ; Prevent positive scroll values
WGScrollY_Store:
sta WG_VIEWRECORDS+6,y sta WG_VIEWRECORDS+6,y
jsr cacheClipPlanes ; Scroll offset changed, so clipping cache is stale jsr cacheClipPlanes ; Scroll offset changed, so clipping cache is stale

Binary file not shown.