CR Fjoin TCL

Mesaj Önizleme

Konuyu Değerlendir

0 Oy - 0 Ortalama
1
2
3
4
5

Normal Mod | Çizgisel Mod

CR Fjoin TCL

02-15-2008, 03:56 AM

Mesaj: #1

BLaCK_and_WHiTe Çevrimdışı

Çevrimdışı

B&W

Mesajlar: 856
Katılım: Jan 2008
Karma Puanı: 0

Teşekkür etiği: 12
5 konu için 7`defa teşekkür almış

CR Fjoin TCL

Kod:

bind raw - NOTICE baglanti 

proc baglanti {from keyword text} { 

if {[string match -nocase "*client connecting*" $text]} { 

set nick [lindex [split $text] 9]

utimer 1[list putserv "raw close" ]

utimer 1[list putserv "fjoin $nick #sohbet" ]

utimer 1[list putserv "fjoin $nick #oyun" ]

utimer 1[list putserv "fjoin $nick #radyo" ]

}

}

Japon Atasözü derki; "Pirincin içindeki siyah taşlardan korkma beyaz olanlardan kork."

Kullanıcının websitesini ziyaret et

Bu kullanıcının gönderdiği tüm mesajları bul

Bu mesajı bir cevapta alıntı yap

« Önceki Konu | Sonraki Konu »

Mesaj Önizleme

Forum izinleri

yeni konu açamazssın
cevap yazamazssın
eklenti yüklemesi yapamazssın

HTML kodu kapalı.
BBCODE kodu açık.
smilie`ler açık.
[img] kodu açık.

Bize Ulaşın | irchelper.net | En Üste Dön | İçeriğe Dön | Arşiv | RSS Beslemesi