|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02a8 | | .CONST 0x02a8 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0054 | T | .CONST 0x0054 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001e | | .CONST 0x001e ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4801 |H | Short_Literal 0x1
000d 029f 005b | [| Declare_Subprogram INIT_0058,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 e001 | | Load 0x0,0x1
0011 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0012 0129 | ) | Execute Any,Make_Visible
0013 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated
0015 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated
0017 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
0019 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
001b 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
001d 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
001f 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
0021 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated
0023 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
0025 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
0027 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated
0029 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
002b 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated
002d 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
002f 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
0031 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
0033 00bf | | Action Accept_Activation
0034 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0035 00c7 | | Action Elaborate_Subprogram
0036 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0037 00c7 | | Action Elaborate_Subprogram
0038 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0039 00c7 | | Action Elaborate_Subprogram
003a 1d12 | | Execute_Immediate Reference_Lex_1,0x12
003b 00c7 | | Action Elaborate_Subprogram
003c 1d13 | | Execute_Immediate Reference_Lex_1,0x13
003d 00c7 | | Action Elaborate_Subprogram
003e 1d14 | | Execute_Immediate Reference_Lex_1,0x14
003f 00c7 | | Action Elaborate_Subprogram
0040 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0041 00c7 | | Action Elaborate_Subprogram
0042 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0043 00c7 | | Action Elaborate_Subprogram
0044 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0045 00c7 | | Action Elaborate_Subprogram
0046 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0047 00c7 | | Action Elaborate_Subprogram
0048 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0049 00c7 | | Action Elaborate_Subprogram
004a 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
004b 00c7 | | Action Elaborate_Subprogram
004c 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
004d 00c7 | | Action Elaborate_Subprogram
004e 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
004f 00c7 | | Action Elaborate_Subprogram
0050 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0051 00c7 | | Action Elaborate_Subprogram
0052 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0053 00c7 | | Action Elaborate_Subprogram
0054 BODY_0008:
0054 00bc | | Action Signal_Activated
0055 00bb | | Action Signal_Completion
0056 0000 0000 | | .XXX[0x2]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 4607 |F | Jump_Case 0x8
005c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
005d 7806 |x | Jump 0x64 ; case 0x1
005e 7809 |x | Jump 0x68 ; case 0x2
005f 780d |x | Jump 0x6d ; case 0x3
0060 7810 |x | Jump 0x71 ; case 0x4
0061 7811 |x | Jump 0x73 ; case 0x5
0062 7812 |x | Jump 0x75 ; case 0x6
0063 7815 |x | Jump 0x79 ; case 0x7
0064 00da | | Load_Top At_Offset_2
0065 0091 027f | | Action Push_String_Extended_Indexed,0x27f ; "TEXT"
0067 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0068 00db | | Load_Top At_Offset_3
0069 00db | | Load_Top At_Offset_3
006a 00e0 | | Load_Encached Standard_Cache
006b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
006c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
006d 00da | | Load_Top At_Offset_2
006e 00e0 | | Load_Encached Standard_Cache
006f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0070 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0071 00db | | Load_Top At_Offset_3
0072 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0073 00db | | Load_Top At_Offset_3
0074 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0075 e20d | | Load 0x1,0xd
0076 00dc | | Load_Top At_Offset_4
0077 0267 | g | Execute Discrete,Predecessor
0078 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0079 e20d | | Load 0x1,0xd
007a 00dc | | Load_Top At_Offset_4
007b 0268 | h | Execute Discrete,Successor
007c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
007d 0000 0000 | | .XXX[0x3]
007f 0000 | |
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0085 | | .CONST 0x0085 ; Address of begin
0081 00a4 | | .CONST 0x00a4 ; Address of exception handler
0082 0002 | | .CONST 0x0002 ; Number of locals
0083 INIT_0080:
0083 e002 | | Load 0x0,0x2
0084 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0085 BODY_0080:
0085 e002 | | Load 0x0,0x2
0086 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0087 e5fa | | Load 0x2,-0x6
0088 0120 | | Execute Any,Is_Value
0089 6803 |h | Jump_Zero 0x8d
008a e001 | | Load 0x0,0x1
008b 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
008c 7804 |x | Jump 0x91
008d e5fa | | Load 0x2,-0x6
008e e001 | | Load 0x0,0x1
008f 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0090 011e | | Execute Any,Convert
0091 e5fb | | Load 0x2,-0x5
0092 e5fc | | Load 0x2,-0x4
0093 e5fd | | Load 0x2,-0x3
0094 e5fe | | Load 0x2,-0x2
0095 e5ff | | Load 0x2,-0x1
0096 e003 | | Load 0x0,0x3
0097 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0098 e004 | | Load 0x0,0x4
0099 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
009a e001 | | Load 0x0,0x1
009b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
009c c5fa | | Store 0x2,-0x6
009d 0059 | Y | Store_Top Discrete,At_Offset_1
009e e5f9 | | Load 0x2,-0x7
009f 00d9 | | Load_Top At_Offset_1
00a0 e005 | | Load 0x0,0x5
00a1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00a2 c5f9 | | Store 0x2,-0x7
00a3 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00a4 TRAP_0080:
00a4 010e | | Execute Exception,Is_Constraint_Error
00a5 680f |h | Jump_Zero 0xb5
00a6 e5f9 | | Load 0x2,-0x7
00a7 4802 |H | Short_Literal 0x2
00a8 0092 0281 | | Action Push_String_Extended,0x281 ; "\x22"
00aa e5ff | | Load 0x2,-0x1
00ab 01cc | | Execute Vector,Catenate
00ac 0092 0282 | | Action Push_String_Extended,0x282 ; "\x22 is an unregistered target key"
00ae 01cc | | Execute Vector,Catenate
00af 0092 0283 | | Action Push_String_Extended,0x283 ; "Acquire failed"
00b1 e006 | | Load 0x0,0x6
00b2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00b3 c5f9 | | Store 0x2,-0x7
00b4 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00b5 0100 | | Execute Exception,Raise
00b6 0000 0000 | | .XXX[0x2]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bd | | .CONST 0x00bd ; Address of begin
00b9 00de | | .CONST 0x00de ; Address of exception handler
00ba 0002 | | .CONST 0x0002 ; Number of locals
00bb INIT_00b8:
00bb e002 | | Load 0x0,0x2
00bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00bd BODY_00b8:
00bd e002 | | Load 0x0,0x2
00be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00bf e5f8 | | Load 0x2,-0x8
00c0 0120 | | Execute Any,Is_Value
00c1 6803 |h | Jump_Zero 0xc5
00c2 e001 | | Load 0x0,0x1
00c3 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
00c4 7804 |x | Jump 0xc9
00c5 e5f8 | | Load 0x2,-0x8
00c6 e001 | | Load 0x0,0x1
00c7 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
00c8 011e | | Execute Any,Convert
00c9 e5f9 | | Load 0x2,-0x7
00ca e5fa | | Load 0x2,-0x6
00cb e5fb | | Load 0x2,-0x5
00cc e5fc | | Load 0x2,-0x4
00cd e5fd | | Load 0x2,-0x3
00ce e5fe | | Load 0x2,-0x2
00cf e5ff | | Load 0x2,-0x1
00d0 e003 | | Load 0x0,0x3
00d1 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00d2 e004 | | Load 0x0,0x4
00d3 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
00d4 e001 | | Load 0x0,0x1
00d5 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
00d6 c5f8 | | Store 0x2,-0x8
00d7 0059 | Y | Store_Top Discrete,At_Offset_1
00d8 e5f7 | | Load 0x2,-0x9
00d9 00d9 | | Load_Top At_Offset_1
00da e005 | | Load 0x0,0x5
00db 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00dc c5f7 | | Store 0x2,-0x9
00dd 4508 |E | Exit_Suprogram New_Top_Offset 0x8
00de TRAP_00b8:
00de 010e | | Execute Exception,Is_Constraint_Error
00df 680f |h | Jump_Zero 0xef
00e0 e5f7 | | Load 0x2,-0x9
00e1 4802 |H | Short_Literal 0x2
00e2 0092 0281 | | Action Push_String_Extended,0x281 ; "\x22"
00e4 e5ff | | Load 0x2,-0x1
00e5 01cc | | Execute Vector,Catenate
00e6 0092 0282 | | Action Push_String_Extended,0x282 ; "\x22 is an unregistered target key"
00e8 01cc | | Execute Vector,Catenate
00e9 0092 0283 | | Action Push_String_Extended,0x283 ; "Acquire failed"
00eb e006 | | Load 0x0,0x6
00ec 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00ed c5f7 | | Store 0x2,-0x9
00ee 4508 |E | Exit_Suprogram New_Top_Offset 0x8
00ef 0100 | | Execute Exception,Raise
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f5 | | .CONST 0x00f5 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0002 | | .CONST 0x0002 ; Number of locals
00f3 INIT_00f0:
00f3 e002 | | Load 0x0,0x2
00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f5 BODY_00f0:
00f5 e002 | | Load 0x0,0x2
00f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f7 e5fe | | Load 0x2,-0x2
00f8 e5ff | | Load 0x2,-0x1
00f9 e001 | | Load 0x0,0x1
00fa 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
00fb 0059 | Y | Store_Top Discrete,At_Offset_1
00fc e5fd | | Load 0x2,-0x3
00fd 00d9 | | Load_Top At_Offset_1
00fe e005 | | Load 0x0,0x5
00ff 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0100 c5fd | | Store 0x2,-0x3
0101 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0102 0000 0000 | | .BLANK 0000[0x6]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010d | | .CONST 0x010d ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0002 | | .CONST 0x0002 ; Number of locals
010b INIT_0108:
010b e002 | | Load 0x0,0x2
010c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
010d BODY_0108:
010d e002 | | Load 0x0,0x2
010e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
010f e5fc | | Load 0x2,-0x4
0110 e5fd | | Load 0x2,-0x3
0111 e5fe | | Load 0x2,-0x2
0112 e5ff | | Load 0x2,-0x1
0113 e001 | | Load 0x0,0x1
0114 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0115 0059 | Y | Store_Top Discrete,At_Offset_1
0116 e5fb | | Load 0x2,-0x5
0117 00d9 | | Load_Top At_Offset_1
0118 e005 | | Load 0x0,0x5
0119 1817 | | Execute Package,Field_Execute,Field_Number 0x17
011a c5fb | | Store 0x2,-0x5
011b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
011c 0000 0000 | | .BLANK 0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0128 | ( | .CONST 0x0128 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0003 | | .CONST 0x0003 ; Number of locals
0123 INIT_0120:
0123 e002 | | Load 0x0,0x2
0124 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0125 e004 | | Load 0x0,0x4
0126 1bcb | | Execute Package,Field_Read,Field_Number 0xcb
0127 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0128 BODY_0120:
0128 e5fc | | Load 0x2,-0x4
0129 0f01 | | Execute_Immediate Equal,0x1
012a 6802 |h | Jump_Zero 0x12d
012b 4801 |H | Short_Literal 0x1
012c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
012d e002 | | Load 0x0,0x2
012e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012f e5fb | | Load 0x2,-0x5
0130 00da | | Load_Top At_Offset_2
0131 e5fd | | Load 0x2,-0x3
0132 e5fe | | Load 0x2,-0x2
0133 e5ff | | Load 0x2,-0x1
0134 e001 | | Load 0x0,0x1
0135 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0136 005a | Z | Store_Top Discrete,At_Offset_2
0137 e5fa | | Load 0x2,-0x6
0138 00da | | Load_Top At_Offset_2
0139 e005 | | Load 0x0,0x5
013a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
013b c5fa | | Store 0x2,-0x6
013c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
013d 0000 0000 | | .XXX[0x3]
013f 0000 | |
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0148 | H | .CONST 0x0148 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0003 | | .CONST 0x0003 ; Number of locals
0143 INIT_0140:
0143 e002 | | Load 0x0,0x2
0144 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0145 e004 | | Load 0x0,0x4
0146 1bcb | | Execute Package,Field_Read,Field_Number 0xcb
0147 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0148 BODY_0140:
0148 e5fc | | Load 0x2,-0x4
0149 0f01 | | Execute_Immediate Equal,0x1
014a 6802 |h | Jump_Zero 0x14d
014b 4801 |H | Short_Literal 0x1
014c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
014d e002 | | Load 0x0,0x2
014e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014f e5fb | | Load 0x2,-0x5
0150 00da | | Load_Top At_Offset_2
0151 e5fd | | Load 0x2,-0x3
0152 e5fe | | Load 0x2,-0x2
0153 e5ff | | Load 0x2,-0x1
0154 e001 | | Load 0x0,0x1
0155 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0156 005a | Z | Store_Top Discrete,At_Offset_2
0157 e5fa | | Load 0x2,-0x6
0158 00da | | Load_Top At_Offset_2
0159 e005 | | Load 0x0,0x5
015a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
015b c5fa | | Store 0x2,-0x6
015c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
015d 0000 0000 | | .XXX[0x3]
015f 0000 | |
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0165 | e | .CONST 0x0165 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0002 | | .CONST 0x0002 ; Number of locals
0163 INIT_0160:
0163 e002 | | Load 0x0,0x2
0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0165 BODY_0160:
0165 e002 | | Load 0x0,0x2
0166 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0167 e5f9 | | Load 0x2,-0x7
0168 e5fa | | Load 0x2,-0x6
0169 e5fb | | Load 0x2,-0x5
016a e5fc | | Load 0x2,-0x4
016b e5fd | | Load 0x2,-0x3
016c e5fe | | Load 0x2,-0x2
016d e5ff | | Load 0x2,-0x1
016e e001 | | Load 0x0,0x1
016f 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0170 0059 | Y | Store_Top Discrete,At_Offset_1
0171 e5f8 | | Load 0x2,-0x8
0172 00d9 | | Load_Top At_Offset_1
0173 e005 | | Load 0x0,0x5
0174 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0175 c5f8 | | Store 0x2,-0x8
0176 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0177 0000 | | .XXX[0x1]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017d | } | .CONST 0x017d ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e002 | | Load 0x0,0x2
017c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017d BODY_0178:
017d e5fb | | Load 0x2,-0x5
017e 0120 | | Execute Any,Is_Value
017f 6803 |h | Jump_Zero 0x183
0180 e007 | | Load 0x0,0x7
0181 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0182 7801 |x | Jump 0x184
0183 e5fb | | Load 0x2,-0x5
0184 e002 | | Load 0x0,0x2
0185 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0186 e5fd | | Load 0x2,-0x3
0187 e5fe | | Load 0x2,-0x2
0188 e5ff | | Load 0x2,-0x1
0189 e001 | | Load 0x0,0x1
018a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
018b 005a | Z | Store_Top Discrete,At_Offset_2
018c c5fb | | Store 0x2,-0x5
018d e5fc | | Load 0x2,-0x4
018e 00d9 | | Load_Top At_Offset_1
018f e005 | | Load 0x0,0x5
0190 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0191 c5fc | | Store 0x2,-0x4
0192 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0193 0000 0000 | | .BLANK 0000[0x5]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d | | .CONST 0x019d ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b e002 | | Load 0x0,0x2
019c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019d BODY_0198:
019d e002 | | Load 0x0,0x2
019e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019f e5fe | | Load 0x2,-0x2
01a0 e5ff | | Load 0x2,-0x1
01a1 e001 | | Load 0x0,0x1
01a2 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
01a3 0059 | Y | Store_Top Discrete,At_Offset_1
01a4 e5fd | | Load 0x2,-0x3
01a5 00d9 | | Load_Top At_Offset_1
01a6 e005 | | Load 0x0,0x5
01a7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01a8 c5fd | | Store 0x2,-0x3
01a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01aa 0000 0000 | | .BLANK 0000[0x6]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b5 | | .CONST 0x01b5 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0002 | | .CONST 0x0002 ; Number of locals
01b3 INIT_01b0:
01b3 e002 | | Load 0x0,0x2
01b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b5 BODY_01b0:
01b5 00e1 | | Load_Encached Boolean_Cache
01b6 e002 | | Load 0x0,0x2
01b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b8 e5fd | | Load 0x2,-0x3
01b9 e5fe | | Load 0x2,-0x2
01ba e5ff | | Load 0x2,-0x1
01bb e001 | | Load 0x0,0x1
01bc 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
01bd 005a | Z | Store_Top Discrete,At_Offset_2
01be c5fb | | Store 0x2,-0x5
01bf e5fc | | Load 0x2,-0x4
01c0 00d9 | | Load_Top At_Offset_1
01c1 e005 | | Load 0x0,0x5
01c2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01c3 c5fc | | Store 0x2,-0x4
01c4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01c5 0000 0000 | | .XXX[0x3]
01c7 0000 | |
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01ce | | .CONST 0x01ce ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0002 | | .CONST 0x0002 ; Number of locals
01cb INIT_01c8:
01cb e002 | | Load 0x0,0x2
01cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ce BODY_01c8:
01ce e002 | | Load 0x0,0x2
01cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d0 e5f9 | | Load 0x2,-0x7
01d1 0120 | | Execute Any,Is_Value
01d2 6803 |h | Jump_Zero 0x1d6
01d3 e008 | | Load 0x0,0x8
01d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01d5 7801 |x | Jump 0x1d7
01d6 e5f9 | | Load 0x2,-0x7
01d7 e5fa | | Load 0x2,-0x6
01d8 e5fb | | Load 0x2,-0x5
01d9 e5fc | | Load 0x2,-0x4
01da e5fd | | Load 0x2,-0x3
01db e003 | | Load 0x0,0x3
01dc 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01dd e5fe | | Load 0x2,-0x2
01de e5ff | | Load 0x2,-0x1
01df e009 | | Load 0x0,0x9
01e0 1888 | | Execute Package,Field_Execute,Field_Number 0x88
01e1 c5f9 | | Store 0x2,-0x7
01e2 0059 | Y | Store_Top Discrete,At_Offset_1
01e3 e5f8 | | Load 0x2,-0x8
01e4 00d9 | | Load_Top At_Offset_1
01e5 e005 | | Load 0x0,0x5
01e6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01e7 c5f8 | | Store 0x2,-0x8
01e8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01e9 0000 0000 | | .BLANK 0000[0x7]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f6 | | .CONST 0x01f6 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0002 | | .CONST 0x0002 ; Number of locals
01f3 INIT_01f0:
01f3 e002 | | Load 0x0,0x2
01f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01f6 BODY_01f0:
01f6 e002 | | Load 0x0,0x2
01f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f8 e5fa | | Load 0x2,-0x6
01f9 0120 | | Execute Any,Is_Value
01fa 6803 |h | Jump_Zero 0x1fe
01fb e008 | | Load 0x0,0x8
01fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fd 7801 |x | Jump 0x1ff
01fe e5fa | | Load 0x2,-0x6
01ff e5fb | | Load 0x2,-0x5
0200 e5fc | | Load 0x2,-0x4
0201 e5fd | | Load 0x2,-0x3
0202 e003 | | Load 0x0,0x3
0203 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0204 e5fe | | Load 0x2,-0x2
0205 e5ff | | Load 0x2,-0x1
0206 e009 | | Load 0x0,0x9
0207 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0208 c5fa | | Store 0x2,-0x6
0209 0059 | Y | Store_Top Discrete,At_Offset_1
020a e5f9 | | Load 0x2,-0x7
020b 00d9 | | Load_Top At_Offset_1
020c e005 | | Load 0x0,0x5
020d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
020e c5f9 | | Store 0x2,-0x7
020f 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0216 | | .CONST 0x0216 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0002 | | .CONST 0x0002 ; Number of locals
0213 INIT_0210:
0213 e002 | | Load 0x0,0x2
0214 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0215 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0216 BODY_0210:
0216 e002 | | Load 0x0,0x2
0217 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0218 e5f8 | | Load 0x2,-0x8
0219 e5f9 | | Load 0x2,-0x7
021a e5fa | | Load 0x2,-0x6
021b e5fb | | Load 0x2,-0x5
021c e5fc | | Load 0x2,-0x4
021d e5fd | | Load 0x2,-0x3
021e e003 | | Load 0x0,0x3
021f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0220 e5fe | | Load 0x2,-0x2
0221 e5ff | | Load 0x2,-0x1
0222 e009 | | Load 0x0,0x9
0223 188a | | Execute Package,Field_Execute,Field_Number 0x8a
0224 0059 | Y | Store_Top Discrete,At_Offset_1
0225 e5f7 | | Load 0x2,-0x9
0226 00d9 | | Load_Top At_Offset_1
0227 e005 | | Load 0x0,0x5
0228 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0229 c5f7 | | Store 0x2,-0x9
022a 4509 |E | Exit_Suprogram New_Top_Offset 0x9
022b 0000 0000 | | .BLANK 0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0236 | 6 | .CONST 0x0236 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0002 | | .CONST 0x0002 ; Number of locals
0233 INIT_0230:
0233 e002 | | Load 0x0,0x2
0234 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0235 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0236 BODY_0230:
0236 e002 | | Load 0x0,0x2
0237 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0238 e5f9 | | Load 0x2,-0x7
0239 e5fa | | Load 0x2,-0x6
023a e5fb | | Load 0x2,-0x5
023b e5fc | | Load 0x2,-0x4
023c e5fd | | Load 0x2,-0x3
023d e003 | | Load 0x0,0x3
023e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
023f e5fe | | Load 0x2,-0x2
0240 e5ff | | Load 0x2,-0x1
0241 e009 | | Load 0x0,0x9
0242 188b | | Execute Package,Field_Execute,Field_Number 0x8b
0243 0059 | Y | Store_Top Discrete,At_Offset_1
0244 e5f8 | | Load 0x2,-0x8
0245 00d9 | | Load_Top At_Offset_1
0246 e005 | | Load 0x0,0x5
0247 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0248 c5f8 | | Store 0x2,-0x8
0249 4508 |E | Exit_Suprogram New_Top_Offset 0x8
024a 0000 0000 | | .BLANK 0000[0x6]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0256 | V | .CONST 0x0256 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0002 | | .CONST 0x0002 ; Number of locals
0253 INIT_0250:
0253 e002 | | Load 0x0,0x2
0254 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0255 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0256 BODY_0250:
0256 e002 | | Load 0x0,0x2
0257 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0258 e5fb | | Load 0x2,-0x5
0259 e5fc | | Load 0x2,-0x4
025a e5fd | | Load 0x2,-0x3
025b e003 | | Load 0x0,0x3
025c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
025d e5fe | | Load 0x2,-0x2
025e e5ff | | Load 0x2,-0x1
025f e009 | | Load 0x0,0x9
0260 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0261 0059 | Y | Store_Top Discrete,At_Offset_1
0262 e5fa | | Load 0x2,-0x6
0263 00d9 | | Load_Top At_Offset_1
0264 e005 | | Load 0x0,0x5
0265 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0266 c5fa | | Store 0x2,-0x6
0267 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026e | n | .CONST 0x026e ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0002 | | .CONST 0x0002 ; Number of locals
026b INIT_0268:
026b e002 | | Load 0x0,0x2
026c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
026d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
026e BODY_0268:
026e e002 | | Load 0x0,0x2
026f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0270 e5fc | | Load 0x2,-0x4
0271 e5fd | | Load 0x2,-0x3
0272 e003 | | Load 0x0,0x3
0273 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0274 e5fe | | Load 0x2,-0x2
0275 e5ff | | Load 0x2,-0x1
0276 e009 | | Load 0x0,0x9
0277 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0278 0059 | Y | Store_Top Discrete,At_Offset_1
0279 e5fb | | Load 0x2,-0x5
027a 00d9 | | Load_Top At_Offset_1
027b e005 | | Load 0x0,0x5
027c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
027d c5fb | | Store 0x2,-0x5
027e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
027f ; --------------------------------------------------------------------------------------
027f ; STRING TABLE
027f ; --------------------------------------------------------------------------------------
027f 000c | | .STRTAB 0x000c->0x0285 ; "TEXT"
0280 000e | | .STRTAB 0x000e->0x0287 ; "BINARY"
0281 0012 | | .STRTAB 0x0012->0x028a ; "\x22"
0282 0011 | | .STRTAB 0x0011->0x028a ; "\x22 is an unregistered target key"
0283 002e | . | .STRTAB 0x002e->0x029a ; "Acquire failed"
0284 003a | : | .STREND 0x003a->0x02a1
0285 5445 5854 |TEXT| .STRTAB_STRINGS
02a1 0000 0000 | | .BLANK 0000[0x7]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; Debug Table
02a8 ; --------------------------------------------------------------------------------------
02a8 0004 000d | | .DEBUG4 0x0004,0x000d,0x516c,0x0000,0x0001,0x0000
02ae 3b40 0049 |;@ I| .XXX[0x67]
02b0 2020 2020 | |
02b2 7072 6f63 |proc|
02b4 6564 7572 |edur|
02b6 6520 4578 |e Ex|
02b8 636c 7572 |clur|
02ba 655f 556e |e_Un|
02bc 655f 4163 |e_Ac|
02be 7469 6f6e |tion|
02c0 5f44 755f |_Du_|
02c2 526f 6c65 |Role|
02c4 2028 5220 | (R |
02c6 3a20 696e |: in|
02c8 206f 7574 | out|
02ca 2052 6f6c | Rol|
02cc 653b 2054 |e; T|
02ce 203a 2069 | : i|
02d0 6e20 5465 |n Te|
02d2 6d70 7329 |mps)|
02d4 3b49 004e |;I N|
02d6 2020 2020 | |
02d8 7072 6f63 |proc|
02da 6564 7572 |edur|
02dc 6520 4465 |e De|
02de 6361 6c65 |cale|
02e0 725f 556e |r_Un|
02e2 655f 4163 |e_Ac|
02e4 7469 6f6e |tion|
02e6 5f44 755f |_Du_|
02e8 526f 6c65 |Role|
02ea 2028 5220 | (R |
02ec 3a20 696e |: in|
02ee 206f 7574 | out|
02f0 2052 6f6c | Rol|
02f2 653b 2054 |e; T|
02f4 2c20 4420 |, D |
02f6 3a20 696e |: in|
02f8 2054 656d | Tem|
02fa 7073 293b |ps);|
02fc 2020 4e00 | N |
02fe 2920 2020 |) |
0300 2070 726f | pro|
0302 6365 6475 |cedu|
0304 7265 2044 |re D|
0306 6570 6c61 |epla|
0308 6365 725f |cer_|
030a 556e 655f |Une_|
030c 4163 7469 |Acti|
030e 6f6e 5f44 |on_D|
0310 755f 526f |u_Ro|
0312 6c65 2900 |le) |
0314 3f20 |? |
0315 2020 2020 | | .BLANK 2020[0x8]
031d 2852 203a |(R :| .XXX[0xe3]
031f 2069 6e20 | in |
0321 6f75 7420 |out |
0323 526f 6c65 |Role|
0325 3b20 416e |; An|
0327 6369 656e |cien|
0329 2c20 4e6f |, No|
032b 7576 6561 |uvea|
032d 7520 3a20 |u : |
032f 696e 2054 |in T|
0331 656d 7073 |emps|
0333 293b 3f00 |);? |
0335 3e20 2020 |> |
0337 2070 726f | pro|
0339 6365 6475 |cedu|
033b 7265 2044 |re D|
033d 6563 616c |ecal|
033f 6572 5f4c |er_L|
0341 655f 526f |e_Ro|
0343 6c65 2028 |le (|
0345 5220 3a20 |R : |
0347 696e 206f |in o|
0349 7574 2052 |ut R|
034b 6f6c 653b |ole;|
034d 2044 203a | D :|
034f 2069 6e20 | in |
0351 5465 6d70 |Temp|
0353 7329 3b3e |s);>|
0355 002e 2020 | . |
0357 2020 7072 | pr|
0359 6f63 6564 |oced|
035b 7572 6520 |ure |
035d 5669 6465 |Vide|
035f 725f 4c65 |r_Le|
0361 5f52 6f6c |_Rol|
0363 6520 2852 |e (R|
0365 203a 2069 | : i|
0367 6e20 6f75 |n ou|
0369 7420 526f |t Ro|
036b 6c65 293b |le);|
036d 2e00 3120 |. 1 |
036f 2020 2070 | p|
0371 726f 6365 |roce|
0373 6475 7265 |dure|
0375 2044 656d | Dem|
0377 6172 7265 |arre|
0379 725f 4c65 |r_Le|
037b 5f52 6f6c |_Rol|
037d 6520 2852 |e (R|
037f 203a 2069 | : i|
0381 6e20 6f75 |n ou|
0383 7420 526f |t Ro|
0385 6c65 293b |le);|
0387 3100 3020 |1 0 |
0389 2020 2070 | p|
038b 726f 6365 |roce|
038d 6475 7265 |dure|
038f 2041 7272 | Arr|
0391 6574 6572 |eter|
0393 5f4c 655f |_Le_|
0395 526f 6c65 |Role|
0397 2028 5220 | (R |
0399 3a20 696e |: in|
039b 206f 7574 | out|
039d 2052 6f6c | Rol|
039f 6529 3b30 |e);0|
03a1 0033 2020 | 3 |
03a3 2020 7072 | pr|
03a5 6f63 6564 |oced|
03a7 7572 6520 |ure |
03a9 536f 6c6c |Soll|
03ab 6963 6974 |icit|
03ad 6572 5f4c |er_L|
03af 655f 526f |e_Ro|
03b1 6c65 2028 |le (|
03b3 5220 3a20 |R : |
03b5 696e 206f |in o|
03b7 7574 2052 |ut R|
03b9 6f6c 6529 |ole)|
03bb 3b33 002e |;3 .|
03bd 2020 2020 | |
03bf 7072 6f63 |proc|
03c1 6564 7572 |edur|
03c3 6520 4a6f |e Jo|
03c5 7565 725f |uer_|
03c7 4c65 5f52 |Le_R|
03c9 6f6c 6520 |ole |
03cb 2852 203a |(R :|
03cd 2069 6e20 | in |
03cf 6f75 7420 |out |
03d1 526f 6c65 |Role|
03d3 293b 2e00 |);. |
03d5 4420 2020 |D |
03d7 202d 2d20 | -- |
03d9 7072 6f63 |proc|
03db 6564 7572 |edur|
03dd 6520 5361 |e Sa|
03df 7576 6567 |uveg|
03e1 6172 6465 |arde|
03e3 725f 4c65 |r_Le|
03e5 5f52 6f6c |_Rol|
03e7 6520 2852 |e (R|
03e9 203a 2069 | : i|
03eb 6e20 526f |n Ro|
03ed 6c65 3b20 |le; |
03ef 4620 3a20 |F : |
03f1 696e 206f |in o|
03f3 7574 2046 |ut F|
03f5 696c 6529 |ile)|
03f7 3b44 000a |;D |
03f9 656e 6420 |end |
03fb 526f 6c65 |Role|
03fd 733b 0a00 |s; |
03ff 0000 | |