Birkaç işe yarar kod (çoğu ircforumlari'dan alıntı) - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Black · 17 Temmuz 2007, 01:29

ircforumlari.net , bazı arkadaşlarım ve kendi çalışmalarımla birkaç hazır kod vermek istedim.

Away Reklam koruması: Whois çektiğinizde çalışır. Away mesajında reklam varsa atar.

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

raw 301:*:{ if (*h*t*t*p*:*/*/* iswm $strip($3-)) || (*hackerlarin* iswm $strip($3-)) || (*#* iswm $strip($3-)) || (*v*v*v*.*.* iswm $strip($3-)) || (*.org iswm $strip($3-)) || (*.bz iswm $strip($3-)) || (*//* iswm $strip($3-)) || (*.tc* iswm $strip($3-)) || (*wvw* iswm $strip($3-)) || (*.g?n* iswm $strip($3-)) || (*.?rg* iswm $strip($3-)) || (*?rc.* iswm $strip($3-)) || (*t?k?a* iswm $strip($3-)) || (*.c?m* iswm $strip($3-)) || (*.n?t* iswm $strip($3-)) || (*vvv* iswm $strip($3-)) || (*. o r g* iswm $strip($3-)) || (*w.*w.*w.* iswm $strip($3-)) || (*.tr* iswm $strip($3-)) || (*.gs* iswm $strip($3-)) || (*vww* iswm $strip($3-)) || (*[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm $strip($3-)) || (*f*t*p*:*/*/* iswm $strip($3-)) || (*/server* iswm $strip($3-)) || ($chr(35) iswm $strip($3-)) { var %ö = $comchan($2,0) | while %ö { if ($comchan($2,%ö).op) { kb2 -k $comchan($2,%ö) $2 Away reklam yaptığınız tespit edildi.. } | dec %ö } } }

Kanala her girene whois çekmek istersende :

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

on 1:join:#: { /whois $nick }

Fullname inde reklam olanları atmak: Kanala girdiğizde tüm kanala who çeker ve kod otomatikman çalışır.Fullname inden
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ircde, com varsa atılır. Araya || koyarak çoğaltabilirsiniz:

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

raw 352:*:if ($9- == 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ircde) || ($9- == com) { echo -a 0,7Dronecuk $1- | var %o = $comchan($6,0) | while %o { if ($comchan($6,%o).op) { cs akick $comchan($6,%o) add $address($6,2) Spam/Bot.. } | dec %o } }

Hakaret içerikli sözler(Sadece Kickler, Banlamaz): Oncelikle bir veriables oluşturun(Remotenin 2 sağında). Adı %kufurler olsun.

%kufurler lan len ulan ulen ulam ulem mal salak olm

Sonrada aşağıdaki kod Remote ye.

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

on @*:text:*:#:{ var %. = $0 | while %. { if $istok(%kufurler,$remove($gettok($strip($1-),%.,32),.,:,;,$chr(44)),32) && ($nick !ishop $chan) && ($nick !isop $chan) && ($nick !isvoice $chan) { kick $nick 4Bad! | return } | dec %. } }

Part mesajında reklam ve istenmeyen kelimeler:

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

on !*:PART:#:if (*Left all channels* iswm $1-) || (***** iswm $1-) || (*inviter* iswm $1-) || (*bot* iswm $1-) { cs akick $chan add $address($nick,2) Part Message Advertising.. }

Özele Flood ve Notice Floodtan korunma:

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

on 1:notice:*:?:{
inc -u5 %prvbitching 1
if ( %prvbitching == 10 ) { silence +*!*@* | .timer 1 20 silence -*!*@* | close -m $nick | echo 4 -a Size Notice Flood Yapıldı. 20 Saniyeliğine Noticelar Reddedilecek.. }
if ( %prvbitching >= 10 ) haltdef
}
on ^1:open:?:*:{
inc -u5 %prvbitching 1
if ( %prvbitching == 5 ) { silence +*!*@* | .timer 1 20 silence -*!*@* | close -m $nick | echo 4 -a Size Query Flood Yapıldı. 20 Saniyeliğine Queryler Reddedilecek.. }
if ( %prvbitching >= 5 ) haltdef
}

Benden şimdilik bu kadar
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Alıntı	PySSyCaT	Çevre Terimleri Sözlüğü	0	24 Eylül 2014 22:08
'Bitki çaylarının azı yarar, çoğu zarar'	yaSmin	Sağlık Köşesi	0	24 Şubat 2014 23:10
Alıntı Çerçevesi	Tevfik Aktunc	vB 3.8.x Eklentileri	0	31 Mart 2013 16:19
Kahraman'dan Bir Alıntı.	Barış	Aşk ve Sevgi Köşesi	0	25 Aralık 2011 21:43
Yürekten [ç]aLıntı..	OutLaw	Şiir, Hikaye ve Güzel Sözler	4	01 Haziran 2008 13:32

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.