daal

;This is in the pk class :

#TRIGGER {%e[37m@pk_target panics, and flees head over heels.} {#CLASS pursuetriggers 1;#var pursuefound 0;#T+ get_pursuedir;scan} "pk" {color}
#TRIGGER {%e[37m@pk_target vanishes.} {#CLASS pursuetriggers 1;#var pursuefound 0;#T+ get_pursuedir;scan} "pk" {color}
#TRIGGER {^~!Found target at: (%w)} {%1;#if (@mana>40) {c lig bolt @pk_target};kill @pk_target;tell gro


;This is pk\pursuetriggers :

#CLASS {pk|pursuetriggers}
#VAR pursuedir {west}
#VAR pursuefound {west}
#TRIGGER {^North:} {#var pursuedir north}
#TRIGGER {^East:} {#var pursuedir east}
#TRIGGER {^South:} {#var pursuedir south}
#TRIGGER {^West:} {#var pursuedir west}
#TRIGGER {^Up:} {#var pursuedir up}
#TRIGGER {^Down:} {#var pursuedir down}
#TRIGGER "get_pursuedir" {^@pk_target (%w)} {#if (%1<>"leaves") {#var pursuefound @pursuedir;#SAY !Found target at: @pursuefound;#class pursuetriggers 0}} "" {prompt}
#CLASS 0