From 7bf02ade48b3c5489e8306c1e1db7fe8cd0e1225 Mon Sep 17 00:00:00 2001
From: Pasi Kallinen <paxed@alt.org>
Date: Mon, 18 Jul 2022 17:58:25 +0300
Subject: [PATCH] Bigroom 2 can have ice floor in unlit areas

---
 dat/bigrm-2.lua    | 24 +++++++++++++++++-------
 doc/fixes3-7-0.txt |  1 +
 2 files changed, 18 insertions(+), 7 deletions(-)

diff --git a/dat/bigrm-2.lua b/dat/bigrm-2.lua
index 626a34d01..53c3e100a 100644
--- a/dat/bigrm-2.lua
+++ b/dat/bigrm-2.lua
@@ -29,17 +29,27 @@ des.map([[
 -- Dungeon Description
 des.region(selection.area(01,01,73,16),"lit");
 
+local darkness;
+
 local choice = math.random(0, 3)
 if choice == 0 then
-  des.region(selection.area(01,07,22,09),"unlit");
-  des.region(selection.area(24,01,50,05),"unlit");
-  des.region(selection.area(24,11,50,16),"unlit");
-  des.region(selection.area(52,07,73,09),"unlit");
+   darkness = selection.area(01,07,22,09)
+      | selection.area(24,01,50,05)
+      | selection.area(24,11,50,16)
+      | selection.area(52,07,73,09);
 elseif choice == 1 then
-  des.region(selection.area(24,01,50,16),"unlit");
+   darkness = selection.area(24,01,50,16);
 elseif choice == 2 then
-  des.region(selection.area(01,01,22,16),"unlit");
-  des.region(selection.area(52,01,73,16),"unlit");
+   darkness = selection.area(01,01,22,16)
+      | selection.area(52,01,73,16);
+end
+
+if darkness ~= nil then
+   des.region(darkness,"unlit");
+   if percent(25) then
+      des.replace_terrain({ selection = darkness:grow(),
+                            fromterrain = ".", toterrain = "I" });
+   end
 end
 
 -- Stairs
diff --git a/doc/fixes3-7-0.txt b/doc/fixes3-7-0.txt
index c61c471a2..129b4d942 100644
--- a/doc/fixes3-7-0.txt
+++ b/doc/fixes3-7-0.txt
@@ -970,6 +970,7 @@ make taming via magic harp be consistent with scroll of taming and charm
 wielding a bec de corbin makes ravens generate peaceful
 moving with 'm' prefix allows hero to enter a known pit carefully
 rangers always succeed in disarming bear traps, unless impaired
+bigroom variant 2 may have ice floor in unlit areas
 
 
 Fixes to 3.7.0-x Problems that Were Exposed Via git Repository