;; some helpers and like for bard stuff
;; Antti Pietikäinen (Heidel@batmud) 2004

;; timer needed
/require -q misc.tf



;; ------ lullaby timer
;; --------------------
/def -i -F -t'You lie down for a short rest, soothed by the lullaby sung by *.' lullaby_timer= \
	/timer_start lullaby_timer%;\
	/repeat -0:6:0 1 /echo -aB % Last lullaby 6min ago.

/def -i lulla = /timer_show lullaby_timer

;; ------ bgreet
;; -------------
;; roll through songmasters, useful for finding pathfinder-targets
/set blist=1
/def -i bgreet=/eval bgreet $$(/nth $[++blist - 1] %%bgreetlist)%;\
	/if (blist=23) /set blist=1%;/endif

;; may miss some new ones, check yourself and just add to the end
/set bgreetlist=aline cyarus derevan dria endek fyanna forsimnetu gilian holm malecketh noitulove \
otharus patricia sineyole stringbreaker talos tinebring vahearun yomototh zantus zinbaf \
zord razmatag


;; ------ auto-follow songmaster
;; -----------------------------
;; a little bit illegal helper that follows a songmaster, example: /fol_bard Aline
;; remember to /stop to remove the follow-macro
/def -i fol_bard=\
	/def -mregexp -F -t'^%{1} wanders to ([a-z]+).$' ttrak=%%{P1}%;\
	/def stop = \
		/undef ttrak%%;\
		/undef stop