MAKE-BABYLON-GRAPHIC-BUTTON =========================== syntax: (make-babylon-graphic-button <interface> <wname> <xpos> <ypos> <width> <height> <graphic-file> <color> &optional <action> &rest <args>) This function defines a graphic-push-button for the window. <wname> is the name of the push-button. <xpos> and <ypos> are the positions from the upper left corner. <width> and <height> define the width and height of the button. <graphic-file> is the name of the graphic-file that will be used. <color> is not supported by Babylon v3. <action> describes the task, that will be started when the button is pressed. The defined button will appear in the interface. example: >(defun make-kb-interface (interface) (add-window-elements interface (list (make-babylon-graphic-button interface "PSHB1" 400 300 100 50 "/bitmaps/horse" nil '(start 'demo-task interface)))))