Alias bye {
set %ltime $asctime
set %lnick $me
set %bnick $1
set %lrsn $2-
set %away on
.nick %bnick
amsg 7:: 12I am now away 7:: 12Reason: %lrsn 7:: 12Left at: %ltime 7::
.away Away 7:: 12Reason: %lrsn 7:: 12Left at: %ltime 7::
}
Alias back {
amsg 7:: 12I am now back 7:: 12From: %lrsn 7:: 12Time gone: $duration($calc(($ctime - $ctime(%ltime)))) 7::
set %away off
remove away.txt
nick %lnick
away
}
on $*:TEXT:/(Trigger1|Trigger2|Trigger3)/Si:#:{
if (%away == on) {
if ($nick == $read(away.txt,w,$nick)) { halt }
write away.txt $nick
notice $nick 7:: 12AWAY 7:: 12Reason: %lrsn 7:: 12Left at: %ltime 7:: 12One time response to "Trigger1" "Trigger2" "Trigger" (If important /ms send %lnick msg)
}
}