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