IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - dosyadan okutma

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - dosyadan okutma - sorun. (https://www.ircforumlari.net/mirc-scripting-sorunlari/123973-dosyadan-okutma-sorun.html)

lacremel

16 Temmuz 2008 12:01

dosyadan okutma - sorun.

selam kolay gelsin arkadaslar

if $1 == !basla {
var %i 1
while %i <= $lines(kanallar.txt) {
.join $read(kanallar.txt,%i)
.msg #shy kanallara giriş yapildi.
inc %i
}
}
}

botumda ekli olan bir code ;

!basla dedigim zaman kanallar.txt adlı dosyanın okuyor. Kanallara giriyor yani

.msg #shy kanallara giriş yapildi

yalnız yukarda belirttiqim metni dosyanın icinde kactane kanal varsa ise okadar mesaj gonderiyor.

<Shy> Kanallara giriş yapildi
<Shy> Kanallara giriş yapildi
<Shy> Kanallara giriş yapildi
<Shy> Kanallara giriş yapildi
<Shy> Kanallara giriş yapildi
<Shy> Kanallara giriş yapildi
<Shy> Kanallara giriş yapildi

dosyanın icinde 7 kanal ekli okarda mesaj atıyor.

Birde ;

if $1 == !listkanal {
msg #Shy Giriş yapilan kanallar listeleniyor.
msg #Shy
msg #Shy $read(kanallar.txt)
}

kanallara bakmak istediqim zaman dosyanın en sonundaki kanalı listeliyor sadece.

Simdiden tesekkürler arkadaslar yardımlarınızı bekliyorum.

TeaM	16 Temmuz 2008 14:49

Cevap: dosyadan okutma - sorun.

1. sorununun cevabı;

Kod:

on *:text:*:#:{

  if $1 == !basla { 

    var %i = 1

    while $read(kanallar.txt,%i) {

      join $read(kanallar.txt,%i) | inc %i

      msg #shy kanallara giriş yapildi. | .halt

    }

  }

}

2. sorunun cevabı, birazda ekleme yaptım senin açından iyi olması için;

Kod:

 

on *:text:*:#:{

  if $1 == !listkanal {

    msg $chan Toplam $+(,$lines(kanallar.txt),) kanal bulunmaktadır.

    var %i 1

    while %i <= $lines(kanallar.txt) {

      msg $chan %i - $read(kanallar.txt,%i)

      inc %i

    }

  }

}

1.;

(14:46:49·16/07/2008) <@TeaM> !basla
(14:46:50·16/07/2008) <@Bot> kanallara giriş yapildi.

2.;

(14:47:13·16/07/2008) <@TeaM> !listkanal
(14:47:14·16/07/2008) <@Guest87261> Toplam 6 kanal bulunmaktadır.
(14:47:14·16/07/2008) <@Guest87261> 1 - #deneme1
(14:47:14·16/07/2008) <@Guest87261> 2 - #deneme2
(14:47:14·16/07/2008) <@Guest87261> 3 - #deneme3
(14:47:14·16/07/2008) <@Guest87261> 4 - #deneme4
(14:47:14·16/07/2008) <@Guest87261> 5 - #deneme5
(14:47:14·16/07/2008) <@Guest87261> 6 - #deneme6

lacremel

16 Temmuz 2008 16:13

Cevap: dosyadan okutma - sorun.

!basla yaptıqım zaman listenin en basındaki kanala giriyor.

TeaM	16 Temmuz 2008 21:55

Cevap: dosyadan okutma - sorun.

Kod:

on *:text:*:#:{

  if $1 == !basla {

    var %i 1

    msg $chan Kanallara giriliyor.

    while %i <= $lines(kanallar.txt) {

      join $read(kanallar.txt,%i)

      inc %i

    }

  }

}

Denedim, sorunsuz çalışmakta.

Umarım işine yarar.

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 10:00.