sorry i didnt test the code before

Code:
on @!*:join:#:{
  msg $nick hi $nick $+ , you have 10 sec. to avoid kick answer by: test ok
  set %test_ok $+ $nick 1
  timertestok 1 10 kbanned $nick #
}
on *:text:*:?:{
  if ($($+(%,test_ok,$nick),2)) && ($strip($1-2) == test ok) {
    unset %test_ok $+ $nick
    msg $nick welcome $nick :) you can stay
    close -m $nick
  }
}
alias kbanned if ($($+(%,test_ok,$1),2)) ban -ku600 $2 $1 2 no answer

WorldDMT