<<<<<<<<<<<<<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     ac  [-w temp file] [-p] [-d] [users] 
 FUNCTION   ac  -  produces a printout of connect time for each user
            who has logged on during the life of the current wtmp file.
 OPTIONS   -w temp file  -  specifies an alternate temp file rather than wtmp
                   user  -  prints only for user
                     -p  -  prints individual totals
                     -d  -  prints for each midnight to midnight period

AANVANG

 ------------ ac INTERACTION ---------------------
             X-------- Obey this limit ---------X
             X-------- Obey this limit ---------X
X-------- Obey this limit ---------X
      total 3879.85
$PROMPT$
 ------------ ac -p INTERACTION ---------------------
             X-------- Obey this limit ---------X
             X-------- Obey this limit ---------X
X-------- Obey this limit ---------X
 $PROMPT$ac 
      marcus  376.01
      root   3044.30
      lee     454.31
      smith     0.30
      yori    343.00
      miked     4.93
      total  3879.85
$PROMPT$
 ------------ lpq verify INTERACTION ---------------------
             X-------- Obey this limit ---------X
             X-------- Obey this limit ---------X
X-------- Obey this limit ---------X
      total  376.01
$PROMPT$