home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 387b.lha / dice_v2.02 / lib / alib / doslib.a next >
Encoding:
Text File  |  1990-05-30  |  484 b   |  35 lines
  1.  
  2.             ;   autoinit if you ever reference DOS
  3.  
  4.             xdef    _DOSBase
  5.  
  6. _LVOOpenLibrary     equ    -552
  7. _LVOCloseLibrary    equ    -414
  8.  
  9.             section autoinit0,code
  10.  
  11.             moveq.l #0,D0
  12.             lea    dosname,A1
  13.             jsr    _LVOOpenLibrary(A6)
  14.             move.l    D0,_DOSBase(A4)
  15. i10
  16.  
  17.             section autoexit0,code
  18.  
  19.             move.l    _DOSBase(A4),D0
  20.             beq    l10
  21.             move.l    D0,A1
  22.             jsr    _LVOCloseLibrary(A6)
  23. l10
  24.  
  25.             section const,code
  26.  
  27. dosname         dc.b    $64,$6F,$73,$2E,$6C,$69,$62,$72,$61,$72,$79,$00
  28.  
  29.             section libbss,bss
  30.  
  31. _DOSBase        ds.l    1
  32.  
  33.             END
  34.  
  35.