Ignore:
Timestamp:
Feb 1, 2011, 7:15:17 PM (9 years ago)
Author:
jean-marc.viglino@…
Message:

[MAJ] Réorganisation du code.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • _plugins_/spip_geoportail/public/geoportail_boucles.php

    r39814 r44063  
    117117}
    118118
     119/** Recherche du nom de departement
     120*/
     121function geoportail_departement($d)
     122{       $query = "SELECT * FROM spip_georgc WHERE feature_class = '0' AND id_dep = '".$d."'";
     123        $res = spip_query($query);
     124        $row = spip_fetch_array($res);
     125
     126        $rep = $row['name'];
     127        return $rep;
     128}
     129
     130/*========================================
     131  Filtres du plugin
     132========================================*/
     133
     134/** Transformation degre/minute/seconde
     135*/
     136function geoportail_dms($l, $short=false)
     137{       if (!is_numeric($l)) return $l;
     138       
     139        $d = floor($l);
     140        $p = ($l-$d)*60;
     141        $m = floor($p);
     142        if ($m<10) $m = "0$m";
     143        $s = round((($p-$m)*600))/10;
     144        if ($s<10) $s = "0$s";
     145        $str = "$d&deg; $m' $s\"" ;
     146        if ($short) $str = str_replace (' ','',$str);
     147        return $str;
     148}
     149
     150/** Transformation #LON|geoportail_longitude
     151*/
     152function geoportail_longitude ($l, $short=false)
     153{       if (is_numeric($l))
     154        {       if ($l<0) return geoportail_dms(-$l,$short).($short?'':' ')."W";
     155                else return geoportail_dms($l,$short).($short?'':' ')."E";
     156        }
     157        return $l;
     158}
     159
     160/** Transformation #LAT|geoportail_latitude
     161*/
     162function geoportail_latitude ($l, $short=false)
     163{       if (is_numeric($l))
     164        {       if ($l<0) return geoportail_dms(-$l,$short).($short?'':' ')."S";
     165                else return geoportail_dms($l,$short).($short?'':' ')."N";
     166        }
     167        return $l;
     168}
    119169?>
Note: See TracChangeset for help on using the changeset viewer.