home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PROGRAMS / UTILS / COMMUNIC / MSKERM30.ZIP / MSKERMIT.INI < prev    next >
Encoding:
Text File  |  1990-01-21  |  4.6 KB  |  127 lines
  1. ; FILE MSKERMIT.INI
  2. ;
  3. ; Sample initialization file for MS-DOS Kermit 3.00.
  4. ; Christine M. Gianone, January 1990
  5.  
  6. echo MS-DOS Kermit 3.0 initialization file...
  7.  
  8. COMMENT - Macro definitions section...
  9.  
  10. ; Reserved variables.  If you define new macros, don't use these variables.
  11. ;  \%e - Last EDIT command filename.
  12. ;  \%n - Last DIAL command phone number.
  13.  
  14. ; Macros for communicating with UNIX, VAX/VMS, and similar systems:
  15. def vax set par non, set flo x, set hand no, set dupl ful, set key \270 \127
  16. def vms  do vax, set displ 8 ; VMS 5.0 or later, VT320 Eightbit.
  17. def unix do vax, set displ 7 ; Most UNIX systems are still 7-bit.
  18.  
  19. ; Macro for communicating with IBM mainframes in linemode:
  20. def ibm set par mark, set flo no, set hand xon, set dup ha, set key \270 \8
  21.  
  22. ; Macro for communicating with IBM mainframes in fullscreen mode:
  23. def fullscreen set par ev,set flo x,set hand no,set dupl ful,set key \270 \8
  24.  
  25. ; Additional DOS commands available directly from the MS-Kermit> prompt.
  26.  
  27. ; First define a FATAL error macro.
  28. def fatal echo Error: \%1\13, def \%1, stop
  29.  
  30. ; DOS MORE command...
  31. def more if < argc 2 fatal {More what?},-
  32. run more < \%1
  33.  
  34. ; DOS REN(ame) command...
  35. def rename if < argc 2 fatal {Rename what?},-
  36. if < argc 3 fatal {Rename \%1 to what?},-
  37. run ren \%1 \%2
  38.  
  39. ; DOS COPY command...
  40. def copy if < argc 2 fatal {Copy what?},-
  41. if < argc 3 fatal {Copy \%1 to where?},-
  42. run copy \%1 \%2
  43.  
  44. ; DOS CHCP command to examine or change code page...
  45. def chcp if = argc 1 run chcp,-
  46. if = argc 2 run chcp \%1
  47.  
  48. ; EDIT command...
  49. ; Replace "edlin" with your favorite editor or word processor.
  50. def edit if = argc 2 assign \%e \%1,-
  51. if not def \%e fatal {Edit what?},-
  52. run edlin \%e
  53.  
  54. ; CAPTURE command - easy downloading of a file from the host.
  55. ; Unlike the LOG SESSION command, CAPTURE always creates a new file.
  56. ; It overwrites file of same name if it already exists.
  57. ; Usage: at the MS-Kermit> prompt, type "capture xxx" where xxx is the name
  58. ; of the file you want to create on the PC.  Once you are connected to the
  59. ; host, TYPE the desired file.  Escape back when done.  The captured file will
  60. ; be on your disk (with a TYPE command at the beginning & a prompt at the end).
  61. def capture if = argc 1 fatal {Capture into what file?},-
  62. if exist \%1 del \%1,-
  63. log session \%1,-
  64. connect,close session,log sess session.log,close ses,def \%1
  65.  
  66. ; NOISY and CLEAN macros, modify to suit your environment...
  67. def clean set rec pack 94, set retry 4, set bl 1
  68. def noisy set rec pack 40, set retr 20, set bl 3
  69.  
  70. ; ERRSTP macro, for use with DIAL command...
  71. def errstp echo Error: \%1\13,def \%1,hangup,stop
  72.  
  73. ; LOOKUP macro for use with DIAL command...
  74. ; The names and numbers shown here are not real.
  75. ; Replace them with ones you really use.
  76. ; You may also add or delete lines, but the entire macro definition
  77. ; cannot be more than 255 characters long.
  78. def lookup -
  79.   if eq \%1 compuserve def \%1 5551423,-
  80.   if eq \%1 telenet    def \%1 5551234,-
  81.   if eq \%1 tymnet     def \%1 5554321
  82.  
  83. ; DIAL command...
  84. ; Requires the file HAYES.TAK to be on current disk or in DOS PATH.
  85. ; Uses LOOKUP and FATAL macros.
  86. def dial if = argc 2 assign \%n \%1,-
  87.   if < argc 2 if not def \%n fatal {Dial what?},-
  88.   if > argc 2 fatal {No spaces please.},-
  89.   lookup \%n,-
  90.   take hayes.tak
  91.  
  92. COMMENT - Script defaults
  93.  
  94. set input timeout proceed    ; Allow IF SUCCESS/FAILURE to work
  95. set input echo on        ; Display port input on screen
  96. set input case ignore        ; Ignore alphabet case for input matching
  97. set input default-timeout 1    ; One second default input timeout
  98.  
  99. COMMENT - Terminal emulation settings.  Modify to suit your environment.
  100.  
  101. set display 7            ; in the 7-bit environment
  102. set terminal vt320        ; Emulate DEC VT320
  103. set terminal roll off        ; Keep rolled-back screens where they are
  104. set terminal wrap on        ; Tell Kermit to do line wrap
  105. set terminal cursor underline    ; Underline cursor (rather than block)
  106. set terminal character latin-1    ; Use ISO Latin-1 terminal character set
  107.  
  108. COMMENT - File transfer settings
  109.  
  110. set file warning on        ; Don't overwrite existing files
  111. set transfer character-set transparent  ; For compatibility with old versions
  112. set receive packet-length 94    ; Regular-size packets
  113. set attributes on        ; Use file-attribute packets
  114. set window 1            ; Don't use sliding windows
  115.  
  116. COMMENT - Initial PC communication setup.  Modify to suit your PC and tastes.
  117.  
  118. set port 1            ; Use COM1
  119. do vax                ; Set parameters for talking to VAX
  120.                 ; (These are the default parameters anyway)
  121.  
  122. set key \96 \27            ; Exchange ESC and
  123. set key \27 \96            ; accent grave keys during terminal emulation
  124.  
  125. set terminal color 0 34 47      ; Terminal color is blue on white
  126. echo \13Smile!
  127.