DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦7f433e1a5⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_9df0f1

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

Disassembly

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]