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

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

- - Oto selam alma hakkında (https://www.ircforumlari.net/mirc-scripting-sorunlari/393261-oto-selam-alma-hakkinda.html)

Oto selam alma hakkında

selamun aleyküm kolay gelsin arkadaşlar elimde bu siteden aldığım bi kod vardı bu kodda şöyle bir şey yapmak istiyorum birisi kanal genelinde selam verdiğinde bu kod gayet güzel oto cevap veriyor fakat aynı kişi sürekli selam veriğinde alıyor ve bende oda tekrardan kanallardan atılıyoruz birisi selam verdiğinde bu kod alsa o kişi 1 dk içinde yine selam verdiğinde almasa olabilirmi acaba böyle bir şey kod şu

Kod:

on *:text:Selam:#:/msg # SéLam $nick

on *:text:S.a.:#:/msg # SéLam $nick

on *:text:Slm:#:/msg # SéLam $nick

on *:text:Selam:#:/msg # SéLam $nick

on *:text:S.a:#:/msg # a.SéLam $nick

yardımcı olabilirseniz minnettar olurum

Cevap: Oto selam alma hakkında

Kod:

on *:text:*:#: {

  if (*S.a* iswm $1- || *S.a.* iswm $1- || *Slm* iswm $1- || *Selam* iswm $1-)  { 

    inc -u60 $+(%,saflood.,$nick)

    if $($+(%,saflood.,$nick),2) > 2 { 

      .halt

    }

    msg # a.Selam $nick

  }

}

VEYA

Kod:

on *:text:*:#: {

  if (S.a iswm $1-) {

    var $+(%,satflood.,$nick) 

    inc -u60 $+(%,saflood.,$nick)

    if $($+(%,saflood.,$nick),2) > 2 { 

      .halt

    }

   .msg # a.Selam $nick

  }

  if (S.a. * iswm $1-) {

    if $+(%,satflood.,$nick) == $nick { .halt }

    inc -u60 $+(%,sa2flood.,$nick)

    if $($+(%,sa2flood.,$nick),2) > 2 { 

      .halt

    }

   .msg # a.Selam $nick

  }

  if (Slm * iswm $1-) {

    if $+(%,satflood.,$nick) == $nick { .halt } 

     inc -u60 $+(%,slmflood.,$nick)

     if $($+(%,slmflood.,$nick),2) > 2 { 

       .halt

     }

    .msg # a.Selam $nick

   }

  if (Selam * iswm $1-) { 

    if $+(%,satflood.,$nick) == $nick { .halt }

      inc -u60 $+(%,slm2flood.,$nick)

      if $($+(%,slm2flood.,$nick),2) > 2 { 

        .halt

      }

     .msg # a.Selam $nick

    }

}

üzerinde çok durmadım, yeni uyandım zaten öyle aklıma geldiği şekilde yazmaya çalıştım, muhtemelen çalışır.

Hoş if'ler ^^

Cevap: Oto selam alma hakkında

Kodu yazmış oldum boşa gitmesin:

Kod:

on $*:text:/(selam|s\.a\.|slm)/i:#: {

  if !$hget(otomuaf $+ $window(#).wid,$nick) {

    hadd -mu60 otomuaf $+ $window(#).wid $nick 1

    msg # SéLam $nick 

  }

}

Cevap: Oto selam alma hakkında

Kod:

on *:text:*:#:{ if $istok(slm selam selamlar s.a,$1-,32) { inc -eu10 $+(%,$nick,#,$network) 1 | if $($+(%,$nick,#,$network),2) == 1 { msg # selam $nick } } }

Bendekide bu :)

Cevap: Oto selam alma hakkında

Alıntı:

DenperaS Nickli Üyeden Alıntı (Mesaj 1040741710)

Kod:

on *:text:Selam:#:/msg # SéLam $nick

on *:text:S.a.:#:/msg # SéLam $nick

on *:text:Slm:#:/msg # SéLam $nick

on *:text:Selam:#:/msg # SéLam $nick

on *:text:S.a:#:/msg # a.SéLam $nick

yardımcı olabilirseniz minnettar olurum

bu kod benim mircimde özelim için ayarlı yani özelimde slm verilince oto alıyor ama ben atıyorum ahmetin mehmetin op sop admin helper gibi kişiler için oto slm kodu çalışmasın istiyorum ne yapmam lazım ?

Cevap: Oto selam alma hakkında

Alıntı:

rewal Nickli Üyeden Alıntı (Mesaj 1041535373)

İlk önce [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] konuyu incelemen lazım. Eğer buna rağmen yapamazsan, sendeki kod'u burada paylaşırsan çözüm buluruz.

Cevap: Oto selam alma hakkında

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041535417)

İlk önce [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] konuyu incelemen lazım. Eğer buna rağmen yapamazsan, sendeki kod'u burada paylaşırsan çözüm buluruz.

inceledim ama anlayamadım kod aşağıda yardımcı olabilirseniz sevinirim tşk.

Kod:

menu ,menubar {

  .-

  . ® ÖZEL

  ..Açık:.enable #oto | .echo -a 0,4 ÖzeL Bot Açıldı

  ..Kapalı:.disable #oto  | .echo -a 0,4 ÖzeL Bot Kapatıldı 

  .-

}
 

#oto on
 

on *:text:*slm*:?:/.timer  1 5 /msg $nick $read C:\metinler\slm.txt

on *:text:*selam*:?:/.timer  1 5 /msg $nick $read C:\metinler\slm.txt

on *:text:*s.a*:?:/.timer  1 5 /msg $nick $read C:\metinler\slm.txt
 

#oto off

Cevap: Oto selam alma hakkında

Alıntı:

rewal Nickli Üyeden Alıntı (Mesaj 1041535434)

inceledim ama anlayamadım kod aşağıda yardımcı olabilirseniz sevinirim tşk.

menu ,menubar {
.-
. ® ÖZEL
..Açık:.enable #oto | .echo -a 0,4 ÖzeL Bot Açıldı
..Kapalı:.disable #oto | .echo -a 0,4 ÖzeL Bot Kapatıldı
.-
}

#oto on

on *:text:*slm*:?:/.timer 1 5 /msg $nick $read C:\metinler\slm.txt
on *:text:*selam*:?:/.timer 1 5 /msg $nick $read C:\metinler\slm.txt
on *:text:*s.a*:?:/.timer 1 5 /msg $nick $read C:\metinler\slm.txt

#oto off

Kullandığın kod'da bazı hatalar var,
1- #group özelliğini başlatıp bitirirken ki mantık: #group on/off - #group end olmalıdır. Senin paylaştığın kod'da group'un başlangıcı da bitişi de on/off ile sürdürülmüş.
2- Bu özellikler için bir den fazla event kullanmaya gerek yok.
3- Wildcard aralıklarında ki kapsamalar da; Kişi eğer a.selam yazsa dahi selam vermiş gibi kabul edip cevap verir. vb.

Kod'un cevap vereceği metinler;

Kod:

sa - s.a - s.a. - selam - selams - slm - s.aleyküm - selamun aleyküm

Kod:

menu menubar {

  .-

  . ® ÖZEL

  ..Açık:.enable #oto | .echo -a 0,4 ÖzeL Bot Açıldı

  ..Kapalı:.disable #oto | .echo -a 0,4 ÖzeL Bot Kapatıldı 

  .-

}
 

#oto on

on $*:text:/^s(a|\.a(\.|leyk[uüÜ]m)?|lm|elam(s|lar|[uÜü]n\saleyk[uÜü]m)?)$/Si:?:{

  if !$regex(x,$address($nick,2),/oper|admin|helper|aop|sop|dj/i) {

    .timer 1 5 msg $nick $read C:\metinler\slm.txt

  }

}

#oto end

- Benzer bir konu; incelemek istersen: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] İyi forumlar.