|
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_1060f5
└─⟦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,0x1442,0x0000,0x0001,0x0000 0286 6240 4000 |b@@ | .XXX[0x17a] 0288 6658 1eff |fX | 028a d248 1eff | H | 028c f100 0564 | d| 028e 0a50 1eff | P | 0290 e202 4000 | @ | 0292 200a 0001 | | 0294 1c04 0000 | | 0296 0350 1880 | P | 0298 1350 2a80 | P* | 029a 5202 2a80 |R * | 029c 108a 0000 | | 029e 13c8 1880 | | 02a0 2042 0000 | B | 02a2 0fc8 1881 | | 02a4 63c8 1981 |c | 02a6 63c8 1980 |c | 02a8 1348 1eff | H | 02aa e100 082c | ,| 02ac fe40 4000 | @@ | 02ae 66e0 4000 |f @ | 02b0 22b8 4000 |" @ | 02b2 7202 4000 |r @ | 02b4 5c0a 0000 |\ | 02b6 d804 0000 | | 02b8 0340 1880 | @ | 02ba 1100 04e7 | | 02bc 5648 4080 |VH@ | 02be 4a02 4000 |J @ | 02c0 208a 0000 | | 02c2 0fc8 1880 | | 02c4 22c8 4000 |" @ | 02c6 6391 5983 |c Y | 02c8 2399 5983 |# Y | 02ca 2a02 9200 |* | 02cc 4c9a 0000 |L | 02ce 37e8 1983 |7 | 02d0 13a1 5983 | Y | 02d2 2aa0 1480 |* | 02d4 2ba0 d983 |+ | 02d6 2b49 5983 |+IY | 02d8 2b40 1983 |+@ | 02da 124c a980 | L | 02dc 0eac a980 | | 02de 0500 0575 | u| 02e0 4648 0900 |FH | 02e2 5740 9983 |W@ | 02e4 13e8 1983 | | 02e6 1349 5983 | IY | 02e8 2360 1eff |#` | 02ea f24c a980 | L | 02ec 0e54 a980 | T | 02ee 0648 0900 | H | 02f0 2ae8 1d00 |* | 02f2 2760 9d00 |'` | 02f4 0368 1eff | h | 02f6 e202 4000 | @ | 02f8 6f68 9d80 |oh | 02fa 100a 0000 | | 02fc 17e0 bd80 | | 02fe 23e0 1eff |# | 0300 d042 0000 | B | 0302 0ee0 3cff | < | 0304 f3e0 1eff | | 0306 d3e0 9d80 | | 0308 33c0 9d80 |3 | 030a 43d0 bd80 |C | 030c 53d8 bd80 |S | 030e 5789 5983 |W Y | 0310 2202 4000 |" @ | 0312 6a88 1180 |j | 0314 040a 0000 | | 0316 1b88 d983 | | 0318 2350 1eff |#P | 031a d248 4000 | H@ | 031c 5d00 0002 |] | 031e f640 4000 | @@ | 0320 6607 1f80 |f | 0322 2207 a000 |" | 0324 0277 8efe | w | 0326 6340 1880 |c@ | 0328 1100 04e6 | | 032a 7a48 4080 |zH@ | 032c 4a02 4000 |J @ | 032e 208a 0000 | | 0330 0fd8 1880 | | 0332 22d8 4000 |" @ | 0334 6340 1b85 |c@ | 0336 3202 8880 |2 | 0338 0452 0001 | R | 033a 4c04 0000 |L | 033c 03a0 1b83 | | 033e 13b1 5b83 | [ | 0340 22b8 4080 |" @ | 0342 0202 4000 | @ | 0344 5812 0001 |X | 0346 36a8 4080 |6 @ | 0348 02d0 1500 | | 034a 5358 1a80 |SX | 034c 4202 8b00 |B | 034e 60ca 0001 |` | 0350 0ed0 1a80 | | 0352 6361 3a80 |ca: | 0354 5202 4000 |R @ | 0356 308a 0000 |0 | 0358 92c8 9680 | | 035a 0768 1b85 | h | 035c 3202 8d80 |2 | 035e 04ca 0000 | | 0360 82c8 9680 | | 0362 0778 3b84 | x; | 0364 da02 8f80 | | 0366 0cca 0000 | | 0368 1788 3b84 | ; | 036a db40 1b85 | @ | 036c 2042 0000 | B | 036e 5740 0800 |W@ | 0370 0202 9180 | | 0372 048a 0000 | | 0374 1e40 4000 | @@ | 0376 6f90 3b84 |o ; | 0378 da02 9280 | | 037a 10ca 0000 | | 037c 2398 3b84 |# ; | 037e da40 4000 | @@ | 0380 6d00 0001 |m | 0382 a248 1eff | H | 0384 f340 1eff | @ | 0386 f042 0000 | B | 0388 2748 3a80 |'H: | 038a 2202 9380 |" | 038c 08ca 0000 | | 038e 26c8 9680 |& | 0390 0740 1b85 | @ | 0392 2340 0800 |#@ | 0394 0340 0880 | @ | 0396 2348 3a80 |#H: | 0398 2100 069d |! | 039a 7350 1a80 |sP | 039c 32c8 9680 |2 | 039e 06e0 4000 | @ | 03a0 5e02 9c00 |^ | 03a2 645a 0000 |dZ | 03a4 52e8 1500 |R | 03a6 5260 1d80 |R` | 03a8 6380 0c00 |c | 03aa 0390 0c80 | | 03ac 1268 4000 | h@ | 03ae 7780 8d80 |w | 03b0 0380 0c80 | | 03b2 2390 8d80 |# | 03b4 1390 0c80 | | 03b6 3380 8d80 |3 | 03b8 2380 0c80 |# | 03ba 4390 8d80 |C | 03bc 3360 0c80 |3` | 03be 52e0 1c80 |R | 03c0 0602 9c00 | | 03c2 6780 8d80 |g | 03c4 42e8 1d80 |B | 03c6 601a ffff |` | 03c8 c360 8d80 | ` | 03ca 5399 5b83 |S [ | 03cc 22b0 9680 |" | 03ce 0698 9380 | | 03d0 0442 0000 | B | 03d2 1398 db83 | | 03d4 22a8 1580 |" | 03d6 62b8 1780 |b | 03d8 0602 9700 | | 03da 589a fffe |X | 03dc e758 1a80 | X | 03de 4207 1f80 |B | 03e0 2207 a000 |" | 03e2 0277 8efe | w | 03e4 83e8 1883 | | 03e6 13e1 5883 | X | 03e8 2202 4000 |" @ | 03ea 748a 0000 |t | 03ec 7ed0 40ff |~ @ | 03ee fe02 9a00 | | 03f0 705a 0000 |pZ | 03f2 6ec0 4000 |n @ | 03f4 6ad4 ba80 |j | 03f6 0e4c ba80 | L | 03f8 06d0 1a00 | | 03fa 26d0 1a00 |& | 03fc 7759 3a80 |wY: | 03fe 5602 4000 |V @ |