2 !=========================================================================
3 ! Copyright (C) 2008 Daniel Bartholomew
5 ! This program is free software: you can redistribute it and/or modify
6 ! it under the terms of the GNU General Public License as published by
7 ! the Free Software Foundation, either version 3 of the License, or
8 ! (at your option) any later version.
10 ! This program is distributed in the hope that it will be useful,
11 ! but WITHOUT ANY WARRANTY; without even the implied warranty of
12 ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 ! GNU General Public License for more details.
15 ! You should have received a copy of the GNU General Public License
16 ! along with this program. If not, see
17 ! <https://www.gnu.org/licenses/>.
18 !=========================================================================
19 Constant Story "The Server Room";
21 "^An Interactive Fiction by Daniel Bartholomew.^";
22 Release 1; Serial "080625"; !for keeping track of public releases
24 Constant MAX_SCORE = 6;
29 global openedbackpack = 1;
30 global openedtray = 1;
34 !=========================================================================
37 Object break_room "Break Room"
39 description "Your standard break room. A fridge, and a long
40 counter take up one wall. East is the outside world and west
41 is the hallway to the server room.",
43 e_to "You take one look outside and think better of it. The
44 daystar is too bright and terrible to face today. Besides, you
48 Object fridge "refrigerator" break_room
50 description "Your standard refrigerator.",
51 name 'fridge' 'refrigerator',
52 has container openable scenery;
54 Object counter "long counter" break_room
56 description "A long counter. You can't quite determine the color,
57 it's somewhere between green and brown. On the counter is a
60 has static supporter scenery;
62 Object microwave "microwave" counter
64 description "Your standard microwave.",
65 name 'microwave' 'micro',
66 has container openable scenery;
68 Object table "Table" break_room
70 description "It's a table. Were you expecting something else?",
73 Take: "Let me spell it out for you: it is a T A B L E and you are
78 Object backpack "backpack" table
80 description "Your backpack.",
81 name 'pack' 'back' 'bag' 'backpack', article "your",
84 if (openedbackpack == 1) {
89 has clothing container openable;
91 Object disc "Ubuntu CD" backpack
93 description "An automatic recovery CD, guaranteed to fix almost
94 any server.^^Ok, it's just an install CD that auto-installs
95 Ubuntu, but hey, if it works, it works.",
96 name 'disk' 'disc' 'Ubuntu' 'cd',
102 print_ret "You pick up the Ubuntu CD.^";
107 Object hallway "Hallway"
109 description "Bereft of features, adornment or even adequate
110 lighting, this hallway is as plain as they come. Doors lead
111 east back to the break room, north to the server room, or west
115 w_to "When nature calls, you'll know about it, but right now, it
120 StartDaemon(server_room);
121 print "^^You use your key card to open the server room
122 door and step into your world.^";
127 Object server_room "Server Room"
129 description "The fans, the lights, the chill . . . yep, it's a
130 server room. Full of servers from a dozen different
131 manufacturers, each with their own quirks.^^Your attention is
132 immediately drawn to a server 2/3 of the way up rack 7. The
133 little indicator light is blinking red, and it is beeping.",
136 if (location ~= server_room) return;
139 1: "^The beeping is driving you crazy.";
140 2: "^It's hard to think, with all of the beeping.";
141 3: "^The monotony of the beeping is maddening.";
142 4: "^You can't stand the beeping.";
143 5: "^The beeping reminds you of your alarm clock.";
144 6: "^beep . . . beep . . . beep . . . beep . . . beep
146 7: "^If you don't stop the beeping soon, you'll loose what
147 little hair you have left.";
152 Object server "server" server_room
154 description "The indicator light on this ancient server is
155 blinking orange. The rest the front is featureless except for
156 the CD tray. The beeping seems to emanate from somewhere
158 name 'server' 'machine' 'computer' 'ancient' 'old',
161 Object tray "tray" server_room
163 description "It's a CD tray. Just like every other CD tray.",
167 if (openedtray == 1) {
174 print_ret "You press the button and the CD tray pops out.";
178 print_ret "^With the CD in the tray, you quickly reboot
179 the server.^^After the bios posts, your disc starts
180 doing its thing and before you know it the server is
181 happily running Ubuntu, and even more than that, the
182 beeping has stopped. Yay!";
185 has container openable scenery;
187 !=========================================================================
188 ! Entry point routines
191 location = break_room;
192 "^^^^It's Saturday, a nice one at that, and you've been called in to
193 fix a server that's on the blink. Again.^^You've had it. This
194 server is going to run Linux from this day forward! The process
195 will be easy - just put the disc into the server and away we go.
196 Now where is that Ubuntu CD?^";
200 if (deadflag == 5) print "You have won";
203 !=========================================================================
204 ! Standard and Extended Grammar
208 !=========================================================================