Epicar's zMUD 5.55 Trigger Page (Copied)

Triggers:

Person tells you:

Person asks you:

Person tells you in halfling:

Person tells you exclaiming:

Person tells you, Person2, and Person3:

Description: Adds the tell to the tell history. Waits to let zMUD check the next

line to see if it's a multi-line tell.

Pattern: ^&%w{TellName} {tells|asks} you(*): &%*{LastTell} 

Commands:

tell_list_names = %additem(@TellName, @tell_list_names)

#if (%ismember(@TellName,@friend_list) or %ismember(@TellName,@target_list) or %ismember(@TellName,@orgmate_list)) {#cw underline}

tell_list_times = %additem(%time("hh:nn:ss"), @tell_list_times)

#PLA notify.wav

#wait 100

tell_list_tells = %additem(@LastTell, @tell_list_tells)

Class: tell_history

Person tells you/asks you: blah blah blah blah blah...

                           blah blah blah blah blah...

                           blah blah blah blah blah...

Description: Checks a line to see if it belongs to a tell. If so, it adds the text

to the last tell received. Works for up to 3 line tells.

Pattern: ^           &PossibleTellLine

Commands:

PossibleTellLine = %trimleft(@PossibleTellLine)

#if (%begins(%line2, @TellName tells you) or %begins(%line2, @TellName asks you)) {LastTell = %concat(@LastTell, " ")

LastTell = %concat(@LastTell, @PossibleTellLine)} {#if (%begins(%line3, @TellName tells you) or %begins(%line3, @TellName asks you))) {LastTell = %concat(@LastTell, " ")

LastTell = %concat(@LastTell, @PossibleTellLine)}}

Class: tell_history

Aliases:

tells

Usage: 'tells'

Description: Displays all of your tells.

#SHOW %ansi(brown,bold)tells %1

count = %numitems(@tell_list_names)

#if (@count < 1) {#SHOW %ansi(cyan)No tells.} {#SHOW %ansi(cyan)======= Tell List (full) =======

#LOOP @count {tell_age = %eval((%time("nn") - %word(%item(@tell_list_times, %{i}), 2,":")) + 60*(%time("hh") - %word(%item(@tell_list_times, %{i}), 1,":")))

#if (@tell_age < 15) {time_color = "green"} {#if (@tell_age > 60) {time_color = "red"} {time_color = "brown"}}

#SHOW %ansi(brown,bold)%{i} %ansi(grey)~[%ansi(@time_color)%item(@tell_list_times, %{i})%ansi(grey) (@tell_age)~] %item(@tell_list_names, %{i})": "%item(@tell_list_tells, %{i})}

#SHOW %ansi(cyan)======= Tell List (full) =======}

tells_clear

Usage: 'tells_clear' : Clears all tells

'tells_clear 5' : Removes the 5th tell

'tells_clear Person' : Removes all tells from Person

#SHOW %ansi(brown,bold)tells_clear %1

#if (%1 = "") {tell_list_names = ""

tell_list_tells = ""

tell_list_times = ""

#ECHO Tells cleared.} {#if (%isnumber(%1)) {#if (%item(@tell_list_names, %1)) {tell_list_names = %delitem(%item(@tell_list_names, %1), @tell_list_names)

tell_list_tells = %delitem(%item(@tell_list_tells, %1), @tell_list_tells)

tell_list_times = %delitem(%item(@tell_list_times, %1), @tell_list_times)

#ECHO Tell number %1 cleared.} {#ECHO No tell number %1.}} {count = %numitems(@tell_list_names)

changed = 0

#LOOP @count {#if (%item(@tell_list_names, %eval(%{i}-@changed)) = %1) {tell_list_names = %delitem(%1, @tell_list_names)

tell_list_tells = %delitem(%item(@tell_list_tells, %eval(%{i}-@changed)), @tell_list_tells)

tell_list_times = %delitem(%item(@tell_list_times, %eval(%{i}-@changed)), @tell_list_times)

#add changed 1}}

#SHOW @changed tells removed.}}