Kod

# #gold kanalında +v olan kullanıcılar
# tüm global kanallarda otomatik olarak +h modunu alsın 
# ve hostları Gold.IRCForumu.ORG
# flaglarına da +W flagı eklensin istiyorum.
#######################################################################################

;# özel kanalınızın adı:
set gold(knl) "#VIP"

;# özel kanalınızda kullanıcı hangi flaga sahip olduğunda işlem olacak:
set gold(knlmod) "+v"

;# işlem yapılacak global kanallarınız:
set gold(globknl) "#Sohbet #Radyo #Oyun #Yarisma #Kelime #OXM"

;# kullanıcının alacağı nick mode:
set gold(modes) "+W"

;# kullanıcıya verilmesi istenen vhost:
set gold(host) "Gold.domain.com"

;# kullanıcın global kanallarda alacağı falg:
set gold(globknlmod) "+h"

;# botunuz oper yetkide olmalı (1 = evet | 0 = hayır)
set gold(botoper) "1"

;#############ayarlar bitti############################################################

bind mode - * gold:knl:mod

proc gold:knl:mod {nick uhost hand chan mc {victim ""}} {
   if {$victim != ""} {append mc " $victim"}
   elseif {[string match -nocase $::botnick $victim] || [$::botnick $::gold(botoper) != "1"]} { return 0;}
   elseif {[onchan $victim $::gold(knl)] || [string equal $::gold(knlmod) $mc] || [onchan $victim $::gold(globknl)] && [isvoice $victim $::gold(knl)]} {
     foreach knl [split $::gold(globknl)] {
   putserv "chghost $victim $::gold(host)"
   putserv "svsmode $victim $::gold(modes)"
   puthelp "privmsg operserv :mode $knl $::gold(globknlmod) $victim"
     return 0
     }
  }
}  
   
 putlog "ok..."