#Load in previous chapter, chapter4_2

	in ApplicationShell
		push file_menu
		push fm_menu.fm_open

	in open_dialog_popup
		doubleclick Text
		type ./ch4_2_45.xd
		push open_dialog.OK



	in ApplicationShell
		push tree_da(toggle5,center)
		push wm_prim

	in core_dialog_popup
		option options_b::display_b

	in core_dialog_popup
		push prim_fgcolour_b

	in coloursel_dialog_popup
		push colour_list('Red',1)
		push apply_button

	in coloursel_dialog_popup
		push apply_button
		push cancel_button

	in core_dialog_popup
		push apply_button
		push cancel_button

	in ApplicationShell
		push tree_da(toggle5,center)
		push wm_prim

	in core_dialog_popup
		push prim_bgcolour_b

	in coloursel_dialog_popup
		push colour_list('Snow',1)
		doubleclick colour_object_t
		type background
		push bind_b
		push apply_button
		push cancel_button

	in core_dialog_popup
		push apply_button
		push cancel_button


	in ApplicationShell
		push tree_da(toggle3,center)
		push wm_prim

	in core_dialog_popup
		doubleclick prim_bc_t
		type <background>
		push apply_button
		push cancel_button

	in ApplicationShell
		push tree_da(toggle4,center)
		push wm_prim

	in core_dialog_popup
		doubleclick prim_bc_t
		type <background>
		push apply_button
		push cancel_button

	in ApplicationShell
		doubleclick tree_da(toggle1,center)

	in label_dialog_popup
		push font_b

	in fontsel_dialog_popup
		push family_cb
		push family_menu.button#14
		push weight_cb
		push weight_menu.button#3
		push slant_cb
		push slant_menu.button#4
		push ptsize_cb
		push ptsize_menu.button#13
		push resx_cb
		push resx_menu.button#5
		push apply_button
		push cancel_button

	in label_dialog_popup
		push apply_button
		push cancel_button

	in ApplicationShell
		doubleclick tree_da(toggle2,center)

	in label_dialog_popup
		push font_b

	in fontsel_dialog_popup
		push ptsize_cb
		push ptsize_menu.button#9
		push apply_button
		push cancel_button

	in label_dialog_popup
		push apply_button
		push font_b

	in fontsel_dialog_popup
		push fs_all_fonts
		push widget18.non_scale_tog
		push widget18.scale_tog

	in ApplicationShell
		push tree_da(toggle3,center)

	in fontsel_dialog_popup
		push font_list('-linotype-new century schoolbook-medium-i-normal--0-0-72-72-p-0-iso8859-1',1)
		push ptsize_cb
		push ptsize_menu.button#21
		push sample_b
		push widget18.scale_tog
		push widget18.non_scale_tog
		push family_cb
		push family_menu.button#14
		push weight_cb
		push weight_menu.button#3
		push slant_cb
		push slant_menu.button#4
		push ptsize_cb
		push ptsize_menu.button#11
		doubleclick font_object_t
		type option_labels
		push bind_b

	in ApplicationShell
		push tree_da(toggle4,center) with shift-button1

		push tree_da(toggle5,center) with shift-button1

		push tree_da(label1,center) with shift-button1

		push tree_da(label2,center) with shift-button1

		push tree_da(label3,center) with shift-button1


	in fontsel_dialog_popup
		push apply_button

	in fontsel_dialog_popup
		push cancel_button

	in label_dialog_popup
		push apply_button

	in label_dialog_popup
		push cancel_button

	in ApplicationShell
		doubleclick tree_da(button1,center)


	in label_dialog_popup
		push options_b.OptionButton
		push display_b
		push label_pixmap_b

	in pixmap_sel_dialog_popup
		push bitmap_list('background',1)
		push apply_button

	in pixmap_sel_dialog_popup
		push pix_edit_b

	in MBitmap
		push file_cascade

	in popup_rowcol1
		push readButton

	in xpm_fsb_shell
		doubleclick Text
		type ./cone.xpm
		push fsb.OK

	in MBitmap
		push pixmap_name
		type cone
		push bind_b
		push file_cascade

	in popup_rowcol1
		push closeWinButton

	in pixmap_sel_dialog_popup
		push apply_button
		push cancel_button

	in label_dialog_popup
		push apply_button
		push options_b.OptionButton

	in popup_XmMenu
		push settings_b

	in label_dialog_popup
		push lbl_type.OptionButton

	in popup_lbl_typemenu
		push lbl_type_pixmap

	in label_dialog_popup
		push apply_button
		push cancel_button

	in ApplicationShell
		doubleclick tree_da(button2,center)


	in label_dialog_popup
		push options_b.OptionButton
		push display_b
		push label_pixmap_b

	in pixmap_sel_dialog_popup
		push bitmap_list('background',1)
		push apply_button

	in pixmap_sel_dialog_popup
		push pix_edit_b

	in MBitmap
		push file_cascade

	in popup_rowcol1
		push readButton

	in xpm_fsb_shell
		doubleclick Text
		type ./dish.xpm
		push fsb.OK

	in MBitmap
		push pixmap_name
		type dish
		push bind_b
		push file_cascade

	in popup_rowcol1
		push closeWinButton

	in pixmap_sel_dialog_popup
		push apply_button
		push cancel_button

	in label_dialog_popup
		push apply_button
		push options_b.OptionButton

	in popup_XmMenu
		push settings_b

	in label_dialog_popup
		push lbl_type.OptionButton

	in popup_lbl_typemenu
		push lbl_type_pixmap

	in label_dialog_popup
		push apply_button
		push cancel_button
