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

            {
            if (GetBaseItemType(oItem) == BASE_ITEM_ARROW ||
                GetBaseItemType(oItem) == BASE_ITEM_BOLT ||
                GetBaseItemType(oItem) == BASE_ITEM_BULLET ||
                GetBaseItemType(oItem) == BASE_ITEM_DART ||
                GetBaseItemType(oItem) == BASE_ITEM_HEAVYCROSSBOW ||
                GetBaseItemType(oItem) == BASE_ITEM_LIGHTCROSSBOW  ||
                GetBaseItemType(oItem) == BASE_ITEM_LONGBOW ||
                GetBaseItemType(oItem) == BASE_ITEM_SHORTBOW ||
                GetBaseItemType(oItem) == BASE_ITEM_SHURIKEN ||
                GetBaseItemType(oItem) == BASE_ITEM_SLING
                )
                SetPlotFlag(oItem,FALSE);
            else
                SetPlotFlag(oItem,TRUE);
            if (GetGoldPieceValue(oItem) > iMaxGPValue && !GetPlotFlag(oItem))
                SetPlotFlag(oItem,TRUE);
            }
        oItem = GetNextItemInInventory(oPC);
        }
    }