From: Jason Self Date: Fri, 22 Mar 2019 15:38:59 +0000 (-0700) Subject: Implement more of the mall. X-Git-Url: https://jxself.org/git/?a=commitdiff_plain;h=4a802fa0aeeec1fcd2fa024530a5319c754f4a8b;p=the-mall.git Implement more of the mall. --- diff --git a/the-mall.inf b/the-mall.inf index 7f620a0..8c29072 100644 --- a/the-mall.inf +++ b/the-mall.inf @@ -25,19 +25,81 @@ IFID 1AB626D5-E03F-4F03-836C-50F65B643B9B^"; Include "parser"; Include "verblib"; Release 0; -Serial "190321"; +Serial "190322"; + +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.", +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.", +e_to workshop, +has light; + +Object cookhouse "Cookhouse" +with description "This is a restaurant called The Cookhouse, + although since the mall closed all of the patrons have left.", +n_to mall, +has light; + +Object securityoffice "Security Office" +with description "A small office belonging to the bank's security + officer. You scan the room, seeing a table.", +n_to bank, +has light; + +Object table "table" securityoffice +with name 'table', + description "Made from metal, it looks to be a solid and + hefty table.", +has scenery supporter; + +Object coppercoin "copper coin" table +with name 'copper' 'coin' 'zorkmid', + description "The coin seems to be very old, in very poor + condition, and somewhat irregular in shape. The only things + clearly visible are what appears to be a name on one side: + Belwit The Flat and a date on the other: 699 GUE."; + +Object keycard "keycard" table +with name 'keycard' 'key' 'card', + 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.", + of place, with stores all around. The mall's exit is to the + southwest.", +n_to workshop, +s_to cookhouse, +sw_to mallexit, +e_to bank, w_to salon, has light; -Object workshop "Bear Workshop" -with description "A workshop for making stuffed bears although by - now everything is put away. The workshop retains a pleasant - atmosphere.", -has light; +Object mallexit "door" mall +with name 'door' 'exit', + description "A large doorway to the outside world, with the + word ~Exit~ written above.", +with_key keycard, +before [; unlock: deadflag = 2; return true; + ], +has scenery door openable locked; + +Object portrait "portrait" bank +with name 'portrait' 'picture' 'photo', + description "It's a portrait of J. Pierpont Flathead. His + portrait adorns every branch of the Bank of Zork.", +before [; Take,Pull,Push,PushDir: + print_ret (The) self, " is firmly attached to the wall."; ], +has scenery; Object salon "Salon" with description [; print "You've just sauntered into a salon."; @@ -50,6 +112,21 @@ with description [; print "You've just sauntered into a salon."; e_to mall, has light; +Object vaultdoor "vault door" bank + with name 'vault' 'safe', + description "A large, circular, and hefty door. The words + ~Manufactured By The Frobozz Magic Vault Company~ are engraved + around the edge.", + has scenery door openable locked; + +Object workshop "Bear Workshop" +with description "A workshop for making stuffed bears although by + now everything is put away. The workshop retains a pleasant + atmosphere. You should try going west.", +w_to closet, +s_to mall, +has light; + [ Initialise; Location = mall;