ХАНДЫФАР

Функция StringSpanEx возвращает длину максимального начального сегмента первой строки, который состоит только из символов, найденных во второй строке. Функция StringSpanEx автоматически выравнивает стек на 4 байта.

Параметры:

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

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

• DS:AX: Длина максимального начального сегмента первой строки, который содержит только символы из второй строки. Если такой сегмент не найден, возвращается 0.

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

• Функция не изменяет состояние флагов.

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

• Функция не изменяет значения регистров, кроме AX.

1. title Автор: Довгополов Евгений Сергеевич
3. .286C
4. .model small
5. .stack 100h
7. data segment public
8. ____string db "8783274ABCDEFGH1234\0"
9. ____search db "0123456789\0"
10. data ends
12. code segment public
13. ____assume _ds:data, cs:code
14. ____include Handyfar.inc
15. ____include Handymac.inc
17. ____main proc
18. ________call____SetDataSegment
20. ________pushs___es:[search]
21. ________pushs___ds:[string]
22. ________call____StringSpanEx
24. ________push____ax
25. ________call____WriteStringEx
27. ________push____0
28. ________call____ExitProcessEx
29. ____main endp
31. code ends
32. end main

Функция StringSpanEx возвращает длину максимального начального сегмента первой строки, который состоит только из символов, найденных во второй строке. Функция StringSpanEx автоматически выравнивает стек на 4 байта.

Параметры:

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

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

• DS:AX: Длина максимального начального сегмента первой строки, который содержит только символы из второй строки. Если такой сегмент не найден, возвращается 0.

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

• Функция не изменяет состояние флагов.

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

• Функция не изменяет значения регистров, кроме AX.

1. title Автор: Довгополов Евгений Сергеевич
3. .286C
4. .model small
5. .stack 100h
7. data segment public
8. ____string db "8783274ABCDEFGH1234\0"
9. ____search db "0123456789\0"
10. data ends
12. code segment public
13. ____assume _ds:data, cs:code
14. ____include Handyfar.inc________; Подключаем файл с функциями
15. ____include Handymac.inc________; Подключаем файл с макросами
17. ____main proc
18. ________call____SetDataSegment__; Вызываем процедуру SetDataSegment
20. ________pushs___es:[search]_____; 2-й: Ложим на вершину стека адрес переменной search
21. ________pushs___ds:[string]_____; 1-й: Ложим на вершину стека адрес переменной string
22. ________call____StringSpanEx____; Вызываем процедуру StringSpanEx(string, search)
24. ________push____ax______________; 3-й: Ложим на вершину стека значение регистра ax
25. ________call____WriteStringEx___; Вызываем процедуру WriteStringEx(ax)
27. ________push____0_______________; Ложим на вершину стека байтовое значение кода возврата
28. ________call____ExitProcessEx___; Вызываем процедуру ExitProcess(0)
29. ____main endp
31. code ends
32. end main