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

- IRCd Botlar (https://www.ircforumlari.net/ircd-botlar/)

- - NoMecy Hatası (https://www.ircforumlari.net/ircd-botlar/717262-nomecy-hatasi.html)

<ChanServ> Cenk nick'i #Sohbet Kanalı ACCListesinden NoMercy Tarafından Silinmiştir.
<ChanServ> Cenk nick'i #Ops Kanalı ACCListesinden NoMercy Tarafından Silinmiştir.
<ChanServ> Cenk nick'i #vip Kanalı ACCListesinden NoMercy Tarafından Silinmiştir.
<ChanServ> Cenk nick'i #Sohbet Kanalı ACCListesinden NoMercy Tarafından Silinmiştir.
<ChanServ> Serkan nick'i #Ops Kanalı ACCListesinden NoMercy Tarafından Silinmiştir.
<ChanServ> Serkan nick'i #chat Kanalı ACCListesinden NoMercy Tarafından Silinmiştir.
<ChanServ> Serkan nick'i #vip Kanalı ACCListesinden NoMercy Tarafından Silinmiştir.

op silmeyi nasıl devre dışı bıraka bilirim? NoMecy kendiliğinden ekli olan opu siliyor?

Cevap: NoMecy Hatası

hangi nomercy bu acaba kodunu paylaşırsan yardım etmek isteyen olur.

Cevap: NoMecy Hatası

NoMercy v9 Discovery eklenen op botun kendisi siliyor onu nasıl iptal edebilirim?

Cevap: NoMecy Hatası

Kod:

  if %chan == #staff {

        deopall %nick

      }

bu satır botun kendisinde bunu bul sil staff kanalından çıkanları siliyor
silme aliası alias dosyasında

Kod:

alias deopall {

  sw NoMercy os raw2 svskill $1 :Ayrildi

  var %d 1

  while %d <= $lines(txt/Globl.txt) {

    sw NoMercy cs access $read(txt/Globl.txt,%d) del $1

    sw NoMercy SAMODE $read(txt/Globl.txt,%d) -qaohv $1 $1 $1 $1 $1

    inc %d

  }

  var %e 1

  while %e <= $lines(txt/hostchan.txt) {

    sw NoMercy cs access $read(txt/hostchan.txt,%e) del $1

    sw NoMercy cs access #globalops del $1

    sw NoMercy cs access #unban del $1

    sw NoMercy SAMODE $read(txt/hostchan.txt,%e) -qaohv $1 $1 $1 $1 $1

    inc %e

  }

}

Cevap: NoMecy Hatası

Kod:

alias deopall {

  sw NoMercy os raw2 svskill $1 :Ayrildi

  var %d 1

  while %d <= $lines(txt/Globl.txt) {

    sw NoMercy cs access $read(txt/Globl.txt,%d) del $1

    sw NoMercy SAMODE $read(txt/Globl.txt,%d) -qaohv $1 $1 $1 $1 $1

    inc %d

  }

  var %e 1

  while %e <= $lines(txt/hostchan.txt) {

    sw NoMercy cs access $read(txt/hostchan.txt,%e) del $1

    sw NoMercy cs access #globalops del $1

    sw NoMercy cs access #unban del $1

    sw NoMercy SAMODE $read(txt/hostchan.txt,%e) -qaohv $1 $1 $1 $1 $1

    inc %e

  }

}

[/QUOTE]

Sadece bu bölümü silecem değilmi yanlıslık olmasın?

Cevap: NoMecy Hatası

deopall %nick
bu satırı
;deopall %nick

böyle değiştir kimseyi silmez

Cevap: NoMecy Hatası

O satırı kapatırsan , .deopall Nick Dediğinde deaktif olur ; Alt Satır 3. paragrafta ki , staffdeop 'u deaktif et.
Ayrıyetten ELinde ki demo versiyon , Orjinali sadece bende mevcud , Sıradan bir nomercy sadece.@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: NoMecy Hatası

emeğine sağlık ama be şu kısmı anlamadım kardeş aydınlatırmısın beni

Kod:

  if %komut == !bilgi {

            sw $sockname PRIVMSG $botfnick($1) : $_logo - 6•2 Sock(s) Bilgiler, 6• 

            sw $sockname PRIVMSG $botfnick($1) : $+ $qlogo modüllerden oluşan, hiçbir şekilde eşi bulunmayan, socket mantığı ile, 6KivanC2 tarafından hazırlanmış ( Edit\Yenilik) koruma modülüdür.

            sw $sockname PRIVMSG $botfnick($1) : $qlogo Kodlama Tarihi : 2014 - * Ylın Getirdiği Son Sistem 6/* Modül (s) */2  Dizayn Edilmiş Ve Siz Değerli Kullanıcılarımız İçin Hizmete Girmiştir.

            sw $sockname PRIVMSG $botfnick($1) : $_logo - 6•2 /* Kanal Modül(s) / 6• 

            sw $sockname PRIVMSG $botfnick($1) : 6•2 Badnick : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 Küfür : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 Newnick : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 RawNick : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 OtoJoin : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 SNick : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) :  

            sw $sockname PRIVMSG $botfnick($1) : $_logo - 6•2 /* Sunucu Modül(s) / 6• 

            sw $sockname PRIVMSG $botfnick($1) : 6•2 IWS : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 RDS : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 WSQ : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 MERC : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 İnqLLQ : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 TNick : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) :  

            sw $sockname PRIVMSG $botfnick($1) : $_logo - 6•2 /* Güvenlik Modül(s) / 6• 

            sw $sockname PRIVMSG $botfnick($1) : 6•2 SPAM : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 Security : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 Tor : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 Botnet : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2 SC/Sock : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : 6•2IWS : $rand(55555,99999) KB

            sw $sockname PRIVMSG $botfnick($1) : -

çözemedim bu kısmı

Cevap: NoMecy Hatası

Kod:

var %komut $gettok($right($strip($4-),-1),1,32)

if (%komut != !komutlar && %komut == !Greet || %komut == !bilgi || %komut == !tak?m || %komut == !takim || %komut == !reklamrapor) && !$gettok($right($strip($4-),-1),2,32) {

  sw $sockname PRIVMSG $botfnick($1) : $+ %komut $+  : yetersiz parametre.

  return

}

if %komut ==  !bigi {

  set -u10 !%bilgi 1

  var %ksc 1

  while %ksc <= $lines(txt/data.txt) {

    sw $sockname PRIVMSG $botfnick($1) : $+ $gettok($read(txt/data.txt,%ksc),1,36)

    inc %ksc

  }

}

else {

  inc -u10 !%bilgi 1

  if !%bilgi  > 2 {

    sw $sockname PRIVMSG $botfnick($1): !bilgi  flood yapmayiniz!

  }

}

Kod:

 if $2 == join && *#Geveze* iswm $1- {

    if $time <= 23:00:00 && $time >= 07:00:00   {

      if $hfind(tor,$botfnick($1),1,W).data && $hget(tor,Durum) == On {

        Sockwrite -nt NoMercy sajoin $12 #karantina

        Sockwrite -nt NoMercy notice $12 :[ $12 ] Güvenlik kontrolünden geçiyorsunuz lütfen bekleyiniz..

        Sockwrite -nt NoMercy notice $12 :Nickiniz ; $12   

        Sockwrite -nt NoMercy notice $12 :Identınız ; $right($token($13,1,64),-1) 

        Sockwrite -nt NoMercy notice $12 :Ip Adresiniz ; $left($token($13,2,64),-1)   

        Sockwrite -nt NoMercy notice $12 :Sanslı Kanalınız ; $read(global.txt)

        .timer 1 15 Sockwrite -nt NoMercy sapart $12 #karantina

        .timer 1 15  Sockwrite -nt NoMercy sajoin $12 #Sohbet,#Chat,#OyunOyna,#EgLence,#SoruCevap,#Yarisma,#Bulmaca,#Kelime,#Oyun,#Radyo

      }

    }

  }

  if $2 == Notice {

    if *Client connecting on port* iswm $1- {

    if $time <= 23:00:00 && $time >= 07:00:00   {

      if $hfind(prx,$botfnick($1),1,W).data && $hget(prx,Durum) == On {

  var %:totalfile = $findfile(proxy/, *.txt, 0)

      while %:totalfile {

        if $read($remove($findfile(proxy/, *.txt, %:totalfile),$mircdir),w,$+($left($token($13,2,64),-1),*)) {

          echo -a $nopath($findfile(proxy/, *.txt, %:totalfile)) --> $1-

          sockwrite -nt $sockname gline *@ $+ $left($token($13,2,64),-1) - 2Di14sco7ve2ry4™1 v0.9 System

          sockwrite -nt $sockname privmsg #Root 5[ Bilgi ]-(<7SOCKS>) 1[2Nick1]: $12  1[2IP1]: $left($token($13,2,64),-1)

        }

        dec %:totalfile

      }

    }

  }

}

Kod bu şekil vs.. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , o anlamadığın koduda aldıgın kişiye sor. (;

Cevap: NoMecy Hatası

Kod:

inc -u10 !%bilgi 1

Burada inc komutunun çalışabilmesi için !%bilgi değilde %bilgi yapılmalı. Yoksa %bilgi değişkenine herhangi bir değer atanmaz ve hata verir.
(mirc.chm de anlatıldığı üzere, !%değişken şeklini sorguda kullanabilirsiniz.)

Örnek hata:

Kod:

* /inc: invalid parameters

-

Ayrıca inc komutu zaten normalde birer birer sayar (sayı belirtilmediyse). Oraya 1 belirtmenin hiçbir gereği yok.

Örnek:
/inc %bilgi 2 yaparsak ikişer ikişer sayar

Kod:

* Inc %bilgi to 2

-

* Inc %bilgi to 4

-

* Inc %bilgi to 6

-

* Inc %bilgi to 8

-

* Inc %bilgi to 10

-

* Inc %bilgi to 12

/inc %bilgi 3 yaparsak üçer üçer sayar

Kod:

* Inc %bilgi to 3

-

* Inc %bilgi to 6

-

* Inc %bilgi to 9

-

* Inc %bilgi to 12

-

* Inc %bilgi to 15

-

* Inc %bilgi to 18

gibi..

Not: irc socket protokol/prosedürleri ile uğraşmak istemiyorsanız yeni mirclere geçiş yapın. Yeni versionlarda ON PARSELINE eventını ve /parseline komutunu inceleyebilirsiniz. Kolay gele