home *** CD-ROM | disk | FTP | other *** search
/ PC PowerPlay 61 / CDPowerplay61Disc2.iso / data1.cab / hd0_scripts / Text / fighter1.baf < prev    next >
Encoding:
Text File  |  2000-10-12  |  855 b   |  44 lines
  1. // * Mar 22, 2000.
  2. // * Brent Knowles
  3. // * Paladin.  A paladin script, heals hurt party members.  Protects the weak.
  4.  
  5. //*Lay On Hands*
  6. IF
  7.     ActionListEmpty()
  8.     HPPercentLT(MostDamagedOf(),50)
  9.     !StateCheck(MostDamagedOf(),STATE_INVISIBLE)
  10.     HaveSpell(PALADIN_LAY_ON_HANDS)
  11. THEN
  12.     RESPONSE #100
  13.         Spell(MostDamagedOf(),PALADIN_LAY_ON_HANDS)
  14. END
  15.  
  16. //*Heal*
  17. IF
  18.     ActionListEmpty()
  19.     HPPercentLT(MostDamagedOf(),50)
  20.     !StateCheck(MostDamagedOf(),STATE_INVISIBLE)
  21.     HaveSpell(CLERIC_CURE_MEDIUM_WOUNDS)
  22. THEN
  23.     RESPONSE #100
  24.         Spell(MostDamagedOf(),CLERIC_CURE_MEDIUM_WOUNDS)
  25. END
  26.  
  27.  
  28. //*Combat*
  29.  
  30. IF
  31.     ActionListEmpty()
  32.     Help([PC])
  33. THEN
  34.     RESPONSE #100
  35.         AttackReevaluate(LastAttackerOf(LastHelp(Myself)),60)
  36. END
  37.  
  38. IF
  39.     ActionListEmpty()
  40.     See(NearestEnemyOf(Myself))
  41. THEN
  42.     RESPONSE #100
  43.         AttackReevaluate(NearestEnemyOf(Myself),60)
  44. END