; This OS9 boot code for the SC020T board ; was in two 32K ROM chips ; but would fit in two 4K ROM chips. ; or one 8K chip if bus size made byte-wide. ; ; First 1024 bytes are 256 vectors. ; They all point to locations in the first 4K, ; so I suspect that the ROM initially appears at high (0x10000000) and low (0x00000000) spaces ; but then disables the low space and copies itself to RAM there. ; The disabling is done with a hardware counter, not software. ; ; The RAM is 32-bit wide, and should run code faster. ; ; The STEbus is byte-wide but that is not a problem. ; The 68020 has dynamic bus sizing and could run like a 68008. ; Most STEbus I/O boards use 8-bit chips, and control systems are ; not going to be very memory-intensive. ; ; 00000000 00001400 ; initial SSP 00000004 100004d0 ; initial PC. ROM at 0x10000000 00000008 00000400 0000000c 0000040a 00000010 00000414 00000014 0000041e 00000018 00000428 0000001c 00000432 00000020 0000043c 00000024 00000446 00000028 00000450 0000002c 0000045a 00000030 00000464 00000034 0000046e 00000038 00000478 0000003c 00000482 00000040 0000048c 00000044 00000496 00000048 000004a0 0000004c 000004aa 00000050 000004b4 00000054 000004be 00000058 000004c8 0000005c 000004d2 00000060 000004dc 00000064 000004e6 00000068 000004f0 0000006c 000004fa 00000070 00000504 00000074 0000050e 00000078 00000518 0000007c 00000522 00000080 0000052c 00000084 00000536 00000088 00000540 0000008c 0000054a 00000090 00000554 00000094 0000055e 00000098 00000568 0000009c 00000572 000000a0 0000057c 000000a4 00000586 000000a8 00000590 000000ac 0000059a 000000b0 000005a4 000000b4 000005ae 000000b8 000005b8 000000bc 000005c2 000000c0 000005cc 000000c4 000005d6 000000c8 000005e0 000000cc 000005ea 000000d0 000005f4 000000d4 000005fe 000000d8 00000608 000000dc 00000612 000000e0 0000061c 000000e4 00000626 000000e8 00000630 000000ec 0000063a 000000f0 00000644 000000f4 0000064e 000000f8 00000658 000000fc 00000662 00000100 0000066c 00000104 00000676 00000108 00000680 0000010c 0000068a 00000110 00000694 00000114 0000069e 00000118 000006a8 0000011c 000006b2 00000120 000006bc 00000124 000006c6 00000128 000006d0 0000012c 000006da 00000130 000006e4 00000134 000006ee 00000138 000006f8 0000013c 00000702 00000140 0000070c 00000144 00000716 00000148 00000720 0000014c 0000072a 00000150 00000734 00000154 0000073e 00000158 00000748 0000015c 00000752 00000160 0000075c 00000164 00000766 00000168 00000770 0000016c 0000077a 00000170 00000784 00000174 0000078e 00000178 00000798 0000017c 000007a2 00000180 000007ac 00000184 000007b6 00000188 000007c0 0000018c 000007ca 00000190 000007d4 00000194 000007de 00000198 000007e8 0000019c 000007f2 000001a0 000007fc 000001a4 00000806 000001a8 00000810 000001ac 0000081a 000001b0 00000824 000001b4 0000082e 000001b8 00000838 000001bc 00000842 000001c0 0000084c 000001c4 00000856 000001c8 00000860 000001cc 0000086a 000001d0 00000874 000001d4 0000087e 000001d8 00000888 000001dc 00000892 000001e0 0000089c 000001e4 000008a6 000001e8 000008b0 000001ec 000008ba 000001f0 000008c4 000001f4 000008ce 000001f8 000008d8 000001fc 000008e2 00000200 000008ec 00000204 000008f6 00000208 00000900 0000020c 0000090a 00000210 00000914 00000214 0000091e 00000218 00000928 0000021c 00000932 00000220 0000093c 00000224 00000946 00000228 00000950 0000022c 0000095a 00000230 00000964 00000234 0000096e 00000238 00000978 0000023c 00000982 00000240 0000098c 00000244 00000996 00000248 000009a0 0000024c 000009aa 00000250 000009b4 00000254 000009be 00000258 000009c8 0000025c 000009d2 00000260 000009dc 00000264 000009e6 00000268 000009f0 0000026c 000009fa 00000270 00000a04 00000274 00000a0e 00000278 00000a18 0000027c 00000a22 00000280 00000a2c 00000284 00000a36 00000288 00000a40 0000028c 00000a4a 00000290 00000a54 00000294 00000a5e 00000298 00000a68 0000029c 00000a72 000002a0 00000a7c 000002a4 00000a86 000002a8 00000a90 000002ac 00000a9a 000002b0 00000aa4 000002b4 00000aae 000002b8 00000ab8 000002bc 00000ac2 000002c0 00000acc 000002c4 00000ad6 000002c8 00000ae0 000002cc 00000aea 000002d0 00000af4 000002d4 00000afe 000002d8 00000b08 000002dc 00000b12 000002e0 00000b1c 000002e4 00000b26 000002e8 00000b30 000002ec 00000b3a 000002f0 00000b44 000002f4 00000b4e 000002f8 00000b58 000002fc 00000b62 00000300 00000b6c 00000304 00000b76 00000308 00000b80 0000030c 00000b8a 00000310 00000b94 00000314 00000b9e 00000318 00000ba8 0000031c 00000bb2 00000320 00000bbc 00000324 00000bc6 00000328 00000bd0 0000032c 00000bda 00000330 00000be4 00000334 00000bee 00000338 00000bf8 0000033c 00000c02 00000340 00000c0c 00000344 00000c16 00000348 00000c20 0000034c 00000c2a 00000350 00000c34 00000354 00000c3e 00000358 00000c48 0000035c 00000c52 00000360 00000c5c 00000364 00000c66 00000368 00000c70 0000036c 00000c7a 00000370 00000c84 00000374 00000c8e 00000378 00000c98 0000037c 00000ca2 00000380 00000cac 00000384 00000cb6 00000388 00000cc0 0000038c 00000cca 00000390 00000cd4 00000394 00000cde 00000398 00000ce8 0000039c 00000cf2 000003a0 00000cfc 000003a4 00000d06 000003a8 00000d10 000003ac 00000d1a 000003b0 00000d24 000003b4 00000d2e 000003b8 00000d38 000003bc 00000d42 000003c0 00000d4c 000003c4 00000d56 000003c8 00000d60 000003cc 00000d6a 000003d0 00000d74 000003d4 00000d7e 000003d8 00000d88 000003dc 00000d92 000003e0 00000d9c 000003e4 00000da6 000003e8 00000db0 000003ec 00000dba 000003f0 00000dc4 000003f4 00000dce 000003f8 00000dd8 000003fc 00000de2 ; ; These guys are early OS-9 developers: ; 00000400 7b7b7b7b7b7b7b2d2d7d7d7d7d7d7d7d DC.B '{{{{{{{--}}}}}}}' 00000410 66726f6d 20 746865 20 6469736b 20 DC.B 'from the disk ' 0000041e 6f66 20 526f62657274 20 446f676765747420 DC.B 'of Robert Doggett ' 00000430 202020202020 DC.B ' ' 00000436 616e6420 DC.B 'and ' 0000043a 2020202020202020 DC.B ' ' 00000442 57617272656e2042726f776e2020 DC.B 'Warren Brown ' 00000450 7b7b7b7b7b7b7b2b2b7d7d7d7d7d7d7d DC.B '{{{{{{{++}}}}}}}' 00000460 00000400 ; RAM 00000464 00018000 ; = 96K 00000468 00000000 ; 0 0000046c 10000000 ; ROM start 00000470 10080000 ; ROM end ? 00000474 00000000 ; NULL 00000478 00000000 ; NULL 0000047c 00000000 ; NULL 00000480 00000000 ; NULL 00000484 00000000 ; NULL 00000488 00000000 ; NULL 0000048c 00000000 ; NULL 00000490 00000000 ; NULL 00000494 00000000 ; NULL 00000498 00000000 ; NULL 0000049c 00000000 ; NULL 000004a0 00000000 ; NULL 000004a4 00000000 ; NULL 000004a8 00000000 ; NULL 000004ac 00000000 ; NULL 000004b0 00000000 ; NULL 000004b4 00002000 ; 8K 000004b8 50000000 ; UART channel 0 000004bc 50000008 ; UART channel 1 000004c0 3000 ; 000004c2 00c0 ; SCSI or FDC? 000004c4 1c00 ; SCSI or FDC? 000004c6 1f00 ; SCSI or FDC? 000004c8 00000000 ; NULL 000004cc 00000000 ; NULL ; reset vector points here: 000004d0 60000182 BRA L_654 000004d4 600006ca BRA $ba0 000004d8 600006dc BRA $bb6 000004dc 60000596 BRA L_A74 000004e0 6000016c BRA $64e 000004e4 6000060a BRA $af0 000004e8 60000600 BRA $aea 000004ec 600005f6 BRA $ae4 000004f0 600005ec BRA $ade 000004f4 600006d6 BRA $bcc 000004f8 6000015a BRA L_654 ; ASCII 000004fc 4f532d392f36384b 20 53797374656d 20 426f6f747374726170 00 DC.B 'OS-9/68K System Bootstrap ' 00000516 464420636f6e74726f6c6c6572206e6f742070726573656e74 00 DC.B 'FD controller not present' 00000530 484420636f6e74726f6c6c6572206e6f742070726573656e74 00 DC.B 'HD controller not present' 0000054a 466c6f707079 20 6469736b 20 302e2e2e 00 DC.B 'Floppy disk 0...' 0000055b 466c6f707079 20 626f6f74 20 6661696c65642c 20 737461747573 20 24 00 DC.B 'Floppy boot failed, status $' 48617264 20 6469736b 20 302e2e2e 00 DC.B 'Hard disk 0...' 00000587 426f6f74 20 6661696c65642c 20 737461747573 20 24 00 DC.B 'Boot failed, status $' 0000059d 4b65726e656c 20 686173 20 626164 20 DC.B 'Kernel has bad ' 000005ac 6d6f64756c65 20 686561646572 00 DC.B 'module header ' 000005ba 457863657074696f6e 20 4572726f722c 20 766563746f72 20 6f6666736574 20 24 00 DC.B 'Exception Error, vector offset $ 000005db 20 61646472 20 24 00 DC.B ' addr $' 000005e3 496c6c6567616c 20 427573 20 54726170 20 647572696e67 20 52414d 20 736561726368 20 617420616464726573733a 20 24 00 DC.B 'Illegal Bus Trap during RAM search at address: $' 00000614 466174616c20 53797374656d 20 4572726f723b20 7265626f6f74696e67 20 73797374656d 00 DC.B 'Fatal System Error; rebooting system' 00000639 426f6f74 20 66696c65 20 6e6f74 20 666f756e64 00 00 DC.B ' Boot file not found ' L_64E: 0000064e 307c0001 MOVEA.W #1,A0 ; 1 to A0 00000652 6004 BRA $658 ; here soon after reset: L_654: 00000654 307c0000 MOVEA.W #0,A0 ; 0 to A0 L_658: 00000658 007c0700 ORI.W #1792,SR 0000065c 4e60 MOVE.L A0,USP ; A0 to User Stack Pointer (aka A7) 0000065e 48e700c0 MOVEM.L A0/A1,-(A7) 00000662 207c000007ee MOVEA.L #2030,A0 00000668 41fb8800 LEA 2(PC,A0.L),A0 0000066c 2f480004 MOVE.L A0,4(A7) 00000670 205f MOVEA.L (A7)+,A0 00000672 4e75 RTS ; wonder where this returns to? 00000674 4e7af801 DC.W #20090,#-2047 00000678 2e57 MOVEA.L (A7),A7 0000067a 2a7afde4 MOVEA.L -540(PC)!$460,A5 0000067e 204d MOVEA.L A5,A0 00000680 7000 MOVEQ #0,D0 00000682 323c07ff MOVE.W #2047,D1 00000686 20c0 MOVE.L D0,(A0)+ 00000688 51c9fffc DBRA D1,686 0000068c 4e68 MOVE.L USP,A0 0000068e 2b4809f0 MOVE.L A0,2544(A5) 00000692 41fa0420 LEA 1056(PC)!$ab4,A0 00000696 224d MOVEA.L A5,A1 00000698 4e7aa801 DC.W #20090,#-22527 0000069c d4fc0008 ADDA.W #8,A2 000006a0 7408 MOVEQ #8,D2 000006a2 303c00fd MOVE.W #253,D0 000006a6 2489 MOVE.L A1,(A2) 000006a8 32fc4878 MOVE.W #18552,(A1)+ 000006ac 32c2 MOVE.W D2,(A1)+ 000006ae 32fc4ef9 MOVE.W #20217,(A1)+ 000006b2 22c8 MOVE.L A0,(A1)+ 000006b4 588a ADDQ.L #4,A2 000006b6 5882 ADDQ.L #4,D2 000006b8 51c8ffec DBRA D0,6a6 000006bc 43fa000e LEA 14(PC)!$6cc,A1 000006c0 2b490010 MOVE.L A1,16(A5) 000006c4 2e0f MOVE.L A7,D7 000006c6 2c07 MOVE.L D7,D6 000006c8 4efa0003 JMP 3(PC)!$6cd 000006cc 2b480010 MOVE.L A0,16(A5) 000006d0 9e8f SUB.L A7,D7 000006d2 7000 MOVEQ #0,D0 000006d4 0c070012 CMPI.B #18,D7 000006d8 675e BEQ $738 000006da 700a MOVEQ #10,D0 000006dc 0c07003e CMPI.B #62,D7 000006e0 6756 BEQ $738 000006e2 7046 MOVEQ #70,D0 000006e4 0c070026 CMPI.B #38,D7 000006e8 674e BEQ $738 000006ea 203c0000012c MOVE.L #300,D0 000006f0 0c07001c CMPI.B #28,D7 000006f4 6742 BEQ $738 000006f6 7028 MOVEQ #40,D0 000006f8 0c070010 CMPI.B #16,D7 000006fc 673a BEQ $738 000006fe 7063 MOVEQ #99,D0 00000700 0c070024 CMPI.B #36,D7 00000704 6706 BEQ $70c 00000706 0c070060 CMPI.B #96,D7 0000070a 662c BNE $738 0000070c 206d001a MOVEA.L 26(A5),A0 00000710 226d007e MOVEA.L 126(A5),A1 00000714 45fa001a LEA 26(PC)!$730,A2 00000718 2b4a007e MOVE.L A2,126(A5) 0000071c 45fa0010 LEA 16(PC)!$72e,A2 00000720 2b4a001a MOVE.L A2,26(A5) 00000724 7014 MOVEQ #20,D0 00000726 06fa0000 DC.W #1786,#0 0000072a 0002ffff ORI.B #-1,D2 0000072e 701e MOVEQ #30,D0 00000730 2b49007e MOVE.L A1,126(A5) 00000734 2b48001a MOVE.L A0,26(A5) 00000738 2e46 MOVEA.L D6,A7 0000073a 2b4009ec MOVE.L D0,2540(A5) 0000073e 610004b8 BSR $bf8 00000742 61000446 BSR $b8a 00000746 41fafdb4 LEA -588(PC)!$4fc,A0 0000074a 610003be BSR $b0a 0000074e 2b7c0000200009f4 MOVE.L #8192,2548(A5) 00000756 2c3afd5c MOVE.L -676(PC)!$4b4,D6 0000075a 5386 SUBQ.L #1,D6 0000075c 4686 NOT.L D6 0000075e 7a00 MOVEQ #0,D5 00000760 99cc SUBA.L A4,A4 00000762 41fa00ea LEA 234(PC)!$84e,A0 00000766 2b480006 MOVE.L A0,6(A5) 0000076a 2e0f MOVE.L A7,D7 0000076c 43fafcf2 LEA -782(PC)!$460,A1 00000770 2019 MOVE.L (A1)+,D0 00000772 d0bc00002000 ADD.L #8192,D0 00000778 600e BRA $788 0000077a 2019 MOVE.L (A1)+,D0 0000077c 660a BNE $788 0000077e 08c50000 BSET.L #0,D5 00000782 6600012e BNE $8b2 00000786 2019 MOVE.L (A1)+,D0 00000788 7400 MOVEQ #0,D2 0000078a 7600 MOVEQ #0,D3 0000078c 7800 MOVEQ #0,D4 0000078e 2440 MOVEA.L D0,A2 00000790 2640 MOVEA.L D0,A3 00000792 223afd20 MOVE.L -736(PC)!$4b4,D1 00000796 d280 ADD.L D0,D1 00000798 c286 AND.L D6,D1 0000079a 9280 SUB.L D0,D1 0000079c 41fa000a LEA 10(PC)!$7a8,A0 000007a0 2012 MOVE.L (A2),D0 000007a2 08050000 BTST.L #0,D5 000007a6 662c BNE $7d4 000007a8 41fa0038 LEA 56(PC)!$7e2,A0 000007ac 24bc5a5a5a5a MOVE.L #1515870810,(A2) 000007b2 0c925a5a5a5a CMPI.L #1515870810,(A2) 000007b8 661a BNE $7d4 000007ba 41fa02a4 LEA 676(PC)!$a60,A0 000007be 24bca5a5a5a5 MOVE.L #-1515870811,(A2) 000007c4 0c92a5a5a5a5 CMPI.L #-1515870811,(A2) 000007ca 6608 BNE $7d4 000007cc 2480 MOVE.L D0,(A2) 000007ce 08050000 BTST.L #0,D5 000007d2 670c BEQ $7e0 000007d4 41fa028a LEA 650(PC)!$a60,A0 000007d8 b092 CMP.L (A2),D0 000007da 6606 BNE $7e2 000007dc 7402 MOVEQ #2,D2 000007de 6002 BRA $7e2 000007e0 7401 MOVEQ #1,D2 000007e2 41fa027c LEA 636(PC)!$a60,A0 000007e6 b802 CMP.B D2,D4 000007e8 673e BEQ $828 000007ea b83c0001 CMP.B #1,D4 000007ee 6626 BNE $816 000007f0 268c MOVE.L A4,(A3) 000007f2 27430004 MOVE.L D3,4(A3) 000007f6 284b MOVEA.L A3,A4 000007f8 d7ad09f4 ADD.L D3,2548(A5) 000007fc e48b LSR.L #2,D3 000007fe 508b ADDQ.L #8,A3 00000800 5783 SUBQ.L #3,D3 00000802 203cfeedc0de MOVE.L #-17973026,D0 00000808 26c0 MOVE.L D0,(A3)+ 0000080a 51cbfffc DBRA D3,808 0000080e 5243 ADDQ.W #1,D3 00000810 5383 SUBQ.L #1,D3 00000812 64f4 BCC $808 00000814 600c BRA $822 00000816 b83c0002 CMP.B #2,D4 0000081a 6606 BNE $822 0000081c 2f03 MOVE.L D3,-(A7) 0000081e 2f0b MOVE.L A3,-(A7) 00000820 2e0f MOVE.L A7,D7 00000822 264a MOVEA.L A2,A3 00000824 7600 MOVEQ #0,D3 00000826 1802 MOVE.B D2,D4 00000828 b5d1 CMPA.L (A1),A2 0000082a 6506 BCS $832 0000082c 5889 ADDQ.L #4,A1 0000082e 6000ff4a BRA $77a 00000832 7400 MOVEQ #0,D2 00000834 d5c1 ADDA.L D1,A2 00000836 b5d1 CMPA.L (A1),A2 00000838 640a BCC $844 0000083a d681 ADD.L D1,D3 0000083c 223afc76 MOVE.L -906(PC)!$4b4,D1 00000840 6000ff5a BRA $79c 00000844 200a MOVE.L A2,D0 00000846 9091 SUB.L (A1),D0 00000848 9280 SUB.L D0,D1 0000084a d681 ADD.L D1,D3 0000084c 6094 BRA $7e2 0000084e 2b6f000609f8 MOVE.L 6(A7),2552(A5) 00000854 0cad0000000a09ec CMPI.L #10,2540(A5) 0000085c 6550 BCS $8ae 0000085e 6730 BEQ $890 00000860 0cad0000001409ec CMPI.L #20,2540(A5) 00000868 672e BEQ $898 0000086a 0cad0000001e09ec CMPI.L #30,2540(A5) 00000872 6724 BEQ $898 00000874 0cad0000002809ec CMPI.L #40,2540(A5) 0000087c 6722 BEQ $8a0 0000087e 0cad0000012c09ec CMPI.L #300,2540(A5) 00000886 6720 BEQ $8a8 00000888 2b6f001809f8 MOVE.L 24(A7),2552(A5) 0000088e 601e BRA $8ae 00000890 2b6f000e09f8 MOVE.L 14(A7),2552(A5) 00000896 6016 BRA $8ae 00000898 2b6f001409f8 MOVE.L 20(A7),2552(A5) 0000089e 600e BRA $8ae 000008a0 2b6f001809f8 MOVE.L 24(A7),2552(A5) 000008a6 6006 BRA $8ae 000008a8 2b6f000c09f8 MOVE.L 12(A7),2552(A5) 000008ae 2e47 MOVEA.L D7,A7 000008b0 4ed0 JMP (A0) 000008b2 41fa0200 LEA 512(PC)!$ab4,A0 000008b6 2b480006 MOVE.L A0,6(A5) 000008ba 60000042 BRA $8fe 000008be 5343 SUBQ.W #1,D3 000008c0 30323054 MOVE.W 84(A2,D3.W),D0 000008c4 00000214 ORI.B #20,D0 000008c8 00000000 ORI.B #0,D0 000008cc 00005000 ORI.B #0,D0 000008d0 00000000 ORI.B #0,D0 000008d4 00000000 ORI.B #0,D0 000008d8 00000000 ORI.B #0,D0 000008dc 00003000 ORI.B #0,D0 000008e0 00003020 ORI.B #32,D0 000008e4 0000 DC.W #0 000008e6 00000000 ORI.B #0,D0 000008ea 00000000 ORI.B #0,D0 000008ee 00000000 ORI.B #0,D0 000008f2 00000000 ORI.B #0,D0 000008f6 00000000 ORI.B #0,D0 000008fa 00000000 ORI.B #0,D0 000008fe 303c003f MOVE.W #63,D0 00000902 4e7a DC.W #20090 00000904 e801 ASR.B #4,D1 00000906 2c56 MOVEA.L (A6),A6 00000908 ddfc00000800 ADDA.L #2048,A6 0000090e 41faffae LEA -82(PC)!$8be,A0 00000912 1cd8 MOVE.B (A0)+,(A6)+ 00000914 51c8fffc DBRA D0,912 00000918 4e7a DC.W #20090 0000091a e801 ASR.B #4,D1 0000091c 2c56 MOVEA.L (A6),A6 0000091e 43fafbb0 LEA -1104(PC)!$4d0,A1 00000922 267afb9c MOVEA.L -1124(PC)!$4c0,A3 00000926 4e7a DC.W #20090 00000928 e801 ASR.B #4,D1 0000092a 2c56 MOVEA.L (A6),A6 0000092c 48e700e0 MOVEM.L A0-A2,-(A7) 00000930 207900000008 MOVEA.L $00000008.L,A0 00000936 45fa01e4 LEA 484(PC)!$b1c,A2 0000093a 23ca00000008 MOVE.L A2,$00000008.L 00000940 267c300000f0 MOVEA.L #805306608,A3 00000946 4a2b0004 TST.B 4(A3) 0000094a 23c800000008 MOVE.L A0,$00000008.L 00000950 1d7c000107b6 MOVE.B #1,1974(A6) 00000956 4cdf0700 MOVEM.L (A7)+,A0-A2 0000095a 267c300000f0 MOVEA.L #805306608,A3 00000960 177c00800001 MOVE.B #-128,1(A3) 00000966 70a7 MOVEQ #-89,D0 00000968 51c8fffe DBRA D0,968 0000096c 177c00000001 MOVE.B #0,1(A3) 00000972 4a2b0007 TST.B 7(A3) 00000976 48e700e0 MOVEM.L A0-A2,-(A7) 0000097a 207900000008 MOVEA.L $00000008.L,A0 00000980 45fa01c8 LEA 456(PC)!$b4a,A2 00000984 23ca00000008 MOVE.L A2,$00000008.L 0000098a 267c300000c0 MOVEA.L #805306560,A3 00000990 4a13 TST.B (A3) 00000992 23c800000008 MOVE.L A0,$00000008.L 00000998 4cdf0700 MOVEM.L (A7)+,A0-A2 0000099c 41fafbac LEA -1108(PC)!$54a,A0 000009a0 61000168 BSR $b0a 000009a4 267c300000c0 MOVEA.L #805306560,A3 000009aa 610005e4 BSR $f90 000009ae 643a BCC $9ea 000009b0 41fafba9 LEA -1111(PC)!$55b,A0 000009b4 61000160 BSR $b16 000009b8 3001 MOVE.W D1,D0 000009ba 61000128 BSR $ae4 000009be 6100014c BSR $b0c 000009c2 267c300000f0 MOVEA.L #805306608,A3 000009c8 4a2e07b6 TST.B 1974(A6) 000009cc 6600000e BNE $9dc 000009d0 41fafb5e LEA -1186(PC)!$530,A0 000009d4 61000134 BSR $b0a 000009d8 6000fc7a BRA $654 000009dc 41fafb9a LEA -1126(PC)!$578,A0 000009e0 61000128 BSR $b0a 000009e4 61000aee BSR $14d4 000009e8 654e BCS $a38 000009ea 2f08 MOVE.L A0,-(A7) 000009ec 0c504afc CMPI.W #19196,(A0) 000009f0 6664 BNE $a56 000009f2 722e MOVEQ #46,D1 000009f4 e241 ASR.W #1,D1 000009f6 74ff MOVEQ #-1,D2 000009f8 3018 MOVE.W (A0)+,D0 000009fa b142 EOR.W D0,D2 000009fc 51c9fffa DBRA D1,9f8 00000a00 205f MOVEA.L (A7)+,A0 00000a02 6652 BNE $a56 00000a04 2f3c00002000 MOVE.L #8192,-(A7) 00000a0a 2f3afa54 MOVE.L -1452(PC)!$460,-(A7) 00000a0e 202d09f4 MOVE.L 2548(A5),D0 00000a12 222d09ec MOVE.L 2540(A5),D1 00000a16 7400 MOVEQ #0,D2 00000a18 262d09f0 MOVE.L 2544(A5),D3 00000a1c 7800 MOVEQ #0,D4 00000a1e 7a00 MOVEQ #0,D5 00000a20 7c00 MOVEQ #0,D6 00000a22 7e00 MOVEQ #0,D7 00000a24 d1e80030 ADDA.L 48(A0),A0 00000a28 43fafaa6 LEA -1370(PC)!$4d0,A1 00000a2c 2447 MOVEA.L D7,A2 00000a2e 2647 MOVEA.L D7,A3 00000a30 4e7a DC.W #20090 00000a32 e801 ASR.B #4,D1 00000a34 2c56 MOVEA.L (A6),A6 00000a36 4ed0 JMP (A0) 00000a38 41fafb4d LEA -1203(PC)!$587,A0 00000a3c 610000d8 BSR $b16 00000a40 3001 MOVE.W D1,D0 00000a42 610000a0 BSR $ae4 00000a46 610000c4 BSR $b0c 00000a4a 48e7ffff MOVEM.L D0-D7/A0-A7,-(A7) 00000a4e 6100faa8 BSR $4f8 00000a52 6000fc00 BRA $654 00000a56 41fafb45 LEA -1211(PC)!$59d,A0 00000a5a 610000ae BSR $b0a 00000a5e 60ea BRA $a4a 00000a60 41fafb81 LEA -1151(PC)!$5e3,A0 00000a64 610000b0 BSR $b16 00000a68 202d09f8 MOVE.L 2552(A5),D0 00000a6c 6170 BSR $ade 00000a6e 6100009c BSR $b0c 00000a72 60d6 BRA $a4a L_A74: 00000a74 2f0c MOVE.L A4,-(A7) 00000a76 223afa3c MOVE.L -1476(PC)!$4b4,D1 00000a7a 5381 SUBQ.L #1,D1 00000a7c d081 ADD.L D1,D0 00000a7e 4681 NOT.L D1 00000a80 c081 AND.L D1,D0 00000a82 244f MOVEA.L A7,A2 00000a84 6004 BRA $a8a 00000a86 244c MOVEA.L A4,A2 00000a88 2854 MOVEA.L (A4),A4 00000a8a 4a94 TST.L (A4) 00000a8c 66f8 BNE $a86 00000a8e b0ac0004 CMP.L 4(A4),D0 00000a92 6416 BCC $aaa 00000a94 91ac0004 SUB.L D0,4(A4) 00000a98 d192 ADD.L D0,(A2) 00000a9a 2452 MOVEA.L (A2),A2 00000a9c 4292 CLR.L (A2) 00000a9e 256c00040004 MOVE.L 4(A4),4(A2) 00000aa4 244c MOVEA.L A4,A2 00000aa6 285f MOVEA.L (A7)+,A4 00000aa8 4e75 RTS 00000aaa 323c00cf MOVE.W #207,D1 00000aae 003c0001 ORI.B #1,CCR 00000ab2 60f2 BRA $aa6 00000ab4 007c0700 ORI.W #1792,SR 00000ab8 48e7fffe MOVEM.L D0-D7/A0-A6,-(A7) 00000abc 41fafafc LEA -1284(PC)!$5ba,A0 00000ac0 6154 BSR $b16 00000ac2 302f003e MOVE.W 62(A7),D0 00000ac6 611c BSR $ae4 00000ac8 41fafb11 LEA -1263(PC)!$5db,A0 00000acc 6148 BSR $b16 00000ace 202f0042 MOVE.L 66(A7),D0 00000ad2 610a BSR $ade 00000ad4 6136 BSR $b0c 00000ad6 41fafb3c LEA -1220(PC)!$614,A0 00000ada 6000ff7e BRA $a5a 00000ade 4840 SWAP D0 00000ae0 6102 BSR $ae4 00000ae2 4840 SWAP D0 00000ae4 e098 ROR.L #8,D0 00000ae6 6102 BSR $aea 00000ae8 e198 ROL.L #8,D0 00000aea e898 ROR.L #4,D0 00000aec 6102 BSR $af0 00000aee e998 ROL.L #4,D0 00000af0 2f00 MOVE.L D0,-(A7) 00000af2 0200000f ANDI.B #15,D0 00000af6 0c000009 CMPI.B #9,D0 00000afa 6302 BLS $afe 00000afc 5e00 ADDQ.B #7,D0 00000afe 06000030 ADDI.B #48,D0 00000b02 610000b2 BSR $bb6 00000b06 201f MOVE.L (A7)+,D0 00000b08 4e75 RTS 00000b0a 610a BSR $b16 00000b0c 700d MOVEQ #13,D0 00000b0e 600000a6 BRA $bb6 00000b12 610000a2 BSR $bb6 00000b16 1018 MOVE.B (A0)+,D0 00000b18 66f8 BNE $b12 00000b1a 4e75 RTS 00000b1c 362f0006 MOVE.W 6(A7),D3 00000b20 0803000c BTST.L #12,D3 00000b24 6700000c BEQ $b32 00000b28 dffc0000005c ADDA.L #92,A7 00000b2e 6000000c BRA $b3c 00000b32 dffc00000020 ADDA.L #32,A7 00000b38 60000002 BRA $b3c 00000b3c 23c800000008 MOVE.L A0,$00000008.L 00000b42 4cdf0700 MOVEM.L (A7)+,A0-A2 00000b46 6000fe2e BRA $976 00000b4a 362f0006 MOVE.W 6(A7),D3 00000b4e 0803000c BTST.L #12,D3 00000b52 6700000c BEQ $b60 00000b56 dffc0000005c ADDA.L #92,A7 00000b5c 6000000c BRA $b6a 00000b60 dffc00000020 ADDA.L #32,A7 00000b66 60000002 BRA $b6a 00000b6a 23c800000008 MOVE.L A0,$00000008.L 00000b70 4cdf0700 MOVEM.L (A7)+,A0-A2 00000b74 41faf9a0 LEA -1632(PC)!$516,A0 00000b78 6100ff90 BSR $b0a 00000b7c 223c00000007 MOVE.L #7,D1 00000b82 61000d4c BSR $18d0 00000b86 6000fe3a BRA $9c2 00000b8a 48e700c0 MOVEM.L A0/A1,-(A7) 00000b8e 207c0000014c MOVEA.L #332,A0 00000b94 41fb8800 LEA 2(PC,A0.L),A0 00000b98 2f480004 MOVE.L A0,4(A7) 00000b9c 205f MOVEA.L (A7)+,A0 00000b9e 4e75 RTS 00000ba0 48e700c0 MOVEM.L A0/A1,-(A7) 00000ba4 207c00000102 MOVEA.L #258,A0 00000baa 41fb8800 LEA 2(PC,A0.L),A0 00000bae 2f480004 MOVE.L A0,4(A7) 00000bb2 205f MOVEA.L (A7)+,A0 00000bb4 4e75 RTS 00000bb6 48e700c0 MOVEM.L A0/A1,-(A7) 00000bba 207c00000086 MOVEA.L #134,A0 00000bc0 41fb8800 LEA 2(PC,A0.L),A0 00000bc4 2f480004 MOVE.L A0,4(A7) 00000bc8 205f MOVEA.L (A7)+,A0 00000bca 4e75 RTS 00000bcc 48e700c0 MOVEM.L A0/A1,-(A7) 00000bd0 207c00000054 MOVEA.L #84,A0 00000bd6 41fb8800 LEA 2(PC,A0.L),A0 00000bda 2f480004 MOVE.L A0,4(A7) 00000bde 205f MOVEA.L (A7)+,A0 00000be0 4e75 RTS 00000be2 48e700c0 MOVEM.L A0/A1,-(A7) 00000be6 207c00000306 MOVEA.L #774,A0 00000bec 41fb8800 LEA 2(PC,A0.L),A0 00000bf0 2f480004 MOVE.L A0,4(A7) 00000bf4 205f MOVEA.L (A7)+,A0 00000bf6 4e75 RTS 00000bf8 48e700c0 MOVEM.L A0/A1,-(A7) 00000bfc 207c000002ee MOVEA.L #750,A0 00000c02 41fb8800 LEA 2(PC,A0.L),A0 00000c06 2f480004 MOVE.L A0,4(A7) 00000c0a 205f MOVEA.L (A7)+,A0 00000c0c 4e75 RTS 00000c0e 48e700c0 MOVEM.L A0/A1,-(A7) 00000c12 207c000008ba MOVEA.L #2234,A0 00000c18 41fb8800 LEA 2(PC,A0.L),A0 00000c1c 2f480004 MOVE.L A0,4(A7) 00000c20 205f MOVEA.L (A7)+,A0 00000c22 4e75 RTS 00000c24 2f0b MOVE.L A3,-(A7) 00000c26 267af894 MOVEA.L -1900(PC)!$4bc,A3 00000c2a 6006 BRA $c32 00000c2c 2f0b MOVE.L A3,-(A7) 00000c2e 267af888 MOVEA.L -1912(PC)!$4b8,A3 00000c32 082b00000001 BTST.B #0,1(A3) 00000c38 6604 BNE $c3e 00000c3a 70ff MOVEQ #-1,D0 00000c3c 6006 BRA $c44 00000c3e 7000 MOVEQ #0,D0 00000c40 102b0003 MOVE.B 3(A3),D0 00000c44 265f MOVEA.L (A7)+,A3 00000c46 4e75 RTS 00000c48 2f0b MOVE.L A3,-(A7) 00000c4a 267af86c MOVEA.L -1940(PC)!$4b8,A3 00000c4e 61000124 BSR $d74 00000c52 082b00030001 BTST.B #3,1(A3) 00000c58 67f8 BEQ $c52 00000c5a 082b00000001 BTST.B #0,1(A3) 00000c60 6718 BEQ $c7a 00000c62 0c2b00130003 CMPI.B #19,3(A3) 00000c68 6610 BNE $c7a 00000c6a 082b00000001 BTST.B #0,1(A3) 00000c70 67f8 BEQ $c6a 00000c72 0c2b00110003 CMPI.B #17,3(A3) 00000c78 66f0 BNE $c6a 00000c7a 17400003 MOVE.B D0,3(A3) 00000c7e 0c00000d CMPI.B #13,D0 00000c82 660e BNE $c92 00000c84 082b00030001 BTST.B #3,1(A3) 00000c8a 67f8 BEQ $c84 00000c8c 177c000a0003 MOVE.B #10,3(A3) 00000c92 265f MOVEA.L (A7)+,A3 00000c94 4e75 RTS 00000c96 2f0b MOVE.L A3,-(A7) 00000c98 267af81e MOVEA.L -2018(PC)!$4b8,A3 00000c9c 082b00030001 BTST.B #3,1(A3) 00000ca2 6700fff8 BEQ $c9c 00000ca6 17400003 MOVE.B D0,3(A3) 00000caa 265f MOVEA.L (A7)+,A3 00000cac 4e75 RTS 00000cae 2f0b MOVE.L A3,-(A7) 00000cb0 267af806 MOVEA.L -2042(PC)!$4b8,A3 00000cb4 610000be BSR $d74 00000cb8 082b00000001 BTST.B #0,1(A3) 00000cbe 67f8 BEQ $cb8 00000cc0 102b0003 MOVE.B 3(A3),D0 00000cc4 265f MOVEA.L (A7)+,A3 00000cc6 6100ff80 BSR $c48 00000cca 0c000061 CMPI.B #97,D0 00000cce 650a BCS $cda 00000cd0 0c00007a CMPI.B #122,D0 00000cd4 6204 BHI $cda 00000cd6 04000020 SUBI.B #32,D0 00000cda 4e75 RTS 00000cdc b000 CMP.B D0,D0 00000cde 265f MOVEA.L (A7)+,A3 00000ce0 4e75 RTS 00000ce2 7006 MOVEQ #6,D0 00000ce4 2f0b MOVE.L A3,-(A7) 00000ce6 267af7d0 MOVEA.L -2096(PC)!$4b8,A3 00000cea 610000a6 BSR $d92 00000cee 7009 MOVEQ #9,D0 00000cf0 48e72040 MOVEM.L D2/A1,-(A7) 00000cf4 2f0b MOVE.L A3,-(A7) 00000cf6 029700000020 ANDI.L #32,(A7) 00000cfc 224b MOVEA.L A3,A1 00000cfe 93df SUBA.L (A7)+,A1 00000d00 243c03130212 MOVE.L #51577362,D2 00000d06 223c0000001f MOVE.L #31,D1 00000d0c 08010003 BTST.L #3,D1 00000d10 6702 BEQ $d14 00000d12 4842 SWAP D2 00000d14 223c00000093 MOVE.L #147,D1 00000d1a 08010005 BTST.L #5,D1 00000d1e 6702 BEQ $d22 00000d20 e05a ROR.W #8,D2 00000d22 177c00100002 MOVE.B #16,2(A3) 00000d28 17420000 MOVE.B D2,0(A3) 00000d2c 741f MOVEQ #31,D2 00000d2e 223c0000001f MOVE.L #31,D1 00000d34 740f MOVEQ #15,D2 00000d36 17420000 MOVE.B D2,0(A3) 00000d3a 137c00f00004 MOVE.B #-16,4(A1) 00000d40 303c0001 MOVE.W #1,D0 00000d44 177b00440001 MOVE.B 70(PC,D0.W),1(A3) 00000d4a 742a MOVEQ #42,D2 00000d4c 08010004 BTST.L #4,D1 00000d50 6702 BEQ $d54 00000d52 7400 MOVEQ #0,D2 00000d54 13420005 MOVE.B D2,5(A1) 00000d58 137c00000005 MOVE.B #0,5(A1) 00000d5e 177c00050002 MOVE.B #5,2(A3) 00000d64 177c0001000e MOVE.B #1,14(A3) 00000d6a 4cdf0204 MOVEM.L (A7)+,D2/A1 00000d6e 265f MOVEA.L (A7)+,A3 00000d70 b000 CMP.B D0,D0 00000d72 4e75 RTS 00000d74 2f0b MOVE.L A3,-(A7) 00000d76 267af740 MOVEA.L -2240(PC)!$4b8,A3 00000d7a 177c00000005 MOVE.B #0,5(A3) 00000d80 177c00050002 MOVE.B #5,2(A3) 00000d86 265f MOVEA.L (A7)+,A3 00000d88 4e75 RTS 00000d8a ccbb9988 AND.L -118(PC,A1.L),D6 00000d8e 6655 DC.W #26197 00000d90 4411 NEG.B (A1) 00000d92 7007 MOVEQ #7,D0 00000d94 b7fc50000000 CMPA.L #1342177280,A3 00000d9a 6708 BEQ $da4 00000d9c b7fc50000008 CMPA.L #1342177288,A3 00000da2 6616 BNE $dba 00000da4 7008 MOVEQ #8,D0 00000da6 177c00200002 MOVE.B #32,2(A3) 00000dac e018 ROR.B #8,D0 00000dae e018 ROR.B #8,D0 00000db0 e018 ROR.B #8,D0 00000db2 177c00300002 MOVE.B #48,2(A3) 00000db8 4e75 RTS 00000dba 7007 MOVEQ #7,D0 00000dbc 584f ADDQ.W #4,A7 00000dbe 700e MOVEQ #14,D0 00000dc0 4267 CLR.W -(A7) 00000dc2 003c0001 ORI.B #1,CCR 00000dc6 4e77 RTR 00000dc8 2f0b MOVE.L A3,-(A7) 00000dca 267af6f0 MOVEA.L -2320(PC)!$4bc,A3 00000dce 6128 BSR $df8 00000dd0 6000feca BRA $c9c 00000dd4 2f0b MOVE.L A3,-(A7) 00000dd6 267af6e4 MOVEA.L -2332(PC)!$4bc,A3 00000dda 611c BSR $df8 00000ddc 082b00000001 BTST.B #0,1(A3) 00000de2 67f8 BEQ $ddc 00000de4 102b0003 MOVE.B 3(A3),D0 00000de8 265f MOVEA.L (A7)+,A3 00000dea 6000fede BRA $cca 00000dee 2f0b MOVE.L A3,-(A7) 00000df0 267af6ca MOVEA.L -2358(PC)!$4bc,A3 00000df4 6000fef4 BRA $cea 00000df8 267af6be MOVEA.L -2370(PC)!$4b8,A3 00000dfc 177c00000005 MOVE.B #0,5(A3) 00000e02 177c0005000a MOVE.B #5,10(A3) 00000e08 4e75 RTS 00000e0a 2f0b MOVE.L A3,-(A7) 00000e0c 267af6aa MOVEA.L -2390(PC)!$4b8,A3 00000e10 177c00080002 MOVE.B #8,2(A3) 00000e16 177c00000005 MOVE.B #0,5(A3) 00000e1c 265f MOVEA.L (A7)+,A3 00000e1e 4e75 RTS 00000e20 2f0b MOVE.L A3,-(A7) 00000e22 267af698 MOVEA.L -2408(PC)!$4bc,A3 00000e26 177c002a0002 MOVE.B #42,2(A3) 00000e2c 177c00300002 MOVE.B #48,2(A3) 00000e32 177c00400002 MOVE.B #64,2(A3) 00000e38 177c00100002 MOVE.B #16,2(A3) 00000e3e 177c00930000 MOVE.B #-109,0(A3) 00000e44 177c001f0000 MOVE.B #31,0(A3) 00000e4a 267af66c MOVEA.L -2452(PC)!$4b8,A3 00000e4e 177c00000005 MOVE.B #0,5(A3) 00000e54 265f MOVEA.L (A7)+,A3 00000e56 4e75 RTS 00000e58 207c00000004 MOVEA.L #4,A0 00000e5e 4a10 TST.B (A0) 00000e60 4a10 TST.B (A0) 00000e62 4a10 TST.B (A0) 00000e64 207c50000000 MOVEA.L #1342177280,A0 00000e6a 117c0040000e MOVE.B #64,14(A0) 00000e70 117c0020000f MOVE.B #32,15(A0) 00000e76 117c0000000d MOVE.B #0,13(A0) 00000e7c 43f950000000 LEA $50000000.L,A1 00000e82 137c00040006 MOVE.B #4,6(A1) 00000e88 137c00800007 MOVE.B #-128,7(A1) 00000e8e 41fa00a8 LEA 168(PC)!$f38,A0 00000e92 23c800000008 MOVE.L A0,$00000008.L 00000e98 267c40000000 MOVEA.L #1073741824,A3 00000e9e 4a13 TST.B (A3) 00000ea0 4a13 TST.B (A3) 00000ea2 4a13 TST.B (A3) 00000ea4 4a13 TST.B (A3) 00000ea6 16bc0001 MOVE.B #1,(A3) 00000eaa 1013 MOVE.B (A3),D0 00000eac 41fa00aa LEA 170(PC)!$f58,A0 00000eb0 23c800000008 MOVE.L A0,$00000008.L 00000eb6 267c300000c0 MOVEA.L #805306560,A3 00000ebc 4a13 TST.B (A3) 00000ebe 17790000009f0008 MOVE.B $0000009f.L,8(A3) 00000ec6 177c00d00000 MOVE.B #-48,0(A3) 00000ecc 70fa MOVEQ #-6,D0 00000ece 51c8fffe DBRA D0,ece 00000ed2 4a13 TST.B (A3) 00000ed4 7006 MOVEQ #6,D0 00000ed6 207af588 MOVEA.L -2680(PC)!$460,A0 00000eda 41e81000 LEA 4096(A0),A0 00000ede 23c800000000 MOVE.L A0,$00000000.L 00000ee4 41faf5ea LEA -2582(PC)!$4d0,A0 00000ee8 23c800000004 MOVE.L A0,$00000004.L 00000eee 6000f784 BRA $674 00000ef2 4e75 RTS 00000ef4 023c00fb DC.W #572,#251 00000ef8 4e75 RTS 00000efa 2f00 MOVE.L D0,-(A7) 00000efc 207c50000000 MOVEA.L #1342177280,A0 00000f02 10280001 MOVE.B 1(A0),D0 00000f06 02000004 ANDI.B #4,D0 00000f0a 67f6 BEQ $f02 00000f0c 1019 MOVE.B (A1)+,D0 00000f0e 6706 BEQ $f16 00000f10 11400003 MOVE.B D0,3(A0) 00000f14 60ec BRA $f02 00000f16 201f MOVE.L (A7)+,D0 00000f18 4e75 RTS 00000f1a 48e73080 MOVEM.L D2/D3/A0,-(A7) 00000f1e 207c50000000 MOVEA.L #1342177280,A0 00000f24 02000003 ANDI.B #3,D0 00000f28 e908 LSL.B #4,D0 00000f2a 1140000e MOVE.B D0,14(A0) 00000f2e 1140000f MOVE.B D0,15(A0) 00000f32 4cdf010c MOVEM.L (A7)+,D2/D3/A0 00000f36 4e75 RTS 00000f38 362f0006 MOVE.W 6(A7),D3 00000f3c 0803000c BTST.L #12,D3 00000f40 6700000c BEQ $f4e 00000f44 dffc0000005c ADDA.L #92,A7 00000f4a 6000ff60 BRA $eac 00000f4e dffc00000020 ADDA.L #32,A7 00000f54 6000ff56 BRA $eac 00000f58 362f0006 MOVE.W 6(A7),D3 00000f5c 0803000c BTST.L #12,D3 00000f60 6700000c BEQ $f6e 00000f64 dffc0000005c ADDA.L #92,A7 00000f6a 6000ff6a BRA $ed6 00000f6e dffc00000020 ADDA.L #32,A7 00000f74 6000ff60 BRA $ed6 00000f78 466c DC.W #18028 00000f7a 6f70 BLE $fec 00000f7c 7079 MOVEQ #121,D0 00000f7e 20736563 MOVEA.L 99(A3,D6.W),A0 00000f82 746f MOVEQ #111,D2 00000f84 7220 MOVEQ #32,D1 00000f86 7369 DC.W #29545 00000f88 7a65 MOVEQ #101,D5 00000f8a 203d DC.W #8253 00000f8c 2024 MOVE.L -(A4),D0 00000f8e 0000 DC.W #0 00000f90 244e MOVEA.L A6,A2 00000f92 357cffff0230 MOVE.W #-1,560(A2) 00000f98 157c00ff0246 MOVE.B #-1,582(A2) 00000f9e 40e7 MOVE.W SR,-(A7) 00000fa0 007c0700 ORI.W #1792,SR 00000fa4 103c001c MOVE.B #28,D0 00000fa8 0280000000ff ANDI.L #255,D0 00000fae 5540 SUBQ.W #2,D0 00000fb0 c0fc000a MULU.W #10,D0 00000fb4 35400220 MOVE.W D0,544(A2) 00000fb8 257500060214 MOVE.L 6(A5,D0.W),532(A2) 00000fbe 41fa01f2 LEA 498(PC)!$11b2,A0 00000fc2 2b880006 MOVE.L A0,6(A5,D0.W) 00000fc6 610000fc BSR $10c4 00000fca 650000e2 BCS $10ae 00000fce 46fc2300 MOVE.W #8960,SR 00000fd2 254a020c MOVE.L A2,524(A2) 00000fd6 48e7007e MOVEM.L A1-A6,-(A7) 00000fda 43fa0c8c LEA 3212(PC)!$1c68,A1 00000fde 92fc0080 SUBA.W #128,A1 00000fe2 7400 MOVEQ #0,D2 00000fe4 6100012e BSR $1114 00000fe8 48e7fffe MOVEM.L D0-D7/A0-A6,-(A7) 00000fec 4280 CLR.L D0 00000fee 302a0068 MOVE.W 104(A2),D0 00000ff2 6606 BNE $ffa 00000ff4 203c00000100 MOVE.L #256,D0 00000ffa 4cdf7fff MOVEM.L (A7)+,D0-D7/A0-A6 00000ffe 4cdf7e00 MOVEM.L (A7)+,A1-A6 00001002 650000aa BCS $10ae 00001006 7000 MOVEQ #0,D0 00001008 302a0018 MOVE.W 24(A2),D0 0000100c 67000094 BEQ $10a2 00001010 282a0204 MOVE.L 516(A2),D4 00001014 5344 SUBQ.W #1,D4 00001016 d044 ADD.W D4,D0 00001018 4644 NOT.W D4 0000101a c044 AND.W D4,D0 0000101c 2600 MOVE.L D0,D3 0000101e 4644 NOT.W D4 00001020 e28c LSR.L #1,D4 00001022 6404 BCC $1028 00001024 e28b LSR.L #1,D3 00001026 60f8 BRA $1020 00001028 48e7fffe MOVEM.L D0-D7/A0-A6,-(A7) 0000102c 2003 MOVE.L D3,D0 0000102e 4cdf7fff MOVEM.L (A7)+,D0-D7/A0-A6 00001032 25400218 MOVE.L D0,536(A2) 00001036 48e78020 MOVEM.L D0/A2,-(A7) 0000103a 4ea9000c JSR 12(A1) 0000103e 4cdf0201 MOVEM.L (A7)+,D0/A1 00001042 656a BCS $10ae 00001044 c34a EXG A1,A2 00001046 2549020c MOVE.L A1,524(A2) 0000104a 2549021c MOVE.L A1,540(A2) 0000104e 242a0014 MOVE.L 20(A2),D2 00001052 028200ffffff ANDI.L #16777215,D2 00001058 5343 SUBQ.W #1,D3 0000105a 48e7302e MOVEM.L D2/D3/A2/A4-A6,-(A7) 0000105e 43fa0c08 LEA 3080(PC)!$1c68,A1 00001062 92fc0080 SUBA.W #128,A1 00001066 610000ac BSR $1114 0000106a 4cdf740c MOVEM.L (A7)+,D2/D3/A2/A4-A6 0000106e 653e BCS $10ae 00001070 5282 ADDQ.L #1,D2 00001072 206a020c MOVEA.L 524(A2),A0 00001076 d1ea0204 ADDA.L 516(A2),A0 0000107a 2548020c MOVE.L A0,524(A2) 0000107e 51cbffda DBRA D3,105a 00001082 7200 MOVEQ #0,D1 00001084 007c0700 ORI.W #1792,SR 00001088 302a0220 MOVE.W 544(A2),D0 0000108c 2baa02140006 MOVE.L 532(A2),6(A5,D0.W) 00001092 46df MOVE.W (A7)+,SR 00001094 265f MOVEA.L (A7)+,A3 00001096 2f2a0218 MOVE.L 536(A2),-(A7) 0000109a 206a021c MOVEA.L 540(A2),A0 0000109e 2f08 MOVE.L A0,-(A7) 000010a0 4ed3 JMP (A3) 000010a2 41faf595 LEA -2667(PC)!$639,A0 000010a6 6100fa62 BSR $b0a 000010aa 323c00f0 MOVE.W #240,D1 000010ae 007c0700 ORI.W #1792,SR 000010b2 302a0220 MOVE.W 544(A2),D0 000010b6 2baa02140006 MOVE.L 532(A2),6(A5,D0.W) 000010bc 46df MOVE.W (A7)+,SR 000010be 003c0001 ORI.B #1,CCR 000010c2 4e75 RTS 000010c4 257c000001000204 MOVE.L #256,516(A2) 000010cc 267c300000c0 MOVEA.L #805306560,A3 000010d2 177c00d00000 MOVE.B #-48,0(A3) 000010d8 08ea0000022b BSET.B #0,555(A2) 000010de 08ea0001022b BSET.B #1,555(A2) 000010e4 08ea0002022b BSET.B #2,555(A2) 000010ea 08ea0003022b BSET.B #3,555(A2) 000010f0 08ea0004022b BSET.B #4,555(A2) 000010f6 08aa0005022b BCLR.B #5,555(A2) 000010fc 08aa0006022b BCLR.B #6,555(A2) 00001102 08aa0007022b BCLR.B #7,555(A2) 00001108 102b0000 MOVE.B 0(A3),D0 0000110c 176a022b0008 MOVE.B 555(A2),8(A3) 00001112 4e75 RTS 00001114 3e3c4924 MOVE.W #18724,D7 00001118 15690098022c MOVE.B 152(A1),556(A2) 0000111e 6606 BNE $1126 00001120 157c0001022c MOVE.B #1,556(A2) 00001126 610000ba BSR $11e2 0000112a 6538 BCS $1164 0000112c 4aaa0208 TST.L 520(A2) 00001130 6638 BNE $116a 00001132 6136 BSR $116a 00001134 652e BCS $1164 00001136 206a020c MOVEA.L 524(A2),A0 0000113a 303c0014 MOVE.W #20,D0 0000113e 1bb000000000 MOVE.B 0(A0,D0.W),0(A5,D0.W) 00001144 51c8fff8 DBRA D0,113e 00001148 082d00000010 BTST.B #0,16(A5) 0000114e 6708 BEQ $1158 00001150 0c2900020088 CMPI.B #2,136(A1) 00001156 6504 BCS $115c 00001158 7200 MOVEQ #0,D1 0000115a 4e75 RTS 0000115c 323c00f9 MOVE.W #249,D1 00001160 003c0001 ORI.B #1,CCR 00001164 4e75 RTS 00001166 61000332 BSR $149a 0000116a 610001a2 BSR $130e 0000116e 6126 BSR $1196 00001170 64f2 BCC $1164 00001172 0c4100f6 CMPI.W #246,D1 00001176 67e8 BEQ $1160 00001178 532a022c SUBQ.B #1,556(A2) 0000117c 67e2 BEQ $1160 0000117e e24f LSR.W #1,D7 00001180 64ec BCC $116e 00001182 0c4100f7 CMPI.W #247,D1 00001186 66de BNE $1166 00001188 0c2a0003022d CMPI.B #3,557(A2) 0000118e 67d6 BEQ $1166 00001190 522a022d ADDQ.B #1,557(A2) 00001194 60d0 BRA $1166 00001196 2a3c00000100 MOVE.L #256,D5 0000119c 7c81 MOVEQ #-127,D6 0000119e 61000032 BSR $11d2 000011a2 7c88 MOVEQ #-120,D6 000011a4 610001e8 BSR $138e 000011a8 61000032 BSR $11dc 000011ac 749c MOVEQ #-100,D2 000011ae 600002a6 BRA $1456 000011b2 48e7c010 MOVEM.L D0/D1/A3,-(A7) 000011b6 267c300000c0 MOVEA.L #805306560,A3 000011bc 102b0000 MOVE.B 0(A3),D0 000011c0 15400224 MOVE.B D0,548(A2) 000011c4 422a022e CLR.B 558(A2) 000011c8 4cdf0803 MOVEM.L (A7)+,D0/D1/A3 000011cc 4fef0004 LEA 4(A7),A7 000011d0 4e73 RTE 000011d2 1546022a MOVE.B D6,554(A2) 000011d6 35450228 MOVE.W D5,552(A2) 000011da 4e75 RTS 000011dc 422a022a CLR.B 554(A2) 000011e0 4e75 RTS 000011e2 25420208 MOVE.L D2,520(A2) 000011e6 267c300000c0 MOVEA.L #805306560,A3 000011ec 4bea0230 LEA 560(A2),A5 000011f0 10290081 MOVE.B 129(A1),D0 000011f4 15690082022d MOVE.B 130(A1),557(A2) 000011fa 022a0003022d ANDI.B #3,557(A2) 00001200 7400 MOVEQ #0,D2 00001202 1400 MOVE.B D0,D2 00001204 7001 MOVEQ #1,D0 00001206 e5a8 LSL.L D2,D0 00001208 0a00000f EORI.B #15,D0 0000120c 022a00f0022b ANDI.B #-16,555(A2) 00001212 812a022b OR.B D0,555(A2) 00001216 08ea0004022b BSET.B #4,555(A2) 0000121c 176a022b0008 MOVE.B 555(A2),8(A3) 00001222 157c00000225 MOVE.B #0,549(A2) 00001228 082b00070000 BTST.B #7,0(A3) 0000122e 6742 BEQ $1272 00001230 422a0226 CLR.B 550(A2) 00001234 176b00010003 MOVE.B 1(A3),3(A3) 0000123a 7c18 MOVEQ #24,D6 0000123c 8c2a022d OR.B 557(A2),D6 00001240 61000154 BSR $1396 00001244 257c000000640210 MOVE.L #100,528(A2) 0000124c 7cd1 MOVEQ #-47,D6 0000124e 61000146 BSR $1396 00001252 08000007 BTST.L #7,D0 00001256 6700001a BEQ $1272 0000125a 1f00 MOVE.B D0,-(A7) 0000125c 176b00010003 MOVE.B 1(A3),3(A3) 00001262 7c10 MOVEQ #16,D6 00001264 8c2a022d OR.B 557(A2),D6 00001268 6100012c BSR $1396 0000126c 101f MOVE.B (A7)+,D0 0000126e 60000218 BRA $1488 00001272 0c2d00ff0016 CMPI.B #-1,22(A5) 00001278 6608 BNE $1282 0000127a 422a0226 CLR.B 550(A2) 0000127e 6100021a BSR $149a 00001282 242a0208 MOVE.L 520(A2),D2 00001286 202d0000 MOVE.L 0(A5),D0 0000128a e088 LSR.L #8,D0 0000128c b082 CMP.L D2,D0 0000128e 630000f4 BLS $1384 00001292 7000 MOVEQ #0,D0 00001294 15400222 MOVE.B D0,546(A2) 00001298 3029008c MOVE.W 140(A1),D0 0000129c b082 CMP.L D2,D0 0000129e 622e BHI $12ce 000012a0 9480 SUB.L D0,D2 000012a2 670a BEQ $12ae 000012a4 102d0003 MOVE.B 3(A5),D0 000012a8 670000da BEQ $1384 000012ac 84c0 DIVU.W D0,D2 000012ae 5242 ADDQ.W #1,D2 000012b0 082d00000010 BTST.B #0,16(A5) 000012b6 6710 BEQ $12c8 000012b8 e24a LSR.W #1,D2 000012ba 640c BCC $12c8 000012bc 157c00020225 MOVE.B #2,549(A2) 000012c2 08aa0004022b BCLR.B #4,555(A2) 000012c8 15420222 MOVE.B D2,546(A2) 000012cc 4842 SWAP D2 000012ce d4290093 ADD.B 147(A1),D2 000012d2 15420223 MOVE.B D2,547(A2) 000012d6 10290092 MOVE.B 146(A1),D0 000012da d12a0222 ADD.B D0,546(A2) 000012de 082900050083 BTST.B #5,131(A1) 000012e4 6612 BNE $12f8 000012e6 242a0208 MOVE.L 520(A2),D2 000012ea b469008c CMP.W 140(A1),D2 000012ee 6510 BCS $1300 000012f0 082d00010010 BTST.B #1,16(A5) 000012f6 6708 BEQ $1300 000012f8 08aa0005022b BCLR.B #5,555(A2) 000012fe 6006 BRA $1306 00001300 08ea0005022b BSET.B #5,555(A2) 00001306 176a022b0008 MOVE.B 555(A2),8(A3) 0000130c 4e75 RTS 0000130e 102a0223 MOVE.B 547(A2),D0 00001312 17400002 MOVE.B D0,2(A3) 00001316 6162 BSR $137a 00001318 b02b0002 CMP.B 2(A3),D0 0000131c 66f4 BNE $1312 0000131e 122d0016 MOVE.B 22(A5),D1 00001322 102a0222 MOVE.B 546(A2),D0 00001326 b001 CMP.B D1,D0 00001328 674a BEQ $1374 0000132a 082900010084 BTST.B #1,132(A1) 00001330 670c BEQ $133e 00001332 082d00020010 BTST.B #2,16(A5) 00001338 6604 BNE $133e 0000133a e308 LSL.B #1,D0 0000133c e309 LSL.B #1,D1 0000133e 17400003 MOVE.B D0,3(A3) 00001342 17410001 MOVE.B D1,1(A3) 00001346 7c18 MOVEQ #24,D6 00001348 8c2a022d OR.B 557(A2),D6 0000134c 08ea0006022b BSET.B #6,555(A2) 00001352 176a022b0008 MOVE.B 555(A2),8(A3) 00001358 613c BSR $1396 0000135a 08aa0006022b BCLR.B #6,555(A2) 00001360 176a022b0008 MOVE.B 555(A2),8(A3) 00001366 157c00040226 MOVE.B #4,550(A2) 0000136c 102a0222 MOVE.B 546(A2),D0 00001370 1b400016 MOVE.B D0,22(A5) 00001374 17400001 MOVE.B D0,1(A3) 00001378 4e75 RTS 0000137a 323c00f0 MOVE.W #240,D1 0000137e 003c0001 ORI.B #1,CCR 00001382 4e75 RTS 00001384 323c00f1 MOVE.W #241,D1 00001388 003c0001 ORI.B #1,CCR 0000138c 4e75 RTS 0000138e 8c2a0225 OR.B 549(A2),D6 00001392 8c2a0226 OR.B 550(A2),D6 00001396 082a0000022a BTST.B #0,554(A2) 0000139c 6708 BEQ $13a6 0000139e 61000046 BSR $13e6 000013a2 60000038 BRA $13dc 000013a6 157c0001022e MOVE.B #1,558(A2) 000013ac 17460000 MOVE.B D6,0(A3) 000013b0 203c000000c8 MOVE.L #200,D0 000013b6 223c00001450 MOVE.L #5200,D1 000013bc 4a2a022e TST.B 558(A2) 000013c0 671a BEQ $13dc 000013c2 51c9fff8 DBRA D1,13bc 000013c6 51c8ffee DBRA D0,13b6 000013ca 177c00d00000 MOVE.B #-48,0(A3) 000013d0 7017 MOVEQ #23,D0 000013d2 51c8fffe DBRA D0,13d2 000013d6 157c00800224 MOVE.B #-128,548(A2) 000013dc 422a0226 CLR.B 550(A2) 000013e0 102a0224 MOVE.B 548(A2),D0 000013e4 4e75 RTS 000013e6 206a020c MOVEA.L 524(A2),A0 000013ea 243c00030d40 MOVE.L #200000,D2 000013f0 48e7180c MOVEM.L D3/D4/A4/A5,-(A7) 000013f4 40e7 MOVE.W SR,-(A7) 000013f6 007c0700 ORI.W #1792,SR 000013fa 7801 MOVEQ #1,D4 000013fc 7600 MOVEQ #0,D3 000013fe 4beb0003 LEA 3(A3),A5 00001402 17460000 MOVE.B D6,0(A3) 00001406 700f MOVEQ #15,D0 00001408 51c8fffe DBRA D0,1408 0000140c 0913 BTST.B D4,(A3) 0000140e 662c BNE $143c 00001410 5382 SUBQ.L #1,D2 00001412 66f8 BNE $140c 00001414 082a0007022a BTST.B #7,554(A2) 0000141a 660c BNE $1428 0000141c 102b0000 MOVE.B 0(A3),D0 00001420 08000006 BTST.L #6,D0 00001424 66000024 BNE $144a 00001428 177c00d00000 MOVE.B #-48,0(A3) 0000142e 46df MOVE.W (A7)+,SR 00001430 4cdf3018 MOVEM.L (A7)+,D3/D4/A4/A5 00001434 157c00800224 MOVE.B #-128,548(A2) 0000143a 4e75 RTS 0000143c 10d5 MOVE.B (A5),(A0)+ 0000143e 0913 BTST.B D4,(A3) 00001440 66fa BNE $143c 00001442 0713 BTST.B D3,(A3) 00001444 66f8 BNE $143e 00001446 102b0000 MOVE.B 0(A3),D0 0000144a 15400224 MOVE.B D0,548(A2) 0000144e 46df MOVE.W (A7)+,SR 00001450 4cdf3018 MOVEM.L (A7)+,D3/D4/A4/A5 00001454 4e75 RTS 00001456 c002 AND.B D2,D0 00001458 6736 BEQ $1490 0000145a 323c00f3 MOVE.W #243,D1 0000145e 08000003 BTST.L #3,D0 00001462 6628 BNE $148c 00001464 323c00f7 MOVE.W #247,D1 00001468 08000004 BTST.L #4,D0 0000146c 661e BNE $148c 0000146e 323c00f4 MOVE.W #244,D1 00001472 08020006 BTST.L #6,D2 00001476 670a BEQ $1482 00001478 323c00f2 MOVE.W #242,D1 0000147c 08000006 BTST.L #6,D0 00001480 660a BNE $148c 00001482 08000002 BTST.L #2,D0 00001486 6604 BNE $148c 00001488 323c00f6 MOVE.W #246,D1 0000148c 003c0001 ORI.B #1,CCR 00001490 4e75 RTS 00001492 7400 MOVEQ #0,D2 00001494 6100fd4c BSR $11e2 00001498 6538 BCS $14d2 0000149a 1b7c00000016 MOVE.B #0,22(A5) 000014a0 7e02 MOVEQ #2,D7 000014a2 7c48 MOVEQ #72,D6 000014a4 6106 BSR $14ac 000014a6 51cffffa DBRA D7,14a2 000014aa 7c08 MOVEQ #8,D6 000014ac 8c2a022d OR.B 557(A2),D6 000014b0 08ea0006022b BSET.B #6,555(A2) 000014b6 176a022b0008 MOVE.B 555(A2),8(A3) 000014bc 6100fed8 BSR $1396 000014c0 08aa0006022b BCLR.B #6,555(A2) 000014c6 176a022b0008 MOVE.B 555(A2),8(A3) 000014cc 157c00040226 MOVE.B #4,550(A2) 000014d2 4e75 RTS 000014d4 244e MOVEA.L A6,A2 000014d6 357cffff0306 MOVE.W #-1,774(A2) 000014dc 157c00ff031c MOVE.B #-1,796(A2) 000014e2 61000224 BSR $1708 000014e6 650000c4 BCS $15ac 000014ea 254a032e MOVE.L A2,814(A2) 000014ee 48e7007e MOVEM.L A1-A6,-(A7) 000014f2 43fa0774 LEA 1908(PC)!$1c68,A1 000014f6 92fc0080 SUBA.W #128,A1 000014fa 7400 MOVEQ #0,D2 000014fc 6100031a BSR $1818 00001500 4cdf7e00 MOVEM.L (A7)+,A1-A6 00001504 650000a6 BCS $15ac 00001508 7000 MOVEQ #0,D0 0000150a 302a0018 MOVE.W 24(A2),D0 0000150e 67000090 BEQ $15a0 00001512 282a032a MOVE.L 810(A2),D4 00001516 5344 SUBQ.W #1,D4 00001518 d044 ADD.W D4,D0 0000151a 4644 NOT.W D4 0000151c c044 AND.W D4,D0 0000151e 2600 MOVE.L D0,D3 00001520 4644 NOT.W D4 00001522 e28c LSR.L #1,D4 00001524 6404 BCC $152a 00001526 e28b LSR.L #1,D3 00001528 60f8 BRA $1522 0000152a 48e7fffe MOVEM.L D0-D7/A0-A6,-(A7) 0000152e 2003 MOVE.L D3,D0 00001530 4cdf7fff MOVEM.L (A7)+,D0-D7/A0-A6 00001534 25400336 MOVE.L D0,822(A2) 00001538 48e78020 MOVEM.L D0/A2,-(A7) 0000153c 4ea9000c JSR 12(A1) 00001540 4cdf0201 MOVEM.L (A7)+,D0/A1 00001544 6566 BCS $15ac 00001546 c34a EXG A1,A2 00001548 2549032e MOVE.L A1,814(A2) 0000154c 2549033a MOVE.L A1,826(A2) 00001550 242a0014 MOVE.L 20(A2),D2 00001554 028200ffffff ANDI.L #16777215,D2 0000155a 5343 SUBQ.W #1,D3 0000155c 48e7302e MOVEM.L D2/D3/A2/A4-A6,-(A7) 00001560 2f02 MOVE.L D2,-(A7) 00001562 343c0040 MOVE.W #64,D2 00001566 51cafffe DBRA D2,1566 0000156a 241f MOVE.L (A7)+,D2 0000156c 43fa06fa LEA 1786(PC)!$1c68,A1 00001570 92fc0080 SUBA.W #128,A1 00001574 610002a2 BSR $1818 00001578 4cdf740c MOVEM.L (A7)+,D2/D3/A2/A4-A6 0000157c 652e BCS $15ac 0000157e 5282 ADDQ.L #1,D2 00001580 206a032e MOVEA.L 814(A2),A0 00001584 d1ea032a ADDA.L 810(A2),A0 00001588 2548032e MOVE.L A0,814(A2) 0000158c 51cbffce DBRA D3,155c 00001590 7200 MOVEQ #0,D1 00001592 265f MOVEA.L (A7)+,A3 00001594 2f2a0336 MOVE.L 822(A2),-(A7) 00001598 206a033a MOVEA.L 826(A2),A0 0000159c 2f08 MOVE.L A0,-(A7) 0000159e 4ed3 JMP (A3) 000015a0 41faf097 LEA -3945(PC)!$639,A0 000015a4 6100f564 BSR $b0a 000015a8 323c00f0 MOVE.W #240,D1 000015ac 003c0001 ORI.B #1,CCR 000015b0 4e75 RTS 000015b2 4861 DC.W #18529 000015b4 7264 MOVEQ #100,D1 000015b6 2064 MOVEA.L -(A4),A0 000015b8 6973 DC.W #26995 000015ba 6b20 BMI $15dc 000015bc 426c6f63 CLR.W 28515(A4) 000015c0 6b20 BMI $15e2 000015c2 53697a65 SUBQ.W #1,31333(A1) 000015c6 203d DC.W #8253 000015c8 2024 MOVE.L -(A4),D0 000015ca 00426f6f ORI.W #28527,D2 000015ce 7420 MOVEQ #32,D2 000015d0 53697a65 SUBQ.W #1,31333(A1) 000015d4 2020 MOVE.L -(A0),D0 000015d6 2020 MOVE.L -(A0),D0 000015d8 2020 MOVE.L -(A0),D0 000015da 2020 MOVE.L -(A0),D0 000015dc 2020 MOVE.L -(A0),D0 000015de 2020 MOVE.L -(A0),D0 000015e0 3d20 MOVE.W -(A0),-(A6) 000015e2 2400 MOVE.L D0,D2 000015e4 5365 SUBQ.W #1,-(A5) 000015e6 6374 BLS $165c 000015e8 6f72 BLE $165c 000015ea 2043 MOVEA.L D3,A0 000015ec 6f75 DC.W #28533 000015ee 6e74 BGT $1664 000015f0 2020 MOVE.L -(A0),D0 000015f2 2020 MOVE.L -(A0),D0 000015f4 2020 MOVE.L -(A0),D0 000015f6 2020 MOVE.L -(A0),D0 000015f8 203d DC.W #8253 000015fa 2024 MOVE.L -(A4),D0 000015fc 00534353 ORI.W #17235,(A3) 00001600 493a DC.W #18746 00001602 2057 MOVEA.L (A7),A0 00001604 6169 DC.W #24937 00001606 7469 MOVEQ #105,D2 00001608 6e672074 DC.W #28263,#8308 0000160c 6f20 BLE $162e 0000160e 5365 SUBQ.W #1,-(A5) 00001610 6c65 DC.W #27749 00001612 6374 BLS $1688 00001614 00534353 ORI.W #17235,(A3) 00001618 493a DC.W #18746 0000161a 204e MOVEA.L A6,A0 0000161c 6f74 BLE $1692 0000161e 2052 MOVEA.L (A2),A0 00001620 65616479 DC.W #25953,#25721 00001624 00534353 ORI.W #17235,(A3) 00001628 493a DC.W #18746 0000162a 204d MOVEA.L A5,A0 0000162c 6564 BCS $1692 0000162e 6961 DC.W #26977 00001630 2044 MOVEA.L D4,A0 00001632 6566 BCS $169a 00001634 6563 DC.W #25955 00001636 7420 MOVEQ #32,D2 00001638 2020 MOVE.L -(A0),D0 0000163a 20286b65 MOVE.L 27493(A0),D0 0000163e 7920 DC.W #31008 00001640 33290053 MOVE.W 83(A1),-(A1) 00001644 4353493a DC.W #17235,#18746 00001648 2048 MOVEA.L A0,A0 0000164a 6172 BSR $16be 0000164c 6477 DC.W #25719 0000164e 6172 BSR $16c2 00001650 6520 BCS $1672 00001652 4572 DC.W #17778 00001654 726f MOVEQ #111,D1 00001656 7220 MOVEQ #32,D1 00001658 20286b65 MOVE.L 27493(A0),D0 0000165c 7920 DC.W #31008 0000165e 34290053 MOVE.W 83(A1),D2 00001662 4353 DC.W #17235 00001664 493a DC.W #18746 00001666 2049 MOVEA.L A1,A0 00001668 6c6c BGE $16d6 0000166a 6567 DC.W #25959 0000166c 616c BSR $16da 0000166e 2052 MOVEA.L (A2),A0 00001670 6571 DC.W #25969 00001672 75657374 DC.W #30053,#29556 00001676 20286b65 MOVE.L 27493(A0),D0 0000167a 7920 DC.W #31008 0000167c 35290053 MOVE.W 83(A1),-(A2) 00001680 4353493a DC.W #17235,#18746 00001684 2055 MOVEA.L (A5),A0 00001686 6e69 DC.W #28265 00001688 7420 MOVEQ #32,D2 0000168a 4174 DC.W #16756 0000168c 7465 MOVEQ #101,D2 0000168e 6e74 BGT $1704 00001690 696f DC.W #26991 00001692 6e20 BGT $16b4 00001694 20286b65 MOVE.L 27493(A0),D0 00001698 7920 DC.W #31008 0000169a 36290053 MOVE.W 83(A1),D3 0000169e 4353493a DC.W #17235,#18746 000016a2 2052 MOVEA.L (A2),A0 000016a4 6561 DC.W #25953 000016a6 6420 BCC $16c8 000016a8 4572 DC.W #17778 000016aa 726f MOVEQ #111,D1 000016ac 7200 MOVEQ #0,D1 000016ae 5343 SUBQ.W #1,D3 000016b0 5349 SUBQ.W #1,A1 000016b2 3a20 MOVE.W -(A0),D5 000016b4 47656e65 DC.W #18277,#28261 000016b8 7261 MOVEQ #97,D1 000016ba 6c20 BGE $16dc 000016bc 4572 DC.W #17778 000016be 726f MOVEQ #111,D1 000016c0 7200 MOVEQ #0,D1 000016c2 5343 SUBQ.W #1,D3 000016c4 5349 SUBQ.W #1,A1 000016c6 3a20 MOVE.W -(A0),D5 000016c8 57726974 SUBQ.W #3,116(A2,D6.L) 000016cc 6520 BCS $16ee 000016ce 4572 DC.W #17778 000016d0 726f MOVEQ #111,D1 000016d2 7200 MOVEQ #0,D1 000016d4 5343 SUBQ.W #1,D3 000016d6 5349 SUBQ.W #1,A1 000016d8 3a20 MOVE.W -(A0),D5 000016da 4e6f MOVE.L USP,A7 000016dc 7420 MOVEQ #32,D2 000016de 5265 ADDQ.W #1,-(A5) 000016e0 6164 BSR $1746 000016e2 7928 DC.W #31016 000016e4 48292045 NBCD 8261(A1) 000016e8 7272 MOVEQ #114,D1 000016ea 6f72 BLE $175e 000016ec 00534353 ORI.W #17235,(A3) 000016f0 493a DC.W #18746 000016f2 2042 MOVEA.L D2,A0 000016f4 6c6f636b DC.W #27759,#25451 000016f8 2053 MOVEA.L (A3),A0 000016fa 697a BVS $1776 000016fc 6520 BCS $171e 000016fe 6e6f DC.W #28271 00001700 7420 MOVEQ #32,D2 00001702 666f DC.W #26223 00001704 756e6400 DC.W #30062,#25600 00001708 7005 MOVEQ #5,D0 0000170a 41ea0300 LEA 768(A2),A0 0000170e 4218 CLR.B (A0)+ 00001710 51c8fffc DBRA D0,170e 00001714 267c300000f0 MOVEA.L #805306608,A3 0000171a 610001b4 BSR $18d0 0000171e 357c0003034e MOVE.W #3,846(A2) 00001724 6000000a BRA $1730 00001728 303c1800 MOVE.W #6144,D0 0000172c 610001b2 BSR $18e0 00001730 6100002c BSR $175e 00001734 6400000c BCC $1742 00001738 532a034e SUBQ.B #1,846(A2) 0000173c 66ea BNE $1728 0000173e 6000000e BRA $174e 00001742 6146 BSR $178a 00001744 640e BCC $1754 00001746 41faffa5 LEA -91(PC)!$16ed,A0 0000174a 6100f3be BSR $b0a 0000174e 003c0001 ORI.B #1,CCR 00001752 4e75 RTS 00001754 303c4000 MOVE.W #16384,D0 00001758 51c8fffe DBRA D0,1758 0000175c 4e75 RTS 0000175e 1c3c0000 MOVE.B #0,D6 00001762 6100018a BSR $18ee 00001766 6516 BCS $177e 00001768 6100027e BSR $19e8 0000176c 64000016 BCC $1784 00001770 610003b2 BSR $1b24 00001774 6508 BCS $177e 00001776 102a0343 MOVE.B 835(A2),D0 0000177a 67000008 BEQ $1784 0000177e 003c0001 ORI.B #1,CCR 00001782 4e75 RTS 00001784 023c00fe DC.W #572,#254 00001788 4e75 RTS 0000178a 157c00ff0304 MOVE.B #-1,772(A2) 00001790 1c3c001a MOVE.B #26,D6 00001794 157c00030302 MOVE.B #3,770(A2) 0000179a 61000152 BSR $18ee 0000179e 65000072 BCS $1812 000017a2 41ea0200 LEA 512(A2),A0 000017a6 61000364 BSR $1b0c 000017aa 102b0004 MOVE.B 4(A3),D0 000017ae e408 LSR.B #2,D0 000017b0 02000007 ANDI.B #7,D0 000017b4 0c000001 CMPI.B #1,D0 000017b8 6600000c BNE $17c6 000017bc 610001fe BSR $19bc 000017c0 10c1 MOVE.B D1,(A0)+ 000017c2 6000ffe2 BRA $17a6 000017c6 0c000003 CMPI.B #3,D0 000017ca 6614 BNE $17e0 000017cc 610001ee BSR $19bc 000017d0 1401 MOVE.B D1,D2 000017d2 61000338 BSR $1b0c 000017d6 102b0004 MOVE.B 4(A3),D0 000017da e408 LSR.B #2,D0 000017dc 02000007 ANDI.B #7,D0 000017e0 0c000007 CMPI.B #7,D0 000017e4 610001d6 BSR $19bc 000017e8 4a02 TST.B D2 000017ea 661a BNE $1806 000017ec 41ea0200 LEA 512(A2),A0 000017f0 2010 MOVE.L (A0),D0 000017f2 0280000000ff ANDI.L #255,D0 000017f8 d1c0 ADDA.L D0,A0 000017fa 4280 CLR.L D0 000017fc 30280010 MOVE.W 16(A0),D0 00001800 2540032a MOVE.L D0,810(A2) 00001804 6010 BRA $1816 00001806 6100031c BSR $1b24 0000180a 6506 BCS $1812 0000180c 102a0343 MOVE.B 835(A2),D0 00001810 6704 BEQ $1816 00001812 003c0001 ORI.B #1,CCR 00001816 4e75 RTS 00001818 267c300000f0 MOVEA.L #805306608,A3 0000181e 2e02 MOVE.L D2,D7 00001820 15420303 MOVE.B D2,771(A2) 00001824 e08a LSR.L #8,D2 00001826 15420302 MOVE.B D2,770(A2) 0000182a e08a LSR.L #8,D2 0000182c 15420301 MOVE.B D2,769(A2) 00001830 157c00010304 MOVE.B #1,772(A2) 00001836 1c3c0008 MOVE.B #8,D6 0000183a 610000b2 BSR $18ee 0000183e 65000058 BCS $1898 00001842 610002c8 BSR $1b0c 00001846 102b0004 MOVE.B 4(A3),D0 0000184a e408 LSR.B #2,D0 0000184c 02000007 ANDI.B #7,D0 00001850 0c000001 CMPI.B #1,D0 00001854 6616 BNE $186c 00001856 206a032e MOVEA.L 814(A2),A0 0000185a 610000d2 BSR $192e 0000185e 610002ac BSR $1b0c 00001862 102b0004 MOVE.B 4(A3),D0 00001866 e408 LSR.B #2,D0 00001868 02000007 ANDI.B #7,D0 0000186c 0c000003 CMPI.B #3,D0 00001870 66fa BNE $186c 00001872 61000174 BSR $19e8 00001876 6520 BCS $1898 00001878 4a87 TST.L D7 0000187a 6616 BNE $1892 0000187c 41ea0306 LEA 774(A2),A0 00001880 2a6a032e MOVEA.L 814(A2),A5 00001884 323c0014 MOVE.W #20,D1 00001888 11b510001000 MOVE.B 0(A5,D1.W),0(A0,D1.W) 0000188e 51c9fff8 DBRA D1,1888 00001892 023c00fe DC.W #572,#254 00001896 4e75 RTS 00001898 003c0001 ORI.B #1,CCR 0000189c 4e75 RTS 0000189e 266a0000 MOVEA.L 0(A2),A3 000018a2 0c400003 CMPI.W #3,D0 000018a6 6700000c BEQ $18b4 000018aa 323c00d0 MOVE.W #208,D1 000018ae 003c0001 ORI.B #1,CCR 000018b2 4e75 RTS 000018b4 4281 CLR.L D1 000018b6 4e75 RTS 000018b8 177c00800001 MOVE.B #-128,1(A3) 000018be 7028 MOVEQ #40,D0 000018c0 51c8fffe DBRA D0,18c0 000018c4 177c00000001 MOVE.B #0,1(A3) 000018ca 4a2b0007 TST.B 7(A3) 000018ce 4e75 RTS 000018d0 203c0000ffff MOVE.L #65535,D0 000018d6 61000008 BSR $18e0 000018da 203c000000ff MOVE.L #255,D0 000018e0 48e7fefe MOVEM.L D0-D6/A0-A6,-(A7) 000018e4 4cdf7f7f MOVEM.L (A7)+,D0-D6/A0-A6 000018e8 51c8fff6 DBRA D0,18e0 000018ec 4e75 RTS 000018ee 41ea0300 LEA 768(A2),A0 000018f2 1086 MOVE.B D6,(A0) 000018f4 61000114 BSR $1a0a 000018f8 652c BCS $1926 000018fa 61000210 BSR $1b0c 000018fe 102b0004 MOVE.B 4(A3),D0 00001902 e408 LSR.B #2,D0 00001904 02000007 ANDI.B #7,D0 00001908 0c000002 CMPI.B #2,D0 0000190c 661a BNE $1928 0000190e 7005 MOVEQ #5,D0 00001910 1218 MOVE.B (A0)+,D1 00001912 61000068 BSR $197c 00001916 51c8fff8 DBRA D0,1910 0000191a 41ea0300 LEA 768(A2),A0 0000191e 7005 MOVEQ #5,D0 00001920 4218 CLR.B (A0)+ 00001922 51c8fffc DBRA D0,1920 00001926 4e75 RTS 00001928 003c0001 ORI.B #1,CCR 0000192c 4e75 RTS 0000192e 48e70060 MOVEM.L A1/A2,-(A7) 00001932 610001d8 BSR $1b0c 00001936 177c00010003 MOVE.B #1,3(A3) 0000193c 082b00030005 BTST.B #3,5(A3) 00001942 6732 BEQ $1976 00001944 177c00020002 MOVE.B #2,2(A3) 0000194a 177c00000007 MOVE.B #0,7(A3) 00001950 262a032a MOVE.L 810(A2),D3 00001954 102b0005 MOVE.B 5(A3),D0 00001958 08000004 BTST.L #4,D0 0000195c 660e BNE $196c 0000195e 08000006 BTST.L #6,D0 00001962 67f0 BEQ $1954 00001964 10eb0008 MOVE.B 8(A3),(A0)+ 00001968 51cbffea DBRA D3,1954 0000196c 4a2b0007 TST.B 7(A3) 00001970 177c00000002 MOVE.B #0,2(A3) 00001976 4cdf0600 MOVEM.L (A7)+,A1/A2 0000197a 4e75 RTS 0000197c 2f00 MOVE.L D0,-(A7) 0000197e 6100018c BSR $1b0c 00001982 102b0004 MOVE.B 4(A3),D0 00001986 e408 LSR.B #2,D0 00001988 02000007 ANDI.B #7,D0 0000198c 17400003 MOVE.B D0,3(A3) 00001990 17410000 MOVE.B D1,0(A3) 00001994 177c00010001 MOVE.B #1,1(A3) 0000199a 7005 MOVEQ #5,D0 0000199c 4e71 NOP 0000199e 4e71 NOP 000019a0 4e71 NOP 000019a2 4e71 NOP 000019a4 51c8fff6 DBRA D0,199c 000019a8 177c00110001 MOVE.B #17,1(A3) 000019ae 61000168 BSR $1b18 000019b2 177c00000001 MOVE.B #0,1(A3) 000019b8 201f MOVE.L (A7)+,D0 000019ba 4e75 RTS 000019bc 2f00 MOVE.L D0,-(A7) 000019be 6100014c BSR $1b0c 000019c2 102b0004 MOVE.B 4(A3),D0 000019c6 e408 LSR.B #2,D0 000019c8 02000007 ANDI.B #7,D0 000019cc 17400003 MOVE.B D0,3(A3) 000019d0 122b0000 MOVE.B 0(A3),D1 000019d4 177c00100001 MOVE.B #16,1(A3) 000019da 6100013c BSR $1b18 000019de 177c00000001 MOVE.B #0,1(A3) 000019e4 201f MOVE.L (A7)+,D0 000019e6 4e75 RTS 000019e8 6100ffd2 BSR $19bc 000019ec 1401 MOVE.B D1,D2 000019ee 6100011c BSR $1b0c 000019f2 6100ffc8 BSR $19bc 000019f6 1202 MOVE.B D2,D1 000019f8 02020002 ANDI.B #2,D2 000019fc 6706 BEQ $1a04 000019fe 610001a0 BSR $1ba0 00001a02 4e75 RTS 00001a04 023c00fe DC.W #572,#254 00001a08 4e75 RTS 00001a0a 6006 BRA $1a12 00001a0c 177c00000002 MOVE.B #0,2(A3) 00001a12 177c00010000 MOVE.B #1,0(A3) 00001a18 7005 MOVEQ #5,D0 00001a1a 4e71 NOP 00001a1c 4e71 NOP 00001a1e 51c8fffa DBRA D0,1a1a 00001a22 177c00010002 MOVE.B #1,2(A3) 00001a28 082b00060001 BTST.B #6,1(A3) 00001a2e 67f8 BEQ $1a28 00001a30 7005 MOVEQ #5,D0 00001a32 4e71 NOP 00001a34 4e71 NOP 00001a36 4e71 NOP 00001a38 4e71 NOP 00001a3a 51c8fff6 DBRA D0,1a32 00001a3e 082b00050001 BTST.B #5,1(A3) 00001a44 66c6 BNE $1a0c 00001a46 0c2b00010000 CMPI.B #1,0(A3) 00001a4c 62be BHI $1a0c 00001a4e 082b00050001 BTST.B #5,1(A3) 00001a54 66b6 BNE $1a0c 00001a56 177c00040001 MOVE.B #4,1(A3) 00001a5c 7005 MOVEQ #5,D0 00001a5e 4e71 NOP 00001a60 4e71 NOP 00001a62 4e71 NOP 00001a64 4e71 NOP 00001a66 51c8fff6 DBRA D0,1a5e 00001a6a 102b0004 MOVE.B 4(A3),D0 00001a6e e408 LSR.B #2,D0 00001a70 02000007 ANDI.B #7,D0 00001a74 17400003 MOVE.B D0,3(A3) 00001a78 177c00010000 MOVE.B #1,0(A3) 00001a7e 177c000d0001 MOVE.B #13,1(A3) 00001a84 177c00000002 MOVE.B #0,2(A3) 00001a8a 177c00000004 MOVE.B #0,4(A3) 00001a90 177c00050001 MOVE.B #5,1(A3) 00001a96 7005 MOVEQ #5,D0 00001a98 4e71 NOP 00001a9a 4e71 NOP 00001a9c 4e71 NOP 00001a9e 4e71 NOP 00001aa0 51c8fff6 DBRA D0,1a98 00001aa4 203c0005de67 MOVE.L #384615,D0 00001aaa 082b00060004 BTST.B #6,4(A3) 00001ab0 6642 BNE $1af4 00001ab2 51c8fff6 DBRA D0,1aaa 00001ab6 08aa00000340 BCLR.B #0,832(A2) 00001abc 176a03400001 MOVE.B 832(A2),1(A3) 00001ac2 303c00ff MOVE.W #255,D0 00001ac6 4e71 NOP 00001ac8 51c8fffc DBRA D0,1ac6 00001acc 082b00060004 BTST.B #6,4(A3) 00001ad2 66000020 BNE $1af4 00001ad6 08aa00020340 BCLR.B #2,832(A2) 00001adc 176a03400001 MOVE.B 832(A2),1(A3) 00001ae2 41fafb19 LEA -1255(PC)!$15fd,A0 00001ae6 6100f022 BSR $b0a 00001aea 323c00f6 MOVE.W #246,D1 00001aee 003c0001 ORI.B #1,CCR 00001af2 4e75 RTS 00001af4 08aa00020340 BCLR.B #2,832(A2) 00001afa 08aa00000340 BCLR.B #0,832(A2) 00001b00 176a03400001 MOVE.B 832(A2),1(A3) 00001b06 023c00fe DC.W #572,#254 00001b0a 4e75 RTS 00001b0c 082b00050004 BTST.B #5,4(A3) 00001b12 6700fff8 BEQ $1b0c 00001b16 4e75 RTS 00001b18 082b00050004 BTST.B #5,4(A3) 00001b1e 6600fff8 BNE $1b18 00001b22 4e75 RTS 00001b24 157c00ff0304 MOVE.B #-1,772(A2) 00001b2a 1c3c0003 MOVE.B #3,D6 00001b2e 6100fdbe BSR $18ee 00001b32 65000066 BCS $1b9a 00001b36 102b0004 MOVE.B 4(A3),D0 00001b3a e408 LSR.B #2,D0 00001b3c 02000007 ANDI.B #7,D0 00001b40 0c000002 CMPI.B #2,D0 00001b44 67f0 BEQ $1b36 00001b46 0c000003 CMPI.B #3,D0 00001b4a 6708 BEQ $1b54 00001b4c 0c000007 CMPI.B #7,D0 00001b50 6708 BEQ $1b5a 00001b52 600e BRA $1b62 00001b54 6100fe66 BSR $19bc 00001b58 1001 MOVE.B D1,D0 00001b5a 6100fe60 BSR $19bc 00001b5e 6000003a BRA $1b9a 00001b62 41ea0341 LEA 833(A2),A0 00001b66 303c0007 MOVE.W #7,D0 00001b6a 6100fe50 BSR $19bc 00001b6e 10c1 MOVE.B D1,(A0)+ 00001b70 51c8fff8 DBRA D0,1b6a 00001b74 1001 MOVE.B D1,D0 00001b76 024000ff ANDI.W #255,D0 00001b7a 670c BEQ $1b88 00001b7c 5300 SUBQ.B #1,D0 00001b7e 6100fe3c BSR $19bc 00001b82 10c1 MOVE.B D1,(A0)+ 00001b84 51c8fff8 DBRA D0,1b7e 00001b88 6100fe32 BSR $19bc 00001b8c 6100ff7e BSR $1b0c 00001b90 6100fe2a BSR $19bc 00001b94 023c00fe DC.W #572,#254 00001b98 4e75 RTS 00001b9a 003c0001 ORI.B #1,CCR 00001b9e 4e75 RTS 00001ba0 6100ff82 BSR $1b24 00001ba4 64000004 BCC $1baa 00001ba8 4e75 RTS 00001baa 142a0343 MOVE.B 835(A2),D2 00001bae 162a034d MOVE.B 845(A2),D3 00001bb2 0c020000 CMPI.B #0,D2 00001bb6 670000aa BEQ $1c62 00001bba 0c020001 CMPI.B #1,D2 00001bbe 670000a2 BEQ $1c62 00001bc2 323c00f6 MOVE.W #246,D1 00001bc6 0c020002 CMPI.B #2,D2 00001bca 6608 BNE $1bd4 00001bcc 41fafa47 LEA -1465(PC)!$1615,A0 00001bd0 60000086 BRA $1c58 00001bd4 0c020003 CMPI.B #3,D2 00001bd8 6632 BNE $1c0c 00001bda 41fafa49 LEA -1463(PC)!$1625,A0 00001bde 6100ef2a BSR $b0a 00001be2 323c00f4 MOVE.W #244,D1 00001be6 0c030011 CMPI.B #17,D3 00001bea 66000006 BNE $1bf2 00001bee 6000006c BRA $1c5c 00001bf2 323c00f7 MOVE.W #247,D1 00001bf6 0c030015 CMPI.B #21,D3 00001bfa 66000006 BNE $1c02 00001bfe 6000005c BRA $1c5c 00001c02 323c00f6 MOVE.W #246,D1 00001c06 41fafaa6 LEA -1370(PC)!$16ae,A0 00001c0a 604c BRA $1c58 00001c0c 0c020004 CMPI.B #4,D2 00001c10 662a BNE $1c3c 00001c12 41fafa2f LEA -1489(PC)!$1643,A0 00001c16 6100eef2 BSR $b0a 00001c1a 323c00f5 MOVE.W #245,D1 00001c1e 0c030003 CMPI.B #3,D3 00001c22 6606 BNE $1c2a 00001c24 41fafa9c LEA -1380(PC)!$16c2,A0 00001c28 602e BRA $1c58 00001c2a 323c00f6 MOVE.W #246,D1 00001c2e 0c030004 CMPI.B #4,D3 00001c32 66ce BNE $1c02 00001c34 41fafa9e LEA -1378(PC)!$16d4,A0 00001c38 6000001e BRA $1c58 00001c3c 323c00f6 MOVE.W #246,D1 00001c40 0c020005 CMPI.B #5,D2 00001c44 6608 BNE $1c4e 00001c46 41fafa19 LEA -1511(PC)!$1661,A0 00001c4a 6000000c BRA $1c58 00001c4e 0c020006 CMPI.B #6,D2 00001c52 6600ffae BNE $1c02 00001c56 6004 BRA $1c5c 00001c58 6100eeb0 BSR $b0a 00001c5c 003c0001 ORI.B #1,CCR 00001c60 4e75 RTS 00001c62 023c00fe DC.W #572,#254 00001c66 4e75 RTS 00001c68 0100 00001c6a 02000300 00001c6e 0050 0200 00001c72 0010000a 00001c76 0008 00001c78 0300 00001c7a 00000100 00001c7e 00000700 00001c82 00000a74 00001c86 00000000 00001c8a 00000000 00001c8e 00000000 00001c92 ; all FF hereafter 00001ffe ; all FF