TITLE prg_10_5

STACK SEGMENT PARA STACK ‘STACK’

DB 64 DUP(‘STACK’); Область стека

STACK ENDS

DSEG SEGMENT PARA PUBLIC ‘DATA’

Mas db 1,0,9,8,0,7,8,0,2,0; это заданный двумерный массив байт

db 1,0,9,8,6,7,8,0,5.4

db 0,1,9,8,0,7,8,0,2,0

db 1,2,9,8,0,7,8,0,2,3

db 10,0,0,9,8,0,0,8,0,2

Len_mas equ 10; количество элементов в строке

DSEG ENDS

CSEG SEGMENT PARA PUBLIC ‘CODE’

ASSUME CS:CSEG, DS:DSEG, SS:STACK

START: PUSH DS

SUB AX,AX

PUSH AX

MOV AX,DSEG; инициировать адрес сегмента данных

MOV DS,AX

XOR AX,AX

MOV CX, 5; в счетчик – число строк массива

LEA BX, MAS;смещение начала массива занести в ВХ

CYC1: PUSH CX;сохранить в стеке текущее значение счетчика строк

XOR SI, SI; начать обработку очередной строки

MOV СX, LEN_MAS; в сх – счетчик элементов строки

CYC2: CMP BYTE PTR [BX+SI],0; очередной элемент 0?

JNE NO-ZERO; если не 0, перейти на метку

MOV BYTE PTR [BX+SI],0FFH;заменить нулевой элемент

заданным значением

NO_ZERO:

INC SI; перейти к следующему элементу строки

LOOP CYC2

POP CX; восстановить счетчик внешнего цикла (номера строки)

ADD BX, LEN_MAS; перейти к следующей строке

LOOP CYC1

EXIT: MOV AX, 4C00H

INT 21H; возврат управления операционной системе

CSEG ENDS

END START