On 1:TEXT:*:#chan: { if ($nick isreg $chan) { halt }
 if ($1 == !addname) { 
if ($2 isalnum) && ($+($2,$chr(44) !isin %names) {
set %names %names $replace($2-,$chr(32),.)
}
}
}