Script para leer mapas de satélite climatologico,

Fragmento seleccionado:

Buscar en ProgramaciónWeb Buscar en Google

Votos:
1

Script para leer mapas de satélite climatologico,
Blanes 25/11/2007

Quiero compartir este script PHP que me gusta por curioso y simple a la vez, se trata de usar PHP-GD para extraer a información de un mapa de radar, satélite... tipo:

Pantalla Completa Colorear
`000 001 002 003 004 005 006 007 008 009 010`	`<?php // Abrimos el mapa climatológico $im = ImageCreateFromPng("http://www.meteocat.com/radar/graf/BCN/BCNC1Gdarrera.gif"); // Seleccionamos el color de el punto que nos interesa $rgb = ImageColorAt($im, 100, 100); // Convertimos a Hexadecimal $r = ($rgb >> 16) & 0xFF; $g = ($rgb >> 8) & 0xFF; $b = $rgb & 0xFF; echo "#$r$g$b"; ?>`

Curioso verdad, este ejemplo toma datos nubes del satélite ( rojo ) y precipitaciones de radar ( negro ) en mi casa [;]

, {c&p}:

Pantalla Completa

Colorear


<?php

// radar meteocat precipitaciones

$urlRadar =  "http://www.meteocat.com/radar/graf/BCN/BCNC1Gdarrera.gif" ;

$img = imagecreatefromgif( $urlRadar );

// mi píxel

$home = imagecolorat($img, 394, 246 );

$set = 0;

// aquí se me va la pinza un poco y leo los colores de la

// leyenda, para comparar con mi pixel "casa", se podría hacer

// sin rebuscar tanto ;)

$numItems = 12;  // Items de la leyenda

$sX = 549; // x de un punto en el primer item

$sY = 226; // y de un punto en el primer item

$xX = 0;  // desviacion horizontal items

// llamo desviacion al incremento de X o Y entre items

$xY = 17; // desviacion verticalitems

for ( $i = 1; $i < 12; $i++ ) {

        $cmp = imagecolorat ( $img , $sX + $i * $xX, $sY + $i * $xY );

        if ( $home == $cmp ) {

                $set = $i;

        }

}

// Leo el fondo de la imagen

$i2 = imagecreatefromjpeg ( "http://www.programacionweb.net/clima.jpg" );

// Pinto flecha a lo cutre

imageline ( $i2, 5+$set*(276/12), 10, 5+$set*(276/12), 10, imagecolorallocate ( $i2, 0,0,0 ) );

imageline ( $i2, 4+$set*(276/12), 11, 6+$set*(276/12), 11, imagecolorallocate ( $i2, 0,0,0 ) );

imageline ( $i2, 3+$set*(276/12), 12, 7+$set*(276/12), 12, imagecolorallocate ( $i2, 0,0,0 ) );

imageline ( $i2, 2+$set*(276/12), 13, 8+$set*(276/12), 13, imagecolorallocate ( $i2, 0,0,0 ) );

imageline ( $i2, 1+$set*(276/12), 14, 9+$set*(276/12), 14, imagecolorallocate ( $i2, 0,0,0 ) );



// ... Otro mapa de nubes igual c&p, ¿para que hacer funciones?...



header("Content-type: image/jpeg");imagejpeg($i2);

imagedestroy($img);

imagedestroy($i2);

?>