home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / C-ASM_VI.ARJ / PROGASM.ZIP / PROG054.ASM < prev    next >
Encoding:
Assembly Source File  |  1988-04-10  |  834 b   |  22 lines
  1.  
  2. ;************************************************************************
  3. ; Enable text blink, using BIOS function 10hex                          *
  4. ; Entry:        Flag - 0 => disable blinking                            *
  5. ;                      1 => enable blinking                             *
  6. ;************************************************************************
  7.  
  8. Flag    EQU     [BP+4]
  9.  
  10.         PUBLIC  _BIOS_Blink
  11.  
  12. _BIOS_Blink     PROC NEAR
  13.         PUSH    BP
  14.         MOV     BP,SP
  15.         MOV     BL,Flag                 ;Enable flag
  16.         MOV     AH,10H                  ;Function = SET PALETTE REGISTERS
  17.         MOV     AL,03H                  ;Subfunction = BLINK/INTENSIFY
  18.         INT     10H                     ;Call BIOS to enable blinking
  19.         POP     BP
  20.         RET
  21. _BIOS_Blink     ENDP
  22.