title IBM local console output
name ibmcon
include mc.ash
.model small

.data
;
;Scan code from last key hit (iskey())
;
scan	db	0
attr	db	7	;7 = normal, 70 = reverse

.code
;
;Turn highlighting on or off.
;
;func _highlight
;	mov	attr,7	;assume normal
;	mov	ax,arg0
;	or	al,al
;	jz	_h1
;	mov	attr,70h;else highlight
;_h1:
;endf _highlight

;
;Local, faster, console output.
;
func __lconout
	mov 	ah,14	;TTY func
	mov	al,arg0	;char in AL
	mov	bl,attr	;attribute
	mov	bh,0	;display page
	int	10h
endf __lconout

	end