<<<<<<<<<<<<<CLEAR PROMPT LINE ONLY>>>>>>>>>>>>>>>>>>>

PRLCLEAN

 ------------ UNIVERSAL INTERACTION ROUTINE ----------------------

INTERACT

 $CMD_PR1$

 $CMD_PR2$

 $CMD_PR3$

 $CMD_PR4$

 $CMD_PR5$

 $CMD_PR6$

$PROMPT$

 U: LCLEAN

 That is correct!

 You've got it on the 2nd try.

 Good, you understand the concept.

$FIRST_F1$

$FIRST_F2$

$FIRST_F3$

$SECOND_F1$

 $SECOND_F2$

$SECOND_F3$

 I will help you this time.        

$PROMPT$

FORGET1

$PROMPT$$ANSWER$

 Observe the result on the terminal.

 -----END INTERACTION ROUTINE--------------------------

**********FOOTER TO REQUEST CONTINUATION**********

PAUSE

If they want to quit, do so

   <<<<< LEFT_CLEAN SUBROUTINE >>>>>>>>>>>>>>>>>>>>>

LNEXT

 Below is a subroutine to paint over the contents of our terminal

 screen and put a prompt in the appropriate place.

ENCORE2

$PROMPT$ 

 This is the routine that draws the terminal

DRAWTERM

                 TERMINAL                

NEXT

 $V1$

 <<<<<<<<<<<<CLEAN INSIDE UPPER BOX ONLY>>>>>>>>>>>>>>>

ENCORE1

 <<<<<<<<<<<<<CLEAR BOTTOM AREA ONLY>>>>>>>>>>>>>>>>>>>

BOTCLEAN

 <<<<<<< Standout Line Procedure >>>>>>>>>>

LINE

TOP1

     SYNTAX

             lpr  [-#num] [-Pprinter] -i[num] ... filename(s)

     FUNCTION

              lpr  -  spools the named files to be printed on an

              off-line printer when one becomes available.

     OPTIONS

              -#num  -  produces num copies of output

          -Pprinter  -  send output to named printer

            -i[num]  -  indents each page num spaces (8 is the default)

AANVANG

           The lpr command will send a file or files to an off-line

           printer.

 ------------ invoke lpr INTERACTION ---------------------

             X-------- Obey this limit ---------X

             X-------- Obey this limit ---------X

 $PROMPT$