// Kerning Script 
app.findTextPreferences = app.changeTextPreferences = null; 
app.findTextPreferences.appliedFont = 'Times'; 
app.findTextPreferences.fontStyle = 'Regular'; 
var myPairs = app.activeDocument.findText(); 
 
romanRoman( '-T', -100 )   
romanRoman( '-A', -40 ) 
romanRoman( '-V', -80 ) 
romanRoman( '-W', 200 ) 
romanRoman( '7.', -500 ) 
 
function romanRoman( kPair, kValue ) 
{ 
	//finde alle Vorkommen von kPairs 
	app.findTextPreferences.findWhat = kpair; 
	app.findTextPreferences.findWhat = kpair; 
	var myPairs = app.activeDocument.findText(); 
	// füge kValue zwischen dem ersten und zweiten Zeichen ein. 
	for( var i = 0; i < myPairs.length; i++ ) 
		myPairs[i].insertionPoints[1].kerningValue = kValue;	 
}