SUB DIGOFF ! ! DIGOFF.B4S ! ~~~~~~~~~~ ! This routine will issue to the VISUAL 500 series ! terminals the sequence so that the VISUAL will ! recieve the following commands instead of issuing them to ! the VISUAL's printer port. ! ! We are thus assiming that there is a digitizer attached ! to the VISUAL's printer port. ! CALL VISOUT( CHR$(27) + "X" ) SUBEND