tell application id "OGfl" tell front document set myCanvas to (make new canvas with properties {name:"New blank sheet"}) move myCanvas to after canvas 4 end tell end tell