home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / CASIOCOL.ZIP / KRILE1A.ZIP / SOURCE.ZIP / WASTE.ASI < prev   
Encoding:
Text File  |  1997-11-24  |  151 b   |  10 lines
  1. strip_garbage:
  2. open"r",1,filename$
  3. a=filepos(1,hosttemp&)
  4. print #1,"" NONULL
  5. CLOSE 1
  6. gosub open_file:
  7. gosub set_fdt:
  8. gosub close_file:
  9. return
  10.