38 lines
No EOL
848 B
INI
38 lines
No EOL
848 B
INI
Constant Story "The Siege of Remontel";
|
|
Constant Headline "^A Star Trek fan production^";
|
|
|
|
Release 1;
|
|
|
|
Include "Parser";
|
|
|
|
Replace PlayerTo;
|
|
Include "VerbLib";
|
|
[ PlayerTo newplace flag;
|
|
NoteDeparture();
|
|
move player to newplace;
|
|
move computer to newplace;
|
|
while (parent(newplace)) newplace = parent(newplace);
|
|
location = real_location = newplace;
|
|
MoveFloatingObjects(); AdjustLight(1);
|
|
switch (flag) {
|
|
0: <Look>;
|
|
1: NoteArrival(); ScoreArrival();
|
|
2: LookSub(1);
|
|
}
|
|
];
|
|
|
|
Include "Globals.inf";
|
|
Include "Classes.inf";
|
|
Include "Rooms.inf";
|
|
Include "Characters.inf";
|
|
Include "Items.inf";
|
|
|
|
[ Initialise ;
|
|
location = bunk;
|
|
player.description = "You are wearing an operations uniform,
|
|
with a single pip.";
|
|
move computer to bunk;
|
|
];
|
|
|
|
Include "Grammar";
|
|
Include "MoreVerbs.inf"; |