
	in ApplicationShell
		push xd_XmDialogShell
		doubleclick nb_vn_t
		type myFirstShell
		key Return

		push xd_XmTemplate
		doubleclick nb_vn_t
		type myDiag
		key Return



	in ApplicationShell
		push xd_XmPushButton
		push xd_XmPushButton
		push xd_XmPushButton
		push xd_XmMenuBar
		doubleclick nb_vn_t
		type main_menu
		key Return

		push xd_XmCascadeButton
		push xd_XmCascadeButton


	in ApplicationShell
 		push tree_da(cascade1,center)
		doubleclick nb_vn_t
		type procedure_cascade
		key Return

		push xd_XmPulldownMenu
		push xd_XmPushButton
		push xd_XmPushButton
		push xd_XmSeparator
		push xd_XmPushButton
		push tree_da(button6,center)
		doubleclick nb_vn_t
		type exit_button
		key Return


	in ApplicationShell
		push tree_da(cascade2,center)
		doubleclick nb_vn_t
		type help_cascade
		key Return

		push xd_XmPulldownMenu
		push xd_XmPushButton
		push tree_da(button7,center)
		doubleclick nb_vn_t
		type help_button
		key Return


	in ApplicationShell
		push tree_da(myDiag,center)
		push xd_XmForm
		push xd_XmFrame
		push xd_XmRadioBox
		push xd_XmToggleButton
		push xd_XmToggleButton
		push tree_da(form1,center)
		push xd_RowColumn
		push xd_XmLabel
		push xd_XmTextField
		push xd_XmLabel
		push xd_XmTextField
		push xd_XmLabel
		push xd_XmTextField
		push tree_da(form1,center)
		push xd_XmToggleButton
		push xd_XmToggleButton
		push xd_XmToggleButton


	in ApplicationShell
		push xd_XmDialogShell
		push xd_XmTemplate
		push xd_XmLabel
		push xd_XmPushButton
		doubleclick tree_da(label4,center)
		

	in label_dialog_popup
		doubleclick xd_xmstring_t
		type This is a "Help" screen.
		key Return
		type Are you finding
		key Return
		type it helpful?
		push apply_button
		push cancel_button

	in ApplicationShell
		doubleclick tree_da(button8,center)

	in label_dialog_popup
		doubleclick xd_xmstring_t
		type OK
		push apply_button
		push cancel_button

	in ApplicationShell
		push tree_da(shell2,center)
		doubleclick nb_vn_t
		type help_window
		key Return

		push vm_button

	in ApplicationShell
		push tree_da(help_window,center)

	in ApplicationShell
		push root_w(myFirstShell,center)

