Обработка символьной информации, с помощью функций DOS Опции

[Rocket]

Вот задание: Ввести с клавиатуры две строки. Сравнить их. Вывести на экран какая из строк больше и насколько. Какие мысли есть по реализации данной программы? Как осуществить сравнение строк?

[volvo]

А вот как организовать подпрограмму поиска одной введённой строки в другой строке? И ещё: вывод позиции, с которой подстрока содержится в строке...

Вот тебе программа, которая это делает... В виде подпрограммы оформляй сам:

MODEL small

stack 100
.286

DATASEG
entrStr	db 13, 10, 'string:$'
entrSStr	db 13, 10, 'substring:$'
sNotFound	db 13, 10, 'substring was not found$'
sResult	db 13, 10, 'pos = $'

inpStr  db 200
inpStrLen db ?
inpStrDat db 200 dup(?)

inpSStr  db 200
inpSStrLen db ?
inpSStrDat db 200 dup(?)

count_of_digits  dw 6

CODESEG

writeDEC proc

	; ...

writeDEC endp

show_ax proc
	mov cx, 10
	xor di, di
@@conv:
	xor dx, dx
	div cx
        add dl, '0'
        inc di
	push    dx              ; складываем в стэк
        or      ax, ax
        jnz     @@conv
        ; выводим из стэка на экран
    @@show:
        pop     dx              ; dl = очередной символ
        mov     ah, 2           ; ah - функция вывода символа на экран
        int     21h
        dec     di              ; повторяем пока di<>0
        jnz     @@show
        ret
show_ax endp

start: 
	mov ax,@DATA
	mov ds, ax
	mov es, ax
	
	; вводим строку
	mov ah, 09h
	mov dx, offset entrStr
	int 21h
	mov ah, 0ah
	mov dx, offset inpStr
	int 21h
	
	; записываем '$' в конец строки
	mov di, offset inpStrDat
	xor ch, ch
	mov cl, inpStrLen
	add di, cx
	mov byte ptr[di], '$'
	
	; вводим подстроку
	mov ah, 09h
	mov dx, offset entrSStr
	int 21h
	mov ah, 0ah
	mov dx, offset inpSStr
	int 21h
	
	; Подготовка
	xor cx, cx
	mov di, offset inpStrDat
	mov si, offset inpSStrDat
	mov cl, inpStrLen
	
	; Ищем первый символ подстроки
FindFirstCh:
	mov al, [di] ;
	inc di
	cmp al, [si]
	jz beginCompare	; Нашли
	
nextCompare:
	loop FindFirstCh

	; Если цикл FindFirstCh закончился - значит подстроки нет
	mov ah, 09h
	mov dx, offset sNotFound
	int 21h
	jmp exit_prog
	
beginCompare:
	; Проверяем следующие за первым в подстроке символы
	push cx
	push si
	push di
	dec di
	mov cl, inpSStrLen
	
	; Проверка
yesCompare:
	mov al, [di]
	inc di
	cmp al, [si]
	jnz noCompare	; Очередной символ не совпал
	inc si
	loop yesCompare
	
	; Если здесь - значит все совпало
	jmp found
	
	; Не совпало - восстанавливаем данные и ищем дальше
	; первый символ подстроки в строке
noCompare:
	pop di
	pop si
	pop cx
	jmp short nextCompare
	
found:
	; Есть совпадение, выводим сообщение
	mov ah, 09h
	mov dx, offset sResult
	int 21h
	
	; вытягиваем из стека адрес первого символа
	pop di
	
	; и вычисляем его позицию
	mov dx, offset inpStrDat
	mov ax, di
	sub ax, dx
	call writeDEC	; Эту процедуру я показывал раньше
	
exit_prog:
	mov ah, 4ch
	int 21h
end start

(процедуру writeDEC возьми из предыдущих постов, я не стал ее опять копировать...)

[Rocket]

Вот тебе программа, которая это делает...

У меня возник ряд вопросов по реализации...
1) Использование "offset". Я так полагаю, что это полный аналог команды "lea" ?
2) inpStrDat что это за переменная, для чего она нужна?
3)

mov di, offset inpStrDat

что делает конструкция такого вида?
4) Как определяется размер строки? т.е.

mov cl, inpStrLen

почему в cl сразу помещается размер строки?
5) При переходе на метку

beginCompare:

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

Сообщение отредактировано: volvo - 14.01.2009 0:28