(* dm at mayart.de, 2004

Adobe Illustrator CS
Ausgewähltes eingebettetes Rasterbild auf Originalgröße zurücksetzen.

Das Skript muss im Apple Skripteditor als *.scpt gespeichert und kann
unter Programme > Adobe Illustrator CSx > Vorgaben > Skripte abgelegt werden. 
Nach Neustart von Illustrator findet man es im Menü Datei > Skripten. 

Es geht auch mit dem Skript Menü in OS X (installieren mit AppleScript Utility in Programme > Applescript)
oder besser mit FastScripts: <http://www.red-sweater.com/fastscripts/index.html>.
Hier liegen die Skripte in ~/Library/Scripts/...

*)

tell application "Adobe Illustrator"
	if current document = {} then return
	
	if (selection = {}) or (count items of selection) > 1 or (class of selection) is group item then
		display dialog "Bitte nur ein nicht gruppiertes eingebettetes Rasterbild auswählen."
		return
	else if class of selection ≠ raster item then
		display dialog "Bitte erst ein eingebettetes Rasterbild auswählen."
		return
	end if
	activate
	try
		set p to position of selection
		set matrix of selection to get identity matrix
		set h to height of selection
		translate selection delta y h
		set position of selection to p
	on error error_message
		display dialog error_message
	end try
end tell