Чтобы проиллюстрировать функции, которые мы рассмотрели в

    предыдущих разделах, давайте решим арифиетическую задачу на языке

    ассемблера.  Пример прост, но использует многие команды.  Задача

    заключается в вычислении частного двух арифметических выражений, в

    которых некоторые числа постоянны, а другие переменны.  Все числа

    являются 16=битовыми целыми числами со знаком.

      Формула вычислений:

                        A * 2 + B * C

                  X = ------------------

                          D - 3

      Эта задача решается подпрограммой на языке ассемблера,

    изображенной на Фиг. 4.16. Подпрограмма сначала выполняет два

    умножения. Так как микропроцессор 8088 всегда помещает результат

    16=битового умножения в пару регистров DX:AX, в примере результат

    первого умножения переносится в пару регистров BX:CX перед

    выполнением второго умножения. Когда оба умножения завершены,

    программа выполняет сложение числителя. Поскольку умножение дает

    32=битовые результаты, в программе требуется сложение повышенной

    точности. Это сложение оставляет результат в DX:AX. В примере

    знаменатель вычисляется в регистре CX, а затем на него делится

    числитель. Программа записывает частное из регистра AX в переменную

    результата X. Остаток в этой задаче игнорируется.

           Microsoft (R) Macro Assembler Version 5.00              1/1/80 04:01:10

           Фиг. 4.16 Пример арифметических вычислений              Page   1-1

                                         PAGE    ,132

                                         TITLE   Фиг. 4.16 Пример арифметических вычислений

                                   ;-------------------------------------------------------------

                                   ; Производятся вычисления по формуле

                                   ;

                                   ;              A * 2   +   B * C

                                   ;        X  =      -------------------

                                   ;                   D  -  3
;

                                   ; Все переменные - 16-разрядные целые числа со знаком

                                   ;-------------------------------------------------------------

                              Фиг. 4.16 Арифметический пример (начало)

            0000                   CODE    SEGMENT

                                         ASSUME  CS:CODE,DS:CODE

            0000  ????             X           DW      ?               ; Память для переменных

            0002  ????             A           DW      ?

            0004  ????             B           DW      ?

            0006  ????             C           DW      ?

            0008  ????             D           DW      ?

            000A                   FIG4_16 PROC    NEAR

            000A  B8 0002                      MOV     AX, 2           ; Загрузка константы

            000D  F7 2E 0002 R                 IMUL    A               ; DX:AX = A * 2

            0011  8B DA                  MOV     BX, DX

            0013  8B C8                  MOV     CX, AX          ; BX:CX = A * 2

            0015  A1 0004 R                   MOV     AX, B

            0018  F7 2E 0006 R                 IMUL    C               ; DX:AX = B * C

            001C  03 C1                  ADD     AX, CX

            001E  13 D3                  ADC     DX, BX          ; DX:AX = A * 2  +  B * C

            0020  8B 0E 0008 R                 MOV     CX, D

            0024  83 E9 03                     SUB     CX, 3           ; CX = D - 3

            0027  F7 F9                  IDIV    CX        ; AX = (A*2 + B*C) / (D-3)

            0029  A3 0000 R                    MOV     X, AX           ; Сохранение результата

            002C  C3                           RET

            002D                   FIG4_16 ENDP

            002D                   CODE    ENDS

                                         END

            Фиг. 4.16 Арифметический пример (продолжение)