1 DEFINTI,J:LOCATE0,0,0:SCREEN7,0,0:RESTORE:FORJ=1TO3:FORI=20004TO20364STEP40:READA$,B$:POKEI,VAL(A$):POKEI+1,VAL(B$):NEXTI,J:RUN:DATA0,192,0,192,0,64,192,224,193,96,63,96,63,224,34,64,36,128,71,224
2 DATA0,192,0,192,0,64,192,192,193,192,62,192,63,192,34,128,36,128,71,224,0,192,0,192,0,64,192,192,195,192,126,128,126,128,71,0,68,128,71,224