Genel Forumlar Haylazforum.Net

Genel Forumlar Haylazforum.Net (https://haylazforum.net/)
-   mIRC Hazır Kodlar (https://haylazforum.net/324-mirc-hazir-kodlar/)
-   -   mIRC Bot Giriş Kod Sistem’i (https://haylazforum.net/mirc-hazir-kodlar/7942-mirc-bot-giris-kod-sistem-i.html)

Aytac 15.Ocak.2019 02:29
mIRC Bot Giriş Kod Sistem’i
 
Merhabalar Arkadaşlar.

Daha önce bulunmuş olduğum mIRCTurk adlı sunucuda gördüğüm bir sistemi sizinle paylaşmak istedim. Kod’un amacı Sunucu’sunda güvenlik Kod’u olmayan arkadaşların Bot yani yapay zeka üzerinden giriş kod’u sistemi kurabilmesidir.Kullanması gayet basit olan Cod’u mIRC Bot’unuzun remote kısmına ekleyip !Giris on !giris off seklinde çalıştırabilirsiniz.


Kod:
/*
İki Alias var, build ve buildyedek
Eger ilk guvenlik kodunu cozerlerse, "build $nick" yazan yere buildyedek $nick yazilacak.
Giriş Kod'umuz Başlıyor By AzRaiL.
*/
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;GLOBAL KANAL GIRIS GUVENLIK KODU;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#giris off
on *:snotice:*:{
  if (*matches filter '^(.+!.+@.+:.+)$': [NICK:* iswm $1-) {
    if (%glogiris == ON && $gettok($2,1,33) == $remove($gettok($7,1,33),')) {
      os raw sajoin $gettok($2,1,33) #0,0
      .timer 1 3 os raw svsjoin $gettok($2,1,33) #giris
    }
  }
}
#giris end
on !*:join:#giris:{
  ;if $regex($address($nick,2),/(oper|network|admin|root)/i) { return }
  if (%glogiris == ON) {
    buildyedek $nick
  }
}
On *:text:!giri? &:,#muhabbet,#sohbet,#opers:{
  if ($1 == !giris && $2 == on) {
    if (($chan != #opers && $nick isop #) || $regex($address($nick,2),/(oper|network|admin|root)/i)) {
      onotice # GlobaL Kanallar icin GIRIS GUVENLIK KODU Aktif Edilmistir.
      onotice # #Giris Kanalinda bulunmaniz gerekmektedir.
      .msg #operlog [SYSTEMLOG GLOBAL] Global Kanallar icin GIRIS GUVENLIK KODU $nick Tarafindan AKTIF Edildi.
      giris_on
      set %glogiris ON
    }
    if ($chan == #opers) {
      .msg #operlog [SYSTEMLOG OPERS] GLOBAL KANALLARDA GIRIS GUVENLIK KODU AKTIF EDILMISTIR.
      set %glogiris ON
      giris_on
    }
  }
  if ($1 == !giris && $2 == off) {
    if (($chan != #opers && $nick isop #) || $regex($address($nick,2),/(oper|network|admin|root)/i)) {
      onotice # GlobaL Kanallar icin GIRIS GUVENLIK KODU Kapatilmistir.
      .msg #operlog [SYSTEMLOG GLOBAL] Global Kanallar icin GIRIS GUVENLIK KODU $nick Tarafindan IPTAL Edildi.
      giris_off
      set %glogiris OFF
    }
    if ($chan == #opers) {
      .msg # > GLOBAL KANALLARDA "!Giris on/off" KOMUT KULLANIMI IPTAL EDILMISTIR.
      set %glogiris OFF
      giris_off
      unset %girisdeneme*
    }
  }
}
alias glkanal return #oyun,#radyo,#muhabbet,#sohbet,#felsefe,#istanbul
alias giris_on {
  .enable #giris
  cs set #felsefe mlock +lL 1 #Giris
  cs set #sohbet mlock +lL 1 #Giris
  cs set #muhabbet mlock +lL 1 #Giris
  cs set #oyun mlock +lL 1 #Giris
  cs set #radyo mlock +lL 1 #Giris
  mode #sohbet +b ~T:block:*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*
  mode #muhabbet +b ~T:block:*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*
  mode #felsefe +b ~T:block:*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*
}
alias giris_off {
  .disable #giris
  cs set #sohbet mlock -lL 1 #Giris
  cs set #muhabbet mlock -lL 1 #Giris
  cs set #oyun mlock -lL 1 #Giris
  cs set #radyo mlock -lL 1 #Giris
  cs set #felsefe mlock -lL 1 #Giris
  mode #sohbet -b ~T:block:*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*
  mode #muhabbet -b ~T:block:*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*
  mode #felsefe -b ~T:block:*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*
}
on *:text:*:#giris:{
  if (%glogiris == ON) {
    if $hfind(giris,$strip($1)) {
      os raw notice $nick Guvenlik kodunu dogru girdiniz, sohbet kanallarina yonlendiriliyorsunuz.Hos sohbetler..
      os raw sapart $nick $chan
      os raw sajoin $nick $glkanal
      hdel giris $strip($1)
    }
    else {
      inc $+(%,girisdeneme-,$nick)
      if ($eval($+(%,girisdeneme-,$nick),2) == 3) {
        .kick # $nick 5GUVENLIK KODUNU YAZMAK ICIN SIZE AYRILAN DENEME HAKKINIZ BITMISTIR.
        os raw sajoin $nick #karantina
        .mode # +b $address($nick,2)
        unset $+(%,girisdeneme-,$nick)
        return
      }
      .notice $nick -
      .notice $nick #########################################################################
      .notice $nick 4>YAZMIS OLDUGUNUZ GUVENLIK KODU DOGRU DEGIL.KALAN DENEME HAKKINIZ $+ >4 $calc(3 - $eval($+(%,girisdeneme-,$nick),2))  $+ <
      .notice $nick #########################################################################
      .notice $nick -
      .build $nick
    }
  }
}
alias build {
  var %gondn = $1
  if (!$hget(giris)) {
    .hmake giris 500
  }
  var %m = $+($r(1,9),$r(A,N),$r(1,9),$r(1,9))
  hadd -u60 giris %m
  .notice %gondn -
  .notice %gondn 2GUVENLIK KODU:4 %m
  .notice %gondn -
  .notice %gondn 2YUKARIDA GORMUS OLDUGUNUZ GUVENLIK KODUNU KANALA YAZINIZ.
}
alias buildyedek {
  var %gond = $1
  var %n_color = 2.3.4.5.6.10.12
  var %hane = $r(3,5), %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,7),46)
  var %2 = $gettok(%n_color,$r(1,7),46)
  var %3 = $gettok(%n_color,$r(1,7),46)
  var %4 = $gettok(%n_color,$r(1,7),46)
  var %5 = $gettok(%n_color,$r(1,7),46)
  var %l = 1
  .notice %gond  -
  while (%l <= 7) {
    tokenize 32 $eval(%c_sum,2)
    .notice %gond $replace($1,4,%1) $+ $replace($2,4,%2) $+ $replace($3,4,%3) $+ $replace($4,4,%4) $+ $replace($5,4,%5)
    inc %l
  }
  .notice %gond  -
  .notice %gond  YUKARIDA GORMUS OLDUGUNUZ GUVENLIK KODUNU KANALA YAZINIZ.
  .notice %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 p_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,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 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 r_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,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 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 s_reverse_object {
  var %w = 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####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) }


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

Powered by vBulletin® Version 3.8.9
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.
Search Engine Optimization by vBSEO 3.6.1

User Alert System provided by Advanced User Tagging (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.Navbar with Avatar by Motorradforum