ХАНДЫФАР

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

Параметры:

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

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

  • Функция не возвращает значение.

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

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

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

  • Слово определяется как последовательность букв, разделённая пробельными символами.
  • Функция не изменяет значения регистров.

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____string _db "Объединенные Арабские "
  9. ____________db "Эмираты\0"
  10. ____strabbr db 10 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___es:[strabbr]
  22. ________pushs___ds:[string]
  23. ________call____StringAbbreviateEx
  25. ________pushs___ds:[strabbr]
  26. ________call____WriteStringEx
  28. ________push____0
  29. ________call____ExitProcessEx
  30. ____main endp
  32. code ends
  33. end main
Функция StringAbbreviateEx создаёт аббревиатуру из указанной строки, состоящую из первых букв каждого слова, и сохраняет её в подготовленном буфере. Функция StringAbbreviateEx автоматически выравнивает стек на 4 байта.

Параметры:

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

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

  • Функция не возвращает значение.

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

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

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

  • Слово определяется как последовательность букв, разделённая пробельными символами.
  • Функция не изменяет значения регистров.

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____string _db "Объединенные Арабские Эмираты\0"
  9. ____strabbr db 10 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___es:[strabbr]________; 2-й: Ложим на вершину стека адрес переменной strabbr
  21. ________pushs___ds:[string]_________; 1-й: Ложим на вершину стека адрес переменной string
  22. ________call____StringAbbreviateEx__; Вызываем процедуру StringAbbreviateEx(string, strabbr)
  24. ________pushs___ds:[strabbr]________; Ложим на вершину стека адрес переменной strabbr
  25. ________call____WriteStringEx_______; Вызываем процедуру WriteStringEx(strabbr)
  27. ________push____0___________________; Ложим на вершину стека байтовое значение кода возврата
  28. ________call____ExitProcessEx_______; Вызываем процедуру ExitProcess(0)
  29. ____main endp
  31. code ends
  32. end main
Made on
Tilda