BlackHalt writeln (by me or from manual) PHP source Codes ...

PNG JPG bilžu samazinātājs:

<?php
#JPG
function s_jpg($im,$w,$h)
{
    
$t=imagecreatetruecolor($w,$h);
    
$i=imagecreatefromjpeg($im);
    
$idata=getimagesize($im);
    
imagecopyresized($t,$i,0,0,0,0,$w,$h,$idata[0],$idata[1]);
    
imagejpeg($t,$im,100);
}
#PNG
function s_png($im,$w,$h)
{
    
$t=imagecreatetruecolor($w,$h);
    
$i=imagecreatefrompng($im);
    
$idata=getimagesize($im);
    
imagecopyresized($t,$i,0,0,0,0,$w,$h,$idata[0],$idata[1]);
    
imagepng($t,$im);
}
foreach(
glob('*.**g')as $bild){
    
$s=getimagesize($bild);
    
$a=$s[0]/4;
    
$b=$s[1]/4;
    
$z=$s[2];
    if (
$z=='2') {
        
s_jpg($bild,$a,$b);
        
rename($bild,"m_$bild");
    }
    if (
$z=='3') {
        
s_png($bild,$a,$b);
        
rename($bild,"m_$bild");
    }
}
?>