$arrtext = file("/usr2/home/lymanml/www/books/$author/$book/_definition.dat");
$num_elements = count($arrtext);
$idx = 0;
while ($idx < $num_elements) {
$elem = chop(substr("$arrtext[$idx]", 0, 19));
if ($elem == "_title") {
$booktitle = chop(substr("$arrtext[$idx]", 52, 53));
$bookauthor = chop(substr("$arrtext[$idx]", 105, 50));
$bookhdrcolor = chop(substr("$arrtext[$idx]", 31, 6));
$booktxtcolor = chop(substr("$arrtext[$idx]", 37, 6));
}
if ($debug == 1) {echo ("$elem
\n");}
if ($elem == $story) {
$current = $idx;
$prev = $idx - 1;
$next = $idx + 1;
$banner = substr("$arrtext[$idx]", 19, 1);
$image = substr("$arrtext[$idx]", 21, 1);
$origin = substr("$arrtext[$idx]", 23, 1);
$links = substr("$arrtext[$idx]", 25, 1);
$footer = substr("$arrtext[$idx]", 27, 1);
$title = substr("$arrtext[$idx]", 29, 1);
$color = chop(substr("$arrtext[$idx]", 31, 12));
$align = chop(substr("$arrtext[$idx]", 44, 7));
$title_text = chop(substr("$arrtext[$idx]", 52, 50));
$story_loc = chop(substr("$arrtext[$idx]", 105, 50));
$story_origin = chop(substr("$arrtext[$idx]", 155, 60));
$stylesheet = chop(substr("$arrtext[$idx]", 215, 50));
if ($debug == 1) {
echo "
";
echo "\$current=$current
";
echo "\$prev=$prev
";
echo "\$next=$next
";
echo "\$banner=$banner
";
echo "\$image=$image
";
echo "\$origin=$origin
";
echo "\$links=$links
";
echo "\$footer=$footer
";
echo "\$title=$title
";
echo "\$color=$color
";
echo "\$align=$align
";
echo "\$title_text=$title_text
";
echo "\$story_loc=$story_loc
";
echo "\$story_origin=$story_origin
";
echo "\$stylesheet=$stylesheet
";
};
}
$idx = $idx + 1;
}
if ($debug == 1) {
echo "$arrtext[1]";
echo "$arrtext[2]";
echo "$arrtext[3]";
echo "$arrtext[4]";
}
echo "\n";
echo "
The Baldwin Project: $booktitle by $bookauthor\n";
/* SetShowInfo(0) */
if ($debug == 1) {
echo "\$author=$author
";
echo "\$book=$book
";
echo "\$story=$story
";
}
$linkstmt = "LINK TYPE=\"text/css\" REL=\"STYLESHEET\" HREF=\"http://www.mainlesson.com/$stylesheet\"";
echo (chr(60));
echo $linkstmt;
echo (chr(62));
echo "\n";
/*
*/
$base = "/usr2/home/lymanml/www/";
if ($print == "Y") {
if ($banner == "Y") {
if (file_exists("/usr2/home/lymanml/www/books/$author/$book/_banner.gif"))
{
echo "
\n\n \n ";
}
else {
echo "\n\n
$booktitle | \n";
echo "
\n
\n";
}
}
}
else {
echo "\n " ;
echo "";
echo "\n " ;
echo "\n " ;
echo " \n ";
echo " \n ";
echo " \n ";
echo " T h e B a l d w i n P r o j e c t\n ";
echo " \n ";
echo " \n ";
echo " \n ";
echo " \n ";
echo " Bringing Yesterday's Classics to Today's Children\n ";
echo " \n ";
echo " @mainlesson.com\n ";
echo " \n ";
echo " \n ";
echo " | \n ";
echo "
\n ";
echo "
\n ";
echo "\n " ;
echo "\n " ;
echo " \n ";
echo " | \n ";
echo " \n ";
echo " \n ";
echo " \n ";
echo "$booktitle";
echo " \n ";
echo " \n ";
echo " \n ";
echo " by $bookauthor\n ";
echo " \n ";
echo " \n ";
echo " \n ";
echo " \n ";
echo "\n ";
echo " Table of Contents \n " ;
echo " |\n ";
echo "\n ";
echo " Index \n " ;
echo " |\n ";
if ($prev < 0 || substr("$arrtext[$prev]", 0, 1) == "_") {
echo "";
$separator = " ";
}
else {
$separator = "|";
$prev_story = chop(substr("$arrtext[$prev]", 0, 19));
$prev_title = chop(substr("$arrtext[$prev]", 52, 50));
echo "";
echo "Previous: $prev_title \n " ;
}
if ($next >= $num_elements) {
echo " ";
}
else {
$next_story = chop(substr("$arrtext[$next]", 0, 19));
$next_title = chop(substr("$arrtext[$next]", 52, 50));
echo " $separator\n ";
echo "";
echo " Next: $next_title\n " ;
}
echo " \n ";
echo " \n ";
echo " | \n ";
echo "
\n ";
echo "
\n ";
}
if ($title == "Y") {
echo "";
echo "$title_text";
echo "
\n";
}
$selection = "$base/$story_loc";
include "$selection";
if ($footer == "Y") {
echo "
\n\n\n";
}
if ($origin == "Y") {
$origin_file = "$base/$story_origin";
include "$origin_file";
}
/* } */
?>