home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / cko190_.zip / CKERMOD.INI < prev    next >
Text File  |  1994-09-05  |  8KB  |  207 lines

  1. ; File CKERMOD.INI, Sample C-Kermit 5A(190) customization file for OS/2.
  2. ;
  3. ; This file, which is ONLY A SAMPLE, should be called:
  4. ;
  5. ;   .mykermrc   (UNIX, OS-9, Aegis)
  6. ;   CKERMOD.INI (VMS, OpenVMS, AOS/VS, OS/2, Amiga, Atari ST)
  7. ;   ckermod.ini (Stratus VOS)
  8. ;
  9. ; MODify it to suit your needs and preferences, and install it in the same
  10. ; directory as your C-Kermit initialization file.  The design of this file
  11. ; lets you fill in a section for each different operating system where you
  12. ; run C-Kermit.  This file is executed automatically by the standard C-Kermit
  13. ; initialization file, CKERMIT.INI (or .kermrc).
  14. ;
  15. ; Authors:  Christine Gianone and Frank da Cruz, Columbia University.
  16. ; Date:     23 November 1992 for C-Kermit 5A(188).
  17. ; Modified: 30 June 1993 for edit 189.
  18. ;           23 August 1994 for edit 190.
  19.  
  20. ECHO Executing SAMPLE C-Kermit customization file \v(cmdfile)...
  21. ECHO { Please edit this file to reflect your needs and preferences.}
  22. ;
  23. ; ... and then remove the ECHO commands above.
  24.  
  25. COMMENT - Settings that apply to all the systems I use:
  26. ;
  27. set delay 1                     ; I escape back quickly
  28. set dial display on             ; I like to watch C-Kermit dial
  29. set window 2                    ; Use 2 window slots
  30. set block 3                     ; Use 16-bit CRC error checking        
  31. set receive packet-length 1000  ; Use 1000-character Kermit packets 
  32.  
  33. ; The remaining commands in this file depend on the script programming
  34. ; language.  Here we make sure we have it, then we use it to go to the
  35. ; section that applies to the type of system where C-Kermit is running:
  36. ;
  37. set take error on               ; Make errors fatal temporarily
  38. check if                        ; Do we have an IF command?
  39. set take error off              ; Yes we do, back to normal
  40.  
  41. check FORWARD
  42. if success forward \v(system)
  43. else goto \v(system)            ; Go execute system-dependent commands
  44.  
  45. :UNIX                           ; UNIX, all versions...
  46. set delay 1                     ; I escape back quickly
  47. if > \v(version) 501189 if remote end
  48. set terminal apc off            ; Change to ON if desired
  49. def mydial set modem hayes, -   ; Define a macro for dialing out...
  50.    set line /dev/acu, -
  51.    if fail end 1, -
  52.    set speed 2400, -
  53.    if fail end 1, -
  54.    dial \%1, -
  55.    if fail end 1, -
  56.    connect
  57. def nasa -                      ; Get latest news from NASA
  58.    telnet spacelink.msfc.nasa.gov
  59. end                             ; End of UNIX section
  60.  
  61. :VMS                            ; VMS and OpenVMS
  62. define on_exit -                ; Print a message when Kermit exits
  63.    echo Returning you to \v(system) now.
  64. if > \v(version) 501189 if remote end
  65. set terminal apc off            ; Change to ON if desired
  66. def mydial set modem telebit, - ; Sample macro for dialing out...
  67.    set line txa5, -
  68.    if fail end 1, -
  69.    set speed 19200, -
  70.    if fail end 1, -
  71.    dial \%1, -
  72.    if fail end 1, -
  73.    connect
  74. end                             ; End of VMS section
  75.  
  76. :OS/2                           ; OS/2 customizations...
  77. set modem hayes                 ; I have a Hayes modem
  78. set port com1                   ; on communication port 1
  79. set speed 19200                 ; at this speed
  80. set flow rts/cts                ; It uses hardware flow control
  81. set terminal apc off            ; Change to ON if desired
  82. set server display on           ; Show file display in server mode too
  83. ;
  84. ; OS/2 character sets, change if necessary.  In OS/2, your current PC code
  85. ; page is used automatically as the FILE character-set and as the local half
  86. ; of your TERMINAL character-set.
  87. ;
  88. set command byte 8              ; Use 8 bits between Kermit and console
  89. set xfer char latin1            ; Use Latin-1 for text file transfer
  90. set term char latin1            ; And use Latin-1 during CONNECT mode
  91. ;
  92. ; Macro for "ANSI" terminal emulation
  93. ;
  94. define ANSI set term type ansi
  95.  
  96. ; Macro for setting terminal rows
  97. ;
  98. define ROWS run mode co80\{44}\%1
  99.  
  100. echo { See OS/2 section for sample key mappings and screen colors.}
  101. ;
  102. ; Sample OS/2 key redefinitions.  As distributed, they are
  103. ; "commented out" by the leading semicolon.  To "uncomment" a command,
  104. ; remove the semicolon from the left margin.  Add, remove, or change
  105. ; key mapping commands to suit your needs and preferences.
  106. ; See pages 428-431 of "Using C-Kermit" for details, plus CKERMIT.UPD,
  107. ; and see CKOVTK2.INI for a complete VT220 key mapping.
  108. ;
  109. ; set key \27 \96               ; Swap the Escape and Accent-Grave keys
  110. ; set key \96 \27               ; ...during CONNECT mode.
  111. ; set key \127 \8               ; Backspace key sends BS rather than DEL.
  112.  
  113. COMMENT - Terminal emulation screen colors:
  114. ;
  115. ; TERMINAL-SCREEN   = Terminal emulation screen (synonym: "normal")
  116. ; BORDER            = Border around terminal screen (fullscreen sessions only)
  117. ; HELP-SCREEN       = Popup help screens
  118. ; STATUS-LINE       = Status line
  119. ; UNDERLINED-TEXT   = Color for simulating underlined text
  120. ;
  121. COMMENT - Sample color setup, change to suit your preferences...
  122. set terminal color border green                ; green border
  123. set terminal color terminal-screen blue lgray  ; blue on light gray
  124. set terminal color underline black lgray       ; black on light gray
  125. set terminal color status green blue           ; green on blue
  126. set terminal color help white cyan             ; white on cyan
  127.  
  128. ; COPY command...
  129. define  copy if < argc 2 fatal {Copy what?},-
  130.   if < argc 3 fatal {Copy \%1 to what?},-
  131.   run copy \%1 \%2
  132.  
  133. COMMENT - ALTERNATIVE DIAL PROCEDURE
  134. ; Sample macro showing how to add a new modem type, in this case
  135. ; Practical Peripherals PM14400FXMT - see CKERMIT.UPD for discussion.
  136. define PPDIAL -
  137.   set modem hayes, - ; Build on basic Hayes modem type.
  138.   set port 1, -      ; Change or remove this if necessary.
  139.   set flow none, -
  140.   set speed 57600, -
  141.   set dial speed-matching off, -
  142.   set dial init ATQ0W1S95=47&D2X4S2=43N1S37=11&K3&Q5S36=7S46=2S82=128\13, -
  143.   dial \%1, -
  144.   if success set flow rts, -
  145.   else end 1
  146.  
  147. COMMENT - XSEND macro sends a directory tree.  Read XSEND.CMD for details.
  148. ; Arguments:
  149. ; 1. Pathname, such as C:\\ (backslashes must be doubled!)
  150. ; 2. Filespec, such as *.*
  151. ;
  152. define XSEND rexx call \v(startup)xsend.cmd '\%1 \%2'
  153.  
  154. COMMENT - UPDATES displays CKERMIT.INF file with Viewer
  155. define updates run view ckermit.inf
  156.  
  157. COMMENT - Access to external protocols
  158. ;
  159. ; These are commented out.  If you need them, and if you have the
  160. ; software (M2ZMODEM or P), uncomment the appropriate group of commands.
  161. ; Read the CKERMIT.UPD file for further information.
  162.  
  163. ; M2ZMODEM program, external protocol
  164. ; take \m(_inidir)m2zmodem.ini
  165.  
  166. ; P v.1.01 program, external protocol
  167. ; take \m(_inidir)p101.ini
  168.  
  169. ; P v.2.00 program, external protocol
  170. ; take \m(_inidir)p200.ini
  171.  
  172. ; CEXYZ/2 program, external protocol
  173. ; take \m(_inidir)cexyz2.ini
  174. end                             ; End of OS/2 section
  175.  
  176. :OS9/68K                        ; OS-9/68000
  177. if > \v(version) 501189 if remote end
  178. set line /t3                    ; I want to use /t3 at 9600 bps
  179. xif success { -
  180.     set speed 9600, -
  181.     echo { Communications line set to /t3, 9600 bps} -
  182. }
  183. end                             ; End of OS-9 section
  184.  
  185. :AOS/VS                         ; Data General AOS/VS
  186. if > \v(version) 501189 if remote end
  187. def mydial set modem hayes, -   ; Macro for dialing out with Hayes modem...
  188.    set line @con3, -            ; Only works if modem is on @con3
  189.    if fail end 1, -
  190.    set speed 2400, -            ; and is set for 2400bps
  191.    if fail end 1, -
  192.    dial \%1, -
  193.    if fail end 1, -
  194.    connect
  195. end
  196.  
  197. ; And so on, you get the idea...
  198. ; Fill in the sections that apply to you.
  199.  
  200. :Stratus_VOS            ; Stratus VOS
  201. :Amiga                          ; Commodore Amiga
  202. :Atari_ST                       ; Atari ST
  203. :Macintosh                      ; Apple Macintosh
  204. :unknown                        ; Others
  205.  
  206. ; (End of CKERMOD.INI)
  207.