home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1993 #2 / Image.iso / clipper / doors10.zip / DOORS.501 / HEX.CH < prev    next >
Text File  |  1993-04-22  |  7KB  |  301 lines
  1. /*  FILE    hex.ch
  2. * Author    Chuck Burfoot
  3. * Created   Sun  12-02-1990
  4. * Mod
  5. *
  6. * Mod       Thu  04-22-1993  - Added dp_hex() translation, but don't know
  7. *           How usefull it will be.
  8. *
  9. * Purpose   Standard defines for HEX numbering
  10. *           Definitions to use in lieu of calculating the decimal
  11.             equivalent and always wondering when we read it if it is
  12.             the correct value.
  13.  
  14.     Would be fastest if we could #define all values up to xFFFF,
  15.     BUT would take about 256 K to read in the file, so doesn't seem
  16.     pratical. Wish Clipper Compiler could translate HEX notation
  17. *
  18. *           Copyright Codesmythe, Inc. 1993
  19.             Copyright, Charles A. Burfoot, 1991
  20.             All Rights Reserved
  21. *** */
  22.  
  23. /* Number defines in HEX - ONLY up to 255  - x0FF
  24.    FOR values greater than 255 (xFF) see  B2INT(xValue) --> nValue
  25.  
  26.     eg: x1234h = B2INT(x12)+x34
  27.  
  28.     The following works, but it isn't very obvious or handy  */
  29.  
  30. #xtranslate dp_hex( <x>,<y> ) => (B2INT( x<x> ) + x<y>)
  31.  
  32. #define   x0      0
  33. #define   x1      1
  34. #define   x2      2
  35. #define   x3      3
  36. #define   x4      4
  37. #define   x5      5
  38. #define   x6      6
  39. #define   x7      7
  40. #define   x8      8
  41. #define   x9      9
  42. #define  x0A     10
  43. #define  x0B     11
  44. #define  x0C     12
  45. #define  x0D     13
  46. #define  x0E     14
  47. #define  x0F     15
  48. #define  x10     16
  49. #define  x11     17
  50. #define  x12     18
  51. #define  x13     19
  52. #define  x14     20
  53. #define  x15     21
  54. #define  x16     22
  55. #define  x17     23
  56. #define  x18     24
  57. #define  x19     25
  58. #define  x1A     26
  59. #define  x1B     27
  60. #define  x1C     28
  61. #define  x1D     29
  62. #define  x1E     30
  63. #define  x1F     31
  64. #define  x20     32
  65. #define  x21     33
  66. #define  x22     34
  67. #define  x23     35
  68. #define  x24     36
  69. #define  x25     37
  70. #define  x26     38
  71. #define  x27     39
  72. #define  x28     40
  73. #define  x29     41
  74. #define  x2A     42
  75. #define  x2B     43
  76. #define  x2C     44
  77. #define  x2D     45
  78. #define  x2E     46
  79. #define  x2F     47
  80. #define  x30     48
  81. #define  x31     49
  82. #define  x32     50
  83. #define  x33     51
  84. #define  x34     52
  85. #define  x35     53
  86. #define  x36     54
  87. #define  x37     55
  88. #define  x38     56
  89. #define  x39     57
  90. #define  x3A     58
  91. #define  x3B     59
  92. #define  x3C     60
  93. #define  x3D     61
  94. #define  x3E     62
  95. #define  x3F     63
  96. #define  x40     64
  97. #define  x41     65
  98. #define  x42     66
  99. #define  x43     67
  100. #define  x44     68
  101. #define  x45     69
  102. #define  x46     70
  103. #define  x47     71
  104. #define  x48     72
  105. #define  x49     73
  106. #define  x4A     74
  107. #define  x4B     75
  108. #define  x4C     76
  109. #define  x4D     77
  110. #define  x4E     78
  111. #define  x4F     79
  112. #define  x50     80
  113. #define  x51     81
  114. #define  x52     82
  115. #define  x53     83
  116. #define  x54     84
  117. #define  x55     85
  118. #define  x56     86
  119. #define  x57     87
  120. #define  x58     88
  121. #define  x59     89
  122. #define  x5A     90
  123. #define  x5B     91
  124. #define  x5C     92
  125. #define  x5D     93
  126. #define  x5E     94
  127. #define  x5F     95
  128. #define  x60     96
  129. #define  x61     97
  130. #define  x62     98
  131. #define  x63     99
  132. #define  x64    100
  133. #define  x65    101
  134. #define  x66    102
  135. #define  x67    103
  136. #define  x68    104
  137. #define  x69    105
  138. #define  x6A    106
  139. #define  x6B    107
  140. #define  x6C    108
  141. #define  x6D    109
  142. #define  x6E    110
  143. #define  x6F    111
  144. #define  x70    112
  145. #define  x71    113
  146. #define  x72    114
  147. #define  x73    115
  148. #define  x74    116
  149. #define  x75    117
  150. #define  x76    118
  151. #define  x77    119
  152. #define  x78    120
  153. #define  x79    121
  154. #define  x7A    122
  155. #define  x7B    123
  156. #define  x7C    124
  157. #define  x7D    125
  158. #define  x7E    126
  159. #define  x7F    127
  160. #define  x80    128
  161. #define  x81    129
  162. #define  x82    130
  163. #define  x83    131
  164. #define  x84    132
  165. #define  x85    133
  166. #define  x86    134
  167. #define  x87    135
  168. #define  x88    136
  169. #define  x89    137
  170. #define  x8A    138
  171. #define  x8B    139
  172. #define  x8C    140
  173. #define  x8D    141
  174. #define  x8E    142
  175. #define  x8F    143
  176. #define  x90    144
  177. #define  x91    145
  178. #define  x92    146
  179. #define  x93    147
  180. #define  x94    148
  181. #define  x95    149
  182. #define  x96    150
  183. #define  x97    151
  184. #define  x98    152
  185. #define  x99    153
  186. #define  x9A    154
  187. #define  x9B    155
  188. #define  x9C    156
  189. #define  x9D    157
  190. #define  x9E    158
  191. #define  x9F    159
  192. #define  x0A0   160
  193. #define  x0A1   161
  194. #define  x0A2   162
  195. #define  x0A3   163
  196. #define  x0A4   164
  197. #define  x0A5   165
  198. #define  x0A6   166
  199. #define  x0A7   167
  200. #define  x0A8   168
  201. #define  x0A9   169
  202. #define  x0AA   170
  203. #define  x0AB   171
  204. #define  x0AC   172
  205. #define  x0AD   173
  206. #define  x0AE   174
  207. #define  x0AF   175
  208. #define  x0B0   176
  209. #define  x0B1   177
  210. #define  x0B2   178
  211. #define  x0B3   179
  212. #define  x0B4   180
  213. #define  x0B5   181
  214. #define  x0B6   182
  215. #define  x0B7   183
  216. #define  x0B8   184
  217. #define  x0B9   185
  218. #define  x0BA   186
  219. #define  x0BB   187
  220. #define  x0BC   188
  221. #define  x0BD   189
  222. #define  x0BE   190
  223. #define  x0BF   191
  224. #define  x0C0   192
  225. #define  x0C1   193
  226. #define  x0C2   194
  227. #define  x0C3   195
  228. #define  x0C4   196
  229. #define  x0C5   197
  230. #define  x0C6   198
  231. #define  x0C7   199
  232. #define  x0C8   200
  233. #define  x0C9   201
  234. #define  x0CA   202
  235. #define  x0CB   203
  236. #define  x0CC   204
  237. #define  x0CD   205
  238. #define  x0CE   206
  239. #define  x0CF   207
  240. #define  x0D0   208
  241. #define  x0D1   209
  242. #define  x0D2   210
  243. #define  x0D3   211
  244. #define  x0D4   212
  245. #define  x0D5   213
  246. #define  x0D6   214
  247. #define  x0D7   215
  248. #define  x0D8   216
  249. #define  x0D9   217
  250. #define  x0DA   218
  251. #define  x0DB   219
  252. #define  x0DC   220
  253. #define  x0DD   221
  254. #define  x0DE   222
  255. #define  x0DF   223
  256. #define  x0E0   224
  257. #define  x0E1   225
  258. #define  x0E2   226
  259. #define  x0E3   227
  260. #define  x0E4   228
  261. #define  x0E5   229
  262. #define  x0E6   230
  263. #define  x0E7   231
  264. #define  x0E8   232
  265. #define  x0E9   233
  266. #define  x0EA   234
  267. #define  x0EB   235
  268. #define  x0EC   236
  269. #define  x0ED   237
  270. #define  x0EE   238
  271. #define  x0EF   239
  272. #define  x0F0   240
  273. #define  x0F1   241
  274. #define  x0F2   242
  275. #define  x0F3   243
  276. #define  x0F4   244
  277. #define  x0F5   245
  278. #define  x0F6   246
  279. #define  x0F7   247
  280. #define  x0F8   248
  281. #define  x0F9   249
  282. #define  x0FA   250
  283. #define  x0FB   251
  284. #define  x0FC   252
  285. #define  x0FD   253
  286. #define  x0FE   254
  287. #define  x0FF   255
  288.  
  289. #define  x0080  128     // Equal to B2INT(x1) but faster at runtime
  290.  
  291. #define  x0100  256     // Equal to B2INT(x1)+x0 but faster at runtime
  292. #define  x0101  257     // Equal to B2INT(x1)+x1 but faster at runtime
  293. #define  x0102  258     // Equal to B2INT(x1)+x2 but faster at runtime
  294. #define  x0103  259     // Equal to B2INT(x1)+x3 but faster at runtime
  295. #define  x0104  260     // Equal to B2INT(x1)+x4 but faster at runtime
  296. #define  x0105  261     // Equal to B2INT(x1)+x5 but faster at runtime
  297.  
  298. #define  x1000 4096    // Equal to B2INT(x10) but faster
  299.  
  300. /*--<EOF  hex.ch >--*/
  301.