ctcp *:PING:*:{
if (!%ping [ $+ [ $nick ] ]) {
/timerping [ $+ [ $nick ] ] 1 25 /unset %ping [ $+ [ $nick ] ]
%ping [ $+ [ $nick ] ] = 1
}
else { /inc %ping [ $+ [ $nick ] ] 1 }
if (%ping [ $+ [ $nick ] ] >= 3) {
/unset %ping [ $+ [ $nick ] ]
/mode #tdt +b $address($nick,1)
if ($nick ison #tdt) { /kick #tdt $nick Pinging me 3+ times in 25 seconds }

}
}