Adobe 27510753 Scripting Guide - Page 103
to marker, set applied character style of character -1 of parent story
![]() |
UPC - 718659445294
View all Adobe 27510753 manuals
Add to My Manuals
Save this manual to your list of manuals |
Page 103 highlights
Adobe InDesign CS2 Scripting Guide Working with Documents in AppleScript 95 set myDate to current date set myString to "Author:" & tab & author & tab & "Description:" ¬ & tab & description & return & "Creation Date:" & tab & myDate ¬ & tab & "Email Contact" & tab & myEmail end tell set myLeftSlug to make text frame with properties ¬ {item layer:layer "Slug" of myDocument, ¬ geometric bounds:{(page height of document preferences of myDocument) ¬ + 36, right of myMarginPreferences, ¬ (page height of document preferences of myDocument) + 144, ¬ myRightMargin}, contents:myString} tell parent story of myLeftSlug convert to table text 1 end tell --Body text master text frame. set myLeftFrame to make text frame with properties ¬ {item layer:layer "BodyText" of myDocument, ¬ geometric bounds:{top of myMarginPreferences, ¬ right of myMarginPreferences, myBottomMargin, myRightMargin}} end tell tell page 2 set myMarginPreferences to margin preferences set myLeftMargin to left of myMarginPreferences set myRightMargin to (page width of document preferences of myDocument) ¬ - (right of myMarginPreferences) make guide with properties {orientation:vertical, location:myLeftMargin, ¬ item layer:layer "GuideLayer" of myDocument} make guide with properties {orientation:vertical, location:myRightMargin,¬ item layer:layer "GuideLayer" of myDocument} set myRightFooter to make text frame with properties ¬ {item layer:layer "Footer" of myDocument, ¬ geometric bounds:{myBottomMargin + 14, left of myMarginPreferences, ¬ myBottomMargin + 28, myRightMargin}} set contents of insertion point 1 of parent story of myRightFooter ¬ to auto page number set contents of insertion point 1 of parent story of myRightFooter ¬ to Em space set contents of insertion point 1 of parent story of myRightFooter ¬ to section marker set applied character style of character -1 of parent story of ¬ myRightFooter to character style "page_number" of myDocument set applied paragraph style of paragraph 1 of parent story of ¬ myRightFooter to paragraph style "footer_right" of myDocument --Slug information. set myRightSlug to make text frame with properties ¬ {item layer:layer "Slug" of myDocument, ¬ geometric bounds:{(page height of document preferences of myDocument) ¬ + 36, left of myMarginPreferences, ¬ (page height of document preferences of myDocument) + 144, ¬ myRightMargin}, contents:myString} tell parent story of myRightSlug convert to table text 1 end tell --Body text master text frame. set myRightFrame to make text frame with properties ¬ {item layer:layer "BodyText" of myDocument, ¬ geometric bounds:{top of myMarginPreferences, ¬ left of myMarginPreferences, myBottomMargin, myRightMargin}} end tell end tell --Add section marker text--this text will appear in the footer. set marker of section 1 of myDocument to "Section 1" --When you link the master page text frames, one of the frames sometimes --becomes selected. Deselect it. select nothing end tell end tell
![](/manual_guide/products/adobe-27510753-scripting-guide-5f6265c/103.png)