|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_09dc33
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0250 | P | .CONST 0x0250 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 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 For_Outer_Call,Visible,Unelaborated,INIT_0018
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 0035 | 5 | .CONST 0x0035 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0002 | | .CONST 0x0002 ; Number of locals
001b INIT_0018:
001b 4800 |H | Short_Literal 0x0
001c 0093 003b | ;| PushFullAddress InMicrocode,INIT_0038
001e 02a0 | | Declare_Subprogram Null_Subprogram
001f 038e | | Declare_Type Package,Defined
0020 0387 | | Declare_Variable Package
0021 e001 | | Load 0x0,0x1
0022 e002 | | Load 0x0,0x2
0023 e003 | | Load 0x0,0x3
0024 e004 | | Load 0x0,0x4
0025 e005 | | Load 0x0,0x5
0026 e006 | | Load 0x0,0x6
0027 e007 | | Load 0x0,0x7
0028 e008 | | Load 0x0,0x8
0029 e009 | | Load 0x0,0x9
002a e00a | | Load 0x0,0xa
002b e00b | | Load 0x0,0xb
002c e00c | | Load 0x0,0xc
002d e00d | | Load 0x0,0xd
002e e00e | | Load 0x0,0xe
002f e00f | | Load 0x0,0xf
0030 480f |H | Short_Literal 0xf
0031 e402 | | Load 0x2,0x2
0032 020e | | Execute Module,Augment_Imports
0033 00d8 | | Load_Top At_Offset_0
0034 020f | | Execute Module,Activate
0035 BODY_0018:
0035 00d8 | | Load_Top At_Offset_0
0036 180d | | Execute Package,Field_Execute,Field_Number 0xd
0037 4501 |E | Exit_Subprogram 0x1
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0050 | P | .CONST 0x0050 ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0012 | | .CONST 0x0012 ; Number of locals
003b INIT_0038:
003b 029a 005b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0058
003d 00bf | | Action Accept_Activation
003e 00e3 | | Load_Encached Natural_Cache
003f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0040 e001 | | Load 0x0,0x1
0041 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0042 02c7 | | Declare_Variable Any
0043 00d8 | | Load_Top At_Offset_0
0044 1c00 | | Execute_Immediate Run_Utility,0x0
0045 e001 | | Load 0x0,0x1
0046 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0047 02c7 | | Declare_Variable Any
0048 00d8 | | Load_Top At_Offset_0
0049 1c00 | | Execute_Immediate Run_Utility,0x0
004a 029d 006b | k| Declare_Subprogram For_Outer_Call,INIT_0068
004c 029d 007b | {| Declare_Subprogram For_Outer_Call,INIT_0078
004e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
004f 00c7 | | Action Elaborate_Subprogram
0050 BODY_0038:
0050 00bc | | Action Signal_Activated
0051 00bb | | Action Signal_Completion
0052 0000 0000 | | .BLANK 0000[0x6]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b e002 | | Load 0x0,0x2
005c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
005d e003 | | Load 0x0,0x3
005e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
005f 00cf | | Action Mark_Auxiliary
0060 8212 | | Call 0x1,0x12
0061 4501 |E | Exit_Subprogram 0x1
0062 0000 0000 | | .BLANK 0000[0x6]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0071 | q | .CONST 0x0071 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0004 | | .CONST 0x0004 ; Number of locals
006b INIT_0068:
006b 029f 008b | | Declare_Subprogram For_Call,INIT_0088
006d 029f 00fb | | Declare_Subprogram For_Call,INIT_00f8
006f 029f 016b | k| Declare_Subprogram For_Call,INIT_0168
0071 BODY_0068:
0071 8402 | | Call 0x2,0x2
0072 8403 | | Call 0x2,0x3
0073 8404 | | Call 0x2,0x4
0074 4800 |H | Short_Literal 0x0
0075 00ca | | Action Exit_Nullary_Function
0076 0000 0000 | | .XXX[0x2]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00cf | | Action Mark_Auxiliary
007c 8211 | | Call 0x1,0x11
007d 6802 |h | Jump_Zero 0x80
007e 00c9 | | Action Pop_Auxiliary_Loop
007f 7ffc | | Jump 0x7c
0080 4501 |E | Exit_Subprogram 0x1
0081 0000 0000 | | .BLANK 0000[0x7]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 00a5 | | .CONST 0x00a5 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 000b | | .CONST 0x000b ; Number of locals
008b INIT_0088:
008b 029f 01c3 | | Declare_Subprogram For_Call,INIT_01c0
008d 029f 01cb | | Declare_Subprogram For_Call,INIT_01c8
008f e001 | | Load 0x0,0x1
0090 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0091 1911 | | Execute Package,Field_Reference,Field_Number 0x11
0092 00c6 | | Action Check_Subprogram_Elaborated
0093 4802 |H | Short_Literal 0x2
0094 4803 |H | Short_Literal 0x3
0095 0099 | | Action Reference_Dynamic
0096 e004 | | Load 0x0,0x4
0097 e005 | | Load 0x0,0x5
0098 4807 |H | Short_Literal 0x7
0099 0007 | | Action Break_Optional
009a e001 | | Load 0x0,0x1
009b 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
009c 1911 | | Execute Package,Field_Reference,Field_Number 0x11
009d 00c6 | | Action Check_Subprogram_Elaborated
009e 4803 |H | Short_Literal 0x3
009f 4803 |H | Short_Literal 0x3
00a0 0099 | | Action Reference_Dynamic
00a1 e006 | | Load 0x0,0x6
00a2 e007 | | Load 0x0,0x7
00a3 480b |H | Short_Literal 0xb
00a4 0007 | | Action Break_Optional
00a5 BODY_0088:
00a5 e002 | | Load 0x0,0x2
00a6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00a7 4804 |H | Short_Literal 0x4
00a8 4803 |H | Short_Literal 0x3
00a9 0099 | | Action Reference_Dynamic
00aa 4805 |H | Short_Literal 0x5
00ab 4803 |H | Short_Literal 0x3
00ac 0099 | | Action Reference_Dynamic
00ad e001 | | Load 0x0,0x1
00ae 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
00af 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00b0 c210 | | Store 0x1,0x10
00b1 e003 | | Load 0x0,0x3
00b2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00b3 4808 |H | Short_Literal 0x8
00b4 4803 |H | Short_Literal 0x3
00b5 0099 | | Action Reference_Dynamic
00b6 4809 |H | Short_Literal 0x9
00b7 4803 |H | Short_Literal 0x3
00b8 0099 | | Action Reference_Dynamic
00b9 e001 | | Load 0x0,0x1
00ba 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
00bb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00bc c20f | | Store 0x1,0xf
00bd e210 | | Load 0x1,0x10
00be e001 | | Load 0x0,0x1
00bf 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
00c0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00c1 e20f | | Load 0x1,0xf
00c2 e001 | | Load 0x0,0x1
00c3 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
00c4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00c5 0279 | y | Execute Discrete,And
00c6 682f |h/ | Jump_Zero 0xf6
00c7 4802 |H | Short_Literal 0x2
00c8 e20f | | Load 0x1,0xf
00c9 e003 | | Load 0x0,0x3
00ca 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00cb 4800 |H | Short_Literal 0x0
00cc e210 | | Load 0x1,0x10
00cd e002 | | Load 0x0,0x2
00ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00cf e002 | | Load 0x0,0x2
00d0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00d1 e210 | | Load 0x1,0x10
00d2 e002 | | Load 0x0,0x2
00d3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00d4 e210 | | Load 0x1,0x10
00d5 e002 | | Load 0x0,0x2
00d6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00d7 e20f | | Load 0x1,0xf
00d8 e003 | | Load 0x0,0x3
00d9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00da 0092 0200 | | Action Push_String_Extended,0x200 ; "RegleCaser : "
00dc e210 | | Load 0x1,0x10
00dd e002 | | Load 0x0,0x2
00de 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00df 01cc | | Execute Vector,Catenate
00e0 0092 0201 | | Action Push_String_Extended,0x201 ; " depose la brique dans la case"
00e2 01cc | | Execute Vector,Catenate
00e3 e210 | | Load 0x1,0x10
00e4 e002 | | Load 0x0,0x2
00e5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00e6 00e0 | | Load_Encached Standard_Cache
00e7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00e8 01cc | | Execute Vector,Catenate
00e9 e001 | | Load 0x0,0x1
00ea 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00eb 0092 0202 | | Action Push_String_Extended,0x202 ; " "
00ed e001 | | Load 0x0,0x1
00ee 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00ef 4800 |H | Short_Literal 0x0
00f0 e210 | | Load 0x1,0x10
00f1 e002 | | Load 0x0,0x2
00f2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00f3 4801 |H | Short_Literal 0x1
00f4 00cb | | Action Pop_Block_With_Result
00f5 00ca | | Action Exit_Nullary_Function
00f6 4501 |E | Exit_Subprogram 0x1
00f7 0000 | | .XXX[0x1]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0115 | | .CONST 0x0115 ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 000b | | .CONST 0x000b ; Number of locals
00fb INIT_00f8:
00fb 029f 01d3 | | Declare_Subprogram For_Call,INIT_01d0
00fd 029f 01e3 | | Declare_Subprogram For_Call,INIT_01e0
00ff e001 | | Load 0x0,0x1
0100 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0101 1911 | | Execute Package,Field_Reference,Field_Number 0x11
0102 00c6 | | Action Check_Subprogram_Elaborated
0103 4802 |H | Short_Literal 0x2
0104 4803 |H | Short_Literal 0x3
0105 0099 | | Action Reference_Dynamic
0106 e008 | | Load 0x0,0x8
0107 e009 | | Load 0x0,0x9
0108 4807 |H | Short_Literal 0x7
0109 0007 | | Action Break_Optional
010a e001 | | Load 0x0,0x1
010b 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
010c 1911 | | Execute Package,Field_Reference,Field_Number 0x11
010d 00c6 | | Action Check_Subprogram_Elaborated
010e 4803 |H | Short_Literal 0x3
010f 4803 |H | Short_Literal 0x3
0110 0099 | | Action Reference_Dynamic
0111 e00a | | Load 0x0,0xa
0112 e00b | | Load 0x0,0xb
0113 480b |H | Short_Literal 0xb
0114 0007 | | Action Break_Optional
0115 BODY_00f8:
0115 e003 | | Load 0x0,0x3
0116 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0117 4808 |H | Short_Literal 0x8
0118 4803 |H | Short_Literal 0x3
0119 0099 | | Action Reference_Dynamic
011a 4809 |H | Short_Literal 0x9
011b 4803 |H | Short_Literal 0x3
011c 0099 | | Action Reference_Dynamic
011d e001 | | Load 0x0,0x1
011e 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
011f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0120 c20f | | Store 0x1,0xf
0121 e002 | | Load 0x0,0x2
0122 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0123 4804 |H | Short_Literal 0x4
0124 4803 |H | Short_Literal 0x3
0125 0099 | | Action Reference_Dynamic
0126 4805 |H | Short_Literal 0x5
0127 4803 |H | Short_Literal 0x3
0128 0099 | | Action Reference_Dynamic
0129 e001 | | Load 0x0,0x1
012a 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
012b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
012c c210 | | Store 0x1,0x10
012d e210 | | Load 0x1,0x10
012e e001 | | Load 0x0,0x1
012f 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0130 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0131 e20f | | Load 0x1,0xf
0132 e001 | | Load 0x0,0x1
0133 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0134 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0135 0279 | y | Execute Discrete,And
0136 682f |h/ | Jump_Zero 0x166
0137 4801 |H | Short_Literal 0x1
0138 e210 | | Load 0x1,0x10
0139 e002 | | Load 0x0,0x2
013a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
013b 4801 |H | Short_Literal 0x1
013c e20f | | Load 0x1,0xf
013d e003 | | Load 0x0,0x3
013e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
013f 4801 |H | Short_Literal 0x1
0140 e210 | | Load 0x1,0x10
0141 e002 | | Load 0x0,0x2
0142 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0143 0092 0203 | | Action Push_String_Extended,0x203 ; "RegleSaisir : "
0145 e210 | | Load 0x1,0x10
0146 e002 | | Load 0x0,0x2
0147 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0148 01cc | | Execute Vector,Catenate
0149 0092 0204 | | Action Push_String_Extended,0x204 ; " prend brique (taille="
014b 01cc | | Execute Vector,Catenate
014c e20f | | Load 0x1,0xf
014d e003 | | Load 0x0,0x3
014e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
014f 00e0 | | Load_Encached Standard_Cache
0150 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0151 01cc | | Execute Vector,Catenate
0152 0092 0205 | | Action Push_String_Extended,0x205 ; " / couleur = "
0154 01cc | | Execute Vector,Catenate
0155 e20f | | Load 0x1,0xf
0156 e003 | | Load 0x0,0x3
0157 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0158 e003 | | Load 0x0,0x3
0159 1b0e | | Execute Package,Field_Read,Field_Number 0xe
015a 011c | | Execute Any,Convert_Unchecked
015b 1c01 | | Execute_Immediate Run_Utility,0x1
015c 01cc | | Execute Vector,Catenate
015d e001 | | Load 0x0,0x1
015e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
015f 0092 0202 | | Action Push_String_Extended,0x202 ; " "
0161 e001 | | Load 0x0,0x1
0162 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0163 4801 |H | Short_Literal 0x1
0164 00cb | | Action Pop_Block_With_Result
0165 00ca | | Action Exit_Nullary_Function
0166 4501 |E | Exit_Subprogram 0x1
0167 0000 | | .XXX[0x1]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0185 | | .CONST 0x0185 ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 000b | | .CONST 0x000b ; Number of locals
016b INIT_0168:
016b 029f 01f3 | | Declare_Subprogram For_Call,INIT_01f0
016d 029f 01fb | | Declare_Subprogram For_Call,INIT_01f8
016f e001 | | Load 0x0,0x1
0170 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0171 1911 | | Execute Package,Field_Reference,Field_Number 0x11
0172 00c6 | | Action Check_Subprogram_Elaborated
0173 4802 |H | Short_Literal 0x2
0174 4803 |H | Short_Literal 0x3
0175 0099 | | Action Reference_Dynamic
0176 e00c | | Load 0x0,0xc
0177 e00d | | Load 0x0,0xd
0178 4807 |H | Short_Literal 0x7
0179 0007 | | Action Break_Optional
017a e001 | | Load 0x0,0x1
017b 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
017c 1911 | | Execute Package,Field_Reference,Field_Number 0x11
017d 00c6 | | Action Check_Subprogram_Elaborated
017e 4803 |H | Short_Literal 0x3
017f 4803 |H | Short_Literal 0x3
0180 0099 | | Action Reference_Dynamic
0181 e00e | | Load 0x0,0xe
0182 e00f | | Load 0x0,0xf
0183 480b |H | Short_Literal 0xb
0184 0007 | | Action Break_Optional
0185 BODY_0168:
0185 e003 | | Load 0x0,0x3
0186 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0187 4808 |H | Short_Literal 0x8
0188 4803 |H | Short_Literal 0x3
0189 0099 | | Action Reference_Dynamic
018a 4809 |H | Short_Literal 0x9
018b 4803 |H | Short_Literal 0x3
018c 0099 | | Action Reference_Dynamic
018d e001 | | Load 0x0,0x1
018e 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
018f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0190 c20f | | Store 0x1,0xf
0191 e002 | | Load 0x0,0x2
0192 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0193 4804 |H | Short_Literal 0x4
0194 4803 |H | Short_Literal 0x3
0195 0099 | | Action Reference_Dynamic
0196 4805 |H | Short_Literal 0x5
0197 4803 |H | Short_Literal 0x3
0198 0099 | | Action Reference_Dynamic
0199 e001 | | Load 0x0,0x1
019a 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
019b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019c c210 | | Store 0x1,0x10
019d e20f | | Load 0x1,0xf
019e e001 | | Load 0x0,0x1
019f 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
01a0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01a1 e210 | | Load 0x1,0x10
01a2 e001 | | Load 0x0,0x1
01a3 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
01a4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01a5 0279 | y | Execute Discrete,And
01a6 6815 |h | Jump_Zero 0x1bc
01a7 0092 0206 | | Action Push_String_Extended,0x206 ; "RegleArreter : "
01a9 e210 | | Load 0x1,0x10
01aa e002 | | Load 0x0,0x2
01ab 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ac 01cc | | Execute Vector,Catenate
01ad 0092 0207 | | Action Push_String_Extended,0x207 ; " se suicide (plus de briques)"
01af 01cc | | Execute Vector,Catenate
01b0 e001 | | Load 0x0,0x1
01b1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01b2 0092 0202 | | Action Push_String_Extended,0x202 ; " "
01b4 e001 | | Load 0x0,0x1
01b5 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01b6 e210 | | Load 0x1,0x10
01b7 e002 | | Load 0x0,0x2
01b8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01b9 4801 |H | Short_Literal 0x1
01ba 00cb | | Action Pop_Block_With_Result
01bb 00ca | | Action Exit_Nullary_Function
01bc 4501 |E | Exit_Subprogram 0x1
01bd 0000 0000 | | .XXX[0x3]
01bf 0000 | |
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 4801 |H | Short_Literal 0x1
01c4 00db | | Load_Top At_Offset_3
01c5 e002 | | Load 0x0,0x2
01c6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01c7 4401 |D | Exit_Subprogram With_Result,0x1
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 4801 |H | Short_Literal 0x1
01cc 00db | | Load_Top At_Offset_3
01cd e003 | | Load 0x0,0x3
01ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01cf 4401 |D | Exit_Subprogram With_Result,0x1
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 4800 |H | Short_Literal 0x0
01d4 00db | | Load_Top At_Offset_3
01d5 e002 | | Load 0x0,0x2
01d6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01d7 6805 |h | Jump_Zero 0x1dd
01d8 00da | | Load_Top At_Offset_2
01d9 e002 | | Load 0x0,0x2
01da 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01db 0f00 | | Execute_Immediate Equal,0x0
01dc 4401 |D | Exit_Subprogram With_Result,0x1
01dd 4800 |H | Short_Literal 0x0
01de 4401 |D | Exit_Subprogram With_Result,0x1
01df 0000 | | .XXX[0x1]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 4800 |H | Short_Literal 0x0
01e4 00db | | Load_Top At_Offset_3
01e5 e003 | | Load 0x0,0x3
01e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e7 6804 |h | Jump_Zero 0x1ec
01e8 00da | | Load_Top At_Offset_2
01e9 e003 | | Load 0x0,0x3
01ea 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01eb 4401 |D | Exit_Subprogram With_Result,0x1
01ec 4800 |H | Short_Literal 0x0
01ed 4401 |D | Exit_Subprogram With_Result,0x1
01ee 0000 0000 | | .XXX[0x2]
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 4800 |H | Short_Literal 0x0
01f4 00db | | Load_Top At_Offset_3
01f5 e002 | | Load 0x0,0x2
01f6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01f7 4401 |D | Exit_Subprogram With_Result,0x1
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb 4800 |H | Short_Literal 0x0
01fc 00db | | Load_Top At_Offset_3
01fd e003 | | Load 0x0,0x3
01fe 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ff 4401 |D | Exit_Subprogram With_Result,0x1
0200 ; --------------------------------------------------------------------------------------
0200 ; STRING TABLE
0200 ; --------------------------------------------------------------------------------------
0200 0012 | | .STRTAB 0x0012->0x0209 ; "RegleCaser : "
0201 001f | | .STRTAB 0x001f->0x0210 ; " depose la brique dans la case"
0202 003b | ; | .STRTAB 0x003b->0x021f ; " "
; " "
; " "
0203 003a | : | .STRTAB 0x003a->0x0220 ; "RegleSaisir : "
0204 0047 | G | .STRTAB 0x0047->0x0227 ; " prend brique (taille="
0205 005b | [ | .STRTAB 0x005b->0x0232 ; " / couleur = "
0206 0066 | f | .STRTAB 0x0066->0x0239 ; "RegleArreter : "
0207 0073 | s | .STRTAB 0x0073->0x0240 ; " se suicide (plus de briques)"
0208 008e | | .STREND 0x008e->0x024f
0209 5265 676c |Regl| .STRTAB_STRINGS
024f 0000 | | .XXX[0x1]
0250 ; --------------------------------------------------------------------------------------
0250 ; Debug Table
0250 ; --------------------------------------------------------------------------------------
0250 0004 0001 | | .DEBUG4 0x0004,0x0001,0x8a11,0x0000,0x0001,0x0010
0256 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
025a 001b 0296 | | .DBG4T 0x001b,0x0296,0x8001,0x0000
025e 003b 029b | ; | .DBG4T 0x003b,0x029b,0x0000,0x0000
0262 003e 029e | > | .DBG4T 0x003e,0x029e,0x0000,0x0000
0266 005b 02a5 | [ | .DBG4T 0x005b,0x02a5,0x0001,0x4000
026a 006b 02af | k | .DBG4T 0x006b,0x02af,0x0002,0x0000
026e 007b 02b5 | { | .DBG4T 0x007b,0x02b5,0x0001,0x4000
0272 008b 02b9 | | .DBG4T 0x008b,0x02b9,0x0004,0x0000
0276 00fb 02ca | | .DBG4T 0x00fb,0x02ca,0x0004,0x0000
027a 016b 02d9 | k | .DBG4T 0x016b,0x02d9,0x0004,0x0000
027e 01c3 02e6 | | .DBG4T 0x01c3,0x02e6,0x0002,0x0000
0282 01cb 02e9 | | .DBG4T 0x01cb,0x02e9,0x0002,0x0000
0286 01d3 02ec | | .DBG4T 0x01d3,0x02ec,0x0002,0x0000
028a 01e3 02ef | | .DBG4T 0x01e3,0x02ef,0x0002,0x0000
028e 01f3 02f2 | | .DBG4T 0x01f3,0x02f2,0x0002,0x0000
0292 01fb 02f5 | | .DBG4T 0x01fb,0x02f5,0x0002,0x0000
0296 ; --------------------------------------------------------------------------------------
0296 ; Debug chain
0296 ; --------------------------------------------------------------------------------------
0296 0002 0001 | | .DBGLEN 0x0002,0x0001
0298 001b 0021 | !| .DBGLNO 0x001b,0x0021,0x0035
029b ; --------------------------------------------------------------------------------------
029b ; Debug chain
029b ; --------------------------------------------------------------------------------------
029b 0001 0000 | | .DBGLEN 0x0001,0x0000
029d 003b | ; | .DBGLNO 0x003b
029e ; --------------------------------------------------------------------------------------
029e ; Debug chain
029e ; --------------------------------------------------------------------------------------
029e 0005 0000 | | .DBGLEN 0x0005,0x0000
02a0 003e 0040 | > @| .DBGLNO 0x003e,0x0040,0x004a,0x004c,0x004e
02a5 ; --------------------------------------------------------------------------------------
02a5 ; Debug chain
02a5 ; --------------------------------------------------------------------------------------
02a5 0000 0004 | | .DBGLEN 0x0000,0x0004
02a7 005b 005d | [ ]| .DBGLNO 0x005b,0x005d,0x0060,0x0061
02ab 0001 0002 | | .XXX[0x4]
02ad 0004 0005 | |
02af ; --------------------------------------------------------------------------------------
02af ; Debug chain
02af ; --------------------------------------------------------------------------------------
02af 0000 0004 | | .DBGLEN 0x0000,0x0004
02b1 0071 0072 | q r| .DBGLNO 0x0071,0x0072,0x0073,0x0074
02b5 ; --------------------------------------------------------------------------------------
02b5 ; Debug chain
02b5 ; --------------------------------------------------------------------------------------
02b5 0000 0001 | | .DBGLEN 0x0000,0x0001
02b7 007c | | | .DBGLNO 0x007c
02b8 0002 | | .XXX[0x1]
02b9 ; --------------------------------------------------------------------------------------
02b9 ; Debug chain
02b9 ; --------------------------------------------------------------------------------------
02b9 0004 000b | | .DBGLEN 0x0004,0x000b
02bb 008b 008d | | .DBGLNO 0x008b,0x008d,0x008f,0x009a,0x00a5,0x00b1,0x00bd,0x00c7,0x00cb,0x00cf,0x00d4,0x00da,0x00eb,0x00ef,0x00f3
02ca ; --------------------------------------------------------------------------------------
02ca ; Debug chain
02ca ; --------------------------------------------------------------------------------------
02ca 0004 0009 | | .DBGLEN 0x0004,0x0009
02cc 00fb 00fd | | .DBGLNO 0x00fb,0x00fd,0x00ff,0x010a,0x0115,0x0121,0x012d,0x0137,0x013b,0x013f,0x0143,0x015f,0x0163
02d9 ; --------------------------------------------------------------------------------------
02d9 ; Debug chain
02d9 ; --------------------------------------------------------------------------------------
02d9 0004 0007 | | .DBGLEN 0x0004,0x0007
02db 016b 016d | k m| .DBGLNO 0x016b,0x016d,0x016f,0x017a,0x0185,0x0191,0x019d,0x01a7,0x01b2,0x01b6,0x01b9
02e6 ; --------------------------------------------------------------------------------------
02e6 ; Debug chain
02e6 ; --------------------------------------------------------------------------------------
02e6 0000 0001 | | .DBGLEN 0x0000,0x0001
02e8 01c3 | | .DBGLNO 0x01c3
02e9 ; --------------------------------------------------------------------------------------
02e9 ; Debug chain
02e9 ; --------------------------------------------------------------------------------------
02e9 0000 0001 | | .DBGLEN 0x0000,0x0001
02eb 01cb | | .DBGLNO 0x01cb
02ec ; --------------------------------------------------------------------------------------
02ec ; Debug chain
02ec ; --------------------------------------------------------------------------------------
02ec 0000 0001 | | .DBGLEN 0x0000,0x0001
02ee 01d3 | | .DBGLNO 0x01d3
02ef ; --------------------------------------------------------------------------------------
02ef ; Debug chain
02ef ; --------------------------------------------------------------------------------------
02ef 0000 0001 | | .DBGLEN 0x0000,0x0001
02f1 01e3 | | .DBGLNO 0x01e3
02f2 ; --------------------------------------------------------------------------------------
02f2 ; Debug chain
02f2 ; --------------------------------------------------------------------------------------
02f2 0000 0001 | | .DBGLEN 0x0000,0x0001
02f4 01f3 | | .DBGLNO 0x01f3
02f5 ; --------------------------------------------------------------------------------------
02f5 ; Debug chain
02f5 ; --------------------------------------------------------------------------------------
02f5 0000 0001 | | .DBGLEN 0x0000,0x0001
02f7 01fb | | .DBGLNO 0x01fb
02f8 0000 0000 | | .BLANK 0000[0x108]