|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0f38f8
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 06e0 | | .CONST 0x06e0 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0088 | | .CONST 0x0088 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0021 | ! | .CONST 0x0021 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4810 |H | Short_Literal 0x10 000d 029f 0093 | | Declare_Subprogram INIT_0090,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated 0012 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated 0014 00da | | Load_Top At_Offset_2 0015 e002 | | Load 0x0,0x2 0016 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0017 02a0 | | Declare_Subprogram Null_Subprogram 0018 4802 |H | Short_Literal 0x2 0019 032e | . | Declare_Type Record,Defined,Visible 001a 4801 |H | Short_Literal 0x1 001b 4805 |H | Short_Literal 0x5 001c 00da | | Load_Top At_Offset_2 001d 02a0 | | Declare_Subprogram Null_Subprogram 001e 4801 |H | Short_Literal 0x1 001f 035e | ^ | Declare_Type Array,Defined,Visible 0020 4800 |H | Short_Literal 0x0 0021 4802 |H | Short_Literal 0x2 0022 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call 0024 03fe | | Declare_Type Discrete,Defined,Visible 0025 4800 |H | Short_Literal 0x0 0026 4804 |H | Short_Literal 0x4 0027 029f 015b | [| Declare_Subprogram INIT_0158,For_Call 0029 03fe | | Declare_Type Discrete,Defined,Visible 002a 00d9 | | Load_Top At_Offset_1 002b 4803 |H | Short_Literal 0x3 002c 4800 |H | Short_Literal 0x0 002d 4801 |H | Short_Literal 0x1 002e 4807 |H | Short_Literal 0x7 002f 0319 | | Declare_Type Variant_Record,Incomplete,Visible 0030 029f 0533 | 3| Declare_Subprogram INIT_0530,For_Call 0032 00d9 | | Load_Top At_Offset_1 0033 012a | * | Execute Any,Change_Utility 0034 0007 | | Action Break_Optional 0035 00d8 | | Load_Top At_Offset_0 0036 02a0 | | Declare_Subprogram Null_Subprogram 0037 4818 |H | Short_Literal 0x18 0038 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0039 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 003b 4800 |H | Short_Literal 0x0 003c 4801 |H | Short_Literal 0x1 003d 029f 01b3 | | Declare_Subprogram INIT_01b0,For_Call 003f 03fe | | Declare_Type Discrete,Defined,Visible 0040 00d8 | | Load_Top At_Offset_0 0041 e002 | | Load 0x0,0x2 0042 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0043 4802 |H | Short_Literal 0x2 0044 e211 | | Load 0x1,0x11 0045 00e2 | | Load_Encached Integer_Cache 0046 4801 |H | Short_Literal 0x1 0047 e215 | | Load 0x1,0x15 0048 029f 059b | | Declare_Subprogram INIT_0598,For_Call 004a 4803 |H | Short_Literal 0x3 004b 4801 |H | Short_Literal 0x1 004c 4802 |H | Short_Literal 0x2 004d 4800 |H | Short_Literal 0x0 004e 4801 |H | Short_Literal 0x1 004f 031e | | Declare_Type Variant_Record,Defined,Visible 0050 4801 |H | Short_Literal 0x1 0051 00d9 | | Load_Top At_Offset_1 0052 1c07 | | Execute_Immediate Run_Utility,0x7 0053 0129 | ) | Execute Any,Make_Visible 0054 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0056 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0058 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated 005a 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 005c 00e2 | | Load_Encached Integer_Cache 005d 4803 |H | Short_Literal 0x3 005e e215 | | Load 0x1,0x15 005f 00d8 | | Load_Top At_Offset_0 0060 e213 | | Load 0x1,0x13 0061 4801 |H | Short_Literal 0x1 0062 00e2 | | Load_Encached Integer_Cache 0063 4801 |H | Short_Literal 0x1 0064 e002 | | Load 0x0,0x2 0065 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0066 029f 0533 | 3| Declare_Subprogram INIT_0530,For_Call 0068 4805 |H | Short_Literal 0x5 0069 4801 |H | Short_Literal 0x1 006a e214 | | Load 0x1,0x14 006b 0307 | | Complete_Type Variant_Record,By_Defining 006c e215 | | Load 0x1,0x15 006d 03c4 | | Complete_Type Access,By_Component_Completion 006e 00bf | | Action Accept_Activation 006f 4800 |H | Short_Literal 0x0 0070 480b |H | Short_Literal 0xb 0071 029f 0473 | s| Declare_Subprogram INIT_0470,For_Call 0073 03fd | | Declare_Type Discrete,Defined 0074 029d 049b | | Declare_Subprogram INIT_0498,For_Outer_Call 0076 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0077 00c7 | | Action Elaborate_Subprogram 0078 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0079 00c7 | | Action Elaborate_Subprogram 007a 1d0f | | Execute_Immediate Reference_Lex_1,0xf 007b 00c7 | | Action Elaborate_Subprogram 007c 029d 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call 007e 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 007f 00c7 | | Action Elaborate_Subprogram 0080 029d 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call 0082 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0083 00c7 | | Action Elaborate_Subprogram 0084 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0085 00c7 | | Action Elaborate_Subprogram 0086 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0087 00c7 | | Action Elaborate_Subprogram 0088 BODY_0008: 0088 00bc | | Action Signal_Activated 0089 00bb | | Action Signal_Completion 008a 0000 0000 | | .BLANK 0000[0x6] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 4607 |F | Jump_Case 0x8 0094 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0095 7807 |x | Jump 0x9d ; case 0x1 0096 780a |x | Jump 0xa1 ; case 0x2 0097 780e |x | Jump 0xa6 ; case 0x3 0098 7811 |x | Jump 0xaa ; case 0x4 0099 7812 |x | Jump 0xac ; case 0x5 009a 7813 |x | Jump 0xae ; case 0x6 009b 7816 |x | Jump 0xb2 ; case 0x7 009c 4302 |C | .XXX[0x1] 009d 00da | | Load_Top At_Offset_2 009e 0091 05de | | Action Push_String_Extended_Indexed,0x5de ; "COMMUNICATION" 00a0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00a1 00db | | Load_Top At_Offset_3 00a2 00db | | Load_Top At_Offset_3 00a3 00e0 | | Load_Encached Standard_Cache 00a4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00a6 00da | | Load_Top At_Offset_2 00a7 00e0 | | Load_Encached Standard_Cache 00a8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00a9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00aa 00db | | Load_Top At_Offset_3 00ab 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00ac 00db | | Load_Top At_Offset_3 00ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00ae e20d | | Load 0x1,0xd 00af 00dc | | Load_Top At_Offset_4 00b0 0267 | g | Execute Discrete,Predecessor 00b1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00b2 e20d | | Load 0x1,0xd 00b3 00dc | | Load_Top At_Offset_4 00b4 0268 | h | Execute Discrete,Successor 00b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00b6 0000 0000 | | .XXX[0x2] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bd | | .CONST 0x00bd ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0002 | | .CONST 0x0002 ; Number of locals 00bb INIT_00b8: 00bb e20d | | Load 0x1,0xd 00bc 0007 | | Action Break_Optional 00bd BODY_00b8: 00bd 00db | | Load_Top At_Offset_3 00be 8003 | | Call 0x0,0x3 00bf 6809 |h | Jump_Zero 0xc9 00c0 00db | | Load_Top At_Offset_3 00c1 8004 | | Call 0x0,0x4 00c2 00d8 | | Load_Top At_Offset_0 00c3 e20d | | Load 0x1,0xd 00c4 0260 | ` | Execute Discrete,In_Type 00c5 7001 |p | Jump_Nonzero 0xc7 00c6 0801 | | Execute_Immediate Raise,0x1 00c7 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 00c8 7803 |x | Jump 0xcc 00c9 00db | | Load_Top At_Offset_3 00ca 821f | | Call 0x1,0x1f 00cb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 00cc 00d8 | | Load_Top At_Offset_0 00cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ce 0000 0000 | | .XXX[0x2] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00d3 | | .CONST 0x00d3 ; Address of begin 00d1 0004 | | .CONST 0x0004 ; Address of exception handler 00d2 0001 | | .CONST 0x0001 ; Number of locals 00d3 BODY_00d0: 00d3 INIT_00d0: 00d3 00da | | Load_Top At_Offset_2 00d4 4610 |F | Jump_Case 0x11 00d5 782d |x- | Jump 0x103 ; case 0x0 00d6 780f |x | Jump 0xe6 ; case 0x1 00d7 7826 |x& | Jump 0xfe ; case 0x2 00d8 780f |x | Jump 0xe8 ; case 0x3 00d9 7819 |x | Jump 0xf3 ; case 0x4 00da 7818 |x | Jump 0xf3 ; case 0x5 00db 780a |x | Jump 0xe6 ; case 0x6 00dc 7848 |xH | Jump 0x125 ; case 0x7 00dd 7842 |xB | Jump 0x120 ; case 0x8 00de 7841 |xA | Jump 0x120 ; case 0x9 00df 783b |x; | Jump 0x11b ; case 0xa 00e0 783a |x: | Jump 0x11b ; case 0xb 00e1 7831 |x1 | Jump 0x113 ; case 0xc 00e2 7803 |x | Jump 0xe6 ; case 0xd 00e3 782a |x* | Jump 0x10e ; case 0xe 00e4 7801 |x | Jump 0xe6 ; case 0xf 00e5 7800 |x | Jump 0xe6 ; case 0x10 00e6 4800 |H | Short_Literal 0x0 00e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00e8 00db | | Load_Top At_Offset_3 00e9 0f0c | | Execute_Immediate Equal,0xc 00ea e5fe | | Load 0x2,-0x2 00eb 0f09 | | Execute_Immediate Equal,0x9 00ec 0278 | x | Execute Discrete,Or 00ed e5fe | | Load 0x2,-0x2 00ee 0f07 | | Execute_Immediate Equal,0x7 00ef 0278 | x | Execute Discrete,Or 00f0 6839 |h9 | Jump_Zero 0x12a 00f1 4801 |H | Short_Literal 0x1 00f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f3 00db | | Load_Top At_Offset_3 00f4 0f0c | | Execute_Immediate Equal,0xc 00f5 e5fe | | Load 0x2,-0x2 00f6 0f08 | | Execute_Immediate Equal,0x8 00f7 0278 | x | Execute Discrete,Or 00f8 e5fe | | Load 0x2,-0x2 00f9 0f07 | | Execute_Immediate Equal,0x7 00fa 0278 | x | Execute Discrete,Or 00fb 682e |h. | Jump_Zero 0x12a 00fc 4801 |H | Short_Literal 0x1 00fd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00fe 00db | | Load_Top At_Offset_3 00ff 0f07 | | Execute_Immediate Equal,0x7 0100 6829 |h) | Jump_Zero 0x12a 0101 4801 |H | Short_Literal 0x1 0102 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0103 00db | | Load_Top At_Offset_3 0104 0f0a | | Execute_Immediate Equal,0xa 0105 e5fe | | Load 0x2,-0x2 0106 0f0b | | Execute_Immediate Equal,0xb 0107 0278 | x | Execute Discrete,Or 0108 e5fe | | Load 0x2,-0x2 0109 0f07 | | Execute_Immediate Equal,0x7 010a 0278 | x | Execute Discrete,Or 010b 681e |h | Jump_Zero 0x12a 010c 4801 |H | Short_Literal 0x1 010d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 010e 00db | | Load_Top At_Offset_3 010f 0f04 | | Execute_Immediate Equal,0x4 0110 6819 |h | Jump_Zero 0x12a 0111 4801 |H | Short_Literal 0x1 0112 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0113 00db | | Load_Top At_Offset_3 0114 0f02 | | Execute_Immediate Equal,0x2 0115 e5fe | | Load 0x2,-0x2 0116 0f0d | | Execute_Immediate Equal,0xd 0117 0278 | x | Execute Discrete,Or 0118 6811 |h | Jump_Zero 0x12a 0119 4801 |H | Short_Literal 0x1 011a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 011b 00db | | Load_Top At_Offset_3 011c 0f07 | | Execute_Immediate Equal,0x7 011d 680c |h | Jump_Zero 0x12a 011e 4801 |H | Short_Literal 0x1 011f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0120 00db | | Load_Top At_Offset_3 0121 0f03 | | Execute_Immediate Equal,0x3 0122 6807 |h | Jump_Zero 0x12a 0123 4801 |H | Short_Literal 0x1 0124 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0125 00db | | Load_Top At_Offset_3 0126 0f0f | | Execute_Immediate Equal,0xf 0127 6802 |h | Jump_Zero 0x12a 0128 4801 |H | Short_Literal 0x1 0129 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 012a 4800 |H | Short_Literal 0x0 012b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 012c 0000 0000 | | .BLANK 0000[0x4] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 4607 |F | Jump_Case 0x8 0134 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0135 7807 |x | Jump 0x13d ; case 0x1 0136 780a |x | Jump 0x141 ; case 0x2 0137 780e |x | Jump 0x146 ; case 0x3 0138 7811 |x | Jump 0x14a ; case 0x4 0139 7812 |x | Jump 0x14c ; case 0x5 013a 7813 |x | Jump 0x14e ; case 0x6 013b 7816 |x | Jump 0x152 ; case 0x7 013c 4302 |C | .XXX[0x1] 013d 00da | | Load_Top At_Offset_2 013e 0091 05ef | | Action Push_String_Extended_Indexed,0x5ef ; "TYPE_NODE" 0140 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0141 00db | | Load_Top At_Offset_3 0142 00db | | Load_Top At_Offset_3 0143 00e0 | | Load_Encached Standard_Cache 0144 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0145 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0146 00da | | Load_Top At_Offset_2 0147 00e0 | | Load_Encached Standard_Cache 0148 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0149 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 014a 00db | | Load_Top At_Offset_3 014b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 014c 00db | | Load_Top At_Offset_3 014d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 014e e212 | | Load 0x1,0x12 014f 00dc | | Load_Top At_Offset_4 0150 0267 | g | Execute Discrete,Predecessor 0151 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0152 e212 | | Load 0x1,0x12 0153 00dc | | Load_Top At_Offset_4 0154 0268 | h | Execute Discrete,Successor 0155 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0156 0000 0000 | | .XXX[0x2] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 4607 |F | Jump_Case 0x8 015c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 015d 7807 |x | Jump 0x165 ; case 0x1 015e 780a |x | Jump 0x169 ; case 0x2 015f 780e |x | Jump 0x16e ; case 0x3 0160 7811 |x | Jump 0x172 ; case 0x4 0161 7812 |x | Jump 0x174 ; case 0x5 0162 7813 |x | Jump 0x176 ; case 0x6 0163 7816 |x | Jump 0x17a ; case 0x7 0164 4302 |C | .XXX[0x1] 0165 00da | | Load_Top At_Offset_2 0166 0091 05f2 | | Action Push_String_Extended_Indexed,0x5f2 ; "PLUS" 0168 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0169 00db | | Load_Top At_Offset_3 016a 00db | | Load_Top At_Offset_3 016b 00e0 | | Load_Encached Standard_Cache 016c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 016d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 016e 00da | | Load_Top At_Offset_2 016f 00e0 | | Load_Encached Standard_Cache 0170 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0171 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0172 00db | | Load_Top At_Offset_3 0173 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0174 00db | | Load_Top At_Offset_3 0175 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0176 e213 | | Load 0x1,0x13 0177 00dc | | Load_Top At_Offset_4 0178 0267 | g | Execute Discrete,Predecessor 0179 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 017a e213 | | Load 0x1,0x13 017b 00dc | | Load_Top At_Offset_4 017c 0268 | h | Execute Discrete,Successor 017d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 017e 0000 0000 | | .XXX[0x2] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0183 | | .CONST 0x0183 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0001 | | .CONST 0x0001 ; Number of locals 0183 BODY_0180: 0183 INIT_0180: 0183 0092 0605 | | Action Push_String_Extended,0x605 ; "/" 0185 e002 | | Load 0x0,0x2 0186 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0187 00db | | Load_Top At_Offset_3 0188 8005 | | Call 0x0,0x5 0189 6802 |h | Jump_Zero 0x18c 018a 4802 |H | Short_Literal 0x2 018b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018c 0092 0606 | | Action Push_String_Extended,0x606 ; "+" 018e e002 | | Load 0x0,0x2 018f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0190 00db | | Load_Top At_Offset_3 0191 8005 | | Call 0x0,0x5 0192 6802 |h | Jump_Zero 0x195 0193 4800 |H | Short_Literal 0x0 0194 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0195 0092 0607 | | Action Push_String_Extended,0x607 ; "-" 0197 e002 | | Load 0x0,0x2 0198 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0199 00db | | Load_Top At_Offset_3 019a 8005 | | Call 0x0,0x5 019b 6802 |h | Jump_Zero 0x19e 019c 4801 |H | Short_Literal 0x1 019d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019e 0092 0608 | | Action Push_String_Extended,0x608 ; "*" 01a0 e002 | | Load 0x0,0x2 01a1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01a2 00db | | Load_Top At_Offset_3 01a3 8005 | | Call 0x0,0x5 01a4 6802 |h | Jump_Zero 0x1a7 01a5 4803 |H | Short_Literal 0x3 01a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a7 4804 |H | Short_Literal 0x4 01a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a9 0000 0000 | | .BLANK 0000[0x7] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 4607 |F | Jump_Case 0x8 01b4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01b5 7807 |x | Jump 0x1bd ; case 0x1 01b6 780a |x | Jump 0x1c1 ; case 0x2 01b7 780e |x | Jump 0x1c6 ; case 0x3 01b8 7811 |x | Jump 0x1ca ; case 0x4 01b9 7812 |x | Jump 0x1cc ; case 0x5 01ba 7813 |x | Jump 0x1ce ; case 0x6 01bb 7816 |x | Jump 0x1d2 ; case 0x7 01bc 4302 |C | .XXX[0x1] 01bd 00da | | Load_Top At_Offset_2 01be 0091 05f7 | | Action Push_String_Extended_Indexed,0x5f7 ; "TYPE_VARIABLE" 01c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01c1 00db | | Load_Top At_Offset_3 01c2 00db | | Load_Top At_Offset_3 01c3 00e0 | | Load_Encached Standard_Cache 01c4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01c6 00da | | Load_Top At_Offset_2 01c7 00e0 | | Load_Encached Standard_Cache 01c8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01c9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01ca 00db | | Load_Top At_Offset_3 01cb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01cc 00db | | Load_Top At_Offset_3 01cd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01ce e217 | | Load 0x1,0x17 01cf 00dc | | Load_Top At_Offset_4 01d0 0267 | g | Execute Discrete,Predecessor 01d1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01d2 e217 | | Load 0x1,0x17 01d3 00dc | | Load_Top At_Offset_4 01d4 0268 | h | Execute Discrete,Successor 01d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01d6 0000 0000 | | .XXX[0x2] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc 8221 | ! | Call 0x1,0x21 01dd 00da | | Load_Top At_Offset_2 01de 0227 | ' | Execute Access,All_Reference 01df 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e1 0000 0000 | | .BLANK 0000[0x7] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01ef | | .CONST 0x01ef ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0003 | | .CONST 0x0003 ; Number of locals 01eb INIT_01e8: 01eb e21e | | Load 0x1,0x1e 01ec 0007 | | Action Break_Optional 01ed 00e2 | | Load_Encached Integer_Cache 01ee 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 01ef BODY_01e8: 01ef e5ff | | Load 0x2,-0x1 01f0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01f1 8220 | | Call 0x1,0x20 01f2 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 01f3 0092 0609 | | Action Push_String_Extended,0x609 ; "-------------------------------------" 01f5 e006 | | Load 0x0,0x6 01f6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01f7 00d9 | | Load_Top At_Offset_1 01f8 e21e | | Load 0x1,0x1e 01f9 011c | | Execute Any,Convert_Unchecked 01fa 1c01 | | Execute_Immediate Run_Utility,0x1 01fb 0092 060a | | Action Push_String_Extended,0x60a ; " " 01fd 01cc | | Execute Vector,Catenate 01fe e006 | | Load 0x0,0x6 01ff 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0200 00cf | | Action Mark_Auxiliary 0201 00d9 | | Load_Top At_Offset_1 0202 e5ff | | Load 0x2,-0x1 0203 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0204 027d | } | Execute Discrete,Greater 0205 700f |p | Jump_Nonzero 0x215 0206 00d9 | | Load_Top At_Offset_1 0207 e5ff | | Load 0x2,-0x1 0208 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0209 01d5 | | Execute Vector,Field_Reference 020a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 020b 8007 | | Call 0x0,0x7 020c 0092 060b | | Action Push_String_Extended,0x60b ; "lalalalalalalalalalalala" 020e e006 | | Load 0x0,0x6 020f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0210 00d9 | | Load_Top At_Offset_1 0211 0a01 | | Execute_Immediate Plus,0x1 0212 005a | Z | Store_Top Discrete,At_Offset_2 0213 00c9 | | Action Pop_Auxiliary_Loop 0214 7fec | | Jump 0x201 0215 00ce | | Action Pop_Auxiliary 0216 e008 | | Load 0x0,0x8 0217 8009 | | Call 0x0,0x9 0218 0092 0609 | | Action Push_String_Extended,0x609 ; "-------------------------------------" 021a e006 | | Load 0x0,0x6 021b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 021c 00d9 | | Load_Top At_Offset_1 021d 460b |F | Jump_Case 0xc 021e 7881 |x | Jump 0x2a0 ; case 0x0 021f 7898 |x | Jump 0x2b8 ; case 0x1 0220 790d |y | Jump 0x32e ; case 0x2 0221 7913 |y | Jump 0x335 ; case 0x3 0222 7943 |yC | Jump 0x366 ; case 0x4 0223 7970 |yp | Jump 0x394 ; case 0x5 0224 7976 |yv | Jump 0x39b ; case 0x6 0225 7978 |yx | Jump 0x39e ; case 0x7 0226 799a |y | Jump 0x3c1 ; case 0x8 0227 79b0 |y | Jump 0x3d8 ; case 0x9 0228 79be |y | Jump 0x3e7 ; case 0xa 0229 7800 |x | Jump 0x22a ; case 0xb 022a e5ff | | Load 0x2,-0x1 022b 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 022c 0f03 | | Execute_Immediate Equal,0x3 022d 6851 |hQ | Jump_Zero 0x27f 022e 4802 |H | Short_Literal 0x2 022f e5ff | | Load 0x2,-0x1 0230 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0231 01d5 | | Execute Vector,Field_Reference 0232 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0233 0f08 | | Execute_Immediate Equal,0x8 0234 680e |h | Jump_Zero 0x243 0235 4803 |H | Short_Literal 0x3 0236 e5ff | | Load 0x2,-0x1 0237 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0238 01d5 | | Execute Vector,Field_Reference 0239 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 023a 800a | | Call 0x0,0xa 023b 4801 |H | Short_Literal 0x1 023c e5ff | | Load 0x2,-0x1 023d 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 023e 01d5 | | Execute Vector,Field_Reference 023f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0240 800a | | Call 0x0,0xa 0241 800b | | Call 0x0,0xb 0242 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0243 4802 |H | Short_Literal 0x2 0244 e5ff | | Load 0x2,-0x1 0245 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0246 01d5 | | Execute Vector,Field_Reference 0247 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0248 0f09 | | Execute_Immediate Equal,0x9 0249 680e |h | Jump_Zero 0x258 024a 4803 |H | Short_Literal 0x3 024b e5ff | | Load 0x2,-0x1 024c 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 024d 01d5 | | Execute Vector,Field_Reference 024e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 024f 800a | | Call 0x0,0xa 0250 4801 |H | Short_Literal 0x1 0251 e5ff | | Load 0x2,-0x1 0252 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0253 01d5 | | Execute Vector,Field_Reference 0254 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0255 800a | | Call 0x0,0xa 0256 800c | | Call 0x0,0xc 0257 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0258 4802 |H | Short_Literal 0x2 0259 e5ff | | Load 0x2,-0x1 025a 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 025b 01d5 | | Execute Vector,Field_Reference 025c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 025d 0f07 | | Execute_Immediate Equal,0x7 025e 69cc |i | Jump_Zero 0x42b 025f 4801 |H | Short_Literal 0x1 0260 e5ff | | Load 0x2,-0x1 0261 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0262 01d5 | | Execute Vector,Field_Reference 0263 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0264 680d |h | Jump_Zero 0x272 0265 4803 |H | Short_Literal 0x3 0266 e5ff | | Load 0x2,-0x1 0267 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0268 01d5 | | Execute Vector,Field_Reference 0269 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 026a 4801 |H | Short_Literal 0x1 026b e5ff | | Load 0x2,-0x1 026c 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 026d 01d5 | | Execute Vector,Field_Reference 026e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 026f 800a | | Call 0x0,0xa 0270 800d | | Call 0x0,0xd 0271 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0272 4803 |H | Short_Literal 0x3 0273 e5ff | | Load 0x2,-0x1 0274 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0275 01d5 | | Execute Vector,Field_Reference 0276 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0277 4801 |H | Short_Literal 0x1 0278 e5ff | | Load 0x2,-0x1 0279 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 027a 01d5 | | Execute Vector,Field_Reference 027b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 027c 800a | | Call 0x0,0xa 027d 800e | | Call 0x0,0xe 027e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 027f 4802 |H | Short_Literal 0x2 0280 e5ff | | Load 0x2,-0x1 0281 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0282 01d5 | | Execute Vector,Field_Reference 0283 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0284 0f0a | | Execute_Immediate Equal,0xa 0285 680d |h | Jump_Zero 0x293 0286 4804 |H | Short_Literal 0x4 0287 e5ff | | Load 0x2,-0x1 0288 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0289 01d5 | | Execute Vector,Field_Reference 028a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 028b 4801 |H | Short_Literal 0x1 028c e5ff | | Load 0x2,-0x1 028d 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 028e 01d5 | | Execute Vector,Field_Reference 028f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0290 800a | | Call 0x0,0xa 0291 800e | | Call 0x0,0xe 0292 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0293 4804 |H | Short_Literal 0x4 0294 e5ff | | Load 0x2,-0x1 0295 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0296 01d5 | | Execute Vector,Field_Reference 0297 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0298 4801 |H | Short_Literal 0x1 0299 e5ff | | Load 0x2,-0x1 029a 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 029b 01d5 | | Execute Vector,Field_Reference 029c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 029d 800a | | Call 0x0,0xa 029e 800f | | Call 0x0,0xf 029f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02a0 4801 |H | Short_Literal 0x1 02a1 e5ff | | Load 0x2,-0x1 02a2 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02a3 01d5 | | Execute Vector,Field_Reference 02a4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02a5 0f0f | | Execute_Immediate Equal,0xf 02a6 6807 |h | Jump_Zero 0x2ae 02a7 4801 |H | Short_Literal 0x1 02a8 e5ff | | Load 0x2,-0x1 02a9 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02aa 01d5 | | Execute Vector,Field_Reference 02ab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ac 8010 | | Call 0x0,0x10 02ad 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02ae 4801 |H | Short_Literal 0x1 02af e5ff | | Load 0x2,-0x1 02b0 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02b1 01d5 | | Execute Vector,Field_Reference 02b2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02b3 8011 | | Call 0x0,0x11 02b4 00e0 | | Load_Encached Standard_Cache 02b5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02b6 8012 | | Call 0x0,0x12 02b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02b8 e5ff | | Load 0x2,-0x1 02b9 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 02ba 0f03 | | Execute_Immediate Equal,0x3 02bb 6851 |hQ | Jump_Zero 0x30d 02bc 4802 |H | Short_Literal 0x2 02bd e5ff | | Load 0x2,-0x1 02be 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02bf 01d5 | | Execute Vector,Field_Reference 02c0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02c1 0f08 | | Execute_Immediate Equal,0x8 02c2 680e |h | Jump_Zero 0x2d1 02c3 4803 |H | Short_Literal 0x3 02c4 e5ff | | Load 0x2,-0x1 02c5 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02c6 01d5 | | Execute Vector,Field_Reference 02c7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02c8 800a | | Call 0x0,0xa 02c9 4801 |H | Short_Literal 0x1 02ca e5ff | | Load 0x2,-0x1 02cb 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02cc 01d5 | | Execute Vector,Field_Reference 02cd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ce 800a | | Call 0x0,0xa 02cf 8013 | | Call 0x0,0x13 02d0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02d1 4802 |H | Short_Literal 0x2 02d2 e5ff | | Load 0x2,-0x1 02d3 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02d4 01d5 | | Execute Vector,Field_Reference 02d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02d6 0f09 | | Execute_Immediate Equal,0x9 02d7 680e |h | Jump_Zero 0x2e6 02d8 4803 |H | Short_Literal 0x3 02d9 e5ff | | Load 0x2,-0x1 02da 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02db 01d5 | | Execute Vector,Field_Reference 02dc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02dd 800a | | Call 0x0,0xa 02de 4801 |H | Short_Literal 0x1 02df e5ff | | Load 0x2,-0x1 02e0 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02e1 01d5 | | Execute Vector,Field_Reference 02e2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02e3 800a | | Call 0x0,0xa 02e4 8014 | | Call 0x0,0x14 02e5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02e6 4802 |H | Short_Literal 0x2 02e7 e5ff | | Load 0x2,-0x1 02e8 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02e9 01d5 | | Execute Vector,Field_Reference 02ea 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02eb 0f07 | | Execute_Immediate Equal,0x7 02ec 693e |i> | Jump_Zero 0x42b 02ed 4801 |H | Short_Literal 0x1 02ee e5ff | | Load 0x2,-0x1 02ef 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02f0 01d5 | | Execute Vector,Field_Reference 02f1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02f2 680d |h | Jump_Zero 0x300 02f3 4803 |H | Short_Literal 0x3 02f4 e5ff | | Load 0x2,-0x1 02f5 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02f6 01d5 | | Execute Vector,Field_Reference 02f7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f8 4801 |H | Short_Literal 0x1 02f9 e5ff | | Load 0x2,-0x1 02fa 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 02fb 01d5 | | Execute Vector,Field_Reference 02fc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02fd 800a | | Call 0x0,0xa 02fe 8015 | | Call 0x0,0x15 02ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0300 4803 |H | Short_Literal 0x3 0301 e5ff | | Load 0x2,-0x1 0302 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0303 01d5 | | Execute Vector,Field_Reference 0304 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0305 4801 |H | Short_Literal 0x1 0306 e5ff | | Load 0x2,-0x1 0307 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0308 01d5 | | Execute Vector,Field_Reference 0309 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 030a 800a | | Call 0x0,0xa 030b 8016 | | Call 0x0,0x16 030c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 030d 4802 |H | Short_Literal 0x2 030e e5ff | | Load 0x2,-0x1 030f 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0310 01d5 | | Execute Vector,Field_Reference 0311 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0312 0f0a | | Execute_Immediate Equal,0xa 0313 680d |h | Jump_Zero 0x321 0314 4804 |H | Short_Literal 0x4 0315 e5ff | | Load 0x2,-0x1 0316 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0317 01d5 | | Execute Vector,Field_Reference 0318 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0319 4801 |H | Short_Literal 0x1 031a e5ff | | Load 0x2,-0x1 031b 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 031c 01d5 | | Execute Vector,Field_Reference 031d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 031e 800a | | Call 0x0,0xa 031f 8016 | | Call 0x0,0x16 0320 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0321 4804 |H | Short_Literal 0x4 0322 e5ff | | Load 0x2,-0x1 0323 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0324 01d5 | | Execute Vector,Field_Reference 0325 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0326 4801 |H | Short_Literal 0x1 0327 e5ff | | Load 0x2,-0x1 0328 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0329 01d5 | | Execute Vector,Field_Reference 032a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 032b 800a | | Call 0x0,0xa 032c 8017 | | Call 0x0,0x17 032d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 032e 4801 |H | Short_Literal 0x1 032f e5ff | | Load 0x2,-0x1 0330 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0331 01d5 | | Execute Vector,Field_Reference 0332 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0333 8018 | | Call 0x0,0x18 0334 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0335 e5ff | | Load 0x2,-0x1 0336 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0337 0f01 | | Execute_Immediate Equal,0x1 0338 6816 |h | Jump_Zero 0x34f 0339 4801 |H | Short_Literal 0x1 033a e5ff | | Load 0x2,-0x1 033b 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 033c 01d5 | | Execute Vector,Field_Reference 033d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 033e 6808 |h | Jump_Zero 0x347 033f 4801 |H | Short_Literal 0x1 0340 e5ff | | Load 0x2,-0x1 0341 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0342 01d5 | | Execute Vector,Field_Reference 0343 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0344 800a | | Call 0x0,0xa 0345 8019 | | Call 0x0,0x19 0346 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0347 4801 |H | Short_Literal 0x1 0348 e5ff | | Load 0x2,-0x1 0349 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 034a 01d5 | | Execute Vector,Field_Reference 034b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 034c 800a | | Call 0x0,0xa 034d 801a | | Call 0x0,0x1a 034e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 034f 4802 |H | Short_Literal 0x2 0350 e5ff | | Load 0x2,-0x1 0351 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0352 01d5 | | Execute Vector,Field_Reference 0353 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0354 0f0a | | Execute_Immediate Equal,0xa 0355 6808 |h | Jump_Zero 0x35e 0356 4801 |H | Short_Literal 0x1 0357 e5ff | | Load 0x2,-0x1 0358 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0359 01d5 | | Execute Vector,Field_Reference 035a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 035b 800a | | Call 0x0,0xa 035c 801a | | Call 0x0,0x1a 035d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 035e 4801 |H | Short_Literal 0x1 035f e5ff | | Load 0x2,-0x1 0360 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0361 01d5 | | Execute Vector,Field_Reference 0362 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0363 800a | | Call 0x0,0xa 0364 801b | | Call 0x0,0x1b 0365 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0366 4801 |H | Short_Literal 0x1 0367 e5ff | | Load 0x2,-0x1 0368 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0369 01d5 | | Execute Vector,Field_Reference 036a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 036b 0f05 | | Execute_Immediate Equal,0x5 036c 6816 |h | Jump_Zero 0x383 036d e01c | | Load 0x0,0x1c 036e 70bc |p | Jump_Nonzero 0x42b 036f 4803 |H | Short_Literal 0x3 0370 e5ff | | Load 0x2,-0x1 0371 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0372 01d5 | | Execute Vector,Field_Reference 0373 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0374 800a | | Call 0x0,0xa 0375 4801 |H | Short_Literal 0x1 0376 e5ff | | Load 0x2,-0x1 0377 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0378 01d5 | | Execute Vector,Field_Reference 0379 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 037a 800a | | Call 0x0,0xa 037b 801d | | Call 0x0,0x1d 037c 4801 |H | Short_Literal 0x1 037d c01c | | Store 0x0,0x1c 037e 0092 060c | | Action Push_String_Extended,0x60c ; "JOUEUR EST DEPLACE" 0380 e006 | | Load 0x0,0x6 0381 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0382 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0383 4803 |H | Short_Literal 0x3 0384 e5ff | | Load 0x2,-0x1 0385 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0386 01d5 | | Execute Vector,Field_Reference 0387 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0388 800a | | Call 0x0,0xa 0389 4801 |H | Short_Literal 0x1 038a e5ff | | Load 0x2,-0x1 038b 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 038c 01d5 | | Execute Vector,Field_Reference 038d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 038e 801d | | Call 0x0,0x1d 038f 0092 060d | | Action Push_String_Extended,0x60d ; "UN PERSONNAGE EST DEPLACE" 0391 e006 | | Load 0x0,0x6 0392 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0393 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0394 4801 |H | Short_Literal 0x1 0395 e5ff | | Load 0x2,-0x1 0396 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0397 01d5 | | Execute Vector,Field_Reference 0398 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0399 801e | | Call 0x0,0x1e 039a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 039b 4801 |H | Short_Literal 0x1 039c c01f | | Store 0x0,0x1f 039d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 039e e5ff | | Load 0x2,-0x1 039f 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 03a0 0f01 | | Execute_Immediate Equal,0x1 03a1 6808 |h | Jump_Zero 0x3aa 03a2 4801 |H | Short_Literal 0x1 03a3 e5ff | | Load 0x2,-0x1 03a4 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03a5 01d5 | | Execute Vector,Field_Reference 03a6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03a7 800a | | Call 0x0,0xa 03a8 8020 | | Call 0x0,0x20 03a9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03aa 4802 |H | Short_Literal 0x2 03ab e5ff | | Load 0x2,-0x1 03ac 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03ad 01d5 | | Execute Vector,Field_Reference 03ae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03af 0f0a | | Execute_Immediate Equal,0xa 03b0 6808 |h | Jump_Zero 0x3b9 03b1 4801 |H | Short_Literal 0x1 03b2 e5ff | | Load 0x2,-0x1 03b3 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03b4 01d5 | | Execute Vector,Field_Reference 03b5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03b6 800a | | Call 0x0,0xa 03b7 8021 | ! | Call 0x0,0x21 03b8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03b9 4801 |H | Short_Literal 0x1 03ba e5ff | | Load 0x2,-0x1 03bb 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03bc 01d5 | | Execute Vector,Field_Reference 03bd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03be 800a | | Call 0x0,0xa 03bf 8022 | " | Call 0x0,0x22 03c0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03c1 4801 |H | Short_Literal 0x1 03c2 e5ff | | Load 0x2,-0x1 03c3 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03c4 01d5 | | Execute Vector,Field_Reference 03c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03c6 0f04 | | Execute_Immediate Equal,0x4 03c7 6808 |h | Jump_Zero 0x3d0 03c8 4801 |H | Short_Literal 0x1 03c9 e5ff | | Load 0x2,-0x1 03ca 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03cb 01d5 | | Execute Vector,Field_Reference 03cc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03cd 800a | | Call 0x0,0xa 03ce 8023 | # | Call 0x0,0x23 03cf 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03d0 4801 |H | Short_Literal 0x1 03d1 e5ff | | Load 0x2,-0x1 03d2 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03d3 01d5 | | Execute Vector,Field_Reference 03d4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03d5 800a | | Call 0x0,0xa 03d6 8024 | $ | Call 0x0,0x24 03d7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03d8 e025 | % | Load 0x0,0x25 03d9 4802 |H | Short_Literal 0x2 03da e5ff | | Load 0x2,-0x1 03db 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03dc 01d5 | | Execute Vector,Field_Reference 03dd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03de 8026 | & | Call 0x0,0x26 03df c025 | % | Store 0x0,0x25 03e0 4802 |H | Short_Literal 0x2 03e1 e5ff | | Load 0x2,-0x1 03e2 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03e3 01d5 | | Execute Vector,Field_Reference 03e4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03e5 8018 | | Call 0x0,0x18 03e6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03e7 e5ff | | Load 0x2,-0x1 03e8 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 03e9 0f02 | | Execute_Immediate Equal,0x2 03ea 6820 |h | Jump_Zero 0x40b 03eb 4801 |H | Short_Literal 0x1 03ec e5ff | | Load 0x2,-0x1 03ed 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03ee 01d5 | | Execute Vector,Field_Reference 03ef 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03f0 680d |h | Jump_Zero 0x3fe 03f1 4802 |H | Short_Literal 0x2 03f2 e5ff | | Load 0x2,-0x1 03f3 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03f4 01d5 | | Execute Vector,Field_Reference 03f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03f6 4801 |H | Short_Literal 0x1 03f7 e5ff | | Load 0x2,-0x1 03f8 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 03f9 01d5 | | Execute Vector,Field_Reference 03fa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03fb 800a | | Call 0x0,0xa 03fc 8027 | ' | Call 0x0,0x27 03fd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03fe 4802 |H | Short_Literal 0x2 03ff e5ff | | Load 0x2,-0x1 0400 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0401 01d5 | | Execute Vector,Field_Reference 0402 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0403 4801 |H | Short_Literal 0x1 0404 e5ff | | Load 0x2,-0x1 0405 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0406 01d5 | | Execute Vector,Field_Reference 0407 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0408 800a | | Call 0x0,0xa 0409 8028 | ( | Call 0x0,0x28 040a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 040b 4802 |H | Short_Literal 0x2 040c e5ff | | Load 0x2,-0x1 040d 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 040e 01d5 | | Execute Vector,Field_Reference 040f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0410 0f0a | | Execute_Immediate Equal,0xa 0411 680d |h | Jump_Zero 0x41f 0412 4803 |H | Short_Literal 0x3 0413 e5ff | | Load 0x2,-0x1 0414 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0415 01d5 | | Execute Vector,Field_Reference 0416 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0417 4801 |H | Short_Literal 0x1 0418 e5ff | | Load 0x2,-0x1 0419 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 041a 01d5 | | Execute Vector,Field_Reference 041b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 041c 800a | | Call 0x0,0xa 041d 8028 | ( | Call 0x0,0x28 041e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 041f 4803 |H | Short_Literal 0x3 0420 e5ff | | Load 0x2,-0x1 0421 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0422 01d5 | | Execute Vector,Field_Reference 0423 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0424 4801 |H | Short_Literal 0x1 0425 e5ff | | Load 0x2,-0x1 0426 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0427 01d5 | | Execute Vector,Field_Reference 0428 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0429 800a | | Call 0x0,0xa 042a 8029 | ) | Call 0x0,0x29 042b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 042c 0000 0000 | | .BLANK 0000[0x4] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0435 | 5 | .CONST 0x0435 ; Address of begin 0431 0004 | | .CONST 0x0004 ; Address of exception handler 0432 0002 | | .CONST 0x0002 ; Number of locals 0433 INIT_0430: 0433 e215 | | Load 0x1,0x15 0434 0007 | | Action Break_Optional 0435 BODY_0430: 0435 00db | | Load_Top At_Offset_3 0436 00d8 | | Load_Top At_Offset_0 0437 e214 | | Load 0x1,0x14 0438 1c06 | | Execute_Immediate Run_Utility,0x6 0439 e215 | | Load 0x1,0x15 043a 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 043b 0039 | 9 | Store_Top Access,At_Offset_1 043c 00db | | Load_Top At_Offset_3 043d 4602 |F | Jump_Case 0x3 043e 7815 |x | Jump 0x454 ; case 0x0 043f 780b |x | Jump 0x44b ; case 0x1 0440 7800 |x | Jump 0x441 ; case 0x2 0441 e5fe | | Load 0x2,-0x2 0442 e002 | | Load 0x0,0x2 0443 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0444 00e2 | | Load_Encached Integer_Cache 0445 00e0 | | Load_Encached Standard_Cache 0446 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0447 00d9 | | Load_Top At_Offset_1 0448 0227 | ' | Execute Access,All_Reference 0449 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 044a 7809 |x | Jump 0x454 044b 00d8 | | Load_Top At_Offset_0 044c 0229 | ) | Execute Access,All_Read 044d 00d8 | | Load_Top At_Offset_0 044e 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 044f e5fe | | Load 0x2,-0x2 0450 8026 | & | Call 0x0,0x26 0451 00d9 | | Load_Top At_Offset_1 0452 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 0453 00d1 | | Pop_Control Pop_Count_1 0454 00d8 | | Load_Top At_Offset_0 0455 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0456 0000 0000 | | .XXX[0x2] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045d | ] | .CONST 0x045d ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0002 | | .CONST 0x0002 ; Number of locals 045b INIT_0458: 045b e215 | | Load 0x1,0x15 045c 0007 | | Action Break_Optional 045d BODY_0458: 045d 4800 |H | Short_Literal 0x0 045e 4801 |H | Short_Literal 0x1 045f e215 | | Load 0x1,0x15 0460 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0461 0039 | 9 | Store_Top Access,At_Offset_1 0462 00db | | Load_Top At_Offset_3 0463 00d9 | | Load_Top At_Offset_1 0464 0227 | ' | Execute Access,All_Reference 0465 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 0466 e5fe | | Load 0x2,-0x2 0467 00d9 | | Load_Top At_Offset_1 0468 0227 | ' | Execute Access,All_Reference 0469 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 046a e5fd | | Load 0x2,-0x3 046b 00d9 | | Load_Top At_Offset_1 046c 0227 | ' | Execute Access,All_Reference 046d 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 046e 00d8 | | Load_Top At_Offset_0 046f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0473 | s | .CONST 0x0473 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0001 | | .CONST 0x0001 ; Number of locals 0473 BODY_0470: 0473 INIT_0470: 0473 4607 |F | Jump_Case 0x8 0474 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0475 7807 |x | Jump 0x47d ; case 0x1 0476 780a |x | Jump 0x481 ; case 0x2 0477 780e |x | Jump 0x486 ; case 0x3 0478 7811 |x | Jump 0x48a ; case 0x4 0479 7812 |x | Jump 0x48c ; case 0x5 047a 7813 |x | Jump 0x48e ; case 0x6 047b 7816 |x | Jump 0x492 ; case 0x7 047c 4302 |C | .XXX[0x1] 047d 00da | | Load_Top At_Offset_2 047e 0091 05f9 | | Action Push_String_Extended_Indexed,0x5f9 ; "AFFICHER" 0480 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0481 00db | | Load_Top At_Offset_3 0482 00db | | Load_Top At_Offset_3 0483 00e0 | | Load_Encached Standard_Cache 0484 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0485 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0486 00da | | Load_Top At_Offset_2 0487 00e0 | | Load_Encached Standard_Cache 0488 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0489 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 048a 00db | | Load_Top At_Offset_3 048b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 048c 00db | | Load_Top At_Offset_3 048d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 048e e21e | | Load 0x1,0x1e 048f 00dc | | Load_Top At_Offset_4 0490 0267 | g | Execute Discrete,Predecessor 0491 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0492 e21e | | Load 0x1,0x1e 0493 00dc | | Load_Top At_Offset_4 0494 0268 | h | Execute Discrete,Successor 0495 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0496 0000 0000 | | .XXX[0x2] 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049b | | .CONST 0x049b ; Address of begin 0499 04a1 | | .CONST 0x04a1 ; Address of exception handler 049a 0001 | | .CONST 0x0001 ; Number of locals 049b BODY_0498: 049b INIT_0498: 049b 00da | | Load_Top At_Offset_2 049c e002 | | Load 0x0,0x2 049d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 049e e20d | | Load 0x1,0xd 049f 1c02 | | Execute_Immediate Run_Utility,0x2 04a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a1 TRAP_0498: 04a1 010e | | Execute Exception,Is_Constraint_Error 04a2 6802 |h | Jump_Zero 0x4a5 04a3 4810 |H | Short_Literal 0x10 04a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a5 0100 | | Execute Exception,Raise 04a6 0000 0000 | | .XXX[0x2] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab 00da | | Load_Top At_Offset_2 04ac e002 | | Load 0x0,0x2 04ad 1816 | | Execute Package,Field_Execute,Field_Number 0x16 04ae e21e | | Load 0x1,0x1e 04af 1c02 | | Execute_Immediate Run_Utility,0x2 04b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04b1 0000 0000 | | .BLANK 0000[0x7] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04bb | | .CONST 0x04bb ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0001 | | .CONST 0x0001 ; Number of locals 04bb BODY_04b8: 04bb INIT_04b8: 04bb 00da | | Load_Top At_Offset_2 04bc 0227 | ' | Execute Access,All_Reference 04bd 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04be 705c |p\ | Jump_Nonzero 0x51b 04bf 00da | | Load_Top At_Offset_2 04c0 0227 | ' | Execute Access,All_Reference 04c1 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 04c2 8221 | ! | Call 0x1,0x21 04c3 00da | | Load_Top At_Offset_2 04c4 0227 | ' | Execute Access,All_Reference 04c5 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 04c6 8221 | ! | Call 0x1,0x21 04c7 00da | | Load_Top At_Offset_2 04c8 0227 | ' | Execute Access,All_Reference 04c9 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04ca 4604 |F | Jump_Case 0x5 04cb 7813 |x | Jump 0x4df ; case 0x0 04cc 7821 |x! | Jump 0x4ee ; case 0x1 04cd 783e |x> | Jump 0x50c ; case 0x2 04ce 782e |x. | Jump 0x4fd ; case 0x3 04cf 7800 |x | Jump 0x4d0 ; case 0x4 04d0 00da | | Load_Top At_Offset_2 04d1 0227 | ' | Execute Access,All_Reference 04d2 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 04d3 0227 | ' | Execute Access,All_Reference 04d4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04d5 00db | | Load_Top At_Offset_3 04d6 0227 | ' | Execute Access,All_Reference 04d7 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 04d8 0227 | ' | Execute Access,All_Reference 04d9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04da 026e | n | Execute Discrete,Modulo 04db 00db | | Load_Top At_Offset_3 04dc 0227 | ' | Execute Access,All_Reference 04dd 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 04de 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04df 00da | | Load_Top At_Offset_2 04e0 0227 | ' | Execute Access,All_Reference 04e1 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 04e2 0227 | ' | Execute Access,All_Reference 04e3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04e4 00db | | Load_Top At_Offset_3 04e5 0227 | ' | Execute Access,All_Reference 04e6 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 04e7 0227 | ' | Execute Access,All_Reference 04e8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04e9 0273 | s | Execute Discrete,Plus 04ea 00db | | Load_Top At_Offset_3 04eb 0227 | ' | Execute Access,All_Reference 04ec 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 04ed 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04ee 00da | | Load_Top At_Offset_2 04ef 0227 | ' | Execute Access,All_Reference 04f0 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 04f1 0227 | ' | Execute Access,All_Reference 04f2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04f3 00db | | Load_Top At_Offset_3 04f4 0227 | ' | Execute Access,All_Reference 04f5 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 04f6 0227 | ' | Execute Access,All_Reference 04f7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04f8 0272 | r | Execute Discrete,Minus 04f9 00db | | Load_Top At_Offset_3 04fa 0227 | ' | Execute Access,All_Reference 04fb 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 04fc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04fd 00da | | Load_Top At_Offset_2 04fe 0227 | ' | Execute Access,All_Reference 04ff 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0500 0227 | ' | Execute Access,All_Reference 0501 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0502 00db | | Load_Top At_Offset_3 0503 0227 | ' | Execute Access,All_Reference 0504 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0505 0227 | ' | Execute Access,All_Reference 0506 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0507 0271 | q | Execute Discrete,Times 0508 00db | | Load_Top At_Offset_3 0509 0227 | ' | Execute Access,All_Reference 050a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 050b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 050c 00da | | Load_Top At_Offset_2 050d 0227 | ' | Execute Access,All_Reference 050e 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 050f 0227 | ' | Execute Access,All_Reference 0510 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0511 00db | | Load_Top At_Offset_3 0512 0227 | ' | Execute Access,All_Reference 0513 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0514 0227 | ' | Execute Access,All_Reference 0515 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0516 0270 | p | Execute Discrete,Divide 0517 00db | | Load_Top At_Offset_3 0518 0227 | ' | Execute Access,All_Reference 0519 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 051a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 051b 00da | | Load_Top At_Offset_2 051c 0227 | ' | Execute Access,All_Reference 051d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 051e 0f02 | | Execute_Immediate Equal,0x2 051f 6807 |h | Jump_Zero 0x527 0520 00da | | Load_Top At_Offset_2 0521 0227 | ' | Execute Access,All_Reference 0522 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0523 00db | | Load_Top At_Offset_3 0524 0227 | ' | Execute Access,All_Reference 0525 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0526 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0527 00da | | Load_Top At_Offset_2 0528 0227 | ' | Execute Access,All_Reference 0529 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 052a 8011 | | Call 0x0,0x11 052b 00db | | Load_Top At_Offset_3 052c 0227 | ' | Execute Access,All_Reference 052d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 052e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 052f 0000 | | .XXX[0x1] 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 0533 | 3 | .CONST 0x0533 ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0001 | | .CONST 0x0001 ; Number of locals 0533 BODY_0530: 0533 BODY_0530: 0533 INIT_0530: 0533 INIT_0530: 0533 4609 |F | Jump_Case 0xa 0534 7809 |x | Jump 0x53e ; case 0x0 0535 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0536 781a |x | Jump 0x551 ; case 0x2 0537 781d |x | Jump 0x555 ; case 0x3 0538 7822 |x" | Jump 0x55b ; case 0x4 0539 782c |x, | Jump 0x566 ; case 0x5 053a 7835 |x5 | Jump 0x570 ; case 0x6 053b 783f |x? | Jump 0x57b ; case 0x7 053c 784c |xL | Jump 0x589 ; case 0x8 053d 7852 |xR | Jump 0x590 ; case 0x9 053e 00da | | Load_Top At_Offset_2 053f 016c | l | Execute Variant_Record,Is_Constrained 0540 7009 |p | Jump_Nonzero 0x54a 0541 00cf | | Action Mark_Auxiliary 0542 4800 |H | Short_Literal 0x0 0543 e5ff | | Load 0x2,-0x1 0544 1c08 | | Execute_Immediate Run_Utility,0x8 0545 00d8 | | Load_Top At_Offset_0 0546 1c00 | | Execute_Immediate Run_Utility,0x0 0547 c5ff | | Store 0x2,-0x1 0548 00ce | | Action Pop_Auxiliary 0549 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 054a 00da | | Load_Top At_Offset_2 054b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 054c 4602 |F | Jump_Case 0x3 054d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 054e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 054f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0550 4302 |C | .XXX[0x1] 0551 4801 |H | Short_Literal 0x1 0552 4807 |H | Short_Literal 0x7 0553 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 0554 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0555 e5fd | | Load 0x2,-0x3 0556 00db | | Load_Top At_Offset_3 0557 1c07 | | Execute_Immediate Run_Utility,0x7 0558 e5fe | | Load 0x2,-0x2 0559 0306 | | Complete_Type Variant_Record,By_Renaming 055a 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 055b 4801 |H | Short_Literal 0x1 055c 4807 |H | Short_Literal 0x7 055d 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 055e e5fe | | Load 0x2,-0x2 055f 00d8 | | Load_Top At_Offset_0 0560 e5ff | | Load 0x2,-0x1 0561 1c06 | | Execute_Immediate Run_Utility,0x6 0562 e5ff | | Load 0x2,-0x1 0563 00db | | Load_Top At_Offset_3 0564 0305 | | Complete_Type Variant_Record,By_Constraining_Incomplete 0565 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0566 4801 |H | Short_Literal 0x1 0567 00db | | Load_Top At_Offset_3 0568 0169 | i | Execute Variant_Record,Read_Discriminant_Constraint 0569 4602 |F | Jump_Case 0x3 056a 7802 |x | Jump 0x56d ; case 0x0 056b 7801 |x | Jump 0x56d ; case 0x1 056c 7800 |x | Jump 0x56d ; case 0x2 056d e5ff | | Load 0x2,-0x1 056e 0304 | | Complete_Type Variant_Record,By_Completing_Constraint 056f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0570 00db | | Load_Top At_Offset_3 0571 4602 |F | Jump_Case 0x3 0572 7804 |x | Jump 0x577 ; case 0x0 0573 7805 |x | Jump 0x579 ; case 0x1 0574 7800 |x | Jump 0x575 ; case 0x2 0575 4802 |H | Short_Literal 0x2 0576 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0577 4801 |H | Short_Literal 0x1 0578 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0579 4803 |H | Short_Literal 0x3 057a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 057b 00db | | Load_Top At_Offset_3 057c e5fe | | Load 0x2,-0x2 057d 4602 |F | Jump_Case 0x3 057e 7804 |x | Jump 0x583 ; case 0x0 057f 7805 |x | Jump 0x585 ; case 0x1 0580 7800 |x | Jump 0x581 ; case 0x2 0581 4802 |H | Short_Literal 0x2 0582 7803 |x | Jump 0x586 0583 4801 |H | Short_Literal 0x1 0584 7801 |x | Jump 0x586 0585 4803 |H | Short_Literal 0x3 0586 e5ff | | Load 0x2,-0x1 0587 031b | | Declare_Type Variant_Record,Constrained 0588 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0589 00db | | Load_Top At_Offset_3 058a e5fe | | Load 0x2,-0x2 058b e5ff | | Load 0x2,-0x1 058c 1c06 | | Execute_Immediate Run_Utility,0x6 058d e5ff | | Load 0x2,-0x1 058e 02fc | | Declare_Variable Variant_Record,With_Constraint 058f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0590 4800 |H | Short_Literal 0x0 0591 00db | | Load_Top At_Offset_3 0592 1c07 | | Execute_Immediate Run_Utility,0x7 0593 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0594 0000 0000 | | .BLANK 0000[0x4] 0598 ; -------------------------------------------------------------------------------------- 0598 ; SUBPROGRAM 0598 ; -------------------------------------------------------------------------------------- 0598 059b | | .CONST 0x059b ; Address of begin 0599 0004 | | .CONST 0x0004 ; Address of exception handler 059a 0001 | | .CONST 0x0001 ; Number of locals 059b BODY_0598: 059b INIT_0598: 059b 4609 |F | Jump_Case 0xa 059c 7809 |x | Jump 0x5a6 ; case 0x0 059d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 059e 7818 |x | Jump 0x5b7 ; case 0x2 059f 781b |x | Jump 0x5bb ; case 0x3 05a0 783c |x< | Jump 0x5dd ; case 0x4 05a1 783b |x; | Jump 0x5dd ; case 0x5 05a2 781e |x | Jump 0x5c1 ; case 0x6 05a3 7824 |x$ | Jump 0x5c8 ; case 0x7 05a4 782d |x- | Jump 0x5d2 ; case 0x8 05a5 7833 |x3 | Jump 0x5d9 ; case 0x9 05a6 00da | | Load_Top At_Offset_2 05a7 016c | l | Execute Variant_Record,Is_Constrained 05a8 7009 |p | Jump_Nonzero 0x5b2 05a9 00cf | | Action Mark_Auxiliary 05aa 4800 |H | Short_Literal 0x0 05ab e5ff | | Load 0x2,-0x1 05ac 1c08 | | Execute_Immediate Run_Utility,0x8 05ad 00d8 | | Load_Top At_Offset_0 05ae 1c00 | | Execute_Immediate Run_Utility,0x0 05af c5ff | | Store 0x2,-0x1 05b0 00ce | | Action Pop_Auxiliary 05b1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 05b2 00da | | Load_Top At_Offset_2 05b3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05b4 0f01 | | Execute_Immediate Equal,0x1 05b5 7000 |p | Jump_Nonzero 0x5b6 05b6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 05b7 4801 |H | Short_Literal 0x1 05b8 4805 |H | Short_Literal 0x5 05b9 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 05ba 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 05bb e5fd | | Load 0x2,-0x3 05bc 00db | | Load_Top At_Offset_3 05bd 1c07 | | Execute_Immediate Run_Utility,0x7 05be e5fe | | Load 0x2,-0x2 05bf 0306 | | Complete_Type Variant_Record,By_Renaming 05c0 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 05c1 00db | | Load_Top At_Offset_3 05c2 0f01 | | Execute_Immediate Equal,0x1 05c3 7002 |p | Jump_Nonzero 0x5c6 05c4 4802 |H | Short_Literal 0x2 05c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05c6 4801 |H | Short_Literal 0x1 05c7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05c8 00db | | Load_Top At_Offset_3 05c9 e5fe | | Load 0x2,-0x2 05ca 0f01 | | Execute_Immediate Equal,0x1 05cb 7002 |p | Jump_Nonzero 0x5ce 05cc 4802 |H | Short_Literal 0x2 05cd 7801 |x | Jump 0x5cf 05ce 4801 |H | Short_Literal 0x1 05cf e5ff | | Load 0x2,-0x1 05d0 031b | | Declare_Type Variant_Record,Constrained 05d1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d2 00db | | Load_Top At_Offset_3 05d3 e5fe | | Load 0x2,-0x2 05d4 e5ff | | Load 0x2,-0x1 05d5 1c06 | | Execute_Immediate Run_Utility,0x6 05d6 e5ff | | Load 0x2,-0x1 05d7 02fc | | Declare_Variable Variant_Record,With_Constraint 05d8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d9 4800 |H | Short_Literal 0x0 05da 00db | | Load_Top At_Offset_3 05db 1c07 | | Execute_Immediate Run_Utility,0x7 05dc 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 05dd 0869 | i | Execute_Immediate Raise,0x69 05de ; -------------------------------------------------------------------------------------- 05de ; STRING TABLE 05de ; -------------------------------------------------------------------------------------- 05de 0062 | b | .STRTAB 0x0062->0x060f ; "COMMUNICATION" 05df 006d | m | .STRTAB 0x006d->0x0615 ; "COMPTEUR" 05e0 0073 | s | .STRTAB 0x0073->0x0619 ; "LIEU" 05e1 0075 | u | .STRTAB 0x0075->0x061b ; "OBJET" 05e2 0078 | x | .STRTAB 0x0078->0x061e ; "PERSONNAGE" 05e3 0080 | | .STRTAB 0x0080->0x0623 ; "JOUEUR" 05e4 0084 | | .STRTAB 0x0084->0x0626 ; "POSITIONCOURANTE" 05e5 0092 | | .STRTAB 0x0092->0x062e ; "ETAT" 05e6 0094 | | .STRTAB 0x0094->0x0630 ; "POSSESSION" 05e7 009c | | .STRTAB 0x009c->0x0635 ; "CONTENU" 05e8 00a1 | | .STRTAB 0x00a1->0x0638 ; "SENS1" 05e9 00a4 | | .STRTAB 0x00a4->0x063b ; "SENS2" 05ea 00a7 | | .STRTAB 0x00a7->0x063d ; "VERS" 05eb 00a9 | | .STRTAB 0x00a9->0x063f ; "SORTIE" 05ec 00ad | | .STRTAB 0x00ad->0x0642 ; "EST" 05ed 00ae | | .STRTAB 0x00ae->0x0644 ; "TEXTE" 05ee 00b1 | | .STRTAB 0x00b1->0x0646 ; "UNKNOWN" 05ef 00b6 | | .STRTAB 0x00b6->0x064a ; "TYPE_NODE" 05f0 00bd | | .STRTAB 0x00bd->0x064e ; "TYPE_LEAF_ID" 05f1 00c7 | | .STRTAB 0x00c7->0x0654 ; "TYPE_LEAF_NUMERIC" 05f2 00d6 | | .STRTAB 0x00d6->0x065d ; "PLUS" 05f3 00d8 | | .STRTAB 0x00d8->0x065f ; "MOINS" 05f4 00db | | .STRTAB 0x00db->0x0661 ; "DIV" 05f5 00dc | | .STRTAB 0x00dc->0x0663 ; "MULT" 05f6 00de | | .STRTAB 0x00de->0x0665 ; "MODULO" 05f7 00e2 | | .STRTAB 0x00e2->0x0668 ; "TYPE_VARIABLE" 05f8 00ed | | .STRTAB 0x00ed->0x066e ; "TYPE_FUNCTION" 05f9 00f8 | | .STRTAB 0x00f8->0x0675 ; "AFFICHER" 05fa 00fe | | .STRTAB 0x00fe->0x0679 ; "AJOUTER" 05fb 0103 | | .STRTAB 0x0103->0x067c ; "CREER" 05fc 0106 | | .STRTAB 0x0106->0x067f ; "DECRIRE" 05fd 010b | | .STRTAB 0x010b->0x0682 ; "DEPLACER" 05fe 0111 | | .STRTAB 0x0111->0x0686 ; "DETRUIRE" 05ff 0117 | | .STRTAB 0x0117->0x068a ; "FINDUJEU" 0600 011d | | .STRTAB 0x011d->0x068e ; "INFORMER" 0601 0123 | # | .STRTAB 0x0123->0x0692 ; "INVENTAIRE" 0602 012b | + | .STRTAB 0x012b->0x0697 ; "JOUEUR" 0603 012f | / | .STRTAB 0x012f->0x069a ; "MODIFIERDESCRIPTION" 0604 0140 | @ | .STRTAB 0x0140->0x06a4 ; "SUPPRIMER" 0605 0147 | G | .STRTAB 0x0147->0x06a8 ; "/" 0606 0146 | F | .STRTAB 0x0146->0x06a9 ; "+" 0607 0145 | E | .STRTAB 0x0145->0x06a9 ; "-" 0608 0144 | D | .STRTAB 0x0144->0x06aa ; "*" 0609 0143 | C | .STRTAB 0x0143->0x06aa ; "-------------------------------------" 060a 0166 | f | .STRTAB 0x0166->0x06bd ; " " 060b 0166 | f | .STRTAB 0x0166->0x06be ; "lalalalalalalalalalalala" 060c 017c | | | .STRTAB 0x017c->0x06ca ; "JOUEUR EST DEPLACE" 060d 018c | | .STRTAB 0x018c->0x06d3 ; "UN PERSONNAGE EST DEPLACE" 060e 01a4 | | .STREND 0x01a4->0x06e0 060f 434f 4d4d |COMM| .STRTAB_STRINGS 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; Debug Table 06e0 ; -------------------------------------------------------------------------------------- 06e0 0004 0008 | | .DEBUG4 0x0004,0x0008,0xd1b6,0x0000,0x0001,0x0013 06e6 000b 0732 | 2| .DBG4T 0x000b,0x0732,0x8000,0x8000 06ea 006f 0758 | o X| .DBG4T 0x006f,0x0758,0x8000,0x8000 06ee 0093 0000 | | .DBG4T 0x0093,0x0000,0x0005,0x0000 06f2 00bb 0770 | p| .DBG4T 0x00bb,0x0770,0x0002,0x0000 06f6 00d3 0777 | w| .DBG4T 0x00d3,0x0777,0x0002,0x4000 06fa 0133 0000 | 3 | .DBG4T 0x0133,0x0000,0x0005,0x0000 06fe 015b 0000 | [ | .DBG4T 0x015b,0x0000,0x0005,0x0000 0702 0183 07a3 | | .DBG4T 0x0183,0x07a3,0x0002,0x0000 0706 01b3 0000 | | .DBG4T 0x01b3,0x0000,0x0005,0x0000 070a 01db 07ae | | .DBG4T 0x01db,0x07ae,0x0002,0x0000 070e 01eb 07b2 | | .DBG4T 0x01eb,0x07b2,0x0001,0x4000 0712 0433 0844 | 3 D| .DBG4T 0x0433,0x0844,0x0002,0x4000 0716 045b 0851 | [ Q| .DBG4T 0x045b,0x0851,0x0002,0x0000 071a 0473 0000 | s | .DBG4T 0x0473,0x0000,0x0005,0x0000 071e 049b 0859 | Y| .DBG4T 0x049b,0x0859,0x0002,0x0000 0722 04ab 085d | ]| .DBG4T 0x04ab,0x085d,0x0002,0x0000 0726 04bb 0860 | `| .DBG4T 0x04bb,0x0860,0x0001,0x4000 072a 0533 0000 | 3 | .DBG4T 0x0533,0x0000,0x0005,0x0000 072e 059b 0000 | | .DBG4T 0x059b,0x0000,0x0005,0x0000 0732 ; -------------------------------------------------------------------------------------- 0732 ; Debug chain 0732 ; -------------------------------------------------------------------------------------- 0732 0012 0000 | | .DBGLEN 0x0012,0x0000 0734 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0012,0x0014,0x001a,0x0020,0x0025,0x002a,0x0035,0x0039,0x003b,0x0040,0x0050,0x0054,0x0056,0x0058,0x005a,0x005c 0746 0001 0002 | | .XXX[0x12] 0748 0003 0004 | | 074a 0005 0006 | | 074c 0007 0008 | | 074e 0009 000a | | 0750 000b 000c | | 0752 000d 000f | | 0754 0010 0011 | | 0756 0012 0013 | | 0758 ; -------------------------------------------------------------------------------------- 0758 ; Debug chain 0758 ; -------------------------------------------------------------------------------------- 0758 000b 0000 | | .DBGLEN 0x000b,0x0000 075a 006f 0074 | o t| .DBGLNO 0x006f,0x0074,0x0076,0x0078,0x007a,0x007c,0x007e,0x0080,0x0082,0x0084,0x0086 0765 0001 0003 | | .XXX[0xb] 0767 0004 0005 | | 0769 0006 0007 | | 076b 0008 0009 | | 076d 000a 000b | | 076f 000c | | 0770 ; -------------------------------------------------------------------------------------- 0770 ; Debug chain 0770 ; -------------------------------------------------------------------------------------- 0770 0001 0004 | | .DBGLEN 0x0001,0x0004 0772 00bb 00bd | | .DBGLNO 0x00bb,0x00bd,0x00c0,0x00c9,0x00cc 0777 ; -------------------------------------------------------------------------------------- 0777 ; Debug chain 0777 ; -------------------------------------------------------------------------------------- 0777 0000 0015 | | .DBGLEN 0x0000,0x0015 0779 00d3 00e6 | | .DBGLNO 0x00d3,0x00e6,0x00e8,0x00f1,0x00f3,0x00fc,0x00fe,0x0101,0x0103,0x010c,0x010e,0x0111,0x0113,0x0119,0x011b,0x011e,0x0120,0x0123,0x0125,0x0128,0x012a 078e 0001 0014 | | .XXX[0x15] 0790 0002 0003 | | 0792 0004 0005 | | 0794 0006 0007 | | 0796 0008 0009 | | 0798 000a 000b | | 079a 000c 000d | | 079c 000e 000f | | 079e 0010 0011 | | 07a0 0012 0013 | | 07a2 0015 | | 07a3 ; -------------------------------------------------------------------------------------- 07a3 ; Debug chain 07a3 ; -------------------------------------------------------------------------------------- 07a3 0000 0009 | | .DBGLEN 0x0000,0x0009 07a5 0183 018a | | .DBGLNO 0x0183,0x018a,0x018c,0x0193,0x0195,0x019c,0x019e,0x01a5,0x01a7 07ae ; -------------------------------------------------------------------------------------- 07ae ; Debug chain 07ae ; -------------------------------------------------------------------------------------- 07ae 0000 0002 | | .DBGLEN 0x0000,0x0002 07b0 01db 01dd | | .DBGLNO 0x01db,0x01dd 07b2 ; -------------------------------------------------------------------------------------- 07b2 ; Debug chain 07b2 ; -------------------------------------------------------------------------------------- 07b2 0002 0047 | G| .DBGLEN 0x0002,0x0047 07b4 01eb 01ed | | .DBGLNO 0x01eb,0x01ed,0x01ef,0x01f3,0x01f7,0x0201,0x0206,0x020c,0x0210,0x0216,0x0218,0x021c,0x022a,0x022e,0x0235,0x0243,0x024a,0x0258,0x025f,0x0265,0x0272,0x027f,0x0286,0x0293,0x02a0,0x02a7,0x02ae,0x02b8,0x02bc,0x02c3,0x02d1,0x02d8,0x02e6,0x02ed,0x02f3,0x0300,0x030d,0x0314,0x0321,0x032e,0x0335,0x0339,0x033f,0x0347,0x034f,0x0356,0x035e,0x0366,0x036d,0x036f,0x037c,0x037e,0x0383,0x038f,0x0394,0x039b,0x039e,0x03a2,0x03aa,0x03b1,0x03b9,0x03c1,0x03c8,0x03d0,0x03d8,0x03e0,0x03e7,0x03eb,0x03f1,0x03fe,0x040b,0x0412,0x041f 07fd 0001 0002 | | .XXX[0x47] 07ff 0003 0005 | | 0801 0006 0007 | | 0803 0008 0009 | | 0805 000a 000b | | 0807 003d 003e | = >| 0809 003f 0040 | ? @| 080b 0041 0042 | A B| 080d 0043 0044 | C D| 080f 0045 0046 | E F| 0811 0047 0048 | G H| 0813 000c 000d | | 0815 000e 000f | | 0817 0010 0011 | | 0819 0012 0013 | | 081b 0014 0015 | | 081d 0016 0017 | | 081f 0018 0019 | | 0821 001a 001b | | 0823 001c 001d | | 0825 001e 001f | | 0827 0020 0021 | !| 0829 0022 0023 | " #| 082b 0024 0025 | $ %| 082d 0026 0027 | & '| 082f 0028 0029 | ( )| 0831 002a 002b | * +| 0833 002c 002d | , -| 0835 002e 002f | . /| 0837 0030 0031 | 0 1| 0839 0032 0033 | 2 3| 083b 0034 0035 | 4 5| 083d 0036 0037 | 6 7| 083f 0038 0039 | 8 9| 0841 003a 003b | : ;| 0843 003c | < | 0844 ; -------------------------------------------------------------------------------------- 0844 ; Debug chain 0844 ; -------------------------------------------------------------------------------------- 0844 0001 0005 | | .DBGLEN 0x0001,0x0005 0846 0433 0435 | 3 5| .DBGLNO 0x0433,0x0435,0x043c,0x0441,0x044b,0x0454 084c 0001 0002 | | .XXX[0x5] 084e 0004 0005 | | 0850 0006 | | 0851 ; -------------------------------------------------------------------------------------- 0851 ; Debug chain 0851 ; -------------------------------------------------------------------------------------- 0851 0001 0005 | | .DBGLEN 0x0001,0x0005 0853 045b 045d | [ ]| .DBGLNO 0x045b,0x045d,0x0462,0x0466,0x046a,0x046e 0859 ; -------------------------------------------------------------------------------------- 0859 ; Debug chain 0859 ; -------------------------------------------------------------------------------------- 0859 0000 0002 | | .DBGLEN 0x0000,0x0002 085b 049b 04a3 | | .DBGLNO 0x049b,0x04a3 085d ; -------------------------------------------------------------------------------------- 085d ; Debug chain 085d ; -------------------------------------------------------------------------------------- 085d 0000 0001 | | .DBGLEN 0x0000,0x0001 085f 04ab | | .DBGLNO 0x04ab 0860 ; -------------------------------------------------------------------------------------- 0860 ; Debug chain 0860 ; -------------------------------------------------------------------------------------- 0860 0000 000c | | .DBGLEN 0x0000,0x000c 0862 04bb 04bf | | .DBGLNO 0x04bb,0x04bf,0x04c3,0x04c7,0x04d0,0x04df,0x04ee,0x04fd,0x050c,0x051b,0x0520,0x0527 086e 0001 0002 | | .XXX[0xc] 0870 0003 0004 | | 0872 0009 0005 | | 0874 0006 0007 | | 0876 0008 000a | | 0878 000b 000c | | 087a 0000 0000 | | .BLANK 0000[0x186]