🚀 go-pugleaf

This stuff makes my head spin. Am I right in suggesting this can all be
combined into one script, like so?

tell application "InDesign 2.0.2"
 set myFrame to item 1 of selection
 if class of myFrame is not in {group, table} then
  set theProps to properties of myFrame
  if page item 1 of myFrame exists then
   try
    set myVScale to absolute vertical scale of myPic
    set myHScale to absolute horizontal scale of myPic
    set picBounds to geometric bounds of myPic
   end try
  end if
  set theProps to {absolute vertical scale:nothing, vertical scale:100,
absolute horizontal scale:nothing, horizontal scale:100, stroke
weight:thePercent * (stroke weight of myprops) / 100, corner
radius:thePercent * (corner radius of theProps) / 100} & theProps
  set properties of myFrame to theProps
  try
   set properties of page item 1 of myFrame to {absolute vertical
scale:thePercent * myVScale / 100, absolute horizontal scale:thePercent *
myHScale / 100, geometric bounds:picBounds}
  end try
 else if class of myFrame is group then
  transform group contents myFrame
  set textFrames to text frames of (get all page items of myFrame)
  repeat with aFrame in textFrames
   scale text attributes aFrame
  end repeat
 end if
end tell

-- 
Shane Stanley,  sstanley@myriad-com.com.au