*LOOP
T:TEST PROGRAM OF PILOT-8080 FUNCTIONS
T:
T:WANT DISPLAY PGM?
A:
M:Y
JN:*GON
DP:
*GON
T:BEGIN BY TYPING ANYTHING, THEN PRESS 'RETURN'
A:$WHAT
T:YOU TYPED $WHAT.
T:$WHAT IS WHAT YOU TYPED.
T:   PRESS 'RETURN' TO CONTINUE.
A:
T:
*TESTM
T:I WILL LOOK FOR 'ABC', ' DEF', ' GHI '
T:NOTE THE SPACES.  THEY ARE IMPORTANT IF THE LETTERS WE ARE 
T:TRYING TO MATCH ARE NOT AT EITHER END OF A LINE.
A:
M:ABC, DEF, GHI ,
TY:MATCH
TN:NO MATCH
   U:*ASK
   JY:*TESTM
   J:TESTC

*ASK
T:AGAIN? (Y OR N)
A:
M: Y
E:
*TESTC
T:TYPE A NUMBER FROM 0 TO 99
T:I USE THE FIRST TWO DIGITS ENTERED.
   A:#A
T:ANOTHER NUMBER PLEASE
   A:#B
T:YOUR NUMBERS ARE #A AND #B.
T:I WILL SUBTRACT THEM.
   C:C=A-B
T:#A - #B = #C
T:
T:   TYPE 'NEXT' TO GO ON
A:
M:NEXT
   JN:*TESTC
T:
J:*LOOP