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

UptoLike

ВУЗ: 

МИРЭА | Москва

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

Рубрика: 

115
pop ax
push ax
and ax,0f00h
mov cl,8
shr ax,cl
call prss
pop ax
push ax
and ax,0f0h
mov cl,4
shr ax,cl
call prss
pop ax
push ax
and ax,0fh
call prss
pop ax
pop cx
pop bx
ret
prax endp
; Печать двухзначного шестнадцатеричного числа из AL
pral proc near
pusha
push ax
mov cl,4
shr al,cl
call prss
pop ax
call prss
popa
ret
pral endp
; Перевод строки, возврат каретки
wk proc near
mov al,0dh ; Код возврата каретки
call print ; Печать 1 ASCII символа
mov al,0ah ; Код перевода строки
jmp print ; Печать 1 ASCII символа
wk endp
; Печать пробела
space proc near
mov al,32 ; Код пробела
jmp print ; Печать 1 ASCII символа
space endp
; Печать 4 пробелов
sp4 proc near
call space
call space
call space 
                                    115



      pop ax
      push ax
      and ax,0f00h
      mov cl,8
      shr    ax,cl
      call prss
      pop ax
      push ax
      and ax,0f0h
      mov cl,4
      shr    ax,cl
      call prss
      pop ax
      push ax
      and ax,0fh
      call prss
      pop ax
      pop cx
      pop bx
      ret
prax endp
; Печать двухзначного шестнадцатеричного числа из AL
pral proc near
      pusha
      push ax
      mov cl,4
      shr    al,cl
      call prss
      pop ax
      call prss
      popa
      ret
pral endp
; Перевод строки, возврат каретки
wk    proc near
      mov al,0dh        ; Код возврата каретки
      call print        ; Печать 1 ASCII символа
      mov al,0ah        ; Код перевода строки
      jmp print         ; Печать 1 ASCII символа
wk    endp
; Печать пробела
space proc near
      mov al,32         ; Код пробела
      jmp print         ; Печать 1 ASCII символа
space endp
; Печать 4 пробелов
sp4 proc near
      call space
      call space
      call space

Страницы