🚀 go-pugleaf

The script included on the 2.0 CD for exporting text from all stories in a document.... works fine. 

I'd like to do the same with all documents in a book. Preferably auto-saved in subfolders named according to chapter (document) title, within a master folder of my own choosing.  

Can anyone help? i'm an Applescript novice and find the ID2 scripting guide merely a withered carrot dangled several feet out from a lofty precipice. 

Here's the original script, except I've changed file type to RTF (from tagged text) -- apologies for the formatting: 

--ExportAllStories --An InDesign 2.0 script. --For more on InDesign scripting, go to  --http://www.adobe.com/products/indesign/scripting.html --Export all stories in the current document. set myFolder to choose folder with prompt "Select a folder in which to store the exported files" tell application "InDesign 2.0" 	--Set a file extension for cross-platform compatibility (use ".txt" for text and ".rtf" for RTF). 	set myExtension to ".rtf" 	try 		set myErrorMessage to "No documents are open. Please open a document and try again." 		set myDocument to document 1 		if (count stories of myDocument) = 0 then 			set myErrorMessage to "Open a document containing some text and try again." 			error 		end if 		repeat with myCounter from 1 to (count stories of myDocument) 			--Name each story using the story ID. 			set myFileName to "story " & id of story myCounter of myDocument & myExtension 			--Create the path to the export file. 			set myFilePath to (myFolder as string) & myFileName 			tell story myCounter of myDocument 				--Export formats are: tagged text, text type, and RTF 				export format RTF to myFilePath without showing options 			end tell 		end repeat --myStoryCounter 	on error 		activate 		display dialog myErrorMessage 	end try end tell