From: Jason Self <j@jxself.org>
Date: Sun, 12 Jun 2022 16:11:38 +0000 (-0700)
Subject: Update to serial 220612
X-Git-Tag: r4~2
X-Git-Url: https://jxself.org/git/?a=commitdiff_plain;h=24c5c11174e1c9bf358ca29dc54cb07f22f50d60;p=snowed-in.git

Update to serial 220612
---

diff --git a/src/snowed-in.inf b/src/snowed-in.inf
index f793f29..012f30f 100644
--- a/src/snowed-in.inf
+++ b/src/snowed-in.inf
@@ -43,7 +43,7 @@ Constant Headline
 Include "parser";
 Include "verblib";
 Release 3;
-Serial "220611";
+Serial "220612";
 
 Object  mainroom "Main Room"
   with  description 
@@ -473,9 +473,8 @@ Object  bedroom "Bedroom"
   with  description 
             "This bedroom is small and cramped, and looks like a 
             major fight happened as the exterior wall has bullet 
-            holes. The bed is lying on the floor, torn to shreds. It 
-            has no sheets, just a bare mattress. The main room is to 
-            the south.",
+            holes. There's a bare mattress, torn to shreds. The main 
+            room is to the south.",
         s_to mainroom,
   has   light;
 
@@ -1076,6 +1075,18 @@ Object  westofcabin "West Of Cabin"
     return false;
 ];
 
+Object  cabin "cabin" mainroom
+  with  name 'cabin',
+        found_in mainroom bedroom office kitchenette southofcabin eastofcabin
+        northofcabin westofcabin,
+        before [;
+          Enter, Exit:
+            print_ret 
+                "You'll have to say which compass direction to go 
+                in.";
+        ],
+  has   scenery;
+
 Object  snowmobile "snowmobile" thedark
   with  name 'snowmobile',
         daemon [;
@@ -1262,4 +1273,22 @@ Extend 'climb'
     * 'through' / 'out' / 'via' noun -> Climb;
 
 Extend 'go'
-    * 'through' / 'out' / 'via' noun -> Enter;
\ No newline at end of file
+    * 'through' / 'out' / 'via' noun -> Enter;
+
+Extend 'go' first
+    * 'out' / 'outside' -> VagueGo;
+
+Extend 'go' first
+    * 'out' / 'outside' / 'outside' 'of' noun -> VagueGo;
+
+Extend 'go' first
+    * 'in' / 'into' / 'inside' -> VagueGo;
+
+Extend 'go' first
+    * 'in' / 'into' / 'inside' / 'inside' 'of' noun -> VagueGo;
+
+Extend 'exit' first
+    * noun -> VagueGo;
+
+Extend 'leave' first
+    * noun -> VagueGo;
\ No newline at end of file