#include "x4_inc_functions"
void main()
{
    object oPC = GetPCSpeaker();
    string sDB = CharacterDB(oPC);

    int nIntelNPC = GetLocalInt(oPC, "QuestIntel");
    string sIntelNPC = IntToString(nIntelNPC);
    string sPrefix;
    if (nIntelNPC == 0) sPrefix = "QUEST";
    else sPrefix = sIntelNPC+"_NPC";

    int nIntelCost = GetCampaignInt(sDB, sPrefix+"_INTELCOST");
    nIntelCost = nIntelCost - nIntelCost/5;
    TakeGoldFromCreature(nIntelCost, oPC, TRUE);
}