indesign AS checking

Scripting Forums AppleScript | Mac OS X
,
#1

Hi All,

I want to check few point which mention below. Can anyone please help me on that.

Delete All unused Swatch.
Delete All unused styles.
Checking Horizontal scale to 70.
Checking soft hyphen if used.
Checking soft enter used.
Check double space.
Check space before punctuations.

I have started this project and posted the same at adobe forum.

thanks
pooja

#2

Hi All,

Please give me some starting clue.

Thanks
Pooja

#3

A place to start:

tell application "Adobe InDesign CS2"
	tell document 1
		set x to unused swatches
		search story 1 for ASCII character 83
		search story 1 for "  "
	end tell
end tell

There is not a document property for unused styles. By soft hyphen are you looking for discretionary hyphens or “-”. Look for the character if the latter, for the former you might have to use the unicode or ascii number for the search. For the horizontal scale, what are you checking the scale of, text, a paragraph, word, character, image, picture box, text frame, or something else?

#4

Hi pooja,
use this to delete unused swatches:

tell application "Adobe InDesign CS2"
	activate
	tell front document
		set theUnusedSwatches to unused swatches
		repeat with UnusedSwatch from 1 to count of theUnusedSwatches
			if name of (item UnusedSwatch of theUnusedSwatches) is not "" then
				try
					delete (item UnusedSwatch of theUnusedSwatches)
				end try
			end if
		end repeat
	end tell
end tell

Greets from TMA

#5

Hi TMA,

Thanks it is working fine. See the below code I want to delete all styles sheet which not in use.

How can I do it.


tell application "Adobe InDesign CS3"
	activate
	set myDoc to the front document
	tell myDoc
		set tooNotUsed to get name of paragraph style is not used
		delete tooNotUsed
		
	end tell
end tell

Please suggest me. I am not able to make it.
thanks
Pooja

#6

Hi All,

On moving forward, please see the below code and suggest me something.


tell application "Adobe InDesign CS3"
	activate
	set myDoc to the front document
	tell myDoc
		set totStory to get count of every story
		repeat with i from 1 to totStory
			tell totStory
				set totPara to get count of every paragraph
				repeat with j from 1 to totPara
					--serch for double space
					--search for soft hyphens
					--search for shift enter
					--Search for space before punctuation
				end repeat
			end tell
		end repeat
	end tell
end tell

Thanks
Pooja

#7

Hi All,

Is there any updates, only mentioned is to be complete.

Thanks
Pooja

#8

Pooja,

If you want help writing the script post here, if you want someone to write it for you post at http://macfreelancer.com/. Not trying to be rude but I’m sure someone could use a bit of compensation for their time and skill that they are taking away from other things to help you out.