Kod:
#################################
#Helper Oto Host Sistemi
#Yapımcı: OkyAnuS
#Iletisim: coder@kelebek.gen.tr
#Web: www.ticarichat.net
#################################
set helperhost "HelpOperator.Server"
set helperident "Services"
set helpername "Server Help Team"
set helpchan "#HELP"
set helpermode "+h"
bind mode - * modes
proc modes {eden b c kanal mode helpernick} {
global helperhost helperident helpername helpermode helpchan
if {$kanal == $helpchan} {
if {$helpernick == "OkyAnuS"} { halt }
if {$mode == "+o"} {
putserv "CHGHOST $helpernick :$helperhost"
putserv "CHGIDENT $helpernick :$helperident"
putserv "CHGNAME $helpernick :$helpername"
putserv "os raw svsmode $helpernick :$helpermode"
putserv "notice $helpernick Basariyla, Host,Realname,Ident ve Modelerinizi Aldiniz."
putserv "notice $helpernick Lutfen $kanal Kanalında Laubalice Hareketler Yapmayiniz."
}
if {$mode == "-o"} {
if {$helpernick == $eden} {
putserv "NOTICE $helpernick :Lutfen $kanal kanalinda Deop Olamazsiniz!"
putserv "MODE $kanal +o $helpernick"
}
if {$helpernick != $eden} {
putserv "NOTICE $eden :Lutfen $kanal Kanalinda Kimseyi Deop Etme Yetkiniz Yoktur."
putserv "MODE $kanal +o $helpernick"
}
}
}
}