void main()
    {
    object oPC = GetPCSpeaker();
    object oItem = GetFirstItemInInventory(oPC);
    int iMaxGPValue = 2000;
    while (GetIsObjectValid(oItem))
        {

            {
            if (GetBaseItemType(oItem) == BASE_ITEM_SPELLSCROLL)
                SetPlotFlag(oItem,FALSE);
            else
                SetPlotFlag(oItem,TRUE);
            if (GetGoldPieceValue(oItem) > iMaxGPValue && !GetPlotFlag(oItem))
                SetPlotFlag(oItem,TRUE);
            }
        oItem = GetNextItemInInventory(oPC);
        }
    }