10 INPUT "HOW 'BOUT ANOTHER PROGRAM",A$
  20 IF A$="YES" THEN 70
  30 IF A$="NO" THEN 80
  40 PRI "JUST A YES OR NO, PLEASE"
  50 GO TO 10
  70 CHAIN "OLD"
  80 INPUT "WHY THE HELL NOT"B
  90 PRI "THAT'S A LOUSY REASON; TRY IT OVER..."
 100 INPUT "READY TO ANSWER THE QUESTION AGAIN"C$
 110 IF C$="YES" THEN 10
 120 IF C$="NO" THEN 80
 130 GO TO 40
 140 END