home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / FILUTL / CHATT.ARC / GETZF.ASM < prev    next >
Encoding:
Assembly Source File  |  1988-04-08  |  468 b   |  18 lines
  1.  
  2. ;ASM routine to return flags (need zero flag) register to input()
  3.  
  4. .MODEL  SMALL
  5. .CODE
  6.         PUBLIC  _getzf
  7.  
  8. _getzf  PROC    NEAR
  9.         push    bp              ; don't really need standard proc in this
  10.         mov     bp, sp          ;   program but will be reminder
  11.         pushf                   ; push flags register and
  12.         pop     ax              ; pop it to AX for return value
  13.         pop     bp
  14.         ret
  15. _getzf  ENDP
  16.         END
  17.  
  18.