ReC98/libs/BorlandC/kbhit.asm

; int kbhit(void)
public _kbhit
_kbhit		proc
		push	si
		push	di
		cmp	_cFlag, 0
		jz	short @@do
		mov	ax, 1
		jmp	short @@ret

@@do:
		mov	ah, 0Bh
		int	21h
		cbw

@@ret:
		pop	di
		pop	si
		ret
_kbhit		endp
[Reduction] #358: kbhit 2014-08-30 04:23:45 +00:00			`; int kbhit(void)`
			`public _kbhit`
[JWasm move] Don't use the DIST/CALLMODEL constants for procedures and labels Once you've actually found the right syntax that makes the assembler just use the default call type of the current memory model for both procedures (where it's just "PROC" without anything else) and labels (where it's "LABEL PROC"), these constants become completely unneccessary, even with TASM. 2014-11-05 17:20:02 +00:00			`_kbhit proc`
[Reduction] #358: kbhit 2014-08-30 04:23:45 +00:00			`push si`
			`push di`
			`cmp _cFlag, 0`
			`jz short @@do`
			`mov ax, 1`
			`jmp short @@ret`

			`@@do:`
			`mov ah, 0Bh`
			`int 21h`
			`cbw`

			`@@ret:`
			`pop di`
			`pop si`
			`ret`
			`_kbhit endp`