Türkiye'nin IRCd ve LaMeR Forumu Sitesi
Tags
Author: Admin - Replies: 0 - Views: 5919
Spam Yedek Alma addonu
Yeni Spam Yedek Alma Kodu 2020
[code]raw 229:*: {
  if !$hfind(spamyedek,$+($3,¿,$4,¿,$8,¿,$10-),1,W).data {
    .hadd -m spamyedek $md5($ticks) $+($3,¿,$4,¿,$8,¿,$10-) | .hsave -o spamyedek spamyedek.hash
  }
}
on *Confusedtart: { .hmake spamyedek | .hload spamyedek spamyedek.hash | $+(.timer,spamkontrol) 0 3600 stats f }
alias spamyukle {
  var %yukle = 1 | while (%yukle <= $hget(spamyedek,0).data) {
    spamfilter add $token($hget(spamyedek,%yukle).data,1,191)
Author: Admin - Replies: 0 - Views: 4927
Belirlediğiniz Bir Kişinin Nick'ini Değiştirme
Belirlediğiniz Bir Kişinin Nick'ini Değiştirmek

Kullanım: !degistir nick
[code]on *:text:*:#Opers:{
  var %a Sohbetci $+ $rand(100,9999)
  if ($1 = !degistir) {
    os raw svsnick $2 %a :0
    .msg #Opers 4 $2 Nick'i Başarılı bir şekilde değiştirilerek4 %a oldu.
    os raw lamerler.com privmsg $nick 2Rumuzunuz Sunucu seviyesine uygun olmadıgından 4GÜVENLİK 2nedeni ile degiştirilmiştir. Hoş Sohbetler dileriz.
  }
}[/cod
Author: Admin - Replies: 0 - Views: 4144
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: 5728
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: 5344
Özelinize Yapılan Saldırıları Engellemek İçin
ÖZELİNİZE YAPILAN SALDIRILARI ENGELLEMEK İÇİN 
Kod:
on *:open:if $query(10) { mode $me +D }
[b][color=#FF4136]Bu kod sayesinde özelinizde örnek veriyorum 5/6 kişi var ve sunucuya bi lamer geldi kafayı size taktı yada o an sizi gözüne kestirdi ve özelinize botlarla saldırı yaptı diyelimki bir anca 300/500 nick özelinize gelip flood text atıyor ve mirciniz kasıyor işte bunu engellemek için bu kodumuzdaki amaç özelinize bi anda gelen nickleri durdurmak için g
Author: Admin - Replies: 0 - Views: 3806
Çeviri Diyalogu (TRANSLATE DİALOG)
[code]alias tmscumleceviri { dialog -m tmscumleceviri tmscumleceviri }
dialog tmscumleceviri {
  title "Cümle Çevirici"
  size -1 -1 177 153
  icon $mircdirTMSResim\cumlecevirici.ico 
  option dbu
  text "AŞAĞIDAKİ BU DİLDEN", 1, 14 15 73 8
  text "ŞU DİLE ÇEVİR", 2, 115 15 94 8
  combo 3, 6 24 72 50, size
  combo 4, 98 23 72 50, size
  box "Çevrilecek Metin", 5, 6 78 167 41
  edit "", 6, 9 87 161 28
  button "Cümle Çevirisini Yap", 7, 6 126 76 21
  button "Diyalogu KAPAT", 8, 98 1
Author: Admin - Replies: 0 - Views: 4259
[.!]imza ekle|sil
Kullanımı:
Kanalda !imza | !imza nick
Özelde !imza ekle|sil




[code]on *:text:*:*: {
  if $regex($1,/^[!.][iİı]mza$/Si) {
    if $regex(#,/^#/) {
      msg # 7 $iif($2,$2,$nick) 1imza mesajı:4 $iif($2,$iif($hget(imza,$2),$v1,Bulunmuyor),$iif($hget(imza,$nick),$v1,Bulunmuyor))
    }
    else {
      if !$regex($2,/^(ekle|s[ıiİ]l)/Si) { msg $nick $qt($nick) lütfen komutu $qt(!imza ekle|si
Author: Admin - Replies: 0 - Views: 4466
Kelime Tamamlama Addon
Kelime Tamamlama Addon 2020

[code]menu status,channel,menubar {
  -
  Kelime Tamamlama: ktamamla
  -
}
alias ktamamla { if ($dialog(ktamamla)) { dialog -c ktamamla } |  dialog -ma ktamamla ktamamla }
dialog ktamamla {
  title "Kelime Tamamlama"
  size -1 -1 215 134
  option dbu
  edit "", 1, 7 9 50 10, autohs
  text " yazdığında", 2, 58 10 30 8
  button "Sil", 3, 51 117 74 12
  edit "", 4, 89 9 80 10, autohs
  text " olarak yazacak", 5, 169 10 38 8
  button "Ekle", 6, 7
Author: Admin - Replies: 0 - Views: 5891
Online süresi 5 gün ve fazlası olanlara oto voice
Online süresi 5 gün ve fazlası olanlara oto voice

Kullanım;
Belirtilen kanalla giren bütün kullanıcılara info ceker ve online süresi 5 gün ve üstü olan kulllanıcılara oto voice verir.
Sürekli saldırı/flood vb. illegal olayların bir nebze önüne gecilmesi için hazırlanmıştır.
Kırmızı ile işaretlediğim yerlere aktif olmasını istediğiniz kanalları yazmalısınız.



[code]on *:join:#kanal: { .timer 1 1 .denetlee $nick $chan | set %:Mylife $nick }
alias den
Author: Admin - Replies: 0 - Views: 5618
RANDOM Nick/Ident Koruması
RANDOM Nick/Ident Koruması

[code]on *Confusednotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    ;- Muaf port ekleme.
    if $istok(7000 7005 1453,%_port,32) { return }
    ;- Muaf nick ekleme
    elseif $istok(Nick Nick1 Nick2 Nick3,%_nick,32) { return }
    ;- Muaf ident ekleme
    elseif $istok(Sohbet mIRC Kelebek SoyLe,%_ident,32) { return }
    ;- Muaf IP e