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

⟦d96951cd5⟧

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

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 0440       | @  |		.CONST	0x0440								; 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 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0037       | 7  |		.CONST	0x0037								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 000c       |    |		.CONST	0x000c								; Number of locals
001b			INIT_0018:
001b e002       |    |		Load	0x0,0x2
001c 0322       | "  |		Declare_Variable	Record
001d e003       |    |		Load	0x0,0x3
001e 0322       | "  |		Declare_Variable	Record
001f e004       |    |		Load	0x0,0x4
0020 0322       | "  |		Declare_Variable	Record
0021 e005       |    |		Load	0x0,0x5
0022 0322       | "  |		Declare_Variable	Record
0023 e006       |    |		Load	0x0,0x6
0024 0322       | "  |		Declare_Variable	Record
0025 e007       |    |		Load	0x0,0x7
0026 0322       | "  |		Declare_Variable	Record
0027 00d8       |    |		Load_Top	At_Offset_0
0028 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0029 e008       |    |		Load	0x0,0x8
002a 0322       | "  |		Declare_Variable	Record
002b 00d8       |    |		Load_Top	At_Offset_0
002c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
002d e009       |    |		Load	0x0,0x9
002e 0322       | "  |		Declare_Variable	Record
002f 00d8       |    |		Load_Top	At_Offset_0
0030 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0031 e00a       |    |		Load	0x0,0xa
0032 0322       | "  |		Declare_Variable	Record
0033 00d8       |    |		Load_Top	At_Offset_0
0034 0322       | "  |		Declare_Variable	Record
0035 029f 007b  |   {|		Declare_Subprogram	INIT_0078,For_Call
0037			BODY_0018:
0037 e403       |    |		Load	0x2,0x3
0038 4801       |H   |		Short_Literal	0x1
0039 800b       |    |		Call	0x0,0xb
003a 00d1       |    |		Pop_Control	Pop_Count_1
003b e402       |    |		Load	0x2,0x2
003c 4801       |H   |		Short_Literal	0x1
003d 4800       |H   |		Short_Literal	0x0
003e 4801       |H   |		Short_Literal	0x1
003f 4801       |H   |		Short_Literal	0x1
0040 4802       |H   |		Short_Literal	0x2
0041 800c       |    |		Call	0x0,0xc
0042 00d1       |    |		Pop_Control	Pop_Count_1
0043 e404       |    |		Load	0x2,0x4
0044 e402       |    |		Load	0x2,0x2
0045 e403       |    |		Load	0x2,0x3
0046 4803       |H   |		Short_Literal	0x3
0047 800d       |    |		Call	0x0,0xd
0048 00d1       |    |		Pop_Control	Pop_Count_1
0049 e405       |    |		Load	0x2,0x5
004a 4805       |H   |		Short_Literal	0x5
004b 4804       |H   |		Short_Literal	0x4
004c 800e       |    |		Call	0x0,0xe
004d 00d1       |    |		Pop_Control	Pop_Count_1
004e e406       |    |		Load	0x2,0x6
004f e405       |    |		Load	0x2,0x5
0050 4800       |H   |		Short_Literal	0x0
0051 800f       |    |		Call	0x0,0xf
0052 00d1       |    |		Pop_Control	Pop_Count_1
0053 e408       |    |		Load	0x2,0x8
0054 8010       |    |		Call	0x0,0x10
0055 00d1       |    |		Pop_Control	Pop_Count_1
0056 e408       |    |		Load	0x2,0x8
0057 4802       |H   |		Short_Literal	0x2
0058 8011       |    |		Call	0x0,0x11
0059 00d1       |    |		Pop_Control	Pop_Count_1
005a 00db       |    |		Load_Top	At_Offset_3
005b e408       |    |		Load	0x2,0x8
005c e405       |    |		Load	0x2,0x5
005d 00d8       |    |		Load_Top	At_Offset_0
005e e405       |    |		Load	0x2,0x5
005f 00d8       |    |		Load_Top	At_Offset_0
0060 8012       |    |		Call	0x0,0x12
0061 00d1       |    |		Pop_Control	Pop_Count_1
0062 e407       |    |		Load	0x2,0x7
0063 e409       |    |		Load	0x2,0x9
0064 00d8       |    |		Load_Top	At_Offset_0
0065 e409       |    |		Load	0x2,0x9
0066 4807       |H   |		Short_Literal	0x7
0067 4806       |H   |		Short_Literal	0x6
0068 8013       |    |		Call	0x0,0x13
0069 00d1       |    |		Pop_Control	Pop_Count_1
006a 00da       |    |		Load_Top	At_Offset_2
006b 4808       |H   |		Short_Literal	0x8
006c 8014       |    |		Call	0x0,0x14
006d 00d1       |    |		Pop_Control	Pop_Count_1
006e 00d9       |    |		Load_Top	At_Offset_1
006f 480a       |H   |		Short_Literal	0xa
0070 8014       |    |		Call	0x0,0x14
0071 00d1       |    |		Pop_Control	Pop_Count_1
0072 840c       |    |		Call	0x2,0xc
0073 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0074 0000 0000  |    |		.BLANK	0000[0x4]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 00b3       |    |		.CONST	0x00b3								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0017       |    |		.CONST	0x0017								; Number of locals
007b			INIT_0078:
007b e404       |    |		Load	0x2,0x4
007c 8015       |    |		Call	0x0,0x15
007d e404       |    |		Load	0x2,0x4
007e 8016       |    |		Call	0x0,0x16
007f e406       |    |		Load	0x2,0x6
0080 e404       |    |		Load	0x2,0x4
0081 8017       |    |		Call	0x0,0x17
0082 e404       |    |		Load	0x2,0x4
0083 e407       |    |		Load	0x2,0x7
0084 e40a       |    |		Load	0x2,0xa
0085 8018       |    |		Call	0x0,0x18
0086 e404       |    |		Load	0x2,0x4
0087 e407       |    |		Load	0x2,0x7
0088 e40a       |    |		Load	0x2,0xa
0089 8019       |    |		Call	0x0,0x19
008a e407       |    |		Load	0x2,0x7
008b e404       |    |		Load	0x2,0x4
008c 801a       |    |		Call	0x0,0x1a
008d e404       |    |		Load	0x2,0x4
008e 801b       |    |		Call	0x0,0x1b
008f e404       |    |		Load	0x2,0x4
0090 801c       |    |		Call	0x0,0x1c
0091 e404       |    |		Load	0x2,0x4
0092 801d       |    |		Call	0x0,0x1d
0093 e404       |    |		Load	0x2,0x4
0094 801e       |    |		Call	0x0,0x1e
0095 e404       |    |		Load	0x2,0x4
0096 801f       |    |		Call	0x0,0x1f
0097 e404       |    |		Load	0x2,0x4
0098 8020       |    |		Call	0x0,0x20
0099 e404       |    |		Load	0x2,0x4
009a 8021       | !  |		Call	0x0,0x21
009b e404       |    |		Load	0x2,0x4
009c 8022       | "  |		Call	0x0,0x22
009d e404       |    |		Load	0x2,0x4
009e 8023       | #  |		Call	0x0,0x23
009f e404       |    |		Load	0x2,0x4
00a0 8024       | $  |		Call	0x0,0x24
00a1 e404       |    |		Load	0x2,0x4
00a2 8025       | %  |		Call	0x0,0x25
00a3 e404       |    |		Load	0x2,0x4
00a4 8026       | &  |		Call	0x0,0x26
00a5 e404       |    |		Load	0x2,0x4
00a6 e407       |    |		Load	0x2,0x7
00a7 e40b       |    |		Load	0x2,0xb
00a8 e40a       |    |		Load	0x2,0xa
00a9 8027       | '  |		Call	0x0,0x27
00aa e404       |    |		Load	0x2,0x4
00ab e407       |    |		Load	0x2,0x7
00ac e40b       |    |		Load	0x2,0xb
00ad e40a       |    |		Load	0x2,0xa
00ae 8028       | (  |		Call	0x0,0x28
00af 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call
00b1 029f 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Call
00b3			BODY_0078:
00b3 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; "Lecteur : "
00b5 e029       | )  |		Load	0x0,0x29
00b6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00b7 4801       |H   |		Short_Literal	0x1
00b8 e029       | )  |		Load	0x0,0x29
00b9 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00ba e404       |    |		Load	0x2,0x4
00bb 802a       | *  |		Call	0x0,0x2a
00bc e029       | )  |		Load	0x0,0x29
00bd 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00be 4801       |H   |		Short_Literal	0x1
00bf e029       | )  |		Load	0x0,0x29
00c0 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00c1 0092 032c  |   ,|		Action	Push_String_Extended,0x32c					; "programmation du lecteur "
00c3 e029       | )  |		Load	0x0,0x29
00c4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00c5 4801       |H   |		Short_Literal	0x1
00c6 e029       | )  |		Load	0x0,0x29
00c7 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00c8 e602       |    |		Load	0x3,0x2
00c9 802b       | +  |		Call	0x0,0x2b
00ca e029       | )  |		Load	0x0,0x29
00cb 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00cc e602       |    |		Load	0x3,0x2
00cd 802c       | ,  |		Call	0x0,0x2c
00ce e029       | )  |		Load	0x0,0x29
00cf 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00d0 4801       |H   |		Short_Literal	0x1
00d1 e029       | )  |		Load	0x0,0x29
00d2 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00d3 0092 032d  |   -|		Action	Push_String_Extended,0x32d					; "Programmation du site"
00d5 e029       | )  |		Load	0x0,0x29
00d6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00d7 4801       |H   |		Short_Literal	0x1
00d8 e029       | )  |		Load	0x0,0x29
00d9 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00da e603       |    |		Load	0x3,0x3
00db 802b       | +  |		Call	0x0,0x2b
00dc e029       | )  |		Load	0x0,0x29
00dd 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00de e603       |    |		Load	0x3,0x3
00df 802c       | ,  |		Call	0x0,0x2c
00e0 e029       | )  |		Load	0x0,0x29
00e1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00e2 4801       |H   |		Short_Literal	0x1
00e3 e029       | )  |		Load	0x0,0x29
00e4 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00e5 0092 032e  |   .|		Action	Push_String_Extended,0x32e					; "Programmation de l'heure :"
00e7 e029       | )  |		Load	0x0,0x29
00e8 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00e9 e604       |    |		Load	0x3,0x4
00ea 802b       | +  |		Call	0x0,0x2b
00eb e029       | )  |		Load	0x0,0x29
00ec 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00ed e604       |    |		Load	0x3,0x4
00ee 802c       | ,  |		Call	0x0,0x2c
00ef e029       | )  |		Load	0x0,0x29
00f0 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00f1 4801       |H   |		Short_Literal	0x1
00f2 e029       | )  |		Load	0x0,0x29
00f3 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
00f4 0092 032f  |   /|		Action	Push_String_Extended,0x32f					; "Validation d'une carte"
00f6 e029       | )  |		Load	0x0,0x29
00f7 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00f8 e605       |    |		Load	0x3,0x5
00f9 802b       | +  |		Call	0x0,0x2b
00fa e029       | )  |		Load	0x0,0x29
00fb 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00fc e605       |    |		Load	0x3,0x5
00fd 802c       | ,  |		Call	0x0,0x2c
00fe e029       | )  |		Load	0x0,0x29
00ff 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0100 4801       |H   |		Short_Literal	0x1
0101 e029       | )  |		Load	0x0,0x29
0102 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0103 0092 0330  |   0|		Action	Push_String_Extended,0x330					; "Invalidation d'une carte"
0105 e029       | )  |		Load	0x0,0x29
0106 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0107 e606       |    |		Load	0x3,0x6
0108 802b       | +  |		Call	0x0,0x2b
0109 e029       | )  |		Load	0x0,0x29
010a 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
010b e606       |    |		Load	0x3,0x6
010c 802c       | ,  |		Call	0x0,0x2c
010d e029       | )  |		Load	0x0,0x29
010e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
010f 4801       |H   |		Short_Literal	0x1
0110 e029       | )  |		Load	0x0,0x29
0111 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0112 0092 0331  |   1|		Action	Push_String_Extended,0x331					; "Programmation d'une plage horaire"
0114 e029       | )  |		Load	0x0,0x29
0115 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0116 e607       |    |		Load	0x3,0x7
0117 802b       | +  |		Call	0x0,0x2b
0118 e029       | )  |		Load	0x0,0x29
0119 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
011a e607       |    |		Load	0x3,0x7
011b 802c       | ,  |		Call	0x0,0x2c
011c e029       | )  |		Load	0x0,0x29
011d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
011e 4801       |H   |		Short_Literal	0x1
011f e029       | )  |		Load	0x0,0x29
0120 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0121 0092 0332  |   2|		Action	Push_String_Extended,0x332					; "beep"
0123 e029       | )  |		Load	0x0,0x29
0124 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0125 e608       |    |		Load	0x3,0x8
0126 802b       | +  |		Call	0x0,0x2b
0127 e029       | )  |		Load	0x0,0x29
0128 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0129 e608       |    |		Load	0x3,0x8
012a 802c       | ,  |		Call	0x0,0x2c
012b e029       | )  |		Load	0x0,0x29
012c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
012d 4801       |H   |		Short_Literal	0x1
012e e029       | )  |		Load	0x0,0x29
012f 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0130 0092 0333  |   3|		Action	Push_String_Extended,0x333					; "param"
0132 e029       | )  |		Load	0x0,0x29
0133 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0134 e609       |    |		Load	0x3,0x9
0135 802b       | +  |		Call	0x0,0x2b
0136 e029       | )  |		Load	0x0,0x29
0137 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0138 e609       |    |		Load	0x3,0x9
0139 802c       | ,  |		Call	0x0,0x2c
013a e029       | )  |		Load	0x0,0x29
013b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
013c 4801       |H   |		Short_Literal	0x1
013d e029       | )  |		Load	0x0,0x29
013e 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
013f 0092 0334  |   4|		Action	Push_String_Extended,0x334					; "cartes valides"
0141 e029       | )  |		Load	0x0,0x29
0142 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0143 e60a       |    |		Load	0x3,0xa
0144 802b       | +  |		Call	0x0,0x2b
0145 e029       | )  |		Load	0x0,0x29
0146 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0147 e60a       |    |		Load	0x3,0xa
0148 802c       | ,  |		Call	0x0,0x2c
0149 e029       | )  |		Load	0x0,0x29
014a 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
014b 4801       |H   |		Short_Literal	0x1
014c e029       | )  |		Load	0x0,0x29
014d 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
014e 0092 0335  |   5|		Action	Push_String_Extended,0x335					; "cartes invalides"
0150 e029       | )  |		Load	0x0,0x29
0151 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0152 e60b       |    |		Load	0x3,0xb
0153 802b       | +  |		Call	0x0,0x2b
0154 e029       | )  |		Load	0x0,0x29
0155 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0156 e60b       |    |		Load	0x3,0xb
0157 802c       | ,  |		Call	0x0,0x2c
0158 e029       | )  |		Load	0x0,0x29
0159 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
015a 4801       |H   |		Short_Literal	0x1
015b e029       | )  |		Load	0x0,0x29
015c 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
015d 0092 0336  |   6|		Action	Push_String_Extended,0x336					; "Horloge"
015f e029       | )  |		Load	0x0,0x29
0160 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0161 e60c       |    |		Load	0x3,0xc
0162 802b       | +  |		Call	0x0,0x2b
0163 e029       | )  |		Load	0x0,0x29
0164 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0165 e60c       |    |		Load	0x3,0xc
0166 802c       | ,  |		Call	0x0,0x2c
0167 e029       | )  |		Load	0x0,0x29
0168 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0169 4801       |H   |		Short_Literal	0x1
016a e029       | )  |		Load	0x0,0x29
016b 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
016c 0092 0337  |   7|		Action	Push_String_Extended,0x337					; "Site"
016e e029       | )  |		Load	0x0,0x29
016f 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0170 e60d       |    |		Load	0x3,0xd
0171 802b       | +  |		Call	0x0,0x2b
0172 e029       | )  |		Load	0x0,0x29
0173 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0174 e60d       |    |		Load	0x3,0xd
0175 802c       | ,  |		Call	0x0,0x2c
0176 e029       | )  |		Load	0x0,0x29
0177 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0178 4801       |H   |		Short_Literal	0x1
0179 e029       | )  |		Load	0x0,0x29
017a 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
017b 0092 0338  |   8|		Action	Push_String_Extended,0x338					; "Mise en veille"
017d e029       | )  |		Load	0x0,0x29
017e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
017f e60e       |    |		Load	0x3,0xe
0180 802b       | +  |		Call	0x0,0x2b
0181 e029       | )  |		Load	0x0,0x29
0182 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0183 e60e       |    |		Load	0x3,0xe
0184 802c       | ,  |		Call	0x0,0x2c
0185 e029       | )  |		Load	0x0,0x29
0186 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0187 4801       |H   |		Short_Literal	0x1
0188 e029       | )  |		Load	0x0,0x29
0189 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
018a 0092 0339  |   9|		Action	Push_String_Extended,0x339					; "Mise en service"
018c e029       | )  |		Load	0x0,0x29
018d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
018e e60f       |    |		Load	0x3,0xf
018f 802b       | +  |		Call	0x0,0x2b
0190 e029       | )  |		Load	0x0,0x29
0191 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0192 e60f       |    |		Load	0x3,0xf
0193 802c       | ,  |		Call	0x0,0x2c
0194 e029       | )  |		Load	0x0,0x29
0195 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0196 4801       |H   |		Short_Literal	0x1
0197 e029       | )  |		Load	0x0,0x29
0198 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0199 0092 033a  |   :|		Action	Push_String_Extended,0x33a					; "Ack"
019b e029       | )  |		Load	0x0,0x29
019c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
019d e610       |    |		Load	0x3,0x10
019e 802b       | +  |		Call	0x0,0x2b
019f e029       | )  |		Load	0x0,0x29
01a0 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01a1 e610       |    |		Load	0x3,0x10
01a2 802c       | ,  |		Call	0x0,0x2c
01a3 e029       | )  |		Load	0x0,0x29
01a4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01a5 4801       |H   |		Short_Literal	0x1
01a6 e029       | )  |		Load	0x0,0x29
01a7 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01a8 0092 033b  |   ;|		Action	Push_String_Extended,0x33b					; "nak"
01aa e029       | )  |		Load	0x0,0x29
01ab 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01ac e611       |    |		Load	0x3,0x11
01ad 802b       | +  |		Call	0x0,0x2b
01ae e029       | )  |		Load	0x0,0x29
01af 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01b0 e611       |    |		Load	0x3,0x11
01b1 802c       | ,  |		Call	0x0,0x2c
01b2 e029       | )  |		Load	0x0,0x29
01b3 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01b4 4801       |H   |		Short_Literal	0x1
01b5 e029       | )  |		Load	0x0,0x29
01b6 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01b7 0092 033c  |   <|		Action	Push_String_Extended,0x33c					; "Pilotage a 1"
01b9 e029       | )  |		Load	0x0,0x29
01ba 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01bb e612       |    |		Load	0x3,0x12
01bc 802b       | +  |		Call	0x0,0x2b
01bd e029       | )  |		Load	0x0,0x29
01be 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01bf e612       |    |		Load	0x3,0x12
01c0 802c       | ,  |		Call	0x0,0x2c
01c1 e029       | )  |		Load	0x0,0x29
01c2 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01c3 4801       |H   |		Short_Literal	0x1
01c4 e029       | )  |		Load	0x0,0x29
01c5 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01c6 0092 033d  |   =|		Action	Push_String_Extended,0x33d					; "Evenement"
01c8 e029       | )  |		Load	0x0,0x29
01c9 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01ca e613       |    |		Load	0x3,0x13
01cb 802b       | +  |		Call	0x0,0x2b
01cc e029       | )  |		Load	0x0,0x29
01cd 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01ce e613       |    |		Load	0x3,0x13
01cf 802c       | ,  |		Call	0x0,0x2c
01d0 e029       | )  |		Load	0x0,0x29
01d1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01d2 4801       |H   |		Short_Literal	0x1
01d3 e029       | )  |		Load	0x0,0x29
01d4 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01d5 0092 033e  |   >|		Action	Push_String_Extended,0x33e					; "validation d'un groupe de cartes "
01d7 e029       | )  |		Load	0x0,0x29
01d8 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01d9 00db       |    |		Load_Top	At_Offset_3
01da 802b       | +  |		Call	0x0,0x2b
01db e029       | )  |		Load	0x0,0x29
01dc 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01dd 00db       |    |		Load_Top	At_Offset_3
01de 802c       | ,  |		Call	0x0,0x2c
01df e029       | )  |		Load	0x0,0x29
01e0 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01e1 4801       |H   |		Short_Literal	0x1
01e2 e029       | )  |		Load	0x0,0x29
01e3 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01e4 0092 033f  |   ?|		Action	Push_String_Extended,0x33f					; "Invalidation d'un groupe de cartes"
01e6 e029       | )  |		Load	0x0,0x29
01e7 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01e8 00da       |    |		Load_Top	At_Offset_2
01e9 802b       | +  |		Call	0x0,0x2b
01ea e029       | )  |		Load	0x0,0x29
01eb 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01ec 00da       |    |		Load_Top	At_Offset_2
01ed 802c       | ,  |		Call	0x0,0x2c
01ee e029       | )  |		Load	0x0,0x29
01ef 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01f0 4801       |H   |		Short_Literal	0x1
01f1 e029       | )  |		Load	0x0,0x29
01f2 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01f3 0092 0340  |   @|		Action	Push_String_Extended,0x340					; "Analyse de trame cl35"
01f5 e029       | )  |		Load	0x0,0x29
01f6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
01f7 0092 0341  |   A|		Action	Push_String_Extended,0x341					; "Type : "
01f9 4801       |H   |		Short_Literal	0x1
01fa 4801       |H   |		Short_Literal	0x1
01fb e02d       | -  |		Load	0x0,0x2d
01fc 035b       | [  |		Declare_Type	Array,Constrained
01fd 0337       | 7  |		Declare_Variable	Array
01fe e615       |    |		Load	0x3,0x15
01ff 802e       | .  |		Call	0x0,0x2e
0200 4801       |H   |		Short_Literal	0x1
0201 00da       |    |		Load_Top	At_Offset_2
0202 01d6       |    |		Execute	Vector,Field_Write
0203 802c       | ,  |		Call	0x0,0x2c
0204 01cc       |    |		Execute	Vector,Catenate
0205 e029       | )  |		Load	0x0,0x29
0206 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0207 0092 0342  |   B|		Action	Push_String_Extended,0x342					; "lecteur : "
0209 00db       |    |		Load_Top	At_Offset_3
020a 802f       | /  |		Call	0x0,0x2f
020b 00e0       |    |		Load_Encached	Standard_Cache
020c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
020d 01cc       |    |		Execute	Vector,Catenate
020e e029       | )  |		Load	0x0,0x29
020f 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0210 0092 0343  |   C|		Action	Push_String_Extended,0x343					; "Taille : "
0212 00db       |    |		Load_Top	At_Offset_3
0213 8030       | 0  |		Call	0x0,0x30
0214 00e0       |    |		Load_Encached	Standard_Cache
0215 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0216 01cc       |    |		Execute	Vector,Catenate
0217 e029       | )  |		Load	0x0,0x29
0218 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0219 0092 0344  |   D|		Action	Push_String_Extended,0x344					; "Data : "
021b 00db       |    |		Load_Top	At_Offset_3
021c 8031       | 1  |		Call	0x0,0x31
021d 802c       | ,  |		Call	0x0,0x2c
021e 01cc       |    |		Execute	Vector,Catenate
021f e029       | )  |		Load	0x0,0x29
0220 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0221 4801       |H   |		Short_Literal	0x1
0222 e029       | )  |		Load	0x0,0x29
0223 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0224 0092 0345  |   E|		Action	Push_String_Extended,0x345					; "rapport site"
0226 e029       | )  |		Load	0x0,0x29
0227 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0228 e603       |    |		Load	0x3,0x3
0229 8031       | 1  |		Call	0x0,0x31
022a 8032       | 2  |		Call	0x0,0x32
022b 8033       | 3  |		Call	0x0,0x33
022c e029       | )  |		Load	0x0,0x29
022d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
022e 4801       |H   |		Short_Literal	0x1
022f e029       | )  |		Load	0x0,0x29
0230 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0231 0092 0346  |   F|		Action	Push_String_Extended,0x346					; "rapport parametre "
0233 e029       | )  |		Load	0x0,0x29
0234 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0235 e602       |    |		Load	0x3,0x2
0236 8031       | 1  |		Call	0x0,0x31
0237 8034       | 4  |		Call	0x0,0x34
0238 8035       | 5  |		Call	0x0,0x35
0239 e029       | )  |		Load	0x0,0x29
023a 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
023b 4801       |H   |		Short_Literal	0x1
023c e029       | )  |		Load	0x0,0x29
023d 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
023e 0092 0347  |   G|		Action	Push_String_Extended,0x347					; "rapport JJHHMM"
0240 e029       | )  |		Load	0x0,0x29
0241 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0242 e604       |    |		Load	0x3,0x4
0243 8031       | 1  |		Call	0x0,0x31
0244 8036       | 6  |		Call	0x0,0x36
0245 8037       | 7  |		Call	0x0,0x37
0246 e029       | )  |		Load	0x0,0x29
0247 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0248 4801       |H   |		Short_Literal	0x1
0249 e029       | )  |		Load	0x0,0x29
024a 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
024b 0092 0348  |   H|		Action	Push_String_Extended,0x348					; "rapport plage :"
024d e029       | )  |		Load	0x0,0x29
024e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
024f e607       |    |		Load	0x3,0x7
0250 802c       | ,  |		Call	0x0,0x2c
0251 e029       | )  |		Load	0x0,0x29
0252 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0253 e607       |    |		Load	0x3,0x7
0254 8031       | 1  |		Call	0x0,0x31
0255 802c       | ,  |		Call	0x0,0x2c
0256 e029       | )  |		Load	0x0,0x29
0257 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0258 e607       |    |		Load	0x3,0x7
0259 8031       | 1  |		Call	0x0,0x31
025a 8038       | 8  |		Call	0x0,0x38
025b 8039       | 9  |		Call	0x0,0x39
025c e029       | )  |		Load	0x0,0x29
025d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
025e 4801       |H   |		Short_Literal	0x1
025f e029       | )  |		Load	0x0,0x29
0260 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0261 0092 0349  |   I|		Action	Push_String_Extended,0x349					; "rapport Carte :"
0263 e029       | )  |		Load	0x0,0x29
0264 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0265 8616       |    |		Call	0x3,0x16
0266 4801       |H   |		Short_Literal	0x1
0267 e029       | )  |		Load	0x0,0x29
0268 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0269 0092 034a  |   J|		Action	Push_String_Extended,0x34a					; "rapport evenement"
026b e029       | )  |		Load	0x0,0x29
026c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
026d 8617       |    |		Call	0x3,0x17
026e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
026f 0000       |    |		.XXX[0x1]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 027d       | }  |		.CONST	0x027d								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0005       |    |		.CONST	0x0005								; Number of locals
0273			INIT_0270:
0273 4801       |H   |		Short_Literal	0x1
0274 480a       |H   |		Short_Literal	0xa
0275 e02d       | -  |		Load	0x0,0x2d
0276 035b       | [  |		Declare_Type	Array,Constrained
0277 0337       | 7  |		Declare_Variable	Array
0278 00e3       |    |		Load_Encached	Natural_Cache
0279 e00a       |    |		Load	0x0,0xa
027a 0322       | "  |		Declare_Variable	Record
027b 00d8       |    |		Load_Top	At_Offset_0
027c 0322       | "  |		Declare_Variable	Record
027d			BODY_0270:
027d 4801       |H   |		Short_Literal	0x1
027e 4801       |H   |		Short_Literal	0x1
027f e802       |    |		Load	0x4,0x2
0280 01d6       |    |		Execute	Vector,Field_Write
0281 4802       |H   |		Short_Literal	0x2
0282 4802       |H   |		Short_Literal	0x2
0283 e802       |    |		Load	0x4,0x2
0284 01d6       |    |		Execute	Vector,Field_Write
0285 4803       |H   |		Short_Literal	0x3
0286 4803       |H   |		Short_Literal	0x3
0287 e802       |    |		Load	0x4,0x2
0288 01d6       |    |		Execute	Vector,Field_Write
0289 4804       |H   |		Short_Literal	0x4
028a 4804       |H   |		Short_Literal	0x4
028b e802       |    |		Load	0x4,0x2
028c 01d6       |    |		Execute	Vector,Field_Write
028d 4805       |H   |		Short_Literal	0x5
028e 4805       |H   |		Short_Literal	0x5
028f e802       |    |		Load	0x4,0x2
0290 01d6       |    |		Execute	Vector,Field_Write
0291 4806       |H   |		Short_Literal	0x6
0292 4806       |H   |		Short_Literal	0x6
0293 e802       |    |		Load	0x4,0x2
0294 01d6       |    |		Execute	Vector,Field_Write
0295 4807       |H   |		Short_Literal	0x7
0296 4807       |H   |		Short_Literal	0x7
0297 e802       |    |		Load	0x4,0x2
0298 01d6       |    |		Execute	Vector,Field_Write
0299 4808       |H   |		Short_Literal	0x8
029a 4808       |H   |		Short_Literal	0x8
029b e802       |    |		Load	0x4,0x2
029c 01d6       |    |		Execute	Vector,Field_Write
029d 00da       |    |		Load_Top	At_Offset_2
029e 00d9       |    |		Load_Top	At_Offset_1
029f 00db       |    |		Load_Top	At_Offset_3
02a0 e802       |    |		Load	0x4,0x2
02a1 803a       | :  |		Call	0x0,0x3a
02a2 00d2       |    |		Pop_Control	Pop_Count_2
02a3 005b       | [  |		Store_Top	Discrete,At_Offset_3
02a4 00d9       |    |		Load_Top	At_Offset_1
02a5 803b       | ;  |		Call	0x0,0x3b
02a6 e029       | )  |		Load	0x0,0x29
02a7 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02a8 00d8       |    |		Load_Top	At_Offset_0
02a9 803b       | ;  |		Call	0x0,0x3b
02aa e029       | )  |		Load	0x0,0x29
02ab 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02ac 00da       |    |		Load_Top	At_Offset_2
02ad 00d9       |    |		Load_Top	At_Offset_1
02ae 00db       |    |		Load_Top	At_Offset_3
02af e803       |    |		Load	0x4,0x3
02b0 0a01       |    |		Execute_Immediate	Plus,0x1
02b1 00d8       |    |		Load_Top	At_Offset_0
02b2 00e2       |    |		Load_Encached	Integer_Cache
02b3 0260       | `  |		Execute	Discrete,In_Type
02b4 7001       |p   |		Jump_Nonzero	0x2b6
02b5 0801       |    |		Execute_Immediate	Raise,0x1
02b6 480a       |H   |		Short_Literal	0xa
02b7 e802       |    |		Load	0x4,0x2
02b8 01cf       |    |		Execute	Vector,Slice_Read
02b9 803a       | :  |		Call	0x0,0x3a
02ba 00d2       |    |		Pop_Control	Pop_Count_2
02bb 005b       | [  |		Store_Top	Discrete,At_Offset_3
02bc 00d9       |    |		Load_Top	At_Offset_1
02bd 803b       | ;  |		Call	0x0,0x3b
02be e029       | )  |		Load	0x0,0x29
02bf 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02c0 00d8       |    |		Load_Top	At_Offset_0
02c1 803b       | ;  |		Call	0x0,0x3b
02c2 e029       | )  |		Load	0x0,0x29
02c3 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
02c4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02c5 0000 0000  |    |		.XXX[0x3]
02c7 0000       |    |
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02d3       |    |		.CONST	0x02d3								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0004       |    |		.CONST	0x0004								; Number of locals
02cb			INIT_02c8:
02cb 4801       |H   |		Short_Literal	0x1
02cc 4814       |H   |		Short_Literal	0x14
02cd e02d       | -  |		Load	0x0,0x2d
02ce 035b       | [  |		Declare_Type	Array,Constrained
02cf 0337       | 7  |		Declare_Variable	Array
02d0 e03c       | <  |		Load	0x0,0x3c
02d1 0322       | "  |		Declare_Variable	Record
02d2 00e3       |    |		Load_Encached	Natural_Cache
02d3			BODY_02c8:
02d3 480c       |H   |		Short_Literal	0xc
02d4 4801       |H   |		Short_Literal	0x1
02d5 e802       |    |		Load	0x4,0x2
02d6 01d6       |    |		Execute	Vector,Field_Write
02d7 4822       |H"  |		Short_Literal	0x22
02d8 4802       |H   |		Short_Literal	0x2
02d9 e802       |    |		Load	0x4,0x2
02da 01d6       |    |		Execute	Vector,Field_Write
02db 4805       |H   |		Short_Literal	0x5
02dc 4803       |H   |		Short_Literal	0x3
02dd e802       |    |		Load	0x4,0x2
02de 01d6       |    |		Execute	Vector,Field_Write
02df 4806       |H   |		Short_Literal	0x6
02e0 4804       |H   |		Short_Literal	0x4
02e1 e802       |    |		Load	0x4,0x2
02e2 01d6       |    |		Execute	Vector,Field_Write
02e3 484e       |HN  |		Short_Literal	0x4e
02e4 4805       |H   |		Short_Literal	0x5
02e5 e802       |    |		Load	0x4,0x2
02e6 01d6       |    |		Execute	Vector,Field_Write
02e7 4800       |H   |		Short_Literal	0x0
02e8 4806       |H   |		Short_Literal	0x6
02e9 e802       |    |		Load	0x4,0x2
02ea 01d6       |    |		Execute	Vector,Field_Write
02eb 4800       |H   |		Short_Literal	0x0
02ec 4807       |H   |		Short_Literal	0x7
02ed e802       |    |		Load	0x4,0x2
02ee 01d6       |    |		Execute	Vector,Field_Write
02ef 480b       |H   |		Short_Literal	0xb
02f0 4808       |H   |		Short_Literal	0x8
02f1 e802       |    |		Load	0x4,0x2
02f2 01d6       |    |		Execute	Vector,Field_Write
02f3 4816       |H   |		Short_Literal	0x16
02f4 4809       |H   |		Short_Literal	0x9
02f5 e802       |    |		Load	0x4,0x2
02f6 01d6       |    |		Execute	Vector,Field_Write
02f7 4801       |H   |		Short_Literal	0x1
02f8 480a       |H   |		Short_Literal	0xa
02f9 e802       |    |		Load	0x4,0x2
02fa 01d6       |    |		Execute	Vector,Field_Write
02fb 4827       |H'  |		Short_Literal	0x27
02fc 480b       |H   |		Short_Literal	0xb
02fd e802       |    |		Load	0x4,0x2
02fe 01d6       |    |		Execute	Vector,Field_Write
02ff 4863       |Hc  |		Short_Literal	0x63
0300 480c       |H   |		Short_Literal	0xc
0301 e802       |    |		Load	0x4,0x2
0302 01d6       |    |		Execute	Vector,Field_Write
0303 4801       |H   |		Short_Literal	0x1
0304 480d       |H   |		Short_Literal	0xd
0305 e802       |    |		Load	0x4,0x2
0306 01d6       |    |		Execute	Vector,Field_Write
0307 4835       |H5  |		Short_Literal	0x35
0308 480e       |H   |		Short_Literal	0xe
0309 e802       |    |		Load	0x4,0x2
030a 01d6       |    |		Execute	Vector,Field_Write
030b 00d8       |    |		Load_Top	At_Offset_0
030c 00da       |    |		Load_Top	At_Offset_2
030d 483f       |H?  |		Short_Literal	0x3f
030e e802       |    |		Load	0x4,0x2
030f 803d       | =  |		Call	0x0,0x3d
0310 00d1       |    |		Pop_Control	Pop_Count_1
0311 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0312 00d9       |    |		Load_Top	At_Offset_1
0313 803e       | >  |		Call	0x0,0x3e
0314 e029       | )  |		Load	0x0,0x29
0315 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0316 00d8       |    |		Load_Top	At_Offset_0
0317 00da       |    |		Load_Top	At_Offset_2
0318 483f       |H?  |		Short_Literal	0x3f
0319 00db       |    |		Load_Top	At_Offset_3
031a 0a01       |    |		Execute_Immediate	Plus,0x1
031b 00d8       |    |		Load_Top	At_Offset_0
031c 00e2       |    |		Load_Encached	Integer_Cache
031d 0260       | `  |		Execute	Discrete,In_Type
031e 7001       |p   |		Jump_Nonzero	0x320
031f 0801       |    |		Execute_Immediate	Raise,0x1
0320 4814       |H   |		Short_Literal	0x14
0321 e802       |    |		Load	0x4,0x2
0322 01cf       |    |		Execute	Vector,Slice_Read
0323 803d       | =  |		Call	0x0,0x3d
0324 00d1       |    |		Pop_Control	Pop_Count_1
0325 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0326 00d9       |    |		Load_Top	At_Offset_1
0327 803e       | >  |		Call	0x0,0x3e
0328 e029       | )  |		Load	0x0,0x29
0329 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
032a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
032b ; --------------------------------------------------------------------------------------
032b ; STRING TABLE
032b ; --------------------------------------------------------------------------------------
032b 0042       | B  |		.STRTAB	0x0042->0x034c							; "Lecteur : "
032c 004a       | J  |		.STRTAB	0x004a->0x0351							; "programmation du lecteur "
032d 0061       | a  |		.STRTAB	0x0061->0x035d							; "Programmation du site"
032e 0074       | t  |		.STRTAB	0x0074->0x0368							; "Programmation de l'heure :"
032f 008c       |    |		.STRTAB	0x008c->0x0375							; "Validation d'une carte"
0330 00a0       |    |		.STRTAB	0x00a0->0x0380							; "Invalidation d'une carte"
0331 00b6       |    |		.STRTAB	0x00b6->0x038c							; "Programmation d'une plage horaire"
0332 00d5       |    |		.STRTAB	0x00d5->0x039c							; "beep"
0333 00d7       |    |		.STRTAB	0x00d7->0x039e							; "param"
0334 00da       |    |		.STRTAB	0x00da->0x03a1							; "cartes valides"
0335 00e6       |    |		.STRTAB	0x00e6->0x03a8							; "cartes invalides"
0336 00f4       |    |		.STRTAB	0x00f4->0x03b0							; "Horloge"
0337 00f9       |    |		.STRTAB	0x00f9->0x03b3							; "Site"
0338 00fb       |    |		.STRTAB	0x00fb->0x03b5							; "Mise en veille"
0339 0107       |    |		.STRTAB	0x0107->0x03bc							; "Mise en service"
033a 0114       |    |		.STRTAB	0x0114->0x03c4							; "Ack"
033b 0115       |    |		.STRTAB	0x0115->0x03c5							; "nak"
033c 0116       |    |		.STRTAB	0x0116->0x03c7							; "Pilotage a 1"
033d 0120       |    |		.STRTAB	0x0120->0x03cd							; "Evenement"
033e 0127       | '  |		.STRTAB	0x0127->0x03d1							; "validation d'un groupe de cartes "
033f 0146       | F  |		.STRTAB	0x0146->0x03e2							; "Invalidation d'un groupe de cartes"
0340 0166       | f  |		.STRTAB	0x0166->0x03f3							; "Analyse de trame cl35"
0341 0179       | y  |		.STRTAB	0x0179->0x03fd							; "Type : "
0342 017e       | ~  |		.STRTAB	0x017e->0x0401							; "lecteur : "
0343 0186       |    |		.STRTAB	0x0186->0x0406							; "Taille : "
0344 018d       |    |		.STRTAB	0x018d->0x040a							; "Data : "
0345 0192       |    |		.STRTAB	0x0192->0x040e							; "rapport site"
0346 019c       |    |		.STRTAB	0x019c->0x0414							; "rapport parametre "
0347 01ac       |    |		.STRTAB	0x01ac->0x041d							; "rapport JJHHMM"
0348 01b8       |    |		.STRTAB	0x01b8->0x0424							; "rapport plage :"
0349 01c5       |    |		.STRTAB	0x01c5->0x042b							; "rapport Carte :"
034a 01d2       |    |		.STRTAB	0x01d2->0x0433							; "rapport evenement"
034b 01e1       |    |		.STREND 0x01e1->0x043b
034c 4c65 6374  |Lect|		.STRTAB_STRINGS
043c 0000 0000  |    |		.BLANK	0000[0x4]
0440 ; --------------------------------------------------------------------------------------
0440 ; Debug Table
0440 ; --------------------------------------------------------------------------------------
0440 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x77a8,0x0000,0x0001,0x0005
0446 000b 0000  |    |		.DBG4T	0x000b,0x0000,0x8000,0x0000
044a 001b 045a  |   Z|		.DBG4T	0x001b,0x045a,0x8001,0x0000
044e 007b 0471  | { q|		.DBG4T	0x007b,0x0471,0x0004,0x0000
0452 0273 04f6  | s  |		.DBG4T	0x0273,0x04f6,0x0004,0x0000
0456 02cb 0509  |    |		.DBG4T	0x02cb,0x0509,0x0004,0x0000
045a ; --------------------------------------------------------------------------------------
045a ; Debug chain
045a ; --------------------------------------------------------------------------------------
045a 0009 000c  |    |		.DBGLEN	0x0009,0x000c
045c 001b 001d  |    |		.DBGLNO	0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0029,0x002d,0x0031,0x0037,0x003b,0x0043,0x0049,0x004e,0x0053,0x0056,0x005a,0x0062,0x006a,0x006e,0x0072
0471 ; --------------------------------------------------------------------------------------
0471 ; Debug chain
0471 ; --------------------------------------------------------------------------------------
0471 0014 006f  |   o|		.DBGLEN	0x0014,0x006f
0473 007b 007d  | { }|		.DBGLNO	0x007b,0x007d,0x007f,0x0082,0x0086,0x008a,0x008d,0x008f,0x0091,0x0093,0x0095,0x0097,0x0099,0x009b,0x009d,0x009f,0x00a1,0x00a3,0x00a5,0x00aa,0x00b3,0x00b7,0x00ba,0x00be,0x00c1,0x00c5,0x00c8,0x00cc,0x00d0,0x00d3,0x00d7,0x00da,0x00de,0x00e2,0x00e5,0x00e9,0x00ed,0x00f1,0x00f4,0x00f8,0x00fc,0x0100,0x0103,0x0107,0x010b,0x010f,0x0112,0x0116,0x011a,0x011e,0x0121,0x0125,0x0129,0x012d,0x0130,0x0134,0x0138,0x013c,0x013f,0x0143,0x0147,0x014b,0x014e,0x0152,0x0156,0x015a,0x015d,0x0161,0x0165,0x0169,0x016c,0x0170,0x0174,0x0178,0x017b,0x017f,0x0183,0x0187,0x018a,0x018e,0x0192,0x0196,0x0199,0x019d,0x01a1,0x01a5,0x01a8,0x01ac,0x01b0,0x01b4,0x01b7,0x01bb,0x01bf,0x01c3,0x01c6,0x01ca,0x01ce,0x01d2,0x01d5,0x01d9,0x01dd,0x01e1,0x01e4,0x01e8,0x01ec,0x01f0,0x01f3,0x01f7,0x0207,0x0210,0x0219,0x0221,0x0224,0x0228,0x022e,0x0231,0x0235,0x023b,0x023e,0x0242,0x0248,0x024b,0x024f,0x0253,0x0258,0x025e,0x0261,0x0265,0x0266,0x0269,0x026d
04f6 ; --------------------------------------------------------------------------------------
04f6 ; Debug chain
04f6 ; --------------------------------------------------------------------------------------
04f6 0003 000e  |    |		.DBGLEN	0x0003,0x000e
04f8 0273 0278  | s x|		.DBGLNO	0x0273,0x0278,0x0279,0x027d,0x0281,0x0285,0x0289,0x028d,0x0291,0x0295,0x0299,0x029d,0x02a4,0x02a8,0x02ac,0x02bc,0x02c0
0509 ; --------------------------------------------------------------------------------------
0509 ; Debug chain
0509 ; --------------------------------------------------------------------------------------
0509 0003 0012  |    |		.DBGLEN	0x0003,0x0012
050b 02cb 02d0  |    |		.DBGLNO	0x02cb,0x02d0,0x02d2,0x02d3,0x02d7,0x02db,0x02df,0x02e3,0x02e7,0x02eb,0x02ef,0x02f3,0x02f7,0x02fb,0x02ff,0x0303,0x0307,0x030b,0x0312,0x0316,0x0326
0520 0000 0000  |    |		.BLANK	0000[0xe0]