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, House Mouse Actions are Handled).
CALL "W$MOUSE"
USING OP-CODE, parameters,
GIVING MOUSE-STATUS
| 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 |
Holds the return value from W$MOUSE. This is used only with the ENABLE-MOUSE, TEST-MOUSE-PRESENCE, and GET-MOUSE-SHAPE operations.
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: