Author: Trulain
Author Website: n/a
Script Name: Darklamp vs. 1.1
Description: DarkLamps create darkness fields around them. Undead set these up before performing rituals outside in the daytime - though they have many other uses. To remove the darkness, PC's simply have to destroy the candelabra.  However, DarkLights come with optional OnDamaged script which will summon creatures to defend them when attacked.
New in Version 1.1
  1. DARKLAMP CREATION INSTRUCTIONS HAVE CHANGED
  2. Eliminated need for heartbeat event, improves computational efficiency greatly
  3. Eliminated visual artifacts such as bleeding that were result of use of HB event
  4. Summoned defenders now scale to level of whoever damages the DarkLight.  (default settings: 1-5: Skeleton, 6-10: Skeleton Warrior 11-15: Skeleton Chieftian, 16:20: Bone Golem)
  5. Defenders summoned by the DarkLamp now have optional "black light" glow
Instructions on Use: How to make a Darklamp:
  1. Make a USEABLE Candelabra and change its name and TAG to DarkLamp
    1. If you make the candelabra's TAG something other than DarkLamp, edit the darklamp_init script accordingly
  2. Create sound object called DarkLampSound & place on/near the Candelabra
  3. Set up DarkLampSound to play "al_mg_ballmagic1" set to seemless looping
  4. Attach script 1 below (darklamp_init) to the MODULE'S OnModuleLoad event slot.
  5. Attach script 2 below (darklamp_use_d) to the Candelabra's OnUserDefined event slot.
  6. Attach script 3 below (darklamp_dmg) to the Candelabra's OnDamaged event slot.
  7. Attach script 4 below (darklamp_death) to the Candelabra's OnDeath event slot.
  8. Don't forget to add the DarkLamp to the Custom Pallette once it's set up!

Optional Steps:

  1. In the _dmg script (script 3 below), substitute TAGs for desired critters if you don't want the default skeleton ones.
  2. In the _dmg script (script 3 below), comment the identified line to remove "darkglow" effect on summoned critters.
  3. In the _use_d script (script 2 below), replace VFX_DUR_DARKNESS with VFX_DUR_ANTI_LIGHT_10 for less darkness - not recommended.

Script 1 (OnModuleLoad):

//::///////////////////////////////////////////////

//:: FileName: darklamp_init

//:: version : 1.1

//:://////////////////////////////////////////////

//:: Changes in this version:

//:: 1)DARKLAMP CREATION INSTRUCTIONS HAVE CHANGED

//:: 2)Eliminated need for heartbeat event, improves computational efficiency greatly

//:: 3)Eliminated visual artifacts such as bleeding that were result of use of HB event

//:: 4)Summoned defenders now scale to level of whoever damages the DarkLight.

//::   (default settings: 1-5: Skeleton, 6-10: Skeleton Warrior

//::    11-15: Skeleton Chieftian, 16:20: Bone Golem)

//:: 5)Defenders summoned by the DarkLamp now have optional "black light" glow

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: Created By: Trulain

//:: Created On: July 13, 2002

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: DarkLamps create darkness fields around them.  Undead set these up before

//:: performing rituals outside in the daytime - though they have many other

//:: uses.  To remove the darkness, PC's simply have to destroy the candelabra.

//:: However, DarkLights come with optional OnDamaged script which will summon

//:: creatures to defend them when attacked.

//::

//:: DARKLAMP CREATION INSTRUCTIONS

//:: 1) Make a USEABLE Candelabra and change its name and TAG to DarkLamp

//:: 1a)If you make the candelabra's TAG something other than DarkLamp, edit the darklamp_init script accordingly

//:: 2) Create sound object called DarkLampSound & place on/near the Candelabra

//:: 3) Set up DarkLampSound to play "al_mg_ballmagic1" set to seemless looping

//:: 4) Attach script darklamp_init to the MODULE'S OnModuleLoad event slot

//:: 5) Attach script darklamp_use_d to the Candelabra's OnUserDefined event slot

//:: 6) Attach script darklamp_dmg to the Candelabra's OnDamaged event slot

//:: 7) Attach script darklamp_death to the Candelabra's OnDeath event slot

//:: 8)   Don't forget to add the DarkLamp to the Custom Pallette once it's set up!

//::

//:: OPTIONAL STEPS

//:: 1) In the _dmg script, substitute TAGs for desired critters if you don't want the default skeleton ones

//:: 2) In the _dmg script, comment the identified line to remove "darkglow" effect on summoned critters

//:: 3) In the _use_d script, replace VFX_DUR_DARKNESS with VFX_DUR_ANTI_LIGHT_10 for less darkness - not recommended =)

void main()

{

    //Initialize the Darklamps' VFX

    int nNth = 0;

    object oDarkLamp = GetObjectByTag("DarkLamp", nNth);

    while (GetIsObjectValid(oDarkLamp))

    {

        SignalEvent(oDarkLamp, EventUserDefined(666));

        nNth++;

        oDarkLamp = GetObjectByTag("DarkLamp", nNth);

    }

}

Script 2 (Candelabra - OnUserDefined):

//::///////////////////////////////////////////////

//:: FileName: darklamp_use_d

//:: version : 1.1

//:://////////////////////////////////////////////

//:: Changes in this version:

//:: 1)DARKLAMP CREATION INSTRUCTIONS HAVE CHANGED

//:: 2)Eliminated need for heartbeat event, improves computational efficiency greatly

//:: 3)Eliminated visual artifacts such as bleeding that were result of use of HB event

//:: 4)Summoned defenders now scale to level of whoever damages the DarkLight.

//::   (default settings: 1-5: Skeleton, 6-10: Skeleton Warrior

//::    11-15: Skeleton Chieftian, 16:20: Bone Golem)

//:: 5)Defenders summoned by the DarkLamp now have optional "black light" glow

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: Created By: Trulain

//:: Created On: July 13, 2002

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: DarkLamps create darkness fields around them.  Undead set these up before

//:: performing rituals outside in the daytime - though they have many other

//:: uses.  To remove the darkness, PC's simply have to destroy the candelabra.

//:: However, DarkLights come with optional OnDamaged script which will summon

//:: creatures to defend them when attacked.

//::

//:: DARKLAMP CREATION INSTRUCTIONS

//:: 1) Make a USEABLE Candelabra and change its name and TAG to DarkLamp

//:: 1a)If you make the candelabra's TAG something other than DarkLamp, edit the darklamp_init script accordingly

//:: 2) Create sound object called DarkLampSound & place on/near the Candelabra

//:: 3) Set up DarkLampSound to play "al_mg_ballmagic1" set to seemless looping

//:: 4) Attach script darklamp_init to the MODULE'S OnModuleLoad event slot

//:: 5) Attach script darklamp_use_d to the Candelabra's OnUserDefined event slot

//:: 6) Attach script darklamp_dmg to the Candelabra's OnDamaged event slot

//:: 7) Attach script darklamp_death to the Candelabra's OnDeath event slot

//:: 8)   Don't forget to add the DarkLamp to the Custom Pallette once it's set up!

//::

//:: OPTIONAL STEPS

//:: 1) In the _dmg script, substitute TAGs for desired critters if you don't want the default skeleton ones

//:: 2) In the _dmg script, comment the identified line to remove "darkglow" effect on summoned critters

//:: 3) In the _use_d script, replace VFX_DUR_DARKNESS with VFX_DUR_ANTI_LIGHT_10 for less darkness - not recommended =)
void main()

{

    int nUser = GetUserDefinedEventNumber();

    if(nUser == 666)

    {

        effect eDarkness = EffectVisualEffect(VFX_DUR_DARKNESS);

        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eDarkness, OBJECT_SELF);

        effect eGlow = EffectVisualEffect(VFX_DUR_GHOSTLY_VISAGE);

        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eGlow, OBJECT_SELF);

        effect eEnergyField = EffectVisualEffect(VFX_DUR_GLOBE_MINOR);

        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eEnergyField, OBJECT_SELF);

        effect eGroundReflect = EffectVisualEffect(VFX_DUR_SPELLTURNING);

        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eGroundReflect, OBJECT_SELF);

    }

}

Script 3 (Candelabra - OnDamaged):

//::///////////////////////////////////////////////

//:: FileName: darklamp_dmg

//:: version : 1.1

//:://////////////////////////////////////////////

//:: Changes in this version:

//:: 1)DARKLAMP CREATION INSTRUCTIONS HAVE CHANGED

//:: 2)Eliminated need for heartbeat event, improves computational efficiency greatly

//:: 3)Eliminated visual artifacts such as bleeding that were result of use of HB event

//:: 4)Summoned defenders now scale to level of whoever damages the DarkLight.

//::   (default settings: 1-5: Skeleton, 6-10: Skeleton Warrior

//::    11-15: Skeleton Chieftian, 16:20: Bone Golem)

//:: 5)Defenders summoned by the DarkLamp now have optional "black light" glow

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: Created By: Trulain

//:: Created On: July 13, 2002

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: DarkLamps create darkness fields around them.  Undead set these up before

//:: performing rituals outside in the daytime - though they have many other

//:: uses.  To remove the darkness, PC's simply have to destroy the candelabra.

//:: However, DarkLights come with optional OnDamaged script which will summon

//:: creatures to defend them when attacked.

//::

//:: DARKLAMP CREATION INSTRUCTIONS

//:: 1) Make a USEABLE Candelabra and change its name and TAG to DarkLamp

//:: 1a)If you make the candelabra's TAG something other than DarkLamp, edit the darklamp_init script accordingly

//:: 2) Create sound object called DarkLampSound & place on/near the Candelabra

//:: 3) Set up DarkLampSound to play "al_mg_ballmagic1" set to seemless looping

//:: 4) Attach script darklamp_init to the MODULE'S OnModuleLoad event slot

//:: 5) Attach script darklamp_use_d to the Candelabra's OnUserDefined event slot

//:: 6) Attach script darklamp_dmg to the Candelabra's OnDamaged event slot

//:: 7) Attach script darklamp_death to the Candelabra's OnDeath event slot

//:: 8)   Don't forget to add the DarkLamp to the Custom Pallette once it's set up!

//::

//:: OPTIONAL STEPS

//:: 1) In the _dmg script, substitute TAGs for desired critters if you don't want the default skeleton ones

//:: 2) In the _dmg script, comment the identified line to remove "darkglow" effect on summoned critters

//:: 3) In the _use_d script, replace VFX_DUR_DARKNESS with VFX_DUR_ANTI_LIGHT_10 for less darkness - not recommended =)

void main()

{

//Declare variables

    int nPosLevel = 1;

    int nLastDamagerLevel = 0;

    object oSummonedDefender;

    location lSpawnPoint = GetLocation(OBJECT_SELF);

    effect eSummon = EffectVisualEffect(VFX_FNF_SUMMON_UNDEAD);

    effect eDarkGlow = EffectVisualEffect(VFX_DUR_GHOSTLY_VISAGE);

//Get level of last attacker

    while(GetLevelByPosition(nPosLevel, GetLastDamager()) != 0)

    {

        nLastDamagerLevel = nLastDamagerLevel + GetLevelByPosition(nPosLevel, GetLastDamager());

        nPosLevel++;

    }

//Determine what creature to summon based on attacker level

    if(nLastDamagerLevel <=5)

    {

        object oSummonedDefender = CreateObject(OBJECT_TYPE_CREATURE, "NW_SKELETON", lSpawnPoint, FALSE);

    }

    else if(nLastDamagerLevel <=10)

    {

        object oSummonedDefender = CreateObject(OBJECT_TYPE_CREATURE, "NW_SKELWARR01", lSpawnPoint, FALSE);

        }

    else if(nLastDamagerLevel <=15)

    {

        object oSummonedDefender = CreateObject(OBJECT_TYPE_CREATURE, "NW_SKELCHIEF", lSpawnPoint, FALSE);

        }

    else if(nLastDamagerLevel <=20)

    {

        object oSummonedDefender = CreateObject(OBJECT_TYPE_CREATURE, "NW_GolBone", lSpawnPoint, FALSE);

        }

//Summon the defender

    oSummonedDefender;

//Apply "black light" glow effect

    ApplyEffectToObject(DURATION_TYPE_PERMANENT, eDarkGlow, oSummonedDefender);  //Coment to remove "black light" glow
// Apply Undead special effect on DarkLamp

    ApplyEffectToObject(DURATION_TYPE_INSTANT, eSummon, OBJECT_SELF);

}

Script 4 (Candelabra - OnDeath):

//::///////////////////////////////////////////////

//:: FileName: darklamp_death

//:: version : 1.1

//:://////////////////////////////////////////////

//:: Changes in this version:

//:: 1)DARKLAMP CREATION INSTRUCTIONS HAVE CHANGED

//:: 2)Eliminated need for heartbeat event, improves computational efficiency greatly

//:: 3)Eliminated visual artifacts such as bleeding that were result of use of HB event

//:: 4)Summoned defenders now scale to level of whoever damages the DarkLight.

//::   (default settings: 1-5: Skeleton, 6-10: Skeleton Warrior

//::    11-15: Skeleton Chieftian, 16:20: Bone Golem)

//:: 5)Defenders summoned by the DarkLamp now have optional "black light" glow

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: Created By: Trulain

//:: Created On: July 13, 2002

//:://////////////////////////////////////////////

/*

*/

//:://////////////////////////////////////////////

//:: DarkLamps create darkness fields around them.  Undead set these up before

//:: performing rituals outside in the daytime - though they have many other

//:: uses.  To remove the darkness, PC's simply have to destroy the candelabra.

//:: However, DarkLights come with optional OnDamaged script which will summon

//:: creatures to defend them when attacked.

//::

//:: DARKLAMP CREATION INSTRUCTIONS

//:: 1) Make a USEABLE Candelabra and change its name and TAG to DarkLamp

//:: 1a)If you make the candelabra's TAG something other than DarkLamp, edit the darklamp_init script accordingly

//:: 2) Create sound object called DarkLampSound & place on/near the Candelabra

//:: 3) Set up DarkLampSound to play "al_mg_ballmagic1" set to seemless looping

//:: 4) Attach script darklamp_init to the MODULE'S OnModuleLoad event slot

//:: 5) Attach script darklamp_use_d to the Candelabra's OnUserDefined event slot

//:: 6) Attach script darklamp_dmg to the Candelabra's OnDamaged event slot

//:: 7) Attach script darklamp_death to the Candelabra's OnDeath event slot

//:: 8)   Don't forget to add the DarkLamp to the Custom Pallette once it's set up!

//::

//:: OPTIONAL STEPS

//:: 1) In the _dmg script, substitute TAGs for desired critters if you don't want the default skeleton ones

//:: 2) In the _dmg script, comment the identified line to remove "darkglow" effect on summoned critters

//:: 3) In the _use_d script, replace VFX_DUR_DARKNESS with VFX_DUR_ANTI_LIGHT_10 for less darkness - not recommended =)

void main()

{

//Stop sound object associated with this DarkLamp

    object oDarkLightHum = GetNearestObjectByTag("DarkLampSound", OBJECT_SELF, 1);

    SoundObjectStop(oDarkLightHum);

//DarkLamp destruction VFX/SFX

    effect eLightBurst = EffectVisualEffect(VFX_FNF_BLINDDEAF);

    ApplyEffectToObject(DURATION_TYPE_PERMANENT, eLightBurst, OBJECT_SELF);

    PlaySound("sca_dragodd");

}