API tools faq
paste
dantarion

AIDumpV2 Progress!!

dantarion
Feb 24th, 2011
163
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 79.80 KB | None | 0 0
raw download clone embed print report
  1. 1060
  2. ------------------------------
  3. global-00 = 8.000
  4. global-01 = 0.000
  5. global-02 = 4.000
  6. global-03 = 10.000
  7. global-04 = 30.000
  8. global-05 = -5.000
  9. global-06 = 3.000
  10. global-07 = 2.000
  11. global-08 = -1.000
  12. global-09 = 0.500
  13. global-0A = 1.000
  14. global-0B = 0.000
  15. global-0C = 0.000
  16. global-0D = 0.000
  17. Set Var(01)(0x0000, 0x2000)
  18. Set Var(01)(0x0001, 0x2001)
  19. ???(02)(0x0002, 0x1009)
  20. ???(2A)(0x6016)
  21. Set Var(01)(0x0004, 0x2002)
  22. Mul(0E)(0x0004, 0x100E)
  23. Add(0C)(0x0004, 0x2003)
  24. if(06)(0x1011, 0x6036)
  25. {
  26.     Set Var(01)(0x0005, 0x2004)
  27.     Mul(0E)(0x0005, 0x100E)
  28.     Add(0C)(0x0004, 0x0005)
  29. }
  30.  
  31. LoopStart?(03)()
  32. if(06)(0x0001) OrNot(17)(0x101B)
  33. {
  34.     Return(00)()
  35. }
  36. Set Var(01)(0x0005, 0x100C)
  37. Add(0C)(0x0005, 0x2005)
  38. if(06)(0x1008, 0x0005, 0x100B)
  39. {
  40.     Return(00)()
  41. }
  42. Set Var(01)(0x0005, 0x1002)
  43. Mul(0E)(0x0005, 0x1003)
  44. if(06)(0x1008, 0x0005, 0x2001)
  45. {
  46.     Set Var(01)(0x0001, 0x2006)
  47. }
  48. else
  49. {
  50.     if(06)(0x1000, 0x2007)
  51.     {
  52.         Set Var(01)(0x0005, 0x0000)
  53.         Add(0C)(0x0005, 0x2008)
  54.         if(06)(0x1007, 0x0001, 0x0005)
  55.         {
  56.             Set Var(01)(0x0001, 0x0005)
  57.         }
  58.         else
  59.         {
  60.             if(06)(0x1007, 0x0001, 0x2001)
  61.             {
  62.                 Add(0C)(0x0001, 0x2008)
  63.             }
  64.             ???(2E)(0x0002, 0x0003, 0x2009)
  65.             Sub(0D)(0x0003, 0x1027)
  66.             if(06)(0x1008, 0x0003, 0x0004)
  67.             {
  68.                 Call AI(1B)()
  69.             }
  70.         }
  71.         else
  72.         {
  73.             Add(0C)(0x0001, 0x200A)
  74.         }
  75.         if(06)(0x1009, 0x0001, 0x0000)
  76.         {
  77.             Set Var(01)(0x0007, 0x200A)
  78.         }
  79.         else
  80.         {
  81.             Set Var(01)(0x0005, 0x0001)
  82.             Div(0F)(0x0005, 0x0000)
  83.             Set Var(01)(0x0007, 0x0005)
  84.         }
  85.         Mul(0E)(0x0007, 0x1003)
  86.         ???(1F)(0x0007)
  87.         RestartLoop?(04)()
  88.         RestartLoop?(04)()
  89.  
  90. 10D0
  91. ------------------------------
  92. global-00 = 10.000
  93. ???(22)(0x2000)
  94.  
  95. LoopStart?(03)()
  96. if(06)(0x1003)
  97. {
  98.     Call AI(1B)(0x6017)
  99.     Return(00)()
  100. }
  101. RestartLoop?(04)()
  102. RestartLoop?(04)()
  103.  
  104. 1090
  105. ------------------------------
  106. global-00 = 3.000
  107. global-01 = 22.000
  108. global-02 = 10.000
  109. global-03 = 120.000
  110. global-04 = 0.000
  111. global-05 = 0.000
  112. Set Var(01)(0x0000, 0x2000)
  113. ???(2A)(0x6019)
  114. ???(2F)(0x0001, 0x2001)
  115. if!(07)(0x1000, 0x0001)
  116. {
  117.     ???(30)()
  118. }
  119. if(06)(0x1004)
  120. {
  121.     ExitLoop?(05)(0x0000)
  122.     ???(14)()
  123. }
  124. ???(22)(0x2002)
  125.  
  126. LoopStart?(03)()
  127. if(06)(0x1004) Or(16)(0x1003)
  128. {
  129.     ???(22)(0x2003)
  130.     ExitLoop?(05)()
  131.     ???(14)()
  132. }
  133. RestartLoop?(04)()
  134.  
  135. LoopStart?(03)(0x0000)
  136. ???(1F)(0x1003)
  137. if(06)(0x1002, 0x0000) And(18)(0x1000, 0x0001)
  138. {
  139.     Call AI(1B)()
  140. }
  141. if(06)(0x0001)
  142. {
  143.     Return(00)()
  144. }
  145. RestartLoop?(04)()
  146. RestartLoop?(04)()
  147.  
  148. 1010
  149. ------------------------------
  150. global-00 = 8.000
  151. global-01 = 30.000
  152. global-02 = 10.000
  153. global-03 = 1.000
  154. global-04 = 0.700
  155. global-05 = 0.000
  156. global-06 = 0.000
  157. Set Var(01)(0x0000, 0x2000)
  158. Set Var(01)(0x0001, 0x2001)
  159. ???(2A)(0x6011)
  160. ???(2F)(0x0002, 0x2002)
  161. if!(07)(0x1000, 0x0002)
  162. {
  163.     ???(30)()
  164. }
  165.  
  166. LoopStart?(03)()
  167. if(06)(0x1002, 0x0000)
  168. {
  169.     Set Var(01)(0x0003, 0x2003)
  170. }
  171. else
  172. {
  173.     Set Var(01)(0x0003, 0x2004)
  174. }
  175. Mul(0E)(0x0003, 0x1003)
  176. ???(1F)(0x0003)
  177. if(06)(0x0001)
  178. {
  179.     Return(00)()
  180. }
  181. if(06)(0x1002, 0x0001) AndNot(19)(0x1000, 0x2005, 0x1001)
  182. {
  183.     Return(00)()
  184. }
  185. if(06)(0x1000, 0x0002)
  186. {
  187.     Call AI(1B)()
  188. }
  189. RestartLoop?(04)()
  190. RestartLoop?(04)()
  191.  
  192. 1080
  193. ------------------------------
  194. global-00 = 0.000
  195. global-01 = 25.000
  196. global-02 = 18.000
  197. global-03 = 10.000
  198. global-04 = 100.000
  199. global-05 = 0.080
  200. global-06 = 20.000
  201. global-07 = 60.000
  202. global-08 = 1.000
  203. global-09 = 30.000
  204. global-0A = 0.500
  205. global-0B = 0.009
  206. global-0C = 0.100
  207. global-0D = 6.000
  208. global-0E = 0.300
  209. global-0F = 50.000
  210. global-10 = 0.010
  211. global-11 = 0.700
  212. global-12 = 0.050
  213. global-13 = 16.000
  214. global-14 = -20.000
  215. global-15 = -8.000
  216. global-16 = 12.000
  217. global-17 = -1.000
  218. global-18 = 5.000
  219. global-19 = 0.000
  220. global-1A = 0.000
  221. Set Var(01)(0x0000, 0x2000)
  222. ???(02)(0x0001, 0x1009)
  223. Set Var(01)(0x0003, 0x2001)
  224. Set Var(01)(0x0004, 0x2002)
  225. if(06)(0x101E, 0x0022)
  226. {
  227.     Add(0C)(0x0003, 0x2003)
  228.     Add(0C)(0x0004, 0x2003)
  229. }
  230. ???(15)(0x0005)
  231. Set Var(01)(0x0006, 0x2004)
  232. Sub(0D)(0x0006, 0x1011)
  233. Mul(0E)(0x0006, 0x2005)
  234. Mul(0E)(0x0005, 0x0006)
  235. Add(0C)(0x0005, 0x0006)
  236. ???(22)(0x2006)
  237.  
  238. LoopStart?(03)(0x0000)
  239. if(06)(0x100D)
  240. {
  241.     Set Var(01)(0x0000, 0x2007)
  242. }
  243. if(06)(0x1007, 0x0000, 0x2000)
  244. {
  245.     Set Goto?(1C)(0x0001)
  246. }
  247. else
  248. {
  249.     Sub(0D)(0x0000, 0x2008)
  250.     Set Var(01)(0x0007, 0x1003)
  251.     ???(1F)(0x0007)
  252. }
  253. if!(07)(0x1005)
  254. {
  255.     Return(00)()
  256. }
  257. if(06)(0x1007, 0x0005, 0x2000)
  258. {
  259.     Sub(0D)(0x0005, 0x2008)
  260. }
  261. else
  262. {
  263.     if(06)(0x1007, 0x100D, 0x2000)  And(18)(0x1008, 0x1011, 0x2009)
  264.     {
  265.         RestartLoop?(04)()
  266.     }
  267.     else
  268.     {
  269.         if(06)(0x1001, 0x0003)
  270.         {
  271.             ???(22)(0x2006)
  272.             ExitLoop?(05)()
  273.         }
  274.         else
  275.         {
  276.             ???(2E)(0x0001, 0x0002, 0x200A)
  277.             ???(2C)(0x0009, 0x0001, 0x0002)
  278.             if(06)(0x1008, 0x0009, 0x0004)
  279.             {
  280.                 ???(22)(0x2006)
  281.                 ExitLoop?(05)()
  282.             }
  283.         }
  284.         RestartLoop?(04)()
  285.  
  286.         LoopStart?(03)()
  287.         Set Var(01)(0x0006, 0x1011)
  288.         Mul(0E)(0x0006, 0x200B)
  289.         Add(0C)(0x0006, 0x200C)
  290.         ???(15)(0x000A)
  291.         if(06)(0x1007, 0x000A, 0x0006)
  292.         {
  293.             ???(15)(0x0005, 0x200D, 0x2003)
  294.             ExitLoop?(05)(0x0000)
  295.             RestartLoop?(04)()
  296.         }
  297.         ???(2E)(0x0001, 0x0002, 0x200E)
  298.         Mul(0E)(0x0001, 0x1002)
  299.         if(06)(0x1007, 0x101F, 0x200F)
  300.         {
  301.             Set Var(01)(0x000B, 0x101F)
  302.             Sub(0D)(0x000B, 0x200F)
  303.             Mul(0E)(0x000B, 0x2010)
  304.             if(06)(0x1007, 0x000B, 0x2011)
  305.             {
  306.                 Set Var(01)(0x000B, 0x2011)
  307.             }
  308.             if(06)(0x1008, 0x100E, 0x000B)
  309.             {
  310.                 ???(02)(0x000C, 0x0001)
  311.                 ???(1E)(0x000C)
  312.                 ???(1E)(0x000D)
  313.                 if(06)(0x1007, 0x000C, 0x000D)
  314.                 {
  315.                     ???(2A)(0x6027)
  316.                 }
  317.                 else
  318.                 {
  319.                     ???(2A)(0x6028)
  320.                 }
  321.                 if!(07)(0x1011, 0x0000)
  322.                 {
  323.                     if(06)(0x1011, 0x6042)
  324.                     {
  325.                         if(06)(0x1007, 0x0001, 0x2000)
  326.                         {
  327.                             Call AI(1B)()
  328.                         }
  329.                     }
  330.                     else
  331.                     {
  332.                         if(06)(0x1011, 0x6043)
  333.                         {
  334.                             if(06)(0x1008, 0x0001, 0x2000)
  335.                             {
  336.                                 Call AI(1B)()
  337.                             }
  338.                         }
  339.                         else
  340.                         {
  341.                             if(06)(0x1011, 0x6044)                          Or(16)(0x1011, 0x6048)
  342.                             {
  343.                                 if(06)(0x1007, 0x0002, 0x2000)
  344.                                 {
  345.                                     Call AI(1B)()
  346.                                 }
  347.                             }
  348.                             else
  349.                             {
  350.                                 if(06)(0x1011, 0x6045)                              Or(16)(0x1011, 0x6049)
  351.                                 {
  352.                                     if(06)(0x1008, 0x0002, 0x2000)
  353.                                     {
  354.                                         Call AI(1B)()
  355.                                     }
  356.                                 }
  357.                                 else
  358.                                 {
  359.                                     Call AI(1B)()
  360.                                 }
  361.                             }
  362.                         }
  363.                     }
  364.                     if(06)(0x1008, 0x0002, 0x2000)                  And(18)(0x1007, 0x100D, 0x2012)
  365.                     {
  366.                         Set Var(01)(0x0002, 0x2000)
  367.                     }
  368.                     if(06)(0x1007, 0x0002, 0x2013)
  369.                     {
  370.                         Call AI(1B)(0x6024)
  371.                     }
  372.                     else
  373.                     {
  374.                         if(06)(0x1008, 0x0002, 0x2014)
  375.                         {
  376.                             Call AI(1B)(0x6025)
  377.                         }
  378.                         else
  379.                         {
  380.                             if(06)(0x1008, 0x0001, 0x2015)
  381.                             {
  382.                                 Call AI(1B)(0x6023)
  383.                             }
  384.                             else
  385.                             {
  386.                                 if(06)(0x1007, 0x0001, 0x2016)
  387.                                 {
  388.                                     Call AI(1B)(0x6022)
  389.                                 }
  390.                                 else
  391.                                 {
  392.                                     Call AI(1B)(0x6021)
  393.                                 }
  394.                                 Return(00)()
  395.                                 RestartLoop?(04)()
  396.  
  397.                                 LoopStart?(03)(0x0001)
  398.                                 ???(1D)(0x000E)
  399.                                 Set Var(01)(0x0010, 0x000E)
  400.                                 Sub(0D)(0x0010, 0x1004)
  401.                                 Set Var(01)(0x0007, 0x1002)
  402.                                 if(06)(0x1008, 0x0010, 0x2000)
  403.                                 {
  404.                                     Mul(0E)(0x0007, 0x2017)
  405.                                 }
  406.                                 ???(1E)(0x0010)
  407.                                 if(06)(0x1007, 0x0010, 0x2018)
  408.                                 {
  409.                                     Sub(0D)(0x0010, 0x2018)
  410.                                     Div(0F)(0x0010, 0x2018)
  411.                                     if(06)(0x1007, 0x0010, 0x2008)
  412.                                     {
  413.                                         Set Var(01)(0x0010, 0x2008)
  414.                                     }
  415.                                     Mul(0E)(0x0010, 0x0007)
  416.                                     Stick(0A)(0x0010)
  417.                                 }
  418.                                 RestartLoop?(04)()
  419.                                 RestartLoop?(04)()
  420.  
  421. 10A0
  422. ------------------------------
  423. global-00 = 36.000
  424. global-01 = 55.000
  425. global-02 = 22.000
  426. global-03 = 10.000
  427. global-04 = 30.000
  428. global-05 = 80.000
  429. global-06 = 40.000
  430. global-07 = 600.000
  431. global-08 = 0.010
  432. global-09 = 10.000
  433. global-0A = 0.500
  434. global-0B = 40.000
  435. global-0C = 15.000
  436. global-0D = 0.000
  437. global-0E = 50.000
  438. global-0F = 0.006
  439. global-10 = 30.000
  440. global-11 = 3.000
  441. global-12 = -0.500
  442. global-13 = 9999.000
  443. global-14 = 1.000
  444. global-15 = 2.500
  445. global-16 = 35.000
  446. global-17 = -0.750
  447. global-18 = 20.000
  448. global-19 = 60.000
  449. global-1A = 0.100
  450. global-1B = 0.600
  451. global-1C = 45.000
  452. global-1D = 25.000
  453. global-1E = 2.000
  454. global-1F = -1.000
  455. global-20 = 6.000
  456. global-21 = 0.000
  457. global-22 = 0.000
  458. global-23 = 0.000
  459. Set Var(01)(0x0000, 0x2000)
  460. Set Var(01)(0x0001, 0x2001)
  461. Set Var(01)(0x0002, 0x2002)
  462. Set Var(01)(0x0003, 0x2003)
  463. Set Var(01)(0x0004, 0x2004)
  464. Set Var(01)(0x0005, 0x2005)
  465. Set Var(01)(0x0006, 0x2006)
  466. ???(22)(0x2007)
  467.  
  468. LoopStart?(03)()
  469. if(06)(0x1007, 0x1006, 0x0006) AndNot(19)(0x1005)
  470. {
  471.     Set Var(01)(0x0007, 0x1011)
  472.     Mul(0E)(0x0007, 0x2008)
  473.     if(06)(0x1008, 0x100E, 0x0007)
  474.     {
  475.         ???(22)(0x2009)
  476.         ExitLoop?(05)(0x0000)
  477.         if(06)(0x1004)
  478.         {
  479.             ???(14)()
  480.         }
  481.         RestartLoop?(04)()
  482.     }
  483. }
  484. ExitLoop?(05)(0x0001)
  485. ???(14)()
  486. RestartLoop?(04)()
  487.  
  488. LoopStart?(03)(0x0000)
  489. if(06)(0x1003) Or(16)(0x1004)
  490. {
  491.     ???(22)(0x2007)
  492.     ExitLoop?(05)()
  493.     ???(14)()
  494. }
  495. RestartLoop?(04)()
  496.  
  497. LoopStart?(03)(0x0001)
  498. if!(07)(0x0001)
  499. {
  500.     Return(00)()
  501. }
  502. if(06)(0x100D)
  503. {
  504.     if(06)(0x1007, 0x100F, 0x200A)
  505.     {
  506.         Call AI(1B)(0x2010)
  507.     }
  508.     else
  509.     {
  510.         Call AI(1B)(0x2040)
  511.     }
  512. }
  513. if(06)(0x1004)
  514. {
  515.     Set Var(01)(0x0008, 0x200B)
  516. }
  517. else
  518. {
  519.     Set Var(01)(0x0008, 0x200C)
  520. }
  521. Set Var(01)(0x0009, 0x1002)
  522. Mul(0E)(0x0009, 0x1003)
  523. if(06)(0x1008, 0x0009, 0x200D)
  524. {
  525.     Set Var(01)(0x0007, 0x1003)
  526.     Mul(0E)(0x0007, 0x200A)
  527.     ???(1F)(0x0007)
  528.     RestartLoop?(04)()
  529. }
  530. else
  531. {
  532.     if(06)(0x1007, 0x1006, 0x0008)
  533.     {
  534.         if(06)(0x1007, 0x1006, 0x200B)
  535.         {
  536.             ???(1F)(0x1003)
  537.         }
  538.         else
  539.         {
  540.             Set Var(01)(0x0007, 0x1003)
  541.             Mul(0E)(0x0007, 0x200A)
  542.             ???(1F)(0x0007)
  543.         }
  544.         RestartLoop?(04)()
  545.     }
  546.     else
  547.     {
  548.         Set Var(01)(0x0007, 0x100C)
  549.         Sub(0D)(0x0007, 0x100B)
  550.         if(06)(0x1004)      And(18)(0x1008, 0x0007, 0x200E)         And(18)(0x1007, 0x0007, 0x200D)         And(18)(0x1000, 0x0004, 0x0005)
  551.         {
  552.             Set Var(01)(0x0007, 0x200F)
  553.             Mul(0E)(0x0007, 0x1011)
  554.             if(06)(0x1008, 0x100E, 0x0007)
  555.             {
  556.                 if(06)(0x1004)
  557.                 {
  558.                     ???(1F)(0x1003)
  559.                 }
  560.                 Call AI(1B)(0x1140)
  561.                 Return(00)()
  562.             }
  563.         }
  564.         Set Var(01)(0x000A, 0x200D)
  565.         ExitLoop?(05)()
  566.     }
  567.     RestartLoop?(04)()
  568.  
  569.     LoopStart?(03)()
  570.     if!(07)(0x0001)
  571.     {
  572.         Return(00)()
  573.     }
  574.     ???(21)()
  575.     ExitLoop?(05)()
  576.     RestartLoop?(04)()
  577.  
  578.     LoopStart?(03)()
  579.     if!(07)(0x0001)
  580.     {
  581.         Return(00)()
  582.     }
  583.     if(06)(0x1001, 0x2010)
  584.     {
  585.         Call AI(1B)(0x601B)
  586.     }
  587.     if(06)(0x1003)
  588.     {
  589.         if(06)(0x1007, 0x1006, 0x2009)
  590.         {
  591.             Set Var(01)(0x0007, 0x200A)
  592.             Mul(0E)(0x0007, 0x1003)
  593.             ???(1F)(0x0007)
  594.         }
  595.         else
  596.         {
  597.             if(06)(0x1008, 0x1006, 0x2011)
  598.             {
  599.                 Set Var(01)(0x0007, 0x2012)
  600.                 Mul(0E)(0x0007, 0x1003)
  601.                 ???(1F)(0x0007)
  602.             }
  603.             else
  604.             {
  605.                 Set Var(01)(0x0007, 0x1003)
  606.                 Mul(0E)(0x0007, 0x1002)
  607.                 if(06)(0x1008, 0x0007, 0x200D)
  608.                 {
  609.                     Set Var(01)(0x0007, 0x200A)
  610.                     Mul(0E)(0x0007, 0x1003)
  611.                     ???(1F)(0x0007)
  612.                 }
  613.             }
  614.         }
  615.         Set Var(01)(0x000B, 0x1003)
  616.         Mul(0E)(0x000B, 0x200C)
  617.         Add(0C)(0x000B, 0x1004)
  618.         ???(24)(0x000C, 0x000B)
  619.         if(06)(0x1008, 0x000C, 0x200D)
  620.         {
  621.             Set Var(01)(0x000C, 0x2013)
  622.         }
  623.         if(06)(0x1008, 0x000C, 0x0000)
  624.         {
  625.             Add(0C)(0x000A, 0x2014)
  626.         }
  627.         else
  628.         {
  629.             Set Var(01)(0x000A, 0x200D)
  630.         }
  631.         if(06)(0x1007, 0x000A, 0x2015)      And(18)(0x1003)
  632.         {
  633.             ???(29)(0x000D, 0x000C)
  634.             Sub(0D)(0x000D, 0x100B)
  635.             if(06)(0x1007, 0x000D, 0x2016)
  636.             {
  637.                 Stick(0A)(0x2017)
  638.                 ExitLoop?(05)(0x0002)
  639.             }
  640.             else
  641.             {
  642.                 if(06)(0x1007, 0x000D, 0x2009)
  643.                 {
  644.                     ExitLoop?(05)(0x0003)
  645.                 }
  646.                 else
  647.                 {
  648.                     if(06)(0x1007, 0x000D, 0x200D)
  649.                     {
  650.                         ExitLoop?(05)(0x0004)
  651.                     }
  652.                     else
  653.                     {
  654.                         Set Var(01)(0x0007, 0x1016)
  655.                         ???(1E)(0x0007)
  656.                         if(06)(0x1008, 0x0007, 0x200A)                      Or(16)(0x1007, 0x1010, 0x2018)
  657.                         {
  658.                             ExitLoop?(05)(0x0004)
  659.                         }
  660.                         else
  661.                         {
  662.                             if(06)(0x1008, 0x1011, 0x2019)
  663.                             {
  664.                                 Call AI(1B)(0x1050)
  665.                             }
  666.                             else
  667.                             {
  668.                                 if(06)(0x1018)                              And(18)(0x1008, 0x100E, 0x201A)
  669.                                 {
  670.                                     ???(22)(0x2010)
  671.                                     ???(1F)(0x1003)
  672.                                     ExitLoop?(05)(0x0005)
  673.                                 }
  674.                                 else
  675.                                 {
  676.                                     ExitLoop?(05)(0x0004)
  677.                                 }
  678.                             }
  679.                         }
  680.                         RestartLoop?(04)()
  681.  
  682.                         LoopStart?(03)(0x0002)
  683.                         Stick(0A)(0x200D, 0x2014)
  684.                         if(06)(0x1002, 0x2009)
  685.                         {
  686.                             ExitLoop?(05)()
  687.                         }
  688.                         RestartLoop?(04)()
  689.  
  690.                         LoopStart?(03)()
  691.                         if!(07)(0x1005)                         Or(16)(0x1008, 0x100F, 0x200A)
  692.                         {
  693.                             Return(00)()
  694.                         }
  695.                         if(06)(0x1001, 0x2016)
  696.                         {
  697.                             Call AI(1B)(0x1080)
  698.                             Return(00)()
  699.                         }
  700.                         if!(07)(0x1002, 0x2011)
  701.                         {
  702.                             Stick(0A)(0x200D, 0x2014)
  703.                         }
  704.                         if(06)(0x1008, 0x100D, 0x200D)
  705.                         {
  706.                             Set Var(01)(0x000E, 0x100C)
  707.                             Sub(0D)(0x000E, 0x100B)
  708.                             if(06)(0x1007, 0x000E, 0x2009)
  709.                             {
  710.                                 ???(1A)(0x200D)
  711.                             }
  712.                         }
  713.                         RestartLoop?(04)()
  714.  
  715.                         LoopStart?(03)(0x0003)
  716.                         if!(07)(0x0001)
  717.                         {
  718.                             Return(00)()
  719.                         }
  720.                         if(06)(0x1000, 0x0001)
  721.                         {
  722.                             Call AI(1B)(0x1140)
  723.                             Return(00)()
  724.                         }
  725.                         RestartLoop?(04)()
  726.  
  727.                         LoopStart?(03)(0x0004)
  728.                         ???(2A)(0x601B)
  729.                         ???(2F)(0x000F, 0x0002)
  730.                         Set Var(01)(0x0007, 0x0003)
  731.                         Mul(0E)(0x0007, 0x100E)
  732.                         Add(0C)(0x000F, 0x0007)
  733.                         ExitLoop?(05)()
  734.                         ???(14)()
  735.                         RestartLoop?(04)()
  736.  
  737.                         LoopStart?(03)()
  738.                         if!(07)(0x0001)
  739.                         {
  740.                             Return(00)()
  741.                         }
  742.                         Set Var(01)(0x0009, 0x1002)
  743.                         Mul(0E)(0x0009, 0x1003)
  744.                         if(06)(0x1008, 0x0009, 0x200D)
  745.                         {
  746.                             Set Var(01)(0x0009, 0x1003)
  747.                             Mul(0E)(0x0009, 0x201B)
  748.                             ???(1F)(0x0009)
  749.                             RestartLoop?(04)()
  750.                         }
  751.                         if(06)(0x1000, 0x000F)
  752.                         {
  753.                             Set Var(01)(0x0007, 0x100C)
  754.                             Sub(0D)(0x0007, 0x101B)
  755.                             if(06)(0x1007, 0x0007, 0x201C)
  756.                             {
  757.                                 Call AI(1B)(0x0054)
  758.                             }
  759.                             else
  760.                             {
  761.                                 if(06)(0x1007, 0x0007, 0x201D)
  762.                                 {
  763.                                     Call AI(1B)(0x6016)
  764.                                 }
  765.                                 else
  766.                                 {
  767.                                     Call AI(1B)()
  768.                                 }
  769.                             }
  770.                             RestartLoop?(04)()
  771.  
  772.                             LoopStart?(03)(0x0005)
  773.                             if!(07)(0x0001)                             Or(16)(0x1002, 0x200E)
  774.                             {
  775.                                 Return(00)()
  776.                             }
  777.                             Stick(0A)(0x2014)
  778.                             if(06)(0x1005)
  779.                             {
  780.                                 ExitLoop?(05)()
  781.                             }
  782.                             RestartLoop?(04)()
  783.  
  784.                             LoopStart?(03)()
  785.                             if!(07)(0x0001)
  786.                             {
  787.                                 Return(00)()
  788.                             }
  789.                             if(06)(0x1002, 0x201E)
  790.                             {
  791.                                 Stick(0A)(0x201F)
  792.                                 if(06)(0x1002, 0x2020)
  793.                                 {
  794.                                     Return(00)()
  795.                                 }
  796.                             }
  797.                             else
  798.                             {
  799.                                 ???(1F)(0x1003)
  800.                             }
  801.                             RestartLoop?(04)()
  802.                             RestartLoop?(04)()
  803.  
  804. 1040
  805. ------------------------------
  806. global-00 = 8.000
  807. global-01 = 45.000
  808. global-02 = -1.000
  809. global-03 = 1.000
  810. global-04 = 30.000
  811. global-05 = 20.000
  812. global-06 = 0.000
  813. global-07 = 0.800
  814. global-08 = 0.500
  815. global-09 = 0.200
  816. global-0A = 10.000
  817. global-0B = 25.000
  818. global-0C = 0.080
  819. global-0D = 0.010
  820. global-0E = -0.010
  821. global-0F = -20.000
  822. global-10 = 0.600
  823. global-11 = 0.000
  824. global-12 = 0.000
  825. global-13 = 0.000
  826. Set Var(01)(0x0000, 0x2000)
  827. if(06)(0x1007, 0x1011, 0x2001)
  828. {
  829.     Set Var(01)(0x0001, 0x2002)
  830. }
  831. else
  832. {
  833.     Set Var(01)(0x0001, 0x2003)
  834. }
  835. ???(2A)(0x6012)
  836. ???(2F)(0x0002, 0x2004)
  837. Set Var(01)(0x0003, 0x2005)
  838. Mul(0E)(0x0003, 0x100E)
  839. Add(0C)(0x0002, 0x0003)
  840. Set Var(01)(0x0004, 0x2006)
  841. if(06)(0x1008, 0x100E, 0x2007)
  842. {
  843.     Set Var(01)(0x0005, 0x2008)
  844.     Mul(0E)(0x0005, 0x100E)
  845.     if(06)(0x1008, 0x0005, 0x2009)
  846.     {
  847.         Set Var(01)(0x0005, 0x2006)
  848.     }
  849. }
  850. else
  851. {
  852.     Set Var(01)(0x0005, 0x2006)
  853. }
  854. if!(07)(0x1000, 0x0002)
  855. {
  856.     ???(30)()
  857. }
  858. ???(15)(0x0006, 0x200A, 0x200B, 0x2006, 0x2006)
  859.  
  860. LoopStart?(03)()
  861. Set Var(01)(0x0003, 0x1002)
  862. Mul(0E)(0x0003, 0x1003)
  863. if(06)(0x1008, 0x0003, 0x2006)
  864. {
  865.     Set Var(01)(0x0004, 0x2008)
  866.     Mul(0E)(0x0004, 0x1003)
  867.     ???(1F)(0x0004)
  868. }
  869. else
  870. {
  871.     Set Var(01)(0x0003, 0x0004)
  872.     ???(1E)(0x0003)
  873.     if(06)(0x1007, 0x0003, 0x0005)
  874.     {
  875.         Sub(0D)(0x0003, 0x200C)
  876.         if(06)(0x1008, 0x0003, 0x0005)
  877.         {
  878.             Set Var(01)(0x0003, 0x0005)
  879.         }
  880.     }
  881.     else
  882.     {
  883.         Add(0C)(0x0003, 0x200C)
  884.         if(06)(0x1007, 0x0003, 0x0005)
  885.         {
  886.             Set Var(01)(0x0003, 0x0005)
  887.         }
  888.     }
  889.     if(06)(0x1008, 0x0004, 0x200D)  And(18)(0x1007, 0x0004, 0x200E)
  890.     {
  891.         Set Var(01)(0x0004, 0x1003)
  892.     }
  893.     if(06)(0x1007, 0x0004, 0x2006)
  894.     {
  895.         Set Var(01)(0x0004, 0x0003)
  896.     }
  897.     else
  898.     {
  899.         Set Var(01)(0x0004, 0x0003)
  900.         Mul(0E)(0x0004, 0x2002)
  901.     }
  902.     ???(1F)(0x0004)
  903.     if(06)(0x1008, 0x0001, 0x2006)
  904.     {
  905.         Set Var(01)(0x0003, 0x0002)
  906.         Add(0C)(0x0003, 0x200F)
  907.         if(06)(0x1000, 0x0003)
  908.         {
  909.             Set Var(01)(0x0003, 0x100E)
  910.             if(06)(0x1008, 0x0003, 0x2009)
  911.             {
  912.                 Set Var(01)(0x0001, 0x2003)
  913.                 RestartLoop?(04)()
  914.             }
  915.             else
  916.             {
  917.                 if(06)(0x1008, 0x0003, 0x2010)
  918.                 {
  919.                     Call AI(1B)(0x3020)
  920.                 }
  921.                 else
  922.                 {
  923.                     Call AI(1B)(0x30B0)
  924.                 }
  925.                 Return(00)()
  926.             }
  927.         }
  928.     }
  929.     if(06)(0x0001)  OrNot(17)(0x1000, 0x1000)   Or(16)(0x1002, 0x0006)
  930.     {
  931.         Return(00)()
  932.     }
  933.     if(06)(0x1000, 0x0002)
  934.     {
  935.         Call AI(1B)()
  936.     }
  937.     RestartLoop?(04)()
  938.     RestartLoop?(04)()
  939.  
  940. 1050
  941. ------------------------------
  942. global-00 = 10.000
  943. global-01 = 120.000
  944. global-02 = 0.000
  945. global-03 = -0.500
  946. global-04 = 0.000
  947. global-05 = 0.000
  948. global-06 = 0.000
  949. ???(22)(0x2000)
  950. ???(21)()
  951. ???(22)(0x2001)
  952.  
  953. LoopStart?(03)()
  954. Set Var(01)(0x0000, 0x1002)
  955. Mul(0E)(0x0000, 0x1003)
  956. if(06)(0x1008, 0x0000, 0x2002)
  957. {
  958.     Stick(0A)(0x2003)
  959. }
  960. else
  961. {
  962.     Call AI(1B)(0x6013)
  963.     Return(00)()
  964. }
  965. RestartLoop?(04)()
  966. RestartLoop?(04)()
  967.  
  968. 1020
  969. ------------------------------
  970. global-00 = 8.000
  971. global-01 = 30.000
  972. global-02 = 25.000
  973. global-03 = 1.000
  974. global-04 = 0.700
  975. global-05 = 0.000
  976. global-06 = 0.000
  977. Set Var(01)(0x0000, 0x2000)
  978. Set Var(01)(0x0001, 0x2001)
  979. ???(2A)(0x6014)
  980. ???(2F)(0x0002, 0x2002)
  981. if!(07)(0x1000, 0x0002)
  982. {
  983.     ???(30)()
  984. }
  985.  
  986. LoopStart?(03)()
  987. if(06)(0x1002, 0x0000)
  988. {
  989.     Set Var(01)(0x0003, 0x2003)
  990. }
  991. else
  992. {
  993.     Set Var(01)(0x0003, 0x2004)
  994. }
  995. Mul(0E)(0x0003, 0x1003)
  996. ???(1F)(0x0003)
  997. if(06)(0x0001)
  998. {
  999.     Return(00)()
  1000. }
  1001. if(06)(0x1002, 0x0001) AndNot(19)(0x1000, 0x2005, 0x1001)
  1002. {
  1003.     Return(00)()
  1004. }
  1005. if(06)(0x1000, 0x0002)
  1006. {
  1007.     Call AI(1B)()
  1008. }
  1009. RestartLoop?(04)()
  1010. RestartLoop?(04)()
  1011.  
  1012. 1030
  1013. ------------------------------
  1014. global-00 = 10.000
  1015. global-01 = 30.000
  1016. global-02 = 15.000
  1017. global-03 = 0.800
  1018. global-04 = 0.750
  1019. global-05 = 1.000
  1020. global-06 = 0.000
  1021. global-07 = 0.000
  1022. global-08 = 0.000
  1023. Set Var(01)(0x0000, 0x2000)
  1024. Set Var(01)(0x0001, 0x2001)
  1025. ???(2A)(0x6015)
  1026. ???(2F)(0x0002, 0x2002)
  1027. if!(07)(0x1000, 0x0002)
  1028. {
  1029.     ???(30)()
  1030. }
  1031.  
  1032. LoopStart?(03)()
  1033. Set Var(01)(0x0003, 0x2003)
  1034. if!(07)(0x1002, 0x0000)
  1035. {
  1036.     Mul(0E)(0x0003, 0x1007)
  1037.     Div(0F)(0x0003, 0x0000)
  1038.     Set Var(01)(0x0004, 0x2004)
  1039. }
  1040. else
  1041. {
  1042.     Set Var(01)(0x0004, 0x2005)
  1043. }
  1044. Mul(0E)(0x0004, 0x1003)
  1045. ???(1F)(0x0004, 0x0003)
  1046. if(06)(0x0001)
  1047. {
  1048.     Return(00)()
  1049. }
  1050. if(06)(0x1002, 0x0001) AndNot(19)(0x1000, 0x2006, 0x1001)
  1051. {
  1052.     Return(00)()
  1053. }
  1054. if(06)(0x1000, 0x0002)
  1055. {
  1056.     Call AI(1B)()
  1057. }
  1058. RestartLoop?(04)()
  1059. RestartLoop?(04)()
  1060.  
  1061. 1120
  1062. ------------------------------
  1063. global-00 = 0.000
  1064. global-01 = 0.300
  1065. global-02 = 160.000
  1066. global-03 = 0.009
  1067. global-04 = 1.000
  1068. global-05 = 100.000
  1069. global-06 = 0.600
  1070. global-07 = 50.000
  1071. global-08 = 0.400
  1072. global-09 = 30.000
  1073. global-0A = 0.030
  1074. global-0B = 8.000
  1075. global-0C = 0.200
  1076. global-0D = 90.000
  1077. global-0E = 0.007
  1078. global-0F = 150.000
  1079. global-10 = 120.000
  1080. global-11 = -200.000
  1081. global-12 = 0.500
  1082. global-13 = 0.700
  1083. global-14 = 200.000
  1084. global-15 = 130.000
  1085. global-16 = 45.000
  1086. global-17 = 0.800
  1087. global-18 = 0.320
  1088. global-19 = -1.000
  1089. global-1A = 110.000
  1090. global-1B = -0.200
  1091. global-1C = -0.100
  1092. global-1D = 0.000
  1093. global-1E = 0.000
  1094. global-1F = 0.000
  1095. ???(22)(0x2000)
  1096. Set Var(01)(0x0000, 0x2000)
  1097. Set Goto?(1C)(0x0000)
  1098. ???(15)(0x0001)
  1099. Sub(0D)(0x0001, 0x2001)
  1100. Set Var(01)(0x0002, 0x1011)
  1101. Sub(0D)(0x0002, 0x2002)
  1102. Mul(0E)(0x0001, 0x0002, 0x2003)
  1103. Add(0C)(0x0001, 0x2004)
  1104. Set Var(01)(0x0002, 0x101F)
  1105. if(06)(0x1007, 0x0002, 0x2005)
  1106. {
  1107.     Sub(0D)(0x0002, 0x2005)
  1108.     Mul(0E)(0x0002, 0x2006)
  1109.     Add(0C)(0x0002, 0x2005)
  1110. }
  1111. else
  1112. {
  1113.     if(06)(0x1008, 0x0002, 0x2007)
  1114.     {
  1115.         Mul(0E)(0x0002, 0x2008)
  1116.         Add(0C)(0x0002, 0x2009)
  1117.     }
  1118.     Mul(0E)(0x0002, 0x200A)
  1119.     if(06)(0x1007, 0x0002, 0x200B)
  1120.     {
  1121.         Set Var(01)(0x0002, 0x200B)
  1122.     }
  1123.     Mul(0E)(0x0001, 0x0002)
  1124.     Sub(0D)(0x0001, 0x200C)
  1125.  
  1126.     LoopStart?(03)(0x0001)
  1127.     if(06)(0x1014)
  1128.     {
  1129.         Sub(0D)(0x0000, 0x2004)
  1130.         if(06)(0x100A, 0x0000, 0x2000)
  1131.         {
  1132.             Set Goto?(1C)(0x0000)
  1133.             if(06)(0x1016, 0x2009)
  1134.             {
  1135.                 Set Var(01)(0x0001, 0x2000)
  1136.             }
  1137.             else
  1138.             {
  1139.                 Sub(0D)(0x0001, 0x2004)
  1140.             }
  1141.             if(06)(0x1007, 0x0001, 0x2000)
  1142.             {
  1143.                 ExitLoop?(05)(0x0002)
  1144.             }
  1145.             else
  1146.             {
  1147.                 ???(15)(0x0001)
  1148.                 ExitLoop?(05)(0x0003)
  1149.             }
  1150.         }
  1151.     }
  1152.     RestartLoop?(04)()
  1153.  
  1154.     LoopStart?(03)(0x0002)
  1155.     Button(0B)(0x0001)
  1156.     ExitLoop?(05)(0x0001)
  1157.     RestartLoop?(04)()
  1158.  
  1159.     LoopStart?(03)(0x0003)
  1160.     if(06)(0x1007, 0x101F, 0x200D)
  1161.     {
  1162.         Set Var(01)(0x0002, 0x1011)
  1163.         Mul(0E)(0x0002, 0x200E)
  1164.         if(06)(0x1008, 0x100E, 0x0002)
  1165.         {
  1166.             Set Var(01)(0x0002, 0x102B)
  1167.             Sub(0D)(0x0002, 0x100B)
  1168.             if(06)(0x1008, 0x0002, 0x200F)          And(18)(0x1007, 0x101F, 0x2010)
  1169.             {
  1170.                 Set Var(01)(0x0001, 0x2004)
  1171.             }
  1172.             else
  1173.             {
  1174.                 Set Var(01)(0x0002, 0x102C)
  1175.                 Sub(0D)(0x0002, 0x1004)
  1176.                 if(06)(0x1007, 0x0002, 0x2011)
  1177.                 {
  1178.                     if(06)(0x1007, 0x1002, 0x2000)
  1179.                     {
  1180.                         Set Var(01)(0x0001, 0x2012)
  1181.                     }
  1182.                     else
  1183.                     {
  1184.                         Set Var(01)(0x0001, 0x2013)
  1185.                     }
  1186.                 }
  1187.                 else
  1188.                 {
  1189.                     Set Var(01)(0x0002, 0x102D)
  1190.                     Sub(0D)(0x0002, 0x1004)
  1191.                     if(06)(0x1008, 0x0002, 0x2014)
  1192.                     {
  1193.                         if(06)(0x1007, 0x1002, 0x2000)
  1194.                         {
  1195.                             Set Var(01)(0x0001, 0x2013)
  1196.                         }
  1197.                         else
  1198.                         {
  1199.                             Set Var(01)(0x0001, 0x2012)
  1200.                         }
  1201.                     }
  1202.                     else                        if!(07)(0x100B)                         And(18)(0x1007, 0x101F, 0x2015)
  1203.                         {
  1204.                             if(06)(0x1008, 0x1010, 0x1029)
  1205.                             {
  1206.                                 Set Var(01)(0x0001, 0x2013)
  1207.                             }
  1208.                             else
  1209.                             {
  1210.                                 Set Var(01)(0x0001, 0x2012)
  1211.                             }
  1212.                         }
  1213.                     }
  1214.                 }
  1215.             }
  1216.             else
  1217.             {
  1218.                 if(06)(0x1008, 0x1011, 0x2016)
  1219.                 {
  1220.                     Set Var(01)(0x0002, 0x100E)
  1221.                     if(06)(0x1008, 0x0002, 0x2006)
  1222.                     {
  1223.                         if(06)(0x1008, 0x1010, 0x1029)
  1224.                         {
  1225.                             Set Var(01)(0x0001, 0x2012)
  1226.                         }
  1227.                         else
  1228.                         {
  1229.                             Set Var(01)(0x0001, 0x2013)
  1230.                         }
  1231.                     }
  1232.                     else
  1233.                     {
  1234.                         if(06)(0x1008, 0x0002, 0x2017)
  1235.                         {
  1236.                             Set Var(01)(0x0001, 0x2000)
  1237.                         }
  1238.                     }
  1239.                 }
  1240.                 if(06)(0x1008, 0x0001, 0x2018)
  1241.                 {
  1242.                     Stick(0A)(0x2000, 0x2019)
  1243.                 }
  1244.                 else
  1245.                 {
  1246.                     if(06)(0x1008, 0x0001, 0x2006)
  1247.                     {
  1248.                         Stick(0A)(0x2019)
  1249.                     }
  1250.                     else
  1251.                     {
  1252.                         if(06)(0x1008, 0x0001, 0x2017)
  1253.                         {
  1254.                             Stick(0A)(0x2004)
  1255.                         }
  1256.                         else
  1257.                         {
  1258.                             Stick(0A)(0x2000, 0x2004)
  1259.                         }
  1260.                         Return(00)()
  1261.                         RestartLoop?(04)()
  1262.  
  1263.                         LoopStart?(03)(0x0000)
  1264.                         ???(15)(0x0002)
  1265.                         Set Var(01)(0x0000, 0x1011)
  1266.                         Sub(0D)(0x0000, 0x201A)
  1267.                         Mul(0E)(0x0000, 0x201B, 0x0002)
  1268.                         Set Var(01)(0x0002, 0x1011)
  1269.                         Sub(0D)(0x0002, 0x2005)
  1270.                         Mul(0E)(0x0002, 0x201C)
  1271.                         Add(0C)(0x0000, 0x0002)
  1272.                         RestartLoop?(04)()
  1273.                         RestartLoop?(04)()
  1274.  
  1275. 1130
  1276. ------------------------------
  1277. global-00 = 0.000
  1278. global-01 = 0.000
  1279. global-02 = 0.000
  1280. RestartLoop?(04)()
  1281.  
  1282. 0060
  1283. ------------------------------
  1284. global-00 = 10.000
  1285. global-01 = 30.000
  1286. global-02 = 4.000
  1287. global-03 = 0.000
  1288. global-04 = -1.000
  1289. global-05 = 6.000
  1290. global-06 = 40.000
  1291. global-07 = 0.000
  1292.  
  1293. LoopStart?(03)()
  1294. if!(07)(0x1003)
  1295. {
  1296.     if(06)(0x1002, 0x2000)
  1297.     {
  1298.         Return(00)()
  1299.     }
  1300.     RestartLoop?(04)()
  1301. }
  1302. ???(22)(0x2001)
  1303. if!(07)(0x100B)
  1304. {
  1305.     Set Var(01)(0x0000, 0x1003)
  1306.     ExitLoop?(05)(0x0000)
  1307.     RestartLoop?(04)()
  1308. }
  1309. ExitLoop?(05)()
  1310. RestartLoop?(04)()
  1311.  
  1312. LoopStart?(03)()
  1313. if(06)(0x1002, 0x2002)
  1314. {
  1315.     ExitLoop?(05)()
  1316. }
  1317. RestartLoop?(04)()
  1318.  
  1319. LoopStart?(03)()
  1320. Stick(0A)(0x2003, 0x2004)
  1321. if(06)(0x1002, 0x2002)
  1322. {
  1323.     ExitLoop?(05)()
  1324. }
  1325. RestartLoop?(04)()
  1326.  
  1327. LoopStart?(03)()
  1328. ???(1F)(0x1003)
  1329. if(06)(0x1002, 0x2005)
  1330. {
  1331.     if(06)(0x1005)
  1332.     {
  1333.         Call AI(1B)(0x1080)
  1334.         Return(00)()
  1335.     }
  1336.     Return(00)()
  1337. }
  1338. RestartLoop?(04)()
  1339.  
  1340. LoopStart?(03)(0x0000)
  1341. if(06)(0x1002, 0x2002)
  1342. {
  1343.     ???(22)(0x2006)
  1344.     ExitLoop?(05)()
  1345. }
  1346. RestartLoop?(04)()
  1347.  
  1348. LoopStart?(03)()
  1349. ???(1F)(0x0000)
  1350. if!(07)(0x1003) AndNot(19)(0x1004)
  1351. {
  1352.     Return(00)()
  1353. }
  1354. if(06)(0x1005)
  1355. {
  1356.     Return(00)()
  1357. }
  1358. RestartLoop?(04)()
  1359. RestartLoop?(04)()
  1360.  
  1361. 0050
  1362. ------------------------------
  1363. global-00 = 25.000
  1364. global-01 = 10.000
  1365. global-02 = 20.000
  1366. global-03 = 8.000
  1367. global-04 = 1000.000
  1368. global-05 = 120.000
  1369. global-06 = 0.000
  1370. global-07 = -0.500
  1371. global-08 = 16.000
  1372. global-09 = 0.500
  1373. global-0A = 2.000
  1374. global-0B = -3.000
  1375. global-0C = 0.600
  1376. global-0D = -1.000
  1377. global-0E = 30.000
  1378. global-0F = 0.010
  1379. global-10 = 0.002
  1380. global-11 = 0.000
  1381. global-12 = 0.001
  1382. global-13 = 1.000
  1383. global-14 = 3.000
  1384. global-15 = 0.400
  1385. global-16 = -0.400
  1386. Set Var(01)(0x0000, 0x1003)
  1387. Set Var(01)(0x0001, 0x2000)
  1388. if(06)(0x101E, 0x0022)
  1389. {
  1390.     Add(0C)(0x0001, 0x2001)
  1391. }
  1392. if(06)(0x100C, 0x0051) Or(16)(0x100C, 0x0053) Or(16)(0x100C, 0x0056) Or(16)(0x100C, 0x0057)
  1393. {
  1394.     Set Var(01)(0x0002, 0x100E)
  1395.     Mul(0E)(0x0002, 0x2002)
  1396.     Add(0C)(0x0002, 0x2003)
  1397.     Set Var(01)(0x0003, 0x0002)
  1398. }
  1399. else
  1400. {
  1401.     Set Var(01)(0x0003, 0x2004)
  1402. }
  1403. if(06)(0x1005)
  1404. {
  1405.     ExitLoop?(05)(0x0000)
  1406.     ???(14)()
  1407. }
  1408. ???(22)(0x2002)
  1409.  
  1410. LoopStart?(03)()
  1411. if!(07)(0x1003) AndNot(19)(0x1004)
  1412. {
  1413.     RestartLoop?(04)()
  1414. }
  1415. ???(22)(0x2005)
  1416. if(06)(0x100C, 0x0057) Or(16)(0x100C, 0x0058)
  1417. {
  1418.     Set Var(01)(0x0002, 0x1003)
  1419.     Mul(0E)(0x0002, 0x1002)
  1420.     if(06)(0x1007, 0x0002, 0x2006)
  1421.     {
  1422.         Stick(0A)(0x2007)
  1423.         ExitLoop?(05)(0x0001)
  1424.         RestartLoop?(04)()
  1425.     }
  1426. }
  1427. ExitLoop?(05)()
  1428. ???(14)()
  1429. RestartLoop?(04)()
  1430.  
  1431. LoopStart?(03)()
  1432. if(06)(0x100C, 0x0055) Or(16)(0x100C, 0x0056)
  1433. {
  1434.     Set Var(01)(0x0004, 0x100E)
  1435.     Mul(0E)(0x0004, 0x2008)
  1436.     Add(0C)(0x0004, 0x2003)
  1437.     Set Var(01)(0x0005, 0x100E)
  1438.     Sub(0D)(0x0005, 0x2009)
  1439.     Set Var(01)(0x0006, 0x0005)
  1440.     Add(0C)(0x0006, 0x200A)
  1441.     Mul(0E)(0x0000, 0x200B)
  1442.     ExitLoop?(05)(0x0002)
  1443. }
  1444. else
  1445. {
  1446.     if(06)(0x100C, 0x0057)  Or(16)(0x100C, 0x0058)
  1447.     {
  1448.         Mul(0E)(0x0000, 0x200B)
  1449.         ExitLoop?(05)(0x0002)
  1450.     }
  1451.     else
  1452.     {
  1453.         Set Var(01)(0x0002, 0x1003)
  1454.         Mul(0E)(0x0002, 0x1002)
  1455.         if(06)(0x1008, 0x0002, 0x2006)
  1456.         {
  1457.             ExitLoop?(05)()
  1458.         }
  1459.         else
  1460.         {
  1461.             ExitLoop?(05)(0x0002)
  1462.         }
  1463.     }
  1464.     ???(14)()
  1465.     RestartLoop?(04)()
  1466.  
  1467.     LoopStart?(03)()
  1468.     Set Var(01)(0x0007, 0x1003)
  1469.     Mul(0E)(0x0000, 0x200C)
  1470.     ???(1F)(0x0000)
  1471.     Set Var(01)(0x0007, 0x1003)
  1472.     ExitLoop?(05)()
  1473.     RestartLoop?(04)()
  1474.  
  1475.     LoopStart?(03)(0x0001)
  1476.     if(06)(0x1002, 0x200A)
  1477.     {
  1478.         ExitLoop?(05)()
  1479.     }
  1480.     RestartLoop?(04)()
  1481.  
  1482.     LoopStart?(03)(0x0002)
  1483.     if(06)(0x1002, 0x0003)
  1484.     {
  1485.         Return(00)()
  1486.     }
  1487.     if(06)(0x100C, 0x0051)  Or(16)(0x100C, 0x0057)
  1488.     {
  1489.         Set Goto?(1C)(0x0003)
  1490.         ???(1F)(0x0000)
  1491.     }
  1492.     else
  1493.     {
  1494.         if(06)(0x100C, 0x0052)      Or(16)(0x100C, 0x0058)          if!(07)(0x1002, 0x2003)             And(18)(0x1008, 0x100B, 0x100C)             And(18)(0x1000, 0x2001)
  1495.             {
  1496.                 ???(1F)(0x2006)
  1497.             }
  1498.             else
  1499.             {
  1500.                 Set Goto?(1C)(0x0003)
  1501.                 ???(1F)(0x0000)
  1502.             }
  1503.         }
  1504.         else
  1505.         {
  1506.             if(06)(0x100C, 0x0055)
  1507.             {
  1508.                 Stick(0A)(0x200D)
  1509.             }
  1510.             else
  1511.             {
  1512.                 if(06)(0x100C, 0x0056)
  1513.                 {
  1514.                     Set Goto?(1C)(0x0003)
  1515.                     Mul(0E)(0x0000, 0x200D)
  1516.                     ???(1F)(0x0000)
  1517.                     Mul(0E)(0x0000, 0x200D)
  1518.                     if(06)(0x1002, 0x0004)
  1519.                     {
  1520.                         Return(00)()
  1521.                     }
  1522.                 }
  1523.                 if(06)(0x1002, 0x2001)              AndNot(19)(0x1005)
  1524.                 {
  1525.                     Return(00)()
  1526.                 }
  1527.                 if(06)(0x1012)
  1528.                 {
  1529.                     if(06)(0x1001, 0x0001)
  1530.                     {
  1531.                         Call AI(1B)(0x1080)
  1532.                         Return(00)()
  1533.                     }
  1534.                     else                        if!(07)(0x100D)                         AndNot(19)(0x1000, 0x200E)                      And(18)(0x1007, 0x1011, 0x200E)
  1535.                         {
  1536.                             Set Var(01)(0x0002, 0x1011)
  1537.                             Mul(0E)(0x0002, 0x1011, 0x200F)
  1538.                             Mul(0E)(0x0002, 0x0002)
  1539.                             if(06)(0x101E, 0x0000)
  1540.                             {
  1541.                                 Mul(0E)(0x0002, 0x2010)
  1542.                             }
  1543.                             else
  1544.                             {
  1545.                                 if(06)(0x101E, 0x001B)
  1546.                                 {
  1547.                                     Mul(0E)(0x0002, 0x2011)
  1548.                                 }
  1549.                                 else
  1550.                                 {
  1551.                                     Mul(0E)(0x0002, 0x2012)
  1552.                                 }
  1553.                                 if(06)(0x1008, 0x100E, 0x0002)
  1554.                                 {
  1555.                                     Set Var(01)(0x0008, 0x1003)
  1556.                                     Mul(0E)(0x0008, 0x1002)
  1557.                                     if(06)(0x1007, 0x0008, 0x2006)
  1558.                                     {
  1559.                                         ???(2A)(0x6026)
  1560.                                         if!(07)(0x1011, 0x0000)
  1561.                                         {
  1562.                                             Call AI(1B)()
  1563.                                             Return(00)()
  1564.                                         }
  1565.                                     }
  1566.                                 }
  1567.                             }
  1568.                         }
  1569.                         if(06)(0x100C, 0x0051)                      Or(16)(0x100C, 0x0053)                      Or(16)(0x100C, 0x0057)                          if!(07)(0x1002, 0x200A)
  1570.                             {
  1571.                                 Button(0B)(0x0008)
  1572.                             }
  1573.                         }
  1574.                         else
  1575.                         {
  1576.                             if(06)(0x100C, 0x0056)
  1577.                             {
  1578.                                 if(06)(0x1002, 0x0005)                              AndNot(19)(0x1002, 0x0006)
  1579.                                 {
  1580.                                     Button(0B)(0x0008)
  1581.                                 }
  1582.                             }
  1583.                             else
  1584.                             {
  1585.                                 Set Var(01)(0x0009, 0x100C)
  1586.                                 Sub(0D)(0x0009, 0x100B)
  1587.                                 if!(07)(0x1002, 0x2002)
  1588.                                 {
  1589.                                     Stick(0A)(0x2006, 0x2013)
  1590.                                 }
  1591.                                 if(06)(0x1002, 0x200E)                              And(18)(0x1007, 0x100F, 0x2006)                                 And(18)(0x1008, 0x100D, 0x2006)                                 And(18)(0x1007, 0x0009, 0x200E)
  1592.                                 {
  1593.                                     ExitLoop?(05)()
  1594.                                 }
  1595.                             }
  1596.                             RestartLoop?(04)()
  1597.  
  1598.                             LoopStart?(03)(0x0000)
  1599.                             if(06)(0x100C, 0x0051)                          Or(16)(0x100C, 0x0052)                          Or(16)(0x100C, 0x0057)                          Or(16)(0x100C, 0x0058)
  1600.                             {
  1601.                                 Set Goto?(1C)(0x0003)
  1602.                                 ???(1F)(0x0000)
  1603.                             }
  1604.                             else
  1605.                             {
  1606.                                 if(06)(0x100C, 0x0055)                              Or(16)(0x100C, 0x0055)
  1607.                                 {
  1608.                                     Set Goto?(1C)(0x0003)
  1609.                                     Mul(0E)(0x0000, 0x200D)
  1610.                                     ???(1F)(0x0000)
  1611.                                     Mul(0E)(0x0000, 0x200D)
  1612.                                 }
  1613.                                 if(06)(0x1002, 0x2014)
  1614.                                 {
  1615.                                     if(06)(0x1008, 0x100F, 0x200A)
  1616.                                     {
  1617.                                         ???(23)(0x2001)
  1618.                                     }
  1619.                                     ExitLoop?(05)(0x0002)
  1620.                                 }
  1621.                                 RestartLoop?(04)()
  1622.  
  1623.                                 LoopStart?(03)(0x0003)
  1624.                                 if(06)(0x1007, 0x1003, 0x2006)
  1625.                                 {
  1626.                                     Add(0C)(0x0000, 0x2015)
  1627.                                     if(06)(0x1007, 0x0000, 0x2013)
  1628.                                     {
  1629.                                         Set Var(01)(0x0000, 0x2013)
  1630.                                     }
  1631.                                 }
  1632.                                 else
  1633.                                 {
  1634.                                     Add(0C)(0x0000, 0x2016)
  1635.                                     if(06)(0x1008, 0x0000, 0x200D)
  1636.                                     {
  1637.                                         Set Var(01)(0x0000, 0x200D)
  1638.                                     }
  1639.                                 }
  1640.                                 RestartLoop?(04)()
  1641.                                 RestartLoop?(04)()
  1642.  
  1643. 0070
  1644. ------------------------------
  1645. global-00 = 30.000
  1646. global-01 = 3.000
  1647. global-02 = -1.000
  1648. global-03 = 1.000
  1649.  
  1650. LoopStart?(03)()
  1651. if!(07)(0x1003) AndNot(19)(0x1004)
  1652. {
  1653.     if(06)(0x1002, 0x2000)
  1654.     {
  1655.         Return(00)()
  1656.     }
  1657. }
  1658. ExitLoop?(05)()
  1659. RestartLoop?(04)()
  1660.  
  1661. LoopStart?(03)()
  1662. Button(0B)(0x0004)
  1663. if(06)(0x1002, 0x2001)
  1664. {
  1665.     ExitLoop?(05)()
  1666. }
  1667. RestartLoop?(04)()
  1668.  
  1669. LoopStart?(03)()
  1670. Button(0B)(0x0004)
  1671. if(06)(0x100C, 0x0072)
  1672. {
  1673.     Stick(0A)(0x2002)
  1674. }
  1675. else
  1676. {
  1677.     Stick(0A)(0x2003)
  1678. }
  1679. Return(00)()
  1680. RestartLoop?(04)()
  1681.  
  1682. 0040
  1683. ------------------------------
  1684. global-00 = 0.700
  1685. global-01 = 0.000
  1686. global-02 = 5.000
  1687. global-03 = 6.000
  1688. global-04 = 10.000
  1689.  
  1690. LoopStart?(03)()
  1691. Set Var(01)(0x0000, 0x1002)
  1692. Mul(0E)(0x0000, 0x1003, 0x2000)
  1693. Stick(0A)(0x0000)
  1694. if(06)(0x1007, 0x0000, 0x2001) Or(16)(0x1002, 0x2002)
  1695. {
  1696.     Set Var(01)(0x0001, 0x2003)
  1697.     Mul(0E)(0x0001, 0x100E)
  1698.     ExitLoop?(05)()
  1699. }
  1700. RestartLoop?(04)()
  1701.  
  1702. LoopStart?(03)()
  1703. Stick(0A)(0x0000)
  1704. if(06)(0x1002, 0x0001) Or(16)(0x1001, 0x2004)
  1705. {
  1706.     Return(00)()
  1707. }
  1708. RestartLoop?(04)()
  1709. RestartLoop?(04)()
  1710.  
  1711. 0020
  1712. ------------------------------
  1713. global-00 = 8.000
  1714. global-01 = 20.000
  1715. global-02 = 0.000
  1716. global-03 = 80.000
  1717. global-04 = 50.000
  1718. global-05 = 0.250
  1719. global-06 = 0.700
  1720. global-07 = 0.750
  1721. global-08 = -1.000
  1722. global-09 = 11.000
  1723. global-0A = 9.000
  1724. global-0B = -0.500
  1725. Set Var(01)(0x0000, 0x2000)
  1726. Set Var(01)(0x0001, 0x2001)
  1727. Set Var(01)(0x0002, 0x2002)
  1728. if(06)(0x100C, 0x0024)
  1729. {
  1730.     ???(22)(0x2003)
  1731. }
  1732. else
  1733. {
  1734.     ???(22)(0x2004)
  1735. }
  1736.  
  1737. LoopStart?(03)()
  1738. if(06)(0x1008, 0x1010, 0x0001) Or(16)(0x0001)
  1739. {
  1740.     ExitLoop?(05)(0x0000)
  1741.     RestartLoop?(04)()
  1742. }
  1743. if(06)(0x100C, 0x0024)
  1744. {
  1745.     Set Var(01)(0x0003, 0x1001)
  1746.     Mul(0E)(0x0003, 0x2005)
  1747.     if(06)(0x1000, 0x0003)
  1748.     {
  1749.         Mul(0E)(0x0002, 0x2006)
  1750.         ExitLoop?(05)(0x0001)
  1751.         ???(14)()
  1752.     }
  1753. }
  1754. else
  1755. {
  1756.     if(06)(0x100C, 0x0021)      if!(07)(0x1000, 0x1000)
  1757.         {
  1758.             Mul(0E)(0x0002, 0x2006)
  1759.             ExitLoop?(05)(0x0001)
  1760.             ???(14)()
  1761.         }
  1762.     }
  1763.     else
  1764.     {
  1765.         if(06)(0x100C, 0x0022)
  1766.         {
  1767.             if(06)(0x1000, 0x1001, 0x1000)
  1768.             {
  1769.                 Mul(0E)(0x0002, 0x2006)
  1770.                 ExitLoop?(05)(0x0001)
  1771.                 ???(14)()
  1772.             }
  1773.         }
  1774.         else
  1775.         {
  1776.             if(06)(0x1000, 0x1001)
  1777.             {
  1778.                 Mul(0E)(0x0002, 0x2006)
  1779.                 ExitLoop?(05)(0x0001)
  1780.                 ???(14)()
  1781.             }
  1782.             Set Var(01)(0x0002, 0x1003)
  1783.             if!(07)(0x1002, 0x0000)
  1784.             {
  1785.                 Mul(0E)(0x0002, 0x2007)
  1786.             }
  1787.             if(06)(0x100C, 0x0021)
  1788.             {
  1789.                 Mul(0E)(0x0002, 0x2008)
  1790.             }
  1791.             else
  1792.             {
  1793.                 if(06)(0x100C, 0x0022)              And(18)(0x1000, 0x1001)
  1794.                 {
  1795.                     Mul(0E)(0x0002, 0x2008)
  1796.                 }
  1797.                 ???(1F)(0x0002)
  1798.                 RestartLoop?(04)()
  1799.  
  1800.                 LoopStart?(03)(0x0001)
  1801.                 Set Var(01)(0x0003, 0x2009)
  1802.                 if(06)(0x1002, 0x0003)
  1803.                 {
  1804.                     ExitLoop?(05)(0x0000)
  1805.                     RestartLoop?(04)()
  1806.                 }
  1807.                 else                    if!(07)(0x1002, 0x200A)
  1808.                     {
  1809.                         ???(1F)(0x0002)
  1810.                     }
  1811.                     RestartLoop?(04)()
  1812.  
  1813.                     LoopStart?(03)(0x0000)
  1814.                     Set Var(01)(0x0004, 0x1002)
  1815.                     Mul(0E)(0x0004, 0x1003)
  1816.                     if(06)(0x1008, 0x0004, 0x2002)
  1817.                     {
  1818.                         Stick(0A)(0x200B)
  1819.                     }
  1820.                     else
  1821.                     {
  1822.                         Return(00)()
  1823.                     }
  1824.                     RestartLoop?(04)()
  1825.                     RestartLoop?(04)()
  1826.  
  1827. 0030
  1828. ------------------------------
  1829. global-00 = 8.000
  1830. global-01 = 20.000
  1831. global-02 = 30.000
  1832. global-03 = 120.000
  1833. global-04 = 0.300
  1834. global-05 = -1.000
  1835. global-06 = 0.000
  1836. global-07 = -0.500
  1837. Set Var(01)(0x0000, 0x2000)
  1838. Set Var(01)(0x0001, 0x2001)
  1839. ???(23)(0x0001)
  1840. if(06)(0x1004)
  1841. {
  1842.     ExitLoop?(05)(0x0000)
  1843.     ???(14)()
  1844. }
  1845. ???(22)(0x2002)
  1846. ???(21)()
  1847. ???(22)(0x2003)
  1848.  
  1849. LoopStart?(03)()
  1850. if(06)(0x1002, 0x0000)
  1851. {
  1852.     ExitLoop?(05)()
  1853. }
  1854. RestartLoop?(04)()
  1855.  
  1856. LoopStart?(03)(0x0000)
  1857. if(06)(0x0001)
  1858. {
  1859.     Set Goto?(1C)(0x0001)
  1860. }
  1861. if(06)(0x100C, 0x0034)
  1862. {
  1863.     Set Var(01)(0x0002, 0x1001)
  1864.     Mul(0E)(0x0002, 0x2004)
  1865.     if(06)(0x1000, 0x0002)
  1866.     {
  1867.         Set Goto?(1C)(0x0001)
  1868.     }
  1869. }
  1870. else
  1871. {
  1872.     if(06)(0x100C, 0x0031)      if!(07)(0x1000, 0x1000)
  1873.         {
  1874.             Set Goto?(1C)(0x0001)
  1875.         }
  1876.     }
  1877.     else
  1878.     {
  1879.         if(06)(0x100C, 0x0032)
  1880.         {
  1881.             if(06)(0x1000, 0x1001, 0x1000)
  1882.             {
  1883.                 Set Goto?(1C)(0x0001)
  1884.             }
  1885.         }
  1886.         else
  1887.         {
  1888.             if(06)(0x1000, 0x1001)
  1889.             {
  1890.                 Set Goto?(1C)(0x0001)
  1891.             }
  1892.             Set Var(01)(0x0003, 0x1003)
  1893.             if(06)(0x100C, 0x0031)
  1894.             {
  1895.                 Mul(0E)(0x0003, 0x2005)
  1896.             }
  1897.             else
  1898.             {
  1899.                 if(06)(0x100C, 0x0032)              And(18)(0x1000, 0x1001)
  1900.                 {
  1901.                     Mul(0E)(0x0003, 0x2005)
  1902.                 }
  1903.                 ???(1F)(0x0003)
  1904.                 RestartLoop?(04)()
  1905.  
  1906.                 LoopStart?(03)(0x0001)
  1907.                 Set Var(01)(0x0004, 0x1002)
  1908.                 Mul(0E)(0x0004, 0x1003)
  1909.                 if(06)(0x1008, 0x0004, 0x2006)
  1910.                 {
  1911.                     Stick(0A)(0x2007)
  1912.                 }
  1913.                 Return(00)()
  1914.                 RestartLoop?(04)()
  1915.  
  1916. 2040
  1917. ------------------------------
  1918. global-00 = 15.000
  1919. global-01 = 0.006
  1920. global-02 = 0.300
  1921. global-03 = -30.000
  1922. global-04 = -15.000
  1923. global-05 = 10.000
  1924. global-06 = 0.000
  1925. global-07 = 8.000
  1926. global-08 = 40.000
  1927. global-09 = -0.015
  1928. global-0A = 4.000
  1929. global-0B = 2.000
  1930. global-0C = -20.000
  1931. global-0D = 30.000
  1932. global-0E = -1.000
  1933. global-0F = -25.000
  1934. global-10 = -18.000
  1935. global-11 = 5.000
  1936. global-12 = 0.700
  1937. global-13 = -10.000
  1938. global-14 = 1.000
  1939. global-15 = 24.000
  1940. global-16 = 0.800
  1941. global-17 = -0.800
  1942. global-18 = 0.000
  1943. global-19 = 0.000
  1944. global-1A = 0.000
  1945. ???(02)(0x0000, 0x1009)
  1946. ???(2A)(0x602B)
  1947. Set Var(01)(0x0002, 0x2000)
  1948. Mul(0E)(0x0002, 0x100E)
  1949. Set Var(01)(0x0003, 0x1011)
  1950. Mul(0E)(0x0003, 0x2001)
  1951. Add(0C)(0x0003, 0x2002)
  1952. if(06)(0x1008, 0x100E, 0x0003)
  1953. {
  1954.     if(06)(0x1018)
  1955.     {
  1956.         Add(0C)(0x0002, 0x2003)
  1957.     }
  1958.     else
  1959.     {
  1960.         Add(0C)(0x0002, 0x2004)
  1961.     }
  1962. }
  1963. else
  1964. {
  1965.     Add(0C)(0x0002, 0x2005)
  1966. }
  1967. Set Var(01)(0x0003, 0x102A)
  1968. Add(0C)(0x0003, 0x2005)
  1969. if(06)(0x1008, 0x0002, 0x0003)
  1970. {
  1971.     Set Var(01)(0x0002, 0x0003)
  1972. }
  1973. Set Var(01)(0x0004, 0x2006)
  1974.  
  1975. LoopStart?(03)()
  1976. Set Goto?(1C)(0x0000)
  1977. if(06)(0x100E)
  1978. {
  1979.     if(06)(0x1002, 0x2007)
  1980.     {
  1981.         Return(00)()
  1982.     }
  1983. }
  1984. else
  1985. {
  1986.     if(06)(0x1007, 0x100F, 0x2006)  And(18)(0x1012)
  1987.     {
  1988.         Set Goto?(1C)(0x0001)
  1989.         ExitLoop?(05)(0x0002)
  1990.     }
  1991.     else
  1992.     {
  1993.         Set Var(01)(0x0003, 0x2006)
  1994.         if(06)(0x1008, 0x1011, 0x2008)
  1995.         {
  1996.             Set Var(01)(0x0003, 0x2008)
  1997.             Sub(0D)(0x0003, 0x1011)
  1998.             Mul(0E)(0x0003, 0x2009)
  1999.         }
  2000.         if(06)(0x1008, 0x100D, 0x0003)
  2001.         {
  2002.             ExitLoop?(05)()
  2003.         }
  2004.     }
  2005.     RestartLoop?(04)()
  2006.  
  2007.     LoopStart?(03)()
  2008.     Set Goto?(1C)(0x0000)
  2009.     if!(07)(0x1012)
  2010.     {
  2011.         if(06)(0x1002, 0x200A)
  2012.         {
  2013.             Return(00)()
  2014.         }
  2015.         RestartLoop?(04)()
  2016.     }
  2017.     if(06)(0x1002, 0x200B)
  2018.     {
  2019.         Set Var(01)(0x0003, 0x0001)
  2020.         Add(0C)(0x0003, 0x200C)
  2021.         if(06)(0x1010, 0x2000)      And(18)(0x1007, 0x1010, 0x200C)         And(18)(0x1007, 0x100B, 0x0003)         And(18)(0x1007, 0x1011, 0x200D)
  2022.         {
  2023.             Set Goto?(1C)(0x0001)
  2024.             ExitLoop?(05)()
  2025.             RestartLoop?(04)()
  2026.         }
  2027.         if(06)(0x1007, 0x0004, 0x2006)
  2028.         {
  2029.             Add(0C)(0x0004, 0x200E)
  2030.         }
  2031.         else            if!(07)(0x100E)
  2032.             {
  2033.                 Set Var(01)(0x0003, 0x0001)
  2034.                 Add(0C)(0x0003, 0x0002)
  2035.                 if(06)(0x1008, 0x100B, 0x0003)
  2036.                 {
  2037.                     Set Var(01)(0x0003, 0x0001)
  2038.                     Add(0C)(0x0003, 0x200F)
  2039.                     if(06)(0x1007, 0x1010, 0x2010)                  And(18)(0x1008, 0x1010, 0x2011)                     And(18)(0x1007, 0x100B, 0x0003)                     And(18)(0x1008, 0x100E, 0x2012)
  2040.                     {
  2041.                         Set Var(01)(0x0004, 0x2007)
  2042.                         RestartLoop?(04)()
  2043.                     }
  2044.                     Set Goto?(1C)(0x0001)
  2045.                     ExitLoop?(05)()
  2046.                     RestartLoop?(04)()
  2047.                 }
  2048.             }
  2049.             if(06)(0x1002, 0x2005)
  2050.             {
  2051.                 Return(00)()
  2052.             }
  2053.         }
  2054.         RestartLoop?(04)()
  2055.  
  2056.         LoopStart?(03)(0x0002)
  2057.         if!(07)(0x1005)         Or(16)(0x1012)
  2058.         {
  2059.             Return(00)()
  2060.         }
  2061.         ???(27)(0x0000)
  2062.         if!(07)(0x1002, 0x200A)
  2063.         {
  2064.             Set Var(01)(0x0003, 0x0001)
  2065.             Add(0C)(0x0003, 0x2013)
  2066.             if(06)(0x1008, 0x100B, 0x0003)
  2067.             {
  2068.                 ???(31)(0x0000)
  2069.             }
  2070.         }
  2071.         if(06)(0x1008, 0x1004, 0x0000)
  2072.         {
  2073.             ???(1F)(0x2014)
  2074.         }
  2075.         else
  2076.         {
  2077.             ???(1F)(0x200E)
  2078.         }
  2079.         if(06)(0x1002, 0x2015)
  2080.         {
  2081.             Return(00)()
  2082.         }
  2083.         RestartLoop?(04)()
  2084.  
  2085.         LoopStart?(03)(0x0000)
  2086.         if!(07)(0x1005)
  2087.         {
  2088.             Return(00)()
  2089.         }
  2090.         ???(1D)(0x0000)
  2091.         Set Var(01)(0x0005, 0x0000)
  2092.         Sub(0D)(0x0005, 0x1004)
  2093.         Set Var(01)(0x0006, 0x1002)
  2094.         if(06)(0x1008, 0x0005, 0x2006)
  2095.         {
  2096.             Mul(0E)(0x0006, 0x200E)
  2097.         }
  2098.         ???(1E)(0x0005)
  2099.         if(06)(0x1007, 0x0005, 0x2011)
  2100.         {
  2101.             Sub(0D)(0x0005, 0x2011)
  2102.             Div(0F)(0x0005, 0x2011)
  2103.             if(06)(0x1007, 0x0005, 0x2014)
  2104.             {
  2105.                 Set Var(01)(0x0005, 0x2014)
  2106.             }
  2107.             Mul(0E)(0x0005, 0x0006)
  2108.             Stick(0A)(0x0005)
  2109.         }
  2110.         RestartLoop?(04)()
  2111.  
  2112.         LoopStart?(03)(0x0001)
  2113.         ???(32)()
  2114.         ???(31)(0x0000)
  2115.         if(06)(0x1008, 0x1004, 0x0000)
  2116.         {
  2117.             ???(1F)(0x2016)
  2118.         }
  2119.         else
  2120.         {
  2121.             ???(1F)(0x2017)
  2122.         }
  2123.         if!(07)(0x1011, 0x6047)
  2124.         {
  2125.             ???(1F)(0x2006, 0x2014)
  2126.         }
  2127.         Button(0B)(0x0002)
  2128.         RestartLoop?(04)()
  2129.         RestartLoop?(04)()
  2130.  
  2131. 2020
  2132. ------------------------------
  2133. global-00 = 8.000
  2134. global-01 = -0.000
  2135. global-02 = 4.000
  2136. global-03 = -1.000
  2137. global-04 = 1.000
  2138. global-05 = 5.000
  2139. global-06 = 0.000
  2140. global-07 = 0.000
  2141. global-08 = 0.000
  2142. ???(1D)(0x0000)
  2143.  
  2144. LoopStart?(03)()
  2145. Set Goto?(1C)(0x0000)
  2146. if(06)(0x100E)
  2147. {
  2148.     if(06)(0x1002, 0x2000)
  2149.     {
  2150.         Return(00)()
  2151.     }
  2152. }
  2153. else
  2154. {
  2155.     if(06)(0x1008, 0x100D, 0x2001)
  2156.     {
  2157.         ExitLoop?(05)()
  2158.     }
  2159.     RestartLoop?(04)()
  2160.  
  2161.     LoopStart?(03)()
  2162.     if(06)(0x1002, 0x2002)
  2163.     {
  2164.         if(06)(0x1007, 0x1004, 0x0000)
  2165.         {
  2166.             Set Var(01)(0x0002, 0x2003)
  2167.         }
  2168.         else
  2169.         {
  2170.             Set Var(01)(0x0002, 0x2004)
  2171.         }
  2172.         Mul(0E)(0x0002, 0x1002)
  2173.         Stick(0A)(0x0002)
  2174.         Button(0B)(0x0002)
  2175.         Return(00)()
  2176.     }
  2177.     else
  2178.     {
  2179.         Set Goto?(1C)(0x0000)
  2180.     }
  2181.     RestartLoop?(04)()
  2182.  
  2183.     LoopStart?(03)(0x0000)
  2184.     Set Var(01)(0x0002, 0x0000)
  2185.     Sub(0D)(0x0002, 0x1004)
  2186.     ???(1E)(0x0002)
  2187.     if(06)(0x1007, 0x0002, 0x2005)
  2188.     {
  2189.         if(06)(0x1007, 0x1004, 0x0000)
  2190.         {
  2191.             Set Var(01)(0x0002, 0x2003)
  2192.         }
  2193.         else
  2194.         {
  2195.             Set Var(01)(0x0002, 0x2004)
  2196.         }
  2197.         Mul(0E)(0x0002, 0x1002)
  2198.         Stick(0A)(0x0002)
  2199.     }
  2200.     RestartLoop?(04)()
  2201.     RestartLoop?(04)()
  2202.  
  2203. 2030
  2204. ------------------------------
  2205. global-00 = 50.000
  2206. global-01 = 8.000
  2207. global-02 = 0.000
  2208. global-03 = 4.000
  2209. global-04 = 1.000
  2210. global-05 = 10.000
  2211. global-06 = -1.000
  2212. global-07 = 5.000
  2213. ???(02)(0x0000, 0x1009)
  2214.  
  2215. LoopStart?(03)()
  2216. Set Goto?(1C)(0x0000)
  2217. Add(0C)(0x0001, 0x2000)
  2218. if(06)(0x100E)
  2219. {
  2220.     if(06)(0x1002, 0x2001)
  2221.     {
  2222.         Return(00)()
  2223.     }
  2224. }
  2225. else
  2226. {
  2227.     if(06)(0x1008, 0x100D, 0x2002)  And(18)(0x1008, 0x100B, 0x0001)
  2228.     {
  2229.         ExitLoop?(05)()
  2230.     }
  2231.     RestartLoop?(04)()
  2232.  
  2233.     LoopStart?(03)()
  2234.     Set Goto?(1C)(0x0000)
  2235.     if(06)(0x1002, 0x2003)      if!(07)(0x100E)
  2236.         {
  2237.             Stick(0A)(0x2002, 0x2004)
  2238.         }
  2239.         if(06)(0x1002, 0x2005)
  2240.         {
  2241.             Return(00)()
  2242.         }
  2243.     }
  2244.     RestartLoop?(04)()
  2245.  
  2246.     LoopStart?(03)(0x0000)
  2247.     ???(1D)(0x0000)
  2248.     Set Var(01)(0x0002, 0x0000)
  2249.     Sub(0D)(0x0002, 0x1004)
  2250.     Set Var(01)(0x0003, 0x1002)
  2251.     if(06)(0x1008, 0x0002, 0x2002)
  2252.     {
  2253.         Mul(0E)(0x0003, 0x2006)
  2254.     }
  2255.     ???(1E)(0x0002)
  2256.     if(06)(0x1007, 0x0002, 0x2007)
  2257.     {
  2258.         Sub(0D)(0x0002, 0x2007)
  2259.         Div(0F)(0x0002, 0x2007)
  2260.         if(06)(0x1007, 0x0002, 0x2004)
  2261.         {
  2262.             Set Var(01)(0x0002, 0x2004)
  2263.         }
  2264.         Mul(0E)(0x0002, 0x0003)
  2265.         Stick(0A)(0x0002)
  2266.     }
  2267.     RestartLoop?(04)()
  2268.     RestartLoop?(04)()
  2269.  
  2270. 2010
  2271. ------------------------------
  2272. global-00 = -1.000
  2273. global-01 = 55.000
  2274. global-02 = -15.000
  2275. global-03 = 10.000
  2276. global-04 = 40.000
  2277. global-05 = 70.000
  2278. global-06 = 0.300
  2279. global-07 = 0.010
  2280. global-08 = 0.350
  2281. global-09 = 1.000
  2282. global-0A = 0.500
  2283. global-0B = 4.000
  2284. global-0C = 8.000
  2285. global-0D = 0.000
  2286. global-0E = -50.000
  2287. global-0F = 100.000
  2288. global-10 = -5.000
  2289. global-11 = -20.000
  2290. global-12 = 0.150
  2291. global-13 = 3.000
  2292. global-14 = 5.000
  2293. global-15 = -0.500
  2294. global-16 = -52.000
  2295. global-17 = -48.000
  2296. global-18 = 50.000
  2297. global-19 = -0.020
  2298. global-1A = 0.400
  2299. global-1B = 45.000
  2300. global-1C = -40.000
  2301. global-1D = -4.000
  2302. global-1E = 18.000
  2303. global-1F = 12.000
  2304. global-20 = 0.000
  2305. global-21 = 0.000
  2306. global-22 = 0.000
  2307. ???(02)(0x0000, 0x1009)
  2308. Set Var(01)(0x0002, 0x1023)
  2309. Mul(0E)(0x0002, 0x2000)
  2310. if(06)(0x1018) And(18)(0x1007, 0x1011, 0x2001)
  2311. {
  2312.     Add(0C)(0x0002, 0x2002)
  2313. }
  2314. Set Var(01)(0x0003, 0x102A)
  2315. Add(0C)(0x0003, 0x2003)
  2316. if(06)(0x1008, 0x0002, 0x0003)
  2317. {
  2318.     Set Var(01)(0x0002, 0x0003)
  2319. }
  2320. Set Var(01)(0x0003, 0x2004)
  2321. Mul(0E)(0x0003, 0x100E)
  2322. Add(0C)(0x0002, 0x0003)
  2323. Set Var(01)(0x0004, 0x2005)
  2324. if(06)(0x1008, 0x100E, 0x2006)
  2325. {
  2326.     Set Var(01)(0x0005, 0x2003)
  2327. }
  2328. else
  2329. {
  2330.     Set Var(01)(0x0005, 0x0004)
  2331.     Sub(0D)(0x0005, 0x2003, 0x0002)
  2332.     Mul(0E)(0x0005, 0x1011, 0x2007)
  2333.     Add(0C)(0x0005, 0x0002)
  2334. }
  2335. Set Var(01)(0x0006, 0x2000)
  2336. Set Var(01)(0x0007, 0x1011)
  2337. Mul(0E)(0x0007, 0x2007, 0x100E)
  2338. Sub(0D)(0x0007, 0x2008)
  2339. Set Var(01)(0x0003, 0x1011)
  2340. Mul(0E)(0x0003, 0x2007)
  2341. if(06)(0x1008, 0x100E, 0x0003)
  2342. {
  2343.     Set Var(01)(0x0008, 0x2009)
  2344. }
  2345. else
  2346. {
  2347.     Set Var(01)(0x0008, 0x2000)
  2348. }
  2349.  
  2350. LoopStart?(03)()
  2351. Set Goto?(1C)(0x0000)
  2352. if(06)(0x1008, 0x100F, 0x200A) And(18)(0x1002, 0x200B)
  2353. {
  2354.     Return(00)()
  2355. }
  2356. if!(07)(0x1012)
  2357. {
  2358.     if(06)(0x1002, 0x200B)
  2359.     {
  2360.         Return(00)()
  2361.     }
  2362.     RestartLoop?(04)()
  2363. }
  2364. Set Var(01)(0x0009, 0x0001)
  2365. Set Var(01)(0x000A, 0x0001)
  2366. Set Var(01)(0x000B, 0x0001)
  2367. Add(0C)(0x0009, 0x0002)
  2368. Add(0C)(0x000A, 0x0004)
  2369. Add(0C)(0x000B, 0x0005)
  2370. if(06)(0x100E)
  2371. {
  2372.     if(06)(0x1002, 0x200C)
  2373.     {
  2374.         Return(00)()
  2375.     }
  2376. }
  2377. else
  2378. {
  2379.     Set Goto?(1C)(0x0001)
  2380.     if(06)(0x1008, 0x100D, 0x200D)
  2381.     {
  2382.         if(06)(0x1008, 0x100B, 0x0009)
  2383.         {
  2384.             ExitLoop?(05)()
  2385.         }
  2386.         else
  2387.         {
  2388.             if(06)(0x1008, 0x100B, 0x000A)
  2389.             {
  2390.                 if(06)(0x1008, 0x100B, 0x0001)              And(18)(0x1007, 0x1010, 0x200E)                 AndNot(19)(0x1000, 0x200F)
  2391.                 {
  2392.                     ExitLoop?(05)()
  2393.                 }
  2394.                 else
  2395.                 {
  2396.                     if(06)(0x1007, 0x100B, 0x000B)
  2397.                     {
  2398.                         if(06)(0x1008, 0x1010, 0x200E)
  2399.                         {
  2400.                             ExitLoop?(05)()
  2401.                         }
  2402.                     }
  2403.                     else                        if!(07)(0x1018)                         And(18)(0x1007, 0x1010, 0x2002)
  2404.                         {
  2405.                             ExitLoop?(05)()
  2406.                         }
  2407.                     }
  2408.                 }
  2409.             }
  2410.             RestartLoop?(04)()
  2411.  
  2412.             LoopStart?(03)()
  2413.             Set Goto?(1C)(0x0000)
  2414.             Set Goto?(1C)(0x0001)
  2415.             if(06)(0x1008, 0x0006, 0x200D)
  2416.             {
  2417.                 if(06)(0x1007, 0x100B, 0x0001)              And(18)(0x1008, 0x1010, 0x2010)                 And(18)(0x1007, 0x1010, 0x2011)
  2418.                 {
  2419.                     if(06)(0x1008, 0x100E, 0x2012)
  2420.                     {
  2421.                         Call AI(1B)(0x2040)
  2422.                         Return(00)()
  2423.                     }
  2424.                     else
  2425.                     {
  2426.                         Set Var(01)(0x0006, 0x2009)
  2427.                     }
  2428.                 }
  2429.             }
  2430.             if(06)(0x1002, 0x2013)              if!(07)(0x100E)
  2431.                 {
  2432.                     Stick(0A)(0x200D, 0x2009)
  2433.                 }
  2434.                 if(06)(0x1002, 0x2003)
  2435.                 {
  2436.                     Return(00)()
  2437.                 }
  2438.             }
  2439.             RestartLoop?(04)()
  2440.  
  2441.             LoopStart?(03)(0x0000)
  2442.             if!(07)(0x1005)
  2443.             {
  2444.                 Return(00)()
  2445.             }
  2446.             ???(1D)(0x0000)
  2447.             Set Var(01)(0x000C, 0x0000)
  2448.             Sub(0D)(0x000C, 0x1004)
  2449.             Set Var(01)(0x000D, 0x1002)
  2450.             if(06)(0x1008, 0x000C, 0x200D)
  2451.             {
  2452.                 Mul(0E)(0x000D, 0x2000)
  2453.             }
  2454.             ???(1E)(0x000C)
  2455.             if(06)(0x1007, 0x000C, 0x2014)
  2456.             {
  2457.                 Set Var(01)(0x000E, 0x2009)
  2458.                 if(06)(0x1007, 0x100F, 0x200D)              And(18)(0x1000, 0x200F)                 AndNot(19)(0x0001)
  2459.                 {
  2460.                     Set Var(01)(0x000E, 0x100B)
  2461.                     Sub(0D)(0x000E, 0x0001)
  2462.                     if(06)(0x100A, 0x000E, 0x0002)
  2463.                     {
  2464.                         Set Var(01)(0x000E, 0x2009)
  2465.                     }
  2466.                     else
  2467.                     {
  2468.                         if(06)(0x1007, 0x100D, 0x2015)                      And(18)(0x1008, 0x000E, 0x2003)
  2469.                         {
  2470.                             Set Var(01)(0x000E, 0x2009)
  2471.                         }
  2472.                         else
  2473.                         {
  2474.                             if(06)(0x1009, 0x0007, 0x200D)
  2475.                             {
  2476.                                 if(06)(0x1007, 0x1010, 0x2016)                              And(18)(0x1008, 0x1010, 0x2000)
  2477.                                 {
  2478.                                     if(06)(0x1008, 0x1010, 0x2017)
  2479.                                     {
  2480.                                         Set Var(01)(0x000E, 0x200D)
  2481.                                     }
  2482.                                     else
  2483.                                     {
  2484.                                         Set Var(01)(0x000E, 0x2018)
  2485.                                         Add(0C)(0x000E, 0x1010)
  2486.                                         Mul(0E)(0x000E, 0x2019)
  2487.                                         Sub(0D)(0x000E, 0x201A)
  2488.                                     }
  2489.                                 }
  2490.                                 else
  2491.                                 {
  2492.                                     Set Var(01)(0x000E, 0x2009)
  2493.                                 }
  2494.                             }
  2495.                             else
  2496.                             {
  2497.                                 if(06)(0x1007, 0x1011, 0x201B)                              And(18)(0x1007, 0x1010, 0x2016)                                 And(18)(0x1008, 0x1010, 0x2002)
  2498.                                 {
  2499.                                     if(06)(0x1008, 0x000E, 0x0005)
  2500.                                     {
  2501.                                         if(06)(0x1008, 0x1010, 0x2017)
  2502.                                         {
  2503.                                             Set Var(01)(0x000E, 0x200D)
  2504.                                         }
  2505.                                         else
  2506.                                         {
  2507.                                             Set Var(01)(0x000E, 0x2018)
  2508.                                             Add(0C)(0x000E, 0x1010)
  2509.                                             Mul(0E)(0x000E, 0x2019)
  2510.                                             Sub(0D)(0x000E, 0x201A)
  2511.                                         }
  2512.                                     }
  2513.                                     else
  2514.                                     {
  2515.                                         Set Var(01)(0x000E, 0x2009)
  2516.                                     }
  2517.                                 }
  2518.                                 else
  2519.                                 {
  2520.                                     Set Var(01)(0x000E, 0x2009)
  2521.                                 }
  2522.                             }
  2523.                             Sub(0D)(0x000C, 0x2014)
  2524.                             Div(0F)(0x000C, 0x2014)
  2525.                             if(06)(0x1007, 0x000C, 0x2009)
  2526.                             {
  2527.                                 Set Var(01)(0x000C, 0x2009)
  2528.                             }
  2529.                             Mul(0E)(0x000C, 0x000D, 0x000E)
  2530.                             Stick(0A)(0x000C)
  2531.                         }
  2532.                         RestartLoop?(04)()
  2533.  
  2534.                         LoopStart?(03)(0x0001)
  2535.                         if(06)(0x1012)                      And(18)(0x1007, 0x0008, 0x200D)                         AndNot(19)(0x100E)                      And(18)(0x1007, 0x1010, 0x201C)                         And(18)(0x100A, 0x1010, 0x200D)
  2536.                         {
  2537.                             ???(31)(0x000F)
  2538.                             Set Var(01)(0x0003, 0x000F)
  2539.                             Sub(0D)(0x0003, 0x1004)
  2540.                             Mul(0E)(0x0003, 0x1008)
  2541.                             if(06)(0x100A, 0x0003, 0x200D)
  2542.                             {
  2543.                                 RestartLoop?(04)()
  2544.                             }
  2545.                             if(06)(0x1007, 0x1010, 0x2011)
  2546.                             {
  2547.                                 Set Var(01)(0x0003, 0x0010)
  2548.                                 Add(0C)(0x0003, 0x2002)
  2549.                                 if(06)(0x1008, 0x100B, 0x0003)
  2550.                                 {
  2551.                                     RestartLoop?(04)()
  2552.                                 }
  2553.                             }
  2554.                             ???(02)(0x0011, 0x1008)
  2555.                             Set Var(01)(0x0003, 0x2014)
  2556.                             Add(0C)(0x0003, 0x0010)
  2557.                             if(06)(0x1007, 0x100B, 0x0003)
  2558.                             {
  2559.                                 Mul(0E)(0x0011, 0x2003)
  2560.                                 Mul(0E)(0x0012, 0x2003)
  2561.                                 Add(0C)(0x0003, 0x201D)
  2562.                             }
  2563.                             else
  2564.                             {
  2565.                                 Mul(0E)(0x0011, 0x201E)
  2566.                                 Mul(0E)(0x0012, 0x201F)
  2567.                             }
  2568.                             ???(10)(0x0011, 0x1004)
  2569.                             if(06)(0x1007, 0x0012, 0x0003)
  2570.                             {
  2571.                                 if(06)(0x1007, 0x1008, 0x200D)
  2572.                                 {
  2573.                                     if(06)(0x1007, 0x0011, 0x000F)
  2574.                                     {
  2575.                                         Button(0B)(0x0004)
  2576.                                         Return(00)()
  2577.                                     }
  2578.                                 }
  2579.                                 else
  2580.                                 {
  2581.                                     if(06)(0x1008, 0x0011, 0x000F)
  2582.                                     {
  2583.                                         Button(0B)(0x0004)
  2584.                                         Return(00)()
  2585.                                     }
  2586.                                 }
  2587.                             }
  2588.                             RestartLoop?(04)()
  2589.                             RestartLoop?(04)()
  2590.  
  2591. 3020
  2592. ------------------------------
  2593. global-00 = 30.000
  2594. global-01 = 20.000
  2595. global-02 = 5.000
  2596. global-03 = 100.000
  2597. global-04 = 0.120
  2598. global-05 = 1.000
  2599. global-06 = 3.000
  2600. global-07 = 120.000
  2601. global-08 = 60.000
  2602. global-09 = 0.010
  2603. global-0A = 0.000
  2604. global-0B = 4.000
  2605. global-0C = 0.180
  2606. global-0D = 8.000
  2607. global-0E = 0.300
  2608. global-0F = 0.100
  2609. global-10 = 0.050
  2610. global-11 = 70.000
  2611. global-12 = 0.025
  2612. global-13 = 0.150
  2613. global-14 = 9.000
  2614. global-15 = 10.000
  2615. global-16 = 0.200
  2616. global-17 = 2.000
  2617. global-18 = 0.000
  2618. ???(26)(0x0000)
  2619. if(06)(0x1008, 0x0000, 0x2000)
  2620. {
  2621.     Return(00)()
  2622. }
  2623. Set Var(01)(0x0001, 0x100E)
  2624. Mul(0E)(0x0001, 0x2001)
  2625. Add(0C)(0x0001, 0x2002)
  2626. Set Var(01)(0x0002, 0x2003)
  2627. Sub(0D)(0x0002, 0x1011)
  2628. Mul(0E)(0x0002, 0x2004)
  2629. Add(0C)(0x0001, 0x0002)
  2630. Mul(0E)(0x0002, 0x100E)
  2631. Add(0C)(0x0001, 0x0002)
  2632. ???(22)(0x2001)
  2633.  
  2634. LoopStart?(03)()
  2635. if!(07)(0x1003) AndNot(19)(0x1004)
  2636. {
  2637.     if(06)(0x1002, 0x2005)  AndNot(19)(0x1002, 0x2006)
  2638.     {
  2639.         Button(0B)(0x0004)
  2640.     }
  2641.     RestartLoop?(04)()
  2642. }
  2643. ???(22)(0x2007)
  2644. ExitLoop?(05)()
  2645. ???(14)()
  2646. RestartLoop?(04)()
  2647.  
  2648. LoopStart?(03)()
  2649. Button(0B)(0x0004)
  2650. if(06)(0x1017) And(18)(0x1009, 0x1011, 0x2008) And(18)(0x1000, 0x2001) AndNot(19)(0x1002, 0x2001)
  2651. {
  2652.     Sub(0D)(0x0001, 0x2009)
  2653. }
  2654. else
  2655. {
  2656.     Sub(0D)(0x0001, 0x2005)
  2657.     if(06)(0x100A, 0x0001, 0x200A)
  2658.     {
  2659.         Return(00)()
  2660.     }
  2661. }
  2662. if(06)(0x100F, 0x0001)
  2663. {
  2664.     Set Var(01)(0x0001, 0x100E)
  2665.     Mul(0E)(0x0001, 0x200B)
  2666.     ???(22)(0x2000)
  2667.     ExitLoop?(05)()
  2668. }
  2669. RestartLoop?(04)()
  2670.  
  2671. LoopStart?(03)()
  2672. Button(0B)(0x0004)
  2673. if(06)(0x1002, 0x0001)
  2674. {
  2675.     Set Var(01)(0x0003, 0x100E)
  2676.     Set Var(01)(0x0002, 0x1002)
  2677.     Mul(0E)(0x0002, 0x1003)
  2678.     if(06)(0x1008, 0x0002, 0x200A)
  2679.     {
  2680.         Mul(0E)(0x0003, 0x200C)
  2681.     }
  2682.     else        if!(07)(0x1000, 0x200D)
  2683.         {
  2684.             Mul(0E)(0x0003, 0x200E)
  2685.             if(06)(0x1008, 0x0003, 0x200F)
  2686.             {
  2687.                 Add(0C)(0x0003, 0x2010)
  2688.             }
  2689.         }
  2690.         if(06)(0x1008, 0x1011, 0x2000)
  2691.         {
  2692.             Set Var(01)(0x0003, 0x2004)
  2693.         }
  2694.         else
  2695.         {
  2696.             if(06)(0x1008, 0x1011, 0x2008)
  2697.             {
  2698.                 Set Var(01)(0x0002, 0x2011)
  2699.                 Sub(0D)(0x0002, 0x1011)
  2700.                 Mul(0E)(0x0002, 0x2012)
  2701.                 if(06)(0x1008, 0x100E, 0x0002)
  2702.                 {
  2703.                     Set Var(01)(0x0003, 0x2004)
  2704.                 }
  2705.             }
  2706.             if(06)(0x1008, 0x0003, 0x200F)
  2707.             {
  2708.                 ExitLoop?(05)(0x0000)
  2709.             }
  2710.             else
  2711.             {
  2712.                 if(06)(0x1008, 0x0003, 0x2013)
  2713.                 {
  2714.                     Set Var(01)(0x0002, 0x2014)
  2715.                     Mul(0E)(0x0002, 0x100E)
  2716.                     Add(0C)(0x0002, 0x2005)
  2717.                     ???(22)(0x0002)
  2718.                     ExitLoop?(05)(0x0001)
  2719.                 }
  2720.                 else
  2721.                 {
  2722.                     if(06)(0x1010, 0x2015)                  And(18)(0x1015)
  2723.                     {
  2724.                         if(06)(0x1008, 0x0003, 0x2016)
  2725.                         {
  2726.                             ExitLoop?(05)(0x0002)
  2727.                         }
  2728.                         else
  2729.                         {
  2730.                             ExitLoop?(05)(0x0003)
  2731.                         }
  2732.                     }
  2733.                     else
  2734.                     {
  2735.                         Return(00)()
  2736.                     }
  2737.                 }
  2738.                 RestartLoop?(04)()
  2739.  
  2740.                 LoopStart?(03)(0x0000)
  2741.                 Button(0B)(0x0004)
  2742.                 if(06)(0x1002, 0x2006)
  2743.                 {
  2744.                     Stick(0A)(0x2005)
  2745.                     if(06)(0x1002, 0x200B)
  2746.                     {
  2747.                         ???(1A)(0x200A)
  2748.                     }
  2749.                 }
  2750.                 if!(07)(0x100F, 0x0001)
  2751.                 {
  2752.                     Return(00)()
  2753.                 }
  2754.                 RestartLoop?(04)()
  2755.  
  2756.                 LoopStart?(03)(0x0002)
  2757.                 if(06)(0x1002, 0x2017)
  2758.                 {
  2759.                     Stick(0A)(0x200A, 0x2005)
  2760.                     Button(0B)(0x0001)
  2761.                     if(06)(0x1002, 0x2017)
  2762.                     {
  2763.                         ???(1A)(0x200A)
  2764.                     }
  2765.                 }
  2766.                 if!(07)(0x100F, 0x0001)
  2767.                 {
  2768.                     Return(00)()
  2769.                 }
  2770.                 RestartLoop?(04)()
  2771.  
  2772.                 LoopStart?(03)(0x0003)
  2773.                 Button(0B)(0x0004)
  2774.                 if(06)(0x1002, 0x2017)
  2775.                 {
  2776.                     Button(0B)(0x0001)
  2777.                     if(06)(0x1002, 0x2017)
  2778.                     {
  2779.                         ???(1A)(0x200A)
  2780.                     }
  2781.                 }
  2782.                 if!(07)(0x100F, 0x0001)
  2783.                 {
  2784.                     Return(00)()
  2785.                 }
  2786.                 RestartLoop?(04)()
  2787.  
  2788.                 LoopStart?(03)(0x0001)
  2789.                 Button(0B)(0x0004)
  2790.                 RestartLoop?(04)()
  2791.                 RestartLoop?(04)()
  2792.  
  2793. 6030
  2794. ------------------------------
  2795. global-00 = 2.000
  2796. global-01 = 0.000
  2797. global-02 = 1.000
  2798. global-03 = 100.000
  2799. global-04 = -0.200
  2800. global-05 = 0.600
  2801. global-06 = 0.400
  2802. global-07 = 2.000
  2803. global-08 = 8.000
  2804. global-09 = 0.700
  2805. global-0A = 0.500
  2806. global-0B = 3.000
  2807. global-0C = 15.000
  2808. global-0D = 25.000
  2809. global-0E = -1.000
  2810. global-0F = 55.000
  2811. global-10 = 4.000
  2812. global-11 = 45.000
  2813. global-12 = 0.300
  2814. global-13 = 0.100
  2815. global-14 = 0.200
  2816. global-15 = -0.600
  2817. global-16 = 0.000
  2818. global-17 = 0.000
  2819. global-18 = 0.000
  2820. Set Var(01)(0x0000, 0x2000)
  2821. Set Var(01)(0x0001, 0x2001)
  2822. ???(02)(0x0002, 0x1009)
  2823. if(06)(0x100C, 0x603D)
  2824. {
  2825.     ExitLoop?(05)(0x0000)
  2826.     RestartLoop?(04)()
  2827. }
  2828. if(06)(0x100C, 0x6035) Or(16)(0x100C, 0x6036) Or(16)(0x100C, 0x6037)
  2829. {
  2830.     Set Var(01)(0x0004, 0x2002)
  2831.     Set Var(01)(0x0005, 0x2002)
  2832. }
  2833. else
  2834. {
  2835.     if(06)(0x100C, 0x6031)  Or(16)(0x100C, 0x6038)
  2836.     {
  2837.         Set Var(01)(0x0004, 0x2001)
  2838.         Set Var(01)(0x0005, 0x2001)
  2839.     }
  2840.     else
  2841.     {
  2842.         if(06)(0x100C, 0x603C)
  2843.         {
  2844.             Set Var(01)(0x0004, 0x1011)
  2845.             Sub(0D)(0x0004, 0x2003)
  2846.             Mul(0E)(0x0004, 0x2004)
  2847.             ???(15)(0x0005)
  2848.             Mul(0E)(0x0005, 0x2005)
  2849.             Add(0C)(0x0005, 0x2006)
  2850.             Mul(0E)(0x0004, 0x0005)
  2851.             Add(0C)(0x0004, 0x2007)
  2852.             Set Var(01)(0x0005, 0x2001)
  2853.         }
  2854.         else
  2855.         {
  2856.             if(06)(0x100C, 0x603A)          Or(16)(0x100C, 0x6039)          Or(16)(0x100C, 0x603B)
  2857.             {
  2858.                 Set Var(01)(0x0004, 0x2002)
  2859.                 Set Var(01)(0x0005, 0x2002)
  2860.             }
  2861.             else
  2862.             {
  2863.                 Set Var(01)(0x0004, 0x2008)
  2864.                 Set Var(01)(0x0005, 0x2009)
  2865.             }
  2866.             if(06)(0x1008, 0x100E, 0x200A)
  2867.             {
  2868.                 Add(0C)(0x0004, 0x200A)
  2869.             }
  2870.             Set Var(01)(0x0006, 0x0004)
  2871.             Add(0C)(0x0006, 0x1012, 0x200B)
  2872.             if(06)(0x100C, 0x6036)          And(18)(0x101B)
  2873.             {
  2874.                 Set Var(01)(0x0007, 0x200C)
  2875.                 Mul(0E)(0x0007, 0x100E)
  2876.                 Add(0C)(0x0006, 0x0007, 0x200D)
  2877.             }
  2878.             Set Var(01)(0x0008, 0x200E)
  2879.  
  2880.             LoopStart?(03)()
  2881.             if(06)(0x100C, 0x6031)          Or(16)(0x100C, 0x6032)          Or(16)(0x100C, 0x6033)          Or(16)(0x100C, 0x6034)          Or(16)(0x100C, 0x6038)          Or(16)(0x100C, 0x6039)          Or(16)(0x100C, 0x603A)          Or(16)(0x100C, 0x603B)          Or(16)(0x100C, 0x603C)
  2882.             {
  2883.                 ExitLoop?(05)(0x0001)
  2884.             }
  2885.             else
  2886.             {
  2887.                 ExitLoop?(05)()
  2888.             }
  2889.             ???(14)()
  2890.             RestartLoop?(04)()
  2891.  
  2892.             LoopStart?(03)()
  2893.             if(06)(0x1002, 0x0000)
  2894.             {
  2895.                 ExitLoop?(05)()
  2896.             }
  2897.             RestartLoop?(04)()
  2898.  
  2899.             LoopStart?(03)(0x0001)
  2900.             Set Var(01)(0x0009, 0x0005)
  2901.             if!(07)(0x1002, 0x0004)
  2902.             {
  2903.                 Mul(0E)(0x0009, 0x1007)
  2904.                 Div(0F)(0x0009, 0x0004)
  2905.             }
  2906.             if(06)(0x100C, 0x6032)          Or(16)(0x100C, 0x6035)          Or(16)(0x100C, 0x6039)
  2907.             {
  2908.                 Mul(0E)(0x0009, 0x1003)
  2909.                 ???(1F)(0x0009)
  2910.             }
  2911.             else
  2912.             {
  2913.                 if(06)(0x100C, 0x6033)              Or(16)(0x100C, 0x6036)              Or(16)(0x100C, 0x603A)
  2914.                 {
  2915.                     Stick(0A)(0x2001, 0x0009)
  2916.                 }
  2917.                 else
  2918.                 {
  2919.                     if(06)(0x100C, 0x6034)                  Or(16)(0x100C, 0x6037)                  Or(16)(0x100C, 0x603B)
  2920.                     {
  2921.                         Mul(0E)(0x0009, 0x200E)
  2922.                         Stick(0A)(0x2001, 0x0009)
  2923.                     }
  2924.                     if(06)(0x100C, 0x603C)
  2925.                     {
  2926.                         Button(0B)(0x0004)
  2927.                     }
  2928.                     if(06)(0x1002, 0x0004)
  2929.                     {
  2930.                         if(06)(0x1008, 0x0001, 0x2002)
  2931.                         {
  2932.                             if(06)(0x100C, 0x6038)                          Or(16)(0x100C, 0x6039)                          Or(16)(0x100C, 0x603A)                          Or(16)(0x100C, 0x603B)
  2933.                             {
  2934.                                 Button(0B)(0x0002)
  2935.                             }
  2936.                             else
  2937.                             {
  2938.                                 Button(0B)(0x0001)
  2939.                             }
  2940.                             Set Var(01)(0x0001, 0x1013)
  2941.                             if(06)(0x1008, 0x0008, 0x2001)                          And(18)(0x1007, 0x1011, 0x200F)
  2942.                             {
  2943.                                 if(06)(0x100C, 0x6032)                              Or(16)(0x100C, 0x6035)
  2944.                                 {
  2945.                                     Set Var(01)(0x0008, 0x2002)
  2946.                                     if(06)(0x1008, 0x0006, 0x2010)
  2947.                                     {
  2948.                                         Add(0C)(0x0006, 0x2010)
  2949.                                     }
  2950.                                 }
  2951.                                 else
  2952.                                 {
  2953.                                     if(06)(0x101E, 0x0023)                                  And(18)(0x100C, 0x6038)
  2954.                                     {
  2955.                                         Set Var(01)(0x0008, 0x2002)
  2956.                                         if(06)(0x1008, 0x0006, 0x2010)
  2957.                                         {
  2958.                                             Add(0C)(0x0006, 0x2010)
  2959.                                         }
  2960.                                     }
  2961.                                 }
  2962.                             }
  2963.                             else
  2964.                             {
  2965.                                 Sub(0D)(0x0001, 0x2002)
  2966.                             }
  2967.                             if(06)(0x1007, 0x0008, 0x2001)
  2968.                             {
  2969.                                 if(06)(0x1007, 0x0008, 0x2002)
  2970.                                 {
  2971.                                     Set Goto?(1C)(0x0002)
  2972.                                 }
  2973.                                 else
  2974.                                 {
  2975.                                     Add(0C)(0x0008, 0x2002)
  2976.                                 }
  2977.                             }
  2978.                             if!(07)(0x100C, 0x6037)                             And(18)(0x1007, 0x1011, 0x2011)
  2979.                             {
  2980.                                 Set Var(01)(0x000A, 0x1002)
  2981.                                 Mul(0E)(0x000A, 0x1003)
  2982.                                 if(06)(0x1008, 0x000A, 0x2001)
  2983.                                 {
  2984.                                     Set Var(01)(0x0006, 0x2001)
  2985.                                 }
  2986.                             }
  2987.                             if(06)(0x1007, 0x1011, 0x200F)                          AndNot(19)(0x101C)                          AndNot(19)(0x101B)
  2988.                             {
  2989.                                 if(06)(0x100C, 0x6035)
  2990.                                 {
  2991.                                     Set Var(01)(0x0007, 0x1001)
  2992.                                     Mul(0E)(0x0007, 0x2012)
  2993.                                     if(06)(0x1000, 0x0007)
  2994.                                     {
  2995.                                         Set Var(01)(0x0006, 0x2001)
  2996.                                     }
  2997.                                 }
  2998.                                 else
  2999.                                 {
  3000.                                     if(06)(0x100C, 0x6036)
  3001.                                     {
  3002.                                         Set Var(01)(0x0007, 0x1001)
  3003.                                         Mul(0E)(0x0007, 0x2013)
  3004.                                         if(06)(0x1001, 0x0007)
  3005.                                         {
  3006.                                             Set Var(01)(0x0006, 0x2001)
  3007.                                         }
  3008.                                     }
  3009.                                     else
  3010.                                     {
  3011.                                         if(06)(0x100C, 0x6037)
  3012.                                         {
  3013.                                             Set Var(01)(0x0007, 0x1001)
  3014.                                             Mul(0E)(0x0007, 0x2014)
  3015.                                             if(06)(0x1001, 0x0007)
  3016.                                             {
  3017.                                                 Set Var(01)(0x0006, 0x2001)
  3018.                                             }
  3019.                                         }
  3020.                                     }
  3021.                                     if(06)(0x100C, 0x6036)                                  And(18)(0x101B)
  3022.                                     {
  3023.                                         ???(2E)(0x0002, 0x0003, 0x200A)
  3024.                                         Sub(0D)(0x0003, 0x1027)
  3025.                                         if(06)(0x1008, 0x0003, 0x2008)
  3026.                                         {
  3027.                                             Set Var(01)(0x0006, 0x2001)
  3028.                                         }
  3029.                                     }
  3030.                                     if(06)(0x1002, 0x0006)
  3031.                                     {
  3032.                                         if(06)(0x1007, 0x0008, 0x2001)
  3033.                                         {
  3034.                                             ExitLoop?(05)()
  3035.                                         }
  3036.                                         else
  3037.                                         {
  3038.                                             Return(00)()
  3039.                                         }
  3040.                                     }
  3041.                                 }
  3042.                                 RestartLoop?(04)()
  3043.  
  3044.                                 LoopStart?(03)()
  3045.                                 if(06)(0x1002, 0x2010)
  3046.                                 {
  3047.                                     Return(00)()
  3048.                                 }
  3049.                                 Set Goto?(1C)(0x0002)
  3050.                                 RestartLoop?(04)()
  3051.  
  3052.                                 LoopStart?(03)(0x0002)
  3053.                                 Set Var(01)(0x000C, 0x1027)
  3054.                                 Mul(0E)(0x000C, 0x2005)
  3055.                                 Add(0C)(0x000C, 0x100B)
  3056.                                 if(06)(0x1007, 0x100C, 0x000C)
  3057.                                 {
  3058.                                     Stick(0A)(0x2001, 0x2005)
  3059.                                 }
  3060.                                 else
  3061.                                 {
  3062.                                     Set Var(01)(0x000D, 0x1028)
  3063.                                     Add(0C)(0x000D, 0x100C)
  3064.                                     if(06)(0x1008, 0x000D, 0x000C)
  3065.                                     {
  3066.                                         Stick(0A)(0x2001, 0x2015)
  3067.                                     }
  3068.                                     else
  3069.                                     {
  3070.                                         Set Var(01)(0x000C, 0x1027)
  3071.                                         Add(0C)(0x000C, 0x100B, 0x2007)
  3072.                                         if(06)(0x1007, 0x000D, 0x000C)
  3073.                                         {
  3074.                                             Stick(0A)(0x2001, 0x2005)
  3075.                                         }
  3076.                                     }
  3077.                                 }
  3078.                                 RestartLoop?(04)()
  3079.  
  3080.                                 LoopStart?(03)(0x0000)
  3081.                                 if(06)(0x1002, 0x2010)
  3082.                                 {
  3083.                                     Return(00)()
  3084.                                 }
  3085.                                 RestartLoop?(04)()
  3086.                                 RestartLoop?(04)()
  3087.  
  3088. 6040
  3089. ------------------------------
  3090. global-00 = 0.000
  3091. global-01 = 3.000
  3092. global-02 = -1.000
  3093. global-03 = 1.000
  3094. global-04 = -0.600
  3095. global-05 = 55.000
  3096. global-06 = 4.000
  3097. global-07 = 0.600
  3098. global-08 = 2.000
  3099. global-09 = 0.000
  3100. Set Var(01)(0x0000, 0x2000)
  3101. Set Var(01)(0x0001, 0x2001)
  3102. Add(0C)(0x0001, 0x1012)
  3103. Set Var(01)(0x0002, 0x2002)
  3104.  
  3105. LoopStart?(03)()
  3106. if(06)(0x100C, 0x6042)
  3107. {
  3108.     Stick(0A)(0x2003)
  3109. }
  3110. else
  3111. {
  3112.     if(06)(0x100C, 0x6043)
  3113.     {
  3114.         Stick(0A)(0x2002)
  3115.     }
  3116.     else
  3117.     {
  3118.         if(06)(0x100C, 0x6047)
  3119.         {
  3120.             ???(1F)(0x1003)
  3121.         }
  3122.         else
  3123.         {
  3124.             if(06)(0x100C, 0x6044)          Or(16)(0x100C, 0x6048)
  3125.             {
  3126.                 Stick(0A)(0x2000, 0x2003)
  3127.             }
  3128.             else
  3129.             {
  3130.                 if(06)(0x100C, 0x6045)              Or(16)(0x100C, 0x6049)
  3131.                 {
  3132.                     Stick(0A)(0x2000, 0x2004)
  3133.                 }
  3134.                 if(06)(0x1008, 0x0000, 0x2003)
  3135.                 {
  3136.                     if(06)(0x100C, 0x6046)                  Or(16)(0x100C, 0x6047)                  Or(16)(0x100C, 0x6048)                  Or(16)(0x100C, 0x6049)
  3137.                     {
  3138.                         Button(0B)(0x0002)
  3139.                     }
  3140.                     else
  3141.                     {
  3142.                         Button(0B)(0x0001)
  3143.                     }
  3144.                     Set Var(01)(0x0000, 0x1013)
  3145.                     if(06)(0x1008, 0x0002, 0x2000)                  And(18)(0x1007, 0x1011, 0x2005)
  3146.                     {
  3147.                         if(06)(0x101E, 0x0023)                      And(18)(0x100C, 0x6046)
  3148.                         {
  3149.                             Set Var(01)(0x0002, 0x2003)
  3150.                             if(06)(0x1008, 0x0001, 0x2006)
  3151.                             {
  3152.                                 Add(0C)(0x0001, 0x2006)
  3153.                             }
  3154.                         }
  3155.                     }
  3156.                 }
  3157.                 else
  3158.                 {
  3159.                     Sub(0D)(0x0000, 0x2003)
  3160.                 }
  3161.                 if(06)(0x1007, 0x0002, 0x2000)
  3162.                 {
  3163.                     if(06)(0x1007, 0x0002, 0x2003)
  3164.                     {
  3165.                         Set Goto?(1C)(0x0000)
  3166.                     }
  3167.                     else
  3168.                     {
  3169.                         Add(0C)(0x0002, 0x2003)
  3170.                     }
  3171.                 }
  3172.                 if(06)(0x1002, 0x0001)
  3173.                 {
  3174.                     if(06)(0x1007, 0x0002, 0x2000)
  3175.                     {
  3176.                         ExitLoop?(05)()
  3177.                     }
  3178.                     else                        if!(07)(0x100D)
  3179.                         {
  3180.                             Call AI(1B)(0x1080)
  3181.                         }
  3182.                         Return(00)()
  3183.                     }
  3184.                     RestartLoop?(04)()
  3185.  
  3186.                     LoopStart?(03)()
  3187.                     if(06)(0x1002, 0x2006)
  3188.                     {
  3189.                         Return(00)()
  3190.                     }
  3191.                     Set Goto?(1C)(0x0000)
  3192.                     RestartLoop?(04)()
  3193.  
  3194.                     LoopStart?(03)(0x0000)
  3195.                     Set Var(01)(0x0003, 0x1027)
  3196.                     Mul(0E)(0x0003, 0x2007)
  3197.                     Add(0C)(0x0003, 0x100B)
  3198.                     if(06)(0x1007, 0x100C, 0x0003)
  3199.                     {
  3200.                         Stick(0A)(0x2000, 0x2007)
  3201.                     }
  3202.                     else
  3203.                     {
  3204.                         Set Var(01)(0x0004, 0x1028)
  3205.                         Add(0C)(0x0004, 0x100C)
  3206.                         if(06)(0x1008, 0x0004, 0x0003)
  3207.                         {
  3208.                             Stick(0A)(0x2000, 0x2004)
  3209.                         }
  3210.                         else
  3211.                         {
  3212.                             Set Var(01)(0x0003, 0x1027)
  3213.                             Add(0C)(0x0003, 0x100B, 0x2008)
  3214.                             if(06)(0x1007, 0x0004, 0x0003)
  3215.                             {
  3216.                                 Stick(0A)(0x2000, 0x2007)
  3217.                             }
  3218.                         }
  3219.                     }
  3220.                     RestartLoop?(04)()
  3221.                     RestartLoop?(04)()
  3222.  
  3223. 30A0
  3224. ------------------------------
  3225. global-00 = 20.000
  3226. global-01 = 10.000
  3227. global-02 = 100.000
  3228. global-03 = 0.050
  3229. global-04 = 1.000
  3230. global-05 = 0.000
  3231. global-06 = -1.000
  3232. global-07 = 2.000
  3233. global-08 = 0.000
  3234. global-09 = 0.000
  3235. global-0A = 0.000
  3236. ???(22)(0x2000)
  3237.  
  3238. LoopStart?(03)()
  3239. if!(07)(0x1003) AndNot(19)(0x1004)
  3240. {
  3241.     RestartLoop?(04)()
  3242. }
  3243. ???(22)(0x2001)
  3244. ExitLoop?(05)()
  3245. ???(14)()
  3246. RestartLoop?(04)()
  3247. Set Var(01)(0x0000, 0x2002)
  3248. Sub(0D)(0x0000, 0x1011)
  3249. Mul(0E)(0x0000, 0x2003, 0x100E)
  3250. Add(0C)(0x0000, 0x2004)
  3251.  
  3252. LoopStart?(03)()
  3253. Button(0B)(0x0004)
  3254. if(06)(0x1002, 0x0000)
  3255. {
  3256.     Stick(0A)(0x2005, 0x2006)
  3257.     ExitLoop?(05)()
  3258. }
  3259. RestartLoop?(04)()
  3260.  
  3261. LoopStart?(03)()
  3262. if(06)(0x1002, 0x2007)
  3263. {
  3264.     Return(00)()
  3265. }
  3266. else
  3267. {
  3268.     Button(0B)(0x0004)
  3269.     Stick(0A)(0x2005, 0x2006)
  3270. }
  3271. RestartLoop?(04)()
  3272. RestartLoop?(04)()
  3273.  
  3274. 30B0
  3275. ------------------------------
  3276. global-00 = 15.000
  3277. global-01 = 100.000
  3278. global-02 = 0.150
  3279. global-03 = 0.050
  3280. global-04 = 3.000
  3281. global-05 = 2.000
  3282. global-06 = 0.000
  3283. global-07 = 0.500
  3284. global-08 = 50.000
  3285. global-09 = 20.000
  3286. global-0A = 8.000
  3287. global-0B = 40.000
  3288. global-0C = 0.700
  3289. global-0D = 1.000
  3290. global-0E = -1.000
  3291. global-0F = 60.000
  3292. global-10 = 6.000
  3293. global-11 = 12.000
  3294. global-12 = 0.400
  3295. ???(22)(0x2000)
  3296. Set Var(01)(0x0000, 0x2001)
  3297. Sub(0D)(0x0000, 0x1011)
  3298. Set Var(01)(0x0001, 0x0000)
  3299. Mul(0E)(0x0000, 0x2002, 0x100E)
  3300. Mul(0E)(0x0001, 0x2003)
  3301. Add(0C)(0x0000, 0x0001)
  3302. Set Var(01)(0x0001, 0x100E)
  3303. Mul(0E)(0x0001, 0x2004)
  3304. Sub(0D)(0x0001, 0x2005)
  3305. Add(0C)(0x0000, 0x0001)
  3306.  
  3307. LoopStart?(03)()
  3308. Set Var(01)(0x0002, 0x1002)
  3309. Mul(0E)(0x0002, 0x1003)
  3310. if(06)(0x1008, 0x0002, 0x2006)
  3311. {
  3312.     Set Var(01)(0x0002, 0x2007)
  3313.     Mul(0E)(0x0002, 0x1003)
  3314.     ???(1F)(0x0002)
  3315. }
  3316. if(06)(0x1017) And(18)(0x1001, 0x2008)
  3317. {
  3318.     ???(22)(0x2009)
  3319.     ExitLoop?(05)()
  3320.     ???(14)()
  3321. }
  3322. RestartLoop?(04)()
  3323.  
  3324. LoopStart?(03)()
  3325. if(06)(0x1002, 0x0000) And(18)(0x1003)
  3326. {
  3327.     Button(0B)(0x0004)
  3328.     Set Var(01)(0x0000, 0x2001)
  3329.     Sub(0D)(0x0000, 0x1011)
  3330.     Mul(0E)(0x0000, 0x2003, 0x100E)
  3331.     Set Var(01)(0x0001, 0x100E)
  3332.     if!(07)(0x101A)
  3333.     {
  3334.         Mul(0E)(0x0001, 0x200A)
  3335.     }
  3336.     Sub(0D)(0x0001, 0x2005)
  3337.     Add(0C)(0x0000, 0x0001)
  3338.     ???(22)(0x200B)
  3339.     ExitLoop?(05)()
  3340.     ???(14)()
  3341. }
  3342. RestartLoop?(04)()
  3343.  
  3344. LoopStart?(03)()
  3345. Button(0B)(0x0004)
  3346. if(06)(0x1002, 0x0000)
  3347. {
  3348.     Set Var(01)(0x0001, 0x100E)
  3349.     if(06)(0x101A)
  3350.     {
  3351.         Mul(0E)(0x0001, 0x200C)
  3352.     }
  3353.     if(06)(0x1008, 0x0001, 0x2007)
  3354.     {
  3355.         Stick(0A)(0x200D)
  3356.         Return(00)()
  3357.     }
  3358.     else
  3359.     {
  3360.         if(06)(0x1008, 0x0001, 0x200C)
  3361.         {
  3362.             Stick(0A)(0x200E)
  3363.             Return(00)()
  3364.         }
  3365.         else
  3366.         {
  3367.             Stick(0A)(0x2006, 0x200E)
  3368.             ExitLoop?(05)()
  3369.         }
  3370.     }
  3371.     RestartLoop?(04)()
  3372.  
  3373.     LoopStart?(03)()
  3374.     if(06)(0x1002, 0x2005)      if!(07)(0x100F, 0x0002)
  3375.         {
  3376.             if(06)(0x1007, 0x1011, 0x200F)
  3377.             {
  3378.                 if(06)(0x1000, 0x2010)
  3379.                 {
  3380.                     ???(15)(0x0003)
  3381.                     if(06)(0x1008, 0x0003, 0x2007)
  3382.                     {
  3383.                         Call AI(1B)(0x603C)
  3384.                     }
  3385.                     else
  3386.                     {
  3387.                         if(06)(0x1008, 0x0003, 0x200C)
  3388.                         {
  3389.                             Call AI(1B)(0x1010)
  3390.                         }
  3391.                     }
  3392.                     else
  3393.                     {
  3394.                         if(06)(0x1000, 0x2011)
  3395.                         {
  3396.                             ???(15)(0x0003)
  3397.                             if(06)(0x1008, 0x0003, 0x2012)
  3398.                             {
  3399.                                 Call AI(1B)(0x1010)
  3400.                             }
  3401.                         }
  3402.                     }
  3403.                     Return(00)()
  3404.                 }
  3405.             }
  3406.             else
  3407.             {
  3408.                 Button(0B)(0x0004)
  3409.                 Stick(0A)(0x2006, 0x200E)
  3410.             }
  3411.             RestartLoop?(04)()
  3412.             RestartLoop?(04)()
  3413.  
  3414. 3090
  3415. ------------------------------
  3416. global-00 = 8.000
  3417. global-01 = 20.000
  3418. global-02 = 0.000
  3419. global-03 = 0.200
  3420. global-04 = 0.300
  3421. global-05 = 12.000
  3422. global-06 = 4.000
  3423. global-07 = 50.000
  3424. global-08 = 60.000
  3425. global-09 = 0.600
  3426. global-0A = 10.000
  3427. global-0B = -1.000
  3428. global-0C = -0.700
  3429. global-0D = 3.000
  3430. global-0E = 0.750
  3431. global-0F = 2.000
  3432. global-10 = 1.000
  3433. global-11 = 6.000
  3434. global-12 = 40.000
  3435. global-13 = 0.500
  3436. Set Var(01)(0x0000, 0x2000)
  3437. Set Var(01)(0x0001, 0x2001)
  3438. Set Var(01)(0x0002, 0x2002)
  3439. Set Var(01)(0x0003, 0x100E)
  3440. Mul(0E)(0x0003, 0x2003)
  3441. Add(0C)(0x0003, 0x2004)
  3442. Mul(0E)(0x0003, 0x1001)
  3443. Set Var(01)(0x0004, 0x100E)
  3444. Mul(0E)(0x0004, 0x2005)
  3445. Add(0C)(0x0004, 0x2006)
  3446. ???(22)(0x2007)
  3447.  
  3448. LoopStart?(03)()
  3449. if(06)(0x1008, 0x1010, 0x0001) Or(16)(0x0001)
  3450. {
  3451.     ExitLoop?(05)(0x0000)
  3452.     RestartLoop?(04)()
  3453. }
  3454. Set Var(01)(0x0002, 0x1003)
  3455. if(06)(0x1000, 0x0003)
  3456. {
  3457.     ???(22)(0x2008)
  3458.     if(06)(0x1008, 0x100E, 0x2009)  Or(16)(0x1000, 0x200A)
  3459.     {
  3460.         Mul(0E)(0x0002, 0x200B)
  3461.         ExitLoop?(05)(0x0001)
  3462.     }
  3463.     else
  3464.     {
  3465.         Mul(0E)(0x0002, 0x200C)
  3466.         Mul(0E)(0x0004, 0x200D)
  3467.         ExitLoop?(05)(0x0002)
  3468.     }
  3469.     ???(14)()
  3470. }
  3471. if!(07)(0x1002, 0x0000)
  3472. {
  3473.     Mul(0E)(0x0002, 0x200E)
  3474. }
  3475. ???(1F)(0x0002)
  3476. RestartLoop?(04)()
  3477.  
  3478. LoopStart?(03)(0x0001)
  3479. if(06)(0x1002, 0x0004)
  3480. {
  3481.     ExitLoop?(05)(0x0000)
  3482.     RestartLoop?(04)()
  3483. }
  3484. else    if!(07)(0x1002, 0x200F)
  3485.     {
  3486.         ???(1F)(0x0002)
  3487.     }
  3488.     RestartLoop?(04)()
  3489.  
  3490.     LoopStart?(03)(0x0002)
  3491.     if(06)(0x1002, 0x0004)
  3492.     {
  3493.         ExitLoop?(05)(0x0000)
  3494.         RestartLoop?(04)()
  3495.     }
  3496.     else
  3497.     {
  3498.         ???(1F)(0x0002)
  3499.     }
  3500.     RestartLoop?(04)()
  3501.  
  3502.     LoopStart?(03)(0x0000)
  3503.     if!(07)(0x1002, 0x200F)
  3504.     {
  3505.         Set Var(01)(0x0005, 0x1002)
  3506.         Mul(0E)(0x0005, 0x1003)
  3507.     }
  3508.     else
  3509.     {
  3510.         Set Var(01)(0x0005, 0x2010)
  3511.     }
  3512.     if(06)(0x1008, 0x0005, 0x2002)
  3513.     {
  3514.         Stick(0A)(0x200B)
  3515.     }
  3516.     else
  3517.     {
  3518.         ???(15)(0x0006)
  3519.         if(06)(0x1017, 0x2011)      And(18)(0x1001, 0x2012)
  3520.         {
  3521.             if(06)(0x1008, 0x0006, 0x2003)
  3522.             {
  3523.                 Call AI(1B)(0x1010)
  3524.             }
  3525.             else
  3526.             {
  3527.                 if(06)(0x1008, 0x0006, 0x2013)
  3528.                 {
  3529.                     Call AI(1B)(0x1020)
  3530.                 }
  3531.             }
  3532.             Return(00)()
  3533.         }
  3534.         RestartLoop?(04)()
  3535.         RestartLoop?(04)()
  3536.  
  3537. 0080
  3538. ------------------------------
  3539. global-00 = 20.000
  3540. global-01 = 180.000
  3541. global-02 = 10.000
  3542. global-03 = 15.000
  3543. global-04 = 40.000
  3544. global-05 = -1.000
  3545. global-06 = 0.000
  3546. global-07 = 1.000
  3547. global-08 = 30.000
  3548. global-09 = 3.000
  3549. global-0A = 2.000
  3550. global-0B = 0.000
  3551. global-0C = 0.000
  3552. if(06)(0x1005)
  3553. {
  3554.     ExitLoop?(05)(0x0000)
  3555.     ???(14)()
  3556. }
  3557. ???(22)(0x2000)
  3558.  
  3559. LoopStart?(03)()
  3560. if(06)(0x0001)
  3561. {
  3562.     Return(00)()
  3563. }
  3564. if!(07)(0x1003) AndNot(19)(0x1004)
  3565. {
  3566.     RestartLoop?(04)()
  3567. }
  3568. ???(22)(0x2001)
  3569. ExitLoop?(05)()
  3570. ???(14)()
  3571. RestartLoop?(04)()
  3572.  
  3573. LoopStart?(03)(0x0001)
  3574. if(06)(0x0001)
  3575. {
  3576.     Return(00)()
  3577. }
  3578. if(06)(0x1002, 0x2002) AndNot(19)(0x1005)
  3579. {
  3580.     Return(00)()
  3581. }
  3582. if(06)(0x1012)
  3583. {
  3584.     if(06)(0x1001, 0x2003)
  3585.     {
  3586.         Call AI(1B)(0x1080)
  3587.         Return(00)()
  3588.     }
  3589. }
  3590. Set Var(01)(0x0000, 0x1005)
  3591. Sub(0D)(0x0000, 0x1004)
  3592. Mul(0E)(0x0000, 0x1025)
  3593. if(06)(0x1007, 0x0000, 0x2002)
  3594. {
  3595.     if(06)(0x1012)  And(18)(0x1001, 0x2004)
  3596.     {
  3597.         Call AI(1B)(0x1080)
  3598.     }
  3599.     Return(00)()
  3600. }
  3601. if(06)(0x1012) AndNot(19)(0x100D) And(18)(0x1008, 0x1010, 0x2002)
  3602. {
  3603.     Call AI(1B)(0x1080)
  3604.     Return(00)()
  3605. }
  3606. Set Var(01)(0x0001, 0x1025)
  3607. Mul(0E)(0x0001, 0x2005)
  3608. ???(1F)(0x0001)
  3609. if!(07)(0x1002, 0x2000)
  3610. {
  3611.     Stick(0A)(0x2006, 0x2007)
  3612. }
  3613. if(06)(0x1002, 0x2008) And(18)(0x1007, 0x100F, 0x2006) And(18)(0x1008, 0x100D, 0x2006)
  3614. {
  3615.     ExitLoop?(05)()
  3616.     ???(22)(0x2001)
  3617. }
  3618. RestartLoop?(04)()
  3619.  
  3620. LoopStart?(03)(0x0000)
  3621. if(06)(0x0001)
  3622. {
  3623.     Return(00)()
  3624. }
  3625. Set Var(01)(0x0001, 0x1025)
  3626. Mul(0E)(0x0001, 0x2005)
  3627. ???(1F)(0x0001)
  3628. if(06)(0x1002, 0x2009)
  3629. {
  3630.     if(06)(0x100D)
  3631.     {
  3632.         ???(23)(0x2005)
  3633.     }
  3634.     else
  3635.     {
  3636.         if(06)(0x1008, 0x100F, 0x200A)
  3637.         {
  3638.             ???(23)(0x2002)
  3639.         }
  3640.         ExitLoop?(05)(0x0001)
  3641.     }
  3642.     RestartLoop?(04)()
  3643.     RestartLoop?(04)()
  3644.  
  3645. 1140
  3646. ------------------------------
  3647. global-00 = 1.500
  3648. global-01 = 180.000
  3649. global-02 = 10.000
  3650. global-03 = 0.500
  3651. global-04 = 0.000
  3652. global-05 = 20.000
  3653. global-06 = 0.700
  3654. global-07 = -0.600
  3655. global-08 = 2.500
  3656. global-09 = 2.000
  3657. global-0A = 30.000
  3658. global-0B = -30.000
  3659. global-0C = 8.000
  3660. global-0D = 15.000
  3661. global-0E = 3.000
  3662. global-0F = 1.000
  3663. global-10 = 50.000
  3664. global-11 = 0.400
  3665. global-12 = -0.400
  3666. global-13 = -1.000
  3667. global-14 = 0.000
  3668. global-15 = 0.000
  3669. global-16 = 0.000
  3670. ???(2A)(0x6029)
  3671. ???(02)(0x0000, 0x1009)
  3672. Set Var(01)(0x0002, 0x1003)
  3673. if(06)(0x1005)
  3674. {
  3675.     if(06)(0x1008, 0x100F, 0x2000)
  3676.     {
  3677.         Return(00)()
  3678.     }
  3679.     ???(2A)(0x0000)
  3680.     ???(22)(0x2001)
  3681.     ExitLoop?(05)(0x0000)
  3682.     ???(14)()
  3683. }
  3684. ???(22)(0x2002)
  3685.  
  3686. LoopStart?(03)()
  3687. if!(07)(0x0001)
  3688. {
  3689.     Return(00)()
  3690. }
  3691. if!(07)(0x1003) AndNot(19)(0x1004)
  3692. {
  3693.     RestartLoop?(04)()
  3694. }
  3695. ???(22)(0x2001)
  3696. ???(2E)(0x0000, 0x0001, 0x2003)
  3697. if(06)(0x1008, 0x0001, 0x2004)
  3698. {
  3699.     ExitLoop?(05)(0x0001)
  3700.     ???(14)()
  3701. }
  3702. if(06)(0x1004)
  3703. {
  3704.     if(06)(0x1007, 0x1006, 0x2005)
  3705.     {
  3706.         Set Var(01)(0x0002, 0x1003)
  3707.         RestartLoop?(04)()
  3708.     }
  3709.     ExitLoop?(05)(0x0002)
  3710.     ???(14)()
  3711. }
  3712. if!(07)(0x1011, 0x0000) And(18)(0x1011, 0x6043) And(18)(0x1008, 0x100E, 0x2006)
  3713. {
  3714.     ExitLoop?(05)(0x0002)
  3715.     ???(14)()
  3716. }
  3717. ???(2A)(0x0000)
  3718. ExitLoop?(05)()
  3719. ???(14)()
  3720. RestartLoop?(04)()
  3721.  
  3722. LoopStart?(03)()
  3723. Set Var(01)(0x0002, 0x1003)
  3724. Mul(0E)(0x0002, 0x2007)
  3725. ???(1F)(0x0002)
  3726. Set Var(01)(0x0002, 0x1003)
  3727. ExitLoop?(05)()
  3728. RestartLoop?(04)()
  3729.  
  3730. LoopStart?(03)(0x0002)
  3731. ???(31)(0x0004)
  3732. if(06)(0x1008, 0x100F, 0x2008) And(18)(0x1008, 0x100D, 0x2004)
  3733. {
  3734.     if(06)(0x1008, 0x100F, 0x2003)
  3735.     {
  3736.         Return(00)()
  3737.     }
  3738.     Set Var(01)(0x0006, 0x100D)
  3739.     if(06)(0x101E, 0x0006)  Or(16)(0x101E, 0x002C)
  3740.     {
  3741.         Mul(0E)(0x0006, 0x2009)
  3742.     }
  3743.     else
  3744.     {
  3745.         Mul(0E)(0x0006, 0x200A)
  3746.     }
  3747.     Add(0C)(0x0006, 0x100B)
  3748.     Sub(0D)(0x0006, 0x0005)
  3749.     if(06)(0x1008, 0x0006, 0x200B)
  3750.     {
  3751.         Return(00)()
  3752.     }
  3753. }
  3754. Set Goto?(1C)(0x0003)
  3755. if!(07)(0x1002, 0x200C) And(18)(0x1008, 0x100B, 0x100C) And(18)(0x1000, 0x2002)
  3756. {
  3757.     ???(1F)(0x2004)
  3758. }
  3759. else
  3760. {
  3761.     ???(1F)(0x0002)
  3762. }
  3763. if(06)(0x1002, 0x2002) AndNot(19)(0x1005)
  3764. {
  3765.     Return(00)()
  3766. }
  3767. if(06)(0x1012)
  3768. {
  3769.     if(06)(0x1001, 0x200D)      if!(07)(0x1011, 0x0000)
  3770.         {
  3771.             Call AI(1B)()
  3772.         }
  3773.         else
  3774.         {
  3775.             Call AI(1B)(0x1080)
  3776.         }
  3777.         Return(00)()
  3778.     }
  3779. }
  3780. ???(2E)(0x0000, 0x0001, 0x2003)
  3781. if!(07)(0x1002, 0x2002)
  3782. {
  3783.     if(06)(0x1005)  OrNot(17)(0x1002, 0x200E)   Or(16)(0x1007, 0x0001, 0x2005)
  3784.     {
  3785.         Stick(0A)(0x2004, 0x200F)
  3786.     }
  3787. }
  3788. if(06)(0x1002, 0x2002) And(18)(0x1008, 0x100D, 0x2004) And(18)(0x1007, 0x0001, 0x2002)
  3789. {
  3790.     ???(22)(0x2001)
  3791.     ExitLoop?(05)()
  3792. }
  3793. RestartLoop?(04)()
  3794.  
  3795. LoopStart?(03)(0x0000)
  3796. Set Goto?(1C)(0x0003)
  3797. ???(1F)(0x0002)
  3798. if(06)(0x1002, 0x200E)
  3799. {
  3800.     ExitLoop?(05)(0x0002)
  3801. }
  3802. RestartLoop?(04)()
  3803.  
  3804. LoopStart?(03)(0x0001)
  3805. if!(07)(0x0001)
  3806. {
  3807.     Return(00)()
  3808. }
  3809. ???(1F)(0x0002)
  3810. if(06)(0x1005)
  3811. {
  3812.     ExitLoop?(05)(0x0002)
  3813. }
  3814. if(06)(0x1002, 0x2010)
  3815. {
  3816.     Return(00)()
  3817. }
  3818. RestartLoop?(04)()
  3819.  
  3820. LoopStart?(03)(0x0003)
  3821. if(06)(0x1007, 0x1003, 0x2004)
  3822. {
  3823.     Add(0C)(0x0002, 0x2011)
  3824.     if(06)(0x1007, 0x0002, 0x200F)
  3825.     {
  3826.         Set Var(01)(0x0002, 0x200F)
  3827.     }
  3828. }
  3829. else
  3830. {
  3831.     Add(0C)(0x0002, 0x2012)
  3832.     if(06)(0x1008, 0x0002, 0x2013)
  3833.     {
  3834.         Set Var(01)(0x0002, 0x2013)
  3835.     }
  3836. }
  3837. RestartLoop?(04)()
  3838. RestartLoop?(04)()
  3839.  
  3840. 1070
  3841. ------------------------------
  3842. global-00 = 20.000
  3843. global-01 = 8.000
  3844. global-02 = 1000.000
  3845. global-03 = 120.000
  3846. global-04 = 0.000
  3847. global-05 = -0.500
  3848. global-06 = 16.000
  3849. global-07 = 0.500
  3850. global-08 = 2.000
  3851. global-09 = -3.000
  3852. global-0A = 0.600
  3853. global-0B = 10.000
  3854. global-0C = -1.000
  3855. global-0D = 1.000
  3856. global-0E = 0.300
  3857. global-0F = 80.000
  3858. global-10 = 0.005
  3859. global-11 = 26.000
  3860. global-12 = -12.000
  3861. global-13 = 3.000
  3862. global-14 = 0.400
  3863. global-15 = -0.400
  3864. global-16 = 0.000
  3865. global-17 = 0.000
  3866. global-18 = 0.000
  3867. Set Var(01)(0x0000, 0x1003)
  3868. ???(02)(0x0001, 0x1009)
  3869. if(06)(0x100C, 0x1071) Or(16)(0x100C, 0x1073) Or(16)(0x100C, 0x1076) Or(16)(0x100C, 0x1077)
  3870. {
  3871.     Set Var(01)(0x0003, 0x100E)
  3872.     Mul(0E)(0x0003, 0x2000)
  3873.     Add(0C)(0x0003, 0x2001)
  3874.     Set Var(01)(0x0004, 0x0003)
  3875. }
  3876. else
  3877. {
  3878.     Set Var(01)(0x0004, 0x2002)
  3879. }
  3880. if(06)(0x1005)
  3881. {
  3882.     ExitLoop?(05)(0x0000)
  3883.     ???(14)()
  3884. }
  3885. ???(22)(0x2000)
  3886.  
  3887. LoopStart?(03)()
  3888. if!(07)(0x1003) AndNot(19)(0x1004)
  3889. {
  3890.     RestartLoop?(04)()
  3891. }
  3892. ???(22)(0x2003)
  3893. if(06)(0x100C, 0x1077) Or(16)(0x100C, 0x1078)
  3894. {
  3895.     Set Var(01)(0x0003, 0x1003)
  3896.     Mul(0E)(0x0003, 0x1002)
  3897.     if(06)(0x1007, 0x0003, 0x2004)
  3898.     {
  3899.         Stick(0A)(0x2005)
  3900.         ExitLoop?(05)(0x0001)
  3901.         RestartLoop?(04)()
  3902.     }
  3903. }
  3904. ExitLoop?(05)()
  3905. ???(14)()
  3906. RestartLoop?(04)()
  3907.  
  3908. LoopStart?(03)()
  3909. if(06)(0x100C, 0x1075) Or(16)(0x100C, 0x1076)
  3910. {
  3911.     Set Var(01)(0x0005, 0x100E)
  3912.     Mul(0E)(0x0005, 0x2006)
  3913.     Add(0C)(0x0005, 0x2001)
  3914.     Set Var(01)(0x0006, 0x100E)
  3915.     Sub(0D)(0x0006, 0x2007)
  3916.     Set Var(01)(0x0007, 0x0006)
  3917.     Add(0C)(0x0007, 0x2008)
  3918.     Mul(0E)(0x0000, 0x2009)
  3919.     ExitLoop?(05)(0x0002)
  3920. }
  3921. else
  3922. {
  3923.     if(06)(0x100C, 0x1077)  Or(16)(0x100C, 0x1078)
  3924.     {
  3925.         Mul(0E)(0x0000, 0x2009)
  3926.         ExitLoop?(05)(0x0002)
  3927.     }
  3928.     else
  3929.     {
  3930.         Set Var(01)(0x0003, 0x1003)
  3931.         Mul(0E)(0x0003, 0x1002)
  3932.         if(06)(0x1008, 0x0003, 0x2004)
  3933.         {
  3934.             ExitLoop?(05)()
  3935.         }
  3936.         else
  3937.         {
  3938.             ExitLoop?(05)(0x0002)
  3939.         }
  3940.         ExitLoop?(05)()
  3941.     }
  3942.     ???(14)()
  3943.     RestartLoop?(04)()
  3944.  
  3945.     LoopStart?(03)()
  3946.     Set Var(01)(0x0008, 0x1003)
  3947.     Mul(0E)(0x0000, 0x200A)
  3948.     ???(1F)(0x0000)
  3949.     Set Var(01)(0x0008, 0x1003)
  3950.     ExitLoop?(05)()
  3951.     RestartLoop?(04)()
  3952.  
  3953.     LoopStart?(03)(0x0001)
  3954.     if(06)(0x1002, 0x2008)
  3955.     {
  3956.         ExitLoop?(05)()
  3957.     }
  3958.     RestartLoop?(04)()
  3959.  
  3960.     LoopStart?(03)(0x0002)
  3961.     if(06)(0x1002, 0x0004)
  3962.     {
  3963.         ExitLoop?(05)()
  3964.         RestartLoop?(04)()
  3965.     }
  3966.     if(06)(0x1002, 0x2008)  And(18)(0x1012)
  3967.     {
  3968.         ExitLoop?(05)()
  3969.         RestartLoop?(04)()
  3970.     }
  3971.     if(06)(0x100C, 0x1071)  Or(16)(0x100C, 0x1077)
  3972.     {
  3973.         Set Goto?(1C)(0x0003)
  3974.         ???(1F)(0x0000)
  3975.     }
  3976.     else
  3977.     {
  3978.         if(06)(0x100C, 0x1072)      Or(16)(0x100C, 0x1078)          if!(07)(0x1002, 0x2001)             And(18)(0x1008, 0x100B, 0x100C)             And(18)(0x1000, 0x200B)
  3979.             {
  3980.                 ???(1F)(0x2004)
  3981.             }
  3982.             else
  3983.             {
  3984.                 Set Goto?(1C)(0x0003)
  3985.                 ???(1F)(0x0000)
  3986.             }
  3987.         }
  3988.         else
  3989.         {
  3990.             if(06)(0x100C, 0x1075)
  3991.             {
  3992.                 Stick(0A)(0x200C)
  3993.             }
  3994.             else
  3995.             {
  3996.                 if(06)(0x100C, 0x1076)
  3997.                 {
  3998.                     Set Goto?(1C)(0x0003)
  3999.                     Mul(0E)(0x0000, 0x200C)
  4000.                     ???(1F)(0x0000)
  4001.                     Mul(0E)(0x0000, 0x200C)
  4002.                     if(06)(0x1002, 0x0005)
  4003.                     {
  4004.                         ExitLoop?(05)()
  4005.                         RestartLoop?(04)()
  4006.                     }
  4007.                 }
  4008.                 if(06)(0x1002, 0x200B)              AndNot(19)(0x1005)
  4009.                 {
  4010.                     Return(00)()
  4011.                 }
  4012.                 if(06)(0x100C, 0x1071)              Or(16)(0x100C, 0x1073)              Or(16)(0x100C, 0x1077)                  if!(07)(0x1002, 0x2008)
  4013.                     {
  4014.                         Button(0B)(0x0008)
  4015.                     }
  4016.                 }
  4017.                 else
  4018.                 {
  4019.                     if(06)(0x100C, 0x1076)
  4020.                     {
  4021.                         if(06)(0x1002, 0x0006)                      AndNot(19)(0x1002, 0x0007)
  4022.                         {
  4023.                             Button(0B)(0x0008)
  4024.                         }
  4025.                     }
  4026.                     else
  4027.                     {
  4028.                         Set Var(01)(0x0009, 0x100C)
  4029.                         Sub(0D)(0x0009, 0x100B)
  4030.                         if!(07)(0x1002, 0x2000)
  4031.                         {
  4032.                             Stick(0A)(0x2004, 0x200D)
  4033.                         }
  4034.                     }
  4035.                     RestartLoop?(04)()
  4036.  
  4037.                     LoopStart?(03)()
  4038.                     if!(07)(0x1012)
  4039.                     {
  4040.                         if(06)(0x1002, 0x2001)
  4041.                         {
  4042.                             Return(00)()
  4043.                         }
  4044.                         RestartLoop?(04)()
  4045.                     }
  4046.                     ???(2E)(0x0001, 0x0002, 0x200E)
  4047.                     Mul(0E)(0x0001, 0x1002)
  4048.                     if(06)(0x1007, 0x101F, 0x200F)
  4049.                     {
  4050.                         Set Var(01)(0x0003, 0x101F)
  4051.                         Sub(0D)(0x0003, 0x200F)
  4052.                         Mul(0E)(0x0003, 0x2010)
  4053.                         if(06)(0x1007, 0x0003, 0x2007)
  4054.                         {
  4055.                             Set Var(01)(0x0003, 0x2007)
  4056.                         }
  4057.                         if(06)(0x1008, 0x100E, 0x0003)
  4058.                         {
  4059.                             ???(02)(0x000B, 0x0001)
  4060.                             ???(1E)(0x000B)
  4061.                             ???(1E)(0x000C)
  4062.                             if(06)(0x1007, 0x000B, 0x000C)
  4063.                             {
  4064.                                 ???(2A)(0x6027)
  4065.                             }
  4066.                             else
  4067.                             {
  4068.                                 ???(2A)(0x6028)
  4069.                             }
  4070.                             if!(07)(0x1011, 0x0000)
  4071.                             {
  4072.                                 if(06)(0x1011, 0x6042)
  4073.                                 {
  4074.                                     if(06)(0x1007, 0x0001, 0x2004)
  4075.                                     {
  4076.                                         Call AI(1B)()
  4077.                                     }
  4078.                                 }
  4079.                                 else
  4080.                                 {
  4081.                                     if(06)(0x1011, 0x6043)
  4082.                                     {
  4083.                                         if(06)(0x1008, 0x0001, 0x2004)
  4084.                                         {
  4085.                                             Call AI(1B)()
  4086.                                         }
  4087.                                     }
  4088.                                     else
  4089.                                     {
  4090.                                         if(06)(0x1011, 0x6044)                                      Or(16)(0x1011, 0x6048)
  4091.                                         {
  4092.                                             if(06)(0x1007, 0x0002, 0x2004)
  4093.                                             {
  4094.                                                 Call AI(1B)()
  4095.                                             }
  4096.                                         }
  4097.                                         else
  4098.                                         {
  4099.                                             if(06)(0x1011, 0x6045)                                          Or(16)(0x1011, 0x6049)
  4100.                                             {
  4101.                                                 if(06)(0x1008, 0x0002, 0x2004)
  4102.                                                 {
  4103.                                                     Call AI(1B)()
  4104.                                                 }
  4105.                                             }
  4106.                                             else
  4107.                                             {
  4108.                                                 Call AI(1B)()
  4109.                                             }
  4110.                                         }
  4111.                                     }
  4112.                                 }
  4113.                                 if(06)(0x1007, 0x0002, 0x2011)
  4114.                                 {
  4115.                                     Call AI(1B)(0x6024)
  4116.                                 }
  4117.                                 else
  4118.                                 {
  4119.                                     if(06)(0x1008, 0x0001, 0x2012)
  4120.                                     {
  4121.                                         Call AI(1B)(0x6023)
  4122.                                     }
  4123.                                     else
  4124.                                     {
  4125.                                         if(06)(0x1007, 0x0001, 0x2006)
  4126.                                         {
  4127.                                             Call AI(1B)(0x6022)
  4128.                                         }
  4129.                                         else
  4130.                                         {
  4131.                                             Call AI(1B)(0x6021)
  4132.                                         }
  4133.                                         Return(00)()
  4134.                                         RestartLoop?(04)()
  4135.  
  4136.                                         LoopStart?(03)(0x0000)
  4137.                                         if(06)(0x100C, 0x1071)                                      Or(16)(0x100C, 0x1072)                                      Or(16)(0x100C, 0x1077)                                      Or(16)(0x100C, 0x1078)
  4138.                                         {
  4139.                                             Set Goto?(1C)(0x0003)
  4140.                                             ???(1F)(0x0000)
  4141.                                         }
  4142.                                         else
  4143.                                         {
  4144.                                             if(06)(0x100C, 0x1075)                                          Or(16)(0x100C, 0x1075)
  4145.                                             {
  4146.                                                 Set Goto?(1C)(0x0003)
  4147.                                                 Mul(0E)(0x0000, 0x200C)
  4148.                                                 ???(1F)(0x0000)
  4149.                                                 Mul(0E)(0x0000, 0x200C)
  4150.                                             }
  4151.                                             if(06)(0x1002, 0x2013)
  4152.                                             {
  4153.                                                 if(06)(0x1008, 0x100F, 0x2008)
  4154.                                                 {
  4155.                                                     ???(23)(0x200B)
  4156.                                                 }
  4157.                                                 ExitLoop?(05)(0x0002)
  4158.                                             }
  4159.                                             RestartLoop?(04)()
  4160.  
  4161.                                             LoopStart?(03)(0x0003)
  4162.                                             if(06)(0x1007, 0x1003, 0x2004)
  4163.                                             {
  4164.                                                 Add(0C)(0x0000, 0x2014)
  4165.                                                 if(06)(0x1007, 0x0000, 0x200D)
  4166.                                                 {
  4167.                                                     Set Var(01)(0x0000, 0x200D)
  4168.                                                 }
  4169.                                             }
  4170.                                             else
  4171.                                             {
  4172.                                                 Add(0C)(0x0000, 0x2015)
  4173.                                                 if(06)(0x1008, 0x0000, 0x200C)
  4174.                                                 {
  4175.                                                     Set Var(01)(0x0000, 0x200C)
  4176.                                                 }
  4177.                                             }
  4178.                                             RestartLoop?(04)()
  4179.                                             RestartLoop?(04)()
  4180.  
  4181. 1160
  4182. ------------------------------
  4183. global-00 = 50.000
  4184. global-01 = 45.000
  4185. global-02 = -1.000
  4186. global-03 = 0.000
  4187. global-04 = 0.500
  4188. global-05 = 0.000
  4189. ???(22)(0x2000)
  4190. Set Var(01)(0x0000, 0x2001)
  4191. Mul(0E)(0x0000, 0x100E)
  4192.  
  4193. LoopStart?(03)()
  4194. if(06)(0x100D)
  4195. {
  4196.     Return(00)()
  4197. }
  4198. if(06)(0x1017)
  4199. {
  4200.     if(06)(0x1003)
  4201.     {
  4202.         Call AI(1B)(0x3020)
  4203.     }
  4204.     Return(00)()
  4205. }
  4206. Add(0C)(0x0000, 0x2002)
  4207. if(06)(0x1008, 0x0000, 0x2003)
  4208. {
  4209.     if(06)(0x1003)
  4210.     {
  4211.         Call AI(1B)(0x603B)
  4212.     }
  4213.     else
  4214.     {
  4215.         if(06)(0x1012)
  4216.         {
  4217.             Call AI(1B)(0x6049)
  4218.         }
  4219.         Return(00)()
  4220.     }
  4221.     Set Var(01)(0x0001, 0x1002)
  4222.     Mul(0E)(0x0001, 0x1003)
  4223.     if(06)(0x1008, 0x0001, 0x2003)
  4224.     {
  4225.         Set Var(01)(0x0001, 0x2004)
  4226.         Mul(0E)(0x0001, 0x1003)
  4227.         ???(1F)(0x0001)
  4228.     }
  4229.     RestartLoop?(04)()
  4230.     RestartLoop?(04)()
  4231.  
  4232. 30D0
  4233. ------------------------------
  4234. global-00 = 15.000
  4235. global-01 = 100.000
  4236. global-02 = 0.100
  4237. global-03 = 0.030
  4238. global-04 = 3.000
  4239. global-05 = 2.000
  4240. global-06 = 50.000
  4241. global-07 = 20.000
  4242. global-08 = 0.000
  4243. global-09 = 0.000
  4244. global-0A = 0.000
  4245. ???(22)(0x2000)
  4246. Set Var(01)(0x0000, 0x2001)
  4247. Sub(0D)(0x0000, 0x1011)
  4248. Set Var(01)(0x0001, 0x0000)
  4249. Mul(0E)(0x0000, 0x2002, 0x100E)
  4250. Mul(0E)(0x0001, 0x2003)
  4251. Add(0C)(0x0000, 0x0001)
  4252. Set Var(01)(0x0001, 0x100E)
  4253. Mul(0E)(0x0001, 0x2004)
  4254. Sub(0D)(0x0001, 0x2005)
  4255. Add(0C)(0x0000, 0x0001)
  4256.  
  4257. LoopStart?(03)()
  4258. if!(07)(0x1005)
  4259. {
  4260.     Return(00)()
  4261. }
  4262. if(06)(0x1017) And(18)(0x1001, 0x2006)
  4263. {
  4264.     ???(22)(0x2007)
  4265.     ExitLoop?(05)()
  4266.     ???(14)()
  4267. }
  4268. RestartLoop?(04)()
  4269.  
  4270. LoopStart?(03)()
  4271. if!(07)(0x1005)
  4272. {
  4273.     Return(00)()
  4274. }
  4275. if(06)(0x1002, 0x0000) And(18)(0x1012)
  4276. {
  4277.     Button(0B)(0x0004)
  4278.     Return(00)()
  4279. }
  4280. RestartLoop?(04)()
  4281. RestartLoop?(04)()
  4282.  
  4283. 1170
  4284. ------------------------------
  4285. Set Var(01)(0x0000, 0x2000)
  4286. Set Var(01)(0x0001, 0x2001)
  4287. ???(2A)(0x601A)
  4288. ???(2F)(0x0002, 0x2002)
  4289.  
  4290. LoopStart?(03)()
  4291. if(06)(0x1002, 0x0000)
  4292. {
  4293.     Set Var(01)(0x0003, 0x2003)
  4294. }
  4295. else
  4296. {
  4297.     Set Var(01)(0x0003, 0x2004)
  4298. }
  4299. Mul(0E)(0x0003, 0x1003)
  4300. ???(1F)(0x0003)
  4301. if(06)(0x0001)
  4302. {
  4303.     Return(00)()
  4304. }
  4305. if(06)(0x1002, 0x0001) AndNot(19)(0x1000, 0x2005, 0x1001)
  4306. {
  4307.     Return(00)()
  4308. }
  4309. if(06)(0x1000, 0x0002)
  4310. {
  4311.     Call AI(1B)()
  4312. }
  4313. RestartLoop?(04)()
  4314. RestartLoop?(04)()
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!