[12:31:59] <%Kitty> !akıltesti
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] > [AKIL TESTİ] biLecikLi Nick'inin AKIL TESTİ Sonuçları Gösteriliyor.. Bekleyiniz.
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> [AKIL TESTİ]  *
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> [AKIL TESTİ]   %56  ******************************************************** *  AKILLI!
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> [AKIL TESTİ]   %26  ************************** *  AKILSIZ!
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> [AKIL TESTİ]   %18  ****************** *  SALAK!
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> [AKIL TESTİ]   %0  *  GERİ ZEKALI!
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> [AKIL TESTİ]  *
[12:31:59] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> [AKIL TESTİ]  Kitty Sonuçlarınız: Maşallah AKIL Küpü AKIL!

on $*:text:/^[!.]ak[ıi]lte[sş]t[ıi]$/Si:#: {
  if !$hget(akıltesti,$nick) {
    .hinc -mu120 akıltesti $nick $ctime
    msg $chan 14[4AKIL TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2) ) 2Nick'inin 4AKIL TESTİ 2Sonuçları Gösteriliyor.. 4Bekleyiniz.
    var %akıllı $r(1,100), %akılsız $r(1,$calc(100 - %akıllı)), %salak $r(1,$calc(100 - (%akıllı + %akılsız))), %grzekalı $calc(100 - $calc(%akıllı + %akılsız + %salak)), $&
      %akltop $sorttok(%akıllı %akılsız %salak %grzekalı,32,nr), %aklsnç $gettok($sorttok(%akltop,32,nr),1,32)
    $iif(%aklsnç == %akıllı,akilli $r(1,9),$iif(%aklsnç == %akılsız,aklsız $r(1,9)) $iif(%aklsnç == %salak,slks $r(1,9)) $iif(%aklsnç == %grzekalı,grzklı $r(1,9)))
    msg $chan 14[4AKIL TESTİ414] 4 $chr(42)
    msg $chan 14[4AKIL TESTİ414] $chr(32) 03,03 00 % $+ %akıllı 03 $str($chr(42),%akıllı) $+(0,$chr(42))  10AKILLI4!
    msg $chan 14[4AKIL TESTİ414] $chr(32) 07,07 00 % $+ %akılsız 07 $str($chr(42),%akılsız) $+(0,$chr(42))  10AKILSIZ1!
    msg $chan 14[4AKIL TESTİ414] $chr(32) 02,02 00 % $+ %salak 02 $str($chr(42),%salak) $+(0,$chr(42))  10SALAK1!
    msg $chan 14[4AKIL TESTİ414] $chr(32) 14,14 00 % $+ %grzekalı 14 $str($chr(42),%grzekalı) $+(0,$chr(42))  10GERİ ZEKALI1!
    msg $chan 14[4AKIL TESTİ414] 4 $chr(42)
    msg $chan 14[4AKIL TESTİ414] 10 $nick 4Sonuçlarınız: %akılcvp
    unset %akılcvp
  }
  else {
    var %testsay $calc(120 - $calc($ctime - $hget(akıltesti,$nick)))
    notice $nick 14[4AKIL TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2) ) 2Akıl Testini4 2 2Dakikada Bir Kez Kullanabilirsiniz4..
    notice $nick 14[4AKIL TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2) ) 4(1 %testsay 4) 7Saniye 2Sonra Tekrardan 4!akıltesti 2Komutunu Yazarak Akıl Testinizi Yapabilirsiniz4..
  }
}
alias akilli {
  if $1 == 1 { set %akılcvp 2Tebrikler. Çok 3AKILLISINIZ }
  if $1 == 2 { set %akılcvp 2Akıllı adam aklını kullanır. Daha akıllı adam başkalarının da aklını kullanır. }
  if $1 == 3 { set %akılcvp 2Akıllı olmak da bir şey değil, mühim olan o aklı yerinde kullanmaktır. }
  if $1 == 4 { set %akılcvp 2Akıllı kişilerin en büyük talihsizliği, salakların abuk subukluklarıyla başa çıkmak zorunda olmalarıdır. }
  if $1 == 5 { set %akılcvp 2Sunucudaki En 3AKILLI 2Kişisiniz. }
  if $1 == 6 { set %akılcvp 2Maşallah 3AKIL 2Küpü 3AKIL! }
  if $1 == 7 { set %akılcvp 2Yeteneğinizden Belli 3AKILLI 2Olduğunuz. }
  if $1 == 8 { set %akılcvp 2Tebrikler 10Üstün 3AKILLI 2Çıktınız. }
  if $1 == 9 { set %akılcvp 2Akıllığınız 3AKILLI 2Olmanızdandır. 4AKİL İNSAN 2Seçildiniz. }
}
alias aklsız {
  if $1 == 1 { set %akılcvp 2Akıllı insanın ağzı kalbinde, 4AKILSIZ 2insanın kalbi ağzındadır. }
  if $1 == 2 { set %akılcvp 2Zaten Belliydi 4AKILSIZ 2Olduğun }
  if $1 == 3 { set %akılcvp 2Gurur Duymalısınız 4AKILSIZ 2Çıktınız. }
  if $1 == 4 { set %akılcvp 2Kafanızın Boş Olmasından Belliydi 4AKILSIZ 2Olmanız }
  if $1 == 5 { set %akılcvp 2Akıl noksanlığı iki türlü olur; biri delilikten, öbürü cahillikten. }
  if $1 == 6 { set %akılcvp 2Her 4akılsıza 2hayran olacak, başka bir 4akılsız 2bulunur. }
  if $1 == 7 { set %akılcvp 4Akılsız 2başın cezasını halklar çeker. }
  if $1 == 8 { set %akılcvp 4Akılsız, 2aklı içinde kalandır. }
  if $1 == 9 { set %akılcvp 4Akılsızlar 2ev yapar, 3akıllılar 2satın alır. }
}
alias slks {
  if $1 == 1 { set %akılcvp 2Zaten AKILLI Çıksaydın Şaşırırdım 14SALAK }
  if $1 == 2 { set %akılcvp 2Zaten 14SALAK 2Olmana Biz Alıştık Sende Alış. }
  if $1 == 3 { set %akılcvp 14SALAK 2Olabilirsin Üzülme Oda Bir Başarı. }
  if $1 == 4 { set %akılcvp 2Herkez 14SALAK 2Olamaz Sen Hariç. 14SALAK }
  if $1 == 5 { set %akılcvp 2Kanaldakiler Bune 14SALAK 2Haberiniz Olsun }
  if $1 == 6 { set %akılcvp 2ikinci seferde kazamazsan hile yap, üçüncü seferde kazanamazsan vazgeç, 14Salakligin 2alemi yok. }
  if $1 == 7 { set %akılcvp 2Dokuz parmaginda dokuz marifet var.Bir parmagiyla hep burnunu karistiriyor 14SALAK }
  if $1 == 8 { set %akılcvp 2Ey yükselen yeni nesil... in ulan asagi 14SALAK }
  if $1 == 9 { set %akılcvp 2Son gülen hep sen olacaksın. Çünkü herşeyi geç anlıyorsun. 14SALAK }
}
alias grzklı {
  if $1 == 1 { set %akılcvp 2Muhteşem 7GERİ ZEKALI 2Çıktınız. }
  if $1 == 2 { set %akılcvp 7GERİ ZEKALI 2Olsanda Süper 7GERİ ZEKALI 2Ünvanı Senindir. }
  if $1 == 3 { set %akılcvp 7GERİ ZEKALI 2Çıktınız. Ne Düşünüyorsunuz Acaba Bu Konuda. }
  if $1 == 4 { set %akılcvp 2Üzülme 7GERİ ZEKALI 2Olmak Herkese Nasip Olmaz. }
  if $1 == 5 { set %akılcvp 2Küçük hesaplarla rezil olursun, zengin değil. 7GERİ ZEKALI }
  if $1 == 6 { set %akılcvp 2Aşırı 7GERİ ZEKALI 2Çıktınız. }
  if $1 == 7 { set %akılcvp 2Sorunlu 7GERİ ZEKALI 2Çıktınız. }
  if $1 == 8 { set %akılcvp 2Yufka Yürekli Ama 7GERİ ZEKALI 2Çıktınız. }
  if $1 == 9 { set %akılcvp 2Olmayan Beyinde Akıl Yoksa 7GERİ ZEKALI 2Derler. }
}

on $*:text:/[!.]a[sSşŞ]kte[sSşS]t[iıİI]\s+\S+$/SAi:#: {
  if $hget($2) == $me { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Beni Yazamazsın 4:12-1) | halt }
  if !$2 { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Nick Belirtmediniz, Lütfen Bir Nick Belirtiniz.. 4Komut: 7!aşktesti Nick | halt }
  if ($3) { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Lütfen Komutu Doğru Yazınız. 4Komut: 7!aşktesti Nick | halt }
  if $2 == $nick { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Kendine Aşk Testi Yapamazsın Delimisin. | halt }
  if !$hget(aşktesti,$nick) {
    .hinc -msu30 aşktesti $nick $ctime
    msg $chan 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$2,$chr(2)) 2Nick'inin 4AŞK TESTİ 2Sonuçları Gösteriliyor.. 4Bekleyiniz.
    var %toplam  $r(90,100)
    var %seviyor $calc(%toplam - $r(1,79))
    var %sevmiyor $calc(%toplam - $r(1,78))
    var %kararsız $calc(%toplam - $r(1,77))
    var %umursamıyor $calc(%toplam - $r(1,76))
    var %testet $sorttok($gettok(%seviyor,1,45) $gettok(%sevmiyor,1,45) $gettok(%kararsız,1,45) $gettok(%umursamıyor,1,45),32,nr)
    var %sonuç $sorttok(%testet,32,nr)
    msg $chan 14[4AŞK TESTİ414] 4 $chr(42)
    msg $chan 14[4AŞK TESTİ414] $chr(32) 4,4 $str($chr(42),6) 0 % $+ $gettok(%seviyor,1,45) 8Seviyor1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] $chr(32) 8,8 $str($chr(42),9) 1 % $+ $gettok(%sevmiyor,1,45) 4Sevmiyor1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] $chr(32) 6,6 $str($chr(42),12) 0 % $+ $gettok(%kararsız,1,45) 11Kararsız1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] $chr(32) 7,7 $str($chr(42),15) 0 % $+ $gettok(%umursamıyor,1,45) 2Umursamıyor1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] 4 $chr(42)
    msg $chan 14[4AŞK TESTİ414] 10 $2 4Sonuç12 $2 $replace($gettok(%testet,1,32) / $gettok(%sonuç,1,32),$gettok(%seviyor,1,32) / $gettok(%sonuç,1,32),2Sizi Çok 3SEVİYOR,$gettok(%sevmiyor,1,32) / $gettok(%sonuç,1,32),2Sizi Hiç 4SEVMİYOR,$gettok(%kararsız,1,32) / $gettok(%sonuç,1,32),2Size Karşı Hep 14KARARSIZ,$gettok(%umursamıyor,1,32) / $gettok(%sonuç,1,32),2Sizi Hiç 7UMURSAMIYOR) 
  }
  else { 
    var %sevdi $calc(120 - $calc($ctime - $hget(aşktesti,%nick)))
    notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Aşk Testini4 2 2Dakikada Bir Kez Kullanabilirsiniz4.. 
    notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 4(1 %sevdi 4) 7Saniye 2Sonra Tekrardan 4!aşktesti Nick 2Komutunu Yazarak Aşk Testinizi Yapabilirsiniz4.. 
  }
}