if (is_feature('>', gc.x, gc.y))
                            learned_something_new(TUT_SEEN_STAIRS, gc.x, gc.y);

                        if ((grd(gc) == DNGN_ROCK_STAIRS_DOWN || grd(gc) == DNGN_ROCK_STAIRS_UP)
                            && see_grid( gc.x, gc.y ))
                        {
                            learned_something_new(TUT_SEEN_ESCAPE_HATCH, gc.x, gc.y);
                        }
                        else if (is_feature('>', gc.x, gc.y))
                                learned_something_new(TUT_SEEN_STAIRS, gc.x, gc.y);

void tutorial_prayer_reminder(void);

void tutorial_dissection_reminder(void);

      case TUT_SEEN_ESCAPE_HATCH:
          return "seen first escape hatch";

      case TUT_OFFER_CORPSE:
          return "learned about sacrifice";

                "and beefier. Also try to pray prior to battles so that ";
        text += god_name(you.religion);
        text += " will soon feel like providing more abilities.";

                "and beefier.";

// occasionally remind religious characters of praying
void tutorial_prayer_reminder()

// occasionally remind religious characters of sacrifices
void tutorial_dissection_reminder()

    if (coinflip()) // always would be too annoying

    // when hungry, give appropriate message or at least don't suggest sacrifice
    if (you.hunger_state < HS_SATIATED)
    {
        learned_something_new(TUT_MAKE_CHUNKS);
        return;
    }
    if (!god_likes_butchery(you.religion))
        return;
        
    if (Options.tutorial_events[TUT_OFFER_CORPSE])
        learned_something_new(TUT_OFFER_CORPSE);
    else if (one_chance_in(8))

        text =  "Remember to <w>p<magenta>ray before battle, so as to dedicate "
                "your kills to ";

        text += "If you don't need to eat it, consider <w>D<magenta>issecting "
                "this corpse under <w>p<magenta>rayer as a sacrifice to ";

        text += ". Should the monster leave a corpse, consider "
                "<w>D<magenta>issecting it as a sacrifice to ";
        text += god_name(you.religion);
        text += ", as well.";

        text += ".";
        

        Options.tut_just_triggered = true;

          if (Options.tutorial_type == TUT_BERSERK_CHAR)

          if (god_likes_butchery(you.religion))

                   << " by dissecting them, as well.";

                   << " by dissecting them, as well. Note that the gods will not "
                   << "accept rotting flesh.";

          	return;

              return;

          text << "The <w>" << colour_to_tag(colour) << static_cast<char>(ch)

          text << "The " << colour_to_tag(colour) << static_cast<char>(ch)

      case TUT_SEEN_ESCAPE_HATCH:
          object = env.show[ex][ey];
          colour = env.show_col[ex][ey];
          get_item_symbol( object, &ch, &colour );
          
          text << "These " << colour_to_tag(colour) << static_cast<char>(ch);
          if (ch == '<')
               text << "<";
          text << "<magenta> are some kind of escape hatch. You can use them to "
                  "quickly leave a level with <w><<<magenta> and <w>><magenta>, "
                  "respectively, but will usually be unable to return right away.";
          break;

          if (you.religion != GOD_NO_GOD)
          {
              text << "\nTo dedicate your kills to "

          if (you.religion == GOD_TROG)
              text << " Also, kills of living creatures are automatically "
                      "dedicated to "

                   << " <w>p<magenta>ray before battle. Note that not all gods "
                      "will be pleased about you doing this.";
          }

                   << ".";

                  "latter, all you need to do is <w>D<magenta> a corpse with a "
                  "sharp implement. Your starting weapon will do nicely. "

                  "latter, all you need to do is <w>D<magenta>issect a corpse "
                  "with a sharp implement. Your starting weapon will do nicely. "

          if (you.religion == GOD_TROG || you.religion == GOD_MAKHLEB ||
              you.religion == GOD_OKAWARU)
          {
              text << "\nIf it is a rotting corpse you carry now might be a good "
                      "time to <w>d<magenta>rop and <w>D<magenta>issect it during "
                      "prayer (<w>p<magenta>) as an offer to "
                   << god_name(you.religion)
                   << ".";
          }

                  "<w>D<magenta>issect. One or more chunks will appear that you can "
                  "then <w>e<magenta>at. Beware that some chunks may be, "

                  "<w>D<magenta>issect. One or more chunks will appear that you "
                  "can then <w>e<magenta>at. Beware that some chunks may be, "

          if (you.duration[DUR_PRAYER] &&
                (you.religion == GOD_OKAWARU || you.religion == GOD_MAKHLEB ||
                 you.religion == GOD_TROG || you.religion == GOD_ELYVILON))

          if (you.duration[DUR_PRAYER]
              && (god_likes_butchery(you.religion)
                  || god_hates_butchery(you.religion)))

              text << "\nNote that dissection under prayer offers the corpse to "

              text << "\nRemember, though, to wait until your prayer is over, or "
                      "the corpse will instead be sacrificed to "

                   << " - check your god's attitude about this with <w>^<magenta>.";

                   << ".";
          }
          break;
      case TUT_OFFER_CORPSE:
          if (!god_likes_butchery(you.religion))
          {
              return;

          text << "Hey, that monster left a corpse! If you don't need it for "
                  "food or other purposes, you can sacrifice it to "
               << god_name(you.religion)
               << " by <w>D<magenta>issecting it while <w>p<magenta>raying.";

                      "running is an option! ";
          if (Options.tutorial_type == TUT_BERSERK_CHAR && !you.duration[DUR_BERSERKER]
              && !you.hunger)

                      "running is an option!";
          if (Options.tutorial_type == TUT_BERSERK_CHAR && you.religion == GOD_TROG
              && !you.duration[DUR_BERSERKER] && you.hunger_state >= HS_SATIATED)

    std::string text = "<magenta>"

    std::ostringstream text;
    text << "<magenta>"

    if (you.religion == GOD_TROG)

    if (you.religion != GOD_NO_GOD)

        text +=
            "<w>Renounce Religion<magenta> will make your character leave your god" EOL
            "(and usually anger said god), while <w>Berserk<magenta> temporarily increases your" EOL
            "damage output in melee fights.";

       text <<
         "<w>Renounce Religion<magenta> will make your character leave your god" EOL
         "(and usually anger said god)";
       if (you.religion == GOD_TROG)
       {
         text << ", while <w>Berserk<magenta> temporarily increases your" EOL
                 "damage output in melee fights";
       }
       text << ".";

    return formatted_string::parse_string(text, false);

    return formatted_string::parse_string(text.str(), false);

void summon_berserker();

}                               // end summon_ice_beast_etc()
// Trog sends some fighting buddies for his followers
void summon_berserker()
{
    beh_type beha = BEH_GOD_GIFT;
    int pow = you.piety + random2(you.piety/4) - random2(you.piety/4);
    int numsc = std::min(2 + (random2(pow) / 4), 6);
    int mon = MONS_TROLL;
    
    if (pow <= 100)
    { // bears
      if (coinflip())
         mon = MONS_BLACK_BEAR;
      else
         mon = MONS_GRIZZLY_BEAR;
    }
    else if (pow <= 140)
    {
      // ogres
      if (one_chance_in(3))
         mon = MONS_TWO_HEADED_OGRE;
      else
         mon = MONS_OGRE;
    }
    else if (pow <= 180)
    {
      // trolls
      switch(random2(8))
      {
        case 0:
          mon = MONS_DEEP_TROLL;
          break;
        case 1:
        case 2:
          mon = MONS_IRON_TROLL;
          break;
        case 3:
        case 4:
          mon = MONS_ROCK_TROLL;
          break;
        default:
          mon = MONS_TROLL;
          break;
      }
    }
    else
    {
      // giants
      if (coinflip())
          mon = MONS_HILL_GIANT;
      else
          mon = MONS_STONE_GIANT;
    }
    int mons = create_monster( mon, numsc, beha, you.x_pos, you.y_pos, MHITYOU, 250 );
    menv[mons].go_berserk(false);

      "call upon Okawaru for minor healing",

      "",

      "give your body great, but temporary, strength",

      "call upon Trog for regeneration",

      "haste yourself",

      "call in reinforcement",

      "call upon Okawaru for minor healing",

      "",

      "give your body great, but temporary, strength",

      "call upon Trog for regeneration",

      "haste yourself",

      "call in reinforcement",

    const bool was_praying = (you.duration[DUR_PRAYER] != 0);

    if (!was_praying)
        do_god_gift();

        {
            if (you.piety > 150)
                do_god_gift();

        }

    
    if (you.religion == GOD_ELYVILON)
    {
        mpr("You can now call upon Elyvilon to destroy weapons lying on the ground.");
    }
    else if (you.religion == GOD_TROG)
    {
        mpr("You can now call upon Trog to burn books in your surroundings.");
    }

    if (se.death_type == KILLED_BY_LEAVING ||

    if (se.death_type == KILLED_BY_LEAVING  ||
        se.death_type == KILLED_BY_QUITTING ||

    if (you.hunger_state < HS_SATIATED && see_grid(monster->x, monster->y))
        learned_something_new(TUT_MAKE_CHUNKS);

    if (see_grid(monster->x, monster->y))
        tutorial_dissection_reminder();

    else if (Options.tutorial_left
             && (you.religion == GOD_TROG
                 || you.religion == GOD_OKAWARU
                 || you.religion == GOD_MAKHLEB)
             && !you.duration[DUR_PRAYER])
    {
        tutorial_prayer_reminder();
    }

        && (mon->foe == MHITNOT || mon->foe == MHITYOU))

        && (mon->foe == MHITNOT || mon->foe == MHITYOU)
        && !mon->has_ench(ENCH_BERSERK))

    FixedVector<bool, 45> tutorial_events;

    FixedVector<bool, 48> tutorial_events;

    ABIL_OKAWARU_MIGHT = 170,                //  170

    ABIL_OKAWARU_MIGHT = 170,               //  170

    ABIL_OKAWARU_HASTE,                        //  172

    ABIL_OKAWARU_HASTE = 172,               //  172

    ABIL_TROG_BURN_BOOKS,

    ABIL_TROG_BURN_BOOKS = 199,

    ABIL_TROG_MIGHT,
    ABIL_TROG_HASTE_SELF,                   //  202
    ABIL_ELYVILON_DESTROY_WEAPONS,

    ABIL_TROG_REGENERATION,
    ABIL_TROG_BROTHERS_IN_ARMS,                   //  202
    ABIL_ELYVILON_DESTROY_WEAPONS = 219,

    TUT_SEEN_TRAPS,         // 15

    TUT_SEEN_ESCAPE_HATCH,  // 15
    TUT_SEEN_TRAPS,    

    TUT_SEEN_MONSTER,
    TUT_KILLED_MONSTER,     // 20

    TUT_SEEN_MONSTER,       // 20
    TUT_KILLED_MONSTER,   

    TUT_YOU_SICK,   
    TUT_YOU_POISON,         // 25

    TUT_YOU_SICK,           // 25
    TUT_YOU_POISON,

    TUT_MULTI_PICKUP,
    TUT_HEAVY_LOAD,         // 30

    TUT_MULTI_PICKUP,       // 30
    TUT_HEAVY_LOAD,

    TUT_RUN_AWAY,   
    TUT_MAKE_CHUNKS,        // 35

    TUT_RUN_AWAY,           // 35
    TUT_MAKE_CHUNKS,
    TUT_OFFER_CORPSE,

    TUT_MAP_VIEW,   

    TUT_MAP_VIEW,           // 40

    TUT_YOU_MUTATED,        // 40

    TUT_YOU_MUTATED,

    TUT_EVENTS_NUM          // 44
}; // for numbers higher than 45 change size of tutorial_events in externs.h

    TUT_EVENTS_NUM          // 46
}; // for numbers higher than 48 change size of tutorial_events in externs.h

            }
            
            int plusmod = random2(4);
            // more damage, less accuracy
            if (agent == GOD_TROG)
            {
                thing.plus  -= plusmod;
                thing.plus2 += plusmod;

            // more accuracy, less damage
            else if (agent == GOD_OKAWARU)
            {
                thing.plus  += plusmod;
                thing.plus2 -= plusmod;
            }

    mpr(" a - Order allies to attack a monster");

    if (!(you.prev_targ == MHITNOT || you.prev_targ == MHITYOU))

    if (!you.duration[DUR_BERSERKER])

        struct monsters *target = &menv[you.prev_targ];

        mpr(" a - Order allies to attack a monster");

        if (mons_near(target) && player_monster_visible(target))

        if (!(you.prev_targ == MHITNOT || you.prev_targ == MHITYOU))

            mpr(" p - Order allies to attack your previous target");
            targ_prev = true;

            struct monsters *target = &menv[you.prev_targ];
            if (mons_near(target) && player_monster_visible(target))
            {
                mpr(" p - Order allies to attack your previous target");
                targ_prev = true;
            }

    }

   }

        if (you.duration[DUR_BERSERKER])
        {
            canned_msg(MSG_TOO_BERSERK);
            return;
        }

        if (you.duration[DUR_BERSERKER])
        {
            canned_msg(MSG_TOO_BERSERK);
            return;
        }

    if (Options.tutorial_events[TUT_RUN_AWAY] && 2*you.hp < you.hp_max )
        learned_something_new(TUT_RUN_AWAY);
        

        if (Options.tutorial_events[TUT_RUN_AWAY] && 2*you.hp < you.hp_max )
            learned_something_new(TUT_RUN_AWAY);
            

    { ABIL_TROG_BERSERK, ABIL_TROG_MIGHT, ABIL_NON_ABILITY,
      ABIL_TROG_HASTE_SELF, ABIL_NON_ABILITY },

    { ABIL_TROG_BERSERK, ABIL_TROG_REGENERATION, ABIL_NON_ABILITY,
      ABIL_TROG_BROTHERS_IN_ARMS, ABIL_NON_ABILITY },

    { ABIL_TROG_MIGHT, "Might", 0, 0, 200, 1, ABFLAG_NONE },
    { ABIL_TROG_HASTE_SELF, "Haste Self", 0, 0, 250, 3, ABFLAG_NONE },

    { ABIL_TROG_REGENERATION, "Trog's Hand", 0, 0, 50, 1, ABFLAG_NONE },
    { ABIL_TROG_BROTHERS_IN_ARMS, "Brothers in Arms", 0, 0, 100, 3, ABFLAG_NONE },

    case ABIL_TROG_MIGHT:         // piety >= 50

    case ABIL_TROG_REGENERATION:         // piety >= 50

    case ABIL_TROG_HASTE_SELF:       // piety >= 100

    case ABIL_TROG_BROTHERS_IN_ARMS:       // piety >= 100

    case ABIL_TROG_MIGHT:

    case ABIL_TROG_REGENERATION:

        potion_effect( POT_MIGHT, 150 );

        cast_regen(you.piety/2);

    case ABIL_TROG_HASTE_SELF:

    case ABIL_TROG_BROTHERS_IN_ARMS:

        potion_effect( POT_SPEED, 150 );

        summon_berserker();

    {

        learned_something_new(TUT_NEW_ABILITY);
    }