DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦c0004286c⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5812_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

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]