IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

Kod:
# TCL Scripts 2o15 - Sohbettur.Com 

 

proc join_greet {nick uhost handle channel } { 

 

putserv "PRIVMSG $nick :2Merhaba 4 $nick "

 

putserv "PRIVMSG $nick :2SUNUCUADI.COM 2ailesine 2hoşgeldiniz."

 

putserv "PRIVMSG $nick :2Sunucumuzda 2kurallarina lütfen 2uyunuz."

 

putserv "PRIVMSG $nick :2Sunucumuzda 2yardim 2kanalımız 4#help 2kanalıdir."

 

 

 

putserv "PRIVMSG $nick :2Sunucumuzda 2Oyun 2kanalımız 4#Oyun 2kanalıdir."

 

putserv "PRIVMSG $nick :2Sunucumuzda 2Radyo 2kanalımız 4#Radyo 2kanalıdir."

 

putserv "PRIVMSG $nick :2Sunucumuzda 2Sohbet 2kanalımız 4#Sohbet 2 kanallaridir."

 

putserv "PRIVMSG $nick :2Winampı Olmayanlar bizleri 4wWw.SUNUCUADI.COM 2sitesi uzerinden dinleyebilirler."

 

 

putserv "PRIVMSG $nick :2Radyo RADYOADIFM! yayınlarımız başlamıştır bütün dostlarımızı 9,1 https://IPADRES:PORT/listen.pls " 

 

 

 

putserv "PRIVMSG $nick :2Adresinden radyomuza bekliyoruz ii eğlenceler dileriz ."

 

putserv "PRIVMSG $nick :2İsteklerinizi 4#Radyo 2kanalindan yapabilirsiniz..."

 

 

putserv "PRIVMSG $nick :2Diğer bilgilerimiz için 4/motd 2yazabilirsiniz."

 

 

}

 

bind join - * join_greet