1 .globl _uu 2 .comm _uu,4 3 .globl _s1 4 .comm _s1,8 5 .globl _flags 6 .comm _flags,2 7 .globl _zz 8 .comm _zz,24 9 .globl _c 10 .comm _c,2 11 00000000 .data 12 00000000 737472696E672031 L1:.dc.b 115,116,114,105,110,103,32,49,0 12 00000008 00 13 0000000A .even 14 00000000 .text 15 00000000 .bss 16 00000000 L3:.ds.b 4 17 00000000 .text 18 .globl _l1 19 .comm _l1,4 20 .globl _l2 21 .comm _l2,4 22 .globl _l3 23 .comm _l3,4 24 .globl _ldivr 25 .comm _ldivr,4 26 .globl _initi 27 0000000A .data 28 _initi: 29 0000000A 0001 .dc.w 1 30 .globl _initk 31 0000000C .data 32 _initk: 33 0000000C 0001 .dc.w 1 34 0000000E 0002 .dc.w 2 35 00000010 0003 .dc.w 3 36 .globl _initl 37 00000012 .data 38 _initl: 39 00000012 0001 .dc.w 1 40 00000014 0002 .dc.w 2 41 00000016 0003 .dc.w 3 42 00000018 0004 .dc.w 4 43 0000001A 0005 .dc.w 5 44 0000001C 0006 .dc.w 6 45 0000001E 0007 .dc.w 7 46 00000020 0008 .dc.w 8 47 00000022 0009 .dc.w 9 48 00000024 000A .dc.w 10 49 00000026 000B .dc.w 11 50 00000028 000C .dc.w 12 51 .globl _initx 52 0000002A .data 53 _initx: 54 *line 51 55 0000002A 00000132 .dc.l L4 56 0000002E 00000000 .dc.w 0,0 57 .globl _inits 58 00000032 .data 59 _inits: 60 00000032 0000 .dc.w 0 61 00000034 00000000 .dc.w 0,0 62 00000038 0001 .dc.w 1 63 0000003A 00000001 .dc.w 0,1 64 0000003E 0002 .dc.w 2 65 00000040 00000002 .dc.w 0,2 66 .globl _initc 67 00000044 .data 68 _initc: 69 00000044 7468697320697320 .dc.b 116,104,105,115,32,105,115,32,105,116,0 69 0000004C 697400 70 0000004F .ds.b 9 71 .globl _initd 72 00000058 .data 73 _initd: 74 00000058 74686973206D6967 .dc.b 116,104,105,115,32,109,105,103,104,116,32,98,101,32,105,116,0 74 00000060 6874206265206974 74 00000068 00 75 0000006A .even 76 .globl _inite 77 0000006A .data 78 _inite: 79 0000006A 01 .dc.b 1 80 0000006B 02 .dc.b 2 81 0000006C 03 .dc.b 3 82 0000006D 04 .dc.b 4 83 0000006E 05 .dc.b 5 84 0000006F 06 .dc.b 6 85 00000070 07 .dc.b 7 86 00000071 08 .dc.b 8 87 00000072 09 .dc.b 9 88 00000074 .even 89 .globl _initcc 90 00000074 .data 91 _initcc: 92 *line 65 93 00000074 00000147 .dc.l L7 94 .globl _ccinit 95 00000078 .data 96 _ccinit: 97 00000078 0102 .dc.w 258 98 .globl _ac 99 .comm _ac,4 100 .globl _ai 101 .comm _ai,8 102 .globl _pai 103 0000007A .data 104 _pai: 105 *line 70 106 0000007A 00000002 .dc.l 2+_ai 107 *line 70 108 0000007E 00000006 .dc.l 6+_ai 109 .globl _al 110 .comm _al,16 111 .globl _p0 112 .comm _p0,4 113 .globl _x 114 .comm _x,10 115 .globl _sound 116 00000082 .data 117 _sound: 118 00000082 0001 .dc.w 1 119 *line 95 120 00000084 00000002 .dc.l 2+_x 121 .globl _largear 122 .comm _largear,20000 123 .globl _main 124 00000000 .text 125 _main: 126 ~~main: 127 ~a=-26 128 ~i=R7 129 ~j=-2 130 ~l=L3 131 ~n=-16 132 ~p=R13 133 ~u1=R6 134 ~u2=R5 135 ~u3=-18 136 ~pi=-22 137 ~ai2=-14 138 ~lr1=R4 139 ~str=L1 140 00000000 4E56FFE6 link R14,#-26 141 00000004 48E71F04 movem.lR3-R7/R13-R13,-(sp) 142 *line 131 143 00000008 2EBC00000157 move.l #L9,(sp) 144 0000000E 4EB816A2 jsr _putstrin 145 *line 132 146 00000012 426EFFFE clr -2(R14) 147 00000016 602E bra L12 148 L13: 149 *line 133 150 00000018 11FC00410000 move.b #65,_c 151 *line 134 152 0000001E 4247 clr R7 153 00000020 6012 bra L16 154 L17: 155 *line 135 156 00000022 10380000 move.b _c,R0 157 00000026 4880 ext.w R0 158 00000028 3E80 move R0,(sp) 159 0000002A 4EB80000 jsr _putchar 160 *line 136 161 0000002E 52380000 add.b #1,_c 162 L15: 163 *line 134 164 00000032 5247 add #1,R7 165 L16: 166 *line 134 167 00000034 BE7C003E cmp #62,R7 168 00000038 6DE8 blt L17 169 L14: 170 *line 138 171 0000003A 3EBC000A move #10,(sp) 172 0000003E 4EB80000 jsr _putchar 173 L11: 174 *line 132 175 00000042 526EFFFE add #1,-2(R14) 176 L12: 177 *line 132 178 00000046 0C6E0005FFFE cmp #5,-2(R14) 179 0000004C 6DCA blt L13 180 L10: 181 *line 140 182 0000004E 6006 bra L18 183 *line 140 184 00000050 4257 clr (sp) 185 00000052 4EB81686 jsr _error 186 L18: 187 *line 141 188 00000056 3D47FFFE move R7,-2(R14) 189 *line 142 190 0000005A BE6EFFFE cmp -2(R14),R7 191 0000005E 6708 beq L19 192 *line 142 193 00000060 3EBC000A move #10,(sp) 194 00000064 4EB81686 jsr _error 195 L19: 196 *line 143 197 00000068 6008 bra L20 198 *line 143 199 0000006A 3EBC000B move #11,(sp) 200 0000006E 4EB81686 jsr _error 201 L20: 202 *line 144 203 00000072 6008 bra L21 204 *line 144 205 00000074 3EBC000C move #12,(sp) 206 00000078 4EB81686 jsr _error 207 L21: 208 *line 145 209 0000007C 6008 bra L22 210 *line 145 211 0000007E 3EBC000D move #13,(sp) 212 00000082 4EB81686 jsr _error 213 L22: 214 *line 146 215 00000086 6008 bra L23 216 *line 146 217 00000088 3EBC000E move #14,(sp) 218 0000008C 4EB81686 jsr _error 219 L23: 220 *line 147 221 00000090 6008 bra L24 222 *line 147 223 00000092 3EBC000F move #15,(sp) 224 00000096 4EB81686 jsr _error 225 L24: 226 *line 148 227 0000009A 6008 bra L25 228 *line 148 229 0000009C 3EBC0010 move #16,(sp) 230 000000A0 4EB81686 jsr _error 231 L25: 232 *line 149 233 000000A4 4247 clr R7 234 *line 149 235 000000A6 4A47 tst R7 236 000000A8 6708 beq L26 237 *line 149 238 000000AA 3EBC0001 move #1,(sp) 239 000000AE 4EB81686 jsr _error 240 L26: 241 *line 150 242 000000B2 4A47 tst R7 243 000000B4 6708 beq L27 244 *line 150 245 000000B6 3EBC0002 move #2,(sp) 246 000000BA 4EB81686 jsr _error 247 L27: 248 *line 151 249 000000BE 5247 add #1,R7 250 000000C0 3007 move R7,R0 251 000000C2 B07C0001 cmp #1,R0 252 000000C6 6708 beq L28 253 *line 151 254 000000C8 3EBC0003 move #3,(sp) 255 000000CC 4EB81686 jsr _error 256 L28: 257 *line 152 258 000000D0 E547 asl #2,R7 259 *line 153 260 000000D2 BE7C0004 cmp #4,R7 261 000000D6 6708 beq L29 262 *line 153 263 000000D8 3EBC0004 move #4,(sp) 264 000000DC 4EB81686 jsr _error 265 L29: 266 *line 154 267 000000E0 3007 move R7,R0 268 000000E2 5440 add #2,R0 269 000000E4 DE40 add R0,R7 270 *line 155 271 000000E6 BE7C000A cmp #10,R7 272 000000EA 6708 beq L30 273 *line 155 274 000000EC 3EBC0005 move #5,(sp) 275 000000F0 4EB81686 jsr _error 276 L30: 277 *line 156 278 000000F4 CFFC0006 muls #6,R7 279 *line 157 280 000000F8 BE7C003C cmp #60,R7 281 000000FC 6708 beq L31 282 *line 157 283 000000FE 3EBC0006 move #6,(sp) 284 00000102 4EB81686 jsr _error 285 L31: 286 *line 158 287 00000106 48C7 ext.l R7 288 00000108 8FFC0003 divs #3,R7 289 *line 159 290 0000010C BE7C0014 cmp #20,R7 291 00000110 6708 beq L32 292 *line 159 293 00000112 3EBC0007 move #7,(sp) 294 00000116 4EB81686 jsr _error 295 L32: 296 *line 160 297 0000011A DE7C000C add #12,R7 298 0000011E 8E7C0007 or #7,R7 299 *line 161 300 00000122 BE7C0027 cmp #39,R7 301 00000126 6708 beq L33 302 *line 161 303 00000128 3EBC0008 move #8,(sp) 304 0000012C 4EB81686 jsr _error 305 L33: 306 *line 162 307 00000130 3007 move R7,R0 308 00000132 3207 move R7,R1 309 00000134 E241 asr #1,R1 310 00000136 9041 sub R1,R0 311 00000138 3E00 move R0,R7 312 0000013A 5547 sub #2,R7 313 *line 163 314 0000013C BE7C0012 cmp #18,R7 315 00000140 6708 beq L34 316 *line 163 317 00000142 3EBC0009 move #9,(sp) 318 00000146 4EB81686 jsr _error 319 L34: 320 *line 164 321 0000014A 48C7 ext.l R7 322 0000014C 8FFC0006 divs #6,R7 323 00000150 4847 swap R7 324 *line 165 325 00000152 4A47 tst R7 326 00000154 6708 beq L35 327 *line 165 328 00000156 3EBC0010 move #16,(sp) 329 0000015A 4EB81686 jsr _error 330 L35: 331 *line 166 332 0000015E 426EFFFE clr -2(R14) 333 *line 167 334 00000162 4A6EFFFE tst -2(R14) 335 00000166 6708 beq L36 336 *line 167 337 00000168 3EBC0011 move #17,(sp) 338 0000016C 4EB81686 jsr _error 339 L36: 340 *line 168 341 00000170 4A6EFFFE tst -2(R14) 342 00000174 6708 beq L37 343 *line 168 344 00000176 3EBC0012 move #18,(sp) 345 0000017A 4EB81686 jsr _error 346 L37: 347 *line 169 348 0000017E 526EFFFE add #1,-2(R14) 349 00000182 302EFFFE move -2(R14),R0 350 00000186 B07C0001 cmp #1,R0 351 0000018A 6708 beq L38 352 *line 169 353 0000018C 3EBC0013 move #19,(sp) 354 00000190 4EB81686 jsr _error 355 L38: 356 *line 170 357 00000194 302EFFFE move -2(R14),R0 358 00000198 E540 asl #2,R0 359 0000019A 3D40FFFE move R0,-2(R14) 360 *line 171 361 0000019E 0C6E0004FFFE cmp #4,-2(R14) 362 000001A4 6708 beq L39 363 *line 171 364 000001A6 3EBC0014 move #20,(sp) 365 000001AA 4EB81686 jsr _error 366 L39: 367 *line 172 368 000001AE 302EFFFE move -2(R14),R0 369 000001B2 5440 add #2,R0 370 000001B4 D16EFFFE add R0,-2(R14) 371 *line 173 372 000001B8 0C6E000AFFFE cmp #10,-2(R14) 373 000001BE 6708 beq L40 374 *line 173 375 000001C0 3EBC0015 move #21,(sp) 376 000001C4 4EB81686 jsr _error 377 L40: 378 *line 174 379 000001C8 302EFFFE move -2(R14),R0 380 000001CC C1FC0006 muls #6,R0 381 000001D0 3D40FFFE move R0,-2(R14) 382 *line 175 383 000001D4 0C6E003CFFFE cmp #60,-2(R14) 384 000001DA 6708 beq L41 385 *line 175 386 000001DC 3EBC0016 move #22,(sp) 387 000001E0 4EB81686 jsr _error 388 L41: 389 *line 176 390 000001E4 302EFFFE move -2(R14),R0 391 000001E8 48C0 ext.l R0 392 000001EA 81FC0003 divs #3,R0 393 000001EE 3D40FFFE move R0,-2(R14) 394 *line 177 395 000001F2 0C6E0014FFFE cmp #20,-2(R14) 396 000001F8 6708 beq L42 397 *line 177 398 000001FA 3EBC0017 move #23,(sp) 399 000001FE 4EB81686 jsr _error 400 L42: 401 *line 178 402 00000202 302EFFFE move -2(R14),R0 403 00000206 D07C000C add #12,R0 404 0000020A 807C0007 or #7,R0 405 0000020E 3D40FFFE move R0,-2(R14) 406 *line 179 407 00000212 0C6E0027FFFE cmp #39,-2(R14) 408 00000218 6708 beq L43 409 *line 179 410 0000021A 3EBC0018 move #24,(sp) 411 0000021E 4EB81686 jsr _error 412 L43: 413 *line 180 414 00000222 302EFFFE move -2(R14),R0 415 00000226 322EFFFE move -2(R14),R1 416 0000022A E241 asr #1,R1 417 0000022C 9041 sub R1,R0 418 0000022E 5540 sub #2,R0 419 00000230 3D40FFFE move R0,-2(R14) 420 *line 181 421 00000234 0C6E0012FFFE cmp #18,-2(R14) 422 0000023A 6708 beq L44 423 *line 181 424 0000023C 3EBC0019 move #25,(sp) 425 00000240 4EB81686 jsr _error 426 L44: 427 *line 182 428 00000244 3D7C04CDFFFE move #1229,-2(R14) 429 *line 183 430 0000024A E1EEFFFE asl -2(R14) 431 *line 184 432 0000024E 0C6E099AFFFE cmp #2458,-2(R14) 433 00000254 6708 beq L45 434 *line 184 435 00000256 3EBC020F move #527,(sp) 436 0000025A 4EB81686 jsr _error 437 L45: 438 *line 185 439 0000025E 42B80000 clr.l L3 440 *line 186 441 00000262 4AB80000 tst.l L3 442 00000266 6708 beq L46 443 *line 186 444 00000268 3EBC0021 move #33,(sp) 445 0000026C 4EB81686 jsr _error 446 L46: 447 *line 187 448 00000270 4AB80000 tst.l L3 449 00000274 6708 beq L47 450 *line 187 451 00000276 3EBC0022 move #34,(sp) 452 0000027A 4EB81686 jsr _error 453 L47: 454 *line 188 455 0000027E 52B80000 add.l #1,L3 456 00000282 20380000 move.l L3,R0 457 00000286 B0BC00000001 cmp.l #1,R0 458 0000028C 6708 beq L48 459 *line 188 460 0000028E 3EBC0023 move #35,(sp) 461 00000292 4EB81686 jsr _error 462 L48: 463 *line 189 464 00000296 20380000 move.l L3,R0 465 0000029A E580 asl.l #2,R0 466 0000029C 21C00000 move.l R0,L3 467 *line 190 468 000002A0 0CB8000000040000 cmp.l #4,L3 469 000002A8 6708 beq L49 470 *line 190 471 000002AA 3EBC0024 move #36,(sp) 472 000002AE 4EB81686 jsr _error 473 L49: 474 *line 191 475 000002B2 20380000 move.l L3,R0 476 000002B6 5480 add.l #2,R0 477 000002B8 D1B80000 add.l R0,L3 478 *line 192 479 000002BC 0CB80000000A0000 cmp.l #10,L3 480 000002C4 6708 beq L50 481 *line 192 482 000002C6 3EBC0025 move #37,(sp) 483 000002CA 4EB81686 jsr _error 484 L50: 485 *line 193 486 000002CE 2F3C00000006 move.l #6,-(sp) 487 000002D4 2F380000 move.l L3,-(sp) 488 000002D8 4EB80000 jsr lmul 489 000002DC 508F addq.l #8,sp 490 000002DE 21C00000 move.l R0,L3 491 *line 194 492 000002E2 0CB80000003C0000 cmp.l #60,L3 493 000002EA 6708 beq L51 494 *line 194 495 000002EC 3EBC0026 move #38,(sp) 496 000002F0 4EB81686 jsr _error 497 L51: 498 *line 195 499 000002F4 20380000 move.l L3,R0 500 000002F8 81FC0003 divs #3,R0 501 000002FC 48C0 ext.l R0 502 000002FE 21C00000 move.l R0,L3 503 *line 196 504 00000302 0CB8000000140000 cmp.l #20,L3 505 0000030A 6708 beq L52 506 *line 196 507 0000030C 3EBC0027 move #39,(sp) 508 00000310 4EB81686 jsr _error 509 L52: 510 *line 197 511 00000314 20380000 move.l L3,R0 512 00000318 D0BC0000000C add.l #12,R0 513 0000031E 80BC00000007 or.l #7,R0 514 00000324 21C00000 move.l R0,L3 515 *line 198 516 00000328 0CB8000000270000 cmp.l #39,L3 517 00000330 6708 beq L53 518 *line 198 519 00000332 3EBC0028 move #40,(sp) 520 00000336 4EB81686 jsr _error 521 L53: 522 *line 199 523 0000033A 20380000 move.l L3,R0 524 0000033E 22380000 move.l L3,R1 525 00000342 E281 asr.l #1,R1 526 00000344 9081 sub.l R1,R0 527 00000346 5580 sub.l #2,R0 528 00000348 21C00000 move.l R0,L3 529 *line 200 530 0000034C 0CB8000000120000 cmp.l #18,L3 531 00000354 6708 beq L54 532 *line 200 533 00000356 3EBC0029 move #41,(sp) 534 0000035A 4EB81686 jsr _error 535 L54: 536 *line 201 537 0000035E 20380000 move.l L3,R0 538 00000362 81FC0006 divs #6,R0 539 00000366 4840 swap R0 540 00000368 48C0 ext.l R0 541 0000036A 21C00000 move.l R0,L3 542 *line 202 543 0000036E 4AB80000 tst.l L3 544 00000372 6708 beq L55 545 *line 202 546 00000374 3EBC0290 move #656,(sp) 547 00000378 4EB81686 jsr _error 548 L55: 549 *line 203 550 0000037C 21FC000030390000 move.l #$3039,L3 551 *line 204 552 00000384 0CB8000030390000 cmp.l #12345,L3 553 0000038C 6708 beq L56 554 *line 204 555 0000038E 3EBC0291 move #657,(sp) 556 00000392 4EB81686 jsr _error 557 L56: 558 *line 205 559 00000396 21FCFFFFFFFE0000 move.l #$fffffffe,L3 560 *line 206 561 0000039E 0CB8FFFFFFFE0000 cmp.l #-2,L3 562 000003A6 6708 beq L57 563 *line 206 564 000003A8 3EBC0292 move #658,(sp) 565 000003AC 4EB81686 jsr _error 566 L57: 567 *line 207 568 000003B0 21FC00009C400000 move.l #$9c40,L3 569 *line 207 570 000003B8 20380000 move.l L3,R0 571 000003BC 81FC000A divs #10,R0 572 000003C0 48C0 ext.l R0 573 000003C2 21C00000 move.l R0,L3 574 000003C6 B0BC00000FA0 cmp.l #4000,R0 575 000003CC 660A bne L10000 576 000003CE 0CB800000FA00000 cmp.l #4000,L3 577 000003D6 6708 beq L58 578 L10000:*line 207 579 000003D8 3EBC0293 move #659,(sp) 580 000003DC 4EB81686 jsr _error 581 L58: 582 *line 208 583 000003E0 21FC00009C400000 move.l #$9c40,L3 584 *line 208 585 000003E8 20380000 move.l L3,R0 586 000003EC 81FC000A divs #10,R0 587 000003F0 48C0 ext.l R0 588 000003F2 21C00000 move.l R0,L3 589 *line 208 590 000003F6 0CB800000FA00000 cmp.l #4000,L3 591 000003FE 6708 beq L59 592 *line 208 593 00000400 3EBC0294 move #660,(sp) 594 00000404 4EB81686 jsr _error 595 L59: 596 *line 209 597 00000408 21FC00009C400000 move.l #$9c40,L3 598 *line 209 599 00000410 2F3C0000000A move.l #$a,-(sp) 600 00000416 2F380000 move.l L3,-(sp) 601 0000041A 4EB80000 jsr ldiv 602 0000041E 508F addq.l #8,sp 603 00000420 21C00000 move.l R0,L3 604 *line 209 605 00000424 0CB800000FA00000 cmp.l #4000,L3 606 0000042C 6708 beq L60 607 *line 209 608 0000042E 3EBC0295 move #661,(sp) 609 00000432 4EB81686 jsr _error 610 L60: 611 *line 210 612 00000436 21FC00009C400000 move.l #$9c40,L3 613 *line 210 614 0000043E 20380000 move.l L3,R0 615 00000442 81FC0190 divs #400,R0 616 00000446 4840 swap R0 617 00000448 48C0 ext.l R0 618 0000044A 4A80 tst.l R0 619 0000044C 6708 beq L61 620 *line 210 621 0000044E 3EBC0296 move #662,(sp) 622 00000452 4EB81686 jsr _error 623 L61: 624 *line 211 625 00000456 21FC00009C400000 move.l #$9c40,L3 626 *line 211 627 0000045E 2F3C00000190 move.l #$190,-(sp) 628 00000464 2F380000 move.l L3,-(sp) 629 00000468 4EB80000 jsr lrem 630 0000046C 508F addq.l #8,sp 631 0000046E 4A80 tst.l R0 632 00000470 6708 beq L62 633 *line 211 634 00000472 3EBC0297 move #663,(sp) 635 00000476 4EB81686 jsr _error 636 L62: 637 *line 212 638 0000047A 3EBCB845 move #-18363,(sp) 639 0000047E 3F3C03E8 move #1000,-(sp) 640 00000482 3F3C0001 move #1,-(sp) 641 00000486 4EB816D0 jsr _targs 642 0000048A 588F addq.l #4,sp 643 *line 213 644 0000048C 3EBC0041 move #65,(sp) 645 00000490 3F3C0007 move #7,-(sp) 646 00000494 3F3C0002 move #2,-(sp) 647 00000498 4EB8170A jsr _addargs 648 0000049C 588F addq.l #4,sp 649 0000049E 3E00 move R0,R7 650 *line 214 651 000004A0 BE7C004A cmp #74,R7 652 000004A4 6708 beq L63 653 *line 214 654 000004A6 3EBC0030 move #48,(sp) 655 000004AA 4EB81686 jsr _error 656 L63: 657 *line 215 658 000004AE 21FC000027100000 move.l #$2710,_l1 659 *line 216 660 000004B6 21FC000010B10000 move.l #4273,_l2 661 *line 217 662 000004BE 283CABCD5678 move.l #$abcd5678,R4 663 *line 218 664 000004C4 2EB80000 move.l _l2,(sp) 665 000004C8 2F380000 move.l _l1,-(sp) 666 000004CC 4EB81754 jsr _addlargs 667 000004D0 588F addq.l #4,sp 668 000004D2 21C00000 move.l R0,L3 669 000004D6 22380000 move.l _l1,R1 670 000004DA D2B80000 add.l _l2,R1 671 000004DE B081 cmp.l R1,R0 672 000004E0 6708 beq L64 673 *line 218 674 000004E2 3EBC0310 move #784,(sp) 675 000004E6 4EB81686 jsr _error 676 L64: 677 *line 219 678 000004EA 20380000 move.l _l1,R0 679 000004EE D0B80000 add.l _l2,R0 680 000004F2 2E80 move.l R0,(sp) 681 000004F4 2F380000 move.l _l1,-(sp) 682 000004F8 4EB81754 jsr _addlargs 683 000004FC 588F addq.l #4,sp 684 000004FE 2F00 move.l R0,-(sp) 685 00000500 2F380000 move.l _l1,-(sp) 686 00000504 20380000 move.l _l1,R0 687 00000508 D0B80000 add.l _l2,R0 688 0000050C 2F00 move.l R0,-(sp) 689 0000050E 4EB81754 jsr _addlargs 690 00000512 508F addq.l #8,sp 691 00000514 B09F cmp.l (sp)+,R0 692 00000516 6708 beq L65 693 *line 219 694 00000518 3EBC0311 move #785,(sp) 695 0000051C 4EB81686 jsr _error 696 L65: 697 *line 220 698 00000520 2A7C00000177 move.l #L66,R13 699 *line 221 700 00000526 2E8D move.l R13,(sp) 701 00000528 4EB82002 jsr _strlen 702 0000052C 48C0 ext.l R0 703 0000052E D08D add.l R13,R0 704 00000530 2040 move.l R0,R8 705 00000532 117C0073FFFF move.b #115,-1(R8) 706 *line 222 707 00000538 2EBC0000017B move.l #L67,(sp) 708 0000053E 2F0D move.l R13,-(sp) 709 00000540 4EB81720 jsr _eqstr 710 00000544 588F addq.l #4,sp 711 00000546 4A40 tst R0 712 00000548 6608 bne L68 713 *line 222 714 0000054A 3EBC0312 move #786,(sp) 715 0000054E 4EB81686 jsr _error 716 L68: 717 *line 223 718 00000552 B8BCABCD5678 cmp.l #$abcd5678,R4 719 00000558 6708 beq L69 720 *line 223 721 0000055A 3EBC0313 move #787,(sp) 722 0000055E 4EB81686 jsr _error 723 L69: 724 *line 224 725 00000562 2EBC0000018A move.l #L71,(sp) 726 00000568 2F3C0000017F move.l #L70,-(sp) 727 0000056E 4EB81720 jsr _eqstr 728 00000572 588F addq.l #4,sp 729 00000574 4A40 tst R0 730 00000576 6608 bne L72 731 *line 224 732 00000578 3EBC0314 move #788,(sp) 733 0000057C 4EB81686 jsr _error 734 L72: 735 *line 225 736 00000580 2EBC0000019C move.l #L74,(sp) 737 00000586 2F3C00000195 move.l #L73,-(sp) 738 0000058C 4EB81720 jsr _eqstr 739 00000590 588F addq.l #4,sp 740 00000592 4A40 tst R0 741 00000594 6708 beq L75 742 *line 225 743 00000596 3EBC0315 move #789,(sp) 744 0000059A 4EB81686 jsr _error 745 L75: 746 *line 226 747 0000059E 2EBC000001A6 move.l #L77,(sp) 748 000005A4 4EB82002 jsr _strlen 749 000005A8 3F00 move R0,-(sp) 750 000005AA 2F3C000001A2 move.l #L76,-(sp) 751 000005B0 4EB82002 jsr _strlen 752 000005B4 588F addq.l #4,sp 753 000005B6 B05F cmp (sp)+,R0 754 000005B8 6608 bne L78 755 *line 226 756 000005BA 3EBC0316 move #790,(sp) 757 000005BE 4EB81686 jsr _error 758 L78: 759 *line 227 760 000005C2 2EBC000001AF move.l #L80,(sp) 761 000005C8 4EB82002 jsr _strlen 762 000005CC 3F00 move R0,-(sp) 763 000005CE 2F3C000001AB move.l #L79,-(sp) 764 000005D4 4EB82002 jsr _strlen 765 000005D8 588F addq.l #4,sp 766 000005DA 5240 add #1,R0 767 000005DC B05F cmp (sp)+,R0 768 000005DE 6708 beq L81 769 *line 227 770 000005E0 3EBC0317 move #791,(sp) 771 000005E4 4EB81686 jsr _error 772 L81: 773 *line 228 774 000005E8 3D7C0001FFFE move #1,-2(R14) 775 000005EE 4247 clr R7 776 000005F0 6708 beq L82 777 *line 228 778 000005F2 3EBC0318 move #792,(sp) 779 000005F6 4EB81686 jsr _error 780 L82: 781 *line 229 782 000005FA 426EFFFE clr -2(R14) 783 000005FE 7E01 move #1,R7 784 00000600 3007 move R7,R0 785 00000602 B07C0001 cmp #1,R0 786 00000606 6708 beq L83 787 *line 229 788 00000608 3EBC0319 move #793,(sp) 789 0000060C 4EB81686 jsr _error 790 L83: 791 *line 230 792 00000610 21FCFFFFF2ED0000 move.l #-3347,_l1 793 *line 231 794 00000618 21FC00001EE90000 move.l #7913,_l2 795 *line 232 796 00000620 2EBC00000000 move.l #_l2,(sp) 797 00000626 2F3C00000000 move.l #_l1,-(sp) 798 0000062C 4EB8179A jsr _addpargs 799 00000630 588F addq.l #4,sp 800 00000632 21C00000 move.l R0,L3 801 00000636 22380000 move.l _l1,R1 802 0000063A D2B80000 add.l _l2,R1 803 0000063E B081 cmp.l R1,R0 804 00000640 6708 beq L84 805 *line 232 806 00000642 3EBC0034 move #52,(sp) 807 00000646 4EB81686 jsr _error 808 L84: 809 *line 233 810 0000064A 21FC0000003C0000 move.l #60,L3 811 *line 234 812 00000652 2F3C00000009 move.l #9,-(sp) 813 00000658 2F380000 move.l L3,-(sp) 814 0000065C 4EB80000 jsr lmul 815 00000660 508F addq.l #8,sp 816 00000662 21C00000 move.l R0,L3 817 00000666 B0BC0000021C cmp.l #540,R0 818 0000066C 6708 beq L85 819 *line 234 820 0000066E 3EBC0036 move #54,(sp) 821 00000672 4EB81686 jsr _error 822 L85: 823 *line 235 824 00000676 11FC00FF0000 move.b #255,_c 825 *line 236 826 0000067C 0C3800FF0000 cmp.b #255,_c 827 00000682 6708 beq L86 828 *line 236 829 00000684 3EBC0036 move #54,(sp) 830 00000688 4EB81686 jsr _error 831 L86: 832 *line 237 833 0000068C 1E380000 move.b _c,R7 834 00000690 4887 ext.w R7 835 *line 238 836 00000692 BE7CFFFF cmp #-1,R7 837 00000696 6708 beq L87 838 *line 238 839 00000698 3EBC0037 move #55,(sp) 840 0000069C 4EB81686 jsr _error 841 L87: 842 *line 239 843 000006A0 10380000 move.b _c,R0 844 000006A4 4880 ext.w R0 845 000006A6 3D40FFFE move R0,-2(R14) 846 *line 240 847 000006AA 0C6EFFFFFFFE cmp #-1,-2(R14) 848 000006B0 6708 beq L88 849 *line 240 850 000006B2 3EBC0038 move #56,(sp) 851 000006B6 4EB81686 jsr _error 852 L88: 853 *line 241 854 000006BA 10380000 move.b _c,R0 855 000006BE 4880 ext.w R0 856 000006C0 48C0 ext.l R0 857 000006C2 21C00000 move.l R0,L3 858 *line 242 859 000006C6 0CB8FFFFFFFF0000 cmp.l #-1,L3 860 000006CE 6708 beq L89 861 *line 242 862 000006D0 3EBC0039 move #57,(sp) 863 000006D4 4EB81686 jsr _error 864 L89: 865 *line 243 866 000006D8 11FC001F0000 move.b #31,_c 867 *line 244 868 000006DE 083800040000 btst #4,_c 869 000006E4 6608 bne L90 870 *line 244 871 000006E6 3EBC039A move #922,(sp) 872 000006EA 4EB81686 jsr _error 873 L90: 874 *line 245 875 000006EE 083800060000 btst #6,_c 876 000006F4 6708 beq L91 877 *line 245 878 000006F6 3EBC039B move #923,(sp) 879 000006FA 4EB81686 jsr _error 880 L91: 881 *line 246 882 000006FE 42780000 clr _ai 883 *line 247 884 00000702 31FC00010002 move #1,2+_ai 885 *line 248 886 00000708 31FC00020004 move #2,4+_ai 887 *line 249 888 0000070E 31FC00030006 move #3,6+_ai 889 *line 250 890 00000714 4A780000 tst _ai 891 00000718 6708 beq L92 892 *line 250 893 0000071A 3EBC0040 move #64,(sp) 894 0000071E 4EB81686 jsr _error 895 L92: 896 *line 251 897 00000722 0C7800010002 cmp #1,2+_ai 898 00000728 6708 beq L93 899 *line 251 900 0000072A 3EBC0041 move #65,(sp) 901 0000072E 4EB81686 jsr _error 902 L93: 903 *line 252 904 00000732 0C7800020004 cmp #2,4+_ai 905 00000738 6708 beq L94 906 *line 252 907 0000073A 3EBC0042 move #66,(sp) 908 0000073E 4EB81686 jsr _error 909 L94: 910 *line 253 911 00000742 0C7800030006 cmp #3,6+_ai 912 00000748 6708 beq L95 913 *line 253 914 0000074A 3EBC0043 move #67,(sp) 915 0000074E 4EB81686 jsr _error 916 L95: 917 *line 254 918 00000752 4247 clr R7 919 00000754 6022 bra L98 920 L99: 921 *line 255 922 00000756 3047 move R7,R8 923 00000758 D1C8 add.l R8,R8 924 0000075A BE680000 cmp _ai(R8),R7 925 0000075E 6708 beq L100 926 *line 255 927 00000760 3EBC0044 move #68,(sp) 928 00000764 4EB81686 jsr _error 929 L100: 930 *line 256 931 00000768 3047 move R7,R8 932 0000076A D1C8 add.l R8,R8 933 0000076C 30280000 move _ai(R8),R0 934 00000770 3247 move R7,R9 935 00000772 13400000 move.b R0,_ac(R9) 936 L97: 937 *line 254 938 00000776 5247 add #1,R7 939 L98: 940 *line 254 941 00000778 BE7C0003 cmp #3,R7 942 0000077C 6FD8 ble L99 943 L96:L101: 944 *line 259 945 0000077E 4247 clr R7 946 00000780 6026 bra L104 947 L105: 948 *line 260 949 00000782 3047 move R7,R8 950 00000784 10280000 move.b _ac(R8),R0 951 00000788 4880 ext.w R0 952 0000078A BE40 cmp R0,R7 953 0000078C 6708 beq L106 954 *line 260 955 0000078E 3EBC0045 move #69,(sp) 956 00000792 4EB81686 jsr _error 957 L106: 958 *line 261 959 00000796 3007 move R7,R0 960 00000798 C1FC7530 muls #30000,R0 961 0000079C 3247 move R7,R9 962 0000079E D3C9 add.l R9,R9 963 000007A0 D3C9 add.l R9,R9 964 000007A2 23400000 move.l R0,_al(R9) 965 L103: 966 *line 259 967 000007A6 5247 add #1,R7 968 L104: 969 *line 259 970 000007A8 BE7C0004 cmp #4,R7 971 000007AC 6DD4 blt L105 972 L102: 973 *line 263 974 000007AE 4247 clr R7 975 000007B0 605E bra L109 976 L110: 977 *line 264 978 000007B2 3047 move R7,R8 979 000007B4 D1C8 add.l R8,R8 980 000007B6 D1C8 add.l R8,R8 981 000007B8 20280000 move.l _al(R8),R0 982 000007BC 3207 move R7,R1 983 000007BE C3FC7530 muls #30000,R1 984 000007C2 B081 cmp.l R1,R0 985 000007C4 6708 beq L111 986 *line 264 987 000007C6 3EBC0046 move #70,(sp) 988 000007CA 4EB81686 jsr _error 989 L111: 990 *line 265 991 000007CE 3047 move R7,R8 992 000007D0 D1C8 add.l R8,R8 993 000007D2 D1C8 add.l R8,R8 994 000007D4 20280000 move.l _al(R8),R0 995 000007D8 81FC7530 divs #30000,R0 996 000007DC 48C0 ext.l R0 997 000007DE 3047 move R7,R8 998 000007E0 B088 cmp.l R8,R0 999 000007E2 6708 beq L112 1000 *line 265 1001 000007E4 3EBC0047 move #71,(sp) 1002 000007E8 4EB81686 jsr _error 1003 L112: 1004 *line 266 1005 000007EC 3047 move R7,R8 1006 000007EE D1C8 add.l R8,R8 1007 000007F0 D1C8 add.l R8,R8 1008 000007F2 20280000 move.l _al(R8),R0 1009 000007F6 81FC0064 divs #100,R0 1010 000007FA 48C0 ext.l R0 1011 000007FC 3207 move R7,R1 1012 000007FE C3FC012C muls #300,R1 1013 00000802 B081 cmp.l R1,R0 1014 00000804 6708 beq L113 1015 *line 266 1016 00000806 3EBC0048 move #72,(sp) 1017 0000080A 4EB81686 jsr _error 1018 L113:L108: 1019 *line 263 1020 0000080E 5247 add #1,R7 1021 L109: 1022 *line 263 1023 00000810 BE7C0004 cmp #4,R7 1024 00000814 6D9C blt L110 1025 L107: 1026 *line 268 1027 00000816 1D7C0003FFF0 move.b #3,-16(R14) 1028 *line 269 1029 0000081C 102EFFF0 move.b -16(R14),R0 1030 00000820 4880 ext.w R0 1031 00000822 3040 move R0,R8 1032 00000824 0C2800690000 cmp.b #105,L1(R8) 1033 0000082A 6708 beq L114 1034 *line 269 1035 0000082C 3EBC048A move #1162,(sp) 1036 00000830 4EB81686 jsr _error 1037 L114: 1038 *line 270 1039 00000834 102EFFF0 move.b -16(R14),R0 1040 00000838 4880 ext.w R0 1041 0000083A 3040 move R0,R8 1042 0000083C D1C8 add.l R8,R8 1043 0000083E 30280000 move _ai(R8),R0 1044 00000842 122EFFF0 move.b -16(R14),R1 1045 00000846 4881 ext.w R1 1046 00000848 B041 cmp R1,R0 1047 0000084A 6708 beq L115 1048 *line 270 1049 0000084C 3EBC048B move #1163,(sp) 1050 00000850 4EB81686 jsr _error 1051 L115: 1052 *line 271 1053 00000854 102EFFF0 move.b -16(R14),R0 1054 00000858 4880 ext.w R0 1055 0000085A 3040 move R0,R8 1056 0000085C 0C2800030000 cmp.b #3,_ac(R8) 1057 00000862 661E bne L10001 1058 00000864 102EFFF0 move.b -16(R14),R0 1059 00000868 4880 ext.w R0 1060 0000086A 3040 move R0,R8 1061 0000086C D1C8 add.l R8,R8 1062 0000086E D1C8 add.l R8,R8 1063 00000870 20280000 move.l _al(R8),R0 1064 00000874 122EFFF0 move.b -16(R14),R1 1065 00000878 4881 ext.w R1 1066 0000087A C3FC7530 muls #30000,R1 1067 0000087E B081 cmp.l R1,R0 1068 00000880 6708 beq L116 1069 L10001:*line 271 1070 00000882 3EBC048C move #1164,(sp) 1071 00000886 4EB81686 jsr _error 1072 L116: 1073 *line 272 1074 0000088A 4247 clr R7 1075 *line 273 1076 0000088C 426EFFFE clr -2(R14) 1077 00000890 6006 bra L119 1078 L120: 1079 *line 274 1080 00000892 5A47 add #5,R7 1081 L118: 1082 *line 273 1083 00000894 526EFFFE add #1,-2(R14) 1084 L119: 1085 *line 273 1086 00000898 0C6E0064FFFE cmp #100,-2(R14) 1087 0000089E 6DF2 blt L120 1088 L117: 1089 *line 275 1090 000008A0 0C6E0064FFFE cmp #100,-2(R14) 1091 000008A6 6708 beq L121 1092 *line 275 1093 000008A8 3EBC0049 move #73,(sp) 1094 000008AC 4EB81686 jsr _error 1095 L121: 1096 *line 276 1097 000008B0 BE7C01F4 cmp #500,R7 1098 000008B4 6708 beq L122 1099 *line 276 1100 000008B6 3EBC0050 move #80,(sp) 1101 000008BA 4EB81686 jsr _error 1102 L122: 1103 *line 277 1104 000008BE 3E3CDB6D move #-9363,R7 1105 *line 278 1106 000008C2 3007 move R7,R0 1107 000008C4 B147 eor R0,R7 1108 *line 279 1109 000008C6 4A47 tst R7 1110 000008C8 6708 beq L123 1111 *line 279 1112 000008CA 3EBC0051 move #81,(sp) 1113 000008CE 4EB81686 jsr _error 1114 L123: 1115 *line 280 1116 000008D2 11FC00400000 move.b #64,_s1 1117 *line 281 1118 000008D8 31FC04E20002 move #1250,2+_s1 1119 *line 282 1120 000008DE 21FC000024300004 move.l #9264,4+_s1 1121 *line 283 1122 000008E6 2A7C00000000 move.l #_s1,R13 1123 *line 284 1124 000008EC 0C3800400000 cmp.b #64,_s1 1125 000008F2 6606 bne L10002 1126 000008F4 0C150040 cmp.b #64,(R13) 1127 000008F8 6708 beq L124 1128 L10002:*line 284 1129 000008FA 3EBC0052 move #82,(sp) 1130 000008FE 4EB81686 jsr _error 1131 L124: 1132 *line 285 1133 00000902 0C7804E20002 cmp #1250,2+_s1 1134 00000908 6608 bne L10003 1135 0000090A 0C6D04E20002 cmp #1250,2(R13) 1136 00000910 6708 beq L125 1137 L10003:*line 285 1138 00000912 3EBC0053 move #83,(sp) 1139 00000916 4EB81686 jsr _error 1140 L125: 1141 *line 286 1142 0000091A 0CB8000024300004 cmp.l #9264,4+_s1 1143 00000922 660C bne L126 1144 00000924 0CAD000024300004 cmp.l #9264,4(R13) 1145 0000092C 6602 bne L126 1146 0000092E 6008 bra L127 1147 L126: 1148 *line 286 1149 00000930 3EBC0054 move #84,(sp) 1150 00000934 4EB81686 jsr _error 1151 L127: 1152 *line 287 1153 00000938 3D7CFFCEFFFE move #-50,-2(R14) 1154 *line 288 1155 0000093E 4A6EFFFE tst -2(R14) 1156 00000942 6D08 blt L128 1157 *line 288 1158 00000944 3EBC0055 move #85,(sp) 1159 00000948 4EB81686 jsr _error 1160 L128: 1161 *line 289 1162 0000094C 4A6EFFFE tst -2(R14) 1163 00000950 6C02 bge L129 1164 00000952 6008 bra L130 1165 L129: 1166 *line 289 1167 00000954 3EBC0056 move #86,(sp) 1168 00000958 4EB81686 jsr _error 1169 L130: 1170 *line 290 1171 0000095C 21FC00001E610000 move.l #7777,L3 1172 *line 291 1173 00000964 0CB800001E600000 cmp.l #7776,L3 1174 0000096C 6C08 bge L131 1175 *line 291 1176 0000096E 3EBC0057 move #87,(sp) 1177 00000972 4EB81686 jsr _error 1178 L131: 1179 *line 292 1180 00000976 0CB800001E600000 cmp.l #7776,L3 1181 0000097E 6F02 ble L132 1182 00000980 6008 bra L133 1183 L132: 1184 *line 292 1185 00000982 3EBC0058 move #88,(sp) 1186 00000986 4EB81686 jsr _error 1187 L133: 1188 *line 293 1189 0000098A 2A7C00000000 move.l #_ac,R13 1190 *line 294 1191 00000990 21FC000000030000 move.l #3+_ac,_p0 1192 *line 295 1193 00000998 BBF80000 cmp.l _p0,R13 1194 0000099C 6508 blo L134 1195 *line 295 1196 0000099E 3EBC0059 move #89,(sp) 1197 000009A2 4EB81686 jsr _error 1198 L134: 1199 *line 296 1200 000009A6 BBF80000 cmp.l _p0,R13 1201 000009AA 6202 bhi L135 1202 000009AC 6008 bra L136 1203 L135: 1204 *line 296 1205 000009AE 3EBC0060 move #96,(sp) 1206 000009B2 4EB81686 jsr _error 1207 L136: 1208 *line 297 1209 000009B6 200D move.l R13,R0 1210 000009B8 6608 bne L137 1211 *line 297 1212 000009BA 3EBC0061 move #97,(sp) 1213 000009BE 4EB81686 jsr _error 1214 L137: 1215 *line 298 1216 000009C2 4AB80000 tst.l _p0 1217 000009C6 6702 beq L138 1218 000009C8 6008 bra L139 1219 L138: 1220 *line 298 1221 000009CA 3EBC0062 move #98,(sp) 1222 000009CE 4EB81686 jsr _error 1223 L139: 1224 *line 299 1225 000009D2 4247 clr R7 1226 000009D4 6036 bra L142 1227 L143: 1228 *line 300 1229 000009D6 426EFFFE clr -2(R14) 1230 000009DA 6026 bra L146 1231 L147: 1232 *line 301 1233 000009DC 3007 move R7,R0 1234 000009DE 5440 add #2,R0 1235 000009E0 322EFFFE move -2(R14),R1 1236 000009E4 5641 add #3,R1 1237 000009E6 C1C1 muls R1,R0 1238 000009E8 224E move.l R14,R9 1239 000009EA 346EFFFE move -2(R14),R10 1240 000009EE D5CA add.l R10,R10 1241 000009F0 D3CA add.l R10,R9 1242 000009F2 3407 move R7,R2 1243 000009F4 C5FC0006 muls #6,R2 1244 000009F8 D3C2 add.l R2,R9 1245 000009FA 3340FFF2 move R0,-14(R9) 1246 L145: 1247 *line 300 1248 000009FE 526EFFFE add #1,-2(R14) 1249 L146: 1250 *line 300 1251 00000A02 0C6E0003FFFE cmp #3,-2(R14) 1252 00000A08 6DD2 blt L147 1253 L144:L141: 1254 *line 299 1255 00000A0A 5247 add #1,R7 1256 L142: 1257 *line 299 1258 00000A0C BE7C0002 cmp #2,R7 1259 00000A10 6DC4 blt L143 1260 L140: 1261 *line 304 1262 00000A12 4247 clr R7 1263 00000A14 6042 bra L150 1264 L151: 1265 *line 305 1266 00000A16 426EFFFE clr -2(R14) 1267 00000A1A 6032 bra L154 1268 L155: 1269 *line 306 1270 00000A1C 3007 move R7,R0 1271 00000A1E C1FC0006 muls #6,R0 1272 00000A22 2040 move.l R0,R8 1273 00000A24 224E move.l R14,R9 1274 00000A26 346EFFFE move -2(R14),R10 1275 00000A2A D5CA add.l R10,R10 1276 00000A2C D3CA add.l R10,R9 1277 00000A2E 303098F2 move -14(R8,R9.l),R0 1278 00000A32 3207 move R7,R1 1279 00000A34 5441 add #2,R1 1280 00000A36 342EFFFE move -2(R14),R2 1281 00000A3A 5642 add #3,R2 1282 00000A3C C3C2 muls R2,R1 1283 00000A3E B041 cmp R1,R0 1284 00000A40 6708 beq L156 1285 *line 306 1286 00000A42 3EBC0063 move #99,(sp) 1287 00000A46 4EB81686 jsr _error 1288 L156:L153: 1289 *line 305 1290 00000A4A 526EFFFE add #1,-2(R14) 1291 L154: 1292 *line 305 1293 00000A4E 0C6E0003FFFE cmp #3,-2(R14) 1294 00000A54 6DC6 blt L155 1295 L152:L149: 1296 *line 304 1297 00000A56 5247 add #1,R7 1298 L150: 1299 *line 304 1300 00000A58 BE7C0002 cmp #2,R7 1301 00000A5C 6DB8 blt L151 1302 L148: 1303 *line 309 1304 00000A5E 4EB817BA jsr _swt1 1305 00000A62 B0BC00000001 cmp.l #1,R0 1306 00000A68 6708 beq L157 1307 *line 309 1308 00000A6A 3EBC0064 move #100,(sp) 1309 00000A6E 4EB81686 jsr _error 1310 L157: 1311 *line 310 1312 00000A72 4EB8188C jsr _swt2 1313 00000A76 4A80 tst.l R0 1314 00000A78 6708 beq L158 1315 *line 310 1316 00000A7A 3EBC0065 move #101,(sp) 1317 00000A7E 4EB81686 jsr _error 1318 L158: 1319 *line 311 1320 00000A82 4EB8194E jsr _swt3 1321 00000A86 B0BCFFFFFFFF cmp.l #-1,R0 1322 00000A8C 6708 beq L159 1323 *line 311 1324 00000A8E 3EBC0065 move #101,(sp) 1325 00000A92 4EB81686 jsr _error 1326 L159: 1327 *line 312 1328 00000A96 4EB81A02 jsr _swt4 1329 00000A9A B0BC00000004 cmp.l #4,R0 1330 00000AA0 6708 beq L160 1331 *line 312 1332 00000AA2 3EBC0066 move #102,(sp) 1333 00000AA6 4EB81686 jsr _error 1334 L160: 1335 *line 314 1336 00000AAA 21FC00004E200000 move.l #20000,_l1 1337 *line 315 1338 00000AB2 21FC0000000A0000 move.l #10,_l2 1339 *line 316 1340 00000ABA 2EB80000 move.l _l2,(sp) 1341 00000ABE 2F380000 move.l _l1,-(sp) 1342 00000AC2 4EB80000 jsr _ldiv 1343 00000AC6 588F addq.l #4,sp 1344 00000AC8 21C00000 move.l R0,_l3 1345 *line 317 1346 00000ACC 0CB8000007D00000 cmp.l #2000,_l3 1347 00000AD4 6708 beq L161 1348 *line 317 1349 00000AD6 3EBC0201 move #513,(sp) 1350 00000ADA 4EB81686 jsr _error 1351 L161: 1352 *line 318 1353 00000ADE 4AB80000 tst.l _ldivr 1354 00000AE2 6708 beq L162 1355 *line 318 1356 00000AE4 3EBC0202 move #514,(sp) 1357 00000AE8 4EB81686 jsr _error 1358 L162: 1359 *line 319 1360 00000AEC 21FC0000270F0000 move.l #9999,_l2 1361 *line 320 1362 00000AF4 2EB80000 move.l _l2,(sp) 1363 00000AF8 2F380000 move.l _l1,-(sp) 1364 00000AFC 4EB80000 jsr _ldiv 1365 00000B00 588F addq.l #4,sp 1366 00000B02 B0BC00000002 cmp.l #2,R0 1367 00000B08 6708 beq L163 1368 *line 320 1369 00000B0A 3EBC0203 move #515,(sp) 1370 00000B0E 4EB81686 jsr _error 1371 L163: 1372 *line 321 1373 00000B12 0CB8000000020000 cmp.l #2,_ldivr 1374 00000B1A 6708 beq L164 1375 *line 321 1376 00000B1C 3EBC0204 move #516,(sp) 1377 00000B20 4EB81686 jsr _error 1378 L164: 1379 *line 322 1380 00000B24 21FCFFFFFF850000 move.l #-123,_l2 1381 *line 323 1382 00000B2C 2EB80000 move.l _l2,(sp) 1383 00000B30 2F380000 move.l _l1,-(sp) 1384 00000B34 4EB80000 jsr _ldiv 1385 00000B38 588F addq.l #4,sp 1386 00000B3A B0BCFFFFFF5E cmp.l #-162,R0 1387 00000B40 6708 beq L165 1388 *line 323 1389 00000B42 3EBC0207 move #519,(sp) 1390 00000B46 4EB81686 jsr _error 1391 L165: 1392 *line 324 1393 00000B4A 0CB8FFFFFFB60000 cmp.l #-74,_ldivr 1394 00000B52 6708 beq L166 1395 *line 324 1396 00000B54 3EBC0208 move #520,(sp) 1397 00000B58 4EB81686 jsr _error 1398 L166:L167: 1399 *line 326 1400 00000B5C 3C3C8000 move #-32768,R6 1401 *line 327 1402 00000B60 3A3C1000 move #4096,R5 1403 *line 328 1404 00000B64 BC45 cmp R5,R6 1405 00000B66 6408 bcc L168 1406 *line 328 1407 00000B68 3EBC0209 move #521,(sp) 1408 00000B6C 4EB81686 jsr _error 1409 L168: 1410 *line 329 1411 00000B70 31FC00010000 move #1,_uu 1412 *line 330 1413 00000B76 20380000 move.l _uu,R0 1414 00000B7A B0BC00010000 cmp.l #$10000,R0 1415 00000B80 6708 beq L169 1416 *line 330 1417 00000B82 3EBC0210 move #528,(sp) 1418 00000B86 4EB81686 jsr _error 1419 L169: 1420 *line 332 1421 00000B8A 7E0A move #10,R7 1422 *line 336 1423 00000B8C BE7C000A cmp #10,R7 1424 00000B90 6708 beq L170 1425 *line 336 1426 00000B92 3EBC0211 move #529,(sp) 1427 00000B96 4EB81686 jsr _error 1428 L170: 1429 *line 337 1430 00000B9A 4247 clr R7 1431 *line 347 1432 00000B9C 4A47 tst R7 1433 00000B9E 6708 beq L171 1434 *line 347 1435 00000BA0 3EBC0212 move #530,(sp) 1436 00000BA4 4EB81686 jsr _error 1437 L171: 1438 *line 349 1439 00000BA8 6008 bra L172 1440 *line 349 1441 00000BAA 3EBC0213 move #531,(sp) 1442 00000BAE 4EB81686 jsr _error 1443 L172: 1444 *line 350 1445 00000BB2 31FC000E0002 move #14,2+_zz 1446 *line 351 1447 00000BB8 11FC007F0008 move.b #127,8+_zz 1448 *line 352 1449 00000BBE 21FC00030D3F0014 move.l #$30d3f,20+_zz 1450 *line 353 1451 00000BC6 0C78000E0002 cmp #14,2+_zz 1452 00000BCC 6708 beq L173 1453 *line 353 1454 00000BCE 3EBC0214 move #532,(sp) 1455 00000BD2 4EB81686 jsr _error 1456 L173: 1457 *line 354 1458 00000BD6 0C38007F0008 cmp.b #127,8+_zz 1459 00000BDC 6708 beq L174 1460 *line 354 1461 00000BDE 3EBC0215 move #533,(sp) 1462 00000BE2 4EB81686 jsr _error 1463 L174: 1464 *line 355 1465 00000BE6 20380014 move.l 20+_zz,R0 1466 00000BEA B0BC00030D3F cmp.l #$30d3f,R0 1467 00000BF0 6708 beq L175 1468 *line 355 1469 00000BF2 3EBC0216 move #534,(sp) 1470 00000BF6 4EB81686 jsr _error 1471 L175: 1472 *line 357 1473 00000BFA 7E01 move #1,R7 1474 *line 359 1475 00000BFC 5247 add #1,R7 1476 *line 363 1477 00000BFE 5247 add #1,R7 1478 *line 368 1479 00000C00 BE7C0003 cmp #3,R7 1480 00000C04 6708 beq L176 1481 *line 368 1482 00000C06 3EBC0218 move #536,(sp) 1483 00000C0A 4EB81686 jsr _error 1484 L176: 1485 *line 376 1486 00000C0E 007800010000 or #1,_flags 1487 *line 377 1488 00000C14 0278FFF90000 and #-7,_flags 1489 *line 378 1490 00000C1A 30380000 move _flags,R0 1491 00000C1E C07CFFC7 and #-57,R0 1492 00000C22 807C0028 or #40,R0 1493 00000C26 31C00000 move R0,_flags 1494 *line 379 1495 00000C2A 083800000001 btst #0,1+_flags 1496 00000C30 6608 bne L177 1497 *line 379 1498 00000C32 3EBC0221 move #545,(sp) 1499 00000C36 4EB81686 jsr _error 1500 L177: 1501 *line 380 1502 00000C3A 30380000 move _flags,R0 1503 00000C3E E248 lsr #1,R0 1504 00000C40 C07C0003 and #3,R0 1505 00000C44 6708 beq L178 1506 *line 380 1507 00000C46 3EBC0222 move #546,(sp) 1508 00000C4A 4EB81686 jsr _error 1509 L178: 1510 *line 381 1511 00000C4E 30380000 move _flags,R0 1512 00000C52 E648 lsr #3,R0 1513 00000C54 C07C0007 and #7,R0 1514 00000C58 B07C0005 cmp #5,R0 1515 00000C5C 6708 beq L179 1516 *line 381 1517 00000C5E 3EBC0223 move #547,(sp) 1518 00000C62 4EB81686 jsr _error 1519 L179: 1520 *line 382 1521 00000C66 30380000 move _flags,R0 1522 00000C6A C07CFFC7 and #-57,R0 1523 00000C6E 32380000 move _flags,R1 1524 00000C72 E649 lsr #3,R1 1525 00000C74 C27C0007 and #7,R1 1526 00000C78 5441 add #2,R1 1527 00000C7A C27C0007 and #7,R1 1528 00000C7E E741 asl #3,R1 1529 00000C80 8041 or R1,R0 1530 00000C82 31C00000 move R0,_flags 1531 *line 383 1532 00000C86 30380000 move _flags,R0 1533 00000C8A E648 lsr #3,R0 1534 00000C8C C07C0007 and #7,R0 1535 00000C90 B07C0007 cmp #7,R0 1536 00000C94 6708 beq L180 1537 *line 383 1538 00000C96 3EBC0224 move #548,(sp) 1539 00000C9A 4EB81686 jsr _error 1540 L180: 1541 *line 384 1542 00000C9E 2A7C00000000 move.l #_flags,R13 1543 *line 385 1544 00000CA4 0255FFFE and #-2,(R13) 1545 *line 386 1546 00000CA8 3015 move (R13),R0 1547 00000CAA C07CFFF9 and #-7,R0 1548 00000CAE 807C0002 or #2,R0 1549 00000CB2 3A80 move R0,(R13) 1550 *line 387 1551 00000CB4 3015 move (R13),R0 1552 00000CB6 C07CFFC7 and #-57,R0 1553 00000CBA 807C0018 or #24,R0 1554 00000CBE 3A80 move R0,(R13) 1555 *line 388 1556 00000CC0 082D00000001 btst #0,1(R13) 1557 00000CC6 6708 beq L181 1558 *line 388 1559 00000CC8 3EBC224A move #8778,(sp) 1560 00000CCC 4EB81686 jsr _error 1561 L181: 1562 *line 389 1563 00000CD0 3015 move (R13),R0 1564 00000CD2 E248 lsr #1,R0 1565 00000CD4 C07C0003 and #3,R0 1566 00000CD8 B07C0001 cmp #1,R0 1567 00000CDC 6708 beq L182 1568 *line 389 1569 00000CDE 3EBC224B move #8779,(sp) 1570 00000CE2 4EB81686 jsr _error 1571 L182: 1572 *line 390 1573 00000CE6 3015 move (R13),R0 1574 00000CE8 E648 lsr #3,R0 1575 00000CEA C07C0007 and #7,R0 1576 00000CEE B07C0003 cmp #3,R0 1577 00000CF2 6708 beq L183 1578 *line 390 1579 00000CF4 3EBC224C move #8780,(sp) 1580 00000CF8 4EB81686 jsr _error 1581 L183: 1582 *line 391 1583 00000CFC 21FC000000000000 move.l #_flags,_p0 1584 *line 392 1585 00000D04 20780000 move.l _p0,R8 1586 00000D08 00500001 or #1,(R8) 1587 *line 393 1588 00000D0C 20780000 move.l _p0,R8 1589 00000D10 3010 move (R8),R0 1590 00000D12 C07CFFF9 and #-7,R0 1591 00000D16 807C0004 or #4,R0 1592 00000D1A 22780000 move.l _p0,R9 1593 00000D1E 3280 move R0,(R9) 1594 *line 394 1595 00000D20 20780000 move.l _p0,R8 1596 00000D24 00500038 or #56,(R8) 1597 *line 395 1598 00000D28 20780000 move.l _p0,R8 1599 00000D2C 082800000001 btst #0,1(R8) 1600 00000D32 6608 bne L184 1601 *line 395 1602 00000D34 3EBC224D move #8781,(sp) 1603 00000D38 4EB81686 jsr _error 1604 L184: 1605 *line 396 1606 00000D3C 20780000 move.l _p0,R8 1607 00000D40 3010 move (R8),R0 1608 00000D42 E248 lsr #1,R0 1609 00000D44 C07C0003 and #3,R0 1610 00000D48 B07C0002 cmp #2,R0 1611 00000D4C 6708 beq L185 1612 *line 396 1613 00000D4E 3EBC224E move #8782,(sp) 1614 00000D52 4EB81686 jsr _error 1615 L185: 1616 *line 397 1617 00000D56 20780000 move.l _p0,R8 1618 00000D5A 3010 move (R8),R0 1619 00000D5C E648 lsr #3,R0 1620 00000D5E C07C0007 and #7,R0 1621 00000D62 B07C0007 cmp #7,R0 1622 00000D66 6708 beq L186 1623 *line 397 1624 00000D68 3EBC224F move #8783,(sp) 1625 00000D6C 4EB81686 jsr _error 1626 L186: 1627 *line 398 1628 00000D70 7E0D move #13,R7 1629 *line 399 1630 00000D72 3007 move R7,R0 1631 00000D74 5A40 add #5,R0 1632 00000D76 48C0 ext.l R0 1633 00000D78 2E80 move.l R0,(sp) 1634 00000D7A 4EB8166E jsr _checklv 1635 *line 400 1636 00000D7E 4EB81604 jsr _checkreg 1637 *line 401 1638 00000D82 4EB8143E jsr _chkinits 1639 *line 402 1640 00000D86 6008 bra L187 1641 *line 402 1642 00000D88 3EBC0225 move #549,(sp) 1643 00000D8C 4EB81686 jsr _error 1644 L187: 1645 *line 403 1646 00000D90 3D7CFFF4FFFE move #-12,-2(R14) 1647 *line 404 1648 00000D96 306EFFFE move -2(R14),R8 1649 00000D9A 2E88 move.l R8,(sp) 1650 00000D9C 4EB81424 jsr _chklext 1651 *line 405 1652 00000DA0 203C0000EA60 move.l #$ea60,R0 1653 00000DA6 3C00 move R0,R6 1654 *line 406 1655 00000DA8 3A06 move R6,R5 1656 00000DAA 4280 clr.l R0 1657 00000DAC 3005 move R5,R0 1658 00000DAE 80FC0014 divu #20,R0 1659 00000DB2 3A00 move R0,R5 1660 *line 407 1661 00000DB4 BA7C0BB8 cmp #3000,R5 1662 00000DB8 6708 beq L188 1663 *line 407 1664 00000DBA 3EBC0226 move #550,(sp) 1665 00000DBE 4EB81686 jsr _error 1666 L188: 1667 *line 408 1668 00000DC2 21FC0000D7530000 move.l #$d753,_l1 1669 *line 409 1670 00000DCA 4280 clr.l R0 1671 00000DCC 3006 move R6,R0 1672 00000DCE D0B80000 add.l _l1,R0 1673 00000DD2 21C00000 move.l R0,_l1 1674 *line 410 1675 00000DD6 20380000 move.l _l1,R0 1676 00000DDA B0BC0001C1B3 cmp.l #$1c1b3,R0 1677 00000DE0 6708 beq L189 1678 *line 410 1679 00000DE2 3EBC0227 move #551,(sp) 1680 00000DE6 4EB81686 jsr _error 1681 L189: 1682 *line 411 1683 00000DEA 4280 clr.l R0 1684 00000DEC 3006 move R6,R0 1685 00000DEE 91B80000 sub.l R0,_l1 1686 *line 412 1687 00000DF2 20380000 move.l _l1,R0 1688 00000DF6 B0BC0000D753 cmp.l #$d753,R0 1689 00000DFC 6708 beq L190 1690 *line 412 1691 00000DFE 3EBC0228 move #552,(sp) 1692 00000E02 4EB81686 jsr _error 1693 L190: 1694 *line 413 1695 00000E06 21FC0001869F000C move.l #$1869f,12+_al 1696 *line 414 1697 00000E0E 7C03 move #3,R6 1698 *line 415 1699 00000E10 3006 move R6,R0 1700 00000E12 E548 lsl #2,R0 1701 00000E14 4840 swap R0 1702 00000E16 4240 clr R0 1703 00000E18 4840 swap R0 1704 00000E1A 2040 move.l R0,R8 1705 00000E1C 20280000 move.l _al(R8),R0 1706 00000E20 B0BC0001869F cmp.l #$1869f,R0 1707 00000E26 6708 beq L191 1708 *line 415 1709 00000E28 3EBC0229 move #553,(sp) 1710 00000E2C 4EB81686 jsr _error 1711 L191: 1712 *line 416 1713 00000E30 21FC0002BF200000 move.l #$2bf20,_l1 1714 *line 417 1715 00000E38 203C0000EA60 move.l #$ea60,R0 1716 00000E3E 3C00 move R0,R6 1717 *line 418 1718 00000E40 4280 clr.l R0 1719 00000E42 3006 move R6,R0 1720 00000E44 2F00 move.l R0,-(sp) 1721 00000E46 2F380000 move.l _l1,-(sp) 1722 00000E4A 4EB80000 jsr ldiv 1723 00000E4E 508F addq.l #8,sp 1724 00000E50 3A00 move R0,R5 1725 *line 419 1726 00000E52 BA7C0003 cmp #3,R5 1727 00000E56 6708 beq L192 1728 *line 419 1729 00000E58 3EBC0230 move #560,(sp) 1730 00000E5C 4EB81686 jsr _error 1731 L192: 1732 *line 420 1733 00000E60 3A3C2EE0 move #12000,R5 1734 *line 421 1735 00000E64 3D7C0005FFEE move #5,-18(R14) 1736 *line 422 1737 00000E6A 3C05 move R5,R6 1738 00000E6C CCEEFFEE mulu -18(R14),R6 1739 *line 423 1740 00000E70 4280 clr.l R0 1741 00000E72 3006 move R6,R0 1742 00000E74 B0BC0000EA60 cmp.l #$ea60,R0 1743 00000E7A 6708 beq L193 1744 *line 423 1745 00000E7C 3EBC0231 move #561,(sp) 1746 00000E80 4EB81686 jsr _error 1747 L193: 1748 *line 424 1749 00000E84 21FC000000050000 move.l #5,_l1 1750 *line 425 1751 00000E8C 203C0000EA60 move.l #$ea60,R0 1752 00000E92 3C00 move R0,R6 1753 *line 426 1754 00000E94 2F380000 move.l _l1,-(sp) 1755 00000E98 4280 clr.l R0 1756 00000E9A 3006 move R6,R0 1757 00000E9C 2F00 move.l R0,-(sp) 1758 00000E9E 4EB80000 jsr lmul 1759 00000EA2 508F addq.l #8,sp 1760 00000EA4 21C00000 move.l R0,_l1 1761 *line 427 1762 00000EA8 20380000 move.l _l1,R0 1763 00000EAC B0BC000493E0 cmp.l #$493e0,R0 1764 00000EB2 6708 beq L194 1765 *line 427 1766 00000EB4 3EBC0232 move #562,(sp) 1767 00000EB8 4EB81686 jsr _error 1768 L194: 1769 *line 430 1770 00000EBC 1D7C0064FFF0 move.b #100,-16(R14) 1771 *line 431 1772 00000EC2 1E2EFFF0 move.b -16(R14),R7 1773 00000EC6 4887 ext.w R7 1774 00000EC8 E747 asl #3,R7 1775 00000ECA 5447 add #2,R7 1776 *line 432 1777 00000ECC 102EFFF0 move.b -16(R14),R0 1778 00000ED0 4880 ext.w R0 1779 00000ED2 E940 asl #4,R0 1780 00000ED4 5540 sub #2,R0 1781 00000ED6 3D40FFFE move R0,-2(R14) 1782 *line 433 1783 00000EDA BE7C0322 cmp #802,R7 1784 00000EDE 6708 beq L195 1785 *line 433 1786 00000EE0 3EBC0240 move #576,(sp) 1787 00000EE4 4EB81686 jsr _error 1788 L195: 1789 *line 434 1790 00000EE8 0C6E063EFFFE cmp #1598,-2(R14) 1791 00000EEE 6708 beq L196 1792 *line 434 1793 00000EF0 3EBC0241 move #577,(sp) 1794 00000EF4 4EB81686 jsr _error 1795 L196: 1796 *line 435 1797 00000EF8 7E32 move #50,R7 1798 *line 436 1799 00000EFA 102EFFF0 move.b -16(R14),R0 1800 00000EFE 4880 ext.w R0 1801 00000F00 BE40 cmp R0,R7 1802 00000F02 6D08 blt L197 1803 *line 436 1804 00000F04 3EBC0242 move #578,(sp) 1805 00000F08 4EB81686 jsr _error 1806 L197: 1807 *line 437 1808 00000F0C 3D7C0064FFFE move #100,-2(R14) 1809 *line 438 1810 00000F12 102EFFF0 move.b -16(R14),R0 1811 00000F16 4880 ext.w R0 1812 00000F18 B06EFFFE cmp -2(R14),R0 1813 00000F1C 6708 beq L198 1814 *line 438 1815 00000F1E 3EBC0243 move #579,(sp) 1816 00000F22 4EB81686 jsr _error 1817 L198: 1818 *line 439 1819 00000F26 41EEFFFE lea -2(R14),R8 1820 00000F2A 2D48FFEA move.l R8,-22(R14) 1821 *line 440 1822 00000F2E 206EFFEA move.l -22(R14),R8 1823 00000F32 3010 move (R8),R0 1824 00000F34 122EFFF0 move.b -16(R14),R1 1825 00000F38 4881 ext.w R1 1826 00000F3A B041 cmp R1,R0 1827 00000F3C 6708 beq L199 1828 *line 440 1829 00000F3E 3EBC243A move #9274,(sp) 1830 00000F42 4EB81686 jsr _error 1831 L199: 1832 *line 441 1833 00000F46 206EFFEA move.l -22(R14),R8 1834 00000F4A 3010 move (R8),R0 1835 00000F4C B06EFFFE cmp -2(R14),R0 1836 00000F50 6708 beq L200 1837 *line 441 1838 00000F52 3EBC243B move #9275,(sp) 1839 00000F56 4EB81686 jsr _error 1840 L200: 1841 *line 442 1842 00000F5A 21FC000000640000 move.l #100,L3 1843 *line 443 1844 00000F62 102EFFF0 move.b -16(R14),R0 1845 00000F66 4880 ext.w R0 1846 00000F68 48C0 ext.l R0 1847 00000F6A 22380000 move.l L3,R1 1848 00000F6E B081 cmp.l R1,R0 1849 00000F70 6708 beq L201 1850 *line 443 1851 00000F72 3EBC0244 move #580,(sp) 1852 00000F76 4EB81686 jsr _error 1853 L201: 1854 *line 444 1855 00000F7A 1D7C00FFFFF0 move.b #255,-16(R14) 1856 *line 445 1857 00000F80 102EFFF0 move.b -16(R14),R0 1858 00000F84 4880 ext.w R0 1859 00000F86 48C0 ext.l R0 1860 00000F88 22380000 move.l L3,R1 1861 00000F8C B081 cmp.l R1,R0 1862 00000F8E 6E16 bgt L10004 1863 00000F90 102EFFF0 move.b -16(R14),R0 1864 00000F94 4880 ext.w R0 1865 00000F96 B06EFFFE cmp -2(R14),R0 1866 00000F9A 6C0A bge L10004 1867 00000F9C 102EFFF0 move.b -16(R14),R0 1868 00000FA0 4880 ext.w R0 1869 00000FA2 BE40 cmp R0,R7 1870 00000FA4 6C08 bge L202 1871 L10004:*line 445 1872 00000FA6 3EBC0255 move #597,(sp) 1873 00000FAA 4EB81686 jsr _error 1874 L202: 1875 *line 446 1876 00000FAE 1E2EFFF0 move.b -16(R14),R7 1877 00000FB2 4887 ext.w R7 1878 00000FB4 DE7C01F4 add #500,R7 1879 *line 447 1880 00000FB8 BE7C01F3 cmp #499,R7 1881 00000FBC 6708 beq L203 1882 *line 447 1883 00000FBE 3EBC0256 move #598,(sp) 1884 00000FC2 4EB81686 jsr _error 1885 L203: 1886 *line 448 1887 00000FC6 102EFFF0 move.b -16(R14),R0 1888 00000FCA 4880 ext.w R0 1889 00000FCC 5940 sub #4,R0 1890 00000FCE B07CFFFB cmp #-5,R0 1891 00000FD2 6708 beq L204 1892 *line 448 1893 00000FD4 3EBC0257 move #599,(sp) 1894 00000FD8 4EB81686 jsr _error 1895 L204: 1896 *line 449 1897 00000FDC 7E01 move #1,R7 1898 00000FDE 7E02 move #2,R7 1899 00000FE0 7E03 move #3,R7 1900 *line 449 1901 00000FE2 BE7C0003 cmp #3,R7 1902 00000FE6 6708 beq L205 1903 *line 449 1904 00000FE8 3EBC0258 move #600,(sp) 1905 00000FEC 4EB81686 jsr _error 1906 L205: 1907 *line 450 1908 00000FF0 7E03 move #3,R7 1909 00000FF2 3D7C0002FFFE move #2,-2(R14) 1910 00000FF8 7E01 move #1,R7 1911 00000FFA 3007 move R7,R0 1912 00000FFC B07C0001 cmp #1,R0 1913 00001000 660E bne L10005 1914 00001002 BE7C0001 cmp #1,R7 1915 00001006 6608 bne L10005 1916 00001008 0C6E0002FFFE cmp #2,-2(R14) 1917 0000100E 6708 beq L206 1918 L10005:*line 450 1919 00001010 3EBC0259 move #601,(sp) 1920 00001014 4EB81686 jsr _error 1921 L206: 1922 *line 451 1923 00001018 BE7C0001 cmp #1,R7 1924 0000101C 40C0 move sr,R0 1925 0000101E 5247 add #1,R7 1926 00001020 44C0 move R0,ccr 1927 00001022 6612 bne L10006 1928 00001024 BE7C0002 cmp #2,R7 1929 00001028 40C0 move sr,R0 1930 0000102A 5347 sub #1,R7 1931 0000102C 44C0 move R0,ccr 1932 0000102E 6606 bne L10006 1933 00001030 BE7C0001 cmp #1,R7 1934 00001034 6708 beq L207 1935 L10006:*line 451 1936 00001036 3EBC0260 move #608,(sp) 1937 0000103A 4EB81686 jsr _error 1938 L207: 1939 *line 452 1940 0000103E 3007 move R7,R0 1941 00001040 D06EFFFE add -2(R14),R0 1942 00001044 B07C0003 cmp #3,R0 1943 00001048 40C0 move sr,R0 1944 0000104A 526EFFFE add #1,-2(R14) 1945 0000104E 5247 add #1,R7 1946 00001050 44C0 move R0,ccr 1947 00001052 660E bne L10007 1948 00001054 BE7C0002 cmp #2,R7 1949 00001058 6608 bne L10007 1950 0000105A 0C6E0003FFFE cmp #3,-2(R14) 1951 00001060 6708 beq L208 1952 L10007:*line 452 1953 00001062 3EBC0261 move #609,(sp) 1954 00001066 4EB81686 jsr _error 1955 L208: 1956 *line 454 1957 0000106A 4EB81A84 jsr _ckcast 1958 *line 456 1959 0000106E 2A7C00000005 move.l #5,R13 1960 00001074 200D move.l R13,R0 1961 00001076 6702 beq L209 1962 00001078 6008 bra L210 1963 L209: 1964 *line 456 1965 0000107A 3EBC0301 move #769,(sp) 1966 0000107E 4EB81686 jsr _error 1967 L210: 1968 *line 457 1969 00001082 5B8D sub.l #5,R13 1970 00001084 200D move.l R13,R0 1971 00001086 6708 beq L211 1972 *line 457 1973 00001088 3EBC0302 move #770,(sp) 1974 0000108C 4EB81686 jsr _error 1975 L211: 1976 *line 458 1977 00001090 528D add.l #1,R13 1978 00001092 200D move.l R13,R0 1979 00001094 C0BC00000001 and.l #1,R0 1980 0000109A 6608 bne L212 1981 *line 458 1982 0000109C 3EBC0303 move #771,(sp) 1983 000010A0 4EB81686 jsr _error 1984 L212: 1985 *line 459 1986 000010A4 42B80000 clr.l _p0 1987 *line 460 1988 000010A8 2A780000 move.l _p0,R13 1989 000010AC 200D move.l R13,R0 1990 000010AE 6708 beq L213 1991 *line 460 1992 000010B0 3EBC0304 move #772,(sp) 1993 000010B4 4EB81686 jsr _error 1994 L213: 1995 *line 461 1996 000010B8 21FC000000000000 move.l #_p0,_p0 1997 *line 462 1998 000010C0 2A780000 move.l _p0,R13 1999 000010C4 200D move.l R13,R0 2000 000010C6 53B80000 sub.l #1,_p0 2001 000010CA 4A80 tst.l R0 2002 000010CC 6702 beq L214 2003 000010CE 6008 bra L215 2004 L214: 2005 *line 462 2006 000010D0 3EBC0305 move #773,(sp) 2007 000010D4 4EB81686 jsr _error 2008 L215: 2009 *line 463 2010 000010D8 2A780004 move.l 4+_ai,R13 2011 000010DC DBF8001C add.l 28+_zz,R13 2012 *line 464 2013 000010E0 2A7C00000010 move.l #16+_zz,R13 2014 *line 465 2015 000010E6 31FC00020012 move #2,18+_zz 2016 *line 466 2017 000010EC 082D00000003 btst #0,3(R13) 2018 000010F2 6708 beq L216 2019 *line 466 2020 000010F4 3EBC0306 move #774,(sp) 2021 000010F8 4EB81686 jsr _error 2022 L216: 2023 *line 467 2024 000010FC 4A6D0002 tst 2(R13) 2025 00001100 6704 beq L10008 2026 00001102 4240 clr R0 2027 00001104 6002 bra L10009 2028 00001106 7001 L10008:move #1,R0 2029 00001108 C07C0002 L10009:and #2,R0 2030 0000110C 6708 beq L217 2031 *line 467 2032 0000110E 3EBC0307 move #775,(sp) 2033 00001112 4EB81686 jsr _error 2034 L217: 2035 *line 468 2036 00001116 2A7C00000038 move.l #56,R13 2037 *line 469 2038 0000111C 200D move.l R13,R0 2039 0000111E C0BC00000001 and.l #1,R0 2040 00001124 6708 beq L218 2041 *line 469 2042 00001126 3EBC0308 move #776,(sp) 2043 0000112A 4EB81686 jsr _error 2044 L218: 2045 *line 470 2046 0000112E 200D move.l R13,R0 2047 00001130 C0BC00000020 and.l #32,R0 2048 00001136 6608 bne L219 2049 *line 470 2050 00001138 3EBC0309 move #777,(sp) 2051 0000113C 4EB81686 jsr _error 2052 L219: 2053 *line 471 2054 00001140 3D7C0069FFFE move #105,-2(R14) 2055 *line 472 2056 00001146 2A7C00000069 move.l #105,R13 2057 *line 473 2058 0000114C BAEEFFFE cmp -2(R14),R13 2059 00001150 6708 beq L220 2060 *line 473 2061 00001152 3EBC0320 move #800,(sp) 2062 00001156 4EB81686 jsr _error 2063 L220: 2064 *line 474 2065 0000115A 31FC87650006 move #-30875,6+_ai 2066 *line 475 2067 00001160 3D7C0001FFFE move #1,-2(R14) 2068 *line 476 2069 00001166 306EFFFE move -2(R14),R8 2070 0000116A D1C8 add.l R8,R8 2071 0000116C D1C8 add.l R8,R8 2072 0000116E 2068007A move.l _pai(R8),R8 2073 00001172 3E10 move (R8),R7 2074 *line 477 2075 00001174 BE7C8765 cmp #-30875,R7 2076 00001178 6708 beq L221 2077 *line 477 2078 0000117A 3EBC0321 move #801,(sp) 2079 0000117E 4EB81686 jsr _error 2080 L221: 2081 *line 478 2082 00001182 2A7C000003E8 move.l #1000,R13 2083 *line 479 2084 00001188 2D7C00000000FFE6 move.l #_p0,-26(R14) 2085 *line 480 2086 00001190 41ED0001 lea 1(R13),R8 2087 00001194 2D48FFEA move.l R8,-22(R14) 2088 00001198 2008 move.l R8,R0 2089 0000119A 226EFFE6 move.l -26(R14),R9 2090 0000119E 2280 move.l R0,(R9) 2091 *line 481 2092 000011A0 0CB8000003E90000 cmp.l #1001,_p0 2093 000011A8 6708 beq L222 2094 *line 481 2095 000011AA 3EBC0322 move #802,(sp) 2096 000011AE 4EB81686 jsr _error 2097 L222: 2098 *line 482 2099 000011B2 4EB81ABE jsr _chkptrs 2100 *line 483 2101 000011B6 4EB81EA8 jsr _tembedas 2102 *line 484 2103 000011BA 4EB81F26 jsr _macrotes 2104 *line 485 2105 000011BE 4EB81F2E jsr _lextest 2106 *line 486 2107 000011C2 4EB81F5A jsr _cmplxptr 2108 *line 488 2109 000011C6 1D7C0064FFF0 move.b #100,-16(R14) 2110 *line 489 2111 000011CC 3E3C0400 move #1024,R7 2112 *line 490 2113 000011D0 21FC00007A020000 move.l #31234,L3 2114 *line 491 2115 000011D8 11FC005A0000 move.b #90,_c 2116 *line 493 2117 000011DE 10380000 move.b _c,R0 2118 000011E2 4880 ext.w R0 2119 000011E4 3E80 move R0,(sp) 2120 000011E6 2F3C00000000 move.l #L1,-(sp) 2121 000011EC 2F380000 move.l L3,-(sp) 2122 000011F0 3F07 move R7,-(sp) 2123 000011F2 3F07 move R7,-(sp) 2124 000011F4 102EFFF0 move.b -16(R14),R0 2125 000011F8 4880 ext.w R0 2126 000011FA 3F00 move R0,-(sp) 2127 000011FC 102EFFF0 move.b -16(R14),R0 2128 00001200 4880 ext.w R0 2129 00001202 3F00 move R0,-(sp) 2130 00001204 2F3C000001B4 move.l #L223,-(sp) 2131 0000120A 4EB80000 jsr _printf 2132 0000120E DFFC00000014 adda.l #20,sp 2133 *line 494 2134 00001214 21FC00A9B7C30000 move.l #$a9b7c3,L3 2135 *line 495 2136 0000121C 3E3CF1E4 move #-3612,R7 2137 *line 496 2138 00001220 3E87 move R7,(sp) 2139 00001222 2F380000 move.l L3,-(sp) 2140 00001226 2F3C000001F0 move.l #L224,-(sp) 2141 0000122C 4EB80000 jsr _printf 2142 00001230 508F addq.l #8,sp 2143 *line 497 2144 00001232 6116 jsr _v33 2145 *line 498 2146 00001234 6176 jsr _v34 2147 *line 500 2148 00001236 2EBC00000208 move.l #L225,(sp) 2149 0000123C 4EB816A2 jsr _putstrin 2150 00001240 4A9F L8:tst.l (sp)+ 2151 00001242 4CDF20F0 movem.l(sp)+,R4-R7/R13-R13 2152 00001246 4E5E unlk R14 2153 00001248 4E75 rts 2154 .globl _v33 2155 0000124A .text 2156 _v33: 2157 ~~v33: 2158 ~i=-4 2159 ~l=L3 2160 ~bb1=-18 2161 ~bb2=-30 2162 ~str=L1 2163 0000124A 4E56FFDE link R14,#-34 2164 *line 509 2165 0000124E 41EEFFEE lea -18(R14),R8 2166 00001252 2D48FFE6 move.l R8,-26(R14) 2167 *line 510 2168 00001256 3D7C0017FFF2 move #23,-14(R14) 2169 *line 511 2170 0000125C 206EFFE6 move.l -26(R14),R8 2171 00001260 3EA80004 move 4(R8),(sp) 2172 00001264 3F2EFFF2 move -14(R14),-(sp) 2173 00001268 2F3C0000021D move.l #L227,-(sp) 2174 0000126E 4EB80000 jsr _printf 2175 00001272 5C8F addq.l #6,sp 2176 *line 512 2177 00001274 31FC00630002 move #99,2+_x 2178 *line 513 2179 0000127A 20780084 move.l 2+_sound,R8 2180 0000127E 3E90 move (R8),(sp) 2181 00001280 3F380002 move 2+_x,-(sp) 2182 00001284 2F3C00000226 move.l #L228,-(sp) 2183 0000128A 4EB80000 jsr _printf 2184 0000128E 5C8F addq.l #6,sp 2185 *line 514 2186 00001290 2D7C00111111FFFC move.l #$111111,-4(R14) 2187 *line 515 2188 00001298 2EAEFFFC move.l -4(R14),(sp) 2189 0000129C 2F3C0000022F move.l #L229,-(sp) 2190 000012A2 4EB80000 jsr _printf 2191 000012A6 588F addq.l #4,sp 2192 000012A8 4E5E L226:unlk R14 2193 000012AA 4E75 rts 2194 .globl _v34 2195 000012AC .text 2196 _v34: 2197 ~~v34: 2198 ~i=-34 2199 ~l=L3 2200 ~q=-4 2201 ~s=-60 2202 ~d1=-38 2203 ~d2=-42 2204 ~f1=-28 2205 ~f2=-32 2206 ~p3=R13 2207 ~p4=-12 2208 ~p5=-20 2209 ~ar34=-24 2210 ~ptr=-50 2211 ~str=L1 2212 ~sop1=-46 2213 000012AC 4E56FFC4 link R14,#-60 2214 000012B0 48E70104 movem.lR7-R7/R13-R13,-(sp) 2215 *line 530 2216 000012B4 202EFFFC move.l -4(R14),R0 2217 000012B8 C0BC00000007 and.l #7,R0 2218 000012BE 4E71 beq L231 2219 000012C0 6008 L231:bra L232 2220 *line 533 2221 000012C2 3EBC0E00 move #3584,(sp) 2222 000012C6 4EB81686 jsr _error 2223 L232: 2224 *line 535 2225 000012CA 6008 bra L233 2226 *line 535 2227 000012CC 3EBC0E01 move #3585,(sp) 2228 000012D0 4EB81686 jsr _error 2229 L233: 2230 *line 537 2231 000012D4 21FC001000000000 move.l #$100000,L3 2232 *line 538 2233 000012DC 3D7C0001FFDE move #1,-34(R14) 2234 *line 539 2235 000012E2 322EFFDE move -34(R14),R1 2236 000012E6 20380000 move.l L3,R0 2237 000012EA E3A0 asl.l R1,R0 2238 000012EC 21C00000 move.l R0,L3 2239 *line 540 2240 000012F0 20380000 move.l L3,R0 2241 000012F4 B0BC00200000 cmp.l #$200000,R0 2242 000012FA 6708 beq L234 2243 *line 540 2244 000012FC 3EBC0E02 move #3586,(sp) 2245 00001300 4EB81686 jsr _error 2246 L234: 2247 *line 541 2248 00001304 21FC000000100000 move.l #16,L3 2249 *line 542 2250 0000130C 322EFFDE move -34(R14),R1 2251 00001310 20380000 move.l L3,R0 2252 00001314 E3A0 asl.l R1,R0 2253 00001316 21C00000 move.l R0,L3 2254 *line 543 2255 0000131A 0CB8000000200000 cmp.l #32,L3 2256 00001322 6708 beq L235 2257 *line 543 2258 00001324 3EBC0E03 move #3587,(sp) 2259 00001328 4EB81686 jsr _error 2260 L235: 2261 *line 544 2262 0000132C 21FC000000010000 move.l #$1,_l1 2263 *line 545 2264 00001334 21FC000000010000 move.l #$1,_l2 2265 *line 546 2266 0000133C 3D7C0005FFDE move #5,-34(R14) 2267 *line 547 2268 00001342 322EFFDE move -34(R14),R1 2269 00001346 20380000 move.l _l1,R0 2270 0000134A E3A0 asl.l R1,R0 2271 0000134C 21C00000 move.l R0,_l1 2272 *line 548 2273 00001350 20380000 move.l _l2,R0 2274 00001354 322EFFDE move -34(R14),R1 2275 00001358 E3A0 asl.l R1,R0 2276 0000135A 21C00000 move.l R0,_l2 2277 *line 549 2278 0000135E 20380000 move.l _l1,R0 2279 00001362 B0B80000 cmp.l _l2,R0 2280 00001366 6708 beq L236 2281 *line 549 2282 00001368 3EBC0E04 move #3588,(sp) 2283 0000136C 4EB81686 jsr _error 2284 L236: 2285 *line 551 2286 00001370 4EB81418 jsr _f 2287 00001374 2A40 move.l R0,R13 2288 00001376 BBFCFFFFFFFF cmp.l #-1,R13 2289 0000137C 6708 beq L237 2290 *line 551 2291 0000137E 3EBC0E05 move #3589,(sp) 2292 00001382 4EB81686 jsr _error 2293 L237: 2294 *line 553 2295 00001386 1D7C0070FFF4 move.b #112,-12(R14) 2296 *line 554 2297 0000138C 4BEEFFEC lea -20(R14),R13 2298 *line 555 2299 00001390 224E move.l R14,R9 2300 00001392 D3FCFFFFFFF4 add.l #-12,R9 2301 00001398 204D move.l R13,R8 2302 0000139A 7003 move #3,r0 2303 0000139C 30D9 L10010:move (r9)+,(r8)+ 2304 0000139E 51C8FFFC dbra r0,L10010 2305 *line 556 2306 000013A2 1015 move.b (R13),R0 2307 000013A4 4880 ext.w R0 2308 000013A6 B02EFFF4 cmp.b -12(R14),R0 2309 000013AA 6708 beq L238 2310 *line 556 2311 000013AC 3EBC0E10 move #3600,(sp) 2312 000013B0 4EB81686 jsr _error 2313 L238: 2314 *line 557 2315 000013B4 1D7C0045FFF4 move.b #69,-12(R14) 2316 *line 558 2317 000013BA 224E move.l R14,R9 2318 000013BC D3FCFFFFFFF4 add.l #-12,R9 2319 000013C2 204E move.l R14,R8 2320 000013C4 D1FCFFFFFFEC add.l #-20,R8 2321 000013CA 7003 move #3,r0 2322 000013CC 30D9 L10011:move (r9)+,(r8)+ 2323 000013CE 51C8FFFC dbra r0,L10011 2324 *line 559 2325 000013D2 102EFFEC move.b -20(R14),R0 2326 000013D6 4880 ext.w R0 2327 000013D8 B02EFFF4 cmp.b -12(R14),R0 2328 000013DC 6708 beq L239 2329 *line 559 2330 000013DE 3EBC0E11 move #3601,(sp) 2331 000013E2 4EB81686 jsr _error 2332 L239: 2333 *line 560 2334 000013E6 1ABC0037 move.b #55,(R13) 2335 *line 561 2336 000013EA 224D move.l R13,R9 2337 000013EC 204E move.l R14,R8 2338 000013EE D1FCFFFFFFF4 add.l #-12,R8 2339 000013F4 7003 move #3,r0 2340 000013F6 30D9 L10012:move (r9)+,(r8)+ 2341 000013F8 51C8FFFC dbra r0,L10012 2342 *line 562 2343 000013FC 102EFFF4 move.b -12(R14),R0 2344 00001400 4880 ext.w R0 2345 00001402 B015 cmp.b (R13),R0 2346 00001404 6708 beq L240 2347 *line 562 2348 00001406 3EBC0E12 move #3602,(sp) 2349 0000140A 4EB81686 jsr _error 2350 0000140E 4A9F L240:L230:tst.l(sp)+ 2351 00001410 4CDF2000 movem.l(sp)+,R13-R13 2352 00001414 4E5E unlk R14 2353 00001416 4E75 rts 2354 .globl _f 2355 00001418 .text 2356 _f: 2357 ~~f: 2358 ~l=L3 2359 ~str=L1 2360 00001418 4E56FFFC link R14,#-4 2361 *line 568 2362 0000141C 70FF move #-1,R0 2363 0000141E 4E71 bra L241 2364 00001420 4E5E L241:unlk R14 2365 00001422 4E75 rts 2366 .globl _chklext 2367 00001424 .text 2368 _chklext: 2369 ~~chklext: 2370 ~l=L3 2371 ~al9=8 2372 ~str=L1 2373 00001424 4E56FFFC link R14,#-4 2374 *line 575 2375 00001428 0CAEFFFFFFF40008 cmp.l #$fffffff4,8(R14) 2376 00001430 6708 beq L243 2377 *line 575 2378 00001432 3EBC0375 move #885,(sp) 2379 00001436 4EB81686 jsr _error 2380 0000143A 4E5E L243:L242:unlk R14 2381 0000143C 4E75 rts 2382 .globl _chkinits 2383 0000143E .text 2384 _chkinits: 2385 ~~chkinits: 2386 00000088 .data 2387 00000088 000F423F L245:.dc.w 15,16959 2388 0000143E .text 2389 0000008C .data 2390 L246: 2391 *line 586 2392 0000008C 0000023F .dc.l L247 2393 00000090 0001 .dc.w 1 2394 00000092 0003FF41 .dc.w 3,-191 2395 *line 586 2396 00000096 00000243 .dc.l L248 2397 0000009A 0002 .dc.w 2 2398 0000009C 0000008F .dc.w 0,143 2399 *line 586 2400 000000A0 00000247 .dc.l L249 2401 000000A4 0003 .dc.w 3 2402 000000A6 .ds.b 4 2403 0000143E .text 2404 ~i=R7 2405 ~l=L3 2406 ~ss=L246 2407 ~str=L1 2408 ~liv1=L245 2409 0000143E 4E560000 link R14,#0 2410 00001442 48E70300 movem.lR6-R7,-(sp) 2411 *line 589 2412 00001446 20380088 move.l L245,R0 2413 0000144A B0BC000F423F cmp.l #$f423f,R0 2414 00001450 6708 beq L250 2415 *line 589 2416 00001452 3EBC0FF1 move #4081,(sp) 2417 00001456 4EB81686 jsr _error 2418 L250: 2419 *line 590 2420 0000145A 0C780002009A cmp #2,14+L246 2421 00001460 6708 beq L251 2422 *line 590 2423 00001462 3EBC0FF2 move #4082,(sp) 2424 00001466 4EB81686 jsr _error 2425 L251: 2426 *line 591 2427 0000146A 2EBC0000024B move.l #L252,(sp) 2428 00001470 2F3800A0 move.l 20+L246,-(sp) 2429 00001474 4EB81720 jsr _eqstr 2430 00001478 588F addq.l #4,sp 2431 0000147A 4A40 tst R0 2432 0000147C 6608 bne L253 2433 *line 591 2434 0000147E 3EBC0FF3 move #4083,(sp) 2435 00001482 4EB81686 jsr _error 2436 L253: 2437 *line 592 2438 00001486 20380092 move.l 6+L246,R0 2439 0000148A B0BC0003FF41 cmp.l #$3ff41,R0 2440 00001490 6708 beq L254 2441 *line 592 2442 00001492 3EBC0FF4 move #4084,(sp) 2443 00001496 4EB81686 jsr _error 2444 L254: 2445 *line 593 2446 0000149A 0CB80000008F009C cmp.l #$8f,16+L246 2447 000014A2 6708 beq L255 2448 *line 593 2449 000014A4 3EBC0FF5 move #4085,(sp) 2450 000014A8 4EB81686 jsr _error 2451 L255: 2452 *line 594 2453 000014AC 4AB800A6 tst.l 26+L246 2454 000014B0 6708 beq L256 2455 *line 594 2456 000014B2 3EBC0FF6 move #4086,(sp) 2457 000014B6 4EB81686 jsr _error 2458 L256: 2459 *line 595 2460 000014BA 08380007009F btst #7,19+L246 2461 000014C0 6702 beq L257 2462 000014C2 6008 bra L258 2463 L257: 2464 *line 595 2465 000014C4 3EBC0FF7 move #4087,(sp) 2466 000014C8 4EB81686 jsr _error 2467 L258: 2468 *line 596 2469 000014CC 0C780001000A cmp #1,_initi 2470 000014D2 6708 beq L259 2471 *line 596 2472 000014D4 3EBC0FF8 move #4088,(sp) 2473 000014D8 4EB81686 jsr _error 2474 L259: 2475 *line 597 2476 000014DC 4247 clr R7 2477 000014DE 6000008C bra L262 2478 L263: 2479 *line 598 2480 000014E2 3047 move R7,R8 2481 000014E4 D1C8 add.l R8,R8 2482 000014E6 3028000C move _initk(R8),R0 2483 000014EA 3207 move R7,R1 2484 000014EC 5241 add #1,R1 2485 000014EE B041 cmp R1,R0 2486 000014F0 6708 beq L264 2487 *line 598 2488 000014F2 3EBC0FF9 move #4089,(sp) 2489 000014F6 4EB81686 jsr _error 2490 L264: 2491 *line 599 2492 000014FA 3007 move R7,R0 2493 000014FC E740 asl #3,R0 2494 000014FE 48C0 ext.l R0 2495 00001500 2040 move.l R0,R8 2496 00001502 30280012 move _initl(R8),R0 2497 00001506 3207 move R7,R1 2498 00001508 E541 asl #2,R1 2499 0000150A 5241 add #1,R1 2500 0000150C B041 cmp R1,R0 2501 0000150E 6708 beq L265 2502 *line 599 2503 00001510 3EBCFF10 move #-240,(sp) 2504 00001514 4EB81686 jsr _error 2505 L265: 2506 *line 600 2507 00001518 3007 move R7,R0 2508 0000151A C1FC0006 muls #6,R0 2509 0000151E 2040 move.l R0,R8 2510 00001520 BE680032 cmp _inits(R8),R7 2511 00001524 6708 beq L266 2512 *line 600 2513 00001526 3EBCFF11 move #-239,(sp) 2514 0000152A 4EB81686 jsr _error 2515 L266: 2516 *line 601 2517 0000152E 3007 move R7,R0 2518 00001530 C1FC0006 muls #6,R0 2519 00001534 2040 move.l R0,R8 2520 00001536 20280034 move.l 2+_inits(R8),R0 2521 0000153A 3047 move R7,R8 2522 0000153C B088 cmp.l R8,R0 2523 0000153E 6708 beq L267 2524 *line 601 2525 00001540 3EBCFF12 move #-238,(sp) 2526 00001544 4EB81686 jsr _error 2527 L267: 2528 *line 602 2529 00001548 3007 move R7,R0 2530 0000154A C1FC0003 muls #3,R0 2531 0000154E 2040 move.l R0,R8 2532 00001550 1028006A move.b _inite(R8),R0 2533 00001554 4880 ext.w R0 2534 00001556 3207 move R7,R1 2535 00001558 C3FC0003 muls #3,R1 2536 0000155C 5241 add #1,R1 2537 0000155E B041 cmp R1,R0 2538 00001560 6708 beq L268 2539 *line 602 2540 00001562 3EBCFF13 move #-237,(sp) 2541 00001566 4EB81686 jsr _error 2542 L268:L261: 2543 *line 597 2544 0000156A 5247 add #1,R7 2545 L262: 2546 *line 597 2547 0000156C BE7C0003 cmp #3,R7 2548 00001570 6D00FF70 blt L263 2549 L260: 2550 *line 604 2551 00001574 2EBC0000024F move.l #L269,(sp) 2552 0000157A 2F3C00000044 move.l #_initc,-(sp) 2553 00001580 4EB81720 jsr _eqstr 2554 00001584 588F addq.l #4,sp 2555 00001586 4A40 tst R0 2556 00001588 6608 bne L270 2557 *line 604 2558 0000158A 3EBCFF14 move #-236,(sp) 2559 0000158E 4EB81686 jsr _error 2560 L270: 2561 *line 605 2562 00001592 2EBC0000025A move.l #L271,(sp) 2563 00001598 2F3C00000058 move.l #_initd,-(sp) 2564 0000159E 4EB81720 jsr _eqstr 2565 000015A2 588F addq.l #4,sp 2566 000015A4 4A40 tst R0 2567 000015A6 6608 bne L272 2568 *line 605 2569 000015A8 3EBCFF15 move #-235,(sp) 2570 000015AC 4EB81686 jsr _error 2571 L272: 2572 *line 606 2573 000015B0 2EBC0000026B move.l #L273,(sp) 2574 000015B6 2F380074 move.l _initcc,-(sp) 2575 000015BA 4EB81720 jsr _eqstr 2576 000015BE 588F addq.l #4,sp 2577 000015C0 4A40 tst R0 2578 000015C2 6608 bne L274 2579 *line 606 2580 000015C4 3EBCFF16 move #-234,(sp) 2581 000015C8 4EB81686 jsr _error 2582 L274: 2583 *line 607 2584 000015CC 6008 bra L275 2585 *line 607 2586 000015CE 3EBCFF17 move #-233,(sp) 2587 000015D2 4EB81686 jsr _error 2588 L275: 2589 *line 608 2590 000015D6 6008 bra L276 2591 *line 608 2592 000015D8 3EBCFF18 move #-232,(sp) 2593 000015DC 4EB81686 jsr _error 2594 L276: 2595 *line 609 2596 000015E0 6008 bra L277 2597 *line 609 2598 000015E2 3EBCFF19 move #-231,(sp) 2599 000015E6 4EB81686 jsr _error 2600 L277: 2601 *line 610 2602 000015EA 0C7801020078 cmp #258,_ccinit 2603 000015F0 6708 beq L278 2604 *line 610 2605 000015F2 3EBCFF20 move #-224,(sp) 2606 000015F6 4EB81686 jsr _error 2607 000015FA 4A9F L278:L244:tst.l(sp)+ 2608 000015FC 4CDF0080 movem.l(sp)+,R7-R7 2609 00001600 4E5E unlk R14 2610 00001602 4E75 rts 2611 .globl _checkreg 2612 00001604 .text 2613 _checkreg: 2614 ~~checkreg: 2615 ~l=L3 2616 ~rx1=R7 2617 ~rx2=R6 2618 ~rx3=R5 2619 ~rx4=R4 2620 ~rx5=R3 2621 ~rx6=-2 2622 ~rx7=-4 2623 ~rx8=-6 2624 ~rx9=-8 2625 ~str=L1 2626 00001604 4E56FFF8 link R14,#-8 2627 00001608 48E73F00 movem.lR2-R7,-(sp) 2628 *line 618 2629 0000160C 7E01 move #1,R7 2630 *line 619 2631 0000160E 7C02 move #2,R6 2632 *line 620 2633 00001610 7605 move #5,R3 2634 *line 621 2635 00001612 3D7C0008FFFA move #8,-6(R14) 2636 *line 622 2637 00001618 3D7C0009FFF8 move #9,-8(R14) 2638 *line 623 2639 0000161E 3007 move R7,R0 2640 00001620 D046 add R6,R0 2641 00001622 B07C0003 cmp #3,R0 2642 00001626 6706 beq L280 2643 *line 623 2644 00001628 3EBC0360 move #864,(sp) 2645 0000162C 6158 jsr _error 2646 L280: 2647 *line 624 2648 0000162E 3006 move R6,R0 2649 00001630 D043 add R3,R0 2650 00001632 B07C0007 cmp #7,R0 2651 00001636 6706 beq L281 2652 *line 624 2653 00001638 3EBC0361 move #865,(sp) 2654 0000163C 6148 jsr _error 2655 L281: 2656 *line 625 2657 0000163E 302EFFF8 move -8(R14),R0 2658 00001642 9043 sub R3,R0 2659 00001644 B07C0004 cmp #4,R0 2660 00001648 6706 beq L282 2661 *line 625 2662 0000164A 3EBC0362 move #866,(sp) 2663 0000164E 6136 jsr _error 2664 L282: 2665 *line 626 2666 00001650 302EFFFA move -6(R14),R0 2667 00001654 D06EFFF8 add -8(R14),R0 2668 00001658 B07C0011 cmp #17,R0 2669 0000165C 6706 beq L283 2670 *line 626 2671 0000165E 3EBC0363 move #867,(sp) 2672 00001662 6122 jsr _error 2673 00001664 4A9F L283:L279:tst.l(sp)+ 2674 00001666 4CDF00F8 movem.l(sp)+,R3-R7 2675 0000166A 4E5E unlk R14 2676 0000166C 4E75 rts 2677 .globl _checklv 2678 0000166E .text 2679 _checklv: 2680 ~~checklv: 2681 ~l=L3 2682 ~alv=8 2683 ~str=L1 2684 0000166E 4E56FFFC link R14,#-4 2685 *line 632 2686 00001672 0CAE000000120008 cmp.l #$12,8(R14) 2687 0000167A 6706 beq L285 2688 *line 632 2689 0000167C 3EBC364E move #13902,(sp) 2690 00001680 6104 jsr _error 2691 00001682 4E5E L285:L284:unlk R14 2692 00001684 4E75 rts 2693 .globl _error 2694 00001686 .text 2695 _error: 2696 ~~error: 2697 ~l=L3 2698 ~pc=8 2699 ~str=L1 2700 00001686 4E56FFFC link R14,#-4 2701 *line 637 2702 0000168A 3EAE0008 move 8(R14),(sp) 2703 0000168E 2F3C0000027B move.l #L287,-(sp) 2704 00001694 4EB80000 jsr _printf 2705 00001698 588F addq.l #4,sp 2706 *line 639 2707 0000169A 4EB80000 jsr _exit 2708 0000169E 4E5E L286:unlk R14 2709 000016A0 4E75 rts 2710 .globl _putstrin 2711 000016A2 .text 2712 _putstrin: 2713 ~~putstrin: 2714 ~l=L3 2715 ~p=R13 2716 ~pc=8 2717 ~str=L1 2718 000016A2 4E560000 link R14,#0 2719 000016A6 48E70104 movem.lR7-R7/R13-R13,-(sp) 2720 *line 648 2721 000016AA 2A6E0008 move.l 8(R14),R13 2722 000016AE 600A bra L291 2723 L290: 2724 *line 650 2725 000016B0 101D move.b (R13)+,R0 2726 000016B2 4880 ext.w R0 2727 000016B4 3E80 move R0,(sp) 2728 000016B6 4EB80000 jsr _putchar 2729 L291: 2730 *line 650 2731 000016BA 4A15 tst.b (R13) 2732 000016BC 66F2 bne L290 2733 L289: 2734 *line 651 2735 000016BE 3EBC000A move #10,(sp) 2736 000016C2 4EB80000 jsr _putchar 2737 000016C6 4A9F L288:tst.l (sp)+ 2738 000016C8 4CDF2000 movem.l(sp)+,R13-R13 2739 000016CC 4E5E unlk R14 2740 000016CE 4E75 rts 2741 .globl _targs 2742 000016D0 .text 2743 _targs: 2744 ~~targs: 2745 ~l=L3 2746 ~a1=9 2747 ~a2=10 2748 ~a3=12 2749 ~str=L1 2750 000016D0 4E56FFFC link R14,#-4 2751 *line 657 2752 000016D4 0C2E00010009 cmp.b #1,9(R14) 2753 000016DA 6610 bne L10013 2754 000016DC 0C6E03E8000A cmp #1000,10(R14) 2755 000016E2 6608 bne L10013 2756 000016E4 0C6EB845000C cmp #-18363,12(R14) 2757 000016EA 6706 beq L293 2758 L10013:*line 657 2759 000016EC 3EBCFE00 move #-512,(sp) 2760 000016F0 6194 jsr _error 2761 L293: 2762 *line 658 2763 000016F2 203C00009C40 move.l #$9c40,R0 2764 000016F8 B0BC00009C40 cmp.l #$9c40,R0 2765 000016FE 6706 beq L294 2766 *line 658 2767 00001700 3EBCFE01 move #-511,(sp) 2768 00001704 6180 jsr _error 2769 00001706 4E5E L294:L292:unlk R14 2770 00001708 4E75 rts 2771 .globl _addargs 2772 0000170A .text 2773 _addargs: 2774 ~~addargs: 2775 ~l=L3 2776 ~a1=8 2777 ~a2=10 2778 ~a3=12 2779 ~str=L1 2780 0000170A 4E56FFFC link R14,#-4 2781 *line 664 2782 0000170E 302E0008 move 8(R14),R0 2783 00001712 D06E000A add 10(R14),R0 2784 00001716 D06E000C add 12(R14),R0 2785 0000171A 4E71 bra L295 2786 0000171C 4E5E L295:unlk R14 2787 0000171E 4E75 rts 2788 .globl _eqstr 2789 00001720 .text 2790 _eqstr: 2791 ~~eqstr: 2792 ~l=L3 2793 ~p1=R13 2794 ~p2=R12 2795 ~ap1=8 2796 ~ap2=12 2797 ~str=L1 2798 00001720 4E560000 link R14,#0 2799 00001724 48E7010C movem.lR7-R7/R12-R13,-(sp) 2800 *line 672 2801 00001728 2A6E0008 move.l 8(R14),R13 2802 *line 673 2803 0000172C 286E000C move.l 12(R14),R12 2804 00001730 6008 bra L299 2805 L298: 2806 *line 676 2807 00001732 B90D cmpm.b (R13)+,(R12)+ 2808 00001734 6704 beq L300 2809 *line 676 2810 00001736 4240 clr R0 2811 00001738 6010 bra L296 2812 L300:L299: 2813 *line 677 2814 0000173A 4A15 tst.b (R13) 2815 0000173C 66F4 bne L298 2816 L297: 2817 *line 679 2818 0000173E 4A14 tst.b (R12) 2819 00001740 6704 beq L301 2820 *line 679 2821 00001742 4240 clr R0 2822 00001744 6004 bra L296 2823 L301: 2824 *line 680 2825 00001746 7001 move #1,R0 2826 00001748 4E71 bra L296 2827 0000174A 4A9F L296:tst.l (sp)+ 2828 0000174C 4CDF3000 movem.l(sp)+,R12-R13 2829 00001750 4E5E unlk R14 2830 00001752 4E75 rts 2831 .globl _addlargs 2832 00001754 .text 2833 _addlargs: 2834 ~~addlargs: 2835 ~i=R7 2836 ~j=R6 2837 ~k=R5 2838 ~l=L3 2839 ~a1=8 2840 ~a2=12 2841 ~lr2=R4 2842 ~str=L1 2843 00001754 4E560000 link R14,#0 2844 00001758 48E71F00 movem.lR3-R7,-(sp) 2845 *line 689 2846 0000175C 3E3C03E8 move #1000,R7 2847 *line 690 2848 00001760 283CBBBBBBBB move.l #$bbbbbbbb,R4 2849 *line 691 2850 00001766 3EBCB845 move #-18363,(sp) 2851 0000176A 3F07 move R7,-(sp) 2852 0000176C 3F3C0001 move #1,-(sp) 2853 00001770 4EB816D0 jsr _targs 2854 00001774 588F addq.l #4,sp 2855 *line 692 2856 00001776 B8BCBBBBBBBB cmp.l #$bbbbbbbb,R4 2857 0000177C 6708 beq L303 2858 *line 692 2859 0000177E 3EBCFE02 move #-510,(sp) 2860 00001782 4EB81686 jsr _error 2861 L303: 2862 *line 694 2863 00001786 202E0008 move.l 8(R14),R0 2864 0000178A D0AE000C add.l 12(R14),R0 2865 0000178E 4E71 bra L302 2866 00001790 4A9F L302:tst.l (sp)+ 2867 00001792 4CDF00F0 movem.l(sp)+,R4-R7 2868 00001796 4E5E unlk R14 2869 00001798 4E75 rts 2870 .globl _addpargs 2871 0000179A .text 2872 _addpargs: 2873 ~~addpargs: 2874 ~l=L3 2875 ~a1=R13 2876 ~a2=R12 2877 ~str=L1 2878 0000179A 4E560000 link R14,#0 2879 0000179E 48E7010C movem.lR7-R7/R12-R13,-(sp) 2880 *line 701 2881 000017A2 2A6E0008 move.l 8(R14),R13 2882 *line 701 2883 000017A6 286E000C move.l 12(R14),R12 2884 *line 701 2885 000017AA 2015 move.l (R13),R0 2886 000017AC D094 add.l (R12),R0 2887 000017AE 4E71 bra L304 2888 000017B0 4A9F L304:tst.l (sp)+ 2889 000017B2 4CDF3000 movem.l(sp)+,R12-R13 2890 000017B6 4E5E unlk R14 2891 000017B8 4E75 rts 2892 .globl _swt1 2893 000017BA .text 2894 _swt1: 2895 ~~swt1: 2896 ~i=R7 2897 ~l=L3 2898 ~str=L1 2899 000017BA 4E560000 link R14,#0 2900 000017BE 48E70300 movem.lR6-R7,-(sp) 2901 *line 709 2902 000017C2 7EFF move #-1,R7 2903 000017C4 600000A2 bra L308 2904 L309: 2905 *line 710 2906 000017C8 3007 move R7,R0 2907 000017CA 60000080 bra L311 2908 *line 712 2909 000017CE 3EBC0140 move #320,(sp) 2910 000017D2 4EB81686 jsr _error 2911 L312: 2912 *line 715 2913 000017D6 BE7CFFFF cmp #-1,R7 2914 000017DA 6708 beq L313 2915 *line 715 2916 000017DC 3EBC0141 move #321,(sp) 2917 000017E0 4EB81686 jsr _error 2918 000017E4 60000080 L313:bra L307 2919 L314: 2920 *line 718 2921 000017E8 4A47 tst R7 2922 000017EA 6708 beq L315 2923 *line 718 2924 000017EC 3EBC0142 move #322,(sp) 2925 000017F0 4EB81686 jsr _error 2926 000017F4 60000070 L315:bra L307 2927 L316: 2928 *line 721 2929 000017F8 BE7C0001 cmp #1,R7 2930 000017FC 6708 beq L317 2931 *line 721 2932 000017FE 3EBC0143 move #323,(sp) 2933 00001802 4EB81686 jsr _error 2934 00001806 605E L317:bra L307 2935 L318: 2936 *line 724 2937 00001808 BE7C0004 cmp #4,R7 2938 0000180C 6708 beq L319 2939 *line 724 2940 0000180E 3EBC0144 move #324,(sp) 2941 00001812 4EB81686 jsr _error 2942 00001816 604E L319:bra L307 2943 L320: 2944 *line 727 2945 00001818 BE7C0002 cmp #2,R7 2946 0000181C 6708 beq L321 2947 *line 727 2948 0000181E 3EBC0145 move #325,(sp) 2949 00001822 4EB81686 jsr _error 2950 00001826 603E L321:bra L307 2951 L322: 2952 *line 730 2953 00001828 BE7C0003 cmp #3,R7 2954 0000182C 6708 beq L323 2955 *line 730 2956 0000182E 3EBC0146 move #326,(sp) 2957 00001832 4EB81686 jsr _error 2958 00001836 602E L323:bra L307 2959 L324: 2960 *line 733 2961 00001838 BE7C0005 cmp #5,R7 2962 0000183C 6708 beq L325 2963 *line 733 2964 0000183E 3EBC0147 move #327,(sp) 2965 00001842 4EB81686 jsr _error 2966 00001846 601E L325:bra L307 2967 00001848 601A L326:bra L310 2968 0000184A 6018 bra L310 2969 0000184C 907CFFFF L311:sub #-1,R0 2970 00001850 B07C0007 cmp #7,R0 2971 00001854 62E2 bhi L324 2972 00001856 E540 asl #2,R0 2973 00001858 3040 move R0,R8 2974 0000185A D1FC000000AA add.l #L327,R8 2975 00001860 2050 move.l (R8),R8 2976 00001862 4ED0 jmp (R8) 2977 000000AA .data 2978 000000AA 000017D6 L327:.dc.l L312 2979 000000AE 000017E8 .dc.l L314 2980 000000B2 000017F8 .dc.l L316 2981 000000B6 00001818 .dc.l L320 2982 000000BA 00001828 .dc.l L322 2983 000000BE 00001808 .dc.l L318 2984 000000C2 00001838 .dc.l L324 2985 000000C6 00001848 .dc.l L326 2986 00001864 .text 2987 00001864 600A L310:bra L306 2988 L307: 2989 *line 709 2990 00001866 5247 add #1,R7 2991 L308: 2992 *line 709 2993 00001868 BE7C000A cmp #10,R7 2994 0000186C 6D00FF5A blt L309 2995 L306: 2996 *line 741 2997 00001870 BE7C0006 cmp #6,R7 2998 00001874 6708 beq L328 2999 *line 741 3000 00001876 3EBC0148 move #328,(sp) 3001 0000187A 4EB81686 jsr _error 3002 L328: 3003 *line 742 3004 0000187E 7001 move.l #1,R0 3005 00001880 4E71 bra L305 3006 00001882 4A9F L305:tst.l (sp)+ 3007 00001884 4CDF0080 movem.l(sp)+,R7-R7 3008 00001888 4E5E unlk R14 3009 0000188A 4E75 rts 3010 .globl _swt2 3011 0000188C .text 3012 _swt2: 3013 ~~swt2: 3014 ~i=R7 3015 ~l=L3 3016 ~str=L1 3017 0000188C 4E560000 link R14,#0 3018 00001890 48E70300 movem.lR6-R7,-(sp) 3019 *line 749 3020 00001894 4247 clr R7 3021 00001896 60000092 bra L332 3022 L333: 3023 *line 750 3024 0000189A 3007 move R7,R0 3025 0000189C 60000070 bra L335 3026 *line 752 3027 000018A0 3EBC0150 move #336,(sp) 3028 000018A4 4EB81686 jsr _error 3029 000018A8 6000007A L336:bra L334 3030 L337: 3031 *line 757 3032 000018AC BE7C000A cmp #10,R7 3033 000018B0 6708 beq L338 3034 *line 757 3035 000018B2 3EBC0151 move #337,(sp) 3036 000018B6 4EB81686 jsr _error 3037 000018BA 6000006A L338:bra L331 3038 L339: 3039 *line 760 3040 000018BE 4A47 tst R7 3041 000018C0 6708 beq L340 3042 *line 760 3043 000018C2 3EBC0157 move #343,(sp) 3044 000018C6 4EB81686 jsr _error 3045 000018CA 605A L340:bra L331 3046 L341: 3047 *line 763 3048 000018CC BE7C0014 cmp #20,R7 3049 000018D0 6708 beq L342 3050 *line 763 3051 000018D2 3EBC0152 move #338,(sp) 3052 000018D6 4EB81686 jsr _error 3053 000018DA 604A L342:bra L331 3054 L343: 3055 *line 766 3056 000018DC BE7C0028 cmp #40,R7 3057 000018E0 6708 beq L344 3058 *line 766 3059 000018E2 3EBC0153 move #339,(sp) 3060 000018E6 4EB81686 jsr _error 3061 000018EA 603A L344:bra L331 3062 L345: 3063 *line 769 3064 000018EC BE7C0032 cmp #50,R7 3065 000018F0 6708 beq L346 3066 *line 769 3067 000018F2 3EBC0154 move #340,(sp) 3068 000018F6 4EB81686 jsr _error 3069 000018FA 602A L346:bra L331 3070 L347: 3071 *line 772 3072 000018FC BE7C001E cmp #30,R7 3073 00001900 6708 beq L348 3074 *line 772 3075 00001902 3EBC0155 move #341,(sp) 3076 00001906 4EB81686 jsr _error 3077 0000190A 601A L348:bra L331 3078 0000190C 6016 bra L334 3079 0000190E 48C0 L335:ext.l R0 3080 00001910 207C000000CA move.l #L349,R8 3081 00001916 7206 move #6,R1 3082 00001918 B098 L350:cmp.l (R8)+,R0 3083 0000191A 57C9FFFC dbeq R1,L350 3084 0000191E 20680018 move.l 24(R8),R8 3085 00001922 4ED0 jmp (R8) 3086 000000CA .data 3087 000000CA 00000000 L349:.dc.l 0 3088 000000CE 0000000A .dc.l 10 3089 000000D2 00000014 .dc.l 20 3090 000000D6 00000028 .dc.l 40 3091 000000DA 00000032 .dc.l 50 3092 000000DE 0000003C .dc.l 60 3093 000000E2 00000000 .dc.l 0 3094 000000E6 000018BE .dc.l L339 3095 000000EA 000018AC .dc.l L337 3096 000000EE 000018CC .dc.l L341 3097 000000F2 000018DC .dc.l L343 3098 000000F6 000018EC .dc.l L345 3099 000000FA 000018A8 .dc.l L336 3100 000000FE 000018FC .dc.l L347 3101 00001924 .text 3102 00001924 600C L334:bra L330 3103 L331: 3104 *line 749 3105 00001926 DE7C000A add #10,R7 3106 L332: 3107 *line 749 3108 0000192A BE7C0064 cmp #100,R7 3109 0000192E 6D00FF6A blt L333 3110 L330: 3111 *line 778 3112 00001932 BE7C003C cmp #60,R7 3113 00001936 6708 beq L351 3114 *line 778 3115 00001938 3EBC0156 move #342,(sp) 3116 0000193C 4EB81686 jsr _error 3117 L351: 3118 *line 779 3119 00001940 4280 clr.l R0 3120 00001942 4E71 bra L329 3121 00001944 4A9F L329:tst.l (sp)+ 3122 00001946 4CDF0080 movem.l(sp)+,R7-R7 3123 0000194A 4E5E unlk R14 3124 0000194C 4E75 rts 3125 .globl _swt3 3126 0000194E .text 3127 _swt3: 3128 ~~swt3: 3129 ~i=R7 3130 ~j=R6 3131 ~l=L3 3132 ~str=L1 3133 0000194E 4E560000 link R14,#0 3134 00001952 48E70700 movem.lR5-R7,-(sp) 3135 *line 786 3136 00001956 4247 clr R7 3137 00001958 60000084 bra L355 3138 L356: 3139 *line 787 3140 0000195C 7C01 move #1,R6 3141 0000195E 4280 clr.l R0 3142 00001960 3007 move R7,R0 3143 00001962 E166 asl R0,R6 3144 00001964 3006 move R6,R0 3145 00001966 605C bra L358 3146 *line 789 3147 00001968 3EBC0160 move #352,(sp) 3148 0000196C 4EB81686 jsr _error 3149 L359: 3150 *line 792 3151 00001970 BC7C0008 cmp #8,R6 3152 00001974 6708 beq L360 3153 *line 792 3154 00001976 3EBC0161 move #353,(sp) 3155 0000197A 4EB81686 jsr _error 3156 0000197E 605C L360:bra L354 3157 00001980 6058 L361:bra L357 3158 L362: 3159 *line 797 3160 00001982 BC7C0004 cmp #4,R6 3161 00001986 6708 beq L363 3162 *line 797 3163 00001988 3EBC0162 move #354,(sp) 3164 0000198C 4EB81686 jsr _error 3165 00001990 604A L363:bra L354 3166 L364: 3167 *line 800 3168 00001992 BC7C0002 cmp #2,R6 3169 00001996 6708 beq L365 3170 *line 800 3171 00001998 3EBC0163 move #355,(sp) 3172 0000199C 4EB81686 jsr _error 3173 000019A0 603A L365:bra L354 3174 L366: 3175 *line 803 3176 000019A2 BC7C0001 cmp #1,R6 3177 000019A6 6708 beq L367 3178 *line 803 3179 000019A8 3EBC0164 move #356,(sp) 3180 000019AC 4EB81686 jsr _error 3181 000019B0 602A L367:bra L354 3182 L368: 3183 *line 806 3184 000019B2 BC7C0010 cmp #16,R6 3185 000019B6 6708 beq L369 3186 *line 806 3187 000019B8 3EBC0165 move #357,(sp) 3188 000019BC 4EB81686 jsr _error 3189 000019C0 601A L369:bra L354 3190 000019C2 6016 bra L357 3191 000019C4 48C0 L358:ext.l R0 3192 000019C6 207C00000102 move.l #L370,R8 3193 000019CC 7205 move #5,R1 3194 000019CE B098 L371:cmp.l (R8)+,R0 3195 000019D0 57C9FFFC dbeq R1,L371 3196 000019D4 20680014 move.l 20(R8),R8 3197 000019D8 4ED0 jmp (R8) 3198 00000102 .data 3199 00000102 00000001 L370:.dc.l 1 3200 00000106 00000002 .dc.l 2 3201 0000010A 00000004 .dc.l 4 3202 0000010E 00000008 .dc.l 8 3203 00000112 00000020 .dc.l 32 3204 00000116 00000000 .dc.l 0 3205 0000011A 000019A2 .dc.l L366 3206 0000011E 00001992 .dc.l L364 3207 00000122 00001982 .dc.l L362 3208 00000126 00001970 .dc.l L359 3209 0000012A 00001980 .dc.l L361 3210 0000012E 000019B2 .dc.l L368 3211 000019DA .text 3212 000019DA 600A L357:bra L353 3213 L354: 3214 *line 786 3215 000019DC 5247 add #1,R7 3216 L355: 3217 *line 786 3218 000019DE BE7C000A cmp #10,R7 3219 000019E2 6D00FF78 blt L356 3220 L353: 3221 *line 812 3222 000019E6 BC7C0020 cmp #32,R6 3223 000019EA 6708 beq L372 3224 *line 812 3225 000019EC 3EBC0166 move #358,(sp) 3226 000019F0 4EB81686 jsr _error 3227 L372: 3228 *line 813 3229 000019F4 70FF move.l #-1,R0 3230 000019F6 4E71 bra L352 3231 000019F8 4A9F L352:tst.l (sp)+ 3232 000019FA 4CDF00C0 movem.l(sp)+,R6-R7 3233 000019FE 4E5E unlk R14 3234 00001A00 4E75 rts 3235 .globl _swt4 3236 00001A02 .text 3237 _swt4: 3238 ~~swt4: 3239 ~i=R7 3240 ~j=R6 3241 ~l=L3 3242 ~str=L1 3243 00001A02 4E560000 link R14,#0 3244 00001A06 48E70700 movem.lR5-R7,-(sp) 3245 *line 820 3246 00001A0A 4247 clr R7 3247 00001A0C 6052 bra L376 3248 L377: 3249 *line 821 3250 00001A0E 7C01 move #1,R6 3251 00001A10 4280 clr.l R0 3252 00001A12 3007 move R7,R0 3253 00001A14 E166 asl R0,R6 3254 00001A16 3006 move R6,R0 3255 00001A18 602E bra L379 3256 *line 823 3257 00001A1A 3EBC0170 move #368,(sp) 3258 00001A1E 4EB81686 jsr _error 3259 00001A22 6038 L380:bra L378 3260 L381: 3261 *line 828 3262 00001A24 BC7C0002 cmp #2,R6 3263 00001A28 6708 beq L382 3264 *line 828 3265 00001A2A 3EBC0173 move #371,(sp) 3266 00001A2E 4EB81686 jsr _error 3267 00001A32 602A L382:bra L375 3268 L383: 3269 *line 831 3270 00001A34 BC7C0001 cmp #1,R6 3271 00001A38 6708 beq L384 3272 *line 831 3273 00001A3A 3EBC0174 move #372,(sp) 3274 00001A3E 4EB81686 jsr _error 3275 00001A42 601A L384:bra L375 3276 00001A44 6016 L385:bra L378 3277 00001A46 6014 bra L378 3278 00001A48 B07C0001 L379:cmp #1,R0 3279 00001A4C 67E6 beq L383 3280 00001A4E B07C0002 cmp #2,R0 3281 00001A52 67D0 beq L381 3282 00001A54 B07C0004 cmp #4,R0 3283 00001A58 67C8 beq L380 3284 00001A5A 60E8 bra L385 3285 00001A5C 6008 L378:bra L374 3286 L375: 3287 *line 820 3288 00001A5E 5247 add #1,R7 3289 L376: 3290 *line 820 3291 00001A60 BE7C000A cmp #10,R7 3292 00001A64 6DA8 blt L377 3293 L374: 3294 *line 839 3295 00001A66 BC7C0004 cmp #4,R6 3296 00001A6A 6708 beq L386 3297 *line 839 3298 00001A6C 3EBC0176 move #374,(sp) 3299 00001A70 4EB81686 jsr _error 3300 L386: 3301 *line 840 3302 00001A74 3006 move R6,R0 3303 00001A76 48C0 ext.l R0 3304 00001A78 4E71 bra L373 3305 00001A7A 4A9F L373:tst.l (sp)+ 3306 00001A7C 4CDF00C0 movem.l(sp)+,R6-R7 3307 00001A80 4E5E unlk R14 3308 00001A82 4E75 rts 3309 .globl _ckcast 3310 00001A84 .text 3311 _ckcast: 3312 ~~ckcast: 3313 ~arypt=-22 3314 ~l=L3 3315 ~str=L1 3316 ~cst19=-18 3317 00001A84 4E56FFE6 link R14,#-26 3318 *line 851 3319 00001A88 41EEFFEE lea -18(R14),R8 3320 00001A8C 2D48FFEA move.l R8,-22(R14) 3321 *line 852 3322 00001A90 206EFFEA move.l -22(R14),R8 3323 00001A94 20BC00000006 move.l #6,(R8) 3324 *line 853 3325 00001A9A 206EFFEA move.l -22(R14),R8 3326 00001A9E 2010 move.l (R8),R0 3327 00001AA0 D1AEFFEA add.l R0,-22(R14) 3328 *line 854 3329 00001AA4 200E move.l R14,R0 3330 00001AA6 D0BCFFFFFFF4 add.l #-12,R0 3331 00001AAC B0AEFFEA cmp.l -22(R14),R0 3332 00001AB0 6708 beq L388 3333 *line 854 3334 00001AB2 3EBCFE03 move #-509,(sp) 3335 00001AB6 4EB81686 jsr _error 3336 00001ABA 4E5E L388:L387:unlk R14 3337 00001ABC 4E75 rts 3338 .globl _chkptrs 3339 00001ABE .text 3340 _chkptrs: 3341 ~~chkptrs: 3342 ~l=L3 3343 ~pc=R13 3344 ~pi=R12 3345 ~pl=R11 3346 ~apc=-4 3347 ~api=-8 3348 ~apl=-12 3349 ~str=L1 3350 00001ABE 4E56FFF4 link R14,#-12 3351 00001AC2 48E7011C movem.lR7-R7/R11-R13,-(sp) 3352 *line 867 3353 00001AC6 2A7C00000004 move.l #4+L1,R13 3354 *line 868 3355 00001ACC 0C1D006E cmp.b #110,(R13)+ 3356 00001AD0 6708 beq L390 3357 *line 868 3358 00001AD2 3EBC0400 move #1024,(sp) 3359 00001AD6 4EB81686 jsr _error 3360 L390: 3361 *line 869 3362 00001ADA 204D move.l R13,R8 3363 00001ADC 0C100067 cmp.b #103,(R8) 3364 00001AE0 40C0 move sr,R0 3365 00001AE2 538D sub.l #1,R13 3366 00001AE4 44C0 move R0,ccr 3367 00001AE6 6708 beq L391 3368 *line 869 3369 00001AE8 3EBC0401 move #1025,(sp) 3370 00001AEC 4EB81686 jsr _error 3371 L391: 3372 *line 870 3373 00001AF0 0C250069 cmp.b #105,-(R13) 3374 00001AF4 6708 beq L392 3375 *line 870 3376 00001AF6 3EBC0402 move #1026,(sp) 3377 00001AFA 4EB81686 jsr _error 3378 L392: 3379 *line 871 3380 00001AFE 0C2D00310004 cmp.b #49,4(R13) 3381 00001B04 6708 beq L393 3382 *line 871 3383 00001B06 3EBC0403 move #1027,(sp) 3384 00001B0A 4EB81686 jsr _error 3385 L393: 3386 *line 873 3387 00001B0E 2A7C00000004 move.l #4+L1,R13 3388 *line 874 3389 00001B14 BBFC00000004 cmp.l #4+L1,R13 3390 00001B1A 6308 bls L394 3391 *line 874 3392 00001B1C 3EBC0410 move #1040,(sp) 3393 00001B20 4EB81686 jsr _error 3394 L394: 3395 *line 875 3396 00001B24 BBFC00000005 cmp.l #5+L1,R13 3397 00001B2A 6508 blo L395 3398 *line 875 3399 00001B2C 3EBC0441 move #1089,(sp) 3400 00001B30 4EB81686 jsr _error 3401 L395: 3402 *line 876 3403 00001B34 BBFC00000004 cmp.l #4+L1,R13 3404 00001B3A 6408 bcc L396 3405 *line 876 3406 00001B3C 3EBC0442 move #1090,(sp) 3407 00001B40 4EB81686 jsr _error 3408 L396: 3409 *line 877 3410 00001B44 BBFC00000003 cmp.l #3+L1,R13 3411 00001B4A 6208 bhi L397 3412 *line 877 3413 00001B4C 3EBC0443 move #1091,(sp) 3414 00001B50 4EB81686 jsr _error 3415 L397: 3416 *line 878 3417 00001B54 BBFC00000003 cmp.l #3+L1,R13 3418 00001B5A 6608 bne L398 3419 *line 878 3420 00001B5C 3EBC0444 move #1092,(sp) 3421 00001B60 4EB81686 jsr _error 3422 L398: 3423 *line 879 3424 00001B64 BBFC00000004 cmp.l #4+L1,R13 3425 00001B6A 6708 beq L399 3426 *line 879 3427 00001B6C 3EBC0445 move #1093,(sp) 3428 00001B70 4EB81686 jsr _error 3429 L399: 3430 *line 881 3431 00001B74 2D7C00000004FFFC move.l #4+L1,-4(R14) 3432 *line 882 3433 00001B7C 206EFFFC move.l -4(R14),R8 3434 00001B80 0C10006E cmp.b #110,(R8) 3435 00001B84 40C0 move sr,R0 3436 00001B86 52AEFFFC add.l #1,-4(R14) 3437 00001B8A 44C0 move R0,ccr 3438 00001B8C 6708 beq L400 3439 *line 882 3440 00001B8E 3EBC0420 move #1056,(sp) 3441 00001B92 4EB81686 jsr _error 3442 L400: 3443 *line 883 3444 00001B96 206EFFFC move.l -4(R14),R8 3445 00001B9A 0C100067 cmp.b #103,(R8) 3446 00001B9E 40C0 move sr,R0 3447 00001BA0 53AEFFFC sub.l #1,-4(R14) 3448 00001BA4 44C0 move R0,ccr 3449 00001BA6 6708 beq L401 3450 *line 883 3451 00001BA8 3EBC0421 move #1057,(sp) 3452 00001BAC 4EB81686 jsr _error 3453 L401: 3454 *line 884 3455 00001BB0 53AEFFFC sub.l #1,-4(R14) 3456 00001BB4 206EFFFC move.l -4(R14),R8 3457 00001BB8 0C100069 cmp.b #105,(R8) 3458 00001BBC 6708 beq L402 3459 *line 884 3460 00001BBE 3EBC0422 move #1058,(sp) 3461 00001BC2 4EB81686 jsr _error 3462 L402: 3463 *line 885 3464 00001BC6 206EFFFC move.l -4(R14),R8 3465 00001BCA 0C2800310004 cmp.b #49,4(R8) 3466 00001BD0 6708 beq L403 3467 *line 885 3468 00001BD2 3EBC0423 move #1059,(sp) 3469 00001BD6 4EB81686 jsr _error 3470 L403: 3471 *line 887 3472 00001BDA 2D7C00000004FFFC move.l #4+L1,-4(R14) 3473 *line 888 3474 00001BE2 203C00000004 move.l #4+L1,R0 3475 00001BE8 B0AEFFFC cmp.l -4(R14),R0 3476 00001BEC 6408 bcc L404 3477 *line 888 3478 00001BEE 3EBC0430 move #1072,(sp) 3479 00001BF2 4EB81686 jsr _error 3480 L404: 3481 *line 889 3482 00001BF6 203C00000005 move.l #5+L1,R0 3483 00001BFC B0AEFFFC cmp.l -4(R14),R0 3484 00001C00 6208 bhi L405 3485 *line 889 3486 00001C02 3EBC0431 move #1073,(sp) 3487 00001C06 4EB81686 jsr _error 3488 L405: 3489 *line 890 3490 00001C0A 203C00000004 move.l #4+L1,R0 3491 00001C10 B0AEFFFC cmp.l -4(R14),R0 3492 00001C14 6308 bls L406 3493 *line 890 3494 00001C16 3EBC0432 move #1074,(sp) 3495 00001C1A 4EB81686 jsr _error 3496 L406: 3497 *line 891 3498 00001C1E 203C00000003 move.l #3+L1,R0 3499 00001C24 B0AEFFFC cmp.l -4(R14),R0 3500 00001C28 6508 blo L407 3501 *line 891 3502 00001C2A 3EBC0433 move #1075,(sp) 3503 00001C2E 4EB81686 jsr _error 3504 L407: 3505 *line 892 3506 00001C32 203C00000003 move.l #3+L1,R0 3507 00001C38 B0AEFFFC cmp.l -4(R14),R0 3508 00001C3C 6608 bne L408 3509 *line 892 3510 00001C3E 3EBC0434 move #1076,(sp) 3511 00001C42 4EB81686 jsr _error 3512 L408: 3513 *line 893 3514 00001C46 203C00000004 move.l #4+L1,R0 3515 00001C4C B0AEFFFC cmp.l -4(R14),R0 3516 00001C50 6708 beq L409 3517 *line 893 3518 00001C52 3EBC0435 move #1077,(sp) 3519 00001C56 4EB81686 jsr _error 3520 L409: 3521 *line 895 3522 00001C5A 31FC000E0000 move #14,_ai 3523 *line 896 3524 00001C60 31FC00210002 move #33,2+_ai 3525 *line 897 3526 00001C66 31FC00C20004 move #194,4+_ai 3527 *line 898 3528 00001C6C 31FC022B0006 move #555,6+_ai 3529 *line 899 3530 00001C72 2078007A move.l _pai,R8 3531 00001C76 0C500021 cmp #33,(R8) 3532 00001C7A 6708 beq L410 3533 *line 899 3534 00001C7C 3EBC0404 move #1028,(sp) 3535 00001C80 4EB81686 jsr _error 3536 L410: 3537 *line 900 3538 00001C84 287C00000002 move.l #2+_ai,R12 3539 *line 901 3540 00001C8A 548C add.l #2,R12 3541 00001C8C 204C move.l R12,R8 3542 00001C8E 0C5000C2 cmp #194,(R8) 3543 00001C92 6708 beq L411 3544 *line 901 3545 00001C94 3EBC0405 move #1029,(sp) 3546 00001C98 4EB81686 jsr _error 3547 L411: 3548 *line 902 3549 00001C9C 558C sub.l #2,R12 3550 *line 903 3551 00001C9E 3014 move (R12),R0 3552 00001CA0 5A40 add #5,R0 3553 00001CA2 B07C0026 cmp #38,R0 3554 00001CA6 6708 beq L412 3555 *line 903 3556 00001CA8 3EBC0406 move #1030,(sp) 3557 00001CAC 4EB81686 jsr _error 3558 L412: 3559 *line 904 3560 00001CB0 42780000 clr _ai 3561 *line 905 3562 00001CB4 4A64 tst -(R12) 3563 00001CB6 6708 beq L413 3564 *line 905 3565 00001CB8 3EBC0407 move #1031,(sp) 3566 00001CBC 4EB81686 jsr _error 3567 L413: 3568 *line 906 3569 00001CC0 41EC0006 lea 6(R12),R8 3570 00001CC4 2D48FFF8 move.l R8,-8(R14) 3571 *line 907 3572 00001CC8 206EFFF8 move.l -8(R14),R8 3573 00001CCC 0C50022B cmp #555,(R8) 3574 00001CD0 40C0 move sr,R0 3575 00001CD2 54AEFFF8 add.l #2,-8(R14) 3576 00001CD6 44C0 move R0,ccr 3577 00001CD8 6708 beq L414 3578 *line 907 3579 00001CDA 3EBC0408 move #1032,(sp) 3580 00001CDE 4EB81686 jsr _error 3581 L414: 3582 *line 909 3583 00001CE2 267C0000007A move.l #_pai,R11 3584 *line 910 3585 00001CE8 588B add.l #4,R11 3586 00001CEA 2013 move.l (R11),R0 3587 00001CEC B0BC00000006 cmp.l #6+_ai,R0 3588 00001CF2 6708 beq L415 3589 *line 910 3590 00001CF4 3EBC0409 move #1033,(sp) 3591 00001CF8 4EB81686 jsr _error 3592 L415: 3593 *line 911 3594 00001CFC 610A jsr _ckstrpt 3595 00001CFE 4A9F L389:tst.l (sp)+ 3596 00001D00 4CDF3800 movem.l(sp)+,R11-R13 3597 00001D04 4E5E unlk R14 3598 00001D06 4E75 rts 3599 .globl _ckstrpt 3600 00001D08 .text 3601 _ckstrpt: 3602 ~~ckstrpt: 3603 ~l=L3 3604 ~p=R13 3605 ~nn=R7 3606 ~lll=R6 3607 ~str=L1 3608 00001D08 4E560000 link R14,#0 3609 00001D0C 48E70704 movem.lR5-R7/R13-R13,-(sp) 3610 *line 921 3611 00001D10 31FC07C3000A move #1987,10+_zz 3612 *line 922 3613 00001D16 11FC00FF0008 move.b #255,8+_zz 3614 *line 923 3615 00001D1C 11FC000D0010 move.b #13,16+_zz 3616 *line 924 3617 00001D22 31FCFFFB0012 move #-5,18+_zz 3618 *line 925 3619 00001D28 2A7C00000000 move.l #_zz,R13 3620 *line 926 3621 00001D2E 508D add.l #8,R13 3622 00001D30 204D move.l R13,R8 3623 00001D32 0C6807C30002 cmp #1987,2(R8) 3624 00001D38 6708 beq L417 3625 *line 926 3626 00001D3A 3EBC0450 move #1104,(sp) 3627 00001D3E 4EB81686 jsr _error 3628 L417: 3629 *line 927 3630 00001D42 0C15FFFF cmp.b #-1,(R13) 3631 00001D46 6708 beq L418 3632 *line 927 3633 00001D48 3EBC0451 move #1105,(sp) 3634 00001D4C 4EB81686 jsr _error 3635 L418: 3636 *line 928 3637 00001D50 0C6DFFFB000A cmp #-5,10(R13) 3638 00001D56 6708 beq L419 3639 *line 928 3640 00001D58 3EBC0452 move #1106,(sp) 3641 00001D5C 4EB81686 jsr _error 3642 L419: 3643 *line 929 3644 00001D60 508D add.l #8,R13 3645 *line 930 3646 00001D62 0C15000D cmp.b #13,(R13) 3647 00001D66 6708 beq L420 3648 *line 930 3649 00001D68 3EBC0453 move #1107,(sp) 3650 00001D6C 4EB81686 jsr _error 3651 L420: 3652 *line 931 3653 00001D70 536D0002 sub #1,2(R13) 3654 00001D74 302D0002 move 2(R13),R0 3655 00001D78 B07CFFFA cmp #-6,R0 3656 00001D7C 6708 beq L421 3657 *line 931 3658 00001D7E 3EBC0454 move #1108,(sp) 3659 00001D82 4EB81686 jsr _error 3660 L421: 3661 *line 932 3662 00001D86 518D sub.l #8,R13 3663 00001D88 204D move.l R13,R8 3664 00001D8A 0C6807C30002 cmp #1987,2(R8) 3665 00001D90 6708 beq L422 3666 *line 932 3667 00001D92 3EBC454A move #17738,(sp) 3668 00001D96 4EB81686 jsr _error 3669 L422: 3670 *line 933 3671 00001D9A 21FC000000080000 move.l #8+_zz,_p0 3672 *line 934 3673 00001DA2 20780000 move.l _p0,R8 3674 00001DA6 0C10FFFF cmp.b #-1,(R8) 3675 00001DAA 6708 beq L423 3676 *line 934 3677 00001DAC 3EBC0455 move #1109,(sp) 3678 00001DB0 4EB81686 jsr _error 3679 L423: 3680 *line 935 3681 00001DB4 20780000 move.l _p0,R8 3682 00001DB8 0C6807C30002 cmp #1987,2(R8) 3683 00001DBE 6708 beq L424 3684 *line 935 3685 00001DC0 3EBC0456 move #1110,(sp) 3686 00001DC4 4EB81686 jsr _error 3687 L424: 3688 *line 936 3689 00001DC8 20780000 move.l _p0,R8 3690 00001DCC 082800000003 btst #0,3(R8) 3691 00001DD2 670C beq L10014 3692 00001DD4 20780000 move.l _p0,R8 3693 00001DD8 082800010003 btst #1,3(R8) 3694 00001DDE 6608 bne L425 3695 L10014:*line 936 3696 00001DE0 3EBC0457 move #1111,(sp) 3697 00001DE4 4EB81686 jsr _error 3698 L425: 3699 *line 937 3700 00001DE8 200D move.l R13,R0 3701 00001DEA C0BC00000001 and.l #1,R0 3702 00001DF0 6708 beq L426 3703 *line 937 3704 00001DF2 3EBC0458 move #1112,(sp) 3705 00001DF6 4EB81686 jsr _error 3706 L426: 3707 *line 938 3708 00001DFA 2A7C00000000 move.l #_zz,R13 3709 *line 939 3710 00001E00 7E02 move #2,R7 3711 *line 940 3712 00001E02 3007 move R7,R0 3713 00001E04 E740 asl #3,R0 3714 00001E06 48C0 ext.l R0 3715 00001E08 DBC0 add.l R0,R13 3716 *line 941 3717 00001E0A 0C15000D cmp.b #13,(R13) 3718 00001E0E 6708 beq L427 3719 *line 941 3720 00001E10 3EBC0459 move #1113,(sp) 3721 00001E14 4EB81686 jsr _error 3722 L427: 3723 *line 942 3724 00001E18 08070001 btst #1,R7 3725 00001E1C 6702 beq L428 3726 00001E1E 6008 bra L429 3727 L428: 3728 *line 942 3729 00001E20 3EBC0460 move #1120,(sp) 3730 00001E24 4EB81686 jsr _error 3731 L429: 3732 *line 943 3733 00001E28 3E3C8000 move #-32768,R7 3734 *line 944 3735 00001E2C 0807000F btst #15,R7 3736 00001E30 6702 beq L430 3737 00001E32 6008 bra L431 3738 L430: 3739 *line 944 3740 00001E34 3EBC0461 move #1121,(sp) 3741 00001E38 4EB81686 jsr _error 3742 L431: 3743 *line 945 3744 00001E3C 2C3C0003F001 move.l #$3f001,R6 3745 *line 946 3746 00001E42 08060006 btst #6,R6 3747 00001E46 6708 beq L432 3748 *line 946 3749 00001E48 3EBC0462 move #1122,(sp) 3750 00001E4C 4EB81686 jsr _error 3751 L432: 3752 *line 947 3753 00001E50 2006 move.l R6,R0 3754 00001E52 C0BC00000F00 and.l #3840,R0 3755 00001E58 6708 beq L433 3756 *line 947 3757 00001E5A 3EBC0463 move #1123,(sp) 3758 00001E5E 4EB81686 jsr _error 3759 L433: 3760 *line 948 3761 00001E62 0806000F btst #15,R6 3762 00001E66 6702 beq L434 3763 00001E68 6008 bra L435 3764 L434: 3765 *line 948 3766 00001E6A 3EBC0464 move #1124,(sp) 3767 00001E6E 4EB81686 jsr _error 3768 L435: 3769 *line 949 3770 00001E72 2006 move.l R6,R0 3771 00001E74 C0BC00010000 and.l #$10000,R0 3772 00001E7A 6702 beq L436 3773 00001E7C 6008 bra L437 3774 L436: 3775 *line 949 3776 00001E7E 3EBC0465 move #1125,(sp) 3777 00001E82 4EB81686 jsr _error 3778 L437: 3779 *line 950 3780 00001E86 2006 move.l R6,R0 3781 00001E88 C0BC000F0000 and.l #$f0000,R0 3782 00001E8E B0BC00030000 cmp.l #$30000,R0 3783 00001E94 6708 beq L438 3784 *line 950 3785 00001E96 3EBC0466 move #1126,(sp) 3786 00001E9A 4EB81686 jsr _error 3787 00001E9E 4A9F L438:L416:tst.l(sp)+ 3788 00001EA0 4CDF20C0 movem.l(sp)+,R6-R7/R13-R13 3789 00001EA4 4E5E unlk R14 3790 00001EA6 4E75 rts 3791 .globl _tembedas 3792 00001EA8 .text 3793 _tembedas: 3794 ~~tembedas: 3795 ~ctype=-4 3796 ~l=L3 3797 ~p=R13 3798 ~t=R6 3799 ~c9=-6 3800 ~mcc=R7 3801 ~str=L1 3802 00001EA8 4E56FFFA link R14,#-6 3803 00001EAC 48E70704 movem.lR5-R7/R13-R13,-(sp) 3804 *line 962 3805 00001EB0 1E3C0002 move.b #2,R7 3806 *line 963 3807 00001EB4 1D7C005AFFFE move.b #90,-2(R14) 3808 *line 964 3809 00001EBA 4BEEFFFC lea -4(R14),R13 3810 *line 965 3811 00001EBE 1007 move.b R7,R0 3812 00001EC0 4880 ext.w R0 3813 00001EC2 1AC0 move.b R0,(R13)+ 3814 00001EC4 103600FC move.b -4(R14,R0),R0 3815 00001EC8 4880 ext.w R0 3816 00001ECA 3C00 move R0,R6 3817 *line 966 3818 00001ECC BC7C005A cmp #90,R6 3819 00001ED0 6708 beq L440 3820 *line 966 3821 00001ED2 3EBCFE04 move #-508,(sp) 3822 00001ED6 4EB81686 jsr _error 3823 L440: 3824 *line 967 3825 00001EDA 0C2E0002FFFC cmp.b #2,-4(R14) 3826 00001EE0 6708 beq L441 3827 *line 967 3828 00001EE2 3EBCFE05 move #-507,(sp) 3829 00001EE6 4EB81686 jsr _error 3830 L441: 3831 *line 968 3832 00001EEA 1D7C0002FFFA move.b #2,-6(R14) 3833 *line 969 3834 00001EF0 002E0001FFFA or.b #1,-6(R14) 3835 *line 970 3836 00001EF6 0C2E0003FFFA cmp.b #3,-6(R14) 3837 00001EFC 6708 beq L442 3838 *line 970 3839 00001EFE 3EBCFE08 move #-504,(sp) 3840 00001F02 4EB81686 jsr _error 3841 L442: 3842 *line 971 3843 00001F06 022E0001FFFA and.b #1,-6(R14) 3844 *line 972 3845 00001F0C 0C2E0001FFFA cmp.b #1,-6(R14) 3846 00001F12 6708 beq L443 3847 *line 972 3848 00001F14 3EBCFE09 move #-503,(sp) 3849 00001F18 4EB81686 jsr _error 3850 00001F1C 4A9F L443:L439:tst.l(sp)+ 3851 00001F1E 4CDF20C0 movem.l(sp)+,R6-R7/R13-R13 3852 00001F22 4E5E unlk R14 3853 00001F24 4E75 rts 3854 .globl _macrotes 3855 00001F26 .text 3856 _macrotes: 3857 ~~macrotes: 3858 ~l=L3 3859 ~str=L1 3860 00001F26 4E56FFFC link R14,#-4 3861 00001F2A 4E5E L444:unlk R14 3862 00001F2C 4E75 rts 3863 .globl _lextest 3864 00001F2E .text 3865 _lextest: 3866 ~~lextest: 3867 ~l=L3 3868 ~iii=-2 3869 ~lll=-6 3870 ~str=L1 3871 00001F2E 4E56FFF6 link R14,#-10 3872 *line 1086 3873 00001F32 3D7CFFF6FFFE move #-10,-2(R14) 3874 *line 1087 3875 00001F38 302EFFFE move -2(R14),R0 3876 00001F3C E340 asl #1,R0 3877 00001F3E 48C0 ext.l R0 3878 00001F40 2D40FFFA move.l R0,-6(R14) 3879 *line 1088 3880 00001F44 0CAEFFFFFFECFFFA cmp.l #$ffffffec,-6(R14) 3881 00001F4C 6708 beq L446 3882 *line 1088 3883 00001F4E 3EBCFE07 move #-505,(sp) 3884 00001F52 4EB81686 jsr _error 3885 00001F56 4E5E L446:L445:unlk R14 3886 00001F58 4E75 rts 3887 .globl _cmplxptr 3888 00001F5A .text 3889 _cmplxptr: 3890 ~~cmplxptr: 3891 ~i=R7 3892 ~l=L3 3893 ~v=-2 3894 ~dd=-10 3895 ~pd=-26 3896 ~str=L1 3897 00001F5A 4E56FFE6 link R14,#-26 3898 00001F5E 48E70300 movem.lR6-R7,-(sp) 3899 *line 1098 3900 00001F62 426EFFFE clr -2(R14) 3901 00001F66 603C bra L450 3902 L451: 3903 *line 1099 3904 00001F68 200E move.l R14,R0 3905 00001F6A 322EFFFE move -2(R14),R1 3906 00001F6E E341 asl #1,R1 3907 00001F70 48C1 ext.l R1 3908 00001F72 D081 add.l R1,R0 3909 00001F74 D0BCFFFFFFF6 add.l #-10,R0 3910 00001F7A 224E move.l R14,R9 3911 00001F7C 346EFFFE move -2(R14),R10 3912 00001F80 D5CA add.l R10,R10 3913 00001F82 D5CA add.l R10,R10 3914 00001F84 D3CA add.l R10,R9 3915 00001F86 2340FFE6 move.l R0,-26(R9) 3916 *line 1100 3917 00001F8A 302EFFFE move -2(R14),R0 3918 00001F8E D07C0064 add #100,R0 3919 00001F92 224E move.l R14,R9 3920 00001F94 346EFFFE move -2(R14),R10 3921 00001F98 D5CA add.l R10,R10 3922 00001F9A D3CA add.l R10,R9 3923 00001F9C 3340FFF6 move R0,-10(R9) 3924 L449: 3925 *line 1098 3926 00001FA0 526EFFFE add #1,-2(R14) 3927 L450: 3928 *line 1098 3929 00001FA4 0C6E0004FFFE cmp #4,-2(R14) 3930 00001FAA 6DBC blt L451 3931 L448: 3932 *line 1102 3933 00001FAC 3D7C0001FFFE move #1,-2(R14) 3934 *line 1103 3935 00001FB2 306EFFFE move -2(R14),R8 3936 00001FB6 D1C8 add.l R8,R8 3937 00001FB8 D1C8 add.l R8,R8 3938 00001FBA 207688E6 move.l -26(R14,R8.l),R8 3939 00001FBE 3E10 move (R8),R7 3940 00001FC0 224E move.l R14,R9 3941 00001FC2 346EFFFE move -2(R14),R10 3942 00001FC6 D5CA add.l R10,R10 3943 00001FC8 D5CA add.l R10,R10 3944 00001FCA D3CA add.l R10,R9 3945 00001FCC 54A9FFE6 add.l #2,-26(R9) 3946 *line 1104 3947 00001FD0 BE7C0065 cmp #101,R7 3948 00001FD4 6708 beq L452 3949 *line 1104 3950 00001FD6 3EBCFE18 move #-488,(sp) 3951 00001FDA 4EB81686 jsr _error 3952 L452: 3953 *line 1105 3954 00001FDE 306EFFFE move -2(R14),R8 3955 00001FE2 D1C8 add.l R8,R8 3956 00001FE4 D1C8 add.l R8,R8 3957 00001FE6 207688E6 move.l -26(R14,R8.l),R8 3958 00001FEA 0C500066 cmp #102,(R8) 3959 00001FEE 6708 beq L453 3960 *line 1105 3961 00001FF0 3EBCFE19 move #-487,(sp) 3962 00001FF4 4EB81686 jsr _error 3963 00001FF8 4A9F L453:L447:tst.l(sp)+ 3964 00001FFA 4CDF0080 movem.l(sp)+,R7-R7 3965 00001FFE 4E5E unlk R14 3966 00002000 4E75 rts 3967 .globl _strlen 3968 00002002 .text 3969 _strlen: 3970 ~~strlen: 3971 ~i=R7 3972 ~l=L3 3973 ~p=8 3974 ~str=L1 3975 00002002 4E560000 link R14,#0 3976 00002006 48E70300 movem.lR6-R7,-(sp) 3977 *line 1113 3978 0000200A 4247 clr R7 3979 0000200C 6002 bra L457 3980 L456: 3981 *line 1115 3982 0000200E 5247 add #1,R7 3983 L457: 3984 *line 1115 3985 00002010 206E0008 move.l 8(R14),R8 3986 00002014 1010 move.b (R8),R0 3987 00002016 4880 ext.w R0 3988 00002018 52AE0008 add.l #1,8(R14) 3989 0000201C 4A00 tst.b R0 3990 0000201E 66EE bne L456 3991 L455: 3992 *line 1116 3993 00002020 3007 move R7,R0 3994 00002022 4E71 bra L454 3995 00002024 4A9F L454:tst.l (sp)+ 3996 00002026 4CDF0080 movem.l(sp)+,R7-R7 3997 0000202A 4E5E unlk R14 3998 0000202C 4E75 rts 3999 00000132 .data 4000 00000132 7468617427732061 L4:.dc.b 116,104,97,116,39,115,32,97,108,108,44,32,102,111,108,107,115,46,46,46,0 4000 0000013A 6C6C2C20666F6C6B 4000 00000142 732E2E2E00 4001 00000147 7468697320697320 L7:.dc.b 116,104,105,115,32,105,115,32,97,108,115,111,32,105,116,0 4001 0000014F 616C736F20697400 4002 00000157 426567696E6E696E L9:.dc.b 66,101,103,105,110,110,105,110,103,32,54,56,48,48,48,32,67,32,67,111,109,112,105,108,101,114,32,84,101,115,116,0 4002 0000015F 6720363830303020 4002 00000167 4320436F6D70696C 4002 0000016F 6572205465737400 4003 00000177 782E6300 L66:.dc.b 120,46,99,0 4004 0000017B 782E7300 L67:.dc.b 120,46,115,0 4005 0000017F 617A78393533233B L70:.dc.b 97,122,120,57,53,51,35,59,107,57,0 4005 00000187 6B3900 4006 0000018A 617A78393533233B L71:.dc.b 97,122,120,57,53,51,35,59,107,57,0 4006 00000192 6B3900 4007 00000195 747279206D6500 L73:.dc.b 116,114,121,32,109,101,0 4008 0000019C 747279206D00 L74:.dc.b 116,114,121,32,109,0 4009 000001A2 782E7300 L76:.dc.b 120,46,115,0 4010 000001A6 782E737300 L77:.dc.b 120,46,115,115,0 4011 000001AB 782E7300 L79:.dc.b 120,46,115,0 4012 000001AF 782E737300 L80:.dc.b 120,46,115,115,0 4013 000001B4 3130303D25642024 L223:.dc.b 49,48,48,61,37,100,32,36,54,52,61,37,120,32,49,48,50,52,61,37,100,32,48,50,48,48,48,61,37,111,32,51,49,50,51,52,108,61,37,108,100,32,115,116,114,105,110,103,32,49,61,37,115,32,90,61,37,99,10,0 4013 000001BC 36343D2578203130 4013 000001C4 32343D2564203032 4013 000001CC 3030303D256F2033 4013 000001D4 313233346C3D256C 4013 000001DC 6420737472696E67 4013 000001E4 20313D2573205A3D 4013 000001EC 25630A00 4014 000001F0 3078613962376333 L224:.dc.b 48,120,97,57,98,55,99,51,61,37,108,120,32,48,88,70,49,69,52,61,37,88,10,0 4014 000001F8 3D256C7820305846 4014 00000200 3145343D25580A00 4015 00000208 4661722046726561 L225:.dc.b 70,97,114,32,70,114,101,97,107,105,110,103,32,79,117,116,33,33,33,33,0 4015 00000210 6B696E67204F7574 4015 00000218 2121212100 4016 0000021D 2564203D20256420 L227:.dc.b 37,100,32,61,32,37,100,32,0 4016 00000225 00 4017 00000226 2564203D20256420 L228:.dc.b 37,100,32,61,32,37,100,32,0 4017 0000022E 00 4018 0000022F 3078313131313131 L229:.dc.b 48,120,49,49,49,49,49,49,32,61,32,37,108,120,10,0 4018 00000237 203D20256C780A00 4019 0000023F 61626300 L247:.dc.b 97,98,99,0 4020 00000243 64656600 L248:.dc.b 100,101,102,0 4021 00000247 67686900 L249:.dc.b 103,104,105,0 4022 0000024B 67686900 L252:.dc.b 103,104,105,0 4023 0000024F 7468697320697320 L269:.dc.b 116,104,105,115,32,105,115,32,105,116,0 4023 00000257 697400 4024 0000025A 74686973206D6967 L271:.dc.b 116,104,105,115,32,109,105,103,104,116,32,98,101,32,105,116,0 4024 00000262 6874206265206974 4024 0000026A 00 4025 0000026B 7468697320697320 L273:.dc.b 116,104,105,115,32,105,115,32,97,108,115,111,32,105,116,0 4025 00000273 616C736F20697400 4026 0000027B 6572726F72202578 L287:.dc.b 101,114,114,111,114,32,37,120,10,0 -EXTERNAL SYMBOLS- _uu _s1 _flags _zz _c _l1 _l2 _l3 _ldivr _ac _ai _al _p0 _x _largear _ldiv _exit ldiv lrem lmul _putchar _printf L1 00000000 DATA L3 00000000 BSS _initi 0000000A DATA _initk 0000000C DATA _initl 00000012 DATA _initx 0000002A DATA L4 00000132 DATA _inits 00000032 DATA _initc 00000044 DATA _initd 00000058 DATA _inite 0000006A DATA _initcc 00000074 DATA L7 00000147 DATA _ccinit 00000078 DATA _pai 0000007A DATA _sound 00000082 DATA _main 00000000 TEXT ~~main 00000000 TEXT ~a FFFFFFE6 ABS ~l 00000000 BSS ~n FFFFFFF0 ABS ~u3 FFFFFFEE ABS ~ai2 FFFFFFF2 ABS ~str 00000000 DATA L9 00000157 DATA _putstri 000016A2 TEXT L12 00000046 TEXT L13 00000018 TEXT L16 00000034 TEXT L17 00000022 TEXT L15 00000032 TEXT L14 0000003A TEXT L11 00000042 TEXT L10 0000004E TEXT L18 00000056 TEXT _error 00001686 TEXT L19 00000068 TEXT L20 00000072 TEXT L21 0000007C TEXT L22 00000086 TEXT L23 00000090 TEXT L24 0000009A TEXT L25 000000A4 TEXT L26 000000B2 TEXT L27 000000BE TEXT L28 000000D0 TEXT L29 000000E0 TEXT L30 000000F4 TEXT L31 00000106 TEXT L32 0000011A TEXT L33 00000130 TEXT L34 0000014A TEXT L35 0000015E TEXT L36 00000170 TEXT L37 0000017E TEXT L38 00000194 TEXT L39 000001AE TEXT L40 000001C8 TEXT L41 000001E4 TEXT L42 00000202 TEXT L43 00000222 TEXT L44 00000244 TEXT L45 0000025E TEXT L46 00000270 TEXT L47 0000027E TEXT L48 00000296 TEXT L49 000002B2 TEXT L50 000002CE TEXT L51 000002F4 TEXT L52 00000314 TEXT L53 0000033A TEXT L54 0000035E TEXT L55 0000037C TEXT L56 00000396 TEXT L57 000003B0 TEXT L10000 000003D8 TEXT L58 000003E0 TEXT L59 00000408 TEXT L60 00000436 TEXT L61 00000456 TEXT L62 0000047A TEXT _targs 000016D0 TEXT _addargs 0000170A TEXT L63 000004AE TEXT _addlarg 00001754 TEXT L64 000004EA TEXT L65 00000520 TEXT L66 00000177 DATA _strlen 00002002 TEXT L67 0000017B DATA _eqstr 00001720 TEXT L68 00000552 TEXT L69 00000562 TEXT L71 0000018A DATA L70 0000017F DATA L72 00000580 TEXT L74 0000019C DATA L73 00000195 DATA L75 0000059E TEXT L77 000001A6 DATA L76 000001A2 DATA L78 000005C2 TEXT L80 000001AF DATA L79 000001AB DATA L81 000005E8 TEXT L82 000005FA TEXT L83 00000610 TEXT _addparg 0000179A TEXT L84 0000064A TEXT L85 00000676 TEXT L86 0000068C TEXT L87 000006A0 TEXT L88 000006BA TEXT L89 000006D8 TEXT L90 000006EE TEXT L91 000006FE TEXT L92 00000722 TEXT L93 00000732 TEXT L94 00000742 TEXT L95 00000752 TEXT L98 00000778 TEXT L99 00000756 TEXT L100 00000768 TEXT L97 00000776 TEXT L96 0000077E TEXT L101 0000077E TEXT L104 000007A8 TEXT L105 00000782 TEXT L106 00000796 TEXT L103 000007A6 TEXT L102 000007AE TEXT L109 00000810 TEXT L110 000007B2 TEXT L111 000007CE TEXT L112 000007EC TEXT L113 0000080E TEXT L108 0000080E TEXT L107 00000816 TEXT L114 00000834 TEXT L115 00000854 TEXT L10001 00000882 TEXT L116 0000088A TEXT L119 00000898 TEXT L120 00000892 TEXT L118 00000894 TEXT L117 000008A0 TEXT L121 000008B0 TEXT L122 000008BE TEXT L123 000008D2 TEXT L10002 000008FA TEXT L124 00000902 TEXT L10003 00000912 TEXT L125 0000091A TEXT L126 00000930 TEXT L127 00000938 TEXT L128 0000094C TEXT L129 00000954 TEXT L130 0000095C TEXT L131 00000976 TEXT L132 00000982 TEXT L133 0000098A TEXT L134 000009A6 TEXT L135 000009AE TEXT L136 000009B6 TEXT L137 000009C2 TEXT L138 000009CA TEXT L139 000009D2 TEXT L142 00000A0C TEXT L143 000009D6 TEXT L146 00000A02 TEXT L147 000009DC TEXT L145 000009FE TEXT L144 00000A0A TEXT L141 00000A0A TEXT L140 00000A12 TEXT L150 00000A58 TEXT L151 00000A16 TEXT L154 00000A4E TEXT L155 00000A1C TEXT L156 00000A4A TEXT L153 00000A4A TEXT L152 00000A56 TEXT L149 00000A56 TEXT L148 00000A5E TEXT _swt1 000017BA TEXT L157 00000A72 TEXT _swt2 0000188C TEXT L158 00000A82 TEXT _swt3 0000194E TEXT L159 00000A96 TEXT _swt4 00001A02 TEXT L160 00000AAA TEXT L161 00000ADE TEXT L162 00000AEC TEXT L163 00000B12 TEXT L164 00000B24 TEXT L165 00000B4A TEXT L166 00000B5C TEXT L167 00000B5C TEXT L168 00000B70 TEXT L169 00000B8A TEXT L170 00000B9A TEXT L171 00000BA8 TEXT L172 00000BB2 TEXT L173 00000BD6 TEXT L174 00000BE6 TEXT L175 00000BFA TEXT L176 00000C0E TEXT L177 00000C3A TEXT L178 00000C4E TEXT L179 00000C66 TEXT L180 00000C9E TEXT L181 00000CD0 TEXT L182 00000CE6 TEXT L183 00000CFC TEXT L184 00000D3C TEXT L185 00000D56 TEXT L186 00000D70 TEXT _checklv 0000166E TEXT _checkre 00001604 TEXT _chkinit 0000143E TEXT L187 00000D90 TEXT _chklext 00001424 TEXT L188 00000DC2 TEXT L189 00000DEA TEXT L190 00000E06 TEXT L191 00000E30 TEXT L192 00000E60 TEXT L193 00000E84 TEXT L194 00000EBC TEXT L195 00000EE8 TEXT L196 00000EF8 TEXT L197 00000F0C TEXT L198 00000F26 TEXT L199 00000F46 TEXT L200 00000F5A TEXT L201 00000F7A TEXT L10004 00000FA6 TEXT L202 00000FAE TEXT L203 00000FC6 TEXT L204 00000FDC TEXT L205 00000FF0 TEXT L10005 00001010 TEXT L206 00001018 TEXT L10006 00001036 TEXT L207 0000103E TEXT L10007 00001062 TEXT L208 0000106A TEXT _ckcast 00001A84 TEXT L209 0000107A TEXT L210 00001082 TEXT L211 00001090 TEXT L212 000010A4 TEXT L213 000010B8 TEXT L214 000010D0 TEXT L215 000010D8 TEXT L216 000010FC TEXT L10008 00001106 TEXT L10009 00001108 TEXT L217 00001116 TEXT L218 0000112E TEXT L219 00001140 TEXT L220 0000115A TEXT L221 00001182 TEXT L222 000011B2 TEXT _chkptrs 00001ABE TEXT _tembeda 00001EA8 TEXT _macrote 00001F26 TEXT _lextest 00001F2E TEXT _cmplxpt 00001F5A TEXT L223 000001B4 DATA L224 000001F0 DATA _v33 0000124A TEXT _v34 000012AC TEXT L225 00000208 DATA L8 00001240 TEXT ~~v33 0000124A TEXT ~bb1 FFFFFFEE ABS ~bb2 FFFFFFE2 ABS L227 0000021D DATA L228 00000226 DATA L229 0000022F DATA L226 000012A8 TEXT ~~v34 000012AC TEXT ~q FFFFFFFC ABS ~s FFFFFFC4 ABS ~d1 FFFFFFDA ABS ~d2 FFFFFFD6 ABS ~f1 FFFFFFE4 ABS ~f2 FFFFFFE0 ABS ~p4 FFFFFFF4 ABS ~p5 FFFFFFEC ABS ~ar34 FFFFFFE8 ABS ~ptr FFFFFFCE ABS ~sop1 FFFFFFD2 ABS L231 000012C0 TEXT L232 000012CA TEXT L233 000012D4 TEXT L234 00001304 TEXT L235 0000132C TEXT L236 00001370 TEXT _f 00001418 TEXT L237 00001386 TEXT L10010 0000139C TEXT L238 000013B4 TEXT L10011 000013CC TEXT L239 000013E6 TEXT L10012 000013F6 TEXT L240 0000140E TEXT L230 0000140E TEXT ~~f 00001418 TEXT L241 00001420 TEXT ~~chklex 00001424 TEXT ~al9 00000008 ABS L243 0000143A TEXT L242 0000143A TEXT ~~chkini 0000143E TEXT L245 00000088 DATA L246 0000008C DATA L247 0000023F DATA L248 00000243 DATA L249 00000247 DATA ~ss 0000008C DATA ~liv1 00000088 DATA L250 0000145A TEXT L251 0000146A TEXT L252 0000024B DATA L253 00001486 TEXT L254 0000149A TEXT L255 000014AC TEXT L256 000014BA TEXT L257 000014C4 TEXT L258 000014CC TEXT L259 000014DC TEXT L262 0000156C TEXT L263 000014E2 TEXT L264 000014FA TEXT L265 00001518 TEXT L266 0000152E TEXT L267 00001548 TEXT L268 0000156A TEXT L261 0000156A TEXT L260 00001574 TEXT L269 0000024F DATA L270 00001592 TEXT L271 0000025A DATA L272 000015B0 TEXT L273 0000026B DATA L274 000015CC TEXT L275 000015D6 TEXT L276 000015E0 TEXT L277 000015EA TEXT L278 000015FA TEXT L244 000015FA TEXT ~~checkr 00001604 TEXT ~rx6 FFFFFFFE ABS ~rx7 FFFFFFFC ABS ~rx8 FFFFFFFA ABS ~rx9 FFFFFFF8 ABS L280 0000162E TEXT L281 0000163E TEXT L282 00001650 TEXT L283 00001664 TEXT L279 00001664 TEXT ~~checkl 0000166E TEXT ~alv 00000008 ABS L285 00001682 TEXT L284 00001682 TEXT ~~error 00001686 TEXT L287 0000027B DATA L286 0000169E TEXT ~~putstr 000016A2 TEXT L291 000016BA TEXT L290 000016B0 TEXT L289 000016BE TEXT L288 000016C6 TEXT ~~targs 000016D0 TEXT ~a3 0000000C ABS L10013 000016EC TEXT L293 000016F2 TEXT L294 00001706 TEXT L292 00001706 TEXT ~~addarg 0000170A TEXT L295 0000171C TEXT ~~eqstr 00001720 TEXT ~ap1 00000008 ABS ~ap2 0000000C ABS L299 0000173A TEXT L298 00001732 TEXT L300 0000173A TEXT L296 0000174A TEXT L297 0000173E TEXT L301 00001746 TEXT ~~addlar 00001754 TEXT L303 00001786 TEXT L302 00001790 TEXT ~~addpar 0000179A TEXT L304 000017B0 TEXT ~~swt1 000017BA TEXT L308 00001868 TEXT L309 000017C8 TEXT L311 0000184C TEXT L312 000017D6 TEXT L313 000017E4 TEXT L307 00001866 TEXT L314 000017E8 TEXT L315 000017F4 TEXT L316 000017F8 TEXT L317 00001806 TEXT L318 00001808 TEXT L319 00001816 TEXT L320 00001818 TEXT L321 00001826 TEXT L322 00001828 TEXT L323 00001836 TEXT L324 00001838 TEXT L325 00001846 TEXT L326 00001848 TEXT L310 00001864 TEXT L327 000000AA DATA L306 00001870 TEXT L328 0000187E TEXT L305 00001882 TEXT ~~swt2 0000188C TEXT L332 0000192A TEXT L333 0000189A TEXT L335 0000190E TEXT L336 000018A8 TEXT L334 00001924 TEXT L337 000018AC TEXT L338 000018BA TEXT L331 00001926 TEXT L339 000018BE TEXT L340 000018CA TEXT L341 000018CC TEXT L342 000018DA TEXT L343 000018DC TEXT L344 000018EA TEXT L345 000018EC TEXT L346 000018FA TEXT L347 000018FC TEXT L348 0000190A TEXT L349 000000CA DATA L350 00001918 TEXT L330 00001932 TEXT L351 00001940 TEXT L329 00001944 TEXT ~~swt3 0000194E TEXT L355 000019DE TEXT L356 0000195C TEXT L358 000019C4 TEXT L359 00001970 TEXT L360 0000197E TEXT L354 000019DC TEXT L361 00001980 TEXT L357 000019DA TEXT L362 00001982 TEXT L363 00001990 TEXT L364 00001992 TEXT L365 000019A0 TEXT L366 000019A2 TEXT L367 000019B0 TEXT L368 000019B2 TEXT L369 000019C0 TEXT L370 00000102 DATA L371 000019CE TEXT L353 000019E6 TEXT L372 000019F4 TEXT L352 000019F8 TEXT ~~swt4 00001A02 TEXT L376 00001A60 TEXT L377 00001A0E TEXT L379 00001A48 TEXT L380 00001A22 TEXT L378 00001A5C TEXT L381 00001A24 TEXT L382 00001A32 TEXT L375 00001A5E TEXT L383 00001A34 TEXT L384 00001A42 TEXT L385 00001A44 TEXT L374 00001A66 TEXT L386 00001A74 TEXT L373 00001A7A TEXT ~~ckcast 00001A84 TEXT ~arypt FFFFFFEA ABS ~cst19 FFFFFFEE ABS L388 00001ABA TEXT L387 00001ABA TEXT ~~chkptr 00001ABE TEXT ~apc FFFFFFFC ABS ~api FFFFFFF8 ABS ~apl FFFFFFF4 ABS L390 00001ADA TEXT L391 00001AF0 TEXT L392 00001AFE TEXT L393 00001B0E TEXT L394 00001B24 TEXT L395 00001B34 TEXT L396 00001B44 TEXT L397 00001B54 TEXT L398 00001B64 TEXT L399 00001B74 TEXT L400 00001B96 TEXT L401 00001BB0 TEXT L402 00001BC6 TEXT L403 00001BDA TEXT L404 00001BF6 TEXT L405 00001C0A TEXT L406 00001C1E TEXT L407 00001C32 TEXT L408 00001C46 TEXT L409 00001C5A TEXT L410 00001C84 TEXT L411 00001C9C TEXT L412 00001CB0 TEXT L413 00001CC0 TEXT L414 00001CE2 TEXT L415 00001CFC TEXT _ckstrpt 00001D08 TEXT L389 00001CFE TEXT ~~ckstrp 00001D08 TEXT L417 00001D42 TEXT L418 00001D50 TEXT L419 00001D60 TEXT L420 00001D70 TEXT L421 00001D86 TEXT L422 00001D9A TEXT L423 00001DB4 TEXT L424 00001DC8 TEXT L10014 00001DE0 TEXT L425 00001DE8 TEXT L426 00001DFA TEXT L427 00001E18 TEXT L428 00001E20 TEXT L429 00001E28 TEXT L430 00001E34 TEXT L431 00001E3C TEXT L432 00001E50 TEXT L433 00001E62 TEXT L434 00001E6A TEXT L435 00001E72 TEXT L436 00001E7E TEXT L437 00001E86 TEXT L438 00001E9E TEXT L416 00001E9E TEXT ~~tembed 00001EA8 TEXT ~ctype FFFFFFFC ABS ~c9 FFFFFFFA ABS L440 00001EDA TEXT L441 00001EEA TEXT L442 00001F06 TEXT L443 00001F1C TEXT L439 00001F1C TEXT ~~macrot 00001F26 TEXT L444 00001F2A TEXT ~~lextes 00001F2E TEXT ~iii FFFFFFFE ABS L446 00001F56 TEXT L445 00001F56 TEXT ~~cmplxp 00001F5A TEXT ~v FFFFFFFE ABS ~dd FFFFFFF6 ABS ~pd FFFFFFE6 ABS L450 00001FA4 TEXT L451 00001F68 TEXT L449 00001FA0 TEXT L448 00001FAC TEXT L452 00001FDE TEXT L453 00001FF8 TEXT L447 00001FF8 TEXT ~~strlen 00002002 TEXT L457 00002010 TEXT L456 0000200E TEXT L455 00002020 TEXT L454 00002024 TEXT