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

From version 1.4
edited by Max
on 2025/02/25 11:01
Change comment: (Autosaved)
To version 2.1483
edited by Max
on 2025/03/02 15:13
Change comment: (Autosaved)

Summary

Details

Page properties
Content
... ... @@ -15,7 +15,6 @@
15 15  * 177224 - Primary Boot Register (BOOT1)
16 16  * 177226 - Alternate Boot Register (BOOT2)
17 17  
18 -
19 19  The CSR register accepts commands in bits D0-D5 and the interrupt enable bit in bit D6, all write only, always zero is read. In bit D7, the readiness bit is read. One in it means that the previous command has been executed and the controller is ready for exchange. Zero means that the controller is busy executing the previous operation, the other registers are disabled, access to any of them will cause Trap to 4. If the execution of the previous command caused an error, bit D15 is set simultaneously with bit D7.
20 20  \\Writing to registers is done only in words; byte writing is not allowed.
21 21  \\All data exchange is conducted via DR. For commands with a single-word argument, this argument should be sent to DR, and then the command should be sent to CSR. For commands exchanging with the controller buffer, on the contrary, the command should be issued and only after it a data block of a certain length should be received or transmitted.
... ... @@ -201,7 +201,7 @@
201 201  ;.............................
202 202  {{/code}}
203 203  
204 -== **004: Монтировать диск** ==
203 +== 004: Mount a disk ==
205 205  
206 206  Sequence of actions:
207 207  • Reset the controller
... ... @@ -221,20 +221,20 @@
221 221   MOV #AZ$CSR,R3
222 222  
223 223  20$: CLR @R3;
224 - TSTB @R3; Сбросим контроллер
223 + TSTB @R3; Reset the controller
225 225   BPL 20$;
226 226  
227 - MOV #WrBuf,(R3)+; Перешлем в него строку
228 - MOV #MDTXT,R2; с командой назначения
226 + MOV #WrBuf,(R3)+; Send it a string
227 + MOV #MDTXT,R2; with the assignment command
229 229   MOV #MDLEN/2,R1;
230 230  21$: MOV (R2)+,@R3;
231 231   SOB R1,21$;
232 232  
233 - MOV #AZMNT,-(R3); и отдадим ее на
234 -22$: TSTB @R3 ; исполнение
232 + MOV #AZMNT,-(R3); and pass it to
233 +22$: TSTB @R3 ; execution
235 235   BPL 22$ ;
236 236  
237 - TST @R3; после чего проверим на ошибку
236 + TST @R3; then check for an error
238 238   BMI Err11;
239 239  ;.........................
240 240  
... ... @@ -243,57 +243,57 @@
243 243  ;..................
244 244  {{/code}}
245 245  
246 -В этом фрагменте на диск AZ4 монтируется файл-образ 51SYS_DS.DSK, лежащий в папке SYSTEM, которая лежит в папке DISKS, лежащей в корневом оглавлении карточки микро-SD.
245 +In this fragment, the 51SYS_DS.DSK image file is mounted on the AZ4 disk, located in the SYSTEM folder, which is located in the DISKS folder, which is located in the root directory of the micro-SD card.
247 247  
248 248  
249 -== **005: Чтение блока в буфер** ==
248 +== 005: Reading block into buffer ==
250 250  
251 -У контроллера имеется [[встроенный буфер на 256 слов (512 байт).>>doc:||anchor="H411443444435440430"]] Фактически, это часть оперативной памяти микроконтроллера STM32, выделенная в его программе под этот буфер. Весь обмен в основном блоке команд идет через этот буфер.
252 -\\Память дисков AZ представлена, как набор блоков объемом 512 байт каждый. Такой блок - единственная доступная единица для обмена данными с дисками AZ. Блоки пронумерованы от нуля до 65533 для 16-разрядного варианта или до 8388607 для 32-разрядного - это при использовании накопителей AZ максимально допустимой емкости. Никто не мешает использовать накопители меньшей емкости - фактический размер накопителя равен размеру файл-образа, смонтированного на этот накопитель. При попытке обратиться за пределы файл-образа будет зарегистрирована ошибка.
253 -\\Команда 005 - чтение блока с MicroSD в [[буфер>>doc:||anchor="Micro"]]. С псевдодиска AZn, выбранного ранее командой "Выбор устройства" запускается на чтение блок, номер которого передан командой (командами) "Установка номера блока". Команда длительного действия.
254 -\\Фактически, блок с карточки MicroSD читается, примерно, 500-800 мкс. На это время контроллер переходит в состояние, которое во время обсуждения проекта получило название "Думаю, прошу не мешать." А именно, на все время ее исполнения отключаются все регистры устройства, кроме CSR, в котором считывается ноль до тех пор, пока контроллер занят исполнением этой команды. По окончании считывания блока к МПИ подключаются остальные регистры контроллера, взводится бит D7 (готовность) в CSR и, если был установлен бит D6 (разрешение прерываний) в CSR, вырабатывается прерывание с вектором 0174.
255 -\\Пример без прерываний тривиален:
250 +The controller has a built-in buffer for 256 words (512 bytes). In fact, this is part of the STM32 microcontroller's RAM, allocated in its program for this buffer. All exchange in the main command block goes through this buffer.
251 +\\The AZ disk memory is represented as a set of blocks, each 512 bytes in size. Such a block is the only available unit for exchanging data with AZ disks. The blocks are numbered from zero to 65533 for the 16-bit version or up to 8388607 for the 32-bit version - this is when using AZ drives of the maximum permissible capacity. No one prevents you from using drives of a smaller capacity - the actual size of the drive is equal to the size of the file-image mounted on this drive. An error will be registered if you try to access beyond the file-image.
252 +\\Command 005 - reading a block from MicroSD to the buffer. From the pseudo-disk AZn, previously selected by the command "Select device", the block whose number is transmitted by the command (commands) "Set block number" is started for reading. Long-term command.
253 +\\In fact, a block from a MicroSD card is read in about 500-800 µs. During this time, the controller goes into a state that during the discussion of the project was called "I think, please do not interfere." Namely, for the entire time of its execution, all device registers are disabled, except for CSR, in which zero is read as long as the controller is busy executing this command. After the block is read, the remaining controller registers are connected to the QBUS, bit D7 (ready) is set in CSR and, if bit D6 (interrupt enable) was set in CSR, an interrupt with vector 0174 is generated.
254 +\\An example without interruptions is trivial:
256 256  
257 257  {{code language="assembler"}}
258 258  ;...................................
259 259  
260 -CmdRea=005; символическое наименование команды "Читать
261 -; блок"
259 +CmdRea=005; symbolic name of the "Read block" command
262 262  
263 -; В R3 у нас от предыдущего фрагмента остался адрес CSR.
264 -; Пересылаем туда код команды чтения
261 +; In R3 we have the CSR address left from the previous fragment.
262 +; We send the read command code there
265 265   MOV #CmdRea,@R3
266 -2$: TSTB @R3 ; Проверим бит готовности
267 - BPL 2$; Не готово -> уходим проверять еще
268 - ; раз
269 - TST @R3; Проверим на ошибку
264 +2$: TSTB @R3 Let's check the ready bit
265 + BPL 2$; Not ready -> we go to check again
266 +; once
267 + TST @R3; Let's check for an error
270 270   BMI ERR4
271 -; Здесь у нас опять, в отличие от фрагментов пп. 3.1 и
272 -; 3.2, в R3 остался адрес CSR, а не DR.
269 +; Here again, unlike the fragments of pp. 3.1 and
270 +; 3.2, we have the CSR address left in R3, not DR.
273 273  
274 274  ;...................................
275 275  {{/code}}
276 276  
277 277  
278 -== **006: Записать блок из буфера на диск** ==
276 +== 006: Write block from buffer to disk ==
279 279  
280 -Код команды 006. Содержимое буфера пишется на выбранный псевдодиск по заданному дисковомк адресу (номеру блока). Перед записью выполняются проверки (1) "была ли запись в буфер?", если нет, выдается ошибка и (2) "заполнен ли буфер полностью?", если нет (для последнего укороченного блока файла), остаток буфера очищается нулями. Далее производится запись блока на носитель. Операция длительная, после ее запуска контроллер, как и при чтении переходит в состояние "Думаю, прошу не мешать". И так же, как и при чтении окончания этой операции надо дождаться, теми же средствами, как и при чтении.
281 -\\Пример программы без прерываний:
278 +Command code 006. The buffer contents are written to the selected pseudo-disk at the specified disk address (block number). Before writing, checks are performed (1) "was there a write to the buffer?", if not, an error is returned and (2) "is the buffer completely filled?", if not (for the last shortened block of the file), the rest of the buffer is cleared with zeros. Then the block is written to the media. The operation is lengthy, after it is started the controller, as with reading, goes into the "I think, please do not interfere" state. And just as with reading, you must wait for the end of this operation, by the same means as with reading.
282 282  
280 +
281 +Example of a program without interrupts:
282 +
283 283  {{code language="assembler"}}
284 284  ;...............................................................
285 285  
286 -CmdWri=006; символическое наименование команды "Писать
287 - ; блок"
286 +CmdWri=006; symbolic name of the "Write
287 +; block" command
288 288  
289 -; В R3 у нас от предыдущего фрагмента остался адрес DR.
290 -; Исправляем его на CSR и пересылаем туда код команды
291 -; записи
289 +; In R3 we have the DR address left over from the previous fragment.
290 +; We correct it to the CSR and send the
291 +; write command code there
292 292   MOV #CmdWri,-(R3)
293 -5$: TSTB @R3 ; Проверим бит готовности
294 - BPL 5$; Не готово -> уходим проверять еще
295 - ; раз
296 - TST @R3; Проверим на ошибку
293 +5$: TSTB @R3 ; Let's check the ready bit
294 + BPL 5$; Not ready -> we go and check again once
295 + TST @R3; Let's check for an error
297 297   BMI ERR5
298 298  
299 299  ;....................................................................
... ... @@ -300,126 +300,133 @@
300 300  {{/code}}
301 301  
302 302  
303 -== **007: Получить размер псевдодиска** ==
302 +== 007: Get disk size ==
304 304  
305 -Есть две команды получения размера псевдодиска, т.е. смонтированного на выбранный псевдопривод AZn файл-образа.
306 -\\Если используемая ОС (или программа, работающая с дисками без ОС) умеет работать с большими (больше 32М) дисками, следует пользоваться [[командой с кодом 017>>doc:||anchor="H017:A041F43E43B44344743844244C44043043743C43544043F44143543243443E43443844143A4302C43143E43B44C44843E439"]]. Последовательность действий: сбросить контроллер (команда 000), выбрать накопитель (п. 3.2) и переслать в CSR код 017, а затем, без каких-либо ожиданий, считать из DR сначала младшее, и следом за ним старшее слово размера выбранного накопителя (файл-образа).
307 -\\Если используемая ОС не умеет работать с дисками бОльшими, чем 32М (RT-11), следует пользоваться командой 007 - получить размер псевдодиска с ограничением до 32М. Действия похожие: сбрасываем контроллер, выбираем диск, посылаем в CSR код 007 и считываем из DR одно слово размера псевдодиска. Если размер файл-образа, смонтированного на выбранный псевдопривод, больше 65534 блоков, вместо этого "большого" размера, контроллер возвращает число 65534. Напоминаем, что число 65535 кое-где используется в специальных целях и не может быть размером диска.
308 -\\Также напоминаем, что если на этот накопитель не смонтирован файл-образ, последовательность действий не пройдет (команда 001 выбор устройства) и исполнение программы до этого места просто не дойдет. Поэтому ошибок у этих команд не предусмотрено.
304 +There are two commands for obtaining the size of a pseudo-disk, i.e. the AZn file-image mounted on the selected pseudo-drive.
305 +\\If the OS being used (or a program working with disks without an OS) can work with large (more than 32M) disks, you should use the command with the code 017. The sequence of actions: reset the controller (command 000), select the drive (p. 3.2) and send the code 017 to the CSR, and then, without any waiting, read from DR first the lower word, and then the higher word of the size of the selected drive (image file).
306 +\\If the OS you are using cannot work with disks larger than 32M (RT-11), you should use the 007 command - get the pseudo-disk size with a limit of up to 32M. The steps are similar: reset the controller, select the disk, send the 007 code to the CSR and read one word of the pseudo-disk size from DR. If the size of the image file mounted on the selected pseudo-drive is larger than 65534 blocks, the controller returns the number 65534 instead of this "large" size. We remind you that the number 65535 is used in some places for special purposes and cannot be the disk size.
307 +\\We also remind you that if the image file is not mounted on this drive, the sequence of actions will not work (command 001 select device) and the program execution will simply not reach this point. Therefore, these commands do not provide for errors.
309 309  
310 -Пример программы с "малыми" дисками
309 +Example of a program with "small" disks
311 311  
312 312  {{code language="assembler"}}
313 313  ;......................................
314 314  
315 -GetSiz=007; Получить "малый" размер диска
314 +GetSiz=007; Get the "small" disk size
316 316  
317 -; От фрагмента 3.2 (выбор диска) у нас в R3 остался
318 -; адрес DR (177222)
316 +; From fragment 3.2 (disk selection) we have in R3
317 +; DR address (177222)
319 319  
320 - MOV #GetSiz,-(R3); пошлем команду
321 - TST (R3)+; вернем адрес в R3 назад, на DR
319 + MOV #GetSiz,-(R3); send the command
320 + TST (R3)+; return the address in R3 back to DR
322 322   MOV @R3,DskSiz
323 323  ;......................................
324 324  {{/code}}
325 325  
326 -== **010: Разрешить работу сети** ==
325 +== 010: Allow network operation ==
327 327  
328 -Код команды 010. Закончив последовательность действий по передаче очередной порции данных, и ожидая, что следующий запрос последует не сразу же, можно "утилизировать" процессорное время микроконтроллера STM32, составляющего основу AZ - занять его обслуживанием сети. В той же RT-11 это можно сделать перед выходом из драйвера AZ, перед макрокомандой .DRFIN, завершающей исполнение запроса ввода-вывода.
329 -\\Действительно, операция ввода-вывода завершена, программа ЦП в системе будет готовить новую порцию данных для вывода, или соображать (на основании предыдущих прочитанных данных), где ей еще что-то прочитать, или вообще размышлять о чем-то своём. [[image:https://forum.maxiol.com/style_emoticons/default/smile.gif||alt="smile.gif"]] Другими словами, после окончания запроса ввода-вывода, довольно высока вероятность того, что последует пауза в работе с дисками AZ. Вот, время этой паузы и можно отдать на обслуживание сети. Для этого, перед исполнением макрокоманды .DRFIN в RT-11 или ее аналога в других ОС следует отправить в CSR код 110 (разрешить сеть плюс разрешить прерывания).
330 -\\Прерывание в этом случае не произойдет, оно активируется только по завершении "длительных" операций, которые переводят контроллер в состояние "Думаю, прошу не мешать", а установленный в "1" триггер разрешения прерываний, кроме этого, разрешает еще и работу сети, если она активирована. При запуске следующей операции ввода-вывода действия в п. 3.1 (сброс контроллера) сбросят и этот триггер, после чего программа обслуживания сети, обнаружив сброс этого триггера, прекратит (приостановит) свою работу и вернет управление основной программе обслуживания дисков AZ. Максимум, что можно заметить со стороны ЦП - это небольшая (10-20 мкс) задержка исполнения команды сброса, но это вполне умеренная плата за сетевые возможности.
331 -
327 +Command code 010. Having completed the sequence of actions for transferring the next portion of data, and expecting that the next request will not follow immediately, you can "utilize" the processor time of the STM32 microcontroller, which is the basis of AZ - occupy it with servicing the network. In the same RT-11, this can be done before exiting the AZ driver, before the .DRFIN macro command, which completes the execution of the input-output request.
328 +\\Indeed, the I/O operation is completed, the CPU program in the system will prepare a new portion of data for output, or figure out (based on the previously read data) where it should read something else, or generally think about something of its own. smile.gif In other words, after the I/O request is completed, there is a fairly high probability that there will be a pause in working with the AZ disks. So, the time of this pause can be given to servicing the network. To do this, before executing the .DRFIN macro in RT-11 or its analogue in other OS, you should send code 110 (enable network plus enable interrupts) to the CSR.
332 332  
333 -== **011: Получить таблицу назначений приводов AZn** ==
334 334  
335 -Код команды 011. Получив эту команду, контроллер переключается с буфера для блока на свою внутреннюю таблицу назначений (32 строки по 140 байт каждая)* . Перед выдачей этой команды следует сбросить контроллер. После выдачи этой команды следует выдать команду 015 (чтение буфера), но в этом случае будет читаться не буфер, а та самая таблица, последовательно, слово за словом.
336 -\\* начиная с версии v17, длина имени файла уже не 130 байт, а 386 байт (последнее слово - нулевое, для окончания строки)
331 +In this case, the interrupt will not occur, it is activated only upon completion of "long" operations that transfer the controller to the "Thinking, please do not interfere" state, and the interrupt enable trigger set to "1" also enables network operation if it is activated. When the next input-output operation is started, the actions in paragraph 3.1 (controller reset) will also reset this trigger, after which the network service program, having detected the reset of this trigger, will stop (suspend) its work and return control to the main disk service program AZ. The maximum that can be noticed from the CPU side is a small (10-20 µs) delay in executing the reset command, but this is a very reasonable price for network capabilities.
337 337  
338 -[[**//пример утилиты AZSMNT//**>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=59420]]
333 +== 011: Get AZn drive assignment table ==
339 339  
335 +Command code 011. Upon receiving this command, the controller switches from the block buffer to its internal assignment table (32 lines of 140 bytes each)*. Before issuing this command, the controller should be reset. After issuing this command, command 015 (read buffer) should be issued, but in this case it will not be the buffer that is read, but the same table, sequentially, word by word.
336 +\\* starting with v17, the file name length is no longer 130 bytes, but 386 bytes (the last word is zero, to end the line)
340 340  
341 -Пример программы:
338 +[[AZSMNT utility example>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=59420]]
342 342  
340 +
341 +Example program:
342 +
343 343  {{code language="assembler"}}
344 344  ;...................................
345 -AZ$CSR = 177220; CSR контроллера
346 -RdBuf = 012; Команда "Читать из памяти контроллера"
347 -RdTbl = 011; Команда "Читать таблицу назначений"
348 -TblSiz = 1120.; Длина таблицы в байтах (десятичная)
345 +AZ$CSR = 177220; Controller CSR
346 +RdBuf = 012; Command "Read from controller memory"
347 +RdTbl = 011; Command "Read assignment table"
348 +TblSiz = 1120.; Table length in bytes (decimal)
349 349  
350 -; Считаем, что в R2 находится адрес первого слова
351 -; области памяти для таблицы назначений. Процедуру
352 -; получения этого адреса не показываем.
350 +; We assume that R2 contains the address of the first word of the
351 +; memory area for the assignment table. We do not show the procedure for obtaining this address.
353 353  
354 - MOV #AZ$CSR,R3; Готовим CSR контроллера
353 + MOV #AZ$CSR,R3; Preparing the controller CSR
355 355  10$: CLR @R3;
356 - TSTB @R3; Сбросим контроллер
355 + TSTB @R3; Reset the controller
357 357   BPL 10$;
358 358  
359 - MOV #RdTbl,@R3; Команда "Передать
360 - ; таблицу"
358 + MOV #RdTbl,@R3;Command "Transfer
359 + ; table"
361 361  
362 - MOV #RdBuf,(R3+); Команда "Читать из
363 -; памяти контроллера. Одновременно передвинем адрес в R3
364 -; на DR контроллера (177222).
361 + MOV #RdBuf,(R3+); Command "Read from
362 +; controller memory. At the same time, move the address in R3
363 +; to the DR of the controller (177222).
365 365  
366 - MOV #TblSiz/2,R1; Готовим счетчик слов
365 + MOV #TblSiz/2,R1; Prepare the word counter
367 367  
368 -11$: MOV @R3,(R2)+; Перешлем текущее слово
369 - SOB R1,11$; и повторим 560 раз
367 +11$: MOV @R3,(R2)+; Send the current word
368 +SOB R1,11$; and repeat 560 times
370 370  ;...................................
371 371  {{/code}}
372 372  
373 -== **012: Установка номера блока, старшие биты номера блока** ==
372 +== 012: Setting the block number, block number high bits ==
374 374  
375 -Контроллер предоставляет машинке с МПИ в качестве дисков AZ0 - AZ7 файл-образы типа DSK на карточке микро-SD. Размер этих файл-образов и, соответственно, псевдодисков, может быть любым, вплоть до 4Г каждый. Адресация на этих псевдодисках прямая - полученный по МПИ номер блока, после сдвига, используется в качестве смещения от начала соответствующего файл-образа. Фактически, это нечто, вроде LBA на PC.
376 -\\Существуют операционные системы PDP-11, поддерживающие такие диски - RSX-11, ДИАМС, еще что-то. Однако, самая распространенная ОС - RT-11 - использует для номера блока СЛОВО (16 бит), причем код 0177777 кое-где используется в специальных целях и как размер диска не годится, поэтому для RT-11 могут быть использованы диски с максимальным числом блоков 0177776, т.е. 65534 блока (33553408 байт или 32767 К байт). Поэтому команды установки номера блока две: установить младшие биты номера блока - код 002 и установить старшие биты номера блока - код 012. Если номер блока помещается в 16 разрядов (для RT-11 - всегда), достаточно использовать команду установки младших битов номера блока, старшие биты при этом очищаются. Если номер не помещается в 16 разрядов, то сначала надо выдавать младшие биты, а потом старшие. Если попытаться сразу передать старшие биты без предварительной передачи младших, выдается ошибка. Если переданный адрес выходит за границу файл-образа, также выдается ошибка, не важно, на каком этапе - хоть при передаче младших 16 битов номера блока, хоть при передаче старших.
377 -\\Для выполнения этих действий следует переслать требуемую часть битов номера блока в DR и затем переслать в CSR код команды, после чего следует проверить на ошибку. Команды мгновенные, т.е. выполняются за один цикл обращения по МПИ.
378 -
374 +The controller provides the machine with MPI as disks AZ0 - AZ7 file-images of the DSK type on the micro-SD card. The size of these file-images and, accordingly, pseudo-disks, can be any, up to 4G each. Addressing on these pseudo-disks is direct - the block number obtained by QBUS, after shifting, is used as an offset from the beginning of the corresponding file-image. In fact, this is something like LBA on a PC.
379 379  
380 -== **013: Прочитать запись оглавления HFS** ==
381 381  
382 -Код команды 013, команда читает запись оглавления во внутреннюю область памяти и переключает на нее указатель для передачи данных через DR. Оглавление перед этим должно быть открыто. Порядок действий следующий:
383 -• Сбросить контроллер.
384 -• Выдать в CSR команду "Прочитать запись оглавления" и дождаться ее окончания.
385 -• Выдать в CSR команду "Прочитать из памяти контроллера"
386 -• Прочитать из DR 11 слов записи оглавления
387 -\\Запись оглавления имеет формат:
388 -\\См. Имя Значение
389 -0 fSize Размер файла в байтах, младшее слово
390 -2 старшее слово
391 -4 fDate Дата в формате MS-DOS
392 -6 fTime Время в формате MS-DOS
393 -10 fAttr Атрибуты 1 байт
394 -11 fName ИМЯ.ТИП файла, 8+1+3+1 = 13 байт
395 -\\Смещения указаны восьмеричные. Формула в строке fName означает, что там сначала должно быть имя, максимально из восьми символов, далее должна быть точка, далее тип, до трёх символов, и завершающий нулевой байт 0х00. Если тип не указан, точка тоже не нужна.
396 -\\Атрибуты файлов в байте fAttr (восьмеричные):
377 +There are PDP-11 operating systems that support such disks - RSX-11, DIAMS, and some others. However, the most common OS - RT-11 - uses a WORD (16 bits) for the block number, and the code 0177777 is used in some places for special purposes and is not suitable as a disk size, so disks with a maximum number of blocks of 0177776, i.e. 65534 blocks (33553408 bytes or 32767 K bytes), can be used for RT-11. Therefore, there are two commands for setting the block number: to set the low-order bits of the block number - code 002 and to set the high-order bits of the block number - code 012. If the block number fits into 16 bits (for RT-11 - always), it is enough to use the command to set the low-order bits of the block number, the high-order bits are cleared. If the number does not fit into 16 digits, then first the lower bits must be output, and then the higher ones. If you try to immediately transmit the higher bits without first transmitting the lower ones, an error is returned. If the transmitted address goes beyond the file-image boundary, an error is also returned, no matter at what stage - either when transmitting the lower 16 bits of the block number, or when transmitting the higher ones.
378 +\\To perform these actions, you should send the required part of the block number bits to DR and then send the command code to CSR, after which you should check for an error. The commands are instantaneous, i.e. they are executed in one cycle of access via MPI.
379 +
380 +== 013: Read HFS TOC entry ==
381 +
382 +Command code 013, the command reads the TOC record into the internal memory area and switches the pointer to it for data transfer via DR. The TOC must be open before this.
383 +
384 +The procedure is as follows:
385 +• Reset the controller.
386 +• Issue the command "Read the table of contents entry" to the CSR and wait for it to finish.
387 +• Issue the command "Read from controller memory" to the CSR
388 +• Read 11 words of the table of contents entry from DR
389 +\\The table of contents entry has the format:
390 +
391 +(% style="width:686px" %)
392 +|=(% style="width: 136px;" %)Offset (octal)|=(% style="width: 305px;" %)Name|=(% style="width: 242px;" %)Value
393 +|(% style="width:136px" %)0|(% style="width:305px" %)fSize|(% style="width:242px" %)File size in bytes, low word
394 +|(% style="width:136px" %)2|(% style="width:305px" %)fSize|(% style="width:242px" %)File size in bytes, high word
395 +|(% style="width:136px" %)4|(% style="width:305px" %)fDate|(% style="width:242px" %)Date in MS-DOS format
396 +|(% style="width:136px" %)6|(% style="width:305px" %)fTime|(% style="width:242px" %)Time in MS-DOS format
397 +|(% style="width:136px" %)10|(% style="width:305px" %)fAttr|(% style="width:242px" %)Attributes 1 byte
398 +|(% style="width:136px" %)10|(% style="width:305px" %)fName|(% style="width:242px" %)NAME.FILE TYPE, 8+1+3+1 = 13 bytes
399 +
400 +
401 +The offsets are specified in octal. The formula in the fName line means that there must first be a name, maximum of eight characters, then a period, then a type, up to three characters, and a terminating zero byte 0x00. If the type is not specified, the period is also not needed.
402 +\\File attributes in fAttr byte (octal):
397 397  \\001 - Read Only
398 398  002 - Hidden
399 399  004 - System
400 400  020 - Directory
401 401  040 - Archive
402 -\\Пример программы.
408 +\\Example program
403 403  
404 404  {{code language="assembler"}}
405 405  ;......................................
406 -RdDir = 013; код команды "Читать запись оглавления"
412 +RdDir = 013; command code "Read table of contents entry"
407 407  RdBuf = 015
408 408  
409 409   MOV #AZ$CSR,R3
410 410  
411 411  15$: CLR @R3;
412 - TSTB @R3; Сбросим контроллер
418 + TSTB @R3; Reset the controller
413 413   BPL 15$;
414 414  
415 - MOV #RdDir,@R3; Попросим контроллер
416 -16$: TSTB @R3; прочитать в свою память
417 - BPL 16$; запись оглавления
421 + MOV #RdDir,@R3; Ask the controller
422 +16$: TSTB @R3; to read into its memory
423 + BPL 16$; table of contents entry
418 418  
419 419   MOV @RdBuf,(R3)+;
420 - MOV DIRREC,R2; И перенесем ее к себе в
421 - MOV #11.,R1; область памяти, указатель
422 -17$: MOV @R3,(R2)+; на которую лежит в ячейке
426 + MOV DIRREC,R2; And transfer it to itself in
427 + MOV #11.,R1; memory area, pointer
428 +17$: MOV @R3,(R2)+; to which lies in cell
423 423   SOB R1,17$; DIRREC.
424 424  
425 425  ;......................................
... ... @@ -426,96 +426,97 @@
426 426  {{/code}}
427 427  
428 428  
429 -== **014: Размонтировать диск** ==
435 +== 014: Unmount disk ==
430 430  
431 -Код команды 014, чтобы размонтировать диск, следует сбросить контроллер, переслать в DR контроллера номер привода AZ, который следует размонтировать, и послать в CSR контроллера код 014, после чего дождаться окончания операции (она длительная) и проверить на ошибку. Ошибка выдается, если привод не был смонтирован.
432 -[[**//пример утилиты AZUMNT//**>>url:https://forum.maxiol.com/index.php?showtopic=5605&st=0&p=59418&#entry59418]]
437 +Command code 014, to unmount the disk, you should reset the controller, send the AZ drive number to the controller DR, which should be unmounted, and send the 014 code to the controller CSR, then wait for the operation to complete (it takes a long time) and check for an error. An error is issued if the drive has not been mounted.
438 +[[AZUMNT utility example>>url:https://forum.maxiol.com/index.php?showtopic=5605&st=0&p=59418&#entry59418]]
433 433  
434 434  
435 -== **015: Начать передачу считанного блока** ==
441 +== 015: Start transferring the read block ==
436 436  
437 -Код команды - 015. Получив эту команду, контроллер настраивается на пословную выдачу содержимого того самого встроенного буфера на 256 слов, которые будут выданы последовательно через регистр DR. Никаких ожиданий не требуется, просто пересылаем 256 раз слово из DR в последовательные ячейки памяти, и все. Если нужно меньше, чем 256 слов (последний укороченный блок файла), то остаток можно просто бросить, не считывая, сброс контроллера в начале следующей операции сбросит и этот остаток.
438 -\\Пример программы:
443 +The command code is 015. Having received this command, the controller is configured to output word by word the contents of the same built-in buffer for 256 words, which will be output sequentially through the DR register. No waiting is required, we simply send a word from DR to sequential memory cells 256 times, and that's it. If less than 256 words are needed (the last shortened block of the file), then the remainder can simply be discarded without reading, resetting the controller at the beginning of the next operation will also reset this remainder.
444 +\\Example program:
439 439  
440 440  {{code language="assembler"}}
441 441  ;..................................
442 -RdBuf=015; символическое наименование команды
448 +RdBuf=015; symbolic name of the command
443 443  
444 -; В R3 от предыдущего фрагмента остался адрес CSR
450 +; In R3 from the previous fragment there is the address of the CSR
445 445  ; (177220)
446 446  
447 -; Считаем, что у нас в R2 находится адрес первого слова
448 -; памяти, куда следует разместить прочитанный блок.
449 -; Программа получения этого адреса не приводится.
453 +; We assume that in R2 we have the address of the first word
454 +; of memory, where the read block should be placed.
455 +; The program for obtaining this address is not given.
450 450  
451 - MOV #400,R1; Готовим счетчик слов
457 + MOV #400,R1; Prepare the word counter
452 452   ; 0400 oct = 256 dec
453 453  
454 - MOV #RdBuf,(R3)+; и пересылаем команду
455 -; RdBuf в CSR. Адрес в R3 укажет на DR (177222).
460 + MOV #RdBuf,(R3)+; and send the command
461 +; RdBuf to the CSR. The address in R3 will point to DR (177222).
456 456  
457 -3$: MOV @R3,(R2)+;перешлем очередное слово в
458 - ; память
459 - SOB R1,3$; и повторим это 256 (0400)
460 - ; раз
463 +3$: MOV @R3,(R2)+we will send the next word to
464 +; memory
465 + SOB R1,3$; and repeat this 256 (0400)
466 + ; times
461 461  ;..................................
462 462  {{/code}}
463 463  
464 -Всё, чтение закончено.
465 -\\Для записи наоборот, требуется сначала перенести весь блок данных из памяти ЦП в контроллер и потом выдать команду "Записать содержимое буфера на диск"
470 +That's it, reading is complete.
466 466  
472 +To write the opposite way, you first need to transfer the entire data block from the CPU memory to the controller and then issue the command "Write the contents of the buffer to disk"
467 467  
468 -== **016: Принять блок данных в буфер** ==
469 469  
470 -Код команды 016. Команда настраивает контроллер на прием блока данных и помещении его в буфер. Следующие 256 циклов записи в DR поместят данные, переданные через МПИ, в буфер.
471 -\\Пример программы.
475 +== 016: Receive data block into buffer ==
472 472  
477 +Command code 016. The command sets the controller to receive a block of data and place it in the buffer. The next 256 write cycles to DR will place the data transferred via the QBUS in the buffer.
478 +\\Example program:
479 +
473 473  {{code language="assembler"}}
474 474  ;..................................
475 475  
476 -WrBuf=016; Символическое наименование команды
483 +WrBuf=016; Symbolic name of the command
477 477  
478 -; Перед записью нужно выполнить те же действия, что и в
479 -; пп. 3.1.-3.3. Обычно, это одна и та же программа,
480 -; просто после пункта 3.3. выполняется проверка "Что
481 -; требуется: чтение или запись?" и разветвление на
482 -; программу чтения или записи.
485 +; Before writing, you need to perform the same actions as in
486 +; pp. 3.1.-3.3. Usually, this is the same program,
487 +; just after point 3.3. a check is performed "What
488 +; is required: reading or writing?" and a branch is made to the
489 +; reading or writing program.
483 483  
484 -; После фрагмента в п. 3.3. в R3 остался адрес CSR
485 -; (177220). Будем считать, что в R2 находится адрес в
486 -; памяти ЦП, где находится блок, подлежащий записи.
487 -; Программа получения этого адреса не показана.
491 +; After the fragment in point 3.3., the CSR address
492 +; (177220) remains in R3. We will assume that R2 contains the address in the CPU
493 +; memory where the block to be written is located.
494 +; The program for obtaining this address is not shown.
488 488  
489 - MOV #400,R1; Готовим счетчик
496 + MOV #400,R1; Preparing the counter
490 490  
491 - MOV #WrBuf,(R3)+; Перешлем команду в CSR и
492 - ; переключим адрес в R3 на
493 - ; DR
498 + MOV #WrBuf,(R3)+; Let's forward the command to the CSR and
499 +; switch the address in R3 to
500 +; DR
494 494  
495 -4$: MOV (R2)+,@R3; Перешлем очередное слово
496 - ; данных
497 - SOB R1,4$; и повторим это 256 раз
502 +4$: MOV (R2)+,@R3; Let's forward the next word
503 +; data
504 + SOB R1,4$; and repeat this 256 times
498 498  ;..................................
499 499  {{/code}}
500 500  
501 -== **017: Получить размер псевдодиска, большой** ==
508 +== 017: Get ramdisk size, large ==
502 502  
503 -Есть две команды получения размера псевдодиска, т.е. смонтированного на выбранный псевдопривод AZn файл-образа.
504 -\\Если используемая ОС (или программа, работающая с дисками без ОС) умеет работать с большими (больше 32М) дисками, следует пользоваться командой с кодом 017. Последовательность действий: сбросить контроллер (п. 3.1), выбрать накопитель (п. 3.2) и переслать в CSR код 017, а затем, без каких-либо ожиданий, считать из DR сначала младшее, и следом за ним старшее слово размера выбранного накопителя (файл-образа).
505 -\\Если используемая ОС не умеет работать с дисками бОльшими, чем 32М (RT-11), следует пользоваться командой 007 - получить размер псевдодиска с ограничением до 32М. Действия похожие: сбрасываем контроллер, выбираем диск, посылаем в CSR код [[007>>doc:||anchor="H007:41F43E43B44344743844244C44043043743C43544043F44143543243443E43443844143A430"]] и считываем из DR одно слово размера псевдодиска. Если размер файл-образа, смонтированного на выбранный псевдопривод, больше 65534 блоков, вместо этого "большого" размера, контроллер возвращает число 65534. Напоминаем, что число 65535 кое-где используется в специальных целях и не может быть размером диска.
506 -\\Также напоминаем, что если на этот накопитель не смонтирован файл-образ, последовательность действий не пройдет (команда 001 выбор устройства) и исполнение программы до этого места просто не дойдет. Поэтому ошибок у этих команд не предусмотрено.
507 -\\Пример программы с большими дисками
510 +There are two commands to get the size of a pseudo-disk, i.e. the AZn file-image mounted on the selected pseudo-drive.
511 +\\If the OS being used (or a program working with disks without an OS) can work with large (more than 32M) disks, you should use the command with the code 017. The sequence of actions: reset the controller (p. 3.1), select the drive (p. 3.2) and send the code 017 to the CSR, and then, without any waiting, read from DR first the lower word, and then the higher word of the size of the selected drive (image file).
512 +\\If the OS you are using cannot work with disks larger than 32M (RT-11), you should use the 007 command - get the pseudo-disk size with a limit of up to 32M. The steps are similar: reset the controller, select the disk, send the 007 code to the CSR and read one word of the pseudo-disk size from DR. If the size of the image file mounted on the selected pseudo-drive is larger than 65534 blocks, the controller returns the number 65534 instead of this "large" size. We remind you that the number 65535 is used in some places for special purposes and cannot be the disk size.
513 +\\We also remind you that if the image file is not mounted on this drive, the sequence of actions will not work (command 001 select device) and the program execution will simply not reach this point. Therefore, these commands do not provide for errors.
514 +\\Example of a program with large disks
508 508  
509 509  {{code language="assembler"}}
510 510  ;......................................
511 511  
512 -GetBig=017; Получить "большой" размер диска
519 +GetBig=017; Get the "big" disk size
513 513  
514 -; От фрагмента 3.2 (выбор диска) у нас в R3 остался
515 -; адрес DR (177222)
521 +; From fragment 3.2 (disk selection) we have in R3
522 +; DR address (177222)
516 516  
517 - MOV #GetBig,-(R3); пошлем команду
518 - TST (R3)+; вернем адрес в R3 назад, на DR
524 + MOV #GetBig,-(R3); send the command
525 + TST (R3)+; return the address in R3 back to DR
519 519   MOV @R3,BigSiz
520 520   MOV @R3,BigSiz+2
521 521  ;......................................
... ... @@ -522,27 +522,26 @@
522 522  {{/code}}
523 523  
524 524  
525 -== **020: Получить расширенный код диагностики** ==
532 +== 020: Get extended diagnostic code ==
526 526  
527 -Код команды 020, после сброса контроллера следует выдать эту команду в CSR и затем прочитать два слова расширенной диагностики из DR. Команда мгновенная, ожидание не требуется.
534 +Command code 020, after resetting the controller, you should issue this command in the CSR and then read two words of extended diagnostics from DR. The command is instant, no waiting is required.
528 528  
529 529  
530 -== **027: Получить версию firmware AZ STM32** ==
537 +== 027: Get firmware version AZ STM32 ==
531 531  
532 -Код команды 027, возвращает 2 слова
533 -\\первое слово - 06404 = старший байт 13. это версия прошивки, младший байт 4. это версия железа - те AZБК в данном случае
534 -второе слово - 037 = это максимальный монтируемый диск - 31.
539 +Command code 027, returns 2 words
540 +\\first word - 06404 = high byte 13. this is the firmware version, low byte 4. this is the hardware version - i.e. AZБК in this case second word - 037 = this is the maximum mountable disk - 31.
535 535  
536 536  
537 537  {{code language="assembler"}}
538 538  ;-------------------------------------------------------------
539 -; получение версии прошивки STM32 - результат в R1 R1=0 ошибка
545 +; getting STM32 firmware version - result in R1 R1=0 error
540 540  GTSTMV: MOV #AZ$CSR,R1
541 -1$: CLR (R1) ; Пошлем команду "Сброс"
542 - TSTB (R1) ; Проверим готовность контроллера
543 - BPL 1$ ; Если не готов, сбрасываем еще
547 +1$: CLR (R1) ; Send "Reset" command
548 + TSTB (R1) ;Check controller readinessконтроллера
549 + BPL 1$ ; If not ready, reset again
544 544   mov #27,(R1)
545 - TST (R1)+ ; Проверяем на ошибку
551 + TST (R1)+ ; Check for error
546 546   BMI 2$
547 547   mov (R1),R1
548 548   return
... ... @@ -552,45 +552,45 @@
552 552  {{/code}}
553 553  
554 554  
555 -== **030:  Нет операции** ==
561 +== 030: No operation ==
556 556  
557 -Основное назначение этой команды - устанавливать бит разрешения прерываний от контроллера. Команда передает бит разрешения прерывания, который находится с ней в одном слове, но не входит в ее состав (напоминаем, команда располагается в битах D0 - D5, а бит разрешения прерываний - D6), в соответствующий триггер контроллера и больше никак не влияет на процессы в контроллере. Управление этим триггером работает даже в состоянии "Думаю, прошу не мешать", и это главная особенность команды "нет операции".
558 -\\Команда имеет код 0030. Посылка в CSR кода 0130 разрешит прерывания от контроллера, посылка кода 0030 запретит их. Пример не приводится вследствие тривиальности его.
563 +The main purpose of this command is to set the interrupt enable bit from the controller. The command transfers the interrupt enable bit, which is in the same word with it, but is not part of it (remember, the command is located in bits D0 - D5, and the interrupt enable bit is D6), to the corresponding trigger of the controller and does not affect the processes in the controller in any other way. Control of this trigger works even in the "Thinking, please do not interfere" state, and this is the main feature of the "no operation" command.
564 +\\The command has the code 0030. Sending the code 0130 to the CSR will enable interrupts from the controller, sending the code 0030 will disable them. An example is not given due to its triviality.
559 559  
560 560  
561 -= **Блок команд работы с энергонезависимой памятью** =
567 += Command block for working with non-volatile memory =
562 562  
563 -Интерфейс предоставляет любому AZ-контроллеру доступ к 255 словам энергонезависимой памяти, все команды устанавливают бит готовности по завершению. Это позволяет сохранять пользовательские настройки в энергонезависимой памяти, к примеру это используется в AZБК - там сохраняются настройки для более комфортной работы контроллера.
569 +The interface provides any AZ controller with access to 255 words of non-volatile memory, all commands set the ready bit upon completion. This allows you to save user settings in non-volatile memory, for example, this is used in AZBK ??- there are saved settings for more comfortable operation of the controller.
564 564  
565 -Все команды этого блока используют буфер энергонезависимой памяти для своей работы.
571 +All commands in this block use a non-volatile memory buffer for their operation.
566 566  
567 -== **021: Cчитать блок энергонезависимой памяти в буфер** ==
573 +== 021: Read non-volatile memory block into buffer ==
568 568  
569 569  (% class="wikigeneratedid" %)
570 -Код команды 021, данная команда вызывает чтение блока энергонезависимой памяти в буфер энергонезависимой памяти.
576 +Command code 021, this command causes a block of non-volatile memory to be read into the non-volatile memory buffer.
571 571  
572 572  
573 -== **022: Отдать на шину считанный блок энергонезависимой памяти из буфера** ==
579 +== 022: Transfer the read block of non-volatile memory from the buffer to the bus ==
574 574  
575 575  (% class="wikigeneratedid" %)
576 -Код команды 022, данная команда обеспечивает передачу буфера энергонезависимой памяти в регистр DR для считывания.
582 +Command code 022, this command ensures that the non-volatile memory buffer is transferred to the DR register for reading.
577 577  
578 578  (% class="wikigeneratedid" %)
579 -Пример программы
585 +Example program
580 580  
581 581  {{code language="assembler"}}
582 -AZ$CSR = 177220; регистр команд и состояния (CSR)
583 -AZ$DR = 177222; регистр данных (DR)
588 +AZ$CSR = 177220; command and status register (CSR)
589 +AZ$DR = 177222; data register (DR)
584 584  
585 585  
586 -; trap 50 - cброс AZ
592 +; trap 50 - reset AZ
587 587  ; результат в R1 =0 ok
588 588  AZreset: MOV #AZ$CSR,R1
589 -1$: CLR (R1); Пошлем команду "Сброс"
590 - TSTB (R1); Проверим готовность контроллера
591 - BPL 1$; Если не готов, сбрасываем еще
592 - ; раз и проверяем снова
593 - TST (R1); Проверим на ошибку,
595 +1$: CLR (R1); Send the "Reset" command
596 + TSTB (R1); Check the controller readiness
597 + BPL 1$; If not ready, reset again
598 +; once and check again
599 + TST (R1); Check for an error,
594 594   BMI 0ERR$
595 595   CLR R1
596 596   return
... ... @@ -599,30 +599,30 @@
599 599   return
600 600  
601 601  
602 -; trap 54 - чтение энергонезависимой памяти блока 1 EEPROM в буфер с адреса ADREEPROMMEM
603 -; результат R3 - адрес, если R3=0 ошибка
604 -; статус чтения в R1 0 - ok
605 -; 1 - размер не соответствует сохраненному
606 -; 2 - oшибка версии
607 -; 3 - oшибка контрольной суммы
608 +; trap 54 - reading non-volatile memory of block 1 EEPROM to the buffer from the address ADREEPROMMEM
609 +; result R3 - address, if R3=0 error
610 +; read status in R1 0 - ok
611 +; 1 - size does not match saved
612 +; 2 - version error
613 +; 3 - checksum error
608 608  ReadEEPROM: push R2
609 - call AZreset; сбросим
615 + call AZreset; reset
610 610   tst R1
611 611   bne 0ERR$
612 612  ; теперь читаем
613 613   MOV #AZ$CSR,R1
614 - mov #21,(R1); считать блок 1 энергонезависимой памяти в буфер
615 -0$: TSTB (R1); проверяем результат выполнения
616 - BPL 0$; ждем
617 - mov #22,(R1); отдать на шину считанный блок энергонезависимой памяти из буфера
618 -1$: TSTB (R1); проверяем результат выполнения
619 - BPL 1$; ждем
620 - TST (R1)+; инкрементируем
620 + mov #21,(R1); read block 1 of non-volatile memory into buffer
621 +0$: TSTB (R1); check execution result
622 + BPL 0$; wait
623 + mov #22,(R1); send read block of non-volatile memory from buffer to bus
624 +1$: TSTB (R1); check execution result
625 + BPL 1$; wait
626 + TST (R1)+; increment
621 621   mov #ADREEPROMMEM,R3
622 - mov #256.,R2; читаем 256. слов; первое слово - результат чтения
623 -2$: mov (R1),(R3)+; читаем блок слов в память
628 + mov #256.,R2; read 256. words; first word is reading result
629 +2$: mov (R1),(R3)+; read block of words into memory
624 624   sob R2,2$
625 - mov #ADREEPROMMEM,R3; успешно
631 + mov #ADREEPROMMEM,R3; successful
626 626   mov (R3),R1
627 627   br 0END$
628 628  0ERR$: CLR R3
... ... @@ -630,41 +630,39 @@
630 630   return
631 631  {{/code}}
632 632  
633 -очевидно, после считывания памяти необходимо проверить код результата в первом слове - см расшифровку кодов ошибок
634 -\\Примеры возвращаемых данных по командам
635 -\\последовательная подача команды 021 и затем 022 позволит считать 256. слов
636 -из энергонезависимой памяти
637 -**Внимание! **первое слово это будет статус успешности чтения
638 -
639 +obviously, after reading the memory, it is necessary to check the result code in the first word - see the decoding of error codes
640 +\\Examples of returned data for commands
641 +\\sequentially issuing the command 021 and then 022 will allow reading 256 words from non-volatile memory
642 +Attention! The first word will be the reading success status
639 639  
640 640  * 0 - ok
641 -* 1 - размер не соответствует сохраненному
642 -* 2 - oшибка версии
643 -* 3 - oшибка контрольной суммы
645 +* 1 - size does not match saved
646 +* 2 - version error
647 +* 3 - checksum error
644 644  
645 -== **023: Принять с шины в буфер данные для последующей записи в буфер** ==
649 +== 023: Receive data from the bus into the buffer for subsequent writing into the buffer ==
646 646  
647 -Код команды 023, данная команда позволяет наполнить буфер энергонезависимой памяти
651 +Command code 023, this command allows you to fill the non-volatile memory buffer
648 648  
649 -== **024: Записать из буфера в блок энергонезависимой памяти** ==
653 +== 024: Write from buffer to non-volatile memory block ==
650 650  
651 -Код команды 024, данная команда вызывает запись блока энергонезависимой памяти из буфера энергонезависимой памяти.
655 +Command code 024, this command causes a non-volatile memory block to be written from the non-volatile memory buffer.
652 652  
653 -Пример программы
657 +Example program
654 654  
655 655  {{code language="assembler"}}
656 -AZ$CSR = 177220; регистр команд и состояния (CSR)
657 -AZ$DR = 177222; регистр данных (DR)
660 +AZ$CSR = 177220; Command and Status Register (CSR)
661 +AZ$DR = 177222; Data Register (DR)
658 658  
659 659  
660 -; trap 50 - cброс AZ
664 +; trap 50 - reset AZ
661 661  ; результат в R1 =0 ok
662 662  AZreset: MOV #AZ$CSR,R1
663 -1$: CLR (R1); Пошлем команду "Сброс"
664 - TSTB (R1); Проверим готовность контроллера
665 - BPL 1$; Если не готов, сбрасываем еще
666 - ; раз и проверяем снова
667 - TST (R1); Проверим на ошибку,
667 +1$: CLR (R1); Send the "Reset" command
668 + TSTB (R1); Check the controller readiness
669 + BPL 1$; If not ready, reset again
670 +; once and check again
671 + TST (R1); Check for an error,
668 668   BMI 0ERR$
669 669   CLR R1
670 670   return
... ... @@ -672,27 +672,27 @@
672 672   COM R1
673 673   return
674 674  
675 -; trap 55 - запись энергонезависимой памяти из буфера с адреса ADREEPROMMEM в блок 1 EEPROM
679 +; trap 55 - write non-volatile memory from the buffer at address ADREEPROMMEM в блок 1 EEPROM
676 676  WriteEEPROM: push R1
677 677   push R2
678 678   push R3
679 - call AZreset; сбросим
683 + call AZreset; reset
680 680   tst R1
681 681   bne 0ERR$
682 682  
683 683   MOV #AZ$CSR,R1
684 - mov #23,(R1); командуем что будем писать данные в буфер
685 -0$: TSTB (R1); проверяем результат выполнения
686 - BPL 0$; ждем
687 - TST (R1)+; инкрементируем
688 + mov #23,(R1);command that we will write data to the buffer
689 +0$: TSTB (R1); check the result of executio
690 + BPL 0$; wait
691 + TST (R1)+; increment
688 688   mov #ADREEPROMMEM+2,R3
689 - mov #255.,R2; пишем 255. слов; первое слово пропускаем - результат чтения
690 -1$: mov (R3)+,(R1); отдаем в контроллер
693 + mov #255.,R2; write 255. words; skip the first word - the result of reading
694 +1$: mov (R3)+,(R1); send to the controller
691 691   sob R2,1$
692 - tst -(R1); декрементируем
693 - mov #24,(R1); записать из буфера в блок 1 энергонезависимой памяти
694 -2$: TSTB (R1); проверяем результат выполнения
695 - BPL 2$; ждем
696 + tst -(R1); decrement
697 + mov #24,(R1); write from the buffer to block 1 of non-volatile memory
698 +2$: TSTB (R1); check the result of execution
699 + BPL 2$; we are waiting
696 696   br 0END$
697 697  0ERR$: CLR R3
698 698  0END$: pop R3
... ... @@ -701,23 +701,21 @@
701 701   return
702 702  {{/code}}
703 703  
704 -**Обращаю внимание**, при записи, буфер идет сразу с данными, те нет первого слова со статусом.
708 +**Please note** that when recording, the buffer immediately comes with the data, i.e. there is no first word with the statu
705 705  
706 706  
707 707  
708 -= Блок команд для работы с RTC и NTP =
712 += Block of commands for working with RTC and NTP =
709 709  
710 -В контроллере AZ®  есть 2 источника получения даты-времени, первый это RTC встроенный в STM32, второй это часы в стеке TCP/IP.  Часы RTC работают автономно при наличии установленной батарейки 2032. Часы в стеке TCP/IP устанавливаются на основании данных с NTP-сервера.
714 +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.
711 711  
712 712  
713 -== Формат буфера timestamp (доступен по чтению) ==
717 +== Buffer format timestamp (readable) ==
714 714  
715 -API контроллера сразу готовит время в нескольких форматах, дабы его было удобно применить на стороне PDP-11
719 +The controller API immediately prepares time in several formats, so that it can be conveniently used on the PDP-11 side
716 716  
717 717  {{info}}
718 -формат буфера даты-времени
719 -offset в восьмеричной системе - те слова
720 -формат буфера даты-времени
722 +datetime buffer format octal offset - those words datetime buffer format
721 721  \\[0]=rtc_rt11date();
722 722  [2]=rt11 time 50Hz big word;
723 723  [4]=rt11 time 50Hz little word;
... ... @@ -735,72 +735,72 @@
735 735  {{/info}}
736 736  
737 737  
738 -== Формат буфера SimpleIN (при записи) ==
740 +== SimpleIN buffer format (when writing) ==
739 739  
740 -формат максимально упрощен, для работы со стороны PDP-11
742 +the format is simplified as much as possible, for work with PDP-11
741 741  
742 742  {{info}}
743 -offset в восьмеричной системе - те слова
745 +offset in octal - those words
744 744  
745 -[0]=year       год, младшие две цифры - те 22 а не 2022(!)
746 -[2]=month;     месяц
747 -[4]=day;       день
748 -[6]=wday;      день недели =0 не установлен, 1- понедельник 2 - вторник итд
749 -[10]=hour;     час
750 -[12]=min;      минута
751 -[14]=sec;      секунда
747 +[0]=year, the lower two digits are 22 and not 2022(!)
748 +[2]=month; month
749 +[4]=day; day
750 +[6]=wday; day of the week =0 not set, 1 - Monday 2 - Tuesday etc.
751 +[10]=hour; hour
752 +[12]=min; minute
753 +[14]=sec; second
752 752  {{/info}}
753 753  
754 754  
755 -== **031:  Получить время из RTC в буфер timestamp** ==
757 +== 031: Get time from RTC to timestamp buffer ==
756 756  
757 -Код команды 031, данная команда использует RTC часы как источник заполнения буфера timestamp
759 +Command code 031, this command uses RTC clock as a source of filling the timestamp buffer
758 758  
759 -Пример программы:
761 +Example program:
760 760  
761 761  {{code language="assembler"}}
762 -; trap 61 - чтение данных часов из автономных часов RTC
763 -; R3 - адрес буфера куда надо считать
764 -; результат в R3 адрес, если успешно. R3=0 если ошибка
764 +; trap 61 - reading clock data from autonomous RTC clock
765 +; R3 - buffer address where to read
766 +; result in R3 address if successful. R3=0 if error
765 765  GetDateFromRTC: push R0
766 766   push R1
767 767   push R2
768 - call AZreset; сбросим
770 + call AZreset; reset
769 769   tst R1
770 770   bne G60ERR
771 771   MOV #AZ$CSR,R1
772 772   mov #31,(R1)
773 - br G60; идем туда тк дальше код одинаковый
775 + br G60; let's go there because further code is the same
774 774  {{/code}}
775 775  
776 -== **032:  Получить время из буфера timestamp** ==
778 +== 032: Get time from timestamp buffer ==
777 777  
778 -Код команды 032, данная команда отдает на шину содержимое буфера timestamp
780 +Command code 032, this command sends the contents of the timestamp buffer to the bus
779 779  
780 780  {{code language="assembler"}}
781 -; работа с часами
782 -; trap 60 - чтение данных часов из TCP/IP стека
783 -; R3 - адрес буфера куда надо считать
784 -; результат в R3 адрес, если успешно. R3=0 если ошибка
783 +; working with clock
784 +; trap 60 - reading clock data from TCP/IP stack
785 +; R3 - buffer address where to read
786 +; result in R3 address if successful. R3=0 if error
785 785  GetDateFromLAN: push R0
786 786   push R1
787 787   push R2
788 - call AZreset; сбросим
790 + call AZreset; reset
789 789   tst R1
790 790   bne G60ERR
791 791   MOV #AZ$CSR,R1
792 792   mov #42,(R1)
793 -G60: TSTB (R1); проверяем результат выполнения
794 - BPL G60; ждем
795 +G60: TSTB (R1); check execution result
796 + BPL G60; wait
795 795   mov #32,(R1)
796 -1$: TSTB (R1); проверяем результат выполнения
798 +1$: TSTB (R1); check execution result
797 797   BPL 1$; ждем
798 - TST (R1)+; инкрементируем
799 - mov R3,R0; запомним R3 - адрес
800 - mov #10.,R2; читаем 10 слов
801 -2$: mov (R1),(R3)+; читаем блок слов в память
800 + TST (R1)+; increment
801 + mov R3,R0; remember R3 address
802 + mov #10.,R2; read 10 words
803 +2$: mov (R1),(R3)+; read block of words into memory
802 802   sob R2,2$
803 - mov R0,R3; успешно, вернем адрес в R3
805 + mov R0,R3; successful, return address to R3
804 804   br 0END$
805 805  G60ERR: CLR R3
806 806  0END$: pop R2
... ... @@ -809,11 +809,11 @@
809 809   return
810 810  {{/code}}
811 811  
812 -Стоит проверить корректность полученного времени:
814 +It is worth checking the correctness of the received time:
813 813  
814 814  {{code language="assembler"}}
815 -; trap 63 - проверка корректности времени
816 -; R3 - адрес буфера, результат в R3, если адрес буфера то OK, =0 ошибка
817 +; trap 63 - check time correctness
818 +; R3 - buffer address, result in R3, if buffer address then OK, =0 error
817 817  CheckDateTime: Cmp 6(r3),#2021.
818 818   Blos 1err
819 819   Cmp 6(r3),#2100.
... ... @@ -823,119 +823,119 @@
823 823   return
824 824  {{/code}}
825 825  
826 -== **033:  Запись времени-даты в буфер SimpleIN** ==
828 +== 033: Write time-date to SimpleIN buffer ==
827 827  
828 -Код команды 033, данная команда  принимает с шины данные в буфер SimpleIN
830 +Command code 033, this command receives data from the bus into the SimpleIN buffer
829 829  
830 -Работа данной команды аналогична работе команд [[023>>doc:||anchor="H023:41F44043843D44F44244C44144843843D44B43243144344443544043443043D43D44B43543443B44F43F43E44143B43543444344E44943543943743043F438441438432431443444435440"]] и [[016>>doc:||anchor="H016:A041F44043843D44F44244C43143B43E43A43443043D43D44B445432431443444435440"]].
832 +The operation of this command is similar to the operation of commands 023 and 016.
831 831  
832 -== **034:  Установка RTC на основании данных из буфера** ==
834 +== 034: Set RTC based on buffer data ==
833 833  
834 -Код команды 034, данная команда  устанавливает RTC на основании данных в буфере SimpleIN
836 +Command code 034, this command sets the RTC based on the data in the SimpleIN buffer
835 835  
836 -Данная команда выполняется быстро, но для исключения проблем цикл ожидания выполнения рекомендуется.
838 +This command executes quickly, but to avoid problems, a wait loop is recommended.
837 837  
838 -== **035:  Стимуляция запроса времени с NTP сервера, установка на основании ответа** ==
840 +== 035: Stimulate time request from NTP server, set based on response ==
839 839  
840 -Код команды 035, данная команда отправляет запрос на NTP cервер (установленный в AZ.INI файле или полученный от DHCP) и устанавливает часы в стеке TCP/IP.
842 +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.
841 841  
842 -Пример программы: отсылка запроса на установку времени с NTP сервера
844 +Example program: sending a request to set the time from an NTP server
843 843  
844 844  {{code language="assembler"}}
845 -; trap 62 - отсылка запроса на установку времени с NTP сервера
847 +; trap 62 - sending a request to set the time from the NTP server
846 846  GetDateNTPtoNET:push R1
847 - call AZreset; сбросим
849 + call AZreset; reset
848 848   tst R1
849 849   bne 0ERR$
850 850   MOV #AZ$CSR,R1
851 851   mov #35,(R1)
852 -0$: TSTB (R1); проверяем результат выполнения
853 - BPL 0$; ждем
854 +0$: TSTB (R1); check the result of execution
855 + BPL 0$; wait
854 854  0ERR$: pop R1
855 855   return
856 856  {{/code}}
857 857  
858 -Выполнение команды занимает 1-2 секунды в среднем. Данная команда требует работы стека TCP/IP, соответственно нужны циклы ожидания при включенном стеке.
860 +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.
859 859  
860 -Пример цикла опроса с целью получить время с сети
862 +An example of a polling cycle to get time from the network
861 861  
862 862  {{code language="assembler"}}
863 -; дата-время
865 +; date-time
864 864   mov #S_DateTime_0,R3; "Lan Date:"
865 865   trap 10
866 - mov #20,R4; количество циклов ожидания
867 -$datry: trap 62; отослали запрос к NTP серверу
868 - mov #110,@#AZ$CSR; включим сеть
869 - trap 47; ожидание
870 - trap 47; ожидание
868 + mov #20,R4; number of wait cycles
869 +$datry: trap 62; sent a request to the NTP server
870 + mov #110,@#AZ$CSR; enable the network
871 + trap 47; waiting
872 + trap 47; waiting
871 871   mov #ADRTMPSTR,R3
872 - trap 60; считали в буфер дату-время
873 - trap 63; проверили дату-время
874 + trap 60; read the date-time into the buffer
875 + trap 63; checked the date-time
874 874   tst R3
875 875   bne $ok
876 876  $sob: sob R4,$datry
877 - mov #S_DateTime_2,R3; печать ошибки
879 + mov #S_DateTime_2,R3; print error
878 878   trap 7
879 879   br $go
880 880  
881 881  $ok: mov #ADRTMPSTR,R3
882 - trap 24; печать даты
883 - trap 25; времени
884 -$go: mov #110,@#AZ$CSR; включим сеть
884 + trap 24; print date
885 + trap 25; time
886 +$go: mov #110,@#AZ$CSR; let's turn on the network
885 885  {{/code}}
886 886  
887 -Тут мы явно отсылаем запрос к NTP серверу, затем включаем работу сети и ждем результата, периодически опрашивая и проверяя корректность результата.
889 +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.
888 888  
889 -== **036:  Установка RTC на основании часов TCP/IP стека** ==
891 +== 036: Setting RTC based on TCP/IP stack clock ==
890 890  
891 -Код команды 036,  данная команда устанавливает RTC на основании часов в TCP/IP стека. Предварительно надо установить часы в TCP/IP - команда 036.
893 +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.
892 892  
893 -Пример программы:
895 +Example program:
894 894  
895 895  {{code language="assembler"}}
896 -; trap 64 - установка времени RTC на основании времени стека
897 -; R1 - результат R1=0 - OK
898 -SetDateNETtoRTC:call AZreset; сбросим
898 +; trap 64 - set RTC time based on stack time
899 +; R1 - result R1=0 - OK
900 +SetDateNETtoRTC:call AZreset; reset
899 899   tst R1
900 900   bne 0ERR$
901 901   MOV #AZ$CSR,R1
902 902   mov #36,(R1)
903 -0$: TSTB (R1); проверяем результат выполнения
904 - BPL 0$; ждем
905 +0$: TSTB (R1); check execution result
906 + BPL 0$; wait
905 905   clr R1
906 906  0ERR$: return
907 907  {{/code}}
908 908  
909 -== **042:  Получить время из часов TCP/IP стека в буфер timestamp** ==
911 +== 042: Get time from TCP/IP stack clock into timestamp buffer ==
910 910  
911 -Код команды 042,   данная команда использует часы TCP/IP стека как источник заполнения буфера timestamp.
913 +Command code 042, this command uses the TCP/IP stack clock as a source for filling the timestamp buffer.
912 912  
913 -Пример программы:
915 +Example program:
914 914  
915 915  {{code language="assembler"}}
916 -; работа с часами
917 -; trap 60 - чтение данных часов из TCP/IP стека
918 -; R3 - адрес буфера куда надо считать
919 -; результат в R3 адрес, если успешно. R3=0 если ошибка
918 +; working with clock
919 +; trap 60 - reading clock data from TCP/IP stack
920 +; R3 - buffer address where to read
921 +; result in R3 address if successful. R3=0 if error
920 920  GetDateFromLAN: push R0
921 921   push R1
922 922   push R2
923 - call AZreset; сбросим
925 + call AZreset; reset
924 924   tst R1
925 925   bne G60ERR
926 926   MOV #AZ$CSR,R1
927 927   mov #42,(R1)
928 -G60: TSTB (R1); проверяем результат выполнения
929 - BPL G60; ждем
930 +G60: TSTB (R1); check execution result
931 + BPL G60; wait
930 930   mov #32,(R1)
931 -1$: TSTB (R1); проверяем результат выполнения
932 - BPL 1$; ждем
933 - TST (R1)+; инкрементируем
934 - mov R3,R0; запомним R3 - адрес
933 +1$: TSTB (R1); check execution result
934 + BPL 1$; wait
935 + TST (R1)+; increment
936 + mov R3,R0; remember R3 address
935 935   mov #10.,R2; читаем 10 слов
936 -2$: mov (R1),(R3)+; читаем блок слов в память
938 +2$: mov (R1),(R3)+; read block of words into memory
937 937   sob R2,2$
938 - mov R0,R3; успешно, вернем адрес в R3
940 + mov R0,R3; successful, return address to R3
939 939   br 0END$
940 940  G60ERR: CLR R3
941 941  0END$: pop R2
... ... @@ -944,52 +944,50 @@
944 944   return
945 945  {{/code}}
946 946  
947 -все команды устанавливают бит готовности по завершению.
949 +All commands set the ready bit upon completion.
948 948  
949 949  
950 -= **Команды специфические для [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]]** =
952 += **[[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] **specific commands =
951 951  
952 -Данные команды предназначены для работы контроллера AZБК®, разработанного для серии компьютеров БК - БК-0010/БК-0010.01/БК-0011М.
954 +These commands are intended for operation of the AZБК® controller, developed for the BK series of computers - BK-0010/BK-0010.01/BK-0011M.
953 953  
954 -Другие контроллеры AZ® игнорируют эти команды
956 +Other AZ® controllers ignore these commands.
955 955  
956 -== **037: перезапуск контроллера [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] и всей БК** ==
958 +== 037: Restart of the** [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] **controller and the entire computer ==
957 957  
958 -Код команды 037,  данная команда осуществляет перезапуск микроконтроллера AZ®, что вызывает и перезапуск самой БК-0010/БК-0010.01/БК-0011М
960 +Command code 037, this command restarts the AZ® microcontroller, which also causes a restart of the BK-0010/BK-0010.01/BK-0011M itself
959 959  
960 -Пример программы
962 +Example program
961 961  
962 962  {{code language="assembler"}}
963 -AZ$CSR = 177220; регистр команд и состояния (CSR)
964 -AZ$DR = 177222; регистр данных (DR)
965 +AZ$CSR = 177220; command and status register (CSR)
966 +AZ$DR = 177222; data register (DR)
965 965  
966 966  
967 -; trap 57 - перезапуск БК полный
968 -AZcouldReboot: call AZreset; сбросим AZ дабы он был готов принимать команды
969 +; trap 57 - full restart
970 +AZcouldReboot: call AZreset; reset AZ so it is ready to receive
969 969   mov #037,@#AZ$CSR
970 970   return
971 971  {{/code}}
972 972  
973 -== **044: Cохранение скриншота в файл** ==
975 +== 044: Saving a screenshot to a file ==
974 974  
975 -Код команды 044,  данная команда предназначена для снятия образа памяти указанного размера (или определенного автоматически на основании сохраненных параметров)
976 -технически команда может служить как средство отладки ибо способная снимать образ памяти
977 -общее ограничение на снятие образа памяти - 2МБ на один образ
978 -\\в качестве параметров используется служебная страница памяти 76(8)
977 +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
978 +\\service memory page 76(8) is used as parameters
979 979  
980 -Структура заполнения информации о скриншоте
980 +Structure of filling information about a screenshot
981 981  
982 982  {{code language="c"}}
983 -// структура хидера скриншота
983 +// screenshot header structure
984 984  typedef __packed struct screen_header
985 985  {
986 - unsigned short int tag; // должен быть равен 0240
986 + unsigned short int tag; // must be equal to 0240
987 987  
988 - unsigned int begin_adress; // начальный адрес в словах - прямая задача в физических адресах
989 - unsigned int length; // длина в словах - прямая задача в физических адресах
988 + unsigned int begin_adress; // start address in words - forward task in physical addresses
989 + unsigned int length; // length in words - forward task in physical addresses
990 990  
991 - unsigned short int begin_page; // начальная страница - номер - прямая задача в номерах страниц
992 - unsigned short int len_pages; // количество страниц - прямая задача в номерах страниц
991 + unsigned short int begin_page; // start page - number - forward task in page numbers
992 + unsigned short int len_pages; // number of pages - forward task in page numbers
993 993  
994 994   unsigned short int R177300; //
995 995   unsigned short int R177302; //
... ... @@ -1007,57 +1007,55 @@
1007 1007   unsigned short int R177332; //
1008 1008   unsigned short int R177334; //
1009 1009   unsigned short int R177336; //
1010 - unsigned short int R177340; // - Регистр управления активацией окно - маски окон
1011 - unsigned short int R177342; // - Регистр управления r/o на окно
1012 - unsigned short int R177344; // - Регистр управления shadow окон - маски окон
1013 - unsigned short int R177346; // - Регистр управления маппером
1014 - unsigned short int R177350; // - регистр копия по записи 177130 в режиме записи управления памятью в SMK
1015 - unsigned short int R177352; // - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
1010 + unsigned short int R177340; // - Window activation control register - window masks
1011 + unsigned short int R177342; // - Control register r/o per window
1012 + unsigned short int R177344; // - Shadow window control register - window masks
1013 + unsigned short int R177346; // - Mapper control register
1014 + unsigned short int R177350; // - copy by record register 177130 in memory management write mode in SMK
1015 + unsigned short int R177352; // - copy by record register 177716 in memory management write mode in BK11M
1016 1016  
1017 - unsigned short int R177230; // - регистр управления
1018 - unsigned short int R177232; // - регистр номера страницы начала отображения - верхняя страница (слой 0)
1019 - unsigned short int R177240; // - регистр номера страницы начала отображения - средняя страница (слой 1)
1020 - unsigned short int R177242; // - регистр номера страницы начала отображения - нижняя страница (слой 2)
1021 - unsigned short int R177244; // - регистр вертикального скролинга слой 2
1022 - unsigned short int R177246; // - регистр вертикального скролинга слой 1
1023 - unsigned short int R177250; // - регистр вертикального скролинга слой 0
1024 - unsigned short int R177252; // - регистр гозизонтального скролинга слой 0
1025 - unsigned short int R177254; // - регистр гозизонтального скролинга слой 1
1026 - unsigned short int R177256; // - регистр гозизонтального скролинга слой 2
1017 + unsigned short int R177230; // - control register
1018 + unsigned short int R177232; // - display start page number register - upper page (layer 0)
1019 + unsigned short int R177240; // - display start page number register - upper page (layer 1)
1020 + unsigned short int R177242; // - display start page number register - upper page (layer 2)
1021 + unsigned short int R177244; // - vertical scroll register layer 2
1022 + unsigned short int R177246; // - vertical scroll register layer 1
1023 + unsigned short int R177250; // - vertical scroll register layer 0
1024 + unsigned short int R177252; // - horizontal scroll register layer 0
1025 + unsigned short int R177254; // - horizontal scroll register layer 1
1026 + unsigned short int R177256; // - horizontal scroll register layer 2
1027 1027  
1028 1028   unsigned short int paldata[338]; //
1029 1029  } screen_header_t;
1030 1030  {{/code}}
1031 1031  
1032 -Пример кода для заполнения страницы памяти
1032 +Example code for filling a memory page
1033 1033  
1034 1034  {{code language="assembler"}}
1035 1035  ;--------------------------------------------------
1036 -; карта 76й страницы - туда мы готовим данные для команды скринщотов
1037 - SCR_PAGE = 130000 ; 76ую страницу цепляем на место 77й временно - те в окно 130000
1038 - SCR_TAG = SCR_PAGE+0 ; тут вход - 240 - 1 слово
1039 - SCR_ADDR_CONF = SCR_TAG+2 ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
1040 - SCR_PAGE_CONF = SCR_ADDR_CONF+8. ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
1041 - SCR_MEM_CONF = SCR_PAGE_CONF+4. ; cюда конфигурацию памяти из регистров - 22 слова
1042 - SCR_VGA_CONF = SCR_MEM_CONF+44. ; сюда конфигурацию видеоконтроллера - 10 cлов
1043 - SCR_PAL = SCR_VGA_CONF+20. ; сюда 338. значений(слов) палитры 338 слов
1036 +; 76th page map - we prepare data for the screenshot command there
1037 +SCR_PAGE = 130000 ; we temporarily attach the 76th page to the 77th - that is, into the 130000 window
1038 +SCR_TAG = SCR_PAGE+0 ; here is the input - 240 - 1 word
1039 +SCR_ADDR_CONF = SCR_TAG+2 ; here is the command with addresses - address+length 24 bits - 4 words
1040 +SCR_PAGE_CONF = SCR_ADDR_CONF+8. ; here is the command with pages - the starting page and the number of pages - 2 words
1041 +SCR_MEM_CONF = SCR_PAGE_CONF+4. ; here is the memory configuration from the registers - 22 words
1042 +SCR_VGA_CONF = SCR_MEM_CONF+44. ; here video controller configuration - 10 words
1043 +SCR_PAL = SCR_VGA_CONF+20. ; here 338. values (words) of palette 338 words
1044 1044  ;--------------------------------------------------
1045 +; trap 41 - preparation of default information for screenshot functionality
1046 +PrepSRC: jsr R5, PUSHA ; batch saving of registers
1047 + mov @#177326,-(SP) ; save page 130k which was before the call
1048 + mov #76,@#177326 ; hook 76th page into window
1045 1045  
1046 -
1047 -; trap 41 - подготовка дефолтной информации для работы функционала скриншотов
1048 -PrepSRC: jsr R5, PUSHA ; пакетное сохранение регистров
1049 - mov @#177326,-(SP) ; сохраним страницу 130k которая была до вызова
1050 - mov #76,@#177326 ; цепляем 76ую страницу в окно
1051 -
1052 - mov #100377,R3 ; константа-заполнитель
1050 + mov #100377,R3 ; constant-filler
1053 1053   mov #SCR_PAGE,R4
1054 1054   mov #2047.,R2
1055 1055  4$: mov R3,(R4)+
1056 1056   sob R2,4$
1057 1057  
1058 - mov #240,@#SCR_TAG ; проставляем тег
1056 + mov #240,@#SCR_TAG ; put the tag
1059 1059  
1060 - ; чистим участок адресов - дефолтно автоматическое определение адресов
1058 + ; clean the address section - default is automatic address detection
1061 1061   clr R3
1062 1062   mov #SCR_ADDR_CONF,R4
1063 1063   mov #10,R2
... ... @@ -1064,7 +1064,7 @@
1064 1064  2$: mov R3,(R4)+
1065 1065   sob R2,2$
1066 1066  
1067 - ;конфигурация памяти - дефолтная
1065 + ; memory configuration - default
1068 1068   mov #SCR_MEM_CONF,R4
1069 1069   mov #30,(R4)+ ;177300
1070 1070   mov #31,(R4)+ ;177302
... ... @@ -1083,29 +1083,29 @@
1083 1083   mov #110,(R4)+ ;177334
1084 1084   mov #100,(R4)+ ;177336
1085 1085  
1086 - mov #170000,(R4)+ ;177340 - Регистр управления активацией окно - маски окон
1087 - mov R3,(R4)+ ;177342 - Регистр управления r/o на окно
1088 - mov #7777,(R4)+ ;177344 - Регистр управления shadow окон - маски окон
1089 - mov #40404,(R4)+ ;177346 - Регистр управления маппером
1090 - mov R3,(R4)+ ;177350 - регистр копия по записи 177130 в режиме записи управления памятью в SMK
1091 - mov #16000,(R4)+ ;177352 - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
1084 + mov #170000,(R4)+ ;177340
1085 + mov R3,(R4)+ ;177342
1086 + mov #7777,(R4)+ ;177344
1087 + mov #40404,(R4)+ ;177346
1088 + mov R3,(R4)+ ;177350
1089 + mov #16000,(R4)+ ;177352
1092 1092  
1093 - ;конфигурация видеоконтроллера - дефолтная
1091 + ;Video controller configuration - default
1094 1094   ; 177230-177256
1095 1095   mov #SCR_VGA_CONF,R4
1096 1096  
1097 - mov #12201,(R4)+ ;177230 - регистр управления
1098 - mov #4,(R4)+ ;177232 - регистр номера страницы начала отображения - верхняя страница (слой 0)
1099 - mov R3,(R4)+ ;177240 - регистр номера страницы начала отображения - средняя страница (слой 1) "под спрайты"
1100 - mov R3,(R4)+ ;177242 - регистр номера страницы начала отображения - нижняя страница (слой 2) "под фон"
1101 - mov R3,(R4)+ ;177244 - регистр вертикального скролинга слой 2
1102 - mov R3,(R4)+ ;177246 - регистр вертикального скролинга слой 1
1103 - mov R3,(R4)+ ;177250 - регистр вертикального скролинга слой 0
1104 - mov R3,(R4)+ ;177252 - регистр гозизонтального скролинга слой 0
1105 - mov R3,(R4)+ ;177254 - регистр гозизонтального скролинга слой 1
1106 - mov R3,(R4)+ ;177256 - регистр гозизонтального скролинга слой 2
1095 + mov #12201,(R4)+ ;177230
1096 + mov #4,(R4)+ ;177232
1097 + mov R3,(R4)+ ;177240
1098 + mov R3,(R4)+ ;177242
1099 + mov R3,(R4)+ ;177244
1100 + mov R3,(R4)+ ;177246
1101 + mov R3,(R4)+ ;177250
1102 + mov R3,(R4)+ ;177252
1103 + mov R3,(R4)+ ;177254
1104 + mov R3,(R4)+ ;177256
1107 1107  
1108 - ; закачиваем палитру - берем дефолтную из этой ПЗУшки
1106 + ; download the palette - take the default one from this ROM
1109 1109   mov #SCR_PAL,R4
1110 1110   mov #PalData,R2
1111 1111   mov #338.,R3
... ... @@ -1112,233 +1112,233 @@
1112 1112  1$: mov (R2)+,(R4)+
1113 1113   sob R3,1$
1114 1114  
1115 - mov (SP)+,@#177326; вернем страницу с которой был вызов
1113 + mov (SP)+,@#177326; return the page from which the call was made
1116 1116   return
1117 1117  {{/code}}
1118 1118  
1119 -Вариантов указания участков памяти три
1117 +There are three options for specifying memory areas.
1120 1120  
1121 -1. указать адрес и длину 24х битные - формат, если их нет - система смотрит дальше
1122 -1. указать номер страницы и количество страницы, если их нет
1123 -1. система смотрит дальше - те делает скриншот на основании данных о регистрах 177230 и т.д..
1119 +1. specify the address and length 24-bit - see format, if they are not there - the system looks further
1120 +1. specify the page number and page quantity, if they are not there
1121 +1. the system looks further - that is, it makes a screenshot based on the data about registers 177230, etc.
1124 1124  
1125 -Cкриншот сохраняется в формате
1126 -- страница 76 - ее первый килобайт
1127 -- сам образ памяти (если режим слоеный - то все три слоя)
1123 +The screenshot is saved in the format
1124 +- page 76 - its first kilobyte
1125 +- the memory image itself (if the mode is layered - then all three layers)
1128 1128  
1129 1129  
1130 -Перед вызовом команды можно загрузить имя файла для сохранения скриншота [в cmosmem буфер], однако при его отсутствии (в буфере не будет имени - строки заканчивающейся 0) система сформирует свое имя, на основании следующего правила:
1131 -дефолтный путь для сохранения скриншотов
1128 +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
1132 1132  0:/SCREENS/
1133 -формат имени - DDHHMISS.SCR
1134 -где DD - две цифры дня месяца, HH - час, MI - минута, SS-секунда
1135 -\\Если в процессе выполнения команды возникнет ошибка - вместо имени будет "ERROR *"
1136 -к примеру
1130 +name format - DDHHMISS.SCR
1131 +where DD is two digits of the day of the month, HH is the hour, MI is the minute, SS is the second
1132 +\\If an error occurs during the command execution, the name will be "ERROR *"
1133 +for example
1137 1137  "ERROR f_open 6"
1138 1138  
1139 1139  
1140 -Пример программы
1137 +Example program
1141 1141  
1142 1142  {{code language="assembler"}}
1143 -; обновим информацию в хидере скриншота
1140 +; update the information in the screenshot header
1144 1144  ;--------------------------------------------------
1145 -; карта 76й страницы - туда мы готовим данные для команды скринщотов
1146 - SPAGE = 170000 ; 76ую страницу цепляем на место 77й временно - те в окно 130000
1147 - STAG = SPAGE+0 ; тут вход - 240 - 1 слово
1148 - SADDRC = STAG+2 ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
1149 - SPAGEC = SADDRC+8. ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
1150 - SMEMC = SPAGEC+4. ; cюда конфигурацию памяти из регистров - 22 слова
1151 - SVGAC = SMEMC+44. ; сюда конфигурацию видеоконтроллера - 10 cлов
1152 - SPAL = SVGAC+20. ; сюда 338. значений(слов) палитры 338 слов
1142 +; 76th page map - we prepare data for the screenshot command there
1143 +SCR_PAGE = 130000 ; we temporarily attach the 76th page to the 77th - that is, into the 130000 window
1144 +SCR_TAG = SCR_PAGE+0 ; here is the input - 240 - 1 word
1145 +SCR_ADDR_CONF = SCR_TAG+2 ; here is the command with addresses - address+length 24 bits - 4 words
1146 +SCR_PAGE_CONF = SCR_ADDR_CONF+8. ; here is the command with pages - the starting page and the number of pages - 2 words
1147 +SCR_MEM_CONF = SCR_PAGE_CONF+4. ; here is the memory configuration from the registers - 22 words
1148 +SCR_VGA_CONF = SCR_MEM_CONF+44. ; here video controller configuration - 10 words
1149 +SCR_PAL = SCR_VGA_CONF+20. ; here 338. values (words) of palette 338 words
1153 1153  ;--------------------------------------------------
1151 + mov @#177326,R5 ; save page 130k which was before the call
1152 + mov #76,@#177336 ; hook the 76th page into the window
1154 1154  
1155 - mov @#177326,R5 ; сохраним страницу 130k которая была до вызова
1156 - mov #76,@#177336 ; цепляем 76ую страницу в окно
1157 -
1158 - ;конфигурация видеоконтроллера
1154 + ;video controller configuration
1159 1159   ; 177230-177256
1160 1160   mov #SVGAC,R4
1161 1161  
1162 - mov @#177230,(R4)+;177230 - регистр управления
1163 - mov @#177232,(R4)+;177232 - регистр - верхняя страница (слой 0)
1164 - mov @#177240,(R4)+;177240 - регистр - средняя страница (слой 1)
1165 - mov @#177242,(R4)+;177242 - регистр - нижняя страница (слой 2)
1166 - mov @#177244,(R4)+;177244 - регистр вертикального скролинга слой 2
1167 - mov @#177246,(R4)+;177246 - регистр вертикального скролинга слой 1
1168 - mov @#177250,(R4)+;177250 - регистр вертикального скролинга слой 0
1169 - mov @#177252,(R4)+;177252 - регистр гозизонтального скролинга слой 0
1170 - mov @#177254,(R4)+;177254 - регистр гозизонтального скролинга слой 1
1171 - mov @#177256,(R4)+;177256 - регистр гозизонтального скролинга слой 2
1158 + mov @#177230,(R4)+;177230 - control register
1159 + mov @#177232,(R4)+;177232 - register - top page (layer 0)
1160 + mov @#177240,(R4)+;177240 - register - top page (layer 1)
1161 + mov @#177242,(R4)+;177242 - register - top page (layer 2)
1162 + mov @#177244,(R4)+;177244 - vertical scroll register layer 2
1163 + mov @#177246,(R4)+;177246 - vertical scroll register layer 1
1164 + mov @#177250,(R4)+;177250 - vertical scroll register layer 0
1165 + mov @#177252,(R4)+;177252 - horizontal scroll register layer 0
1166 + mov @#177254,(R4)+;177254 - horizontal scroll register layer 1
1167 + mov @#177256,(R4)+;177256 - horizontal scroll register layer 2
1172 1172  
1173 - mov R5,@#177336; вернем страницу с которой был вызов
1169 + mov R5,@#177336; return the page from which the call was made
1174 1174  
1175 1175  
1176 1176   ;-------------------------
1177 - MOV #AZ$CSR,R3 ; Готовим CSR контроллера
1178 - MOV #AZ$DR,R4 ; Готовим DR контроллера
1179 -20$: CLR (R3) ; Сбросим контроллер
1173 + MOV #AZ$CSR,R3 ; Preparing controller CSR
1174 + MOV #AZ$DR,R4 ; Preparing controller DR
1175 +20$: CLR (R3) ; Reset the controller
1180 1180   TSTB (R3)
1181 1181   BPL 20$
1182 1182  
1183 - ; очистим блок памяти для имени - дабы система сделала дефолтное имя файла
1184 - mov #23,(R3) ; командуем что будем писать данные в буфер
1185 -128$: TSTB (R3) ; проверяем результат выполнения
1186 - BPL 128$ ; ждем
1179 + ; clear the memory block for the name - so that the system makes a default file name
1180 + mov #23,(R3) ; command that we will write data to the buffer
1181 +128$: TSTB (R3) ; check the result of execution
1182 + BPL 128$ ; wait
1187 1187   clr R1
1188 1188  
1189 1189   mov #256.,R2 ;
1190 -129$: mov R1,(R4) ; отдаем в контроллер
1186 +129$: mov R1,(R4) ; give to the controller
1191 1191   sob R2,129$
1192 1192  
1193 1193  
1194 - MOV #044,(R3) ; команда скриншот
1190 + MOV #044,(R3) ; screenshot command
1195 1195  22$: TSTB (R3) ;
1196 1196   BPL 22$ ;
1197 1197  
1198 - ; получим имя скриншота
1199 - mov #22,(R3) ; отдать на шину считанный блок памяти из буфера
1200 -121$: tstb (R3) ; проверяем результат выполнения
1201 - bpl 121$ ; ждем
1194 + ; get the screenshot name
1195 + mov #22,(R3) ; give the read memory block from the buffer to the bus
1196 +121$: tstb (R3) ; check the result of execution
1197 + bpl 121$ ; wait
1202 1202  
1203 1203   mov #BUF,R1
1204 - mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения
1205 -122$: mov (R4),(R1)+ ; читаем блок слов в память
1200 + mov #256.,R2 ; read 256. words; the first word is the result of reading
1201 +122$: mov (R4),(R1)+ ; read a block of words into memory
1206 1206   sob R2,122$
1207 1207  
1208 1208   .PRINT #RESOK
1209 1209   .Print #BUF
1210 1210  
1211 - mov #110,@#AZ$CSR; включаем сеть по-умолчанию сеть должна быть постоянно включена
1207 + mov #110,@#AZ$CSR; enable the network by default, the network should be constantly enabled
1212 1212   .Exit
1213 1213  {{/code}}
1214 1214  
1215 -Для распаковки скриншота можно использовать вот эту утилиту
1211 +To unpack a screenshot, you can use this utility - [[https:~~/~~/master.pdp-11.ru/screen_unpack/>>https://master.pdp-11.ru/screen_unpack/]]
1216 1216  
1217 1217  
1218 1218  
1219 -= **Команды для работы со стеком TCP/IP** =
1215 += Commands for working with the TCP/IP stack =
1220 1220  
1221 -следующие команды работают с буфером информации TCP/IP cтека.
1217 +The following commands operate on the TCP/IP stack information buffer.
1222 1222  
1223 -== **040: Получить ip адрес и прочие настройки стека TCP/IP в буфер** ==
1219 +== 040: Get IP address and other TCP/IP stack settings to buffer ==
1224 1224  
1225 -Код команды 040,  данная команда заполняет буфер информацией с TCP/IP cтека текущей (фактической) информацией.
1221 +Command code 040, this command fills the buffer with information from the TCP/IP stack with current (actual) information.
1226 1226  
1227 -== **041: Чтение буфера ip адреса** ==
1223 +== 041: Reading ip address buffer ==
1228 1228  
1229 -Код команды 041,  данная команда передает буфер на шину
1225 +Command code 041, this command transfers the buffer to the bus
1230 1230  
1231 -эта пара команд позволяет получить текущую информацию со стека
1227 +This pair of commands allows you to get current information from the stack
1232 1232  
1233 -* IP адрес
1234 -* MASK маску
1235 -* GW гейтвей
1236 -* NTP адрес NTP-сервера
1237 -* DNS1 адрес основного DNS
1238 -* DNS2 адрес резервного DNS
1229 +* IP address
1230 +* MASK mask
1231 +* GW gateway
1232 +* NTP address of the NTP server
1233 +* DNS1 primary DNS address
1234 +* DNS2 backup DNS address
1239 1239  
1240 -соответственно это 12 слов
1236 +accordingly it is 12 words
1241 1241  
1242 -Пример программы:
1238 +Example program:
1243 1243  
1244 1244  {{code language="assembler"}}
1245 -; trap 52 - чтение блока IP адресов в блок памяти IPADDDBLOCK (8. ячеек)
1246 -; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
1247 -GetIPaddrs: push R1
1248 - push R2
1249 - call AZreset; сбросим
1250 - tst R1
1251 - bne 0ERR$
1252 - MOV #AZ$CSR,R1
1253 - mov #40,(R1)
1254 -0$: TSTB (R1); прочитать адреса в свою память
1255 - BPL 0$; ждем
1256 - mov #41,(R1)
1257 -1$: TSTB (R1); подготовить буфер
1258 - BPL 1$; ждем
1259 - TST (R1)+; инкрементируем
1260 - mov #IPADDDBLOCK,R3
1261 - mov #12.,R2
1262 -2$: mov (R1),(R3)+; читаем блок слов в память
1263 - sob R2,2$
1264 - mov #IPADDDBLOCK,R3; успешно
1265 - br 0END$
1266 -0ERR$: CLR R3
1267 -0END$: pop R2
1268 - pop R1
1269 - return
1241 +; trap 52 - reading a block of IP addresses into the IPADDDBLOCK memory block (8 cells)
1242 +; result in R3 = 0 if error, otherwise the address where it was read (IPADDDBLOCK)
1243 +GetIPaddrs: push R1
1244 + push R2
1245 + call AZreset; reset
1246 + tst R1
1247 + bne 0ERR$
1248 + MOV #AZ$CSR,R1
1249 + mov #40,(R1)
1250 +0$: TSTB (R1); read addresses into its memory
1251 + BPL 0$; wait
1252 + mov #41,(R1)
1253 +1$: TSTB (R1); prepare buffer
1254 + BPL 1$; wait
1255 + TST (R1)+; increment
1256 + mov #IPADDDBLOCK,R3
1257 + mov #12.,R2
1258 +2$: mov (R1),(R3)+; read block of words into memory
1259 + sob R2,2$
1260 + mov #IPADDDBLOCK,R3; success
1261 + br 0END$
1262 +0ERR$: CLR R3
1263 +0END$: pop R2
1264 + pop R1
1265 + return
1266 +
1270 1270  {{/code}}
1271 1271  
1272 -Пример данных
1269 +Example return data:
1273 1273  
1274 1274  {{info}}
1275 -Примеры данных - возвращаемые слова в восьмеричном формате
1276 -124300 116400 - IP адрес 192.168.0.157
1277 -177777 000377 - MASK маску 255.255.255.0
1278 -124300 000400 - GW гейтвей 192.168.0.1
1279 -124300 000400 - NTP адрес NTP-сервера 192.168.0.1
1280 -124300 050000 - DNS1 адрес основного DNS 192.168.0.90
1281 -124300 055000 - DNS2 адрес резервного DNS 192.168.0.80
1272 +Data examples - words returned in octal format
1273 +124300 116400 - IP address 192.168.0.157
1274 +177777 000377 - MASK mask 255.255.255.0
1275 +124300 000400 - GW gateway 192.168.0.1
1276 +124300 000400 - NTP address of NTP server 192.168.0.1
1277 +124300 050000 - DNS1 address of primary DNS 192.168.0.90
1278 +124300 055000 - DNS2 address of backup DNS 192.168.0.80
1282 1282  {{/info}}
1283 1283  
1284 -== **043: чтение MAC-адреса в ip буфер** ==
1281 +== 043: Read MAC address into ip buffer ==
1285 1285  
1286 -Код команды 043, данная команда читает текущий фактический MAC адрес в буфер IP адресов
1287 -те сначала 043, а затем 041 команды
1283 +Command code 043, this command reads the current actual MAC address into the IP address buffer i.e. first 043 and then 041 commands
1288 1288  
1289 -Пример программы:
1285 +Example program:
1290 1290  
1291 1291  {{code language="assembler"}}
1292 -; trap 72 - чтение MAC адреса в блок памяти IPADDDBLOCK (12. ячеек)
1293 -; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
1294 -GetMACaddrs: push R1
1295 - push R2
1296 - call AZreset ; сбросим
1297 - tst R1
1298 - bne 0ERR$
1299 - MOV #AZ$CSR,R1
1300 - mov #43,(R1)
1301 -0$: TSTB (R1) ; прочитать адреса в свою память
1302 - BPL 0$ ; ждем
1303 - mov #41,(R1)
1304 -1$: TSTB (R1) ; подготовить буфер
1305 - BPL 1$ ; ждем
1306 - TST (R1)+ ; инкрементируем
1307 - mov #IPADDDBLOCK,R3
1308 - mov #12.,R2
1309 -2$: mov (R1),(R3)+ ; читаем блок слов в память
1310 - sob R2,2$
1311 - mov #IPADDDBLOCK,R3; успешно
1312 - br 0END$
1313 -0ERR$: CLR R3
1314 -0END$: pop R2
1315 - pop R1
1316 - retur
1288 +; trap 72 - reading the MAC address into the IPADDDBLOCK memory block (12 cells)
1289 +; result in R3 = 0 if error, otherwise the address where it was read (IPADDDBLOCK)
1290 +GetMACaddrs: push R1
1291 + push R2
1292 + call AZreset ; reset
1293 + tst R1
1294 + bne 0ERR$
1295 + MOV #AZ$CSR,R1
1296 + mov #43,(R1)
1297 +0$: TSTB (R1) ; read addresses into its memory
1298 + BPL 0$ ; wait
1299 + mov #41,(R1)
1300 +1$: TSTB (R1) ; prepare buffer
1301 + BPL 1$ ; wait
1302 + TST (R1)+ ; increment
1303 + mov #IPADDDBLOCK,R3
1304 + mov #12.,R2
1305 +2$: mov (R1),(R3)+ ; read block of words into memory
1306 + sob R2,2$
1307 + mov #IPADDDBLOCK,R3; success
1308 + br 0END$
1309 +0ERR$: CLR R3
1310 +0END$: pop R2
1311 + pop R1
1312 + retur
1313 +
1317 1317  {{/code}}
1318 1318  
1319 1319  
1320 1320  
1321 -= **Команды для работы с MicroSD картой на файловом уровне** =
1318 += Commands for working with a MicroSD card at the file level =
1322 1322  
1323 1323  
1324 -Данные команды предназначены для работы с MicroSD картой на уровне файловой системы и позволяет читать/писать файлы без монтирования файлов как образов дисков.
1321 +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.
1325 1325  
1326 -Эти команды используют буфер 256. слов который задействован в интерфейсе работы с энергонезависимой памятью (см выше команды 022 023)
1327 -\\Ограничения - длина полного пути к файлу  256 байт
1323 +These commands use a 256-word buffer that is used in the interface for working with non-volatile memory (see commands 022 023 above)
1328 1328  
1329 -== **050: Установить имя файла который будем читать** ==
1325 +Limitations - the length of the full path to the file is 256 bytes
1330 1330  
1331 -Код команды 050 данная команда устанавливает имя файла который будем читать, при этом производится открытие файла на чтение, а также получение его свойств.
1327 +== 050: Set the name of the file we will read ==
1332 1332  
1333 -== **051: Получить размер файла на чтение (или его статус) на МПИ** ==
1329 +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.
1334 1334  
1335 -Код команды 051 данная команда передает на МПИ размер файла или ошибку его чтения. Размер файла 31бит, старший бит является признаком ошибки. Соответственно максимальный размер файлов с которыми можно работать через этот интерфейс ограничен 2^31 байт (2GB).
1331 +== 051: Get file size for reading (or its status) on BUS ==
1336 1336  
1337 -формирование ошибки выглядит так:
1338 -sizeanyfile=1<<31 + FFres; ~/~/ если установлен старший бит 32х битного слова - то в младшей части код ошибки
1339 -\\FFres = ошибка FatFS
1340 -
1333 +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).
1341 1341  
1335 +The error generation looks like this:
1336 +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
1337 +
1338 +FFres = FatFS error
1339 +
1342 1342  {{code language="c"}}
1343 1343  typedef enum {
1344 1344   FR_OK = 0, /* (0) Succeeded */
... ... @@ -1366,317 +1366,309 @@
1366 1366  
1367 1367  [[http:~~/~~/elm-chan.org/fsw/ff/doc/open.html>>url:http://elm-chan.org/fsw/ff/doc/open.html]]
1368 1368  
1369 -== **052: Читать блок установленного файла в буфер** ==
1367 +== 052: Read a block of a set file into a buffer ==
1370 1370  
1371 -Код команды 052,  данная команда осуществляет чтение файла в буфер энергонезависимой памяти.
1369 +Command code 052, this command reads a file into a non-volatile memory buffer.
1372 1372  
1373 -В итоге схема чтения файла выглядит вот так
1374 -**023** - заливаем имя файла в буфер
1375 -**050** - устанавливаем файл на чтение
1376 -**051 **- читаем длину файла или ошибку открытия файла
1377 -если ошибка - повторяем сначала 023 050 051
1378 -если все ok - приступаем к чтению файла
1379 -**052** - читает блок файла в буфер
1380 -**022 **- забираем данные из буфера
1381 -пары 052 022 повторяем нужное количество раз дабы считать весь файл
1382 -как файл будет прочтен - последняя 052 команда закроет его автоматически.
1383 -
1371 +As a result, the file reading scheme looks like this
1372 +**023** - fill the file name into the buffer
1373 +**050 **- set the file for reading
1374 +**051** - read the file length or file open error
1375 +if there is an error - repeat 023 050 051 from the beginning
1376 +if everything is ok - start reading the file
1377 +**052** - read the file block into the buffer
1378 +**022** - take data from the buffer
1379 +repeat the **052 022** pairs the required number of times in order to read the entire file
1380 +once the file is read - the last 052 command will close it automatically.
1384 1384  
1385 -Пример программы
1382 +Example program:
1386 1386  
1387 1387  {{code language="assembler"}}
1385 + call AZRST; reset
1388 1388  
1389 - call AZRST; сбросим
1387 +; load the file name into the buffer
1388 +7$: mov #23,(R1); command to write data to the buffer
1389 +5$: TSTB (R1); check execution result
1390 + BPL 5$ ; wait
1391 + TST (R1)+; increment
1392 + mov #FILNM,R3
1393 +1$: mov (R3),(R1); send to controller
1394 + tst (R3)+
1395 + bne 1$
1396 + tst -(R1); decrement
1390 1390  
1391 -; заливаем в буфер имя файла
1392 -7$: mov #23,(R1); командуем что будем писать данные в буфер
1393 -5$: TSTB (R1); проверяем результат выполнения
1394 - BPL 5$ ; ждем
1395 - TST (R1)+; инкрементируем
1396 - mov #FILNM,R3
1397 -1$: mov (R3),(R1); отдаем в контроллер
1398 - tst (R3)+
1399 - bne 1$
1400 - tst -(R1); декрементируем
1398 +; set the file for reading
1399 + mov #50,(R1); set file for reading
1400 +2$: TSTB (R1); check execution result
1401 + BPL 2$ ; wait
1401 1401  
1403 +; read the file length
1404 + mov #51,(R1); set file for reading
1405 +3$: TSTB (R1); check execution result
1406 + BPL 3$ ; wait
1407 + TST (R1)+; increment
1408 + mov #FILSZ,R3
1409 + mov (R1),(R3)+; read from controller
1410 + mov (R1),(R3); read from controller
1402 1402  
1403 - ; устанавливаем файл на чтение
1404 - mov #50,(R1); устанавливаем файл на чтение
1405 -2$: TSTB (R1); проверяем результат выполнения
1406 - BPL 2$ ; ждем
1412 +; display the file length on the screen
1413 + clr R0
1414 + mov #FILSZ+2,R3
1415 + mov (R3),R1
1416 + call DNOZ
1417 + mov -(R3),R1
1418 + call DNOZ
1419 + .print #STMS2
1407 1407  
1421 +; read the file
1422 + mov R1,R4; R1 holds the file length
1423 + MOV #AZ$CSR,R1
1424 + mov #BUFFL,R5
1408 1408  
1409 - ; читаем длину файда
1410 - mov #51,(R1); устанавливаем файл на чтение
1411 -3$: TSTB (R1); проверяем результат выполнения
1412 - BPL 3$ ; ждем
1413 - TST (R1)+; инкрементируем
1414 - mov #FILSZ,R3
1415 - mov (R1),(R3)+; читаем с контроллера
1416 - mov (R1),(R3); читаем с контроллера
1426 + bit #1,R4; if an odd number of bytes
1427 + beq 47$
1428 + inc R4; add 1 more byte as we read words
1417 1417  
1418 - ; выведем длину файла на экран
1419 - clr R0
1420 - mov #FILSZ+2,R3
1421 - mov (R3),R1
1422 - call DNOZ
1423 - mov -(R3),R1
1424 - call DNOZ
1425 - .print #STMS2
1430 +47$: tst R4
1431 + beq 45$ ; nothing left to read - exit
1426 1426  
1427 - ; читаем файл
1428 - mov R1,R4; в R1 осталась длина файла
1429 - MOV #AZ$CSR,R1
1430 - mov #BUFFL,R5
1433 + mov #52,(R1); read block into buffer
1434 +4$: TSTB (R1); check execution result
1435 + BPL 4$ ; wait
1436 + mov #22,(R1); start reading buffer
1437 +51$: TSTB (R1); check execution result
1438 + BPL 51$ ; wait
1431 1431  
1432 - bit #1,R4; если нечетное число байт
1433 - beq 47$
1434 - inc R4; добавим еще 1 байт тк читаем словами
1440 + cmp R4,#512.; compare with buffer size in bytes
1441 + Blos 44$ ; less than buffer size left
1435 1435  
1436 -47$: tst R4
1437 - beq 45$ ; уже нечего читать - выходим
1443 + .print #STMS1
1444 + mov #256.,R2
1445 + TST (R1)+; move to data register
1446 +46$: mov (R1),(R5)+; read into buffer
1447 + sob R2,46$
1448 + sub #512.,R4; subtract
1449 + TST -(R1); move to command register
1450 + br 47$
1438 1438  
1452 +44$: .print #STMS3
1453 + mov R4,R2
1454 + asr R2 ; /2 since reading words
1455 + TST (R1)+; move to data register
1456 +43$: mov (R1),(R5)+; read into buffer
1457 + sob R2,43$
1439 1439  
1440 - mov #52,(R1); читаем блок в буфер
1441 -4$: TSTB (R1); проверяем результат выполнения
1442 - BPL 4$ ; ждем
1443 - mov #22,(R1); будем читать буфер
1444 -51$: TSTB (R1); проверяем результат выполнения
1445 - BPL 51$ ; ждем
1459 +45$: clr (R5); set end of file marker
1446 1446  
1447 - cmp R4,#512.; сравниваем c размером буфера в байтах
1448 - Blos 44$ ; осталось меньше чем буфер
1461 +; file read - display on screen
1462 + .print #STMS4
1463 + .print #BUFFL
1464 + .print #STMS5
1449 1449  
1466 + mov #110,@#AZ$CSR; enable network
1467 + .Exit
1450 1450  
1451 - .print #STMS1
1452 - mov #256.,R2
1453 - TST (R1)+; переходим на регистр данных
1454 -46$: mov (R1),(R5)+; читаем в буфер
1455 - sob R2,46$
1456 - sub #512.,R4; вычитаем
1457 - TST -(R1); переходим на регистр команд
1458 - br 47$
1459 -
1460 -44$: .print #STMS3
1461 - mov R4,R2
1462 - asr R2 ; /2 тк читаем словами
1463 - TST (R1)+; переходим на регистр данных
1464 -43$: mov (R1),(R5)+; читаем в буфер
1465 - sob R2,43$
1466 -
1467 -
1468 -45$: clr (R5); проставим конец файла
1469 - ; файл считан - выводим на экран
1470 - .print #STMS4
1471 - .print #BUFFL
1472 - .print #STMS5
1473 -
1474 -
1475 - mov #110,@#AZ$CSR; включаем сеть
1476 - .Exit
1477 1477  {{/code}}
1478 1478  
1479 1479  
1480 1480  
1481 -== **053:** установить имя файла который будем писать ==
1473 +== 053: set the name of the file that we will write ==
1482 1482  
1483 -Код команды 053,  данная команда открывает файл на запись, получает параметры открытия (или ошибки).
1475 +Command code 053, this command opens a file for writing, receives opening parameters (or errors).
1484 1484  
1485 -== **054:** установка длины файла ==
1477 +== 054: Set file length ==
1486 1486  
1487 -Код команды 054,  данная команда устанавливает ожидаемую длину файла, это нужно для корректного формирования файла на файловом уровне MicroSD карты, а также для организации передачи данных.
1479 +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.
1488 1488  
1489 -== **055:** записать в файл данные из буфера ==
1481 +== 055: write data from buffer to file ==
1490 1490  
1491 -Код команды 055,  данная команда записывает в открытый файл на запись данные из буфера энергонезависимой памяти. Последняя команда 055 автоматически закроет файл по достижению заявленной длины файла.
1483 +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.
1492 1492  
1493 -Схема подачи команд при записи вот такая
1494 -**023** - заливаем имя файла в буфер
1495 -**053** - устанавливаем файл на чтение
1496 -**051 **- статус открытия/создания файла
1497 -если ошибка - повторяем сначала 023 053 051
1498 -если все ok - идем дальше
1499 -**054** - установка длины файла, те надо сразу объявить какая у нас будет длина файла
1500 -**023** - заливаем блок данных в буфер
1501 -**055** - пишем из буфера в файл
1502 -пары 023 055 повторяем нужное количество раз дабы записать весь файл
1503 -как файл будет записан - последняя 055 команда закроет его автоматически
1485 +The command flow chart for writing is as follows
1486 +**023** - fill the file name into the buffer
1487 +**053** - set the file for reading
1488 +**051** - file opening/creation status
1489 +if an error - repeat from the beginning 023 053 051
1490 +if everything is ok - move on
1491 +**054** - set the file length, i.e. we must immediately declare what the file length will be
1492 +**023** - fill the data block into the buffer
1493 +**055** - write from the buffer to the file
1494 +repeat the 023 055 pairs the required number of times in order to write the entire file
1495 +once the file is written - the last 055 command will close it automatically
1504 1504  
1505 1505  
1506 -Пример программы:
1498 +Example program:
1507 1507  
1508 1508  {{code language="assembler"}}
1509 -; заливаем в буфер имя файла
1510 - MOV #AZ$CSR,R1
1511 -17$: mov #23,(R1); командуем что будем писать данные в буфер
1512 -15$: TSTB (R1) ; проверяем результат выполнения
1513 - BPL 15$ ; ждем
1514 - TST (R1)+ ; переходим на регистр данных
1515 - mov #FILNM2,R3
1516 -11$: mov (R3),(R1); отдаем в контроллер
1517 - tst (R3)+
1518 - bne 11$
1519 - tst -(R1) ; переходим на регистр команд
1501 +; load the file name into the buffer
1502 + MOV #AZ$CSR,R1
1503 +17$: mov #23,(R1); command to write data to the buffer
1504 +15$: TSTB (R1) ; check execution result
1505 + BPL 15$ ; wait
1506 + TST (R1)+ ; move to data register
1507 + mov #FILNM2,R3
1508 +11$: mov (R3),(R1); send to controller
1509 + tst (R3)+
1510 + bne 11$
1511 + tst -(R1) ; move to command register
1520 1520  
1521 - ; устанавливаем файл на запись
1522 - mov #53,(R1); устанавливаем файл на запись
1523 -12$: TSTB (R1) ; проверяем результат выполнения
1524 - BPL 12$ ; ждем
1513 +; set the file for writing
1514 + mov #53,(R1); set file for writing
1515 +12$: TSTB (R1) ; check execution result
1516 + BPL 12$ ; wait
1525 1525  
1518 +; read file creation status
1519 + mov #51,(R1)
1520 +13$: TSTB (R1) ; check execution result
1521 + BPL 13$ ; wait
1522 + TST (R1)+ ; move to data register
1523 + mov #STATS,R3
1524 + mov (R1),(R3)+; read from controller
1525 + mov (R1),(R3); read from controller
1526 1526  
1527 - ; читаем статус создания файла
1528 - mov #51,(R1)
1529 -13$: TSTB (R1) ; проверяем результат выполнения
1530 - BPL 13$ ; ждем
1531 - TST (R1)+ ; переходим на регистр данных
1532 - mov #STATS,R3
1533 - mov (R1),(R3)+; читаем с контроллера
1534 - mov (R1),(R3); читаем с контроллера
1527 +; check here - if the file is created, both words should be zero
1528 + mov #STATS,R3
1529 + TST (R3)+
1530 + BNE 66$
1531 + TST (R3)
1532 + BEQ 60$
1533 +66$: .print #ERRMS1 ; print error
1534 + .exit
1535 1535  
1536 - ; тут надо проверить - если файл создан то оба слова нулевые
1537 - mov #STATS,R3
1538 - TST (R3)+
1539 - BNE 66$
1540 - TST (R3)
1541 - BEQ 60$
1542 -66$: .print #ERRMS1 ; печать ошибки
1543 - .exit
1536 +60$: MOV #AZ$CSR,R1
1537 + mov #54,(R1); set file length to be written
1538 +23$: TSTB (R1) ; check execution result
1539 + BPL 23$ ; wait
1540 + TST (R1)+ ; move to data register
1541 + mov #FILSZ,R3
1542 + mov (R3)+,(R1); write to controller
1543 + mov (R3),(R1); write to controller
1544 1544  
1545 -60$: MOV #AZ$CSR,R1
1546 - mov #54,(R1); установим длину файла который будем писать
1547 -23$: TSTB (R1) ; проверяем результат выполнения
1548 - BPL 23$ ; ждем
1549 - TST (R1)+ ; переходим на регистр данных
1550 - mov #FILSZ,R3
1551 - mov (R3)+,(R1); пишем в контроллер
1552 - mov (R3),(R1); пишем в контроллер
1545 + tst -(R1) ; move to command register
1553 1553  
1554 - tst -(R1) ; переходим на регистр команд
1547 +; write file
1548 + mov @#FILSZ,R4; file length
1549 + MOV #AZ$CSR,R1
1550 + mov #BUFFL,R5; file buffer
1555 1555  
1552 + bit #1,R4 ; if an odd number of bytes
1553 + beq 147$
1554 + inc R4 ; add 1 more byte since reading words
1556 1556  
1556 +147$: tst R4 ; check length
1557 + beq 145$ ; nothing left to write - exit
1557 1557  
1558 - ; пишем файл
1559 - mov @#FILSZ,R4; длина файла
1560 - MOV #AZ$CSR,R1
1561 - mov #BUFFL,R5; буфер файла
1559 + mov #23,(R1); write to buffer
1560 +151$: TSTB (R1) ; check execution result
1561 + BPL 151$ ; wait
1562 1562  
1563 - bit #1,R4 ; если нечетное число байт
1564 - beq 147$
1565 - inc R4 ; добавим еще 1 байт тк читаем словами
1563 + cmp R4,#512.; compare with buffer size in bytes
1564 + Blos 144$ ; less than buffer size left
1566 1566  
1567 -147$: tst R4 ; проверим длину
1568 - beq 145$ ; уже нечего писать - выходим
1566 + .print #STMS6 ; writing full block
1567 + mov #256.,R2
1568 + TST (R1)+ ; move to data register
1569 +146$: mov (R5)+,(R1); write to controller buffer
1570 + sob R2,146$
1571 + sub #512.,R4; subtract
1572 + TST -(R1) ; move to command register
1569 1569  
1570 - mov #23,(R1); будем писать в буфер
1571 -151$: TSTB (R1) ; проверяем результат выполнения
1572 - BPL 151$ ; ждем
1574 + mov #55,(R1); write buffer to file
1575 +104$: TSTB (R1) ; check execution result
1576 + BPL 104$ ; wait
1577 + br 147$ ; loop back
1573 1573  
1574 - cmp R4,#512.; сравниваем c размером буфера в байтах
1575 - Blos 144$ ; осталось меньше чем буфер
1579 +144$: .print #STMS7 ; writing last block
1580 + TST (R1)+ ; move to data register
1581 + mov R4,R2
1582 + asr R2 ; /2 since writing words
1583 +143$: mov (R5)+,(R1); write to controller buffer
1584 + sob R2,143$
1576 1576  
1577 - .print #STMS6 ; заливка полного блока
1578 - mov #256.,R2
1579 - TST (R1)+ ; переходим на регистр данных
1580 -146$: mov (R5)+,(R1); пишем в буфер контроллера
1581 - sob R2,146$
1582 - sub #512.,R4; вычитаем
1583 - TST -(R1) ; переходим на регистр команд
1586 + TST -(R1) ; move to command register
1587 + mov #55,(R1); write last buffer to file
1588 +105$: TSTB (R1) ; check execution result
1589 + BPL 105$ ; wait
1584 1584  
1585 - mov #55,(R1); запись буфера в файл
1586 -104$: TSTB (R1) ; проверяем результат выполнения
1587 - BPL 104$ ; ждем
1588 - br 147$ ; в начало
1591 +145$: .print #STMSE ; end
1592 + mov #110,@#AZ$CSR; enable network
1593 + .Exit ; exit
1589 1589  
1590 -144$: .print #STMS7 ; заливка последнего блока
1591 - TST (R1)+ ; переходим на регистр данных
1592 - mov R4,R2
1593 - asr R2 ; /2 тк пишем словами
1594 -143$: mov (R5)+,(R1); пишем в буфер контроллера
1595 - sob R2,143$
1596 -
1597 - TST -(R1) ; переходим на регистр команд
1598 - mov #55,(R1); запись пследнего буфера в файл
1599 -105$: TSTB (R1) ; проверяем результат выполнения
1600 - BPL 105$ ; ждем
1601 -
1602 -145$: .print #STMSE ; конец
1603 - mov #110,@#AZ$CSR; включаем сеть
1604 - .Exit ; выходим
1605 1605  {{/code}}
1606 1606  
1607 -**[[пример полностью в виде утилиты RT11 выложен вот тут>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**
1597 +**[[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]]**
1608 1608  
1609 1609  
1610 -== **056: Получить данные по размеру карты в буфер sizecard** ==
1600 +== 056: Get data on the size of the map into the sizecard buffer ==
1611 1611  
1612 -Код команды 056,  данная команда читает параметры MicroSD карты в буфер sizecard
1602 +Command code 056, this command reads the parameters of the MicroSD card into the sizecard buffer
1613 1613  
1614 -== **057: Чтение буфера sizecard** ==
1604 +== 057: Reading sizecard buffer ==
1615 1615  
1616 -Код команды 057,  данная команда отдает буфер sizecard (2 слова)
1606 +Command code 057, this command returns the sizecard buffer (2 words)
1617 1617  
1618 -буфер sizecard содержит 2 слова 16bit
1619 -первое слово - общий объем карты доступный для FAT в МБ
1620 -второе слово - свободный объем на карте в МБ
1608 +sizecard buffer contains 2 words 16bit
1609 +first word - total card size available for FAT in MB
1610 +second word - free card size in MB
1621 1621  
1622 -Пример программы:
1612 +Example program:
1623 1623  
1624 1624  {{code language="assembler"}}
1625 -; trap 51 - получение объема SD карты всего/свободно в мегабайтах
1626 -; результат в R1 - всего; R2 - свободно
1627 -GetSizeSD: call AZreset; сбросим
1628 - tst R1
1629 - bne 0ERR$
1630 - MOV #AZ$CSR,R1
1631 - mov #56,(R1)
1632 -1$: TSTB (R1); подготовить буфер
1633 - BPL 1$; ждем
1634 - mov #57,(R1)
1635 -2$: TSTB (R1); подготовить буфер
1636 - BPL 2$; ждем
1637 - mov @#AZ$DR ,R1; всего мегабайт
1638 - mov @#AZ$DR ,R2; свободно мегабайт
1639 - return
1640 - clr R1
1641 - clr R2
1642 - return
1615 +; trap 51 - get the total/free size of the SD card in megabytes
1616 +; result in R1 - total; R2 - free
1617 +GetSizeSD: call AZreset ; reset
1618 + tst R1
1619 + bne 0ERR$
1620 + MOV #AZ$CSR,R1
1621 + mov #56,(R1)
1622 +1$: TSTB (R1) ; prepare buffer
1623 + BPL 1$ ; wait
1624 + mov #57,(R1)
1625 +2$: TSTB (R1) ; prepare buffer
1626 + BPL 2$ ; wait
1627 + mov @#AZ$DR ,R1 ; total megabytes
1628 + mov @#AZ$DR ,R2 ; free megabytes
1629 + return
1630 + clr R1
1631 + clr R2
1632 + return
1633 +
1643 1643  {{/code}}
1644 1644  
1645 -Пример данных
1646 -035521 - всего на карточке мегабайт - 15185.
1647 -035417 - свободно мегабайт - 15119.
1648 -
1636 +Example data
1637 +035521 - total megabytes on the card - 15185.
1638 +035417 - free megabytes - 15119.
1649 1649  
1650 -= **Блок команд API Hall of Fame** =
1640 += Hall of Fame API Command Block =
1651 1651  
1652 -Данный блок команд предназначен для взаимодействия с сервером [[Hall of Fame>>https://forum.maxiol.com/index.php?showtopic=5642]]
1642 +This block of commands is intended for interaction with the server [[Hall of Fame>>https://forum.maxiol.com/index.php?showtopic=5642]]
1653 1653  
1654 1654  == **025: Инициализация Hall of Fame (HOF)** ==
1655 1655  
1656 -Код команды 025,  данная команда устанавливает соединение с сервером Hall of Fame, инициализирует шифрованный тоннель и подготавливает API к работе.
1646 +Command code 025, this command establishes a connection to the Hall of Fame server, initializes the encrypted tunnel and prepares the API for work.
1657 1657  
1658 -Пример программы
1648 +Example program:
1659 1659  
1660 1660  {{code language="assembler"}}
1661 -AZ$CSR = 177220 ; регистр команд и состояния (CSR)
1662 -AZ$DR = 177222 ; регистр данных (DR)
1651 +AZ$CSR = 177220 ; command and status register (CSR)
1652 +AZ$DR = 177222 ; data register (DR)
1663 1663  
1664 -; буфера
1665 -SNDBUF: .BLKW 256. ; буфер передачи
1666 -RCVBUF: .BLKW 256. ; буфер приема ответа
1654 +; buffers
1655 +SNDBUF: .BLKW 256. ; send buffer
1656 +RCVBUF: .BLKW 256. ; receive buffer
1667 1667  SIDMEM: .BLKB 34. ; SID
1668 -SIDCST: .ASCII \{"SID":"\ ; заголовок SID
1658 +SIDCST: .ASCII \{"SID":"\ ; SID header
1669 1669   .even
1670 1670  
1671 -HOFINI: ; инициализация HOF
1672 - ;результатом является такой JSON
1673 - ;{"SID":"хеш сессии","RESULT":"OK"}
1674 - ;или ошибка
1675 - ;{"RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
1676 - ;{"RESULT":"ERROR","DESCRIPTION":"CONNECTION_ERROR"}
1677 - ; результат помещается в SNDBUF
1678 - ; в R5 фиксация успешности - =1 есть SID, =0 нет SID
1679 -
1661 +HOFINI: ; HOF initialization
1662 + ; The result is a JSON response:
1663 + ; {"SID":"session hash","RESULT":"OK"}
1664 + ; or an error:
1665 + ; {"RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
1666 + ; {"RESULT":"ERROR","DESCRIPTION":"CONNECTION_ERROR"}
1667 + ; The result is placed in SNDBUF
1668 + ; R5 indicates success: 1 = SID exists, 0 = no SID
1669 +
1680 1680   mov R5, -(SP)
1681 1681   mov R4, -(SP)
1682 1682   mov R3, -(SP)
... ... @@ -1684,29 +1684,29 @@
1684 1684   mov R1, -(SP)
1685 1685   mov R0, -(SP)
1686 1686  
1687 - mov #3,R5 ; количество попыток
1677 + mov #3,R5 ; number of attempts
1688 1688  
1689 1689  220$: mov #AZ$CSR,R1
1690 - clr (R1) ; Пошлем команду "Сброс"
1691 -221$: tstb (R1) ; Проверим готовность контроллера
1692 - bpl 221$ ; Если не готов ждем
1680 + clr (R1) ; Send "Reset" command
1681 +221$: tstb (R1) ; Check controller readiness
1682 + bpl 221$ ; If not ready, wait
1693 1693  
1694 - mov #25,(R1) ; инициализация - команда 025
1695 -20$: tstb (R1) ; проверяем результат выполнения
1696 - bpl 20$ ; ждем
1684 + mov #25,(R1) ; initialization - command 025
1685 +20$: tstb (R1) ; check execution result
1686 + bpl 20$ ; wait
1697 1697  
1698 - ; получим результат
1699 - mov #22,(R1) ; отдать на шину считанный блок памяти из буфера
1700 -21$: tstb (R1) ; проверяем результат выполнения
1701 - bpl 21$ ; ждем
1702 - tst (R1)+ ; инкрементируем
1688 + ; Retrieve the result
1689 + mov #22,(R1) ; output the read memory block from buffer to the bus
1690 +21$: tstb (R1) ; check execution result
1691 + bpl 21$ ; wait
1692 + tst (R1)+ ; increment
1703 1703   mov #SNDBUF,R3
1704 - mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения
1705 -22$: mov (R1),(R3)+ ; читаем блок слов в память
1694 + mov #256.,R2 ; read 256 words; first word is the read result
1695 +22$: mov (R1),(R3)+ ; read block of words into memory
1706 1706   sob R2,22$
1707 1707  
1708 1708  
1709 - ; надо понять - есть ли SID
1699 + ; Determine if SID exists
1710 1710   mov #4,R0
1711 1711   mov #SNDBUF,R1
1712 1712   mov #SIDCST,R2
... ... @@ -1715,11 +1715,11 @@
1715 1715   sob R0,23$
1716 1716   clr R5
1717 1717   inc R5
1718 - br 26$ ; успешно
1708 + br 26$ ; success
1719 1719  
1720 -24$: ; SID не найден!
1710 +24$: ; SID not found!
1721 1721   sob R5,220$
1722 - clr R5 ; ошибка - нет SID
1712 + clr R5 ; error - no SID
1723 1723  
1724 1724  26$: mov (SP)+, R0
1725 1725   mov (SP)+, R1
... ... @@ -1728,69 +1728,71 @@
1728 1728   mov (SP)+, R4
1729 1729   mov (SP)+, R5
1730 1730   return
1721 +
1731 1731  {{/code}}
1732 1732  
1733 -== **026: обмен с Hall of Fame (HOF)** ==
1724 +== 026: Exchange with Hall of Fame (HOF) ==
1734 1734  
1735 -Код команды 026,  данная команда осуществляет непосредственный обмен с Hall of Fame
1726 +Command code 026, this command makes a direct exchange with Hall of Fame
1736 1736  
1737 -Пример программы
1728 +Example program:
1738 1738  
1739 1739  {{code language="assembler"}}
1740 - ;4. авторизация пользователя
1741 - ;технически это отправка JSON
1742 - ;{"SID":"хеш сессии","CMD":"AUTH_USER","NIKNAME":"никнейм пользователя","PASSWORD":"пароль пользователя"}
1743 - ;ответ тоже JSON
1744 - ;{"SID":"хеш сессии","RESULT":"OK","UID":"хеш пользователя"}
1745 - ;или
1746 - ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"USER_NOT_FOUND_OR_WRONG_PASSWORD"}
1747 - ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
1748 - ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SESSION_NOT_EXISTS_OR_EXPIRED"}
1731 + ;4. user authentication
1732 + ;technically, this is sending a JSON
1733 + ;{"SID":"session hash","CMD":"AUTH_USER","NIKNAME":"user nickname","PASSWORD":"user password"}
1734 + ;the response is also JSON
1735 + ;{"SID":"session hash","RESULT":"OK","UID":"user hash"}
1736 + ;or
1737 + ;{"SID":"session hash","RESULT":"ERROR","DESCRIPTION":"USER_NOT_FOUND_OR_WRONG_PASSWORD"}
1738 + ;{"SID":"session hash","RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
1739 + ;{"SID":"session hash","RESULT":"ERROR","DESCRIPTION":"SESSION_NOT_EXISTS_OR_EXPIRED"}
1749 1749  
1750 - ; загоняем команду CMD04
1751 - mov #CMD04,R1
1752 - mov #ADRMEM,R2
1753 - add #42.,R2 ; cдвигаем указатель на длину блока с SID
1754 -33$: movb (R1)+,(R2)+
1755 - bne 33$
1741 + ; load command CMD04
1742 + mov #CMD04,R1
1743 + mov #ADRMEM,R2
1744 + add #42.,R2 ; shift the pointer to the SID block length
1745 +33$: movb (R1)+,(R2)+
1746 + bne 33$
1756 1756  
1757 - .Print #ADRMEM
1748 + .Print #ADRMEM
1758 1758  
1759 - .Print #HOF05
1760 - ; отсылаем команду и ждем ответа
1761 - ; закачиваем в буфер
1762 - MOV #AZ$CSR,R1
1763 -331$: TSTB (R1) ; Проверим готовность контроллера
1764 - BPL 331$ ; Если не готов ждем
1765 - mov #23,(R1) ; командуем что будем писать данные в буфер
1766 -34$: TSTB (R1) ; проверяем результат выполнения
1767 - BPL 34$ ; ждем
1768 - TST (R1)+ ; инкрементируем
1769 - mov #ADRMEM,R3
1770 - mov #256.,R2 ;
1771 -35$: mov (R3)+,(R1) ; отдаем в контроллер
1772 - sob R2,35$
1773 - tst -(R1) ; декрементируем
1750 + .Print #HOF05
1751 + ; send the command and wait for a response
1752 + ; load into buffer
1753 + MOV #AZ$CSR,R1
1754 +331$: TSTB (R1) ; Check controller readiness
1755 + BPL 331$ ; If not ready, wait
1756 + mov #23,(R1) ; command to write data into buffer
1757 +34$: TSTB (R1) ; check execution result
1758 + BPL 34$ ; wait
1759 + TST (R1)+ ; increment
1760 + mov #ADRMEM,R3
1761 + mov #256.,R2 ;
1762 +35$: mov (R3)+,(R1) ; send to controller
1763 + sob R2,35$
1764 + tst -(R1) ; decrement
1774 1774  
1775 - ; обмен - команда 026
1776 - MOV #AZ$CSR,R1
1777 -361$: TSTB (R1) ; Проверим готовность контроллера
1778 - BPL 361$ ; Если не готов ждем
1779 - mov #26,(R1)
1780 -36$: TSTB (R1) ; проверяем результат выполнения
1781 - BPL 36$ ; ждем
1766 + ; exchange - command 026
1767 + MOV #AZ$CSR,R1
1768 +361$: TSTB (R1) ; Check controller readiness
1769 + BPL 361$ ; If not ready, wait
1770 + mov #26,(R1)
1771 +36$: TSTB (R1) ; check execution result
1772 + BPL 36$ ; wait
1782 1782  
1783 - ; получим результат
1784 -371$: TSTB (R1) ; Проверим готовность контроллера
1785 - BPL 371$ ; Если не готов ждем
1786 - mov #22,(R1) ; отдать на шину буфер
1787 -37$: TSTB (R1) ; проверяем результат выполнения
1788 - BPL 37$ ; ждем
1789 - TST (R1)+ ; инкрементируем
1790 - mov #ADRMEM,R3
1791 - mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения
1792 -38$: mov (R1),(R3)+ ; читаем блок слов в память
1793 - sob R2,38$
1774 + ; receive result
1775 +371$: TSTB (R1) ; Check controller readiness
1776 + BPL 371$ ; If not ready, wait
1777 + mov #22,(R1) ; send buffer to the bus
1778 +37$: TSTB (R1) ; check execution result
1779 + BPL 37$ ; wait
1780 + TST (R1)+ ; increment
1781 + mov #ADRMEM,R3
1782 + mov #256.,R2 ; read 256 words; first word is the read result
1783 +38$: mov (R1),(R3)+ ; read block of words into memory
1784 + sob R2,38$
1785 +
1794 1794  {{/code}}
1795 1795  
1796 1796