home *** CD-ROM | disk | FTP | other *** search
/ The Best of Select: Games 4 / CD_1.iso / bioforge / script / reactanm.scp < prev    next >
Text File  |  1995-02-03  |  2KB  |  204 lines
  1.  
  2. { ANIM_RTR
  3. P ~ÇÇ 
  4. ó RTR1 RTR2 RTR3 RTR4 RTR5 RTR6
  5. ~ÇÇ = 0
  6. ^åü = 0
  7. ^à╛ = 0
  8. @Çì REACTOR_BACKGROUND_ANIM
  9. ! NEVER
  10.  
  11. :REAC_LOOP
  12. ^åü = ^à╛ 
  13.  
  14. I ^åâ = 1 THEN
  15. {
  16. I ^åä = 1 AND ^êÇ = 1 THEN 
  17. ^åÇ = 1
  18. J #Çé 
  19. }
  20. ^åÇ = 0
  21. :RTR_OFF
  22. I ^åÇ = 0 THEN
  23. {
  24. I ^à┐ = 1 THEN
  25. {
  26. ^à╛ = 2
  27. }
  28. E ^à╛ = 1
  29. }
  30. I ^åÇ = 1 THEN
  31. {
  32. I ^à┐ = 1 THEN 
  33. {
  34. ^à╛ = 4
  35. }
  36. E ^à╛ = 3
  37. }
  38. N ^à╛ 
  39. {
  40. U 1:
  41. I ^åü != 1 THEN
  42. {
  43.  ~ÇÇ 
  44. ~ÇÇ = @Çì REACTOR_STATE1
  45. }
  46. X ÇÇ 
  47. U 2:
  48. I ^åü != 2 THEN
  49. {
  50.  ~ÇÇ 
  51. ~ÇÇ = @Çì REACTOR_STATE2
  52. }
  53. X ÇÇ 
  54.  
  55. U 3:
  56. I ^åü != 3 THEN
  57. {
  58.  ~ÇÇ 
  59. ~ÇÇ = @Çì REACTOR_STATE3
  60. }
  61. X ÇÇ 
  62.  
  63. U 4:
  64. I ^åü != 4 THEN
  65. { 
  66.  ~ÇÇ 
  67. ~ÇÇ = @Çì REACTOR_STATE4
  68. }
  69. X ÇÇ 
  70.  
  71. }
  72.  
  73. â 
  74. J #Çü 
  75. }
  76. [ REACTOR_STATE1
  77. ó RTR1 RTR2 RTR3 RTR4 RTR5 RTR6
  78. :TOP
  79. 00:00 ^éå = 10
  80. I ^åé = 0 THEN
  81. ^ü╖ = 30
  82. 00:02 ^éå = 11
  83. 00:04 ^éå = 12
  84. 00:06 ^éå = 13
  85. 00:08 ^éå = 14
  86. 00:10 ^éå = 15
  87. 00:12 ^éå = 16
  88. 00:14 ^éå = 17
  89. 00:16 ^éå = 18
  90. 00:17 ò 
  91. J #Çä
  92. ]
  93. [ REACTOR_STATE2
  94. ó RTR1 RTR2 RTR3 RTR4 RTR5 RTR6
  95. :TOP
  96. 00:00 ^éå = 1
  97. ^éç = 1
  98. I ^åé = 0 THEN
  99. ^ü╖ = 20 
  100. 00:02 ^éå = 2
  101. ^éç = 2
  102. I ^åé = 0 THEN
  103. ^ü╖ = 21 
  104. 00:04 ^éå = 3
  105. ^éç = 3
  106. I ^åé = 0 THEN
  107. ^ü╖ = 22 
  108. 00:06 ^éå = 4
  109. ^éç = 4
  110. I ^åé = 0 THEN
  111. ^ü╖ = 23 
  112. 00:08 ^éå = 5
  113. ^éç = 5
  114. I ^åé = 0 THEN
  115. ^ü╖ = 24 
  116. 00:10 ^éå = 6
  117. ^éç = 6
  118. I ^åé = 0 THEN
  119. ^ü╖ = 25 
  120. 00:12 ^éå = 7
  121. ^éç = 7
  122. I ^åé = 0 THEN
  123. ^ü╖ = 26 
  124. 00:14 ^éå = 8
  125. ^éç = 8
  126. I ^åé = 0 THEN
  127. ^ü╖ = 27 
  128. 00:16 ^éå = 9
  129. ^éç = 9
  130. I ^åé = 0 THEN
  131. ^ü╖ = 28
  132. 00:17 ò 
  133. J #Çå 
  134. ]
  135. [ REACTOR_STATE3
  136. ó RTR1 RTR2 RTR3 RTR4 RTR5 RTR6
  137. :TOP
  138. 00:00 ^éå = 19
  139. I ^åé = 0 THEN
  140. ^ü╖ = 29
  141. 00:01 ò 
  142. J #Çê
  143. ]
  144. [ REACTOR_STATE4
  145. ó RTR1 RTR2 RTR3 RTR4 RTR5 RTR6
  146. :TOP
  147. 00:00 ^éå = 20
  148. ^éç = 10
  149. I ^åé = 0 THEN
  150. ^ü╖ = 6
  151. 00:02 ^éå = 21
  152. ^éç = 11
  153. I ^åé = 0 THEN
  154. ^ü╖ = 7
  155. 00:04 ^éå = 22
  156. ^éç = 12
  157. I ^åé = 0 THEN
  158. ^ü╖ = 8
  159. 00:06 ^éå = 23
  160. ^éç = 13
  161. I ^åé = 0 THEN
  162. ^ü╖ = 9
  163. 00:08 ^éå = 24
  164. ^éç = 14
  165. I ^åé = 0 THEN
  166. ^ü╖ = 10
  167. 00:10 ^éå = 25
  168. ^éç = 15
  169. I ^åé = 0 THEN
  170. ^ü╖ = 11
  171. 00:12 ^éå = 26
  172. ^éç = 16
  173. I ^åé = 0 THEN
  174. ^ü╖ = 12
  175. 00:14 ^éå = 27
  176. ^éç = 17
  177. I ^åé = 0 THEN
  178. ^ü╖ = 13
  179. 00:16 ^éå = 28
  180. ^éç = 18
  181. I ^åé = 0 THEN
  182. ^ü╖ = 14
  183. 00:17 ò 
  184. J #Çè
  185. ]
  186. [ REACTOR_BACKGROUND_ANIM
  187. ó RTR1 RTR2 RTR3 RTR4 RTR5 RTR6
  188. :TOP
  189. 00:00 ^ü╢ = 0
  190. 00:02 ^ü╢ = 1
  191. 00:04 ^ü╢ = 2
  192. 00:06 ^ü╢ = 3
  193. 00:08 ^ü╢ = 4
  194. 00:10 ^ü╢ = 5
  195. 00:12 ^ü╢ = 6
  196. 00:14 ^ü╢ = 7
  197. 00:16 ^ü╢ = 8
  198. 00:17 ò 
  199. J #Çî
  200. ]
  201.  
  202.  
  203. //$ 26 - version number
  204.