home *** CD-ROM | disk | FTP | other *** search
/ CD-X 3 / cdx_03.iso / democomp / demo / _2complx.arj / 2CLX-SRC.ZIP / INC / SPACE.ASM < prev   
Encoding:
Assembly Source File  |  1995-11-10  |  35.9 KB  |  1,429 lines
  1. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  2. ;
  3. ; 3D TEXTURED FLIGHT ROUTINE BY MEGADUO/SHOCK!
  4. ;
  5. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  6.  
  7. Xsor    EQU 320
  8. Ysor    EQU 200
  9.  
  10. LABEL SIN WORD
  11.     Dw 0,50,100,150,201,251,301,351,401,452,502,552,602,652,702,752,802 
  12.     Dw 852,902,952,1002,1052,1102,1152,1202,1251,1301,1350,1400,1450,1499,1548,1598,1647 
  13.     Dw 1696,1745,1794,1843,1892,1941,1990,2039,2087,2136,2184,2233,2281,2329,2378,2426,2474 
  14.     Dw 2521,2569,2617,2664,2712,2759,2807,2854,2901,2948,2995,3041,3088,3134,3181,3227,3273 
  15.     Dw 3319,3365,3411,3457,3502,3547,3593,3638,3683,3728,3772,3817,3861,3905,3950,3994,4037 
  16.     Dw 4081,4124,4168,4211,4254,4297,4340,4382,4425,4467,4509,4551,4592,4634,4675,4717,4758 
  17.     Dw 4798,4839,4879,4920,4960,5000,5039,5079,5118,5157,5196,5235,5274,5312,5350,5388,5426 
  18.     Dw 5464,5501,5538,5575,5612,5648,5685,5721,5756,5792,5828,5863,5898,5933,5967,6001,6036 
  19.     Dw 6069,6103,6136,6170,6203,6235,6268,6300,6332,6364,6395,6427,6458,6488,6519,6549,6579 
  20.     Dw 6609,6639,6668,6697,6726,6755,6783,6811,6839,6866,6894,6921,6947,6974,7000,7026,7052 
  21.     Dw 7077,7102,7127,7152,7176,7200,7224,7248,7271,7294,7317,7339,7361,7383,7405,7426,7447 
  22.     Dw 7468,7489,7509,7529,7549,7568,7587,7606,7624,7643,7661,7678,7696,7713,7729,7746,7762 
  23.     Dw 7778,7794,7809,7824,7839,7853,7867,7881,7895,7908,7921,7934,7946,7958,7970,7981,7992 
  24.     Dw 8003,8014,8024,8034,8044,8053,8062,8071,8079,8087,8095,8103,8110,8117,8124,8130,8136 
  25.     Dw 8142,8147,8152,8157,8161,8165,8169,8173,8176,8179,8182,8184,8186,8188,8189,8190,8191 
  26.         Dw 8191
  27. LABEL COS WORD
  28.         dw 8191,8191,8191,8190,8189,8188,8186,8184,8182,8179,8176,8173,8169,8165,8161,8157
  29.     Dw 8152,8147,8142,8136,8130,8124,8117,8110,8103,8095,8087,8079,8071,8062,8053,8044,8034 
  30.     Dw 8024,8014,8003,7992,7981,7970,7958,7946,7934,7921,7908,7895,7881,7867,7853,7839,7824 
  31.     Dw 7809,7794,7778,7762,7746,7729,7713,7696,7678,7661,7643,7624,7606,7587,7568,7549,7529 
  32.     Dw 7509,7489,7468,7447,7426,7405,7383,7361,7339,7317,7294,7271,7248,7224,7200,7176,7152 
  33.     Dw 7127,7102,7077,7052,7026,7000,6974,6947,6921,6894,6866,6839,6811,6783,6755,6726,6697 
  34.     Dw 6668,6639,6609,6579,6549,6519,6488,6458,6427,6395,6364,6332,6300,6268,6235,6203,6170 
  35.     Dw 6136,6103,6069,6036,6001,5967,5933,5898,5863,5828,5792,5756,5721,5685,5648,5612,5575 
  36.     Dw 5538,5501,5464,5426,5388,5350,5312,5274,5235,5196,5157,5118,5079,5039,5000,4960,4920 
  37.     Dw 4879,4839,4798,4758,4717,4675,4634,4592,4551,4509,4467,4425,4382,4340,4297,4254,4211 
  38.     Dw 4168,4124,4081,4037,3994,3950,3905,3861,3817,3772,3728,3683,3638,3593,3547,3502,3457 
  39.     Dw 3411,3365,3319,3273,3227,3181,3134,3088,3041,2995,2948,2901,2854,2807,2759,2712,2664 
  40.     Dw 2617,2569,2521,2474,2426,2378,2329,2281,2233,2184,2136,2087,2039,1990,1941,1892,1843 
  41.     Dw 1794,1745,1696,1647,1598,1548,1499,1450,1400,1350,1301,1251,1202,1152,1102,1052,1002 
  42.     Dw 952,902,852,802,752,702,652,602,552,502,452,401,351,301,251,201,150 
  43.     Dw 100,50,0,-50,-100,-150,-201,-251,-301,-351,-401,-452,-502,-552,-602,-652,-702 
  44.     Dw -752,-802,-852,-902,-952,-1002,-1052,-1102,-1152,-1202,-1251,-1301,-1350,-1400,-1450,-1499,-1548 
  45.     Dw -1598,-1647,-1696,-1745,-1794,-1843,-1892,-1941,-1990,-2039,-2087,-2136,-2184,-2233,-2281,-2329,-2378 
  46.     Dw -2426,-2474,-2521,-2569,-2617,-2664,-2712,-2759,-2807,-2854,-2901,-2948,-2995,-3041,-3088,-3134,-3181 
  47.     Dw -3227,-3273,-3319,-3365,-3411,-3457,-3502,-3547,-3593,-3638,-3683,-3728,-3772,-3817,-3861,-3905,-3950 
  48.     Dw -3994,-4037,-4081,-4124,-4168,-4211,-4254,-4297,-4340,-4382,-4425,-4467,-4509,-4551,-4592,-4634,-4675 
  49.     Dw -4717,-4758,-4798,-4839,-4879,-4920,-4960,-5000,-5039,-5079,-5118,-5157,-5196,-5235,-5274,-5312,-5350 
  50.     Dw -5388,-5426,-5464,-5501,-5538,-5575,-5612,-5648,-5685,-5721,-5756,-5792,-5828,-5863,-5898,-5933,-5967 
  51.     Dw -6001,-6036,-6069,-6103,-6136,-6170,-6203,-6235,-6268,-6300,-6332,-6364,-6395,-6427,-6458,-6488,-6519 
  52.     Dw -6549,-6579,-6609,-6639,-6668,-6697,-6726,-6755,-6783,-6811,-6839,-6866,-6894,-6921,-6947,-6974,-7000 
  53.     Dw -7026,-7052,-7077,-7102,-7127,-7152,-7176,-7200,-7224,-7248,-7271,-7294,-7317,-7339,-7361,-7383,-7405 
  54.     Dw -7426,-7447,-7468,-7489,-7509,-7529,-7549,-7568,-7587,-7606,-7624,-7643,-7661,-7678,-7696,-7713,-7729 
  55.     Dw -7746,-7762,-7778,-7794,-7809,-7824,-7839,-7853,-7867,-7881,-7895,-7908,-7921,-7934,-7946,-7958,-7970 
  56.     Dw -7981,-7992,-8003,-8014,-8024,-8034,-8044,-8053,-8062,-8071,-8079,-8087,-8095,-8103,-8110,-8117,-8124 
  57.     Dw -8130,-8136,-8142,-8147,-8152,-8157,-8161,-8165,-8169,-8173,-8176,-8179,-8182,-8184,-8186,-8188,-8189 
  58.     Dw -8190,-8191,-8191,-8191,-8191,-8191,-8190,-8189,-8188,-8186,-8184,-8182,-8179,-8176,-8173,-8169,-8165 
  59.     Dw -8161,-8157,-8152,-8147,-8142,-8136,-8130,-8124,-8117,-8110,-8103,-8095,-8087,-8079,-8071,-8062,-8053 
  60.     Dw -8044,-8034,-8024,-8014,-8003,-7992,-7981,-7970,-7958,-7946,-7934,-7921,-7908,-7895,-7881,-7867,-7853 
  61.     Dw -7839,-7824,-7809,-7794,-7778,-7762,-7746,-7729,-7713,-7696,-7678,-7661,-7643,-7624,-7606,-7587,-7568 
  62.     Dw -7549,-7529,-7509,-7489,-7468,-7447,-7426,-7405,-7383,-7361,-7339,-7317,-7294,-7271,-7248,-7224,-7200 
  63.     Dw -7176,-7152,-7127,-7102,-7077,-7052,-7026,-7000,-6974,-6947,-6921,-6894,-6866,-6839,-6811,-6783,-6755 
  64.     Dw -6726,-6697,-6668,-6639,-6609,-6579,-6549,-6519,-6488,-6458,-6427,-6395,-6364,-6332,-6300,-6268,-6235 
  65.     Dw -6203,-6170,-6136,-6103,-6069,-6036,-6001,-5967,-5933,-5898,-5863,-5828,-5792,-5756,-5721,-5685,-5648 
  66.     Dw -5612,-5575,-5538,-5501,-5464,-5426,-5388,-5350,-5312,-5274,-5235,-5196,-5157,-5118,-5079,-5039,-5000 
  67.     Dw -4960,-4920,-4879,-4839,-4798,-4758,-4717,-4675,-4634,-4592,-4551,-4509,-4467,-4425,-4382,-4340,-4297 
  68.     Dw -4254,-4211,-4168,-4124,-4081,-4037,-3994,-3950,-3905,-3861,-3817,-3772,-3728,-3683,-3638,-3593,-3547 
  69.     Dw -3502,-3457,-3411,-3365,-3319,-3273,-3227,-3181,-3134,-3088,-3041,-2995,-2948,-2901,-2854,-2807,-2759 
  70.     Dw -2712,-2664,-2617,-2569,-2521,-2474,-2426,-2378,-2329,-2281,-2233,-2184,-2136,-2087,-2039,-1990,-1941 
  71.     Dw -1892,-1843,-1794,-1745,-1696,-1647,-1598,-1548,-1499,-1450,-1400,-1350,-1301,-1251,-1202,-1152,-1102 
  72.     Dw -1052,-1002,-952,-902,-852,-802,-752,-702,-652,-602,-552,-502,-452,-401,-351,-301,-251 
  73.         Dw -201,-150,-100,-50
  74.         dw 0,50,100,150,201,251,301,351,401,452,502,552,602,652
  75.         Dw 702,752,802,852,902,952,1002,1052,1102,1152,1202,1251,1301,1350,1400,1450,1499
  76.     Dw 1548,1598,1647,1696,1745,1794,1843,1892,1941,1990,2039,2087,2136,2184,2233,2281,2329 
  77.     Dw 2378,2426,2474,2521,2569,2617,2664,2712,2759,2807,2854,2901,2948,2995,3041,3088,3134 
  78.     Dw 3181,3227,3273,3319,3365,3411,3457,3502,3547,3593,3638,3683,3728,3772,3817,3861,3905 
  79.     Dw 3950,3994,4037,4081,4124,4168,4211,4254,4297,4340,4382,4425,4467,4509,4551,4592,4634 
  80.     Dw 4675,4717,4758,4798,4839,4879,4920,4960,5000,5039,5079,5118,5157,5196,5235,5274,5312 
  81.     Dw 5350,5388,5426,5464,5501,5538,5575,5612,5648,5685,5721,5756,5792,5828,5863,5898,5933 
  82.     Dw 5967,6001,6036,6069,6103,6136,6170,6203,6235,6268,6300,6332,6364,6395,6427,6458,6488 
  83.     Dw 6519,6549,6579,6609,6639,6668,6697,6726,6755,6783,6811,6839,6866,6894,6921,6947,6974 
  84.     Dw 7000,7026,7052,7077,7102,7127,7152,7176,7200,7224,7248,7271,7294,7317,7339,7361,7383 
  85.     Dw 7405,7426,7447,7468,7489,7509,7529,7549,7568,7587,7606,7624,7643,7661,7678,7696,7713 
  86.     Dw 7729,7746,7762,7778,7794,7809,7824,7839,7853,7867,7881,7895,7908,7921,7934,7946,7958 
  87.     Dw 7970,7981,7992,8003,8014,8024,8034,8044,8053,8062,8071,8079,8087,8095,8103,8110,8117 
  88.     Dw 8124,8130,8136,8142,8147,8152,8157,8161,8165,8169,8173,8176,8179,8182,8184,8186,8188 
  89.     Dw 8189,8190,8191,8191
  90. TORT    EQU    13        ; A kezelt törtbitek száma (sin - cos)
  91. TRT    =1
  92. Rept    TORT
  93.     TRT = TRT*2
  94. EndM
  95.  
  96.  
  97. kep     dw      0
  98.  
  99. EVEN
  100.         ;Nézôpont koordinátái
  101.     dd 0
  102. OX    DD 128
  103. OY    DD 100
  104. OZ    DD 128
  105.  
  106.         ;A két sík távolsaága
  107. DIST    DD 255
  108.         ;A távolság, ahová nézünk (Képsík)
  109. D    DD 200
  110. D2    DD 200
  111.         ;Vetítôvektor
  112. VX    DD 0
  113. VY    DD 0
  114. VZ    DD 0
  115. VZZ    DD 0
  116.         ;Lépésköz a képsíkon
  117. KX    DD 0
  118. KY    DD 0
  119. KZ    DD 0
  120.         ;Lépésköz a képen
  121. TX    DD 0
  122. TY    DD 0
  123.  
  124. OZSHLX    dd 0
  125. OZSHLX2    dd 0
  126. VZPER    dd 0
  127.  
  128. TRTD    dd TRT
  129.         ; A rálátás szöge
  130. Alfa    DW 256
  131. BATA    DW 0
  132.         ;A Leképzendô sorok száma-1
  133. YY    DW Ysor,0
  134. XX    DW Xsor,0
  135.  
  136. SPO    DW 0
  137.  
  138. ;Y       DW 0
  139. X1    DW 0
  140. Y1    DW 0
  141.  
  142. SAVESP    DW 0
  143.  
  144. LABEL YTABLE WORD
  145. POS = 0
  146. REPT 200
  147.     DW POS
  148. POS = POS+320
  149. ENDM
  150.  
  151. Lepes    dw offset Palya
  152. Palya    label    word
  153.  
  154. dw    -539,-866,242,159,15
  155. dw    -549,-873,243,159,14
  156. dw    -559,-880,243,158,13
  157. dw    -569,-886,244,158,12
  158. dw    -578,-893,244,158,10
  159. dw    -588,-899,244,158,9
  160. dw    -597,-906,245,158,8
  161. dw    -606,-912,245,158,6
  162. dw    -615,-918,245,158,5
  163. dw    -624,-924,245,158,3
  164. dw    -633,-930,246,158,2
  165. dw    -641,-936,246,159,0
  166. dw    -650,-942,246,159,1023
  167. dw    -658,-947,246,159,1021
  168. dw    -666,-953,245,159,1019
  169. dw    -674,-958,245,160,1017
  170. dw    -682,-963,245,160,1015
  171. dw    -690,-968,245,161,1014
  172. dw    -697,-973,245,161,1011
  173. dw    -704,-978,244,162,1009
  174. dw    -712,-983,244,162,1007
  175. dw    -719,-987,243,163,1005
  176. dw    -726,-992,243,164,1002
  177. dw    -732,-996,242,165,999
  178. dw    -739,-1000,242,166,997
  179. dw    -745,-1004,241,167,994
  180. dw    -751,-1008,241,168,990
  181. dw    -757,-1011,240,170,987
  182. dw    -763,-1015,239,171,984
  183. dw    -769,-1018,238,173,980
  184. dw    -774,-1021,237,175,976
  185. dw    -779,-1024,237,177,971
  186. dw    -784,-1027,236,179,966
  187. dw    -789,-1029,235,182,961
  188. dw    -794,-1031,234,184,955
  189. dw    -798,-1034,233,188,949
  190. dw    -803,-1035,231,191,942
  191. dw    -807,-1037,230,196,935
  192. dw    -811,-1039,229,200,927
  193. dw    -815,-1040,228,206,918
  194. dw    -818,-1041,227,212,908
  195. dw    -821,-1042,225,219,897
  196. dw    -825,-1043,224,228,885
  197. dw    -827,-1043,223,238,872
  198. dw    -830,-1044,221,250,858
  199. dw    -833,-1044,220,264,843
  200. dw    -835,-1044,218,280,828
  201. dw    -837,-1043,217,300,813
  202. dw    -839,-1043,215,322,800
  203. dw    -841,-1042,214,347,790
  204. dw    -842,-1041,212,373,784
  205. dw    -844,-1040,211,401,783
  206. dw    -845,-1039,209,427,786
  207. dw    -846,-1037,207,451,792
  208. dw    -846,-1035,206,472,801
  209. dw    -847,-1033,204,490,812
  210. dw    -847,-1031,202,506,823
  211. dw    -847,-1029,201,519,834
  212. dw    -847,-1026,199,530,844
  213. dw    -847,-1023,197,540,854
  214. dw    -846,-1020,195,548,863
  215. dw    -846,-1017,194,555,872
  216. dw    -845,-1013,192,561,880
  217. dw    -844,-1010,190,567,887
  218. dw    -842,-1006,188,572,894
  219. dw    -841,-1002,186,576,900
  220. dw    -839,-998,185,580,905
  221. dw    -837,-993,183,583,911
  222. dw    -835,-988,181,586,915
  223. dw    -832,-984,179,589,920
  224. dw    -830,-979,177,592,924
  225. dw    -827,-973,175,594,928
  226. dw    -824,-968,173,596,931
  227. dw    -821,-962,171,598,935
  228. dw    -818,-957,170,600,938
  229. dw    -814,-951,168,602,941
  230. dw    -810,-945,166,604,944
  231. dw    -806,-939,164,606,946
  232. dw    -802,-932,162,607,949
  233. dw    -798,-926,160,609,951
  234. dw    -793,-919,158,610,953
  235. dw    -789,-912,157,611,956
  236. dw    -784,-905,155,613,958
  237. dw    -779,-898,153,614,960
  238. dw    -773,-890,151,615,962
  239. dw    -768,-883,149,616,963
  240. dw    -762,-875,148,617,965
  241. dw    -756,-868,146,618,967
  242. dw    -750,-860,144,619,969
  243. dw    -744,-852,142,620,970
  244. dw    -738,-844,141,621,972
  245. dw    -731,-835,139,623,973
  246. dw    -725,-827,137,623,975
  247. dw    -718,-819,136,624,976
  248. dw    -711,-810,134,625,977
  249. dw    -704,-802,132,626,979
  250. dw    -696,-793,131,627,980
  251. dw    -689,-784,129,628,981
  252. dw    -681,-775,128,629,982
  253. dw    -673,-766,126,630,984
  254. dw    -665,-757,125,631,985
  255. dw    -657,-748,123,632,986
  256. dw    -649,-739,122,633,987
  257. dw    -640,-730,120,634,988
  258. dw    -632,-721,119,635,989
  259. dw    -623,-711,118,636,990
  260. dw    -614,-702,116,636,991
  261. dw    -605,-693,115,637,992
  262. dw    -596,-683,114,638,993
  263. dw    -587,-674,112,639,994
  264. dw    -577,-664,111,640,995
  265. dw    -568,-655,110,641,996
  266. dw    -558,-645,109,642,997
  267. dw    -549,-636,108,643,998
  268. dw    -539,-626,107,644,999
  269. dw    -529,-617,105,645,1000
  270. dw    -519,-607,104,646,1001
  271. dw    -508,-597,103,647,1001
  272. dw    -498,-588,102,647,1002
  273. dw    -488,-578,101,648,1003
  274. dw    -477,-569,101,649,1004
  275. dw    -467,-560,100,650,1005
  276. dw    -456,-550,99,651,1006
  277. dw    -445,-541,98,652,1006
  278. dw    -434,-531,97,653,1007
  279. dw    -423,-522,97,654,1008
  280. dw    -412,-513,96,655,1009
  281. dw    -401,-504,95,656,1009
  282. dw    -390,-495,95,657,1010
  283. dw    -379,-485,94,658,1011
  284. dw    -368,-476,93,659,1012
  285. dw    -356,-467,93,660,1012
  286. dw    -345,-459,92,661,1013
  287. dw    -333,-450,92,662,1014
  288. dw    -322,-441,91,663,1014
  289. dw    -310,-432,91,664,1015
  290. dw    -299,-424,90,665,1016
  291. dw    -287,-415,90,666,1016
  292. dw    -275,-407,90,667,1017
  293. dw    -263,-398,89,668,1018
  294. dw    -252,-390,89,669,1018
  295. dw    -240,-382,89,670,1019
  296. dw    -228,-374,89,671,1020
  297. dw    -216,-366,89,673,1020
  298. dw    -204,-358,88,674,1021
  299. dw    -193,-350,88,675,1022
  300. dw    -181,-343,88,676,1022
  301. dw    -169,-335,88,677,1023
  302. dw    -157,-328,88,678,1023
  303. dw    -145,-320,88,679,0
  304. dw    -133,-313,88,680,0
  305. dw    -121,-306,88,681,1
  306. dw    -110,-299,88,682,1
  307. dw    -98,-292,88,683,2
  308. dw    -86,-285,88,684,3
  309. dw    -74,-279,88,685,3
  310. dw    -62,-272,88,686,4
  311. dw    -51,-266,89,687,4
  312. dw    -39,-259,89,688,4
  313. dw    -27,-253,89,690,5
  314. dw    -16,-247,89,691,5
  315. dw    -4,-241,89,692,6
  316. dw    7,-235,90,693,6
  317. dw    19,-230,90,694,7
  318. dw    30,-224,90,695,7
  319. dw    42,-219,90,696,8
  320. dw    53,-213,91,697,8
  321. dw    64,-208,91,698,8
  322. dw    75,-203,91,699,9
  323. dw    86,-198,92,699,9
  324. dw    97,-193,92,700,9
  325. dw    108,-188,92,701,10
  326. dw    119,-183,93,702,10
  327. dw    130,-179,93,703,10
  328. dw    141,-174,93,704,11
  329. dw    151,-170,94,705,11
  330. dw    162,-166,94,705,11
  331. dw    172,-161,94,706,11
  332. dw    182,-157,95,707,12
  333. dw    192,-153,95,708,12
  334. dw    203,-149,96,708,12
  335. dw    213,-146,96,709,12
  336. dw    222,-142,96,710,12
  337. dw    232,-138,97,710,13
  338. dw    242,-135,97,711,13
  339. dw    251,-131,98,711,13
  340. dw    261,-128,98,712,13
  341. dw    270,-124,98,712,13
  342. dw    279,-121,99,712,13
  343. dw    288,-118,99,712,13
  344. dw    297,-115,100,713,13
  345. dw    306,-112,100,713,13
  346. dw    314,-109,100,713,13
  347. dw    323,-106,101,713,13
  348. dw    331,-103,101,713,13
  349. dw    339,-100,101,713,13
  350. dw    347,-97,102,712,13
  351. dw    355,-94,102,712,13
  352. dw    362,-92,102,712,13
  353. dw    370,-89,103,711,13
  354. dw    377,-86,103,711,13
  355. dw    384,-84,103,710,13
  356. dw    392,-81,104,709,12
  357. dw    398,-78,104,708,12
  358. dw    405,-76,104,707,12
  359. dw    412,-73,104,705,12
  360. dw    418,-71,105,704,11
  361. dw    424,-68,105,702,11
  362. dw    430,-65,105,701,11
  363. dw    436,-63,105,699,10
  364. dw    442,-60,106,696,10
  365. dw    447,-58,106,694,9
  366. dw    452,-55,106,691,9
  367. dw    457,-53,106,688,8
  368. dw    462,-50,106,685,8
  369. dw    467,-47,106,681,7
  370. dw    472,-45,106,677,6
  371. dw    476,-42,107,673,6
  372. dw    480,-39,107,669,5
  373. dw    484,-36,107,664,4
  374. dw    488,-34,107,658,3
  375. dw    491,-31,107,653,2
  376. dw    495,-28,107,646,1
  377. dw    498,-25,107,640,0
  378. dw    501,-22,107,633,1023
  379. dw    504,-19,107,625,1022
  380. dw    506,-16,107,617,1021
  381. dw    509,-13,107,609,1020
  382. dw    511,-9,107,600,1018
  383. dw    513,-6,107,592,1017
  384. dw    515,-3,107,583,1016
  385. dw    516,1,106,573,1015
  386. dw    518,4,106,564,1014
  387. dw    519,8,106,555,1013
  388. dw    520,12,106,546,1012
  389. dw    521,15,106,537,1011
  390. dw    521,19,106,528,1010
  391. dw    522,23,106,519,1009
  392. dw    522,27,105,511,1009
  393. dw    522,31,105,503,1008
  394. dw    522,36,105,496,1008
  395. dw    521,40,105,489,1008
  396. dw    521,44,105,482,1008
  397. dw    520,49,104,476,1007
  398. dw    519,53,104,470,1007
  399. dw    518,58,104,465,1007
  400. dw    516,63,104,460,1007
  401. dw    515,68,103,455,1007
  402. dw    513,73,103,450,1007
  403. dw    511,78,103,446,1008
  404. dw    508,83,103,442,1008
  405. dw    506,88,102,438,1008
  406. dw    503,94,102,435,1008
  407. dw    501,99,102,432,1008
  408. dw    498,105,101,429,1009
  409. dw    494,110,101,426,1009
  410. dw    491,116,101,423,1009
  411. dw    487,122,100,421,1010
  412. dw    484,128,100,418,1010
  413. dw    480,134,100,416,1010
  414. dw    476,140,100,414,1011
  415. dw    471,147,99,412,1011
  416. dw    467,153,99,410,1011
  417. dw    462,160,99,408,1012
  418. dw    457,166,98,406,1012
  419. dw    452,173,98,405,1012
  420. dw    447,180,98,403,1013
  421. dw    441,186,97,402,1013
  422. dw    436,193,97,400,1014
  423. dw    430,200,97,399,1014
  424. dw    424,208,96,397,1014
  425. dw    418,215,96,396,1015
  426. dw    412,222,96,395,1015
  427. dw    405,229,96,394,1016
  428. dw    399,237,95,393,1016
  429. dw    392,244,95,391,1016
  430. dw    385,252,95,390,1017
  431. dw    378,260,95,389,1017
  432. dw    371,267,94,388,1018
  433. dw    363,275,94,387,1018
  434. dw    356,283,94,386,1018
  435. dw    348,291,94,385,1019
  436. dw    340,299,94,384,1019
  437. dw    332,307,94,383,1020
  438. dw    324,315,93,382,1020
  439. dw    316,323,93,381,1021
  440. dw    308,331,93,380,1021
  441. dw    299,339,93,380,1021
  442. dw    291,347,93,379,1022
  443. dw    282,355,93,378,1022
  444. dw    273,364,93,377,1023
  445. dw    264,372,93,376,1023
  446. dw    255,380,93,375,0
  447. dw    246,388,93,374,0
  448. dw    236,397,93,373,1
  449. dw    227,405,93,372,1
  450. dw    217,413,93,371,2
  451. dw    208,421,93,370,2
  452. dw    198,430,93,369,3
  453. dw    188,438,93,369,3
  454. dw    178,446,93,368,3
  455. dw    168,454,93,367,4
  456. dw    158,463,93,366,4
  457. dw    148,471,94,365,5
  458. dw    137,479,94,364,5
  459. dw    127,487,94,363,6
  460. dw    116,495,94,362,6
  461. dw    106,503,95,361,7
  462. dw    95,511,95,360,7
  463. dw    85,519,95,358,8
  464. dw    74,526,95,357,8
  465. dw    63,534,96,356,9
  466. dw    52,542,96,355,9
  467. dw    41,549,97,354,10
  468. dw    31,557,97,353,10
  469. dw    20,564,97,352,11
  470. dw    9,572,98,350,11
  471. dw    -3,579,98,349,12
  472. dw    -14,586,99,348,12
  473. dw    -25,593,99,347,13
  474. dw    -36,600,100,345,13
  475. dw    -47,607,100,344,14
  476. dw    -58,613,101,343,14
  477. dw    -69,620,101,341,15
  478. dw    -81,626,102,340,15
  479. dw    -92,633,103,338,16
  480. dw    -103,639,103,337,16
  481. dw    -114,645,104,335,17
  482. dw    -126,651,105,334,17
  483. dw    -137,657,105,332,18
  484. dw    -148,663,106,330,18
  485. dw    -159,668,107,329,19
  486. dw    -171,673,107,327,20
  487. dw    -182,679,108,325,20
  488. dw    -193,684,109,323,21
  489. dw    -204,689,110,321,21
  490. dw    -215,693,110,320,22
  491. dw    -226,698,111,318,22
  492. dw    -238,702,112,316,23
  493. dw    -249,706,113,314,23
  494. dw    -260,711,114,312,24
  495. dw    -271,714,114,309,24
  496. dw    -281,718,115,307,24
  497. dw    -292,722,116,305,25
  498. dw    -303,725,117,303,25
  499. dw    -314,728,118,300,26
  500. dw    -325,731,119,298,26
  501. dw    -335,734,120,296,27
  502. dw    -346,737,121,293,27
  503. dw    -356,739,121,291,28
  504. dw    -367,741,122,288,28
  505. dw    -377,743,123,285,28
  506. dw    -387,745,124,283,29
  507. dw    -397,747,125,280,29
  508. dw    -408,748,126,277,29
  509. dw    -418,750,127,274,30
  510. dw    -428,751,128,271,30
  511. dw    -437,752,129,268,30
  512. dw    -447,752,130,265,31
  513. dw    -457,753,131,262,31
  514. dw    -466,753,131,258,31
  515. dw    -476,753,132,255,31
  516. dw    -485,753,133,252,31
  517. dw    -494,753,134,248,31
  518. dw    -503,753,135,245,32
  519. dw    -512,752,136,241,32
  520. dw    -521,751,137,238,32
  521. dw    -530,750,138,234,32
  522. dw    -539,749,138,230,32
  523. dw    -547,748,139,226,32
  524. dw    -555,746,140,222,31
  525. dw    -564,744,141,218,31
  526. dw    -572,742,142,214,31
  527. dw    -580,740,143,210,31
  528. dw    -588,738,143,206,31
  529. dw    -595,736,144,202,30
  530. dw    -603,733,145,198,30
  531. dw    -610,730,146,194,29
  532. dw    -618,727,146,189,29
  533. dw    -625,724,147,185,29
  534. dw    -632,721,148,181,28
  535. dw    -638,718,148,176,27
  536. dw    -645,714,149,172,27
  537. dw    -652,710,150,167,26
  538. dw    -658,707,150,163,25
  539. dw    -664,703,151,158,24
  540. dw    -670,699,151,154,24
  541. dw    -676,694,152,149,23
  542. dw    -682,690,152,144,22
  543. dw    -687,685,153,140,21
  544. dw    -693,681,153,135,20
  545. dw    -698,676,154,130,19
  546. dw    -703,671,154,126,18
  547. dw    -708,666,154,121,17
  548. dw    -712,661,155,116,15
  549. dw    -717,656,155,112,14
  550. dw    -721,650,155,107,13
  551. dw    -725,645,156,102,12
  552. dw    -729,640,156,98,10
  553. dw    -733,634,156,93,9
  554. dw    -737,628,156,88,8
  555. dw    -740,623,157,84,6
  556. dw    -744,617,157,79,5
  557. dw    -747,611,157,74,3
  558. dw    -750,605,157,70,2
  559. dw    -752,599,157,65,1
  560. dw    -755,593,157,60,1023
  561. dw    -757,587,157,56,1022
  562. dw    -759,581,157,51,1020
  563. dw    -761,575,157,46,1019
  564. dw    -763,568,157,41,1017
  565. dw    -765,562,156,37,1015
  566. dw    -766,556,156,32,1014
  567. dw    -767,550,156,27,1012
  568. dw    -769,543,156,23,1011
  569. dw    -769,537,156,18,1009
  570. dw    -770,531,155,13,1008
  571. dw    -771,524,155,8,1006
  572. dw    -771,518,155,4,1005
  573. dw    -771,512,154,1023,1003
  574. dw    -771,505,154,1018,1001
  575. dw    -771,499,153,1013,1000
  576. dw    -770,493,153,1008,998
  577. dw    -770,487,152,1003,997
  578. dw    -769,481,152,999,995
  579. dw    -768,474,151,994,994
  580. dw    -767,468,151,989,993
  581. dw    -766,462,150,984,991
  582. dw    -764,456,150,979,990
  583. dw    -762,450,149,974,989
  584. dw    -760,444,148,969,987
  585. dw    -758,438,148,964,986
  586. dw    -756,433,147,959,985
  587. dw    -754,427,146,954,984
  588. dw    -751,421,145,949,982
  589. dw    -748,416,145,944,981
  590. dw    -746,410,144,939,980
  591. dw    -742,405,143,934,979
  592. dw    -739,400,142,929,978
  593. dw    -736,394,141,924,978
  594. dw    -732,389,140,919,977
  595. dw    -728,384,139,914,976
  596. dw    -724,379,138,909,975
  597. dw    -720,375,137,904,975
  598. dw    -716,370,136,899,974
  599. dw    -712,365,136,894,974
  600. dw    -707,361,135,889,974
  601. dw    -702,356,134,884,973
  602. dw    -697,352,132,879,973
  603. dw    -692,348,131,875,973
  604. dw    -687,344,130,870,973
  605. dw    -682,340,129,865,973
  606. dw    -676,336,128,861,973
  607. dw    -670,333,127,856,973
  608. dw    -665,329,126,852,973
  609. dw    -659,326,125,848,973
  610. dw    -653,323,124,843,973
  611. dw    -646,319,123,839,974
  612. dw    -640,317,122,835,974
  613. dw    -633,314,121,831,974
  614. dw    -627,311,120,827,975
  615. dw    -620,308,118,823,975
  616. dw    -613,306,117,820,976
  617. dw    -606,304,116,816,977
  618. dw    -599,301,115,812,977
  619. dw    -592,299,114,809,978
  620. dw    -584,298,113,805,979
  621. dw    -577,296,112,802,979
  622. dw    -569,294,111,799,980
  623. dw    -561,293,110,796,981
  624. dw    -553,291,109,792,982
  625. dw    -545,290,108,790,983
  626. dw    -537,289,107,787,984
  627. dw    -529,288,106,784,985
  628. dw    -521,287,105,781,985
  629. dw    -513,287,104,778,986
  630. dw    -504,286,103,776,987
  631. dw    -496,286,102,773,988
  632. dw    -487,285,101,771,989
  633. dw    -478,285,100,769,990
  634. dw    -469,285,99,766,991
  635. dw    -461,285,98,764,992
  636. dw    -452,286,97,762,993
  637. dw    -443,286,96,760,994
  638. dw    -433,286,95,758,996
  639. dw    -424,287,95,756,997
  640. dw    -415,288,94,754,998
  641. dw    -406,288,93,753,999
  642. dw    -396,289,92,751,1000
  643. dw    -387,290,92,749,1001
  644. dw    -377,291,91,748,1002
  645. dw    -368,292,90,746,1003
  646. dw    -358,294,90,745,1004
  647. dw    -349,295,89,744,1005
  648. dw    -339,297,89,742,1006
  649. dw    -329,298,88,741,1008
  650. dw    -319,300,88,740,1009
  651. dw    -310,301,87,739,1010
  652. dw    -300,303,87,738,1011
  653. dw    -290,305,86,737,1012
  654. dw    -280,307,86,736,1013
  655. dw    -270,309,86,735,1015
  656. dw    -260,311,85,734,1016
  657. dw    -250,313,85,733,1017
  658. dw    -240,315,85,733,1018
  659. dw    -230,317,85,732,1019
  660. dw    -220,320,84,731,1020
  661. dw    -210,322,84,731,1022
  662. dw    -200,324,84,730,1023
  663. dw    -191,327,84,730,0
  664. dw    -181,329,84,729,1
  665. dw    -171,331,84,729,2
  666. dw    -161,334,84,729,4
  667. dw    -151,336,84,728,5
  668. dw    -141,339,85,728,6
  669. dw    -131,341,85,728,7
  670. dw    -121,344,85,728,9
  671. dw    -111,346,85,728,10
  672. dw    -101,349,86,728,11
  673. dw    -91,351,86,728,13
  674. dw    -82,354,86,728,14
  675. dw    -72,356,87,728,15
  676. dw    -62,358,87,728,17
  677. dw    -52,361,88,729,18
  678. dw    -43,363,88,729,19
  679. dw    -33,365,89,729,21
  680. dw    -24,368,90,730,22
  681. dw    -14,370,90,730,23
  682. dw    -5,372,91,731,25
  683. dw    5,375,92,731,26
  684. dw    14,377,92,732,28
  685. dw    23,379,93,733,29
  686. dw    33,381,94,733,31
  687. dw    42,383,95,734,32
  688. dw    51,385,96,735,34
  689. dw    60,387,97,736,35
  690. dw    69,388,98,737,37
  691. dw    78,390,99,738,38
  692. dw    87,392,100,739,40
  693. dw    95,393,101,740,42
  694. dw    104,395,102,742,43
  695. dw    112,396,103,743,45
  696. dw    121,397,104,744,47
  697. dw    129,399,106,746,48
  698. dw    138,400,107,747,50
  699. dw    146,401,108,749,52
  700. dw    154,402,110,751,53
  701. dw    162,403,111,753,55
  702. dw    170,403,112,754,57
  703. dw    178,404,114,756,59
  704. dw    186,405,115,758,60
  705. dw    193,405,116,761,62
  706. dw    201,405,118,763,64
  707. dw    208,406,119,765,66
  708. dw    215,406,121,768,68
  709. dw    223,406,122,770,70
  710. dw    230,406,124,773,71
  711. dw    237,405,126,776,73
  712. dw    244,405,127,778,75
  713. dw    250,405,129,781,77
  714. dw    257,404,130,784,79
  715. dw    264,403,132,788,81
  716. dw    270,403,134,791,82
  717. dw    276,402,135,794,84
  718. dw    283,401,137,798,86
  719. dw    289,400,139,801,88
  720. dw    295,398,140,805,89
  721. dw    300,397,142,809,91
  722. dw    306,396,144,813,93
  723. dw    312,394,145,817,94
  724. dw    317,392,147,821,96
  725. dw    323,391,149,825,97
  726. dw    328,389,150,830,99
  727. dw    333,387,152,834,100
  728. dw    338,385,154,839,101
  729. dw    343,382,156,843,102
  730. dw    347,380,157,848,103
  731. dw    352,378,159,853,104
  732. dw    356,375,161,858,105
  733. dw    361,372,162,863,106
  734. dw    365,370,164,868,107
  735. dw    369,367,166,873,107
  736. dw    373,364,167,878,107
  737. dw    376,361,169,883,108
  738. dw    380,358,171,889,108
  739. dw    384,354,172,894,108
  740. dw    387,351,174,899,107
  741. dw    390,348,175,904,107
  742. dw    393,344,177,910,107
  743. dw    396,341,179,915,106
  744. dw    399,337,180,920,105
  745. dw    402,334,182,926,104
  746. dw    404,330,183,931,103
  747. dw    407,326,185,936,102
  748. dw    409,322,186,941,101
  749. dw    411,318,188,946,100
  750. dw    413,314,189,951,98
  751. dw    415,310,190,956,97
  752. dw    417,306,192,961,95
  753. dw    419,302,193,966,94
  754. dw    420,298,194,971,92
  755. dw    422,294,196,976,90
  756. dw    423,289,197,980,88
  757. dw    424,285,198,985,86
  758. dw    425,281,199,990,84
  759. dw    426,276,201,994,82
  760. dw    427,272,202,999,80
  761. dw    428,268,203,1003,77
  762. dw    428,263,204,1008,75
  763. dw    429,259,205,1012,73
  764. dw    429,255,206,1017,70
  765. dw    429,250,207,1021,68
  766. dw    429,246,208,1,66
  767. dw    429,242,209,6,63
  768. dw    429,237,210,10,60
  769. dw    429,233,210,14,58
  770. dw    429,229,211,18,55
  771. dw    428,224,212,23,52
  772. dw    427,220,213,27,50
  773. dw    427,216,213,31,47
  774. dw    426,212,214,35,44
  775. dw    425,208,214,40,41
  776. dw    424,203,215,44,38
  777. dw    423,199,215,48,35
  778. dw    422,195,216,53,32
  779. dw    420,191,216,57,29
  780. dw    419,188,217,62,26
  781. dw    417,184,217,66,23
  782. dw    416,180,217,71,20
  783. dw    414,176,218,75,16
  784. dw    412,173,218,80,13
  785. dw    411,169,218,85,10
  786. dw    409,166,218,89,6
  787. dw    407,163,218,94,3
  788. dw    404,159,218,99,1023
  789. dw    402,156,218,104,1020
  790. dw    400,153,218,110,1016
  791. dw    398,150,218,115,1013
  792. dw    395,147,218,120,1009
  793. dw    393,145,218,126,1005
  794. dw    390,142,217,131,1001
  795. dw    387,139,217,137,998
  796. dw    385,137,217,143,994
  797. dw    382,135,217,149,990
  798. dw    379,132,216,155,986
  799. dw    376,130,216,161,982
  800. dw    373,128,215,167,979
  801. dw    370,127,215,174,975
  802. dw    367,125,214,180,971
  803. dw    364,123,214,187,968
  804. dw    361,122,213,193,964
  805. dw    358,121,212,200,961
  806. dw    354,119,212,206,957
  807. dw    351,118,211,213,954
  808. dw    348,117,210,220,951
  809. dw    344,117,210,226,948
  810. dw    341,116,209,233,946
  811. dw    338,116,208,240,943
  812. dw    334,115,207,246,941
  813. dw    331,115,206,253,938
  814. dw    327,115,205,260,936
  815. dw    324,115,204,266,935
  816. dw    320,115,203,272,933
  817. dw    316,116,202,279,931
  818. dw    313,116,201,285,930
  819. dw    309,117,200,291,929
  820. dw    306,118,199,297,928
  821. dw    302,119,198,302,927
  822. dw    298,120,197,308,926
  823. dw    295,121,195,313,925
  824. dw    291,122,194,319,925
  825. dw    287,124,193,324,924
  826. dw    284,125,192,329,924
  827. dw    280,127,190,334,924
  828. dw    276,129,189,339,924
  829. dw    273,131,188,343,924
  830. dw    269,133,186,348,924
  831. dw    266,135,185,352,924
  832. dw    262,138,184,356,924
  833. dw    258,140,182,360,924
  834. dw    255,143,181,364,925
  835. dw    251,146,179,368,925
  836. dw    248,149,178,372,925
  837. dw    244,152,177,376,926
  838. dw    241,155,175,379,926
  839. dw    237,158,174,383,927
  840. dw    234,161,172,386,927
  841. dw    231,165,171,389,928
  842. dw    227,168,169,392,928
  843. dw    224,172,168,396,929
  844. dw    221,176,166,399,929
  845. dw    218,179,165,402,930
  846. dw    214,183,163,404,930
  847. dw    211,187,162,407,931
  848. dw    208,191,160,410,931
  849. dw    205,196,159,413,932
  850. dw    202,200,157,415,932
  851. dw    199,204,156,418,933
  852. dw    197,208,154,421,933
  853. dw    194,213,153,423,934
  854. dw    191,217,151,426,934
  855. dw    188,222,150,428,935
  856. dw    186,226,148,431,935
  857. dw    183,231,147,433,935
  858. dw    181,236,145,435,936
  859. dw    179,240,144,438,936
  860. dw    176,245,142,440,937
  861. dw    174,250,141,443,937
  862. dw    172,255,140,445,937
  863. dw    170,260,138,447,938
  864. dw    168,264,137,450,938
  865. dw    166,269,135,452,938
  866. dw    164,274,134,454,939
  867. dw    162,279,133,457,939
  868. dw    160,284,131,459,939
  869. dw    159,289,130,461,939
  870. dw    157,293,129,464,940
  871. dw    156,298,127,466,940
  872. dw    154,303,126,469,940
  873. dw    153,308,125,472,940
  874. dw    152,312,123,474,940
  875. dw    151,317,122,477,940
  876. dw    150,322,121,480,940
  877. dw    149,326,120,483,940
  878. dw    148,331,118,485,940
  879. dw    147,335,117,489,940
  880. dw    147,339,116,492,940
  881. dw    146,344,115,495,940
  882. dw    146,348,114,498,939
  883. dw    145,352,113,502,939
  884. dw    145,356,112,506,939
  885. dw    145,360,110,510,938
  886. dw    145,364,109,514,938
  887. dw    145,368,108,518,938
  888. dw    145,372,107,523,937
  889. dw    145,375,106,528,937
  890. dw    146,379,105,533,936
  891. dw    146,382,104,539,936
  892. dw    147,386,104,545,935
  893. dw    147,389,103,551,934
  894. dw    148,392,102,558,934
  895. dw    149,395,101,565,933
  896. dw    150,398,100,573,933
  897. dw    151,400,99,581,932
  898. dw    152,403,98,590,932
  899. dw    153,405,98,600,932
  900. dw    155,407,97,610,932
  901. dw    156,410,96,621,932
  902. dw    158,411,95,632,933
  903. dw    159,413,95,644,934
  904. dw    161,415,94,657,935
  905. dw    163,416,93,670,937
  906. dw    165,418,93,683,940
  907. dw    167,419,92,696,942
  908. dw    169,420,91,709,946
  909. dw    171,421,91,721,949
  910. dw    174,422,90,734,953
  911. dw    176,422,90,746,957
  912. dw    179,422,89,757,961
  913. dw    181,423,89,768,965
  914. dw    184,423,88,778,968
  915. dw    187,422,88,788,972
  916. dw    190,422,87,796,976
  917. dw    193,422,87,805,979
  918. dw    196,421,86,812,982
  919. dw    199,420,86,819,985
  920. dw    202,419,86,826,988
  921. dw    206,418,85,832,991
  922. dw    209,416,85,838,993
  923. dw    212,415,84,843,995
  924. dw    216,413,84,848,997
  925. dw    220,411,84,852,999
  926. dw    224,409,83,857,1001
  927. dw    227,406,83,861,1002
  928. dw    231,404,83,864,1004
  929. dw    235,401,82,868,1005
  930. dw    239,398,82,871,1006
  931. dw    244,395,82,874,1007
  932. dw    248,392,82,877,1008
  933. dw    252,389,81,880,1009
  934. dw    257,385,81,882,1010
  935. dw    261,381,81,885,1010
  936. dw    266,377,80,887,1011
  937. dw    270,373,80,889,1012
  938. dw    275,369,80,891,1012
  939. dw    279,365,80,893,1013
  940. dw    284,360,80,895,1013
  941. dw    289,355,79,897,1014
  942. dw    294,350,79,898,1014
  943. dw    299,345,79,900,1014
  944. dw    304,340,79,901,1015
  945. dw    309,335,78,903,1015
  946. dw    314,329,78,904,1015
  947. dw    319,323,78,906,1015
  948. dw    324,318,78,907,1015
  949. dw    329,312,78,908,1015
  950. dw    335,305,77,909,1016
  951. dw    340,299,77,911,1016
  952. dw    345,293,77,912,1016
  953. dw    351,286,77,913,1016
  954. dw    356,280,77,914,1016
  955. dw    362,273,76,915,1016
  956. dw    367,266,76,916,1016
  957. dw    372,259,76,917,1016
  958. dw    378,252,76,917,1016
  959. dw    383,245,75,918,1016
  960. dw    389,238,75,919,1015
  961. dw    395,230,75,920,1015
  962. dw    400,223,75,921,1015
  963. dw    406,215,74,922,1015
  964. dw    411,207,74,922,1015
  965. dw    417,200,74,923,1015
  966. dw    422,192,74,924,1015
  967. dw    428,184,73,924,1015
  968. dw    434,176,73,925,1014
  969. dw    439,168,73,926,1014
  970. dw    445,160,72,926,1014
  971. dw    450,152,72,927,1014
  972. dw    456,143,72,928,1014
  973. dw    461,135,72,928,1014
  974. dw    467,127,71,929,1013
  975. dw    472,119,71,929,1013
  976. dw    478,110,71,930,1013
  977. dw    483,102,70,931,1013
  978. dw    489,93,70,931,1012
  979. dw    494,85,70,932,1012
  980. dw    499,77,69,932,1012
  981. dw    505,68,69,933,1012
  982. dw    510,60,68,933,1012
  983. dw    515,51,68,934,1011
  984. dw    521,43,68,935,1011
  985. dw    526,34,67,935,1011
  986. dw    531,26,67,936,1011
  987. dw    536,17,66,936,1010
  988. dw    541,9,66,937,1010
  989. dw    546,1,66,937,1010
  990. dw    551,-8,65,938,1010
  991. dw    556,-16,65,939,1009
  992. dw    560,-24,64,939,1009
  993. dw    565,-33,64,940,1009
  994. dw    570,-41,64,941,1009
  995. dw    574,-49,63,941,1008
  996. dw    579,-57,63,942,1008
  997. dw    583,-65,62,943,1008
  998. dw    588,-73,62,943,1008
  999. dw    592,-81,61,944,1008
  1000. dw    596,-89,61,945,1007
  1001. dw    600,-97,60,946,1007
  1002. dw    604,-104,60,946,1007
  1003. dw    608,-112,59,947,1007
  1004. dw    612,-119,59,948,1007
  1005. dw    616,-127,59,949,1006
  1006. dw    619,-134,58,950,1006
  1007. dw    623,-142,58,951,1006
  1008. dw    627,-149,57,952,1006
  1009. dw    630,-156,57,953,1006
  1010. dw    633,-163,56,955,1006
  1011. dw    636,-170,56,956,1006
  1012. dw    639,-177,56,957,1005
  1013. dw    642,-184,55,959,1005
  1014. dw    645,-190,55,960,1005
  1015. dw    648,-197,54,962,1005
  1016. dw    650,-203,54,963,1005
  1017. dw    653,-209,54,965,1005
  1018. dw    655,-216,53,967,1005
  1019. dw    657,-222,53,969,1006
  1020. dw    660,-228,52,971,1006
  1021. dw    662,-234,52,973,1006
  1022. dw    663,-239,52,976,1006
  1023. dw    665,-245,51,978,1006
  1024. dw    667,-251,51,981,1007
  1025. dw    668,-256,51,984,1007
  1026. dw    669,-261,51,987,1008
  1027. dw    671,-266,50,990,1008
  1028. dw    672,-271,50,994,1009
  1029. dw    673,-276,50,998,1010
  1030. dw    673,-281,50,1002,1010
  1031. dw    674,-286,49,1006,1011
  1032. dw    675,-291,49,1011,1012
  1033. dw    675,-295,49,1016,1014
  1034. dw    675,-299,49,1022,1015
  1035. dw    675,-304,49,3,1016
  1036. dw    675,-308,49,9,1018
  1037. dw    675,-312,49,16,1020
  1038. dw    674,-316,49,23,1022
  1039. dw    674,-319,49,30,0
  1040. dw    673,-323,49,38,2
  1041. dw    672,-327,49,45,4
  1042. dw    671,-330,49,54,7
  1043. dw    670,-333,49,62,9
  1044. dw    669,-337,49,71,12
  1045. dw    668,-340,49,79,14
  1046. dw    666,-343,49,88,17
  1047. dw    664,-346,49,97,20
  1048. dw    662,-349,49,106,22
  1049. dw    660,-351,50,114,25
  1050. dw    658,-354,50,122,27
  1051. dw    656,-357,50,130,30
  1052. dw    653,-359,51,138,32
  1053. dw    650,-361,51,146,34
  1054. dw    647,-364,51,152,36
  1055. dw    644,-366,52,159,38
  1056. dw    641,-368,52,165,40
  1057. dw    638,-370,53,171,41
  1058. dw    634,-372,53,176,43
  1059. dw    631,-374,54,181,44
  1060. dw    627,-376,54,186,46
  1061. dw    623,-378,55,190,47
  1062. dw    619,-380,56,194,48
  1063. dw    614,-381,56,198,49
  1064. dw    610,-383,57,201,50
  1065. dw    605,-385,58,204,51
  1066. dw    600,-386,59,207,51
  1067. dw    595,-388,59,210,52
  1068. dw    590,-389,60,212,53
  1069. dw    585,-391,61,214,54
  1070. dw    579,-392,62,216,54
  1071. dw    574,-394,63,217,55
  1072. dw    568,-395,64,219,55
  1073. dw    562,-396,65,220,56
  1074. dw    556,-398,66,221,56
  1075. dw    550,-399,67,222,57
  1076. dw    544,-401,68,223,57
  1077. dw    537,-402,70,224,58
  1078. dw    530,-403,71,224,58
  1079. dw    524,-405,72,225,58
  1080. dw    517,-406,73,225,59
  1081. dw    509,-407,75,226,59
  1082. dw    502,-409,76,226,59
  1083. dw    495,-410,77,226,59
  1084. dw    487,-411,79,226,60
  1085. dw    480,-413,80,226,60
  1086. dw    472,-414,82,226,60
  1087. dw    464,-416,83,226,60
  1088. dw    456,-417,85,225,60
  1089. dw    447,-419,86,225,61
  1090. dw    439,-421,88,225,61
  1091. dw    431,-422,90,224,61
  1092. dw    422,-424,91,224,61
  1093. dw    413,-426,93,223,61
  1094. dw    404,-427,95,223,61
  1095. dw    395,-429,96,222,61
  1096. dw    386,-431,98,221,61
  1097. dw    377,-433,100,221,61
  1098. dw    367,-435,102,220,61
  1099. dw    358,-437,104,219,61
  1100. dw    348,-440,106,219,61
  1101. dw    338,-442,107,218,61
  1102. dw    329,-444,109,217,61
  1103. dw    319,-447,111,216,61
  1104. dw    308,-449,113,215,61
  1105. dw    298,-452,115,214,61
  1106. dw    288,-455,117,213,61
  1107. dw    278,-457,119,213,60
  1108. dw    267,-460,121,212,60
  1109. dw    257,-463,123,211,60
  1110. dw    246,-466,125,210,60
  1111. dw    235,-469,127,209,60
  1112. dw    224,-473,130,208,59
  1113. dw    213,-476,132,207,59
  1114. dw    202,-479,134,206,59
  1115. dw    191,-483,136,205,59
  1116. dw    180,-486,138,204,58
  1117. dw    169,-490,140,203,58
  1118. dw    157,-494,142,202,58
  1119. dw    146,-498,145,201,57
  1120. dw    135,-502,147,200,57
  1121. dw    123,-506,149,199,57
  1122. dw    111,-510,151,198,56
  1123. dw    100,-515,153,197,56
  1124. dw    88,-519,155,196,56
  1125. dw    76,-524,158,195,55
  1126. dw    65,-529,160,194,55
  1127. dw    53,-533,162,193,54
  1128. dw    41,-538,164,192,54
  1129. dw    29,-543,166,191,53
  1130. dw    17,-548,168,190,53
  1131. dw    5,-553,170,189,52
  1132. dw    -7,-559,173,188,52
  1133. dw    -19,-564,175,187,51
  1134. dw    -31,-570,177,186,51
  1135. dw    -43,-575,179,185,50
  1136. dw    -56,-581,181,184,50
  1137. dw    -68,-587,183,183,49
  1138. dw    -80,-592,185,182,49
  1139. dw    -92,-598,187,181,48
  1140. dw    -104,-604,189,180,47
  1141. dw    -116,-611,191,179,47
  1142. dw    -129,-617,193,179,46
  1143. dw    -141,-623,195,178,46
  1144. dw    -153,-629,197,177,45
  1145. dw    -165,-636,199,176,44
  1146. dw    -177,-642,201,175,44
  1147. dw    -189,-649,203,174,43
  1148. dw    -202,-655,205,174,42
  1149. dw    -214,-662,206,173,42
  1150. dw    -226,-669,208,172,41
  1151. dw    -238,-676,210,171,40
  1152. dw    -250,-682,212,171,39
  1153. dw    -262,-689,213,170,39
  1154. dw    -274,-696,215,169,38
  1155. dw    -285,-703,216,169,37
  1156. dw    -297,-710,218,168,36
  1157. dw    -309,-717,220,167,36
  1158. dw    -321,-725,221,167,35
  1159. dw    -332,-732,223,166,34
  1160. dw    -344,-739,224,166,33
  1161. dw    -356,-746,225,165,32
  1162. dw    -367,-753,227,164,31
  1163. dw    -379,-760,228,164,31
  1164. dw    -390,-767,229,163,30
  1165. dw    -401,-775,230,163,29
  1166. dw    -412,-782,232,162,28
  1167. dw    -423,-789,233,162,27
  1168. dw    -434,-796,234,162,26
  1169. dw    -445,-803,235,161,25
  1170. dw    -456,-810,236,161,24
  1171. dw    -467,-818,237,160,23
  1172. dw    -478,-825,238,160,22
  1173. dw    -488,-832,239,160,21
  1174. dw    -499,-839,239,160,20
  1175. dw    -509,-846,240,159,19
  1176. dw    -519,-853,241,159,18
  1177. dw    -529,-859,242,159,17
  1178. Pout:
  1179.  
  1180. spacepart:
  1181.         PUSH    CS
  1182.     POP    DS
  1183.     PUSH    0A000H
  1184.     POP     ES
  1185.         PUSH    cs:KEP
  1186.     POP    FS
  1187.  
  1188.         mov     ax,13h
  1189.         int     10h
  1190.  
  1191.         PUSH    cs:KEP
  1192.     POP    DS
  1193.     XOR    DX,DX
  1194.         mov     ax,8
  1195.         call    loadoverlay
  1196.  
  1197.     MOV    DX,03C8h
  1198.     XOR    AL,AL
  1199.     OUT    DX,AL
  1200.     INC    DX
  1201.         MOV     SI,0
  1202. SZINKI:
  1203.     LODSB
  1204.     OUT    DX,AL
  1205.         CMP     SI,768
  1206.     JNE    SZINKI
  1207.     XOR    DX,DX
  1208.         mov     ax,7
  1209.         call    loadoverlay
  1210.         push    cs
  1211.         pop     ds
  1212.  
  1213. Vissza:
  1214.     call    Palyan
  1215.     CALL    LEKEPEZ
  1216.  
  1217.     CMP    word ptr OZ,1
  1218.     JGE    OKOZ1
  1219.     MOV    word ptr OZ,1
  1220. OKOZ1:
  1221.     MOV    AX,word ptr DIST
  1222.     DEC    AX
  1223.     CMP    word ptr OZ,AX
  1224.     JLE    OKOZ2
  1225.     MOV    word ptr OZ,AX
  1226. OKOZ2:
  1227.     ADD    WORD PTR OY,DX
  1228.     SUB    WORD PTR OX,CX
  1229.         CMP     CS:ORDERPOINTER,6
  1230.         JNE     VISSZA
  1231.         RET
  1232.  
  1233. LEKEPEZ:
  1234.                 ; Precalculations
  1235.     MOV    BX,ALFA
  1236.     SHL    BX,1
  1237.         MOVSX   EAX,COS[BX]
  1238.     MOV    KZ,EAX        ;KZ=COS(ALFA)
  1239.     PUSH    EAX
  1240.     MOV    EDX,DWORD PTR YY
  1241.     SAR    EDX,1
  1242.     IMUL    EDX
  1243.     MOV    VZ,EAX        ;VZ=YY/2*COS(ALFA)
  1244.     POP    EAX
  1245.     IMUL    D
  1246.     MOV    VY,EAX        ;VY=COS(ALFA)*D
  1247.  
  1248.     MOVSX    EAX,SIN[BX]
  1249.     MOV    KY,EAX        ;KY=SIN(ALFA)
  1250.     PUSH    EAX
  1251.     MOV    EDX,DWORD PTR YY
  1252.     SAR    EDX,1
  1253.     IMUL    EDX
  1254.     ADD    VY,EAX        ;VY=VY+YY/2*SIN(ALFA)
  1255.     POP    EAX
  1256.     NEG    EAX
  1257.     IMUL    D2
  1258.     ADD    VZ,EAX        ;VZ=VZ-SIN(ALFA)*D
  1259.  
  1260.     MOV    EAX,DWORD PTR XX
  1261.     SAR    EAX,1
  1262.     NEG    EAX
  1263.     MOV    VX,EAX        ;VX=XX/2
  1264.  
  1265.                 ; Elforgatjuk V-t a Z tengely korül, ß-val
  1266.  
  1267.         MOV     BX,BATA
  1268.     SHL    BX,1
  1269.     MOVSX    EAX,COS[BX]
  1270.         MOV     TX,EAX          ; TX=COS(BATA)
  1271.     IMUL    VX
  1272.         MOV     ECX,EAX         ; ECX=COS(BATA)*VX
  1273.     MOVSX    EAX,SIN[BX]
  1274.         MOV     TY,EAX          ; TY=SIN(BATA)
  1275.     IMUL    VY
  1276.     IDIV    TRTD
  1277.         ADD     ECX,EAX         ; ECX=COS(BATA)*VX+SIN(BATA)*VY
  1278.  
  1279.     MOVSX    EAX,COS[BX]
  1280.     IMUL    VY
  1281.     IDIV    TRTD
  1282.         MOV     EBP,EAX         ; EBP=COS(BATA)*VY
  1283.     MOVSX    EAX,SIN[BX]
  1284.     IMUL    VX
  1285.         SUB     EBP,EAX         ; EBP=COS(BATA)*VY-SIN(BATA)*VX
  1286.     MOV    VX,ECX
  1287.     MOV    VY,EBP
  1288.                 ; Elforgatjuk K-t a Z tengely körül, ß-val
  1289.     MOVSX    EAX,SIN[BX]
  1290.     IMUL    KY
  1291.     IDIV    TRTD
  1292.         MOV     KX,EAX          ; KX=SIN(BATA)*KY
  1293.     MOVSX    EAX,COS[BX]
  1294.     IMUL    KY
  1295.     IDIV    TRTD
  1296.         MOV     KY,EAX          ; KY=COS(BATA)*KY
  1297.  
  1298.     NEG    TY
  1299.  
  1300.     MOV    EAX,OZ
  1301.     SHL    EAX,16
  1302.     MOV    OZSHLX,EAX
  1303.  
  1304.     MOV    EAX,DIST
  1305.     SUB    EAX,OZ
  1306.     NEG    EAX
  1307.     SHL    EAX,16
  1308.     MOV    OZSHLX2,EAX
  1309.  
  1310.  
  1311.     MOV    SPO,(320-Xsor)/2
  1312.     MOV    CX,YY
  1313. LEK100:
  1314.     PUSH    CX
  1315.         MOV     AX,cs:KEP
  1316.     MOV    EDI,OZSHLX
  1317.     CMP    VZ,-8192*8    ; Valójában 0-t kellene ideírni
  1318.     JS    OKAY
  1319.     CMP    VZ,8192*8
  1320.     JS    OUT_RANGE    ; Soha nem ér talajt!
  1321.     MOV    EDI,OZSHLX2
  1322. OKAY:
  1323.     MOV    EAX,EDI
  1324.     CDQ
  1325.     SHLD    EDX,EAX,16
  1326.     IDIV    VZ
  1327.     MOV    VZPER,EAX
  1328.  
  1329.     IMUL    VX
  1330.     MOV    ECX,EAX
  1331.     SHRD    EAX,EDX,16
  1332.     SHR    EAX,16
  1333.     MOVZX    EBX,AL
  1334.     ADD    BL,BYTE PTR OX
  1335.  
  1336.     MOV    EAX,VZPER
  1337.     IMUL    VY
  1338.     SHRD    EAX,EDX,16
  1339.     MOV    CX,AX
  1340.     ROR    EAX,16
  1341.     MOV    CL,AL
  1342.     ADD    CL,BYTE PTR OY
  1343.     MOV    BH,CL
  1344.     XOR    AX,AX
  1345.     OR    EBX,EAX
  1346.  
  1347.     MOV    EAX,VZPER
  1348.     IMUL    TX
  1349.     MOV    EBP,EAX
  1350.     SHRD    EAX,EDX,16
  1351.     MOV    ESI,EAX
  1352.  
  1353.     MOV    EAX,VZPER
  1354.     IMUL    TY
  1355.     SHRD    EAX,EDX,16
  1356.     MOV    SI,AX
  1357.     ROR    ESI,16
  1358.     SHR    EAX,16
  1359.     MOV    BP,AX
  1360.  
  1361.     AND    SI,255
  1362.     AND    BP,255
  1363.  
  1364.     MOV    DI,SPO
  1365.  
  1366.     PUSH    DS
  1367.         MOV     AX,cs:KEP
  1368.     MOV    DS,AX
  1369.  
  1370.     PUSH    ESI
  1371.     SHL    ESI,1
  1372.     POP    ESI
  1373. rept    Xsor/2
  1374.     ADC    ECX,EBP        ; ECX=BH+DIFY SHL 16
  1375.     MOV    AL,[BX]
  1376.     ADC    EBX,ESI
  1377.     MOV    BH,CL
  1378.  
  1379.     ADC    ECX,EBP
  1380.     MOV    AH,[BX]
  1381.     ADC    EBX,ESI
  1382.     MOV    BH,CL
  1383.     STOSW
  1384. endm
  1385.     POP    DS
  1386.     JMP    SHORT NOVEL
  1387. OUT_RANGE:
  1388.     XOR    EAX,EAX        ; Az ures sorokat feltoltjuk 
  1389.     MOV    DI,SPO
  1390.     MOV    CX,80
  1391.         REP     STOSD
  1392. NOVEL:
  1393.     MOV    EAX,KX
  1394.     SUB    VX,EAX
  1395.     MOV    EAX,KY
  1396.     SUB    VY,EAX
  1397.     MOV    EAX,KZ
  1398.     SUB    VZ,EAX
  1399.     POP    CX
  1400.     ADD    SPO,320
  1401.     DEC    CX
  1402.     JNZ    LEK100
  1403.     RET
  1404.  
  1405. Palyan    Proc
  1406.     mov    si,Lepes
  1407.     lodsw
  1408.     movzx    eax,ax
  1409.     mov    OX,eax
  1410.     lodsw
  1411.     movzx    eax,ax
  1412.     mov    OY,eax
  1413.     lodsw
  1414.     movzx    eax,ax
  1415.     mov    OZ,eax
  1416.     lodsw
  1417.         mov     Bata,ax
  1418.     lodsw
  1419.     mov    Alfa,ax
  1420.     cmp    si,offset Pout
  1421.     je    zur
  1422.     jb    okLepes
  1423. zur:
  1424.     mov    si,offset Palya
  1425. okLepes:
  1426.     mov    Lepes,si
  1427.     ret
  1428. Palyan    EndP
  1429.