void main()
{
    object oPlayer = GetPCSpeaker();
    int iChaModifier = GetAbilityModifier(ABILITY_CHARISMA, oPlayer);
    int iLvlFigh = GetLevelByClass(CLASS_TYPE_FIGHTER, oPlayer);
    int iLvlBarb = GetLevelByClass(CLASS_TYPE_BARBARIAN, oPlayer);
    int iLvlBard = GetLevelByClass(CLASS_TYPE_BARD, oPlayer);
    int iLvlCler = GetLevelByClass(CLASS_TYPE_CLERIC, oPlayer);
    int iLvlDrui = GetLevelByClass(CLASS_TYPE_DRUID, oPlayer);
    int iLvlMonk = GetLevelByClass(CLASS_TYPE_MONK, oPlayer);
    int iLvlPala = GetLevelByClass(CLASS_TYPE_PALADIN, oPlayer);
    int iLvlRang = GetLevelByClass(CLASS_TYPE_RANGER, oPlayer);
    int iLvlRogu = GetLevelByClass(CLASS_TYPE_ROGUE, oPlayer);
    int iLvlSorc = GetLevelByClass(CLASS_TYPE_SORCERER, oPlayer);
    int iLvlWiza = GetLevelByClass(CLASS_TYPE_WIZARD, oPlayer);
    int iLvlTotal = iLvlFigh + iLvlBarb + iLvlBard + iLvlCler + iLvlDrui + iLvlMonk + iLvlPala + iLvlRang + iLvlRogu + iLvlSorc + iLvlWiza;
    int iMultiplier = iLvlTotal - iChaModifier;
    if (iMultiplier < 1)
    {
       iMultiplier = 1;
    }
    int iFee = 300 + 20 * iLvlTotal - 10 * iChaModifier;
    SetCustomToken(70000, IntToString(iFee));
    SetLocalInt(oPlayer, "RanzFee", iFee);
}