on *:snotice:*Client connecting*:ctcp $9 version
on *:ctcpreply:*version*: {
 var %:uid $token($1-,-1,32)
 if $hget(banlist,%:uid) {
  msg #opers $nick yasak id numarasi ( %:uid ) ile giriş yapmaya çalıştı...
  zline $nick 0 Mobil Ban Listesine Eklendiniz.
}
 else {
  .hadd -m mban $nick %:uid
  msg #opers $nick nickinin mobil girisini yasaklamak için !mban $nick yapınız.
 }
}
on *:text:*:*: {
 if $chan = #Opers && $regex($1,/^[.!]mban/Si) {
  if $2 = ekle {
   .hadd -m banlist $hget(mban,$2) $2
   msg # $hget(mban,$2) id numarasi ile $nick girişleri yasaklandı.
   zline $nick 0 Mobil Ban Listesine Eklendiniz.
  }
  if $2 = list {
   var %w = 1 | while %w <= $hget(banlist,0).item {
   msg # ID: $hget(banlist,%w).item Nick: $hget(banlist,%w).data
   inc %w
   }
  }
  if $2 = sil {
   msg # $2 id numaralı mobilban listesinden silindi nick: $hget(banlist,$2)
   .hdel banlist $2
  }
 }
}