<PSETG TCHOMP "The troll fends you off with a menacing gesture.">

#ROOM {"MTROL"

"You are in a small room with passages off in all directions.
Bloodstains and deep scratches (perhaps made by an axe) mar the
walls."
      "The Troll Room"
      %<> #EXIT {"WEST" "CELLA"
                 "EAST" #CEXIT {"TROLL-FLAG" "CRAW4" %,TCHOMP}
                 "NORTH" #CEXIT {"TROLL-FLAG" "PASS1" %,TCHOMP}
                 "SOUTH" #CEXIT {"TROLL-FLAG" "MAZE1" %,TCHOMP}}
      (#FIND-OBJ {"TROLL"})}

<PSETG TROLLDESC
"A nasty-looking troll, brandishing a bloody axe, blocks all passages
out of the room.">

<PSETG TROLLOUT
"An unconscious troll is sprawled on the floor.  All passages out of
the room are open.">

<SETG VILLAINS (<FIND-OBJ "TROLL"> <FIND-OBJ "THIEF"> <FIND-OBJ "CYCLO">)>
<SETG VILLAIN-PROBS <IUVECTOR <LENGTH ,VILLAINS> 0>>
<SETG OPPV <IVECTOR <LENGTH ,VILLAINS> '<>>>

<ADD-DEMON <SETG SWORD-DEMON
                 <CHTYPE [SWORD-GLOW ,VILLAINS () <1 ,ROOMS> <FIND-OBJ "SWORD"> <>]
                         HACK>>>

#OBJECT {"TROLL"
         %,TROLLDESC
         "troll"
         %<>
         TROLL
         (#FIND-OBJ {"AXE"}) %<> %<+ ,VICBIT ,OVISON ,VILLAIN> 0 0 0 %,BIGFIX 2}

<ADD-MELEE <FIND-OBJ "TROLL"> ,TROLL-MELEE>

<ADD-DEMON <SETG FIGHT-DEMON
                <CHTYPE [FIGHTING ,VILLAINS () <1 ,ROOMS> <FIND-OBJ "TROLL"> <>]
                        HACK>>>

<ADD-OBJECT
#OBJECT {"AXE"
         "There is a bloody axe here."
         "bloody axe"
         %<> %<> () %<FIND-OBJ "TROLL"> %<+ ,OVISON ,WEAPONBIT> 0 0 0 25 0}
[]["BLOOD"]>

<PSETG MAZEDESC "You are in a maze of twisty little passages, all alike.">

<PSETG DEADEND "Dead End">

You are viewing proxied material from bitreich.org. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.