Программирование обработки, преобразования и ввода-вывода данных на ассемблере ПЭВМ. Домнин Л.Н. - 25 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

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

Рубрика: 

24
b dw ? ; д ;
c dw ? ; а ;
d dw ? ; н ;
y dw ? ; н ;
tap dw 5 dup(?) ; ы ;
buf db 5 ; х ;
db ? ; ;
Продолжение прил.
as db '+000',' ' ; ;
ys db '+0000','$' ; ;
des dw 10 ; ;
dseg ends ; ;
;-----------------------------------------------------------;
cseg segment para public 'code' ;
osn_prg proc far ;
assume cs:cseg,ds:dseg,ss:stseg ;
push ds с ;
mov ax,0 ;
push ax ;
mov ax,dseg ;
mov ds,ax е ;
; ----------------------------------------------- ;
outdspl tekst1 ; Вывод пояснительного текста ; ;
; ----------------------------------------------- ;
vvoda: outdspl tksta ; Выдача запроса на ввод a ; г ;
vvod ; Ввод значения a ; ;
asc_bin as,a ; Преобразование a (ASCII->BIN); ;
; ----------------------------------------------- ;
vvodb: outdspl tkstb ; Выдача запроса на ввод b ; м ;
vvod ; Ввод значения b ; ;
asc_bin as,b ; Преобразование b (ASCII->BIN); ;
; ----------------------------------------------- ;
vvodc: outdspl tkstc ; Выдача запроса на ввод c ; е ;
vvod ; Ввод значения c ; ;
asc_bin as,c ; Преобразование c (ASCII->BIN); ;
; ----------------------------------------------- ;
vvodd: outdspl tkstd ; Выдача запроса на ввод d ; н ; 
b      dw   ?                                        ;   д   ;
c      dw   ?                                        ;   а   ;
d      dw   ?                                        ;   н   ;
y      dw   ?                                        ;   н   ;
tap    dw   5 dup(?)                                 ;   ы   ;
buf    db   5                                        ;   х   ;
       db   ?                                        ;       ;




                                                Продолжение прил.

as      db '+000',' '                                 ;     ;
ys      db '+0000','$'                                ;     ;
des     dw 10                                         ;     ;
dseg    ends                                          ;     ;
;-----------------------------------------------------------;
cseg    segment para    public   'code'                     ;
osn_prg proc     far                                        ;
        assume   cs:cseg,ds:dseg,ss:stseg                   ;
push    ds                                               с ;
        mov     ax,0                                        ;
        push    ax                                          ;
        mov     ax,dseg                                     ;
        mov     ds,ax                                    е ;
;       -----------------------------------------------     ;
        outdspl tekst1 ; Вывод пояснительного текста ;      ;
;       -----------------------------------------------     ;
vvoda: outdspl tksta ; Выдача запроса на ввод a       ; г ;
        vvod           ; Ввод значения a              ;     ;
        asc_bin as,a   ; Преобразование a (ASCII->BIN);     ;
;       -----------------------------------------------     ;
vvodb: outdspl tkstb ; Выдача запроса на ввод b       ; м ;
        vvod           ; Ввод значения b              ;     ;
        asc_bin as,b   ; Преобразование b (ASCII->BIN);     ;
;       -----------------------------------------------     ;
vvodc: outdspl tkstc ; Выдача запроса на ввод c       ; е ;
        vvod           ; Ввод значения c              ;     ;
        asc_bin as,c   ; Преобразование c (ASCII->BIN);     ;
;       -----------------------------------------------     ;
vvodd: outdspl tkstd ; Выдача запроса на ввод d       ; н ;

                               24

Страницы