Отследить нажатия клавиш F1-F10 и вывести нажатую клавишу в консоль.Яз на ассемблере

Пожалуста помогите с программой!!!!!!!!

cseg segment
assume cs:cseg, ds:cseg

print macro str
mov ah,9
lea dx, str
int 21h
endm

org 100h
start:

xor dx, dx
mov ah, 2
int 10h

;mov ah, 10
;int 16h


_loop:
mov ah, 1 ; функция DOS ввода с клавиатуры
int 21h ; получить следующую клавишу
cmp al, 3bh
je F1
cmp al, 3ch
je F2
cmp al, 3dh
je F3
cmp al, 3eh
je F4
cmp al, 3Fh
je F5
cmp al, 40h
je F6
cmp al, 41h
je F7
cmp al, 42h
je F8
cmp al, 43h
je F9
cmp al, 44h
je F10
cmp al, 13
jmp _loop


F1:
print f_1
jmp _loop

F2:
print f_2
jmp _loop

F3:
print f_3
jmp _loop

F4:
print f_4
jmp _loop


F5:
print f_5
jmp _loop

F6:
print f_6
jmp _loop

F7:
print f_7
jmp _loop

F8:
print f_8
jmp _loop

F9:
print f_9
jmp _loop

F10:
print f_10
jmp _loop

f_1 db 'F1', 10, 13, '$'

f_2 db 'F2', 10, 13, '$'

f_3 db 'F3', 10, 13, '$'

f_4 db 'F4', 10, 13, '$'

f_5 db 'F5', 10, 13, '$'

f_6 db 'F6', 10, 13, '$'

f_7 db 'F7', 10, 13, '$'

f_8 db 'F8', 10, 13, '$'

f_9 db 'F9', 10, 13, '$'

f_10 db 'F10', 10, 13, '$'

cseg ends
end start