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

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

From 2.64 to 2.65 From 2.80 to 2.81

From version 2.65

edited by Max
on 2025/02/25 16:31

Change comment: There is no comment for this version

To version 2.80

edited by Max
on 2025/02/25 17:32

Change comment: (Autosaved)

Raw
Rendered

Summary

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

Details

Page properties

Content

@@ -1034,15 +1034,14 @@
  {{code language="assembler"}}
  ;--------------------------------------------------
  ; 76th page map - we prepare data for the screenshot command there
--SCR_PAGE  = 130000  ; we temporarily attach the 76th page to the 77th - that is, into the 130000 window
--SCR_TAG  = SCR_PAGE+0   ; here is the input - 240 - 1 word
--SCR_ADDR_CONF   = SCR_TAG+2   ; here is the command with addresses - address+length 24 bits - 4 words
--SCR_PAGE_CONF  = SCR_ADDR_CONF+8.  ; here is the command with pages - the starting page and the number of pages - 2 words
++SCR_PAGE      = 130000            ; we temporarily attach the 76th page to the 77th - that is, into the 130000 window
++SCR_TAG       = SCR_PAGE+0        ; here is the input - 240 - 1 word
++SCR_ADDR_CONF = SCR_TAG+2         ; here is the command with addresses - address+length 24 bits - 4 words
++SCR_PAGE_CONF = SCR_ADDR_CONF+8.  ; here is the command with pages - the starting page and the number of pages - 2 words
  SCR_MEM_CONF  = SCR_PAGE_CONF+4.  ; here is the memory configuration from the registers - 22 words
  SCR_VGA_CONF  = SCR_MEM_CONF+44.  ; here video controller configuration - 10 words
--SCR_PAL  = SCR_VGA_CONF+20.  ; here 338. values ??(words) of palette 338 words
++SCR_PAL       = SCR_VGA_CONF+20.  ; here 338. values (words) of palette 338 words
  ;--------------------------------------------------
--
  ; trap 41 - preparation of default information for screenshot functionality
  PrepSRC:        jsr     R5, PUSHA            ; batch saving of registers
                  mov     @#177326,-(SP)       ; save page 130k which was before the call
@@ -1138,205 +1138,206 @@
  Example program
  {{code language="assembler"}}
--; обновим информацию в хидере скриншота
++; update the information in the screenshot header
  ;--------------------------------------------------
--; карта 76й страницы - туда мы готовим данные для команды скринщотов
--        SPAGE        = 170000             ; 76ую страницу цепляем на место 77й временно - те в окно 130000
--        STAG         = SPAGE+0         ; тут вход - 240 - 1 слово
--        SADDRC   = STAG+2          ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
--        SPAGEC   = SADDRC+8.   ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
--        SMEMC    = SPAGEC+4.   ; cюда конфигурацию памяти из регистров - 22 слова
--        SVGAC    = SMEMC+44.   ; сюда конфигурацию видеоконтроллера - 10 cлов
--        SPAL         = SVGAC+20.   ; сюда 338. значений(слов) палитры 338 слов
++; 76th page map - we prepare data for the screenshot command there
++SCR_PAGE      = 130000            ; we temporarily attach the 76th page to the 77th - that is, into the 130000 window
++SCR_TAG       = SCR_PAGE+0        ; here is the input - 240 - 1 word
++SCR_ADDR_CONF = SCR_TAG+2         ; here is the command with addresses - address+length 24 bits - 4 words
++SCR_PAGE_CONF = SCR_ADDR_CONF+8.  ; here is the command with pages - the starting page and the number of pages - 2 words
++SCR_MEM_CONF  = SCR_PAGE_CONF+4.  ; here is the memory configuration from the registers - 22 words
++SCR_VGA_CONF  = SCR_MEM_CONF+44.  ; here video controller configuration - 10 words
++SCR_PAL       = SCR_VGA_CONF+20.  ; here 338. values (words) of palette 338 words
  ;--------------------------------------------------
++                mov     @#177326,R5       ; save page 130k which was before the call
++                mov     #76,@#177336         ; hook the 76th page into the window
--                mov     @#177326,R5       ; сохраним страницу 130k которая была до вызова
--                mov     #76,@#177336         ; цепляем 76ую страницу в окно
--
--         ;конфигурация видеоконтроллера
++         ;video controller configuration
           ;  177230-177256
                  mov     #SVGAC,R4
--                mov     @#177230,(R4)+;177230 - регистр управления
--                mov     @#177232,(R4)+;177232 - регистр  - верхняя страница (слой 0)
--                mov     @#177240,(R4)+;177240 - регистр  - средняя страница (слой 1)
--                mov     @#177242,(R4)+;177242 - регистр - нижняя страница (слой 2)
--                mov     @#177244,(R4)+;177244 - регистр вертикального скролинга слой 2
--                mov     @#177246,(R4)+;177246 - регистр вертикального скролинга слой 1
--                mov     @#177250,(R4)+;177250 - регистр вертикального скролинга слой 0
--                mov     @#177252,(R4)+;177252 - регистр гозизонтального скролинга слой 0
--                mov     @#177254,(R4)+;177254 - регистр гозизонтального скролинга слой 1
--                mov     @#177256,(R4)+;177256 - регистр гозизонтального скролинга слой 2
++                mov     @#177230,(R4)+;177230 - control register
++                mov     @#177232,(R4)+;177232 - register - top page (layer 0)
++                mov     @#177240,(R4)+;177240 - register - top page (layer 1)
++                mov     @#177242,(R4)+;177242 - register - top page (layer 2)
++                mov     @#177244,(R4)+;177244 - vertical scroll register layer 2
++                mov     @#177246,(R4)+;177246 - vertical scroll register layer 1
++                mov     @#177250,(R4)+;177250 - vertical scroll register layer 0
++                mov     @#177252,(R4)+;177252 - horizontal scroll register layer 0
++                mov     @#177254,(R4)+;177254 - horizontal scroll register layer 1
++                mov     @#177256,(R4)+;177256 - horizontal scroll register layer 2
--                mov     R5,@#177336; вернем страницу с которой был вызов
++                mov     R5,@#177336; return the page from which the call was made
           ;-------------------------
--                MOV     #AZ$CSR,R3     ; Готовим CSR контроллера
--                MOV     #AZ$DR,R4     ; Готовим DR контроллера
--20$:            CLR     (R3)         ; Сбросим контроллер
++                MOV     #AZ$CSR,R3     ; Preparing controller CSR
++                MOV     #AZ$DR,R4     ; Preparing controller DR
++20$:            CLR     (R3)         ; Reset the controller
                  TSTB    (R3)
                  BPL     20$
--         ; очистим блок памяти для имени - дабы система сделала дефолтное имя файла
--                mov     #23,(R3)     ; командуем что будем писать данные в буфер
--128$:           TSTB    (R3)         ; проверяем результат выполнения
--                BPL     128$         ; ждем
++         ; clear the memory block for the name - so that the system makes a default file name
++                mov     #23,(R3)     ; command that we will write data to the buffer
++128$:           TSTB    (R3)         ; check the result of execution
++                BPL     128$         ; wait
                  clr     R1
                  mov     #256.,R2     ;
--129$:           mov     R1,(R4)      ; отдаем в контроллер
++129$:           mov     R1,(R4)      ; give to the controller
                  sob     R2,129$
--                MOV     #044,(R3)    ; команда скриншот
++                MOV     #044,(R3)    ; screenshot command
 $:            TSTB    (R3)         ;
                  BPL     22$          ;
--         ; получим имя скриншота
--                mov     #22,(R3)     ; отдать на шину считанный блок памяти из буфера
--121$:           tstb    (R3)         ; проверяем результат выполнения
--                bpl     121$         ; ждем
++         ; get the screenshot name
++                mov     #22,(R3)     ; give the read memory block from the buffer to the bus
++121$:           tstb    (R3)         ; check the result of execution
++                bpl     121$         ; wait
                  mov     #BUF,R1
--                mov     #256.,R2     ; читаем 256. слов; первое слово - результат чтения
--122$:           mov     (R4),(R1)+   ; читаем блок слов в память
++                mov     #256.,R2     ; read 256. words; the first word is the result of reading
++122$:           mov     (R4),(R1)+   ; read a block of words into memory
                  sob     R2,122$
                  .PRINT  #RESOK
                  .Print  #BUF
--                mov     #110,@#AZ$CSR; включаем сеть по-умолчанию сеть должна быть постоянно включена
++                mov     #110,@#AZ$CSR; enable the network by default, the network should be constantly enabled
                  .Exit
  {{/code}}
--Для распаковки скриншота можно использовать вот эту утилиту
++To unpack a screenshot, you can use this utility - [[https:~~/~~/master.pdp-11.ru/screen_unpack/>>https://master.pdp-11.ru/screen_unpack/]]
--= **Команды для работы со стеком TCP/IP** =
++= Commands for working with the TCP/IP stack =
--следующие команды работают с буфером информации TCP/IP cтека.
++The following commands operate on the TCP/IP stack information buffer.
--== **040: Получить ip адрес и прочие настройки стека TCP/IP в буфер** ==
++== 040: Get IP address and other TCP/IP stack settings to buffer ==
--Код команды 040,  данная команда заполняет буфер информацией с TCP/IP cтека текущей (фактической) информацией.
++Command code 040, this command fills the buffer with information from the TCP/IP stack with current (actual) information.
--== **041: Чтение буфера ip адреса** ==
++== 041: Reading ip address buffer ==
--Код команды 041,  данная команда передает буфер на шину
++Command code 041, this command transfers the buffer to the bus
--эта пара команд позволяет получить текущую информацию со стека
++This pair of commands allows you to get current information from the stack
--* IP адрес
--* MASK маску
--* GW гейтвей
--* NTP адрес NTP-сервера
--* DNS1 адрес основного DNS
--* DNS2 адрес резервного DNS
++* IP address
++* MASK mask
++* GW gateway
++* NTP address of the NTP server
++* DNS1 primary DNS address
++* DNS2 backup DNS address
--соответственно это 12 слов
++accordingly it is 12 words
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 52 - чтение блока IP адресов в блок памяти IPADDDBLOCK (8. ячеек)
--; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
--GetIPaddrs:     push    R1
--                push    R2
--                call    AZreset; сбросим
--                tst     R1
--                bne     0ERR$
--                MOV     #AZ$CSR,R1
--                mov     #40,(R1)
--0$:             TSTB    (R1); прочитать адреса в свою память
--                BPL     0$; ждем
--                mov     #41,(R1)
--1$:             TSTB    (R1); подготовить буфер
--                BPL     1$; ждем
--                TST     (R1)+; инкрементируем
--                mov     #IPADDDBLOCK,R3
--                mov     #12.,R2
--2$:             mov     (R1),(R3)+; читаем блок слов в память
--                sob     R2,2$
--                mov     #IPADDDBLOCK,R3; успешно
--                br      0END$
--0ERR$:          CLR     R3
--0END$:          pop     R2
--                pop     R1
--                return
++; trap 52 - reading a block of IP addresses into the IPADDDBLOCK memory block (8 cells)
++; result in R3 = 0 if error, otherwise the address where it was read (IPADDDBLOCK)
++GetIPaddrs:     push    R1
++                push    R2
++                call    AZreset; reset
++                tst     R1
++                bne     0ERR$
++                MOV     #AZ$CSR,R1
++                mov     #40,(R1)
++0$:             TSTB    (R1); read addresses into its memory
++                BPL     0$; wait
++                mov     #41,(R1)
++1$:             TSTB    (R1); prepare buffer
++                BPL     1$; wait
++                TST     (R1)+; increment
++                mov     #IPADDDBLOCK,R3
++                mov     #12.,R2
++2$:             mov     (R1),(R3)+; read block of words into memory
++                sob     R2,2$
++                mov     #IPADDDBLOCK,R3; success
++                br      0END$
++0ERR$:          CLR     R3
++0END$:          pop     R2
++                pop     R1
++                return
++
  {{/code}}
--Пример данных
++Example return data:
  {{info}}
--Примеры данных - возвращаемые слова в восьмеричном формате
--124300 116400 - IP адрес 192.168.0.157
--177777 000377 - MASK маску 255.255.255.0
--124300 000400 - GW гейтвей 192.168.0.1
--124300 000400 - NTP адрес NTP-сервера 192.168.0.1
--124300 050000 - DNS1 адрес основного DNS 192.168.0.90
--124300 055000 - DNS2 адрес резервного DNS 192.168.0.80
++Data examples - words returned in octal format
++124300 116400 - IP address 192.168.0.157
++177777 000377 - MASK mask 255.255.255.0
++124300 000400 - GW gateway 192.168.0.1
++124300 000400 - NTP address of NTP server 192.168.0.1
++124300 050000 - DNS1 address of primary DNS 192.168.0.90
++124300 055000 - DNS2 address of backup DNS 192.168.0.80
  {{/info}}
--== **043: чтение MAC-адреса в ip буфер** ==
++== 043: Read MAC address into ip buffer ==
--Код команды 043, данная команда читает текущий фактический MAC адрес в буфер IP адресов
--те сначала 043, а затем 041 команды
++Command code 043, this command reads the current actual MAC address into the IP address buffer i.e. first 043 and then 041 commands
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 72 - чтение MAC адреса в блок памяти IPADDDBLOCK (12. ячеек)
--; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
--GetMACaddrs:    push    R1
--                push    R2
--                call    AZreset     ; сбросим
--                tst     R1
--                bne     0ERR$
--                MOV     #AZ$CSR,R1
--                mov     #43,(R1)
--0$:             TSTB    (R1)        ; прочитать адреса в свою память
--                BPL     0$          ; ждем
--                mov     #41,(R1)
--1$:             TSTB    (R1)        ; подготовить буфер
--                BPL     1$          ; ждем
--                TST     (R1)+       ; инкрементируем
--                mov     #IPADDDBLOCK,R3
--                mov     #12.,R2
--2$:             mov     (R1),(R3)+  ; читаем блок слов в память
--                sob     R2,2$
--                mov     #IPADDDBLOCK,R3; успешно
--                br      0END$
--0ERR$:          CLR     R3
--0END$:          pop     R2
--                pop     R1
--                retur
++; trap 72 - reading the MAC address into the IPADDDBLOCK memory block (12 cells)
++; result in R3 = 0 if error, otherwise the address where it was read (IPADDDBLOCK)
++GetMACaddrs:    push    R1
++                push    R2
++                call    AZreset     ; reset
++                tst     R1
++                bne     0ERR$
++                MOV     #AZ$CSR,R1
++                mov     #43,(R1)
++0$:             TSTB    (R1)        ; read addresses into its memory
++                BPL     0$          ; wait
++                mov     #41,(R1)
++1$:             TSTB    (R1)        ; prepare buffer
++                BPL     1$          ; wait
++                TST     (R1)+       ; increment
++                mov     #IPADDDBLOCK,R3
++                mov     #12.,R2
++2$:             mov     (R1),(R3)+  ; read block of words into memory
++                sob     R2,2$
++                mov     #IPADDDBLOCK,R3; success
++                br      0END$
++0ERR$:          CLR     R3
++0END$:          pop     R2
++                pop     R1
++                retur
++
  {{/code}}
--= **Команды для работы с MicroSD картой на файловом уровне** =
++= Commands for working with a MicroSD card at the file level =
--Данные команды предназначены для работы с MicroSD картой на уровне файловой системы и позволяет читать/писать файлы без монтирования файлов как образов дисков.
++These commands are designed to work with a MicroSD card at the file system level and allow you to read/write files without mounting files as disk images.
--Эти команды используют буфер 256. слов который задействован в интерфейсе работы с энергонезависимой памятью (см выше команды 022 023)
--\\Ограничения - длина полного пути к файлу  256 байт
++These commands use a 256-word buffer that is used in the interface for working with non-volatile memory (see commands 022 023 above)
--== **050: Установить имя файла который будем читать** ==
++Limitations - the length of the full path to the file is 256 bytes
--Код команды 050,  данная команда устанавливает имя файла который будем читать, при этом производится открытие файла на чтение, а также получение его свойств.
++== 050: Set the name of the file we will read ==
--== **051: Получить размер файла на чтение (или его статус) на МПИ** ==
++Command code 050, this command sets the name of the file that we will read, while opening the file for reading, and also obtaining its properties.
--Код команды 051,  данная команда передает на МПИ размер файла или ошибку его чтения. Размер файла 31бит, старший бит является признаком ошибки. Соответственно максимальный размер файлов с которыми можно работать через этот интерфейс ограничен 2^31 байт (2GB).
++== 051: Get file size for reading (or its status) on BUS ==
--формирование ошибки выглядит так:
--sizeanyfile=1<<31 + FFres; ~/~/ если установлен старший бит 32х битного слова - то в младшей части код ошибки
--\\FFres = ошибка FatFS
--
++Command code 051, this command transmits the file size or reading error to the MPI. The file size is 31 bits, the most significant bit is an error indicator. Accordingly, the maximum file size that can be worked with via this interface is limited to 2 ^ 31 bytes (2GB).
++The error generation looks like this:
++sizeanyfile=1<<31 + FFres; ~/~/ if the most significant bit of a 32-bit word is set, then the error code is in the lower part
++
++FFres = FatFS error
++
  {{code language="c"}}
  typedef enum {
      FR_OK = 0,                /* (0) Succeeded */
@@ -1364,288 +1364,280 @@
  [[http:~~/~~/elm-chan.org/fsw/ff/doc/open.html>>url:http://elm-chan.org/fsw/ff/doc/open.html]]
--== **052: Читать блок установленного файла в буфер** ==
++== 052: Read a block of a set file into a buffer ==
--Код команды 052,  данная команда осуществляет чтение файла в буфер энергонезависимой памяти.
++Command code 052, this command reads a file into a non-volatile memory buffer.
--В итоге схема чтения файла выглядит вот так
--**023** - заливаем имя файла в буфер
--**050** - устанавливаем файл на чтение
--**051 **- читаем длину файла или ошибку открытия файла
--если ошибка - повторяем сначала 023 050 051
--если все ok - приступаем к чтению файла
--**052** - читает блок файла в буфер
--**022 **- забираем данные из буфера
--пары 052 022 повторяем нужное количество раз дабы считать весь файл
--как файл будет прочтен - последняя 052 команда закроет его автоматически.
--
++As a result, the file reading scheme looks like this
++**023** - fill the file name into the buffer
++**050 **- set the file for reading
++**051** - read the file length or file open error
++if there is an error - repeat 023 050 051 from the beginning
++if everything is ok - start reading the file
++**052** - read the file block into the buffer
++**022** - take data from the buffer
++repeat the **052 022** pairs the required number of times in order to read the entire file
++once the file is read - the last 052 command will close it automatically.
--Пример программы
++Example program:
  {{code language="assembler"}}
++                call    AZRST; reset
--                call    AZRST; сбросим
++; load the file name into the buffer
++7$:             mov     #23,(R1); command to write data to the buffer
++5$:             TSTB    (R1); check execution result
++                BPL     5$  ; wait
++                TST     (R1)+; increment
++                mov     #FILNM,R3
++1$:             mov     (R3),(R1); send to controller
++                tst     (R3)+
++                bne     1$
++                tst     -(R1); decrement
--; заливаем в буфер имя файла
--7$:             mov     #23,(R1); командуем что будем писать данные в буфер
--5$:             TSTB    (R1); проверяем результат выполнения
--                BPL     5$  ; ждем
--                TST     (R1)+; инкрементируем
--                mov     #FILNM,R3
--1$:             mov     (R3),(R1); отдаем в контроллер
--                tst     (R3)+
--                bne     1$
--                tst     -(R1); декрементируем
++; set the file for reading
++                mov     #50,(R1); set file for reading
++2$:             TSTB    (R1); check execution result
++                BPL     2$  ; wait
++; read the file length
++                mov     #51,(R1); set file for reading
++3$:             TSTB    (R1); check execution result
++                BPL     3$  ; wait
++                TST     (R1)+; increment
++                mov     #FILSZ,R3
++                mov     (R1),(R3)+; read from controller
++                mov     (R1),(R3); read from controller
--    ; устанавливаем файл на чтение
--                mov     #50,(R1); устанавливаем файл на чтение
--2$:             TSTB    (R1); проверяем результат выполнения
--                BPL     2$  ; ждем
++; display the file length on the screen
++                clr     R0
++                mov     #FILSZ+2,R3
++                mov     (R3),R1
++                call    DNOZ
++                mov     -(R3),R1
++                call    DNOZ
++                .print   #STMS2
++; read the file
++                mov     R1,R4; R1 holds the file length
++                MOV     #AZ$CSR,R1
++                mov     #BUFFL,R5
--    ; читаем длину файда
--                mov     #51,(R1); устанавливаем файл на чтение
--3$:             TSTB    (R1); проверяем результат выполнения
--                BPL     3$  ; ждем
--                TST     (R1)+; инкрементируем
--                mov     #FILSZ,R3
--                mov     (R1),(R3)+; читаем с контроллера
--                mov     (R1),(R3); читаем с контроллера
++                bit     #1,R4; if an odd number of bytes
++                beq     47$
++                inc      R4; add 1 more byte as we read words
--    ; выведем длину файла на экран
--                clr     R0
--                mov     #FILSZ+2,R3
--                mov     (R3),R1
--                call    DNOZ
--                mov     -(R3),R1
--                call    DNOZ
--                .print   #STMS2
++47$:            tst     R4
++                beq     45$ ; nothing left to read - exit
--    ; читаем файл
--                mov     R1,R4; в R1 осталась длина файла
--                MOV     #AZ$CSR,R1
--                mov     #BUFFL,R5
++                mov     #52,(R1); read block into buffer
++4$:             TSTB    (R1); check execution result
++                BPL     4$  ; wait
++                mov     #22,(R1); start reading buffer
++51$:            TSTB    (R1); check execution result
++                BPL     51$ ; wait
--                bit     #1,R4; если нечетное число байт
--                beq     47$
--                inc      R4; добавим еще 1 байт тк читаем словами
++                cmp     R4,#512.; compare with buffer size in bytes
++                Blos    44$ ; less than buffer size left
--47$:            tst     R4
--                beq     45$ ; уже нечего читать - выходим
++                .print  #STMS1
++                mov     #256.,R2
++                TST     (R1)+; move to data register
++46$:            mov     (R1),(R5)+; read into buffer
++                sob     R2,46$
++                sub     #512.,R4; subtract
++                TST     -(R1); move to command register
++                br      47$
++44$:            .print  #STMS3
++                mov     R4,R2
++                asr     R2  ; /2 since reading words
++                TST     (R1)+; move to data register
++43$:            mov     (R1),(R5)+; read into buffer
++                sob     R2,43$
--                mov     #52,(R1); читаем блок в буфер
--4$:             TSTB    (R1); проверяем результат выполнения
--                BPL     4$  ; ждем
--                mov     #22,(R1); будем читать буфер
--51$:            TSTB    (R1); проверяем результат выполнения
--                BPL     51$ ; ждем
++45$:            clr     (R5); set end of file marker
--                cmp     R4,#512.; сравниваем c размером буфера в байтах
--                Blos    44$ ; осталось меньше чем буфер
++; file read - display on screen
++                .print   #STMS4
++                .print  #BUFFL
++                .print   #STMS5
++                mov     #110,@#AZ$CSR; enable network
++                .Exit
--                .print  #STMS1
--                mov     #256.,R2
--                TST     (R1)+; переходим на регистр данных
--46$:            mov     (R1),(R5)+; читаем в буфер
--                sob     R2,46$
--                sub     #512.,R4; вычитаем
--                TST     -(R1); переходим на регистр команд
--                br      47$
--
--44$:            .print  #STMS3
--                mov     R4,R2
--                asr     R2  ; /2 тк читаем словами
--                TST     (R1)+; переходим на регистр данных
--43$:            mov     (R1),(R5)+; читаем в буфер
--                sob     R2,43$
--
--
--45$:            clr     (R5); проставим конец файла
--    ; файл считан - выводим на экран
--                .print   #STMS4
--                .print  #BUFFL
--                .print   #STMS5
--
--
--                mov     #110,@#AZ$CSR; включаем сеть
--                .Exit
  {{/code}}
--== **053:** установить имя файла который будем писать ==
++== 053: set the name of the file that we will write ==
--Код команды 053,  данная команда открывает файл на запись, получает параметры открытия (или ошибки).
++Command code 053, this command opens a file for writing, receives opening parameters (or errors).
--== **054:** установка длины файла ==
++== 054: Set file length ==
--Код команды 054,  данная команда устанавливает ожидаемую длину файла, это нужно для корректного формирования файла на файловом уровне MicroSD карты, а также для организации передачи данных.
++Command code 054, this command sets the expected file length, this is necessary for the correct formation of the file at the file level of the MicroSD card, as well as for organizing data transfer.
--== **055:** записать в файл данные из буфера ==
++== 055: write data from buffer to file ==
--Код команды 055,  данная команда записывает в открытый файл на запись данные из буфера энергонезависимой памяти. Последняя команда 055 автоматически закроет файл по достижению заявленной длины файла.
++Command code 055, this command writes data from the non-volatile memory buffer to an open file for writing. The last command 055 will automatically close the file when the declared file length is reached.
--Схема подачи команд при записи вот такая
--**023** - заливаем имя файла в буфер
--**053** - устанавливаем файл на чтение
--**051 **- статус открытия/создания файла
--если ошибка - повторяем сначала 023 053 051
--если все ok - идем дальше
--**054** - установка длины файла, те надо сразу объявить какая у нас будет длина файла
--**023** - заливаем блок данных в буфер
--**055** - пишем из буфера в файл
--пары 023 055 повторяем нужное количество раз дабы записать весь файл
--как файл будет записан - последняя 055 команда закроет его автоматически
++The command flow chart for writing is as follows
++**023** - fill the file name into the buffer
++**053** - set the file for reading
++**051** - file opening/creation status
++if an error - repeat from the beginning 023 053 051
++if everything is ok - move on
++**054** - set the file length, i.e. we must immediately declare what the file length will be
++**023** - fill the data block into the buffer
++**055** - write from the buffer to the file
++repeat the 023 055 pairs the required number of times in order to write the entire file
++once the file is written - the last 055 command will close it automatically
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; заливаем в буфер имя файла
--                MOV     #AZ$CSR,R1
--17$:            mov     #23,(R1); командуем что будем писать данные в буфер
--15$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     15$     ; ждем
--                TST     (R1)+   ; переходим на регистр данных
--                mov     #FILNM2,R3
--11$:             mov    (R3),(R1); отдаем в контроллер
--                tst     (R3)+
--                bne     11$
--                tst     -(R1)   ; переходим на регистр команд
++; load the file name into the buffer
++                MOV     #AZ$CSR,R1
++17$:            mov     #23,(R1); command to write data to the buffer
++15$:            TSTB    (R1)    ; check execution result
++                BPL     15$     ; wait
++                TST     (R1)+   ; move to data register
++                mov     #FILNM2,R3
++11$:             mov    (R3),(R1); send to controller
++                tst     (R3)+
++                bne     11$
++                tst     -(R1)   ; move to command register
--        ; устанавливаем файл на запись
--                mov     #53,(R1); устанавливаем файл на запись
--12$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     12$     ; ждем
++; set the file for writing
++                mov     #53,(R1); set file for writing
++12$:            TSTB    (R1)    ; check execution result
++                BPL     12$     ; wait
++; read file creation status
++                mov     #51,(R1)
++13$:            TSTB    (R1)    ; check execution result
++                BPL     13$     ; wait
++                TST     (R1)+   ; move to data register
++                mov     #STATS,R3
++                mov     (R1),(R3)+; read from controller
++                mov     (R1),(R3); read from controller
--        ; читаем статус создания файла
--                mov     #51,(R1)
--13$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     13$     ; ждем
--                TST     (R1)+   ; переходим на регистр данных
--                mov     #STATS,R3
--                mov     (R1),(R3)+; читаем с контроллера
--                mov     (R1),(R3); читаем с контроллера
++; check here - if the file is created, both words should be zero
++                mov     #STATS,R3
++                TST     (R3)+
++                BNE     66$
++                TST     (R3)
++                BEQ     60$
++66$:            .print  #ERRMS1 ; print error
++                .exit
--        ; тут надо проверить - если файл создан то оба слова нулевые
--                mov     #STATS,R3
--                TST     (R3)+
--                BNE     66$
--                TST     (R3)
--                BEQ     60$
--66$:            .print  #ERRMS1 ; печать ошибки
--                .exit
++60$:            MOV     #AZ$CSR,R1
++                mov     #54,(R1); set file length to be written
++23$:            TSTB    (R1)    ; check execution result
++                BPL     23$     ; wait
++                TST     (R1)+   ; move to data register
++                mov     #FILSZ,R3
++                mov     (R3)+,(R1); write to controller
++                mov     (R3),(R1); write to controller
--60$:            MOV     #AZ$CSR,R1
--                mov     #54,(R1); установим длину файла который будем писать
--23$:            TSTB    (R1)    ; проверяем результат выполнения
--                BPL     23$     ; ждем
--                TST     (R1)+   ; переходим на регистр данных
--                mov     #FILSZ,R3
--                mov     (R3)+,(R1); пишем в контроллер
--                mov     (R3),(R1); пишем в контроллер
++                tst     -(R1)   ; move to command register
--                tst     -(R1)   ; переходим на регистр команд
++; write file
++                mov     @#FILSZ,R4; file length
++                MOV     #AZ$CSR,R1
++                mov     #BUFFL,R5; file buffer
++                bit     #1,R4   ; if an odd number of bytes
++                beq     147$
++                inc      R4   ; add 1 more byte since reading words
++147$:           tst     R4      ; check length
++                beq     145$    ; nothing left to write - exit
--        ; пишем файл
--                mov     @#FILSZ,R4; длина файла
--                MOV     #AZ$CSR,R1
--                mov     #BUFFL,R5; буфер файла
++                mov     #23,(R1); write to buffer
++151$:           TSTB    (R1)    ; check execution result
++                BPL     151$    ; wait
--                bit     #1,R4   ; если нечетное число байт
--                beq     147$
--                inc      R4   ; добавим еще 1 байт тк читаем словами
++                cmp     R4,#512.; compare with buffer size in bytes
++                Blos    144$    ; less than buffer size left
--147$:           tst     R4      ; проверим длину
--                beq     145$    ; уже нечего писать - выходим
++                .print  #STMS6  ; writing full block
++                mov     #256.,R2
++                TST     (R1)+   ; move to data register
++146$:           mov     (R5)+,(R1); write to controller buffer
++                sob     R2,146$
++                sub     #512.,R4; subtract
++                TST     -(R1)   ; move to command register
--                mov     #23,(R1); будем писать в буфер
--151$:           TSTB    (R1)    ; проверяем результат выполнения
--                BPL     151$    ; ждем
++                mov     #55,(R1); write buffer to file
++104$:           TSTB    (R1)    ; check execution result
++                BPL     104$    ; wait
++                br      147$    ; loop back
--                cmp     R4,#512.; сравниваем c размером буфера в байтах
--                Blos    144$    ; осталось меньше чем буфер
++144$:            .print  #STMS7 ; writing last block
++                TST     (R1)+   ; move to data register
++                mov     R4,R2
++                asr     R2      ; /2 since writing words
++143$:           mov     (R5)+,(R1); write to controller buffer
++                sob     R2,143$
--                .print  #STMS6  ; заливка полного блока
--                mov     #256.,R2
--                TST     (R1)+   ; переходим на регистр данных
--146$:           mov     (R5)+,(R1); пишем в буфер контроллера
--                sob     R2,146$
--                sub     #512.,R4; вычитаем
--                TST     -(R1)   ; переходим на регистр команд
++                TST     -(R1)   ; move to command register
++                mov     #55,(R1); write last buffer to file
++105$:           TSTB    (R1)    ; check execution result
++                BPL     105$    ; wait
--                mov     #55,(R1); запись буфера в файл
--104$:           TSTB    (R1)    ; проверяем результат выполнения
--                BPL     104$    ; ждем
--                br      147$    ; в начало
++145$:           .print #STMSE   ; end
++                mov     #110,@#AZ$CSR; enable network
++                .Exit           ; exit
--144$:            .print  #STMS7 ; заливка последнего блока
--                TST     (R1)+   ; переходим на регистр данных
--                mov     R4,R2
--                asr     R2      ; /2 тк пишем словами
--143$:           mov     (R5)+,(R1); пишем в буфер контроллера
--                sob     R2,143$
--
--                TST     -(R1)   ; переходим на регистр команд
--                mov     #55,(R1); запись пследнего буфера в файл
--105$:           TSTB    (R1)    ; проверяем результат выполнения
--                BPL     105$    ; ждем
--
--145$:           .print #STMSE   ; конец
--                mov     #110,@#AZ$CSR; включаем сеть
--                .Exit           ; выходим
  {{/code}}
--**[[пример полностью в виде утилиты RT11 выложен вот тут>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**
++**[[the example is completely in the form of the RT11 utility and is posted here>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**
--== **056: Получить данные по размеру карты в буфер sizecard** ==
++== 056: Get data on the size of the map into the sizecard buffer ==
--Код команды 056,  данная команда читает параметры MicroSD карты в буфер sizecard
++Command code 056, this command reads the parameters of the MicroSD card into the sizecard buffer
--== **057: Чтение буфера sizecard** ==
++== 057: Reading sizecard buffer ==
--Код команды 057,  данная команда отдает буфер sizecard (2 слова)
++Command code 057, this command returns the sizecard buffer (2 words)
--буфер sizecard содержит 2 слова 16bit
--первое слово - общий объем карты доступный для FAT в МБ
--второе слово - свободный объем на карте в МБ
++sizecard buffer contains 2 words 16bit
++first word - total card size available for FAT in MB
++second word - free card size in MB
--Пример программы:
++Example program:
  {{code language="assembler"}}
--; trap 51 - получение объема SD карты всего/свободно в мегабайтах
--; результат в R1 - всего; R2 - свободно
--GetSizeSD:      call    AZreset; сбросим
--                tst     R1
--                bne     0ERR$
--                MOV     #AZ$CSR,R1
--                mov     #56,(R1)
--1$:             TSTB    (R1); подготовить буфер
--                BPL     1$; ждем
--                mov     #57,(R1)
--2$:             TSTB    (R1); подготовить буфер
--                BPL     2$; ждем
--                mov     @#AZ$DR ,R1; всего мегабайт
--                mov     @#AZ$DR ,R2; свободно мегабайт
--                return
--                clr     R1
--                clr     R2
--                return
++; trap 51 - get the total/free size of the SD card in megabytes
++; result in R1 - total; R2 - free
++GetSizeSD:      call    AZreset  ; reset
++                tst     R1
++                bne     0ERR$
++                MOV     #AZ$CSR,R1
++                mov     #56,(R1)
++1$:             TSTB    (R1)     ; prepare buffer
++                BPL     1$       ; wait
++                mov     #57,(R1)
++2$:             TSTB    (R1)     ; prepare buffer
++                BPL     2$       ; wait
++                mov     @#AZ$DR ,R1  ; total megabytes
++                mov     @#AZ$DR ,R2  ; free megabytes
++                return
++                clr     R1
++                clr     R2
++                return
++
  {{/code}}
--Пример данных
--035521 - всего на карточке мегабайт - 15185.
--035417 - свободно мегабайт - 15119.
--
++Example data
++035521 - total megabytes on the card - 15185.
++035417 - free megabytes - 15119.
--= **Блок команд API Hall of Fame** =
++= Hall of Fame API Command Block =
  Данный блок команд предназначен для взаимодействия с сервером [[Hall of Fame>>https://forum.maxiol.com/index.php?showtopic=5642]]
@@ -1653,7 +1653,7 @@
  Код команды 025,  данная команда устанавливает соединение с сервером Hall of Fame, инициализирует шифрованный тоннель и подготавливает API к работе.
--Пример программы
++Example program:
  {{code language="assembler"}}
  AZ$CSR          = 177220                 ; регистр команд и состояния (CSR)
@@ -1732,7 +1732,7 @@
  Код команды 026,  данная команда осуществляет непосредственный обмен с Hall of Fame
--Пример программы
++Example program:
  {{code language="assembler"}}
               ;4. авторизация пользователя

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

Summary

Details

Applications

Navigation

Need help?