alias messages {
if ($2 isop $1) {
if (%spam >= 1) {
.msg $2 %r
inc %spam 2
return
}
elseif ($hfind(messages, %r, 0, w).data >= 1) { return }
hadd messages $ctime %c %r
}
}
on *:text:!version:#: {
var %r Current Version 0.12.14.14 V. $+ $version
messages $chan $nick
}
on *:CONNECT: {
if (!$hget(messages)) { hmake messages }
.timer.messages 0 1 messagequeue
}
}
alias messagequeue {
if (%spam > 0) { dec %spam 1 }
if ($hget(messages, 0) > 1) {
.msg $hget(messages, 1).data
hdel messages $hget(messages, 1).item
inc %spam 2
}
}