IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 03 Nisan 2008, 18:14   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
özelinize gelen botnet mesajlarına oto spam!




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-
}

-----------------------------------------------
Örnekler;
Özele Gelen Mesaj : [16:23:00] <^Seda_> SeLenCiK56@
Eklenen Spam : [16:23:00] ^Seda_ : .?.?SeLenCiK56@
Mesaj : [17:57:50] <_MUGE_> Sadece yakısıklı beyleri bekliyorum Esra6510 Hotm..........
Eklenen Spam : [17:57:50] _MUGE_ : .?.?Esra6510.?Hotm.?.?.?.?.?.?.?.?.?.?
Mesaj : [17:57:51] <ahuu_18> ece_yl@
Eklenen Spam : [17:57:51] ahuu_18 : .?.?ece_yl@
-----------------------------------------------
mIRC'inizi açık tutun ve keyfinize bakın..
botnet'e açılan savaş bitmicek ;)

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 03 Nisan 2008, 18:26   #2
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




Eline Sağlık Halil
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

ßeklenen ßuydu
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Şimdi Saat Sensizliğin Ertesi..
 
Alıntı ile Cevapla

Alt 04 Nisan 2008, 11:19   #3
Çevrimiçi
Bir Adanalı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




Kod çalişmior Denemesini yapdim.

__________________
"Her bir fikir, bin dönüşüm başlatır; her kelime, yeni bir ufuk açar ve dünyayı şekillendirir. Bizim sözlerimiz değişimi taşıyan rüzgarlar gibidir, geleceği oluşturan temel taşlardır."
 
Alıntı ile Cevapla

Alt 06 Nisan 2008, 21:12   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




ircop flaglarından "t" ekli olması gerek
bende bu kodu yazdığımdan beri kullanıyorum gayet güzel çalışıyor.

 
Alıntı ile Cevapla

Alt 06 Nisan 2008, 22:07   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
%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)



Boşluk hataları var.

 
Alıntı ile Cevapla

Alt 06 Nisan 2008, 22:23   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




Doğru Gözen Kaçmış..

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- )
}

Boşluk hatalarını düzelttim..

 
Alıntı ile Cevapla

Alt 07 Nisan 2008, 12:10   #7
Çevrimiçi
Bir Adanalı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




ilk ßaştakini eklediqimde

* No such identifier: $ch (line 6, script1.ini) hatasi aliyorum

hatalari düzeltilen şekilde denedim ßu kezde Spam'a eklemior

__________________
"Her bir fikir, bin dönüşüm başlatır; her kelime, yeni bir ufuk açar ve dünyayı şekillendirir. Bizim sözlerimiz değişimi taşıyan rüzgarlar gibidir, geleceği oluşturan temel taşlardır."
 
Alıntı ile Cevapla

Alt 07 Nisan 2008, 17:50   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




[17:48:41] <as> ebru_buse145
-
[17:48:41] as : ^ebru_buse145$
-
[17:48:41] *** Spamfilter added: '^ebru_buse145$' [target: cpnNa] [action: gzline] [reason: Spam!] on Mon Apr 7 14:48:46 2008 GMT (from HaLiL!H.i.D@CSop.XXXXXXX)

-------------
nasıl spam eklemiyor?

 
Alıntı ile Cevapla

Alt 07 Nisan 2008, 17:56   #9
Çevrimiçi
Bir Adanalı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




ßen xssada@ şeklinde yapiyorum algilamior? yoksa ßenim mIRC'demi sorun war ?

__________________
"Her bir fikir, bin dönüşüm başlatır; her kelime, yeni bir ufuk açar ve dünyayı şekillendirir. Bizim sözlerimiz değişimi taşıyan rüzgarlar gibidir, geleceği oluşturan temel taşlardır."
 
Alıntı ile Cevapla

Alt 07 Nisan 2008, 18:00   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: özelinize gelen botnet mesajlarına oto spam!




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,$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) 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 ($1 == !sie) { gzline $2 +1h Spam! } if ($1 == !kline) { halt xlineac $2 set %klinenick $nick set %unbanip $2 } if (!%nickw. [ $+ [ $nick ] ]) { halt } if ($nick ison #yönetim) || ($nick ison #admin) { 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- }

on *:open:?:{
set -u5 %nickw. [ $+ [ $nick ] ] warn
}

korumasına takılabilir özeldeki sohbetleri etkilememesi için bunu eklemiştim nick'i özelinden çıkartıp tekrar denemelisin..
özele geldikten ilk 5 saniye içinde reklam yaparsa kod aktif olur.

 
Alıntı ile Cevapla

Cevapla

Etiketler
botnet, gelen, mesajlarina, mesajlarına, mirc, mirc download, mirc indir, oto, ozelinize, spam, özelinize


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

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 Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Ö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
Status'e Gelen Spam Filter Mesajlarını Özele Almak Yardım ? lk89 mIRC Scripting Sorunları 1 13 Mayıs 2009 12:01