>LOOK
Pentagram Room
In this room, inscribed on the floor, is a great pentagram drawn with black
chalk. In its center is a black circle.
The Wizard of Frobozz is here, eyeing you warily.
There is a demon floating in midair here.
>KILL WIZARD
The Wizard retreats, waving his wand and chanting. He says "Fear!" Nothing
happens! With a terrified glance at the demon, the wizard runs past you and out
of the room.
>GIVE NECKLACE TO DEMON
"A fine gift, mighty one, you have almost reached my fee."
The Wizard looks at you as if you are a madman. He tears his beard and stares at
you fearfully.
The Wizard will tear his beard when you give the demon the eighth treasure, but it doesn't check if the Wizard is still in the room. See GENIE-FCN:
(T
<TELL
"\"" <GET ,GENIE-THANKS .HOARD> "\"" CR>
<COND (<EQUAL? .HOARD 8>
<TELL
"The Wizard looks at you as if you are a madman. He tears his beard and
stares at you fearfully." CR>)>
<RTRUE>)>)
Near the end of the game:
The Wizard will tear his beard when you give the demon the eighth treasure, but it doesn't check if the Wizard is still in the room. See
GENIE-FCN
: