##############################################

#                                            #

#  Oto Op(@) Sistemi ( Global Oplar İçin )   #

#                                            #

#  Ops kanalınızda bulunan kullanıcınız      #

#  belirlediğiniz global kanallara girdi-    #

#  ğinde bot tarafından op yapılır.Ayrıca    #

#  oper ve helpers kanalınızdaki kişiler bu  #

#  özellikten muaf tutulur.                  #

#                                            #

#  coded by Raw for 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">set otoop(oper) "#oper"

 
##########

# Muaf için Helper Kanalı Giriniz

##########

 
set otoop(helper) "#helper"

 
##########

# Op için op Kanalı Giriniz

##########

 
set otoop(op) "#op"

 
##########

# Global kanalları giriniz

# Çoğaltabilirsiniz..!

##########

 
set otoop(kanallar) {

  "kanal1"

  "kanal2"

  "kanal3"

}

 
##########

# Ayar bölümü bitti , gerisine bilmiyorsan karışma (.

##########

 
bind join - * oto_op

 
proc oto_op {nick chan host text} { 

  global otoop

    foreach sansliop [string tolower $otoop(kanallar)] { 

 if {$chan == $sansliop && [onchan $nick $otoop(op)] && ![onchan $nick $otoop(oper)] && ![onchan $nick $otoop(helper)]} {

putquick "privmsg irc mode $chan +o $nick"

return 0

  }

 }

}

 
################

### TCL SONU ###

################

putlog "Oto Op(@) Sistemi başarı ile yüklendi."

################