MrCBASIC/9/9.TXT

5 DIM SCR(5000):DIM BOX(500)
10 CLS:PRINT"    THIS IS EXERCISE 9"
12 CALL MOVETO(20,30):INPUT"    IS IT THE ONE YOU WANTED?  Y/N "; ANS$
13 IF ANS$ = "Y" THEN 17
15 IF ANS$= "N" THEN RUN "GRAM 1"