PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
### Dosyanın Bulunduğu Yer###
set dcm "scripts/dosya.txt"
proc join_greet {nick uhost handle channel} {
set file [open $dcm r]
set listfile [split [subst -nocommands [read $file]] "\n"]
foreach i $listfile {
putserv "privmsg $nick $i"
}
close $file
}
bind join - * join_greet
Olarak Denersen, Olucaktır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.