<?
if ( isset($_GET['BGCOLOR'])){
$BGCOLOR=$_GET['BGCOLOR']; 
}else{
$BGCOLOR="";
}
if ( isset($_GET['GRADCOLOR'])){
$GRADCOLOR=$_GET['GRADCOLOR']; 
}else{
$GRADCOLOR="";
}
if ( isset($_GET['BGCOLOR2'])){
$BGCOLOR2=$_GET['BGCOLOR2']; 
}else{
$BGCOLOR2="";
}
if ( isset($_GET['GRADCOLOR2'])){
$GRADCOLOR2=$_GET['GRADCOLOR2']; 
}else{
$GRADCOLOR2="";
}

if ( isset($_GET['OUT'])){
$OUT=$_GET['OUT']; 
}else{
$OUT="";
}
if ( isset($_GET['PANGLE'])){
$PANGLE=$_GET['PANGLE'];
}else{
$PANGLE="";
}
if ( isset($_GET['PANGLE2'])){
$PANGLE2=$_GET['PANGLE2'];
}else{
$PANGLE2="";
}
if ( isset($_GET['NANGLE'])){
$NANGLE=$_GET['NANGLE'];
}else{
$NANGLE="";
}
if ( isset($_GET['NANGLE2'])){
$NANGLE2=$_GET['NANGLE2'];
}else{
$NANGLE2="";
}
if ( isset($_GET['ILLUSTRATE'])){
$ILLUSTRATE=$_GET['ILLUSTRATE'];
}else{
$ILLUSTRATE="";
}
if ( isset($_GET['CUSTOM'])){
$CUSTOM=$_GET['CUSTOM'];
}else{
$CUSTOM="";
}
if ( isset($_GET['ID'])){
$ID=$_GET['ID'];
}else{
$ID="";
}
if ( isset($_GET['VIRTUAL'])){
$VIRTUAL=$_GET['VIRTUAL']; 
}else{
$VIRTUAL="";
}
if ( isset($_GET['RADIUS'])){
$RADIUS=$_GET['RADIUS'];
}else{
$RADIUS="";
}

if ( isset($_GET['COLOR'])){
$COLOR=$_GET['COLOR'];
}else{
$COLOR="";
}

$rand=rand(1,1000);
$JPG="Temp/ARC_$rand.jpg";
$GIF="Temp/ARC_$rand.gif";
$PNG="Temp/ARC_$rand.png";

$TILE="tile";
$HORIZONTALTILE="HorizontalTile";
$BACKGROUND="background";
$EDGE="edge";
$MIRROR="mirror";
$VERTICALTILE="verticaltile";
$RANDOM="random";
$DITHER="dither";
$GRAY="gray";
$WHITE="white";
$BLACK="black";
$TRANSPARENT="transparent";

//MAKE GRADIENTS
exec ("/usr/bin/convert -size 50x50 gradient:$BGCOLOR-$GRADCOLOR -distort SRT $PANGLE Temp/WM90_$ID.gif");

exec ("/usr/bin/convert -size 50x50 gradient:$BGCOLOR-$GRADCOLOR -distort SRT $NANGLE Temp/WMn90_$ID.gif");
exec ("/usr/bin/convert -size 50x20 gradient:$BGCOLOR2-$GRADCOLOR2 -distort SRT $NANGLE2 Temp/frill1_$ID.gif");
exec ("/usr/bin/convert -size 50x20 gradient:$BGCOLOR2-$GRADCOLOR2 -distort SRT $PANGLE2 Temp/frill2_$ID.gif");
//MAKE MONTAGE FOR TUBES
exec ("/usr/bin/montage Temp/WM90_$ID.gif Temp/WMn90_$ID.gif -tile 2x1 -geometry +0+0 Temp/block_$ID.gif");
exec ("/usr/bin/montage Temp/frill2_$ID.gif Temp/frill1_$ID.gif -tile 2x1 -geometry +0+0 Temp/frill_$ID.gif");
//CROP OFF EXCESS BLACK IN THE TUBES
exec ("/usr/bin/convert Temp/block_$ID.gif -crop 100x50+25+0 -crop 100x50-25-0 Temp/CropBl_$ID.gif");
exec ("/usr/bin/convert Temp/frill_$ID.gif -crop 100x20+25+0 -crop 100x20-25-0 Temp/fri_$ID.gif");
//MAKE MONTAGE OF CROPPED TUBES
exec ("/usr/bin/montage Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/CropBl_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif Temp/fri_$ID.gif -background transparent -tile 10x3 -geometry +0+0 Temp/GradMont_$ID.gif");
//RESIZE THE MONTAGE
exec ("/usr/bin/convert Temp/GradMont_$ID.gif -resize 200x100! Temp/GradMontRz_$ID.gif");
if ( $_GET[ILLUSTRATE] == 1) 
{ 
//MAKE AN ARC OF THE TUBE MONTAGE
exec ("/usr/bin/convert Temp/GradMontRz_$ID.gif -virtual-pixel $VIRTUAL -distort arc 180 Temp/skirtB_$ID.gif");
exec ("/usr/bin/convert Temp/skirtB_$ID.gif -crop +0-2 Temp/skirt1_$ID.gif");
exec ("/usr/bin/convert Temp/skirt1_$ID.gif -fuzz 7000 -matte -fill $COLOR -draw 'color 10,10 replace' $OUT");

}
if ( $_GET[ILLUSTRATE] == 2) 
{ 
exec ("/usr/bin/convert Temp/GradMontRz_$ID.gif -virtual-pixel $VIRTUAL -distort arc 180 Temp/skirtB_$ID.gif");
exec ("/usr/bin/convert Temp/skirtB_$ID.gif -crop +0-2 Temp/skirt1_$ID.gif");
//FLIP THE ARC
exec("/usr/bin/convert -flip Temp/skirt1_$ID.gif Temp/Flipskirt_$ID.gif");
exec ("/usr/bin/convert Temp/Flipskirt_$ID.gif -fuzz 7000 -matte -fill $COLOR -draw 'color 10,90 replace' $OUT");

}
if ( $_GET[ILLUSTRATE] == 3) 
{ 
exec ("/usr/bin/convert Temp/GradMontRz_$ID.gif -virtual-pixel $VIRTUAL -distort arc 180 Temp/skirtB_$ID.gif");
exec ("/usr/bin/convert Temp/skirtB_$ID.gif -crop +0-2 Temp/skirt1_$ID.gif");
//FLIP THE ARC
exec("/usr/bin/convert -flip -flop Temp/skirt1_$ID.gif Temp/Flipskirt_$ID.gif");

exec("/usr/bin/montage Temp/skirt1_$ID.gif Temp/Flipskirt_$ID.gif -background transparent -tile 1x2 -geometry +0+0 Temp/ArcCirc_$ID.gif");
exec ("/usr/bin/convert Temp/ArcCirc_$ID.gif -fuzz 7000 -matte -fill $COLOR -draw 'color 10,10 replace' $OUT");

}
if ( $_GET[ILLUSTRATE] == 4) 
{ 
exec ("/usr/bin/convert Temp/GradMontRz_$ID.gif -virtual-pixel $VIRTUAL -distort arc $CUSTOM Temp/custom_$ID.gif");
exec ("/usr/bin/convert Temp/custom_$ID.gif -fuzz 7000 -matte -fill $COLOR -draw 'color 10,10 replace' $OUT");

}


//PRINT SHOWS ARC AND MONTAGE OF TUBES
print "<br><br><div align=\"center\">"; 
print "Click Below To Get Image & URL<br /><br />"; 
print "<a href=$OUT><img src=$OUT></a><br /><br />"; 
print $OUT;


print "</div>"; 
?>

<html><head><title>IM GRADIENT ARCS</title></head>
<body bgcolor="#cc9988" text="#000000">
<h1 align="center">IM GRADIENT ARCS</h1> 

<div align="center">
<a href="http://www.lingolinda.com/2008/scripts/IM/gradangles/arcs/IMGradArcs.html">TUTORIAL</a>

<form action="<?php echo $_SERVER['PHP_SELF']; ?>" method="GET"> 
<table border="3" bgcolor="ffcc33" cellspacing="0" cellpadding="3"><tr><td width="250"><FONT COLOR="lilac" size="medium">*</font>Required Fields<br><br>Enter a unique ID:&nbsp;<FONT COLOR="lilac" size="medium">*</font><input type="text" name="ID" value="id"><br> (so your image will not get confused with someone else's)</td><td align="center"><img src="ArcTube.gif"></tr><tr>
<td width="250"><FONT COLOR="lilac" size="medium">*</font>TUBE BGCOLOR:<input type="text" name="BGCOLOR" value="white"></td><td width="250"><FONT COLOR="lilac" size="medium">*</font>TUBE GRADCOLOR:<input type="text" name="GRADCOLOR" value="maroon"></td></tr><tr><td>
<FONT COLOR="lilac" size="medium">*</font>TUBE ANGLE: <INPUT type="text" name="PANGLE" value="90">
</td><td><FONT COLOR="lilac" size="medium">*</font>TUBE ANGLE: <INPUT type="text" name="NANGLE" value="-90">
</td></tr><tr><td>

<FONT COLOR="lilac" size="medium">*</font>TRIM BGCOLOR:<input type="text" name="BGCOLOR2" value="magenta"></td><td><FONT COLOR="lilac" size="medium">*</font>TRIM GRADCOLOR:<input type="text" name="GRADCOLOR2" value="yellow">
</td></tr><tr>
<td><FONT COLOR="lilac" size="medium">*</font>TRIM ANGLE:<INPUT type="text" name="PANGLE2" value="140">
</td>
<td><FONT COLOR="lilac" size="medium">*</font>TRIM ANGLE:<INPUT type="text" name="NANGLE2" value="-140">
</td></tr><tr>
<td>
<FONT COLOR="lilac" size="medium">*</font>OUTPUT SHAPE:<BR>&nbsp;&nbsp;TOP ARC <input type="radio" name="ILLUSTRATE" value="1">(180 Arc)<br> &nbsp;&nbsp;BOTTOM ARC <input type="radio" name="ILLUSTRATE" value="2">(180 Arc flipped)<br>&nbsp;&nbsp;CIRCLE <input type="radio" name="ILLUSTRATE" value="3">(180 Arc composite) </td><td>Use this option only if not using one of the output shape buttons<br>
CUSTOM (30-370)<br>Optional: <input type="radio" name="ILLUSTRATE" value="4"><input type="text" name="CUSTOM" value="370"> 
</td></tr><tr><td>
VIRTUAL PIXEL METHOD:<BR>
<select name="VIRTUAL">
<option value="<? echo $TRANSPARENT; ?>">TRANSPARENT</option>
<option value="<? echo $TILE; ?>">TILE</option>
<option value="<? echo $HORIZONTALTILE; ?>">HORIZONTAL TILE</option>
<option value="<? echo $EDGE; ?>">EDGE</option>
<option value="<? echo $MIRROR; ?>">MIRROR</option>
<option value="<? echo $VERTICALTILE; ?>">VERTICAL TILE</option>
<option value="<? echo $RANDOM; ?>">RANDOM</option>
<option value="<? echo $DITHER; ?>">DITHER</option>
<option value="<? echo $BACKGROUND; ?>">BACKGROUND (add color)</option>
</select></td><td>
BACKGROUND COLOR: <br><input type="text" value="none" name="COLOR">
</td></tr><tr>
<td>
<FONT COLOR="lilac" size="medium">*</font>TYPE:
<select name="OUT">
<option value="<? echo $GIF; ?>">GIF</option>
<option value="<? echo $JPG; ?>">JPG</option>
<option value="<? echo $PNG; ?>">PNG</option>
</select><br>

</td><td>
<input type="submit" value="Create My Arc">
</td></tr></table>
</form>
<br /><br />
Some color names (Reload if not working):<br>
<iframe src='http://www.lingolinda.com/2008/scripts/IM/gradangles/ColoringBook.html'></iframe>


</div></body></html>