SUBROUTINE CURRECT

 CURRECT is similar to the  CURBAND subroutine except that a  rectangle is moved with cursor motion. This routine is supported only on terminals which can emulate the VT100 numeric keypad.

CALL CURRECT (x,y,is,rx,ry,x1,y2,x2,y2)

x,y   (R): (returned) selected cursor position/start position
is    (I): (returned) status flag
           < 0  error
           = 0  return key pressed
           = 1  space key pressed
           = 2,3,4 PF2,PF3,PF4 keys on VT100 pressed
           = 10...19 VT100 numeric key pad keys 0...9 pressed
           = 20 numeric key pad period key pressed
           = 21 numeric key pad enter key pressed
           = 22 numeric key pad comma key pressed
           = 23 numeric key pad dash key pressed
rx    (R): resolution of screen in x direction (returned)
ry    (R): resolution of screen in y direction (returned)
x1,y1 (R): lower left corner of rectangle
x2,y2 (R): upper right corner of rectangle