~wai

on *:text:~wai:#: {
  var %thing $read(adj.txt)
  msg # $rainbow($nick is $iif($regex(%thing,/^[aeiou]/),an,a) %thing $read(noun.txt))
}