Merge pull request #23 from a2-4am/master

add WGPendingClick and WGClearPendingClick
This commit is contained in:
blondie7575 2018-03-31 09:35:11 -07:00 committed by GitHub
commit f3a72567a0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
5 changed files with 26 additions and 1 deletions

View File

@ -565,6 +565,18 @@ Not available
</table>
####WGClearPendingClick
Clear the currently pending click, if any. Most programs shouldn't need this, but you can use it to do your own low-level click handling if you wish.
<table width="100%">
<tr><th>Assembly</th><th>Applesoft</th></tr><tr><td><pre>
X: WGClearPendingClick
</td><td>
Not available
</td></tr>
</table>
####WGViewFocus
Focus is shifted to the currently selected view. This will highlight the view visually, as needed, and any affected views are redrawn as needed.

View File

@ -75,4 +75,6 @@ WGStrokeRoundRect = 82
WGCreateRadio = 84
WGReset = 86
WGGetState = 88
WGPendingClick = 90
WGClearPendingClick = 92

10
views.s
View File

@ -1185,6 +1185,16 @@ WGPendingClick_done:
rts
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; WGClearPendingClick
; clear mouse coordinates
;
WGClearPendingClick:
stz WG_MOUSECLICK_X
dec WG_MOUSECLICK_X
rts
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; WGViewSetTitle
; Sets the title of the active view

Binary file not shown.

View File

@ -78,7 +78,8 @@ WGEntryPointTable:
.addr WGCreateRadio
.addr WGReset
.addr WGGetState
.addr WGPendingClick
.addr WGClearPendingClick
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;