|
|
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 - metrics - 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 For_Call,INIT_0030
0010 4801 |H | Short_Literal 0x1
0011 035e | ^ | Declare_Type Array,Defined,Visible
0012 029a 004b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0048
0014 029a 00cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c8
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 For_Outer_Call,INIT_0120
0023 029d 016b | k| Declare_Subprogram For_Outer_Call,INIT_0168
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,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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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]