ВУЗ:
Составители:
59
include "lst_2_03.inc"
; Подключить файл мнемонических обозначений цветов
include "lst_2_05.inc"
SEGMENT sseg para stack 'STACK'
DB 400h DUP(?)
ENDS
DATASEG
; Текстовые сообщения
Text1 DB 0,19,"Включение режима "
DB "линейной адресации данных",0
DB 11,0,"Для просмотра "
DB "содержимого регистров процессора",0
DB 12,0,"перед запуском процедуры "
DB "перехода в режим",0
DB 13,0,"линейной адресации нажмите "
DB "любую клавишу.",0
Text2 DB 11,0,"Произведено переключение в "
DB "режим линейной адресации.",0
DB 12,0,"Для просмотра содержимого "
DB "регистров процессора",0
DB 13,0,"нажмите любую клавишу.",0
Text3 DB 11,0,"После завершения данной "
DB "программы регистр GS",0
DB 12,0,"может использовать для "
DB "линейной адресации",0
DB 13,0,"любая другая программа.",0
DB 24,18,"Для выхода из программы "
DB "нажмите любую клавишу.",0
ENDS
CODESEG
;*****************************
;* Основной модуль программы *
;*****************************
PROC LAddrTest
mov AX,DGROUP
mov DS,AX
; Установить текстовый режим и очистить экран
mov AX,3
int 10h
; Скрыть курсор - убрать за нижнюю границу экрана
mov [ScreenString],25
mov [ScreenColumn],0
call SetCursorPosition
; Вывести первое текстовое сообщение
; на экран зеленым цветом
mov [TextColorAndBackground],LIGHTGREEN
mov CX,4
include "lst_2_03.inc" ; Подключить файл мнемонических обозначений цветов include "lst_2_05.inc" SEGMENT sseg para stack 'STACK' DB 400h DUP(?) ENDS DATASEG ; Текстовые сообщения Text1 DB 0,19,"Включение режима " DB "линейной адресации данных",0 DB 11,0,"Для просмотра " DB "содержимого регистров процессора",0 DB 12,0,"перед запуском процедуры " DB "перехода в режим",0 DB 13,0,"линейной адресации нажмите " DB "любую клавишу.",0 Text2 DB 11,0,"Произведено переключение в " DB "режим линейной адресации.",0 DB 12,0,"Для просмотра содержимого " DB "регистров процессора",0 DB 13,0,"нажмите любую клавишу.",0 Text3 DB 11,0,"После завершения данной " DB "программы регистр GS",0 DB 12,0,"может использовать для " DB "линейной адресации",0 DB 13,0,"любая другая программа.",0 DB 24,18,"Для выхода из программы " DB "нажмите любую клавишу.",0 ENDS CODESEG ;***************************** ;* Основной модуль программы * ;***************************** PROC LAddrTest mov AX,DGROUP mov DS,AX ; Установить текстовый режим и очистить экран mov AX,3 int 10h ; Скрыть курсор - убрать за нижнюю границу экрана mov [ScreenString],25 mov [ScreenColumn],0 call SetCursorPosition ; Вывести первое текстовое сообщение ; на экран зеленым цветом mov [TextColorAndBackground],LIGHTGREEN mov CX,4 59
Страницы
- « первая
- ‹ предыдущая
- …
- 57
- 58
- 59
- 60
- 61
- …
- следующая ›
- последняя »