DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: ┃ G T ┃
Length: 130012 (0x1fbdc) Types: TextFile Names: »GUI_FM«
└─⟦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⟧
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