bool inside_level_bounds(int x, int y);
bool inside_level_bounds(coord_def &p);

}
bool inside_level_bounds(int x, int y)
{
    return (x > 0 && x < GXM && y > 0 && y < GYM);

bool inside_level_bounds(coord_def &p)
{
    return (inside_level_bounds(p.x, p.y));
}

                    if (!one_chance_in(3))
                        *colour = WHITE | colmask;
                    else if (one_chance_in(3))
                        *colour = LIGHTCYAN | colmask;

                    if (!one_chance_in(4))
                        *colour = WHITE | colmask;     // 3/4
                    else if (!one_chance_in(3))
                        *colour = LIGHTCYAN | colmask; // 1/6

                        *colour = LIGHTGRAY | colmask;

                        *colour = LIGHTGRAY | colmask; // 1/12

        if (x > 0 && x < GXM && y > 0 && y < GYM)

        if (inside_level_bounds(x,y))

    marshallByte(th, env.sanctuary_x);
    marshallByte(th, env.sanctuary_y);

    marshallCoord(th, env.sanctuary_pos);

    env.sanctuary_x    = unmarshallByte(th);
    env.sanctuary_y    = unmarshallByte(th);

    unmarshallCoord(th, env.sanctuary_pos);

void decrease_sanctuary_radius(void);

    if (env.sanctuary_x < 0 || env.sanctuary_y < 0)

    if (!inside_level_bounds(env.sanctuary_pos))

          int posx = env.sanctuary_x + x;
          int posy = env.sanctuary_y + y;

          int posx = env.sanctuary_pos.x + x;
          int posy = env.sanctuary_pos.y + y;

//    env.sanctuary_x = env.sanctuary_y = -1;

//    env.sanctuary_pos.x = env.sanctuary_pos.y = -1;

    else if (seen_change)
    {
        mpr("The air around you flickers and hums.");
        if (is_resting())
            stop_running();
    }

    if (is_resting())
        stop_running();

}
// For the last (radius) counter turns the sanctuary will slowly shrink
void decrease_sanctuary_radius()
{
    if (one_chance_in(3)) // 33% chance of not decreasing
        return;
        
    int radius = 5;
    
    int size = --env.sanctuary_time;
    if (size >= radius)
        return;
        
    radius = size+1;
    for (int x=-radius; x<=radius; x++)
         for (int y=-radius; y<=radius; y++)
         {
              int posx = env.sanctuary_pos.x + x;
              int posy = env.sanctuary_pos.y + y;
              if (!inside_level_bounds(posx,posy))
                  continue;
              int dist = distance(posx, posy, env.sanctuary_pos.x, env.sanctuary_pos.y);
              
              // if necessary overwrite sanctuary property
              if (dist > size*size)
                  env.map[posx][posy].property = FPROP_NONE;
         }
    // special case for time-out of sanctuary
    if (!size)
    {
        env.map[env.sanctuary_pos.x][env.sanctuary_pos.y].property = FPROP_NONE;
        if (see_grid(coord_def(env.sanctuary_pos.x,env.sanctuary_pos.y)))
            mpr("The sanctuary disappears.");
    }

// maybe disallow recasting while previous sanctuary in effect...

    if (!silenced(you.x_pos, you.y_pos))

    if (!silenced(you.x_pos, you.y_pos)) // how did you manage that?

    env.sanctuary_x = you.x_pos;
    env.sanctuary_y = you.y_pos;
    env.sanctuary_time = 15;

    env.sanctuary_pos.x = you.x_pos;
    env.sanctuary_pos.y = you.y_pos;
    env.sanctuary_time = 7 + you.skills[SK_INVOCATIONS]/2;

    // radius could also be influenced by Inv 
    // and would then have to be stored globally

              if (posx <= 0 || posx > GXM || posy <= 0 || posy > GYM)

              if (!inside_level_bounds(posx, posy))

#include <cmath>

        case GOD_ZIN:
        case GOD_SHINING_ONE:

        case GOD_ZIN: // in contrast to TSO, who doesn't mind martyrs

       {

           // lower penance a bit more for being particularly successful
           dec_penance(god, 1);
       }

    }

    } // plus Smiting?

    you.duration[DUR_PIETY_POOL] = 0; // your loss

    case GOD_ZIN:
        return item.base_type == OBJ_GOLD;

    // donate gold to gain piety distributed over time
    if (you.religion == GOD_ZIN)
    {
        if (!you.gold)
        {
            mpr("You don't have anything to sacrifice.");
            return;
        }
        if (!yesno("Do you wish to part with all of your money? ", true, 'n'))
            return;
        int donation_value = (int) (you.gold/200 * log(you.gold));
#if DEBUG_DIAGNOSTICS || DEBUG_SACRIFICE || DEBUG_PIETY
        mprf(MSGCH_DIAGNOSTICS, "A donation of $%d amounts to an "
             "increase of piety by %d.", you.gold, donation_value);
#endif
        you.gold = 0;
        you.redraw_gold = true;
        if (donation_value < 1)
        {
            simple_god_message(" finds your generosity lacking.");
            return;
        }
        else if (donation_value <= 5) // $100 or more
            simple_god_message(" is satisfied with your donation.");
        else if (donation_value <= 20) // about $400 or more
            simple_god_message(" is pleased about your sacrifice.");
        else if (donation_value <= 50) // about $1500 or more
            simple_god_message(" is impressed by your generosity.");
        else // about $3000 or more
            simple_god_message(" is deeply moved by your generosity.");
        you.duration[DUR_PIETY_POOL] += donation_value;
        if (you.duration[DUR_PIETY_POOL] > 500)
            you.duration[DUR_PIETY_POOL] = 500;
            
        return; // doesn't accept anything else for sacrifice
    }

        case GOD_ZIN:

    else if (mons_is_fleeing(monster) && env.sanctuary_x != -1
             && !is_sanctuary(monster->x, monster->y)
             && monster->target_x == env.sanctuary_x
             && monster->target_y == env.sanctuary_y)

    else if (mons_is_fleeing(monster) && inside_level_bounds(env.sanctuary_pos)
             && monster->target_x == env.sanctuary_pos.x
             && monster->target_y == env.sanctuary_pos.y)

    }
    // don't allow monsters to enter a sanctuary
    // or attack you inside a sanctuary even if it's right next to them
    if (is_sanctuary(monster->x + mmov_x, monster->y + mmov_y)
        && (!is_sanctuary(monster->x, monster->y)
            || monster->x + mmov_x == you.x_pos
               && monster->y + mmov_y == you.y_pos))
    {
        mmov_x = 0;
        mmov_y = 0;

    // now quit if we're can't move

    // now quit if we can't move

    if (targ_x < 0 || targ_x >= GXM || targ_y < 0 || targ_y >= GYM)

    if (!inside_level_bounds(targ_x, targ_y))

    you.prev_targ      = MHITNOT;

    you.prev_targ     = MHITNOT;

        env.sanctuary_x    = -1;
        env.sanctuary_y    = -1;

        // sanctuary
        env.sanctuary_pos  = coord_def(-1, -1);

    int sanctuary_x;
    int sanctuary_y;

    coord_def sanctuary_pos;

    DUR_PIETY_POOL,             // distribute piety over time

        result += "Pray at one of " + god_name(god)
               +  "'s altars to part with your money.";
        break;
        

                + " to bless a ";
            result += (god == GOD_ZIN ? "mace" : "long sword");
            result += ".";

                   +  " to bless a long sword.";

                + " to bless your weapon." EOL;

                   +  " to bless your weapon." EOL;

             "Inscribe items with !p, !* or =p to avoid sacrificing "
             "them accidentally.";

                  "Inscribe items with !p, !* or =p to avoid sacrificing "
                  "them accidentally.";

worshippers can gain sustenance in times of need, and a variety of

worshippers can gain sustenance in times of need and a variety of

substances. Zin appreciates long-standing faith as well as
sacrifices of valued objects.

substances. Zin values selflessness and appreciates long-standing 
faith.

%%%%

%%%%

    // Leak piety from the piety pool (currently Zin only) into actual piety.
    // Note that changes of religious status without corresponding actions
    // (killing monsters, offering items, ...) might be confusing for characters
    // of other religions.
    // For now, though, keep information about what happened hidden.
    if (you.duration[DUR_PIETY_POOL] && one_chance_in(20))
    {
        you.duration[DUR_PIETY_POOL]--; // decrease even if piety at maximum
        if (you.piety < 200)
        {
#if DEBUG_DIAGNOSTICS || DEBUG_SACRIFICE || DEBUG_PIETY
            mpr("Piety increases by 1 due to piety pool.", MSGCH_DIAGNOSTICS);
#endif
            you.piety++;
        }
#if DEBUG_DIAGNOSTICS || DEBUG_SACRIFICE || DEBUG_PIETY
        else
            mpr("Piety already at maximum and fails to increase "
                "from piety pool.", MSGCH_DIAGNOSTICS);
            
        if (!you.duration[DUR_PIETY_POOL])
            mpr("Piety pool is now empty.", MSGCH_DIAGNOSTICS);
#endif
    }

    env.sanctuary_time--;
    if (env.sanctuary_time == 0)
        remove_sanctuary();

    decrease_sanctuary_radius();

    { ABIL_ZIN_SANCTUARY, "Sanctuary", 7, 0, 150, 10, ABFLAG_NONE },

    { ABIL_ZIN_SANCTUARY, "Sanctuary", 7, 0, 150, 15, ABFLAG_NONE },