home *** CD-ROM | disk | FTP | other *** search
/ CD-X 1 / cdx_01.iso / demodisc / basq / source / look / setpal.inc < prev    next >
Encoding:
Text File  |  1994-05-13  |  631 b   |  22 lines
  1. ;---------------------------------------------------------------------------
  2. ;By:Heikki Vesalainen
  3. ;setpal macro, sets the palette with the [number] of palette values (colors*3)
  4. ;starting from data:[mem].
  5. ;In: [number], [mem] ([mem] is a label, not offset)
  6. ;Out: the right palette!
  7. ;Uses:  DS:SI (points to the palette), AX, DX, CX
  8. Setpal  MACRO   number, mem
  9.         mov     cx, number
  10.  
  11.         mov     ax, @data
  12.         mov     ds, ax
  13.         mov     si, offset mem
  14.  
  15.         mov     dx, 3c8h
  16.         mov     al, 0
  17.         out     dx, al
  18.         
  19.         inc     dx
  20.         rep     outsb
  21.         ENDM        
  22.