home *** CD-ROM | disk | FTP | other *** search
/ Collection of Hack-Phreak Scene Programs / cleanhpvac.zip / cleanhpvac / CASIOCOL.ZIP / KRILE1A.ZIP / SOURCE.ZIP / WASTE.ASI < prev   
Text File  |  1997-11-24  |  151b  |  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.