:: Evil tree

Where the trail bends around a rock shoulder, shying away from a precipitous drop, an old tree clings to the edge, mostly dead but for scattered leaves. It seems to squint at you with furrowed brows; branches sway even as the wind has stopped for now. As you draw near, it groans from a hollow in the middle of the trunk. You take a step back, and trip on a root that wasn't there a moment ago.

<<set $enemy = all_monsters.tree>>\
<<set $enemy.score = $enemy.base>>\
<<set $enemy.wounds = 0>>\

@@text-align:center;
[[You must face it -> Evil tree battle]]
@@

:: Evil tree battle

A gnarly old tree, animated by more than the wind, reaches around you with branches that creak and groan. Roots churn the ground, grasping at your feet. A jagged hollow in the middle of the trunk emits a sound part wail, part cackle.

(this $enemy.score-point creature is unarmed and unarmored)

* [[Attack -> Attack tree]] (roll 2d6 + Muscle)
* [[Bewitch -> Bewitch tree]] (roll 2d6 + Magic)
* [[Flee -> Flee tree]] (roll 2d6 + Mischief)

:: Attack tree [nobr]

<<set _modifier = $player.muscle + $player.buffs.muscle>>
<<set _roll = roll_dice(2, 6, _modifier)>>

<<if _roll >= $enemy.score>>

You stare down the creature, not letting your guard down for a moment. One of its wooden limbs lashes at you; with a swift swipe, you break it in twain. 

  <<set _damage = _roll - $enemy.score + $player.weapon.damage>>
  <<set _damage = adjust_damage(_damage, $enemy.armor)>>

  <p>(You roll _roll, dealing _damage wounds.)</p>

  <<set $enemy.wounds += _damage>>

  <<if $enemy.wounds >= $enemy.score>>
    <p>The tree shrivels into a wrinkled husk and stops moving.</p>
    <<set $player.unused_exp += $enemy.base>>
    @@text-align:center;
      <p>[[You catch your breath and move on -> Search the area]]</p>
    @@
  <<else>>
    <p>The tree writhes horribly, creaking and groaning.</p>
    @@text-align:center;
      <p>[[It still has plenty of branches -> Evil tree battle]]</p>
    @@
  <<endif>>

<<else>>

You swipe at the cackling enemy again and again. It blocks and parries your every move. Then one of its wooden limbs lashes out, hitting you hard.

  <<set _damage = $enemy.score - _roll>>
  <<set _damage = adjust_damage(_damage, $player.armor)>>

  <p>(You roll _roll, taking _damage wounds.)</p>

  <<set $player.wounds += _damage>>

  @@text-align:center;
    <<if $player.wounds >= $player.health>>
      <p>[[You are badly hurt]]</p>
    <<else>>
      <p>[[You take a few steps back -> Evil tree battle]]</p>
    <<endif>>
  @@

<<endif>>

:: Bewitch tree [nobr]

<p>With those wooden limbs whipping around, you frantically wonder what sort of magic might be able to stop such a creature.</p>

<<include "Choose spell">>

<<if $spell_count > 0>>
@@text-align:center;
 <p>[[Cast spell -> Bewitch tree!]] / [[Think again -> Evil tree battle]]</p>
@@
<<else>>
<p>Unfortunately, you draw a blank.</p>

<<include "Diamond motif">>
@@text-align:center;
 <p>[[Try something else -> Evil tree battle]]</p>
@@
<</if>>

:: Bewitch tree! [nobr]

<<set _modifier = $player.magic + $player.buffs.magic>>
<<set _effort = $player.spellbook[$chosen_spell].level>>
<<set $roll = roll_dice(2, 6, _modifier - _effort)>>

<p>(you roll $roll against a target of $enemy.score)</p>

<<switch $chosen_spell>>
<<case "Sunburst">><<include "Sunburst tree">>
<<case "Cold snap">><<include "Cold-snap tree">>
<<case "Smoke screen">><<include "Smoke-screen tree">>
<<case "Undergrowth">><<include "Undergrowth tree">>
<<case "Windstorm">><<include "Windstorm tree">>
<</switch>>

:: Sunburst tree

The sun shines brighter as the spell takes hold. You shade your eyes from the dazzling light, but if anything the tree seems pleased by it.

@@text-align:center;
  [[So much for that -> Evil tree battle]]</p>
@@

:: Cold-snap tree [nobr]

As your spell takes hold, the air suddenly becomes frigid. Puddles of water on the ground freeze solid; snowflakes form in the air. The tree mocks you with creaky laughter. "I survived more winters than you!" it appears to say.

<<if $roll > $enemy.score>>

  <<set $enemy.score -= ($roll - $enemy.score)>>

  <<if $enemy.score <= 0 || $enemy.score <= $enemy.wounds>>

    <p>Yet it slows down and soon stops moving completely.</p>

    <<set $player.unused_exp += $enemy.base>>

    @@text-align:center;
      <p>[[You catch your breath and move on -> Search the area]]</p>
    @@
  
  <<else>>

    <p>It shrivels and slows down anyway, for all its bravado.</p>

    @@text-align:center;
      <p>[[But it can still fight -> Evil tree battle]]</p>
    @@

  <</if>>

<<elseif $roll == $enemy.score>>

<p>Sure enough, it doesn't look any worse for the wear. But neither does it strike back, for the moment.</p>

@@text-align:center;
  <p>[[It's a draw... this time -> Evil tree battle]]</p>
@@

<<else>>

<p>Sure enough, it doesn't look any worse for the wear. And it strikes back.</p>

  <<set _damage = $enemy.score - $roll>>
  <<set _damage = adjust_damage(_damage, $player.armor)>>
  
<p>(You take _damage wounds.)</p>

  <<set $player.wounds += _damage>>

@@text-align:center;
  <<if $player.wounds >= $player.health>>
    <p>[[You are badly hurt]]</p>
  <<else>>
    <p>[[You take a few steps back -> Evil tree battle]]</p>
  <<endif>>
@@

<</if>>

:: Smoke-screen tree

Sparks and flame burst from your fingertips, producing a thick plume of smoke that spreads in front of you as if driven by wind. The creature recoils in fear at first, but soon realizes there's not much fire, and resumes its attacks.

@@text-align:center;
  [[So much for that -> Evil tree battle]]</p>
@@

:: Undergrowth tree [nobr]

Strong vines sprout from the ground, pushing rocks aside as they grow preternaturally fast. They twist around, coiling around the tree trunk, entangling its roots and branches.

<<if $roll > $enemy.score>>

<p>The creature trashes, even managing to break a few of them, but its movements are severely constrained now.</p>

  <<set $enemy.score -= ($roll - $enemy.score)>>

  <<if $enemy.score <= 0 || $enemy.score <= $enemy.wounds>>

    <p>In fact it soon stops moving completely.</p>

    <<set $player.unused_exp += $enemy.base>>

    @@text-align:center;
      <p>[[You catch your breath and move on -> Search the area]]</p>
    @@
  
  <<else>>

    @@text-align:center;
      <p>[[It can still fight however -> Evil tree battle]]</p>
    @@

  <</if>>

<<elseif $roll == $enemy.score>>

<p>But the creature proves stronger, and breaks its bounds one by one. At least that keeps it too busy to resume its attack.</p>

@@text-align:center;
  <p>[[It's a draw... this time -> Evil tree battle]]</p>
@@

<<else>>

<p>But they're too weak, and snap easily as the creature trashes. And then it hits back.</p>

  <<set _damage = $enemy.score - $roll>>
  <<set _damage = adjust_damage(_damage, $player.armor)>>
  
<p>(You take _damage wounds.)</p>

  <<set $player.wounds += _damage>>

@@text-align:center;
  <<if $player.wounds >= $player.health>>
    <p>[[You are badly hurt]]</p>
  <<else>>
    <p>[[You take a few steps back -> Evil tree battle]]</p>
  <<endif>>
@@

<</if>>

:: Windstorm tree [nobr]

<<if $roll > $enemy.score>>

At first nothing seems to happen, then a strong wind picks up, and soon grows into a howling gale. The creature screams as several of its branches snap.

  <<set $enemy.wounds += $roll - $enemy.score>>

  <<if $enemy.score <= $enemy.wounds>>

    <p>It soon shrivels into a wrinkled husk and stops moving.</p>

    <<set $player.unused_exp += $enemy.base>>

    @@text-align:center;
      <p>[[Find your bearings -> Search the area]]</p>
    @@
  
  <<else>>

    @@text-align:center;
      <p>[[But it can still fight -> Evil tree battle]]</p>
    @@
    
  <</if>>

<<elseif $roll == $enemy.score>>

At first nothing seems to happen, then a strong wind picks up, and soon grows into a howling gale. The tree sways, waving its branches, but resists.

@@text-align:center;
  <p>[[It's a draw... this time -> Evil tree battle]]</p>
@@

<<else>>

At first nothing seems to happen, then a strong wind picks up, and soon grows into a howling gale. The tree just laughs however and whips its branches at you.

  <<set _damage = $enemy.score - $roll>>
  <<set _damage = adjust_damage(_damage, $player.armor)>>
  
<p>(You take _damage wounds.)</p>

  <<set $player.wounds += _damage>>

@@text-align:center;
  <<if $player.wounds >= $player.health>>
    <p>[[You are badly hurt]]</p>
  <<else>>
    <p>[[You take a few steps back -> Evil tree battle]]</p>
  <<endif>>
@@

<</if>>

:: Flee tree [nobr]

Wait. Why are you even fighting an enemy that's fixed in place. You back away. Roots snake out of the ground to trip you up. Long, hanging branches whip around. You dodge and duck and keep going.

<<set _modifier = $player.mischief + $player.buffs.mischief>>
<<set _roll = median_roll(2, 6, _modifier)>>

<<if _roll >= $enemy.score>>

  <p>It feels like a long time until you're far enough to be safe.</p>

  <p>(You roll _roll, getting away unscathed.)</p>
  
  <<set $player.unused_exp += _roll - $enemy.score>>

  @@text-align:center;
    <p>[[Find your bearings -> Respite]]</p>
  @@

<<else>>

  <<set _damage = adjust_damage($enemy.score - _roll, $player.armor)>>
  <<set $player.wounds += _damage>>
  <<set $player.unused_exp += _damage>>

  <p>(You roll _roll, taking _damage wounds; your armor helps.)</p>

  <p>Yet you take blow after blow by the time you make it to safety.</p>  

  <<if $player.wounds >= $player.health>>
    @@text-align:center;
      <p>[[You are badly hurt]]</p>
    @@
  <<else>>
    @@text-align:center;
      <p>[[Find your bearings -> Respite]]</p>
    @@
  <<endif>>

<</if>>