Code:
on *:KICK:#:{
if (!$read(kicklist.txt,s,$knick)) {
write kicklist.txt $knick
}
}
on *:JOIN:#:{
if ($read(kicklist.txt,s,$nick)) {
kick # $nick You had a previous offense, bye :(
}
}

new username: tidy_trax