Update to serial 220530

diff --git a/src/snowed-in.inf b/src/snowed-in.inf
index af4c4c9936ef671bb9c9a0549f9c55b7da973a55..6c262e23711d6a95b40e8aac984d5425e306ea51 100644 (file)
--- a/src/snowed-in.inf
+++ b/src/snowed-in.inf
@@ -12,10 +12,11 @@
 !
 ! You should have received a copy of the GNU Affero General Public
 ! License along with this file. If not, see https://gnu.org/licenses/
-Global lantern_fuel_left = 10;
+Global lantern_fuel_left = 20;
 Global body_temperature = 20;
 Global cabin_has_electricity = 1;
 Global forest_location = 1;
+Global snowmobile_location = 0;
 Constant NO_SCORE;
 Constant DEATH_MENTION_UNDO;
 Constant Story "Snowed In";
@@ -37,7 +38,7 @@ Constant Headline
 Include "parser";
 Include "verblib";
 Release 1;
-Serial "220529";
+Serial "220530";
 
 Object  mainroom "Main Room"
   with  description 
@@ -253,7 +254,7 @@ Object  lightbulb "light bulb" lightsocket
 Object  office "Office"
   with  description 
             "There seems to have been quite a fight in here. The room 
-            is a wreck. Holes are in the walls and the windows are 
+            is a wreck. Holes are in the walls and the window is 
             broken, letting in the cold air from outside. Chunks of 
             drywall and insulation cover the floor. The desk has a 
             bullet hole through the middle.",
@@ -564,7 +565,8 @@ Object  southofcabin "South Of Cabin"
   with  description [;
             print 
                 "The wind is howling, and there's snow flying 
-                everywhere. ";
+                everywhere. The snow buildup seems to get higher to 
+                the west. ";
             if (snowsuit hasnt worn)
                 print 
                     "It's really cold and you're not dressed for 
@@ -587,7 +589,7 @@ Object  southofcabin "South Of Cabin"
 Object  truckspot "Forest"
   with  description 
             "The blizzard is still going on. You don't think it's 
-            letting up anytime soon. There is a blue and white 
+            letting up any time soon. There is a blue and white 
             pickup truck here. It looks like it got stuck in the snow 
             and is slowly being covered by it. The windows are iced 
             up and you can't see inside.",
@@ -876,15 +878,57 @@ Object  eastofcabin "East Of Cabin"
         ],
         w_to window,
         s_to southofcabin,
+        cant_go 
+            "The snow buildup is is too great to continue in that 
+            direction.",
   has   light;
 
+Object  roof "Roof"
+  with  description [;
+            print 
+                "You're on the roof of the cabin, although it's hard 
+                to tell where the snow buildup ends and the roof 
+                begins. You can make out the trees around the cabin, 
+                but you can't see very far out into the snowfield 
+                beyond them.";
+            if (roof hasnt visited)
+                print 
+                    " You hear a snowmobile approaching in the 
+                    distance. Is it your salvation? The snowmobile 
+                    quickly zooms by in front of the cabin and 
+                    disappears into the forest.";
+            StartDaemon(snowmobile);
+            if (roof has visited)
+                print 
+                    " There seems to be no movement, no sound, no 
+                    sign of anything.";
+            new_line;
+        ],
+        n_to northofcabin,
+        cant_go "Walking off the edge of a roof seems unwise.";
+
+Object  northofcabin "North Of Cabin"
+  with  description 
+            "You're on the north side of the cabin. The wind is 
+            howling and the snow is coming down; falling too fast to 
+            see well. The snow buildup here is so great that it's 
+            almost level with the cabin's roof, which is to the 
+            south.",
+        n_to westofcabin,
+        s_to roof,
+        w_to westofcabin,
+        cant_go "It's too steep to go in that direction safely.";
+
 Object  westofcabin "West Of Cabin"
   with  description 
             "The snow is falling so fast that you can barely see 
             anything. You can't even be sure you're going in the right 
-            direction.",
+            direction. The snow buildup gets taller to the north.",
         s_to southofcabin,
-  has   light;
+        n_to northofcabin,
+        cant_go 
+            "The snow buildup is is too great to continue in that 
+            direction.";
 
 [ Initialise;
     Location = mainroom;
@@ -897,7 +941,7 @@ Object  westofcabin "West Of Cabin"
         snowstorm in more than 40 years. If only you had listened to 
         the news. Well, it's too late for that. The snow has been 
         falling for the past seven hours and shows no signs of 
-        stopping anytime soon. You need to get back to your hotel in 
+        stopping any time soon. You need to get back to your hotel in 
         the town. You finally manage to find an old cabin in the 
         woods and get inside but have no idea where you are. You're 
         not dressed for this weather, and it's getting dark outside.^";
@@ -938,6 +982,22 @@ Object  westofcabin "West Of Cabin"
     return false;
 ];
 
+Object  snowmobile "snowmobile" thedark
+  with  name 'snowmobile',
+        daemon [;
+            snowmobile_location = random(13);
+            if (location == forest && forest_location == snowmobile_location)
+            {
+                deadflag = 2;
+                print_ret 
+                    "You hear a snowmobile approaching in the 
+                    distance. The person says they saw your light and 
+                    came to rescue you.";
+            }
+            return true;
+        ],
+  has   scenery;
+
 Object  grue "grue" thedark
   with  article "the",
         name 'grue' 'monster',