ХАНДЫФАР

Функция SetCursorPosition устанавливает позицию каретки (курсора) на экране текстового режима в указанные ряд и колонку.

Параметры:

  • AH: Номер ряда (строка), начиная с 0.
  • AL: Номер колонки (столбец), начиная с 0.

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

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

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

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

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

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

  1. title Автор: Довгополов Евгений Сергеевич
  3. .model small
  4. .stack 100h
  6. data segment public
  7. ____string db "Привет, Мир Ассемблера!\0"
  8. data ends
  10. code segment public
  11. ____assume _ds:data, cs:code
  12. ____include Handyfar.inc
  14. ____main proc
  15. ________call____SetDataSegment
  17. ________mov_____ax, 0606h
  18. ________call____SetCursorPosition
  20. ________lea_____ax, ds:[string]
  21. ________call____WriteString
  23. ________xor_____al, al
  24. ________call____ExitProcess
  25. ____main endp
  27. code ends
  28. end main
Функция SetCursorPosition устанавливает позицию каретки (курсора) на экране текстового режима в указанные ряд и колонку.

Параметры:

  • AH: Номер ряда (строка), начиная с 0.
  • AL: Номер колонки (столбец), начиная с 0.

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

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

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

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

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

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

  1. title Автор: Довгополов Евгений Сергеевич
  3. .model small
  4. .stack 100h
  6. data segment public
  7. ____string db "Привет, Мир Ассемблера!\0"
  8. data ends
  10. code segment public _______________; Начало сегмента кода
  11. ____assume _ds:data, cs:code
  12. ____include Handyfar.inc___________; Подключаем файл с функциями
  14. ____main proc _____________________; Начало процедуры main
  15. ________call____SetDataSegment_____; Вызываем процедуру SetDataSegment
  17. ________mov_____ax, 0606h__________; Копируем новую позицию курсора в регистр ax
  18. ________call____SetCursorPosition__; Вызываем процедуру SetCursorPosition(ah:06, al:06)
  20. ________lea_____ax, ds:[string]____; Загружаем адрес переменной string в регистр ds:ax
  21. ________call____WriteString________; Вызываем процедуру WriteString(ax:string)
  23. ________xor_____al, al_____________; Обнуляем регистр al
  24. ________call____ExitProcess________; Вызываем процедуру ExitProcess
  25. ____main endp _____________________; Конец процедуры main
  27. code ends _________________________; Конец сегмента кода
  28. end main __________________________; Конец файла. Точкой входа указывается процедура main
Made on
Tilda