вычисление длины строки

[fokinamasha]

привет! помогите пожалуйста, мне нужно написать процедуру, вычисляющую длину строки, ассемблер не понимаю, вот код на эту задачу(немного разбирали похожее на паре), но почему то не работает...

.386
.model flat, stdcall
option casemap: none
includelib kernel32.lib
.code 
strlen proc uses eax ebx ecx edi
string: dword,
retvail: dword
cld
mov ax, ds
mov es, ax
mov edi, string
mov ecx, 2048
mov al, END_OF_STRING
 
repne scasb  ; сканирование по байтам(будет повторятьсся до тех пор, пока не встретиться ноль или другой какой то элемент, который мы запрограмировали(в отличие от rep)
 
dec edi ; remove END_OF_STRING symbol
sub edi, string ; substract addres of string from last symbol
mov ebx, retval; return value
mov[ebx], edi
ret
strlen endp
 
main proc
invoke strlen, ADDR test string, ADDR len
mov eax, len
invoke ExitProcess, 0
main endp
end main

по идее типа она(прога) выдает нам длину строки в байтах...насколько я поняла..типа адрес начала строки минус адрес конца строки...


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

[Ibanez Wizard]

Так не проще?

.386
.model flat,stdcall
.code
string	db "Hello World!!!",0; строка
start:
mov edi,offset string
call _strlen	
ret
_strlen:			
xor eax,eax
@1:
inc eax
cmp byte ptr[eax+edi],0
jnz @1	
ret
end start

Спрашивай если что непонятно).
А на счёт твоего - я его посмотрел. Там в половине строчек смысла нет. Я попробовал исправить. В debuggere посмотрел - все работает хорошо. Получается правильно. Рассматривал на примере Hello World. Вот программа:

.386
.model flat, stdcall
option casemap: none
includelib\masm32\lib\kernel32.lib
ExitProcess proto : DWORD; без неё программа будет ругатся
.data
string db "Hello World!", 0;строчка в которой считаем символы
len dd 0; переменная для хранения результата
.code 
start:
cld; со строками работаем, а без неё с индексными регистрами абракадабра происходит
mov ax, ds;в windows эти строки не нужны, но раз так показали в 
mov es, ax; универе значит так надо))
lea eax, string; здесь загружаем единственный параметр нашей функции
push eax;посредством помещения в стек его указателя (адреса) все это делает команда lea
call strlen; вызываем функцию (в eax на выходе количество символов)
mov len, eax; загружаем переменную
invoke ExitProcess, 0; выходим из программы

strlen proc uses eax ebx ecx edi String:BYTE; начало нашей функции с параметром - строкой размером в байт
lea edi, string; ну тут начинается твой алгоритм;
mov ecx, 2048
mov eax, 0;поскольку любая строка заканчивается нулем, то будем отсчитывать пока не встретим нуль
repne scasb  ; сканирование по байтам(будет повторятьсся до тех пор, пока не встретиться ноль или другой какой то элемент, который мы запрограмировали(в отличие от rep)
dec edi ; remove END_OF_STRING symbol
sub edi, offset string ; substract addres of string from last symbol
lea ebx, len; return value
mov [ebx], edi; ну тут по адресу который мы получили в предыдущей строке опять командой lea будет наш результат
mov eax, len
ret
strlen endp

Здесь строчку

strlen proc uses eax ebx ecx edi

Заменяет то, что я записал в описании функции.
Вот эту строчку:

includelib\masm32\lib\kernel32.lib

ты можешь заменить своей прежней, просто у меня так не компилировалось (в другом месте эта библиотека находилась).

ExitProcess proto : DWORD

А она здесь нужна для того, чтобы вызвать ExitProcess. Это прототип функции. Вообще он объявлен в kernel32.inc, но раз ты его не подключила, то придется так).
А на счет команды lea - она загружает в первый операнд адрес второго, то есть строчки

mov eax, offset string

и

lea eax, string

будут эквивалентны.

[vadimych]

Ibanez Wizard, что бы не лезть в дебаггер раз за разом, выведи результат в окно:

.386
.model flat,stdcall
option casemap:none
include \masm32\include\user32.inc
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\user32.lib
.data
fmt db '%d',0
string db 'abcdefghijklmnopqrstuvwxyz'
m db ?
.code
start:
mov eax,offset m
sub eax,offset string
push eax
push offset fmt
push offset m
call wsprintf
push 0
push 0
push offset m
push 0
call MessageBox
push 0
call ExitProcess
end start

[Ibanez Wizard]

vadimych, если я буду выводить на экран, то я увижу только результат, да и к тому же мне бы пришлось вывод на экран потом из исходника удалять (чтобы выложить готовый вариант). В отладчике я себя увереннее чувствую.