!ipucu vermesi mümkünmü? Yardim edermisiniz? Selamun aleyküm, IRCForumlari.net kullanicilari.. XcLusive(HaLiL)'in yazdigi Kaos mIRC versionu kendimce editlemeye calistim. Takildigim 1-2 bölüm var, bunlari cözebilirmiyiz? Soru sordugunda 3 defa ipucu vermesini istiyorum yani Trivia gibi, örnek; 343.Soru: Bu konuyu kim acti? 1.ipucu:***** 2.ipucu: Q***r 3.ipucu: Q*car Soruyu bilemediginiz. Cevap: QscaR. sanirim acik bir sekilde anlattim. Ve birde kacinci soru oldugunu ayarlasak >> 343.Soru gibi. PHP- Kodu: iyi ve hayrli Forumlar dilerim[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]. |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? Bildiğim kadarıyla soruları sorarken yani.. !tekrar dediğinde aynı soruyu tekrarlıyor.. ipucu konusuna gelirsek, Tek şıklı bir cevap yok yani oyunda 7 8 sorulu cevaplarda var ona göre düzenlenmiş. zaten ipucu şeklinde olursa bir zevkide kalmaz diye düşünüyorum.. Kişisel fikrim.. |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? Alıntı:
iyi ve hayrli, Forumlar dilerim[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]. |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? istediklerin çok basit şeyler fakat hangi değişgende cevap var vs. bilmediğimizden dolayı senin istediğini yapmak için oturup bu kodu baştan aşşağıya satır satır incelemek gerek, bunun yerine kodun sahibine bir pm atsan yardım sever biridir seni kırmaz yardımcı olur. |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? kodu bir eklenti şeklinde koyarsan düzeltebilirim ama saten multi cevap olduğu için ipucu biraz abartılı hangi kelime için ipucu verecek ki? :) 345. soru gibi eklenti olabilir. ama dediğim gibi bu kod bende yok foruma koyarsan bişiler yapmaya çalışırız.. (php modunda eklemişsin ve bazı yerler eksik çıkmış) |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? Alıntı:
[13:52] <QscaR> !basla [13:52] <@islamisoru> « Islami SoruBot, "QscaR" tarafindan baslatildi. Hazirlanin.. » [13:52] <@islamisoru> Soru: Islâmiyet'te akilli ve bâlig (ergen ve evlenecek yasa gelmis) olan kimsenin namaz kilarken açmasi veya her zaman baskasina göstermesi ve baskasinin bakmasi haram (günâh) olan yerleri? [13:52] <@islamisoru> Dogru Cevapa: 20 Puan [13:53] <@islamisoru> ipucu: Cevaplanan: 0 Toplam : 1 20 Saniye kaldi! [13:53] <@islamisoru> ipucu: ****** 10 Puan - 10 Sn. kaldi! [13:53] <@islamisoru> Sorunun Cevabi: « avret » Umarim yeterli bir sekilde acikladim, Her sorunun tek cevapi var, örnekte de oldugu gibi, Fakat ipucu vermesini yapamadim, ipucu verdiginde saniye ve puanida azaltsin. Kodu tekrardan yaziyorum, insAllah sorunu cözersin Halil :-) Konu acarkende belirtmistim, kendimce editledim örnek; !gec komutu ile bir sonra ki soruya geciyor :p ;Kod Coded by: XcLusive(HaLiL) ;###### deðiþtirilecek bölümler ###### alias -l botnick return islamisoru alias -l kanal return %Oyunkanali ;#### deðiþtirilecek bölüm sonu ##### alias mdir return $remove($mircexe,$nopath($mircexe)) alias -l puan return 20 alias -l sorular { return $shortfn($mdir $+ sorular.txt) } alias -l sorusira { set %sorusira $rand(1,$lines($sorular)) } alias -l soru { return $gettok($read($sorular,%sorusira),1,42) } alias -l cevaplar { set %cevaplar $gettok($read($sorular,%sorusira),2-,42) } alias -l toplucevap { return $regsubex(%cevaplar,/(\*)/g,$+($chr(32),$chr(124),$chr(32))) } alias -l 10 { msg $kanal 4Ýpucu: 08,02Cevaplanan: $calc($numtok($gettok($read($sorular,%sorusira),2-,42),42) - $numtok(%cevaplar,42)) Toplam : $numtok($gettok($read($sorular,%sorusira),2-,42),42) 12 20 1Saniye kaldý! } alias -l 20 { msg $kanal 4Ýpucu: ******3 10 6Puan 14-3 10 6Sn.1 kaldý! } alias -l sor { sorusira cevaplar msg $kanal 0,4Soru:9,1 $soru $+ ? msg $kanal 4Doðru Cevapa: 3 20 6Puan .timer15 1 10 10 .timer30 1 20 20 .timer45 1 30 sorukapat } alias -l sorukapat { msg $kanal 6Sorunun Cevabý: 14«1 $toplucevap 14» .timerssoru 1 5 msg $kanal 3Hazýrlanýn sýradaki soru geliyor... .timersor 1 8 sor } alias -l sorupuanlarý { if (!$hget(toplist)) { hmake toplist } unset %sorupuanlar var %i = $hget(puanlar,0).data,%x while (%i) { %x = 0,10 $hget(puanlar,%i).item 0,6 $hget(puanlar,%i).data var %nick = $hget(puanlar,%i).item,%puan = $hget(puanlar,%i).data set %sorupuanlar $addtok(%sorupuanlar,%x,32) if ($hget(toplist,%nick)) { hadd toplist %nick $calc($hget(toplist,%nick) + %puan) } else { hadd toplist %nick %puan } dec %i } .hfree -sw puanlar | hsave -a toplist $qt($+($mdir,toplist.data)) return 0,6Puanlar: $+ $iif(%sorupuanlar == $null,0 $+ $chr(44) $+ 6Yok,%sorupuanlar) } on *:start:{ hmake toplist if $isfile($+($mdir,toplist.data)) { hload toplist $qt($+($mdir,toplist.data)) } else { hsave -a toplist $qt($+($mdir,toplist.data)) } server $sunucu } on *:text:*:#:{ if $chan != $kanal halt if $1 == !tekrar msg $kanal 0,4Soru tekrarý:9,1 $soru $+ ? if $1 == !top10 { msg $kanal $toplist } if $1 == !puan { if ($2) { msg $kanal 6 $+ $nick $+ 1 $qt($2) $+ 1Nickli kiþinin puaný:6 $iif($hget(toplist,$2),$hget(toplist,$2),Yok) } else { msg $kanal 6 $+ $nick $+ 1 Sizin puanýnýz:6 $iif($hget(toplist,$nick),$hget(toplist,$nick),Yok ) } } if $1 == !basla && $nick ison $chan && %bot != on { msg $kanal 6«1 Ýslami SoruBot, 6 $+ $qt($nick) $+ 1 tarafýndan baþlatýldý. Hazýrlanýn.. 6» | .timerbot 1 5 sor | set %bot on | halt } elseif $1 == !gec && %bot != off { msg $kanal 6!gec1 Komutu ile bir sonraki soruya gecildi. 3Sorunun cavabi : 14«6 $toplucevap 14» | .set %bot on | .timerbot 1 2 sor | halt } elseif $1 == !dur && %bot != off { msg $kanal 6«1 Ýslami SoruBot, 6 $+ $qt($nick) $+ 1 tarafýndan durduruldu!6 » | set %bot off | .timers off | hsave -a toplist $qt($+($mdir,toplist.data)) | halt } if %bot == on && $findtok(%cevaplar,$1-,0,42) { set %cevaplar $remtok(%cevaplar,$1-,$v1,42) msg # 4Tebrikler1 $nick $+ 3 $puan 6Puan kazandýnýz!4 Dogru cevap: 3 $+ $qt($1-) if !$hget(puanlar) { hmake puanlar } if $hget(puanlar,$nick) { hadd puanlar $nick $calc($hget(puanlar,$nick) + $puan) } else { hadd puanlar $nick $puan } if !$numtok(%cevaplar,42) { msg $kanal $sorupuanlarý .timer15 off | .timer30 off | .timer45 off | .timerssoru off | .timersor off .timer 1 5 msg $kanal 3Bir sonraki soru için hazýrlanýn... .timer 1 8 sor } } } on *:exit:hsave -a toplist $qt($+($mdir,toplist.data)) on *:disconnect:set %bot off | hsave -a toplist $qt($+($mdir,toplist.data)) alias -l toplist { hsave -a toplist $qt($+($mdir,toplist.data)) .hfree -sw toplist | hmake toplist | hload toplist $qt($+($mdir,toplist.data)) if (!$hget(top10puan)) { hmake top10puan } var %xc = $hget(toplist,0).data while %xc { set %top10puan $addtok(%top10puan,$hget(toplist,%xc).data,46) dec %xc } var %sira = $sorttok(%top10puan,46,nr) var %1 = 1,%2 = 1,%3 = 1,%4 = 1,%5 = 1,%6 = 1,%7 = 1,%8 = 1,%9 = 1,%10 = 1 %1 = 0,10 $+ $fazlaise($gettok(%sira,1,46)) 0,6 $gettok(%sira,1,46) %2 = 0,10 $+ $fazlaise($gettok(%sira,2,46)) 0,6 $gettok(%sira,2,46) %3 = 0,10 $+ $fazlaise($gettok(%sira,3,46)) 0,6 $gettok(%sira,3,46) %4 = 0,10 $+ $fazlaise($gettok(%sira,4,46)) 0,6 $gettok(%sira,4,46) %5 = 0,10 $+ $fazlaise($gettok(%sira,5,46)) 0,6 $gettok(%sira,5,46) %6 = 0,10 $+ $fazlaise($gettok(%sira,6,46)) 0,6 $gettok(%sira,6,46) %7 = 0,10 $+ $fazlaise($gettok(%sira,7,46)) 0,6 $gettok(%sira,7,46) %8 = 0,10 $+ $fazlaise($gettok(%sira,8,46)) 0,6 $gettok(%sira,8,46) %9 = 0,10 $+ $fazlaise($gettok(%sira,9,46)) 0,6 $gettok(%sira,9,46) %10 = 0,10 $+ $fazlaise($gettok(%sira,10,46)) 0,6 $gettok(%sira,10,46) return 0,6Top10 Puan Listesi $+(0,$chr(44),4,#10,$chr(44),10,$chr(32),%1) $+(0,$chr(44),4,#20,$chr(44),10,$chr(32),%2) $+(0,$chr(44),4,#30,$chr(44),10,$chr(32),%3) $+(0,$chr(44),4,#40,$chr(44),10,$chr(32),%4) $+(0,$chr(44),4,#50,$chr(44),10,$chr(32),%5) $+(0,$chr(44),4,#60,$chr(44),10,$chr(32),%6) $+(0,$chr(44),4,#70,$chr(44),10,$chr(32),%7) $+(0,$chr(44),4,#80,$chr(44),10,$chr(32),%8) $+(0,$chr(44),4,#90,$chr(44),10,$chr(32),%9) $+(0,$chr(44),4,#100,$chr(44),10,$chr(32),%10) } alias -l fazlaise { unset %y | unset %w var %i = $hfind(toplist,$1,0,w).data while (%i) { %y = $hfind(toplist,$1,%i,w).data %w = %y %w dec %i } return $replace($sorttok(%w,32,a),$chr(32),$chr(44)) } iyi ve hayrli, Forumlar dilerim[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]. |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? Türkçe karakterler çıkmıyor sende onu dosyanın içine atıp foruma koyarmısın |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? Toplam 1 Eklenti bulunuyor. Alıntı:
iyi ve hayrli, Forumlari dilerim[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]. |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? Senide uğraştırdım malum kodlar bende yok :) Alıntı:
Kod: alias -l 10 { msg $kanal 4İpucu: $ipucu(2) } şimdi sana nasıl * koyacağını anlatim bunu değiştirebilirsin, ilk önce remoteleri söyliyim $int = bu remote çıkan bölme işleminde küsürat varsa onu düz hesaba çeker mesela 7 / 2 = 3 şeklinde $ceil = aynı işlem 7 / 2 = 4 $int identifieri bölme işleminde küsürat varsa küsüratı siler ve önceki sayıyı alır. $ceil identifieri aynı şekilde küsürat varsa küsüratı siler ve sonraki sayıyı alır. ipucu sisteminde bunu kullandım mantığı şu: ilk ip ucunda $ceil kullandım ve 2 ye böldüm yarısını yada daha fazlasını * şeklinde verecek ikinci ip ucu sisteminde $int kullandım ve 3 e böldüm bölünen miktar az olduğu için * sayısıda az olacak ve ipucu çoğalacak. kod: ekte.. dediğim gibi remotenin içindeki int ve ceil kısımlarını kendin nasıl ipucu vermek istiyorsan öyle ayarlarsın |
Cevap: !ipucu vermesi mümkünmü? Yardim edermisiniz? HaLiL, yardimin icin tsk ederim, Soru: kisminda örnek; 345. soru eklentisini nasil yapariz, yeterince ugrastirdigimi biliyorum idare ediver :-)) |
Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:29. |
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net