|
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: 2048 (0x800)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d0cd6
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦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 02e8 | | .CONST 0x02e8 ; 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 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 01a1 | | .CONST 0x01a1 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0027 | ' | .CONST 0x0027 ; Number of locals
001b INIT_0018:
001b 029e 01d3 | | Declare_Subprogram INIT_01d0,For_Call,Unelaborated
001d 4802 |H | Short_Literal 0x2
001e 4802 |H | Short_Literal 0x2
001f 0099 | | Action Reference_Dynamic
0020 00c7 | | Action Elaborate_Subprogram
0021 029e 01e3 | | Declare_Subprogram INIT_01e0,For_Call,Unelaborated
0023 4803 |H | Short_Literal 0x3
0024 4802 |H | Short_Literal 0x2
0025 0099 | | Action Reference_Dynamic
0026 00c7 | | Action Elaborate_Subprogram
0027 029f 0203 | | Declare_Subprogram INIT_0200,For_Call
0029 4802 |H | Short_Literal 0x2
002a 4802 |H | Short_Literal 0x2
002b 0099 | | Action Reference_Dynamic
002c 00c6 | | Action Check_Subprogram_Elaborated
002d 0092 0295 | | Action Push_String_Extended,0x295 ; "Print_The_Biggest_Ball"
002f 4801 |H | Short_Literal 0x1
0030 4802 |H | Short_Literal 0x2
0031 e002 | | Load 0x0,0x2
0032 035b | [ | Declare_Type Array,Constrained
0033 0337 | 7 | Declare_Variable Array
0034 4800 |H | Short_Literal 0x0
0035 e003 | | Load 0x0,0x3
0036 1c08 | | Execute_Immediate Run_Utility,0x8
0037 e003 | | Load 0x0,0x3
0038 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
0039 0337 | 7 | Declare_Variable Array
003a 4802 |H | Short_Literal 0x2
003b 8004 | | Call 0x0,0x4
003c 4800 |H | Short_Literal 0x0
003d 00da | | Load_Top At_Offset_2
003e 01d6 | | Execute Vector,Field_Write
003f 4812 |H | Short_Literal 0x12
0040 8005 | | Call 0x0,0x5
0041 4801 |H | Short_Literal 0x1
0042 00da | | Load_Top At_Offset_2
0043 01d6 | | Execute Vector,Field_Write
0044 480a |H | Short_Literal 0xa
0045 8004 | | Call 0x0,0x4
0046 4802 |H | Short_Literal 0x2
0047 00da | | Load_Top At_Offset_2
0048 01d6 | | Execute Vector,Field_Write
0049 8006 | | Call 0x0,0x6
004a 4803 |H | Short_Literal 0x3
004b 00da | | Load_Top At_Offset_2
004c 01d6 | | Execute Vector,Field_Write
004d e003 | | Load 0x0,0x3
004e 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
004f 0119 | | Execute Any,Check_In_Formal_Type
0050 00d9 | | Load_Top At_Offset_1
0051 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0052 4801 |H | Short_Literal 0x1
0053 00da | | Load_Top At_Offset_2
0054 01d6 | | Execute Vector,Field_Write
0055 4801 |H | Short_Literal 0x1
0056 e003 | | Load 0x0,0x3
0057 1c08 | | Execute_Immediate Run_Utility,0x8
0058 e003 | | Load 0x0,0x3
0059 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
005a 0337 | 7 | Declare_Variable Array
005b 4802 |H | Short_Literal 0x2
005c 8004 | | Call 0x0,0x4
005d 4800 |H | Short_Literal 0x0
005e 00da | | Load_Top At_Offset_2
005f 01d6 | | Execute Vector,Field_Write
0060 4812 |H | Short_Literal 0x12
0061 8007 | | Call 0x0,0x7
0062 4801 |H | Short_Literal 0x1
0063 00da | | Load_Top At_Offset_2
0064 01d6 | | Execute Vector,Field_Write
0065 8006 | | Call 0x0,0x6
0066 4803 |H | Short_Literal 0x3
0067 00da | | Load_Top At_Offset_2
0068 01d6 | | Execute Vector,Field_Write
0069 8006 | | Call 0x0,0x6
006a 4802 |H | Short_Literal 0x2
006b 00da | | Load_Top At_Offset_2
006c 01d6 | | Execute Vector,Field_Write
006d e003 | | Load 0x0,0x3
006e 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
006f 0119 | | Execute Any,Check_In_Formal_Type
0070 00d9 | | Load_Top At_Offset_1
0071 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0072 4802 |H | Short_Literal 0x2
0073 00da | | Load_Top At_Offset_2
0074 01d6 | | Execute Vector,Field_Write
0075 4804 |H | Short_Literal 0x4
0076 4802 |H | Short_Literal 0x2
0077 0099 | | Action Reference_Dynamic
0078 0093 0000 | | push_full_address 0x0
007a 614d |aM | Indirect_Literal Discrete,0x1c8,{0x80000000, 0x00050000}
007b 0273 | s | Execute Discrete,Plus
007c e008 | | Load 0x0,0x8
007d 0273 | s | Execute Discrete,Plus
007e e009 | | Load 0x0,0x9
007f 0273 | s | Execute Discrete,Plus
0080 4809 |H | Short_Literal 0x9
0081 0007 | | Action Break_Optional
0082 029f 0213 | | Declare_Subprogram INIT_0210,For_Call
0084 4802 |H | Short_Literal 0x2
0085 4802 |H | Short_Literal 0x2
0086 0099 | | Action Reference_Dynamic
0087 00c6 | | Action Check_Subprogram_Elaborated
0088 0092 0296 | | Action Push_String_Extended,0x296 ; "Dump_The_Working_Memory"
008a 4801 |H | Short_Literal 0x1
008b 4801 |H | Short_Literal 0x1
008c e002 | | Load 0x0,0x2
008d 035b | [ | Declare_Type Array,Constrained
008e 0337 | 7 | Declare_Variable Array
008f 4800 |H | Short_Literal 0x0
0090 e003 | | Load 0x0,0x3
0091 1c08 | | Execute_Immediate Run_Utility,0x8
0092 e00a | | Load 0x0,0xa
0093 0337 | 7 | Declare_Variable Array
0094 8006 | | Call 0x0,0x6
0095 4800 |H | Short_Literal 0x0
0096 00da | | Load_Top At_Offset_2
0097 01d6 | | Execute Vector,Field_Write
0098 8006 | | Call 0x0,0x6
0099 4803 |H | Short_Literal 0x3
009a 00da | | Load_Top At_Offset_2
009b 01d6 | | Execute Vector,Field_Write
009c 8006 | | Call 0x0,0x6
009d 4802 |H | Short_Literal 0x2
009e 00da | | Load_Top At_Offset_2
009f 01d6 | | Execute Vector,Field_Write
00a0 8006 | | Call 0x0,0x6
00a1 4801 |H | Short_Literal 0x1
00a2 00da | | Load_Top At_Offset_2
00a3 01d6 | | Execute Vector,Field_Write
00a4 e00a | | Load 0x0,0xa
00a5 01c3 | | Execute Vector,Check_In_Type
00a6 e003 | | Load 0x0,0x3
00a7 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
00a8 0119 | | Execute Any,Check_In_Formal_Type
00a9 00d9 | | Load_Top At_Offset_1
00aa 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00ab 4801 |H | Short_Literal 0x1
00ac 00da | | Load_Top At_Offset_2
00ad 01d6 | | Execute Vector,Field_Write
00ae 480a |H | Short_Literal 0xa
00af 4802 |H | Short_Literal 0x2
00b0 0099 | | Action Reference_Dynamic
00b1 0093 0000 | | push_full_address 0x0
00b3 6110 |a | Indirect_Literal Discrete,0x1c4,{0x80000000, 0x00040000}
00b4 0273 | s | Execute Discrete,Plus
00b5 e008 | | Load 0x0,0x8
00b6 0273 | s | Execute Discrete,Plus
00b7 e00b | | Load 0x0,0xb
00b8 0273 | s | Execute Discrete,Plus
00b9 480f |H | Short_Literal 0xf
00ba 0007 | | Action Break_Optional
00bb 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call
00bd 4802 |H | Short_Literal 0x2
00be 4802 |H | Short_Literal 0x2
00bf 0099 | | Action Reference_Dynamic
00c0 00c6 | | Action Check_Subprogram_Elaborated
00c1 0092 0297 | | Action Push_String_Extended,0x297 ; "Remove_The_Robots"
00c3 4801 |H | Short_Literal 0x1
00c4 4801 |H | Short_Literal 0x1
00c5 e002 | | Load 0x0,0x2
00c6 035b | [ | Declare_Type Array,Constrained
00c7 0337 | 7 | Declare_Variable Array
00c8 4800 |H | Short_Literal 0x0
00c9 e003 | | Load 0x0,0x3
00ca 1c08 | | Execute_Immediate Run_Utility,0x8
00cb e003 | | Load 0x0,0x3
00cc 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
00cd 0337 | 7 | Declare_Variable Array
00ce 4801 |H | Short_Literal 0x1
00cf 8004 | | Call 0x0,0x4
00d0 4800 |H | Short_Literal 0x0
00d1 00da | | Load_Top At_Offset_2
00d2 01d6 | | Execute Vector,Field_Write
00d3 8006 | | Call 0x0,0x6
00d4 4803 |H | Short_Literal 0x3
00d5 00da | | Load_Top At_Offset_2
00d6 01d6 | | Execute Vector,Field_Write
00d7 8006 | | Call 0x0,0x6
00d8 4801 |H | Short_Literal 0x1
00d9 00da | | Load_Top At_Offset_2
00da 01d6 | | Execute Vector,Field_Write
00db 8006 | | Call 0x0,0x6
00dc 4802 |H | Short_Literal 0x2
00dd 00da | | Load_Top At_Offset_2
00de 01d6 | | Execute Vector,Field_Write
00df e003 | | Load 0x0,0x3
00e0 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
00e1 0119 | | Execute Any,Check_In_Formal_Type
00e2 00d9 | | Load_Top At_Offset_1
00e3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00e4 4801 |H | Short_Literal 0x1
00e5 00da | | Load_Top At_Offset_2
00e6 01d6 | | Execute Vector,Field_Write
00e7 4810 |H | Short_Literal 0x10
00e8 4802 |H | Short_Literal 0x2
00e9 0099 | | Action Reference_Dynamic
00ea 0093 0000 | | push_full_address 0x0
00ec 60d3 |` | Indirect_Literal Discrete,0x1c0,{0x80000000, 0x00030000}
00ed 0273 | s | Execute Discrete,Plus
00ee e008 | | Load 0x0,0x8
00ef 0273 | s | Execute Discrete,Plus
00f0 e00c | | Load 0x0,0xc
00f1 0273 | s | Execute Discrete,Plus
00f2 4815 |H | Short_Literal 0x15
00f3 0007 | | Action Break_Optional
00f4 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call
00f6 4802 |H | Short_Literal 0x2
00f7 4802 |H | Short_Literal 0x2
00f8 0099 | | Action Reference_Dynamic
00f9 00c6 | | Action Check_Subprogram_Elaborated
00fa 0092 0298 | | Action Push_String_Extended,0x298 ; "Pair_Ball_And_Boxes"
00fc 4801 |H | Short_Literal 0x1
00fd 4803 |H | Short_Literal 0x3
00fe e002 | | Load 0x0,0x2
00ff 035b | [ | Declare_Type Array,Constrained
0100 0337 | 7 | Declare_Variable Array
0101 4800 |H | Short_Literal 0x0
0102 e003 | | Load 0x0,0x3
0103 1c08 | | Execute_Immediate Run_Utility,0x8
0104 e003 | | Load 0x0,0x3
0105 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
0106 0337 | 7 | Declare_Variable Array
0107 4802 |H | Short_Literal 0x2
0108 8004 | | Call 0x0,0x4
0109 4800 |H | Short_Literal 0x0
010a 00da | | Load_Top At_Offset_2
010b 01d6 | | Execute Vector,Field_Write
010c 4812 |H | Short_Literal 0x12
010d 8005 | | Call 0x0,0x5
010e 4801 |H | Short_Literal 0x1
010f 00da | | Load_Top At_Offset_2
0110 01d6 | | Execute Vector,Field_Write
0111 4802 |H | Short_Literal 0x2
0112 8005 | | Call 0x0,0x5
0113 4802 |H | Short_Literal 0x2
0114 00da | | Load_Top At_Offset_2
0115 01d6 | | Execute Vector,Field_Write
0116 4806 |H | Short_Literal 0x6
0117 8004 | | Call 0x0,0x4
0118 4803 |H | Short_Literal 0x3
0119 00da | | Load_Top At_Offset_2
011a 01d6 | | Execute Vector,Field_Write
011b e003 | | Load 0x0,0x3
011c 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
011d 0119 | | Execute Any,Check_In_Formal_Type
011e 00d9 | | Load_Top At_Offset_1
011f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0120 4801 |H | Short_Literal 0x1
0121 00da | | Load_Top At_Offset_2
0122 01d6 | | Execute Vector,Field_Write
0123 4800 |H | Short_Literal 0x0
0124 e003 | | Load 0x0,0x3
0125 1c08 | | Execute_Immediate Run_Utility,0x8
0126 e003 | | Load 0x0,0x3
0127 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
0128 0337 | 7 | Declare_Variable Array
0129 4803 |H | Short_Literal 0x3
012a 8004 | | Call 0x0,0x4
012b 4800 |H | Short_Literal 0x0
012c 00da | | Load_Top At_Offset_2
012d 01d6 | | Execute Vector,Field_Write
012e 4802 |H | Short_Literal 0x2
012f 800d | | Call 0x0,0xd
0130 4802 |H | Short_Literal 0x2
0131 00da | | Load_Top At_Offset_2
0132 01d6 | | Execute Vector,Field_Write
0133 4812 |H | Short_Literal 0x12
0134 8007 | | Call 0x0,0x7
0135 4813 |H | Short_Literal 0x13
0136 8005 | | Call 0x0,0x5
0137 800e | | Call 0x0,0xe
0138 4801 |H | Short_Literal 0x1
0139 00da | | Load_Top At_Offset_2
013a 01d6 | | Execute Vector,Field_Write
013b 4805 |H | Short_Literal 0x5
013c 8004 | | Call 0x0,0x4
013d 4803 |H | Short_Literal 0x3
013e 00da | | Load_Top At_Offset_2
013f 01d6 | | Execute Vector,Field_Write
0140 e003 | | Load 0x0,0x3
0141 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
0142 0119 | | Execute Any,Check_In_Formal_Type
0143 00d9 | | Load_Top At_Offset_1
0144 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0145 4802 |H | Short_Literal 0x2
0146 00da | | Load_Top At_Offset_2
0147 01d6 | | Execute Vector,Field_Write
0148 4801 |H | Short_Literal 0x1
0149 e003 | | Load 0x0,0x3
014a 1c08 | | Execute_Immediate Run_Utility,0x8
014b e003 | | Load 0x0,0x3
014c 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
014d 0337 | 7 | Declare_Variable Array
014e 4803 |H | Short_Literal 0x3
014f 8004 | | Call 0x0,0x4
0150 4800 |H | Short_Literal 0x0
0151 00da | | Load_Top At_Offset_2
0152 01d6 | | Execute Vector,Field_Write
0153 4802 |H | Short_Literal 0x2
0154 800d | | Call 0x0,0xd
0155 4802 |H | Short_Literal 0x2
0156 00da | | Load_Top At_Offset_2
0157 01d6 | | Execute Vector,Field_Write
0158 4812 |H | Short_Literal 0x12
0159 8007 | | Call 0x0,0x7
015a 4813 |H | Short_Literal 0x13
015b 800f | | Call 0x0,0xf
015c 800e | | Call 0x0,0xe
015d 4801 |H | Short_Literal 0x1
015e 00da | | Load_Top At_Offset_2
015f 01d6 | | Execute Vector,Field_Write
0160 4805 |H | Short_Literal 0x5
0161 8004 | | Call 0x0,0x4
0162 4803 |H | Short_Literal 0x3
0163 00da | | Load_Top At_Offset_2
0164 01d6 | | Execute Vector,Field_Write
0165 e003 | | Load 0x0,0x3
0166 2302 |# | Execute Variant_Record,Field_Type,Field_Number 0x2
0167 0119 | | Execute Any,Check_In_Formal_Type
0168 00d9 | | Load_Top At_Offset_1
0169 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
016a 4803 |H | Short_Literal 0x3
016b 00da | | Load_Top At_Offset_2
016c 01d6 | | Execute Vector,Field_Write
016d 4816 |H | Short_Literal 0x16
016e 4802 |H | Short_Literal 0x2
016f 0099 | | Action Reference_Dynamic
0170 0093 0000 | | push_full_address 0x0
0172 6049 |`I | Indirect_Literal Discrete,0x1bc,{0x80000000, 0x00020000}
0173 0273 | s | Execute Discrete,Plus
0174 e008 | | Load 0x0,0x8
0175 0273 | s | Execute Discrete,Plus
0176 e010 | | Load 0x0,0x10
0177 0273 | s | Execute Discrete,Plus
0178 481b |H | Short_Literal 0x1b
0179 0007 | | Action Break_Optional
017a 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call
017c 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call
017e 029f 0273 | s| Declare_Subprogram INIT_0270,For_Call
0180 029f 0283 | | Declare_Subprogram INIT_0280,For_Call
0182 029f 0293 | | Declare_Subprogram INIT_0290,For_Call
0184 4803 |H | Short_Literal 0x3
0185 4802 |H | Short_Literal 0x2
0186 0099 | | Action Reference_Dynamic
0187 00c6 | | Action Check_Subprogram_Elaborated
0188 481c |H | Short_Literal 0x1c
0189 4802 |H | Short_Literal 0x2
018a 0099 | | Action Reference_Dynamic
018b 481d |H | Short_Literal 0x1d
018c 4802 |H | Short_Literal 0x2
018d 0099 | | Action Reference_Dynamic
018e 481e |H | Short_Literal 0x1e
018f 4802 |H | Short_Literal 0x2
0190 0099 | | Action Reference_Dynamic
0191 481f |H | Short_Literal 0x1f
0192 4802 |H | Short_Literal 0x2
0193 0099 | | Action Reference_Dynamic
0194 4820 |H | Short_Literal 0x20
0195 4802 |H | Short_Literal 0x2
0196 0099 | | Action Reference_Dynamic
0197 0093 0000 | | push_full_address 0x0
0199 601e |` | Indirect_Literal Discrete,0x1b8,{0x80000000, 0x00010000}
019a 0273 | s | Execute Discrete,Plus
019b e008 | | Load 0x0,0x8
019c 0273 | s | Execute Discrete,Plus
019d e011 | | Load 0x0,0x11
019e 0273 | s | Execute Discrete,Plus
019f 4827 |H' | Short_Literal 0x27
01a0 0007 | | Action Break_Optional
01a1 BODY_0018:
01a1 4821 |H! | Short_Literal 0x21
01a2 4802 |H | Short_Literal 0x2
01a3 0099 | | Action Reference_Dynamic
01a4 4822 |H" | Short_Literal 0x22
01a5 4802 |H | Short_Literal 0x2
01a6 0099 | | Action Reference_Dynamic
01a7 4823 |H# | Short_Literal 0x23
01a8 4802 |H | Short_Literal 0x2
01a9 0099 | | Action Reference_Dynamic
01aa 4824 |H$ | Short_Literal 0x24
01ab 4802 |H | Short_Literal 0x2
01ac 0099 | | Action Reference_Dynamic
01ad 4825 |H% | Short_Literal 0x25
01ae 4802 |H | Short_Literal 0x2
01af 0099 | | Action Reference_Dynamic
01b0 4826 |H& | Short_Literal 0x26
01b1 4802 |H | Short_Literal 0x2
01b2 0099 | | Action Reference_Dynamic
01b3 8403 | | Call 0x2,0x3
01b4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01b5 0000 0000 | | .XXX[0x3]
01b7 0000 | |
01b8 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
01bc 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
01c0 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
01c4 8000 0000 | | .LITERAL {0x80000000, 0x00040000}
01c8 8000 0000 | | .LITERAL {0x80000000, 0x00050000}
01cc 0000 0000 | | .BLANK 0000[0x4]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d5 | | .CONST 0x01d5 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0002 | | .CONST 0x0002 ; Number of locals
01d3 INIT_01d0:
01d3 e7fd | | Load 0x3,-0x3
01d4 8012 | | Call 0x0,0x12
01d5 BODY_01d0:
01d5 00d8 | | Load_Top At_Offset_0
01d6 8013 | | Call 0x0,0x13
01d7 01de | | Execute Vector,Not_Equal
01d8 6804 |h | Jump_Zero 0x1dd
01d9 00d8 | | Load_Top At_Offset_0
01da 87fe | | Call 0x3,-0x2
01db 4801 |H | Short_Literal 0x1
01dc 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01dd 4800 |H | Short_Literal 0x0
01de 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
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 00cf | | Action Mark_Auxiliary
01e4 87fa | | Call 0x3,-0x6
01e5 700e |p | Jump_Nonzero 0x1f4
01e6 87fb | | Call 0x3,-0x5
01e7 700a |p | Jump_Nonzero 0x1f2
01e8 87fc | | Call 0x3,-0x4
01e9 7006 |p | Jump_Nonzero 0x1f0
01ea 87fd | | Call 0x3,-0x3
01eb 7002 |p | Jump_Nonzero 0x1ee
01ec 87fe | | Call 0x3,-0x2
01ed 7807 |x | Jump 0x1f5
01ee 4801 |H | Short_Literal 0x1
01ef 7805 |x | Jump 0x1f5
01f0 4801 |H | Short_Literal 0x1
01f1 7803 |x | Jump 0x1f5
01f2 4801 |H | Short_Literal 0x1
01f3 7801 |x | Jump 0x1f5
01f4 4801 |H | Short_Literal 0x1
01f5 6802 |h | Jump_Zero 0x1f8
01f6 00c9 | | Action Pop_Auxiliary_Loop
01f7 7fec | | Jump 0x1e4
01f8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01f9 0000 0000 | | .BLANK 0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0207 | | .CONST 0x0207 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0002 | | .CONST 0x0002 ; Number of locals
0203 INIT_0200:
0203 4801 |H | Short_Literal 0x1
0204 00db | | Load_Top At_Offset_3
0205 01d7 | | Execute Vector,Field_Read
0206 0007 | | Action Break_Optional
0207 BODY_0200:
0207 0092 0299 | | Action Push_String_Extended,0x299 ; "The biggest ball is : "
0209 e014 | | Load 0x0,0x14
020a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
020b 00d8 | | Load_Top At_Offset_0
020c 8015 | | Call 0x0,0x15
020d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
020e 0000 0000 | | .XXX[0x2]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0217 | | .CONST 0x0217 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0002 | | .CONST 0x0002 ; Number of locals
0213 INIT_0210:
0213 4801 |H | Short_Literal 0x1
0214 00db | | Load_Top At_Offset_3
0215 01d7 | | Execute Vector,Field_Read
0216 0007 | | Action Break_Optional
0217 BODY_0210:
0217 00d8 | | Load_Top At_Offset_0
0218 8015 | | Call 0x0,0x15
0219 00d8 | | Load_Top At_Offset_0
021a 8016 | | Call 0x0,0x16
021b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
021c 0000 0000 | | .BLANK 0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0227 | ' | .CONST 0x0227 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0002 | | .CONST 0x0002 ; Number of locals
0223 INIT_0220:
0223 4801 |H | Short_Literal 0x1
0224 00db | | Load_Top At_Offset_3
0225 01d7 | | Execute Vector,Field_Read
0226 0007 | | Action Break_Optional
0227 BODY_0220:
0227 00d8 | | Load_Top At_Offset_0
0228 8015 | | Call 0x0,0x15
0229 0092 029a | | Action Push_String_Extended,0x29a ; " --> has been removed"
022b e014 | | Load 0x0,0x14
022c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
022d 00d8 | | Load_Top At_Offset_0
022e 8016 | | Call 0x0,0x16
022f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 023b | ; | .CONST 0x023b ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0003 | | .CONST 0x0003 ; Number of locals
0233 INIT_0230:
0233 4801 |H | Short_Literal 0x1
0234 00db | | Load_Top At_Offset_3
0235 01d7 | | Execute Vector,Field_Read
0236 0007 | | Action Break_Optional
0237 4802 |H | Short_Literal 0x2
0238 e7ff | | Load 0x3,-0x1
0239 01d7 | | Execute Vector,Field_Read
023a 0007 | | Action Break_Optional
023b BODY_0230:
023b 0092 029b | | Action Push_String_Extended,0x29b ; "Ball : "
023d e014 | | Load 0x0,0x14
023e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
023f 00d9 | | Load_Top At_Offset_1
0240 8015 | | Call 0x0,0x15
0241 0092 029c | | Action Push_String_Extended,0x29c ; "Paired with box :"
0243 e014 | | Load 0x0,0x14
0244 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0245 00d8 | | Load_Top At_Offset_0
0246 8015 | | Call 0x0,0x15
0247 4807 |H | Short_Literal 0x7
0248 4803 |H | Short_Literal 0x3
0249 00db | | Load_Top At_Offset_3
024a 8017 | | Call 0x0,0x17
024b 4804 |H | Short_Literal 0x4
024c 4803 |H | Short_Literal 0x3
024d 00da | | Load_Top At_Offset_2
024e 8017 | | Call 0x0,0x17
024f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253 | S | .CONST 0x0253 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0001 | | .CONST 0x0001 ; Number of locals
0253 BODY_0250:
0253 INIT_0250:
0253 e411 | | Load 0x2,0x11
0254 e412 | | Load 0x2,0x12
0255 4813 |H | Short_Literal 0x13
0256 4802 |H | Short_Literal 0x2
0257 0099 | | Action Reference_Dynamic
0258 4814 |H | Short_Literal 0x14
0259 4802 |H | Short_Literal 0x2
025a 0099 | | Action Reference_Dynamic
025b 8402 | | Call 0x2,0x2
025c 00ca | | Action Exit_Nullary_Function
025d 0000 0000 | | .XXX[0x3]
025f 0000 | |
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 e417 | | Load 0x2,0x17
0264 e418 | | Load 0x2,0x18
0265 4819 |H | Short_Literal 0x19
0266 4802 |H | Short_Literal 0x2
0267 0099 | | Action Reference_Dynamic
0268 481a |H | Short_Literal 0x1a
0269 4802 |H | Short_Literal 0x2
026a 0099 | | Action Reference_Dynamic
026b 8402 | | Call 0x2,0x2
026c 00ca | | Action Exit_Nullary_Function
026d 0000 0000 | | .XXX[0x3]
026f 0000 | |
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 e405 | | Load 0x2,0x5
0274 e406 | | Load 0x2,0x6
0275 4807 |H | Short_Literal 0x7
0276 4802 |H | Short_Literal 0x2
0277 0099 | | Action Reference_Dynamic
0278 4808 |H | Short_Literal 0x8
0279 4802 |H | Short_Literal 0x2
027a 0099 | | Action Reference_Dynamic
027b 8402 | | Call 0x2,0x2
027c 00ca | | Action Exit_Nullary_Function
027d 0000 0000 | | .XXX[0x3]
027f 0000 | |
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 e40b | | Load 0x2,0xb
0284 e40c | | Load 0x2,0xc
0285 480d |H | Short_Literal 0xd
0286 4802 |H | Short_Literal 0x2
0287 0099 | | Action Reference_Dynamic
0288 480e |H | Short_Literal 0xe
0289 4802 |H | Short_Literal 0x2
028a 0099 | | Action Reference_Dynamic
028b 8402 | | Call 0x2,0x2
028c 00ca | | Action Exit_Nullary_Function
028d 0000 0000 | | .XXX[0x3]
028f 0000 | |
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 4800 |H | Short_Literal 0x0
0294 00ca | | Action Exit_Nullary_Function
0295 ; --------------------------------------------------------------------------------------
0295 ; STRING TABLE
0295 ; --------------------------------------------------------------------------------------
0295 0012 | | .STRTAB 0x0012->0x029e ; "Print_The_Biggest_Ball"
0296 0026 | & | .STRTAB 0x0026->0x02a9 ; "Dump_The_Working_Memory"
0297 003b | ; | .STRTAB 0x003b->0x02b4 ; "Remove_The_Robots"
0298 004a | J | .STRTAB 0x004a->0x02bd ; "Pair_Ball_And_Boxes"
0299 005b | [ | .STRTAB 0x005b->0x02c6 ; "The biggest ball is : "
029a 006f | o | .STRTAB 0x006f->0x02d1 ; " --> has been removed"
029b 0082 | | .STRTAB 0x0082->0x02dc ; "Ball : "
029c 0087 | | .STRTAB 0x0087->0x02df ; "Paired with box :"
029d 0096 | | .STREND 0x0096->0x02e8
029e 5072 696e |Prin| .STRTAB_STRINGS
02e8 ; --------------------------------------------------------------------------------------
02e8 ; Debug Table
02e8 ; --------------------------------------------------------------------------------------
02e8 0004 0004 | | .DEBUG4 0x0004,0x0004,0x3c26,0x0000,0x0001,0x000d
02ee 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
02f2 001b 0322 | "| .DBG4T 0x001b,0x0322,0x8001,0x0000
02f6 01d3 0332 | 2| .DBG4T 0x01d3,0x0332,0x2802,0x0003
02fa 01e3 0339 | 9| .DBG4T 0x01e3,0x0339,0x2801,0x4003
02fe 0203 033d | =| .DBG4T 0x0203,0x033d,0x0001,0x0000
0302 0213 0342 | B| .DBG4T 0x0213,0x0342,0x0001,0x0000
0306 0223 0347 | # G| .DBG4T 0x0223,0x0347,0x0001,0x0000
030a 0233 034d | 3 M| .DBG4T 0x0233,0x034d,0x0001,0x0000
030e 0253 0000 | S | .DBG4T 0x0253,0x0000,0x000c,0x0000
0312 0263 0000 | c | .DBG4T 0x0263,0x0000,0x000c,0x0000
0316 0273 0000 | s | .DBG4T 0x0273,0x0000,0x000c,0x0000
031a 0283 0000 | | .DBG4T 0x0283,0x0000,0x000c,0x0000
031e 0293 0000 | | .DBG4T 0x0293,0x0000,0x0005,0x0000
0322 ; --------------------------------------------------------------------------------------
0322 ; Debug chain
0322 ; --------------------------------------------------------------------------------------
0322 000d 0001 | | .DBGLEN 0x000d,0x0001
0324 001b 001d | | .DBGLNO 0x001b,0x001d,0x0021,0x0023,0x0027,0x0029,0x0082,0x0084,0x00bb,0x00bd,0x00f4,0x00f6,0x017a,0x01a1
0332 ; --------------------------------------------------------------------------------------
0332 ; Debug chain
0332 ; --------------------------------------------------------------------------------------
0332 0001 0004 | | .DBGLEN 0x0001,0x0004
0334 01d3 01d5 | | .DBGLNO 0x01d3,0x01d5,0x01d9,0x01db,0x01dd
0339 ; --------------------------------------------------------------------------------------
0339 ; Debug chain
0339 ; --------------------------------------------------------------------------------------
0339 0000 0001 | | .DBGLEN 0x0000,0x0001
033b 01e4 | | .DBGLNO 0x01e4
033c 0002 | | .XXX[0x1]
033d ; --------------------------------------------------------------------------------------
033d ; Debug chain
033d ; --------------------------------------------------------------------------------------
033d 0001 0002 | | .DBGLEN 0x0001,0x0002
033f 0203 0207 | | .DBGLNO 0x0203,0x0207,0x020b
0342 ; --------------------------------------------------------------------------------------
0342 ; Debug chain
0342 ; --------------------------------------------------------------------------------------
0342 0001 0002 | | .DBGLEN 0x0001,0x0002
0344 0213 0217 | | .DBGLNO 0x0213,0x0217,0x0219
0347 ; --------------------------------------------------------------------------------------
0347 ; Debug chain
0347 ; --------------------------------------------------------------------------------------
0347 0001 0003 | | .DBGLEN 0x0001,0x0003
0349 0223 0227 | # '| .DBGLNO 0x0223,0x0227,0x0229,0x022d
034d ; --------------------------------------------------------------------------------------
034d ; Debug chain
034d ; --------------------------------------------------------------------------------------
034d 0002 0006 | | .DBGLEN 0x0002,0x0006
034f 0233 0237 | 3 7| .DBGLNO 0x0233,0x0237,0x023b,0x023f,0x0241,0x0245,0x0247,0x024b
0357 0000 0000 | | .BLANK 0000[0xa9]