Yanıt: Txt Dosyasından Yazıyı Kanal Yansıtmak Ama Karışık Sanırım Biraz :)
çok teşekkürler arkadaşlar çalıştı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:text:!msnbasvuru:#opers: {
.msg $chan --Msn Başvuru Listesi--
var %r = $findfile($mircdir\read,*.txt,0), %s = 1
while %s <= %r {
.msg $chan $findfile($mircdir\read,*.txt,%s)
inc %s
}
.msg $chan Toplam %r adet dosya bulundu..
} on *:text:!msnoku*:#opers: {
var %k = $+(read,\,$2)
if ($read(%k) == $null) { .msg $chan dosya adını yanlış yazdınız ya da öyle bir dosya kayıtlı değil, mevcut dosyaları görmek için: !msnbasvuru yazınız. | halt }
var %~ = $lines(%k), %´ = 1
while %´ <= %~ {
.msg $chan $read(%k,%´ Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
inc %´
}
} komut bu inşallah kısa sürede ne için yaptığımı yayınlayacam burda anlamışsınızdır ama ben yinede yayınlayacam Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|