Çözüldü mirc botunda özelde random soru sordurmak - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

alphae · 17 Temmuz 2019, 00:42

Merhaba..

kanala girip nickini kayit eden birine bot özelde random.txt icinde rasekele 100 sorudan bir soru sorsun.
dogru ise sorunun cevabı o nicke /nickserv clearauth nick yapsın böyle bisi yapmak istiyorum
ve bot o nicki odalara saojinlesin.

yardiminiza ihtiyacim var.

YouMyCure · 19 Temmuz 2019, 09:42

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

Merhaba..

kanala girip nickini kayit eden birine bot özelde random.txt icinde rasekele 100 sorudan bir soru sorsun.
dogru ise sorunun cevabı o nicke /nickserv clearauth nick yapsın böyle bisi yapmak istiyorum
ve bot o nicki odalara saojinlesin.

yardiminiza ihtiyacim var.

ilk önce services üzerinde buna benzer bir log elde etmen lazım,
Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

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

<NickServ> [ NS-REGISTER ] deneme Nick'i deneme@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].com email üzerine kayıt edilmişdir.

nick 4. karakterdir, ve başında/sonunda ince yazı () karanteri vardır bunu temizlemek için $srtip kullanılır
Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

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

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

sorular.txt içeriği

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

Türkiyenin Başenti Neresidir ?•Ankara
Atatürk Kaç Yılında Vefat Etti ?•1938
Romayı Kim Yaktı ?•Neron

Heartbroken · 19 Temmuz 2019, 19:07

Yukarıda İki Hata Var Ki;

"Atatürk Kaç Yılında Vefat Etti ?•1881"
(Doğum Tarihine Akıl Gitti Sanırım!)

"Romayı Kim Yaktı ?•Sezar"
( [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] )
(Net Olmamakla Birlikte, Neron'a Kesilmiş Bir Bilettir!)

(Sezar'ın Hakkı Sezar'a! İadeli Taahhütlü...)

Ukalalık Gibi Olmasın Ama;
İlla Birinin Yazması Şarttı!
O Da Ben Olayım Bari...

nikotin · 20 Temmuz 2019, 16:47

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

Merhaba..

kanala girip nickini kayit eden birine bot özelde random.txt icinde rasekele 100 sorudan bir soru sorsun.
dogru ise sorunun cevabı o nicke /nickserv clearauth nick yapsın böyle bisi yapmak istiyorum
ve bot o nicki odalara saojinlesin.

yardiminiza ihtiyacim var.

Bunu istemenizdeki amac nedir? Maksat degisiklik olsun diye mi
Yoksa saldırı botlarına karsı bir önlem amaclı mı?

Degisiklik icinse anlarım
Diger türlü bir isinize yaramaz.
Yaraması icin cevap satırlarının sürekli degismesi lazım

alphae · 20 Ağustos 2019, 22:20

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

ilk önce services üzerinde buna benzer bir log elde etmen lazım,
Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

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

<NickServ> [ NS-REGISTER ] deneme Nick'i deneme@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].com email üzerine kayıt edilmişdir.

nick 4. karakterdir, ve başında/sonunda ince yazı () karanteri vardır bunu temizlemek için $srtip kullanılır
Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

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

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

sorular.txt içeriği

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

Türkiyenin Başenti Neresidir ?•Ankara
Atatürk Kaç Yılında Vefat Etti ?•1938
Romayı Kim Yaktı ?•Neron

aslinda bunlara gerek yok mail-auth.c dosyasi icinde kayit eden nicki belirtigim odaya söyle bisi
göndere bilmek lazim örnek Ayşe nickini kayit etti /ns clearauth ayşe

alphae · 21 Ağustos 2019, 03:12

haletim.

alphae · 26 Ağustos 2019, 14:32

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

ilk önce services üzerinde buna benzer bir log elde etmen lazım,
Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

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

<NickServ> [ NS-REGISTER ] deneme Nick'i deneme@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].com email üzerine kayıt edilmişdir.

nick 4. karakterdir, ve başında/sonunda ince yazı () karanteri vardır bunu temizlemek için $srtip kullanılır
Kaynak: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

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

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

sorular.txt içeriği

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

Türkiyenin Başenti Neresidir ?•Ankara
Atatürk Kaç Yılında Vefat Etti ?•1938
Romayı Kim Yaktı ?•Neron

Bende bu şekilde kayit bilgileri çikiyor.

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

[14:25] -NickServ- gkghkh nick'i basari ile kaydedilmistir.
•
[14:25] -NickServ- Nickiniz icin adminlere onay istegi talebi gonderildi.
•
[14:25] -NickServ- Admin'lerden nickinizin onaylanmasini talep ediniz.
•
[14:25] -NickServ- Nick sifreniz: 740007 'dir. Lutfen sifrenizi unutmayiniz ve kimseye soylemeyiniz.
•

ircservices ile admin odasina yazdirdigim log
[14:25] <NickServ> gkghkh Nickini onaylayınız bilgi : ~Admin@95.70.129.151 .onay gkghkh
[14:27] <NickServ> gkghkh Nickini onaylayınız bilgi : ~Admin@95.70.129.151 .onay gkghkh

Kodu degistirdim olmadı altaki gibi

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

on *:text:*:*: {
  if $regex(#,/^#/) { 
    if $regex($1,/^(Nickserv)$/Si) { 
      msg $strip($1) Soru: $token($read(sorular.txt),1,149) 
      msg $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 $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick } }
}

YouMyCure · 26 Ağustos 2019, 14:43

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

Bende bu şekilde kayit bilgileri çikiyor.

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

[14:25] -NickServ- gkghkh nick'i basari ile kaydedilmistir.
•
[14:25] -NickServ- Nickiniz icin adminlere onay istegi talebi gonderildi.
•
[14:25] -NickServ- Admin'lerden nickinizin onaylanmasini talep ediniz.
•
[14:25] -NickServ- Nick sifreniz: 740007 'dir. Lutfen sifrenizi unutmayiniz ve kimseye soylemeyiniz.
•

ircservices ile admin odasina yazdirdigim log
[14:25] <NickServ> gkghkh Nickini onaylayınız bilgi : ~Admin@95.70.129.151 .onay gkghkh
[14:27] <NickServ> gkghkh Nickini onaylayınız bilgi : ~Admin@95.70.129.151 .onay gkghkh

Kodu degistirdim olmadı altaki gibi

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

on *:text:*:*: {
  if $regex(#,/^#/) { 
    if $regex($1,/^(Nickserv)$/Si) { 
      msg $strip($1) Soru: $token($read(sorular.txt),1,149) 
      msg $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 $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick } }
}

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

on *:text:*:*: {
  if $regex(#,/^#/) { 
    if $regex($3,/^(onaylayınız)$/Si) { 
      msg $strip($1) Soru: $token($read(sorular.txt),1,149) 
      msg $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 $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick } }
}

alphae · 26 Ağustos 2019, 16:01

YouMyCure 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(#,/^#/) { 
    if $regex($3,/^(onaylayınız)$/Si) { 
      msg $strip($1) Soru: $token($read(sorular.txt),1,149) 
      msg $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 $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick } }
}

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: Kodu kopyalamak için üzerine çift tıklayın!

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 } }
}

Set · 26 Ağustos 2019, 18:01

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

on *:text:*:*: {
  if $regex(#,/^#/) { 
    if $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 -sm Register $strip($1) $token(%soru,2,149) 
    }
  }
  else { if $hfind(Register,$nick) = $1- { msg #help $nick Nick kaydınız tamamlandı | nickserv clearauth nick | .hdel -s Register $nick } }
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
mirc özelde arka plan	fav	mIRC Scripting Sorunları	3	04 Şubat 2012 21:20
mIRC 6.35 versiyonunda seslenmelerde ve özelde susmayan ses sorunu	D3Ly	mIRC Scripting Sorunları	2	11 Ocak 2011 00:52
Mirc özelde hareketli resim gif oynatma	KnOuCK	mIRC Scripting Sorunları	3	29 Nisan 2010 21:08
Oyun Botunda Soru Yansıtmama Hatası	YANSIMA	Eggdrop, NeoStats, BNC	3	07 Şubat 2007 20:37
Soru botunda timer ların karışmaması ?	F0X	mIRC Scripting Sorunları	11	21 Temmuz 2006 22:40

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.