home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 6 / 1995-05_Disc_6.iso / bioforge / script / ai_mecho.scp < prev    next >
Text File  |  1995-02-17  |  4KB  |  334 lines
  1. { CHECKLEXDEATH
  2. ó HAL1 HAL2 HAL3 HAL4 HAL5 HAL6 ELH1 ELH2
  3. :TOP
  4. â 
  5. I .ÇâÇÇ <= 0 THEN
  6. {
  7. I @Çó ^çá THEN
  8.  ^çá 
  9. W 45
  10.  @Ç║ `ê╖ $üè "MECHO: Prisoner disabled.~Medical assistance required./FPrisonnier hors d'état de nuire.~Assistance médicale exigée./GGefangener unschädlich gemacht.~Sanitäter benötigt."
  11. é 
  12. }
  13. J #Çü
  14. }
  15. { CHECKLEXMOTION
  16. P ~ÇÇ 
  17. P ~Çü 
  18. ~Çü = 2
  19. ~ÇÇ = 0
  20. ó HAL1 HAL2 HAL3 HAL4 HAL5 HAL6 ELH1 ELH2
  21. :TOP
  22. â 
  23. I @Çö WALK OR @Çö WALK_BACK THEN
  24. ~ÇÇ = 1
  25. I @Çö ATK_M2 OR @Çö ATK_M8 THEN
  26. ~ÇÇ = 1
  27.  
  28. I @Çö RUN THEN
  29. {
  30.  ^çá 
  31. ^ç₧ = 2
  32. é 
  33. }
  34. I ~ÇÇ THEN
  35. {
  36. I ~Çü < 1 THEN
  37. {
  38. ^ç₧ = 2
  39. é 
  40. }
  41.  
  42.  ^çá 
  43.  ^îü 
  44.  
  45. ^îü = @Ç║ `ü¢ $üè "MECHO: Do not move~or you will be shot./FPas un geste ou on t'abat./GKeine Bewegung, oder ich schieße."
  46. ~Çü --
  47. W 45
  48.  ^îü 
  49.  
  50. ^磠++
  51. ^çá = @Çì HALMECHOSPEECHES
  52. ~ÇÇ = 0
  53. }
  54. L #Çâ
  55. }
  56. { DONTMOVESPEECH
  57. W 5
  58. ^烠= @Ç║ `ü¢ $üè "MECHO: Do not move~or you will be shot./FPas un geste ou on t'abat./GKeine Bewegung, oder ich schieße."
  59. W 45
  60. ^磠++
  61. ^çá = @Çì HALMECHOSPEECHES
  62. }
  63. { LEXTAUNTSMECHO
  64. @Ç¢ PLAYER 
  65. A OFF
  66. è OFF
  67. M TAUNT3 CONTINUE
  68. @Çì GROWL 5
  69.  @Ç║ `çÖ $üë "Eat light, you stupid machine!/FMange léger, stupide machine./GFriß Strom, du dumme Maschine!"
  70. M STAND CONTINUE
  71. â 
  72. A ON
  73. }
  74. { HALMECHO_DEATH
  75. @Çì LEXTAUNTSMECHO
  76. ^çí = 0
  77. @Çå `ǽ 
  78. Ü 20 20 20 1 
  79. ú BOOM BLUEC CURFIG 
  80. K CURFIG
  81. l CURFIG
  82. }
  83. { LASER_HIT_HALMECHO
  84. @Çå `Çí 
  85. ú BOOM PING CURITEM 
  86.  
  87.  
  88. I .ÇéÇÇ > 120 THEN
  89. {
  90. .ÇéÇÇ -= 1
  91. M LASER_RECOIL
  92. ^ç₧ = 2
  93. }
  94. E 
  95. {
  96. D 666 ENERGY
  97. }
  98. }
  99. { GO_WAY_PT1
  100. £ WAY_PT1 GRADUAL
  101. G WAY_PT1 WALK
  102. }
  103. { GO_WAY_PT2
  104. £ WAY_PT2 GRADUAL
  105. G WAY_PT2 WALK
  106. }
  107. { GOTOELEVATOR
  108. £ FRONTELH GRADUAL
  109. G FRONTELH WALK
  110. }
  111. { HALMECHO_AI
  112.  
  113. P ~ÇÇ 
  114.  
  115. P ~Çü 
  116. P ~Çé 
  117.  
  118. P ~Çâ 
  119. ~ÇÇ = 3
  120. ~Çé = 0
  121. ~Çü = 0
  122. I ^çí = $üé THEN
  123. é 
  124. I @Ç¢ HALMECHO = $üé THEN
  125. {
  126.  
  127. ! "Can't find HalMecho"
  128. }
  129. ┬ 
  130. â 
  131. â 
  132. :TOP
  133. â 
  134. I @Çó ^çá AND ^ç₧ < 2 THEN
  135. J #Çî
  136. N ^ç₧ 
  137. {
  138.  
  139. U 0
  140.  
  141.  
  142. I @Çò < 300 THEN
  143. {
  144. I @ÇÖ IN -90 90 THEN
  145. {
  146. I @Çö ALCOVE_R = $üé AND @Çö ALCOVE_L = $üé THEN
  147. {
  148.  ~Çé 
  149. o 
  150. M STAND CONTINUE
  151. p 
  152. ^ç₧ = 1
  153. ^磠= 0
  154. ^çá = @Çì HALMECHOSPEECHES
  155. @Çì CHECKLEXMOTION
  156. I @Çó ^祠== $üé THEN
  157. ^祠= @Çì CHECKLEXDEATH
  158. }
  159. E 
  160. X ÇÇ 
  161. }
  162. E I ^ç₧ = 0 THEN J #ÇÄ 
  163. }
  164. E I ^ç₧ = 0 THEN J #ÇÄ 
  165. X ÇÇ 
  166.  
  167. U 1
  168. I @Çö STAND OR @Çö COMBAT_STAND THEN
  169. {
  170. I @Çû ^烠THEN J #Çì 
  171.  
  172.  
  173.  
  174.  
  175. I ~Çü == 0 THEN
  176. ~Çü = @Çì WAIT 90 
  177. E I @Çó ~Çü = $üé THEN
  178. {
  179. I @Çó ^çá THEN
  180. J #Çì 
  181. ~Çü = 0
  182.  
  183.  
  184.  @Ç║ `ù¼ $üè "MECHO: Unit 11 to Security:/FUnité 11 appelle salle des gardes./GNummer 11 an Sicherheitsdienst:"
  185.  
  186. ^烠= @Ç║ `üú $üè "Please respond./FVeuillez répondre.../GBitte antworten..."
  187. }
  188. }
  189. :SKIP
  190. X ÇÇ 
  191.  
  192. U 2
  193.  
  194. I @Ç¡ PLAYER ELH AND @Ç╗ CURFIG FRONTELH > 75 THEN
  195. {
  196. I @Çó ~Çé = $üé THEN
  197. ~Çé = @Çì GOTOELEVATOR 
  198. }
  199. E 
  200. {
  201. I @Çó ^祠== 0 && .ÇâÇÇ > 0 THEN
  202. ^祠= @Çì CHECKLEXDEATH
  203.  
  204.  
  205.  
  206. ~Çâ = 1
  207. I @Ç¡ PLAYER ELH && ^ä¡ = $ââ THEN
  208. ~Çâ = 0
  209. I .ÇâÇÇ <= 0 THEN
  210. ~Çâ = 0
  211. I ~Çâ THEN
  212. {
  213. M FIRE_GUN
  214. @Ç¥ TURN_WHILE_FIRING
  215. }
  216. W 10
  217. }
  218. X ÇÇ 
  219. }
  220. â 
  221. J #Çî
  222. :PACE_HALLWAY
  223.  
  224. I @Çó ~Çé = $üé THEN
  225. {
  226. I @Çô WALK = $üé AND @Çô TURNING_TOWARDS = $üé THEN
  227.  
  228. {
  229. I @Ç▓ CURFIG WAY_PT1 THEN
  230. {
  231. ~Çé = @Çì GO_WAY_PT2
  232. }
  233. E 
  234. {
  235. I @Ç▓ CURFIG WAY_PT2 THEN
  236. {
  237. ~Çé = @Çì GO_WAY_PT1
  238. }
  239. E 
  240. {
  241. I @Ç▒ CURFIG WAY_PT1 < @Ç▒ CURFIG WAY_PT2 THEN
  242. {
  243. ~Çé = @Çì GO_WAY_PT2
  244. }
  245. E 
  246. {
  247. ~Çé = @Çì GO_WAY_PT1
  248. }
  249. }
  250. }
  251. }
  252. } 
  253. â 
  254. J #Çî
  255. }
  256. { HALMECHO_FIRE
  257.  
  258. Ü 0 0 8 1 
  259.  @Ç╣ BOLTBLU GUN 10 225 0 0 0 
  260. }
  261. { HALMECHOSPEECHES
  262. ó HAL1 HAL2 HAL3 HAL4 HAL5 HAL6 ELH1 ELH2
  263. :TOP
  264. â 
  265. N ^磠
  266. {
  267. U 0
  268. {
  269. I @Çû ^烠THEN X 
  270. ^烠= @Ç║ `üÜ $üè "MECHO: Halt, prisoner!/FHalte, prisonnier !/GHalt, Gefangener!"
  271. ^îü = @Çÿ `üÜ 
  272. W 45
  273. ^磠++
  274. X Çü 
  275. }
  276. U 1
  277. {
  278. I @Çû ^烠THEN X 
  279. ^烠= @Ç║ `ü¢ $üè "MECHO: Do not move~or you will be shot./FPas un geste ou on t'abat./GKeine Bewegung, oder ich schieße."
  280. ^îü = @Çÿ `ü¢ 
  281. W 75
  282. ^磠++
  283. X Çü 
  284. }
  285. U 2
  286. {
  287. I @Çû ^烠THEN X 
  288. ^烠= @Ç║ `ü£ $üè "MECHO: Unit 11 to Security:/FUnité 11 appelle salle des gardes./GNummer 11 an Sicherheitsdienst:"
  289. ^îü = @Çÿ `ü£ 
  290. W 75
  291. ^磠++
  292. X Çü 
  293. }
  294. U 3
  295. {
  296. I @Çû ^烠THEN X 
  297. ^烠= @Ç║ `üó $üè "Apprehended escaped prisoner~in Security Level corridor./FPrisonnier évadé appréhendé~dans le couloir du niveau de Garde./GHabe entflohenen Gefangenen~im Korridor der~Sicherheitsebene festgenommen."
  298. ^îü = @Çÿ `üó 
  299. W 135
  300. ^磠++
  301. X Çü 
  302. }
  303. U 4
  304. {
  305. I @Çû ^烠THEN X 
  306. ^烠= @Ç║ `üú $üè "Please respond./FVeuillez répondre.../GBitte antworten..."
  307. ^îü = @Çÿ `üú 
  308. W 90
  309. ^磠++
  310. X Çü 
  311. }
  312. U 5
  313. {
  314. I @Çû ^烠THEN X 
  315. ^烠= @Ç║ `üÑ $üè "Need further instructions./FAttendons vos instructions.../GWarte auf weitere Anweisungen..."
  316. ^îü = @Çÿ `üÑ 
  317. W 90
  318. ^磠++
  319. X Çü 
  320. }
  321. V 
  322. {
  323. ^磠= 1
  324. X Çü 
  325. }
  326. }
  327. I ^磠> 5 THEN ^磠= 2
  328. J #Çæ
  329. }
  330.  
  331.  
  332.  
  333. //$ 26 - version number
  334.