Kod:
on *:snotice:*connectaing*: {
var %ip $left($token($10,2,64),-1), %ipbaslangic $token(%ipbaslangic,1,46)
;Muaf port'lari alttaki kısma ekliceksin ornek: 7001: gibi.
if $istok(7001: 8001:,$8,32) { return }
;Altaki kısma muaf tutulan ip baslangiclari, oraya turk iplerinin baslangiclarini yazabilirsin, o sekil o ipler coddan etkilenmez.
if !$istok(78 85 5 178 176 81 94,%ipbaslangic,32) {
if $hget(ip,ban) { .gzline $9 +0 Proxy ban | .msg #w2 4 $9 2Proxy giris olarak algilandi. | return }
;Alttaki hadd kısmı Belirtigin ip baslangiclari dısında giren ip baslangiclarinin ip'lerini kayıt altina alir.
hadd -mu20 ipler %ip $9
;Bu kısım belirttigin ip'ler dısında, girisleri kayit altina alir, 20 saniye'de 5 tane giris yapilirsa koruma kendini acar, ve direk o ipler dısındaki hepsine zline atar.
if $hget(ipler,0).data >= 5 {
hadd -mu60 ip ban on
var %x 1
while $hget(ipler,%x).data {
gzline $v1 +0 Proxy ban!
inc %x
}
.hfree -sw ipler
}
}
}