(DTPtechNote:748) セカンドノンブル

[市川せうぞー <anonymous at unknown-host>]

って言い方が正しいかどうかは別として、正規のノンブル以外にページにノンブルを振ってみた。
っていうか、（テキストフレームを）つくってみた（笑）
変更するときは、labelを手がかりにすればいいかな。

set start_number to 1000
tell application "InDesign CS_J"
	--activate
	tell document 1
		tell view preferences
			set old_ruler to ruler origin
			set ruler origin to page origin
		end tell
		repeat with i from 1 to count pages
			tell page i
				set my_frame to make new text frame at front with properties {visible bounds:{50.0, 68.0, 100, 550}, contents:(start_number + i) as Unicode text, label:"second_number"}
				tell paragraph 1 of my_frame
					set properties to {font:font "小塚明朝 Std" of application "InDesign CS_J", point size:30.0, justification:center align}
				end tell
			end tell
		end repeat
		tell view preferences
			set ruler origin to old_ruler
		end tell
	end tell
end tell