|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0280 | | .CONST 0x0280 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00fe | | .CONST 0x00fe ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0043 | C | .CONST 0x0043 ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 00c4 | | Action Make_Default
002f 00c4 | | Action Make_Default
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 00c4 | | Action Make_Default
0034 00c4 | | Action Make_Default
0035 00c4 | | Action Make_Default
0036 00c4 | | Action Make_Default
0037 00c4 | | Action Make_Default
0038 00c4 | | Action Make_Default
0039 00c4 | | Action Make_Default
003a 00c4 | | Action Make_Default
003b 00c4 | | Action Make_Default
003c 00c4 | | Action Make_Default
003d 00c4 | | Action Make_Default
003e 00c4 | | Action Make_Default
003f 00c4 | | Action Make_Default
0040 00c4 | | Action Make_Default
0041 00c4 | | Action Make_Default
0042 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
0044 c221 | ! | Store 0x1,0x21
0045 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
0047 c227 | ' | Store 0x1,0x27
0048 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
004a c23a | : | Store 0x1,0x3a
004b 4800 |H | Short_Literal 0x0
004c 4802 |H | Short_Literal 0x2
004d 029f 015b | [| Declare_Subprogram INIT_0158,For_Call
004f 03fe | | Declare_Type Discrete,Defined,Visible
0050 c21e | | Store 0x1,0x1e
0051 4800 |H | Short_Literal 0x0
0052 4803 |H | Short_Literal 0x3
0053 029f 0183 | | Declare_Subprogram INIT_0180,For_Call
0055 03fe | | Declare_Type Discrete,Defined,Visible
0056 c241 | A | Store 0x1,0x41
0057 00da | | Load_Top At_Offset_2
0058 00e6 | | Load_Encached Float_Cache
0059 00e6 | | Load_Encached Float_Cache
005a 02a0 | | Declare_Subprogram Null_Subprogram
005b 4803 |H | Short_Literal 0x3
005c 032e | . | Declare_Type Record,Defined,Visible
005d c216 | | Store 0x1,0x16
005e 00da | | Load_Top At_Offset_2
005f 00e6 | | Load_Encached Float_Cache
0060 00e6 | | Load_Encached Float_Cache
0061 00e6 | | Load_Encached Float_Cache
0062 00e6 | | Load_Encached Float_Cache
0063 02a0 | | Declare_Subprogram Null_Subprogram
0064 4805 |H | Short_Literal 0x5
0065 032e | . | Declare_Type Record,Defined,Visible
0066 c217 | | Store 0x1,0x17
0067 00e2 | | Load_Encached Integer_Cache
0068 00e2 | | Load_Encached Integer_Cache
0069 02a0 | | Declare_Subprogram Null_Subprogram
006a 4802 |H | Short_Literal 0x2
006b 032e | . | Declare_Type Record,Defined,Visible
006c c218 | | Store 0x1,0x18
006d e216 | | Load 0x1,0x16
006e 0322 | " | Declare_Variable Record
006f 4801 |H | Short_Literal 0x1
0070 00d9 | | Load_Top At_Offset_1
0071 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0072 58c5 |X | Indirect_Literal Float,0x138,84.1
0073 00d9 | | Load_Top At_Offset_1
0074 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0075 58be |X | Indirect_Literal Float,0x134,118.89999999999999
0076 00d9 | | Load_Top At_Offset_1
0077 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0078 0129 | ) | Execute Any,Make_Visible
0079 c23d | = | Store 0x1,0x3d
007a e216 | | Load 0x1,0x16
007b 0322 | " | Declare_Variable Record
007c 4801 |H | Short_Literal 0x1
007d 00d9 | | Load_Top At_Offset_1
007e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
007f 58b0 |X | Indirect_Literal Float,0x130,59.4
0080 00d9 | | Load_Top At_Offset_1
0081 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0082 58b5 |X | Indirect_Literal Float,0x138,84.1
0083 00d9 | | Load_Top At_Offset_1
0084 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0085 0129 | ) | Execute Any,Make_Visible
0086 c23e | > | Store 0x1,0x3e
0087 e216 | | Load 0x1,0x16
0088 0322 | " | Declare_Variable Record
0089 4801 |H | Short_Literal 0x1
008a 00d9 | | Load_Top At_Offset_1
008b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
008c 589f |X | Indirect_Literal Float,0x12c,42.0
008d 00d9 | | Load_Top At_Offset_1
008e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
008f 58a0 |X | Indirect_Literal Float,0x130,59.4
0090 00d9 | | Load_Top At_Offset_1
0091 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0092 0129 | ) | Execute Any,Make_Visible
0093 c22a | * | Store 0x1,0x2a
0094 e216 | | Load 0x1,0x16
0095 0322 | " | Declare_Variable Record
0096 4801 |H | Short_Literal 0x1
0097 00d9 | | Load_Top At_Offset_1
0098 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0099 588e |X | Indirect_Literal Float,0x128,29.7
009a 00d9 | | Load_Top At_Offset_1
009b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
009c 588f |X | Indirect_Literal Float,0x12c,42.0
009d 00d9 | | Load_Top At_Offset_1
009e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
009f 0129 | ) | Execute Any,Make_Visible
00a0 c22b | + | Store 0x1,0x2b
00a1 e216 | | Load 0x1,0x16
00a2 0322 | " | Declare_Variable Record
00a3 4801 |H | Short_Literal 0x1
00a4 00d9 | | Load_Top At_Offset_1
00a5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00a6 587d |X} | Indirect_Literal Float,0x124,21.0
00a7 00d9 | | Load_Top At_Offset_1
00a8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00a9 587e |X~ | Indirect_Literal Float,0x128,29.7
00aa 00d9 | | Load_Top At_Offset_1
00ab 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00ac 0129 | ) | Execute Any,Make_Visible
00ad c22c | , | Store 0x1,0x2c
00ae e216 | | Load 0x1,0x16
00af 0322 | " | Declare_Variable Record
00b0 4801 |H | Short_Literal 0x1
00b1 00d9 | | Load_Top At_Offset_1
00b2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00b3 586c |Xl | Indirect_Literal Float,0x120,14.799999999999999
00b4 00d9 | | Load_Top At_Offset_1
00b5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00b6 586d |Xm | Indirect_Literal Float,0x124,21.0
00b7 00d9 | | Load_Top At_Offset_1
00b8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00b9 0129 | ) | Execute Any,Make_Visible
00ba c22d | - | Store 0x1,0x2d
00bb e216 | | Load 0x1,0x16
00bc 0322 | " | Declare_Variable Record
00bd 4800 |H | Short_Literal 0x0
00be 00d9 | | Load_Top At_Offset_1
00bf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00c0 585b |X[ | Indirect_Literal Float,0x11c,8.5
00c1 00d9 | | Load_Top At_Offset_1
00c2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00c3 5854 |XT | Indirect_Literal Float,0x118,11.0
00c4 00d9 | | Load_Top At_Offset_1
00c5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00c6 0129 | ) | Execute Any,Make_Visible
00c7 c22e | . | Store 0x1,0x2e
00c8 e216 | | Load 0x1,0x16
00c9 0322 | " | Declare_Variable Record
00ca 4800 |H | Short_Literal 0x0
00cb 00d9 | | Load_Top At_Offset_1
00cc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00cd 584e |XN | Indirect_Literal Float,0x11c,8.5
00ce 00d9 | | Load_Top At_Offset_1
00cf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00d0 5843 |XC | Indirect_Literal Float,0x114,14.0
00d1 00d9 | | Load_Top At_Offset_1
00d2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00d3 0129 | ) | Execute Any,Make_Visible
00d4 c22f | / | Store 0x1,0x2f
00d5 e217 | | Load 0x1,0x17
00d6 0322 | " | Declare_Variable Record
00d7 4800 |H | Short_Literal 0x0
00d8 00d9 | | Load_Top At_Offset_1
00d9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00da 5835 |X5 | Indirect_Literal Float,0x110,1.0
00db 00d9 | | Load_Top At_Offset_1
00dc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00dd 5832 |X2 | Indirect_Literal Float,0x110,1.0
00de 00d9 | | Load_Top At_Offset_1
00df 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00e0 582f |X/ | Indirect_Literal Float,0x110,1.0
00e1 00d9 | | Load_Top At_Offset_1
00e2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00e3 582c |X, | Indirect_Literal Float,0x110,1.0
00e4 00d9 | | Load_Top At_Offset_1
00e5 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
00e6 0129 | ) | Execute Any,Make_Visible
00e7 c238 | 8 | Store 0x1,0x38
00e8 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
00ea c242 | B | Store 0x1,0x42
00eb 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
00ed c237 | 7 | Store 0x1,0x37
00ee 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated
00f0 c243 | C | Store 0x1,0x43
00f1 00bf | | Action Accept_Activation
00f2 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00f3 00c7 | | Action Elaborate_Subprogram
00f4 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00f5 00c7 | | Action Elaborate_Subprogram
00f6 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
00f7 00c7 | | Action Elaborate_Subprogram
00f8 1d42 | B | Execute_Immediate Reference_Lex_1,0x42
00f9 00c7 | | Action Elaborate_Subprogram
00fa 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
00fb 00c7 | | Action Elaborate_Subprogram
00fc 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
00fd 00c7 | | Action Elaborate_Subprogram
00fe BODY_0008:
00fe 00bc | | Action Signal_Activated
00ff 00bb | | Action Signal_Completion
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 e5f6 | | Load 0x2,-0xa
0104 e5f7 | | Load 0x2,-0x9
0105 e5f8 | | Load 0x2,-0x8
0106 e5f9 | | Load 0x2,-0x7
0107 e5fa | | Load 0x2,-0x6
0108 e5fb | | Load 0x2,-0x5
0109 e5fc | | Load 0x2,-0x4
010a e5fd | | Load 0x2,-0x3
010b e5fe | | Load 0x2,-0x2
010c e5ff | | Load 0x2,-0x1
010d 8001 | | Call 0x0,0x1
010e 450b |E | Exit_Suprogram New_Top_Offset 0xb
010f 0000 | | .XXX[0x1]
0110 3ff0 0000 |? | .DBL 1.0
0112 0000 0000 | |
0114 402c 0000 |@, | .DBL 14.0
0116 0000 0000 | |
0118 4026 0000 |@& | .DBL 11.0
011a 0000 0000 | |
011c 4021 0000 |@! | .DBL 8.5
011e 0000 0000 | |
0120 402d 9999 |@- | .DBL 14.799999999999999
0122 9999 9999 | |
0124 4035 0000 |@5 | .DBL 21.0
0126 0000 0000 | |
0128 403d b333 |@= 3| .DBL 29.7
012a 3333 3333 |3333|
012c 4045 0000 |@E | .DBL 42.0
012e 0000 0000 | |
0130 404d b333 |@M 3| .DBL 59.4
0132 3333 3333 |3333|
0134 405d b999 |@] | .DBL 118.89999999999999
0136 9999 9999 | |
0138 4055 0666 |@U f| .DBL 84.1
013a 6666 6666 |ffff|
013c 0000 0000 | | .BLANK 0000[0x4]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 e5f6 | | Load 0x2,-0xa
0144 e5f7 | | Load 0x2,-0x9
0145 e5f8 | | Load 0x2,-0x8
0146 e5f9 | | Load 0x2,-0x7
0147 e5fa | | Load 0x2,-0x6
0148 e5fb | | Load 0x2,-0x5
0149 e5fc | | Load 0x2,-0x4
014a e5fd | | Load 0x2,-0x3
014b e5fe | | Load 0x2,-0x2
014c e5ff | | Load 0x2,-0x1
014d 8002 | | Call 0x0,0x2
014e 450b |E | Exit_Suprogram New_Top_Offset 0xb
014f 0000 | | .XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 e5fd | | Load 0x2,-0x3
0154 e5fe | | Load 0x2,-0x2
0155 e5ff | | Load 0x2,-0x1
0156 8003 | | Call 0x0,0x3
0157 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 4607 |F | Jump_Case 0x8
015c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
015d 7806 |x | Jump 0x164 ; case 0x1
015e 7809 |x | Jump 0x168 ; case 0x2
015f 780d |x | Jump 0x16d ; case 0x3
0160 7810 |x | Jump 0x171 ; case 0x4
0161 7811 |x | Jump 0x173 ; case 0x5
0162 7812 |x | Jump 0x175 ; case 0x6
0163 7815 |x | Jump 0x179 ; case 0x7
0164 00da | | Load_Top At_Offset_2
0165 0091 0249 | I| Action Push_String_Extended_Indexed,0x249 ; "BEST"
0167 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0168 00db | | Load_Top At_Offset_3
0169 00db | | Load_Top At_Offset_3
016a 00e0 | | Load_Encached Standard_Cache
016b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
016c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
016d 00da | | Load_Top At_Offset_2
016e 00e0 | | Load_Encached Standard_Cache
016f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0170 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0171 00db | | Load_Top At_Offset_3
0172 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0173 00db | | Load_Top At_Offset_3
0174 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0175 e21e | | Load 0x1,0x1e
0176 00dc | | Load_Top At_Offset_4
0177 0267 | g | Execute Discrete,Predecessor
0178 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0179 e21e | | Load 0x1,0x1e
017a 00dc | | Load_Top At_Offset_4
017b 0268 | h | Execute Discrete,Successor
017c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 4607 |F | Jump_Case 0x8
0184 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0185 7806 |x | Jump 0x18c ; case 0x1
0186 7809 |x | Jump 0x190 ; case 0x2
0187 780d |x | Jump 0x195 ; case 0x3
0188 7810 |x | Jump 0x199 ; case 0x4
0189 7811 |x | Jump 0x19b ; case 0x5
018a 7812 |x | Jump 0x19d ; case 0x6
018b 7815 |x | Jump 0x1a1 ; case 0x7
018c 00da | | Load_Top At_Offset_2
018d 0091 024c | L| Action Push_String_Extended_Indexed,0x24c ; "INCHES"
018f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0190 00db | | Load_Top At_Offset_3
0191 00db | | Load_Top At_Offset_3
0192 00e0 | | Load_Encached Standard_Cache
0193 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0194 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0195 00da | | Load_Top At_Offset_2
0196 00e0 | | Load_Encached Standard_Cache
0197 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0198 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0199 00db | | Load_Top At_Offset_3
019a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
019b 00db | | Load_Top At_Offset_3
019c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
019d e241 | A | Load 0x1,0x41
019e 00dc | | Load_Top At_Offset_4
019f 0267 | g | Execute Discrete,Predecessor
01a0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01a1 e241 | A | Load 0x1,0x41
01a2 00dc | | Load_Top At_Offset_4
01a3 0268 | h | Execute Discrete,Successor
01a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01a5 0000 0000 | | .XXX[0x3]
01a7 0000 | |
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab e5e9 | | Load 0x2,-0x17
01ac e5ea | | Load 0x2,-0x16
01ad e5eb | | Load 0x2,-0x15
01ae e5ec | | Load 0x2,-0x14
01af e5ed | | Load 0x2,-0x13
01b0 e5ee | | Load 0x2,-0x12
01b1 e5ef | | Load 0x2,-0x11
01b2 e5f0 | | Load 0x2,-0x10
01b3 e5f1 | | Load 0x2,-0xf
01b4 e5f2 | | Load 0x2,-0xe
01b5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01b6 e5f2 | | Load 0x2,-0xe
01b7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
01b8 e5f2 | | Load 0x2,-0xe
01b9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01ba e5f2 | | Load 0x2,-0xe
01bb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01bc e5f3 | | Load 0x2,-0xd
01bd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01be e5f3 | | Load 0x2,-0xd
01bf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01c0 e5f3 | | Load 0x2,-0xd
01c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c2 e241 | A | Load 0x1,0x41
01c3 011c | | Execute Any,Convert_Unchecked
01c4 1c01 | | Execute_Immediate Run_Utility,0x1
01c5 e5f4 | | Load 0x2,-0xc
01c6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01c7 e5f4 | | Load 0x2,-0xc
01c8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c9 e5f5 | | Load 0x2,-0xb
01ca e5f6 | | Load 0x2,-0xa
01cb e5f7 | | Load 0x2,-0x9
01cc e5f8 | | Load 0x2,-0x8
01cd e5f9 | | Load 0x2,-0x7
01ce e21e | | Load 0x1,0x1e
01cf 011c | | Execute Any,Convert_Unchecked
01d0 1c01 | | Execute_Immediate Run_Utility,0x1
01d1 e5fa | | Load 0x2,-0x6
01d2 e5fb | | Load 0x2,-0x5
01d3 e5fc | | Load 0x2,-0x4
01d4 e5fd | | Load 0x2,-0x3
01d5 e5fe | | Load 0x2,-0x2
01d6 e5ff | | Load 0x2,-0x1
01d7 8004 | | Call 0x0,0x4
01d8 4518 |E | Exit_Suprogram New_Top_Offset 0x18
01d9 0000 0000 | | .BLANK 0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 e5f9 | | Load 0x2,-0x7
01e4 4806 |H | Short_Literal 0x6
01e5 0092 0250 | P| Action Push_String_Extended,0x250 ; "Helvetica"
01e7 480e |H | Short_Literal 0xe
01e8 0092 0250 | P| Action Push_String_Extended,0x250 ; "Helvetica"
01ea 480a |H | Short_Literal 0xa
01eb 0092 0251 | Q| Action Push_String_Extended,0x251 ; "Helvetica-Oblique"
01ed 480a |H | Short_Literal 0xa
01ee 0092 0250 | P| Action Push_String_Extended,0x250 ; "Helvetica"
01f0 581f |X | Indirect_Literal Float,0x210,1.0
01f1 581e |X | Indirect_Literal Float,0x210,1.0
01f2 581d |X | Indirect_Literal Float,0x210,1.0
01f3 581c |X | Indirect_Literal Float,0x210,1.0
01f4 5817 |X | Indirect_Literal Float,0x20c,11.0
01f5 5812 |X | Indirect_Literal Float,0x208,8.5
01f6 0092 024c | L| Action Push_String_Extended,0x24c ; "INCHES"
01f8 4864 |Hd | Short_Literal 0x64
01f9 4832 |H2 | Short_Literal 0x32
01fa 4800 |H | Short_Literal 0x0
01fb 4800 |H | Short_Literal 0x0
01fc 4800 |H | Short_Literal 0x0
01fd 4800 |H | Short_Literal 0x0
01fe 0092 0249 | I| Action Push_String_Extended,0x249 ; "BEST"
0200 e5fa | | Load 0x2,-0x6
0201 e5fb | | Load 0x2,-0x5
0202 e5fc | | Load 0x2,-0x4
0203 e5fd | | Load 0x2,-0x3
0204 e5fe | | Load 0x2,-0x2
0205 e5ff | | Load 0x2,-0x1
0206 8004 | | Call 0x0,0x4
0207 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0208 4021 0000 |@! | .DBL 8.5
020a 0000 0000 | |
020c 4026 0000 |@& | .DBL 11.0
020e 0000 0000 | |
0210 3ff0 0000 |? | .DBL 1.0
0212 0000 0000 | |
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b e5e9 | | Load 0x2,-0x17
021c e5ea | | Load 0x2,-0x16
021d e5eb | | Load 0x2,-0x15
021e e5ec | | Load 0x2,-0x14
021f e5ed | | Load 0x2,-0x13
0220 e5ee | | Load 0x2,-0x12
0221 e5ef | | Load 0x2,-0x11
0222 e5f0 | | Load 0x2,-0x10
0223 e5f1 | | Load 0x2,-0xf
0224 e5f2 | | Load 0x2,-0xe
0225 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0226 e5f2 | | Load 0x2,-0xe
0227 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0228 e5f2 | | Load 0x2,-0xe
0229 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
022a e5f2 | | Load 0x2,-0xe
022b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
022c e5f3 | | Load 0x2,-0xd
022d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
022e e5f3 | | Load 0x2,-0xd
022f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0230 e5f3 | | Load 0x2,-0xd
0231 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0232 e241 | A | Load 0x1,0x41
0233 011c | | Execute Any,Convert_Unchecked
0234 1c01 | | Execute_Immediate Run_Utility,0x1
0235 e5f4 | | Load 0x2,-0xc
0236 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0237 e5f4 | | Load 0x2,-0xc
0238 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0239 e5f5 | | Load 0x2,-0xb
023a e5f6 | | Load 0x2,-0xa
023b e5f7 | | Load 0x2,-0x9
023c e5f8 | | Load 0x2,-0x8
023d e5f9 | | Load 0x2,-0x7
023e e21e | | Load 0x1,0x1e
023f 011c | | Execute Any,Convert_Unchecked
0240 1c01 | | Execute_Immediate Run_Utility,0x1
0241 e5fa | | Load 0x2,-0x6
0242 e5fb | | Load 0x2,-0x5
0243 e5fc | | Load 0x2,-0x4
0244 e5fd | | Load 0x2,-0x3
0245 e5fe | | Load 0x2,-0x2
0246 e5ff | | Load 0x2,-0x1
0247 8005 | | Call 0x0,0x5
0248 4518 |E | Exit_Suprogram New_Top_Offset 0x18
0249 ; --------------------------------------------------------------------------------------
0249 ; STRING TABLE
0249 ; --------------------------------------------------------------------------------------
0249 0014 | | .STRTAB 0x0014->0x0253 ; "BEST"
024a 0016 | | .STRTAB 0x0016->0x0255 ; "PORTRAIT"
024b 001c | | .STRTAB 0x001c->0x0259 ; "LANDSCAPE"
024c 0023 | # | .STRTAB 0x0023->0x025d ; "INCHES"
024d 0027 | ' | .STRTAB 0x0027->0x0260 ; "CENTIMETERS"
024e 0030 | 0 | .STRTAB 0x0030->0x0266 ; "PICAS"
024f 0033 | 3 | .STRTAB 0x0033->0x0268 ; "POINTS"
0250 0037 | 7 | .STRTAB 0x0037->0x026b ; "Helvetica"
0251 003e | > | .STRTAB 0x003e->0x0270 ; "Helvetica-Oblique"
0252 004d | M | .STREND 0x004d->0x0278
0253 4245 5354 |BEST| .STRTAB_STRINGS
0279 0000 0000 | | .BLANK 0000[0x7]
0280 ; --------------------------------------------------------------------------------------
0280 ; Debug Table
0280 ; --------------------------------------------------------------------------------------
0280 0004 0014 | | .DEBUG4 0x0004,0x0014,0x1b62,0x0000,0x0001,0x0000
0286 a0d8 4937 | I7| .XXX[0x17a]
0288 5104 f47b |Q {|
028a 416b 6904 |Aki |
028c 5079 0d82 |Py |
028e e000 bcdc | |
0290 88ee e001 | |
0292 7d53 fd8c |}S |
0294 9cdc 58ee | X |
0296 e001 9ceb | |
0298 a801 1216 | |
029a 5542 e001 |UB |
029c 6167 7173 |agqs|
029e 2a16 5217 |* R |
02a0 f1de 5e17 | ^ |
02a2 6187 d1be |a |
02a4 3215 b5b4 |2 |
02a6 ac7a 7614 | zv |
02a8 8963 c0aa | c |
02aa 8616 9d3d | =|
02ac 95b0 6d37 | m7|
02ae a800 a162 | b|
02b0 b614 a592 | |
02b2 e003 6c8f | l |
02b4 c18d f8db | |
02b6 9da2 e002 | |
02b8 04db c542 | B|
02ba e000 38df | 8 |
02bc 7d6b d107 |}k |
02be c9a1 95b1 | |
02c0 31bb fd8f |1 |
02c2 b164 c14a | d J|
02c4 e001 950b | |
02c6 ac01 c14e | N|
02c8 6d4b e904 |mK |
02ca f478 454f | xEO|
02cc e214 0403 | |
02ce ac01 4dbd | M |
02d0 2a05 c07b |* {|
02d2 ac01 f5da | |
02d4 8dbb ac03 | |
02d6 d18c c99c | |
02d8 68ef ac01 |h |
02da 75f1 81a8 |u |
02dc 5078 454e |PxEN|
02de e400 8cdc | |
02e0 8d5c 3618 | \6 |
02e2 f478 b49a | x |
02e4 e401 ccdc | |
02e6 bd64 3d08 | d= |
02e8 f478 cd5c | x \|
02ea 7984 b079 |y y|
02ec 514a e400 |QJ |
02ee 9137 ac02 | 7 |
02f0 8d71 cc42 | q B|
02f2 e403 48da | H |
02f4 1548 8619 | H |
02f6 ac1b ac02 | |
02f8 59d3 5db7 |Y ] |
02fa ac03 81cf | |
02fc 4a17 ac01 |J |
02fe 39d5 d054 |9 T|
0300 b9fb ac00 | |
0302 c5fc ba18 | |
0304 6db0 f478 |m x|
0306 8e19 c4eb | |
0308 ac02 c148 | H|
030a e610 b0ec | |
030c 0400 7909 | y |
030e 58ac 1c01 |X |
0310 0cdd 515e | Q^|
0312 e403 70d9 | p |
0314 8166 e401 | f |
0316 bcda 090b | |
0318 79a8 5079 |y Py|
031a 80e6 e800 | |
031c 8cdf 5946 | YF|
031e e803 0161 | a|
0320 b166 7108 | fq |
0322 f479 4d37 | yM7|
0324 1164 5078 | dPx|
0326 f96e 8908 | n |
0328 f47a fd4a | z J|
032a e803 e18d | |
032c 7d42 e803 |}B |
032e 10d9 9cea | |
0330 e803 9527 | '|
0332 ac02 b9af | |
0334 ddec 961b | |
0336 d171 e07d | q }|
0338 d874 b07a | t z|
033a 4930 4076 |I0@v|
033c a5e0 2003 | |
033e e18f 8d4a | J|
0340 d108 f47a | z|
0342 255e e800 |%^ |
0344 54de 3d5e |T =^|
0346 e803 897c | ||
0348 dc4b 78b0 | Kx |
034a 5078 f472 |Px r|
034c ec02 acda | |
034e 0d8b 1108 | |
0350 f47a 4d66 | zMf|
0352 ec02 d8da | |
0354 6566 ec03 |ef |
0356 f084 7890 | x |
0358 84b4 507a | Pz|
035a 496e f9b0 |In |
035c 9619 9cd2 | |
035e eceb b000 | |
0360 1d6b 6081 | k` |
0362 cc43 b001 | C |
0364 998e 3619 | 6 |
0366 4cd2 0c48 |L H|
0368 0402 8d32 | 2|
036a 80e7 b003 | |
036c 08f6 8cce | |
036e ec00 fcdc | |
0370 d14e 7619 | Nv |
0372 ac1b b002 | |
0374 fc02 a875 | u|
0376 345d c07b |4] {|
0378 b000 2d6f | -o|
037a 8d50 95d4 | P |
037c 507a 7e1b |Pz~ |
037e 9522 e530 | " 0|
0380 8c54 39e1 | T9 |
0382 ac1b 9526 | &|
0384 ec02 b619 | |
0386 d156 1d97 | V |
0388 b403 48e5 | H |
038a 1481 8508 | |
038c 1804 95e2 | |
038e 194c 2403 | L$ |
0390 c541 0605 | A |
0392 290b b400 |) |
0394 c801 7137 | q7|
0396 b401 dd84 | |
0398 447b 193f |D{ ?|
039a b402 39f5 | 9 |
039c 852f b400 | / |
039e c1ab 25a3 | % |
03a0 e048 95bd | H |
03a2 496e 6929 |Ini)|
03a4 c442 fa18 | B |
03a6 f479 954f | y O|
03a8 2908 f479 |) y|
03aa acea ec01 | |
03ac 6195 ac1a |a |
03ae ec02 38d8 | 8 |
03b0 7147 4d09 |qGM |
03b2 7997 11b2 |y |
03b4 58db fd5e |X ^|
03b6 ec03 a0db | |
03b8 7e1a 80da |~ |
03ba 254e ec02 |%N |
03bc 90d8 f547 | G|
03be e878 9c7b | x {|
03c0 d5b1 6550 | eP|
03c2 1572 f002 | r |
03c4 88ff b401 | |
03c6 d9c4 7d64 | }d|
03c8 507a 494f |PzIO|
03ca 7108 0c83 |q |
03cc 4e19 f105 |N |
03ce f080 2803 | ( |
03d0 80da 554f | UO|
03d2 dd09 11c3 | |
03d4 904a c8db | J |
03d6 e1b7 918d | |
03d8 65c3 904b |e K|
03da cc7c 59b6 | |Y |
03dc 4933 b402 |I3 |
03de fdfb da18 | |
03e0 b078 4d72 | xMr|
03e2 f401 a935 | 5|
03e4 f083 4416 | D |
03e6 5091 944e |P N|
03e8 7cc1 a995 || |
03ea 8080 ecdf | |
03ec e1b6 f803 | |
03ee 10da 894e | N|
03f0 f801 6d65 | me|
03f2 3162 f803 |1b |
03f4 f8eb b403 | |
03f6 2527 ad8c |%' |
03f8 b07a b552 | z R|
03fa f803 1488 | |
03fc fca0 3003 | 0 |
03fe 8121 1464 | ! d|