Пересылка в Assembler

[aly-lucenko]

Задание: написать фрагмент программы для исполнения операции:
операция - пересылка;
1-й операнд - регистр;
2-й операнд - 5-й элемент блока данных.


Начала анализировать, что пересылка исполняется с помощью mov.
Вопрос в том, что понимается под выражением 5-й элемент блока данных?
блок данных можно задать?

[Swarog]

есть какой то массив вот элемент под номером 5 нужно переслать

lea si, arr
mov al, [si + 4]

arr - это массив из элементов типа байт, +4 потому что нумерация идет с нуля

[aly-lucenko]

спасибо)
а как можно задать элементы этого массива?

[Swarog]

arr: db 0,1,2,3,4,5,6,7,8,9

либо если без разница каким содержанием

arr: db 10 dup(?)

10 - длина массива

Желательно это делать в сегменте данных

[aly-lucenko]

выскакивает oшибка : undefined symbol: arr
Код:

DATASG     SEGMENT    PARA
DB     16 DUP('@')
DATASG    ENDS
STACKSG     SEGMENT     PARA     'Stack'
DB        12 DUP(?)
STACKSG        ENDS
CODESG     SEGMENT     PARA     'Code'
ASSUME     SS:STACKSG,CS:CODESG,DS:DATASG
BEGIN PROC FAR	
lea si, arr
mov al, [si + 4]
RET
BEGIN	 ENDP	
CODESG	 ENDS	
END	 BEGIN

[Swarog]

сравни как у меня записано и как у тебя

DATASG     SEGMENT    PARA
arr: DB     16 DUP('@')
DATASG    ENDS

[aly-lucenko]

Прошу прощение за навящивость)
При правильной работе кода:

DATASG     SEGMENT    PARA
arr: DB  0,1,2,3,4,5,6,7,8,9
DATASG    ENDS
;STACKSG     SEGMENT     PARA     'Stack'
;DB        12 DUP(?)
;STACKSG        ENDS
CODESG     SEGMENT     PARA     'Code'
ASSUME     CS:CODESG,DS:DATASG
BEGIN PROC FAR
    lea si, arr
mov ax, [si+4]
RET
BEGIN	 ENDP	
CODESG	 ENDS	
END	 BEGIN

ax=0004

а получается совсем не то:

[Swarog]

для того что бы использовать Ax увеличил размер элментов массива, Прежде чем работать нужно иничциализировать сегментные регистры, из программы должен быть нормальный выход

DATASG     SEGMENT    PARA
arr: DW  0,1,2,3,4,5,6,7,8,9
DATASG    ENDS
;STACKSG     SEGMENT     PARA     'Stack'
;DB        12 DUP(?)
;STACKSG        ENDS
CODESG     SEGMENT     PARA     'Code'
ASSUME     CS:CODESG,DS:DATASG
BEGIN PROC FAR

    mov AX, DATASG
    mov DS, AX; обязательно иначе в ds неопределнное знчение
    lea si, arr
    mov ax, [si+4 * 2] ; размер элемента уже 2 байта поэтому и умножаем на 2
    mov AH, 4Ch
    int 21h ;Обязательно для нормального выхода
RET
BEGIN	 ENDP	
CODESG	 ENDS	
END	 BEGIN

Инициализация сегментного регистра обязательно нужна по следующей причине
команда mov ax, [si+4 * 2] в процессоре выполняется следующим образом mov ax, ds:[si+4 * 2] а так как сегментные регистр не определен то мы не попадаем в массив

[aly-lucenko]

а если операция - пересылка;
1-й операнд - 5-й элемент блока данных;
2-й операнд - регистр

Я так понимаю не достаточно этого:

DATASG     SEGMENT    PARA
arr: DW  0,1,2,3,4,5,6,7,8,9
DATASG    ENDS
;STACKSG     SEGMENT     PARA     'Stack'
;DB        12 DUP(?)
;STACKSG        ENDS
CODESG     SEGMENT     PARA     'Code'
ASSUME     CS:CODESG,DS:DATASG
BEGIN PROC FAR

    mov AX, DATASG
    mov DS, AX; обязательно иначе в ds неопределнное знчение
    lea si, arr
    mov [si+4 * 2],  ax ; размер элемента уже 2 байта поэтому и умножаем на 2
    mov  4Ch, AH
    int 21h ;Обязательно для нормального выхода
RET
BEGIN	 ENDP	
CODESG	 ENDS	
END	 BEGIN

[Swarog]

почему не достаточно сама операция пересылки это

    mov [si+4 * 2],  ax ; размер элемента уже 2 байта поэтому и умножаем на 2

все остальное только для того что бы заработала эта операция, точнее зработала так как это нам надо