ХАНДЫФАР

Функция StringCompareEx выполняет лексикографическое сравнение двух строк, завершающихся (\0) или 0. Если одна из строк равна 0, функция завершает работу и возвращает результат сравнения. Функция StringCompareEx автоматически выравнивает стек на 4 байта.

Параметры:

1. Указатель на первую строку, завершающуюся (\0) или 0.
2. Указатель на вторую строку, завершающуюся (\0) или 0.

Возвращаемое значение:

• Если строки равны лексикографически:

____AX = 0.
____ZF = 1.

• Если строки не равны:

AX = 1: Первый отличающийся символ в первой строке больше соответствующего символа во второй строке.
AX = -1: Первый отличающийся символ в первой строке меньше соответствующего символа во второй строке.
ZF = 0.

Состояние флагов:

• Функция влияет на все флаги, включая флаг ZF, SF и другие.

Особенности:

• Если строки равны до конца, функция возвращает AX = 0 и устанавливает ZF = 1.
• Функция не изменяет значения регистров, кроме AX и флагов.

1. title Автор: Довгополов Евгений Сергеевич
3. .286C
4. .model small
5. .stack 100h
7. data segment public
8. ____string1 _db "Довгополов Евгений\0"
9. ____string2 _db "Довгополов Сергей\0"
10. ____equal____db "Строки равны!\0"
11. ____notEqual db "Строки не равны!\0"
12. data ends
14. code segment public
15. ____assume _ds:data, cs:code
16. ____include Handyfar.inc
17. ____include Handymac.inc
19. ____main proc
20. ________call____SetDataSegment
22. ________pushs___es:[string2]
23. ________pushs___ds:[string1]
24. ________call____StringCompareEx
26. ________jne_____@StringsNotEqual
28. ________pushs___ds:[equal]
29. ________jmp_____@Done
31. ____@StringsNotEqual:
32. ________pushs___ds:[notEqual]
34. ____@Done:
35. ________call____WriteStringEx
37. ________push____0
38. ________call____ExitProcessEx
39. ____main endp
41. code ends
42. end main

Функция StringCompareEx выполняет лексикографическое сравнение двух строк, завершающихся (\0) или 0. Если одна из строк равна 0, функция завершает работу и возвращает результат сравнения. Функция StringCompareEx автоматически выравнивает стек на 4 байта.

Параметры:

1. Указатель на первую строку, завершающуюся (\0) или 0.
2. Указатель на вторую строку, завершающуюся (\0) или 0.

Возвращаемое значение:

• Если строки равны лексикографически:

____AX = 0.
____ZF = 1.

• Если строки не равны:

AX = 1: Первый отличающийся символ в первой строке больше соответствующего символа во второй строке.
AX = -1: Первый отличающийся символ в первой строке меньше соответствующего символа во второй строке.
ZF = 0.

Состояние флагов:

• Функция влияет на все флаги, включая флаг ZF, SF и другие.

Особенности:

• Если строки равны до конца, функция возвращает AX = 0 и устанавливает ZF = 1.
• Функция не изменяет значения регистров, кроме AX и флагов.

1. title Автор: Довгополов Евгений Сергеевич
3. .286C
4. .model small
5. .stack 100h
7. data segment public
8. ____string1 _db "Довгополов Евгений\0"
9. ____string2 _db "Довгополов Сергей\0"
10. ____equal____db "Строки равны!\0"
11. ____notEqual db "Строки не равны!\0"
12. data ends
14. code segment public
15. ____assume _ds:data, cs:code
16. ____include Handyfar.inc__________; Подключаем файл с функциями
17. ____include Handymac.inc__________; Подключаем файл с макросами
19. ____main proc
20. ________call____SetDataSegment____; Вызываем процедуру SetDataSegment
22. ________pushs___es:[string2]______; 2-й: Ложим на вершину стека адрес переменной string2
23. ________pushs___ds:[string1]______; 1-й: Ложим на вершину стека адрес переменной string1
24. ________call____StringCompareEx___; Вызываем процедуру StringCompareEx(string1, string2) := AX и ZF
26. ________jne_____@StringsNotEqual__; Если ZF=0, то прыгаем на метку @StringsNotEqual
28. ________pushs___ds:[equal]________; Ложим на вершину стека адрес переменной equal
29. ________jmp_____@Done_____________; Выполняем безусловный переход на метку @Done
31. ____@StringsNotEqual:
32. ________pushs___ds:[notEqual]_____; Ложим на вершину стека адрес переменной notEqual
34. ____@Done:
35. ________call____WriteStringEx_____; Вызываем процедуру WriteStringEx(значение из стека)
37. ________push____0_________________; Ложим на вершину стека байтовое значение кода возврата
38. ________call____ExitProcessEx_____; Вызываем процедуру ExitProcess(0)
39. ____main endp
41. code ends
42. end main