home *** CD-ROM | disk | FTP | other *** search
/ telefisk.org / amiga_virus_collection_research.7z / VIRUSRESEARCH / STR_ATMOS / CPU.ASM < prev    next >
Assembly Source File  |  1999-06-12  |  52KB  |  1,882 lines
  1. ; IRA V1.02  (Sep  6 1993)  (c)1993  Tim Ruehsen
  2.  
  3.  
  4. EXT_0000    EQU    $0
  5. ABSEXECBASE    EQU    $4
  6. EXT_0002    EQU    $3030
  7. EXT_0003    EQU    $3032
  8. EXT_0004    EQU    $3034
  9. EXT_0005    EQU    $3838
  10. HARDBASE    EQU    $DFF000
  11. VHPOSR        EQU    $DFF006
  12. COLOR00        EQU    $DFF180
  13. EXT_0009    EQU    $F9DF0A
  14. EXT_000A    EQU    $FC0000
  15.  
  16.  
  17.  
  18.  
  19.     SECTION S_0,CODE
  20.  
  21. SECSTRT_0:
  22.     LINK    A5,#-128        ;0000: 4E55FF80
  23.     MOVEM.L    D2-D3/D5-D7/A2-A3/A6,-(A7) ;0004: 48E73732
  24.     MOVEQ    #0,D7            ;0008: 7E00
  25.     MOVEA    #$0004,A0        ;000A: 307C0004
  26.     MOVE.L    A0,40(A7)        ;000E: 2F480028
  27.     LEA    LAB_0039(PC),A1        ;0012: 43FA052A
  28.     MOVEQ    #36,D0            ;0016: 7024
  29.     MOVEA.L    (A0),A6            ;0018: 2C50
  30.     JSR    LAB_00BD(PC)        ;001A: 4EBA0DD4
  31.     MOVEA.L    D0,A2            ;001E: 2440
  32.     MOVEA.L    40(A7),A3        ;0020: 266F0028
  33.     MOVE.L    A2,D0            ;0024: 200A
  34.     BEQ    LAB_0036        ;0026: 670004FE
  35.     MOVEQ    #87,D0            ;002A: 7057
  36.     MOVEQ    #0,D1            ;002C: 7200
  37.     LEA    -108(A5),A0        ;002E: 41EDFF94
  38. LAB_0000:
  39.     MOVE.B    D1,(A0)+        ;0032: 10C1
  40.     DBF    D0,LAB_0000        ;0034: 51C8FFFC
  41.     LEA    LAB_003A(PC),A0        ;0038: 41FA0510
  42.     MOVE.L    A0,D1            ;003C: 2208
  43.     LEA    -108(A5),A1        ;003E: 43EDFF94
  44.     MOVE.L    A1,D2            ;0042: 2409
  45.     MOVEQ    #0,D3            ;0044: 7600
  46.     MOVEA.L    A2,A6            ;0046: 2C4A
  47.     JSR    -798(A6)        ;0048: 4EAEFCE2
  48.     MOVE.L    D0,36(A7)        ;004C: 2F400024
  49.     TST.L    D0            ;0050: 4A80
  50.     BNE.S    LAB_0001        ;0052: 6610
  51.     JSR    -132(A6)        ;0054: 4EAEFF7C
  52.     MOVE.L    D0,D1            ;0058: 2200
  53.     MOVE.L    D3,D2            ;005A: 2403
  54.     JSR    -474(A6)        ;005C: 4EAEFE26
  55.     BRA    LAB_0035        ;0060: 600004B6
  56. LAB_0001:
  57.     MOVEQ    #0,D0            ;0064: 7000
  58.     MOVE.L    D0,D1            ;0066: 2200
  59.     MOVEA.L    (A3),A6            ;0068: 2C53
  60.     JSR    -648(A6)        ;006A: 4EAEFD78
  61.     MOVE.L    D0,D5            ;006E: 2A00
  62.     TST.L    -56(A5)            ;0070: 4AADFFC8
  63.     BEQ.S    LAB_0002        ;0074: 6706
  64.     BCLR    #31,D5            ;0076: 0885001F
  65.     BRA.S    LAB_0003        ;007A: 600A
  66. LAB_0002:
  67.     TST.L    -60(A5)            ;007C: 4AADFFC4
  68.     BEQ.S    LAB_0003        ;0080: 6704
  69.     BSET    #31,D5            ;0082: 08C5001F
  70. LAB_0003:
  71.     TST.L    -48(A5)            ;0086: 4AADFFD0
  72.     BEQ.S    LAB_0004        ;008A: 6706
  73.     BCLR    #30,D5            ;008C: 0885001E
  74.     BRA.S    LAB_0005        ;0090: 600A
  75. LAB_0004:
  76.     TST.L    -52(A5)            ;0092: 4AADFFCC
  77.     BEQ.S    LAB_0005        ;0096: 6704
  78.     BSET    #30,D5            ;0098: 08C5001E
  79. LAB_0005:
  80.     TST.L    -84(A5)            ;009C: 4AADFFAC
  81.     BEQ.S    LAB_0006        ;00A0: 6706
  82.     BCLR    #8,D5            ;00A2: 08850008
  83.     BRA.S    LAB_0007        ;00A6: 600A
  84. LAB_0006:
  85.     TST.L    -92(A5)            ;00A8: 4AADFFA4
  86.     BEQ.S    LAB_0007        ;00AC: 6704
  87.     BSET    #8,D5            ;00AE: 08C50008
  88. LAB_0007:
  89.     TST.L    -80(A5)            ;00B2: 4AADFFB0
  90.     BEQ.S    LAB_0008        ;00B6: 6706
  91.     BCLR    #12,D5            ;00B8: 0885000C
  92.     BRA.S    LAB_0009        ;00BC: 600A
  93. LAB_0008:
  94.     TST.L    -88(A5)            ;00BE: 4AADFFA8
  95.     BEQ.S    LAB_0009        ;00C2: 6704
  96.     BSET    #12,D5            ;00C4: 08C5000C
  97. LAB_0009:
  98.     TST.L    -68(A5)            ;00C8: 4AADFFBC
  99.     BEQ.S    LAB_000A        ;00CC: 6706
  100.     BCLR    #0,D5            ;00CE: 08850000
  101.     BRA.S    LAB_000B        ;00D2: 600A
  102. LAB_000A:
  103.     TST.L    -76(A5)            ;00D4: 4AADFFB4
  104.     BEQ.S    LAB_000B        ;00D8: 6704
  105.     BSET    #0,D5            ;00DA: 08C50000
  106. LAB_000B:
  107.     TST.L    -64(A5)            ;00DE: 4AADFFC0
  108.     BEQ.S    LAB_000C        ;00E2: 6706
  109.     BCLR    #4,D5            ;00E4: 08850004
  110.     BRA.S    LAB_000D        ;00E8: 600A
  111. LAB_000C:
  112.     TST.L    -72(A5)            ;00EA: 4AADFFB8
  113.     BEQ.S    LAB_000D        ;00EE: 6704
  114.     BSET    #4,D5            ;00F0: 08C50004
  115. LAB_000D:
  116.     TST.L    -100(A5)        ;00F4: 4AADFF9C
  117.     BEQ.S    LAB_000E        ;00F8: 6706
  118.     ANDI    #$FEFE,D5        ;00FA: 0245FEFE
  119.     BRA.S    LAB_000F        ;00FE: 600A
  120. LAB_000E:
  121.     TST.L    -108(A5)        ;0100: 4AADFF94
  122.     BEQ.S    LAB_000F        ;0104: 6704
  123.     ORI    #$0101,D5        ;0106: 00450101
  124. LAB_000F:
  125.     TST.L    -96(A5)            ;010A: 4AADFFA0
  126.     BEQ.S    LAB_0010        ;010E: 6706
  127.     ANDI    #$EFEF,D5        ;0110: 0245EFEF
  128.     BRA.S    LAB_0011        ;0114: 600A
  129. LAB_0010:
  130.     TST.L    -104(A5)        ;0116: 4AADFF98
  131.     BEQ.S    LAB_0011        ;011A: 6704
  132.     ORI    #$1010,D5        ;011C: 00451010
  133. LAB_0011:
  134.     MOVE.L    D5,D0            ;0120: 2005
  135.     ORI    #$2000,D0        ;0122: 00402000
  136.     MOVEA    #$0004,A0        ;0126: 307C0004
  137.     MOVE.L    A0,32(A7)        ;012A: 2F480020
  138.     MOVEQ    #-1,D1            ;012E: 72FF
  139.     MOVEA.L    (A0),A6            ;0130: 2C50
  140.     JSR    -648(A6)        ;0132: 4EAEFD78
  141.     TST.L    -28(A5)            ;0136: 4AADFFE4
  142.     BNE    LAB_0016        ;013A: 66000134
  143.     JSR    LAB_00A7(PC)        ;013E: 4EBA0B2C
  144.     MOVE.L    D0,D6            ;0142: 2C00
  145.     TST.L    D6            ;0144: 4A86
  146.     BEQ    LAB_0016        ;0146: 67000128
  147.     JSR    LAB_00AF(PC)        ;014A: 4EBA0BC4
  148.     MOVE.L    D0,D5            ;014E: 2A00
  149.     BTST    #31,D5            ;0150: 0805001F
  150.     BEQ.S    LAB_0013        ;0154: 677C
  151.     TST.L    -40(A5)            ;0156: 4AADFFD8
  152.     BEQ.S    LAB_0012        ;015A: 6710
  153.     CMPI.L    #$80F17540,D5        ;015C: 0C8580F17540
  154.     BNE.S    LAB_0012        ;0162: 6608
  155.     BSR    LAB_00A2        ;0164: 61000A12
  156.     BRA    LAB_0016        ;0168: 60000106
  157. LAB_0012:
  158.     TST.L    -32(A5)            ;016C: 4AADFFE0
  159.     BEQ    LAB_0016        ;0170: 670000FE
  160.     CMPI.L    #$80817880,D5        ;0174: 0C8580817880
  161.     BNE    LAB_0016        ;017A: 660000F4
  162.     BSR    LAB_00A2        ;017E: 610009F8
  163.     JSR    LAB_00B3(PC)        ;0182: 4EBA0BD0
  164.     MOVE.L    D0,44(A7)        ;0186: 2F40002C
  165.     JSR    LAB_00B3(PC)        ;018A: 4EBA0BC8
  166.     MOVE.L    44(A7),D1        ;018E: 222F002C
  167.     MOVEQ    #64,D2            ;0192: 7440
  168.     ADD.L    D2,D1            ;0194: D282
  169.     ADDQ.L    #8,D0            ;0196: 5080
  170.     MOVEA.L    D0,A0            ;0198: 2040
  171.     MOVE.L    (A0),D2            ;019A: 2410
  172.     ANDI    #$0000,D2        ;019C: 02420000
  173.     MOVEA.L    D1,A0            ;01A0: 2041
  174.     MOVE.L    (A0),D0            ;01A2: 2010
  175.     ANDI    #$0000,D0        ;01A4: 02400000
  176.     CMP.L    D2,D0            ;01A8: B082
  177.     BEQ    LAB_0016        ;01AA: 670000C4
  178.     LEA    LAB_003D(PC),A0        ;01AE: 41FA04B6
  179.     MOVE.L    A0,D1            ;01B2: 2208
  180.     MOVEQ    #0,D2            ;01B4: 7400
  181.     MOVEA.L    A2,A6            ;01B6: 2C4A
  182.     JSR    -606(A6)        ;01B8: 4EAEFDA2
  183.     TST.L    D0            ;01BC: 4A80
  184.     BEQ    LAB_0016        ;01BE: 670000B0
  185.     LEA    LAB_003E(PC),A0        ;01C2: 41FA04B4
  186.     MOVE.L    A0,D1            ;01C6: 2208
  187.     JSR    -948(A6)        ;01C8: 4EAEFC4C
  188.     MOVEQ    #5,D7            ;01CC: 7E05
  189.     BRA    LAB_0016        ;01CE: 600000A0
  190. LAB_0013:
  191.     TST.L    -44(A5)            ;01D2: 4AADFFD4
  192.     BEQ.S    LAB_0014        ;01D6: 6716
  193.     BSR    LAB_0084        ;01D8: 610006AE
  194.     TST    D0            ;01DC: 4A40
  195.     BNE.S    LAB_0014        ;01DE: 660E
  196.     LEA    LAB_003F(PC),A0        ;01E0: 41FA04C8
  197.     MOVE.L    A0,D1            ;01E4: 2208
  198.     MOVEA.L    A2,A6            ;01E6: 2C4A
  199.     JSR    -948(A6)        ;01E8: 4EAEFC4C
  200.     MOVEQ    #5,D7            ;01EC: 7E05
  201. LAB_0014:
  202.     TST.L    -36(A5)            ;01EE: 4AADFFDC
  203.     BEQ.S    LAB_0016        ;01F2: 677C
  204.     TST.L    -44(A5)            ;01F4: 4AADFFD4
  205.     BNE.S    LAB_0016        ;01F8: 6676
  206.     JSR    LAB_00B3(PC)        ;01FA: 4EBA0B58
  207.     MOVE.L    D0,44(A7)        ;01FE: 2F40002C
  208.     JSR    LAB_00B3(PC)        ;0202: 4EBA0B50
  209.     MOVE.L    44(A7),D1        ;0206: 222F002C
  210.     MOVEQ    #64,D2            ;020A: 7440
  211.     ADD.L    D2,D1            ;020C: D282
  212.     ADDQ.L    #8,D0            ;020E: 5080
  213.     MOVEA.L    D0,A0            ;0210: 2040
  214.     MOVE.L    (A0),D2            ;0212: 2410
  215.     ANDI    #$0000,D2        ;0214: 02420000
  216.     MOVEA.L    D1,A0            ;0218: 2041
  217.     MOVE.L    (A0),D0            ;021A: 2010
  218.     ANDI    #$0000,D0        ;021C: 02400000
  219.     CMP.L    D2,D0            ;0220: B082
  220.     BNE.S    LAB_0015        ;0222: 6636
  221.     LEA    LAB_003D(PC),A0        ;0224: 41FA0440
  222.     MOVE.L    A0,D1            ;0228: 2208
  223.     MOVEQ    #0,D2            ;022A: 7400
  224.     MOVEA.L    A2,A6            ;022C: 2C4A
  225.     JSR    -606(A6)        ;022E: 4EAEFDA2
  226.     TST.L    D0            ;0232: 4A80
  227.     BEQ.S    LAB_0015        ;0234: 6724
  228.     LEA    LAB_0043(PC),A0        ;0236: 41FA049A
  229.     MOVE.L    A0,D1            ;023A: 2208
  230.     JSR    -948(A6)        ;023C: 4EAEFC4C
  231.     MOVE.L    36(A7),D1        ;0240: 222F0024
  232.     JSR    -858(A6)        ;0244: 4EAEFCA6
  233.     MOVEA.L    A2,A1            ;0248: 224A
  234.     MOVEA.L    32(A7),A6        ;024A: 2C6F0020
  235.     MOVEA.L    (A6),A6            ;024E: 2C56
  236.     JSR    -414(A6)        ;0250: 4EAEFE62
  237.     MOVEQ    #20,D0            ;0254: 7014
  238.     BRA    LAB_0038        ;0256: 600002DE
  239. LAB_0015:
  240.     BSR    LAB_0092        ;025A: 6100078C
  241.     TST    D0            ;025E: 4A40
  242.     BNE.S    LAB_0016        ;0260: 660E
  243.     LEA    LAB_0048(PC),A0        ;0262: 41FA0496
  244.     MOVE.L    A0,D1            ;0266: 2208
  245.     MOVEA.L    A2,A6            ;0268: 2C4A
  246.     JSR    -948(A6)        ;026A: 4EAEFC4C
  247.     MOVEQ    #5,D7            ;026E: 7E05
  248. LAB_0016:
  249.     LEA    LAB_004E(PC),A0        ;0270: 41FA04AC
  250.     MOVE.L    A0,D1            ;0274: 2208
  251.     MOVEA.L    A2,A6            ;0276: 2C4A
  252.     JSR    -948(A6)        ;0278: 4EAEFC4C
  253.     MOVEA.L    32(A7),A0        ;027C: 206F0020
  254.     MOVEA.L    (A0),A3            ;0280: 2650
  255.     BTST    #3,297(A3)        ;0282: 082B00030129
  256.     BEQ.S    LAB_0017        ;0288: 670C
  257.     LEA    LAB_0050(PC),A0        ;028A: 41FA049C
  258.     MOVE.L    A0,D1            ;028E: 2208
  259.     JSR    -948(A6)        ;0290: 4EAEFC4C
  260.     BRA.S    LAB_001B        ;0294: 604E
  261. LAB_0017:
  262.     BTST    #2,297(A3)        ;0296: 082B00020129
  263.     BEQ.S    LAB_0018        ;029C: 670C
  264.     LEA    LAB_0051(PC),A0        ;029E: 41FA0490
  265.     MOVE.L    A0,D1            ;02A2: 2208
  266.     JSR    -948(A6)        ;02A4: 4EAEFC4C
  267.     BRA.S    LAB_001B        ;02A8: 603A
  268. LAB_0018:
  269.     MOVEA    #$0004,A0        ;02AA: 307C0004
  270.     MOVEA.L    (A0),A1            ;02AE: 2250
  271.     BTST    #1,297(A1)        ;02B0: 082900010129
  272.     BEQ.S    LAB_0019        ;02B6: 670C
  273.     LEA    LAB_0053(PC),A0        ;02B8: 41FA047E
  274.     MOVE.L    A0,D1            ;02BC: 2208
  275.     JSR    -948(A6)        ;02BE: 4EAEFC4C
  276.     BRA.S    LAB_001B        ;02C2: 6020
  277. LAB_0019:
  278.     MOVEA.L    (A0),A1            ;02C4: 2250
  279.     BTST    #0,297(A1)        ;02C6: 082900000129
  280.     BEQ.S    LAB_001A        ;02CC: 670C
  281.     LEA    LAB_0055(PC),A0        ;02CE: 41FA0470
  282.     MOVE.L    A0,D1            ;02D2: 2208
  283.     JSR    -948(A6)        ;02D4: 4EAEFC4C
  284.     BRA.S    LAB_001B        ;02D8: 600A
  285. LAB_001A:
  286.     LEA    LAB_0056(PC),A0        ;02DA: 41FA046C
  287.     MOVE.L    A0,D1            ;02DE: 2208
  288.     JSR    -948(A6)        ;02E0: 4EAEFC4C
  289. LAB_001B:
  290.     MOVEA.L    32(A7),A0        ;02E4: 206F0020
  291.     MOVEA.L    (A0),A3            ;02E8: 2650
  292.     BTST    #5,297(A3)        ;02EA: 082B00050129
  293.     BEQ.S    LAB_001C        ;02F0: 670C
  294.     LEA    LAB_0058(PC),A0        ;02F2: 41FA045C
  295.     MOVE.L    A0,D1            ;02F6: 2208
  296.     JSR    -948(A6)        ;02F8: 4EAEFC4C
  297.     BRA.S    LAB_001D        ;02FC: 6012
  298. LAB_001C:
  299.     BTST    #4,297(A3)        ;02FE: 082B00040129
  300.     BEQ.S    LAB_001D        ;0304: 670A
  301.     LEA    LAB_005A(PC),A0        ;0306: 41FA0450
  302.     MOVE.L    A0,D1            ;030A: 2208
  303.     JSR    -948(A6)        ;030C: 4EAEFC4C
  304. LAB_001D:
  305.     CMPI.L    #$00010CF3,D6        ;0310: 0C8600010CF3
  306.     BNE.S    LAB_001E        ;0316: 660A
  307.     LEA    LAB_005C(PC),A0        ;0318: 41FA0446
  308.     MOVE.L    A0,D1            ;031C: 2208
  309.     JSR    -948(A6)        ;031E: 4EAEFC4C
  310. LAB_001E:
  311.     TST.L    D6            ;0322: 4A86
  312.     BEQ.S    LAB_0020        ;0324: 6730
  313.     JSR    LAB_00AF(PC)        ;0326: 4EBA09E8
  314.     MOVE.L    D0,D5            ;032A: 2A00
  315.     BTST    #31,D5            ;032C: 0805001F
  316.     BEQ.S    LAB_0020        ;0330: 6724
  317.     MOVE.L    D5,D0            ;0332: 2005
  318.     ANDI.L    #$00700000,D0        ;0334: 028000700000
  319.     BEQ.S    LAB_001F        ;033A: 670E
  320.     LEA    LAB_005D(PC),A0        ;033C: 41FA042A
  321.     MOVE.L    A0,D1            ;0340: 2208
  322.     MOVEA.L    A2,A6            ;0342: 2C4A
  323.     JSR    -948(A6)        ;0344: 4EAEFC4C
  324.     BRA.S    LAB_0020        ;0348: 600C
  325. LAB_001F:
  326.     LEA    LAB_005F(PC),A0        ;034A: 41FA0426
  327.     MOVE.L    A0,D1            ;034E: 2208
  328.     MOVEA.L    A2,A6            ;0350: 2C4A
  329.     JSR    -948(A6)        ;0352: 4EAEFC4C
  330. LAB_0020:
  331.     MOVEQ    #0,D0            ;0356: 7000
  332.     MOVE.L    D0,D1            ;0358: 2200
  333.     MOVEA.L    32(A7),A6        ;035A: 2C6F0020
  334.     MOVEA.L    (A6),A6            ;035E: 2C56
  335.     JSR    -648(A6)        ;0360: 4EAEFD78
  336.     MOVE.L    D0,D5            ;0364: 2A00
  337.     LEA    LAB_0061(PC),A0        ;0366: 41FA0410
  338.     MOVE.L    A0,D1            ;036A: 2208
  339.     MOVEA.L    A2,A6            ;036C: 2C4A
  340.     JSR    -948(A6)        ;036E: 4EAEFC4C
  341.     BTST    #0,D5            ;0372: 08050000
  342.     BNE.S    LAB_0021        ;0376: 660A
  343.     LEA    LAB_0062(PC),A0        ;0378: 41FA0406
  344.     MOVE.L    A0,D1            ;037C: 2208
  345.     JSR    -948(A6)        ;037E: 4EAEFC4C
  346. LAB_0021:
  347.     LEA    LAB_0063(PC),A0        ;0382: 41FA0400
  348.     MOVE.L    A0,D1            ;0386: 2208
  349.     JSR    -948(A6)        ;0388: 4EAEFC4C
  350.     MOVEA    #$0004,A0        ;038C: 307C0004
  351.     MOVEA.L    (A0),A1            ;0390: 2250
  352.     MOVEA.L    A0,A3            ;0392: 2648
  353.     BTST    #2,297(A1)        ;0394: 082900020129
  354.     BNE.S    LAB_0022        ;039A: 6608
  355.     BTST    #3,297(A1)        ;039C: 082900030129
  356.     BEQ.S    LAB_0028        ;03A2: 676C
  357. LAB_0022:
  358.     LEA    LAB_0064(PC),A0        ;03A4: 41FA03E4
  359.     MOVE.L    A0,D1            ;03A8: 2208
  360.     JSR    -948(A6)        ;03AA: 4EAEFC4C
  361.     BTST    #4,D5            ;03AE: 08050004
  362.     BNE.S    LAB_0023        ;03B2: 660A
  363.     LEA    LAB_0062(PC),A0        ;03B4: 41FA03CA
  364.     MOVE.L    A0,D1            ;03B8: 2208
  365.     JSR    -948(A6)        ;03BA: 4EAEFC4C
  366. LAB_0023:
  367.     LEA    LAB_0065(PC),A0        ;03BE: 41FA03CC
  368.     MOVE.L    A0,D1            ;03C2: 2208
  369.     JSR    -948(A6)        ;03C4: 4EAEFC4C
  370.     BTST    #8,D5            ;03C8: 08050008
  371.     BNE.S    LAB_0024        ;03CC: 660C
  372.     LEA    LAB_0066(PC),A0        ;03CE: 41FA03CC
  373.     MOVE.L    A0,D1            ;03D2: 2208
  374.     JSR    -948(A6)        ;03D4: 4EAEFC4C
  375.     BRA.S    LAB_0025        ;03D8: 600A
  376. LAB_0024:
  377.     LEA    LAB_0067(PC),A0        ;03DA: 41FA03CA
  378.     MOVE.L    A0,D1            ;03DE: 2208
  379.     JSR    -948(A6)        ;03E0: 4EAEFC4C
  380. LAB_0025:
  381.     BTST    #31,D5            ;03E4: 0805001F
  382.     BEQ.S    LAB_0026        ;03E8: 670C
  383.     LEA    LAB_0068(PC),A0        ;03EA: 41FA03C2
  384.     MOVE.L    A0,D1            ;03EE: 2208
  385.     JSR    -948(A6)        ;03F0: 4EAEFC4C
  386.     BRA.S    LAB_0028        ;03F4: 601A
  387. LAB_0026:
  388.     BTST    #12,D5            ;03F6: 0805000C
  389.     BNE.S    LAB_0027        ;03FA: 660A
  390.     LEA    LAB_0062(PC),A0        ;03FC: 41FA0382
  391.     MOVE.L    A0,D1            ;0400: 2208
  392.     JSR    -948(A6)        ;0402: 4EAEFC4C
  393. LAB_0027:
  394.     LEA    LAB_0069(PC),A0        ;0406: 41FA03B0
  395.     MOVE.L    A0,D1            ;040A: 2208
  396.     JSR    -948(A6)        ;040C: 4EAEFC4C
  397. LAB_0028:
  398.     LEA    LAB_006A(PC),A0        ;0410: 41FA03AC
  399.     MOVE.L    A0,D1            ;0414: 2208
  400.     JSR    -948(A6)        ;0416: 4EAEFC4C
  401.     BTST    #30,D5            ;041A: 0805001E
  402.     BEQ.S    LAB_0029        ;041E: 670A
  403.     LEA    LAB_006B(PC),A0        ;0420: 41FA039E
  404.     MOVE.L    A0,D1            ;0424: 2208
  405.     JSR    -948(A6)        ;0426: 4EAEFC4C
  406. LAB_0029:
  407.     LEA    LAB_006E(PC),A0        ;042A: 41FA03A6
  408.     MOVE.L    A0,D1            ;042E: 2208
  409.     JSR    -948(A6)        ;0430: 4EAEFC4C
  410.     MOVEQ    #0,D5            ;0434: 7A00
  411.     MOVEA.L    -24(A5),A0        ;0436: 206DFFE8
  412.     MOVE.L    A0,-112(A5)        ;043A: 2B48FF90
  413.     BEQ    LAB_0033        ;043E: 670000BE
  414.     LEA    LAB_006F(PC),A1        ;0442: 43FA0390
  415.     JSR    LAB_00B8(PC)        ;0446: 4EBA0974
  416.     TST.L    D0            ;044A: 4A80
  417.     BNE.S    LAB_002A        ;044C: 6606
  418.     MOVEQ    #1,D5            ;044E: 7A01
  419.     BRA    LAB_0033        ;0450: 600000AC
  420. LAB_002A:
  421.     MOVEA.L    -112(A5),A0        ;0454: 206DFF90
  422.     LEA    LAB_0070(PC),A1        ;0458: 43FA0380
  423.     JSR    LAB_00B8(PC)        ;045C: 4EBA095E
  424.     TST.L    D0            ;0460: 4A80
  425.     BNE.S    LAB_002B        ;0462: 6606
  426.     MOVEQ    #2,D5            ;0464: 7A02
  427.     BRA    LAB_0033        ;0466: 60000096
  428. LAB_002B:
  429.     MOVEA.L    -112(A5),A0        ;046A: 206DFF90
  430.     LEA    LAB_0071(PC),A1        ;046E: 43FA0370
  431.     JSR    LAB_00B8(PC)        ;0472: 4EBA0948
  432.     TST.L    D0            ;0476: 4A80
  433.     BNE.S    LAB_002C        ;0478: 6606
  434.     MOVEQ    #4,D5            ;047A: 7A04
  435.     BRA    LAB_0033        ;047C: 60000080
  436. LAB_002C:
  437.     MOVEA.L    -112(A5),A0        ;0480: 206DFF90
  438.     LEA    LAB_0072(PC),A1        ;0484: 43FA0360
  439.     JSR    LAB_00B8(PC)        ;0488: 4EBA0932
  440.     TST.L    D0            ;048C: 4A80
  441.     BNE.S    LAB_002D        ;048E: 6604
  442.     MOVEQ    #8,D5            ;0490: 7A08
  443.     BRA.S    LAB_0033        ;0492: 606A
  444. LAB_002D:
  445.     MOVEA.L    -112(A5),A0        ;0494: 206DFF90
  446.     LEA    LAB_0073(PC),A1        ;0498: 43FA0352
  447.     JSR    LAB_00B8(PC)        ;049C: 4EBA091E
  448.     TST.L    D0            ;04A0: 4A80
  449.     BNE.S    LAB_002E        ;04A2: 6604
  450.     MOVEQ    #16,D5            ;04A4: 7A10
  451.     BRA.S    LAB_0033        ;04A6: 6056
  452. LAB_002E:
  453.     MOVEA.L    -112(A5),A0        ;04A8: 206DFF90
  454.     LEA    LAB_0075(PC),A1        ;04AC: 43FA0344
  455.     JSR    LAB_00B8(PC)        ;04B0: 4EBA090A
  456.     TST.L    D0            ;04B4: 4A80
  457.     BNE.S    LAB_002F        ;04B6: 6604
  458.     MOVEQ    #32,D5            ;04B8: 7A20
  459.     BRA.S    LAB_0033        ;04BA: 6042
  460. LAB_002F:
  461.     MOVEA.L    -112(A5),A0        ;04BC: 206DFF90
  462.     LEA    LAB_0076(PC),A1        ;04C0: 43FA0336
  463.     JSR    LAB_00B8(PC)        ;04C4: 4EBA08F6
  464.     TST.L    D0            ;04C8: 4A80
  465.     BNE.S    LAB_0031        ;04CA: 660C
  466.     TST.L    D6            ;04CC: 4A86
  467.     BNE.S    LAB_0030        ;04CE: 6604
  468.     MOVEQ    #5,D7            ;04D0: 7E05
  469.     BRA.S    LAB_0033        ;04D2: 602A
  470. LAB_0030:
  471.     MOVEQ    #1,D5            ;04D4: 7A01
  472.     BRA.S    LAB_0033        ;04D6: 6026
  473. LAB_0031:
  474.     MOVEA.L    -112(A5),A0        ;04D8: 206DFF90
  475.     LEA    LAB_0077(PC),A1        ;04DC: 43FA031E
  476.     JSR    LAB_00B8(PC)        ;04E0: 4EBA08DA
  477.     TST.L    D0            ;04E4: 4A80
  478.     BNE.S    LAB_0032        ;04E6: 6604
  479.     MOVEQ    #16,D5            ;04E8: 7A10
  480.     BRA.S    LAB_0033        ;04EA: 6012
  481. LAB_0032:
  482.     LEA    LAB_0078(PC),A0        ;04EC: 41FA0312
  483.     MOVE.L    A0,D1            ;04F0: 2208
  484.     LEA    -112(A5),A1        ;04F2: 43EDFF90
  485.     MOVE.L    A1,D2            ;04F6: 2409
  486.     MOVEA.L    A2,A6            ;04F8: 2C4A
  487.     JSR    -954(A6)        ;04FA: 4EAEFC46
  488. LAB_0033:
  489.     MOVEA.L    (A3),A0            ;04FE: 2053
  490.     MOVEQ    #0,D0            ;0500: 7000
  491.     MOVE    296(A0),D0        ;0502: 30280128
  492.     MOVE.L    D5,D1            ;0506: 2205
  493.     AND.L    D0,D1            ;0508: C280
  494.     BNE.S    LAB_0034        ;050A: 6602
  495.     MOVEQ    #5,D7            ;050C: 7E05
  496. LAB_0034:
  497.     MOVE.L    36(A7),D1        ;050E: 222F0024
  498.     MOVEA.L    A2,A6            ;0512: 2C4A
  499.     JSR    -858(A6)        ;0514: 4EAEFCA6
  500. LAB_0035:
  501.     MOVEA.L    A2,A1            ;0518: 224A
  502.     MOVEA.L    40(A7),A6        ;051A: 2C6F0028
  503.     MOVEA.L    (A6),A6            ;051E: 2C56
  504.     JSR    -414(A6)        ;0520: 4EAEFE62
  505.     BRA.S    LAB_0037        ;0524: 600E
  506. LAB_0036:
  507.     MOVEQ    #20,D7            ;0526: 7E14
  508.     MOVEA.L    (A3),A0            ;0528: 2053
  509.     MOVEA.L    276(A0),A1        ;052A: 22680114
  510.     MOVEQ    #122,D0            ;052E: 707A
  511.     MOVE.L    D0,148(A1)        ;0530: 23400094
  512. LAB_0037:
  513.     MOVE.L    D7,D0            ;0534: 2007
  514. LAB_0038:
  515.     MOVEM.L    (A7)+,D2-D3/D5-D7/A2-A3/A6 ;0536: 4CDF4CEC
  516.     UNLK    A5            ;053A: 4E5D
  517.     RTS                ;053C: 4E75
  518. LAB_0039:
  519.     DC.W    $646F            ;053E
  520.     DC.W    $732E            ;0540
  521.     DC.W    $6C69            ;0542
  522.     BHI.S    LAB_003B+2        ;0544: 6272
  523.     BSR.S    LAB_003C        ;0546: 6172
  524.     DC.W    $7900            ;0548
  525. LAB_003A:
  526.     DC.W    $4341            ;054A
  527.     DC.W    $4348            ;054C
  528.     DC.W    $452F            ;054E
  529.     SUBQ.B    #1,16981(A4)        ;0550: 532C4255
  530.     ADDQ    #1,(A3)            ;0554: 5253
  531.     ADDQ.B    #2,21292(A7)        ;0556: 542F532C
  532.     TRAP    #15            ;055A: 4E4F
  533.     DC.W    $4341            ;055C
  534.     DC.W    $4348            ;055E
  535.     DC.W    $452F            ;0560
  536.     SUBQ.B    #1,20047(A4)        ;0562: 532C4E4F
  537.     CLR    (A5)            ;0566: 4255
  538.     ADDQ    #1,(A3)            ;0568: 5253
  539.     ADDQ.B    #2,21292(A7)        ;056A: 542F532C
  540.     NEG    D1            ;056E: 4441
  541.     ADDQ    #2,D1            ;0570: 5441
  542.     DC.W    $4341            ;0572
  543.     DC.W    $4348            ;0574
  544.     DC.W    $452F            ;0576
  545.     SUBQ.B    #1,17473(A4)        ;0578: 532C4441
  546.     ADDQ    #2,D1            ;057C: 5441
  547.     CLR    (A5)            ;057E: 4255
  548.     ADDQ    #1,(A3)            ;0580: 5253
  549.     ADDQ.B    #2,21292(A7)        ;0582: 542F532C
  550.     TRAP    #15            ;0586: 4E4F
  551.     NEG    D1            ;0588: 4441
  552.     ADDQ    #2,D1            ;058A: 5441
  553.     DC.W    $4341            ;058C
  554.     DC.W    $4348            ;058E
  555.     DC.W    $452F            ;0590
  556.     SUBQ.B    #1,20047(A4)        ;0592: 532C4E4F
  557.     NEG    D1            ;0596: 4441
  558.     ADDQ    #2,D1            ;0598: 5441
  559.     CLR    (A5)            ;059A: 4255
  560.     ADDQ    #1,(A3)            ;059C: 5253
  561.     ADDQ.B    #2,21292(A7)        ;059E: 542F532C
  562.     DC.W    $494E            ;05A2
  563.     SUBQ    #1,(A4)            ;05A4: 5354
  564.     DC.W    $4341            ;05A6
  565.     DC.W    $4348            ;05A8
  566.     DC.W    $452F            ;05AA
  567.     SUBQ.B    #1,18766(A4)        ;05AC: 532C494E
  568.     SUBQ    #1,(A4)            ;05B0: 5354
  569.     CLR    (A5)            ;05B2: 4255
  570.     ADDQ    #1,(A3)            ;05B4: 5253
  571. LAB_003B:
  572.     ADDQ.B    #2,21292(A7)        ;05B6: 542F532C
  573. LAB_003C:
  574.     TRAP    #15            ;05BA: 4E4F
  575.     DC.W    $494E            ;05BC
  576.     SUBQ    #1,(A4)            ;05BE: 5354
  577.     DC.W    $4341            ;05C0
  578.     DC.W    $4348            ;05C2
  579.     DC.W    $452F            ;05C4
  580.     SUBQ.B    #1,20047(A4)        ;05C6: 532C4E4F
  581.     DC.W    $494E            ;05CA
  582.     SUBQ    #1,(A4)            ;05CC: 5354
  583.     CLR    (A5)            ;05CE: 4255
  584.     ADDQ    #1,(A3)            ;05D0: 5253
  585.     ADDQ.B    #2,21292(A7)        ;05D2: 542F532C
  586.     DC.W    $434F            ;05D6
  587.     ADDQ    #8,(A1)+        ;05D8: 5059
  588.     CLR    D1            ;05DA: 4241
  589.     DC.W    $434B            ;05DC
  590.     MOVE.L    (A3),11342(A7)        ;05DE: 2F532C4E
  591.     DC.W    $4F43            ;05E2
  592.     DC.W    $4F50            ;05E4
  593.     SUBQ    #4,D2            ;05E6: 5942
  594.     DC.W    $4143            ;05E8
  595.     DC.W    $4B2F            ;05EA
  596.     SUBQ.B    #1,17752(A4)        ;05EC: 532C4558
  597.     ADDQ    #2,D5            ;05F0: 5445
  598.     ADDQ    #1,A6            ;05F2: 524E
  599.     DC.W    $414C            ;05F4
  600.     DC.W    $4341            ;05F6
  601.     DC.W    $4348            ;05F8
  602.     DC.W    $452F            ;05FA
  603.     SUBQ.B    #1,20047(A4)        ;05FC: 532C4E4F
  604.     DC.W    $4558            ;0600
  605.     ADDQ    #2,D5            ;0602: 5445
  606.     ADDQ    #1,A6            ;0604: 524E
  607.     DC.W    $414C            ;0606
  608.     DC.W    $4341            ;0608
  609.     DC.W    $4348            ;060A
  610.     DC.W    $452F            ;060C
  611.     SUBQ.B    #1,17985(A4)        ;060E: 532C4641
  612.     SUBQ    #1,(A4)            ;0612: 5354
  613.     ADDQ    #1,A7            ;0614: 524F
  614.     DC.W    $4D2F            ;0616
  615.     SUBQ.B    #1,20047(A4)        ;0618: 532C4E4F
  616.     NOT    D1            ;061C: 4641
  617.     SUBQ    #1,(A4)            ;061E: 5354
  618.     ADDQ    #1,A7            ;0620: 524F
  619.     DC.W    $4D2F            ;0622
  620.     SUBQ.B    #1,21586(A4)        ;0624: 532C5452
  621.     DC.W    $4150            ;0628
  622.     MOVE.L    (A3),11342(A7)        ;062A: 2F532C4E
  623.     DC.W    $4F54            ;062E
  624.     ADDQ    #1,D1            ;0630: 5241
  625.     ADDQ.B    #8,21292(A7)        ;0632: 502F532C
  626.     TRAP    #15            ;0636: 4E4F
  627.     DC.W    $4D4D            ;0638
  628.     SUBQ    #2,(A4)            ;063A: 5554
  629.     DC.W    $4553            ;063C
  630.     ADDQ.B    #2,21292(A7)        ;063E: 542F532C
  631.     DC.W    $4348            ;0642
  632.     DC.W    $4543            ;0644
  633.     DC.W    $4B2F            ;0646
  634.     DC.W    $4B00            ;0648
  635.     MOVEA.L    (A6),A2            ;064A: 2456
  636.     DC.W    $4552            ;064C
  637.     MOVE    -(A0),D5        ;064E: 3A20
  638.     BLS.S    LAB_0042        ;0650: 6370
  639.     DC.W    $7520            ;0652
  640.     DC.W    $3338            ;0654
  641.     MOVE.L    40(A1,D2.W),D7        ;0656: 2E312028
  642.     DC.W    $3234            ;065A
  643.     DC.W    $2E36            ;065C
  644.     DC.W    $2E39            ;065E
  645.     DC.W    $3129            ;0660
  646.     DC.W    $0A0D            ;0662
  647.     DC.W    $0000            ;0664
  648. LAB_003D:
  649.     DC.W    $6465            ;0666
  650.     MOVEQ    #115,D3            ;0668: 7673
  651.     DC.W    $3A74            ;066A
  652.     MOVEQ    #97,D1            ;066C: 7261
  653.     MOVEQ    #45,D0            ;066E: 702D
  654.     DC.W    $6861            ;0670
  655.     BGT.S    LAB_0045        ;0672: 6E64
  656.     DC.W    $6C65            ;0674
  657.     MOVEQ    #0,D1            ;0676: 7200
  658. LAB_003E:
  659.     SUBQ    #3,-(A1)        ;0678: 5761
  660.     MOVEQ    #110,D1            ;067A: 726E
  661.     BVS.S    LAB_0047        ;067C: 696E
  662.     BEQ.S    LAB_0041        ;067E: 673A
  663.     MOVEA.L    -(A3),A0        ;0680: 2063
  664.     DC.W    $6F75            ;0682
  665.     BGE.S    LAB_0046        ;0684: 6C64
  666.     MOVEA.L    28532(A6),A0        ;0686: 206E6F74
  667.     DC.W    $2072            ;068A
  668.     DC.W    $656D            ;068C
  669.     BLE.S    LAB_004A        ;068E: 6F76
  670.     BCS.S    LAB_0040        ;0690: 6520
  671.     MOVEQ    #114,D2            ;0692: 7472
  672.     BSR.S    LAB_004A        ;0694: 6170
  673.     MOVEA.L    24942(A0),A0        ;0696: 2068616E
  674.     BCC.S    LAB_004B        ;069A: 646C
  675.     BCS.S    LAB_004D        ;069C: 6572
  676.     MOVE.L    -(A0),D7        ;069E: 2E20
  677.     DC.W    $4D4D            ;06A0
  678.     SUBQ.B    #2,-(A0)        ;06A2: 5520
  679.     BLE.S    LAB_004C        ;06A4: 6F66
  680.     BNE.S    LAB_0044        ;06A6: 662E
  681.     DC.W    $0A00            ;06A8
  682. LAB_003F:
  683.     SUBQ    #3,-(A1)        ;06AA: 5761
  684.     MOVEQ    #110,D1            ;06AC: 726E
  685.     BVS.S    LAB_004E        ;06AE: 696E
  686.     BEQ.S    LAB_0047        ;06B0: 673A
  687. LAB_0040:
  688.     MOVEA.L    -(A3),A0        ;06B2: 2063
  689.     BSR.S    LAB_004F        ;06B4: 616E
  690.     DC.W    $2774            ;06B6
  691.     MOVEA.L    -(A7),A0        ;06B8: 2067
  692. LAB_0041:
  693.     BCS.S    LAB_0051        ;06BA: 6574
  694.     DC.W    $206D            ;06BC
  695.     DC.W    $656D            ;06BE
  696.     BLE.S    LAB_0052+2        ;06C0: 6F72
  697. LAB_0042:
  698.     DC.W    $7920            ;06C2
  699.     DC.W    $666F            ;06C4
  700.     MOVEQ    #32,D1            ;06C6: 7220
  701.     NOT    D1            ;06C8: 4641
  702.     SUBQ    #1,(A4)            ;06CA: 5354
  703.     ADDQ    #1,A7            ;06CC: 524F
  704.     DC.W    $4D0A            ;06CE
  705.     DC.W    $0000            ;06D0
  706. LAB_0043:
  707.     DC.W    $4572            ;06D2
  708.     MOVEQ    #111,D1            ;06D4: 726F
  709. LAB_0044:
  710.     MOVEQ    #58,D1            ;06D6: 723A
  711. LAB_0045:
  712.     MOVEA.L    28448(A6),A0        ;06D8: 206E6F20
  713.     DC.W    $6275            ;06DC
  714.     DC.W    $7320            ;06DE
  715.     BCS.S    LAB_0059        ;06E0: 6572
  716.     MOVEQ    #111,D1            ;06E2: 726F
  717.     MOVEQ    #32,D1            ;06E4: 7220
  718.     DC.W    $6861            ;06E6
  719.     BGT.S    LAB_0057        ;06E8: 6E64
  720. LAB_0046:
  721.     DC.W    $6C65            ;06EA
  722. LAB_0047:
  723.     MOVEQ    #32,D1            ;06EC: 7220
  724.     BVS.S    LAB_005B        ;06EE: 696E
  725.     DC.W    $7374            ;06F0
  726.     BSR.S    LAB_005C        ;06F2: 616C
  727.     DC.W    $6C65            ;06F4
  728.     BCC.S    LAB_0049        ;06F6: 640A
  729.     DC.W    $0000            ;06F8
  730. LAB_0048:
  731.     SUBQ    #3,-(A1)        ;06FA: 5761
  732.     MOVEQ    #110,D1            ;06FC: 726E
  733.     BVS.S    LAB_005E        ;06FE: 696E
  734.     BEQ.S    LAB_0054        ;0700: 673A
  735. LAB_0049:
  736.     MOVEA.L    -(A3),A0        ;0702: 2063
  737.     BSR.S    LAB_0060        ;0704: 616E
  738. LAB_004A:
  739.     DC.W    $2774            ;0706
  740. LAB_004B:
  741.     MOVEA.L    -(A7),A0        ;0708: 2067
  742.     BCS.S    LAB_0062        ;070A: 6574
  743. LAB_004C:
  744.     DC.W    $206D            ;070C
  745.     DC.W    $656D            ;070E
  746. LAB_004D:
  747.     BLE.S    LAB_0063        ;0710: 6F72
  748.     DC.W    $7920            ;0712
  749.     DC.W    $666F            ;0714
  750.     MOVEQ    #32,D1            ;0716: 7220
  751.     ADDQ    #2,(A2)            ;0718: 5452
  752.     DC.W    $4150            ;071A
  753.     DC.W    $0A00            ;071C
  754. LAB_004E:
  755.     DC.W    $5379            ;071E
  756.     DC.W    $7374            ;0720
  757.     DC.W    $656D            ;0722
  758. LAB_004F:
  759.     MOVE    -(A0),D5        ;0724: 3A20
  760.     DC.W    $0000            ;0726
  761. LAB_0050:
  762.     MOVE    (EXT_0004).W,D3        ;0728: 36383034
  763.     MOVE    -(A0),D0        ;072C: 3020
  764.     DC.W    $0000            ;072E
  765. LAB_0051:
  766.     DC.W    $3638            ;0730
  767. LAB_0052:
  768.     MOVE    32(A3,D3.W),D0        ;0732: 30333020
  769.     DC.W    $0000            ;0736
  770. LAB_0053:
  771.     MOVE    (EXT_0003).W,D3        ;0738: 36383032
  772. LAB_0054:
  773.     MOVE    -(A0),D0        ;073C: 3020
  774.     DC.W    $0000            ;073E
  775. LAB_0055:
  776.     DC.W    $3638            ;0740
  777.     MOVE    32(A1,D3.W),D0        ;0742: 30313020
  778.     DC.W    $0000            ;0746
  779. LAB_0056:
  780.     MOVE    (EXT_0002).W,D3        ;0748: 36383030
  781.     MOVE    -(A0),D0        ;074C: 3020
  782. LAB_0057:
  783.     DC.W    $0000            ;074E
  784. LAB_0058:
  785.     MOVE    (EXT_0005).W,D3        ;0750: 36383838
  786. LAB_0059:
  787.     MOVE    -(A0),D1        ;0754: 3220
  788.     DC.W    $0000            ;0756
  789. LAB_005A:
  790.     MOVE    (EXT_0005).W,D3        ;0758: 36383838
  791.     MOVE    -(A0),-(A0)        ;075C: 3120
  792. LAB_005B:
  793.     DC.W    $0000            ;075E
  794. LAB_005C:
  795.     DC.W    $3638            ;0760
  796.     DC.W    $3835            ;0762
  797.     MOVE    -(A0),-(A0)        ;0764: 3120
  798.     DC.W    $0000            ;0766
  799. LAB_005D:
  800.     NOT    -(A1)            ;0768: 4661
  801.     DC.W    $7374            ;076A
  802.     ADDQ    #1,A7            ;076C: 524F
  803. LAB_005E:
  804.     DC.W    $4D20            ;076E
  805.     DC.W    $0000            ;0770
  806. LAB_005F:
  807.     DC.W    $5472            ;0772
  808. LAB_0060:
  809.     BSR.S    LAB_0072        ;0774: 6170
  810.     MOVE.L    D0,D0            ;0776: 2000
  811. LAB_0061:
  812.     MOVEA.L    A1,A4            ;0778: 2849
  813.     LINK    A3,#21562        ;077A: 4E53543A
  814.     MOVE.L    D0,D0            ;077E: 2000
  815. LAB_0062:
  816.     MOVE.L    USP,A7            ;0780: 4E6F
  817.     DC.W    $0000            ;0782
  818. LAB_0063:
  819.     DC.W    $4361            ;0784
  820.     BLS.S    LAB_0074        ;0786: 6368
  821.     DC.W    $6500            ;0788
  822. LAB_0064:
  823.     MOVE.L    D0,D0            ;078A: 2000
  824. LAB_0065:
  825.     DC.W    $4275            ;078C
  826.     MOVEQ    #115,D1            ;078E: 7273
  827.     MOVEQ    #41,D2            ;0790: 7429
  828.     DC.W    $2028            ;0792
  829.     NEG    D1            ;0794: 4441
  830.     ADDQ    #2,D1            ;0796: 5441
  831.     MOVE    -(A0),D5        ;0798: 3A20
  832.     DC.W    $0000            ;079A
  833. LAB_0066:
  834.     MOVE.L    USP,A7            ;079C: 4E6F
  835.     DC.W    $4361            ;079E
  836.     BLS.S    LAB_0079+2        ;07A0: 6368
  837.     BCS.S    LAB_006C        ;07A2: 6520
  838.     DC.W    $0000            ;07A4
  839. LAB_0067:
  840.     DC.W    $4361            ;07A6
  841.     BLS.S    LAB_007A        ;07A8: 6368
  842.     BCS.S    LAB_006D        ;07AA: 6520
  843.     DC.W    $0000            ;07AC
  844. LAB_0068:
  845.     DC.W    $436F            ;07AE
  846.     MOVEQ    #121,D0            ;07B0: 7079
  847.     CLR    -(A1)            ;07B2: 4261
  848.     DC.W    $636B            ;07B4
  849.     DC.W    $0000            ;07B6
  850. LAB_0069:
  851.     DC.W    $4275            ;07B8
  852.     MOVEQ    #115,D1            ;07BA: 7273
  853.     MOVEQ    #0,D2            ;07BC: 7400
  854. LAB_006A:
  855.     MOVE.L    D0,-(A4)        ;07BE: 2900
  856. LAB_006B:
  857.     MOVE.L    17784(A0),D0        ;07C0: 20284578
  858. LAB_006C:
  859.     MOVEQ    #101,D2            ;07C4: 7465
  860.     MOVEQ    #110,D1            ;07C6: 726E
  861.     BSR.S    LAB_007D        ;07C8: 616C
  862.     MOVEA.L    D3,A0            ;07CA: 2043
  863. LAB_006D:
  864.     DC.W    $6163            ;07CC
  865.     DC.W    $6865            ;07CE
  866.     MOVE.L    D0,-(A4)        ;07D0: 2900
  867. LAB_006E:
  868.     DC.W    $0A00            ;07D2
  869. LAB_006F:
  870.     DC.W    $3638            ;07D4
  871.     MOVE    0(A1,D3.W),D0        ;07D6: 30313000
  872. LAB_0070:
  873.     MOVE    (EXT_0003).W,D3        ;07DA: 36383032
  874.     MOVE    D0,D0            ;07DE: 3000
  875. LAB_0071:
  876.     DC.W    $3638            ;07E0
  877.     MOVE    0(A3,D3.W),D0        ;07E2: 30333000
  878. LAB_0072:
  879.     MOVE    (EXT_0004).W,D3        ;07E6: 36383034
  880.     MOVE    D0,D0            ;07EA: 3000
  881. LAB_0073:
  882.     MOVE    (EXT_0005).W,D3        ;07EC: 36383838
  883. LAB_0074:
  884.     MOVE    D0,-(A0)        ;07F0: 3100
  885. LAB_0075:
  886.     MOVE    (EXT_0005).W,D3        ;07F2: 36383838
  887.     MOVE    D0,D1            ;07F6: 3200
  888. LAB_0076:
  889.     DC.W    $6D6D            ;07F8
  890.     DC.W    $7500            ;07FA
  891. LAB_0077:
  892.     BNE.S    LAB_0080+2        ;07FC: 6670
  893.     DC.W    $7500            ;07FE
  894. LAB_0078:
  895.     SUBQ    #3,-(A1)        ;0800: 5761
  896.     MOVEQ    #110,D1            ;0802: 726E
  897.     BVS.S    LAB_0081        ;0804: 696E
  898.     BEQ.S    LAB_007E        ;0806: 673A
  899. LAB_0079:
  900.     MOVEA.L    28278(A1),A0        ;0808: 20696E76
  901.     BSR.S    LAB_0082+2        ;080C: 616C
  902.     BVS.S    LAB_0081        ;080E: 6964
  903.     MOVE.L    -(A5),D0        ;0810: 2025
  904. LAB_007A:
  905.     DC.W    $7320            ;0812
  906.     DC.W    $6B65            ;0814
  907.     DC.W    $7977            ;0816
  908.     BLE.S    LAB_0085        ;0818: 6F72
  909.     BCC.S    LAB_007C        ;081A: 640A
  910.     DC.W    $0000            ;081C
  911. LAB_007B:
  912.     LINK    A5,#-8            ;081E: 4E55FFF8
  913.     MOVEM.L    D5-D7/A3/A6,-(A7)    ;0822: 48E70712
  914. LAB_007C:
  915.     MOVE.L    D0,D7            ;0826: 2E00
  916.     MOVE.L    D1,D6            ;0828: 2C01
  917.     MOVE.L    D7,D5            ;082A: 2A07
  918.     ADD.L    D6,D5            ;082C: DA86
  919.     MOVEA    #$0004,A0        ;082E: 307C0004
  920.     MOVE.L    D5,D0            ;0832: 2005
  921.     MOVEQ    #0,D1            ;0834: 7200
  922. LAB_007D:
  923.     MOVEA.L    (A0),A6            ;0836: 2C50
  924.     JSR    -198(A6)        ;0838: 4EAEFF3A
  925.     MOVEA.L    D0,A3            ;083C: 2640
  926.     MOVE.L    A3,D0            ;083E: 200B
  927.     BNE.S    LAB_007F        ;0840: 6604
  928. LAB_007E:
  929.     MOVEQ    #0,D0            ;0842: 7000
  930.     BRA.S    LAB_0083        ;0844: 603A
  931. LAB_007F:
  932.     MOVEA    #$0004,A0        ;0846: 307C0004
  933.     MOVEA.L    (A0),A6            ;084A: 2C50
  934.     JSR    -132(A6)        ;084C: 4EAEFF7C
  935.     MOVE.L    D6,D0            ;0850: 2006
  936.     SUBQ.L    #1,D0            ;0852: 5380
  937.     NOT.L    D0            ;0854: 4680
  938.     MOVE.L    A3,D1            ;0856: 220B
  939.     ADD.L    D6,D1            ;0858: D286
  940.     SUBQ.L    #1,D1            ;085A: 5381
  941.     AND.L    D0,D1            ;085C: C280
  942.     MOVE.L    D1,24(A7)        ;085E: 2F410018
  943.     MOVEA.L    A3,A1            ;0862: 224B
  944.     MOVE.L    D5,D0            ;0864: 2005
  945.     JSR    -210(A6)        ;0866: 4EAEFF2E
  946.     MOVE.L    D7,D0            ;086A: 2007
  947. LAB_0080:
  948.     MOVEA.L    24(A7),A1        ;086C: 226F0018
  949.     JSR    -204(A6)        ;0870: 4EAEFF34
  950. LAB_0081:
  951.     MOVE.L    D0,24(A7)        ;0874: 2F400018
  952. LAB_0082:
  953.     JSR    -138(A6)        ;0878: 4EAEFF76
  954.     MOVE.L    24(A7),D0        ;087C: 202F0018
  955. LAB_0083:
  956.     MOVEM.L    (A7)+,D5-D7/A3/A6    ;0880: 4CDF48E0
  957.     UNLK    A5            ;0884: 4E5D
  958.     RTS                ;0886: 4E75
  959. LAB_0084:
  960.     LINK    A5,#-40            ;0888: 4E55FFD8
  961. LAB_0085:
  962.     MOVEM.L    D6-D7/A2-A3/A6,-(A7)    ;088C: 48E70332
  963.     MOVEQ    #8,D0            ;0890: 7008
  964.     SWAP    D0            ;0892: 4840
  965.     MOVE.L    #$00008000,D1        ;0894: 223C00008000
  966.     BSR.S    LAB_007B        ;089A: 6182
  967.     MOVEA.L    D0,A3            ;089C: 2640
  968.     MOVE.L    #$00000200,D0        ;089E: 203C00000200
  969.     MOVEQ    #16,D1            ;08A4: 7210
  970.     BSR    LAB_007B        ;08A6: 6100FF76
  971.     MOVE.L    D0,24(A7)        ;08AA: 2F400018
  972.     MOVEQ    #64,D0            ;08AE: 7040
  973.     ADD.L    D0,D0            ;08B0: D080
  974.     MOVEQ    #16,D1            ;08B2: 7210
  975.     BSR    LAB_007B        ;08B4: 6100FF68
  976.     MOVEA.L    D0,A2            ;08B8: 2440
  977.     MOVEA.L    A2,A0            ;08BA: 204A
  978.     MOVE.L    A0,20(A7)        ;08BC: 2F480014
  979.     MOVE.L    A3,D0            ;08C0: 200B
  980.     BEQ.S    LAB_0086        ;08C2: 670A
  981.     TST.L    24(A7)            ;08C4: 4AAF0018
  982.     BEQ.S    LAB_0086        ;08C8: 6704
  983.     MOVE.L    A2,D0            ;08CA: 200A
  984.     BNE.S    LAB_008A        ;08CC: 6650
  985. LAB_0086:
  986.     MOVE.L    A3,D0            ;08CE: 200B
  987.     BEQ.S    LAB_0087        ;08D0: 6718
  988.     MOVEA    #$0004,A1        ;08D2: 327C0004
  989.     MOVE.L    A1,20(A7)        ;08D6: 2F490014
  990.     MOVEA.L    A3,A1            ;08DA: 224B
  991.     MOVEQ    #8,D0            ;08DC: 7008
  992.     SWAP    D0            ;08DE: 4840
  993.     MOVEA.L    20(A7),A6        ;08E0: 2C6F0014
  994.     MOVEA.L    (A6),A6            ;08E4: 2C56
  995.     JSR    -210(A6)        ;08E6: 4EAEFF2E
  996. LAB_0087:
  997.     MOVEA.L    24(A7),A3        ;08EA: 266F0018
  998.     MOVE.L    A3,D0            ;08EE: 200B
  999.     BEQ.S    LAB_0088        ;08F0: 6712
  1000.     MOVEA    #$0004,A0        ;08F2: 307C0004
  1001.     MOVEA.L    A3,A1            ;08F6: 224B
  1002.     MOVE.L    #$00000200,D0        ;08F8: 203C00000200
  1003.     MOVEA.L    (A0),A6            ;08FE: 2C50
  1004.     JSR    -210(A6)        ;0900: 4EAEFF2E
  1005. LAB_0088:
  1006.     MOVE.L    A2,D0            ;0904: 200A
  1007.     BEQ.S    LAB_0089        ;0906: 6710
  1008.     MOVEA    #$0004,A0        ;0908: 307C0004
  1009.     MOVEA.L    A2,A1            ;090C: 224A
  1010.     MOVEQ    #64,D0            ;090E: 7040
  1011.     ADD.L    D0,D0            ;0910: D080
  1012.     MOVEA.L    (A0),A6            ;0912: 2C50
  1013.     JSR    -210(A6)        ;0914: 4EAEFF2E
  1014. LAB_0089:
  1015.     MOVEQ    #0,D0            ;0918: 7000
  1016.     BRA    LAB_0091        ;091A: 600000C2
  1017. LAB_008A:
  1018.     BSR    LAB_00A5        ;091E: 610002F0
  1019.     JSR    LAB_00B3(PC)        ;0922: 4EBA0430
  1020.     MOVEQ    #64,D1            ;0926: 7240
  1021.     ADD.L    D1,D0            ;0928: D081
  1022.     MOVEA.L    D0,A0            ;092A: 2040
  1023.     MOVE.L    (A0),D1            ;092C: 2210
  1024.     ANDI    #$0000,D1        ;092E: 02410000
  1025.     MOVEA.L    D1,A2            ;0932: 2441
  1026.     MOVEA    #$0004,A0        ;0934: 307C0004
  1027.     MOVEA.L    A3,A1            ;0938: 224B
  1028.     MOVE.L    A0,28(A7)        ;093A: 2F48001C
  1029.     MOVE.L    A1,32(A7)        ;093E: 2F490020
  1030.     MOVEA.L    A2,A0            ;0942: 204A
  1031.     MOVEQ    #8,D0            ;0944: 7008
  1032.     SWAP    D0            ;0946: 4840
  1033.     MOVEA.L    28(A7),A6        ;0948: 2C6F001C
  1034.     MOVEA.L    (A6),A6            ;094C: 2C56
  1035.     JSR    -630(A6)        ;094E: 4EAEFD8A
  1036.     MOVEQ    #0,D7            ;0952: 7E00
  1037.     MOVEA.L    20(A7),A3        ;0954: 266F0014
  1038.     MOVE.L    32(A7),D0        ;0958: 202F0020
  1039.     MOVE.L    D0,D6            ;095C: 2C00
  1040.     ORI    #$0001,D6        ;095E: 00460001
  1041.     BRA.S    LAB_008E        ;0962: 601A
  1042. LAB_008B:
  1043.     MOVE.L    A2,D0            ;0964: 200A
  1044.     CMP.L    D7,D0            ;0966: B087
  1045.     BNE.S    LAB_008C        ;0968: 6604
  1046.     MOVE.L    D6,(A3)            ;096A: 2686
  1047.     BRA.S    LAB_008D        ;096C: 6008
  1048. LAB_008C:
  1049.     MOVE.L    D7,D0            ;096E: 2007
  1050.     ORI    #$0001,D0        ;0970: 00400001
  1051.     MOVE.L    D0,(A3)            ;0974: 2680
  1052. LAB_008D:
  1053.     ADDI.L    #$00080000,D7        ;0976: 068700080000
  1054.     ADDQ.L    #4,A3            ;097C: 588B
  1055. LAB_008E:
  1056.     CMPI.L    #$00F80000,D7        ;097E: 0C8700F80000
  1057.     BCS.S    LAB_008B        ;0984: 65DE
  1058.     MOVEA.L    20(A7),A0        ;0986: 206F0014
  1059.     MOVE.L    D6,124(A0)        ;098A: 2146007C
  1060.     MOVE.L    A0,D0            ;098E: 2008
  1061.     ORI    #$0002,D0        ;0990: 00400002
  1062.     MOVEA.L    24(A7),A1        ;0994: 226F0018
  1063.     MOVE.L    D0,(A1)            ;0998: 2280
  1064.     LEA    4(A1),A3        ;099A: 47E90004
  1065.     MOVE.L    #$01000000,D7        ;099E: 2E3C01000000
  1066.     LEA    512(A1),A2        ;09A4: 45E90200
  1067.     BRA.S    LAB_0090        ;09A8: 600E
  1068. LAB_008F:
  1069.     MOVE.L    D7,D0            ;09AA: 2007
  1070.     ORI    #$0001,D0        ;09AC: 00400001
  1071.     MOVE.L    D0,(A3)+        ;09B0: 26C0
  1072.     ADDI.L    #$01000000,D7        ;09B2: 068701000000
  1073. LAB_0090:
  1074.     CMPA.L    A2,A3            ;09B8: B7CA
  1075.     BCS.S    LAB_008F        ;09BA: 65EE
  1076.     MOVE.L    #$80000202,-24(A5)    ;09BC: 2B7C80000202FFE8
  1077.     MOVE.L    24(A7),-20(A5)        ;09C4: 2B6F0018FFEC
  1078.     PEA    -24(A5)            ;09CA: 486DFFE8
  1079.     JSR    LAB_00AD(PC)        ;09CE: 4EBA0320
  1080.     MOVE.L    #$80F17540,(A7)        ;09D2: 2EBC80F17540
  1081.     JSR    LAB_00B1(PC)        ;09D8: 4EBA035A
  1082.     MOVEQ    #1,D0            ;09DC: 7001
  1083. LAB_0091:
  1084.     MOVEM.L    -60(A5),D6-D7/A2-A3/A6    ;09DE: 4CED4CC0FFC4
  1085.     UNLK    A5            ;09E4: 4E5D
  1086.     RTS                ;09E6: 4E75
  1087. LAB_0092:
  1088.     LINK    A5,#-36            ;09E8: 4E55FFDC
  1089.     MOVEM.L    D6-D7/A2-A3/A6,-(A7)    ;09EC: 48E70332
  1090.     MOVE.L    #$00000200,D0        ;09F0: 203C00000200
  1091.     MOVEQ    #16,D1            ;09F6: 7210
  1092.     BSR    LAB_007B        ;09F8: 6100FE24
  1093.     MOVE.L    D0,28(A7)        ;09FC: 2F40001C
  1094.     MOVE.L    #$00000400,D0        ;0A00: 203C00000400
  1095.     MOVEQ    #16,D1            ;0A06: 7210
  1096.     BSR    LAB_007B        ;0A08: 6100FE14
  1097.     MOVEA.L    D0,A2            ;0A0C: 2440
  1098.     MOVEA.L    A2,A0            ;0A0E: 204A
  1099.     MOVE.L    A0,24(A7)        ;0A10: 2F480018
  1100.     MOVE.L    #$00000400,D0        ;0A14: 203C00000400
  1101.     MOVEQ    #16,D1            ;0A1A: 7210
  1102.     BSR    LAB_007B        ;0A1C: 6100FE00
  1103.     MOVEA.L    D0,A3            ;0A20: 2640
  1104.     MOVEA.L    A3,A0            ;0A22: 204B
  1105.     MOVE.L    A0,20(A7)        ;0A24: 2F480014
  1106.     MOVE.L    28(A7),D0        ;0A28: 202F001C
  1107.     BEQ.S    LAB_0093        ;0A2C: 6708
  1108.     MOVE.L    A2,D1            ;0A2E: 220A
  1109.     BEQ.S    LAB_0093        ;0A30: 6704
  1110.     MOVE.L    A3,D1            ;0A32: 220B
  1111.     BNE.S    LAB_0097        ;0A34: 6650
  1112. LAB_0093:
  1113.     TST.L    D0            ;0A36: 4A80
  1114.     BEQ.S    LAB_0094        ;0A38: 671A
  1115.     MOVEA    #$0004,A1        ;0A3A: 327C0004
  1116.     MOVE.L    A1,20(A7)        ;0A3E: 2F490014
  1117.     MOVEA.L    D0,A1            ;0A42: 2240
  1118.     MOVE.L    #$00000200,D0        ;0A44: 203C00000200
  1119.     MOVEA.L    20(A7),A6        ;0A4A: 2C6F0014
  1120.     MOVEA.L    (A6),A6            ;0A4E: 2C56
  1121.     JSR    -210(A6)        ;0A50: 4EAEFF2E
  1122. LAB_0094:
  1123.     MOVE.L    A2,D0            ;0A54: 200A
  1124.     BEQ.S    LAB_0095        ;0A56: 6712
  1125.     MOVEA    #$0004,A0        ;0A58: 307C0004
  1126.     MOVEA.L    A2,A1            ;0A5C: 224A
  1127.     MOVE.L    #$00000400,D0        ;0A5E: 203C00000400
  1128.     MOVEA.L    (A0),A6            ;0A64: 2C50
  1129.     JSR    -210(A6)        ;0A66: 4EAEFF2E
  1130. LAB_0095:
  1131.     MOVE.L    A3,D0            ;0A6A: 200B
  1132.     BEQ.S    LAB_0096        ;0A6C: 6712
  1133.     MOVEA    #$0004,A0        ;0A6E: 307C0004
  1134.     MOVEA.L    A3,A1            ;0A72: 224B
  1135.     MOVE.L    #$00000400,D0        ;0A74: 203C00000400
  1136.     MOVEA.L    (A0),A6            ;0A7A: 2C50
  1137.     JSR    -210(A6)        ;0A7C: 4EAEFF2E
  1138. LAB_0096:
  1139.     MOVEQ    #0,D0            ;0A80: 7000
  1140.     BRA    LAB_00A1        ;0A82: 600000EA
  1141. LAB_0097:
  1142.     MOVEA.L    24(A7),A2        ;0A86: 246F0018
  1143.     MOVEA.L    20(A7),A3        ;0A8A: 266F0014
  1144.     BSR    LAB_00A5        ;0A8E: 61000180
  1145.     MOVE.L    A3,D0            ;0A92: 200B
  1146.     ORI    #$0002,D0        ;0A94: 00400002
  1147.     MOVE.L    D0,(A2)            ;0A98: 2480
  1148.     LEA    4(A2),A3        ;0A9A: 47EA0004
  1149.     MOVEQ    #1,D7            ;0A9E: 7E01
  1150.     SWAP    D7            ;0AA0: 4847
  1151.     ADDA    #$03E0,A2        ;0AA2: D4FC03E0
  1152.     BRA.S    LAB_0099        ;0AA6: 600E
  1153. LAB_0098:
  1154.     MOVE.L    D7,D0            ;0AA8: 2007
  1155.     ORI    #$0001,D0        ;0AAA: 00400001
  1156.     MOVE.L    D0,(A3)+        ;0AAE: 26C0
  1157.     ADDI.L    #$00010000,D7        ;0AB0: 068700010000
  1158. LAB_0099:
  1159.     CMPA.L    A2,A3            ;0AB6: B7CA
  1160.     BCS.S    LAB_0098        ;0AB8: 65EE
  1161.     MOVEA.L    A2,A3            ;0ABA: 264A
  1162.     MOVE.L    #$00F80000,D7        ;0ABC: 2E3C00F80000
  1163.     MOVEA.L    24(A7),A0        ;0AC2: 206F0018
  1164.     ADDA    #$0400,A0        ;0AC6: D0FC0400
  1165.     MOVEA.L    A0,A2            ;0ACA: 2448
  1166.     BRA.S    LAB_009B        ;0ACC: 6012
  1167. LAB_009A:
  1168.     MOVE.L    D7,D0            ;0ACE: 2007
  1169.     ORI    #$0004,D0        ;0AD0: 00400004
  1170.     ORI    #$0001,D0        ;0AD4: 00400001
  1171.     MOVE.L    D0,(A3)+        ;0AD8: 26C0
  1172.     ADDI.L    #$00010000,D7        ;0ADA: 068700010000
  1173. LAB_009B:
  1174.     CMPA.L    A2,A3            ;0AE0: B7CA
  1175.     BCS.S    LAB_009A        ;0AE2: 65EA
  1176.     MOVEA.L    20(A7),A0        ;0AE4: 206F0014
  1177.     CLR.L    (A0)            ;0AE8: 4290
  1178.     LEA    4(A0),A3        ;0AEA: 47E80004
  1179.     MOVE.L    #$00000100,D7        ;0AEE: 2E3C00000100
  1180.     LEA    1024(A0),A2        ;0AF4: 45E80400
  1181.     BRA.S    LAB_009D        ;0AF8: 600E
  1182. LAB_009C:
  1183.     MOVE.L    D7,D0            ;0AFA: 2007
  1184.     ORI    #$0001,D0        ;0AFC: 00400001
  1185.     MOVE.L    D0,(A3)+        ;0B00: 26C0
  1186.     ADDI.L    #$00000100,D7        ;0B02: 068700000100
  1187. LAB_009D:
  1188.     CMPA.L    A2,A3            ;0B08: B7CA
  1189.     BCS.S    LAB_009C        ;0B0A: 65EE
  1190.     MOVE.L    24(A7),D0        ;0B0C: 202F0018
  1191.     ORI    #$0002,D0        ;0B10: 00400002
  1192.     MOVEA.L    28(A7),A0        ;0B14: 206F001C
  1193.     MOVE.L    D0,(A0)            ;0B18: 2080
  1194.     LEA    4(A0),A3        ;0B1A: 47E80004
  1195.     MOVE.L    #$01000000,D7        ;0B1E: 2E3C01000000
  1196.     LEA    256(A0),A2        ;0B24: 45E80100
  1197.     BRA.S    LAB_009F        ;0B28: 600E
  1198. LAB_009E:
  1199.     MOVE.L    D7,D0            ;0B2A: 2007
  1200.     ORI    #$0001,D0        ;0B2C: 00400001
  1201.     MOVE.L    D0,(A3)+        ;0B30: 26C0
  1202.     ADDI.L    #$01000000,D7        ;0B32: 068701000000
  1203. LAB_009F:
  1204.     CMPA.L    A2,A3            ;0B38: B7CA
  1205.     BCS.S    LAB_009E        ;0B3A: 65EE
  1206.     MOVEQ    #64,D6            ;0B3C: 7C40
  1207.     MOVE    #$00FF,D0        ;0B3E: 303C00FF
  1208.     MOVEQ    #0,D1            ;0B42: 7200
  1209.     MOVEA.L    A2,A0            ;0B44: 204A
  1210. LAB_00A0:
  1211.     MOVE.B    D1,(A0)+        ;0B46: 10C1
  1212.     DBF    D0,LAB_00A0        ;0B48: 51C8FFFC
  1213.     MOVE.L    #$80000202,-24(A5)    ;0B4C: 2B7C80000202FFE8
  1214.     MOVE.L    28(A7),-20(A5)        ;0B54: 2B6F001CFFEC
  1215.     PEA    -24(A5)            ;0B5A: 486DFFE8
  1216.     JSR    LAB_00AD(PC)        ;0B5E: 4EBA0190
  1217.     MOVE.L    #$80817880,(A7)        ;0B62: 2EBC80817880
  1218.     JSR    LAB_00B1(PC)        ;0B68: 4EBA01CA
  1219.     MOVEQ    #1,D0            ;0B6C: 7001
  1220. LAB_00A1:
  1221.     MOVEM.L    -56(A5),D6-D7/A2-A3/A6    ;0B6E: 4CED4CC0FFC8
  1222.     UNLK    A5            ;0B74: 4E5D
  1223.     RTS                ;0B76: 4E75
  1224. LAB_00A2:
  1225.     LINK    A5,#-24            ;0B78: 4E55FFE8
  1226.     MOVEM.L    A2-A3/A6,-(A7)        ;0B7C: 48E70032
  1227.     CLR.L    -(A7)            ;0B80: 42A7
  1228.     JSR    LAB_00B1(PC)        ;0B82: 4EBA01B0
  1229.     PEA    -16(A5)            ;0B86: 486DFFF0
  1230.     JSR    LAB_00AB(PC)        ;0B8A: 4EBA0144
  1231.     ADDQ    #8,A7            ;0B8E: 504F
  1232.     MOVEA.L    -12(A5),A0        ;0B90: 206DFFF4
  1233.     MOVE.L    (A0),D0            ;0B94: 2010
  1234.     ANDI    #$FFF0,D0        ;0B96: 0240FFF0
  1235.     MOVEA.L    D0,A3            ;0B9A: 2640
  1236.     MOVE.L    (A3),D0            ;0B9C: 2013
  1237.     ANDI    #$FFF0,D0        ;0B9E: 0240FFF0
  1238.     MOVEA    #$0004,A2        ;0BA2: 347C0004
  1239.     MOVE.L    D0,D1            ;0BA6: 2200
  1240.     ANDI    #$FF00,D1        ;0BA8: 0241FF00
  1241.     MOVE.L    D0,12(A7)        ;0BAC: 2F40000C
  1242.     MOVE.L    A0,16(A7)        ;0BB0: 2F480010
  1243.     TST.L    D1            ;0BB4: 4A81
  1244.     BEQ.S    LAB_00A3        ;0BB6: 671E
  1245.     MOVEA.L    A3,A1            ;0BB8: 224B
  1246.     MOVE.L    #$00000400,D0        ;0BBA: 203C00000400
  1247.     MOVEA.L    (A2),A6            ;0BC0: 2C52
  1248.     JSR    -210(A6)        ;0BC2: 4EAEFF2E
  1249.     MOVEA.L    12(A7),A1        ;0BC6: 226F000C
  1250.     MOVE.L    #$00000400,D0        ;0BCA: 203C00000400
  1251.     JSR    -210(A6)        ;0BD0: 4EAEFF2E
  1252.     BRA.S    LAB_00A4        ;0BD4: 6024
  1253. LAB_00A3:
  1254.     MOVE.L    124(A3),D0        ;0BD6: 202B007C
  1255.     ANDI    #$FF00,D0        ;0BDA: 0240FF00
  1256.     MOVE.L    D0,12(A7)        ;0BDE: 2F40000C
  1257.     MOVEA.L    A3,A1            ;0BE2: 224B
  1258.     MOVEQ    #64,D0            ;0BE4: 7040
  1259.     ADD.L    D0,D0            ;0BE6: D080
  1260.     MOVEA.L    (A2),A6            ;0BE8: 2C52
  1261.     JSR    -210(A6)        ;0BEA: 4EAEFF2E
  1262.     MOVEA.L    12(A7),A1        ;0BEE: 226F000C
  1263.     MOVEQ    #8,D0            ;0BF2: 7008
  1264.     SWAP    D0            ;0BF4: 4840
  1265.     JSR    -210(A6)        ;0BF6: 4EAEFF2E
  1266. LAB_00A4:
  1267.     MOVEA.L    16(A7),A1        ;0BFA: 226F0010
  1268.     MOVE.L    #$00000200,D0        ;0BFE: 203C00000200
  1269.     JSR    -210(A6)        ;0C04: 4EAEFF2E
  1270.     MOVEM.L    (A7)+,A2-A3/A6        ;0C08: 4CDF4C00
  1271.     UNLK    A5            ;0C0C: 4E5D
  1272.     RTS                ;0C0E: 4E75
  1273. LAB_00A5:
  1274.     LINK    A5,#-16            ;0C10: 4E55FFF0
  1275.     MOVEM.L    D7/A6,-(A7)        ;0C14: 48E70102
  1276.     JSR    LAB_00B3(PC)        ;0C18: 4EBA013A
  1277.     MOVE.L    D0,D7            ;0C1C: 2E00
  1278.     TST.L    D7            ;0C1E: 4A87
  1279.     BNE.S    LAB_00A6        ;0C20: 6640
  1280.     MOVEA    #$0004,A0        ;0C22: 307C0004
  1281.     MOVE.L    #$00000400,D0        ;0C26: 203C00000400
  1282.     MOVEQ    #1,D1            ;0C2C: 7201
  1283.     MOVEA.L    (A0),A6            ;0C2E: 2C50
  1284.     JSR    -198(A6)        ;0C30: 4EAEFF3A
  1285.     MOVE.L    D0,8(A7)        ;0C34: 2F400008
  1286.     TST.L    D0            ;0C38: 4A80
  1287.     BEQ.S    LAB_00A6        ;0C3A: 6726
  1288.     MOVEA.L    D7,A0            ;0C3C: 2047
  1289.     MOVEA    #$0004,A1        ;0C3E: 327C0004
  1290.     MOVE.L    A1,20(A7)        ;0C42: 2F490014
  1291.     MOVEA.L    D0,A1            ;0C46: 2240
  1292.     MOVE.L    #$00000400,D0        ;0C48: 203C00000400
  1293.     MOVEA.L    20(A7),A6        ;0C4E: 2C6F0014
  1294.     MOVEA.L    (A6),A6            ;0C52: 2C56
  1295.     JSR    -630(A6)        ;0C54: 4EAEFD8A
  1296.     MOVE.L    8(A7),-(A7)        ;0C58: 2F2F0008
  1297.     JSR    LAB_00B5(PC)        ;0C5C: 4EBA011C
  1298.     ADDQ    #4,A7            ;0C60: 584F
  1299. LAB_00A6:
  1300.     MOVEM.L    (A7)+,D7/A6        ;0C62: 4CDF4080
  1301.     UNLK    A5            ;0C66: 4E5D
  1302.     RTS                ;0C68: 4E75
  1303.     DC.W    $0000            ;0C6A
  1304. LAB_00A7:
  1305.     MOVEM.L    A3-A6,-(A7)        ;0C6C: 48E7001E
  1306.     MOVEA.L    ABSEXECBASE,A6        ;0C70: 2C7900000004
  1307.     MOVEQ    #0,D0            ;0C76: 7000
  1308.     BTST    #3,297(A6)        ;0C78: 082E00030129
  1309.     BNE.S    LAB_00A8        ;0C7E: 662E
  1310.     MOVE.L    #$000109BE,D0        ;0C80: 203C000109BE
  1311.     BTST    #2,297(A6)        ;0C86: 082E00020129
  1312.     BNE.S    LAB_00A8        ;0C8C: 6620
  1313.     SUBA.L    A1,A1            ;0C8E: 93C9
  1314.     JSR    -294(A6)        ;0C90: 4EAEFEDA
  1315.     MOVEA.L    D0,A3            ;0C94: 2640
  1316.     MOVEA.L    50(A3),A4        ;0C96: 286B0032
  1317.     MOVE.L    #LAB_00A9,50(A3)    ;0C9A: 277C00000CB40032
  1318.     SUBQ.L    #4,A7            ;0CA2: 598F
  1319.     DC.W    $F017            ;0CA4
  1320.     CLR.B    D0            ;0CA6: 4200
  1321.     ADDQ.L    #4,A7            ;0CA8: 588F
  1322.     MOVE.L    A4,50(A3)        ;0CAA: 274C0032
  1323. LAB_00A8:
  1324.     MOVEM.L    (A7)+,A3-A6        ;0CAE: 4CDF7800
  1325.     RTS                ;0CB2: 4E75
  1326. LAB_00A9:
  1327.     MOVE.L    (A7)+,D0        ;0CB4: 201F
  1328.     CMPI    #$000B,D0        ;0CB6: 0C40000B
  1329.     BEQ.S    LAB_00AA        ;0CBA: 670C
  1330.     MOVE.L    #$00010CF3,D0        ;0CBC: 203C00010CF3
  1331.     ADDQ.L    #4,2(A7)        ;0CC2: 58AF0002
  1332.     RTE                ;0CC6: 4E73
  1333. LAB_00AA:
  1334.     MOVEQ    #0,D0            ;0CC8: 7000
  1335.     ADDQ.L    #4,2(A7)        ;0CCA: 58AF0002
  1336.     RTE                ;0CCE: 4E73
  1337. LAB_00AB:
  1338.     MOVEA.L    4(A7),A0        ;0CD0: 206F0004
  1339.     MOVEA.L    ABSEXECBASE,A6        ;0CD4: 2C7900000004
  1340.     MOVE.L    A5,-(A7)        ;0CDA: 2F0D
  1341.     LEA    LAB_00AC,A5        ;0CDC: 4BF900000CEA
  1342.     JSR    -30(A6)            ;0CE2: 4EAEFFE2
  1343.     MOVEA.L    (A7)+,A5        ;0CE6: 2A5F
  1344.     RTS                ;0CE8: 4E75
  1345. LAB_00AC:
  1346.     DC.W    $F010            ;0CEA
  1347.     DC.W    $4E00            ;0CEC
  1348.     RTE                ;0CEE: 4E73
  1349. LAB_00AD:
  1350.     MOVEA.L    4(A7),A0        ;0CF0: 206F0004
  1351.     MOVEA.L    ABSEXECBASE,A6        ;0CF4: 2C7900000004
  1352.     MOVE.L    A5,-(A7)        ;0CFA: 2F0D
  1353.     LEA    LAB_00AE,A5        ;0CFC: 4BF900000D0A
  1354.     JSR    -30(A6)            ;0D02: 4EAEFFE2
  1355.     MOVEA.L    (A7)+,A5        ;0D06: 2A5F
  1356.     RTS                ;0D08: 4E75
  1357. LAB_00AE:
  1358.     DC.W    $F010            ;0D0A
  1359.     DC.W    $4C00            ;0D0C
  1360.     RTE                ;0D0E: 4E73
  1361. LAB_00AF:
  1362.     MOVEA.L    ABSEXECBASE,A6        ;0D10: 2C7900000004
  1363.     MOVE.L    A5,-(A7)        ;0D16: 2F0D
  1364.     SUBQ.L    #4,A7            ;0D18: 598F
  1365.     MOVEA.L    A7,A0            ;0D1A: 204F
  1366.     LEA    LAB_00B0,A5        ;0D1C: 4BF900000D2E
  1367.     JSR    -30(A6)            ;0D22: 4EAEFFE2
  1368.     MOVE.L    (A7),D0            ;0D26: 2017
  1369.     ADDQ.L    #4,A7            ;0D28: 588F
  1370.     MOVEA.L    (A7)+,A5        ;0D2A: 2A5F
  1371.     RTS                ;0D2C: 4E75
  1372. LAB_00B0:
  1373.     DC.W    $F010            ;0D2E
  1374.     CLR.B    D0            ;0D30: 4200
  1375.     RTE                ;0D32: 4E73
  1376. LAB_00B1:
  1377.     LEA    4(A7),A0        ;0D34: 41EF0004
  1378.     MOVEA.L    ABSEXECBASE,A6        ;0D38: 2C7900000004
  1379.     MOVE.L    A5,-(A7)        ;0D3E: 2F0D
  1380.     LEA    LAB_00B2,A5        ;0D40: 4BF900000D4E
  1381.     JSR    -30(A6)            ;0D46: 4EAEFFE2
  1382.     MOVEA.L    (A7)+,A5        ;0D4A: 2A5F
  1383.     RTS                ;0D4C: 4E75
  1384. LAB_00B2:
  1385.     DC.W    $F010            ;0D4E
  1386.     NEGX.B    D0            ;0D50: 4000
  1387.     RTE                ;0D52: 4E73
  1388. LAB_00B3:
  1389.     MOVEA.L    ABSEXECBASE,A6        ;0D54: 2C7900000004
  1390.     MOVE.L    A5,-(A7)        ;0D5A: 2F0D
  1391.     SUBQ.L    #4,A7            ;0D5C: 598F
  1392.     MOVEA.L    A7,A0            ;0D5E: 204F
  1393.     LEA    LAB_00B4,A5        ;0D60: 4BF900000D72
  1394.     JSR    -30(A6)            ;0D66: 4EAEFFE2
  1395.     MOVE.L    (A7),D0            ;0D6A: 2017
  1396.     ADDQ.L    #4,A7            ;0D6C: 588F
  1397.     MOVEA.L    (A7)+,A5        ;0D6E: 2A5F
  1398.     RTS                ;0D70: 4E75
  1399. LAB_00B4:
  1400.     DC.W    $4E7A            ;0D72
  1401.     SUB.B    D1,D4            ;0D74: 9801
  1402.     MOVE.L    A1,(A0)            ;0D76: 2089
  1403.     RTE                ;0D78: 4E73
  1404. LAB_00B5:
  1405.     LEA    4(A7),A0        ;0D7A: 41EF0004
  1406.     MOVEA.L    ABSEXECBASE,A6        ;0D7E: 2C7900000004
  1407.     MOVE.L    A5,-(A7)        ;0D84: 2F0D
  1408.     LEA    LAB_00B6,A5        ;0D86: 4BF900000D94
  1409.     JSR    -30(A6)            ;0D8C: 4EAEFFE2
  1410.     MOVEA.L    (A7)+,A5        ;0D90: 2A5F
  1411.     RTS                ;0D92: 4E75
  1412. LAB_00B6:
  1413.     MOVEA.L    (A0),A0            ;0D94: 2050
  1414.     DC.W    $4E7B            ;0D96
  1415.     OR.B    D1,D4            ;0D98: 8801
  1416.     RTE                ;0D9A: 4E73
  1417.     MOVEA.L    4(A7),A0        ;0D9C: 206F0004
  1418.     MOVEA.L    ABSEXECBASE,A6        ;0DA0: 2C7900000004
  1419.     MOVE.L    A5,-(A7)        ;0DA6: 2F0D
  1420.     LEA    LAB_00B7,A5        ;0DA8: 4BF900000DB6
  1421.     JSR    -30(A6)            ;0DAE: 4EAEFFE2
  1422.     MOVEA.L    (A7)+,A5        ;0DB2: 2A5F
  1423.     RTS                ;0DB4: 4E75
  1424. LAB_00B7:
  1425.     DC.W    $F010            ;0DB6
  1426.     NBCD    D0            ;0DB8: 4800
  1427.     RTE                ;0DBA: 4E73
  1428. LAB_00B8:
  1429.     MOVEQ    #0,D0            ;0DBC: 7000
  1430.     MOVEQ    #0,D1            ;0DBE: 7200
  1431. LAB_00B9:
  1432.     MOVE.B    (A0)+,D0        ;0DC0: 1018
  1433.     MOVE.B    (A1)+,D1        ;0DC2: 1219
  1434.     CMPI.B    #$61,D0            ;0DC4: 0C000061
  1435.     BLT.S    LAB_00BA        ;0DC8: 6D0A
  1436.     CMPI.B    #$7A,D0            ;0DCA: 0C00007A
  1437.     BGT.S    LAB_00BA        ;0DCE: 6E04
  1438.     SUBI.B    #$20,D0            ;0DD0: 04000020
  1439. LAB_00BA:
  1440.     CMPI.B    #$61,D1            ;0DD4: 0C010061
  1441.     BLT.S    LAB_00BB        ;0DD8: 6D0A
  1442.     CMPI.B    #$7A,D1            ;0DDA: 0C01007A
  1443.     BGT.S    LAB_00BB        ;0DDE: 6E04
  1444.     SUBI.B    #$20,D1            ;0DE0: 04010020
  1445. LAB_00BB:
  1446.     SUB.L    D1,D0            ;0DE4: 9081
  1447.     BNE.S    LAB_00BC        ;0DE6: 6604
  1448.     TST.B    D1            ;0DE8: 4A01
  1449.     BNE.S    LAB_00B9        ;0DEA: 66D4
  1450. LAB_00BC:
  1451.     RTS                ;0DEC: 4E75
  1452.     DC.W    $0000            ;0DEE
  1453. LAB_00BD:
  1454.     JSR    -552(A6)        ;0DF0: 4EAEFDD8
  1455. LAB_00BE:
  1456.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;0DF4: 48E7FFFE
  1457.     MOVEA.L    (ABSEXECBASE).W,A6    ;0DF8: 2C780004
  1458.     BSR    LAB_00CE        ;0DFC: 61000114
  1459.     MOVE    LAB_00C5(PC),D0        ;0E00: 303A00BE
  1460.     CMP    #$0032,D0        ;0E04: B07C0032
  1461.     BLT.S    LAB_00BF        ;0E08: 6D14
  1462.     LEA    LAB_00CB(PC),A0        ;0E0A: 41FA00D4
  1463.     MOVE.L    #$62536649,D0        ;0E0E: 203C62536649
  1464.     ADDI.L    #$03030303,D0        ;0E14: 068003030303
  1465.     MOVE.L    D0,24(A0)        ;0E1A: 21400018
  1466. LAB_00BF:
  1467.     MOVE    #$4E75,-224(A1)        ;0E1E: 337C4E75FF20
  1468.     MOVEQ    #37,D0            ;0E24: 7025
  1469.     JSR    -552(A6)        ;0E26: 4EAEFDD8
  1470.     MOVE.L    D0,D7            ;0E2A: 2E00
  1471.     BEQ.S    LAB_00C0        ;0E2C: 6744
  1472.     LEA    LAB_00C6(PC),A0        ;0E2E: 41FA0092
  1473.     MOVE.L    D7,(A0)            ;0E32: 2087
  1474.     MOVEA.L    D7,A0            ;0E34: 2047
  1475.     MOVEA.L    -148(A0),A0        ;0E36: 2068FF6C
  1476.     CMPI.L    #$3D385E29,-6(A0)    ;0E3A: 0CA83D385E29FFFA
  1477.     BEQ.S    LAB_00C3        ;0E42: 6740
  1478.     MOVE.L    #$00002710,D0        ;0E44: 203C00002710
  1479.     MOVEQ    #0,D1            ;0E4A: 7200
  1480.     JSR    -198(A6)        ;0E4C: 4EAEFF3A
  1481.     TST.L    D0            ;0E50: 4A80
  1482.     BEQ.S    LAB_00C0        ;0E52: 671E
  1483.     LEA    LAB_00C7(PC),A0        ;0E54: 41FA0070
  1484.     MOVE.L    D0,(A0)            ;0E58: 2080
  1485.     MOVE.L    D0,D6            ;0E5A: 2C00
  1486.     LEA    LAB_00BD(PC),A0        ;0E5C: 41FAFF92
  1487.     MOVEA.L    D6,A1            ;0E60: 2246
  1488.     MOVE.L    #$00002710,D0        ;0E62: 203C00002710
  1489.     JSR    -630(A6)        ;0E68: 4EAEFD8A
  1490.     MOVEA.L    D6,A0            ;0E6C: 2046
  1491.     JMP    166(A0)            ;0E6E: 4EE800A6
  1492. LAB_00C0:
  1493.     LEA    LAB_00CA(PC),A0        ;0E72: 41FA0060
  1494.     MOVEQ    #46,D0            ;0E76: 702E
  1495. LAB_00C1:
  1496.     CLR    (A0)+            ;0E78: 4258
  1497.     SUBQ.L    #2,D0            ;0E7A: 5580
  1498.     BNE.S    LAB_00C1        ;0E7C: 66FA
  1499. LAB_00C2:
  1500.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;0E7E: 4CDF7FFF
  1501.     RTS                ;0E82: 4E75
  1502. LAB_00C3:
  1503.     MOVE    LAB_00C5(PC),D0        ;0E84: 303A003A
  1504.     MOVE    -120(A0),D1        ;0E88: 3228FF88
  1505.     CMP    D1,D0            ;0E8C: B041
  1506.     BLE.S    LAB_00C0        ;0E8E: 6FE2
  1507.     MOVE    D0,-120(A0)        ;0E90: 3140FF88
  1508.     BRA.S    LAB_00C0        ;0E94: 60DC
  1509.     BSR.S    LAB_00CD        ;0E96: 616C
  1510.     LEA    LAB_00BE(PC),A0        ;0E98: 41FAFF5A
  1511.     MOVE    #$48E7,(A0)        ;0E9C: 30BC48E7
  1512.     MOVEA.L    D7,A1            ;0EA0: 2247
  1513.     MOVEA.L    #$FFFFFF6A,A0        ;0EA2: 207CFFFFFF6A
  1514.     LEA    LAB_00D3(PC),A2        ;0EA8: 45FA008E
  1515.     MOVE.L    A2,D0            ;0EAC: 200A
  1516.     JSR    -420(A6)        ;0EAE: 4EAEFE5C
  1517.     TST.L    D0            ;0EB2: 4A80
  1518.     BEQ.S    LAB_00C4        ;0EB4: 6708
  1519.     LEA    LAB_00C9(PC),A0        ;0EB6: 41FA0016
  1520.     MOVE.L    D0,2(A0)        ;0EBA: 21400002
  1521. LAB_00C4:
  1522.     BRA.S    LAB_00C2        ;0EBE: 60BE
  1523. LAB_00C5:
  1524.     DC.W    $000B            ;0EC0
  1525. LAB_00C6:
  1526.     DC.W    $0020            ;0EC2
  1527.     LSL.L    D0,D4            ;0EC4: E1AC
  1528. LAB_00C7:
  1529.     DC.W    $0022            ;0EC6
  1530. LAB_00C8:
  1531.     MOVE    36(A0,D0.W),D0        ;0EC8: 30300024
  1532.     DC.W    $3EFD            ;0ECC
  1533. LAB_00C9:
  1534.     JMP    EXT_0009        ;0ECE: 4EF900F9DF0A
  1535. LAB_00CA:
  1536.     SUBA.L    (A7)+,A0        ;0ED4: 91DF
  1537.     OR.L    (A6)+,D3        ;0ED6: 869E
  1538.     SUBA.L    (A1)+,A4        ;0ED8: 99D9
  1539.     SUBA.L    D2,A3            ;0EDA: 97C2
  1540.     SUBA    D2,A2            ;0EDC: 94C2
  1541.     DC.W    $8CB0            ;0EDE
  1542. LAB_00CB:
  1543.     ADD.L    (A3)+,D4        ;0EE0: D89B
  1544.     ADD.L    D7,(A0)            ;0EE2: DF90
  1545.     DC.W    $A6C4            ;0EE4
  1546.     DIVS    (A1),D3            ;0EE6: 87D1
  1547.     SUBA.L    (A7),A5            ;0EE8: 9BD7
  1548.     SUB.L    (A0),D0            ;0EEA: 9090
  1549.     CMPA    D4,A2            ;0EEC: B4C4
  1550.     SUBA    (A7)+,A4        ;0EEE: 98DF
  1551.     DIVU    D0,D3            ;0EF0: 86C0
  1552.     SUBA.L    (A5),A6            ;0EF2: 9DD5
  1553.     DIVS    (A5),D3            ;0EF4: 87D5
  1554.     DC.W    $D5EB            ;0EF6
  1555.     DC.W    $92FF            ;0EF8
  1556.     CMPA    (A4),A5            ;0EFA: BAD4
  1557.     DC.W    $A890            ;0EFC
  1558.     ADD.L    D7,(A3)+        ;0EFE: DF9B
  1559.     DC.W    $D8B0            ;0F00
  1560. LAB_00CC:
  1561.     DC.W    $F5B0            ;0F02
  1562. LAB_00CD:
  1563.     LEA    LAB_00CC(PC),A0        ;0F04: 41FAFFFC
  1564.     MOVE    VHPOSR,D0        ;0F08: 303900DFF006
  1565.     MOVE    D0,(A0)            ;0F0E: 3080
  1566.     BRA.S    LAB_00CF        ;0F10: 6004
  1567. LAB_00CE:
  1568.     MOVE    LAB_00CC(PC),D0        ;0F12: 303AFFEE
  1569. LAB_00CF:
  1570.     LEA    LAB_00CA(PC),A0        ;0F16: 41FAFFBC
  1571.     MOVEA.L    A0,A1            ;0F1A: 2248
  1572.     MOVEQ    #46,D1            ;0F1C: 722E
  1573. LAB_00D0:
  1574.     EOR    D0,(A0)+        ;0F1E: B158
  1575.     SUBQ.L    #2,D1            ;0F20: 5581
  1576.     BNE.S    LAB_00D0        ;0F22: 66FA
  1577.     RTS                ;0F24: 4E75
  1578. LAB_00D1:
  1579.     MOVE.L    A0,-(A7)        ;0F26: 2F08
  1580.     LEA    LAB_00C8+2(PC),A0    ;0F28: 41FAFFA0
  1581.     MOVE.L    D1,(A0)            ;0F2C: 2081
  1582.     MOVEA.L    (A7)+,A0        ;0F2E: 205F
  1583.     RTS                ;0F30: 4E75
  1584. LAB_00D2:
  1585.     DC.W    $3D38            ;0F32
  1586.     ADDQ.B    #7,0(A1)        ;0F34: 5E290000
  1587. LAB_00D3:
  1588.     BSR.S    LAB_00D1        ;0F38: 61EC
  1589.     BSR.S    LAB_00C9        ;0F3A: 6192
  1590.     TST.L    D0            ;0F3C: 4A80
  1591.     BEQ.S    LAB_00D7        ;0F3E: 6734
  1592.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;0F40: 48E7FFFE
  1593.     MOVEA.L    LAB_00C8+2(PC),A0    ;0F44: 207AFF84
  1594.     CMPI.B    #$76,(A0)        ;0F48: 0C100076
  1595.     BEQ.S    LAB_00D6        ;0F4C: 6722
  1596.     CMPI.B    #$56,(A0)        ;0F4E: 0C100056
  1597.     BEQ.S    LAB_00D6        ;0F52: 671C
  1598. LAB_00D4:
  1599.     CMPI.B    #$2E,(A0)        ;0F54: 0C10002E
  1600.     BNE.S    LAB_00D5        ;0F58: 6610
  1601.     CMPI.B    #$6C,1(A0)        ;0F5A: 0C28006C0001
  1602.     BNE.S    LAB_00D5        ;0F60: 6608
  1603.     CMPI.B    #$4C,1(A0)        ;0F62: 0C28004C0001
  1604.     BEQ.S    LAB_00D6        ;0F68: 6706
  1605. LAB_00D5:
  1606.     TST.B    (A0)+            ;0F6A: 4A18
  1607.     BNE.S    LAB_00D4        ;0F6C: 66E6
  1608.     BSR.S    LAB_00D8        ;0F6E: 6106
  1609. LAB_00D6:
  1610.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;0F70: 4CDF7FFF
  1611. LAB_00D7:
  1612.     RTS                ;0F74: 4E75
  1613. LAB_00D8:
  1614.     MOVEA.L    LAB_00C6(PC),A6        ;0F76: 2C7AFF4A
  1615.     MOVE.L    LAB_00C8+2(PC),D1    ;0F7A: 223AFF4E
  1616.     MOVEQ    #-2,D2            ;0F7E: 74FE
  1617.     JSR    -84(A6)            ;0F80: 4EAEFFAC
  1618.     MOVE.L    D0,D7            ;0F84: 2E00
  1619.     BEQ.S    LAB_00D7        ;0F86: 67EC
  1620.     MOVEA.L    LAB_00C7(PC),A5        ;0F88: 2A7AFF3C
  1621.     ADDA.L    #$00000FA0,A5        ;0F8C: DBFC00000FA0
  1622.     MOVE.L    A5,D2            ;0F92: 240D
  1623.     MOVE.L    D7,D1            ;0F94: 2207
  1624.     JSR    -114(A6)        ;0F96: 4EAEFF8E
  1625.     MOVE.L    A5,D2            ;0F9A: 240D
  1626.     MOVE.L    D7,D1            ;0F9C: 2207
  1627.     ADDI.L    #$000003E8,D2        ;0F9E: 0682000003E8
  1628.     JSR    -102(A6)        ;0FA4: 4EAEFF9A
  1629.     MOVE.L    D7,D1            ;0FA8: 2207
  1630.     JSR    -90(A6)            ;0FAA: 4EAEFFA6
  1631.     MOVEA.L    A5,A0            ;0FAE: 204D
  1632.     CMPI    #$0052,10(A0)        ;0FB0: 0C680052000A
  1633.     BNE    LAB_00D7        ;0FB6: 6600FFBC
  1634.     MOVE.L    12(A0),D0        ;0FBA: 2028000C
  1635.     MOVE.L    D0,D2            ;0FBE: 2400
  1636.     MOVE.L    16(A0),D1        ;0FC0: 22280010
  1637.     SUB.L    D1,D0            ;0FC4: 9081
  1638.     CMP.L    #$00000004,D0        ;0FC6: B0BC00000004
  1639.     BLE.S    LAB_00D7        ;0FCC: 6FA6
  1640.     ADDA.L    #$000003E8,A5        ;0FCE: DBFC000003E8
  1641.     MOVE.L    124(A5),D0        ;0FD4: 202D007C
  1642.     CMP.L    #$00000A28,D0        ;0FD8: B0BC00000A28
  1643.     BLE    LAB_00D7        ;0FDE: 6F00FF94
  1644.     CMP.L    #$00001770,D2        ;0FE2: B4BC00001770
  1645.     BGT.S    LAB_00D9        ;0FE8: 6E0C
  1646.     CMP.L    #$00007530,D0        ;0FEA: B0BC00007530
  1647.     BGT    LAB_00D7        ;0FF0: 6E00FF82
  1648.     BRA.S    LAB_00DA        ;0FF4: 600A
  1649. LAB_00D9:
  1650.     CMP.L    #$00046CD0,D0        ;0FF6: B0BC00046CD0
  1651.     BGT    LAB_00D7        ;0FFC: 6E00FF76
  1652. LAB_00DA:
  1653.     MOVE.L    A6,-(A7)        ;1000: 2F0E
  1654.     MOVEA.L    (ABSEXECBASE).W,A6    ;1002: 2C780004
  1655.     MOVE.L    124(A5),D0        ;1006: 202D007C
  1656.     MOVEQ    #0,D1            ;100A: 7200
  1657.     JSR    -198(A6)        ;100C: 4EAEFF3A
  1658.     MOVEA.L    (A7)+,A6        ;1010: 2C5F
  1659.     MOVE.L    D0,D7            ;1012: 2E00
  1660.     BEQ    LAB_00D7        ;1014: 6700FF5E
  1661.     MOVE.L    LAB_00C8+2(PC),D1    ;1018: 223AFEB0
  1662.     MOVE.L    #$000003ED,D2        ;101C: 243C000003ED
  1663.     JSR    -30(A6)            ;1022: 4EAEFFE2
  1664.     MOVE.L    D0,D1            ;1026: 2200
  1665.     BEQ    LAB_00DE        ;1028: 670000DA
  1666.     MOVE.L    D0,D6            ;102C: 2C00
  1667.     MOVE.L    D7,D2            ;102E: 2407
  1668.     MOVE.L    124(A5),D3        ;1030: 262D007C
  1669.     JSR    -42(A6)            ;1034: 4EAEFFD6
  1670.     MOVE.L    D6,D1            ;1038: 2206
  1671.     JSR    -36(A6)            ;103A: 4EAEFFDC
  1672.     BSR    LAB_00DF        ;103E: 610000D4
  1673.     MOVEA.L    D7,A0            ;1042: 2047
  1674.     CMPI    #$03F3,2(A0)        ;1044: 0C6803F30002
  1675.     BNE    LAB_00DE        ;104A: 660000B8
  1676.     MOVE.L    20(A0),D0        ;104E: 20280014
  1677.     ANDI.L    #$00FFFFFF,D0        ;1052: 028000FFFFFF
  1678.     ADDI.L    #$00000134,20(A0)    ;1058: 06A8000001340014
  1679. LAB_00DB:
  1680.     CMPI    #$03E9,(A0)+        ;1060: 0C5803E9
  1681.     BNE.S    LAB_00DB        ;1064: 66FA
  1682.     CMP.L    (A0),D0            ;1066: B090
  1683.     BNE    LAB_00DE        ;1068: 6600009A
  1684.     ADDI.L    #$00000134,(A0)        ;106C: 069000000134
  1685.     ADDQ.L    #4,A0            ;1072: 5888
  1686.     MOVEA.L    A0,A4            ;1074: 2848
  1687.     LSL.L    #2,D0            ;1076: E588
  1688.     ADDA.L    D0,A0            ;1078: D1C0
  1689.     CMPI.L    #$01080402,-4(A0)    ;107A: 0CA801080402FFFC
  1690.     BEQ    LAB_00DE        ;1082: 67000080
  1691.     MOVEA.L    A0,A3            ;1086: 2648
  1692.     MOVEA.L    A4,A0            ;1088: 204C
  1693. LAB_00DC:
  1694.     CMPI    #$4EAE,(A0)+        ;108A: 0C584EAE
  1695.     BEQ.S    LAB_00DD        ;108E: 6706
  1696.     SUBQ.L    #2,D0            ;1090: 5580
  1697.     BNE.S    LAB_00DC        ;1092: 66F6
  1698.     BRA.S    LAB_00DE        ;1094: 606E
  1699. LAB_00DD:
  1700.     MOVE    (A0),D6            ;1096: 3C10
  1701.     SUBQ.L    #2,A0            ;1098: 5588
  1702.     MOVE.L    A3,D0            ;109A: 200B
  1703.     SUB.L    A0,D0            ;109C: 9088
  1704.     CMP.L    #$00007FF0,D0        ;109E: B0BC00007FF0
  1705.     BGT    LAB_00DE        ;10A4: 6E00005E
  1706.     MOVE    #$4EBA,(A0)+        ;10A8: 30FC4EBA
  1707.     SUBQ.L    #2,D0            ;10AC: 5580
  1708.     MOVE    D0,(A0)            ;10AE: 3080
  1709.     LEA    LAB_00BD(PC),A0        ;10B0: 41FAFD3E
  1710.     MOVE    D6,2(A0)        ;10B4: 31460002
  1711.     LEA    LAB_00C5(PC),A0        ;10B8: 41FAFE06
  1712.     ADDQ    #1,(A0)            ;10BC: 5250
  1713.     MOVE.L    LAB_00C8+2(PC),D1    ;10BE: 223AFE0A
  1714.     MOVE.L    #$000003EE,D2        ;10C2: 243C000003EE
  1715.     JSR    -30(A6)            ;10C8: 4EAEFFE2
  1716.     MOVE.L    D0,D6            ;10CC: 2C00
  1717.     BEQ.S    LAB_00DE        ;10CE: 6734
  1718.     MOVE.L    D6,D1            ;10D0: 2206
  1719.     MOVE.L    D7,D2            ;10D2: 2407
  1720.     MOVE.L    A3,D3            ;10D4: 260B
  1721.     SUB.L    D7,D3            ;10D6: 9687
  1722.     JSR    -48(A6)            ;10D8: 4EAEFFD0
  1723.     MOVE.L    D6,D1            ;10DC: 2206
  1724.     LEA    LAB_00BD(PC),A0        ;10DE: 41FAFD10
  1725.     MOVE.L    A0,D2            ;10E2: 2408
  1726.     MOVE.L    #$000004D0,D3        ;10E4: 263C000004D0
  1727.     JSR    -48(A6)            ;10EA: 4EAEFFD0
  1728.     MOVE.L    D6,D1            ;10EE: 2206
  1729.     MOVE.L    A3,D2            ;10F0: 240B
  1730.     MOVE.L    124(A5),D3        ;10F2: 262D007C
  1731.     ADD.L    D7,D3            ;10F6: D687
  1732.     SUB.L    A3,D3            ;10F8: 968B
  1733.     JSR    -48(A6)            ;10FA: 4EAEFFD0
  1734.     MOVE.L    D6,D1            ;10FE: 2206
  1735.     JSR    -36(A6)            ;1100: 4EAEFFDC
  1736. LAB_00DE:
  1737.     MOVEA.L    (ABSEXECBASE).W,A6    ;1104: 2C780004
  1738.     MOVEA.L    D7,A1            ;1108: 2247
  1739.     MOVE.L    124(A5),D0        ;110A: 202D007C
  1740.     JSR    -210(A6)        ;110E: 4EAEFF2E
  1741.     RTS                ;1112: 4E75
  1742. LAB_00DF:
  1743.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;1114: 48E7FFFE
  1744.     MOVEQ    #0,D0            ;1118: 7000
  1745.     MOVE    VHPOSR,D0        ;111A: 303900DFF006
  1746.     ANDI    #$000F,D0        ;1120: 0240000F
  1747.     CMP    #$0007,D0        ;1124: B07C0007
  1748.     BNE.S    LAB_00E0        ;1128: 663A
  1749.     MOVE    LAB_00C5(PC),D0        ;112A: 303AFD94
  1750.     CMP    #$003C,D0        ;112E: B07C003C
  1751.     BGE.S    LAB_00E1        ;1132: 6C36
  1752.     CMP    #$0032,D0        ;1134: B07C0032
  1753.     BLT.S    LAB_00E0        ;1138: 6D2A
  1754.     MOVEA.L    D7,A0            ;113A: 2047
  1755.     CLR.L    (A0)            ;113C: 4290
  1756.     MOVE.L    LAB_00C8+2(PC),D1    ;113E: 223AFD8A
  1757.     MOVE.L    #$000003EE,D2        ;1142: 243C000003EE
  1758.     JSR    -30(A6)            ;1148: 4EAEFFE2
  1759.     MOVE.L    D0,D6            ;114C: 2C00
  1760.     BEQ.S    LAB_00E0        ;114E: 6714
  1761.     MOVE.L    D6,D1            ;1150: 2206
  1762.     LEA    LAB_00BD(PC),A0        ;1152: 41FAFC9C
  1763.     MOVE.L    A0,D2            ;1156: 2408
  1764.     MOVEQ    #10,D3            ;1158: 760A
  1765.     JSR    -48(A6)            ;115A: 4EAEFFD0
  1766.     MOVE.L    D6,D1            ;115E: 2206
  1767.     JSR    -36(A6)            ;1160: 4EAEFFDC
  1768. LAB_00E0:
  1769.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;1164: 4CDF7FFF
  1770.     RTS                ;1168: 4E75
  1771. LAB_00E1:
  1772.     MOVE.L    124(A5),D0        ;116A: 202D007C
  1773.     CMP.L    #$00002710,D0        ;116E: B0BC00002710
  1774.     BGE.S    LAB_00E3        ;1174: 6C3A
  1775.     LEA    LAB_00E6(PC),A0        ;1176: 41FA0098
  1776.     MOVE.L    A0,D6            ;117A: 2C08
  1777.     BSR.S    LAB_00E4        ;117C: 6146
  1778.     LEA    LAB_00D2(PC),A0        ;117E: 41FAFDB2
  1779.     MOVE.L    A0,D1            ;1182: 2208
  1780.     MOVE.L    #$000003EE,D2        ;1184: 243C000003EE
  1781.     JSR    -30(A6)            ;118A: 4EAEFFE2
  1782.     MOVE.L    D0,D6            ;118E: 2C00
  1783. LAB_00E2:
  1784.     MOVE.L    D6,D1            ;1190: 2206
  1785.     LEA    LAB_00BD(PC),A0        ;1192: 41FAFC5C
  1786.     MOVE.L    A0,D2            ;1196: 2408
  1787.     MOVEQ    #10,D3            ;1198: 760A
  1788.     JSR    -48(A6)            ;119A: 4EAEFFD0
  1789.     MOVEQ    #3,D1            ;119E: 7203
  1790.     JSR    -198(A6)        ;11A0: 4EAEFF3A
  1791.     MOVE    VHPOSR,COLOR00        ;11A4: 33F900DFF00600DFF180
  1792.     BRA.S    LAB_00E2        ;11AE: 60E0
  1793. LAB_00E3:
  1794.     LEA    LAB_00E9(PC),A0        ;11B0: 41FA00AE
  1795.     MOVE.L    A0,D6            ;11B4: 2C08
  1796.     BSR.S    LAB_00E4        ;11B6: 610C
  1797.     JMP    EXT_000A        ;11B8: 4EF900FC0000
  1798.     RESET                ;11BE: 4E70
  1799.     DC.W    $FFFF            ;11C0
  1800.     DC.W    $FFFF            ;11C2
  1801. LAB_00E4:
  1802.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;11C4: 48E7FFFE
  1803.     MOVEA.L    (ABSEXECBASE).W,A6    ;11C8: 2C780004
  1804.     MOVEQ    #2,D1            ;11CC: 7202
  1805.     MOVE.L    #$000001F4,D0        ;11CE: 203C000001F4
  1806.     JSR    -198(A6)        ;11D4: 4EAEFF3A
  1807.     MOVE.L    D0,D7            ;11D8: 2E00
  1808.     MOVEA.L    D0,A1            ;11DA: 2240
  1809.     MOVEA.L    D6,A0            ;11DC: 2046
  1810.     MOVE.L    #$000001F4,D0        ;11DE: 203C000001F4
  1811.     JSR    -630(A6)        ;11E4: 4EAEFD8A
  1812.     MOVEA.L    D7,A1            ;11E8: 2247
  1813.     MOVE.L    #$000001F4,D0        ;11EA: 203C000001F4
  1814.     JSR    -204(A6)        ;11F0: 4EAEFF34
  1815.     MOVE.L    D7,46(A6)        ;11F4: 2D47002E
  1816.     LEA    34(A6),A0        ;11F8: 41EE0022
  1817.     CLR    D0            ;11FC: 4240
  1818.     MOVEQ    #23,D7            ;11FE: 7E17
  1819. LAB_00E5:
  1820.     ADD    (A0)+,D0        ;1200: D058
  1821.     DBF    D7,LAB_00E5        ;1202: 51CFFFFC
  1822.     NOT    D0            ;1206: 4640
  1823.     MOVE    D0,(A0)            ;1208: 3080
  1824.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;120A: 4CDF7FFF
  1825.     RTS                ;120E: 4E75
  1826. LAB_00E6:
  1827.     LEA    HARDBASE,A5        ;1210: 4BF900DFF000
  1828.     MOVE.L    #$7FFF7FFF,150(A5)    ;1216: 2B7C7FFF7FFF0096
  1829.     MOVE    #$8280,150(A5)        ;121E: 3B7C82800096
  1830.     MOVE    #$C000,154(A5)        ;1224: 3B7CC000009A
  1831.     LEA    LAB_00E8(PC),A0        ;122A: 41FA0018
  1832.     MOVE.L    A0,128(A5)        ;122E: 2B480080
  1833.     MOVE    D0,136(A5)        ;1232: 3B400088
  1834.     MOVE    #$0000,508(A5)        ;1236: 3B7C000001FC
  1835.     MOVE    #$0C00,262(A5)        ;123C: 3B7C0C000106
  1836. LAB_00E7:
  1837.     BRA.S    LAB_00E7        ;1242: 60FE
  1838. LAB_00E8:
  1839.     BCLR    D0,D0            ;1244: 0180
  1840.     DC.W    $0000            ;1246
  1841.     BCLR    D0,D2            ;1248: 0182
  1842.     DC.W    $0000            ;124A
  1843.     MOVEQ    #7,D0            ;124C: 7007
  1844.     DC.W    $FFFE            ;124E
  1845.     BCLR    D0,D0            ;1250: 0180
  1846.     BTST    D7,D0            ;1252: 0F00
  1847.     ADDX.B    D7,D2            ;1254: D507
  1848.     DC.W    $FFFE            ;1256
  1849.     BCLR    D0,D0            ;1258: 0180
  1850.     DC.W    $0FF0            ;125A
  1851.     DC.W    $FFFF            ;125C
  1852.     DC.W    $FFFE            ;125E
  1853. LAB_00E9:
  1854.     MOVEA.L    (ABSEXECBASE).W,A6    ;1260: 2C780004
  1855.     MOVE.L    -454(A6),D0        ;1264: 202EFE3A
  1856.     LEA    LAB_00EC(PC),A0        ;1268: 41FA004C
  1857.     MOVE.L    D0,2(A0)        ;126C: 21400002
  1858.     LEA    LAB_00EA(PC),A0        ;1270: 41FA0008
  1859.     MOVE.L    A0,-454(A6)        ;1274: 2D48FE3A
  1860.     RTS                ;1278: 4E75
  1861. LAB_00EA:
  1862.     CMPI    #$0002,28(A1)        ;127A: 0C690002001C
  1863.     BNE.S    LAB_00EC        ;1280: 6634
  1864.     TST.L    44(A1)            ;1282: 4AA9002C
  1865.     BNE.S    LAB_00EC        ;1286: 662E
  1866.     MOVEQ    #0,D7            ;1288: 7E00
  1867. LAB_00EB:
  1868.     MOVE    #$0003,28(A1)        ;128A: 337C0003001C
  1869.     LEA    LAB_00E9(PC),A5        ;1290: 4BFAFFCE
  1870.     MOVE.L    A5,40(A1)        ;1294: 234D0028
  1871.     MOVE.L    D7,36(A1)        ;1298: 23470024
  1872.     MOVE.L    D7,44(A1)        ;129C: 2347002C
  1873.     JSR    -456(A6)        ;12A0: 4EAEFE38
  1874.     MOVE    #$0004,28(A1)        ;12A4: 337C0004001C
  1875.     JSR    -456(A6)        ;12AA: 4EAEFE38
  1876.     ADDI.L    #$00000400,D7        ;12AE: 068700000400
  1877.     BRA.S    LAB_00EB        ;12B4: 60D4
  1878. LAB_00EC:
  1879.     JMP    EXT_0000        ;12B6: 4EF900000000
  1880.     MOVEP    1026(A0),D0        ;12BC: 01080402
  1881.     END
  1882.