10 OPEN #0,"file:///c://other/vash.fail","output" 20 FOR I%=1 TO LEN(V$) 30 B$=MID$(V$,I%,1) 40 PUT #0,ASC(B$) 50 NEXT I% 60 CLOSE #0