!*
! ******************************************************************************
!*
!*  Copyright 2003 Hewlett-Packard Development Company, L.P.
!*
!*  Confidential computer software. Valid license from HP and/or its 
!*  subsidiaries required for possession, use, or copying. Consistent with 
!*  FAR 12.211 and 12.212, Commercial Computer Software, Computer Software 
!*  Documentation, and Technical Data for Commercial Items are licensed to 
!*  the U.S. Government under vendor's standard commercial license
!*
!*******************************************************************************
! 
! (c) Copyright 1989, 1990, 1991, 1992, 2003 OPEN SOFTWARE FOUNDATION, INC. 
! ALL RIGHTS RESERVED 
! 
! 
! Motif Release 1.2
! 
!   $RCSfile: hellomotif.uil,v $ $Revision: 1.6.2.2 $ $Date: 1992/03/27 02:49:27 $
!*******************************************************************************
module helloworld
    version = 'v1.0'
    names = case_sensitive

procedure
    helloworld_button_activate();

object
    helloworld_main : XmForm {
	arguments {
	    XmNmarginWidth = 5;
	    XmNmarginHeight = 5;
	};
	controls {
	    XmLabel	helloworld_label;
	    XmPushButton	helloworld_button;
	};
    };

object
    helloworld_button : XmPushButton {
	arguments { 
	    XmNbottomAttachment = XmATTACH_FORM;
	    XmNleftAttachment = XmATTACH_POSITION;
	    XmNleftPosition = 50;
	    XmNleftOffset = -40;
	    XmNlabelString = compound_string('Hello',separate=true) & 'World!';
	};
	callbacks { 
	    XmNactivateCallback = procedure helloworld_button_activate();
	};
    };

object
    helloworld_label : XmLabel {
	arguments {
	    XmNtopAttachment = XmATTACH_FORM;
	    XmNbottomAttachment = XmATTACH_WIDGET;
	    XmNbottomWidget = XmPushButton helloworld_button;
	    XmNleftAttachment = XmATTACH_FORM;
	    XmNrightAttachment = XmATTACH_FORM;
	    XmNlabelString = compound_string('Press button once',separate=true) &
		          compound_string('to change label;',separate=true) &
		          'twice to exit.';
	};
    };

value
    goodbye_label : exported compound_string('Goodbye',separate=true) &
		compound_string('World!');

end module;