[42] | 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 | ?> |
---|