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

[MM]

Очень практический вопрос :
нужна маленькая программа под RT-11 SJ V5.00, которая запрашивает имя файла ( с клавиатуры ), и читает его в адрес 020000. При этом считанный файл не должен быть длинее 020000 ( 8 ).
Если кто силен в ассемблере - опубликуйте , пожалуйста, программу в виде восьмеричных цифр. Адрес начала программы - 002000 ( 8 ).

[MM]

практический вопрос

Ладно, по причине отсуствия реальных программеров вопрос снимается - общественность будет просто указавать номер сектора диска BY: для чтения контента для программатора ЭСППЗУ.

[AFZ]

по причине отсуствия реальных программеров вопрос снимается

Ну почему же? Вот программуля. Учитывая, что предполагается ввод ее с пульта, сделана предельно упрощенной. Поэтому:
1. Драйвер диска, с которого будут загружаться данные, должен быть загружен заранее (или быть резидентным).
2. USR должна быть загружена (SET USR NOSWAP)
3. Ошибки проверяются, но не анализируются, по любой ошибке будет сообщение "*** ERROR ***"
4. Имя файла принимается по .CSISPC, т.е. после запуска программы она выдаст звездочку, после которой надо набрать имя файла. Дефолтный тип файла .ROM

Архив содержит всё, включая дамп значимого блока модуля .SAV (CHG.DMP). Название, кстати, осталось от какой-то моей старой программы, что-то я там изменял, а для этой выдернул начало не вникая, что там дальше.

Если нет возможности перенести программу на загружаемый диск, то можно попробовать набрать ее с пульта и сохранить на диске командой SAVE.

[MM]

Практический вопрос о карте загрузки блоков программы типа .SAV, размещается с 360 ячейки 0 блока.
Например, значение адреса 360 "000377" соответствует каким именно загружаемым блокам ?
В русском переводе мануала по модулю .SAV этот вопрос рассмотрен слишком кратко, без примеров.

[AFZ]

Ну, судя по тому, что в моей CHG.SAV загружаются блоки 0 и 2, а в ячейке 360 лежит код 240, очевидно, что 7-й бит (0200) отвечает за блок 0, а 5-й (040) за блок 2. Остальные, видимо, по аналогии.

[randomizer]

Как можно загрузить файл в регион памяти. Пробую загрузить изображение используя следующий код, отрабатывает без ошибок, но не загружается даже хотя бы одного блока.

ReadFile:       ;------------------------------------------------------------{{{
                .LOOKUP #AREA,#0,#FileName      ;.LOOKUP area,chan,dblk[,seqnum]
                BCC     1$
                .PRINT  LERR
1$:             .READW  #AREA,#0,#FB,9600.,#0   ;.READW  area,chan,buf,wcnt,blk[,BMODE=strg]
                BCC     2$
                .PRINT  RERR
2$:             .CLOSE  #0                      ;.CLOSE  chan
                RETURN

LERR:           .ASCIIZ /Lookup error/
RERR:           .ASCIIZ /Read error/
                .Even
AREA:           .BLKW   5       ;EMT Argument Block
FileName:       .RAD50  /DK REBELSBPS/
;----------------------------------------------------------------------------}}}

[form]

не загружается даже хотя бы одного блока

Недостаточно информации. К примеру чему равно FB. Все мониторы кроме SJ (включая SB) проверяют что адрес принадлежит задаче (то есть если адрес где-то в странице I/O, номер не пройдет.
В строках, печатющих ошибку - ошибка - результат будет не тот, что ожидается (адрес символа пишется с #)
В самих строках сообщений тоже (там получается .ASCII, а не .ASCIZ как предполагалось).

[randomizer]

FB определён в теле программы как

FB::            ;framebuffer
                .=BP12
                .BLKW   <320*240*2/16>

Все мониторы кроме SJ (включая SB) проверяют что адрес принадлежит задаче

А я как раз использую SJ монитор версии 5.04g, на УКНЦ.

В строках, печатющих ошибку - ошибка - результат будет не тот, что ожидается (адрес символа пишется с #)

упс...

[form]

А я как раз использую SJ монитор версии 5.04g, на УКНЦ.

5.04g переходная система к новым - там может так же быть. Или как минимум может проверяться, что адрес указывает выше самой системы в памяти. Так, что тут смотреть надо. В любом случае если адрес из I/O page, лучше через буфер делать.

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

Да, ну и само устройство (или его эмуляция раз речь про УКНЦ) может не предусматривать передачу данных в I/O page.

[randomizer]

Да, ну и само устройство (или его эмуляция раз речь про УКНЦ) может не предусматривать передачу данных в I/O page.

Я пытаюсь загрузить как раз в память которая ниже ОС, в нижние 32КБ(в УКНЦ только их можно использовать как видеопамять с прямым доступом).

Попробую ещё вечером запустить исправив ошибки с выводом сообщений на экран.

Кстати, из описания вызова не совсем ясно как он работает: необходимо задать wcnt - количество слов для чтения и blk - блок для чтения. Я так понимаю что если задать wcnt=128, и blk=0, при размере блока 512 байт, в буфер будут занесены 256 байт. А если задать wcnt больше размера блока? Будут прочитаны несколько блоков?