Implement the white couch
[the-server-room.git] / the-server-room.inf
index a93486ff401edf47f6a224838861018d70e7093b..50a41fb47249de44a1506068740633399d443133 100644 (file)
@@ -71,7 +71,25 @@ Object  tv "television" break_room
             with an edge-to-edge matte screen. You see no buttons on
             it. There should be a remote control somewhere.",
         name 'tv' 'television' 'telly',
-  has   container openable scenery;
+        before [;
+          SwitchOn:
+            print_ret
+                "The television can only be turned on using the
+                remote.";
+        ],
+  has   container openable scenery switchable;
+
+Object  whitecouch "white couch" break_room
+  with  description
+            "With a smooth and modern design, this looks to be a luxurious couch.
+            It is extremely durable and easy to clean and maintain. Offering
+            enough room to sit or lay, it looks very soft and comfortable.",
+        name 'white' 'couch' 'sofa',
+        before [;
+          Take, Pull, Push, PushDir:
+            print_ret (The) self, " is too heavy for that.";
+        ],
+  has   static supporter enterable;
 
 Object  fridge "refrigerator" break_room
   with  description
@@ -262,4 +280,4 @@ Object  tray "tray" server_room
 !=========================================================================
 ! Standard and Extended Grammar
 Include "grammar";
-!=========================================================================
\ No newline at end of file
+!=========================================================================