10 OPEN1,6,1:OPEN8,6,0
20 PRINT"[147]F[146]LAECHE / E[146]INSCHREIBEN ?":POKE198,0:WAIT198,1:GETA$
30 IFA$="E"THEN100
40 PRINT#8:FORZ=0TO999STEP2
50 PRINT#1,"M";0;-Z:PRINT#1,"D";479;-Z:PRINT#1,"M";479;-Z-1:PRINT#1,"D";0;-Z-1:NEXT
60 GOTO40
100 PRINT#8:FORZ=0TO999:FORX=0TO472STEP8
120 PRINT#1,"M";X;-Z:PRINT#1,"D";X+4;-Z:NEXT:NEXT
130 GOTO100