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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Kod hakkında yardım (https://www.ircforumlari.net/mirc-scripting-sorunlari/774829-kod-hakkinda-yardim.html)

yokay 09 Haziran 2017 20:32

Kod hakkında yardım
 
Kod:

on $*:text:/[!.]s(o|ö)v\s+\S+$/SAi:#: {
  if !$hget(sov,$nick) { hadd -mu20 sov $nick 1 |  msg $chan 2 $2 ;4 $nick 1sana4  $read(söv.txt) 1 Diyerek Sövdü. | return }
  else { .notice $nick 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz. }
}

Yukarıdaki kod !sov nick !söv nick !sÖv nick şeklinde çalışıyor ben şunu istiyorum !söv ahmet yaptiğimde kanalda ahmet nicki yoksa; Ahmet Sövülmek için bulunamadı.
Ayrıca !söv olarak kullanmak isteyenlere de $nick komutu !söv nick şeklinde kullanınız yazmasını istiyorum.
Şimdiden yardımlarınız için teşekkür ederim.

Feragat 09 Haziran 2017 21:27

Cevap: Kod hakkında yardım
 
This is awesome.

- Ayrıca return efsane olmuş.

yokay 09 Haziran 2017 23:00

Cevap: Kod hakkında yardım
 
Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041861435)
This is awesome.

- Ayrıca return efsane olmuş.

Zaten sizin yazdığınız kod sanırım, acaba yardımcı olabilir misiniz ?

Feragat 09 Haziran 2017 23:41

Cevap: Kod hakkında yardım
 
Alıntı:

yokay Nickli Üyeden Alıntı (Mesaj 1041861441)
Zaten sizin yazdığınız kod sanırım, acaba yardımcı olabilir misiniz ?

Event üzerindeki filtre tanıdık geliyor ama söv şeklinde değildi. Onun dışındaki satırlar benden bağımsız.

Kanalda varsa yoksa ayırımı için if koşulunda ison operatörünü tavsiye ederim.

Örnek:

komut:
!söv abuzer

koşul:
if ($2 ison #) { kodlar }
else { kodlar }

text eventı !söv kelimesini $1 olarak tanır yani 1. kelime, abuzer nickini ise $2 olarak tanır 2. kelime.

Eğer $2 yani abuzer bey kanalda ise şunları yap değilse bunları yap şartını örnek kalıptaki gibi oluşturabilirsin.

Diğer isteğini de aynı mantığı kullanarak yapabilirsin. Sadece !söv kullanıldığını varsayalım.
if (!$2) { kodlar } veya if ($2 == $null) { kodlar } Bu demek oluyor ki; 2. kelime yani !söv den sonrası yok ise bunları yap.

Yapacaklarına tamamen şartlarla/koşullarla yön verirsin.
İncelemen için öneri- LİNK: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

kolay gelsin.

yokay 10 Haziran 2017 00:00

Cevap: Kod hakkında yardım
 
Malesef beceremedim, dediğiniz şekilde yaptığımda !söv yazdığımda herhangi bir tepki vermiyor kod, !sov nick yazdığımda komut calsio ancak !söv ahmet veya !söv ahmetttttsd kanalda olan veya l-olmayan nicklere de tepki veriyor :/ siz bir çalışma sunabilir misiniz rica etsem ? @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Feragat 10 Haziran 2017 21:58

Cevap: Kod hakkında yardım
 
Alıntı:

yokay Nickli Üyeden Alıntı (Mesaj 1041861451)
Malesef beceremedim, dediğiniz şekilde yaptığımda !söv yazdığımda herhangi bir tepki vermiyor kod, !sov nick yazdığımda komut calsio ancak !söv ahmet veya !söv ahmetttttsd kanalda olan veya l-olmayan nicklere de tepki veriyor :/ siz bir çalışma sunabilir misiniz rica etsem ? @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

on $*:text:/^[!.]s(o|ö)v/Si:#: {
  if (!$hget(sov,$nick)) {
    hadd -mu20 sov $nick 1
    if (!$2) {
      msg # Hatalı Komut. Doğrusu <!söv Nick>
    }
    elseif ($2 && $2 ison #) {

      msg # 2 $2 ;4 $nick 1sana4  $read(söv.txt) 1 Diyerek Sövdü.
    }
    elseif ($2 !ison #) {
      msg # $2 Nicki Kanalda yok!
    }
  }
  else {
    .notice $nick 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz.
  }
}

Örnek Sonuç:
Kod:

[21:52] <Project`Nightmare> !söv
[21:52] <@Feragat> Hatalı Komut. Doğrusu <!söv Nick>
[21:52] <Project`Nightmare> !söv dsfsdf
[21:52] <@Feragat> dsfsdf Nicki Kanalda yok!
[21:53] <Project`Nightmare> !söv Feragat
[21:53] <@Feragat>  Feragat ; Project`Nightmare sana  Diyerek Sövdü.
[21:53] <Project`Nightmare> !söv Feragat
[21:53] -Feragat- 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz.


yokay 11 Haziran 2017 22:37

Cevap: Kod hakkında yardım
 
Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041861574)
Kod:

on $*:text:/^[!.]s(o|ö)v/Si:#: {
  if (!$hget(sov,$nick)) {
    hadd -mu20 sov $nick 1
    if (!$2) {
      msg # Hatalı Komut. Doğrusu <!söv Nick>
    }
    elseif ($2 && $2 ison #) {

      msg # 2 $2 ;4 $nick 1sana4  $read(söv.txt) 1 Diyerek Sövdü.
    }
    elseif ($2 !ison #) {
      msg # $2 Nicki Kanalda yok!
    }
  }
  else {
    .notice $nick 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz.
  }
}

Örnek Sonuç:
Kod:

[21:52] <Project`Nightmare> !söv
[21:52]  @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> Hatalı Komut. Doğrusu <!söv Nick>
[21:52] <Project`Nightmare> !söv dsfsdf
[21:52]  @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> dsfsdf Nicki Kanalda yok!
[21:53] <Project`Nightmare> !söv Feragat
[21:53]  @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]>  Feragat ; Project`Nightmare sana  Diyerek Sövdü.
[21:53] <Project`Nightmare> !söv Feragat
[21:53] -Feragat- 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz.


Sevgili @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] çok teşekkür ederim. Emeğinize sağlık

DeLiKanLl 12 Haziran 2017 11:33

Cevap: Kod hakkında yardım
 
Merhaba Arkadaşlar.

Bana kim yardımcı olabilir. Mevcut kullandığım helperlere özel aşağıdaki kod var. Ben bununla birlikte. Yazı karakterini değiştiren bir kod kullanmak istiyorum. Mesela ş yi $ b yi ß olarak yazacak bir kod kullanmak istiyorum. Araştırdım bir çok kod buldum. Fakat aşağıdaki kod ile çakışıyor sanırım. bir mesajı iki kez yazıyor. bununla ilgili bana yardımcı olabilecek biri varmıdır. ? Teşekkürler

menu status,menubar, {
.-
.• © Helpere,Admine Özel Yazı !
..• Açık !:.enable #absoyazı | .echo -a 0,4 Helpere,Admine Özel Yazı AcıLdı.. %logo
..• Kapalı !:.disable #absoyazı | .echo -a 0,4 Helpere,Admine Özel Yazı KapatıLdı.. %logo
..• Bilgi !:.echo -a 0,4 Bu Yazı Tipi Helper,Admin, ArkadasLara KoLaylık Saglasın diye EkLendi.. %logo
.-
}

#absoyazı on
on *:input:*:{
if (/* iswm $1) { return }
var %a 0, %b, %c
while (%a < $numtok($1-,32)) {
inc %a
%c = $gettok($1-,%a,32)
if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(,%c,) }
else { %b = %b %c }
}
if (!%b) { %b = $1- }
say %b
halt
}
#absoyazı end

yokay 12 Haziran 2017 16:32

Cevap: Kod hakkında yardım
 
Kod:

on $*:text:/^[!.]s(o|ö)v/Si:#: {
  if (!$hget(sov,$nick)) {
    hadd -mu20 sov $nick 1
    if (!$2) {
      msg # Hatalı Komut. Doğrusu <!söv Nick>
    }
    elseif ($2 && $2 ison #) {

      msg # 2 $2 ;4 $nick 1sana4  $read(söv.txt) 1 Diyerek Sövdü.
    }
    elseif ($2 !ison #) {
      msg # $2 Nicki Kanalda yok!
    }
  }
  else {
    .notice $nick 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz.
  }
}

üst üste .söv nick yazınca notice atmiyor rumuza bir kez yazınca notice atiyor. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Feragat 12 Haziran 2017 19:52

Cevap: Kod hakkında yardım
 
Alıntı:

yokay Nickli Üyeden Alıntı (Mesaj 1041861693)
üst üste .söv nick yazınca notice atmiyor rumuza bir kez yazınca notice atiyor. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


Aynı nick ile komutu 20 saniye içinde 1 defa kullanabilirsin. İlk kullanımda söver sonra 20 saniye bekler 20 saniye içerisinde tekrar aynı nickle sövmeye kalkarsan süre uyarısı verir. Süre bitince tekrar sövebilirsin.

Kod:

[19:47:21] <Feragat> .söv Project`Nightmare
[19:47:21] <Project`Nightmare>  Project`Nightmare ; Feragat sana  Diyerek Sövdü.
[19:47:22] <Feragat> .söv Project`Nightmare
[19:47:22] -Project`Nightmare- 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz. Kalan süre: 20 Saniye
[19:47:22] <Feragat> .söv Project`Nightmare
[19:47:22] -Project`Nightmare- 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz. Kalan süre: 19 Saniye
[19:47:25] <Feragat> .söv Project`Nightmare
[19:47:25] -Project`Nightmare- 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz. Kalan süre: 17 Saniye

Son halini ekle
Kod:

on $*:text:/^[!.]s(o|ö)v/Si:#:{
  if (!$hget(sov,$nick)) {
    hadd -mu20 sov $nick 1
    if (!$2) {
      msg # Hatalı Komut. Doğrusu <!söv Nick>
    }
    elseif ($2 && $2 ison #) {

      msg # 2 $2 ;4 $nick 1sana4  $read(söv.txt) 1 Diyerek Sövdü.
    }
    elseif ($2 !ison #) {
      msg # $2 Nicki Kanalda yok!
    }
  }
  else {
    notice $nick 20 Saniye içersinde, Yalnız 1 defa !söv Komutunu Kullanabilirsiniz. Kalan süre: $hget(sov,$nick).unset Saniye
  }
}

Kolay gelsin. (Küfüre hayır)


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 16:01.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk