| Cevap: Karşılama Tcl
Merhabalar;
Arkadaşlar bu Sahip.tcl karşılama olayını çözemedim Eggdrop içerisin de Scripts de Sahip.tcl mevcut onun içerisine bu kodları aynen kopyalıyorum
set sahip MySelf
set sahip2 Ozgur
set sahip3 SenBen
set sahip4 XoXo
set sahip5 AriS
set sahip6 deep_blue
set sahip7 endemik
bind join - * karsilama
proc karsilama { nick uhost hand chan } {
global sahip sahip2 sahip3 sahip4 sahip5 sahip6 sahip7
if { $nick == $sahip } {
putserv "PRIVMSG $chan :Serverimiz Root admiNLerinden MySelf Şu anda onLine.YakışıkLıLıkta Başa BeLa Kardeşim:Pp"
} elseif { $nick == $sahip2 } {
putserv "PRIVMSG $chan :Serverimiz Root admiNLerinden Ozgur Şu anda onLine.AbiLerin_abisi"
} elseif { $nick == $sahip3 } {
putserv "PRIVMSG $chan :Serverimiz Root admiNLerinden SenBen Şu anda onLine.Karizma Desen onda
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
} elseif { $nick == $sahip4 } {
putserv "PRIVMSG $chan :Serverimiz Root admiNLerinden XoXo Şu anda onLine.aiLemizin BirtaneSi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
} elseif { $nick == $sahip5 } {
putserv "PRIVMSG $chan :Serverimiz Net admiNLerinden AriS Şu anda onLine.I Love you Baby
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
} elseif { $nick == $sahip6 } {
putserv "PRIVMSG $chan :Serverimiz Net admiNLerinden deep_blue Şu anda onLine.I Love you Baby
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
} elseif { $nick == $sahip7 } {
putserv "PRIVMSG $chan :Serverimiz Root admiNLerinden endemik Şu anda onLine.AnneLerin_anneSi"
} elseif {
putserv "PRIVMSG $chan :$nick Hos geldiniz aLemin KraLLarı Set By ...."
}
}
Ardından Koruma.Conf içerisin de Score sahip.tcl ekli telnetten koruma.conf u çıkarıp yeniden kanala alıyorum Yukarıda ki belirtilen Rumuzlar giriş yapınca bir karşılama olmuyor Nerede eksik yapıyorum çözemedim.. Bilgi paylaşımı olursa sevinirim Teşekkürler..
|