Не могу получить адрес массива :( Опции

[-Shaienn-]

Здравствуйте, есть

программа

{в ней}

функция, которая работает с массивом и в этой функции
я пытаюсь сделать такую вещь:

asm    
lea si,d
lodsw
cmp ax,3
je @m
jmp @exit
@m :
	push si
	lea si,e
	lodsw
	mov bx,ax
	lodsw
	mul bx
	mov di,si
	sub di,4
	stosw
	mov ax,0
	stosw
@exit:
end;

т.е на паскале:

case d[i] of
3: begin e[i]:=e[i]*e[i+1];
	 e[i+1]:=0; end;
end;

проблема в том, что я с адреса, полученного командой lea, командой lodsw не получаю число из массива (массив integer), но если пишу на тот же адрес, то в массив все записывается

отдельным куском данный код на ассемблере работает... Где может быть косяк?
Могу дать файл программы, но она большая.... Но все равно, может кто поможет.
Ассемблер изучаю один день, так что нужна помощь.

Сообщение отредактировано: volvo - 10.11.2006 16:49

[FreeMan]

хм. практически все
во первых - сам написал, что double 8байт, а пишем dword ptr, а не qword ptr. дальше - результат записываешь в массив d, а выводишь число из массива е...

finit
	lea si,e
	fld qword ptr[si]
	fld qword ptr[si+8]     {double в памяти 8 байт?}
	fmul
	lea di,d
	fstp qword ptr[si]

[Виталий Шевченко]

я вас, наверное, уже достал глупыми вопросами, но можно ли обнулить ячейку массива более простым способом?

asm
push es
pop ds
lea si,d
lodsw
cmp ax,3
je @m
jmp @exit
@m :
	finit
	lea si,e
	fld qword ptr[si]
	fld qword ptr[si+8]
	fmul
	fstp qword ptr[si]
	push ds                 --------- вот я ее обнуляю
	pop es
	lea di,e
	add di,8
	mov ax,0
	mov cx,4
	rep stosw                    ---------вот ноль в ячейке
	@exit:
	end;

Сообщение отредактировано: Виталий Шевченко - 12.11.2006 7:51