$chan giris code

  on *:join:#kanalin: {
  if $nick isin %nick { halt }
  if $nick isin $me { halt }
  set %kod $rand(a,z) $+ $rand(1,999) $+ $rand(0,99) $+ $rand(a,z)
  sapart $nick #kanalin
  msg $nick Lütfen
  msg #kanal Verilen kod %kod
  msg $nick Lütfen Kanala girebilmek için !code %kod yazınız
}
on *:text:*:?:{
  if $1 == !code {
    if $2 == %kod {
      set %nick $nick
      sajoin $nick #kanalın
      Msg $nick Güvenlik kontrolünden geçtiniz :) $nick
    }
  }
}