|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 05c0 | | .CONST 0x05c0 ; 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 0216 | | .CONST 0x0216 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 005e | ^ | .CONST 0x005e ; Number of locals 000b INIT_0008: 000b e002 | | Load 0x0,0x2 000c 0129 | ) | Execute Any,Make_Visible 000d 00e1 | | Load_Encached Boolean_Cache 000e 0400 | | Execute_Immediate Set_Value_Visible_Unchecked,0x0 000f e003 | | Load 0x0,0x3 0010 0129 | ) | Execute Any,Make_Visible 0011 e004 | | Load 0x0,0x4 0012 0321 | ! | Declare_Variable Record,Visible 0013 e003 | | Load 0x0,0x3 0014 0129 | ) | Execute Any,Make_Visible 0015 e005 | | Load 0x0,0x5 0016 0129 | ) | Execute Any,Make_Visible 0017 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 0019 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 001b 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 001d 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 001f 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 0021 4808 |H | Short_Literal 0x8 0022 e001 | | Load 0x0,0x1 0023 01d7 | | Execute Vector,Field_Read 0024 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 0025 00bf | | Action Accept_Activation 0026 0007 | | Action Break_Optional 0027 0007 | | Action Break_Optional 0028 0007 | | Action Break_Optional 0029 0007 | | Action Break_Optional 002a 0007 | | Action Break_Optional 002b 0007 | | Action Break_Optional 002c 4800 |H | Short_Literal 0x0 002d 481f |H | Short_Literal 0x1f 002e e006 | | Load 0x0,0x6 002f 0334 | 4 | Declare_Variable Array,With_Constraint 0030 4800 |H | Short_Literal 0x0 0031 4800 |H | Short_Literal 0x0 0032 00da | | Load_Top At_Offset_2 0033 01d6 | | Execute Vector,Field_Write 0034 4800 |H | Short_Literal 0x0 0035 4801 |H | Short_Literal 0x1 0036 00da | | Load_Top At_Offset_2 0037 01d6 | | Execute Vector,Field_Write 0038 4880 |H | Short_Literal 0x80 0039 4802 |H | Short_Literal 0x2 003a 00da | | Load_Top At_Offset_2 003b 01d6 | | Execute Vector,Field_Write 003c 4801 |H | Short_Literal 0x1 003d 4803 |H | Short_Literal 0x3 003e 00da | | Load_Top At_Offset_2 003f 01d6 | | Execute Vector,Field_Write 0040 48c0 |H | Short_Literal 0xc0 0041 4804 |H | Short_Literal 0x4 0042 00da | | Load_Top At_Offset_2 0043 01d6 | | Execute Vector,Field_Write 0044 4803 |H | Short_Literal 0x3 0045 4805 |H | Short_Literal 0x5 0046 00da | | Load_Top At_Offset_2 0047 01d6 | | Execute Vector,Field_Write 0048 48e0 |H | Short_Literal 0xe0 0049 4806 |H | Short_Literal 0x6 004a 00da | | Load_Top At_Offset_2 004b 01d6 | | Execute Vector,Field_Write 004c 4807 |H | Short_Literal 0x7 004d 4807 |H | Short_Literal 0x7 004e 00da | | Load_Top At_Offset_2 004f 01d6 | | Execute Vector,Field_Write 0050 4880 |H | Short_Literal 0x80 0051 4808 |H | Short_Literal 0x8 0052 00da | | Load_Top At_Offset_2 0053 01d6 | | Execute Vector,Field_Write 0054 4801 |H | Short_Literal 0x1 0055 4809 |H | Short_Literal 0x9 0056 00da | | Load_Top At_Offset_2 0057 01d6 | | Execute Vector,Field_Write 0058 4888 |H | Short_Literal 0x88 0059 480a |H | Short_Literal 0xa 005a 00da | | Load_Top At_Offset_2 005b 01d6 | | Execute Vector,Field_Write 005c 4811 |H | Short_Literal 0x11 005d 480b |H | Short_Literal 0xb 005e 00da | | Load_Top At_Offset_2 005f 01d6 | | Execute Vector,Field_Write 0060 488c |H | Short_Literal 0x8c 0061 480c |H | Short_Literal 0xc 0062 00da | | Load_Top At_Offset_2 0063 01d6 | | Execute Vector,Field_Write 0064 4831 |H1 | Short_Literal 0x31 0065 480d |H | Short_Literal 0xd 0066 00da | | Load_Top At_Offset_2 0067 01d6 | | Execute Vector,Field_Write 0068 48fe |H | Short_Literal 0xfe 0069 480e |H | Short_Literal 0xe 006a 00da | | Load_Top At_Offset_2 006b 01d6 | | Execute Vector,Field_Write 006c 487f |H | Short_Literal 0x7f 006d 480f |H | Short_Literal 0xf 006e 00da | | Load_Top At_Offset_2 006f 01d6 | | Execute Vector,Field_Write 0070 48fe |H | Short_Literal 0xfe 0071 4810 |H | Short_Literal 0x10 0072 00da | | Load_Top At_Offset_2 0073 01d6 | | Execute Vector,Field_Write 0074 487f |H | Short_Literal 0x7f 0075 4811 |H | Short_Literal 0x11 0076 00da | | Load_Top At_Offset_2 0077 01d6 | | Execute Vector,Field_Write 0078 488c |H | Short_Literal 0x8c 0079 4812 |H | Short_Literal 0x12 007a 00da | | Load_Top At_Offset_2 007b 01d6 | | Execute Vector,Field_Write 007c 4831 |H1 | Short_Literal 0x31 007d 4813 |H | Short_Literal 0x13 007e 00da | | Load_Top At_Offset_2 007f 01d6 | | Execute Vector,Field_Write 0080 4888 |H | Short_Literal 0x88 0081 4814 |H | Short_Literal 0x14 0082 00da | | Load_Top At_Offset_2 0083 01d6 | | Execute Vector,Field_Write 0084 4811 |H | Short_Literal 0x11 0085 4815 |H | Short_Literal 0x15 0086 00da | | Load_Top At_Offset_2 0087 01d6 | | Execute Vector,Field_Write 0088 4880 |H | Short_Literal 0x80 0089 4816 |H | Short_Literal 0x16 008a 00da | | Load_Top At_Offset_2 008b 01d6 | | Execute Vector,Field_Write 008c 4801 |H | Short_Literal 0x1 008d 4817 |H | Short_Literal 0x17 008e 00da | | Load_Top At_Offset_2 008f 01d6 | | Execute Vector,Field_Write 0090 48e0 |H | Short_Literal 0xe0 0091 4818 |H | Short_Literal 0x18 0092 00da | | Load_Top At_Offset_2 0093 01d6 | | Execute Vector,Field_Write 0094 4807 |H | Short_Literal 0x7 0095 4819 |H | Short_Literal 0x19 0096 00da | | Load_Top At_Offset_2 0097 01d6 | | Execute Vector,Field_Write 0098 48c0 |H | Short_Literal 0xc0 0099 481a |H | Short_Literal 0x1a 009a 00da | | Load_Top At_Offset_2 009b 01d6 | | Execute Vector,Field_Write 009c 4803 |H | Short_Literal 0x3 009d 481b |H | Short_Literal 0x1b 009e 00da | | Load_Top At_Offset_2 009f 01d6 | | Execute Vector,Field_Write 00a0 4880 |H | Short_Literal 0x80 00a1 481c |H | Short_Literal 0x1c 00a2 00da | | Load_Top At_Offset_2 00a3 01d6 | | Execute Vector,Field_Write 00a4 4801 |H | Short_Literal 0x1 00a5 481d |H | Short_Literal 0x1d 00a6 00da | | Load_Top At_Offset_2 00a7 01d6 | | Execute Vector,Field_Write 00a8 4800 |H | Short_Literal 0x0 00a9 481e |H | Short_Literal 0x1e 00aa 00da | | Load_Top At_Offset_2 00ab 01d6 | | Execute Vector,Field_Write 00ac 4800 |H | Short_Literal 0x0 00ad 481f |H | Short_Literal 0x1f 00ae 00da | | Load_Top At_Offset_2 00af 01d6 | | Execute Vector,Field_Write 00b0 0007 | | Action Break_Optional 00b1 0007 | | Action Break_Optional 00b2 4800 |H | Short_Literal 0x0 00b3 481f |H | Short_Literal 0x1f 00b4 e006 | | Load 0x0,0x6 00b5 0334 | 4 | Declare_Variable Array,With_Constraint 00b6 48c0 |H | Short_Literal 0xc0 00b7 4800 |H | Short_Literal 0x0 00b8 00da | | Load_Top At_Offset_2 00b9 01d6 | | Execute Vector,Field_Write 00ba 4803 |H | Short_Literal 0x3 00bb 4801 |H | Short_Literal 0x1 00bc 00da | | Load_Top At_Offset_2 00bd 01d6 | | Execute Vector,Field_Write 00be 48c0 |H | Short_Literal 0xc0 00bf 4802 |H | Short_Literal 0x2 00c0 00da | | Load_Top At_Offset_2 00c1 01d6 | | Execute Vector,Field_Write 00c2 4803 |H | Short_Literal 0x3 00c3 4803 |H | Short_Literal 0x3 00c4 00da | | Load_Top At_Offset_2 00c5 01d6 | | Execute Vector,Field_Write 00c6 48e0 |H | Short_Literal 0xe0 00c7 4804 |H | Short_Literal 0x4 00c8 00da | | Load_Top At_Offset_2 00c9 01d6 | | Execute Vector,Field_Write 00ca 4807 |H | Short_Literal 0x7 00cb 4805 |H | Short_Literal 0x5 00cc 00da | | Load_Top At_Offset_2 00cd 01d6 | | Execute Vector,Field_Write 00ce 48f0 |H | Short_Literal 0xf0 00cf 4806 |H | Short_Literal 0x6 00d0 00da | | Load_Top At_Offset_2 00d1 01d6 | | Execute Vector,Field_Write 00d2 480f |H | Short_Literal 0xf 00d3 4807 |H | Short_Literal 0x7 00d4 00da | | Load_Top At_Offset_2 00d5 01d6 | | Execute Vector,Field_Write 00d6 48e8 |H | Short_Literal 0xe8 00d7 4808 |H | Short_Literal 0x8 00d8 00da | | Load_Top At_Offset_2 00d9 01d6 | | Execute Vector,Field_Write 00da 4817 |H | Short_Literal 0x17 00db 4809 |H | Short_Literal 0x9 00dc 00da | | Load_Top At_Offset_2 00dd 01d6 | | Execute Vector,Field_Write 00de 48dc |H | Short_Literal 0xdc 00df 480a |H | Short_Literal 0xa 00e0 00da | | Load_Top At_Offset_2 00e1 01d6 | | Execute Vector,Field_Write 00e2 483b |H; | Short_Literal 0x3b 00e3 480b |H | Short_Literal 0xb 00e4 00da | | Load_Top At_Offset_2 00e5 01d6 | | Execute Vector,Field_Write 00e6 48ff |H | Short_Literal 0xff 00e7 480c |H | Short_Literal 0xc 00e8 00da | | Load_Top At_Offset_2 00e9 01d6 | | Execute Vector,Field_Write 00ea 48ff |H | Short_Literal 0xff 00eb 480d |H | Short_Literal 0xd 00ec 00da | | Load_Top At_Offset_2 00ed 01d6 | | Execute Vector,Field_Write 00ee 48ff |H | Short_Literal 0xff 00ef 480e |H | Short_Literal 0xe 00f0 00da | | Load_Top At_Offset_2 00f1 01d6 | | Execute Vector,Field_Write 00f2 48ff |H | Short_Literal 0xff 00f3 480f |H | Short_Literal 0xf 00f4 00da | | Load_Top At_Offset_2 00f5 01d6 | | Execute Vector,Field_Write 00f6 48ff |H | Short_Literal 0xff 00f7 4810 |H | Short_Literal 0x10 00f8 00da | | Load_Top At_Offset_2 00f9 01d6 | | Execute Vector,Field_Write 00fa 48ff |H | Short_Literal 0xff 00fb 4811 |H | Short_Literal 0x11 00fc 00da | | Load_Top At_Offset_2 00fd 01d6 | | Execute Vector,Field_Write 00fe 48ff |H | Short_Literal 0xff 00ff 4812 |H | Short_Literal 0x12 0100 00da | | Load_Top At_Offset_2 0101 01d6 | | Execute Vector,Field_Write 0102 48ff |H | Short_Literal 0xff 0103 4813 |H | Short_Literal 0x13 0104 00da | | Load_Top At_Offset_2 0105 01d6 | | Execute Vector,Field_Write 0106 48dc |H | Short_Literal 0xdc 0107 4814 |H | Short_Literal 0x14 0108 00da | | Load_Top At_Offset_2 0109 01d6 | | Execute Vector,Field_Write 010a 483b |H; | Short_Literal 0x3b 010b 4815 |H | Short_Literal 0x15 010c 00da | | Load_Top At_Offset_2 010d 01d6 | | Execute Vector,Field_Write 010e 48e8 |H | Short_Literal 0xe8 010f 4816 |H | Short_Literal 0x16 0110 00da | | Load_Top At_Offset_2 0111 01d6 | | Execute Vector,Field_Write 0112 4817 |H | Short_Literal 0x17 0113 4817 |H | Short_Literal 0x17 0114 00da | | Load_Top At_Offset_2 0115 01d6 | | Execute Vector,Field_Write 0116 48f0 |H | Short_Literal 0xf0 0117 4818 |H | Short_Literal 0x18 0118 00da | | Load_Top At_Offset_2 0119 01d6 | | Execute Vector,Field_Write 011a 480f |H | Short_Literal 0xf 011b 4819 |H | Short_Literal 0x19 011c 00da | | Load_Top At_Offset_2 011d 01d6 | | Execute Vector,Field_Write 011e 48e0 |H | Short_Literal 0xe0 011f 481a |H | Short_Literal 0x1a 0120 00da | | Load_Top At_Offset_2 0121 01d6 | | Execute Vector,Field_Write 0122 4807 |H | Short_Literal 0x7 0123 481b |H | Short_Literal 0x1b 0124 00da | | Load_Top At_Offset_2 0125 01d6 | | Execute Vector,Field_Write 0126 48c0 |H | Short_Literal 0xc0 0127 481c |H | Short_Literal 0x1c 0128 00da | | Load_Top At_Offset_2 0129 01d6 | | Execute Vector,Field_Write 012a 4803 |H | Short_Literal 0x3 012b 481d |H | Short_Literal 0x1d 012c 00da | | Load_Top At_Offset_2 012d 01d6 | | Execute Vector,Field_Write 012e 48c0 |H | Short_Literal 0xc0 012f 481e |H | Short_Literal 0x1e 0130 00da | | Load_Top At_Offset_2 0131 01d6 | | Execute Vector,Field_Write 0132 4803 |H | Short_Literal 0x3 0133 481f |H | Short_Literal 0x1f 0134 00da | | Load_Top At_Offset_2 0135 01d6 | | Execute Vector,Field_Write 0136 0093 0000 | | push_full_address 0x0 0138 60ef |` | Indirect_Literal Discrete,0x228,{0x80000000, 0x00010000} 0139 0273 | s | Execute Discrete,Plus 013a 0007 | | Action Break_Optional 013b 0007 | | Action Break_Optional 013c 0007 | | Action Break_Optional 013d 0007 | | Action Break_Optional 013e 0007 | | Action Break_Optional 013f 0007 | | Action Break_Optional 0140 0007 | | Action Break_Optional 0141 0007 | | Action Break_Optional 0142 0007 | | Action Break_Optional 0143 0007 | | Action Break_Optional 0144 00e1 | | Load_Encached Boolean_Cache 0145 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0146 4800 |H | Short_Literal 0x0 0147 4802 |H | Short_Literal 0x2 0148 029f 0283 | | Declare_Subprogram INIT_0280,For_Call 014a 03fd | | Declare_Type Discrete,Defined 014b e007 | | Load 0x0,0x7 014c 060a | | Execute_Immediate Set_Value_Unchecked,0xa 014d e007 | | Load 0x0,0x7 014e 060a | | Execute_Immediate Set_Value_Unchecked,0xa 014f e007 | | Load 0x0,0x7 0150 0007 | | Action Break_Optional 0151 e007 | | Load 0x0,0x7 0152 0007 | | Action Break_Optional 0153 e007 | | Load 0x0,0x7 0154 0007 | | Action Break_Optional 0155 e007 | | Load 0x0,0x7 0156 0007 | | Action Break_Optional 0157 e007 | | Load 0x0,0x7 0158 0007 | | Action Break_Optional 0159 e007 | | Load 0x0,0x7 015a 0007 | | Action Break_Optional 015b e007 | | Load 0x0,0x7 015c 0007 | | Action Break_Optional 015d e007 | | Load 0x0,0x7 015e 0007 | | Action Break_Optional 015f e008 | | Load 0x0,0x8 0160 e007 | | Load 0x0,0x7 0161 00d8 | | Load_Top At_Offset_0 0162 e007 | | Load 0x0,0x7 0163 00d8 | | Load_Top At_Offset_0 0164 e007 | | Load 0x0,0x7 0165 00d8 | | Load_Top At_Offset_0 0166 02a0 | | Declare_Subprogram Null_Subprogram 0167 4807 |H | Short_Literal 0x7 0168 032d | - | Declare_Type Record,Defined 0169 00d8 | | Load_Top At_Offset_0 016a 0322 | " | Declare_Variable Record 016b e008 | | Load 0x0,0x8 016c 0322 | " | Declare_Variable Record 016d e008 | | Load 0x0,0x8 016e 0322 | " | Declare_Variable Record 016f e009 | | Load 0x0,0x9 0170 00d9 | | Load_Top At_Offset_1 0171 017d | } | Execute Record,Structure_Write 0172 e008 | | Load 0x0,0x8 0173 0322 | " | Declare_Variable Record 0174 e008 | | Load 0x0,0x8 0175 0322 | " | Declare_Variable Record 0176 e008 | | Load 0x0,0x8 0177 0322 | " | Declare_Variable Record 0178 4800 |H | Short_Literal 0x0 0179 4810 |H | Short_Literal 0x10 017a e00a | | Load 0x0,0xa 017b 0334 | 4 | Declare_Variable Array,With_Constraint 017c 50af |P | Indirect_Literal Any,0x22c,{0x66697865, 0x642d7363} 017d 4800 |H | Short_Literal 0x0 017e 4810 |H | Short_Literal 0x10 017f e00a | | Load 0x0,0xa 0180 0334 | 4 | Declare_Variable Array,With_Constraint 0181 50b6 |P | Indirect_Literal Any,0x238,{0x66697865, 0x642d7363} 0182 e00b | | Load 0x0,0xb 0183 0007 | | Action Break_Optional 0184 e00b | | Load 0x0,0xb 0185 0007 | | Action Break_Optional 0186 00e1 | | Load_Encached Boolean_Cache 0187 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0188 00e1 | | Load_Encached Boolean_Cache 0189 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 018a e00c | | Load 0x0,0xc 018b 0266 | f | Execute Discrete,Bounds 018c e00d | | Load 0x0,0xd 018d 02a0 | | Declare_Subprogram Null_Subprogram 018e 4801 |H | Short_Literal 0x1 018f 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0190 e00c | | Load 0x0,0xc 0191 0007 | | Action Break_Optional 0192 e00c | | Load 0x0,0xc 0193 0007 | | Action Break_Optional 0194 4800 |H | Short_Literal 0x0 0195 4be7 |K | Short_Literal 0x3e7 0196 e00e | | Load 0x0,0xe 0197 035b | [ | Declare_Type Array,Constrained 0198 0337 | 7 | Declare_Variable Array 0199 4800 |H | Short_Literal 0x0 019a 4be7 |K | Short_Literal 0x3e7 019b e00e | | Load 0x0,0xe 019c 035b | [ | Declare_Type Array,Constrained 019d 0337 | 7 | Declare_Variable Array 019e 6085 |` | Indirect_Literal Discrete,0x224,{0x00000000, 0x0000ffff} 019f e007 | | Load 0x0,0x7 01a0 03f1 | | Declare_Variable Discrete,With_Value 01a1 6082 |` | Indirect_Literal Discrete,0x224,{0x00000000, 0x0000ffff} 01a2 e007 | | Load 0x0,0x7 01a3 03f1 | | Declare_Variable Discrete,With_Value 01a4 029d 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call 01a6 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call 01a8 029d 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call 01aa 029d 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call 01ac 029d 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call 01ae 029d 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call 01b0 029d 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call 01b2 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call 01b4 029d 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call 01b6 029d 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call 01b8 029d 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call 01ba 029d 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call 01bc 1d13 | | Execute_Immediate Reference_Lex_1,0x13 01bd 00c7 | | Action Elaborate_Subprogram 01be 029d 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call 01c0 029d 038b | | Declare_Subprogram INIT_0388,For_Outer_Call 01c2 029d 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call 01c4 029d 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call 01c6 480e |H | Short_Literal 0xe 01c7 e001 | | Load 0x0,0x1 01c8 01d7 | | Execute Vector,Field_Read 01c9 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 01ca 029d 040b | | Declare_Subprogram INIT_0408,For_Outer_Call 01cc 480c |H | Short_Literal 0xc 01cd e001 | | Load 0x0,0x1 01ce 01d7 | | Execute Vector,Field_Read 01cf 02a9 | | Declare_Subprogram For_Call,Unelaborated,With_Address 01d0 1d17 | | Execute_Immediate Reference_Lex_1,0x17 01d1 00c7 | | Action Elaborate_Subprogram 01d2 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e 01d3 00c7 | | Action Elaborate_Subprogram 01d4 4812 |H | Short_Literal 0x12 01d5 e001 | | Load 0x0,0x1 01d6 01d7 | | Execute Vector,Field_Read 01d7 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 01d8 029d 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call 01da 4802 |H | Short_Literal 0x2 01db e001 | | Load 0x0,0x1 01dc 01d7 | | Execute Vector,Field_Read 01dd 02a9 | | Declare_Subprogram For_Call,Unelaborated,With_Address 01de 029b 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call,Unelaborated 01e0 4810 |H | Short_Literal 0x10 01e1 e001 | | Load 0x0,0x1 01e2 01d7 | | Execute Vector,Field_Read 01e3 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 01e4 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 01e5 00c7 | | Action Elaborate_Subprogram 01e6 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 01e7 00c7 | | Action Elaborate_Subprogram 01e8 029b 049b | | Declare_Subprogram INIT_0498,For_Outer_Call,Unelaborated 01ea 029b 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Unelaborated 01ec 029d 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call 01ee 029d 04d3 | | Declare_Subprogram INIT_04d0,For_Outer_Call 01f0 480a |H | Short_Literal 0xa 01f1 e001 | | Load 0x0,0x1 01f2 01d7 | | Execute Vector,Field_Read 01f3 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 01f4 029d 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call 01f6 029b 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Unelaborated 01f8 029b 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Unelaborated 01fa 029d 058b | | Declare_Subprogram INIT_0588,For_Outer_Call 01fc 1d15 | | Execute_Immediate Reference_Lex_1,0x15 01fd 00c7 | | Action Elaborate_Subprogram 01fe 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a 01ff 00c7 | | Action Elaborate_Subprogram 0200 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b 0201 00c7 | | Action Elaborate_Subprogram 0202 4806 |H | Short_Literal 0x6 0203 e001 | | Load 0x0,0x1 0204 01d7 | | Execute Vector,Field_Read 0205 02a5 | | Declare_Subprogram For_Outer_Call,With_Address 0206 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0207 00c7 | | Action Elaborate_Subprogram 0208 4804 |H | Short_Literal 0x4 0209 e001 | | Load 0x0,0x1 020a 01d7 | | Execute Vector,Field_Read 020b 02a9 | | Declare_Subprogram For_Call,Unelaborated,With_Address 020c 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 020d 00c7 | | Action Elaborate_Subprogram 020e 1d14 | | Execute_Immediate Reference_Lex_1,0x14 020f 00c7 | | Action Elaborate_Subprogram 0210 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 0211 00c7 | | Action Elaborate_Subprogram 0212 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0213 00c7 | | Action Elaborate_Subprogram 0214 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e 0215 00c7 | | Action Elaborate_Subprogram 0216 BODY_0008: 0216 00bc | | Action Signal_Activated 0217 00bb | | Action Signal_Completion 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021b | | .CONST 0x021b ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0001 | | .CONST 0x0001 ; Number of locals 021b BODY_0218: 021b INIT_0218: 021b e20d | | Load 0x1,0xd 021c 800f | | Call 0x0,0xf 021d 00d8 | | Load_Top At_Offset_0 021e e00c | | Load 0x0,0xc 021f 0260 | ` | Execute Discrete,In_Type 0220 7001 |p | Jump_Nonzero 0x222 0221 0801 | | Execute_Immediate Raise,0x1 0222 00ca | | Action Exit_Nullary_Function 0223 0000 | | .XXX[0x1] 0224 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 0228 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 022c 6669 7865 |fixe| .LITERAL {0x66697865, 0x642d7363} 0230 7265 656e |reen| .XXX[0x8] 0232 2d72 2d31 |-r-1| 0234 3300 0000 |3 | 0236 0000 0000 | | 0238 6669 7865 |fixe| .LITERAL {0x66697865, 0x642d7363} 023c 7265 656e |reen| .XXX[0x5] 023e 2d62 2d31 |-b-1| 0240 3300 |3 | 0241 0000 0000 | | .BLANK 0000[0x7] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b 0008 | | Action Idle 024c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 024d 0000 0000 | | .XXX[0x3] 024f 0000 | | 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0257 | W | .CONST 0x0257 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0002 | | .CONST 0x0002 ; Number of locals 0253 INIT_0250: 0253 e010 | | Load 0x0,0x10 0254 02ff | | Declare_Variable Variant_Record 0255 00d8 | | Load_Top At_Offset_0 0256 1c00 | | Execute_Immediate Run_Utility,0x0 0257 BODY_0250: 0257 00cf | | Action Mark_Auxiliary 0258 7807 |x | Jump 0x260 0259 00d9 | | Load_Top At_Offset_1 025a 825a | Z | Call 0x1,0x5a 025b 00d1 | | Pop_Control Pop_Count_1 025c 00d9 | | Load_Top At_Offset_1 025d 825b | [ | Call 0x1,0x5b 025e 00d1 | | Pop_Control Pop_Count_1 025f 00c9 | | Action Pop_Auxiliary_Loop 0260 e20d | | Load 0x1,0xd 0261 800f | | Call 0x0,0xf 0262 77f6 |w | Jump_Nonzero 0x259 0263 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0264 0000 0000 | | .BLANK 0000[0x4] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b e5fb | | Load 0x2,-0x5 026c e5fc | | Load 0x2,-0x4 026d e5fd | | Load 0x2,-0x3 026e e5fe | | Load 0x2,-0x2 026f e5ff | | Load 0x2,-0x1 0270 825e | ^ | Call 0x1,0x5e 0271 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0272 0000 0000 | | .BLANK 0000[0x6] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027b | { | .CONST 0x027b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0001 | | .CONST 0x0001 ; Number of locals 027b BODY_0278: 027b INIT_0278: 027b 824e | N | Call 0x1,0x4e 027c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 027d 0000 0000 | | .XXX[0x3] 027f 0000 | | 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 4607 |F | Jump_Case 0x8 0284 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0285 7807 |x | Jump 0x28d ; case 0x1 0286 780a |x | Jump 0x291 ; case 0x2 0287 780e |x | Jump 0x296 ; case 0x3 0288 7811 |x | Jump 0x29a ; case 0x4 0289 7812 |x | Jump 0x29c ; case 0x5 028a 7813 |x | Jump 0x29e ; case 0x6 028b 7816 |x | Jump 0x2a2 ; case 0x7 028c 4302 |C | .XXX[0x1] 028d 00da | | Load_Top At_Offset_2 028e 0091 0599 | | Action Push_String_Extended_Indexed,0x599 ; "TITLE_TILES" 0290 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0291 00db | | Load_Top At_Offset_3 0292 00db | | Load_Top At_Offset_3 0293 00e0 | | Load_Encached Standard_Cache 0294 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0295 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0296 00da | | Load_Top At_Offset_2 0297 00e0 | | Load_Encached Standard_Cache 0298 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0299 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 029a 00db | | Load_Top At_Offset_3 029b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 029c 00db | | Load_Top At_Offset_3 029d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 029e e21d | | Load 0x1,0x1d 029f 00dc | | Load_Top At_Offset_4 02a0 0267 | g | Execute Discrete,Predecessor 02a1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a2 e21d | | Load 0x1,0x1d 02a3 00dc | | Load_Top At_Offset_4 02a4 0268 | h | Execute Discrete,Successor 02a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a6 0000 0000 | | .XXX[0x2] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 00db | | Load_Top At_Offset_3 02ac e011 | | Load 0x0,0x11 02ad 0271 | q | Execute Discrete,Times 02ae 00db | | Load_Top At_Offset_3 02af 0273 | s | Execute Discrete,Plus 02b0 00d8 | | Load_Top At_Offset_0 02b1 e007 | | Load 0x0,0x7 02b2 0260 | ` | Execute Discrete,In_Type 02b3 7001 |p | Jump_Nonzero 0x2b5 02b4 0801 | | Execute_Immediate Raise,0x1 02b5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02b6 0000 0000 | | .XXX[0x2] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bb | | .CONST 0x02bb ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0001 | | .CONST 0x0001 ; Number of locals 02bb BODY_02b8: 02bb INIT_02b8: 02bb 00da | | Load_Top At_Offset_2 02bc 4830 |H0 | Short_Literal 0x30 02bd 4839 |H9 | Short_Literal 0x39 02be 0262 | b | Execute Discrete,In_Range 02bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 00da | | Load_Top At_Offset_2 02c4 e221 | ! | Load 0x1,0x21 02c5 0271 | q | Execute Discrete,Times 02c6 00d8 | | Load_Top At_Offset_0 02c7 e007 | | Load 0x0,0x7 02c8 0260 | ` | Execute Discrete,In_Type 02c9 7001 |p | Jump_Nonzero 0x2cb 02ca 0801 | | Execute_Immediate Raise,0x1 02cb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02cc 0000 0000 | | .BLANK 0000[0x4] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 00da | | Load_Top At_Offset_2 02d4 e221 | ! | Load 0x1,0x21 02d5 0271 | q | Execute Discrete,Times 02d6 00d8 | | Load_Top At_Offset_0 02d7 e007 | | Load 0x0,0x7 02d8 0260 | ` | Execute Discrete,In_Type 02d9 7001 |p | Jump_Nonzero 0x2db 02da 0801 | | Execute_Immediate Raise,0x1 02db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02dc 0000 0000 | | .BLANK 0000[0x4] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 00da | | Load_Top At_Offset_2 02e4 0a01 | | Execute_Immediate Plus,0x1 02e5 e221 | ! | Load 0x1,0x21 02e6 0271 | q | Execute Discrete,Times 02e7 0aff | | Execute_Immediate Plus,-0x1 02e8 00d8 | | Load_Top At_Offset_0 02e9 e007 | | Load 0x0,0x7 02ea 0260 | ` | Execute Discrete,In_Type 02eb 7001 |p | Jump_Nonzero 0x2ed 02ec 0801 | | Execute_Immediate Raise,0x1 02ed 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02ee 0000 0000 | | .XXX[0x2] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 00da | | Load_Top At_Offset_2 02f4 0a01 | | Execute_Immediate Plus,0x1 02f5 e221 | ! | Load 0x1,0x21 02f6 0271 | q | Execute Discrete,Times 02f7 0aff | | Execute_Immediate Plus,-0x1 02f8 00d8 | | Load_Top At_Offset_0 02f9 e007 | | Load 0x0,0x7 02fa 0260 | ` | Execute Discrete,In_Type 02fb 7001 |p | Jump_Nonzero 0x2fd 02fc 0801 | | Execute_Immediate Raise,0x1 02fd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02fe 0000 0000 | | .XXX[0x2] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 00db | | Load_Top At_Offset_3 0304 e220 | | Load 0x1,0x20 0305 0271 | q | Execute Discrete,Times 0306 00d8 | | Load_Top At_Offset_0 0307 e007 | | Load 0x0,0x7 0308 0260 | ` | Execute Discrete,In_Type 0309 7001 |p | Jump_Nonzero 0x30b 030a 0801 | | Execute_Immediate Raise,0x1 030b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 030c 0000 0000 | | .BLANK 0000[0x4] 0310 ; -------------------------------------------------------------------------------------- 0310 ; SUBPROGRAM 0310 ; -------------------------------------------------------------------------------------- 0310 0313 | | .CONST 0x0313 ; Address of begin 0311 0004 | | .CONST 0x0004 ; Address of exception handler 0312 0001 | | .CONST 0x0001 ; Number of locals 0313 BODY_0310: 0313 INIT_0310: 0313 00db | | Load_Top At_Offset_3 0314 e220 | | Load 0x1,0x20 0315 0271 | q | Execute Discrete,Times 0316 00d8 | | Load_Top At_Offset_0 0317 e007 | | Load 0x0,0x7 0318 0260 | ` | Execute Discrete,In_Type 0319 7001 |p | Jump_Nonzero 0x31b 031a 0801 | | Execute_Immediate Raise,0x1 031b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 031c 0000 0000 | | .BLANK 0000[0x4] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0323 | # | .CONST 0x0323 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0001 | | .CONST 0x0001 ; Number of locals 0323 BODY_0320: 0323 INIT_0320: 0323 00db | | Load_Top At_Offset_3 0324 0a01 | | Execute_Immediate Plus,0x1 0325 e220 | | Load 0x1,0x20 0326 0271 | q | Execute Discrete,Times 0327 0aff | | Execute_Immediate Plus,-0x1 0328 00d8 | | Load_Top At_Offset_0 0329 e007 | | Load 0x0,0x7 032a 0260 | ` | Execute Discrete,In_Type 032b 7001 |p | Jump_Nonzero 0x32d 032c 0801 | | Execute_Immediate Raise,0x1 032d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 032e 0000 0000 | | .XXX[0x2] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0333 | 3 | .CONST 0x0333 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0001 | | .CONST 0x0001 ; Number of locals 0333 BODY_0330: 0333 INIT_0330: 0333 00db | | Load_Top At_Offset_3 0334 0a01 | | Execute_Immediate Plus,0x1 0335 e220 | | Load 0x1,0x20 0336 0271 | q | Execute Discrete,Times 0337 0aff | | Execute_Immediate Plus,-0x1 0338 00d8 | | Load_Top At_Offset_0 0339 e007 | | Load 0x0,0x7 033a 0260 | ` | Execute Discrete,In_Type 033b 7001 |p | Jump_Nonzero 0x33d 033c 0801 | | Execute_Immediate Raise,0x1 033d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 033e 0000 0000 | | .XXX[0x2] 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 00da | | Load_Top At_Offset_2 0344 e5fe | | Load 0x2,-0x2 0345 027d | } | Execute Discrete,Greater 0346 6802 |h | Jump_Zero 0x349 0347 00da | | Load_Top At_Offset_2 0348 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0349 00db | | Load_Top At_Offset_3 034a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 034b 0000 0000 | | .BLANK 0000[0x5] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 00da | | Load_Top At_Offset_2 0354 e5fe | | Load 0x2,-0x2 0355 027c | | | Execute Discrete,Less 0356 6802 |h | Jump_Zero 0x359 0357 00da | | Load_Top At_Offset_2 0358 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0359 00db | | Load_Top At_Offset_3 035a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 035b 0000 0000 | | .BLANK 0000[0x5] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0369 | i | .CONST 0x0369 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0003 | | .CONST 0x0003 ; Number of locals 0363 INIT_0360: 0363 e012 | | Load 0x0,0x12 0364 0322 | " | Declare_Variable Record 0365 00d8 | | Load_Top At_Offset_0 0366 1c00 | | Execute_Immediate Run_Utility,0x0 0367 00db | | Load_Top At_Offset_3 0368 8013 | | Call 0x0,0x13 0369 BODY_0360: 0369 00d9 | | Load_Top At_Offset_1 036a e002 | | Load 0x0,0x2 036b 00da | | Load_Top At_Offset_2 036c 8014 | | Call 0x0,0x14 036d c20d | | Store 0x1,0xd 036e 00d1 | | Pop_Control Pop_Count_1 036f e20d | | Load 0x1,0xd 0370 e002 | | Load 0x0,0x2 0371 022f | / | Execute Access,Equal 0372 680f |h | Jump_Zero 0x382 0373 0092 059c | | Action Push_String_Extended,0x59c ; "Unable to open display: " 0375 e5ff | | Load 0x2,-0x1 0376 8015 | | Call 0x0,0x15 0377 01cc | | Execute Vector,Catenate 0378 0092 059d | | Action Push_String_Extended,0x59d ; ": " 037a 01cc | | Execute Vector,Catenate 037b 00da | | Load_Top At_Offset_2 037c 8016 | | Call 0x0,0x16 037d 8015 | | Call 0x0,0x15 037e 01cc | | Execute Vector,Catenate 037f e017 | | Load 0x0,0x17 0380 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0381 08e2 | | Execute_Immediate Raise,0xe2 0382 e20d | | Load 0x1,0xd 0383 8018 | | Call 0x0,0x18 0384 a212 | | Store_Unchecked 0x1,0x12 0385 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0386 0000 0000 | | .XXX[0x2] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 038d | | .CONST 0x038d ; Address of begin 0389 0004 | | .CONST 0x0004 ; Address of exception handler 038a 0002 | | .CONST 0x0002 ; Number of locals 038b INIT_0388: 038b e019 | | Load 0x0,0x19 038c 0007 | | Action Break_Optional 038d BODY_0388: 038d e019 | | Load 0x0,0x19 038e e005 | | Load 0x0,0x5 038f e01a | | Load 0x0,0x1a 0390 00d8 | | Load_Top At_Offset_0 0391 e01a | | Load 0x0,0x1a 0392 e00d | | Load 0x0,0xd 0393 00d8 | | Load_Top At_Offset_0 0394 e5fe | | Load 0x2,-0x2 0395 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0396 e5ff | | Load 0x2,-0x1 0397 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0398 e20d | | Load 0x1,0xd 0399 801b | | Call 0x0,0x1b 039a 00d1 | | Pop_Control Pop_Count_1 039b e5fe | | Load 0x2,-0x2 039c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 039d e5fe | | Load 0x2,-0x2 039e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 039f e5fe | | Load 0x2,-0x2 03a0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 03a1 e5fe | | Load 0x2,-0x2 03a2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 03a3 e5fe | | Load 0x2,-0x2 03a4 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 03a5 e5fe | | Load 0x2,-0x2 03a6 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 03a7 0059 | Y | Store_Top Discrete,At_Offset_1 03a8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03a9 0000 0000 | | .BLANK 0000[0x7] 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03b3 | | .CONST 0x03b3 ; Address of begin 03b1 0004 | | .CONST 0x0004 ; Address of exception handler 03b2 0001 | | .CONST 0x0001 ; Number of locals 03b3 BODY_03b0: 03b3 INIT_03b0: 03b3 e5fa | | Load 0x2,-0x6 03b4 e211 | | Load 0x1,0x11 03b5 e20d | | Load 0x1,0xd 03b6 801c | | Call 0x0,0x1c 03b7 e5fb | | Load 0x2,-0x5 03b8 00d8 | | Load_Top At_Offset_0 03b9 e01a | | Load 0x0,0x1a 03ba 0260 | ` | Execute Discrete,In_Type 03bb 7001 |p | Jump_Nonzero 0x3bd 03bc 0801 | | Execute_Immediate Raise,0x1 03bd e5fc | | Load 0x2,-0x4 03be 00d8 | | Load_Top At_Offset_0 03bf e01a | | Load 0x0,0x1a 03c0 0260 | ` | Execute Discrete,In_Type 03c1 7001 |p | Jump_Nonzero 0x3c3 03c2 0801 | | Execute_Immediate Raise,0x1 03c3 e5fd | | Load 0x2,-0x3 03c4 00d8 | | Load_Top At_Offset_0 03c5 e00d | | Load 0x0,0xd 03c6 0260 | ` | Execute Discrete,In_Type 03c7 7001 |p | Jump_Nonzero 0x3c9 03c8 0801 | | Execute_Immediate Raise,0x1 03c9 e5fe | | Load 0x2,-0x2 03ca 00d8 | | Load_Top At_Offset_0 03cb e00d | | Load 0x0,0xd 03cc 0260 | ` | Execute Discrete,In_Type 03cd 7001 |p | Jump_Nonzero 0x3cf 03ce 0801 | | Execute_Immediate Raise,0x1 03cf e211 | | Load 0x1,0x11 03d0 e5ff | | Load 0x2,-0x1 03d1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03d2 e20d | | Load 0x1,0xd 03d3 801d | | Call 0x0,0x1d 03d4 4507 |E | Exit_Suprogram New_Top_Offset 0x7 03d5 0000 0000 | | .XXX[0x3] 03d7 0000 | | 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03db | | .CONST 0x03db ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0001 | | .CONST 0x0001 ; Number of locals 03db BODY_03d8: 03db INIT_03d8: 03db e5fb | | Load 0x2,-0x5 03dc 00d8 | | Load_Top At_Offset_0 03dd e00d | | Load 0x0,0xd 03de 0260 | ` | Execute Discrete,In_Type 03df 7001 |p | Jump_Nonzero 0x3e1 03e0 0801 | | Execute_Immediate Raise,0x1 03e1 e5fc | | Load 0x2,-0x4 03e2 00d8 | | Load_Top At_Offset_0 03e3 e00d | | Load 0x0,0xd 03e4 0260 | ` | Execute Discrete,In_Type 03e5 7001 |p | Jump_Nonzero 0x3e7 03e6 0801 | | Execute_Immediate Raise,0x1 03e7 e5f9 | | Load 0x2,-0x7 03e8 00d8 | | Load_Top At_Offset_0 03e9 e01a | | Load 0x0,0x1a 03ea 0260 | ` | Execute Discrete,In_Type 03eb 7001 |p | Jump_Nonzero 0x3ed 03ec 0801 | | Execute_Immediate Raise,0x1 03ed e5fa | | Load 0x2,-0x6 03ee 00d8 | | Load_Top At_Offset_0 03ef e01a | | Load 0x0,0x1a 03f0 0260 | ` | Execute Discrete,In_Type 03f1 7001 |p | Jump_Nonzero 0x3f3 03f2 0801 | | Execute_Immediate Raise,0x1 03f3 e5fd | | Load 0x2,-0x3 03f4 00d8 | | Load_Top At_Offset_0 03f5 e00d | | Load 0x0,0xd 03f6 0260 | ` | Execute Discrete,In_Type 03f7 7001 |p | Jump_Nonzero 0x3f9 03f8 0801 | | Execute_Immediate Raise,0x1 03f9 e5fe | | Load 0x2,-0x2 03fa 00d8 | | Load_Top At_Offset_0 03fb e00d | | Load 0x0,0xd 03fc 0260 | ` | Execute Discrete,In_Type 03fd 7001 |p | Jump_Nonzero 0x3ff 03fe 0801 | | Execute_Immediate Raise,0x1 03ff e20f | | Load 0x1,0xf 0400 e5ff | | Load 0x2,-0x1 0401 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0402 e5ff | | Load 0x2,-0x1 0403 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0404 e20d | | Load 0x1,0xd 0405 801e | | Call 0x0,0x1e 0406 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0407 0000 | | .XXX[0x1] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 040d | | .CONST 0x040d ; Address of begin 0409 0004 | | .CONST 0x0004 ; Address of exception handler 040a 0002 | | .CONST 0x0002 ; Number of locals 040b INIT_0408: 040b e007 | | Load 0x0,0x7 040c 0007 | | Action Break_Optional 040d BODY_0408: 040d e224 | $ | Load 0x1,0x24 040e 00d8 | | Load_Top At_Offset_0 040f e01a | | Load 0x0,0x1a 0410 0260 | ` | Execute Discrete,In_Type 0411 7001 |p | Jump_Nonzero 0x413 0412 0801 | | Execute_Immediate Raise,0x1 0413 e229 | ) | Load 0x1,0x29 0414 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0415 00d8 | | Load_Top At_Offset_0 0416 e01a | | Load 0x0,0x1a 0417 0260 | ` | Execute Discrete,In_Type 0418 7001 |p | Jump_Nonzero 0x41a 0419 0801 | | Execute_Immediate Raise,0x1 041a e223 | # | Load 0x1,0x23 041b 00d8 | | Load_Top At_Offset_0 041c e00d | | Load 0x0,0xd 041d 0260 | ` | Execute Discrete,In_Type 041e 7001 |p | Jump_Nonzero 0x420 041f 0801 | | Execute_Immediate Raise,0x1 0420 4800 |H | Short_Literal 0x0 0421 e20f | | Load 0x1,0xf 0422 e22a | * | Load 0x1,0x2a 0423 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0424 e20d | | Load 0x1,0xd 0425 801d | | Call 0x0,0x1d 0426 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0427 0000 | | .XXX[0x1] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b e229 | ) | Load 0x1,0x29 042c e22a | * | Load 0x1,0x2a 042d 8249 | I | Call 0x1,0x49 042e 00d1 | | Pop_Control Pop_Count_1 042f e229 | ) | Load 0x1,0x29 0430 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0431 e23b | ; | Load 0x1,0x3b 0432 027f | | Execute Discrete,Equal 0433 6807 |h | Jump_Zero 0x43b 0434 e229 | ) | Load 0x1,0x29 0435 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0436 e23a | : | Load 0x1,0x3a 0437 027f | | Execute Discrete,Equal 0438 6802 |h | Jump_Zero 0x43b 0439 4800 |H | Short_Literal 0x0 043a 00ca | | Action Exit_Nullary_Function 043b 4801 |H | Short_Literal 0x1 043c 00ca | | Action Exit_Nullary_Function 043d 0000 0000 | | .XXX[0x3] 043f 0000 | | 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 0449 | I | .CONST 0x0449 ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0004 | | .CONST 0x0004 ; Number of locals 0443 INIT_0440: 0443 e007 | | Load 0x0,0x7 0444 0007 | | Action Break_Optional 0445 e007 | | Load 0x0,0x7 0446 0007 | | Action Break_Optional 0447 e007 | | Load 0x0,0x7 0448 0007 | | Action Break_Optional 0449 BODY_0440: 0449 e220 | | Load 0x1,0x20 044a e237 | 7 | Load 0x1,0x37 044b 0270 | p | Execute Discrete,Divide 044c 005a | Z | Store_Top Discrete,At_Offset_2 044d e220 | | Load 0x1,0x20 044e e237 | 7 | Load 0x1,0x37 044f 026f | o | Execute Discrete,Remainder 0450 005b | [ | Store_Top Discrete,At_Offset_3 0451 00cf | | Action Mark_Auxiliary 0452 e237 | 7 | Load 0x1,0x37 0453 0aff | | Execute_Immediate Plus,-0x1 0454 4800 |H | Short_Literal 0x0 0455 0263 | c | Execute Discrete,Above_Bound 0456 7018 |p | Jump_Nonzero 0x46f 0457 e403 | | Load 0x2,0x3 0458 00d8 | | Load_Top At_Offset_0 0459 e01a | | Load 0x0,0x1a 045a 0260 | ` | Execute Discrete,In_Type 045b 7001 |p | Jump_Nonzero 0x45d 045c 0801 | | Execute_Immediate Raise,0x1 045d 00d9 | | Load_Top At_Offset_1 045e e238 | 8 | Load 0x1,0x38 045f 01d6 | | Execute Vector,Field_Write 0460 e402 | | Load 0x2,0x2 0461 0c01 | | Execute_Immediate Greater_Equal,0x1 0462 680a |h | Jump_Zero 0x46d 0463 00d8 | | Load_Top At_Offset_0 0464 e238 | 8 | Load 0x1,0x38 0465 01d7 | | Execute Vector,Field_Read 0466 0a01 | | Execute_Immediate Plus,0x1 0467 00d9 | | Load_Top At_Offset_1 0468 e238 | 8 | Load 0x1,0x38 0469 01d6 | | Execute Vector,Field_Write 046a e402 | | Load 0x2,0x2 046b 0aff | | Execute_Immediate Plus,-0x1 046c c402 | | Store 0x2,0x2 046d 00c8 | | Action Pop_Auxiliary_Range 046e 3fe8 |? | Loop_Increasing 0x457 046f 00ce | | Action Pop_Auxiliary 0470 e221 | ! | Load 0x1,0x21 0471 e237 | 7 | Load 0x1,0x37 0472 0270 | p | Execute Discrete,Divide 0473 005a | Z | Store_Top Discrete,At_Offset_2 0474 e221 | ! | Load 0x1,0x21 0475 e237 | 7 | Load 0x1,0x37 0476 026f | o | Execute Discrete,Remainder 0477 005b | [ | Store_Top Discrete,At_Offset_3 0478 00cf | | Action Mark_Auxiliary 0479 e237 | 7 | Load 0x1,0x37 047a 0aff | | Execute_Immediate Plus,-0x1 047b 4800 |H | Short_Literal 0x0 047c 0263 | c | Execute Discrete,Above_Bound 047d 7018 |p | Jump_Nonzero 0x496 047e e403 | | Load 0x2,0x3 047f 00d8 | | Load_Top At_Offset_0 0480 e01a | | Load 0x0,0x1a 0481 0260 | ` | Execute Discrete,In_Type 0482 7001 |p | Jump_Nonzero 0x484 0483 0801 | | Execute_Immediate Raise,0x1 0484 00d9 | | Load_Top At_Offset_1 0485 e239 | 9 | Load 0x1,0x39 0486 01d6 | | Execute Vector,Field_Write 0487 e402 | | Load 0x2,0x2 0488 0c01 | | Execute_Immediate Greater_Equal,0x1 0489 680a |h | Jump_Zero 0x494 048a 00d8 | | Load_Top At_Offset_0 048b e239 | 9 | Load 0x1,0x39 048c 01d7 | | Execute Vector,Field_Read 048d 0a01 | | Execute_Immediate Plus,0x1 048e 00d9 | | Load_Top At_Offset_1 048f e239 | 9 | Load 0x1,0x39 0490 01d6 | | Execute Vector,Field_Write 0491 e402 | | Load 0x2,0x2 0492 0aff | | Execute_Immediate Plus,-0x1 0493 c402 | | Store 0x2,0x2 0494 00c8 | | Action Pop_Auxiliary_Range 0495 3fe8 |? | Loop_Increasing 0x47e 0496 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0497 0000 | | .XXX[0x1] 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049b | | .CONST 0x049b ; Address of begin 0499 0004 | | .CONST 0x0004 ; Address of exception handler 049a 0001 | | .CONST 0x0001 ; Number of locals 049b BODY_0498: 049b INIT_0498: 049b 0008 | | Action Idle 049c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 049d 0000 0000 | | .XXX[0x3] 049f 0000 | | 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a3 | | .CONST 0x04a3 ; Address of begin 04a1 0004 | | .CONST 0x0004 ; Address of exception handler 04a2 0001 | | .CONST 0x0001 ; Number of locals 04a3 BODY_04a0: 04a3 INIT_04a0: 04a3 0008 | | Action Idle 04a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04a5 0000 0000 | | .XXX[0x3] 04a7 0000 | | 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04af | | .CONST 0x04af ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0003 | | .CONST 0x0003 ; Number of locals 04ab INIT_04a8: 04ab e007 | | Load 0x0,0x7 04ac 0007 | | Action Break_Optional 04ad e007 | | Load 0x0,0x7 04ae 0007 | | Action Break_Optional 04af BODY_04a8: 04af e5ff | | Load 0x2,-0x1 04b0 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 04b1 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 04b2 e221 | ! | Load 0x1,0x21 04b3 0270 | p | Execute Discrete,Divide 04b4 005a | Z | Store_Top Discrete,At_Offset_2 04b5 e5ff | | Load 0x2,-0x1 04b6 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 04b7 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 04b8 e220 | | Load 0x1,0x20 04b9 0270 | p | Execute Discrete,Divide 04ba 0059 | Y | Store_Top Discrete,At_Offset_1 04bb 00d9 | | Load_Top At_Offset_1 04bc e01f | | Load 0x0,0x1f 04bd 027f | | Execute Discrete,Equal 04be 7004 |p | Jump_Nonzero 0x4c3 04bf 00d8 | | Load_Top At_Offset_0 04c0 e020 | | Load 0x0,0x20 04c1 027f | | Execute Discrete,Equal 04c2 6809 |h | Jump_Zero 0x4cc 04c3 00d8 | | Load_Top At_Offset_0 04c4 00da | | Load_Top At_Offset_2 04c5 823c | < | Call 0x1,0x3c 04c6 00d8 | | Load_Top At_Offset_0 04c7 e00c | | Load 0x0,0xc 04c8 0260 | ` | Execute Discrete,In_Type 04c9 7001 |p | Jump_Nonzero 0x4cb 04ca 0801 | | Execute_Immediate Raise,0x1 04cb 8021 | ! | Call 0x0,0x21 04cc 8214 | | Call 0x1,0x14 04cd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04ce 0000 0000 | | .XXX[0x2] 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04d3 | | .CONST 0x04d3 ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0001 | | .CONST 0x0001 ; Number of locals 04d3 BODY_04d0: 04d3 INIT_04d0: 04d3 00da | | Load_Top At_Offset_2 04d4 260f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf 04d5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 04d6 7003 |p | Jump_Nonzero 0x4da 04d7 4801 |H | Short_Literal 0x1 04d8 a233 | 3 | Store_Unchecked 0x1,0x33 04d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04da 4800 |H | Short_Literal 0x0 04db a233 | 3 | Store_Unchecked 0x1,0x33 04dc 8022 | " | Call 0x0,0x22 04dd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04de 0000 0000 | | .XXX[0x2] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e5 | | .CONST 0x04e5 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0002 | | .CONST 0x0002 ; Number of locals 04e3 INIT_04e0: 04e3 e008 | | Load 0x0,0x8 04e4 0322 | " | Declare_Variable Record 04e5 BODY_04e0: 04e5 00db | | Load_Top At_Offset_3 04e6 2405 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x5 04e7 00d9 | | Load_Top At_Offset_1 04e8 017d | } | Execute Record,Structure_Write 04e9 00d8 | | Load_Top At_Offset_0 04ea e22c | , | Load 0x1,0x2c 04eb 017f | | Execute Record,Equal 04ec 6807 |h | Jump_Zero 0x4f4 04ed 8023 | # | Call 0x0,0x23 04ee 6802 |h | Jump_Zero 0x4f1 04ef 8022 | " | Call 0x0,0x22 04f0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04f1 00db | | Load_Top At_Offset_3 04f2 8256 | V | Call 0x1,0x56 04f3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04f4 00d8 | | Load_Top At_Offset_0 04f5 e22d | - | Load 0x1,0x2d 04f6 017f | | Execute Record,Equal 04f7 6804 |h | Jump_Zero 0x4fc 04f8 8022 | " | Call 0x0,0x22 04f9 8024 | $ | Call 0x0,0x24 04fa 8217 | | Call 0x1,0x17 04fb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04fc 00d8 | | Load_Top At_Offset_0 04fd e22e | . | Load 0x1,0x2e 04fe 017f | | Execute Record,Equal 04ff 6802 |h | Jump_Zero 0x502 0500 8025 | % | Call 0x0,0x25 0501 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0502 00d8 | | Load_Top At_Offset_0 0503 e22b | + | Load 0x1,0x2b 0504 017f | | Execute Record,Equal 0505 6807 |h | Jump_Zero 0x50d 0506 00db | | Load_Top At_Offset_3 0507 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 0508 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0509 0f02 | | Execute_Immediate Equal,0x2 050a 6802 |h | Jump_Zero 0x50d 050b e21b | | Load 0x1,0x1b 050c 0257 | W | Execute Discrete,Raise 050d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 050e 0000 0000 | | .XXX[0x2] 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 0515 | | .CONST 0x0515 ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0002 | | .CONST 0x0002 ; Number of locals 0513 INIT_0510: 0513 e019 | | Load 0x0,0x19 0514 0007 | | Action Break_Optional 0515 BODY_0510: 0515 e019 | | Load 0x0,0x19 0516 e5ff | | Load 0x2,-0x1 0517 e026 | & | Load 0x0,0x26 0518 0337 | 7 | Declare_Variable Array 0519 4801 |H | Short_Literal 0x1 051a 480f |H | Short_Literal 0xf 051b 00da | | Load_Top At_Offset_2 051c 01d6 | | Execute Vector,Field_Write 051d 480e |H | Short_Literal 0xe 051e 4800 |H | Short_Literal 0x0 051f 4800 |H | Short_Literal 0x0 0520 00d9 | | Load_Top At_Offset_1 0521 e405 | | Load 0x2,0x5 0522 01d6 | | Execute Vector,Field_Write 0523 3ffb |? | Loop_Increasing 0x51f 0524 481f |H | Short_Literal 0x1f 0525 4810 |H | Short_Literal 0x10 0526 4800 |H | Short_Literal 0x0 0527 00d9 | | Load_Top At_Offset_1 0528 e405 | | Load 0x2,0x5 0529 01d6 | | Execute Vector,Field_Write 052a 3ffb |? | Loop_Increasing 0x526 052b e026 | & | Load 0x0,0x26 052c 01c3 | | Execute Vector,Check_In_Type 052d e20d | | Load 0x1,0xd 052e 8027 | ' | Call 0x0,0x27 052f 00d1 | | Pop_Control Pop_Count_1 0530 0059 | Y | Store_Top Discrete,At_Offset_1 0531 00d8 | | Load_Top At_Offset_0 0532 7022 |p" | Jump_Nonzero 0x555 0533 e019 | | Load 0x0,0x19 0534 e5ff | | Load 0x2,-0x1 0535 e026 | & | Load 0x0,0x26 0536 0337 | 7 | Declare_Variable Array 0537 4801 |H | Short_Literal 0x1 0538 4810 |H | Short_Literal 0x10 0539 00da | | Load_Top At_Offset_2 053a 01d6 | | Execute Vector,Field_Write 053b 480f |H | Short_Literal 0xf 053c 4800 |H | Short_Literal 0x0 053d 4800 |H | Short_Literal 0x0 053e 00d9 | | Load_Top At_Offset_1 053f e405 | | Load 0x2,0x5 0540 01d6 | | Execute Vector,Field_Write 0541 3ffb |? | Loop_Increasing 0x53d 0542 481f |H | Short_Literal 0x1f 0543 4811 |H | Short_Literal 0x11 0544 4800 |H | Short_Literal 0x0 0545 00d9 | | Load_Top At_Offset_1 0546 e405 | | Load 0x2,0x5 0547 01d6 | | Execute Vector,Field_Write 0548 3ffb |? | Loop_Increasing 0x544 0549 e026 | & | Load 0x0,0x26 054a 01c3 | | Execute Vector,Check_In_Type 054b e20d | | Load 0x1,0xd 054c 8027 | ' | Call 0x0,0x27 054d 00d1 | | Pop_Control Pop_Count_1 054e 0059 | Y | Store_Top Discrete,At_Offset_1 054f 00d8 | | Load_Top At_Offset_0 0550 7004 |p | Jump_Nonzero 0x555 0551 00db | | Load_Top At_Offset_3 0552 e20d | | Load 0x1,0xd 0553 8028 | ( | Call 0x0,0x28 0554 00d1 | | Pop_Control Pop_Count_1 0555 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0556 0000 0000 | | .XXX[0x2] 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 055b | [ | .CONST 0x055b ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0001 | | .CONST 0x0001 ; Number of locals 055b BODY_0558: 055b INIT_0558: 055b 00da | | Load_Top At_Offset_2 055c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 055d 00d8 | | Load_Top At_Offset_0 055e 0c10 | | Execute_Immediate Greater_Equal,0x10 055f 7014 |p | Jump_Nonzero 0x574 0560 460f |F | Jump_Case 0x10 0561 7813 |x | Jump 0x575 ; case 0x0 0562 7812 |x | Jump 0x575 ; case 0x1 0563 7811 |x | Jump 0x575 ; case 0x2 0564 7810 |x | Jump 0x575 ; case 0x3 0565 7811 |x | Jump 0x577 ; case 0x4 0566 780e |x | Jump 0x575 ; case 0x5 0567 780d |x | Jump 0x575 ; case 0x6 0568 780c |x | Jump 0x575 ; case 0x7 0569 780b |x | Jump 0x575 ; case 0x8 056a 780a |x | Jump 0x575 ; case 0x9 056b 7809 |x | Jump 0x575 ; case 0xa 056c 7808 |x | Jump 0x575 ; case 0xb 056d 7815 |x | Jump 0x583 ; case 0xc 056e 7806 |x | Jump 0x575 ; case 0xd 056f 7805 |x | Jump 0x575 ; case 0xe 0570 7800 |x | Jump 0x571 ; case 0xf 0571 00da | | Load_Top At_Offset_2 0572 8257 | W | Call 0x1,0x57 0573 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0574 00d1 | | Pop_Control Pop_Count_1 0575 0008 | | Action Idle 0576 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0577 e233 | 3 | Load 0x1,0x33 0578 7007 |p | Jump_Nonzero 0x580 0579 e22a | * | Load 0x1,0x2a 057a e20d | | Load 0x1,0xd 057b 8029 | ) | Call 0x0,0x29 057c 00da | | Load_Top At_Offset_2 057d e20d | | Load 0x1,0xd 057e 802a | * | Call 0x0,0x2a 057f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0580 00da | | Load_Top At_Offset_2 0581 8259 | Y | Call 0x1,0x59 0582 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0583 00da | | Load_Top At_Offset_2 0584 8258 | X | Call 0x1,0x58 0585 00d1 | | Pop_Control Pop_Count_1 0586 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0587 0000 | | .XXX[0x1] 0588 ; -------------------------------------------------------------------------------------- 0588 ; SUBPROGRAM 0588 ; -------------------------------------------------------------------------------------- 0588 058f | | .CONST 0x058f ; Address of begin 0589 0004 | | .CONST 0x0004 ; Address of exception handler 058a 0002 | | .CONST 0x0002 ; Number of locals 058b INIT_0588: 058b e010 | | Load 0x0,0x10 058c 02ff | | Declare_Variable Variant_Record 058d 00d8 | | Load_Top At_Offset_0 058e 1c00 | | Execute_Immediate Run_Utility,0x0 058f BODY_0588: 058f 00cf | | Action Mark_Auxiliary 0590 0007 | | Action Break_Optional 0591 00d9 | | Load_Top At_Offset_1 0592 825a | Z | Call 0x1,0x5a 0593 00d1 | | Pop_Control Pop_Count_1 0594 00d9 | | Load_Top At_Offset_1 0595 825b | [ | Call 0x1,0x5b 0596 00d1 | | Pop_Control Pop_Count_1 0597 00c9 | | Action Pop_Auxiliary_Loop 0598 7ff8 | | Jump 0x591 0599 ; -------------------------------------------------------------------------------------- 0599 ; STRING TABLE 0599 ; -------------------------------------------------------------------------------------- 0599 000c | | .STRTAB 0x000c->0x059f ; "TITLE_TILES" 059a 0015 | | .STRTAB 0x0015->0x05a4 ; "TITLE_TEXT" 059b 001d | | .STRTAB 0x001d->0x05a9 ; "TITLE_ANIMATED" 059c 0029 | ) | .STRTAB 0x0029->0x05b0 ; "Unable to open display: " 059d 003f | ? | .STRTAB 0x003f->0x05bc ; ": " 059e 003f | ? | .STREND 0x003f->0x05bd 059f 5449 544c |TITL| .STRTAB_STRINGS 05be 0000 0000 | | .XXX[0x2] 05c0 ; -------------------------------------------------------------------------------------- 05c0 ; Debug Table 05c0 ; -------------------------------------------------------------------------------------- 05c0 0004 0000 | | .DEBUG4 0x0004,0x0000,0x688c,0x0000,0x0001,0x0023 05c6 000b 0652 | R| .DBG4T 0x000b,0x0652,0x8000,0x0000 05ca 0026 0660 | & `| .DBG4T 0x0026,0x0660,0x8000,0x0000 05ce 021b 06c7 | | .DBG4T 0x021b,0x06c7,0x0002,0x0000 05d2 024b 06ca | K | .DBG4T 0x024b,0x06ca,0x0001,0x0000 05d6 0253 06cd | S | .DBG4T 0x0253,0x06cd,0x0001,0x4000 05da 026b 06d6 | k | .DBG4T 0x026b,0x06d6,0x0001,0x0000 05de 027b 06d9 | { | .DBG4T 0x027b,0x06d9,0x0001,0x0000 05e2 0283 0000 | | .DBG4T 0x0283,0x0000,0x0005,0x0000 05e6 02ab 06dc | | .DBG4T 0x02ab,0x06dc,0x0002,0x0000 05ea 02bb 06df | | .DBG4T 0x02bb,0x06df,0x0002,0x0000 05ee 02c3 06e2 | | .DBG4T 0x02c3,0x06e2,0x0002,0x0000 05f2 02d3 06e5 | | .DBG4T 0x02d3,0x06e5,0x0002,0x0000 05f6 02e3 06e8 | | .DBG4T 0x02e3,0x06e8,0x0002,0x0000 05fa 02f3 06eb | | .DBG4T 0x02f3,0x06eb,0x0002,0x0000 05fe 0303 06ee | | .DBG4T 0x0303,0x06ee,0x0002,0x0000 0602 0313 06f1 | | .DBG4T 0x0313,0x06f1,0x0002,0x0000 0606 0323 06f4 | # | .DBG4T 0x0323,0x06f4,0x0002,0x0000 060a 0333 06f7 | 3 | .DBG4T 0x0333,0x06f7,0x0002,0x0000 060e 0343 06fa | C | .DBG4T 0x0343,0x06fa,0x0002,0x0000 0612 0353 06ff | S | .DBG4T 0x0353,0x06ff,0x0002,0x0000 0616 0363 0704 | c | .DBG4T 0x0363,0x0704,0x0001,0x0000 061a 038b 070d | | .DBG4T 0x038b,0x070d,0x0001,0x0000 061e 03b3 0711 | | .DBG4T 0x03b3,0x0711,0x0001,0x0000 0622 03db 0715 | | .DBG4T 0x03db,0x0715,0x0001,0x0000 0626 040b 0718 | | .DBG4T 0x040b,0x0718,0x0001,0x0000 062a 042b 071c | + | .DBG4T 0x042b,0x071c,0x0002,0x0000 062e 0443 0722 | C "| .DBG4T 0x0443,0x0722,0x0001,0x0000 0632 049b 0735 | 5| .DBG4T 0x049b,0x0735,0x0001,0x0000 0636 04a3 0738 | 8| .DBG4T 0x04a3,0x0738,0x0001,0x0000 063a 04ab 073b | ;| .DBG4T 0x04ab,0x073b,0x0001,0x0000 063e 04d3 0744 | D| .DBG4T 0x04d3,0x0744,0x0001,0x0000 0642 04e3 074a | J| .DBG4T 0x04e3,0x074a,0x0001,0x0000 0646 0513 075a | Z| .DBG4T 0x0513,0x075a,0x0001,0x0000 064a 055b 0762 | [ b| .DBG4T 0x055b,0x0762,0x0001,0x4000 064e 058b 0774 | t| .DBG4T 0x058b,0x0774,0x0001,0x0000 0652 ; -------------------------------------------------------------------------------------- 0652 ; Debug chain 0652 ; -------------------------------------------------------------------------------------- 0652 000c 0000 | | .DBGLEN 0x000c,0x0000 0654 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021 0660 ; -------------------------------------------------------------------------------------- 0660 ; Debug chain 0660 ; -------------------------------------------------------------------------------------- 0660 0065 0000 | e | .DBGLEN 0x0065,0x0000 0662 0026 0027 | & '| .DBGLNO 0x0026,0x0027,0x0028,0x0029,0x002a,0x002b,0x002c,0x00b0,0x00b1,0x00b2,0x0136,0x013b,0x013c,0x013d,0x013e,0x013f,0x0140,0x0141,0x0142,0x0143,0x0144,0x0146,0x014b,0x014d,0x014f,0x0151,0x0153,0x0155,0x0157,0x0159,0x015b,0x015d,0x015f,0x0169,0x016b,0x016d,0x0172,0x0174,0x0176,0x0178,0x017d,0x0182,0x0184,0x0186,0x0188,0x018a,0x0190,0x0192,0x0194,0x0199,0x019e,0x01a1,0x01a4,0x01a6,0x01a8,0x01aa,0x01ac,0x01ae,0x01b0,0x01b2,0x01b4,0x01b6,0x01b8,0x01ba,0x01bc,0x01be,0x01c0,0x01c2,0x01c4,0x01c6,0x01ca,0x01cc,0x01d0,0x01d2,0x01d4,0x01d8,0x01da,0x01de,0x01e0,0x01e4,0x01e6,0x01e8,0x01ea,0x01ec,0x01ee,0x01f0,0x01f4,0x01f6,0x01f8,0x01fa,0x01fc,0x01fe,0x0200,0x0202,0x0206,0x0208,0x020c,0x020e,0x0210,0x0212,0x0214 06c7 ; -------------------------------------------------------------------------------------- 06c7 ; Debug chain 06c7 ; -------------------------------------------------------------------------------------- 06c7 0000 0001 | | .DBGLEN 0x0000,0x0001 06c9 021b | | .DBGLNO 0x021b 06ca ; -------------------------------------------------------------------------------------- 06ca ; Debug chain 06ca ; -------------------------------------------------------------------------------------- 06ca 0000 0001 | | .DBGLEN 0x0000,0x0001 06cc 024b | K | .DBGLNO 0x024b 06cd ; -------------------------------------------------------------------------------------- 06cd ; Debug chain 06cd ; -------------------------------------------------------------------------------------- 06cd 0001 0003 | | .DBGLEN 0x0001,0x0003 06cf 0253 0259 | S Y| .DBGLNO 0x0253,0x0259,0x025c,0x0260 06d3 0002 0003 | | .XXX[0x3] 06d5 0001 | | 06d6 ; -------------------------------------------------------------------------------------- 06d6 ; Debug chain 06d6 ; -------------------------------------------------------------------------------------- 06d6 0000 0001 | | .DBGLEN 0x0000,0x0001 06d8 026b | k | .DBGLNO 0x026b 06d9 ; -------------------------------------------------------------------------------------- 06d9 ; Debug chain 06d9 ; -------------------------------------------------------------------------------------- 06d9 0000 0001 | | .DBGLEN 0x0000,0x0001 06db 027b | { | .DBGLNO 0x027b 06dc ; -------------------------------------------------------------------------------------- 06dc ; Debug chain 06dc ; -------------------------------------------------------------------------------------- 06dc 0000 0001 | | .DBGLEN 0x0000,0x0001 06de 02ab | | .DBGLNO 0x02ab 06df ; -------------------------------------------------------------------------------------- 06df ; Debug chain 06df ; -------------------------------------------------------------------------------------- 06df 0000 0001 | | .DBGLEN 0x0000,0x0001 06e1 02bb | | .DBGLNO 0x02bb 06e2 ; -------------------------------------------------------------------------------------- 06e2 ; Debug chain 06e2 ; -------------------------------------------------------------------------------------- 06e2 0000 0001 | | .DBGLEN 0x0000,0x0001 06e4 02c3 | | .DBGLNO 0x02c3 06e5 ; -------------------------------------------------------------------------------------- 06e5 ; Debug chain 06e5 ; -------------------------------------------------------------------------------------- 06e5 0000 0001 | | .DBGLEN 0x0000,0x0001 06e7 02d3 | | .DBGLNO 0x02d3 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; Debug chain 06e8 ; -------------------------------------------------------------------------------------- 06e8 0000 0001 | | .DBGLEN 0x0000,0x0001 06ea 02e3 | | .DBGLNO 0x02e3 06eb ; -------------------------------------------------------------------------------------- 06eb ; Debug chain 06eb ; -------------------------------------------------------------------------------------- 06eb 0000 0001 | | .DBGLEN 0x0000,0x0001 06ed 02f3 | | .DBGLNO 0x02f3 06ee ; -------------------------------------------------------------------------------------- 06ee ; Debug chain 06ee ; -------------------------------------------------------------------------------------- 06ee 0000 0001 | | .DBGLEN 0x0000,0x0001 06f0 0303 | | .DBGLNO 0x0303 06f1 ; -------------------------------------------------------------------------------------- 06f1 ; Debug chain 06f1 ; -------------------------------------------------------------------------------------- 06f1 0000 0001 | | .DBGLEN 0x0000,0x0001 06f3 0313 | | .DBGLNO 0x0313 06f4 ; -------------------------------------------------------------------------------------- 06f4 ; Debug chain 06f4 ; -------------------------------------------------------------------------------------- 06f4 0000 0001 | | .DBGLEN 0x0000,0x0001 06f6 0323 | # | .DBGLNO 0x0323 06f7 ; -------------------------------------------------------------------------------------- 06f7 ; Debug chain 06f7 ; -------------------------------------------------------------------------------------- 06f7 0000 0001 | | .DBGLEN 0x0000,0x0001 06f9 0333 | 3 | .DBGLNO 0x0333 06fa ; -------------------------------------------------------------------------------------- 06fa ; Debug chain 06fa ; -------------------------------------------------------------------------------------- 06fa 0000 0003 | | .DBGLEN 0x0000,0x0003 06fc 0343 0347 | C G| .DBGLNO 0x0343,0x0347,0x0349 06ff ; -------------------------------------------------------------------------------------- 06ff ; Debug chain 06ff ; -------------------------------------------------------------------------------------- 06ff 0000 0003 | | .DBGLEN 0x0000,0x0003 0701 0353 0357 | S W| .DBGLNO 0x0353,0x0357,0x0359 0704 ; -------------------------------------------------------------------------------------- 0704 ; Debug chain 0704 ; -------------------------------------------------------------------------------------- 0704 0002 0005 | | .DBGLEN 0x0002,0x0005 0706 0363 0367 | c g| .DBGLNO 0x0363,0x0367,0x0369,0x036f,0x0373,0x0381,0x0382 070d ; -------------------------------------------------------------------------------------- 070d ; Debug chain 070d ; -------------------------------------------------------------------------------------- 070d 0001 0001 | | .DBGLEN 0x0001,0x0001 070f 038b 038d | | .DBGLNO 0x038b,0x038d 0711 ; -------------------------------------------------------------------------------------- 0711 ; Debug chain 0711 ; -------------------------------------------------------------------------------------- 0711 0000 0002 | | .DBGLEN 0x0000,0x0002 0713 03b3 03b7 | | .DBGLNO 0x03b3,0x03b7 0715 ; -------------------------------------------------------------------------------------- 0715 ; Debug chain 0715 ; -------------------------------------------------------------------------------------- 0715 0000 0001 | | .DBGLEN 0x0000,0x0001 0717 03db | | .DBGLNO 0x03db 0718 ; -------------------------------------------------------------------------------------- 0718 ; Debug chain 0718 ; -------------------------------------------------------------------------------------- 0718 0001 0001 | | .DBGLEN 0x0001,0x0001 071a 040b 040d | | .DBGLNO 0x040b,0x040d 071c ; -------------------------------------------------------------------------------------- 071c ; Debug chain 071c ; -------------------------------------------------------------------------------------- 071c 0000 0004 | | .DBGLEN 0x0000,0x0004 071e 042b 042f | + /| .DBGLNO 0x042b,0x042f,0x0439,0x043b 0722 ; -------------------------------------------------------------------------------------- 0722 ; Debug chain 0722 ; -------------------------------------------------------------------------------------- 0722 0003 000e | | .DBGLEN 0x0003,0x000e 0724 0443 0445 | C E| .DBGLNO 0x0443,0x0445,0x0447,0x0449,0x044d,0x0452,0x0457,0x0460,0x0463,0x046a,0x0470,0x0474,0x0479,0x047e,0x0487,0x048a,0x0491 0735 ; -------------------------------------------------------------------------------------- 0735 ; Debug chain 0735 ; -------------------------------------------------------------------------------------- 0735 0000 0001 | | .DBGLEN 0x0000,0x0001 0737 049b | | .DBGLNO 0x049b 0738 ; -------------------------------------------------------------------------------------- 0738 ; Debug chain 0738 ; -------------------------------------------------------------------------------------- 0738 0000 0001 | | .DBGLEN 0x0000,0x0001 073a 04a3 | | .DBGLNO 0x04a3 073b ; -------------------------------------------------------------------------------------- 073b ; Debug chain 073b ; -------------------------------------------------------------------------------------- 073b 0002 0005 | | .DBGLEN 0x0002,0x0005 073d 04ab 04ad | | .DBGLNO 0x04ab,0x04ad,0x04af,0x04b5,0x04bb,0x04c3,0x04cc 0744 ; -------------------------------------------------------------------------------------- 0744 ; Debug chain 0744 ; -------------------------------------------------------------------------------------- 0744 0000 0004 | | .DBGLEN 0x0000,0x0004 0746 04d3 04d7 | | .DBGLNO 0x04d3,0x04d7,0x04da,0x04dc 074a ; -------------------------------------------------------------------------------------- 074a ; Debug chain 074a ; -------------------------------------------------------------------------------------- 074a 0001 000d | | .DBGLEN 0x0001,0x000d 074c 04e3 04e5 | | .DBGLNO 0x04e3,0x04e5,0x04e9,0x04ed,0x04ef,0x04f1,0x04f4,0x04f8,0x04f9,0x04fa,0x04fc,0x0500,0x0502,0x050b 075a ; -------------------------------------------------------------------------------------- 075a ; Debug chain 075a ; -------------------------------------------------------------------------------------- 075a 0001 0005 | | .DBGLEN 0x0001,0x0005 075c 0513 0515 | | .DBGLNO 0x0513,0x0515,0x0531,0x0533,0x054f,0x0551 0762 ; -------------------------------------------------------------------------------------- 0762 ; Debug chain 0762 ; -------------------------------------------------------------------------------------- 0762 0000 0008 | | .DBGLEN 0x0000,0x0008 0764 055b 0571 | [ q| .DBGLNO 0x055b,0x0571,0x0575,0x0577,0x0579,0x057c,0x0580,0x0583 076c 0001 0007 | | .XXX[0x8] 076e 0008 0002 | | 0770 0003 0004 | | 0772 0005 0006 | | 0774 ; -------------------------------------------------------------------------------------- 0774 ; Debug chain 0774 ; -------------------------------------------------------------------------------------- 0774 0001 0003 | | .DBGLEN 0x0001,0x0003 0776 058b 0590 | | .DBGLNO 0x058b,0x0590,0x0591,0x0594 077a 0000 0000 | | .BLANK 0000[0x86]