void do_divine_healing( CHAR_DATA *ch, char *argument )
{
    /* Rhien (Blake Pell - rhien@dsl-mud.org <mailto:rhien@dsl-mud.org>), 3-07-2002
       Dark and Shattered Lands: <http://www.dsl-mud.org>
       This snippet is for public use as long as this comment block stays in tact */ 

    CHAR_DATA *victim; 

    if (ch->move <= 100 || ch->mana <= 200 || ch->hit <= 800)
    {
        send_to_char("You are far too weak at the moment to use such an ability.\n\r", ch);
        return;
    }

    if ( argument[0] == '\0' )
    {
        send_to_char("You must specify somebody who deserves such a gift.\n\r", ch);
        return;
    } 

    if ( ( victim = get_char_room( ch, argument ) ) == NULL )
    {
        send_to_char("They are not here.\n\r", ch);
        return;
    } 

    if ( ch->pc_class != CLERIC_CLASS_LOOKUP )
    {
        send_to_char("Only those closest to their gods may give divine healing.\n\r", ch);
        return;
    } 

    if ( IS_NPC(victim) || 
         ch->alignment != victim->alignment)
    {
        send_to_char("You cannot give them such a gift.\n\r", ch);
    } 

    // Now, the effects of the healing onto the players
    ch->hit = 100;
    ch->mana = 20;
    ch->move = 20; 
    victim->hit = victim->max_hit;
    victim->mana = victim->max_mana;
    victim->move = victim->max_move; 

    act( "$n kneels to the ground and calls to the gods!",ch, NULL, NULL, TO_ROOM );
    send_to_char("You kneel to the ground and call to the gods!\n\r", ch); 

    return;

} // end divine_healing