Script – Custom layout

local doc=window.GetDocument();
local count=doc.numpages;
local i;
for(i=0;i<count;i++)
{
  local page=doc.GetPage(i);
  local r= page.AutoCrop();
  if(r)
    page.SetCrop(r);
}

layout.Clear();
local paper;
local rest=0.0;
local y=0;
local delta=0.5;

for(i=0;i<count;i++)
{
  local page=doc.GetPage(i);
  local p1 = page.GetAreaSize();
  p1.y+=delta;
  if(p1.y>rest){
    paper=layout.NewSheet();
    y=0;
    rest=paper.GetArea().Height();
    //print("New Sheet:"+rest+"\n");
  }
  rest-=p1.y;
  //print("Page:"+p1.y+"  ,remaining:" +rest+"\n");
  paper.InsertPage(page);	
  paper.SetPagePos(page,Point(0,y));
  paper.SetPageScale(page,1.0);
  y+=p1.y;
}