home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / util / boot / MagicCHIP.lha / MagicCHIP.asm next >
Encoding:
Assembly Source File  |  1997-02-10  |  880 b   |  53 lines
  1. MagicCHIP
  2.     move.l    4.w,a6
  3.     jsr    _LVOForbid(a6)
  4.     moveq    #20,d0
  5.     moveq    #MEMF_PUBLIC,d1
  6.     jsr    _LVOAllocMem(a6)
  7.     tst.l    d0
  8.     beq.s    .quit
  9.     move.l    d0,a2
  10.     add.l    #10,d0
  11.     move.l    d0,a3
  12.  
  13.     lea    _LVOAllocMem(a6),a0
  14.     move.l    a2,a1
  15.     move.l    #$0241FFFB,(a1)+    ; andi.w #$fffb,d1
  16.     move.w    (a0),(a1)+
  17.     move.l    2(a0),(a1)
  18.     move.w    #$4EF9,(a0)+        ; jmp
  19.     move.l    a2,(a0)+
  20.  
  21.     cmp.w    #36,lib_Version(a6)
  22.     blo.s    .no_v36
  23.  
  24.     lea    _LVOAllocVec(a6),a0
  25.     move.l    a3,a1
  26.     move.l    #$0241FFFB,(a1)+    ; andi.w #$fffb,d1
  27.     move.w    (a0),(a1)+
  28.     move.l    2(a0),(a1)
  29.     move.w    #$4EF9,(a0)+        ; jmp
  30.     move.l    a3,(a0)+
  31.  
  32.     jsr    _LVOCacheClearU(a6)
  33.  
  34. .no_v36    move.l    a6,a1
  35.     bset    #LIBB_CHANGED,lib_Flags(a1)
  36.     jsr    _LVOSumLibrary(a6)
  37.  
  38. .quit    jsr    _LVOPermit(a6)
  39.     moveq    #0,d0
  40.     rts
  41.  
  42. MEMF_PUBLIC=1
  43. LIBB_CHANGED=1
  44. lib_Flags=14
  45. lib_Version=20
  46. _LVOForbid=-132
  47. _LVOPermit=-138
  48. _LVOAllocMem=-198
  49. _LVOAllocVec=-684
  50. _LVOCacheClearU=-636
  51. _LVOFreeMem=-210
  52. _LVOSumLibrary=-426
  53.