/
LIB3/
LIB3/D/ADMIN/
LIB3/D/ADMIN/OBJ/
LIB3/D/ADMIN/ROOM/W/
LIB3/D/HOME/
LIB3/D/HOME/CITY/ARENA/
LIB3/D/HOME/CITY/ITEMS/
LIB3/D/HOME/CITY/POSTOFFI/
LIB3/DOC/
LIB3/GLOBAL/SPECIAL/
LIB3/GLOBAL/VIRTUAL/
LIB3/NET/
LIB3/NET/CONFIG/
LIB3/NET/DAEMON/CHARS/
LIB3/NET/GOPHER/
LIB3/NET/INHERIT/
LIB3/NET/OBJ/
LIB3/NET/SAVE/
LIB3/NET/VIRTUAL/
LIB3/OBJ/B_DAY/
LIB3/OBJ/HANDLERS/TERM_TYP/
LIB3/PLAYERS/B/
LIB3/PLAYERS/N/
LIB3/ROOM/
LIB3/SAVE/
LIB3/SAVE/BOARDS/
LIB3/SAVE/ENVIRON/
LIB3/SAVE/POST/
LIB3/STD/COMMANDS/SHADOWS/
LIB3/STD/CREATOR/
LIB3/STD/DOM/
LIB3/STD/EFFECTS/
LIB3/STD/EFFECTS/HEALING/
LIB3/STD/EFFECTS/OTHER/
LIB3/STD/EFFECTS/POISONS/
LIB3/STD/ENVIRON/
LIB3/STD/GUILDS/
LIB3/STD/LIQUIDS/
LIB3/STD/ROOM/
LIB3/STD/TRIGGER/SHADOW/
LIB3/W/
LIB3/W/BANNOR/
LIB3/W/NEWSTYLE/
string  number_as_string( int n );

string  query_num( int n, int limit )
{
    string  ret;
    int     i;

    if( limit && n > limit )
	return "many";		/* this is a little pointless ... */
    if( n < 0 )
	return "many";		/* fo wraps... */
    if( n > 99999 )
	return "many";		/* sorry 'bout the hard limit */
    ret = 0;
    if( (i = n / 1000) )
    {
	n = n % 1000;
	if( !n )
	    return number_as_string( i ) + " thousand";
	ret = number_as_string( i ) + " thousand";
    }
    if( (i = n / 100) )
    {
	n = n % 100;
	if( ret )
	{
	    if( !n )
		return ret + " and " + number_as_string( i ) + " hundred";
	    ret += ", " + number_as_string( i ) + " hundred";
	}
	else
	{
	    if( !n )
		return number_as_string( i ) + " hundred";
	    ret = number_as_string( i ) + " hundred";
	}
    }
    if( ret )
	return ret + " and " + number_as_string( n );
    return number_as_string( n );
}				/* query_num() */

string  number_as_string( int n )
{
    string  ret;

    if( !n )
	return "zero";
    if( n < 20 && n > 9 )
	return({ "ten", "eleven", "twelve", "thirteen",
		 "fourteen", "fifteen", "sixteen", "seventeen",
		 "eighteen", "nineteen" })[ n - 10 ];
    ret = ({ "", "", "twenty", "thirty", "forty", "fifty", "sixty",
	     "seventy", "eighty", "ninety" })[ n / 10 ];
    if( (n = n % 10) && (ret != "") )
	ret += " ";
    return ret + ({ "", "one", "two", "three", "four", "five", "six",
		    "seven", "eight", "nine" })[ n ];
}				/* number_as_string() */