W$MOUSE

This routine allows you to control the behavior of the mouse. Before using W$MOUSE to respond to mouse actions, be sure that you have unmasked the actions you want to notice (see the topic, How Mouse Actions are Handled).

Usage

CALL "W$MOUSE"
    USING OP-CODE, parameters,
    GIVING MOUSE-STATUS

Parameters

OP-CODE Numeric parameter - This indicates the desired operation. Level 78 symbolic names for these operations can be found in the file acugui.def.

Code	Operation
0	TEST-MOUSE-PRESENCE
1	GET-MOUSE-STATUS
2	GET-MOUSE-SCREEN-STATUS
3	SET-MOUSE-POSITION
4	SET-MOUSE-SCREEN-POSITION
5	SET-MOUSE-SHAPE
6	SET-DELAYED-MOUSE-SHAPE
7	GET-MOUSE-SHAPE
8	CAPTURE-MOUSE
9	RELEASE-MOUSE
10	ENABLE-MOUSE
19	SET-MOUSE-HELP
23	SET-MOUSE-POSITION-EX
24	SET-MOUSE-SCREEN-POSITION-EX
25	SET-MOUSE-POSITION-PIXEL
26	SET-MOUSE-SCREEN-POSITION-PIXEL

parameters - Vary depending on the op-code chosen.

MOUSE-STATUS - A numeric data item
Holds the return value from W$MOUSE. This is used only with the ENABLE-MOUSE, TEST-MOUSE-PRESENCE, and GET-MOUSE-SHAPE operations.

Description

The first parameter you pass to W$MOUSE is an operation code. This code tells W$MOUSE what to do. The number and type of the remaining parameters depend on the operation selected. All parameters are passed BY REFERENCE (the default in COBOL). The operation code can be one of the following: