";
return array(1,$type,$value);
}
/*
retrieve input line (max 80 chars), convert to lower case
& rescan for first two words (max. WORDSIZE-1 chars).
*/
function getwords()
{
global $word1,$word2,$dbugflg,$words,$PHP_SELF,$newwords;
$wptr=0;
$word1 = $word2 = '';
// fputc('>', stdout);
// fgets($words, 80, $stdin);
if (!$newwords) {
print "";
return 0;
}
$words=$newwords;
$newwords="";
buffprint (">$words\n");
$wptr = $words;
$words= strtolower($wptr);
sscanf($words, "%19s %19s", $word1, $word2);
if ($dbugflg)
print("\$WORD1 = '$word1', \$WORD2 = '$word2'
");
return 1;
}
/*
output adventure word list (motion/0xxx & verb/2xxx) only
6 words/line pausing at 20th line until keyboard active
*/
function outwords()
{
global $wc;
print_r($wc); // dump array of recognised words to screen
}
?>