Aantioch_Infernum/_module/nss/king_give_1.nss

//::///////////////////////////////////////////////
//:: FileName king_give_1
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Script Wizard
//:: Created On: 22/11/2003 15:59:15
//:://////////////////////////////////////////////
#include "nw_i0_plot"
void main()
{
    object oPC = GetPCSpeaker();
    object oParty = GetFirstFactionMember(oPC, TRUE);
    int iItem = GetNumItems(oPC, "sarumroyalseal");

    if (iItem == 1)
    SetLocalInt(oParty, "sarumseal", 1);
    oParty = GetNextFactionMember(oPC, TRUE);
    return;

    if (GetIsPC(oParty))
    {
    // Give the speaker the items
    CreateItemOnObject("sarumroyalseal", oParty, 1);
    SetLocalInt(oParty, "sarumseal", 1);
    }
    oParty = GetNextFactionMember(oPC, TRUE);
}