verdiğiniz kod üstünde biraz oynama yaptım.hangi kanal yada kanallar üstünde işlemesini istiyorsanız scripti bota yükleyip .rehash yada .restart yaptıktan sonra ,botunuza telnet/dcc ile bağlanıp: .chanset #kanalınız +karsila komutu verin o kanala girişlerde çalışacaktır.
pasif etmek istediğinizde de: .chanset #kanalınız -karsila tüm kanallarda aktif etmek için: .chanset * +karsila
kod içinde bu karşılama mesajından muaf etmek istediğiniz nickleri girebilirsiniz.kanal üstünde script aktif edilmiş olsada muaf tutulan nicklere bu karşılama mesajını atmayacaktır.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
# mevcut script ozellikleri
# istenen kanal/lar üstünde aktif edilebilecek
# sekilde editlendi.
setudef flag karsila
# scripti hangi kanal üstünde aktif etmek istiyorsaniz
# telnet/dcc üstünde .chanset #kanaliniz +karsila
# komutu vermelisiniz
bind join - * join_greet
proc join_greet {nick uhost hand chan} {
global botnick karsilanan
# karsilama mesajindan muaf tutmak istediginiz nickleri
# alt satirda || $nick == "muaf-nick"}
# seklinde cogaltarak ekleyin .
# ekleme yaparken ayraclara ve diğer
# özel script karakterlerine dikkat edin.
if {$nick == "ChanServ" || $nick == $botnick} {
return 0
}
if {[info exists karsilanan($nick:$chan)]} {
return 0
}
set karsilanan($nick:$chan) 1
timer 3 "unset karsilanan($nick:$chan)"
# hangi kanal ustunde aktif edilmisse
# o kanala giren kullaniciya gonderecek.
if {[channel get $chan karsila]} {
putserv "PRIVMSG $nick : 2Merhaba 4 $nick "
putserv "PRIVMSG $nick : 2site.Com Ailesine 2Hoşgeldiniz."
putserv "PRIVMSG $nick : 2Sunucumuzda Oyun Kanalarımız 4#Oyun #test #kelime #yarisma #islamioyun 2Kanallarıdır."
putserv "PRIVMSG $nick : 2Sunucumuzda Global Sohbet Kanallarımız 4#Sohbet 2 Kanallaridir."
putserv "PRIVMSG $nick : 2Girmek İstediginiz 2Kanallar İçin Örnek 4 /j Sohbet 2 Şeklinde Kanallara Gire Bilirsiniz.."
putserv "PRIVMSG $nick : 2Radyomuzu Winap Üzerinden Dinlemek İstiyorsanız 2 radyomuzu.com"
putserv "PRIVMSG $nick : 2İsteklerinizi 4#Radyo 2Kanallindan Yapabilirsiniz.."
putserv "PRIVMSG $nick : 2İstekler İçin Örnek 4!istek Niran unsal İzin Ver : Mesajınız 2Şeklinde Yapabilirsiniz..."
return
}
}
putlog "karsila.tcl yuklendi."