| ← Ноябрь 2017 → | ||||||
|
1
|
3
|
4
|
5
|
|||
|---|---|---|---|---|---|---|
|
7
|
8
|
9
|
10
|
11
|
12
|
|
|
13
|
14
|
16
|
17
|
18
|
||
|
21
|
22
|
23
|
24
|
25
|
26
|
|
|
27
|
28
|
29
|
||||
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://rusfaq.ru
Открыта:
28-06-2000
Статистика
0 за неделю
RFpro.ru: Ассемблер? Это просто! Учимся программировать
| РАССЫЛКИ ПОРТАЛА RFPRO.RU
Лучшие эксперты в разделе
∙ Assembler
Консультация # 191781: Уважаемые эксперты, здравствуйте, прошу помощи в следующем вопросе: написал код который должен выводить скан-коды клавиш (пока только для нажатия), но почему-то код не работает - при нажатии клавиш скан-коды не выводятся на экран. процедура работает правильно - я проверил ее как отдельную программу - выводит содержимое регистра AL на экр... Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
Дата отправки: 10.11.2017, 19:46 Консультирует Лысков Игорь Витальевич (Старший модератор): Здравствуйте, kerenskyaf!
Уважаемые эксперты, здравствуйте, Код :: выделить код model tiny
code1 segment
assume cs:code1,ds:code1,ss:code1,es:code1
org 100h
begin:
mov ax,3
int 10h
mov ax,3509h
int 21h
mov old09o,bx
mov old09s,es
mov ax,2509h
mov dx,offset new09
int 21h
mov ah,9
mov dx,offset mess1
int 21h
mov ah,10
mov dx,offset mess2
int 21h
mov ax,2509h
mov dx,old09o
mov ds,old09s
int 21h
ret
old09o dw ?
old09s dw ?
mess1 db 10,10,13,'Enter a key: $'
mess2 db 120,?,120 dup(?)
new09:
in al,60h
and al,01111111b
push ax
call proc1
proc1 proc
pop ax
mov bx,1030h
mov ah,0
div bh ; ax/bh=(al, ost->ah)
cmp ah,09h
ja @@03
add bl,ah
jmp @@04
@@03:
mov bl,41h
sub ah,0Ah
add bl,ah
@@04:
mov ah,0
div bh ; ax/bh=(al, ost->ah)
cmp ah,09h
ja @@05
mov dx,3030h
add dx,ax
jmp @@06
@@05:
mov dx,4141h
sub ah,0Ah
add dx,ax
@@06:
push dx
mov ah,2
mov dh,10
mov dl,20
mov bh,0
int 10h
pop dx
mov ah,2
mov dl,dh
int 21h
mov dl,bl
int 21h
mov dl,68h
int 21h
; mov dl,0Dh
; int 21h
ret
proc1 endp
code1 ends
end begin
Дата отправки: 15.11.2017, 16:36 Консультирует Зенченко Константин Николаевич (Модератор): Здравствуйте, ialmiev! Код (Assembler) :: выделить код model tiny code org 100h begin: mov ah,11h int 16h jnz begin mov ah,10h int 16h cmp ah,1 jz OB02 mov al,ah aam 16 xchg al,ah call outByte xchg al,ah call outbyte mov al,' ' int 29h jmp begin outByte:cmp al,10 jb OB01 add al,7 OB01: add al,'0' int 29h OB02: ret end begin Удачи!
Оценить выпуск | Задать вопрос экспертам
главная страница
|
стать участником
|
получить консультацию
|
| В избранное | ||
