/*
**		BRIEF -- Basic Reconfigurable Interactive Editing Facility
**
**		Written by Dave Nanian and Michael Strickman.
*/

/*
**		key.cb:
**
**		This macro makes it easy to input the yucchy assign_to_key
**	key descriptions.  Note that if the user answers yes to the
**	question "Recognize that specific %c? ", the entire keycode,
**	including the scan code, is used as a string.  This forces
**	BRIEF to use only that specific key on the keyboard.
*/

void key ()
{
	int	key_value,
			done;

	string	to_insert = "\"",
				reply;
			
	message ("Press the keys you want converted, Esc to end.");

	while (!done)
		{
		while ((key_value = read_char ()) == -1);

			if (key_value != key_to_int ("<Esc>"))
				{
				if (key_value % 256)
					{
					sprintf (reply, "%c", key_value % 256);

					if (index ("0123456789*.-+\t\n", reply))
						{
						sprintf (reply, "Recognize only that specific %c? ", key_value);

						if (get_parm (NULL, reply, reply, 1))
							{
							if (!index ("yY", reply))
								key_value %= 256;
							}
						else
							done = 2;
						}
					else
						key_value %= 256;
					}
				if (!done)
					{
					sprintf (reply, "#%d", key_value);
					to_insert += reply;
					}
				}
			else
				done = 1;

			if (!done)
				message ("Continue, or Esc to end.");
		}
	if (done != 2)
		if (strlen (to_insert) > 1)
			{
			to_insert += "\"";
			insert (to_insert);
			message ("Sequence inserted.");
			}
		else
			message ("Nothing to insert.");
}