özelinize gelen botnet mesajlarına oto spam! - Sayfa 3 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

XcLusive · 14 Nisan 2008, 23:43

yukarıdaki kodu alıp tekrar denermisin 3 keredir deniyorum hala hiçbir hata yok..

korhan066 · 14 Nisan 2008, 23:51

En az 6-7 defa yukledım sıldım scrıptı remoteyıde :S

XcLusive · 14 Nisan 2008, 23:56

bende aynısını yaptım..
ama hala sorun yok
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
çalışıyor..

korhan066 · 14 Nisan 2008, 23:58

ya , nasıl déyım kod sle bısey Oldu . ozele @ seklınde adres gonderdıgınde spam eklıyo
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
, 5 sn Uygulamıyo Kullandıgın , Hangı versıOn Ogrenebılırmıyım ?

XcLusive · 15 Nisan 2008, 00:01

6.21

korhan066 · 15 Nisan 2008, 00:07

ßéndékıdé sén bana su séndékı codu ßıdaha atarmısın sana zahmet sonkez denıcem olursa olur artık .;oki

XcLusive · 15 Nisan 2008, 00:11

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

alias yildiztemizle {
  var %y $+(.,?) , %yi
  if $numtok($1-,32) == 1 {
    var %1kelime 1
  }
  %yi = $replace($1-,$chr(42),%y,$chr(36),%y,$chr(91),%y,$chr(93),%y,$ chr(92),%y,$chr(47),%y,$chr(43),%y,$chr(63),%y,$ch r(94),%y,$chr(124),%y,$chr(40),%y,$chr(41),%y,$chr (164),%y,$chr(33),%y,$chr(123),%y,$chr(125),%y,$ch r(189),%y,$chr(188),%y,$chr(39),%y,$chr(46),%y,$ch r(44),%y,$chr(60),%y,$chr(61),%y,$chr(62),%y,$chr( 34),%y,$chr(199),%y,$chr(221),%y,$chr(58),%y,$chr( 45),%y,$chr(254),%y,$chr(222),%y,$chr(32),%y)
  if %1kelime {
    %yi = $+(^,%yi,$chr(36))
  }
  return $iif($len($remove(%yi,.,*)) > 5,%yi,SPAMKONTROLUNDEGECERSIZ aslolan mesaj: $1- )
}
on *:open:?:{
  set -u5 %nickw. [ $+ [ $nick ] ] warn
}
alias spch {
  if (!$window(@Spams)) window -ne @Spams
  spamekle $yildiztemizle($2-)
  echo -t @Spams $1 : $yildiztemizle($2-)
}
on *:text:*:?:{
  if (!%nickw. [ $+ [ $nick ] ]) { halt }
  if (%nickw. [ $+ [ $nick ] ] == warn) && (*_* iswm $1-) && ($right($1,1) isnum) && ($2 == $null) { spch $nick $1 }
  var %t = 1 , %kelime = $gettok($strip($1-),0,32)
  var %cümle = $strip($1-)
  if (%kelime == 2) && ($len($strip($1)) >= 5) && ($strip($2) == @) { spch $nick $1- }
  while (%t <= %kelime) {
    set %ara $gettok($strip($1-),%t,32)
    if ($v1 == 1) && ($right(%ara,1) == @) || ($right(%ara,2) == @h) || ($right(%ara,3) == @hot) { spch $nick %ara }
    if (*_* iswm %ara) && ($right(%ara,1) isnum) { spch $nick %ara }
    if ($right($gettok(%ara,1,64),1) isnum) && (@ isin %ara) { spch $nick %ara }
    if (%nickw. [ $+ [ $nick ] ] == warn) && (%ara == @) { spch $nick $gettok($strip($1-),$calc(%t - 1),32) %ara $gettok($strip($1-),$calc(%t + 1),32)) }
    if (*@h?* iswm %ara) { spch $nick %ara }
    if ($right($gettok($strip($1-),$calc(%t - 1),32),1) isnum) && (*h?t* iswm %ara) { spch $nick $gettok($strip($1-),$calc(%t - 1),32) %ara }
    inc %t 1
  }
}
alias spamekle {
  spamfilter add cNnpa gzline +7200 Spam! $1-
}
alias spamsil {
  spamfilter del cNnpa gzline +7200 Spam! $1-
}

Linqu · 13 Mayıs 2008, 01:01

nereye eklicez aliasamı remoteyemi?

XcLusive · 13 Mayıs 2008, 01:07

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

alias yildiztemizle {
  var %y $+(.,?) , %yi
  %yi = $replace($1-,$chr(42),%y,$chr(36),%y,$chr(91),%y,$chr(93),%y,$chr(92),%y,$chr(47),%y,$chr(43),%y,$chr(63),%y,$chr(94),%y,$chr(124),%y,$chr(40),%y,$chr(41),%y,$chr(164),%y,$chr(33),%y,$chr(123),%y,$chr(125),%y,$chr(189),%y,$chr(188),%y,$chr(39),%y,$chr(46),%y,$chr(44),%y,$chr(60),%y,$chr(61),%y,$chr(62),%y,$chr(34),%y,$chr(199),%y,$chr(221),%y,$chr(58),%y,$chr(45),%y,$chr(254),%y,$chr(222),%y,$chr(32),%y)
  return $iif($len($remove(%yi,.,*)) > 5,%yi,SPAMKONTROLUNDEGECERSIZ aslolan mesaj: $1- )
}
on *:open:?:{
  set -u5 %nickw. [ $+ [ $nick ] ] warn
}
alias spch {
  if (!$window(@Spams)) window -ne @Spams
  spamekle $yildiztemizle($2-)
  echo -t @Spams $1 : $yildiztemizle($2-)
}
on *:text:*:?:{
  if (!%nickw. [ $+ [ $nick ] ]) { halt }
  var %t = 1 , %kelime = $gettok($strip($1-),0,32)
  var %cümle = $strip($1-)
  if (%kelime == 2) && ($len($strip($1)) >= 5) && ($strip($2) == @) { spch $nick $1- | halt }
  while (%t <= %kelime) {
    set %ara $gettok($strip($1-),%t,32)
    if ($v1 == 1) && ($right(%ara,1) == @) || ($right(%ara,2) == @h) || ($right(%ara,3) == @hot) { spch $nick %ara | halt }
    if (*_* iswm %ara) && ($right(%ara,1) isnum) { spch $nick %ara | halt }
    if (*-* iswm %ara) && ($right(%ara,1) isnum) { spch $nick %ara | halt }
    if ($right($gettok(%ara,1,64),1) isnum) && (@ isin %ara) { spch $nick %ara | halt }
    if (*@* iswm %ara) && ($3) { spch $nick $gettok($strip($1-),$calc(%t - 1),32) %ara $gettok($strip($1-),$calc(%t + 1),32)) | halt }
    if (*@h?* iswm %ara) { spch $nick %ara | halt }
    if ($right($gettok($strip($1-),$calc(%t - 1),32),1) isnum) && (*h?t* iswm %ara) { spch $nick $gettok($strip($1-),$calc(%t - 1),32) %ara | halt }
    inc %t 1
  }
}
alias spamekle {
  spamfilter add cNnpa gzline +7200 Spam! $1-
}
alias spamsil {
  spamfilter del cNnpa gzline +7200 Spam! $1-
}

bu kodları remotene ekle..

MatChLeSs · 15 Mayıs 2008, 10:56

Peki Özelimize gelen mesajları x kanalına nasıl yönlendirebiliris ?

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Özelinize gelen kullanıcılara kod doğrulatın.	Bozkurt-	mIRC Parça Kodlar	2	26 Mart 2023 20:42
Özelinize gelen kullanıcılara şifre sorun	Bozkurt-	mIRC Scripting Hazır Kodlar	2	16 Ocak 2023 20:13
Özelinize Gelen Kayıtsız Nicklere Nick Kayıt Et Uyarısı	VocaList	mIRC Scripting Hazır Kodlar	2	02 Ekim 2010 08:55
Botnet mesajlarına oto spam yardım.	deLuxe	mIRC Scripting Sorunları	1	26 Şubat 2010 13:49

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.