home *** CD-ROM | disk | FTP | other *** search
/ Chip: Internet / Chip Internet.iso / viewer / qpeg / drvsrc / cirrus2m.asm < prev    next >
Encoding:
Assembly Source File  |  1994-05-01  |  873 b   |  48 lines
  1. ;
  2. ; QPEG video driver
  3. ; for Cirrus Logic CL-GD 542X chipsets
  4. ; with 2 Mb of video memory or more.
  5. ;
  6.  
  7.         .286
  8. Code    Segment Para 'Code'
  9.         Assume  cs:Code
  10.         Org 100h
  11.  
  12. Procs   dw      Bank,Init,Exit,0
  13.  
  14. Bank:   shl     al,2
  15.         push    ax
  16.         mov     dx,03ceh
  17.         mov     al,9
  18.         out     dx,al
  19.         inc     dx
  20.         pop     ax
  21.         out     dx,al
  22.         dec     dx
  23.         mov     al,8
  24.         out     dx,al
  25.         retf
  26.  
  27. Init:   mov     dx,03c4h
  28.         mov     al,6
  29.         out     dx,al
  30.         inc     dx
  31.         mov     al,12h
  32.         out     dx,al
  33.         mov     dl,0ceh
  34.         mov     al,0bh
  35.         out     dx,al
  36.         inc     dx
  37.         in      al,dx
  38.         or      al,20h
  39.         out     dx,al
  40.         retf
  41.  
  42. Exit:   retf
  43.  
  44. Code    Ends
  45.         End Procs
  46.  
  47. ; End of source.
  48.