IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 2 Toplam 3 Sayfadan 1 2 3
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   Çözüldü mirc botunda özelde random soru sordurmak (https://www.ircforumlari.net/mirc-scripting-sorunlari/829499-mirc-botunda-ozelde-random-soru-sordurmak.html)

YouMyCure 26 Ağustos 2019 18:04
Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:
alphae Nickli Üyeden Alıntı (Mesaj 1042141768)
soruyu soruyor help odasinda sorduruyorum. cevap kabul etmiyor nedendir acaba ?

[16:00] <~Bilgi> fgjfjbn Soru: Türkiyenin Başenti Neresidir ?
[16:00] <~Bilgi> fgjfjbn Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
[16:00] Giriş: omer11 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[16:00] <&fgjfjbn> ankara


Kod:
on *:text:*:*: {
  if $regex(#,/^#/) {
    if $regex($3,/^(onaylayınız)$/Si) {
      msg #help $strip($1) Soru: $token($read(sorular.txt),1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -sm Register $strip($1) $token($read(sorular.txt),2,149)
    }
  }
  else { if $hfind(Register,$nick) = $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick } }
}
cevabı kanalda verdirmek için
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) {
    msg #help $strip($1) Soru: $token($read(sorular.txt),1,149)
    msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
    .hadd -sm Register $strip($1) $token($read(sorular.txt),2,149)
  }
  elseif $hfind(Register,$nick) = $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick }
}

alphae 26 Ağustos 2019 19:20
Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:
YouMyCure Nickli Üyeden Alıntı (Mesaj 1042141881)
cevabı kanalda verdirmek için
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) {
    msg #help $strip($1) Soru: $token($read(sorular.txt),1,149)
    msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
    .hadd -sm Register $strip($1) $token($read(sorular.txt),2,149)
  }
  elseif $hfind(Register,$nick) = $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick }
}
Cevap kabul etmiyor neden ki.


[19:19] <~Bilgi> fgjfg Soru: 10-5 çıkarsa kaç kalır ?
[19:19] <~Bilgi> fgjfg Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
[19:19] <fgjfg> 5

Toprak 26 Ağustos 2019 19:31
Cevap: mirc botunda özelde random soru sordurmak
 
Hatalı kısım;
Kod:
$hfind(Register,$nick) = $1-
Herhangi bir arama yapılmıyor bunun için $hfind değil $hget kullanılır,

Doğrusu;
Kod:
$hget(Register,$nick) == $1-
$hfind ile sorulduğunda tekrar $nick 'i verir...
Bakıyorum da mirc'de bir arpa boyu yol katetmemisiz..


Buyur;
Kod:
on *:text:*:*:{
  if $regex(#,/^#/) && $regex($3,/^onaylayınız$/Si) {
    var %soru = $read(sorular.txt)
    msg #help $strip($1) Soru: $token(%soru,1,149)
    msg #help $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
    .hadd -ms Register $strip($1) $token(%soru,2,149)
  }
  elseif ($hget(Register,$nick) == $strip($1-)) { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -ms Register $nick }
}

Set 26 Ağustos 2019 20:53
Cevap: mirc botunda özelde random soru sordurmak
 
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) && $nick == nickserv {
    %soru = $read(sorular.txt)
      msg #help $strip($1) Soru: $token(%soru,1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -m register $strip($1) $token(%soru,2,149)
    }
  if $hget(register,$nick) == $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -m register $nick }
}

alphae 26 Ağustos 2019 23:32
Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:
Set Nickli Üyeden Alıntı (Mesaj 1042142056)
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) && $nick == nickserv {
    %soru = $read(sorular.txt)
      msg #help $strip($1) Soru: $token(%soru,1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -m register $strip($1) $token(%soru,2,149)
    }
  if $hget(register,$nick) == $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -m register $nick }
}
Peki yanlış cevap verirse gline atirmayi nasil ekleriz çok güzel bir kod oldu calisiyor.

Set 26 Ağustos 2019 23:57
Cevap: mirc botunda özelde random soru sordurmak
 
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) && $nick == nickserv {
    %soru = $read(sorular.txt)
      msg #help $strip($1) Soru: $token(%soru,1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -m register $strip($1) $token(%soru,2,149)
    }
  if $hget(register,$nick) == $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -m register $nick }
  else { gzline $nick +0 yanlis cevap | ns dropnick $nick | hdel -m register $nick }
}
Denemedim ama çalışacaktır herhalde, genede belirtirsin birşey olursa eğer, yardımcı olmaya calisirim

alphae 27 Ağustos 2019 00:08
Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:
Set Nickli Üyeden Alıntı (Mesaj 1042142232)
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) && $nick == nickserv {
    %soru = $read(sorular.txt)
      msg #help $strip($1) Soru: $token(%soru,1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -m register $strip($1) $token(%soru,2,149)
    }
  if $hget(register,$nick) == $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -m register $nick }
  else { gzline $nick +0 yanlis cevap | ns dropnick $nick | hdel -m register $nick }
}
Denemedim ama çalışacaktır herhalde, genede belirtirsin birşey olursa eğer, yardımcı olmaya calisirim
3 adet shun ati site adresine ve nicki kayit edene ve botun ipine uyari mesajida vermedi


[00:06] *** Permanent Shun added for *@site.com on Mon Aug 26 21:07:37 2019 GMT (from Bilgi!~Admin@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].site.com: yanlis cevap)
[00:06] *** Permanent Shun added for *@95.70.132.48 on Mon Aug 26 21:07:43 2019 GMT (from Bilgi!~Admin@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].site.com: yanlis cevap)
[00:06] *** Permanent Shun added for *@185.141.33.66 on Mon Aug 26 21:07:53 2019 GMT (from Bilgi!~Admin@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].site.com: yanlis cevap)

Set 27 Ağustos 2019 00:31
Cevap: mirc botunda özelde random soru sordurmak
 
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) && $nick == nickserv {
    %soru = $read(sorular.txt)
      msg #help $strip($1) Soru: $token(%soru,1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -m register $strip($1) $token(%soru,2,149)
      return
    }
  if $hget(register,$nick) { %v1 = $v1
    if %v1 == $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -m register $nick | return }
  gzline $nick +0 yanlis cevap | ns dropnick $nick | hdel -m register $nick
}
Mobille biraz sorun çıkıyor k.bakma anca böyle düzenlemeler yapıyorum ama şuan istediğin gibi çalışması gerek

alphae 27 Ağustos 2019 00:43
Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:
Set Nickli Üyeden Alıntı (Mesaj 1042142259)
Kod:
on *:text:*:#: {
  if $regex($3,/^(onaylayınız)$/Si) && $nick == nickserv {
    %soru = $read(sorular.txt)
      msg #help $strip($1) Soru: $token(%soru,1,149)
      msg #help  $strip($1) Nick kaydınızı tamamlamak için yukarıdaki soruyu cevaplayınız.
      .hadd -m register $strip($1) $token(%soru,2,149)
      return
    }
  if $hget(register,$nick) { %v1 = $v1
    if %v1 == $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -m register $nick | return }
  gzline $nick +0 yanlis cevap | ns dropnick $nick | hdel -m register $nick
}
Mobille biraz sorun çıkıyor k.bakma anca böyle düzenlemeler yapıyorum ama şuan istediğin gibi çalışması gerek

son bir sorum olacak simdi help odasina giren botlar özele yazarsa nasil engeleriz ? help odasinda olan biri özelere yazamasin ? bot engelesin

Set 27 Ağustos 2019 00:51
Cevap: mirc botunda özelde random soru sordurmak
 
Alıntı:
alphae Nickli Üyeden Alıntı (Mesaj 1042142264)
son bir sorum olacak simdi help odasina giren botlar özele yazarsa nasil engeleriz ? help odasinda olan biri özelere yazamasin ? bot engelesin
Engelleme yaptıramazsın, özel bir modülle ancak engelletirsin, unreal bazlı o şekil istediğin sonucu alabilirsin, yada bot üstünden değilde web bazlı işlem yatırırsın kanalda shun uygulatirsin birçok fikir çıkartabilirsin kısaca


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 00:42.
Sayfa 2 Toplam 3 Sayfadan 1 2 3
Konuya ait 40 Mesajı başka Sayfada göster

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