|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0228 | ( | .CONST 0x0228 ; 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 0038 | 8 | .CONST 0x0038 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0017 | | .CONST 0x0017 ; Number of locals
000b INIT_0008:
000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
000d 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated
000f 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
0011 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
0013 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
0015 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
0017 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0019 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated
001b 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated
001d 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
001f 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0021 00bf | | Action Accept_Activation
0022 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0023 00c7 | | Action Elaborate_Subprogram
0024 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0025 00c7 | | Action Elaborate_Subprogram
0026 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0027 00c7 | | Action Elaborate_Subprogram
0028 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0029 00c7 | | Action Elaborate_Subprogram
002a 1d11 | | Execute_Immediate Reference_Lex_1,0x11
002b 00c7 | | Action Elaborate_Subprogram
002c 1d12 | | Execute_Immediate Reference_Lex_1,0x12
002d 00c7 | | Action Elaborate_Subprogram
002e 1d13 | | Execute_Immediate Reference_Lex_1,0x13
002f 00c7 | | Action Elaborate_Subprogram
0030 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0031 00c7 | | Action Elaborate_Subprogram
0032 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0033 00c7 | | Action Elaborate_Subprogram
0034 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0035 00c7 | | Action Elaborate_Subprogram
0036 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0037 00c7 | | Action Elaborate_Subprogram
0038 BODY_0008:
0038 00bc | | Action Signal_Activated
0039 00bb | | Action Signal_Completion
003a 0000 0000 | | .BLANK 0000[0x6]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 e001 | | Load 0x0,0x1
0044 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0045 7005 |p | Jump_Nonzero 0x4b
0046 0092 01ef | | Action Push_String_Extended,0x1ef ; "Insight not Authorized on this machine"
0048 e002 | | Load 0x0,0x2
0049 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
004a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
004b e001 | | Load 0x0,0x1
004c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
004d 7005 |p | Jump_Nonzero 0x53
004e 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
0050 e002 | | Load 0x0,0x2
0051 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0052 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0053 00ea | | Load_Encached Null_String_Cache
0054 00ea | | Load_Encached Null_String_Cache
0055 e001 | | Load 0x0,0x1
0056 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0057 e001 | | Load 0x0,0x1
0058 180f | | Execute Package,Field_Execute,Field_Number 0xf
0059 e001 | | Load 0x0,0x1
005a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
005b e001 | | Load 0x0,0x1
005c 180d | | Execute Package,Field_Execute,Field_Number 0xd
005d e001 | | Load 0x0,0x1
005e 180d | | Execute Package,Field_Execute,Field_Number 0xd
005f e001 | | Load 0x0,0x1
0060 180e | | Execute Package,Field_Execute,Field_Number 0xe
0061 00e1 | | Load_Encached Boolean_Cache
0062 011c | | Execute Any,Convert_Unchecked
0063 1c01 | | Execute_Immediate Run_Utility,0x1
0064 6007 |` | Indirect_Literal Discrete,0x6c,{0x00000000, 0x000007d0}
0065 48c8 |H | Short_Literal 0xc8
0066 e003 | | Load 0x0,0x3
0067 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0068 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0069 0000 0000 | | .XXX[0x3]
006b 0000 | |
006c 0000 0000 | | .LITERAL {0x00000000, 0x000007d0}
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 e001 | | Load 0x0,0x1
0074 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0075 7005 |p | Jump_Nonzero 0x7b
0076 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
0078 e002 | | Load 0x0,0x2
0079 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
007a 4507 |E | Exit_Suprogram New_Top_Offset 0x7
007b e5fa | | Load 0x2,-0x6
007c e5fc | | Load 0x2,-0x4
007d e5fb | | Load 0x2,-0x5
007e e5fd | | Load 0x2,-0x3
007f e5fe | | Load 0x2,-0x2
0080 e5ff | | Load 0x2,-0x1
0081 e001 | | Load 0x0,0x1
0082 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0083 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0084 0000 0000 | | .BLANK 0000[0x4]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008d | | .CONST 0x008d ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0002 | | .CONST 0x0002 ; Number of locals
008b INIT_0088:
008b e001 | | Load 0x0,0x1
008c 180d | | Execute Package,Field_Execute,Field_Number 0xd
008d BODY_0088:
008d e001 | | Load 0x0,0x1
008e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
008f 7005 |p | Jump_Nonzero 0x95
0090 0092 01ef | | Action Push_String_Extended,0x1ef ; "Insight not Authorized on this machine"
0092 e002 | | Load 0x0,0x2
0093 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0094 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0095 e001 | | Load 0x0,0x1
0096 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0097 7005 |p | Jump_Nonzero 0x9d
0098 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
009a e002 | | Load 0x0,0x2
009b 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
009c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
009d 00ea | | Load_Encached Null_String_Cache
009e 00ea | | Load_Encached Null_String_Cache
009f e001 | | Load 0x0,0x1
00a0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00a1 e001 | | Load 0x0,0x1
00a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a3 e001 | | Load 0x0,0x1
00a4 180f | | Execute Package,Field_Execute,Field_Number 0xf
00a5 00ea | | Load_Encached Null_String_Cache
00a6 e402 | | Load 0x2,0x2
00a7 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
00a9 01cc | | Execute Vector,Catenate
00aa e402 | | Load 0x2,0x2
00ab e001 | | Load 0x0,0x1
00ac 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00ad 01cc | | Execute Vector,Catenate
00ae 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
00b0 01cc | | Execute Vector,Catenate
00b1 e001 | | Load 0x0,0x1
00b2 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
00b3 01cc | | Execute Vector,Catenate
00b4 e402 | | Load 0x2,0x2
00b5 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
00b7 01cc | | Execute Vector,Catenate
00b8 e402 | | Load 0x2,0x2
00b9 e001 | | Load 0x0,0x1
00ba 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00bb 01cc | | Execute Vector,Catenate
00bc 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
00be 01cc | | Execute Vector,Catenate
00bf e001 | | Load 0x0,0x1
00c0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00c1 01cc | | Execute Vector,Catenate
00c2 6005 |` | Indirect_Literal Discrete,0xc8,{0x00000000, 0x000007d1}
00c3 48c9 |H | Short_Literal 0xc9
00c4 e003 | | Load 0x0,0x3
00c5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00c7 0000 | | .XXX[0x1]
00c8 0000 0000 | | .LITERAL {0x00000000, 0x000007d1}
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 e001 | | Load 0x0,0x1
00d4 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00d5 7005 |p | Jump_Nonzero 0xdb
00d6 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
00d8 e002 | | Load 0x0,0x2
00d9 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
00da 4509 |E | Exit_Suprogram New_Top_Offset 0x9
00db e5f8 | | Load 0x2,-0x8
00dc e5f9 | | Load 0x2,-0x7
00dd e5fa | | Load 0x2,-0x6
00de e5fb | | Load 0x2,-0x5
00df e5fc | | Load 0x2,-0x4
00e0 e5fd | | Load 0x2,-0x3
00e1 e5fe | | Load 0x2,-0x2
00e2 e5ff | | Load 0x2,-0x1
00e3 e001 | | Load 0x0,0x1
00e4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00e5 4509 |E | Exit_Suprogram New_Top_Offset 0x9
00e6 0000 0000 | | .XXX[0x2]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb e001 | | Load 0x0,0x1
00ec 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
00ed 7005 |p | Jump_Nonzero 0xf3
00ee 0092 01ef | | Action Push_String_Extended,0x1ef ; "Insight not Authorized on this machine"
00f0 e002 | | Load 0x0,0x2
00f1 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
00f2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00f3 e001 | | Load 0x0,0x1
00f4 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00f5 7005 |p | Jump_Nonzero 0xfb
00f6 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
00f8 e002 | | Load 0x0,0x2
00f9 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
00fa 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00fb 00ea | | Load_Encached Null_String_Cache
00fc 00ea | | Load_Encached Null_String_Cache
00fd 00ea | | Load_Encached Null_String_Cache
00fe 00ea | | Load_Encached Null_String_Cache
00ff 00ea | | Load_Encached Null_String_Cache
0100 00ea | | Load_Encached Null_String_Cache
0101 00ea | | Load_Encached Null_String_Cache
0102 e001 | | Load 0x0,0x1
0103 180d | | Execute Package,Field_Execute,Field_Number 0xd
0104 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
0106 01cc | | Execute Vector,Catenate
0107 e001 | | Load 0x0,0x1
0108 180d | | Execute Package,Field_Execute,Field_Number 0xd
0109 e001 | | Load 0x0,0x1
010a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
010b 01cc | | Execute Vector,Catenate
010c 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
010e 01cc | | Execute Vector,Catenate
010f e001 | | Load 0x0,0x1
0110 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0111 01cc | | Execute Vector,Catenate
0112 6005 |` | Indirect_Literal Discrete,0x118,{0x00000000, 0x000007d2}
0113 48ca |H | Short_Literal 0xca
0114 e003 | | Load 0x0,0x3
0115 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0116 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0117 0000 | | .XXX[0x1]
0118 0000 0000 | | .LITERAL {0x00000000, 0x000007d2}
011c 0000 0000 | | .BLANK 0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 e001 | | Load 0x0,0x1
0124 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0125 7005 |p | Jump_Nonzero 0x12b
0126 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
0128 e002 | | Load 0x0,0x2
0129 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
012a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
012b 00db | | Load_Top At_Offset_3
012c 00db | | Load_Top At_Offset_3
012d e001 | | Load 0x0,0x1
012e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
012f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0135 | 5 | .CONST 0x0135 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0002 | | .CONST 0x0002 ; Number of locals
0133 INIT_0130:
0133 e001 | | Load 0x0,0x1
0134 180d | | Execute Package,Field_Execute,Field_Number 0xd
0135 BODY_0130:
0135 e001 | | Load 0x0,0x1
0136 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0137 7005 |p | Jump_Nonzero 0x13d
0138 0092 01ef | | Action Push_String_Extended,0x1ef ; "Insight not Authorized on this machine"
013a e002 | | Load 0x0,0x2
013b 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
013c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
013d e001 | | Load 0x0,0x1
013e 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
013f 7005 |p | Jump_Nonzero 0x145
0140 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
0142 e002 | | Load 0x0,0x2
0143 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0144 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0145 00ea | | Load_Encached Null_String_Cache
0146 e001 | | Load 0x0,0x1
0147 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0148 e001 | | Load 0x0,0x1
0149 181d | | Execute Package,Field_Execute,Field_Number 0x1d
014a e001 | | Load 0x0,0x1
014b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
014c e001 | | Load 0x0,0x1
014d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
014e e001 | | Load 0x0,0x1
014f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0150 e402 | | Load 0x2,0x2
0151 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
0153 01cc | | Execute Vector,Catenate
0154 e402 | | Load 0x2,0x2
0155 e001 | | Load 0x0,0x1
0156 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0157 01cc | | Execute Vector,Catenate
0158 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
015a 01cc | | Execute Vector,Catenate
015b e001 | | Load 0x0,0x1
015c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
015d 01cc | | Execute Vector,Catenate
015e e001 | | Load 0x0,0x1
015f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0160 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
0162 01cc | | Execute Vector,Catenate
0163 e001 | | Load 0x0,0x1
0164 180f | | Execute Package,Field_Execute,Field_Number 0xf
0165 01cc | | Execute Vector,Catenate
0166 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
0168 01cc | | Execute Vector,Catenate
0169 e001 | | Load 0x0,0x1
016a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
016b 01cc | | Execute Vector,Catenate
016c 6007 |` | Indirect_Literal Discrete,0x174,{0x00000000, 0x000007d3}
016d 48cb |H | Short_Literal 0xcb
016e e003 | | Load 0x0,0x3
016f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0170 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0171 0000 0000 | | .XXX[0x3]
0173 0000 | |
0174 0000 0000 | | .LITERAL {0x00000000, 0x000007d3}
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b e001 | | Load 0x0,0x1
017c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
017d 7005 |p | Jump_Nonzero 0x183
017e 0092 01f0 | | Action Push_String_Extended,0x1f0 ; "No tokens left, Try again later"
0180 e002 | | Load 0x0,0x2
0181 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0182 4509 |E | Exit_Suprogram New_Top_Offset 0x9
0183 e5f8 | | Load 0x2,-0x8
0184 e5f9 | | Load 0x2,-0x7
0185 e5fa | | Load 0x2,-0x6
0186 e5fb | | Load 0x2,-0x5
0187 e5fc | | Load 0x2,-0x4
0188 e5fd | | Load 0x2,-0x3
0189 e5fe | | Load 0x2,-0x2
018a e5ff | | Load 0x2,-0x1
018b e001 | | Load 0x0,0x1
018c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
018d 4509 |E | Exit_Suprogram New_Top_Offset 0x9
018e 0000 0000 | | .XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 0092 01f2 | | Action Push_String_Extended,0x1f2 ; "\x1b]2011;"
0195 00db | | Load_Top At_Offset_3
0196 e001 | | Load 0x0,0x1
0197 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0198 01cc | | Execute Vector,Catenate
0199 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
019b 01cc | | Execute Vector,Catenate
019c 00ea | | Load_Encached Null_String_Cache
019d 01cc | | Execute Vector,Catenate
019e 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
01a0 01cc | | Execute Vector,Catenate
01a1 e5fe | | Load 0x2,-0x2
01a2 e001 | | Load 0x0,0x1
01a3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01a4 01cc | | Execute Vector,Catenate
01a5 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
01a7 01cc | | Execute Vector,Catenate
01a8 e5fe | | Load 0x2,-0x2
01a9 e001 | | Load 0x0,0x1
01aa 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01ab 01cc | | Execute Vector,Catenate
01ac 0092 01f3 | | Action Push_String_Extended,0x1f3 ; "\x07"
01ae 01cc | | Execute Vector,Catenate
01af e004 | | Load 0x0,0x4
01b0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01b1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01b2 0000 0000 | | .BLANK 0000[0x6]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 0092 01f4 | | Action Push_String_Extended,0x1f4 ; "\x1b]2012;"
01bd 00db | | Load_Top At_Offset_3
01be e001 | | Load 0x0,0x1
01bf 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01c0 01cc | | Execute Vector,Catenate
01c1 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
01c3 01cc | | Execute Vector,Catenate
01c4 00db | | Load_Top At_Offset_3
01c5 e001 | | Load 0x0,0x1
01c6 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01c7 01cc | | Execute Vector,Catenate
01c8 0092 01f3 | | Action Push_String_Extended,0x1f3 ; "\x07"
01ca 01cc | | Execute Vector,Catenate
01cb e004 | | Load 0x0,0x4
01cc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01cd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 0092 01f5 | | Action Push_String_Extended,0x1f5 ; "\x1b]2013;"
01d5 00db | | Load_Top At_Offset_3
01d6 e001 | | Load 0x0,0x1
01d7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01d8 01cc | | Execute Vector,Catenate
01d9 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
01db 01cc | | Execute Vector,Catenate
01dc 00db | | Load_Top At_Offset_3
01dd e001 | | Load 0x0,0x1
01de 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01df 01cc | | Execute Vector,Catenate
01e0 0092 01f1 | | Action Push_String_Extended,0x1f1 ; "\x5c"
01e2 01cc | | Execute Vector,Catenate
01e3 00db | | Load_Top At_Offset_3
01e4 e001 | | Load 0x0,0x1
01e5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01e6 e001 | | Load 0x0,0x1
01e7 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
01e8 01cc | | Execute Vector,Catenate
01e9 0092 01f3 | | Action Push_String_Extended,0x1f3 ; "\x07"
01eb 01cc | | Execute Vector,Catenate
01ec e004 | | Load 0x0,0x4
01ed 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01ee 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01ef ; --------------------------------------------------------------------------------------
01ef ; STRING TABLE
01ef ; --------------------------------------------------------------------------------------
01ef 0010 | | .STRTAB 0x0010->0x01f7 ; "Insight not Authorized on this machine"
01f0 0034 | 4 | .STRTAB 0x0034->0x020a ; "No tokens left, Try again later"
01f1 0051 | Q | .STRTAB 0x0051->0x0219 ; "\x5c"
01f2 0050 | P | .STRTAB 0x0050->0x021a ; "\x1b]2011;"
01f3 0055 | U | .STRTAB 0x0055->0x021d ; "\x07"
01f4 0054 | T | .STRTAB 0x0054->0x021e ; "\x1b]2012;"
01f5 0059 | Y | .STRTAB 0x0059->0x0221 ; "\x1b]2013;"
01f6 005e | ^ | .STREND 0x005e->0x0225
01f7 496e 7369 |Insi| .STRTAB_STRINGS
0225 0000 0000 | | .XXX[0x3]
0227 0000 | |
0228 ; --------------------------------------------------------------------------------------
0228 ; Debug Table
0228 ; --------------------------------------------------------------------------------------
0228 0004 0012 | | .DEBUG4 0x0004,0x0012,0x273f,0x0000,0x0001,0x0000
022e 6110 22d1 |a " | .XXX[0x1d2]
0230 ebce 2003 | |
0232 6ba1 7448 |k tH|
0234 603d 73dd |`=s |
0236 10cc 1803 | |
0238 79c8 0bcd |y |
023a 7384 c03d |s =|
023c bbde d310 | |
023e 1802 9801 | |
0240 bbf6 138a | |
0242 9801 c7f5 | |
0244 977a 9801 | z |
0246 d3f6 a3c9 | |
0248 bbde 2003 | |
024a 015a 9801 | Z |
024c e7f5 2ce1 | , |
024e 1944 0802 | D |
0250 d03a afe6 | : |
0252 2003 a83a | :|
0254 67ce 5ee9 |g ^ |
0256 aae2 dc7d | }|
0258 efde 2000 | |
025a 015d 449c | ]D |
025c 0bcd 8da0 | |
025e e94b d0ec | K |
0260 695e 9800 |i^ |
0262 5739 2f7a |W9/z|
0264 9802 7dbe | } |
0266 5f96 9c00 |_ |
0268 17c2 f99a | |
026a bbcc c77e | ~|
026c 98a2 9c00 | |
026e 9b8a 24f9 | $ |
0270 a969 20a2 | i |
0272 d7cc c77e | ~|
0274 ca9b d0ee | |
0276 b6f4 a0a0 | |
0278 843b 680b | ;h |
027a d0ec 5157 | QW|
027c 3cfc 0bce |< |
027e 8e4f 2e6f | O.o|
0280 d0ec ad56 | V|
0282 9c03 b5ed | |
0284 2f7a 9c03 |/z |
0286 a97e a984 | ~ |
0288 1802 9c02 | |
028a a587 837b | {|
028c 8cfd 35f3 | 5 |
028e 5fce 2002 |_ |
0290 617f c485 |a |
0292 d2b3 4c0e | L |
0294 98a2 9c02 | |
0296 36db 8c61 |6 a|
0298 494a 9c01 |IJ |
029a 91a5 5ef4 | ^ |
029c 1802 9c03 | |
029e bb5c e3b6 | \ |
02a0 9c00 0dcf | |
02a2 e230 cf43 | 0 C|
02a4 473a 2956 |G:)V|
02a6 3d7e a003 |=~ |
02a8 a61f 4186 | A |
02aa 9c17 f83d | =|
02ac 8c3a c413 | : |
02ae d0ec 6841 | hA|
02b0 8fe9 80ce | |
02b2 bf63 d0ee | c |
02b4 a727 d0ed | ' |
02b6 20a1 bfea | |
02b8 67d1 37d3 |g 7 |
02ba 6110 fad9 |a |
02bc 74cf 77ca |t w |
02be 2401 9c45 |$ E|
02c0 47d1 e6d9 |G |
02c2 6efb 6112 |n a |
02c4 2401 bc45 |$ E|
02c6 fbea 2401 | $ |
02c8 7446 07e9 |tF |
02ca ecd6 6e8c | n |
02cc 2802 2801 |( ( |
02ce d842 13e9 | B |
02d0 337e 8e8c |3~ |
02d2 2802 2800 |( ( |
02d4 4c47 c810 |LG |
02d6 2800 71af |( q |
02d8 b8d8 2803 | ( |
02da 324e b28f |2N |
02dc 6113 ebfc |a |
02de 2444 3808 |$D8 |
02e0 2801 73f2 |( s |
02e2 ca8c 2801 | ( |
02e4 1321 74cc | !t |
02e6 2814 2802 |( ( |
02e8 2c01 4c44 |, LD|
02ea 3814 2803 |8 ( |
02ec 3ee9 74ce |> t |
02ee 6004 2802 |` ( |
02f0 2c02 f28f |, |
02f2 6111 937d |a }|
02f4 74cf 23de |t # |
02f6 3002 3840 |0 8@|
02f8 7c14 2802 || ( |
02fa 3002 4843 |0 HC|
02fc 37dd 5ed9 |7 ^ |
02fe 878c 2801 | ( |
0300 a5d1 eb0c | |
0302 2802 3402 |( 4 |
0304 7443 4fde |tCO |
0306 3403 1580 |4 |
0308 2802 3400 |( 4 |
030a a637 6112 | 7a |
030c 3401 cd37 |4 7|
030e 6112 74d9 |a t |
0310 9ee4 2802 | ( |
0312 a0da 727c | r||
0314 2802 3801 |( 8 |
0316 f137 6112 | 7a |
0318 3801 fd37 |8 7|
031a 6112 3802 |a 8 |
031c 0937 6110 | 7a |
031e 90dc 0463 | c|
0320 afde 3c01 | < |
0322 c843 bbde | C |
0324 3c01 36c7 |< 6 |
0326 6112 3c01 |a < |
0328 8443 d3dc | C |
032a ecde f2f8 | |
032c 2802 3c02 |( < |
032e 5044 9c07 |PD |
0330 98a4 9844 | D|
0332 ac07 98a5 | |
0334 e444 03e2 | D |
0336 f8dc 7667 | vg|
0338 6112 4003 |a @ |
033a f044 17e2 | D |
033c 4403 7844 |D xD|
033e 23e2 4403 |# D |
0340 6040 33e1 |`@3 |
0342 c9a8 0461 | a|
0344 1404 2802 | ( |
0346 4403 0444 |D D|
0348 4be2 8da8 |K |
034a fb64 2801 | d( |
034c 82f5 a19f | |
034e 6112 d1ab |a |
0350 7ef8 2801 |~ ( |
0352 68e0 4290 |h B |
0354 2802 ff7d |( }|
0356 74cd 7c04 |t | |
0358 2801 d4e0 |( |
035a 0461 9004 | a |
035c 2802 16f4 |( |
035e 97e0 2802 | ( |
0360 4c01 c840 |L @|
0362 a3e2 5ef6 | ^ |
0364 1ec4 2803 | ( |
0366 888a 0234 | 4|
0368 2803 4f7e |( O~|
036a e6e7 6113 | a |
036c b8e2 f838 | 8|
036e dbe0 18e7 | |
0370 dd6c 2802 | l( |
0372 5001 8442 |P B|
0374 2004 2802 | ( |
0376 5000 4c44 |P LD|
0378 ffe1 65af | e |
037a 26e4 2801 |& ( |
037c 9d78 37ac | x7 |
037e 0004 4c44 | LD|
0380 ffe1 65ac | e |
0382 28a8 4405 |( D |
0384 0043 0300 | C |
0386 00fc 0011 | |
0388 114b 4082 | K@ |
038a 0001 0051 | Q|
038c 588b 53c1 |X S |
038e 8042 2700 | B' |
0390 a8f8 508a | P |
0392 467f 1801 |F |
0394 0c51 6b0b | Qk |
0396 c5c6 8009 | |
0398 2da0 f858 |- X|
039a 4727 a28c |G' |
039c 4646 40f8 |FF@ |
039e 7847 27b0 |xG' |
03a0 8d0c 165c | \|
03a2 41f1 328b |A 2 |
03a4 c34b 0208 | K |
03a6 1e57 d013 | W |
03a8 d1c5 253d | %=|
03aa 607e 67d2 |`~g |
03ac 93da c525 | %|
03ae 3db0 7e74 |= ~t|
03b0 a311 1387 | |
03b2 8e4e a540 | N @|
03b4 f999 5602 | V |
03b6 a497 421d | B |
03b8 4698 8bec |F |
03ba a194 aafa | |
03bc 3d4c 519b |=LQ |
03be 8bc2 4629 | F)|
03c0 6840 7eae |h@~ |
03c2 a397 cb46 | F|
03c4 2969 307e |)i0~|
03c6 bea1 97e8 | |
03c8 d400 5a16 | Z |
03ca 6881 f330 |h 0|
03cc 08e1 897c | ||
03ce b603 25f3 | % |
03d0 7008 e195 |p |
03d2 7ee8 28d2 |~ ( |
03d4 47eb 6014 |G ` |
03d6 c2e2 3d78 | =x|
03d8 51b9 8b6f |Q o|
03da de2f 9afd | / |
03dc f705 a11b | |
03de d0c6 3199 | 1 |
03e0 587f 15a1 |X |
03e2 1b69 de31 | i 1|
03e4 99d8 7c54 | |T|
03e6 af82 1389 | |
03e8 8c66 1670 | f p|
03ea 53dc d60c |S |
03ec 6f53 1cce |oS |
03ee e285 f530 | 0|
03f0 e66f 7b1c | o{ |
03f2 d2e3 3fd9 | ? |
03f4 568e c04e |V N|
03f6 363d ae6b |6= k|
03f8 0fe7 2298 | " |
03fa e7aa f9b6 | |
03fc 6a8f efa1 |j |
03fe 1a84 9c30 | 0|