holy_word(50, HOLY_WORD_SPELL);

        holy_word(50, HOLY_WORD_SPELL, you.x_pos, you.y_pos, true);

    holy_word( 100, HOLY_WORD_GENERIC, true );

    holy_word(100, HOLY_WORD_GENERIC, you.x_pos, you.y_pos, true);

            holy_word( 100, HOLY_WORD_GENERIC, true );

            holy_word(100, HOLY_WORD_GENERIC, you.x_pos, you.y_pos, true);

        {
            int pow = 100;

    {
        int pow = 100;

            if (is_good_god(you.religion))
            {
                pow += (you.religion == GOD_SHINING_ONE) ? you.piety :
                                                           you.piety / 2;
            }

        if (is_good_god(you.religion))
        {
            pow += (you.religion == GOD_SHINING_ONE) ? you.piety :
                                                       you.piety / 2;
        }

            if (!holy_word(pow, HOLY_WORD_SCROLL, !item_type_known(scroll)))
            {
                canned_msg(MSG_NOTHING_HAPPENS);
                id_the_scroll = false;
            }

        if (!holy_word(pow, HOLY_WORD_SCROLL, you.x_pos, you.y_pos,
                       !item_type_known(scroll)))
        {
            canned_msg(MSG_NOTHING_HAPPENS);
            id_the_scroll = false;
        }

            // good gods like this, regardless of whether it damages anything
            if (is_good_god(you.religion))
            {
                you.duration[DUR_PIETY_POOL] += 10;
                if (you.duration[DUR_PIETY_POOL] > 500)
                    you.duration[DUR_PIETY_POOL] = 500;
            }

        // Good gods like this, regardless of whether it damages anything.
        if (is_good_god(you.religion))
        {
            you.duration[DUR_PIETY_POOL] += 10;
            if (you.duration[DUR_PIETY_POOL] > 500)
                you.duration[DUR_PIETY_POOL] = 500;

    }

int holy_word(int pow, int caster, int x, int y, bool silent);

bool holy_word(int pow, int caster, bool silent = false);

int holy_word_monsters(int x, int y, int pow, int caster);

void torment( int caster, int tx, int ty );

int torment(int caster, int x, int y);

    if (hploss >= you.hp)
        hploss = you.hp - 1;

bool holy_word(int pow, int caster, bool silent)

int holy_word_monsters(int x, int y, int pow, int caster)

    if (!silent)
        mpr("You speak a Word of immense power!");

    int retval = 0;

    bool holy_influenced = holy_word_player(pow, caster);

    // Is the player in this cell?
    if (x == you.x_pos && y == you.y_pos)
    {
        retval = (holy_word_player(pow, caster)) ? 1 : 0;
    }

    for (int tu = 0; tu < MAX_MONSTERS; tu++)

    // Is a monster in this cell?
    int mon = mgrd[x][y];
    if (mon == NON_MONSTER)
        return retval;
    monsters *monster = &menv[mon];
    if (invalid_monster(monster) || !mons_near(monster)
        || !mons_is_unholy(monster))

        monsters *monster = &menv[tu];

        return retval;
    }

        if (monster->type == -1 || !mons_near(monster))
            continue;

    int hploss = roll_dice(2, 15) + (random2(pow) / 3);
    if (hploss < 0)
        hploss = 0;

        if (mons_is_unholy(monster))
        {
            holy_influenced = true;

    behaviour_event(monster, ME_ANNOY, MHITYOU);
    hurt_monster(monster, hploss);

    if (hploss)
    {
        retval = 1;
        if (monster->hit_points > 0)

        else
            monster_die(monster, KILL_YOU, 0);
    }

            behaviour_event( monster, ME_ANNOY, MHITYOU );
            hurt_monster( monster, roll_dice( 2, 15 ) + (random2(pow) / 3) );

    if (monster->speed_increment >= 25)
    {
        retval = 1;
        monster->speed_increment -= 20;
    }

            if (monster->hit_points < 1)
            {
                monster_die(monster, KILL_YOU, 0);
                continue;
            }

    if (monster->add_ench(ENCH_FEAR))
        retval = 1;

            if (monster->speed_increment >= 25)
                monster->speed_increment -= 20;

    return retval;
}

            monster->add_ench(ENCH_FEAR);
        }                       // end "if mons_holiness"
    }                           // end "for tu"

int holy_word(int pow, int caster, int x, int y, bool silent)
{
    if (!silent)
        mpr("You speak a Word of immense power!");

    return holy_influenced;
}                               // end holy_word()

    return apply_area_within_radius(holy_word_monsters, x, y, pow, 8, caster);
}

    UNUSED( pow );

    UNUSED(pow);

        if (hploss >= you.hp)
            hploss = you.hp - 1;

    UNUSED( pow );

    UNUSED(pow);

    // is player?

    int retval = 0;
    // Is the player in this cell?

        torment_player(pow, caster);

        retval = (torment_player(0, caster)) ? 1 : 0;

    // check for monster in cell

    // Is a monster in this cell?

        return 0;

        return retval;

    if (monster->type == -1)
        return 0;

    if (invalid_monster(monster) || !mons_near(monster)
        || mons_res_negative_energy(monster) == 3)
    {
        return retval;
    }

    if (mons_res_negative_energy( monster ) == 3)
        return 0;

    int hploss = monster->hit_points / 2 - 1;
    if (hploss < 0)
        hploss = 0;
    behaviour_event(monster, ME_ANNOY, MHITYOU);
    hurt_monster(monster, hploss);

    monster->hit_points = monster->hit_points / 2 + 1;
    simple_monster_message(monster, " convulses!");

    if (hploss)
    {
        retval = 1;
        if (monster->hit_points > 0)
            simple_monster_message(monster, " convulses!");
        else
            monster_die(monster, KILL_YOU, 0);
    }

    return 1;

    return retval;

void torment(int caster, int tx, int ty)

int torment(int caster, int x, int y)

    apply_area_within_radius(torment_monsters, tx, ty, 0, 8, caster);
}                               // end torment()

    return apply_area_within_radius(torment_monsters, x, y, 0, 8, caster);
}

        holy_word( you.skills[SK_INVOCATIONS] * 8, HOLY_WORD_GENERIC );

        holy_word(you.skills[SK_INVOCATIONS] * 8, HOLY_WORD_GENERIC, you.x_pos,
                  you.y_pos, true);