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

⟦3c79c97cb⟧

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

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 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 009b  |    |		Declare_Subprogram	INIT_0098,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 001b       |    |		.CONST	0x001b								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0001       |    |		.CONST	0x0001								; Number of locals
001b			BODY_0018:
001b			INIT_0018:
001b 4801       |H   |		Short_Literal	0x1
001c 4809       |H   |		Short_Literal	0x9
001d e003       |    |		Load	0x0,0x3
001e 035b       | [  |		Declare_Type	Array,Constrained
001f 0337       | 7  |		Declare_Variable	Array
0020 e004       |    |		Load	0x0,0x4
0021 0337       | 7  |		Declare_Variable	Array
0022 e005       |    |		Load	0x0,0x5
0023 8006       |    |		Call	0x0,0x6
0024 4800       |H   |		Short_Literal	0x0
0025 00da       |    |		Load_Top	At_Offset_2
0026 01d6       |    |		Execute	Vector,Field_Write
0027 e004       |    |		Load	0x0,0x4
0028 01c3       |    |		Execute	Vector,Check_In_Type
0029 8007       |    |		Call	0x0,0x7
002a 4801       |H   |		Short_Literal	0x1
002b 00da       |    |		Load_Top	At_Offset_2
002c 01d6       |    |		Execute	Vector,Field_Write
002d e008       |    |		Load	0x0,0x8
002e 0337       | 7  |		Declare_Variable	Array
002f e009       |    |		Load	0x0,0x9
0030 800a       |    |		Call	0x0,0xa
0031 4800       |H   |		Short_Literal	0x0
0032 00da       |    |		Load_Top	At_Offset_2
0033 01d6       |    |		Execute	Vector,Field_Write
0034 e008       |    |		Load	0x0,0x8
0035 01c3       |    |		Execute	Vector,Check_In_Type
0036 800b       |    |		Call	0x0,0xb
0037 4802       |H   |		Short_Literal	0x2
0038 00da       |    |		Load_Top	At_Offset_2
0039 01d6       |    |		Execute	Vector,Field_Write
003a e00c       |    |		Load	0x0,0xc
003b 0337       | 7  |		Declare_Variable	Array
003c e00d       |    |		Load	0x0,0xd
003d 800e       |    |		Call	0x0,0xe
003e 800f       |    |		Call	0x0,0xf
003f e010       |    |		Load	0x0,0x10
0040 800e       |    |		Call	0x0,0xe
0041 8011       |    |		Call	0x0,0x11
0042 8012       |    |		Call	0x0,0x12
0043 4800       |H   |		Short_Literal	0x0
0044 00da       |    |		Load_Top	At_Offset_2
0045 01d6       |    |		Execute	Vector,Field_Write
0046 e00c       |    |		Load	0x0,0xc
0047 01c3       |    |		Execute	Vector,Check_In_Type
0048 8013       |    |		Call	0x0,0x13
0049 4803       |H   |		Short_Literal	0x3
004a 00da       |    |		Load_Top	At_Offset_2
004b 01d6       |    |		Execute	Vector,Field_Write
004c e014       |    |		Load	0x0,0x14
004d 0337       | 7  |		Declare_Variable	Array
004e 8015       |    |		Call	0x0,0x15
004f 4800       |H   |		Short_Literal	0x0
0050 00da       |    |		Load_Top	At_Offset_2
0051 01d6       |    |		Execute	Vector,Field_Write
0052 e014       |    |		Load	0x0,0x14
0053 01c3       |    |		Execute	Vector,Check_In_Type
0054 8016       |    |		Call	0x0,0x16
0055 4804       |H   |		Short_Literal	0x4
0056 00da       |    |		Load_Top	At_Offset_2
0057 01d6       |    |		Execute	Vector,Field_Write
0058 e017       |    |		Load	0x0,0x17
0059 0337       | 7  |		Declare_Variable	Array
005a 8015       |    |		Call	0x0,0x15
005b 4800       |H   |		Short_Literal	0x0
005c 00da       |    |		Load_Top	At_Offset_2
005d 01d6       |    |		Execute	Vector,Field_Write
005e e017       |    |		Load	0x0,0x17
005f 01c3       |    |		Execute	Vector,Check_In_Type
0060 8018       |    |		Call	0x0,0x18
0061 4805       |H   |		Short_Literal	0x5
0062 00da       |    |		Load_Top	At_Offset_2
0063 01d6       |    |		Execute	Vector,Field_Write
0064 e019       |    |		Load	0x0,0x19
0065 0337       | 7  |		Declare_Variable	Array
0066 8015       |    |		Call	0x0,0x15
0067 4800       |H   |		Short_Literal	0x0
0068 00da       |    |		Load_Top	At_Offset_2
0069 01d6       |    |		Execute	Vector,Field_Write
006a e019       |    |		Load	0x0,0x19
006b 01c3       |    |		Execute	Vector,Check_In_Type
006c 801a       |    |		Call	0x0,0x1a
006d 4806       |H   |		Short_Literal	0x6
006e 00da       |    |		Load_Top	At_Offset_2
006f 01d6       |    |		Execute	Vector,Field_Write
0070 e01b       |    |		Load	0x0,0x1b
0071 0337       | 7  |		Declare_Variable	Array
0072 8015       |    |		Call	0x0,0x15
0073 4800       |H   |		Short_Literal	0x0
0074 00da       |    |		Load_Top	At_Offset_2
0075 01d6       |    |		Execute	Vector,Field_Write
0076 e01b       |    |		Load	0x0,0x1b
0077 01c3       |    |		Execute	Vector,Check_In_Type
0078 801c       |    |		Call	0x0,0x1c
0079 4807       |H   |		Short_Literal	0x7
007a 00da       |    |		Load_Top	At_Offset_2
007b 01d6       |    |		Execute	Vector,Field_Write
007c e01d       |    |		Load	0x0,0x1d
007d 0337       | 7  |		Declare_Variable	Array
007e 8015       |    |		Call	0x0,0x15
007f 4800       |H   |		Short_Literal	0x0
0080 00da       |    |		Load_Top	At_Offset_2
0081 01d6       |    |		Execute	Vector,Field_Write
0082 e01d       |    |		Load	0x0,0x1d
0083 01c3       |    |		Execute	Vector,Check_In_Type
0084 801e       |    |		Call	0x0,0x1e
0085 4808       |H   |		Short_Literal	0x8
0086 00da       |    |		Load_Top	At_Offset_2
0087 01d6       |    |		Execute	Vector,Field_Write
0088 e01f       |    |		Load	0x0,0x1f
0089 0337       | 7  |		Declare_Variable	Array
008a 8015       |    |		Call	0x0,0x15
008b 4800       |H   |		Short_Literal	0x0
008c 00da       |    |		Load_Top	At_Offset_2
008d 01d6       |    |		Execute	Vector,Field_Write
008e e01f       |    |		Load	0x0,0x1f
008f 01c3       |    |		Execute	Vector,Check_In_Type
0090 8020       |    |		Call	0x0,0x20
0091 4809       |H   |		Short_Literal	0x9
0092 00da       |    |		Load_Top	At_Offset_2
0093 01d6       |    |		Execute	Vector,Field_Write
0094 e003       |    |		Load	0x0,0x3
0095 01c6       |    |		Execute	Vector,Convert_To_Formal
0096 00ca       |    |		Action	Exit_Nullary_Function
0097 0000       |    |		.XXX[0x1]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 0109       |    |		.CONST	0x0109								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0019       |    |		.CONST	0x0019								; Number of locals
009b			INIT_0098:
009b 4801       |H   |		Short_Literal	0x1
009c 00db       |    |		Load_Top	At_Offset_3
009d 01d5       |    |		Execute	Vector,Field_Reference
009e 0007       |    |		Action	Break_Optional
009f 4802       |H   |		Short_Literal	0x2
00a0 e5ff       |    |		Load	0x2,-0x1
00a1 01d5       |    |		Execute	Vector,Field_Reference
00a2 0007       |    |		Action	Break_Optional
00a3 4803       |H   |		Short_Literal	0x3
00a4 e5ff       |    |		Load	0x2,-0x1
00a5 01d5       |    |		Execute	Vector,Field_Reference
00a6 0007       |    |		Action	Break_Optional
00a7 4804       |H   |		Short_Literal	0x4
00a8 e5ff       |    |		Load	0x2,-0x1
00a9 01d5       |    |		Execute	Vector,Field_Reference
00aa 0007       |    |		Action	Break_Optional
00ab 4805       |H   |		Short_Literal	0x5
00ac e5ff       |    |		Load	0x2,-0x1
00ad 01d5       |    |		Execute	Vector,Field_Reference
00ae 0007       |    |		Action	Break_Optional
00af 4806       |H   |		Short_Literal	0x6
00b0 e5ff       |    |		Load	0x2,-0x1
00b1 01d5       |    |		Execute	Vector,Field_Reference
00b2 0007       |    |		Action	Break_Optional
00b3 4807       |H   |		Short_Literal	0x7
00b4 e5ff       |    |		Load	0x2,-0x1
00b5 01d5       |    |		Execute	Vector,Field_Reference
00b6 0007       |    |		Action	Break_Optional
00b7 4808       |H   |		Short_Literal	0x8
00b8 e5ff       |    |		Load	0x2,-0x1
00b9 01d5       |    |		Execute	Vector,Field_Reference
00ba 0007       |    |		Action	Break_Optional
00bb 4809       |H   |		Short_Literal	0x9
00bc e5ff       |    |		Load	0x2,-0x1
00bd 01d5       |    |		Execute	Vector,Field_Reference
00be 0007       |    |		Action	Break_Optional
00bf e021       | !  |		Load	0x0,0x21
00c0 02ff       |    |		Declare_Variable	Variant_Record
00c1 4800       |H   |		Short_Literal	0x0
00c2 e407       |    |		Load	0x2,0x7
00c3 8022       | "  |		Call	0x0,0x22
00c4 00d9       |    |		Load_Top	At_Offset_1
00c5 016d       | m  |		Execute	Variant_Record,Structure_Write
00c6 e021       | !  |		Load	0x0,0x21
00c7 02ff       |    |		Declare_Variable	Variant_Record
00c8 4800       |H   |		Short_Literal	0x0
00c9 e404       |    |		Load	0x2,0x4
00ca 8023       | #  |		Call	0x0,0x23
00cb 00d9       |    |		Load_Top	At_Offset_1
00cc 016d       | m  |		Execute	Variant_Record,Structure_Write
00cd e021       | !  |		Load	0x0,0x21
00ce 02ff       |    |		Declare_Variable	Variant_Record
00cf 4800       |H   |		Short_Literal	0x0
00d0 e40a       |    |		Load	0x2,0xa
00d1 8024       | $  |		Call	0x0,0x24
00d2 00d9       |    |		Load_Top	At_Offset_1
00d3 016d       | m  |		Execute	Variant_Record,Structure_Write
00d4 e021       | !  |		Load	0x0,0x21
00d5 02ff       |    |		Declare_Variable	Variant_Record
00d6 4800       |H   |		Short_Literal	0x0
00d7 e403       |    |		Load	0x2,0x3
00d8 8025       | %  |		Call	0x0,0x25
00d9 00d9       |    |		Load_Top	At_Offset_1
00da 016d       | m  |		Execute	Variant_Record,Structure_Write
00db e021       | !  |		Load	0x0,0x21
00dc 02ff       |    |		Declare_Variable	Variant_Record
00dd 4800       |H   |		Short_Literal	0x0
00de e405       |    |		Load	0x2,0x5
00df 8026       | &  |		Call	0x0,0x26
00e0 00d9       |    |		Load_Top	At_Offset_1
00e1 016d       | m  |		Execute	Variant_Record,Structure_Write
00e2 e021       | !  |		Load	0x0,0x21
00e3 02ff       |    |		Declare_Variable	Variant_Record
00e4 4800       |H   |		Short_Literal	0x0
00e5 e406       |    |		Load	0x2,0x6
00e6 8027       | '  |		Call	0x0,0x27
00e7 00d9       |    |		Load_Top	At_Offset_1
00e8 016d       | m  |		Execute	Variant_Record,Structure_Write
00e9 e021       | !  |		Load	0x0,0x21
00ea 02ff       |    |		Declare_Variable	Variant_Record
00eb 4800       |H   |		Short_Literal	0x0
00ec e408       |    |		Load	0x2,0x8
00ed 8028       | (  |		Call	0x0,0x28
00ee 00d9       |    |		Load_Top	At_Offset_1
00ef 016d       | m  |		Execute	Variant_Record,Structure_Write
00f0 e021       | !  |		Load	0x0,0x21
00f1 02ff       |    |		Declare_Variable	Variant_Record
00f2 00d8       |    |		Load_Top	At_Offset_0
00f3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f4 e021       | !  |		Load	0x0,0x21
00f5 02ff       |    |		Declare_Variable	Variant_Record
00f6 00d8       |    |		Load_Top	At_Offset_0
00f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f8 e021       | !  |		Load	0x0,0x21
00f9 02ff       |    |		Declare_Variable	Variant_Record
00fa 00d8       |    |		Load_Top	At_Offset_0
00fb 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00fc e021       | !  |		Load	0x0,0x21
00fd 02ff       |    |		Declare_Variable	Variant_Record
00fe 00d8       |    |		Load_Top	At_Offset_0
00ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0100 e021       | !  |		Load	0x0,0x21
0101 02ff       |    |		Declare_Variable	Variant_Record
0102 00d8       |    |		Load_Top	At_Offset_0
0103 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0104 00e2       |    |		Load_Encached	Integer_Cache
0105 e029       | )  |		Load	0x0,0x29
0106 1b24       | $  |		Execute	Package,Field_Read,Field_Number 0x24
0107 0322       | "  |		Declare_Variable	Record
0108 00e2       |    |		Load_Encached	Integer_Cache
0109			BODY_0098:
0109 e02a       | *  |		Load	0x0,0x2a
010a 802b       | +  |		Call	0x0,0x2b
010b e02a       | *  |		Load	0x0,0x2a
010c 0092 01b8  |    |		Action	Push_String_Extended,0x1b8					; "********************************************************"
010e 802c       | ,  |		Call	0x0,0x2c
010f e02a       | *  |		Load	0x0,0x2a
0110 0092 01b9  |    |		Action	Push_String_Extended,0x1b9					; "      quadrant E : UPDATE RULE "
0112 802c       | ,  |		Call	0x0,0x2c
0113 e02a       | *  |		Load	0x0,0x2a
0114 0092 01b8  |    |		Action	Push_String_Extended,0x1b8					; "********************************************************"
0116 802c       | ,  |		Call	0x0,0x2c
0117 e02d       | -  |		Load	0x0,0x2d
0118 4800       |H   |		Short_Literal	0x0
0119 e402       |    |		Load	0x2,0x2
011a 802e       | .  |		Call	0x0,0x2e
011b e02f       | /  |		Load	0x0,0x2f
011c 8030       | 0  |		Call	0x0,0x30
011d e412       |    |		Load	0x2,0x12
011e 016d       | m  |		Execute	Variant_Record,Structure_Write
011f e412       |    |		Load	0x2,0x12
0120 4800       |H   |		Short_Literal	0x0
0121 e407       |    |		Load	0x2,0x7
0122 8031       | 1  |		Call	0x0,0x31
0123 e411       |    |		Load	0x2,0x11
0124 800e       |    |		Call	0x0,0xe
0125 e02f       | /  |		Load	0x0,0x2f
0126 8032       | 2  |		Call	0x0,0x32
0127 e033       | 3  |		Load	0x0,0x33
0128 8030       | 0  |		Call	0x0,0x30
0129 e416       |    |		Load	0x2,0x16
012a 016d       | m  |		Execute	Variant_Record,Structure_Write
012b 00db       |    |		Load_Top	At_Offset_3
012c e412       |    |		Load	0x2,0x12
012d 8034       | 4  |		Call	0x0,0x34
012e e413       |    |		Load	0x2,0x13
012f 016d       | m  |		Execute	Variant_Record,Structure_Write
0130 e413       |    |		Load	0x2,0x13
0131 4800       |H   |		Short_Literal	0x0
0132 e404       |    |		Load	0x2,0x4
0133 8035       | 5  |		Call	0x0,0x35
0134 e40d       |    |		Load	0x2,0xd
0135 e412       |    |		Load	0x2,0x12
0136 8034       | 4  |		Call	0x0,0x34
0137 e414       |    |		Load	0x2,0x14
0138 016d       | m  |		Execute	Variant_Record,Structure_Write
0139 e414       |    |		Load	0x2,0x14
013a 4800       |H   |		Short_Literal	0x0
013b e403       |    |		Load	0x2,0x3
013c 8036       | 6  |		Call	0x0,0x36
013d e40e       |    |		Load	0x2,0xe
013e e414       |    |		Load	0x2,0x14
013f 8034       | 4  |		Call	0x0,0x34
0140 e415       |    |		Load	0x2,0x15
0141 016d       | m  |		Execute	Variant_Record,Structure_Write
0142 e415       |    |		Load	0x2,0x15
0143 4800       |H   |		Short_Literal	0x0
0144 e405       |    |		Load	0x2,0x5
0145 8037       | 7  |		Call	0x0,0x37
0146 e40f       |    |		Load	0x2,0xf
0147 e415       |    |		Load	0x2,0x15
0148 8034       | 4  |		Call	0x0,0x34
0149 4800       |H   |		Short_Literal	0x0
014a e406       |    |		Load	0x2,0x6
014b 8038       | 8  |		Call	0x0,0x38
014c e039       | 9  |		Load	0x0,0x39
014d 4800       |H   |		Short_Literal	0x0
014e e409       |    |		Load	0x2,0x9
014f 803a       | :  |		Call	0x0,0x3a
0150 e411       |    |		Load	0x2,0x11
0151 803c       | <  |		Call	0x0,0x3c
0152 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0153 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0154 00d8       |    |		Load_Top	At_Offset_0
0155 8040       | @  |		Call	0x0,0x40
0156 4800       |H   |		Short_Literal	0x0
0157 e408       |    |		Load	0x2,0x8
0158 8041       | A  |		Call	0x0,0x41
0159 e02a       | *  |		Load	0x0,0x2a
015a 0092 01ba  |    |		Action	Push_String_Extended,0x1ba					; "The current position is :"
015c 803b       | ;  |		Call	0x0,0x3b
015d e02a       | *  |		Load	0x0,0x2a
015e e412       |    |		Load	0x2,0x12
015f 803c       | <  |		Call	0x0,0x3c
0160 00e0       |    |		Load_Encached	Standard_Cache
0161 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0162 802c       | ,  |		Call	0x0,0x2c
0163 e02a       | *  |		Load	0x0,0x2a
0164 0092 01bb  |    |		Action	Push_String_Extended,0x1bb					; "The down commande is : -"
0166 803b       | ;  |		Call	0x0,0x3b
0167 e02a       | *  |		Load	0x0,0x2a
0168 e411       |    |		Load	0x2,0x11
0169 803c       | <  |		Call	0x0,0x3c
016a 00e0       |    |		Load_Encached	Standard_Cache
016b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
016c 802c       | ,  |		Call	0x0,0x2c
016d e02a       | *  |		Load	0x0,0x2a
016e 0092 01bc  |    |		Action	Push_String_Extended,0x1bc					; "The delta y val is :"
0170 803b       | ;  |		Call	0x0,0x3b
0171 e02a       | *  |		Load	0x0,0x2a
0172 e413       |    |		Load	0x2,0x13
0173 803c       | <  |		Call	0x0,0x3c
0174 00e0       |    |		Load_Encached	Standard_Cache
0175 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0176 802c       | ,  |		Call	0x0,0x2c
0177 e02a       | *  |		Load	0x0,0x2a
0178 802b       | +  |		Call	0x0,0x2b
0179 e03d       | =  |		Load	0x0,0x3d
017a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
017b e03d       | =  |		Load	0x0,0x3d
017c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
017d e029       | )  |		Load	0x0,0x29
017e 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
017f 00da       |    |		Load_Top	At_Offset_2
0180 017d       | }  |		Execute	Record,Structure_Write
0181 00d9       |    |		Load_Top	At_Offset_1
0182 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0183 6030       |`0  |		Indirect_Literal	Discrete,0x1b4,{0x00000000, 0x0000ea60}
0184 0271       | q  |		Execute	Discrete,Times
0185 005b       | [  |		Store_Top	Discrete,At_Offset_3
0186 00da       |    |		Load_Top	At_Offset_2
0187 00da       |    |		Load_Top	At_Offset_2
0188 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0189 4be8       |K   |		Short_Literal	0x3e8
018a 0271       | q  |		Execute	Discrete,Times
018b 0273       | s  |		Execute	Discrete,Plus
018c 005b       | [  |		Store_Top	Discrete,At_Offset_3
018d 00da       |    |		Load_Top	At_Offset_2
018e 00da       |    |		Load_Top	At_Offset_2
018f 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0190 0273       | s  |		Execute	Discrete,Plus
0191 005b       | [  |		Store_Top	Discrete,At_Offset_3
0192 e03e       | >  |		Load	0x0,0x3e
0193 00db       |    |		Load_Top	At_Offset_3
0194 00e0       |    |		Load_Encached	Standard_Cache
0195 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0196 0092 01bd  |    |		Action	Push_String_Extended,0x1bd					; " "
0198 01cc       |    |		Execute	Vector,Catenate
0199 e412       |    |		Load	0x2,0x12
019a 803c       | <  |		Call	0x0,0x3c
019b 00e0       |    |		Load_Encached	Standard_Cache
019c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
019d 01cc       |    |		Execute	Vector,Catenate
019e 0092 01bd  |    |		Action	Push_String_Extended,0x1bd					; " "
01a0 01cc       |    |		Execute	Vector,Catenate
01a1 e411       |    |		Load	0x2,0x11
01a2 800e       |    |		Call	0x0,0xe
01a3 803c       | <  |		Call	0x0,0x3c
01a4 00e0       |    |		Load_Encached	Standard_Cache
01a5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01a6 01cc       |    |		Execute	Vector,Catenate
01a7 0092 01bd  |    |		Action	Push_String_Extended,0x1bd					; " "
01a9 01cc       |    |		Execute	Vector,Catenate
01aa e413       |    |		Load	0x2,0x13
01ab 803c       | <  |		Call	0x0,0x3c
01ac 00e0       |    |		Load_Encached	Standard_Cache
01ad 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01ae 01cc       |    |		Execute	Vector,Catenate
01af 803f       | ?  |		Call	0x0,0x3f
01b0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01b1 0000 0000  |    |		.XXX[0x3]
01b3 0000       |    |
01b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ea60}
01b8 ; --------------------------------------------------------------------------------------
01b8 ; STRING TABLE
01b8 ; --------------------------------------------------------------------------------------
01b8 000e       |    |		.STRTAB	0x000e->0x01bf							; "********************************************************"
01b9 0044       | D  |		.STRTAB	0x0044->0x01db							; "      quadrant E : UPDATE RULE "
01ba 0061       | a  |		.STRTAB	0x0061->0x01ea							; "The current position is :"
01bb 0078       | x  |		.STRTAB	0x0078->0x01f7							; "The down commande is : -"
01bc 008e       |    |		.STRTAB	0x008e->0x0203							; "The delta y val is :"
01bd 00a0       |    |		.STRTAB	0x00a0->0x020d							; " "
01be 009f       |    |		.STREND 0x009f->0x020d
01bf 2a2a 2a2a  |****|		.STRTAB_STRINGS
020e 0000 0000  |    |		.XXX[0x2]
0210 ; --------------------------------------------------------------------------------------
0210 ; Debug Table
0210 ; --------------------------------------------------------------------------------------
0210 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x4b86,0x0000,0x0001,0x0004
0216 000b 0226  |   &|		.DBG4T	0x000b,0x0226,0x0000,0x0000
021a 0010 022a  |   *|		.DBG4T	0x0010,0x022a,0x0000,0x0000
021e 001b 022e  |   .|		.DBG4T	0x001b,0x022e,0x0002,0x0000
0222 009b 0231  |   1|		.DBG4T	0x009b,0x0231,0x0001,0x0000
0226 ; --------------------------------------------------------------------------------------
0226 ; Debug chain
0226 ; --------------------------------------------------------------------------------------
0226 0002 0000  |    |		.DBGLEN	0x0002,0x0000
0228 000b 000d  |    |		.DBGLNO	0x000b,0x000d
022a ; --------------------------------------------------------------------------------------
022a ; Debug chain
022a ; --------------------------------------------------------------------------------------
022a 0002 0000  |    |		.DBGLEN	0x0002,0x0000
022c 0010 0012  |    |		.DBGLNO	0x0010,0x0012
022e ; --------------------------------------------------------------------------------------
022e ; Debug chain
022e ; --------------------------------------------------------------------------------------
022e 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0230 001b       |    |		.DBGLNO	0x001b
0231 ; --------------------------------------------------------------------------------------
0231 ; Debug chain
0231 ; --------------------------------------------------------------------------------------
0231 0018 001f  |    |		.DBGLEN	0x0018,0x001f
0233 009b 009f  |    |		.DBGLNO	0x009b,0x009f,0x00a3,0x00a7,0x00ab,0x00af,0x00b3,0x00b7,0x00bb,0x00bf,0x00c6,0x00cd,0x00d4,0x00db,0x00e2,0x00e9,0x00f0,0x00f4,0x00f8,0x00fc,0x0100,0x0104,0x0105,0x0108,0x0109,0x010b,0x010f,0x0113,0x0117,0x011b,0x011f,0x0123,0x0127,0x012b,0x0130,0x0134,0x0139,0x013d,0x0142,0x0146,0x014c,0x0150,0x0154,0x0159,0x015d,0x0163,0x0167,0x016d,0x0171,0x0177,0x0179,0x0181,0x0186,0x018d,0x0192
026a 0000 0000  |    |		.BLANK	0000[0x196]