home *** CD-ROM | disk | FTP | other *** search
/ telefisk.org / virusCollection.lzx / VirusResearch / zakapior / PoolMem / PatchReplyMsg.asm < prev    next >
Assembly Source File  |  1984-11-04  |  1KB  |  50 lines
  1. ; IRA V1.02  (Sep  6 1993)  (c)1993  Tim Ruehsen
  2.  
  3.  
  4. ABSEXECBASE    EQU    $4
  5. EXT_0001    EQU    $AAAAAAAA
  6. EXT_0002    EQU    $FFFFFE86
  7.  
  8.  
  9.  
  10.  
  11.     SECTION S_0,CODE
  12.  
  13. SECSTRT_0:
  14.     MOVEA.L    (ABSEXECBASE).W,A6    ;00: 2C780004
  15.     JSR    -132(A6)        ;04: 4EAEFF7C
  16.     MOVEA.L    A6,A1            ;08: 224E
  17.     LEA    (EXT_0002).W,A0        ;0A: 41F8FE86
  18.     MOVE.L    #SECSTRT_1,D0        ;0E: 203C00000030
  19.     JSR    -420(A6)        ;14: 4EAEFE5C
  20.     MOVE.L    D0,LAB_0003+2        ;18: 23C000000064
  21.     LEA    SECSTRT_0(PC),A0    ;1E: 41FAFFE0
  22.     CLR.L    -4(A0)            ;22: 42A8FFFC
  23.     JSR    -138(A6)        ;26: 4EAEFF76
  24.     MOVEQ    #0,D0            ;2A: 7000
  25.     RTS                ;2C: 4E75
  26.     DC.W    $0000            ;2E
  27.  
  28.  
  29.     SECTION S_1,CODE
  30.  
  31. SECSTRT_1:
  32.     MOVE.L    (A1),D0            ;30: 2011
  33.     BEQ.S    LAB_0003        ;32: 672E
  34.     CMP.L    #$00000400,D0        ;34: B0BC00000400
  35.     BCS.S    LAB_0002        ;3A: 650E
  36.     MOVE.L    4(A1),D0        ;3C: 20290004
  37.     BEQ.S    LAB_0003        ;40: 6720
  38.     CMP.L    #$00000400,D0        ;42: B0BC00000400
  39.     BCC.S    LAB_0003        ;48: 6418
  40. LAB_0002:
  41.     MOVEM.L    D7/A5,-(A7)        ;4A: 48E70104
  42.     MOVE.L    #$0100001F,D7        ;4E: 2E3C0100001F
  43.     MOVEA.L    276(A6),A5        ;54: 2A6E0114
  44.     JSR    -108(A6)        ;58: 4EAEFF94
  45.     MOVEM.L    (A7)+,D7/A5        ;5C: 4CDF2080
  46.     RTS                ;60: 4E75
  47. LAB_0003:
  48.     JMP    EXT_0001        ;62: 4EF9AAAAAAAA
  49.     END
  50.