Студент, начинающий учить Ассемблер. Не могу составить программу, которая выдаёт код нажатой клавиши.

xor ah,ah
int 16h

В результате в AH - скан-код, в AL - ASCII-код. Если AH=0, то в AL - расширенный скан-код.

А вот этот код на Фасме выводит на экран содержимое bl.

Код

org 100h start: mov bl,0A3h; 2 mov al,bl shr al,4 call adding mov byte[txt+0],al mov al,bl and al,00001111b call adding mov byte[txt+1],al mov ah,09h; 2 mov dx,txt; 3 mov byte[txt+2],'$'; 5 int 21h; 2 int 20h; 2 adding: cmp al,0Ah jb decD add al,37h jmp exit decD: add al,30h exit: ret txt:

Код

; This 3 procedures types the content of AX (SAY_16), AL (SAY_8) ; or lower 4-bit part of AL (SAY_B) on screen in HEX digits. SAY_16         PROC    NEAR                PUSH    AX                PUSH    CX                PUSH    DX                XOR     DX,DX                XCHG    AH,DL                PUSH    AX                MOV     AX,DX                CALL    SAY_8                POP     AX                CALL    SAY_8                POP     DX                POP     CX                POP     AX                RETN SAY_16         ENDP SAY_8          PROC    NEAR                PUSH    AX                PUSH    CX                PUSH    DX                XOR     AH,AH                MOV     CL,4                SHL     AX,CL                SHR     AL,CL                XOR     DX,DX                XCHG    AH,DL                PUSH    AX                CALL    SAY_B                POP DX                CALL    SAY_B                POP     DX                POP     CX                POP     AX                RETN SAY_8          ENDP SAY_B          PROC    NEAR                MOV     AH,2                ADD     DL,30H                CMP     DL,3AH                JB      SAY_B_                ADD     DL,7 SAY_B_:        INT     21H                RETN SAY_B          ENDP

Я вроде разобрался в программе. Вот в таком виде:
#make_COM#

ORG 100h
start:
mov ah,09h ;ф-ция вывода строки
mov dx,offset msg ;адрес строки
int 21h ;прерывание

mov ah,01h ;ф-ция ожидания ввода символа
int 21h ;прерывание

mov bl,al ;скопируем содержимое al в bl, т.к. нек. ф-ции изменяют al

mov ah,09h ;ф-ция вывода строки
mov dx,offset msg_2 ;адрес строки
int 21h ;прерывание

mov cl,0 ;это будет счетчик
conv:
mov dl,1 ;это будет выводимый символ(один бит из кода)
shl bl,1 ;смещение содержимого bl влево на один бит, старший бит помещается в cf
jc zer ;условный переход, если cf=1
mov dl,0
zer:
add dl,30h ;доводим цыфру до аски кода
mov ah,02h ;ф-ция вывода символа из dl
int 21h ;прерывание
inc cl ;увеличиваем счетчик
cmp cl,8 ;проверка счетчика
jnz conv ;если ещё не выведено 8 символов, то работаем дальше

ret

msg db "Press any key: ",13,10,"$"
msg_2 db " : $"
end start