ХАНДЫФАР

Функция CapitalizeEx преобразует каждое предложение в строке в заглавную букву. Предложение считается завершённым, если встречается символ точки (.), восклицательного знака (!) или вопросительного знака (?). Строка должна завершаться (\0) или 0.

Функция CapitalizeEx не выравнивает стек на 2 байта а сохраняет преобразованное значение на вершине стека и в регистре AX. Это сделано для того чтобы иметь возможность вызвать функцию WriteString или WriteStringEx сразу после вызова функции CapitalizeEx. Если после вызова функции CapitalizeEx для вывода преобразованного символа используется функция WriteString то, выравнивание стека лежит на программисте. Для того чтобы выровнять стек на 2 байта, после вызова функции WriteString нужно написать следующую команду: add sp, 2.

Параметры:

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

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

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

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

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

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

  • Функция преобразует первый символ каждого предложения в верхний регистр.
  • Предложение определяется по символам завершения: ., !, ?.
  • Функция не изменяет значения регистров, кроме AX.
  • Строка должна завершаться (\0), чтобы функция могла определить её конец.

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____string db "Введите несколько "
  9. ___________db "предложений: \0"
  10. ____buffer db 255 dup(0)
  11. data ends
  13. code segment public
  14. ____assume _ds:data, cs:code
  15. ____include Handyfar.inc
  16. ____include Handymac.inc
  18. ____main proc
  19. ________call____SetDataSegment
  21. ________pushs___ds:[string]
  22. ________call____WriteStringEx
  24. ________pushs___ds:[buffer]
  25. ________call____ReadStringEx
  27. ________call____PrintNewLine
  29. ________pushs___ds:[buffer]
  30. ________call____CapitalizeEx
  31. ________call____WriteStringEx
  33. ________push____0
  34. ________call____ExitProcessEx
  35. ____main endp
  37. code ends
  38. end main
Функция CapitalizeEx преобразует каждое предложение в строке в заглавную букву. Предложение считается завершённым, если встречается символ точки (.), восклицательного знака (!) или вопросительного знака (?). Строка должна завершаться (\0) или 0.

Функция CapitalizeEx не выравнивает стек на 2 байта а сохраняет преобразованное значение на вершине стека и в регистре AX. Это сделано для того чтобы иметь возможность вызвать функцию WriteString или WriteStringEx сразу после вызова функции CapitalizeEx. Если после вызова функции CapitalizeEx для вывода преобразованного символа используется функция WriteString то, выравнивание стека лежит на программисте. Для того чтобы выровнять стек на 2 байта, после вызова функции WriteString нужно написать следующую команду: add sp, 2.

Параметры:

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

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

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

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

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

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

  • Функция преобразует первый символ каждого предложения в верхний регистр.
  • Предложение определяется по символам завершения: ., !, ?.
  • Функция не изменяет значения регистров, кроме AX.
  • Строка должна завершаться (\0), чтобы функция могла определить её конец.

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____string db "Введите несколько предложений: \0"
  9. ____buffer db 255 dup(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___ds:[string]_____; Ложим на вершину стека адрес переменной string
  21. ________call____WriteStringEx___; Вызываем процедуру WriteStringEx(string)
  23. ________pushs___ds:[buffer]_____; Ложим на вершину стека адрес переменной buffer
  24. ________call____ReadStringEx____; Вызываем процедуру ReadStringEx(buffer)
  26. ________call____PrintNewLine____; Вызываем процедуру PrintNewLine()
  28. ________pushs___ds:[buffer]_____; Ложим на вершину стека адрес переменной buffer
  29. ________call____CapitalizeEx____; Вызываем процедуру CapitalizeEx(buffer)
  30. ________call____WriteStringEx___; Вызываем процедуру WriteStringEx(значение из стека)
  32. ________push____0_______________; Ложим на вершину стека байтовое значение кода возврата
  33. ________call____ExitProcessEx___; Вызываем процедуру ExitProcess(0)
  34. ____main endp
  36. code ends
  37. end main
Made on
Tilda