set ops_chan "#Opers"
bind pub - !kaydet kaydet
proc kaydet {nick uhost handle chan text} {
global ops_chan
if {[isop $nick $chan]} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
set asifre [rand 9999999]
if {![validchan $kanal]} {
channel add $kanal { +nodesynch flood-chan 10:2 }
}
putserv "operserv mode $kanal +o BotNick"
putserv "chanserv register $kanal $asifre Domain.Com"
putserv "chanserv set $kanal founder $gnick"
putserv "memoserv send $gnick Merhaba $gnick , $kanal odasi isteginiz uzerine $asifre sifresiyle nickinize kaydedilmistir. Domain.Com Tesekkur Eder .."
putserv "PRIVMSG $ops_chan :isLem tamamlandi .  $gnick  nickinin istegi uzerine $kanal  kanali kayit islemi tamamlanmis , kanal sahibi $gnick  olarak belirlenmistir."
return 1
}
return 1
}