Помогите найти ошибку в моем коде!

[Lazar]

Здравствуйте, господа программисты. Пишу в Линуксе лабу по вводу двух чисел, их преобразованию, сложению и выводу на экран. В процедуре Reconstruction пытаюсь собрать из введенных цифр число посредством схемы Горнера.
Формула Горнера: (...(A * p + A   )*p+...)*p+A  )*p+A
                       n       n-1            1      0
То есть при каждой итерации вычисляемая частичная сумма(Аn) умножается на основание системы счисления(р - в данном случае 10) и прибавляется к предыдущему введенному значению(ebx],'9'
jg error
loop metka

jmp label1

error:
mov eax,4
mov ebx,1
mov ecx,txt
mov edx,25
int 80h

mov eax,1
int 80h

label1:
mov dword[length],eax

ret

;-------------------------------------------
Reconstruction:
mov ecx,dword[length]
mov ebx,dword[length]
add ebx,1 ;nashli adres pervogo bayta
mov dword[next_symbol],ebx ;pomestili perviy bayt v peremennuyu
mov eax,dword[next_symbol]
mul dword[const]
metka2:
mov dword[last_symbol],ebx
inc ebx
mov dword[next_symbol],ebx
mul dword[const]
add eax,dword[last_symbol]
loop metka2
ret


;-------------------------------------------
output_value:
mov esi,10
mov ecx,0
pov:
mov edx,0
div esi
add dl,'0'
push edx
inc ecx
cmp eax,0
jne pov
mov [cnt],ecx
izv:
pop edx
mov [digit],dl
mov eax,4
mov ebx,1
mov ecx,digit
mov edx,1
int 80h
dec dword[cnt]
cmp dword[cnt],0
jne izv


ret

;------------------------------------------
SEGMENT .data
txt db '...Incorrected value...',13,10
txt1 db 'Enter the first value:',13,10
txt2 db 'Enter the second value:',13,10
koeff dd 10
summ dd 0
length dd 0
;const equ 10
buffer1 TIMES 20 db 0
digit db 0
cnt dd 0
next_symbol dd 0
last_symbol dd 0
const db 10

[Lazar]

Блин, формула покосилась...

Формула Горнера: ((...(A[n]*p+A[n-1])*p+...)*p+a[1])*p+A[0]

[Tuborg]

Трудночитаемый код. Прокомментируй его чтоли....

[Lazar]

Попробовал сделать по-другому. Прокомментировал процедуру Reconstruction. Не могу заставить цикл работать со всеми разрядами введенного значения. Складывает лишь два первых...
Помогите разобраться!

GLOBAL _start
SEGMENT .text
_start:
mov eax,4
mov ebx,1
mov ecx,txt1
mov edx,24
int 80h

call input_value
call Reconstruction

push eax
;--------------------------------------------
mov eax,4
mov ebx,1
mov ecx,txt2
mov edx,25
int 80h

call input_value
call Reconstruction

pop ebx
add eax,ebx

call output_value

mov eax,1
int 80h
;-------------------------------------------
input_value:
mov eax,3
mov ebx,0
mov ecx,buffer1
mov edx,20
int 80h

mov ebx,buffer1
mov ecx,eax
sub ecx,1
metka:
cmp byte[ebx],'0'
jl error
cmp byte[ebx],'9'
jg error
loop metka

jmp label1

error:
mov eax,4
mov ebx,1
mov ecx,txt
mov edx,25
int 80h

mov eax,1
int 80h

label1:
mov dword[length],eax

ret

;-------------------------------------------
Reconstruction: ;процедура должна выполнять сборку из введенных значений в единое
;число, после чего в основном тексте должно быть произведено сложение.
mov ecx,dword[length] ;заношу значение длины введенного буфера в регистр ecx
mov ebx,buffer1 ;помещаю в регистр ebx сам буфер, чтоб из него брать символы
mov eax,0 ;обнуляю eax
metka2:
mov al,byte[ebx+1] ;беру из буфера первый байт
sub al,48 ;преобразую из аски-кода в "нормальное" число
mov byte[next_symbol],al ;заношу в переменную значение полученного числа
mul dword[const] ;умножаю eax на 10
add eax,dword[next_symbol] ;добавляю к eax переменную с последующим числом
loop metka2 ;создаю цикл
ret
;-------------------------------------------
output_value:
mov esi,10
mov ecx,0
pov:
mov edx,0
div esi
add dl,'0'
push edx
inc ecx
cmp eax,0
jne pov
mov [cnt],ecx
izv:
pop edx
mov [digit],dl
mov eax,4
mov ebx,1
mov ecx,digit
mov edx,1
int 80h
dec dword[cnt]
cmp dword[cnt],0
jne izv


ret

;------------------------------------------
SEGMENT .data
txt db '...Incorrected value...',13,10
txt1 db 'Enter the first value:',13,10
txt2 db 'Enter the second value:',13,10
koeff dd 10
summ dd 0
length dd 0
;const equ 10
buffer1 TIMES 20 db 0
buffer2 TIMES 20 db 0
buffer3 TIMES 20 db 0
digit db 0
cnt dd 0
next_symbol dd 0
last_symbol dd 0
const db 10
value dd 0

[Алексей++]

вот например тут
>>mov al,byte[ebx+1] ;беру из буфера первый байт
- как скомпилилось ? )

наверное надо так ?
mov al,byte ptr [ebx+1]

-------------

а вот тут

Код:

mov ecx,dword[length] ;заношу значение длины введенного буфера в регистр ecx 
mov al,byte[ebx+1] ;беру из буфера первый байт 
mov byte[next_symbol],al ;заношу в переменную значение полученного числа 
mul dword[const] ;умножаю eax на 10 
add eax,dword[next_symbol] ;добавляю к eax переменную с последующим числом 

наверное так
--->

Код:

mov ecx,length ;заношу значение длины введенного буфера в регистр ecx 
mov al,byte ptr[ebx+1] ;беру из буфера первый байт 
mov byte ptr[next_symbol],al ;заношу в переменную значение полученного числа 

mov edx,const1
mul edx ;умножаю eax на 10 

add eax,[next_symbol] ;добавляю к eax переменную с последующим числом 

[Lazar]

mov al,byte ptr [ebx+1]
            ^^^
под линуксом в насме не работает...
Как только я пытаюсь использовать этот птр, сразу появляется ошибка.

[Алексей++]

тады ой Не знаю...

[RXL]

Если размер явно виден по одному из операндов и команда не подразумевает разные размеры операндов, то указывать размер еще раз нет необходимости. AL не может быть ничем другим, кроме как байтом! Т.ч. "byte ptr" следует ликвидировать без сожаления.
Другой вопрос, когда компилятор начинает умничать и следить за размерами объявленных данных (db, dw, dd и т.п.)