207 DATA 5,4,7,7,7,7,7,7,7,7,7,1
2000 *L.SCOMP 1400
2001 MODE 2:VDU 28,2,7,7,6,23,1,0;0;0;0;
2002 FORI%=4TO15:READC:VDU19,I%,C;0;:NEXT
2006 CALL &144E
2007 MOVE 870,30:DRAW 920,20:MOVE 635,280:DRAW 635,245:MOVE 1170,280:DRAW 1175,245
2020 *L.P-1
2021 *L.P-1a
2030 *RUN P-2