home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / btos2926.zip / ELEP2F.ZIP / K437FRET.DEF < prev    next >
Text File  |  1991-05-13  |  12KB  |  436 lines

  1. ******************************************************************************
  2. *                                                                            *
  3. *     Name: K437FRET.DEF                                                     *
  4. *                                                                            *
  5. * Function: This contains the default CP78 keyboard mapping for the          *
  6. *           following envirnoment:                                           *
  7. *                                                                            *
  8. *           Code Page/s      : 437                                           *
  9. *                              850                                           *
  10. *           Country/ies      : France                                        *
  11. *           Host Keyboard/s  : Typewriter ( 12 PF Keys)                      *
  12. *           PC   Keyboard/s  : Enhanced                                      *
  13. *                              PC/AT                                         *
  14. *           Author/s         : Kenneth Kahn                                  *
  15. *                              Daniel Cornu, Daniel Souday, Jack Servier     *
  16. *                                                                            *
  17. ******************************************************************************
  18. *
  19. *----------------------------------------------------------------------------
  20. * Declare available Host scan codes
  21. *----------------------------------------------------------------------------
  22. *
  23. DECLARE 1          = 0x21
  24. DECLARE 2          = 0x22
  25. DECLARE 3          = 0x23
  26. DECLARE 4          = 0x24
  27. DECLARE 5          = 0x25
  28. DECLARE 6          = 0x26
  29. DECLARE 7          = 0x27
  30. DECLARE 8          = 0x28
  31. DECLARE 9          = 0x29
  32. DECLARE 0          = 0x20
  33. DECLARE '          = 0x30
  34. DECLARE ^          = 0x11
  35. DECLARE backspace  = 0x31
  36. DECLARE tab        = 0x36
  37. DECLARE a          = 0x70
  38. DECLARE z          = 0x76
  39. DECLARE e          = 0x64
  40. DECLARE r          = 0x71
  41. DECLARE t          = 0x73
  42. DECLARE y          = 0x78
  43. DECLARE u          = 0x74
  44. DECLARE i          = 0x68
  45. DECLARE o          = 0x6E
  46. DECLARE p          = 0x6F
  47. DECLARE à          = 0x1B
  48. DECLARE &          = 0x15
  49. DECLARE backtab    = 0x35
  50. DECLARE capslock   = 0x4C
  51. DECLARE q          = 0x60
  52. DECLARE s          = 0x72
  53. DECLARE d          = 0x63
  54. DECLARE f          = 0x65
  55. DECLARE g          = 0x66
  56. DECLARE h          = 0x67
  57. DECLARE j          = 0x69
  58. DECLARE k          = 0x6A
  59. DECLARE l          = 0x6B
  60. DECLARE é          = 0x7E
  61. DECLARE ù          = 0x12
  62. DECLARE \          = 0x0F
  63. DECLARE return     = 0x08
  64. DECLARE <          = 0x09
  65. DECLARE w          = 0x79
  66. DECLARE x          = 0x77
  67. DECLARE c          = 0x62
  68. DECLARE v          = 0x75
  69. DECLARE b          = 0x61
  70. DECLARE n          = 0x6D
  71. DECLARE m          = 0x6C
  72. DECLARE ,          = 0x33
  73. DECLARE .          = 0x32
  74. DECLARE moins      = 0x14
  75. *
  76. * Special 3278/79 Function Keys
  77. *
  78. DECLARE attn       = 0x50
  79. DECLARE cursorsel  = 0x51
  80. DECLARE chgfmt     = 0x52
  81. DECLARE eraseinput = 0x53
  82. DECLARE eraseeof   = 0x55
  83. DECLARE test       = 0x57
  84. DECLARE repro      = 0x5F
  85. DECLARE finzone    = 0x5E
  86. DECLARE insert     = 0x0C
  87. DECLARE delete     = 0x0D
  88. DECLARE up         = 0x0E
  89. DECLARE down       = 0x13
  90. DECLARE left       = 0x16
  91. DECLARE right      = 0x1A
  92. DECLARE restaur    = 0x34
  93. DECLARE spacebar   = 0x10
  94. DECLARE enter      = 0x18
  95. *
  96. * PF keys
  97. *
  98. DECLARE pf01       = 0x40
  99. DECLARE pf02       = 0x41
  100. DECLARE pf03       = 0x42
  101. DECLARE pf04       = 0x43
  102. DECLARE pf05       = 0x44
  103. DECLARE pf06       = 0x45
  104. DECLARE pf07       = 0x46
  105. DECLARE pf08       = 0x47
  106. DECLARE pf09       = 0x48
  107. DECLARE pf10       = 0x49
  108. DECLARE pf11       = 0x4A
  109. DECLARE pf12       = 0x4B
  110. *
  111. * Ordinal Values for elep2kbd.DLL
  112. *
  113. DECLARE elep2kbd    = 0xFF
  114. *
  115. * Function Values for elep2kbd.DLL
  116. *
  117. DECLARE skipword   = 1
  118. *
  119. *----------------------------------------------------------------------------
  120. *
  121. *----------------------------------------------------------------------------
  122. * Define Keyboard in terms of Host scan codes
  123. *----------------------------------------------------------------------------
  124. *------------------------
  125. * Standard character keys
  126. *------------------------
  127. *
  128. * lower case letters
  129. *
  130. DEFINE  a = a
  131. DEFINE  b = b
  132. DEFINE  c = c
  133. DEFINE  d = d
  134. DEFINE  e = e
  135. DEFINE  f = f
  136. DEFINE  g = g
  137. DEFINE  h = h
  138. DEFINE  i = i
  139. DEFINE  j = j
  140. DEFINE  k = k
  141. DEFINE  l = l
  142. DEFINE  m = m
  143. DEFINE  n = n
  144. DEFINE  o = o
  145. DEFINE  p = p
  146. DEFINE  q = q
  147. DEFINE  r = r
  148. DEFINE  s = s
  149. DEFINE  t = t
  150. DEFINE  u = u
  151. DEFINE  v = v
  152. DEFINE  w = w
  153. DEFINE  x = x
  154. DEFINE  y = y
  155. DEFINE  z = z
  156. *
  157. * upper case letters
  158. *
  159. DEFINE  A = S-a
  160. DEFINE  B = S-b
  161. DEFINE  C = S-c
  162. DEFINE  D = S-d
  163. DEFINE  E = S-e
  164. DEFINE  F = S-f
  165. DEFINE  G = S-g
  166. DEFINE  H = S-h
  167. DEFINE  I = S-i
  168. DEFINE  J = S-j
  169. DEFINE  K = S-k
  170. DEFINE  L = S-l
  171. DEFINE  M = S-m
  172. DEFINE  N = S-n
  173. DEFINE  O = S-o
  174. DEFINE  P = S-p
  175. DEFINE  Q = S-q
  176. DEFINE  R = S-r
  177. DEFINE  S = S-s
  178. DEFINE  T = S-t
  179. DEFINE  U = S-u
  180. DEFINE  V = S-v
  181. DEFINE  W = S-w
  182. DEFINE  X = S-x
  183. DEFINE  Y = S-y
  184. DEFINE  Z = S-z
  185. *
  186. * Numbers
  187. *
  188. DEFINE  1 = 1
  189. DEFINE  2 = 2
  190. DEFINE  3 = 3
  191. DEFINE  4 = 4
  192. DEFINE  5 = 5
  193. DEFINE  6 = 6
  194. DEFINE  7 = 7
  195. DEFINE  8 = 8
  196. DEFINE  9 = 9
  197. DEFINE  0 = 0
  198. *
  199. *-----------------------
  200. * Standard PF Keys
  201. *-----------------------
  202. *
  203. DEFINE  F1              = pf01
  204. DEFINE  F2              = pf02
  205. DEFINE  F3              = pf03
  206. DEFINE  F4              = pf04
  207. DEFINE  F5              = pf05
  208. DEFINE  F6              = pf06
  209. DEFINE  F7              = pf07
  210. DEFINE  F8              = pf08
  211. DEFINE  F9              = pf09
  212. DEFINE  F10             = pf10
  213. DEFINE  F11             = pf11
  214. DEFINE  F12             = pf12
  215. *
  216. *-----------------------
  217. * Special Function keys
  218. *-----------------------
  219. *
  220. * Erase Input
  221. *
  222. DEFINE  A-F3            = A-eraseinput
  223. *
  224. * Erase EOF
  225. *
  226. DEFINE  A-F4            = eraseeof
  227. *
  228. * Erase EOF (E/MYTE compatible)
  229. *
  230. DEFINE  C-E             = eraseeof
  231. *
  232. * Test
  233. *
  234. DEFINE  A-F5            = A-test+noqueue
  235. *
  236. * System Request
  237. *
  238. DEFINE  A-F6            = A-attn+noqueue
  239. *
  240. * CP78 Main menu
  241. *
  242. DEFINE  A-F7            = menu
  243. *
  244. * Attn
  245. *
  246. DEFINE  A-F8            = attn
  247. *
  248. * PA1 and PA2
  249. *
  250. DEFINE  A-F9            = A-repro+noqueue
  251. DEFINE  ESC             = A-finzone+noqueue
  252. *
  253. * Reset
  254. *
  255. DEFINE  S-ESC           = restaur+noqueue
  256. *
  257. * Reset for VIO Window
  258. *
  259. DEFINE  C-R             = restaur+noqueue
  260. *
  261. * Enter
  262. *
  263. DEFINE  Enter           = enter
  264. DEFINE  PadEnter        = enter
  265. *
  266. * New line
  267. *
  268. DEFINE  S-Enter         = return
  269. *
  270. * Delete
  271. *
  272. DEFINE  PadDel          = delete
  273. DEFINE  Delete          = delete
  274. *
  275. * Insert
  276. *
  277. DEFINE  PadIns          = insert
  278. DEFINE  Insert          = insert
  279. *
  280. * Cursor movement (normal speed)
  281. *
  282. DEFINE  PadUp           = up+noqueue
  283. DEFINE  Up              = up+noqueue
  284. DEFINE  PadDown         = down+noqueue
  285. DEFINE  Down            = down+noqueue
  286. DEFINE  PadLeft         = left+noqueue
  287. DEFINE  Left            = left+noqueue
  288. DEFINE  PadRight        = right+noqueue
  289. DEFINE  Right           = right+noqueue
  290. *
  291. * Cursor movement (double speed)
  292. *
  293. DEFINE  C-PadUp         = up up
  294. DEFINE  C-Up            = ScrollUp
  295. DEFINE  C-PadDown       = down down
  296. DEFINE  C-Down          = ScrollDown
  297. DEFINE  C-PadLeft       = left left
  298. DEFINE  C-Left          = ScrollLeft
  299. DEFINE  C-PadRight      = right right
  300. DEFINE  C-Right         = ScrollRight
  301. *
  302. DEFINE  A-Up            = up up
  303. DEFINE  A-Down          = down down
  304. DEFINE  A-Left          = left left
  305. DEFINE  A-Right         = @elep2kbd.skipword
  306. *
  307. * Page movement
  308. *
  309. DEFINE  PadPgUp         = pf07
  310. DEFINE  PageUp          = pf07
  311. DEFINE  PadPgDn         = pf08
  312. DEFINE  PageDown        = pf08
  313. *
  314. * Home
  315. *
  316. DEFINE  PadHome         = A-backtab
  317. DEFINE  Home            = A-backtab
  318. *
  319. * MLT Jump Session Hot-Key
  320. *
  321. DEFINE   C-S            = A-insert+noqueue
  322. *
  323. * MLT for Enhanced Keyboard
  324. *
  325. DEFINE   A-insert       = A-insert+noqueue
  326. *
  327. * Advance to End of line
  328. *
  329. DEFINE  PADend          = endofline
  330. DEFINE  End             = endofline
  331. *
  332. * Backspace
  333. *
  334. DEFINE  BackSpace       = left delete
  335. *
  336. * Tab keys
  337. *
  338. DEFINE  Tab             = tab
  339. DEFINE  S-Tab           = backtab
  340. *
  341. * Special Symbols
  342. *
  343. DEFINE    Space         = spacebar
  344. DEFINE    .             = .
  345. DEFINE    :             = S-.
  346. DEFINE    ,             = ,
  347. DEFINE    ;             = S-,
  348. DEFINE    minus         = moins
  349. DEFINE    _             = S-moins
  350. DEFINE    !             = S-1
  351. DEFINE    "             = S-2
  352. DEFINE                 = S-3
  353. DEFINE    $             = S-4
  354. DEFINE    %             = S-5
  355. DEFINE    +             = S-6
  356. DEFINE    /             = S-7
  357. DEFINE    (             = S-8
  358. DEFINE    )             = S-9
  359. DEFINE    equal         = S-0
  360. DEFINE    ?             = S-'
  361. DEFINE    '             = '
  362. DEFINE    à             = à
  363. DEFINE    ç             = S-à
  364. DEFINE    &             = &
  365. DEFINE    *             = S-&
  366. DEFINE    é             = é
  367. DEFINE    è             = S-é
  368. DEFINE    <             = <
  369. DEFINE    >             = S-<
  370. DEFINE    ù             = ù
  371. DEFINE    °             = S-ù
  372. DEFINE    \             = \
  373. DEFINE    £             = S-\
  374. DEFINE    ^             = ^
  375. DEFINE    â             = ^ a
  376. DEFINE    ê             = ^ e
  377. DEFINE    î             = ^ i
  378. DEFINE    ô             = ^ o
  379. DEFINE    û             = ^ u
  380. DEFINE    ä             = S-^ a
  381. DEFINE    Ä             = S-^ S-a
  382. DEFINE    ë             = S-^ e
  383. DEFINE    ï             = S-^ i
  384. DEFINE    ö             = S-^ o
  385. DEFINE    Ö             = S-^ S-o
  386. DEFINE    ü             = S-^ u
  387. DEFINE    Ü             = S-^ S-u
  388. DEFINE    ÿ             = S-^ y
  389. *
  390. *----------------------------------------------------------------------------
  391. * Define user macro(s)
  392. *----------------------------------------------------------------------------
  393. *
  394. *----------------------------------------------------------------------------
  395. * Define keys that access external DLL functions
  396. *----------------------------------------------------------------------------
  397. *
  398. * A-k : Access the 1st KEYBOARD table in elep2kbd.$L$
  399. *
  400. DEFINE  A-K     = @elep2kbd.0x102
  401. *
  402. * A-p : Access the 2nd KEYBOARD table in elep2kbd.$L$
  403. *
  404. DEFINE  A-P     = @elep2kbd.0x202
  405. *
  406. *----------------------------------------------------------------------------
  407. * Define Keys for Document Assist Feature
  408. *----------------------------------------------------------------------------
  409. *
  410. * Ctrl-d  -  Turn Feature ON
  411. *
  412. DEFINE  C-D             = A-chgfmt
  413. DEFINE  C-F             = chgfmt
  414. DEFINE  C-G             = A-up
  415.  
  416. *----------------------------------------------------------------------------
  417. * Define Default Key Delay.
  418. *----------------------------------------------------------------------------
  419. SET KeyDelay =  0
  420.  
  421. *------------------------------------------------------------------*
  422. *                                                                  *
  423. * Terminal IDs :  2  =  3278/79 Model-2  (24x80)                   *
  424. *                 3  =  3278/79 Model-3  (32x80)                   *
  425. *                 4  =  3278/79 Model-4  (43x80)                   *
  426. *                 5  =  3278/79 Model-5  (27x132)                  *
  427. *                                                                  *
  428. *------------------------------------------------------------------*/
  429. SET TermID1 = 2
  430. SET TermID2 = 4
  431. SET TermID3 = 2
  432. SET TermID4 = 2
  433.  
  434. Define M2     = menu
  435. Define R-Ctrl = enter
  436.