This function detects whether the given channel is running under the Pointer Environment and returns:
- 0 if the Pointer Environment is not connected to that channel, or no parameter was used, or #ch is not a screen channel;
- 1 if the Pointer Interface (ptr_gen) is active in that channel;
- 2 if the Pointer Interface and the Window Manager (wman) are present for that channel.
All programs which need the Pointer Environment to work, should check to see if it is present. This short program does so:
100 ch=FOPEN(con_2x2a0x0): p=P_ENV(#ch): CLOSE#ch 110 IF p<2 THEN 120 PRINT "This program does not run without the P.E.," 130 PRINT "so program execution has to stop here." 140 PRINT " Press any key...": PAUSE 400 150 STOP 160 END IF
WMAN$ finds the version of the Window Manager and QRAM$ the version of the Pointer Interface. These functions can also be used to detect the presence of the Pointer Environment (=Window Manager & Pointer Interface).