Forums Scripts & Popups [help]Creating aliases for each individual letter

on *:text:*:#:{
  if ($hfind(antibadword,$strip($1-),1,R).data) {
    ban -k $chan $nick 2 antibadword ( base word: $v1 )
  }
}
;/addbadword refword expression
;example /addbadword test test
alias addbadword hadd -m antibadword $1 (*UTF8) $+ $regsubex($2-,/(*UTF8)(.)/g,$iif($isalias(regvar_\1),$($+($,regvar_\1),2),\1))

alias regvar_E return [eéèêEÉÊ]

on *:text:*test*:#:{
  msg $chan .ban $nick
}