|
6
|
1 /*--------------------------------------------------------------------------
|
|
|
2 NETREK II -- Paradise
|
|
|
3
|
|
|
4 Permission to use, copy, modify, and distribute this software and its
|
|
|
5 documentation, or any derivative works thereof, for any NON-COMMERCIAL
|
|
|
6 purpose and without fee is hereby granted, provided that this copyright
|
|
|
7 notice appear in all copies. No representations are made about the
|
|
|
8 suitability of this software for any purpose. This software is provided
|
|
|
9 "as is" without express or implied warranty.
|
|
|
10
|
|
|
11 Xtrek Copyright 1986 Chris Guthrie
|
|
|
12 Netrek (Xtrek II) Copyright 1989 Kevin P. Smith
|
|
|
13 Scott Silvey
|
|
|
14 Paradise II (Netrek II) Copyright 1993 Larry Denys
|
|
|
15 Kurt Olsen
|
|
|
16 Brandon Gillespie
|
|
|
17 --------------------------------------------------------------------------*/
|
|
|
18
|
|
|
19 /*---------------------------------DATA------------------------------------*/
|
|
|
20 /* The sine table so we do not have to calculate this on the fly. */
|
|
|
21
|
|
|
22 double Sin[] = {
|
|
|
23 -1.0000,
|
|
|
24 -0.9997,
|
|
|
25 -0.9988,
|
|
|
26 -0.9973,
|
|
|
27 -0.9952,
|
|
|
28 -0.9925,
|
|
|
29 -0.9892,
|
|
|
30 -0.9853,
|
|
|
31 -0.9808,
|
|
|
32 -0.9757,
|
|
|
33 -0.9701,
|
|
|
34 -0.9638,
|
|
|
35 -0.9570,
|
|
|
36 -0.9496,
|
|
|
37 -0.9416,
|
|
|
38 -0.9330,
|
|
|
39 -0.9239,
|
|
|
40 -0.9143,
|
|
|
41 -0.9040,
|
|
|
42 -0.8933,
|
|
|
43 -0.8820,
|
|
|
44 -0.8701,
|
|
|
45 -0.8578,
|
|
|
46 -0.8449,
|
|
|
47 -0.8315,
|
|
|
48 -0.8176,
|
|
|
49 -0.8033,
|
|
|
50 -0.7884,
|
|
|
51 -0.7731,
|
|
|
52 -0.7573,
|
|
|
53 -0.7410,
|
|
|
54 -0.7243,
|
|
|
55 -0.7072,
|
|
|
56 -0.6896,
|
|
|
57 -0.6716,
|
|
|
58 -0.6533,
|
|
|
59 -0.6345,
|
|
|
60 -0.6153,
|
|
|
61 -0.5958,
|
|
|
62 -0.5759,
|
|
|
63 -0.5557,
|
|
|
64 -0.5351,
|
|
|
65 -0.5142,
|
|
|
66 -0.4930,
|
|
|
67 -0.4715,
|
|
|
68 -0.4497,
|
|
|
69 -0.4277,
|
|
|
70 -0.4054,
|
|
|
71 -0.3828,
|
|
|
72 -0.3600,
|
|
|
73 -0.3370,
|
|
|
74 -0.3138,
|
|
|
75 -0.2904,
|
|
|
76 -0.2668,
|
|
|
77 -0.2431,
|
|
|
78 -0.2192,
|
|
|
79 -0.1952,
|
|
|
80 -0.1711,
|
|
|
81 -0.1469,
|
|
|
82 -0.1225,
|
|
|
83 -0.0982,
|
|
|
84 -0.0737,
|
|
|
85 -0.0492,
|
|
|
86 -0.0247,
|
|
|
87 -0.0001,
|
|
|
88 0.0244,
|
|
|
89 0.0489,
|
|
|
90 0.0734,
|
|
|
91 0.0979,
|
|
|
92 0.1223,
|
|
|
93 0.1466,
|
|
|
94 0.1708,
|
|
|
95 0.1949,
|
|
|
96 0.2190,
|
|
|
97 0.2428,
|
|
|
98 0.2666,
|
|
|
99 0.2901,
|
|
|
100 0.3135,
|
|
|
101 0.3367,
|
|
|
102 0.3598,
|
|
|
103 0.3825,
|
|
|
104 0.4051,
|
|
|
105 0.4274,
|
|
|
106 0.4495,
|
|
|
107 0.4713,
|
|
|
108 0.4928,
|
|
|
109 0.5140,
|
|
|
110 0.5349,
|
|
|
111 0.5554,
|
|
|
112 0.5757,
|
|
|
113 0.5956,
|
|
|
114 0.6151,
|
|
|
115 0.6343,
|
|
|
116 0.6531,
|
|
|
117 0.6714,
|
|
|
118 0.6894,
|
|
|
119 0.7070,
|
|
|
120 0.7241,
|
|
|
121 0.7408,
|
|
|
122 0.7571,
|
|
|
123 0.7729,
|
|
|
124 0.7882,
|
|
|
125 0.8031,
|
|
|
126 0.8175,
|
|
|
127 0.8314,
|
|
|
128 0.8448,
|
|
|
129 0.8576,
|
|
|
130 0.8700,
|
|
|
131 0.8818,
|
|
|
132 0.8931,
|
|
|
133 0.9039,
|
|
|
134 0.9141,
|
|
|
135 0.9238,
|
|
|
136 0.9329,
|
|
|
137 0.9415,
|
|
|
138 0.9495,
|
|
|
139 0.9569,
|
|
|
140 0.9637,
|
|
|
141 0.9700,
|
|
|
142 0.9757,
|
|
|
143 0.9808,
|
|
|
144 0.9852,
|
|
|
145 0.9891,
|
|
|
146 0.9925,
|
|
|
147 0.9952,
|
|
|
148 0.9973,
|
|
|
149 0.9988,
|
|
|
150 0.9997,
|
|
|
151 1.0000,
|
|
|
152 0.9997,
|
|
|
153 0.9988,
|
|
|
154 0.9973,
|
|
|
155 0.9952,
|
|
|
156 0.9925,
|
|
|
157 0.9892,
|
|
|
158 0.9853,
|
|
|
159 0.9808,
|
|
|
160 0.9757,
|
|
|
161 0.9700,
|
|
|
162 0.9638,
|
|
|
163 0.9569,
|
|
|
164 0.9495,
|
|
|
165 0.9415,
|
|
|
166 0.9330,
|
|
|
167 0.9239,
|
|
|
168 0.9142,
|
|
|
169 0.9040,
|
|
|
170 0.8932,
|
|
|
171 0.8819,
|
|
|
172 0.8701,
|
|
|
173 0.8577,
|
|
|
174 0.8449,
|
|
|
175 0.8315,
|
|
|
176 0.8176,
|
|
|
177 0.8032,
|
|
|
178 0.7884,
|
|
|
179 0.7730,
|
|
|
180 0.7572,
|
|
|
181 0.7410,
|
|
|
182 0.7243,
|
|
|
183 0.7071,
|
|
|
184 0.6896,
|
|
|
185 0.6716,
|
|
|
186 0.6532,
|
|
|
187 0.6344,
|
|
|
188 0.6153,
|
|
|
189 0.5957,
|
|
|
190 0.5758,
|
|
|
191 0.5556,
|
|
|
192 0.5350,
|
|
|
193 0.5141,
|
|
|
194 0.4929,
|
|
|
195 0.4714,
|
|
|
196 0.4496,
|
|
|
197 0.4276,
|
|
|
198 0.4053,
|
|
|
199 0.3827,
|
|
|
200 0.3599,
|
|
|
201 0.3369,
|
|
|
202 0.3137,
|
|
|
203 0.2903,
|
|
|
204 0.2667,
|
|
|
205 0.2430,
|
|
|
206 0.2191,
|
|
|
207 0.1951,
|
|
|
208 0.1710,
|
|
|
209 0.1468,
|
|
|
210 0.1225,
|
|
|
211 0.0981,
|
|
|
212 0.0736,
|
|
|
213 0.0491,
|
|
|
214 0.0246,
|
|
|
215 0.0000,
|
|
|
216 -0.0245,
|
|
|
217 -0.0490,
|
|
|
218 -0.0735,
|
|
|
219 -0.0980,
|
|
|
220 -0.1224,
|
|
|
221 -0.1467,
|
|
|
222 -0.1709,
|
|
|
223 -0.1950,
|
|
|
224 -0.2190,
|
|
|
225 -0.2429,
|
|
|
226 -0.2667,
|
|
|
227 -0.2902,
|
|
|
228 -0.3136,
|
|
|
229 -0.3368,
|
|
|
230 -0.3598,
|
|
|
231 -0.3826,
|
|
|
232 -0.4052,
|
|
|
233 -0.4275,
|
|
|
234 -0.4496,
|
|
|
235 -0.4713,
|
|
|
236 -0.4928,
|
|
|
237 -0.5140,
|
|
|
238 -0.5349,
|
|
|
239 -0.5555,
|
|
|
240 -0.5758,
|
|
|
241 -0.5956,
|
|
|
242 -0.6152,
|
|
|
243 -0.6343,
|
|
|
244 -0.6531,
|
|
|
245 -0.6715,
|
|
|
246 -0.6895,
|
|
|
247 -0.7071,
|
|
|
248 -0.7242,
|
|
|
249 -0.7409,
|
|
|
250 -0.7572,
|
|
|
251 -0.7730,
|
|
|
252 -0.7883,
|
|
|
253 -0.8032,
|
|
|
254 -0.8175,
|
|
|
255 -0.8314,
|
|
|
256 -0.8448,
|
|
|
257 -0.8577,
|
|
|
258 -0.8700,
|
|
|
259 -0.8819,
|
|
|
260 -0.8932,
|
|
|
261 -0.9040,
|
|
|
262 -0.9142,
|
|
|
263 -0.9238,
|
|
|
264 -0.9330,
|
|
|
265 -0.9415,
|
|
|
266 -0.9495,
|
|
|
267 -0.9569,
|
|
|
268 -0.9638,
|
|
|
269 -0.9700,
|
|
|
270 -0.9757,
|
|
|
271 -0.9808,
|
|
|
272 -0.9853,
|
|
|
273 -0.9892,
|
|
|
274 -0.9925,
|
|
|
275 -0.9952,
|
|
|
276 -0.9973,
|
|
|
277 -0.9988,
|
|
|
278 -0.9997
|
|
|
279 };
|
|
|
280 double Cos[] = {
|
|
|
281 0.0000,
|
|
|
282 0.0245,
|
|
|
283 0.0491,
|
|
|
284 0.0736,
|
|
|
285 0.0980,
|
|
|
286 0.1224,
|
|
|
287 0.1467,
|
|
|
288 0.1710,
|
|
|
289 0.1951,
|
|
|
290 0.2191,
|
|
|
291 0.2430,
|
|
|
292 0.2667,
|
|
|
293 0.2903,
|
|
|
294 0.3137,
|
|
|
295 0.3369,
|
|
|
296 0.3599,
|
|
|
297 0.3827,
|
|
|
298 0.4052,
|
|
|
299 0.4275,
|
|
|
300 0.4496,
|
|
|
301 0.4714,
|
|
|
302 0.4929,
|
|
|
303 0.5141,
|
|
|
304 0.5350,
|
|
|
305 0.5556,
|
|
|
306 0.5758,
|
|
|
307 0.5957,
|
|
|
308 0.6152,
|
|
|
309 0.6344,
|
|
|
310 0.6532,
|
|
|
311 0.6715,
|
|
|
312 0.6895,
|
|
|
313 0.7071,
|
|
|
314 0.7242,
|
|
|
315 0.7409,
|
|
|
316 0.7572,
|
|
|
317 0.7730,
|
|
|
318 0.7883,
|
|
|
319 0.8032,
|
|
|
320 0.8176,
|
|
|
321 0.8315,
|
|
|
322 0.8448,
|
|
|
323 0.8577,
|
|
|
324 0.8701,
|
|
|
325 0.8819,
|
|
|
326 0.8932,
|
|
|
327 0.9040,
|
|
|
328 0.9142,
|
|
|
329 0.9239,
|
|
|
330 0.9330,
|
|
|
331 0.9415,
|
|
|
332 0.9495,
|
|
|
333 0.9569,
|
|
|
334 0.9638,
|
|
|
335 0.9700,
|
|
|
336 0.9757,
|
|
|
337 0.9808,
|
|
|
338 0.9853,
|
|
|
339 0.9892,
|
|
|
340 0.9925,
|
|
|
341 0.9952,
|
|
|
342 0.9973,
|
|
|
343 0.9988,
|
|
|
344 0.9997,
|
|
|
345 1.0000,
|
|
|
346 0.9997,
|
|
|
347 0.9988,
|
|
|
348 0.9973,
|
|
|
349 0.9952,
|
|
|
350 0.9925,
|
|
|
351 0.9892,
|
|
|
352 0.9853,
|
|
|
353 0.9808,
|
|
|
354 0.9757,
|
|
|
355 0.9700,
|
|
|
356 0.9638,
|
|
|
357 0.9570,
|
|
|
358 0.9495,
|
|
|
359 0.9416,
|
|
|
360 0.9330,
|
|
|
361 0.9239,
|
|
|
362 0.9142,
|
|
|
363 0.9040,
|
|
|
364 0.8933,
|
|
|
365 0.8819,
|
|
|
366 0.8701,
|
|
|
367 0.8578,
|
|
|
368 0.8449,
|
|
|
369 0.8315,
|
|
|
370 0.8176,
|
|
|
371 0.8032,
|
|
|
372 0.7884,
|
|
|
373 0.7731,
|
|
|
374 0.7573,
|
|
|
375 0.7410,
|
|
|
376 0.7243,
|
|
|
377 0.7072,
|
|
|
378 0.6896,
|
|
|
379 0.6716,
|
|
|
380 0.6532,
|
|
|
381 0.6344,
|
|
|
382 0.6153,
|
|
|
383 0.5958,
|
|
|
384 0.5759,
|
|
|
385 0.5556,
|
|
|
386 0.5351,
|
|
|
387 0.5142,
|
|
|
388 0.4930,
|
|
|
389 0.4715,
|
|
|
390 0.4497,
|
|
|
391 0.4276,
|
|
|
392 0.4053,
|
|
|
393 0.3828,
|
|
|
394 0.3600,
|
|
|
395 0.3370,
|
|
|
396 0.3138,
|
|
|
397 0.2904,
|
|
|
398 0.2668,
|
|
|
399 0.2431,
|
|
|
400 0.2192,
|
|
|
401 0.1952,
|
|
|
402 0.1710,
|
|
|
403 0.1468,
|
|
|
404 0.1225,
|
|
|
405 0.0981,
|
|
|
406 0.0737,
|
|
|
407 0.0492,
|
|
|
408 0.0246,
|
|
|
409 0.0001,
|
|
|
410 -0.0244,
|
|
|
411 -0.0490,
|
|
|
412 -0.0735,
|
|
|
413 -0.0979,
|
|
|
414 -0.1223,
|
|
|
415 -0.1466,
|
|
|
416 -0.1709,
|
|
|
417 -0.1950,
|
|
|
418 -0.2190,
|
|
|
419 -0.2429,
|
|
|
420 -0.2666,
|
|
|
421 -0.2902,
|
|
|
422 -0.3136,
|
|
|
423 -0.3368,
|
|
|
424 -0.3598,
|
|
|
425 -0.3826,
|
|
|
426 -0.4051,
|
|
|
427 -0.4275,
|
|
|
428 -0.4495,
|
|
|
429 -0.4713,
|
|
|
430 -0.4928,
|
|
|
431 -0.5140,
|
|
|
432 -0.5349,
|
|
|
433 -0.5555,
|
|
|
434 -0.5757,
|
|
|
435 -0.5956,
|
|
|
436 -0.6151,
|
|
|
437 -0.6343,
|
|
|
438 -0.6531,
|
|
|
439 -0.6715,
|
|
|
440 -0.6895,
|
|
|
441 -0.7070,
|
|
|
442 -0.7242,
|
|
|
443 -0.7409,
|
|
|
444 -0.7571,
|
|
|
445 -0.7729,
|
|
|
446 -0.7883,
|
|
|
447 -0.8031,
|
|
|
448 -0.8175,
|
|
|
449 -0.8314,
|
|
|
450 -0.8448,
|
|
|
451 -0.8577,
|
|
|
452 -0.8700,
|
|
|
453 -0.8819,
|
|
|
454 -0.8932,
|
|
|
455 -0.9039,
|
|
|
456 -0.9142,
|
|
|
457 -0.9238,
|
|
|
458 -0.9329,
|
|
|
459 -0.9415,
|
|
|
460 -0.9495,
|
|
|
461 -0.9569,
|
|
|
462 -0.9637,
|
|
|
463 -0.9700,
|
|
|
464 -0.9757,
|
|
|
465 -0.9808,
|
|
|
466 -0.9853,
|
|
|
467 -0.9892,
|
|
|
468 -0.9925,
|
|
|
469 -0.9952,
|
|
|
470 -0.9973,
|
|
|
471 -0.9988,
|
|
|
472 -0.9997,
|
|
|
473 -1.0000,
|
|
|
474 -0.9997,
|
|
|
475 -0.9988,
|
|
|
476 -0.9973,
|
|
|
477 -0.9952,
|
|
|
478 -0.9925,
|
|
|
479 -0.9892,
|
|
|
480 -0.9853,
|
|
|
481 -0.9808,
|
|
|
482 -0.9757,
|
|
|
483 -0.9701,
|
|
|
484 -0.9638,
|
|
|
485 -0.9570,
|
|
|
486 -0.9496,
|
|
|
487 -0.9416,
|
|
|
488 -0.9330,
|
|
|
489 -0.9239,
|
|
|
490 -0.9143,
|
|
|
491 -0.9041,
|
|
|
492 -0.8933,
|
|
|
493 -0.8820,
|
|
|
494 -0.8702,
|
|
|
495 -0.8578,
|
|
|
496 -0.8449,
|
|
|
497 -0.8316,
|
|
|
498 -0.8177,
|
|
|
499 -0.8033,
|
|
|
500 -0.7884,
|
|
|
501 -0.7731,
|
|
|
502 -0.7573,
|
|
|
503 -0.7411,
|
|
|
504 -0.7244,
|
|
|
505 -0.7072,
|
|
|
506 -0.6897,
|
|
|
507 -0.6717,
|
|
|
508 -0.6533,
|
|
|
509 -0.6345,
|
|
|
510 -0.6154,
|
|
|
511 -0.5958,
|
|
|
512 -0.5759,
|
|
|
513 -0.5557,
|
|
|
514 -0.5351,
|
|
|
515 -0.5142,
|
|
|
516 -0.4930,
|
|
|
517 -0.4715,
|
|
|
518 -0.4498,
|
|
|
519 -0.4277,
|
|
|
520 -0.4054,
|
|
|
521 -0.3828,
|
|
|
522 -0.3601,
|
|
|
523 -0.3371,
|
|
|
524 -0.3138,
|
|
|
525 -0.2905,
|
|
|
526 -0.2669,
|
|
|
527 -0.2432,
|
|
|
528 -0.2193,
|
|
|
529 -0.1953,
|
|
|
530 -0.1711,
|
|
|
531 -0.1469,
|
|
|
532 -0.1226,
|
|
|
533 -0.0982,
|
|
|
534 -0.0737,
|
|
|
535 -0.0493,
|
|
|
536 -0.0247
|
|
|
537 };
|
|
|
538
|
|
|
539 /*-------------------------------------------------------------------------*/
|
|
|
540
|
|
|
541
|
|
|
542
|
|
|
543
|
|
|
544
|
|
|
545
|
|
|
546 /*-------END OF FILE--------*/
|
