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

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

- - Mirc Bot Kanal temizleme Sorunu ? (https://www.ircforumlari.net/mirc-scripting-sorunlari/701158-mirc-bot-kanal-temizleme-sorunu.html)

Mirc Bot Kanal temizleme Sorunu ?

tablo :

Kod:

on *:start:{ 

  .remote on 

  if (!$hget(cle)) { hmake cle | hload cle cle.x }

Alias eklentisi :

Kod:

alias cle {

  if $1 == add {

    hadd -m cle $2 $3-

    hsave cle cle.x

  }

  if $1 == get {

    if $hget(cle,$2) {

      return $ifmatch

    }

    else {

      return Normal

    }

  }

}

Bota eklenen kod :

Kod:

    if $right($4,-1) == !temizle || $right($4,-1) == .temizle || $right($4,-1) == .clear || $right($4,-1) == !clear {

      if ($ybul($3,$_nick($1)) == $true) {

        if ($botsnickler($strip($5)) == 1) { return } 

        if !%clearkont. [ $+ [ %::nick ] ]  {

          inc -u5 %clearkont. [ $+ [ %::nick ] ] 2

          if $cle(get,%::nick) == FB {

            .timer 50 00 swbot privmsg $3 2,2FENERBAHÇE FENERBAHÇE 8,8FENERBAHÇE FENERBAHÇE

          } 

          if $cle(get,%::nick) == GS {

            .timer 50 00 swbot privmsg $3 4,4GALATASARAY GALATASARAY 8,8GALATASARAY GALATASARAY

          }

          if $cle(get,%::nick) == Bjk {

            .timer 50 00 swbot privmsg $3 1,1BEŞİKTAŞ BEŞİKTAŞ 0,0BEŞİKTAŞ BEŞİKTAŞ

          }

          if $cle(get,%::nick) == Trb {

            .timer 50 00 swbot privmsg $3 5,5TRABZONSPOR TRABZONSPOR 11,11TRABZONSPOR TRABZONSPOR

          }

          if $cle(get,%::nick) == normal {

            .timer 50 00 swbot privmsg $3 

          }

          .timer 1 2 swbot privmsg $3 Kanal temizlenmistir, TÜRKİYE $qlogo  

        }

      } 

    }

Kod çalışıyorda hep normal olarak temizliyor.

.takim FB yazdıgımızda cle.x dosyasına kayıt oluyor kanaldan hop yabınca takım adı fenerbahçe yazıyor buraya kadar herşey tamam !temizle dedigimde normal olarak temizliyor bu hatayı çözemedim gözümdn kaçan bi yer var bulamadım bilgisi olan varsa yardımlarınızı bekliorum.

Cevap: Mirc Bot Kanal temizleme Sorunu ?

hangi bota eklemeye çalışıyorsun .?

Cevap: Mirc Bot Kanal temizleme Sorunu ?

Kod eksik gibi kodu aldığın gibi paste yab .

Cevap: Mirc Bot Kanal temizleme Sorunu ?

Kod:

    if $xisop(%::chan,%::nick) && $gettok(%::text,2,32) != NoMercy && Admin_* !iswm $gettok(%::text,2,32) && Csop_* !iswm $gettok(%::text,2,32) && *swatbot* !iswm $gettok(%::text,2,32)   {

      if $gettok(%::text,1,32) == !clear || $gettok(%::text,1,32) == !temizle {

        if $read(txt/Globl.txt,w,%::chan) || *Fener* iswm %::chan {

          if !%clearkont. [ $+ [ %::nick ] ] {

            inc -u5 %clearkont. [ $+ [ %::nick ] ] 2

            if $cle(get,%::Nick) == FB {

              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 2,2w.W.w.Geveze.ORG w.W.w.Geveze.ORG 8,8w.W.w.Geveze.ORG w.W.w.Geveze.ORG

            }

            if $cle(get,%::Nick) == GS {

              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 4,4w.W.w.Geveze.ORG w.W.w.Geveze.ORG 8,8w.W.w.Geveze.ORG w.W.w.Geveze.ORG

            }

            if $cle(get,%::Nick) == Bjk {

              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 1,1w.W.w.Geveze.ORG w.W.w.Geveze.ORG 0,0w.W.w.Geveze.ORG w.W.w.Geveze.ORG

            }

            if $cle(get,%::Nick) == Trb {

              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 5,5w.W.w.Geveze.ORG w.W.w.Geveze.ORG 11,11w.W.w.Geveze.ORG w.W.w.Geveze.ORG

            }

            if $cle(get,%::Nick) == normal {

              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 

            }

            .timer 1 2 sockwrite -nt $sockname privmsg %::chan Kanal temizlenmistir, w.W.w.Geveze.ORG $qlogo

          }

          else {

            ;sw $sockname kick %::chan %::nick !clear flood yapmayiniz!

          }

        }

      }

Nomercy bottan alkmıştım