DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: ┃ G T

⟦16ce3b6fd⟧ TextFile

    Length: 130012 (0x1fbdc)
    Types: TextFile
    Names: »GUI_FM«

Derivation

└─⟦149519bd4⟧ Bits:30000546 8mm tape, Rational 1000, !projects 93-07-13
    └─ ⟦124ff5788⟧ »DATA« 
        └─⟦this⟧ 
└─⟦a7d1ea751⟧ Bits:30000550 8mm tape, Rational 1000, !users!projects 94_04_11
    └─ ⟦129cab021⟧ »DATA« 
        └─⟦this⟧ 
└─⟦f64eaa120⟧ Bits:30000752 8mm tape, Rational 1000, !projects 93 02 16
    └─ ⟦6f12a12be⟧ »DATA« 
        └─⟦this⟧ 
└─⟦2f6cfab89⟧ Bits:30000547 8mm tape, Rational 1000, !projects 94-01-04
    └─ ⟦d65440be7⟧ »DATA« 
        └─⟦this⟧ 

TextFile

widget ApplicationShell {
    flag {
        mapped
    }
    resources {
        x = 265
        y = 244
        width = 510
        height = 648
        title = Z80 emulator
        background = gray80
    }
    children {
        widget XmMainWindow {
            flag {
                mapped
            }
            resources {
                x = 0
                y = 0
                width = 510
                height = 648
                background = gray80
            }
            children {
                widget XmRowColumn {
                    flag {
                        mapped
                        menu_bar
                    }
                    resources {
                        x = 0
                        y = 0
                        width = 510
                        height = 32
                        background = gray80
                    }
                    children {
                        widget XmRowColumn {
                            flag {
                                mapped
                                menu_pulldown
                            }
                            resources {
                                x = 0
                                y = 0
                                width = 49
                                height = 56
                                background = gray80
                            }
                            children {
                                widget XmPushButton {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 5
                                        y = 5
                                        width = 39
                                        height = 22
                                        fontList = *helvetica-bold-r-*-12-*
                                        activateCallback = Show (root.FileOpen);
                                        background = gray80
                                    }
                                } Open
                                widget XmSeparator {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 5
                                        y = 27
                                        width = 39
                                        height = 2
                                        background = gray80
                                    }
                                } XmSeparator0
                                widget XmPushButton {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 5
                                        y = 29
                                        width = 39
                                        height = 22
                                        fontList = *helvetica-bold-r-*-12-*
                                        activateCallback = QuitActivate ();
                                        background = gray80
                                    }
                                } Quit
                            }
                        } FilePD
                        widget XmCascadeButton {
                            flag {
                                mapped
                            }
                            resources {
                                x = 5
                                y = 5
                                width = 36
                                height = 22
                                subMenuId = parent.FilePD
                                fontList = *helvetica-bold-r-*-12-*
                                background = gray80
                            }
                        } File
                        widget XmRowColumn {
                            flag {
                                mapped
                                menu_pulldown
                            }
                            resources {
                                x = 0
                                y = 0
                                width = 85
                                height = 32
                                background = gray80
                            }
                            children {
                                widget XmToggleButton {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 5
                                        y = 5
                                        width = 75
                                        height = 22
                                        valueChangedCallback = local on;\
if (on) {\
   Hide (root.Memory);\
   on = !on;\
} else {\
   Show (root.Memory);\
   on = !on;\
} 
                                        background = gray80
                                        fontList = *helvetica-bold-r-*-12-*
                                    }
                                } Memory
                            }
                        } ToolsPD
                        widget XmCascadeButton {
                            flag {
                                mapped
                            }
                            resources {
                                x = 41
                                y = 5
                                width = 48
                                height = 22
                                subMenuId = parent.ToolsPD
                                background = gray80
                                fontList = *helvetica-bold-r-*-12-*
                            }
                        } Tools
                    }
                } MB
                widget XmBulletinBoard {
                    flag {
                        mapped
                    }
                    resources {
                        x = 0
                        y = 32
                        width = 510
                        height = 616
                        background = gray80
                    }
                    children {
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                                x = 25
                                y = 75
                                width = 101
                                height = 279
                                background = gray80
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 2
                                        y = 2
                                        width = 97
                                        height = 275
                                        background = gray80
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 15
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = A
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 25
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 25
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        borderWidth = 0
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 25
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } A
                                            }
                                        } Register_2
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 15
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = F
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 25
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 25
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 25
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } F
                                            }
                                        } Register_3
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 80
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = B
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } B
                                            }
                                        } Register_4
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 80
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = C
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } C
                                            }
                                        } Register_5
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 145
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = D
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } D
                                            }
                                        } Register_6
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 145
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = E
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } E
                                            }
                                        } Register_7
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 210
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = H
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } H
                                            }
                                        } Register_8
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 210
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = L
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } L
                                            }
                                        } Register_9
                                    }
                                } Form
                            }
                        } Frame
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                                x = 150
                                y = 75
                                width = 101
                                height = 279
                                background = gray80
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 2
                                        y = 2
                                        width = 97
                                        height = 275
                                        background = gray80
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 15
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = AP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 25
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 25
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 25
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = A'
                                                        background = gray80
                                                    }
                                                } AP
                                            }
                                        } Register_2
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 15
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = FP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 25
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 25
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 25
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = F'
                                                        background = gray80
                                                    }
                                                } FP
                                            }
                                        } Register_3
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 80
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = BP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = B'
                                                        background = gray80
                                                    }
                                                } BP
                                            }
                                        } Register_4
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 80
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = CP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = C'
                                                        background = gray80
                                                    }
                                                } CP
                                            }
                                        } Register_5
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 145
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = DP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = D'
                                                        background = gray80
                                                    }
                                                } DP
                                            }
                                        } Register_6
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 145
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = EP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = E'
                                                        background = gray80
                                                    }
                                                } EP
                                            }
                                        } Register_7
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 210
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = HP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = H'
                                                        background = gray80
                                                    }
                                                } HP
                                            }
                                        } Register_8
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 55
                                                y = 210
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = LP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = L'
                                                        background = gray80
                                                    }
                                                } LP
                                            }
                                        } Register_9
                                    }
                                } Form
                            }
                        } Frame_2
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                                x = 275
                                y = 75
                                width = 209
                                height = 279
                                background = gray80
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 2
                                        y = 2
                                        width = 205
                                        height = 275
                                        background = gray80
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 45
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 15
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IX
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 45
                                                        height = 25
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 25
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 4
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 45
                                                        height = 25
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } IX
                                            }
                                        } Register_2
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 80
                                                y = 15
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IIX
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 25
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 25
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        editable = false
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 25
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = (IX)
                                                        background = gray80
                                                    }
                                                } IIX
                                            }
                                        } Register_3
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 45
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 80
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IY
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 45
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 4
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 45
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } IY
                                            }
                                        } Register_4
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 80
                                                y = 80
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IIY
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        editable = false
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = (IY)
                                                        background = gray80
                                                    }
                                                } IIY
                                            }
                                        } Register_5
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 45
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 145
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = SP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 45
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 4
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 45
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } SP
                                            }
                                        } Register_6
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 80
                                                y = 145
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = ISP
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        editable = false
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        labelString = (SP)
                                                        background = gray80
                                                    }
                                                } ISP
                                            }
                                        } Register_7
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 45
                                                height = 50
                                                borderWidth = 0
                                                x = 15
                                                y = 210
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = PC
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 45
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 7
                                                        maxLength = 4
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 45
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } PC
                                            }
                                        } Register_8
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 110
                                                height = 50
                                                borderWidth = 0
                                                x = 80
                                                y = 210
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = Instruction
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 110
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        editable = false
                                                        background = gray80
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 110
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } Instruction
                                            }
                                        } Register_9
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                width = 27
                                                height = 50
                                                borderWidth = 0
                                                x = 155
                                                y = 15
                                                background = gray80
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = I
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                        width = 27
                                                        height = 27
                                                        fontList = *fixed-medium-r-*-13-*
                                                        x = 0
                                                        y = 23
                                                        bottomAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        background = gray80
                                                        marginWidth = 5
                                                        maxLength = 2
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 0
                                                        y = 0
                                                        width = 27
                                                        height = 23
                                                        topAttachment = attach_form
                                                        leftAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_widget
                                                        bottomWidget = parent.T
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                    }
                                                } I
                                            }
                                        } Register_10
                                    }
                                } Form
                            }
                        } Frame_3
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                                x = 25
                                y = 380
                                width = 159
                                height = 214
                                background = gray80
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        height = 210
                                        width = 155
                                        x = 2
                                        y = 2
                                        background = gray80
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                x = 0
                                                y = 0
                                                width = 140
                                                height = 205
                                                borderWidth = 0
                                                background = gray80
                                            }
                                            children {
                                                widget XmForm {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 69
                                                        y = 0
                                                        width = 71
                                                        height = 205
                                                        borderWidth = 0
                                                        topAttachment = attach_form
                                                        rightAttachment = attach_form
                                                        bottomAttachment = attach_form
                                                        background = gray80
                                                    }
                                                    children {
                                                        widget XmPushButton {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                                x = 6
                                                                y = 117
                                                                width = 60
                                                                height = 30
                                                                fontList = *helvetica-bold-r-*-12-*
                                                                background = gray80
                                                                activateCallback = DeleteAllActivate ();
                                                            }
                                                        } "Delete All"
                                                        widget XmPushButton {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                                x = 7
                                                                y = 15
                                                                width = 59
                                                                height = 30
                                                                fontList = *helvetica-bold-r-*-12-*
                                                                background = gray80
                                                                activateCallback = AddActivate ();
                                                            }
                                                        } Add
                                                        widget XmPushButton {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                                x = 6
                                                                y = 77
                                                                width = 60
                                                                height = 30
                                                                fontList = *helvetica-bold-r-*-12-*
                                                                background = gray80
                                                                activateCallback = DeleteActivate ();
                                                            }
                                                        } Delete
                                                    }
                                                } XmForm2
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = Break
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                    }
                                                    resources {
                                                        x = 15
                                                        y = 170
                                                        width = 45
                                                        height = 25
                                                        fontList = *helvetica-bold-r-*-12-*
                                                        background = gray80
                                                        maxLength = 4
                                                    }
                                                } XmText0_2
                                                widget XmForm {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        x = 15
                                                        y = 15
                                                        width = 45
                                                        height = 145
                                                    }
                                                    children {
                                                        widget XmList {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                                x = 0
                                                                y = 0
                                                                width = 45
                                                                height = 145
                                                                bottomAttachment = attach_form
                                                                leftAttachment = attach_form
                                                                rightAttachment = attach_form
                                                                topAttachment = attach_form
                                                                itemCount = 0
                                                                fontList = *helvetica-bold-r-*-12-*
                                                                selectionPolicy = multiple_select
                                                                background = gray80
                                                                visibleItemCount = 10
                                                                listSizePolicy = constant
                                                            }
                                                        } List
                                                    }
                                                } FormList
                                            }
                                        } Break
                                    }
                                } Form
                            }
                        } BreakFrame
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = Message
                                set = TextSetString (self, $);
                            }
                            resources {
                                x = 25
                                y = 25
                                width = 460
                                height = 25
                                editable = false
                                fontList = *helvetica-bold-r-*-12-*
                                background = gray80
                            }
                        } XmText0
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                                x = 208
                                y = 380
                                width = 94
                                height = 215
                                background = gray80
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 2
                                        y = 2
                                        width = 90
                                        height = 211
                                        background = gray80
                                    }
                                    children {
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                x = 15
                                                y = 15
                                                width = 60
                                                height = 30
                                                fontList = *helvetica-bold-r-*-12-*
                                                activateCallback = ResetActivate ();
                                                background = gray80
                                            }
                                        } Reset
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                x = 15
                                                y = 60
                                                width = 60
                                                height = 30
                                                fontList = *helvetica-bold-r-*-12-*
                                                activateCallback = GoActivate ();
                                                background = gray80
                                            }
                                        } Go
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                x = 15
                                                y = 105
                                                width = 60
                                                height = 30
                                                fontList = *helvetica-bold-r-*-12-*
                                                activateCallback = StepActivate ();
                                                background = gray80
                                            }
                                        } Step
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                x = 15
                                                y = 150
                                                width = 60
                                                height = 30
                                                fontList = *helvetica-bold-r-*-12-*
                                                activateCallback = StopActivate ();
                                                background = gray80
                                            }
                                        } Stop
                                    }
                                } XmForm4
                            }
                        } XmFrame1
                    }
                } BB
            }
        } MW
        widget TopLevelShell {
            flag {
                popup
            }
            resources {
                x = 331
                y = 481
                width = 360
                height = 161
                title = Open
                background = gray80
            }
            children {
                widget XmForm {
                    flag {
                        mapped
                    }
                    resources {
                        x = 0
                        y = 0
                        width = 360
                        height = 161
                        background = gray80
                    }
                    children {
                        widget XmLabel {
                            flag {
                                mapped
                            }
                            resources {
                                x = 15
                                y = 15
                                width = 330
                                height = 35
                                labelString = Enter File Name
                                background = gray80
                                fontList = *helvetica-bold-r-*-12-*
                            }
                        } Label
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = FileName
                                get = strcpy ($, String (TextGetString (self) ));
                            }
                            resources {
                                x = 15
                                y = 65
                                width = 330
                                height = 35
                                background = gray80
                                activateCallback = OpenOkActivate ();
                                fontList = *helvetica-bold-r-*-12-*
                                maxLength = 45
                            }
                        } XmText0
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                x = 15
                                y = 120
                                width = 86
                                height = 27
                                fontList = *helvetica-bold-r-*-12-*
                                background = gray80
                                activateCallback = OpenOkActivate ();
                            }
                        } OK
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                x = 260
                                y = 120
                                width = 86
                                height = 27
                                fontList = *helvetica-bold-r-*-12-*
                                background = gray80
                                activateCallback = Hide (parent.parent);
                            }
                        } Cancel
                    }
                } Form
            }
        } FileOpen
        widget TopLevelShell {
            flag {
                popup
            }
            resources {
                x = 508
                y = 662
                width = 725
                height = 317
                title = Memory
            }
            children {
                widget XmBulletinBoard {
                    flag {
                        mapped
                    }
                    resources {
                        x = 0
                        y = 0
                        width = 725
                        height = 317
                        background = gray80
                    }
                    children {
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                x = 18
                                y = 75
                                width = 60
                                height = 30
                                fontList = *helvetica-bold-r-*-12-*
                                background = gray80
                                activateCallback = MemoryAddActivate ();
                            }
                        } Add
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                x = 18
                                y = 160
                                width = 60
                                height = 30
                                fontList = *helvetica-bold-r-*-12-*
                                background = gray80
                                activateCallback = MemoryDeleteActivate ();
                            }
                        } Delete
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                x = 18
                                y = 210
                                width = 60
                                height = 30
                                fontList = *helvetica-bold-r-*-12-*
                                background = gray80
                                activateCallback = MemoryDeleteAllActivate ();
                            }
                        } "Delete All"
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = MemoryInput
                                get = strcpy ($, String (TextGetString (self) ));
                            }
                            resources {
                                x = 95
                                y = 277
                                width = 45
                                height = 25
                                fontList = fixed-screen-b-12
                                background = gray80
                                maxLength = 4
                            }
                        } MemoryInput
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = MemoryDump
                                get = strcpy ($, String (TextGetString (self) ));
                                set = TextSetString (self, $);
                            }
                            resources {
                                x = 160
                                y = 60
                                width = 390
                                height = 205
                                fontList = fixed-screen-b-12
                                editMode = multi_line_edit
                                editable = true
                                background = gray80
                                valueChangedCallback = ValueChangedCallback ();
                                maxLength = 10000
                            }
                        } MemoryDump
                        widget XmLabel {
                            flag {
                                mapped
                            }
                            resources {
                                x = 163
                                y = 17
                                width = 380
                                height = 35
                                fontList = fixed-screen-b-12
                                labelString = 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F
                                background = gray80
                            }
                        } Label
                        widget XmForm {
                            flag {
                                mapped
                            }
                            resources {
                                x = 95
                                y = 60
                                width = 45
                                height = 205
                                background = gray80
                            }
                            children {
                                widget XmList {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        x = 0
                                        y = 0
                                        width = 45
                                        height = 205
                                        bottomAttachment = attach_form
                                        leftAttachment = attach_form
                                        rightAttachment = attach_form
                                        topAttachment = attach_form
                                        fontList = fixed-screen-b-12
                                        selectionPolicy = multiple_select
                                        background = gray80
                                        visibleItemCount = 16
                                        listSizePolicy = constant
                                        listMarginHeight = 3
                                        listMarginWidth = 3
                                    }
                                } MemoryList
                            }
                        } FormList
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = MemoryDumpAscii
                                get = strcpy ($, String (TextGetString (self) ));
                                set = TextSetString (self, $);
                            }
                            resources {
                                x = 570
                                y = 60
                                width = 140
                                height = 205
                                fontList = fixed-screen-b-12
                                editable = false
                                editMode = multi_line_edit
                                background = gray80
                                maxLength = 10000
                            }
                        } MemoryDumpAscii
                        widget XmLabel {
                            flag {
                                mapped
                            }
                            resources {
                                x = 571
                                y = 17
                                width = 138
                                height = 35
                                fontList = fixed-screen-b-12
                                labelString = ASCII
                                background = gray80
                            }
                        } Label_2
                    }
                } BB
            }
        } Memory
    }
} Z80