From 5a7068a2e6a595ebfe66e3ae6dc67f06fef3208b Mon Sep 17 00:00:00 2001
From: Hourier <grapefox.whitelucifer.0408@gmail.com>
Date: Sat, 24 Apr 2021 00:58:27 +0900
Subject: [PATCH] =?utf8?q?[Implement]=20#886=20=E3=80=8E=E3=83=86=E3=82=A3?=
 =?utf8?q?=E3=82=A2=E3=83=9E=E3=83=83=E3=83=88=E3=80=8F=E3=81=AB=E4=B8=8A?=
 =?utf8?q?=E7=B4=9A=E3=83=AF=E3=82=A4=E3=82=A2=E3=83=BC=E3=83=A0=E5=8F=AC?=
 =?utf8?q?=E5=96=9A=E3=82=92=E8=BF=BD=E5=8A=A0=E3=81=97=E3=81=9F=20/=20Add?=
 =?utf8?q?ed=20the=20summon=20of=20Greater=20wyrms=20for=20Tiamat?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 lib/edit/r_info.txt                  | 2 +-
 src/monster-race/race-indice-types.h | 1 +
 src/mspell/mspell-summon.cpp         | 3 +++
 3 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/lib/edit/r_info.txt b/lib/edit/r_info.txt
index b981cfa2a..f14b58174 100644
--- a/lib/edit/r_info.txt
+++ b/lib/edit/r_info.txt
@@ -15593,7 +15593,7 @@ F:EVIL | DRAGON | SELF_LITE_2
 F:IM_ACID | IM_FIRE | IM_COLD | IM_ELEC | IM_POIS | NO_CONF | NO_SLEEP
 S:1_IN_2 | BLIND | CONF | SCARE
 S:BR_ACID | BR_FIRE | BR_COLD | BR_ELEC | BR_POIS
-S:S_HI_DRAGON
+S:S_DRAGON | S_HI_DRAGON | S_KIN
 D:$Usually found guarding the first plane of Hell, Tiamat is a formidable 
 D:$opponent, her five heads breathing death to all who stand against her.
 D:おもに地獄界の第一階層を防衛しているティアマットは手に負えない強敵であり、
diff --git a/src/monster-race/race-indice-types.h b/src/monster-race/race-indice-types.h
index eb8ee8cbf..26d2d7db7 100644
--- a/src/monster-race/race-indice-types.h
+++ b/src/monster-race/race-indice-types.h
@@ -75,6 +75,7 @@ enum monster_race_type {
     MON_SHADOWLORD = 774,
     MON_JABBERWOCK = 778,
     MON_SHAMBLER = 786,
+    MON_TIAMAT = 795,
     MON_BLACK_REAVER = 798,
     MON_NULL = 803,
     MON_UNMAKER = 815,
diff --git a/src/mspell/mspell-summon.cpp b/src/mspell/mspell-summon.cpp
index 8ed4eee7f..c164670a3 100644
--- a/src/mspell/mspell-summon.cpp
+++ b/src/mspell/mspell-summon.cpp
@@ -134,6 +134,9 @@ MonsterSpellResult spell_RF6_S_KIN(player_type *target_ptr, POSITION y, POSITION
     case MON_ZOMBI_SERPENT:
         count += summon_guardian(target_ptr, y, x, rlev, m_idx, t_idx, target_type);
         break;
+    case MON_TIAMAT:
+        count += summon_HIGHEST_DRAGON(target_ptr, y, x, m_idx);
+        break;
     case MON_CALDARM:
         count += summon_LOCKE_CLONE(target_ptr, y, x, m_idx);
         break;
-- 
2.11.0