2

一定量 (90 度ではなく) 回転させたい DigitalMicrograph 画像があります。これはメニュー項目「Process...\Rotate」で実行できますが、スクリプトで実行したいと思います。画像で見つかったライン ROI に基づいて角度を計算するスクリプトがあります。(以下を参照)しかし、画像を回転させる方法がわかりません。

Number kPi = 3.14159265359

Image front := GetFrontImage()
ImageDisplay fDisp = front.ImageGetImageDisplay(0)
ROI line = fDisp.ImageDisplayGetRoi(0)
if ( line.RoiIsValid() )
{
    if ( line.RoiIsLine() )
    {
        number sx,sy,ex,ey
        line.RoiGetLine(sx,sy,ex,ey)
        number dy = ey - sy
        number dx = ex - sx
        number angle = atan( dy / dx ) * 180/kPi
        if ( dx < 0 ) 
            angle = angle + 180

        Result("\n Rotate image by " + angle + " degree.")
    }
}
4

1 に答える 1