For @chachin. Added antispam, will ignore pokes if you get poked 5 times within 5 seconds, also will reset counter at 10,000 kills.
Add channels to %ignorechans seperated by a space to stop the script in those channels
on *:action:pokes *:#: {
if ($2 == $me) {
var %ignorechans #chan1 #chan2 #chan3
if ($istok(%ignorechans,$chan,32)) { return }
inc -u5 %antispam.pokes
if (%antispam.pokes >= 5) { return }
:nickpick
var %nick = $nick(#,$r(1,$nick(#,0)))
if (%nick == $nick) || (%nick == $me) { goto nickpick }
inc %kills
describe $chan explodes, 08killing %nick $+ . 09,13(People Killed: $bytes(%kills,b) $+ )
if (%kills >= 10000) { unset %kills }
}