|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0260 | ` | .CONST 0x0260 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0052 | R | .CONST 0x0052 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
000d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
000e 0129 | ) | Execute Any,Make_Visible
000f e001 | | Load 0x0,0x1
0010 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0011 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0012 0129 | ) | Execute Any,Make_Visible
0013 e001 | | Load 0x0,0x1
0014 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0015 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0016 0129 | ) | Execute Any,Make_Visible
0017 e001 | | Load 0x0,0x1
0018 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0019 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
001a 0129 | ) | Execute Any,Make_Visible
001b 00d8 | | Load_Top At_Offset_0
001c 0129 | ) | Execute Any,Make_Visible
001d 00d9 | | Load_Top At_Offset_1
001e 0129 | ) | Execute Any,Make_Visible
001f 00d8 | | Load_Top At_Offset_0
0020 0129 | ) | Execute Any,Make_Visible
0021 00d9 | | Load_Top At_Offset_1
0022 0129 | ) | Execute Any,Make_Visible
0023 e001 | | Load 0x0,0x1
0024 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0025 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0026 0129 | ) | Execute Any,Make_Visible
0027 e001 | | Load 0x0,0x1
0028 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0029 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
002a 0129 | ) | Execute Any,Make_Visible
002b e001 | | Load 0x0,0x1
002c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002d 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
002e 0129 | ) | Execute Any,Make_Visible
002f 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
0031 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
0033 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated
0035 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated
0037 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated
0039 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
003b 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
003d 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
003f 00bf | | Action Accept_Activation
0040 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0041 00c7 | | Action Elaborate_Subprogram
0042 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0043 00c7 | | Action Elaborate_Subprogram
0044 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0045 00c7 | | Action Elaborate_Subprogram
0046 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0047 00c7 | | Action Elaborate_Subprogram
0048 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0049 00c7 | | Action Elaborate_Subprogram
004a 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
004b 00c7 | | Action Elaborate_Subprogram
004c 029d 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call
004e 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
004f 00c7 | | Action Elaborate_Subprogram
0050 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0051 00c7 | | Action Elaborate_Subprogram
0052 BODY_0008:
0052 00bc | | Action Signal_Activated
0053 00bb | | Action Signal_Completion
0054 0000 0000 | | .BLANK 0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 006a | j | .CONST 0x006a ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0005 | | .CONST 0x0005 ; Number of locals
005b INIT_0058:
005b e002 | | Load 0x0,0x2
005c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
005d 02c7 | | Declare_Variable Any
005e 00d8 | | Load_Top At_Offset_0
005f 1c00 | | Execute_Immediate Run_Utility,0x0
0060 e001 | | Load 0x0,0x1
0061 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0062 02c7 | | Declare_Variable Any
0063 e003 | | Load 0x0,0x3
0064 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0065 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0066 a403 | | Store_Unchecked 0x2,0x3
0067 00e1 | | Load_Encached Boolean_Cache
0068 029f 01b3 | | Declare_Subprogram INIT_01b0,For_Call
006a BODY_0058:
006a e5ff | | Load 0x2,-0x1
006b e001 | | Load 0x0,0x1
006c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
006d 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
006e 7002 |p | Jump_Nonzero 0x71
006f 00da | | Load_Top At_Offset_2
0070 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0071 00db | | Load_Top At_Offset_3
0072 0120 | | Execute Any,Is_Value
0073 6803 |h | Jump_Zero 0x77
0074 e002 | | Load 0x0,0x2
0075 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0076 7801 |x | Jump 0x78
0077 00db | | Load_Top At_Offset_3
0078 e5ff | | Load 0x2,-0x1
0079 e003 | | Load 0x0,0x3
007a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
007b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
007c 4802 |H | Short_Literal 0x2
007d 0092 025b | [| Action Push_String_Extended,0x25b ; "@"
007f 0092 025c | \| Action Push_String_Extended,0x25c ; "?"
0081 e002 | | Load 0x0,0x2
0082 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0083 c402 | | Store 0x2,0x2
0084 00cf | | Action Mark_Auxiliary
0085 7806 |x | Jump 0x8c
0086 8405 | | Call 0x2,0x5
0087 e402 | | Load 0x2,0x2
0088 e002 | | Load 0x0,0x2
0089 1820 | | Execute Package,Field_Execute,Field_Number 0x20
008a c402 | | Store 0x2,0x2
008b 00c9 | | Action Pop_Auxiliary_Loop
008c e402 | | Load 0x2,0x2
008d e002 | | Load 0x0,0x2
008e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
008f 6ff6 |o | Jump_Zero 0x86
0090 00ce | | Action Pop_Auxiliary
0091 00da | | Load_Top At_Offset_2
0092 e003 | | Load 0x0,0x3
0093 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0094 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0095 00da | | Load_Top At_Offset_2
0096 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0097 0000 | | .XXX[0x1]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00aa | | .CONST 0x00aa ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0005 | | .CONST 0x0005 ; Number of locals
009b INIT_0098:
009b e002 | | Load 0x0,0x2
009c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
009d 02c7 | | Declare_Variable Any
009e 00d8 | | Load_Top At_Offset_0
009f 1c00 | | Execute_Immediate Run_Utility,0x0
00a0 e001 | | Load 0x0,0x1
00a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a2 02c7 | | Declare_Variable Any
00a3 e003 | | Load 0x0,0x3
00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00a6 a403 | | Store_Unchecked 0x2,0x3
00a7 00e1 | | Load_Encached Boolean_Cache
00a8 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call
00aa BODY_0098:
00aa e5ff | | Load 0x2,-0x1
00ab e001 | | Load 0x0,0x1
00ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ad 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
00ae 7002 |p | Jump_Nonzero 0xb1
00af 00da | | Load_Top At_Offset_2
00b0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00b1 00db | | Load_Top At_Offset_3
00b2 0120 | | Execute Any,Is_Value
00b3 6803 |h | Jump_Zero 0xb7
00b4 e002 | | Load 0x0,0x2
00b5 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00b6 7801 |x | Jump 0xb8
00b7 00db | | Load_Top At_Offset_3
00b8 e5ff | | Load 0x2,-0x1
00b9 e003 | | Load 0x0,0x3
00ba 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00bb 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00bc 4802 |H | Short_Literal 0x2
00bd 0092 025b | [| Action Push_String_Extended,0x25b ; "@"
00bf 0092 025c | \| Action Push_String_Extended,0x25c ; "?"
00c1 e002 | | Load 0x0,0x2
00c2 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00c3 c402 | | Store 0x2,0x2
00c4 00cf | | Action Mark_Auxiliary
00c5 780a |x | Jump 0xd0
00c6 e402 | | Load 0x2,0x2
00c7 e002 | | Load 0x0,0x2
00c8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00c9 7001 |p | Jump_Nonzero 0xcb
00ca 8405 | | Call 0x2,0x5
00cb e402 | | Load 0x2,0x2
00cc e002 | | Load 0x0,0x2
00cd 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00ce c402 | | Store 0x2,0x2
00cf 00c9 | | Action Pop_Auxiliary_Loop
00d0 e402 | | Load 0x2,0x2
00d1 e002 | | Load 0x0,0x2
00d2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00d3 6ff2 |o | Jump_Zero 0xc6
00d4 00ce | | Action Pop_Auxiliary
00d5 00da | | Load_Top At_Offset_2
00d6 e003 | | Load 0x0,0x3
00d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d8 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
00d9 00da | | Load_Top At_Offset_2
00da 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00db 0000 0000 | | .BLANK 0000[0x5]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00f2 | | .CONST 0x00f2 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0005 | | .CONST 0x0005 ; Number of locals
00e3 INIT_00e0:
00e3 e002 | | Load 0x0,0x2
00e4 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00e5 02c7 | | Declare_Variable Any
00e6 00d8 | | Load_Top At_Offset_0
00e7 1c00 | | Execute_Immediate Run_Utility,0x0
00e8 e001 | | Load 0x0,0x1
00e9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00ea 02c7 | | Declare_Variable Any
00eb e003 | | Load 0x0,0x3
00ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ed 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00ee a403 | | Store_Unchecked 0x2,0x3
00ef 00e1 | | Load_Encached Boolean_Cache
00f0 029f 0213 | | Declare_Subprogram INIT_0210,For_Call
00f2 BODY_00e0:
00f2 e5ff | | Load 0x2,-0x1
00f3 e001 | | Load 0x0,0x1
00f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00f5 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
00f6 7002 |p | Jump_Nonzero 0xf9
00f7 00da | | Load_Top At_Offset_2
00f8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00f9 00db | | Load_Top At_Offset_3
00fa 0120 | | Execute Any,Is_Value
00fb 6803 |h | Jump_Zero 0xff
00fc e002 | | Load 0x0,0x2
00fd 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00fe 7801 |x | Jump 0x100
00ff 00db | | Load_Top At_Offset_3
0100 e5ff | | Load 0x2,-0x1
0101 e003 | | Load 0x0,0x3
0102 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0103 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0104 4802 |H | Short_Literal 0x2
0105 0092 025b | [| Action Push_String_Extended,0x25b ; "@"
0107 0092 025c | \| Action Push_String_Extended,0x25c ; "?"
0109 e002 | | Load 0x0,0x2
010a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
010b c402 | | Store 0x2,0x2
010c 00cf | | Action Mark_Auxiliary
010d 780b |x | Jump 0x119
010e e402 | | Load 0x2,0x2
010f e002 | | Load 0x0,0x2
0110 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0111 0f01 | | Execute_Immediate Equal,0x1
0112 6801 |h | Jump_Zero 0x114
0113 8405 | | Call 0x2,0x5
0114 e402 | | Load 0x2,0x2
0115 e002 | | Load 0x0,0x2
0116 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0117 c402 | | Store 0x2,0x2
0118 00c9 | | Action Pop_Auxiliary_Loop
0119 e402 | | Load 0x2,0x2
011a e002 | | Load 0x0,0x2
011b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
011c 6ff1 |o | Jump_Zero 0x10e
011d 00ce | | Action Pop_Auxiliary
011e 00da | | Load_Top At_Offset_2
011f e003 | | Load 0x0,0x3
0120 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0121 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0122 00da | | Load_Top At_Offset_2
0123 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0124 0000 0000 | | .BLANK 0000[0x4]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0131 | 1 | .CONST 0x0131 ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0002 | | .CONST 0x0002 ; Number of locals
012b INIT_0128:
012b e212 | | Load 0x1,0x12
012c 02c7 | | Declare_Variable Any
012d e5fe | | Load 0x2,-0x2
012e e5ff | | Load 0x2,-0x1
012f 821a | | Call 0x1,0x1a
0130 a402 | | Store_Unchecked 0x2,0x2
0131 BODY_0128:
0131 0833 | 3 | Execute_Immediate Raise,0x33
0132 0000 0000 | | .BLANK 0000[0x6]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0141 | A | .CONST 0x0141 ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b e212 | | Load 0x1,0x12
013c 02c7 | | Declare_Variable Any
013d e5fe | | Load 0x2,-0x2
013e e5ff | | Load 0x2,-0x1
013f 821a | | Call 0x1,0x1a
0140 a402 | | Store_Unchecked 0x2,0x2
0141 BODY_0138:
0141 0833 | 3 | Execute_Immediate Raise,0x33
0142 0000 0000 | | .BLANK 0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 00db | | Load_Top At_Offset_3
014c e001 | | Load 0x0,0x1
014d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014e 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
014f 7002 |p | Jump_Nonzero 0x152
0150 4800 |H | Short_Literal 0x0
0151 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0152 0833 | 3 | Execute_Immediate Raise,0x33
0153 0000 0000 | | .BLANK 0000[0x5]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 016a | j | .CONST 0x016a ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0005 | | .CONST 0x0005 ; Number of locals
015b INIT_0158:
015b e002 | | Load 0x0,0x2
015c 1b19 | | Execute Package,Field_Read,Field_Number 0x19
015d 02c7 | | Declare_Variable Any
015e 00d8 | | Load_Top At_Offset_0
015f 1c00 | | Execute_Immediate Run_Utility,0x0
0160 e001 | | Load 0x0,0x1
0161 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0162 02c7 | | Declare_Variable Any
0163 e003 | | Load 0x0,0x3
0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0165 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0166 a403 | | Store_Unchecked 0x2,0x3
0167 00e1 | | Load_Encached Boolean_Cache
0168 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call
016a BODY_0158:
016a e5fe | | Load 0x2,-0x2
016b e001 | | Load 0x0,0x1
016c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016d 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
016e 7002 |p | Jump_Nonzero 0x171
016f 00da | | Load_Top At_Offset_2
0170 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0171 0833 | 3 | Execute_Immediate Raise,0x33
0172 8405 e402 | | .XXX[0x11]
0174 e002 181b | |
0176 c402 00c9 | |
0178 e402 e002 | |
017a 181d 6ff6 | o |
017c 00ce 00da | |
017e e003 1b0d | |
0180 1827 00da | ' |
0182 4402 |D |
0183 0000 0000 | | .BLANK 0000[0x5]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 0833 | 3 | Execute_Immediate Raise,0x33
018c 0000 0000 | | .BLANK 0000[0x4]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 e003 | | Load 0x0,0x3
0194 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0195 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0196 180e | | Execute Package,Field_Execute,Field_Number 0xe
0197 00eb | | Load_Encached Diana_Cache
0198 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0199 e5ff | | Load 0x2,-0x1
019a e004 | | Load 0x0,0x4
019b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
019c e004 | | Load 0x0,0x4
019d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
019e e004 | | Load 0x0,0x4
019f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a0 e005 | | Load 0x0,0x5
01a1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a2 e003 | | Load 0x0,0x3
01a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a4 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
01a5 e003 | | Load 0x0,0x3
01a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a7 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01a8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01aa 0000 0000 | | .BLANK 0000[0x6]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01c0 | | .CONST 0x01c0 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0002 | | .CONST 0x0002 ; Number of locals
01b3 INIT_01b0:
01b3 e20f | | Load 0x1,0xf
01b4 02c7 | | Declare_Variable Any
01b5 4801 |H | Short_Literal 0x1
01b6 e003 | | Load 0x0,0x3
01b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b9 e402 | | Load 0x2,0x2
01ba e002 | | Load 0x0,0x2
01bb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01bc e003 | | Load 0x0,0x3
01bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01be 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01bf a602 | | Store_Unchecked 0x3,0x2
01c0 BODY_01b0:
01c0 e5fe | | Load 0x2,-0x2
01c1 680f |h | Jump_Zero 0x1d1
01c2 e5ff | | Load 0x2,-0x1
01c3 00d9 | | Load_Top At_Offset_1
01c4 821d | | Call 0x1,0x1d
01c5 680a |h | Jump_Zero 0x1d0
01c6 00e1 | | Load_Encached Boolean_Cache
01c7 e003 | | Load 0x0,0x3
01c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ca 00da | | Load_Top At_Offset_2
01cb e403 | | Load 0x2,0x3
01cc e003 | | Load 0x0,0x3
01cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ce 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01cf c404 | | Store 0x2,0x4
01d0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01d1 00e1 | | Load_Encached Boolean_Cache
01d2 e003 | | Load 0x0,0x3
01d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d4 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d5 00da | | Load_Top At_Offset_2
01d6 e403 | | Load 0x2,0x3
01d7 e003 | | Load 0x0,0x3
01d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01da c404 | | Store 0x2,0x4
01db 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01dc 0000 0000 | | .BLANK 0000[0x4]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01f0 | | .CONST 0x01f0 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0002 | | .CONST 0x0002 ; Number of locals
01e3 INIT_01e0:
01e3 e20f | | Load 0x1,0xf
01e4 02c7 | | Declare_Variable Any
01e5 4801 |H | Short_Literal 0x1
01e6 e003 | | Load 0x0,0x3
01e7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e9 e402 | | Load 0x2,0x2
01ea e002 | | Load 0x0,0x2
01eb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01ec e003 | | Load 0x0,0x3
01ed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ee 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01ef a602 | | Store_Unchecked 0x3,0x2
01f0 BODY_01e0:
01f0 e5fe | | Load 0x2,-0x2
01f1 680f |h | Jump_Zero 0x201
01f2 e5ff | | Load 0x2,-0x1
01f3 00d9 | | Load_Top At_Offset_1
01f4 821d | | Call 0x1,0x1d
01f5 680a |h | Jump_Zero 0x200
01f6 00e1 | | Load_Encached Boolean_Cache
01f7 e003 | | Load 0x0,0x3
01f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01fa 00da | | Load_Top At_Offset_2
01fb e403 | | Load 0x2,0x3
01fc e003 | | Load 0x0,0x3
01fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01fe 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01ff c404 | | Store 0x2,0x4
0200 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0201 00e1 | | Load_Encached Boolean_Cache
0202 e003 | | Load 0x0,0x3
0203 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0204 180e | | Execute Package,Field_Execute,Field_Number 0xe
0205 00da | | Load_Top At_Offset_2
0206 e403 | | Load 0x2,0x3
0207 e003 | | Load 0x0,0x3
0208 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0209 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
020a c404 | | Store 0x2,0x4
020b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
020c 0000 0000 | | .BLANK 0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0220 | | .CONST 0x0220 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0002 | | .CONST 0x0002 ; Number of locals
0213 INIT_0210:
0213 e20f | | Load 0x1,0xf
0214 02c7 | | Declare_Variable Any
0215 4801 |H | Short_Literal 0x1
0216 e003 | | Load 0x0,0x3
0217 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0218 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0219 e402 | | Load 0x2,0x2
021a e002 | | Load 0x0,0x2
021b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
021c e003 | | Load 0x0,0x3
021d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
021f a602 | | Store_Unchecked 0x3,0x2
0220 BODY_0210:
0220 e5fe | | Load 0x2,-0x2
0221 680f |h | Jump_Zero 0x231
0222 e5ff | | Load 0x2,-0x1
0223 00d9 | | Load_Top At_Offset_1
0224 821d | | Call 0x1,0x1d
0225 680a |h | Jump_Zero 0x230
0226 00e1 | | Load_Encached Boolean_Cache
0227 e003 | | Load 0x0,0x3
0228 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0229 180e | | Execute Package,Field_Execute,Field_Number 0xe
022a 00da | | Load_Top At_Offset_2
022b e403 | | Load 0x2,0x3
022c e003 | | Load 0x0,0x3
022d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
022f c404 | | Store 0x2,0x4
0230 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0231 00e1 | | Load_Encached Boolean_Cache
0232 e003 | | Load 0x0,0x3
0233 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0234 180e | | Execute Package,Field_Execute,Field_Number 0xe
0235 00da | | Load_Top At_Offset_2
0236 e403 | | Load 0x2,0x3
0237 e003 | | Load 0x0,0x3
0238 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0239 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
023a c404 | | Store 0x2,0x4
023b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
023c 0000 0000 | | .BLANK 0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024a | J | .CONST 0x024a ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 e216 | | Load 0x1,0x16
0244 02c7 | | Declare_Variable Any
0245 e402 | | Load 0x2,0x2
0246 e002 | | Load 0x0,0x2
0247 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0248 8220 | | Call 0x1,0x20
0249 a602 | | Store_Unchecked 0x3,0x2
024a BODY_0240:
024a 00d8 | | Load_Top At_Offset_0
024b e403 | | Load 0x2,0x3
024c e003 | | Load 0x0,0x3
024d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
024f 700a |p | Jump_Nonzero 0x25a
0250 00e1 | | Load_Encached Boolean_Cache
0251 e003 | | Load 0x0,0x3
0252 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0253 180e | | Execute Package,Field_Execute,Field_Number 0xe
0254 00da | | Load_Top At_Offset_2
0255 e403 | | Load 0x2,0x3
0256 e003 | | Load 0x0,0x3
0257 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0258 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0259 c404 | | Store 0x2,0x4
025a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
025b ; --------------------------------------------------------------------------------------
025b ; STRING TABLE
025b ; --------------------------------------------------------------------------------------
025b 0006 | | .STRTAB 0x0006->0x025e ; "@"
025c 0005 | | .STRTAB 0x0005->0x025e ; "?"
025d 0004 | | .STREND 0x0004->0x025f
025e 403f |@? | .STRTAB_STRINGS
025f 0000 | | .XXX[0x1]
0260 ; --------------------------------------------------------------------------------------
0260 ; Debug Table
0260 ; --------------------------------------------------------------------------------------
0260 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0e4d,0x0000,0x0001,0x0000
0266 0a42 041e | B | .XXX[0x19a]
0268 bb65 ac8b | e |
026a e415 8324 | $|
026c ed91 6aca | j |
026e fda1 ab99 | |
0270 8fa1 1da7 | |
0272 5a88 2be6 |Z + |
0274 04e2 0319 | |
0276 2009 042f | /|
0278 0ab0 2b68 | +h|
027a 2003 9874 | t|
027c d816 5229 | R)|
027e 58dd 0449 |X I|
0280 c84e e7ac | N |
0282 6ca5 57f6 |l W |
0284 44fd 808f |D |
0286 8949 54f3 | IT |
0288 b9ff 78a4 | x |
028a f436 4804 | 6H |
028c 8b80 b5c0 | |
028e 0b81 c9cd | |
0290 8114 0a0f | |
0292 c44b 29af | K) |
0294 ac0c 01f6 | |
0296 c6c5 9249 | I|
0298 b382 33c6 | 3 |
029a 3c8b 724d |< rM|
029c cc6d 4c80 | mL |
029e 50c3 1954 |P T|
02a0 c6a0 257c | %||
02a2 04a0 0244 | D|
02a4 d059 8232 | Y 2|
02a6 5c13 d8c4 |\ |
02a8 fa08 c065 | e|
02aa 1d99 2300 | # |
02ac 607c 17cc |`| |
02ae 041b 8c04 | |
02b0 00f2 df3e | >|
02b2 00c7 7a14 | z |
02b4 8c10 f31b | |
02b6 f773 7269 | sri|
02b8 cf29 bc96 | ) |
02ba e441 4d61 | AMa|
02bc d2bd 8338 | 8|
02be a61a 2221 | "!|
02c0 0368 929b | h |
02c2 c0af e000 | |
02c4 f3a3 38a7 | 8 |
02c6 3d7c d505 |=| |
02c8 3286 9388 |2 |
02ca 6f1c 91e9 |o |
02cc 7f98 4cc6 | L |
02ce 1447 cc8f | G |
02d0 da70 4bcd | pK |
02d2 359f 1451 |5 Q|
02d4 2b74 aab9 |+t |
02d6 ce29 3909 | )9 |
02d8 bfd8 5ae1 | Z |
02da 62a0 1d4b |b K|
02dc 766d c492 |vm |
02de 2a73 efee |*s |
02e0 97f0 8926 | &|
02e2 f54c 4974 | LIt|
02e4 5c05 7803 |\ x |
02e6 0c26 260a | && |
02e8 c723 af2a | # *|
02ea ebfd 2447 | $G|
02ec 0dbc 541c | T |
02ee d624 8212 | $ |
02f0 ec0b 934b | K|
02f2 6122 a0b9 |a" |
02f4 9548 7024 | Hp$|
02f6 8f03 0ca5 | |
02f8 57a3 53b9 |W S |
02fa 224c 1abf |"L |
02fc 4ef0 8d64 |N d|
02fe 4657 48d8 |FWH |
0300 c81e a8a6 | |
0302 6c0b 35dc |l 5 |
0304 ae01 ef9c | |
0306 6f3f 0df2 |o? |
0308 44c0 015e |D ^|
030a 0107 00ae | |
030c 2650 1130 |&P 0|
030e c85d 114f | ] O|
0310 bb8c e061 | a|
0312 9008 5081 | P |
0314 057a 83e8 | z |
0316 1660 8f18 | ` |
0318 007a 4579 | zEy|
031a 48a9 a6be |H |
031c d12b f010 | + |
031e c000 5086 | P |
0320 7044 5504 |pDU |
0322 1d14 0201 | |
0324 2e89 3241 |. 2A|
0326 d0d7 9232 | 2|
0328 9254 589d | TX |
032a 2511 397b |% 9{|
032c 0096 84e1 | |
032e e924 3f7e | $?~|
0330 3182 7809 |1 x |
0332 1440 889f | @ |
0334 0f26 2efc | &. |
0336 2a0a 0bbf |* |
0338 5c03 8390 |\ |
033a 8cb6 492e | I.|
033c 0310 ef8a | |
033e 4201 2f0d |B / |
0340 22f2 5d77 |" ]w|
0342 2b0c 1394 |+ |
0344 1f88 0726 | &|
0346 b5d0 5063 | Pc|
0348 ba81 003d | =|
034a 1468 975e | h ^|
034c f806 b034 | 4|
034e efd4 2f06 | / |
0350 a4c0 bc65 | e|
0352 3a50 de68 |:P h|
0354 15bb c590 | |
0356 4d71 73f6 |Mqs |
0358 1055 63df | Uc |
035a 4b17 2c00 |K , |
035c 4bbe c456 |K V|
035e a6a5 5e0d | ^ |
0360 132a 2c1e | *, |
0362 6868 742a |hht*|
0364 772f d888 |w/ |
0366 8299 c31d | |
0368 48f9 e383 |H |
036a 6903 824c |i L|
036c 9c50 fc81 | P |
036e 8e8c 763c | v<|
0370 92f5 170d | |
0372 7f50 6850 | PhP|
0374 0274 f188 | t |
0376 6125 6a3e |a%j>|
0378 1efc 611b | a |
037a e66c e8e4 | l |
037c 4895 413b |H A;|
037e d42c a700 | , |
0380 0cf1 c162 | b|
0382 789c 50c4 |x P |
0384 81a8 0f07 | |
0386 c784 000b | |
0388 c392 ea28 | (|
038a 54c8 119d |T |
038c 9e8d 6909 | i |
038e afcd d9b0 | |
0390 d81a 732c | s,|
0392 d9bf 1d39 | 9|
0394 98a1 1e53 | S|
0396 6dc0 88be |m |
0398 2003 8dc0 | |
039a f000 4441 | DA|
039c 4a20 1ec0 |J |
039e a7fb 91d6 | |
03a0 1535 6482 | 5d |
03a2 1d09 5656 | VV|
03a4 cc6a d44c | j L|
03a6 c004 aa15 | |
03a8 e002 a1af | |
03aa b854 bb8c | T |
03ac 93e3 aa49 | I|
03ae 1bc1 3960 | 9`|
03b0 e451 d959 | Q Y|
03b2 fbb5 c644 | D|
03b4 17c1 9991 | |
03b6 ace5 9276 | v|
03b8 ae70 ae80 | p |
03ba ae5e 573c | ^W<|
03bc eda3 94fb | |
03be 6580 e6da |e |
03c0 b003 d4aa | |
03c2 3e57 cf29 |>W )|
03c4 546f de01 |To |
03c6 a002 a2ac | |
03c8 bb47 6b2e | Gk.|
03ca 3745 d798 |7E |
03cc 7753 c95a |wS Z|
03ce 0d82 287e | (~|
03d0 4124 81e6 |A$ |
03d2 2e54 278a |.T' |
03d4 25c9 a934 |% 4|
03d6 56e5 57f8 |V W |
03d8 bc28 a7c0 | ( |
03da 0d59 cd84 | Y |
03dc a873 0082 | s |
03de 03e6 8d0e | |
03e0 5897 4e3c |X N<|
03e2 a72b afca | + |
03e4 7710 f22a |w *|
03e6 d59b f464 | d|
03e8 1072 461f | rF |
03ea 23e4 049d |# |
03ec 002a 5392 | *S |
03ee f614 cac5 | |
03f0 b819 4800 | H |
03f2 a258 88c8 | X |
03f4 e481 3906 | 9 |
03f6 f770 9f9c | p |
03f8 1a2b 2113 | +! |
03fa c477 caec | w |
03fc f171 4d11 | qM |
03fe 1889 fe92 | |