marshallLong(th, env.turns_on_level);

    env.turns_on_level = unmarshallLong(th);
    

}
static bool need_super_ood(int lev_mons)
{
    return (env.turns_on_level > 1400 - lev_mons * 117
            && one_chance_in(5000));
}
static bool need_moderate_ood(int lev_mons)
{
    return (env.turns_on_level > 700 - lev_mons * 117
            && one_chance_in(50));

            if (lev_mons > 0 && one_chance_in(5000))

            if (need_super_ood(lev_mons))

            if (one_chance_in(50))

            if (need_moderate_ood(lev_mons))

        env.turns_on_level = 0;

    // Number of turns the player has spent on this level.
    int turns_on_level;

    mprf(MSGCH_DIAGNOSTICS, "Turns spent on this level: %d",
         env.turns_on_level);

        if (env.turns_on_level + 1 > env.turns_on_level)
            env.turns_on_level++;