Описание кода отдельных процедур

@Gepar · Регистрация: 01.07.2009

Студворк — интернет-сервис помощи студентам

Что-то не получаеться у меня скомпилировать код с отдельными процедурами, кажеться я что-то делаю не так (хотя и следую примерам из книги Абеля).

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
PAGE 60, 132
TITLE ALLASC
;---------------------------------
STACKSG SEGMENT PARA STACK 'Stack'
    DB 32 DUP('*')
STACKSG ENDS;
;---------------------------------
DATASG SEGMENT PARA 'Data'
    CTR DB 00,'$'
DATASG ENDS;
;---------------------------------
CODESG SEGMENT PARA 'Code'
MAIN PROC FAR
    ASSUME CS:CODESG, SS:STACKSG
    CALL B10CLR
    CALL C10SET
    CALL D10DISP
    NOP
    RET;
MAIN ENDP;
 
;Очистка экрана
;---------------------------------
B10CLR PROC
    MOV AX, 0600H
    MOV CX, 0000    ; Левая верхняя позиция
    MOV DX, 184FH   ; Правая нижняя позиция
    INT 10H
    RET;
B10CLR ENDS;
 
;Установка курсора в 00,00
;---------------------------------
C10SET PROC
    MOV AH, 02
    MOV BH, 00
    MOV DX, 0000
    INT 10H
    RET;
C10SET ENDS;
 
;Вывод на экран ASCII символов
;---------------------------------
D10DISP PROC
    MOV CX, 256     ;
    LEA DX, CTR
D20:
    MOV AH, 09
    INT 21H
    INC CTR
    LOOP D20
    RET;
D10DISP ENDS;
 
CODESG ENDS;
END MAIN

Ругаеться Block nesting error 3 раза, как я понимаю это на B10CLR, C10SET и D10DISP. Что именно я описал не так?

Not at all! · 17.11.2013, 21:30

Gepar, вот, сравните.

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
PAGE 60, 132
TITLE ALLASC
;---------------------------------
STACKSG SEGMENT PARA STACK 'Stack'
    DB 32 DUP('*')
STACKSG ENDS;
;---------------------------------
DATASG SEGMENT PARA 'Data'
    CTR DB 00,'$'
DATASG ENDS;
;---------------------------------
CODESG SEGMENT PARA 'Code'
MAIN PROC FAR
    ASSUME CS:CODESG, SS:STACKSG
    MOV AX,DATASG
    MOV DS,AX
    CALL B10CLR
    CALL C10SET
    CALL D10DISP
    XOR AX,AX
    INT 16H
 
    MOV AX,4C00H
    INT 21H
MAIN ENDP;
 
;Очистка экрана
;---------------------------------
B10CLR PROC
    MOV AX, 0600H
    MOV BH,7
    MOV CX, 0000    ; Левая верхняя позиция
    MOV DX, 184FH   ; Правая нижняя позиция
    INT 10H
    RET;
B10CLR ENDP;
 
;Установка курсора в 00,00
;---------------------------------
C10SET PROC
    MOV AH, 02
    MOV BH, 00
    MOV DX, 0000
    INT 10H
    RET;
C10SET ENDP;
 
;Вывод на экран ASCII символов
;---------------------------------
D10DISP PROC
    MOV CX, 256     ;
    LEA DX, CTR
D20:
    MOV AH, 09
    INT 21H
    INC DS:CTR
    LOOP D20
    RET;
D10DISP ENDP;
 
CODESG ENDS;
END MAIN

@Gepar · 18.11.2013, 00:55 **[ТС]**

Слишком много отличий, пока что я только понял что автор книги рассчитывал что выполняться код будет в пошаговом режиме так что int 21h для возврата в DOS непонадобиться, но часть изменений я так и не понял.
1.Зачем в начале работы это

Assembler
1
2
    ;MOV AX, DATASG
    ;MOV DS, AX

Не вижу в этом никакой необходимости ...
2.Зачем в конце работы это

Assembler
1
XOR AX, AX

3.Что за магия, я пытаюсь разобраться с кодом поэтому исключаю некоторые части, например я получил то что ТОЛЬКО очистка экрана отрабатывает с таким кодом:

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
MAIN PROC FAR
    ASSUME CS:CODESG, SS:STACKSG
    CALL B10CLR
    ;CALL C10SET
    INT 16H         ; Задержка вывода
    MOV AX, 4C00H   ; Завершение
    INT 21H         ; работы и возврат в DOS
MAIN ENDP;
 
;Очистка экрана
;---------------------------------
B10CLR PROC
    MOV AX, 0600H
    ;MOV BH, 7; ВСЁ ВНИМАНИЕ СЮДА
    MOV CX, 0000    ; Левая верхняя позиция
    MOV DX, 184FH   ; Правая нижняя позиция
    INT 10H
    RET;
B10CLR ENDP;

Тоесть всё хорошо, экран прокручиваеться и всё ок, теперь я раскоментировал вызов установки курсора в 0,0

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
MAIN PROC FAR
    ASSUME CS:CODESG, SS:STACKSG
    CALL B10CLR
    CALL C10SET
    INT 16H         ; Задержка вывода
    MOV AX, 4C00H   ; Завершение
    INT 21H         ; работы и возврат в DOS
MAIN ENDP;
 
;Очистка экрана
;---------------------------------
B10CLR PROC
    MOV AX, 0600H
    ;MOV BH, 7;
    MOV CX, 0000    ; Левая верхняя позиция
    MOV DX, 184FH   ; Правая нижняя позиция
    INT 10H
    RET;
B10CLR ENDP;
 
;Установка курсора в 00,00
;---------------------------------
C10SET PROC
    MOV AH, 02
    MOV BH, 00
    MOV DX, 0000
    INT 10H
    RET;
C10SET ENDP;

И ... после очистки экрана весь экран чёрный и я не вижу курсор (он за границами экрана?), судя по тому что я по прежнему могу запускать другие программы (debug например, я вижу что название окна DOSBOX'а меняеться) что-то пошло не так, теперь я раскоментировал строку MOV BH, 7 что выполняеться при очистке экрана (которая сама по себе пока я не пытался установть курсор в 0.0 след. действием работала и так хорошо) и экран и очищаеться и курсор устанавливаеться в начало экрана. Но я не понимаю почему так, я бы предположил что для помещения курсора в 0,0 надо особенная магия с BX, но в BH и так запихиваеться 00 в моей C10SET, как же так получаеться что чтобы установить курсор правильно в 0,0 мне нужно значение 7 в BH при очистке экрана, что за странная зависимость? Если это 07 в BH нужно при очистке экрана то почему тогда пока я после очистки больше ничего не делал она выполнялась и без 07 в BH? Ничего не понимаю.

Добавлено через 3 минуты
Заметил отличия в коде процедуры DISP, первый вопрос зачем загружаеться адрес DATASG снимаю ...

Добавлено через 7 минут
Хотя мне также непонятно почему пришлось работать через регистр DS, я ведь всего-то хотел инкрементировать значение в CTR, почему же мне пришлось загрузить адрес в DS, а потом использовать его в таком странном виде DS:CTR (в книге пока описывались только явные обращения к регистрам и через [])?
Вообще раздражает меня слегка что я не могу даже через досбокс эмулирующий старую машину начала 90х просто скомпилировать примеры из книги этого же времени чтобы они работали

Not at all! · 18.11.2013, 08:57

Gepar, не знаю, на что рассчитывал автор, скорее всего, ошибки - просто небрежность набора книги.

Сообщение от Gepar

;MOV AX, DATASG
;MOV DS, AX
Не вижу в этом никакой необходимости ...

Без настройки регистра DS команда LEA DX,CTR запишет в DX адрес, имеющий мало отношения к нужному месту в памяти, в чём легко убедиться, закомментировав эти строки. На экран будет выведено совсем не то, что ожидается. При вызове функции 6 int 10h в bh должен быть передан атрибут символов на странице.
Если изменить строку ASSUME CS:CODESG, SS:STACKSG и добавить туда ", DATASG", то можно делать инкремент CTR без явного указания сегмента.

Сообщение от Gepar

И ... после очистки экрана весь экран чёрный и я не вижу курсор (он за границами экрана?)

Да, именно так, и только потому, что не настроен сегментный регистр ds. Выведено много символов, которые не видно из-за отсутствия ненулевого атрибута на странице.

Завершать программу типа .exe не обязательно через вызов 4ch int 21h. В коде предыдущей Вашей темы это делается. Перед инициализацией ds его значение нужно поместить в стек, затем поместить в стек ноль, и возврат по окончании работы должен быть дальним, retf. По адресу ds:0 находится команда int 20h.

@Gepar · 18.11.2013, 15:23 **[ТС]**

Сообщение от Not at all!

и добавить туда ", DATASG", то можно делать инкремент CTR без явного указания сегмента.

А, блин, вот оно что я забыл сделать

У автора описано в книге решение в виде COM, а у меня COM под досбоксом не собирается (EXE2BIN тупо досбокс не видит, DIR EXE2BIN возвращает что файл есть, а явно когда пытаюсь запустить вписав EXE2BIN то пишет что нет такого файла) ну и пока я всё это дело в EXE переделывал забыл прописать ASSUME для ds.

Сообщение от Not at all!

Да, именно так, и только потому, что не настроен сегментный регистр ds.

Тоесть получается при очистке экрана оно зачищает его некорректно без 7ки в BH или что ? Но что означает тогда 7ка в BH при очистке экрана?

Not at all! · 18.11.2013, 15:28

Gepar, зачищает как положено. Просто с нулевым атрибутом символы не видно. Поэкспериментируйте, попробуйте разные значения BH. Сразу увидите разницу.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

Not at all! 193 / 188 / 18 Регистрация: 06.10.2013 Сообщений: 357
	18.11.2013, 15:28
	Gepar, зачищает как положено. Просто с нулевым атрибутом символы не видно. Поэкспериментируйте, попробуйте разные значения BH. Сразу увидите разницу. 1