100 REM
110 PRINT CHR$(27)CHR$(120)CHR$(53);
120 S1$ = "* * * * * * * "
130 S2$ = " * * * * * * *"
140 E$=CHR$(155)
150 R1$=E$+"p"
160 R2$=E$+"q"
170 G1$=E$+"F"
180 G2$=E$+"G"
190 B$+G1$+"^"+G2$
200 P1$="       "+R1$+" "+R2$
210 P2$=P1$+G1$+"*"+G2$
220 FOR I=1 TO 45
230 L1$=L1$+"i"
240 L2$=L2$+" "
250 NEXT I
260 PRINT "       "+B$
270 PRINT "       "+R1$+" "+B$+R2$
280 FOR I=1 TO 7
290 PRINT P2$;
300 IF I-2*(INT(I/2)) <> 0 THEN 320
310 PRINT S2$+R1$+MID$(L2$,1,45-LEN(S2$))+R2$:GOTO 330
320 PRINT S1$+G1$+MID$(L1$,1,45-LEN(S1$))+G2$
330 NEXT I
340 FOR I=8 TO 13
350 PRINT P2$;
360 IF I-2*(INT(I/2)) <> 0 THEN 380
370 PRINT R1$+L2$+R2$:GOTO 390
380 PRINT G1$+L1$+G2$
390 NEXT I
400 PRINT       "R1$+" "+B$+R2$
410 PRINT P2$
420 PRINT P1$+G1$+"x"+G2$
430 PRINT P1$+G1$+"y"+G2$
440 FOR I=1 TO 4
450 PRINT P1$
460 NEXT I
470 PRINT "    "+G1$+"yyyy"+R1$+" "+R2$+"xxxx"+G2$;
480 LINE INPUT "";Z$
490 PRINT CHR$(27);"y5";
500 END
P1$
460 NEXT I
470 PRINT "    "+G1$+"yyyy"+R1$+" "+R2