on *:TEXT:.blist*:#: { 
if ($address == $me,2) {
/mode $chan +b $2 $3-
/amsg I am blacklisting $2 because " $+ $3- $+ " If you have a complaint /msg $nick.
set %ban $+ $2 On
set %banreason $3-
}
else { halt } }

on :JOIN:#: {
if (%ban $+ $nick == on)
/mode $chan +b $nick %banreason
}
else { halt } }