|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_05f893
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0390 | | .CONST 0x0390 ; 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 0044 | D | .CONST 0x0044 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 000b | | .CONST 0x000b ; Number of locals
001b INIT_0018:
001b 4801 |H | Short_Literal 0x1
001c 6197 |a | Indirect_Literal Discrete,0x1b4,{0x00000000, 0x00000400}
001d 00e9 | | Load_Encached String_Cache
001e 035b | [ | Declare_Type Array,Constrained
001f 0337 | 7 | Declare_Variable Array
0020 e002 | | Load 0x0,0x2
0021 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0022 02c7 | | Declare_Variable Any
0023 00d8 | | Load_Top At_Offset_0
0024 1c00 | | Execute_Immediate Run_Utility,0x0
0025 e003 | | Load 0x0,0x3
0026 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0027 4801 |H | Short_Literal 0x1
0028 4806 |H | Short_Literal 0x6
0029 00e9 | | Load_Encached String_Cache
002a 0334 | 4 | Declare_Variable Array,With_Constraint
002b 518c |Q | Indirect_Literal Any,0x1b8,{0x5443502f, 0x49502020}
002c 4801 |H | Short_Literal 0x1
002d 4802 |H | Short_Literal 0x2
002e e003 | | Load 0x0,0x3
002f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0030 035b | [ | Declare_Type Array,Constrained
0031 0337 | 7 | Declare_Variable Array
0032 4801 |H | Short_Literal 0x1
0033 4804 |H | Short_Literal 0x4
0034 e003 | | Load 0x0,0x3
0035 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0036 035b | [ | Declare_Type Array,Constrained
0037 0337 | 7 | Declare_Variable Array
0038 4801 |H | Short_Literal 0x1
0039 617a |az | Indirect_Literal Discrete,0x1b4,{0x00000000, 0x00000400}
003a e004 | | Load 0x0,0x4
003b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003c 035b | [ | Declare_Type Array,Constrained
003d 0337 | 7 | Declare_Variable Array
003e 00e3 | | Load_Encached Natural_Cache
003f 6170 |ap | Indirect_Literal Discrete,0x1b0,{0x00000000, 0x0bb80000}
0040 00e7 | | Load_Encached Duration_Cache
0041 03f1 | | Declare_Variable Discrete,With_Value
0042 00e1 | | Load_Encached Boolean_Cache
0043 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0044 BODY_0018:
0044 482e |H. | Short_Literal 0x2e
0045 480a |H | Short_Literal 0xa
0046 8005 | | Call 0x0,0x5
0047 8006 | | Call 0x0,0x6
0048 e406 | | Load 0x2,0x6
0049 01d4 | | Execute Vector,Structure_Write
004a e003 | | Load 0x0,0x3
004b 1b19 | | Execute Package,Field_Read,Field_Number 0x19
004c e403 | | Load 0x2,0x3
004d 0120 | | Execute Any,Is_Value
004e 6803 |h | Jump_Zero 0x52
004f e002 | | Load 0x0,0x2
0050 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0051 7801 |x | Jump 0x53
0052 e403 | | Load 0x2,0x3
0053 e406 | | Load 0x2,0x6
0054 e405 | | Load 0x2,0x5
0055 e002 | | Load 0x0,0x2
0056 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0057 c403 | | Store 0x2,0x3
0058 c404 | | Store 0x2,0x4
0059 e403 | | Load 0x2,0x3
005a e002 | | Load 0x0,0x2
005b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
005c 6808 |h | Jump_Zero 0x65
005d 4801 |H | Short_Literal 0x1
005e e007 | | Load 0x0,0x7
005f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0060 0092 01bc | | Action Push_String_Extended,0x1bc ; "OK: La connection vers l Objet est ouverte..."
0062 e007 | | Load 0x0,0x7
0063 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0064 7807 |x | Jump 0x6c
0065 4801 |H | Short_Literal 0x1
0066 e007 | | Load 0x0,0x7
0067 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0068 0092 01bd | | Action Push_String_Extended,0x1bd ; "ERREUR: La connection vers l Objet n'est pas ouverte..."
006a e007 | | Load 0x0,0x7
006b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
006c 0092 01be | | Action Push_String_Extended,0x1be ; "Je tente de me connecter a l Objet..."
006e e007 | | Load 0x0,0x7
006f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0070 e003 | | Load 0x0,0x3
0071 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0072 00da | | Load_Top At_Offset_2
0073 e403 | | Load 0x2,0x3
0074 e002 | | Load 0x0,0x2
0075 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0076 c404 | | Store 0x2,0x4
0077 e403 | | Load 0x2,0x3
0078 e002 | | Load 0x0,0x2
0079 1820 | | Execute Package,Field_Execute,Field_Number 0x20
007a 6805 |h | Jump_Zero 0x80
007b 0092 01bf | | Action Push_String_Extended,0x1bf ; "OK: On est connecte a l Objet..."
007d e007 | | Load 0x0,0x7
007e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
007f 7804 |x | Jump 0x84
0080 0092 01c0 | | Action Push_String_Extended,0x1c0 ; "ERREUR: On n'est pas connecte a l Objet ..."
0082 e007 | | Load 0x0,0x7
0083 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0084 0092 01c1 | | Action Push_String_Extended,0x1c1 ; "Je tente de recevoir..."
0086 e007 | | Load 0x0,0x7
0087 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0088 00e3 | | Load_Encached Natural_Cache
0089 e408 | | Load 0x2,0x8
008a e003 | | Load 0x0,0x3
008b 1b19 | | Execute Package,Field_Read,Field_Number 0x19
008c e40a | | Load 0x2,0xa
008d e403 | | Load 0x2,0x3
008e e002 | | Load 0x0,0x2
008f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0090 c404 | | Store 0x2,0x4
0091 00d1 | | Pop_Control Pop_Count_1
0092 005b | [ | Store_Top Discrete,At_Offset_3
0093 0092 01c2 | | Action Push_String_Extended,0x1c2 ; "J'ai recu "
0095 e007 | | Load 0x0,0x7
0096 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0097 00da | | Load_Top At_Offset_2
0098 00e0 | | Load_Encached Standard_Cache
0099 1818 | | Execute Package,Field_Execute,Field_Number 0x18
009a e007 | | Load 0x0,0x7
009b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
009c 0092 01c3 | | Action Push_String_Extended,0x1c3 ; " octets: "
009e e007 | | Load 0x0,0x7
009f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00a0 0092 01c4 | | Action Push_String_Extended,0x1c4 ; "Message: "
00a2 e007 | | Load 0x0,0x7
00a3 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00a4 00db | | Load_Top At_Offset_3
00a5 e008 | | Load 0x0,0x8
00a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a7 e402 | | Load 0x2,0x2
00a8 01d4 | | Execute Vector,Structure_Write
00a9 00cf | | Action Mark_Auxiliary
00aa 4864 |Hd | Short_Literal 0x64
00ab 4801 |H | Short_Literal 0x1
00ac 0007 | | Action Break_Optional
00ad 00d8 | | Load_Top At_Offset_0
00ae e402 | | Load 0x2,0x2
00af 01d7 | | Execute Vector,Field_Read
00b0 e007 | | Load 0x0,0x7
00b1 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
00b2 00c8 | | Action Pop_Auxiliary_Range
00b3 3ff9 |? | Loop_Increasing 0xad
00b4 00ce | | Action Pop_Auxiliary
00b5 4801 |H | Short_Literal 0x1
00b6 e007 | | Load 0x0,0x7
00b7 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00b8 0092 01c5 | | Action Push_String_Extended,0x1c5 ; "Index: "
00ba e007 | | Load 0x0,0x7
00bb 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00bc 4801 |H | Short_Literal 0x1
00bd e408 | | Load 0x2,0x8
00be 8009 | | Call 0x0,0x9
00bf 00e0 | | Load_Encached Standard_Cache
00c0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00c1 e007 | | Load 0x0,0x7
00c2 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00c3 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "Host: "
00c5 e007 | | Load 0x0,0x7
00c6 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00c7 4802 |H | Short_Literal 0x2
00c8 e408 | | Load 0x2,0x8
00c9 800a | | Call 0x0,0xa
00ca 800b | | Call 0x0,0xb
00cb 800c | | Call 0x0,0xc
00cc e00d | | Load 0x0,0xd
00cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00ce e007 | | Load 0x0,0x7
00cf 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00d0 0092 01c7 | | Action Push_String_Extended,0x1c7 ; "Socket: "
00d2 e007 | | Load 0x0,0x7
00d3 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00d4 4803 |H | Short_Literal 0x3
00d5 e408 | | Load 0x2,0x8
00d6 800a | | Call 0x0,0xa
00d7 8006 | | Call 0x0,0x6
00d8 800e | | Call 0x0,0xe
00d9 e00d | | Load 0x0,0xd
00da 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00db e007 | | Load 0x0,0x7
00dc 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00dd 0092 01c8 | | Action Push_String_Extended,0x1c8 ; "Codage: "
00df e007 | | Load 0x0,0x7
00e0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00e1 4804 |H | Short_Literal 0x4
00e2 e408 | | Load 0x2,0x8
00e3 8009 | | Call 0x0,0x9
00e4 00e0 | | Load_Encached Standard_Cache
00e5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00e6 e007 | | Load 0x0,0x7
00e7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00e8 0092 01c9 | | Action Push_String_Extended,0x1c9 ; "Commande: "
00ea e007 | | Load 0x0,0x7
00eb 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00ec 4805 |H | Short_Literal 0x5
00ed e408 | | Load 0x2,0x8
00ee 800f | | Call 0x0,0xf
00ef 8010 | | Call 0x0,0x10
00f0 e007 | | Load 0x0,0x7
00f1 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00f2 4805 |H | Short_Literal 0x5
00f3 e408 | | Load 0x2,0x8
00f4 800a | | Call 0x0,0xa
00f5 e00d | | Load 0x0,0xd
00f6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00f7 e007 | | Load 0x0,0x7
00f8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
00f9 4801 |H | Short_Literal 0x1
00fa e007 | | Load 0x0,0x7
00fb 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00fc e403 | | Load 0x2,0x3
00fd e002 | | Load 0x0,0x2
00fe 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00ff e403 | | Load 0x2,0x3
0100 e002 | | Load 0x0,0x2
0101 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0102 6805 |h | Jump_Zero 0x108
0103 0092 01ca | | Action Push_String_Extended,0x1ca ; "ERREUR: On est encore connecte a l Objet..."
0105 e007 | | Load 0x0,0x7
0106 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0107 7804 |x | Jump 0x10c
0108 0092 01cb | | Action Push_String_Extended,0x1cb ; "OK: On n'est plus connecte a l Objet.."
010a e007 | | Load 0x0,0x7
010b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
010c e403 | | Load 0x2,0x3
010d e002 | | Load 0x0,0x2
010e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
010f e403 | | Load 0x2,0x3
0110 e002 | | Load 0x0,0x2
0111 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0112 6805 |h | Jump_Zero 0x118
0113 0092 01cc | | Action Push_String_Extended,0x1cc ; "ERREUR: La connection a l Objet n'est pas fermee..."
0115 e007 | | Load 0x0,0x7
0116 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0117 7804 |x | Jump 0x11c
0118 0092 01cd | | Action Push_String_Extended,0x1cd ; "OK: La connection a l Objet est maintenant fermee..."
011a e007 | | Load 0x0,0x7
011b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
011c e003 | | Load 0x0,0x3
011d 1b19 | | Execute Package,Field_Read,Field_Number 0x19
011e e403 | | Load 0x2,0x3
011f 0120 | | Execute Any,Is_Value
0120 6803 |h | Jump_Zero 0x124
0121 e002 | | Load 0x0,0x2
0122 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0123 7801 |x | Jump 0x125
0124 e403 | | Load 0x2,0x3
0125 e003 | | Load 0x0,0x3
0126 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0127 e405 | | Load 0x2,0x5
0128 e002 | | Load 0x0,0x2
0129 181a | | Execute Package,Field_Execute,Field_Number 0x1a
012a c403 | | Store 0x2,0x3
012b c404 | | Store 0x2,0x4
012c e403 | | Load 0x2,0x3
012d e002 | | Load 0x0,0x2
012e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
012f 6808 |h | Jump_Zero 0x138
0130 4801 |H | Short_Literal 0x1
0131 e007 | | Load 0x0,0x7
0132 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0133 0092 01ce | | Action Push_String_Extended,0x1ce ; "OK: La connection est ouverte..."
0135 e007 | | Load 0x0,0x7
0136 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0137 7807 |x | Jump 0x13f
0138 4801 |H | Short_Literal 0x1
0139 e007 | | Load 0x0,0x7
013a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
013b 0092 01cf | | Action Push_String_Extended,0x1cf ; "ERREUR: La connection n'est pas ouverte..."
013d e007 | | Load 0x0,0x7
013e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
013f 0092 01d0 | | Action Push_String_Extended,0x1d0 ; "Je tente de me connecter..."
0141 e007 | | Load 0x0,0x7
0142 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0143 00cf | | Action Mark_Auxiliary
0144 7810 |x | Jump 0x155
0145 e003 | | Load 0x0,0x3
0146 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0147 00db | | Load_Top At_Offset_3
0148 4803 |H | Short_Literal 0x3
0149 e408 | | Load 0x2,0x8
014a 800a | | Call 0x0,0xa
014b 8006 | | Call 0x0,0x6
014c 4802 |H | Short_Literal 0x2
014d e408 | | Load 0x2,0x8
014e 800a | | Call 0x0,0xa
014f 800b | | Call 0x0,0xb
0150 e403 | | Load 0x2,0x3
0151 e002 | | Load 0x0,0x2
0152 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0153 c404 | | Store 0x2,0x4
0154 00c9 | | Action Pop_Auxiliary_Loop
0155 e403 | | Load 0x2,0x3
0156 e002 | | Load 0x0,0x2
0157 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0158 6fec |o | Jump_Zero 0x145
0159 00ce | | Action Pop_Auxiliary
015a e403 | | Load 0x2,0x3
015b e002 | | Load 0x0,0x2
015c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
015d 6805 |h | Jump_Zero 0x163
015e 0092 01d1 | | Action Push_String_Extended,0x1d1 ; "OK: On est connecte..."
0160 e007 | | Load 0x0,0x7
0161 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0162 7804 |x | Jump 0x167
0163 0092 01d2 | | Action Push_String_Extended,0x1d2 ; "ERREUR: On n'est pas connecte.."
0165 e007 | | Load 0x0,0x7
0166 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0167 0092 01d3 | | Action Push_String_Extended,0x1d3 ; "Je tente de transmettre le message..."
0169 e007 | | Load 0x0,0x7
016a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
016b 00e3 | | Load_Encached Natural_Cache
016c e003 | | Load 0x0,0x3
016d 1b19 | | Execute Package,Field_Read,Field_Number 0x19
016e 00da | | Load_Top At_Offset_2
016f e40a | | Load 0x2,0xa
0170 0092 01d4 | | Action Push_String_Extended,0x1d4 ; "C est la reponse\x00"
0172 e00d | | Load 0x0,0xd
0173 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0174 6037 |`7 | Indirect_Literal Discrete,0x1ac,{0x00000000, 0x00003039}
0175 e406 | | Load 0x2,0x6
0176 800e | | Call 0x0,0xe
0177 e407 | | Load 0x2,0x7
0178 800c | | Call 0x0,0xc
0179 4845 |HE | Short_Literal 0x45
017a 8011 | | Call 0x0,0x11
017b e403 | | Load 0x2,0x3
017c e002 | | Load 0x0,0x2
017d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
017e c404 | | Store 0x2,0x4
017f 005b | [ | Store_Top Discrete,At_Offset_3
0180 00da | | Load_Top At_Offset_2
0181 00e0 | | Load_Encached Standard_Cache
0182 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0183 e007 | | Load 0x0,0x7
0184 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0185 0092 01d5 | | Action Push_String_Extended,0x1d5 ; " caracteres ont ete envoyes."
0187 e007 | | Load 0x0,0x7
0188 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0189 e403 | | Load 0x2,0x3
018a e002 | | Load 0x0,0x2
018b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
018c e403 | | Load 0x2,0x3
018d e002 | | Load 0x0,0x2
018e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
018f 6805 |h | Jump_Zero 0x195
0190 0092 01d6 | | Action Push_String_Extended,0x1d6 ; "ERREUR: On est encore connecte..."
0192 e007 | | Load 0x0,0x7
0193 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0194 7804 |x | Jump 0x199
0195 0092 01d7 | | Action Push_String_Extended,0x1d7 ; "OK: On n'est plus connecte.."
0197 e007 | | Load 0x0,0x7
0198 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0199 e403 | | Load 0x2,0x3
019a e002 | | Load 0x0,0x2
019b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
019c e403 | | Load 0x2,0x3
019d e002 | | Load 0x0,0x2
019e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
019f 6805 |h | Jump_Zero 0x1a5
01a0 0092 01d8 | | Action Push_String_Extended,0x1d8 ; "ERREUR: La connection n'est pas fermee..."
01a2 e007 | | Load 0x0,0x7
01a3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01a5 0092 01d9 | | Action Push_String_Extended,0x1d9 ; "OK: La connection est maintenant fermee..."
01a7 e007 | | Load 0x0,0x7
01a8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
01a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01aa 0000 0000 | | .XXX[0x2]
01ac 0000 0000 | | .LITERAL {0x00000000, 0x00003039}
01b0 0000 0000 | | .LITERAL {0x00000000, 0x0bb80000}
01b4 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
01b8 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
01bc ; --------------------------------------------------------------------------------------
01bc ; STRING TABLE
01bc ; --------------------------------------------------------------------------------------
01bc 003e | > | .STRTAB 0x003e->0x01db ; "OK: La connection vers l Objet est ouverte..."
01bd 0069 | i | .STRTAB 0x0069->0x01f1 ; "ERREUR: La connection vers l Objet n'est pas ouverte..."
01be 009e | | .STRTAB 0x009e->0x020d ; "Je tente de me connecter a l Objet..."
01bf 00c1 | | .STRTAB 0x00c1->0x021f ; "OK: On est connecte a l Objet..."
01c0 00df | | .STRTAB 0x00df->0x022f ; "ERREUR: On n'est pas connecte a l Objet ..."
01c1 0108 | | .STRTAB 0x0108->0x0245 ; "Je tente de recevoir..."
01c2 011d | | .STRTAB 0x011d->0x0250 ; "J'ai recu "
01c3 0125 | % | .STRTAB 0x0125->0x0255 ; " octets: "
01c4 012d | - | .STRTAB 0x012d->0x025a ; "Message: "
01c5 0135 | 5 | .STRTAB 0x0135->0x025f ; "Index: "
01c6 013b | ; | .STRTAB 0x013b->0x0263 ; "Host: "
01c7 0140 | @ | .STRTAB 0x0140->0x0267 ; "Socket: "
01c8 0147 | G | .STRTAB 0x0147->0x026b ; "Codage: "
01c9 014e | N | .STRTAB 0x014e->0x0270 ; "Commande: "
01ca 0157 | W | .STRTAB 0x0157->0x0275 ; "ERREUR: On est encore connecte a l Objet..."
01cb 0180 | | .STRTAB 0x0180->0x028b ; "OK: On n'est plus connecte a l Objet.."
01cc 01a4 | | .STRTAB 0x01a4->0x029e ; "ERREUR: La connection a l Objet n'est pas fermee..."
01cd 01d5 | | .STRTAB 0x01d5->0x02b7 ; "OK: La connection a l Objet est maintenant fermee..."
01ce 0207 | | .STRTAB 0x0207->0x02d1 ; "OK: La connection est ouverte..."
01cf 0225 | % | .STRTAB 0x0225->0x02e1 ; "ERREUR: La connection n'est pas ouverte..."
01d0 024d | M | .STRTAB 0x024d->0x02f6 ; "Je tente de me connecter..."
01d1 0266 | f | .STRTAB 0x0266->0x0304 ; "OK: On est connecte..."
01d2 027a | z | .STRTAB 0x027a->0x030f ; "ERREUR: On n'est pas connecte.."
01d3 0297 | | .STRTAB 0x0297->0x031e ; "Je tente de transmettre le message..."
01d4 02ba | | .STRTAB 0x02ba->0x0331 ; "C est la reponse\x00"
01d5 02c9 | | .STRTAB 0x02c9->0x0339 ; " caracteres ont ete envoyes."
01d6 02e4 | | .STRTAB 0x02e4->0x0348 ; "ERREUR: On est encore connecte..."
01d7 0303 | | .STRTAB 0x0303->0x0358 ; "OK: On n'est plus connecte.."
01d8 031d | | .STRTAB 0x031d->0x0366 ; "ERREUR: La connection n'est pas fermee..."
01d9 0344 | D | .STRTAB 0x0344->0x037b ; "OK: La connection est maintenant fermee..."
01da 036c | l | .STREND 0x036c->0x0390
01db 4f4b 3a20 |OK: | .STRTAB_STRINGS
0390 ; --------------------------------------------------------------------------------------
0390 ; Debug Table
0390 ; --------------------------------------------------------------------------------------
0390 0004 000a | | .DEBUG4 0x0004,0x000a,0x59e2,0x0000,0x0001,0x0002
0396 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
039a 001b 039e | | .DBG4T 0x001b,0x039e,0x8001,0x4000
039e ; --------------------------------------------------------------------------------------
039e ; Debug chain
039e ; --------------------------------------------------------------------------------------
039e 000a 0042 | B| .DBGLEN 0x000a,0x0042
03a0 001b 0020 | | .DBGLNO 0x001b,0x0020,0x0025,0x0027,0x002c,0x0032,0x0038,0x003e,0x003f,0x0042,0x0044,0x004a,0x0059,0x005d,0x0060,0x0065,0x0068,0x006c,0x0070,0x0077,0x007b,0x0080,0x0084,0x0088,0x0093,0x0097,0x009c,0x00a0,0x00a4,0x00aa,0x00ad,0x00b5,0x00b8,0x00bc,0x00c3,0x00c7,0x00d0,0x00d4,0x00dd,0x00e1,0x00e8,0x00ec,0x00f2,0x00f9,0x00fc,0x00ff,0x0103,0x0108,0x010c,0x010f,0x0113,0x0118,0x011c,0x012c,0x0130,0x0133,0x0138,0x013b,0x013f,0x0145,0x0155,0x015a,0x015e,0x0163,0x0167,0x016b,0x0180,0x0185,0x0189,0x018c,0x0190,0x0195,0x0199,0x019c,0x01a0,0x01a5
03ec 0001 0002 | | .XXX[0x42]
03ee 0003 0004 | |
03f0 0005 0006 | |
03f2 0007 0008 | |
03f4 0009 000a | |
03f6 000b 000c | |
03f8 000d 000e | |
03fa 000f 0010 | |
03fc 0011 0012 | |
03fe 0013 0014 | |
0400 0015 0016 | |
0402 0017 0018 | |
0404 0019 001a | |
0406 001b 001c | |
0408 001d 001e | |
040a 001f 0020 | |
040c 0021 0022 | ! "|
040e 0023 0024 | # $|
0410 0025 0026 | % &|
0412 0027 0028 | ' (|
0414 0029 002a | ) *|
0416 002b 002c | + ,|
0418 002d 002e | - .|
041a 002f 0030 | / 0|
041c 0031 0033 | 1 3|
041e 0032 0034 | 2 4|
0420 0035 0036 | 5 6|
0422 0037 0038 | 7 8|
0424 0039 003a | 9 :|
0426 003b 003c | ; <|
0428 003d 003e | = >|
042a 003f 0040 | ? @|
042c 0041 0042 | A B|
042e 0000 0000 | | .BLANK 0000[0x1d2]