text from character 2046 to character 2052 of story id 170 of document "Unbenannt-1" 

text from character 1902 to character 1907 of story id 170 of document "Unbenannt-1" 

text from character 2046 to character 2052 of story id 170 of document "Unbenannt-1" 

text from character 1902 to character 2052 of story id 170 of document "Unbenannt-1" 

st.characters.itemByRange(start[myCounter].index, stop[myCounter].index).appliedCharacterStyle=app.activeDocument.characterStyles.item(myCharacterStyle.name); 

property myWorkList : {{myStartMarker:"<fett>", myEndMarker:"</fett>", myCharacterStyle:"starke-betonung"}, ¬ 
	{myStartMarker:"<kursiv>", myEndMarker:"</kursiv>", myCharacterStyle:"betonung"}} 
property myOldFindAttributes : "" 
property myOldChangeAttributes : "" 
property myStart : "" 
property myEnd : "" 
 
on setmydocument() 
	try 
		tell application "Adobe InDesign CS2" 
			set myDocument to active document 
		end tell 
	on error 
		display dialog "Es ist kein Indesign Dokument geöffnet. Script wird beendet." buttons ("OK") 
		set myDocument to false 
	end try 
	return myDocument 
end setmydocument 
 
on showdialog(myText) 
	display dialog myText 
end showdialog 
 
on switchUserInteractMode(myStatus) 
	tell application "Adobe InDesign CS2" 
		if myStatus is "never" then 
			-- Turn off user interaction to avoid dialogs 
			set user interaction level of script preferences to never interact 
		else if myStatus is "all" then 
			-- Revert user interaction 
			set user interaction level of script preferences to interact with all 
		end if 
	end tell 
end switchUserInteractMode 
 
on setfindpref(myVar) 
	tell application "Adobe InDesign CS2" 
		if myVar is false then 
			--store find/change preferences  
			set myOldFindAttributes to properties of find preferences 
			set myOldChangeAttributes to properties of change preferences 
		end if 
		if myVar is true then 
			--restore find/change preferences  
			set properties of find preferences to myOldFindAttributes 
			set properties of change preferences to myOldChangeAttributes 
		end if 
	end tell 
end setfindpref 
 
on clrfindpref() 
	tell application "Adobe InDesign CS2" 
		set find preferences to nothing 
		set change preferences to nothing 
	end tell 
end clrfindpref 
 
on getCharacterstyleRef(myDocument, myStylename) 
	tell application "Adobe InDesign CS2" 
		tell myDocument 
			set myStyles to every character style 
			repeat with myStyle in myStyles 
				if name of myStyle is myStylename then return myStyle 
			end repeat 
		end tell 
	end tell 
	return false 
end getCharacterstyleRef 
 
on findTextQuantity(myDocument, myFindtext) 
	tell application "Adobe InDesign CS2" 
		tell myDocument 
			set mySearch to search with find attributes {find text:myFindtext} 
			return mySearch 
		end tell 
	end tell 
end findTextQuantity 
 
on setRangeCharcter(myDocument, myStart, myEnd, myCharacterStyleRef) 
	tell application "Adobe InDesign CS2" 
		tell myDocument 
			set myStory to parent of myStart 
			set myStartPos to index of first character of myStart 
			set myEndPos to index of last character of myEnd 
			repeat with i from myStartPos to myEndPos by 1 
				set applied character style of character i of myStory to myCharacterStyleRef 
			end repeat 
		end tell 
	end tell 
end setRangeCharcter 
 
on findandreplace(myDocument, myFindtext, myChangeText) 
	tell application "Adobe InDesign CS2" 
		tell myDocument 
			search for myFindtext replacing with myChangeText 
			my clrfindpref() 
		end tell 
	end tell 
end findandreplace 
 
--Main 
--Init-Process 
switchUserInteractMode("never") 
setfindpref(false) 
clrfindpref() 
 
set myDocument to setmydocument() 
 
repeat with myWorklistItem in myWorkList 
	 
	-- Namen der Marker 
	set myStartMarker to myStartMarker of myWorklistItem 
	set myEndMarker to myEndMarker of myWorklistItem 
	 
	set myCharacterStyle to myCharacterStyle of myWorklistItem -- Name des Zeichenformats 
	 
	set myCharacterStyleRef to getCharacterstyleRef(myDocument, myCharacterStyle) 
	if myCharacterStyleRef is not false then 
		-- do script 
		set myStart to findTextQuantity(myDocument, myStartMarker) 
		set myEnd to findTextQuantity(myDocument, myEndMarker) 
		if (count of myStart) is greater than 0 and (count of myStart) is (count of myEnd) then 
			-- do change  
			repeat with i from 1 to count of myStart by 1 
				setRangeCharcter(myDocument, item i of myStart, item i of myEnd, myCharacterStyleRef) 
			end repeat 
			findandreplace(myDocument, myStartMarker, "") 
			findandreplace(myDocument, myEndMarker, "") 
		else 
			if (count of myStart) is 0 and (count of myEnd) is 0 then 
				set myInfotext to "Der Text ist nicht dem Tag \"" & myStartMarker & "\" versehen." 
				showdialog(myInfotext) 
			else 
				showdialog("Es gibt eine ungleiche Anzahl von Start- und Endtags, bitte überprüfen Sie ihre Daten") 
			end if 
		end if 
	else 
		set myInfotext to "Das Zeichenformat \"" & myCharacterStyle & "\" existiert nicht" 
		showdialog(myInfotext) 
	end if 
	 
end repeat 
 
showdialog("Done") 
 
--Restore-Process 
setfindpref(true) 
switchUserInteractMode("all") 

repeat with i from myStartPos to myEndPos by 1 
	set applied character style of character i of myStory to myCharacterStyleRef 
end repeat 

set applied character style of characters myStartPos thru myEndPos of myStory to myCharacterStyleRef 

// notes2text.jsx 
//DESCRIPTION: Converts footnotes of every story to text or back text to footnotes 
 
// An InDesign CS2 script from Peter Kahrel 
// with some adjustments and additions (Dialog to select the operation,  
// considering every story but only the selected one) by Martin Fischer 
 
//some global constants  
notecueStyle = 'Fußnotenzeichen'	//cues, char. style  
notenumStyle = 'Fußnotenzeichen'	//note number (in foot- and in endnotes), char. style  
noteStyle =	'FN'			//for notes, paragraph style  
notePar1Style = 'FN'		//for first paragraph in note, par. style  
sepText = '\u2002'			//separator text in notes  
noteStart = '\u2704'	//codes for notes when  
noteEnd = '\u2705'		//placed at end of story  
u = undefined  
//---------------------------------------------------------------------  
 
var myResult = myDialog(); 
var myStories = app.documents[0].stories; 
for (oneStory = 0; oneStory < myStories.length; oneStory++) 
{ 
	if (myResult == "notes2Text") 
		notes2text( myStories[oneStory] )  
		else text2Footnotes(myStories[oneStory])  
} 
 
function notes2text( theStory )  
{  
app.findPreferences = app.changePreferences = null  
var notes = theStory.search( '^F' )  
if( notes.length > 0 )  
	{  
	app.activeDocument.footnoteOptions.separatorText = ''  
	app.activeDocument.footnoteOptions.markerPositioning =   
		FootnoteMarkerPositioning.normalMarker  
	for( var j = 0; j < theStory.footnotes.length; j++ )  
		{  
		theStory.insertionPoints[-1].contents = '\r' + noteStart  
		theStory.footnotes[j].texts[0].move(   
			LocationOptions.after, theStory.insertionPoints[-1] )  
		theStory.insertionPoints[-1].contents = noteEnd  
		}  
	//must refresh 'notes'  
	var notes = theStory.search( '^F' )  
	for( var j = theStory.footnotes.length-1; j > -1; j-- )  
		notes[j].insertionPoints[0].contents = '</cue>'  
	theStory.search( '^F', false, false, '' )  
	}  
}  
 
//-----------------------------------------------------------------------  
 
function text2Footnotes(theStory)  
{  
	app.findPreferences = app.changePreferences = null  
	var cues = theStory.search( '</cue>' )  
	if( cues.length > 0 ) 
	{  
		doNoteStyles()  
		var nStart = theStory.search( noteStart, false, true )  
		//var story = cues[0].parentStory  
		theStory.paragraphs.itemByRange(   
			nStart[0].paragraphs[0],   
			theStory.paragraphs[-1] ).applyStyle  
				( pStyles.item( noteStyle ), false )  
		//apply notePar1Style to first paragraph of each note  
		for( var j = nStart.length-1; j > -1; j-- )  
			nStart[j].paragraphs[0].applyStyle  
				( pStyles.item( notePar1Style ), false )  
	 
		with( app.activeDocument.footnoteOptions )  
			{  
			footnoteTextStyle = pStyles.item( notePar1Style )  
			separatorText = sepText  
			footnoteMarkerStyle = chStyles.item( notecueStyle )  
			markerPositioning = FootnoteMarkerPositioning.normalMarker  
			}  
		for( var j = cues.length-1; j > -1; j-- )  
			var fn = cues[j].insertionPoints[0].footnotes.add()  
		var nStart = theStory.search( noteStart, false, true )  
		var nEnd = theStory.search( noteEnd, false, true )  
		for( var j = cues.length-1; j > -1; j-- )  
			theStory.characters.itemByRange( nStart[j], nEnd[j] ).move  
				( LocationOptions.after, theStory.footnotes[j].insertionPoints[-1] )  
		theStory.search( '</cue>', false, true, '' )  
		//delete placeholdres  
		theStory.search( noteStart, u, u, '' )  
		theStory.search( noteEnd, u, u, '' )  
		//mop up stray hard returns  
		while( theStory.characters[-1].contents == '\r' )  
			theStory.characters[-1].remove()  
	} 
}  
 
//--------------------------------------------------------------------------  
 
//create some styles for notes  
function doNoteStyles()  
{  
chStyles = app.activeDocument.characterStyles  
if( chStyles.item( notecueStyle ) == null )  
	chStyles.add( { name : notecueStyle, position : Position.superscript } )  
if( chStyles.item( notenumStyle ) == null )  
	chStyles.add( { name : notenumStyle } )  
pStyles = app.activeDocument.paragraphStyles  
if( pStyles.item( noteStyle ) == null )  
	pStyles.add( {   
		name : noteStyle,   
		basedOn : pStyles.item('[Basic Paragraph]') } )  
if( pStyles.item( notePar1Style ) == null )  
	{  
	var temp = pStyles.add( {   
		name : notePar1Style,   
		basedOn : pStyles.item( noteStyle )  } )  
	with( temp.nestedStyles.add() )  
		{  
		appliedCharacterStyle = chStyles.item( notenumStyle )  
		delimiter = NestedStyleDelimiters.anyWord  
		inclusive = true  
		}  
	}  
} 
 
//-----------------------------------------------------------------------  
 
function myDialog(myDefaultPara01,myDefaultPara02) 
{ 
	var myDialog = app.dialogs.add({name:"Operation"}); 
	var theChoice = ["notes2Text", "text2Footnotes"]; 
	with(myDialog.dialogColumns.add()){ 
		with(dialogRows.add()){  
			with(dialogColumns.add()){  
				staticTexts.add({staticLabel:"Choice:"});  
			}  
			with(dialogColumns.add()){  
				var myChoiceDropdown = dropdowns.add({stringList:theChoice, selectedIndex:0});  
			}  
		}  
	} 
	var theResult = myDialog.show(); 
	if(theResult == true){ 
		var theOpera = theChoice[myChoiceDropdown.selectedIndex]  
		myDialog.destroy(); 
	} 
	else{ 
		myDialog.destroy(); 
		exit(); 
	} 
	return theOpera; 
} 

set applied character style of text from character myStartPos to character myEndPos of myStory to myCharacterStyleRef 

set myStyle to applied paragraph style of character 1 of selection 

set contents of last insertion point of myNewfootnote to contents of myDummyframe