//Eröffnungs_Index_Partienummern.jsx  
// v.2  
  
var d = app.documents.firstItem();  
var st = check_style('Index Eröffnung');  
app.findTextPreferences = null;  
app.findTextPreferences.appliedCharacterStyle = st;  
//app.findTextPreferences.appliedParagraphStyle = 'Bibliographie-Nummerierungs-AF';   
  
var r = d.findText();  
var l = get_list(r);  
write_txt(l.sort().join('\r'),  '~/Desktop/Eröffnungsliste.txt');  
  
  
function write_txt ( myData, f_path )  
{  
	var f = new File( f_path );  
	f.open( 'w' );  
	f.encoding = 'UTF-8';  
	f.writeln ( myData );  
	f.close();  
}  
  
function trim_string(s)  
{  
	var nstr = s.replace(/^\s+/,'').replace(/\s+$/,'');  
	return nstr  
}  
  
function form_topic( aString, aDiv, aSep ) {  
	aString = trim_string(aString);  
	if (aString.indexOf(aSep) != -1 )  
		return aString;  
	else  
	{  
		var tempArray = aString.split( aDiv );  
		if ( tempArray.length > 1 ) {  
			var myName = tempArray.pop( );  
			var newString = myName + aSep + tempArray.join( aDiv ) + aDiv.replace( /\w+/g, '' );  
		}  
		else {  
			var newString = aString;  
		}  
		newString = trim_string(newString);  
		return newString;  
	}  
}  
  
function get_list(r)  
{  
	var aList = new Array;  
	for (var i = 0; i < r.length; i++)  
	{  
		var n = r[i].paragraphs.firstItem().bulletsAndNumberingResultText;  
		if (n != '')  
		{  
			var topic = form_topic(r[i].contents, ' ', ', ');   
			if (topic != '')  
			{  
				if (aList[topic] == undefined)  
					aList[topic] = new Array;   
				aList[topic].push(n.match(/\d+/)[0]);   
			}  
		}  
	}  
	var bList = new Array;  
	for (var n in aList)  
	{  
		aList[n].sort(num_sort);  
		bList.push( n + '\t' + aList[n].join(', ') );  
	}  
	return bList;  
}  
  
function num_sort (a, b) {  
	return a - b;  
}  
  
function check_style( aString )  
{  
	var cs = null;  
	cs = d.characterStyles.itemByName( aString );  
	if (cs == null)  
	{   
		alert ('Zeichenformat "' + aString + '" nicht gefunden.');  
		exit();  
	}  
	else  
		return cs;  
} 

var topic = r[i].contents; 

var topic = trim_string( r[i].contents ); 

Caro-Kann 
	1, 5 
Damengambit 
	3, 7 
Französische Partie 
	9 
Italienische Partie 
	2 
Schottisch 
	8 
Unregelmäßig 
	6 
Wiener Partie 
	12 
Zukertorts Eröffnung 
	4 

var topic = trim_string( r[i].contents );