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

Sayfa 1 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

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/)

- - Txt den okutma (https://www.ircforumlari.net/mirc-scripting-sorunlari/27451-txt-den-okutma.html)

bLaCkdeviL

05 Şubat 2007 23:25

Txt den okutma

Arkadaşlar söle bir kod var elimde

Kod:

on *:text:!sorgula*:?: { var %: $lines(kickler.txt)

  while (%: > 0) { if $read(kickler.txt,%:) iswm $strip($2-) {

 msg $nick $read(kickler.txt,$2)

   .dec %: 

  }

}

Ve farz edelimki bu kufur.txt dosyası su sekilde doLu içersi ;

Kod:

Erol hasanı kickledi

Bilal borayı kickledi

Erol kenanı kickledi

Kemal bernayı kickledi

Erol nihatı kickledi

Ben istiyorumki
!sorgula nick yazınca o nickin attıgı tüm kickleri tek tek yazsın ama bunu yapamadım bir türlü olmadı nerede hata var anlayamadım..Yardımcı olursanız cok sevinirim...

Brain

06 Şubat 2007 13:58

Yanıt: Txt den okutma

Test etmedim ama büyük ihtimalle calısması lazım

Kod:

on *:text:!sorgula*:?: {

  if !$2 { 

    .msg $nick Lütfen Sorgulanacak Nick Giriniz.. | halt

  }

  var %: 1 

  while %: <= $lines(kickler.txt) {

    if $2 $+ * iswm $read(kickler.txt,%:)  {

      .msg $nick $read(kickler.txt,%:)

    }

    elseif (%: == 1) { .msg $nick Sorgulanan $2 Nick'ne Kayıt Bulunamadı..  }

    inc %:

  }

}

bLaCkdeviL

06 Şubat 2007 14:01

Yanıt: Txt den okutma

Sıradanbiri hocam cok tŞk ederim ßir sorum daha olacak yine txt den okutma iLe ilgili...
Mesela bende iki tane döngü var %a %b diyelimki %a 10 | %b 20 ben txt den bu ikisi arasındaki satırları okutmasını istiyorum bunu nasıl yapabilirim yani txt den 10 ile 20. satır arasını okuyacak...Olabilir mi bu acaba ?

Brain

06 Şubat 2007 14:08

Yanıt: Txt den okutma

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Burdan bakıp yapabilirsin

bLaCkdeviL

06 Şubat 2007 14:17

Yanıt: Txt den okutma

HoCam ßeLki kızacan ama ben yine anlayamadım orada normal alt alta tüm satırları okutmayı anlatmıS ben iSe txt içinde mesela 1 den 50 ye kadar satır var %a değerim 40 %b değerim 50 yani hep son 10 u okutmak iStiyorum txt içinde bu txt de isterse 100 satır olsun ben 90 100 arasını okutmak istiom ama iki satır arasında okutma mantıgını çözemedim:(

el33t

06 Şubat 2007 14:48

Yanıt: Txt den okutma

İlk sorun için cevap:

Kod:

alias hmm {

  var %= = 1, %_ | while $read(kufur.txt,w,$1- $+ *,%=) {

    %_ = %_ $gettok($v1,2,32)

    %= = $calc($readn +1)

  }

  return %_

}

$hmm(erol)

İkinci sorun ise şu komutu kullanabilirsin:

Kod:

//window @a | /filter -fwr 10-20 dosyam.txt @a

Umarım işine yarar...

bLaCkdeviL

06 Şubat 2007 14:59

Yanıt: Txt den okutma

el33t hocam cok tŞk ederim peki bu kodu su şekilde değiştiremezmiyiz yapamadım da ben biraz oynadım üstünde ama herhangi bir kanala yada nickin özeline yazdırmayı basaramadım :(
Bu konudada yardımcı olursan cok sevinirim...el33t hocam

Kod:

alias sırala { //window @a | /filter -fwr %a $+ - $+ %b yardım.txt @a }

Kod bu sekilde yaptım %a ile %b arasındaki satırları @a penceresine yazıyor ama işte kanala yada özele yazdıramadım:(

bLaCkdeviL

07 Şubat 2007 11:52

Yanıt: Txt den okutma

Yada bunu @a penceresinden not alıpta bir kanala yazdıramazmıyız hocam ya:(

el33t

07 Şubat 2007 12:14

Yanıt: Txt den okutma

Kod:

alias sırala { var %a = 3, %b = 7 | while %a <= %b { echo $read(yardım.txt,%a) | inc %a } }

echo komutunu istediğin komutla değiştirebilirsin. @a penceresinden almak içinde loop yapmak gerekecekti, bu da 2. bir işlem olacaktı onun için tek bir looplu olanını yazdım.

Umarım işine yarar...

bLaCkdeviL

07 Şubat 2007 12:42

Yanıt: Txt den okutma

Hocam cok sağoL tŞk ederim ama ßen ßiraz daha ukalalık yapacam verdiğin haliyle calısıyor ama benim yapmak istediğim su koddaki gibi bu seferde calısmıyor :(

Kod:

on *:kick:#aşk: { inc %aa | inc %bb | write kickler.txt $nick $date $time(HH:nn) Tarihinde $knick 'i kickledi. } 

on *:text:*:#: {

  if ($1 == !kick10) { sırala $chan }

}

alias sırala { var %a = %aa, %b = %bb | while %a <= %b { msg $1 $read(kickler.txt,%a) | inc %a } }

Burada %aa döngüsünü -10 dan başlattım %bb ile aralarında her zaman 10 sayı fark var
bu sayede atılan son 10 kicki listelemek istiyorum ama su hatayı veriyor.
* /msg: Yetersiz veya eksik parametre (Satır 5, 33.ini)
Hocam cok fazla oLdum ama tekrar tekrar kusura bakma yapamadım ya:(

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

Sayfa 1 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster