|
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: 4096 (0x1000)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0468 | h | .CONST 0x0468 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00cd | | .CONST 0x00cd ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0038 | 8 | .CONST 0x0038 ; Number of locals
000b INIT_0008:
000b 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0522,0x8000,0x0000,0x0056,0x8b95,0x0000,0x0003
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x3 = 0x11,0xfffc
0012 4800 |H | Short_Literal 0x0
0013 4800 |H | Short_Literal 0x0
0014 4800 |H | Short_Literal 0x0
0015 4800 |H | Short_Literal 0x0
0016 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x18,0xfffa
001a 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x1a,0xfff9
001c 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1c,0xfff8
001e 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1e,0xfff7
0020 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x20,0xfff6
0022 00bf | | Action Accept_Activation ; Debug Table 0x0.0xa = 0x22,0xfff5
; Debug Table 0x0.0xb = 0x22,0xfff4
0023 e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x0023,0x053c,0x8000,0x0000,0x0056,0xf005,0x0000,0x0021
; Debug Table 0x1.0x0 = 0x23,0xffff
; Debug Table 0x1.0x1 = 0x23,0xfffe
; Debug Table 0x1.0x2 = 0x23,0xfffd
; Debug Table 0x1.0x3 = 0x23,0xfffc
0024 1917 | | Execute Package,Field_Reference,Field_Number 0x17
0025 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x25,0xfffb
0026 191c | | Execute Package,Field_Reference,Field_Number 0x1c
0027 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x5 = 0x27,0xfffa
0028 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
0029 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x6 = 0x29,0xfff9
002a 180e | | Execute Package,Field_Execute,Field_Number 0xe
002b 00e5 | | Load_Encached Long_Integer_Cache
002c 03f1 | | Declare_Variable Discrete,With_Value
002d 0092 03f8 | | Action Push_String_Extended,0x3f8 ; "Product_Authorization_Storage"
; Debug Table 0x1.0x7 = 0x2d,0xfff8
002f e003 | | Load 0x0,0x3 ; Debug Table 0x1.0x8 = 0x2f,0xfff7
0030 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0031 0322 | " | Declare_Variable Record
0032 62b1 |b | Indirect_Literal Discrete,0x2e4,{0x00000000, 0x00000833}
0033 00d9 | | Load_Top At_Offset_1
0034 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0035 480b |H | Short_Literal 0xb
0036 00d9 | | Load_Top At_Offset_1
0037 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0038 481f |H | Short_Literal 0x1f
0039 00d9 | | Load_Top At_Offset_1
003a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
003b 480c |H | Short_Literal 0xc
003c 00d9 | | Load_Top At_Offset_1
003d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
003e 483b |H; | Short_Literal 0x3b
003f 00d9 | | Load_Top At_Offset_1
0040 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0041 483b |H; | Short_Literal 0x3b
0042 00d9 | | Load_Top At_Offset_1
0043 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0044 4801 |H | Short_Literal 0x1
0045 00d9 | | Load_Top At_Offset_1
0046 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0047 0092 03f9 | | Action Push_String_Extended,0x3f9 ; "31-DEC-99"
; Debug Table 0x1.0x9 = 0x47,0xfff6
0049 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0xa = 0x49,0xfff5
004a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
004b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0xb = 0x4b,0xfff4
004c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
004d e004 | | Load 0x0,0x4 ; Debug Table 0x1.0xc = 0x4d,0xfff3
004e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004f 02c7 | | Declare_Variable Any
0050 4801 |H | Short_Literal 0x1
0051 0092 03fa | | Action Push_String_Extended,0x3fa ; "Checking_Enabled"
0053 e004 | | Load 0x0,0x4
0054 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0055 c224 | $ | Store 0x1,0x24
0056 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0xd = 0x56,0xfff2
0057 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0058 02c7 | | Declare_Variable Any
0059 4801 |H | Short_Literal 0x1
005a 0092 03fb | | Action Push_String_Extended,0x3fb ; "Checking_Disabled"
005c e004 | | Load 0x0,0x4
005d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
005e c225 | % | Store 0x1,0x25
005f e004 | | Load 0x0,0x4 ; Debug Table 0x1.0xe = 0x5f,0xfff1
0060 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0061 02c7 | | Declare_Variable Any
0062 4801 |H | Short_Literal 0x1
0063 0092 03fc | | Action Push_String_Extended,0x3fc ; "Succeeded"
0065 e004 | | Load 0x0,0x4
0066 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0067 c226 | & | Store 0x1,0x26
0068 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0xf = 0x68,0xfff0
0069 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006a 02c7 | | Declare_Variable Any
006b 4802 |H | Short_Literal 0x2
006c 0092 03fd | | Action Push_String_Extended,0x3fd ; "Failed"
006e e004 | | Load 0x0,0x4
006f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0070 c227 | ' | Store 0x1,0x27
0071 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x10 = 0x71,0xffef
0072 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0073 02c7 | | Declare_Variable Any
0074 4802 |H | Short_Literal 0x2
0075 0092 03fe | | Action Push_String_Extended,0x3fe ; "Invalid"
0077 e004 | | Load 0x0,0x4
0078 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0079 c228 | ( | Store 0x1,0x28
007a e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x11 = 0x7a,0xffee
007b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007c 02c7 | | Declare_Variable Any
007d 4802 |H | Short_Literal 0x2
007e 0092 03ff | | Action Push_String_Extended,0x3ff ; "Expired"
0080 e004 | | Load 0x0,0x4
0081 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0082 c229 | ) | Store 0x1,0x29
0083 481e |H | Short_Literal 0x1e ; Debug Table 0x1.0x12 = 0x83,0xffed
0084 e005 | | Load 0x0,0x5
0085 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0086 1c07 | | Execute_Immediate Run_Utility,0x7
0087 4809 |H | Short_Literal 0x9
0088 e005 | | Load 0x0,0x5
0089 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008a 1c07 | | Execute_Immediate Run_Utility,0x7
008b 00e5 | | Load_Encached Long_Integer_Cache
008c 00e1 | | Load_Encached Boolean_Cache
008d 00e1 | | Load_Encached Boolean_Cache
008e 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call
0090 4805 |H | Short_Literal 0x5
0091 032d | - | Declare_Type Record,Defined
0092 624d |bM | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x0056f005} ; Debug Table 0x1.0x13 = 0x92,0xffec
0093 4957 |IW | Short_Literal 0x157
0094 480b |H | Short_Literal 0xb
0095 00db | | Load_Top At_Offset_3
0096 4801 |H | Short_Literal 0x1
0097 e006 | | Load 0x0,0x6
0098 0387 | | Declare_Variable Package
0099 00d8 | | Load_Top At_Offset_0
009a 020f | | Execute Module,Activate
009b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x14 = 0x9b,0xffeb
009c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
009d 6242 |bB | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x0056f005} ; Debug Table 0x1.0x15 = 0x9d,0xffea
009e 4965 |Ie | Short_Literal 0x165
009f e22a | * | Load 0x1,0x2a
00a0 e007 | | Load 0x0,0x7
00a1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00a2 0387 | | Declare_Variable Package
00a3 00d8 | | Load_Top At_Offset_0
00a4 020f | | Execute Module,Activate
00a5 029d 028b | | Declare_Subprogram INIT_0288,For_Outer_Call ; Debug Table 0x1.0x16 = 0xa5,0xffe9
00a7 029d 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call ; Debug Table 0x1.0x17 = 0xa7,0xffe8
00a9 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call ; Debug Table 0x1.0x18 = 0xa9,0xffe7
00ab 029d 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call ; Debug Table 0x1.0x19 = 0xab,0xffe6
00ad 029d 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call ; Debug Table 0x1.0x1a = 0xad,0xffe5
00af 029d 030b | | Declare_Subprogram INIT_0308,For_Outer_Call ; Debug Table 0x1.0x1b = 0xaf,0xffe4
00b1 029d 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call ; Debug Table 0x1.0x1c = 0xb1,0xffe3
00b3 029d 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call ; Debug Table 0x1.0x1d = 0xb3,0xffe2
00b5 029d 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call ; Debug Table 0x1.0x1e = 0xb5,0xffe1
00b7 029d 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call ; Debug Table 0x1.0x1f = 0xb7,0xffe0
00b9 029d 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call ; Debug Table 0x1.0x20 = 0xb9,0xffdf
00bb 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x21 = 0xbb,0xffde
00bc 00c7 | | Action Elaborate_Subprogram
00bd 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x22 = 0xbd,0xffdd
00be 00c7 | | Action Elaborate_Subprogram
00bf 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x23 = 0xbf,0xffdc
00c0 00c7 | | Action Elaborate_Subprogram
00c1 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x24 = 0xc1,0xffdb
00c2 00c7 | | Action Elaborate_Subprogram
00c3 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x25 = 0xc3,0xffda
00c4 00c7 | | Action Elaborate_Subprogram
00c5 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x26 = 0xc5,0xffd9
00c6 00c7 | | Action Elaborate_Subprogram
00c7 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x27 = 0xc7,0xffd8
00c8 00c7 | | Action Elaborate_Subprogram
00c9 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x28 = 0xc9,0xffd7
00ca 00c7 | | Action Elaborate_Subprogram
00cb 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x29 = 0xcb,0xffd6
00cc 00c7 | | Action Elaborate_Subprogram
00cd BODY_0008:
00cd 8219 | | Call 0x1,0x19 ; Debug Table 0x1.0x2a = 0xcd,0x1
00ce 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x2b = 0xce,0x2
00cf a222 | " | Store_Unchecked 0x1,0x22
00d0 00bc | | Action Signal_Activated
00d1 00bb | | Action Signal_Completion
00d2 0000 0000 | | .BLANK 0000[0x6]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e1 | | .CONST 0x00e1 ; Address of begin
00d9 00f0 | | .CONST 0x00f0 ; Address of exception handler
00da 0004 | | .CONST 0x0004 ; Number of locals
00db INIT_00d8:
00db 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x2 = .DEBUG 0x00db,0x0596,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0004
; Debug Table 0x2.0x0 = 0xdb,0xffff
00dc 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x2.0x1 = 0xdc,0xfffe
00dd 4820 |H | Short_Literal 0x20 ; Debug Table 0x2.0x2 = 0xdd,0xfffd
00de e5ff | | Load 0x2,-0x1
00df 821c | | Call 0x1,0x1c
00e0 821d | | Call 0x1,0x1d
00e1 BODY_00d8:
00e1 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x3 = 0xe1,0x1
00e2 822e | . | Call 0x1,0x2e
00e3 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00e4 e21e | | Load 0x1,0x1e ; Debug Table 0x2.0x4 = 0xe4,0x2
00e5 e5fd | | Load 0x2,-0x3
00e6 00da | | Load_Top At_Offset_2
00e7 8236 | 6 | Call 0x1,0x36
00e8 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00e9 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x5 = 0xe9,0x3
00ea 00db | | Load_Top At_Offset_3
00eb 00db | | Load_Top At_Offset_3
00ec e5fd | | Load 0x2,-0x3
00ed e404 | | Load 0x2,0x4
00ee 8238 | 8 | Call 0x1,0x38
00ef 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00f0 TRAP_00d8:
00f0 0007 | | Action Break_Optional
00f1 0092 0400 | | Action Push_String_Extended,0x400 ; "Product_Authorization"
; Debug Table 0x2.0x6 = 0xf1,0x4
00f3 0092 0401 | | Action Push_String_Extended,0x401 ; "for "
00f5 00db | | Load_Top At_Offset_3
00f6 01cc | | Execute Vector,Catenate
00f7 e227 | ' | Load 0x1,0x27
00f8 8232 | 2 | Call 0x1,0x32
00f9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00fa 0000 0000 | | .BLANK 0000[0x6]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0108 | | .CONST 0x0108 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0003 | | .CONST 0x0003 ; Number of locals
0103 INIT_0100:
0103 e22a | * | Load 0x1,0x2a ; Debug Table 0x3 = .DEBUG 0x0103,0x05a6,0x0002,0x0000,0x0056,0x8b95,0x0000,0x0017
; Debug Table 0x3.0x0 = 0x103,0xffff
0104 0322 | " | Declare_Variable Record
0105 00d8 | | Load_Top At_Offset_0
0106 1c00 | | Execute_Immediate Run_Utility,0x0
0107 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x1 = 0x107,0xfffe
0108 BODY_0100:
0108 e223 | # | Load 0x1,0x23 ; Debug Table 0x3.0x2 = 0x108,0x1
0109 7002 |p | Jump_Nonzero 0x10c
010a 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x3 = 0x10a,0x2
010b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
010c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x4 = 0x10c,0x3
010d 00da | | Load_Top At_Offset_2
010e e5ff | | Load 0x2,-0x1
010f e001 | | Load 0x0,0x1
0110 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0111 e22c | , | Load 0x1,0x2c
0112 e22b | + | Load 0x1,0x2b
0113 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0114 00d1 | | Pop_Control Pop_Count_1
0115 0059 | Y | Store_Top Discrete,At_Offset_1
0116 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x5 = 0x116,0x4
0117 6806 |h | Jump_Zero 0x11e
0118 00d9 | | Load_Top At_Offset_1
0119 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
011a 6803 |h | Jump_Zero 0x11e
011b 00d9 | | Load_Top At_Offset_1
011c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
011d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
011e 4800 |H | Short_Literal 0x0
011f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0133 | 3 | .CONST 0x0133 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0004 | | .CONST 0x0004 ; Number of locals
0123 INIT_0120:
0123 61bc |a | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x0056f005} ; Debug Table 0x4 = .DEBUG 0x0123,0x05b4,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0021
; Debug Table 0x4.0x0 = 0x123,0xffff
0124 61b7 |a | Indirect_Literal Discrete,0x2dc,{0x00000000, 0x00000591}
0125 4803 |H | Short_Literal 0x3
0126 0092 0402 | | Action Push_String_Extended,0x402 ; " "
0128 e008 | | Load 0x0,0x8
0129 0387 | | Declare_Variable Package
012a 00d8 | | Load_Top At_Offset_0
012b 020f | | Execute Module,Activate
012c e22b | + | Load 0x1,0x2b ; Debug Table 0x4.0x1 = 0x12c,0xfffe
012d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
012e 0322 | " | Declare_Variable Record
012f e22a | * | Load 0x1,0x2a ; Debug Table 0x4.0x2 = 0x12f,0xfffd
0130 0322 | " | Declare_Variable Record
0131 00d8 | | Load_Top At_Offset_0
0132 1c00 | | Execute_Immediate Run_Utility,0x0
0133 BODY_0120:
0133 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x3 = 0x133,0x1
0134 0092 0403 | | Action Push_String_Extended,0x403 ; "Product"
0136 e402 | | Load 0x2,0x2
0137 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0138 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x4 = 0x138,0x2
0139 0092 0404 | | Action Push_String_Extended,0x404 ; "Authorization"
013b e402 | | Load 0x2,0x2
013c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
013d 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x5 = 0x13d,0x3
013e 0092 0405 | | Action Push_String_Extended,0x405 ; "Notes"
0140 e402 | | Load 0x2,0x2
0141 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0142 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x6 = 0x142,0x4
0143 e22c | , | Load 0x1,0x2c
0144 e22b | + | Load 0x1,0x2b
0145 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0146 00d1 | | Pop_Control Pop_Count_1
0147 00cf | | Action Mark_Auxiliary
0148 783b |x; | Jump 0x184
0149 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x7 = 0x149,0x6
014a e22b | + | Load 0x1,0x2b
014b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
014c e22c | , | Load 0x1,0x2c
014d e22b | + | Load 0x1,0x2b
014e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
014f 00da | | Load_Top At_Offset_2
0150 017d | } | Execute Record,Structure_Write
0151 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x8 = 0x151,0x7
0152 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0153 e005 | | Load 0x0,0x5
0154 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0155 e402 | | Load 0x2,0x2
0156 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0157 4820 |H | Short_Literal 0x20 ; Debug Table 0x4.0x9 = 0x157,0x8
0158 4800 |H | Short_Literal 0x0
0159 4810 |H | Short_Literal 0x10
015a e404 | | Load 0x2,0x4
015b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
015c 821b | | Call 0x1,0x1b
015d e402 | | Load 0x2,0x2
015e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
015f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xa = 0x15f,0x9
0160 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0161 6808 |h | Jump_Zero 0x16a
0162 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xb = 0x162,0xa
0163 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0164 e005 | | Load 0x0,0x5
0165 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0166 8234 | 4 | Call 0x1,0x34
0167 e402 | | Load 0x2,0x2
0168 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0169 7815 |x | Jump 0x17f
016a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xc = 0x16a,0xb
016b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
016c 700e |p | Jump_Nonzero 0x17b
016d 0092 03ff | | Action Push_String_Extended,0x3ff ; "Expired"
; Debug Table 0x4.0xd = 0x16d,0xc
016f e402 | | Load 0x2,0x2
0170 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0171 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xe = 0x171,0xd
0172 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0173 e005 | | Load 0x0,0x5
0174 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0175 8234 | 4 | Call 0x1,0x34
0176 e402 | | Load 0x2,0x2
0177 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0178 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xf = 0x178,0xe
0179 1815 | | Execute Package,Field_Execute,Field_Number 0x15
017a 7804 |x | Jump 0x17f
017b 0092 0406 | | Action Push_String_Extended,0x406 ; "Not Authorized"
; Debug Table 0x4.0x10 = 0x17b,0xf
017d e402 | | Load 0x2,0x2
017e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017f 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x11 = 0x17f,0x10
0180 e22b | + | Load 0x1,0x2b
0181 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0182 00d1 | | Pop_Control Pop_Count_1
0183 00c9 | | Action Pop_Auxiliary_Loop
0184 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x12 = 0x184,0x5
0185 e22b | + | Load 0x1,0x2b
0186 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0187 6fc1 |o | Jump_Zero 0x149
0188 00ce | | Action Pop_Auxiliary
0189 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x13 = 0x189,0x11
018a 00db | | Load_Top At_Offset_3
018b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
018c e009 | | Load 0x0,0x9 ; Debug Table 0x4.0x14 = 0x18c,0x12
018d 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
018e 00db | | Load_Top At_Offset_3
018f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0190 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0191 0000 0000 | | .BLANK 0000[0x7]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 4820 |H | Short_Literal 0x20 ; Debug Table 0x5 = .DEBUG 0x019b,0x05e0,0x0002,0x0000,0x0056,0x8b95,0x0000,0x0029
; Debug Table 0x5.0x0 = 0x19b,0x1
019c 4800 |H | Short_Literal 0x0
019d 4810 |H | Short_Literal 0x10
019e e5fe | | Load 0x2,-0x2
019f e5fd | | Load 0x2,-0x3
01a0 e5ff | | Load 0x2,-0x1
01a1 8236 | 6 | Call 0x1,0x36
01a2 821b | | Call 0x1,0x1b
01a3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01a4 0000 0000 | | .BLANK 0000[0x4]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x01ab,0x05e4,0x0001,0x0000,0x0056,0x8b95,0x0000,0x003c
; Debug Table 0x6.0x0 = 0x1ab,0x1
01ac 6808 |h | Jump_Zero 0x1b5
01ad 0092 0400 | | Action Push_String_Extended,0x400 ; "Product_Authorization"
; Debug Table 0x6.0x1 = 0x1ad,0x2
01af 00ea | | Load_Encached Null_String_Cache
01b0 e224 | $ | Load 0x1,0x24
01b1 8232 | 2 | Call 0x1,0x32
01b2 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x2 = 0x1b2,0x3
01b3 a223 | # | Store_Unchecked 0x1,0x23
01b4 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01b5 0092 0400 | | Action Push_String_Extended,0x400 ; "Product_Authorization"
; Debug Table 0x6.0x3 = 0x1b5,0x4
01b7 00ea | | Load_Encached Null_String_Cache
01b8 e225 | % | Load 0x1,0x25
01b9 8232 | 2 | Call 0x1,0x32
01ba 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x4 = 0x1ba,0x5
01bb a223 | # | Store_Unchecked 0x1,0x23
01bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01bd 0000 0000 | | .XXX[0x3]
01bf 0000 | |
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 e223 | # | Load 0x1,0x23 ; Debug Table 0x7 = .DEBUG 0x01c3,0x05f0,0x0002,0x0000,0x0056,0x8b95,0x0000,0x0045
; Debug Table 0x7.0x0 = 0x1c3,0x1
01c4 00ca | | Action Exit_Nullary_Function
01c5 0000 0000 | | .XXX[0x3]
01c7 0000 | |
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x01cb,0x05f4,0x0001,0x0000,0x0056,0x8b95,0x0000,0x004a
; Debug Table 0x8.0x0 = 0x1cb,0x1
01cc a21e | | Store_Unchecked 0x1,0x1e
01cd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01dc | | .CONST 0x01dc ; Address of begin
01d1 0214 | | .CONST 0x0214 ; Address of exception handler
01d2 0003 | | .CONST 0x0003 ; Number of locals
01d3 INIT_01d0:
01d3 e007 | | Load 0x0,0x7 ; Debug Table 0x9 = .DEBUG 0x01d3,0x05f8,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0052
; Debug Table 0x9.0x0 = 0x1d3,0xffff
01d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01d5 02c7 | | Declare_Variable Any
01d6 00d8 | | Load_Top At_Offset_0
01d7 1c00 | | Execute_Immediate Run_Utility,0x0
01d8 e22a | * | Load 0x1,0x2a ; Debug Table 0x9.0x1 = 0x1d8,0xfffe
01d9 0322 | " | Declare_Variable Record
01da 00d8 | | Load_Top At_Offset_0
01db 1c00 | | Execute_Immediate Run_Utility,0x0
01dc BODY_01d0:
01dc e22b | + | Load 0x1,0x2b ; Debug Table 0x9.0x2 = 0x1dc,0x1
01dd 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01de 480b |H | Short_Literal 0xb
01df e22b | + | Load 0x1,0x2b
01e0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01e1 c22c | , | Store 0x1,0x2c
01e2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x3 = 0x1e2,0x2
01e3 4865 |He | Short_Literal 0x65
01e4 e21f | | Load 0x1,0x1f
01e5 4800 |H | Short_Literal 0x0
01e6 e007 | | Load 0x0,0x7
01e7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01e8 c402 | | Store 0x2,0x2
01e9 00cf | | Action Mark_Auxiliary
01ea 781c |x | Jump 0x207
01eb 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x4 = 0x1eb,0x4
01ec 00db | | Load_Top At_Offset_3
01ed e22d | - | Load 0x1,0x2d
01ee 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ef 00da | | Load_Top At_Offset_2
01f0 017d | } | Execute Record,Structure_Write
01f1 00cf | | Action Mark_Auxiliary ; Debug Table 0x9.0x5 = 0x1f1,0x5
01f2 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x6 = 0x1f2,0xfbff
01f3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01f4 e005 | | Load 0x0,0x5
01f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01f6 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x7 = 0x1f6,0xfbfe
01f7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01f8 e005 | | Load 0x0,0x5
01f9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01fa 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x8 = 0x1fa,0x401
01fb e21e | | Load 0x1,0x1e
01fc 00da | | Load_Top At_Offset_2
01fd e406 | | Load 0x2,0x6
01fe 8236 | 6 | Call 0x1,0x36
01ff e403 | | Load 0x2,0x3
0200 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0201 00db | | Load_Top At_Offset_3
0202 e406 | | Load 0x2,0x6
0203 8238 | 8 | Call 0x1,0x38
0204 00d2 | | Pop_Control Pop_Count_2
0205 00ce | | Action Pop_Auxiliary
0206 00c9 | | Action Pop_Auxiliary_Loop
0207 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x9 = 0x207,0x3
0208 00db | | Load_Top At_Offset_3
0209 e007 | | Load 0x0,0x7
020a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
020b 6fdf |o | Jump_Zero 0x1eb
020c 00ce | | Action Pop_Auxiliary
020d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0xa = 0x20d,0x6
020e 4800 |H | Short_Literal 0x0
020f e007 | | Load 0x0,0x7
0210 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0211 c402 | | Store 0x2,0x2
0212 821a | | Call 0x1,0x1a ; Debug Table 0x9.0xb = 0x212,0x7
0213 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0214 TRAP_01d0:
0214 0007 | | Action Break_Optional
0215 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x9.0xc = 0x215,0x8
0216 0000 0000 | | .XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0227 | ' | .CONST 0x0227 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0004 | | .CONST 0x0004 ; Number of locals
021b INIT_0218:
021b e22b | + | Load 0x1,0x2b ; Debug Table 0xa = .DEBUG 0x021b,0x0614,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0056
; Debug Table 0xa.0x0 = 0x21b,0xffff
021c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
021d 0322 | " | Declare_Variable Record
021e e007 | | Load 0x0,0x7 ; Debug Table 0xa.0x1 = 0x21e,0xfffe
021f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0220 02c7 | | Declare_Variable Any
0221 00d8 | | Load_Top At_Offset_0
0222 1c00 | | Execute_Immediate Run_Utility,0x0
0223 e22a | * | Load 0x1,0x2a ; Debug Table 0xa.0x2 = 0x223,0xfffd
0224 0322 | " | Declare_Variable Record
0225 00d8 | | Load_Top At_Offset_0
0226 1c00 | | Execute_Immediate Run_Utility,0x0
0227 BODY_0218:
0227 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x3 = 0x227,0x1
0228 4865 |He | Short_Literal 0x65
0229 e21f | | Load 0x1,0x1f
022a 4801 |H | Short_Literal 0x1
022b e007 | | Load 0x0,0x7
022c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
022d c403 | | Store 0x2,0x3
022e 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x4 = 0x22e,0x2
022f e22c | , | Load 0x1,0x2c
0230 e22b | + | Load 0x1,0x2b
0231 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0232 00d1 | | Pop_Control Pop_Count_1
0233 00cf | | Action Mark_Auxiliary
0234 781a |x | Jump 0x24f
0235 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x5 = 0x235,0x4
0236 e22b | + | Load 0x1,0x2b
0237 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0238 e22c | , | Load 0x1,0x2c
0239 e22b | + | Load 0x1,0x2b
023a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
023b 00da | | Load_Top At_Offset_2
023c 017d | } | Execute Record,Structure_Write
023d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x6 = 0x23d,0x5
023e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
023f 680a |h | Jump_Zero 0x24a
0240 00d9 | | Load_Top At_Offset_1
0241 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0242 e005 | | Load 0x0,0x5
0243 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0244 8237 | 7 | Call 0x1,0x37
0245 6804 |h | Jump_Zero 0x24a
0246 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x7 = 0x246,0x6
0247 00db | | Load_Top At_Offset_3
0248 e22d | - | Load 0x1,0x2d
0249 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024a 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x8 = 0x24a,0x7
024b e22b | + | Load 0x1,0x2b
024c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
024d 00d1 | | Pop_Control Pop_Count_1
024e 00c9 | | Action Pop_Auxiliary_Loop
024f 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x9 = 0x24f,0x3
0250 e22b | + | Load 0x1,0x2b
0251 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0252 6fe2 |o | Jump_Zero 0x235
0253 00ce | | Action Pop_Auxiliary
0254 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0xa = 0x254,0x8
0255 4801 |H | Short_Literal 0x1
0256 e007 | | Load 0x0,0x7
0257 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0258 c403 | | Store 0x2,0x3
0259 4501 |E | Exit_Suprogram New_Top_Offset 0x1
025a 0000 0000 | | .BLANK 0000[0x6]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 4608 |F | Jump_Case 0x9 ; Debug Table 0xb = .DEBUG 0x0263,0x062c,0x0005,0x0000,0x0056,0xf005,0x0000,0x0130
0264 7808 |x | Jump 0x26d ; case 0x0
0265 781a |x | Jump 0x280 ; case 0x1
0266 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0267 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0268 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0269 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
026a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
026b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
026c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
026d 00da | | Load_Top At_Offset_2
026e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
026f 0125 | % | Execute Any,Set_Constraint
0270 00da | | Load_Top At_Offset_2
0271 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0272 1c00 | | Execute_Immediate Run_Utility,0x0
0273 00da | | Load_Top At_Offset_2
0274 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0275 0125 | % | Execute Any,Set_Constraint
0276 00da | | Load_Top At_Offset_2
0277 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0278 1c00 | | Execute_Immediate Run_Utility,0x0
0279 4800 |H | Short_Literal 0x0
027a 00db | | Load_Top At_Offset_3
027b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
027c 4801 |H | Short_Literal 0x1
027d 00db | | Load_Top At_Offset_3
027e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
027f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0280 00da | | Load_Top At_Offset_2
0281 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0282 0125 | % | Execute Any,Set_Constraint
0283 00da | | Load_Top At_Offset_2
0284 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0285 0125 | % | Execute Any,Set_Constraint
0286 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0287 0000 | | .XXX[0x1]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028e | | .CONST 0x028e ; Address of begin
0289 0298 | | .CONST 0x0298 ; Address of exception handler
028a 0003 | | .CONST 0x0003 ; Number of locals
028b INIT_0288:
028b 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0xc = .DEBUG 0x028b,0x062e,0x0002,0x0000,0x0056,0xf005,0x0000,0x016d
; Debug Table 0xc.0x0 = 0x28b,0xffff
028c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
028d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x1 = 0x28d,0xfffe
028e BODY_0288:
028e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x2 = 0x28e,0x1
028f 00e5 | | Load_Encached Long_Integer_Cache
0290 4810 |H | Short_Literal 0x10
0291 e5ff | | Load 0x2,-0x1
0292 e001 | | Load 0x0,0x1
0293 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0294 005b | [ | Store_Top Discrete,At_Offset_3
0295 0059 | Y | Store_Top Discrete,At_Offset_1
0296 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x3 = 0x296,0x2
0297 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0298 TRAP_0288:
0298 0007 | | Action Break_Optional
0299 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x4 = 0x299,0x3
029a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 e00a | | Load 0x0,0xa ; Debug Table 0xd = .DEBUG 0x02a3,0x063a,0x0002,0x0000,0x0056,0xf005,0x0000,0x0198
; Debug Table 0xd.0x0 = 0x2a3,0x1
02a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02a5 00db | | Load_Top At_Offset_3
02a6 e00b | | Load 0x0,0xb
02a7 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02a8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02a9 e00c | | Load 0x0,0xc
02aa 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ac 0000 0000 | | .BLANK 0000[0x4]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 e00a | | Load 0x0,0xa ; Debug Table 0xe = .DEBUG 0x02b3,0x063e,0x0002,0x0000,0x0056,0xf005,0x0000,0x01b7
; Debug Table 0xe.0x0 = 0x2b3,0x1
02b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02b5 00db | | Load_Top At_Offset_3
02b6 e00b | | Load 0x0,0xb
02b7 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02b8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02b9 e00c | | Load 0x0,0xc
02ba 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02bc 0000 0000 | | .BLANK 0000[0x4]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02cf | | .CONST 0x02cf ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0003 | | .CONST 0x0003 ; Number of locals
02c3 INIT_02c0:
02c3 e00d | | Load 0x0,0xd ; Debug Table 0xf = .DEBUG 0x02c3,0x0642,0x0002,0x0000,0x0056,0xf005,0x0000,0x01d6
; Debug Table 0xf.0x0 = 0x2c3,0xffff
02c4 180f | | Execute Package,Field_Execute,Field_Number 0xf
02c5 e002 | | Load 0x0,0x2
02c6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02c7 03f1 | | Declare_Variable Discrete,With_Value
02c8 482e |H. | Short_Literal 0x2e ; Debug Table 0xf.0x1 = 0x2c8,0xfffe
02c9 00d9 | | Load_Top At_Offset_1
02ca 8230 | 0 | Call 0x1,0x30
02cb 01cb | | Execute Vector,Append
02cc 00d9 | | Load_Top At_Offset_1
02cd 822f | / | Call 0x1,0x2f
02ce 01cc | | Execute Vector,Catenate
02cf BODY_02c0:
02cf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x2cf,0x1
02d0 01dd | | Execute Vector,First
02d1 00d9 | | Load_Top At_Offset_1
02d2 01d7 | | Execute Vector,Field_Read
02d3 0f2a | * | Execute_Immediate Equal,0x2a
02d4 6802 |h | Jump_Zero 0x2d7
02d5 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xf.0x3 = 0x2d5,0x2
02d6 00ca | | Action Exit_Nullary_Function
02d7 0092 0407 | | Action Push_String_Extended,0x407 ; "; "
; Debug Table 0xf.0x4 = 0x2d7,0x3
02d9 00d9 | | Load_Top At_Offset_1
02da 01cc | | Execute Vector,Catenate
02db 00ca | | Action Exit_Nullary_Function
02dc 0000 0000 | | .LITERAL {0x00000000, 0x00000591}
02e0 0000 0000 | | .LITERAL {0x00000000, 0x0056f005}
02e4 0000 0000 | | .LITERAL {0x00000000, 0x00000833}
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f0 | | .CONST 0x02f0 ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0002 | | .CONST 0x0002 ; Number of locals
02eb INIT_02e8:
02eb e004 | | Load 0x0,0x4 ; Debug Table 0x10 = .DEBUG 0x02eb,0x064e,0x0001,0x0000,0x0056,0xf005,0x0000,0x0214
; Debug Table 0x10.0x0 = 0x2eb,0xffff
02ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ed 02c7 | | Declare_Variable Any
02ee 00d8 | | Load_Top At_Offset_0
02ef 1c00 | | Execute_Immediate Run_Utility,0x0
02f0 BODY_02e8:
02f0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x1 = 0x2f0,0x1
02f1 e5fe | | Load 0x2,-0x2
02f2 8231 | 1 | Call 0x1,0x31
02f3 01cc | | Execute Vector,Catenate
02f4 e5ff | | Load 0x2,-0x1
02f5 e5fd | | Load 0x2,-0x3
02f6 e004 | | Load 0x0,0x4
02f7 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02f8 c402 | | Store 0x2,0x2
02f9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x2 = 0x2f9,0x2
02fa e00e | | Load 0x0,0xe
02fb 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02fc c402 | | Store 0x2,0x2
02fd e222 | " | Load 0x1,0x22 ; Debug Table 0x10.0x3 = 0x2fd,0x3
02fe 6805 |h | Jump_Zero 0x304
02ff e00f | | Load 0x0,0xf ; Debug Table 0x10.0x4 = 0x2ff,0x4
0300 180e | | Execute Package,Field_Execute,Field_Number 0xe
0301 00d9 | | Load_Top At_Offset_1
0302 e010 | | Load 0x0,0x10
0303 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0304 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0305 0000 0000 | | .XXX[0x3]
0307 0000 | |
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 0311 | | .CONST 0x0311 ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0002 | | .CONST 0x0002 ; Number of locals
030b INIT_0308:
030b e003 | | Load 0x0,0x3 ; Debug Table 0x11 = .DEBUG 0x030b,0x065a,0x0002,0x0000,0x0056,0xf005,0x0000,0x0250
; Debug Table 0x11.0x0 = 0x30b,0xffff
030c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
030d 0322 | " | Declare_Variable Record
030e e220 | | Load 0x1,0x20
030f 00d9 | | Load_Top At_Offset_1
0310 017d | } | Execute Record,Structure_Write
0311 BODY_0308:
0311 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x1 = 0x311,0x1
0312 01db | | Execute Vector,Length
0313 6805 |h | Jump_Zero 0x319
0314 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x2 = 0x314,0x2
0315 e003 | | Load 0x0,0x3
0316 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0317 00d9 | | Load_Top At_Offset_1
0318 017d | } | Execute Record,Structure_Write
0319 4802 |H | Short_Literal 0x2 ; Debug Table 0x11.0x3 = 0x319,0x3
031a 4800 |H | Short_Literal 0x0
031b 4802 |H | Short_Literal 0x2
031c 00db | | Load_Top At_Offset_3
031d e003 | | Load 0x0,0x3
031e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
031f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0326 | & | .CONST 0x0326 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0002 | | .CONST 0x0002 ; Number of locals
0323 INIT_0320:
0323 e003 | | Load 0x0,0x3 ; Debug Table 0x12 = .DEBUG 0x0323,0x0664,0x0002,0x0000,0x0056,0xf005,0x0000,0x0286
; Debug Table 0x12.0x0 = 0x323,0xffff
0324 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0325 0322 | " | Declare_Variable Record
0326 BODY_0320:
0326 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x1 = 0x326,0x1
0327 01db | | Execute Vector,Length
0328 6804 |h | Jump_Zero 0x32d
0329 00db | | Load_Top At_Offset_3
032a e221 | ! | Load 0x1,0x21
032b 01df | | Execute Vector,Equal
032c 6802 |h | Jump_Zero 0x32f
032d 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x12.0x2 = 0x32d,0x2
032e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
032f 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x3 = 0x32f,0x3
0330 e003 | | Load 0x0,0x3
0331 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0332 00d9 | | Load_Top At_Offset_1
0333 017d | } | Execute Record,Structure_Write
0334 4802 |H | Short_Literal 0x2 ; Debug Table 0x12.0x4 = 0x334,0x4
0335 4800 |H | Short_Literal 0x0
0336 4800 |H | Short_Literal 0x0
0337 00db | | Load_Top At_Offset_3
0338 e003 | | Load 0x0,0x3
0339 181b | | Execute Package,Field_Execute,Field_Number 0x1b
033a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033b 0000 0000 | | .BLANK 0000[0x5]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343 | C | .CONST 0x0343 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0001 | | .CONST 0x0001 ; Number of locals
0343 BODY_0340:
0343 INIT_0340:
0343 4820 |H | Short_Literal 0x20 ; Debug Table 0x13 = .DEBUG 0x0343,0x0670,0x0002,0x0000,0x0056,0xf005,0x0000,0x02c6
; Debug Table 0x13.0x0 = 0x343,0x1
0344 00db | | Load_Top At_Offset_3
0345 821c | | Call 0x1,0x1c
0346 e001 | | Load 0x0,0x1
0347 180d | | Execute Package,Field_Execute,Field_Number 0xd
0348 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0349 0000 0000 | | .BLANK 0000[0x7]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0354 | T | .CONST 0x0354 ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0002 | | .CONST 0x0002 ; Number of locals
0353 INIT_0350:
0353 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x14 = .DEBUG 0x0353,0x0674,0x0002,0x0000,0x0056,0xf005,0x0000,0x02e0
; Debug Table 0x14.0x0 = 0x353,0xffff
0354 BODY_0350:
0354 e5fd | | Load 0x2,-0x3 ; Debug Table 0x14.0x1 = 0x354,0x1
0355 609e |` | Indirect_Literal Discrete,0x3f4,{0x00000000, 0x3fffffff}
0356 0279 | y | Execute Discrete,And
0357 e5ff | | Load 0x2,-0x1
0358 8235 | 5 | Call 0x1,0x35
0359 0271 | q | Execute Discrete,Times
035a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
035b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x2 = 0x35b,0x2
035c e5fe | | Load 0x2,-0x2
035d 8233 | 3 | Call 0x1,0x33
035e 8235 | 5 | Call 0x1,0x35
035f 0273 | s | Execute Discrete,Plus
0360 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0361 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x3 = 0x361,0x3
0362 4820 |H | Short_Literal 0x20
0363 4800 |H | Short_Literal 0x0
0364 4810 |H | Short_Literal 0x10
0365 e402 | | Load 0x2,0x2
0366 821b | | Call 0x1,0x1b
0367 8235 | 5 | Call 0x1,0x35
0368 091e | | Execute_Immediate Binary_Scale,0x1e
0369 0273 | s | Execute Discrete,Plus
036a 0274 | t | Execute Discrete,Absolute_Value
036b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
036c 0000 0000 | | .BLANK 0000[0x4]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373 | s | .CONST 0x0373 ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0001 | | .CONST 0x0001 ; Number of locals
0373 BODY_0370:
0373 INIT_0370:
0373 e011 | | Load 0x0,0x11 ; Debug Table 0x15 = .DEBUG 0x0373,0x067e,0x0002,0x0000,0x0056,0xf005,0x0000,0x0335
; Debug Table 0x15.0x0 = 0x373,0x1
0374 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0375 00db | | Load_Top At_Offset_3
0376 8233 | 3 | Call 0x1,0x33
0377 e003 | | Load 0x0,0x3
0378 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0379 e003 | | Load 0x0,0x3
037a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
037b e011 | | Load 0x0,0x11
037c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
037d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
037e 0000 0000 | | .XXX[0x2]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0389 | | .CONST 0x0389 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0003 | | .CONST 0x0003 ; Number of locals
0383 INIT_0380:
0383 e22a | * | Load 0x1,0x2a ; Debug Table 0x16 = .DEBUG 0x0383,0x0682,0x0001,0x0000,0x0056,0xf005,0x0000,0x0359
; Debug Table 0x16.0x0 = 0x383,0xffff
0384 0322 | " | Declare_Variable Record
0385 00d8 | | Load_Top At_Offset_0
0386 1c00 | | Execute_Immediate Run_Utility,0x0
0387 e5fe | | Load 0x2,-0x2 ; Debug Table 0x16.0x1 = 0x387,0xfffe
0388 8233 | 3 | Call 0x1,0x33
0389 BODY_0380:
0389 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x2 = 0x389,0x1
038a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
038b e5ff | | Load 0x2,-0x1
038c e005 | | Load 0x0,0x5
038d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
038e 00d1 | | Pop_Control Pop_Count_1
038f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x3 = 0x38f,0x2
0390 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0391 00d9 | | Load_Top At_Offset_1
0392 e005 | | Load 0x0,0x5
0393 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0394 00d1 | | Pop_Control Pop_Count_1
0395 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x4 = 0x395,0x3
0396 00da | | Load_Top At_Offset_2
0397 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0398 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x5 = 0x398,0x4
0399 e5fc | | Load 0x2,-0x4
039a 027f | | Execute Discrete,Equal
039b 00da | | Load_Top At_Offset_2
039c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
039d e5fe | | Load 0x2,-0x2 ; Debug Table 0x16.0x6 = 0x39d,0x5
039e 8237 | 7 | Call 0x1,0x37
039f 00da | | Load_Top At_Offset_2
03a0 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
03a1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x7 = 0x3a1,0x6
03a2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
03a3 6839 |h9 | Jump_Zero 0x3dd
03a4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x8 = 0x3a4,0x7
03a5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
03a6 7011 |p | Jump_Nonzero 0x3b8
03a7 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x9 = 0x3a7,0x8
03a8 00da | | Load_Top At_Offset_2
03a9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
03aa 0092 0400 | | Action Push_String_Extended,0x400 ; "Product_Authorization"
; Debug Table 0x16.0xa = 0x3aa,0x9
03ac 0092 0408 | | Action Push_String_Extended,0x408 ; "on "
03ae e5fe | | Load 0x2,-0x2
03af 8234 | 4 | Call 0x1,0x34
03b0 01cc | | Execute Vector,Catenate
03b1 0092 0409 | | Action Push_String_Extended,0x409 ; " for "
03b3 01cc | | Execute Vector,Catenate
03b4 e5ff | | Load 0x2,-0x1
03b5 01cc | | Execute Vector,Catenate
03b6 e229 | ) | Load 0x1,0x29
03b7 8232 | 2 | Call 0x1,0x32
03b8 e5fb | | Load 0x2,-0x5 ; Debug Table 0x16.0xb = 0x3b8,0xa
03b9 6816 |h | Jump_Zero 0x3d0
03ba e22c | , | Load 0x1,0x2c ; Debug Table 0x16.0xc = 0x3ba,0xb
03bb 4800 |H | Short_Literal 0x0
03bc 00db | | Load_Top At_Offset_3
03bd e5ff | | Load 0x2,-0x1
03be e001 | | Load 0x0,0x1
03bf 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03c0 e22b | + | Load 0x1,0x2b
03c1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03c2 c22c | , | Store 0x1,0x2c
03c3 821a | | Call 0x1,0x1a ; Debug Table 0x16.0xd = 0x3c3,0xc
03c4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0xe = 0x3c4,0xd
03c5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
03c6 6808 |h | Jump_Zero 0x3cf
03c7 0092 0400 | | Action Push_String_Extended,0x400 ; "Product_Authorization"
; Debug Table 0x16.0xf = 0x3c7,0xe
03c9 0092 0401 | | Action Push_String_Extended,0x401 ; "for "
03cb e5ff | | Load 0x2,-0x1
03cc 01cc | | Execute Vector,Catenate
03cd e226 | & | Load 0x1,0x26
03ce 8232 | 2 | Call 0x1,0x32
03cf 4506 |E | Exit_Suprogram New_Top_Offset 0x6
03d0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x10 = 0x3d0,0xf
03d1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
03d2 6809 |h | Jump_Zero 0x3dc
03d3 e22c | , | Load 0x1,0x2c ; Debug Table 0x16.0x11 = 0x3d3,0x10
03d4 4800 |H | Short_Literal 0x0
03d5 00db | | Load_Top At_Offset_3
03d6 e5ff | | Load 0x2,-0x1
03d7 e001 | | Load 0x0,0x1
03d8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03d9 e22b | + | Load 0x1,0x2b
03da 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03db c22c | , | Store 0x1,0x2c
03dc 4506 |E | Exit_Suprogram New_Top_Offset 0x6
03dd e5fb | | Load 0x2,-0x5 ; Debug Table 0x16.0x12 = 0x3dd,0x11
03de 6809 |h | Jump_Zero 0x3e8
03df 0092 0400 | | Action Push_String_Extended,0x400 ; "Product_Authorization"
; Debug Table 0x16.0x13 = 0x3df,0x12
03e1 0092 0401 | | Action Push_String_Extended,0x401 ; "for "
03e3 e5ff | | Load 0x2,-0x1
03e4 01cc | | Execute Vector,Catenate
03e5 e227 | ' | Load 0x1,0x27
03e6 8232 | 2 | Call 0x1,0x32
03e7 4506 |E | Exit_Suprogram New_Top_Offset 0x6
03e8 0092 0400 | | Action Push_String_Extended,0x400 ; "Product_Authorization"
; Debug Table 0x16.0x14 = 0x3e8,0x13
03ea 0092 0401 | | Action Push_String_Extended,0x401 ; "for "
03ec e5ff | | Load 0x2,-0x1
03ed 01cc | | Execute Vector,Catenate
03ee e228 | ( | Load 0x1,0x28
03ef 8232 | 2 | Call 0x1,0x32
03f0 4506 |E | Exit_Suprogram New_Top_Offset 0x6
03f1 0000 0000 | | .XXX[0x3]
03f3 0000 | |
03f4 0000 0000 | | .LITERAL {0x00000000, 0x3fffffff}
03f8 ; --------------------------------------------------------------------------------------
03f8 ; STRING TABLE
03f8 ; --------------------------------------------------------------------------------------
03f8 0026 | & | .STRTAB 0x0026->0x040b ; "Product_Authorization_Storage"
03f9 0041 | A | .STRTAB 0x0041->0x0419 ; "31-DEC-99"
03fa 0048 | H | .STRTAB 0x0048->0x041e ; "Checking_Enabled"
03fb 0056 | V | .STRTAB 0x0056->0x0426 ; "Checking_Disabled"
03fc 0065 | e | .STRTAB 0x0065->0x042e ; "Succeeded"
03fd 006c | l | .STRTAB 0x006c->0x0433 ; "Failed"
03fe 0070 | p | .STRTAB 0x0070->0x0436 ; "Invalid"
03ff 0075 | u | .STRTAB 0x0075->0x0439 ; "Expired"
0400 007a | z | .STRTAB 0x007a->0x043d ; "Product_Authorization"
0401 008d | | .STRTAB 0x008d->0x0447 ; "for "
0402 008f | | .STRTAB 0x008f->0x0449 ; " "
0403 008e | | .STRTAB 0x008e->0x044a ; "Product"
0404 0093 | | .STRTAB 0x0093->0x044d ; "Authorization"
0405 009e | | .STRTAB 0x009e->0x0454 ; "Notes"
0406 00a1 | | .STRTAB 0x00a1->0x0456 ; "Not Authorized"
0407 00ad | | .STRTAB 0x00ad->0x045d ; "; "
0408 00ad | | .STRTAB 0x00ad->0x045e ; "on "
0409 00ae | | .STRTAB 0x00ae->0x0460 ; " for "
040a 00b1 | | .STREND 0x00b1->0x0462
040b 5072 6f64 |Prod| .STRTAB_STRINGS
0463 0000 0000 | | .BLANK 0000[0x5]
0468 ; --------------------------------------------------------------------------------------
0468 ; Debug Table
0468 ; --------------------------------------------------------------------------------------
0468 0003 0017 | | .CONST 0x0003,0x0017
046a 000b 0522 | "| .DEBUG 0x000b,0x0522,0x8000,0x0000,0x0056,0x8b95,0x0000,0x0003
0472 0023 053c | # <| .DEBUG 0x0023,0x053c,0x8000,0x0000,0x0056,0xf005,0x0000,0x0021
047a 00db 0596 | | .DEBUG 0x00db,0x0596,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0004
0482 0103 05a6 | | .DEBUG 0x0103,0x05a6,0x0002,0x0000,0x0056,0x8b95,0x0000,0x0017
048a 0123 05b4 | # | .DEBUG 0x0123,0x05b4,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0021
0492 019b 05e0 | | .DEBUG 0x019b,0x05e0,0x0002,0x0000,0x0056,0x8b95,0x0000,0x0029
049a 01ab 05e4 | | .DEBUG 0x01ab,0x05e4,0x0001,0x0000,0x0056,0x8b95,0x0000,0x003c
04a2 01c3 05f0 | | .DEBUG 0x01c3,0x05f0,0x0002,0x0000,0x0056,0x8b95,0x0000,0x0045
04aa 01cb 05f4 | | .DEBUG 0x01cb,0x05f4,0x0001,0x0000,0x0056,0x8b95,0x0000,0x004a
04b2 01d3 05f8 | | .DEBUG 0x01d3,0x05f8,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0052
04ba 021b 0614 | | .DEBUG 0x021b,0x0614,0x0001,0x0000,0x0056,0x8b95,0x0000,0x0056
04c2 0263 062c | c ,| .DEBUG 0x0263,0x062c,0x0005,0x0000,0x0056,0xf005,0x0000,0x0130
04ca 028b 062e | .| .DEBUG 0x028b,0x062e,0x0002,0x0000,0x0056,0xf005,0x0000,0x016d
04d2 02a3 063a | :| .DEBUG 0x02a3,0x063a,0x0002,0x0000,0x0056,0xf005,0x0000,0x0198
04da 02b3 063e | >| .DEBUG 0x02b3,0x063e,0x0002,0x0000,0x0056,0xf005,0x0000,0x01b7
04e2 02c3 0642 | B| .DEBUG 0x02c3,0x0642,0x0002,0x0000,0x0056,0xf005,0x0000,0x01d6
04ea 02eb 064e | N| .DEBUG 0x02eb,0x064e,0x0001,0x0000,0x0056,0xf005,0x0000,0x0214
04f2 030b 065a | Z| .DEBUG 0x030b,0x065a,0x0002,0x0000,0x0056,0xf005,0x0000,0x0250
04fa 0323 0664 | # d| .DEBUG 0x0323,0x0664,0x0002,0x0000,0x0056,0xf005,0x0000,0x0286
0502 0343 0670 | C p| .DEBUG 0x0343,0x0670,0x0002,0x0000,0x0056,0xf005,0x0000,0x02c6
050a 0353 0674 | S t| .DEBUG 0x0353,0x0674,0x0002,0x0000,0x0056,0xf005,0x0000,0x02e0
0512 0373 067e | s ~| .DEBUG 0x0373,0x067e,0x0002,0x0000,0x0056,0xf005,0x0000,0x0335
051a 0383 0682 | | .DEBUG 0x0383,0x0682,0x0001,0x0000,0x0056,0xf005,0x0000,0x0359
0522 ; --------------------------------------------------------------------------------------
0522 ; Debug3 Subtable 0x0
0522 ; --------------------------------------------------------------------------------------
0522 000c 0000 | | .DBG3TAB 0x000c,0x0000
0524 000b ffff | | .CONST 0x000b,0xffff
0526 000d fffe | | .CONST 0x000d,0xfffe
0528 000f fffd | | .CONST 0x000f,0xfffd
052a 0011 fffc | | .CONST 0x0011,0xfffc
052c 0016 fffb | | .CONST 0x0016,0xfffb
052e 0018 fffa | | .CONST 0x0018,0xfffa
0530 001a fff9 | | .CONST 0x001a,0xfff9
0532 001c fff8 | | .CONST 0x001c,0xfff8
0534 001e fff7 | | .CONST 0x001e,0xfff7
0536 0020 fff6 | | .CONST 0x0020,0xfff6
0538 0022 fff5 | " | .CONST 0x0022,0xfff5
053a 0022 fff4 | " | .CONST 0x0022,0xfff4
053c ; --------------------------------------------------------------------------------------
053c ; Debug3 Subtable 0x1
053c ; --------------------------------------------------------------------------------------
053c 002a 0002 | * | .DBG3TAB 0x002a,0x0002
053e 0023 ffff | # | .CONST 0x0023,0xffff
0540 0023 fffe | # | .CONST 0x0023,0xfffe
0542 0023 fffd | # | .CONST 0x0023,0xfffd
0544 0023 fffc | # | .CONST 0x0023,0xfffc
0546 0025 fffb | % | .CONST 0x0025,0xfffb
0548 0027 fffa | ' | .CONST 0x0027,0xfffa
054a 0029 fff9 | ) | .CONST 0x0029,0xfff9
054c 002d fff8 | - | .CONST 0x002d,0xfff8
054e 002f fff7 | / | .CONST 0x002f,0xfff7
0550 0047 fff6 | G | .CONST 0x0047,0xfff6
0552 0049 fff5 | I | .CONST 0x0049,0xfff5
0554 004b fff4 | K | .CONST 0x004b,0xfff4
0556 004d fff3 | M | .CONST 0x004d,0xfff3
0558 0056 fff2 | V | .CONST 0x0056,0xfff2
055a 005f fff1 | _ | .CONST 0x005f,0xfff1
055c 0068 fff0 | h | .CONST 0x0068,0xfff0
055e 0071 ffef | q | .CONST 0x0071,0xffef
0560 007a ffee | z | .CONST 0x007a,0xffee
0562 0083 ffed | | .CONST 0x0083,0xffed
0564 0092 ffec | | .CONST 0x0092,0xffec
0566 009b ffeb | | .CONST 0x009b,0xffeb
0568 009d ffea | | .CONST 0x009d,0xffea
056a 00a5 ffe9 | | .CONST 0x00a5,0xffe9
056c 00a7 ffe8 | | .CONST 0x00a7,0xffe8
056e 00a9 ffe7 | | .CONST 0x00a9,0xffe7
0570 00ab ffe6 | | .CONST 0x00ab,0xffe6
0572 00ad ffe5 | | .CONST 0x00ad,0xffe5
0574 00af ffe4 | | .CONST 0x00af,0xffe4
0576 00b1 ffe3 | | .CONST 0x00b1,0xffe3
0578 00b3 ffe2 | | .CONST 0x00b3,0xffe2
057a 00b5 ffe1 | | .CONST 0x00b5,0xffe1
057c 00b7 ffe0 | | .CONST 0x00b7,0xffe0
057e 00b9 ffdf | | .CONST 0x00b9,0xffdf
0580 00bb ffde | | .CONST 0x00bb,0xffde
0582 00bd ffdd | | .CONST 0x00bd,0xffdd
0584 00bf ffdc | | .CONST 0x00bf,0xffdc
0586 00c1 ffdb | | .CONST 0x00c1,0xffdb
0588 00c3 ffda | | .CONST 0x00c3,0xffda
058a 00c5 ffd9 | | .CONST 0x00c5,0xffd9
058c 00c7 ffd8 | | .CONST 0x00c7,0xffd8
058e 00c9 ffd7 | | .CONST 0x00c9,0xffd7
0590 00cb ffd6 | | .CONST 0x00cb,0xffd6
0592 00cd 0001 | | .CONST 0x00cd,0x0001
0594 00ce 0002 | | .CONST 0x00ce,0x0002
0596 ; --------------------------------------------------------------------------------------
0596 ; Debug3 Subtable 0x2
0596 ; --------------------------------------------------------------------------------------
0596 0003 0004 | | .DBG3TAB 0x0003,0x0004
0598 00db ffff | | .CONST 0x00db,0xffff
059a 00dc fffe | | .CONST 0x00dc,0xfffe
059c 00dd fffd | | .CONST 0x00dd,0xfffd
059e 00e1 0001 | | .CONST 0x00e1,0x0001
05a0 00e4 0002 | | .CONST 0x00e4,0x0002
05a2 00e9 0003 | | .CONST 0x00e9,0x0003
05a4 00f1 0004 | | .CONST 0x00f1,0x0004
05a6 ; --------------------------------------------------------------------------------------
05a6 ; Debug3 Subtable 0x3
05a6 ; --------------------------------------------------------------------------------------
05a6 0002 0004 | | .DBG3TAB 0x0002,0x0004
05a8 0103 ffff | | .CONST 0x0103,0xffff
05aa 0107 fffe | | .CONST 0x0107,0xfffe
05ac 0108 0001 | | .CONST 0x0108,0x0001
05ae 010a 0002 | | .CONST 0x010a,0x0002
05b0 010c 0003 | | .CONST 0x010c,0x0003
05b2 0116 0004 | | .CONST 0x0116,0x0004
05b4 ; --------------------------------------------------------------------------------------
05b4 ; Debug3 Subtable 0x4
05b4 ; --------------------------------------------------------------------------------------
05b4 0003 0012 | | .DBG3TAB 0x0003,0x0012
05b6 0123 ffff | # | .CONST 0x0123,0xffff
05b8 012c fffe | , | .CONST 0x012c,0xfffe
05ba 012f fffd | / | .CONST 0x012f,0xfffd
05bc 0133 0001 | 3 | .CONST 0x0133,0x0001
05be 0138 0002 | 8 | .CONST 0x0138,0x0002
05c0 013d 0003 | = | .CONST 0x013d,0x0003
05c2 0142 0004 | B | .CONST 0x0142,0x0004
05c4 0149 0006 | I | .CONST 0x0149,0x0006
05c6 0151 0007 | Q | .CONST 0x0151,0x0007
05c8 0157 0008 | W | .CONST 0x0157,0x0008
05ca 015f 0009 | _ | .CONST 0x015f,0x0009
05cc 0162 000a | b | .CONST 0x0162,0x000a
05ce 016a 000b | j | .CONST 0x016a,0x000b
05d0 016d 000c | m | .CONST 0x016d,0x000c
05d2 0171 000d | q | .CONST 0x0171,0x000d
05d4 0178 000e | x | .CONST 0x0178,0x000e
05d6 017b 000f | { | .CONST 0x017b,0x000f
05d8 017f 0010 | | .CONST 0x017f,0x0010
05da 0184 0005 | | .CONST 0x0184,0x0005
05dc 0189 0011 | | .CONST 0x0189,0x0011
05de 018c 0012 | | .CONST 0x018c,0x0012
05e0 ; --------------------------------------------------------------------------------------
05e0 ; Debug3 Subtable 0x5
05e0 ; --------------------------------------------------------------------------------------
05e0 0000 0001 | | .DBG3TAB 0x0000,0x0001
05e2 019b 0001 | | .CONST 0x019b,0x0001
05e4 ; --------------------------------------------------------------------------------------
05e4 ; Debug3 Subtable 0x6
05e4 ; --------------------------------------------------------------------------------------
05e4 0000 0005 | | .DBG3TAB 0x0000,0x0005
05e6 01ab 0001 | | .CONST 0x01ab,0x0001
05e8 01ad 0002 | | .CONST 0x01ad,0x0002
05ea 01b2 0003 | | .CONST 0x01b2,0x0003
05ec 01b5 0004 | | .CONST 0x01b5,0x0004
05ee 01ba 0005 | | .CONST 0x01ba,0x0005
05f0 ; --------------------------------------------------------------------------------------
05f0 ; Debug3 Subtable 0x7
05f0 ; --------------------------------------------------------------------------------------
05f0 0000 0001 | | .DBG3TAB 0x0000,0x0001
05f2 01c3 0001 | | .CONST 0x01c3,0x0001
05f4 ; --------------------------------------------------------------------------------------
05f4 ; Debug3 Subtable 0x8
05f4 ; --------------------------------------------------------------------------------------
05f4 0000 0001 | | .DBG3TAB 0x0000,0x0001
05f6 01cb 0001 | | .CONST 0x01cb,0x0001
05f8 ; --------------------------------------------------------------------------------------
05f8 ; Debug3 Subtable 0x9
05f8 ; --------------------------------------------------------------------------------------
05f8 0004 0009 | | .DBG3TAB 0x0004,0x0009
05fa 01d3 ffff | | .CONST 0x01d3,0xffff
05fc 01d8 fffe | | .CONST 0x01d8,0xfffe
05fe 01dc 0001 | | .CONST 0x01dc,0x0001
0600 01e2 0002 | | .CONST 0x01e2,0x0002
0602 01eb 0004 | | .CONST 0x01eb,0x0004
0604 01f1 0005 | | .CONST 0x01f1,0x0005
0606 01f2 fbff | | .CONST 0x01f2,0xfbff
0608 01f6 fbfe | | .CONST 0x01f6,0xfbfe
060a 01fa 0401 | | .CONST 0x01fa,0x0401
060c 0207 0003 | | .CONST 0x0207,0x0003
060e 020d 0006 | | .CONST 0x020d,0x0006
0610 0212 0007 | | .CONST 0x0212,0x0007
0612 0215 0008 | | .CONST 0x0215,0x0008
0614 ; --------------------------------------------------------------------------------------
0614 ; Debug3 Subtable 0xa
0614 ; --------------------------------------------------------------------------------------
0614 0003 0008 | | .DBG3TAB 0x0003,0x0008
0616 021b ffff | | .CONST 0x021b,0xffff
0618 021e fffe | | .CONST 0x021e,0xfffe
061a 0223 fffd | # | .CONST 0x0223,0xfffd
061c 0227 0001 | ' | .CONST 0x0227,0x0001
061e 022e 0002 | . | .CONST 0x022e,0x0002
0620 0235 0004 | 5 | .CONST 0x0235,0x0004
0622 023d 0005 | = | .CONST 0x023d,0x0005
0624 0246 0006 | F | .CONST 0x0246,0x0006
0626 024a 0007 | J | .CONST 0x024a,0x0007
0628 024f 0003 | O | .CONST 0x024f,0x0003
062a 0254 0008 | T | .CONST 0x0254,0x0008
062c ; --------------------------------------------------------------------------------------
062c ; Debug3 Subtable 0xb
062c ; --------------------------------------------------------------------------------------
062c 0000 0000 | | .DBG3TAB 0x0000,0x0000
062e ; --------------------------------------------------------------------------------------
062e ; Debug3 Subtable 0xc
062e ; --------------------------------------------------------------------------------------
062e 0002 0003 | | .DBG3TAB 0x0002,0x0003
0630 028b ffff | | .CONST 0x028b,0xffff
0632 028d fffe | | .CONST 0x028d,0xfffe
0634 028e 0001 | | .CONST 0x028e,0x0001
0636 0296 0002 | | .CONST 0x0296,0x0002
0638 0299 0003 | | .CONST 0x0299,0x0003
063a ; --------------------------------------------------------------------------------------
063a ; Debug3 Subtable 0xd
063a ; --------------------------------------------------------------------------------------
063a 0000 0001 | | .DBG3TAB 0x0000,0x0001
063c 02a3 0001 | | .CONST 0x02a3,0x0001
063e ; --------------------------------------------------------------------------------------
063e ; Debug3 Subtable 0xe
063e ; --------------------------------------------------------------------------------------
063e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0640 02b3 0001 | | .CONST 0x02b3,0x0001
0642 ; --------------------------------------------------------------------------------------
0642 ; Debug3 Subtable 0xf
0642 ; --------------------------------------------------------------------------------------
0642 0002 0003 | | .DBG3TAB 0x0002,0x0003
0644 02c3 ffff | | .CONST 0x02c3,0xffff
0646 02c8 fffe | | .CONST 0x02c8,0xfffe
0648 02cf 0001 | | .CONST 0x02cf,0x0001
064a 02d5 0002 | | .CONST 0x02d5,0x0002
064c 02d7 0003 | | .CONST 0x02d7,0x0003
064e ; --------------------------------------------------------------------------------------
064e ; Debug3 Subtable 0x10
064e ; --------------------------------------------------------------------------------------
064e 0001 0004 | | .DBG3TAB 0x0001,0x0004
0650 02eb ffff | | .CONST 0x02eb,0xffff
0652 02f0 0001 | | .CONST 0x02f0,0x0001
0654 02f9 0002 | | .CONST 0x02f9,0x0002
0656 02fd 0003 | | .CONST 0x02fd,0x0003
0658 02ff 0004 | | .CONST 0x02ff,0x0004
065a ; --------------------------------------------------------------------------------------
065a ; Debug3 Subtable 0x11
065a ; --------------------------------------------------------------------------------------
065a 0001 0003 | | .DBG3TAB 0x0001,0x0003
065c 030b ffff | | .CONST 0x030b,0xffff
065e 0311 0001 | | .CONST 0x0311,0x0001
0660 0314 0002 | | .CONST 0x0314,0x0002
0662 0319 0003 | | .CONST 0x0319,0x0003
0664 ; --------------------------------------------------------------------------------------
0664 ; Debug3 Subtable 0x12
0664 ; --------------------------------------------------------------------------------------
0664 0001 0004 | | .DBG3TAB 0x0001,0x0004
0666 0323 ffff | # | .CONST 0x0323,0xffff
0668 0326 0001 | & | .CONST 0x0326,0x0001
066a 032d 0002 | - | .CONST 0x032d,0x0002
066c 032f 0003 | / | .CONST 0x032f,0x0003
066e 0334 0004 | 4 | .CONST 0x0334,0x0004
0670 ; --------------------------------------------------------------------------------------
0670 ; Debug3 Subtable 0x13
0670 ; --------------------------------------------------------------------------------------
0670 0000 0001 | | .DBG3TAB 0x0000,0x0001
0672 0343 0001 | C | .CONST 0x0343,0x0001
0674 ; --------------------------------------------------------------------------------------
0674 ; Debug3 Subtable 0x14
0674 ; --------------------------------------------------------------------------------------
0674 0001 0003 | | .DBG3TAB 0x0001,0x0003
0676 0353 ffff | S | .CONST 0x0353,0xffff
0678 0354 0001 | T | .CONST 0x0354,0x0001
067a 035b 0002 | [ | .CONST 0x035b,0x0002
067c 0361 0003 | a | .CONST 0x0361,0x0003
067e ; --------------------------------------------------------------------------------------
067e ; Debug3 Subtable 0x15
067e ; --------------------------------------------------------------------------------------
067e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0680 0373 0001 | s | .CONST 0x0373,0x0001
0682 ; --------------------------------------------------------------------------------------
0682 ; Debug3 Subtable 0x16
0682 ; --------------------------------------------------------------------------------------
0682 0002 0013 | | .DBG3TAB 0x0002,0x0013
0684 0383 ffff | | .CONST 0x0383,0xffff
0686 0387 fffe | | .CONST 0x0387,0xfffe
0688 0389 0001 | | .CONST 0x0389,0x0001
068a 038f 0002 | | .CONST 0x038f,0x0002
068c 0395 0003 | | .CONST 0x0395,0x0003
068e 0398 0004 | | .CONST 0x0398,0x0004
0690 039d 0005 | | .CONST 0x039d,0x0005
0692 03a1 0006 | | .CONST 0x03a1,0x0006
0694 03a4 0007 | | .CONST 0x03a4,0x0007
0696 03a7 0008 | | .CONST 0x03a7,0x0008
0698 03aa 0009 | | .CONST 0x03aa,0x0009
069a 03b8 000a | | .CONST 0x03b8,0x000a
069c 03ba 000b | | .CONST 0x03ba,0x000b
069e 03c3 000c | | .CONST 0x03c3,0x000c
06a0 03c4 000d | | .CONST 0x03c4,0x000d
06a2 03c7 000e | | .CONST 0x03c7,0x000e
06a4 03d0 000f | | .CONST 0x03d0,0x000f
06a6 03d3 0010 | | .CONST 0x03d3,0x0010
06a8 03dd 0011 | | .CONST 0x03dd,0x0011
06aa 03df 0012 | | .CONST 0x03df,0x0012
06ac 03e8 0013 | | .CONST 0x03e8,0x0013
06ae 0000 0000 | | .BLANK 0000[0x152]