MAKE-BABYLON-INPUT-FIELD
========================

syntax: (make-babylon-input-field <interface>
           <wname> <xpos> <ypos> <width> <height>
           <default-text> <font> <color> <action> 
           &rest <args>)

This function defines an input-field on the window. 
<wname> is the name for the field. <xpos> and <ypos> 
give the position for the upper left corner. <width> 
and <height> define the size of the field. <default-
text> is the text that is written in the input-field.
<font> and <color> are not supported by Babylon v3.
<action> starts a task, after the user has pressed
return. The defined input-field will appear in the
interface.

example: >(defun make-kb-interface (interface)
             (add-window-elements
             interface
             (list (make-babylon-input-field interface
             "babylon-standard-input" 400 300 100 50
             "input:" nil nil nil))))