#include "tiles.h"

 #include "tiles.h"

            you.species = get_tutorial_species(Options.tutorial_type);

            you.species    = get_tutorial_species(Options.tutorial_type);

            Options.tut_stashes = true;
            Options.tut_travel = true;

            Options.tut_stashes  = true;
            Options.tut_travel   = true;

            Options.tut_spell_counter = 0;
            Options.tut_throw_counter = 0;

            Options.tut_spell_counter   = 0;
            Options.tut_throw_counter   = 0;
            Options.tut_melee_counter   = 0;

            Options.tut_melee_counter = 0;

            you.species = SP_UNKNOWN;

            you.species    = SP_UNKNOWN;

            Options.race = 0;
            Options.cls = 0;

            Options.race   = 0;
            Options.cls    = 0;

            return false;       // as if

            return false;

    result = "<magenta>"
             "What you see here is the typical Crawl screen. The upper left map "
             "shows your hero as the <w>@</w> in the center. The parts "
             "of the map you remember but cannot currently see will be greyed "
             "out."
             "</magenta>" EOL;

    result  = "<";
    result += colour_to_str(channel_to_colour(MSGCH_TUTORIAL));
    result += ">";
    result += "What you see here is the typical Crawl screen. The upper left map "
              "shows your hero as the <w>@</w> in the center. The parts "
              "of the map you remember but cannot currently see will be greyed "
              "out.";
    result += "</";
    result += colour_to_str(channel_to_colour(MSGCH_TUTORIAL));
    result += ">" EOL;

    istr << "<magenta>"
        "To the right, important properties of \n"
        "the character are displayed. The most \n"
        "basic one is your health, measured as \n"
        "<w>HP: " << you.hp << "/" << you.hp_max << "</w>. ";

    istr << "<"
         << colour_to_str(channel_to_colour(MSGCH_TUTORIAL))
         << ">"
         << "To the right, important properties of \n"
            "the character are displayed. The most \n"
            "basic one is your health, measured as \n"
            "<w>HP: " << you.hp << "/" << you.hp_max << "</w>. ";

        "These are your current out \n"
        "of maximum health points. When health \n"
        "drops to zero, you die.               \n"
        "<w>Magic: "
         << you.magic_points << "/" << you.max_magic_points <<
        "</w> is your energy for casting \n"
        "spells, although more mundane actions \n"
        "often draw from Magic, too.           \n"
        "Further down, <w>Str</w>ength, <w>Dex</w>terity and \n"
        "<w>Int</w>elligence are shown and provide an \n"
        "all-around account of the character's \n"
        "attributes.                           \n"
        "</magenta>"
        "                                      \n"
        " --more--                               Press <w>Escape</w> to skip the basics\n"
        "                                      \n"
        "                                      \n";

            "These are your current out \n"
            "of maximum health points. When health \n"
            "drops to zero, you die.               \n"
            "<w>Magic: " << you.magic_points << "/" << you.max_magic_points
         << "</w> is your energy for casting \n"
            "spells, although more mundane actions \n"
            "often draw from Magic, too.           \n"
            "Further down, <w>Str</w>ength, <w>Dex</w>terity and \n"
            "<w>Int</w>elligence are shown and provide an \n"
            "all-around account of the character's \n"
            "attributes.                           \n"
         << "</" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">"
            "                                      \n"
            " --more--                               Press <w>Escape</w> to skip the basics\n"
            "                                      \n"
            "                                      \n";
            

    result =  "<magenta>"
              "This lower part of the screen is reserved for messages. Everything "

    result  = "<";
    result += colour_to_str(channel_to_colour(MSGCH_TUTORIAL));
    result += ">";
    result += "This lower part of the screen is reserved for messages. Everything "

              "<w>Ctrl-P</w>."
              "</magenta>" EOL;

              "<w>Ctrl-P</w>.";
    result += "</";
    result += colour_to_str(channel_to_colour(MSGCH_TUTORIAL));
    result += ">" EOL;

      if (Options.tut_throw_counter + Options.tut_spell_counter
              >= Options.tut_melee_counter && hint == 0)

      if (hint == 0 && Options.tut_throw_counter + Options.tut_spell_counter
                          >= Options.tut_melee_counter)

// if a character survives until Xp 5, the tutorial is declared finished

// if a character survives until Xp 7, the tutorial is declared finished

                "auto-explore (<w>Ctrl-O</w>). You can even make Crawl "

                "auto-explore (<w>o</w>). You can even make Crawl "

        text += "If you don't want to eat it, consider <w>D</w>issecting "

        text += "If you don't want to eat it, consider <w>c</w>hopping "

        text += ". Whenever you <w>v</w>iew a corpse while in tutorial mode "

        text += ". Whenever you view a corpse while in tutorial mode "

            "early monsters look like <brown>r</brown>, <lightgray>g</lightgray>, "
            "<darkgray>b</darkgray> or <brown>K</brown>. "

            "early monsters look like <brown>r</brown>, <green>l</green>, "
            "<brown>K</brown> or <lightgrey>g</lightgrey>. "

                "bow. If you have a look at your bow with <w>v</w>, you'll "
                "find an explanation of how to do this. First <w>w</w>ield "
                "it, then follow the instructions.";

                "bow. If you have a look at your bow from your <w>i</w>nventory, "
                "you'll find an explanation of how to do this. First "
                "<w>w</w>ield it, then follow the instructions.";

                "If you have a look at your spellbook with <w>v</w>, you'll "
                "find an explanation of how to do this.";

                "If you have a look at your spellbook from your <w>i</w>nventory, "
                "you'll find an explanation of how to do this.";

            "\nAny time you <w>v</w>iew an item, you can read about its "
            "properties and description.";

            "\nAny time you look at an item in your <w>i</w>nventory, you can "
            "read about its properties and description.";

                  "any time by <w>v</w>iewing the item in question.";

                  "any time by having a look in your <w>i</w>nventory at the "
                  "item in question.";

                  "view the weapon's properties with <w>v</w>.";

                  "view the weapon's properties from your <w>i</w>nventory.";

                  "using it to be really effective. <w>v</w> gives more "
                  "information about both missiles and launcher.";

                  "using it to be really effective. Selecting the item in your "
                  "<w>i</w>nventory gives more information about both missiles "
                  "and launcher.";

                  "properties with <w>v</w>.";

                  "properties from your <w>i</w>nventory.";

                  "<w>D</w>issect with a sharp implement. Once hungry you "
                  "can <w>e</w>at the resulting chunks (though they may "

                  "<w>c</w>hop it up with a sharp implement. Once hungry you "
                  "can then <w>e</w>at the resulting chunks (though they may "

                   << " by dissecting them, as well. Note that the gods will not "

                   << " by chopping them, as well. Note that the gods will not "

                  "any time by <w>v</w>iewing the item in question.";

                  "any time by selecting the item in question in your "
                  "<w>i</w>nventory.";

                  "it. You can view it with <w>v</w> although often magic "
                  "is necessary to reveal its true nature.";

                  "it. You can view its properties from your <w>i</w>nventory, "
                  "although often magic is necessary to reveal its true nature.";

                  "<w>E</w>voking it.";

                  "e<w>v</w>oking it. As usually, selecting it from your "
                  "<w>i</w>nventory might give you more information.";

                  "<w>E</w>voking it. For the latter the power depends on "

                  "e<w>v</w>oking it. For the latter the power depends on "

                  "any time by <w>v</w>iewing the item in question.";

                  "any time by selecting the item in question in your "
                  "<w>i</w>nventory.";

          // don't give this information during the first turn

          // monsters standing on stairs
          if (mgrd[ex][ey] != NON_MONSTER)
              return;
              

          text << colourize_glyph(colour, ch) << " ";

          text << colourize_glyph(colour, ch);
          text << " ";

          {

          }

                  "latter, all you need to do is <w>D</w>issect a corpse "

                  "latter, all you need to do is <w>c</w>hop up a corpse "

                  "<w>D</w>issect. One or more chunks will appear that you "

                  "<w>c</w>hop up. One or more chunks will appear that you "

               << " by <w>D</w>issecting it while <w>p</w>raying.";

               << " by <w>c</w>hopping it while <w>p</w>raying.";

                  "<w>t</w>, choose a throwing weapon, e.g. one of your "

                  "<w>f</w>, choose a throwing weapon, e.g. one of your "

    text << "<magenta>"

    text << "<" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";
    text <<

    text << "</magenta>";

    text << "</" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";

    
    result  = "To do this, type <w>t</w> to throw, then <w>";

    result  = "To do this, type <w>f</w> to fire, then <w>";

    ostr << "<magenta>";

    ostr << "<" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";

                            "offer abilities that can be evoked. ";

                            "offer abilities that can be e<w>v</w>oked. ";

                        "<w>t</w>hrown. ";

                        "<w>f</w>ired. ";

                     << " can be thrown without the use of a launcher. ";

                     << " can be <w>f</w>ired without the use of a launcher. ";

                    ostr << "\n\nThis armour offers its wearer protection from "
                            "certain sources. For an overview of your resistances "
                            "(among other things) type <w>%</w>.";

                ostr << "\n\nThis armour offers its wearer protection from "
                        "certain sources. For an overview of your resistances "
                        "(among other things) type <w>%</w>.";

                        "offer abilities that can be evoked. ";

                        "offer abilities that can be e<w>v</w>oked. ";

                ostr << "\nWhen worn, some types of jewellery (such as this one) "
                        "offer abilities that can be evoked. ";

                ostr << "\n\nWhen worn, some types of jewellery (such as this one) "
                        "offer abilities that can be e<w>v</w>oked. ";

            if (!item_ident(item, ISFLAG_KNOW_TYPE))

            if (item.sub_type == BOOK_MANUAL)

                ostr << "It's a book, you can <w>r</w>ead it. ";

                ostr << "A manual can greatly help you in training a skill. "
                        "To use it, <w>r</w>ead it while your experience "
                        "pool (the number in brackets) is full. Note that "
                        "this will drain said pool, so only use this manual "
                        "if you think you need the skill in question.";

            else

            else // it's a spellbook

                if (item.sub_type == BOOK_MANUAL)

                if (you.religion == GOD_TROG)

                    ostr << "A manual can greatly help you in training a skill. "
                            "To use it, <w>r</w>ead it while your experience "
                            "pool (the number in brackets) is full. Note that "
                            "this will drain said pool, so only use this manual "
                            "if you think you need the skill in question.";

                    if (!item_ident(item, ISFLAG_KNOW_TYPE))
                        ostr << "It's a book, you can <w>r</w>ead it.";
                    else
                    {
                        ostr << "A spellbook! You could <w>M</w>emorise some "
                                "spells and then cast them with <w>z</w>.";
                    }
                    ostr << "\nAs a worshipper of "
                         << god_name(GOD_TROG)
                         << ", though, you might instead wish to burn this "
                            "tome of hated magic by using the corresponding "
                            "<w>a</w>bility. "
                            "Note that this only works on books that are "
                            "lying on the floor and not on your current "
                            "square. ";

                else // it's a spellbook

                else if (!item_ident(item, ISFLAG_KNOW_TYPE))

                    if (you.religion == GOD_TROG)

                    ostr << "It's a book, you can <w>r</w>ead it.";
                }
                else if (!you.skills[SK_SPELLCASTING])
                {
                    ostr << "A spellbook! You could <w>M</w>emorise some "
                            "spells and then cast them with <w>z</w>. ";
                    ostr << "\nFor now, however, that will have to wait "
                            "until you've learned the basics of Spellcasting "
                            "by reading lots of scrolls.";
                }
                else // actually can cast spells
                {
                    if (player_can_memorise(item))

                         ostr << "A spellbook! You could <w>M</w>emorise some "
                                 "spells and then cast them with <w>Z</w>. ";
                         ostr << "\nAs a worshipper of "
                              << god_name(GOD_TROG)
                              << ", though, you might instead wish to burn this "
                                 "tome of hated magic by using the corresponding "
                                 "<w>a</w>bility. "
                                 "Note that this only works on books that are "
                                 "lying on the floor and not on your current "
                                 "square. ";

                        ostr << "Such a <lightblue>highlighted spell</lightblue> "
                                "can be <w>M</w>emorised right away. ";

                    else if (!you.skills[SK_SPELLCASTING])

                    else

                         ostr << "A spellbook! You could <w>M</w>emorise some "
                                 "spells and then cast them with <w>Z</w>. ";
                         ostr << "\nFor now, however, that will have to wait "
                                 "until you've learned the basics of Spellcasting "
                                 "by reading lots of scrolls.";

                        ostr << "You cannot memorise any "
                             << (you.spell_no ? "more " : "")
                             << "spells right now. This will change as you "
                                "grow in levels and Spellcasting proficiency. ";

                    else // actually can cast spells
                    {
                         if (player_can_memorise(item))
                         {
                              ostr << "Such a <lightblue>highlighted spell</lightblue> "
                                      "can be <w>M</w>emorised right away. ";
                         }
                         else
                         {
                              ostr << "You cannot memorise any "
                                   << (you.spell_no ? "more " : "")
                                   << "spells right now. This will change as you "
                                      "grow in levels and Spellcasting proficiency. ";
                         }

                         if (you.spell_no)
                         {
                             ostr << "\n\nTo do magic, type <w>Z</w> and "
                                     "choose a spell, e.g. <w>a</w> (check "
                                     "with <w>?</w>). For attack spells "
                                     "you'll ";
                             ostr << tut_target_mode(true);
                         }

                    if (you.spell_no)
                    {
                        ostr << "\n\nTo do magic, type <w>z</w> and choose a "
                                "spell, e.g. <w>a</w> (check with <w>?</w>). "
                                "For attack spells you'll ";
                        ostr << tut_target_mode(true);

            ostr << "Corpses lying on the floor can be <w>D</w>issected "

            ostr << "Corpses lying on the floor can be <w>c</w>hopped up "

            ostr << "Staffs have to be <w>w</w>ielded to be of use. "
                    "There are staves that help spellcasters, and others that "
                    "allow you to harness spells hidden within.";
            if (!item_ident(item, ISFLAG_KNOW_TYPE))

            if (item_is_rod( item ))
            {
                if (!item_ident(item, ISFLAG_KNOW_TYPE))
                {
                    ostr << "\n\nTo find out what this rod might do, you have to "
                            "<w>w</w>ield and e<w>v</w>oke it to see if you can "
                            "use the spells hidden within. ";
                }
                else
                {
                    ostr << "\n\nYou can use this rod's magic by <w>w</w>ielding "
                            "and e<w>v</w>oking it.";
                }
            }
            else

                ostr << "\n\nTo find out what this staff might do, you have to "
                        "wield it, then <w>E</w>voke it to see if anything "
                        "interesting happens. If nothing happens, it's probably "
                        "an ancient staff capable of enhancing certain spell "
                        "schools while suppressing others. ";
                if (you.spell_no)

                ostr << "This staff can enhance your spellcasting of specific "
                        "spell schools. ";
                bool gives_resist = false;
                if (you.spell_no && !item_ident(item, ISFLAG_KNOW_TYPE))

                    ostr << "You can find out which one, by casting spells while "

                    ostr << "You can find out which one by casting spells while "

                else if (gives_resistance(item))
                {
                    ostr << "It also offers its wielder protection from certain "
                            "sources. For an overview of your resistances (among "
                            "other things) type <w>%</w>.";
                    gives_resist = true;
                }
                
                if (!gives_resist && Options.tutorial_type == TUT_BERSERK_CHAR
                                  && you.religion == GOD_TROG)
                {
                    ostr << "\n\nSeeing how "
                         << god_name(GOD_TROG, false)
                         << " frowns upon the use of magic, this staff will be "
                            "of little use to you and you might just as well "
                            "<w>d</w>rop it now.";
                }

            else if (item.sub_type <= STAFF_AIR && gives_resistance(item))
            {
                ostr << "\nThis staff offers its wielder protection from "
                        "certain sources. For an overview of your resistances "
                        "(among other things) type <w>%</w>.";
            }

                    "<w>w</w>ielding and <w>E</w>voking it.";

                    "<w>w</w>ielding and e<w>v</w>oking it.";

    ostr << "</magenta>";

    ostr << "</" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";

    ostr << "\n<magenta>";

    ostr << "\n<" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";

    ostr << "</" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";

    ostr << "\n\n<magenta>";

    ostr << "\n\n<" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";

    ostr << "</" << colour_to_str(channel_to_colour(MSGCH_TUTORIAL)) << ">";

    MONS_GIANT_NEWT, 'l', LIGHTGREEN, "giant newt",

    MONS_GIANT_NEWT, 'l', GREEN, "giant newt",

    MONS_GIANT_LIZARD, 'l', GREEN, "giant lizard",

    MONS_GIANT_LIZARD, 'l', LIGHTGREEN, "giant lizard",

                ? god_colour( static_cast<god_type>(param) )
                : god_message_altar_colour( static_cast<god_type>(param) );

                   ? god_colour( static_cast<god_type>(param) )
                   : god_message_altar_colour( static_cast<god_type>(param) );

                  && item.sub_type <= RING_PROTECTION_FROM_COLD

                     && item.sub_type <= RING_PROTECTION_FROM_COLD

                  && item.sub_type <= RING_TELEPORT_CONTROL
                  || item.sub_type == RING_TELEPORTATION

                     && item.sub_type <= RING_TELEPORT_CONTROL

      case ')':

          const int direction = (key == CONTROL('P')) ? -1 : +1;

          const int direction = (key == CONTROL('P') || key == ')') ? -1 : +1;

	if (revert_colour)

        if (revert_colour)

	    colour_stack.pop_back();

            colour_stack.pop_back();

        mpr("There isn't anything to dissect here.");

        mpr("There isn't anything to butcher here.");

            mprf("Butcher %s? [y/n/q/D]", mitm[o].name(DESC_NOCAP_A).c_str());

            mprf("Butcher %s? [y/n/q/c]", mitm[o].name(DESC_NOCAP_A).c_str());

                if (keyin == 'y' || keyin == 'Y' || keyin == 'd' ||
                    keyin == 'D')

                if (keyin == 'y' || keyin == 'Y' || keyin == 'c' || keyin == 'C')

        mpr("There isn't anything else to dissect here.");

        mpr("There isn't anything else to butcher here.");

A wooden door. To open it, try simply walking into it, or press 'o'.

A wooden door. To open it, try simply walking into it, or press 'O'.

A wooden door. You can close it by standing next to it and pressing 'c'.

A wooden door. You can close it by standing next to it and pressing 'C'.

            "<w>o</w> : auto-explore\n"

            "<w>Ctrl-O</w> : auto-explore\n"

            "<w>v</w> : View item description\n"

            "<w>E</w> : Evoke power of wielded item\n"

            "<w>v</w> : Evoke power of wielded item\n"

            "<w>C</w> : display experience info\n"

            "<w>E</w> : display experience info\n"

            "<w>O</w>   : show dungeon Overview\n",

            "<w>Ctrl-O</w>   : show dungeon Overview\n",

            "<w>D</w> : Dissect a corpse \n"

            "<w>c</w> : chop up a corpse \n"

            "<w>!</w> : shout or command allies\n"

            "<w>t</w> : shout or command allies\n"

            "<w>Ctrl-I</w> : annotate the dungeon level\n"

            "<w>!</w> : annotate the dungeon level\n"

        "<brown>(</brown> : missiles (<w>t</w>hrow or <w>f</w>ire)\n"

        "<brown>(</brown> : missiles (<w>f</w>ire)\n"

        "<brown>%</brown> : food and corpses (<w>e</w>at and <w>D</w>issect)\n"

        "<brown>%</brown> : food and corpses (<w>c</w>hop and <w>e</w>at)\n"

    text << "</brown> : staves, rods (<w>w</w>ield and <w>E</w>voke)\n"

    text << "</brown> : staves, rods (<w>w</w>ield and e<w>v</w>oke)\n"

            "<w>t</w> to throw items by hand (like darts)\n"

            "<w>v</w> : examine object in inventory\n"
            "<w>i</w> : list inventory\n"

            "<w>i</w> : list inventory (select item to view it)\n"

            "\n"

            "and in sight, one of <w>f</w>, <w>p</w>, <w>t</w> fires\n"
            "at it again (without selecting anything).\n",

            "and in sight, one of <w>f</w> or <w>p</w> fires at it\n"
            "again (without selecting anything).\n",

    case 'c': return CMD_CLOSE_DOOR;

    case 'c': return CMD_BUTCHER;

    case 'o': return CMD_OPEN_DOOR;

    case 'o': return CMD_EXPLORE;

    case 'v': return CMD_EXAMINE_OBJECT;

    case 't': return CMD_SHOUT;
    case 'v': return CMD_EVOKE;

    case 'z': return CMD_ZAP_WAND;

    case 'z': return CMD_CAST_SPELL;

    case 'C': return CMD_EXPERIENCE_CHECK;
    case 'D': return CMD_BUTCHER;
    case 'E': return CMD_EVOKE;

    case 'C': return CMD_CLOSE_DOOR;
    case 'E': return CMD_EXPERIENCE_CHECK;

    case 'O': return CMD_DISPLAY_OVERMAP;

    case 'O': return CMD_OPEN_DOOR;

    case 'Z': return CMD_CAST_SPELL;

    case 'Z': return CMD_ZAP_WAND;

    case '!': return CMD_SHOUT;

    case '!': return CMD_ANNOTATE_LEVEL;

    case CONTROL('I'): return CMD_ANNOTATE_LEVEL;

    case CONTROL('O'): return CMD_EXPLORE;

    case CONTROL('O'): return CMD_DISPLAY_OVERMAP;

# lizards
mon_glyph = giant newt : lightgreen
mon_glyph = giant lizard : green

#
# monster                 old colour     new colour
# -------                 ----------     ----------
# lizards
# giant newt              lightgreen     green
# giant lizard            green          lightgreen