Как заменить ScroLL Lock на Caps Lock - Assembler - Ответ 1706617

Proc    new_09h     ; пользовательский обработчик new_09h
    pusha       ; Сохраним регистры
    push es
    push ds
    in al,60h   ; Получим скэн-код клавиши 
 
    cmp al,0Bh ; скан-код клавиши '0' 
    je h0 ; если равно то переход на h0
 
    cmp al,02h  ;скан-код клавиши 1
    je h1
 
    cmp al,03h  
    je h2
 
    cmp al,04h  
    je h3
 
    cmp al,05h  
    je h4
 
    cmp al,06h  
    je h5
 
    cmp al,07h  
    je h6
 
    cmp al,08h  
    je h7
 
    cmp al,09h  
    je h8
xxx:
    pop ds          ; Если ни одна из комбинаций клавиш не    
    pop es          ; присутствует, то восстановим регистры 
    popa            ; и в системный обработчик без вовзврата   
    jmp [dword cs:old_09h]  
    
h0: mov ax,40h      ;Настроим ES на сегмент данных BIOS
    mov es,ax
      mov al,[es:18h] ;Получим первый байт флагов
    and al,00000100b        ;выделяем 4-ый бит
    cmp al,00000100b                ;Клавиша Scroll Loсk нажата?
    je xxx
    
    ;test al,69     ;Клавиша Scroll Loсk нажата?
    ;je xxx         ;если нет, то выйдем
 
    mov [cs:fn],0h      ; если нажата, то выставим соответствующий режим
    mov [cs:cnt], 0
    jmp xxxx        ; работы резидента, и пойдём на выход
h1: mov ax,40h  
    mov es,ax
      mov al,[es:17h]
    test al,10h 
    je xxx 
    mov [cs:fn],1h
    mov [cs:cnt], 0
    jmp xxxx
h2: mov ax,40h
    mov es,ax
      mov al,[es:17h]
    test al,10h 
    je xxx 
    mov [cs:fn],2h
 
    mov [cs:cnt],160
    jmp xxxx
h3: mov ax,40h  
    mov es,ax
      mov al,[es:17h]
    test al,10h 
    je xxx 
    mov [cs:fn],3h
    mov [cs:cnt], 240
    jmp xxxx
h4: mov ax,40h
    mov es,ax
      mov al,[es:17h]
    test al,10h 
    je xxx 
    mov [cs:fn],4h
    mov [cs:cnt],320
    jmp xxxx
h5: mov ax,40h
    mov es,ax
      mov al,[es:17h]   
    test al,10h 
    je xxx 
    mov [cs:fn],5h
    mov [cs:cnt],400
    jmp xxxx
h6: mov ax,40h
    mov es,ax
      mov al,[es:17h]   
    test al,10h 
    je xxx 
    mov [cs:fn],6h
    mov [cs:cnt], 480
    jmp xxxx
h7: mov ax,40h
    mov es,ax
      mov al,[es:17h]
    test al,10h
    je xxx 
    mov [cs:fn],7h
    mov [cs:cnt],560
    jmp xxxx
h8: mov ax,40h  
    mov es,ax
      mov al,[es:17h]
    test al,10h 
    je xxx 
    mov [cs:fn],8h
    mov [cs:cnt],640
    jmp xxxx
 
xxxx:   in al,61h       ;Введём содержимое порта 61h
    or al,80h       ;Подтвердим приём кода, записав 1 в старший
    out 61h,al      ;бит порта 61h
    and al,7Fh      ;Снова разрешим работу контроллера клавиатуры
    out 61h,al      ;подтверждаем факт приема скан кода
    mov al,20h      ;20h - команда EOI
    out 20h,al      ;20h - порт контроллера
    pop ds          ;Восстановим регистры
 
    pop es
    popa
    iret            ; выйдем из прерывания
Endp    new_09h