Karşılama tcl tarzı tcl - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

inciwes · 06 Ekim 2013, 18:12

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

Tejxele · 06 Ekim 2013, 20:15

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ınnnnnnDinLemek için 4#Radyo << 5Radyomuzu Acıp ßeni KırmıcandanEminim
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 !soz5 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

No_FeaR · 04 Aralık 2013, 23:33

Kod: Kodu kopyalamak için üzerine çift tıklayın!

############################################################################################## 
# Basari Hosting Internet Hizmetleri - Dürüstlük simgemizdir. Önce güven!                    # 
# 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
color="#0000BB">proc join_greet {nick uhost handle channel } {  
 putserv "privmsg $nick :4M2erhaba 3 $nick " 
 putserv "privmsg $nick :14irc.alanadi.com 4s2ohbet 4s2unucusuna 4h2oşgeldiniz." 
 putserv "privmsg $nick :4S2unucu 4k2urallarına4 v2e 4g2örev 4d2ağılımına 14/motd 4y2azarak 4u2laşabilirsiniz." 
 putserv "privmsg $nick :4S2unucu4 y2ardım 4k2analımız14: 7#Help 14~&~ 4G2enel 4s2ohbet 4k2analımız14: 7#Sohbet 14~&~ 4O2yun 4k2analımız14: 7#Oyun 14~&~ 4R2adyo 4k2analımız14: 7#Radyo 14'4d2ur." 
 putserv "privmsg $nick :4W2eb 4c2hat 4a2dresimiz14: 3
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
color="#0000BB">putserv "privmsg $nick :4D2ilek4 v2e 4ş2ikayetlerinizi, 7admin@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]di.net 4a2dresine 4e14-2mail4 y2oluyla 4i2letebilirsininiz." 
 putserv "privmsg $nick :3S6izlere 3e7n 3g4üzel14, 3e7n 3s2eviyeli 3s10ohbet 3o13rtamı 3d12ileriz.3 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 14~&~ 3irc.alanadi.com"  
 putserv "PRIVMSG $nick :4 B2asari 4H2osting 4I2nternet 4H2izmetleri 4- 3
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
color="#0000BB">putserv "NOTICE  $nick : 0,4Ş0,2iir 0,4b0,2otumuzdan 0,4g0,2üzel 0,4s0,2öz 0,4o0,2kumak 0,4i0,2sterseniz 0,4l0,2ütfen 0,4g0,2enel 0,4s0,2ohbet 0,4k0,2analımızda0,3 !soz 0,4y0,2azınız."   
} 
bind join - * join_greet

Alıp Bunu Düzenleyip Kullabilirsin Kardeşim..

bunu karsilama.tcl olarak scripts klasörüne kaydet eggdrop conf dosyasına

source scripts/karsilama.tcl

bunu ekle .. sonra telnet login olup sunucuya sokabilirsin

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Boho Tarzı	Zen	Ah Kadınlar	0	24 Aralık 2012 15:29
Rap Tarzı Küfür :]	Bahtiyar	Komik Loglar	3	23 Ocak 2011 19:19
Düşünce tarzı	Slipknot	Fıkra	1	07 Mayıs 2010 15:27
Beyonce Tarzı	Heidi	Ah Kadınlar	0	23 Ekim 2008 17:21

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.