on *:text:*:#opers:{
if !nickekle* iswm $1- { 
if $read(nickler.txt,w,$2-) { 
.msg $chan $2 kotu rumuz listesinde zaten ekli. 
} 
else { 
write nickler.txt $2- 
.msg $chan $2 kotu rumuz listesine eklendi.
} 
} 
if !nicksil* iswm $1- { 
if !$read(nickler.txt,w,$2-) { 
msg $chan $2 kotu rumuz listesinde yok. 
} 
else { 
write $+(-,dw,$2-) nickler.txt 
msg $chan $2 kotu rumuz listesinden silindi. 
} 
} 
on *:NICK:{ if $kotunick($newnick) { var %_ = 1 | while $comchan($newnick,%_) { if $me isop $v1 { ban -k $v2 $newnick 2 Bu tur rumuzlarla kanalimiza giremezsiniz. /nick yenirumuz komutuyla rumuzunuzu degistirip tekrar girmeyi deneyiniz. } | inc %_ } } }
alias kotunick { var %_ = 1 | while $read(nickler.txt,%_) { if $v1 iswm $1 { return $true } | inc %_ } | return $false }
on @NICK:JOIN:#:{
  if ($chan == #cinsellik) { halt }
  if ($chan == #***) { halt }
  if ($chan == #shemale) { halt }
  if ($chan == #travesti) { halt }
  .mode # +b $nick 
  .msg # $nick Bu tur rumuzlarla kanalimiza giremezsiniz. /nick yenirumuz komutuyla rumuzunuzu degistirip tekrar girmeyi deneyiniz.
n10=  .os raw svsnick $1 eXuSer $+ $rand(1,999) :0
n11=}