|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T U m
Length: 10855 (0x2a67)
Types: TextFile
Notes: UNIX file
Names: »mre_font.uil«
└─⟦a85bd4a7c⟧ Bits:30004636/disk2.imd INTERACTIVE Motif Environment Development System
└─⟦a85bd4a7c⟧ UNIX Filesystem
└─⟦this⟧ »xt/new/usr/lib/X11/examples/mre/mre_font.uil«
!OSF/Motif: @(#)mre_font.uil 1.1 - 89/08/30 - 12:01:09
!++
! Motif Demo Resource Editor -- font selection uil file
! included by mre.uil
!
! Created June 89 Mitch Trachtenberg
!
!--
value horizontal_offset : 100;
value vertical_offset : 100;
! These values are used in UIL file calculations to determine
! placement of various subwidgets within the form.
value num_radio_columns : 4;
value num_upper_pushbuttons : 3;
! This string is read by XmGetLiteral and placed in the text widget
! which displays the current font.
value one_font_string : exported 'This is the current font...';
! To allow making tab groups out of the radio boxes, our C program
! must be able to retrieve the widget id's of each radio box;
! we provide for this by making a literal string representing
! the path template available to the program.
value path_to_radiobox: exported 'font_toggle_box.rc%d.font_rb%d';
value spec_components: exported asciz_table('nomatch',
'r','i','o','ri','*',
'medium','bold','demi','book',
'Times','Helvetica','*Avant Garde*',
'10','12','14','18');
object
font_dialog : XmFormDialog {
arguments {
XmNdialogTitle = 'Font Selection';
XmNdialogStyle = XmDIALOG_MODELESS;
XmNdefaultPosition = false;
XmNunitType = Xm100TH_FONT_UNITS;
XmNx = stagger_x;
XmNy = stagger_y;
XmNwidth = 6000;
XmNheight = 8200;
XmNautoUnmanage = false;
XmNresizable = true;
};
controls {
XmForm font_toggle_box;
XmPushButton font_filter_button;
XmPushButton font_display_one_button;
XmPushButton font_display_button;
XmLabel font_spec_label;
XmText font_spec_mask;
XmSelectionBox font_selection_box;
};
};
object font_toggle_box : XmForm {
arguments {
XmNleftAttachment = XmATTACH_FORM;
XmNrightAttachment = XmATTACH_FORM;
XmNleftOffset = horizontal_offset;
XmNrightOffset = horizontal_offset;
};
controls {
XmRowColumn rc1;
XmRowColumn rc2;
XmRowColumn rc3;
XmRowColumn rc4;
};
};
object rc1 : XmRowColumn {
arguments {
XmNleftAttachment = XmATTACH_POSITION;
XmNleftPosition = 0 * 100 / num_radio_columns;
XmNrightAttachment = XmATTACH_POSITION;
XmNrightPosition = 1 * 100 / num_radio_columns;
XmNuserData = 4; /* FONT_SLANT in C code */
};
controls {
XmLabel font_italics_label;
XmSeparator {};
XmRadioBox font_rb1;
};
};
object rc2: XmRowColumn {
arguments {
XmNleftAttachment = XmATTACH_POSITION;
XmNleftPosition = 1 * 100 / num_radio_columns;
XmNrightAttachment = XmATTACH_POSITION;
XmNrightPosition = 2 * 100 / num_radio_columns;
XmNuserData = 3; /* FONT_WEIGHT in C code */
};
controls {
XmLabel font_weight_label;
XmSeparator {};
XmRadioBox font_rb2;
};
};
object rc3: XmRowColumn {
arguments {
XmNleftAttachment = XmATTACH_POSITION;
XmNleftPosition = 2 * 100 / num_radio_columns;
XmNrightAttachment = XmATTACH_POSITION;
XmNrightPosition = 3 * 100 / num_radio_columns;
XmNuserData = 2; /* FONT_FAMILY in C code */
};
controls {
XmLabel font_family_label;
XmSeparator {};
XmRadioBox font_rb3;
};
};
object rc4: XmRowColumn {
arguments {
XmNleftAttachment = XmATTACH_POSITION;
XmNleftPosition = 3 * 100 / num_radio_columns;
XmNrightAttachment = XmATTACH_POSITION;
XmNrightPosition = 4 * 100 / num_radio_columns;
XmNuserData = 7; /* FONT_POINTSIZE in C code */
};
controls {
XmLabel font_point_size_label;
XmSeparator {};
XmRadioBox font_rb4;
};
};
object font_weight_label: XmLabel {
arguments {
XmNlabelString = compound_string('Weight');
};
};
object font_italics_label: XmLabel {
arguments {
XmNlabelString = compound_string('Italics');
};
};
object font_point_size_label: XmLabel {
arguments {
XmNlabelString = compound_string('Point Size');
};
};
object font_family_label: XmLabel {
arguments {
XmNlabelString = compound_string('Family');
};
};
object font_rb1 : XmRadioBox {
arguments {
XmNisHomogeneous = false;
XmNpacking = XmPACK_TIGHT;
};
controls {
XmToggleButton {
arguments {
XmNlabelString = dont_care_string;
XmNuserData = 5;
};
callbacks {
XmNvalueChangedCallback = procedure restrict_slant('*');
};
};
XmToggleButton {
arguments {
XmNlabelString = normal_string;
XmNuserData = 1;
};
callbacks {
XmNvalueChangedCallback = procedure restrict_slant('r');
};
};
XmToggleButton {
arguments {
XmNlabelString = oblique_string;
XmNuserData = 3;
};
callbacks {
XmNvalueChangedCallback = procedure restrict_slant('o');
};
};
XmToggleButton {
arguments {
XmNlabelString = italic_string;
XmNuserData = 2;
};
callbacks {
XmNvalueChangedCallback = procedure restrict_slant('i');
};
};
XmToggleButton {
arguments {
XmNlabelString = reverse_italic_string;
XmNuserData = 4;
};
callbacks {
XmNvalueChangedCallback = procedure restrict_slant('ri');
};
};
};
};
object font_rb2 : XmRadioBox {
arguments {
XmNisHomogeneous = false;
};
controls {
XmToggleButton {
arguments {
XmNlabelString = dont_care_string;
XmNuserData = 5;
};
callbacks {
XmNvalueChangedCallback = procedure restrict_weight('*');
};
};
XmToggleButton {
arguments {
XmNlabelString = normal_string;
XmNuserData = 6;
};
callbacks {
XmNvalueChangedCallback = procedure
restrict_weight('medium');
};
};
XmToggleButton {
arguments {
XmNlabelString = bold_string;
XmNuserData = 7;
};
callbacks {
XmNvalueChangedCallback = procedure
restrict_weight('bold');
};
};
XmToggleButton {
arguments {
XmNlabelString = demi_string;
XmNuserData = 8;
};
callbacks {
XmNvalueChangedCallback = procedure
restrict_weight('demi');
};
};
XmToggleButton {
arguments {
XmNlabelString = book_string;
XmNuserData = 9;
};
callbacks {
XmNvalueChangedCallback = procedure
restrict_weight('book');
};
};
};
};
object font_rb3 : XmRadioBox {
arguments {
XmNisHomogeneous = false;
};
controls {
XmToggleButton {
arguments {
XmNlabelString = dont_care_string;
XmNuserData = 5;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_family('*');
};
};
XmToggleButton {
arguments {
XmNlabelString = times_string;
XmNuserData = 10;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_family('Times');
};
};
XmToggleButton {
arguments {
XmNlabelString = helvetica_string;
XmNuserData = 11;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_family('Helvetica');
};
};
XmToggleButton {
arguments {
XmNlabelString = avant_garde_string;
XmNuserData = 12;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_family('*Avant Garde*');
};
};
};
};
object font_rb4 : XmRadioBox {
arguments {
XmNisHomogeneous = false;
};
controls {
XmToggleButton {
arguments {
XmNlabelString = dont_care_string;
XmNuserData = 5;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_point_size('*');
};
};
XmToggleButton {
arguments {
XmNlabelString = point_string_10;
XmNuserData = 13;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_point_size('10');
};
};
XmToggleButton {
arguments {
XmNlabelString = point_string_12;
XmNuserData = 14;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_point_size('12');
};
};
XmToggleButton {
arguments {
XmNlabelString = point_string_14;
XmNuserData = 15;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_point_size('14');
};
};
XmToggleButton {
arguments {
XmNlabelString = point_string_18;
XmNuserData = 16;
};
callbacks {
XmNvalueChangedCallback =
procedure restrict_point_size('18');
};
};
};
};
object font_spec_label: XmLabel {
arguments {
XmNtopAttachment = XmATTACH_WIDGET;
XmNtopWidget = XmForm font_toggle_box;
XmNtopOffset = vertical_offset;
XmNleftAttachment = XmATTACH_FORM;
XmNleftOffset = horizontal_offset;
XmNlabelString = compound_string('Current selection criteria:');
};
};
object font_spec_mask : XmText {
arguments {
XmNtopAttachment = XmATTACH_WIDGET;
XmNtopWidget = XmLabel font_spec_label;
XmNleftAttachment = XmATTACH_FORM;
XmNleftOffset = horizontal_offset;
XmNrightAttachment = XmATTACH_FORM;
XmNrightOffset = horizontal_offset;
};
};
object font_filter_button : XmPushButton {
arguments {
XmNtopAttachment = XmATTACH_WIDGET;
XmNtopWidget = XmText font_spec_mask;
XmNtopOffset = vertical_offset;
XmNleftAttachment = XmATTACH_POSITION;
XmNleftOffset = horizontal_offset;
XmNleftPosition = 0 * 100 / num_upper_pushbuttons;
XmNlabelString = compound_string('Filter',separate=true) &
compound_string('to criteria',separate=true);
XmNmnemonic = 70; /* F */
};
callbacks {
XmNactivateCallback = procedure font_refilter();
};
};
object font_display_button : XmPushButton {
arguments {
XmNtopAttachment = XmATTACH_WIDGET;
XmNtopWidget = XmText font_spec_mask;
XmNtopOffset = vertical_offset;
XmNleftAttachment = XmATTACH_POSITION;
XmNleftOffset = horizontal_offset;
XmNleftPosition = 1 * 100 / num_upper_pushbuttons;
XmNlabelString = compound_string('Display',separate=true) &
compound_string('all matches',separate=true);
XmNmnemonic = 65; /* A */
};
callbacks {
XmNactivateCallback = procedure display_fonts_from_list();
};
};
object font_display_one_button : XmPushButton {
arguments {
XmNtopAttachment = XmATTACH_WIDGET;
XmNtopWidget = XmText font_spec_mask;
XmNtopOffset = vertical_offset;
XmNleftAttachment = XmATTACH_POSITION;
XmNleftOffset = horizontal_offset;
XmNleftPosition = 2 * 100 / num_upper_pushbuttons;
XmNlabelString = compound_string('Display',separate=true) &
compound_string('selection',separate=true);
XmNmnemonic = 83; /* S */
};
callbacks {
XmNactivateCallback = procedure display_one_font();
};
};
object font_selection_box : XmSelectionBox {
arguments {
XmNtopAttachment = XmATTACH_WIDGET;
XmNtopWidget = XmPushButton font_filter_button;
XmNtopOffset = vertical_offset;
XmNdialogStyle = XmDIALOG_WORK_AREA;
XmNbottomAttachment = XmATTACH_FORM;
XmNleftAttachment = XmATTACH_FORM;
XmNrightAttachment = XmATTACH_FORM;
XmNlistLabelString =
compound_string('Fonts matching criteria:');
};
callbacks {
XmNcreateCallback = procedure font_selection_box_map();
XmNokCallback = procedure ok_button_pressed('F');
XmNcancelCallback = procedure cancel_button_pressed('F');
XmNhelpCallback = procedure help_proc('Fonts');
};
};