IRCForumu.ORG   sohbetkacak
reklamalanı
Kayıt ol


Ağaç Şeklinde Aç2Beğeni
  • 1 Post By RahmetLi
  • 1 Post By Ada

Yeni Konu Aç
Cevap Yaz
  
 
Seçenekler Stil
Alt 14 Kasım 2022, 21:31   #1
Kayıtlı Üye
RahmetLi - ait Kullanıcı Resmi (Avatar)
Post Özelde Kod Sorma
kodun amacı özelinize gelen kisilere 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.

Kod

on *: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) }
Ada bunu beğendi.
 
Alıntı Yap
Alt 14 Kasım 2022, 22:40   #2
Ada
BANLI ÜYE
Ada - ait Kullanıcı Resmi (Avatar)
Standart
@RahmetLi paylaşım için teşekkürler
Emeğinize sağlık

RahmetLi bunu beğendi.
 
Alıntı Yap
Cevap Yaz

« önceki Konu | sonraki Konu »

Şu anda bu konuyu görüntüleyen etkin kullanıcılar: 1 (0 üye ve 1 ziyaretçi)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok
BB kodu Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Kapalı


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 18:05.

İçerik sağlayıcı paylaşım forumlarından biri olan ircforumu.org sitemizde T.C.K 20.ci Madde ve 5651 Sayılı Kanun'un 4.cü maddesinin (2).ci fıkrasına göre TÜM ÜYELERİMİZ yaptıkları paylaşımlardan sorumludur. ircrehberi.net hakkında yapılacak tüm hukuki şikayetlere ilişkin iletişim sayfasından Veya E-Mail ile irtibata geçilmesi halinde ilgili kanunlar ve yönetmelikler çerçevesinde en geç 15 (On beş) gün içinde tarafımızca gerekli aksiyon alınacak ve size dönüş yapılacaktır.
Hızlı Resim Yükle Genel Forum Sitesi Okey Oyna Sohbet Odaları Chat Sohbetci
Bize Yazın IRCForumu.ORG Arşiv Yukarı git
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO ©2011, Crawlability, Inc.