Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.11.2012, 19:45   #1
eymar
Пользователь
 
Регистрация: 23.09.2012
Сообщений: 17
По умолчанию Constant expected

Доброго времени суток! Мне необходимо написать программу, которая бы записывала бы в sump сумму байтов массива A1 которые имеют четное смещение в сегменте, а в sumnp - нечетное.

Код:
Data segment
Sump		dw	0
Sumnp	    dw	0
A1			dw	6 dup (8 dup (7 dup (102h)))

x EQU 7					
y EQU 8
z EQU 6
Data ends


code         SEGMENT
              ASSUME   cs:code,ds:data
               
begin:
              mov      ax,data       
              mov      ds,ax 

				
			  
			xor bp,bp
			lea dx,A1							; помещаем в edx  начальное смещение  A1 
			
			
			  
			l1:
			LEA bx,A1[bp*2]			; загружаем в регистр BX смещение элемента массива относительно ds
			mov DX,BX
			AND DX,00000001b			; проверка смtщения в сегмент на четность 
			cmp DX,1					; если смещение нечетное тогда переходим к метке @10
			
			je @10						; переход если DX=1
			add Sump,BX					; выполняется если смещение четное
			jmp @20
			
			@10:
			add Sumnp,BX				; выполняется если смещение нечетное
			
			@20:
			inc bp
			cmp bp,x*y*z
			jb l1
			
			mov ax,Sump
			mov bx,Sumnp
     
             

             
              mov      ax,4c00h 
              int      21h

code          ENDS
              end      begin
При создании obj файла в MASM возникает ошибка: "Constant expected" которая указывает на 33 строку: LEA bx,A1[bp*2]

Подскажите, пожалуйста, что я выполнил не правильно.
Спасибо большое!
eymar вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ошибка DPB Constant (user 'sysdba') is unknown artemavd БД в Delphi 3 04.06.2012 19:30
Constant object cannot be passed as var parameter RakNaGore Помощь студентам 1 12.07.2011 12:48
Constant Object cannot be passed as a var parameter. Alex Cones Общие вопросы Delphi 3 15.10.2009 21:51
Ошибка Constant object cannot be passed as var parameter nusik Общие вопросы Delphi 7 15.05.2009 21:00
Помогите найти ошибку Constant object cannot be passed as var parameter N!ckeL Общие вопросы Delphi 2 18.04.2008 15:36