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

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

- - ✔ Çözüldü Seslenme Remotesi (https://www.ircforumlari.net/mirc-scripting-sorunlari/833720-seslenme-remotesi.html)

Seslenme Remotesi

Merhaba arkadaslar ben bi remote sorucaktım seslenme remotesi normalde bi cok var ama radıgım söyle ben bi sunucuda güvenlik departmanındayim nickimde kelimeler arasında cok fazla spama takıldıgından sürekli uyari geliyor söyle bişi asiyorum diyelimki nickim Lady sadece Lady yazdıklarında uyari gelsin Lady1 deviLady gibi nickleree seslendiklerinde bu uyari gelmesin bu mümkünmüdür

Cevap: Seslenme Remotesi

Alıntı:

EsareR45 Nickli Üyeden Alıntı (Mesaj 1042139827)

Kod:

on *:text:*:#: { if $istok($1-,Lady,32) { kodlar } }

Cevap: Seslenme Remotesi

hocam buna uyari ekleyebilirmiyiz peki su kanaldan veya özelden seslendi gibi

Cevap: Seslenme Remotesi

Alıntı:

EsareR45 Nickli Üyeden Alıntı (Mesaj 1042139827)

Alıntı:

EsareR45 Nickli Üyeden Alıntı (Mesaj 1042140206)

hocam buna uyari ekleyebilirmiyiz peki su kanaldan veya özelden seslendi gibi

Kod:

on *:text:*:*: { if $regex($1-,/\bLady\b/Si) { echo -a $nick sizden bahsetti. kanal: # Mesajı: $1- } }

Cevap: Seslenme Remotesi

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

Kod:

on *:text:*:*: { if $regex($1-,/\bLady\b/Si) { echo -a $nick $iif($chan,# Kanalında,Özelde) sizden bahsetti. Mesajı: $1- } }

Bu şekilde daha kullanışlı olabilir. Özel ve kanal ayrımı bakımından.

Cevap: Seslenme Remotesi

teşekkür ederim emeginize yüreginize saglik

Cevap: Seslenme Remotesi

konuyu hortlatmak gibi oldu ama :) elimde aşağıdaki kod var arkadaşlar. aynı kode yukardada bir arkadaş paylaşmış zaten. kodedeki sıkıntı diyelim nick Ata ama kelime içinde ata varsa hepsini gösteriyor mesela biri hatay yazıyor tablanıyorum bunu düzeltebilirmiyiz? Ata DJ^Ata Ata'Away şeklinde yazmasını istiyorum sadece bu nick dışındaki yazımları göstermesin.

Kod:

on *:text:*:#:{  if ($me isin $1-) || (mekansiz isin $1-) || (mekansız isin $1-) {    if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me)) window -en Seslenme    echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me $chan - $nick - $1-  }}

Cevap: Seslenme Remotesi

Bu kod işini görecektir. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

on *:text:*:#:{

  if ($istok($1-,Ata,32)) || ($istok($1-,DJ^Ata,32)) || ($istok($1-,Ata'Away,32)) {

    if ($active != $chan) {

      if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me }

      echo -at 4[SESLENME] $chan kanalında $nick sana sesleniyor. $1-

      echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me 4[BİLDİRİM] $chan kanalında $nick sana yazdı. $1-

    }

  }

}

Cevap: Seslenme Remotesi

Selamlar, kodundaki temel sorun isin operatörünü kullanman. isin operatörü, belirttiğin kelimeyi cümlenin herhangi bir yerinde (başında, sonunda veya başka bir kelimenin içinde) gördüğü an tetiklenir. "Hatay" yazdığında içindeki "ata"yı yakalamasının sebebi budur.
Bunu çözmek için Wildcard (Joker karakter) eşleşmesi yapan iswm operatörünü kullanmalıyız ve aradığın nicklerin önüne/arkasına boşluk veya noktalama işaretlerini de kapsayacak bir mantık kurmalıyız. Ancak daha kesin çözüm, $istok (item in token) tanımlayıcısını kullanmaktır.
Aşağıdaki güncellenmiş kod, sadece belirttiğin kelimeler ayrı bir kelime olarak geçtiğinde tetiklenir.

PHP- Kodu:

      on *:text:*:#:{

  ; Aranacak kelimeleri bir değişken olarak tanımlayalım (kolay düzenleme için)

  ; Buraya istediğin nickleri/kelimeleri ekleyebilirsin.

  var %arananlar = $me mekansiz mekansız Ata DJ^Ata Ata'Away

 
  ; $istok komutu cümlenin içindeki her kelimeyi tek tek kontrol eder

  ; $1- içindeki kelimelerden herhangi biri %arananlar listesinde var mı diye bakar.

  

  var %i = 1

  while ($gettok(%arananlar, %i, 32)) {

    var %v = $v1

    if ($istok($1-, %v, 32)) {

      if (!$window([MENTION=153575]Seslen[/MENTION]me)) { window -en [MENTION=153575]Seslen[/MENTION]me }

      echo -tm [MENTION=153575]Seslen[/MENTION]me $chan - $nick - $1-

      halt ; Bir kere bulduysa durması için

    }

    inc %i

  }

}

Neler Değişti?
• $istok Kullanımı: Bu fonksiyon, cümlenin içindeki "Hatay" kelimesini bir bütün olarak görür ve içinde "Ata" geçse bile onu "Ata" ile eşleştirmez. Sadece tam olarak "Ata" yazıldığında tetiklenir.
• Dinamik Liste: DJ^Ata veya Ata'Away gibi özel karakterli nickleri %arananlar kısmına ekledim. Artık sadece bu tam kelimeler geçtiğinde bildirim alacaksın.
• Hata Önleme: Cümle içinde hem "Ata" hem "mekansız" geçerse pencereye iki kere yazmasın diye halt eklendi.
Eğer büyük/küçük harf duyarlılığı olsun istersen (yani sadece Ata yazınca çalışsın, ata yazınca çalışmasın istersen), kodun içindeki karşılaştırma mantığını cs (case-sensitive) ekleri ile değiştirebiliriz.
Bu kodun çalışmasını test etmek için bir arkadaşından "Selam Ata" ve "Selam Hatay" yazmasını isteyebilirsin; sadece ilkinde @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me penceresine düşecektir.

Cevap: Seslenme Remotesi

Kod:

alias seslenme {

  if (!$var(%seslist)) { set %seslist }

  if ($1 == ekle) {

    if (!$istok(%seslist,$2,32)) { set %seslist $addtok(%seslist,$2,32) | echo -a [SESLENME] $2 eklendi. }

  }

  elseif ($1 == sil) {

    if ($istok(%seslist,$2,32)) { set %seslist $remtok(%seslist,$2,32) | echo -a [SESLENME] $2 silindi. }

  }

  elseif ($1 == list) {

    echo -a [SESLENME] Liste: %seslist

  }

}
 

on *:text:*:#:{

  if (%seslist) {

    var %regex = /\b($replace(%seslist,$chr(32),|))\b/g

    var %match = $regsubex($1-,%regex,\1)

    if (%match) {

      if ($active != $chan) {

        if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me }

        echo -at [SESLENME] $chan $nick: $1-

        echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]me [BİLDİRİM] $chan $nick: $1-

      }

    }

  }

}

Kullanım şekli:
/seslenme ekle Ata : “Ata” listeye eklenir.
/seslenme sil Ata : “Ata” listeden çıkarılır.
/seslenme list : mevcut listeyi gösterir.

yukarıdaki kullanım örneğine uygun olarak Ata^away Ata^afk Ata^yok gibi nickleride ekleyebilir. yada silebilirsin.