Changes for page API контроллеров AZ®

Last modified by Max on 2025/03/02 15:18

From 2.38 to 2.39 From 2.1481 to 2.1482

From version 2.39

edited by Max
on 2025/02/25 14:36

Change comment: (Autosaved)

To version 2.1481

edited by Max
on 2025/03/02 15:03

Change comment: (Autosaved)

Raw
Rendered

Summary

Page properties (1 modified, 0 added, 0 removed)

Details

Page properties

Content

@@ -637,39 +637,38 @@
  {{/code}}
  obviously, after reading the memory, it is necessary to check the result code in the first word - see the decoding of error codes
--\\Примеры возвращаемых данных по командам
--\\последовательная подача команды 021 и затем 022 позволит считать 256. слов
--из энергонезависимой памяти
--**Внимание! **первое слово это будет статус успешности чтения
++\\Examples of returned data for commands
++\\sequentially issuing the command 021 and then 022 will allow reading 256 words from non-volatile memory
++Attention! The first word will be the reading success status
  * 0 - ok
--* 1 - размер не соответствует сохраненному
--* 2 - oшибка версии
--* 3 - oшибка контрольной суммы
++* 1 - size does not match saved
++* 2 - version error
++* 3 - checksum error
--== **023: Принять с шины в буфер данные для последующей записи в буфер** ==
++== 023: Receive data from the bus into the buffer for subsequent writing into the buffer ==
--Код команды 023, данная команда позволяет наполнить буфер энергонезависимой памяти
++Command code 023, this command allows you to fill the non-volatile memory buffer
--== **024: Записать из буфера в блок энергонезависимой памяти** ==
++== 024: Write from buffer to non-volatile memory block ==
--Код команды 024, данная команда вызывает запись блока энергонезависимой памяти из буфера энергонезависимой памяти.
++Command code 024, this command causes a non-volatile memory block to be written from the non-volatile memory buffer.
--Пример программы
++Example program
  {{code language="assembler"}}
--AZ$CSR      = 177220; регистр команд и состояния (CSR)
--AZ$DR       = 177222; регистр данных (DR)
++AZ$CSR = 177220; Command and Status Register (CSR)
++AZ$DR = 177222; Data Register (DR)
--; trap 50 - cброс AZ
++; trap 50 - reset AZ
  ; результат в R1  =0 ok
  AZreset:        MOV     #AZ$CSR,R1
--1$:             CLR     (R1); Пошлем команду "Сброс"
--                TSTB    (R1); Проверим готовность контроллера
--                BPL     1$; Если не готов, сбрасываем еще
--            ; раз и проверяем снова
--                TST     (R1); Проверим на ошибку,
++1$:             CLR     (R1); Send the "Reset" command
++                TSTB    (R1); Check the controller readiness
++                BPL     1$; If not ready, reset again
++; once and check again
++                TST     (R1); Check for an error,
                  BMI     0ERR$
                  CLR     R1
                  return
@@ -677,27 +677,27 @@
                  COM     R1
                  return
--; trap 55 - запись энергонезависимой памяти из буфера с адреса ADREEPROMMEM в блок 1 EEPROM
++; trap 55 - write non-volatile memory from the buffer at address ADREEPROMMEM в блок 1 EEPROM
  WriteEEPROM:    push    R1
                  push    R2
                  push    R3
--                call    AZreset; сбросим
++                call    AZreset; reset
                  tst     R1
                  bne     0ERR$
                  MOV     #AZ$CSR,R1
--                mov     #23,(R1); командуем что будем писать данные в буфер
--0$:             TSTB    (R1); проверяем результат выполнения
--                BPL     0$; ждем
--                TST     (R1)+; инкрементируем
++                mov     #23,(R1);command that we will write data to the buffer
++0$:             TSTB    (R1); check the result of executio
++                BPL     0$; wait
++                TST     (R1)+; increment
                  mov     #ADREEPROMMEM+2,R3
--                mov     #255.,R2; пишем 255. слов; первое слово пропускаем - результат чтения
--1$:             mov     (R3)+,(R1); отдаем в контроллер
++                mov     #255.,R2; write 255. words; skip the first word - the result of reading
++1$:             mov     (R3)+,(R1); send to the controller
                  sob     R2,1$
--                tst     -(R1); декрементируем
--                mov     #24,(R1); записать из буфера в блок 1 энергонезависимой памяти
--2$:             TSTB    (R1); проверяем результат выполнения
--                BPL     2$; ждем
++                tst     -(R1); decrement
++                mov     #24,(R1); write from the buffer to block 1 of non-volatile memory
++2$:             TSTB    (R1); check the result of execution
++                BPL     2$; we are waiting
                  br      0END$
 ERR$:          CLR     R3
 END$:          pop     R3
@@ -706,23 +706,21 @@
                  return
  {{/code}}
--**Обращаю внимание**, при записи, буфер идет сразу с данными, те нет первого слова со статусом.
++**Please note** that when recording, the buffer immediately comes with the data, i.e. there is no first word with the statu
--= Блок команд для работы с RTC и NTP =
++= Block of commands for working with RTC and NTP =
--В контроллере AZ®  есть 2 источника получения даты-времени, первый это RTC встроенный в STM32, второй это часы в стеке TCP/IP.  Часы RTC работают автономно при наличии установленной батарейки 2032. Часы в стеке TCP/IP устанавливаются на основании данных с NTP-сервера.
++The AZ® controller has 2 sources of date-time, the first is the RTC built into the STM32, the second is the clock in the TCP/IP stack. The RTC clock works autonomously with a 2032 battery installed. The clock in the TCP/IP stack is set based on data from the NTP server.
--== Формат буфера timestamp (доступен по чтению) ==
++== Buffer format timestamp (readable) ==
--API контроллера сразу готовит время в нескольких форматах, дабы его было удобно применить на стороне PDP-11
++The controller API immediately prepares time in several formats, so that it can be conveniently used on the PDP-11 side
  {{info}}
--формат буфера даты-времени
--offset в восьмеричной системе - те слова
--формат буфера даты-времени
++datetime buffer format octal offset - those words datetime buffer format
  \\[0]=rtc_rt11date();
  [2]=rt11 time 50Hz big word;
  [4]=rt11 time 50Hz little word;
@@ -740,72 +740,72 @@
  {{/info}}
--== Формат буфера SimpleIN (при записи) ==
++== SimpleIN buffer format (when writing) ==
--формат максимально упрощен, для работы со стороны PDP-11
++the format is simplified as much as possible, for work with PDP-11
  {{info}}
--offset в восьмеричной системе - те слова
++offset in octal - those words
--[0]=year       год, младшие две цифры - те 22 а не 2022(!)
--[2]=month;     месяц
--[4]=day;       день
--[6]=wday;      день недели =0 не установлен, 1- понедельник 2 - вторник итд
--[10]=hour;     час
--[12]=min;      минута
--[14]=sec;      секунда
++[0]=year, the lower two digits are 22 and not 2022(!)
++[2]=month; month
++[4]=day; day
++[6]=wday; day of the week =0 not set, 1 - Monday 2 - Tuesday etc.
++[10]=hour; hour
++[12]=min; minute
++[14]=sec; second
  {{/info}}
--== **031:  Получить время из RTC в буфер timestamp** ==
++== 031: Get time from RTC to timestamp buffer ==
--Код команды 031, данная команда использует RTC часы как источник заполнения буфера timestamp
++Command code 031, this command uses RTC clock as a source of filling the timestamp buffer
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 61 - чтение данных часов из автономных часов RTC
--; R3 - адрес буфера куда надо считать
--; результат в R3 адрес, если успешно. R3=0  если ошибка
++; trap 61 - reading clock data from autonomous RTC clock
++; R3 - buffer address where to read
++; result in R3 address if successful. R3=0 if error
  GetDateFromRTC: push    R0
                  push    R1
                  push    R2
--                call    AZreset; сбросим
++                call    AZreset;  reset
                  tst     R1
                  bne     G60ERR
                  MOV     #AZ$CSR,R1
                  mov     #31,(R1)
--                br      G60; идем туда тк дальше код одинаковый
++                br      G60; let's go there because further code is the same
  {{/code}}
--== **032:  Получить время из буфера timestamp** ==
++== 032: Get time from timestamp buffer ==
--Код команды 032, данная команда отдает на шину содержимое буфера timestamp
++Command code 032, this command sends the contents of the timestamp buffer to the bus
  {{code language="assembler"}}
--; работа с часами
--; trap 60 - чтение данных часов из TCP/IP стека
--; R3 - адрес буфера куда надо считать
--; результат в R3 адрес, если успешно. R3=0  если ошибка
++; working with clock
++; trap 60 - reading clock data from TCP/IP stack
++; R3 - buffer address where to read
++; result in R3 address if successful. R3=0 if error
  GetDateFromLAN: push    R0
                  push    R1
                  push    R2
--                call    AZreset; сбросим
++                call    AZreset; reset
                  tst     R1
                  bne     G60ERR
                  MOV     #AZ$CSR,R1
                  mov     #42,(R1)
--G60:            TSTB    (R1); проверяем результат выполнения
--                BPL     G60; ждем
++G60:            TSTB    (R1); check execution result
++                BPL     G60; wait
                  mov     #32,(R1)
--1$:             TSTB    (R1); проверяем результат выполнения
++1$:             TSTB    (R1); check execution result
                  BPL     1$; ждем
--                TST     (R1)+; инкрементируем
--                mov     R3,R0; запомним R3 - адрес
--                mov     #10.,R2; читаем 10 слов
--2$:             mov     (R1),(R3)+; читаем блок слов в память
++                TST     (R1)+;  increment
++                mov     R3,R0; remember R3 address
++                mov     #10.,R2;  read 10 words
++2$:             mov     (R1),(R3)+; read block of words into memory
                  sob     R2,2$
--                mov     R0,R3; успешно, вернем адрес в R3
++                mov     R0,R3; successful, return address to R3
                  br      0END$
  G60ERR:         CLR     R3
 END$:          pop     R2
@@ -814,11 +814,11 @@
                  return
  {{/code}}
--Стоит проверить корректность полученного времени:
++It is worth checking the correctness of the received time:
  {{code language="assembler"}}
--; trap 63 - проверка корректности времени
--; R3 - адрес буфера, результат в R3, если адрес буфера то OK, =0 ошибка
++; trap 63 - check time correctness
++; R3 - buffer address, result in R3, if buffer address then OK, =0 error
  CheckDateTime:  Cmp     6(r3),#2021.
                  Blos    1err
                  Cmp     6(r3),#2100.
@@ -828,119 +828,119 @@
                  return
  {{/code}}
--== **033:  Запись времени-даты в буфер SimpleIN** ==
++== 033: Write time-date to SimpleIN buffer ==
--Код команды 033, данная команда  принимает с шины данные в буфер SimpleIN
++Command code 033, this command receives data from the bus into the SimpleIN buffer
--Работа данной команды аналогична работе команд [[023>>doc:||anchor="H023:41F44043843D44F44244C44144843843D44B43243144344443544043443043D43D44B43543443B44F43F43E44143B43543444344E44943543943743043F438441438432431443444435440"]] и [[016>>doc:||anchor="H016:A041F44043843D44F44244C43143B43E43A43443043D43D44B445432431443444435440"]].
++The operation of this command is similar to the operation of commands 023 and 016.
--== **034:  Установка RTC на основании данных из буфера** ==
++== 034: Set RTC based on buffer data ==
--Код команды 034, данная команда  устанавливает RTC на основании данных в буфере SimpleIN
++Command code 034, this command sets the RTC based on the data in the SimpleIN buffer
--Данная команда выполняется быстро, но для исключения проблем цикл ожидания выполнения рекомендуется.
++This command executes quickly, but to avoid problems, a wait loop is recommended.
--== **035:  Стимуляция запроса времени с NTP сервера, установка на основании ответа** ==
++== 035: Stimulate time request from NTP server, set based on response ==
--Код команды 035, данная команда отправляет запрос на NTP cервер (установленный в AZ.INI файле или полученный от DHCP) и устанавливает часы в стеке TCP/IP.
++Command code 035, this command sends a request to the NTP server (set in the AZ.INI file or received from DHCP) and sets the clock in the TCP/IP stack.
--Пример программы: отсылка запроса на установку времени с NTP сервера
++Example program: sending a request to set the time from an NTP server
  {{code language="assembler"}}
--; trap 62 - отсылка запроса на установку времени с NTP сервера
++; trap 62 - sending a request to set the time from the NTP server
  GetDateNTPtoNET:push    R1
--                call    AZreset; сбросим
++                call    AZreset; reset
                  tst     R1
                  bne     0ERR$
                  MOV     #AZ$CSR,R1
                  mov     #35,(R1)
--0$:             TSTB    (R1); проверяем результат выполнения
--                BPL     0$; ждем
++0$:             TSTB    (R1); check the result of execution
++                BPL     0$; wait
 ERR$:          pop     R1
                  return
  {{/code}}
--Выполнение команды занимает 1-2 секунды в среднем. Данная команда требует работы стека TCP/IP, соответственно нужны циклы ожидания при включенном стеке.
++The command execution takes 1-2 seconds on average. This command requires the TCP/IP stack to work, so waiting cycles are needed when the stack is enabled.
--Пример цикла опроса с целью получить время с сети
++An example of a polling cycle to get time from the network
  {{code language="assembler"}}
--; дата-время
++; date-time
                  mov     #S_DateTime_0,R3; "Lan Date:"
                  trap    10
--                mov     #20,R4; количество циклов ожидания
--$datry:         trap    62; отослали запрос к NTP серверу
--                mov     #110,@#AZ$CSR; включим сеть
--                trap    47; ожидание
--                trap    47; ожидание
++                mov     #20,R4; number of wait cycles
++$datry:         trap    62; sent a request to the NTP server
++                mov     #110,@#AZ$CSR; enable the network
++                trap    47; waiting
++                trap    47; waiting
                  mov     #ADRTMPSTR,R3
--                trap    60; считали в буфер дату-время
--                trap    63; проверили дату-время
++                trap    60; read the date-time into the buffer
++                trap    63; checked the date-time
                  tst     R3
                  bne     $ok
  $sob:           sob     R4,$datry
--                mov     #S_DateTime_2,R3; печать ошибки
++                mov     #S_DateTime_2,R3; print error
                  trap    7
                  br      $go
  $ok:            mov     #ADRTMPSTR,R3
--                trap    24; печать даты
--                trap    25; времени
--$go:            mov     #110,@#AZ$CSR; включим сеть
++                trap    24; print date
++                trap    25; time
++$go:            mov     #110,@#AZ$CSR;  let's turn on the network
  {{/code}}
--Тут мы явно отсылаем запрос к NTP серверу, затем включаем работу сети и ждем результата, периодически опрашивая и проверяя корректность результата.
++Here we explicitly send a request to the NTP server, then turn on the network and wait for the result, periodically polling and checking the correctness of the result.
--== **036:  Установка RTC на основании часов TCP/IP стека** ==
++== 036: Setting RTC based on TCP/IP stack clock ==
--Код команды 036,  данная команда устанавливает RTC на основании часов в TCP/IP стека. Предварительно надо установить часы в TCP/IP - команда 036.
++Command code 036, this command sets the RTC based on the clock in the TCP/IP stack. You must first set the clock in TCP/IP - command 036.
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 64 - установка времени RTC на основании времени стека
--; R1 - результат  R1=0 - OK
--SetDateNETtoRTC:call    AZreset; сбросим
++; trap 64 - set RTC time based on stack time
++; R1 - result R1=0 - OK
++SetDateNETtoRTC:call    AZreset; reset
                  tst     R1
                  bne     0ERR$
                  MOV     #AZ$CSR,R1
                  mov     #36,(R1)
--0$:             TSTB    (R1); проверяем результат выполнения
--                BPL     0$; ждем
++0$:             TSTB    (R1); check execution result
++                BPL     0$; wait
                  clr     R1
 ERR$:          return
  {{/code}}
--== **042:  Получить время из часов TCP/IP стека в буфер timestamp** ==
++== 042: Get time from TCP/IP stack clock into timestamp buffer ==
--Код команды 042,   данная команда использует часы TCP/IP стека как источник заполнения буфера timestamp.
++Command code 042, this command uses the TCP/IP stack clock as a source for filling the timestamp buffer.
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; работа с часами
--; trap 60 - чтение данных часов из TCP/IP стека
--; R3 - адрес буфера куда надо считать
--; результат в R3 адрес, если успешно. R3=0  если ошибка
++; working with clock
++; trap 60 - reading clock data from TCP/IP stack
++; R3 - buffer address where to read
++; result in R3 address if successful. R3=0 if error
  GetDateFromLAN: push    R0
                  push    R1
                  push    R2
--                call    AZreset; сбросим
++                call    AZreset; reset
                  tst     R1
                  bne     G60ERR
                  MOV     #AZ$CSR,R1
                  mov     #42,(R1)
--G60:            TSTB    (R1); проверяем результат выполнения
--                BPL     G60; ждем
++G60:            TSTB    (R1); check execution result
++                BPL     G60; wait
                  mov     #32,(R1)
--1$:             TSTB    (R1); проверяем результат выполнения
--                BPL     1$; ждем
--                TST     (R1)+; инкрементируем
--                mov     R3,R0; запомним R3 - адрес
++1$:             TSTB    (R1); check execution result
++                BPL     1$; wait
++                TST     (R1)+;  increment
++                mov     R3,R0; remember R3 address
                  mov     #10.,R2; читаем 10 слов
--2$:             mov     (R1),(R3)+; читаем блок слов в память
++2$:             mov     (R1),(R3)+; read block of words into memory
                  sob     R2,2$
--                mov     R0,R3; успешно, вернем адрес в R3
++                mov     R0,R3; successful, return address to R3
                  br      0END$
  G60ERR:         CLR     R3
 END$:          pop     R2
@@ -949,52 +949,50 @@
                  return
  {{/code}}
--все команды устанавливают бит готовности по завершению.
++All commands set the ready bit upon completion.
--= **Команды специфические для [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]]** =
++= **[[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] **specific commands =
--Данные команды предназначены для работы контроллера AZБК®, разработанного для серии компьютеров БК - БК-0010/БК-0010.01/БК-0011М.
++These commands are intended for operation of the AZБК® controller, developed for the BK series of computers - BK-0010/BK-0010.01/BK-0011M.
--Другие контроллеры AZ® игнорируют эти команды
++Other AZ® controllers ignore these commands.
--== **037: перезапуск контроллера [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] и всей БК** ==
++== 037: Restart of the** [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] **controller and the entire computer ==
--Код команды 037,  данная команда осуществляет перезапуск микроконтроллера AZ®, что вызывает и перезапуск самой БК-0010/БК-0010.01/БК-0011М
++Command code 037, this command restarts the AZ® microcontroller, which also causes a restart of the BK-0010/BK-0010.01/BK-0011M itself
--Пример программы
++Example program
  {{code language="assembler"}}
--AZ$CSR      = 177220; регистр команд и состояния (CSR)
--AZ$DR       = 177222; регистр данных (DR)
++AZ$CSR = 177220; command and status register (CSR)
++AZ$DR = 177222; data register (DR)
--; trap 57 - перезапуск БК полный
--AZcouldReboot:  call    AZreset; сбросим AZ дабы он был готов принимать команды
++; trap 57 - full restart
++AZcouldReboot:  call    AZreset; reset AZ so it is ready to receive
                  mov     #037,@#AZ$CSR
                  return
  {{/code}}
--== **044: Cохранение скриншота в файл** ==
++== 044: Saving a screenshot to a file ==
--Код команды 044,  данная команда предназначена для снятия образа памяти указанного размера (или определенного автоматически на основании сохраненных параметров)
--технически команда может служить как средство отладки ибо способная снимать образ памяти
--общее ограничение на снятие образа памяти - 2МБ на один образ
--\\в качестве параметров используется служебная страница памяти 76(8)
++Command code 044, this command is designed to take a memory image of the specified size (or determined automatically based on saved parameters) technically, the command can serve as a debugging tool because it is capable of taking a memory image the general limitation on taking a memory image is 2MB per image
++\\service memory page 76(8) is used as parameters
--Структура заполнения информации о скриншоте
++Structure of filling information about a screenshot
  {{code language="c"}}
--// структура хидера скриншота
++// screenshot header structure
  typedef __packed struct screen_header
  {
--    unsigned short int                tag;                    // должен быть равен 0240
++    unsigned short int                tag;                //  must be equal to 0240
--  unsigned int                             begin_adress;    // начальный адрес в словах - прямая задача в физических адресах
--    unsigned int                             length;                // длина в словах - прямая задача в физических адресах
++    unsigned int                      begin_adress;       // start address in words - forward task in physical addresses
++    unsigned int                      length;             // length in words - forward task in physical addresses
--    unsigned short int                begin_page;        // начальная страница - номер - прямая задача в номерах страниц
--    unsigned short int                len_pages;        // количество страниц - прямая задача в номерах страниц
++    unsigned short int                begin_page;         // start page - number - forward task in page numbers
++    unsigned short int                len_pages;          // number of pages - forward task in page numbers
      unsigned short int                R177300;            //
      unsigned short int                R177302;            //
@@ -1012,57 +1012,55 @@
      unsigned short int                R177332;            //
      unsigned short int                R177334;            //
      unsigned short int                R177336;            //
--    unsigned short int                R177340;            // - Регистр управления активацией окно - маски окон
--    unsigned short int                R177342;            // - Регистр управления r/o на окно
--    unsigned short int                R177344;            // - Регистр управления shadow окон - маски окон
--    unsigned short int                R177346;            // - Регистр управления маппером
--    unsigned short int                R177350;            // - регистр копия по записи 177130 в режиме записи управления памятью в SMK
--  unsigned short int                R177352;            // - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
++    unsigned short int                R177340;            // - Window activation control register - window masks
++    unsigned short int                R177342;            // - Control register r/o per window
++    unsigned short int                R177344;            // - Shadow window control register - window masks
++    unsigned short int                R177346;            // - Mapper control register
++    unsigned short int                R177350;            // - copy by record register 177130 in memory management write mode in SMK
++    unsigned short int                R177352;            // - copy by record register 177716 in memory management write mode in BK11M
--    unsigned short int                R177230;            // - регистр управления
--    unsigned short int                R177232;            // - регистр номера страницы начала отображения - верхняя страница (слой 0)
--    unsigned short int                R177240;            // - регистр номера страницы начала отображения - средняя страница (слой 1)
--    unsigned short int                R177242;            // - регистр номера страницы начала отображения - нижняя страница  (слой 2)
--    unsigned short int                R177244;            // - регистр вертикального скролинга слой 2
--    unsigned short int                R177246;            // - регистр вертикального скролинга слой 1
--    unsigned short int                R177250;            // - регистр вертикального скролинга слой 0
--    unsigned short int                R177252;            // - регистр гозизонтального скролинга слой 0
--    unsigned short int                R177254;            // - регистр гозизонтального скролинга слой 1
--    unsigned short int                R177256;            // - регистр гозизонтального скролинга слой 2
++    unsigned short int                R177230;            // - control register
++    unsigned short int                R177232;            // - display start page number register - upper page (layer 0)
++    unsigned short int                R177240;            // - display start page number register - upper page (layer 1)
++    unsigned short int                R177242;            // - display start page number register - upper page (layer 2)
++    unsigned short int                R177244;            // - vertical scroll register layer 2
++    unsigned short int                R177246;            // - vertical scroll register layer 1
++    unsigned short int                R177250;            // - vertical scroll register layer 0
++    unsigned short int                R177252;            // - horizontal scroll register layer 0
++    unsigned short int                R177254;            // - horizontal scroll register layer 1
++    unsigned short int                R177256;            // - horizontal scroll register layer 2
      unsigned short int                paldata[338];    //
  } screen_header_t;
  {{/code}}
--Пример кода для заполнения страницы памяти
++Example code for filling a memory page
  {{code language="assembler"}}
  ;--------------------------------------------------
--; карта 76й страницы - туда мы готовим данные для команды скринщотов
--        SCR_PAGE        = 130000             ; 76ую страницу цепляем на место 77й временно - те в окно 130000
--        SCR_TAG         = SCR_PAGE+0         ; тут вход - 240 - 1 слово
--        SCR_ADDR_CONF   = SCR_TAG+2          ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
--        SCR_PAGE_CONF   = SCR_ADDR_CONF+8.   ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
--        SCR_MEM_CONF    = SCR_PAGE_CONF+4.   ; cюда конфигурацию памяти из регистров - 22 слова
--        SCR_VGA_CONF    = SCR_MEM_CONF+44.   ; сюда конфигурацию видеоконтроллера - 10 cлов
--        SCR_PAL         = SCR_VGA_CONF+20.   ; сюда 338. значений(слов) палитры 338 слов
++; 76th page map - we prepare data for the screenshot command there
++SCR_PAGE      = 130000            ; we temporarily attach the 76th page to the 77th - that is, into the 130000 window
++SCR_TAG       = SCR_PAGE+0        ; here is the input - 240 - 1 word
++SCR_ADDR_CONF = SCR_TAG+2         ; here is the command with addresses - address+length 24 bits - 4 words
++SCR_PAGE_CONF = SCR_ADDR_CONF+8.  ; here is the command with pages - the starting page and the number of pages - 2 words
++SCR_MEM_CONF  = SCR_PAGE_CONF+4.  ; here is the memory configuration from the registers - 22 words
++SCR_VGA_CONF  = SCR_MEM_CONF+44.  ; here video controller configuration - 10 words
++SCR_PAL       = SCR_VGA_CONF+20.  ; here 338. values (words) of palette 338 words
  ;--------------------------------------------------
++; trap 41 - preparation of default information for screenshot functionality
++PrepSRC:        jsr     R5, PUSHA            ; batch saving of registers
++                mov     @#177326,-(SP)       ; save page 130k which was before the call
++                mov     #76,@#177326         ; hook 76th page into window
--
--; trap 41 - подготовка дефолтной информации для работы функционала скриншотов
--PrepSRC:        jsr     R5, PUSHA             ; пакетное сохранение регистров
--                mov     @#177326,-(SP)       ; сохраним страницу 130k которая была до вызова
--                mov     #76,@#177326         ; цепляем 76ую страницу в окно
--
--                mov     #100377,R3           ; константа-заполнитель
++                mov     #100377,R3           ; constant-filler
                  mov     #SCR_PAGE,R4
                  mov     #2047.,R2
 $:             mov     R3,(R4)+
                  sob     R2,4$
--                mov     #240,@#SCR_TAG       ; проставляем тег
++                mov     #240,@#SCR_TAG       ; put the tag
--         ; чистим участок адресов - дефолтно автоматическое определение адресов
++         ; clean the address section - default is automatic address detection
                  clr     R3
                  mov     #SCR_ADDR_CONF,R4
                  mov     #10,R2
@@ -1069,7 +1069,7 @@
 $:             mov     R3,(R4)+
                  sob     R2,2$
--         ;конфигурация памяти - дефолтная
++         ; memory configuration - default
                  mov     #SCR_MEM_CONF,R4
                  mov     #30,(R4)+            ;177300
                  mov     #31,(R4)+            ;177302
@@ -1088,29 +1088,29 @@
                  mov     #110,(R4)+           ;177334
                  mov     #100,(R4)+           ;177336
--                mov     #170000,(R4)+        ;177340 - Регистр управления активацией окно - маски окон
--                mov     R3,(R4)+             ;177342 - Регистр управления r/o на окно
--                mov     #7777,(R4)+          ;177344 - Регистр управления shadow окон - маски окон
--                mov     #40404,(R4)+         ;177346 - Регистр управления маппером
--                mov     R3,(R4)+             ;177350 - регистр копия по записи 177130 в режиме записи управления памятью в SMK
--                mov     #16000,(R4)+         ;177352 - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
++                mov     #170000,(R4)+        ;177340
++                mov     R3,(R4)+             ;177342
++                mov     #7777,(R4)+          ;177344
++                mov     #40404,(R4)+         ;177346
++                mov     R3,(R4)+             ;177350
++                mov     #16000,(R4)+         ;177352
--         ;конфигурация видеоконтроллера - дефолтная
++         ;Video controller configuration - default
           ;  177230-177256
                  mov     #SCR_VGA_CONF,R4
--                mov     #12201,(R4)+         ;177230 - регистр управления
--                mov     #4,(R4)+             ;177232 - регистр номера страницы начала отображения - верхняя страница (слой 0)
--                mov     R3,(R4)+             ;177240 - регистр номера страницы начала отображения - средняя страница (слой 1) "под спрайты"
--                mov     R3,(R4)+             ;177242 - регистр номера страницы начала отображения - нижняя страница (слой 2) "под фон"
--                mov     R3,(R4)+             ;177244 - регистр вертикального скролинга слой 2
--                mov     R3,(R4)+             ;177246 - регистр вертикального скролинга слой 1
--                mov     R3,(R4)+             ;177250 - регистр вертикального скролинга слой 0
--                mov     R3,(R4)+             ;177252 - регистр гозизонтального скролинга слой 0
--                mov     R3,(R4)+             ;177254 - регистр гозизонтального скролинга слой 1
--                mov     R3,(R4)+             ;177256 - регистр гозизонтального скролинга слой 2
++                mov     #12201,(R4)+         ;177230
++                mov     #4,(R4)+             ;177232
++                mov     R3,(R4)+             ;177240
++                mov     R3,(R4)+             ;177242
++                mov     R3,(R4)+             ;177244
++                mov     R3,(R4)+             ;177246
++                mov     R3,(R4)+             ;177250
++                mov     R3,(R4)+             ;177252
++                mov     R3,(R4)+             ;177254
++                mov     R3,(R4)+             ;177256
--         ; закачиваем палитру - берем дефолтную из этой ПЗУшки
++         ; download the palette - take the default one from this ROM
                  mov     #SCR_PAL,R4
                  mov        #PalData,R2
                  mov        #338.,R3
@@ -1117,233 +1117,233 @@
 $:             mov     (R2)+,(R4)+
                  sob        R3,1$
--                mov     (SP)+,@#177326; вернем страницу с которой был вызов
++                mov     (SP)+,@#177326; return the page from which the call was made
                  return
  {{/code}}
--Вариантов указания участков памяти три
++There are three options for specifying memory areas.
--1. указать адрес и длину 24х битные - cм формат, если их нет - система смотрит дальше
--1. указать номер страницы и количество страницы, если их нет
--1. система смотрит дальше - те делает скриншот на основании данных о регистрах 177230 и т.д..
++1. specify the address and length 24-bit - see format, if they are not there - the system looks further
++1. specify the page number and page quantity, if they are not there
++1. the system looks further - that is, it makes a screenshot based on the data about registers 177230, etc.
--Cкриншот сохраняется в формате
--- страница 76 - ее первый килобайт
--- сам образ памяти (если режим слоеный - то все три слоя)
++The screenshot is saved in the format
++- page 76 - its first kilobyte
++- the memory image itself (if the mode is layered - then all three layers)
--Перед вызовом команды можно загрузить имя файла для сохранения скриншота [в cmosmem буфер], однако при его отсутствии (в буфере не будет имени - строки заканчивающейся 0) система сформирует свое имя, на основании следующего правила:
--дефолтный путь для сохранения скриншотов
++Before calling the command, you can load the file name for saving the screenshot [in the cmosmem buffer], but if it is missing (there will be no name in the buffer - a line ending with 0), the system will generate its own name based on the following rule: default path for saving screenshots
 :/SCREENS/
--формат имени - DDHHMISS.SCR
--где DD - две цифры дня месяца, HH - час, MI - минута, SS-секунда
--\\Если в процессе выполнения команды возникнет ошибка - вместо имени будет "ERROR *"
--к примеру
++name format - DDHHMISS.SCR
++where DD is two digits of the day of the month, HH is the hour, MI is the minute, SS is the second
++\\If an error occurs during the command execution, the name will be "ERROR *"
++for example
  "ERROR f_open 6"
--Пример программы
++Example program
  {{code language="assembler"}}
--; обновим информацию в хидере скриншота
++; update the information in the screenshot header
  ;--------------------------------------------------
--; карта 76й страницы - туда мы готовим данные для команды скринщотов
--        SPAGE        = 170000             ; 76ую страницу цепляем на место 77й временно - те в окно 130000
--        STAG         = SPAGE+0         ; тут вход - 240 - 1 слово
--        SADDRC   = STAG+2          ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
--        SPAGEC   = SADDRC+8.   ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
--        SMEMC    = SPAGEC+4.   ; cюда конфигурацию памяти из регистров - 22 слова
--        SVGAC    = SMEMC+44.   ; сюда конфигурацию видеоконтроллера - 10 cлов
--        SPAL         = SVGAC+20.   ; сюда 338. значений(слов) палитры 338 слов
++; 76th page map - we prepare data for the screenshot command there
++SCR_PAGE      = 130000            ; we temporarily attach the 76th page to the 77th - that is, into the 130000 window
++SCR_TAG       = SCR_PAGE+0        ; here is the input - 240 - 1 word
++SCR_ADDR_CONF = SCR_TAG+2         ; here is the command with addresses - address+length 24 bits - 4 words
++SCR_PAGE_CONF = SCR_ADDR_CONF+8.  ; here is the command with pages - the starting page and the number of pages - 2 words
++SCR_MEM_CONF  = SCR_PAGE_CONF+4.  ; here is the memory configuration from the registers - 22 words
++SCR_VGA_CONF  = SCR_MEM_CONF+44.  ; here video controller configuration - 10 words
++SCR_PAL       = SCR_VGA_CONF+20.  ; here 338. values (words) of palette 338 words
  ;--------------------------------------------------
++                mov     @#177326,R5       ; save page 130k which was before the call
++                mov     #76,@#177336         ; hook the 76th page into the window
--                mov     @#177326,R5       ; сохраним страницу 130k которая была до вызова
--                mov     #76,@#177336         ; цепляем 76ую страницу в окно
--
--         ;конфигурация видеоконтроллера
++         ;video controller configuration
           ;  177230-177256
                  mov     #SVGAC,R4
--                mov     @#177230,(R4)+;177230 - регистр управления
--                mov     @#177232,(R4)+;177232 - регистр  - верхняя страница (слой 0)
--                mov     @#177240,(R4)+;177240 - регистр  - средняя страница (слой 1)
--                mov     @#177242,(R4)+;177242 - регистр - нижняя страница (слой 2)
--                mov     @#177244,(R4)+;177244 - регистр вертикального скролинга слой 2
--                mov     @#177246,(R4)+;177246 - регистр вертикального скролинга слой 1
--                mov     @#177250,(R4)+;177250 - регистр вертикального скролинга слой 0
--                mov     @#177252,(R4)+;177252 - регистр гозизонтального скролинга слой 0
--                mov     @#177254,(R4)+;177254 - регистр гозизонтального скролинга слой 1
--                mov     @#177256,(R4)+;177256 - регистр гозизонтального скролинга слой 2
++                mov     @#177230,(R4)+;177230 - control register
++                mov     @#177232,(R4)+;177232 - register - top page (layer 0)
++                mov     @#177240,(R4)+;177240 - register - top page (layer 1)
++                mov     @#177242,(R4)+;177242 - register - top page (layer 2)
++                mov     @#177244,(R4)+;177244 - vertical scroll register layer 2
++                mov     @#177246,(R4)+;177246 - vertical scroll register layer 1
++                mov     @#177250,(R4)+;177250 - vertical scroll register layer 0
++                mov     @#177252,(R4)+;177252 - horizontal scroll register layer 0
++                mov     @#177254,(R4)+;177254 - horizontal scroll register layer 1
++                mov     @#177256,(R4)+;177256 - horizontal scroll register layer 2
--                mov     R5,@#177336; вернем страницу с которой был вызов
++                mov     R5,@#177336; return the page from which the call was made
           ;-------------------------
--                MOV     #AZ$CSR,R3     ; Готовим CSR контроллера
--                MOV     #AZ$DR,R4     ; Готовим DR контроллера
--20$:            CLR     (R3)         ; Сбросим контроллер
++                MOV     #AZ$CSR,R3     ; Preparing controller CSR
++                MOV     #AZ$DR,R4     ; Preparing controller DR
++20$:            CLR     (R3)         ; Reset the controller
                  TSTB    (R3)
                  BPL     20$
--         ; очистим блок памяти для имени - дабы система сделала дефолтное имя файла
--                mov     #23,(R3)     ; командуем что будем писать данные в буфер
--128$:           TSTB    (R3)         ; проверяем результат выполнения
--                BPL     128$         ; ждем
++         ; clear the memory block for the name - so that the system makes a default file name
++                mov     #23,(R3)     ; command that we will write data to the buffer
++128$:           TSTB    (R3)         ; check the result of execution
++                BPL     128$         ; wait
                  clr     R1
                  mov     #256.,R2     ;
--129$:           mov     R1,(R4)      ; отдаем в контроллер
++129$:           mov     R1,(R4)      ; give to the controller
                  sob     R2,129$
--                MOV     #044,(R3)    ; команда скриншот
++                MOV     #044,(R3)    ; screenshot command
 $:            TSTB    (R3)         ;
                  BPL     22$          ;
--         ; получим имя скриншота
--                mov     #22,(R3)     ; отдать на шину считанный блок памяти из буфера
--121$:           tstb    (R3)         ; проверяем результат выполнения
--                bpl     121$         ; ждем
++         ; get the screenshot name
++                mov     #22,(R3)     ; give the read memory block from the buffer to the bus
++121$:           tstb    (R3)         ; check the result of execution
++                bpl     121$         ; wait
                  mov     #BUF,R1
--                mov     #256.,R2     ; читаем 256. слов; первое слово - результат чтения
--122$:           mov     (R4),(R1)+   ; читаем блок слов в память
++                mov     #256.,R2     ; read 256. words; the first word is the result of reading
++122$:           mov     (R4),(R1)+   ; read a block of words into memory
                  sob     R2,122$
                  .PRINT  #RESOK
                  .Print  #BUF
--                mov     #110,@#AZ$CSR; включаем сеть по-умолчанию сеть должна быть постоянно включена
++                mov     #110,@#AZ$CSR; enable the network by default, the network should be constantly enabled
                  .Exit
  {{/code}}
--Для распаковки скриншота можно использовать вот эту утилиту
++To unpack a screenshot, you can use this utility - [[https:~~/~~/master.pdp-11.ru/screen_unpack/>>https://master.pdp-11.ru/screen_unpack/]]
--= **Команды для работы со стеком TCP/IP** =
++= Commands for working with the TCP/IP stack =
--следующие команды работают с буфером информации TCP/IP cтека.
++The following commands operate on the TCP/IP stack information buffer.
--== **040: Получить ip адрес и прочие настройки стека TCP/IP в буфер** ==
++== 040: Get IP address and other TCP/IP stack settings to buffer ==
--Код команды 040,  данная команда заполняет буфер информацией с TCP/IP cтека текущей (фактической) информацией.
++Command code 040, this command fills the buffer with information from the TCP/IP stack with current (actual) information.
--== **041: Чтение буфера ip адреса** ==
++== 041: Reading ip address buffer ==
--Код команды 041,  данная команда передает буфер на шину
++Command code 041, this command transfers the buffer to the bus
--эта пара команд позволяет получить текущую информацию со стека
++This pair of commands allows you to get current information from the stack
--* IP адрес
--* MASK маску
--* GW гейтвей
--* NTP адрес NTP-сервера
--* DNS1 адрес основного DNS
--* DNS2 адрес резервного DNS
++* IP address
++* MASK mask
++* GW gateway
++* NTP address of the NTP server
++* DNS1 primary DNS address
++* DNS2 backup DNS address
--соответственно это 12 слов
++accordingly it is 12 words
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 52 - чтение блока IP адресов в блок памяти IPADDDBLOCK (8. ячеек)
--; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
--GetIPaddrs:     push    R1
--                push    R2
--                call    AZreset; сбросим
--                tst     R1
--                bne     0ERR$
--                MOV     #AZ$CSR,R1
--                mov     #40,(R1)
--0$:             TSTB    (R1); прочитать адреса в свою память
--                BPL     0$; ждем
--                mov     #41,(R1)
--1$:             TSTB    (R1); подготовить буфер
--                BPL     1$; ждем
--                TST     (R1)+; инкрементируем
--                mov     #IPADDDBLOCK,R3
--                mov     #12.,R2
--2$:             mov     (R1),(R3)+; читаем блок слов в память
--                sob     R2,2$
--                mov     #IPADDDBLOCK,R3; успешно
--                br      0END$
--0ERR$:          CLR     R3
--0END$:          pop     R2
--                pop     R1
--                return
++; trap 52 - reading a block of IP addresses into the IPADDDBLOCK memory block (8 cells)
++; result in R3 = 0 if error, otherwise the address where it was read (IPADDDBLOCK)
++GetIPaddrs:     push    R1
++                push    R2
++                call    AZreset; reset
++                tst     R1
++                bne     0ERR$
++                MOV     #AZ$CSR,R1
++                mov     #40,(R1)
++0$:             TSTB    (R1); read addresses into its memory
++                BPL     0$; wait
++                mov     #41,(R1)
++1$:             TSTB    (R1); prepare buffer
++                BPL     1$; wait
++                TST     (R1)+; increment
++                mov     #IPADDDBLOCK,R3
++                mov     #12.,R2
++2$:             mov     (R1),(R3)+; read block of words into memory
++                sob     R2,2$
++                mov     #IPADDDBLOCK,R3; success
++                br      0END$
++0ERR$:          CLR     R3
++0END$:          pop     R2
++                pop     R1
++                return
++
  {{/code}}
--Пример данных
++Example return data:
  {{info}}
--Примеры данных - возвращаемые слова в восьмеричном формате
--124300 116400 - IP адрес 192.168.0.157
--177777 000377 - MASK маску 255.255.255.0
--124300 000400 - GW гейтвей 192.168.0.1
--124300 000400 - NTP адрес NTP-сервера 192.168.0.1
--124300 050000 - DNS1 адрес основного DNS 192.168.0.90
--124300 055000 - DNS2 адрес резервного DNS 192.168.0.80
++Data examples - words returned in octal format
++124300 116400 - IP address 192.168.0.157
++177777 000377 - MASK mask 255.255.255.0
++124300 000400 - GW gateway 192.168.0.1
++124300 000400 - NTP address of NTP server 192.168.0.1
++124300 050000 - DNS1 address of primary DNS 192.168.0.90
++124300 055000 - DNS2 address of backup DNS 192.168.0.80
  {{/info}}
--== **043: чтение MAC-адреса в ip буфер** ==
++== 043: Read MAC address into ip buffer ==
--Код команды 043, данная команда читает текущий фактический MAC адрес в буфер IP адресов
--те сначала 043, а затем 041 команды
++Command code 043, this command reads the current actual MAC address into the IP address buffer i.e. first 043 and then 041 commands
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 72 - чтение MAC адреса в блок памяти IPADDDBLOCK (12. ячеек)
--; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
--GetMACaddrs:    push    R1
--                push    R2
--                call    AZreset     ; сбросим
--                tst     R1
--                bne     0ERR$
--                MOV     #AZ$CSR,R1
--                mov     #43,(R1)
--0$:             TSTB    (R1)        ; прочитать адреса в свою память
--                BPL     0$          ; ждем
--                mov     #41,(R1)
--1$:             TSTB    (R1)        ; подготовить буфер
--                BPL     1$          ; ждем
--                TST     (R1)+       ; инкрементируем
--                mov     #IPADDDBLOCK,R3
--                mov     #12.,R2
--2$:             mov     (R1),(R3)+  ; читаем блок слов в память
--                sob     R2,2$
--                mov     #IPADDDBLOCK,R3; успешно
--                br      0END$
--0ERR$:          CLR     R3
--0END$:          pop     R2
--                pop     R1
--                retur
++; trap 72 - reading the MAC address into the IPADDDBLOCK memory block (12 cells)
++; result in R3 = 0 if error, otherwise the address where it was read (IPADDDBLOCK)
++GetMACaddrs:    push    R1
++                push    R2
++                call    AZreset     ; reset
++                tst     R1
++                bne     0ERR$
++                MOV     #AZ$CSR,R1
++                mov     #43,(R1)
++0$:             TSTB    (R1)        ; read addresses into its memory
++                BPL     0$          ; wait
++                mov     #41,(R1)
++1$:             TSTB    (R1)        ; prepare buffer
++                BPL     1$          ; wait
++                TST     (R1)+       ; increment
++                mov     #IPADDDBLOCK,R3
++                mov     #12.,R2
++2$:             mov     (R1),(R3)+  ; read block of words into memory
++                sob     R2,2$
++                mov     #IPADDDBLOCK,R3; success
++                br      0END$
++0ERR$:          CLR     R3
++0END$:          pop     R2
++                pop     R1
++                retur
++
  {{/code}}
--= **Команды для работы с MicroSD картой на файловом уровне** =
++= Commands for working with a MicroSD card at the file level =
--Данные команды предназначены для работы с MicroSD картой на уровне файловой системы и позволяет читать/писать файлы без монтирования файлов как образов дисков.
++These commands are designed to work with a MicroSD card at the file system level and allow you to read/write files without mounting files as disk images.
--Эти команды используют буфер 256. слов который задействован в интерфейсе работы с энергонезависимой памятью (см выше команды 022 023)
--\\Ограничения - длина полного пути к файлу  256 байт
++These commands use a 256-word buffer that is used in the interface for working with non-volatile memory (see commands 022 023 above)
--== **050: Установить имя файла который будем читать** ==
++Limitations - the length of the full path to the file is 256 bytes
--Код команды 050,  данная команда устанавливает имя файла который будем читать, при этом производится открытие файла на чтение, а также получение его свойств.
++== 050: Set the name of the file we will read ==
--== **051: Получить размер файла на чтение (или его статус) на МПИ** ==
++Command code 050, this command sets the name of the file that we will read, while opening the file for reading, and also obtaining its properties.
--Код команды 051,  данная команда передает на МПИ размер файла или ошибку его чтения. Размер файла 31бит, старший бит является признаком ошибки. Соответственно максимальный размер файлов с которыми можно работать через этот интерфейс ограничен 2^31 байт (2GB).
++== 051: Get file size for reading (or its status) on BUS ==
--формирование ошибки выглядит так:
--sizeanyfile=1<<31 + FFres; ~/~/ если установлен старший бит 32х битного слова - то в младшей части код ошибки
--\\FFres = ошибка FatFS
--
++Command code 051, this command transmits the file size or reading error to the MPI. The file size is 31 bits, the most significant bit is an error indicator. Accordingly, the maximum file size that can be worked with via this interface is limited to 2 ^ 31 bytes (2GB).
++The error generation looks like this:
++sizeanyfile=1<<31 + FFres; ~/~/ if the most significant bit of a 32-bit word is set, then the error code is in the lower part
++
++FFres = FatFS error
++
  {{code language="c"}}
  typedef enum {
      FR_OK = 0,                /* (0) Succeeded */
@@ -1371,317 +1371,309 @@
  [[http:~~/~~/elm-chan.org/fsw/ff/doc/open.html>>url:http://elm-chan.org/fsw/ff/doc/open.html]]
--== **052: Читать блок установленного файла в буфер** ==
++== 052: Read a block of a set file into a buffer ==
--Код команды 052,  данная команда осуществляет чтение файла в буфер энергонезависимой памяти.
++Command code 052, this command reads a file into a non-volatile memory buffer.
--В итоге схема чтения файла выглядит вот так
--**023** - заливаем имя файла в буфер
--**050** - устанавливаем файл на чтение
--**051 **- читаем длину файла или ошибку открытия файла
--если ошибка - повторяем сначала 023 050 051
--если все ok - приступаем к чтению файла
--**052** - читает блок файла в буфер
--**022 **- забираем данные из буфера
--пары 052 022 повторяем нужное количество раз дабы считать весь файл
--как файл будет прочтен - последняя 052 команда закроет его автоматически.
--
++As a result, the file reading scheme looks like this
++**023** - fill the file name into the buffer
++**050 **- set the file for reading
++**051** - read the file length or file open error
++if there is an error - repeat 023 050 051 from the beginning
++if everything is ok - start reading the file
++**052** - read the file block into the buffer
++**022** - take data from the buffer
++repeat the **052 022** pairs the required number of times in order to read the entire file
++once the file is read - the last 052 command will close it automatically.
--Пример программы
++Example program:
  {{code language="assembler"}}
++                call    AZRST; reset
--                call    AZRST; сбросим
++; load the file name into the buffer
++7$:             mov     #23,(R1); command to write data to the buffer
++5$:             TSTB    (R1); check execution result
++                BPL     5$  ; wait
++                TST     (R1)+; increment
++                mov     #FILNM,R3
++1$:             mov     (R3),(R1); send to controller
++                tst     (R3)+
++                bne     1$
++                tst     -(R1); decrement
--; заливаем в буфер имя файла
--7$:             mov     #23,(R1); командуем что будем писать данные в буфер
--5$:             TSTB    (R1); проверяем результат выполнения
--                BPL     5$  ; ждем
--                TST     (R1)+; инкрементируем
--                mov     #FILNM,R3
--1$:             mov     (R3),(R1); отдаем в контроллер
--                tst     (R3)+
--                bne     1$
--                tst     -(R1); декрементируем
++; set the file for reading
++                mov     #50,(R1); set file for reading
++2$:             TSTB    (R1); check execution result
++                BPL     2$  ; wait
++; read the file length
++                mov     #51,(R1); set file for reading
++3$:             TSTB    (R1); check execution result
++                BPL     3$  ; wait
++                TST     (R1)+; increment
++                mov     #FILSZ,R3
++                mov     (R1),(R3)+; read from controller
++                mov     (R1),(R3); read from controller
--    ; устанавливаем файл на чтение
--                mov     #50,(R1); устанавливаем файл на чтение
--2$:             TSTB    (R1); проверяем результат выполнения
--                BPL     2$  ; ждем
++; display the file length on the screen
++                clr     R0
++                mov     #FILSZ+2,R3
++                mov     (R3),R1
++                call    DNOZ
++                mov     -(R3),R1
++                call    DNOZ
++                .print   #STMS2
++; read the file
++                mov     R1,R4; R1 holds the file length
++                MOV     #AZ$CSR,R1
++                mov     #BUFFL,R5
--    ; читаем длину файда
--                mov     #51,(R1); устанавливаем файл на чтение
--3$:             TSTB    (R1); проверяем результат выполнения
--                BPL     3$  ; ждем
--                TST     (R1)+; инкрементируем
--                mov     #FILSZ,R3
--                mov     (R1),(R3)+; читаем с контроллера
--                mov     (R1),(R3); читаем с контроллера
++                bit     #1,R4; if an odd number of bytes
++                beq     47$
++                inc      R4; add 1 more byte as we read words
--    ; выведем длину файла на экран
--                clr     R0
--                mov     #FILSZ+2,R3
--                mov     (R3),R1
--                call    DNOZ
--                mov     -(R3),R1
--                call    DNOZ
--                .print   #STMS2
++47$:            tst     R4
++                beq     45$ ; nothing left to read - exit
--    ; читаем файл
--                mov     R1,R4; в R1 осталась длина файла
--                MOV     #AZ$CSR,R1
--                mov     #BUFFL,R5
++                mov     #52,(R1); read block into buffer
++4$:             TSTB    (R1); check execution result
++                BPL     4$  ; wait
++                mov     #22,(R1); start reading buffer
++51$:            TSTB    (R1); check execution result
++                BPL     51$ ; wait
--                bit     #1,R4; если нечетное число байт
--                beq     47$
--                inc      R4; добавим еще 1 байт тк читаем словами
++                cmp     R4,#512.; compare with buffer size in bytes
++                Blos    44$ ; less than buffer size left
--47$:            tst     R4
--                beq     45$ ; уже нечего читать - выходим
++                .print  #STMS1
++                mov     #256.,R2
++                TST     (R1)+; move to data register
++46$:            mov     (R1),(R5)+; read into buffer
++                sob     R2,46$
++                sub     #512.,R4; subtract
++                TST     -(R1); move to command register
++                br      47$
++44$:            .print  #STMS3
++                mov     R4,R2
++                asr     R2  ; /2 since reading words
++                TST     (R1)+; move to data register
++43$:            mov     (R1),(R5)+; read into buffer
++                sob     R2,43$
--                mov     #52,(R1); читаем блок в буфер
--4$:             TSTB    (R1); проверяем результат выполнения
--                BPL     4$  ; ждем
--                mov     #22,(R1); будем читать буфер
--51$:            TSTB    (R1); проверяем результат выполнения
--                BPL     51$ ; ждем
++45$:            clr     (R5); set end of file marker
--                cmp     R4,#512.; сравниваем c размером буфера в байтах
--                Blos    44$ ; осталось меньше чем буфер
++; file read - display on screen
++                .print   #STMS4
++                .print  #BUFFL
++                .print   #STMS5
++                mov     #110,@#AZ$CSR; enable network
++                .Exit
--                .print  #STMS1
--                mov     #256.,R2
--                TST     (R1)+; переходим на регистр данных
--46$:            mov     (R1),(R5)+; читаем в буфер
--                sob     R2,46$
--                sub     #512.,R4; вычитаем
--                TST     -(R1); переходим на регистр команд
--                br      47$
--
--44$:            .print  #STMS3
--                mov     R4,R2
--                asr     R2  ; /2 тк читаем словами
--                TST     (R1)+; переходим на регистр данных
--43$:            mov     (R1),(R5)+; читаем в буфер
--                sob     R2,43$
--
--
--45$:            clr     (R5); проставим конец файла
--    ; файл считан - выводим на экран
--                .print   #STMS4
--                .print  #BUFFL
--                .print   #STMS5
--
--
--                mov     #110,@#AZ$CSR; включаем сеть
--                .Exit
  {{/code}}
--== **053:** установить имя файла который будем писать ==
++== 053: set the name of the file that we will write ==
--Код команды 053,  данная команда открывает файл на запись, получает параметры открытия (или ошибки).
++Command code 053, this command opens a file for writing, receives opening parameters (or errors).
--== **054:** установка длины файла ==
++== 054: Set file length ==
--Код команды 054,  данная команда устанавливает ожидаемую длину файла, это нужно для корректного формирования файла на файловом уровне MicroSD карты, а также для организации передачи данных.
++Command code 054, this command sets the expected file length, this is necessary for the correct formation of the file at the file level of the MicroSD card, as well as for organizing data transfer.
--== **055:** записать в файл данные из буфера ==
++== 055: write data from buffer to file ==
--Код команды 055,  данная команда записывает в открытый файл на запись данные из буфера энергонезависимой памяти. Последняя команда 055 автоматически закроет файл по достижению заявленной длины файла.
++Command code 055, this command writes data from the non-volatile memory buffer to an open file for writing. The last command 055 will automatically close the file when the declared file length is reached.
--Схема подачи команд при записи вот такая
--**023** - заливаем имя файла в буфер
--**053** - устанавливаем файл на чтение
--**051 **- статус открытия/создания файла
--если ошибка - повторяем сначала 023 053 051
--если все ok - идем дальше
--**054** - установка длины файла, те надо сразу объявить какая у нас будет длина файла
--**023** - заливаем блок данных в буфер
--**055** - пишем из буфера в файл
--пары 023 055 повторяем нужное количество раз дабы записать весь файл
--как файл будет записан - последняя 055 команда закроет его автоматически
++The command flow chart for writing is as follows
++**023** - fill the file name into the buffer
++**053** - set the file for reading
++**051** - file opening/creation status
++if an error - repeat from the beginning 023 053 051
++if everything is ok - move on
++**054** - set the file length, i.e. we must immediately declare what the file length will be
++**023** - fill the data block into the buffer
++**055** - write from the buffer to the file
++repeat the 023 055 pairs the required number of times in order to write the entire file
++once the file is written - the last 055 command will close it automatically
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; заливаем в буфер имя файла
--                MOV     #AZ$CSR,R1
--17$:            mov     #23,(R1); командуем что будем писать данные в буфер
--15$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     15$     ; ждем
--                TST     (R1)+   ; переходим на регистр данных
--                mov     #FILNM2,R3
--11$:             mov    (R3),(R1); отдаем в контроллер
--                tst     (R3)+
--                bne     11$
--                tst     -(R1)   ; переходим на регистр команд
++; load the file name into the buffer
++                MOV     #AZ$CSR,R1
++17$:            mov     #23,(R1); command to write data to the buffer
++15$:            TSTB    (R1)    ; check execution result
++                BPL     15$     ; wait
++                TST     (R1)+   ; move to data register
++                mov     #FILNM2,R3
++11$:             mov    (R3),(R1); send to controller
++                tst     (R3)+
++                bne     11$
++                tst     -(R1)   ; move to command register
--        ; устанавливаем файл на запись
--                mov     #53,(R1); устанавливаем файл на запись
--12$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     12$     ; ждем
++; set the file for writing
++                mov     #53,(R1); set file for writing
++12$:            TSTB    (R1)    ; check execution result
++                BPL     12$     ; wait
++; read file creation status
++                mov     #51,(R1)
++13$:            TSTB    (R1)    ; check execution result
++                BPL     13$     ; wait
++                TST     (R1)+   ; move to data register
++                mov     #STATS,R3
++                mov     (R1),(R3)+; read from controller
++                mov     (R1),(R3); read from controller
--        ; читаем статус создания файла
--                mov     #51,(R1)
--13$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     13$     ; ждем
--                TST     (R1)+   ; переходим на регистр данных
--                mov     #STATS,R3
--                mov     (R1),(R3)+; читаем с контроллера
--                mov     (R1),(R3); читаем с контроллера
++; check here - if the file is created, both words should be zero
++                mov     #STATS,R3
++                TST     (R3)+
++                BNE     66$
++                TST     (R3)
++                BEQ     60$
++66$:            .print  #ERRMS1 ; print error
++                .exit
--        ; тут надо проверить - если файл создан то оба слова нулевые
--                mov     #STATS,R3
--                TST     (R3)+
--                BNE     66$
--                TST     (R3)
--                BEQ     60$
--66$:            .print  #ERRMS1 ; печать ошибки
--                .exit
++60$:            MOV     #AZ$CSR,R1
++                mov     #54,(R1); set file length to be written
++23$:            TSTB    (R1)    ; check execution result
++                BPL     23$     ; wait
++                TST     (R1)+   ; move to data register
++                mov     #FILSZ,R3
++                mov     (R3)+,(R1); write to controller
++                mov     (R3),(R1); write to controller
--60$:            MOV     #AZ$CSR,R1
--                mov     #54,(R1); установим длину файла который будем писать
--23$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     23$     ; ждем
--                TST     (R1)+   ; переходим на регистр данных
--                mov     #FILSZ,R3
--                mov     (R3)+,(R1); пишем в контроллер
--                mov     (R3),(R1); пишем в контроллер
++                tst     -(R1)   ; move to command register
--                tst     -(R1)   ; переходим на регистр команд
++; write file
++                mov     @#FILSZ,R4; file length
++                MOV     #AZ$CSR,R1
++                mov     #BUFFL,R5; file buffer
++                bit     #1,R4   ; if an odd number of bytes
++                beq     147$
++                inc      R4   ; add 1 more byte since reading words
++147$:           tst     R4      ; check length
++                beq     145$    ; nothing left to write - exit
--        ; пишем файл
--                mov     @#FILSZ,R4; длина файла
--                MOV     #AZ$CSR,R1
--                mov     #BUFFL,R5; буфер файла
++                mov     #23,(R1); write to buffer
++151$:           TSTB    (R1)    ; check execution result
++                BPL     151$    ; wait
--                bit     #1,R4   ; если нечетное число байт
--                beq     147$
--                inc      R4   ; добавим еще 1 байт тк читаем словами
++                cmp     R4,#512.; compare with buffer size in bytes
++                Blos    144$    ; less than buffer size left
--147$:           tst     R4      ; проверим длину
--                beq     145$    ; уже нечего писать - выходим
++                .print  #STMS6  ; writing full block
++                mov     #256.,R2
++                TST     (R1)+   ; move to data register
++146$:           mov     (R5)+,(R1); write to controller buffer
++                sob     R2,146$
++                sub     #512.,R4; subtract
++                TST     -(R1)   ; move to command register
--                mov     #23,(R1); будем писать в буфер
--151$:           TSTB    (R1)    ; проверяем результат выполнения
--                BPL     151$    ; ждем
++                mov     #55,(R1); write buffer to file
++104$:           TSTB    (R1)    ; check execution result
++                BPL     104$    ; wait
++                br      147$    ; loop back
--                cmp     R4,#512.; сравниваем c размером буфера в байтах
--                Blos    144$    ; осталось меньше чем буфер
++144$:            .print  #STMS7 ; writing last block
++                TST     (R1)+   ; move to data register
++                mov     R4,R2
++                asr     R2      ; /2 since writing words
++143$:           mov     (R5)+,(R1); write to controller buffer
++                sob     R2,143$
--                .print  #STMS6  ; заливка полного блока
--                mov     #256.,R2
--                TST     (R1)+   ; переходим на регистр данных
--146$:           mov     (R5)+,(R1); пишем в буфер контроллера
--                sob     R2,146$
--                sub     #512.,R4; вычитаем
--                TST     -(R1)   ; переходим на регистр команд
++                TST     -(R1)   ; move to command register
++                mov     #55,(R1); write last buffer to file
++105$:           TSTB    (R1)    ; check execution result
++                BPL     105$    ; wait
--                mov     #55,(R1); запись буфера в файл
--104$:           TSTB    (R1)    ; проверяем результат выполнения
--                BPL     104$    ; ждем
--                br      147$    ; в начало
++145$:           .print #STMSE   ; end
++                mov     #110,@#AZ$CSR; enable network
++                .Exit           ; exit
--144$:            .print  #STMS7 ; заливка последнего блока
--                TST     (R1)+   ; переходим на регистр данных
--                mov     R4,R2
--                asr     R2      ; /2 тк пишем словами
--143$:           mov     (R5)+,(R1); пишем в буфер контроллера
--                sob     R2,143$
--
--                TST     -(R1)   ; переходим на регистр команд
--                mov     #55,(R1); запись пследнего буфера в файл
--105$:           TSTB    (R1)    ; проверяем результат выполнения
--                BPL     105$    ; ждем
--
--145$:           .print #STMSE   ; конец
--                mov     #110,@#AZ$CSR; включаем сеть
--                .Exit           ; выходим
  {{/code}}
--**[[пример полностью в виде утилиты RT11 выложен вот тут>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**
++**[[the example is completely in the form of the RT11 utility and is posted here>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**
--== **056: Получить данные по размеру карты в буфер sizecard** ==
++== 056: Get data on the size of the map into the sizecard buffer ==
--Код команды 056,  данная команда читает параметры MicroSD карты в буфер sizecard
++Command code 056, this command reads the parameters of the MicroSD card into the sizecard buffer
--== **057: Чтение буфера sizecard** ==
++== 057: Reading sizecard buffer ==
--Код команды 057,  данная команда отдает буфер sizecard (2 слова)
++Command code 057, this command returns the sizecard buffer (2 words)
--буфер sizecard содержит 2 слова 16bit
--первое слово - общий объем карты доступный для FAT в МБ
--второе слово - свободный объем на карте в МБ
++sizecard buffer contains 2 words 16bit
++first word - total card size available for FAT in MB
++second word - free card size in MB
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 51 - получение объема SD карты всего/свободно в мегабайтах
--; результат в R1 - всего; R2 - свободно
--GetSizeSD:      call    AZreset; сбросим
--                tst     R1
--                bne     0ERR$
--                MOV     #AZ$CSR,R1
--                mov     #56,(R1)
--1$:             TSTB    (R1); подготовить буфер
--                BPL     1$; ждем
--                mov     #57,(R1)
--2$:             TSTB    (R1); подготовить буфер
--                BPL     2$; ждем
--                mov     @#AZ$DR ,R1; всего мегабайт
--                mov     @#AZ$DR ,R2; свободно мегабайт
--                return
--                clr     R1
--                clr     R2
--                return
++; trap 51 - get the total/free size of the SD card in megabytes
++; result in R1 - total; R2 - free
++GetSizeSD:      call    AZreset  ; reset
++                tst     R1
++                bne     0ERR$
++                MOV     #AZ$CSR,R1
++                mov     #56,(R1)
++1$:             TSTB    (R1)     ; prepare buffer
++                BPL     1$       ; wait
++                mov     #57,(R1)
++2$:             TSTB    (R1)     ; prepare buffer
++                BPL     2$       ; wait
++                mov     @#AZ$DR ,R1  ; total megabytes
++                mov     @#AZ$DR ,R2  ; free megabytes
++                return
++                clr     R1
++                clr     R2
++                return
++
  {{/code}}
--Пример данных
--035521 - всего на карточке мегабайт - 15185.
--035417 - свободно мегабайт - 15119.
--
++Example data
++035521 - total megabytes on the card - 15185.
++035417 - free megabytes - 15119.
--= **Блок команд API Hall of Fame** =
++= Hall of Fame API Command Block =
--Данный блок команд предназначен для взаимодействия с сервером [[Hall of Fame>>https://forum.maxiol.com/index.php?showtopic=5642]]
++This block of commands is intended for interaction with the server [[Hall of Fame>>https://forum.maxiol.com/index.php?showtopic=5642]]
  == **025: Инициализация Hall of Fame (HOF)** ==
--Код команды 025,  данная команда устанавливает соединение с сервером Hall of Fame, инициализирует шифрованный тоннель и подготавливает API к работе.
++Command code 025, this command establishes a connection to the Hall of Fame server, initializes the encrypted tunnel and prepares the API for work.
--Пример программы
++Example program:
  {{code language="assembler"}}
--AZ$CSR          = 177220                 ; регистр команд и состояния (CSR)
--AZ$DR           = 177222                 ; регистр данных (DR)
++AZ$CSR          = 177220                 ; command and status register (CSR)
++AZ$DR           = 177222                 ; data register (DR)
--; буфера
--SNDBUF:         .BLKW 256.               ; буфер передачи
--RCVBUF:         .BLKW 256.               ; буфер приема ответа
++; buffers
++SNDBUF:         .BLKW 256.               ; send buffer
++RCVBUF:         .BLKW 256.               ; receive buffer
  SIDMEM:         .BLKB 34.                ; SID
--SIDCST:         .ASCII    \{"SID":"\       ; заголовок SID-а
++SIDCST:         .ASCII    \{"SID":"\       ; SID header
                  .even
--HOFINI:      ; инициализация HOF
--             ;результатом является такой JSON
--             ;{"SID":"хеш сессии","RESULT":"OK"}
--             ;или ошибка
--             ;{"RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
--             ;{"RESULT":"ERROR","DESCRIPTION":"CONNECTION_ERROR"}
--             ; результат помещается в SNDBUF
--             ; в R5 фиксация успешности - =1 есть SID, =0 нет SID-а
--
++HOFINI:      ; HOF initialization
++             ; The result is a JSON response:
++             ; {"SID":"session hash","RESULT":"OK"}
++             ; or an error:
++             ; {"RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
++             ; {"RESULT":"ERROR","DESCRIPTION":"CONNECTION_ERROR"}
++             ; The result is placed in SNDBUF
++             ; R5 indicates success: 1 = SID exists, 0 = no SID
++
                  mov     R5, -(SP)
                  mov     R4, -(SP)
                  mov     R3, -(SP)
@@ -1689,29 +1689,29 @@
                  mov     R1, -(SP)
                  mov     R0, -(SP)
--                mov     #3,R5        ; количество попыток
++                mov     #3,R5        ; number of attempts
 $:           mov     #AZ$CSR,R1
--                clr     (R1)         ; Пошлем команду "Сброс"
--221$:           tstb    (R1)         ; Проверим готовность контроллера
--                bpl     221$         ; Если не готов ждем
++                clr     (R1)         ; Send "Reset" command
++221$:           tstb    (R1)         ; Check controller readiness
++                bpl     221$         ; If not ready, wait
--                mov     #25,(R1)     ; инициализация  - команда 025
--20$:            tstb    (R1)         ; проверяем результат выполнения
--                bpl     20$          ; ждем
++                mov     #25,(R1)     ; initialization - command 025
++20$:            tstb    (R1)         ; check execution result
++                bpl     20$          ; wait
--             ; получим результат
--                mov     #22,(R1)     ; отдать на шину считанный блок памяти из буфера
--21$:            tstb    (R1)         ; проверяем результат выполнения
--                bpl     21$          ; ждем
--                tst     (R1)+        ; инкрементируем
++             ; Retrieve the result
++                mov     #22,(R1)     ; output the read memory block from buffer to the bus
++21$:            tstb    (R1)         ; check execution result
++                bpl     21$          ; wait
++                tst     (R1)+        ; increment
                  mov     #SNDBUF,R3
--                mov     #256.,R2     ; читаем 256. слов; первое слово - результат чтения
--22$:            mov     (R1),(R3)+   ; читаем блок слов в память
++                mov     #256.,R2     ; read 256 words; first word is the read result
++22$:            mov     (R1),(R3)+   ; read block of words into memory
                  sob     R2,22$
--             ; надо понять - есть ли SID
++             ; Determine if SID exists
                  mov     #4,R0
                  mov     #SNDBUF,R1
                  mov     #SIDCST,R2
@@ -1720,11 +1720,11 @@
                  sob     R0,23$
                  clr     R5
                  inc     R5
--                br      26$          ; успешно
++                br      26$          ; success
--24$:         ; SID не найден!
++24$:         ; SID not found!
                  sob     R5,220$
--                clr     R5           ; ошибка - нет SID-а
++                clr     R5           ; error - no SID
 $:            mov     (SP)+, R0
                  mov     (SP)+, R1
@@ -1733,69 +1733,71 @@
                  mov     (SP)+, R4
                  mov     (SP)+, R5
                  return
++
  {{/code}}
--== **026: обмен с Hall of Fame (HOF)** ==
++== 026: Exchange with Hall of Fame (HOF) ==
--Код команды 026,  данная команда осуществляет непосредственный обмен с Hall of Fame
++Command code 026, this command makes a direct exchange with Hall of Fame
--Пример программы
++Example program:
  {{code language="assembler"}}
--             ;4. авторизация пользователя
--             ;технически это отправка JSON
--             ;{"SID":"хеш сессии","CMD":"AUTH_USER","NIKNAME":"никнейм пользователя","PASSWORD":"пароль пользователя"}
--             ;ответ тоже JSON
--             ;{"SID":"хеш сессии","RESULT":"OK","UID":"хеш пользователя"}
--             ;или
--             ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"USER_NOT_FOUND_OR_WRONG_PASSWORD"}
--             ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
--             ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SESSION_NOT_EXISTS_OR_EXPIRED"}
++             ;4. user authentication
++             ;technically, this is sending a JSON
++             ;{"SID":"session hash","CMD":"AUTH_USER","NIKNAME":"user nickname","PASSWORD":"user password"}
++             ;the response is also JSON
++             ;{"SID":"session hash","RESULT":"OK","UID":"user hash"}
++             ;or
++             ;{"SID":"session hash","RESULT":"ERROR","DESCRIPTION":"USER_NOT_FOUND_OR_WRONG_PASSWORD"}
++             ;{"SID":"session hash","RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
++             ;{"SID":"session hash","RESULT":"ERROR","DESCRIPTION":"SESSION_NOT_EXISTS_OR_EXPIRED"}
--             ; загоняем команду CMD04
--                mov     #CMD04,R1
--                mov     #ADRMEM,R2
--                add     #42.,R2      ; cдвигаем указатель на длину блока с SID
--33$:            movb   (R1)+,(R2)+
--                bne     33$
++             ; load command CMD04
++                mov     #CMD04,R1
++                mov     #ADRMEM,R2
++                add     #42.,R2      ; shift the pointer to the SID block length
++33$:            movb   (R1)+,(R2)+
++                bne     33$
--                .Print    #ADRMEM
++                .Print    #ADRMEM
--                .Print    #HOF05
--             ; отсылаем команду и ждем ответа
--             ; закачиваем в буфер
--                MOV     #AZ$CSR,R1
--331$:           TSTB    (R1)         ; Проверим готовность контроллера
--                BPL     331$         ; Если не готов ждем
--                mov     #23,(R1)     ; командуем что будем писать данные в буфер
--34$:            TSTB    (R1)         ; проверяем результат выполнения
--                BPL     34$          ; ждем
--                TST     (R1)+        ; инкрементируем
--                mov     #ADRMEM,R3
--                mov     #256.,R2     ;
--35$:            mov     (R3)+,(R1)   ; отдаем в контроллер
--                sob     R2,35$
--                tst     -(R1)        ; декрементируем
++                .Print    #HOF05
++             ; send the command and wait for a response
++             ; load into buffer
++                MOV     #AZ$CSR,R1
++331$:           TSTB    (R1)         ; Check controller readiness
++                BPL     331$         ; If not ready, wait
++                mov     #23,(R1)     ; command to write data into buffer
++34$:            TSTB    (R1)         ; check execution result
++                BPL     34$          ; wait
++                TST     (R1)+        ; increment
++                mov     #ADRMEM,R3
++                mov     #256.,R2     ;
++35$:            mov     (R3)+,(R1)   ; send to controller
++                sob     R2,35$
++                tst     -(R1)        ; decrement
--             ; обмен  - команда 026
--                MOV     #AZ$CSR,R1
--361$:           TSTB    (R1)         ; Проверим готовность контроллера
--                BPL     361$         ; Если не готов ждем
--                mov     #26,(R1)
--36$:            TSTB    (R1)         ; проверяем результат выполнения
--                BPL     36$          ; ждем
++             ; exchange - command 026
++                MOV     #AZ$CSR,R1
++361$:           TSTB    (R1)         ; Check controller readiness
++                BPL     361$         ; If not ready, wait
++                mov     #26,(R1)
++36$:            TSTB    (R1)         ; check execution result
++                BPL     36$          ; wait
--             ; получим результат
--371$:           TSTB    (R1)         ; Проверим готовность контроллера
--                BPL     371$         ; Если не готов ждем
--                mov     #22,(R1)     ; отдать на шину буфер
--37$:            TSTB    (R1)         ; проверяем результат выполнения
--                BPL     37$          ; ждем
--                TST     (R1)+        ; инкрементируем
--                mov     #ADRMEM,R3
--                mov     #256.,R2     ; читаем 256. слов; первое слово - результат чтения
--38$:            mov     (R1),(R3)+   ; читаем блок слов в память
--                sob     R2,38$
++             ; receive result
++371$:           TSTB    (R1)         ; Check controller readiness
++                BPL     371$         ; If not ready, wait
++                mov     #22,(R1)     ; send buffer to the bus
++37$:            TSTB    (R1)         ; check execution result
++                BPL     37$          ; wait
++                TST     (R1)+        ; increment
++                mov     #ADRMEM,R3
++                mov     #256.,R2     ; read 256 words; first word is the read result
++38$:            mov     (R1),(R3)+   ; read block of words into memory
++                sob     R2,38$
++
  {{/code}}

Changes for page API контроллеров AZ®

Summary

Details

Applications

Navigation

Need help?