Türkiye'nin IRCd ve LaMeR Forumu Sitesi
Tags
Author: Admin - Replies: 0 - Views: 4138
Botnet Koruması Yeni
Botnet koruması, nicklere göre işlev yapar. Aşağıda verilen nick listesini bir txt dosyası oluturup içine atın, adı botnet olması gerekmektedir. Yukarıdaki kodu remotenize ekleyin. ( Operler içindir. )

[code]#bott on
on *Confusednotice:*: {
  if ($level($9) == muafnlist) { halt }
  if $read(botnet.txt,w,$9) { 
    .gzline $9 +600 . System botnet! ) 
  } 


on *:text:.korumalardurum:%operkanali:{
  if !$read(admin.txt,w,$nick) { 
  }
  else { msg
Author: Admin - Replies: 0 - Views: 5718
Proxy akill ekleme Alias
Proxy akill ekleme komutu için yapmanız gereken işlem.

mirc scriptinizin remote bölünmüne kodu ekleyip.

/write proxy.txt komutundan sonra
/run proxy.txt komutunu uygulamak.


açılan metin belgesine ip adreslerini liste seklinde atarak ekleyebilirsiniz
menü-bar özelligi sayesinde sağ tıklayarak açılan seçeneklerde toplu yada teker teker ekleyebilirsiniz.

[code]alias proxyadd {
var %i = 1
echo -a Tikky Ipler Adminserv AKILL
Author: Admin - Replies: 0 - Views: 5982
Sunucuya 2 saniye icerisinde aynı identten 5 giriş olursa IP adreslerini AKILL EKLER
Sunucuya 2 saniye icerisinde aynı identten 5 giriş olursa IP adreslerini AKILL EKLER 2020
[code]on *Confusednotice:*connecting*: {
  ;alt kısımda gelen veriyi ayristirma %ip ve %ident seklinde
  var %ip $left($token($10,2,64),-1), %ident $right($token($10,1,64),-1)
  ;Aşagi kısımda ident1 ident2 gibi yan yana muaf ident belirtebilirsiniz.
  if $istok(ident1 ident2,%ident,32)  || $istok(nick1 nick2,$9,32) { return }
  ;-mu2 yazan kısımda
Author: Admin - Replies: 0 - Views: 5891
!Rezilet nick #Kanal kod
#Kanal yazdigin yerde belirtigin mesajlari yazar, Mesaj diye yazdigim yerlerede kendin doldurursun.

#Opers yazan yerde komut calisir, kodu denemedim, hata verirse belirtirsen düzeltirim.


[code]on $*:text:/[!.]rezilet/i:#opers: {
  if !$2 || !$3 { .msg # $nick Lutfen duzgun nick ve kanal belirtiniz. | return }
  shun $2 +0 Rezilet.
  msg # $2 rezil etme olayi tamam'dir.
  sendraw $3 $(::,$2) privmsg $3 Mesaj
  sendraw $3 $(::,$2) privmsg $3 Mesaj
  sendraw $3 $(::,$2)
Author: Admin - Replies: 0 - Views: 6329
Nick - IP - Sehir - "GLİNE" - "NICKBAN" - "SHUN
Nick - IP - Sehir - "GLİNE" - "NICKBAN" - "SHUN

[code]on ^*:hotlink:"*":#:if ($regex($1,/^"(GLINE|NICKBAN|SHUN)"$/)) returnex
on *:hotlink:*:*: {
  var %_word = $noqt($1),%_ip = $token($hotline,6,32),%_nick = $token($hotline,5,32)
  if ($(,%_word) = nickban) { var %1 = 1 | while ($comchan($(,%_nick),%1)) { ban -k $v1 $(,%_nick) 2 sebeb. | inc %1 } }
  if ($(,%_word) = shun) shun $(,%_nick)
  if ($(,%_word) = gline) gline $(,%_nick) Confusedebeb.
  echo 4 $target IP: %_ip - NICK: %_ni
Author: Admin - Replies: 0 - Views: 5010
#Dj Kanalına Özel Codeler
Kod'u Kopyalayın Bot Yapacağınız mIRC ' de ALT R Yaparak Dosya Sekmesinden Yeni Seçeneğini TıklayıN. Açılan Yeni Pencereye Bu Kod'u Yapıştırıyoruz Hepsi Bu Kadar.

Not : Kod Sadece #Dj Kanalında Çalışmaktadır #Dj Kanalına Ve Dj'lere Özel Olduğu İçin

Kırmızı İle Belirttiğim Yerleri Kendinize Göre Ayarlayın


[code]on *:Join:#dj: {
  msg $chan  14------------------------------
  msg $chan  4 Hoşgeldiniz  5 Dj' $nick
  msg $chan  14------------------------------
  msg $chan  14
Author: Admin - Replies: 0 - Views: 5491
Istenmeyen Nicklere B L O C K !
Istenmeyen Nicklere B L O C K !

Kullanımı : /ksc

İşlev : Bellirlediğimiz ; nick - ident - host 'lar ; yazı yazıldığında ve list'e ekli ise , @Engel Penceresine yansıtacaktır. Kanal + Özel Konuşma birleştirildi.


[code]alias ksc { /dialog -m ı-dncr ı-dncr }
dialog ı-dncr {
  title "KSC system "
  size -1 -1 467 274
  option pixels
  box "", 11, 19 13 430 256
  text "KSC System", 1, 136 3 167 20
  edit "", 3, 125 37 186 20, center
  button "Engel Nick liste ekle", 8,
Author: Admin - Replies: 0 - Views: 5334
LOG , belirlediğiniz kanalı okuyabilirsiniz.
LOG , belirlediğiniz kanalı okuyabilirsiniz.

Kod:
  on *:text:*:#:{
  if $chan == #kanalkontrol {
    if $1 == !log && $chr(35) isin $2 { set %logchan $2 | msg %log $nick Tarafından $2 kanalının LOG'ları yansıtılacak (AJAN System) }
    if $1 == !log && $2 == off { set %logchan x | msg #kanalkontrol   Ajan Systemi Kapatıldı. }
  }
  if %logchan == $chan { msg #kanalkontrol  $date $timestamp  $+(,$nick,) $+  mesaj: $1- }
Author: Admin - Replies: 0 - Views: 5432
#guvenlik kanalına girene kod sorgulatma
#guvenlik kanalına girene kod sorgulatma

[code]on *Confusednotice:*: {
  if (connecting isin $1-) { 
    writeini version.ini $9 ip $+(*@,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64))
    timer 1 2 ctcp $9 version
    timer $+ $readini(version.ini,$9,ip) 1 10 /who  $+(*,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64),*)
  }
}
raw 352:*:{
  sajoin $6 #guvenlik
}
on *:join:#guvenlik: {
  if ($level($nick) == muafnlist) { halt }
  if $nick == $m
Author: Admin - Replies: 0 - Views: 7388
Ayni nick spam filterdaki block'lu mesaji 4 defa yazarsa zline atar
Ayni nick spam filterdaki block'lu mesaji 4 defa yazarsa zline atar

Kod:
on *:snotice:*[Spamfilter]*: { var %s = $gettok($2,1,33) | hinc -mu10 spam %s 1 | if $hget(spam,%s) >= 4 { zline %s 3h :Server kurallarina uymadiginiz icin sunucudan uzaklastirildiniz. www.lamerler.com - irc.lamerler.com | hdel spam %s } }