|
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: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 01e8 | | .CONST 0x01e8 ; 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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 006e | n | .CONST 0x006e ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0025 | % | .CONST 0x0025 ; Number of locals 001b INIT_0018: 001b e002 | | Load 0x0,0x2 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 e003 | | Load 0x0,0x3 0021 1918 | | Execute Package,Field_Reference,Field_Number 0x18 0022 00c6 | | Action Check_Subprogram_Elaborated 0023 e002 | | Load 0x0,0x2 0024 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0025 e004 | | Load 0x0,0x4 0026 e005 | | Load 0x0,0x5 0027 4806 |H | Short_Literal 0x6 0028 0007 | | Action Break_Optional 0029 e003 | | Load 0x0,0x3 002a 1912 | | Execute Package,Field_Reference,Field_Number 0x12 002b 00c6 | | Action Check_Subprogram_Elaborated 002c e002 | | Load 0x0,0x2 002d 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 002e e006 | | Load 0x0,0x6 002f e007 | | Load 0x0,0x7 0030 480a |H | Short_Literal 0xa 0031 0007 | | Action Break_Optional 0032 e003 | | Load 0x0,0x3 0033 1915 | | Execute Package,Field_Reference,Field_Number 0x15 0034 00c6 | | Action Check_Subprogram_Elaborated 0035 e002 | | Load 0x0,0x2 0036 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0037 e008 | | Load 0x0,0x8 0038 e009 | | Load 0x0,0x9 0039 480e |H | Short_Literal 0xe 003a 0007 | | Action Break_Optional 003b e003 | | Load 0x0,0x3 003c 1914 | | Execute Package,Field_Reference,Field_Number 0x14 003d 00c6 | | Action Check_Subprogram_Elaborated 003e e002 | | Load 0x0,0x2 003f 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0040 e00a | | Load 0x0,0xa 0041 e00b | | Load 0x0,0xb 0042 4812 |H | Short_Literal 0x12 0043 0007 | | Action Break_Optional 0044 e003 | | Load 0x0,0x3 0045 1911 | | Execute Package,Field_Reference,Field_Number 0x11 0046 00c6 | | Action Check_Subprogram_Elaborated 0047 e002 | | Load 0x0,0x2 0048 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0049 e00c | | Load 0x0,0xc 004a e00d | | Load 0x0,0xd 004b 4816 |H | Short_Literal 0x16 004c 0007 | | Action Break_Optional 004d e003 | | Load 0x0,0x3 004e 1917 | | Execute Package,Field_Reference,Field_Number 0x17 004f 00c6 | | Action Check_Subprogram_Elaborated 0050 e002 | | Load 0x0,0x2 0051 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0052 e00e | | Load 0x0,0xe 0053 e00f | | Load 0x0,0xf 0054 481a |H | Short_Literal 0x1a 0055 0007 | | Action Break_Optional 0056 e003 | | Load 0x0,0x3 0057 1913 | | Execute Package,Field_Reference,Field_Number 0x13 0058 00c6 | | Action Check_Subprogram_Elaborated 0059 e002 | | Load 0x0,0x2 005a 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 005b e010 | | Load 0x0,0x10 005c e011 | | Load 0x0,0x11 005d 481e |H | Short_Literal 0x1e 005e 0007 | | Action Break_Optional 005f e003 | | Load 0x0,0x3 0060 1938 | 8 | Execute Package,Field_Reference,Field_Number 0x38 0061 00c6 | | Action Check_Subprogram_Elaborated 0062 e002 | | Load 0x0,0x2 0063 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0064 e012 | | Load 0x0,0x12 0065 e013 | | Load 0x0,0x13 0066 4822 |H" | Short_Literal 0x22 0067 0007 | | Action Break_Optional 0068 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 006a 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call 006c 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 006e BODY_0018: 006e 8424 | $ | Call 0x2,0x24 006f e402 | | Load 0x2,0x2 0070 e002 | | Load 0x0,0x2 0071 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0072 4801 |H | Short_Literal 0x1 0073 4850 |HP | Short_Literal 0x50 0074 00e9 | | Load_Encached String_Cache 0075 035b | [ | Declare_Type Array,Constrained 0076 0337 | 7 | Declare_Variable Array 0077 4850 |HP | Short_Literal 0x50 0078 4801 |H | Short_Literal 0x1 0079 483d |H= | Short_Literal 0x3d 007a e428 | ( | Load 0x2,0x28 007b e426 | & | Load 0x2,0x26 007c 01d6 | | Execute Vector,Field_Write 007d 3ffb |? | Loop_Increasing 0x79 007e e002 | | Load 0x0,0x2 007f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0080 4800 |H | Short_Literal 0x0 0081 4800 |H | Short_Literal 0x0 0082 4800 |H | Short_Literal 0x0 0083 e014 | | Load 0x0,0x14 0084 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0085 e014 | | Load 0x0,0x14 0086 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0087 e002 | | Load 0x0,0x2 0088 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0089 4801 |H | Short_Literal 0x1 008a e002 | | Load 0x0,0x2 008b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 008c e5ff | | Load 0x2,-0x1 008d 01db | | Execute Vector,Length 008e 6805 |h | Jump_Zero 0x94 008f e5ff | | Load 0x2,-0x1 0090 8423 | # | Call 0x2,0x23 0091 4801 |H | Short_Literal 0x1 0092 e002 | | Load 0x0,0x2 0093 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0094 4807 |H | Short_Literal 0x7 0095 4802 |H | Short_Literal 0x2 0096 0099 | | Action Reference_Dynamic 0097 4808 |H | Short_Literal 0x8 0098 4802 |H | Short_Literal 0x2 0099 0099 | | Action Reference_Dynamic 009a e003 | | Load 0x0,0x3 009b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 009c 4801 |H | Short_Literal 0x1 009d e002 | | Load 0x0,0x2 009e 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 009f 481b |H | Short_Literal 0x1b 00a0 4802 |H | Short_Literal 0x2 00a1 0099 | | Action Reference_Dynamic 00a2 481c |H | Short_Literal 0x1c 00a3 4802 |H | Short_Literal 0x2 00a4 0099 | | Action Reference_Dynamic 00a5 e003 | | Load 0x0,0x3 00a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00a7 4801 |H | Short_Literal 0x1 00a8 e002 | | Load 0x0,0x2 00a9 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 00aa 00cf | | Action Mark_Auxiliary 00ab e5fd | | Load 0x2,-0x3 00ac 4801 |H | Short_Literal 0x1 00ad 0263 | c | Execute Discrete,Above_Bound 00ae 7005 |p | Jump_Nonzero 0xb4 00af 8425 | % | Call 0x2,0x25 00b0 e5fc | | Load 0x2,-0x4 00b1 00ba | | Action Initiate_Delay 00b2 00c8 | | Action Pop_Auxiliary_Range 00b3 3ffb |? | Loop_Increasing 0xaf 00b4 00ce | | Action Pop_Auxiliary 00b5 e002 | | Load 0x0,0x2 00b6 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 00b7 481b |H | Short_Literal 0x1b 00b8 4802 |H | Short_Literal 0x2 00b9 0099 | | Action Reference_Dynamic 00ba 481c |H | Short_Literal 0x1c 00bb 4802 |H | Short_Literal 0x2 00bc 0099 | | Action Reference_Dynamic 00bd e003 | | Load 0x0,0x3 00be 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00bf 4801 |H | Short_Literal 0x1 00c0 e002 | | Load 0x0,0x2 00c1 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 00c2 48ff |H | Short_Literal 0xff 00c3 4800 |H | Short_Literal 0x0 00c4 480b |H | Short_Literal 0xb 00c5 4802 |H | Short_Literal 0x2 00c6 0099 | | Action Reference_Dynamic 00c7 480c |H | Short_Literal 0xc 00c8 4802 |H | Short_Literal 0x2 00c9 0099 | | Action Reference_Dynamic 00ca e003 | | Load 0x0,0x3 00cb 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00cc 4801 |H | Short_Literal 0x1 00cd e002 | | Load 0x0,0x2 00ce 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 00cf 4817 |H | Short_Literal 0x17 00d0 4802 |H | Short_Literal 0x2 00d1 0099 | | Action Reference_Dynamic 00d2 4818 |H | Short_Literal 0x18 00d3 4802 |H | Short_Literal 0x2 00d4 0099 | | Action Reference_Dynamic 00d5 e003 | | Load 0x0,0x3 00d6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00d7 4801 |H | Short_Literal 0x1 00d8 e002 | | Load 0x0,0x2 00d9 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 00da e002 | | Load 0x0,0x2 00db 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 00dc e402 | | Load 0x2,0x2 00dd e002 | | Load 0x0,0x2 00de 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00df c402 | | Store 0x2,0x2 00e0 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00e1 0000 0000 | | .BLANK 0000[0x7] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00f0 | | .CONST 0x00f0 ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0003 | | .CONST 0x0003 ; Number of locals 00eb INIT_00e8: 00eb e7ff | | Load 0x3,-0x1 00ec 01dd | | Execute Vector,First 00ed 00e4 | | Load_Encached Positive_Cache 00ee 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 00ef 00e4 | | Load_Encached Positive_Cache 00f0 BODY_00e8: 00f0 00cf | | Action Mark_Auxiliary 00f1 7833 |x3 | Jump 0x125 00f2 e602 | | Load 0x3,0x2 00f3 0a48 | H | Execute_Immediate Plus,0x48 00f4 c603 | | Store 0x3,0x3 00f5 00cf | | Action Mark_Auxiliary 00f6 7818 |x | Jump 0x10f 00f7 e603 | | Load 0x3,0x3 00f8 e7ff | | Load 0x3,-0x1 00f9 01d7 | | Execute Vector,Field_Read 00fa 0f20 | | Execute_Immediate Equal,0x20 00fb 7017 |p | Jump_Nonzero 0x113 00fc e603 | | Load 0x3,0x3 00fd e7ff | | Load 0x3,-0x1 00fe 01d7 | | Execute Vector,Field_Read 00ff 0f2c | , | Execute_Immediate Equal,0x2c 0100 7012 |p | Jump_Nonzero 0x113 0101 e603 | | Load 0x3,0x3 0102 e7ff | | Load 0x3,-0x1 0103 01d7 | | Execute Vector,Field_Read 0104 0f2e | . | Execute_Immediate Equal,0x2e 0105 700d |p | Jump_Nonzero 0x113 0106 e603 | | Load 0x3,0x3 0107 e7ff | | Load 0x3,-0x1 0108 01d7 | | Execute Vector,Field_Read 0109 0f0a | | Execute_Immediate Equal,0xa 010a 7008 |p | Jump_Nonzero 0x113 010b e603 | | Load 0x3,0x3 010c 0aff | | Execute_Immediate Plus,-0x1 010d c603 | | Store 0x3,0x3 010e 00c9 | | Action Pop_Auxiliary_Loop 010f e603 | | Load 0x3,0x3 0110 e602 | | Load 0x3,0x2 0111 027d | } | Execute Discrete,Greater 0112 77e4 |w | Jump_Nonzero 0xf7 0113 00ce | | Action Pop_Auxiliary 0114 e603 | | Load 0x3,0x3 0115 e602 | | Load 0x3,0x2 0116 027a | z | Execute Discrete,Less_Equal 0117 6803 |h | Jump_Zero 0x11b 0118 e602 | | Load 0x3,0x2 0119 0a47 | G | Execute_Immediate Plus,0x47 011a c603 | | Store 0x3,0x3 011b e602 | | Load 0x3,0x2 011c e603 | | Load 0x3,0x3 011d e7ff | | Load 0x3,-0x1 011e 01cf | | Execute Vector,Slice_Read 011f e002 | | Load 0x0,0x2 0120 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0121 e603 | | Load 0x3,0x3 0122 0a01 | | Execute_Immediate Plus,0x1 0123 c602 | | Store 0x3,0x2 0124 00c9 | | Action Pop_Auxiliary_Loop 0125 e7ff | | Load 0x3,-0x1 0126 01dc | | Execute Vector,Last 0127 e602 | | Load 0x3,0x2 0128 0272 | r | Execute Discrete,Minus 0129 0c49 | I | Execute_Immediate Greater_Equal,0x49 012a 77c7 |w | Jump_Nonzero 0xf2 012b 00ce | | Action Pop_Auxiliary 012c e602 | | Load 0x3,0x2 012d e7ff | | Load 0x3,-0x1 012e 01dc | | Execute Vector,Last 012f 027a | z | Execute Discrete,Less_Equal 0130 6807 |h | Jump_Zero 0x138 0131 e602 | | Load 0x3,0x2 0132 e7ff | | Load 0x3,-0x1 0133 01dc | | Execute Vector,Last 0134 e7ff | | Load 0x3,-0x1 0135 01cf | | Execute Vector,Slice_Read 0136 e002 | | Load 0x0,0x2 0137 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0138 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0139 0000 0000 | | .BLANK 0000[0x7] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 014a | J | .CONST 0x014a ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 e402 | | Load 0x2,0x2 0144 00ea | | Load_Encached Null_String_Cache 0145 e5fe | | Load 0x2,-0x2 0146 e002 | | Load 0x0,0x2 0147 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0148 c402 | | Store 0x2,0x2 0149 4501 |E | Exit_Suprogram New_Top_Offset 0x1 014a TRAP_0140: 014a 0007 | | Action Break_Optional 014b e015 | | Load 0x0,0x15 014c 180e | | Execute Package,Field_Execute,Field_Number 0xe 014d 4807 |H | Short_Literal 0x7 014e 4800 |H | Short_Literal 0x0 014f 4801 |H | Short_Literal 0x1 0150 e016 | | Load 0x0,0x16 0151 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0152 e017 | | Load 0x0,0x17 0153 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0154 e015 | | Load 0x0,0x15 0155 180e | | Execute Package,Field_Execute,Field_Number 0xe 0156 4805 |H | Short_Literal 0x5 0157 0092 01cb | | Action Push_String_Extended,0x1cb ; "Cannot open \x22" 0159 e5fe | | Load 0x2,-0x2 015a 01cc | | Execute Vector,Catenate 015b 0092 01cc | | Action Push_String_Extended,0x1cc ; "\x22 for append." 015d 01cc | | Execute Vector,Catenate 015e e017 | | Load 0x0,0x17 015f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0160 00cc | | Action Pop_Block 0161 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0162 0000 0000 | | .BLANK 0000[0x6] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0180 | | .CONST 0x0180 ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0002 | | .CONST 0x0002 ; Number of locals 016b INIT_0168: 016b 0092 01cd | | Action Push_String_Extended,0x1cd ; "--- Sample" 016d e428 | ( | Load 0x2,0x28 016e 00e0 | | Load_Encached Standard_Cache 016f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0170 01cc | | Execute Vector,Catenate 0171 0092 01ce | | Action Push_String_Extended,0x1ce ; " " 0173 01cc | | Execute Vector,Catenate 0174 4800 |H | Short_Literal 0x0 0175 4800 |H | Short_Literal 0x0 0176 4800 |H | Short_Literal 0x0 0177 e014 | | Load 0x0,0x14 0178 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0179 e014 | | Load 0x0,0x14 017a 181f | | Execute Package,Field_Execute,Field_Number 0x1f 017b 01cc | | Execute Vector,Catenate 017c 0092 01ce | | Action Push_String_Extended,0x1ce ; " " 017e 01cc | | Execute Vector,Catenate 017f 0007 | | Action Break_Optional 0180 BODY_0168: 0180 e002 | | Load 0x0,0x2 0181 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0182 00d8 | | Load_Top At_Offset_0 0183 4801 |H | Short_Literal 0x1 0184 4850 |HP | Short_Literal 0x50 0185 e602 | | Load 0x3,0x2 0186 01db | | Execute Vector,Length 0187 0272 | r | Execute Discrete,Minus 0188 00e9 | | Load_Encached String_Cache 0189 035b | [ | Declare_Type Array,Constrained 018a 0337 | 7 | Declare_Variable Array 018b 00d8 | | Load_Top At_Offset_0 018c 01dc | | Execute Vector,Last 018d 4801 |H | Short_Literal 0x1 018e 0263 | c | Execute Discrete,Above_Bound 018f 7005 |p | Jump_Nonzero 0x195 0190 482d |H- | Short_Literal 0x2d 0191 e606 | | Load 0x3,0x6 0192 e604 | | Load 0x3,0x4 0193 01d6 | | Execute Vector,Field_Write 0194 3ffb |? | Loop_Increasing 0x190 0195 01cc | | Execute Vector,Catenate 0196 e002 | | Load 0x0,0x2 0197 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0198 4801 |H | Short_Literal 0x1 0199 e002 | | Load 0x0,0x2 019a 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 019b 4801 |H | Short_Literal 0x1 019c 4800 |H | Short_Literal 0x0 019d e018 | | Load 0x0,0x18 019e 180e | | Execute Package,Field_Execute,Field_Number 0xe 019f e002 | | Load 0x0,0x2 01a0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01a1 4801 |H | Short_Literal 0x1 01a2 4801 |H | Short_Literal 0x1 01a3 e018 | | Load 0x0,0x18 01a4 180e | | Execute Package,Field_Execute,Field_Number 0xe 01a5 e002 | | Load 0x0,0x2 01a6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01a7 48ff |H | Short_Literal 0xff 01a8 4800 |H | Short_Literal 0x0 01a9 4813 |H | Short_Literal 0x13 01aa 4802 |H | Short_Literal 0x2 01ab 0099 | | Action Reference_Dynamic 01ac 4814 |H | Short_Literal 0x14 01ad 4802 |H | Short_Literal 0x2 01ae 0099 | | Action Reference_Dynamic 01af e003 | | Load 0x0,0x3 01b0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01b1 4801 |H | Short_Literal 0x1 01b2 e002 | | Load 0x0,0x2 01b3 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 01b4 4803 |H | Short_Literal 0x3 01b5 4802 |H | Short_Literal 0x2 01b6 0099 | | Action Reference_Dynamic 01b7 4804 |H | Short_Literal 0x4 01b8 4802 |H | Short_Literal 0x2 01b9 0099 | | Action Reference_Dynamic 01ba e003 | | Load 0x0,0x3 01bb 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01bc 4801 |H | Short_Literal 0x1 01bd e002 | | Load 0x0,0x2 01be 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 01bf 480f |H | Short_Literal 0xf 01c0 4802 |H | Short_Literal 0x2 01c1 0099 | | Action Reference_Dynamic 01c2 4810 |H | Short_Literal 0x10 01c3 4802 |H | Short_Literal 0x2 01c4 0099 | | Action Reference_Dynamic 01c5 e003 | | Load 0x0,0x3 01c6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01c7 4801 |H | Short_Literal 0x1 01c8 e002 | | Load 0x0,0x2 01c9 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 01ca 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01cb ; -------------------------------------------------------------------------------------- 01cb ; STRING TABLE 01cb ; -------------------------------------------------------------------------------------- 01cb 000a | | .STRTAB 0x000a->0x01d0 ; "Cannot open \x22" 01cc 0015 | | .STRTAB 0x0015->0x01d6 ; "\x22 for append." 01cd 0020 | | .STRTAB 0x0020->0x01dd ; "--- Sample" 01ce 0028 | ( | .STRTAB 0x0028->0x01e2 ; " " 01cf 0027 | ' | .STREND 0x0027->0x01e2 01d0 4361 6e6e |Cann| .STRTAB_STRINGS 01e3 0000 0000 | | .BLANK 0000[0x5] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; Debug Table 01e8 ; -------------------------------------------------------------------------------------- 01e8 0004 0010 | | .DEBUG4 0x0004,0x0010,0xd8d4,0x0000,0x0001,0x0000 01ee 5f32 3231 |_221| .XXX[0x12] 01f0 555f 3232 |U_22| 01f2 3255 5f32 |2U_2| 01f4 3233 555f |23U_| 01f6 3232 3455 |224U| 01f8 5f32 3235 |_225| 01fa 555f 3232 |U_22| 01fc 3655 5f32 |6U_2| 01fe 3237 555f |27U_|