10 DIM T$(10)›20 T$="ABCDEFGH"›30 OPEN #1,8,0,"D:TEST.DAT"›40 PRINT #1;T$›50 CLOSE #1›60 OPEN #1,4,0,"D:TEST.DAT"›70 FOR I=0 TO 8›80 GET #1,A›90 ? A,CHR$(A)›100 NEXT I›110 CLOSE #1›