Newsgroups: rec.arts.int-fiction
Path: gmd.de!xlink.net!howland.reston.ans.net!news.moneng.mei.com!uwm.edu!caen!batcomputer!munnari.oz.au!bruce.cs.monash.edu.au!monu6!benziesp
From: benziesp@ponderosa (Ms. Pauline Benzies)
Subject: darkness.t, look.t, travel.t
Message-ID: <1993Oct25.022510.24783@monu6.cc.monash.edu.au>
Summary: TADS Example code
Keywords: TADS, examples
Sender: news@monu6.cc.monash.edu.au (Usenet system)
Organization: Dept. of Information Systems, Monash University
Date: Mon, 25 Oct 1993 02:25:10 GMT
Lines: 44

[Pauline is posting this for me.  Love ya!]

I have been working for quite some time on a long-winded TADS project (which
will probably take another 3-6 months) which has required me to stuff about
with a lot of the low-level TADS structures.  Now that TADS 2.1 allows
overloading of the built-in classes, I have knocked the useful bits into
presentable shape and have decided to share them with the world

look.t:	this is my enhanced set of routines for 'looking' at things. Rather
than ...

	You are in a really weird room.
	There is a dinosaur, a treadmill and a pound of butter here.

you can get ...

	You are in a really weird room.
	There appears to be a live dinosaur in the room with you. Over to one
side is a treadmill.  Slowly melting on the ground is a pound of butter.

whilst allowing the objects being described to be fully functional - i.e.
not just fixedItems or decorations

travel.t:	there have been requests recently for a way to determine the
exits from a room.   These classes/methods provide this facility.  Thus, I
have in my game

	Your sword is glowing slightly.

whenever a villian is in a nearby room.

darkness.t:	I hate the fact that you can't turn your lamp on in the dark.
So I changed the infrastructure to allow the 'verb' to determine whether it
can work in the dark rather than the 'room'

All modules are Copyright (c) 1993 Jeff Laing.  Permission to use any or all
of this code in other TADS games is granted provided credit is given in
your "CREDITS" command for this code and that you leave this copyright
message in the source whenever distributed.  Please make all changes in
a backward compatible manner (where possible) and make them available for free
(like I did ;-)

Jeff Laing.
jeffl@melb.arc.cpr.itg.telecom.com.au
