on *:input:*: {
  var %text = $replace($1-,tbh,2-=2T12o 2B12e 2H12onest=-1)
  var %text2 = $replace(%text,gf,2-=2G12ood 2F12ight=-1)
  say %text2
  haltdef
}