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

*PRLCLEAN

CA: PR_ROW, PR_COL

T:                                    

E:

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

INTERACT

U: LCLEAN

U(TC <> 0): TERMCLEAN

U: PRLCLEAN

 $CMD_PR1$

 $CMD_PR2$

 $CMD_PR3$

 $CMD_PR4$

 $CMD_PR5$

 $CMD_PR6$

TH:$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.

TH:$PROMPT$

FORGET1

TNH:$PROMPT$$ANSWER$

 Observe the result 

 on the terminal.

U: LCLEAN

OK

 -----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

TH:$PROMPT$ 

 This is the routine that draws the terminal

DRAWTERM

                      TERMINAL                               Feedback:

NEXT

 $V1$

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

ENCORE1

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

BOTCLEAN

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

LINE

MOVEMENT1

|----------------Screen Limit--------------------|

    This is an exercise to practice cursor 

 movement commands.  

     You can move the cursor by  characters, 

 by words, by lines or by screens.  

 A character can be a letter, number, symbol,

 or a punctuation mark.  A word is a group of

 letters, numbers, or underscores surrounded 

 by anything except a letter, number, or 

 underscore.

REMOVAL1

 This is an exercise to practice

 text removal commands.  You can 

 remove single or multiple characters,

 words, or lines.

ADDITION1

 This is an exercise to practice

 adding text before the cursor, 

 after the cursor, at the beginning 

 or end of a line, on a line above 

 the cursor or on a line below the 

 cursor.

CHANGE1

 This is an exercise to practice

 changing existing text.  You

 can replace single characters,

 any number of words, or from the

 cursor position to the end of a

 line or the end of the file.

YANK

 This is an exercise to practice

 joining and copying lines.

AANVANG

Instructions:

 ----------------------- invoke l INTERACTION -----------------------

C: PR_ROW = 2

C: PR_COL = 7

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

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

C: ANSWER$ = ""

 108 = 'l - el'

XXXX

 XXXXXXXXXXX

 XXXXXXXXXXXXXXXXXXX

----

 ------------ cd INTERACTION ---------------------

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

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

 $PROMPT$

 ------------ ls INTERACTION ---------------------

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

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

 xx

 ------------ add INTERACTION ---------------------

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

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

 xx

 xx

 $PROMPT$

 ------------ flagged ls INTERACTION ---------------------

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

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

$PROMPT$$ANSWER$

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

 xx

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

 xx

 ------------ vol # INTERACTION ---------------------

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

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

  T:$PROMPT$$ANSWER$

 extract file ./usr/smith/summary

 Add links

 Set directory mode, owner, times

 Set owner/mode for '.'? [yn] 

 restore > 

 ------------ quit INTERACTION ---------------------

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

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

$PROMPT$$ANSWER$

 $PROMPT$