IDCS3 - Automate task every 4 pages? Possible?

Question

I'm on Tiger, using InDesign CS3. I have multiple 1000 page (8.5X11) pdf files that upon importing into InDesign I need to make a small change on every 4th page - moving the whole page frame down and to the left. Presently I am manually clicking every fourth page, and typing in the appropriate X/Y coordinates...but this is getting tedious really fast. I don't know how to write scripts, but didn't know if anyone had any creative ideas...thanks in advance.

Answer 1

Just to chime in that it is hypothetically possible.
For example, if your PDFs were numbered sequentially and you only wanted to modify names that divided evenly by 4, something like this might work:
tell application "Adobe InDesign CS2"
tell active document
  set myLinks to every link whose name begins with "PDF"
  repeat with thisLink in myLinks
   set thisName to name of thisLink
   set thisNum to (((characters -8 thru -5 of thisName) as string) as number)
   if (thisNum mod 4) = 0 then
    set frameList to (every graphic of all page items whose item link = thisLink)
    if length of frameList = 1 then
     set thisFrame to item 1 of frameList
     --define amount to shift by
     set xShift to "-.75" --put in your own value here
     set yShift to "-.75" --put in your own value here
     --Move frame
     set {thisTop, thisLeft, thisBtm, thisRight} to geometric bounds of parent of thisFrame
     set thisTop to thisTop + yShift
     set thisBtm to thisBtm + yShift
     set thisLeft to thisLeft + xShift
     set thisRight to thisRight + xShift
     set geometric bounds of parent of thisFrame to {thisTop, thisLeft, thisBtm, thisRight}
     --Move graphic
     set {thisTop, thisLeft, thisBtm, thisRight} to geometric bounds of thisFrame
     set thisTop to thisTop + yShift
     set thisBtm to thisBtm + yShift
     set thisLeft to thisLeft + xShift
     set thisRight to thisRight + xShift
     set geometric bounds of thisFrame to {thisTop, thisLeft, thisBtm, thisRight}
    end if
   end if
  end repeat
end tell
end tell