|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 01e0 | | .CONST 0x01e0 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 011b | | .CONST 0x011b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0024 | $ | .CONST 0x0024 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x022a,0x8000,0x0000,0x0037,0x7374,0x0000,0x0009 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000e 0129 | ) | Execute Any,Make_Visible 000f 48fb |H | Short_Literal 0xfb ; Debug Table 0x0.0x2 = 0xf,0xfffd 0010 48fe |H | Short_Literal 0xfe 0011 00da | | Load_Top At_Offset_2 0012 03f9 | | Declare_Type Discrete,Constrained,Visible 0013 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x3 = 0x13,0xfffc 0014 4803 |H | Short_Literal 0x3 0015 00db | | Load_Top At_Offset_3 0016 03f9 | | Declare_Type Discrete,Constrained,Visible 0017 e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x4 = 0x17,0xfffb 0018 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0019 0266 | f | Execute Discrete,Bounds 001a e002 | | Load 0x0,0x2 001b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 001c 0266 | f | Execute Discrete,Bounds 001d e002 | | Load 0x0,0x2 001e 1b19 | | Execute Package,Field_Read,Field_Number 0x19 001f 02a0 | | Declare_Subprogram Null_Subprogram 0020 4802 |H | Short_Literal 0x2 0021 035e | ^ | Declare_Type Array,Defined,Visible 0022 e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x5 = 0x22,0xfffa 0023 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0024 0266 | f | Execute Discrete,Bounds 0025 e002 | | Load 0x0,0x2 0026 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0027 0266 | f | Execute Discrete,Bounds 0028 e002 | | Load 0x0,0x2 0029 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 002a 02a0 | | Declare_Subprogram Null_Subprogram 002b 4802 |H | Short_Literal 0x2 002c 035e | ^ | Declare_Type Array,Defined,Visible 002d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x6 = 0x2d,0xfff9 002e 0336 | 6 | Declare_Variable Array,Visible 002f 00d9 | | Load_Top At_Offset_1 0030 0337 | 7 | Declare_Variable Array 0031 4802 |H | Short_Literal 0x2 0032 4800 |H | Short_Literal 0x0 0033 4801 |H | Short_Literal 0x1 0034 4800 |H | Short_Literal 0x0 0035 00da | | Load_Top At_Offset_2 0036 e213 | | Load 0x1,0x13 0037 01a6 | | Execute Matrix,Field_Write 0038 4801 |H | Short_Literal 0x1 0039 4801 |H | Short_Literal 0x1 003a 00da | | Load_Top At_Offset_2 003b e213 | | Load 0x1,0x13 003c 01a6 | | Execute Matrix,Field_Write 003d 3ff5 |? | Loop_Increasing 0x33 003e 00d9 | | Load_Top At_Offset_1 003f 01a4 | | Execute Matrix,Structure_Write 0040 00da | | Load_Top At_Offset_2 ; Debug Table 0x0.0x7 = 0x40,0xfff8 0041 0336 | 6 | Declare_Variable Array,Visible 0042 00db | | Load_Top At_Offset_3 0043 0337 | 7 | Declare_Variable Array 0044 4802 |H | Short_Literal 0x2 0045 4800 |H | Short_Literal 0x0 0046 4800 |H | Short_Literal 0x0 0047 00db | | Load_Top At_Offset_3 0048 01a6 | | Execute Matrix,Field_Write 0049 4802 |H | Short_Literal 0x2 004a 4801 |H | Short_Literal 0x1 004b 4800 |H | Short_Literal 0x0 004c 00db | | Load_Top At_Offset_3 004d 01a6 | | Execute Matrix,Field_Write 004e 4802 |H | Short_Literal 0x2 004f 4800 |H | Short_Literal 0x0 0050 4802 |H | Short_Literal 0x2 0051 00db | | Load_Top At_Offset_3 0052 01a6 | | Execute Matrix,Field_Write 0053 4802 |H | Short_Literal 0x2 0054 4801 |H | Short_Literal 0x1 0055 4802 |H | Short_Literal 0x2 0056 00db | | Load_Top At_Offset_3 0057 01a6 | | Execute Matrix,Field_Write 0058 4801 |H | Short_Literal 0x1 0059 4800 |H | Short_Literal 0x0 005a 4801 |H | Short_Literal 0x1 005b 00db | | Load_Top At_Offset_3 005c 01a6 | | Execute Matrix,Field_Write 005d 4802 |H | Short_Literal 0x2 005e 4801 |H | Short_Literal 0x1 005f 4801 |H | Short_Literal 0x1 0060 00db | | Load_Top At_Offset_3 0061 01a6 | | Execute Matrix,Field_Write 0062 00d9 | | Load_Top At_Offset_1 0063 01a4 | | Execute Matrix,Structure_Write 0064 e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x8 = 0x64,0xfff7 0065 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0066 0129 | ) | Execute Any,Make_Visible 0067 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x9 = 0x67,0xfff6 0068 e002 | | Load 0x0,0x2 0069 1b18 | | Execute Package,Field_Read,Field_Number 0x18 006a 02a0 | | Declare_Subprogram Null_Subprogram 006b 4802 |H | Short_Literal 0x2 006c 032e | . | Declare_Type Record,Defined,Visible 006d 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x6d,0xfff5 006f 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x6f,0xfff4 0071 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x71,0xfff3 0073 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x73,0xfff2 0075 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x75,0xfff1 0077 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x77,0xfff0 0079 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x10 = 0x79,0xffef 007b 00bf | | Action Accept_Activation ; Debug Table 0x0.0x11 = 0x7b,0xffee 007c e002 | | Load 0x0,0x2 ; Debug Table 0x1 = .DEBUG 0x007c,0x0250,0x8000,0x0000,0x0037,0x73d4,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x7c,0xffff 007d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 007e 0266 | f | Execute Discrete,Bounds 007f e20f | | Load 0x1,0xf 0080 02a0 | | Declare_Subprogram Null_Subprogram 0081 4801 |H | Short_Literal 0x1 0082 035d | ] | Declare_Type Array,Defined 0083 00d8 | | Load_Top At_Offset_0 0084 0337 | 7 | Declare_Variable Array 0085 00d8 | | Load_Top At_Offset_0 0086 0337 | 7 | Declare_Variable Array 0087 4800 |H | Short_Literal 0x0 0088 4800 |H | Short_Literal 0x0 0089 00da | | Load_Top At_Offset_2 008a 01d6 | | Execute Vector,Field_Write 008b 4801 |H | Short_Literal 0x1 008c 4801 |H | Short_Literal 0x1 008d 00da | | Load_Top At_Offset_2 008e 01d6 | | Execute Vector,Field_Write 008f 4803 |H | Short_Literal 0x3 0090 4802 |H | Short_Literal 0x2 0091 00da | | Load_Top At_Offset_2 0092 01d6 | | Execute Vector,Field_Write 0093 00d9 | | Load_Top At_Offset_1 0094 01d4 | | Execute Vector,Structure_Write 0095 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x1 = 0x95,0xfffe 0096 4801 |H | Short_Literal 0x1 0097 e002 | | Load 0x0,0x2 0098 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0099 0266 | f | Execute Discrete,Bounds 009a e20e | | Load 0x1,0xe 009b 02a0 | | Declare_Subprogram Null_Subprogram 009c 4802 |H | Short_Literal 0x2 009d 035d | ] | Declare_Type Array,Defined 009e 00d8 | | Load_Top At_Offset_0 009f 0337 | 7 | Declare_Variable Array 00a0 00d8 | | Load_Top At_Offset_0 00a1 0337 | 7 | Declare_Variable Array 00a2 48fb |H | Short_Literal 0xfb 00a3 4800 |H | Short_Literal 0x0 00a4 4800 |H | Short_Literal 0x0 00a5 00db | | Load_Top At_Offset_3 00a6 01a6 | | Execute Matrix,Field_Write 00a7 48fd |H | Short_Literal 0xfd 00a8 4801 |H | Short_Literal 0x1 00a9 4800 |H | Short_Literal 0x0 00aa 00db | | Load_Top At_Offset_3 00ab 01a6 | | Execute Matrix,Field_Write 00ac 48fc |H | Short_Literal 0xfc 00ad 4800 |H | Short_Literal 0x0 00ae 4801 |H | Short_Literal 0x1 00af 00db | | Load_Top At_Offset_3 00b0 01a6 | | Execute Matrix,Field_Write 00b1 48fe |H | Short_Literal 0xfe 00b2 4801 |H | Short_Literal 0x1 00b3 4801 |H | Short_Literal 0x1 00b4 00db | | Load_Top At_Offset_3 00b5 01a6 | | Execute Matrix,Field_Write 00b6 00d9 | | Load_Top At_Offset_1 00b7 01a4 | | Execute Matrix,Structure_Write 00b8 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x2 = 0xb8,0xfffd 00b9 4803 |H | Short_Literal 0x3 00ba e002 | | Load 0x0,0x2 00bb 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00bc 02a0 | | Declare_Subprogram Null_Subprogram 00bd 4801 |H | Short_Literal 0x1 00be 035d | ] | Declare_Type Array,Defined 00bf 00d8 | | Load_Top At_Offset_0 00c0 0337 | 7 | Declare_Variable Array 00c1 00d8 | | Load_Top At_Offset_0 00c2 0337 | 7 | Declare_Variable Array 00c3 4800 |H | Short_Literal 0x0 00c4 4800 |H | Short_Literal 0x0 00c5 00da | | Load_Top At_Offset_2 00c6 01d6 | | Execute Vector,Field_Write 00c7 4801 |H | Short_Literal 0x1 00c8 4801 |H | Short_Literal 0x1 00c9 00da | | Load_Top At_Offset_2 00ca 01d6 | | Execute Vector,Field_Write 00cb 4802 |H | Short_Literal 0x2 00cc 4803 |H | Short_Literal 0x3 00cd 00da | | Load_Top At_Offset_2 00ce 01d6 | | Execute Vector,Field_Write 00cf 4802 |H | Short_Literal 0x2 00d0 4802 |H | Short_Literal 0x2 00d1 00da | | Load_Top At_Offset_2 00d2 01d6 | | Execute Vector,Field_Write 00d3 00d9 | | Load_Top At_Offset_1 00d4 01d4 | | Execute Vector,Structure_Write 00d5 48fb |H | Short_Literal 0xfb ; Debug Table 0x1.0x3 = 0xd5,0xfffc 00d6 48fe |H | Short_Literal 0xfe 00d7 e215 | | Load 0x1,0x15 00d8 02a0 | | Declare_Subprogram Null_Subprogram 00d9 4801 |H | Short_Literal 0x1 00da 035d | ] | Declare_Type Array,Defined 00db 00d8 | | Load_Top At_Offset_0 00dc 0337 | 7 | Declare_Variable Array 00dd 00d8 | | Load_Top At_Offset_0 00de 0337 | 7 | Declare_Variable Array 00df e215 | | Load 0x1,0x15 00e0 0322 | " | Declare_Variable Record 00e1 4800 |H | Short_Literal 0x0 00e2 00d9 | | Load_Top At_Offset_1 00e3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00e4 4801 |H | Short_Literal 0x1 00e5 00d9 | | Load_Top At_Offset_1 00e6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00e7 48fb |H | Short_Literal 0xfb 00e8 00da | | Load_Top At_Offset_2 00e9 01d6 | | Execute Vector,Field_Write 00ea e215 | | Load 0x1,0x15 00eb 0322 | " | Declare_Variable Record 00ec 4800 |H | Short_Literal 0x0 00ed 00d9 | | Load_Top At_Offset_1 00ee 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00ef 4800 |H | Short_Literal 0x0 00f0 00d9 | | Load_Top At_Offset_1 00f1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00f2 48fd |H | Short_Literal 0xfd 00f3 00da | | Load_Top At_Offset_2 00f4 01d6 | | Execute Vector,Field_Write 00f5 e215 | | Load 0x1,0x15 00f6 0322 | " | Declare_Variable Record 00f7 4801 |H | Short_Literal 0x1 00f8 00d9 | | Load_Top At_Offset_1 00f9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00fa 4801 |H | Short_Literal 0x1 00fb 00d9 | | Load_Top At_Offset_1 00fc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00fd 48fc |H | Short_Literal 0xfc 00fe 00da | | Load_Top At_Offset_2 00ff 01d6 | | Execute Vector,Field_Write 0100 e215 | | Load 0x1,0x15 0101 0322 | " | Declare_Variable Record 0102 4801 |H | Short_Literal 0x1 0103 00d9 | | Load_Top At_Offset_1 0104 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0105 4800 |H | Short_Literal 0x0 0106 00d9 | | Load_Top At_Offset_1 0107 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0108 48fe |H | Short_Literal 0xfe 0109 00da | | Load_Top At_Offset_2 010a 01d6 | | Execute Vector,Field_Write 010b 00d9 | | Load_Top At_Offset_1 010c 01d4 | | Execute Vector,Structure_Write 010d 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x4 = 0x10d,0xfffb 010e 00c7 | | Action Elaborate_Subprogram 010f 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x5 = 0x10f,0xfffa 0110 00c7 | | Action Elaborate_Subprogram 0111 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x6 = 0x111,0xfff9 0112 00c7 | | Action Elaborate_Subprogram 0113 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x7 = 0x113,0xfff8 0114 00c7 | | Action Elaborate_Subprogram 0115 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x8 = 0x115,0xfff7 0116 00c7 | | Action Elaborate_Subprogram 0117 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x9 = 0x117,0xfff6 0118 00c7 | | Action Elaborate_Subprogram 0119 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0xa = 0x119,0xfff5 011a 00c7 | | Action Elaborate_Subprogram 011b BODY_0008: 011b 00bc | | Action Signal_Activated 011c 00bb | | Action Signal_Completion 011d 0000 0000 | | .XXX[0x3] 011f 0000 | | 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0123,0x0268,0x0002,0x0000,0x0037,0x7374,0x0000,0x00a2 ; Debug Table 0x2.0x0 = 0x123,0x1 0124 4601 |F | Jump_Case 0x2 0125 7803 |x | Jump 0x129 ; case 0x0 0126 7800 |x | Jump 0x127 ; case 0x1 0127 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x1 = 0x127,0x2 0128 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0129 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x2 = 0x129,0x3 012a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 012b 0000 0000 | | .BLANK 0000[0x5] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 013c | < | .CONST 0x013c ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x0133,0x0270,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ab ; Debug Table 0x3.0x0 = 0x133,0x1 0134 0f02 | | Execute_Immediate Equal,0x2 0135 7004 |p | Jump_Nonzero 0x13a 0136 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x1 = 0x136,0x2 0137 e222 | " | Load 0x1,0x22 0138 01d7 | | Execute Vector,Field_Read 0139 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 013a 606d |`m | Indirect_Literal Discrete,0x1a8,{0x00000000, 0x37737401} ; Debug Table 0x3.0x2 = 0x13a,0x3 013b 0257 | W | Execute Discrete,Raise 013c TRAP_0130: 013c 010e | | Execute Exception,Is_Constraint_Error 013d 6802 |h | Jump_Zero 0x140 013e 6069 |`i | Indirect_Literal Discrete,0x1a8,{0x00000000, 0x37737401} ; Debug Table 0x3.0x3 = 0x13e,0x4 013f 0257 | W | Execute Discrete,Raise 0140 0100 | | Execute Exception,Raise 0141 0000 0000 | | .BLANK 0000[0x7] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x014b,0x027a,0x0002,0x0000,0x0037,0x7374,0x0000,0x00b6 ; Debug Table 0x4.0x0 = 0x14b,0x1 014c e21e | | Load 0x1,0x1e 014d 01d7 | | Execute Vector,Field_Read 014e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 014f 0000 | | .XXX[0x1] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0157 | W | .CONST 0x0157 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x0153,0x027e,0x0002,0x0000,0x0037,0x7374,0x0000,0x00c1 ; Debug Table 0x5.0x0 = 0x153,0x1 0154 e224 | $ | Load 0x1,0x24 0155 01d5 | | Execute Vector,Field_Reference 0156 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0157 TRAP_0150: 0157 010e | | Execute Exception,Is_Constraint_Error 0158 6802 |h | Jump_Zero 0x15b 0159 604a |`J | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x37737402} ; Debug Table 0x5.0x1 = 0x159,0x2 015a 0257 | W | Execute Discrete,Raise 015b 0100 | | Execute Exception,Raise 015c 0000 0000 | | .BLANK 0000[0x4] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0163 | c | .CONST 0x0163 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0001 | | .CONST 0x0001 ; Number of locals 0163 BODY_0160: 0163 INIT_0160: 0163 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x0163,0x0284,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ca ; Debug Table 0x6.0x0 = 0x163,0x1 0164 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0165 00db | | Load_Top At_Offset_3 0166 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0167 e220 | | Load 0x1,0x20 0168 01a7 | | Execute Matrix,Field_Read 0169 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 016a 0000 0000 | | .BLANK 0000[0x6] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x0173,0x0288,0x0002,0x0000,0x0037,0x7374,0x0000,0x00d3 ; Debug Table 0x7.0x0 = 0x173,0x1 0174 0b00 | | Execute_Immediate Case_Compare,0x0 0175 7007 |p | Jump_Nonzero 0x17d 0176 0b01 | | Execute_Immediate Case_Compare,0x1 0177 7008 |p | Jump_Nonzero 0x180 0178 0b03 | | Execute_Immediate Case_Compare,0x3 0179 7009 |p | Jump_Nonzero 0x183 017a 0092 01ac | | Action Push_String_Extended,0x1ac ; "UNKNOWN" ; Debug Table 0x7.0x1 = 0x17a,0x5 017c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017d 0092 01ad | | Action Push_String_Extended,0x1ad ; "TRANSMIT_BINARY" ; Debug Table 0x7.0x2 = 0x17d,0x2 017f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0180 0092 01ae | | Action Push_String_Extended,0x1ae ; "ECHO" ; Debug Table 0x7.0x3 = 0x180,0x3 0182 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0183 0092 01af | | Action Push_String_Extended,0x1af ; "SUPPRESS_GO_AHEAD" ; Debug Table 0x7.0x4 = 0x183,0x4 0185 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0186 0000 0000 | | .XXX[0x2] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x018b,0x0294,0x0002,0x0000,0x0037,0x7374,0x0000,0x00de ; Debug Table 0x8.0x0 = 0x18b,0x1 018c 0bfd | | Execute_Immediate Case_Compare,0xfd 018d 7009 |p | Jump_Nonzero 0x197 018e 0bfe | | Execute_Immediate Case_Compare,0xfe 018f 700a |p | Jump_Nonzero 0x19a 0190 0bfb | | Execute_Immediate Case_Compare,0xfb 0191 700b |p | Jump_Nonzero 0x19d 0192 0bfc | | Execute_Immediate Case_Compare,0xfc 0193 700c |p | Jump_Nonzero 0x1a0 0194 0092 01b0 | | Action Push_String_Extended,0x1b0 ; "UNKNOWN " ; Debug Table 0x8.0x1 = 0x194,0x6 0196 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0197 0092 01b1 | | Action Push_String_Extended,0x1b1 ; "DO " ; Debug Table 0x8.0x2 = 0x197,0x2 0199 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019a 0092 01b2 | | Action Push_String_Extended,0x1b2 ; "DON'T " ; Debug Table 0x8.0x3 = 0x19a,0x3 019c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019d 0092 01b3 | | Action Push_String_Extended,0x1b3 ; "WILL " ; Debug Table 0x8.0x4 = 0x19d,0x4 019f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a0 0092 01b4 | | Action Push_String_Extended,0x1b4 ; "WON'T " ; Debug Table 0x8.0x5 = 0x1a0,0x5 01a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a3 0000 | | .XXX[0x1] 01a4 0000 0000 | | .LITERAL {0x00000000, 0x37737402} 01a8 0000 0000 | | .LITERAL {0x00000000, 0x37737401} 01ac ; -------------------------------------------------------------------------------------- 01ac ; STRING TABLE 01ac ; -------------------------------------------------------------------------------------- 01ac 0014 | | .STRTAB 0x0014->0x01b6 ; "UNKNOWN" 01ad 0019 | | .STRTAB 0x0019->0x01b9 ; "TRANSMIT_BINARY" 01ae 0026 | & | .STRTAB 0x0026->0x01c1 ; "ECHO" 01af 0028 | ( | .STRTAB 0x0028->0x01c3 ; "SUPPRESS_GO_AHEAD" 01b0 0037 | 7 | .STRTAB 0x0037->0x01cb ; "UNKNOWN " 01b1 003d | = | .STRTAB 0x003d->0x01cf ; "DO " 01b2 003e | > | .STRTAB 0x003e->0x01d1 ; "DON'T " 01b3 0042 | B | .STRTAB 0x0042->0x01d4 ; "WILL " 01b4 0045 | E | .STRTAB 0x0045->0x01d6 ; "WON'T " 01b5 0049 | I | .STREND 0x0049->0x01d9 01b6 554e 4b4e |UNKN| .STRTAB_STRINGS 01da 0000 0000 | | .BLANK 0000[0x6] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; Debug Table 01e0 ; -------------------------------------------------------------------------------------- 01e0 0003 0009 | | .CONST 0x0003,0x0009 01e2 000b 022a | *| .DEBUG 0x000b,0x022a,0x8000,0x0000,0x0037,0x7374,0x0000,0x0009 01ea 007c 0250 | | P| .DEBUG 0x007c,0x0250,0x8000,0x0000,0x0037,0x73d4,0x0000,0x0003 01f2 0123 0268 | # h| .DEBUG 0x0123,0x0268,0x0002,0x0000,0x0037,0x7374,0x0000,0x00a2 01fa 0133 0270 | 3 p| .DEBUG 0x0133,0x0270,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ab 0202 014b 027a | K z| .DEBUG 0x014b,0x027a,0x0002,0x0000,0x0037,0x7374,0x0000,0x00b6 020a 0153 027e | S ~| .DEBUG 0x0153,0x027e,0x0002,0x0000,0x0037,0x7374,0x0000,0x00c1 0212 0163 0284 | c | .DEBUG 0x0163,0x0284,0x0002,0x0000,0x0037,0x7374,0x0000,0x00ca 021a 0173 0288 | s | .DEBUG 0x0173,0x0288,0x0002,0x0000,0x0037,0x7374,0x0000,0x00d3 0222 018b 0294 | | .DEBUG 0x018b,0x0294,0x0002,0x0000,0x0037,0x7374,0x0000,0x00de 022a ; -------------------------------------------------------------------------------------- 022a ; Debug3 Subtable 0x0 022a ; -------------------------------------------------------------------------------------- 022a 0012 0000 | | .DBG3TAB 0x0012,0x0000 022c 000b ffff | | .CONST 0x000b,0xffff 022e 000c fffe | | .CONST 0x000c,0xfffe 0230 000f fffd | | .CONST 0x000f,0xfffd 0232 0013 fffc | | .CONST 0x0013,0xfffc 0234 0017 fffb | | .CONST 0x0017,0xfffb 0236 0022 fffa | " | .CONST 0x0022,0xfffa 0238 002d fff9 | - | .CONST 0x002d,0xfff9 023a 0040 fff8 | @ | .CONST 0x0040,0xfff8 023c 0064 fff7 | d | .CONST 0x0064,0xfff7 023e 0067 fff6 | g | .CONST 0x0067,0xfff6 0240 006d fff5 | m | .CONST 0x006d,0xfff5 0242 006f fff4 | o | .CONST 0x006f,0xfff4 0244 0071 fff3 | q | .CONST 0x0071,0xfff3 0246 0073 fff2 | s | .CONST 0x0073,0xfff2 0248 0075 fff1 | u | .CONST 0x0075,0xfff1 024a 0077 fff0 | w | .CONST 0x0077,0xfff0 024c 0079 ffef | y | .CONST 0x0079,0xffef 024e 007b ffee | { | .CONST 0x007b,0xffee 0250 ; -------------------------------------------------------------------------------------- 0250 ; Debug3 Subtable 0x1 0250 ; -------------------------------------------------------------------------------------- 0250 000b 0000 | | .DBG3TAB 0x000b,0x0000 0252 007c ffff | | | .CONST 0x007c,0xffff 0254 0095 fffe | | .CONST 0x0095,0xfffe 0256 00b8 fffd | | .CONST 0x00b8,0xfffd 0258 00d5 fffc | | .CONST 0x00d5,0xfffc 025a 010d fffb | | .CONST 0x010d,0xfffb 025c 010f fffa | | .CONST 0x010f,0xfffa 025e 0111 fff9 | | .CONST 0x0111,0xfff9 0260 0113 fff8 | | .CONST 0x0113,0xfff8 0262 0115 fff7 | | .CONST 0x0115,0xfff7 0264 0117 fff6 | | .CONST 0x0117,0xfff6 0266 0119 fff5 | | .CONST 0x0119,0xfff5 0268 ; -------------------------------------------------------------------------------------- 0268 ; Debug3 Subtable 0x2 0268 ; -------------------------------------------------------------------------------------- 0268 0000 0003 | | .DBG3TAB 0x0000,0x0003 026a 0123 0001 | # | .CONST 0x0123,0x0001 026c 0127 0002 | ' | .CONST 0x0127,0x0002 026e 0129 0003 | ) | .CONST 0x0129,0x0003 0270 ; -------------------------------------------------------------------------------------- 0270 ; Debug3 Subtable 0x3 0270 ; -------------------------------------------------------------------------------------- 0270 0000 0004 | | .DBG3TAB 0x0000,0x0004 0272 0133 0001 | 3 | .CONST 0x0133,0x0001 0274 0136 0002 | 6 | .CONST 0x0136,0x0002 0276 013a 0003 | : | .CONST 0x013a,0x0003 0278 013e 0004 | > | .CONST 0x013e,0x0004 027a ; -------------------------------------------------------------------------------------- 027a ; Debug3 Subtable 0x4 027a ; -------------------------------------------------------------------------------------- 027a 0000 0001 | | .DBG3TAB 0x0000,0x0001 027c 014b 0001 | K | .CONST 0x014b,0x0001 027e ; -------------------------------------------------------------------------------------- 027e ; Debug3 Subtable 0x5 027e ; -------------------------------------------------------------------------------------- 027e 0000 0002 | | .DBG3TAB 0x0000,0x0002 0280 0153 0001 | S | .CONST 0x0153,0x0001 0282 0159 0002 | Y | .CONST 0x0159,0x0002 0284 ; -------------------------------------------------------------------------------------- 0284 ; Debug3 Subtable 0x6 0284 ; -------------------------------------------------------------------------------------- 0284 0000 0001 | | .DBG3TAB 0x0000,0x0001 0286 0163 0001 | c | .CONST 0x0163,0x0001 0288 ; -------------------------------------------------------------------------------------- 0288 ; Debug3 Subtable 0x7 0288 ; -------------------------------------------------------------------------------------- 0288 0000 0005 | | .DBG3TAB 0x0000,0x0005 028a 0173 0001 | s | .CONST 0x0173,0x0001 028c 017a 0005 | z | .CONST 0x017a,0x0005 028e 017d 0002 | } | .CONST 0x017d,0x0002 0290 0180 0003 | | .CONST 0x0180,0x0003 0292 0183 0004 | | .CONST 0x0183,0x0004 0294 ; -------------------------------------------------------------------------------------- 0294 ; Debug3 Subtable 0x8 0294 ; -------------------------------------------------------------------------------------- 0294 0000 0006 | | .DBG3TAB 0x0000,0x0006 0296 018b 0001 | | .CONST 0x018b,0x0001 0298 0194 0006 | | .CONST 0x0194,0x0006 029a 0197 0002 | | .CONST 0x0197,0x0002 029c 019a 0003 | | .CONST 0x019a,0x0003 029e 019d 0004 | | .CONST 0x019d,0x0004 02a0 01a0 0005 | | .CONST 0x01a0,0x0005 02a2 0000 0000 | | .BLANK 0000[0x15e]