# ----------------------------------------------------------------------------
# Actions, together with their additional objects.  The original
# Causes of Chaos used to mess about with object descriptions and
# properties as the game was running, which the Scott Adams system
# can't do.  Instead, when we want to change an object, we substitute
# a similar one.

%item barrel_worn
a large sturdy Barrel (which you are wearing)
%nowhere

# We'd like to say you can wear the barrel without having to pick it
# up first, but then we'd have to walk through a logic maze to check
# that we're not already carrying %maxload items in that case.  Much
# easier just to require that it's already being carried
%action wear bar
carried barrel
%result
swap barrel_worn barrel
msg OK.

%action remove bar
carried barrel_worn
%result
swap barrel_worn barrel
msg OK.

%action go waterfall
at waterfall
carried barrel_worn
%result
msg You crash downwards, and arrive at the
msg bottom, badly brused.
msg OK.
moveto bottom

%action go waterfall
at waterfall
%result
msg You crash downwards to your doom ...
msg Your character is dead.
game_over

%item bottle
an empty leather Bottle
%nowhere

%action drink pot
accessible potion
%result
msg You feel strangely invulnerable ...
set_flag 2
swap potion bottle

%action swim lake
here lake
%result
msg OK.
moveto lake

%occur
at lake
!flag 2
%result
pause
msg You are attacked by piranha!
msg Your character us dead.
game_over

%item hanging_rope
Rope hanging over the cliff
%nowhere

%action tie rope
carried rope
%result
msg Tell me in two words to what.  Eg:
msg To Barrel
set_flag 3

%action tie rope
%result
msg You can't see it from here.

%action tie
%result
msg You can't tie a
print_noun

%action to tel
flag 3
here telescope
%result
destroy rope
drop hanging_rope
msg OK.

%action to tel
flag 3
%result
msg You can't see it from here.
clear_flag 3

%action to
flag 3
%result
msg You can't tie a rope to a
print_noun
clear_flag 3

%action climb rope
here hanging_rope
%result
msg OK.
moveto ledge

%action go tunnel
here tunnel
%result
moveto wtunnel

%item cloak_worn
a heavy elven Cloak (which you are wearing)
%nowhere

%action wear clo
carried cloak
%result
swap cloak_worn cloak
msg OK.

%action remove clo
carried cloak_worn
%result
swap cloak_worn cloak
msg OK.

%occur
at fire_chamber
!carried cloak_worn
%result
msg The heat is so powerful, you slump to
msg the floor unconcious!
#                  ^s -- missing letter!
nl
msg The fire demon eats your inert body.
msg Your character is dead.
game_over


# ----------------------------------------------------------------------------
# Postamble actions (must fire after body actions)

%action help
%result
msg Sorry - I can't help you.

%action examine
%result
msg OK.
msg You see nothing special.

%action wait
%result
msg OK.
msg Time passes ...

%action panic
%result
msg OK.
msg `Yaaaaaaaarrrrgh!`
msg Nothing happens ...

%action jump
%result
msg Wheeeee!

%action say
%result
msg OK
print_noun
nl
msg Nothing happens ...