Обнуления массива слов на Ассемблере

Posted by obzor under assembler

Написать программу обнуления массива слов длинною 100 элементов, используя все возможные режимы адресации.

R71MT

;;== FASM code =======================

org 100h
jmp start

array   dw  100 dup(?)

start:
; Clear array ========================
      mov   si,array
      mov   cx,100
      push  cx si
clr:  shr   word[si],16
      add   si,2
      loop  clr

; Print array ========================
      pop   si cx
prn:  lodsw
      or    ax,3030h
      int   29h
      xchg  ah,al
      int   29h
      loop  prn

; Exit ===============================
exit:
      xor   ax,ax
      int   16h
      int   20h

тема на форуме

Похожие статьи

• Удалить повторяющиеся элементы из массива (VBA в Excel)
• Сортировка кучей на языке Си
• Pascal — Заполнить массив случайными числами
• Реализация процедуры поиска max элемента одномерного массива
• PascalABC.net — Заполнить массив случайными числами и найти сумму элементов
• Удаление элементов из одномерного массива
• Замена элементов в двумерном массиве
• Как быть, если полученный массив Excel VBA имеет всего одно значение
• Считывание двумерного массива из потока данных
• Есть ли в массиве А[n] числа В и С и определить, какое из чисел встречается в массиве чаще