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

Zalimsin · 13 Eylül 2019, 21:00

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#: {
  if ($regex($strip($1),/^[!.]sev[ıIİı]yor/Si)) {
    if $strip($2) == $nick { return }
    if ($strip($2) !ison # && $2) { msg $chan 2 $qt($nick) $+(<,$strip($2),>)  $chan kanalında bulunmamaktadır. | return }
    if $hget(seviyormu,$nick) { .notice $nick 30 saniye içersinde, Yalnız 1 defa $1 komutunu kullanabilirsiniz. Kalan Süre: $hget(seviyormu,$nick).unset Saniye }
    else {
      .hinc -msu30 seviyormu $nick 1
      var %toplam 100
      var %seviyor $r(1,%toplam)
      var %toplam $calc(%toplam - %seviyor)
      var %sevmiyor $r(1,%toplam) 
      var %toplam $calc(%toplam - %sevmiyor)
      var %umursamıyor %toplam
      msg $chan $iif($2,$+ $+(4,$nick,1) $+(4,$2,1) 2seni;,$+ $+(4[,$nick,]1) seni;)
      msg $chan 4,4................. 0 % $+ %seviyor Seviyor! <3
      msg $chan 2,2......................... 0 % $+ %sevmiyor Sevmiyor! </3
      msg $chan 7,7.......................................................... 0 % $+ %umursamıyor Umursamıyor! ;|
    }
  }
}

Arkadaşlar bu kod calışıyordu şimdi calışmıyor neden ola bilir acaba

Emrehan · 13 Eylül 2019, 21:08

Kod: Kodu kopyalamak için üzerine çift tıklayın!

if ($regex($strip($1),/^[!.]sev[ıIİı]yor/Si)) {

burayı

Kod: Kodu kopyalamak için üzerine çift tıklayın!

if $regex($1,/^[!.]sev[ıiİ]yor/Si) {

değiştirip deneyin

Zalimsin · 13 Eylül 2019, 21:25

off Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#: {
  if ($regex($strip($1),/^[!.]sev[ıIİı]yor/Si)) {
    if $strip($2) == $nick { return }
    if ($strip($2) !ison # && $2) { msg $chan 2 $qt($nick) $+(<,$strip($2),>)  $chan kanalında bulunmamaktadır. | return }
    if $hget(seviyormu,$nick) { .notice $nick 30 saniye içersinde, Yalnız 1 defa $1 komutunu kullanabilirsiniz. Kalan Süre: $hget(seviyormu,$nick).unset Saniye }
    else {
      .hinc -msu30 seviyormu $nick 1
      var %toplam 100
      var %seviyor $r(1,%toplam)
      var %toplam $calc(%toplam - %seviyor)
      var %sevmiyor $r(1,%toplam) 
      var %toplam $calc(%toplam - %sevmiyor)
      var %umursamıyor %toplam
      msg $chan $iif($2,$+ $+(4,$nick,1) $+(4,$2,1) 2seni;,$+ $+(4[,$nick,]1) seni;)
      msg $chan 4,4................. 0 % $+ %seviyor Seviyor! <3
      msg $chan 2,2......................... 0 % $+ %sevmiyor Sevmiyor! </3
      msg $chan 7,7.......................................................... 0 % $+ %umursamıyor Umursamıyor! ;|
    }
  }
}

Arkadaşlar bu kod calışıyordu şimdi calışmıyor neden ola bilir acaba

denedim ama olmadı

Feragat · 13 Eylül 2019, 22:01

Kodun çalışmamasının koşul parantezlerine bağlı olduğunu düşünmüyorum.

Kodu düzenlemeye kalkarsan, göze çarpanlardan birisi

Kod: Kodu kopyalamak için üzerine çift tıklayın!

if ($regex($strip($1),/^[!.]sev[ıIİı]yor/Si)) {

$strip($1) yerine $1 yeterli olur, çünkü regexde /S flağı ile strip işlemini zaten uygular.

Örnek:

Kod: Kodu kopyalamak için üzerine çift tıklayın!

Negatif:  //echo -a $regex(4se2lam,/^(selam)$/i) - $regml(1)

Pozitif:  //echo -a $regex(4se2lam,/^(selam)$/Si) - $regml(1)

Ayrıca hash table komutlarını kullanırken "Örneğin hinc" -s parametresi bu tarz kodlarda gereksiz. Test ve deneme aşamasında kullanılabilir bence. İşlevi, komuttaki atamaları ekrana yansıtıyor sadece.

off Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

denedim ama olmadı

Kodda herhangi bir problem gözükmüyor.

Örnek görüntü: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kolay gelsin.

mys_35 · 22 Eylül 2019, 14:29

on $*:text:/^[!.][sşSŞ]sev[iıİI]y[oöOÖ]r/Si:#: { if (!$2) { msg # Hatalı kullanım lütfen nick belirtin. } | elseif $regex($2,/\W+|\s+|\d+|/Si) && ($2 !ison #) { msg # Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin. } | else { var %:Mylife = $rand(5,100) | msg # 0,4 % $+ %:Mylife Seviyor. | msg # 0,3 % $+ $calc(100-%:Mylife) Sevmiyor. | var %:Kod = $calc(100-%:Mylife) | $iif(%:Kod >= 50,msg # $read(nefret.txt,1),msg # $read(sevgi.txt,1)) } }

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
!seviyor	Zalimsin	mIRC Scripting Sorunları	10	24 Haziran 2018 00:15
Seviyor seviyorken...	MoHaC	Şiir, Hikaye ve Güzel Sözler	0	14 Kasım 2011 15:51

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.