10 X=200:Y=200
20 FOR I=1 TO 23
30 LPRINT "M";X+I*100;",";Y:LPRINT "D";X+I*100;",";Y+1240
40 NEXT I
45 X=200:Y=100
50 FOR I=1 TO 11
60 LPRINT "M";X;",";Y+I*120:LPRINT "D";X+2300;",";Y+I*120
70 NEXT I
95 X=365:Y=200
96 LPRINT "Q3"
100 FOR I= 1 TO 22
110 LPRINT "M";X;",100":LPRINT "P";10*(I-1):X=X+100
120 NEXT I
125 Y=120
130 FOR I=1 TO 10
140 LPRINT "M280,";Y+I*120:LPRINT "P";I-1
150 NEXT I
1000 LPRINT "H"
