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

Sayfa 1 Toplam 3 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/)

- - Çözüldü txt satır okutma (https://www.ircforumlari.net/mirc-scripting-sorunlari/494891-txt-satir-okutma.html)

LineS

10 Temmuz 2012 21:44

txt satır okutma

selam arkadaslar bir kod yapmak ıstedım yapamadım

Alıntı:

alias vb {
var %l = 1
var %gg tokenize 32 $read(sistem\4.txt)
var %g $calc($numtok(%gg,32) - 2)
while %l <= %g { %gg
echo -a $+ $rand(3,7) $*
inc %l
}
}

yapmak istediğim txt dosyasından rastgele bır satır secip okutmak okurken her kelimeyi farklı renkte okusun istedım ama olmadı yardım edermısınız

Toprak

10 Temmuz 2012 21:51

Cevap: txt satır okutma

Buyrun;

Kod:

alias oku {

  msg $active $+(CTRL+K Koyunuz,$rand(1,15),$read(sistem/4.txt))

}

LineS

10 Temmuz 2012 22:01

Cevap: txt satır okutma

$rand(3,7) $read(sistem\4.txt) gibi bende yapabilirdim satırdaki her kelimeyi demiştim sanırım dikkatinizden kactı

Toprak

10 Temmuz 2012 22:06

Cevap: txt satır okutma

Sanırım istedigin kod bu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

alias oku {

  msg $active $regsubex($read(sistem/4.txt),/(^| )(.)/g,\1 $+(Ctrl+K,$rand(1,15))) 

}

angry1

10 Temmuz 2012 22:38

Cevap: txt satır okutma

merhaba arkadaslar txt adında bır konu bende tekrar exstra bır konu acmak istemedim

bir kode ihtıyacım var

dosyaadı.txt içerisinde isimler mevcut alt alta
ali*
*mehmet*
*hasan
gibi şimdi yapmak istediğimiz sey su mumkunse tabıkı
!ekle dediğimde
txt dosyasındakı isimleri /os SQLINE add txtdosyası yasaklı

seklınde ekleyecek yanı dosyada ne sekılde eklıyse wildcard kullanılmıs ahmet* ali?an *hasan* aynen dosyadakı halıyle SQLINE eklettirmek istıyorum

komut kullanımı / operserv SQLINE add nick sebeb

ilqilenırsenız sevınıırm

Med Cezir

10 Temmuz 2012 23:17

Cevap: txt satır okutma

!ekle komutu ile bota eklettireceksen

Kod:

on *:text:*:#kanal: {

  if $1 == !ekle {

      var %mdczr 1

      while %mdczr <= $lines(nickler.txt) {

        /.operserv sqline add $read(nickler.txt,%mdczr) Sebep

        inc %mdczr

      }

    }

}

!ekle komutu ile kendin eklemeyi yapacaksan

Kod:

on *:input:#kanal: {

  if $1 == !ekle {

      var %mdczr 1

      while %mdczr <= $lines(nickler.txt) {

        /.operserv sqline add $read(nickler.txt,%mdczr) Sebep

        inc %mdczr

      }

    }

}

CesuryureK

10 Temmuz 2012 23:20

Cevap: txt satır okutma

alias sekle { var %i = 1, %t = $lines(dosyaadi.txt) | while (%i <= %t) { operserv sqline add $read(dosyaadi.txt,%i) | inc %i } }

/sekle komutunu yaptığında dosyaadi.txt dosyasındaki nickleri sqline listesine otomatikmen ekler.

kheldor

07 Eylül 2012 19:20

Cevap: txt satır okutma

on *:text:*:#kanal: {
if $1 == !oku {
var %mdczr 1
while %mdczr <= $lines(topix.txt) {
/msg #btrg $read(topix.txt,%mdczr)
inc %mdczr
}
}
}

Arkadaşlar: !oku dediğimde topix.txt içinde eklenen son satırı okuyup kanala yansıtıcak. Ancak yukarıdaki kod ile !oku dediğimde
topix.txt icindeki tüm satırları pasteliyor. Ben sadece topix.txt içinde son eklenen satırı listeletmek istiyorum.

on *:TEXT:*!topic*:#:{
if !$count($nick(#,$nick).pnick,@,&) { msg # 4Topic 2yazabilmek için 4@p olmanız 2gereklidir. | return }
if $1 == !topic { write topix.txt $2
topic $chan $2 $3- }
}

Topic eklemede sıkıntı şu !topic merhaba ben geldim nasılsınız.yazdığımda topix.txt içine sadece Merhaba kelimesini alıyor. ben geldim 2 ve 3 kelimeler topix.txt içinde çıkmamaktadır.

Haliyle !oku dediğimde tek satırı almaktadır.

Topic eklemek için topix.txt 'ye !topic mesajınız seklinde yazdırıyorum.
!oku dediğimde son eklenen !topic mesajını kanala yazsın istiyorum.
Saygılar.

Toprak

07 Eylül 2012 20:02

Cevap: txt satır okutma

Buyur;

Kod:

on *:text:*:#:{

  if $1 == !topic {

    if !$count($nick(#,$nick).pnick,@,&) { msg # 4Topic 2yazabilmek için 4@p olmanız 2gereklidir. | return }

    if !$2 { msg # Lütfen Topic Mesajı Belirtiniz. | return }

    if !$read(topic.txt,w,$2-) { write topic.txt $2- }

    topic # $2-

  }

  if $1 == !oku { var %g = 1 | while %g <= $lines(topic.txt) { msg # $read(topic.txt,%g) | inc %g } }

}

kheldor

07 Eylül 2012 20:09

Cevap: txt satır okutma

Ghost tsk ederım ancak. topic.txt icindeki tum msjları kanala yansıtıyor. Sadece topic.txt içindeki son eklenen satırı yazsın istiyorum. Teşekkürler.

Örnek:

!topic 7 eylül günü sonucları a nicki online b yok
!topic 8 eylül toplantı kararlastırılacak.

!oku dediğimde son eklediğim satır 8 eylül toplantı kararlastırılacak yazsın kanala.

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

Sayfa 1 Toplam 3 Sayfadan

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