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

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

- - Sınav Botu (https://www.ircforumlari.net/mirc-scripting-sorunlari/344822-sinav-botu.html)

Cevap: Sınav Botu

Tamam Hallettim $kanal kısmında Sorun vardı Teşekkürler.

Cevap: Sınav Botu

Peki , Her SOruya 10 TL gibi ücret belirtsek Belirlenen Sorulara'da 100*200 TL belirtsek , kim 500 milyar ister gibi olamazmı
Soruyu bilemeyen'ler kazandığını Parayı Kaybetsin

Cevap: Sınav Botu

Alıntı:

Sky-bLue Nickli Üyeden Alıntı (Mesaj 1041001416)

Peki , Her SOruya 10 TL gibi ücret belirtsek Belirlenen Sorulara'da 100*200 TL belirtsek , kim 500 milyar ister gibi olamazmı
Soruyu bilemeyen'ler kazandığını Parayı Kaybetsin

Yazılırsa Eğlenceli Farklı Bir Şey Çıkar ortaya. Vakit Bulursam Bakarım.

Cevap: Sınav Botu

Alıntı:

Sky-bLue Nickli Üyeden Alıntı (Mesaj 1041001416)

Peki , Her SOruya 10 TL gibi ücret belirtsek Belirlenen Sorulara'da 100*200 TL belirtsek , kim 500 milyar ister gibi olamazmı
Soruyu bilemeyen'ler kazandığını Parayı Kaybetsin

Kim 500 Milyar ister oyun botu iyi bir proje ve zevkli bir oyun olur büyük ihtimalle.
Eğer @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ten önce zaman bulursam bende bakabilirim.

Cevap: Sınav Botu

Alıntı:

Paint Nickli Üyeden Alıntı (Mesaj 1041002133)

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

Cevap: Sınav Botu

Alıntı:

Set Nickli Üyeden Alıntı (Mesaj 1040465390)

Kod:

alias kanal return #as

alias baslat {

  rands

  .timerbaslat 0 60 /rands

}

alias rands {

  set %:rand $rand(1,$lines(sorular.txt))

  soru 

}

alias soru {

  if (%:rand == %rand) {  var %:rand = $rand(1,$lines(sorular.txt)) }

  unset %cevaplayan

  set %rand %:rand

  var %sorulacak = $read(sorular.txt,%:rand)

  set %soru $gettok(%sorulacak,1,11)

  set %cevap.a $gettok(%sorulacak,2,11)

  set %cevap.b  $gettok(%sorulacak,3,11)

  set %cevap.c  $gettok(%sorulacak,4,11)

  set %cevap.d  $gettok($gettok(%sorulacak,1,153),5,11)

  if (%cevap.a ==  $gettok(%sorulacak,2,153)) { set %dogru A | set %yanlis  b c d }

  if (%cevap.b ==  $gettok(%sorulacak,2,153)) { set %dogru B |  set %yanlis a c d }

  if (%cevap.c ==  $gettok(%sorulacak,2,153)) { set %dogru C |  set %yanlis a b d }

  if (%cevap.d ==  $gettok(%sorulacak,2,153)) { set %dogru D |  set %yanlis a b c }

  msg $kanal 5 %:rand 4) SORU: %soru 

  msg $kanal  -

  msg $kanal A) %cevap.a

  msg $kanal B) %cevap.b

  msg $kanal C) %cevap.c

  msg $kanal D) %cevap.d

  msg $kanal -

  msg $kanal 5 Cevap Verme Sureniz 4 60 5Saniyedir..

  .timer20 1 20 msg $kanal 5Kalan Cevap Verme Suresi 4 40 5 Saniye.

  .timer40 1 40 msg $kanal 5Kalan Cevap Verme Suresi 4 20 5 Saniye.

  .timer59 1 59 msg $kanal 5Sure Bitmistir Dogru Cevap 4 %dogru 5 Sıkkıdır.

}

on *:text:*:#: {

  if ($chan == $kanal) {

    if ($istok(%cevaplayan,$nick,32)) { notice $nick  Onceden Yanlis Cevap Vermisdiniz Bu Soruda Cevap Hakkiniz Yok ! | halt }

    if ($istok(%yanlis,$1,32)) { msg # Yanlis Cevap $nick ! | %cevaplayan = $addtok(%cevaplayan,$nick,32) | halt }

    if ($1 == %dogru) { msg # Dogru Cevap $nick Tebrikler.. | baslat }

  }

}

Kod:

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]>  3 ) SORU: Bir ChanServ Set Ozelligi

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> -

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> A) restricted

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> B) restricted

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> C) registera

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> D) restrictedb

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> -

[00:45] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]>  Cevap Verme Sureniz  60 Saniyedir..

Suanlik Bu kadar'ini Yapabildim Top10 kısmı eklemedim o kadar

Kullanimi :
#as kanali yerine oyun kanalini sececen
Sorular.txt dosyasinda sorulara Göre Ayarlarsin
/baslat Yazdiginda calişir.

!dur , !baslat Komutu ile Ekleme Yapabilirmiyiz Ama Bunu Admin.txt 'deki nickler Yapabilsinler.

Cevap: Sınav Botu

Onu Yaptım , Hatta !Ac , Kapat kısmı ile Beraber Peki , Sorular.txt 'e
!Soruekle SOru
!sorusil Soru

Şeklinde eklenti Yapsam Kafi'dir