macro utf8-not-ascii is
   (["%16r{C0}" to "%16r{DF}"] ["%16r{80}" to "%16r{BF}"] |
    ["%16r{E0}" to "%16r{EF}"] ["%16r{80}" to "%16r{BF}"] {2} |
    ["%16r{F0}" to "%16r{F7}"] ["%16r{80}" to "%16r{BF}"] {3}) macro-end

global stream reverse initial {''}

process
  submit 'as⃝df̅'

find (any-text utf8-not-ascii) => char
  set reverse to char || reverse

find any-text => char
  set reverse to char || reverse

process-end
  output reverse || '%n'