ХАНДЫФАР

Функция WriteFileExD самостоятельно открывает и записывает данные в файл. Функция WriteFileExD автоматически выравнивает стек на 4 байта.

Параметры:

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

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

  • Если CF = 0: AX содержит количество успешно записанных байт.
  • Если CF = 1: AX содержит код ошибки.

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

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

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

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

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____fName____db "test.txt", 0
  9. ____fBuffer _db "Здравствуйте, я изучаю "
  10. _____________db "язык ассемблера!\0"
  11. ____wSuccess db "Данные были успешно "
  12. _____________db "записаны в файл!\0"
  13. ____wError___db "Произошла ошибка при _____________db "записи в '%s'. Код "
  14. _____________db "ошибки: %d\0"
  15. data ends
  17. code segment public
  18. ____assume _ds:data, cs:code
  19. ____include Handyfar.inc
  20. ____include Handymac.inc
  22. ____main proc
  23. ________call____SetDataSegment
  25. ________pushs___ds:[fBuffer]
  26. ________pushs___ds:[fName]
  27. ________call____WriteFileExD
  29. ________jnc_____@NoWriteFileError
  31. ________push____ax
  32. ________pushs___ds:[fName]
  33. ________leaax___ds:[wError]
  34. ________call____PrintFormatString
  35. ________add_____sp, 4
  36. ________jmp_____@Done
  38. ____@NoWriteFileError:
  39. ________pushs___ds:[wSuccess]
  40. ________call____WriteStringEx
  42. ____@Done:
  43. ________push____0
  44. ________call____ExitProcessEx
  45. ____main endp
  47. code ends
  48. end main
Функция WriteFileExD самостоятельно открывает и записывает данные в файл. Функция WriteFileExD автоматически выравнивает стек на 4 байта.

Параметры:

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

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

  • Если CF = 0: AX содержит количество успешно записанных байт.
  • Если CF = 1: AX содержит код ошибки.

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

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

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

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

  1. title Автор: Довгополов Евгений Сергеевич
  3. .286C
  4. .model small
  5. .stack 100h
  7. data segment public
  8. ____fName____db "test.txt", 0
  9. ____fBuffer _db "Здравствуйте, я изучаю язык ассемблера!\0"
  10. ____wSuccess db "Данные были успешно записаны в файл!\0"
  11. ____wError___db "Произошла ошибка при записи в '%s'. Код ошибки: %d\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___ds:[fBuffer]_______; 2-й: Ложим на вершину стека адрес переменной fBuffer
  23. ________pushs___ds:[fName]_________; 1-й: Ложим на вершину стека адрес переменной fName
  24. ________call____WriteFileExD_______; Вызываем процедуру WriteFileExD(fName, fBuffer) := AX и CF
  26. ________jnc_____@NoWriteFileError__; Если CF=0, то прыгаем на метку @NoWriteFileError
  28. ________push____ax_________________; 3-й: Ложим на вершину стека ax (код ошибки)
  29. ________pushs___ds:[fName]_________; 2-й: Ложим на вершину стека адрес переменной fName
  30. ________leaax___ds:[wError]________; 1-й: Загружаем адрес строки формата wError в регистр ds:ax
  31. ________call____PrintFormatString__; Вызываем процедуру PrintFormatString(ax:wError, fName, ax)
  32. ________add_____sp, 4______________; Выравниваем стек
  33. ________jmp_____@Done______________; Выполняем безусловный переход на метку @Done
  35. ____@NoWriteFileError:
  36. ________pushs___ds:[wSuccess]______; Ложим на вершину стека адрес переменной wSuccess
  37. ________call____WriteStringEx______; Вызываем процедуру WriteStringEx(wSuccess)
  39. ____@Done:
  40. ________push____0__________________; Ложим на вершину стека байтовое значение кода возврата
  41. ________call____ExitProcessEx______; Вызываем процедуру ExitProcess(0)
  42. ____main endp
  44. code ends
  45. end main
Made on
Tilda