# HG changeset patch # User Matti Hamalainen # Date 1394668937 -7200 # Node ID 03c54e5b60aac8fab44a55a8d43e2d87a62d8827 # Parent 3f30d4d592781ebf3a7020011501730c6df0ca34 Improve this silly thing as well. diff -r 3f30d4d59278 -r 03c54e5b60aa info/herb.php --- a/info/herb.php Thu Mar 13 00:38:31 2014 +0200 +++ b/info/herb.php Thu Mar 13 02:02:17 2014 +0200 @@ -1,10 +1,105 @@ + $rdata) + { + if ($rdata[0] == $name) + return $rkey; + } + + die("Unsupported terrain type '".$name."'.\n"); +} + + +function tlGetTerrainDataByCode($val) +{ + global $terrainData; + foreach ($terrainData as $rkey => $rdata) + { + if ($rdata[1] == $val) + return $rkey; + } + + return FALSE; +} + + +function tlGetSeasonFromName($name) +{ + global $seasonData; + if (($season = array_search($name, $seasonData)) === FALSE) + die("Invalid season name '".$name."'.\n"); + + return $season; +} + + +$fh = @fopen("herbs.csv", "r"); +$herbData = array(); +if ($fh !== FALSE) +{ + while ($data = fgetcsv($fh, 1000, ";")) + { + $sdata = array(); + foreach (preg_split("/, */", $data[1]) as $value) + { + if ($value != "") + $sdata[] = tlGetSeasonFromName($value); + } + + $rdata = array(); + foreach (preg_split("/, */", $data[2]) as $value) + { + if ($value != "") + $rdata[] = tlGetTerrainDataByName($value); + } + + $herbData[] = array( + "name" => $data[0], + "seasons" => $sdata, + "terrains" => $rdata, + "pair" => $data[3], + "info" => $data[4], + ); + } + fclose($fh); +} + + +?> - - - Some stupid plants - - - + + + Some stupid plants + + + @@ -14,51 +109,41 @@ += 0 && array_search($filter, $data["terrains"]) === FALSE) + continue; + $row++; - $foo=""; - if (!($row % 2)) $foo=" class=even"; - echo ""; - echo ""; - echo ""; -# echo ""; - echo "". + "". + "". + ""; - echo ""; - echo ""; - echo ""; + + echo + "". + "". + "". + "\n"; } ?>
Some stupid plants
Herb pair Information
$data[0]$data[1]$data[2]"; - $tada=explode(", ",$data[2]); - foreach ($tada as $value) + echo + "
".$data["name"]."".implode(", ", $data["seasons"]).""; + + foreach ($data["terrains"] as $rkey) { - switch ($value) - { - case "light forests": echo "f ";break; - case "heavy forests": echo "F ";break; - case "plains": echo "p ";break; - case "valleys": echo "v ";break; - case "fields": echo "y ";break; - case "highlands": echo "i ";break; - case "hills": echo "h ";break; - case "desert": echo "d ";break; - case "swamps": echo "s ";break; - case "abandoned ruins": echo "# ";break; - case "shores": echo "z ";break; - case "beaches": echo "b ";break; - case "jungles": echo "j ";break; - case "tundra": echo "t ";break; - case "shallow water": echo " ";break; - case "mountains": echo "^ ";break; - case "badlands": echo "x ";break; - default: echo $value; - } + $rdata = $terrainData[$rkey]; + echo "".$rdata[2].""; } - echo "$data[3]$data[4]
".$data["pair"]."".$data["info"]."
- \ No newline at end of file +