author | unc0rr |
Wed, 05 Dec 2012 23:51:04 +0400 | |
changeset 8235 | f29c55ea93ed |
parent 6700 | e04da46ee43c |
child 9080 | 9b42757d7e71 |
permissions | -rw-r--r-- |
393 | 1 |
(* |
1066 | 2 |
* Hedgewars, a free turn based strategy game |
6700 | 3 |
* Copyright (c) 2004-2012 Andrey Korotaev <unC0Rr@gmail.com> |
393 | 4 |
* |
5 |
* This program is free software; you can redistribute it and/or modify |
|
6 |
* it under the terms of the GNU General Public License as published by |
|
7 |
* the Free Software Foundation; version 2 of the License |
|
8 |
* |
|
9 |
* This program is distributed in the hope that it will be useful, |
|
10 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
11 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
12 |
* GNU General Public License for more details. |
|
13 |
* |
|
14 |
* You should have received a copy of the GNU General Public License |
|
15 |
* along with this program; if not, write to the Free Software |
|
16 |
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
|
17 |
*) |
|
18 |
||
4415 | 19 |
unit uSinTable; |
20 |
||
21 |
interface |
|
22 |
||
357 | 23 |
const SinTable: array[0..1024] of QWord = ( |
24 |
$00000000, |
|
25 |
$006487EB, |
|
26 |
$00C90FC6, |
|
27 |
$012D9782, |
|
28 |
$01921F10, |
|
29 |
$01F6A660, |
|
30 |
$025B2D62, |
|
31 |
$02BFB407, |
|
32 |
$03243A40, |
|
33 |
$0388BFFC, |
|
34 |
$03ED452D, |
|
35 |
$0451C9C3, |
|
36 |
$04B64DAF, |
|
37 |
$051AD0E0, |
|
38 |
$057F5348, |
|
39 |
$05E3D4D7, |
|
40 |
$0648557E, |
|
41 |
$06ACD52C, |
|
42 |
$071153D3, |
|
43 |
$0775D163, |
|
44 |
$07DA4DCC, |
|
45 |
$083EC900, |
|
46 |
$08A342EE, |
|
47 |
$0907BB86, |
|
48 |
$096C32BB, |
|
49 |
$09D0A87B, |
|
50 |
$0A351CB8, |
|
51 |
$0A998F62, |
|
52 |
$0AFE0069, |
|
53 |
$0B626FBF, |
|
54 |
$0BC6DD53, |
|
55 |
$0C2B4916, |
|
56 |
$0C8FB2F9, |
|
57 |
$0CF41AEB, |
|
58 |
$0D5880DF, |
|
59 |
$0DBCE4C3, |
|
60 |
$0E214689, |
|
61 |
$0E85A622, |
|
62 |
$0EEA037D, |
|
63 |
$0F4E5E8B, |
|
64 |
$0FB2B73D, |
|
65 |
$10170D83, |
|
66 |
$107B614E, |
|
67 |
$10DFB28F, |
|
68 |
$11440135, |
|
69 |
$11A84D31, |
|
70 |
$120C9675, |
|
71 |
$1270DCF0, |
|
72 |
$12D52093, |
|
73 |
$1339614E, |
|
74 |
$139D9F13, |
|
75 |
$1401D9D1, |
|
76 |
$14661179, |
|
77 |
$14CA45FC, |
|
78 |
$152E774A, |
|
79 |
$1592A554, |
|
80 |
$15F6D00B, |
|
81 |
$165AF75E, |
|
82 |
$16BF1B3E, |
|
83 |
$17233B9D, |
|
84 |
$1787586A, |
|
85 |
$17EB7197, |
|
86 |
$184F8713, |
|
87 |
$18B398CF, |
|
88 |
$1917A6BC, |
|
89 |
$197BB0CB, |
|
90 |
$19DFB6EB, |
|
91 |
$1A43B90E, |
|
92 |
$1AA7B724, |
|
93 |
$1B0BB11E, |
|
94 |
$1B6FA6EC, |
|
95 |
$1BD3987F, |
|
96 |
$1C3785C8, |
|
97 |
$1C9B6EB6, |
|
98 |
$1CFF533B, |
|
99 |
$1D633348, |
|
100 |
$1DC70ECC, |
|
101 |
$1E2AE5B8, |
|
102 |
$1E8EB7FE, |
|
103 |
$1EF2858D, |
|
104 |
$1F564E57, |
|
105 |
$1FBA124B, |
|
106 |
$201DD15B, |
|
107 |
$20818B77, |
|
108 |
$20E5408F, |
|
109 |
$2148F095, |
|
110 |
$21AC9B79, |
|
111 |
$2210412C, |
|
112 |
$2273E19E, |
|
113 |
$22D77CBF, |
|
114 |
$233B1281, |
|
115 |
$239EA2D5, |
|
116 |
$24022DAA, |
|
117 |
$2465B2F1, |
|
118 |
$24C9329C, |
|
119 |
$252CAC9A, |
|
120 |
$259020DD, |
|
121 |
$25F38F55, |
|
122 |
$2656F7F3, |
|
123 |
$26BA5AA7, |
|
124 |
$271DB762, |
|
125 |
$27810E14, |
|
126 |
$27E45EB0, |
|
127 |
$2847A924, |
|
128 |
$28AAED62, |
|
129 |
$290E2B5B, |
|
130 |
$297162FF, |
|
131 |
$29D4943F, |
|
132 |
$2A37BF0B, |
|
133 |
$2A9AE355, |
|
134 |
$2AFE010D, |
|
135 |
$2B611823, |
|
136 |
$2BC42889, |
|
137 |
$2C27322F, |
|
138 |
$2C8A3506, |
|
139 |
$2CED30FF, |
|
140 |
$2D50260A, |
|
141 |
$2DB31418, |
|
142 |
$2E15FB1A, |
|
143 |
$2E78DB01, |
|
144 |
$2EDBB3BD, |
|
145 |
$2F3E853F, |
|
146 |
$2FA14F78, |
|
147 |
$30041258, |
|
148 |
$3066CDD1, |
|
149 |
$30C981D3, |
|
150 |
$312C2E50, |
|
151 |
$318ED336, |
|
152 |
$31F17079, |
|
153 |
$32540608, |
|
154 |
$32B693D3, |
|
155 |
$331919CD, |
|
156 |
$337B97E6, |
|
157 |
$33DE0E0E, |
|
158 |
$34407C36, |
|
159 |
$34A2E250, |
|
160 |
$3505404B, |
|
161 |
$3567961A, |
|
162 |
$35C9E3AC, |
|
163 |
$362C28F3, |
|
164 |
$368E65DE, |
|
165 |
$36F09A61, |
|
166 |
$3752C66A, |
|
167 |
$37B4E9EB, |
|
168 |
$381704D5, |
|
169 |
$38791719, |
|
170 |
$38DB20A7, |
|
171 |
$393D2170, |
|
172 |
$399F1966, |
|
173 |
$3A010879, |
|
174 |
$3A62EE9A, |
|
175 |
$3AC4CBBA, |
|
176 |
$3B269FCB, |
|
177 |
$3B886ABB, |
|
178 |
$3BEA2C7E, |
|
179 |
$3C4BE503, |
|
180 |
$3CAD943C, |
|
181 |
$3D0F3A1A, |
|
182 |
$3D70D68C, |
|
183 |
$3DD26986, |
|
184 |
$3E33F2F6, |
|
185 |
$3E9572CF, |
|
186 |
$3EF6E901, |
|
187 |
$3F58557E, |
|
188 |
$3FB9B836, |
|
189 |
$401B111A, |
|
190 |
$407C601B, |
|
191 |
$40DDA52A, |
|
192 |
$413EE039, |
|
193 |
$41A01138, |
|
194 |
$42013818, |
|
195 |
$426254CA, |
|
196 |
$42C3673F, |
|
197 |
$43246F69, |
|
198 |
$43856D38, |
|
199 |
$43E6609E, |
|
200 |
$4447498B, |
|
201 |
$44A827F0, |
|
202 |
$4508FBBF, |
|
203 |
$4569C4E9, |
|
204 |
$45CA835E, |
|
205 |
$462B3710, |
|
206 |
$468BDFF0, |
|
207 |
$46EC7DEE, |
|
208 |
$474D10FD, |
|
209 |
$47AD990D, |
|
210 |
$480E160F, |
|
211 |
$486E87F5, |
|
212 |
$48CEEEAF, |
|
213 |
$492F4A2F, |
|
214 |
$498F9A65, |
|
215 |
$49EFDF44, |
|
216 |
$4A5018BB, |
|
217 |
$4AB046BD, |
|
218 |
$4B10693A, |
|
219 |
$4B708024, |
|
220 |
$4BD08B6C, |
|
221 |
$4C308B02, |
|
222 |
$4C907ED9, |
|
223 |
$4CF066E1, |
|
224 |
$4D50430C, |
|
225 |
$4DB0134A, |
|
226 |
$4E0FD78D, |
|
227 |
$4E6F8FC7, |
|
228 |
$4ECF3BE8, |
|
229 |
$4F2EDBE2, |
|
230 |
$4F8E6FA6, |
|
231 |
$4FEDF725, |
|
232 |
$504D7250, |
|
233 |
$50ACE11A, |
|
234 |
$510C4372, |
|
235 |
$516B994B, |
|
236 |
$51CAE295, |
|
237 |
$522A1F43, |
|
238 |
$52894F44, |
|
239 |
$52E8728C, |
|
240 |
$5347890A, |
|
241 |
$53A692B0, |
|
242 |
$54058F70, |
|
243 |
$54647F3B, |
|
244 |
$54C36203, |
|
245 |
$552237B8, |
|
246 |
$5581004C, |
|
247 |
$55DFBBB0, |
|
248 |
$563E69D7, |
|
249 |
$569D0AB0, |
|
250 |
$56FB9E2E, |
|
251 |
$575A2443, |
|
252 |
$57B89CDE, |
|
253 |
$581707F3, |
|
254 |
$58756572, |
|
255 |
$58D3B54D, |
|
256 |
$5931F775, |
|
257 |
$59902BDC, |
|
258 |
$59EE5273, |
|
259 |
$5A4C6B2B, |
|
260 |
$5AAA75F7, |
|
261 |
$5B0872C8, |
|
262 |
$5B66618E, |
|
263 |
$5BC4423C, |
|
264 |
$5C2214C4, |
|
265 |
$5C7FD916, |
|
266 |
$5CDD8F25, |
|
267 |
$5D3B36E1, |
|
268 |
$5D98D03D, |
|
269 |
$5DF65B29, |
|
270 |
$5E53D798, |
|
271 |
$5EB1457C, |
|
272 |
$5F0EA4C4, |
|
273 |
$5F6BF565, |
|
274 |
$5FC9374E, |
|
275 |
$60266A71, |
|
276 |
$60838EC1, |
|
277 |
$60E0A42F, |
|
278 |
$613DAAAC, |
|
279 |
$619AA22A, |
|
280 |
$61F78A9B, |
|
281 |
$625463F0, |
|
282 |
$62B12E1B, |
|
283 |
$630DE90E, |
|
284 |
$636A94BB, |
|
285 |
$63C73113, |
|
286 |
$6423BE08, |
|
287 |
$64803B8B, |
|
288 |
$64DCA98F, |
|
289 |
$65390805, |
|
290 |
$659556DF, |
|
291 |
$65F1960E, |
|
292 |
$664DC585, |
|
293 |
$66A9E535, |
|
294 |
$6705F510, |
|
295 |
$6761F508, |
|
296 |
$67BDE50F, |
|
297 |
$6819C516, |
|
298 |
$6875950F, |
|
299 |
$68D154EC, |
|
300 |
$692D049F, |
|
301 |
$6988A41B, |
|
302 |
$69E4334F, |
|
303 |
$6A3FB230, |
|
304 |
$6A9B20AE, |
|
305 |
$6AF67EBB, |
|
306 |
$6B51CC49, |
|
307 |
$6BAD094B, |
|
308 |
$6C0835B2, |
|
309 |
$6C635170, |
|
310 |
$6CBE5C77, |
|
311 |
$6D1956B9, |
|
312 |
$6D744028, |
|
313 |
$6DCF18B5, |
|
314 |
$6E29E054, |
|
315 |
$6E8496F6, |
|
316 |
$6EDF3C8C, |
|
317 |
$6F39D10A, |
|
318 |
$6F945460, |
|
319 |
$6FEEC681, |
|
320 |
$70492760, |
|
321 |
$70A376EE, |
|
322 |
$70FDB51D, |
|
323 |
$7157E1DF, |
|
324 |
$71B1FD26, |
|
325 |
$720C06E5, |
|
326 |
$7265FF0E, |
|
327 |
$72BFE593, |
|
328 |
$7319BA65, |
|
329 |
$73737D77, |
|
330 |
$73CD2EBC, |
|
331 |
$7426CE24, |
|
332 |
$74805BA4, |
|
333 |
$74D9D72C, |
|
334 |
$753340AF, |
|
335 |
$758C981F, |
|
336 |
$75E5DD6E, |
|
337 |
$763F108F, |
|
338 |
$76983174, |
|
339 |
$76F1400F, |
|
340 |
$774A3C52, |
|
341 |
$77A32630, |
|
342 |
$77FBFD9B, |
|
343 |
$7854C285, |
|
344 |
$78AD74E0, |
|
345 |
$7906149F, |
|
346 |
$795EA1B5, |
|
347 |
$79B71C13, |
|
348 |
$7A0F83AC, |
|
349 |
$7A67D872, |
|
350 |
$7AC01A58, |
|
351 |
$7B184950, |
|
352 |
$7B70654C, |
|
353 |
$7BC86E3F, |
|
354 |
$7C20641B, |
|
355 |
$7C7846D3, |
|
356 |
$7CD01659, |
|
357 |
$7D27D2A0, |
|
358 |
$7D7F7B99, |
|
359 |
$7DD71139, |
|
360 |
$7E2E9370, |
|
361 |
$7E860232, |
|
362 |
$7EDD5D71, |
|
363 |
$7F34A51F, |
|
364 |
$7F8BD930, |
|
365 |
$7FE2F995, |
|
366 |
$803A0641, |
|
367 |
$8090FF28, |
|
368 |
$80E7E43A, |
|
369 |
$813EB56C, |
|
370 |
$819572AF, |
|
371 |
$81EC1BF7, |
|
372 |
$8242B135, |
|
373 |
$8299325D, |
|
374 |
$82EF9F62, |
|
375 |
$8345F835, |
|
376 |
$839C3CC9, |
|
377 |
$83F26D12, |
|
378 |
$84488902, |
|
379 |
$849E908B, |
|
380 |
$84F483A1, |
|
381 |
$854A6236, |
|
382 |
$85A02C3C, |
|
383 |
$85F5E1A8, |
|
384 |
$864B826B, |
|
385 |
$86A10E78, |
|
386 |
$86F685C2, |
|
387 |
$874BE83C, |
|
388 |
$87A135D9, |
|
389 |
$87F66E8C, |
|
390 |
$884B9247, |
|
391 |
$88A0A0FD, |
|
392 |
$88F59AA1, |
|
393 |
$894A7F26, |
|
394 |
$899F4E7F, |
|
395 |
$89F408A0, |
|
396 |
$8A48AD7A, |
|
397 |
$8A9D3D00, |
|
398 |
$8AF1B727, |
|
399 |
$8B461BE0, |
|
400 |
$8B9A6B1F, |
|
401 |
$8BEEA4D7, |
|
402 |
$8C42C8FA, |
|
403 |
$8C96D77C, |
|
404 |
$8CEAD050, |
|
405 |
$8D3EB368, |
|
406 |
$8D9280B9, |
|
407 |
$8DE63834, |
|
408 |
$8E39D9CD, |
|
409 |
$8E8D6578, |
|
410 |
$8EE0DB27, |
|
411 |
$8F343ACD, |
|
412 |
$8F87845E, |
|
413 |
$8FDAB7CC, |
|
414 |
$902DD50C, |
|
415 |
$9080DC0F, |
|
416 |
$90D3CCCA, |
|
417 |
$9126A72F, |
|
418 |
$91796B31, |
|
419 |
$91CC18C5, |
|
420 |
$921EAFDD, |
|
421 |
$9271306C, |
|
422 |
$92C39A66, |
|
423 |
$9315EDBE, |
|
424 |
$93682A67, |
|
425 |
$93BA5055, |
|
426 |
$940C5F7A, |
|
427 |
$945E57CB, |
|
428 |
$94B0393B, |
|
429 |
$950203BD, |
|
430 |
$9553B744, |
|
431 |
$95A553C4, |
|
432 |
$95F6D930, |
|
433 |
$9648477C, |
|
434 |
$96999E9A, |
|
435 |
$96EADE80, |
|
436 |
$973C071F, |
|
437 |
$978D186C, |
|
438 |
$97DE125A, |
|
439 |
$982EF4DD, |
|
440 |
$987FBFE7, |
|
441 |
$98D0736D, |
|
442 |
$99210F62, |
|
443 |
$997193BA, |
|
444 |
$99C20068, |
|
445 |
$9A125560, |
|
446 |
$9A629296, |
|
447 |
$9AB2B7FD, |
|
448 |
$9B02C588, |
|
449 |
$9B52BB2C, |
|
450 |
$9BA298DC, |
|
451 |
$9BF25E8C, |
|
452 |
$9C420C2F, |
|
453 |
$9C91A1B9, |
|
454 |
$9CE11F1F, |
|
455 |
$9D308453, |
|
456 |
$9D7FD149, |
|
457 |
$9DCF05F6, |
|
458 |
$9E1E224C, |
|
459 |
$9E6D2640, |
|
460 |
$9EBC11C6, |
|
461 |
$9F0AE4D1, |
|
462 |
$9F599F56, |
|
463 |
$9FA84148, |
|
464 |
$9FF6CA9A, |
|
465 |
$A0453B42, |
|
466 |
$A0939332, |
|
467 |
$A0E1D25F, |
|
468 |
$A12FF8BC, |
|
469 |
$A17E063F, |
|
470 |
$A1CBFAD9, |
|
471 |
$A219D681, |
|
472 |
$A2679928, |
|
473 |
$A2B542C5, |
|
474 |
$A302D349, |
|
475 |
$A3504AAB, |
|
476 |
$A39DA8DD, |
|
477 |
$A3EAEDD3, |
|
478 |
$A4381983, |
|
479 |
$A4852BDF, |
|
480 |
$A4D224DD, |
|
481 |
$A51F046F, |
|
482 |
$A56BCA8B, |
|
483 |
$A5B87724, |
|
484 |
$A6050A2F, |
|
485 |
$A65183A0, |
|
486 |
$A69DE36B, |
|
487 |
$A6EA2984, |
|
488 |
$A73655DF, |
|
489 |
$A7826871, |
|
490 |
$A7CE612E, |
|
491 |
$A81A400B, |
|
492 |
$A86604FB, |
|
493 |
$A8B1AFF3, |
|
494 |
$A8FD40E7, |
|
495 |
$A948B7CB, |
|
496 |
$A9941495, |
|
497 |
$A9DF5738, |
|
498 |
$AA2A7FA9, |
|
499 |
$AA758DDB, |
|
500 |
$AAC081C5, |
|
501 |
$AB0B5B59, |
|
502 |
$AB561A8D, |
|
503 |
$ABA0BF54, |
|
504 |
$ABEB49A4, |
|
505 |
$AC35B971, |
|
506 |
$AC800EB0, |
|
507 |
$ACCA4954, |
|
508 |
$AD146953, |
|
509 |
$AD5E6EA1, |
|
510 |
$ADA85932, |
|
511 |
$ADF228FC, |
|
512 |
$AE3BDDF3, |
|
513 |
$AE85780B, |
|
514 |
$AECEF73A, |
|
515 |
$AF185B73, |
|
516 |
$AF61A4AC, |
|
517 |
$AFAAD2D9, |
|
518 |
$AFF3E5EF, |
|
519 |
$B03CDDE3, |
|
520 |
$B085BAA9, |
|
521 |
$B0CE7C36, |
|
522 |
$B117227F, |
|
523 |
$B15FAD79, |
|
524 |
$B1A81D19, |
|
525 |
$B1F07153, |
|
526 |
$B238AA1C, |
|
527 |
$B280C769, |
|
528 |
$B2C8C930, |
|
529 |
$B310AF64, |
|
530 |
$B35879FB, |
|
531 |
$B3A028E9, |
|
532 |
$B3E7BC25, |
|
533 |
$B42F33A1, |
|
534 |
$B4768F55, |
|
535 |
$B4BDCF34, |
|
536 |
$B504F334, |
|
537 |
$B54BFB49, |
|
538 |
$B592E769, |
|
539 |
$B5D9B789, |
|
540 |
$B6206B9E, |
|
541 |
$B667039D, |
|
542 |
$B6AD7F7A, |
|
543 |
$B6F3DF2C, |
|
544 |
$B73A22A7, |
|
545 |
$B78049E1, |
|
546 |
$B7C654CE, |
|
547 |
$B80C4364, |
|
548 |
$B8521599, |
|
549 |
$B897CB60, |
|
550 |
$B8DD64B0, |
|
551 |
$B922E17E, |
|
552 |
$B96841BF, |
|
553 |
$B9AD8569, |
|
554 |
$B9F2AC70, |
|
555 |
$BA37B6CB, |
|
556 |
$BA7CA46D, |
|
557 |
$BAC1754E, |
|
558 |
$BB062962, |
|
559 |
$BB4AC09E, |
|
560 |
$BB8F3AF8, |
|
561 |
$BBD39866, |
|
562 |
$BC17D8DD, |
|
563 |
$BC5BFC52, |
|
564 |
$BCA002BA, |
|
565 |
$BCE3EC0D, |
|
566 |
$BD27B83E, |
|
567 |
$BD6B6744, |
|
568 |
$BDAEF913, |
|
569 |
$BDF26DA3, |
|
570 |
$BE35C4E7, |
|
571 |
$BE78FED6, |
|
572 |
$BEBC1B66, |
|
573 |
$BEFF1A8C, |
|
574 |
$BF41FC3E, |
|
575 |
$BF84C071, |
|
576 |
$BFC7671B, |
|
577 |
$C009F032, |
|
578 |
$C04C5BAB, |
|
579 |
$C08EA97D, |
|
580 |
$C0D0D99E, |
|
581 |
$C112EC02, |
|
582 |
$C154E0A0, |
|
583 |
$C196B76D, |
|
584 |
$C1D87060, |
|
585 |
$C21A0B6E, |
|
586 |
$C25B888D, |
|
587 |
$C29CE7B4, |
|
588 |
$C2DE28D7, |
|
589 |
$C31F4BEE, |
|
590 |
$C36050ED, |
|
591 |
$C3A137CB, |
|
592 |
$C3E2007E, |
|
593 |
$C422AAFC, |
|
594 |
$C463373A, |
|
595 |
$C4A3A530, |
|
596 |
$C4E3F4D2, |
|
597 |
$C5242618, |
|
598 |
$C56438F7, |
|
599 |
$C5A42D65, |
|
600 |
$C5E40359, |
|
601 |
$C623BAC8, |
|
602 |
$C66353A9, |
|
603 |
$C6A2CDF2, |
|
604 |
$C6E22999, |
|
605 |
$C7216694, |
|
606 |
$C76084DA, |
|
607 |
$C79F8461, |
|
608 |
$C7DE651F, |
|
609 |
$C81D270B, |
|
610 |
$C85BCA1B, |
|
611 |
$C89A4E44, |
|
612 |
$C8D8B37F, |
|
613 |
$C916F9C0, |
|
614 |
$C95520FE, |
|
615 |
$C9932930, |
|
616 |
$C9D1124D, |
|
617 |
$CA0EDC49, |
|
618 |
$CA4C871D, |
|
619 |
$CA8A12BF, |
|
620 |
$CAC77F24, |
|
621 |
$CB04CC45, |
|
622 |
$CB41FA16, |
|
623 |
$CB7F088F, |
|
624 |
$CBBBF7A6, |
|
625 |
$CBF8C752, |
|
626 |
$CC35778A, |
|
627 |
$CC720844, |
|
628 |
$CCAE7977, |
|
629 |
$CCEACB19, |
|
630 |
$CD26FD21, |
|
631 |
$CD630F87, |
|
632 |
$CD9F0240, |
|
633 |
$CDDAD543, |
|
634 |
$CE168888, |
|
635 |
$CE521C04, |
|
636 |
$CE8D8FAF, |
|
637 |
$CEC8E380, |
|
638 |
$CF04176E, |
|
639 |
$CF3F2B6E, |
|
640 |
$CF7A1F79, |
|
641 |
$CFB4F385, |
|
642 |
$CFEFA78A, |
|
643 |
$D02A3B7D, |
|
644 |
$D064AF56, |
|
645 |
$D09F030C, |
|
646 |
$D0D93696, |
|
647 |
$D11349EB, |
|
648 |
$D14D3D02, |
|
649 |
$D1870FD2, |
|
650 |
$D1C0C253, |
|
651 |
$D1FA547A, |
|
652 |
$D233C641, |
|
653 |
$D26D179C, |
|
654 |
$D2A64885, |
|
655 |
$D2DF58F1, |
|
656 |
$D31848D8, |
|
657 |
$D3511832, |
|
658 |
$D389C6F5, |
|
659 |
$D3C25519, |
|
660 |
$D3FAC295, |
|
661 |
$D4330F60, |
|
662 |
$D46B3B73, |
|
663 |
$D4A346C3, |
|
664 |
$D4DB3148, |
|
665 |
$D512FAFB, |
|
666 |
$D54AA3D1, |
|
667 |
$D5822BC4, |
|
668 |
$D5B992C9, |
|
669 |
$D5F0D8D8, |
|
670 |
$D627FDEA, |
|
671 |
$D65F01F5, |
|
672 |
$D695E4F1, |
|
673 |
$D6CCA6D6, |
|
674 |
$D703479A, |
|
675 |
$D739C736, |
|
676 |
$D77025A2, |
|
677 |
$D7A662D4, |
|
678 |
$D7DC7EC5, |
|
679 |
$D812796C, |
|
680 |
$D84852C1, |
|
681 |
$D87E0ABB, |
|
682 |
$D8B3A152, |
|
683 |
$D8E9167F, |
|
684 |
$D91E6A38, |
|
685 |
$D9539C76, |
|
686 |
$D988AD30, |
|
687 |
$D9BD9C5E, |
|
688 |
$D9F269F8, |
|
689 |
$DA2715F5, |
|
690 |
$DA5BA04F, |
|
691 |
$DA9008FC, |
|
692 |
$DAC44FF5, |
|
693 |
$DAF87531, |
|
694 |
$DB2C78A8, |
|
695 |
$DB605A53, |
|
696 |
$DB941A29, |
|
697 |
$DBC7B822, |
|
698 |
$DBFB3437, |
|
699 |
$DC2E8E60, |
|
700 |
$DC61C694, |
|
701 |
$DC94DCCB, |
|
702 |
$DCC7D0FF, |
|
703 |
$DCFAA326, |
|
704 |
$DD2D533A, |
|
705 |
$DD5FE131, |
|
706 |
$DD924D06, |
|
707 |
$DDC496AF, |
|
708 |
$DDF6BE25, |
|
709 |
$DE28C360, |
|
710 |
$DE5AA658, |
|
711 |
$DE8C6707, |
|
712 |
$DEBE0563, |
|
713 |
$DEEF8167, |
|
714 |
$DF20DB09, |
|
715 |
$DF521242, |
|
716 |
$DF83270B, |
|
717 |
$DFB4195C, |
|
718 |
$DFE4E92D, |
|
719 |
$E0159678, |
|
720 |
$E0462134, |
|
721 |
$E076895A, |
|
722 |
$E0A6CEE2, |
|
723 |
$E0D6F1C6, |
|
724 |
$E106F1FD, |
|
725 |
$E136CF81, |
|
726 |
$E1668A4A, |
|
727 |
$E1962250, |
|
728 |
$E1C5978C, |
|
729 |
$E1F4E9F7, |
|
730 |
$E224198A, |
|
731 |
$E253263D, |
|
732 |
$E2821009, |
|
733 |
$E2B0D6E7, |
|
734 |
$E2DF7AD0, |
|
735 |
$E30DFBBC, |
|
736 |
$E33C59A4, |
|
737 |
$E36A9482, |
|
738 |
$E398AC4D, |
|
739 |
$E3C6A0FF, |
|
740 |
$E3F47291, |
|
741 |
$E42220FC, |
|
742 |
$E44FAC38, |
|
743 |
$E47D143F, |
|
744 |
$E4AA590A, |
|
745 |
$E4D77A91, |
|
746 |
$E50478CE, |
|
747 |
$E53153B9, |
|
748 |
$E55E0B4D, |
|
749 |
$E58A9F81, |
|
750 |
$E5B71050, |
|
751 |
$E5E35DB2, |
|
752 |
$E60F87A0, |
|
753 |
$E63B8E14, |
|
754 |
$E6677106, |
|
755 |
$E6933071, |
|
756 |
$E6BECC4C, |
|
757 |
$E6EA4493, |
|
758 |
$E715993D, |
|
759 |
$E740CA44, |
|
760 |
$E76BD7A2, |
|
761 |
$E796C150, |
|
762 |
$E7C18746, |
|
763 |
$E7EC2980, |
|
764 |
$E816A7F6, |
|
765 |
$E84102A1, |
|
766 |
$E86B397B, |
|
767 |
$E8954C7D, |
|
768 |
$E8BF3BA2, |
|
769 |
$E8E906E2, |
|
770 |
$E912AE37, |
|
771 |
$E93C319B, |
|
772 |
$E9659107, |
|
773 |
$E98ECC75, |
|
774 |
$E9B7E3DE, |
|
775 |
$E9E0D73D, |
|
776 |
$EA09A68A, |
|
777 |
$EA3251C0, |
|
778 |
$EA5AD8D9, |
|
779 |
$EA833BCD, |
|
780 |
$EAAB7A97, |
|
781 |
$EAD39531, |
|
782 |
$EAFB8B94, |
|
783 |
$EB235DBB, |
|
784 |
$EB4B0B9E, |
|
785 |
$EB729539, |
|
786 |
$EB99FA84, |
|
787 |
$EBC13B7B, |
|
788 |
$EBE85816, |
|
789 |
$EC0F5050, |
|
790 |
$EC362422, |
|
791 |
$EC5CD387, |
|
792 |
$EC835E7A, |
|
793 |
$ECA9C4F3, |
|
794 |
$ECD006EC, |
|
795 |
$ECF62461, |
|
796 |
$ED1C1D4B, |
|
797 |
$ED41F1A4, |
|
798 |
$ED67A167, |
|
799 |
$ED8D2C8E, |
|
800 |
$EDB29312, |
|
801 |
$EDD7D4EE, |
|
802 |
$EDFCF21D, |
|
803 |
$EE21EA98, |
|
804 |
$EE46BE5A, |
|
805 |
$EE6B6D5D, |
|
806 |
$EE8FF79C, |
|
807 |
$EEB45D11, |
|
808 |
$EED89DB6, |
|
809 |
$EEFCB986, |
|
810 |
$EF20B07B, |
|
811 |
$EF448290, |
|
812 |
$EF682FBF, |
|
813 |
$EF8BB802, |
|
814 |
$EFAF1B55, |
|
815 |
$EFD259B1, |
|
816 |
$EFF57311, |
|
817 |
$F0186771, |
|
818 |
$F03B36C9, |
|
819 |
$F05DE116, |
|
820 |
$F0806651, |
|
821 |
$F0A2C676, |
|
822 |
$F0C5017F, |
|
823 |
$F0E71767, |
|
824 |
$F1090828, |
|
825 |
$F12AD3BD, |
|
826 |
$F14C7A22, |
|
827 |
$F16DFB50, |
|
828 |
$F18F5744, |
|
829 |
$F1B08DF6, |
|
830 |
$F1D19F64, |
|
831 |
$F1F28B86, |
|
832 |
$F2135259, |
|
833 |
$F233F3D8, |
|
834 |
$F2546FFC, |
|
835 |
$F274C6C2, |
|
836 |
$F294F824, |
|
837 |
$F2B5041D, |
|
838 |
$F2D4EAA8, |
|
839 |
$F2F4ABC1, |
|
840 |
$F3144762, |
|
841 |
$F333BD87, |
|
842 |
$F3530E2B, |
|
843 |
$F3723949, |
|
844 |
$F3913EDB, |
|
845 |
$F3B01EDE, |
|
846 |
$F3CED94D, |
|
847 |
$F3ED6E23, |
|
848 |
$F40BDD5A, |
|
849 |
$F42A26F0, |
|
850 |
$F4484ADD, |
|
851 |
$F466491F, |
|
852 |
$F48421B1, |
|
853 |
$F4A1D48D, |
|
854 |
$F4BF61B0, |
|
855 |
$F4DCC915, |
|
856 |
$F4FA0AB6, |
|
857 |
$F5172691, |
|
858 |
$F5341C9F, |
|
859 |
$F550ECDE, |
|
860 |
$F56D9747, |
|
861 |
$F58A1BD8, |
|
862 |
$F5A67A8B, |
|
863 |
$F5C2B35C, |
|
864 |
$F5DEC647, |
|
865 |
$F5FAB347, |
|
866 |
$F6167A59, |
|
867 |
$F6321B77, |
|
868 |
$F64D969E, |
|
869 |
$F668EBC9, |
|
870 |
$F6841AF5, |
|
871 |
$F69F241C, |
|
872 |
$F6BA073B, |
|
873 |
$F6D4C44E, |
|
874 |
$F6EF5B50, |
|
875 |
$F709CC3E, |
|
876 |
$F7241713, |
|
877 |
$F73E3BCB, |
|
878 |
$F7583A63, |
|
879 |
$F77212D5, |
|
880 |
$F78BC51F, |
|
881 |
$F7A5513C, |
|
882 |
$F7BEB729, |
|
883 |
$F7D7F6E1, |
|
884 |
$F7F11060, |
|
885 |
$F80A03A4, |
|
886 |
$F822D0A6, |
|
887 |
$F83B7765, |
|
888 |
$F853F7DD, |
|
889 |
$F86C5208, |
|
890 |
$F88485E4, |
|
891 |
$F89C936D, |
|
892 |
$F8B47AA0, |
|
893 |
$F8CC3B78, |
|
894 |
$F8E3D5F1, |
|
895 |
$F8FB4A09, |
|
896 |
$F91297BC, |
|
897 |
$F929BF05, |
|
898 |
$F940BFE2, |
|
899 |
$F9579A4F, |
|
900 |
$F96E4E48, |
|
901 |
$F984DBCA, |
|
902 |
$F99B42D2, |
|
903 |
$F9B1835B, |
|
904 |
$F9C79D63, |
|
905 |
$F9DD90E6, |
|
906 |
$F9F35DE1, |
|
907 |
$FA090450, |
|
908 |
$FA1E8430, |
|
909 |
$FA33DD7E, |
|
910 |
$FA491036, |
|
911 |
$FA5E1C55, |
|
912 |
$FA7301D8, |
|
913 |
$FA87C0BC, |
|
914 |
$FA9C58FD, |
|
915 |
$FAB0CA99, |
|
916 |
$FAC5158C, |
|
917 |
$FAD939D2, |
|
918 |
$FAED376A, |
|
919 |
$FB010E50, |
|
920 |
$FB14BE80, |
|
921 |
$FB2847F8, |
|
922 |
$FB3BAAB4, |
|
923 |
$FB4EE6B3, |
|
924 |
$FB61FBF0, |
|
925 |
$FB74EA69, |
|
926 |
$FB87B21A, |
|
927 |
$FB9A5302, |
|
928 |
$FBACCD1D, |
|
929 |
$FBBF2068, |
|
930 |
$FBD14CE1, |
|
931 |
$FBE35284, |
|
932 |
$FBF5314F, |
|
933 |
$FC06E93F, |
|
934 |
$FC187A52, |
|
935 |
$FC29E484, |
|
936 |
$FC3B27D4, |
|
937 |
$FC4C443D, |
|
938 |
$FC5D39BE, |
|
939 |
$FC6E0855, |
|
940 |
$FC7EAFFD, |
|
941 |
$FC8F30B6, |
|
942 |
$FC9F8A7C, |
|
943 |
$FCAFBD4D, |
|
944 |
$FCBFC926, |
|
945 |
$FCCFAE05, |
|
946 |
$FCDF6BE8, |
|
947 |
$FCEF02CB, |
|
948 |
$FCFE72AD, |
|
949 |
$FD0DBB8C, |
|
950 |
$FD1CDD64, |
|
951 |
$FD2BD833, |
|
952 |
$FD3AABF8, |
|
953 |
$FD4958B0, |
|
954 |
$FD57DE58, |
|
955 |
$FD663CEF, |
|
956 |
$FD747472, |
|
957 |
$FD8284DF, |
|
958 |
$FD906E34, |
|
959 |
$FD9E306F, |
|
960 |
$FDABCB8D, |
|
961 |
$FDB93F8C, |
|
962 |
$FDC68C6B, |
|
963 |
$FDD3B228, |
|
964 |
$FDE0B0BF, |
|
965 |
$FDED8830, |
|
966 |
$FDFA3878, |
|
967 |
$FE06C196, |
|
968 |
$FE132387, |
|
969 |
$FE1F5E4A, |
|
970 |
$FE2B71DC, |
|
971 |
$FE375E3C, |
|
972 |
$FE432368, |
|
973 |
$FE4EC15E, |
|
974 |
$FE5A381D, |
|
975 |
$FE6587A2, |
|
976 |
$FE70AFEB, |
|
977 |
$FE7BB0F8, |
|
978 |
$FE868AC7, |
|
979 |
$FE913D55, |
|
980 |
$FE9BC8A1, |
|
981 |
$FEA62CAA, |
|
982 |
$FEB0696D, |
|
983 |
$FEBA7EEA, |
|
984 |
$FEC46D1F, |
|
985 |
$FECE3409, |
|
986 |
$FED7D3A9, |
|
987 |
$FEE14BFB, |
|
988 |
$FEEA9D00, |
|
989 |
$FEF3C6B4, |
|
990 |
$FEFCC918, |
|
991 |
$FF05A429, |
|
992 |
$FF0E57E6, |
|
993 |
$FF16E44E, |
|
994 |
$FF1F495F, |
|
995 |
$FF278719, |
|
996 |
$FF2F9D79, |
|
997 |
$FF378C80, |
|
998 |
$FF3F542A, |
|
999 |
$FF46F478, |
|
1000 |
$FF4E6D68, |
|
1001 |
$FF55BEF9, |
|
1002 |
$FF5CE92A, |
|
1003 |
$FF63EBF9, |
|
1004 |
$FF6AC766, |
|
1005 |
$FF717B6F, |
|
1006 |
$FF780814, |
|
1007 |
$FF7E6D54, |
|
1008 |
$FF84AB2C, |
|
1009 |
$FF8AC19E, |
|
1010 |
$FF90B0A7, |
|
1011 |
$FF967847, |
|
1012 |
$FF9C187C, |
|
1013 |
$FFA19147, |
|
1014 |
$FFA6E2A6, |
|
1015 |
$FFAC0C97, |
|
1016 |
$FFB10F1C, |
|
1017 |
$FFB5EA32, |
|
1018 |
$FFBA9DD9, |
|
1019 |
$FFBF2A10, |
|
1020 |
$FFC38ED7, |
|
1021 |
$FFC7CC2C, |
|
1022 |
$FFCBE210, |
|
1023 |
$FFCFD082, |
|
1024 |
$FFD39780, |
|
1025 |
$FFD7370B, |
|
1026 |
$FFDAAF21, |
|
1027 |
$FFDDFFC3, |
|
1028 |
$FFE128F0, |
|
1029 |
$FFE42AA6, |
|
1030 |
$FFE704E7, |
|
1031 |
$FFE9B7B1, |
|
1032 |
$FFEC4304, |
|
1033 |
$FFEEA6E0, |
|
1034 |
$FFF0E344, |
|
1035 |
$FFF2F82F, |
|
1036 |
$FFF4E5A2, |
|
1037 |
$FFF6AB9D, |
|
1038 |
$FFF84A1E, |
|
1039 |
$FFF9C126, |
|
1040 |
$FFFB10B5, |
|
1041 |
$FFFC38CA, |
|
1042 |
$FFFD3965, |
|
1043 |
$FFFE1286, |
|
1044 |
$FFFEC42C, |
|
1045 |
$FFFF4E59, |
|
1046 |
$FFFFB10B, |
|
1047 |
$FFFFEC43, |
|
6580
6155187bf599
A partial reformatting of the pascal code to have consistent syntax. Things that are still inconsistent.
lovelacer
parents:
4976
diff
changeset
|
1048 |
$100000000 |
357 | 1049 |
); |
4415 | 1050 |
|
1051 |
implementation |
|
1052 |
||
1053 |
end. |