Further file organization

Further file organization

nwn/nwnprc/trunk/smp/phs_s_summoninst.nss

@@ -0,0 +1,77 @@
+/*:://////////////////////////////////////////////
+//:: Spell Name Summon Instrument
+//:: Spell FileName PHS_S_SummonInst
+//:://////////////////////////////////////////////
+//:: In Game Spell desctiption
+//:://////////////////////////////////////////////
+    Summon Instrument
+    Conjuration (Summoning)
+    Level: Brd 0
+    Components: V, S
+    Casting Time: 1 round
+    Range: 0M.
+    Effect: One summoned handheld musical instrument
+    Duration: 1 min./level (D)
+    Saving Throw: None
+    Spell Resistance: No
+
+    This spell summons one handheld musical instrument of your choice, a lyre,
+    pipes, lute, guitar or tambourine. This instrument appears in your inventory.
+    The instrument is typical for its type. Only one instrument appears per
+    casting, and it will play only for you - you cannot drop it.
+//:://////////////////////////////////////////////
+//:: Spell Effects Applied / Notes
+//:://////////////////////////////////////////////
+    Basically, creates a magical instrument. More then one can be chosen, but
+    are chosen in the spell menu.
+
+    Could add in the bard song thing an optional part for instruments being
+    needed (as D&D) - but that might mean to force them to continue singing
+    or something...or perhaps just keeping the instrument equipped.
+
+    Oh, and the desciption has been simplified and whatnot.
+//:://////////////////////////////////////////////
+//:: Created By: Jasperre
+//::////////////////////////////////////////////*/
+
+#include "PHS_INC_SPELLS"
+
+void main()
+{
+    // Spell hook check.
+    if(!PHS_SpellHookCheck(PHS_SPELL_SUMMON_INSTRUMENT)) return;
+
+    // Declare major variables
+    object oCaster = OBJECT_SELF;
+    object oTarget = GetSpellTargetObject();// Should be OBJECT_SELF
+    int nCnt;
+
+    // Can be 0-4
+    string sResRef = "phs_suminst_";
+
+    // Destroy all other instruments
+    for(nCnt = 0; nCnt <= 4; nCnt++)
+    {
+        PHS_ComponentItemRemove(sResRef + IntToString(nCnt));
+    }
+    // Get what we want to create
+    int nInstrument;
+
+    switch(GetSpellId())
+    {
+        case PHS_SPELL_SUMMON_INSTRUMENT_LUTE: nInstrument = 0; break;
+        case PHS_SPELL_SUMMON_INSTRUMENT_PIPES: nInstrument = 1; break;
+        case PHS_SPELL_SUMMON_INSTRUMENT_LYRE: nInstrument = 2; break;
+        case PHS_SPELL_SUMMON_INSTRUMENT_GUITAR: nInstrument = 3; break;
+        case PHS_SPELL_SUMMON_INSTRUMENT_TAMBOURINE: nInstrument = 4; break;
+        default: nInstrument = 0; break;
+    }
+    // Finnish resref
+    sResRef += IntToString(nInstrument);
+
+    // Signal spell cast at
+    PHS_SignalSpellCastAt(oTarget, PHS_SPELL_SUMMON_INSTRUMENT, FALSE);
+
+    // It is already plot and cursed (cannot be dropped) so create
+    CreateItemOnObject(sResRef, oTarget);
+}