! IBM_PROLOG_BEGIN_TAG 
! This is an automatically generated prolog. 
!  
! gos720 src/gos/2d/XTOP/extras/accessx/accessx.uil.cpp 1.1 
!  
! Licensed Materials - Property of IBM 
!  
! COPYRIGHT International Business Machines Corp. 2005 
! All Rights Reserved 
!  
! US Government Users Restricted Rights - Use, duplication or 
! disclosure restricted by GSA ADP Schedule Contract with IBM Corp. 
!  
! IBM_PROLOG_END_TAG 
! $Xorg: accessx.uil.cpp,v 1.2 2001/01/29 20:04:07 coskrey Exp $
!***************************************************************************
!*                                                                         *
!* Copyright (c) 2000 Compaq Computer Corporation                          *
!*                                                                         * 
!* The software (contained on this media) is proprietary to and embodies   *
!* the confidential technology of Compaq Computer Corporation.             * 
!* Possession use, duplication or disseminationof the software and media   *
!* in source and binary forms, with or without modification, is authorized,* 
!* provided that the following conditions are met:                         *
!*                                                                         *
!* 1.  Redistribution of source code must retain the above copyright       *
!* notice, this list of conditions, and the following disclaimer in the    *
!* documentation and!or other materials provided with the distribution.    *
!*                                                                         * 
!* 2.  Redistribution of binary forms must reproduce the above copyright   *
!* notice, this list of conditions, and the following disclaimer in the    *
!* documentation and!or othe rmatierals provided with the distribution.    *
!*                                                                         * 
!* 3.  The name of the Corporation may not be used to endorse or promote   *
!* products derived from this sfotware without specific prior written      *
!* permission from Compaq Computer Corporation.                            *
!*                                                                         * 
!* THE SOFTWARE IS PROVIDED "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, *
!* INCLUDING BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY *
!* AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL *
!* THE CORPORATION BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,*
!* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING BUT NOT LIMITED TO,      *
!* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR      *
!* PROFITS; OR BUSINESS INTERRUPTION), HOWEVER CAUSED AND ON ANY THEORY OF *
!* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING    *
!* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS      *
!* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.            *
!*                                                                         *
!***************************************************************************
!
!************************************************************************
!*                                                                      *
!*         Copyright 1993 Sun Microsystems, Inc. All Rights Reserved.   *
!*                                                                      *
!*      Permission to use, copy, modify, and distribute this software   *
!*      and its documentation for any purpose and without fee is hereby *
!*      granted, provided that the above copyright notice appear in all *
!*      copies and that both that copyright notice and this permission  *
!*      notice appear in supporting documentation, and that the name of *
!*      Sun Microsystems, Inc. (SMI) not be used in advertising or      *
!*      publicity pertaining to distribution of the software without    *
!*      specific, written prior permission.                             *
!*                                                                      *
!*                                                                      *
!*      SMI DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,      *
!*      INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND         *
!*      FITNESS, IN NO EVENT SHALL SMI BE LIABLE FOR ANY SPECIAL,       *
!*      INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER     *
!*      RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN      *
!*      ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,        *
!*      ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE     *
!*      OF THIS SOFTWARE.                                               *
!*                                                                      *
!************************************************************************

!************************************************************************
!*									*
!* AccessX	   						        *
!* 									*
!* 	This module is intended to provide access features for people	*
!*	with physical disabilities.  This is a Motif client that	*
!*	communicates with the AccessX server extension and allows us to	*
!*	get visual feedback regarding the state of the AccessX features.*
!*									*
!************************************************************************
module AccessX
    names = case_sensitive

#include "accessxstrings.uil"
! include file "accessxstrings.uil";

procedure
    CreateProc;
    ActivateProc;
    ChangeControlProc;

value
    MarginSize: 5;
    StatusMarginSize: 10;
    MouseStatusLeftOffset: 10;
    ToggleOffset: 9;

!*************** TOGGLE WIDGETS ***********************!
ENABLE_ACCESSX_TGL		:	1;
ONOFF_SOUND_TGL			:	2;
TIME_OUT_TGL			:	3;
SHOW_STATUS_TGL			:	4;

STICKY_KEYS_TGL			:	5;
MOUSE_KEYS_TGL			:	6;
TOGGLE_KEYS_TGL			:	7;
REPEAT_KEYS_TGL			:	8;
SLOW_KEYS_TGL			:	9;
BOUNCE_KEYS_TGL			:	10;

STICKY_MOD_SOUND_TGL		:	11;
STICKY_TWO_KEYS_TGL		:	12;
KRG_PRESS_SOUND_TGL		:	13;
KRG_ACCEPT_SOUND_TGL		:	14;

MAIN_TOGGLE_WIDGETS_MIN		:	ENABLE_ACCESSX_TGL;
MAIN_TOGGLE_WIDGETS_MAX		:	BOUNCE_KEYS_TGL;
SETTINGS_TOGGLE_WIDGETS_MIN 	:	STICKY_MOD_SOUND_TGL;
SETTINGS_TOGGLE_WIDGETS_MAX 	:	KRG_ACCEPT_SOUND_TGL;
TOGGLE_WIDGETS_MIN		:	ENABLE_ACCESSX_TGL;
TOGGLE_WIDGETS_MAX		:	KRG_ACCEPT_SOUND_TGL;

!************** SCALE WIDGETS *************************!
TIME_OUT_SCL			:	15;

MOUSE_MAX_SPEED_SCL		:	16;
MOUSE_ACCEL_SCL			:	17;
MOUSE_DELAY_SCL			:	18;

KRG_REPEAT_DELAY_SCL		:	19;
KRG_REPEAT_RATE_SCL		:	20;
KRG_SLOW_DELAY_SCL		:	21;
KRG_DEBOUNCE_SCL		:	22;

SCALE_WIDGETS_MIN		:	TIME_OUT_SCL;
SCALE_WIDGETS_MAX		:	KRG_DEBOUNCE_SCL;

!************** MAIN MENU ITEMS ***********************!
LOAD_BTN			:	23;
SAVE_BTN			:	24;
EXIT_BTN			:	25;

ALL_BTN				:	26;
STICKYKEYS_BTN			:	27;
MOUSEKEYS_BTN			:	28;
KRG_BTN				:	29;

GENERAL_HELP_BTN		:	30;
STICKY_HELP_BTN			:	31;
MOUSE_HELP_BTN			:	32;
TOGGLE_HELP_BTN			:	33;
REPEAT_HELP_BTN			:	34;
SLOW_HELP_BTN			:	35;
BOUNCE_HELP_BTN			:	36;

!*************** HELP WIDGETS *************************!
HELP_TEXT			:	37;
CLOSE_HELP_BTN			:	38;

!*************** SETTINGS WINDOW **********************!
SETTINGS_OK_BTN			:	39;
SETTINGS_RESET_BTN		:	40;
SETTINGS_DEFAULTS_BTN		:	41;
SETTINGS_CANCEL_BTN		:	42;
SETTINGS_HELP_BTN		:	43;

!*************** STATUS *************************!
STATUS_FRAME			:	44;
DEFAULT_BUTTON_MENU		:	45;
MB1_BTN				:	46;
MB2_BTN				:	47;
MB3_BTN				:	48;
MB4_BTN				:	49;
MB5_BTN				:	50;

!*************** LOAD-SAVE WIDGETS *******************!
SAVE_DONE_CANCEL_BTN		:	51;
SAVE_DONE_OK_BTN		:	52;
SAVE_DONE_HELP_BTN		:	53;

SAVE_ERR_CANCEL_BTN		:	54;
SAVE_ERR_OK_BTN			:	55;
SAVE_ERR_HELP_BTN		:	56;

LOAD_DONE_CANCEL_BTN		:	57;
LOAD_DONE_OK_BTN		:	58;
LOAD_DONE_HELP_BTN		:	59;

LOAD_ERR_CANCEL_BTN		:	60;
LOAD_ERR_OK_BTN			:	61;
LOAD_ERR_HELP_BTN		:	62;

HELP_ERR_CANCEL_BTN		:	63;
HELP_ERR_OK_BTN			:	64;
HELP_ERR_HELP_BTN		:	65;

!*************** LABEL WIDGETS FOR SCALES *******************!
TIME_OUT_LBL			:	66;
MOUSE_MAX_SPEED_LBL		:	67;
MOUSE_ACCEL_LBL			:	68;
MOUSE_DELAY_LBL			:	69;
KRG_REPEAT_RATE_LBL		:	70;
KRG_REPEAT_DELAY_LBL		:	71;
KRG_SLOW_DELAY_LBL		:	72;
KRG_DEBOUNCE_LBL		:	73;
KRG_SOUND_WHEN_LBL		:	74;

STICKYKEYS_FRAME		:	75;
MOUSEKEYS_FRAME			:	76;
REPEATKEYS_FRAME		:	77;
SLOWKEYS_FRAME			:	78;
BOUNCEKEYS_FRAME		:	79;
TEST_FRAME			:	80;
SETTINGS_OK_FORM		:	81;

MODIFIERS_LBL			:       82;

LABEL_WIDGETS_MIN		:	MOUSE_MAX_SPEED_LBL;
LABEL_WIDGETS_MAX		:	KRG_SOUND_WHEN_LBL;
#ifdef __osf__
NUM_WIDGETS			:	MODIFIERS_LBL + 1;
NUM_RES_WIDGETS			:	SCALE_WIDGETS_MAX + 1;
#else
NUM_WIDGETS			:	83;
NUM_RES_WIDGETS			:	23;
#endif

!************************************************************************
!*									*
!* The Main Window							*
!*									*
!************************************************************************
object AccessXMainWindow: XmMainWindow {
    controls {
	XmMenuBar {
	    arguments {
		XmNmenuHelpWidget = XmCascadeButtonGadget HelpCascade;
	    };
	    controls {
		XmCascadeButtonGadget FileCascade;
		XmCascadeButtonGadget AdjustCascade;
		XmCascadeButtonGadget HelpCascade;
	    };
	};
	XmForm {
            arguments {
	        XmNmarginWidth  = MarginSize;
	        XmNmarginHeight = MarginSize;
	    };
	    controls {
	        XmForm		CustomizeGeneralForm;
    	        XmForm  	TimeOutForm;
	        XmRowColumn	FeaturesForm;
	    };
	};
    };
};

!************************************************************************
!*									*
!* The Main Window's menu bar.						*
!*									*
!************************************************************************
object FileCascade: XmCascadeButton {
    arguments {
	XmNlabelString = FileString;
	XmNmnemonic    = FileMnemonic;
    };	
    controls {
	XmPulldownMenu {
	    arguments {
	    XmNtearOffModel = XmTEAR_OFF_ENABLED;
	    };
	    controls {
		XmPushButtonGadget 	LoadButton;
		XmPushButtonGadget 	SaveButton;
		XmSeparatorGadget 	MenuSeparator;
		XmPushButtonGadget 	ExitButton;
	    };
	};
    };
};

object LoadButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = LoadString;
	XmNmnemonic    = LoadMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(LOAD_BTN);
	XmNactivateCallback = procedure ActivateProc(LOAD_BTN);
    };
};

object SaveButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = SaveString;
	XmNmnemonic    = SaveMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(SAVE_BTN);
	XmNactivateCallback = procedure ActivateProc(SAVE_BTN);
    };
};

object MenuSeparator: XmSeparatorGadget {
    arguments {
	XmNorientation = XmHORIZONTAL;
    };
};

object ExitButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = ExitString;
	XmNmnemonic    = ExitMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(EXIT_BTN);
	XmNactivateCallback = procedure ActivateProc(EXIT_BTN);
    };
};

object AdjustCascade: XmCascadeButton {
    arguments {
	XmNlabelString = AdjustString;
	XmNmnemonic    = AdjustMnemonic;
    };	
    controls {
	XmPulldownMenu {
	    arguments {
	        XmNtearOffModel = XmTEAR_OFF_ENABLED;
	    };
	    controls {
		XmPushButtonGadget 	AllButton;
	    	XmSeparatorGadget	AdjustSeparator;
		XmPushButtonGadget 	StickyKeysButton;
		XmPushButtonGadget 	MouseKeysButton;
		XmPushButtonGadget 	KRGButton;
	    };
	};
    };
};

object AllButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = AllString;
	XmNmnemonic    = AllMnemonic;
    };
    callbacks {
        MrmNcreateCallback  = procedure CreateProc(ALL_BTN);
	XmNactivateCallback = procedure ActivateProc(ALL_BTN);
    };
};

object AdjustSeparator: XmSeparatorGadget {
    arguments {
	XmNorientation = XmHORIZONTAL;
    };
};

object StickyKeysButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = StickyKeysString & ElipsesString;
	XmNmnemonic    = StickyKeysMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(STICKYKEYS_BTN);
	XmNactivateCallback = procedure ActivateProc(STICKYKEYS_BTN);
    };
};

object MouseKeysButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = MouseKeysString & ElipsesString;
	XmNmnemonic    = MouseKeysMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MOUSEKEYS_BTN);
	XmNactivateCallback = procedure ActivateProc(MOUSEKEYS_BTN);
    };
};

object KRGButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = KRGString & ElipsesString;
	XmNmnemonic    = KRGMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(KRG_BTN);
	XmNactivateCallback = procedure ActivateProc(KRG_BTN);
    };
};

object HelpCascade: XmCascadeButton {
    arguments {
	XmNlabelString = HelpString;
	XmNmnemonic    = HelpMnemonic;
    };
    controls {
	XmPulldownMenu {
	    arguments {
		XmNtearOffModel = XmTEAR_OFF_ENABLED;
	    };
 	    controls {
		XmPushButtonGadget GeneralHelpButton;
		XmPushButtonGadget StickyKeysHelpButton;
		XmPushButtonGadget MouseKeysHelpButton;
		XmPushButtonGadget ToggleKeysHelpButton; 
		XmPushButtonGadget RepeatKeysHelpButton;
		XmPushButtonGadget SlowKeysHelpButton;
		XmPushButtonGadget BounceKeysHelpButton;
	    };
	};
    };
};

object GeneralHelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = GeneralString & ElipsesString;
	XmNmnemonic    = GeneralMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(GENERAL_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(GENERAL_HELP_BTN);
    };
};

object StickyKeysHelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = StickyKeysString & ElipsesString;
	XmNmnemonic    = StickyMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(STICKY_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(STICKY_HELP_BTN);
    };
};

object MouseKeysHelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = MouseKeysString & ElipsesString;
	XmNmnemonic    = MouseMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MOUSE_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(MOUSE_HELP_BTN);
    };
};

object ToggleKeysHelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = ToggleKeysString & ElipsesString;
	XmNmnemonic    = ToggleMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(TOGGLE_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(TOGGLE_HELP_BTN);
    };
};

object RepeatKeysHelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = RepeatKeysString & ElipsesString;
	XmNmnemonic    = RepeatMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(REPEAT_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(REPEAT_HELP_BTN);
    };
};

object SlowKeysHelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = SlowKeysString & ElipsesString;
	XmNmnemonic    = SlowMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(SLOW_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(SLOW_HELP_BTN);
    };
};

object BounceKeysHelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString = BounceKeysString & ElipsesString;
	XmNmnemonic    = BounceMnemonic;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(BOUNCE_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(BOUNCE_HELP_BTN);
    };
};

!************************************************************************
!*									*
!* The Main Window's Main Form.						*
!*									*
!************************************************************************
object CustomizeGeneralForm: XmForm {
    arguments {
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_FORM;
	XmNmarginWidth 	= MarginSize;
	XmNmarginHeight 	= MarginSize;
    };
    controls {
	XmToggleButtonGadget EnableAccessXToggle;
	XmToggleButtonGadget SoundOnOffToggle;
	XmToggleButtonGadget ShowStatusToggle;
    };
};

object EnableAccessXToggle: XmToggleButtonGadget {
    arguments {
	XmNleftAttachment = XmATTACH_FORM;
	XmNtopAttachment  = XmATTACH_FORM;
	XmNlabelString    = EnableString & SpaceString & HotKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(ENABLE_ACCESSX_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(ENABLE_ACCESSX_TGL);
    };
};

object SoundOnOffToggle: XmToggleButtonGadget {
    arguments {
	XmNrightAttachment= XmATTACH_FORM;
	XmNtopAttachment  = XmATTACH_FORM;
	XmNlabelString    = SoundOnOffString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(ONOFF_SOUND_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(ONOFF_SOUND_TGL);
    };
};

object ShowStatusToggle: XmToggleButtonGadget {
    arguments {
	XmNleftAttachment = XmATTACH_FORM;
	XmNtopAttachment  = XmATTACH_WIDGET;
	XmNtopWidget	  = XmToggleButtonGadget SoundOnOffToggle;
	XmNlabelString    = ShowStatusString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(SHOW_STATUS_TGL);
	XmNvalueChangedCallback = procedure ActivateProc(SHOW_STATUS_TGL);
    };
};

object TimeOutForm: XmForm {
    arguments {
	XmNmarginWidth 		= MarginSize;
	XmNmarginHeight 	= MarginSize;
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_WIDGET;
	XmNtopWidget 		= XmForm CustomizeGeneralForm;
    };
    controls {
	XmToggleButtonGadget TimeOutToggle;
	XmLabelGadget        TimeOutLabel;
	XmScale              TimeOutScale;
    };
};

object TimeOutToggle: XmToggleButtonGadget {
    arguments {
	XmNleftAttachment   = XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString      = TimeOutString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(TIME_OUT_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(TIME_OUT_TGL);
    };
};

object TimeOutLabel: XmLabelGadget {
    arguments {
	XmNleftAttachment   	= XmATTACH_WIDGET;
	XmNleftWidget		= XmToggleButtonGadget TimeOutToggle;
	XmNleftOffset		= MarginSize;
	XmNbottomAttachment    	= XmATTACH_FORM;
	XmNbottomOffset     	= ToggleOffset;
	XmNlabelString      	= TimeString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(TIME_OUT_LBL);
    };
};

object TimeOutScale: XmScale { 
    arguments {
	XmNleftAttachment	= XmATTACH_WIDGET;
	XmNleftWidget		= XmLabelGadget TimeOutLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment 	= XmATTACH_FORM;
	XmNbottomOffset     	= ToggleOffset;
	XmNorientation 		= XmHORIZONTAL;
	XmNshowValue 		= true;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(TIME_OUT_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(TIME_OUT_SCL);
    };
};

object FeaturesForm: XmRowColumn {
    arguments {
	XmNleftAttachment	= XmATTACH_FORM;
	XmNrightAttachment	= XmATTACH_FORM;
	XmNtopAttachment	= XmATTACH_WIDGET;
	XmNtopWidget		= XmForm TimeOutForm;
	XmNtopOffset 		= 2*MarginSize;
	XmNbottomAttachment 	= XmATTACH_FORM;
	XmNmarginWidth  	= MarginSize;
	XmNmarginHeight 	= MarginSize;
	XmNorientation  	= XmVERTICAL;
	XmNpacking      	= XmPACK_COLUMN;
	XmNnumColumns   	= 2;
    };
    controls {
	XmFrame TurnOnOffFeatures;
	XmFrame	KRGFeatures;
    };
};

object TurnOnOffFeatures: XmFrame {
    controls {
	XmLabelGadget EnableLabel;
	XmForm        FeaturesManagerForm;
    };
};

object EnableLabel: XmLabelGadget {
    arguments {
	XmNlabelString = KeyboardControlString;
	XmNchildType   = XmFRAME_TITLE_CHILD;
    };
};

object FeaturesManagerForm: XmForm {
    controls {
	XmRowColumn	TurnOnOffForm;
    };
};

object TurnOnOffForm: XmRowColumn {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
	XmNorientation  = XmVERTICAL;
	XmNpacking      = XmPACK_COLUMN;
	XmNnumColumns   = 1;
    };
    controls {
	XmToggleButtonGadget StickyKeysToggle;
	XmToggleButtonGadget MouseKeysToggle;
	XmToggleButtonGadget ToggleKeysToggle;
    };
};

object StickyKeysToggle: XmToggleButtonGadget {
    arguments {
	XmNlabelString = StickyKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(STICKY_KEYS_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(STICKY_KEYS_TGL);
    };
};

object MouseKeysToggle: XmToggleButtonGadget {
    arguments {
	XmNlabelString = MouseKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSE_KEYS_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(MOUSE_KEYS_TGL);
    };
};

object ToggleKeysToggle: XmToggleButtonGadget {
    arguments {
	XmNlabelString = ToggleKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(TOGGLE_KEYS_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(TOGGLE_KEYS_TGL);
    };
};

object KRGFeatures: XmFrame {
    controls {
	XmLabelGadget KRGLabel;
	XmForm        KRGManagerForm;
    };
};

object KRGLabel: XmLabelGadget {
    arguments {
	XmNlabelString = KRGString;
	XmNchildType   = XmFRAME_TITLE_CHILD;
    };
};

object KRGManagerForm: XmForm {
    controls {
	XmRowColumn	KRGForm;
    };
};	

object KRGForm: XmRowColumn {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
	XmNorientation  = XmVERTICAL;
	XmNpacking      = XmPACK_COLUMN;
	XmNnumColumns   = 1;
    };
    controls {
	XmToggleButtonGadget RepeatKeysToggle;
	XmToggleButtonGadget SlowKeysToggle;
	XmToggleButtonGadget BounceKeysToggle;
    };
};

object RepeatKeysToggle: XmToggleButtonGadget {
    arguments {
	XmNlabelString = RepeatKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(REPEAT_KEYS_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(REPEAT_KEYS_TGL);
    };
};

object SlowKeysToggle: XmToggleButtonGadget {
    arguments {
!	XmNindicatorType = XmONE_OF_MANY;
	XmNlabelString   = SlowKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(SLOW_KEYS_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(SLOW_KEYS_TGL);
    };
};

object BounceKeysToggle: XmToggleButtonGadget {
    arguments {
!	XmNindicatorType = XmONE_OF_MANY;
	XmNlabelString   = BounceKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(BOUNCE_KEYS_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(BOUNCE_KEYS_TGL);
    };
};

!************************************************************************
!*    									*
!* Edit Settings Dialog							*
!*									*
!************************************************************************
object SettingsDialog: XmFormDialog {
    arguments {
	XmNdialogTitle  = AdjustTitle; 
	XmNdefaultButton= XmPushButtonGadget OKButton;
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
    };
    controls {
	XmFrame CustomizeStickyKeysFrame;
	XmFrame CustomizeMouseKeysFrame;
	XmFrame CustomizeRepeatKeysFrame;
	XmFrame CustomizeSlowKeysFrame;
	XmFrame CustomizeBounceKeysFrame;
	XmFrame CustomizeFeaturesTestFrame;
	XmForm  SettingsOKForm;
    };
};

object CustomizeStickyKeysFrame: XmFrame {
    arguments {
	XmNleftAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_FORM;
    };
    controls {
	XmLabelGadget CustomizeStickyKeysLabel;
	XmForm 	  CustomizeStickyKeysForm;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(STICKYKEYS_FRAME);
    };
};

object CustomizeStickyKeysForm: XmForm {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
    };
    controls {
	XmToggleButtonGadget StickyTwoKeysToggle;
	XmToggleButtonGadget StickyModSoundToggle;
    };
};

object CustomizeStickyKeysLabel: XmLabelGadget {
    arguments {
	XmNlabelString = StickyKeysString;
	XmNchildType   = XmFRAME_TITLE_CHILD;
    };
};

object StickyModSoundToggle: XmToggleButtonGadget {
    arguments {
	XmNtopAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString    = SoundOnModString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(STICKY_MOD_SOUND_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(STICKY_MOD_SOUND_TGL);
    };
};

object StickyTwoKeysToggle: XmToggleButtonGadget {
    arguments {
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString 	= TwoKeysString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(STICKY_TWO_KEYS_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(STICKY_TWO_KEYS_TGL);
    };
};

object CustomizeMouseKeysFrame: XmFrame {
    arguments {
	XmNleftAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_WIDGET;
	XmNtopWidget       = XmFrame CustomizeStickyKeysFrame;
	XmNtopOffset       = MarginSize;
    };
    controls {
	XmLabelGadget CustomizeMouseKeysLabel;
	XmForm        CustomizeMouseKeysForm;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSEKEYS_FRAME);
    };
};     
        
object CustomizeMouseKeysForm: XmForm {
    arguments {
	XmNmarginHeight = MarginSize;
	XmNmarginWidth = MarginSize;
    };
    controls {
	XmLabelGadget MouseMaxSpeedLabel;
	XmScale	  MouseMaxSpeedScale;
	XmLabelGadget MouseAccelLabel;
	XmScale	  MouseAccelScale;
	XmLabelGadget MouseDelayLabel;
	XmScale	  MouseDelayScale;
    };
};     
 
object CustomizeMouseKeysLabel: XmLabelGadget {
    arguments {
	XmNchildType = XmFRAME_TITLE_CHILD;
	XmNlabelString = MouseKeysString;
    };
};

object MouseDelayLabel: XmLabelGadget {
    arguments {	
	XmNleftAttachment   = XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString      = MouseDelayString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSE_DELAY_LBL);
    };
};

object MouseDelayScale: XmScale {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget      	= XmLabelGadget MouseDelayLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNorientation 	= XmHORIZONTAL;
	XmNshowValue 	= true;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSE_DELAY_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(MOUSE_DELAY_SCL);
    };
};

object MouseAccelLabel: XmLabelGadget {
    arguments {	
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_WIDGET;
	XmNbottomWidget 	= XmScale MouseDelayScale;
	XmNlabelString 	= MouseAccelString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSE_ACCEL_LBL);
    };
};	

object MouseAccelScale: XmScale {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget 		= XmLabelGadget MouseAccelLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment 	= XmATTACH_WIDGET;
	XmNbottomWidget 	= XmScale MouseDelayScale;
	XmNorientation 		= XmHORIZONTAL;
	XmNshowValue 		= true;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSE_ACCEL_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(MOUSE_ACCEL_SCL);
    };
};

object MouseMaxSpeedLabel: XmLabelGadget {
    arguments {	
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_WIDGET;
	XmNbottomWidget 	= XmScale MouseAccelScale;
	XmNlabelString 	= MouseMaxSpeedString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSE_MAX_SPEED_LBL);
    };
};

object MouseMaxSpeedScale: XmScale {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget 	= XmLabelGadget MouseMaxSpeedLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_WIDGET;
	XmNbottomWidget 	= XmScale MouseAccelScale;
	XmNorientation 	= XmHORIZONTAL;
	XmNshowValue 	= true;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(MOUSE_MAX_SPEED_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(MOUSE_MAX_SPEED_SCL);
    };
};

object CustomizeRepeatKeysFrame: XmFrame {
    arguments {
	XmNleftAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_WIDGET;
	XmNtopWidget       = XmFrame CustomizeMouseKeysFrame;
	XmNtopOffset       = MarginSize;
    };
    controls {
	XmLabelGadget CustomizeRepeatKeysLabel;
	XmForm 	  CustomizeRepeatKeysForm;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(REPEATKEYS_FRAME);
    };
};	

object CustomizeRepeatKeysLabel: XmLabelGadget {
    arguments {
	XmNchildType   = XmFRAME_TITLE_CHILD;
	XmNlabelString = RepeatKeysString;
    };
};

object CustomizeRepeatKeysForm: XmForm {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
    };
    controls {
	XmLabelGadget 	KRGRepeatDelayLabel;
	XmScale         KRGRepeatDelayScale;
	XmLabelGadget 	KRGRepeatRateLabel;
	XmScale	  	KRGRepeatRateScale;
    };
};	

object KRGRepeatDelayLabel: XmLabelGadget {
    arguments {
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString 	= RepeatDelayString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_REPEAT_DELAY_LBL);
    };
};

object KRGRepeatDelayScale: XmScale {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget 	= XmLabelGadget KRGRepeatDelayLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNshowValue 	= true;
	XmNorientation 	= XmHORIZONTAL;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_REPEAT_DELAY_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(KRG_REPEAT_DELAY_SCL);
    };
};

object KRGRepeatRateLabel: XmLabelGadget {
    arguments {
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment 	= XmATTACH_WIDGET;
	XmNbottomWidget 	= XmScale KRGRepeatDelayScale;
	XmNlabelString 		= RepeatRateString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_REPEAT_RATE_LBL);
    };
};	

object KRGRepeatRateScale: XmScale {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget 		= XmLabelGadget KRGRepeatRateLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment 	= XmATTACH_WIDGET;
	XmNbottomWidget 	= XmScale KRGRepeatDelayScale;
	XmNshowValue 		= true;
	XmNorientation 		= XmHORIZONTAL;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_REPEAT_RATE_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(KRG_REPEAT_RATE_SCL);
    };
};

object CustomizeSlowKeysFrame: XmFrame {
    arguments {
	XmNleftAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_WIDGET;
	XmNtopWidget       = XmFrame CustomizeRepeatKeysFrame;
	XmNtopOffset       = MarginSize;
    };
    controls {
	XmLabelGadget CustomizeSlowKeysLabel;
	XmForm 	  CustomizeSlowForm;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(SLOWKEYS_FRAME);
    };
};

object CustomizeSlowKeysLabel: XmLabelGadget {
    arguments {
	XmNchildType   = XmFRAME_TITLE_CHILD;
	XmNlabelString = SlowKeysString;
    };
};

object CustomizeSlowForm: XmForm {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
    };
    controls {
	XmLabelGadget 	 SlowKeysSoundLabel;
	XmToggleButtonGadget SlowKeysOnPressToggle;
	XmToggleButtonGadget SlowKeysOnAcceptToggle;
	XmLabelGadget 	 KRGSlowKeysDelayLabel;
	XmScale 		 KRGSlowKeysDelayScale;
    };
};

object SlowKeysSoundLabel: XmLabelGadget {
    arguments {
	XmNtopAttachment  = XmATTACH_FORM;
	XmNleftAttachment = XmATTACH_FORM;
	XmNlabelString    = SoundWhenString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_SOUND_WHEN_LBL);
    };
};

object SlowKeysOnPressToggle: XmToggleButtonGadget {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget 	= XmLabelGadget SlowKeysSoundLabel;
	XmNtopAttachment 	= XmATTACH_OPPOSITE_WIDGET;
	XmNtopWidget 	= XmLabelGadget SlowKeysSoundLabel;
	XmNbottomAttachment = XmATTACH_OPPOSITE_WIDGET;
	XmNbottomWidget 	= XmLabelGadget SlowKeysSoundLabel;
	XmNlabelString 	= SoundOnPressString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_PRESS_SOUND_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(KRG_PRESS_SOUND_TGL);
    };
};

object SlowKeysOnAcceptToggle: XmToggleButtonGadget {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget 	= XmToggleButtonGadget SlowKeysOnPressToggle;
	XmNtopAttachment 	= XmATTACH_OPPOSITE_WIDGET;
	XmNtopWidget 	= XmLabelGadget SlowKeysSoundLabel;
	XmNbottomAttachment = XmATTACH_OPPOSITE_WIDGET;
	XmNbottomWidget 	= XmLabelGadget SlowKeysSoundLabel;
	XmNlabelString 	= SoundOnAcceptString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_ACCEPT_SOUND_TGL);
	XmNvalueChangedCallback = procedure ChangeControlProc(KRG_ACCEPT_SOUND_TGL);
    };
};

object KRGSlowKeysDelayLabel: XmLabelGadget {
    arguments {
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString 	= SlowKeysDelayString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_SLOW_DELAY_LBL);
    };
};

object KRGSlowKeysDelayScale: XmScale {
    arguments {
	XmNleftAttachment 	= XmATTACH_WIDGET;
	XmNleftWidget 	= XmLabelGadget KRGSlowKeysDelayLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_WIDGET;
	XmNtopWidget 	= XmLabelGadget SlowKeysSoundLabel;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNorientation 	= XmHORIZONTAL;
	XmNshowValue 	= true;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_SLOW_DELAY_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(KRG_SLOW_DELAY_SCL);
    };
};
 
object CustomizeBounceKeysFrame: XmFrame {
    arguments {
	XmNleftAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_WIDGET;
	XmNtopWidget       = XmFrame CustomizeSlowKeysFrame;
	XmNtopOffset       = MarginSize;
    };
    controls {
	XmLabelGadget CustomizeBounceKeysLabel;
	XmForm 	  CustomizeBounceKeysForm;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(BOUNCEKEYS_FRAME);
    };
};

object CustomizeBounceKeysLabel: XmLabelGadget {
    arguments {
	XmNchildType   = XmFRAME_TITLE_CHILD;
	XmNlabelString = BounceKeysString;
    };
};

object CustomizeBounceKeysForm: XmForm {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
    };
    controls {
	XmLabelGadget	KRGDebounceLabel;
	XmScale 		KRGDebounceScale;
    };
};	
 
object KRGDebounceLabel: XmLabelGadget {
    arguments {
	XmNleftAttachment   = XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString      = DebounceString;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_DEBOUNCE_LBL);
    };
};
	
object KRGDebounceScale: XmScale {
    arguments {
	XmNleftAttachment  	= XmATTACH_WIDGET;
	XmNleftWidget   	= XmLabelGadget KRGDebounceLabel;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNorientation 	= XmHORIZONTAL;
	XmNshowValue 	= true;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(KRG_DEBOUNCE_SCL);
	XmNvalueChangedCallback = procedure ChangeControlProc(KRG_DEBOUNCE_SCL);
    };
};

object CustomizeFeaturesTestFrame: XmFrame {
    arguments {
	XmNleftAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_WIDGET;
	XmNtopWidget       = XmFrame CustomizeBounceKeysFrame;
	XmNtopOffset       = MarginSize;
    };
    controls {
	XmLabelGadget FeaturesTestLabel;
	XmForm 	  FeaturesTestForm;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(TEST_FRAME);
    };
};
	
object FeaturesTestLabel: XmLabelGadget {
    arguments {
	XmNchildType   = XmFRAME_TITLE_CHILD;
	XmNlabelString = TestString;
    };
};

object FeaturesTestForm: XmForm {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
    };
    controls {
	XmText FeaturesTestText;
    };
};	

object FeaturesTestText: XmText {
    arguments {
	XmNleftAttachment   = XmATTACH_FORM;
	XmNrightAttachment  = XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
    };
};   

object SettingsOKForm: XmForm {
    arguments {
	XmNmarginWidth 	= MarginSize;
	XmNmarginHeight 	= MarginSize;
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNtopAttachment 	= XmATTACH_WIDGET;
	XmNtopWidget 	= XmFrame CustomizeFeaturesTestFrame;
	XmNtopOffset 	= MarginSize;
    };
    controls {
	XmPushButtonGadget OKButton;
	XmPushButtonGadget ResetButton;
	XmPushButtonGadget DefaultsButton;
	XmPushButtonGadget CancelButton;
	XmPushButtonGadget HelpButton;
    };
    callbacks {
	MrmNcreateCallback      = procedure CreateProc(SETTINGS_OK_FORM);
    };
};

object OKButton: XmPushButtonGadget {
    arguments {
	XmNlabelString 	= OKString;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(SETTINGS_OK_BTN);
	XmNactivateCallback = procedure ActivateProc(SETTINGS_OK_BTN);
    };
};

object ResetButton: XmPushButtonGadget {
    arguments {
	XmNlabelString      = ResetString;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(SETTINGS_RESET_BTN);
	XmNactivateCallback = procedure ActivateProc(SETTINGS_RESET_BTN);
    };
};

object DefaultsButton: XmPushButtonGadget {
    arguments {
	XmNlabelString      = DefaultsString;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(SETTINGS_DEFAULTS_BTN);
	XmNactivateCallback = procedure ActivateProc(SETTINGS_DEFAULTS_BTN);
    };
};

object CancelButton: XmPushButtonGadget {
    arguments {
	XmNlabelString 	= CancelString;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(SETTINGS_CANCEL_BTN);
	XmNactivateCallback = procedure ActivateProc(SETTINGS_CANCEL_BTN);
    };
};

object HelpButton: XmPushButtonGadget {
    arguments {
	XmNlabelString 	= HelpString;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(SETTINGS_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(SETTINGS_HELP_BTN);
    };
};

!*****************************************************************
!*								 *
!* Status Dialog Box                                             *
!*                                                               *
!*****************************************************************

object  StatusDialog: XmForm {
    arguments {
        XmNresizePolicy = XmRESIZE_ANY;
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
	XmNdialogTitle  = StatusString;
    };
    controls {
	XmOptionMenu 	DefaultButtonMenu;
	XmFrame 	StatusFrame;
    };
};

object DefaultButtonMenu: XmOptionMenu {
    arguments {
	XmNleftAttachment  = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_FORM;
	XmNbottomAttachment= XmATTACH_FORM;
	XmNlabelString     = DefaultButtonString;
    };
    controls {
	XmPulldownMenu {
	    controls {
		XmPushButtonGadget 	MB1Button;
		XmPushButtonGadget 	MB2Button;
		XmPushButtonGadget 	MB3Button;
		XmPushButtonGadget 	MB4Button;
		XmPushButtonGadget 	MB5Button;
	    };
	};
    };
    callbacks {
	MrmNcreateCallback = procedure CreateProc(DEFAULT_BUTTON_MENU);
    };
};

object MB1Button: XmPushButtonGadget {
    arguments {
	XmNlabelString = MB1String;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MB1_BTN);
	XmNactivateCallback = procedure ActivateProc(MB1_BTN);
    };
};

object MB2Button: XmPushButtonGadget {
    arguments {
	XmNlabelString = MB2String;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MB2_BTN);
	XmNactivateCallback = procedure ActivateProc(MB2_BTN);
    };
};

object MB3Button: XmPushButtonGadget {
    arguments {
	XmNlabelString = MB3String;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MB3_BTN);
	XmNactivateCallback = procedure ActivateProc(MB3_BTN);
    };
};

object MB4Button: XmPushButtonGadget {
    arguments {
	XmNlabelString = MB4String;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MB4_BTN);
	XmNactivateCallback = procedure ActivateProc(MB4_BTN);
    };
};

object MB5Button: XmPushButtonGadget {
    arguments {
	XmNlabelString = MB5String;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MB5_BTN);
	XmNactivateCallback = procedure ActivateProc(MB5_BTN);
    };
};

object StatusFrame: XmFrame {
    arguments {
	XmNleftAttachment  = XmATTACH_WIDGET;
	XmNleftWidget      = XmOptionMenu DefaultButtonMenu;
	XmNleftOffset	   = MarginSize;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_OPPOSITE_WIDGET;
	XmNtopWidget       = XmOptionMenu DefaultButtonMenu;
	XmNbottomAttachment= XmATTACH_OPPOSITE_WIDGET;
	XmNbottomWidget    = XmOptionMenu DefaultButtonMenu;
    };
    controls {
	XmForm StatusForm;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(STATUS_FRAME);
    };
};

object StatusForm: XmForm {
    arguments {
        XmNresizePolicy = XmRESIZE_ANY;
	XmNmarginWidth  = StatusMarginSize;
	XmNmarginHeight = StatusMarginSize;
    };
    controls {  
	XmLabelGadget 	ModifiersLabel;
	XmLabelGadget	ModifiersStatusLabel;
    };
};

object ModifiersLabel: XmLabelGadget {
    arguments {
	XmNleftAttachment = XmATTACH_FORM;
	XmNtopAttachment  = XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString    = ModifiersString;
    };
};

object ModifiersStatusLabel: XmLabelGadget {
    arguments {
	XmNleftAttachment  = XmATTACH_WIDGET;
	XmNleftWidget      = XmLabelGadget ModifiersLabel;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_FORM;
	XmNbottomAttachment = XmATTACH_FORM;
	XmNlabelString     = SpaceString;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(MODIFIERS_LBL);
    };
};

!**********************************************************************
!*                                                                    *
!* File Dialogs                                                       *
!*                                                                    *
!**********************************************************************
object SaveDoneDialog: XmMessageDialog {
    arguments {
	XmNdialogTitle  = SaveInfoString;
	XmNdialogType    = XmDIALOG_INFORMATION;
	XmNmessageString = SaveDoneString;
    };
    callbacks {
	XmNcancelCallback = procedure ActivateProc(SAVE_DONE_CANCEL_BTN);
	XmNokCallback     = procedure ActivateProc(SAVE_DONE_OK_BTN);
    };
};

object SaveErrorDialog: XmMessageDialog {
    arguments {
	XmNdialogTitle   = SaveErrorDialogString;
	XmNdialogType    = XmDIALOG_ERROR;
	XmNmessageString = SaveErrorString;
    };
    callbacks {
	XmNcancelCallback = procedure ActivateProc(SAVE_ERR_CANCEL_BTN);
	XmNokCallback     = procedure ActivateProc(SAVE_ERR_OK_BTN);
    };
};

object LoadDoneDialog: XmMessageDialog {
    arguments {
	XmNdialogTitle   = LoadInfoString;
	XmNdialogType    = XmDIALOG_INFORMATION;
	XmNmessageString = LoadDoneString;
    };
    callbacks {
	XmNcancelCallback = procedure ActivateProc(LOAD_DONE_CANCEL_BTN);
	XmNokCallback     = procedure ActivateProc(LOAD_DONE_OK_BTN);
    };
};

object LoadErrorDialog: XmMessageDialog {
    arguments {
	XmNdialogTitle   = LoadErrorDialogString;
	XmNdialogType    = XmDIALOG_ERROR;
	XmNmessageString = LoadErrorString;
    };
    callbacks {
	XmNcancelCallback = procedure ActivateProc(LOAD_ERR_CANCEL_BTN);
	XmNokCallback     = procedure ActivateProc(LOAD_ERR_OK_BTN);
    };
};

!****************************************************************
!*								*
!* Help Text Widget						*
!*								*
!****************************************************************
object HelpDialog: XmFormDialog {
    arguments {
	XmNmarginWidth  = MarginSize;
	XmNmarginHeight = MarginSize;
	XmNdialogTitle  = HelpWindowString;
	XmNresizePolicy = XmRESIZE_ANY;
    };
    controls {
#ifdef __osf__
	DXmScrolledCSText	HelpText;
#else
	XmScrolledText		HelpText;
#endif
	XmForm 		HelpCloseForm;
    };
};

#ifdef __osf__
object HelpText: DXmScrolledCSText {
    arguments {
	XmNeditable = false;
	XmNeditMode = XmMULTI_LINE_EDIT;
	XmNrows = 24;
	XmNcolumns      = 50;
	XmNwordWrap = true;
	XmNscrollHorizontal= false;
	XmNscrollVertical  = true;
	XmNleftAttachment  = XmATTACH_FORM;
	XmNrightAttachment = XmATTACH_FORM;
	XmNtopAttachment   = XmATTACH_FORM;
    };
    callbacks {
	MrmNcreateCallback = procedure CreateProc(HELP_TEXT);
    };
};
#else /* __osf__ */
object HelpText: XmScrolledText {
    arguments {
	XmNeditable = false;
	XmNeditMode = XmMULTI_LINE_EDIT;
	XmNscrollHorizontal = false;
	XmNrows=24;
	XmNcolumns=50;
	XmNwordWrap = true;
    };
    callbacks {
	MrmNcreateCallback = procedure CreateProc(HELP_TEXT);
    };
};
#endif

object HelpCloseForm: XmForm {
    arguments {
	XmNresizable	= false;
	XmNleftAttachment 	= XmATTACH_FORM;
	XmNrightAttachment 	= XmATTACH_FORM;
	XmNtopAttachment	= XmATTACH_WIDGET;
#ifdef __osf__
	XmNtopWidget 	= DXmScrolledCSText HelpText;
#else
	XmNtopWidget 	= XmScrolledText HelpText;
#endif
	XmNtopOffset 	= MarginSize;
	XmNbottomAttachment = XmATTACH_FORM;
    };
    controls {
	XmPushButtonGadget HelpCloseButton;
    };
};

object HelpCloseButton: XmPushButtonGadget {
    arguments {
	XmNlabelString 	= CloseString;
    };
    callbacks {
	MrmNcreateCallback  = procedure CreateProc(CLOSE_HELP_BTN);
	XmNactivateCallback = procedure ActivateProc(CLOSE_HELP_BTN);
    };
};

object HelpErrorDialog: XmMessageDialog {
    arguments {
	XmNdialogTitle   = HelpErrorDialogString;
	XmNdialogType    = XmDIALOG_ERROR;
	XmNmessageString = HelpErrorString;
    };
    callbacks {
	XmNcancelCallback = procedure ActivateProc(HELP_ERR_CANCEL_BTN);
	XmNokCallback     = procedure ActivateProc(HELP_ERR_OK_BTN);
    };
};

end module;