[Comanche]

slmlar..


alias dify {
if $isid { var %dify $1 | $regsubex($1,/(\S+)/g,$iif(($count(\1,h) && $count(\1,s) && $count(\1,n)),write b.txt %dify)) }
else filter -fk a.txt dify *
}


difüzyon arkadasımızın yazdığı bu filtreleme kodu mrci kilitiliyor ve kasıyor. nasıl düzeltilebilir.?
yardımcı olursanız sevinirim.

[fatal]

Comanche Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

slmlar.. alias dify { if $isid { var %dify $1 | $regsubex($1,/(\S+)/g,$iif(($count(\1,h) && $count(\1,s) && $count(\1,n)),write b.txt %dify)) } else filter -fk a.txt dify * } difüzyon arkadasımızın yazdığı bu filtreleme kodu mrci kilitiliyor ve kasıyor. nasıl düzeltilebilir.? yardımcı olursanız sevinirim.

Dener misin.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias dify {
  if $isid {
    var %dify $1
    var %hCount = $count(%dify, h)
    var %sCount = $count(%dify, s)
    var %nCount = $count(%dify, n)
    if (%hCount && %sCount && %nCount) {
      write b.txt %dify
    }
  }
  else {
    filter -fk a.txt dify *
  }
}

[Comanche]

/set: line too long (line 5, script168.ini) bu hatayı veriyor

[fatal]

Comanche Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

/set: line too long (line 5, script168.ini) bu hatayı veriyor

ChatGPT şöyle diyor.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias dify {
  if $isid {
    var %dify $1
    ; Eğer %dify çok uzunsa, işlem yapma
    if ($len(%dify) > 1000) { ; 1000 uzunluğundan büyükse, işlem yapma
      echo -a "Error: %dify is too long."
      return
    }
    var %hCount = $count(%dify, h)
    var %sCount = $count(%dify, s)
    var %nCount = $count(%dify, n)
    if (%hCount && %sCount && %nCount) {
      ; Eğer %dify büyükse, parçalara ayırıp yazma işlemi yapalım
      ; Satır uzunluğu kontrolü (örnek olarak 1000 karakterden uzun veriyi satırlara bölelim)
      var %lineLength = 1000
      var %startPos = 1
      while (%startPos <= $len(%dify)) {
        var %part = $mid(%dify, %startPos, %lineLength)
        write b.txt %part
        inc %startPos %lineLength
      }
    }
  }
  else {
    filter -fk a.txt dify *
  }
}

[ZaLiM1979]

fatal Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ChatGPT şöyle diyor. Kod:   Kodu kopyalamak için üzerine çift tıklayın! alias dify { if $isid { var %dify $1 ; Eğer %dify çok uzunsa, işlem yapma if ($len(%dify) > 1000) { ; 1000 uzunluğundan büyükse, işlem yapma echo -a "Error: %dify is too long." return } var %hCount = $count(%dify, h) var %sCount = $count(%dify, s) var %nCount = $count(%dify, n) if (%hCount && %sCount && %nCount) { ; Eğer %dify büyükse, parçalara ayırıp yazma işlemi yapalım ; Satır uzunluğu kontrolü (örnek olarak 1000 karakterden uzun veriyi satırlara bölelim) var %lineLength = 1000 var %startPos = 1 while (%startPos <= $len(%dify)) { var %part = $mid(%dify, %startPos, %lineLength) write b.txt %part inc %startPos %lineLength } } } else { filter -fk a.txt dify * } }

Bence ChatGPT'ye güvenme mirc konusunda.

[Comanche]

Bu koddaki amacım mesela içinde c k l harflerinin bir arada geçtiği tüm kelimeleri listelemekti.
Fakat içinde istenilen harflerin olmadığı kelimeleride listeliyor..

[XcLusive]

Comanche Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu koddaki amacım mesela içinde c k l harflerinin bir arada geçtiği tüm kelimeleri listelemekti. Fakat içinde istenilen harflerin olmadığı kelimeleride listeliyor..

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


konuyu inceleyebilirsin,
Cenk daha öncesinde faydalı olacağını düşünerek anlatmış.

[Gurkan]

Comanche Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu koddaki amacım mesela içinde c k l harflerinin bir arada geçtiği tüm kelimeleri listelemekti. Fakat içinde istenilen harflerin olmadığı kelimeleride listeliyor..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias dify {
  if ($1) {
    var %letters $1, %line 1
    while ($read(a.txt, %line)) {
      var %word $v1, %found 1, %i 1
      while (%i <= $len(%letters)) {
        if (!$pos(%word, $mid(%letters, %i, 1))) {
          %found = 0
          break
        }
        inc %i
      }
      if (%found) write b.txt %word
      inc %line
    }
  }
  else echo -a Kullanım: /dify harfler
}

alias liste {
  if ($1) {
    echo -a $1 dosyasındaki kelimeler:
    var %line 1
    while ($read($1, %line)) {
      echo -a $v1
      inc %line
    }
  }
  else echo -a Kullanım: /liste a.txt - /liste.b.txt
}

; Cenk'in kodunun modifiye hali , yani şu şekilde "/dify harfler" a.txt dosyasında aramak istediğin harfleri yazıyorsun. /dify hsn gibi yada /dify ckl gibi
; /liste a.txt ve liste.b.txt dosyasında bulunan kelimeleri listeleyebiliyorsun.

[Gurkan]

Comanche Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

slmlar.. alias dify { if $isid { var %dify $1 | $regsubex($1,/(\S+)/g,$iif(($count(\1,h) && $count(\1,s) && $count(\1,n)),write b.txt %dify)) } else filter -fk a.txt dify * } difüzyon arkadasımızın yazdığı bu filtreleme kodu mrci kilitiliyor ve kasıyor. nasıl düzeltilebilir.? yardımcı olursanız sevinirim.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias dify { if ($isid) { var %dify $1 | $regsubex($1,/(\S+)/g,$iif(($count(\1,c) && $count(\1,k) && $count(\1,l)),write b.txt %dify)) } else { filter -f a.txt b.txt * c * k * l * } }

Böyle dener misin?

[Comanche]

herhangi bir listeme yapmıyor.