22 March 2012

Alias Kick Delay ---- Wachaaaaa

alias kik {
  inc -u30 %x
  .set %nick $nick | set %chan $chan | set %reason $1- | .write clone.txt %nick | .timerclear -o 1 200 write -c clone.txt
  if (%x isnum 0-20) && (%nick ison %chan) { .kick %chan %nick %reason }
  if (%x > 50) { .timerdelay -om 1 1000 delay }
  haltdef | return
}
alias delay {
  .set %nick $read(clone.txt)
  if (%nick != $null) {
    if (%nick ison %chan) { .kick %chan %nick %reason | .timerdelays -om 1 980 delay }
    if (%nick !ison %chan) { .write -ds %nick clone.txt | .timerloopkik 1 0 delay }
  }
}

No comments: