|
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: 5120 (0x1400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0808 | | .CONST 0x0808 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00bd | | .CONST 0x00bd ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0039 | 9 | .CONST 0x0039 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4801 |H | Short_Literal 0x1 000d 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 00c4 | | Action Make_Default 0028 00c4 | | Action Make_Default 0029 00c4 | | Action Make_Default 002a 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 e001 | | Load 0x0,0x1 0031 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0032 e002 | | Load 0x0,0x2 0033 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0034 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call 0036 4802 |H | Short_Literal 0x2 0037 032e | . | Declare_Type Record,Defined,Visible 0038 c22d | - | Store 0x1,0x2d 0039 e003 | | Load 0x0,0x3 003a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 003b 0129 | ) | Execute Any,Make_Visible 003c c21d | | Store 0x1,0x1d 003d 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated 003f c21e | | Store 0x1,0x1e 0040 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 0042 c21f | | Store 0x1,0x1f 0043 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0045 c220 | | Store 0x1,0x20 0046 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0048 c226 | & | Store 0x1,0x26 0049 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 004b c221 | ! | Store 0x1,0x21 004c 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 004e c22b | + | Store 0x1,0x2b 004f 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 0051 c22c | , | Store 0x1,0x2c 0052 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 0054 c224 | $ | Store 0x1,0x24 0055 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 0057 c225 | % | Store 0x1,0x25 0058 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 005a c22a | * | Store 0x1,0x2a 005b 00bf | | Action Accept_Activation 005c e004 | | Load 0x0,0x4 005d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005e 02c7 | | Declare_Variable Any 005f 4800 |H | Short_Literal 0x0 0060 4801 |H | Short_Literal 0x1 0061 4801 |H | Short_Literal 0x1 0062 6085 |` | Indirect_Literal Discrete,0xe8,{0x00000000, 0x0000076d} 0063 e004 | | Load 0x0,0x4 0064 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0065 a22e | . | Store_Unchecked 0x1,0x2e 0066 e005 | | Load 0x0,0x5 0067 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0068 02c7 | | Declare_Variable Any 0069 0092 064b | K| Action Push_String_Extended,0x64b ; "<PROFILE>" 006b e005 | | Load 0x0,0x5 006c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 006d a22f | / | Store_Unchecked 0x1,0x2f 006e e005 | | Load 0x0,0x5 006f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0070 02c7 | | Declare_Variable Any 0071 0092 064c | L| Action Push_String_Extended,0x64c ; "<PROFILE>,~+++,~---,~:::" 0073 e005 | | Load 0x0,0x5 0074 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0075 a230 | 0 | Store_Unchecked 0x1,0x30 0076 e006 | | Load 0x0,0x6 0077 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0078 e007 | | Load 0x0,0x7 0079 1b0f | | Execute Package,Field_Read,Field_Number 0xf 007a 00e1 | | Load_Encached Boolean_Cache 007b e007 | | Load 0x0,0x7 007c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 007d 4900 |I | Short_Literal 0x100 007e e008 | | Load 0x0,0x8 007f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0080 1c07 | | Execute_Immediate Run_Utility,0x7 0081 4900 |I | Short_Literal 0x100 0082 e008 | | Load 0x0,0x8 0083 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0084 1c07 | | Execute_Immediate Run_Utility,0x7 0085 4900 |I | Short_Literal 0x100 0086 e008 | | Load 0x0,0x8 0087 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0088 1c07 | | Execute_Immediate Run_Utility,0x7 0089 4900 |I | Short_Literal 0x100 008a e008 | | Load 0x0,0x8 008b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 008c 1c07 | | Execute_Immediate Run_Utility,0x7 008d e22d | - | Load 0x1,0x2d 008e 029f 045b | [| Declare_Subprogram INIT_0458,For_Call 0090 4809 |H | Short_Literal 0x9 0091 032d | - | Declare_Type Record,Defined 0092 029d 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call 0094 029d 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call 0096 e009 | | Load 0x0,0x9 0097 e00a | | Load 0x0,0xa 0098 e231 | 1 | Load 0x1,0x31 0099 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 009a 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 009b e00b | | Load 0x0,0xb 009c 0387 | | Declare_Variable Package 009d 00d8 | | Load_Top At_Offset_0 009e 020f | | Execute Module,Activate 009f 029d 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call 00a1 029d 050b | | Declare_Subprogram INIT_0508,For_Outer_Call 00a3 029d 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call 00a5 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call 00a7 029d 05a3 | | Declare_Subprogram INIT_05a0,For_Outer_Call 00a9 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00aa 00c7 | | Action Elaborate_Subprogram 00ab 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00ac 00c7 | | Action Elaborate_Subprogram 00ad 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00ae 00c7 | | Action Elaborate_Subprogram 00af 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 00b0 00c7 | | Action Elaborate_Subprogram 00b1 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00b2 00c7 | | Action Elaborate_Subprogram 00b3 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 00b4 00c7 | | Action Elaborate_Subprogram 00b5 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00b6 00c7 | | Action Elaborate_Subprogram 00b7 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00b8 00c7 | | Action Elaborate_Subprogram 00b9 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 00ba 00c7 | | Action Elaborate_Subprogram 00bb 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 00bc 00c7 | | Action Elaborate_Subprogram 00bd BODY_0008: 00bd 00bc | | Action Signal_Activated 00be 00bb | | Action Signal_Completion 00bf 0000 | | .XXX[0x1] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 4607 |F | Jump_Case 0x8 00c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00c5 7806 |x | Jump 0xcc ; case 0x1 00c6 7809 |x | Jump 0xd0 ; case 0x2 00c7 780d |x | Jump 0xd5 ; case 0x3 00c8 7810 |x | Jump 0xd9 ; case 0x4 00c9 7811 |x | Jump 0xdb ; case 0x5 00ca 7812 |x | Jump 0xdd ; case 0x6 00cb 7815 |x | Jump 0xe1 ; case 0x7 00cc 00da | | Load_Top At_Offset_2 00cd 0091 0649 | I| Action Push_String_Extended_Indexed,0x649 ; "TEXT" 00cf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00d0 00db | | Load_Top At_Offset_3 00d1 00db | | Load_Top At_Offset_3 00d2 00e0 | | Load_Encached Standard_Cache 00d3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00d4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00d5 00da | | Load_Top At_Offset_2 00d6 00e0 | | Load_Encached Standard_Cache 00d7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00d8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00d9 00db | | Load_Top At_Offset_3 00da 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00db 00db | | Load_Top At_Offset_3 00dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00dd e20d | | Load 0x1,0xd 00de 00dc | | Load_Top At_Offset_4 00df 0267 | g | Execute Discrete,Predecessor 00e0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00e1 e20d | | Load 0x1,0xd 00e2 00dc | | Load_Top At_Offset_4 00e3 0268 | h | Execute Discrete,Successor 00e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00e5 0000 0000 | | .XXX[0x3] 00e7 0000 | | 00e8 0000 0000 | | .LITERAL {0x00000000, 0x0000076d} 00ec 0000 0000 | | .BLANK 0000[0x4] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 0108 | | .CONST 0x0108 ; Address of begin 00f1 0171 | q | .CONST 0x0171 ; Address of exception handler 00f2 0007 | | .CONST 0x0007 ; Number of locals 00f3 INIT_00f0: 00f3 4820 |H | Short_Literal 0x20 00f4 00db | | Load_Top At_Offset_3 00f5 e00c | | Load 0x0,0xc 00f6 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00f7 e006 | | Load 0x0,0x6 00f8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00f9 e006 | | Load 0x0,0x6 00fa 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00fb 03f1 | | Declare_Variable Discrete,With_Value 00fc e231 | 1 | Load 0x1,0x31 00fd 0322 | " | Declare_Variable Record 00fe 00d8 | | Load_Top At_Offset_0 00ff 1c00 | | Execute_Immediate Run_Utility,0x0 0100 00e1 | | Load_Encached Boolean_Cache 0101 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0102 e21d | | Load 0x1,0x1d 0103 02c7 | | Declare_Variable Any 0104 00d8 | | Load_Top At_Offset_0 0105 1c00 | | Execute_Immediate Run_Utility,0x0 0106 029f 05bb | | Declare_Subprogram INIT_05b8,For_Call 0108 BODY_00f0: 0108 00d9 | | Load_Top At_Offset_1 0109 c5fa | | Store 0x2,-0x6 010a e403 | | Load 0x2,0x3 010b e234 | 4 | Load 0x1,0x34 010c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 010d 7006 |p | Jump_Nonzero 0x114 010e e403 | | Load 0x2,0x3 010f e234 | 4 | Load 0x1,0x34 0110 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0111 e404 | | Load 0x2,0x4 0112 017d | } | Execute Record,Structure_Write 0113 7844 |xD | Jump 0x158 0114 e403 | | Load 0x2,0x3 0115 e234 | 4 | Load 0x1,0x34 0116 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0117 700f |p | Jump_Nonzero 0x127 0118 00d9 | | Load_Top At_Offset_1 0119 e5fc | | Load 0x2,-0x4 011a e404 | | Load 0x2,0x4 011b 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 011c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 011d e002 | | Load 0x0,0x2 011e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 011f c406 | | Store 0x2,0x6 0120 8237 | 7 | Call 0x1,0x37 0121 e403 | | Load 0x2,0x3 0122 e234 | 4 | Load 0x1,0x34 0123 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0124 e404 | | Load 0x2,0x4 0125 017d | } | Execute Record,Structure_Write 0126 7831 |x1 | Jump 0x158 0127 e403 | | Load 0x2,0x3 0128 e234 | 4 | Load 0x1,0x34 0129 1815 | | Execute Package,Field_Execute,Field_Number 0x15 012a e404 | | Load 0x2,0x4 012b 017d | } | Execute Record,Structure_Write 012c 00db | | Load_Top At_Offset_3 012d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 012e 681e |h | Jump_Zero 0x14d 012f 00db | | Load_Top At_Offset_3 0130 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0131 e006 | | Load 0x0,0x6 0132 180f | | Execute Package,Field_Execute,Field_Number 0xf 0133 027f | | Execute Discrete,Equal 0134 6818 |h | Jump_Zero 0x14d 0135 4800 |H | Short_Literal 0x0 0136 e5fe | | Load 0x2,-0x2 0137 e404 | | Load 0x2,0x4 0138 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0139 e008 | | Load 0x0,0x8 013a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 013b e00c | | Load 0x0,0xc 013c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 013d 680b |h | Jump_Zero 0x149 013e 4800 |H | Short_Literal 0x0 013f e5fd | | Load 0x2,-0x3 0140 e404 | | Load 0x2,0x4 0141 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0142 e008 | | Load 0x0,0x8 0143 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0144 e00c | | Load 0x0,0xc 0145 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0146 6802 |h | Jump_Zero 0x149 0147 4800 |H | Short_Literal 0x0 0148 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0149 00db | | Load_Top At_Offset_3 014a 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 014b e5fb | | Load 0x2,-0x5 014c 017d | } | Execute Record,Structure_Write 014d 00da | | Load_Top At_Offset_2 014e 6809 |h | Jump_Zero 0x158 014f 00d9 | | Load_Top At_Offset_1 0150 e5fc | | Load 0x2,-0x4 0151 e404 | | Load 0x2,0x4 0152 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 0153 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0154 e002 | | Load 0x0,0x2 0155 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0156 c406 | | Store 0x2,0x6 0157 8237 | 7 | Call 0x1,0x37 0158 00da | | Load_Top At_Offset_2 0159 680d |h | Jump_Zero 0x167 015a e5fd | | Load 0x2,-0x3 015b e5fe | | Load 0x2,-0x2 015c 8407 | | Call 0x2,0x7 015d 4801 |H | Short_Literal 0x1 015e e5fa | | Load 0x2,-0x6 015f e003 | | Load 0x0,0x3 0160 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0161 6804 |h | Jump_Zero 0x166 0162 e006 | | Load 0x0,0x6 0163 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0164 e234 | 4 | Load 0x1,0x34 0165 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0166 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0167 e005 | | Load 0x0,0x5 0168 180e | | Execute Package,Field_Execute,Field_Number 0xe 0169 480a |H | Short_Literal 0xa 016a 0092 064d | M| Action Push_String_Extended,0x64d ; "Reusing the existing connection to " 016c e5ff | | Load 0x2,-0x1 016d 01cc | | Execute Vector,Catenate 016e e00d | | Load 0x0,0xd 016f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0170 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0171 TRAP_00f0: 0171 0007 | | Action Break_Optional 0172 e5fa | | Load 0x2,-0x6 0173 0092 064e | N| Action Push_String_Extended,0x64e ; "Acquire" 0175 8239 | 9 | Call 0x1,0x39 0176 c5fa | | Store 0x2,-0x6 0177 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017f | | .CONST 0x017f ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0002 | | .CONST 0x0002 ; Number of locals 017b INIT_0178: 017b e21d | | Load 0x1,0x1d 017c 02c7 | | Declare_Variable Any 017d 00d8 | | Load_Top At_Offset_0 017e 1c00 | | Execute_Immediate Run_Utility,0x0 017f BODY_0178: 017f 00d8 | | Load_Top At_Offset_0 0180 e5f9 | | Load 0x2,-0x7 0181 e5fa | | Load 0x2,-0x6 0182 e5fb | | Load 0x2,-0x5 0183 e5fc | | Load 0x2,-0x4 0184 e5fd | | Load 0x2,-0x3 0185 821e | | Call 0x1,0x1e 0186 00d1 | | Pop_Control Pop_Count_1 0187 c402 | | Store 0x2,0x2 0188 4802 |H | Short_Literal 0x2 0189 00d9 | | Load_Top At_Offset_1 018a e003 | | Load 0x0,0x3 018b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 018c 7008 |p | Jump_Nonzero 0x195 018d e5f8 | | Load 0x2,-0x8 018e e5fa | | Load 0x2,-0x6 018f e5fe | | Load 0x2,-0x2 0190 e5f9 | | Load 0x2,-0x7 0191 e5ff | | Load 0x2,-0x1 0192 8221 | ! | Call 0x1,0x21 0193 c5f8 | | Store 0x2,-0x8 0194 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0195 00d8 | | Load_Top At_Offset_0 0196 c5f8 | | Store 0x2,-0x8 0197 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 01b1 | | .CONST 0x01b1 ; Address of begin 0199 01cb | | .CONST 0x01cb ; Address of exception handler 019a 0005 | | .CONST 0x0005 ; Number of locals 019b INIT_0198: 019b e006 | | Load 0x0,0x6 019c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 019d e006 | | Load 0x0,0x6 019e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 019f 03f1 | | Declare_Variable Discrete,With_Value 01a0 e231 | 1 | Load 0x1,0x31 01a1 0322 | " | Declare_Variable Record 01a2 00d8 | | Load_Top At_Offset_0 01a3 1c01 | | Execute_Immediate Run_Utility,0x1 01a4 00d9 | | Load_Top At_Offset_1 01a5 e234 | 4 | Load 0x1,0x34 01a6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01a7 00d9 | | Load_Top At_Offset_1 01a8 017d | } | Execute Record,Structure_Write 01a9 00d8 | | Load_Top At_Offset_0 01aa 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 01ab e008 | | Load 0x0,0x8 01ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01ad e21d | | Load 0x1,0x1d 01ae 02c7 | | Declare_Variable Any 01af 00d8 | | Load_Top At_Offset_0 01b0 1c00 | | Execute_Immediate Run_Utility,0x0 01b1 BODY_0198: 01b1 e006 | | Load 0x0,0x6 01b2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01b3 e234 | 4 | Load 0x1,0x34 01b4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01b5 00d8 | | Load_Top At_Offset_0 01b6 e5ff | | Load 0x2,-0x1 01b7 e5fe | | Load 0x2,-0x2 01b8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01b9 e002 | | Load 0x0,0x2 01ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01bb c405 | | Store 0x2,0x5 01bc 8237 | 7 | Call 0x1,0x37 01bd 00d8 | | Load_Top At_Offset_0 01be c5fd | | Store 0x2,-0x3 01bf e5ff | | Load 0x2,-0x1 01c0 6809 |h | Jump_Zero 0x1ca 01c1 e005 | | Load 0x0,0x5 01c2 180e | | Execute Package,Field_Execute,Field_Number 0xe 01c3 4802 |H | Short_Literal 0x2 01c4 0092 064f | O| Action Push_String_Extended,0x64f ; "Released the connection to " 01c6 e404 | | Load 0x2,0x4 01c7 01cc | | Execute Vector,Catenate 01c8 e00d | | Load 0x0,0xd 01c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01ca 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01cb TRAP_0198: 01cb 0007 | | Action Break_Optional 01cc e5fd | | Load 0x2,-0x3 01cd 0092 0650 | P| Action Push_String_Extended,0x650 ; "Release" 01cf 8239 | 9 | Call 0x1,0x39 01d0 c5fd | | Store 0x2,-0x3 01d1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01d2 0000 0000 | | .BLANK 0000[0x6] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01f1 | | .CONST 0x01f1 ; Address of begin 01d9 020b | | .CONST 0x020b ; Address of exception handler 01da 0005 | | .CONST 0x0005 ; Number of locals 01db INIT_01d8: 01db e006 | | Load 0x0,0x6 01dc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01dd e006 | | Load 0x0,0x6 01de 1b10 | | Execute Package,Field_Read,Field_Number 0x10 01df 03f1 | | Declare_Variable Discrete,With_Value 01e0 e231 | 1 | Load 0x1,0x31 01e1 0322 | " | Declare_Variable Record 01e2 00d8 | | Load_Top At_Offset_0 01e3 1c01 | | Execute_Immediate Run_Utility,0x1 01e4 00d9 | | Load_Top At_Offset_1 01e5 e234 | 4 | Load 0x1,0x34 01e6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01e7 00d9 | | Load_Top At_Offset_1 01e8 017d | } | Execute Record,Structure_Write 01e9 00d8 | | Load_Top At_Offset_0 01ea 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 01eb e008 | | Load 0x0,0x8 01ec 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01ed e21d | | Load 0x1,0x1d 01ee 02c7 | | Declare_Variable Any 01ef 00d8 | | Load_Top At_Offset_0 01f0 1c00 | | Execute_Immediate Run_Utility,0x0 01f1 BODY_01d8: 01f1 e006 | | Load 0x0,0x6 01f2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01f3 e234 | 4 | Load 0x1,0x34 01f4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01f5 00d8 | | Load_Top At_Offset_0 01f6 e5ff | | Load 0x2,-0x1 01f7 e5fe | | Load 0x2,-0x2 01f8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01f9 e002 | | Load 0x0,0x2 01fa 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01fb c405 | | Store 0x2,0x5 01fc 8237 | 7 | Call 0x1,0x37 01fd 00d8 | | Load_Top At_Offset_0 01fe c5fd | | Store 0x2,-0x3 01ff e5ff | | Load 0x2,-0x1 0200 6809 |h | Jump_Zero 0x20a 0201 e005 | | Load 0x0,0x5 0202 180e | | Execute Package,Field_Execute,Field_Number 0xe 0203 4802 |H | Short_Literal 0x2 0204 0092 0651 | Q| Action Push_String_Extended,0x651 ; "Destroyed the connection to " 0206 e404 | | Load 0x2,0x4 0207 01cc | | Execute Vector,Catenate 0208 e00d | | Load 0x0,0xd 0209 1813 | | Execute Package,Field_Execute,Field_Number 0x13 020a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 020b TRAP_01d8: 020b 0007 | | Action Break_Optional 020c e5fd | | Load 0x2,-0x3 020d 0092 0652 | R| Action Push_String_Extended,0x652 ; "Destroy" 020f 8239 | 9 | Call 0x1,0x39 0210 c5fd | | Store 0x2,-0x3 0211 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0212 0000 0000 | | .BLANK 0000[0x6] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 022d | - | .CONST 0x022d ; Address of begin 0219 0281 | | .CONST 0x0281 ; Address of exception handler 021a 0004 | | .CONST 0x0004 ; Number of locals 021b INIT_0218: 021b e21d | | Load 0x1,0x1d 021c 02c7 | | Declare_Variable Any 021d 00d8 | | Load_Top At_Offset_0 021e 1c00 | | Execute_Immediate Run_Utility,0x0 021f e006 | | Load 0x0,0x6 0220 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0221 e006 | | Load 0x0,0x6 0222 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0223 03f1 | | Declare_Variable Discrete,With_Value 0224 e231 | 1 | Load 0x1,0x31 0225 0322 | " | Declare_Variable Record 0226 00d8 | | Load_Top At_Offset_0 0227 1c01 | | Execute_Immediate Run_Utility,0x1 0228 00d9 | | Load_Top At_Offset_1 0229 e234 | 4 | Load 0x1,0x34 022a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 022b 00d9 | | Load_Top At_Offset_1 022c 017d | } | Execute Record,Structure_Write 022d BODY_0218: 022d 00da | | Load_Top At_Offset_2 022e c5fb | | Store 0x2,-0x5 022f e5fe | | Load 0x2,-0x2 0230 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0231 e00e | | Load 0x0,0xe 0232 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0233 6803 |h | Jump_Zero 0x237 0234 e00f | | Load 0x0,0xf 0235 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0236 7006 |p | Jump_Nonzero 0x23d 0237 e5fb | | Load 0x2,-0x5 0238 0092 0653 | S| Action Push_String_Extended,0x653 ; "Set_Remote_Directory" 023a 8238 | 8 | Call 0x1,0x38 023b c5fb | | Store 0x2,-0x5 023c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 023d 4800 |H | Short_Literal 0x0 023e e5ff | | Load 0x2,-0x1 023f 00da | | Load_Top At_Offset_2 0240 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0241 e008 | | Load 0x0,0x8 0242 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0243 e00c | | Load 0x0,0xc 0244 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0245 680b |h | Jump_Zero 0x251 0246 e5fd | | Load 0x2,-0x3 0247 01db | | Execute Vector,Length 0248 7008 |p | Jump_Nonzero 0x251 0249 e005 | | Load 0x0,0x5 024a 180e | | Execute Package,Field_Execute,Field_Number 0xe 024b 4801 |H | Short_Literal 0x1 024c 0092 0654 | T| Action Push_String_Extended,0x654 ; "Reusing the existing directory." 024e e00d | | Load 0x0,0xd 024f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0250 7822 |x" | Jump 0x273 0251 00da | | Load_Top At_Offset_2 0252 e5fc | | Load 0x2,-0x4 0253 4801 |H | Short_Literal 0x1 0254 4800 |H | Short_Literal 0x0 0255 4800 |H | Short_Literal 0x0 0256 00ea | | Load_Encached Null_String_Cache 0257 e5fe | | Load 0x2,-0x2 0258 e5ff | | Load 0x2,-0x1 0259 8224 | $ | Call 0x1,0x24 025a c402 | | Store 0x2,0x2 025b 4802 |H | Short_Literal 0x2 025c 00db | | Load_Top At_Offset_3 025d e003 | | Load 0x0,0x3 025e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 025f 6803 |h | Jump_Zero 0x263 0260 00da | | Load_Top At_Offset_2 0261 c5fb | | Store 0x2,-0x5 0262 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0263 00d9 | | Load_Top At_Offset_1 0264 e234 | 4 | Load 0x1,0x34 0265 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0266 00d9 | | Load_Top At_Offset_1 0267 017d | } | Execute Record,Structure_Write 0268 00d8 | | Load_Top At_Offset_0 0269 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 026a e5ff | | Load 0x2,-0x1 026b e008 | | Load 0x0,0x8 026c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 026d 00d1 | | Pop_Control Pop_Count_1 026e 4800 |H | Short_Literal 0x0 026f 00da | | Load_Top At_Offset_2 0270 00da | | Load_Top At_Offset_2 0271 e234 | 4 | Load 0x1,0x34 0272 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0273 e5fd | | Load 0x2,-0x3 0274 01db | | Execute Vector,Length 0275 680a |h | Jump_Zero 0x280 0276 e5fb | | Load 0x2,-0x5 0277 e5fc | | Load 0x2,-0x4 0278 4801 |H | Short_Literal 0x1 0279 4800 |H | Short_Literal 0x0 027a 4800 |H | Short_Literal 0x0 027b 00ea | | Load_Encached Null_String_Cache 027c e5fe | | Load 0x2,-0x2 027d e5fd | | Load 0x2,-0x3 027e 8224 | $ | Call 0x1,0x24 027f c5fb | | Store 0x2,-0x5 0280 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0281 TRAP_0218: 0281 0007 | | Action Break_Optional 0282 e5fb | | Load 0x2,-0x5 0283 0092 0653 | S| Action Push_String_Extended,0x653 ; "Set_Remote_Directory" 0285 8239 | 9 | Call 0x1,0x39 0286 c5fb | | Store 0x2,-0x5 0287 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028f | | .CONST 0x028f ; Address of begin 0289 02b6 | | .CONST 0x02b6 ; Address of exception handler 028a 0002 | | .CONST 0x0002 ; Number of locals 028b INIT_0288: 028b e21d | | Load 0x1,0x1d 028c 02c7 | | Declare_Variable Any 028d 00d8 | | Load_Top At_Offset_0 028e 1c00 | | Execute_Immediate Run_Utility,0x0 028f BODY_0288: 028f 00d8 | | Load_Top At_Offset_0 0290 c5fa | | Store 0x2,-0x6 0291 e5fd | | Load 0x2,-0x3 0292 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0293 e00e | | Load 0x0,0xe 0294 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0295 7006 |p | Jump_Nonzero 0x29c 0296 e5fa | | Load 0x2,-0x6 0297 0092 0655 | U| Action Push_String_Extended,0x655 ; "Put" 0299 8238 | 8 | Call 0x1,0x38 029a c5fa | | Store 0x2,-0x6 029b 4506 |E | Exit_Suprogram New_Top_Offset 0x6 029c e5fc | | Load 0x2,-0x4 029d 700b |p | Jump_Nonzero 0x2a9 029e 00d8 | | Load_Top At_Offset_0 029f e5fb | | Load 0x2,-0x5 02a0 4800 |H | Short_Literal 0x0 02a1 e5fd | | Load 0x2,-0x3 02a2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02a3 e5fe | | Load 0x2,-0x2 02a4 e5ff | | Load 0x2,-0x1 02a5 e002 | | Load 0x0,0x2 02a6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02a7 c402 | | Store 0x2,0x2 02a8 780a |x | Jump 0x2b3 02a9 00d8 | | Load_Top At_Offset_0 02aa e5fb | | Load 0x2,-0x5 02ab 4803 |H | Short_Literal 0x3 02ac e5fd | | Load 0x2,-0x3 02ad 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ae e5fe | | Load 0x2,-0x2 02af e5ff | | Load 0x2,-0x1 02b0 e002 | | Load 0x0,0x2 02b1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02b2 c402 | | Store 0x2,0x2 02b3 00d8 | | Load_Top At_Offset_0 02b4 c5fa | | Store 0x2,-0x6 02b5 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02b6 TRAP_0288: 02b6 0007 | | Action Break_Optional 02b7 e5fa | | Load 0x2,-0x6 02b8 0092 0655 | U| Action Push_String_Extended,0x655 ; "Put" 02ba 8239 | 9 | Call 0x1,0x39 02bb c5fa | | Store 0x2,-0x6 02bc 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02bd 0000 0000 | | .XXX[0x3] 02bf 0000 | | 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02d0 | | .CONST 0x02d0 ; Address of begin 02c1 0345 | E | .CONST 0x0345 ; Address of exception handler 02c2 0005 | | .CONST 0x0005 ; Number of locals 02c3 INIT_02c0: 02c3 e21d | | Load 0x1,0x1d 02c4 02c7 | | Declare_Variable Any 02c5 00d8 | | Load_Top At_Offset_0 02c6 1c00 | | Execute_Immediate Run_Utility,0x0 02c7 00e1 | | Load_Encached Boolean_Cache 02c8 e001 | | Load 0x0,0x1 02c9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 02ca 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02cb e001 | | Load 0x0,0x1 02cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02cd 02c7 | | Declare_Variable Any 02ce 00d8 | | Load_Top At_Offset_0 02cf 1c00 | | Execute_Immediate Run_Utility,0x0 02d0 BODY_02c0: 02d0 00db | | Load_Top At_Offset_3 02d1 c5fa | | Store 0x2,-0x6 02d2 e5fd | | Load 0x2,-0x3 02d3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02d4 e00e | | Load 0x0,0xe 02d5 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 02d6 7006 |p | Jump_Nonzero 0x2dd 02d7 e5fa | | Load 0x2,-0x6 02d8 0092 0656 | V| Action Push_String_Extended,0x656 ; "Get" 02da 8238 | 8 | Call 0x1,0x38 02db c5fa | | Store 0x2,-0x6 02dc 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02dd e001 | | Load 0x0,0x1 02de 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 02df 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02e0 00d9 | | Load_Top At_Offset_1 02e1 0120 | | Execute Any,Is_Value 02e2 6803 |h | Jump_Zero 0x2e6 02e3 e001 | | Load 0x0,0x1 02e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02e5 7801 |x | Jump 0x2e7 02e6 00d9 | | Load_Top At_Offset_1 02e7 6064 |`d | Indirect_Literal Discrete,0x34c,{0x00000000, 0x00004000} 02e8 e010 | | Load 0x0,0x10 02e9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ea e006 | | Load 0x0,0x6 02eb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02ec e001 | | Load 0x0,0x1 02ed 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 02ee 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02ef e5ff | | Load 0x2,-0x1 02f0 e001 | | Load 0x0,0x1 02f1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 02f2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 02f3 c405 | | Store 0x2,0x5 02f4 005a | Z | Store_Top Discrete,At_Offset_2 02f5 00d9 | | Load_Top At_Offset_1 02f6 0f00 | | Execute_Immediate Equal,0x0 02f7 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 02f8 e5fc | | Load 0x2,-0x4 02f9 680b |h | Jump_Zero 0x305 02fa 00db | | Load_Top At_Offset_3 02fb e5fb | | Load 0x2,-0x5 02fc 4803 |H | Short_Literal 0x3 02fd e5fd | | Load 0x2,-0x3 02fe 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ff e5fe | | Load 0x2,-0x2 0300 e5ff | | Load 0x2,-0x1 0301 e002 | | Load 0x0,0x2 0302 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0303 c402 | | Store 0x2,0x2 0304 780a |x | Jump 0x30f 0305 00db | | Load_Top At_Offset_3 0306 e5fb | | Load 0x2,-0x5 0307 4800 |H | Short_Literal 0x0 0308 e5fd | | Load 0x2,-0x3 0309 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 030a e5fe | | Load 0x2,-0x2 030b e5ff | | Load 0x2,-0x1 030c e002 | | Load 0x0,0x2 030d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 030e c402 | | Store 0x2,0x2 030f 00db | | Load_Top At_Offset_3 0310 c5fa | | Store 0x2,-0x6 0311 4801 |H | Short_Literal 0x1 0312 e402 | | Load 0x2,0x2 0313 e003 | | Load 0x0,0x3 0314 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0315 7014 |p | Jump_Nonzero 0x32a 0316 e5fb | | Load 0x2,-0x5 0317 6811 |h | Jump_Zero 0x329 0318 e005 | | Load 0x0,0x5 0319 180e | | Execute Package,Field_Execute,Field_Number 0xe 031a 4802 |H | Short_Literal 0x2 031b 0092 0657 | W| Action Push_String_Extended,0x657 ; "Uploaded host unit \x22" 031d e5ff | | Load 0x2,-0x1 031e 01cc | | Execute Vector,Catenate 031f 0092 0658 | X| Action Push_String_Extended,0x658 ; "\x22 from remote unit \x22" 0321 01cc | | Execute Vector,Catenate 0322 e5fe | | Load 0x2,-0x2 0323 01cc | | Execute Vector,Catenate 0324 0092 0659 | Y| Action Push_String_Extended,0x659 ; "\x22." 0326 01cc | | Execute Vector,Catenate 0327 e00d | | Load 0x0,0xd 0328 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0329 4506 |E | Exit_Suprogram New_Top_Offset 0x6 032a e5fa | | Load 0x2,-0x6 032b 4802 |H | Short_Literal 0x2 032c 0092 065a | Z| Action Push_String_Extended,0x65a ; "Can't get unit \x22" 032e e5ff | | Load 0x2,-0x1 032f 01cc | | Execute Vector,Catenate 0330 0092 065b | [| Action Push_String_Extended,0x65b ; "\x22 from remote file \x22" 0332 01cc | | Execute Vector,Catenate 0333 e5fe | | Load 0x2,-0x2 0334 01cc | | Execute Vector,Catenate 0335 0092 0659 | Y| Action Push_String_Extended,0x659 ; "\x22." 0337 01cc | | Execute Vector,Catenate 0338 8235 | 5 | Call 0x1,0x35 0339 c5fa | | Store 0x2,-0x6 033a 00da | | Load_Top At_Offset_2 033b 7008 |p | Jump_Nonzero 0x344 033c 0092 064b | K| Action Push_String_Extended,0x64b ; "<PROFILE>" 033e 0092 065c | \| Action Push_String_Extended,0x65c ; "<WORLDS>" 0340 4801 |H | Short_Literal 0x1 0341 e5ff | | Load 0x2,-0x1 0342 e011 | | Load 0x0,0x11 0343 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0344 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0345 TRAP_02c0: 0345 0007 | | Action Break_Optional 0346 e5fa | | Load 0x2,-0x6 0347 0092 0656 | V| Action Push_String_Extended,0x656 ; "Get" 0349 8239 | 9 | Call 0x1,0x39 034a c5fa | | Store 0x2,-0x6 034b 4506 |E | Exit_Suprogram New_Top_Offset 0x6 034c 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0363 | c | .CONST 0x0363 ; Address of begin 0351 03cb | | .CONST 0x03cb ; Address of exception handler 0352 0005 | | .CONST 0x0005 ; Number of locals 0353 INIT_0350: 0353 e21d | | Load 0x1,0x1d 0354 02c7 | | Declare_Variable Any 0355 00d8 | | Load_Top At_Offset_0 0356 1c00 | | Execute_Immediate Run_Utility,0x0 0357 e00f | | Load 0x0,0xf 0358 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0359 0322 | " | Declare_Variable Record 035a 00d8 | | Load_Top At_Offset_0 035b 1c00 | | Execute_Immediate Run_Utility,0x0 035c e012 | | Load 0x0,0x12 035d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 035e 02c7 | | Declare_Variable Any 035f 00d8 | | Load_Top At_Offset_0 0360 1c00 | | Execute_Immediate Run_Utility,0x0 0361 029f 061b | | Declare_Subprogram INIT_0618,For_Call 0363 BODY_0350: 0363 00db | | Load_Top At_Offset_3 0364 c5f8 | | Store 0x2,-0x8 0365 e5fe | | Load 0x2,-0x2 0366 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0367 e013 | | Load 0x0,0x13 0368 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0369 c404 | | Store 0x2,0x4 036a e5ff | | Load 0x2,-0x1 036b 8405 | | Call 0x2,0x5 036c 00db | | Load_Top At_Offset_3 036d 017d | } | Execute Record,Structure_Write 036e 00da | | Load_Top At_Offset_2 036f 4801 |H | Short_Literal 0x1 0370 e5f9 | | Load 0x2,-0x7 0371 e00f | | Load 0x0,0xf 0372 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0373 00d1 | | Pop_Control Pop_Count_1 0374 4801 |H | Short_Literal 0x1 0375 00db | | Load_Top At_Offset_3 0376 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0377 e003 | | Load 0x0,0x3 0378 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0379 6818 |h | Jump_Zero 0x392 037a e005 | | Load 0x0,0x5 037b 180e | | Execute Package,Field_Execute,Field_Number 0xe 037c 4805 |H | Short_Literal 0x5 037d e403 | | Load 0x2,0x3 037e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 037f e003 | | Load 0x0,0x3 0380 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0381 e00d | | Load 0x0,0xd 0382 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0383 e5f8 | | Load 0x2,-0x8 0384 00db | | Load_Top At_Offset_3 0385 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0386 e003 | | Load 0x0,0x3 0387 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0388 0092 065d | ]| Action Push_String_Extended,0x65d ; "Remote command \x22" 038a e5ff | | Load 0x2,-0x1 038b 01cc | | Execute Vector,Catenate 038c 0092 065e | ^| Action Push_String_Extended,0x65e ; "\x22 failed." 038e 01cc | | Execute Vector,Catenate 038f 8235 | 5 | Call 0x1,0x35 0390 c5f8 | | Store 0x2,-0x8 0391 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0392 00d9 | | Load_Top At_Offset_1 0393 e012 | | Load 0x0,0x12 0394 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0395 6834 |h4 | Jump_Zero 0x3ca 0396 4800 |H | Short_Literal 0x0 0397 00db | | Load_Top At_Offset_3 0398 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0399 00da | | Load_Top At_Offset_2 039a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 039b 00da | | Load_Top At_Offset_2 039c e012 | | Load 0x0,0x12 039d 1820 | | Execute Package,Field_Execute,Field_Number 0x20 039e e008 | | Load 0x0,0x8 039f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03a0 00d1 | | Pop_Control Pop_Count_1 03a1 00da | | Load_Top At_Offset_2 03a2 4801 |H | Short_Literal 0x1 03a3 e5f9 | | Load 0x2,-0x7 03a4 e00f | | Load 0x0,0xf 03a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03a6 00d1 | | Pop_Control Pop_Count_1 03a7 4801 |H | Short_Literal 0x1 03a8 00db | | Load_Top At_Offset_3 03a9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03aa e003 | | Load 0x0,0x3 03ab 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03ac 680f |h | Jump_Zero 0x3bc 03ad e5f8 | | Load 0x2,-0x8 03ae 00db | | Load_Top At_Offset_3 03af 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03b0 e003 | | Load 0x0,0x3 03b1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03b2 0092 065d | ]| Action Push_String_Extended,0x65d ; "Remote command \x22" 03b4 e5ff | | Load 0x2,-0x1 03b5 01cc | | Execute Vector,Catenate 03b6 0092 065e | ^| Action Push_String_Extended,0x65e ; "\x22 failed." 03b8 01cc | | Execute Vector,Catenate 03b9 8235 | 5 | Call 0x1,0x35 03ba c5f8 | | Store 0x2,-0x8 03bb 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03bc e5f9 | | Load 0x2,-0x7 03bd 680c |h | Jump_Zero 0x3ca 03be e005 | | Load 0x0,0x5 03bf 180e | | Execute Package,Field_Execute,Field_Number 0xe 03c0 4802 |H | Short_Literal 0x2 03c1 0092 065d | ]| Action Push_String_Extended,0x65d ; "Remote command \x22" 03c3 e5ff | | Load 0x2,-0x1 03c4 01cc | | Execute Vector,Catenate 03c5 0092 065f | _| Action Push_String_Extended,0x65f ; "\x22 executed successfully." 03c7 01cc | | Execute Vector,Catenate 03c8 e00d | | Load 0x0,0xd 03c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03ca 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03cb TRAP_0350: 03cb 0007 | | Action Break_Optional 03cc e5f8 | | Load 0x2,-0x8 03cd 0092 0660 | `| Action Push_String_Extended,0x660 ; "Execute_Command" 03cf 8239 | 9 | Call 0x1,0x39 03d0 c5f8 | | Store 0x2,-0x8 03d1 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03d2 0000 0000 | | .BLANK 0000[0x6] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03df | | .CONST 0x03df ; Address of begin 03d9 03f2 | | .CONST 0x03f2 ; Address of exception handler 03da 0002 | | .CONST 0x0002 ; Number of locals 03db INIT_03d8: 03db e21d | | Load 0x1,0x1d 03dc 02c7 | | Declare_Variable Any 03dd 00d8 | | Load_Top At_Offset_0 03de 1c00 | | Execute_Immediate Run_Utility,0x0 03df BODY_03d8: 03df 00d8 | | Load_Top At_Offset_0 03e0 c5fc | | Store 0x2,-0x4 03e1 e22e | . | Load 0x1,0x2e 03e2 c5fb | | Store 0x2,-0x5 03e3 e5fd | | Load 0x2,-0x3 03e4 680c |h | Jump_Zero 0x3f1 03e5 e005 | | Load 0x0,0x5 03e6 180e | | Execute Package,Field_Execute,Field_Number 0xe 03e7 4802 |H | Short_Literal 0x2 03e8 0092 0661 | a| Action Push_String_Extended,0x661 ; "Executed Unit_Update_Time for remote unit \x22" 03ea e5ff | | Load 0x2,-0x1 03eb 01cc | | Execute Vector,Catenate 03ec 0092 0659 | Y| Action Push_String_Extended,0x659 ; "\x22." 03ee 01cc | | Execute Vector,Catenate 03ef e00d | | Load 0x0,0xd 03f0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03f1 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03f2 TRAP_03d8: 03f2 0007 | | Action Break_Optional 03f3 e5fc | | Load 0x2,-0x4 03f4 0092 0662 | b| Action Push_String_Extended,0x662 ; "Unit_Update_Time" 03f6 8239 | 9 | Call 0x1,0x39 03f7 c5fc | | Store 0x2,-0x4 03f8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03f9 0000 0000 | | .BLANK 0000[0x7] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 041e | | .CONST 0x041e ; Address of begin 0401 0451 | Q | .CONST 0x0451 ; Address of exception handler 0402 0006 | | .CONST 0x0006 ; Number of locals 0403 INIT_0400: 0403 e006 | | Load 0x0,0x6 0404 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0405 e006 | | Load 0x0,0x6 0406 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0407 03f1 | | Declare_Variable Discrete,With_Value 0408 e231 | 1 | Load 0x1,0x31 0409 0322 | " | Declare_Variable Record 040a 00d8 | | Load_Top At_Offset_0 040b 1c01 | | Execute_Immediate Run_Utility,0x1 040c 00d9 | | Load_Top At_Offset_1 040d e234 | 4 | Load 0x1,0x34 040e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 040f 00d9 | | Load_Top At_Offset_1 0410 017d | } | Execute Record,Structure_Write 0411 00d8 | | Load_Top At_Offset_0 0412 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0413 e008 | | Load 0x0,0x8 0414 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0415 e21d | | Load 0x1,0x1d 0416 02c7 | | Declare_Variable Any 0417 00d8 | | Load_Top At_Offset_0 0418 1c00 | | Execute_Immediate Run_Utility,0x0 0419 e012 | | Load 0x0,0x12 041a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 041b 02c7 | | Declare_Variable Any 041c 00d8 | | Load_Top At_Offset_0 041d 1c00 | | Execute_Immediate Run_Utility,0x0 041e BODY_0400: 041e 00d9 | | Load_Top At_Offset_1 041f c5fc | | Store 0x2,-0x4 0420 4800 |H | Short_Literal 0x0 0421 a5fb | | Store_Unchecked 0x2,-0x5 0422 e5fe | | Load 0x2,-0x2 0423 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0424 e013 | | Load 0x0,0x13 0425 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0426 c406 | | Store 0x2,0x6 0427 00d9 | | Load_Top At_Offset_1 0428 e5fd | | Load 0x2,-0x3 0429 4801 |H | Short_Literal 0x1 042a 4800 |H | Short_Literal 0x0 042b 4800 |H | Short_Literal 0x0 042c 00ea | | Load_Encached Null_String_Cache 042d e5fe | | Load 0x2,-0x2 042e e406 | | Load 0x2,0x6 042f e012 | | Load 0x0,0x12 0430 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0431 0092 0663 | c| Action Push_String_Extended,0x663 ; " " 0433 01cc | | Execute Vector,Catenate 0434 e5ff | | Load 0x2,-0x1 0435 01cc | | Execute Vector,Catenate 0436 8224 | $ | Call 0x1,0x24 0437 c405 | | Store 0x2,0x5 0438 4802 |H | Short_Literal 0x2 0439 00da | | Load_Top At_Offset_2 043a e003 | | Load 0x0,0x3 043b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 043c 6801 |h | Jump_Zero 0x43e 043d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 043e 4801 |H | Short_Literal 0x1 043f a5fb | | Store_Unchecked 0x2,-0x5 0440 e5fd | | Load 0x2,-0x3 0441 680e |h | Jump_Zero 0x450 0442 e005 | | Load 0x0,0x5 0443 180e | | Execute Package,Field_Execute,Field_Number 0xe 0444 4802 |H | Short_Literal 0x2 0445 0092 0664 | d| Action Push_String_Extended,0x664 ; "Executed File_Exists for remote file \x22" 0447 e5ff | | Load 0x2,-0x1 0448 01cc | | Execute Vector,Catenate 0449 0092 0665 | e| Action Push_String_Extended,0x665 ; "\x22 on " 044b 01cc | | Execute Vector,Catenate 044c e404 | | Load 0x2,0x4 044d 01cc | | Execute Vector,Catenate 044e e00d | | Load 0x0,0xd 044f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0450 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0451 TRAP_0400: 0451 0007 | | Action Break_Optional 0452 e5fc | | Load 0x2,-0x4 0453 0092 0666 | f| Action Push_String_Extended,0x666 ; "File_Exists" 0455 8239 | 9 | Call 0x1,0x39 0456 c5fc | | Store 0x2,-0x4 0457 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045b | [ | .CONST 0x045b ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0001 | | .CONST 0x0001 ; Number of locals 045b BODY_0458: 045b INIT_0458: 045b 4608 |F | Jump_Case 0x9 045c 7808 |x | Jump 0x465 ; case 0x0 045d 7823 |x# | Jump 0x481 ; case 0x1 045e 782f |x/ | Jump 0x48e ; case 0x2 045f 782e |x. | Jump 0x48e ; case 0x3 0460 782d |x- | Jump 0x48e ; case 0x4 0461 782c |x, | Jump 0x48e ; case 0x5 0462 782b |x+ | Jump 0x48e ; case 0x6 0463 782a |x* | Jump 0x48e ; case 0x7 0464 7829 |x) | Jump 0x48e ; case 0x8 0465 00da | | Load_Top At_Offset_2 0466 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0467 0125 | % | Execute Any,Set_Constraint 0468 00da | | Load_Top At_Offset_2 0469 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 046a 1c00 | | Execute_Immediate Run_Utility,0x0 046b 00da | | Load_Top At_Offset_2 046c 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 046d 0125 | % | Execute Any,Set_Constraint 046e 00da | | Load_Top At_Offset_2 046f 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0470 1c00 | | Execute_Immediate Run_Utility,0x0 0471 00da | | Load_Top At_Offset_2 0472 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0473 0125 | % | Execute Any,Set_Constraint 0474 00da | | Load_Top At_Offset_2 0475 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0476 1c00 | | Execute_Immediate Run_Utility,0x0 0477 00da | | Load_Top At_Offset_2 0478 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0479 0125 | % | Execute Any,Set_Constraint 047a 00da | | Load_Top At_Offset_2 047b 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 047c 1c00 | | Execute_Immediate Run_Utility,0x0 047d 00da | | Load_Top At_Offset_2 047e 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 047f 1c00 | | Execute_Immediate Run_Utility,0x0 0480 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0481 00da | | Load_Top At_Offset_2 0482 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0483 0125 | % | Execute Any,Set_Constraint 0484 00da | | Load_Top At_Offset_2 0485 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0486 0125 | % | Execute Any,Set_Constraint 0487 00da | | Load_Top At_Offset_2 0488 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 0489 0125 | % | Execute Any,Set_Constraint 048a 00da | | Load_Top At_Offset_2 048b 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 048c 0125 | % | Execute Any,Set_Constraint 048d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 048e 0869 | i | Execute_Immediate Raise,0x69 048f 0000 | | .XXX[0x1] 0490 ; -------------------------------------------------------------------------------------- 0490 ; SUBPROGRAM 0490 ; -------------------------------------------------------------------------------------- 0490 049f | | .CONST 0x049f ; Address of begin 0491 0004 | | .CONST 0x0004 ; Address of exception handler 0492 0003 | | .CONST 0x0003 ; Number of locals 0493 INIT_0490: 0493 e006 | | Load 0x0,0x6 0494 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0495 e006 | | Load 0x0,0x6 0496 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0497 03f1 | | Declare_Variable Discrete,With_Value 0498 e006 | | Load 0x0,0x6 0499 1811 | | Execute Package,Field_Execute,Field_Number 0x11 049a e014 | | Load 0x0,0x14 049b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 049c e007 | | Load 0x0,0x7 049d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 049e 03f1 | | Declare_Variable Discrete,With_Value 049f BODY_0490: 049f 00d9 | | Load_Top At_Offset_1 04a0 e5ff | | Load 0x2,-0x1 04a1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 04a2 00d8 | | Load_Top At_Offset_0 04a3 e5ff | | Load 0x2,-0x1 04a4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04a5 4800 |H | Short_Literal 0x0 04a6 e5ff | | Load 0x2,-0x1 04a7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04a8 4800 |H | Short_Literal 0x0 04a9 e5ff | | Load 0x2,-0x1 04aa 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 04ab e005 | | Load 0x0,0x5 04ac 180e | | Execute Package,Field_Execute,Field_Number 0xe 04ad 4801 |H | Short_Literal 0x1 04ae 0092 0667 | g| Action Push_String_Extended,0x667 ; "Initialized Job_Record for job" 04b0 e402 | | Load 0x2,0x2 04b1 00e0 | | Load_Encached Standard_Cache 04b2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04b3 01cc | | Execute Vector,Catenate 04b4 0092 0668 | h| Action Push_String_Extended,0x668 ; ", task" 04b6 01cc | | Execute Vector,Catenate 04b7 00db | | Load_Top At_Offset_3 04b8 00d8 | | Load_Top At_Offset_0 04b9 00e2 | | Load_Encached Integer_Cache 04ba 0260 | ` | Execute Discrete,In_Type 04bb 7001 |p | Jump_Nonzero 0x4bd 04bc 0801 | | Execute_Immediate Raise,0x1 04bd 00e0 | | Load_Encached Standard_Cache 04be 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04bf 01cc | | Execute Vector,Catenate 04c0 e00d | | Load 0x0,0xd 04c1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04c2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04c3 0000 0000 | | .BLANK 0000[0x5] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cb | | .CONST 0x04cb ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0001 | | .CONST 0x0001 ; Number of locals 04cb BODY_04c8: 04cb INIT_04c8: 04cb e005 | | Load 0x0,0x5 04cc 180e | | Execute Package,Field_Execute,Field_Number 0xe 04cd 4801 |H | Short_Literal 0x1 04ce 0092 0669 | i| Action Push_String_Extended,0x669 ; "Finalizing Job_Record" 04d0 e00d | | Load 0x0,0xd 04d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04d2 4800 |H | Short_Literal 0x0 04d3 00db | | Load_Top At_Offset_3 04d4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 04d5 4800 |H | Short_Literal 0x0 04d6 00db | | Load_Top At_Offset_3 04d7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04d8 4800 |H | Short_Literal 0x0 04d9 00db | | Load_Top At_Offset_3 04da 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04db 4800 |H | Short_Literal 0x0 04dc 00db | | Load_Top At_Offset_3 04dd 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 04de 00da | | Load_Top At_Offset_2 04df 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 04e0 00ea | | Load_Encached Null_String_Cache 04e1 e008 | | Load 0x0,0x8 04e2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04e3 00d1 | | Pop_Control Pop_Count_1 04e4 00da | | Load_Top At_Offset_2 04e5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 04e6 00ea | | Load_Encached Null_String_Cache 04e7 e008 | | Load 0x0,0x8 04e8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04e9 00d1 | | Pop_Control Pop_Count_1 04ea 00da | | Load_Top At_Offset_2 04eb 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 04ec 00ea | | Load_Encached Null_String_Cache 04ed e008 | | Load 0x0,0x8 04ee 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04ef 00d1 | | Pop_Control Pop_Count_1 04f0 00da | | Load_Top At_Offset_2 04f1 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 04f2 00ea | | Load_Encached Null_String_Cache 04f3 e008 | | Load 0x0,0x8 04f4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04f6 0000 0000 | | .XXX[0x2] 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; SUBPROGRAM 04f8 ; -------------------------------------------------------------------------------------- 04f8 04fb | | .CONST 0x04fb ; Address of begin 04f9 0004 | | .CONST 0x0004 ; Address of exception handler 04fa 0001 | | .CONST 0x0001 ; Number of locals 04fb BODY_04f8: 04fb INIT_04f8: 04fb e5fd | | Load 0x2,-0x3 04fc 00db | | Load_Top At_Offset_3 04fd e5fe | | Load 0x2,-0x2 04fe 00ea | | Load_Encached Null_String_Cache 04ff e003 | | Load 0x0,0x3 0500 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0501 e003 | | Load 0x0,0x3 0502 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0503 c5fd | | Store 0x2,-0x3 0504 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0505 0000 0000 | | .XXX[0x3] 0507 0000 | | 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 052e | . | .CONST 0x052e ; Address of begin 0509 0560 | ` | .CONST 0x0560 ; Address of exception handler 050a 0005 | | .CONST 0x0005 ; Number of locals 050b INIT_0508: 050b e012 | | Load 0x0,0x12 050c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 050d 02c7 | | Declare_Variable Any 050e e5fa | | Load 0x2,-0x6 050f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0510 e013 | | Load 0x0,0x13 0511 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0512 a402 | | Store_Unchecked 0x2,0x2 0513 e015 | | Load 0x0,0x15 0514 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37 0515 02c7 | | Declare_Variable Any 0516 e5fa | | Load 0x2,-0x6 0517 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0518 e013 | | Load 0x0,0x13 0519 1811 | | Execute Package,Field_Execute,Field_Number 0x11 051a a403 | | Store_Unchecked 0x2,0x3 051b 00d8 | | Load_Top At_Offset_0 051c e015 | | Load 0x0,0x15 051d 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 051e e015 | | Load 0x0,0x15 051f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0520 03f1 | | Declare_Variable Discrete,With_Value 0521 e00f | | Load 0x0,0xf 0522 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0523 0322 | " | Declare_Variable Record 0524 00db | | Load_Top At_Offset_3 0525 e00f | | Load 0x0,0xf 0526 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0527 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 0528 0119 | | Execute Any,Check_In_Formal_Type 0529 00d9 | | Load_Top At_Offset_1 052a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 052b 00d9 | | Load_Top At_Offset_1 052c 00d9 | | Load_Top At_Offset_1 052d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 052e BODY_0508: 052e e00f | | Load 0x0,0xf 052f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0530 700a |p | Jump_Nonzero 0x53b 0531 e5f9 | | Load 0x2,-0x7 0532 e5fb | | Load 0x2,-0x5 0533 00da | | Load_Top At_Offset_2 0534 e5fd | | Load 0x2,-0x3 0535 e5fe | | Load 0x2,-0x2 0536 e5ff | | Load 0x2,-0x1 0537 e00f | | Load 0x0,0xf 0538 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0539 c5f9 | | Store 0x2,-0x7 053a 780e |x | Jump 0x549 053b e005 | | Load 0x0,0x5 053c 180e | | Execute Package,Field_Execute,Field_Number 0xe 053d 4801 |H | Short_Literal 0x1 053e 0092 066a | j| Action Push_String_Extended,0x66a ; "Connection to " 0540 e5ff | | Load 0x2,-0x1 0541 01cc | | Execute Vector,Catenate 0542 0092 066b | k| Action Push_String_Extended,0x66b ; " already exists for " 0544 01cc | | Execute Vector,Catenate 0545 e5fe | | Load 0x2,-0x2 0546 01cc | | Execute Vector,Catenate 0547 e00d | | Load 0x0,0xd 0548 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0549 4802 |H | Short_Literal 0x2 054a e5f9 | | Load 0x2,-0x7 054b e003 | | Load 0x0,0x3 054c 1817 | | Execute Package,Field_Execute,Field_Number 0x17 054d 6801 |h | Jump_Zero 0x54f 054e 4507 |E | Exit_Suprogram New_Top_Offset 0x7 054f 00db | | Load_Top At_Offset_3 0550 e012 | | Load 0x0,0x12 0551 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0552 680c |h | Jump_Zero 0x55f 0553 e5f9 | | Load 0x2,-0x7 0554 e5fb | | Load 0x2,-0x5 0555 4801 |H | Short_Literal 0x1 0556 4800 |H | Short_Literal 0x0 0557 4800 |H | Short_Literal 0x0 0558 00ea | | Load_Encached Null_String_Cache 0559 e5fa | | Load 0x2,-0x6 055a e402 | | Load 0x2,0x2 055b e012 | | Load 0x0,0x12 055c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 055d 8224 | $ | Call 0x1,0x24 055e c5f9 | | Store 0x2,-0x7 055f 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0560 TRAP_0508: 0560 0007 | | Action Break_Optional 0561 e5f9 | | Load 0x2,-0x7 0562 4802 |H | Short_Literal 0x2 0563 0092 066c | l| Action Push_String_Extended,0x66c ; "Exception " 0565 4800 |H | Short_Literal 0x0 0566 4801 |H | Short_Literal 0x1 0567 e016 | | Load 0x0,0x16 0568 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0569 01cc | | Execute Vector,Catenate 056a 0092 066d | m| Action Push_String_Extended,0x66d ; " caught in Remote_Commands.Telnet_Connect" 056c 01cc | | Execute Vector,Catenate 056d 8235 | 5 | Call 0x1,0x35 056e c5f9 | | Store 0x2,-0x7 056f 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 0573 | s | .CONST 0x0573 ; Address of begin 0571 0578 | x | .CONST 0x0578 ; Address of exception handler 0572 0001 | | .CONST 0x0001 ; Number of locals 0573 BODY_0570: 0573 INIT_0570: 0573 e006 | | Load 0x0,0x6 0574 180e | | Execute Package,Field_Execute,Field_Number 0xe 0575 e00f | | Load 0x0,0xf 0576 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0577 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0578 TRAP_0570: 0578 0007 | | Action Break_Optional 0579 e005 | | Load 0x0,0x5 057a 180e | | Execute Package,Field_Execute,Field_Number 0xe 057b 4808 |H | Short_Literal 0x8 057c 0092 066c | l| Action Push_String_Extended,0x66c ; "Exception " 057e 4800 |H | Short_Literal 0x0 057f 4801 |H | Short_Literal 0x1 0580 e016 | | Load 0x0,0x16 0581 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0582 01cc | | Execute Vector,Catenate 0583 0092 066e | n| Action Push_String_Extended,0x66e ; " caught in Remote_Commands.Telnet_Disconnect" 0585 01cc | | Execute Vector,Catenate 0586 e00d | | Load 0x0,0xd 0587 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0588 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0589 0000 0000 | | .BLANK 0000[0x7] 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 0004 | | .CONST 0x0004 ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 00db | | Load_Top At_Offset_3 0594 4802 |H | Short_Literal 0x2 0595 0092 066f | o| Action Push_String_Extended,0x66f ; "Remote connection has been broken. Can't execute command \x22" 0597 e5ff | | Load 0x2,-0x1 0598 01cc | | Execute Vector,Catenate 0599 0092 0659 | Y| Action Push_String_Extended,0x659 ; "\x22." 059b 01cc | | Execute Vector,Catenate 059c 8235 | 5 | Call 0x1,0x35 059d c5fe | | Store 0x2,-0x2 059e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 059f 0000 | | .XXX[0x1] 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a3 | | .CONST 0x05a3 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0001 | | .CONST 0x0001 ; Number of locals 05a3 BODY_05a0: 05a3 INIT_05a0: 05a3 00db | | Load_Top At_Offset_3 05a4 4802 |H | Short_Literal 0x2 05a5 0092 0670 | p| Action Push_String_Extended,0x670 ; "Unexpected exception during " 05a7 e5ff | | Load 0x2,-0x1 05a8 01cc | | Execute Vector,Catenate 05a9 0092 0671 | q| Action Push_String_Extended,0x671 ; " operation -- " 05ab 01cc | | Execute Vector,Catenate 05ac 4800 |H | Short_Literal 0x0 05ad 4801 |H | Short_Literal 0x1 05ae e016 | | Load 0x0,0x16 05af 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05b0 01cc | | Execute Vector,Catenate 05b1 8235 | 5 | Call 0x1,0x35 05b2 c5fe | | Store 0x2,-0x2 05b3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05b4 0000 0000 | | .BLANK 0000[0x4] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05bb | | .CONST 0x05bb ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0001 | | .CONST 0x0001 ; Number of locals 05bb BODY_05b8: 05bb INIT_05b8: 05bb e406 | | Load 0x2,0x6 05bc e5fb | | Load 0x2,-0x5 05bd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05be 0120 | | Execute Any,Is_Value 05bf 6803 |h | Jump_Zero 0x5c3 05c0 e002 | | Load 0x0,0x2 05c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05c2 7802 |x | Jump 0x5c5 05c3 e5fb | | Load 0x2,-0x5 05c4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05c5 e5fc | | Load 0x2,-0x4 05c6 00ea | | Load_Encached Null_String_Cache 05c7 e7fe | | Load 0x3,-0x2 05c8 e7ff | | Load 0x3,-0x1 05c9 e5ff | | Load 0x2,-0x1 05ca e002 | | Load 0x0,0x2 05cb 180f | | Execute Package,Field_Execute,Field_Number 0xf 05cc e5fb | | Load 0x2,-0x5 05cd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 05ce c406 | | Store 0x2,0x6 05cf 4802 |H | Short_Literal 0x2 05d0 e406 | | Load 0x2,0x6 05d1 e003 | | Load 0x0,0x3 05d2 1817 | | Execute Package,Field_Execute,Field_Number 0x17 05d3 6803 |h | Jump_Zero 0x5d7 05d4 e406 | | Load 0x2,0x6 05d5 c5fa | | Store 0x2,-0x6 05d6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05d7 e406 | | Load 0x2,0x6 05d8 e5fb | | Load 0x2,-0x5 05d9 e5fc | | Load 0x2,-0x4 05da 00ea | | Load_Encached Null_String_Cache 05db e7fe | | Load 0x3,-0x2 05dc e7ff | | Load 0x3,-0x1 05dd e5ff | | Load 0x2,-0x1 05de 8236 | 6 | Call 0x1,0x36 05df c406 | | Store 0x2,0x6 05e0 4802 |H | Short_Literal 0x2 05e1 e406 | | Load 0x2,0x6 05e2 e003 | | Load 0x0,0x3 05e3 1817 | | Execute Package,Field_Execute,Field_Number 0x17 05e4 6803 |h | Jump_Zero 0x5e8 05e5 e406 | | Load 0x2,0x6 05e6 c5fa | | Store 0x2,-0x6 05e7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05e8 4801 |H | Short_Literal 0x1 05e9 e404 | | Load 0x2,0x4 05ea 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 05eb e006 | | Load 0x0,0x6 05ec 180f | | Execute Package,Field_Execute,Field_Number 0xf 05ed e404 | | Load 0x2,0x4 05ee 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 05ef e5fb | | Load 0x2,-0x5 05f0 e404 | | Load 0x2,0x4 05f1 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 05f2 e404 | | Load 0x2,0x4 05f3 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 05f4 e5ff | | Load 0x2,-0x1 05f5 e008 | | Load 0x0,0x8 05f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05f7 00d1 | | Pop_Control Pop_Count_1 05f8 e404 | | Load 0x2,0x4 05f9 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 05fa 00db | | Load_Top At_Offset_3 05fb e008 | | Load 0x0,0x8 05fc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05fd 00d1 | | Pop_Control Pop_Count_1 05fe e404 | | Load 0x2,0x4 05ff 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0600 e7fe | | Load 0x3,-0x2 0601 e008 | | Load 0x0,0x8 0602 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0603 00d1 | | Pop_Control Pop_Count_1 0604 4800 |H | Short_Literal 0x0 0605 e403 | | Load 0x2,0x3 0606 e404 | | Load 0x2,0x4 0607 e234 | 4 | Load 0x1,0x34 0608 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0609 e5fc | | Load 0x2,-0x4 060a 6809 |h | Jump_Zero 0x614 060b e005 | | Load 0x0,0x5 060c 180e | | Execute Package,Field_Execute,Field_Number 0xe 060d 4802 |H | Short_Literal 0x2 060e 0092 0672 | r| Action Push_String_Extended,0x672 ; "Built a connection to remote machine " 0610 e5ff | | Load 0x2,-0x1 0611 01cc | | Execute Vector,Catenate 0612 e00d | | Load 0x0,0xd 0613 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0614 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0615 0000 0000 | | .XXX[0x3] 0617 0000 | | 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 0620 | | .CONST 0x0620 ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0002 | | .CONST 0x0002 ; Number of locals 061b INIT_0618: 061b e00f | | Load 0x0,0xf 061c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 061d 0322 | " | Declare_Variable Record 061e 00d8 | | Load_Top At_Offset_0 061f 1c00 | | Execute_Immediate Run_Utility,0x0 0620 BODY_0618: 0620 00d8 | | Load_Top At_Offset_0 0621 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0622 e7ff | | Load 0x3,-0x1 0623 e008 | | Load 0x0,0x8 0624 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0625 00d1 | | Pop_Control Pop_Count_1 0626 4801 |H | Short_Literal 0x1 0627 00d9 | | Load_Top At_Offset_1 0628 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0629 00d8 | | Load_Top At_Offset_0 062a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 062b 0000 0000 | | .BLANK 0000[0x5] 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 4608 |F | Jump_Case 0x9 0634 7808 |x | Jump 0x63d ; case 0x0 0635 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0636 7811 |x | Jump 0x648 ; case 0x2 0637 7810 |x | Jump 0x648 ; case 0x3 0638 780f |x | Jump 0x648 ; case 0x4 0639 780e |x | Jump 0x648 ; case 0x5 063a 780d |x | Jump 0x648 ; case 0x6 063b 780c |x | Jump 0x648 ; case 0x7 063c 780b |x | Jump 0x648 ; case 0x8 063d e001 | | Load 0x0,0x1 063e 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 063f 00db | | Load_Top At_Offset_3 0640 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0641 00da | | Load_Top At_Offset_2 0642 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0643 0125 | % | Execute Any,Set_Constraint 0644 00da | | Load_Top At_Offset_2 0645 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0646 1c00 | | Execute_Immediate Run_Utility,0x0 0647 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0648 0869 | i | Execute_Immediate Raise,0x69 0649 ; -------------------------------------------------------------------------------------- 0649 ; STRING TABLE 0649 ; -------------------------------------------------------------------------------------- 0649 0056 | V | .STRTAB 0x0056->0x0674 ; "TEXT" 064a 0058 | X | .STRTAB 0x0058->0x0676 ; "BINARY" 064b 005c | \ | .STRTAB 0x005c->0x0679 ; "<PROFILE>" 064c 0063 | c | .STRTAB 0x0063->0x067d ; "<PROFILE>,~+++,~---,~:::" 064d 0079 | y | .STRTAB 0x0079->0x0689 ; "Reusing the existing connection to " 064e 009a | | .STRTAB 0x009a->0x069b ; "Acquire" 064f 009f | | .STRTAB 0x009f->0x069e ; "Released the connection to " 0650 00b8 | | .STRTAB 0x00b8->0x06ac ; "Release" 0651 00bd | | .STRTAB 0x00bd->0x06af ; "Destroyed the connection to " 0652 00d7 | | .STRTAB 0x00d7->0x06bd ; "Destroy" 0653 00dc | | .STRTAB 0x00dc->0x06c1 ; "Set_Remote_Directory" 0654 00ee | | .STRTAB 0x00ee->0x06cb ; "Reusing the existing directory." 0655 010b | | .STRTAB 0x010b->0x06da ; "Put" 0656 010c | | .STRTAB 0x010c->0x06dc ; "Get" 0657 010d | | .STRTAB 0x010d->0x06dd ; "Uploaded host unit \x22" 0658 011f | | .STRTAB 0x011f->0x06e7 ; "\x22 from remote unit \x22" 0659 0131 | 1 | .STRTAB 0x0131->0x06f1 ; "\x22." 065a 0131 | 1 | .STRTAB 0x0131->0x06f2 ; "Can't get unit \x22" 065b 013f | ? | .STRTAB 0x013f->0x06fa ; "\x22 from remote file \x22" 065c 0151 | Q | .STRTAB 0x0151->0x0704 ; "<WORLDS>" 065d 0157 | W | .STRTAB 0x0157->0x0708 ; "Remote command \x22" 065e 0165 | e | .STRTAB 0x0165->0x0710 ; "\x22 failed." 065f 016c | l | .STRTAB 0x016c->0x0715 ; "\x22 executed successfully." 0660 0182 | | .STRTAB 0x0182->0x0721 ; "Execute_Command" 0661 018f | | .STRTAB 0x018f->0x0728 ; "Executed Unit_Update_Time for remote unit \x22" 0662 01b8 | | .STRTAB 0x01b8->0x073e ; "Unit_Update_Time" 0663 01c6 | | .STRTAB 0x01c6->0x0746 ; " " 0664 01c5 | | .STRTAB 0x01c5->0x0746 ; "Executed File_Exists for remote file \x22" 0665 01e9 | | .STRTAB 0x01e9->0x0759 ; "\x22 on " 0666 01ec | | .STRTAB 0x01ec->0x075c ; "File_Exists" 0667 01f5 | | .STRTAB 0x01f5->0x0761 ; "Initialized Job_Record for job" 0668 0211 | | .STRTAB 0x0211->0x0770 ; ", task" 0669 0215 | | .STRTAB 0x0215->0x0773 ; "Finalizing Job_Record" 066a 0228 | ( | .STRTAB 0x0228->0x077e ; "Connection to " 066b 0234 | 4 | .STRTAB 0x0234->0x0785 ; " already exists for " 066c 0246 | F | .STRTAB 0x0246->0x078f ; "Exception " 066d 024e | N | .STRTAB 0x024e->0x0794 ; " caught in Remote_Commands.Telnet_Connect" 066e 0275 | u | .STRTAB 0x0275->0x07a8 ; " caught in Remote_Commands.Telnet_Disconnect" 066f 029f | | .STRTAB 0x029f->0x07be ; "Remote connection has been broken. Can't execute command \x22" 0670 02d8 | | .STRTAB 0x02d8->0x07dc ; "Unexpected exception during " 0671 02f2 | | .STRTAB 0x02f2->0x07ea ; " operation -- " 0672 02fe | | .STRTAB 0x02fe->0x07f1 ; "Built a connection to remote machine " 0673 0321 | ! | .STREND 0x0321->0x0803 0674 5445 5854 |TEXT| .STRTAB_STRINGS 0804 0000 0000 | | .BLANK 0000[0x4] 0808 ; -------------------------------------------------------------------------------------- 0808 ; Debug Table 0808 ; -------------------------------------------------------------------------------------- 0808 0004 000c | | .DEBUG4 0x0004,0x000c,0x2df9,0x0000,0x0001,0x0000 080e 0004 0090 | | .XXX[0x1d] 0810 6a8b c000 |j | 0812 05cb d200 | | 0814 0020 0180 | | 0816 013a 0000 | : | 0818 0008 7b00 | { | 081a 011e 0000 | | 081c 000a 0050 | P| 081e 0000 0010 | | 0820 0000 0400 | | 0822 0000 2200 | " | 0824 0000 0010 | | 0826 0000 00a4 | | 0828 0008 f051 | Q| 082a 4810 |H | 082b 0000 0000 | | .BLANK 0000[0x11] 083c 0004 0008 | | .XXX[0x4] 083e c03a e290 | : | 0840 0000 0000 | | .BLANK 0000[0x8] 0848 0012 0d51 | Q| .XXX[0x1c] 084a 7800 00ba |x | 084c 4240 0004 |B@ | 084e 0030 0027 | 0 '| 0850 4000 0001 |@ | 0852 0f60 0024 | ` $| 0854 0000 0001 | | 0856 400a 0000 |@ | 0858 0002 0000 | | 085a 0080 0000 | | 085c 0440 0000 | @ | 085e 0002 0000 | | 0860 0014 8001 | | 0862 2001 a9fa | | 0864 0000 0000 | | .BLANK 0000[0x12] 0876 8001 2001 | | .XXX[0x3] 0878 47f6 |G | 0879 0000 0000 | | .BLANK 0000[0x8] 0881 0002 41aa | A | .XXX[0x1d] 0883 2f00 0017 |/ | 0885 4948 0000 |IH | 0887 8006 0004 | | 0889 e800 0000 | | 088b 21ec 0004 |! | 088d 8800 0000 | | 088f 2801 4000 |( @ | 0891 0000 4000 | @ | 0893 0010 0000 | | 0895 0088 0000 | | 0897 0000 4000 | @ | 0899 0002 9000 | | 089b 2440 3a6b |$@:k| 089d c000 | | 089e 0000 0000 | | .BLANK 0000[0x11] 08af 1000 2440 | $@| .XXX[0x4] 08b1 3a71 4000 |:q@ | 08b3 0000 0000 | | .BLANK 0000[0x8] 08bb 4835 45e0 |H5E | .XXX[0x1c] 08bd 0002 e969 | i| 08bf 0000 1000 | | 08c1 c000 9d00 | | 08c3 0000 043d | =| 08c5 8000 9200 | | 08c7 0000 0500 | | 08c9 2800 0000 |( | 08cb 0800 0002 | | 08cd 0000 0011 | | 08cf 0000 0000 | | 08d1 0800 0000 | | 08d3 5200 0488 |R | 08d5 074d 7800 | Mx | 08d7 0000 0000 | | .BLANK 0000[0x11] 08e8 0200 0490 | | .XXX[0x4] 08ea 0877 e800 | w | 08ec 0000 0000 | | .BLANK 0000[0x8] 08f4 0906 a8bc | | .XXX[0x1c] 08f6 0000 5d31 | ]1| 08f8 2000 0200 | | 08fa 1800 13a0 | | 08fc 0000 0087 | | 08fe b000 1260 | `| 0900 0000 00a0 | | 0902 0500 0000 | | 0904 0100 0000 | | 0906 4000 0002 |@ | 0908 2000 0000 | | 090a 0100 0000 | | 090c 0a40 0093 | @ | 090e 0116 9200 | | 0910 0000 0000 | | .BLANK 0000[0x11] 0921 0040 0092 | @ | .XXX[0x4] 0923 010e fd00 | | 0925 0000 0000 | | .BLANK 0000[0x8] 092d 0120 d518 | | .XXX[0x31] 092f c000 09ce | | 0931 a400 0040 | @| 0933 0300 0274 | t| 0935 0000 000b | | 0937 bd00 0008 | | 0939 0000 0034 | 4| 093b 00a0 0000 | | 093d 0020 0000 | | 093f 0800 0000 | | 0941 4400 0000 |D | 0943 0020 0000 | | 0945 0148 0000 | H | 0947 4084 3568 |@ 5h| 0949 0000 4087 | @ | 094b ee48 0000 | H | 094d 4086 f0a0 |@ | 094f 0000 0000 | | 0951 0008 0000 | | 0953 4087 ed48 |@ H| 0955 0000 4075 | @u| 0957 58a0 0000 |X | 0959 0000 0008 | | 095b 0000 4088 | @ | 095d 6820 |h | 095e 0000 0000 | | .BLANK 0000[0x8] 0966 0024 1aa3 | $ | .XXX[0x1c] 0968 2800 0139 |( 9| 096a d480 0008 | | 096c 0060 004e | ` N| 096e 8000 0002 | | 0970 8300 0001 | | 0972 0000 0002 | | 0974 8014 0000 | | 0976 0004 0000 | | 0978 0100 0000 | | 097a 0880 0000 | | 097c 0004 0000 | | 097e 0029 0000 | ) | 0980 0811 2efc | . | 0982 0000 0000 | | .BLANK 0000[0x11] 0993 0001 0000 | | .XXX[0x4] 0995 0812 5394 | S | 0997 0000 0000 | | .BLANK 0000[0x8] 099f 0004 8354 | T| .XXX[0x1d] 09a1 6700 0027 |g '| 09a3 3a90 0001 |: | 09a5 000c 0009 | | 09a7 d000 0000 | | 09a9 4c44 0000 |LD | 09ab 2000 0000 | | 09ad 5002 8000 |P | 09af 0000 8000 | | 09b1 0020 0000 | | 09b3 0110 0000 | | 09b5 0000 8000 | | 09b7 0005 2000 | | 09b9 0102 1f7f | | 09bb 8000 | | 09bc 0000 0000 | | .BLANK 0000[0x8] 09c4 2000 0102 | | .XXX[0x3] 09c6 21bf |! | 09c7 0000 0000 | | .BLANK 0000[0x39]