ХАНДЫФАР

Функция ReadStringEx считывает пользовательский ввод с клавиатуры и сохраняет его в подготовленном буфере, завершающемся 0. Ввод завершается при нажатии клавиши Enter, после чего в буфер добавляется символ завершения строки 0. Функция ReadStringEx автоматически выравнивает стек на 2 байта

Параметры:

  1. Указатель на буфер, в который будет сохранён пользовательский ввод.

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

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

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

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

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

  • Функция не изменяет значения регистров.
  • Ввод завершается при нажатии клавиши Enter, после чего в буфер добавляется символ завершения строки 0.

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____askUser db "Введите своё полное "
  9. ____________db "имя: \0"
  10. ____output__db "\nВаше полное имя \0"
  11. ____buffer__db 255 dup(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___ds:[askUser]
  23. ________call____WriteStringEx
  25. ________pushs___ds:[buffer]
  26. ________call____ReadStringEx
  28. ________pushs___ds:[output]
  29. ________call____WriteStringEx
  31. ________pushs___ds:[buffer]
  32. ________call____WriteStringEx
  34. ________push____0
  35. ________call____ExitProcessEx
  36. ____main endp
  38. code ends
  39. end main
Функция ReadStringEx считывает пользовательский ввод с клавиатуры и сохраняет его в подготовленном буфере, завершающемся 0. Ввод завершается при нажатии клавиши Enter, после чего в буфер добавляется символ завершения строки 0. Функция ReadStringEx автоматически выравнивает стек на 2 байта

Параметры:

  1. Указатель на буфер, в который будет сохранён пользовательский ввод.

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

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

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

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

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

  • Функция не изменяет значения регистров.
  • Ввод завершается при нажатии клавиши Enter, после чего в буфер добавляется символ завершения строки 0.

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____askUser db "Введите своё полное имя: \0"
  9. ____output__db "\nВаше полное имя \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__; Вызываем процедуру SetDataSegment
  21. ________pushs___ds:[askUser]____; Ложим на вершину стека адрес переменной string
  22. ________call____WriteStringEx___; Вызываем процедуру WriteStringEx(string)
  24. ________pushs___ds:[buffer]_____; Ложим на вершину стека адрес переменной buffer
  25. ________call____ReadStringEx____; Вызываем процедуру ReadStringEx(buffer)
  27. ________pushs___ds:[output]_____; Ложим на вершину стека адрес переменной output
  28. ________call____WriteStringEx___; Вызываем процедуру WriteStringEx(output)
  30. ________pushs___ds:[buffer]_____; Ложим на вершину стека адрес переменной buffer
  31. ________call____WriteStringEx___; Вызываем процедуру WriteStringEx(buffer)
  33. ________push____0_______________; Ложим на вершину стека байтовое значение кода возврата
  34. ________call____ExitProcessEx___; Вызываем процедуру ExitProcess(0)
  35. ____main endp
  37. code ends
  38. end main
Made on
Tilda