From c500c6b3582877a10bd362722bde81eb9b94b917 Mon Sep 17 00:00:00 2001
From: haranp <haranp@c06c8d41-db1a-0410-9941-cceddc491573>
Date: Sun, 25 Mar 2007 09:46:42 +0000
Subject: Added Tiamat, a unique colourshifting draconian with a large escort.
 Yes, I know she's a dragon in the source mythos.

git-svn-id: https://crawl-ref.svn.sourceforge.net/svnroot/crawl-ref/trunk@1094 c06c8d41-db1a-0410-9941-cceddc491573
---
 crawl-ref/source/mon-util.cc | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

(limited to 'crawl-ref/source/mon-util.cc')

diff --git a/crawl-ref/source/mon-util.cc b/crawl-ref/source/mon-util.cc
index 0ef81ef438..d7a3e922b0 100644
--- a/crawl-ref/source/mon-util.cc
+++ b/crawl-ref/source/mon-util.cc
@@ -476,6 +476,25 @@ monster_type draco_subspecies( const monsters *mon )
 {
     ASSERT( mons_genus( mon->type ) == MONS_DRACONIAN );
 
+    if ( mon->type == MONS_TIAMAT )
+    {
+        switch ( mon->colour )
+        {
+        case RED:
+            return MONS_RED_DRACONIAN;
+        case WHITE:
+            return MONS_WHITE_DRACONIAN;
+        case DARKGREY:          // black
+            return MONS_BLACK_DRACONIAN;
+        case GREEN:
+            return MONS_GREEN_DRACONIAN;
+        case MAGENTA:
+            return MONS_PURPLE_DRACONIAN;
+        default:
+            break;
+        }
+    }
+
     monster_type ret = mons_species( mon->type );
 
     if (ret == MONS_DRACONIAN && mon->type != MONS_DRACONIAN)
@@ -2250,6 +2269,7 @@ const char *mons_pronoun(int mon_type, int variant)
             case MONS_MARGERY:
             case MONS_EROLCHA:
             case MONS_ERICA:
+            case MONS_TIAMAT:
                 gender = GENDER_FEMALE;
                 break;
             default:
-- 
cgit v1.2.3-54-g00ecf