source: spip-zone/_plugins_/radioactivite/radioactivite.html @ 45636

Last change on this file since 45636 was 45636, checked in by toutati@…, 9 years ago

on peut visualiser les images des cercles suivant le nGy/h

File size: 2.7 KB
Line 
1#CACHE{600}<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
2<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="fr" lang="fr" dir="ltr">
3<head>
4<title>radioactivite</title>
5#INSERT_HEAD
6
7<style>
8table{border-collapse: collapse;}
9td{border:1px solid #666; padding:0.5em;}
10tr.changearea td{border-top:2px solid #000;}
11.centrer{text-align:center}
12.centrer div{margin:0 auto}
13</style>
14</head>
15</body>
16
17<?php
18echo "<small>source <a href='http://www.bousai.ne.jp/eng/'>http://www.bousai.ne.jp/eng/</a> ";
19echo "<br /> Les d&eacute;bits de dose sont exprim&eacute;s en nanoGray/heure (nGy/h) soit 1 milliardi&egrave;me de Gray/heure. Le premier niveau de pr&eacute;-alarme en France est fix&eacute; &agrave; 350 nGy/h.</small>";
20include_spip('inc/filtres');
21include_spip('inc/distant');
22//on incremente pour les 8 pages
23$id="01";
24$i=1;
25while($i<=8) {
26        $id="0".$i;
27        if ($recup = recuperer_page('http://www.bousai.ne.jp/eng/speedi/pref.php?id='.$id)
28        AND $b = extraire_balises($recup, 'table')
29        AND $b = extraire_balise($b[2], 'table')
30        ) $c[] = extraire_balises($b, 'tr');
31        $i++;
32}
33
34//print_r($c)."<br />";
35function aff_style($multi)
36    {
37    // on fait une boucle qui lit les &eacute;l&eacute;ments du tableau
38    $i=1;
39    foreach ($multi as $cle=>$c)
40        {
41     
42        if(is_array($c)) {
43                foreach(array_slice($c,3) as $d) {
44                        $id="0".$i;
45                        $d = array_map('supprimer_tags', extraire_balises($d, 'td'));
46                        if (is_numeric($d[2])){
47                                $rate=($d[2]>100)?$d[2]*0.2:$d[2]*1;
48                        }else $rate='0';
49                echo "#A".$id.$d[0]."{height:".round($rate)."px; width:".round($rate)."px;}"."\n";
50                $i++;
51                }
52        }
53       
54        }
55    }
56   
57function aff_table($multi)
58    {
59    // on fait une boucle qui lit les &eacute;l&eacute;ments du tableau
60    $i=1;
61    foreach ($multi as $cle=>$c)
62        {
63     
64        if(is_array($c)) {
65       
66                foreach(array_slice($c,3) as $d) {
67                        $id="0".$i;
68                        $d = array_map('supprimer_tags', extraire_balises($d, 'td'));
69                        if (is_numeric($d[2])){
70                        $imgcercle=($d[2]>100)?"cercle-noir.png":"cercle-rouge.png";
71                        } else $imgcercle='';
72                        $classchange=($d[0]=='1')?"class='changearea'":"";
73                        echo "<tr $classchange><td>";
74                        echo  $d[0]."</td><td>".$d[1]."</td><td>".$d[2]."</td><td>".$d[3]."</td><td>".$d[4];
75                        echo "</td>";
76                        echo "<td class='centrer'><div id=A".$id.$d[0].">";
77                        echo "<img src='"._DIR_PLUGIN_RADIOACTIVITE."images/".$imgcercle."' width='100%' />";
78                        echo "</div></td>";
79                        echo "</tr>"."\n";
80                        $i++;
81                }
82        }
83       
84        }
85    }
86   
87echo "<style>";
88aff_style($c);
89echo "</style>";
90
91echo "<table>";
92echo "<thead><tr><td>code</td><td>station</td><td>rate nGy/h</td><td>wind</td><td>speed</td><td></td></thead><tbody>";
93aff_table($c);
94echo "</tbody></table>";
95
96?>
97
98</body></html>
Note: See TracBrowser for help on using the repository browser.