mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-24 08:54:17 +00:00
1124 lines
45 KiB
Plaintext
1124 lines
45 KiB
Plaintext
1 .globl _low
|
||
2 .comm _low,2
|
||
3 .globl _high
|
||
4 .comm _high,2
|
||
5 .globl _err
|
||
6 .comm _err,2
|
||
7 .globl _globali
|
||
8 00000000 .data
|
||
9 _globali:
|
||
10 00000000 8000 .dc.w -32768
|
||
11 .globl _globalu
|
||
12 00000002 .data
|
||
13 _globalu:
|
||
14 00000002 D420 .dc.w -11232
|
||
15 .globl _main
|
||
16 00000000 .text
|
||
17 _main:
|
||
18 ~~main:
|
||
19 00000000 4E56FFFC link R14,#-4
|
||
20 *line 19
|
||
21 00000004 6130 jsr _l_vs_i
|
||
22 *line 20
|
||
23 00000006 4EB8028A jsr _rl_vs_i
|
||
24 *line 21
|
||
25 0000000A 4EB803F2 jsr _l_vs_ri
|
||
26 *line 22
|
||
27 0000000E 4EB80626 jsr _rl_vs_ri
|
||
28 *line 23
|
||
29 00000012 4EB80762 jsr _v41
|
||
30 *line 25
|
||
31 00000016 4A780000 tst _err
|
||
32 0000001A 660C bne L2
|
||
33 *line 25
|
||
34 0000001C 2EBC00000004 move.l #L3,(sp)
|
||
35 00000022 4EB80000 jsr _printf
|
||
36 00000026 600A bra L4
|
||
37 L2:
|
||
38 *line 27
|
||
39 00000028 2EBC00000016 move.l #L5,(sp)
|
||
40 0000002E 4EB80000 jsr _printf
|
||
41 00000032 4E5E L4:L1:unlk R14
|
||
42 00000034 4E75 rts
|
||
43 .globl _l_vs_i
|
||
44 00000036 .text
|
||
45 _l_vs_i:
|
||
46 ~~l_vs_i:
|
||
47 ~autol=-4
|
||
48 ~autol1=-8
|
||
49 ~i=-10
|
||
50 00000036 4E56FFF2 link R14,#-14
|
||
51 *line 35
|
||
52 0000003A 3D7C0003FFF6 move #3,-10(R14)
|
||
53 *line 36
|
||
54 00000040 7064 move #100,R0
|
||
55 00000042 48C0 ext.l R0
|
||
56 00000044 2D40FFF8 move.l R0,-8(R14)
|
||
57 00000048 2D40FFFC move.l R0,-4(R14)
|
||
58 *line 37
|
||
59 0000004C 302EFFF6 move -10(R14),R0
|
||
60 00000050 48C0 ext.l R0
|
||
61 00000052 2F00 move.l R0,-(sp)
|
||
62 00000054 2F2EFFF8 move.l -8(R14),-(sp)
|
||
63 00000058 4EB80000 jsr lmul
|
||
64 0000005C 508F addq.l #8,sp
|
||
65 0000005E 2D40FFF8 move.l R0,-8(R14)
|
||
66 *line 38
|
||
67 00000062 302EFFF6 move -10(R14),R0
|
||
68 00000066 48C0 ext.l R0
|
||
69 00000068 2F00 move.l R0,-(sp)
|
||
70 0000006A 2F2EFFFC move.l -4(R14),-(sp)
|
||
71 0000006E 4EB80000 jsr lmul
|
||
72 00000072 508F addq.l #8,sp
|
||
73 00000074 2D40FFFC move.l R0,-4(R14)
|
||
74 *line 39
|
||
75 00000078 202EFFF8 move.l -8(R14),R0
|
||
76 0000007C B0AEFFFC cmp.l -4(R14),R0
|
||
77 00000080 6706 beq L7
|
||
78 *line 39
|
||
79 00000082 4257 clr (sp)
|
||
80 00000084 4EB807F8 jsr _error
|
||
81 L7:
|
||
82 *line 41
|
||
83 00000088 7064 move #100,R0
|
||
84 0000008A 48C0 ext.l R0
|
||
85 0000008C 2D40FFF8 move.l R0,-8(R14)
|
||
86 00000090 2D40FFFC move.l R0,-4(R14)
|
||
87 *line 42
|
||
88 00000094 202EFFF8 move.l -8(R14),R0
|
||
89 00000098 81EEFFF6 divs -10(R14),R0
|
||
90 0000009C 48C0 ext.l R0
|
||
91 0000009E 2D40FFF8 move.l R0,-8(R14)
|
||
92 *line 43
|
||
93 000000A2 202EFFFC move.l -4(R14),R0
|
||
94 000000A6 81EEFFF6 divs -10(R14),R0
|
||
95 000000AA 48C0 ext.l R0
|
||
96 000000AC 2D40FFFC move.l R0,-4(R14)
|
||
97 *line 44
|
||
98 000000B0 202EFFF8 move.l -8(R14),R0
|
||
99 000000B4 B0AEFFFC cmp.l -4(R14),R0
|
||
100 000000B8 6708 beq L8
|
||
101 *line 44
|
||
102 000000BA 3EBC0001 move #1,(sp)
|
||
103 000000BE 4EB807F8 jsr _error
|
||
104 L8:
|
||
105 *line 46
|
||
106 000000C2 7064 move #100,R0
|
||
107 000000C4 48C0 ext.l R0
|
||
108 000000C6 2D40FFF8 move.l R0,-8(R14)
|
||
109 000000CA 2D40FFFC move.l R0,-4(R14)
|
||
110 *line 47
|
||
111 000000CE 302EFFF6 move -10(R14),R0
|
||
112 000000D2 48C0 ext.l R0
|
||
113 000000D4 D1AEFFF8 add.l R0,-8(R14)
|
||
114 *line 48
|
||
115 000000D8 302EFFF6 move -10(R14),R0
|
||
116 000000DC 48C0 ext.l R0
|
||
117 000000DE D0AEFFFC add.l -4(R14),R0
|
||
118 000000E2 2D40FFFC move.l R0,-4(R14)
|
||
119 *line 49
|
||
120 000000E6 202EFFF8 move.l -8(R14),R0
|
||
121 000000EA B0AEFFFC cmp.l -4(R14),R0
|
||
122 000000EE 6708 beq L9
|
||
123 *line 49
|
||
124 000000F0 3EBC0002 move #2,(sp)
|
||
125 000000F4 4EB807F8 jsr _error
|
||
126 L9:
|
||
127 *line 51
|
||
128 000000F8 7064 move #100,R0
|
||
129 000000FA 48C0 ext.l R0
|
||
130 000000FC 2D40FFF8 move.l R0,-8(R14)
|
||
131 00000100 2D40FFFC move.l R0,-4(R14)
|
||
132 *line 52
|
||
133 00000104 302EFFF6 move -10(R14),R0
|
||
134 00000108 48C0 ext.l R0
|
||
135 0000010A 91AEFFF8 sub.l R0,-8(R14)
|
||
136 *line 53
|
||
137 0000010E 202EFFFC move.l -4(R14),R0
|
||
138 00000112 322EFFF6 move -10(R14),R1
|
||
139 00000116 48C1 ext.l R1
|
||
140 00000118 9081 sub.l R1,R0
|
||
141 0000011A 2D40FFFC move.l R0,-4(R14)
|
||
142 *line 54
|
||
143 0000011E 202EFFF8 move.l -8(R14),R0
|
||
144 00000122 B0AEFFFC cmp.l -4(R14),R0
|
||
145 00000126 6708 beq L10
|
||
146 *line 54
|
||
147 00000128 3EBC0003 move #3,(sp)
|
||
148 0000012C 4EB807F8 jsr _error
|
||
149 L10:
|
||
150 *line 56
|
||
151 00000130 7064 move #100,R0
|
||
152 00000132 48C0 ext.l R0
|
||
153 00000134 2D40FFF8 move.l R0,-8(R14)
|
||
154 00000138 2D40FFFC move.l R0,-4(R14)
|
||
155 *line 57
|
||
156 0000013C 202EFFF8 move.l -8(R14),R0
|
||
157 00000140 81EEFFF6 divs -10(R14),R0
|
||
158 00000144 4840 swap R0
|
||
159 00000146 48C0 ext.l R0
|
||
160 00000148 2D40FFF8 move.l R0,-8(R14)
|
||
161 *line 58
|
||
162 0000014C 202EFFFC move.l -4(R14),R0
|
||
163 00000150 81EEFFF6 divs -10(R14),R0
|
||
164 00000154 4840 swap R0
|
||
165 00000156 48C0 ext.l R0
|
||
166 00000158 2D40FFFC move.l R0,-4(R14)
|
||
167 *line 59
|
||
168 0000015C 202EFFF8 move.l -8(R14),R0
|
||
169 00000160 B0AEFFFC cmp.l -4(R14),R0
|
||
170 00000164 6708 beq L11
|
||
171 *line 59
|
||
172 00000166 3EBC0004 move #4,(sp)
|
||
173 0000016A 4EB807F8 jsr _error
|
||
174 L11:
|
||
175 *line 61
|
||
176 0000016E 7064 move #100,R0
|
||
177 00000170 48C0 ext.l R0
|
||
178 00000172 2D40FFF8 move.l R0,-8(R14)
|
||
179 00000176 2D40FFFC move.l R0,-4(R14)
|
||
180 *line 62
|
||
181 0000017A 322EFFF6 move -10(R14),R1
|
||
182 0000017E 202EFFF8 move.l -8(R14),R0
|
||
183 00000182 E3A0 asl.l R1,R0
|
||
184 00000184 2D40FFF8 move.l R0,-8(R14)
|
||
185 *line 63
|
||
186 00000188 202EFFFC move.l -4(R14),R0
|
||
187 0000018C 322EFFF6 move -10(R14),R1
|
||
188 00000190 E3A0 asl.l R1,R0
|
||
189 00000192 2D40FFFC move.l R0,-4(R14)
|
||
190 *line 64
|
||
191 00000196 202EFFF8 move.l -8(R14),R0
|
||
192 0000019A B0AEFFFC cmp.l -4(R14),R0
|
||
193 0000019E 6708 beq L12
|
||
194 *line 64
|
||
195 000001A0 3EBC0005 move #5,(sp)
|
||
196 000001A4 4EB807F8 jsr _error
|
||
197 L12:
|
||
198 *line 66
|
||
199 000001A8 7064 move #100,R0
|
||
200 000001AA 48C0 ext.l R0
|
||
201 000001AC 2D40FFF8 move.l R0,-8(R14)
|
||
202 000001B0 2D40FFFC move.l R0,-4(R14)
|
||
203 *line 67
|
||
204 000001B4 322EFFF6 move -10(R14),R1
|
||
205 000001B8 202EFFF8 move.l -8(R14),R0
|
||
206 000001BC E2A0 asr.l R1,R0
|
||
207 000001BE 2D40FFF8 move.l R0,-8(R14)
|
||
208 *line 68
|
||
209 000001C2 202EFFFC move.l -4(R14),R0
|
||
210 000001C6 322EFFF6 move -10(R14),R1
|
||
211 000001CA E2A0 asr.l R1,R0
|
||
212 000001CC 2D40FFFC move.l R0,-4(R14)
|
||
213 *line 69
|
||
214 000001D0 202EFFF8 move.l -8(R14),R0
|
||
215 000001D4 B0AEFFFC cmp.l -4(R14),R0
|
||
216 000001D8 6708 beq L13
|
||
217 *line 69
|
||
218 000001DA 3EBC0006 move #6,(sp)
|
||
219 000001DE 4EB807F8 jsr _error
|
||
220 L13:
|
||
221 *line 71
|
||
222 000001E2 7064 move #100,R0
|
||
223 000001E4 48C0 ext.l R0
|
||
224 000001E6 2D40FFF8 move.l R0,-8(R14)
|
||
225 000001EA 2D40FFFC move.l R0,-4(R14)
|
||
226 *line 72
|
||
227 000001EE 302EFFF6 move -10(R14),R0
|
||
228 000001F2 48C0 ext.l R0
|
||
229 000001F4 C1AEFFF8 and.l R0,-8(R14)
|
||
230 *line 73
|
||
231 000001F8 302EFFF6 move -10(R14),R0
|
||
232 000001FC 48C0 ext.l R0
|
||
233 000001FE C0AEFFFC and.l -4(R14),R0
|
||
234 00000202 2D40FFFC move.l R0,-4(R14)
|
||
235 *line 74
|
||
236 00000206 202EFFF8 move.l -8(R14),R0
|
||
237 0000020A B0AEFFFC cmp.l -4(R14),R0
|
||
238 0000020E 6708 beq L14
|
||
239 *line 74
|
||
240 00000210 3EBC0007 move #7,(sp)
|
||
241 00000214 4EB807F8 jsr _error
|
||
242 L14:
|
||
243 *line 76
|
||
244 00000218 7064 move #100,R0
|
||
245 0000021A 48C0 ext.l R0
|
||
246 0000021C 2D40FFF8 move.l R0,-8(R14)
|
||
247 00000220 2D40FFFC move.l R0,-4(R14)
|
||
248 *line 77
|
||
249 00000224 302EFFF6 move -10(R14),R0
|
||
250 00000228 48C0 ext.l R0
|
||
251 0000022A 81AEFFF8 or.l R0,-8(R14)
|
||
252 *line 78
|
||
253 0000022E 302EFFF6 move -10(R14),R0
|
||
254 00000232 48C0 ext.l R0
|
||
255 00000234 80AEFFFC or.l -4(R14),R0
|
||
256 00000238 2D40FFFC move.l R0,-4(R14)
|
||
257 *line 79
|
||
258 0000023C 202EFFF8 move.l -8(R14),R0
|
||
259 00000240 B0AEFFFC cmp.l -4(R14),R0
|
||
260 00000244 6708 beq L15
|
||
261 *line 79
|
||
262 00000246 3EBC0008 move #8,(sp)
|
||
263 0000024A 4EB807F8 jsr _error
|
||
264 L15:
|
||
265 *line 81
|
||
266 0000024E 7064 move #100,R0
|
||
267 00000250 48C0 ext.l R0
|
||
268 00000252 2D40FFF8 move.l R0,-8(R14)
|
||
269 00000256 2D40FFFC move.l R0,-4(R14)
|
||
270 *line 82
|
||
271 0000025A 302EFFF6 move -10(R14),R0
|
||
272 0000025E 48C0 ext.l R0
|
||
273 00000260 B1AEFFF8 eor.l R0,-8(R14)
|
||
274 *line 83
|
||
275 00000264 302EFFF6 move -10(R14),R0
|
||
276 00000268 48C0 ext.l R0
|
||
277 0000026A 222EFFFC move.l -4(R14),R1
|
||
278 0000026E B380 eor.l R1,R0
|
||
279 00000270 2D40FFFC move.l R0,-4(R14)
|
||
280 *line 84
|
||
281 00000274 202EFFF8 move.l -8(R14),R0
|
||
282 00000278 B0AEFFFC cmp.l -4(R14),R0
|
||
283 0000027C 6708 beq L16
|
||
284 *line 84
|
||
285 0000027E 3EBC0009 move #9,(sp)
|
||
286 00000282 4EB807F8 jsr _error
|
||
287 00000286 4E5E L16:L6:unlk R14
|
||
288 00000288 4E75 rts
|
||
289 .globl _rl_vs_i
|
||
290 0000028A .text
|
||
291 _rl_vs_i:
|
||
292 ~~rl_vs_i:
|
||
293 ~i=-2
|
||
294 ~regl=R7
|
||
295 ~regl1=R6
|
||
296 0000028A 4E56FFFE link R14,#-2
|
||
297 0000028E 48E70700 movem.lR5-R7,-(sp)
|
||
298 *line 92
|
||
299 00000292 3D7C0003FFFE move #3,-2(R14)
|
||
300 *line 93
|
||
301 00000298 7C64 move.l #100,R6
|
||
302 0000029A 2E06 move.l R6,R7
|
||
303 *line 94
|
||
304 0000029C 302EFFFE move -2(R14),R0
|
||
305 000002A0 48C0 ext.l R0
|
||
306 000002A2 2F00 move.l R0,-(sp)
|
||
307 000002A4 2F06 move.l R6,-(sp)
|
||
308 000002A6 4EB80000 jsr lmul
|
||
309 000002AA 508F addq.l #8,sp
|
||
310 000002AC 2C00 move.l R0,R6
|
||
311 *line 95
|
||
312 000002AE 302EFFFE move -2(R14),R0
|
||
313 000002B2 48C0 ext.l R0
|
||
314 000002B4 2F00 move.l R0,-(sp)
|
||
315 000002B6 2F07 move.l R7,-(sp)
|
||
316 000002B8 4EB80000 jsr lmul
|
||
317 000002BC 508F addq.l #8,sp
|
||
318 000002BE 2E00 move.l R0,R7
|
||
319 *line 96
|
||
320 000002C0 BC87 cmp.l R7,R6
|
||
321 000002C2 6708 beq L18
|
||
322 *line 96
|
||
323 000002C4 3EBC0010 move #16,(sp)
|
||
324 000002C8 4EB807F8 jsr _error
|
||
325 L18:
|
||
326 *line 98
|
||
327 000002CC 7C64 move.l #100,R6
|
||
328 000002CE 2E06 move.l R6,R7
|
||
329 *line 99
|
||
330 000002D0 8DEEFFFE divs -2(R14),R6
|
||
331 000002D4 48C6 ext.l R6
|
||
332 *line 100
|
||
333 000002D6 8FEEFFFE divs -2(R14),R7
|
||
334 000002DA 48C7 ext.l R7
|
||
335 *line 101
|
||
336 000002DC BC87 cmp.l R7,R6
|
||
337 000002DE 6708 beq L19
|
||
338 *line 101
|
||
339 000002E0 3EBC0011 move #17,(sp)
|
||
340 000002E4 4EB807F8 jsr _error
|
||
341 L19:
|
||
342 *line 103
|
||
343 000002E8 7C64 move.l #100,R6
|
||
344 000002EA 2E06 move.l R6,R7
|
||
345 *line 104
|
||
346 000002EC 302EFFFE move -2(R14),R0
|
||
347 000002F0 48C0 ext.l R0
|
||
348 000002F2 DC80 add.l R0,R6
|
||
349 *line 105
|
||
350 000002F4 302EFFFE move -2(R14),R0
|
||
351 000002F8 48C0 ext.l R0
|
||
352 000002FA DE80 add.l R0,R7
|
||
353 *line 106
|
||
354 000002FC BC87 cmp.l R7,R6
|
||
355 000002FE 6708 beq L20
|
||
356 *line 106
|
||
357 00000300 3EBC0012 move #18,(sp)
|
||
358 00000304 4EB807F8 jsr _error
|
||
359 L20:
|
||
360 *line 108
|
||
361 00000308 7C64 move.l #100,R6
|
||
362 0000030A 2E06 move.l R6,R7
|
||
363 *line 109
|
||
364 0000030C 302EFFFE move -2(R14),R0
|
||
365 00000310 48C0 ext.l R0
|
||
366 00000312 9C80 sub.l R0,R6
|
||
367 *line 110
|
||
368 00000314 302EFFFE move -2(R14),R0
|
||
369 00000318 48C0 ext.l R0
|
||
370 0000031A 9E80 sub.l R0,R7
|
||
371 *line 111
|
||
372 0000031C BC87 cmp.l R7,R6
|
||
373 0000031E 6708 beq L21
|
||
374 *line 111
|
||
375 00000320 3EBC0013 move #19,(sp)
|
||
376 00000324 4EB807F8 jsr _error
|
||
377 L21:
|
||
378 *line 113
|
||
379 00000328 7C64 move.l #100,R6
|
||
380 0000032A 2E06 move.l R6,R7
|
||
381 *line 114
|
||
382 0000032C 8DEEFFFE divs -2(R14),R6
|
||
383 00000330 4846 swap R6
|
||
384 00000332 48C6 ext.l R6
|
||
385 *line 115
|
||
386 00000334 8FEEFFFE divs -2(R14),R7
|
||
387 00000338 4847 swap R7
|
||
388 0000033A 48C7 ext.l R7
|
||
389 *line 116
|
||
390 0000033C BC87 cmp.l R7,R6
|
||
391 0000033E 6708 beq L22
|
||
392 *line 116
|
||
393 00000340 3EBC0014 move #20,(sp)
|
||
394 00000344 4EB807F8 jsr _error
|
||
395 L22:
|
||
396 *line 118
|
||
397 00000348 7C64 move.l #100,R6
|
||
398 0000034A 2E06 move.l R6,R7
|
||
399 *line 119
|
||
400 0000034C 4280 clr.l R0
|
||
401 0000034E 302EFFFE move -2(R14),R0
|
||
402 00000352 E1A6 asl.l R0,R6
|
||
403 *line 120
|
||
404 00000354 4280 clr.l R0
|
||
405 00000356 302EFFFE move -2(R14),R0
|
||
406 0000035A E1A7 asl.l R0,R7
|
||
407 *line 121
|
||
408 0000035C BC87 cmp.l R7,R6
|
||
409 0000035E 6708 beq L23
|
||
410 *line 121
|
||
411 00000360 3EBC0015 move #21,(sp)
|
||
412 00000364 4EB807F8 jsr _error
|
||
413 L23:
|
||
414 *line 123
|
||
415 00000368 7C64 move.l #100,R6
|
||
416 0000036A 2E06 move.l R6,R7
|
||
417 *line 124
|
||
418 0000036C 4280 clr.l R0
|
||
419 0000036E 302EFFFE move -2(R14),R0
|
||
420 00000372 E0A6 asr.l R0,R6
|
||
421 *line 125
|
||
422 00000374 4280 clr.l R0
|
||
423 00000376 302EFFFE move -2(R14),R0
|
||
424 0000037A E0A7 asr.l R0,R7
|
||
425 *line 126
|
||
426 0000037C BC87 cmp.l R7,R6
|
||
427 0000037E 6708 beq L24
|
||
428 *line 126
|
||
429 00000380 3EBC0016 move #22,(sp)
|
||
430 00000384 4EB807F8 jsr _error
|
||
431 L24:
|
||
432 *line 128
|
||
433 00000388 7C64 move.l #100,R6
|
||
434 0000038A 2E06 move.l R6,R7
|
||
435 *line 129
|
||
436 0000038C 302EFFFE move -2(R14),R0
|
||
437 00000390 48C0 ext.l R0
|
||
438 00000392 CC80 and.l R0,R6
|
||
439 *line 130
|
||
440 00000394 302EFFFE move -2(R14),R0
|
||
441 00000398 48C0 ext.l R0
|
||
442 0000039A CE80 and.l R0,R7
|
||
443 *line 131
|
||
444 0000039C BC87 cmp.l R7,R6
|
||
445 0000039E 6708 beq L25
|
||
446 *line 131
|
||
447 000003A0 3EBC0017 move #23,(sp)
|
||
448 000003A4 4EB807F8 jsr _error
|
||
449 L25:
|
||
450 *line 133
|
||
451 000003A8 7C64 move.l #100,R6
|
||
452 000003AA 2E06 move.l R6,R7
|
||
453 *line 134
|
||
454 000003AC 302EFFFE move -2(R14),R0
|
||
455 000003B0 48C0 ext.l R0
|
||
456 000003B2 8C80 or.l R0,R6
|
||
457 *line 135
|
||
458 000003B4 302EFFFE move -2(R14),R0
|
||
459 000003B8 48C0 ext.l R0
|
||
460 000003BA 8E80 or.l R0,R7
|
||
461 *line 136
|
||
462 000003BC BC87 cmp.l R7,R6
|
||
463 000003BE 6708 beq L26
|
||
464 *line 136
|
||
465 000003C0 3EBC0018 move #24,(sp)
|
||
466 000003C4 4EB807F8 jsr _error
|
||
467 L26:
|
||
468 *line 138
|
||
469 000003C8 7C64 move.l #100,R6
|
||
470 000003CA 2E06 move.l R6,R7
|
||
471 *line 139
|
||
472 000003CC 302EFFFE move -2(R14),R0
|
||
473 000003D0 48C0 ext.l R0
|
||
474 000003D2 B186 eor.l R0,R6
|
||
475 *line 140
|
||
476 000003D4 302EFFFE move -2(R14),R0
|
||
477 000003D8 48C0 ext.l R0
|
||
478 000003DA B187 eor.l R0,R7
|
||
479 *line 141
|
||
480 000003DC BC87 cmp.l R7,R6
|
||
481 000003DE 6708 beq L27
|
||
482 *line 141
|
||
483 000003E0 3EBC0019 move #25,(sp)
|
||
484 000003E4 4EB807F8 jsr _error
|
||
485 000003E8 4A9F L27:L17:tst.l (sp)+
|
||
486 000003EA 4CDF00C0 movem.l(sp)+,R6-R7
|
||
487 000003EE 4E5E unlk R14
|
||
488 000003F0 4E75 rts
|
||
489 .globl _l_vs_ri
|
||
490 000003F2 .text
|
||
491 _l_vs_ri:
|
||
492 ~~l_vs_ri:
|
||
493 ~autol=-4
|
||
494 ~autol1=-8
|
||
495 ~i=R7
|
||
496 000003F2 4E56FFF8 link R14,#-8
|
||
497 000003F6 48E70300 movem.lR6-R7,-(sp)
|
||
498 *line 149
|
||
499 000003FA 7E02 move #2,R7
|
||
500 *line 150
|
||
501 000003FC 7064 move #100,R0
|
||
502 000003FE 48C0 ext.l R0
|
||
503 00000400 2D40FFF8 move.l R0,-8(R14)
|
||
504 00000404 2D40FFFC move.l R0,-4(R14)
|
||
505 *line 151
|
||
506 00000408 3007 move R7,R0
|
||
507 0000040A 48C0 ext.l R0
|
||
508 0000040C 2F00 move.l R0,-(sp)
|
||
509 0000040E 2F2EFFF8 move.l -8(R14),-(sp)
|
||
510 00000412 4EB80000 jsr lmul
|
||
511 00000416 508F addq.l #8,sp
|
||
512 00000418 2D40FFF8 move.l R0,-8(R14)
|
||
513 *line 152
|
||
514 0000041C 3007 move R7,R0
|
||
515 0000041E 48C0 ext.l R0
|
||
516 00000420 2F00 move.l R0,-(sp)
|
||
517 00000422 2F2EFFFC move.l -4(R14),-(sp)
|
||
518 00000426 4EB80000 jsr lmul
|
||
519 0000042A 508F addq.l #8,sp
|
||
520 0000042C 2D40FFFC move.l R0,-4(R14)
|
||
521 *line 153
|
||
522 00000430 202EFFF8 move.l -8(R14),R0
|
||
523 00000434 B0AEFFFC cmp.l -4(R14),R0
|
||
524 00000438 6708 beq L29
|
||
525 *line 153
|
||
526 0000043A 3EBC0020 move #32,(sp)
|
||
527 0000043E 4EB807F8 jsr _error
|
||
528 L29:
|
||
529 *line 155
|
||
530 00000442 7064 move #100,R0
|
||
531 00000444 48C0 ext.l R0
|
||
532 00000446 2D40FFF8 move.l R0,-8(R14)
|
||
533 0000044A 2D40FFFC move.l R0,-4(R14)
|
||
534 *line 156
|
||
535 0000044E 202EFFF8 move.l -8(R14),R0
|
||
536 00000452 81C7 divs R7,R0
|
||
537 00000454 48C0 ext.l R0
|
||
538 00000456 2D40FFF8 move.l R0,-8(R14)
|
||
539 *line 157
|
||
540 0000045A 202EFFFC move.l -4(R14),R0
|
||
541 0000045E 81C7 divs R7,R0
|
||
542 00000460 48C0 ext.l R0
|
||
543 00000462 2D40FFFC move.l R0,-4(R14)
|
||
544 *line 158
|
||
545 00000466 202EFFF8 move.l -8(R14),R0
|
||
546 0000046A B0AEFFFC cmp.l -4(R14),R0
|
||
547 0000046E 6708 beq L30
|
||
548 *line 158
|
||
549 00000470 3EBC0021 move #33,(sp)
|
||
550 00000474 4EB807F8 jsr _error
|
||
551 L30:
|
||
552 *line 160
|
||
553 00000478 7064 move #100,R0
|
||
554 0000047A 48C0 ext.l R0
|
||
555 0000047C 2D40FFF8 move.l R0,-8(R14)
|
||
556 00000480 2D40FFFC move.l R0,-4(R14)
|
||
557 *line 161
|
||
558 00000484 3007 move R7,R0
|
||
559 00000486 48C0 ext.l R0
|
||
560 00000488 D1AEFFF8 add.l R0,-8(R14)
|
||
561 *line 162
|
||
562 0000048C 3007 move R7,R0
|
||
563 0000048E 48C0 ext.l R0
|
||
564 00000490 D0AEFFFC add.l -4(R14),R0
|
||
565 00000494 2D40FFFC move.l R0,-4(R14)
|
||
566 *line 163
|
||
567 00000498 202EFFF8 move.l -8(R14),R0
|
||
568 0000049C B0AEFFFC cmp.l -4(R14),R0
|
||
569 000004A0 6708 beq L31
|
||
570 *line 163
|
||
571 000004A2 3EBC0022 move #34,(sp)
|
||
572 000004A6 4EB807F8 jsr _error
|
||
573 L31:
|
||
574 *line 165
|
||
575 000004AA 7064 move #100,R0
|
||
576 000004AC 48C0 ext.l R0
|
||
577 000004AE 2D40FFF8 move.l R0,-8(R14)
|
||
578 000004B2 2D40FFFC move.l R0,-4(R14)
|
||
579 *line 166
|
||
580 000004B6 3007 move R7,R0
|
||
581 000004B8 48C0 ext.l R0
|
||
582 000004BA 91AEFFF8 sub.l R0,-8(R14)
|
||
583 *line 167
|
||
584 000004BE 202EFFFC move.l -4(R14),R0
|
||
585 000004C2 3207 move R7,R1
|
||
586 000004C4 48C1 ext.l R1
|
||
587 000004C6 9081 sub.l R1,R0
|
||
588 000004C8 2D40FFFC move.l R0,-4(R14)
|
||
589 *line 168
|
||
590 000004CC 202EFFF8 move.l -8(R14),R0
|
||
591 000004D0 B0AEFFFC cmp.l -4(R14),R0
|
||
592 000004D4 6708 beq L32
|
||
593 *line 168
|
||
594 000004D6 3EBC0023 move #35,(sp)
|
||
595 000004DA 4EB807F8 jsr _error
|
||
596 L32:
|
||
597 *line 170
|
||
598 000004DE 7064 move #100,R0
|
||
599 000004E0 48C0 ext.l R0
|
||
600 000004E2 2D40FFF8 move.l R0,-8(R14)
|
||
601 000004E6 2D40FFFC move.l R0,-4(R14)
|
||
602 *line 171
|
||
603 000004EA 202EFFF8 move.l -8(R14),R0
|
||
604 000004EE 81C7 divs R7,R0
|
||
605 000004F0 4840 swap R0
|
||
606 000004F2 48C0 ext.l R0
|
||
607 000004F4 2D40FFF8 move.l R0,-8(R14)
|
||
608 *line 172
|
||
609 000004F8 202EFFFC move.l -4(R14),R0
|
||
610 000004FC 81C7 divs R7,R0
|
||
611 000004FE 4840 swap R0
|
||
612 00000500 48C0 ext.l R0
|
||
613 00000502 2D40FFFC move.l R0,-4(R14)
|
||
614 *line 173
|
||
615 00000506 202EFFF8 move.l -8(R14),R0
|
||
616 0000050A B0AEFFFC cmp.l -4(R14),R0
|
||
617 0000050E 6708 beq L33
|
||
618 *line 173
|
||
619 00000510 3EBC0024 move #36,(sp)
|
||
620 00000514 4EB807F8 jsr _error
|
||
621 L33:
|
||
622 *line 175
|
||
623 00000518 7064 move #100,R0
|
||
624 0000051A 48C0 ext.l R0
|
||
625 0000051C 2D40FFF8 move.l R0,-8(R14)
|
||
626 00000520 2D40FFFC move.l R0,-4(R14)
|
||
627 *line 176
|
||
628 00000524 3207 move R7,R1
|
||
629 00000526 202EFFF8 move.l -8(R14),R0
|
||
630 0000052A E3A0 asl.l R1,R0
|
||
631 0000052C 2D40FFF8 move.l R0,-8(R14)
|
||
632 *line 177
|
||
633 00000530 202EFFFC move.l -4(R14),R0
|
||
634 00000534 3207 move R7,R1
|
||
635 00000536 E3A0 asl.l R1,R0
|
||
636 00000538 2D40FFFC move.l R0,-4(R14)
|
||
637 *line 178
|
||
638 0000053C 202EFFF8 move.l -8(R14),R0
|
||
639 00000540 B0AEFFFC cmp.l -4(R14),R0
|
||
640 00000544 6708 beq L34
|
||
641 *line 178
|
||
642 00000546 3EBC0025 move #37,(sp)
|
||
643 0000054A 4EB807F8 jsr _error
|
||
644 L34:
|
||
645 *line 180
|
||
646 0000054E 7064 move #100,R0
|
||
647 00000550 48C0 ext.l R0
|
||
648 00000552 2D40FFF8 move.l R0,-8(R14)
|
||
649 00000556 2D40FFFC move.l R0,-4(R14)
|
||
650 *line 181
|
||
651 0000055A 3207 move R7,R1
|
||
652 0000055C 202EFFF8 move.l -8(R14),R0
|
||
653 00000560 E2A0 asr.l R1,R0
|
||
654 00000562 2D40FFF8 move.l R0,-8(R14)
|
||
655 *line 182
|
||
656 00000566 202EFFFC move.l -4(R14),R0
|
||
657 0000056A 3207 move R7,R1
|
||
658 0000056C E2A0 asr.l R1,R0
|
||
659 0000056E 2D40FFFC move.l R0,-4(R14)
|
||
660 *line 183
|
||
661 00000572 202EFFF8 move.l -8(R14),R0
|
||
662 00000576 B0AEFFFC cmp.l -4(R14),R0
|
||
663 0000057A 6708 beq L35
|
||
664 *line 183
|
||
665 0000057C 3EBC0026 move #38,(sp)
|
||
666 00000580 4EB807F8 jsr _error
|
||
667 L35:
|
||
668 *line 185
|
||
669 00000584 7064 move #100,R0
|
||
670 00000586 48C0 ext.l R0
|
||
671 00000588 2D40FFF8 move.l R0,-8(R14)
|
||
672 0000058C 2D40FFFC move.l R0,-4(R14)
|
||
673 *line 186
|
||
674 00000590 3007 move R7,R0
|
||
675 00000592 48C0 ext.l R0
|
||
676 00000594 C1AEFFF8 and.l R0,-8(R14)
|
||
677 *line 187
|
||
678 00000598 3007 move R7,R0
|
||
679 0000059A 48C0 ext.l R0
|
||
680 0000059C C0AEFFFC and.l -4(R14),R0
|
||
681 000005A0 2D40FFFC move.l R0,-4(R14)
|
||
682 *line 188
|
||
683 000005A4 202EFFF8 move.l -8(R14),R0
|
||
684 000005A8 B0AEFFFC cmp.l -4(R14),R0
|
||
685 000005AC 6708 beq L36
|
||
686 *line 188
|
||
687 000005AE 3EBC0027 move #39,(sp)
|
||
688 000005B2 4EB807F8 jsr _error
|
||
689 L36:
|
||
690 *line 190
|
||
691 000005B6 7064 move #100,R0
|
||
692 000005B8 48C0 ext.l R0
|
||
693 000005BA 2D40FFF8 move.l R0,-8(R14)
|
||
694 000005BE 2D40FFFC move.l R0,-4(R14)
|
||
695 *line 191
|
||
696 000005C2 3007 move R7,R0
|
||
697 000005C4 48C0 ext.l R0
|
||
698 000005C6 81AEFFF8 or.l R0,-8(R14)
|
||
699 *line 192
|
||
700 000005CA 3007 move R7,R0
|
||
701 000005CC 48C0 ext.l R0
|
||
702 000005CE 80AEFFFC or.l -4(R14),R0
|
||
703 000005D2 2D40FFFC move.l R0,-4(R14)
|
||
704 *line 193
|
||
705 000005D6 202EFFF8 move.l -8(R14),R0
|
||
706 000005DA B0AEFFFC cmp.l -4(R14),R0
|
||
707 000005DE 6708 beq L37
|
||
708 *line 193
|
||
709 000005E0 3EBC0028 move #40,(sp)
|
||
710 000005E4 4EB807F8 jsr _error
|
||
711 L37:
|
||
712 *line 195
|
||
713 000005E8 7064 move #100,R0
|
||
714 000005EA 48C0 ext.l R0
|
||
715 000005EC 2D40FFF8 move.l R0,-8(R14)
|
||
716 000005F0 2D40FFFC move.l R0,-4(R14)
|
||
717 *line 196
|
||
718 000005F4 3007 move R7,R0
|
||
719 000005F6 48C0 ext.l R0
|
||
720 000005F8 B1AEFFF8 eor.l R0,-8(R14)
|
||
721 *line 197
|
||
722 000005FC 3007 move R7,R0
|
||
723 000005FE 48C0 ext.l R0
|
||
724 00000600 222EFFFC move.l -4(R14),R1
|
||
725 00000604 B380 eor.l R1,R0
|
||
726 00000606 2D40FFFC move.l R0,-4(R14)
|
||
727 *line 198
|
||
728 0000060A 202EFFF8 move.l -8(R14),R0
|
||
729 0000060E B0AEFFFC cmp.l -4(R14),R0
|
||
730 00000612 6708 beq L38
|
||
731 *line 198
|
||
732 00000614 3EBC0029 move #41,(sp)
|
||
733 00000618 4EB807F8 jsr _error
|
||
734 0000061C 4A9F L38:L28:tst.l (sp)+
|
||
735 0000061E 4CDF0080 movem.l(sp)+,R7-R7
|
||
736 00000622 4E5E unlk R14
|
||
737 00000624 4E75 rts
|
||
738 .globl _rl_vs_ri
|
||
739 00000626 .text
|
||
740 _rl_vs_ri:
|
||
741 ~~rl_vs_ri:
|
||
742 ~i=R5
|
||
743 ~regl=R7
|
||
744 ~regl1=R6
|
||
745 00000626 4E560000 link R14,#0
|
||
746 0000062A 48E70F00 movem.lR4-R7,-(sp)
|
||
747 *line 206
|
||
748 0000062E 7A03 move #3,R5
|
||
749 *line 207
|
||
750 00000630 7C64 move.l #100,R6
|
||
751 00000632 2E06 move.l R6,R7
|
||
752 *line 208
|
||
753 00000634 3005 move R5,R0
|
||
754 00000636 48C0 ext.l R0
|
||
755 00000638 2F00 move.l R0,-(sp)
|
||
756 0000063A 2F06 move.l R6,-(sp)
|
||
757 0000063C 4EB80000 jsr lmul
|
||
758 00000640 508F addq.l #8,sp
|
||
759 00000642 2C00 move.l R0,R6
|
||
760 *line 209
|
||
761 00000644 3005 move R5,R0
|
||
762 00000646 48C0 ext.l R0
|
||
763 00000648 2F00 move.l R0,-(sp)
|
||
764 0000064A 2F07 move.l R7,-(sp)
|
||
765 0000064C 4EB80000 jsr lmul
|
||
766 00000650 508F addq.l #8,sp
|
||
767 00000652 2E00 move.l R0,R7
|
||
768 *line 210
|
||
769 00000654 BC87 cmp.l R7,R6
|
||
770 00000656 6708 beq L40
|
||
771 *line 210
|
||
772 00000658 3EBC0030 move #48,(sp)
|
||
773 0000065C 4EB807F8 jsr _error
|
||
774 L40:
|
||
775 *line 212
|
||
776 00000660 7C64 move.l #100,R6
|
||
777 00000662 2E06 move.l R6,R7
|
||
778 *line 213
|
||
779 00000664 8DC5 divs R5,R6
|
||
780 00000666 48C6 ext.l R6
|
||
781 *line 214
|
||
782 00000668 8FC5 divs R5,R7
|
||
783 0000066A 48C7 ext.l R7
|
||
784 *line 215
|
||
785 0000066C BC87 cmp.l R7,R6
|
||
786 0000066E 6708 beq L41
|
||
787 *line 215
|
||
788 00000670 3EBC0031 move #49,(sp)
|
||
789 00000674 4EB807F8 jsr _error
|
||
790 L41:
|
||
791 *line 217
|
||
792 00000678 7C64 move.l #100,R6
|
||
793 0000067A 2E06 move.l R6,R7
|
||
794 *line 218
|
||
795 0000067C 3005 move R5,R0
|
||
796 0000067E 48C0 ext.l R0
|
||
797 00000680 DC80 add.l R0,R6
|
||
798 *line 219
|
||
799 00000682 3005 move R5,R0
|
||
800 00000684 48C0 ext.l R0
|
||
801 00000686 DE80 add.l R0,R7
|
||
802 *line 220
|
||
803 00000688 BC87 cmp.l R7,R6
|
||
804 0000068A 6708 beq L42
|
||
805 *line 220
|
||
806 0000068C 3EBC0032 move #50,(sp)
|
||
807 00000690 4EB807F8 jsr _error
|
||
808 L42:
|
||
809 *line 222
|
||
810 00000694 7C64 move.l #100,R6
|
||
811 00000696 2E06 move.l R6,R7
|
||
812 *line 223
|
||
813 00000698 3005 move R5,R0
|
||
814 0000069A 48C0 ext.l R0
|
||
815 0000069C 9C80 sub.l R0,R6
|
||
816 *line 224
|
||
817 0000069E 3005 move R5,R0
|
||
818 000006A0 48C0 ext.l R0
|
||
819 000006A2 9E80 sub.l R0,R7
|
||
820 *line 225
|
||
821 000006A4 BC87 cmp.l R7,R6
|
||
822 000006A6 6708 beq L43
|
||
823 *line 225
|
||
824 000006A8 3EBC0033 move #51,(sp)
|
||
825 000006AC 4EB807F8 jsr _error
|
||
826 L43:
|
||
827 *line 227
|
||
828 000006B0 7C64 move.l #100,R6
|
||
829 000006B2 2E06 move.l R6,R7
|
||
830 *line 228
|
||
831 000006B4 8DC5 divs R5,R6
|
||
832 000006B6 4846 swap R6
|
||
833 000006B8 48C6 ext.l R6
|
||
834 *line 229
|
||
835 000006BA 8FC5 divs R5,R7
|
||
836 000006BC 4847 swap R7
|
||
837 000006BE 48C7 ext.l R7
|
||
838 *line 230
|
||
839 000006C0 BC87 cmp.l R7,R6
|
||
840 000006C2 6708 beq L44
|
||
841 *line 230
|
||
842 000006C4 3EBC0034 move #52,(sp)
|
||
843 000006C8 4EB807F8 jsr _error
|
||
844 L44:
|
||
845 *line 232
|
||
846 000006CC 7C64 move.l #100,R6
|
||
847 000006CE 2E06 move.l R6,R7
|
||
848 *line 233
|
||
849 000006D0 4280 clr.l R0
|
||
850 000006D2 3005 move R5,R0
|
||
851 000006D4 E1A6 asl.l R0,R6
|
||
852 *line 234
|
||
853 000006D6 4280 clr.l R0
|
||
854 000006D8 3005 move R5,R0
|
||
855 000006DA E1A7 asl.l R0,R7
|
||
856 *line 235
|
||
857 000006DC BC87 cmp.l R7,R6
|
||
858 000006DE 6708 beq L45
|
||
859 *line 235
|
||
860 000006E0 3EBC0035 move #53,(sp)
|
||
861 000006E4 4EB807F8 jsr _error
|
||
862 L45:
|
||
863 *line 237
|
||
864 000006E8 7C64 move.l #100,R6
|
||
865 000006EA 2E06 move.l R6,R7
|
||
866 *line 238
|
||
867 000006EC 4280 clr.l R0
|
||
868 000006EE 3005 move R5,R0
|
||
869 000006F0 E0A6 asr.l R0,R6
|
||
870 *line 239
|
||
871 000006F2 4280 clr.l R0
|
||
872 000006F4 3005 move R5,R0
|
||
873 000006F6 E0A7 asr.l R0,R7
|
||
874 *line 240
|
||
875 000006F8 BC87 cmp.l R7,R6
|
||
876 000006FA 6708 beq L46
|
||
877 *line 240
|
||
878 000006FC 3EBC0036 move #54,(sp)
|
||
879 00000700 4EB807F8 jsr _error
|
||
880 L46:
|
||
881 *line 242
|
||
882 00000704 7C64 move.l #100,R6
|
||
883 00000706 2E06 move.l R6,R7
|
||
884 *line 243
|
||
885 00000708 3005 move R5,R0
|
||
886 0000070A 48C0 ext.l R0
|
||
887 0000070C CC80 and.l R0,R6
|
||
888 *line 244
|
||
889 0000070E 3005 move R5,R0
|
||
890 00000710 48C0 ext.l R0
|
||
891 00000712 CE80 and.l R0,R7
|
||
892 *line 245
|
||
893 00000714 BC87 cmp.l R7,R6
|
||
894 00000716 6708 beq L47
|
||
895 *line 245
|
||
896 00000718 3EBC0037 move #55,(sp)
|
||
897 0000071C 4EB807F8 jsr _error
|
||
898 L47:
|
||
899 *line 247
|
||
900 00000720 7C64 move.l #100,R6
|
||
901 00000722 2E06 move.l R6,R7
|
||
902 *line 248
|
||
903 00000724 3005 move R5,R0
|
||
904 00000726 48C0 ext.l R0
|
||
905 00000728 8C80 or.l R0,R6
|
||
906 *line 249
|
||
907 0000072A 3005 move R5,R0
|
||
908 0000072C 48C0 ext.l R0
|
||
909 0000072E 8E80 or.l R0,R7
|
||
910 *line 250
|
||
911 00000730 BC87 cmp.l R7,R6
|
||
912 00000732 6708 beq L48
|
||
913 *line 250
|
||
914 00000734 3EBC0038 move #56,(sp)
|
||
915 00000738 4EB807F8 jsr _error
|
||
916 L48:
|
||
917 *line 252
|
||
918 0000073C 7C64 move.l #100,R6
|
||
919 0000073E 2E06 move.l R6,R7
|
||
920 *line 253
|
||
921 00000740 3005 move R5,R0
|
||
922 00000742 48C0 ext.l R0
|
||
923 00000744 B186 eor.l R0,R6
|
||
924 *line 254
|
||
925 00000746 3005 move R5,R0
|
||
926 00000748 48C0 ext.l R0
|
||
927 0000074A B187 eor.l R0,R7
|
||
928 *line 255
|
||
929 0000074C BC87 cmp.l R7,R6
|
||
930 0000074E 6708 beq L49
|
||
931 *line 255
|
||
932 00000750 3EBC0039 move #57,(sp)
|
||
933 00000754 4EB807F8 jsr _error
|
||
934 00000758 4A9F L49:L39:tst.l (sp)+
|
||
935 0000075A 4CDF00E0 movem.l(sp)+,R5-R7
|
||
936 0000075E 4E5E unlk R14
|
||
937 00000760 4E75 rts
|
||
938 .globl _v41
|
||
939 00000762 .text
|
||
940 _v41:
|
||
941 ~~v41:
|
||
942 ~l=-4
|
||
943 ~l1=-8
|
||
944 00000762 4E56FFF4 link R14,#-12
|
||
945 *line 263
|
||
946 00000766 30380000 move _low,R0
|
||
947 0000076A C07CF000 and #-4096,R0
|
||
948 0000076E 32380000 move _high,R1
|
||
949 00000772 740C move #12,R2
|
||
950 00000774 E469 lsr R2,R1
|
||
951 00000776 C27C000F and #15,R1
|
||
952 0000077A 8041 or R1,R0
|
||
953 0000077C 31C00000 move R0,_low
|
||
954 *line 264
|
||
955 00000780 30380000 move _high,R0
|
||
956 00000784 C07CF000 and #-4096,R0
|
||
957 00000788 32380000 move _low,R1
|
||
958 0000078C 740C move #12,R2
|
||
959 0000078E E469 lsr R2,R1
|
||
960 00000790 C27C000F and #15,R1
|
||
961 00000794 8041 or R1,R0
|
||
962 00000796 31C00000 move R0,_high
|
||
963 *line 266
|
||
964 0000079A 702D move.l #$2d,R0
|
||
965 0000079C 2D40FFF8 move.l R0,-8(R14)
|
||
966 000007A0 2D40FFFC move.l R0,-4(R14)
|
||
967 *line 268
|
||
968 *line 269
|
||
969 000007A4 202EFFFC move.l -4(R14),R0
|
||
970 000007A8 B0AEFFF8 cmp.l -8(R14),R0
|
||
971 000007AC 6706 beq L51
|
||
972 *line 269
|
||
973 000007AE 3EBC0040 move #64,(sp)
|
||
974 000007B2 6144 jsr _error
|
||
975 L51:
|
||
976 *line 270
|
||
977 *line 271
|
||
978 000007B4 202EFFFC move.l -4(R14),R0
|
||
979 000007B8 B0AEFFF8 cmp.l -8(R14),R0
|
||
980 000007BC 6706 beq L52
|
||
981 *line 271
|
||
982 000007BE 3EBC0041 move #65,(sp)
|
||
983 000007C2 6134 jsr _error
|
||
984 L52:
|
||
985 *line 272
|
||
986 *line 273
|
||
987 000007C4 202EFFFC move.l -4(R14),R0
|
||
988 000007C8 B0AEFFF8 cmp.l -8(R14),R0
|
||
989 000007CC 6706 beq L53
|
||
990 *line 273
|
||
991 000007CE 3EBC0042 move #66,(sp)
|
||
992 000007D2 6124 jsr _error
|
||
993 L53:
|
||
994 *line 274
|
||
995 000007D4 42AEFFFC clr.l -4(R14)
|
||
996 *line 275
|
||
997 000007D8 4AAEFFFC tst.l -4(R14)
|
||
998 000007DC 6706 beq L54
|
||
999 *line 275
|
||
1000 000007DE 3EBC0043 move #67,(sp)
|
||
1001 000007E2 6114 jsr _error
|
||
1002 L54:
|
||
1003 *line 276
|
||
1004 000007E4 42AEFFF8 clr.l -8(R14)
|
||
1005 *line 277
|
||
1006 000007E8 4AAEFFF8 tst.l -8(R14)
|
||
1007 000007EC 6706 beq L55
|
||
1008 *line 277
|
||
1009 000007EE 3EBC0044 move #68,(sp)
|
||
1010 000007F2 6104 jsr _error
|
||
1011 000007F4 4E5E L55:L50:unlk R14
|
||
1012 000007F6 4E75 rts
|
||
1013 .globl _error
|
||
1014 000007F8 .text
|
||
1015 _error:
|
||
1016 ~~error:
|
||
1017 ~pc=8
|
||
1018 000007F8 4E56FFFC link R14,#-4
|
||
1019 *line 282
|
||
1020 000007FC 3EAE0008 move 8(R14),(sp)
|
||
1021 00000800 2F3C00000027 move.l #L57,-(sp)
|
||
1022 00000806 4EB80000 jsr _printf
|
||
1023 0000080A 588F addq.l #4,sp
|
||
1024 *line 283
|
||
1025 0000080C 52780000 add #1,_err
|
||
1026 00000810 4E5E L56:unlk R14
|
||
1027 00000812 4E75 rts
|
||
1028 00000004 .data
|
||
1029 00000004 4661722046726561 L3:.dc.b 70,97,114,32,70,114,101,97,107,105,110,103,32,79,117,116,10,0
|
||
1029 0000000C 6B696E67204F7574
|
||
1029 00000014 0A00
|
||
1030 00000016 546F756768204C75 L5:.dc.b 84,111,117,103,104,32,76,117,99,107,46,46,46,46,46,10,0
|
||
1030 0000001E 636B2E2E2E2E2E0A
|
||
1030 00000026 00
|
||
1031 00000027 6572726F72202578 L57:.dc.b 101,114,114,111,114,32,37,120,10,0
|
||
|
||
|
||
-EXTERNAL SYMBOLS-
|
||
_low
|
||
_high
|
||
_err
|
||
lmul
|
||
_printf
|
||
|
||
|
||
_globali 00000000 DATA
|
||
_globalu 00000002 DATA
|
||
_main 00000000 TEXT
|
||
~~main 00000000 TEXT
|
||
_l_vs_i 00000036 TEXT
|
||
_rl_vs_i 0000028A TEXT
|
||
_l_vs_ri 000003F2 TEXT
|
||
_rl_vs_r 00000626 TEXT
|
||
_v41 00000762 TEXT
|
||
L2 00000028 TEXT
|
||
L3 00000004 DATA
|
||
L4 00000032 TEXT
|
||
L5 00000016 DATA
|
||
L1 00000032 TEXT
|
||
~~l_vs_i 00000036 TEXT
|
||
~autol FFFFFFFC ABS
|
||
~autol1 FFFFFFF8 ABS
|
||
L7 00000088 TEXT
|
||
_error 000007F8 TEXT
|
||
L8 000000C2 TEXT
|
||
L9 000000F8 TEXT
|
||
L10 00000130 TEXT
|
||
L11 0000016E TEXT
|
||
L12 000001A8 TEXT
|
||
L13 000001E2 TEXT
|
||
L14 00000218 TEXT
|
||
L15 0000024E TEXT
|
||
L16 00000286 TEXT
|
||
L6 00000286 TEXT
|
||
~~rl_vs_ 0000028A TEXT
|
||
L18 000002CC TEXT
|
||
L19 000002E8 TEXT
|
||
L20 00000308 TEXT
|
||
L21 00000328 TEXT
|
||
L22 00000348 TEXT
|
||
L23 00000368 TEXT
|
||
L24 00000388 TEXT
|
||
L25 000003A8 TEXT
|
||
L26 000003C8 TEXT
|
||
L27 000003E8 TEXT
|
||
L17 000003E8 TEXT
|
||
~~l_vs_r 000003F2 TEXT
|
||
L29 00000442 TEXT
|
||
L30 00000478 TEXT
|
||
L31 000004AA TEXT
|
||
L32 000004DE TEXT
|
||
L33 00000518 TEXT
|
||
L34 0000054E TEXT
|
||
L35 00000584 TEXT
|
||
L36 000005B6 TEXT
|
||
L37 000005E8 TEXT
|
||
L38 0000061C TEXT
|
||
L28 0000061C TEXT
|
||
~~rl_vs_ 00000626 TEXT
|
||
L40 00000660 TEXT
|
||
L41 00000678 TEXT
|
||
L42 00000694 TEXT
|
||
L43 000006B0 TEXT
|
||
L44 000006CC TEXT
|
||
L45 000006E8 TEXT
|
||
L46 00000704 TEXT
|
||
L47 00000720 TEXT
|
||
L48 0000073C TEXT
|
||
L49 00000758 TEXT
|
||
L39 00000758 TEXT
|
||
~~v41 00000762 TEXT
|
||
~l FFFFFFFC ABS
|
||
~l1 FFFFFFF8 ABS
|
||
L51 000007B4 TEXT
|
||
L52 000007C4 TEXT
|
||
L53 000007D4 TEXT
|
||
L54 000007E4 TEXT
|
||
L55 000007F4 TEXT
|
||
L50 000007F4 TEXT
|
||
~~error 000007F8 TEXT
|
||
~pc 00000008 ABS
|
||
L57 00000027 DATA
|
||
L56 00000810 TEXT
|
||
|