9) echo "-"; else echo " "; } function put_hexagram ($h) { for ($i = 0; $i < 6; $i++) { if ($h[$i]) put_solid_line(); else put_broken_line(); echo "\n"; } } if ($oracle = file("i_ching.dat")) { mt_srand((double)time()); echo "\n"; echo ""; $hex = $hex_num * 4; print ""; print ""; print ""; print "\n"; print ""; echo "
\n";

    $hex_num = throw_i_ching();	// flip the tokens

    echo "
Hexagram: " . $oracle[$hex] . "
Name: " . $oracle[$hex+1] . "
Meaning " . $oracle[$hex+2] . "
" . "the symbol of
" . $oracle[$hex+3] . "
\n"; } ?>