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

⟦c1eb2f9b7⟧ TextFile

    Length: 63091 (0xf673)
    Types: TextFile
    Names: »GUI_FM_RDB«

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 {
    }
    children {
        widget XmMainWindow {
            flag {
                mapped
            }
            resources {
            }
            children {
                widget XmRowColumn {
                    flag {
                        mapped
                        menu_bar
                    }
                    resources {
                    }
                    children {
                        widget XmRowColumn {
                            flag {
                                mapped
                                menu_pulldown
                            }
                            resources {
                            }
                            children {
                                widget XmPushButton {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        activateCallback = Show (root.FileOpen);
                                    }
                                } Open
                                widget XmSeparator {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                    }
                                } XmSeparator0
                                widget XmPushButton {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        activateCallback = QuitActivate ();
                                    }
                                } Quit
                            }
                        } FilePD
                        widget XmCascadeButton {
                            flag {
                                mapped
                            }
                            resources {
                                subMenuId = parent.FilePD
                            }
                        } File
                        widget XmRowColumn {
                            flag {
                                mapped
                                menu_pulldown
                            }
                            resources {
                            }
                            children {
                                widget XmToggleButton {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                        valueChangedCallback = local on;\
if (on) {\
   Hide (root.Memory);\
   on = !on;\
} else {\
   Show (root.Memory);\
   on = !on;\
} 
                                    }
                                } Memory
                            }
                        } ToolsPD
                        widget XmCascadeButton {
                            flag {
                                mapped
                            }
                            resources {
                                subMenuId = parent.ToolsPD
                            }
                        } Tools
                    }
                } MB
                widget XmBulletinBoard {
                    flag {
                        mapped
                    }
                    resources {
                    }
                    children {
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = A
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } A
                                            }
                                        } Register_2
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = F
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } F
                                            }
                                        } Register_3
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = B
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } B
                                            }
                                        } Register_4
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = C
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } C
                                            }
                                        } Register_5
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = D
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } D
                                            }
                                        } Register_6
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = E
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } E
                                            }
                                        } Register_7
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = H
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } H
                                            }
                                        } Register_8
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = L
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } L
                                            }
                                        } Register_9
                                    }
                                } Form
                            }
                        } Frame
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = AP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } AP
                                            }
                                        } Register_2
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = FP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } FP
                                            }
                                        } Register_3
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = BP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } BP
                                            }
                                        } Register_4
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = CP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } CP
                                            }
                                        } Register_5
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = DP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } DP
                                            }
                                        } Register_6
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = EP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } EP
                                            }
                                        } Register_7
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = HP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } HP
                                            }
                                        } Register_8
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = LP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } LP
                                            }
                                        } Register_9
                                    }
                                } Form
                            }
                        } Frame_2
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IX
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } IX
                                            }
                                        } Register_2
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IIX
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } IIX
                                            }
                                        } Register_3
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IY
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } IY
                                            }
                                        } Register_4
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = IIY
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } IIY
                                            }
                                        } Register_5
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = SP
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } SP
                                            }
                                        } Register_6
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = ISP
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } ISP
                                            }
                                        } Register_7
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = PC
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } PC
                                            }
                                        } Register_8
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = Instruction
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } Instruction
                                            }
                                        } Register_9
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = I
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                        set = TextSetString (self, $);
                                                    }
                                                    resources {
                                                    }
                                                } T
                                                widget XmLabel {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                        bottomWidget = parent.T
                                                    }
                                                } I
                                            }
                                        } Register_10
                                    }
                                } Form
                            }
                        } Frame_3
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                    }
                                    children {
                                        widget XmForm {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                            }
                                            children {
                                                widget XmForm {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                    }
                                                    children {
                                                        widget XmPushButton {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                                activateCallback = DeleteAllActivate ();
                                                            }
                                                        } "Delete All"
                                                        widget XmPushButton {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                                activateCallback = AddActivate ();
                                                            }
                                                        } Add
                                                        widget XmPushButton {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                                activateCallback = DeleteActivate ();
                                                            }
                                                        } Delete
                                                    }
                                                } XmForm2
                                                widget XmText {
                                                    flag {
                                                        mapped
                                                    }
                                                    activevalue {
                                                        name = Break
                                                        get = strcpy ($, String (TextGetString (self) ));
                                                    }
                                                    resources {
                                                    }
                                                } XmText0_2
                                                widget XmForm {
                                                    flag {
                                                        mapped
                                                    }
                                                    resources {
                                                    }
                                                    children {
                                                        widget XmList {
                                                            flag {
                                                                mapped
                                                            }
                                                            resources {
                                                            }
                                                        } List
                                                    }
                                                } FormList
                                            }
                                        } Break
                                    }
                                } Form
                            }
                        } BreakFrame
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = Message
                                set = TextSetString (self, $);
                            }
                            resources {
                            }
                        } XmText0
                        widget XmFrame {
                            flag {
                                mapped
                            }
                            resources {
                            }
                            children {
                                widget XmForm {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                    }
                                    children {
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                activateCallback = ResetActivate ();
                                            }
                                        } Reset
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                activateCallback = GoActivate ();
                                            }
                                        } Go
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                activateCallback = StepActivate ();
                                            }
                                        } Step
                                        widget XmPushButton {
                                            flag {
                                                mapped
                                            }
                                            resources {
                                                activateCallback = StopActivate ();
                                            }
                                        } Stop
                                    }
                                } XmForm4
                            }
                        } XmFrame1
                    }
                } BB
            }
        } MW
        widget TopLevelShell {
            flag {
                popup
            }
            resources {
            }
            children {
                widget XmForm {
                    flag {
                        mapped
                    }
                    resources {
                    }
                    children {
                        widget XmLabel {
                            flag {
                                mapped
                            }
                            resources {
                            }
                        } Label
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = FileName
                                get = strcpy ($, String (TextGetString (self) ));
                            }
                            resources {
                                activateCallback = OpenOkActivate ();
                            }
                        } XmText0
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                activateCallback = OpenOkActivate ();
                            }
                        } OK
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                activateCallback = Hide (parent.parent);
                            }
                        } Cancel
                    }
                } Form
            }
        } FileOpen
        widget TopLevelShell {
            flag {
                popup
            }
            resources {
            }
            children {
                widget XmBulletinBoard {
                    flag {
                        mapped
                    }
                    resources {
                    }
                    children {
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                activateCallback = MemoryAddActivate ();
                            }
                        } Add
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                activateCallback = MemoryDeleteActivate ();
                            }
                        } Delete
                        widget XmPushButton {
                            flag {
                                mapped
                            }
                            resources {
                                activateCallback = MemoryDeleteAllActivate ();
                            }
                        } "Delete All"
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = MemoryInput
                                get = strcpy ($, String (TextGetString (self) ));
                            }
                            resources {
                            }
                        } MemoryInput
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = MemoryDump
                                get = strcpy ($, String (TextGetString (self) ));
                                set = TextSetString (self, $);
                            }
                            resources {
                                valueChangedCallback = ValueChangedCallback ();
                            }
                        } MemoryDump
                        widget XmLabel {
                            flag {
                                mapped
                            }
                            resources {
                            }
                        } Label
                        widget XmForm {
                            flag {
                                mapped
                            }
                            resources {
                            }
                            children {
                                widget XmList {
                                    flag {
                                        mapped
                                    }
                                    resources {
                                    }
                                } MemoryList
                            }
                        } FormList
                        widget XmText {
                            flag {
                                mapped
                            }
                            activevalue {
                                name = MemoryDumpAscii
                                get = strcpy ($, String (TextGetString (self) ));
                                set = TextSetString (self, $);
                            }
                            resources {
                            }
                        } MemoryDumpAscii
                        widget XmLabel {
                            flag {
                                mapped
                            }
                            resources {
                            }
                        } Label_2
                    }
                } BB
            }
        } Memory
    }
} Z80