Code: Select all
if Find '[^\u0001-\u007e]', 'aE-i'
Edit:Convert:To Unicode Code Points
end
–” (en-dash and right curly quote)
becomes
U+2013 U+201D (their corresponding unicode codes but with a space in between)
So I re-wrote the piece of macro with a while loop, thus:
Code: Select all
While Find '[^\u0001-\u007e]', 'E-i'
Edit:Convert:To Unicode Code Points
end
I wonder, though, if there’s a way to convert a character into unicode points without resorting to the menu, which seems to trigger the space issue. I mean something through the Nisus macro language or Perl. I couldn’t find it anywhere.
Greetings, Henry.