Improve Woodland Stride.

CHANGELOG.md

@@ -3,7 +3,7 @@
 ## version v1.0alpha3 -- unreleased.
 
 * [#28](https://github.com/lambda-dom/class_revisions/pull/28): Fix targetting in spells: Animal Fang, Animal Summoning I-IV.
-* [#30](https://github.com/lambda-dom/class_revisions/pull/30): Improve implementation of Woodland Stride. TODO.
+* [#31](https://github.com/lambda-dom/class_revisions/pull/31): Improve implementation of Woodland Stride.
 
 ## version v1.0alpha2.
 

class_revisions/components/ranger/patches/ranger_spells.tpa

@@ -1,4 +1,5 @@
 //Libraries.
+INCLUDE "%WEIDU_LIBRARY_DIR%/blocks.tpa"
 INCLUDE "%WEIDU_LIBRARY_DIR%/components.tpa"
 INCLUDE "%WEIDU_LIBRARY_DIR%/installers.tpa"
 INCLUDE "%WEIDU_LIBRARY_DIR%/patchers.tpa"
@@ -119,8 +120,23 @@ END
 
 //Woodland Stride.
 DEFINE_PATCH_FUNCTION ranger_woodland_stride BEGIN
+    PATCH_FOR_EACH block IN
+        "entangle"
+    BEGIN
+        LPF patch_block INT_VAR
+            match_opcode = 0                //AC Bonus.
+        STR_VAR
+            block = "%block%"
+        END
+    END
+
+    //Hack-y implementation.
+    LPF DELETE_EFFECT INT_VAR
+        verbose = 1
+        match_opcode = 0                    //AC bonus. Opcode present merely to anchor patch_block.
+    END
+
     PATCH_FOR_EACH spell IN
-        "CLERIC_ENTANGLE"
         "CLERIC_SPIKE_GROWTH"
     BEGIN
         LPF get_spell_res STR_VAR spell = "%spell%" RET resource END