From 5ed1909839faff1cbc91d88630f8743ccb72a2d9 Mon Sep 17 00:00:00 2001 From: Serge Vakulenko Date: Wed, 21 Jan 2015 12:29:29 -0800 Subject: [PATCH] BESM-6: some correction for indentation and spacing. --- BESM6/besm6_arith.c | 6 +- BESM6/besm6_cpu.c | 56 +-- BESM6/besm6_disk.c | 66 ++-- BESM6/besm6_drum.c | 34 +- BESM6/besm6_mmu.c | 98 ++--- BESM6/besm6_panel.c | 13 +- BESM6/besm6_printer.c | 14 +- BESM6/besm6_punch.c | 17 +- BESM6/besm6_sys.c | 4 +- BESM6/boot_dispak.b6 | 852 +++++++++++++++++++++--------------------- BESM6/test_pprog05.b6 | 18 +- 11 files changed, 596 insertions(+), 582 deletions(-) diff --git a/BESM6/besm6_arith.c b/BESM6/besm6_arith.c index 082078c3..a5e4565f 100644 --- a/BESM6/besm6_arith.c +++ b/BESM6/besm6_arith.c @@ -18,7 +18,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -31,7 +31,7 @@ typedef struct { t_uint64 mantissa; - unsigned exponent; /* offset by 64 */ + unsigned exponent; /* offset by 64 */ } alureg_t; /* ALU register type */ static alureg_t toalu (t_value val) @@ -260,7 +260,7 @@ void besm6_add (t_value val, int negate_acc, int negate_val) #define INT64(x) ((x) & BIT41 ? (-1LL << 40) | (x) : x) static alureg_t nrdiv (alureg_t n, alureg_t d) { - t_int64 nn, dd, q, res; + t_int64 nn, dd, q, res; alureg_t quot; /* to compensate for potential normalization to the right */ diff --git a/BESM6/besm6_cpu.c b/BESM6/besm6_cpu.c index 9ae36106..94c2c952 100644 --- a/BESM6/besm6_cpu.c +++ b/BESM6/besm6_cpu.c @@ -19,7 +19,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -60,8 +60,8 @@ t_value memory [MEMSIZE]; uint32 PC, RK, Aex, M [NREGS], RAU, RUU; t_value ACC, RMR, GRP, MGRP; uint32 PRP, MPRP; -uint32 READY, READY2; /* ready flags of various devices */ -int32 tmr_poll = CLK_DELAY; /* pgm timer poll */ +uint32 READY, READY2; /* ready flags of various devices */ +int32 tmr_poll = CLK_DELAY; /* pgm timer poll */ extern const char *scp_errors[]; @@ -145,12 +145,24 @@ REG cpu_reg[] = { }; MTAB cpu_mod[] = { - { MTAB_XTD|MTAB_VDV, 0, "IDLE", "IDLE", &sim_set_idle, &sim_show_idle, NULL, "Enables idle detection mode" }, - { MTAB_XTD|MTAB_VDV, 0, NULL, "NOIDLE", &sim_clr_idle, NULL, NULL, "Disables idle detection" }, - { MTAB_XTD|MTAB_VDV, 0, NULL, "REQ", &cpu_req, NULL, NULL, "Sends a request interrupt" }, - { MTAB_XTD|MTAB_VDV, 0, "PANEL", "PANEL", &besm6_init_panel, &besm6_show_panel, NULL, "Displays graphical panel" }, - { MTAB_XTD|MTAB_VDV, 0, NULL, "NOPANEL", &besm6_close_panel, NULL, NULL, "Closes graphical panel" }, - { MTAB_XTD|MTAB_VDV|MTAB_VALO, 0, "PULT", "PULT", &cpu_set_pult, &cpu_show_pult, NULL, "Selects a hardwired program or switch reg." }, + { MTAB_XTD|MTAB_VDV, + 0, "IDLE", "IDLE", &sim_set_idle, &sim_show_idle, NULL, + "Enables idle detection mode" }, + { MTAB_XTD|MTAB_VDV, + 0, NULL, "NOIDLE", &sim_clr_idle, NULL, NULL, + "Disables idle detection" }, + { MTAB_XTD|MTAB_VDV, + 0, NULL, "REQ", &cpu_req, NULL, NULL, + "Sends a request interrupt" }, + { MTAB_XTD|MTAB_VDV, + 0, "PANEL", "PANEL", &besm6_init_panel, &besm6_show_panel, NULL, + "Displays graphical panel" }, + { MTAB_XTD|MTAB_VDV, + 0, NULL, "NOPANEL", &besm6_close_panel, NULL, NULL, + "Closes graphical panel" }, + { MTAB_XTD|MTAB_VDV|MTAB_VALO, + 0, "PULT", "PULT", &cpu_set_pult, &cpu_show_pult, NULL, + "Selects a hardwired program or switch reg." }, { 0 } }; @@ -393,7 +405,7 @@ t_stat cpu_set_pult (UNIT *u, int32 val, char *cptr, void *desc) if (cptr) sw = atoi(cptr); else sw = 0; if (sw >= 0 && sw <= 10) { pult_packet_switch = sw; - if (sw) + if (sw) sim_printf("Pult packet switch set to hardwired program %d\n", sw); else sim_printf("Pult packet switch set to switch registers\n"); @@ -496,7 +508,7 @@ static void cmd_002 () case 64: case 65: case 66: case 67: case 68: case 69: case 70: case 71: case 72: case 73: case 74: case 75: case 76: case 77: case 78: case 79: case 80: case 81: case 82: case 83: case 84: case 85: case 86: case 87: - case 88: case 89: case 90: case 91: case 92: case 93: case 94: case 95: + case 88: case 89: case 90: case 91: case 92: case 93: case 94: case 95: /* 0100 - 0137: * Бит 1: управление блокировкой режима останова БРО. * Биты 2 и 3 - признаки формирования контрольных @@ -546,9 +558,9 @@ static void cmd_033 () #endif switch (Aex & 04177) { case 0: - /* + /* * Using an I/O control instruction with Aex == 0 - * after issuing a 033 instruction with a non-zero Aex + * after issuing a 033 instruction with a non-zero Aex * to send data to a device was required * for some devices (e.g. printers) according to the docs. * What is the exact purpose is unclear (timing, power, ???) @@ -1735,18 +1747,18 @@ t_stat sim_instr (void) } if (PC > BITS(15) && IS_SUPERVISOR(RUU)) { - /* + /* * Runaway instruction execution in supervisor mode * warrants attention. */ besm6_draw_panel(1); - return STOP_RUNOUT; /* stop simulation */ + return STOP_RUNOUT; /* stop simulation */ } if (sim_brk_summ & SWMASK('E') && /* breakpoint? */ sim_brk_test (PC, SWMASK ('E'))) { besm6_draw_panel(1); - return STOP_IBKPT; /* stop simulation */ + return STOP_IBKPT; /* stop simulation */ } if (PRP & MPRP) { @@ -1789,8 +1801,8 @@ t_stat fast_clk (UNIT * this) GRP |= GRP_TIMER; if ((counter & 15) == 0) { - /* - * The OS used the (undocumented, later addition) + /* + * The OS used the (undocumented, later addition) * slow clock interrupt to initiate servicing * terminal I/O. Its frequency was reportedly 16 Hz; * 64 ms is a good enough approximation. It can be sped up @@ -1806,7 +1818,7 @@ t_stat fast_clk (UNIT * this) } /* Baudot TTYs are synchronised to the main timer rather than the - * serial line clock. Their baud rate is 50. + * serial line clock. Their baud rate is 50. */ if (tty_counter == CLK_TPS/50) { tt_print(); @@ -1827,9 +1839,9 @@ t_stat clk_reset (DEVICE * dev) /* Схема автозапуска включается по нереализованной кнопке "МР" */ - if (!sim_is_running) { /* RESET (not IORESET)? */ - tmr_poll = sim_rtcn_init (clocks[0].wait, 0); /* init timer */ - sim_activate (&clocks[0], tmr_poll); /* activate unit */ + if (!sim_is_running) { /* RESET (not IORESET)? */ + tmr_poll = sim_rtcn_init (clocks[0].wait, 0); /* init timer */ + sim_activate (&clocks[0], tmr_poll); /* activate unit */ } return SCPE_OK; } diff --git a/BESM6/besm6_disk.c b/BESM6/besm6_disk.c index 062a0f07..4ad10280 100644 --- a/BESM6/besm6_disk.c +++ b/BESM6/besm6_disk.c @@ -22,9 +22,9 @@ * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. - * Except as contained in this notice, the name of Leonid Broukhis or - * Serge Vakulenko shall not be used in advertising or otherwise to promote - * the sale, use or other dealings in this Software without prior written + * Except as contained in this notice, the name of Leonid Broukhis or + * Serge Vakulenko shall not be used in advertising or otherwise to promote + * the sale, use or other dealings in this Software without prior written * authorization from Leonid Broukhis and Serge Vakulenko. */ #include "besm6_defs.h" @@ -33,14 +33,14 @@ /* * Управляющее слово обмена с магнитным диском. */ -#define DISK_BLOCK 0740000000 /* номер блока памяти - 27-24 рр */ -#define DISK_READ_SYSDATA 004000000 /* считывание только служебных слов */ -#define DISK_PAGE_MODE 001000000 /* обмен целой страницей */ -#define DISK_READ 000400000 /* чтение с диска в память */ -#define DISK_PAGE 000370000 /* номер страницы памяти */ -#define DISK_HALFPAGE 000004000 /* выбор половины листа */ -#define DISK_UNIT 000001600 /* номер устройства */ -#define DISK_HALFZONE 000000001 /* выбор половины зоны */ +#define DISK_BLOCK 0740000000 /* номер блока памяти - 27-24 рр */ +#define DISK_READ_SYSDATA 004000000 /* считывание только служебных слов */ +#define DISK_PAGE_MODE 001000000 /* обмен целой страницей */ +#define DISK_READ 000400000 /* чтение с диска в память */ +#define DISK_PAGE 000370000 /* номер страницы памяти */ +#define DISK_HALFPAGE 000004000 /* выбор половины листа */ +#define DISK_UNIT 000001600 /* номер устройства */ +#define DISK_HALFZONE 000000001 /* выбор половины зоны */ /* * "Хороший" статус чтения/записи. @@ -70,8 +70,8 @@ typedef struct { t_value *sysdata; /* Буфер системных данных */ } KMD; -static KMD controller [2]; /* Две стойки КМД */ -int disk_fail; /* Маска ошибок по направлениям */ +static KMD controller [2]; /* Две стойки КМД */ +int disk_fail; /* Маска ошибок по направлениям */ t_stat disk_event (UNIT *u); @@ -102,19 +102,19 @@ UNIT disk_unit [16] = { }; REG disk_reg[] = { - { "КУС_0", &controller[0].op, 8, 24, 0, 1 }, - { "УСТР_0", &controller[0].dev, 8, 3, 0, 1 }, - { "ЗОНА_0", &controller[0].zone, 8, 10, 0, 1 }, - { "ДОРОЖКА_0", &controller[0].track, 8, 2, 0, 1 }, - { "МОЗУ_0", &controller[0].memory, 8, 20, 0, 1 }, - { "РС_0", &controller[0].status, 8, 24, 0, 1 }, - { "КУС_1", &controller[1].op, 8, 24, 0, 1 }, - { "УСТР_1", &controller[1].dev, 8, 3, 0, 1 }, - { "ЗОНА_1", &controller[1].zone, 8, 10, 0, 1 }, - { "ДОРОЖКА_1", &controller[1].track, 8, 2, 0, 1 }, - { "МОЗУ_1", &controller[1].memory, 8, 20, 0, 1 }, - { "РС_1", &controller[1].status, 8, 24, 0, 1 }, - { "ОШ", &disk_fail, 8, 6, 0, 1 }, + { "КУС_0", &controller[0].op, 8, 24, 0, 1 }, + { "УСТР_0", &controller[0].dev, 8, 3, 0, 1 }, + { "ЗОНА_0", &controller[0].zone, 8, 10, 0, 1 }, + { "ДОРОЖКА_0", &controller[0].track, 8, 2, 0, 1 }, + { "МОЗУ_0", &controller[0].memory, 8, 20, 0, 1 }, + { "РС_0", &controller[0].status, 8, 24, 0, 1 }, + { "КУС_1", &controller[1].op, 8, 24, 0, 1 }, + { "УСТР_1", &controller[1].dev, 8, 3, 0, 1 }, + { "ЗОНА_1", &controller[1].zone, 8, 10, 0, 1 }, + { "ДОРОЖКА_1", &controller[1].track, 8, 2, 0, 1 }, + { "МОЗУ_1", &controller[1].memory, 8, 20, 0, 1 }, + { "РС_1", &controller[1].status, 8, 24, 0, 1 }, + { "ОШ", &disk_fail, 8, 6, 0, 1 }, { 0 } }; @@ -233,9 +233,10 @@ t_value spread (t_value val) int i, j; t_value res = 0; - for (i = 0; i < 5; i++) for (j = 0; j < 9; j++) - if (val & (1LL<<(i+j*5))) - res |= 1LL << (i*9+j); + for (i = 0; i < 5; i++) + for (j = 0; j < 9; j++) + if (val & (1LL<<(i+j*5))) + res |= 1LL << (i*9+j); return res & BITS48; } @@ -378,9 +379,10 @@ t_value collect (t_value val) int i, j; t_value res = 0; - for (i = 0; i < 5; i++) for (j = 0; j < 9; j++) - if (val & (1LL<<(i*9+j))) - res |= 1LL << (i+j*5); + for (i = 0; i < 5; i++) + for (j = 0; j < 9; j++) + if (val & (1LL<<(i*9+j))) + res |= 1LL << (i+j*5); return res & BITS48; } diff --git a/BESM6/besm6_drum.c b/BESM6/besm6_drum.c index e29df468..e4a6bbab 100644 --- a/BESM6/besm6_drum.c +++ b/BESM6/besm6_drum.c @@ -18,7 +18,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -31,18 +31,18 @@ /* * Управляющее слово обмена с магнитным барабаном. */ -#define DRUM_READ_OVERLAY 020000000 /* считывание с наложением */ -#define DRUM_PARITY_FLAG 010000000 /* блокировка считывания слов с неверной - * чётностью или запись с неверной чётностью */ -#define DRUM_READ_SYSDATA 004000000 /* считывание только служебных слов */ -#define DRUM_PAGE_MODE 001000000 /* обмен целой страницей */ -#define DRUM_READ 000400000 /* чтение с барабана в память */ -#define DRUM_PAGE 000370000 /* номер страницы памяти */ -#define DRUM_BLOCK 0740000000 /* номер блока памяти - 27-24 рр */ -#define DRUM_PARAGRAF 000006000 /* номер абзаца */ -#define DRUM_UNIT 000001600 /* номер барабана */ -#define DRUM_CYLINDER 000000174 /* номер тракта на барабане */ -#define DRUM_SECTOR 000000003 /* номер сектора */ +#define DRUM_READ_OVERLAY 020000000 /* считывание с наложением */ +#define DRUM_PARITY_FLAG 010000000 /* блокировка считывания слов с неверной + * чётностью или запись с неверной чётностью */ +#define DRUM_READ_SYSDATA 004000000 /* считывание только служебных слов */ +#define DRUM_PAGE_MODE 001000000 /* обмен целой страницей */ +#define DRUM_READ 000400000 /* чтение с барабана в память */ +#define DRUM_PAGE 000370000 /* номер страницы памяти */ +#define DRUM_BLOCK 0740000000 /* номер блока памяти - 27-24 рр */ +#define DRUM_PARAGRAF 000006000 /* номер абзаца */ +#define DRUM_UNIT 000001600 /* номер барабана */ +#define DRUM_CYLINDER 000000174 /* номер тракта на барабане */ +#define DRUM_SECTOR 000000003 /* номер сектора */ /* * Параметры обмена с внешним устройством. @@ -69,11 +69,11 @@ UNIT drum_unit [] = { }; REG drum_reg[] = { - { "УС", &drum_op, 8, 24, 0, 1 }, - { "ЗОНА", &drum_zone, 8, 10, 0, 1 }, - { "СЕКТОР", &drum_sector, 8, 2, 0, 1 }, + { "УС", &drum_op, 8, 24, 0, 1 }, + { "ЗОНА", &drum_zone, 8, 10, 0, 1 }, + { "СЕКТОР", &drum_sector, 8, 2, 0, 1 }, { "МОЗУ", &drum_memory, 8, 15, 0, 1 }, - { "СЧСЛОВ", &drum_nwords, 8, 11, 0, 1 }, + { "СЧСЛОВ", &drum_nwords, 8, 11, 0, 1 }, { 0 } }; diff --git a/BESM6/besm6_mmu.c b/BESM6/besm6_mmu.c index ba00c3a8..498841db 100644 --- a/BESM6/besm6_mmu.c +++ b/BESM6/besm6_mmu.c @@ -19,7 +19,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -72,7 +72,7 @@ t_value pult[11][8] = { /* Switch registers */ { 0 }, /* Hardwired program 1, a simple CU test */ - { 0376, + { 0376, SET_CONVOL(01240000007100002LL, CONVOL_INSN), /* 1: vtm (2), vjm 2(1) */ SET_CONVOL(00657777712577777LL, CONVOL_INSN), /* 2: utm -1(1), utm -1(2) */ SET_CONVOL(00444000317400007LL, CONVOL_INSN), /* 3: mtj 3(1), vzm 7(3) */ @@ -95,7 +95,7 @@ t_value pult[11][8] = { SET_CONVOL(00737777703000001LL, CONVOL_INSN) /* 6: stop -1(1), uj 1 */ }, /* Hardwired program 3, RAM read test to use after program 2, arx/atx applies */ - { 0176, + { 0176, SET_CONVOL(00770000306400012LL, CONVOL_INSN), /* 1: vlm 3(1), vtm 12(1) */ SET_CONVOL(00010000000000010LL, CONVOL_INSN), /* 2: xta 0, atx 10 */ SET_CONVOL(00010001000130007LL, CONVOL_INSN), /* 3: xta 10, arx 7 */ @@ -152,53 +152,53 @@ t_value pult[11][8] = { /* Hardwired program 10, magtape read */ { 0176, }, -}; +}; REG mmu_reg[] = { - { "БРЗ0", &BRZ[0], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, /* Буферные регистры записи */ - { "БРЗ1", &BRZ[1], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРЗ2", &BRZ[2], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРЗ3", &BRZ[3], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРЗ4", &BRZ[4], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРЗ5", &BRZ[5], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРЗ6", &BRZ[6], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРЗ7", &BRZ[7], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БАЗ0", &BAZ[0], 8, 16, 0, 1 }, /* Буферные адреса записи */ - { "БАЗ1", &BAZ[1], 8, 16, 0, 1 }, - { "БАЗ2", &BAZ[2], 8, 16, 0, 1 }, - { "БАЗ3", &BAZ[3], 8, 16, 0, 1 }, - { "БАЗ4", &BAZ[4], 8, 16, 0, 1 }, - { "БАЗ5", &BAZ[5], 8, 16, 0, 1 }, - { "БАЗ6", &BAZ[6], 8, 16, 0, 1 }, - { "БАЗ7", &BAZ[7], 8, 16, 0, 1 }, - { "ТАБСТ", &TABST, 8, 28, 0, 1, NULL, NULL, REG_HIDDEN },/* Таблица старшинства БРЗ */ - { "ЗпТР", &FLUSH, 8, 4, 0, 1, NULL, NULL, REG_HIDDEN },/* Признак выталкивания БРЗ */ - { "Старш", &OLDEST, 8, 3, 0, 1 }, /* Номер вытолкнутого БРЗ */ - { "РП0", &RP[0], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, /* Регистры приписки, по 12 бит */ - { "РП1", &RP[1], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, - { "РП2", &RP[2], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, - { "РП3", &RP[3], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, - { "РП4", &RP[4], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, - { "РП5", &RP[5], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, - { "РП6", &RP[6], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, - { "РП7", &RP[7], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, - { "РЗ", &RZ, 8, 32, 0, 1 }, /* Регистр защиты */ - { "ТР1", &pult[0][1], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, /* Тумблерные регистры */ - { "ТР2", &pult[0][2], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "ТР3", &pult[0][3], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "ТР4", &pult[0][4], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "ТР5", &pult[0][5], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "ТР6", &pult[0][6], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "ТР7", &pult[0][7], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРС0", &BRS[0], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, /* Буферные регистры слов */ - { "БРС1", &BRS[1], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРС2", &BRS[2], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БРС3", &BRS[3], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, - { "БАС0", &BAS[0], 8, 16, 0, 1 }, /* Буферные адреса слов */ - { "БАС1", &BAS[1], 8, 16, 0, 1 }, - { "БАС2", &BAS[2], 8, 16, 0, 1 }, - { "БАС3", &BAS[3], 8, 16, 0, 1 }, - { "БРСст", &BRSLRU, 8, 6, 0, 1, NULL, NULL, REG_HIDDEN}, + { "БРЗ0", &BRZ[0], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, /* Буферные регистры записи */ + { "БРЗ1", &BRZ[1], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРЗ2", &BRZ[2], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРЗ3", &BRZ[3], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРЗ4", &BRZ[4], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРЗ5", &BRZ[5], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРЗ6", &BRZ[6], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРЗ7", &BRZ[7], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БАЗ0", &BAZ[0], 8, 16, 0, 1 }, /* Буферные адреса записи */ + { "БАЗ1", &BAZ[1], 8, 16, 0, 1 }, + { "БАЗ2", &BAZ[2], 8, 16, 0, 1 }, + { "БАЗ3", &BAZ[3], 8, 16, 0, 1 }, + { "БАЗ4", &BAZ[4], 8, 16, 0, 1 }, + { "БАЗ5", &BAZ[5], 8, 16, 0, 1 }, + { "БАЗ6", &BAZ[6], 8, 16, 0, 1 }, + { "БАЗ7", &BAZ[7], 8, 16, 0, 1 }, + { "ТАБСТ", &TABST, 8, 28, 0, 1, NULL, NULL, REG_HIDDEN },/* Таблица старшинства БРЗ */ + { "ЗпТР", &FLUSH, 8, 4, 0, 1, NULL, NULL, REG_HIDDEN },/* Признак выталкивания БРЗ */ + { "Старш", &OLDEST, 8, 3, 0, 1 }, /* Номер вытолкнутого БРЗ */ + { "РП0", &RP[0], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, /* Регистры приписки, по 12 бит */ + { "РП1", &RP[1], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, + { "РП2", &RP[2], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, + { "РП3", &RP[3], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, + { "РП4", &RP[4], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, + { "РП5", &RP[5], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, + { "РП6", &RP[6], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, + { "РП7", &RP[7], 8, 48, 0, 1, NULL, NULL, REG_VMIO}, + { "РЗ", &RZ, 8, 32, 0, 1 }, /* Регистр защиты */ + { "ТР1", &pult[0][1], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, /* Тумблерные регистры */ + { "ТР2", &pult[0][2], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "ТР3", &pult[0][3], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "ТР4", &pult[0][4], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "ТР5", &pult[0][5], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "ТР6", &pult[0][6], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "ТР7", &pult[0][7], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРС0", &BRS[0], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, /* Буферные регистры слов */ + { "БРС1", &BRS[1], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРС2", &BRS[2], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БРС3", &BRS[3], 8, 50, 0, 1, NULL, NULL, REG_VMIO}, + { "БАС0", &BAS[0], 8, 16, 0, 1 }, /* Буферные адреса слов */ + { "БАС1", &BAS[1], 8, 16, 0, 1 }, + { "БАС2", &BAS[2], 8, 16, 0, 1 }, + { "БАС3", &BAS[3], 8, 16, 0, 1 }, + { "БРСст", &BRSLRU, 8, 6, 0, 1, NULL, NULL, REG_HIDDEN}, { 0 } }; @@ -206,7 +206,7 @@ REG mmu_reg[] = { MTAB mmu_mod[] = { { 1, 0, "NOCACHE", "NOCACHE" }, - { 1, 1, "CACHE", "CACHE" }, + { 1, 1, "CACHE", "CACHE" }, { 0 } }; diff --git a/BESM6/besm6_panel.c b/BESM6/besm6_panel.c index e3e4317a..74eba251 100644 --- a/BESM6/besm6_panel.c +++ b/BESM6/besm6_panel.c @@ -20,7 +20,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -45,12 +45,12 @@ /* * Use a 640x480 window with 32 bit pixels. */ -#define WIDTH 800 -#define HEIGHT 400 -#define DEPTH 32 +#define WIDTH 800 +#define HEIGHT 400 +#define DEPTH 32 -#define STEPX 14 -#define STEPY 16 +#define STEPX 14 +#define STEPY 16 #include #include @@ -405,7 +405,6 @@ static SDL_Window *sdlWindow; static SDL_Renderer *sdlRenderer; static SDL_Texture *sdlTexture; - /* * Initializing of the graphical window and the fonts. */ diff --git a/BESM6/besm6_printer.c b/BESM6/besm6_printer.c index 89bd11f5..07b8cf5f 100644 --- a/BESM6/besm6_printer.c +++ b/BESM6/besm6_printer.c @@ -18,7 +18,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -52,20 +52,20 @@ struct acpu_t { unsigned char line[128][MAX_STRIKES]; } acpu[2]; -#define PRN1_NOT_READY (1<<19) -#define PRN2_NOT_READY (1<<18) +#define PRN1_NOT_READY (1<<19) +#define PRN2_NOT_READY (1<<18) /* 1 = можно пользоваться молоточками, 0 - бумага в процессе протяжки */ -#define PRN1_LINEFEED (1<<23) -#define PRN2_LINEFEED (1<<22) +#define PRN1_LINEFEED (1<<23) +#define PRN2_LINEFEED (1<<22) #define SLOW_START 100*MSEC #define FAST_START 1*MSEC #define LINEFEED_SYNC 1 /* Чтобы быстрее печатало; в жизни 20-25 мс/1.4 мс ~= 17 */ REG printer_reg[] = { - { "Готов", &READY, 2, 2, 18, 1 }, - { "Прогон", &READY, 2, 2, 22, 1 }, + { "Готов", &READY, 2, 2, 18, 1 }, + { "Прогон", &READY, 2, 2, 22, 1 }, { 0 } }; diff --git a/BESM6/besm6_punch.c b/BESM6/besm6_punch.c index aa5579e5..d9ca0a0d 100644 --- a/BESM6/besm6_punch.c +++ b/BESM6/besm6_punch.c @@ -18,7 +18,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -45,13 +45,13 @@ char line[2][128]; /* #define NEGATIVE_RDY */ #ifndef NEGATIVE_RDY -#define ENB_RDY SET_RDY -#define DIS_RDY CLR_RDY -#define IS_RDY ISSET_RDY +# define ENB_RDY SET_RDY +# define DIS_RDY CLR_RDY +# define IS_RDY ISSET_RDY #else -#define ENB_RDY CLR_RDY -#define DIS_RDY SET_RDY -#define IS_RDY ISCLR_RDY +# define ENB_RDY CLR_RDY +# define DIS_RDY SET_RDY +# define IS_RDY ISCLR_RDY #endif #define SET_RDY(x) do READY |= x; while (0) @@ -300,9 +300,10 @@ t_stat fs_event (UNIT *u) int fs_read(int num) { if (fs_dev.dctrl) besm6_debug("<<< ФС1500-%d: байт %03o", num, FS[num]); - + return FS[num]; } + /* * Unlike the OS which uses GOST overline (approximated by ^) as a line separator * in running text mode, the BESM-ALGOL programming system used a nonprintable diff --git a/BESM6/besm6_sys.c b/BESM6/besm6_sys.c index c26543c6..442a8b52 100644 --- a/BESM6/besm6_sys.c +++ b/BESM6/besm6_sys.c @@ -19,7 +19,7 @@ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * SERGE VAKULENKO OR LEONID BROUKHIS BE LIABLE FOR ANY CLAIM, DAMAGES * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, - * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE + * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE * OR OTHER DEALINGS IN THE SOFTWARE. * Except as contained in this notice, the name of Leonid Broukhis or @@ -559,7 +559,7 @@ t_stat parse_sym (char *cptr, t_addr addr, UNIT *uptr, t_value *val, int32 sw) * Форматы строк: * п 76543 - адрес пуска * в 12345 - адрес ввода - * ч -123.45e+6 - вещественное число + * ч -123.45e+6 - вещественное число * с 0123 4567 0123 4567 - восьмеричное слово * к 00 22 00000 00 010 0000 - команды */ diff --git a/BESM6/boot_dispak.b6 b/BESM6/boot_dispak.b6 index 57f5a627..3f07ec16 100644 --- a/BESM6/boot_dispak.b6 +++ b/BESM6/boot_dispak.b6 @@ -19,466 +19,466 @@ с 0 в 02000 -к рег 101, уиа 2260(2) ; 02000 - 0002 0101 1240 2260 -к уиа 2502(12), уиа -56(6) ; 02001 - 5240 2502 3247 7722 -к сч 2537, зп 2605 ; 02002 - 0010 2537 0000 2605 -к сда 101, зп 2664(6) ; 02003 - 0036 0101 3000 2664 +к рег 101, уиа 2260(2) ; 02000 - 0002 0101 1240 2260 +к уиа 2502(12), уиа -56(6) ; 02001 - 5240 2502 3247 7722 +к сч 2537, зп 2605 ; 02002 - 0010 2537 0000 2605 +к сда 101, зп 2664(6) ; 02003 - 0036 0101 3000 2664 к цикл 2003(6), уиа -2(1) ; 02004 - 3370 2003 0647 7776 -к сч 2521(1), зп 502(1) ; 02005 - 0410 2521 0400 0502 +к сч 2521(1), зп 502(1) ; 02005 - 0410 2521 0400 0502 к цикл 2005(1), уиа -2(6) ; 02006 - 0770 2005 3247 7776 -к уиа (13), сч ; 02007 - 5640 0000 0010 0000 +к уиа (13), сч ; 02007 - 5640 0000 0010 0000 к слц 2546(6), цикл 2010(6) ; 02010 - 3013 2546 3370 2010 -к нтж, по 2070 ; 02011 - 0012 0000 0260 2070 -к уиа 2444(5), пв 2346(10) ; 02012 - 2640 2444 4310 2346 -к нтж 2543, пе 2345 ; 02013 - 0012 2543 0270 2345 -к сч 2, пб 3000 ; 02014 - 0010 0002 0300 3000 -к сда 136, и 2427 ; 02015 - 0036 0136 0011 2427 -к по 2017, вч 2664 ; 02016 - 0260 2017 0005 2664 -к уи 16, уии 3(16) ; 02017 - 0040 0016 7044 0003 -к сли 16(16), сли 16(3) ; 02020 - 7045 0016 1445 0016 +к нтж, по 2070 ; 02011 - 0012 0000 0260 2070 +к уиа 2444(5), пв 2346(10) ; 02012 - 2640 2444 4310 2346 +к нтж 2543, пе 2345 ; 02013 - 0012 2543 0270 2345 +к сч 2, пб 3000 ; 02014 - 0010 0002 0300 3000 +к сда 136, и 2427 ; 02015 - 0036 0136 0011 2427 +к по 2017, вч 2664 ; 02016 - 0260 2017 0005 2664 +к уи 16, уии 3(16) ; 02017 - 0040 0016 7044 0003 +к сли 16(16), сли 16(3) ; 02020 - 7045 0016 1445 0016 к уиа -2(3), мода ; 02021 - 1647 7776 0220 0000 -к мода (16), сч 2546(3) ; 02022 - 7220 0000 1410 2546 -к зп 1777(3), цикл 2022(3) ; 02023 - 1400 1777 1770 2022 +к мода (16), сч 2546(3) ; 02022 - 7220 0000 1410 2546 +к зп 1777(3), цикл 2022(3) ; 02023 - 1400 1777 1770 2022 к уиа -1(3), мода ; 02024 - 1647 7777 0220 0000 -к сч 1776, пио 2027(3) ; 02025 - 0010 1776 1740 2027 +к сч 1776, пио 2027(3) ; 02025 - 0010 1776 1740 2027 к сда 110, мода ; 02026 - 0036 0110 0220 0000 -к сда 50, зп 1033(3) ; 02027 - 0036 0050 1400 1033 -к сч 1775, сда 115 ; 02030 - 0010 1775 0036 0115 -к пио 2032(3), сда 120 ; 02031 - 1740 2032 0036 0120 -к и 2540, сда 70 ; 02032 - 0011 2540 0036 0070 -к или 1033(3), зп 1033(3) ; 02033 - 1415 1033 1400 1033 -к сч 1777, пио 2036(3) ; 02034 - 0010 1777 1740 2036 +к сда 50, зп 1033(3) ; 02027 - 0036 0050 1400 1033 +к сч 1775, сда 115 ; 02030 - 0010 1775 0036 0115 +к пио 2032(3), сда 120 ; 02031 - 1740 2032 0036 0120 +к и 2540, сда 70 ; 02032 - 0011 2540 0036 0070 +к или 1033(3), зп 1033(3) ; 02033 - 1415 1033 1400 1033 +к сч 1777, пио 2036(3) ; 02034 - 0010 1777 1740 2036 к сда 110, мода ; 02035 - 0036 0110 0220 0000 -к и 2541, или 1033(3) ; 02036 - 0011 2541 1415 1033 -к зп 1033(3), цикл 2025(3) ; 02037 - 1400 1033 1770 2025 -к уиа 3(16), уиа -1(3) ; 02040 - 7240 0003 1647 7777 -к сч, зп 1773 ; 02041 - 0010 0000 0000 1773 +к и 2541, или 1033(3) ; 02036 - 0011 2541 1415 1033 +к зп 1033(3), цикл 2025(3) ; 02037 - 1400 1033 1770 2025 +к уиа 3(16), уиа -1(3) ; 02040 - 7240 0003 1647 7777 +к сч, зп 1773 ; 02041 - 0010 0000 0000 1773 к уиа 10(7), мода ; 02042 - 3640 0010 0220 0000 -к уиа -1(15), уиа -7(14) ; 02043 - 6647 7777 6247 7771 -к сч 1777(3), слиа 1(15) ; 02044 - 1410 1777 6650 0001 -к сда 140(7), и 2655(15) ; 02045 - 3436 0140 6411 2655 -к по 2060, счи 15 ; 02046 - 0260 2060 0042 0015 -к нтж 2415, уи 17 ; 02047 - 0012 2415 0040 0017 -к сда 71, или 2532 ; 02050 - 0036 0071 0015 2532 -к зп 1774, сч 1773 ; 02051 - 0000 1774 0010 1773 -к сда 33, или 1774 ; 02052 - 0036 0033 0015 1774 -к зп 1774, пв 2126(11) ; 02053 - 0000 1774 4710 2126 -к сч 2534, и 2615 ; 02054 - 0010 2534 0011 2615 -к по 2074, сч 2534 ; 02055 - 0260 2074 0010 2534 -к сда 114, нтж 1775 ; 02056 - 0036 0114 0012 1775 -к и 2423, по 2076 ; 02057 - 0011 2423 0260 2076 -к цикл 2044(14), слиа -10(7) ; 02060 - 6370 2044 3657 7770 -к сч 1773, слц 2664 ; 02061 - 0010 1773 0013 2664 -к зп 1773, сда 102 ; 02062 - 0000 1773 0036 0102 -к по 2043, пио 2066(3) ; 02063 - 0260 2043 1740 2066 -к уиа 4(16), уиа (3) ; 02064 - 7240 0004 1640 0000 -к пб 2041, мода ; 02065 - 0300 2041 0220 0000 -к уиа 2502(5), пв 2367(7) ; 02066 - 2640 2502 3710 2367 -к стоп, пб 2040 ; 02067 - 0330 0000 0300 2040 -к уиа -35(16), уиа 1(13) ; 02070 - 7247 7743 5640 0001 -к сч 72035(16), зп 2601(16) ; 02071 - 7110 2035 7000 2601 -к цикл 2071(16), пв 2346(10) ; 02072 - 7370 2071 4310 2346 -к зп 2543, пб 2014 ; 02073 - 0000 2543 0300 2014 -к сч 2534, нтж 1775 ; 02074 - 0010 2534 0012 1775 -к и 2423, пе 2060 ; 02075 - 0011 2423 0270 2060 -к счи 17, сда 71 ; 02076 - 0042 0017 0036 0071 -к или 2420, зп 1774 ; 02077 - 0015 2420 0000 1774 -к счи 16, сда 76 ; 02100 - 0042 0016 0036 0076 -к слц 1773, сда 33 ; 02101 - 0013 1773 0036 0033 -к или 1774, пб 2105 ; 02102 - 0015 1774 0300 2105 +к уиа -1(15), уиа -7(14) ; 02043 - 6647 7777 6247 7771 +к сч 1777(3), слиа 1(15) ; 02044 - 1410 1777 6650 0001 +к сда 140(7), и 2655(15) ; 02045 - 3436 0140 6411 2655 +к по 2060, счи 15 ; 02046 - 0260 2060 0042 0015 +к нтж 2415, уи 17 ; 02047 - 0012 2415 0040 0017 +к сда 71, или 2532 ; 02050 - 0036 0071 0015 2532 +к зп 1774, сч 1773 ; 02051 - 0000 1774 0010 1773 +к сда 33, или 1774 ; 02052 - 0036 0033 0015 1774 +к зп 1774, пв 2126(11) ; 02053 - 0000 1774 4710 2126 +к сч 2534, и 2615 ; 02054 - 0010 2534 0011 2615 +к по 2074, сч 2534 ; 02055 - 0260 2074 0010 2534 +к сда 114, нтж 1775 ; 02056 - 0036 0114 0012 1775 +к и 2423, по 2076 ; 02057 - 0011 2423 0260 2076 +к цикл 2044(14), слиа -10(7) ; 02060 - 6370 2044 3657 7770 +к сч 1773, слц 2664 ; 02061 - 0010 1773 0013 2664 +к зп 1773, сда 102 ; 02062 - 0000 1773 0036 0102 +к по 2043, пио 2066(3) ; 02063 - 0260 2043 1740 2066 +к уиа 4(16), уиа (3) ; 02064 - 7240 0004 1640 0000 +к пб 2041, мода ; 02065 - 0300 2041 0220 0000 +к уиа 2502(5), пв 2367(7) ; 02066 - 2640 2502 3710 2367 +к стоп, пб 2040 ; 02067 - 0330 0000 0300 2040 +к уиа -35(16), уиа 1(13) ; 02070 - 7247 7743 5640 0001 +к сч 72035(16), зп 2601(16) ; 02071 - 7110 2035 7000 2601 +к цикл 2071(16), пв 2346(10) ; 02072 - 7370 2071 4310 2346 +к зп 2543, пб 2014 ; 02073 - 0000 2543 0300 2014 +к сч 2534, нтж 1775 ; 02074 - 0010 2534 0012 1775 +к и 2423, пе 2060 ; 02075 - 0011 2423 0270 2060 +к счи 17, сда 71 ; 02076 - 0042 0017 0036 0071 +к или 2420, зп 1774 ; 02077 - 0015 2420 0000 1774 +к счи 16, сда 76 ; 02100 - 0042 0016 0036 0076 +к слц 1773, сда 33 ; 02101 - 0013 1773 0036 0033 +к или 1774, пб 2105 ; 02102 - 0015 1774 0300 2105 к уиа 2257(11), мода ; 02103 - 4640 2257 0220 0000 -к уиа 2106(2), сч 1027 ; 02104 - 1240 2106 0010 1027 -к зп 1774, пб (2) ; 02105 - 0000 1774 1300 0000 -к сч 1774, сда 147 ; 02106 - 0010 1774 0036 0147 -к уи 16, сч 1774 ; 02107 - 0040 0016 0010 1774 -к сда 107, и 2415 ; 02110 - 0036 0107 0011 2415 -к уи 17, нтж 2415 ; 02111 - 0040 0017 0012 2415 -к уи 15, сч 1774 ; 02112 - 0040 0015 0010 1774 -к сда 145, и 2416 ; 02113 - 0036 0145 0011 2416 -к сда 75, уи 6 ; 02114 - 0036 0075 0040 0006 -к сли 6(17), сч 1027(16) ; 02115 - 7445 0006 7010 1027 -к и 2625(6), уиа (1) ; 02116 - 3011 2625 0640 0000 -к по 2120, уиа 2(1) ; 02117 - 0260 2120 0640 0002 -к сч 1775, мода ; 02120 - 0010 1775 0220 0000 -к сда 130, слц 2531 ; 02121 - 0036 0130 0013 2531 -к и 2526, мода ; 02122 - 0011 2526 0220 0000 -к сда 77(1), зп 2527 ; 02123 - 0436 0077 0000 2527 +к уиа 2106(2), сч 1027 ; 02104 - 1240 2106 0010 1027 +к зп 1774, пб (2) ; 02105 - 0000 1774 1300 0000 +к сч 1774, сда 147 ; 02106 - 0010 1774 0036 0147 +к уи 16, сч 1774 ; 02107 - 0040 0016 0010 1774 +к сда 107, и 2415 ; 02110 - 0036 0107 0011 2415 +к уи 17, нтж 2415 ; 02111 - 0040 0017 0012 2415 +к уи 15, сч 1774 ; 02112 - 0040 0015 0010 1774 +к сда 145, и 2416 ; 02113 - 0036 0145 0011 2416 +к сда 75, уи 6 ; 02114 - 0036 0075 0040 0006 +к сли 6(17), сч 1027(16) ; 02115 - 7445 0006 7010 1027 +к и 2625(6), уиа (1) ; 02116 - 3011 2625 0640 0000 +к по 2120, уиа 2(1) ; 02117 - 0260 2120 0640 0002 +к сч 1775, мода ; 02120 - 0010 1775 0220 0000 +к сда 130, слц 2531 ; 02121 - 0036 0130 0013 2531 +к и 2526, мода ; 02122 - 0011 2526 0220 0000 +к сда 77(1), зп 2527 ; 02123 - 0436 0077 0000 2527 к счмр, сда 146 ; 02124 - 0031 0000 0036 0146 -к и 2653, зп 2604 ; 02125 - 0011 2653 0000 2604 -к сч, рег 37 ; 02126 - 0010 0000 0002 0037 -к сч 2417, увв 20(16) ; 02127 - 0010 2417 7033 0020 -к уи, сч 1774 ; 02130 - 0040 0000 0010 1774 -к сда 145, и 2416 ; 02131 - 0036 0145 0011 2416 -к или 2654, или 2653 ; 02132 - 0015 2654 0015 2653 -к увв 20(16), уи ; 02133 - 7033 0020 0040 0000 -к рег 237, и 2625(16) ; 02134 - 0002 0237 7011 2625 -к по 2134, сч 2661 ; 02135 - 0260 2134 0010 2661 -к увв 20(16), уи ; 02136 - 7033 0020 0040 0000 -к уи, рег 37 ; 02137 - 0040 0000 0002 0037 -к уиа 2147(6), уиа 11(4) ; 02140 - 3240 2147 2240 0011 -к сч 2655(15), пио 2143(1) ; 02141 - 6410 2655 0740 2143 +к и 2653, зп 2604 ; 02125 - 0011 2653 0000 2604 +к сч, рег 37 ; 02126 - 0010 0000 0002 0037 +к сч 2417, увв 20(16) ; 02127 - 0010 2417 7033 0020 +к уи, сч 1774 ; 02130 - 0040 0000 0010 1774 +к сда 145, и 2416 ; 02131 - 0036 0145 0011 2416 +к или 2654, или 2653 ; 02132 - 0015 2654 0015 2653 +к увв 20(16), уи ; 02133 - 7033 0020 0040 0000 +к рег 237, и 2625(16) ; 02134 - 0002 0237 7011 2625 +к по 2134, сч 2661 ; 02135 - 0260 2134 0010 2661 +к увв 20(16), уи ; 02136 - 7033 0020 0040 0000 +к уи, рег 37 ; 02137 - 0040 0000 0002 0037 +к уиа 2147(6), уиа 11(4) ; 02140 - 3240 2147 2240 0011 +к сч 2655(15), пио 2143(1) ; 02141 - 6410 2655 0740 2143 к или 2604, мода ; 02142 - 0015 2604 0220 0000 -к или 2421, увв 20(16) ; 02143 - 0015 2421 7033 0020 -к уи, счи 4 ; 02144 - 0040 0000 0042 0004 -к увв 20(16), уи ; 02145 - 7033 0020 0040 0000 -к увв 4000(16), пб (6) ; 02146 - 7033 4000 3300 0000 -к и 2654, уиа 2430(5) ; 02147 - 0011 2654 2640 2430 -к по 2412, уиа -7(6) ; 02150 - 0260 2412 3247 7771 -к сч, мода ; 02151 - 0010 0000 0220 0000 -к мод 2521(16), зп 7(6) ; 02152 - 7230 2521 3000 0007 +к или 2421, увв 20(16) ; 02143 - 0015 2421 7033 0020 +к уи, счи 4 ; 02144 - 0040 0000 0042 0004 +к увв 20(16), уи ; 02145 - 7033 0020 0040 0000 +к увв 4000(16), пб (6) ; 02146 - 7033 4000 3300 0000 +к и 2654, уиа 2430(5) ; 02147 - 0011 2654 2640 2430 +к по 2412, уиа -7(6) ; 02150 - 0260 2412 3247 7771 +к сч, мода ; 02151 - 0010 0000 0220 0000 +к мод 2521(16), зп 7(6) ; 02152 - 7230 2521 3000 0007 к цикл 2152(6), уиа -7(6) ; 02153 - 3370 2152 3247 7771 -к зп 1, цикл 2154(6) ; 02154 - 0000 0001 3370 2154 -к сч 1774, увв (16) ; 02155 - 0010 1774 7033 0000 -к сч 2416, или 2422 ; 02156 - 0010 2416 0015 2422 -к увв 20(16), уи ; 02157 - 7033 0020 0040 0000 -к сч 2527, или 2651 ; 02160 - 0010 2527 0015 2651 -к уи, увв 20(16) ; 02161 - 0040 0000 7033 0020 -к уи, увв ; 02162 - 0040 0000 0033 0000 +к зп 1, цикл 2154(6) ; 02154 - 0000 0001 3370 2154 +к сч 1774, увв (16) ; 02155 - 0010 1774 7033 0000 +к сч 2416, или 2422 ; 02156 - 0010 2416 0015 2422 +к увв 20(16), уи ; 02157 - 7033 0020 0040 0000 +к сч 2527, или 2651 ; 02160 - 0010 2527 0015 2651 +к уи, увв 20(16) ; 02161 - 0040 0000 7033 0020 +к уи, увв ; 02162 - 0040 0000 0033 0000 к уиа -50(6), мода ; 02163 - 3247 7730 0220 0000 -к зп 1, цикл 2164(6) ; 02164 - 0000 0001 3370 2164 -к сч, уи ; 02165 - 0010 0000 0040 0000 -к рег 37, уиа 76030(6) ; 02166 - 0002 0037 3247 6030 +к зп 1, цикл 2164(6) ; 02164 - 0000 0001 3370 2164 +к сч, уи ; 02165 - 0010 0000 0040 0000 +к рег 37, уиа 76030(6) ; 02166 - 0002 0037 3247 6030 к уиа 77540(10), мода ; 02167 - 4247 7540 0220 0000 -к сбр, рег 237 ; 02170 - 0020 0000 0002 0237 -к и 2625(16), пе 2175 ; 02171 - 7011 2625 0270 2175 -к цикл 2170(10), цикл 2167(6) ; 02172 - 4370 2170 3370 2167 +к сбр, рег 237 ; 02170 - 0020 0000 0002 0237 +к и 2625(16), пе 2175 ; 02171 - 7011 2625 0270 2175 +к цикл 2170(10), цикл 2167(6) ; 02172 - 4370 2170 3370 2167 к стоп, уиа 2126(7) ; 02173 - 0330 0000 3640 2126 -к уиа 2474(5), пб 2366 ; 02174 - 2640 2474 0300 2366 -к уиа 11(4), пв 2144(6) ; 02175 - 2240 0011 3310 2144 -к зп 2533, и 2651 ; 02176 - 0000 2533 0011 2651 -к пе 2351, увв 4035 ; 02177 - 0270 2351 0033 4035 -к и 2655(16), уиа 2436(5) ; 02200 - 7011 2655 2640 2436 -к пе 2412, уиа 1(10) ; 02201 - 0270 2412 4240 0001 -к уиа 2206(6), уиа 2206(5) ; 02202 - 3240 2206 2640 2206 -к сч 2424, уи 21 ; 02203 - 0010 2424 0040 0021 -к мод 2521(16), сч (10) ; 02204 - 7230 2521 4010 0000 -к уи, пб (6) ; 02205 - 0040 0000 3300 0000 -к зп 2534, и 2535 ; 02206 - 0000 2534 0011 2535 -к нтж 2536, уиа 2460(5) ; 02207 - 0012 2536 2640 2460 -к пе 2412, сч 1774 ; 02210 - 0270 2412 0010 1774 -к и 2660, пе 2302 ; 02211 - 0011 2660 0270 2302 -к сч 2533, и 2652 ; 02212 - 0010 2533 0011 2652 -к уиа 2444(5), пе 2366 ; 02213 - 2640 2444 0270 2366 -к уиа -3(4), уиа (12) ; 02214 - 2247 7775 5240 0000 -к счи 11, нтж 2530 ; 02215 - 0042 0011 0012 2530 -к пе 2217, слиа 2000(12) ; 02216 - 0270 2217 5250 2000 -к сч 2534, и 2614 ; 02217 - 0010 2534 0011 2614 -к пе 2240, уиа -1(10) ; 02220 - 0270 2240 4247 7777 -к уиа 2411(5), сч 2424 ; 02221 - 2640 2411 0010 2424 -к уи 21, уиа 77401(6) ; 02222 - 0040 0021 3247 7401 -к слиа 2(10), сч ; 02223 - 4250 0002 0010 0000 +к уиа 2474(5), пб 2366 ; 02174 - 2640 2474 0300 2366 +к уиа 11(4), пв 2144(6) ; 02175 - 2240 0011 3310 2144 +к зп 2533, и 2651 ; 02176 - 0000 2533 0011 2651 +к пе 2351, увв 4035 ; 02177 - 0270 2351 0033 4035 +к и 2655(16), уиа 2436(5) ; 02200 - 7011 2655 2640 2436 +к пе 2412, уиа 1(10) ; 02201 - 0270 2412 4240 0001 +к уиа 2206(6), уиа 2206(5) ; 02202 - 3240 2206 2640 2206 +к сч 2424, уи 21 ; 02203 - 0010 2424 0040 0021 +к мод 2521(16), сч (10) ; 02204 - 7230 2521 4010 0000 +к уи, пб (6) ; 02205 - 0040 0000 3300 0000 +к зп 2534, и 2535 ; 02206 - 0000 2534 0011 2535 +к нтж 2536, уиа 2460(5) ; 02207 - 0012 2536 2640 2460 +к пе 2412, сч 1774 ; 02210 - 0270 2412 0010 1774 +к и 2660, пе 2302 ; 02211 - 0011 2660 0270 2302 +к сч 2533, и 2652 ; 02212 - 0010 2533 0011 2652 +к уиа 2444(5), пе 2366 ; 02213 - 2640 2444 0270 2366 +к уиа -3(4), уиа (12) ; 02214 - 2247 7775 5240 0000 +к счи 11, нтж 2530 ; 02215 - 0042 0011 0012 2530 +к пе 2217, слиа 2000(12) ; 02216 - 0270 2217 5250 2000 +к сч 2534, и 2614 ; 02217 - 0010 2534 0011 2614 +к пе 2240, уиа -1(10) ; 02220 - 0270 2240 4247 7777 +к уиа 2411(5), сч 2424 ; 02221 - 2640 2411 0010 2424 +к уи 21, уиа 77401(6) ; 02222 - 0040 0021 3247 7401 +к слиа 2(10), сч ; 02223 - 4250 0002 0010 0000 к мода 70000(12), слц 377(6) ; 02224 - 5227 0000 3013 0377 -к цикл 2224(6), зп 2534 ; 02225 - 3370 2224 0000 2534 -к уиа 2227(5), пв 2203(6) ; 02226 - 2640 2227 3310 2203 -к зп 2533, нтж 2534 ; 02227 - 0000 2533 0012 2534 -к и 2423, пе 2250 ; 02230 - 0011 2423 0270 2250 -к сч 2533, и 2615 ; 02231 - 0010 2533 0011 2615 -к уиа 2444(5), по 2366 ; 02232 - 2640 2444 0260 2366 -к слиа 400(12), мода ; 02233 - 5250 0400 0220 0000 +к цикл 2224(6), зп 2534 ; 02225 - 3370 2224 0000 2534 +к уиа 2227(5), пв 2203(6) ; 02226 - 2640 2227 3310 2203 +к зп 2533, нтж 2534 ; 02227 - 0000 2533 0012 2534 +к и 2423, пе 2250 ; 02230 - 0011 2423 0270 2250 +к сч 2533, и 2615 ; 02231 - 0010 2533 0011 2615 +к уиа 2444(5), по 2366 ; 02232 - 2640 2444 0260 2366 +к слиа 400(12), мода ; 02233 - 5250 0400 0220 0000 к цикл 2221(4), уиа 2255(6) ; 02234 - 2370 2221 3240 2255 -к сч 2425, уи 21 ; 02235 - 0010 2425 0040 0021 -к сч 2417, увв 20(16) ; 02236 - 0010 2417 7033 0020 -к уи, пб (6) ; 02237 - 0040 0000 3300 0000 -к уиа 2411(5), сч 2424 ; 02240 - 2640 2411 0010 2424 -к уи 21, уиа 76001(6) ; 02241 - 0040 0021 3247 6001 -к сч, уиа 3(10) ; 02242 - 0010 0000 4240 0003 +к сч 2425, уи 21 ; 02235 - 0010 2425 0040 0021 +к сч 2417, увв 20(16) ; 02236 - 0010 2417 7033 0020 +к уи, пб (6) ; 02237 - 0040 0000 3300 0000 +к уиа 2411(5), сч 2424 ; 02240 - 2640 2411 0010 2424 +к уи 21, уиа 76001(6) ; 02241 - 0040 0021 3247 6001 +к сч, уиа 3(10) ; 02242 - 0010 0000 4240 0003 к мода 70000(12), слц 1777(6) ; 02243 - 5227 0000 3013 1777 -к цикл 2243(6), зп 2534 ; 02244 - 3370 2243 0000 2534 -к уиа 2246(5), пв 2203(6) ; 02245 - 2640 2246 3310 2203 -к нтж 2534, пе 2213 ; 02246 - 0012 2534 0270 2213 -к уиа 2255(6), пб 2235 ; 02247 - 3240 2255 0300 2235 +к цикл 2243(6), зп 2534 ; 02244 - 3370 2243 0000 2534 +к уиа 2246(5), пв 2203(6) ; 02245 - 2640 2246 3310 2203 +к нтж 2534, пе 2213 ; 02246 - 0012 2534 0270 2213 +к уиа 2255(6), пб 2235 ; 02247 - 3240 2255 0300 2235 к слиа -1(10), уиа 2252(5) ; 02250 - 4257 7777 2640 2252 -к мода, пв 2203(6) ; 02251 - 0220 0000 3310 2203 -к нтж 2534, и 2423 ; 02252 - 0012 2534 0011 2423 -к пе 2213, слиа 1(10) ; 02253 - 0270 2213 4250 0001 -к слиа 400(12), пб 2234 ; 02254 - 5250 0400 0300 2234 -к сч, уи ; 02255 - 0010 0000 0040 0000 -к рег 37, пб (11) ; 02256 - 0002 0037 4700 0000 -к уиа 1(14), пб 2335 ; 02257 - 6240 0001 0300 2335 -к зп 1027, сч 2516 ; 02260 - 0000 1027 0010 2516 -к или 1775, зп 1775 ; 02261 - 0015 1775 0000 1775 -к уиа 2265(11), пб 2104 ; 02262 - 4640 2265 0300 2104 -к слиа 40(4), цикл 2272(14) ; 02263 - 2250 0040 6370 2272 -к уиа 2466(5), пв 2367(7) ; 02264 - 2640 2466 3710 2367 -к сч 2, сда 130 ; 02265 - 0010 0002 0036 0130 -к и 2427, уиа -17(14) ; 02266 - 0011 2427 6247 7761 -к уиа (2), уиа (4) ; 02267 - 1240 0000 2240 0000 -к по 2271, вч 2664 ; 02270 - 0260 2271 0005 2664 -к зп 2542, мода ; 02271 - 0000 2542 0220 0000 -к уиа -37(7), сч 1775 ; 02272 - 3647 7741 0010 1775 -к нтж 70000(4), и 2423 ; 02273 - 2112 0000 0011 2423 -к пе 2263, сч 1775 ; 02274 - 0270 2263 0010 1775 -к сда 155, нтж 70016(4) ; 02275 - 0036 0155 2112 0016 -к и 2415, пе 2263 ; 02276 - 0011 2415 0270 2263 -к счи 2, нтж 2542 ; 02277 - 0042 0002 0012 2542 -к по 2303, слиа 1(2) ; 02300 - 0260 2303 1250 0001 -к пб 2263, мода ; 02301 - 0300 2263 0220 0000 -к уии 6(11), пб 2235 ; 02302 - 4444 0006 0300 2235 -к мода (4), сч 70037(7) ; 02303 - 2220 0000 3510 0037 -к зп 3537(7), цикл 2303(7) ; 02304 - 3400 3537 3770 2303 -к сч 3502, зп 1775 ; 02305 - 0010 3502 0000 1775 -к мода, пв 2040(2) ; 02306 - 0220 0000 1310 2040 -к зп 1030, сч 3500 ; 02307 - 0000 1030 0010 3500 -к зп 1775, сч 3 ; 02310 - 0000 1775 0010 0003 -к и 2660, пб 2103 ; 02311 - 0011 2660 0300 2103 -к уиа -2(14), сч 3515 ; 02312 - 6247 7776 0010 3515 -к сда 117, зп 1775 ; 02313 - 0036 0117 0000 1775 -к и 2423, по 2103 ; 02314 - 0011 2423 0260 2103 -к сч 2663, пв 2123(11) ; 02315 - 0010 2663 4710 2123 -к сч 3516, и 2415 ; 02316 - 0010 3516 0011 2415 -к сда 75, уи 6 ; 02317 - 0036 0075 0040 0006 -к сч 70000(6), нтж 3516 ; 02320 - 3110 0000 0012 3516 -к и 2415, пе 2103 ; 02321 - 0011 2415 0270 2103 -к мода (6), сч 70002(14) ; 02322 - 3220 0000 6110 0002 -к зп 2604(14), цикл 2322(14) ; 02323 - 6000 2604 6370 2322 -к уиа 2510(12), пв 2040(2) ; 02324 - 5240 2510 1310 2040 -к уиа -2(14), пв 2126(11) ; 02325 - 6247 7776 4710 2126 -к сч 70002(14), нтж 2604(14) ; 02326 - 6110 0002 6012 2604 -к уиа 2257(11), пе 2103 ; 02327 - 4640 2257 0270 2103 +к мода, пв 2203(6) ; 02251 - 0220 0000 3310 2203 +к нтж 2534, и 2423 ; 02252 - 0012 2534 0011 2423 +к пе 2213, слиа 1(10) ; 02253 - 0270 2213 4250 0001 +к слиа 400(12), пб 2234 ; 02254 - 5250 0400 0300 2234 +к сч, уи ; 02255 - 0010 0000 0040 0000 +к рег 37, пб (11) ; 02256 - 0002 0037 4700 0000 +к уиа 1(14), пб 2335 ; 02257 - 6240 0001 0300 2335 +к зп 1027, сч 2516 ; 02260 - 0000 1027 0010 2516 +к или 1775, зп 1775 ; 02261 - 0015 1775 0000 1775 +к уиа 2265(11), пб 2104 ; 02262 - 4640 2265 0300 2104 +к слиа 40(4), цикл 2272(14) ; 02263 - 2250 0040 6370 2272 +к уиа 2466(5), пв 2367(7) ; 02264 - 2640 2466 3710 2367 +к сч 2, сда 130 ; 02265 - 0010 0002 0036 0130 +к и 2427, уиа -17(14) ; 02266 - 0011 2427 6247 7761 +к уиа (2), уиа (4) ; 02267 - 1240 0000 2240 0000 +к по 2271, вч 2664 ; 02270 - 0260 2271 0005 2664 +к зп 2542, мода ; 02271 - 0000 2542 0220 0000 +к уиа -37(7), сч 1775 ; 02272 - 3647 7741 0010 1775 +к нтж 70000(4), и 2423 ; 02273 - 2112 0000 0011 2423 +к пе 2263, сч 1775 ; 02274 - 0270 2263 0010 1775 +к сда 155, нтж 70016(4) ; 02275 - 0036 0155 2112 0016 +к и 2415, пе 2263 ; 02276 - 0011 2415 0270 2263 +к счи 2, нтж 2542 ; 02277 - 0042 0002 0012 2542 +к по 2303, слиа 1(2) ; 02300 - 0260 2303 1250 0001 +к пб 2263, мода ; 02301 - 0300 2263 0220 0000 +к уии 6(11), пб 2235 ; 02302 - 4444 0006 0300 2235 +к мода (4), сч 70037(7) ; 02303 - 2220 0000 3510 0037 +к зп 3537(7), цикл 2303(7) ; 02304 - 3400 3537 3770 2303 +к сч 3502, зп 1775 ; 02305 - 0010 3502 0000 1775 +к мода, пв 2040(2) ; 02306 - 0220 0000 1310 2040 +к зп 1030, сч 3500 ; 02307 - 0000 1030 0010 3500 +к зп 1775, сч 3 ; 02310 - 0000 1775 0010 0003 +к и 2660, пб 2103 ; 02311 - 0011 2660 0300 2103 +к уиа -2(14), сч 3515 ; 02312 - 6247 7776 0010 3515 +к сда 117, зп 1775 ; 02313 - 0036 0117 0000 1775 +к и 2423, по 2103 ; 02314 - 0011 2423 0260 2103 +к сч 2663, пв 2123(11) ; 02315 - 0010 2663 4710 2123 +к сч 3516, и 2415 ; 02316 - 0010 3516 0011 2415 +к сда 75, уи 6 ; 02317 - 0036 0075 0040 0006 +к сч 70000(6), нтж 3516 ; 02320 - 3110 0000 0012 3516 +к и 2415, пе 2103 ; 02321 - 0011 2415 0270 2103 +к мода (6), сч 70002(14) ; 02322 - 3220 0000 6110 0002 +к зп 2604(14), цикл 2322(14) ; 02323 - 6000 2604 6370 2322 +к уиа 2510(12), пв 2040(2) ; 02324 - 5240 2510 1310 2040 +к уиа -2(14), пв 2126(11) ; 02325 - 6247 7776 4710 2126 +к сч 70002(14), нтж 2604(14) ; 02326 - 6110 0002 6012 2604 +к уиа 2257(11), пе 2103 ; 02327 - 4640 2257 0270 2103 к цикл 2326(14), уиа -22(14) ; 02330 - 6370 2326 6247 7756 -к сч 70026(14), зп 1026(14) ; 02331 - 6110 0026 6000 1026 +к сч 70026(14), зп 1026(14) ; 02331 - 6110 0026 6000 1026 к цикл 2331(14), уиа 2335(11) ; 02332 - 6370 2331 4640 2335 -к сч 1774, зп 1031 ; 02333 - 0010 1774 0000 1031 -к пб 2104, мода ; 02334 - 0300 2104 0220 0000 -к сч 1774, слц 2650 ; 02335 - 0010 1774 0013 2650 -к зп 1774, сч 1775 ; 02336 - 0000 1774 0010 1775 -к слц 2634, пв 2121(11) ; 02337 - 0013 2634 4710 2121 -к сч 2522, зп 502 ; 02340 - 0010 2522 0000 0502 +к сч 1774, зп 1031 ; 02333 - 0010 1774 0000 1031 +к пб 2104, мода ; 02334 - 0300 2104 0220 0000 +к сч 1774, слц 2650 ; 02335 - 0010 1774 0013 2650 +к зп 1774, сч 1775 ; 02336 - 0000 1774 0010 1775 +к слц 2634, пв 2121(11) ; 02337 - 0013 2634 4710 2121 +к сч 2522, зп 502 ; 02340 - 0010 2522 0000 0502 к уиа -37(6), мода ; 02341 - 3247 7741 0220 0000 -к сч 3537(6), зп 71777(6) ; 02342 - 3010 3537 3100 1777 -к цикл 2342(6), сч ; 02343 - 3370 2342 0010 0000 -к зп 72000, пб 70000 ; 02344 - 0100 2000 0307 0000 -к уиа 2345(7), пб 2367 ; 02345 - 3640 2345 0300 2367 -к уиа -2(3), сч ; 02346 - 1647 7776 0010 0000 +к сч 3537(6), зп 71777(6) ; 02342 - 3010 3537 3100 1777 +к цикл 2342(6), сч ; 02343 - 3370 2342 0010 0000 +к зп 72000, пб 70000 ; 02344 - 0100 2000 0307 0000 +к уиа 2345(7), пб 2367 ; 02345 - 3640 2345 0300 2367 +к уиа -2(3), сч ; 02346 - 1647 7776 0010 0000 к слц 2546(3), цикл 2347(3) ; 02347 - 1413 2546 1770 2347 -к пб (10), мода ; 02350 - 4300 0000 0220 0000 -к сч 1774, и 2660 ; 02351 - 0010 1774 0011 2660 -к пе 2060, уиа 31(4) ; 02352 - 0270 2060 2240 0031 -к мода, пв 2144(6) ; 02353 - 0220 0000 3310 2144 -к зп 2534, сч 2533 ; 02354 - 0000 2534 0010 2533 -к и 2654, по 2402 ; 02355 - 0011 2654 0260 2402 -к сч 2534, и 2662 ; 02356 - 0010 2534 0011 2662 -к уиа 2452(5), пе 2404 ; 02357 - 2640 2452 0270 2404 -к сч 2534, и 2660 ; 02360 - 0010 2534 0011 2660 -к уиа 2466(5), пе 2366 ; 02361 - 2640 2466 0270 2366 -к сч 2534, и 2661 ; 02362 - 0010 2534 0011 2661 -к пе 2410, сч 2534 ; 02363 - 0270 2410 0010 2534 -к и 2652, уиа 2452(5) ; 02364 - 0011 2652 2640 2452 -к пе 2366, уиа 2452(5) ; 02365 - 0270 2366 2640 2452 -к уиа 2126(7), пв 2235(6) ; 02366 - 3640 2126 3310 2235 +к пб (10), мода ; 02350 - 4300 0000 0220 0000 +к сч 1774, и 2660 ; 02351 - 0010 1774 0011 2660 +к пе 2060, уиа 31(4) ; 02352 - 0270 2060 2240 0031 +к мода, пв 2144(6) ; 02353 - 0220 0000 3310 2144 +к зп 2534, сч 2533 ; 02354 - 0000 2534 0010 2533 +к и 2654, по 2402 ; 02355 - 0011 2654 0260 2402 +к сч 2534, и 2662 ; 02356 - 0010 2534 0011 2662 +к уиа 2452(5), пе 2404 ; 02357 - 2640 2452 0270 2404 +к сч 2534, и 2660 ; 02360 - 0010 2534 0011 2660 +к уиа 2466(5), пе 2366 ; 02361 - 2640 2466 0270 2366 +к сч 2534, и 2661 ; 02362 - 0010 2534 0011 2661 +к пе 2410, сч 2534 ; 02363 - 0270 2410 0010 2534 +к и 2652, уиа 2452(5) ; 02364 - 0011 2652 2640 2452 +к пе 2366, уиа 2452(5) ; 02365 - 0270 2366 2640 2452 +к уиа 2126(7), пв 2235(6) ; 02366 - 3640 2126 3310 2235 к уиа -10(10), мода ; 02367 - 4247 7770 0220 0000 -к зп 1, цикл 2370(10) ; 02370 - 0000 0001 4370 2370 -к сч, рег ; 02371 - 0010 0000 0002 0000 +к зп 1, цикл 2370(10) ; 02370 - 0000 0001 4370 2370 +к сч, рег ; 02371 - 0010 0000 0002 0000 к уиа -5(10), мода ; 02372 - 4247 7773 0220 0000 -к мода (5), сч 5(10) ; 02373 - 2620 0000 4010 0005 +к мода (5), сч 5(10) ; 02373 - 2620 0000 4010 0005 к рег 6(10), цикл 2373(10) ; 02374 - 4002 0006 4370 2373 -к сч, рег 7 ; 02375 - 0010 0000 0002 0007 +к сч, рег 7 ; 02375 - 0010 0000 0002 0007 к уиа 76030(10), мода ; 02376 - 4247 6030 0220 0000 к уиа 77526(3), мода ; 02377 - 1647 7526 0220 0000 к сбр, цикл 2400(3) ; 02400 - 0020 0000 1770 2400 -к цикл 2377(10), пб (7) ; 02401 - 4370 2377 3700 0000 -к сч 2533, уиа 2430(5) ; 02402 - 0010 2533 2640 2430 -к и 2653, по 2366 ; 02403 - 0011 2653 0260 2366 -к уиа 1(4), пв 2144(6) ; 02404 - 2240 0001 3310 2144 -к мода, пв 2235(6) ; 02405 - 0220 0000 3310 2235 -к уиа 76030(10), пв 2377(7) ; 02406 - 4247 6030 3710 2377 -к уиа 2126(7), пб 2367 ; 02407 - 3640 2126 0300 2367 -к уиа 2452(5), пб 2366 ; 02410 - 2640 2452 0300 2366 -к уиа 2126(6), пб 2235 ; 02411 - 3240 2126 0300 2235 -к сч 1774, и 2660 ; 02412 - 0010 1774 0011 2660 -к по 2366, пв 2235(6) ; 02413 - 0260 2366 3310 2235 -к пб 2060, мода ; 02414 - 0300 2060 0220 0000 +к цикл 2377(10), пб (7) ; 02401 - 4370 2377 3700 0000 +к сч 2533, уиа 2430(5) ; 02402 - 0010 2533 2640 2430 +к и 2653, по 2366 ; 02403 - 0011 2653 0260 2366 +к уиа 1(4), пв 2144(6) ; 02404 - 2240 0001 3310 2144 +к мода, пв 2235(6) ; 02405 - 0220 0000 3310 2235 +к уиа 76030(10), пв 2377(7) ; 02406 - 4247 6030 3710 2377 +к уиа 2126(7), пб 2367 ; 02407 - 3640 2126 0300 2367 +к уиа 2452(5), пб 2366 ; 02410 - 2640 2452 0300 2366 +к уиа 2126(6), пб 2235 ; 02411 - 3240 2126 0300 2235 +к сч 1774, и 2660 ; 02412 - 0010 1774 0011 2660 +к по 2366, пв 2235(6) ; 02413 - 0260 2366 3310 2235 +к пб 2060, мода ; 02414 - 0300 2060 0220 0000 в 02415 -с 0000 0000 0000 0007 ; 02415 -с 0000 0000 0000 0003 ; 02416 -с 0000 0000 0000 1050 ; 02417 -с 0000 0000 0174 0000 ; 02420 -с 0000 0000 0000 2400 ; 02421 -с 0000 0000 0000 0000 ; 02422 -с 0000 0000 0000 7777 ; 02423 -с 0000 0000 0000 2003 ; 02424 -с 0000 0000 0000 2013 ; 02425 -с 0000 0000 0000 0000 ; 02426 -с 0000 0000 0000 0017 ; 02427 -с 2236 0400 4176 2000 ; 02430 -с 2220 0400 4044 0000 ; 02431 -с 2220 0400 4044 0000 ; 02432 -с 3636 0400 4044 0000 ; 02433 -с 2220 0400 4044 0000 ; 02434 -с 2236 3700 7434 0000 ; 02435 -с 0003 4376 2022 0000 ; 02436 -с 0004 2222 2220 0000 ; 02437 -с 0004 2222 2220 0000 ; 02440 -с 0004 2222 2220 0000 ; 02441 -с 0004 2222 2520 0000 ; 02442 -с 0003 4222 3060 0000 ; 02443 -с 3476 2046 3440 4000 ; 02444 -с 4252 0044 4244 4000 ; 02445 -с 4252 0044 4044 4000 ; 02446 -с 4252 0070 4044 4000 ; 02447 -с 4252 0044 4252 4000 ; 02450 -с 3452 0046 3461 4000 ; 02451 -с 0000 0021 0740 0000 ; 02452 -с 0000 0021 0420 0000 ; 02453 -с 0000 0037 0420 0000 ; 02454 -с 0000 0021 0740 0000 ; 02455 -с 0000 0021 0420 0000 ; 02456 -с 0000 0017 0740 0000 ; 02457 -с 2236 0046 6247 0040 ; 02460 -с 2220 0044 2250 4040 ; 02461 -с 2220 0044 2250 4040 ; 02462 -с 3636 0070 2270 4740 ; 02463 -с 2220 0044 2250 4440 ; 02464 -с 2236 0046 1647 0440 ; 02465 -с 0022 3604 0070 4440 ; 02466 -с 0022 2004 0044 4440 ; 02467 -с 0022 2004 0044 4470 ; 02470 -с 0036 3604 0072 7444 ; 02471 -с 0022 2004 0044 4444 ; 02472 -с 0022 3637 0070 3470 ; 02473 -с 2236 0400 3470 4044 ; 02474 -с 2220 0400 4244 4440 ; 02475 -с 2220 0400 4244 4440 ; 02476 -с 3636 0400 4270 4440 ; 02477 -с 2220 0400 4240 5240 ; 02500 -с 2236 3700 3474 6140 ; 02501 -с 4561 0213 7462 2422 ; 02502 -с 4501 0211 1112 2420 ; 02503 -с 4501 0251 1013 6434 ; 02504 -с 7561 0251 1022 2422 ; 02505 -с 4501 0251 1112 2422 ; 02506 -с 4567 6330 7061 6734 ; 02507 -с 0456 1021 3716 2240 ; 02510 -с 0450 1021 1101 2240 ; 02511 -с 0450 1025 1107 2270 ; 02512 -с 0756 1025 1111 2244 ; 02513 -с 0450 1025 1111 2244 ; 02514 -с 0456 7633 0711 3670 ; 02515 -с 0000 0757 0000 0000 ; 02516 -с 0000 2523 0000 0000 ; 02517 -с 0010 2425 0040 0021 ; 02520 -с 0010 2523 2700 0000 ; 02521 -с 0010 2523 1700 0000 ; 02522 -с 0000 0000 0000 0000 ; 02523 -с 0000 0000 0000 0030 ; 02524 -с 0000 0000 0000 0040 ; 02525 -с 0000 0000 0003 7777 ; 02526 -с 0000 0000 0000 1334 ; 02527 -с 0000 0000 0000 2340 ; 02530 -с 0000 0000 0007 7775 ; 02531 -с 0000 0000 0440 0020 ; 02532 -с 0017 0707 4005 0513 ; 02533 -с 1646 5273 4157 0513 ; 02534 -с 0007 7777 0000 0000 ; 02535 -с 0007 0707 0000 0000 ; 02536 -с 4000 0000 0000 0000 ; 02537 -с 0000 0000 0017 7777 ; 02540 -с 0000 0000 0000 0377 ; 02541 -с 0000 0000 0000 0000 ; 02542 -с 2740 0000 0000 4007 ; 02543 -с 3000 0000 0000 4005 ; 02544 -с 7760 0000 0000 0000 ; 02545 -с 7760 0000 0000 0000 ; 02546 -с 3000 0000 0000 4005 ; 02547 -с 7777 7400 0000 0000 ; 02550 -с 7760 0000 0000 0000 ; 02551 -с 3000 0000 0000 4005 ; 02552 -с 7777 7400 0000 0000 ; 02553 -с 0000 0000 0000 0000 ; 02554 +с 0000 0000 0000 0007 ; 02415 +с 0000 0000 0000 0003 ; 02416 +с 0000 0000 0000 1050 ; 02417 +с 0000 0000 0174 0000 ; 02420 +с 0000 0000 0000 2400 ; 02421 +с 0000 0000 0000 0000 ; 02422 +с 0000 0000 0000 7777 ; 02423 +с 0000 0000 0000 2003 ; 02424 +с 0000 0000 0000 2013 ; 02425 +с 0000 0000 0000 0000 ; 02426 +с 0000 0000 0000 0017 ; 02427 +с 2236 0400 4176 2000 ; 02430 +с 2220 0400 4044 0000 ; 02431 +с 2220 0400 4044 0000 ; 02432 +с 3636 0400 4044 0000 ; 02433 +с 2220 0400 4044 0000 ; 02434 +с 2236 3700 7434 0000 ; 02435 +с 0003 4376 2022 0000 ; 02436 +с 0004 2222 2220 0000 ; 02437 +с 0004 2222 2220 0000 ; 02440 +с 0004 2222 2220 0000 ; 02441 +с 0004 2222 2520 0000 ; 02442 +с 0003 4222 3060 0000 ; 02443 +с 3476 2046 3440 4000 ; 02444 +с 4252 0044 4244 4000 ; 02445 +с 4252 0044 4044 4000 ; 02446 +с 4252 0070 4044 4000 ; 02447 +с 4252 0044 4252 4000 ; 02450 +с 3452 0046 3461 4000 ; 02451 +с 0000 0021 0740 0000 ; 02452 +с 0000 0021 0420 0000 ; 02453 +с 0000 0037 0420 0000 ; 02454 +с 0000 0021 0740 0000 ; 02455 +с 0000 0021 0420 0000 ; 02456 +с 0000 0017 0740 0000 ; 02457 +с 2236 0046 6247 0040 ; 02460 +с 2220 0044 2250 4040 ; 02461 +с 2220 0044 2250 4040 ; 02462 +с 3636 0070 2270 4740 ; 02463 +с 2220 0044 2250 4440 ; 02464 +с 2236 0046 1647 0440 ; 02465 +с 0022 3604 0070 4440 ; 02466 +с 0022 2004 0044 4440 ; 02467 +с 0022 2004 0044 4470 ; 02470 +с 0036 3604 0072 7444 ; 02471 +с 0022 2004 0044 4444 ; 02472 +с 0022 3637 0070 3470 ; 02473 +с 2236 0400 3470 4044 ; 02474 +с 2220 0400 4244 4440 ; 02475 +с 2220 0400 4244 4440 ; 02476 +с 3636 0400 4270 4440 ; 02477 +с 2220 0400 4240 5240 ; 02500 +с 2236 3700 3474 6140 ; 02501 +с 4561 0213 7462 2422 ; 02502 +с 4501 0211 1112 2420 ; 02503 +с 4501 0251 1013 6434 ; 02504 +с 7561 0251 1022 2422 ; 02505 +с 4501 0251 1112 2422 ; 02506 +с 4567 6330 7061 6734 ; 02507 +с 0456 1021 3716 2240 ; 02510 +с 0450 1021 1101 2240 ; 02511 +с 0450 1025 1107 2270 ; 02512 +с 0756 1025 1111 2244 ; 02513 +с 0450 1025 1111 2244 ; 02514 +с 0456 7633 0711 3670 ; 02515 +с 0000 0757 0000 0000 ; 02516 +с 0000 2523 0000 0000 ; 02517 +с 0010 2425 0040 0021 ; 02520 +с 0010 2523 2700 0000 ; 02521 +с 0010 2523 1700 0000 ; 02522 +с 0000 0000 0000 0000 ; 02523 +с 0000 0000 0000 0030 ; 02524 +с 0000 0000 0000 0040 ; 02525 +с 0000 0000 0003 7777 ; 02526 +с 0000 0000 0000 1334 ; 02527 +с 0000 0000 0000 2340 ; 02530 +с 0000 0000 0007 7775 ; 02531 +с 0000 0000 0440 0020 ; 02532 +с 0017 0707 4005 0513 ; 02533 +с 1646 5273 4157 0513 ; 02534 +с 0007 7777 0000 0000 ; 02535 +с 0007 0707 0000 0000 ; 02536 +с 4000 0000 0000 0000 ; 02537 +с 0000 0000 0017 7777 ; 02540 +с 0000 0000 0000 0377 ; 02541 +с 0000 0000 0000 0000 ; 02542 +с 2740 0000 0000 4007 ; 02543 +с 3000 0000 0000 4005 ; 02544 +с 7760 0000 0000 0000 ; 02545 +с 7760 0000 0000 0000 ; 02546 +с 3000 0000 0000 4005 ; 02547 +с 7777 7400 0000 0000 ; 02550 +с 7760 0000 0000 0000 ; 02551 +с 3000 0000 0000 4005 ; 02552 +с 7777 7400 0000 0000 ; 02553 +с 0000 0000 0000 0000 ; 02554 в 02600 -с 0000 0000 0000 0000 ; 02600 -с 0000 0000 0000 0037 ; 02601 -с 0000 0000 0742 1025 ; 02602 -с 0000 0000 0021 0000 ; 02603 -с 0000 0000 0000 0000 ; 02604 -с 4000 0000 0000 0000 ; 02605 -с 2000 0000 0000 0000 ; 02606 -с 1000 0000 0000 0000 ; 02607 -с 0400 0000 0000 0000 ; 02610 -с 0200 0000 0000 0000 ; 02611 -с 0100 0000 0000 0000 ; 02612 -с 0040 0000 0000 0000 ; 02613 -с 0020 0000 0000 0000 ; 02614 -с 0010 0000 0000 0000 ; 02615 -с 0004 0000 0000 0000 ; 02616 -с 0002 0000 0000 0000 ; 02617 -с 0001 0000 0000 0000 ; 02620 -с 0000 4000 0000 0000 ; 02621 -с 0000 2000 0000 0000 ; 02622 -с 0000 1000 0000 0000 ; 02623 -с 0000 0400 0000 0000 ; 02624 -с 0000 0200 0000 0000 ; 02625 -с 0000 0100 0000 0000 ; 02626 -с 0000 0040 0000 0000 ; 02627 -с 0000 0020 0000 0000 ; 02630 -с 0000 0010 0000 0000 ; 02631 -с 0000 0004 0000 0000 ; 02632 -с 0000 0002 0000 0000 ; 02633 -с 0000 0001 0000 0000 ; 02634 -с 0000 0000 4000 0000 ; 02635 -с 0000 0000 2000 0000 ; 02636 -с 0000 0000 1000 0000 ; 02637 -с 0000 0000 0400 0000 ; 02640 -с 0000 0000 0200 0000 ; 02641 -с 0000 0000 0100 0000 ; 02642 -с 0000 0000 0040 0000 ; 02643 -с 0000 0000 0020 0000 ; 02644 -с 0000 0000 0010 0000 ; 02645 -с 0000 0000 0004 0000 ; 02646 -с 0000 0000 0002 0000 ; 02647 -с 0000 0000 0001 0000 ; 02650 -с 0000 0000 0000 4000 ; 02651 -с 0000 0000 0000 2000 ; 02652 -с 0000 0000 0000 1000 ; 02653 -с 0000 0000 0000 0400 ; 02654 -с 0000 0000 0000 0200 ; 02655 -с 0000 0000 0000 0100 ; 02656 -с 0000 0000 0000 0040 ; 02657 -с 0000 0000 0000 0020 ; 02660 -с 0000 0000 0000 0010 ; 02661 -с 0000 0000 0000 0004 ; 02662 -с 0000 0000 0000 0002 ; 02663 -с 0000 0000 0000 0001 ; 02664 +с 0000 0000 0000 0000 ; 02600 +с 0000 0000 0000 0037 ; 02601 +с 0000 0000 0742 1025 ; 02602 +с 0000 0000 0021 0000 ; 02603 +с 0000 0000 0000 0000 ; 02604 +с 4000 0000 0000 0000 ; 02605 +с 2000 0000 0000 0000 ; 02606 +с 1000 0000 0000 0000 ; 02607 +с 0400 0000 0000 0000 ; 02610 +с 0200 0000 0000 0000 ; 02611 +с 0100 0000 0000 0000 ; 02612 +с 0040 0000 0000 0000 ; 02613 +с 0020 0000 0000 0000 ; 02614 +с 0010 0000 0000 0000 ; 02615 +с 0004 0000 0000 0000 ; 02616 +с 0002 0000 0000 0000 ; 02617 +с 0001 0000 0000 0000 ; 02620 +с 0000 4000 0000 0000 ; 02621 +с 0000 2000 0000 0000 ; 02622 +с 0000 1000 0000 0000 ; 02623 +с 0000 0400 0000 0000 ; 02624 +с 0000 0200 0000 0000 ; 02625 +с 0000 0100 0000 0000 ; 02626 +с 0000 0040 0000 0000 ; 02627 +с 0000 0020 0000 0000 ; 02630 +с 0000 0010 0000 0000 ; 02631 +с 0000 0004 0000 0000 ; 02632 +с 0000 0002 0000 0000 ; 02633 +с 0000 0001 0000 0000 ; 02634 +с 0000 0000 4000 0000 ; 02635 +с 0000 0000 2000 0000 ; 02636 +с 0000 0000 1000 0000 ; 02637 +с 0000 0000 0400 0000 ; 02640 +с 0000 0000 0200 0000 ; 02641 +с 0000 0000 0100 0000 ; 02642 +с 0000 0000 0040 0000 ; 02643 +с 0000 0000 0020 0000 ; 02644 +с 0000 0000 0010 0000 ; 02645 +с 0000 0000 0004 0000 ; 02646 +с 0000 0000 0002 0000 ; 02647 +с 0000 0000 0001 0000 ; 02650 +с 0000 0000 0000 4000 ; 02651 +с 0000 0000 0000 2000 ; 02652 +с 0000 0000 0000 1000 ; 02653 +с 0000 0000 0000 0400 ; 02654 +с 0000 0000 0000 0200 ; 02655 +с 0000 0000 0000 0100 ; 02656 +с 0000 0000 0000 0040 ; 02657 +с 0000 0000 0000 0020 ; 02660 +с 0000 0000 0000 0010 ; 02661 +с 0000 0000 0000 0004 ; 02662 +с 0000 0000 0000 0002 ; 02663 +с 0000 0000 0000 0001 ; 02664 в 03000 -к по 3002, мода ; 03000 - 0260 3002 0220 0000 -к ржа 3, пб 2015 ; 03001 - 0037 0003 0300 2015 -к уиа 3004(7), уиа 2466(5) ; 03002 - 3640 3004 2640 2466 -к пб 2367, мода ; 03003 - 0300 2367 0220 0000 -к слиа 1(1), пб 3004 ; 03004 - 0650 0001 0300 3004 +к по 3002, мода ; 03000 - 0260 3002 0220 0000 +к ржа 3, пб 2015 ; 03001 - 0037 0003 0300 2015 +к уиа 3004(7), уиа 2466(5) ; 03002 - 3640 3004 2640 2466 +к пб 2367, мода ; 03003 - 0300 2367 0220 0000 +к слиа 1(1), пб 3004 ; 03004 - 0650 0001 0300 3004 в 03500 -с 0000 0560 0000 4005 ; 03500 -с 4000 0000 0000 4005 ; 03501 -с 0000 0000 0000 4005 ; 03502 -с 0000 0000 0000 4005 ; 03503 -с 0000 0000 0000 0006 ; 03504 -с 4000 0000 0000 0000 ; 03505 -с 0000 0000 0000 3320 ; 03506 -с 0000 0000 0000 0022 ; 03507 -с 0000 0000 0000 0021 ; 03510 -с 7760 0000 3760 0000 ; 03511 -с 0000 0000 0000 0000 ; 03512 -с 0000 0000 0000 0000 ; 03513 -с 0000 0000 0000 0000 ; 03514 -с 4000 0070 0004 0310 ; 03515 -с 1770 0000 0000 0003 ; 03516 -с 0000 0000 1600 4227 ; 03517 -с 3722 1066 0361 6435 ; 03520 -с 0000 0000 0000 0000 ; 03521 -с 7760 0000 0000 0000 ; 03522 -с 7760 0000 0000 3220 ; 03523 -с 0000 0000 1022 4005 ; 03524 -с 1240 0000 0000 0000 ; 03525 -с 1313 1413 1413 1413 ; 03526 -с 7777 4000 6000 0000 ; 03527 -с 7403 0000 0000 0000 ; 03530 -с 7777 7777 7777 7777 ; 03531 -с 0000 0017 7760 0000 ; 03532 -с 0000 0000 0000 0000 ; 03533 -с 0000 0000 0000 0000 ; 03534 -с 0000 0000 0000 0000 ; 03535 -с 0000 0000 7760 0000 ; 03536 -с 0000 0000 0000 0000 ; 03537 +с 0000 0560 0000 4005 ; 03500 +с 4000 0000 0000 4005 ; 03501 +с 0000 0000 0000 4005 ; 03502 +с 0000 0000 0000 4005 ; 03503 +с 0000 0000 0000 0006 ; 03504 +с 4000 0000 0000 0000 ; 03505 +с 0000 0000 0000 3320 ; 03506 +с 0000 0000 0000 0022 ; 03507 +с 0000 0000 0000 0021 ; 03510 +с 7760 0000 3760 0000 ; 03511 +с 0000 0000 0000 0000 ; 03512 +с 0000 0000 0000 0000 ; 03513 +с 0000 0000 0000 0000 ; 03514 +с 4000 0070 0004 0310 ; 03515 +с 1770 0000 0000 0003 ; 03516 +с 0000 0000 1600 4227 ; 03517 +с 3722 1066 0361 6435 ; 03520 +с 0000 0000 0000 0000 ; 03521 +с 7760 0000 0000 0000 ; 03522 +с 7760 0000 0000 3220 ; 03523 +с 0000 0000 1022 4005 ; 03524 +с 1240 0000 0000 0000 ; 03525 +с 1313 1413 1413 1413 ; 03526 +с 7777 4000 6000 0000 ; 03527 +с 7403 0000 0000 0000 ; 03530 +с 7777 7777 7777 7777 ; 03531 +с 0000 0017 7760 0000 ; 03532 +с 0000 0000 0000 0000 ; 03533 +с 0000 0000 0000 0000 ; 03534 +с 0000 0000 0000 0000 ; 03535 +с 0000 0000 7760 0000 ; 03536 +с 0000 0000 0000 0000 ; 03537 diff --git a/BESM6/test_pprog05.b6 b/BESM6/test_pprog05.b6 index 12b9e778..4c7929f2 100644 --- a/BESM6/test_pprog05.b6 +++ b/BESM6/test_pprog05.b6 @@ -22,16 +22,16 @@ ; (110000 – порядок числа). ; в 1 -к сл 7, зп 11 ; код := т.рег.7 -к вчп 11, зп 10 ; в эталон -к умн 10, дел 10 -к вч 10, слпа 145 ; 64+37 -к пе 6, стоп +к сл 7, зп 11 ; код := т.рег.7 +к вчп 11, зп 10 ; в эталон +к умн 10, дел 10 +к вч 10, слпа 145 ; 64+37 +к пе 6, стоп в 6 -к сч 11, пб 1 ; если хорошо +к сч 11, пб 1 ; если хорошо в 7 -ч 1.0 ; тумб.регистр 7 -с 0 ; эталон -с 0 ; код +ч 1.0 ; тумб.регистр 7 +с 0 ; эталон +с 0 ; код п 1