home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 6 / 1995-05_Disc_6.iso / bioforge / script / ai_luthr.scp < prev    next >
Text File  |  1995-01-18  |  812b  |  95 lines

  1. { LUTHOR_AI
  2. P ~ÇÇ 
  3. :LOOP
  4.  
  5. I .ÇéÇâ != $üö THEN
  6. {
  7. â 
  8. J #Çü 
  9. }
  10. ~ÇÇ = @Ç¥ MONSTER_MOVE 15
  11. I ~ÇÇ > 0 THEN
  12. {
  13. N ~ÇÇ 
  14. {
  15. U 1
  16. I @Çô "atk_m1" != $üâ THEN
  17. M ATK_M1 CONTINUE
  18. X ÇÇ 
  19. U 2
  20. I @Çô "atk_m2" != $üâ THEN
  21. M ATK_M2 CONTINUE
  22. X ÇÇ 
  23. U 3
  24. I @Çô "atk_m3" != $üâ THEN
  25. M ATK_M3 CONTINUE
  26. X ÇÇ 
  27. U 4
  28. U 6
  29. ┴ 
  30. X ÇÇ 
  31. U 7
  32. I @Çô "atk_m7" != $üâ THEN
  33. M ATK_M7 CONTINUE
  34. X ÇÇ 
  35. U 8
  36. I @Çô "atk_m8" != $üâ THEN
  37. M ATK_M8 CONTINUE
  38. X ÇÇ 
  39. U 9
  40. I @Çô "atk_m9" != $üâ THEN
  41. M ATK_M9 CONTINUE
  42. X ÇÇ 
  43. U 10
  44. I @Çô "atk_m10" != $üâ THEN
  45. M ATK_M10 CONTINUE
  46. X ÇÇ 
  47. }
  48. }
  49. {
  50.  @Çì LUTHOR_ATTACK
  51. }
  52. â 
  53. J #Çü 
  54. }
  55. { LUTHOR_ATTACK
  56.  
  57. N @Çà 0 9 
  58. {
  59. U 0
  60. M ATK_H4
  61. X Çü 
  62. U 1
  63. M ATK_H6
  64. X Çü 
  65. U 2
  66. M ATK_H7
  67. X Çü 
  68. U 3
  69. M ATK_H8
  70. X Çü 
  71. U 4
  72. M ATK_H9
  73. X Çü 
  74. U 5
  75. M ATK_F1
  76. X Çü 
  77. U 6
  78. M ATK_F3
  79. X Çü 
  80. U 7
  81. M ATK_F4
  82. X Çü 
  83. U 8
  84. M ATK_F6
  85. X Çü 
  86. U 9
  87. M ATK_F7
  88. X Çü 
  89. }
  90. }
  91.  
  92.  
  93. //$ 26 - version number
  94.