I have edited them; Here is my version of them.
This is ww-buff (the party one).
It cheeses in that spells are not removed, and you need 1 protection from fire (or whatever) to cast it on all your party; anyway, it saves a lot of MicroManaging.
My points 4 & 5 are not considered here (if you want them it will be quite easy to add them, anyway.)
To morph it to ww-buff1 (the non party one), change all the lines like
ReallyForceSpell(Player1,MY_SPELL)
ReallyForceSpell(Player2,MY_SPELL)
etc. in
ReallyForceSpell(Myself,MY_SPELL).
After that, save the file as ww-buff.baf (or ww-buff1.baf), and compile it as ww-buff.bs or ww-buff1.bs in your \scripts folder.
IF
CombatCounter(0)
ActionListEmpty()
CheckStatLT(Myself,1,STONESKINS)
HaveSpell(WIZARD_STONE_SKIN)
CheckStatLT(Myself,5,SPELLFAILUREMAGE)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_STONE_SKIN)
END
IF
CombatCounter(0)
ActionListEmpty()
CheckStatLT(Myself,1,STONESKINS)
HaveSpell(CLERIC_IRONSKIN)
CheckStatLT(Myself,5,SPELLFAILUREPRIEST)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_IRONSKIN)
END
IF
CombatCounter(0)
ActionListEmpty()
CheckStatGT(Myself,80,TRAPS)
!ModalState(DETECTTRAPS)
!StateCheck(Myself,STATE_INVISIBLE)
THEN
RESPONSE #100
FindTraps()
END
IF
ActionListEmpty()
CombatCounter(0)
!Detect([EVILCUTOFF.0.0])
!See(NearestEnemyOf(Myself))
!HotKey(S)
!HotKey(F)
!HotKey(N)
!HotKey(D)
THEN
RESPONSE #100
NoAction()
END
IF
CombatCounter(0)
See(NearestEnemyOf(Myself))
THEN
RESPONSE #100
StartCombatCounter()
Continue()
END
IF
See(NearestEnemyOf(Myself))
OR(2)
ActionListEmpty()
ModalState(DETECTTRAPS)
THEN
RESPONSE #100
AttackReevaluate(NearestEnemyOf(Myself),30)
END
IF
HotKey(S)
HaveSpell(WIZARD_STRENGTH)
CheckStatLT(Player1,50,STREXTRA)
CheckStatLT(Player1,19,STR)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_STRENGTH)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_STRENGTH)
CheckStatLT(Player1,100,STREXTRA)
CheckStatLT(Player1,19,STR)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_STRENGTH)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_STRENGTH)
CheckStatLT(Player2,100,STREXTRA)
CheckStatLT(Player2,19,STR)
THEN
RESPONSE #100
ReallyForceSpell(Player2,WIZARD_STRENGTH)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_STRENGTH)
CheckStatLT(Player3,100,STREXTRA)
CheckStatLT(Player3,19,STR)
THEN
RESPONSE #100
ReallyForceSpell(Player3,WIZARD_STRENGTH)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_STRENGTH)
CheckStatLT(Player4,19,STR)
CheckStatLT(Player4,100,STREXTRA)
THEN
RESPONSE #100
ReallyForceSpell(Player4,WIZARD_STRENGTH)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_STRENGTH)
CheckStatLT(Player5,19,STR)
CheckStatLT(Player5,100,STREXTRA)
THEN
RESPONSE #100
ReallyForceSpell(Player5,WIZARD_STRENGTH)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_STRENGTH)
CheckStatLT(Player6,19,STR)
CheckStatLT(Player6,100,STREXTRA)
THEN
RESPONSE #100
ReallyForceSpell(Player6,WIZARD_STRENGTH)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_SHIELD)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_SHIELD)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_SHIELD)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_SHIELD)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_SHIELD)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_SHIELD)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_SHIELD)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_SHIELD)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_SHIELD)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_SHIELD)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_PROTECTION_FROM_FIRE)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player2,WIZARD_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player3,WIZARD_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player4,WIZARD_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player5,WIZARD_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player6,WIZARD_PROTECTION_FROM_FIRE)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_PROTECTION_FROM_ELECTRICITY)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_PROTECTION_FROM_ELECTRICITY)
ReallyForceSpell(Player2,WIZARD_PROTECTION_FROM_ELECTRICITY)
ReallyForceSpell(Player3,WIZARD_PROTECTION_FROM_ELECTRICITY)
ReallyForceSpell(Player4,WIZARD_PROTECTION_FROM_ELECTRICITY)
ReallyForceSpell(Player5,WIZARD_PROTECTION_FROM_ELECTRICITY)
ReallyForceSpell(Player6,WIZARD_PROTECTION_FROM_ELECTRICITY)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_PROTECTION_FROM_ACID)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_PROTECTION_FROM_ACID)
ReallyForceSpell(Player2,WIZARD_PROTECTION_FROM_ACID)
ReallyForceSpell(Player3,WIZARD_PROTECTION_FROM_ACID)
ReallyForceSpell(Player4,WIZARD_PROTECTION_FROM_ACID)
ReallyForceSpell(Player5,WIZARD_PROTECTION_FROM_ACID)
ReallyForceSpell(Player6,WIZARD_PROTECTION_FROM_ACID)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_PROTECTION_FROM_COLD)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_PROTECTION_FROM_COLD)
ReallyForceSpell(Player2,WIZARD_PROTECTION_FROM_COLD)
ReallyForceSpell(Player3,WIZARD_PROTECTION_FROM_COLD)
ReallyForceSpell(Player4,WIZARD_PROTECTION_FROM_COLD)
ReallyForceSpell(Player5,WIZARD_PROTECTION_FROM_COLD)
ReallyForceSpell(Player6,WIZARD_PROTECTION_FROM_COLD)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_SPIRIT_ARMOR)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_SPIRIT_ARMOR)
ReallyForceSpell(Player2,WIZARD_SPIRIT_ARMOR)
ReallyForceSpell(Player3,WIZARD_SPIRIT_ARMOR)
ReallyForceSpell(Player4,WIZARD_SPIRIT_ARMOR)
ReallyForceSpell(Player5,WIZARD_SPIRIT_ARMOR)
ReallyForceSpell(Player6,WIZARD_SPIRIT_ARMOR)
Continue()
END
IF
HotKey(S)
HaveSpell(CLERIC_REMOVE_FEAR)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_REMOVE_FEAR)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_RESIST_FEAR)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_RESIST_FEAR)
Continue()
END
IF
HotKey(S)
HaveSpell(CLERIC_CHAOTIC_COMMANDS)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_CHAOTIC_COMMANDS)
ReallyForceSpell(Player2,CLERIC_CHAOTIC_COMMANDS)
ReallyForceSpell(Player3,CLERIC_CHAOTIC_COMMANDS)
ReallyForceSpell(Player4,CLERIC_CHAOTIC_COMMANDS)
ReallyForceSpell(Player5,CLERIC_CHAOTIC_COMMANDS)
ReallyForceSpell(Player6,CLERIC_CHAOTIC_COMMANDS)
Continue()
END
IF
HotKey(S)
HaveSpell(CLERIC_DEATH_WARD)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_DEATH_WARD)
ReallyForceSpell(Player2,CLERIC_DEATH_WARD)
ReallyForceSpell(Player3,CLERIC_DEATH_WARD)
ReallyForceSpell(Player4,CLERIC_DEATH_WARD)
ReallyForceSpell(Player5,CLERIC_DEATH_WARD)
ReallyForceSpell(Player6,CLERIC_DEATH_WARD)
Continue()
END
IF
HotKey(S)
HaveSpell(CLERIC_PROTECTION_FROM_EVIL_10_FOOT)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_PROTECTION_FROM_EVIL_10_FOOT)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_PROTECTION_FROM_MAGIC_ENERGY)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_PROTECTION_FROM_MAGIC_ENERGY)
ReallyForceSpell(Player2,WIZARD_PROTECTION_FROM_MAGIC_ENERGY)
ReallyForceSpell(Player3,WIZARD_PROTECTION_FROM_MAGIC_ENERGY)
ReallyForceSpell(Player4,WIZARD_PROTECTION_FROM_MAGIC_ENERGY)
ReallyForceSpell(Player5,WIZARD_PROTECTION_FROM_MAGIC_ENERGY)
ReallyForceSpell(Player6,WIZARD_PROTECTION_FROM_MAGIC_ENERGY)
Continue()
END
IF
HotKey(S)
HaveSpell(WIZARD_GHOST_ARMOR)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_GHOST_ARMOR)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_PROTECTION_FROM_LIGHTNING)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_PROTECTION_FROM_LIGHTNING)
ReallyForceSpell(Player2,CLERIC_PROTECTION_FROM_LIGHTNING)
ReallyForceSpell(Player3,CLERIC_PROTECTION_FROM_LIGHTNING)
ReallyForceSpell(Player4,CLERIC_PROTECTION_FROM_LIGHTNING)
ReallyForceSpell(Player5,CLERIC_PROTECTION_FROM_LIGHTNING)
ReallyForceSpell(Player6,CLERIC_PROTECTION_FROM_LIGHTNING)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_HOLY_POWER)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_HOLY_POWER)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_RIGHTEOUS_MAGIC)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_RIGHTEOUS_MAGIC)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_ARMOR_OF_FAITH)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_ARMOR_OF_FAITH)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_MINOR_SPELL_DEFLECTION)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_MINOR_SPELL_DEFLECTION)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_MINOR_SPELL_TURNING)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_MINOR_SPELL_TURNING)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_SPELL_DEFLECTION)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_SPELL_DEFLECTION)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_SPELL_TURNING)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_SPELL_TURNING)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_BLUR)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_BLUR)
Continue()
END
IF
HotKey(F)
OR(2)
HaveSpell(WIZARD_PROTECTION_FROM_EVIL)
HaveSpell(CLERIC_PROTECT_FROM_EVIL)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_PROTECTION_FROM_EVIL)
ReallyForceSpell(Player2,WIZARD_PROTECTION_FROM_EVIL)
ReallyForceSpell(Player3,WIZARD_PROTECTION_FROM_EVIL)
ReallyForceSpell(Player4,WIZARD_PROTECTION_FROM_EVIL)
ReallyForceSpell(Player5,WIZARD_PROTECTION_FROM_EVIL)
ReallyForceSpell(Player6,WIZARD_PROTECTION_FROM_EVIL)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_MIRROR_IMAGE)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_MIRROR_IMAGE)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_BARKSKIN)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_BARKSKIN)
ReallyForceSpell(Player2,CLERIC_BARKSKIN)
ReallyForceSpell(Player3,CLERIC_BARKSKIN)
ReallyForceSpell(Player4,CLERIC_BARKSKIN)
ReallyForceSpell(Player5,CLERIC_BARKSKIN)
ReallyForceSpell(Player6,CLERIC_BARKSKIN)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_RESIST_FIRE)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_RESIST_FIRE)
ReallyForceSpell(Player2,CLERIC_RESIST_FIRE)
ReallyForceSpell(Player3,CLERIC_RESIST_FIRE)
ReallyForceSpell(Player4,CLERIC_RESIST_FIRE)
ReallyForceSpell(Player5,CLERIC_RESIST_FIRE)
ReallyForceSpell(Player6,CLERIC_RESIST_FIRE)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_PROTECTION_FROM_FIRE)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player2,CLERIC_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player3,CLERIC_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player4,CLERIC_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player5,CLERIC_PROTECTION_FROM_FIRE)
ReallyForceSpell(Player6,CLERIC_PROTECTION_FROM_FIRE)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_REGENERATE)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_REGENERATE)
ReallyForceSpell(Player2,CLERIC_REGENERATE)
ReallyForceSpell(Player3,CLERIC_REGENERATE)
ReallyForceSpell(Player4,CLERIC_REGENERATE)
ReallyForceSpell(Player5,CLERIC_REGENERATE)
ReallyForceSpell(Player6,CLERIC_REGENERATE)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_SHIELD_OF_THE_ARCHONS)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_SHIELD_OF_THE_ARCHONS)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_IMPROVED_HASTE)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_IMPROVED_HASTE)
ReallyForceSpell(Player2,WIZARD_IMPROVED_HASTE)
ReallyForceSpell(Player3,WIZARD_IMPROVED_HASTE)
ReallyForceSpell(Player4,WIZARD_IMPROVED_HASTE)
ReallyForceSpell(Player5,WIZARD_IMPROVED_HASTE)
ReallyForceSpell(Player6,WIZARD_IMPROVED_HASTE)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_FIRE_SHIELD_RED)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_FIRE_SHIELD_RED)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_FIRE_SHIELD_BLUE)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_FIRE_SHIELD_BLUE)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_SPELL_TRAP)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_SPELL_TRAP)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_PHYSICAL_MIRROR)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_PHYSICAL_MIRROR)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_BLADE_BARRIER)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_BLADE_BARRIER)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_DRAW_UPON_HOLY_MIGHT)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_DRAW_UPON_HOLY_MIGHT)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_CHANT)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_CHANT)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_DEFENSIVE_HARMONY)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_DEFENSIVE_HARMONY)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_BLESS)
THEN
RESPONSE #100
ReallyForceSpell(Myself,CLERIC_BLESS)
Continue()
END
IF
HotKey(F)
HaveSpell(CLERIC_NEGATIVE_PLANE_PROTECTION)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_NEGATIVE_PLANE_PROTECTION)
ReallyForceSpell(Player2,CLERIC_NEGATIVE_PLANE_PROTECTION)
ReallyForceSpell(Player3,CLERIC_NEGATIVE_PLANE_PROTECTION)
ReallyForceSpell(Player4,CLERIC_NEGATIVE_PLANE_PROTECTION)
ReallyForceSpell(Player5,CLERIC_NEGATIVE_PLANE_PROTECTION)
ReallyForceSpell(Player6,CLERIC_NEGATIVE_PLANE_PROTECTION)
Continue()
END
IF
HotKey(F)
HaveSpell(WIZARD_IMPROVED_INVISIBILITY)
THEN
RESPONSE #100
ReallyForceSpell(Player1,WIZARD_IMPROVED_INVISIBILITY)
ReallyForceSpell(Player2,WIZARD_IMPROVED_INVISIBILITY)
ReallyForceSpell(Player3,WIZARD_IMPROVED_INVISIBILITY)
ReallyForceSpell(Player4,WIZARD_IMPROVED_INVISIBILITY)
ReallyForceSpell(Player5,WIZARD_IMPROVED_INVISIBILITY)
ReallyForceSpell(Player6,WIZARD_IMPROVED_INVISIBILITY)
Continue()
END
IF
HotKey(N)
HaveSpell(WIZARD_MELF_METEOR)
THEN
RESPONSE #100
ReallyForceSpell(Myself,WIZARD_MELF_METEOR)
END
IF
HotKey(D)
HaveSpell(CLERIC_FREE_ACTION)
THEN
RESPONSE #100
ReallyForceSpell(Player1,CLERIC_FREE_ACTION)
ReallyForceSpell(Player2,CLERIC_FREE_ACTION)
ReallyForceSpell(Player3,CLERIC_FREE_ACTION)
ReallyForceSpell(Player4,CLERIC_FREE_ACTION)
ReallyForceSpell(Player5,CLERIC_FREE_ACTION)
ReallyForceSpell(Player6,CLERIC_FREE_ACTION)
Continue()
END