home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-386-Vol-2of3.iso / t / tw21l.exe / TWINKEY.CH < prev    next >
Text File  |  1993-02-06  |  15KB  |  359 lines
  1. //┌──────────────────────────────────────────────────────────────────────────┐
  2. //│                                                                          │
  3. //│                            TWINKEY.CH                                    │
  4. //│                                                                          │
  5. //│                    Source File for TSDWIN.LIB                            │
  6. //│                   Clipper 5.0 Interface Library                          │
  7. //│                                                                          │
  8. //│      Copyright ( C ) 1992 by Trilateral Systems Development Ltd.         │
  9. //│    All Rights Reserved * Version 2.00 * Release Date: Aug 1, 1992        │
  10. //│                                                                          │
  11. //│                         18  Bond St. South                               │
  12. //│                         Dundas, ON, Canada                               │
  13. //│                              L9H 3H1                                     │
  14. //│                           416-628-5086                                   │
  15. //│                                                                          │
  16. //│                                                                          │
  17. //│     Documented: 07-14-92      at 06:11:11pm                              │
  18. //└──────────────────────────────────────────────────────────────────────────┘
  19. /***
  20. *       twInkey.ch
  21. *       Standard INKEY() key-code definitions
  22. *       Copyright (c) 1990-1991 Nantucket Corp.  All rights reserved.
  23. *
  24. *       Additions by Trilateral Systems Development Ltd.
  25. */
  26.  
  27. //-----------------------------------------------------------------
  28. // Cursor movement keys
  29. //-----------------------------------------------------------------
  30. #define K_UP            5       // Uparrow, Ctrl-E
  31. #define K_DOWN          24      // Dnarrow, Ctrl-X
  32. #define K_LEFT          19      // Leftarrow, Ctrl-S
  33. #define K_RIGHT         4       // Rightarrow, Ctrl-D
  34. #define K_HOME          1       // Home, Ctrl-A
  35. #define K_END           6       // End, Ctrl-F
  36. #define K_PGUP          18      // PgUp, Ctrl-R
  37. #define K_PGDN          3       // PgDn, Ctrl-C
  38.  
  39. #define K_SH_UP         05      // Sh_Up
  40. #define K_SH_DOWN       24      // Sh_Down
  41. #define K_SH_LEFT       19      // Sh_Left
  42. #define K_SH_RIGHT      04      // Sh_Right
  43. #define K_SH_HOME       01      // Sh_Home
  44. #define K_SH_END        06      // Sh_End
  45. #define K_SH_PGUP       18      // Sh_Pgup
  46. #define K_SH_PGDN       03      // Sh_Pgdn
  47.  
  48. #define K_CTRL_UP       397     // Ctrl_Up
  49. #define K_CTRL_DOWN     401     // Ctrl_Down
  50. #define K_CTRL_LEFT     26      // Ctrl-Leftarrow, Ctrl-Z
  51. #define K_CTRL_RIGHT    2       // Ctrl-Rightarrow, Ctrl-B
  52. #define K_CTRL_HOME     29      // Ctrl-Home, Ctrl-]
  53. #define K_CTRL_END      23      // Ctrl-End, Ctrl-W
  54. #define K_CTRL_PGUP     31      // Ctrl-PgUp, Ctrl-Hyphen
  55. #define K_CTRL_PGDN     30      // Ctrl-PgDn, Ctrl-^
  56.  
  57. #define K_ALT_UP        408     // Alt_Up
  58. #define K_ALT_DOWN      416     // Alt_Down
  59. #define K_ALT_LEFT      411     // Alt_Left
  60. #define K_ALT_RIGHT     413     // Alt_Right
  61. #define K_ALT_HOME      407     // Alt_Home
  62. #define K_ALT_END       415     // Alt_End
  63. #define K_ALT_PGUP      409     // Alt_Pgup
  64. #define K_ALT_PGDN      417     // Alt_Pgdn
  65.  
  66. //-----------------------------------------------------------------
  67. // selection keys
  68. //-----------------------------------------------------------------
  69. #define K_ESC           27      // Esc, Ctrl-[
  70. #define K_ENTER         13      // Enter, Ctrl-M
  71. #define K_RETURN        13      // Return, Ctrl-M
  72. #define K_SPACE         32      // Space Bar
  73.  
  74. #define K_CTRL_ESC      27      // Ctrl_Esc
  75. #define K_CTRL_ENTER    10      // Ctrl-Return
  76. #define K_CTRL_RETURN   10      // Ctrl-Return
  77. #define K_CTRL_SPACE    32      // Ctrl_Spacebar
  78.  
  79. #define K_SH_ESC        27      // Sh_Esc
  80. #define K_SH_ENTER      13      // Sh_Enter
  81. #define K_SH_RETURN     13      // Sh_Return
  82. #define K_SH_SPACE      32      // Sh_Spacebar
  83.  
  84. #define K_ALT_ESC       257     // Alt_Esc
  85. #define K_ALT_ENTER     284     // Alt_Enter
  86. #define K_ALT_RETURN    284     // Alt_Return
  87. #define K_ALT_SPACE      32     // Alt_Spacebar
  88.  
  89. //-----------------------------------------------------------------
  90. // Editing keys
  91. //-----------------------------------------------------------------
  92. #define K_INS           22      // Ins, Ctrl-V
  93. #define K_DEL           7       // Del, Ctrl-G
  94. #define K_BS            8       // Backspace, Ctrl-H
  95. #define K_TAB           9       // Tab, Ctrl-I
  96.  
  97. #define K_CTRL_INS      402     // Ctrl_Insert
  98. #define K_CTRL_DEL      403     // Ctrl_Delete
  99. #define K_CTRL_BS       127     // Ctrl-Backspace
  100. #define K_CTRL_TAB      404     // Ctrl_Tab
  101.  
  102. #define K_SH_INS        22      // Sh_Insert
  103. #define K_SH_DEL        07      // Sh_Delete
  104. #define K_SH_BS         08      // Sh_Backspace
  105. #define K_SH_TAB        271     // Shift-Tab
  106.  
  107. #define K_ALT_INS       418     // Alt_Insert
  108. #define K_ALT_DEL       419     // Alt_Delete
  109. #define K_ALT_BS        270     // Alt_Backspace
  110. #define K_ALT_TAB       421     // Alt_Tab
  111.  
  112. //-----------------------------------------------------------------
  113. // Alpha keys
  114. //-----------------------------------------------------------------
  115. #define K_A             97      // a
  116. #define K_B             98      // b
  117. #define K_C             99      // c
  118. #define K_D             100     // d
  119. #define K_E             101     // e
  120. #define K_F             102     // f
  121. #define K_G             103     // g
  122. #define K_H             104     // h
  123. #define K_I             105     // i
  124. #define K_J             106     // j
  125. #define K_K             107     // k
  126. #define K_L             108     // l
  127. #define K_M             109     // m
  128. #define K_N             110     // n
  129. #define K_O             111     // o
  130. #define K_P             112     // p
  131. #define K_Q             113     // q
  132. #define K_R             114     // r
  133. #define K_S             115     // s
  134. #define K_T             116     // t
  135. #define K_U             117     // u
  136. #define K_V             118     // v
  137. #define K_W             119     // w
  138. #define K_X             120     // x
  139. #define K_Y             121     // y
  140. #define K_Z             122     // z
  141. #define K_LF_BRKT       91      // [
  142. #define K_RT_BRKT       93      // ]
  143. #define K_BK_SLASH      92      // \
  144. #define K_SEMI          59      // ;
  145. #define K_APPOS         39      // '
  146. #define K_COMMA         44      // ,
  147. #define K_PERIOD        46      // .
  148. #define K_SLASH         47      // /
  149.  
  150. #define K_CTRL_A        1       // Ctrl-A, Home
  151. #define K_CTRL_B        2       // Ctrl-B, Ctrl-Rightarrow
  152. #define K_CTRL_C        3       // Ctrl-C, PgDn, Ctrl-ScrollLock
  153. #define K_CTRL_D        4       // Ctrl-D, Rightarrow
  154. #define K_CTRL_E        5       // Ctrl-E, Uparrow
  155. #define K_CTRL_F        6       // Ctrl-F, End
  156. #define K_CTRL_G        7       // Ctrl-G, Del
  157. #define K_CTRL_H        8       // Ctrl-H, Backspace
  158. #define K_CTRL_I        9       // Ctrl-I, Tab
  159. #define K_CTRL_J        10      // Ctrl-J
  160. #define K_CTRL_K        11      // Ctrl-K
  161. #define K_CTRL_L        12      // Ctrl-L
  162. #define K_CTRL_M        13      // Ctrl-M, Return
  163. #define K_CTRL_N        14      // Ctrl-N
  164. #define K_CTRL_O        15      // Ctrl-O
  165. #define K_CTRL_P        16      // Ctrl-P
  166. #define K_CTRL_Q        17      // Ctrl-Q
  167. #define K_CTRL_R        18      // Ctrl-R, PgUp
  168. #define K_CTRL_S        19      // Ctrl-S, Leftarrow
  169. #define K_CTRL_T        20      // Ctrl-T
  170. #define K_CTRL_U        21      // Ctrl-U
  171. #define K_CTRL_V        22      // Ctrl-V, Ins
  172. #define K_CTRL_W        23      // Ctrl-W, Ctrl-End
  173. #define K_CTRL_X        24      // Ctrl-X, Dnarrow
  174. #define K_CTRL_Y        25      // Ctrl-Y
  175. #define K_CTRL_Z        26      // Ctrl-Z, Ctrl-Leftarrow
  176. #define K_CTRL_LF_BRKT  27      // Ctrl_Left Bracket
  177. #define K_CTRL_RT_BRKT  29      // Ctrl_Right Bracket
  178. #define K_CTRL_BK_SLASH 28      // Ctrl_Back Slash
  179.  
  180. #define K_SH_A          65      // A
  181. #define K_SH_B          66      // B
  182. #define K_SH_C          67      // C
  183. #define K_SH_D          68      // D
  184. #define K_SH_E          69      // E
  185. #define K_SH_F          70      // F
  186. #define K_SH_G          71      // G
  187. #define K_SH_H          72      // H
  188. #define K_SH_I          73      // I
  189. #define K_SH_J          74      // J
  190. #define K_SH_K          75      // K
  191. #define K_SH_L          76      // L
  192. #define K_SH_M          77      // M
  193. #define K_SH_N          78      // N
  194. #define K_SH_O          79      // O
  195. #define K_SH_P          80      // P
  196. #define K_SH_Q          81      // Q
  197. #define K_SH_R          82      // R
  198. #define K_SH_S          83      // S
  199. #define K_SH_T          84      // T
  200. #define K_SH_U          85      // U
  201. #define K_SH_V          86      // V
  202. #define K_SH_W          87      // W
  203. #define K_SH_X          88      // X
  204. #define K_SH_Y          89      // Y
  205. #define K_SH_Z          90      // Z
  206. #define K_LF_BRACE      123     // {
  207. #define K_RT_BRACE      125     // }
  208. #define K_V_BAR         124     // |
  209. #define K_COLON         58      // :
  210. #define K_QUOTE         34      // "
  211. #define K_LESS_THAN     60      // <
  212. #define K_GREATER_THAN  62      // >
  213. #define K_QUESTION      63      // ?
  214.  
  215. #define K_ALT_A         286     // Alt-A
  216. #define K_ALT_B         304     // Alt-B
  217. #define K_ALT_C         302     // Alt-C
  218. #define K_ALT_D         288     // Alt-D
  219. #define K_ALT_E         274     // Alt-E
  220. #define K_ALT_F         289     // Alt-F
  221. #define K_ALT_G         290     // Alt-G
  222. #define K_ALT_H         291     // Alt-H
  223. #define K_ALT_I         279     // Alt-I
  224. #define K_ALT_J         292     // Alt-J
  225. #define K_ALT_K         293     // Alt-K
  226. #define K_ALT_L         294     // Alt-L
  227. #define K_ALT_M         306     // Alt-M
  228. #define K_ALT_N         305     // Alt-N
  229. #define K_ALT_O         280     // Alt-O
  230. #define K_ALT_P         281     // Alt-P
  231. #define K_ALT_Q         272     // Alt-Q
  232. #define K_ALT_R         275     // Alt-R
  233. #define K_ALT_S         287     // Alt-S
  234. #define K_ALT_T         276     // Alt-T
  235. #define K_ALT_U         278     // Alt-U
  236. #define K_ALT_V         303     // Alt-V
  237. #define K_ALT_W         273     // Alt-W
  238. #define K_ALT_X         301     // Alt-X
  239. #define K_ALT_Y         277     // Alt-Y
  240. #define K_ALT_Z         300     // Alt-Z
  241. #define K_ALT_LF_BRKT   282     // Alt_Left Bracket
  242. #define K_ALT_RT_BRKT   283     // Alt_Right Bracket
  243. #define K_ALT_BK_SLASH  299     // Alt_Back Slash
  244. #define K_ALT_SEMI      295     // Alt_Semi Colon
  245. #define K_ALT_APPOS     296     // Alt_Apostrophe
  246. #define K_ALT_COMMA     307     // Alt_Comma
  247. #define K_ALT_PERIOD    308     // Alt_Period
  248. #define K_ALT_SLASH     309     // Alt_Slash
  249.  
  250. //-----------------------------------------------------------------
  251. // Number keys
  252. //-----------------------------------------------------------------
  253. #define K_BK_APPOS      96      // `
  254. #define K_1             49      // 1
  255. #define K_2             50      // 2
  256. #define K_3             51      // 3
  257. #define K_4             52      // 4
  258. #define K_5             53      // 5
  259. #define K_6             54      // 6
  260. #define K_7             55      // 7
  261. #define K_8             56      // 8
  262. #define K_9             57      // 9
  263. #define K_0             48      // 0
  264. #define K_MINUS         45      // -
  265. #define K_EQUAL         61      // =
  266.  
  267. #define K_CTRL_2        259     // C_2
  268. #define K_CTRL_6        30      // ^_6
  269. #define K_CTRL_MINUS    31      // ^_-
  270.  
  271. #define K_TILDE         126     // ~
  272. #define K_EXCLAM        33      // !
  273. #define K_AT            64      // @
  274. #define K_NUMBER        35      // #
  275. #define K_POUND         35      // #
  276. #define K_DOLLAR        36      // $
  277. #define K_PERCENT       37      // %
  278. #define K_CARET         94      // ^
  279. #define K_AMPERSAND     38      // &
  280. #define K_ASTERISK      42      // *
  281. #define K_LF_PAREN      40      // (
  282. #define K_RT_PAREN      41      // )
  283. #define K_UNDERSCORE    95      // _
  284. #define K_PLUS          43      // +
  285.  
  286. #define K_ALT_BK_APPOS  297     // ALT_Back Apostrophe
  287. #define K_ALT_1         376     // Alt-1
  288. #define K_ALT_2         377     // Alt-2
  289. #define K_ALT_3         378     // Alt-3
  290. #define K_ALT_4         379     // Alt-4
  291. #define K_ALT_5         380     // Alt-5
  292. #define K_ALT_6         381     // Alt-6
  293. #define K_ALT_7         382     // Alt-7
  294. #define K_ALT_8         383     // Alt-8
  295. #define K_ALT_9         384     // Alt-9
  296. #define K_ALT_0         385     // Alt-0
  297. #define K_ALT_MINUS     386     // Alt_-
  298. #define K_ALT_EQUAL     387     // Alt_=
  299.  
  300. //-----------------------------------------------------------------
  301. // Function keys
  302. //-----------------------------------------------------------------
  303. #define K_F1            28      // F1, Ctrl-\
  304. #define K_F2            -1      // F2
  305. #define K_F3            -2      // F3
  306. #define K_F4            -3      // F4
  307. #define K_F5            -4      // F5
  308. #define K_F6            -5      // F6
  309. #define K_F7            -6      // F7
  310. #define K_F8            -7      // F8
  311. #define K_F9            -8      // F9
  312. #define K_F10           -9      // F10
  313. #define K_F11           -40     // F11
  314. #define K_F12           -41     // F12
  315.  
  316. // Control-function keys
  317. #define K_CTRL_F1       -20     // Ctrl-F1
  318. #define K_CTRL_F2       -21     // Ctrl-F2
  319. #define K_CTRL_F3       -22     // Ctrl-F4
  320. #define K_CTRL_F4       -23     // Ctrl-F3
  321. #define K_CTRL_F5       -24     // Ctrl-F5
  322. #define K_CTRL_F6       -25     // Ctrl-F6
  323. #define K_CTRL_F7       -26     // Ctrl-F7
  324. #define K_CTRL_F8       -27     // Ctrl-F8
  325. #define K_CTRL_F9       -28     // Ctrl-F9
  326. #define K_CTRL_F10      -29     // Ctrl-F10
  327. #define K_CTRL_F11      -44     // Ctrl-F11
  328. #define K_CTRL_F12      -45     // Ctrl-F12
  329.  
  330. // Shift-function keys
  331. #define K_SH_F1         -10     // Shift-F1
  332. #define K_SH_F2         -11     // Shift-F2
  333. #define K_SH_F3         -12     // Shift-F3
  334. #define K_SH_F4         -13     // Shift-F4
  335. #define K_SH_F5         -14     // Shift-F5
  336. #define K_SH_F6         -15     // Shift-F6
  337. #define K_SH_F7         -16     // Shift-F7
  338. #define K_SH_F8         -17     // Shift-F8
  339. #define K_SH_F9         -18     // Shift-F9
  340. #define K_SH_F10        -19     // Shift-F10
  341. #define K_SH_F11        -42     // Shift-F11
  342. #define K_SH_F12        -43     // Shift-F12
  343.  
  344. // Alt-function keys
  345. #define K_ALT_F1        -30     // Alt-F1
  346. #define K_ALT_F2        -31     // Alt-F2
  347. #define K_ALT_F3        -32     // Alt-F3
  348. #define K_ALT_F4        -33     // Alt-F4
  349. #define K_ALT_F5        -34     // Alt-F5
  350. #define K_ALT_F6        -35     // Alt-F6
  351. #define K_ALT_F7        -36     // Alt-F7
  352. #define K_ALT_F8        -37     // Alt-F8
  353. #define K_ALT_F9        -38     // Alt-F9
  354. #define K_ALT_F10       -39     // Alt-F10
  355. #define K_ALT_F11       -46     // Alt-F11
  356. #define K_ALT_F12       -47     // Alt-F12
  357.  
  358.  
  359.