10 DIM D$(1),T$(4),T1$(4),T2$(10)›20 OPEN #1,8,0,"D:TEST.DAT"›30 XIO 9,#1,8,0," ABCDEFGHIJK"›46 CLOSE #1›50 T1$="XXXXXXXXXX":REM RESET T1$›60 T1$="YYYYY":REM MAKE LENGTH 5›70 OPEN #1,4,0,"D:TEST.DAT"›80 INPUT #1,T2$›90 CLOSE #1›100 ? "INPUT DOES THIS"›110 ? T2$,LEN(T2$)›120 T2$="XXXXXXXXXX":REM RESET T2$›130 T2$="YYYYY":REM MAKE LENGTH 5›140 OPEN #1,4,0,"D:TEST.DAT"›150 XIO 5,#1,4,0,T2$›160 CLOSE #1›170 ? :? "XI05 DOES THIS"›180 ? T2$,LEN(T2$)›190 T2$(10,10)="Z"›200 ? T2$,LEN(T2$)›210 ? "NOTICE THE X ISN'T WRITTEN OVER"›220 T$="XXXX":T1$="XXXX":T2$="XXX"›230 OPEN #1,4,0,"D:TEST.DAT"›240 XIO 5,#1,4,0,D$›250 CLOSE #1›260 ? :? "OR XIO5 CAN DO THIS"›270 ? T$:? T1$:? T2$›