Ambitious but can it be done?

[Doc]

'Problem there is the delimiters... maybe go into TextEdit, do a manual find/replace on the document, replacing the left and right brackets around the images with dollar signs or something like that...

Then have AppleScript parse the document from that...

Yeah... that's doable.

Something like...

tell application 
TextEdit
	set Image_Pull to 
 as list

	

	set the_Source to document of window 1

	set Doc_Txt to text of the_Source

	set AppleScript's text item delimiters to {
$
}

	set bits_nPieces to every text item of Doc_Txt

	repeat with i from 1 to count of bits_nPieces

		if (text item i of bits_nPieces) contains 
.png
 then set Image_Pull to Image_Pull & (text item i of bits_nPieces)

	end repeat

	set Image_Pull to (items 2 through -1 of Image_Pull)

	Image_Pull

	

end tell

...and then do another repeat loop for every item of Image_Pull to copy each file to another directory.