mIRC Scripting  


Geri dön   mIRC Scripting > mIRC Scripting > Help - Yardım

Help - Yardım mIRC Scripting hakkında her konuda yardım alabileceğiniz bölümdür.

Cevapla
 
LinkBack Seçenekler
  #1  
Alt 27 Mayıs 2012, 16:40
Avatar Yok

mS Puan: 1
mS Derece: Senior
 
Üyelik tarihi: 21 Mayıs 2012
Mesajlar: 2
Konular: 1
Eklentiler: 0
Alınan Teşekkür: 0
Yapılan Teşekkür: 0
Standart Kalıp öss soru mantalitesi

Selamun aleyküm mIRCScripting.
Ben sunucu üzerinde Coğrafya, Tarih ve Edebiyat'ta belirli terimlere çalışmak istiyorum.
Örnek; !sor tarih 10
şeklinde bir komut uyguladığımda botum bana mevcut tarih klasör'ü içindeki kolay, zor, orta tarih textlerindeki tarih sorularından "karışık bir şekilde" 10 tane soru soracak.
Kolay txt cevaplama süresi 30 saniye, orta txt içindekini 50 saniye, zor txt 60 saniye.
Çalışma opsiyonu; Nick(Senior) yaklaşık 10 adet tarih sorun sıralanıyor;
Örnek
Soru(1): İstanbul'u kim, kaç tarihinde fethetti. (30 saniyelik bir soru)
Cevap: ***** ****** ****** **** (Cevaplama süreniz: 30 saniye) / (Puan: 20)
İpucu1: F**ih **lt** Me**** **53 (Kalan süreniz: 22 saniye) / (Kalan puan: 13)
İpucu2: Fa*ih S*lt*n Me*me* 1*53 (Kalan süreniz: 9 saniye) / (Kalan puan: 7)
30 saniyelik süreniz doldu, cevap: Fatih Sultan Mehmet 1453
-
Doğru cevaplanırsa: Tebrikler nick(Senior), doğru cevapladınız.
2 saniye içerisinde cevapladığınız için "20 puan" aldınız.
...
Toplam 10 adet Tarih sorusu başarıyla sorulmuştur nick(Senior).
(Bu kısım puanlı olursa belki daha faydalı olabilir diye düşünüyorum. Diğer arkadaşlar içinde kullanabilirim.)
- Oyun botu tarzında olabilir yani cevaplamak için belirli süre ve belirli puanlar verebilir.
- !top10 tarzı birşeylerde olabilir. Tabi bunu sizin insiyatifinize bırakıyorum.
Coğrafya ve Edebiyatta örnekteki gibi olmalı.
Son olarak bir nick bu mantığı çalıştırırken başka bir kullanıcı müdahele etmezse çok daha sağlıklı olur.
Şimdiden uğraşlarınız için teşekkür ederim. Benimkisi değerli üstadlardan istek değil, sadece bir ricadır.
Saygı ve sevgiler. İyi forumlar...
Not: Konu mantığınıda az çok anlatırsanız sevinirim.
3 senedir IRC'e giremiyordum. Tekrar bilgilerimi tazeleyebilmek açısından bana yardımcı olmasını istiyorum.

Konu Senior tarafından (27 Mayıs 2012 Saat 16:43 ) değiştirilmiştir.
Alıntı ile Cevapla
Sponsored Links
  #2  
Alt 28 Mayıs 2012, 22:23
CoCoRiCo - ait Kullanıcı Resmi (Avatar)
 Chief 

mS Puan: 571
mS Derece: CoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo Çalışkan
 
Üyelik tarihi: 10 Temmuz 2009
Bulunduğu yer: \xml:http\
Yaş: 41
Mesajlar: 135
Konular: 22
Eklentiler: 0
Alınan Teşekkür: 85
Yapılan Teşekkür: 19
Standart

sen kısaca bot yazdırmak istiyorsun(!?).. Sen; biryerlerden baslarsan eksiklerini tamamlar, yonlendirmeni yaparız. başarılar.
__________________
3m2t
//alias $str($+(alias,$chr(32)),4) | alias
Alıntı ile Cevapla
  #3  
Alt 29 Mayıs 2012, 12:24
Avatar Yok

mS Puan: 1
mS Derece: Senior
 
Üyelik tarihi: 21 Mayıs 2012
Mesajlar: 2
Konular: 1
Eklentiler: 0
Alınan Teşekkür: 0
Yapılan Teşekkür: 0
Standart

Estafurullah üstad. Ben bırakalı uzun bir süre oldu o yüzden pek hatırlamıyorum. Yoksa sizi uğraştırmak değil amacım. Zaten ben yazın, yazılmalı vs tarzı bir kelime kullanmadım, rica ettim sadece. Boş vaktimi dolu geçirmek adına eğlenceli birşey yapmak için. Yoksa tabiki kimse yazmak zorunda değil. Kimse kimsenin babasının uşağı değil. Sonradan pişman oldum açtığıma ama nafile. Sen uğraş diyorsan, sana söz bu post burda kala dursun. "/help" dosyasından tüm hepsini tekrar inceleyip yazmak için uğraş vereceğim. Kusura bakmayın tekrardan.
Alıntı ile Cevapla
  #4  
Alt 29 Mayıs 2012, 16:08
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 32
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 40
Yapılan Teşekkür: 0
Standart

Sen bakma cocorico-ya senior, yaşlandı artık. E haliyle sinir stres yapıyor. Çekilmez bir adam oldu. 40 yaş sendromu idare edeceksiniz artık. Ben bile birşey diyemiyorum artık, bastonu kafamıza yer olduk.

Neyse konuya gelince, cocorico haklı. .)
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #5  
Alt 31 Mayıs 2012, 11:13
Avatar Yok
 Coders 

mS Puan: 111
mS Derece: Paint MeraklıPaint Meraklı
 
Üyelik tarihi: 06 Kasım 2011
Bulunduğu yer: İstanbul
Mesajlar: 31
Konular: 4
Eklentiler: 3
Alınan Teşekkür: 0
Yapılan Teşekkür: 8
Standart

Bakalım nasıl bir kod yazacaksın merakla beklemediyim.
Alıntı ile Cevapla
  #6  
Alt 01 Haziran 2012, 22:54
CoCoRiCo - ait Kullanıcı Resmi (Avatar)
 Chief 

mS Puan: 571
mS Derece: CoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo ÇalışkanCoCoRiCo Çalışkan
 
Üyelik tarihi: 10 Temmuz 2009
Bulunduğu yer: \xml:http\
Yaş: 41
Mesajlar: 135
Konular: 22
Eklentiler: 0
Alınan Teşekkür: 85
Yapılan Teşekkür: 19
Standart

Hasancım Kurt kocayınca diye bi hata sözü vardı ama tam hatırlayamadım ihtiyarlık işte :P
__________________
3m2t
//alias $str($+(alias,$chr(32)),4) | alias
Alıntı ile Cevapla
  #7  
Alt 01 Haziran 2012, 23:35
Avatar Yok
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 32
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 40
Yapılan Teşekkür: 0
Standart

Bakın ne dedim selam vermeye bile gelmiyor .) (tamam sustum)
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
  #8  
Alt 07 Haziran 2012, 23:58
Avatar Yok
 Coders 

mS Puan: 621
mS Derece: Difuzyon ÇalışkanDifuzyon ÇalışkanDifuzyon ÇalışkanDifuzyon ÇalışkanDifuzyon ÇalışkanDifuzyon Çalışkan
 
Üyelik tarihi: 16 Temmuz 2009
Bulunduğu yer: code talks!
Mesajlar: 83
Konular: 36
Eklentiler: 4
Alınan Teşekkür: 5
Yapılan Teşekkür: 0
Standart

Merhaba,

Soru-Cevap mantığınıza yardımcı olabilecek kısımları parçalar halinde paylaşayım:

on TEXT eventını !start ile tetikleyin ve tetikleyen %nicki değer olarak atayın ki yanıt kısımlarında cevap veren nicki eşleştirme yapabilsin.Böylelikle 2. bir kişinin oyuna müdahelesini engellemiş olursunuz.

!start verildikten sonra timer'e bağlı bir ALIAS ile döngü oluşturmalısınız.Örneğin;
on *:text:*:#kanal:{
if $1 == !start { alias1 | .timer 0 30 alias1 }
...devamı aşağıda
}
Artık herşey bu alias1 mecrasında ilerleyecektir.alias1 yapınızı öyle bir dizayn etmelisiniz ki soruları istediğiniz txt belgesinden sırayla çekmeli,doğru veya yanlış cevaplar verilmesi halinde bile bu stratejiyi bozmayacak bir düzende ilerlemelidir.Örneğin;

alias alias1 {
set %soruseçenek $r(1,2)
if %soruseçenek == 1 {
set %sorusatır $read(Soru1.txt)
set %sorucevap $token(%sorusatır,2,42)
msg %soruchan $token(%sorusatır,1,42)
msg %soruchan $chr(160) $chr(160)
.timerdifyipucu 1 10 msg %soruchan 2,7IPUCU:5 $ipucu(%sorucevap,20) $(|) msg %soruchan $chr(160) $chr(160) *
}
if %soruseçenek == 2 {
msg %soruchan $read(Soru2.txt)
msg %soruchan $chr(160) $chr(160)
.timerdifyipucu 1 10 msg %soruchan 2,7IPUCU:5 $ipucu(%sorucevap,10) $(|) msg %soruchan $chr(160) $chr(160)
}
}

Sorumu buraya yazıyorum*cevabımı yıldızdan sonra yazıyorum
txt belgemde ekli olan soru*cevap şablonuma göre alias1 şu şekilde çalışır:
1 ile 2 rakamı arasında random olarak bir tercih yapar.Şayet tercihi 1 ise Soru1.txt metin belgesinden rastgele bir soru seçer.Soruyu kanala yazar ve 10 sn. sonra ipucu vermeye başlar.$ipucu(%sorucevap,20) ise cevabın %20'sini ipucu olarak sunar.
Şayet tercihi 2 ise Soru2.txt metin belgesinden rastgele bir soru seçer ve 10 sn sonra $ipucu(%sorucevap,10) cevabın %10'unu ipucu olarak sunar.


Gelelim ipucu (*) değerlendirmesi için gerekli olan aliasımıza:
alias ipucu {
var %cnk = $round($calc((1-$2 /100)*$regex($1,/[^\*\s]/g)),0),%dify = $1,%n,%i = 1
while (%cnk) {
dec %cnk
$null($regex(dify,%dify,/([^\*\s])/g))
var %n = $regml(dify,$r(1,$regml(dify,0))).pos,%dify = $+($left(%dify,$calc(%n -1)),*,$right(%dify,- $+ %n))
}
return %dify
}

BURAYA KADAR SORU-CEVAP ATAMA VE İPUCU SEÇENEKLERİMİZ alias1 AKIŞINDA SEYİR ETMEKTE.
Artık kanala gelen cevapların doğruluğunu test etmede ve puanlama sistemine geçebiliriz:
...devamı aşağıda
if ($1- == %sorucevap) {
if !$read(puanlar.txt,r,/^\Q $+ $nick $+ \E\s/) { write puanlar.txt $nick 10 }
else {
var %difi $readn
var %yeah = $calc($token($read(puanlar.txt,%difi),2,32) +10)
write $+(-l,%difi) puanlar.txt $nick %yeah
if %yeah == 100 { mode $chan +v $nick | msg $chan Tebrikler $nick 100 puanın oldu }
}
timerdify* off
msg $chan Tebrikler $nick Doğru yanıt: %sorucevap
unset %sorucevap
.timerdifyz 1 3 alias1 | .timerdify 0 33 alias1
}

alias1 soruyu kanala yazarken aynı anda %sorucevap değerini atıyor,şayet sizin kanala yazdığınız %sorucevap ile örtüşüyorsa size Doğru cevap diyerek puan verecektir.3 sn sonra alias1 döngümüz başa gelecektir.
Ve hemen sonrasına 33 sn. sonunda kendini tazeleyen 2. bir alias1'i devreye alacaktır.Bu sistemde soruların yanıtları süre sonunda belirtilmemiştir ayrıca kanala sadece kendi yazdığınızın dikkate alınması ilavesi getirilmemiştir.
Bu değerleri kendinize göre ayarlayabilirsiniz.

Umarım düzeneğin faydası olmuştur.
__________________
Koli
Alıntı ile Cevapla
Cevapla

Etiketler
kalıp, mantalitesi, öss, soru

Seçenekler

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Soru-cevap botu Minstrel Help - Yardım 2 15 Aralık 2011 21:03
bi kaç soru WeiLSiDe Help - Yardım 7 29 Eylül 2009 16:26
Kick Ban Mesajları hakkında soru Choice Help - Yardım 3 06 Eylül 2009 21:25
Soru ? eXLove Help - Yardım 3 03 Eylül 2009 21:21


Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting©
Powered by vBulletin®
Copyright © 2000-2015, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.1

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76