Hi everyone,
I'm working on QuarkXpress Passport 6.5 and frequently get DOS-coded
texts, so I need a script to replace some characters without altering
the style of them.
Here's my first try (yes, I'm a noob in scripting...):
And surprizingly it works. But it's very-very-very slow...
Is there a way to make a (much more) faster script for this job?
I'm working on QuarkXpress Passport 6.5 and frequently get DOS-coded
texts, so I need a script to replace some characters without altering
the style of them.
Here's my first try (yes, I'm a noob in scripting...):
Code:
tell document 1 of application "QuarkXPress Passport"
activate
tell current box
tell story 1
repeat with i from 1 to count characters
tell character i
if it is "º" then
set contents to "§"
else if it is "ã" then
set contents to "["
else if it is "˛" then
set contents to "\\"
else if it is "ª" then
set contents to "±"
else if it is "˚" then
set contents to "|"
else if it is "Ã" then
set contents to "{"
end if
end tell
end repeat
end tell
end tell
end tell
Is there a way to make a (much more) faster script for this job?