|
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: 3072 (0xc00)
Notes: 00_class, 5800_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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0470 | p | .CONST 0x0470 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0063 | c | .CONST 0x0063 ; Address of begin
0009 00a3 | | .CONST 0x00a3 ; Address of exception handler
000a 0016 | | .CONST 0x0016 ; Number of locals
000b INIT_0008:
000b 0092 030b | | Action Push_String_Extended,0x30b ; "Setup_Machine"
000d e004 | | Load 0x0,0x4
000e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000f 02c7 | | Declare_Variable Any
0010 e004 | | Load 0x0,0x4
0011 180e | | Execute Package,Field_Execute,Field_Number 0xe
0012 a403 | | Store_Unchecked 0x2,0x3
0013 0092 030c | | Action Push_String_Extended,0x30c ; "&Login_Alive&"
0015 e012 | | Load 0x0,0x12
0016 180e | | Execute Package,Field_Execute,Field_Number 0xe
0017 4800 |H | Short_Literal 0x0
0018 e012 | | Load 0x0,0x12
0019 1819 | | Execute Package,Field_Execute,Field_Number 0x19
001a 00e3 | | Load_Encached Natural_Cache
001b 02a0 | | Declare_Subprogram Null_Subprogram
001c 4801 |H | Short_Literal 0x1
001d 035d | ] | Declare_Type Array,Defined
001e 00d8 | | Load_Top At_Offset_0
001f 0337 | 7 | Declare_Variable Array
0020 00d8 | | Load_Top At_Offset_0
0021 0335 | 5 | Declare_Variable Array,Duplicate
0022 00cd | | Action Spare6_Action
0023 e406 | | Load 0x2,0x6
0024 01d9 | | Execute Vector,Reverse_Bounds
0025 0263 | c | Execute Discrete,Above_Bound
0026 7005 |p | Jump_Nonzero 0x2c
0027 4800 |H | Short_Literal 0x0
0028 e409 | | Load 0x2,0x9
0029 e407 | | Load 0x2,0x7
002a 01d6 | | Execute Vector,Field_Write
002b 3ffb |? | Loop_Increasing 0x27
002c e406 | | Load 0x2,0x6
002d 01d4 | | Execute Vector,Structure_Write
002e 4850 |HP | Short_Literal 0x50
002f e017 | | Load 0x0,0x17
0030 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0031 1c08 | | Execute_Immediate Run_Utility,0x8
0032 00d8 | | Load_Top At_Offset_0
0033 1c00 | | Execute_Immediate Run_Utility,0x0
0034 4801 |H | Short_Literal 0x1
0035 4803 |H | Short_Literal 0x3
0036 e012 | | Load 0x0,0x12
0037 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0038 02a0 | | Declare_Subprogram Null_Subprogram
0039 4801 |H | Short_Literal 0x1
003a 035d | ] | Declare_Type Array,Defined
003b 00d8 | | Load_Top At_Offset_0
003c 0337 | 7 | Declare_Variable Array
003d 00d8 | | Load_Top At_Offset_0
003e 0335 | 5 | Declare_Variable Array,Duplicate
003f 00cd | | Action Spare6_Action
0040 4803 |H | Short_Literal 0x3
0041 4801 |H | Short_Literal 0x1
0042 4800 |H | Short_Literal 0x0
0043 e40c | | Load 0x2,0xc
0044 e40a | | Load 0x2,0xa
0045 01d6 | | Execute Vector,Field_Write
0046 3ffb |? | Loop_Increasing 0x42
0047 e409 | | Load 0x2,0x9
0048 01d4 | | Execute Vector,Structure_Write
0049 029f 00d3 | | Declare_Subprogram For_Call,INIT_00d0
004b 029f 00fb | | Declare_Subprogram For_Call,INIT_00f8
004d 029f 011b | | Declare_Subprogram For_Call,INIT_0118
004f 029f 0143 | C| Declare_Subprogram For_Call,INIT_0140
0051 029f 0183 | | Declare_Subprogram For_Call,INIT_0180
0053 029f 0193 | | Declare_Subprogram For_Call,INIT_0190
0055 029f 01cb | | Declare_Subprogram For_Call,INIT_01c8
0057 029f 01eb | | Declare_Subprogram For_Call,INIT_01e8
0059 029f 01fb | | Declare_Subprogram For_Call,INIT_01f8
005b 029f 0203 | | Declare_Subprogram For_Call,INIT_0200
005d 029f 021b | | Declare_Subprogram For_Call,INIT_0218
005f 029f 0233 | 3| Declare_Subprogram For_Call,INIT_0230
0061 029f 024b | K| Declare_Subprogram For_Call,INIT_0248
0063 BODY_0008:
0063 e403 | | Load 0x2,0x3
0064 e5ff | | Load 0x2,-0x1
0065 e402 | | Load 0x2,0x2
0066 e224 | $ | Load 0x1,0x24
0067 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0068 c403 | | Store 0x2,0x3
0069 e403 | | Load 0x2,0x3
006a e224 | $ | Load 0x1,0x24
006b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
006c 8210 | | Call 0x1,0x10
006d 01db | | Execute Vector,Length
006e 6805 |h | Jump_Zero 0x74
006f e403 | | Load 0x2,0x3
0070 0092 030d | | Action Push_String_Extended,0x30d ; "This machine has already been assigned a Site. Contact your Rational representative for further assistance."
0072 e224 | $ | Load 0x1,0x24
0073 180d | | Execute Package,Field_Execute,Field_Number 0xd
0074 8414 | | Call 0x2,0x14
0075 0092 030e | | Action Push_String_Extended,0x30e ; "Answer each of the following questions."
0077 e014 | | Load 0x0,0x14
0078 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0079 0092 030f | | Action Push_String_Extended,0x30f ; "No action will be taken until all answers have been given."
007b e014 | | Load 0x0,0x14
007c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
007d 0092 0310 | | Action Push_String_Extended,0x310 ; "Default value for each token count is given in []"
007f e014 | | Load 0x0,0x14
0080 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0081 0092 0311 | | Action Push_String_Extended,0x311 ; "All values start at 0, except Login."
0083 e014 | | Load 0x0,0x14
0084 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0085 4801 |H | Short_Literal 0x1
0086 e014 | | Load 0x0,0x14
0087 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0088 840f | | Call 0x2,0xf
0089 8410 | | Call 0x2,0x10
008a 8416 | | Call 0x2,0x16
008b 4801 |H | Short_Literal 0x1
008c e014 | | Load 0x0,0x14
008d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
008e 4800 |H | Short_Literal 0x0
008f 4800 |H | Short_Literal 0x0
0090 4801 |H | Short_Literal 0x1
0091 00ea | | Load_Encached Null_String_Cache
0092 00ea | | Load_Encached Null_String_Cache
0093 e012 | | Load 0x0,0x12
0094 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0095 e00d | | Load 0x0,0xd
0096 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0097 e226 | & | Load 0x1,0x26
0098 180f | | Execute Package,Field_Execute,Field_Number 0xf
0099 e018 | | Load 0x0,0x18
009a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
009b e226 | & | Load 0x1,0x26
009c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
009d e403 | | Load 0x2,0x3
009e 00ea | | Load_Encached Null_String_Cache
009f e402 | | Load 0x2,0x2
00a0 e224 | $ | Load 0x1,0x24
00a1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00a2 4502 |E | Exit_Subprogram 0x2
00a3 TRAP_0008:
00a3 e004 | | Load 0x0,0x4
00a4 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
00a5 010f | | Execute Exception,Equal
00a6 6806 |h | Jump_Zero 0xad
00a7 e403 | | Load 0x2,0x3
00a8 e402 | | Load 0x2,0x2
00a9 e224 | $ | Load 0x1,0x24
00aa 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00ab 00d8 | | Load_Top At_Offset_0
00ac 0101 | | Execute Exception,Reraise
00ad e227 | ' | Load 0x1,0x27
00ae 010f | | Execute Exception,Equal
00af 6805 |h | Jump_Zero 0xb5
00b0 e403 | | Load 0x2,0x3
00b1 e402 | | Load 0x2,0x2
00b2 e224 | $ | Load 0x1,0x24
00b3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00b4 4502 |E | Exit_Subprogram 0x2
00b5 00d8 | | Load_Top At_Offset_0
00b6 0107 | | Execute Exception,Get_Name
00b7 4950 |IP | Short_Literal 0x150
00b8 495f |I_ | Short_Literal 0x15f
00b9 0262 | b | Execute Discrete,In_Range
00ba 6807 |h | Jump_Zero 0xc2
00bb e403 | | Load 0x2,0x3
00bc 0092 0312 | | Action Push_String_Extended,0x312 ; "End of file encountered"
00be e402 | | Load 0x2,0x2
00bf e224 | $ | Load 0x1,0x24
00c0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00c1 4502 |E | Exit_Subprogram 0x2
00c2 e403 | | Load 0x2,0x3
00c3 4800 |H | Short_Literal 0x0
00c4 4801 |H | Short_Literal 0x1
00c5 e015 | | Load 0x0,0x15
00c6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00c7 e402 | | Load 0x2,0x2
00c8 e224 | $ | Load 0x1,0x24
00c9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00ca 4502 |E | Exit_Subprogram 0x2
00cb 0000 0000 | | .BLANK 0000[0x5]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00e9 | | .CONST 0x00e9 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0005 | | .CONST 0x0005 ; Number of locals
00d3 INIT_00d0:
00d3 e014 | | Load 0x0,0x14
00d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d5 02c7 | | Declare_Variable Any
00d6 e014 | | Load 0x0,0x14
00d7 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00d8 a602 | | Store_Unchecked 0x3,0x2
00d9 00d8 | | Load_Top At_Offset_0
00da e014 | | Load 0x0,0x14
00db 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
00dc 00e2 | | Load_Encached Integer_Cache
00dd 03f1 | | Declare_Variable Discrete,With_Value
00de e014 | | Load 0x0,0x14
00df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e0 02c7 | | Declare_Variable Any
00e1 e014 | | Load 0x0,0x14
00e2 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
00e3 a604 | | Store_Unchecked 0x3,0x4
00e4 00d8 | | Load_Top At_Offset_0
00e5 e014 | | Load 0x0,0x14
00e6 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
00e7 00e2 | | Load_Encached Integer_Cache
00e8 03f1 | | Declare_Variable Discrete,With_Value
00e9 BODY_00d0:
00e9 e603 | | Load 0x3,0x3
00ea 0c02 | | Execute_Immediate Greater_Equal,0x2
00eb 6806 |h | Jump_Zero 0xf2
00ec 00d8 | | Load_Top At_Offset_0
00ed 0c02 | | Execute_Immediate Greater_Equal,0x2
00ee 6803 |h | Jump_Zero 0xf2
00ef 4801 |H | Short_Literal 0x1
00f0 e014 | | Load 0x0,0x14
00f1 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00f2 4501 |E | Exit_Subprogram 0x1
00f3 0000 0000 | | .BLANK 0000[0x5]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 840a | | Call 0x2,0xa
00fc e7ff | | Load 0x3,-0x1
00fd e014 | | Load 0x0,0x14
00fe 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
00ff e7fe | | Load 0x3,-0x2
0100 01db | | Execute Vector,Length
0101 680a |h | Jump_Zero 0x10c
0102 0092 0313 | | Action Push_String_Extended,0x313 ; " ["
0104 e7fe | | Load 0x3,-0x2
0105 01cc | | Execute Vector,Catenate
0106 0092 0314 | | Action Push_String_Extended,0x314 ; "]: "
0108 01cc | | Execute Vector,Catenate
0109 e014 | | Load 0x0,0x14
010a 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
010b 7804 |x | Jump 0x110
010c 0092 0315 | | Action Push_String_Extended,0x315 ; ": "
010e e014 | | Load 0x0,0x14
010f 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0110 e014 | | Load 0x0,0x14
0111 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0112 4402 |D | Exit_Subprogram With_Result,0x2
0113 0000 0000 | | .BLANK 0000[0x5]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011e | | .CONST 0x011e ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0002 | | .CONST 0x0002 ; Number of locals
011b INIT_0118:
011b e7fe | | Load 0x3,-0x2
011c e7ff | | Load 0x3,-0x1
011d 840b | | Call 0x2,0xb
011e BODY_0118:
011e 00d8 | | Load_Top At_Offset_0
011f 01db | | Execute Vector,Length
0120 7014 |p | Jump_Nonzero 0x135
0121 e7fe | | Load 0x3,-0x2
0122 01db | | Execute Vector,Length
0123 700b |p | Jump_Nonzero 0x12f
0124 840a | | Call 0x2,0xa
0125 0092 0316 | | Action Push_String_Extended,0x316 ; "There is no default, and null string not a valid value."
0127 e014 | | Load 0x0,0x14
0128 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0129 e7fd | | Load 0x3,-0x3
012a e7fe | | Load 0x3,-0x2
012b e7ff | | Load 0x3,-0x1
012c 840c | | Call 0x2,0xc
012d 00d1 | | Pop_Control Pop_Count_1
012e 4503 |E | Exit_Subprogram 0x3
012f e7fd | | Load 0x3,-0x3
0130 e7fe | | Load 0x3,-0x2
0131 e017 | | Load 0x0,0x17
0132 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0133 00d1 | | Pop_Control Pop_Count_1
0134 4503 |E | Exit_Subprogram 0x3
0135 e7fd | | Load 0x3,-0x3
0136 e602 | | Load 0x3,0x2
0137 e017 | | Load 0x0,0x17
0138 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0139 00d1 | | Pop_Control Pop_Count_1
013a 4503 |E | Exit_Subprogram 0x3
013b 0000 0000 | | .BLANK 0000[0x5]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0153 | S | .CONST 0x0153 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0005 | | .CONST 0x0005 ; Number of locals
0143 INIT_0140:
0143 e7ff | | Load 0x3,-0x1
0144 e012 | | Load 0x0,0x12
0145 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0146 4820 |H | Short_Literal 0x20
0147 4800 |H | Short_Literal 0x0
0148 480a |H | Short_Literal 0xa
0149 e7ff | | Load 0x3,-0x1
014a e406 | | Load 0x2,0x6
014b 01d7 | | Execute Vector,Field_Read
014c e008 | | Load 0x0,0x8
014d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
014e e602 | | Load 0x3,0x2
014f 840b | | Call 0x2,0xb
0150 00e3 | | Load_Encached Natural_Cache
0151 029f 026b | k| Declare_Subprogram For_Call,INIT_0268
0153 BODY_0140:
0153 4801 |H | Short_Literal 0x1
0154 0092 0317 | | Action Push_String_Extended,0x317 ; "Login"
0156 e602 | | Load 0x3,0x2
0157 e008 | | Load 0x0,0x8
0158 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0159 6805 |h | Jump_Zero 0x15f
015a e7ff | | Load 0x3,-0x1
015b 4801 |H | Short_Literal 0x1
015c e409 | | Load 0x2,0x9
015d 01d6 | | Execute Vector,Field_Write
015e 7817 |x | Jump 0x176
015f 4801 |H | Short_Literal 0x1
0160 0092 0318 | | Action Push_String_Extended,0x318 ; "Full Session"
0162 e602 | | Load 0x3,0x2
0163 e008 | | Load 0x0,0x8
0164 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0165 6805 |h | Jump_Zero 0x16b
0166 e7ff | | Load 0x3,-0x1
0167 4802 |H | Short_Literal 0x2
0168 e409 | | Load 0x2,0x9
0169 01d6 | | Execute Vector,Field_Write
016a 780b |x | Jump 0x176
016b 4801 |H | Short_Literal 0x1
016c 0092 0319 | | Action Push_String_Extended,0x319 ; "Fundamental Session"
016e e602 | | Load 0x3,0x2
016f e008 | | Load 0x0,0x8
0170 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0171 6804 |h | Jump_Zero 0x176
0172 e7ff | | Load 0x3,-0x1
0173 4803 |H | Short_Literal 0x3
0174 e409 | | Load 0x2,0x9
0175 01d6 | | Execute Vector,Field_Write
0176 4820 |H | Short_Literal 0x20
0177 e603 | | Load 0x3,0x3
0178 e008 | | Load 0x0,0x8
0179 181c | | Execute Package,Field_Execute,Field_Number 0x1c
017a 01db | | Execute Vector,Length
017b 6801 |h | Jump_Zero 0x17d
017c 8605 | | Call 0x3,0x5
017d 4502 |E | Exit_Subprogram 0x2
017e 0000 0000 | | .XXX[0x2]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 e7ff | | Load 0x3,-0x1
0184 6803 |h | Jump_Zero 0x188
0185 0092 031a | | Action Push_String_Extended,0x31a ; "Yes"
0187 4401 |D | Exit_Subprogram With_Result,0x1
0188 0092 031b | | Action Push_String_Extended,0x31b ; "No"
018a 4401 |D | Exit_Subprogram With_Result,0x1
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 019b | | .CONST 0x019b ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0005 | | .CONST 0x0005 ; Number of locals
0193 INIT_0190:
0193 00e1 | | Load_Encached Boolean_Cache
0194 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0195 00e1 | | Load_Encached Boolean_Cache
0196 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0197 029f 02a3 | | Declare_Subprogram For_Call,INIT_02a0
0199 029f 02c3 | | Declare_Subprogram For_Call,INIT_02c0
019b BODY_0190:
019b 00cf | | Action Mark_Auxiliary
019c e407 | | Load 0x2,0x7
019d 00d8 | | Load_Top At_Offset_0
019e e017 | | Load 0x0,0x17
019f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a0 0092 031c | | Action Push_String_Extended,0x31c ; "Site"
01a2 840c | | Call 0x2,0xc
01a3 00d1 | | Pop_Control Pop_Count_1
01a4 00cf | | Action Mark_Auxiliary
01a5 e406 | | Load 0x2,0x6
01a6 01dc | | Execute Vector,Last
01a7 4801 |H | Short_Literal 0x1
01a8 0263 | c | Execute Discrete,Above_Bound
01a9 7008 |p | Jump_Nonzero 0x1b2
01aa 00d8 | | Load_Top At_Offset_0
01ab e404 | | Load 0x2,0x4
01ac 027f | | Execute Discrete,Equal
01ad 7002 |p | Jump_Nonzero 0x1b0
01ae 00d8 | | Load_Top At_Offset_0
01af 840d | | Call 0x2,0xd
01b0 00c8 | | Action Pop_Auxiliary_Range
01b1 3ff8 |? | Loop_Increasing 0x1aa
01b2 00ce | | Action Pop_Auxiliary
01b3 8604 | | Call 0x3,0x4
01b4 e602 | | Load 0x3,0x2
01b5 6802 |h | Jump_Zero 0x1b8
01b6 8605 | | Call 0x3,0x5
01b7 7808 |x | Jump 0x1c0
01b8 0092 031d | | Action Push_String_Extended,0x31d ; "More than one of Login, Full Session, or Fundamental Session are non-zero. "
01ba e014 | | Load 0x0,0x14
01bb 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01bc 0092 031e | | Action Push_String_Extended,0x31e ; "This must be fixed before proceeding."
01be e014 | | Load 0x0,0x14
01bf 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01c0 00c9 | | Action Pop_Auxiliary_Loop
01c1 7fda | | Jump 0x19c
01c2 0000 0000 | | .BLANK 0000[0x6]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d0 | | .CONST 0x01d0 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0003 | | .CONST 0x0003 ; Number of locals
01cb INIT_01c8:
01cb e407 | | Load 0x2,0x7
01cc e017 | | Load 0x0,0x17
01cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ce 029f 02eb | | Declare_Subprogram For_Call,INIT_02e8
01d0 BODY_01c8:
01d0 e602 | | Load 0x3,0x2
01d1 e226 | & | Load 0x1,0x26
01d2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01d3 00cf | | Action Mark_Auxiliary
01d4 e406 | | Load 0x2,0x6
01d5 01dc | | Execute Vector,Last
01d6 4801 |H | Short_Literal 0x1
01d7 0263 | c | Execute Discrete,Above_Bound
01d8 7007 |p | Jump_Nonzero 0x1e0
01d9 00d8 | | Load_Top At_Offset_0
01da e404 | | Load 0x2,0x4
01db 027f | | Execute Discrete,Equal
01dc 7001 |p | Jump_Nonzero 0x1de
01dd 8603 | | Call 0x3,0x3
01de 00c8 | | Action Pop_Auxiliary_Range
01df 3ff9 |? | Loop_Increasing 0x1d9
01e0 4501 |E | Exit_Subprogram 0x1
01e1 0000 0000 | | .BLANK 0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 4820 |H | Short_Literal 0x20
01ec 4800 |H | Short_Literal 0x0
01ed 480a |H | Short_Literal 0xa
01ee e7ff | | Load 0x3,-0x1
01ef e008 | | Load 0x0,0x8
01f0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01f1 0092 031f | | Action Push_String_Extended,0x31f ; " Logins"
01f3 01cc | | Execute Vector,Catenate
01f4 4401 |D | Exit_Subprogram With_Result,0x1
01f5 0000 0000 | | .XXX[0x3]
01f7 0000 | |
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb e7ff | | Load 0x3,-0x1
01fc 8411 | | Call 0x2,0x11
01fd e013 | | Load 0x0,0x13
01fe 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ff 4401 |D | Exit_Subprogram With_Result,0x1
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 00cf | | Action Mark_Auxiliary
0204 4801 |H | Short_Literal 0x1
0205 4840 |H@ | Short_Literal 0x40
0206 0007 | | Action Break_Optional
0207 00d8 | | Load_Top At_Offset_0
0208 8412 | | Call 0x2,0x12
0209 6802 |h | Jump_Zero 0x20c
020a 00d8 | | Load_Top At_Offset_0
020b 00ca | | Action Exit_Nullary_Function
020c 00c8 | | Action Pop_Auxiliary_Range
020d 37f9 |7 | Loop_Decreasing 0x207
020e 00ce | | Action Pop_Auxiliary
020f 4800 |H | Short_Literal 0x0
0210 00ca | | Action Exit_Nullary_Function
0211 0000 0000 | | .BLANK 0000[0x7]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0225 | % | .CONST 0x0225 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0003 | | .CONST 0x0003 ; Number of locals
021b INIT_0218:
021b 8413 | | Call 0x2,0x13
021c 00e3 | | Load_Encached Natural_Cache
021d 03f1 | | Declare_Variable Discrete,With_Value
021e 0092 0317 | | Action Push_String_Extended,0x317 ; "Login"
0220 e012 | | Load 0x0,0x12
0221 180e | | Execute Package,Field_Execute,Field_Number 0xe
0222 e012 | | Load 0x0,0x12
0223 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0224 03f1 | | Declare_Variable Discrete,With_Value
0225 BODY_0218:
0225 e602 | | Load 0x3,0x2
0226 e603 | | Load 0x3,0x3
0227 e406 | | Load 0x2,0x6
0228 01d6 | | Execute Vector,Field_Write
0229 4501 |E | Exit_Subprogram 0x1
022a 0000 0000 | | .BLANK 0000[0x6]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 023a | : | .CONST 0x023a ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0004 | | .CONST 0x0004 ; Number of locals
0233 INIT_0230:
0233 e7ff | | Load 0x3,-0x1
0234 8411 | | Call 0x2,0x11
0235 8211 | | Call 0x1,0x11
0236 00e5 | | Load_Encached Long_Integer_Cache
0237 03f1 | | Declare_Variable Discrete,With_Value
0238 0092 0320 | | Action Push_String_Extended,0x320 ; "01/01/90"
023a BODY_0230:
023a 00d8 | | Load_Top At_Offset_0
023b e604 | | Load 0x3,0x4
023c e603 | | Load 0x3,0x3
023d e602 | | Load 0x3,0x2
023e e013 | | Load 0x0,0x13
023f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0240 e602 | | Load 0x3,0x2
0241 e013 | | Load 0x0,0x13
0242 180d | | Execute Package,Field_Execute,Field_Number 0xd
0243 4502 |E | Exit_Subprogram 0x2
0244 0000 0000 | | .BLANK 0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024d | M | .CONST 0x024d ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0002 | | .CONST 0x0002 ; Number of locals
024b INIT_0248:
024b 00e1 | | Load_Encached Boolean_Cache
024c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
024d BODY_0248:
024d 00cf | | Action Mark_Auxiliary
024e 4801 |H | Short_Literal 0x1
024f 4840 |H@ | Short_Literal 0x40
0250 0007 | | Action Break_Optional
0251 00d8 | | Load_Top At_Offset_0
0252 8412 | | Call 0x2,0x12
0253 6804 |h | Jump_Zero 0x258
0254 4801 |H | Short_Literal 0x1
0255 a602 | | Store_Unchecked 0x3,0x2
0256 00d8 | | Load_Top At_Offset_0
0257 8415 | | Call 0x2,0x15
0258 00c8 | | Action Pop_Auxiliary_Range
0259 37f7 |7 | Loop_Decreasing 0x251
025a 00ce | | Action Pop_Auxiliary
025b 00d8 | | Load_Top At_Offset_0
025c 6804 |h | Jump_Zero 0x261
025d e013 | | Load 0x0,0x13
025e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
025f e013 | | Load 0x0,0x13
0260 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0261 4501 |E | Exit_Subprogram 0x1
0262 0000 0000 | | .BLANK 0000[0x6]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0291 | | .CONST 0x0291 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b e603 | | Load 0x3,0x3
026c 00e2 | | Load_Encached Integer_Cache
026d 00e0 | | Load_Encached Standard_Cache
026e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
026f c604 | | Store 0x3,0x4
0270 e604 | | Load 0x3,0x4
0271 e21f | | Load 0x1,0x1f
0272 0260 | ` | Execute Discrete,In_Type
0273 6805 |h | Jump_Zero 0x279
0274 e604 | | Load 0x3,0x4
0275 e7ff | | Load 0x3,-0x1
0276 e406 | | Load 0x2,0x6
0277 01d6 | | Execute Vector,Field_Write
0278 4501 |E | Exit_Subprogram 0x1
0279 482e |H. | Short_Literal 0x2e
027a 0092 0321 | !| Action Push_String_Extended,0x321 ; "Value must be in the range "
027c 4820 |H | Short_Literal 0x20
027d 4800 |H | Short_Literal 0x0
027e 480a |H | Short_Literal 0xa
027f 4800 |H | Short_Literal 0x0
0280 e008 | | Load 0x0,0x8
0281 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0282 01cc | | Execute Vector,Catenate
0283 0092 0322 | "| Action Push_String_Extended,0x322 ; ".."
0285 01cc | | Execute Vector,Catenate
0286 4820 |H | Short_Literal 0x20
0287 4800 |H | Short_Literal 0x0
0288 480a |H | Short_Literal 0xa
0289 4840 |H@ | Short_Literal 0x40
028a e008 | | Load 0x0,0x8
028b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
028c 01cc | | Execute Vector,Catenate
028d 01cb | | Execute Vector,Append
028e e014 | | Load 0x0,0x14
028f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0290 4501 |E | Exit_Subprogram 0x1
0291 TRAP_0268:
0291 010e | | Execute Exception,Is_Constraint_Error
0292 6807 |h | Jump_Zero 0x29a
0293 0092 0323 | #| Action Push_String_Extended,0x323 ; "Numeric value is required."
0295 e014 | | Load 0x0,0x14
0296 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0297 e7ff | | Load 0x3,-0x1
0298 840d | | Call 0x2,0xd
0299 4501 |E | Exit_Subprogram 0x1
029a 0100 | | Execute Exception,Raise
029b 0000 0000 | | .BLANK 0000[0x5]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 4801 |H | Short_Literal 0x1
02a4 a602 | | Store_Unchecked 0x3,0x2
02a5 4800 |H | Short_Literal 0x0
02a6 a603 | | Store_Unchecked 0x3,0x3
02a7 00cf | | Action Mark_Auxiliary
02a8 e409 | | Load 0x2,0x9
02a9 01d9 | | Execute Vector,Reverse_Bounds
02aa 0007 | | Action Break_Optional
02ab 00d8 | | Load_Top At_Offset_0
02ac e409 | | Load 0x2,0x9
02ad 01d7 | | Execute Vector,Field_Read
02ae e406 | | Load 0x2,0x6
02af 01d7 | | Execute Vector,Field_Read
02b0 0c01 | | Execute_Immediate Greater_Equal,0x1
02b1 6807 |h | Jump_Zero 0x2b9
02b2 e603 | | Load 0x3,0x3
02b3 6803 |h | Jump_Zero 0x2b7
02b4 4800 |H | Short_Literal 0x0
02b5 a602 | | Store_Unchecked 0x3,0x2
02b6 7802 |x | Jump 0x2b9
02b7 4801 |H | Short_Literal 0x1
02b8 a603 | | Store_Unchecked 0x3,0x3
02b9 00c8 | | Action Pop_Auxiliary_Range
02ba 3ff0 |? | Loop_Increasing 0x2ab
02bb 4501 |E | Exit_Subprogram 0x1
02bc 0000 0000 | | .BLANK 0000[0x4]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02cb | | .CONST 0x02cb ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0002 | | .CONST 0x0002 ; Number of locals
02c3 INIT_02c0:
02c3 4820 |H | Short_Literal 0x20
02c4 e603 | | Load 0x3,0x3
02c5 840e | | Call 0x2,0xe
02c6 0092 0324 | $| Action Push_String_Extended,0x324 ; "All answers correct"
02c8 840b | | Call 0x2,0xb
02c9 e008 | | Load 0x0,0x8
02ca 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02cb BODY_02c0:
02cb e603 | | Load 0x3,0x3
02cc 6803 |h | Jump_Zero 0x2d0
02cd 00d8 | | Load_Top At_Offset_0
02ce 01db | | Execute Vector,Length
02cf 680e |h | Jump_Zero 0x2de
02d0 4801 |H | Short_Literal 0x1
02d1 0092 0325 | %| Action Push_String_Extended,0x325 ; "Y"
02d3 e802 | | Load 0x4,0x2
02d4 e008 | | Load 0x0,0x8
02d5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02d6 7007 |p | Jump_Nonzero 0x2de
02d7 4801 |H | Short_Literal 0x1
02d8 0092 031a | | Action Push_String_Extended,0x31a ; "Yes"
02da e802 | | Load 0x4,0x2
02db e008 | | Load 0x0,0x8
02dc 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02dd 6802 |h | Jump_Zero 0x2e0
02de 00cc | | Action Pop_Block
02df 4501 |E | Exit_Subprogram 0x1
02e0 4801 |H | Short_Literal 0x1
02e1 e014 | | Load 0x0,0x14
02e2 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
02e3 4501 |E | Exit_Subprogram 0x1
02e4 0000 0000 | | .BLANK 0000[0x4]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02ee | | .CONST 0x02ee ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0002 | | .CONST 0x0002 ; Number of locals
02eb INIT_02e8:
02eb e606 | | Load 0x3,0x6
02ec e012 | | Load 0x0,0x12
02ed 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02ee BODY_02e8:
02ee e606 | | Load 0x3,0x6
02ef e406 | | Load 0x2,0x6
02f0 01d7 | | Execute Vector,Field_Read
02f1 e802 | | Load 0x4,0x2
02f2 e012 | | Load 0x0,0x12
02f3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f4 e606 | | Load 0x3,0x6
02f5 e406 | | Load 0x2,0x6
02f6 01d7 | | Execute Vector,Field_Read
02f7 0c01 | | Execute_Immediate Greater_Equal,0x1
02f8 680d |h | Jump_Zero 0x306
02f9 00d8 | | Load_Top At_Offset_0
02fa e013 | | Load 0x0,0x13
02fb 180e | | Execute Package,Field_Execute,Field_Number 0xe
02fc 7009 |p | Jump_Nonzero 0x306
02fd 00ea | | Load_Encached Null_String_Cache
02fe 00ea | | Load_Encached Null_String_Cache
02ff 8211 | | Call 0x1,0x11
0300 e802 | | Load 0x4,0x2
0301 e013 | | Load 0x0,0x13
0302 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0303 e802 | | Load 0x4,0x2
0304 e013 | | Load 0x0,0x13
0305 180d | | Execute Package,Field_Execute,Field_Number 0xd
0306 480c |H | Short_Literal 0xc
0307 e802 | | Load 0x4,0x2
0308 e012 | | Load 0x0,0x12
0309 1814 | | Execute Package,Field_Execute,Field_Number 0x14
030a 4501 |E | Exit_Subprogram 0x1
030b ; --------------------------------------------------------------------------------------
030b ; STRING TABLE
030b ; --------------------------------------------------------------------------------------
030b 0038 | 8 | .STRTAB 0x0038->0x0327 ; "Setup_Machine"
030c 0043 | C | .STRTAB 0x0043->0x032d ; "&Login_Alive&"
030d 004e | N | .STRTAB 0x004e->0x0334 ; "This machine has already been assigned a Site. Contact your Rational representative for further assistance."
030e 00b8 | | .STRTAB 0x00b8->0x036a ; "Answer each of the following questions."
030f 00dd | | .STRTAB 0x00dd->0x037d ; "No action will be taken until all answers have been given."
0310 0115 | | .STRTAB 0x0115->0x039a ; "Default value for each token count is given in []"
0311 0144 | D | .STRTAB 0x0144->0x03b3 ; "All values start at 0, except Login."
0312 0166 | f | .STRTAB 0x0166->0x03c5 ; "End of file encountered"
0313 017b | { | .STRTAB 0x017b->0x03d0 ; " ["
0314 017b | { | .STRTAB 0x017b->0x03d1 ; "]: "
0315 017c | | | .STRTAB 0x017c->0x03d3 ; ": "
0316 017c | | | .STRTAB 0x017c->0x03d4 ; "There is no default, and null string not a valid value."
0317 01b1 | | .STRTAB 0x01b1->0x03ef ; "Login"
; "Login"
0318 01b4 | | .STRTAB 0x01b4->0x03f2 ; "Full Session"
0319 01be | | .STRTAB 0x01be->0x03f8 ; "Fundamental Session"
031a 01cf | | .STRTAB 0x01cf->0x0401 ; "Yes"
; "Yes"
031b 01d0 | | .STRTAB 0x01d0->0x0403 ; "No"
031c 01d0 | | .STRTAB 0x01d0->0x0404 ; "Site"
031d 01d2 | | .STRTAB 0x01d2->0x0406 ; "More than one of Login, Full Session, or Fundamental Session are non-zero. "
031e 021c | | .STRTAB 0x021c->0x042c ; "This must be fixed before proceeding."
031f 023f | ? | .STRTAB 0x023f->0x043e ; " Logins"
0320 0244 | D | .STRTAB 0x0244->0x0442 ; "01/01/90"
0321 024a | J | .STRTAB 0x024a->0x0446 ; "Value must be in the range "
0322 0263 | c | .STRTAB 0x0263->0x0453 ; ".."
0323 0263 | c | .STRTAB 0x0263->0x0454 ; "Numeric value is required."
0324 027b | { | .STRTAB 0x027b->0x0461 ; "All answers correct"
0325 028c | | .STRTAB 0x028c->0x046b ; "Y"
0326 028b | | .STREND 0x028b->0x046b
0327 5365 7475 |Setu| .STRTAB_STRINGS
046c 0000 0000 | | .BLANK 0000[0x4]
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug Table
0470 ; --------------------------------------------------------------------------------------
0470 0004 0011 | | .DEBUG4 0x0004,0x0011,0x97ac,0x0000,0x0001,0x0000
0476 8000 020c | | .XXX[0x3]
0478 2e70 |.p |
0479 0000 0000 | | .BLANK 0000[0x6]
047f 0200 0a3a | :| .XXX[0x33]
0481 6085 cab7 |` |
0483 4d00 0087 |M |
0485 fab4 4b80 | K |
0487 8008 0006 | |
0489 4800 0000 |H |
048b b568 0000 | h |
048d 0800 0000 | |
048f 8801 4000 | @ |
0491 0000 4000 | @ |
0493 0010 0000 | |
0495 0088 0000 | |
0497 0000 4000 | @ |
0499 0002 9000 | |
049b 0041 85c8 | A |
049d 1000 0041 | A|
049f 85c8 5000 | P |
04a1 0041 85cc | A |
04a3 1000 0041 | A|
04a5 85cc 9000 | |
04a7 0041 85cc | A |
04a9 d000 0041 | A|
04ab 85cd 5000 | P |
04ad 0041 85cd | A |
04af 9000 0041 | A|
04b1 85ce | |
04b2 0000 0000 | | .BLANK 0000[0x6]
04b8 0040 0147 | @ G| .XXX[0x34]
04ba 4c10 b956 |L V|
04bc e9a0 0010 | |
04be ff56 8970 | V p|
04c0 1001 0000 | |
04c2 c900 0000 | |
04c4 16ad 0000 | |
04c6 0100 0000 | |
04c8 1100 2800 | ( |
04ca 0000 0800 | |
04cc 0002 0000 | |
04ce 0011 0000 | |
04d0 0000 0800 | |
04d2 0000 5200 | R |
04d4 0008 30b9 | 0 |
04d6 0200 0008 | |
04d8 30b9 0a00 |0 |
04da 0008 30b9 | 0 |
04dc 8200 0008 | |
04de 30b9 9200 |0 |
04e0 0008 30b9 | 0 |
04e2 9a00 0008 | |
04e4 30b9 aa00 |0 |
04e6 0008 30b9 | 0 |
04e8 b200 0008 | |
04ea 30b9 c000 |0 |
04ec 0000 0000 | | .BLANK 0000[0x5]
04f1 0008 0028 | (| .XXX[0x3]
04f3 e980 | |
04f4 0000 0000 | | .BLANK 0000[0xd]
0501 0020 0500 | | .XXX[0xc]
0503 0000 0000 | |
0505 0000 4000 | @ |
0507 0002 2000 | |
0509 0000 0100 | |
050b 0000 0a00 | |
050d 0000 0000 | | .BLANK 0000[0x2d]
053a 0004 00a0 | | .XXX[0xc]
053c 0000 0000 | |
053e 0000 0800 | |
0540 0000 4400 | D |
0542 0000 0020 | |
0544 0000 0140 | @|
0546 0000 0000 | | .BLANK 0000[0x2e]
0574 8014 0000 | | .XXX[0xb]
0576 0000 0000 | |
0578 0100 0000 | |
057a 0880 0000 | |
057c 0004 0000 | |
057e 0028 | ( |
057f 0000 0000 | | .BLANK 0000[0x2e]
05ad 1002 8000 | | .XXX[0xb]
05af 0000 0000 | |
05b1 0020 0000 | |
05b3 0110 0000 | |
05b5 0000 8000 | |
05b7 0005 | |
05b8 0000 0000 | | .BLANK 0000[0x48]