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

⟦83f57712f⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06d8c3

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 01e8       |    |		.CONST	0x01e8								; 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 015e       | ^  |		.CONST	0x015e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0014       |    |		.CONST	0x0014								; Number of locals
000b			INIT_0008:
000b 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 4800       |H   |		Short_Literal	0x0
000f 4805       |H   |		Short_Literal	0x5
0010 029f 0173  |   s|		Declare_Subprogram	INIT_0170,For_Call
0012 03fd       |    |		Declare_Type	Discrete,Defined
0013 4800       |H   |		Short_Literal	0x0
0014 e002       |    |		Load	0x0,0x2
0015 0a05       |    |		Execute_Immediate	Plus,0x5
0016 e001       |    |		Load	0x0,0x1
0017 01d7       |    |		Execute	Vector,Field_Read
0018 02a0       |    |		Declare_Subprogram	Null_Subprogram
0019 038e       |    |		Declare_Type	Package,Defined
001a e001       |    |		Load	0x0,0x1
001b e002       |    |		Load	0x0,0x2
001c 0a04       |    |		Execute_Immediate	Plus,0x4
001d e001       |    |		Load	0x0,0x1
001e 01d7       |    |		Execute	Vector,Field_Read
001f 4802       |H   |		Short_Literal	0x2
0020 00db       |    |		Load_Top	At_Offset_3
0021 020e       |    |		Execute	Module,Augment_Imports
0022 0387       |    |		Declare_Variable	Package
0023 e003       |    |		Load	0x0,0x3
0024 e004       |    |		Load	0x0,0x4
0025 e005       |    |		Load	0x0,0x5
0026 a006       |    |		Store_Unchecked	0x0,0x6
0027 a007       |    |		Store_Unchecked	0x0,0x7
0028 e008       |    |		Load	0x0,0x8
0029 a009       |    |		Store_Unchecked	0x0,0x9
002a e00a       |    |		Load	0x0,0xa
002b a00b       |    |		Store_Unchecked	0x0,0xb
002c a00c       |    |		Store_Unchecked	0x0,0xc
002d e00d       |    |		Load	0x0,0xd
002e a00e       |    |		Store_Unchecked	0x0,0xe
002f a00f       |    |		Store_Unchecked	0x0,0xf
0030 a010       |    |		Store_Unchecked	0x0,0x10
0031 480e       |H   |		Short_Literal	0xe
0032 e20f       |    |		Load	0x1,0xf
0033 020e       |    |		Execute	Module,Augment_Imports
0034 00d8       |    |		Load_Top	At_Offset_0
0035 020f       |    |		Execute	Module,Activate
0036 4800       |H   |		Short_Literal	0x0
0037 e002       |    |		Load	0x0,0x2
0038 0a01       |    |		Execute_Immediate	Plus,0x1
0039 e001       |    |		Load	0x0,0x1
003a 01d7       |    |		Execute	Vector,Field_Read
003b 02a0       |    |		Declare_Subprogram	Null_Subprogram
003c 038e       |    |		Declare_Type	Package,Defined
003d e001       |    |		Load	0x0,0x1
003e e002       |    |		Load	0x0,0x2
003f e001       |    |		Load	0x0,0x1
0040 01d7       |    |		Execute	Vector,Field_Read
0041 4802       |H   |		Short_Literal	0x2
0042 00db       |    |		Load_Top	At_Offset_3
0043 020e       |    |		Execute	Module,Augment_Imports
0044 0387       |    |		Declare_Variable	Package
0045 e003       |    |		Load	0x0,0x3
0046 e004       |    |		Load	0x0,0x4
0047 e005       |    |		Load	0x0,0x5
0048 a006       |    |		Store_Unchecked	0x0,0x6
0049 a007       |    |		Store_Unchecked	0x0,0x7
004a e008       |    |		Load	0x0,0x8
004b e011       |    |		Load	0x0,0x11
004c e00a       |    |		Load	0x0,0xa
004d a009       |    |		Store_Unchecked	0x0,0x9
004e a012       |    |		Store_Unchecked	0x0,0x12
004f a013       |    |		Store_Unchecked	0x0,0x13
0050 e00d       |    |		Load	0x0,0xd
0051 a00e       |    |		Store_Unchecked	0x0,0xe
0052 a00b       |    |		Store_Unchecked	0x0,0xb
0053 a00c       |    |		Store_Unchecked	0x0,0xc
0054 a014       |    |		Store_Unchecked	0x0,0x14
0055 4810       |H   |		Short_Literal	0x10
0056 e210       |    |		Load	0x1,0x10
0057 020e       |    |		Execute	Module,Augment_Imports
0058 00d8       |    |		Load_Top	At_Offset_0
0059 020f       |    |		Execute	Module,Activate
005a 4800       |H   |		Short_Literal	0x0
005b e002       |    |		Load	0x0,0x2
005c 0a03       |    |		Execute_Immediate	Plus,0x3
005d e001       |    |		Load	0x0,0x1
005e 01d7       |    |		Execute	Vector,Field_Read
005f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0060 038e       |    |		Declare_Type	Package,Defined
0061 e001       |    |		Load	0x0,0x1
0062 e002       |    |		Load	0x0,0x2
0063 0a02       |    |		Execute_Immediate	Plus,0x2
0064 e001       |    |		Load	0x0,0x1
0065 01d7       |    |		Execute	Vector,Field_Read
0066 4802       |H   |		Short_Literal	0x2
0067 00db       |    |		Load_Top	At_Offset_3
0068 020e       |    |		Execute	Module,Augment_Imports
0069 0387       |    |		Declare_Variable	Package
006a e003       |    |		Load	0x0,0x3
006b e004       |    |		Load	0x0,0x4
006c e005       |    |		Load	0x0,0x5
006d a006       |    |		Store_Unchecked	0x0,0x6
006e a007       |    |		Store_Unchecked	0x0,0x7
006f e00a       |    |		Load	0x0,0xa
0070 e008       |    |		Load	0x0,0x8
0071 a009       |    |		Store_Unchecked	0x0,0x9
0072 a00c       |    |		Store_Unchecked	0x0,0xc
0073 a00f       |    |		Store_Unchecked	0x0,0xf
0074 a015       |    |		Store_Unchecked	0x0,0x15
0075 e00d       |    |		Load	0x0,0xd
0076 a00e       |    |		Store_Unchecked	0x0,0xe
0077 a013       |    |		Store_Unchecked	0x0,0x13
0078 480e       |H   |		Short_Literal	0xe
0079 e211       |    |		Load	0x1,0x11
007a 020e       |    |		Execute	Module,Augment_Imports
007b 00d8       |    |		Load_Top	At_Offset_0
007c 020f       |    |		Execute	Module,Activate
007d 4800       |H   |		Short_Literal	0x0
007e e002       |    |		Load	0x0,0x2
007f 0a07       |    |		Execute_Immediate	Plus,0x7
0080 e001       |    |		Load	0x0,0x1
0081 01d7       |    |		Execute	Vector,Field_Read
0082 02a0       |    |		Declare_Subprogram	Null_Subprogram
0083 038e       |    |		Declare_Type	Package,Defined
0084 e001       |    |		Load	0x0,0x1
0085 e002       |    |		Load	0x0,0x2
0086 0a06       |    |		Execute_Immediate	Plus,0x6
0087 e001       |    |		Load	0x0,0x1
0088 01d7       |    |		Execute	Vector,Field_Read
0089 4802       |H   |		Short_Literal	0x2
008a 00db       |    |		Load_Top	At_Offset_3
008b 020e       |    |		Execute	Module,Augment_Imports
008c 0387       |    |		Declare_Variable	Package
008d e003       |    |		Load	0x0,0x3
008e e004       |    |		Load	0x0,0x4
008f e008       |    |		Load	0x0,0x8
0090 a006       |    |		Store_Unchecked	0x0,0x6
0091 a007       |    |		Store_Unchecked	0x0,0x7
0092 e005       |    |		Load	0x0,0x5
0093 e011       |    |		Load	0x0,0x11
0094 a009       |    |		Store_Unchecked	0x0,0x9
0095 a010       |    |		Store_Unchecked	0x0,0x10
0096 e00d       |    |		Load	0x0,0xd
0097 a00e       |    |		Store_Unchecked	0x0,0xe
0098 a00b       |    |		Store_Unchecked	0x0,0xb
0099 a00c       |    |		Store_Unchecked	0x0,0xc
009a 480d       |H   |		Short_Literal	0xd
009b e212       |    |		Load	0x1,0x12
009c 020e       |    |		Execute	Module,Augment_Imports
009d 00d8       |    |		Load_Top	At_Offset_0
009e 020f       |    |		Execute	Module,Activate
009f 4800       |H   |		Short_Literal	0x0
00a0 e002       |    |		Load	0x0,0x2
00a1 0a09       |    |		Execute_Immediate	Plus,0x9
00a2 e001       |    |		Load	0x0,0x1
00a3 01d7       |    |		Execute	Vector,Field_Read
00a4 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a5 038e       |    |		Declare_Type	Package,Defined
00a6 e001       |    |		Load	0x0,0x1
00a7 e002       |    |		Load	0x0,0x2
00a8 0a08       |    |		Execute_Immediate	Plus,0x8
00a9 e001       |    |		Load	0x0,0x1
00aa 01d7       |    |		Execute	Vector,Field_Read
00ab 4802       |H   |		Short_Literal	0x2
00ac 00db       |    |		Load_Top	At_Offset_3
00ad 020e       |    |		Execute	Module,Augment_Imports
00ae 0387       |    |		Declare_Variable	Package
00af e003       |    |		Load	0x0,0x3
00b0 e004       |    |		Load	0x0,0x4
00b1 e011       |    |		Load	0x0,0x11
00b2 a006       |    |		Store_Unchecked	0x0,0x6
00b3 a007       |    |		Store_Unchecked	0x0,0x7
00b4 e008       |    |		Load	0x0,0x8
00b5 e00a       |    |		Load	0x0,0xa
00b6 e005       |    |		Load	0x0,0x5
00b7 a012       |    |		Store_Unchecked	0x0,0x12
00b8 a014       |    |		Store_Unchecked	0x0,0x14
00b9 a00b       |    |		Store_Unchecked	0x0,0xb
00ba a013       |    |		Store_Unchecked	0x0,0x13
00bb a00c       |    |		Store_Unchecked	0x0,0xc
00bc 480d       |H   |		Short_Literal	0xd
00bd e213       |    |		Load	0x1,0x13
00be 020e       |    |		Execute	Module,Augment_Imports
00bf 00d8       |    |		Load_Top	At_Offset_0
00c0 020f       |    |		Execute	Module,Activate
00c1 0093 0000  |    |		push_full_address	0x0
00c3 60a4       |`   |		Indirect_Literal	Discrete,0x168,{0x80000000, 0x00010000}
00c4 0273       | s  |		Execute	Discrete,Plus
00c5 e016       |    |		Load	0x0,0x16
00c6 0273       | s  |		Execute	Discrete,Plus
00c7 e017       |    |		Load	0x0,0x17
00c8 0273       | s  |		Execute	Discrete,Plus
00c9 4800       |H   |		Short_Literal	0x0
00ca e20e       |    |		Load	0x1,0xe
00cb 4805       |H   |		Short_Literal	0x5
00cc 4800       |H   |		Short_Literal	0x0
00cd 0092 0196  |    |		Action	Push_String_Extended,0x196					; "MARK_BOTTOM_LEFT_FOR_NEW_TOWER"
00cf e20f       |    |		Load	0x1,0xf
00d0 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00d1 e20f       |    |		Load	0x1,0xf
00d2 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
00d3 4801       |H   |		Short_Literal	0x1
00d4 0092 0197  |    |		Action	Push_String_Extended,0x197					; "MAKE_BOTTOM_LEFT_PLACE_FREE"
00d6 e210       |    |		Load	0x1,0x10
00d7 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00d8 e210       |    |		Load	0x1,0x10
00d9 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
00da 4802       |H   |		Short_Literal	0x2
00db 0092 0198  |    |		Action	Push_String_Extended,0x198					; "MARK_BLOCK_FOR_NEW_TOWER"
00dd e211       |    |		Load	0x1,0x11
00de 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00df e211       |    |		Load	0x1,0x11
00e0 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
00e1 4803       |H   |		Short_Literal	0x3
00e2 0092 0199  |    |		Action	Push_String_Extended,0x199					; "MARK_TOP_BLOCK_OF_MARKED_BLOCK"
00e4 e212       |    |		Load	0x1,0x12
00e5 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00e6 e212       |    |		Load	0x1,0x12
00e7 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
00e8 4804       |H   |		Short_Literal	0x4
00e9 0092 019a  |    |		Action	Push_String_Extended,0x19a					; "PUT_BLOCK_ON_NEW_TOWER"
00eb e213       |    |		Load	0x1,0x13
00ec 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00ed e213       |    |		Load	0x1,0x13
00ee 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
00ef 4805       |H   |		Short_Literal	0x5
00f0 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
00f2 00c4       |    |		Action	Make_Default
00f3 a018       |    |		Store_Unchecked	0x0,0x18
00f4 4805       |H   |		Short_Literal	0x5
00f5 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
00f7 00c4       |    |		Action	Make_Default
00f8 a018       |    |		Store_Unchecked	0x0,0x18
00f9 4805       |H   |		Short_Literal	0x5
00fa 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
00fc 00c4       |    |		Action	Make_Default
00fd a018       |    |		Store_Unchecked	0x0,0x18
00fe 4805       |H   |		Short_Literal	0x5
00ff 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0101 00c4       |    |		Action	Make_Default
0102 a018       |    |		Store_Unchecked	0x0,0x18
0103 4805       |H   |		Short_Literal	0x5
0104 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0106 00c4       |    |		Action	Make_Default
0107 a018       |    |		Store_Unchecked	0x0,0x18
0108 4805       |H   |		Short_Literal	0x5
0109 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
010b 00c4       |    |		Action	Make_Default
010c a018       |    |		Store_Unchecked	0x0,0x18
010d 4805       |H   |		Short_Literal	0x5
010e 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0110 00c4       |    |		Action	Make_Default
0111 a018       |    |		Store_Unchecked	0x0,0x18
0112 4805       |H   |		Short_Literal	0x5
0113 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0115 00c4       |    |		Action	Make_Default
0116 a018       |    |		Store_Unchecked	0x0,0x18
0117 4805       |H   |		Short_Literal	0x5
0118 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
011a 00c4       |    |		Action	Make_Default
011b a018       |    |		Store_Unchecked	0x0,0x18
011c 4805       |H   |		Short_Literal	0x5
011d 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
011f 00c4       |    |		Action	Make_Default
0120 a018       |    |		Store_Unchecked	0x0,0x18
0121 4805       |H   |		Short_Literal	0x5
0122 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0124 00c4       |    |		Action	Make_Default
0125 a018       |    |		Store_Unchecked	0x0,0x18
0126 4805       |H   |		Short_Literal	0x5
0127 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0129 00c4       |    |		Action	Make_Default
012a a018       |    |		Store_Unchecked	0x0,0x18
012b 4805       |H   |		Short_Literal	0x5
012c 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
012e 00c4       |    |		Action	Make_Default
012f a018       |    |		Store_Unchecked	0x0,0x18
0130 4805       |H   |		Short_Literal	0x5
0131 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0133 00c4       |    |		Action	Make_Default
0134 a018       |    |		Store_Unchecked	0x0,0x18
0135 4805       |H   |		Short_Literal	0x5
0136 0092 019b  |    |		Action	Push_String_Extended,0x19b					; "NO_MORE"
0138 00c4       |    |		Action	Make_Default
0139 a018       |    |		Store_Unchecked	0x0,0x18
013a e019       |    |		Load	0x0,0x19
013b c22e       | .  |		Store	0x1,0x2e
013c e019       |    |		Load	0x0,0x19
013d c232       | 2  |		Store	0x1,0x32
013e e019       |    |		Load	0x0,0x19
013f c236       | 6  |		Store	0x1,0x36
0140 e019       |    |		Load	0x0,0x19
0141 c23a       | :  |		Store	0x1,0x3a
0142 e019       |    |		Load	0x0,0x19
0143 c23e       | >  |		Store	0x1,0x3e
0144 e019       |    |		Load	0x0,0x19
0145 c242       | B  |		Store	0x1,0x42
0146 e019       |    |		Load	0x0,0x19
0147 c246       | F  |		Store	0x1,0x46
0148 e019       |    |		Load	0x0,0x19
0149 c24a       | J  |		Store	0x1,0x4a
014a e019       |    |		Load	0x0,0x19
014b c24e       | N  |		Store	0x1,0x4e
014c e019       |    |		Load	0x0,0x19
014d c252       | R  |		Store	0x1,0x52
014e e019       |    |		Load	0x0,0x19
014f c256       | V  |		Store	0x1,0x56
0150 e019       |    |		Load	0x0,0x19
0151 c25a       | Z  |		Store	0x1,0x5a
0152 e019       |    |		Load	0x0,0x19
0153 c25e       | ^  |		Store	0x1,0x5e
0154 e019       |    |		Load	0x0,0x19
0155 c262       | b  |		Store	0x1,0x62
0156 e019       |    |		Load	0x0,0x19
0157 c266       | f  |		Store	0x1,0x66
0158 e01a       |    |		Load	0x0,0x1a
0159 0387       |    |		Declare_Variable	Package
015a 00d8       |    |		Load_Top	At_Offset_0
015b 020f       |    |		Execute	Module,Activate
015c 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
015d 00c7       |    |		Action	Elaborate_Subprogram
015e			BODY_0008:
015e 00bc       |    |		Action	Signal_Activated
015f 00bb       |    |		Action	Signal_Completion
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00db       |    |		Load_Top	At_Offset_3
0164 00db       |    |		Load_Top	At_Offset_3
0165 e214       |    |		Load	0x1,0x14
0166 1861       | a  |		Execute	Package,Field_Execute,Field_Number 0x61
0167 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0168 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
016c 0000 0000  |    |		.BLANK	0000[0x4]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 4607       |F   |		Jump_Case	0x8
0174 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0175 7807       |x   |		Jump	0x17d								; case 0x1
0176 780a       |x   |		Jump	0x181								; case 0x2
0177 780e       |x   |		Jump	0x186								; case 0x3
0178 7811       |x   |		Jump	0x18a								; case 0x4
0179 7812       |x   |		Jump	0x18c								; case 0x5
017a 7813       |x   |		Jump	0x18e								; case 0x6
017b 7816       |x   |		Jump	0x192								; case 0x7
017c 4302       |C   |		.XXX[0x1]
017d 00da       |    |		Load_Top	At_Offset_2
017e 0091 0196  |    |		Action	Push_String_Extended_Indexed,0x196				; "MARK_BOTTOM_LEFT_FOR_NEW_TOWER"
0180 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0181 00db       |    |		Load_Top	At_Offset_3
0182 00db       |    |		Load_Top	At_Offset_3
0183 00e0       |    |		Load_Encached	Standard_Cache
0184 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0185 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0186 00da       |    |		Load_Top	At_Offset_2
0187 00e0       |    |		Load_Encached	Standard_Cache
0188 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0189 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
018a 00db       |    |		Load_Top	At_Offset_3
018b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
018c 00db       |    |		Load_Top	At_Offset_3
018d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
018e e20e       |    |		Load	0x1,0xe
018f 00dc       |    |		Load_Top	At_Offset_4
0190 0267       | g  |		Execute	Discrete,Predecessor
0191 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0192 e20e       |    |		Load	0x1,0xe
0193 00dc       |    |		Load_Top	At_Offset_4
0194 0268       | h  |		Execute	Discrete,Successor
0195 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0196 ; --------------------------------------------------------------------------------------
0196 ; STRING TABLE
0196 ; --------------------------------------------------------------------------------------
0196 000e       |    |		.STRTAB	0x000e->0x019d							; "MARK_BOTTOM_LEFT_FOR_NEW_TOWER"
0197 002a       | *  |		.STRTAB	0x002a->0x01ac							; "MAKE_BOTTOM_LEFT_PLACE_FREE"
0198 0043       | C  |		.STRTAB	0x0043->0x01b9							; "MARK_BLOCK_FOR_NEW_TOWER"
0199 0059       | Y  |		.STRTAB	0x0059->0x01c5							; "MARK_TOP_BLOCK_OF_MARKED_BLOCK"
019a 0075       | u  |		.STRTAB	0x0075->0x01d4							; "PUT_BLOCK_ON_NEW_TOWER"
019b 0089       |    |		.STRTAB	0x0089->0x01df							; "NO_MORE"
019c 008e       |    |		.STREND 0x008e->0x01e3
019d 4d41 524b  |MARK|		.STRTAB_STRINGS
01e3 0000 0000  |    |		.BLANK	0000[0x5]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; Debug Table
01e8 ; --------------------------------------------------------------------------------------
01e8 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x24d4,0x0000,0x0001,0x0004
01ee 000b 01fe  |    |		.DBG4T	0x000b,0x01fe,0x0000,0x0000
01f2 000e 0201  |    |		.DBG4T	0x000e,0x0201,0x0000,0x0000
01f6 0163 0210  | c  |		.DBG4T	0x0163,0x0210,0x0001,0x0000
01fa 0173 0000  | s  |		.DBG4T	0x0173,0x0000,0x0005,0x0000
01fe ; --------------------------------------------------------------------------------------
01fe ; Debug chain
01fe ; --------------------------------------------------------------------------------------
01fe 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0200 000b       |    |		.DBGLNO	0x000b
0201 ; --------------------------------------------------------------------------------------
0201 ; Debug chain
0201 ; --------------------------------------------------------------------------------------
0201 000d 0000  |    |		.DBGLEN	0x000d,0x0000
0203 000e 0013  |    |		.DBGLNO	0x000e,0x0013,0x0023,0x0036,0x0045,0x005a,0x006a,0x007d,0x008d,0x009f,0x00af,0x00c1,0x015c
0210 ; --------------------------------------------------------------------------------------
0210 ; Debug chain
0210 ; --------------------------------------------------------------------------------------
0210 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0212 0163       | c  |		.DBGLNO	0x0163
0213 0000 0000  |    |		.BLANK	0000[0x1ed]