Akıl Testi - Sayfa 2 - IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi

**Mylife** · 14 Ocak 2021, 22:56

Kod sahibi: Mylife

Tarih: 12 Haziran 2019, 10:28

Kod

on $*:text:/^[!.]ak[iı]ltest[iı]/Si:#Kanal: { if (!$2) { msg # Hatalı kullanım lütfen nick belirtin. } | elseif $regex($2,/\W+|\s+|\d+|/Si) && ($2 !ison #) { msg # Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin. } | else { msg # $qt($2) için akıl testi başlıyor... | msg # $qt($2) ne kadar akıllı bakalım! | var %:Mylife = $rand(5,100) | msg #  İşte $qt($2) için sonuçlar: | msg # $str($chr(45), 20),$chr(32) % $+ %:Mylife AKILLI! $chr(32), $+ $str($chr(45), 20) | msg # $str($chr(45), 20),$chr(32) % $+ $calc(100-%:Mylife) AKILSIZ! $chr(32), $+ $str($chr(45), 20) | var %:Kod = $calc(100-%:Mylife) | $iif(%:Kod >= 50,msg # $qt($2) - $read(akılsız.txt,1),msg # $qt($2) - $read(akıllı.txt,1)) } }

Aktif olmasını istediğiniz kanalı event icerisinde belirtmelisiniz.
Belirtilen nick için akıllı ve akılsız olarak 2 sonuc verir.
Belirtilen nick için cıkan sonuca göre akıllı ve akılsız.txt icerisindeki belirtilen metin i kanala yansıtır. ( mirc in bulunduğu klasör ün icine akıllı ve akılsız adında birer tane text dosyası acmalısınız.)
Akıllı ve Akılsız text lerinin icine deneme amaclı 1 satır metin yazmıştım kod da 1 satır için hazırlanmıştır arttırmak istiyenler eklemelerini yapmalıdır.

Örnek görünüm;

[10:02:18] <Mircsystem-> .akiltesti
[10:02:18] <&Mylife> Hatalı kullanım lütfen nick belirtin.
[10:02:25] <Mircsystem-> !akiltesti
[10:02:25] <&Mylife> Hatalı kullanım lütfen nick belirtin.
[10:02:35] <Mircsystem-> .akiltesti 29389234
[10:02:35] <&Mylife> Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin.
[10:02:51] <Mircsystem-> .akiltesti M y l i fe
[10:02:51] <&Mylife> Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin.
[10:03:06] <Mircsystem-> .akiltesti deneme
[10:03:06] <&Mylife> Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin.
[10:04:35] <Mircsystem-> .akiltesti The
[10:04:35] <&Mylife> "The" için akıl testi başlıyor...
[10:04:35] <&Mylife> "The" ne kadar akıllı bakalım!
[10:04:35] <&Mylife> İşte "YouMyCure" için sonuçlar:
[10:04:35] <&Mylife> -------------------- %75 AKILLI! --------------------
[10:04:35] <&Mylife> -------------------- %25 AKILSIZ! --------------------
[10:04:35] <&Mylife> "The" - Sen secilmiş kişisin onlara akıl sanatından bahset.
[10:04:49] <Mircsystem-> .akiltesti CoLoNeL
[10:04:49] <&Mylife> "CoLoNeL" için akıl testi başlıyor...
[10:04:49] <&Mylife> "CoLoNeL" ne kadar akıllı bakalım!
[10:04:49] <&Mylife> İşte "CoLoNeL" için sonuçlar:
[10:04:49] <&Mylife> -------------------- %17 AKILLI! --------------------
[10:04:49] <&Mylife> -------------------- %83 AKILSIZ! --------------------
[10:04:49] <&Mylife> "CoLoNeL" - Sende birgün aklını kullanmayı öğrenebilirsin üzülme.

Kullanım; .akıltesti nick

Not: Sonuçlar doğrultusun da gerçekci bir sonuç çıkmaz random bir değer çıkar ( Panik yapmayın )

iyi forumlar.

14 Ocak 2021, 22:56	#1
Mylife ✓ i don't care if i'm misfit.	Akıl Testi Kod sahibi: Mylife Tarih: 12 Haziran 2019, 10:28 Kod on $:text:/^[!.]ak[iı]ltest[iı]/Si:#Kanal: { if (!$2) { msg # Hatalı kullanım lütfen nick belirtin. } \| elseif $regex($2,/\W+\|\s+\|\d+\|/Si) && ($2 !ison #) { msg # Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin. } \| else { msg # $qt($2) için akıl testi başlıyor... \| msg # $qt($2) ne kadar akıllı bakalım! \| var %:Mylife = $rand(5,100) \| msg # İşte $qt($2) için sonuçlar: \| msg # $str($chr(45), 20),$chr(32) % $+ %:Mylife AKILLI! $chr(32), $+ $str($chr(45), 20) \| msg # $str($chr(45), 20),$chr(32) % $+ $calc(100-%:Mylife) AKILSIZ! $chr(32), $+ $str($chr(45), 20) \| var %:Kod = $calc(100-%:Mylife) \| $iif(%:Kod >= 50,msg # $qt($2) - $read(akılsız.txt,1),msg # $qt($2) - $read(akıllı.txt,1)) } } Aktif olmasını istediğiniz kanalı event icerisinde belirtmelisiniz.* Belirtilen nick için akıllı ve akılsız olarak 2 sonuc verir. Belirtilen nick için cıkan sonuca göre akıllı ve akılsız.txt icerisindeki belirtilen metin i kanala yansıtır. ( mirc in bulunduğu klasör ün icine akıllı ve akılsız adında birer tane text dosyası acmalısınız.) Akıllı ve Akılsız text lerinin icine deneme amaclı 1 satır metin yazmıştım kod da 1 satır için hazırlanmıştır arttırmak istiyenler eklemelerini yapmalıdır. Örnek görünüm; [10:02:18] <Mircsystem-> .akiltesti [10:02:18] <&Mylife> Hatalı kullanım lütfen nick belirtin. [10:02:25] <Mircsystem-> !akiltesti [10:02:25] <&Mylife> Hatalı kullanım lütfen nick belirtin. [10:02:35] <Mircsystem-> .akiltesti 29389234 [10:02:35] <&Mylife> Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin. [10:02:51] <Mircsystem-> .akiltesti M y l i fe [10:02:51] <&Mylife> Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin. [10:03:06] <Mircsystem-> .akiltesti deneme [10:03:06] <&Mylife> Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin. [10:04:35] <Mircsystem-> .akiltesti The [10:04:35] <&Mylife> "The" için akıl testi başlıyor... [10:04:35] <&Mylife> "The" ne kadar akıllı bakalım! [10:04:35] <&Mylife> İşte "YouMyCure" için sonuçlar: [10:04:35] <&Mylife> -------------------- %75 AKILLI! -------------------- [10:04:35] <&Mylife> -------------------- %25 AKILSIZ! -------------------- [10:04:35] <&Mylife> "The" - Sen secilmiş kişisin onlara akıl sanatından bahset. [10:04:49] <Mircsystem-> .akiltesti CoLoNeL [10:04:49] <&Mylife> "CoLoNeL" için akıl testi başlıyor... [10:04:49] <&Mylife> "CoLoNeL" ne kadar akıllı bakalım! [10:04:49] <&Mylife> İşte "CoLoNeL" için sonuçlar: [10:04:49] <&Mylife> -------------------- %17 AKILLI! -------------------- [10:04:49] <&Mylife> -------------------- %83 AKILSIZ! -------------------- [10:04:49] <&Mylife> "CoLoNeL" - Sende birgün aklını kullanmayı öğrenebilirsin üzülme. Kullanım; .akıltesti nick Not: Sonuçlar doğrultusun da gerçekci bir sonuç çıkmaz random bir değer çıkar ( Panik yapmayın ) iyi forumlar. 👍 5 👍❤😂😮😡😢👎👏
	Alıntı Yap

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)