on *:PART:#: {
  hadd -smu60 nickchange $r(0,999999) $nick $address($nick,0)
  _nochan $nick
}
on *:JOIN:#: {
  if !%chan {
    renick $nick #
  }
}
alias _nochan { .set -u1 %cont $1 | .whois $1 }
raw 319:*: {
  if %cont {
    .set -u5 %chan = $1-
  }
}
alias renick {
  var %m = 1
  while %m <= $hget(nickchange,0).item {
    if $gettok($hget(nickchange,%m).data,1,32) != $1 && $gettok($hget(nickchange,%m).data,2,32) == $address($1,0) {
      .echo -a UYARI!: $gettok($hget(nickchange,%m).data,1,32) Son 1 Dakika içinde Nick Değiştirerek $2 Kanalına $1 Nickiyle Girmiştir...
      gline $1 Status 'de Nick Değişimi Yasaktır...
      hdel -s nickchange $hget(nickchange,%m).data
    }
    inc %m
  }
}