bind pub -|- neocron nc|haha

proc nc|haha {nick uhost hand channel text } {
	if {![info exists said($nick)]} { set said($nick) 0 }
	if {$said($nick)} {
		puthelp "privmsg #fom-beta :\001ACTION kills $nick\001"
		set said($nick) 0
		return 0
	}
	if {!$said($nick)} {
		puthelp "privmsg #fom-beta :$nick How about you dont say that word again and i wont have to kill you"
		set said($nick) 1
	}
}