home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 6 / 1995-05_Disc_6.iso / bioforge / bioforge / script / ai_cayna.scp < prev    next >
Text File  |  1995-02-21  |  6KB  |  488 lines
  1. { READY_CAYNAN
  2. I ^îî = $üé THEN
  3. é 
  4. I @Ç¢ CAYNAN = $üé THEN
  5. {
  6. ! "&&& CAN'T FIND CAYNAN &&&" 
  7. é 
  8. }
  9. è ON
  10. ï PLAYER
  11. Y CE11 CE12 BLK4
  12. ö CAYNAN
  13. G CAYHELLO
  14. Z CURFIG ON
  15. M ATK_STAND CONTINUE
  16. ¥ CAYSTOP1 60 
  17. ¥ CAYSTOP2 60 
  18. ¥ CAYSTOP3 60 
  19. A ON
  20. }
  21. { RESET3
  22. ^îì = 0
  23. ^îÉ = 0
  24. }
  25. { OUTSIDE3
  26. ^îì = 1
  27. }
  28. { INSIDE3
  29. ^îì = 2
  30. ^îÉ = 1
  31. }
  32. { CAYNAN_AI
  33. P ~ÇÇ 
  34. :LOOP
  35. â 
  36. I ^îì = 0 THEN
  37. {
  38. ^îâ = @Çì CAYNAN_PACE
  39. :PACE_LOOP
  40. â 
  41.  
  42. I @Ç¥ MEAT_IS_OFFERED THEN
  43. {
  44.  ^îâ 
  45. ^îâ = @Çì EAT_THE_MEAT
  46. }
  47. E 
  48. {
  49. I @Çó ^îâ AND ^îì = 0 THEN
  50. J #Çå 
  51. I @Çó ^îâ THEN
  52.  ^îâ 
  53. }
  54. }
  55. E 
  56. {
  57.  
  58. I @Ç¥ MEAT_IS_OFFERED THEN
  59. ^îâ = @Çì EAT_THE_MEAT
  60. }
  61. :EAT_LOOP
  62. â 
  63. I ^îÅ THEN
  64. J #Çç 
  65. E 
  66. I @Çó ^îâ THEN
  67.  ^îâ 
  68. I ^îì = 1 THEN
  69. {
  70. ^îâ = @Çì CAYNAN_GREET
  71. :GREET_LOOP
  72. â 
  73. I @Çó ^îâ THEN
  74. J #Çê 
  75. }
  76. I ^îì != 2 THEN
  77. J #Çà 
  78.  
  79. I .ÇéÇâ != $üö THEN
  80. {
  81. J #Çà 
  82. }
  83. O $ǃ 
  84. ┬ 
  85. ~ÇÇ = @Ç¥ MONSTER_MOVE 15
  86. I ~ÇÇ > 0 THEN
  87. {
  88. N ~ÇÇ 
  89. {
  90. U 1
  91. I @Çô "atk_m1" != $üâ THEN
  92. M ATK_M1 CONTINUE
  93. X ÇÇ 
  94. U 2
  95. I @Çô "atk_m2" != $üâ THEN
  96. M ATK_M2 CONTINUE
  97. X ÇÇ 
  98. U 3
  99. I @Çô "atk_m3" != $üâ THEN
  100. M ATK_M3 CONTINUE
  101. X ÇÇ 
  102. U 4
  103. U 6
  104. ┴ 
  105. X ÇÇ 
  106. U 7
  107. I @Çô "atk_m7" != $üâ THEN
  108. M ATK_M7 CONTINUE
  109. X ÇÇ 
  110. U 8
  111. U 10
  112. I @Çô "atk_m8" != $üâ THEN
  113. M ATK_M8 CONTINUE
  114. X ÇÇ 
  115. U 9
  116. I @Çô "atk_m9" != $üâ THEN
  117. M ATK_M9 CONTINUE
  118. X ÇÇ 
  119. }
  120. }
  121. E 
  122. {
  123. N @Çà 0 4 
  124. {
  125. U 0
  126. M ATK_H3
  127. X Çü 
  128. U 1
  129. M ATK_H6
  130. X Çü 
  131. U 2
  132. M ATK_H7
  133. X Çü 
  134. U 3
  135. M ATK_H8
  136. X Çü 
  137. U 4
  138. M ATK_H9
  139. X Çü 
  140. }
  141. }
  142. J #Çà 
  143. }
  144. { CAYNAN_STIMULUS _DAMAGE 
  145. :GOT_HIT
  146. I @Çó ^îé THEN
  147.  ^îü 
  148. I ^îÅ THEN
  149. ^îÆ = 1
  150. é 
  151. :SUPER_RECOIL
  152. ^îç ++
  153. I ^îç = 1 THEN
  154. {
  155.  
  156. ^îà = @Ç║ `àâ $üë "We should not be enemies.~We should work together!/FNous ne devrions pas nous affronter.~Nous devrions unir nos forces./GWir sollten keine Feinde sein.~Wir sollten zusammenarbeiten."
  157. ^îå = @Çÿ `àâ 
  158. @Çì GRIMACE 3
  159. }
  160. I ^îç = 2 THEN
  161. {
  162.  
  163. ^îà = @Ç║ `àà $üë "I have no wish to harm you!/FJe ne vous veux aucun mal./G Ich will dir nicht wehtun."
  164. ^îå = @Çÿ `àà 
  165. @Çì GRIMACE 3
  166. }
  167. I ^îç = 4 THEN
  168. ^îç = 0
  169. é 
  170. :PLAYER_SUPER_RECOILED
  171. ^îê ++
  172. A OFF
  173. @Ç¥ READY_MONSTER_TAUNT
  174. I ^îê = 1 THEN
  175. {
  176.  
  177. ^îé = @Ç║ `àü $üä "CAYNAN: You stand upon holy ground.~It's fitting you should kneel./FTu es sur un sol sacré.~Il est juste que tu t'agenouilles./GDu stehst auf heiligem Boden.~Knie nieder!"
  178. ^îü = @Çÿ `àü 
  179. @Çì CAYNAN_SPEAK 3
  180. M TAUNT1
  181. M TAUNT1 CONTINUE
  182. }
  183. @Ç¢ CAYNAN 
  184. I ^îê = 2 THEN
  185. {
  186.  
  187. ^îé = @Ç║ `å╛ $üä "CAYNAN: You have two arms.~One must be removed./FTu as deux bras.~Il faut en supprimer un./GDu hast zwei Arme. Einer muß weg."
  188. ^îü = @Çÿ `å╛ 
  189. @Çì CAYNAN_SPEAK 3
  190. M TAUNT2
  191. M TAUNT2 CONTINUE
  192. }
  193. I ^îê = 3 THEN
  194. ^îê = 0
  195.  
  196.  
  197. @Ç¥ PAUSE_FOR_SUBTITLE
  198. M ATK_STAND CONTINUE
  199. A ON
  200. é 
  201. :KILLED_PLAYER
  202. I ^îî = $üé THEN
  203. é 
  204. A OFF
  205. M ATK_M2 CONTINUE
  206. W 20
  207. ┴ 
  208. M ATK_STAND CONTINUE
  209. W 1 SECONDS
  210. @Çì CAYNAN_SPEAK 3
  211.  
  212. @Ç║ `àé $üä "CAYNAN: I shall pattern my life after~the random loopings of your entrails./FJe ferai ma vie à l'image~des méandres de tes entrailles./GIch werde mir lange und gründlich~deine Gedärme anschauen."
  213. M TAUNT2
  214. M TAUNT1
  215. â 
  216. M ATK_STAND CONTINUE
  217. }
  218. { CAYNAN_GREET
  219. I ^îÄ = 1 THEN
  220. é 
  221. ^îÄ = 1
  222. I ^îæ THEN
  223. {
  224. o 
  225. â 
  226. G GETMEAT RUN 30
  227. I ^îì != 1 THEN
  228. J #ÇÅ 
  229. ┴ 
  230.  @Ç║ `àÇ $üä "CAYNAN: Return the fork~or I'll command it to destroy you!/FRends la fourchette ou~je lui ordonnerai de te détruire !/GGib mir die Gabel wieder, oder ich befehle ihr,~dich zu töten!"
  231. I ^îì != 1 THEN
  232. J #ÇÅ 
  233. M ATK_H6
  234. I ^îì != 1 THEN
  235. J #ÇÅ 
  236. ^îì = 0
  237. }
  238. E I ^îÉ = 0 THEN
  239. {
  240. o 
  241. â 
  242. G GETMEAT RUN 30
  243. I ^îì != 1 THEN
  244. J #ÇÅ 
  245. ┴ 
  246.  @Ç║ `ä┐ $üä "CAYNAN: If you've come for the fork,~you'll be sorely disappointed./FSi c'est pour la fourchette que tu es venu,~tu vas être rudement déçu./GFalls du die Gabel willst,~muß ich dich aber enttäuschen."
  247. I ^îì != 1 THEN
  248. J #ÇÅ 
  249. M ATK_H6
  250. I ^îì != 1 THEN
  251. J #ÇÅ 
  252. ^îì = 0
  253. }
  254. ^îÄ = 0
  255. é 
  256. :ABORT
  257. ^îÄ = 0
  258. é 
  259. }
  260. { CAYNAN_PACE
  261. :LOOP
  262. â 
  263.  
  264. I .ÇéÇê THEN J #Çæ 
  265. I ^îî = $üé THEN é 
  266. N @Çà 1 3 
  267. {
  268. U 1
  269. o 
  270. â 
  271. G CAYHELLO WALK 30
  272. X Çé 
  273. U 2
  274. o 
  275. â 
  276. G CAYPACE WALK 30
  277. X Çé 
  278. U 3
  279. o 
  280. â 
  281. G CAYBACK WALK 30
  282. X Çé 
  283. }
  284. J #Çæ 
  285. }
  286. { MEAT_IS_OFFERED
  287.  
  288. @Ç¢ PLAYER
  289. I @Çæ ANYWHERE MEAT1 THEN é $üé 
  290.  
  291. @Ç¢ CAYNAN
  292. I @Çæ ANYWHERE MEAT1 THEN é $üé 
  293. I @ÇÜ MEAT1 THEN
  294. {
  295. I @Çí CURITEM MEAT_LOC THEN
  296. é $üâ 
  297. E I @Çí CURITEM MEATROOM THEN
  298. é $üâ 
  299. E 
  300. é $üé 
  301. }
  302. E 
  303. é $üé 
  304. }
  305. { EAT_THE_MEAT
  306. ^îÅ = 1
  307. I @ÇÜ MEAT1 = $üé THEN
  308. J #Çû 
  309. I @Çí CURITEM MEAT_LOC THEN
  310. {
  311. ║ ON
  312. G GETMEAT RUN 30
  313. I @Çí CURITEM MEAT_LOC = $üé THEN
  314. J #Çû 
  315. I ^îæ OR ^îÆ THEN
  316. J #Çû 
  317. I ^îî = $üé THEN
  318. J #Çû 
  319. £ CAYSTOP2 GRADUAL
  320. M GET_MEAT
  321. I @Çí CURITEM MEAT_LOC THEN
  322. f RTHAND
  323. E 
  324. J #Çû 
  325. M GOT_MEAT
  326.  
  327. }
  328. E I @Çí CURITEM MEATROOM THEN
  329. {
  330. ║ ON
  331. I @üÇ > 35 THEN
  332. G MEAT1 WALK 30
  333. I @Çí CURITEM MEATROOM = $üé THEN
  334. J #Çû 
  335. I ^îæ OR ^îÆ THEN
  336. J #Çû 
  337. I ^îî = $üé THEN
  338. J #Çû 
  339. M PICK_UP
  340. I @Çí CURITEM MEATROOM THEN
  341. f RTHAND
  342. E 
  343. J #Çû 
  344. M PICK_UP_PART2
  345.  
  346. }
  347. E 
  348. J #Çû 
  349. I ^îæ OR ^îÆ THEN
  350. J #Çò 
  351. G EATMEAT RUN 30
  352. ║ OFF
  353. I ^îæ OR ^îÆ THEN
  354. J #Çò 
  355. £ CORNER GRADUAL
  356. I ^îæ OR ^îÆ THEN
  357. J #Çò 
  358. M READY_EAT
  359. M EAT_MEAT CONTINUE
  360. :WAIT
  361. W 10
  362. â 
  363. I ^îæ THEN
  364. {
  365. M DONE_W_MEAT
  366.  
  367.  
  368.  
  369.  
  370.  
  371.  
  372. ^îé = @Ç║ `àÇ $üä "CAYNAN: Return the fork~or I'll command it to destroy you!/FRends la fourchette ou je lui~ordonnerai de te détruire !/GGib mir die Gabel wieder, oder ich befehle ihr,~dich zu töten!"
  373. ^îü = @Çÿ `àÇ 
  374. ┴ 
  375. J #Çò 
  376. }
  377. I ^îÆ THEN
  378. J #Çò 
  379. L #Çö 140
  380. :ABORT_KILL
  381. I @ÇÜ MEAT1 THEN
  382. ┤ 
  383. :ABORT
  384. I ^îî THEN
  385. ║ OFF
  386. ^îÆ = 0
  387. ^îÅ = 0
  388. }
  389. { CAYNAN_DEATH
  390. @Ç¢ PLAYER 
  391. A OFF
  392. M ATK_STAND CONTINUE
  393. ^îî = $üé 
  394. O $Çò 
  395. @Ç¢ CAYNAN 
  396. ║ ON
  397. M DIE FREEZE
  398.  
  399. ª EATMEAT MAXIMUM
  400. u CURFIG OFF
  401. @Ç¢ PLAYER 
  402. I @Çí CURFIG INSIDE3 = $üé THEN
  403. M ATK_M2 CONTINUE
  404. W 20
  405. I @Çò > 30 THEN
  406. ┴ 
  407. è OFF
  408. M STAND CONTINUE
  409. W 1 SECONDS
  410. M TAUNT2 CONTINUE
  411. @Çì GROWL 5
  412.  
  413.  @Ç║ `àä $üë "I'm sorry, my friend.~We are both victims, you and I./FDésolé, mon ami. Nous sommes~des victimes, toi et moi./GTut mit leid, mein Freund.~Wir sind beide Opfer. Du und ich."
  414. M STAND CONTINUE
  415. â 
  416. A ON
  417. }
  418.  
  419.  
  420.  
  421.  
  422.  
  423.  
  424.  
  425.  
  426.  
  427.  
  428. { CAYNAN_ENTER_COMBAT
  429. w CURFIG CLEAR CAHND PICTURE 1
  430. }
  431. { CAYNAN_LEAVE_COMBAT
  432. w CURFIG RESTORE CAHND
  433. }
  434. { CAYNAN_WOUNDS
  435. P ~ÇÇ 
  436. P ~Çü 
  437. @Ç¢ CAYNAN
  438. ~Çü = .ÇéÇä 
  439. ~ÇÇ = .ÇéÇÇ 
  440. w CURFIG RESTORE CAHDF
  441.  
  442. I ~ÇÇ < 60 THEN
  443. {
  444. w CURFIG DRAWONLY CAHDF PICTURE 3
  445. a ~Çü 1 
  446. }
  447. .ÇéÇä = ~Çü 
  448. }
  449. { CAYNAN_SPEAK _DURATION
  450. P ~Çü 
  451.  
  452. @Ç¢ CAYNAN 
  453. ~Çü = .ÇéÇä 
  454.  
  455. w CURFIG RESTORE CAHDF 
  456.  
  457. I @ÇÅ ~Çü 1 THEN
  458. {
  459.  
  460. w CURFIG DRAWONLY CAHDF PICTURE 4
  461. a ~Çü 17 
  462. .ÇéÇä = ~Çü 
  463.  
  464. W ~ÇÇ SECONDS
  465.  
  466. w CURFIG DRAWONLY CAHDF PICTURE 3 
  467. }
  468.  
  469. E 
  470. {
  471.  
  472. w CURFIG DRAWONLY CAHDF PICTURE 2 
  473. a ~Çü 17 
  474. .ÇéÇä = ~Çü 
  475.  
  476. W ~ÇÇ SECONDS
  477.  
  478. w CURFIG RESTORE CAHDF 
  479. }
  480.  
  481. b ~Çü 17 
  482. .ÇéÇä = ~Çü 
  483. }
  484.  
  485.  
  486.  
  487. //$ 26 - version number
  488.