No_FeaR |
26 Ocak 2022 22:04 |
VIP Kanal TCL ( Gold Kanal )
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..."
|