int weighted_random(const int weights[], unsigned int numweights);

int random_rod_subtype();

}
int weighted_random( const int weights[], unsigned int numweights )
{
    int totalweight = 0;
    unsigned int result = 0;
    for ( unsigned int i = 0; i < numweights; ++i )
    {
        totalweight += weights[i];
        if ( random2(totalweight) < weights[i] )
            result = i;
    }
    return result;

int random_rod_subtype()
{
    return STAFF_SMITING + random2(NUM_STAVES - STAFF_SMITING);
}

#define NUMBER_SPELLBOOKS 60

#define NUMBER_SPELLBOOKS 61

    // 50 - Staff of Smiting //jmf: totally obsolete --- no longer looks here.

    // Rods - start at 50.
    // 50 - Rod of smiting

    // 51 - Staff of Summoning

    // 51 - Rod of summoning

    // 52 - Staff of Destruction

    // 52 - Rod of destruction (fire)

    // 53 - Staff of Destruction

    // 53 - Rod of destruction (ice)

    // 54 - Staff of Destruction

    // 54 - Rod of destruction (iron, fireball, lightning)

    // 55 - Staff of Destruction

    // 55 - Rod of destruction (bolts)

    // 56 - Staff of Warding

    // 56 - Rod of warding

    // 57 - Staff of Exploration

    // 57 - Rod of discovery

    // 58 - Staff of Demonology

    // 58 - Rod of demonology

    // 59 - Staff of Striking -- unused like Smiting

    // 59 - Rod of striking

    // 60 - Rod of venom
    {SPELL_CURE_POISON_II,
     SPELL_VENOM_BOLT,
     SPELL_POISON_ARROW,
     SPELL_POISONOUS_CLOUD,
     SPELL_NO_SPELL,
     SPELL_NO_SPELL,
     SPELL_NO_SPELL,
     SPELL_NO_SPELL
    },

    case OBJ_STAVES:            // this can be parsed, too {dlb}

    case OBJ_STAVES:

            mitm[p].sub_type = random2(13);

            // assumption: STAFF_SMITING is the first rod
            mitm[p].sub_type = random2(STAFF_SMITING);

            // top three non-spell staves are in separate block -- bwr
            if (mitm[p].sub_type >= 10)
                mitm[p].sub_type = STAFF_AIR + mitm[p].sub_type - 10;  
            // spell staves 

            // rods are rare (10% of all staves)

                mitm[p].sub_type = STAFF_SMITING + random2(10);

                mitm[p].sub_type = random_rod_subtype();

            // staves of energy/channeling are less common, wizardry/power
            // are more common

        mitm[p].special = random2(NUM_STAVE_ADJ);

    // I think these must always be forced, too ... {dlb}
    case OBJ_MISCELLANY: //mv: rewrote with use of NUM_MISCELLANY (9 Aug 01)

    case OBJ_MISCELLANY:

        break; // mv: end of rewrote;

        break;

    // should really only be used for monster inventories.

    // this safety for fear that a report of Trog giving a non-existant 

    // this safety for fear that a report of Trog giving a nonexistent 

    return (base_type == OBJ_BOOKS?   sub_type      :
            base_type == OBJ_STAVES?  sub_type + 40 :

    return (base_type == OBJ_BOOKS?   sub_type                      :
            base_type == OBJ_STAVES?  sub_type + 50 - STAFF_SMITING :

    return (item.base_type == OBJ_STAVES 
            && item.sub_type >= STAFF_SMITING && item.sub_type < STAFF_AIR);

    return (item.base_type == OBJ_STAVES && item.sub_type >= STAFF_SMITING);

    // Isn't De Morgan's law wonderful. -- bwr
    return (item.base_type == OBJ_STAVES 
            && (item.sub_type < STAFF_SMITING || item.sub_type >= STAFF_AIR));

    return (item.base_type == OBJ_STAVES && !item_is_rod(item));

    case STAFF_SMITING:     return "smiting";
    case STAFF_STRIKING:    return "striking";
    case STAFF_WARDING:     return "warding";
    case STAFF_DISCOVERY:   return "discovery";
    case STAFF_DEMONOLOGY:  return "demonology";

    case STAFF_CHANNELING:      return "channeling";
    case STAFF_WARDING:         return "warding";
    case STAFF_DISCOVERY:       return "discovery";
    case STAFF_SMITING:         return "smiting";
    case STAFF_STRIKING:        return "striking";
    case STAFF_DEMONOLOGY:      return "demonology";
    case STAFF_VENOM:           return "venom";

    case STAFF_CHANNELING:      return "channeling";

bool drink_fountain(void);
static bool enchant_armour( void );

static bool drink_fountain();
static bool enchant_armour();

        fountain_effect = effects[weighted_random(weights,ARRAYSIZE(weights))];

        fountain_effect =
            effects[choose_random_weighted(weights,
                                           weights + ARRAYSIZE(weights))];

    STAFF_WIZARDRY,                    //    0

    // staves
    STAFF_WIZARDRY = 0,

    STAFF_ENERGY,                      //    5

    STAFF_ENERGY,

    STAFF_SMITING,                     //   10

    STAFF_AIR,
    STAFF_EARTH,
    STAFF_CHANNELING,
    // rods
    STAFF_SMITING,              // must be first rod!

    STAFF_DESTRUCTION_IV,              //   15

    STAFF_DESTRUCTION_IV,

    STAFF_DEMONOLOGY,                  //   18
    STAFF_STRIKING,                    //   19
    STAFF_AIR = 25,                    //   25
    STAFF_EARTH,
    STAFF_CHANNELING,

    STAFF_DEMONOLOGY,
    STAFF_STRIKING,
    STAFF_VENOM,

                        type_wanted = STAFF_SMITING + random2(10);

                        type_wanted = random_rod_subtype();

                // Increased chance of getting spell staff for new or

                // Increased chance of getting a rod for new or

                        && (type_wanted < STAFF_SMITING // already making one
                            || type_wanted >= STAFF_AIR)

                        && type_wanted < STAFF_SMITING

                    type_wanted = (coinflip() ? STAFF_STRIKING 
                                              : STAFF_SMITING + random2(10));

                    type_wanted = coinflip() ? STAFF_STRIKING :
                        random_rod_subtype();

        case STAFF_VENOM:
            description +=
                "contains offensive and defensive spells of poison.";
            break;

#define NUM_STAVE_ADJ                   10