Skaliteforum Sınırsız Paylaşım  

Geri git   Skaliteforum Sınırsız Paylaşım > İRCD - İRC > Mirc Scripting > Hazır Kodlar

Hazır Kodlar Scriptiniz için kullanabileceğiniz, kodlama bilginizi geliştirmenize yardımcı olacak hazır kodlar.

SKaliteForum Üye ol

 
 
Seçenekler Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 11-19-2011, 09:11 AM   #1
L-L
Yeni Üye
 
Üyelik tarihi: Nov 2011
Mesajlar: 15
L-L is on a distinguished road
Standart özele gelen botnete oto spam ekleme

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 *pen:?:{
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-
}
L-L isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla
 

Bookmarks

Etiketler
botnete, ekleme, gelen, oto, spam, özele


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

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ı

Hizli Erisim

Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Şuan akLınıza geLen bir üye. CaN Geyiklerin Efendisi 67 12-25-2011 11:19 PM
112'ye gelen aramalar :) CaN Komik Yazılar 2 07-28-2009 09:32 AM
Sohbetkalite'ye Özel spam Kontrol Skadmin Hazır Kodlar 0 02-03-2009 09:11 AM
Spam'dan kurtulamadı :) Bronx Geyiklerin Efendisi 2 11-26-2008 12:05 PM

SKaliteForum Sistem Bilgileri Yasal Uyarı
sohbetalmanya sohbetavrupa sohbetavrupa sohbet
Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
vBulletin 3.7.2 Türkçe Yapımcı : Skaliteforum.COM


Sohbet sitelerimiz : sohbet

SKaliteForum Forum içerisinde yazılan tüm yazılardan kullanıcının kendisi mesuldur. Herhangi bir şikayet , istek , bilgi için admin@skaliteforum.com adresine mail atabilirsiniz.

SKaliteForum | Bilgi Paylasim Platformudur


WEZ Format. Şuan Saat: 07:35 AM.




canli casino bahis siteleri

ümraniye escort istanbul escort