Özelde 2d Kod Sorma

Merhabalar kodun amacı özelinize gelen kisilere 2d kod sistemi ile karsilamanizi saglar.
1. Kod sorgusunda cevap dogruysa size verilen mesajı vermeye baslar.
2. Kod sorgusunda cevap hatalı veya yanlis ise 3 dakika engeller.
Kod web & mobil icin uygun degildir. Harf blokları net anlasilmasi icin mIRC kullanıcı olması gerekir.
Not: Kod gelistirilmeye aciktir.

*:open:?:*: { if ($eval($+(%,$nick,_gkod),2) == $null) { .timer 1 3 build $nick set -e % $+ $nick $+ _gkod OK } window -h $nick } on *:text:*:?:{ if ($var($+(%,$nick,_gkod)) && $eval($+(%,$nick,_build),2)) { if ($hfind(giris,$strip($1))) { unset $+(%,girisdeneme-,$nick) unset $+(%,$nick,_gkod) unset $+(%,$nick,_build) beep .timer 1 2 msg $nick Buyrun, dinliyorum.(Yeap, Wht's up ?) window -w $nick hdel giris $strip($1) return } else { inc $+(%,girisdeneme-,$nick) if ($eval($+(%,girisdeneme-,$nick),2) == 2) { .msg $nick Uzgunum.2 dakika sonra tekrar denemelisiniz.(Sorry, Not accepted.Please try again after 2 mins.) .ignore -u180p $nick unset $+(%,girisdeneme-,$nick) unset $+(%,$nick,_gkod) unset $+(%,$nick,_build) return } .msg $nick - .msg $nick Hayır, dogru degil.Bir sefer daha deneyin.(Please, retry.) .msg $nick - } } } alias -l build { set -e $+(%,$1,_build) OK var %gond = $1 var %n_color = 1.14.15 var %hane = $r(4,4), %i = 1 while (%i <= %hane) { var %n = $+($r(a,z),_object) var %c_sum = %c_sum $+($,%n,(%l)) inc %i } var %m = $remove(%c_sum,object,$,_,(%l),$chr(32)) if (!$hget(giris)) { .hmake giris 500 } hadd -u60 giris %m var %1 = $gettok(%n_color,$r(1,3),46) var %2 = $gettok(%n_color,$r(1,3),46) var %3 = $gettok(%n_color,$r(1,3),46) var %4 = $gettok(%n_color,$r(1,3),46) var %5 = $gettok(%n_color,$r(1,3),46) var %l = 1 .msg %gond - while (%l <= 7) { tokenize 32 $eval(%c_sum,2) .msg %gond  $replace($1,4,%1) $+ $replace($2,4,%2) $+ $replace($3,4,%3) $+ $replace($4,4,%4) $+ $replace($5,4,%5) inc %l } .msg %gond - .msg %gond Yukarida gormus oldugunuz harf obegini yazin.(Please, type random string above.) .msg %gond - } alias -l a_object { var %w = 0,0###4###0,0#### $& 0,0##4##0,0#4##0,0### $& 0,0#4##0,0###4##0,0## $& 4,0##0,0#####4##0,0# $& 4,0#########0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# return $gettok(%w,$1,32) } alias -l b_object { var %w = 4,0########0,0## $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0########0,0## $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0########0,0## return $gettok(%w,$1,32) } alias -l b_reverse_object { var %w = 0,0#4,0########0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 0,0#4,0########0,00# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 0,0#4,0########0,0# return $gettok(%w,$1,32) } alias -l c_object { var %w = 0,0#4,0#######0,0## $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0######## $& 4,0##0,0######## $& 4,0##0,0######## $& 4,0##0,0#####4,0##0,0# $& 0,0#4,0########0,0# return $gettok(%w,$1,32) } alias -l d_object { var %w = 4,0#######0,0### $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0#######0,0### return $gettok(%w,$1,32) } alias -l e_object { var %w = 4,0########0,0# $& 4,0##0,0######0,0# $& 4,0##0,0######0,0# $& 4,0#####0,0#### $& 4,0##0,0######0,0# $& 4,0##0,0######0,0# $& 4,0########0,0# return $gettok(%w,$1,32) } alias -l f_object { var %w = 4,0#########0,0# $& 4,0##0,0######## $& 4,0##0,0######## $& 4,0######0,0#### $& 4,0##0,0######## $& 4,0##0,0######## $& 4,0##0,0######## return $gettok(%w,$1,32) } alias -l f_reverse_object { var %w = 4,0#########0,0# $& 0,0#######4,0##0,0# $& 0,0#######4,0##0,0# $& 0,0###4,0######0,0# $& 0,0#######4,0##0,0# $& 0,0#######4,0##0,0# $& 0,0#######4,0##0,0# return $gettok(%w,$1,32) } alias -l g_object { var %w = 0,0#4,0######0,0### $& 4,0##0,0####4,0##0,0## $& 4,0##0,0######## $& 4,0##0,0##4,0#####0,0# $& 4,0##0,0####4,0##0,0## $& 4,0##0,0####4,0##0,0## $& 0,0#4,0######0,0### return $gettok(%w,$1,32) } alias -l g_reverse_object { var %w = 0,0##4,0######0,0## $& 0,0#4,0##0,0####4,0##0,0# $& 0,0#######4,0##0,0# $& 4,0#####0,0##4,0##0,0# $& 0,0#4,0##0,0####4,0##0,0# $& 0,0#4,0##0,0####4,0##0,0# $& 0,0##4,0######0,0## return $gettok(%w,$1,32) } alias -l h_object { var %w = 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0#########0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# return $gettok(%w,$1,32) } alias -l i_object { var %w = 4,0####0,0# $& 0,0#4,0##0,0## $& 0,0#4,0##0,0## $& 0,0#4,0##0,0## $& 0,0#4,0##0,0## $& 0,0#4,0##0,0## $& 4,0####0,0# return $gettok(%w,$1,32) } alias -l j_object { var %w = 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 4,0##0,0####4,0##0,0# $& 4,0##0,0####4,0##0,0# $& 0,0#4,0#####0,0### return $gettok(%w,$1,32) } alias -l k_object { var %w = 4,0##0,0####4,0##0,0# $& 4,0##0,0###4,0##0,0## $& 4,0##0,0##4,0##0,0### $& 4,0#####0,0#### $& 4,0##0,0##4,0##0,0### $& 4,0##0,0###4,0##0,0## $& 4,0##0,0####4,0##0,0# return $gettok(%w,$1,32) } alias -l k_reverse_object { var %w = 4,0##0,0####4,0##0,0# $& 0,0#4,0##0,0###4,0##0,0# $& 0,0##4,0##0,0##4,0##0,0# $& 0,0###4,0#####0,0# $& 0,0##4,0##0,0##4,0##0,0# $& 0,0#4,0##0,0###4,0##0,0# $& 4,0##0,0####4,0##0,0# return $gettok(%w,$1,32) } alias -l l_object { var %w = 4,0##0,0####### $& 4,0##0,0####### $& 4,0##0,0####### $& 4,0##0,0####### $& 4,0##0,0####### $& 4,0##0,0####### $& 4,0########0,0# return $gettok(%w,$1,32) } alias -l l_reverse_object { var %w = 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 0,0######4,0##0,0# $& 4,0########0,0# return $gettok(%w,$1,32) } alias -l m_object { var %w = 4,0##0,0#####4,0##0,0# $& 4,0###0,0###4,0###0,0# $& 4,0####0,0#4,0####0,0# $& 4,0##0,0#4,0###0,0#4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# return $gettok(%w,$1,32) } alias -l n_object { var %w = 4,0##0,0####4,0##0,0# $& 4,0###0,0###4,0##0,0# $& 4,0####0,0##4,0##0,0# $& 4,0##0,0#4,0##0,0#4,0##0,0# $& 4,0##0,0##4,0####0,0# $& 4,0##0,0###4,0###0,0# $& 4,0##0,0####4,0##0,0# return $gettok(%w,$1,32) } alias -l n_reverse_object { var %w = 4,0##0,0####4,0##0,0# $& 4,0##0,0###4,0###0,0# $& 4,0##0,0##4,0####0,0# $& 4,0##0,0#4,0##0,0#4,0##0,0# $& 4,0####0,0##4,0##0,0# $& 4,0###0,0###4,0##0,0# $& 4,0##0,0####4,0##0,0# return $gettok(%w,$1,32) } alias -l o_object { var %w = 0,0#4,0#######0,0## $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 0,0#4,0#######0,0## return $gettok(%w,$1,32) } alias -l p_object { var %w = 4,0########0,0## $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0########0,0## $& 4,0##0,0######## $& 4,0##0,0######## $& 4,0##0,0######## return $gettok(%w,$1,32) } alias -l r_object { var %w = 4,0########0,0## $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0########0,0## $& 4,0##0,0###4,0##0,0### $& 4,0##0,0####4,0##0,0## $& 4,0##0,0#####4,0##0,0# return $gettok(%w,$1,32) } alias -l s_object { var %w = 0,0#4,0######0,0## $& 4,0##0,0####4,0##0,0# $& 4,0##0,0####### $& 0,0#4,0######0,0## $& 0,0######4,0##0,0# $& 4,0##0,0####4,0##0,0# $& 0,0#4,0######0,0## return $gettok(%w,$1,32) } alias -l t_object { var %w = 4,0########0,0# $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### return $gettok(%w,$1,32) } alias -l u_object { var %w = 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 0,0#4,0#######0,0## return $gettok(%w,$1,32) } alias -l v_object { var %w = 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 0,0#4,0##0,0###4,0##0,0## $& 0,0##4,0##0,0#4,0##0,0### $& 0,0###4,0###0,0#### return $gettok(%w,$1,32) } alias -l y_object { var %w = 4,0##0,0####4,0##0,0# $& 0,0#4,0##0,0##4,0##0,0## $& 0,0##4,0####0,0### $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### $& 0,0###4,0##0,0#### return $gettok(%w,$1,32) } alias -l z_object { var %w = 4,0########0,0# $& 0,0#####4,0##0,0## $& 0,0####4,0##0,0### $& 0,0###4,0##0,0#### $& 0,0##4,0##0,0##### $& 0,0#4,0##0,0###### $& 4,0########0,0# return $gettok(%w,$1,32) } alias -l x_object { var %w = 4,0##0,0#####4,0##0,0# $& 0,0#4,0##0,0###4,0##0,0## $& 0,0##4,0##0,0#4,0##0,0### $& 0,0###4,0###0,0#### $& 0,0##4,0##0,0#4,0##0,0### $& 0,0#4,0##0,0###4,0##0,0## $& 4,0##0,0#####4,0##0,0# return $gettok(%w,$1,32) } alias -l w_object { var %w = 4,0##0,0######4,0##0,0# $& 4,0##0,0##4,0##0,0##4,0##0,0# $& 4,0##0,0##4,0##0,0##4,0##0,0# $& 4,0##0,0##4,0##0,0##4,0##0,0# $& 4,0##0,0##4,0##0,0##4,0##0,0# $& 4,0##0,0##4,0##0,0##4,0##0,0# $& 0,0#4,0###0,0##4,0###0,0## return $gettok(%w,$1,32) } alias -l q_object { var %w = 0,0#4,0#######0,0## $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0#####4,0##0,0# $& 4,0##0,0##4,0##0,0#4,0##0,0# $& 4,0##0,0####4,0##0,0## $& 0,0#4,0#####0,0#4,0##0,0# return $gettok(%w,$1,32) }

Örnek Resim