Article View: adobe.scripting.indesign
Article #1126[AS CS3] Another MathType Baseline Shift Question
From: marcusstringer
Date: Tue, 17 Feb 2009 20:44
Date: Tue, 17 Feb 2009 20:44
62 lines
3161 bytes
3161 bytes
Hi Guys, I am using the below script to place MathType Equations into an InDesign File Basically it searches for tags <<Filename.eps>> and replaces it with a inline graphic. My question is: Is there anyway I can get it to read the height of the InLine Graphic Box and then get it to baseline shift so it's centered height wise on the line, instead of the set amount of -10pt that is uses now? We have to open the MathType Equations in Illustrator to change font and colour to Pantone etc, so they are save back as Illustrator EPS's Below is the Script: tell application "Adobe InDesign CS3" tell document 1 set baselineVar to "Yes" set countVar to 0 set imageCount to 0 set docPath to file path as alias tell application "Finder" set imageFolder to folder (choose folder with prompt "Please choose the folder containing the appropriate MathType files") --"MathType" of artFolder end tell activate set allStories to stories repeat with s from 1 to count of items of allStories set theStory to item s of allStories if class of theStory is story then set theLim to count of words of theStory try repeat with i from 1 to theLim if word i of theStory contains "<<" then set theText to contents of word i of theStory as Unicode text set theOffset to (offset of "<<" in theText) set endOffset to (offset of ">>" in theText) set imageName to characters (theOffset + 2) through (endOffset - 1) of theText as string set imageFolderPath to ((imageFolder as string) & imageName) set wholeTag to characters theOffset through (endOffset + 1) of theText as string if baselineVar = "Yes" then set baseline shift of characters theOffset through (endOffset + 1) of word i of theStory to -10.2 end if delete characters theOffset through (endOffset) of word i of theStory tell theStory tell word i tell character theOffset place imageFolderPath as alias set countVar to (countVar + 1) end tell end tell end tell end if end repeat end try end if end repeat end tell activate if countVar = 0 then display dialog "No Images were found" buttons "OK" default button 1 with icon 2 else if countVar = 1 then display dialog "1 lonely Images has been placed." buttons "OK" default button 1 else display dialog (countVar as string) & " Images have been placed." buttons "OK" default button 1 end if end tell Thanks Marcus
Technical Details
Message-ID:
<59b7f769.-1@webcrossing.la2eafNXanI>Path:
arc1-ca.pugleaf.net!g2news2.google.com!news2.google.com!news.glorb.com!news2.glorb.com!newshub.sdsu.edu!webcrossingShow Full Headers
Complete Article Headers
X-Google-Thread: f939a,8f362174dba44ec7,start X-Google-Attributes: gidf939a,domainid0,public,usenet X-Google-Language: ENGLISH,ASCII-7-bit From: marcusstringer@adobeforums.com Path: arc1-ca.pugleaf.net!g2news2.google.com!news2.google.com!news.glorb.com!news2.glorb.com!newshub.sdsu.edu!webcrossing Newsgroups: adobe.scripting.indesign Subject: [AS CS3] Another MathType Baseline Shift Question Message-ID: <59b7f769.-1@webcrossing.la2eafNXanI> Date: Tue, 17 Feb 2009 12:44:00 -0800 Lines: 79 MIME-Version: 1.0 Content-Type: text/plain; charset="ISO-8859-1" Content-Transfer-Encoding: 8bit