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

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

- - Temiz kodu (https://www.ircforumlari.net/mirc-scripting-sorunlari/485924-temiz-kodu.html)

Cevap: Temiz kodu

Alıntı:

Bosson Nickli Üyeden Alıntı (Mesaj 1041132930)

on 1:text:temiz*:#zurnaop:{ msg # Emeginize saglık tesekkürler. }
on 1:text:tmz*:#zurnaop:{ msg # Emeginize saglık tesekkürler. }
on 1:text:temız*:#zurnaop:{ msg # Emeginize saglık tesekkürler. }

bottaki bu kodu oplar için ekledik fakat biz temiz raporu veren herkezin listesini almak istiyoruz

mesela Bosson nicki toplam 10 kere temizle raporu vermiştir.
gibi raporları txt dosyasına kaydetmesini ve zurnahelp kanalında !temizlelist dediğimizde bu listeyi bize göstermesini istiyoruz.Yardımcı olursanız sevinirim.

Alıntı:

Bosson Nickli Üyeden Alıntı (Mesaj 1041154012)

verdiğiniz kodda 2 şer atlıyor sayıları

kodu şuan deniyorum bende teker teker sayı ları arttırıyor ki ikişer artırma ihtimali yok inc %veri mircte her kullanısta bir sayı arttır demektir

bende inc kullandım

Alıntı:

illusi0n Nickli Üyeden Alıntı (Mesaj 1041153699)

Verdiğin komut gayet güzel şekilde çalıyor fakat sıfırlamak istediğimizde nasıl yapıcaz ? Txt dosyasını içini sildiğimde bile hafızada tutuyor. Sıfırlamak için ne yapabiliriz ?

verdiğimiz kodu isteğe göredir durdurmak istiyorsanız koda başına

#dur on

kodu buraya eklersiniz

#dur end

menu * {
Temizkod
.aç:enable #dur
.kapat:disable #dur
;sıfırlamak için ise
.sil:remove tmz.txt
}
yazmanız yeterli

Alıntı:

illusi0n Nickli Üyeden Alıntı (Mesaj 1041154027)

if $nick isop # { yerine on @*:text:*:#: {
if $nick isreg $chan { olması gerek, ayrıca her op için ayrı kayıt tutmuyor. listelediğimde her op için aynı kayıdı veriyor.

isop # ile on @*:text: arasındaki fark nedir isreg diyorsun birde kısaca özetleyeyim yazdığını

@*:text: herhangi bir kanalda op ise yazıyazan demişsin buraya kadar
isreg kısmında ise hiçbir yetkiye sahip değilse kod çalışmaya devam etsin demişssin isreg demek yetkisis user demek cok mantıksız

her op için ayrı kayıt tutmuyor demişssin bukanıya nasıl vardın

%tnckhalis 34
%tnckburak 58
%tnckNaZo 1
%tnckCaN 33

BEN BUŞEKİLDE AYARLADIM ve benim mircimde buşekilde sonuc veriyor veriables kısmında muhtemelen en altta olmalı

ya bende bir sorun var ya sizlerde

Cevap: Temiz kodu

Alıntı:

muratt_aziz Nickli Üyeden Alıntı (Mesaj 1041154324)

kodu şuan deniyorum bende teker teker sayı ları arttırıyor ki ikişer artırma ihtimali yok inc %veri mircte her kullanısta bir sayı arttır demektir

bende inc kullandım

verdiğimiz kodu isteğe göredir durdurmak istiyorsanız koda başına

#dur on

kodu buraya eklersiniz

#dur end

menu * {
Temizkod
.aç:enable #dur
.kapat:disable #dur
;sıfırlamak için ise
.sil:remove tmz.txt
}
yazmanız yeterli

isop # ile on @*:text: arasındaki fark nedir isreg diyorsun birde kısaca özetleyeyim yazdığını

@*:text: herhangi bir kanalda op ise yazıyazan demişsin buraya kadar
isreg kısmında ise hiçbir yetkiye sahip değilse kod çalışmaya devam etsin demişssin isreg demek yetkisis user demek cok mantıksız

her op için ayrı kayıt tutmuyor demişssin bukanıya nasıl vardın

%tnckhalis 34
%tnckburak 58
%tnckNaZo 1
%tnckCaN 33

BEN BUŞEKİLDE AYARLADIM ve benim mircimde buşekilde sonuc veriyor veriables kısmında muhtemelen en altta olmalı

ya bende bir sorun var ya sizlerde

isreg dememdeki amaç op kanalımda bulunan kimsede prefix yok onlar temiz dediklerinde kayıt altına alabilmek için isreg olarak belirttim. Her op için ayrı kayıt tutmuyor dememdeki sebeb ise aşağıda göreceğin gibi Paradox nicki 5 kere temiz dedi fakat Sky nicki 3 kere demiş olmasına rağman ikisinide aynı gösteriyor.

Toplam Paradox 5 kere temizle raporu vermiştir.
Toplam Sky 5 kere temizle raporu vermiştir.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Temizlemeyi ekledim ve uyguladım çalışmasında bir sıkıntı yok fakat temizlemiş görünsede kaldığı yerden devam ediyor. XX nicki 5 rapor verdiyse temizlediğimde 0 olması gerekirken hala 5 kalıyor.

* Removed 'D:\xx\xx\Zero\Yeni Klasör\tmz.txt'
-
Toplam Paradox 5 kere temizle raporu vermiştir.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Temiz kodu

Alıntı:

Paint Nickli Üyeden Alıntı (Mesaj 1041154220)

Kod:

on *:text:t*:#zurnaop:{

  if $regex(temiz tmz temız,$1) {

    inc $+(%,tmz,:,$nick)

    msg # Emeğinize sağlık, teşekkürler.

  }

  if temizliste == $1 { 

    if !$var(%tmz*,0) { msg # Hiç temiz raporu verilmedi. | halt }

    var %t 0

    var %a 1

    while %a <= $var(%tmz*,0) {

      msg # $gettok($var(%tmz*,%a),2,$asc(:)) nicki $var(%tmz*,%a).value temiz raporu vermiştir.

      inc %t $var(%tmz*,%a).value

      inc %a

    }

    msg # -

    msg # Toplam %t kere temiz raporu verilmiştir.

  }

  if $1 == temizsil { unset %tmz* | msg # Temiz listesi temizlenmiştir. }

}

Komutlar:

tmz, temiz, temız: Temiz kaydını alır.
temizliste: Temiz raporu verenleri görüntüler.
temizsil: Temiz rapor listesini temizler.

Bütün komutlar #zurnaop kanalında geçerlidir.

Dostum remoteye yükledim fakat çalışmadı. Herhangi bir hatada vermiyor eksik birşeyler mi var acaba ?

Cevap: Temiz kodu

arkadasım

Toplam NaZo 15 kere temizle raporu vermiştir.
Toplam CaN 30 kere temizle raporu vermiştir.

/tlist yapınca aldığım cvp üstte

Bende çalışıyor size kolay gelsin

Cevap: Temiz kodu

Alıntı:

illusi0n Nickli Üyeden Alıntı (Mesaj 1041154463)

Dostum remoteye yükledim fakat çalışmadı. Herhangi bir hatada vermiyor eksik birşeyler mi var acaba ?

Eksik birşey yok. Komutların başında ünlem falan kullanma olduğu gibi yaz örneğin direk temiz yaz kanala bir de yüklediğin mIRC te kullanma.

Cevap: Temiz kodu

istediğimiz cevabı alamadık biz zurnaop da temiz raporu verildiğinde kayıt olmasını zurnahelp kanalında !temizlelist dediğimizde insanları görmeyi istiyorduk bot tarafından şu nick badnick taraması etmiştir diye

Cevap: Temiz kodu

hala bir cevap yok sanırım

Cevap: Temiz kodu

Alıntı:

Bosson Nickli Üyeden Alıntı (Mesaj 1041132930)

Daha önce eklemiş olduğunuz(yukarıdaki) 3 satırı siliniz,aşağıdaki kodda birleştirdim.

Kod:

on *:text:*:#:{

  if $chan == #zurnaop && $regex($1,/^t(e?)m(i|ı)z/i) {

    msg #zurnaop Emeğinize sağlık teşekkürler.

    if !$read(temizle.txt,w,$+(*,$nick,*)) { write temizle.txt $nick 1 }

    else { 

      var %dify $readn 

      var %yeah = $calc($token($read(temizle.txt,%dify),2,32) +1) 

      write $+(-l,%dify) temizle.txt $nick %yeah 

    }

  }

  if $chan == #zurnahelp && $1 == !temizlelist { 

    msg #zurnahelp Temizle komutu kullanım listesi:

    play #zurnahelp temizle.txt 1000

  }

}

on *:playend:if $filename == temizle.txt { msg #zurnahelp Liste sonu. }

Cevap: Temiz kodu

Alıntı:

Difuzyon Nickli Üyeden Alıntı (Mesaj 1041170564)

Daha önce eklemiş olduğunuz(yukarıdaki) 3 satırı siliniz,aşağıdaki kodda birleştirdim.

Kod:

on *:text:*:#:{

  if $chan == #zurnaop && $regex($1,/^t(e?)m(i|ı)z/i) {

    msg #zurnaop Emeğinize sağlık teşekkürler.

    if !$read(temizle.txt,w,$+(*,$nick,*)) { write temizle.txt $nick 1 }

    else { 

      var %dify $readn 

      var %yeah = $calc($token($read(temizle.txt,%dify),2,32) +1) 

      write $+(-l,%dify) temizle.txt $nick %yeah 

    }

  }

  if $chan == #zurnahelp && $1 == !temizlelist { 

    msg #zurnahelp Temizle komutu kullanım listesi:

    play #zurnahelp temizle.txt 1000

  }

}

on *:playend:if $filename == temizle.txt { msg #zurnahelp Liste sonu. }

Hallettik dostum çok saol ama biraz geç oldu