home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Special: Spiele Hits
/
Hits-CD.iso
/
aminet
/
spiele
/
ammud1_1.lha
/
AmigaMUD
/
Src
/
Extras
/
buildtest.so
< prev
next >
Wrap
Text File
|
1995-10-29
|
4KB
|
171 lines
look around
@table private newTable
@use newTable
@showtable newTable
@describe private newTable
@room new north indoors in the entrance room
@room adddesc
A plain wooden door leads north into the building.
.
@room scenery "door;plain,wooden,wood" building
look around
Examine the plain wood door.
north
@room newdesc
This is the entry foyer to a small office. There are a few
comfortable looking chairs for waiting in, and a magazine
rack full of magazines. Interior doors lead further north,
northeast and east, while the door out is to the south.
.
look around
@room scenery entry foyer "office;small"
@room same south out
@object new newTable chairs "chair;few,comfortable,looking"
@object gettable chairs no
@object invisible chairs yes
@object siton chairs 3
@object newdesc chairs
The chairs are large, and well padded. They are uphostered
in drab looking tan material.
.
drop chairs
look chairs
@object new newTable rack "rack;magazine"
@object gettable rack no
@object invisible rack yes
@object newdesc rack
The magazine rack is just a U-shaped wooden bin full of
magazines.
.
drop rack
@object new newTable magazines magazine
@object invisible magazines yes
@object gettable magazines no
@object getstring magazines
Please leave the magazines here for others to read.
.
@object readstring magazines
The magazines are mostly about etiquette. They talk
about such things as properly using your knife
and fork.
.
@object newdesc magazines
The magazines are well-thumbed, but still quite readable.
.
drop magazines
get magazine
look magazine
read magazine
@room new north indoors "in the north office"
north
@room newdesc
This appears to be the office of someone in middle
management. There is a computer on the desk, but it looks
to be a power-user status symbol more than anything else.
.
@room scenery computer desk chair door
@room scenery "symbol;power-user,power,user,status"
look at the power-user status symbol
l power user symbol
@room same south out
@object new newTable knife "knife;simple,table"
drop knife
@symbolhere newTable r_north
south
@room new east indoors "in the east office"
east
@room newdesc
This office looks quite practical. It must be used by a
secretary or some other useful person.
.
@object new newTable plants "plant.plant-pot.pot;plant"
@object gettable plants no
@object getstring plants
Please leave the plants here - the owner of this office will
probably take better care of them than you would.
.
@object smellstring plants
The plants smell slightly minty.
.
@object touchstring plants
The plants feel like plants.
.
@object newdesc plants
The plants are pretty plain-looking. They don't seem to
have any flowers at the moment (if they ever do!).
.
drop plants
@object new newTable fork "fork;simple,table"
drop fork
@symbolhere newTable r_east
@room same west out
west
@room new northeast indoors "in the boss's office"
northeast
@room newdesc
You can tell this is the boss's office by the size of the
desk and chair, and by the fact that it doesn't look like
any work goes on here.
.
@room same southwest out
@object new newTable desk "desk;large,massive,big,redish,red,wood"
@object newdesc desk
The desk is quite massive. It is made from some kind of
very pretty redish wood. There don't seem to be any
scratches on the highly-polished top, but there are some
ugly coffee-cup rings there.
.
@room scenery "stain,ring;ugly,coffee-cup,coffee,cup"
@object gettable desk no
@object invisible desk yes
drop desk
@object new newTable chair "chair;large,big,black,leather"
@object newdesc chair
The chair looks extremely comfortable. It is on casters,
pivots, and rocks back and forth. It is finished in what
looks like very fine black leather.
.
@object gettable chair no
@object invisible chair yes
drop chair
southwest
@room checker newTable bossEnter
.
characterhasspecific knife
not characterhasspecific fork
.
saycharacter
Congratulations on properly using your cutlery!
.
.
saycharacter
Something prevents you from entering the room. Perhaps
bad etiquette?
.
.
@room adddircheck northeast bossEnter
@room checker newTable resetAll
.
not fail
.
if
characterhasspecific knife
.
setit specific knife
dropto r_north
.
.
if
characterhasspecific fork
.
setit specific fork
dropto r_east
.
.
.
.
@room adddircheck south resetAll
@room adddircheck out resetAll
@showtable newTable
@describe newTable resetAll