home *** CD-ROM | disk | FTP | other *** search
/ Xentax forum attachments archive / xentax.7z / 6440 / arc.7z / arc.bms
Encoding:
Text File  |  2013-05-31  |  399 b   |  25 lines
  1. idstring "ARCH"
  2. get files long
  3. get offset1 long
  4. get offset2 long
  5. get offset3 long
  6. get base long
  7. comtype BPE
  8. for i = 0 < files
  9. goto offset2
  10. get zsize long
  11. get size long
  12. get offset long
  13. get npos short
  14. get comp short
  15. savepos offset2
  16. math npos + offset1
  17. goto npos
  18. get name string
  19. math offset + base
  20. if comp == 1
  21. clog name offset zsize size
  22. else
  23. log name offset zsize
  24. endif
  25. next i