Tekil Mesaj gösterimi
Alt 15 Eylül 2007, 19:55   #3
Çevrimdışı
BuCaLI
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: tcl Coderlerden yardim istiyorum




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
## Okutulacak dosya
set db "scripts/sohbet.txt"
## Dokunma.!
set wait "1"
## Başladıktan sonra kanala kaç saniye arayla yazacak?
set gecikme_zamani "15"
## Burdan sonrasına dokunma
bind pub - !sohbet sohbet:basla
proc sohbet
:basla n u h c a } {
global 
db wait gecikme_zamani
set file 
[open $db r]
set listfile [split [subst -nocommands [read $file]] "\n"]
 foreach 
i $listfile {
 
set wait [expr $wait $gecikme_zamani]
 
utimer $wait[list putserv "privmsg $c $i"]
 }
close $file
}
putlog "Dosya yüklendi.. Coded By BuCaLI" 

utimer $wait[list putserv "privmsg $c $i"] satırında $wait ile [ arasında bir boşluk var buraya yapıştırınca o boşluk yok oluyor yani o satır şöyle olucak;

utimer $wait[list putserv "privmsg $c $i"]

aksi taktirde çalışmayabilir.

namaz için olanınıda bundan yararlanarak kendin editle
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Konu BuCaLI tarafından (15 Eylül 2007 Saat 20:05 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver