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}