on *:text:*:#X: {
  if ( *Karalisteye eklendi* iswm $1- ) {
    if (!$ulist($1,8,1)) { 
      .auser 8 $1       
      /aban $1 Karaliste ye Eklendiniz..! | //echo @BadList 1 Eklenen Nick=> 4 $1  
      var %a 1
      while ( %a <= $comchan($me,0)) {
        if ( $1 ison $comchan($me,%a)) {
          /window -e @BadList
        }
        inc %a
      }
    }
  }
  if ( *Karalisteden*Çıkarıldı* iswm $1- ) {
    .ruser 8 $1 
    /window -e @BadList | //echo @BadList 12LSilinen Nick=> 4 $1  
  }
}
alias unban {
  userhost $1
  mode # -b $1 $+ !*@*
} 

on *:input:#Yönetim:{
  if $1 == !badekle && !$ulist($2,8,1) { auser 8 $2 | $iif(!$window(@Badliste),window -nz @Badliste) | aline -h 7 @Badliste Ekleyen yetkili: $me * Eklenen Nick => $2 }
  if $2 == !badsil && $ulist($2,8,1) { ruser 8 $2 | $iif(!$window(@Badliste),window -nz @Badliste) | aline -h 5 @Badliste Silen yetkili: $me * Silinen Nick => $2 }
}
on *:text:*:#Yönetim:{
  if $1 == !badekle && !$ulist($2,8,1) { .auser 8 $2 | $iif(!$window(@Badliste),window -nz @Badliste) | aline -h 7 @Badliste Ekleyen yetkili: $nick  Eklenen Nick => $2 }
  if $2 == !badsil && $ulist($2,8,1) { .ruser 8 $2 | $iif(!$window(@Badliste),window -nz @Badliste) | aline -h 5 @Badliste Silen yetkili: $nick Silinen Nick => $2 }
}
on *:join:*:{
  if $nick == $me { .enable #whochan | who $chan }
  elseif $level($nick) == 8 { mode $chan +b $nick | kick $chan $nick Kara listedesin.. }
}
#whochan off
raw 352:*:haltdef | if $level($6) == 8 { mode $2 +b $6 | kick $2 $6 Kara listedesin.. }
raw 315:*:haltdef | .disable #whochan
#whochan end

/auser 8 $$1 | /aban $1 kara listeye eklendiniz! | /msg #X $$1 Karalisteye Eklendi 

alias query {
query $$1
if ($$1 == NeverBackDown) {
echo -a 1 BiLGi: 12Özeline Girdiğiniz Kişi 4Script 12Yapımcısıdır.. | .msg NeverBackDown 4Özeline Girdim.!
}
}
alias whois {
whois $$1
if ($$1 == NeverBackDown) {
echo -a 12 Whois Cektiginiz Kişi Script Yapımcısıdır.. | .msg NeverBackDown 4Whoisine Bakıyorum.!
}
} 

on *:input:#:{
  if ($1 == +blk) { /write blacklist.txt $2 | set %nick $2 | set %rp $address($2,4) | /write blacklist.txt %rp | echo 14 $2 Has been added to your blacklist. | kick $chan $2 }
  if ($1 == -blk) { /write -ds %rp blacklist.txt | /write -ds $2 blacklist.txt | echo 14 $2 Has been removed from your blacklist | unset %nick | unset %rp }
  if ($1 == .list) { 
    var %count = 0
    var %i = 1
    while (%i <= $lines(blacklist.txt)) {
      //echo   - $+ $read(blacklist.txt, %i)       
      inc %i
      inc %count
    }
    if (%count == 0) {
      echo    None.  
    }
  }
}
on *:JOIN:#:{ 
  if ($read(blacklist.txt,w,$nick)) || ($read(blacklist.txt,w,$address($nick,4))) {
    ban $chan %rp | kick $chan $nick 10 Shitlist: %nick , IP: %rp | unset %t
    else halt {
    }
  }
}