10 MODE 4:CLS:LIST #1:FOR x=0 TO 73:AT 0,x:y=IO_TRAP(14):PRINT #0;CLIP$(#1);