背のある表紙の折りトンボを作成するスクリプト

ドキュメントサイズから
サイズを読み取ってダイアログから入力した背幅の折りトンボを
作成するスクリプトです。

var dia = new Window("dialog", "折りトンボ作成", [0,0,150,80]);
	dia.pane1 = dia.add("panel",[5,5,145,45],"背幅");

	dia.tex1 = dia.pane1.add("edittext",[10,5,100,25]);
	dia.add("statictext",[110,25,145,120],"mm");
	dia.bot1 = dia.add("button",[10,50,100,70],"実行", { name:"ok"});

	dia.center();
	dia.show();
    
docObj = app.activeDocument
pt=2.8346
sen=12.7*pt
haba=dia.tex1.text*pt

layerObj = app.activeDocument.activeLayer;

base = layerObj.pathItems.rectangle(0,0,docObj.width*2+haba+sen*2,docObj.height+sen*2);
box1 = layerObj.pathItems.rectangle(-sen,sen,docObj.width,docObj.height);

docObj.cropBox = base.visibleBounds;


base.remove()


box1.filled = true; //

box1.fillColor=box1.strokeColor

box1.stroked = false; //

	


docObj.width=box1.width*2+14*pt

box2 = box1.duplicate()
box2.top=box1.top

box1r=box1.left+box1.width

box2.left=box1r+haba



y1=box1.top+12*pt

y2=box1.top-box1.height-3*pt





tonbo(box1r,y1)
tonbo(box2.left,y1)

tonbo(box1r,y2)
tonbo(box2.left,y2)




function tonbo(x,y){
layerObj = app.activeDocument.activeLayer;
pObj = layerObj.pathItems.add();
pObj.setEntirePath([[x,y],[x,y-9*pt]]);
pObj.filled = false; //　塗りなし
pObj.stroked = true; //　線あり
pObj.strokeWidth = .3; //　線幅10ポイント
pObj.strokeColor=activeDocument.swatches["[レジストレーション]"].color 

}