Code:
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
  }
}

Here's better example.

Last edited by Belhifet; 16/12/14 06:27 AM.