'Change the size that you want it to read at, there are other
'variations for the program, some things use 2 of them
'to accomplish the whole operation. A$ holds the K of
'information.


open file$ for binary as #1
zaa=lof(1)
do
if zaa>1024 then a=1024
if zaa<=1024 then a=zaa:m=1
zaa=zaa-a
input$(1,a$)
loop until m=1