|
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 - metrics - download
Length: 2048 (0x800)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0694fc
└─⟦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 0200 | | .CONST 0x0200 ; 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 003c | < | .CONST 0x003c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0019 | | .CONST 0x0019 ; Number of locals
000b INIT_0008:
000b 029a 0043 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0040
000d 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068
000f 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078
0011 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0
0013 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0
0015 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8
0017 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8
0019 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138
001b 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
001d 029a 0173 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0170
001f 029a 018b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0188
0021 00bf | | Action Accept_Activation
0022 029d 01ab | | Declare_Subprogram For_Outer_Call,INIT_01a8
0024 029d 01bb | | Declare_Subprogram For_Outer_Call,INIT_01b8
0026 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0027 00c7 | | Action Elaborate_Subprogram
0028 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0029 00c7 | | Action Elaborate_Subprogram
002a 1d0f | | Execute_Immediate Reference_Lex_1,0xf
002b 00c7 | | Action Elaborate_Subprogram
002c 1d10 | | Execute_Immediate Reference_Lex_1,0x10
002d 00c7 | | Action Elaborate_Subprogram
002e 1d11 | | Execute_Immediate Reference_Lex_1,0x11
002f 00c7 | | Action Elaborate_Subprogram
0030 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0031 00c7 | | Action Elaborate_Subprogram
0032 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0033 00c7 | | Action Elaborate_Subprogram
0034 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0035 00c7 | | Action Elaborate_Subprogram
0036 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0037 00c7 | | Action Elaborate_Subprogram
0038 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0039 00c7 | | Action Elaborate_Subprogram
003a 1d17 | | Execute_Immediate Reference_Lex_1,0x17
003b 00c7 | | Action Elaborate_Subprogram
003c BODY_0008:
003c 00bc | | Action Signal_Activated
003d 00bb | | Action Signal_Completion
003e 0000 0000 | | .XXX[0x2]
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 8218 | | Call 0x1,0x18
0044 6817 |h | Jump_Zero 0x5c
0045 8219 | | Call 0x1,0x19
0046 6815 |h | Jump_Zero 0x5c
0047 00ea | | Load_Encached Null_String_Cache
0048 00ea | | Load_Encached Null_String_Cache
0049 e001 | | Load 0x0,0x1
004a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
004b e001 | | Load 0x0,0x1
004c 180f | | Execute Package,Field_Execute,Field_Number 0xf
004d e001 | | Load 0x0,0x1
004e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
004f e001 | | Load 0x0,0x1
0050 180d | | Execute Package,Field_Execute,Field_Number 0xd
0051 e001 | | Load 0x0,0x1
0052 180d | | Execute Package,Field_Execute,Field_Number 0xd
0053 e001 | | Load 0x0,0x1
0054 180e | | Execute Package,Field_Execute,Field_Number 0xe
0055 00e1 | | Load_Encached Boolean_Cache
0056 011c | | Execute Any,Convert_Unchecked
0057 1c01 | | Execute_Immediate Run_Utility,0x1
0058 6007 |` | Indirect_Literal Discrete,0x60,{0x00000000, 0x000007d0}
0059 48c8 |H | Short_Literal 0xc8
005a e002 | | Load 0x0,0x2
005b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
005c 4501 |E | Exit_Subprogram 0x1
005d 0000 0000 | | .XXX[0x3]
005f 0000 | |
0060 0000 0000 | | .LITERAL {0x00000000, 0x000007d0}
0064 0000 0000 | | .BLANK 0000[0x4]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 8219 | | Call 0x1,0x19
006c 6808 |h | Jump_Zero 0x75
006d e5fa | | Load 0x2,-0x6
006e e5fc | | Load 0x2,-0x4
006f e5fb | | Load 0x2,-0x5
0070 e5fd | | Load 0x2,-0x3
0071 e5fe | | Load 0x2,-0x2
0072 e5ff | | Load 0x2,-0x1
0073 e001 | | Load 0x0,0x1
0074 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0075 4507 |E | Exit_Subprogram 0x7
0076 0000 0000 | | .XXX[0x2]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007d | } | .CONST 0x007d ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0002 | | .CONST 0x0002 ; Number of locals
007b INIT_0078:
007b e001 | | Load 0x0,0x1
007c 180d | | Execute Package,Field_Execute,Field_Number 0xd
007d BODY_0078:
007d 8218 | | Call 0x1,0x18
007e 682b |h+ | Jump_Zero 0xaa
007f 8219 | | Call 0x1,0x19
0080 6829 |h) | Jump_Zero 0xaa
0081 00ea | | Load_Encached Null_String_Cache
0082 00ea | | Load_Encached Null_String_Cache
0083 e001 | | Load 0x0,0x1
0084 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0085 e001 | | Load 0x0,0x1
0086 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0087 e001 | | Load 0x0,0x1
0088 180f | | Execute Package,Field_Execute,Field_Number 0xf
0089 00ea | | Load_Encached Null_String_Cache
008a e402 | | Load 0x2,0x2
008b 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
008d 01cc | | Execute Vector,Catenate
008e e402 | | Load 0x2,0x2
008f e001 | | Load 0x0,0x1
0090 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0091 01cc | | Execute Vector,Catenate
0092 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
0094 01cc | | Execute Vector,Catenate
0095 e001 | | Load 0x0,0x1
0096 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0097 01cc | | Execute Vector,Catenate
0098 e402 | | Load 0x2,0x2
0099 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
009b 01cc | | Execute Vector,Catenate
009c e402 | | Load 0x2,0x2
009d e001 | | Load 0x0,0x1
009e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
009f 01cc | | Execute Vector,Catenate
00a0 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
00a2 01cc | | Execute Vector,Catenate
00a3 e001 | | Load 0x0,0x1
00a4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00a5 01cc | | Execute Vector,Catenate
00a6 6005 |` | Indirect_Literal Discrete,0xac,{0x00000000, 0x000007d1}
00a7 48c9 |H | Short_Literal 0xc9
00a8 e002 | | Load 0x0,0x2
00a9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00aa 4501 |E | Exit_Subprogram 0x1
00ab 0000 | | .XXX[0x1]
00ac 0000 0000 | | .LITERAL {0x00000000, 0x000007d1}
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 8219 | | Call 0x1,0x19
00b4 680a |h | Jump_Zero 0xbf
00b5 e5f8 | | Load 0x2,-0x8
00b6 e5f9 | | Load 0x2,-0x7
00b7 e5fa | | Load 0x2,-0x6
00b8 e5fb | | Load 0x2,-0x5
00b9 e5fc | | Load 0x2,-0x4
00ba e5fd | | Load 0x2,-0x3
00bb e5fe | | Load 0x2,-0x2
00bc e5ff | | Load 0x2,-0x1
00bd e001 | | Load 0x0,0x1
00be 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00bf 4509 |E | Exit_Subprogram 0x9
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 8218 | | Call 0x1,0x18
00c4 681d |h | Jump_Zero 0xe2
00c5 8219 | | Call 0x1,0x19
00c6 681b |h | Jump_Zero 0xe2
00c7 00ea | | Load_Encached Null_String_Cache
00c8 00ea | | Load_Encached Null_String_Cache
00c9 00ea | | Load_Encached Null_String_Cache
00ca 00ea | | Load_Encached Null_String_Cache
00cb 00ea | | Load_Encached Null_String_Cache
00cc 00ea | | Load_Encached Null_String_Cache
00cd 00ea | | Load_Encached Null_String_Cache
00ce e001 | | Load 0x0,0x1
00cf 180d | | Execute Package,Field_Execute,Field_Number 0xd
00d0 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
00d2 01cc | | Execute Vector,Catenate
00d3 e001 | | Load 0x0,0x1
00d4 180d | | Execute Package,Field_Execute,Field_Number 0xd
00d5 e001 | | Load 0x0,0x1
00d6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00d7 01cc | | Execute Vector,Catenate
00d8 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
00da 01cc | | Execute Vector,Catenate
00db e001 | | Load 0x0,0x1
00dc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00dd 01cc | | Execute Vector,Catenate
00de 6005 |` | Indirect_Literal Discrete,0xe4,{0x00000000, 0x000007d2}
00df 48ca |H | Short_Literal 0xca
00e0 e002 | | Load 0x0,0x2
00e1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00e2 4501 |E | Exit_Subprogram 0x1
00e3 0000 | | .XXX[0x1]
00e4 0000 0000 | | .LITERAL {0x00000000, 0x000007d2}
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 8219 | | Call 0x1,0x19
00ec 6804 |h | Jump_Zero 0xf1
00ed 00db | | Load_Top At_Offset_3
00ee 00db | | Load_Top At_Offset_3
00ef e001 | | Load 0x0,0x1
00f0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00f1 4503 |E | Exit_Subprogram 0x3
00f2 0000 0000 | | .BLANK 0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fd | | .CONST 0x00fd ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0002 | | .CONST 0x0002 ; Number of locals
00fb INIT_00f8:
00fb e001 | | Load 0x0,0x1
00fc 180d | | Execute Package,Field_Execute,Field_Number 0xd
00fd BODY_00f8:
00fd 8218 | | Call 0x1,0x18
00fe 682d |h- | Jump_Zero 0x12c
00ff 8219 | | Call 0x1,0x19
0100 682b |h+ | Jump_Zero 0x12c
0101 00ea | | Load_Encached Null_String_Cache
0102 e001 | | Load 0x0,0x1
0103 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0104 e001 | | Load 0x0,0x1
0105 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0106 e001 | | Load 0x0,0x1
0107 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0108 e001 | | Load 0x0,0x1
0109 181c | | Execute Package,Field_Execute,Field_Number 0x1c
010a e001 | | Load 0x0,0x1
010b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
010c e402 | | Load 0x2,0x2
010d 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
010f 01cc | | Execute Vector,Catenate
0110 e402 | | Load 0x2,0x2
0111 e001 | | Load 0x0,0x1
0112 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0113 01cc | | Execute Vector,Catenate
0114 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
0116 01cc | | Execute Vector,Catenate
0117 e001 | | Load 0x0,0x1
0118 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0119 01cc | | Execute Vector,Catenate
011a e001 | | Load 0x0,0x1
011b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
011c 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
011e 01cc | | Execute Vector,Catenate
011f e001 | | Load 0x0,0x1
0120 180f | | Execute Package,Field_Execute,Field_Number 0xf
0121 01cc | | Execute Vector,Catenate
0122 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
0124 01cc | | Execute Vector,Catenate
0125 e001 | | Load 0x0,0x1
0126 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0127 01cc | | Execute Vector,Catenate
0128 6007 |` | Indirect_Literal Discrete,0x130,{0x00000000, 0x000007d3}
0129 48cb |H | Short_Literal 0xcb
012a e002 | | Load 0x0,0x2
012b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
012c 4501 |E | Exit_Subprogram 0x1
012d 0000 0000 | | .XXX[0x3]
012f 0000 | |
0130 0000 0000 | | .LITERAL {0x00000000, 0x000007d3}
0134 0000 0000 | | .BLANK 0000[0x4]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b 8219 | | Call 0x1,0x19
013c 680a |h | Jump_Zero 0x147
013d e5f8 | | Load 0x2,-0x8
013e e5f9 | | Load 0x2,-0x7
013f e5fa | | Load 0x2,-0x6
0140 e5fb | | Load 0x2,-0x5
0141 e5fc | | Load 0x2,-0x4
0142 e5fd | | Load 0x2,-0x3
0143 e5fe | | Load 0x2,-0x2
0144 e5ff | | Load 0x2,-0x1
0145 e001 | | Load 0x0,0x1
0146 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0147 4509 |E | Exit_Subprogram 0x9
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 0092 01c7 | | Action Push_String_Extended,0x1c7 ; "\x1b]2011;"
014d 00db | | Load_Top At_Offset_3
014e e001 | | Load 0x0,0x1
014f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0150 01cc | | Execute Vector,Catenate
0151 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
0153 01cc | | Execute Vector,Catenate
0154 00ea | | Load_Encached Null_String_Cache
0155 01cc | | Execute Vector,Catenate
0156 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
0158 01cc | | Execute Vector,Catenate
0159 e5fe | | Load 0x2,-0x2
015a e001 | | Load 0x0,0x1
015b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
015c 01cc | | Execute Vector,Catenate
015d 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
015f 01cc | | Execute Vector,Catenate
0160 e5fe | | Load 0x2,-0x2
0161 e001 | | Load 0x0,0x1
0162 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0163 01cc | | Execute Vector,Catenate
0164 0092 01c8 | | Action Push_String_Extended,0x1c8 ; "\x07"
0166 01cc | | Execute Vector,Catenate
0167 e003 | | Load 0x0,0x3
0168 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0169 4503 |E | Exit_Subprogram 0x3
016a 0000 0000 | | .BLANK 0000[0x6]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 0092 01c9 | | Action Push_String_Extended,0x1c9 ; "\x1b]2012;"
0175 00db | | Load_Top At_Offset_3
0176 e001 | | Load 0x0,0x1
0177 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0178 01cc | | Execute Vector,Catenate
0179 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
017b 01cc | | Execute Vector,Catenate
017c 00db | | Load_Top At_Offset_3
017d e001 | | Load 0x0,0x1
017e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
017f 01cc | | Execute Vector,Catenate
0180 0092 01c8 | | Action Push_String_Extended,0x1c8 ; "\x07"
0182 01cc | | Execute Vector,Catenate
0183 e003 | | Load 0x0,0x3
0184 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0185 4502 |E | Exit_Subprogram 0x2
0186 0000 0000 | | .XXX[0x2]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 0092 01ca | | Action Push_String_Extended,0x1ca ; "\x1b]2013;"
018d 00db | | Load_Top At_Offset_3
018e e001 | | Load 0x0,0x1
018f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0190 01cc | | Execute Vector,Catenate
0191 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
0193 01cc | | Execute Vector,Catenate
0194 00db | | Load_Top At_Offset_3
0195 e001 | | Load 0x0,0x1
0196 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0197 01cc | | Execute Vector,Catenate
0198 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "\x5c"
019a 01cc | | Execute Vector,Catenate
019b 00db | | Load_Top At_Offset_3
019c e001 | | Load 0x0,0x1
019d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
019e e001 | | Load 0x0,0x1
019f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
01a0 01cc | | Execute Vector,Catenate
01a1 0092 01c8 | | Action Push_String_Extended,0x1c8 ; "\x07"
01a3 01cc | | Execute Vector,Catenate
01a4 e003 | | Load 0x0,0x3
01a5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a6 4502 |E | Exit_Subprogram 0x2
01a7 0000 | | .XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab e001 | | Load 0x0,0x1
01ac 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01ad 7006 |p | Jump_Nonzero 0x1b4
01ae 0092 01cb | | Action Push_String_Extended,0x1cb ; "Insight not authorized on this machine"
01b0 e004 | | Load 0x0,0x4
01b1 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
01b2 4800 |H | Short_Literal 0x0
01b3 00ca | | Action Exit_Nullary_Function
01b4 4801 |H | Short_Literal 0x1
01b5 00ca | | Action Exit_Nullary_Function
01b6 0000 0000 | | .XXX[0x2]
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 e001 | | Load 0x0,0x1
01bc 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
01bd 7006 |p | Jump_Nonzero 0x1c4
01be 0092 01cc | | Action Push_String_Extended,0x1cc ; "No tokens left, Try again later"
01c0 e004 | | Load 0x0,0x4
01c1 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
01c2 4800 |H | Short_Literal 0x0
01c3 00ca | | Action Exit_Nullary_Function
01c4 4801 |H | Short_Literal 0x1
01c5 00ca | | Action Exit_Nullary_Function
01c6 ; --------------------------------------------------------------------------------------
01c6 ; STRING TABLE
01c6 ; --------------------------------------------------------------------------------------
01c6 0010 | | .STRTAB 0x0010->0x01ce ; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
; "\x5c"
01c7 000f | | .STRTAB 0x000f->0x01ce ; "\x1b]2011;"
01c8 0014 | | .STRTAB 0x0014->0x01d2 ; "\x07"
; "\x07"
; "\x07"
01c9 0013 | | .STRTAB 0x0013->0x01d2 ; "\x1b]2012;"
01ca 0018 | | .STRTAB 0x0018->0x01d6 ; "\x1b]2013;"
01cb 001d | | .STRTAB 0x001d->0x01d9 ; "Insight not authorized on this machine"
01cc 0041 | A | .STRTAB 0x0041->0x01ec ; "No tokens left, Try again later"
01cd 005e | ^ | .STREND 0x005e->0x01fc
01ce 5c1b 5d32 |\ ]2| .STRTAB_STRINGS
01fc 0000 0000 | | .BLANK 0000[0x4]
0200 ; --------------------------------------------------------------------------------------
0200 ; Debug Table
0200 ; --------------------------------------------------------------------------------------
0200 0004 0012 | | .DEBUG4 0x0004,0x0012,0x6366,0x0000,0x0001,0x0000
0206 0400 0000 | | .XXX[0x4c]
0208 0000 0000 | |
020a 0002 0510 | |
020c 0000 0010 | |
020e 0000 0400 | |
0210 0001 ea00 | |
0212 0000 0010 | |
0214 0000 0a24 | $|
0216 0000 a078 | x|
0218 5494 0000 |T |
021a 606a b194 |`j |
021c 0000 606a | `j|
021e b1a4 0000 | |
0220 606a b1b0 |`j |
0222 0000 0000 | |
0224 0004 0000 | |
0226 606a b1c4 |`j |
0228 0000 606a | `j|
022a b244 0000 | D |
022c 606a b254 |`j T|
022e 0000 606a | `j|
0230 b284 0000 | |
0232 606a b294 |`j |
0234 0000 606a | `j|
0236 b2b4 0000 | |
0238 606a b2c4 |`j |
023a 0000 606a | `j|
023c b2e4 0000 | |
023e 606a b2f4 |`j |
0240 0000 606a | `j|
0242 b314 0000 | |
0244 606a b324 |`j $|
0246 0000 606a | `j|
0248 b334 0000 | 4 |
024a 606a b344 |`j D|
024c 0000 606a | `j|
024e b354 0000 | T |
0250 606a b360 |`j `|
0252 0000 0000 | | .BLANK 0000[0x1ae]