!
! Motif
!
! Copyright (c) 1987-2012, The Open Group. All rights reserved.
!
! These libraries and programs are free software; you can
! redistribute them and/or modify them under the terms of the GNU
! Lesser General Public License as published by the Free Software
! Foundation; either version 2 of the License, or (at your option)
! any later version.
!
! These libraries and programs are distributed in the hope that
! they will be useful, but WITHOUT ANY WARRANTY; without even the
! implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
! PURPOSE. See the GNU Lesser General Public License for more
! details.
!
! You should have received a copy of the GNU Lesser General Public
! License along with these librararies and programs; if not, write
! to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
! Floor, Boston, MA 02110-1301 USA
!
!
! HISTORY
!
! $XConsortium: periodic.uil /main/8 1995/07/14 12:00:32 drk $
!*******************************************************************************
module sample
version = 'v1.1'
names = case_sensitive
objects = {
XmSeparator = gadget;
XmLabel = gadget;
XmPushButton = gadget;
XmToggleButton = gadget;
}
!include file 'XmAppl.uil';
procedure
create_callback(integer);
quit_button_activate();
foo_activate();
zippy_null();
value
!
! WIDGET DEF
!
K_scale_widget : 1;
K_drawnbutton_widget : 2;
K_togglebutton_widget : 3;
K_vtext1_widget : 4;
K_vtext2_widget : 5;
K_popup_menu_widget : 6;
!
! WIDGET LOCATIONS
!
fudge : 2;
dialog_fudge : 10;
heading_fudge_x : 40;
heading_fudge_y : 25;
!
! TEXT LOCATION FOR ADOBE FONTS
!
title_x : 270;
title_y : 25;
subtitle_x : title_x + 80;
subtitle_y : title_y + 30;
dont_panic_x : 7;
dont_panic_y : 17;
radioactive_x : 5;
radioactive_y : 635;
radioactive_height : 100;
radioactive_width : 210;
radioactive_title_x : radioactive_x;
radioactive_title_y : radioactive_y - 35;
! radioactive_x : 70;
! radioactive_y : 635;
! radioactive_height : 100;
! radioactive_width : 185;
! radioactive_title_x : radioactive_x - 60;
! radioactive_title_y : radioactive_y + 5;
!!
!! TEXT LOCATION FOR MIT FONTS
!!
! title_x : 200;
! title_y : 25;
! subtitle_x : title_x + 60;
! subtitle_y : title_y + 30;
! dont_panic_x : 7;
! dont_panic_y : 17;
! radioactive_x : 10;
! radioactive_y : 635;
! radioactive_height : 100;
! radioactive_width : 200;
! radioactive_title_x : radioactive_x;
! radioactive_title_y : radioactive_y - 35;
table_origin_x : 100;
table_origin_y : 95;
element_height : 100;
element_width : 100;
element_vert_sep : 10;
element_horiz_sep : 10;
centre_box_x : table_origin_x + (element_width * 2) + fudge;
centre_box_y : table_origin_y + (element_height * 2) + fudge;
centre_box_width : 380;
centre_box_height : 300 - fudge;
legend_x : centre_box_x + (centre_box_width/2) - 35;
legend_y : centre_box_y - 160;
!
! ADOBE FONTS
!
small_font :
font('6x12');
dialog_font :
font('-adobe-helvetica-bold-r-normal--12-*-*-*-*-*-*-*');
subtitle_font :
font('-adobe-new century schoolbook-bold-r-normal--14-*-*-*-*-*-*-*');
heading_font :
font('-adobe-new century schoolbook-bold-r-normal--14-*-*-*-*-*-*-*');
fixed_font :
font('fixed');
var_font :
font('variable');
hel_bold_font :
font('-adobe-helvetica-bold-r-normal--12-*-*-*-*-*-*-*');
hel_bold_font14 :
font('-adobe-helvetica-bold-r-normal--14-*-*-*-*-*-*-*');
newcenturyschlbk_roman14 :
font('-adobe-new century schoolbook-medium-r-normal--14-*-*-*-*-*-*-*');
newcenturyschlbk_roman12 :
font('-adobe-new century schoolbook-medium-r-normal--12-*-*-*-*-*-*-*');
newcenturyschlbk_bold14 :
font('-adobe-new century schoolbook-bold-r-normal--14-*-*-*-*-*-*-*');
newcenturyschlbk_bold24 :
font('-adobe-new century schoolbook-bold-r-normal--24-*-*-*-*-*-*-*');
times_bold_font :
font('-adobe-times-bold-r-normal--24-*-*-*-*-*-*-*');
!!
!! MIT FONTS
!!
! dialog_font : font('fixed');
! subtitle_font : font('vr-20');
! heading_font : font('vr-20');
! var_font : font('variable');
! hel_bold_font : font('variable');
! hel_bold_font14 : font('variable');
! newcenturyschlbk_roman14 : font('variable');
! newcenturyschlbk_roman12 : font('variable');
! newcenturyschlbk_bold14 : font('variable');
! newcenturyschlbk_bold24 : font('vbee-36');
! times_bold_font : font('vmic-25');
!
! COLORS and ICONS
!
value black : color('black',foreground);
value white : color('LightGray',background);
value motif_colors : color_table(black = 'x',white=' ');
value motif_icon : icon(color_table = motif_colors,
' ',
' ',
' ',
' ',
' ',
' ',
' x x x x x x x x x x x x x x x x x x x x x x ',
' x x x x x x x x x x x x x x x x x x x x ',
' x x x x',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x xxxxxxxxxxxxxxxxxx xx x x x x x x x x x x xx',
' x x x x',
' x xxxxxxxxxxxxxxxxxx x xxxxxxxxxxxxxxxxxx ',
' xxxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxxxxxx ',
' ',
' ',
' x x x x x x x x x x x x x x x x x x x x x x ',
' x x x x x x x x x x x x x x x x x x x x ',
' x x x x',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x x x x x x x xx x xxxxxxxxxxxxxxxxxx xx',
' x x x x',
' x xxxxxxxxxxxxxxxxxx x xxxxxxxxxxxxxxxxxx ',
' xxxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxxxxxx ',
' ');
value my_colors : color_table(black = 'o',white='.',white=' ');
value my_picture : icon(color_table = my_colors,
' ',
' ............................................ ',
' ..........oo....................oo.......... ',
' .........oooo..................oooo......... ',
' ........oooooo................oooooo........ ',
' .......oo....oo..............oo....oo....... ',
' ......oo......oo............oo......oo...... ',
' .....oo........oo..........oo........oo..... ',
' ....oo..........oo........oo..........oo.... ',
' ...oo............oo......oo............oo... ',
' ..oo..............oo....oo..............oo.. ',
' .oo................oo..oo................oo. ',
' oooooooooooooooooooooooooooooooooooooooooooo ',
' oooooooooooooooooooooooooooooooooooooooooooo ',
' .........oooo..................oooo......... ',
' .........oooo..................oooo......... ',
' .........oooo..................oooo......... ',
' .........oooo..................oooo......... ',
' .........oooo..................oooo......... ',
' ............................................ ',
' ............................................ ',
' ............................................ ',
' ............................................ ',
' ..................oooooooo.................. ',
' ..................oooooooo.................. ',
' ............................................ ',
' ............................................ ',
' ............................................ ',
' ...........oo..................oo........... ',
' ............oo................oo............ ',
' .............oooooooooooooooooo............. ',
' ..............oooooooooooooooo.............. ',
' ............................................ ',
' ............................................ ',
' ............................................ ',
' ');
list atomic_number_args : arguments {
XmNfontList = newcenturyschlbk_roman14;
XmNrightAttachment = XmATTACH_FORM;
XmNtopAttachment = XmATTACH_FORM;
XmNshadowThickness = 1;
};
list element_name_args : arguments {
XmNfontList = newcenturyschlbk_roman14;
XmNshadowThickness = 1;
XmNleftAttachment = XmATTACH_FORM;
XmNrightAttachment = XmATTACH_FORM;
XmNbottomAttachment = XmATTACH_FORM;
XmNalignment = XmALIGNMENT_CENTER;
};
list dialog_args : arguments {
XmNmarginWidth = 3;
XmNmarginHeight = 3;
XmNlabelFontList = dialog_font;
XmNtextFontList = newcenturyschlbk_roman12;
XmNshadowThickness = 1;
};
list menus_args : arguments {
XmNfontList = hel_bold_font;
};
!! Main
!
object
periodic_table_main : XmMainWindow {
arguments {
XmNx = 10;
XmNy = 10;
XmNwidth = 980;
XmNheight = 802;
XmNscrollingPolicy = XmAUTOMATIC;
};
controls {
XmMenuBar menu_bar_1;
XmBulletinBoard my_work_area;
! command command_1;
};
};
object
my_work_area : XmBulletinBoard {
arguments {
XmNborderWidth = 2;
XmNlabelFontList = hel_bold_font;
};
controls {
XmLabel title_1;
XmLabel title_2;
! label title_version;
XmLabel heading_0;
XmLabel heading_1;
XmLabel heading_2;
XmLabel heading_center;
XmLabel heading_3;
XmLabel heading_4;
XmLabel heading_legend;
XmLabel legend_arrow_1;
XmLabel legend_arrow_2;
XmLabel legend_arrow_3;
XmLabel legend_text_1;
XmLabel legend_text_2;
XmLabel legend_text_3;
XmFrame frame_legend;
XmFrame frame_11;
XmFrame frame_12;
XmFrame frame_13;
XmFrame frame_14;
XmFrame frame_15;
XmFrame frame_22;
XmFrame frame_23;
XmFrame frame_24;
XmFrame frame_25;
XmFrame frame_file_selection;
XmFrame frame_33;
XmFrame frame_34;
XmFrame frame_35;
XmFrame frame_42;
XmFrame frame_43;
XmFrame frame_44;
! frame frame_45;
XmFrame frame_dialog_1;
XmFrame frame_dialog_2;
XmFrame frame_dialog_3;
XmFrame frame_dialog_4;
XmFrame frame_dialog_5;
};
};
object
title_version: XmLabel {
arguments {
XmNx = 718;
XmNy = 62;
XmNfontList = newcenturyschlbk_roman12;
XmNlabelString = "V1.1";
};
};
object
title_1: XmLabel {
arguments {
XmNx = title_x;
XmNy = title_y;
XmNfontList = newcenturyschlbk_bold24;
XmNlabelString = "The Periodic Table of Motif Widgets";
};
};
object
title_2: XmLabel {
arguments {
XmNx = subtitle_x;
XmNy = subtitle_y;
XmNfontList = subtitle_font;
XmNlabelString = "Open Software Foundation, Inc. - August 1990";
};
};
object
heading_0: XmLabel {
arguments {
XmNx = radioactive_title_x;
XmNy = radioactive_title_y;
XmNfontList = newcenturyschlbk_roman14;
XmNlabelString = compound_string('*Dialog',separate=true)
& 'Boxes';
XmNalignment = XmALIGNMENT_END;
};
};
!! LEGEND
!
object
heading_legend: XmLabel {
arguments {
XmNx = legend_x - 55;
XmNy = legend_y + 15;
XmNfontList = newcenturyschlbk_bold14;
! label_string = "Legend";
XmNlabelString = compound_string('Key',separate=true) &
compound_string('To',separate=true)
& 'Chart';
XmNalignment = XmALIGNMENT_END;
};
};
object
legend_text_1: XmLabel {
arguments {
XmNx = legend_x + 118;
XmNy = legend_y + 3;
XmNfontList = newcenturyschlbk_roman12;
XmNlabelString = "Atomic Number";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
legend_text_2: XmLabel {
arguments {
XmNx = legend_x + 118;
XmNy = legend_y + 33;
XmNfontList = newcenturyschlbk_roman12;
XmNlabelString = "Actual Widget";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
legend_text_3: XmLabel {
arguments {
XmNx = legend_x + 118;
XmNy = legend_y + 73;
XmNfontList = newcenturyschlbk_roman12;
XmNlabelString = "Widget Name";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
legend_arrow_1 : XmLabel {
arguments {
XmNx = legend_x + 105;
XmNy = legend_y + 5;
XmNfontList = var_font;
XmNlabelString = "_";
};
};
object
legend_arrow_2 : XmLabel {
arguments {
XmNx = legend_x + 105;
XmNy = legend_y + 35;
XmNfontList = var_font;
XmNlabelString = "_";
};
};
object
legend_arrow_3 : XmLabel {
arguments {
XmNx = legend_x + 105;
XmNy = legend_y + 75;
XmNfontList = var_font;
XmNlabelString = "_";
};
};
object
frame_legend: XmFrame {
arguments {
XmNx = legend_x;
XmNy = legend_y;
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height - fudge;
};
controls {
XmSeparator separator_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '1';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'separator';
};
};
};
};
};
};
!! COLUMN ONE
!
object
heading_1: XmLabel {
arguments {
XmNx = table_origin_x + heading_fudge_x;
XmNy = table_origin_y - heading_fudge_y;
XmNfontList = heading_font;
XmNlabelString = "Ia";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
frame_11: XmFrame {
arguments {
XmNx = table_origin_x;
XmNy = table_origin_y;
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height - fudge;
};
controls {
XmSeparator separator_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '1';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'separator';
};
};
};
};
};
};
!%%%%%%%%%%
object
frame_12: XmFrame {
arguments {
XmNx = table_origin_x;
XmNy = table_origin_y + (element_height * 1);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmArrowButton arrow_button_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '2';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'arrow button';
};
};
};
};
};
};
!%%%%%%%%%%
object
frame_13: XmFrame {
arguments {
XmNx = table_origin_x;
XmNy = table_origin_y + (element_height * 2);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmPushButton push_button_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '3';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'pushbutton';
};
};
};
};
};
};
!%%%%%%%%%%
object
frame_14: XmFrame {
arguments {
XmNx = table_origin_x;
XmNy = table_origin_y + (element_height * 3);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmToggleButton toggle_button_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '4';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'togglebutton';
};
};
};
};
};
};
object
frame_15: XmFrame {
arguments {
XmNx = table_origin_x;
XmNy = table_origin_y + (element_height * 4);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmLabel label_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '5';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'label';
};
};
};
};
};
};
!! COLUMN TWO
!
object
heading_2: XmLabel {
arguments {
XmNx = table_origin_x + (element_width * 1) + heading_fudge_x;
XmNy = table_origin_y + (element_height * 1) - heading_fudge_y;
XmNfontList = heading_font;
XmNlabelString = "IIa";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
frame_22: XmFrame {
arguments {
XmNx = table_origin_x + (element_width * 1);
XmNy = table_origin_y + (element_height * 1);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmOptionMenu option_menu_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '6';
};
};
XmPushButton {
arguments {
XmNleftOffset = 2;
arguments element_name_args;
XmNlabelString = 'option menu';
};
};
};
};
};
};
object
frame_23: XmFrame {
arguments {
XmNx = table_origin_x + (element_width * 1);
XmNy = table_origin_y + (element_height * 2);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmScale scale_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '7';
};
};
XmPushButton {
arguments {
XmNleftOffset = 2;
arguments element_name_args;
XmNlabelString = 'scale';
};
};
};
};
};
};
object
frame_24: XmFrame {
arguments {
XmNx = table_origin_x + (element_width * 1);
XmNy = table_origin_y + (element_height * 3);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmRadioBox radio_box_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '8';
};
};
XmPushButton {
arguments {
XmNleftOffset = 2;
arguments element_name_args;
XmNlabelString = 'radio box';
};
};
};
};
};
};
object
frame_25: XmFrame {
arguments {
XmNx = table_origin_x + (element_width * 1);
XmNy = table_origin_y + (element_height * 4);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmText text_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '9';
};
};
XmPushButton {
arguments {
XmNleftOffset = 2;
arguments element_name_args;
XmNlabelString = 'text edit';
};
};
};
};
};
};
!! COLUMN THREE
!
object
heading_3: XmLabel {
arguments {
XmNx = centre_box_x + centre_box_width + heading_fudge_x - 5;
XmNy = table_origin_y + (element_height * 2) + fudge - heading_fudge_y;
XmNfontList = heading_font;
XmNlabelString = "IVa";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
frame_33: XmFrame {
arguments {
XmNx = centre_box_x + centre_box_width + fudge;
XmNy = table_origin_y + (element_height * 2) + fudge;
};
controls {
XmForm {
arguments {
XmNwidth = element_width - fudge;
XmNheight = element_height - fudge;
};
controls {
XmScrollBar scrollbar_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '11';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'scroll bar';
};
};
};
};
};
};
object
frame_34: XmFrame {
arguments {
XmNx = centre_box_x + centre_box_width + fudge;
XmNy = table_origin_y + (element_height * 3);
};
controls {
XmForm {
arguments {
XmNwidth = element_width - fudge;
XmNheight = element_height - fudge;
};
controls {
XmFrame {
arguments {
XmNx = 11;
XmNy = 12;
};
controls {
XmScrolledList list_box_1;
};
};
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '12';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'scrolled list';
};
};
};
};
};
};
object
frame_35: XmFrame {
arguments {
XmNx = centre_box_x + centre_box_width + fudge;
XmNy = table_origin_y + (element_height * 4);
};
controls {
XmForm {
arguments {
XmNwidth = element_width * 2;
XmNheight = element_height;
};
controls {
XmFrame {
arguments {
XmNx = 7;
XmNy = 0;
XmNwidth = 100;
};
controls {
XmPanedWindow paned_window_1;
};
};
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '16';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'paned window';
};
};
};
};
};
};
!! COLUMN FOUR
!
object
heading_4: XmLabel {
arguments {
XmNx = centre_box_x + centre_box_width + element_width + heading_fudge_x;
XmNy = table_origin_y + (element_height * 1) - heading_fudge_y;
XmNfontList = heading_font;
XmNlabelString = "Va";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
frame_42: XmFrame {
arguments {
XmNx = centre_box_x + centre_box_width + element_width + fudge;
XmNy = table_origin_y + (element_height * 1);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmFrame popup_menu_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '13';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'popup menu';
};
};
};
};
};
};
object
frame_43: XmFrame {
arguments {
XmNx = centre_box_x + centre_box_width + element_width + fudge;
XmNy = table_origin_y + (element_height * 2);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmFrame draw_area_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '14';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'drawing area';
};
};
};
};
};
};
object
frame_44: XmFrame {
arguments {
XmNx = centre_box_x + centre_box_width + element_width + fudge;
XmNy = table_origin_y + (element_height * 3);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmDrawnButton drawn_button_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '15';
};
};
XmPushButton {
arguments {
XmNbottomOffset = 2;
arguments element_name_args;
XmNlabelString = 'drawnbutton';
};
};
};
};
};
};
object
frame_45: XmFrame {
arguments {
XmNx = centre_box_x + centre_box_width + element_width + fudge;
XmNy = table_origin_y + (element_height * 4);
};
controls {
XmForm {
arguments {
XmNwidth = element_width;
XmNheight = element_height;
};
controls {
XmFrame {
arguments {
XmNx = 13;
XmNy = 23;
};
controls {
XmScrolledList list_box_1;
};
};
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '16';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'list box';
};
};
};
};
};
};
!! CENTRE FILE SELECTION
!
object
heading_center: XmLabel {
arguments {
XmNx = centre_box_x + (centre_box_width/2);
XmNy = centre_box_y - heading_fudge_y;
XmNfontList = heading_font;
XmNlabelString = "IIIb";
XmNalignment = XmALIGNMENT_CENTER;
};
};
object
frame_file_selection: XmFrame {
arguments {
XmNx = centre_box_x;
XmNy = centre_box_y;
XmNmarginWidth = 0;
XmNmarginHeight = 0;
};
controls {
XmForm {
arguments {
XmNwidth = centre_box_width;
XmNheight = centre_box_height;
XmNresizePolicy = XmRESIZE_NONE;
};
controls {
XmFrame file_selection_box_1;
XmLabel {
arguments {
arguments atomic_number_args;
XmNlabelString = '10';
};
};
XmPushButton {
arguments {
arguments element_name_args;
XmNlabelString = 'file selection*';
};
};
};
};
};
};
!! DIALOGS
!
object
frame_dialog_1: XmFrame {
arguments {
XmNx = radioactive_x;
XmNy = radioactive_y;
! shadow_thickness = 1;
};
controls {
XmMessageBox message_box_1;
};
};
object
frame_dialog_2: XmFrame {
arguments {
XmNx = radioactive_x + (radioactive_width * 1) - 5;
XmNy = radioactive_y;
! shadow_thickness = 3;
};
controls {
XmMessageBox message_box_2;
};
};
object
frame_dialog_3: XmFrame {
arguments {
XmNx = radioactive_x + (radioactive_width * 2) - 15;
XmNy = radioactive_y;
! shadow_thickness = 3;
};
controls {
XmMessageBox message_box_4;
};
};
object
frame_dialog_4: XmFrame {
arguments {
XmNx = radioactive_x + (radioactive_width * 3) - 25;
XmNy = radioactive_y;
! shadow_thickness = 3;
};
controls {
XmMessageBox message_box_5;
};
};
object
frame_dialog_5: XmFrame {
arguments {
XmNx = radioactive_x + (radioactive_width * 4) - 35;
XmNy = radioactive_y;
! shadow_thickness = 3;
};
controls {
XmMessageBox message_box_6;
};
};
object
open_dialog: XmQuestionDialog {
arguments {
arguments dialog_args;
XmNmessageString = compound_string('What are you',separate=true)
& 'looking in here for?';
};
};
!%% Display Widgets
!%%
object
separator_1 : XmSeparator {
arguments {
XmNwidth = 80;
XmNx = 10;
XmNy = 40;
XmNorientation = XmHORIZONTAL;
XmNshadowThickness = 4;
};
};
object
arrow_button_1 : XmArrowButton {
arguments {
XmNx = 25;
XmNy = 20;
XmNwidth = 50;
XmNheight = 50;
XmNarrowDirection = XmARROW_UP;
};
};
object
toggle_button_1 : XmToggleButton {
arguments {
XmNx = 20;
XmNy = 30;
XmNfontList = hel_bold_font;
XmNlabelString = 'Lights';
XmNshadowThickness = 1;
};
callbacks {
MrmNcreateCallback = procedure create_callback (K_togglebutton_widget);
};
};
object
push_button_1 : XmPushButton {
arguments {
XmNx = 22;
XmNy = 25;
XmNfontList = hel_bold_font;
XmNlabelString = compound_string('Explode',separate=true) & 'Building';
! shadow_thickness = 1;
};
};
object
drawn_button_1 : XmDrawnButton {
arguments {
XmNx = 15;
XmNy = 10;
XmNmarginWidth = 0;
XmNmarginHeight = 0;
XmNwidth = 62;
XmNheight = 62;
! XmNshadowThickness = 2;
XmNbackgroundPixmap = motif_icon;
XmNpushButtonEnabled = true;
};
callbacks {
XmNactivateCallback = procedure foo_activate ();
MrmNcreateCallback = procedure create_callback (K_drawnbutton_widget);
};
};
object
label_1 : XmLabel {
arguments {
XmNx = dont_panic_x;
XmNy = dont_panic_y;
XmNfontList = times_bold_font;
XmNlabelString = compound_string("DON'T",separate=true) & "PANIC";
};
};
object
scrollbar_1 : XmScrollBar {
arguments {
XmNx = 10;
XmNy = 30;
XmNwidth = 75;
XmNorientation = XmHORIZONTAL;
XmNvalue = 20;
};
};
object text_1 : XmText {
arguments {
XmNx = 15;
XmNy = 25;
! width = 70;
! height = 40;
XmNcolumns = 10;
XmNrows = 2;
XmNvalue = 'helloworld';
XmNresizeWidth = false;
XmNresizeHeight = false;
XmNeditMode = XmMULTI_LINE_EDIT;
! XmNscrollVertical = true;
! scroll_horizontal = false;
};
};
object
draw_area_1 : XmFrame {
arguments {
XmNx = 20;
XmNy = 20;
XmNwidth = 75;
XmNheight = 45;
XmNshadowThickness = 2;
};
controls {
XmLabel {
arguments {
XmNmarginWidth = 2;
XmNmarginHeight = 2;
XmNlabelType = XmPIXMAP;
XmNlabelPixmap = my_picture;
! label_string = compound_string('Insert Picture',separate=true) & '->Here<-';
};
};
};
};
object
popup_menu_1 : XmFrame {
arguments {
XmNx = 5;
XmNy = 25;
! width = 50;
! height = 70;
XmNshadowThickness = 2;
};
controls {
XmLabel {
arguments {
XmNfontList = fixed_font;
XmNlabelString = compound_string('Press MB3 for',separate=true) & 'Popup Menu';
};
};
};
callbacks {
MrmNcreateCallback = procedure create_callback (K_popup_menu_widget);
};
};
object
paned_window_1 : XmPanedWindow {
arguments {
! x = 10;
! y = 5;
! width = 150;
};
controls {
XmText paned_text_1;
XmText paned_text_2;
};
};
object
paned_text_1 : XmText {
arguments {
! x = 15;
! y = 25;
! width = 70;
! height = 40;
! XmNfontList = small_font;
XmNcolumns = 24;
XmNrows = 1;
XmNvalue = 'OPEN Software Foundation';
XmNresizeWidth = false;
XmNresizeHeight = false;
XmNeditMode = XmMULTI_LINE_EDIT;
! XmNscrollVertical = true;
! scroll_horizontal = false;
};
callbacks {
MrmNcreateCallback = procedure create_callback (K_vtext1_widget);
};
};
object
paned_text_2 : XmText {
arguments {
! x = 15;
! y = 25;
! width = 70;
! height = 40;
! XmNfontList = small_font;
XmNcolumns = 24;
XmNrows = 1;
XmNvalue = 'Motif Version 1.1';
XmNresizeWidth = false;
XmNresizeHeight = false;
XmNeditMode = XmMULTI_LINE_EDIT;
! XmNscrollVertical = true;
! scroll_horizontal = false;
};
callbacks {
MrmNcreateCallback = procedure create_callback (K_vtext2_widget);
};
};
!%% Container Widgets
!%%
object
scale_1 : XmScale {
arguments {
XmNx = 3;
XmNy = 25;
XmNwidth = 95;
! XmNheight = 50;
XmNfontList = hel_bold_font;
XmNborderWidth = 0;
XmNvalue = 42;
XmNmaximum = 42;
XmNminimum = 0;
XmNshowValue = true;
XmNorientation = XmHORIZONTAL;
XmNprocessingDirection = XmMAX_ON_RIGHT;
};
callbacks {
MrmNcreateCallback = procedure create_callback (K_scale_widget);
};
};
object
radio_box_1 : XmRadioBox {
arguments {
XmNx = 20;
XmNy = 8;
XmNspacing = 2;
XmNmarginHeight = 0;
XmNmarginWidth = 0;
};
controls {
XmToggleButton radio_button_1;
XmToggleButton radio_button_2;
XmToggleButton radio_button_3;
};
};
radio_button_1 : XmToggleButton {
arguments {
XmNmarginHeight = 0;
XmNmarginWidth = 0;
XmNfontList = newcenturyschlbk_roman12;
XmNlabelString = 'WFNX';
XmNset = true;
};
};
radio_button_2 : XmToggleButton {
arguments {
XmNmarginHeight = 0;
XmNmarginWidth = 0;
XmNfontList = newcenturyschlbk_roman12;
XmNlabelString = 'WCRB';
};
};
radio_button_3 : XmToggleButton {
arguments {
XmNmarginHeight = 0;
XmNmarginWidth = 0;
XmNfontList = newcenturyschlbk_roman12;
XmNlabelString = 'WHKY';
};
};
!%% Dialog Widgets
!%%
object
message_box_1 : XmMessageBox {
arguments {
arguments dialog_args;
XmNmessageString = compound_string('Swap Error...',separate=true)
& 'You Lose Your Mind.';
XmNdialogType = XmDIALOG_ERROR;
};
};
object
message_box_2 : XmMessageBox {
arguments {
arguments dialog_args;
XmNmessageString = compound_string('Information is',separate=true)
& 'Power.';
XmNdialogType = XmDIALOG_INFORMATION;
};
};
object
message_box_3 : XmMessageBox {
arguments {
arguments dialog_args;
XmNmessageString = compound_string('Swedish',separate=true)
& 'Massage';
XmNdialogType = XmDIALOG_MESSAGE;
};
};
object
message_box_4 : XmMessageBox {
arguments {
arguments dialog_args;
XmNmessageString = compound_string('Question authority...',separate=true)
& 'But raise your hand first.';
XmNdialogType = XmDIALOG_QUESTION;
};
};
object
message_box_5 : XmMessageBox {
arguments {
arguments dialog_args;
XmNmessageString = compound_string('Warning, Warning,',separate=true)
& 'Danger Dr. Smith...';
XmNdialogType = XmDIALOG_WARNING;
};
};
object
message_box_6 : XmMessageBox {
arguments {
arguments dialog_args;
XmNmessageString = compound_string('Work in Progress',separate=true)
& 'Meditating.....';
XmNdialogType = XmDIALOG_WORKING;
};
};
object
command_1 : XmCommand {
arguments {
XmNwidth = 150;
XmNheight = 80;
XmNhistoryVisibleItemCount = 1;
! resize_policy = 1;
};
};
!object
! selection_box_1 : selection_dialog {
! arguments {
! style = 0;
!! resizable = true;
!! default_position = true;
! };
! };
object
file_selection_box_1 : XmFrame {
arguments {
XmNx = 25;
XmNy = 1;
};
controls {
XmFileSelectionBox {
arguments {
XmNwidth = 320;
XmNresizePolicy = XmRESIZE_NONE;
XmNlistVisibleItemCount = 2;
XmNlabelFontList = hel_bold_font;
! text_font_list = hel_bold_font;
! style = XmDIALOG_MODELESS;
! XmNresizable = false;
! default_position = true;
};
};
};
};
!%% Menu Widgets
!%%
object
option_menu_1 : XmOptionMenu {
arguments {
XmNx = -2;
XmNy = 30;
XmNlabelString = 'RGB:';
XmNshadowThickness = 1;
! top_attachment = XmATTACH_FORM;
! left_attachment = XmATTACH_FORM;
XmNmenuHistory = XmPushButton option_button_1;
};
controls {
XmPulldownMenu options_pulldown;
};
};
object
options_pulldown : XmPulldownMenu {
controls {
XmPushButton option_button_1;
XmPushButton option_button_2;
XmPushButton option_button_3;
};
};
object
option_button_1 : XmPushButton {
arguments {
XmNfontList = fixed_font;
XmNlabelString = 'bleu';
};
};
object
option_button_2 : XmPushButton {
arguments {
XmNfontList = fixed_font;
XmNlabelString = 'green';
};
};
object
option_button_3 : XmPushButton {
arguments {
XmNfontList = fixed_font;
XmNlabelString = 'red';
};
};
object list_box_1 : XmScrolledList {
arguments {
XmNitems = string_table("Foobar","Mumble","Lambda","Coke");
XmNitemCount = 4;
XmNvisibleItemCount = 3;
};
};
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
object
menu_bar_1 : XmMenuBar {
arguments {
! translations = translation_table ('<Btn1Up> : zippy_null()');
XmNmenuHelpWidget = XmCascadeButton Help;
};
controls {
XmCascadeButton File;
XmCascadeButton Edit;
XmCascadeButton Help;
};
};
object
File : XmCascadeButton {
arguments {
arguments menus_args;
};
controls {
XmPulldownMenu sample_pulldown_1;
};
};
object
Edit : XmCascadeButton {
arguments {
arguments menus_args;
};
controls {
XmPulldownMenu sample_pulldown_2;
};
};
object
Help : XmCascadeButton {
arguments {
arguments menus_args;
};
controls {
XmPulldownMenu sample_pulldown_3;
};
};
object
sample_pulldown_1 : XmPulldownMenu {
controls {
XmPushButton sample_push_button_1;
XmPushButton sample_push_button_2;
XmCascadeButton About;
XmSeparator {};
XmPushButton Quit;
};
};
object
sample_pulldown_2 : XmPulldownMenu {
controls {
XmPushButton s_push_button_1;
XmPushButton s_push_button_2;
XmPushButton s_push_button_3;
XmCascadeButton morestuff;
};
};
object
sample_pulldown_3 : XmPulldownMenu {
controls {
XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Overview...';
};
};
XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Bindings...';
};
};
XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Tutorial...';
};
};
};
};
object
About : XmCascadeButton {
arguments {
arguments menus_args;
};
controls {
XmPulldownMenu About_1;
};
};
object
morestuff : XmCascadeButton {
arguments {
arguments menus_args;
};
controls {
XmPulldownMenu pulldown_2;
};
};
object
About_1 : XmPulldownMenu {
controls {
XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Motif Periodic Table v1.1';
};
};
XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Created by Michael K. Yee';
};
};
XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = ' [August 1990]';
};
};
};
};
object
pulldown_2 : XmPulldownMenu {
controls {
XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = compound_string('THANKS FOR',separate=true)
& 'ALL THE FISH.';
};
};
};
};
object
sample_push_button_1 : XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'New';
};
};
object
sample_push_button_2 : XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Open Software ...';
};
controls {
! question_dialog open_dialog;
};
};
object
s_push_button_1 : XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Cut';
};
};
object
s_push_button_2 : XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Copy';
};
};
object
s_push_button_3 : XmPushButton {
arguments {
arguments menus_args;
XmNlabelString = 'Paste';
};
};
object
Quit : XmPushButton {
arguments {
arguments menus_args;
! x = 10;
! y = 200;
};
callbacks {
XmNactivateCallback = procedure quit_button_activate();
};
};
end module;