home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / c-kermit / ckduue.cli < prev    next >
Text File  |  2020-01-01  |  1KB  |  53 lines

  1. comment CKDUUE.CLI
  2. comment This macro builds a dumpfile from the C-Kermit for AOS/VS release
  3. comment files and then uuencodes it.  The dumpfile is called ckdker.df
  4. comment and the uuencoded file is called ckdker.uue.
  5.  
  6. push
  7. prompt pop
  8.  
  9. comment Kill the searchlist to ensure that any files we find are in the
  10. comment current directory (but first save it in !STRING)
  11. string [!searchlist]
  12. searchlist/k
  13.  
  14. comment Make sure the uuencode executable is here
  15. [!equal,[!file ckdenco.pr],]
  16.     write Can't find CKDENCO.PR
  17. [!else]
  18.  
  19. comment Rename from standard Kermit names to names expected on VS
  20. delete/2=ignore kermit.rn kermit.cli.proto
  21. copy kermit.rn ckdins.doc
  22. copy kermit.cli.proto ckdker.cli
  23.  
  24. acl/2=err (kermit.pr kermit.st kermit.rn kermit.cli.proto ckerm+.ini) &
  25.     op oware + re
  26.  
  27. acl/2=err (ckcker.upd ckcker.bwr ckdker.bwr ckermit.kdd ckermit.ksd) &
  28.     op oware + re
  29.  
  30. delete/2=ignore  ckdker.df ckdker.uue
  31.  
  32. comment Restore original value of searchlist so we can find dump_ii
  33. searchlist [!string]
  34.  
  35. write Creating dumpfile...
  36. x dump_ii/v ckdker.df kermit.pr kermit.st kermit.rn kermit.cli.proto &
  37.     ckermit.ini ckermod.ini ckcker.upd ckcker.bwr ckdker.bwr ckermit.kdd &
  38.     ckermit.ksd
  39. acl ckdker.df op oware + re
  40.  
  41. comment Get rid of these
  42. delete/2=ignore kermit.rn kermit.cli
  43.  
  44. write Uuencoding it...
  45. x ckdenco/l=ckdker.uue ckdker.df ckdker.df
  46. acl ckdker.uue op oware + re
  47.  
  48. write Done!
  49.  
  50. [!end]
  51.  
  52. pop
  53.