|
inciwes Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
Merhaba herkese;
İnternette bulunan pek cok tcl yi denedim fakat istedigimi bulamadım.Reklam amaçlı kullanıcam bu scripti.
Kullandıgım scriptlerin hepsinde belli sure sonra pm atmamaya baslıyor.Arka arkaya 2defa girince ilk girdigimde atıyor 2cide atmıyor.
Her girildiginde kanala istisnasız o pmyi atmalı.
3-4 cumleyi atıcak.3-4 cumle arasından rastgele atmayacak.
Bu sorunlardan arındırılmıs bir tcl varsa yazarmısınız buraya.
Teşekkürler simdiden
|
################################################## ##############
#
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] IRCD SheLL & Web Hosting & Radyo Hosting #
# TcL By PrenS #
#
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. #
################################################## ##############
proc join_greet {nick uhost handle channel } {
putserv "privmsg $nick :2Merhaba 4 $nick 13"
putserv "privmsg $nick :6Sana sunucumuz hakkında birascık bilgi vercem"
putserv "privmsg $nick :4Oyun da kapışalım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. 2 #Oyun << 5gerçi senin için pek iyi oyuncu demiyolar ama neyse.:P"
putserv "privmsg $nick :2Radyoda var unutma sakınnnnnn DinLemek için 4#Radyo << 5Radyomuzu Acıp ßeni Kırmıcandan Eminim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.."
putserv "privmsg $nick :2Web Sitemizide Ziyaret EdebiLirsiniz"
putserv "privmsg $nick :10 Bol bol sohbet etmeyi hiç unutmaaaa !"
putserv "privmsg $nick :5 Daha bitmediiiiiiiii :P"
putserv "privmsg $nick :2Güzel sözler duymak istiyorsan #Sohbet Kanalında 3!soz 2yaz "
putserv "privmsg $nick :2Sohbet Kanalında !soz 5 komutunu 6 kulanarak bütün herseyin tadını çıkarabilirsin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir."
putserv "privmsg $nick :7Umarım yeteri kadar tanıtabilmişimdir. 6Iyi eğlenceler , hoş sohbetler ... "
putserv "privmsg $nick :5ŞimdiLik ßye - 13Görüşmek üzere Mjuks
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. "
putserv "privmsg $nick :2SizLere en güzel, en seviyeli sohbet ortamı dileriz. " }
bind join - * join_greet