void ApplyAdditionalHP(object oPC, int iAmount, float fDuration)
{
effect eHP;
eHP=GetFirstEffect(oPC);
while(GetIsEffectValid(eHP))
{
if(GetEffectType(eHP)==EFFECT_TYPE_TEMPORARY_HITPOINTS)
{
RemoveEffect(oPC, eHP);
SendMessageToPC(oPC, "Removing Existing HP Buff");
}
eHP=GetNextEffect(oPC);
}
eHP=EffectTemporaryHitpoints(iAmount);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eHP, oPC, fDuration);
eHP=EffectVisualEffect(VFX_IMP_HOLY_AID);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eHP, oPC, fDuration);
}
void main()
{
object oItem = GetItemActivated();
object oActivator = GetItemActivator();
object oPC=GetItemActivator();
object oTarget=GetItemActivatedTarget();
location lActivator = GetLocation(oActivator);
string sItemTag = GetTag(oItem);
location lTarget = GetLocation(oTarget);
int iSkill = GetSkillRank(SKILL_PERFORM, oPC); //Skill Modifier for ranks in perform
int iRoll = d20(); //Skill Roll
int iTotal = iRoll + iSkill; //DC Check
string sTotal = IntToString(iTotal);
effect eSong = EffectVisualEffect(VFX_DUR_BARD_SONG);
if (sItemTag=="AmuletofPiccard")
{
effect eHP;
eHP=GetFirstEffect(oPC);
eHP=EffectVisualEffect(VFX_IMP_HOLY_AID);
AssignCommand(oPC, ActionSpeakString("Beam me up."));
DelayCommand(3.0, ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eHP, oPC, 0.0f));
object oTarget = GetWaypointByTag("Scotty");
DelayCommand(5.0, AssignCommand(oPC, JumpToObject(oTarget)));
}
if (sItemTag=="SpellFireStaff1")
{
if (GetLevelByClass(CLASS_TYPE_WIZARD, oActivator) >= 5)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_INTELLIGENCE) /2;
int nStaffDamage = d4(1) * nInt;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
if (GetLevelByClass(CLASS_TYPE_SORCERER, oActivator) >= 5)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_CHARISMA) /2;
int nStaffDamage = d4(1) * nInt;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
}
if (sItemTag=="SpellFireStaff2")
{
if (GetLevelByClass(CLASS_TYPE_WIZARD, oActivator) >= 10)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_INTELLIGENCE) /2;
int nStaffDamage = d8(1) * nInt + 10;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
if (GetLevelByClass(CLASS_TYPE_SORCERER, oActivator) >= 10)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_CHARISMA) /2 ;
int nStaffDamage = d8(1) * nInt + 10;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
}
if (sItemTag=="SpellFireStaff3")
{
if (GetLevelByClass(CLASS_TYPE_WIZARD, oActivator) >= 15)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_INTELLIGENCE)/2;
int nStaffDamage = d12(1) * nInt + 20;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
if (GetLevelByClass(CLASS_TYPE_SORCERER, oActivator) >= 15)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_CHARISMA) /2;
int nStaffDamage = d12(1) * nInt + 20;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
}
if (sItemTag=="SpellFireStaff4")
{
if (GetLevelByClass(CLASS_TYPE_WIZARD, oActivator) >= 20)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_INTELLIGENCE) /2;
int nStaffDamage = d20(1) * nInt + 40;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
if (GetLevelByClass(CLASS_TYPE_SORCERER, oActivator) >= 20)
{
AdjustReputation(oActivator, oTarget, -100);
int nInt = GetAbilityScore(oPC, ABILITY_CHARISMA) /2;
int nStaffDamage = d20(1) * nInt + 40;
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIRESTORM), lTarget);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
}
}
if (sItemTag=="skababeads1")
{
if (GetLevelByClass(CLASS_TYPE_MONK, oActivator) >= 5)
{
ApplyAdditionalHP(oPC, 105, 3600.0);
}
}
if (sItemTag=="skababeads2")
{
if (GetLevelByClass(CLASS_TYPE_MONK, oActivator) >= 10)
{
ApplyAdditionalHP(oPC, 255, 3600.0);
}
}
if (sItemTag=="skababeads3")
{
if (GetLevelByClass(CLASS_TYPE_MONK, oActivator) >= 15)
{
ApplyAdditionalHP(oPC, 505, 3600.0);
}
}
if (sItemTag=="skababeads4")
{
if (GetLevelByClass(CLASS_TYPE_MONK, oActivator) >= 20)
{
ApplyAdditionalHP(oPC, 1005, 3600.0);
}
}
if (sItemTag=="HP_ITEM_05")
{
ApplyAdditionalHP(oPC, 5, 3600.0);
}
if (sItemTag=="HP_ITEM_10")
{
ApplyAdditionalHP(oPC, 10, 3600.0);
}
if (sItemTag=="HP_ITEM_15")
{
ApplyAdditionalHP(oPC, 15, 3600.0);
}
if (sItemTag=="HP_ITEM_20")
{
ApplyAdditionalHP(oPC, 20, 3600.0);
}
if (sItemTag=="HP_ITEM_40")
{
ApplyAdditionalHP(oPC, 40, 3600.0);
}
if (sItemTag=="HP_ITEM_50")
{
ApplyAdditionalHP(oPC, 50, 3600.0);
}
if (sItemTag=="HP_ITEM_75")
{
ApplyAdditionalHP(oPC, 75, 3600.0);
}
if (sItemTag=="HP_ITEM_85")
{
ApplyAdditionalHP(oPC, 100, 3600.0);
}
if (sItemTag=="HP_ITEM_100")
{
ApplyAdditionalHP(oPC, 100, 3600.0);
}
if (sItemTag=="HP_ITEM_200")
{
ApplyAdditionalHP(oPC, 200, 3600.0);
}
if (sItemTag=="HP_ITEM_500")
{
ApplyAdditionalHP(oPC, 500, 3600.0);
}
if (sItemTag=="VampireFang")
{
AdjustReputation(oActivator, oTarget, -100);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_NEGATIVE_ENERGY), oTarget);
int nStaffDamage = d20(1) * 10 + 50;
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nStaffDamage,DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_NORMAL), oTarget, 0.0f);
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectHeal(nStaffDamage), oActivator, 0.0f);
}
if (sItemTag=="RodofHolyIntervention")
{
CreateObject(OBJECT_TYPE_CREATURE, "guardianofquenli", lTarget);
}
if (sItemTag == "wiztpstaff")//check if the activated item was the staff
{
if (GetLevelByClass(CLASS_TYPE_WIZARD, oActivator) >= 7)//check if player has sufficient level
{
AssignCommand (oActivator, ActionStartConversation (oActivator, "wiz_teleport", FALSE));
SetLocalInt (oActivator, "wiz_level", GetLevelByClass(CLASS_TYPE_WIZARD, oActivator)); //set the level to check later if he can teleport to that area
}
}
if (sItemTag == "DiceBag")
{
object oPlaceable = CreateObject(OBJECT_TYPE_PLACEABLE, "dicebag", lActivator);
DelayCommand(1.0, AssignCommand(oPlaceable, ActionStartConversation(oActivator, "", TRUE)));
}
//dmw_activate
// ** This script goes in the OnItemActivation event of your Module
// ** Properties. It checks to see if the item used is a DM Helper
// ** And if so, and the user isnt a DM, destroys it, otherwise it
// ** Starts the DM Helper working. "dmw_inc" contains the actual
// ** code that controls the Helpers effects. If you update anything
// ** in it, you must recompile the calling dmw_<name> script to make
// ** the change take effect.
if(GetTag(oItem)=="DMsHelper")
{
// Test to make sure the activator is a DM, or is a DM
// controlling a creature.
if(GetIsDM(oActivator) != TRUE)
{
object oTest = GetFirstPC();
string sTestName = GetPCPlayerName(oActivator);
int nFound = FALSE;
while (GetIsObjectValid(oTest) && (! nFound))
{
if (GetPCPlayerName(oTest) == sTestName)
{
if(GetIsDM(oTest))
{
nFound = TRUE;
}
else
{
DestroyObject(oItem);
SendMessageToPC(oActivator,"You are mortal and this is not yours!");
return;
}
}
oTest=GetNextPC();
}
}
// get the wand's activator and target, put target info into local vars on activator
object oMyActivator = GetItemActivator();
object oMyTarget = GetItemActivatedTarget();
SetLocalObject(oMyActivator, "dmwandtarget", oMyTarget);
location lMyLoc = GetItemActivatedTargetLocation();
SetLocalLocation(oMyActivator, "dmwandloc", lMyLoc);
//Make the activator start a conversation with itself
AssignCommand(oMyActivator, ActionStartConversation(oMyActivator, "dmwand", TRUE));
return;
}
if(GetTag(oItem)=="AutoFollow")
{
object oTarget = GetItemActivatedTarget();
if(GetIsObjectValid(oTarget))
{
AssignCommand ( oActivator, ActionForceFollowObject(oTarget));
}
return;
}
if(GetTag(oItem)=="WandOfFX")
{
// get the wand's activator and target, put target info into local vars on activator
object oDM = GetItemActivator();
object oMyTarget = GetItemActivatedTarget();
SetLocalObject(oDM, "FXWandTarget", oMyTarget);
location lTargetLoc = GetItemActivatedTargetLocation();
SetLocalLocation(oDM, "FXWandLoc", lTargetLoc);
object oTest=GetFirstPC();
string sTestName = GetPCPlayerName(oDM);
// Test to make sure the activator is a DM, or is a DM
// controlling a creature.
if(GetIsDM(oDM) != TRUE)
{
object oTest = GetFirstPC();
string sTestName = GetPCPlayerName(oDM);
int nFound = FALSE;
while (GetIsObjectValid(oTest) && (! nFound))
{
if (GetPCPlayerName(oTest) == sTestName)
{
if(GetIsDM(oTest))
{
nFound = TRUE;
}
else
{
DestroyObject(oItem);
SendMessageToPC(oDM,"You are mortal and this is not yours!");
return;
}
}
oTest=GetNextPC();
}
}
//Make the activator start a conversation with itself
AssignCommand(oDM, ActionStartConversation(oDM, "fxwand", TRUE));
return;
}
if(GetTag(oItem)=="EmoteWand")
{
AssignCommand(oActivator, ActionStartConversation(oActivator, "emotewand", TRUE));
return;
}
if(GetTag(oItem)=="MinosianQuiver")
{
CreateItemOnObject("minosianbolt", oActivator, 99);
}
if(GetTag(oItem)=="DrowQuiver")
{
CreateItemOnObject("drowarrow", oActivator, 99);
}
if(GetTag(oItem)=="StaffofNature1")
{
if (GetLevelByClass(CLASS_TYPE_DRUID, oActivator) >= 2)
{
CreateObject(OBJECT_TYPE_CREATURE,"druidservant1",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_LIGHTNING_M), lTarget);
}
}
if(GetTag(oItem)=="StaffofNature2")
{
if (GetLevelByClass(CLASS_TYPE_DRUID, oActivator) >= 8)
{
CreateObject(OBJECT_TYPE_CREATURE,"druidservant2",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_LIGHTNING_M), lTarget);
}
}
if(GetTag(oItem)=="StaffofNature3")
{
if (GetLevelByClass(CLASS_TYPE_DRUID, oActivator) >= 15)
{
CreateObject(OBJECT_TYPE_CREATURE,"druidservant3",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_LIGHTNING_M), lTarget);
}
}
if(GetTag(oItem)=="StaffofNature4")
{
if (GetLevelByClass(CLASS_TYPE_DRUID, oActivator) >= 20)
{
CreateObject(OBJECT_TYPE_CREATURE,"druidservant4",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_LIGHTNING_M), lTarget);
}
}
if(GetTag(oItem)=="UhnitansRing")
{
CreateObject(OBJECT_TYPE_CREATURE,"biggaymino",lTarget);
}
if(GetTag(oItem)=="UhnitansRing2")
{
if (GetLevelByClass(CLASS_TYPE_CLERIC, oActivator) >= 19)
{
CreateObject(OBJECT_TYPE_CREATURE,"minoservant",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
}
else if (GetLevelByClass(CLASS_TYPE_WIZARD, oActivator) >= 19)
{
CreateObject(OBJECT_TYPE_CREATURE,"madspark002",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
}
else if (GetLevelByClass(CLASS_TYPE_SORCERER, oActivator) >= 19)
{
CreateObject(OBJECT_TYPE_CREATURE,"madspark003",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), lTarget);
}
else
{
CreateObject(OBJECT_TYPE_CREATURE,"minoservant001",lTarget);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_DUR_MIND_AFFECTING_NEGATIVE), lTarget);
}
}
if(GetTag(oItem)=="HornofCalling")
{
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_BEAM_HOLY), lTarget);
CreateObject(OBJECT_TYPE_CREATURE,"KamerickWarrior",lActivator);
ActionDoCommand(PlaySound("as_cv_flute1"));
}
if(GetTag(oItem)=="OphindalsJournal")
{
int nDiceRoll = d100(1);
if(nDiceRoll <= 30)
{
CreateObject(OBJECT_TYPE_CREATURE,"ophindic1",lActivator);
}
else if(nDiceRoll <= 55)
{
CreateObject(OBJECT_TYPE_CREATURE,"ophindic2",lActivator);
}
else if(nDiceRoll <= 75)
{
CreateObject(OBJECT_TYPE_CREATURE,"ophindic3",lActivator);
}
else if(nDiceRoll <= 90)
{
CreateObject(OBJECT_TYPE_CREATURE,"ophindic004",lActivator);
}
else
{
CreateObject(OBJECT_TYPE_CREATURE,"ophindic5",lActivator);
}
}
if(GetTag(oItem)== "Drum")
{
int iBard = GetLevelByClass(CLASS_TYPE_BARD, oPC);
if (iBard >0)
{
if (iTotal >= 20) //DC for using a Drum is 15
{
int i;
int done;
effect eHaste;
object oGroup;
effect eCast = EffectVisualEffect(VFX_IMP_HASTE);
FloatingTextStringOnCreature("*Bard Song Success*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 15");
eHaste = EffectHaste();
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSong, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oPC);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eHaste, oPC, 18.0);
for (i = 0; i < 6 && !done; i++) //Apply Bardsong to up to 6 faction members (PCs) within 30 meters
{
oGroup = GetNearestCreature(CREATURE_TYPE_REPUTATION, REPUTATION_TYPE_FRIEND, oPC, i);
if ( oGroup != OBJECT_INVALID && (GetDistanceBetween(oPC, oGroup) <= 30.0) )
{
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eHaste, oGroup, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oGroup);
}
else
{
done = TRUE;
}
}
}
else
{
FloatingTextStringOnCreature("*Bard Song Failure*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 15");
}
}
else
{
AssignCommand(oPC, ActionSpeakString("Only a bard has the experience to use this item properly."));
}
}
if(GetTag(oItem)=="Mandolin")
{
int iBard = GetLevelByClass(CLASS_TYPE_BARD, oPC);
if (iBard > 0)
{
if (iTotal >= 20) //DC for using a Mandolin is 15
{
int i;
int done;
effect eRegen;
object oGroup;
effect eCast = EffectVisualEffect(VFX_IMP_HEALING_G);
FloatingTextStringOnCreature("*Bard Song Success*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 15");
eRegen = EffectRegenerate(1, 3.0);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSong, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eRegen, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oPC);
for (i = 0; i < 6 && !done; i++) //Apply Bardsong to up to 6 faction members (PCs) within 30 meters
{
oGroup = GetNearestCreature(CREATURE_TYPE_REPUTATION, REPUTATION_TYPE_FRIEND, oPC, i);
if ( oGroup != OBJECT_INVALID && (GetDistanceBetween(oPC, oGroup) <= 30.0) )
{
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eRegen, oGroup, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oGroup);
}
else
{
done = TRUE;
}
}
}
else
{
FloatingTextStringOnCreature("*Bard Song Failure*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 15");
}
}
else
{
AssignCommand(oPC, ActionSpeakString("Only a bard has the experience to use this item properly."));
}
}
if(GetTag(oItem)=="Pipes")
{
int iBard = GetLevelByClass(CLASS_TYPE_BARD, oPC);
if (iBard > 0)
{
if (iTotal >=20) //DC for using Pipes is 18
{
int i;
int done;
effect eInvis;
object oGroup;
FloatingTextStringOnCreature("*Bard Song Success*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 18");
eInvis = EffectInvisibility(INVISIBILITY_TYPE_NORMAL);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSong, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eInvis, oPC, 18.0);
for (i = 0; i < 6 && !done; i++) //Apply Bardsong to up to 6 faction members (PCs) within 30 meters
{
oGroup = GetNearestCreature(CREATURE_TYPE_REPUTATION, REPUTATION_TYPE_FRIEND, oPC, i);
if ( oGroup != OBJECT_INVALID && (GetDistanceBetween(oPC, oGroup) <= 30.0) )
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eInvis, oGroup, 18.0);
else
done = TRUE;
}
}
else
{
FloatingTextStringOnCreature("*Bard Song Failure*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 18");
}
}
else
{
AssignCommand(oPC, ActionSpeakString("Only a bard has the experience to use this item properly."));
}
}
if(GetTag(oItem)=="Horn")
{
int iBard = GetLevelByClass(CLASS_TYPE_BARD, oPC);
if (iBard > 0)
{
if (iTotal >=20) //DC for using a Horn is 18
{
int i;
int done;
effect eShield;
object oGroup;
effect eCast = EffectVisualEffect(VFX_IMP_AC_BONUS);
FloatingTextStringOnCreature("*Bard Song Success*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 18");
eShield = EffectDamageShield(1, DAMAGE_BONUS_1d10, DAMAGE_TYPE_SONIC);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSong, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eShield, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oPC);
for (i = 0; i < 6 && !done; i++) //Apply Bardsong to up to 6 faction members (PCs) within 30 meters
{
oGroup = GetNearestCreature(CREATURE_TYPE_REPUTATION, REPUTATION_TYPE_FRIEND, oPC, i);
if ( oGroup != OBJECT_INVALID && (GetDistanceBetween(oPC, oGroup) <= 30.0) )
{
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eShield, oGroup, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oGroup);
}
else
{
done = TRUE;
}
}
}
else
{
FloatingTextStringOnCreature("*Bard Song Failure*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 18");
}
}
else
{
AssignCommand(oPC, ActionSpeakString("Only a bard has the experience to use this item properly."));
}
}
if(GetTag(oItem)=="Harp")
{
int iBard = GetLevelByClass(CLASS_TYPE_BARD, oPC);
if (iBard > 0)
{
if (iTotal >=20) //DC for using a Harp is 21
{
int i;
int done;
effect eSpell;
object oGroup;
effect eCast = EffectVisualEffect(VFX_IMP_GLOBE_USE);
FloatingTextStringOnCreature("*Bard Song Success*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 21");
eSpell = EffectSpellImmunity(SPELL_ALL_SPELLS);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSong, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSpell, oPC, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oPC);
for (i = 0; i < 6 && !done; i++) //Apply Bardsong to up to 6 faction members (PCs) within 30 meters
{
oGroup = GetNearestCreature(CREATURE_TYPE_REPUTATION, REPUTATION_TYPE_FRIEND, oPC, i);
if ( oGroup != OBJECT_INVALID && (GetDistanceBetween(oPC, oGroup) <= 30.0) )
{
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSpell, oGroup, 18.0);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eCast, oGroup);
}
else
{
done = TRUE;
}
}
}
else
{
FloatingTextStringOnCreature("*Bard Song Failure*", oPC, TRUE);
SendMessageToPC(oPC, "Skill Roll: " + sTotal + ". Target DC 21");
}
}
else
{
AssignCommand(oPC, ActionSpeakString("Only a bard has the experience to use this item properly."));
}
}
}