10 DIM UP$(1),A$(10),B$(10),C$(258):UP$=CHR$(28)
100 PRINT "21":PRINT UP$;:POKE 764,12
110 INPUT A:IF A<>1 THEN STOP
200 PRINT "21":PRINT UP$;:POKE 764,12
210 INPUT #16,A:IF A<>21 THEN STOP
300 PRINT "?30,40,50":PRINT UP$;:POKE 764,12
310 INPUT A,B:IF A<>30 OR B<>40 THEN STOP
400 PRINT "?ABC,DEF":PRINT UP$;:POKE 764,12
410 INPUT A$:IF A$<>"ABC,DEF" THEN STOP
500 PRINT "?300 ,":PRINT UP$;:POKE 764,12
510 TRAP 600:INPUT A:STOP
600 PRINT "?300,":PRINT UP$;:POKE 764,12
610 INPUT A:IF A<>300 THEN STOP
700 PRINT "? 300,":PRINT UP$;:POKE 764,12
710 INPUT A:IF A<>300 THEN STOP
10000 PRINT "PASS":END
