on $*:TEXT:/^[@!.]message/Si:#:{
if (%idleaway == yes) {
if (!$2) {
notice $nick $logo2(error) Please enter a message to send me.13 !message text | halt
}
if ($nick isin %sentmessage) {
notice $nick $logo2(Messages) Sorry, you have already sent me a message. | halt
}
else {
set %sentmessage $nick
inc %messages
//write messages.ini $str($chr(35),60)
//write messages.ini $str($chr(35),60)
//write messages.ini $str($chr(35),60)
//write messages.ini $+($chr(40),$upper(Session Start: $date - $time(hh:nn:ss:TT)),$chr(41))
//write messages.ini $str($chr(35),60)
//write messages.ini $str($chr(35),60)
//write messages.ini $str($chr(35),60)
//write messages.ini $nick sent you a message at $time(hh:nn:ss:TT) $+ : $2-
notice $nick $logo2(Messages) Thank you for your message. I have recieved13 %messages 14messages. I will answer if necessary.
}
}
else {
notice $nick $logo2(error) I'm not away, stop abusing me!
}
}
on *:TEXT:*:*:{
if ($me isin $1- || Mark| isin $1- && %idleaway == yes) {
notice $nick $logo2(Highlight detection) Sorry,13 $nick $+ 14, I am currently 13away14 just now. (13Auto-Away14 after 133014minutes of inactivity) I left $regsubex($duration($calc($ctime - %awayctime)),/(\d+|\w+)/g,$chr(3) $+ $iif(2 \\ \n,13,14)\1) 14ago. Type 13!message14 to leave a message.
}
}
on *:INPUT:*:{
if (%idleaway == yes) {
unset %idleaway
.timerAway 1 1800 set %idleaway yes
}
else {
.timerAway 1 1800 set %idleaway yes
}
}