Forums Scripts & Popups away kick

THx RusselB its working now, it was not stored properly.

raw 301:*:{
if (%away != off) && ($2 !isop #reg) {
var %a = 1, %b = $numtok($3-,32)
while %a <= %b {
if $hget(bad.away,$gettok($3-,%b,32)) {
ban -ku600 #reg $2 2 14Offensive Away Msg
%a = %b
}
inc %a
}
return $regsubex($1-,/\b( $+ %away $+ )\b/gi,$str(*,$len(\t)))
}
haltdef
}
on *:start:{
if !$hget(bad.away) { .hmake bad.away 10 }
if $exists(bad.away.hsh) { .hload bad.away bad.away.hsh }
}
on *:exit:{
.hsave -o bad.away bad.away.hsh
}
on *:disconnect:{
.hsave -o bad.away bad.away.hsh
}

menu menubar {
-
Add Bad Away Msg
.Add Bad Away Msg : bad.away $?= "Add bad away" | echo $asctime([HH:nn]) * 4Bad Away Msg Added.
.-
.Remove Bad Away Msg : bad.away $?= "Remove bad away" | echo $asctime([HH:nn]) * 4Bad Away Msg Removed.
.-
.View Bad Away Msg List: run bad.away.hsh
.-
.Clear Bad Away Msg List: .hfree bad.away | $iif(exits(bad.away.hsh),remove bad.away.hsh)
}
alias bad.away {
if !$1 { .notice $nick No word specified }
else { .hadd -m bad.away $1 $iif($hget(bad.away,$1),$false,$true) }
}