[教學] 高畫質縮圖函式

數十年經驗，提供無接縫招牌、霓虹招牌
壓克力燈箱、LED等設計製作安裝，全省服務

輕鬆解決漏水噩夢！具防水專業認證
提供屋頂、外牆防水工程、壁癌防治等服務。

首頁 ‧ tw 論壇 ‧ 程式設計討論 ‧

[教學] 高畫質縮圖函式

房東：紅妹

發表時間：2010-06-01

function ImageResize (&$src, $x, $y) {
$dst=imagecreatetruecolor($x, $y);
$pals=ImageColorsTotal ($src);
for ($i=0; $i<$pals; $i++) {
$colors=ImageColorsForIndex ($src, $i);
ImageColorAllocate ($dst, $colors[\'red\'], $colors[\'green\'], $colors[\'blue\']);

}
$scX =(imagesx ($src)-1)/$x;
$scY =(imagesy ($src)-1)/$y;
$scX2 =intval($scX/2);
$scY2 =intval($scY/2);

for ($j = 0; $j < ($y); $j++) {
$sY = intval($j * $scY);
$y13 = $sY + $scY2;
for ($i = 0; $i < ($x); $i++) {
$sX = intval($i * $scX);
$x34 = $sX + $scX2;
$c1 = ImageColorsForIndex ($src, ImageColorAt ($src, $sX, $y13));
$c2 = ImageColorsForIndex ($src, ImageColorAt ($src, $sX, $sY));
$c3 = ImageColorsForIndex ($src, ImageColorAt ($src, $x34, $y13));
$c4 = ImageColorsForIndex ($src, ImageColorAt ($src, $x34, $sY));
$r = ($c1[\'red\']+$c2[\'red\']+$c3[\'red\']+$c4[\'red\'])/4;
$g = ($c1[\'green\']+$c2[\'green\']+$c3[\'green\']+$c4[\'green\'])/4;
$b = ($c1[\'blue\']+$c2[\'blue\']+$c3[\'blue\']+$c4[\'blue\'])/4;
ImageSetPixel ($dst, $i, $j, ImageColorClosest ($dst, $r, $g, $b));
}
}
return ($dst);
}
?>

贊助網站

廣利不動產-板橋在地生根最實在--新板特區指名度最高、值得您信賴的好房仲
完整房訊，房屋、店面熱門精選物件，廣利不動產優質仲介，房屋租賃、買賣資訊透明，交易真安心！
廣利不動產-新板特區指名度最高、值得您信賴的好房仲
您的托付,廣利用心為您服務

　共 0 人回應