on *:TEXT:.raw *:#:{
  if ($regex($2,/^-[ae]+$/S)) {
    if (a isin $2) tokenize 32 $1-2 .raw $3-
    if (e isin $2) tokenize 32 $1-2 $($3-,2)
    tokenize 32 $1 $3-
  }
  $2-
}