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

⟦4aef3eb6e⟧

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

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 0248       | H  |		.CONST	0x0248								; 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 0014       |    |		.CONST	0x0014								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000e       |    |		.CONST	0x000e								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated
000f 00bf       |    |		Action	Accept_Activation
0010 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0011 00c7       |    |		Action	Elaborate_Subprogram
0012 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0013 00c7       |    |		Action	Elaborate_Subprogram
0014			BODY_0008:
0014 00bc       |    |		Action	Signal_Activated
0015 00bb       |    |		Action	Signal_Completion
0016 0000 0000  |    |		.XXX[0x2]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001d       |    |		.CONST	0x001d								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0001       |    |		.CONST	0x0001								; Number of locals
001b			INIT_0018:
001b 0007       |    |		Action	Break_Optional
001c 0007       |    |		Action	Break_Optional
001d			BODY_0018:
001d 4801       |H   |		Short_Literal	0x1
001e 480b       |H   |		Short_Literal	0xb
001f e003       |    |		Load	0x0,0x3
0020 035b       | [  |		Declare_Type	Array,Constrained
0021 0337       | 7  |		Declare_Variable	Array
0022 e004       |    |		Load	0x0,0x4
0023 0337       | 7  |		Declare_Variable	Array
0024 e005       |    |		Load	0x0,0x5
0025 8006       |    |		Call	0x0,0x6
0026 4800       |H   |		Short_Literal	0x0
0027 00da       |    |		Load_Top	At_Offset_2
0028 01d6       |    |		Execute	Vector,Field_Write
0029 e004       |    |		Load	0x0,0x4
002a 01c3       |    |		Execute	Vector,Check_In_Type
002b 8007       |    |		Call	0x0,0x7
002c 4801       |H   |		Short_Literal	0x1
002d 00da       |    |		Load_Top	At_Offset_2
002e 01d6       |    |		Execute	Vector,Field_Write
002f e008       |    |		Load	0x0,0x8
0030 0337       | 7  |		Declare_Variable	Array
0031 e009       |    |		Load	0x0,0x9
0032 800a       |    |		Call	0x0,0xa
0033 4800       |H   |		Short_Literal	0x0
0034 00da       |    |		Load_Top	At_Offset_2
0035 01d6       |    |		Execute	Vector,Field_Write
0036 e008       |    |		Load	0x0,0x8
0037 01c3       |    |		Execute	Vector,Check_In_Type
0038 800b       |    |		Call	0x0,0xb
0039 4802       |H   |		Short_Literal	0x2
003a 00da       |    |		Load_Top	At_Offset_2
003b 01d6       |    |		Execute	Vector,Field_Write
003c e00c       |    |		Load	0x0,0xc
003d 0337       | 7  |		Declare_Variable	Array
003e 480d       |H   |		Short_Literal	0xd
003f 800d       |    |		Call	0x0,0xd
0040 4800       |H   |		Short_Literal	0x0
0041 00da       |    |		Load_Top	At_Offset_2
0042 01d6       |    |		Execute	Vector,Field_Write
0043 e00c       |    |		Load	0x0,0xc
0044 01c3       |    |		Execute	Vector,Check_In_Type
0045 800e       |    |		Call	0x0,0xe
0046 4803       |H   |		Short_Literal	0x3
0047 00da       |    |		Load_Top	At_Offset_2
0048 01d6       |    |		Execute	Vector,Field_Write
0049 e00f       |    |		Load	0x0,0xf
004a 0337       | 7  |		Declare_Variable	Array
004b 480c       |H   |		Short_Literal	0xc
004c 800d       |    |		Call	0x0,0xd
004d 4800       |H   |		Short_Literal	0x0
004e 00da       |    |		Load_Top	At_Offset_2
004f 01d6       |    |		Execute	Vector,Field_Write
0050 e00f       |    |		Load	0x0,0xf
0051 01c3       |    |		Execute	Vector,Check_In_Type
0052 8010       |    |		Call	0x0,0x10
0053 4804       |H   |		Short_Literal	0x4
0054 00da       |    |		Load_Top	At_Offset_2
0055 01d6       |    |		Execute	Vector,Field_Write
0056 e011       |    |		Load	0x0,0x11
0057 0337       | 7  |		Declare_Variable	Array
0058 480d       |H   |		Short_Literal	0xd
0059 8012       |    |		Call	0x0,0x12
005a 480c       |H   |		Short_Literal	0xc
005b 8013       |    |		Call	0x0,0x13
005c 8014       |    |		Call	0x0,0x14
005d 4800       |H   |		Short_Literal	0x0
005e 00da       |    |		Load_Top	At_Offset_2
005f 01d6       |    |		Execute	Vector,Field_Write
0060 e011       |    |		Load	0x0,0x11
0061 01c3       |    |		Execute	Vector,Check_In_Type
0062 8015       |    |		Call	0x0,0x15
0063 4805       |H   |		Short_Literal	0x5
0064 00da       |    |		Load_Top	At_Offset_2
0065 01d6       |    |		Execute	Vector,Field_Write
0066 e016       |    |		Load	0x0,0x16
0067 0337       | 7  |		Declare_Variable	Array
0068 8017       |    |		Call	0x0,0x17
0069 4800       |H   |		Short_Literal	0x0
006a 00da       |    |		Load_Top	At_Offset_2
006b 01d6       |    |		Execute	Vector,Field_Write
006c e016       |    |		Load	0x0,0x16
006d 01c3       |    |		Execute	Vector,Check_In_Type
006e 8018       |    |		Call	0x0,0x18
006f 4806       |H   |		Short_Literal	0x6
0070 00da       |    |		Load_Top	At_Offset_2
0071 01d6       |    |		Execute	Vector,Field_Write
0072 e019       |    |		Load	0x0,0x19
0073 0337       | 7  |		Declare_Variable	Array
0074 8017       |    |		Call	0x0,0x17
0075 4800       |H   |		Short_Literal	0x0
0076 00da       |    |		Load_Top	At_Offset_2
0077 01d6       |    |		Execute	Vector,Field_Write
0078 e019       |    |		Load	0x0,0x19
0079 01c3       |    |		Execute	Vector,Check_In_Type
007a 801a       |    |		Call	0x0,0x1a
007b 4807       |H   |		Short_Literal	0x7
007c 00da       |    |		Load_Top	At_Offset_2
007d 01d6       |    |		Execute	Vector,Field_Write
007e e01b       |    |		Load	0x0,0x1b
007f 0337       | 7  |		Declare_Variable	Array
0080 8017       |    |		Call	0x0,0x17
0081 4800       |H   |		Short_Literal	0x0
0082 00da       |    |		Load_Top	At_Offset_2
0083 01d6       |    |		Execute	Vector,Field_Write
0084 e01b       |    |		Load	0x0,0x1b
0085 01c3       |    |		Execute	Vector,Check_In_Type
0086 801c       |    |		Call	0x0,0x1c
0087 4808       |H   |		Short_Literal	0x8
0088 00da       |    |		Load_Top	At_Offset_2
0089 01d6       |    |		Execute	Vector,Field_Write
008a e01d       |    |		Load	0x0,0x1d
008b 0337       | 7  |		Declare_Variable	Array
008c 8017       |    |		Call	0x0,0x17
008d 4800       |H   |		Short_Literal	0x0
008e 00da       |    |		Load_Top	At_Offset_2
008f 01d6       |    |		Execute	Vector,Field_Write
0090 e01d       |    |		Load	0x0,0x1d
0091 01c3       |    |		Execute	Vector,Check_In_Type
0092 801e       |    |		Call	0x0,0x1e
0093 4809       |H   |		Short_Literal	0x9
0094 00da       |    |		Load_Top	At_Offset_2
0095 01d6       |    |		Execute	Vector,Field_Write
0096 e01f       |    |		Load	0x0,0x1f
0097 0337       | 7  |		Declare_Variable	Array
0098 8017       |    |		Call	0x0,0x17
0099 4800       |H   |		Short_Literal	0x0
009a 00da       |    |		Load_Top	At_Offset_2
009b 01d6       |    |		Execute	Vector,Field_Write
009c e01f       |    |		Load	0x0,0x1f
009d 01c3       |    |		Execute	Vector,Check_In_Type
009e 8020       |    |		Call	0x0,0x20
009f 480a       |H   |		Short_Literal	0xa
00a0 00da       |    |		Load_Top	At_Offset_2
00a1 01d6       |    |		Execute	Vector,Field_Write
00a2 e021       | !  |		Load	0x0,0x21
00a3 0337       | 7  |		Declare_Variable	Array
00a4 8017       |    |		Call	0x0,0x17
00a5 4800       |H   |		Short_Literal	0x0
00a6 00da       |    |		Load_Top	At_Offset_2
00a7 01d6       |    |		Execute	Vector,Field_Write
00a8 e021       | !  |		Load	0x0,0x21
00a9 01c3       |    |		Execute	Vector,Check_In_Type
00aa 8022       | "  |		Call	0x0,0x22
00ab 480b       |H   |		Short_Literal	0xb
00ac 00da       |    |		Load_Top	At_Offset_2
00ad 01d6       |    |		Execute	Vector,Field_Write
00ae e003       |    |		Load	0x0,0x3
00af 01c6       |    |		Execute	Vector,Convert_To_Formal
00b0 00ca       |    |		Action	Exit_Nullary_Function
00b1 0000 0000  |    |		.BLANK	0000[0x7]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 0134       | 4  |		.CONST	0x0134								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 001b       |    |		.CONST	0x001b								; Number of locals
00bb			INIT_00b8:
00bb 4801       |H   |		Short_Literal	0x1
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 01d5       |    |		Execute	Vector,Field_Reference
00be 0007       |    |		Action	Break_Optional
00bf 4802       |H   |		Short_Literal	0x2
00c0 e5ff       |    |		Load	0x2,-0x1
00c1 01d5       |    |		Execute	Vector,Field_Reference
00c2 0007       |    |		Action	Break_Optional
00c3 4803       |H   |		Short_Literal	0x3
00c4 e5ff       |    |		Load	0x2,-0x1
00c5 01d5       |    |		Execute	Vector,Field_Reference
00c6 0007       |    |		Action	Break_Optional
00c7 4805       |H   |		Short_Literal	0x5
00c8 e5ff       |    |		Load	0x2,-0x1
00c9 01d5       |    |		Execute	Vector,Field_Reference
00ca 0007       |    |		Action	Break_Optional
00cb 4806       |H   |		Short_Literal	0x6
00cc e5ff       |    |		Load	0x2,-0x1
00cd 01d5       |    |		Execute	Vector,Field_Reference
00ce 0007       |    |		Action	Break_Optional
00cf 4807       |H   |		Short_Literal	0x7
00d0 e5ff       |    |		Load	0x2,-0x1
00d1 01d5       |    |		Execute	Vector,Field_Reference
00d2 0007       |    |		Action	Break_Optional
00d3 4808       |H   |		Short_Literal	0x8
00d4 e5ff       |    |		Load	0x2,-0x1
00d5 01d5       |    |		Execute	Vector,Field_Reference
00d6 0007       |    |		Action	Break_Optional
00d7 4809       |H   |		Short_Literal	0x9
00d8 e5ff       |    |		Load	0x2,-0x1
00d9 01d5       |    |		Execute	Vector,Field_Reference
00da 0007       |    |		Action	Break_Optional
00db 480a       |H   |		Short_Literal	0xa
00dc e5ff       |    |		Load	0x2,-0x1
00dd 01d5       |    |		Execute	Vector,Field_Reference
00de 0007       |    |		Action	Break_Optional
00df 480b       |H   |		Short_Literal	0xb
00e0 e5ff       |    |		Load	0x2,-0x1
00e1 01d5       |    |		Execute	Vector,Field_Reference
00e2 0007       |    |		Action	Break_Optional
00e3 e023       | #  |		Load	0x0,0x23
00e4 02ff       |    |		Declare_Variable	Variant_Record
00e5 4800       |H   |		Short_Literal	0x0
00e6 e408       |    |		Load	0x2,0x8
00e7 8024       | $  |		Call	0x0,0x24
00e8 00d9       |    |		Load_Top	At_Offset_1
00e9 016d       | m  |		Execute	Variant_Record,Structure_Write
00ea e023       | #  |		Load	0x0,0x23
00eb 02ff       |    |		Declare_Variable	Variant_Record
00ec 4800       |H   |		Short_Literal	0x0
00ed e405       |    |		Load	0x2,0x5
00ee 8025       | %  |		Call	0x0,0x25
00ef 00d9       |    |		Load_Top	At_Offset_1
00f0 016d       | m  |		Execute	Variant_Record,Structure_Write
00f1 e023       | #  |		Load	0x0,0x23
00f2 02ff       |    |		Declare_Variable	Variant_Record
00f3 4800       |H   |		Short_Literal	0x0
00f4 e40b       |    |		Load	0x2,0xb
00f5 8026       | &  |		Call	0x0,0x26
00f6 00d9       |    |		Load_Top	At_Offset_1
00f7 016d       | m  |		Execute	Variant_Record,Structure_Write
00f8 e023       | #  |		Load	0x0,0x23
00f9 02ff       |    |		Declare_Variable	Variant_Record
00fa 4800       |H   |		Short_Literal	0x0
00fb e403       |    |		Load	0x2,0x3
00fc 8027       | '  |		Call	0x0,0x27
00fd 00d9       |    |		Load_Top	At_Offset_1
00fe 016d       | m  |		Execute	Variant_Record,Structure_Write
00ff e023       | #  |		Load	0x0,0x23
0100 02ff       |    |		Declare_Variable	Variant_Record
0101 4800       |H   |		Short_Literal	0x0
0102 e406       |    |		Load	0x2,0x6
0103 8028       | (  |		Call	0x0,0x28
0104 00d9       |    |		Load_Top	At_Offset_1
0105 016d       | m  |		Execute	Variant_Record,Structure_Write
0106 e023       | #  |		Load	0x0,0x23
0107 02ff       |    |		Declare_Variable	Variant_Record
0108 4800       |H   |		Short_Literal	0x0
0109 e407       |    |		Load	0x2,0x7
010a 8029       | )  |		Call	0x0,0x29
010b 00d9       |    |		Load_Top	At_Offset_1
010c 016d       | m  |		Execute	Variant_Record,Structure_Write
010d e023       | #  |		Load	0x0,0x23
010e 02ff       |    |		Declare_Variable	Variant_Record
010f 4800       |H   |		Short_Literal	0x0
0110 e409       |    |		Load	0x2,0x9
0111 802a       | *  |		Call	0x0,0x2a
0112 00d9       |    |		Load_Top	At_Offset_1
0113 016d       | m  |		Execute	Variant_Record,Structure_Write
0114 e023       | #  |		Load	0x0,0x23
0115 02ff       |    |		Declare_Variable	Variant_Record
0116 4800       |H   |		Short_Literal	0x0
0117 e404       |    |		Load	0x2,0x4
0118 802b       | +  |		Call	0x0,0x2b
0119 00d9       |    |		Load_Top	At_Offset_1
011a 016d       | m  |		Execute	Variant_Record,Structure_Write
011b e023       | #  |		Load	0x0,0x23
011c 02ff       |    |		Declare_Variable	Variant_Record
011d 00d8       |    |		Load_Top	At_Offset_0
011e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
011f e023       | #  |		Load	0x0,0x23
0120 02ff       |    |		Declare_Variable	Variant_Record
0121 00d8       |    |		Load_Top	At_Offset_0
0122 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0123 e023       | #  |		Load	0x0,0x23
0124 02ff       |    |		Declare_Variable	Variant_Record
0125 00d8       |    |		Load_Top	At_Offset_0
0126 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0127 e023       | #  |		Load	0x0,0x23
0128 02ff       |    |		Declare_Variable	Variant_Record
0129 00d8       |    |		Load_Top	At_Offset_0
012a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
012b e023       | #  |		Load	0x0,0x23
012c 02ff       |    |		Declare_Variable	Variant_Record
012d 00d8       |    |		Load_Top	At_Offset_0
012e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
012f 00e2       |    |		Load_Encached	Integer_Cache
0130 e02c       | ,  |		Load	0x0,0x2c
0131 1b24       | $  |		Execute	Package,Field_Read,Field_Number 0x24
0132 0322       | "  |		Declare_Variable	Record
0133 00e2       |    |		Load_Encached	Integer_Cache
0134			BODY_00b8:
0134 e02d       | -  |		Load	0x0,0x2d
0135 802e       | .  |		Call	0x0,0x2e
0136 e02d       | -  |		Load	0x0,0x2d
0137 0092 01ec  |    |		Action	Push_String_Extended,0x1ec					; "********************************************************"
0139 802f       | /  |		Call	0x0,0x2f
013a e02d       | -  |		Load	0x0,0x2d
013b 0092 01ed  |    |		Action	Push_String_Extended,0x1ed					; "      quadrant E : UPDATE RULE "
013d 802f       | /  |		Call	0x0,0x2f
013e e02d       | -  |		Load	0x0,0x2d
013f 0092 01ec  |    |		Action	Push_String_Extended,0x1ec					; "********************************************************"
0141 802f       | /  |		Call	0x0,0x2f
0142 e030       | 0  |		Load	0x0,0x30
0143 4800       |H   |		Short_Literal	0x0
0144 e402       |    |		Load	0x2,0x2
0145 8031       | 1  |		Call	0x0,0x31
0146 e032       | 2  |		Load	0x0,0x32
0147 8033       | 3  |		Call	0x0,0x33
0148 e414       |    |		Load	0x2,0x14
0149 016d       | m  |		Execute	Variant_Record,Structure_Write
014a e414       |    |		Load	0x2,0x14
014b 4800       |H   |		Short_Literal	0x0
014c e408       |    |		Load	0x2,0x8
014d 8034       | 4  |		Call	0x0,0x34
014e e412       |    |		Load	0x2,0x12
014f 8035       | 5  |		Call	0x0,0x35
0150 e032       | 2  |		Load	0x0,0x32
0151 8036       | 6  |		Call	0x0,0x36
0152 e037       | 7  |		Load	0x0,0x37
0153 8033       | 3  |		Call	0x0,0x33
0154 e418       |    |		Load	0x2,0x18
0155 016d       | m  |		Execute	Variant_Record,Structure_Write
0156 00db       |    |		Load_Top	At_Offset_3
0157 e414       |    |		Load	0x2,0x14
0158 8038       | 8  |		Call	0x0,0x38
0159 e415       |    |		Load	0x2,0x15
015a 016d       | m  |		Execute	Variant_Record,Structure_Write
015b e415       |    |		Load	0x2,0x15
015c 4800       |H   |		Short_Literal	0x0
015d e405       |    |		Load	0x2,0x5
015e 8039       | 9  |		Call	0x0,0x39
015f e40e       |    |		Load	0x2,0xe
0160 e414       |    |		Load	0x2,0x14
0161 8038       | 8  |		Call	0x0,0x38
0162 e416       |    |		Load	0x2,0x16
0163 016d       | m  |		Execute	Variant_Record,Structure_Write
0164 e416       |    |		Load	0x2,0x16
0165 4800       |H   |		Short_Literal	0x0
0166 e403       |    |		Load	0x2,0x3
0167 803a       | :  |		Call	0x0,0x3a
0168 e40f       |    |		Load	0x2,0xf
0169 e416       |    |		Load	0x2,0x16
016a 8038       | 8  |		Call	0x0,0x38
016b e417       |    |		Load	0x2,0x17
016c 016d       | m  |		Execute	Variant_Record,Structure_Write
016d e417       |    |		Load	0x2,0x17
016e 4800       |H   |		Short_Literal	0x0
016f e406       |    |		Load	0x2,0x6
0170 803b       | ;  |		Call	0x0,0x3b
0171 e410       |    |		Load	0x2,0x10
0172 e417       |    |		Load	0x2,0x17
0173 8038       | 8  |		Call	0x0,0x38
0174 4800       |H   |		Short_Literal	0x0
0175 e407       |    |		Load	0x2,0x7
0176 803c       | <  |		Call	0x0,0x3c
0177 e03d       | =  |		Load	0x0,0x3d
0178 4800       |H   |		Short_Literal	0x0
0179 e40a       |    |		Load	0x2,0xa
017a 803e       | >  |		Call	0x0,0x3e
017b e412       |    |		Load	0x2,0x12
017c 803f       | ?  |		Call	0x0,0x3f
017d 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
017e 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
017f 00d8       |    |		Load_Top	At_Offset_0
0180 8040       | @  |		Call	0x0,0x40
0181 4800       |H   |		Short_Literal	0x0
0182 e409       |    |		Load	0x2,0x9
0183 8041       | A  |		Call	0x0,0x41
0184 e02d       | -  |		Load	0x0,0x2d
0185 0092 01ee  |    |		Action	Push_String_Extended,0x1ee					; "The current position is :"
0187 8042       | B  |		Call	0x0,0x42
0188 e02d       | -  |		Load	0x0,0x2d
0189 e414       |    |		Load	0x2,0x14
018a 803f       | ?  |		Call	0x0,0x3f
018b 00e0       |    |		Load_Encached	Standard_Cache
018c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
018d 802f       | /  |		Call	0x0,0x2f
018e e02d       | -  |		Load	0x0,0x2d
018f 0092 01ef  |    |		Action	Push_String_Extended,0x1ef					; "The down commande is : -"
0191 8042       | B  |		Call	0x0,0x42
0192 e02d       | -  |		Load	0x0,0x2d
0193 e412       |    |		Load	0x2,0x12
0194 803f       | ?  |		Call	0x0,0x3f
0195 00e0       |    |		Load_Encached	Standard_Cache
0196 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0197 802f       | /  |		Call	0x0,0x2f
0198 e02d       | -  |		Load	0x0,0x2d
0199 0092 01f0  |    |		Action	Push_String_Extended,0x1f0					; "The delta y val is :"
019b 8042       | B  |		Call	0x0,0x42
019c e02d       | -  |		Load	0x0,0x2d
019d e415       |    |		Load	0x2,0x15
019e 803f       | ?  |		Call	0x0,0x3f
019f 00e0       |    |		Load_Encached	Standard_Cache
01a0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01a1 802f       | /  |		Call	0x0,0x2f
01a2 e02d       | -  |		Load	0x0,0x2d
01a3 802e       | .  |		Call	0x0,0x2e
01a4 e043       | C  |		Load	0x0,0x43
01a5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01a6 e043       | C  |		Load	0x0,0x43
01a7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01a8 e02c       | ,  |		Load	0x0,0x2c
01a9 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01aa 00da       |    |		Load_Top	At_Offset_2
01ab 017d       | }  |		Execute	Record,Structure_Write
01ac 00d9       |    |		Load_Top	At_Offset_1
01ad 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01ae 6039       |`9  |		Indirect_Literal	Discrete,0x1e8,{0x00000000, 0x0000ea60}
01af 0271       | q  |		Execute	Discrete,Times
01b0 005b       | [  |		Store_Top	Discrete,At_Offset_3
01b1 00da       |    |		Load_Top	At_Offset_2
01b2 00da       |    |		Load_Top	At_Offset_2
01b3 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01b4 4be8       |K   |		Short_Literal	0x3e8
01b5 0271       | q  |		Execute	Discrete,Times
01b6 0273       | s  |		Execute	Discrete,Plus
01b7 005b       | [  |		Store_Top	Discrete,At_Offset_3
01b8 00da       |    |		Load_Top	At_Offset_2
01b9 00da       |    |		Load_Top	At_Offset_2
01ba 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
01bb 0273       | s  |		Execute	Discrete,Plus
01bc 005b       | [  |		Store_Top	Discrete,At_Offset_3
01bd e044       | D  |		Load	0x0,0x44
01be 00db       |    |		Load_Top	At_Offset_3
01bf 00e0       |    |		Load_Encached	Standard_Cache
01c0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01c1 0092 01f1  |    |		Action	Push_String_Extended,0x1f1					; " "
01c3 01cc       |    |		Execute	Vector,Catenate
01c4 e414       |    |		Load	0x2,0x14
01c5 803f       | ?  |		Call	0x0,0x3f
01c6 00e0       |    |		Load_Encached	Standard_Cache
01c7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01c8 01cc       |    |		Execute	Vector,Catenate
01c9 0092 01f1  |    |		Action	Push_String_Extended,0x1f1					; " "
01cb 01cc       |    |		Execute	Vector,Catenate
01cc e412       |    |		Load	0x2,0x12
01cd 8035       | 5  |		Call	0x0,0x35
01ce 803f       | ?  |		Call	0x0,0x3f
01cf 00e0       |    |		Load_Encached	Standard_Cache
01d0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01d1 01cc       |    |		Execute	Vector,Catenate
01d2 0092 01f1  |    |		Action	Push_String_Extended,0x1f1					; " "
01d4 01cc       |    |		Execute	Vector,Catenate
01d5 e415       |    |		Load	0x2,0x15
01d6 803f       | ?  |		Call	0x0,0x3f
01d7 00e0       |    |		Load_Encached	Standard_Cache
01d8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01d9 01cc       |    |		Execute	Vector,Catenate
01da e413       |    |		Load	0x2,0x13
01db 8035       | 5  |		Call	0x0,0x35
01dc 803f       | ?  |		Call	0x0,0x3f
01dd 00e0       |    |		Load_Encached	Standard_Cache
01de 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01df 01cc       |    |		Execute	Vector,Catenate
01e0 0092 01f2  |    |		Action	Push_String_Extended,0x1f2					; " E"
01e2 01cc       |    |		Execute	Vector,Catenate
01e3 8045       | E  |		Call	0x0,0x45
01e4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01e5 0000 0000  |    |		.XXX[0x3]
01e7 0000       |    |
01e8 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ea60}
01ec ; --------------------------------------------------------------------------------------
01ec ; STRING TABLE
01ec ; --------------------------------------------------------------------------------------
01ec 0010       |    |		.STRTAB	0x0010->0x01f4							; "********************************************************"
01ed 0046       | F  |		.STRTAB	0x0046->0x0210							; "      quadrant E : UPDATE RULE "
01ee 0063       | c  |		.STRTAB	0x0063->0x021f							; "The current position is :"
01ef 007a       | z  |		.STRTAB	0x007a->0x022c							; "The down commande is : -"
01f0 0090       |    |		.STRTAB	0x0090->0x0238							; "The delta y val is :"
01f1 00a2       |    |		.STRTAB	0x00a2->0x0242							; " "
01f2 00a1       |    |		.STRTAB	0x00a1->0x0242							; " E"
01f3 00a1       |    |		.STREND 0x00a1->0x0243
01f4 2a2a 2a2a  |****|		.STRTAB_STRINGS
0244 0000 0000  |    |		.BLANK	0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug Table
0248 ; --------------------------------------------------------------------------------------
0248 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x5259,0x0000,0x0001,0x0004
024e 000b 025e  |   ^|		.DBG4T	0x000b,0x025e,0x0000,0x0000
0252 0010 0262  |   b|		.DBG4T	0x0010,0x0262,0x0000,0x0000
0256 001b 0266  |   f|		.DBG4T	0x001b,0x0266,0x0002,0x0000
025a 00bb 026b  |   k|		.DBG4T	0x00bb,0x026b,0x0001,0x0000
025e ; --------------------------------------------------------------------------------------
025e ; Debug chain
025e ; --------------------------------------------------------------------------------------
025e 0002 0000  |    |		.DBGLEN	0x0002,0x0000
0260 000b 000d  |    |		.DBGLNO	0x000b,0x000d
0262 ; --------------------------------------------------------------------------------------
0262 ; Debug chain
0262 ; --------------------------------------------------------------------------------------
0262 0002 0000  |    |		.DBGLEN	0x0002,0x0000
0264 0010 0012  |    |		.DBGLNO	0x0010,0x0012
0266 ; --------------------------------------------------------------------------------------
0266 ; Debug chain
0266 ; --------------------------------------------------------------------------------------
0266 0002 0001  |    |		.DBGLEN	0x0002,0x0001
0268 001b 001c  |    |		.DBGLNO	0x001b,0x001c,0x001d
026b ; --------------------------------------------------------------------------------------
026b ; Debug chain
026b ; --------------------------------------------------------------------------------------
026b 001a 001f  |    |		.DBGLEN	0x001a,0x001f
026d 00bb 00bf  |    |		.DBGLNO	0x00bb,0x00bf,0x00c3,0x00c7,0x00cb,0x00cf,0x00d3,0x00d7,0x00db,0x00df,0x00e3,0x00ea,0x00f1,0x00f8,0x00ff,0x0106,0x010d,0x0114,0x011b,0x011f,0x0123,0x0127,0x012b,0x012f,0x0130,0x0133,0x0134,0x0136,0x013a,0x013e,0x0142,0x0146,0x014a,0x014e,0x0152,0x0156,0x015b,0x015f,0x0164,0x0168,0x016d,0x0171,0x0177,0x017b,0x017f,0x0184,0x0188,0x018e,0x0192,0x0198,0x019c,0x01a2,0x01a4,0x01ac,0x01b1,0x01b8,0x01bd
02a6 0000 0000  |    |		.BLANK	0000[0x15a]