**Note: I wrote this in about 5-8 minutes during my drafting class. It has NOT been tested.
***Note: Someone check my script ^,^
on *:TEXT:*:#:{
if ($chan == #yourchannel) {
if ($regex($1-,^(Host:).*commited suicide$)) {
var %n = $regml(1)
if (%sui. [ $+ [ %n ] ] == 2) { msg # !pamsg %n Please don't commit suicide! | inc %sui. [ $+ [ %n ] ] 1 }
elseif (%sui. [ $+ [ %n ] ] == 3) { msg # !qkick %n I said...Please don't commit suicide! | inc %sui. [ $+ [ %n ] ] 1 }
elseif (%sui. [ $+ [ %n ] ] == 4) { msg # !kick %n I said...Please don't commit suicide! | unset %sui. [ $+ [ %n ] ] }
else { inc %sui. [ $+ [ %n ] ] 1 | msg # !ppage %n Please don't commit suicide! }
}
}
}
~Zack