Как определить размер программы выполнения

assume CS:code, DS:code ;указываем соответствие сегментных регистров
 
code segment ;начало сегмента кода
 
org 256h ;адрес начала программы
 
main proc ;начало главной процедуры
 
Очищаем экран:
 
mov ax, 0600h
 
mov bh, 07 ; bh=07h - атрибут текста
 
mov cx, 0000 ;ch=0 - номер верхней строки, cl=0 - номер левого столбца для очистки
 
mov dx, 184fh ;dh=18h - номер нижней строки, cl=4fh - номер правого столбца для очистки
 
int 10h ;вызов системного прерывания видеосервиса
 
; вывод на экран строки
 
mov ah, 13h ; функция вывода строки
 
mov al, 01h ;присвоить всем символам атрибут в BL, переместить курсор дальше
 
mov bh, 00h ; номер страницы
 
mov bl, 07h ; задание черно-белого цвета
 
mov cx, msg_subject_len ; длина строки
 
mov dh, 00ah ; номер строки на экране
 
mov dl, 019h ; номер столбца на экране
 
mov bp, offset msg_subject ; адрес начала строки, т.е. расстояние в байтах до первого байта этой строки от начала сегмента, в котором она находится
 
int 10h ; вызов системного прерывания
 
; вывод на экран строки
 
mov ah, 13h ; функция вывода строки
 
mov al, 01h ;присвоить всем символам атрибут в BL,
 
переместить курсор дальше
 
mov bh, 00h ; номер страницы
 
mov bl, 07h ; задание черно-белого цвета
 
mov cx, msg_student_len ; длина строки
 
mov dh, 00bh ; номер строки на экране
 
mov dl, 019h ; номер столбца на экране
 
mov bp, offset msg_student; адрес начала строки, т.е. расстояние в байтах до первого байта этой строки от начала сегмента, в котором она находится
 
int 10h ; вызов системного прерывания
 
; вывод на экран строки
 
mov ah, 13h ; функция вывода строки
 
mov al, 01h ;присвоить всем символам атрибут в BL, переместить курсор дальше
 
mov bh, 00h ; номер страницы
 
mov bl, 07h ; задание черно-белого цвета
 
mov cx, msg_name_len ; длина строки
 
mov dh, 00ch ; номер строки на экране
 
mov dl, 019h ; номер столбца на экране
 
mov bp, offset msg_name ; адрес начала строки, т.е. расстояние в байтах до первого байта этой строки от начала сегмента, в котором она находится
 
int 10h ; вызов системного прерывания
 
; вывод на экран строки
 
mov ah, 13h ; ah=13h - вывод строки
 
mov al, 01h ;присвоить всем символам атрибут в BL, переместить курсор дальше
 
mov bh, 00h ; номер страницы
 
mov bl, 07h ; задание черно-белого цвета
 
mov cx, msg_variant_len ; длина строки
 
mov dh, 00dh ; номер строки на экране
 
mov dl, 019h ; номер столбца на экране
 
mov bp,offset msg_variant ; адрес начала строки, т.е. расстояние в байтах до первого байта этой строки от начала сегмента, в котором она находится
 
int 10h ; вызов системного прерывания
 
Ожидание нажатия любой клавиши:
 
mov ax, 0 ; ждем нажатия любой кнопки
 
int 16h ; вызов системного прерывания
 
Очищаем экран:
 
mov ax, 0600h
 
mov bh, 07 ; bh=07h - атрибут текста
 
mov cx, 0000 ;ch=0 - номер верхней строки, cl=0 - номер левого столбца для очистки
 
mov dx, 184fh ;dh=18h - номер нижней строки, cl=4fh - номер правого столбца для очистки
 
int 10h ;вызов системного прерывания видеосервиса
 
Цикл вывода на экран текста:
 
mov cx, some_text_len ; сx=длина строки
 
start: ; начало цикла
 
lea si, some_text ; si=адрес начала строки some_text
 
mov ax, 00h ; функция символьного вывода
 
mov al, pos ; al=содержимое ячейки памяти pos
 
add si, ax ; si=si+ax - сдвигаем si на pos единиц
 
Устанавливаем курсор в позицию 0 строка, pos столбец:
 
mov ah, 02h ; функция установки курсора
 
mov bh, 00 ; bh=00h - номер страницы
 
mov dh, 00 ; dh=00h - номер строки
 
mov dl, pos ; dl=00h - номер столбца
 
int 10h ; вызов системного прерывания
 
mov al, [si] ; al=содержимое ячейки памяти по адресу хранящемуся в si
 
cmp al, '0' ; сравнение al c кодом символа '0'
 
jl no_blink ; если код меньше-значит мигать не надо
 
cmp al, '9' ; сравнение al с кодом символа '9'
 
jg no_blink ; если код больше - мигать не надо
 
mov bl, 87h ; иначе надо мигать. bl=87h - код предписывающий символу мигать белым цветом
 
jmp show ;переход по метке show
 
Режим без мигания:
 
no_blink:
 
mov bl, 07h ;bl=07b - код предписывающий символу не мигать
 
show: ; метка show
 
push cx ; заносим в стек регистр cx
 
mov ah, 09h ; ah=09h - код для записи символа и атрибутов на позиции курсора
 
mov bh, 00h ; bh=00h - номер страницы
 
mov cx, 01h ; cx=00h - количество раз, которые нужно записать символ
 
int 10h ; вызов системного прерывания
 
pop cx ; восстанавливаем ранее сохраненный в стек регистр cx
 
add pos, 1 ; увеличиваем pos для записи в следующий столбец
 
loop start ; повторяем цикл loop пока сx не станет равным нулю
 
mov ax, 4c00h ;ax=4c00h - завершения работы, 4с – номер функции, 00 возвращаемое значение
 
int 21h ; вызов системного прерывания
 
main endp ; конец главной процедуры
 
Данные:
 
msg_subject db 'SYSTEM SOFTWARE'
 
msg_subject_len=$-msg_subject
 
msg_student db 'STUDENT OF GROUP IVT-319'
 
msg_student_len=$-msg_student
 
msg_name db 'Satvalod D. F.'
 
msg_name_len=$-msg_name
 
msg_variant db 'VARIANT-26'
 
msg_variant_len=$-msg_variant
 
some_text db 'This program was created 22 May 2021. Variant-26!'
 
some_text_len=$-some_text ;символ $ указывает на байт последнего символа переменной some_text, тогда $-some_text длина строки
 
pos db 0
 
code ends ; окончание сегмента кода
 
end main ; окончание программы

code segment
org 100h
 
main proc
..............
 
mov ax, codelength
call ShowUInt16
 
 
main endp
 
ShowUInt16 proc
............
ShowUInt16 endp
 
LastLabel label word
 
codelength equ LastLabel-main
 
code ends
end main