alias F1 {
      ban $chan $$1
  kill $chan $$1 Badnick koruması!
    write badnick.txt $$1
}

on *:join:#: {
    if $read(badnick.txt,w,$nick) {
        ban $chan $nick
        kill $chan $nick Badnick koruması!
    }
}