home *** CD-ROM | disk | FTP | other *** search
/ Executor 2.0 / executorv2.0.iso / pc / linux / extra / docs / maillist / text / archive.96 / text2025.txt < prev    next >
Encoding:
Text File  |  1996-07-25  |  706 b   |  29 lines
  1. The previously posted qbasic program to strip the first 85 bits should
  2. work, but the two files must be opened as binary files NOT as input and output.
  3. So, the program would have to look something like...
  4.  
  5. ' Program to convert an image file to a usable .hfv
  6. files
  7. input "Enter image filename: ",image$
  8. input "Enter HFV filename:   ",hfv$
  9. x1&=1
  10. a=0
  11. cls
  12. do
  13.     while ( x1& < 85 )
  14.         get #1,x1&,a
  15.         x1&=x1&+1
  16.     wend
  17.     x2&=x1&-84
  18.     get #1,x1&,a
  19.     put #2,x2&,a
  20.     locate 12,1:?"Bytes copied:";
  21.     print  using "############";x2&
  22. until ( eof(1))
  23. close #1,#2
  24.  
  25. Hell, I don't have a quikbasic compiler... so, if someone DOES have one and
  26. creates an executable -- post it somewhere? ;)  Otherwise, just run this from
  27. qbasic. :)
  28.  
  29.