home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1996 June / BUYER_696.iso / internet / ameol / ameol16 / archie.sc_ / archie.sc
Text File  |  1994-06-16  |  849b  |  31 lines
  1. REM ARCHIE.SCR v1.12.2 "Execute ip> archie"
  2. REM Contributed by mentha@cix
  3. REM Ameol script to Archie a site or for a file.
  4. REM This version downloads archie.lis file as archie.wri
  5. REM +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  6. status "Archie..."
  7. put "run internet"
  8. waitfor "ip>"
  9. put "archie %s('Archie','Enter search text:') %s('Archie','Enter site to search:\n(Optional - enter a [space] to ignore)')"
  10. waitfor "ip>"
  11. put "dir archie.lis"
  12. if waitfor("ip> ","              ^M^J ")==0
  13.  status "Archie failed."
  14.  put "quit"
  15.  waitfor "M:"
  16.  status ""
  17.  end
  18. endif
  19. REM Archie successful...
  20. waitfor "ip>"
  21. status "Receiving Archie list from Cix..."
  22. put "send archie.lis"
  23. download "archie.wri"
  24. status "archie.wri received to \download"
  25. put "erase archie.lis"
  26. waitfor "ip>"
  27. put "quit"
  28. waitfor "M:"
  29. status ""
  30. end
  31.