IRCForumu.Net | Türkiye'nin IRCd ve mIRC Forumu   Reklam Alanı


  IRCForumu.Net | Türkiye'nin IRCd ve mIRC Forumu IF - mIRC Scripting Hazır Kodlar

Bizim mekan Reklam alanı

Yeni Konu   Cevap Yaz

 
LinkBack Seçenekler Arama Stil
Alt 07 Mayıs 2016, 21:24   #1
Gelme, burası çok derin.
 
Üyelik tarihi: 07 Mayıs 2016
Bulunduğu yer: Ankara
Mesajlar: 581
WEB Sitesi: www.Sohbetsin.Com
IRC Sunucusu: irc.FixSohbet.Net
İlgi Alanı: Domain
Kan Grubu: A RH (+)
Alınan Beğeni: 86
Post mIRC Botlar için Güvenli !nobot Kod Giriş Sistemi

Kod:
CTCP  *:version:*:{
  ctcpreply $nick VERSION   Sock Bot v2.0 Coded ßy nick (" Che ")
  echo -a  10Size Version çekildi. 12Çeken Nick: 4 $+ $nick 
  inc -u10 %version. [ $+ [ $nick ] ]
  if ($regex($address($nick,2),/(helper|admin|ircop|services|dj.|tech|global)/i)) { halt } 
  if ( %version. [ $+ [ $nick ] ] == 3 ) { kill $nick Özele Flood Yapmayiniz Lütfen!  | .msg %operkanali [BILGI][Nick: $nick ][Ozel Version Flood]
  }
}

CTCP ^*:finger:*:{
  ctcpreply $nick  FINGER  Sock Bot v2.0 Coded Nick (" iSyan ")
  echo -a  10Size Finger çekildi. 12Çeken Nick: 4 $+ $nick 
  inc -u10 %finger [ $+ [ $nick ] ]
  if ($regex($address($nick,2),/(helper|admin|ircop|services|dj.|tech|global)/i)) { halt } 
  if ( %finger [ $+ [ $nick ] ] == 3 ) { kill $nick Özele Flood Yapmayiniz Lütfen!  | .msg %operkanali [BILGI][Nick: $nick ][Ozel Finger Flood]
  }
}

#version on


on *:ctcpreply:* {
  if ($read(version.txt,w,$2-)) {
    .veban $nick | .msg %operkanali [BILGI][Nick : $nick ][Version : $2- ][Yasak Version Zline] 
    halt
  }
  if (version isin $1-) {
    .sapart $nick #Guvenlik 
    .unset %version [ $+ [ $address($nick,2) ] ] 
    .msg $nick 4Guvenlik Sistemini Gectiniz!1 Hos Sohbetler Dileriz. 4[Yonetim] 
    .remini version.ini $nick
    .timer $+ $nick off 
    .whois $nick 
  }
}



on *:join:#: {
  if ($chan == #Guvenlik) {
    if ($regex($address($nick,2),/(helper|admin|ircop|services|dj.|tech|global|Network)/i)) { halt }
    if ($read(admin.txt,w,$nick)) { halt }
    if ($level($nick) == muafnlist) { halt }
    if ($nick !== %botnick) {  
      .ctcp $nick version 
      .set -u120 %version [ $+ [ $address($nick,2) ] ] $+($rand(0,9),$rand(a,z),$rand(0,9))
      .msg $nick 4Merhaba $nick , Suan Bot Olarak Algilaniyorsunuz ; 
      .msg $nick 5Eger 1 Dakika Içinde Siz Verilen Kodu Girmezseniz Sunucudan Uzaklastirilacaksiniz!   
      .msg $nick 4Lutfen Bot/Reklamci Olmadiginizi Belirtmek Icin1 !nobot %version [ $+ [ $address($nick,2) ] ] 4Komutunu Özelime Yaziniz04! 
      .userip $nick
    }
  }
  if ($chan == %operkanali) {
    if ($nick == %botnick) {
      sajoin $me #Guvenlik | .mode #Guvenlik +msi | set %vsifre Acik | topic #Guvenlik 10,1 $server  - Sunucu Güvenligi Acisindan 4#Güvenlik 10,1 Kanalina Yönlendirildiniz. 4 %botnick  10,1 Botunun Size Vermis Oldugu Kodu 4( !nobot KOD ) 10,1 Bir Dakika Icerisinde 4 %botnick 10,1 Botun Özeline 4 !nobot KOD 10,1 Seklinde Tanitiniz, Aksi Taktirde Sunucudan Uzaklastirilacaksiniz..' | halt 
    }
  }
}
alias veban { gzline $$1 +3800 Lütfen %web Adresinden sunucumuzun Mirc/Script programini indirip tekrar giris yapiniz! $date $time $+([,%botnick,]) }


raw 340:*: {
  .timer $+ $remove($gettok($2-,1,61),*)  1 60 /veban *@ [ $+ [ $gettok($2-,2,64) ] ] 
}



on *:quit: {
  .timer $+ $readini(version.ini,$nick,ip) off
  .remini version.ini $nick
  .timer $+ $nick off
  .timer $+ $address($nick,2) off    
  .timer $+ $address($nick,3) off    
  .close -m $nick
}

raw 378:* {
  ipsil $4
}

alias ipsil { if $1 { if !$read(xpips.txt,w,$1-) { halt } | else { write $+(-dl,$readn) xpips.txt }  } }


on *:text:*:?: {
  if ($1 == !nobot) { 
    if ( %version [ $+ [ $address($nick,2) ] ] == $null ) { 
      .msg $nick 4Sizin Guvenlik Sifreniz Bulunmamaktadir!1 #Guvenlik Kanalindan Cikabilirsiniz. 4[Yonetim] 
      .timer $+ $address($nick,1) off
      .unset %version [ $+ [ $address($nick,2) ] ]
      .sapart $nick #Guvenlik 
      halt
    }
    if ($2 == $null) { .msg $nick 4Kodu Yazmayi Unuttunuz!1 !nobot KODUNUZ Seklinde Yazicaksiniz4!  | halt } 
    if ( $2 == %version [ $+ [ $address($nick,2) ] ] ) { 
      .msg $nick 4Sifreyi Dogru Girdiniz #Guvenlik Kanalindan Cikarildiniz!1 Hos Sohbetler Dileriz. 4[Yonetim] 
      .remini version.ini $nick
      .timer $+ $nick off
      .unset %version [ $+ [ $address($nick,2) ] ]
      .sapart $nick #Guvenlik
      .whois $nick
      .timer $+ $address($nick,2) off 
      halt
    } 
    else {
      .msg $nick 4Yanlis Kod Girdiniz!1 Lütfen Kodu Duzgun Giriniz! 
      .msg $nick 1Size Verilen Kod :4 %version [ $+ [ $address($nick,2) ] ] 
      .msg $nick 1Ozelime Yazmaniz Gereken Komut :4 !nobot %version [ $+ [ $address($nick,2) ] ] 
      .msg $nick 1Lütfen Kodu Düzgün Giriniz! 
      .ctcp $nick version
    }
  }
}

#version  end


Sunucuda Saldırılara karşı !nobot Kod Sistemi umarım işinizi Yarar...
 immortaL isimli Üye şimdilik offline konumundadır   Alıntı

Yeni Konu   Cevap Yaz

Etiketler
botlar, giriş, güvenli, için, kod, mirc, nobot, sistemi

Seçenekler Arama
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
mIRC Bot için Sunucu Davet Sistemi immortaL Hazır Kodlar 0 07 Mayıs 2016 21:10


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


Powered by vBulletin® Version 3.8.9 Beta 1
Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 3.6.0
IRCForumu - Sohbet - Bizim mekan
Copyright ©2005 - 2016 IRCForumu.Net | Tüm Hakları Saklıdır.