|
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: 4096 (0x1000) Notes: 00_class, 5812_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5812 |X | .CONST 0x5812 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0550 | P | .CONST 0x0550 ; 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 0003 | | .CONST 0x0003 ; 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 ; Debug Table 0x0 = .DEBUG 0x000b,0x05fa,0x8000,0x0000,0x0041,0x7946,0x0000,0x0015 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 0075 | u | .CONST 0x0075 ; Address of begin 0019 00ae | | .CONST 0x00ae ; Address of exception handler 001a 001f | | .CONST 0x001f ; Number of locals 001b INIT_0018: 001b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001b,0x05fc,0x8001,0x0000,0x0041,0x7946,0x0000,0x0015 ; Debug Table 0x1.0x0 = 0x1b,0xffff 001c e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x1 = 0x1c,0xfffe 001d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 001e 02ff | | Declare_Variable Variant_Record 001f 00db | | Load_Top At_Offset_3 0020 e002 | | Load 0x0,0x2 0021 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0022 025b | [ | Execute Discrete,Check_In_Type 0023 e001 | | Load 0x0,0x1 0024 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0025 00d9 | | Load_Top At_Offset_1 0026 016d | m | Execute Variant_Record,Structure_Write 0027 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x2 = 0x27,0xfffd 0028 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0029 02c7 | | Declare_Variable Any 002a 00d8 | | Load_Top At_Offset_0 002b 1c00 | | Execute_Immediate Run_Utility,0x0 002c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x3 = 0x2c,0xfffc 002d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x4 = 0x2d,0xfffb 002e 0618 | | Execute_Immediate Set_Value_Unchecked,0x18 002f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x5 = 0x2f,0xfffa 0030 0afd | | Execute_Immediate Plus,-0x3 0031 00e3 | | Load_Encached Natural_Cache 0032 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0033 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x6 = 0x33,0xfff9 0034 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0035 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x7 = 0x35,0xfff8 0036 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0037 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x8 = 0x37,0xfff7 0038 0650 | P | Execute_Immediate Set_Value_Unchecked,0x50 0039 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x9 = 0x39,0xfff6 003a 4801 |H | Short_Literal 0x1 003b 00e9 | | Load_Encached String_Cache 003c 0334 | 4 | Declare_Variable Array,With_Constraint 003d 52b2 |R | Indirect_Literal Any,0x2f0,{0x29202020, 0x20202020} 003e 0007 | | Action Break_Optional ; Debug Table 0x1.0xa = 0x3e,0xfff5 003f 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0xb = 0x3f,0xfff4 0040 4809 |H | Short_Literal 0x9 0041 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call 0043 03fd | | Declare_Type Discrete,Defined 0044 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0xc = 0x44,0xfff3 0045 4801 |H | Short_Literal 0x1 0046 029f 00db | | Declare_Subprogram INIT_00d8,For_Call 0048 03fd | | Declare_Type Discrete,Defined 0049 e003 | | Load 0x0,0x3 ; Debug Table 0x1.0xd = 0x49,0xfff2 004a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004b 02c7 | | Declare_Variable Any 004c 00d8 | | Load_Top At_Offset_0 004d 1c00 | | Execute_Immediate Run_Utility,0x0 004e e004 | | Load 0x0,0x4 ; Debug Table 0x1.0xe = 0x4e,0xfff1 004f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0050 02c7 | | Declare_Variable Any 0051 00d8 | | Load_Top At_Offset_0 0052 1c00 | | Execute_Immediate Run_Utility,0x0 0053 e005 | | Load 0x0,0x5 ; Debug Table 0x1.0xf = 0x53,0xfff0 0054 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0055 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call ; Debug Table 0x1.0x10 = 0x55,0xffef 0057 029f 0103 | | Declare_Subprogram INIT_0100,For_Call ; Debug Table 0x1.0x11 = 0x57,0xffee 0059 029f 012b | +| Declare_Subprogram INIT_0128,For_Call ; Debug Table 0x1.0x12 = 0x59,0xffed 005b 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call ; Debug Table 0x1.0x13 = 0x5b,0xffec 005d 029f 014b | K| Declare_Subprogram INIT_0148,For_Call ; Debug Table 0x1.0x14 = 0x5d,0xffeb 005f 029f 016b | k| Declare_Subprogram INIT_0168,For_Call ; Debug Table 0x1.0x15 = 0x5f,0xffea 0061 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call ; Debug Table 0x1.0x16 = 0x61,0xffe9 0063 029f 0183 | | Declare_Subprogram INIT_0180,For_Call ; Debug Table 0x1.0x17 = 0x63,0xffe8 0065 029f 01cb | | Declare_Subprogram INIT_01c8,For_Call ; Debug Table 0x1.0x18 = 0x65,0xffe7 0067 029f 0213 | | Declare_Subprogram INIT_0210,For_Call ; Debug Table 0x1.0x19 = 0x67,0xffe6 0069 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call ; Debug Table 0x1.0x1a = 0x69,0xffe5 006b 029f 024b | K| Declare_Subprogram INIT_0248,For_Call ; Debug Table 0x1.0x1b = 0x6b,0xffe4 006d 029f 027b | {| Declare_Subprogram INIT_0278,For_Call ; Debug Table 0x1.0x1c = 0x6d,0xffe3 006f 029f 02ab | | Declare_Subprogram INIT_02a8,For_Call ; Debug Table 0x1.0x1d = 0x6f,0xffe2 0071 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call ; Debug Table 0x1.0x1e = 0x71,0xffe1 0073 029f 02fb | | Declare_Subprogram INIT_02f8,For_Call 0075 BODY_0018: 0075 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x1f = 0x75,0x1 0076 e403 | | Load 0x2,0x3 0077 0120 | | Execute Any,Is_Value 0078 6803 |h | Jump_Zero 0x7c 0079 e001 | | Load 0x0,0x1 007a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 007b 7801 |x | Jump 0x7d 007c e403 | | Load 0x2,0x3 007d e006 | | Load 0x0,0x6 007e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007f 4800 |H | Short_Literal 0x0 0080 e402 | | Load 0x2,0x2 0081 e001 | | Load 0x0,0x1 0082 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0083 c403 | | Store 0x2,0x3 0084 c404 | | Store 0x2,0x4 0085 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x20 = 0x85,0x2 0086 8413 | | Call 0x2,0x13 0087 0092 0378 | x| Action Push_String_Extended,0x378 ; "Key_Test: Core Editor Key Test." ; Debug Table 0x1.0x21 = 0x87,0x3 0089 8412 | | Call 0x2,0x12 008a 0092 0379 | y| Action Push_String_Extended,0x379 ; "Type help for a command list." ; Debug Table 0x1.0x22 = 0x8a,0x4 008c 8412 | | Call 0x2,0x12 008d 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x23 = 0x8d,0x5 008e 8413 | | Call 0x2,0x13 008f 0092 037a | z| Action Push_String_Extended,0x37a ; "terminal: " ; Debug Table 0x1.0x24 = 0x8f,0x6 0091 8410 | | Call 0x2,0x10 0092 8414 | | Call 0x2,0x14 ; Debug Table 0x1.0x25 = 0x92,0x7 0093 e005 | | Load 0x0,0x5 0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0095 00e0 | | Load_Encached Standard_Cache 0096 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0097 a40f | | Store_Unchecked 0x2,0xf 0098 e40f | | Load 0x2,0xf ; Debug Table 0x1.0x26 = 0x98,0x8 0099 e403 | | Load 0x2,0x3 009a e001 | | Load 0x0,0x1 009b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 009c e40f | | Load 0x2,0xf ; Debug Table 0x1.0x27 = 0x9c,0x9 009d e004 | | Load 0x0,0x4 009e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 009f c40e | | Store 0x2,0xe 00a0 e40f | | Load 0x2,0xf ; Debug Table 0x1.0x28 = 0xa0,0xa 00a1 e003 | | Load 0x0,0x3 00a2 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00a3 c40d | | Store 0x2,0xd 00a4 0007 | | Action Break_Optional ; Debug Table 0x1.0x29 = 0xa4,0xb 00a5 841f | | Call 0x2,0x1f ; Debug Table 0x1.0x2a = 0xa5,0xc 00a6 7ffe | | Jump 0xa5 00a7 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x2b = 0xa7,0xd 00a8 e403 | | Load 0x2,0x3 00a9 e001 | | Load 0x0,0x1 00aa 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00ab c403 | | Store 0x2,0x3 00ac c404 | | Store 0x2,0x4 00ad 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00ae TRAP_0018: 00ae 0007 | | Action Break_Optional 00af 0092 037b | {| Action Push_String_Extended,0x37b ; "Massive failure " ; Debug Table 0x1.0x2c = 0xaf,0xe 00b1 8412 | | Call 0x2,0x12 00b2 e007 | | Load 0x0,0x7 ; Debug Table 0x1.0x2d = 0xb2,0xf 00b3 180d | | Execute Package,Field_Execute,Field_Number 0xd 00b4 8412 | | Call 0x2,0x12 00b5 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x2e = 0xb5,0x10 00b6 e403 | | Load 0x2,0x3 00b7 e001 | | Load 0x0,0x1 00b8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00b9 c403 | | Store 0x2,0x3 00ba c404 | | Store 0x2,0x4 00bb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00bc 0000 0000 | | .BLANK 0000[0x4] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x00c3,0x065c,0x0005,0x0000,0x0041,0x7946,0x0000,0x006d 00c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00c5 7802 |x | Jump 0xc8 ; case 0x1 00c6 7805 |x | Jump 0xcc ; case 0x2 00c7 7809 |x | Jump 0xd1 ; case 0x3 00c8 00da | | Load_Top At_Offset_2 00c9 0091 036c | l| Action Push_String_Extended_Indexed,0x36c ; "ECHO" 00cb 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00cc 00db | | Load_Top At_Offset_3 00cd 00db | | Load_Top At_Offset_3 00ce 00e0 | | Load_Encached Standard_Cache 00cf 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00d0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00d1 00da | | Load_Top At_Offset_2 00d2 00e0 | | Load_Encached Standard_Cache 00d3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00d4 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00d5 0000 0000 | | .XXX[0x3] 00d7 0000 | | 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db 4603 |F | Jump_Case 0x4 ; Debug Table 0x3 = .DEBUG 0x00db,0x065e,0x0005,0x0000,0x0041,0x7946,0x0000,0x007b 00dc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00dd 7802 |x | Jump 0xe0 ; case 0x1 00de 7805 |x | Jump 0xe4 ; case 0x2 00df 7809 |x | Jump 0xe9 ; case 0x3 00e0 00da | | Load_Top At_Offset_2 00e1 0091 0376 | v| Action Push_String_Extended_Indexed,0x376 ; "ON" 00e3 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00e4 00db | | Load_Top At_Offset_3 00e5 00db | | Load_Top At_Offset_3 00e6 00e0 | | Load_Encached Standard_Cache 00e7 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00e8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00e9 00da | | Load_Top At_Offset_2 00ea 00e0 | | Load_Encached Standard_Cache 00eb 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00ec 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00ed 0000 0000 | | .XXX[0x3] 00ef 0000 | | 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f3 | | .CONST 0x00f3 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0001 | | .CONST 0x0001 ; Number of locals 00f3 BODY_00f0: 00f3 INIT_00f0: 00f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x00f3,0x0660,0x0001,0x0000,0x0041,0x7946,0x0000,0x0096 ; Debug Table 0x4.0x0 = 0xf3,0x1 00f4 01db | | Execute Vector,Length 00f5 0c01 | | Execute_Immediate Greater_Equal,0x1 00f6 6804 |h | Jump_Zero 0xfb 00f7 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x1 = 0xf7,0x2 00f8 e403 | | Load 0x2,0x3 00f9 e008 | | Load 0x0,0x8 00fa 180d | | Execute Package,Field_Execute,Field_Number 0xd 00fb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00fc 0000 0000 | | .BLANK 0000[0x4] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0104 | | .CONST 0x0104 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0002 | | .CONST 0x0002 ; Number of locals 0103 INIT_0100: 0103 00e8 | | Load_Encached Character_Cache ; Debug Table 0x5 = .DEBUG 0x0103,0x0666,0x0001,0x0000,0x0041,0x7946,0x0000,0x00b3 ; Debug Table 0x5.0x0 = 0x103,0xffff 0104 BODY_0100: 0104 e407 | | Load 0x2,0x7 ; Debug Table 0x5.0x1 = 0x104,0x1 0105 681d |h | Jump_Zero 0x123 0106 e408 | | Load 0x2,0x8 0107 e406 | | Load 0x2,0x6 0108 027d | } | Execute Discrete,Greater 0109 6819 |h | Jump_Zero 0x123 010a e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x2 = 0x10a,0x2 010b e008 | | Load 0x0,0x8 010c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 010d 0092 037c | || Action Push_String_Extended,0x37c ; "-- MORE --" ; Debug Table 0x5.0x3 = 0x10d,0x3 010f e403 | | Load 0x2,0x3 0110 e008 | | Load 0x0,0x8 0111 180d | | Execute Package,Field_Execute,Field_Number 0xd 0112 00e8 | | Load_Encached Character_Cache ; Debug Table 0x5.0x4 = 0x112,0x4 0113 4800 |H | Short_Literal 0x0 0114 e403 | | Load 0x2,0x3 0115 e008 | | Load 0x0,0x8 0116 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0117 0059 | Y | Store_Top Discrete,At_Offset_1 0118 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x5 = 0x118,0x5 0119 a408 | | Store_Unchecked 0x2,0x8 011a e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x6 = 0x11a,0x6 011b e008 | | Load 0x0,0x8 011c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 011d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x7 = 0x11d,0x7 011e 0f6e | n | Execute_Immediate Equal,0x6e 011f 6802 |h | Jump_Zero 0x122 0120 61cb |a | Indirect_Literal Discrete,0x2ec,{0x00000000, 0x41794601} ; Debug Table 0x5.0x8 = 0x120,0x8 0121 0257 | W | Execute Discrete,Raise 0122 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0123 e408 | | Load 0x2,0x8 ; Debug Table 0x5.0x9 = 0x123,0x9 0124 0a01 | | Execute_Immediate Plus,0x1 0125 c408 | | Store 0x2,0x8 0126 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0127 0000 | | .XXX[0x1] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012b | + | .CONST 0x012b ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0001 | | .CONST 0x0001 ; Number of locals 012b BODY_0128: 012b INIT_0128: 012b 8411 | | Call 0x2,0x11 ; Debug Table 0x6 = .DEBUG 0x012b,0x067c,0x0001,0x0000,0x0041,0x7946,0x0000,0x00fc ; Debug Table 0x6.0x0 = 0x12b,0x1 012c 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x1 = 0x12c,0x2 012d 01db | | Execute Vector,Length 012e 0c01 | | Execute_Immediate Greater_Equal,0x1 012f 6804 |h | Jump_Zero 0x134 0130 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x2 = 0x130,0x3 0131 e403 | | Load 0x2,0x3 0132 e008 | | Load 0x0,0x8 0133 180d | | Execute Package,Field_Execute,Field_Number 0xd 0134 e403 | | Load 0x2,0x3 ; Debug Table 0x6.0x3 = 0x134,0x4 0135 e008 | | Load 0x0,0x8 0136 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0137 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x013b,0x0686,0x0001,0x0000,0x0041,0x7946,0x0000,0x0122 ; Debug Table 0x7.0x0 = 0x13b,0x1 013c 4801 |H | Short_Literal 0x1 013d 0263 | c | Execute Discrete,Above_Bound 013e 7005 |p | Jump_Nonzero 0x144 013f 8411 | | Call 0x2,0x11 ; Debug Table 0x7.0x1 = 0x13f,0x2 0140 e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x2 = 0x140,0x3 0141 e008 | | Load 0x0,0x8 0142 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0143 3ffb |? | Loop_Increasing 0x13f 0144 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0145 0000 0000 | | .XXX[0x3] 0147 0000 | | 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0151 | Q | .CONST 0x0151 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0003 | | .CONST 0x0003 ; Number of locals 014b INIT_0148: 014b 4801 |H | Short_Literal 0x1 ; Debug Table 0x8 = .DEBUG 0x014b,0x068e,0x0002,0x0000,0x0041,0x7946,0x0000,0x013f ; Debug Table 0x8.0x0 = 0x14b,0xffff 014c e409 | | Load 0x2,0x9 014d 00e9 | | Load_Encached String_Cache 014e 0334 | 4 | Declare_Variable Array,With_Constraint 014f 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x1 = 0x14f,0xfffe 0150 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0151 BODY_0148: 0151 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x2 = 0x151,0x1 0152 a408 | | Store_Unchecked 0x2,0x8 0153 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x3 = 0x153,0x2 0154 00da | | Load_Top At_Offset_2 0155 4801 |H | Short_Literal 0x1 0156 e403 | | Load 0x2,0x3 0157 e008 | | Load 0x0,0x8 0158 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0159 00d1 | | Pop_Control Pop_Count_1 015a 0059 | Y | Store_Top Discrete,At_Offset_1 015b 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x4 = 0x15b,0x3 015c 00d9 | | Load_Top At_Offset_1 015d 0aff | | Execute_Immediate Plus,-0x1 015e 0248 | H | Execute Discrete,Check_In_Integer 015f 00db | | Load_Top At_Offset_3 0160 01cf | | Execute Vector,Slice_Read 0161 00ca | | Action Exit_Nullary_Function 0162 0000 0000 | | .BLANK 0000[0x6] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016b | k | .CONST 0x016b ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0001 | | .CONST 0x0001 ; Number of locals 016b BODY_0168: 016b INIT_0168: 016b 8414 | | Call 0x2,0x14 ; Debug Table 0x9 = .DEBUG 0x016b,0x069a,0x0002,0x0000,0x0041,0x7946,0x0000,0x016c ; Debug Table 0x9.0x0 = 0x16b,0x1 016c 00e2 | | Load_Encached Integer_Cache 016d 00e0 | | Load_Encached Standard_Cache 016e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 016f 00ca | | Action Exit_Nullary_Function 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0178 | x | .CONST 0x0178 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x0173,0x069e,0x0002,0x0000,0x0041,0x7946,0x0000,0x017b ; Debug Table 0xa.0x0 = 0x173,0x1 0174 e40b | | Load 0x2,0xb 0175 00e0 | | Load_Encached Standard_Cache 0176 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0177 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0178 TRAP_0170: 0178 0007 | | Action Break_Optional 0179 4809 |H | Short_Literal 0x9 ; Debug Table 0xa.0x1 = 0x179,0x2 017a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017b 0000 0000 | | .BLANK 0000[0x5] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 018f | | .CONST 0x018f ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0005 | | .CONST 0x0005 ; Number of locals 0183 INIT_0180: 0183 e004 | | Load 0x0,0x4 ; Debug Table 0xb = .DEBUG 0x0183,0x06a4,0x0002,0x0000,0x0041,0x7946,0x0000,0x0194 ; Debug Table 0xb.0x0 = 0x183,0xffff 0184 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0185 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0186 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x1 = 0x186,0xfffe 0187 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0188 00e8 | | Load_Encached Character_Cache ; Debug Table 0xb.0x2 = 0x188,0xfffd 0189 480a |H | Short_Literal 0xa ; Debug Table 0xb.0x3 = 0x189,0xfffc 018a e009 | | Load 0x0,0x9 018b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 018c 1c08 | | Execute_Immediate Run_Utility,0x8 018d 00d8 | | Load_Top At_Offset_0 018e 1c00 | | Execute_Immediate Run_Utility,0x0 018f BODY_0180: 018f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x4 = 0x18f,0x1 0190 4820 |H | Short_Literal 0x20 0191 4800 |H | Short_Literal 0x0 0192 e009 | | Load 0x0,0x9 0193 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0194 00d1 | | Pop_Control Pop_Count_1 0195 0007 | | Action Break_Optional ; Debug Table 0xb.0x5 = 0x195,0x2 0196 00e8 | | Load_Encached Character_Cache ; Debug Table 0xb.0x6 = 0x196,0x3 0197 4800 |H | Short_Literal 0x0 0198 e403 | | Load 0x2,0x3 0199 e008 | | Load 0x0,0x8 019a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 019b 005a | Z | Store_Top Discrete,At_Offset_2 019c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x7 = 0x19c,0x4 019d 00da | | Load_Top At_Offset_2 019e e009 | | Load 0x0,0x9 019f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01a0 00d1 | | Pop_Control Pop_Count_1 01a1 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x8 = 0x1a1,0x5 01a2 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01a3 e004 | | Load 0x0,0x4 01a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01a5 00da | | Load_Top At_Offset_2 01a6 e009 | | Load 0x0,0x9 01a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01a8 e40e | | Load 0x2,0xe 01a9 e004 | | Load 0x0,0x4 01aa 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01ab c603 | | Store 0x3,0x3 01ac c602 | | Store 0x3,0x2 01ad 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0x9 = 0x1ad,0x6 01ae 4602 |F | Jump_Case 0x3 01af 780f |x | Jump 0x1bf ; case 0x0 01b0 7fe5 | | Jump 0x196 ; case 0x1 01b1 7800 |x | Jump 0x1b2 ; case 0x2 01b2 0092 037d | }| Action Push_String_Extended,0x37d ; "Bad Key, try Again" ; Debug Table 0xb.0xa = 0x1b2,0x7 01b4 8412 | | Call 0x2,0x12 01b5 0092 037e | ~| Action Push_String_Extended,0x37e ; "Enter key: " ; Debug Table 0xb.0xb = 0x1b5,0x8 01b7 8410 | | Call 0x2,0x10 01b8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xc = 0x1b8,0x9 01b9 4820 |H | Short_Literal 0x20 01ba 4800 |H | Short_Literal 0x0 01bb e009 | | Load 0x0,0x9 01bc 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01bd 00d1 | | Pop_Control Pop_Count_1 01be 7fd7 | | Jump 0x196 01bf 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xd = 0x1bf,0xb 01c0 00ca | | Action Exit_Nullary_Function 01c1 0000 0000 | | .BLANK 0000[0x7] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01da | | .CONST 0x01da ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0005 | | .CONST 0x0005 ; Number of locals 01cb INIT_01c8: 01cb e003 | | Load 0x0,0x3 ; Debug Table 0xc = .DEBUG 0x01cb,0x06c2,0x0002,0x0000,0x0041,0x7946,0x0000,0x020d ; Debug Table 0xc.0x0 = 0x1cb,0xffff 01cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01cd 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 01ce e00a | | Load 0x0,0xa ; Debug Table 0xc.0x1 = 0x1ce,0xfffe 01cf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01d0 0322 | " | Declare_Variable Record 01d1 00d8 | | Load_Top At_Offset_0 01d2 1c00 | | Execute_Immediate Run_Utility,0x0 01d3 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x2 = 0x1d3,0xfffd 01d4 4803 |H | Short_Literal 0x3 01d5 e004 | | Load 0x0,0x4 01d6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 01d7 0334 | 4 | Declare_Variable Array,With_Constraint 01d8 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc.0x3 = 0x1d8,0xfffc 01d9 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 01da BODY_01c8: 01da 0092 037f | | Action Push_String_Extended,0x37f ; "Enter Key: " ; Debug Table 0xc.0x4 = 0x1da,0x1 01dc 8410 | | Call 0x2,0x10 01dd 0007 | | Action Break_Optional ; Debug Table 0xc.0x5 = 0x1dd,0x2 01de 8417 | | Call 0x2,0x17 ; Debug Table 0xc.0x6 = 0x1de,0x3 01df 00d9 | | Load_Top At_Offset_1 01e0 00db | | Load_Top At_Offset_3 01e1 01d6 | | Execute Vector,Field_Write 01e2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x7 = 0x1e2,0x4 01e3 00da | | Load_Top At_Offset_2 01e4 01d7 | | Execute Vector,Field_Read 01e5 e40e | | Load 0x2,0xe 01e6 e004 | | Load 0x0,0x4 01e7 1b19 | | Execute Package,Field_Read,Field_Number 0x19 01e8 180f | | Execute Package,Field_Execute,Field_Number 0xf 01e9 8410 | | Call 0x2,0x10 01ea e003 | | Load 0x0,0x3 ; Debug Table 0xc.0x8 = 0x1ea,0x5 01eb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01ec 00db | | Load_Top At_Offset_3 01ed 4801 |H | Short_Literal 0x1 01ee 00db | | Load_Top At_Offset_3 01ef e604 | | Load 0x3,0x4 01f0 01cf | | Execute Vector,Slice_Read 01f1 e40d | | Load 0x2,0xd 01f2 e003 | | Load 0x0,0x3 01f3 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01f4 00d1 | | Pop_Control Pop_Count_1 01f5 c602 | | Store 0x3,0x2 01f6 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x9 = 0x1f6,0x6 01f7 4602 |F | Jump_Case 0x3 01f8 7812 |x | Jump 0x20b ; case 0x0 01f9 780a |x | Jump 0x204 ; case 0x1 01fa 7800 |x | Jump 0x1fb ; case 0x2 01fb 0092 0380 | | Action Push_String_Extended,0x380 ; "Undefined Key Sequence" ; Debug Table 0xc.0xa = 0x1fb,0x7 01fd 8412 | | Call 0x2,0x12 01fe 0092 037f | | Action Push_String_Extended,0x37f ; "Enter Key: " ; Debug Table 0xc.0xb = 0x1fe,0x8 0200 8410 | | Call 0x2,0x10 0201 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0xc = 0x201,0x9 0202 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0203 7fda | | Jump 0x1de 0204 0092 0381 | | Action Push_String_Extended,0x381 ; "." ; Debug Table 0xc.0xd = 0x204,0xa 0206 8410 | | Call 0x2,0x10 0207 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xe = 0x207,0xb 0208 0a01 | | Execute_Immediate Plus,0x1 0209 0059 | Y | Store_Top Discrete,At_Offset_1 020a 7fd3 | | Jump 0x1de 020b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0xf = 0x20b,0xc 020c 00ca | | Action Exit_Nullary_Function 020d 0000 0000 | | .XXX[0x3] 020f 0000 | | 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0226 | & | .CONST 0x0226 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x0213,0x06e4,0x0001,0x0000,0x0041,0x7946,0x0000,0x028f ; Debug Table 0xd.0x0 = 0x213,0x1 0214 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0215 6809 |h | Jump_Zero 0x21f 0216 00da | | Load_Top At_Offset_2 ; Debug Table 0xd.0x1 = 0x216,0x2 0217 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0218 e00b | | Load 0x0,0xb 0219 180d | | Execute Package,Field_Execute,Field_Number 0xd 021a e00b | | Load 0x0,0xb 021b 1b19 | | Execute Package,Field_Read,Field_Number 0x19 021c 180f | | Execute Package,Field_Execute,Field_Number 0xf 021d 8410 | | Call 0x2,0x10 021e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 021f 00da | | Load_Top At_Offset_2 ; Debug Table 0xd.0x2 = 0x21f,0x3 0220 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0221 e00b | | Load 0x0,0xb 0222 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0223 180f | | Execute Package,Field_Execute,Field_Number 0xf 0224 8410 | | Call 0x2,0x10 0225 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0226 TRAP_0210: 0226 0007 | | Action Break_Optional 0227 e007 | | Load 0x0,0x7 ; Debug Table 0xd.0x3 = 0x227,0x4 0228 180d | | Execute Package,Field_Execute,Field_Number 0xd 0229 8412 | | Call 0x2,0x12 022a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 022b 0000 0000 | | .BLANK 0000[0x5] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0239 | 9 | .CONST 0x0239 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0002 | | .CONST 0x0002 ; Number of locals 0233 INIT_0230: 0233 e00a | | Load 0x0,0xa ; Debug Table 0xe = .DEBUG 0x0233,0x06ee,0x0001,0x0000,0x0041,0x7946,0x0000,0x02ce ; Debug Table 0xe.0x0 = 0x233,0xffff 0234 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0235 0322 | " | Declare_Variable Record 0236 8418 | | Call 0x2,0x18 0237 00d9 | | Load_Top At_Offset_1 0238 017d | } | Execute Record,Structure_Write 0239 BODY_0230: 0239 0092 0382 | | Action Push_String_Extended,0x382 ; "Maps to " ; Debug Table 0xe.0x1 = 0x239,0x1 023b 8410 | | Call 0x2,0x10 023c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x2 = 0x23c,0x2 023d 8419 | | Call 0x2,0x19 023e 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x3 = 0x23e,0x3 023f 8413 | | Call 0x2,0x13 0240 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0241 0000 0000 | | .BLANK 0000[0x7] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 0251 | Q | .CONST 0x0251 ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0002 | | .CONST 0x0002 ; Number of locals 024b INIT_0248: 024b 00db | | Load_Top At_Offset_3 ; Debug Table 0xf = .DEBUG 0x024b,0x06f8,0x0001,0x0000,0x0041,0x7946,0x0000,0x02e9 ; Debug Table 0xf.0x0 = 0x24b,0xffff 024c e009 | | Load 0x0,0x9 024d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 024e 1c08 | | Execute_Immediate Run_Utility,0x8 024f 00d8 | | Load_Top At_Offset_0 0250 1c00 | | Execute_Immediate Run_Utility,0x0 0251 BODY_0248: 0251 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x1 = 0x251,0x1 0252 01dc | | Execute Vector,Last 0253 e7ff | | Load 0x3,-0x1 0254 01dd | | Execute Vector,First 0255 0263 | c | Execute Discrete,Above_Bound 0256 7016 |p | Jump_Nonzero 0x26d 0257 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x2 = 0x257,0x2 0258 00d9 | | Load_Top At_Offset_1 0259 e7ff | | Load 0x3,-0x1 025a 01d7 | | Execute Vector,Field_Read 025b e40e | | Load 0x2,0xe 025c e004 | | Load 0x0,0x4 025d 1b19 | | Execute Package,Field_Read,Field_Number 0x19 025e 180f | | Execute Package,Field_Execute,Field_Number 0xf 025f e009 | | Load 0x0,0x9 0260 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0261 00d1 | | Pop_Control Pop_Count_1 0262 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x3 = 0x262,0x3 0263 e7ff | | Load 0x3,-0x1 0264 01dc | | Execute Vector,Last 0265 027e | ~ | Execute Discrete,Not_Equal 0266 6805 |h | Jump_Zero 0x26c 0267 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x4 = 0x267,0x4 0268 482e |H. | Short_Literal 0x2e 0269 e009 | | Load 0x0,0x9 026a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 026b 00d1 | | Pop_Control Pop_Count_1 026c 3fea |? | Loop_Increasing 0x257 026d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x5 = 0x26d,0x5 026e 4820 |H | Short_Literal 0x20 026f e7fe | | Load 0x3,-0x2 0270 e009 | | Load 0x0,0x9 0271 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0272 00d1 | | Pop_Control Pop_Count_1 0273 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x6 = 0x273,0x6 0274 e009 | | Load 0x0,0x9 0275 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0276 8410 | | Call 0x2,0x10 0277 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 0282 | | .CONST 0x0282 ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0003 | | .CONST 0x0003 ; Number of locals 027b INIT_0278: 027b e003 | | Load 0x0,0x3 ; Debug Table 0x10 = .DEBUG 0x027b,0x0708,0x0001,0x0000,0x0041,0x7946,0x0000,0x0343 ; Debug Table 0x10.0x0 = 0x27b,0xffff 027c 1b17 | | Execute Package,Field_Read,Field_Number 0x17 027d 02c7 | | Declare_Variable Any 027e 00d8 | | Load_Top At_Offset_0 027f 1c00 | | Execute_Immediate Run_Utility,0x0 0280 029f 034b | K| Declare_Subprogram INIT_0348,For_Call ; Debug Table 0x10.0x1 = 0x280,0xfffe 0282 BODY_0278: 0282 0092 0383 | | Action Push_String_Extended,0x383 ; "List of Key to Command Mapping" ; Debug Table 0x10.0x2 = 0x282,0x1 0284 8412 | | Call 0x2,0x12 0285 0092 0384 | | Action Push_String_Extended,0x384 ; "------------------------------" ; Debug Table 0x10.0x3 = 0x285,0x2 0287 8412 | | Call 0x2,0x12 0288 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x4 = 0x288,0x3 0289 0120 | | Execute Any,Is_Value 028a 6803 |h | Jump_Zero 0x28e 028b e003 | | Load 0x0,0x3 028c 1b17 | | Execute Package,Field_Read,Field_Number 0x17 028d 7801 |x | Jump 0x28f 028e 00d9 | | Load_Top At_Offset_1 028f e40d | | Load 0x2,0xd 0290 e003 | | Load 0x0,0x3 0291 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0292 c602 | | Store 0x3,0x2 0293 7808 |x | Jump 0x29c 0294 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x5 = 0x294,0x5 0295 e003 | | Load 0x0,0x3 0296 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0297 8603 | | Call 0x3,0x3 0298 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x6 = 0x298,0x6 0299 e003 | | Load 0x0,0x3 029a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 029b c602 | | Store 0x3,0x2 029c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x7 = 0x29c,0x4 029d e003 | | Load 0x0,0x3 029e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 029f 6ff4 |o | Jump_Zero 0x294 02a0 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x8 = 0x2a0,0x7 02a1 8413 | | Call 0x2,0x13 02a2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02a3 0000 0000 | | .BLANK 0000[0x5] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 0092 0385 | | Action Push_String_Extended,0x385 ; "Not implemented" ; Debug Table 0x11 = .DEBUG 0x02ab,0x071c,0x0001,0x0000,0x0041,0x7946,0x0000,0x03c0 ; Debug Table 0x11.0x0 = 0x2ab,0x1 02ad 8412 | | Call 0x2,0x12 02ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02af 0000 | | .XXX[0x1] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 4801 |H | Short_Literal 0x1 ; Debug Table 0x12 = .DEBUG 0x02b3,0x0720,0x0001,0x0000,0x0041,0x7946,0x0000,0x03cc ; Debug Table 0x12.0x0 = 0x2b3,0x1 02b4 8413 | | Call 0x2,0x13 02b5 0092 0386 | | Action Push_String_Extended,0x386 ; "Valid commands are:" ; Debug Table 0x12.0x1 = 0x2b5,0x2 02b7 8412 | | Call 0x2,0x12 02b8 0092 0387 | | Action Push_String_Extended,0x387 ; " echo echo a key and command." ; Debug Table 0x12.0x2 = 0x2b8,0x3 02ba 8412 | | Call 0x2,0x12 02bb 0092 0388 | | Action Push_String_Extended,0x388 ; " define map a key to command." ; Debug Table 0x12.0x3 = 0x2bb,0x4 02bd 8412 | | Call 0x2,0x12 02be 0092 0389 | | Action Push_String_Extended,0x389 ; " list list all keys and commands." ; Debug Table 0x12.0x4 = 0x2be,0x5 02c0 8412 | | Call 0x2,0x12 02c1 0092 038a | | Action Push_String_Extended,0x38a ; " page_mode off or on." ; Debug Table 0x12.0x5 = 0x2c1,0x6 02c3 8412 | | Call 0x2,0x12 02c4 0092 038b | | Action Push_String_Extended,0x38b ; " term_length currently is " ; Debug Table 0x12.0x6 = 0x2c4,0x7 02c6 e405 | | Load 0x2,0x5 02c7 00e0 | | Load_Encached Standard_Cache 02c8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02c9 01cc | | Execute Vector,Catenate 02ca 0092 0381 | | Action Push_String_Extended,0x381 ; "." 02cc 01cc | | Execute Vector,Catenate 02cd 8412 | | Call 0x2,0x12 02ce 0092 038c | | Action Push_String_Extended,0x38c ; " line_length currently is " ; Debug Table 0x12.0x7 = 0x2ce,0x8 02d0 e409 | | Load 0x2,0x9 02d1 00e0 | | Load_Encached Standard_Cache 02d2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02d3 01cc | | Execute Vector,Catenate 02d4 0092 0381 | | Action Push_String_Extended,0x381 ; "." 02d6 01cc | | Execute Vector,Catenate 02d7 8412 | | Call 0x2,0x12 02d8 0092 038d | | Action Push_String_Extended,0x38d ; " quit exit." ; Debug Table 0x12.0x8 = 0x2d8,0x9 02da 8412 | | Call 0x2,0x12 02db 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x9 = 0x2db,0xa 02dc 8413 | | Call 0x2,0x13 02dd 0092 038e | | Action Push_String_Extended,0x38e ; "Type command, followed by CR." ; Debug Table 0x12.0xa = 0x2dd,0xb 02df 8412 | | Call 0x2,0x12 02e0 0092 038f | | Action Push_String_Extended,0x38f ; "You will be prompted for arguments." ; Debug Table 0x12.0xb = 0x2e0,0xc 02e2 8412 | | Call 0x2,0x12 02e3 0092 0390 | | Action Push_String_Extended,0x390 ; "When -- MORE -- is seen, type 'n' to exit, " ; Debug Table 0x12.0xc = 0x2e3,0xd 02e5 8412 | | Call 0x2,0x12 02e6 0092 0391 | | Action Push_String_Extended,0x391 ; " any other character to continue." ; Debug Table 0x12.0xd = 0x2e6,0xe 02e8 8412 | | Call 0x2,0x12 02e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02ea 0000 0000 | | .XXX[0x2] 02ec 0000 0000 | | .LITERAL {0x00000000, 0x41794601} 02f0 2920 2020 |) | .LITERAL {0x29202020, 0x20202020} 02f4 0000 0000 | | .BLANK 0000[0x4] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fb | | .CONST 0x02fb ; Address of begin 02f9 033b | ; | .CONST 0x033b ; Address of exception handler 02fa 0001 | | .CONST 0x0001 ; Number of locals 02fb BODY_02f8: 02fb INIT_02f8: 02fb 4801 |H | Short_Literal 0x1 ; Debug Table 0x13 = .DEBUG 0x02fb,0x073e,0x0004,0x0000,0x0041,0x7946,0x0000,0x04e6 ; Debug Table 0x13.0x0 = 0x2fb,0x1 02fc 8413 | | Call 0x2,0x13 02fd 0092 0392 | | Action Push_String_Extended,0x392 ; "command: " ; Debug Table 0x13.0x1 = 0x2fd,0x2 02ff 8410 | | Call 0x2,0x10 0300 8414 | | Call 0x2,0x14 ; Debug Table 0x13.0x2 = 0x300,0x3 0301 8416 | | Call 0x2,0x16 0302 4609 |F | Jump_Case 0xa 0303 7809 |x | Jump 0x30d ; case 0x0 0304 780c |x | Jump 0x311 ; case 0x1 0305 7809 |x | Jump 0x30f ; case 0x2 0306 7829 |x) | Jump 0x330 ; case 0x3 0307 780b |x | Jump 0x313 ; case 0x4 0308 7818 |x | Jump 0x321 ; case 0x5 0309 7820 |x | Jump 0x32a ; case 0x6 030a 7827 |x' | Jump 0x332 ; case 0x7 030b 782b |x+ | Jump 0x337 ; case 0x8 030c 782a |x* | Jump 0x337 ; case 0x9 030d 841a | | Call 0x2,0x1a ; Debug Table 0x13.0x3 = 0x30d,0x4 030e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 030f 841c | | Call 0x2,0x1c ; Debug Table 0x13.0x4 = 0x30f,0x5 0310 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0311 841d | | Call 0x2,0x1d ; Debug Table 0x13.0x5 = 0x311,0x6 0312 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0313 0092 0393 | | Action Push_String_Extended,0x393 ; "on or off: " ; Debug Table 0x13.0x6 = 0x313,0x7 0315 8410 | | Call 0x2,0x10 0316 8414 | | Call 0x2,0x14 ; Debug Table 0x13.0x7 = 0x316,0x8 0317 e40c | | Load 0x2,0xc 0318 00e0 | | Load_Encached Standard_Cache 0319 181b | | Execute Package,Field_Execute,Field_Number 0x1b 031a 7003 |p | Jump_Nonzero 0x31e 031b 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x8 = 0x31b,0x9 031c a407 | | Store_Unchecked 0x2,0x7 031d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 031e 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x9 = 0x31e,0xa 031f a407 | | Store_Unchecked 0x2,0x7 0320 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0321 0092 0394 | | Action Push_String_Extended,0x394 ; "lines: " ; Debug Table 0x13.0xa = 0x321,0xb 0323 8410 | | Call 0x2,0x10 0324 8415 | | Call 0x2,0x15 ; Debug Table 0x13.0xb = 0x324,0xc 0325 c405 | | Store 0x2,0x5 0326 e405 | | Load 0x2,0x5 ; Debug Table 0x13.0xc = 0x326,0xd 0327 0afd | | Execute_Immediate Plus,-0x3 0328 c406 | | Store 0x2,0x6 0329 4501 |E | Exit_Suprogram New_Top_Offset 0x1 032a 0092 0395 | | Action Push_String_Extended,0x395 ; "columns: " ; Debug Table 0x13.0xd = 0x32a,0xe 032c 8410 | | Call 0x2,0x10 032d 8415 | | Call 0x2,0x15 ; Debug Table 0x13.0xe = 0x32d,0xf 032e c409 | | Store 0x2,0x9 032f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0330 841e | | Call 0x2,0x1e ; Debug Table 0x13.0xf = 0x330,0x10 0331 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0332 0092 0396 | | Action Push_String_Extended,0x396 ; "bye." ; Debug Table 0x13.0x10 = 0x332,0x11 0334 8412 | | Call 0x2,0x12 0335 00cc | | Action Pop_Block ; Debug Table 0x13.0x11 = 0x335,0x12 0336 7d70 |}p | Jump 0xa7 0337 0092 0397 | | Action Push_String_Extended,0x397 ; "unknow command, type help for a command list." ; Debug Table 0x13.0x12 = 0x337,0x13 0339 8412 | | Call 0x2,0x12 033a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 033b TRAP_02f8: 033b 67b0 |g | Indirect_Literal Discrete,0x2ec,{0x00000000, 0x41794601} 033c 010f | | Execute Exception,Equal 033d 6801 |h | Jump_Zero 0x33f 033e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x13.0x13 = 0x33e,0x14 033f 0092 0398 | | Action Push_String_Extended,0x398 ; "Prior command failed:" ; Debug Table 0x13.0x14 = 0x33f,0x15 0341 8412 | | Call 0x2,0x12 0342 e007 | | Load 0x0,0x7 ; Debug Table 0x13.0x15 = 0x342,0x16 0343 180d | | Execute Package,Field_Execute,Field_Number 0xd 0344 8412 | | Call 0x2,0x12 0345 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0346 0000 0000 | | .XXX[0x2] 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 0352 | R | .CONST 0x0352 ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0003 | | .CONST 0x0003 ; Number of locals 034b INIT_0348: 034b e00a | | Load 0x0,0xa ; Debug Table 0x14 = .DEBUG 0x034b,0x076c,0x0001,0x0000,0x0041,0x7946,0x0000,0x034d ; Debug Table 0x14.0x0 = 0x34b,0xffff 034c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 034d 0322 | " | Declare_Variable Record 034e 00d8 | | Load_Top At_Offset_0 034f 1c00 | | Execute_Immediate Run_Utility,0x0 0350 e003 | | Load 0x0,0x3 ; Debug Table 0x14.0x1 = 0x350,0xfffe 0351 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0352 BODY_0348: 0352 4828 |H( | Short_Literal 0x28 ; Debug Table 0x14.0x2 = 0x352,0x1 0353 e9ff | | Load 0x4,-0x1 0354 841b | | Call 0x2,0x1b 0355 e003 | | Load 0x0,0x3 ; Debug Table 0x14.0x3 = 0x355,0x2 0356 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0357 00da | | Load_Top At_Offset_2 0358 e9ff | | Load 0x4,-0x1 0359 e40d | | Load 0x2,0xd 035a e003 | | Load 0x0,0x3 035b 1816 | | Execute Package,Field_Execute,Field_Number 0x16 035c 00d1 | | Pop_Control Pop_Count_1 035d 0059 | Y | Store_Top Discrete,At_Offset_1 035e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x4 = 0x35e,0x3 035f 4602 |F | Jump_Case 0x3 0360 7802 |x | Jump 0x363 ; case 0x0 0361 7806 |x | Jump 0x368 ; case 0x1 0362 7805 |x | Jump 0x368 ; case 0x2 0363 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x5 = 0x363,0x4 0364 8419 | | Call 0x2,0x19 0365 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x6 = 0x365,0x5 0366 8413 | | Call 0x2,0x13 0367 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0368 0092 0399 | | Action Push_String_Extended,0x399 ; "maps to no known command" ; Debug Table 0x14.0x7 = 0x368,0x6 036a 8412 | | Call 0x2,0x12 036b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 036c ; -------------------------------------------------------------------------------------- 036c ; STRING TABLE 036c ; -------------------------------------------------------------------------------------- 036c 005e | ^ | .STRTAB 0x005e->0x039b ; "ECHO" 036d 0060 | ` | .STRTAB 0x0060->0x039d ; "DEFINE" 036e 0064 | d | .STRTAB 0x0064->0x03a0 ; "LIST" 036f 0066 | f | .STRTAB 0x0066->0x03a2 ; "HELP" 0370 0068 | h | .STRTAB 0x0068->0x03a4 ; "PAGE_MODE" 0371 006f | o | .STRTAB 0x006f->0x03a8 ; "TERM_LENGTH" 0372 0078 | x | .STRTAB 0x0078->0x03ae ; "LINE_LENGTH" 0373 0081 | | .STRTAB 0x0081->0x03b3 ; "QUIT" 0374 0083 | | .STRTAB 0x0083->0x03b5 ; "TERM_TYPE" 0375 008a | | .STRTAB 0x008a->0x03ba ; "NONE" 0376 008c | | .STRTAB 0x008c->0x03bc ; "ON" 0377 008c | | .STRTAB 0x008c->0x03bd ; "OFF" 0378 008d | | .STRTAB 0x008d->0x03be ; "Key_Test: Core Editor Key Test." 0379 00aa | | .STRTAB 0x00aa->0x03ce ; "Type help for a command list." 037a 00c5 | | .STRTAB 0x00c5->0x03dc ; "terminal: " 037b 00cd | | .STRTAB 0x00cd->0x03e1 ; "Massive failure " 037c 00db | | .STRTAB 0x00db->0x03e9 ; "-- MORE --" 037d 00e3 | | .STRTAB 0x00e3->0x03ee ; "Bad Key, try Again" 037e 00f3 | | .STRTAB 0x00f3->0x03f7 ; "Enter key: " 037f 00fc | | .STRTAB 0x00fc->0x03fd ; "Enter Key: " 0380 0105 | | .STRTAB 0x0105->0x0402 ; "Undefined Key Sequence" 0381 0119 | | .STRTAB 0x0119->0x040d ; "." 0382 0118 | | .STRTAB 0x0118->0x040e ; "Maps to " 0383 011e | | .STRTAB 0x011e->0x0412 ; "List of Key to Command Mapping" 0384 013a | : | .STRTAB 0x013a->0x0421 ; "------------------------------" 0385 0156 | V | .STRTAB 0x0156->0x0430 ; "Not implemented" 0386 0163 | c | .STRTAB 0x0163->0x0437 ; "Valid commands are:" 0387 0174 | t | .STRTAB 0x0174->0x0441 ; " echo echo a key and command." 0388 019b | | .STRTAB 0x019b->0x0455 ; " define map a key to command." 0389 01c0 | | .STRTAB 0x01c0->0x0469 ; " list list all keys and commands." 038a 01eb | | .STRTAB 0x01eb->0x047f ; " page_mode off or on." 038b 0205 | | .STRTAB 0x0205->0x048d ; " term_length currently is " 038c 0222 | " | .STRTAB 0x0222->0x049d ; " line_length currently is " 038d 023f | ? | .STRTAB 0x023f->0x04ac ; " quit exit." 038e 0254 | T | .STRTAB 0x0254->0x04b8 ; "Type command, followed by CR." 038f 026f | o | .STRTAB 0x026f->0x04c6 ; "You will be prompted for arguments." 0390 0290 | | .STRTAB 0x0290->0x04d8 ; "When -- MORE -- is seen, type 'n' to exit, " 0391 02b9 | | .STRTAB 0x02b9->0x04ed ; " any other character to continue." 0392 02f0 | | .STRTAB 0x02f0->0x050a ; "command: " 0393 02f7 | | .STRTAB 0x02f7->0x050e ; "on or off: " 0394 0300 | | .STRTAB 0x0300->0x0514 ; "lines: " 0395 0305 | | .STRTAB 0x0305->0x0517 ; "columns: " 0396 030c | | .STRTAB 0x030c->0x051c ; "bye." 0397 030e | | .STRTAB 0x030e->0x051e ; "unknow command, type help for a command list." 0398 0339 | 9 | .STRTAB 0x0339->0x0534 ; "Prior command failed:" 0399 034c | L | .STRTAB 0x034c->0x053f ; "maps to no known command" 039a 0362 | b | .STREND 0x0362->0x054b 039b 4543 484f |ECHO| .STRTAB_STRINGS 054b 0000 0000 | | .BLANK 0000[0x5] 0550 ; -------------------------------------------------------------------------------------- 0550 ; Debug Table 0550 ; -------------------------------------------------------------------------------------- 0550 0003 0015 | | .CONST 0x0003,0x0015 0552 000b 05fa | | .DEBUG 0x000b,0x05fa,0x8000,0x0000,0x0041,0x7946,0x0000,0x0015 055a 001b 05fc | | .DEBUG 0x001b,0x05fc,0x8001,0x0000,0x0041,0x7946,0x0000,0x0015 0562 00c3 065c | \| .DEBUG 0x00c3,0x065c,0x0005,0x0000,0x0041,0x7946,0x0000,0x006d 056a 00db 065e | ^| .DEBUG 0x00db,0x065e,0x0005,0x0000,0x0041,0x7946,0x0000,0x007b 0572 00f3 0660 | `| .DEBUG 0x00f3,0x0660,0x0001,0x0000,0x0041,0x7946,0x0000,0x0096 057a 0103 0666 | f| .DEBUG 0x0103,0x0666,0x0001,0x0000,0x0041,0x7946,0x0000,0x00b3 0582 012b 067c | + || .DEBUG 0x012b,0x067c,0x0001,0x0000,0x0041,0x7946,0x0000,0x00fc 058a 013b 0686 | ; | .DEBUG 0x013b,0x0686,0x0001,0x0000,0x0041,0x7946,0x0000,0x0122 0592 014b 068e | K | .DEBUG 0x014b,0x068e,0x0002,0x0000,0x0041,0x7946,0x0000,0x013f 059a 016b 069a | k | .DEBUG 0x016b,0x069a,0x0002,0x0000,0x0041,0x7946,0x0000,0x016c 05a2 0173 069e | s | .DEBUG 0x0173,0x069e,0x0002,0x0000,0x0041,0x7946,0x0000,0x017b 05aa 0183 06a4 | | .DEBUG 0x0183,0x06a4,0x0002,0x0000,0x0041,0x7946,0x0000,0x0194 05b2 01cb 06c2 | | .DEBUG 0x01cb,0x06c2,0x0002,0x0000,0x0041,0x7946,0x0000,0x020d 05ba 0213 06e4 | | .DEBUG 0x0213,0x06e4,0x0001,0x0000,0x0041,0x7946,0x0000,0x028f 05c2 0233 06ee | 3 | .DEBUG 0x0233,0x06ee,0x0001,0x0000,0x0041,0x7946,0x0000,0x02ce 05ca 024b 06f8 | K | .DEBUG 0x024b,0x06f8,0x0001,0x0000,0x0041,0x7946,0x0000,0x02e9 05d2 027b 0708 | { | .DEBUG 0x027b,0x0708,0x0001,0x0000,0x0041,0x7946,0x0000,0x0343 05da 02ab 071c | | .DEBUG 0x02ab,0x071c,0x0001,0x0000,0x0041,0x7946,0x0000,0x03c0 05e2 02b3 0720 | | .DEBUG 0x02b3,0x0720,0x0001,0x0000,0x0041,0x7946,0x0000,0x03cc 05ea 02fb 073e | >| .DEBUG 0x02fb,0x073e,0x0004,0x0000,0x0041,0x7946,0x0000,0x04e6 05f2 034b 076c | K l| .DEBUG 0x034b,0x076c,0x0001,0x0000,0x0041,0x7946,0x0000,0x034d 05fa ; -------------------------------------------------------------------------------------- 05fa ; Debug3 Subtable 0x0 05fa ; -------------------------------------------------------------------------------------- 05fa 0000 0000 | | .DBG3TAB 0x0000,0x0000 05fc ; -------------------------------------------------------------------------------------- 05fc ; Debug3 Subtable 0x1 05fc ; -------------------------------------------------------------------------------------- 05fc 001f 0010 | | .DBG3TAB 0x001f,0x0010 05fe 001b ffff | | .CONST 0x001b,0xffff 0600 001c fffe | | .CONST 0x001c,0xfffe 0602 0027 fffd | ' | .CONST 0x0027,0xfffd 0604 002c fffc | , | .CONST 0x002c,0xfffc 0606 002d fffb | - | .CONST 0x002d,0xfffb 0608 002f fffa | / | .CONST 0x002f,0xfffa 060a 0033 fff9 | 3 | .CONST 0x0033,0xfff9 060c 0035 fff8 | 5 | .CONST 0x0035,0xfff8 060e 0037 fff7 | 7 | .CONST 0x0037,0xfff7 0610 0039 fff6 | 9 | .CONST 0x0039,0xfff6 0612 003e fff5 | > | .CONST 0x003e,0xfff5 0614 003f fff4 | ? | .CONST 0x003f,0xfff4 0616 0044 fff3 | D | .CONST 0x0044,0xfff3 0618 0049 fff2 | I | .CONST 0x0049,0xfff2 061a 004e fff1 | N | .CONST 0x004e,0xfff1 061c 0053 fff0 | S | .CONST 0x0053,0xfff0 061e 0055 ffef | U | .CONST 0x0055,0xffef 0620 0057 ffee | W | .CONST 0x0057,0xffee 0622 0059 ffed | Y | .CONST 0x0059,0xffed 0624 005b ffec | [ | .CONST 0x005b,0xffec 0626 005d ffeb | ] | .CONST 0x005d,0xffeb 0628 005f ffea | _ | .CONST 0x005f,0xffea 062a 0061 ffe9 | a | .CONST 0x0061,0xffe9 062c 0063 ffe8 | c | .CONST 0x0063,0xffe8 062e 0065 ffe7 | e | .CONST 0x0065,0xffe7 0630 0067 ffe6 | g | .CONST 0x0067,0xffe6 0632 0069 ffe5 | i | .CONST 0x0069,0xffe5 0634 006b ffe4 | k | .CONST 0x006b,0xffe4 0636 006d ffe3 | m | .CONST 0x006d,0xffe3 0638 006f ffe2 | o | .CONST 0x006f,0xffe2 063a 0071 ffe1 | q | .CONST 0x0071,0xffe1 063c 0075 0001 | u | .CONST 0x0075,0x0001 063e 0085 0002 | | .CONST 0x0085,0x0002 0640 0087 0003 | | .CONST 0x0087,0x0003 0642 008a 0004 | | .CONST 0x008a,0x0004 0644 008d 0005 | | .CONST 0x008d,0x0005 0646 008f 0006 | | .CONST 0x008f,0x0006 0648 0092 0007 | | .CONST 0x0092,0x0007 064a 0098 0008 | | .CONST 0x0098,0x0008 064c 009c 0009 | | .CONST 0x009c,0x0009 064e 00a0 000a | | .CONST 0x00a0,0x000a 0650 00a4 000b | | .CONST 0x00a4,0x000b 0652 00a5 000c | | .CONST 0x00a5,0x000c 0654 00a7 000d | | .CONST 0x00a7,0x000d 0656 00af 000e | | .CONST 0x00af,0x000e 0658 00b2 000f | | .CONST 0x00b2,0x000f 065a 00b5 0010 | | .CONST 0x00b5,0x0010 065c ; -------------------------------------------------------------------------------------- 065c ; Debug3 Subtable 0x2 065c ; -------------------------------------------------------------------------------------- 065c 0000 0000 | | .DBG3TAB 0x0000,0x0000 065e ; -------------------------------------------------------------------------------------- 065e ; Debug3 Subtable 0x3 065e ; -------------------------------------------------------------------------------------- 065e 0000 0000 | | .DBG3TAB 0x0000,0x0000 0660 ; -------------------------------------------------------------------------------------- 0660 ; Debug3 Subtable 0x4 0660 ; -------------------------------------------------------------------------------------- 0660 0000 0002 | | .DBG3TAB 0x0000,0x0002 0662 00f3 0001 | | .CONST 0x00f3,0x0001 0664 00f7 0002 | | .CONST 0x00f7,0x0002 0666 ; -------------------------------------------------------------------------------------- 0666 ; Debug3 Subtable 0x5 0666 ; -------------------------------------------------------------------------------------- 0666 0001 0009 | | .DBG3TAB 0x0001,0x0009 0668 0103 ffff | | .CONST 0x0103,0xffff 066a 0104 0001 | | .CONST 0x0104,0x0001 066c 010a 0002 | | .CONST 0x010a,0x0002 066e 010d 0003 | | .CONST 0x010d,0x0003 0670 0112 0004 | | .CONST 0x0112,0x0004 0672 0118 0005 | | .CONST 0x0118,0x0005 0674 011a 0006 | | .CONST 0x011a,0x0006 0676 011d 0007 | | .CONST 0x011d,0x0007 0678 0120 0008 | | .CONST 0x0120,0x0008 067a 0123 0009 | # | .CONST 0x0123,0x0009 067c ; -------------------------------------------------------------------------------------- 067c ; Debug3 Subtable 0x6 067c ; -------------------------------------------------------------------------------------- 067c 0000 0004 | | .DBG3TAB 0x0000,0x0004 067e 012b 0001 | + | .CONST 0x012b,0x0001 0680 012c 0002 | , | .CONST 0x012c,0x0002 0682 0130 0003 | 0 | .CONST 0x0130,0x0003 0684 0134 0004 | 4 | .CONST 0x0134,0x0004 0686 ; -------------------------------------------------------------------------------------- 0686 ; Debug3 Subtable 0x7 0686 ; -------------------------------------------------------------------------------------- 0686 0000 0003 | | .DBG3TAB 0x0000,0x0003 0688 013b 0001 | ; | .CONST 0x013b,0x0001 068a 013f 0002 | ? | .CONST 0x013f,0x0002 068c 0140 0003 | @ | .CONST 0x0140,0x0003 068e ; -------------------------------------------------------------------------------------- 068e ; Debug3 Subtable 0x8 068e ; -------------------------------------------------------------------------------------- 068e 0002 0003 | | .DBG3TAB 0x0002,0x0003 0690 014b ffff | K | .CONST 0x014b,0xffff 0692 014f fffe | O | .CONST 0x014f,0xfffe 0694 0151 0001 | Q | .CONST 0x0151,0x0001 0696 0153 0002 | S | .CONST 0x0153,0x0002 0698 015b 0003 | [ | .CONST 0x015b,0x0003 069a ; -------------------------------------------------------------------------------------- 069a ; Debug3 Subtable 0x9 069a ; -------------------------------------------------------------------------------------- 069a 0000 0001 | | .DBG3TAB 0x0000,0x0001 069c 016b 0001 | k | .CONST 0x016b,0x0001 069e ; -------------------------------------------------------------------------------------- 069e ; Debug3 Subtable 0xa 069e ; -------------------------------------------------------------------------------------- 069e 0000 0002 | | .DBG3TAB 0x0000,0x0002 06a0 0173 0001 | s | .CONST 0x0173,0x0001 06a2 0179 0002 | y | .CONST 0x0179,0x0002 06a4 ; -------------------------------------------------------------------------------------- 06a4 ; Debug3 Subtable 0xb 06a4 ; -------------------------------------------------------------------------------------- 06a4 0004 000a | | .DBG3TAB 0x0004,0x000a 06a6 0183 ffff | | .CONST 0x0183,0xffff 06a8 0186 fffe | | .CONST 0x0186,0xfffe 06aa 0188 fffd | | .CONST 0x0188,0xfffd 06ac 0189 fffc | | .CONST 0x0189,0xfffc 06ae 018f 0001 | | .CONST 0x018f,0x0001 06b0 0195 0002 | | .CONST 0x0195,0x0002 06b2 0196 0003 | | .CONST 0x0196,0x0003 06b4 019c 0004 | | .CONST 0x019c,0x0004 06b6 01a1 0005 | | .CONST 0x01a1,0x0005 06b8 01ad 0006 | | .CONST 0x01ad,0x0006 06ba 01b2 0007 | | .CONST 0x01b2,0x0007 06bc 01b5 0008 | | .CONST 0x01b5,0x0008 06be 01b8 0009 | | .CONST 0x01b8,0x0009 06c0 01bf 000b | | .CONST 0x01bf,0x000b 06c2 ; -------------------------------------------------------------------------------------- 06c2 ; Debug3 Subtable 0xc 06c2 ; -------------------------------------------------------------------------------------- 06c2 0004 000c | | .DBG3TAB 0x0004,0x000c 06c4 01cb ffff | | .CONST 0x01cb,0xffff 06c6 01ce fffe | | .CONST 0x01ce,0xfffe 06c8 01d3 fffd | | .CONST 0x01d3,0xfffd 06ca 01d8 fffc | | .CONST 0x01d8,0xfffc 06cc 01da 0001 | | .CONST 0x01da,0x0001 06ce 01dd 0002 | | .CONST 0x01dd,0x0002 06d0 01de 0003 | | .CONST 0x01de,0x0003 06d2 01e2 0004 | | .CONST 0x01e2,0x0004 06d4 01ea 0005 | | .CONST 0x01ea,0x0005 06d6 01f6 0006 | | .CONST 0x01f6,0x0006 06d8 01fb 0007 | | .CONST 0x01fb,0x0007 06da 01fe 0008 | | .CONST 0x01fe,0x0008 06dc 0201 0009 | | .CONST 0x0201,0x0009 06de 0204 000a | | .CONST 0x0204,0x000a 06e0 0207 000b | | .CONST 0x0207,0x000b 06e2 020b 000c | | .CONST 0x020b,0x000c 06e4 ; -------------------------------------------------------------------------------------- 06e4 ; Debug3 Subtable 0xd 06e4 ; -------------------------------------------------------------------------------------- 06e4 0000 0004 | | .DBG3TAB 0x0000,0x0004 06e6 0213 0001 | | .CONST 0x0213,0x0001 06e8 0216 0002 | | .CONST 0x0216,0x0002 06ea 021f 0003 | | .CONST 0x021f,0x0003 06ec 0227 0004 | ' | .CONST 0x0227,0x0004 06ee ; -------------------------------------------------------------------------------------- 06ee ; Debug3 Subtable 0xe 06ee ; -------------------------------------------------------------------------------------- 06ee 0001 0003 | | .DBG3TAB 0x0001,0x0003 06f0 0233 ffff | 3 | .CONST 0x0233,0xffff 06f2 0239 0001 | 9 | .CONST 0x0239,0x0001 06f4 023c 0002 | < | .CONST 0x023c,0x0002 06f6 023e 0003 | > | .CONST 0x023e,0x0003 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; Debug3 Subtable 0xf 06f8 ; -------------------------------------------------------------------------------------- 06f8 0001 0006 | | .DBG3TAB 0x0001,0x0006 06fa 024b ffff | K | .CONST 0x024b,0xffff 06fc 0251 0001 | Q | .CONST 0x0251,0x0001 06fe 0257 0002 | W | .CONST 0x0257,0x0002 0700 0262 0003 | b | .CONST 0x0262,0x0003 0702 0267 0004 | g | .CONST 0x0267,0x0004 0704 026d 0005 | m | .CONST 0x026d,0x0005 0706 0273 0006 | s | .CONST 0x0273,0x0006 0708 ; -------------------------------------------------------------------------------------- 0708 ; Debug3 Subtable 0x10 0708 ; -------------------------------------------------------------------------------------- 0708 0002 0007 | | .DBG3TAB 0x0002,0x0007 070a 027b ffff | { | .CONST 0x027b,0xffff 070c 0280 fffe | | .CONST 0x0280,0xfffe 070e 0282 0001 | | .CONST 0x0282,0x0001 0710 0285 0002 | | .CONST 0x0285,0x0002 0712 0288 0003 | | .CONST 0x0288,0x0003 0714 0294 0005 | | .CONST 0x0294,0x0005 0716 0298 0006 | | .CONST 0x0298,0x0006 0718 029c 0004 | | .CONST 0x029c,0x0004 071a 02a0 0007 | | .CONST 0x02a0,0x0007 071c ; -------------------------------------------------------------------------------------- 071c ; Debug3 Subtable 0x11 071c ; -------------------------------------------------------------------------------------- 071c 0000 0001 | | .DBG3TAB 0x0000,0x0001 071e 02ab 0001 | | .CONST 0x02ab,0x0001 0720 ; -------------------------------------------------------------------------------------- 0720 ; Debug3 Subtable 0x12 0720 ; -------------------------------------------------------------------------------------- 0720 0000 000e | | .DBG3TAB 0x0000,0x000e 0722 02b3 0001 | | .CONST 0x02b3,0x0001 0724 02b5 0002 | | .CONST 0x02b5,0x0002 0726 02b8 0003 | | .CONST 0x02b8,0x0003 0728 02bb 0004 | | .CONST 0x02bb,0x0004 072a 02be 0005 | | .CONST 0x02be,0x0005 072c 02c1 0006 | | .CONST 0x02c1,0x0006 072e 02c4 0007 | | .CONST 0x02c4,0x0007 0730 02ce 0008 | | .CONST 0x02ce,0x0008 0732 02d8 0009 | | .CONST 0x02d8,0x0009 0734 02db 000a | | .CONST 0x02db,0x000a 0736 02dd 000b | | .CONST 0x02dd,0x000b 0738 02e0 000c | | .CONST 0x02e0,0x000c 073a 02e3 000d | | .CONST 0x02e3,0x000d 073c 02e6 000e | | .CONST 0x02e6,0x000e 073e ; -------------------------------------------------------------------------------------- 073e ; Debug3 Subtable 0x13 073e ; -------------------------------------------------------------------------------------- 073e 0000 0016 | | .DBG3TAB 0x0000,0x0016 0740 02fb 0001 | | .CONST 0x02fb,0x0001 0742 02fd 0002 | | .CONST 0x02fd,0x0002 0744 0300 0003 | | .CONST 0x0300,0x0003 0746 030d 0004 | | .CONST 0x030d,0x0004 0748 030f 0005 | | .CONST 0x030f,0x0005 074a 0311 0006 | | .CONST 0x0311,0x0006 074c 0313 0007 | | .CONST 0x0313,0x0007 074e 0316 0008 | | .CONST 0x0316,0x0008 0750 031b 0009 | | .CONST 0x031b,0x0009 0752 031e 000a | | .CONST 0x031e,0x000a 0754 0321 000b | ! | .CONST 0x0321,0x000b 0756 0324 000c | $ | .CONST 0x0324,0x000c 0758 0326 000d | & | .CONST 0x0326,0x000d 075a 032a 000e | * | .CONST 0x032a,0x000e 075c 032d 000f | - | .CONST 0x032d,0x000f 075e 0330 0010 | 0 | .CONST 0x0330,0x0010 0760 0332 0011 | 2 | .CONST 0x0332,0x0011 0762 0335 0012 | 5 | .CONST 0x0335,0x0012 0764 0337 0013 | 7 | .CONST 0x0337,0x0013 0766 033e 0014 | > | .CONST 0x033e,0x0014 0768 033f 0015 | ? | .CONST 0x033f,0x0015 076a 0342 0016 | B | .CONST 0x0342,0x0016 076c ; -------------------------------------------------------------------------------------- 076c ; Debug3 Subtable 0x14 076c ; -------------------------------------------------------------------------------------- 076c 0002 0006 | | .DBG3TAB 0x0002,0x0006 076e 034b ffff | K | .CONST 0x034b,0xffff 0770 0350 fffe | P | .CONST 0x0350,0xfffe 0772 0352 0001 | R | .CONST 0x0352,0x0001 0774 0355 0002 | U | .CONST 0x0355,0x0002 0776 035e 0003 | ^ | .CONST 0x035e,0x0003 0778 0363 0004 | c | .CONST 0x0363,0x0004 077a 0365 0005 | e | .CONST 0x0365,0x0005 077c 0368 0006 | h | .CONST 0x0368,0x0006 077e 0000 0000 | | .BLANK 0000[0x82]