Here is a selection of triggers and hooks that are useful for the Disciples
of Chaos and for the Followers of the Scorpion.
/REQUIRE textutil.tf ;; Converts seconds into minutes and seconds, very useful /DEF formattime=\ /SET tmptime=%1 %; \ /SET tmpmin=$[trunc(tmptime/60)] %; \ /SET tmpsek=$[trunc(tmptime-(tmpmin*60))] %; \ /IF ({tmpsek}<10) /SET tmpsek=0%{tmpsek} %; /ENDIF %; \ /_ECHO %{tmpmin}:%{tmpsek} ;;;;;;;;;;;;;; ;;;;; SKILLS ;;;;;;;;;;;;;; ;;;;;;;;; Chaotic spawn /DEF -ag -h"send {sp}*" skl_chaotic_spawn = \ /IF /TEST $[%{-1} !~ ""] %; \ /THEN /SEND @party report De-spawning, don't move %; \ /SEND @use chaotic spawn at despawn %; \ /ELSE /SEND @use chaotic spawn %; \ /SEND @party report Spawning, please don't move! %; \ /ENDIF /DEF -F -aBCbggreen,BCwhite -t"You feel like the pulse of chaos inside you is slowing down!" spawn_lite = \ /SET warn_spawn_time=$[time()] %; \ /SET spawntime=$(/formattime $[warn_spawn_time-start_spawn_time]) %; \ /SEND @party report Spawn DROPPING! (%{spawntime}) /DEF -F -t"You force yourself deeper into the chaos frenzy!" respawn_successful = \ /SET start_spawn_time=$[time()] %; \ /SEND @party report Re-spawn SUCCESSFUL! /DEF -F -t"You fall in pain. Gods! THE PAIN!" spawn_successful = \ /SET start_spawn_time=$[time()] %; \ /SEND @party report Spawn SUCCESSFUL! /DEF -F -t"You huff, and you puff.. but nothing happens." spawn_failed = \ /SEND @party report Spawn FAILED! What a looser. /DEF -F -mregexp -t"^You feel like ([0-9%]+) as good as the current Octopus." get_spawn_percent = \ /SEND @party report <-- is %{4} as good as the current Octopus /DEF -F -t"The extra organs retract back into your body." spawn_dropped = \ /SET stop_spawn_time=$[time()] %; \ /SET spawntime=$(/formattime $[stop_spawn_time-start_spawn_time]) %; \ /SEND @party report Spawn has DROPPED! (%{spawntime}) ;;;;;;;;;;;;;;; ;;;;; FAMILIAR ;;;;;;;;;;;;;;; /DEF -ag -h"send {finfo}" fam_familiar_info = \ /SET fam_score=0 %; \ /SEND @lines 50 %; \ /SET fam_toggle=1 %; \ /SEND @familiar info /DEF -mregexp -t"^\| ([A-Za-z ]*)([0-9]*)/([0-9]*)([ ]*)([0-9]*)([ ]*)\|" fam_get_score = \ /SET fam_score=$[%{fam_score}+(%{P2}*%{P5})] /DEF -mregexp -t"^You have ([0-9]*) training points left" fam_score_done = \ /IF (fam_toggle==1) \ /SEND @lines 20 %; \ /SET fam_toggle=0 %; \ /ENDIF %; \ /SET fam_score=$[%{fam_score}+%{P1}] %; \ /LET _fam_level=$[%{fam_score}/5] %; \ /ECHO -aBCwhite Familiar level: %{_fam_level} %; \ /ECHO -aBCwhite Total points: %{fam_score} %; \ /SET fam_score=0 /DEF -mregexp -t"^Your Shadow Familiar flows over the corpse of \'([a-z ]*)\'..." fam_get_race = \ /SET fam_race=%{P1} /DEF -mregexp -t"^and harvests a bloody bodypart \'([a-z ]+)\'." fam_organ1 = \ /get_aelena_poisons %{P1} /DEF -mregexp -t"^ ..it also manages to find a second organ \'([a-z ]+)\'." fam_organ2 = \ /get_aelena_poisons %{P1} /DEF -i get_aelena_poisons = \ /LET poison_list=%; \ /IF (%{1} =~ "eye") /LET poison_list=black trance %; \ /ELSEIF (%{1} =~ "liver") /LET poison_list=rusted blade %; \ /ELSEIF (%{1} =~ "kidney") /LET poison_list=slow death %; \ /ELSEIF (%{1} =~ "lung") \ /IF (%{fam_race} =~ "human") /LET poison_list=defiled agility, caustic barbs, choking barbs, iron barbs, shimmering barbs, toxic barbs %; \ /ENDIF %; \ /ELSEIF (%{1} =~ "brain") \ /IF (%{fam_race} =~ "elf") /LET poison_list=rabid thoughts %; \ /ELSEIF (%{fam_race} =~ "human") /LET poison_list=shocking barbs %; \ /ENDIF %; \ /ELSEIF (%{1} =~ "heart") \ /IF (%{fam_race} =~ "human") /LET poison_list=burning barbs, chilling barbs, humming barbs %; \ /ELSEIF (%{fam_race} =~ "unicorn") /LET poison_list=seeking pain %; \ /ENDIF %; \ /ENDIF %; \ /ECHO -aBCyellow %{poison_list}