diff --git a/Documentation.md b/Documentation.md index 754bf61..f16949c 100644 --- a/Documentation.md +++ b/Documentation.md @@ -565,6 +565,18 @@ Not available +####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. + + + +
AssemblyApplesoft
+X:		WGClearPendingClick
+
+Not available +
+ + ####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. diff --git a/WeeGUI_MLI.s b/WeeGUI_MLI.s index 3481ad9..60b95e7 100644 --- a/WeeGUI_MLI.s +++ b/WeeGUI_MLI.s @@ -76,4 +76,5 @@ WGCreateRadio = 84 WGReset = 86 WGGetState = 88 WGPendingClick = 90 +WGClearPendingClick = 92 diff --git a/views.s b/views.s index 30c8b53..6ef80a5 100644 --- a/views.s +++ b/views.s @@ -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 diff --git a/weegui.dsk b/weegui.dsk index b858c3f..47f4c94 100644 Binary files a/weegui.dsk and b/weegui.dsk differ diff --git a/weegui.s b/weegui.s index c37252b..05cffba 100644 --- a/weegui.s +++ b/weegui.s @@ -79,6 +79,7 @@ WGEntryPointTable: .addr WGReset .addr WGGetState .addr WGPendingClick +.addr WGClearPendingClick ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;