| 1 | <?php
|
|---|
| 2 |
|
|---|
| 3 | /*
|
|---|
| 4 |
|
|---|
| 5 | Copyright (c) 2006-2008 Ulrich Mierendorff
|
|---|
| 6 |
|
|---|
| 7 | Permission is hereby granted, free of charge, to any person obtaining a
|
|---|
| 8 | copy of this software and associated documentation files (the "Software"),
|
|---|
| 9 | to deal in the Software without restriction, including without limitation
|
|---|
| 10 | the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
|---|
| 11 | and/or sell copies of the Software, and to permit persons to whom the
|
|---|
| 12 | Software is furnished to do so, subject to the following conditions:
|
|---|
| 13 |
|
|---|
| 14 | The above copyright notice and this permission notice shall be included in
|
|---|
| 15 | all copies or substantial portions of the Software.
|
|---|
| 16 |
|
|---|
| 17 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|---|
| 18 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|---|
| 19 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|---|
| 20 | THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|---|
| 21 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
|---|
| 22 | FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
|
|---|
| 23 | DEALINGS IN THE SOFTWARE.
|
|---|
| 24 |
|
|---|
| 25 | Changelog:
|
|---|
| 26 | version 1.1
|
|---|
| 27 | - improved the rendering speed by ~20%
|
|---|
| 28 |
|
|---|
| 29 | - Thanks to Matthias MÀchler for fixing some small errors:
|
|---|
| 30 | * uninitialized variables
|
|---|
| 31 | * deprecated passing of $img reference in imageSmoothArc ()
|
|---|
| 32 |
|
|---|
| 33 | version 1.0
|
|---|
| 34 | Release of rewritten script
|
|---|
| 35 |
|
|---|
| 36 | */
|
|---|
| 37 |
|
|---|
| 38 | function imageSmoothArcDrawSegment (&$img, $cx, $cy, $a, $b, $aaAngleX, $aaAngleY, $color, $start, $stop, $seg)
|
|---|
| 39 | {
|
|---|
| 40 | // Originally written from scratch by Ulrich Mierendorff, 06/2006
|
|---|
| 41 | // Rewritten and improved, 04/2007, 07/2007
|
|---|
| 42 |
|
|---|
| 43 | // Please do not use THIS function directly. Scroll down to imageSmoothArc(...).
|
|---|
| 44 |
|
|---|
| 45 | $fillColor = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], $color[3] );
|
|---|
| 46 |
|
|---|
| 47 | $xStart = abs($a * cos($start));
|
|---|
| 48 | $yStart = abs($b * sin($start));
|
|---|
| 49 | $xStop = abs($a * cos($stop));
|
|---|
| 50 | $yStop = abs($b * sin($stop));
|
|---|
| 51 | $dxStart = 0;
|
|---|
| 52 | $dyStart = 0;
|
|---|
| 53 | $dxStop = 0;
|
|---|
| 54 | $dyStop = 0;
|
|---|
| 55 | if ($xStart != 0)
|
|---|
| 56 | $dyStart = $yStart/$xStart;
|
|---|
| 57 | if ($xStop != 0)
|
|---|
| 58 | $dyStop = $yStop/$xStop;
|
|---|
| 59 | if ($yStart != 0)
|
|---|
| 60 | $dxStart = $xStart/$yStart;
|
|---|
| 61 | if ($yStop != 0)
|
|---|
| 62 | $dxStop = $xStop/$yStop;
|
|---|
| 63 | if (abs($xStart) >= abs($yStart)) {
|
|---|
| 64 | $aaStartX = true;
|
|---|
| 65 | } else {
|
|---|
| 66 | $aaStartX = false;
|
|---|
| 67 | }
|
|---|
| 68 | if ($xStop >= $yStop) {
|
|---|
| 69 | $aaStopX = true;
|
|---|
| 70 | } else {
|
|---|
| 71 | $aaStopX = false;
|
|---|
| 72 | }
|
|---|
| 73 | //$xp = +1; $yp = -1; $xa = +1; $ya = 0;
|
|---|
| 74 | for ( $x = 0; $x < $a; $x += 1 ) {
|
|---|
| 75 | /*$y = $b * sqrt( 1 - ($x*$x)/($a*$a) );
|
|---|
| 76 |
|
|---|
| 77 | $error = $y - (int)($y);
|
|---|
| 78 | $y = (int)($y);
|
|---|
| 79 |
|
|---|
| 80 | $diffColor = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error );*/
|
|---|
| 81 |
|
|---|
| 82 | $_y1 = $dyStop*$x;
|
|---|
| 83 | $_y2 = $dyStart*$x;
|
|---|
| 84 | if ($xStart > $xStop)
|
|---|
| 85 | {
|
|---|
| 86 | $error1 = $_y1 - (int)($_y1);
|
|---|
| 87 | $error2 = 1 - $_y2 + (int)$_y2;
|
|---|
| 88 | $_y1 = $_y1-$error1;
|
|---|
| 89 | $_y2 = $_y2+$error2;
|
|---|
| 90 | }
|
|---|
| 91 | else
|
|---|
| 92 | {
|
|---|
| 93 | $error1 = 1 - $_y1 + (int)$_y1;
|
|---|
| 94 | $error2 = $_y2 - (int)($_y2);
|
|---|
| 95 | $_y1 = $_y1+$error1;
|
|---|
| 96 | $_y2 = $_y2-$error2;
|
|---|
| 97 | }
|
|---|
| 98 | /*
|
|---|
| 99 | if ($aaStopX)
|
|---|
| 100 | $diffColor1 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error1 );
|
|---|
| 101 | if ($aaStartX)
|
|---|
| 102 | $diffColor2 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error2 );
|
|---|
| 103 | */
|
|---|
| 104 |
|
|---|
| 105 | if ($seg == 0 || $seg == 2)
|
|---|
| 106 | {
|
|---|
| 107 | $i = $seg;
|
|---|
| 108 | if (!($start > $i*M_PI/2 && $x > $xStart)) {
|
|---|
| 109 | if ($i == 0) {
|
|---|
| 110 | $xp = +1; $yp = -1; $xa = +1; $ya = 0;
|
|---|
| 111 | } else {
|
|---|
| 112 | $xp = -1; $yp = +1; $xa = 0; $ya = +1;
|
|---|
| 113 | }
|
|---|
| 114 | if ( $stop < ($i+1)*(M_PI/2) && $x <= $xStop ) {
|
|---|
| 115 | $diffColor1 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error1 );
|
|---|
| 116 | $y1 = $_y1; if ($aaStopX) imageSetPixel($img, $cx+$xp*($x)+$xa, $cy+$yp*($y1+1)+$ya, $diffColor1);
|
|---|
| 117 |
|
|---|
| 118 | } else {
|
|---|
| 119 | $y = $b * sqrt( 1 - ($x*$x)/($a*$a) );
|
|---|
| 120 | $error = $y - (int)($y);
|
|---|
| 121 | $y = (int)($y);
|
|---|
| 122 | $diffColor = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error );
|
|---|
| 123 | $y1 = $y; if ($x < $aaAngleX ) imageSetPixel($img, $cx+$xp*$x+$xa, $cy+$yp*($y1+1)+$ya, $diffColor);
|
|---|
| 124 | }
|
|---|
| 125 | if ($start > $i*M_PI/2 && $x <= $xStart) {
|
|---|
| 126 | $diffColor2 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error2 );
|
|---|
| 127 | $y2 = $_y2; if ($aaStartX) imageSetPixel($img, $cx+$xp*$x+$xa, $cy+$yp*($y2-1)+$ya, $diffColor2);
|
|---|
| 128 | } else {
|
|---|
| 129 | $y2 = 0;
|
|---|
| 130 | }
|
|---|
| 131 | if ($y2 <= $y1) imageLine($img, $cx+$xp*$x+$xa, $cy+$yp*$y1+$ya , $cx+$xp*$x+$xa, $cy+$yp*$y2+$ya, $fillColor);
|
|---|
| 132 | }
|
|---|
| 133 | }
|
|---|
| 134 |
|
|---|
| 135 | if ($seg == 1 || $seg == 3)
|
|---|
| 136 | {
|
|---|
| 137 | $i = $seg;
|
|---|
| 138 | if (!($stop < ($i+1)*M_PI/2 && $x > $xStop)) {
|
|---|
| 139 | if ($i == 1) {
|
|---|
| 140 | $xp = -1; $yp = -1; $xa = 0; $ya = 0;
|
|---|
| 141 | } else {
|
|---|
| 142 | $xp = +1; $yp = +1; $xa = 1; $ya = 1;
|
|---|
| 143 | }
|
|---|
| 144 | if ( $start > $i*M_PI/2 && $x < $xStart ) {
|
|---|
| 145 | $diffColor2 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error2 );
|
|---|
| 146 | $y1 = $_y2; if ($aaStartX) imageSetPixel($img, $cx+$xp*$x+$xa, $cy+$yp*($y1+1)+$ya, $diffColor2);
|
|---|
| 147 |
|
|---|
| 148 | } else {
|
|---|
| 149 | $y = $b * sqrt( 1 - ($x*$x)/($a*$a) );
|
|---|
| 150 | $error = $y - (int)($y);
|
|---|
| 151 | $y = (int) $y;
|
|---|
| 152 | $diffColor = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error );
|
|---|
| 153 | $y1 = $y; if ($x < $aaAngleX ) imageSetPixel($img, $cx+$xp*$x+$xa, $cy+$yp*($y1+1)+$ya, $diffColor);
|
|---|
| 154 | }
|
|---|
| 155 | if ($stop < ($i+1)*M_PI/2 && $x <= $xStop) {
|
|---|
| 156 | $diffColor1 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error1 );
|
|---|
| 157 | $y2 = $_y1; if ($aaStopX) imageSetPixel($img, $cx+$xp*$x+$xa, $cy+$yp*($y2-1)+$ya, $diffColor1);
|
|---|
| 158 | } else {
|
|---|
| 159 | $y2 = 0;
|
|---|
| 160 | }
|
|---|
| 161 | if ($y2 <= $y1) imageLine($img, $cx+$xp*$x+$xa, $cy+$yp*$y1+$ya, $cx+$xp*$x+$xa, $cy+$yp*$y2+$ya, $fillColor);
|
|---|
| 162 | }
|
|---|
| 163 | }
|
|---|
| 164 | }
|
|---|
| 165 |
|
|---|
| 166 | ///YYYYY
|
|---|
| 167 |
|
|---|
| 168 | for ( $y = 0; $y < $b; $y += 1 ) {
|
|---|
| 169 | /*$x = $a * sqrt( 1 - ($y*$y)/($b*$b) );
|
|---|
| 170 |
|
|---|
| 171 | $error = $x - (int)($x);
|
|---|
| 172 | $x = (int)($x);
|
|---|
| 173 |
|
|---|
| 174 | $diffColor = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error );
|
|---|
| 175 | */
|
|---|
| 176 | $_x1 = $dxStop*$y;
|
|---|
| 177 | $_x2 = $dxStart*$y;
|
|---|
| 178 | if ($yStart > $yStop)
|
|---|
| 179 | {
|
|---|
| 180 | $error1 = $_x1 - (int)($_x1);
|
|---|
| 181 | $error2 = 1 - $_x2 + (int)$_x2;
|
|---|
| 182 | $_x1 = $_x1-$error1;
|
|---|
| 183 | $_x2 = $_x2+$error2;
|
|---|
| 184 | }
|
|---|
| 185 | else
|
|---|
| 186 | {
|
|---|
| 187 | $error1 = 1 - $_x1 + (int)$_x1;
|
|---|
| 188 | $error2 = $_x2 - (int)($_x2);
|
|---|
| 189 | $_x1 = $_x1+$error1;
|
|---|
| 190 | $_x2 = $_x2-$error2;
|
|---|
| 191 | }
|
|---|
| 192 | /*
|
|---|
| 193 | if (!$aaStopX)
|
|---|
| 194 | $diffColor1 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error1 );
|
|---|
| 195 | if (!$aaStartX)
|
|---|
| 196 | $diffColor2 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error2 );
|
|---|
| 197 | */
|
|---|
| 198 |
|
|---|
| 199 | if ($seg == 0 || $seg == 2)
|
|---|
| 200 | {
|
|---|
| 201 | $i = $seg;
|
|---|
| 202 | if (!($start > $i*M_PI/2 && $y > $yStop)) {
|
|---|
| 203 | if ($i == 0) {
|
|---|
| 204 | $xp = +1; $yp = -1; $xa = 1; $ya = 0;
|
|---|
| 205 | } else {
|
|---|
| 206 | $xp = -1; $yp = +1; $xa = 0; $ya = 1;
|
|---|
| 207 | }
|
|---|
| 208 | if ( $stop < ($i+1)*(M_PI/2) && $y <= $yStop ) {
|
|---|
| 209 | $diffColor1 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error1 );
|
|---|
| 210 | $x1 = $_x1; if (!$aaStopX) imageSetPixel($img, $cx+$xp*($x1-1)+$xa, $cy+$yp*($y)+$ya, $diffColor1);
|
|---|
| 211 | }
|
|---|
| 212 | if ($start > $i*M_PI/2 && $y < $yStart) {
|
|---|
| 213 | $diffColor2 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error2 );
|
|---|
| 214 | $x2 = $_x2; if (!$aaStartX) imageSetPixel($img, $cx+$xp*($x2+1)+$xa, $cy+$yp*($y)+$ya, $diffColor2);
|
|---|
| 215 | } else {
|
|---|
| 216 | $x = $a * sqrt( 1 - ($y*$y)/($b*$b) );
|
|---|
| 217 | $error = $x - (int)($x);
|
|---|
| 218 | $x = (int)($x);
|
|---|
| 219 | $diffColor = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error );
|
|---|
| 220 | $x1 = $x; if ($y < $aaAngleY && $y <= $yStop ) imageSetPixel($img, $cx+$xp*($x1+1)+$xa, $cy+$yp*$y+$ya, $diffColor);
|
|---|
| 221 | }
|
|---|
| 222 | }
|
|---|
| 223 | }
|
|---|
| 224 |
|
|---|
| 225 | if ($seg == 1 || $seg == 3)
|
|---|
| 226 | {
|
|---|
| 227 | $i = $seg;
|
|---|
| 228 | if (!($stop < ($i+1)*M_PI/2 && $y > $yStart)) {
|
|---|
| 229 | if ($i == 1) {
|
|---|
| 230 | $xp = -1; $yp = -1; $xa = 0; $ya = 0;
|
|---|
| 231 | } else {
|
|---|
| 232 | $xp = +1; $yp = +1; $xa = 1; $ya = 1;
|
|---|
| 233 | }
|
|---|
| 234 | if ( $start > $i*M_PI/2 && $y < $yStart ) {
|
|---|
| 235 | $diffColor2 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error2 );
|
|---|
| 236 | $x1 = $_x2; if (!$aaStartX) imageSetPixel($img, $cx+$xp*($x1-1)+$xa, $cy+$yp*$y+$ya, $diffColor2);
|
|---|
| 237 | }
|
|---|
| 238 | if ($stop < ($i+1)*M_PI/2 && $y <= $yStop) {
|
|---|
| 239 | $diffColor1 = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error1 );
|
|---|
| 240 | $x2 = $_x1; if (!$aaStopX) imageSetPixel($img, $cx+$xp*($x2+1)+$xa, $cy+$yp*$y+$ya, $diffColor1);
|
|---|
| 241 | } else {
|
|---|
| 242 | $x = $a * sqrt( 1 - ($y*$y)/($b*$b) );
|
|---|
| 243 | $error = $x - (int)($x);
|
|---|
| 244 | $x = (int)($x);
|
|---|
| 245 | $diffColor = imageColorExactAlpha( $img, $color[0], $color[1], $color[2], 127-(127-$color[3])*$error );
|
|---|
| 246 | $x1 = $x; if ($y < $aaAngleY && $y < $yStart) imageSetPixel($img,$cx+$xp*($x1+1)+$xa, $cy+$yp*$y+$ya, $diffColor);
|
|---|
| 247 | }
|
|---|
| 248 | }
|
|---|
| 249 | }
|
|---|
| 250 | }
|
|---|
| 251 | }
|
|---|
| 252 |
|
|---|
| 253 |
|
|---|
| 254 | function imageSmoothArc ( &$img, $cx, $cy, $w, $h, $color, $start, $stop)
|
|---|
| 255 | {
|
|---|
| 256 | // Originally written from scratch by Ulrich Mierendorff, 06/2006
|
|---|
| 257 | // Rewritten and improved, 04/2007, 07/2007
|
|---|
| 258 | // compared to old version:
|
|---|
| 259 | // + Support for transparency added
|
|---|
| 260 | // + Improved quality of edges & antialiasing
|
|---|
| 261 |
|
|---|
| 262 | // note: This function does not represent the fastest way to draw elliptical
|
|---|
| 263 | // arcs. It was written without reading any papers on that subject. Better
|
|---|
| 264 | // algorithms may be twice as fast or even more.
|
|---|
| 265 |
|
|---|
| 266 | // what it cannot do: It does not support outlined arcs, only filled
|
|---|
| 267 |
|
|---|
| 268 | // Parameters:
|
|---|
| 269 | // $cx - Center of ellipse, X-coord
|
|---|
| 270 | // $cy - Center of ellipse, Y-coord
|
|---|
| 271 | // $w - Width of ellipse ($w >= 2)
|
|---|
| 272 | // $h - Height of ellipse ($h >= 2 )
|
|---|
| 273 | // $color - Color of ellipse as a four component array with RGBA
|
|---|
| 274 | // $start - Starting angle of the arc, no limited range!
|
|---|
| 275 | // $stop - Stop angle of the arc, no limited range!
|
|---|
| 276 | // $start _can_ be greater than $stop!
|
|---|
| 277 | // If any value is not in the given range, results are undefined!
|
|---|
| 278 |
|
|---|
| 279 | // This script does not use any special algorithms, everything is completely
|
|---|
| 280 | // written from scratch; see http://de.wikipedia.org/wiki/Ellipse for formulas.
|
|---|
| 281 |
|
|---|
| 282 | while ($start < 0)
|
|---|
| 283 | $start += 2*M_PI;
|
|---|
| 284 | while ($stop < 0)
|
|---|
| 285 | $stop += 2*M_PI;
|
|---|
| 286 |
|
|---|
| 287 | while ($start > 2*M_PI)
|
|---|
| 288 | $start -= 2*M_PI;
|
|---|
| 289 |
|
|---|
| 290 | while ($stop > 2*M_PI)
|
|---|
| 291 | $stop -= 2*M_PI;
|
|---|
| 292 |
|
|---|
| 293 |
|
|---|
| 294 | if ($start > $stop)
|
|---|
| 295 | {
|
|---|
| 296 | imageSmoothArc ( $img, $cx, $cy, $w, $h, $color, $start, 2*M_PI);
|
|---|
| 297 | imageSmoothArc ( $img, $cx, $cy, $w, $h, $color, 0, $stop);
|
|---|
| 298 | return;
|
|---|
| 299 | }
|
|---|
| 300 |
|
|---|
| 301 | $a = 1.0*round ($w/2);
|
|---|
| 302 | $b = 1.0*round ($h/2);
|
|---|
| 303 | $cx = 1.0*round ($cx);
|
|---|
| 304 | $cy = 1.0*round ($cy);
|
|---|
| 305 |
|
|---|
| 306 | $aaAngle = atan(($b*$b)/($a*$a)*tan(0.25*M_PI));
|
|---|
| 307 | $aaAngleX = $a*cos($aaAngle);
|
|---|
| 308 | $aaAngleY = $b*sin($aaAngle);
|
|---|
| 309 |
|
|---|
| 310 | $a -= 0.5; // looks better...
|
|---|
| 311 | $b -= 0.5;
|
|---|
| 312 |
|
|---|
| 313 | for ($i=0; $i<4;$i++)
|
|---|
| 314 | {
|
|---|
| 315 | if ($start < ($i+1)*M_PI/2)
|
|---|
| 316 | {
|
|---|
| 317 | if ($start > $i*M_PI/2)
|
|---|
| 318 | {
|
|---|
| 319 | if ($stop > ($i+1)*M_PI/2)
|
|---|
| 320 | {
|
|---|
| 321 | imageSmoothArcDrawSegment($img, $cx, $cy, $a, $b, $aaAngleX, $aaAngleY , $color, $start, ($i+1)*M_PI/2, $i);
|
|---|
| 322 | }
|
|---|
| 323 | else
|
|---|
| 324 | {
|
|---|
| 325 | imageSmoothArcDrawSegment($img, $cx, $cy, $a, $b, $aaAngleX, $aaAngleY, $color, $start, $stop, $i);
|
|---|
| 326 | break;
|
|---|
| 327 | }
|
|---|
| 328 | }
|
|---|
| 329 | else
|
|---|
| 330 | {
|
|---|
| 331 | if ($stop > ($i+1)*M_PI/2)
|
|---|
| 332 | {
|
|---|
| 333 | imageSmoothArcDrawSegment($img, $cx, $cy, $a, $b, $aaAngleX, $aaAngleY, $color, $i*M_PI/2, ($i+1)*M_PI/2, $i);
|
|---|
| 334 | }
|
|---|
| 335 | else
|
|---|
| 336 | {
|
|---|
| 337 | imageSmoothArcDrawSegment($img, $cx, $cy, $a, $b, $aaAngleX, $aaAngleY, $color, $i*M_PI/2, $stop, $i);
|
|---|
| 338 | break;
|
|---|
| 339 | }
|
|---|
| 340 | }
|
|---|
| 341 | }
|
|---|
| 342 | }
|
|---|
| 343 | }
|
|---|
| 344 | ?>
|
|---|
