home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 6 / 1995-05_Disc_6.iso / bioforge / script / ai_amech.scp next >
Text File  |  1995-02-04  |  2KB  |  133 lines
  1. { AIRMECHO_AI
  2. P ~ÇÇ 
  3. :KEEP_GOING
  4.  
  5. T @ÇÖ 
  6. M FIRE_GUN
  7. G AIR_POSX WALK
  8. â 
  9.  
  10. I @Ç╗ CURFIG AIR_POSX > 75 THEN J #Çü 
  11.  
  12. @Ç║ `üÜ $üè "MECHO: Halt, prisoner!/GHalt, Gefangener!/FHalte, prisonnier !"
  13.  
  14. :TOP
  15. â 
  16. I ^ç╣ THEN
  17. é 
  18. I .ÇâÇÇ <= 0 THEN
  19. J #Çé
  20. T @ÇÖ 
  21. M FIRE_GUN CONTINUE
  22. @Ç¥ TURN_WHILE_FIRING
  23. T @ÇÖ 
  24.  
  25. I @Çü PLAYER > -82 THEN
  26. {
  27. W 15
  28. M FIRE_GUN CONTINUE
  29. @Ç¥ TURN_WHILE_FIRING
  30. }
  31. E 
  32. W 50
  33.  
  34.  
  35.  
  36. ~ÇÇ = 20 * ^Åú 
  37. ~ÇÇ = 70 - ~ÇÇ 
  38. W ~ÇÇ 
  39. J #Çé
  40. }
  41. { AIRMECHO_DEATH
  42. A OFF
  43. ^Ç╡ ++
  44.  
  45.  
  46. ^ç╣ = $üâ 
  47.  
  48. ^ä┤ = $âä 
  49. @Çå `ǽ 
  50.  
  51. ú BOOM WHITE CURFIG 
  52.  
  53.  
  54.  
  55.  
  56.  
  57. I @ÇÄ ELV3 = $üé AND .ÇéÇå == 0 THEN
  58. {
  59. Ü 60 60 60 1 
  60. â 
  61. Ü 45 45 45 1 
  62. â 
  63. Ü 30 30 30 1 
  64. Y 
  65. ^àÇ = $ââ 
  66. }
  67. I @ÇÄ ELV3 == $üé AND .ÇéÇå == 0 THEN
  68. {
  69.  
  70.  
  71. C HFR5
  72. @Ç¢ PLAYER
  73. ï AIRMECHO
  74. A OFF
  75. o 
  76. M ATK_M2 CONTINUE
  77. W 20
  78. I .ÇäÇå == 0 THEN
  79. ┴ 
  80. @Çì LEX_FACES_BONFIRE
  81. @Ç¢ AIRMECHO
  82. I .ÇéÇå == 0 THEN
  83. {
  84. K 
  85. }
  86. W 45
  87.  @Ç║ `çÜ $üë "That was one sorry excuse~for a security robot./GDas war ein erbärmlicher Wachroboter/FTu parles d'une excuse minable~pour un robot de garde."
  88. @Ç║ `碠$üë "Makes a great bonfire though.../GAber er brennt nicht schlecht.../FÇa fait un sacré feu de joie,~tout de même..."
  89. C UNLOCK
  90. @Ç¢ PLAYER
  91. A ON
  92. W 5 SECONDS
  93. i LEX POWEROUT
  94. }
  95. ^Ç╡ --
  96. }
  97. { LEX_FACES_BONFIRE
  98. £ MECHO GRADUAL
  99. }
  100. { LASER_HIT_AIRMECHO
  101. @Çå `Çí 
  102. ú BOOM PING CURFIG 
  103.  
  104. I ^Åú == 0 THEN
  105. D 45 ENERGY
  106. E I ^Åú == 1 THEN
  107. D 35 ENERGY
  108. E 
  109. D 25 ENERGY
  110. }
  111. { AIRMECHO_FIRE
  112.  
  113.  
  114. I @Çü PLAYER > -82 THEN
  115. @Ç╣ BOLTGRN GUN 7 40 0 0 0 
  116. E 
  117. {
  118.  
  119. I ^Åú == 0 THEN
  120. @Ç╣ BOLTGRN GUN 3 40 0 0 0 
  121. E I ^Åú == 1 THEN
  122. @Ç╣ BOLTGRN GUN 4 40 0 0 0 
  123. E 
  124. @Ç╣ BOLTGRN GUN 5 40 0 0 0 
  125. }
  126. @Çå `ä▓ 
  127. â 
  128.  
  129. }
  130.  
  131.  
  132. //$ 26 - version number
  133.