$newsrep = opendir("news");
if (!isset($thisblog)) {
while($file = readdir($newsrep)) {
$fileprogarray[] = array(basename("news/".$file), $file, filesize("news/".$file) );
}
rsort($fileprogarray);
$count = 0;
foreach ($fileprogarray as $file) {
if ($file[1] != "." && $file[1] != "..") {
$count +=1;
if ($count < 2) {
$fp = fopen("news/".$file[1],"r");
$return = fread($fp,filesize("news/".$file[1]));
$textarray = explode("\n",$return);
?>
echo $textarray[0];
fclose($fp);
?>
$y = substr($file[1], 0, 4);
$m = substr($file[1], 4, 2);
$d = substr($file[1], 6, 2);
$h = substr($file[1], 8, 2);
$mn = substr($file[1], 10, 2);
print("$d-$m-$y");
?>
for ($i =1; $i < count($textarray);$i++) {
echo $textarray[$i];
}
?>
}}}}
?>
Previous news...
BioSchematics is a L-System interpreter and drawing tool released under
the GPL license. It was initially coded for my work.
L-System grammar is interpreted through a Scheme engine (Guile) and
results are drawn in an OpenGL window.