Indesign Script - Satzspiegel anhand von ausgewählten Seitenobjekten einstellen

Ziel
Satzspiegel 'graphisch' statt 'numerisch' einstellen.
Hier über die senkrechten und waagrechten Kanten eines oder mehrere Seitenobjekte.
Der gewünschte Satzspiegel wird z.B. über die Justierung von Textrahmen zunächst skizziert und über das Skript dann entsprechend umgesetzt (Randeinstellung).

Voraussetzung
Es ist mindestens ein Seitenobjekt (Textrahmen, Rechteck ...) ausgewählt, das komplett auf einer Seite liegt, d.h. das nicht über die Seitengrenzen hinausragt.

Was macht das Skript?
Das Skript passt die Ränder der Seite, auf der das ausgewählte Objekt liegt, an dessen Kanten an.

Liegt das ausgewählte Objekt auf einer Layoutseite, dann werden nur die Ränder dieser Seite angepasst.

Liegt das ausgewählte Objekt auf einer Musterseite, dann werden die Ränder dieser Musterseite und alle Seiten, die auf dieser Musterseite basieren, angepasst.
Ist die Layoutanpassung deaktiviert, erfolgt eine Abfrage, ob die Layoutanpassung aktiviert werden soll, damit sich die Lage von Objekten auf Layoutseiten, die auf der entsprechenden Musterseite basieren, anpasst.

Sind auf einer Seite mehrere Objekte ausgewählt, dann sind die Ränder am Ende an das 'letzte' Objekt (höchster Index) angepasst.

Um den Satzspiegel einer Doppelseite einzurichten, empfiehlt es sich, zunächst auf einer Seite ein Seitenobjekt (Textrahmen, Rechteck ...) einzurichten, dieses dann auf die gegenüberliegende Seite zu kopieren und anschließend beide Objekte auszuwählen, bevor das Skript ausgeführt wird.

Anschließend können die Seitenobjekte, die als Vorlage für den Satzspiegel dienten, gelöscht werden.

/*
	// adjustTypeArea_with_selectedPageItems.jsx

//DESCRIPTION:Einrichtung des Satzspiegels anhand ausgewählter Seitenobjekte (Textrahmen, Rechteck ...).
	VERSION: 0.6
	AUTHOR: Martin Fischer
	DATE: 23.12.2011
*/ 
 
main(); 
 
function main() 
{ 
	 if ( app.selection.length > 0 )
	 {
		var doc = app.documents.firstItem(); 
		var restoreViewPrefs = setupViewPrefs(); 	// Einstellungen von Lineal & co. sichern und anpassen
		var ref_pi = get_refpi();	// Referenzobjekte ermitteln
		if (ref_pi.length > 0)
		{
			// Layoutanpassung ermitteln, wenn Referenzobjekte auf Musterseite
			var restore_lapref = (ref_pi[0].pg.parent.constructor.name == 'MasterSpread') ? setupLayoutPrefs( doc ) : null; 
			for ( var p = 0; p < ref_pi.length; p++)
			{
				// Ränder an Referenzobjekt anpassen
				adjust_margins( ref_pi[p], doc);
			}
			// bei aktiver Layoutanpassung die ursprüngliche Position der Referenzobjekte wiederherstellen
			if (doc.layoutAdjustmentPreferences.enableLayoutAdjustment == true)
			{
				restore_pos(ref_pi);
			}
			// Einstellungen von Lineal & co. wiederherstellen
			restoreViewPrefs(); 
			
			// Bei Bedarf die ursprüngliche Einstellung der Layoutanpassung wiederherstellen
//~ 			if (restore_lapref != null)
//~ 				restore_lapref(); 
		}
	} 
}

// =============================================
//												Funktionen
// =============================================

// ---------------------------------------------------------------------------------
//						  Position der Referenzobjekte wiederherstellen 
// ---------------------------------------------------------------------------------
function restore_pos(pi)
{
	for (var i = 0; i < pi.length; i++)
	{
		pi[i].pi.move(pi[i].pg);
		pi[i].pi.geometricBounds = pi[i].gb;
	}
}

// ---------------------------------------------------------------------------------
//						  Referenzobjekte ermitteln 
// ---------------------------------------------------------------------------------
function get_refpi()
{
	var ref_pi = new Array;
	for ( var i = app.selection.length-1; i >= 0; i-- ) 
	{
		// Prüfung ob Auswahl ein Seitenelement (pageItem)
		if ( app.selection[i].hasOwnProperty( 'geometricBounds' ) ) 
		{
			// Seite, auf der das Objekt liegt, ermitteln
			var cur_page = findPage( app.selection[i] ); 
			if ( cur_page != null ) 
			{
				ref_pi.push(
				{
					pi:app.selection[i], 	// das Objekt selbst
					gb:app.selection[i].geometricBounds,	// die ursprünglichen Koordinaten des Objekts
					pg:cur_page	// die Seite, auf der das Objekt liegt
				} );
			}
		}
	}
	return ref_pi;
}

// ---------------------------------------------------------------------------------
//						  Ränder anpassen 
// ---------------------------------------------------------------------------------
function adjust_margins( cur_pi, doc, restoreViewPrefs ) 
{ 
	// Maße der Seite
	var pb = cur_pi.pg.bounds;
	var ph = _round( pb[2] - pb[0], 100 ); 	// Seitenhöhe
	var pw = _round( pb[3] - pb[1], 100 ); 	// Seitenbreite
	
	// Prüfung der Lage des Objekte (innerhalb einer Seite?)
	 if ( cur_pi.gb[0] >= 0 && cur_pi.gb[1] >= 0 && cur_pi.gb[2] <= ph && cur_pi.gb[3] <= pw ) 
	 { 
		 // temporäres Zurücksetzen der Ränder auf 0
//~ 		var old_mp = cur_pi.pg.marginPreferences.properties; 
//~ 		cur_pi.pg.marginPreferences.properties = {top:0, left:0, bottom:0, right:0}; 
		
		// Festlegender neuen Ränder
		try 
		{ 
			// Dokument doppelseitig & Objekt liegt auf der linken Seite
			if ( doc.documentPreferences.facingPages == true && cur_pi.pg.side == PageSideOptions.LEFT_HAND ) 
			{ 
				cur_pi.pg.marginPreferences.properties = {top:cur_pi.gb[0], left:pw - cur_pi.gb[3], bottom:ph - cur_pi.gb[2], right:cur_pi.gb[1]}; 
				cur_pi.pg.marginPreferences.properties = {top:cur_pi.gb[0], left:pw - cur_pi.gb[3], bottom:ph - cur_pi.gb[2], right:cur_pi.gb[1]}; 
			} 
			// Objekt liegt auf der rechten Seite
			else 
			{ 
				cur_pi.pg.marginPreferences.properties = {top:cur_pi.gb[0], left:cur_pi.gb[1], bottom:ph - cur_pi.gb[2], right:pw - cur_pi.gb[3]}; 
				cur_pi.pg.marginPreferences.properties = {top:cur_pi.gb[0], left:cur_pi.gb[1], bottom:ph - cur_pi.gb[2], right:pw - cur_pi.gb[3]}; 
			} 
		} 
		catch(e) 
		{ 
			// ggf. Wiederherstellen der ursprünglichen Randeinstellungen
			var result = confirm( 'Achtung!\rNicht alle Ränder konnten entsprechend den Kanten des ausgewählten Objekts eingestellt werden.\rUrsprüngliche Ränder wiederherstellen?' ); 
			if ( result == true ) 
				cur_pi.pg.marginPreferences.properties = {top:old_mp.top, left:old_mp.left, bottom:old_mp.bottom, right:old_mp.right}; 
		} 
	}  
	else 
	{ 
		alert( 'Achtung!\rKoordinaten des ausgewählten Objekts überprüfen.\rDas Objekt muß innerhalb der Seite liegen.' ); 
	} //if ( cur_pi.gb[0] >= 0 && cur_pi.gb[1] >= 0 && cur_pi.gb[2] <= ph && cur_pi.gb[3] <= pw ) 
}
 
 
// ---------------------------------------------------------------------------------
//						  Runden 
// ---------------------------------------------------------------------------------
function _round ( _val, _fact ) 
{ 
	 return Math.round( _val * _fact )/_fact; 
} 
 
 
// ---------------------------------------------------------------------------------
//						  Seite ermitteln 
// ---------------------------------------------------------------------------------
// nach Gregor Fellenz 
// 27.7.2010 
// http://forums.adobe.com/message/3003131#3003131 
 
function findPage( theObj )  
{ 
	 if ( theObj.hasOwnProperty( "baseline" ) )	
	 { 
		  theObj = theObj.parentTextFrames[0]; 
	 } 
	 while ( theObj != null )	
	 { 
		  if ( theObj.hasOwnProperty ( "parentPage" ) )	 
				return theObj.parentPage; 
		  var whatIsIt = theObj.constructor; 
		  switch ( whatIsIt )  
		  { 
				case Page : return theObj; 
				case Character : theObj = theObj.parentTextFrames[0]; break; 
				case Footnote :; // drop through 
				case Cell : theObj = theObj.insertionPoints[0].parentTextFrames[0]; break; 
				case Note : theObj = theObj.storyOffset.parentTextFrames[0]; break; 
				case XMLElement : if ( theObj.insertionPoints[0] != null ) { theObj =	theObj.insertionPoints[0].parentTextFrames[0]; break; } 
				case Application : return null; 
				default: theObj = theObj.parent; 
		  } 
		  if ( theObj == null )	 
				return null; 
	 } 
	 return theObj 
} // end findPage 
 
// ---------------------------------------------------------------------------------
//						  Abfrage Layoutanpassung 
// ---------------------------------------------------------------------------------
function setupLayoutPrefs( doc )
{
	var old_lapref = doc.layoutAdjustmentPreferences.enableLayoutAdjustment;
	if (doc.layoutAdjustmentPreferences.enableLayoutAdjustment == false)
	{
		if ( confirm('Layoutanpassung aktivieren?') ) 
			doc.layoutAdjustmentPreferences.enableLayoutAdjustment = true;
	}
	return  function ()
	{
		doc.layoutAdjustmentPreferences.enableLayoutAdjustment = old_lapref;
	}
}
 
// ---------------------------------------------------------------------------------
//						  Ansichtsvorgaben sichern & wiederherstellen 
// ---------------------------------------------------------------------------------
// nach Dirk Becker 
// http://www.hilfdirselbst.ch/foren/Ma%DFsystem_tempor%E4r_umstellen_%28WIN_CS4%29_P424011.html#424011 
function setupViewPrefs() 
{ 
	 var doc = app.activeDocument; 
	 with ( doc )	
	 { 
		  var vp = viewPreferences.properties; 
		  var zp = zeroPoint; 
 
		  var pt = MeasurementUnits.POINTS; 
		  viewPreferences.properties =  
		  { 
				horizontalMeasurementUnits: pt, 
				verticalMeasurementUnits: pt, 
				rulerOrigin: RulerOrigin.pageOrigin 
		  }; 
		  zeroPoint = [0,0]; 
	 } 
 
	 return function () 
	 { 
		  with ( doc )	 
		  { 
				viewPreferences.properties = vp; 
				zeroPoint = zp; 
		  } 
	 } 
}