CwGetMousePosition

got = CwGetMousePosition stem

        ("stem" is the name of a stem variable in which the results are
         stored.  There are 2 fields of the stem that are set.)

        stem.x  (numeric) The horizontal position of the mouse, in the current
                project units.

        stem.y  (numeric) The vertical position of the mouse, in the current
                project units.

        got (boolean) This is true (1) if a mouse position exists.

call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
        call SysLoadFuncs

        call CwGetMousePosition startpos;
        done = 0;

        do while \done;
                call SysSleep 1;
                gotpos = CwGetMousePosition( pos );
                say "pos = (" pos.x "," pos.y ")";
        end;