Системное программное обеспечение. Рощин А.В. - 114 стр.

UptoLike

Составители: 

114
or al,al
jnz msg1
ret
msg1: call prali
ret
msg endp
; Ввод с клавиатуры
kbin proc near
mov ah,0 ; Функция 0
int 16h ; клавиатурного прерывания
ret
kbin endp
; Печать 16 HEX байтов из [SI]
hex proc near
pusha
mov cx,16
hex1: mov dl,[si]
call pral
call space ; Печать пробела
inc si
loop hex1
call wk ; Перевод строки, возврат каретки
popa
ret
hex endp
; Печать АХ и ВК
praxi proc near
pusha
call prax
call wk
popa
ret
praxi endp
; Печать AL и ВК
prali proc near
pusha
call pral
call wk
popa
ret
prali endp
; Печать четырехзначного шестнадцатеричного числа из AX
prax proc near
push bx
push cx
push ax
and ax,0f000h
mov cl,12
shr ax,cl
call prss
                                    114



      or     al,al
      jnz    msg1
      ret
msg1: call prali
      ret
msg endp
; Ввод с клавиатуры
kbin proc near
      mov ah,0          ; Функция 0
      int    16h        ; клавиатурного прерывания
      ret
kbin endp
; Печать 16 HEX байтов из [SI]
hex proc near
      pusha
      mov cx,16
hex1: mov dl,[si]
      call pral
      call space ; Печать пробела
      inc    si
      loop hex1
      call wk           ; Перевод строки, возврат каретки
      popa
      ret
hex endp
; Печать АХ и ВК
praxi proc near
      pusha
      call prax
      call wk
      popa
      ret
praxi endp
; Печать AL и ВК
prali proc near
      pusha
      call pral
      call wk
      popa
      ret
prali endp
; Печать четырехзначного шестнадцатеричного числа из AX
prax proc near
      push bx
      push cx
      push ax
      and ax,0f000h
      mov cl,12
      shr    ax,cl
      call prss