home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / GXY-INF.LHA / infos / cv_dos$1400.s < prev    next >
Encoding:
Text File  |  1996-03-09  |  803 b   |  51 lines
  1.     org    $d00bca
  2.     load    $d00bca
  3. LB_00AE    MOVEM.L    D0-A6,-(A7)
  4.     MOVEQ    #$0A,D5
  5.     MOVE.L    A5,A0
  6.     LEA    $60000,A1
  7.     MOVE.W    #$4489,D4
  8. LB_00C0    CMP.W    (A1)+,D4
  9.     BNE.B    LB_00C0
  10.     CMP.W    (A1),D4
  11.     BEQ.B    LB_00C0
  12.     MOVE.L    #$55555555,D7
  13.     MOVE.L    (A1)+,D0
  14.     MOVE.L    (A1)+,D1
  15.     AND.L    D7,D0
  16.     ASL.L    #1,D0
  17.     AND.L    D7,D1
  18.     OR.L    D1,D0
  19.     LSL.W    #1,D0
  20.     ANDI.W    #$1E00,D0
  21.     CMPI.W    #$1400,D0
  22.     BGT.B    LB_0110
  23.     LEA    $00(A0,D0.W),A2
  24.     LEA    $0030(A1),A1
  25.     MOVE.L    -$0004(A1),D2
  26.     MOVEQ    #$7F,D3
  27. LB_00F4    MOVE.L    $0200(A1),D1
  28.     EOR.L    D1,D2
  29.     MOVE.L    (A1)+,D0
  30.     EOR.L    D0,D2
  31.     AND.L    D7,D0
  32.     ASL.L    #1,D0
  33.     AND.L    D7,D1
  34.     OR.L    D1,D0
  35.     MOVE.L    D0,(A2)+
  36.     DBF    D3,LB_00F4
  37.     AND.L    D7,D2
  38.     BNE.B    LB_0120
  39. LB_0110    DBF    D5,LB_00C0
  40.     MOVEM.L    (A7)+,D0-A6
  41.     LEA    $1400(A5),A5
  42.     MOVEQ    #$00,D4
  43.     RTS    
  44. LB_0120    MOVEM.L    (A7)+,D0-A6
  45.     MOVEQ    #-$01,D4
  46. LB_0126    RTS    
  47.     EOR.L    D2,D0
  48.     DBF    D1,LB_0126
  49.     AND.L    D5,D0
  50.     RTS    
  51.