|
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: 2048 (0x800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_9df0f1
└─⟦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 0240 | @ | .CONST 0x0240 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0027 | ' | .CONST 0x0027 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0013 | | .CONST 0x0013 ; Number of locals 000b INIT_0008: 000b 4801 |H | Short_Literal 0x1 000c 480a |H | Short_Literal 0xa 000d e002 | | Load 0x0,0x2 000e 029f 0033 | 3| Declare_Subprogram INIT_0030,For_Call 0010 4801 |H | Short_Literal 0x1 0011 035e | ^ | Declare_Type Array,Defined,Visible 0012 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0014 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 0016 00bf | | Action Accept_Activation 0017 4830 |H0 | Short_Literal 0x30 0018 4839 |H9 | Short_Literal 0x39 0019 00e8 | | Load_Encached Character_Cache 001a 03f8 | | Declare_Type Discrete,Constrained 001b 4861 |Ha | Short_Literal 0x61 001c 487a |Hz | Short_Literal 0x7a 001d 00e8 | | Load_Encached Character_Cache 001e 03f8 | | Declare_Type Discrete,Constrained 001f 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0020 00c7 | | Action Elaborate_Subprogram 0021 029d 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call 0023 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call 0025 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0026 00c7 | | Action Elaborate_Subprogram 0027 BODY_0008: 0027 00bc | | Action Signal_Activated 0028 00bb | | Action Signal_Completion 0029 0000 0000 | | .BLANK 0000[0x7] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0033 | 3 | .CONST 0x0033 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0001 | | .CONST 0x0001 ; Number of locals 0033 BODY_0030: 0033 INIT_0030: 0033 00d1 | | Pop_Control Pop_Count_1 0034 00da | | Load_Top At_Offset_2 0035 01dc | | Execute Vector,Last 0036 00db | | Load_Top At_Offset_3 0037 01dd | | Execute Vector,First 0038 0263 | c | Execute Discrete,Above_Bound 0039 7006 |p | Jump_Nonzero 0x40 003a 00d8 | | Load_Top At_Offset_0 003b e5ff | | Load 0x2,-0x1 003c 01d5 | | Execute Vector,Field_Reference 003d 1c00 | | Execute_Immediate Run_Utility,0x0 003e 0a01 | | Execute_Immediate Plus,0x1 003f 7ff8 | | Jump 0x38 0040 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0041 0000 0000 | | .BLANK 0000[0x7] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 005c | \ | .CONST 0x005c ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0008 | | .CONST 0x0008 ; Number of locals 004b INIT_0048: 004b 00e1 | | Load_Encached Boolean_Cache 004c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 004d 00e3 | | Load_Encached Natural_Cache 004e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 004f e20d | | Load 0x1,0xd 0050 0337 | 7 | Declare_Variable Array 0051 00d8 | | Load_Top At_Offset_0 0052 1c00 | | Execute_Immediate Run_Utility,0x0 0053 4801 |H | Short_Literal 0x1 0054 4850 |HP | Short_Literal 0x50 0055 00e9 | | Load_Encached String_Cache 0056 035b | [ | Declare_Type Array,Constrained 0057 0337 | 7 | Declare_Variable Array 0058 00e3 | | Load_Encached Natural_Cache 0059 03e9 | | Declare_Variable Discrete,Duplicate 005a 00e1 | | Load_Encached Boolean_Cache 005b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 005c BODY_0048: 005c 00e3 | | Load_Encached Natural_Cache 005d e405 | | Load 0x2,0x5 005e 8003 | | Call 0x0,0x3 005f 00d1 | | Pop_Control Pop_Count_1 0060 005b | [ | Store_Top Discrete,At_Offset_3 0061 e20d | | Load 0x1,0xd 0062 0337 | 7 | Declare_Variable Array 0063 480a |H | Short_Literal 0xa 0064 4801 |H | Short_Literal 0x1 0065 e004 | | Load 0x0,0x4 0066 00d9 | | Load_Top At_Offset_1 0067 e409 | | Load 0x2,0x9 0068 01d6 | | Execute Vector,Field_Write 0069 3ffb |? | Loop_Increasing 0x65 006a e404 | | Load 0x2,0x4 006b 01d4 | | Execute Vector,Structure_Write 006c 4801 |H | Short_Literal 0x1 006d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 006e 00cf | | Action Mark_Auxiliary 006f 7846 |xF | Jump 0xb6 0070 00da | | Load_Top At_Offset_2 0071 e405 | | Load 0x2,0x5 0072 01d7 | | Execute Vector,Field_Read 0073 00d8 | | Load_Top At_Offset_0 0074 0d3a | : | Execute_Immediate Less,0x3a 0075 700d |p | Jump_Nonzero 0x83 0076 00d8 | | Load_Top At_Offset_0 0077 0c5f | _ | Execute_Immediate Greater_Equal,0x5f 0078 7004 |p | Jump_Nonzero 0x7d 0079 00d1 | | Pop_Control Pop_Count_1 007a 4800 |H | Short_Literal 0x0 007b a402 | | Store_Unchecked 0x2,0x2 007c 7838 |x8 | Jump 0xb5 007d 0b5f | _ | Execute_Immediate Case_Compare,0x5f 007e 700a |p | Jump_Nonzero 0x89 007f e211 | | Load 0x1,0x11 0080 0260 | ` | Execute Discrete,In_Type 0081 7008 |p | Jump_Nonzero 0x8a 0082 7ff7 | | Jump 0x7a 0083 0b20 | | Execute_Immediate Case_Compare,0x20 0084 7021 |p! | Jump_Nonzero 0xa6 0085 e210 | | Load 0x1,0x10 0086 0260 | ` | Execute Discrete,In_Type 0087 7002 |p | Jump_Nonzero 0x8a 0088 7ff1 | | Jump 0x7a 0089 00d1 | | Pop_Control Pop_Count_1 008a 00d9 | | Load_Top At_Offset_1 008b 700e |p | Jump_Nonzero 0x9a 008c 00da | | Load_Top At_Offset_2 008d e405 | | Load 0x2,0x5 008e 01d7 | | Execute Vector,Field_Read 008f e403 | | Load 0x2,0x3 0090 e404 | | Load 0x2,0x4 0091 01d5 | | Execute Vector,Field_Reference 0092 8005 | | Call 0x0,0x5 0093 e403 | | Load 0x2,0x3 0094 e404 | | Load 0x2,0x4 0095 01d6 | | Execute Vector,Field_Write 0096 00da | | Load_Top At_Offset_2 0097 0a01 | | Execute_Immediate Plus,0x1 0098 005b | [ | Store_Top Discrete,At_Offset_3 0099 781b |x | Jump 0xb5 009a e403 | | Load 0x2,0x3 009b 0a01 | | Execute_Immediate Plus,0x1 009c c403 | | Store 0x2,0x3 009d e403 | | Load 0x2,0x3 009e e404 | | Load 0x2,0x4 009f 01d5 | | Execute Vector,Field_Reference 00a0 00d8 | | Load_Top At_Offset_0 00a1 8006 | | Call 0x0,0x6 00a2 00d2 | | Pop_Control Pop_Count_2 00a3 4800 |H | Short_Literal 0x0 00a4 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00a5 780f |x | Jump 0xb5 00a6 00d1 | | Pop_Control Pop_Count_1 00a7 00cf | | Action Mark_Auxiliary 00a8 7804 |x | Jump 0xad 00a9 00db | | Load_Top At_Offset_3 00aa 0a01 | | Execute_Immediate Plus,0x1 00ab c407 | | Store 0x2,0x7 00ac 00c9 | | Action Pop_Auxiliary_Loop 00ad 00db | | Load_Top At_Offset_3 00ae e405 | | Load 0x2,0x5 00af 01d7 | | Execute Vector,Field_Read 00b0 0f20 | | Execute_Immediate Equal,0x20 00b1 77f7 |w | Jump_Nonzero 0xa9 00b2 00ce | | Action Pop_Auxiliary 00b3 4801 |H | Short_Literal 0x1 00b4 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00b5 00c9 | | Action Pop_Auxiliary_Loop 00b6 00da | | Load_Top At_Offset_2 00b7 e406 | | Load 0x2,0x6 00b8 027a | z | Execute Discrete,Less_Equal 00b9 e402 | | Load 0x2,0x2 00ba 0279 | y | Execute Discrete,And 00bb 77b4 |w | Jump_Nonzero 0x70 00bc 00ce | | Action Pop_Auxiliary 00bd e402 | | Load 0x2,0x2 00be a5ff | | Store_Unchecked 0x2,-0x1 00bf e403 | | Load 0x2,0x3 00c0 a5fe | | Store_Unchecked 0x2,-0x2 00c1 e404 | | Load 0x2,0x4 00c2 e5fd | | Load 0x2,-0x3 00c3 01d4 | | Execute Vector,Structure_Write 00c4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00c5 0000 0000 | | .XXX[0x3] 00c7 0000 | | 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00d3 | | .CONST 0x00d3 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0005 | | .CONST 0x0005 ; Number of locals 00cb INIT_00c8: 00cb 00e1 | | Load_Encached Boolean_Cache 00cc e20d | | Load 0x1,0xd 00cd 0337 | 7 | Declare_Variable Array 00ce 00d8 | | Load_Top At_Offset_0 00cf 1c00 | | Execute_Immediate Run_Utility,0x0 00d0 00e3 | | Load_Encached Natural_Cache 00d1 00e1 | | Load_Encached Boolean_Cache 00d2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00d3 BODY_00c8: 00d3 8007 | | Call 0x0,0x7 00d4 8008 | | Call 0x0,0x8 00d5 8009 | | Call 0x0,0x9 00d6 00cf | | Action Mark_Auxiliary 00d7 783b |x; | Jump 0x113 00d8 00db | | Load_Top At_Offset_3 00d9 00e3 | | Load_Encached Natural_Cache 00da 00e1 | | Load_Encached Boolean_Cache 00db 820e | | Call 0x1,0xe 00dc c402 | | Store 0x2,0x2 00dd c404 | | Store 0x2,0x4 00de 00d1 | | Pop_Control Pop_Count_1 00df e402 | | Load 0x2,0x2 00e0 7006 |p | Jump_Nonzero 0xe7 00e1 e00a | | Load 0x0,0xa 00e2 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 00e3 0092 01e0 | | Action Push_String_Extended,0x1e0 ; "Y en a des caracteres que je connais pas !!" 00e5 800b | | Call 0x0,0xb 00e6 7827 |x' | Jump 0x10e 00e7 00da | | Load_Top At_Offset_2 00e8 0c05 | | Execute_Immediate Greater_Equal,0x5 00e9 6806 |h | Jump_Zero 0xf0 00ea e00a | | Load 0x0,0xa 00eb 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 00ec 0092 01e1 | | Action Push_String_Extended,0x1e1 ; "Tu peux pas faire de phrases avec moins de mots !!" 00ee 800b | | Call 0x0,0xb 00ef 781e |x | Jump 0x10e 00f0 4801 |H | Short_Literal 0x1 00f1 e403 | | Load 0x2,0x3 00f2 01d5 | | Execute Vector,Field_Reference 00f3 800c | | Call 0x0,0xc 00f4 0092 01e2 | | Action Push_String_Extended,0x1e2 ; "quit" 00f6 01df | | Execute Vector,Equal 00f7 6803 |h | Jump_Zero 0xfb 00f8 4801 |H | Short_Literal 0x1 00f9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00fa 7813 |x | Jump 0x10e 00fb 4801 |H | Short_Literal 0x1 00fc e403 | | Load 0x2,0x3 00fd 01d5 | | Execute Vector,Field_Reference 00fe 800c | | Call 0x0,0xc 00ff 0092 01e3 | | Action Push_String_Extended,0x1e3 ; "help" 0101 01df | | Execute Vector,Equal 0102 4801 |H | Short_Literal 0x1 0103 e403 | | Load 0x2,0x3 0104 01d5 | | Execute Vector,Field_Reference 0105 800c | | Call 0x0,0xc 0106 800d | | Call 0x0,0xd 0107 01df | | Execute Vector,Equal 0108 0278 | x | Execute Discrete,Or 0109 6802 |h | Jump_Zero 0x10c 010a 800e | | Call 0x0,0xe 010b 7802 |x | Jump 0x10e 010c 00db | | Load_Top At_Offset_3 010d 8213 | | Call 0x1,0x13 010e 00d9 | | Load_Top At_Offset_1 010f 800f | | Call 0x0,0xf 0110 0278 | x | Execute Discrete,Or 0111 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0112 00c9 | | Action Pop_Auxiliary_Loop 0113 00d9 | | Load_Top At_Offset_1 0114 6fc3 |o | Jump_Zero 0xd8 0115 00ce | | Action Pop_Auxiliary 0116 6005 |` | Indirect_Literal Discrete,0x11c,{0x00000000, 0x00028000} 0117 00ba | | Action Initiate_Delay 0118 8010 | | Call 0x0,0x10 0119 8011 | | Call 0x0,0x11 011a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 011b 0000 | | .XXX[0x1] 011c 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0128 | ( | .CONST 0x0128 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0003 | | .CONST 0x0003 ; Number of locals 0123 INIT_0120: 0123 e012 | | Load 0x0,0x12 0124 0322 | " | Declare_Variable Record 0125 00d8 | | Load_Top At_Offset_0 0126 1c00 | | Execute_Immediate Run_Utility,0x0 0127 00e1 | | Load_Encached Boolean_Cache 0128 BODY_0120: 0128 00d9 | | Load_Top At_Offset_1 0129 8013 | | Call 0x0,0x13 012a 8014 | | Call 0x0,0x14 012b 00d1 | | Pop_Control Pop_Count_1 012c 00d9 | | Load_Top At_Offset_1 012d 4801 |H | Short_Literal 0x1 012e e5ff | | Load 0x2,-0x1 012f 01d5 | | Execute Vector,Field_Reference 0130 800c | | Call 0x0,0xc 0131 8015 | | Call 0x0,0x15 0132 00d1 | | Pop_Control Pop_Count_1 0133 00d9 | | Load_Top At_Offset_1 0134 4802 |H | Short_Literal 0x2 0135 e5ff | | Load 0x2,-0x1 0136 01d5 | | Execute Vector,Field_Reference 0137 800c | | Call 0x0,0xc 0138 8016 | | Call 0x0,0x16 0139 00d1 | | Pop_Control Pop_Count_1 013a 00d9 | | Load_Top At_Offset_1 013b 4803 |H | Short_Literal 0x3 013c e5ff | | Load 0x2,-0x1 013d 01d5 | | Execute Vector,Field_Reference 013e 800c | | Call 0x0,0xc 013f 8017 | | Call 0x0,0x17 0140 00d1 | | Pop_Control Pop_Count_1 0141 00d9 | | Load_Top At_Offset_1 0142 4804 |H | Short_Literal 0x4 0143 e5ff | | Load 0x2,-0x1 0144 01d5 | | Execute Vector,Field_Reference 0145 800c | | Call 0x0,0xc 0146 8018 | | Call 0x0,0x18 0147 00d1 | | Pop_Control Pop_Count_1 0148 00d9 | | Load_Top At_Offset_1 0149 8019 | | Call 0x0,0x19 014a 00d9 | | Load_Top At_Offset_1 014b 801a | | Call 0x0,0x1a 014c 801b | | Call 0x0,0x1b 014d 4800 |H | Short_Literal 0x0 014e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 014f 00cf | | Action Mark_Auxiliary 0150 7806 |x | Jump 0x157 0151 00e1 | | Load_Encached Boolean_Cache 0152 801c | | Call 0x0,0x1c 0153 801d | | Call 0x0,0x1d 0154 005a | Z | Store_Top Discrete,At_Offset_2 0155 801e | | Call 0x0,0x1e 0156 00c9 | | Action Pop_Auxiliary_Loop 0157 801f | | Call 0x0,0x1f 0158 0f00 | | Execute_Immediate Equal,0x0 0159 00da | | Load_Top At_Offset_2 015a 0f00 | | Execute_Immediate Equal,0x0 015b 0279 | y | Execute Discrete,And 015c 77f4 |w | Jump_Nonzero 0x151 015d 00ce | | Action Pop_Auxiliary 015e 00d8 | | Load_Top At_Offset_0 015f a5fe | | Store_Unchecked 0x2,-0x2 0160 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0161 0000 0000 | | .BLANK 0000[0x7] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0171 | q | .CONST 0x0171 ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0003 | | .CONST 0x0003 ; Number of locals 016b INIT_0168: 016b 00e1 | | Load_Encached Boolean_Cache 016c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 016d e002 | | Load 0x0,0x2 016e 0322 | " | Declare_Variable Record 016f 00d8 | | Load_Top At_Offset_0 0170 1c00 | | Execute_Immediate Run_Utility,0x0 0171 BODY_0168: 0171 00cf | | Action Mark_Auxiliary 0172 4804 |H | Short_Literal 0x4 0173 4801 |H | Short_Literal 0x1 0174 0007 | | Action Break_Optional 0175 00d8 | | Load_Top At_Offset_0 0176 e5ff | | Load 0x2,-0x1 0177 01d5 | | Execute Vector,Field_Reference 0178 e004 | | Load 0x0,0x4 0179 017f | | Execute Record,Equal 017a 7012 |p | Jump_Nonzero 0x18d 017b 00d8 | | Load_Top At_Offset_0 017c e5ff | | Load 0x2,-0x1 017d 01d5 | | Execute Vector,Field_Reference 017e 800c | | Call 0x0,0xc 017f 8020 | | Call 0x0,0x20 0180 700c |p | Jump_Nonzero 0x18d 0181 4800 |H | Short_Literal 0x0 0182 a402 | | Store_Unchecked 0x2,0x2 0183 0092 01e4 | | Action Push_String_Extended,0x1e4 ; " " 0185 00d9 | | Load_Top At_Offset_1 0186 e5ff | | Load 0x2,-0x1 0187 01d5 | | Execute Vector,Field_Reference 0188 e403 | | Load 0x2,0x3 0189 8021 | ! | Call 0x0,0x21 018a 8022 | " | Call 0x0,0x22 018b e403 | | Load 0x2,0x3 018c 017d | } | Execute Record,Structure_Write 018d 00c8 | | Action Pop_Auxiliary_Range 018e 3fe6 |? | Loop_Increasing 0x175 018f 00ce | | Action Pop_Auxiliary 0190 00d9 | | Load_Top At_Offset_1 0191 700c |p | Jump_Nonzero 0x19e 0192 e00a | | Load 0x0,0xa 0193 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0194 0092 01e5 | | Action Push_String_Extended,0x1e5 ; "Qu'est ce que vous voulez dire par " 0196 00da | | Load_Top At_Offset_2 0197 800c | | Call 0x0,0xc 0198 01cc | | Execute Vector,Catenate 0199 0092 01e6 | | Action Push_String_Extended,0x1e6 ; "?" 019b 01cc | | Execute Vector,Catenate 019c 800b | | Call 0x0,0xb 019d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 019e 00cf | | Action Mark_Auxiliary 019f 4804 |H | Short_Literal 0x4 01a0 4801 |H | Short_Literal 0x1 01a1 0007 | | Action Break_Optional 01a2 00d8 | | Load_Top At_Offset_0 01a3 e5ff | | Load 0x2,-0x1 01a4 01d5 | | Execute Vector,Field_Reference 01a5 800c | | Call 0x0,0xc 01a6 8023 | # | Call 0x0,0x23 01a7 00d9 | | Load_Top At_Offset_1 01a8 e5ff | | Load 0x2,-0x1 01a9 01d5 | | Execute Vector,Field_Reference 01aa 800c | | Call 0x0,0xc 01ab 8024 | $ | Call 0x0,0x24 01ac 0278 | x | Execute Discrete,Or 01ad 6821 |h! | Jump_Zero 0x1cf 01ae 00d8 | | Load_Top At_Offset_0 01af e5ff | | Load 0x2,-0x1 01b0 01d5 | | Execute Vector,Field_Reference 01b1 800c | | Call 0x0,0xc 01b2 8025 | % | Call 0x0,0x25 01b3 8026 | & | Call 0x0,0x26 01b4 8027 | ' | Call 0x0,0x27 01b5 027f | | Execute Discrete,Equal 01b6 00d9 | | Load_Top At_Offset_1 01b7 e5ff | | Load 0x2,-0x1 01b8 01d5 | | Execute Vector,Field_Reference 01b9 800c | | Call 0x0,0xc 01ba 8025 | % | Call 0x0,0x25 01bb 8026 | & | Call 0x0,0x26 01bc 8028 | ( | Call 0x0,0x28 01bd 027f | | Execute Discrete,Equal 01be 0278 | x | Execute Discrete,Or 01bf 700f |p | Jump_Nonzero 0x1cf 01c0 4800 |H | Short_Literal 0x0 01c1 a402 | | Store_Unchecked 0x2,0x2 01c2 e00a | | Load 0x0,0xa 01c3 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 01c4 0092 01e7 | | Action Push_String_Extended,0x1e7 ; "Je ne vois de " 01c6 00da | | Load_Top At_Offset_2 01c7 e5ff | | Load 0x2,-0x1 01c8 01d5 | | Execute Vector,Field_Reference 01c9 800c | | Call 0x0,0xc 01ca 01cc | | Execute Vector,Catenate 01cb 0092 01e8 | | Action Push_String_Extended,0x1e8 ; " a ma portee." 01cd 01cc | | Execute Vector,Catenate 01ce 800b | | Call 0x0,0xb 01cf 00c8 | | Action Pop_Auxiliary_Range 01d0 3fd1 |? | Loop_Increasing 0x1a2 01d1 00ce | | Action Pop_Auxiliary 01d2 00d9 | | Load_Top At_Offset_1 01d3 680b |h | Jump_Zero 0x1df 01d4 00e1 | | Load_Encached Boolean_Cache 01d5 e5ff | | Load 0x2,-0x1 01d6 8212 | | Call 0x1,0x12 01d7 005a | Z | Store_Top Discrete,At_Offset_2 01d8 8029 | ) | Call 0x0,0x29 01d9 00d9 | | Load_Top At_Offset_1 01da 7004 |p | Jump_Nonzero 0x1df 01db e00a | | Load 0x0,0xa 01dc 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 01dd 802a | * | Call 0x0,0x2a 01de 800b | | Call 0x0,0xb 01df 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; STRING TABLE 01e0 ; -------------------------------------------------------------------------------------- 01e0 0014 | | .STRTAB 0x0014->0x01ea ; "Y en a des caracteres que je connais pas !!" 01e1 003d | = | .STRTAB 0x003d->0x01ff ; "Tu peux pas faire de phrases avec moins de mots !!" 01e2 006d | m | .STRTAB 0x006d->0x0218 ; "quit" 01e3 006f | o | .STRTAB 0x006f->0x021a ; "help" 01e4 0071 | q | .STRTAB 0x0071->0x021c ; " " 01e5 0070 | p | .STRTAB 0x0070->0x021d ; "Qu'est ce que vous voulez dire par " 01e6 0091 | | .STRTAB 0x0091->0x022e ; "?" 01e7 0090 | | .STRTAB 0x0090->0x022f ; "Je ne vois de " 01e8 009c | | .STRTAB 0x009c->0x0236 ; " a ma portee." 01e9 00a7 | | .STREND 0x00a7->0x023c 01ea 5920 656e |Y en| .STRTAB_STRINGS 023d 0000 0000 | | .XXX[0x3] 023f 0000 | | 0240 ; -------------------------------------------------------------------------------------- 0240 ; Debug Table 0240 ; -------------------------------------------------------------------------------------- 0240 0004 0009 | | .DEBUG4 0x0004,0x0009,0x0001,0x0000,0x0001,0x0007 0246 000b 0262 | b| .DBG4T 0x000b,0x0262,0x8000,0x8000 024a 0017 026a | j| .DBG4T 0x0017,0x026a,0x8000,0x0000 024e 0033 0000 | 3 | .DBG4T 0x0033,0x0000,0x0005,0x0000 0252 004b 0272 | K r| .DBG4T 0x004b,0x0272,0x0001,0x4000 0256 00cb 029e | | .DBG4T 0x00cb,0x029e,0x0001,0x4000 025a 0123 02c8 | # | .DBG4T 0x0123,0x02c8,0x0001,0x4000 025e 016b 02e6 | k | .DBG4T 0x016b,0x02e6,0x0001,0x0000 0262 ; -------------------------------------------------------------------------------------- 0262 ; Debug chain 0262 ; -------------------------------------------------------------------------------------- 0262 0003 0000 | | .DBGLEN 0x0003,0x0000 0264 000b 0012 | | .DBGLNO 0x000b,0x0012,0x0014 0267 0002 0003 | | .XXX[0x3] 0269 0004 | | 026a ; -------------------------------------------------------------------------------------- 026a ; Debug chain 026a ; -------------------------------------------------------------------------------------- 026a 0006 0000 | | .DBGLEN 0x0006,0x0000 026c 0017 001b | | .DBGLNO 0x0017,0x001b,0x001f,0x0021,0x0023,0x0025 0272 ; -------------------------------------------------------------------------------------- 0272 ; Debug chain 0272 ; -------------------------------------------------------------------------------------- 0272 0006 0012 | | .DBGLEN 0x0006,0x0012 0274 004b 004d | K M| .DBGLNO 0x004b,0x004d,0x004f,0x0053,0x0058,0x005a,0x005c,0x0061,0x006c,0x0070,0x007a,0x008a,0x008c,0x0096,0x009a,0x009d,0x00a3,0x00a9,0x00ad,0x00b3,0x00b6,0x00bd,0x00bf,0x00c1 028c 0001 0002 | | .XXX[0x12] 028e 0003 0005 | | 0290 000f 0006 | | 0292 0007 0008 | | 0294 0009 000a | | 0296 000b 000d | | 0298 000c 000e | | 029a 0004 0010 | | 029c 0011 0012 | | 029e ; -------------------------------------------------------------------------------------- 029e ; Debug chain 029e ; -------------------------------------------------------------------------------------- 029e 0004 0012 | | .DBGLEN 0x0004,0x0012 02a0 00cb 00cc | | .DBGLNO 0x00cb,0x00cc,0x00d0,0x00d1,0x00d3,0x00d4,0x00d5,0x00d8,0x00df,0x00e1,0x00e7,0x00ea,0x00f0,0x00f8,0x00fb,0x010a,0x010c,0x010e,0x0113,0x0116,0x0118,0x0119 02b6 0001 0002 | | .XXX[0x12] 02b8 0003 0005 | | 02ba 0006 0007 | | 02bc 0008 0009 | | 02be 000a 000b | | 02c0 000c 000d | | 02c2 000e 000f | | 02c4 0004 0010 | | 02c6 0011 0012 | | 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; Debug chain 02c8 ; -------------------------------------------------------------------------------------- 02c8 0002 000d | | .DBGLEN 0x0002,0x000d 02ca 0123 0127 | # '| .DBGLNO 0x0123,0x0127,0x0128,0x012c,0x0133,0x013a,0x0141,0x0148,0x014a,0x014c,0x014d,0x0151,0x0155,0x0157,0x015e 02d9 0001 0002 | | .XXX[0xd] 02db 0003 0004 | | 02dd 0005 0006 | | 02df 0007 0008 | | 02e1 0009 000b | | 02e3 000c 000a | | 02e5 000d | | 02e6 ; -------------------------------------------------------------------------------------- 02e6 ; Debug chain 02e6 ; -------------------------------------------------------------------------------------- 02e6 0002 0010 | | .DBGLEN 0x0002,0x0010 02e8 016b 016d | k m| .DBGLNO 0x016b,0x016d,0x0172,0x0175,0x0181,0x0183,0x0190,0x0192,0x019f,0x01a2,0x01ae,0x01c0,0x01c2,0x01d2,0x01d4,0x01d8,0x01d9,0x01db 02fa 0000 0000 | | .BLANK 0000[0x106]