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

⟦449fe7dc1⟧

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

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 0210       |    |		.CONST	0x0210								; 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 0193       |    |		.CONST	0x0193								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 4800       |H   |		Short_Literal	0x0
000f 4806       |H   |		Short_Literal	0x6
0010 029f 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Call
0012 03fd       |    |		Declare_Type	Discrete,Defined
0013 4800       |H   |		Short_Literal	0x0
0014 4802       |H   |		Short_Literal	0x2
0015 e001       |    |		Load	0x0,0x1
0016 01d7       |    |		Execute	Vector,Field_Read
0017 02a0       |    |		Declare_Subprogram	Null_Subprogram
0018 038e       |    |		Declare_Type	Package,Defined
0019 e001       |    |		Load	0x0,0x1
001a 4801       |H   |		Short_Literal	0x1
001b e001       |    |		Load	0x0,0x1
001c 01d7       |    |		Execute	Vector,Field_Read
001d 4802       |H   |		Short_Literal	0x2
001e 00db       |    |		Load_Top	At_Offset_3
001f 020e       |    |		Execute	Module,Augment_Imports
0020 0387       |    |		Declare_Variable	Package
0021 e002       |    |		Load	0x0,0x2
0022 e003       |    |		Load	0x0,0x3
0023 e004       |    |		Load	0x0,0x4
0024 a005       |    |		Store_Unchecked	0x0,0x5
0025 a006       |    |		Store_Unchecked	0x0,0x6
0026 a007       |    |		Store_Unchecked	0x0,0x7
0027 e008       |    |		Load	0x0,0x8
0028 e009       |    |		Load	0x0,0x9
0029 a00a       |    |		Store_Unchecked	0x0,0xa
002a e00b       |    |		Load	0x0,0xb
002b e00c       |    |		Load	0x0,0xc
002c a00d       |    |		Store_Unchecked	0x0,0xd
002d e00e       |    |		Load	0x0,0xe
002e e00f       |    |		Load	0x0,0xf
002f a010       |    |		Store_Unchecked	0x0,0x10
0030 e011       |    |		Load	0x0,0x11
0031 e012       |    |		Load	0x0,0x12
0032 a013       |    |		Store_Unchecked	0x0,0x13
0033 a014       |    |		Store_Unchecked	0x0,0x14
0034 4813       |H   |		Short_Literal	0x13
0035 e20f       |    |		Load	0x1,0xf
0036 020e       |    |		Execute	Module,Augment_Imports
0037 00d8       |    |		Load_Top	At_Offset_0
0038 020f       |    |		Execute	Module,Activate
0039 4800       |H   |		Short_Literal	0x0
003a 4804       |H   |		Short_Literal	0x4
003b e001       |    |		Load	0x0,0x1
003c 01d7       |    |		Execute	Vector,Field_Read
003d 02a0       |    |		Declare_Subprogram	Null_Subprogram
003e 038e       |    |		Declare_Type	Package,Defined
003f e001       |    |		Load	0x0,0x1
0040 4803       |H   |		Short_Literal	0x3
0041 e001       |    |		Load	0x0,0x1
0042 01d7       |    |		Execute	Vector,Field_Read
0043 4802       |H   |		Short_Literal	0x2
0044 00db       |    |		Load_Top	At_Offset_3
0045 020e       |    |		Execute	Module,Augment_Imports
0046 0387       |    |		Declare_Variable	Package
0047 e002       |    |		Load	0x0,0x2
0048 e003       |    |		Load	0x0,0x3
0049 e004       |    |		Load	0x0,0x4
004a a005       |    |		Store_Unchecked	0x0,0x5
004b a006       |    |		Store_Unchecked	0x0,0x6
004c a007       |    |		Store_Unchecked	0x0,0x7
004d e008       |    |		Load	0x0,0x8
004e e009       |    |		Load	0x0,0x9
004f a00a       |    |		Store_Unchecked	0x0,0xa
0050 e00b       |    |		Load	0x0,0xb
0051 e00c       |    |		Load	0x0,0xc
0052 a00d       |    |		Store_Unchecked	0x0,0xd
0053 e00e       |    |		Load	0x0,0xe
0054 e00f       |    |		Load	0x0,0xf
0055 a010       |    |		Store_Unchecked	0x0,0x10
0056 e011       |    |		Load	0x0,0x11
0057 e012       |    |		Load	0x0,0x12
0058 a013       |    |		Store_Unchecked	0x0,0x13
0059 a014       |    |		Store_Unchecked	0x0,0x14
005a 4813       |H   |		Short_Literal	0x13
005b e210       |    |		Load	0x1,0x10
005c 020e       |    |		Execute	Module,Augment_Imports
005d 00d8       |    |		Load_Top	At_Offset_0
005e 020f       |    |		Execute	Module,Activate
005f 4800       |H   |		Short_Literal	0x0
0060 480a       |H   |		Short_Literal	0xa
0061 e001       |    |		Load	0x0,0x1
0062 01d7       |    |		Execute	Vector,Field_Read
0063 02a0       |    |		Declare_Subprogram	Null_Subprogram
0064 038e       |    |		Declare_Type	Package,Defined
0065 e001       |    |		Load	0x0,0x1
0066 4809       |H   |		Short_Literal	0x9
0067 e001       |    |		Load	0x0,0x1
0068 01d7       |    |		Execute	Vector,Field_Read
0069 4802       |H   |		Short_Literal	0x2
006a 00db       |    |		Load_Top	At_Offset_3
006b 020e       |    |		Execute	Module,Augment_Imports
006c 0387       |    |		Declare_Variable	Package
006d e002       |    |		Load	0x0,0x2
006e e003       |    |		Load	0x0,0x3
006f e004       |    |		Load	0x0,0x4
0070 a005       |    |		Store_Unchecked	0x0,0x5
0071 a006       |    |		Store_Unchecked	0x0,0x6
0072 a007       |    |		Store_Unchecked	0x0,0x7
0073 e008       |    |		Load	0x0,0x8
0074 e009       |    |		Load	0x0,0x9
0075 a00a       |    |		Store_Unchecked	0x0,0xa
0076 e00b       |    |		Load	0x0,0xb
0077 e00c       |    |		Load	0x0,0xc
0078 a00d       |    |		Store_Unchecked	0x0,0xd
0079 e00e       |    |		Load	0x0,0xe
007a e00f       |    |		Load	0x0,0xf
007b a010       |    |		Store_Unchecked	0x0,0x10
007c e011       |    |		Load	0x0,0x11
007d e012       |    |		Load	0x0,0x12
007e a013       |    |		Store_Unchecked	0x0,0x13
007f a014       |    |		Store_Unchecked	0x0,0x14
0080 4813       |H   |		Short_Literal	0x13
0081 e211       |    |		Load	0x1,0x11
0082 020e       |    |		Execute	Module,Augment_Imports
0083 00d8       |    |		Load_Top	At_Offset_0
0084 020f       |    |		Execute	Module,Activate
0085 4800       |H   |		Short_Literal	0x0
0086 4808       |H   |		Short_Literal	0x8
0087 e001       |    |		Load	0x0,0x1
0088 01d7       |    |		Execute	Vector,Field_Read
0089 02a0       |    |		Declare_Subprogram	Null_Subprogram
008a 038e       |    |		Declare_Type	Package,Defined
008b e001       |    |		Load	0x0,0x1
008c 4807       |H   |		Short_Literal	0x7
008d e001       |    |		Load	0x0,0x1
008e 01d7       |    |		Execute	Vector,Field_Read
008f 4802       |H   |		Short_Literal	0x2
0090 00db       |    |		Load_Top	At_Offset_3
0091 020e       |    |		Execute	Module,Augment_Imports
0092 0387       |    |		Declare_Variable	Package
0093 e002       |    |		Load	0x0,0x2
0094 e003       |    |		Load	0x0,0x3
0095 e004       |    |		Load	0x0,0x4
0096 a005       |    |		Store_Unchecked	0x0,0x5
0097 a006       |    |		Store_Unchecked	0x0,0x6
0098 a007       |    |		Store_Unchecked	0x0,0x7
0099 e008       |    |		Load	0x0,0x8
009a e009       |    |		Load	0x0,0x9
009b a00a       |    |		Store_Unchecked	0x0,0xa
009c e00b       |    |		Load	0x0,0xb
009d a013       |    |		Store_Unchecked	0x0,0x13
009e a00d       |    |		Store_Unchecked	0x0,0xd
009f e00e       |    |		Load	0x0,0xe
00a0 e00c       |    |		Load	0x0,0xc
00a1 a010       |    |		Store_Unchecked	0x0,0x10
00a2 e011       |    |		Load	0x0,0x11
00a3 e012       |    |		Load	0x0,0x12
00a4 a014       |    |		Store_Unchecked	0x0,0x14
00a5 4812       |H   |		Short_Literal	0x12
00a6 e212       |    |		Load	0x1,0x12
00a7 020e       |    |		Execute	Module,Augment_Imports
00a8 00d8       |    |		Load_Top	At_Offset_0
00a9 020f       |    |		Execute	Module,Activate
00aa 4800       |H   |		Short_Literal	0x0
00ab 4806       |H   |		Short_Literal	0x6
00ac e001       |    |		Load	0x0,0x1
00ad 01d7       |    |		Execute	Vector,Field_Read
00ae 02a0       |    |		Declare_Subprogram	Null_Subprogram
00af 038e       |    |		Declare_Type	Package,Defined
00b0 e001       |    |		Load	0x0,0x1
00b1 4805       |H   |		Short_Literal	0x5
00b2 e001       |    |		Load	0x0,0x1
00b3 01d7       |    |		Execute	Vector,Field_Read
00b4 4802       |H   |		Short_Literal	0x2
00b5 00db       |    |		Load_Top	At_Offset_3
00b6 020e       |    |		Execute	Module,Augment_Imports
00b7 0387       |    |		Declare_Variable	Package
00b8 e002       |    |		Load	0x0,0x2
00b9 e003       |    |		Load	0x0,0x3
00ba e004       |    |		Load	0x0,0x4
00bb a005       |    |		Store_Unchecked	0x0,0x5
00bc a006       |    |		Store_Unchecked	0x0,0x6
00bd a007       |    |		Store_Unchecked	0x0,0x7
00be e008       |    |		Load	0x0,0x8
00bf e009       |    |		Load	0x0,0x9
00c0 a00a       |    |		Store_Unchecked	0x0,0xa
00c1 e00b       |    |		Load	0x0,0xb
00c2 e00c       |    |		Load	0x0,0xc
00c3 a00d       |    |		Store_Unchecked	0x0,0xd
00c4 e00e       |    |		Load	0x0,0xe
00c5 e00f       |    |		Load	0x0,0xf
00c6 a010       |    |		Store_Unchecked	0x0,0x10
00c7 e011       |    |		Load	0x0,0x11
00c8 e012       |    |		Load	0x0,0x12
00c9 a013       |    |		Store_Unchecked	0x0,0x13
00ca a014       |    |		Store_Unchecked	0x0,0x14
00cb 4813       |H   |		Short_Literal	0x13
00cc e213       |    |		Load	0x1,0x13
00cd 020e       |    |		Execute	Module,Augment_Imports
00ce 00d8       |    |		Load_Top	At_Offset_0
00cf 020f       |    |		Execute	Module,Activate
00d0 4800       |H   |		Short_Literal	0x0
00d1 480c       |H   |		Short_Literal	0xc
00d2 e001       |    |		Load	0x0,0x1
00d3 01d7       |    |		Execute	Vector,Field_Read
00d4 02a0       |    |		Declare_Subprogram	Null_Subprogram
00d5 038e       |    |		Declare_Type	Package,Defined
00d6 e001       |    |		Load	0x0,0x1
00d7 480b       |H   |		Short_Literal	0xb
00d8 e001       |    |		Load	0x0,0x1
00d9 01d7       |    |		Execute	Vector,Field_Read
00da 4802       |H   |		Short_Literal	0x2
00db 00db       |    |		Load_Top	At_Offset_3
00dc 020e       |    |		Execute	Module,Augment_Imports
00dd 0387       |    |		Declare_Variable	Package
00de e002       |    |		Load	0x0,0x2
00df e003       |    |		Load	0x0,0x3
00e0 e004       |    |		Load	0x0,0x4
00e1 a005       |    |		Store_Unchecked	0x0,0x5
00e2 a006       |    |		Store_Unchecked	0x0,0x6
00e3 a007       |    |		Store_Unchecked	0x0,0x7
00e4 e008       |    |		Load	0x0,0x8
00e5 e009       |    |		Load	0x0,0x9
00e6 a00a       |    |		Store_Unchecked	0x0,0xa
00e7 e00b       |    |		Load	0x0,0xb
00e8 e00c       |    |		Load	0x0,0xc
00e9 a00d       |    |		Store_Unchecked	0x0,0xd
00ea e00e       |    |		Load	0x0,0xe
00eb e00f       |    |		Load	0x0,0xf
00ec a010       |    |		Store_Unchecked	0x0,0x10
00ed e011       |    |		Load	0x0,0x11
00ee e012       |    |		Load	0x0,0x12
00ef a013       |    |		Store_Unchecked	0x0,0x13
00f0 a014       |    |		Store_Unchecked	0x0,0x14
00f1 4813       |H   |		Short_Literal	0x13
00f2 e214       |    |		Load	0x1,0x14
00f3 020e       |    |		Execute	Module,Augment_Imports
00f4 00d8       |    |		Load_Top	At_Offset_0
00f5 020f       |    |		Execute	Module,Activate
00f6 0093 0000  |    |		push_full_address	0x0
00f8 60ab       |`   |		Indirect_Literal	Discrete,0x1a4,{0x80000000, 0x00010000}
00f9 0273       | s  |		Execute	Discrete,Plus
00fa e015       |    |		Load	0x0,0x15
00fb 0273       | s  |		Execute	Discrete,Plus
00fc e016       |    |		Load	0x0,0x16
00fd 0273       | s  |		Execute	Discrete,Plus
00fe 4805       |H   |		Short_Literal	0x5
00ff e20e       |    |		Load	0x1,0xe
0100 4806       |H   |		Short_Literal	0x6
0101 4800       |H   |		Short_Literal	0x0
0102 0092 01ce  |    |		Action	Push_String_Extended,0x1ce					; "ON_FLOOR"
0104 e20f       |    |		Load	0x1,0xf
0105 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0106 e20f       |    |		Load	0x1,0xf
0107 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0108 4801       |H   |		Short_Literal	0x1
0109 0092 01cf  |    |		Action	Push_String_Extended,0x1cf					; "ON_FLOOR_SATISFIED"
010b e210       |    |		Load	0x1,0x10
010c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
010d e210       |    |		Load	0x1,0x10
010e 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
010f 4802       |H   |		Short_Literal	0x2
0110 0092 01d0  |    |		Action	Push_String_Extended,0x1d0					; "ON_PHYS_OBJECT"
0112 e211       |    |		Load	0x1,0x11
0113 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0114 e211       |    |		Load	0x1,0x11
0115 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0116 4803       |H   |		Short_Literal	0x3
0117 0092 01d1  |    |		Action	Push_String_Extended,0x1d1					; "ON_PHYS_OBJECT_HOLD"
0119 e212       |    |		Load	0x1,0x12
011a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
011b e212       |    |		Load	0x1,0x12
011c 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
011d 4804       |H   |		Short_Literal	0x4
011e 0092 01d2  |    |		Action	Push_String_Extended,0x1d2					; "ON_PHYS_OBJECT_AT_MONKEY"
0120 e213       |    |		Load	0x1,0x13
0121 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0122 e213       |    |		Load	0x1,0x13
0123 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0124 4805       |H   |		Short_Literal	0x5
0125 0092 01d3  |    |		Action	Push_String_Extended,0x1d3					; "ON_PHYS_OBJECT_SATISFIED"
0127 e214       |    |		Load	0x1,0x14
0128 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0129 e214       |    |		Load	0x1,0x14
012a 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
012b 4806       |H   |		Short_Literal	0x6
012c 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
012e 00c4       |    |		Action	Make_Default
012f a017       |    |		Store_Unchecked	0x0,0x17
0130 4806       |H   |		Short_Literal	0x6
0131 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0133 00c4       |    |		Action	Make_Default
0134 a017       |    |		Store_Unchecked	0x0,0x17
0135 4806       |H   |		Short_Literal	0x6
0136 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0138 00c4       |    |		Action	Make_Default
0139 a017       |    |		Store_Unchecked	0x0,0x17
013a 4806       |H   |		Short_Literal	0x6
013b 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
013d 00c4       |    |		Action	Make_Default
013e a017       |    |		Store_Unchecked	0x0,0x17
013f 4806       |H   |		Short_Literal	0x6
0140 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0142 00c4       |    |		Action	Make_Default
0143 a017       |    |		Store_Unchecked	0x0,0x17
0144 4806       |H   |		Short_Literal	0x6
0145 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0147 00c4       |    |		Action	Make_Default
0148 a017       |    |		Store_Unchecked	0x0,0x17
0149 4806       |H   |		Short_Literal	0x6
014a 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
014c 00c4       |    |		Action	Make_Default
014d a017       |    |		Store_Unchecked	0x0,0x17
014e 4806       |H   |		Short_Literal	0x6
014f 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0151 00c4       |    |		Action	Make_Default
0152 a017       |    |		Store_Unchecked	0x0,0x17
0153 4806       |H   |		Short_Literal	0x6
0154 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0156 00c4       |    |		Action	Make_Default
0157 a017       |    |		Store_Unchecked	0x0,0x17
0158 4806       |H   |		Short_Literal	0x6
0159 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
015b 00c4       |    |		Action	Make_Default
015c a017       |    |		Store_Unchecked	0x0,0x17
015d 4806       |H   |		Short_Literal	0x6
015e 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0160 00c4       |    |		Action	Make_Default
0161 a017       |    |		Store_Unchecked	0x0,0x17
0162 4806       |H   |		Short_Literal	0x6
0163 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
0165 00c4       |    |		Action	Make_Default
0166 a017       |    |		Store_Unchecked	0x0,0x17
0167 4806       |H   |		Short_Literal	0x6
0168 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
016a 00c4       |    |		Action	Make_Default
016b a017       |    |		Store_Unchecked	0x0,0x17
016c 4806       |H   |		Short_Literal	0x6
016d 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "NO_MORE"
016f 00c4       |    |		Action	Make_Default
0170 a017       |    |		Store_Unchecked	0x0,0x17
0171 e018       |    |		Load	0x0,0x18
0172 c233       | 3  |		Store	0x1,0x33
0173 e018       |    |		Load	0x0,0x18
0174 c237       | 7  |		Store	0x1,0x37
0175 e018       |    |		Load	0x0,0x18
0176 c23b       | ;  |		Store	0x1,0x3b
0177 e018       |    |		Load	0x0,0x18
0178 c23f       | ?  |		Store	0x1,0x3f
0179 e018       |    |		Load	0x0,0x18
017a c243       | C  |		Store	0x1,0x43
017b e018       |    |		Load	0x0,0x18
017c c247       | G  |		Store	0x1,0x47
017d e018       |    |		Load	0x0,0x18
017e c24b       | K  |		Store	0x1,0x4b
017f e018       |    |		Load	0x0,0x18
0180 c24f       | O  |		Store	0x1,0x4f
0181 e018       |    |		Load	0x0,0x18
0182 c253       | S  |		Store	0x1,0x53
0183 e018       |    |		Load	0x0,0x18
0184 c257       | W  |		Store	0x1,0x57
0185 e018       |    |		Load	0x0,0x18
0186 c25b       | [  |		Store	0x1,0x5b
0187 e018       |    |		Load	0x0,0x18
0188 c25f       | _  |		Store	0x1,0x5f
0189 e018       |    |		Load	0x0,0x18
018a c263       | c  |		Store	0x1,0x63
018b e018       |    |		Load	0x0,0x18
018c c267       | g  |		Store	0x1,0x67
018d e019       |    |		Load	0x0,0x19
018e 0387       |    |		Declare_Variable	Package
018f 00d8       |    |		Load_Top	At_Offset_0
0190 020f       |    |		Execute	Module,Activate
0191 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0192 00c7       |    |		Action	Elaborate_Subprogram
0193			BODY_0008:
0193 00bc       |    |		Action	Signal_Activated
0194 00bb       |    |		Action	Signal_Completion
0195 0000 0000  |    |		.XXX[0x3]
0197 0000       |    |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b 00db       |    |		Load_Top	At_Offset_3
019c 00db       |    |		Load_Top	At_Offset_3
019d e01a       |    |		Load	0x0,0x1a
019e e215       |    |		Load	0x1,0x15
019f 0096       |    |		Execute	Package,Entry
01a0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01a1 0000 0000  |    |		.XXX[0x3]
01a3 0000       |    |
01a4 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab 4607       |F   |		Jump_Case	0x8
01ac 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01ad 7807       |x   |		Jump	0x1b5								; case 0x1
01ae 780a       |x   |		Jump	0x1b9								; case 0x2
01af 780e       |x   |		Jump	0x1be								; case 0x3
01b0 7811       |x   |		Jump	0x1c2								; case 0x4
01b1 7812       |x   |		Jump	0x1c4								; case 0x5
01b2 7813       |x   |		Jump	0x1c6								; case 0x6
01b3 7816       |x   |		Jump	0x1ca								; case 0x7
01b4 4302       |C   |		.XXX[0x1]
01b5 00da       |    |		Load_Top	At_Offset_2
01b6 0091 01ce  |    |		Action	Push_String_Extended_Indexed,0x1ce				; "ON_FLOOR"
01b8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01b9 00db       |    |		Load_Top	At_Offset_3
01ba 00db       |    |		Load_Top	At_Offset_3
01bb 00e0       |    |		Load_Encached	Standard_Cache
01bc 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01bd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01be 00da       |    |		Load_Top	At_Offset_2
01bf 00e0       |    |		Load_Encached	Standard_Cache
01c0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01c1 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01c2 00db       |    |		Load_Top	At_Offset_3
01c3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01c4 00db       |    |		Load_Top	At_Offset_3
01c5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01c6 e20e       |    |		Load	0x1,0xe
01c7 00dc       |    |		Load_Top	At_Offset_4
01c8 0267       | g  |		Execute	Discrete,Predecessor
01c9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01ca e20e       |    |		Load	0x1,0xe
01cb 00dc       |    |		Load_Top	At_Offset_4
01cc 0268       | h  |		Execute	Discrete,Successor
01cd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01ce ; --------------------------------------------------------------------------------------
01ce ; STRING TABLE
01ce ; --------------------------------------------------------------------------------------
01ce 0010       |    |		.STRTAB	0x0010->0x01d6							; "ON_FLOOR"
01cf 0016       |    |		.STRTAB	0x0016->0x01da							; "ON_FLOOR_SATISFIED"
01d0 0026       | &  |		.STRTAB	0x0026->0x01e3							; "ON_PHYS_OBJECT"
01d1 0032       | 2  |		.STRTAB	0x0032->0x01ea							; "ON_PHYS_OBJECT_HOLD"
01d2 0043       | C  |		.STRTAB	0x0043->0x01f3							; "ON_PHYS_OBJECT_AT_MONKEY"
01d3 0059       | Y  |		.STRTAB	0x0059->0x01ff							; "ON_PHYS_OBJECT_SATISFIED"
01d4 006f       | o  |		.STRTAB	0x006f->0x020b							; "NO_MORE"
01d5 0074       | t  |		.STREND 0x0074->0x020f
01d6 4f4e 5f46  |ON_F|		.STRTAB_STRINGS
020f 0000       |    |		.XXX[0x1]
0210 ; --------------------------------------------------------------------------------------
0210 ; Debug Table
0210 ; --------------------------------------------------------------------------------------
0210 0004 0006  |    |		.DEBUG4	0x0004,0x0006,0xafb5,0x0000,0x0001,0x0004
0216 000b 0226  |   &|		.DBG4T	0x000b,0x0226,0x8000,0x0000
021a 000e 0229  |   )|		.DBG4T	0x000e,0x0229,0x8000,0x0000
021e 019b 023a  |   :|		.DBG4T	0x019b,0x023a,0x0001,0x0000
0222 01ab 0000  |    |		.DBG4T	0x01ab,0x0000,0x0005,0x0000
0226 ; --------------------------------------------------------------------------------------
0226 ; Debug chain
0226 ; --------------------------------------------------------------------------------------
0226 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0228 000b       |    |		.DBGLNO	0x000b
0229 ; --------------------------------------------------------------------------------------
0229 ; Debug chain
0229 ; --------------------------------------------------------------------------------------
0229 000f 0000  |    |		.DBGLEN	0x000f,0x0000
022b 000e 0013  |    |		.DBGLNO	0x000e,0x0013,0x0021,0x0039,0x0047,0x005f,0x006d,0x0085,0x0093,0x00aa,0x00b8,0x00d0,0x00de,0x00f6,0x0191
023a ; --------------------------------------------------------------------------------------
023a ; Debug chain
023a ; --------------------------------------------------------------------------------------
023a 0000 0001  |    |		.DBGLEN	0x0000,0x0001
023c 019b       |    |		.DBGLNO	0x019b
023d 0000 0000  |    |		.BLANK	0000[0x1c3]