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

⟦47a07a7a2⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1f44ad

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦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 0378       | x  |		.CONST	0x0378								; 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 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0037       | 7  |		.CONST	0x0037								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0019       |    |		.CONST	0x0019								; Number of locals
000b			INIT_0008:
000b 029a 0043  |   C|		Declare_Subprogram	INIT_0040,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 4800       |H   |		Short_Literal	0x0
000f 4802       |H   |		Short_Literal	0x2
0010 029f 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Call
0012 03fd       |    |		Declare_Type	Discrete,Defined
0013 00d8       |    |		Load_Top	At_Offset_0
0014 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0015 029b 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Unelaborated
0017 029b 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Unelaborated
0019 029b 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Unelaborated
001b 029b 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Unelaborated
001d 029b 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Unelaborated
001f 029b 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Unelaborated
0021 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0022 00c7       |    |		Action	Elaborate_Subprogram
0023 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0024 00c7       |    |		Action	Elaborate_Subprogram
0025 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0026 00c7       |    |		Action	Elaborate_Subprogram
0027 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0028 00c7       |    |		Action	Elaborate_Subprogram
0029 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
002a 00c7       |    |		Action	Elaborate_Subprogram
002b 029d 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call
002d 029d 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call
002f 029d 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call
0031 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0032 00c7       |    |		Action	Elaborate_Subprogram
0033 029d 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call
0035 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0036 00c7       |    |		Action	Elaborate_Subprogram
0037			BODY_0008:
0037 00bc       |    |		Action	Signal_Activated
0038 00bb       |    |		Action	Signal_Completion
0039 0000 0000  |    |		.BLANK	0000[0x7]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 004c       | L  |		.CONST	0x004c								; Address of begin
0041 0004       |    |		.CONST	0x0004								; Address of exception handler
0042 0003       |    |		.CONST	0x0003								; Number of locals
0043			INIT_0040:
0043 e002       |    |		Load	0x0,0x2
0044 02ff       |    |		Declare_Variable	Variant_Record
0045 00d8       |    |		Load_Top	At_Offset_0
0046 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0047 0093 0000  |    |		push_full_address	0x0
0049 6052       |`R  |		Indirect_Literal	Discrete,0x9c,{0x80000000, 0x00010000}
004a 0273       | s  |		Execute	Discrete,Plus
004b 0007       |    |		Action	Break_Optional
004c			BODY_0040:
004c e5ff       |    |		Load	0x2,-0x1
004d 8003       |    |		Call	0x0,0x3
004e 00da       |    |		Load_Top	At_Offset_2
004f 016d       | m  |		Execute	Variant_Record,Structure_Write
0050 e20f       |    |		Load	0x1,0xf
0051 4602       |F   |		Jump_Case	0x3
0052 7814       |x   |		Jump	0x67								; case 0x0
0053 781c       |x   |		Jump	0x70								; case 0x1
0054 7800       |x   |		Jump	0x55								; case 0x2
0055 00d9       |    |		Load_Top	At_Offset_1
0056 8004       |    |		Call	0x0,0x4
0057 4607       |F   |		Jump_Case	0x8
0058 7807       |x   |		Jump	0x60								; case 0x0
0059 7808       |x   |		Jump	0x62								; case 0x1
005a 7805       |x   |		Jump	0x60								; case 0x2
005b 7809       |x   |		Jump	0x65								; case 0x3
005c 7803       |x   |		Jump	0x60								; case 0x4
005d 7802       |x   |		Jump	0x60								; case 0x5
005e 7801       |x   |		Jump	0x60								; case 0x6
005f 7800       |x   |		Jump	0x60								; case 0x7
0060 00d8       |    |		Load_Top	At_Offset_0
0061 0257       | W  |		Execute	Discrete,Raise
0062 4801       |H   |		Short_Literal	0x1
0063 a20f       |    |		Store_Unchecked	0x1,0xf
0064 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0065 8215       |    |		Call	0x1,0x15
0066 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0067 00d9       |    |		Load_Top	At_Offset_1
0068 8004       |    |		Call	0x0,0x4
0069 0f01       |    |		Execute_Immediate	Equal,0x1
006a 6803       |h   |		Jump_Zero	0x6e
006b 4801       |H   |		Short_Literal	0x1
006c a20f       |    |		Store_Unchecked	0x1,0xf
006d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
006e 00d8       |    |		Load_Top	At_Offset_0
006f 0257       | W  |		Execute	Discrete,Raise
0070 00d9       |    |		Load_Top	At_Offset_1
0071 8004       |    |		Call	0x0,0x4
0072 4607       |F   |		Jump_Case	0x8
0073 7826       |x&  |		Jump	0x9a								; case 0x0
0074 7825       |x%  |		Jump	0x9a								; case 0x1
0075 7820       |x   |		Jump	0x96								; case 0x2
0076 7823       |x#  |		Jump	0x9a								; case 0x3
0077 7822       |x"  |		Jump	0x9a								; case 0x4
0078 780b       |x   |		Jump	0x84								; case 0x5
0079 7813       |x   |		Jump	0x8d								; case 0x6
007a 7800       |x   |		Jump	0x7b								; case 0x7
007b 0092 031a  |    |		Action	Push_String_Extended,0x31a					; "suppr BDD : "
007d e5ff       |    |		Load	0x2,-0x1
007e 01cc       |    |		Execute	Vector,Catenate
007f e005       |    |		Load	0x0,0x5
0080 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0081 00d9       |    |		Load_Top	At_Offset_1
0082 8213       |    |		Call	0x1,0x13
0083 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0084 0092 031b  |    |		Action	Push_String_Extended,0x31b					; "ajout BDD : "
0086 e5ff       |    |		Load	0x2,-0x1
0087 01cc       |    |		Execute	Vector,Catenate
0088 e005       |    |		Load	0x0,0x5
0089 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
008a 00d9       |    |		Load_Top	At_Offset_1
008b 8211       |    |		Call	0x1,0x11
008c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
008d 0092 031c  |    |		Action	Push_String_Extended,0x31c					; "modif Bdd : "
008f e5ff       |    |		Load	0x2,-0x1
0090 01cc       |    |		Execute	Vector,Catenate
0091 e005       |    |		Load	0x0,0x5
0092 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0093 00d9       |    |		Load_Top	At_Offset_1
0094 8212       |    |		Call	0x1,0x12
0095 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0096 8214       |    |		Call	0x1,0x14
0097 4802       |H   |		Short_Literal	0x2
0098 a20f       |    |		Store_Unchecked	0x1,0xf
0099 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
009a 00d8       |    |		Load_Top	At_Offset_0
009b 0257       | W  |		Execute	Discrete,Raise
009c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 4607       |F   |		Jump_Case	0x8
00a4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00a5 7807       |x   |		Jump	0xad								; case 0x1
00a6 780a       |x   |		Jump	0xb1								; case 0x2
00a7 780e       |x   |		Jump	0xb6								; case 0x3
00a8 7811       |x   |		Jump	0xba								; case 0x4
00a9 7812       |x   |		Jump	0xbc								; case 0x5
00aa 7813       |x   |		Jump	0xbe								; case 0x6
00ab 7816       |x   |		Jump	0xc2								; case 0x7
00ac 4302       |C   |		.XXX[0x1]
00ad 00da       |    |		Load_Top	At_Offset_2
00ae 0091 0317  |    |		Action	Push_String_Extended_Indexed,0x317				; "DEBUT"
00b0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00b1 00db       |    |		Load_Top	At_Offset_3
00b2 00db       |    |		Load_Top	At_Offset_3
00b3 00e0       |    |		Load_Encached	Standard_Cache
00b4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00b5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00b6 00da       |    |		Load_Top	At_Offset_2
00b7 00e0       |    |		Load_Encached	Standard_Cache
00b8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00b9 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00ba 00db       |    |		Load_Top	At_Offset_3
00bb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00be e20e       |    |		Load	0x1,0xe
00bf 00dc       |    |		Load_Top	At_Offset_4
00c0 0267       | g  |		Execute	Discrete,Predecessor
00c1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00c2 e20e       |    |		Load	0x1,0xe
00c3 00dc       |    |		Load_Top	At_Offset_4
00c4 0268       | h  |		Execute	Discrete,Successor
00c5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00c6 0000 0000  |    |		.XXX[0x2]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cf       |    |		.CONST	0x00cf								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0002       |    |		.CONST	0x0002								; Number of locals
00cb			INIT_00c8:
00cb e006       |    |		Load	0x0,0x6
00cc 02ff       |    |		Declare_Variable	Variant_Record
00cd 00d8       |    |		Load_Top	At_Offset_0
00ce 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00cf			BODY_00c8:
00cf 00d8       |    |		Load_Top	At_Offset_0
00d0 e5ff       |    |		Load	0x2,-0x1
00d1 8007       |    |		Call	0x0,0x7
00d2 e5ff       |    |		Load	0x2,-0x1
00d3 8008       |    |		Call	0x0,0x8
00d4 8009       |    |		Call	0x0,0x9
00d5 00d1       |    |		Pop_Control	Pop_Count_1
00d6 00d8       |    |		Load_Top	At_Offset_0
00d7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00da       |    |		Load_Top	At_Offset_2
00dc 8210       |    |		Call	0x1,0x10
00dd 800a       |    |		Call	0x0,0xa
00de 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00df 0000       |    |		.XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 010f       |    |		.CONST	0x010f								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0012       |    |		.CONST	0x0012								; Number of locals
00e3			INIT_00e0:
00e3 0093 0000  |    |		push_full_address	0x0
00e5 6106       |a   |		Indirect_Literal	Discrete,0x1ec,{0x80000000, 0x00020000}
00e6 0273       | s  |		Execute	Discrete,Plus
00e7 0007       |    |		Action	Break_Optional
00e8 00e3       |    |		Load_Encached	Natural_Cache
00e9 e006       |    |		Load	0x0,0x6
00ea 02ff       |    |		Declare_Variable	Variant_Record
00eb 00d8       |    |		Load_Top	At_Offset_0
00ec 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ed 00d8       |    |		Load_Top	At_Offset_0
00ee 02ff       |    |		Declare_Variable	Variant_Record
00ef 00d8       |    |		Load_Top	At_Offset_0
00f0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f1 e5ff       |    |		Load	0x2,-0x1
00f2 8007       |    |		Call	0x0,0x7
00f3 e00b       |    |		Load	0x0,0xb
00f4 0322       | "  |		Declare_Variable	Record
00f5 00d8       |    |		Load_Top	At_Offset_0
00f6 0322       | "  |		Declare_Variable	Record
00f7 e00c       |    |		Load	0x0,0xc
00f8 0322       | "  |		Declare_Variable	Record
00f9 00d8       |    |		Load_Top	At_Offset_0
00fa 0322       | "  |		Declare_Variable	Record
00fb e00d       |    |		Load	0x0,0xd
00fc 0322       | "  |		Declare_Variable	Record
00fd 00d8       |    |		Load_Top	At_Offset_0
00fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ff 00d8       |    |		Load_Top	At_Offset_0
0100 0322       | "  |		Declare_Variable	Record
0101 00d8       |    |		Load_Top	At_Offset_0
0102 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0103 e00e       |    |		Load	0x0,0xe
0104 0322       | "  |		Declare_Variable	Record
0105 00d8       |    |		Load_Top	At_Offset_0
0106 0322       | "  |		Declare_Variable	Record
0107 e00f       |    |		Load	0x0,0xf
0108 0322       | "  |		Declare_Variable	Record
0109 00d8       |    |		Load_Top	At_Offset_0
010a 0322       | "  |		Declare_Variable	Record
010b e010       |    |		Load	0x0,0x10
010c 0322       | "  |		Declare_Variable	Record
010d 00d8       |    |		Load_Top	At_Offset_0
010e 0322       | "  |		Declare_Variable	Record
010f			BODY_00e0:
010f e5ff       |    |		Load	0x2,-0x1
0110 8008       |    |		Call	0x0,0x8
0111 4608       |F   |		Jump_Case	0x9
0112 7808       |x   |		Jump	0x11b								; case 0x0
0113 784d       |xM  |		Jump	0x161								; case 0x1
0114 7808       |x   |		Jump	0x11d								; case 0x2
0115 7829       |x)  |		Jump	0x13f								; case 0x3
0116 78b0       |x   |		Jump	0x1c7								; case 0x4
0117 786b       |xk  |		Jump	0x183								; case 0x5
0118 788c       |x   |		Jump	0x1a5								; case 0x6
0119 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x7
011a 7800       |x   |		Jump	0x11b								; case 0x8
011b e402       |    |		Load	0x2,0x2
011c 0257       | W  |		Execute	Discrete,Raise
011d e403       |    |		Load	0x2,0x3
011e e40b       |    |		Load	0x2,0xb
011f e406       |    |		Load	0x2,0x6
0120 8011       |    |		Call	0x0,0x11
0121 00d1       |    |		Pop_Control	Pop_Count_1
0122 c403       |    |		Store	0x2,0x3
0123 e403       |    |		Load	0x2,0x3
0124 e40c       |    |		Load	0x2,0xc
0125 e403       |    |		Load	0x2,0x3
0126 0a01       |    |		Execute_Immediate	Plus,0x1
0127 00d8       |    |		Load_Top	At_Offset_0
0128 00e2       |    |		Load_Encached	Integer_Cache
0129 0260       | `  |		Execute	Discrete,In_Type
012a 7001       |p   |		Jump_Nonzero	0x12c
012b 0801       |    |		Execute_Immediate	Raise,0x1
012c e406       |    |		Load	0x2,0x6
012d 01dc       |    |		Execute	Vector,Last
012e e406       |    |		Load	0x2,0x6
012f 01cf       |    |		Execute	Vector,Slice_Read
0130 8011       |    |		Call	0x0,0x11
0131 00d1       |    |		Pop_Control	Pop_Count_1
0132 c403       |    |		Store	0x2,0x3
0133 e404       |    |		Load	0x2,0x4
0134 e40b       |    |		Load	0x2,0xb
0135 8012       |    |		Call	0x0,0x12
0136 00d1       |    |		Pop_Control	Pop_Count_1
0137 e405       |    |		Load	0x2,0x5
0138 e40c       |    |		Load	0x2,0xc
0139 8012       |    |		Call	0x0,0x12
013a 00d1       |    |		Pop_Control	Pop_Count_1
013b e405       |    |		Load	0x2,0x5
013c e404       |    |		Load	0x2,0x4
013d 8013       |    |		Call	0x0,0x13
013e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
013f e403       |    |		Load	0x2,0x3
0140 e40d       |    |		Load	0x2,0xd
0141 e406       |    |		Load	0x2,0x6
0142 8014       |    |		Call	0x0,0x14
0143 00d1       |    |		Pop_Control	Pop_Count_1
0144 c403       |    |		Store	0x2,0x3
0145 e403       |    |		Load	0x2,0x3
0146 e40e       |    |		Load	0x2,0xe
0147 e403       |    |		Load	0x2,0x3
0148 0a01       |    |		Execute_Immediate	Plus,0x1
0149 00d8       |    |		Load_Top	At_Offset_0
014a 00e2       |    |		Load_Encached	Integer_Cache
014b 0260       | `  |		Execute	Discrete,In_Type
014c 7001       |p   |		Jump_Nonzero	0x14e
014d 0801       |    |		Execute_Immediate	Raise,0x1
014e e406       |    |		Load	0x2,0x6
014f 01dc       |    |		Execute	Vector,Last
0150 e406       |    |		Load	0x2,0x6
0151 01cf       |    |		Execute	Vector,Slice_Read
0152 8014       |    |		Call	0x0,0x14
0153 00d1       |    |		Pop_Control	Pop_Count_1
0154 c403       |    |		Store	0x2,0x3
0155 e404       |    |		Load	0x2,0x4
0156 e40d       |    |		Load	0x2,0xd
0157 8015       |    |		Call	0x0,0x15
0158 00d1       |    |		Pop_Control	Pop_Count_1
0159 e405       |    |		Load	0x2,0x5
015a e40e       |    |		Load	0x2,0xe
015b 8015       |    |		Call	0x0,0x15
015c 00d1       |    |		Pop_Control	Pop_Count_1
015d e405       |    |		Load	0x2,0x5
015e e404       |    |		Load	0x2,0x4
015f 8013       |    |		Call	0x0,0x13
0160 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0161 e403       |    |		Load	0x2,0x3
0162 e407       |    |		Load	0x2,0x7
0163 e406       |    |		Load	0x2,0x6
0164 8016       |    |		Call	0x0,0x16
0165 00d1       |    |		Pop_Control	Pop_Count_1
0166 c403       |    |		Store	0x2,0x3
0167 e403       |    |		Load	0x2,0x3
0168 e408       |    |		Load	0x2,0x8
0169 e403       |    |		Load	0x2,0x3
016a 0a01       |    |		Execute_Immediate	Plus,0x1
016b 00d8       |    |		Load_Top	At_Offset_0
016c 00e2       |    |		Load_Encached	Integer_Cache
016d 0260       | `  |		Execute	Discrete,In_Type
016e 7001       |p   |		Jump_Nonzero	0x170
016f 0801       |    |		Execute_Immediate	Raise,0x1
0170 e406       |    |		Load	0x2,0x6
0171 01dc       |    |		Execute	Vector,Last
0172 e406       |    |		Load	0x2,0x6
0173 01cf       |    |		Execute	Vector,Slice_Read
0174 8016       |    |		Call	0x0,0x16
0175 00d1       |    |		Pop_Control	Pop_Count_1
0176 c403       |    |		Store	0x2,0x3
0177 e404       |    |		Load	0x2,0x4
0178 e407       |    |		Load	0x2,0x7
0179 8017       |    |		Call	0x0,0x17
017a 00d1       |    |		Pop_Control	Pop_Count_1
017b e405       |    |		Load	0x2,0x5
017c e408       |    |		Load	0x2,0x8
017d 8017       |    |		Call	0x0,0x17
017e 00d1       |    |		Pop_Control	Pop_Count_1
017f e405       |    |		Load	0x2,0x5
0180 e404       |    |		Load	0x2,0x4
0181 8013       |    |		Call	0x0,0x13
0182 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0183 e403       |    |		Load	0x2,0x3
0184 e40f       |    |		Load	0x2,0xf
0185 e406       |    |		Load	0x2,0x6
0186 8018       |    |		Call	0x0,0x18
0187 00d1       |    |		Pop_Control	Pop_Count_1
0188 c403       |    |		Store	0x2,0x3
0189 e403       |    |		Load	0x2,0x3
018a 00db       |    |		Load_Top	At_Offset_3
018b e403       |    |		Load	0x2,0x3
018c 0a01       |    |		Execute_Immediate	Plus,0x1
018d 00d8       |    |		Load_Top	At_Offset_0
018e 00e2       |    |		Load_Encached	Integer_Cache
018f 0260       | `  |		Execute	Discrete,In_Type
0190 7001       |p   |		Jump_Nonzero	0x192
0191 0801       |    |		Execute_Immediate	Raise,0x1
0192 e406       |    |		Load	0x2,0x6
0193 01dc       |    |		Execute	Vector,Last
0194 e406       |    |		Load	0x2,0x6
0195 01cf       |    |		Execute	Vector,Slice_Read
0196 8018       |    |		Call	0x0,0x18
0197 00d1       |    |		Pop_Control	Pop_Count_1
0198 c403       |    |		Store	0x2,0x3
0199 e404       |    |		Load	0x2,0x4
019a e40f       |    |		Load	0x2,0xf
019b 8019       |    |		Call	0x0,0x19
019c 00d1       |    |		Pop_Control	Pop_Count_1
019d e405       |    |		Load	0x2,0x5
019e 00db       |    |		Load_Top	At_Offset_3
019f 8019       |    |		Call	0x0,0x19
01a0 00d1       |    |		Pop_Control	Pop_Count_1
01a1 e405       |    |		Load	0x2,0x5
01a2 e404       |    |		Load	0x2,0x4
01a3 8013       |    |		Call	0x0,0x13
01a4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a5 e403       |    |		Load	0x2,0x3
01a6 00da       |    |		Load_Top	At_Offset_2
01a7 e406       |    |		Load	0x2,0x6
01a8 801a       |    |		Call	0x0,0x1a
01a9 00d1       |    |		Pop_Control	Pop_Count_1
01aa c403       |    |		Store	0x2,0x3
01ab e403       |    |		Load	0x2,0x3
01ac 00d9       |    |		Load_Top	At_Offset_1
01ad e403       |    |		Load	0x2,0x3
01ae 0a01       |    |		Execute_Immediate	Plus,0x1
01af 00d8       |    |		Load_Top	At_Offset_0
01b0 00e2       |    |		Load_Encached	Integer_Cache
01b1 0260       | `  |		Execute	Discrete,In_Type
01b2 7001       |p   |		Jump_Nonzero	0x1b4
01b3 0801       |    |		Execute_Immediate	Raise,0x1
01b4 e406       |    |		Load	0x2,0x6
01b5 01dc       |    |		Execute	Vector,Last
01b6 e406       |    |		Load	0x2,0x6
01b7 01cf       |    |		Execute	Vector,Slice_Read
01b8 801a       |    |		Call	0x0,0x1a
01b9 00d1       |    |		Pop_Control	Pop_Count_1
01ba c403       |    |		Store	0x2,0x3
01bb e404       |    |		Load	0x2,0x4
01bc 00da       |    |		Load_Top	At_Offset_2
01bd 801b       |    |		Call	0x0,0x1b
01be 00d1       |    |		Pop_Control	Pop_Count_1
01bf e405       |    |		Load	0x2,0x5
01c0 00d9       |    |		Load_Top	At_Offset_1
01c1 801b       |    |		Call	0x0,0x1b
01c2 00d1       |    |		Pop_Control	Pop_Count_1
01c3 e405       |    |		Load	0x2,0x5
01c4 e404       |    |		Load	0x2,0x4
01c5 8013       |    |		Call	0x0,0x13
01c6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c7 e403       |    |		Load	0x2,0x3
01c8 e409       |    |		Load	0x2,0x9
01c9 e406       |    |		Load	0x2,0x6
01ca 801c       |    |		Call	0x0,0x1c
01cb 00d1       |    |		Pop_Control	Pop_Count_1
01cc c403       |    |		Store	0x2,0x3
01cd e403       |    |		Load	0x2,0x3
01ce e40a       |    |		Load	0x2,0xa
01cf e403       |    |		Load	0x2,0x3
01d0 0a01       |    |		Execute_Immediate	Plus,0x1
01d1 00d8       |    |		Load_Top	At_Offset_0
01d2 00e2       |    |		Load_Encached	Integer_Cache
01d3 0260       | `  |		Execute	Discrete,In_Type
01d4 7001       |p   |		Jump_Nonzero	0x1d6
01d5 0801       |    |		Execute_Immediate	Raise,0x1
01d6 e406       |    |		Load	0x2,0x6
01d7 01dc       |    |		Execute	Vector,Last
01d8 e406       |    |		Load	0x2,0x6
01d9 01cf       |    |		Execute	Vector,Slice_Read
01da 801c       |    |		Call	0x0,0x1c
01db 00d1       |    |		Pop_Control	Pop_Count_1
01dc c403       |    |		Store	0x2,0x3
01dd e404       |    |		Load	0x2,0x4
01de e409       |    |		Load	0x2,0x9
01df 801d       |    |		Call	0x0,0x1d
01e0 00d1       |    |		Pop_Control	Pop_Count_1
01e1 e405       |    |		Load	0x2,0x5
01e2 e40a       |    |		Load	0x2,0xa
01e3 801d       |    |		Call	0x0,0x1d
01e4 00d1       |    |		Pop_Control	Pop_Count_1
01e5 e405       |    |		Load	0x2,0x5
01e6 e404       |    |		Load	0x2,0x4
01e7 8013       |    |		Call	0x0,0x13
01e8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01e9 0000 0000  |    |		.XXX[0x3]
01eb 0000       |    |
01ec 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 00da       |    |		Load_Top	At_Offset_2
01f4 8210       |    |		Call	0x1,0x10
01f5 801e       |    |		Call	0x0,0x1e
01f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01f7 0000       |    |		.XXX[0x1]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0213       |    |		.CONST	0x0213								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0007       |    |		.CONST	0x0007								; Number of locals
01fb			INIT_01f8:
01fb e006       |    |		Load	0x0,0x6
01fc 02ff       |    |		Declare_Variable	Variant_Record
01fd 00d8       |    |		Load_Top	At_Offset_0
01fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ff 00d8       |    |		Load_Top	At_Offset_0
0200 02ff       |    |		Declare_Variable	Variant_Record
0201 00d8       |    |		Load_Top	At_Offset_0
0202 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0203 00d8       |    |		Load_Top	At_Offset_0
0204 02ff       |    |		Declare_Variable	Variant_Record
0205 00d8       |    |		Load_Top	At_Offset_0
0206 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0207 00d8       |    |		Load_Top	At_Offset_0
0208 02ff       |    |		Declare_Variable	Variant_Record
0209 00d8       |    |		Load_Top	At_Offset_0
020a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
020b 00d8       |    |		Load_Top	At_Offset_0
020c 02ff       |    |		Declare_Variable	Variant_Record
020d 00d8       |    |		Load_Top	At_Offset_0
020e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
020f 00d8       |    |		Load_Top	At_Offset_0
0210 02ff       |    |		Declare_Variable	Variant_Record
0211 00d8       |    |		Load_Top	At_Offset_0
0212 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0213			BODY_01f8:
0213 4801       |H   |		Short_Literal	0x1
0214 801f       |    |		Call	0x0,0x1f
0215 00cf       |    |		Action	Mark_Auxiliary
0216 7809       |x   |		Jump	0x220
0217 4801       |H   |		Short_Literal	0x1
0218 8020       |    |		Call	0x0,0x20
0219 e402       |    |		Load	0x2,0x2
021a 016d       | m  |		Execute	Variant_Record,Structure_Write
021b e402       |    |		Load	0x2,0x2
021c 8216       |    |		Call	0x1,0x16
021d 4801       |H   |		Short_Literal	0x1
021e 8021       | !  |		Call	0x0,0x21
021f 00c9       |    |		Action	Pop_Auxiliary_Loop
0220 4801       |H   |		Short_Literal	0x1
0221 8022       | "  |		Call	0x0,0x22
0222 6ff4       |o   |		Jump_Zero	0x217
0223 00ce       |    |		Action	Pop_Auxiliary
0224 4803       |H   |		Short_Literal	0x3
0225 801f       |    |		Call	0x0,0x1f
0226 00cf       |    |		Action	Mark_Auxiliary
0227 785c       |x\  |		Jump	0x284
0228 4803       |H   |		Short_Literal	0x3
0229 8020       |    |		Call	0x0,0x20
022a e405       |    |		Load	0x2,0x5
022b 016d       | m  |		Execute	Variant_Record,Structure_Write
022c 00db       |    |		Load_Top	At_Offset_3
022d 8023       | #  |		Call	0x0,0x23
022e 8024       | $  |		Call	0x0,0x24
022f 4805       |H   |		Short_Literal	0x5
0230 8025       | %  |		Call	0x0,0x25
0231 00cf       |    |		Action	Mark_Auxiliary
0232 784a       |xJ  |		Jump	0x27d
0233 4805       |H   |		Short_Literal	0x5
0234 8020       |    |		Call	0x0,0x20
0235 e403       |    |		Load	0x2,0x3
0236 016d       | m  |		Execute	Variant_Record,Structure_Write
0237 e403       |    |		Load	0x2,0x3
0238 8026       | &  |		Call	0x0,0x26
0239 8027       | '  |		Call	0x0,0x27
023a 4802       |H   |		Short_Literal	0x2
023b 8025       | %  |		Call	0x0,0x25
023c 00cf       |    |		Action	Mark_Auxiliary
023d 7838       |x8  |		Jump	0x276
023e 4802       |H   |		Short_Literal	0x2
023f 8020       |    |		Call	0x0,0x20
0240 e404       |    |		Load	0x2,0x4
0241 016d       | m  |		Execute	Variant_Record,Structure_Write
0242 e403       |    |		Load	0x2,0x3
0243 8026       | &  |		Call	0x0,0x26
0244 8028       | (  |		Call	0x0,0x28
0245 4801       |H   |		Short_Literal	0x1
0246 8025       | %  |		Call	0x0,0x25
0247 4801       |H   |		Short_Literal	0x1
0248 8022       | "  |		Call	0x0,0x22
0249 7029       |p)  |		Jump_Nonzero	0x273
024a 4801       |H   |		Short_Literal	0x1
024b 8020       |    |		Call	0x0,0x20
024c e402       |    |		Load	0x2,0x2
024d 016d       | m  |		Execute	Variant_Record,Structure_Write
024e e404       |    |		Load	0x2,0x4
024f e402       |    |		Load	0x2,0x2
0250 8217       |    |		Call	0x1,0x17
0251 e405       |    |		Load	0x2,0x5
0252 8023       | #  |		Call	0x0,0x23
0253 8029       | )  |		Call	0x0,0x29
0254 4806       |H   |		Short_Literal	0x6
0255 8025       | %  |		Call	0x0,0x25
0256 00cf       |    |		Action	Mark_Auxiliary
0257 7817       |x   |		Jump	0x26f
0258 4806       |H   |		Short_Literal	0x6
0259 8020       |    |		Call	0x0,0x20
025a e406       |    |		Load	0x2,0x6
025b 016d       | m  |		Execute	Variant_Record,Structure_Write
025c e406       |    |		Load	0x2,0x6
025d 802a       | *  |		Call	0x0,0x2a
025e 802b       | +  |		Call	0x0,0x2b
025f 4804       |H   |		Short_Literal	0x4
0260 8025       | %  |		Call	0x0,0x25
0261 4804       |H   |		Short_Literal	0x4
0262 8022       | "  |		Call	0x0,0x22
0263 7008       |p   |		Jump_Nonzero	0x26c
0264 4804       |H   |		Short_Literal	0x4
0265 8020       |    |		Call	0x0,0x20
0266 e407       |    |		Load	0x2,0x7
0267 016d       | m  |		Execute	Variant_Record,Structure_Write
0268 e404       |    |		Load	0x2,0x4
0269 e407       |    |		Load	0x2,0x7
026a e402       |    |		Load	0x2,0x2
026b 8218       |    |		Call	0x1,0x18
026c 4806       |H   |		Short_Literal	0x6
026d 8021       | !  |		Call	0x0,0x21
026e 00c9       |    |		Action	Pop_Auxiliary_Loop
026f 4806       |H   |		Short_Literal	0x6
0270 8022       | "  |		Call	0x0,0x22
0271 6fe6       |o   |		Jump_Zero	0x258
0272 00ce       |    |		Action	Pop_Auxiliary
0273 4802       |H   |		Short_Literal	0x2
0274 8021       | !  |		Call	0x0,0x21
0275 00c9       |    |		Action	Pop_Auxiliary_Loop
0276 4802       |H   |		Short_Literal	0x2
0277 8022       | "  |		Call	0x0,0x22
0278 6fc5       |o   |		Jump_Zero	0x23e
0279 00ce       |    |		Action	Pop_Auxiliary
027a 4805       |H   |		Short_Literal	0x5
027b 8021       | !  |		Call	0x0,0x21
027c 00c9       |    |		Action	Pop_Auxiliary_Loop
027d 4805       |H   |		Short_Literal	0x5
027e 8022       | "  |		Call	0x0,0x22
027f 6fb3       |o   |		Jump_Zero	0x233
0280 00ce       |    |		Action	Pop_Auxiliary
0281 4803       |H   |		Short_Literal	0x3
0282 8021       | !  |		Call	0x0,0x21
0283 00c9       |    |		Action	Pop_Auxiliary_Loop
0284 4803       |H   |		Short_Literal	0x3
0285 8022       | "  |		Call	0x0,0x22
0286 6fa1       |o   |		Jump_Zero	0x228
0287 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028f       |    |		.CONST	0x028f								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0002       |    |		.CONST	0x0002								; Number of locals
028b			INIT_0288:
028b e006       |    |		Load	0x0,0x6
028c 02ff       |    |		Declare_Variable	Variant_Record
028d 00d8       |    |		Load_Top	At_Offset_0
028e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028f			BODY_0288:
028f 0092 031d  |    |		Action	Push_String_Extended,0x31d					; "demande rapport : "
0291 e005       |    |		Load	0x0,0x5
0292 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0293 4801       |H   |		Short_Literal	0x1
0294 801f       |    |		Call	0x0,0x1f
0295 00cf       |    |		Action	Mark_Auxiliary
0296 7809       |x   |		Jump	0x2a0
0297 4801       |H   |		Short_Literal	0x1
0298 8020       |    |		Call	0x0,0x20
0299 00da       |    |		Load_Top	At_Offset_2
029a 016d       | m  |		Execute	Variant_Record,Structure_Write
029b 00d9       |    |		Load_Top	At_Offset_1
029c 8219       |    |		Call	0x1,0x19
029d 4801       |H   |		Short_Literal	0x1
029e 8021       | !  |		Call	0x0,0x21
029f 00c9       |    |		Action	Pop_Auxiliary_Loop
02a0 4801       |H   |		Short_Literal	0x1
02a1 8022       | "  |		Call	0x0,0x22
02a2 6ff4       |o   |		Jump_Zero	0x297
02a3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a4 0000 0000  |    |		.BLANK	0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ad       |    |		.CONST	0x02ad								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0002       |    |		.CONST	0x0002								; Number of locals
02ab			INIT_02a8:
02ab e00b       |    |		Load	0x0,0xb
02ac 0322       | "  |		Declare_Variable	Record
02ad			BODY_02a8:
02ad 00db       |    |		Load_Top	At_Offset_3
02ae 802c       | ,  |		Call	0x0,0x2c
02af 00d9       |    |		Load_Top	At_Offset_1
02b0 017d       | }  |		Execute	Record,Structure_Write
02b1 0092 031e  |    |		Action	Push_String_Extended,0x31e					; "programmation lecteur :"
02b3 e005       |    |		Load	0x0,0x5
02b4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02b5 00d8       |    |		Load_Top	At_Offset_0
02b6 802d       | -  |		Call	0x0,0x2d
02b7 802e       | .  |		Call	0x0,0x2e
02b8 e005       |    |		Load	0x0,0x5
02b9 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02ba 00d8       |    |		Load_Top	At_Offset_0
02bb 802f       | /  |		Call	0x0,0x2f
02bc 802e       | .  |		Call	0x0,0x2e
02bd e005       |    |		Load	0x0,0x5
02be 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02bf 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c9       |    |		.CONST	0x02c9								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0003       |    |		.CONST	0x0003								; Number of locals
02c3			INIT_02c0:
02c3 e00b       |    |		Load	0x0,0xb
02c4 0322       | "  |		Declare_Variable	Record
02c5 e00d       |    |		Load	0x0,0xd
02c6 0322       | "  |		Declare_Variable	Record
02c7 00d8       |    |		Load_Top	At_Offset_0
02c8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02c9			BODY_02c0:
02c9 e5ff       |    |		Load	0x2,-0x1
02ca 802c       | ,  |		Call	0x0,0x2c
02cb 00da       |    |		Load_Top	At_Offset_2
02cc 017d       | }  |		Execute	Record,Structure_Write
02cd e5fe       |    |		Load	0x2,-0x2
02ce 8030       | 0  |		Call	0x0,0x30
02cf 00d9       |    |		Load_Top	At_Offset_1
02d0 017d       | }  |		Execute	Record,Structure_Write
02d1 0092 031f  |    |		Action	Push_String_Extended,0x31f					; "Programmation plage : "
02d3 e005       |    |		Load	0x0,0x5
02d4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02d5 00d8       |    |		Load_Top	At_Offset_0
02d6 00da       |    |		Load_Top	At_Offset_2
02d7 8031       | 1  |		Call	0x0,0x31
02d8 802e       | .  |		Call	0x0,0x2e
02d9 e005       |    |		Load	0x0,0x5
02da 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02db 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02dc 0000 0000  |    |		.BLANK	0000[0x4]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02eb       |    |		.CONST	0x02eb								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0004       |    |		.CONST	0x0004								; Number of locals
02e3			INIT_02e0:
02e3 e00b       |    |		Load	0x0,0xb
02e4 0322       | "  |		Declare_Variable	Record
02e5 e00c       |    |		Load	0x0,0xc
02e6 0322       | "  |		Declare_Variable	Record
02e7 e00d       |    |		Load	0x0,0xd
02e8 0322       | "  |		Declare_Variable	Record
02e9 00d8       |    |		Load_Top	At_Offset_0
02ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02eb			BODY_02e0:
02eb e5ff       |    |		Load	0x2,-0x1
02ec 802c       | ,  |		Call	0x0,0x2c
02ed 00db       |    |		Load_Top	At_Offset_3
02ee 017d       | }  |		Execute	Record,Structure_Write
02ef e5fe       |    |		Load	0x2,-0x2
02f0 8032       | 2  |		Call	0x0,0x32
02f1 00da       |    |		Load_Top	At_Offset_2
02f2 017d       | }  |		Execute	Record,Structure_Write
02f3 e5fd       |    |		Load	0x2,-0x3
02f4 8030       | 0  |		Call	0x0,0x30
02f5 00d9       |    |		Load_Top	At_Offset_1
02f6 017d       | }  |		Execute	Record,Structure_Write
02f7 0092 0320  |    |		Action	Push_String_Extended,0x320					; "Programmation carte : "
02f9 e005       |    |		Load	0x0,0x5
02fa 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02fb 00da       |    |		Load_Top	At_Offset_2
02fc 00d9       |    |		Load_Top	At_Offset_1
02fd 00db       |    |		Load_Top	At_Offset_3
02fe 8033       | 3  |		Call	0x0,0x33
02ff 802e       | .  |		Call	0x0,0x2e
0300 e005       |    |		Load	0x0,0x5
0301 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0302 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0303 0000 0000  |    |		.BLANK	0000[0x5]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030d       |    |		.CONST	0x030d								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0002       |    |		.CONST	0x0002								; Number of locals
030b			INIT_0308:
030b e00b       |    |		Load	0x0,0xb
030c 0322       | "  |		Declare_Variable	Record
030d			BODY_0308:
030d 00db       |    |		Load_Top	At_Offset_3
030e 802c       | ,  |		Call	0x0,0x2c
030f 00d9       |    |		Load_Top	At_Offset_1
0310 017d       | }  |		Execute	Record,Structure_Write
0311 00d8       |    |		Load_Top	At_Offset_0
0312 8034       | 4  |		Call	0x0,0x34
0313 802e       | .  |		Call	0x0,0x2e
0314 e005       |    |		Load	0x0,0x5
0315 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0316 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0317 ; --------------------------------------------------------------------------------------
0317 ; STRING TABLE
0317 ; --------------------------------------------------------------------------------------
0317 0016       |    |		.STRTAB	0x0016->0x0322							; "DEBUT"
0318 0019       |    |		.STRTAB	0x0019->0x0324							; "PHASE_DE_CONFIG"
0319 0026       | &  |		.STRTAB	0x0026->0x032c							; "FONCTIONNEMENT_NORMAL"
031a 0039       | 9  |		.STRTAB	0x0039->0x0336							; "suppr BDD : "
031b 0043       | C  |		.STRTAB	0x0043->0x033c							; "ajout BDD : "
031c 004d       | M  |		.STRTAB	0x004d->0x0342							; "modif Bdd : "
031d 0057       | W  |		.STRTAB	0x0057->0x0348							; "demande rapport : "
031e 0067       | g  |		.STRTAB	0x0067->0x0351							; "programmation lecteur :"
031f 007c       | |  |		.STRTAB	0x007c->0x035d							; "Programmation plage : "
0320 0090       |    |		.STRTAB	0x0090->0x0368							; "Programmation carte : "
0321 00a4       |    |		.STREND 0x00a4->0x0373
0322 4445 4255  |DEBU|		.STRTAB_STRINGS
0373 0000 0000  |    |		.BLANK	0000[0x5]
0378 ; --------------------------------------------------------------------------------------
0378 ; Debug Table
0378 ; --------------------------------------------------------------------------------------
0378 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x8555,0x0000,0x0001,0x000e
037e 000b 03b6  |    |		.DBG4T	0x000b,0x03b6,0x8000,0x0000
0382 000e 03b9  |    |		.DBG4T	0x000e,0x03b9,0x8000,0x0000
0386 0043 03ce  | C  |		.DBG4T	0x0043,0x03ce,0x0001,0x4000
038a 00a3 0000  |    |		.DBG4T	0x00a3,0x0000,0x0005,0x0000
038e 00cb 03f8  |    |		.DBG4T	0x00cb,0x03f8,0x0002,0x0000
0392 00db 03fd  |    |		.DBG4T	0x00db,0x03fd,0x0001,0x0000
0396 00e3 0400  |    |		.DBG4T	0x00e3,0x0400,0x0001,0x4000
039a 01f3 044c  |   L|		.DBG4T	0x01f3,0x044c,0x0001,0x0000
039e 01fb 044f  |   O|		.DBG4T	0x01fb,0x044f,0x0001,0x4000
03a2 028b 048c  |    |		.DBG4T	0x028b,0x048c,0x0001,0x4000
03a6 02ab 049b  |    |		.DBG4T	0x02ab,0x049b,0x0001,0x0000
03aa 02c3 04a2  |    |		.DBG4T	0x02c3,0x04a2,0x0001,0x0000
03ae 02e3 04aa  |    |		.DBG4T	0x02e3,0x04aa,0x0001,0x0000
03b2 030b 04b4  |    |		.DBG4T	0x030b,0x04b4,0x0001,0x0000
03b6 ; --------------------------------------------------------------------------------------
03b6 ; Debug chain
03b6 ; --------------------------------------------------------------------------------------
03b6 0001 0000  |    |		.DBGLEN	0x0001,0x0000
03b8 000b       |    |		.DBGLNO	0x000b
03b9 ; --------------------------------------------------------------------------------------
03b9 ; Debug chain
03b9 ; --------------------------------------------------------------------------------------
03b9 0013 0000  |    |		.DBGLEN	0x0013,0x0000
03bb 000e 0013  |    |		.DBGLNO	0x000e,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035
03ce ; --------------------------------------------------------------------------------------
03ce ; Debug chain
03ce ; --------------------------------------------------------------------------------------
03ce 0002 0013  |    |		.DBGLEN	0x0002,0x0013
03d0 0043 0047  | C G|		.DBGLNO	0x0043,0x0047,0x004c,0x0050,0x0055,0x0060,0x0062,0x0065,0x0067,0x006b,0x006e,0x0070,0x007b,0x0081,0x0084,0x008a,0x008d,0x0093,0x0096,0x0097,0x009a
03e5 0001 0002  |    |		.XXX[0x13]
03e7 0010 0013  |    |
03e9 0011 0012  |    |
03eb 0003 0004  |    |
03ed 0005 0006  |    |
03ef 0009 000a  |    |
03f1 0007 0008  |    |
03f3 000b 000c  |    |
03f5 000d 000e  |    |
03f7 000f       |    |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug chain
03f8 ; --------------------------------------------------------------------------------------
03f8 0001 0002  |    |		.DBGLEN	0x0001,0x0002
03fa 00cb 00cf  |    |		.DBGLNO	0x00cb,0x00cf,0x00d6
03fd ; --------------------------------------------------------------------------------------
03fd ; Debug chain
03fd ; --------------------------------------------------------------------------------------
03fd 0000 0001  |    |		.DBGLEN	0x0000,0x0001
03ff 00db       |    |		.DBGLNO	0x00db
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug chain
0400 ; --------------------------------------------------------------------------------------
0400 000a 0020  |    |		.DBGLEN	0x000a,0x0020
0402 00e3 00e8  |    |		.DBGLNO	0x00e3,0x00e8,0x00e9,0x00f1,0x00f3,0x00f7,0x00fb,0x0103,0x0107,0x010b,0x010f,0x011b,0x011d,0x0123,0x0133,0x0137,0x013b,0x013f,0x0145,0x0155,0x0159,0x015d,0x0161,0x0167,0x0177,0x017b,0x017f,0x0183,0x0189,0x0199,0x019d,0x01a1,0x01a5,0x01ab,0x01bb,0x01bf,0x01c3,0x01c7,0x01cd,0x01dd,0x01e1,0x01e5
042c 0001 0021  |   !|		.XXX[0x20]
042e 0007 0008  |    |
0430 0009 000a  |    |
0432 000b 000c  |    |
0434 000d 000e  |    |
0436 000f 0010  |    |
0438 0002 0003  |    |
043a 0004 0005  |    |
043c 0006 0016  |    |
043e 0017 0018  |    |
0440 0019 001a  |    |
0442 001b 001c  |    |
0444 001d 001e  |    |
0446 001f 0011  |    |
0448 0012 0013  |    |
044a 0014 0015  |    |
044c ; --------------------------------------------------------------------------------------
044c ; Debug chain
044c ; --------------------------------------------------------------------------------------
044c 0000 0001  |    |		.DBGLEN	0x0000,0x0001
044e 01f3       |    |		.DBGLNO	0x01f3
044f ; --------------------------------------------------------------------------------------
044f ; Debug chain
044f ; --------------------------------------------------------------------------------------
044f 0001 001d  |    |		.DBGLEN	0x0001,0x001d
0451 01fb 0213  |    |		.DBGLNO	0x01fb,0x0213,0x0217,0x021b,0x021d,0x0220,0x0224,0x0228,0x022c,0x0233,0x0237,0x023e,0x0242,0x0247,0x024a,0x024e,0x0251,0x0258,0x025c,0x0261,0x0264,0x0268,0x026c,0x026f,0x0273,0x0276,0x027a,0x027d,0x0281,0x0284
046f 0001 0003  |    |		.XXX[0x1d]
0471 0004 0005  |    |
0473 0002 0006  |    |
0475 0008 0009  |    |
0477 000b 000c  |    |
0479 000e 000f  |    |
047b 0010 0011  |    |
047d 0012 0013  |    |
047f 0015 0016  |    |
0481 0017 0018  |    |
0483 0019 001a  |    |
0485 0014 001b  |    |
0487 000d 001c  |    |
0489 000a 001d  |    |
048b 0007       |    |
048c ; --------------------------------------------------------------------------------------
048c ; Debug chain
048c ; --------------------------------------------------------------------------------------
048c 0001 0006  |    |		.DBGLEN	0x0001,0x0006
048e 028b 028f  |    |		.DBGLNO	0x028b,0x028f,0x0293,0x0297,0x029b,0x029d,0x02a0
0495 0001 0002  |    |		.XXX[0x6]
0497 0004 0005  |    |
0499 0006 0003  |    |
049b ; --------------------------------------------------------------------------------------
049b ; Debug chain
049b ; --------------------------------------------------------------------------------------
049b 0001 0004  |    |		.DBGLEN	0x0001,0x0004
049d 02ab 02ad  |    |		.DBGLNO	0x02ab,0x02ad,0x02b1,0x02b5,0x02ba
04a2 ; --------------------------------------------------------------------------------------
04a2 ; Debug chain
04a2 ; --------------------------------------------------------------------------------------
04a2 0002 0004  |    |		.DBGLEN	0x0002,0x0004
04a4 02c3 02c5  |    |		.DBGLNO	0x02c3,0x02c5,0x02c9,0x02cd,0x02d1,0x02d5
04aa ; --------------------------------------------------------------------------------------
04aa ; Debug chain
04aa ; --------------------------------------------------------------------------------------
04aa 0003 0005  |    |		.DBGLEN	0x0003,0x0005
04ac 02e3 02e5  |    |		.DBGLNO	0x02e3,0x02e5,0x02e7,0x02eb,0x02ef,0x02f3,0x02f7,0x02fb
04b4 ; --------------------------------------------------------------------------------------
04b4 ; Debug chain
04b4 ; --------------------------------------------------------------------------------------
04b4 0001 0002  |    |		.DBGLEN	0x0001,0x0002
04b6 030b 030d  |    |		.DBGLNO	0x030b,0x030d,0x0311
04b9 0000 0000  |    |		.BLANK	0000[0x147]