scodes db '0' , '0' , '1', '2', '3', '4', '5', '6'
db '7', '8', '9', '0', '-', '=', '0' , '0'
acode db '0'
begin:
mov ax, cs ; Get the current segment
mov ds, ax ; The data is in this segment
cli ; disable interrupts while changing stack
mov ss, ax ; We'll use this segment for the stack too
mov sp, 0xfffe ; Start the stack at the top of the segment
mov bp,sp
push bp
sti
call read_kbd
;call write_kbd
call hang
read_kbd:
mov al,scodes
mov ah, 0x0e ; video function 0Eh (print char)
mov bx, 0x0007 ; color
int 0x10
retn