Ayuda print-o-matic

Para imprimir stage solo con "PrintOMatic Xtra" o "PrintOMatic Lite Xtra". Ese Xtra tiene 2 versiones y 2 valores. La version Lite no deberia tener problemas con lo que deseas hacer.
Prueba el Xtra y el siguiente script que imprime stage
on mouseUp me
myPrintStage()
end
on myPrintStage
set doc = new(xtra "PrintOMatic")
if not objectP(doc) then
-- no printer
alert "There is no currently selected printer."
exit
end if
-- setup print job
setDocumentName doc, "My Stage Printout" -- or whatever
setMargins doc, Rect(72,72,72,72) -- 1 inch margins
set stageWidth = the width of the rect of the stage
set stageHeight = the height of the rect of the stage
-- set paper orientation
if stageWidth > stageHeight then setLandscapeMode doc, TRUE
set pageWidth = getPageWidth(doc)
set pageHeight = getPageHeight(doc)
-- figure out scaling of page
set scaling = min(1.0,float(pageWidth)/float(stageWidth))
set scaling = min(scaling,float(pageHeight)/float(stageHeight))
set destWidth = integer(scaling*stageWidth)
set destHeight = integer(scaling*stageHeight)
-- Figure top left starting point for a centered image
set destLeft = (pageWidth-destWidth)/2
set destTop = (pageHeight-destHeight)/2
-- make a new page
newPage doc
-- grab the stage, put it on the page
--drawStagePicture doc, Rect(destLeft, destTop, destLeft+destWidth, destTop+destHeight), Rect(0,0, stageWidth, stageHeight), FALSE
drawStagePicture doc, Rect(destLeft, destTop, destLeft+destWidth, destTop+destHeight), Rect(0,0, stageWidth, stageHeight), FALSE
-- un-comment the next line to hide the progress dialog
-- setProgressLoc doc, Point(-1000,-1000)
-- this command only works in the registered Xtra
printPreview doc
-- comment out the next line and the "end if" line to hide job setup
if doJobSetup(doc) then
print doc -- you can substitute print preview here, too!
end if
set doc = 0
end