Constant MAX_SCORE = 6;
Include "parser";
Include "verblib";
-Global openedbackpack = 1;
-Global openedtray = 1;
-Global takencd = 1;
Global beeping = 1;
!=========================================================================
! The Game Objects
Object break_room "Break Room"
with description
- "Your standard break room. A fridge, and a long counter
- take up one wall. East is the outside world and west is
- the hallway to the server room.",
+ "This break room is a calm, quiet and peaceful for people
+ to unwind and eat. Well kept and organized, the area is
+ clean and inviting. A large television is mounted to one
+ of the walls, next to a refrigerator. Even though no
+ one's around the smell of a pleasant coffee blend still
+ hangs in the air. A cool-looking counter and white couch
+ take up another wall. The remaining walls have posters of
+ various sports teams of the previous four years. East is
+ the outside world and west is the hallway to the server
+ room.",
w_to hallway,
e_to
"You take one look outside and think better of it. The
you have work to do.",
has light;
+Object tv "television" break_room
+ with description
+ "It looks like a cheap, generic flat screen television
+ with an edge-to-edge matte screen. You see no buttons on
+ it. There should be a remote control somewhere.",
+ name 'tv' 'television' 'telly',
+ 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 "Your standard refrigerator.",
+ with description
+ "This refrigerator makes a statement with a sleek, modern
+ and minimal stainless steel design. Featuring large doors
+ it seems quite an impressive refrigerator that can hold a
+ lot.",
name 'fridge' 'refrigerator',
has container openable scenery;
Object counter "long counter" break_room
with description
- "A long counter. You can't quite determine the color,
- it's somewhere between green and brown. On the counter is
- a microwave.",
+ "It's a beautiful, stylish, and high-quality solid wood
+ counter that runs the length of the wall. You can't quite
+ determine the color of the sleek countertop, it's
+ somewhere between green and brown. The design on the
+ countertop consists of geometric patterns. It seems a
+ sturdy, durable, and solid counter.",
name 'counter',
has static supporter scenery;
like a real workhorse. It's compact, quiet, and works
great.",
name 'microwave' 'micro',
- has container openable scenery;
+ has container openable;
Object table "table" break_room
with description "It's a table. Were you expecting something else?",
has supporter;
Object backpack "backpack" table
- with description "Your backpack.",
+ with description
+ "This backpack looks like a modern art piece that was
+ made using brown and light blue-green watercolors. A black
+ line was traced around to make the stitching lines.
+ Well-worn and quite suitable for travel, it looks like it
+ could carry a lot of belongings.",
name 'pack' 'back' 'bag' 'backpack',
article "your",
before [;
Open:
- if (openedbackpack == 1) {
+ if (backpack hasnt visited) {
score = score + 2;
- openedbackpack = 2;
+ give backpack visited;
}
],
has clothing container openable;
name 'disk' 'disc' 'Trisquel' 'cd',
after [;
Take:
- if (takencd == 1) {
+ if (disc hasnt visited) {
score = score + 2;
- takencd = 2;
- print_ret "You pick up the Trisquel CD.^";
+ give disc visited;
}
],
has ;
back to the break room, north to the server room, or
west to the restrooms.",
e_to break_room,
- n_to server_room,
- w_to
- "When nature calls, you'll know about it, but right now,
- it isn't calling.",
- before [;
- Go:
- if (noun == n_obj) {
- print
- "^^You use your key card to open the server room
- door and step into your world.^";
- }
- ],
+ n_to
+ "You use your key card to open the server room door but
+ instead of a beep of approval and an unlocked door you
+ get a buzz of denial and the door remains locked. Plus:
+ Through the window in the door you can see someone moving
+ around inside but there shouldn't be anyone else here
+ today.",
+ w_to restroom,
+ has light;
+
+Object restroom "Restroom"
+ with description
+ "This average-sized, square restroom has a sink set into a
+ resin counter. The floor is tiled, the ceiling has
+ removable tiles, and the walls are painted with a
+ wallpapered dado. Light is provided by ceiling lights. The
+ room is done in colors that remind you of the sky and
+ overall looks very eclectic.",
+ e_to hallway,
has light;
Object server_room "Server Room"
if (noun ~= disc)
print_ret (The) noun, " is too big to fit.";
Open:
- if (openedtray == 1) {
+ if (tray hasnt visited) {
score = score + 2;
- openedtray = 2;
+ give tray visited;
}
],
after [;
!=========================================================================
! Standard and Extended Grammar
Include "grammar";
-!=========================================================================
\ No newline at end of file
+!=========================================================================