клавиатуры три символа, уменьшает их коды на 1 и отображает
на экране результат преобразования.dosseg
.model small
.stack 200h
.data
DisplayString db 13, 10
ThreeChars db 3 dup(?)
db '$'
.code
Begin:
mov ax,@Data
mov ds, ax
mov bx, offset ThreeChars
mov ah, 1
int 21h
dec al
mov [bx], al
inc bx
int 21h
dec al
mov [bx], al
inc bx
int 21h
dec al
mov [bx], al
mov dx, offset DisplayString
mov ah, 9
int 21h
mov ax, 4C00h
int 21h
end Begin