0 DIM F$(100)›10 CIO=ADR("hhh


ªhhBhEhDhIhH Vä­C…Ô© …Õ`")›1000 CLOSE #1:OPEN #1,4,0,F$:TRAP 1040›1010 GET #1,S1:GET #1,S2:IF S1+S2=510 THEN GET #1,S1:GET #1,S2›1020 GET #1,E1:GET #1,E2:S=S1+256*S2:E=E1+256*E2:L=E-S+1›1030 X=USR(CIO,1,7,S,L):IF X=1 THEN 1010›1040 CLOSE #1:RETURN ›