<?php

//fpassthru(fopen("http://localhost:8080/?http://meuk.spritesserver.nl/eink/", "r"));
//fpassthru(fopen("einkimg.bin", "r"));
header("Location: http://spritesmods.com:8266/?http://meuk.spritesserver.nl/eink/");
exit(
0);

function 
genVoorspellingImg($lat$lon) {
//api.openweathermap.org/data/2.5/weather?lat=35&lon=139
}

function 
genNeerslagImg($lat$lon) {
    
$w=250$h=250;
    
$data=explode("\n"file_get_contents("http://gps.buienradar.nl/getrr.php?lat=$lat&lon=$lon"));
    
$im=imagecreate($w,$h);
    
$wh=imagecolorallocate($im255255255);
    
$b=imagecolorallocate($im000);
    
imageline($im0,00,$h-1$b);
    
imageline($im0,$h-1$w-1,$h-1$b);
    
$last=0$x=0$oldx=0;
    foreach (
$data as $d) {
        
$p=explode("|"chop($d));
        
imageline($im$oldx$h-(($last*$h)/255), $x$h-(($p[0]*$h)/255), $b);
        if (
substr($p[1], -2)=="00") {
            
imageline($im$x0$x$h-1$b);
        }
        if (
substr($p[1], -2)=="30") {
            
imageline($im$x$h/2$x$h-1$b);
        }
        
$oldx=$x;
        
$x+=($w/count($data));
        
$last=$p[0];
    }
    return 
$im;
}

/*
srand(time());
$i=rand()%5;
if ($i==0) $fn="799px-De_re_metallica_1556-033.png";
if ($i==1) $fn="corazon_law.png";
if ($i==2) $fn="chicken.png";
if ($i==3) $fn="test.png";
if ($i==4) $fn="bsa_jillr.png";
$im=imagecreatefrompng($fn);
*/

$im=imagecreatetruecolor(800600);


$w=imagecolorallocate($im255255255);
$b=imagecolorallocate($im000);

imagefilledrectangle($im0,0,imagesx($im),imagesy($im),$w);
imagestring($im53500date("r"), $b);

imagettftext($im,
    
210,
    
0,
    
0230,
    
$b,
    
"/usr/share/fonts/truetype/ttf-dejavu/DejaVuSans.ttf",
    
date("H:i"));

$rss=simplexml_load_file("http://www.nu.nl/rss/Algemeen");
$y=230+40;
foreach (
$rss->channel->item as $item) {
//    var_dump($item->title);
    
imagettftext($im,
        
28,
        
0,
        
0$y,
        
$b,
        
"/usr/share/fonts/truetype/ttf-dejavu/DejaVuSans.ttf",
        
$item->title);
    
$y+=40;
}

//$n=genNeerslagImg("52.25741", "6.79277");
//imagecopy($im, $n, 0, 250, 0,0, imagesx($n), imagesy($n));

if (isset($_REQUEST["png"])) {
    
header("Content-Type: image/png");
    
imagepng($im);
    exit(
0);
}

header("Content-Type: application/x-esp-eink");
printf("%c"0);
for (
$y=0$y<600$y++) {
    for (
$x=0$x<800$x+=8) {
        
$b=0;
        for (
$z=0$z<8$z++) {
            
$b<<=1;
            
$c=imagecolorat($im$x+$z$y);
            if (((
$c)&0xff)<0x80$b|=1;
        }
        
printf("%c"$b);
        
$data.=chr($b);
    }
}
?>