лабораторная работа / лабораторные работы по ASSAMBLER / predstavlenie_dannyh_arifmetiko_logiche

; Сегмент стека
Sseg SEGMENT STACK 'stack'
DB 256 DUP (?)
Sseg ENDS
; Сегмент данных
Dseg SEGMENT 'data'
x1 db 0ffh
x2 db 0Dh
x3 db 0e6h
x4 db 0Dh
x5 db ?
x6 dw ?
x7 db ?
dvx db ?
mdx db ?

Dseg ENDS
; Сегмент кода
Cseg SEGMENT 'code'
ASSUME CS:Cseg, DS:Dseg, SS:Sseg
; Головная подпрограмма
Main PROC FAR
; Подготовимся к возврату в операционную систему
PUSH DS
MOV AX, 0
PUSH AX
; Настроим DS на наш сегмент данных
MOV AX, Dseg
MOV DS, AX
; Делаем вычисления
mov ax,0
; X1+X2
mov al,x1
add al,x2
mov x5,al
; X3*X2
mov al,x2
imul x3
mov x6,ax
; X2&X4
mov al,x2
mov x7,al
mov ah,x4
and x7,ah
; Запись в стек X2
mov ax,0
mov al,x2
push ax
;X3/X1
mov al,x3 ;делимое
cwd;подготовки к операции деления, для которой размер делимого в два раза больше размера делителя
div x1 ;частное в al, остаток в ah
mov dvx,al
mov mdx,ah
; Завершение программы и передача управления первому оператору в PSP
pop ax
RET
Main ENDP
Cseg ENDS
END Main