;The tunnels of the eggtude
;The first tunnel : Desert
SCENE 51 deasert
#Include prtychk.txt
#include steal.txt
COMPAGE #<num.hostclass>, 35
IF> @monster
IF= @monster
IF XP @holedehydrate
H: The sand here, it looks like it has been dug up recently.
IF I707 @spade
END
@holedehydrate
H: Im dehydrated!
TAKE H10000
SET thirst, "0"
END
@spade
H: Maybe I should dig here with the spade
H: Do u want to dig?
ASK 10
If Qyes @dignow
END
@dignow
H: Here goes
GIVE T201
GOTO link 13, 2
END

@monster
H: Nothing here but sand
END