Özele DCC Göndereni Banla

[IrcdMaster]

#virus on
on 1:JOIN:#:{
if ($nick == $me) { set %jvirus $chan | /.timervirus 1 30 /unset %jvirus }

}
on *:NOTICE:*DCC SEN*:?:{
if ($nick isop %jvirus) { halt }
if ($nick != $me) && ($me isop %jvirus) {
.raw mode %jvirus +b $nick
/kick %jvirus $nick 12Query 4 DCC 12SEND detected...
}
else halt
}
on *:NOTICE:*DCC CHA*:?:{
if ($nick isop %jvirus) { halt }
if ($nick != $me) && ($me isop %jvirus) {
.raw -q mode %jvirus +b $nick
/kick %jvirus $nick 12Query 4 DCC 12SEND detected...
}
else halt
}
#virus end