16/x_/mxwr.asm

   1 ;-----------------------------------------------------------\r
   2 ;\r
   3 ; MXWR.ASM - Wait vertical retrace function\r
   4 ; Copyright (c) 1993,1994 by Alessandro Scotti\r
   5 ;\r
   6 ;-----------------------------------------------------------\r
   7 WARN    PRO\r
   8 INCLUDE MODEX.DEF\r
   9 \r
  10 PUBLIC  mxWaitRetrace\r
  11 \r
  12 MX_TEXT         SEGMENT USE16 PARA PUBLIC 'CODE'\r
  13                 ASSUME cs:MX_TEXT, ds:NOTHING, es:NOTHING\r
  14 \r
  15 ;-----------------------------------------------------------\r
  16 ;\r
  17 ; Waits for vertical retrace start.\r
  18 ;\r
  19 mxWaitRetrace   PROC    FAR\r
  20         mov     dx, STATUS\r
  21 @@1:    in      al,dx\r
  22         test    al, 08h\r
  23         jz      @@1\r
  24         ret\r
  25 mxWaitRetrace   ENDP\r
  26 \r
  27 MX_TEXT         ENDS\r
  28 END\r