Include "parser";
Include "verblib";
Release 0;
-Serial "190322";
+Serial "190323";
Object bank "Bank of Zork"
with description "The local branch of the Bank of Zork, the
largest banking institution of the Great Underground Empire.
- The bank vault is to the north, and a small office is to the
- south. As with all branches of the Bank of Zork, a portrait
- of J. Pierpont Flathead hangs on the wall.",
+ The walls are redpainted and there is a distinct wash of pine
+ and sandalwood that hovers in the air. Beyond the lobby of the
+ bank, to the north, lies the vault. The air there is dark--
+ almost heavy-- and thick with the scents of fresh paper and
+ silver and copper. A darkened office sits to the south. As
+ with all branches of the Bank of Zork, a portrait of J.
+ Pierpont Flathead hangs on the wall.",
n_to vaultdoor,
s_to securityoffice,
w_to mall,
has light;
Object closet "Closet"
-with description "You've seen better closets, but at least this
- one seems pretty standard.",
+with description "In the closet of the workshop, it is mostly
+ dark. Here lie the new supplies waiting to be taken out to
+ customers to make new teddy bears. Their beady eyes glisten as
+ they reflect the light from the workshop, their bodies
+ deflated in some places, bulging unnaturally in others.",
e_to workshop,
has light;
+object bears "teddy bears" closet
+with name 'bear' 'bears' 'teddy' 'teddies' 'ted',
+before [; Take,Pull,Push,PushDir:
+ print_ret "Shoplifting isn't the answer."; ],
+has scenery;
+
Object cookhouse "Cookhouse"
-with description "This is a restaurant called The Cookhouse,
- although since the mall closed all of the patrons have left.",
+with description "The glowing letters atop indicate that this
+ restaurant is called ~The Cookhouse.~ There's a light
+ smokiness in the air, and the tables are covered in
+ soft-looking linen tablecloths. Although, since the mall
+ closed, all of the patrons have left.",
n_to mall,
has light;
+Object table2 "table" cookhouse
+with name 'table',
+has scenery supporter;
+
+Object tablecloth "tablecloth" table2
+with name 'tablecloth' 'linen' 'cloth',
+ description "It's made of soft-looking linen.",
+before [; Take,Pull,Push,PushDir:
+ print_ret "Shoplifting isn't the answer."; ],
+has scenery;
+
Object securityoffice "Security Office"
with description "A small office belonging to the bank's security
- officer. You scan the room, seeing a table.",
+ officer. You scan the room, seeing a table and a large bulky
+ television.",
n_to bank,
has light;
+Object television "television" securityoffice
+with name 'television' 'tv' 'screen' 'monitor',
+ description "It's big, gray, and one of those old-fashioned
+ CRT models.",
+watch_count 0,
+before [; Listen,Examine:
+ if (television has on) {
+ self.watch_count = self.watch_count + 1;
+ switch (self.watch_count) {
+ default: print "It's big, gray, and one of those old-fashioned
+ CRT models. It looks very heavy.^The TV is currently switched
+ on. It's showing grainy footage at odd angles from the vault's
+ security cameras.^"; return true;
+ }
+ };
+ Take,Pull,Push,PushDir:
+ print_ret "The television is firmly attached to the wall.";
+ ],
+ after [; SwitchOn:
+ print "The television comes to life, showing grainy
+ footage at odd angles from the vault's security
+ cameras.^"; return true;
+ ],
+has scenery switchable;
+
Object table "table" securityoffice
-with name 'table',
+with name 'table',
description "Made from metal, it looks to be a solid and
hefty table.",
has scenery supporter;
description "The keycard is used to open things.";
Object mall "Mall"
-with description "You're in the main walkway. An ordinary kind
- of place, with stores all around. The mall's exit is to the
+with description "You're in the main walkway. It's bright and clean
+ with stores all around. Pale light glimmers off the polished
+ tile like sunlight on water. The quietness of the closed mall
+ floats by as if on the wind. The mall's exit is to the
southwest.",
n_to workshop,
s_to cookhouse,
Object mallexit "door" mall
with name 'door' 'exit',
- description "A large doorway to the outside world, with the
- word ~Exit~ written above.",
+ description "A revolving door to the outside world, with the
+ word ~Exit~ written above. Sunlight streams crisply in
+ through the glass.",
with_key keycard,
before [; unlock: deadflag = 2; return true;
],
with description [; print "You've just sauntered into a salon.";
if (salon hasnt visited) print " Suddenly you bump your head
on the ceiling, but it's not such a bad bump that it's going
- to prevent you from looking at objects and even things.";
+ to prevent you from looking at things.";
if (salon has visited) print " Remembering the low ceiling,
- you take care not to bump your head.";
+ you take care not to bump your head."; print " Behind the
+ reception desk is a small display made up of backlit shampoos
+ and conditioners in various shades of translucent blue.
+ Continuing to the west is another room.";
new_line; ],
e_to mall,
+w_to salon2,
+has light;
+
+object desk "reception desk" salon
+with name 'desk' 'reception',
+has scenery;
+
+object shampoo "shampoos" salon
+with name 'shampoo' 'shampoos' 'display',
+before [; Take,Pull,Push,PushDir:
+ print_ret "Shoplifting isn't the answer."; ],
+has scenery;
+
+object conditioner "conditioners" salon
+with name 'conditioner' 'conditioners',
+before [; Take,Pull,Push,PushDir:
+ print_ret "Shoplifting isn't the answer."; ],
+has scenery;
+
+Object salon2 "Salon"
+with description "This is a tranquil glasslit room where the
+ stylists would work on peoples' hair. You can imagine the
+ sounds of clipping shears and buzzing razors resounding
+ through the air with the clarity of a ringing bell when this
+ place is open.",
+e_to salon,
has light;
Object vaultdoor "vault door" bank