ХАНДЫФАР

Эти функции выполняют округление вещественного числа, находящегося на вершине стека математического сопроцессора (ST(0)), в соответствии с указанным режимом округления:

RoundFloor: Округление вниз (к меньшему целому).
RoundCeil: Округление вверх (к большему целому).
RoundNearest: Округление к ближайшему целому.

Параметры:

  • ST(0): Вещественное число на вершине стека математического сопроцессора.

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

  • Результат округления сохраняется в ST(0).

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

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

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

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

  • RoundFloor использует команду FRNDINT с режимом округления вниз (устанавливается через FSTCW и FLDCW).

  • RoundCeil использует команду FRNDINT с режимом округления вверх (устанавливается через FSTCW и FLDCW).

  • RoundNearest использует команду FRNDINT с режимом округления к ближайшему целому (режим по умолчанию).

  • Функции не изменяют значения регистров, кроме ST(0).

  1. title Автор: Довгополов Евгений Сергеевич
  3. .model small
  4. .stack 100h
  6. data segment public
  7. ____fmtstr _db "Результат: %d\0"
  8. ____number1 dq 45.3
  9. ____number2 dq 213.3
  10. ____result _dw ?
  11. data ends
  13. code segment public
  14. ____assume _ds:data, cs:code
  15. ____include Handyfar.inc
  17. ____main proc
  18. ________call____SetDataSegment
  20. ________fld_____qword ptr[number1]
  21. ________fadd____qword ptr[number2]
  22. ________call____RoundFloor
  23. ________fistp___word ptr[result]
  25. ________push____result
  26. ________lea_____ax, ds:[fmtstr]
  27. ________call____PrintFormatString
  28. ________add_____sp, 2
  30. ________xor_____al, al
  31. ________call____ExitProcess
  32. ____main endp
  34. code ends
  35. end main
Эти функции выполняют округление вещественного числа, находящегося на вершине стека математического сопроцессора (ST(0)), в соответствии с указанным режимом округления:

RoundFloor: __Округление вниз (к меньшему целому).
RoundCeil: ___Округление вверх (к большему целому).
RoundNearest: Округление к ближайшему целому.

Параметры:

  • ST(0): Вещественное число на вершине стека математического сопроцессора.

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

  • Результат округления сохраняется в ST(0).

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

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

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

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

  • RoundFloor использует команду FRNDINT с режимом округления вниз (устанавливается через FSTCW и FLDCW).

  • RoundCeil использует команду FRNDINT с режимом округления вверх (устанавливается через FSTCW и FLDCW).

  • RoundNearest использует команду FRNDINT с режимом округления к ближайшему целому (режим по умолчанию).

  • Функции не изменяют значения регистров, кроме ST(0).

  1. title Автор: Довгополов Евгений Сергеевич
  3. .model small
  4. .stack 100h
  6. data segment public
  7. ____fmtstr _db "Результат: %d\0"
  8. ____number1 dq 45.3
  9. ____number2 dq 213.3
  10. ____result _dw ?
  11. data ends
  13. code segment public ________________; Начало сегмента кода
  14. ____assume _ds:data, cs:code
  15. ____include Handyfar.inc____________; Подключаем файл с функциями
  17. ____main proc ______________________; Начало процедуры main
  18. ________call____SetDataSegment______; Вызываем процедуру SetDataSegment
  20. ________fld_____qword ptr[number1]__; Загружаем на вершину стека мат. сопроцессора number1
  21. ________fadd____qword ptr[number2]__; Выполняем сложение переменной number1(st(0)) и number2
  22. ________call____RoundFloor__________; Вызываем процедуру RoundFloor(st(0))
  23. ________fistp___word ptr[result]____; Сохраняем значение в переменной result и выталкиваем из стека
  25. ________push____result______________; 2-й: Сохраняем значение переменной result в стеке
  26. ________lea_____ax, ds:[fmtstr]_____; 1-й: Загружаем адрес строки формата fmtstr в регистр ds:ax
  27. ________call____PrintFormatString___; Вызываем процедуру PrintFormatString(ax:fmtstr, result)
  28. ________add_____sp, 2_______________; Выравниваем стек
  30. ________xor_____al, al______________; Обнуляем регистр al
  31. ________call____ExitProcess_________; Вызываем процедуру ExitProcess
  32. ____main endp ______________________; Конец процедуры main
  34. code ends __________________________; Конец сегмента кода
  35. end main ___________________________; Конец файла. Точкой входа указывается процедура main
Made on
Tilda