IMG 2 HTML

				
//**************************************
// Name: IMG 2 HTML
// Description:This code transforms or converts an image to an html pixel colored table.
The purpose of the code is, if u want to send images in an html e-mail this code makes the images to be unblocked.
The idea in the script is that takes pixel by pixel and transform to a <td> in table
The script is developed for to all browsers. 
No complication. 
RATE THE CODE.
// By: Oliver Leuyim Angel / Curda
//
//This code is copyrighted and has// limited warranties.Please see http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=2793&lngWId=8//for details.//**************************************

<?php
/*
 Autor: Oliver Leuyim Angel R.
 Web Page: http://dimworks.org
 Year: 2010
*/
$img = imagecreatefromjpeg("image1.jpg"); //for get image from jpeg uncomment & comment others 
//$img = imagecreatefromgif("image1.gif");//For get image from gifuncomment & comment others
//$img = imagecreatefrompng("image1.png");//for get image from pnguncomment & comment others 
 
$w = imagesx($img);
$h = imagesy($img);
$table = "";
$firstrow = 1; # Disable RLE for first row of each table segment (dodge Mozilla bug)
for($y=0;$y<$h;$y++) {
 $row = ""; 
 for($x=0;$x<$w;$x++) {
 $rgb = imagecolorat($img, $x, $y);
 $r = ($rgb >> 16) & 0xFF;
 $g = ($rgb >> 8) & 0xFF;
 $b = $rgb & 0xFF; 
 
 if ($x == $w) {
 # Dummy run to clear the colspan buffer.
 $rgb='';
} else {
 $rgb = str_repeat("0",2-strlen(dechex($r))).dechex($r).str_repeat("0",2-strlen(dechex($g))).dechex($g).str_repeat("0",2-strlen(dechex($b))).dechex($b);
}
 
if ($x == 0) { # Initialise the RLE (Run Length Encoding)
 $prev_rgb = $rgb;
 $span = 0;
}
$span++;
if ($rgb != $prev_rgb || $firstrow) {
 if ($span == 1) { # One pixel.
$row .= "<TD BGCOLOR=#$prev_rgb><img width=1 height=1></TD>";
 } else { # A run of multiple pixels with the same colour.
$row .= "<TD BGCOLOR=#$prev_rgb COLSPAN=$span><img width=1 height=1></TD>";
 }
 $span = 0;
 $prev_rgb = $rgb;
}
 }
 $table .= "<TR>$row</TR>\n"; 
 # Segment the table so that MSIE renders it in pieces instead of waiting till the end.
 if ($y != 0 && ($y == 5 || $y % 15 == 0) && $y < $h-10) {
$table .= "</TABLE><TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0>\n";
$firstrow = 1;
 } else {
$firstrow = 0;
 }
 
}
$newsize = strlen($table)/1024 + 0.5;
echo "<TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0>".$table."</TABLE>";
?>