//::///////////////////////////////////////////////
//:: Mephistopheles, True Name Prevents Nathyrra's Betrayal (Action Script)
//:: H9a_Meph_Name2.nss
//:: Copyright (c) 2001 Bioware Corp.
//:://////////////////////////////////////////////
/*
     Add journal entry indicating that Player
     used Nathyrra's True Name to prevent her
     betrayal.
*/
//:://////////////////////////////////////////////
//:: Created By: Rob Bartel
//:: Created On: September 18, 2003
//:://////////////////////////////////////////////
#include "nw_i0_plot"
void main()
{
    object oPC = GetPCSpeaker();
    AddJournalQuestEntry("XP2_Name_Nathyrra", 20, oPC, TRUE, TRUE, TRUE);
    SetLocalInt(GetModule(), "bNathyrraBetrays", FALSE);
    //Nix the romance
    int iRomance = GetLocalInt(GetModule(), "iNathyrraRomance");
    if (iRomance != 3)
    {
        SetLocalInt(GetModule(), "iNathyrraRomance", 0);
    }

    //Give non-repeatable XP
    int i2daRow = 175;
    int bDuplicate = GetLocalInt(GetModule(), "bEXP_"+IntToString(i2daRow));
    if (bDuplicate == FALSE)
    {
        SetLocalInt(GetModule(), "bEXP_"+IntToString(i2daRow), TRUE);
        Reward_2daXP(oPC, i2daRow);
    }
}