$b";
if (isset ($grfile) and $grfile)
{
if (!isset ($scale))
{
$im = new Imagick ($grfile);
$width = $im->getImageWidth ();
$height = $im->getImageHeight ();
$aspect_ratio = $width / $height;
if ($aspect_ratio > 1) $sw = 1280;
else $sw = round (1280 * $aspect_ratio);
$sh = round ($sw / $aspect_ratio);
$scale = $width / $sw;
$im->resizeImage ($sw, $sh, Imagick::FILTER_SINC, 0.7);
$im->writeImage ("Source.tif");
$im->destroy ();
}
$im = transform ("source.tif", 640, $scale);
if (isset ($grid) and $grid != 0)
{
$draw = new ImagickDraw ();
$draw->setStrokeColor ($gcolour);
$hdist = round ($width / $grid / 2);
$vdist = round ($height / $grid / 2);
for ($i = 1; $i < $grid; $i++)
{
$draw->line ($hdist * $i, 0, $hdist * $i, $height / 2);
$draw->line (0, $vdist * $i, $width / 2, $vdist * $i);
}
$im->drawImage ($draw);
$draw->destroy ();
}
$im->writeImage ("Sample.png");
$im->destroy ();
echo "| $grfile |
|---|
$b";
echo "$b$b";
echo "![](\"Sample.png\") $b | $b";
echo "$b | $b
$b";
echo "$b| $b ";
if (isset ($orix) and isset ($oriy) and $orix and $oriy) echo "Origin: $orix, $oriy "; else echo "Origin not set$b";
echo "$b$b | $b
$b";
echo "| Four Point Transformation |
$b";
for ($j = 0; $j < 4; $j++)
{
echo "| $corners[$j] |
$b";
echo "| X: Y: |
$b";
}
echo "| Shift (- up/left, + down/right) |
$b";
echo "| X: Y: |
$b";
echo "| Grid: $b";
echo "$b";
echo " | $b
$b";
echo "$b| Stretch: Lock$b |
$b";
echo "| X: $b";
echo "Y: $b";
echo " | $b
$b";
echo "| Dersch's B: $b | $b
$b";
echo "| Virtual Pixel: $b | $b
$b";
echo "| Save to size: $b | $b
$b";
echo "| Rotate: ° |
$b";
echo "";
echo "$b";
echo "$b";
if ($submit == "Save from Original")
{
$im = transform ($grfile, $savetosize, 1);
$file_name = "Crtrix Samples/" . substr ($grfile, 0, strrpos ($grfile, ".")) . "_LT.png";
$im->writeImage ($file_name);
$im->destroy ();
}
}
echo "$b| Load Image: | $b";
echo "$b";
if (isset ($grfile)) echo "$b";
echo " |
$b";
echo "
$b";
echo "