Практическое программирование в среде RT-11 на ассемблере.

[AFZ]

А если еще вспомнить старые компиляторы MACRO-11 в которых символы R0-R5, SP, PC не были определены... Вроде в моей любимой книге Сингера советуют явно определять регистры

Угу. Например ПЛОСовский асм (не макро, макрокоманд он не понимает). Все мои программы тех вреиен начинались: R0=%0 <CR><LF> ... R5=%5<CR><LF> R6=%6 <CR><LF> R7=%7

С переходом на RT-11 этот список сократился до двух последних строчек - про R6 и R7. Поскольку при вызове подпрограммы я на автопилоте писал JSR R7,SUB, при выходе из П/П - RTS R7 и MOV Rn,-(R6) при сохранении регистра. А SP, PC, команды CALL и RETURN я так и не выучил.

[Advertiser]

[form]

команды CALL

DEC с этой командой вытворяет черт-те что в своих системах...
Например если заглянуть в системные программы RSX можно увидеть (справа написано что получится в результате):

	CALL	$INTSV,PR5	;	JSR	R5,$INTSV
				;	.WORD	PR5
	CALL	$SAVNR		;	JSR	R5,$SAVNR
	CALL	$SWSTK,EXIT	;	EMT	376
				;	.WORD	EXIT

И только во всех остальных случаях будет обычный JSR PC

- - - Добавлено - - -

        .BYTE   NOP/IOT+SWAB,EMT/BR     ;АНАЛОГ МАКРОКОМАНДЫ .EXIT В RT-11

[hobot]

AFZ, я поправлю и на свежую голову (в моём понимании) вечером отпишусь.
Глобальной я называю метки с двойным двоеточием естественно.

Я помню, что все исходники "взрослых программистов" на МАКРО-11 которые
я в детстве разбирал, в шапке всегда содержали .ENABL LC, MCL и .DSABL GBL )

В общем обсуждение интересное получается, по исходнику текущему продолжим позже.
Лады? )

- - - Добавлено - - -

Насчёт 2-ух буквенности в имени драйвера я конечно знал, но видимо основательно забыл ))) Или увлёкся просто )))

[form]

по исходнику текущему

Держи на закуску слегка дополненный драйвер (там же). Добавлен грязный хак, запрещающий обрыв по CTRL/C (и вообще клавиатуру). При этом в стартовом файле обязательно должна быть загрузка драйвера - иначе клавиатура просто будет эффективно отключена
Не будет работать в многотерминальном RT-11.

[Alex_K]

Драйвер реагирует только на .PRINT который печатает подсказку KMON.

Вообще-то в KMON два .PRINT-а после которых стоит команда MOV R5,R5. Второй .PRINT обслуживает подсказки дополнительных вопросов, когда вводится команда без параметров, например ввели COPY и задаётся сначала вопрос "From?". Получается, что драйвер и на этот .PRINT будет реагировать.
В своём драйвере AC я ограничивал диапазон, чтобы реагировало только на запрос командной строки.

[form]

Вообще-то в KMON два .PRINT-а после которых стоит команда MOV R5,R5.

Да, но в силу специфики задачи, до другого дело никогда не дойдет

Получается, что драйвер и на этот .PRINT будет реагировать.

Да, если бы удалось заставить KMON спросить скажем "Device?" была бы точно такая же реакция. Но в сущности именно это и требовалось - всегда попадать в определенную программу.

- - - Добавлено - - -

В своём драйвере AC я ограничивал диапазон, чтобы реагировало только на запрос командной строки.

Там специфика другая - нужно было насколько я помню менять именно подсказку команды

[Alex_K]

Интересно, а почему hobot-а не удовлетворил JS.SYS? Так же мой AC.SYS мог запускать SY:ACM.SAV вместо вывода приглашения.

[form]

Есть и еще один нюанс который в другом драйвере мог бы резать глаза - это работа с адресами программы. Драйвер проверяет при сборке MMG$T (от этого зависит смещение до сохраненного PC перед EMT), но дальше никаких усилий по преобразованию адреса не выполняет ибо в данном конкретном случае мы имеем дело с KMON который всегда в нижней памяти

- - - Добавлено - - -

Интересно, а почему hobot-а не удовлетворил JS.SYS?

Наверное когда есть исходники - всегда интересно. Опять же, я вон предложил простой способ заблокировать CTRL/C в момент загрузки

[Alex_K]

Наверное когда есть исходники - всегда интересно. Опять же, я вон предложил простой способ заблокировать CTRL/C в момент загрузки

Исходники AC.SYS тоже есть в образе sysimage.dsk. Там тоже можно в инсталляционную процедуру вставить блокировку клавиатуры, а по SET AC ON восстанавливать разрешение прерываний. Мой во всяком случае работает и в версии 5.00.
А по поводу исходников JS.SYS - его размер всего 2 блока, вручную дизассемблировать особого труда нет, если уж очень хочется.

[form]

вручную дизассемблировать особого труда нет, если уж очень хочется.

А смысл? Я показал направления куда можно копать. Это все совместимо и с 5.0 (при желании можно и для 4.0 сделать, но там придется методику менять - там нет SL magic), только вместо точки входа LOAD нужно сделать подключение вручную через запуск из SET - это несложно. Пусть развлекается