|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 5120 (0x1400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 09d0 | | .CONST 0x09d0 ; 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 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 009b | | .CONST 0x009b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 001a | | .CONST 0x001a ; Number of locals 001b INIT_0018: 001b e002 | | Load 0x0,0x2 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e 60b1 |` | Indirect_Literal Discrete,0xd0,{0x00000013, 0xc6800000} 001f e002 | | Load 0x0,0x2 0020 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0021 e002 | | Load 0x0,0x2 0022 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0023 0092 0872 | r| Action Push_String_Extended,0x872 ; "<MINUS_30_DAYS>" 0025 e5ff | | Load 0x2,-0x1 0026 8003 | | Call 0x0,0x3 0027 8004 | | Call 0x0,0x4 0028 a402 | | Store_Unchecked 0x2,0x2 0029 e002 | | Load 0x0,0x2 002a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002b 02c7 | | Declare_Variable Any 002c e002 | | Load 0x0,0x2 002d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 002e 0092 0873 | s| Action Push_String_Extended,0x873 ; "<TODAY>" 0030 e5fe | | Load 0x2,-0x2 0031 8003 | | Call 0x0,0x3 0032 8004 | | Call 0x0,0x4 0033 a403 | | Store_Unchecked 0x2,0x3 0034 00e7 | | Load_Encached Duration_Cache 0035 e005 | | Load 0x0,0x5 0036 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0037 02c7 | | Declare_Variable Any 0038 00d8 | | Load_Top At_Offset_0 0039 1c00 | | Execute_Immediate Run_Utility,0x0 003a e006 | | Load 0x0,0x6 003b 0007 | | Action Break_Optional 003c e007 | | Load 0x0,0x7 003d 0322 | " | Declare_Variable Record 003e 4800 |H | Short_Literal 0x0 003f 4807 |H | Short_Literal 0x7 0040 029f 00db | | Declare_Subprogram INIT_00d8,For_Call 0042 03fd | | Declare_Type Discrete,Defined 0043 4800 |H | Short_Literal 0x0 0044 480b |H | Short_Literal 0xb 0045 029f 0103 | | Declare_Subprogram INIT_0100,For_Call 0047 03fd | | Declare_Type Discrete,Defined 0048 4809 |H | Short_Literal 0x9 0049 480b |H | Short_Literal 0xb 004a e409 | | Load 0x2,0x9 004b 03f8 | | Declare_Type Discrete,Constrained 004c 4800 |H | Short_Literal 0x0 004d 4808 |H | Short_Literal 0x8 004e e409 | | Load 0x2,0x9 004f 03f8 | | Declare_Type Discrete,Constrained 0050 4800 |H | Short_Literal 0x0 0051 4801 |H | Short_Literal 0x1 0052 029f 012b | +| Declare_Subprogram INIT_0128,For_Call 0054 03fd | | Declare_Type Discrete,Defined 0055 00d8 | | Load_Top At_Offset_0 0056 0266 | f | Execute Discrete,Bounds 0057 00e7 | | Load_Encached Duration_Cache 0058 02a0 | | Declare_Subprogram Null_Subprogram 0059 4801 |H | Short_Literal 0x1 005a 035d | ] | Declare_Type Array,Defined 005b e409 | | Load 0x2,0x9 005c 0266 | f | Execute Discrete,Bounds 005d e40d | | Load 0x2,0xd 005e 02a0 | | Declare_Subprogram Null_Subprogram 005f 4801 |H | Short_Literal 0x1 0060 035d | ] | Declare_Type Array,Defined 0061 00e7 | | Load_Encached Duration_Cache 0062 00e7 | | Load_Encached Duration_Cache 0063 029f 0153 | S| Declare_Subprogram INIT_0150,For_Call 0065 4802 |H | Short_Literal 0x2 0066 032d | - | Declare_Type Record,Defined 0067 4801 |H | Short_Literal 0x1 0068 4807 |H | Short_Literal 0x7 0069 e40f | | Load 0x2,0xf 006a 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call 006c 4801 |H | Short_Literal 0x1 006d 035d | ] | Declare_Type Array,Defined 006e e40e | | Load 0x2,0xe 006f 0337 | 7 | Declare_Variable Array 0070 00d8 | | Load_Top At_Offset_0 0071 0335 | 5 | Declare_Variable Array,Duplicate 0072 00cd | | Action Spare6_Action 0073 480b |H | Short_Literal 0xb 0074 4800 |H | Short_Literal 0x0 0075 e40d | | Load 0x2,0xd 0076 0337 | 7 | Declare_Variable Array 0077 4800 |H | Short_Literal 0x0 0078 4800 |H | Short_Literal 0x0 0079 e415 | | Load 0x2,0x15 007a 01d6 | | Execute Vector,Field_Write 007b 4800 |H | Short_Literal 0x0 007c 4801 |H | Short_Literal 0x1 007d e415 | | Load 0x2,0x15 007e 01d6 | | Execute Vector,Field_Write 007f e40d | | Load 0x2,0xd 0080 0119 | | Execute Any,Check_In_Formal_Type 0081 e414 | | Load 0x2,0x14 0082 e412 | | Load 0x2,0x12 0083 01d6 | | Execute Vector,Field_Write 0084 3ff0 |? | Loop_Increasing 0x75 0085 e411 | | Load 0x2,0x11 0086 01d4 | | Execute Vector,Structure_Write 0087 e410 | | Load 0x2,0x10 0088 0337 | 7 | Declare_Variable Array 0089 00d8 | | Load_Top At_Offset_0 008a 1c00 | | Execute_Immediate Run_Utility,0x0 008b 029f 017b | {| Declare_Subprogram INIT_0178,For_Call 008d 029f 027b | {| Declare_Subprogram INIT_0278,For_Call 008f 029f 036b | k| Declare_Subprogram INIT_0368,For_Call 0091 029f 0383 | | Declare_Subprogram INIT_0380,For_Call 0093 029f 0393 | | Declare_Subprogram INIT_0390,For_Call 0095 029f 03b3 | | Declare_Subprogram INIT_03b0,For_Call 0097 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call 0099 029f 060b | | Declare_Subprogram INIT_0608,For_Call 009b BODY_0018: 009b 8413 | | Call 0x2,0x13 009c e412 | | Load 0x2,0x12 009d 01d4 | | Execute Vector,Structure_Write 009e e402 | | Load 0x2,0x2 009f e403 | | Load 0x2,0x3 00a0 e002 | | Load 0x0,0x2 00a1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00a2 0c01 | | Execute_Immediate Greater_Equal,0x1 00a3 6822 |h" | Jump_Zero 0xc6 00a4 e405 | | Load 0x2,0x5 00a5 00e7 | | Load_Encached Duration_Cache 00a6 e5fc | | Load 0x2,-0x4 00a7 4802 |H | Short_Literal 0x2 00a8 4801 |H | Short_Literal 0x1 00a9 4802 |H | Short_Literal 0x2 00aa e403 | | Load 0x2,0x3 00ab 8008 | | Call 0x0,0x8 00ac 4802 |H | Short_Literal 0x2 00ad 4801 |H | Short_Literal 0x1 00ae 4802 |H | Short_Literal 0x2 00af e402 | | Load 0x2,0x2 00b0 8008 | | Call 0x0,0x8 00b1 8009 | | Call 0x0,0x9 00b2 c404 | | Store 0x2,0x4 00b3 c405 | | Store 0x2,0x5 00b4 e006 | | Load 0x0,0x6 00b5 800a | | Call 0x0,0xa 00b6 c406 | | Store 0x2,0x6 00b7 00cf | | Action Mark_Auxiliary 00b8 7807 |x | Jump 0xc0 00b9 e406 | | Load 0x2,0x6 00ba 800b | | Call 0x0,0xb 00bb 8417 | | Call 0x2,0x17 00bc e406 | | Load 0x2,0x6 00bd 800c | | Call 0x0,0xc 00be c406 | | Store 0x2,0x6 00bf 00c9 | | Action Pop_Auxiliary_Loop 00c0 e406 | | Load 0x2,0x6 00c1 800d | | Call 0x0,0xd 00c2 6ff6 |o | Jump_Zero 0xb9 00c3 00ce | | Action Pop_Auxiliary 00c4 8419 | | Call 0x2,0x19 00c5 7804 |x | Jump 0xca 00c6 0092 0874 | t| Action Push_String_Extended,0x874 ; "Cannot calculate Availability, Starting Date = Ending Date" 00c8 e00e | | Load 0x0,0xe 00c9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 00ca e5fd | | Load 0x2,-0x3 00cb 6802 |h | Jump_Zero 0xce 00cc e412 | | Load 0x2,0x12 00cd 841a | | Call 0x2,0x1a 00ce 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00cf 0000 | | .XXX[0x1] 00d0 0000 0013 | | .LITERAL {0x00000013, 0xc6800000} 00d4 0000 0000 | | .BLANK 0000[0x4] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db 4607 |F | Jump_Case 0x8 00dc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00dd 7807 |x | Jump 0xe5 ; case 0x1 00de 780a |x | Jump 0xe9 ; case 0x2 00df 780e |x | Jump 0xee ; case 0x3 00e0 7811 |x | Jump 0xf2 ; case 0x4 00e1 7812 |x | Jump 0xf4 ; case 0x5 00e2 7813 |x | Jump 0xf6 ; case 0x6 00e3 7816 |x | Jump 0xfa ; case 0x7 00e4 4302 |C | .XXX[0x1] 00e5 00da | | Load_Top At_Offset_2 00e6 0091 0854 | T| Action Push_String_Extended_Indexed,0x854 ; "NONE" 00e8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00e9 00db | | Load_Top At_Offset_3 00ea 00db | | Load_Top At_Offset_3 00eb 00e0 | | Load_Encached Standard_Cache 00ec 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00ed 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00ee 00da | | Load_Top At_Offset_2 00ef 00e0 | | Load_Encached Standard_Cache 00f0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00f1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f2 00db | | Load_Top At_Offset_3 00f3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00f4 00db | | Load_Top At_Offset_3 00f5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00f6 e408 | | Load 0x2,0x8 00f7 00dc | | Load_Top At_Offset_4 00f8 0267 | g | Execute Discrete,Predecessor 00f9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fa e408 | | Load 0x2,0x8 00fb 00dc | | Load_Top At_Offset_4 00fc 0268 | h | Execute Discrete,Successor 00fd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fe 0000 0000 | | .XXX[0x2] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 4607 |F | Jump_Case 0x8 0104 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0105 7807 |x | Jump 0x10d ; case 0x1 0106 780a |x | Jump 0x111 ; case 0x2 0107 780e |x | Jump 0x116 ; case 0x3 0108 7811 |x | Jump 0x11a ; case 0x4 0109 7812 |x | Jump 0x11c ; case 0x5 010a 7813 |x | Jump 0x11e ; case 0x6 010b 7816 |x | Jump 0x122 ; case 0x7 010c 4302 |C | .XXX[0x1] 010d 00da | | Load_Top At_Offset_2 010e 0091 085c | \| Action Push_String_Extended_Indexed,0x85c ; "PMH" 0110 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0111 00db | | Load_Top At_Offset_3 0112 00db | | Load_Top At_Offset_3 0113 00e0 | | Load_Encached Standard_Cache 0114 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0115 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0116 00da | | Load_Top At_Offset_2 0117 00e0 | | Load_Encached Standard_Cache 0118 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0119 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 011a 00db | | Load_Top At_Offset_3 011b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 011c 00db | | Load_Top At_Offset_3 011d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 011e e409 | | Load 0x2,0x9 011f 00dc | | Load_Top At_Offset_4 0120 0267 | g | Execute Discrete,Predecessor 0121 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0122 e409 | | Load 0x2,0x9 0123 00dc | | Load_Top At_Offset_4 0124 0268 | h | Execute Discrete,Successor 0125 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0126 0000 0000 | | .XXX[0x2] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012b | + | .CONST 0x012b ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0001 | | .CONST 0x0001 ; Number of locals 012b BODY_0128: 012b INIT_0128: 012b 4607 |F | Jump_Case 0x8 012c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 012d 7807 |x | Jump 0x135 ; case 0x1 012e 780a |x | Jump 0x139 ; case 0x2 012f 780e |x | Jump 0x13e ; case 0x3 0130 7811 |x | Jump 0x142 ; case 0x4 0131 7812 |x | Jump 0x144 ; case 0x5 0132 7813 |x | Jump 0x146 ; case 0x6 0133 7816 |x | Jump 0x14a ; case 0x7 0134 4302 |C | .XXX[0x1] 0135 00da | | Load_Top At_Offset_2 0136 0091 0868 | h| Action Push_String_Extended_Indexed,0x868 ; "CONTRACT" 0138 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0139 00db | | Load_Top At_Offset_3 013a 00db | | Load_Top At_Offset_3 013b 00e0 | | Load_Encached Standard_Cache 013c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 013d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 013e 00da | | Load_Top At_Offset_2 013f 00e0 | | Load_Encached Standard_Cache 0140 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0141 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0142 00db | | Load_Top At_Offset_3 0143 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0144 00db | | Load_Top At_Offset_3 0145 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0146 e40c | | Load 0x2,0xc 0147 00dc | | Load_Top At_Offset_4 0148 0267 | g | Execute Discrete,Predecessor 0149 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 014a e40c | | Load 0x2,0xc 014b 00dc | | Load_Top At_Offset_4 014c 0268 | h | Execute Discrete,Successor 014d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 014e 0000 0000 | | .XXX[0x2] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 4601 |F | Jump_Case 0x2 0154 7801 |x | Jump 0x156 ; case 0x0 0155 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0156 4800 |H | Short_Literal 0x0 0157 e7ff | | Load 0x3,-0x1 0158 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0159 4800 |H | Short_Literal 0x0 015a e7ff | | Load 0x3,-0x1 015b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 015c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 015d 0000 0000 | | .XXX[0x3] 015f 0000 | | 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0163 | c | .CONST 0x0163 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0001 | | .CONST 0x0001 ; Number of locals 0163 BODY_0160: 0163 INIT_0160: 0163 00d1 | | Pop_Control Pop_Count_1 0164 e7ff | | Load 0x3,-0x1 0165 01d8 | | Execute Vector,Element_Type 0166 0322 | " | Declare_Variable Record 0167 00d8 | | Load_Top At_Offset_0 0168 1c00 | | Execute_Immediate Run_Utility,0x0 0169 e7ff | | Load 0x3,-0x1 016a 01dc | | Execute Vector,Last 016b e7ff | | Load 0x3,-0x1 016c 01dd | | Execute Vector,First 016d 0263 | c | Execute Discrete,Above_Bound 016e 7006 |p | Jump_Nonzero 0x175 016f e602 | | Load 0x3,0x2 0170 e604 | | Load 0x3,0x4 0171 e7ff | | Load 0x3,-0x1 0172 01d6 | | Execute Vector,Field_Write 0173 0a01 | | Execute_Immediate Plus,0x1 0174 7ff8 | | Jump 0x16d 0175 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0176 0000 0000 | | .XXX[0x2] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 01ce | | .CONST 0x01ce ; Address of begin 0179 024d | M | .CONST 0x024d ; Address of exception handler 017a 000c | | .CONST 0x000c ; Number of locals 017b INIT_0178: 017b e410 | | Load 0x2,0x10 017c 0337 | 7 | Declare_Variable Array 017d 00d8 | | Load_Top At_Offset_0 017e 0335 | 5 | Declare_Variable Array,Duplicate 017f 00cd | | Action Spare6_Action 0180 4805 |H | Short_Literal 0x5 0181 4801 |H | Short_Literal 0x1 0182 e40f | | Load 0x2,0xf 0183 0322 | " | Declare_Variable Record 0184 60ef |` | Indirect_Literal Discrete,0x274,{0x00000000, 0x38400000} 0185 e606 | | Load 0x3,0x6 0186 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0187 60e8 |` | Indirect_Literal Discrete,0x270,{0x00000000, 0x7e900000} 0188 e606 | | Load 0x3,0x6 0189 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 018a e605 | | Load 0x3,0x5 018b e603 | | Load 0x3,0x3 018c 01d6 | | Execute Vector,Field_Write 018d 3ff4 |? | Loop_Increasing 0x182 018e 4807 |H | Short_Literal 0x7 018f 4806 |H | Short_Literal 0x6 0190 e40f | | Load 0x2,0xf 0191 0322 | " | Declare_Variable Record 0192 4800 |H | Short_Literal 0x0 0193 e606 | | Load 0x3,0x6 0194 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0195 4800 |H | Short_Literal 0x0 0196 e606 | | Load 0x3,0x6 0197 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0198 e605 | | Load 0x3,0x5 0199 e603 | | Load 0x3,0x3 019a 01d6 | | Execute Vector,Field_Write 019b 3ff4 |? | Loop_Increasing 0x190 019c e602 | | Load 0x3,0x2 019d 01d4 | | Execute Vector,Structure_Write 019e e410 | | Load 0x2,0x10 019f 0337 | 7 | Declare_Variable Array 01a0 e602 | | Load 0x3,0x2 01a1 e603 | | Load 0x3,0x3 01a2 01d4 | | Execute Vector,Structure_Write 01a3 0092 0875 | u| Action Push_String_Extended,0x875 ; "!Machine.Contract_Hours" 01a5 e00e | | Load 0x0,0xe 01a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01a7 02c7 | | Declare_Variable Any 01a8 00d8 | | Load_Top At_Offset_0 01a9 1c00 | | Execute_Immediate Run_Utility,0x0 01aa 4800 |H | Short_Literal 0x0 01ab 4807 |H | Short_Literal 0x7 01ac 029f 065b | [| Declare_Subprogram INIT_0658,For_Call 01ae 03fd | | Declare_Type Discrete,Defined 01af e00f | | Load 0x0,0xf 01b0 e010 | | Load 0x0,0x10 01b1 e606 | | Load 0x3,0x6 01b2 4800 |H | Short_Literal 0x0 01b3 4801 |H | Short_Literal 0x1 01b4 4807 |H | Short_Literal 0x7 01b5 0092 0876 | v| Action Push_String_Extended,0x876 ; "others => Unspecified" 01b7 00ea | | Load_Encached Null_String_Cache 01b8 00ea | | Load_Encached Null_String_Cache 01b9 4801 |H | Short_Literal 0x1 01ba 4807 |H | Short_Literal 0x7 01bb e011 | | Load 0x0,0x11 01bc 0387 | | Declare_Variable Package 01bd 00d8 | | Load_Top At_Offset_0 01be 020f | | Execute Module,Activate 01bf 00d8 | | Load_Top At_Offset_0 01c0 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 01c1 e607 | | Load 0x3,0x7 01c2 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 01c3 e40f | | Load 0x2,0xf 01c4 0322 | " | Declare_Variable Record 01c5 00d8 | | Load_Top At_Offset_0 01c6 1c00 | | Execute_Immediate Run_Utility,0x0 01c7 e012 | | Load 0x0,0x12 01c8 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c 01c9 0093 0000 | | push_full_address 0x0 01cb 60a0 |` | Indirect_Literal Discrete,0x26c,{0x80000000, 0x00010000} 01cc 0273 | s | Execute Discrete,Plus 01cd 0007 | | Action Break_Optional 01ce BODY_0178: 01ce e605 | | Load 0x3,0x5 01cf 00ea | | Load_Encached Null_String_Cache 01d0 e604 | | Load 0x3,0x4 01d1 4800 |H | Short_Literal 0x0 01d2 e00e | | Load 0x0,0xe 01d3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01d4 c605 | | Store 0x3,0x5 01d5 00cf | | Action Mark_Auxiliary 01d6 786b |xk | Jump 0x242 01d7 e605 | | Load 0x3,0x5 01d8 e00e | | Load 0x0,0xe 01d9 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 01da e607 | | Load 0x3,0x7 01db 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01dc a608 | | Store_Unchecked 0x3,0x8 01dd e608 | | Load 0x3,0x8 01de e607 | | Load 0x3,0x7 01df 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01e0 7002 |p | Jump_Nonzero 0x1e3 01e1 e60c | | Load 0x3,0xc 01e2 0257 | W | Execute Discrete,Raise 01e3 00cf | | Action Mark_Auxiliary 01e4 7857 |xW | Jump 0x23c 01e5 e608 | | Load 0x3,0x8 01e6 e607 | | Load 0x3,0x7 01e7 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 01e8 00d8 | | Load_Top At_Offset_0 01e9 e012 | | Load 0x0,0x12 01ea 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c 01eb 0260 | ` | Execute Discrete,In_Type 01ec 7001 |p | Jump_Nonzero 0x1ee 01ed 0801 | | Execute_Immediate Raise,0x1 01ee a60b | | Store_Unchecked 0x3,0xb 01ef 00ea | | Load_Encached Null_String_Cache 01f0 4800 |H | Short_Literal 0x0 01f1 e608 | | Load 0x3,0x8 01f2 e607 | | Load 0x3,0x7 01f3 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 01f4 e607 | | Load 0x3,0x7 01f5 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01f6 a609 | | Store_Unchecked 0x3,0x9 01f7 e609 | | Load 0x3,0x9 01f8 e607 | | Load 0x3,0x7 01f9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 01fa 6802 |h | Jump_Zero 0x1fd 01fb e60c | | Load 0x3,0xc 01fc 0257 | W | Execute Discrete,Raise 01fd 4800 |H | Short_Literal 0x0 01fe e609 | | Load 0x3,0x9 01ff e607 | | Load 0x3,0x7 0200 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0201 e012 | | Load 0x0,0x12 0202 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0203 e012 | | Load 0x0,0x12 0204 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0205 e002 | | Load 0x0,0x2 0206 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0207 e60a | | Load 0x3,0xa 0208 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0209 e609 | | Load 0x3,0x9 020a e607 | | Load 0x3,0x7 020b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 020c c609 | | Store 0x3,0x9 020d e609 | | Load 0x3,0x9 020e e607 | | Load 0x3,0x7 020f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0210 6802 |h | Jump_Zero 0x213 0211 e60c | | Load 0x3,0xc 0212 0257 | W | Execute Discrete,Raise 0213 4800 |H | Short_Literal 0x0 0214 e609 | | Load 0x3,0x9 0215 e607 | | Load 0x3,0x7 0216 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0217 0092 0877 | w| Action Push_String_Extended,0x877 ; "24:00" 0219 01df | | Execute Vector,Equal 021a 6804 |h | Jump_Zero 0x21f 021b 604c |`L | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 021c e60a | | Load 0x3,0xa 021d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 021e 780c |x | Jump 0x22b 021f 4800 |H | Short_Literal 0x0 0220 e609 | | Load 0x3,0x9 0221 e607 | | Load 0x3,0x7 0222 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0223 e012 | | Load 0x0,0x12 0224 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0225 e012 | | Load 0x0,0x12 0226 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0227 e002 | | Load 0x0,0x2 0228 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0229 e60a | | Load 0x3,0xa 022a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 022b e60a | | Load 0x3,0xa 022c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 022d e60a | | Load 0x3,0xa 022e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 022f 027d | } | Execute Discrete,Greater 0230 6802 |h | Jump_Zero 0x233 0231 e60c | | Load 0x3,0xc 0232 0257 | W | Execute Discrete,Raise 0233 e60a | | Load 0x3,0xa 0234 e60b | | Load 0x3,0xb 0235 e603 | | Load 0x3,0x3 0236 01d6 | | Execute Vector,Field_Write 0237 e608 | | Load 0x3,0x8 0238 e607 | | Load 0x3,0x7 0239 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 023a c608 | | Store 0x3,0x8 023b 00c9 | | Action Pop_Auxiliary_Loop 023c e608 | | Load 0x3,0x8 023d e607 | | Load 0x3,0x7 023e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 023f 6fa5 |o | Jump_Zero 0x1e5 0240 00ce | | Action Pop_Auxiliary 0241 00c9 | | Action Pop_Auxiliary_Loop 0242 e605 | | Load 0x3,0x5 0243 e00e | | Load 0x0,0xe 0244 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0245 6f91 |o | Jump_Zero 0x1d7 0246 00ce | | Action Pop_Auxiliary 0247 e605 | | Load 0x3,0x5 0248 e00e | | Load 0x0,0xe 0249 181b | | Execute Package,Field_Execute,Field_Number 0x1b 024a c605 | | Store 0x3,0x5 024b e603 | | Load 0x3,0x3 024c 00ca | | Action Exit_Nullary_Function 024d TRAP_0178: 024d 00d8 | | Load_Top At_Offset_0 024e 0107 | | Execute Exception,Get_Name 024f 4920 |I | Short_Literal 0x120 0250 492f |I/ | Short_Literal 0x12f 0251 0262 | b | Execute Discrete,In_Range 0252 6802 |h | Jump_Zero 0x255 0253 e602 | | Load 0x3,0x2 0254 00ca | | Action Exit_Nullary_Function 0255 e605 | | Load 0x3,0x5 0256 e00e | | Load 0x0,0xe 0257 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0258 6804 |h | Jump_Zero 0x25d 0259 e605 | | Load 0x3,0x5 025a e00e | | Load 0x0,0xe 025b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 025c c605 | | Store 0x3,0x5 025d 0092 0878 | x| Action Push_String_Extended,0x878 ; "*** Error Parsing !Machine.Contract_Hours" 025f e00e | | Load 0x0,0xe 0260 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0261 0092 0879 | y| Action Push_String_Extended,0x879 ; " Using default contract hours." 0263 e00e | | Load 0x0,0xe 0264 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0265 e602 | | Load 0x3,0x2 0266 00ca | | Action Exit_Nullary_Function 0267 0000 | | .XXX[0x1] 0268 0000 0000 | | .LITERAL {0x00000000, 0xa8c00000} 026c 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0270 0000 0000 | | .LITERAL {0x00000000, 0x7e900000} 0274 0000 0000 | | .LITERAL {0x00000000, 0x38400000} 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 02a2 | | .CONST 0x02a2 ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0007 | | .CONST 0x0007 ; Number of locals 027b INIT_0278: 027b e7ff | | Load 0x3,-0x1 027c e012 | | Load 0x0,0x12 027d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 027e e012 | | Load 0x0,0x12 027f 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c 0280 03f1 | | Declare_Variable Discrete,With_Value 0281 e002 | | Load 0x0,0x2 0282 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0283 02c7 | | Declare_Variable Any 0284 e7ff | | Load 0x3,-0x1 0285 a603 | | Store_Unchecked 0x3,0x3 0286 e7fe | | Load 0x3,-0x2 0287 00e7 | | Load_Encached Duration_Cache 0288 03f1 | | Declare_Variable Discrete,With_Value 0289 e7ff | | Load 0x3,-0x1 028a e002 | | Load 0x0,0x2 028b 1816 | | Execute Package,Field_Execute,Field_Number 0x16 028c 00e7 | | Load_Encached Duration_Cache 028d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 028e 00d8 | | Load_Top At_Offset_0 028f e604 | | Load 0x3,0x4 0290 0273 | s | Execute Discrete,Plus 0291 00e7 | | Load_Encached Duration_Cache 0292 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0293 e40d | | Load 0x2,0xd 0294 0337 | 7 | Declare_Variable Array 0295 00d8 | | Load_Top At_Offset_0 0296 0335 | 5 | Declare_Variable Array,Duplicate 0297 00cd | | Action Spare6_Action 0298 4800 |H | Short_Literal 0x0 0299 4800 |H | Short_Literal 0x0 029a e608 | | Load 0x3,0x8 029b 01d6 | | Execute Vector,Field_Write 029c 4800 |H | Short_Literal 0x0 029d 4801 |H | Short_Literal 0x1 029e e608 | | Load 0x3,0x8 029f 01d6 | | Execute Vector,Field_Write 02a0 e607 | | Load 0x3,0x7 02a1 01d4 | | Execute Vector,Structure_Write 02a2 BODY_0278: 02a2 00cf | | Action Mark_Auxiliary 02a3 e604 | | Load 0x3,0x4 02a4 0d01 | | Execute_Immediate Less,0x1 02a5 70bd |p | Jump_Nonzero 0x363 02a6 e605 | | Load 0x3,0x5 02a7 e602 | | Load 0x3,0x2 02a8 e7fd | | Load 0x3,-0x3 02a9 01d5 | | Execute Vector,Field_Reference 02aa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ab 027a | z | Execute Discrete,Less_Equal 02ac e606 | | Load 0x3,0x6 02ad e602 | | Load 0x3,0x2 02ae e7fd | | Load 0x3,-0x3 02af 01d5 | | Execute Vector,Field_Reference 02b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02b1 027b | { | Execute Discrete,Greater_Equal 02b2 0279 | y | Execute Discrete,And 02b3 6875 |hu | Jump_Zero 0x329 02b4 e605 | | Load 0x3,0x5 02b5 e602 | | Load 0x3,0x2 02b6 e7fd | | Load 0x3,-0x3 02b7 01d5 | | Execute Vector,Field_Reference 02b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02b9 027c | | | Execute Discrete,Less 02ba 681b |h | Jump_Zero 0x2d6 02bb 4801 |H | Short_Literal 0x1 02bc e607 | | Load 0x3,0x7 02bd 01d7 | | Execute Vector,Field_Read 02be e602 | | Load 0x3,0x2 02bf e7fd | | Load 0x3,-0x3 02c0 01d5 | | Execute Vector,Field_Reference 02c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02c2 e605 | | Load 0x3,0x5 02c3 0272 | r | Execute Discrete,Minus 02c4 0273 | s | Execute Discrete,Plus 02c5 4801 |H | Short_Literal 0x1 02c6 e607 | | Load 0x3,0x7 02c7 01d6 | | Execute Vector,Field_Write 02c8 e604 | | Load 0x3,0x4 02c9 e602 | | Load 0x3,0x2 02ca e7fd | | Load 0x3,-0x3 02cb 01d5 | | Execute Vector,Field_Reference 02cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02cd e605 | | Load 0x3,0x5 02ce 0272 | r | Execute Discrete,Minus 02cf 0272 | r | Execute Discrete,Minus 02d0 c604 | | Store 0x3,0x4 02d1 e602 | | Load 0x3,0x2 02d2 e7fd | | Load 0x3,-0x3 02d3 01d5 | | Execute Vector,Field_Reference 02d4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02d5 a605 | | Store_Unchecked 0x3,0x5 02d6 e606 | | Load 0x3,0x6 02d7 e602 | | Load 0x3,0x2 02d8 e7fd | | Load 0x3,-0x3 02d9 01d5 | | Execute Vector,Field_Reference 02da 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02db 027d | } | Execute Discrete,Greater 02dc 6843 |hC | Jump_Zero 0x320 02dd 4800 |H | Short_Literal 0x0 02de e607 | | Load 0x3,0x7 02df 01d7 | | Execute Vector,Field_Read 02e0 e602 | | Load 0x3,0x2 02e1 e7fd | | Load 0x3,-0x3 02e2 01d5 | | Execute Vector,Field_Reference 02e3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02e4 e605 | | Load 0x3,0x5 02e5 0272 | r | Execute Discrete,Minus 02e6 0273 | s | Execute Discrete,Plus 02e7 4800 |H | Short_Literal 0x0 02e8 e607 | | Load 0x3,0x7 02e9 01d6 | | Execute Vector,Field_Write 02ea e606 | | Load 0x3,0x6 02eb 677c |g| | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 02ec 027d | } | Execute Discrete,Greater 02ed 6824 |h$ | Jump_Zero 0x312 02ee 4801 |H | Short_Literal 0x1 02ef e607 | | Load 0x3,0x7 02f0 01d7 | | Execute Vector,Field_Read 02f1 6776 |gv | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 02f2 e602 | | Load 0x3,0x2 02f3 e7fd | | Load 0x3,-0x3 02f4 01d5 | | Execute Vector,Field_Reference 02f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f6 0272 | r | Execute Discrete,Minus 02f7 0273 | s | Execute Discrete,Plus 02f8 4801 |H | Short_Literal 0x1 02f9 e607 | | Load 0x3,0x7 02fa 01d6 | | Execute Vector,Field_Write 02fb 676c |gl | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 02fc e605 | | Load 0x3,0x5 02fd 0272 | r | Execute Discrete,Minus 02fe 00d8 | | Load_Top At_Offset_0 02ff 00e7 | | Load_Encached Duration_Cache 0300 0260 | ` | Execute Discrete,In_Type 0301 7001 |p | Jump_Nonzero 0x303 0302 0801 | | Execute_Immediate Raise,0x1 0303 e603 | | Load 0x3,0x3 0304 e002 | | Load 0x0,0x2 0305 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0306 c603 | | Store 0x3,0x3 0307 e604 | | Load 0x3,0x4 0308 675f |g_ | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 0309 e605 | | Load 0x3,0x5 030a 0272 | r | Execute Discrete,Minus 030b 0272 | r | Execute Discrete,Minus 030c c604 | | Store 0x3,0x4 030d 4800 |H | Short_Literal 0x0 030e a605 | | Store_Unchecked 0x3,0x5 030f e604 | | Load 0x3,0x4 0310 a606 | | Store_Unchecked 0x3,0x6 0311 784b |xK | Jump 0x35d 0312 4801 |H | Short_Literal 0x1 0313 e607 | | Load 0x3,0x7 0314 01d7 | | Execute Vector,Field_Read 0315 e606 | | Load 0x3,0x6 0316 0273 | s | Execute Discrete,Plus 0317 e602 | | Load 0x3,0x2 0318 e7fd | | Load 0x3,-0x3 0319 01d5 | | Execute Vector,Field_Reference 031a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 031b 0272 | r | Execute Discrete,Minus 031c 4801 |H | Short_Literal 0x1 031d e607 | | Load 0x3,0x7 031e 01d6 | | Execute Vector,Field_Write 031f 7843 |xC | Jump 0x363 0320 4800 |H | Short_Literal 0x0 0321 e607 | | Load 0x3,0x7 0322 01d7 | | Execute Vector,Field_Read 0323 e604 | | Load 0x3,0x4 0324 0273 | s | Execute Discrete,Plus 0325 4800 |H | Short_Literal 0x0 0326 e607 | | Load 0x3,0x7 0327 01d6 | | Execute Vector,Field_Write 0328 783a |x: | Jump 0x363 0329 e605 | | Load 0x3,0x5 032a e602 | | Load 0x3,0x2 032b e7fd | | Load 0x3,-0x3 032c 01d5 | | Execute Vector,Field_Reference 032d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 032e 027a | z | Execute Discrete,Less_Equal 032f e606 | | Load 0x3,0x6 0330 6737 |g7 | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 0331 027a | z | Execute Discrete,Less_Equal 0332 0278 | x | Execute Discrete,Or 0333 6809 |h | Jump_Zero 0x33d 0334 4801 |H | Short_Literal 0x1 0335 e607 | | Load 0x3,0x7 0336 01d7 | | Execute Vector,Field_Read 0337 e604 | | Load 0x3,0x4 0338 0273 | s | Execute Discrete,Plus 0339 4801 |H | Short_Literal 0x1 033a e607 | | Load 0x3,0x7 033b 01d6 | | Execute Vector,Field_Write 033c 7826 |x& | Jump 0x363 033d 4801 |H | Short_Literal 0x1 033e e607 | | Load 0x3,0x7 033f 01d7 | | Execute Vector,Field_Read 0340 6727 |g' | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 0341 e605 | | Load 0x3,0x5 0342 0272 | r | Execute Discrete,Minus 0343 0273 | s | Execute Discrete,Plus 0344 4801 |H | Short_Literal 0x1 0345 e607 | | Load 0x3,0x7 0346 01d6 | | Execute Vector,Field_Write 0347 6720 |g | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 0348 e605 | | Load 0x3,0x5 0349 0272 | r | Execute Discrete,Minus 034a 00d8 | | Load_Top At_Offset_0 034b 00e7 | | Load_Encached Duration_Cache 034c 0260 | ` | Execute Discrete,In_Type 034d 7001 |p | Jump_Nonzero 0x34f 034e 0801 | | Execute_Immediate Raise,0x1 034f e603 | | Load 0x3,0x3 0350 e002 | | Load 0x0,0x2 0351 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0352 c603 | | Store 0x3,0x3 0353 e604 | | Load 0x3,0x4 0354 6713 |g | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000} 0355 e605 | | Load 0x3,0x5 0356 0272 | r | Execute Discrete,Minus 0357 0272 | r | Execute Discrete,Minus 0358 c604 | | Store 0x3,0x4 0359 4800 |H | Short_Literal 0x0 035a a605 | | Store_Unchecked 0x3,0x5 035b e604 | | Load 0x3,0x4 035c a606 | | Store_Unchecked 0x3,0x6 035d e603 | | Load 0x3,0x3 035e e012 | | Load 0x0,0x12 035f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0360 a602 | | Store_Unchecked 0x3,0x2 0361 00c9 | | Action Pop_Auxiliary_Loop 0362 7f40 | @ | Jump 0x2a3 0363 00ce | | Action Pop_Auxiliary 0364 00d8 | | Load_Top At_Offset_0 0365 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0366 0000 0000 | | .XXX[0x2] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036d | m | .CONST 0x036d ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0002 | | .CONST 0x0002 ; Number of locals 036b INIT_0368: 036b e40d | | Load 0x2,0xd 036c 0337 | 7 | Declare_Variable Array 036d BODY_0368: 036d 00cf | | Action Mark_Auxiliary 036e e40c | | Load 0x2,0xc 036f 0265 | e | Execute Discrete,Reverse_Bounds 0370 0007 | | Action Break_Optional 0371 00d8 | | Load_Top At_Offset_0 0372 e7ff | | Load 0x3,-0x1 0373 01d7 | | Execute Vector,Field_Read 0374 e605 | | Load 0x3,0x5 0375 e7fe | | Load 0x3,-0x2 0376 01d7 | | Execute Vector,Field_Read 0377 0273 | s | Execute Discrete,Plus 0378 e605 | | Load 0x3,0x5 0379 e602 | | Load 0x3,0x2 037a 01d6 | | Execute Vector,Field_Write 037b 00c8 | | Action Pop_Auxiliary_Range 037c 3ff4 |? | Loop_Increasing 0x371 037d 00ce | | Action Pop_Auxiliary 037e 00d8 | | Load_Top At_Offset_0 037f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0380 ; -------------------------------------------------------------------------------------- 0380 ; SUBPROGRAM 0380 ; -------------------------------------------------------------------------------------- 0380 0383 | | .CONST 0x0383 ; Address of begin 0381 0387 | | .CONST 0x0387 ; Address of exception handler 0382 0001 | | .CONST 0x0001 ; Number of locals 0383 BODY_0380: 0383 INIT_0380: 0383 e7ff | | Load 0x3,-0x1 0384 e409 | | Load 0x2,0x9 0385 1c02 | | Execute_Immediate Run_Utility,0x2 0386 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0387 TRAP_0380: 0387 0007 | | Action Break_Optional 0388 480b |H | Short_Literal 0xb 0389 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 038a 0000 0000 | | .BLANK 0000[0x6] 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 0399 | | .CONST 0x0399 ; Address of begin 0391 0004 | | .CONST 0x0004 ; Address of exception handler 0392 0002 | | .CONST 0x0002 ; Number of locals 0393 INIT_0390: 0393 e7ff | | Load 0x3,-0x1 0394 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0395 0217 | | Execute Heap_Access,All_Reference 0396 8416 | | Call 0x2,0x16 0397 e409 | | Load 0x2,0x9 0398 03f1 | | Declare_Variable Discrete,With_Value 0399 BODY_0390: 0399 e412 | | Load 0x2,0x12 039a e7ff | | Load 0x3,-0x1 039b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 039c e7ff | | Load 0x3,-0x1 039d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 039e e7ff | | Load 0x3,-0x1 039f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03a0 e013 | | Load 0x0,0x13 03a1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03a2 e002 | | Load 0x0,0x2 03a3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03a4 8414 | | Call 0x2,0x14 03a5 e602 | | Load 0x3,0x2 03a6 e411 | | Load 0x2,0x11 03a7 01d5 | | Execute Vector,Field_Reference 03a8 8415 | | Call 0x2,0x15 03a9 e602 | | Load 0x3,0x2 03aa e411 | | Load 0x2,0x11 03ab 01d6 | | Execute Vector,Field_Write 03ac 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03ad 0000 0000 | | .XXX[0x3] 03af 0000 | | 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03b9 | | .CONST 0x03b9 ; Address of begin 03b1 03dd | | .CONST 0x03dd ; Address of exception handler 03b2 0002 | | .CONST 0x0002 ; Number of locals 03b3 INIT_03b0: 03b3 e7fe | | Load 0x3,-0x2 03b4 e7ff | | Load 0x3,-0x1 03b5 01db | | Execute Vector,Length 03b6 0272 | r | Execute Discrete,Minus 03b7 00e2 | | Load_Encached Integer_Cache 03b8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 03b9 BODY_03b0: 03b9 00d8 | | Load_Top At_Offset_0 03ba 0d00 | | Execute_Immediate Less,0x0 03bb 680f |h | Jump_Zero 0x3cb 03bc e7ff | | Load 0x3,-0x1 03bd 01dd | | Execute Vector,First 03be e7ff | | Load 0x3,-0x1 03bf 01dd | | Execute Vector,First 03c0 e7fe | | Load 0x3,-0x2 03c1 0273 | s | Execute Discrete,Plus 03c2 0aff | | Execute_Immediate Plus,-0x1 03c3 00d8 | | Load_Top At_Offset_0 03c4 00e2 | | Load_Encached Integer_Cache 03c5 0260 | ` | Execute Discrete,In_Type 03c6 7001 |p | Jump_Nonzero 0x3c8 03c7 0801 | | Execute_Immediate Raise,0x1 03c8 e7ff | | Load 0x3,-0x1 03c9 01cf | | Execute Vector,Slice_Read 03ca 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03cb 4801 |H | Short_Literal 0x1 03cc e602 | | Load 0x3,0x2 03cd 00e9 | | Load_Encached String_Cache 03ce 035b | [ | Declare_Type Array,Constrained 03cf 0337 | 7 | Declare_Variable Array 03d0 00d8 | | Load_Top At_Offset_0 03d1 01dc | | Execute Vector,Last 03d2 4801 |H | Short_Literal 0x1 03d3 0263 | c | Execute Discrete,Above_Bound 03d4 7005 |p | Jump_Nonzero 0x3da 03d5 4820 |H | Short_Literal 0x20 03d6 e605 | | Load 0x3,0x5 03d7 e603 | | Load 0x3,0x3 03d8 01d6 | | Execute Vector,Field_Write 03d9 3ffb |? | Loop_Increasing 0x3d5 03da e7ff | | Load 0x3,-0x1 03db 01cc | | Execute Vector,Catenate 03dc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03dd TRAP_03b0: 03dd 0007 | | Action Break_Optional 03de e7ff | | Load 0x3,-0x1 03df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 0428 | ( | .CONST 0x0428 ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0011 | | .CONST 0x0011 ; Number of locals 03e3 INIT_03e0: 03e3 e40d | | Load 0x2,0xd 03e4 0337 | 7 | Declare_Variable Array 03e5 00d8 | | Load_Top At_Offset_0 03e6 0335 | 5 | Declare_Variable Array,Duplicate 03e7 00cd | | Action Spare6_Action 03e8 4800 |H | Short_Literal 0x0 03e9 4800 |H | Short_Literal 0x0 03ea e603 | | Load 0x3,0x3 03eb 01d6 | | Execute Vector,Field_Write 03ec 4800 |H | Short_Literal 0x0 03ed 4801 |H | Short_Literal 0x1 03ee e603 | | Load 0x3,0x3 03ef 01d6 | | Execute Vector,Field_Write 03f0 e602 | | Load 0x3,0x2 03f1 01d4 | | Execute Vector,Structure_Write 03f2 00d8 | | Load_Top At_Offset_0 03f3 0337 | 7 | Declare_Variable Array 03f4 00d8 | | Load_Top At_Offset_0 03f5 0335 | 5 | Declare_Variable Array,Duplicate 03f6 00cd | | Action Spare6_Action 03f7 4800 |H | Short_Literal 0x0 03f8 4800 |H | Short_Literal 0x0 03f9 e604 | | Load 0x3,0x4 03fa 01d6 | | Execute Vector,Field_Write 03fb 4800 |H | Short_Literal 0x0 03fc 4801 |H | Short_Literal 0x1 03fd e604 | | Load 0x3,0x4 03fe 01d6 | | Execute Vector,Field_Write 03ff e603 | | Load 0x3,0x3 0400 01d4 | | Execute Vector,Structure_Write 0401 00d8 | | Load_Top At_Offset_0 0402 0337 | 7 | Declare_Variable Array 0403 00d8 | | Load_Top At_Offset_0 0404 0335 | 5 | Declare_Variable Array,Duplicate 0405 00cd | | Action Spare6_Action 0406 4800 |H | Short_Literal 0x0 0407 4800 |H | Short_Literal 0x0 0408 e605 | | Load 0x3,0x5 0409 01d6 | | Execute Vector,Field_Write 040a 4800 |H | Short_Literal 0x0 040b 4801 |H | Short_Literal 0x1 040c e605 | | Load 0x3,0x5 040d 01d6 | | Execute Vector,Field_Write 040e e604 | | Load 0x3,0x4 040f 01d4 | | Execute Vector,Structure_Write 0410 00e7 | | Load_Encached Duration_Cache 0411 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0412 03e9 | | Declare_Variable Discrete,Duplicate 0413 03e9 | | Declare_Variable Discrete,Duplicate 0414 029f 0683 | | Declare_Subprogram INIT_0680,For_Call 0416 029f 06cb | | Declare_Subprogram INIT_06c8,For_Call 0418 029f 06fb | | Declare_Subprogram INIT_06f8,For_Call 041a 029f 0723 | #| Declare_Subprogram INIT_0720,For_Call 041c 029f 0753 | S| Declare_Subprogram INIT_0750,For_Call 041e 029f 077b | {| Declare_Subprogram INIT_0778,For_Call 0420 029f 07ab | | Declare_Subprogram INIT_07a8,For_Call 0422 029f 07d3 | | Declare_Subprogram INIT_07d0,For_Call 0424 029f 0803 | | Declare_Subprogram INIT_0800,For_Call 0426 029f 082b | +| Declare_Subprogram INIT_0828,For_Call 0428 BODY_03e0: 0428 8608 | | Call 0x3,0x8 0429 4802 |H | Short_Literal 0x2 042a e00e | | Load 0x0,0xe 042b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 042c 0092 087a | z| Action Push_String_Extended,0x87a ; "System Availability Report from " 042e 4802 |H | Short_Literal 0x2 042f 4801 |H | Short_Literal 0x1 0430 4802 |H | Short_Literal 0x2 0431 e402 | | Load 0x2,0x2 0432 8008 | | Call 0x0,0x8 0433 01cc | | Execute Vector,Catenate 0434 0092 087b | {| Action Push_String_Extended,0x87b ; " to " 0436 01cc | | Execute Vector,Catenate 0437 4802 |H | Short_Literal 0x2 0438 4801 |H | Short_Literal 0x1 0439 4802 |H | Short_Literal 0x2 043a e403 | | Load 0x2,0x3 043b 8008 | | Call 0x0,0x8 043c 01cc | | Execute Vector,Catenate 043d e00e | | Load 0x0,0xe 043e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 043f 4801 |H | Short_Literal 0x1 0440 e00e | | Load 0x0,0xe 0441 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0442 485d |H] | Short_Literal 0x5d 0443 483a |H: | Short_Literal 0x3a 0444 8014 | | Call 0x0,0x14 0445 0092 087c | || Action Push_String_Extended,0x87c ; " [" 0447 01cc | | Execute Vector,Catenate 0448 8015 | | Call 0x0,0x15 0449 01cc | | Execute Vector,Catenate 044a 01cb | | Execute Vector,Append 044b 8016 | | Call 0x0,0x16 044c 01cc | | Execute Vector,Catenate 044d 01cb | | Execute Vector,Append 044e e00e | | Load 0x0,0xe 044f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0450 4801 |H | Short_Literal 0x1 0451 e00e | | Load 0x0,0xe 0452 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0453 0092 087d | }| Action Push_String_Extended,0x87d ; "Total Contract Hours :" 0455 480b |H | Short_Literal 0xb 0456 4800 |H | Short_Literal 0x0 0457 4800 |H | Short_Literal 0x0 0458 e603 | | Load 0x3,0x3 0459 01d7 | | Execute Vector,Field_Read 045a 8017 | | Call 0x0,0x17 045b 8418 | | Call 0x2,0x18 045c 01cc | | Execute Vector,Catenate 045d e00e | | Load 0x0,0xe 045e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 045f 0092 087e | ~| Action Push_String_Extended,0x87e ; "Total Non Contract Hours :" 0461 480b |H | Short_Literal 0xb 0462 4800 |H | Short_Literal 0x0 0463 4801 |H | Short_Literal 0x1 0464 e603 | | Load 0x3,0x3 0465 01d7 | | Execute Vector,Field_Read 0466 8017 | | Call 0x0,0x17 0467 8418 | | Call 0x2,0x18 0468 01cc | | Execute Vector,Catenate 0469 e00e | | Load 0x0,0xe 046a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 046b 0092 087f | | Action Push_String_Extended,0x87f ; " ==========" 046d e00e | | Load 0x0,0xe 046e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 046f 0092 0880 | | Action Push_String_Extended,0x880 ; "Total Hours :" 0471 480b |H | Short_Literal 0xb 0472 4800 |H | Short_Literal 0x0 0473 4800 |H | Short_Literal 0x0 0474 e603 | | Load 0x3,0x3 0475 01d7 | | Execute Vector,Field_Read 0476 4801 |H | Short_Literal 0x1 0477 e603 | | Load 0x3,0x3 0478 01d7 | | Execute Vector,Field_Read 0479 0273 | s | Execute Discrete,Plus 047a 00d8 | | Load_Top At_Offset_0 047b 00e7 | | Load_Encached Duration_Cache 047c 0260 | ` | Execute Discrete,In_Type 047d 7001 |p | Jump_Nonzero 0x47f 047e 0801 | | Execute_Immediate Raise,0x1 047f 8017 | | Call 0x0,0x17 0480 8418 | | Call 0x2,0x18 0481 01cc | | Execute Vector,Catenate 0482 e00e | | Load 0x0,0xe 0483 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0484 4801 |H | Short_Literal 0x1 0485 e00e | | Load 0x0,0xe 0486 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0487 480c |H | Short_Literal 0xc 0488 00ea | | Load_Encached Null_String_Cache 0489 8418 | | Call 0x2,0x18 048a 480c |H | Short_Literal 0xc 048b 0092 0881 | | Action Push_String_Extended,0x881 ; "Contract" 048d 8418 | | Call 0x2,0x18 048e 01cc | | Execute Vector,Catenate 048f 480c |H | Short_Literal 0xc 0490 0092 0882 | | Action Push_String_Extended,0x882 ; "Non Con" 0492 8418 | | Call 0x2,0x18 0493 01cc | | Execute Vector,Catenate 0494 480c |H | Short_Literal 0xc 0495 0092 0883 | | Action Push_String_Extended,0x883 ; "Total" 0497 8418 | | Call 0x2,0x18 0498 01cc | | Execute Vector,Catenate 0499 e00e | | Load 0x0,0xe 049a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 049b 4801 |H | Short_Literal 0x1 049c e00e | | Load 0x0,0xe 049d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 049e 00cf | | Action Mark_Auxiliary 049f 4808 |H | Short_Literal 0x8 04a0 4800 |H | Short_Literal 0x0 04a1 0007 | | Action Break_Optional 04a2 480c |H | Short_Literal 0xc 04a3 e614 | | Load 0x3,0x14 04a4 e409 | | Load 0x2,0x9 04a5 011c | | Execute Any,Convert_Unchecked 04a6 1c01 | | Execute_Immediate Run_Utility,0x1 04a7 0092 0884 | | Action Push_String_Extended,0x884 ; " :" 04a9 01cc | | Execute Vector,Catenate 04aa 8418 | | Call 0x2,0x18 04ab e00e | | Load 0x0,0xe 04ac 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 04ad 4800 |H | Short_Literal 0x0 04ae a606 | | Store_Unchecked 0x3,0x6 04af 00cf | | Action Mark_Auxiliary 04b0 e40c | | Load 0x2,0xc 04b1 0265 | e | Execute Discrete,Reverse_Bounds 04b2 0007 | | Action Break_Optional 04b3 480c |H | Short_Literal 0xc 04b4 4800 |H | Short_Literal 0x0 04b5 e617 | | Load 0x3,0x17 04b6 e614 | | Load 0x3,0x14 04b7 e411 | | Load 0x2,0x11 04b8 01d5 | | Execute Vector,Field_Reference 04b9 01d7 | | Execute Vector,Field_Read 04ba 8017 | | Call 0x0,0x17 04bb 8418 | | Call 0x2,0x18 04bc e00e | | Load 0x0,0xe 04bd 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 04be e606 | | Load 0x3,0x6 04bf e617 | | Load 0x3,0x17 04c0 e614 | | Load 0x3,0x14 04c1 e411 | | Load 0x2,0x11 04c2 01d5 | | Execute Vector,Field_Reference 04c3 01d7 | | Execute Vector,Field_Read 04c4 0273 | s | Execute Discrete,Plus 04c5 c606 | | Store 0x3,0x6 04c6 00d8 | | Load_Top At_Offset_0 04c7 e604 | | Load 0x3,0x4 04c8 01d7 | | Execute Vector,Field_Read 04c9 e617 | | Load 0x3,0x17 04ca e614 | | Load 0x3,0x14 04cb e411 | | Load 0x2,0x11 04cc 01d5 | | Execute Vector,Field_Reference 04cd 01d7 | | Execute Vector,Field_Read 04ce 0273 | s | Execute Discrete,Plus 04cf e617 | | Load 0x3,0x17 04d0 e604 | | Load 0x3,0x4 04d1 01d6 | | Execute Vector,Field_Write 04d2 00c8 | | Action Pop_Auxiliary_Range 04d3 3fdf |? | Loop_Increasing 0x4b3 04d4 00ce | | Action Pop_Auxiliary 04d5 480c |H | Short_Literal 0xc 04d6 4800 |H | Short_Literal 0x0 04d7 e606 | | Load 0x3,0x6 04d8 8017 | | Call 0x0,0x17 04d9 8418 | | Call 0x2,0x18 04da e00e | | Load 0x0,0xe 04db 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04dc e607 | | Load 0x3,0x7 04dd e606 | | Load 0x3,0x6 04de 0273 | s | Execute Discrete,Plus 04df c607 | | Store 0x3,0x7 04e0 00c8 | | Action Pop_Auxiliary_Range 04e1 3fc0 |? | Loop_Increasing 0x4a2 04e2 00ce | | Action Pop_Auxiliary 04e3 480c |H | Short_Literal 0xc 04e4 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 04e6 8418 | | Call 0x2,0x18 04e7 480c |H | Short_Literal 0xc 04e8 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 04ea 8418 | | Call 0x2,0x18 04eb 01cc | | Execute Vector,Catenate 04ec 480c |H | Short_Literal 0xc 04ed 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 04ef 8418 | | Call 0x2,0x18 04f0 01cc | | Execute Vector,Catenate 04f1 480c |H | Short_Literal 0xc 04f2 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 04f4 8418 | | Call 0x2,0x18 04f5 01cc | | Execute Vector,Catenate 04f6 e00e | | Load 0x0,0xe 04f7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 04f8 480c |H | Short_Literal 0xc 04f9 0092 0886 | | Action Push_String_Extended,0x886 ; "Total :" 04fb 8418 | | Call 0x2,0x18 04fc 480c |H | Short_Literal 0xc 04fd 4800 |H | Short_Literal 0x0 04fe 4800 |H | Short_Literal 0x0 04ff e604 | | Load 0x3,0x4 0500 01d7 | | Execute Vector,Field_Read 0501 8017 | | Call 0x0,0x17 0502 8418 | | Call 0x2,0x18 0503 01cc | | Execute Vector,Catenate 0504 480c |H | Short_Literal 0xc 0505 4800 |H | Short_Literal 0x0 0506 4801 |H | Short_Literal 0x1 0507 e604 | | Load 0x3,0x4 0508 01d7 | | Execute Vector,Field_Read 0509 8017 | | Call 0x0,0x17 050a 8418 | | Call 0x2,0x18 050b 01cc | | Execute Vector,Catenate 050c 480c |H | Short_Literal 0xc 050d 4800 |H | Short_Literal 0x0 050e e607 | | Load 0x3,0x7 050f 8017 | | Call 0x0,0x17 0510 8418 | | Call 0x2,0x18 0511 01cc | | Execute Vector,Catenate 0512 e00e | | Load 0x0,0xe 0513 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0514 480c |H | Short_Literal 0xc 0515 0092 0887 | | Action Push_String_Extended,0x887 ; "Available :" 0517 8418 | | Call 0x2,0x18 0518 e00e | | Load 0x0,0xe 0519 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 051a 8609 | | Call 0x3,0x9 051b 4825 |H% | Short_Literal 0x25 051c e00e | | Load 0x0,0xe 051d 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 051e 860a | | Call 0x3,0xa 051f 4825 |H% | Short_Literal 0x25 0520 e00e | | Load 0x0,0xe 0521 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0522 860b | | Call 0x3,0xb 0523 4825 |H% | Short_Literal 0x25 0524 e00e | | Load 0x0,0xe 0525 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0526 4802 |H | Short_Literal 0x2 0527 e00e | | Load 0x0,0xe 0528 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0529 e604 | | Load 0x3,0x4 052a e602 | | Load 0x3,0x2 052b 01d4 | | Execute Vector,Structure_Write 052c e604 | | Load 0x3,0x4 052d 00d8 | | Load_Top At_Offset_0 052e 0335 | 5 | Declare_Variable Array,Duplicate 052f 00cd | | Action Spare6_Action 0530 4800 |H | Short_Literal 0x0 0531 4800 |H | Short_Literal 0x0 0532 e613 | | Load 0x3,0x13 0533 01d6 | | Execute Vector,Field_Write 0534 4800 |H | Short_Literal 0x0 0535 4801 |H | Short_Literal 0x1 0536 e613 | | Load 0x3,0x13 0537 01d6 | | Execute Vector,Field_Write 0538 00cd | | Action Spare6_Action 0539 e604 | | Load 0x3,0x4 053a 01d4 | | Execute Vector,Structure_Write 053b e607 | | Load 0x3,0x7 053c a605 | | Store_Unchecked 0x3,0x5 053d 4800 |H | Short_Literal 0x0 053e a607 | | Store_Unchecked 0x3,0x7 053f 00cf | | Action Mark_Auxiliary 0540 480b |H | Short_Literal 0xb 0541 4809 |H | Short_Literal 0x9 0542 0007 | | Action Break_Optional 0543 480c |H | Short_Literal 0xc 0544 e614 | | Load 0x3,0x14 0545 e409 | | Load 0x2,0x9 0546 011c | | Execute Any,Convert_Unchecked 0547 1c01 | | Execute_Immediate Run_Utility,0x1 0548 0092 0884 | | Action Push_String_Extended,0x884 ; " :" 054a 01cc | | Execute Vector,Catenate 054b 8418 | | Call 0x2,0x18 054c e00e | | Load 0x0,0xe 054d 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 054e 4800 |H | Short_Literal 0x0 054f a606 | | Store_Unchecked 0x3,0x6 0550 00cf | | Action Mark_Auxiliary 0551 e40c | | Load 0x2,0xc 0552 0265 | e | Execute Discrete,Reverse_Bounds 0553 0007 | | Action Break_Optional 0554 480c |H | Short_Literal 0xc 0555 4800 |H | Short_Literal 0x0 0556 e617 | | Load 0x3,0x17 0557 e614 | | Load 0x3,0x14 0558 e411 | | Load 0x2,0x11 0559 01d5 | | Execute Vector,Field_Reference 055a 01d7 | | Execute Vector,Field_Read 055b 8017 | | Call 0x0,0x17 055c 8418 | | Call 0x2,0x18 055d e00e | | Load 0x0,0xe 055e 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 055f e606 | | Load 0x3,0x6 0560 e617 | | Load 0x3,0x17 0561 e614 | | Load 0x3,0x14 0562 e411 | | Load 0x2,0x11 0563 01d5 | | Execute Vector,Field_Reference 0564 01d7 | | Execute Vector,Field_Read 0565 0273 | s | Execute Discrete,Plus 0566 c606 | | Store 0x3,0x6 0567 00d8 | | Load_Top At_Offset_0 0568 e604 | | Load 0x3,0x4 0569 01d7 | | Execute Vector,Field_Read 056a e617 | | Load 0x3,0x17 056b e614 | | Load 0x3,0x14 056c e411 | | Load 0x2,0x11 056d 01d5 | | Execute Vector,Field_Reference 056e 01d7 | | Execute Vector,Field_Read 056f 0273 | s | Execute Discrete,Plus 0570 e617 | | Load 0x3,0x17 0571 e604 | | Load 0x3,0x4 0572 01d6 | | Execute Vector,Field_Write 0573 00c8 | | Action Pop_Auxiliary_Range 0574 3fdf |? | Loop_Increasing 0x554 0575 00ce | | Action Pop_Auxiliary 0576 480c |H | Short_Literal 0xc 0577 4800 |H | Short_Literal 0x0 0578 e606 | | Load 0x3,0x6 0579 8017 | | Call 0x0,0x17 057a 8418 | | Call 0x2,0x18 057b e00e | | Load 0x0,0xe 057c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 057d e607 | | Load 0x3,0x7 057e e606 | | Load 0x3,0x6 057f 0273 | s | Execute Discrete,Plus 0580 c607 | | Store 0x3,0x7 0581 00c8 | | Action Pop_Auxiliary_Range 0582 3fc0 |? | Loop_Increasing 0x543 0583 00ce | | Action Pop_Auxiliary 0584 480c |H | Short_Literal 0xc 0585 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 0587 8418 | | Call 0x2,0x18 0588 480c |H | Short_Literal 0xc 0589 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 058b 8418 | | Call 0x2,0x18 058c 01cc | | Execute Vector,Catenate 058d 480c |H | Short_Literal 0xc 058e 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 0590 8418 | | Call 0x2,0x18 0591 01cc | | Execute Vector,Catenate 0592 480c |H | Short_Literal 0xc 0593 0092 0885 | | Action Push_String_Extended,0x885 ; "========" 0595 8418 | | Call 0x2,0x18 0596 01cc | | Execute Vector,Catenate 0597 e00e | | Load 0x0,0xe 0598 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0599 480c |H | Short_Literal 0xc 059a 0092 0886 | | Action Push_String_Extended,0x886 ; "Total :" 059c 8418 | | Call 0x2,0x18 059d 480c |H | Short_Literal 0xc 059e 4800 |H | Short_Literal 0x0 059f 4800 |H | Short_Literal 0x0 05a0 e604 | | Load 0x3,0x4 05a1 01d7 | | Execute Vector,Field_Read 05a2 8017 | | Call 0x0,0x17 05a3 8418 | | Call 0x2,0x18 05a4 01cc | | Execute Vector,Catenate 05a5 480c |H | Short_Literal 0xc 05a6 4800 |H | Short_Literal 0x0 05a7 4801 |H | Short_Literal 0x1 05a8 e604 | | Load 0x3,0x4 05a9 01d7 | | Execute Vector,Field_Read 05aa 8017 | | Call 0x0,0x17 05ab 8418 | | Call 0x2,0x18 05ac 01cc | | Execute Vector,Catenate 05ad 480c |H | Short_Literal 0xc 05ae 4800 |H | Short_Literal 0x0 05af e607 | | Load 0x3,0x7 05b0 8017 | | Call 0x0,0x17 05b1 8418 | | Call 0x2,0x18 05b2 01cc | | Execute Vector,Catenate 05b3 e00e | | Load 0x0,0xe 05b4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 05b5 480c |H | Short_Literal 0xc 05b6 0092 0887 | | Action Push_String_Extended,0x887 ; "Available :" 05b8 8418 | | Call 0x2,0x18 05b9 e00e | | Load 0x0,0xe 05ba 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 05bb 860c | | Call 0x3,0xc 05bc 4825 |H% | Short_Literal 0x25 05bd e00e | | Load 0x0,0xe 05be 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 05bf 860d | | Call 0x3,0xd 05c0 4825 |H% | Short_Literal 0x25 05c1 e00e | | Load 0x0,0xe 05c2 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 05c3 860e | | Call 0x3,0xe 05c4 4825 |H% | Short_Literal 0x25 05c5 e00e | | Load 0x0,0xe 05c6 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 05c7 4802 |H | Short_Literal 0x2 05c8 e00e | | Load 0x0,0xe 05c9 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 05ca e604 | | Load 0x3,0x4 05cb e602 | | Load 0x3,0x2 05cc 8415 | | Call 0x2,0x15 05cd e602 | | Load 0x3,0x2 05ce 01d4 | | Execute Vector,Structure_Write 05cf e605 | | Load 0x3,0x5 05d0 e607 | | Load 0x3,0x7 05d1 0273 | s | Execute Discrete,Plus 05d2 c605 | | Store 0x3,0x5 05d3 480c |H | Short_Literal 0xc 05d4 0092 0888 | | Action Push_String_Extended,0x888 ; "Grand Total" 05d6 8418 | | Call 0x2,0x18 05d7 480c |H | Short_Literal 0xc 05d8 4800 |H | Short_Literal 0x0 05d9 4800 |H | Short_Literal 0x0 05da e602 | | Load 0x3,0x2 05db 01d7 | | Execute Vector,Field_Read 05dc 8017 | | Call 0x0,0x17 05dd 8418 | | Call 0x2,0x18 05de 01cc | | Execute Vector,Catenate 05df 480c |H | Short_Literal 0xc 05e0 4800 |H | Short_Literal 0x0 05e1 4801 |H | Short_Literal 0x1 05e2 e602 | | Load 0x3,0x2 05e3 01d7 | | Execute Vector,Field_Read 05e4 8017 | | Call 0x0,0x17 05e5 8418 | | Call 0x2,0x18 05e6 01cc | | Execute Vector,Catenate 05e7 480c |H | Short_Literal 0xc 05e8 4800 |H | Short_Literal 0x0 05e9 e607 | | Load 0x3,0x7 05ea 8017 | | Call 0x0,0x17 05eb 8418 | | Call 0x2,0x18 05ec 01cc | | Execute Vector,Catenate 05ed e00e | | Load 0x0,0xe 05ee 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 05ef 480c |H | Short_Literal 0xc 05f0 0092 0889 | | Action Push_String_Extended,0x889 ; "Uptime :" 05f2 8418 | | Call 0x2,0x18 05f3 e00e | | Load 0x0,0xe 05f4 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 05f5 860f | | Call 0x3,0xf 05f6 4825 |H% | Short_Literal 0x25 05f7 e00e | | Load 0x0,0xe 05f8 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 05f9 8610 | | Call 0x3,0x10 05fa 4825 |H% | Short_Literal 0x25 05fb e00e | | Load 0x0,0xe 05fc 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 05fd 8611 | | Call 0x3,0x11 05fe 4825 |H% | Short_Literal 0x25 05ff e00e | | Load 0x0,0xe 0600 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0601 4802 |H | Short_Literal 0x2 0602 e00e | | Load 0x0,0xe 0603 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0604 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0605 0000 0000 | | .XXX[0x3] 0607 0000 | | 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 060b | | .CONST 0x060b ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0001 | | .CONST 0x0001 ; Number of locals 060b BODY_0608: 060b INIT_0608: 060b 4802 |H | Short_Literal 0x2 060c e00e | | Load 0x0,0xe 060d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 060e 0092 088a | | Action Push_String_Extended,0x88a ; "Contract Hours" 0610 e00e | | Load 0x0,0xe 0611 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0612 0092 088b | | Action Push_String_Extended,0x88b ; "==============" 0614 e00e | | Load 0x0,0xe 0615 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0616 00cf | | Action Mark_Auxiliary 0617 4807 |H | Short_Literal 0x7 0618 4801 |H | Short_Literal 0x1 0619 0007 | | Action Break_Optional 061a 0092 088c | | Action Push_String_Extended,0x88c ; " " 061c 480c |H | Short_Literal 0xc 061d e604 | | Load 0x3,0x4 061e 00d8 | | Load_Top At_Offset_0 061f e408 | | Load 0x2,0x8 0620 0260 | ` | Execute Discrete,In_Type 0621 7001 |p | Jump_Nonzero 0x623 0622 0801 | | Execute_Immediate Raise,0x1 0623 e408 | | Load 0x2,0x8 0624 011c | | Execute Any,Convert_Unchecked 0625 1c01 | | Execute_Immediate Run_Utility,0x1 0626 e018 | | Load 0x0,0x18 0627 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0628 0092 088d | | Action Push_String_Extended,0x88d ; " : " 062a 01cc | | Execute Vector,Catenate 062b 8418 | | Call 0x2,0x18 062c 01cc | | Execute Vector,Catenate 062d e00e | | Load 0x0,0xe 062e 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 062f 00d8 | | Load_Top At_Offset_0 0630 e7ff | | Load 0x3,-0x1 0631 01d5 | | Execute Vector,Field_Reference 0632 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0633 e604 | | Load 0x3,0x4 0634 e7ff | | Load 0x3,-0x1 0635 01d5 | | Execute Vector,Field_Reference 0636 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0637 027f | | Execute Discrete,Equal 0638 6805 |h | Jump_Zero 0x63e 0639 0092 088e | | Action Push_String_Extended,0x88e ; "None" 063b e00e | | Load 0x0,0xe 063c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 063d 7812 |x | Jump 0x650 063e 4800 |H | Short_Literal 0x0 063f e604 | | Load 0x3,0x4 0640 e7ff | | Load 0x3,-0x1 0641 01d5 | | Execute Vector,Field_Reference 0642 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0643 8017 | | Call 0x0,0x17 0644 0092 087b | {| Action Push_String_Extended,0x87b ; " to " 0646 01cc | | Execute Vector,Catenate 0647 4800 |H | Short_Literal 0x0 0648 e604 | | Load 0x3,0x4 0649 e7ff | | Load 0x3,-0x1 064a 01d5 | | Execute Vector,Field_Reference 064b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 064c 8017 | | Call 0x0,0x17 064d 01cc | | Execute Vector,Catenate 064e e00e | | Load 0x0,0xe 064f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0650 00c8 | | Action Pop_Auxiliary_Range 0651 3fc8 |? | Loop_Increasing 0x61a 0652 00ce | | Action Pop_Auxiliary 0653 4801 |H | Short_Literal 0x1 0654 e00e | | Load 0x0,0xe 0655 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0656 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0657 0000 | | .XXX[0x1] 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b 4607 |F | Jump_Case 0x8 065c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 065d 7807 |x | Jump 0x665 ; case 0x1 065e 780a |x | Jump 0x669 ; case 0x2 065f 780e |x | Jump 0x66e ; case 0x3 0660 7811 |x | Jump 0x672 ; case 0x4 0661 7812 |x | Jump 0x674 ; case 0x5 0662 7813 |x | Jump 0x676 ; case 0x6 0663 7816 |x | Jump 0x67a ; case 0x7 0664 4302 |C | .XXX[0x1] 0665 00da | | Load_Top At_Offset_2 0666 0091 086a | j| Action Push_String_Extended_Indexed,0x86a ; "NONE" 0668 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0669 00db | | Load_Top At_Offset_3 066a 00db | | Load_Top At_Offset_3 066b 00e0 | | Load_Encached Standard_Cache 066c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 066d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 066e 00da | | Load_Top At_Offset_2 066f 00e0 | | Load_Encached Standard_Cache 0670 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0671 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0672 00db | | Load_Top At_Offset_3 0673 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0674 00db | | Load_Top At_Offset_3 0675 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0676 e606 | | Load 0x3,0x6 0677 00dc | | Load_Top At_Offset_4 0678 0267 | g | Execute Discrete,Predecessor 0679 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 067a e606 | | Load 0x3,0x6 067b 00dc | | Load_Top At_Offset_4 067c 0268 | h | Execute Discrete,Successor 067d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 067e 0000 0000 | | .XXX[0x2] 0680 ; -------------------------------------------------------------------------------------- 0680 ; SUBPROGRAM 0680 ; -------------------------------------------------------------------------------------- 0680 068c | | .CONST 0x068c ; Address of begin 0681 0004 | | .CONST 0x0004 ; Address of exception handler 0682 0004 | | .CONST 0x0004 ; Number of locals 0683 INIT_0680: 0683 e002 | | Load 0x0,0x2 0684 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0685 02c7 | | Declare_Variable Any 0686 e402 | | Load 0x2,0x2 0687 a802 | | Store_Unchecked 0x4,0x2 0688 e012 | | Load 0x0,0x12 0689 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c 068a e40d | | Load 0x2,0xd 068b 0337 | 7 | Declare_Variable Array 068c BODY_0680: 068c 00cf | | Action Mark_Auxiliary 068d 782f |x/ | Jump 0x6bd 068e e802 | | Load 0x4,0x2 068f e012 | | Load 0x0,0x12 0690 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0691 a803 | | Store_Unchecked 0x4,0x3 0692 e803 | | Load 0x4,0x3 0693 e412 | | Load 0x2,0x12 0694 01d5 | | Execute Vector,Field_Reference 0695 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0696 e803 | | Load 0x4,0x3 0697 e412 | | Load 0x2,0x12 0698 01d5 | | Execute Vector,Field_Reference 0699 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 069a 0272 | r | Execute Discrete,Minus 069b 4800 |H | Short_Literal 0x0 069c e804 | | Load 0x4,0x4 069d 01d6 | | Execute Vector,Field_Write 069e 6025 |`% | Indirect_Literal Discrete,0x6c4,{0x00000000, 0xa8c00000} 069f 4800 |H | Short_Literal 0x0 06a0 e804 | | Load 0x4,0x4 06a1 01d7 | | Execute Vector,Field_Read 06a2 0272 | r | Execute Discrete,Minus 06a3 4801 |H | Short_Literal 0x1 06a4 e804 | | Load 0x4,0x4 06a5 01d6 | | Execute Vector,Field_Write 06a6 00cf | | Action Mark_Auxiliary 06a7 e40c | | Load 0x2,0xc 06a8 0265 | e | Execute Discrete,Reverse_Bounds 06a9 0007 | | Action Break_Optional 06aa 00d8 | | Load_Top At_Offset_0 06ab e603 | | Load 0x3,0x3 06ac 01d7 | | Execute Vector,Field_Read 06ad e808 | | Load 0x4,0x8 06ae e804 | | Load 0x4,0x4 06af 01d7 | | Execute Vector,Field_Read 06b0 0273 | s | Execute Discrete,Plus 06b1 e808 | | Load 0x4,0x8 06b2 e603 | | Load 0x3,0x3 06b3 01d6 | | Execute Vector,Field_Write 06b4 00c8 | | Action Pop_Auxiliary_Range 06b5 3ff4 |? | Loop_Increasing 0x6aa 06b6 00ce | | Action Pop_Auxiliary 06b7 600c |` | Indirect_Literal Discrete,0x6c4,{0x00000000, 0xa8c00000} 06b8 e802 | | Load 0x4,0x2 06b9 e002 | | Load 0x0,0x2 06ba 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06bb c802 | | Store 0x4,0x2 06bc 00c9 | | Action Pop_Auxiliary_Loop 06bd e403 | | Load 0x2,0x3 06be e802 | | Load 0x4,0x2 06bf e002 | | Load 0x0,0x2 06c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06c1 77cc |w | Jump_Nonzero 0x68e 06c2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06c3 0000 | | .XXX[0x1] 06c4 0000 0000 | | .LITERAL {0x00000000, 0xa8c00000} 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; SUBPROGRAM 06c8 ; -------------------------------------------------------------------------------------- 06c8 06cb | | .CONST 0x06cb ; Address of begin 06c9 06e2 | | .CONST 0x06e2 ; Address of exception handler 06ca 0001 | | .CONST 0x0001 ; Number of locals 06cb BODY_06c8: 06cb INIT_06c8: 06cb 4800 |H | Short_Literal 0x0 06cc 4801 |H | Short_Literal 0x1 06cd 4809 |H | Short_Literal 0x9 06ce 5821 |X! | Indirect_Literal Float,0x6f0,100.0 06cf 4800 |H | Short_Literal 0x0 06d0 e604 | | Load 0x3,0x4 06d1 01d7 | | Execute Vector,Field_Read 06d2 0237 | 7 | Execute Float,Convert_From_Discrete 06d3 5818 |X | Indirect_Literal Float,0x6ec,3.0517578125e-05 06d4 023b | ; | Execute Float,Times 06d5 581a |X | Indirect_Literal Float,0x6f0,100.0 06d6 023b | ; | Execute Float,Times 06d7 4800 |H | Short_Literal 0x0 06d8 e603 | | Load 0x3,0x3 06d9 01d7 | | Execute Vector,Field_Read 06da 0237 | 7 | Execute Float,Convert_From_Discrete 06db 5810 |X | Indirect_Literal Float,0x6ec,3.0517578125e-05 06dc 023b | ; | Execute Float,Times 06dd 023a | : | Execute Float,Divide 06de 023c | < | Execute Float,Minus 06df e00e | | Load 0x0,0xe 06e0 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 06e1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06e2 TRAP_06c8: 06e2 0007 | | Action Break_Optional 06e3 4800 |H | Short_Literal 0x0 06e4 4801 |H | Short_Literal 0x1 06e5 4809 |H | Short_Literal 0x9 06e6 5809 |X | Indirect_Literal Float,0x6f0,100.0 06e7 e00e | | Load 0x0,0xe 06e8 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 06e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06ea 0000 0000 | | .XXX[0x2] 06ec 3f00 0000 |? | .DBL 3.0517578125e-05 06ee 0000 0000 | | 06f0 4059 0000 |@Y | .DBL 100.0 06f2 0000 0000 | | 06f4 0000 0000 | | .BLANK 0000[0x4] 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 06fb | | .CONST 0x06fb ; Address of begin 06f9 0712 | | .CONST 0x0712 ; Address of exception handler 06fa 0001 | | .CONST 0x0001 ; Number of locals 06fb BODY_06f8: 06fb INIT_06f8: 06fb 4800 |H | Short_Literal 0x0 06fc 4801 |H | Short_Literal 0x1 06fd 4809 |H | Short_Literal 0x9 06fe 5ff1 |_ | Indirect_Literal Float,0x6f0,100.0 06ff 4801 |H | Short_Literal 0x1 0700 e604 | | Load 0x3,0x4 0701 01d7 | | Execute Vector,Field_Read 0702 0237 | 7 | Execute Float,Convert_From_Discrete 0703 5fe8 |_ | Indirect_Literal Float,0x6ec,3.0517578125e-05 0704 023b | ; | Execute Float,Times 0705 5fea |_ | Indirect_Literal Float,0x6f0,100.0 0706 023b | ; | Execute Float,Times 0707 4801 |H | Short_Literal 0x1 0708 e603 | | Load 0x3,0x3 0709 01d7 | | Execute Vector,Field_Read 070a 0237 | 7 | Execute Float,Convert_From_Discrete 070b 5fe0 |_ | Indirect_Literal Float,0x6ec,3.0517578125e-05 070c 023b | ; | Execute Float,Times 070d 023a | : | Execute Float,Divide 070e 023c | < | Execute Float,Minus 070f e00e | | Load 0x0,0xe 0710 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0711 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0712 TRAP_06f8: 0712 0007 | | Action Break_Optional 0713 4800 |H | Short_Literal 0x0 0714 4801 |H | Short_Literal 0x1 0715 4809 |H | Short_Literal 0x9 0716 5fd9 |_ | Indirect_Literal Float,0x6f0,100.0 0717 e00e | | Load 0x0,0xe 0718 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0719 4501 |E | Exit_Suprogram New_Top_Offset 0x1 071a 0000 0000 | | .BLANK 0000[0x6] 0720 ; -------------------------------------------------------------------------------------- 0720 ; SUBPROGRAM 0720 ; -------------------------------------------------------------------------------------- 0720 0723 | # | .CONST 0x0723 ; Address of begin 0721 073c | < | .CONST 0x073c ; Address of exception handler 0722 0001 | | .CONST 0x0001 ; Number of locals 0723 BODY_0720: 0723 INIT_0720: 0723 4800 |H | Short_Literal 0x0 0724 4801 |H | Short_Literal 0x1 0725 4809 |H | Short_Literal 0x9 0726 5821 |X! | Indirect_Literal Float,0x748,100.0 0727 e607 | | Load 0x3,0x7 0728 0237 | 7 | Execute Float,Convert_From_Discrete 0729 581a |X | Indirect_Literal Float,0x744,3.0517578125e-05 072a 023b | ; | Execute Float,Times 072b 581c |X | Indirect_Literal Float,0x748,100.0 072c 023b | ; | Execute Float,Times 072d 4800 |H | Short_Literal 0x0 072e e603 | | Load 0x3,0x3 072f 01d7 | | Execute Vector,Field_Read 0730 4801 |H | Short_Literal 0x1 0731 e603 | | Load 0x3,0x3 0732 01d7 | | Execute Vector,Field_Read 0733 0273 | s | Execute Discrete,Plus 0734 0237 | 7 | Execute Float,Convert_From_Discrete 0735 580e |X | Indirect_Literal Float,0x744,3.0517578125e-05 0736 023b | ; | Execute Float,Times 0737 023a | : | Execute Float,Divide 0738 023c | < | Execute Float,Minus 0739 e00e | | Load 0x0,0xe 073a 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 073b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 073c TRAP_0720: 073c 0007 | | Action Break_Optional 073d 4800 |H | Short_Literal 0x0 073e 4801 |H | Short_Literal 0x1 073f 4809 |H | Short_Literal 0x9 0740 5807 |X | Indirect_Literal Float,0x748,100.0 0741 e00e | | Load 0x0,0xe 0742 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0743 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0744 3f00 0000 |? | .DBL 3.0517578125e-05 0746 0000 0000 | | 0748 4059 0000 |@Y | .DBL 100.0 074a 0000 0000 | | 074c 0000 0000 | | .BLANK 0000[0x4] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0753 | S | .CONST 0x0753 ; Address of begin 0751 076a | j | .CONST 0x076a ; Address of exception handler 0752 0001 | | .CONST 0x0001 ; Number of locals 0753 BODY_0750: 0753 INIT_0750: 0753 4800 |H | Short_Literal 0x0 0754 4801 |H | Short_Literal 0x1 0755 4809 |H | Short_Literal 0x9 0756 5ff1 |_ | Indirect_Literal Float,0x748,100.0 0757 4800 |H | Short_Literal 0x0 0758 e604 | | Load 0x3,0x4 0759 01d7 | | Execute Vector,Field_Read 075a 0237 | 7 | Execute Float,Convert_From_Discrete 075b 5fe8 |_ | Indirect_Literal Float,0x744,3.0517578125e-05 075c 023b | ; | Execute Float,Times 075d 5fea |_ | Indirect_Literal Float,0x748,100.0 075e 023b | ; | Execute Float,Times 075f 4800 |H | Short_Literal 0x0 0760 e603 | | Load 0x3,0x3 0761 01d7 | | Execute Vector,Field_Read 0762 0237 | 7 | Execute Float,Convert_From_Discrete 0763 5fe0 |_ | Indirect_Literal Float,0x744,3.0517578125e-05 0764 023b | ; | Execute Float,Times 0765 023a | : | Execute Float,Divide 0766 023c | < | Execute Float,Minus 0767 e00e | | Load 0x0,0xe 0768 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0769 4501 |E | Exit_Suprogram New_Top_Offset 0x1 076a TRAP_0750: 076a 0007 | | Action Break_Optional 076b 4800 |H | Short_Literal 0x0 076c 4801 |H | Short_Literal 0x1 076d 4809 |H | Short_Literal 0x9 076e 5fd9 |_ | Indirect_Literal Float,0x748,100.0 076f e00e | | Load 0x0,0xe 0770 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0771 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0772 0000 0000 | | .BLANK 0000[0x6] 0778 ; -------------------------------------------------------------------------------------- 0778 ; SUBPROGRAM 0778 ; -------------------------------------------------------------------------------------- 0778 077b | { | .CONST 0x077b ; Address of begin 0779 0792 | | .CONST 0x0792 ; Address of exception handler 077a 0001 | | .CONST 0x0001 ; Number of locals 077b BODY_0778: 077b INIT_0778: 077b 4800 |H | Short_Literal 0x0 077c 4801 |H | Short_Literal 0x1 077d 4809 |H | Short_Literal 0x9 077e 5821 |X! | Indirect_Literal Float,0x7a0,100.0 077f 4801 |H | Short_Literal 0x1 0780 e604 | | Load 0x3,0x4 0781 01d7 | | Execute Vector,Field_Read 0782 0237 | 7 | Execute Float,Convert_From_Discrete 0783 5818 |X | Indirect_Literal Float,0x79c,3.0517578125e-05 0784 023b | ; | Execute Float,Times 0785 581a |X | Indirect_Literal Float,0x7a0,100.0 0786 023b | ; | Execute Float,Times 0787 4801 |H | Short_Literal 0x1 0788 e603 | | Load 0x3,0x3 0789 01d7 | | Execute Vector,Field_Read 078a 0237 | 7 | Execute Float,Convert_From_Discrete 078b 5810 |X | Indirect_Literal Float,0x79c,3.0517578125e-05 078c 023b | ; | Execute Float,Times 078d 023a | : | Execute Float,Divide 078e 023c | < | Execute Float,Minus 078f e00e | | Load 0x0,0xe 0790 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0791 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0792 TRAP_0778: 0792 0007 | | Action Break_Optional 0793 4800 |H | Short_Literal 0x0 0794 4801 |H | Short_Literal 0x1 0795 4809 |H | Short_Literal 0x9 0796 5809 |X | Indirect_Literal Float,0x7a0,100.0 0797 e00e | | Load 0x0,0xe 0798 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0799 4501 |E | Exit_Suprogram New_Top_Offset 0x1 079a 0000 0000 | | .XXX[0x2] 079c 3f00 0000 |? | .DBL 3.0517578125e-05 079e 0000 0000 | | 07a0 4059 0000 |@Y | .DBL 100.0 07a2 0000 0000 | | 07a4 0000 0000 | | .BLANK 0000[0x4] 07a8 ; -------------------------------------------------------------------------------------- 07a8 ; SUBPROGRAM 07a8 ; -------------------------------------------------------------------------------------- 07a8 07ab | | .CONST 0x07ab ; Address of begin 07a9 07c4 | | .CONST 0x07c4 ; Address of exception handler 07aa 0001 | | .CONST 0x0001 ; Number of locals 07ab BODY_07a8: 07ab INIT_07a8: 07ab 4800 |H | Short_Literal 0x0 07ac 4801 |H | Short_Literal 0x1 07ad 4809 |H | Short_Literal 0x9 07ae 5ff1 |_ | Indirect_Literal Float,0x7a0,100.0 07af e607 | | Load 0x3,0x7 07b0 0237 | 7 | Execute Float,Convert_From_Discrete 07b1 5fea |_ | Indirect_Literal Float,0x79c,3.0517578125e-05 07b2 023b | ; | Execute Float,Times 07b3 5fec |_ | Indirect_Literal Float,0x7a0,100.0 07b4 023b | ; | Execute Float,Times 07b5 4800 |H | Short_Literal 0x0 07b6 e603 | | Load 0x3,0x3 07b7 01d7 | | Execute Vector,Field_Read 07b8 4801 |H | Short_Literal 0x1 07b9 e603 | | Load 0x3,0x3 07ba 01d7 | | Execute Vector,Field_Read 07bb 0273 | s | Execute Discrete,Plus 07bc 0237 | 7 | Execute Float,Convert_From_Discrete 07bd 5fde |_ | Indirect_Literal Float,0x79c,3.0517578125e-05 07be 023b | ; | Execute Float,Times 07bf 023a | : | Execute Float,Divide 07c0 023c | < | Execute Float,Minus 07c1 e00e | | Load 0x0,0xe 07c2 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 07c3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07c4 TRAP_07a8: 07c4 0007 | | Action Break_Optional 07c5 4800 |H | Short_Literal 0x0 07c6 4801 |H | Short_Literal 0x1 07c7 4809 |H | Short_Literal 0x9 07c8 5fd7 |_ | Indirect_Literal Float,0x7a0,100.0 07c9 e00e | | Load 0x0,0xe 07ca 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 07cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07cc 0000 0000 | | .BLANK 0000[0x4] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d3 | | .CONST 0x07d3 ; Address of begin 07d1 07ea | | .CONST 0x07ea ; Address of exception handler 07d2 0001 | | .CONST 0x0001 ; Number of locals 07d3 BODY_07d0: 07d3 INIT_07d0: 07d3 4800 |H | Short_Literal 0x0 07d4 4801 |H | Short_Literal 0x1 07d5 4809 |H | Short_Literal 0x9 07d6 5821 |X! | Indirect_Literal Float,0x7f8,100.0 07d7 4800 |H | Short_Literal 0x0 07d8 e602 | | Load 0x3,0x2 07d9 01d7 | | Execute Vector,Field_Read 07da 0237 | 7 | Execute Float,Convert_From_Discrete 07db 5818 |X | Indirect_Literal Float,0x7f4,3.0517578125e-05 07dc 023b | ; | Execute Float,Times 07dd 581a |X | Indirect_Literal Float,0x7f8,100.0 07de 023b | ; | Execute Float,Times 07df 4800 |H | Short_Literal 0x0 07e0 e603 | | Load 0x3,0x3 07e1 01d7 | | Execute Vector,Field_Read 07e2 0237 | 7 | Execute Float,Convert_From_Discrete 07e3 5810 |X | Indirect_Literal Float,0x7f4,3.0517578125e-05 07e4 023b | ; | Execute Float,Times 07e5 023a | : | Execute Float,Divide 07e6 023c | < | Execute Float,Minus 07e7 e00e | | Load 0x0,0xe 07e8 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 07e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07ea TRAP_07d0: 07ea 0007 | | Action Break_Optional 07eb 4800 |H | Short_Literal 0x0 07ec 4801 |H | Short_Literal 0x1 07ed 4809 |H | Short_Literal 0x9 07ee 5809 |X | Indirect_Literal Float,0x7f8,100.0 07ef e00e | | Load 0x0,0xe 07f0 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 07f1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07f2 0000 0000 | | .XXX[0x2] 07f4 3f00 0000 |? | .DBL 3.0517578125e-05 07f6 0000 0000 | | 07f8 4059 0000 |@Y | .DBL 100.0 07fa 0000 0000 | | 07fc 0000 0000 | | .BLANK 0000[0x4] 0800 ; -------------------------------------------------------------------------------------- 0800 ; SUBPROGRAM 0800 ; -------------------------------------------------------------------------------------- 0800 0803 | | .CONST 0x0803 ; Address of begin 0801 081a | | .CONST 0x081a ; Address of exception handler 0802 0001 | | .CONST 0x0001 ; Number of locals 0803 BODY_0800: 0803 INIT_0800: 0803 4800 |H | Short_Literal 0x0 0804 4801 |H | Short_Literal 0x1 0805 4809 |H | Short_Literal 0x9 0806 5ff1 |_ | Indirect_Literal Float,0x7f8,100.0 0807 4801 |H | Short_Literal 0x1 0808 e602 | | Load 0x3,0x2 0809 01d7 | | Execute Vector,Field_Read 080a 0237 | 7 | Execute Float,Convert_From_Discrete 080b 5fe8 |_ | Indirect_Literal Float,0x7f4,3.0517578125e-05 080c 023b | ; | Execute Float,Times 080d 5fea |_ | Indirect_Literal Float,0x7f8,100.0 080e 023b | ; | Execute Float,Times 080f 4801 |H | Short_Literal 0x1 0810 e603 | | Load 0x3,0x3 0811 01d7 | | Execute Vector,Field_Read 0812 0237 | 7 | Execute Float,Convert_From_Discrete 0813 5fe0 |_ | Indirect_Literal Float,0x7f4,3.0517578125e-05 0814 023b | ; | Execute Float,Times 0815 023a | : | Execute Float,Divide 0816 023c | < | Execute Float,Minus 0817 e00e | | Load 0x0,0xe 0818 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0819 4501 |E | Exit_Suprogram New_Top_Offset 0x1 081a TRAP_0800: 081a 0007 | | Action Break_Optional 081b 4800 |H | Short_Literal 0x0 081c 4801 |H | Short_Literal 0x1 081d 4809 |H | Short_Literal 0x9 081e 5fd9 |_ | Indirect_Literal Float,0x7f8,100.0 081f e00e | | Load 0x0,0xe 0820 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0821 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0822 0000 0000 | | .BLANK 0000[0x6] 0828 ; -------------------------------------------------------------------------------------- 0828 ; SUBPROGRAM 0828 ; -------------------------------------------------------------------------------------- 0828 082b | + | .CONST 0x082b ; Address of begin 0829 0844 | D | .CONST 0x0844 ; Address of exception handler 082a 0001 | | .CONST 0x0001 ; Number of locals 082b BODY_0828: 082b INIT_0828: 082b 4800 |H | Short_Literal 0x0 082c 4801 |H | Short_Literal 0x1 082d 4809 |H | Short_Literal 0x9 082e 5821 |X! | Indirect_Literal Float,0x850,100.0 082f e605 | | Load 0x3,0x5 0830 0237 | 7 | Execute Float,Convert_From_Discrete 0831 581a |X | Indirect_Literal Float,0x84c,3.0517578125e-05 0832 023b | ; | Execute Float,Times 0833 581c |X | Indirect_Literal Float,0x850,100.0 0834 023b | ; | Execute Float,Times 0835 4800 |H | Short_Literal 0x0 0836 e603 | | Load 0x3,0x3 0837 01d7 | | Execute Vector,Field_Read 0838 4801 |H | Short_Literal 0x1 0839 e603 | | Load 0x3,0x3 083a 01d7 | | Execute Vector,Field_Read 083b 0273 | s | Execute Discrete,Plus 083c 0237 | 7 | Execute Float,Convert_From_Discrete 083d 580e |X | Indirect_Literal Float,0x84c,3.0517578125e-05 083e 023b | ; | Execute Float,Times 083f 023a | : | Execute Float,Divide 0840 023c | < | Execute Float,Minus 0841 e00e | | Load 0x0,0xe 0842 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 0843 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0844 TRAP_0828: 0844 0007 | | Action Break_Optional 0845 4800 |H | Short_Literal 0x0 0846 4801 |H | Short_Literal 0x1 0847 4809 |H | Short_Literal 0x9 0848 5807 |X | Indirect_Literal Float,0x850,100.0 0849 e00e | | Load 0x0,0xe 084a 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 084b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 084c 3f00 0000 |? | .DBL 3.0517578125e-05 084e 0000 0000 | | 0850 4059 0000 |@Y | .DBL 100.0 0852 0000 0000 | | 0854 ; -------------------------------------------------------------------------------------- 0854 ; STRING TABLE 0854 ; -------------------------------------------------------------------------------------- 0854 0078 | x | .STRTAB 0x0078->0x0890 ; "NONE" 0855 007a | z | .STRTAB 0x007a->0x0892 ; "MONDAY" 0856 007e | ~ | .STRTAB 0x007e->0x0895 ; "TUESDAY" 0857 0083 | | .STRTAB 0x0083->0x0898 ; "WEDNESDAY" 0858 008a | | .STRTAB 0x008a->0x089d ; "THURSDAY" 0859 0090 | | .STRTAB 0x0090->0x08a1 ; "FRIDAY" 085a 0094 | | .STRTAB 0x0094->0x08a4 ; "SATURDAY" 085b 009a | | .STRTAB 0x009a->0x08a8 ; "SUNDAY" 085c 009e | | .STRTAB 0x009e->0x08ab ; "PMH" 085d 009f | | .STRTAB 0x009f->0x08ac ; "PMS" 085e 00a0 | | .STRTAB 0x00a0->0x08ae ; "HWC" 085f 00a1 | | .STRTAB 0x00a1->0x08af ; "SWC" 0860 00a2 | | .STRTAB 0x00a2->0x08b1 ; "CRASH" 0861 00a5 | | .STRTAB 0x00a5->0x08b3 ; "HANG" 0862 00a7 | | .STRTAB 0x00a7->0x08b5 ; "MAINT" 0863 00aa | | .STRTAB 0x00aa->0x08b8 ; "RELEASE" 0864 00af | | .STRTAB 0x00af->0x08bb ; "UCC" 0865 00b0 | | .STRTAB 0x00b0->0x08bd ; "COPS" 0866 00b2 | | .STRTAB 0x00b2->0x08bf ; "CSD" 0867 00b3 | | .STRTAB 0x00b3->0x08c0 ; "OTHER" 0868 00b6 | | .STRTAB 0x00b6->0x08c3 ; "CONTRACT" 0869 00bc | | .STRTAB 0x00bc->0x08c7 ; "NON_CONTRACT" 086a 00c6 | | .STRTAB 0x00c6->0x08cd ; "NONE" 086b 00c8 | | .STRTAB 0x00c8->0x08cf ; "MONDAY" 086c 00cc | | .STRTAB 0x00cc->0x08d2 ; "TUESDAY" 086d 00d1 | | .STRTAB 0x00d1->0x08d5 ; "WEDNESDAY" 086e 00d8 | | .STRTAB 0x00d8->0x08da ; "THURSDAY" 086f 00de | | .STRTAB 0x00de->0x08de ; "FRIDAY" 0870 00e2 | | .STRTAB 0x00e2->0x08e1 ; "SATURDAY" 0871 00e8 | | .STRTAB 0x00e8->0x08e5 ; "SUNDAY" 0872 00ec | | .STRTAB 0x00ec->0x08e8 ; "<MINUS_30_DAYS>" 0873 00f9 | | .STRTAB 0x00f9->0x08ef ; "<TODAY>" 0874 00fe | | .STRTAB 0x00fe->0x08f3 ; "Cannot calculate Availability, Starting Date = Ending Date" 0875 0136 | 6 | .STRTAB 0x0136->0x0910 ; "!Machine.Contract_Hours" 0876 014b | K | .STRTAB 0x014b->0x091b ; "others => Unspecified" 0877 015e | ^ | .STRTAB 0x015e->0x0926 ; "24:00" 0878 0161 | a | .STRTAB 0x0161->0x0928 ; "*** Error Parsing !Machine.Contract_Hours" 0879 0188 | | .STRTAB 0x0188->0x093d ; " Using default contract hours." 087a 01a7 | | .STRTAB 0x01a7->0x094d ; "System Availability Report from " 087b 01c6 | | .STRTAB 0x01c6->0x095e ; " to " 087c 01c8 | | .STRTAB 0x01c8->0x0960 ; " [" 087d 01c8 | | .STRTAB 0x01c8->0x0961 ; "Total Contract Hours :" 087e 01e0 | | .STRTAB 0x01e0->0x096e ; "Total Non Contract Hours :" 087f 01f8 | | .STRTAB 0x01f8->0x097b ; " ==========" 0880 021b | | .STRTAB 0x021b->0x098d ; "Total Hours :" 0881 0233 | 3 | .STRTAB 0x0233->0x099a ; "Contract" 0882 0239 | 9 | .STRTAB 0x0239->0x099e ; "Non Con" 0883 023e | > | .STRTAB 0x023e->0x09a2 ; "Total" 0884 0241 | A | .STRTAB 0x0241->0x09a4 ; " :" 0885 0241 | A | .STRTAB 0x0241->0x09a5 ; "========" 0886 0247 | G | .STRTAB 0x0247->0x09a9 ; "Total :" 0887 024c | L | .STRTAB 0x024c->0x09ad ; "Available :" 0888 0255 | U | .STRTAB 0x0255->0x09b2 ; "Grand Total" 0889 025e | ^ | .STRTAB 0x025e->0x09b8 ; "Uptime :" 088a 0264 | d | .STRTAB 0x0264->0x09bc ; "Contract Hours" 088b 0270 | p | .STRTAB 0x0270->0x09c3 ; "==============" 088c 027c | | | .STRTAB 0x027c->0x09ca ; " " 088d 027e | ~ | .STRTAB 0x027e->0x09cc ; " : " 088e 027f | | .STRTAB 0x027f->0x09cd ; "None" 088f 0281 | | .STREND 0x0281->0x09cf 0890 4e4f 4e45 |NONE| .STRTAB_STRINGS 09d0 ; -------------------------------------------------------------------------------------- 09d0 ; Debug Table 09d0 ; -------------------------------------------------------------------------------------- 09d0 0004 0011 | | .DEBUG4 0x0004,0x0011,0x9c90,0x0000,0x0001,0x0000 09d6 0000 0000 | | .BLANK 0000[0x2a]