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

From version 2.79
edited by Max
on 2025/02/25 17:27
Change comment: (Autosaved)
To version 2.46
edited by Max
on 2025/02/25 15:07
Change comment: (Autosaved)

Summary

Details

Page properties
Content
... ... @@ -711,15 +711,17 @@
711 711  
712 712  = Block of commands for working with RTC and NTP =
713 713  
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.
714 +В контроллере AZ®  есть 2 источника получения даты-времени, первый это RTC встроенный в STM32, второй это часы в стеке TCP/IP.  Часы RTC работают автономно при наличии установленной батарейки 2032. Часы в стеке TCP/IP устанавливаются на основании данных с NTP-сервера.
715 715  
716 716  
717 -== Buffer format timestamp (readable) ==
717 +== Формат буфера timestamp (доступен по чтению) ==
718 718  
719 -The controller API immediately prepares time in several formats, so that it can be conveniently used on the PDP-11 side
719 +API контроллера сразу готовит время в нескольких форматах, дабы его было удобно применить на стороне PDP-11
720 720  
721 721  {{info}}
722 -datetime buffer format octal offset - those words datetime buffer format
722 +формат буфера даты-времени
723 +offset в восьмеричной системе - те слова
724 +формат буфера даты-времени
723 723  \\[0]=rtc_rt11date();
724 724  [2]=rt11 time 50Hz big word;
725 725  [4]=rt11 time 50Hz little word;
... ... @@ -737,72 +737,72 @@
737 737  {{/info}}
738 738  
739 739  
740 -== SimpleIN buffer format (when writing) ==
742 +== Формат буфера SimpleIN (при записи) ==
741 741  
742 -the format is simplified as much as possible, for work with PDP-11
744 +формат максимально упрощен, для работы со стороны PDP-11
743 743  
744 744  {{info}}
745 -offset in octal - those words
747 +offset в восьмеричной системе - те слова
746 746  
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
749 +[0]=year       год, младшие две цифры - те 22 а не 2022(!)
750 +[2]=month;     месяц
751 +[4]=day;       день
752 +[6]=wday;      день недели =0 не установлен, 1- понедельник 2 - вторник итд
753 +[10]=hour;     час
754 +[12]=min;      минута
755 +[14]=sec;      секунда
754 754  {{/info}}
755 755  
756 756  
757 -== 031: Get time from RTC to timestamp buffer ==
759 +== **031:  Получить время из RTC в буфер timestamp** ==
758 758  
759 -Command code 031, this command uses RTC clock as a source of filling the timestamp buffer
761 +Код команды 031, данная команда использует RTC часы как источник заполнения буфера timestamp
760 760  
761 -Example program:
763 +Пример программы:
762 762  
763 763  {{code language="assembler"}}
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
766 +; trap 61 - чтение данных часов из автономных часов RTC
767 +; R3 - адрес буфера куда надо считать
768 +; результат в R3 адрес, если успешно. R3=0 если ошибка
767 767  GetDateFromRTC: push R0
768 768   push R1
769 769   push R2
770 - call AZreset; reset
772 + call AZreset; сбросим
771 771   tst R1
772 772   bne G60ERR
773 773   MOV #AZ$CSR,R1
774 774   mov #31,(R1)
775 - br G60; let's go there because further code is the same
777 + br G60; идем туда тк дальше код одинаковый
776 776  {{/code}}
777 777  
778 -== 032: Get time from timestamp buffer ==
780 +== **032:  Получить время из буфера timestamp** ==
779 779  
780 -Command code 032, this command sends the contents of the timestamp buffer to the bus
782 +Код команды 032, данная команда отдает на шину содержимое буфера timestamp
781 781  
782 782  {{code language="assembler"}}
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 +; работа с часами
786 +; trap 60 - чтение данных часов из TCP/IP стека
787 +; R3 - адрес буфера куда надо считать
788 +; результат в R3 адрес, если успешно. R3=0 если ошибка
787 787  GetDateFromLAN: push R0
788 788   push R1
789 789   push R2
790 - call AZreset; reset
792 + call AZreset; сбросим
791 791   tst R1
792 792   bne G60ERR
793 793   MOV #AZ$CSR,R1
794 794   mov #42,(R1)
795 -G60: TSTB (R1); check execution result
796 - BPL G60; wait
797 +G60: TSTB (R1); проверяем результат выполнения
798 + BPL G60; ждем
797 797   mov #32,(R1)
798 -1$: TSTB (R1); check execution result
800 +1$: TSTB (R1); проверяем результат выполнения
799 799   BPL 1$; ждем
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 + TST (R1)+; инкрементируем
803 + mov R3,R0; запомним R3 - адрес
804 + mov #10.,R2; читаем 10 слов
805 +2$: mov (R1),(R3)+; читаем блок слов в память
804 804   sob R2,2$
805 - mov R0,R3; successful, return address to R3
807 + mov R0,R3; успешно, вернем адрес в R3
806 806   br 0END$
807 807  G60ERR: CLR R3
808 808  0END$: pop R2
... ... @@ -811,11 +811,11 @@
811 811   return
812 812  {{/code}}
813 813  
814 -It is worth checking the correctness of the received time:
816 +Стоит проверить корректность полученного времени:
815 815  
816 816  {{code language="assembler"}}
817 -; trap 63 - check time correctness
818 -; R3 - buffer address, result in R3, if buffer address then OK, =0 error
819 +; trap 63 - проверка корректности времени
820 +; R3 - адрес буфера, результат в R3, если адрес буфера то OK, =0 ошибка
819 819  CheckDateTime: Cmp 6(r3),#2021.
820 820   Blos 1err
821 821   Cmp 6(r3),#2100.
... ... @@ -825,119 +825,119 @@
825 825   return
826 826  {{/code}}
827 827  
828 -== 033: Write time-date to SimpleIN buffer ==
830 +== **033:  Запись времени-даты в буфер SimpleIN** ==
829 829  
830 -Command code 033, this command receives data from the bus into the SimpleIN buffer
832 +Код команды 033, данная команда  принимает с шины данные в буфер SimpleIN
831 831  
832 -The operation of this command is similar to the operation of commands 023 and 016.
834 +Работа данной команды аналогична работе команд [[023>>doc:||anchor="H023:41F44043843D44F44244C44144843843D44B43243144344443544043443043D43D44B43543443B44F43F43E44143B43543444344E44943543943743043F438441438432431443444435440"]] и [[016>>doc:||anchor="H016:A041F44043843D44F44244C43143B43E43A43443043D43D44B445432431443444435440"]].
833 833  
834 -== 034: Set RTC based on buffer data ==
836 +== **034:  Установка RTC на основании данных из буфера** ==
835 835  
836 -Command code 034, this command sets the RTC based on the data in the SimpleIN buffer
838 +Код команды 034, данная команда  устанавливает RTC на основании данных в буфере SimpleIN
837 837  
838 -This command executes quickly, but to avoid problems, a wait loop is recommended.
840 +Данная команда выполняется быстро, но для исключения проблем цикл ожидания выполнения рекомендуется.
839 839  
840 -== 035: Stimulate time request from NTP server, set based on response ==
842 +== **035:  Стимуляция запроса времени с NTP сервера, установка на основании ответа** ==
841 841  
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.
844 +Код команды 035, данная команда отправляет запрос на NTP cервер (установленный в AZ.INI файле или полученный от DHCP) и устанавливает часы в стеке TCP/IP.
843 843  
844 -Example program: sending a request to set the time from an NTP server
846 +Пример программы: отсылка запроса на установку времени с NTP сервера
845 845  
846 846  {{code language="assembler"}}
847 -; trap 62 - sending a request to set the time from the NTP server
849 +; trap 62 - отсылка запроса на установку времени с NTP сервера
848 848  GetDateNTPtoNET:push R1
849 - call AZreset; reset
851 + call AZreset; сбросим
850 850   tst R1
851 851   bne 0ERR$
852 852   MOV #AZ$CSR,R1
853 853   mov #35,(R1)
854 -0$: TSTB (R1); check the result of execution
855 - BPL 0$; wait
856 +0$: TSTB (R1); проверяем результат выполнения
857 + BPL 0$; ждем
856 856  0ERR$: pop R1
857 857   return
858 858  {{/code}}
859 859  
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.
862 +Выполнение команды занимает 1-2 секунды в среднем. Данная команда требует работы стека TCP/IP, соответственно нужны циклы ожидания при включенном стеке.
861 861  
862 -An example of a polling cycle to get time from the network
864 +Пример цикла опроса с целью получить время с сети
863 863  
864 864  {{code language="assembler"}}
865 -; date-time
867 +; дата-время
866 866   mov #S_DateTime_0,R3; "Lan Date:"
867 867   trap 10
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
870 + mov #20,R4; количество циклов ожидания
871 +$datry: trap 62; отослали запрос к NTP серверу
872 + mov #110,@#AZ$CSR; включим сеть
873 + trap 47; ожидание
874 + trap 47; ожидание
873 873   mov #ADRTMPSTR,R3
874 - trap 60; read the date-time into the buffer
875 - trap 63; checked the date-time
876 + trap 60; считали в буфер дату-время
877 + trap 63; проверили дату-время
876 876   tst R3
877 877   bne $ok
878 878  $sob: sob R4,$datry
879 - mov #S_DateTime_2,R3; print error
881 + mov #S_DateTime_2,R3; печать ошибки
880 880   trap 7
881 881   br $go
882 882  
883 883  $ok: mov #ADRTMPSTR,R3
884 - trap 24; print date
885 - trap 25; time
886 -$go: mov #110,@#AZ$CSR; let's turn on the network
886 + trap 24; печать даты
887 + trap 25; времени
888 +$go: mov #110,@#AZ$CSR; включим сеть
887 887  {{/code}}
888 888  
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.
891 +Тут мы явно отсылаем запрос к NTP серверу, затем включаем работу сети и ждем результата, периодически опрашивая и проверяя корректность результата.
890 890  
891 -== 036: Setting RTC based on TCP/IP stack clock ==
893 +== **036:  Установка RTC на основании часов TCP/IP стека** ==
892 892  
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.
895 +Код команды 036,  данная команда устанавливает RTC на основании часов в TCP/IP стека. Предварительно надо установить часы в TCP/IP - команда 036.
894 894  
895 -Example program:
897 +Пример программы:
896 896  
897 897  {{code language="assembler"}}
898 -; trap 64 - set RTC time based on stack time
899 -; R1 - result R1=0 - OK
900 -SetDateNETtoRTC:call AZreset; reset
900 +; trap 64 - установка времени RTC на основании времени стека
901 +; R1 - результат R1=0 - OK
902 +SetDateNETtoRTC:call AZreset; сбросим
901 901   tst R1
902 902   bne 0ERR$
903 903   MOV #AZ$CSR,R1
904 904   mov #36,(R1)
905 -0$: TSTB (R1); check execution result
906 - BPL 0$; wait
907 +0$: TSTB (R1); проверяем результат выполнения
908 + BPL 0$; ждем
907 907   clr R1
908 908  0ERR$: return
909 909  {{/code}}
910 910  
911 -== 042: Get time from TCP/IP stack clock into timestamp buffer ==
913 +== **042:  Получить время из часов TCP/IP стека в буфер timestamp** ==
912 912  
913 -Command code 042, this command uses the TCP/IP stack clock as a source for filling the timestamp buffer.
915 +Код команды 042,   данная команда использует часы TCP/IP стека как источник заполнения буфера timestamp.
914 914  
915 -Example program:
917 +Пример программы:
916 916  
917 917  {{code language="assembler"}}
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 +; работа с часами
921 +; trap 60 - чтение данных часов из TCP/IP стека
922 +; R3 - адрес буфера куда надо считать
923 +; результат в R3 адрес, если успешно. R3=0 если ошибка
922 922  GetDateFromLAN: push R0
923 923   push R1
924 924   push R2
925 - call AZreset; reset
927 + call AZreset; сбросим
926 926   tst R1
927 927   bne G60ERR
928 928   MOV #AZ$CSR,R1
929 929   mov #42,(R1)
930 -G60: TSTB (R1); check execution result
931 - BPL G60; wait
932 +G60: TSTB (R1); проверяем результат выполнения
933 + BPL G60; ждем
932 932   mov #32,(R1)
933 -1$: TSTB (R1); check execution result
934 - BPL 1$; wait
935 - TST (R1)+; increment
936 - mov R3,R0; remember R3 address
935 +1$: TSTB (R1); проверяем результат выполнения
936 + BPL 1$; ждем
937 + TST (R1)+; инкрементируем
938 + mov R3,R0; запомним R3 - адрес
937 937   mov #10.,R2; читаем 10 слов
938 -2$: mov (R1),(R3)+; read block of words into memory
940 +2$: mov (R1),(R3)+; читаем блок слов в память
939 939   sob R2,2$
940 - mov R0,R3; successful, return address to R3
942 + mov R0,R3; успешно, вернем адрес в R3
941 941   br 0END$
942 942  G60ERR: CLR R3
943 943  0END$: pop R2
... ... @@ -946,50 +946,52 @@
946 946   return
947 947  {{/code}}
948 948  
949 -All commands set the ready bit upon completion.
951 +все команды устанавливают бит готовности по завершению.
950 950  
951 951  
952 -= **[[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] **specific commands =
954 += **Команды специфические для [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]]** =
953 953  
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.
956 +Данные команды предназначены для работы контроллера AZБК®, разработанного для серии компьютеров БК - БК-0010/БК-0010.01/БК-0011М.
955 955  
956 -Other AZ® controllers ignore these commands.
958 +Другие контроллеры AZ® игнорируют эти команды
957 957  
958 -== 037: Restart of the** [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] **controller and the entire computer ==
960 +== **037: перезапуск контроллера [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] и всей БК** ==
959 959  
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
962 +Код команды 037,  данная команда осуществляет перезапуск микроконтроллера AZ®, что вызывает и перезапуск самой БК-0010/БК-0010.01/БК-0011М
961 961  
962 -Example program
964 +Пример программы
963 963  
964 964  {{code language="assembler"}}
965 -AZ$CSR = 177220; command and status register (CSR)
966 -AZ$DR = 177222; data register (DR)
967 +AZ$CSR = 177220; регистр команд и состояния (CSR)
968 +AZ$DR = 177222; регистр данных (DR)
967 967  
968 968  
969 -; trap 57 - full restart
970 -AZcouldReboot: call AZreset; reset AZ so it is ready to receive
971 +; trap 57 - перезапуск БК полный
972 +AZcouldReboot: call AZreset; сбросим AZ дабы он был готов принимать команды
971 971   mov #037,@#AZ$CSR
972 972   return
973 973  {{/code}}
974 974  
975 -== 044: Saving a screenshot to a file ==
977 +== **044: Cохранение скриншота в файл** ==
976 976  
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 +Код команды 044,  данная команда предназначена для снятия образа памяти указанного размера (или определенного автоматически на основании сохраненных параметров)
980 +технически команда может служить как средство отладки ибо способная снимать образ памяти
981 +общее ограничение на снятие образа памяти - 2МБ на один образ
982 +\\в качестве параметров используется служебная страница памяти 76(8)
979 979  
980 -Structure of filling information about a screenshot
984 +Структура заполнения информации о скриншоте
981 981  
982 982  {{code language="c"}}
983 -// screenshot header structure
987 +// структура хидера скриншота
984 984  typedef __packed struct screen_header
985 985  {
986 - unsigned short int tag; // must be equal to 0240
990 + unsigned short int tag; // должен быть равен 0240
987 987  
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
992 + unsigned int begin_adress; // начальный адрес в словах - прямая задача в физических адресах
993 + unsigned int length; // длина в словах - прямая задача в физических адресах
990 990  
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
995 + unsigned short int begin_page; // начальная страница - номер - прямая задача в номерах страниц
996 + unsigned short int len_pages; // количество страниц - прямая задача в номерах страниц
993 993  
994 994   unsigned short int R177300; //
995 995   unsigned short int R177302; //
... ... @@ -1007,55 +1007,57 @@
1007 1007   unsigned short int R177332; //
1008 1008   unsigned short int R177334; //
1009 1009   unsigned short int R177336; //
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
1014 + unsigned short int R177340; // - Регистр управления активацией окно - маски окон
1015 + unsigned short int R177342; // - Регистр управления r/o на окно
1016 + unsigned short int R177344; // - Регистр управления shadow окон - маски окон
1017 + unsigned short int R177346; // - Регистр управления маппером
1018 + unsigned short int R177350; // - регистр копия по записи 177130 в режиме записи управления памятью в SMK
1019 + unsigned short int R177352; // - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
1016 1016  
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
1021 + unsigned short int R177230; // - регистр управления
1022 + unsigned short int R177232; // - регистр номера страницы начала отображения - верхняя страница (слой 0)
1023 + unsigned short int R177240; // - регистр номера страницы начала отображения - средняя страница (слой 1)
1024 + unsigned short int R177242; // - регистр номера страницы начала отображения - нижняя страница (слой 2)
1025 + unsigned short int R177244; // - регистр вертикального скролинга слой 2
1026 + unsigned short int R177246; // - регистр вертикального скролинга слой 1
1027 + unsigned short int R177250; // - регистр вертикального скролинга слой 0
1028 + unsigned short int R177252; // - регистр гозизонтального скролинга слой 0
1029 + unsigned short int R177254; // - регистр гозизонтального скролинга слой 1
1030 + unsigned short int R177256; // - регистр гозизонтального скролинга слой 2
1027 1027  
1028 1028   unsigned short int paldata[338]; //
1029 1029  } screen_header_t;
1030 1030  {{/code}}
1031 1031  
1032 -Example code for filling a memory page
1036 +Пример кода для заполнения страницы памяти
1033 1033  
1034 1034  {{code language="assembler"}}
1035 1035  ;--------------------------------------------------
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
1040 +; карта 76й страницы - туда мы готовим данные для команды скринщотов
1041 + SCR_PAGE = 130000 ; 76ую страницу цепляем на место 77й временно - те в окно 130000
1042 + SCR_TAG = SCR_PAGE+0 ; тут вход - 240 - 1 слово
1043 + SCR_ADDR_CONF = SCR_TAG+2 ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
1044 + SCR_PAGE_CONF = SCR_ADDR_CONF+8. ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
1045 + SCR_MEM_CONF = SCR_PAGE_CONF+4. ; cюда конфигурацию памяти из регистров - 22 слова
1046 + SCR_VGA_CONF = SCR_MEM_CONF+44. ; сюда конфигурацию видеоконтроллера - 10 cлов
1047 + SCR_PAL = SCR_VGA_CONF+20. ; сюда 338. значений(слов) палитры 338 слов
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
1049 1049  
1050 - mov #100377,R3 ; constant-filler
1050 +
1051 +; trap 41 - подготовка дефолтной информации для работы функционала скриншотов
1052 +PrepSRC: jsr R5, PUSHA ; пакетное сохранение регистров
1053 + mov @#177326,-(SP) ; сохраним страницу 130k которая была до вызова
1054 + mov #76,@#177326 ; цепляем 76ую страницу в окно
1055 +
1056 + mov #100377,R3 ; константа-заполнитель
1051 1051   mov #SCR_PAGE,R4
1052 1052   mov #2047.,R2
1053 1053  4$: mov R3,(R4)+
1054 1054   sob R2,4$
1055 1055  
1056 - mov #240,@#SCR_TAG ; put the tag
1062 + mov #240,@#SCR_TAG ; проставляем тег
1057 1057  
1058 - ; clean the address section - default is automatic address detection
1064 + ; чистим участок адресов - дефолтно автоматическое определение адресов
1059 1059   clr R3
1060 1060   mov #SCR_ADDR_CONF,R4
1061 1061   mov #10,R2
... ... @@ -1062,7 +1062,7 @@
1062 1062  2$: mov R3,(R4)+
1063 1063   sob R2,2$
1064 1064  
1065 - ; memory configuration - default
1071 + ;конфигурация памяти - дефолтная
1066 1066   mov #SCR_MEM_CONF,R4
1067 1067   mov #30,(R4)+ ;177300
1068 1068   mov #31,(R4)+ ;177302
... ... @@ -1081,29 +1081,29 @@
1081 1081   mov #110,(R4)+ ;177334
1082 1082   mov #100,(R4)+ ;177336
1083 1083  
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
1090 + mov #170000,(R4)+ ;177340 - Регистр управления активацией окно - маски окон
1091 + mov R3,(R4)+ ;177342 - Регистр управления r/o на окно
1092 + mov #7777,(R4)+ ;177344 - Регистр управления shadow окон - маски окон
1093 + mov #40404,(R4)+ ;177346 - Регистр управления маппером
1094 + mov R3,(R4)+ ;177350 - регистр копия по записи 177130 в режиме записи управления памятью в SMK
1095 + mov #16000,(R4)+ ;177352 - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
1090 1090  
1091 - ;Video controller configuration - default
1097 + ;конфигурация видеоконтроллера - дефолтная
1092 1092   ; 177230-177256
1093 1093   mov #SCR_VGA_CONF,R4
1094 1094  
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
1101 + mov #12201,(R4)+ ;177230 - регистр управления
1102 + mov #4,(R4)+ ;177232 - регистр номера страницы начала отображения - верхняя страница (слой 0)
1103 + mov R3,(R4)+ ;177240 - регистр номера страницы начала отображения - средняя страница (слой 1) "под спрайты"
1104 + mov R3,(R4)+ ;177242 - регистр номера страницы начала отображения - нижняя страница (слой 2) "под фон"
1105 + mov R3,(R4)+ ;177244 - регистр вертикального скролинга слой 2
1106 + mov R3,(R4)+ ;177246 - регистр вертикального скролинга слой 1
1107 + mov R3,(R4)+ ;177250 - регистр вертикального скролинга слой 0
1108 + mov R3,(R4)+ ;177252 - регистр гозизонтального скролинга слой 0
1109 + mov R3,(R4)+ ;177254 - регистр гозизонтального скролинга слой 1
1110 + mov R3,(R4)+ ;177256 - регистр гозизонтального скролинга слой 2
1105 1105  
1106 - ; download the palette - take the default one from this ROM
1112 + ; закачиваем палитру - берем дефолтную из этой ПЗУшки
1107 1107   mov #SCR_PAL,R4
1108 1108   mov #PalData,R2
1109 1109   mov #338.,R3
... ... @@ -1110,233 +1110,233 @@
1110 1110  1$: mov (R2)+,(R4)+
1111 1111   sob R3,1$
1112 1112  
1113 - mov (SP)+,@#177326; return the page from which the call was made
1119 + mov (SP)+,@#177326; вернем страницу с которой был вызов
1114 1114   return
1115 1115  {{/code}}
1116 1116  
1117 -There are three options for specifying memory areas.
1123 +Вариантов указания участков памяти три
1118 1118  
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.
1125 +1. указать адрес и длину 24х битные - формат, если их нет - система смотрит дальше
1126 +1. указать номер страницы и количество страницы, если их нет
1127 +1. система смотрит дальше - те делает скриншот на основании данных о регистрах 177230 и т.д..
1122 1122  
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)
1129 +Cкриншот сохраняется в формате
1130 +- страница 76 - ее первый килобайт
1131 +- сам образ памяти (если режим слоеный - то все три слоя)
1126 1126  
1127 1127  
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
1134 +Перед вызовом команды можно загрузить имя файла для сохранения скриншота [в cmosmem буфер], однако при его отсутствии (в буфере не будет имени - строки заканчивающейся 0) система сформирует свое имя, на основании следующего правила:
1135 +дефолтный путь для сохранения скриншотов
1129 1129  0:/SCREENS/
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 +формат имени - DDHHMISS.SCR
1138 +где DD - две цифры дня месяца, HH - час, MI - минута, SS-секунда
1139 +\\Если в процессе выполнения команды возникнет ошибка - вместо имени будет "ERROR *"
1140 +к примеру
1134 1134  "ERROR f_open 6"
1135 1135  
1136 1136  
1137 -Example program
1144 +Пример программы
1138 1138  
1139 1139  {{code language="assembler"}}
1140 -; update the information in the screenshot header
1147 +; обновим информацию в хидере скриншота
1141 1141  ;--------------------------------------------------
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
1149 +; карта 76й страницы - туда мы готовим данные для команды скринщотов
1150 + SPAGE = 170000 ; 76ую страницу цепляем на место 77й временно - те в окно 130000
1151 + STAG = SPAGE+0 ; тут вход - 240 - 1 слово
1152 + SADDRC = STAG+2 ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
1153 + SPAGEC = SADDRC+8. ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
1154 + SMEMC = SPAGEC+4. ; cюда конфигурацию памяти из регистров - 22 слова
1155 + SVGAC = SMEMC+44. ; сюда конфигурацию видеоконтроллера - 10 cлов
1156 + SPAL = SVGAC+20. ; сюда 338. значений(слов) палитры 338 слов
1150 1150  ;--------------------------------------------------
1151 - mov @#177326,R5 ; save page 130k which was before the call
1152 - mov #76,@#177336 ; hook the 76th page into the window
1153 1153  
1154 - ;video controller configuration
1159 + mov @#177326,R5 ; сохраним страницу 130k которая была до вызова
1160 + mov #76,@#177336 ; цепляем 76ую страницу в окно
1161 +
1162 + ;конфигурация видеоконтроллера
1155 1155   ; 177230-177256
1156 1156   mov #SVGAC,R4
1157 1157  
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
1166 + mov @#177230,(R4)+;177230 - регистр управления
1167 + mov @#177232,(R4)+;177232 - регистр - верхняя страница (слой 0)
1168 + mov @#177240,(R4)+;177240 - регистр - средняя страница (слой 1)
1169 + mov @#177242,(R4)+;177242 - регистр - нижняя страница (слой 2)
1170 + mov @#177244,(R4)+;177244 - регистр вертикального скролинга слой 2
1171 + mov @#177246,(R4)+;177246 - регистр вертикального скролинга слой 1
1172 + mov @#177250,(R4)+;177250 - регистр вертикального скролинга слой 0
1173 + mov @#177252,(R4)+;177252 - регистр гозизонтального скролинга слой 0
1174 + mov @#177254,(R4)+;177254 - регистр гозизонтального скролинга слой 1
1175 + mov @#177256,(R4)+;177256 - регистр гозизонтального скролинга слой 2
1168 1168  
1169 - mov R5,@#177336; return the page from which the call was made
1177 + mov R5,@#177336; вернем страницу с которой был вызов
1170 1170  
1171 1171  
1172 1172   ;-------------------------
1173 - MOV #AZ$CSR,R3 ; Preparing controller CSR
1174 - MOV #AZ$DR,R4 ; Preparing controller DR
1175 -20$: CLR (R3) ; Reset the controller
1181 + MOV #AZ$CSR,R3 ; Готовим CSR контроллера
1182 + MOV #AZ$DR,R4 ; Готовим DR контроллера
1183 +20$: CLR (R3) ; Сбросим контроллер
1176 1176   TSTB (R3)
1177 1177   BPL 20$
1178 1178  
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 + ; очистим блок памяти для имени - дабы система сделала дефолтное имя файла
1188 + mov #23,(R3) ; командуем что будем писать данные в буфер
1189 +128$: TSTB (R3) ; проверяем результат выполнения
1190 + BPL 128$ ; ждем
1183 1183   clr R1
1184 1184  
1185 1185   mov #256.,R2 ;
1186 -129$: mov R1,(R4) ; give to the controller
1194 +129$: mov R1,(R4) ; отдаем в контроллер
1187 1187   sob R2,129$
1188 1188  
1189 1189  
1190 - MOV #044,(R3) ; screenshot command
1198 + MOV #044,(R3) ; команда скриншот
1191 1191  22$: TSTB (R3) ;
1192 1192   BPL 22$ ;
1193 1193  
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 + ; получим имя скриншота
1203 + mov #22,(R3) ; отдать на шину считанный блок памяти из буфера
1204 +121$: tstb (R3) ; проверяем результат выполнения
1205 + bpl 121$ ; ждем
1198 1198  
1199 1199   mov #BUF,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
1208 + mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения
1209 +122$: mov (R4),(R1)+ ; читаем блок слов в память
1202 1202   sob R2,122$
1203 1203  
1204 1204   .PRINT #RESOK
1205 1205   .Print #BUF
1206 1206  
1207 - mov #110,@#AZ$CSR; enable the network by default, the network should be constantly enabled
1215 + mov #110,@#AZ$CSR; включаем сеть по-умолчанию сеть должна быть постоянно включена
1208 1208   .Exit
1209 1209  {{/code}}
1210 1210  
1211 -To unpack a screenshot, you can use this utility - [[https:~~/~~/master.pdp-11.ru/screen_unpack/>>https://master.pdp-11.ru/screen_unpack/]]
1219 +Для распаковки скриншота можно использовать вот эту утилиту
1212 1212  
1213 1213  
1214 1214  
1215 -= Commands for working with the TCP/IP stack =
1223 += **Команды для работы со стеком TCP/IP** =
1216 1216  
1217 -The following commands operate on the TCP/IP stack information buffer.
1225 +следующие команды работают с буфером информации TCP/IP cтека.
1218 1218  
1219 -== 040: Get IP address and other TCP/IP stack settings to buffer ==
1227 +== **040: Получить ip адрес и прочие настройки стека TCP/IP в буфер** ==
1220 1220  
1221 -Command code 040, this command fills the buffer with information from the TCP/IP stack with current (actual) information.
1229 +Код команды 040,  данная команда заполняет буфер информацией с TCP/IP cтека текущей (фактической) информацией.
1222 1222  
1223 -== 041: Reading ip address buffer ==
1231 +== **041: Чтение буфера ip адреса** ==
1224 1224  
1225 -Command code 041, this command transfers the buffer to the bus
1233 +Код команды 041,  данная команда передает буфер на шину
1226 1226  
1227 -This pair of commands allows you to get current information from the stack
1235 +эта пара команд позволяет получить текущую информацию со стека
1228 1228  
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
1237 +* IP адрес
1238 +* MASK маску
1239 +* GW гейтвей
1240 +* NTP адрес NTP-сервера
1241 +* DNS1 адрес основного DNS
1242 +* DNS2 адрес резервного DNS
1235 1235  
1236 -accordingly it is 12 words
1244 +соответственно это 12 слов
1237 1237  
1238 -Example program:
1246 +Пример программы:
1239 1239  
1240 1240  {{code language="assembler"}}
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 -
1249 +; trap 52 - чтение блока IP адресов в блок памяти IPADDDBLOCK (8. ячеек)
1250 +; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
1251 +GetIPaddrs: push R1
1252 + push R2
1253 + call AZreset; сбросим
1254 + tst R1
1255 + bne 0ERR$
1256 + MOV #AZ$CSR,R1
1257 + mov #40,(R1)
1258 +0$: TSTB (R1); прочитать адреса в свою память
1259 + BPL 0$; ждем
1260 + mov #41,(R1)
1261 +1$: TSTB (R1); подготовить буфер
1262 + BPL 1$; ждем
1263 + TST (R1)+; инкрементируем
1264 + mov #IPADDDBLOCK,R3
1265 + mov #12.,R2
1266 +2$: mov (R1),(R3)+; читаем блок слов в память
1267 + sob R2,2$
1268 + mov #IPADDDBLOCK,R3; успешно
1269 + br 0END$
1270 +0ERR$: CLR R3
1271 +0END$: pop R2
1272 + pop R1
1273 + return
1267 1267  {{/code}}
1268 1268  
1269 -Example return data:
1276 +Пример данных
1270 1270  
1271 1271  {{info}}
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
1279 +Примеры данных - возвращаемые слова в восьмеричном формате
1280 +124300 116400 - IP адрес 192.168.0.157
1281 +177777 000377 - MASK маску 255.255.255.0
1282 +124300 000400 - GW гейтвей 192.168.0.1
1283 +124300 000400 - NTP адрес NTP-сервера 192.168.0.1
1284 +124300 050000 - DNS1 адрес основного DNS 192.168.0.90
1285 +124300 055000 - DNS2 адрес резервного DNS 192.168.0.80
1279 1279  {{/info}}
1280 1280  
1281 -== 043: Read MAC address into ip buffer ==
1288 +== **043: чтение MAC-адреса в ip буфер** ==
1282 1282  
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
1290 +Код команды 043, данная команда читает текущий фактический MAC адрес в буфер IP адресов
1291 +те сначала 043, а затем 041 команды
1284 1284  
1285 -Example program:
1293 +Пример программы:
1286 1286  
1287 1287  {{code language="assembler"}}
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 -
1296 +; trap 72 - чтение MAC адреса в блок памяти IPADDDBLOCK (12. ячеек)
1297 +; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
1298 +GetMACaddrs: push R1
1299 + push R2
1300 + call AZreset ; сбросим
1301 + tst R1
1302 + bne 0ERR$
1303 + MOV #AZ$CSR,R1
1304 + mov #43,(R1)
1305 +0$: TSTB (R1) ; прочитать адреса в свою память
1306 + BPL 0$ ; ждем
1307 + mov #41,(R1)
1308 +1$: TSTB (R1) ; подготовить буфер
1309 + BPL 1$ ; ждем
1310 + TST (R1)+ ; инкрементируем
1311 + mov #IPADDDBLOCK,R3
1312 + mov #12.,R2
1313 +2$: mov (R1),(R3)+ ; читаем блок слов в память
1314 + sob R2,2$
1315 + mov #IPADDDBLOCK,R3; успешно
1316 + br 0END$
1317 +0ERR$: CLR R3
1318 +0END$: pop R2
1319 + pop R1
1320 + retur
1314 1314  {{/code}}
1315 1315  
1316 1316  
1317 1317  
1318 -= Commands for working with a MicroSD card at the file level =
1325 += **Команды для работы с MicroSD картой на файловом уровне** =
1319 1319  
1320 1320  
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.
1328 +Данные команды предназначены для работы с MicroSD картой на уровне файловой системы и позволяет читать/писать файлы без монтирования файлов как образов дисков.
1322 1322  
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)
1330 +Эти команды используют буфер 256. слов который задействован в интерфейсе работы с энергонезависимой памятью (см выше команды 022 023)
1331 +\\Ограничения - длина полного пути к файлу  256 байт
1324 1324  
1325 -Limitations - the length of the full path to the file is 256 bytes
1333 +== **050: Установить имя файла который будем читать** ==
1326 1326  
1327 -== 050: Set the name of the file we will read ==
1335 +Код команды 050 данная команда устанавливает имя файла который будем читать, при этом производится открытие файла на чтение, а также получение его свойств.
1328 1328  
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.
1337 +== **051: Получить размер файла на чтение (или его статус) на МПИ** ==
1330 1330  
1331 -== 051: Get file size for reading (or its status) on BUS ==
1339 +Код команды 051 данная команда передает на МПИ размер файла или ошибку его чтения. Размер файла 31бит, старший бит является признаком ошибки. Соответственно максимальный размер файлов с которыми можно работать через этот интерфейс ограничен 2^31 байт (2GB).
1332 1332  
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 +формирование ошибки выглядит так:
1342 +sizeanyfile=1<<31 + FFres; ~/~/ если установлен старший бит 32х битного слова - то в младшей части код ошибки
1343 +\\FFres = ошибка FatFS
1344 +
1334 1334  
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 -
1340 1340  {{code language="c"}}
1341 1341  typedef enum {
1342 1342   FR_OK = 0, /* (0) Succeeded */
... ... @@ -1364,244 +1364,252 @@
1364 1364  
1365 1365  [[http:~~/~~/elm-chan.org/fsw/ff/doc/open.html>>url:http://elm-chan.org/fsw/ff/doc/open.html]]
1366 1366  
1367 -== 052: Read a block of a set file into a buffer ==
1373 +== **052: Читать блок установленного файла в буфер** ==
1368 1368  
1369 -Command code 052, this command reads a file into a non-volatile memory buffer.
1375 +Код команды 052,  данная команда осуществляет чтение файла в буфер энергонезависимой памяти.
1370 1370  
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.
1377 +В итоге схема чтения файла выглядит вот так
1378 +**023** - заливаем имя файла в буфер
1379 +**050** - устанавливаем файл на чтение
1380 +**051 **- читаем длину файла или ошибку открытия файла
1381 +если ошибка - повторяем сначала 023 050 051
1382 +если все ok - приступаем к чтению файла
1383 +**052** - читает блок файла в буфер
1384 +**022 **- забираем данные из буфера
1385 +пары 052 022 повторяем нужное количество раз дабы считать весь файл
1386 +как файл будет прочтен - последняя 052 команда закроет его автоматически.
1387 +
1381 1381  
1382 -Example program:
1389 +Пример программы
1383 1383  
1384 1384  {{code language="assembler"}}
1385 - call AZRST; reset
1386 1386  
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
1393 + call AZRST; сбросим
1397 1397  
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
1395 +; заливаем в буфер имя файла
1396 +7$: mov #23,(R1); командуем что будем писать данные в буфер
1397 +5$: TSTB (R1); проверяем результат выполнения
1398 + BPL 5$ ; ждем
1399 + TST (R1)+; инкрементируем
1400 + mov #FILNM,R3
1401 +1$: mov (R3),(R1); отдаем в контроллер
1402 + tst (R3)+
1403 + bne 1$
1404 + tst -(R1); декрементируем
1402 1402  
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
1411 1411  
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 + ; устанавливаем файл на чтение
1408 + mov #50,(R1); устанавливаем файл на чтение
1409 +2$: TSTB (R1); проверяем результат выполнения
1410 + BPL 2$ ; ждем
1420 1420  
1421 -; read the file
1422 - mov R1,R4; R1 holds the file length
1423 - MOV #AZ$CSR,R1
1424 - mov #BUFFL,R5
1425 1425  
1426 - bit #1,R4; if an odd number of bytes
1427 - beq 47$
1428 - inc R4; add 1 more byte as we read words
1413 + ; читаем длину файда
1414 + mov #51,(R1); устанавливаем файл на чтение
1415 +3$: TSTB (R1); проверяем результат выполнения
1416 + BPL 3$ ; ждем
1417 + TST (R1)+; инкрементируем
1418 + mov #FILSZ,R3
1419 + mov (R1),(R3)+; читаем с контроллера
1420 + mov (R1),(R3); читаем с контроллера
1429 1429  
1430 -47$: tst R4
1431 - beq 45$ ; nothing left to read - exit
1422 + ; выведем длину файла на экран
1423 + clr R0
1424 + mov #FILSZ+2,R3
1425 + mov (R3),R1
1426 + call DNOZ
1427 + mov -(R3),R1
1428 + call DNOZ
1429 + .print #STMS2
1432 1432  
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 + ; читаем файл
1432 + mov R1,R4; в R1 осталась длина файла
1433 + MOV #AZ$CSR,R1
1434 + mov #BUFFL,R5
1439 1439  
1440 - cmp R4,#512.; compare with buffer size in bytes
1441 - Blos 44$ ; less than buffer size left
1436 + bit #1,R4; если нечетное число байт
1437 + beq 47$
1438 + inc R4; добавим еще 1 байт тк читаем словами
1442 1442  
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$
1440 +47$: tst R4
1441 + beq 45$ ; уже нечего читать - выходим
1451 1451  
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$
1458 1458  
1459 -45$: clr (R5); set end of file marker
1444 + mov #52,(R1); читаем блок в буфер
1445 +4$: TSTB (R1); проверяем результат выполнения
1446 + BPL 4$ ; ждем
1447 + mov #22,(R1); будем читать буфер
1448 +51$: TSTB (R1); проверяем результат выполнения
1449 + BPL 51$ ; ждем
1460 1460  
1461 -; file read - display on screen
1462 - .print #STMS4
1463 - .print #BUFFL
1464 - .print #STMS5
1451 + cmp R4,#512.; сравниваем c размером буфера в байтах
1452 + Blos 44$ ; осталось меньше чем буфер
1465 1465  
1466 - mov #110,@#AZ$CSR; enable network
1467 - .Exit
1468 1468  
1455 + .print #STMS1
1456 + mov #256.,R2
1457 + TST (R1)+; переходим на регистр данных
1458 +46$: mov (R1),(R5)+; читаем в буфер
1459 + sob R2,46$
1460 + sub #512.,R4; вычитаем
1461 + TST -(R1); переходим на регистр команд
1462 + br 47$
1463 +
1464 +44$: .print #STMS3
1465 + mov R4,R2
1466 + asr R2 ; /2 тк читаем словами
1467 + TST (R1)+; переходим на регистр данных
1468 +43$: mov (R1),(R5)+; читаем в буфер
1469 + sob R2,43$
1470 +
1471 +
1472 +45$: clr (R5); проставим конец файла
1473 + ; файл считан - выводим на экран
1474 + .print #STMS4
1475 + .print #BUFFL
1476 + .print #STMS5
1477 +
1478 +
1479 + mov #110,@#AZ$CSR; включаем сеть
1480 + .Exit
1469 1469  {{/code}}
1470 1470  
1471 1471  
1472 1472  
1473 -== 053: set the name of the file that we will write ==
1485 +== **053:** установить имя файла который будем писать ==
1474 1474  
1475 -Command code 053, this command opens a file for writing, receives opening parameters (or errors).
1487 +Код команды 053,  данная команда открывает файл на запись, получает параметры открытия (или ошибки).
1476 1476  
1477 -== 054: Set file length ==
1489 +== **054:** установка длины файла ==
1478 1478  
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.
1491 +Код команды 054,  данная команда устанавливает ожидаемую длину файла, это нужно для корректного формирования файла на файловом уровне MicroSD карты, а также для организации передачи данных.
1480 1480  
1481 -== 055: write data from buffer to file ==
1493 +== **055:** записать в файл данные из буфера ==
1482 1482  
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.
1495 +Код команды 055,  данная команда записывает в открытый файл на запись данные из буфера энергонезависимой памяти. Последняя команда 055 автоматически закроет файл по достижению заявленной длины файла.
1484 1484  
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
1497 +Схема подачи команд при записи вот такая
1498 +**023** - заливаем имя файла в буфер
1499 +**053** - устанавливаем файл на чтение
1500 +**051 **- статус открытия/создания файла
1501 +если ошибка - повторяем сначала 023 053 051
1502 +если все ok - идем дальше
1503 +**054** - установка длины файла, те надо сразу объявить какая у нас будет длина файла
1504 +**023** - заливаем блок данных в буфер
1505 +**055** - пишем из буфера в файл
1506 +пары 023 055 повторяем нужное количество раз дабы записать весь файл
1507 +как файл будет записан - последняя 055 команда закроет его автоматически
1496 1496  
1497 1497  
1498 -Example program:
1510 +Пример программы:
1499 1499  
1500 1500  {{code language="assembler"}}
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
1513 +; заливаем в буфер имя файла
1514 + MOV #AZ$CSR,R1
1515 +17$: mov #23,(R1); командуем что будем писать данные в буфер
1516 +15$: TSTB (R1) ; проверяем результат выполнения
1517 + BPL 15$ ; ждем
1518 + TST (R1)+ ; переходим на регистр данных
1519 + mov #FILNM2,R3
1520 +11$: mov (R3),(R1); отдаем в контроллер
1521 + tst (R3)+
1522 + bne 11$
1523 + tst -(R1) ; переходим на регистр команд
1512 1512  
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 + ; устанавливаем файл на запись
1526 + mov #53,(R1); устанавливаем файл на запись
1527 +12$: TSTB (R1) ; проверяем результат выполнения
1528 + BPL 12$ ; ждем
1517 1517  
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 -; 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
1531 + ; читаем статус создания файла
1532 + mov #51,(R1)
1533 +13$: TSTB (R1) ; проверяем результат выполнения
1534 + BPL 13$ ; ждем
1535 + TST (R1)+ ; переходим на регистр данных
1536 + mov #STATS,R3
1537 + mov (R1),(R3)+; читаем с контроллера
1538 + mov (R1),(R3); читаем с контроллера
1535 1535  
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
1540 + ; тут надо проверить - если файл создан то оба слова нулевые
1541 + mov #STATS,R3
1542 + TST (R3)+
1543 + BNE 66$
1544 + TST (R3)
1545 + BEQ 60$
1546 +66$: .print #ERRMS1 ; печать ошибки
1547 + .exit
1544 1544  
1545 - tst -(R1) ; move to command register
1549 +60$: MOV #AZ$CSR,R1
1550 + mov #54,(R1); установим длину файла который будем писать
1551 +23$: TSTB (R1) ; проверяем результат выполнения
1552 + BPL 23$ ; ждем
1553 + TST (R1)+ ; переходим на регистр данных
1554 + mov #FILSZ,R3
1555 + mov (R3)+,(R1); пишем в контроллер
1556 + mov (R3),(R1); пишем в контроллер
1546 1546  
1547 -; write file
1548 - mov @#FILSZ,R4; file length
1549 - MOV #AZ$CSR,R1
1550 - mov #BUFFL,R5; file buffer
1558 + tst -(R1) ; переходим на регистр команд
1551 1551  
1552 - bit #1,R4 ; if an odd number of bytes
1553 - beq 147$
1554 - inc R4 ; add 1 more byte since reading words
1555 1555  
1556 -147$: tst R4 ; check length
1557 - beq 145$ ; nothing left to write - exit
1558 1558  
1559 - mov #23,(R1); write to buffer
1560 -151$: TSTB (R1) ; check execution result
1561 - BPL 151$ ; wait
1562 + ; пишем файл
1563 + mov @#FILSZ,R4; длина файла
1564 + MOV #AZ$CSR,R1
1565 + mov #BUFFL,R5; буфер файла
1562 1562  
1563 - cmp R4,#512.; compare with buffer size in bytes
1564 - Blos 144$ ; less than buffer size left
1567 + bit #1,R4 ; если нечетное число байт
1568 + beq 147$
1569 + inc R4 ; добавим еще 1 байт тк читаем словами
1565 1565  
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
1571 +147$: tst R4 ; проверим длину
1572 + beq 145$ ; уже нечего писать - выходим
1573 1573  
1574 - mov #55,(R1); write buffer to file
1575 -104$: TSTB (R1) ; check execution result
1576 - BPL 104$ ; wait
1577 - br 147$ ; loop back
1574 + mov #23,(R1); будем писать в буфер
1575 +151$: TSTB (R1) ; проверяем результат выполнения
1576 + BPL 151$ ; ждем
1578 1578  
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$
1578 + cmp R4,#512.; сравниваем c размером буфера в байтах
1579 + Blos 144$ ; осталось меньше чем буфер
1585 1585  
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
1581 + .print #STMS6 ; заливка полного блока
1582 + mov #256.,R2
1583 + TST (R1)+ ; переходим на регистр данных
1584 +146$: mov (R5)+,(R1); пишем в буфер контроллера
1585 + sob R2,146$
1586 + sub #512.,R4; вычитаем
1587 + TST -(R1) ; переходим на регистр команд
1590 1590  
1591 -145$: .print #STMSE ; end
1592 - mov #110,@#AZ$CSR; enable network
1593 - .Exit ; exit
1589 + mov #55,(R1); запись буфера в файл
1590 +104$: TSTB (R1) ; проверяем результат выполнения
1591 + BPL 104$ ; ждем
1592 + br 147$ ; в начало
1594 1594  
1594 +144$: .print #STMS7 ; заливка последнего блока
1595 + TST (R1)+ ; переходим на регистр данных
1596 + mov R4,R2
1597 + asr R2 ; /2 тк пишем словами
1598 +143$: mov (R5)+,(R1); пишем в буфер контроллера
1599 + sob R2,143$
1600 +
1601 + TST -(R1) ; переходим на регистр команд
1602 + mov #55,(R1); запись пследнего буфера в файл
1603 +105$: TSTB (R1) ; проверяем результат выполнения
1604 + BPL 105$ ; ждем
1605 +
1606 +145$: .print #STMSE ; конец
1607 + mov #110,@#AZ$CSR; включаем сеть
1608 + .Exit ; выходим
1595 1595  {{/code}}
1596 1596  
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]]**
1611 +**[[пример полностью в виде утилиты RT11 выложен вот тут>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**
1598 1598  
1599 1599  
1600 -== 056: Get data on the size of the map into the sizecard buffer ==
1614 +== **056: Получить данные по размеру карты в буфер sizecard** ==
1601 1601  
1602 -Command code 056, this command reads the parameters of the MicroSD card into the sizecard buffer
1616 +Код команды 056,  данная команда читает параметры MicroSD карты в буфер sizecard
1603 1603  
1604 -== 057: Reading sizecard buffer ==
1618 +== **057: Чтение буфера sizecard** ==
1605 1605  
1606 1606  Код команды 057,  данная команда отдает буфер sizecard (2 слова)
1607 1607  
... ... @@ -1609,7 +1609,7 @@
1609 1609  первое слово - общий объем карты доступный для FAT в МБ
1610 1610  второе слово - свободный объем на карте в МБ
1611 1611  
1612 -Example program:
1626 +Пример программы:
1613 1613  
1614 1614  {{code language="assembler"}}
1615 1615  ; trap 51 - получение объема SD карты всего/свободно в мегабайтах
... ... @@ -1645,7 +1645,7 @@
1645 1645  
1646 1646  Код команды 025,  данная команда устанавливает соединение с сервером Hall of Fame, инициализирует шифрованный тоннель и подготавливает API к работе.
1647 1647  
1648 -Example program:
1662 +Пример программы
1649 1649  
1650 1650  {{code language="assembler"}}
1651 1651  AZ$CSR = 177220 ; регистр команд и состояния (CSR)
... ... @@ -1724,7 +1724,7 @@
1724 1724  
1725 1725  Код команды 026,  данная команда осуществляет непосредственный обмен с Hall of Fame
1726 1726  
1727 -Example program:
1741 +Пример программы
1728 1728  
1729 1729  {{code language="assembler"}}
1730 1730   ;4. авторизация пользователя