IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Çözüldü kelimeleri harf saysına göre sıralama

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

- - Çözüldü kelimeleri harf saysına göre sıralama (https://www.ircforumlari.net/mirc-scripting-sorunlari/1057087-kelimeleri-harf-saysina-gore-siralama.html)

kelimeleri harf saysına göre sıralama

Slmlar..

a. txt listesinde bulunan kelimeleri harf sayısına göre nasıl sıralayabilirim ? (büyükten küçüğe doğru )

Cevap: kelimeleri harf saysına göre sıralama

Alıntı:

Comanche Nickli Üyeden Alıntı (Mesaj 1042997502)

Slmlar..

a. txt listesinde bulunan kelimeleri harf sayısına göre nasıl sıralayabilirim ? (büyükten küçüğe doğru )

Selam kod elinde varsa paylaşırsan daha çabuk yardımcı oluruz yok ise şunu deneyin:

Kod:

alias kelime {

  var %file = a.txt

  if (!$exists(%file)) {

    echo -a Hata: $qt(%file) dosyası bulunamadı!

    return

  }
 
 

  var %words = $null, %line = 1

  while ($read(%file, n, %line)) {

    var %current_line = $v1

    var %words = %words %current_line

    inc %line

  }
 

  var %i = 1, %kelime_words = $null

  while ($gettok(%words, %i, 32) != $null) {

    var %word = $v1

    var %len = $len(%word)
 

    var %kelime_words = %kelime_words $+ %len $+ : $+ %word $chr(44)  

    inc %i

  }
 

  var %kelime = $sorttok(%kelime_words, 44, 33) 
 

  var %final_result = $null, %j = 1

  while ($gettok(%sorted, %j, 44) != $null) {

    var %entry = $v1

    var %word = $mid(%entry, $calc($pos(%entry, :, 1) + 1), $len(%entry))

    var %final_result = %final_result %word

    inc %j

  }
 

  echo -a Kelimeler (Büyükten Küçüğe): %final_result

  ; write kelime.txt %final_result 

}

Kullanım:
mIRC'de /kelime yazın.

Kod, a.txt dosyasındaki tüm kelimeleri okur.

Kelimeleri harf sayısına göre (büyükten küçüğe) sıralar.

Sonucu mIRC penceresinde gösterir (veya kelime.txt dosyasına yazabilirsiniz).

Cevap: kelimeleri harf saysına göre sıralama

Alıntı:

Comanche Nickli Üyeden Alıntı (Mesaj 1042997502)

Slmlar..

a. txt listesinde bulunan kelimeleri harf sayısına göre nasıl sıralayabilirim ? (büyükten küçüğe doğru )

Merhaba,
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] in paylaştığı koda bir alternatif de benden.

Kullanımı: /sıra

Örnek x.txt içeriği:

Kod:

adana

mersin

istanbul

antalya

gaziantep

muş

rize

Alt + R (Remote) bölümüne eklenecek kod:

Kod:

alias sıra {

  var %x = 1

  while (%x <= $lines(x.txt)) {

    var %y $addtok(%y, $len($read(x.txt,%x)) $+ $chr(33) $+ $readn, 32)

    inc %x

  }

  var %ext = $sorttok($regsubex(x,%y,/(\d+)!(\d+)/gU,\1!\2), 32, rn)

  var %c = 1, %d = $calc($regml(x,0) / 2)

  while (%c <= %d) {

    echo -a $read(x.txt, $token($token(%ext, %c, 32), 2, 33))

    inc %c

  }

}

Sonuç:

Kod:

gaziantep

istanbul

antalya

mersin

adana

rize

muş

Eklediğin içeriğe göre hata verme olasılığı olabilir.

Takıldığında incelemen gereken konular
1- [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
2- https://en.wikichip.org/wiki/mirc/identifiers/$read
3- https://en.wikichip.org/wiki/mirc/identifiers/$sorttok

Pek çok yöntem ile yapabilirsin.

Kolay gelsin.
İyi bayramlar.

Cevap: kelimeleri harf saysına göre sıralama

tşkler ustalarım...