サイズを指定してオブジェクトの大きさを揃えるスクリプト（縦横変倍）Script to align the size of object[Variable]

こちらは少しいじってわざと比率固定しないようにしたもの。
意味ないようにみえて以外と使えたりするw
楕円のパスを正円にしたり、、
長方形を正方形にしたり。。

pt=25.4/72

var dia = new Window("dialog", "オブジェクトの大きさを揃える（変倍）", [0,0,250,180]);
	dia.pane1 = dia.add("panel",[5,25,240,65],"サイズの基準");
	dia.radi1 = dia.pane1.add("radiobutton",[10,5,60,20],"タテ", );
	dia.radi2 = dia.pane1.add("radiobutton",[70,5,120,20],"ヨコ");
	dia.pane2 = dia.add("panel",[5,75,240,125],"サイズは");
	dia.tex1 = dia.pane2.add("edittext",[10,10,100,30]);
	dia.add("statictext",[110,100,240,120],"mm");
	dia.bot1 = dia.add("button",[10,140,100,170],"実行", { name:"ok"});
	dia.radi1.value=true;
	dia.center();
	dia.show();

sel = activeDocument.selection;
for (i=0; i<sel.length; i++)
{
	if(dia.radi1.value){
		kijyun=sel[i].height;
        	bairitu=dia.tex1.text/(kijyun*pt)*100;
	sel[i].resize(100, bairitu,true,true,true,true,false,Transformation.CENTER);
	}else{
		kijyun=sel[i].width;
        	bairitu=dia.tex1.text/(kijyun*pt)*100;
	sel[i].resize(bairitu, 100,true,true,true,true,false,Transformation.CENTER);
	}

}