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/)
-   TCL Scriptler (https://www.ircforumlari.net/tcl-scriptler/)
-   -   Merlin (Trivia Baloncuk versionu) (https://www.ircforumlari.net/tcl-scriptler/13239-merlin-trivia-baloncuk-versionu.html)

Brain 06 Mart 2006 04:16

Merlin (Trivia Baloncuk versionu)
 
Toplam 1 Eklenti bulunuyor.
Alıntı:

[21:50:01] <@Merlin> Balina nun ana yemeği nedir
[21:50:01] <@Merlin> İpucu: P*******
[21:50:01] <aCoustiC> Plankton
[21:50:01] <@Merlin> Guzel gidiyorsun aCoustiC! Doğru Cevap Plankton. Soruyu 16.5 Saniyede Bildiniz.
[21:50:01] <@Merlin> Plankton. Size 5 Balon kazandirdi!
[21:50:01] <@Merlin> En çok baloncuk toplayanlar arasına girdin, ödülün +h(halfop) :)
[21:50:01] <@Merlin> Skorlar: CrAzYeAgLe03 3121, aCoustiC 1336, mito 206, KaYToKo 131
[21:50:01] * Merlin sets mode: +v aCoustiC
Bot özellikleri

Bonus Puan
Otovoice (listeye girmisler icin)
trivia.1.3.4 de bulunan zamanlayicilar duzenlenerek gereksiz buglarda giderildi.

Botun en buyuk ozelligi voice ve bonus puan vermesi

Bunun disinda hatali satirlarida duzeltildi 1 ay once paylasima acmistim burada da yayinlamayi uygun gordum

Trivia1.3.4 uzerinde düzenlemeler yapilarak bu hale getirilmistir.

merlin.tcl icindeki gerekli kisimlarin tamami turkcedir sorun yasamayacaginiz dilegiyle.

Kolay gelsin

Download icin ekde bulunan dosyayi indiriniz.

Kablosuz NET 06 Mart 2006 10:49

Eline sağlık çok hoş olmuş bende renklerini düzenledim kendi botumun renklerini yaptım milletinde baya hoşuna gitti. Özellikle +100 olayını çok sevdiler :) isteyen arkadaşları [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] #Oyun kanalından renkleri değiştirilmiş haldeki halini görebilirler dileyen arkadaşlar ile paylaşırım.. Mühim olan bilgiyi paylaşmak.

Maniack 06 Mart 2006 15:34

Paylaşımı için Teşekkür Ederim Arkadaşım.

iNaL 06 Mart 2006 16:07

tesekkurler..

Brain 06 Mart 2006 17:31

Umarim daha da gelisir onerilerinizle. Saygilar.

seths 06 Mart 2006 18:14

Arkadaşlar FTp den göndericem TCL değişicem Ama biraz Detaylı anlatın Acemiyim :=)

Brain 07 Mart 2006 15:28

Alıntı:

Ask_Harfleri Nickli Üyeden Alıntı
Eline sağlık çok hoş olmuş bende renklerini düzenledim kendi botumun renklerini yaptım milletinde baya hoşuna gitti. Özellikle +100 olayını çok sevdiler :) isteyen arkadaşları [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] #Oyun kanalından renkleri değiştirilmiş haldeki halini görebilirler dileyen arkadaşlar ile paylaşırım.. Mühim olan bilgiyi paylaşmak.

Guzel duzenlenmis ellerine saglik fakat Numara ile baslayan sorularini duzenlemen lazim sebebide eger renk kodlari geldiginde soru da da numara bulunduguunda pix reng halini alip renkler isteginden farklı cikmaya vasliyor. her sorunun onune ' " @ gibi karakteristik eklentiler yaparsan bu tarz hatalarda karsina cikmayacaktir.

mIRc Code

Kod:


alias duzelt {
  var %x $lines(banka.txt)
  while (%x >= 1) {
    if ($regex($gettok($read(banka.txt,%x),1,42),^[Aa].+)) {
      inc %y
      if ($regex($gettok($read(banka.txt,%x),1,42),.+[[:space:]]$)) {
        var %::x = $lower($left($gettok($read(banka.txt,%x),1,42),-1))
        var %::y = $lower($replace($gettok($read(banka.txt,%x),2,42),Ş,ş,İ,i,Ü,ü,Ğ,ğ,Ç,ç,Ö,ö))
        write banka2.txt $+(@,$buyult(%::x),?,*,%::y)
      }
      else {
        var %::x = $lower($gettok($read(banka.txt,%x),1,42))
        var %::y = $lower($replace($gettok($read(banka.txt,%x),2,42),Ş,ş,İ,i,Ü,ü,Ğ,ğ,Ç,ç,Ö,ö))
        write banka2.txt $+(@,$buyult(%::x),?,*,%::y)     
      }
    }
    dec %x
  }
  echo işlem tamamlandi %y işlem gerçekleşti
  unset %y
}
alias buyult {
  var %a = 0, %aa = 0, %b, %c, %d
  while (%aa < $0) {
    inc %aa
    %c = $eval($+($,%aa),2)
    %d = $iif(%d,%d $+ $chr(44)) %c
  }
  tokenize 32 %d
  while (%a < $0) {
    inc %a
    %c = $eval($+($,%a),2)
    %b = %b $+($upper($left(%c,1)),$right(%c,-1))
  }
  return %b
}

Trivia Oyun botunuzun soru bankasini alfabetik yapmak ve düzenli olmasini sağlamak için yaptigim bir kodcuk


Düzenek su sekilde calismakta

çok fazla soru oldugu zaman mirc'iniz yogun calisacagindan direkt olarak secenekli olarak alfabetik siraya dizdim manuel olarak siz belirlemek zorunda kalacaksınız hangi harf'i yazmasi gerektigini.


if ($regex($gettok($read(banka.txt,%x),1,42),^[Aa].+)) {

kısmındaki Aa yazilarini Bb yaparsaniz direkt olarak b ile baslayan harfleri blirteceginiz data türüne yazacaktır.

if ($regex($gettok($read(banka.txt,%x),1,42),^[Aa].+)) {

Aa kısmına
0-9
yazarsaniz numaralari
\W
yaparsaniz harf ve rakam olmayan özel karakterleri de listeleyecektir

Uymanız gereken kurallar.

$lines(banka.txt) buradaki banka.txt içerisinde düzenlemek istediginiz soru bankasinin sorulari olmak zorunda.

write banka2.txt buradaki banka2.txt de düzenlenmis sorularin yazilacagi metin belgesi istege baqli olarak değiştirebilirsiniz.


AMACI:

Sorular arasındaki her bosluktan sonra harfler büyütülmekte.
A Milli Futbol Takımımız Tarihinde Ilk Kez Kaç Yılında Dünya Kupasına Katılmıştır?*1954
gibi güzel ve anlasilir bir yazi metni kazandirmis oluyoruz bu sayede.
renk kodlarinin kaymamasi icinde her sorunun basina @ isareti eklenmekte

Cevap kısmındaki türkce karakterleri (LOWER) yani kücültülmekte
cevaplarin kücük ytazilmasindaki amac eggdrop'un türkçe karakter setini tanimlamiyor olmasi ve cevap dogru bile olsa algilamamaktadir.

ZORBEY 11 Mart 2006 20:31

soru bankası olan banka.txt yide koyabilirmisiniz buraya acaba?

Brain 11 Mart 2006 22:29

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

ZORBEY 12 Mart 2006 20:02

çok tşk acoustic


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

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