kod da düzenleme - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Dangerous123 · 11 Aralık 2011, 09:23

merhaba arkadaslar bu kode nomercy de bulunan bır kode
ben bunu baska bir bota yada baska bir scripte remotelere nasıl eklerim ve nasıl calısmasını sağlarım

bu konuda yardımlarınızı beklıyorum..

Kod: Kodu kopyalamak için üzerine çift tıklayın!

if $2 == NOTICE {  
    if *client connecting* iswm $1- {
      if $hfind(Proxy,$gettok($left($right($13,-1),-1),2,64),1,W).data  {  
        SW $sockname gzline $12 10d [Trojan/Bot/Proxy][koruma-security]
      }
    }
  }
  if $2 == Privmsg { 
    if $3 == #opers {
      if *.Proxyliste* iswm $4- {
        Sw $sockname Privmsg $3 : $+ $3 Proxy Listesi yollanmıştır.
        Sw $sockname PRIVMSG $3 :Proxy Listesi Listeleniyor!
        var %x = 1
        while (%x <= $hget(Proxy,0).item) { 
          Sw $sockname PRIVMSG $3 : $hget(Proxy,%x).data 
          inc %x 
        }
        Sw $sockname PRIVMSG $3 :Liste sonu
      }
      if *.Proxyekle* iswm $4-  {
        hadd -m Proxy $r(0,1000) $5
        hsave Proxy Proxy.danger
        SW $sockname Privmsg $3 : Date No : $r(0,1000) Ip : $5  Proxy ip listesine kaydedildi. 
      }
      if *.Proxysil* iswm $4-  {
        if $hfind(Proxy,$5,1,W).data {
          hdel Proxy $ifmatch
          hsave Proxy Proxy.danger
          SW $sockname Privmsg $3 : Data no : $ifmatch IP : $5 
        }
        else {
          SW $sockname Privmsg $3 : $+(4,$remove($gettok($1,1,33),:),) Silmek istediğiniz IP adresi listede yok.
        } 
      }
    }
  }
  if $2 == NOTICE {  
    if *client connecting* iswm $1- {
      if $hfind(ident,$gettok($left($right($13,-1),-1),1,64),1,W).data  {  
        sw $sockname gzline $12 10d   NoMercy  Technology
      }
    }
  }

  if $2 == Privmsg { 
    if $3 == #opers {
      if *.idekle* iswm $4-  {
        hadd -m ident $r(0,1000) $5
        hsave ident ident.danger
        sw $sockname Privmsg $3 : NoMercy  Technology Date No :[ $r(0,1000) ] Ident :[ $5 ]     
        sw $sockname Privmsg $3 : NoMercy  Technology Ident(Gzline) Listesine eklenmistir       
      }

      if *.idsil* iswm $4-  {
        if $hfind(ident,$5,1,W).data {
          hdel ident $ifmatch
          hsave ident ident.danger
          sw $sockname Privmsg $3 : NoMercy  Technology Data no [ $ifmatch ] IP :[ $5 ]
          sw $sockname Privmsg $3 : NoMercy  Technology Ident(Gzline) list'ten silindi

        }
        else {
          sw $sockname Privmsg $3 :NoMercy  Technology Silmek istediğiniz Ident listede yok.
        } 
      }

Rizespor · 11 Aralık 2011, 10:26

Eğerki scripte ekleyeceksen remoteler bolumune ekleyip scripti kapatı açman yeterli olacakdır. Şayet farklı bır bota eklemeyı dusunuyorsan botun tcl sıne ekledıkden sonra telnetten bota kill -9 pidnumarası seklınde cıkartıp we servicesleride aynı sekılde kill -9 pidnumarası seklınde cıkarı sokarsan olur dıye dusunuyorum ama calısırmı bılemem.

toXic · 11 Aralık 2011, 13:12

TCL'ye eklerseniz çalışmaz, çünkü tcl kodu değil. Bot'a eklemek için rizespor gerekli şeyleri söylemiş.

Dangerous123 · 11 Aralık 2011, 14:24

arkadaslar şimdi bunu ben scripte remotelere direk attıgımda sorunsuz calısırmı herhanqi bir işleme gerek varmı ekleme silme gibi kode harıcınde txt dosyası falan acmak içine ip adresleri atmak gibi birseye gerek yok demi ?

Paint · 11 Aralık 2011, 15:21

Dangerous123 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

arkadaslar şimdi bunu ben scripte remotelere direk attıgımda sorunsuz calısırmı herhanqi bir işleme gerek varmı ekleme silme gibi kode harıcınde txt dosyası falan acmak içine ip adresleri atmak gibi birseye gerek yok demi ?

Çalışmaz.

Dangerous123 · 11 Aralık 2011, 15:27

Paint Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Çalışmaz.

peki scripte eklıcek sekılde nasıl calıstırrız Paint

toXic · 11 Aralık 2011, 15:32

Socket botta kullanmalisin.

SiLuet · 13 Aralık 2011, 20:53

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*Client connecting*: { 
  if $hfind(Proxy,$gettok($left($right($10,-1),-1),2,64),1,W).data  { gzline $9 [Trojan/Bot/Proxy][koruma-security] } 
  if $hfind(ident,$gettok($left($right($10,-1),-1),1,64),1,W).data  { gzline $9 NoMercy  Technology }
}

on *:text:*:#opers: {
  if ($1 == .Proxyliste) { .proxyliste }
  if ($1 == .Proxyekle) { .Proxyekle $2 }
  if ($1 == .Proxysil) { .Proxysil $2 }
  if ($1 == .idekle) { .idekle $2 }
  if ($1 == .idsil) { .idsil $2 }
}
alias -l proxyliste { msg #opers Proxy Listesi yollanmıştır. | msg #opers Proxy Listesi Listeleniyor! | var %x = 1 | while (%x <= $hget(Proxy,0).item) { msg #opers $hget(Proxy,%x).data |  inc %x  } |  msg #opers Liste sonu }
alias -l proxyekle { hadd -m Proxy $r(0,1000) $1 | hsave Proxy Proxy.danger |  msg #opers Date No : $r(0,1000) Ip : $5  Proxy ip listesine kaydedildi. }
alias -l Proxysil { if $hfind(Proxy,$1,1,W).data { hdel Proxy $ifmatch | hsave Proxy Proxy.danger | msg #oper Data no : $ifmatch IP : $1  }  | else { msg #oper Silmek istediğiniz IP adresi listede yok. } }
alias -l idekle { hadd -m ident $r(0,1000) $1 | hsave ident ident.danger | Msg #opers Date No :[ $r(0,1000) ] Ident :[ $1 ]  | msg #opers Ident(Gzline) Listesine eklenmistir  }
alias -l idsil { if $hfind(ident,$1,1,W).data { hdel ident $ifmatch | hsave ident ident.danger | msg #opers Data no [ $ifmatch ] IP :[ $1 ] | msg #opers Ident(Gzline) list'ten silindi } | else { msg #opers Silmek istediğiniz Ident listede yok. } }

Öncelikle Deneme Şansım olmadıgı için Denemedim Bunu belirteyim.
Sonrasında, Kod'u Normal bağlantıya göre editledim Yani istediğin gibi.
Kodun işlemesi için hashtable üzerine kaydedilmiş bir proxy listesi ve yasak ident listesi olması lazım. Kodda komutlar var zaten.
Not:Koddaki komutları Sen kullanamassın Başkası Yazdıgında işler.

Dangerous123 · 14 Aralık 2011, 00:26

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] kardesim çok sağol bi deneyım ben calısırsa cok işimi görcek calısmazsada sağlık olsun .. eline koluna sağlık..

SiLuet · 14 Aralık 2011, 10:14

Çalışmazsa Bildir nerede Hata verdiğini,yardımcı olmaya çalışırım.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
kod düzenleme yardim	Set	mIRC Scripting Sorunları	7	30 Nisan 2009 20:55
whois düzenleme	aRiF	mIRC Scripting Sorunları	4	19 Nisan 2009 12:42
help tcl de düzenleme ?	TaaRuZ	Eggdrop, NeoStats, BNC	3	09 Ocak 2009 17:38
DLL düzenleme	Thorn	mIRC Scripting Sorunları	8	11 Ekim 2006 15:37

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.