indesign-script - Schriftschnitte in Zeichenformaten einfrieren

Das Skript sucht im Dokument nach bestimmten Textformatierungen (Schriftschnitte, Position), denen bislang noch kein Zeichenformat zugewiesen ist.

Abhängig von den jeweiligen Attributen wird ein passendes Zeichenformat erstellt und dem entsprechenden Text zugewiesen.

30.1.2013 (Nachtrag): Aufgrund den in Italic, das kein Italic ist ... ausgeführten Beobachtungen im Zusammenhang mit dem Import eines Oblique-Schnitts ist im Code unten eine Abfrage eingebaut, ob 'Oblique' durch 'Italic' ersetzt (und anschließend in eine ZF eingefroren) werden soll.

//TextStyle2charStyle.jsx  
// Peter Kahrel, mod. by Martin Fischer  
  
// Ersetze, sofern vorhanden, 'Oblique'-Schnitt durch 'Italic' auf Nachfrage
oblique2italic(); 
 
// attr2style takes two arguments: (1) a string to set the search    
// and the attribute value in the style, and (2) a name for the character style.    
attr2style( 'position = Position.superscript;\rapp.findTextPreferences.fontStyle = "Italic"' , 'SuperScript-Italic' );    
attr2style( 'position = Position.subscript;\rapp.findTextPreferences.fontStyle = "Italic"' , 'SubScript-Italic' );    
attr2style( 'fontStyle = "Bold Italic"' , 'Bold Italic' );    
attr2style( 'fontStyle = "Bold"' , 'Bold' );    
attr2style( 'fontStyle = "Italic"' , 'Italic' );    
attr2style( 'position = Position.superscript' , 'SuperScript' );    
attr2style( 'position = Position.subscript' , 'SubScript' );    
attr2style( 'capitalization = Capitalization.smallCaps' , 'SmallCaps' );    
attr2style( 'underline = true' , 'Underline' );    
attr2style( 'strikeThru = true' , 'StrikeThru' );    
 
app.findTextPreferences = app.changeTextPreferences = NothingEnum.nothing; 
 
 
 
function oblique2italic() 
{ 
    app.findTextPreferences = app.changeTextPreferences = NothingEnum.nothing; 
	app.findTextPreferences.fontStyle = 'Oblique'; 
	var result = app.activeDocument.findText();
	if (result.length > 0)
	{
		var choice = confirm('Achtung!\rSchriftschnitt "Oblique" durch "Italic" ersetzen?'); 
		if (choice == true) 
		{		
			app.changeTextPreferences.fontStyle = 'Italic'; 
			app.activeDocument.changeText(); 
		}
	}
} 
   
function attr2style( attr, st )    
{    
    app.findTextPreferences = app.changeTextPreferences = NothingEnum.nothing;    
    eval( 'app.findTextPreferences.' + attr );    
    // comment the following line to look for text with applied character style too (MF)  
    app.findTextPreferences.appliedCharacterStyle = app.activeDocument.characterStyles[0];  
    app.changeTextPreferences.appliedCharacterStyle = checkStyle( attr, st );    
    app.activeDocument.changeText();    
}    
   
function checkStyle( attr, stylename )    
{    
    if( app.activeDocument.characterStyles.item( stylename ) == null )    
    {    
        app.activeDocument.characterStyles.add( { name : stylename } );    
        eval( 'app.activeDocument.characterStyles.item( stylename ).' + attr );    
    }    
    return app.activeDocument.characterStyles.item( stylename );    
}