home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 8 / FreshFishVol8-CD2.bin / bbs / gnu / libnix-0.7-src.lha / libnix-0.7 / sources / amiga / graphics / obtainbestpen.S < prev    next >
Encoding:
Text File  |  1994-05-02  |  202 b   |  17 lines
  1.  
  2. #include <bases.h>
  3.  
  4.     .text
  5.  
  6.     .globl    _ObtainBestPen
  7.  
  8. _ObtainBestPen:
  9.     moveml    d2/d3/a6,sp@-
  10.     GETGFXBASE
  11.     lea    sp@(16:W),a1
  12.     movel    a1@+,a0
  13.     moveml    a1@+,d1/d2/d3
  14.     jsr    a6@(-840:W)
  15.     moveml    sp@+,d2/d3/a6
  16.     rts
  17.