SUB DIGOUT (command$) ! ! DIGOUT.B4S ! ~~~~~~~~~~ ! This routine issues the commands in to the ! digitizer through the printer port on the VISUAL 500 series ! terminals. ! CALL DIGON ! Tell the VISUAL to pass on to printer port CALL VISOUT(command$) ! Issue the commands CALL DIGOFF ! Tell the VISUAL not to pass to printer port SUBEND