\n"; //get list of files from current year & their dates for the global map $imgdir=$origdir."/".$useyear."/"; #relative YEAR subdirectory on web server chdir($basedir."/".$imgdir); $files=array_reverse(glob("cygnss_L2_*globe.png")); $nfiles=count($files); for($i=0;$i<$nfiles;++$i) { $dates[$i]=substr($files[$i],10,8); } //var_dump($dates); //echo "
\n"; if ($_GET['d']=="") { $selected_date=$dates[0]; } else { $selected_date=$_GET['d']; } //echo $selected_date; //echo "
\n"; $key=array_search($selected_date,$dates); //echo $key; //echo "
\n"; $selected_file=$files[$key]; //echo $selected_file; //echo "
\n"; $prevday=$dates[$key+1]; $nextday=$dates[$key-1]; //get list of active storms and their files for the selected date $storm_files=glob("cygnss_L2_".$selected_date."*storm*.png"); //var_dump($storm_files); //echo "
\n"; foreach ($storm_files as $item) { $storm[]=substr($item,22,7); } //var_dump($storm); //echo "
\n"; //get unique storms from list of files (storm00, storm01, etc) //if no storms found, $storm will be NULL, set to empty string if (is_null($storm)) { $storm=[]; } $unique_storms=array_unique($storm); //sort them by their name, not key asort($unique_storms); $nstorms=count($unique_storms); //var_dump($unique_storms); //echo "
\n"; $unique_keys=array_keys($unique_storms); $i=0; foreach ($unique_keys as $item) { $storm_id[$i]=substr($storm_files[$item],30,4); $i++; } //var_dump($storm_id); ?>


Daily CYGNSS Wind Speed Map:

Active TCs:   \n"; if ($nstorms > 0) { foreach ($storm_id as $value) { echo " ${value}    \n"; } } else { echo " NONE\n"; } echo "

\n"; //echo " \n"; echo "
\n"; echo " \n"; echo " \n"; for($i=0;$i<$nstorms;++$i) { echo " \n"; echo " \n"; $string_i=sprintf("%02d",$i); foreach (array('00','06','12','18') as $hour) { echo " \n"; } echo " \n"; } echo "
\n"; echo "
\n"; if ($key < $nfiles-1) { echo " <\n"; } echo " \n"; echo " \n"; if ($key > 0) { echo " >\n"; } echo "
\n"; echo "
\n"; echo " \"\"\n"; echo "

\n"; echo " VIEW 7-DAY ANIMATION OF GLOBAL WINDS\n"; echo "
\n"; echo " ${storm_id[$i]}\n"; echo "
\n"; echo " ${hour}Z\n"; $storm_plot=glob("cygnss_L2_".$selected_date."_".$hour."_storm".$string_i."*.png"); if (count($storm_plot) > 0) { echo " \"\"\n"; } else { echo "







Storm not active/
Storm data not available\n"; } echo "
\n"; ?>