IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi  
 sohbet
Sohbet chat


mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz.

💬 Bu Alana Reklam Ver ! 🎉 Hemen Katıl!
3Beğeni(ler)
  • 1 Gönderen Rima
  • 2 Gönderen Sim


 
Seçenekler Stil
Alt 14 Ekim 2020, 20:31   #1
W r i t e r
KivanC - ait Kullanıcı Resmi (Avatar)

Standart Lamer Takip Sistemi

Kod

Klavyeniz den Alt + R Tuşlarına Basarak Acılan Pencere de REMOTE Kısmına Basıyoruz
Ardından DOSYA Kısmına Basarak Yeni Bir Sayfa acarak içine atıyoruz ve kapatıyoruz
-
;Kullanacağınız komutlar.
; /ipekle ip Örnek : /ipekle 88.274.*
; /ipsil ip Örnek : /ipsil 88.274.*
; /iplist
;AÇIKLAMA :
; Arkadaşlar modem resetlendiğinde örnek ipimiz ; 85.108.5.177
; Ip adresimisimizin ilk 2 aralığı değişmez. Yani : 85.108. ( Bölgeye göre bu sabitlik değişebilir yani 5 resetten sonra ip adresi de değişebilir )
; Sizde bu şekilde gelen lameri /ipekle İP.No.* şeklinde ekleyerek takip edebilirsiniz.

Kod

#takiplamer on
on *:snotice:*client connecting*: {
var %ses = 1
while $read(iptakip.txt,%ses) {
if $v1 iswm $gettok($remove($10,$chr(41)),2,64) {
$iif(!$window(@LamerS),window -enz @LamerS)
aline -hp @LamerS BANLA! : Nick : $9 Ident : $remove($gettok($10,1,64),$chr(40),$chr(41)) Port: $8 IP aralığı : $gettok($remove($10,$chr(41)),2,64) Ban için IP'e tıklayın | aline -hp @LamerS -
if $8 == 6668: { echo -a mIRC! : Nick : $9 Ident : $remove($gettok($10,1,64),$chr(40),$chr(41)) IP aralığı : $gettok($remove($10,$chr(41)),2,64) }
else { echo -a Web! : Nick : $9 Ident : $remove($gettok($10,1,64),$chr(40),$chr(41)) IP aralığı : $gettok($remove($10,$chr(41)),2,64) }
return
}
inc %ses
}
}
on ^*:hotlink:*.*:@LamerS:return
on *:hotlink:*:@LamerS: {
gline $gettok($hotline,21,32) 1d The drone/spam bot blocked. Spam/advertising blocked. ßy $me )
}
#takiplamer end
alias ipekle {
if !$read(iptakip.txt,w,$1) {
write iptakip.txt $1
echo -a $1 eklendi
}
else {
echo -a $1 $+($readn,.) satırında mevcut.
}
}
alias iplist {
var %lst = 1
while %lst <= $lines(iptakip.txt) {
/echo -a %lst $+(-,) $read(iptakip.txt,%lst)
inc %lst
}
}
alias ipsil {
if $read(iptakip.txt,w,$1) {
write $+(-dl,$readn) iptakip.txt
echo -a $1 Lamerin ipi silindi $me
}
else {
echo -a $1 Böyle bir ip yok $me kendindemisin ?
}
}
menu channel,menubar {
» Lamer Takip
.» Lamer Takip Aç:.enable #takiplamer | echo -a Lamer Takip Devrede
.-
.» Lamer Takip Kapat:.disable #takiplamer | echo -a Lamer Takip Kapalı
}
 
 


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ı
Trackbacks are Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı





Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:27.