🚀 go-pugleaf

Well here is a basic script that cuts all the inline graphics and pastes them into the document... I have no clue how you would get them *back* into the text, mind you! o_O

tell application "Adobe InDesign CS3" 
	tell active document 
		set myStories to every story 
		repeat with thisStory in myStories 
			set storyGraphics to all graphics of thisStory 
			if length of storyGraphics > 0 then 
				repeat with thisGraphic in storyGraphics 
					select parent of thisGraphic 
					tell application "Adobe InDesign CS3" 
						cut 
					end tell 
					select nothing 
					tell application "Adobe InDesign CS3" 
						paste 
					end tell 
				end repeat 
			end if 
		end repeat 
	end tell 
end tell