/* This script is for use with FinalWriter®. See the file 
FinalWriter.guide in the Docs directory */

options results

IF ~SHOW('p',"MATHSCRIPT.1") THEN
DO
/* If MathScript is not already running, start it ! */

        ADDRESS COMMAND "run MathScript:MathScript"
        ADDRESS COMMAND "wait 3"
END

ADDRESS "FINALW.1"

CURRENTOBJECT
id=result
IF id~=0 THEN
COPY
/* if selected object is EPS, copy it into the clipboard */

ADDRESS "MATHSCRIPT.1"

SCREENTOFRONT

CLEAR

IF id~=0 THEN IMPORT "Clips:0" FORCE
/* Import graphics file from clipboard and search for formula */