|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_07b8f6
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0298 | | .CONST 0x0298 ; 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 00cb | | Declare_Subprogram INIT_00c8,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 001c | | .CONST 0x001c ; 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 BODY_0018:
001c 4801 |H | Short_Literal 0x1
001d 480d |H | Short_Literal 0xd
001e e003 | | Load 0x0,0x3
001f 035b | [ | Declare_Type Array,Constrained
0020 0337 | 7 | Declare_Variable Array
0021 e004 | | Load 0x0,0x4
0022 0337 | 7 | Declare_Variable Array
0023 e005 | | Load 0x0,0x5
0024 8006 | | Call 0x0,0x6
0025 4800 |H | Short_Literal 0x0
0026 00da | | Load_Top At_Offset_2
0027 01d6 | | Execute Vector,Field_Write
0028 e004 | | Load 0x0,0x4
0029 01c3 | | Execute Vector,Check_In_Type
002a 8007 | | Call 0x0,0x7
002b 4801 |H | Short_Literal 0x1
002c 00da | | Load_Top At_Offset_2
002d 01d6 | | Execute Vector,Field_Write
002e e008 | | Load 0x0,0x8
002f 0337 | 7 | Declare_Variable Array
0030 e009 | | Load 0x0,0x9
0031 800a | | Call 0x0,0xa
0032 4800 |H | Short_Literal 0x0
0033 00da | | Load_Top At_Offset_2
0034 01d6 | | Execute Vector,Field_Write
0035 e008 | | Load 0x0,0x8
0036 01c3 | | Execute Vector,Check_In_Type
0037 800b | | Call 0x0,0xb
0038 4802 |H | Short_Literal 0x2
0039 00da | | Load_Top At_Offset_2
003a 01d6 | | Execute Vector,Field_Write
003b e00c | | Load 0x0,0xc
003c 0337 | 7 | Declare_Variable Array
003d 480d |H | Short_Literal 0xd
003e 800d | | Call 0x0,0xd
003f 4800 |H | Short_Literal 0x0
0040 00da | | Load_Top At_Offset_2
0041 01d6 | | Execute Vector,Field_Write
0042 e00c | | Load 0x0,0xc
0043 01c3 | | Execute Vector,Check_In_Type
0044 800e | | Call 0x0,0xe
0045 4803 |H | Short_Literal 0x3
0046 00da | | Load_Top At_Offset_2
0047 01d6 | | Execute Vector,Field_Write
0048 e00f | | Load 0x0,0xf
0049 0337 | 7 | Declare_Variable Array
004a 480d |H | Short_Literal 0xd
004b 8010 | | Call 0x0,0x10
004c 4800 |H | Short_Literal 0x0
004d 00da | | Load_Top At_Offset_2
004e 01d6 | | Execute Vector,Field_Write
004f e00f | | Load 0x0,0xf
0050 01c3 | | Execute Vector,Check_In_Type
0051 8011 | | Call 0x0,0x11
0052 4804 |H | Short_Literal 0x4
0053 00da | | Load_Top At_Offset_2
0054 01d6 | | Execute Vector,Field_Write
0055 e012 | | Load 0x0,0x12
0056 0337 | 7 | Declare_Variable Array
0057 8013 | | Call 0x0,0x13
0058 4800 |H | Short_Literal 0x0
0059 00da | | Load_Top At_Offset_2
005a 01d6 | | Execute Vector,Field_Write
005b e012 | | Load 0x0,0x12
005c 01c3 | | Execute Vector,Check_In_Type
005d 8014 | | Call 0x0,0x14
005e 4805 |H | Short_Literal 0x5
005f 00da | | Load_Top At_Offset_2
0060 01d6 | | Execute Vector,Field_Write
0061 e015 | | Load 0x0,0x15
0062 0337 | 7 | Declare_Variable Array
0063 8013 | | Call 0x0,0x13
0064 4800 |H | Short_Literal 0x0
0065 00da | | Load_Top At_Offset_2
0066 01d6 | | Execute Vector,Field_Write
0067 e015 | | Load 0x0,0x15
0068 01c3 | | Execute Vector,Check_In_Type
0069 8016 | | Call 0x0,0x16
006a 4806 |H | Short_Literal 0x6
006b 00da | | Load_Top At_Offset_2
006c 01d6 | | Execute Vector,Field_Write
006d e017 | | Load 0x0,0x17
006e 0337 | 7 | Declare_Variable Array
006f 8013 | | Call 0x0,0x13
0070 4800 |H | Short_Literal 0x0
0071 00da | | Load_Top At_Offset_2
0072 01d6 | | Execute Vector,Field_Write
0073 e017 | | Load 0x0,0x17
0074 01c3 | | Execute Vector,Check_In_Type
0075 8018 | | Call 0x0,0x18
0076 4807 |H | Short_Literal 0x7
0077 00da | | Load_Top At_Offset_2
0078 01d6 | | Execute Vector,Field_Write
0079 e019 | | Load 0x0,0x19
007a 0337 | 7 | Declare_Variable Array
007b 8013 | | Call 0x0,0x13
007c 4800 |H | Short_Literal 0x0
007d 00da | | Load_Top At_Offset_2
007e 01d6 | | Execute Vector,Field_Write
007f e019 | | Load 0x0,0x19
0080 01c3 | | Execute Vector,Check_In_Type
0081 801a | | Call 0x0,0x1a
0082 4808 |H | Short_Literal 0x8
0083 00da | | Load_Top At_Offset_2
0084 01d6 | | Execute Vector,Field_Write
0085 e01b | | Load 0x0,0x1b
0086 0337 | 7 | Declare_Variable Array
0087 8013 | | Call 0x0,0x13
0088 4800 |H | Short_Literal 0x0
0089 00da | | Load_Top At_Offset_2
008a 01d6 | | Execute Vector,Field_Write
008b e01b | | Load 0x0,0x1b
008c 01c3 | | Execute Vector,Check_In_Type
008d 801c | | Call 0x0,0x1c
008e 4809 |H | Short_Literal 0x9
008f 00da | | Load_Top At_Offset_2
0090 01d6 | | Execute Vector,Field_Write
0091 e01d | | Load 0x0,0x1d
0092 0337 | 7 | Declare_Variable Array
0093 8013 | | Call 0x0,0x13
0094 4800 |H | Short_Literal 0x0
0095 00da | | Load_Top At_Offset_2
0096 01d6 | | Execute Vector,Field_Write
0097 e01d | | Load 0x0,0x1d
0098 01c3 | | Execute Vector,Check_In_Type
0099 801e | | Call 0x0,0x1e
009a 480a |H | Short_Literal 0xa
009b 00da | | Load_Top At_Offset_2
009c 01d6 | | Execute Vector,Field_Write
009d e01f | | Load 0x0,0x1f
009e 0337 | 7 | Declare_Variable Array
009f 8013 | | Call 0x0,0x13
00a0 4800 |H | Short_Literal 0x0
00a1 00da | | Load_Top At_Offset_2
00a2 01d6 | | Execute Vector,Field_Write
00a3 e01f | | Load 0x0,0x1f
00a4 01c3 | | Execute Vector,Check_In_Type
00a5 8020 | | Call 0x0,0x20
00a6 480b |H | Short_Literal 0xb
00a7 00da | | Load_Top At_Offset_2
00a8 01d6 | | Execute Vector,Field_Write
00a9 e021 | ! | Load 0x0,0x21
00aa 0337 | 7 | Declare_Variable Array
00ab 8013 | | Call 0x0,0x13
00ac 4800 |H | Short_Literal 0x0
00ad 00da | | Load_Top At_Offset_2
00ae 01d6 | | Execute Vector,Field_Write
00af e021 | ! | Load 0x0,0x21
00b0 01c3 | | Execute Vector,Check_In_Type
00b1 8022 | " | Call 0x0,0x22
00b2 480c |H | Short_Literal 0xc
00b3 00da | | Load_Top At_Offset_2
00b4 01d6 | | Execute Vector,Field_Write
00b5 e023 | # | Load 0x0,0x23
00b6 0337 | 7 | Declare_Variable Array
00b7 8013 | | Call 0x0,0x13
00b8 4800 |H | Short_Literal 0x0
00b9 00da | | Load_Top At_Offset_2
00ba 01d6 | | Execute Vector,Field_Write
00bb e023 | # | Load 0x0,0x23
00bc 01c3 | | Execute Vector,Check_In_Type
00bd 8024 | $ | Call 0x0,0x24
00be 480d |H | Short_Literal 0xd
00bf 00da | | Load_Top At_Offset_2
00c0 01d6 | | Execute Vector,Field_Write
00c1 e003 | | Load 0x0,0x3
00c2 01c6 | | Execute Vector,Convert_To_Formal
00c3 00ca | | Action Exit_Nullary_Function
00c4 0000 0000 | | .BLANK 0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 015d | ] | .CONST 0x015d ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 001f | | .CONST 0x001f ; Number of locals
00cb INIT_00c8:
00cb 4801 |H | Short_Literal 0x1
00cc 00db | | Load_Top At_Offset_3
00cd 01d5 | | Execute Vector,Field_Reference
00ce 0007 | | Action Break_Optional
00cf 4802 |H | Short_Literal 0x2
00d0 e5ff | | Load 0x2,-0x1
00d1 01d5 | | Execute Vector,Field_Reference
00d2 0007 | | Action Break_Optional
00d3 4803 |H | Short_Literal 0x3
00d4 e5ff | | Load 0x2,-0x1
00d5 01d5 | | Execute Vector,Field_Reference
00d6 0007 | | Action Break_Optional
00d7 4804 |H | Short_Literal 0x4
00d8 e5ff | | Load 0x2,-0x1
00d9 01d5 | | Execute Vector,Field_Reference
00da 0007 | | Action Break_Optional
00db 4805 |H | Short_Literal 0x5
00dc e5ff | | Load 0x2,-0x1
00dd 01d5 | | Execute Vector,Field_Reference
00de 0007 | | Action Break_Optional
00df 4806 |H | Short_Literal 0x6
00e0 e5ff | | Load 0x2,-0x1
00e1 01d5 | | Execute Vector,Field_Reference
00e2 0007 | | Action Break_Optional
00e3 4807 |H | Short_Literal 0x7
00e4 e5ff | | Load 0x2,-0x1
00e5 01d5 | | Execute Vector,Field_Reference
00e6 0007 | | Action Break_Optional
00e7 4808 |H | Short_Literal 0x8
00e8 e5ff | | Load 0x2,-0x1
00e9 01d5 | | Execute Vector,Field_Reference
00ea 0007 | | Action Break_Optional
00eb 4809 |H | Short_Literal 0x9
00ec e5ff | | Load 0x2,-0x1
00ed 01d5 | | Execute Vector,Field_Reference
00ee 0007 | | Action Break_Optional
00ef 480a |H | Short_Literal 0xa
00f0 e5ff | | Load 0x2,-0x1
00f1 01d5 | | Execute Vector,Field_Reference
00f2 0007 | | Action Break_Optional
00f3 480b |H | Short_Literal 0xb
00f4 e5ff | | Load 0x2,-0x1
00f5 01d5 | | Execute Vector,Field_Reference
00f6 0007 | | Action Break_Optional
00f7 480c |H | Short_Literal 0xc
00f8 e5ff | | Load 0x2,-0x1
00f9 01d5 | | Execute Vector,Field_Reference
00fa 0007 | | Action Break_Optional
00fb 480d |H | Short_Literal 0xd
00fc e5ff | | Load 0x2,-0x1
00fd 01d5 | | Execute Vector,Field_Reference
00fe 0007 | | Action Break_Optional
00ff e025 | % | Load 0x0,0x25
0100 02ff | | Declare_Variable Variant_Record
0101 4800 |H | Short_Literal 0x0
0102 e408 | | Load 0x2,0x8
0103 8026 | & | Call 0x0,0x26
0104 00d9 | | Load_Top At_Offset_1
0105 016d | m | Execute Variant_Record,Structure_Write
0106 e025 | % | Load 0x0,0x25
0107 02ff | | Declare_Variable Variant_Record
0108 4800 |H | Short_Literal 0x0
0109 e405 | | Load 0x2,0x5
010a 8027 | ' | Call 0x0,0x27
010b 00d9 | | Load_Top At_Offset_1
010c 016d | m | Execute Variant_Record,Structure_Write
010d e025 | % | Load 0x0,0x25
010e 02ff | | Declare_Variable Variant_Record
010f 4800 |H | Short_Literal 0x0
0110 e40b | | Load 0x2,0xb
0111 8028 | ( | Call 0x0,0x28
0112 00d9 | | Load_Top At_Offset_1
0113 016d | m | Execute Variant_Record,Structure_Write
0114 e025 | % | Load 0x0,0x25
0115 02ff | | Declare_Variable Variant_Record
0116 4800 |H | Short_Literal 0x0
0117 e403 | | Load 0x2,0x3
0118 8029 | ) | Call 0x0,0x29
0119 00d9 | | Load_Top At_Offset_1
011a 016d | m | Execute Variant_Record,Structure_Write
011b e025 | % | Load 0x0,0x25
011c 02ff | | Declare_Variable Variant_Record
011d 4800 |H | Short_Literal 0x0
011e e406 | | Load 0x2,0x6
011f 802a | * | Call 0x0,0x2a
0120 00d9 | | Load_Top At_Offset_1
0121 016d | m | Execute Variant_Record,Structure_Write
0122 e025 | % | Load 0x0,0x25
0123 02ff | | Declare_Variable Variant_Record
0124 4800 |H | Short_Literal 0x0
0125 e407 | | Load 0x2,0x7
0126 802b | + | Call 0x0,0x2b
0127 00d9 | | Load_Top At_Offset_1
0128 016d | m | Execute Variant_Record,Structure_Write
0129 e025 | % | Load 0x0,0x25
012a 02ff | | Declare_Variable Variant_Record
012b 4800 |H | Short_Literal 0x0
012c e409 | | Load 0x2,0x9
012d 802c | , | Call 0x0,0x2c
012e 00d9 | | Load_Top At_Offset_1
012f 016d | m | Execute Variant_Record,Structure_Write
0130 e025 | % | Load 0x0,0x25
0131 02ff | | Declare_Variable Variant_Record
0132 4800 |H | Short_Literal 0x0
0133 e404 | | Load 0x2,0x4
0134 802d | - | Call 0x0,0x2d
0135 00d9 | | Load_Top At_Offset_1
0136 016d | m | Execute Variant_Record,Structure_Write
0137 e025 | % | Load 0x0,0x25
0138 02ff | | Declare_Variable Variant_Record
0139 4800 |H | Short_Literal 0x0
013a e40c | | Load 0x2,0xc
013b 802e | . | Call 0x0,0x2e
013c 00d9 | | Load_Top At_Offset_1
013d 016d | m | Execute Variant_Record,Structure_Write
013e e025 | % | Load 0x0,0x25
013f 02ff | | Declare_Variable Variant_Record
0140 4800 |H | Short_Literal 0x0
0141 e40d | | Load 0x2,0xd
0142 802f | / | Call 0x0,0x2f
0143 00d9 | | Load_Top At_Offset_1
0144 016d | m | Execute Variant_Record,Structure_Write
0145 e025 | % | Load 0x0,0x25
0146 02ff | | Declare_Variable Variant_Record
0147 00d8 | | Load_Top At_Offset_0
0148 1c00 | | Execute_Immediate Run_Utility,0x0
0149 e025 | % | Load 0x0,0x25
014a 02ff | | Declare_Variable Variant_Record
014b 00d8 | | Load_Top At_Offset_0
014c 1c00 | | Execute_Immediate Run_Utility,0x0
014d e025 | % | Load 0x0,0x25
014e 02ff | | Declare_Variable Variant_Record
014f 00d8 | | Load_Top At_Offset_0
0150 1c00 | | Execute_Immediate Run_Utility,0x0
0151 e025 | % | Load 0x0,0x25
0152 02ff | | Declare_Variable Variant_Record
0153 00d8 | | Load_Top At_Offset_0
0154 1c00 | | Execute_Immediate Run_Utility,0x0
0155 e025 | % | Load 0x0,0x25
0156 02ff | | Declare_Variable Variant_Record
0157 00d8 | | Load_Top At_Offset_0
0158 1c00 | | Execute_Immediate Run_Utility,0x0
0159 00e2 | | Load_Encached Integer_Cache
015a e030 | 0 | Load 0x0,0x30
015b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
015c 0322 | " | Declare_Variable Record
015d BODY_00c8:
015d e031 | 1 | Load 0x0,0x31
015e 8032 | 2 | Call 0x0,0x32
015f e031 | 1 | Load 0x0,0x31
0160 0092 0240 | @| Action Push_String_Extended,0x240 ; "********************************************************"
0162 8033 | 3 | Call 0x0,0x33
0163 e031 | 1 | Load 0x0,0x31
0164 0092 0241 | A| Action Push_String_Extended,0x241 ; " quadrant A : UPDATE RULE "
0166 8033 | 3 | Call 0x0,0x33
0167 e031 | 1 | Load 0x0,0x31
0168 0092 0240 | @| Action Push_String_Extended,0x240 ; "********************************************************"
016a 8033 | 3 | Call 0x0,0x33
016b e034 | 4 | Load 0x0,0x34
016c 4800 |H | Short_Literal 0x0
016d e402 | | Load 0x2,0x2
016e 8035 | 5 | Call 0x0,0x35
016f e036 | 6 | Load 0x0,0x36
0170 8037 | 7 | Call 0x0,0x37
0171 e419 | | Load 0x2,0x19
0172 016d | m | Execute Variant_Record,Structure_Write
0173 e419 | | Load 0x2,0x19
0174 4800 |H | Short_Literal 0x0
0175 e408 | | Load 0x2,0x8
0176 8038 | 8 | Call 0x0,0x38
0177 e415 | | Load 0x2,0x15
0178 e036 | 6 | Load 0x0,0x36
0179 8039 | 9 | Call 0x0,0x39
017a e03a | : | Load 0x0,0x3a
017b 8037 | 7 | Call 0x0,0x37
017c 00db | | Load_Top At_Offset_3
017d 016d | m | Execute Variant_Record,Structure_Write
017e 00da | | Load_Top At_Offset_2
017f e419 | | Load 0x2,0x19
0180 803b | ; | Call 0x0,0x3b
0181 e41a | | Load 0x2,0x1a
0182 016d | m | Execute Variant_Record,Structure_Write
0183 e41a | | Load 0x2,0x1a
0184 4800 |H | Short_Literal 0x0
0185 e405 | | Load 0x2,0x5
0186 803c | < | Call 0x0,0x3c
0187 e411 | | Load 0x2,0x11
0188 e419 | | Load 0x2,0x19
0189 803b | ; | Call 0x0,0x3b
018a e41b | | Load 0x2,0x1b
018b 016d | m | Execute Variant_Record,Structure_Write
018c e41b | | Load 0x2,0x1b
018d 4800 |H | Short_Literal 0x0
018e e403 | | Load 0x2,0x3
018f 803d | = | Call 0x0,0x3d
0190 e412 | | Load 0x2,0x12
0191 e41b | | Load 0x2,0x1b
0192 803b | ; | Call 0x0,0x3b
0193 e41c | | Load 0x2,0x1c
0194 016d | m | Execute Variant_Record,Structure_Write
0195 00db | | Load_Top At_Offset_3
0196 4800 |H | Short_Literal 0x0
0197 e406 | | Load 0x2,0x6
0198 803e | > | Call 0x0,0x3e
0199 e413 | | Load 0x2,0x13
019a e41c | | Load 0x2,0x1c
019b 803b | ; | Call 0x0,0x3b
019c 4800 |H | Short_Literal 0x0
019d e407 | | Load 0x2,0x7
019e 803f | ? | Call 0x0,0x3f
019f e040 | @ | Load 0x0,0x40
01a0 4800 |H | Short_Literal 0x0
01a1 e40a | | Load 0x2,0xa
01a2 8041 | A | Call 0x0,0x41
01a3 e009 | | Load 0x0,0x9
01a4 e418 | | Load 0x2,0x18
01a5 8042 | B | Call 0x0,0x42
01a6 6827 |h' | Jump_Zero 0x1ce
01a7 e418 | | Load 0x2,0x18
01a8 8043 | C | Call 0x0,0x43
01a9 e417 | | Load 0x2,0x17
01aa 8043 | C | Call 0x0,0x43
01ab 6090 |` | Indirect_Literal Discrete,0x23c,{0x00000000, 0x00007333}
01ac 0271 | q | Execute Discrete,Times
01ad 00d8 | | Load_Top At_Offset_0
01ae 0c00 | | Execute_Immediate Greater_Equal,0x0
01af 7002 |p | Jump_Nonzero 0x1b2
01b0 6087 |` | Indirect_Literal Discrete,0x238,{0xffffffff, 0xffffc000}
01b1 7801 |x | Jump 0x1b3
01b2 6081 |` | Indirect_Literal Discrete,0x234,{0x00000000, 0x00004000}
01b3 0273 | s | Execute Discrete,Plus
01b4 09f1 | | Execute_Immediate Binary_Scale,-0xf
01b5 00e2 | | Load_Encached Integer_Cache
01b6 025e | ^ | Execute Discrete,Convert
01b7 027c | | | Execute Discrete,Less
01b8 6811 |h | Jump_Zero 0x1ca
01b9 e418 | | Load 0x2,0x18
01ba e417 | | Load 0x2,0x17
01bb e416 | | Load 0x2,0x16
01bc 8044 | D | Call 0x0,0x44
01bd 803b | ; | Call 0x0,0x3b
01be 4800 |H | Short_Literal 0x0
01bf e404 | | Load 0x2,0x4
01c0 8045 | E | Call 0x0,0x45
01c1 e418 | | Load 0x2,0x18
01c2 e417 | | Load 0x2,0x17
01c3 e416 | | Load 0x2,0x16
01c4 8046 | F | Call 0x0,0x46
01c5 803b | ; | Call 0x0,0x3b
01c6 8044 | D | Call 0x0,0x44
01c7 4800 |H | Short_Literal 0x0
01c8 e40e | | Load 0x2,0xe
01c9 8047 | G | Call 0x0,0x47
01ca e009 | | Load 0x0,0x9
01cb 4800 |H | Short_Literal 0x0
01cc e40d | | Load 0x2,0xd
01cd 8048 | H | Call 0x0,0x48
01ce e031 | 1 | Load 0x0,0x31
01cf 0092 0242 | B| Action Push_String_Extended,0x242 ; "The current position is :"
01d1 8049 | I | Call 0x0,0x49
01d2 e031 | 1 | Load 0x0,0x31
01d3 e419 | | Load 0x2,0x19
01d4 8043 | C | Call 0x0,0x43
01d5 00e0 | | Load_Encached Standard_Cache
01d6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01d7 8033 | 3 | Call 0x0,0x33
01d8 e031 | 1 | Load 0x0,0x31
01d9 0092 0243 | C| Action Push_String_Extended,0x243 ; "The up commande is :"
01db 8049 | I | Call 0x0,0x49
01dc e031 | 1 | Load 0x0,0x31
01dd e415 | | Load 0x2,0x15
01de 8043 | C | Call 0x0,0x43
01df 00e0 | | Load_Encached Standard_Cache
01e0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e1 8033 | 3 | Call 0x0,0x33
01e2 e031 | 1 | Load 0x0,0x31
01e3 0092 0244 | D| Action Push_String_Extended,0x244 ; "The delta y val is :"
01e5 8049 | I | Call 0x0,0x49
01e6 e031 | 1 | Load 0x0,0x31
01e7 e41a | | Load 0x2,0x1a
01e8 8043 | C | Call 0x0,0x43
01e9 00e0 | | Load_Encached Standard_Cache
01ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01eb 8033 | 3 | Call 0x0,0x33
01ec e031 | 1 | Load 0x0,0x31
01ed 8032 | 2 | Call 0x0,0x32
01ee e04a | J | Load 0x0,0x4a
01ef 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01f0 e04a | J | Load 0x0,0x4a
01f1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01f2 e030 | 0 | Load 0x0,0x30
01f3 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
01f4 00d9 | | Load_Top At_Offset_1
01f5 017d | } | Execute Record,Structure_Write
01f6 00d8 | | Load_Top At_Offset_0
01f7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01f8 6037 |`7 | Indirect_Literal Discrete,0x230,{0x00000000, 0x0000ea60}
01f9 0271 | q | Execute Discrete,Times
01fa 005a | Z | Store_Top Discrete,At_Offset_2
01fb 00d9 | | Load_Top At_Offset_1
01fc 00d9 | | Load_Top At_Offset_1
01fd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
01fe 4be8 |K | Short_Literal 0x3e8
01ff 0271 | q | Execute Discrete,Times
0200 0273 | s | Execute Discrete,Plus
0201 005a | Z | Store_Top Discrete,At_Offset_2
0202 00d9 | | Load_Top At_Offset_1
0203 00d9 | | Load_Top At_Offset_1
0204 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0205 0273 | s | Execute Discrete,Plus
0206 005a | Z | Store_Top Discrete,At_Offset_2
0207 e04b | K | Load 0x0,0x4b
0208 00da | | Load_Top At_Offset_2
0209 00e0 | | Load_Encached Standard_Cache
020a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
020b 0092 0245 | E| Action Push_String_Extended,0x245 ; " "
020d 01cc | | Execute Vector,Catenate
020e e419 | | Load 0x2,0x19
020f 8043 | C | Call 0x0,0x43
0210 00e0 | | Load_Encached Standard_Cache
0211 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0212 01cc | | Execute Vector,Catenate
0213 0092 0245 | E| Action Push_String_Extended,0x245 ; " "
0215 01cc | | Execute Vector,Catenate
0216 e415 | | Load 0x2,0x15
0217 8043 | C | Call 0x0,0x43
0218 00e0 | | Load_Encached Standard_Cache
0219 1818 | | Execute Package,Field_Execute,Field_Number 0x18
021a 01cc | | Execute Vector,Catenate
021b 0092 0245 | E| Action Push_String_Extended,0x245 ; " "
021d 01cc | | Execute Vector,Catenate
021e e41a | | Load 0x2,0x1a
021f 8043 | C | Call 0x0,0x43
0220 00e0 | | Load_Encached Standard_Cache
0221 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0222 01cc | | Execute Vector,Catenate
0223 e416 | | Load 0x2,0x16
0224 8043 | C | Call 0x0,0x43
0225 00e0 | | Load_Encached Standard_Cache
0226 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0227 01cc | | Execute Vector,Catenate
0228 0092 0246 | F| Action Push_String_Extended,0x246 ; " A"
022a 01cc | | Execute Vector,Catenate
022b 804c | L | Call 0x0,0x4c
022c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
022d 0000 0000 | | .XXX[0x3]
022f 0000 | |
0230 0000 0000 | | .LITERAL {0x00000000, 0x0000ea60}
0234 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0238 ffff ffff | | .LITERAL {0xffffffff, 0xffffc000}
023c 0000 0000 | | .LITERAL {0x00000000, 0x00007333}
0240 ; --------------------------------------------------------------------------------------
0240 ; STRING TABLE
0240 ; --------------------------------------------------------------------------------------
0240 0010 | | .STRTAB 0x0010->0x0248 ; "********************************************************"
0241 0046 | F | .STRTAB 0x0046->0x0264 ; " quadrant A : UPDATE RULE "
0242 0063 | c | .STRTAB 0x0063->0x0273 ; "The current position is :"
0243 007a | z | .STRTAB 0x007a->0x0280 ; "The up commande is :"
0244 008c | | .STRTAB 0x008c->0x028a ; "The delta y val is :"
0245 009e | | .STRTAB 0x009e->0x0294 ; " "
0246 009d | | .STRTAB 0x009d->0x0294 ; " A"
0247 009d | | .STREND 0x009d->0x0295
0248 2a2a 2a2a |****| .STRTAB_STRINGS
0296 0000 0000 | | .XXX[0x2]
0298 ; --------------------------------------------------------------------------------------
0298 ; Debug Table
0298 ; --------------------------------------------------------------------------------------
0298 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5255,0x0000,0x0001,0x0004
029e 000b 02ae | | .DBG4T 0x000b,0x02ae,0x0000,0x0000
02a2 0010 02b2 | | .DBG4T 0x0010,0x02b2,0x0000,0x0000
02a6 001b 02b6 | | .DBG4T 0x001b,0x02b6,0x0002,0x0000
02aa 00cb 02ba | | .DBG4T 0x00cb,0x02ba,0x0001,0x0000
02ae ; --------------------------------------------------------------------------------------
02ae ; Debug chain
02ae ; --------------------------------------------------------------------------------------
02ae 0002 0000 | | .DBGLEN 0x0002,0x0000
02b0 000b 000d | | .DBGLNO 0x000b,0x000d
02b2 ; --------------------------------------------------------------------------------------
02b2 ; Debug chain
02b2 ; --------------------------------------------------------------------------------------
02b2 0002 0000 | | .DBGLEN 0x0002,0x0000
02b4 0010 0012 | | .DBGLNO 0x0010,0x0012
02b6 ; --------------------------------------------------------------------------------------
02b6 ; Debug chain
02b6 ; --------------------------------------------------------------------------------------
02b6 0001 0001 | | .DBGLEN 0x0001,0x0001
02b8 001b 001c | | .DBGLNO 0x001b,0x001c
02ba ; --------------------------------------------------------------------------------------
02ba ; Debug chain
02ba ; --------------------------------------------------------------------------------------
02ba 001e 0022 | "| .DBGLEN 0x001e,0x0022
02bc 00cb 00cf | | .DBGLNO 0x00cb,0x00cf,0x00d3,0x00d7,0x00db,0x00df,0x00e3,0x00e7,0x00eb,0x00ef,0x00f3,0x00f7,0x00fb,0x00ff,0x0106,0x010d,0x0114,0x011b,0x0122,0x0129,0x0130,0x0137,0x013e,0x0145,0x0149,0x014d,0x0151,0x0155,0x0159,0x015a,0x015d,0x015f,0x0163,0x0167,0x016b,0x016f,0x0173,0x0177,0x017a,0x017e,0x0183,0x0187,0x018c,0x0190,0x0195,0x0199,0x019f,0x01a3,0x01a7,0x01b9,0x01c1,0x01ca,0x01ce,0x01d2,0x01d8,0x01dc,0x01e2,0x01e6,0x01ec,0x01ee,0x01f6,0x01fb,0x0202,0x0207
02fc 0000 0000 | | .BLANK 0000[0x104]