;input from keyboard
;each KEYBOARD interrupt will cause INT40 ISR to be executed
;STI to enable kbd interrupts   
     
	JMP 	Start
	DB	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0		;user buffer to store input ASCII chars
		
Start:
     	MOV	SI,1003		;start of buffer
	STI			;enable kbd interrupts
;nothing else to do so wait here
here:	JMP 	here
	
	HLT		                         


;ISR for  keyboard key press
PROC INT40	

	IN	AL,50		;kbd input port A
	MOV	[SI],AL		;store in user's buffer
	INC	SI
	IRET

