//
// Creates a guide line.
//
generator "Guide";
group "Tom's Generators";
AlphaType(kblack);

input floatType,		"Type",		popup, 1, "Horizontal", "Vertical", "Both";
input pointGuide,		"Location",	point, 0, 0;
input colorGuideColor,	"Color",	color, 255, 0, 0, 255;
input floatWidth,		"Width",	slider, 1, 1, 5 snap 1, 2, 3, 4, 5;

code

If (previewing)

ExposedBackground = 1;

ChannelFill(dest, 0, 0, 0, 0);

point pointFrameSize;
DimensionsOf(dest, pointFrameSize.h, pointFrameSize.v);

pointGuide *= pointFrameSize;

point pointGuideStart, pointGuideEnd;

If (floatType == 1 || floatType == 3)	// Horizontal Guide
	pointGuideStart = {((pointFrameSize.h / 2) * -1), pointGuide.y};
	pointGuideEnd = {(pointFrameSize.h / 2), pointGuide.y};
	Line(pointGuideStart, pointGuideEnd, dest, colorGuideColor, floatWidth);
End If;

If (floatType == 2 || floatType == 3)	// Vertical Guide
	pointGuideStart = {pointGuide.x, ((pointFrameSize.v / 2) * -1)};
	pointGuideEnd = {pointGuide.x, (pointFrameSize.v / 2)};
	Line(pointGuideStart, pointGuideEnd, dest, colorGuideColor, floatWidth);
End If;

End If;