! Through the Looking-Glass
! An Inform tutorial by Gareth Rees
! All rights given away
! Version 1
Switches v5;
Constant DEBUG;
Constant Story "THROUGH THE LOOKING GLASS";
Constant Headline "^An Interactive Tutorial^by Gareth Rees^";
Include "Parser";
Include "VerbLib";
Include "Grammar";
Object Drawing_Room "Drawing room"
has light
with name "snow",
description "The gentle sound of snow against the window pane \
suggests that it's cold outside, and you're glad to be here \
in the warmth. The drawing-room is reflected in the large \
looking-glass on the wall above the mantelpiece, and a very \
comfortable room it is too, with a warm hearth, a soft rug \
and an arm-chair that you can curl up and sleep in.";
[ Initialise;
location = Drawing_Room;
print "^^^^^It's a cold winter day outside, but in the looking-glass \
house it's summer. All you need to do is pretend there's a way of \
getting through into it somehow...^^";
];
End;
-- Urban Nilsson d7urban@dtek.chalmers.se, URL: http://www.dtek.chalmers.se/~d7urban/ un@cd.chalmers.se, URL: http://www.cd.chalmers.se/~un [Amor gignit amorem]