TILEMASTER2004 DATA V1
SCRIPT: 40
0 CM "This bed looks very comfortable (despite having a lot of cat hair on one spot).  Do you wish to sleep? "
0 Verify 10
0 BREAK
10 Teleport 0 -1 -1 -TARGET
0 CM -PARTYONLY "Your party finds various places to sleep." -NL
0 Pause
0 M "You climb into the bed.  It is very comfortable."
0 Script 501
0 AlterPCTile 1004
0 MoveMapObj Creature 1 16 10
0 Pause
0 M "The cat jumps onto the bed and curls up next to you, purring."
0 MoveMapObj Creature 1 16 9
0 EditFrame 1004 -COPYCOLOR 54 5 7 -PIXELS 3 5 4 6 -COPYCOLOR 54 6 7 -PIXELS 4 5 3 6
0 NeedRedraw
0 Pause
0 CM "You fall into a deep, comfortable sleep"
0 Script 500
0 CM -NL
0 CRandom 95 - 5 20
11 AlterPCTile BASE
0 DeleteTile 1004
0 DeleteFrame 1004
0 M "You wake up.  This place seems timeless, so you don't know how long you were asleep, but you are perfectly well-rested.  The cat stretches and yawns."
0 PartyIterator -INIT
1 PartyIterator -ETAG 0 -PNAME
0 GivePCMB 2 30 30
0 Heal MAX SKIPNE
0 GiveSP MAX
0 GOTO P1
20 M "You have a dream about eating chicken.  You later wonder if you were sharing a dream with the cat."
0 Pause
0 GOTO 11
