home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 6 / 1995-05_Disc_6.iso / bioforge / script / ai_nurse.scp < prev    next >
Text File  |  1995-02-23  |  3KB  |  241 lines
  1. { NURSEBOT_ENTER_COMBAT
  2. ^îï = 0
  3. }
  4. { NURSEBOT_AI
  5. P ~ÇÇ 
  6. P ~Çü 
  7.  
  8. ~Çü = 2
  9. :TOP
  10.  
  11. I .ÇéÇâ != $üö THEN
  12. {
  13. â 
  14. J #Çé
  15. }
  16. ~ÇÇ = @Ç¥ MONSTER_MOVE 10 
  17. I ~ÇÇ > 0 THEN
  18. {
  19. N ~ÇÇ 
  20. {
  21. U 2
  22. I @Çô "atk_m2" != $üâ THEN
  23. M ATK_M2 CONTINUE
  24. X ÇÇ 
  25. U 4
  26. U 6
  27. ┴ 
  28. X ÇÇ 
  29. U 1
  30. U 7
  31. I @Çô "atk_m7" != $üâ THEN
  32. M ATK_M7 CONTINUE
  33. X ÇÇ 
  34. U 10
  35. U 8
  36. I @Çô "atk_m8" != $üâ THEN
  37. M ATK_M8 CONTINUE
  38. X ÇÇ 
  39. U 3
  40. U 9
  41. I @Çô "atk_m9" != $üâ THEN
  42. M ATK_M9 CONTINUE
  43. X ÇÇ 
  44. }
  45. }
  46. E 
  47. {
  48. I ^îï THEN
  49. {
  50. @Ç¥ NURSEBOT_DEFEND
  51. ~Çü = 1
  52. }
  53. E 
  54. {
  55. N ~Çü 
  56. {
  57. U 1
  58.  
  59. ^îé = @Ç║ `ü¥ $üç "NURSEBOT: Subject must stay in bunk.~Recuperation is mandatory./FLe sujet doit rester couché.~Il est obligatoire de récupérer./GPatient muß liegenbleiben.~Heilung erforderlich."
  60. ^îü = @Çÿ `ü¥ 
  61. @Ç¥ WAITFORNURSEBOTSPEECH
  62. X Çü 
  63. U 2
  64. M ATK_SYRINGE
  65. ~Çü = 0
  66. X Çü 
  67. }
  68. ~Çü = ~Çü + 1
  69. }
  70. }
  71. â 
  72. J #Çé
  73. }
  74. { NURSEBOT_DEFEND
  75. ^îï = 0
  76. M DEFEND CONTINUE
  77.  
  78.  ^îé 
  79.  ^îü 
  80.  
  81. ^îé = @Ç║ `äÆ $üç "NURSEBOT: Violence is counter-productive. /FLa violence ne sert à rien./GAnwendung von Gewalt ist nutzlos."
  82. ^îü = @Çÿ `äÆ 
  83.  ^îé 
  84.  
  85. ^îé = @Ç║ `äÉ $üç "This unit is shock resistant./FCette unité est à l'épreuve des chocs./GDiese Maschine~ist erschütterungsresistent."
  86. ^îü = @Çÿ `äÉ 
  87.  ^îé 
  88. :LOOP
  89. I @Çô "Defend" = $üâ THEN
  90. {
  91. â 
  92. J #Çä 
  93. }
  94. }
  95. { WAITFORNURSEBOTSPEECH
  96. M ATK_STAND CONTINUE
  97. :TOP
  98. â 
  99. p TEN_DEGREES
  100. I ^îï > 0 THEN
  101. é 
  102. I @Çó ^îé == $üâ THEN
  103. J #Çå
  104. }
  105. { FIRSTBOT_STIMULUS _DAMAGE 
  106. P ~Çü 
  107. :GOT_HIT
  108.  
  109.  
  110. ~Çü = @ÇÖ 
  111. I ~Çü > 150 || ~Çü < -150 THEN
  112. {
  113. .ÇéÇâ = $üû 
  114.  
  115. @Çå `Çí 
  116. ₧ AVDBAR3
  117. ₧ AVDBNK3
  118. @Ç¥ NURSEBOT_DAMAGE
  119. @Çì NURSEBOT_BOUNCING
  120. é 
  121. }
  122. I @Çó ^îé == $üé THEN
  123. {
  124.  ^îü 
  125.  
  126. ^îé = @Ç║ `ü₧ $üç "NURSEBOT: Subject must comply~with all instructions. /FLe sujet doit obéir aux instructions. /GPatient hat sich~allen Befehlen zu fügen."
  127. ^îü = @Çÿ `ü₧ 
  128. }
  129. @Çì SLUR_ENEMY_SPEECH ^îü 
  130. ^îï = 1
  131. é 
  132. :HIT_PLAYER_ATK_SYRINGE
  133. ^îè ++
  134.  
  135.  
  136.  
  137. I ^îè != 2 THEN
  138. é 
  139.  
  140. @Ç¢ PLAYER 
  141. A OFF
  142.  
  143. Q "Your vision begins to blur... /FVotre vue commence à se troubler... /GAlles verschwimmt vor deinen Augen..." 
  144. M DIE
  145. @Ç¢ FIRSTBOT 
  146. r CURFIG OFF
  147. Z CURFIG OFF
  148. u CURFIG OFF
  149. è ON
  150. ┬ 
  151. A OFF
  152. D 5 IMPACT
  153. ^åå = 0
  154. @Çì REVIVELEX
  155. @Ç£ HIDE
  156.  
  157.  
  158.  
  159.  
  160.  
  161.  
  162.  
  163.  
  164.  
  165.  
  166.  
  167.  
  168. @Ç¢ PLAYER 
  169. A ON
  170. é 
  171. }
  172.  
  173. { FIRSTBOT_ATK_STAND
  174. I .ÇéÇâ == $üû THEN
  175. M BOUNCE CONTINUE
  176. E 
  177. M ATK_STAND CONTINUE
  178. }
  179. { NURSEBOT_BOUNCING
  180. P ~ÇÇ 
  181. ^îâ = 0
  182. A OFF
  183. r CURFIG ON
  184. M START_BOUNCE
  185. M BOUNCE CONTINUE
  186.  ^îü 
  187. ^îü = 0
  188. I ^Åú > 0 THEN
  189. i LEX COMBATCLUE
  190. :LOOP
  191. â 
  192. I ^îâ == 1 THEN J #Çì 
  193. I @Çó ^îé == $üé THEN
  194. {
  195. ~ÇÇ = @Çà -6000 -1200 
  196.  
  197. ^îé = @Ç║ `ü₧ $üç "NURSEBOT: Subject must comply~with all instructions./FLe sujet doit obéir aux instructions./GPatient hat sich~allen Befehlen zu fügen."
  198. ^îü = @Çÿ `ü₧ 
  199.  ^îü ~ÇÇ 
  200. }
  201. J #Çî 
  202. :END_ME
  203.  ^îü 
  204. }
  205.  
  206.  
  207.  
  208.  
  209.  
  210.  
  211.  
  212.  
  213. { NURSEBOT_WOUNDS
  214. P ~ÇÇ 
  215. ~ÇÇ = .ÇéÇä 
  216. I @ÇÅ ~ÇÇ 1 THEN
  217. {
  218. w CURFIG DRAWONLY SLEAKNEK PICTURE 1
  219.  
  220. }
  221. E 
  222. {
  223. w CURFIG RESTORE SLEAKNEK
  224. }
  225. }
  226. { NURSEBOT_DAMAGE
  227. P ~ÇÇ 
  228. ~ÇÇ = .ÇéÇä 
  229. a ~ÇÇ 1 
  230. .ÇéÇä = ~ÇÇ 
  231. @Ç¥ NURSEBOT_WOUNDS
  232. }
  233.  
  234. { USE_BOT_DEATH
  235. ^åö = 1
  236. }
  237.  
  238.  
  239.  
  240. //$ 26 - version number
  241.