spamsink: (Default)
spamsink ([personal profile] spamsink) wrote2019-02-07 11:29 am

В каких нечеловеческих условиях приходилось работать

Под катом - пример одной страницы того, над чем корпели советские программисты на ассемблере автокоде 50 лет назад. Распечатка была разбита на пронумерованные листы (возможно, готовые к прошнуровыванию и сохранению в качестве документа); почему в дате версии автокода печатается только год - не знаю.


                   СД   64=                АС   75,                                              03267  00 036 0064 00 004 0075
                 1 ИК   35=                ЗЧ   ,                                                03270  01 23 00035 00 000 0000
          Г55:
          Г53:  17 СА   3=                 СЧ   14,                                              03271  17 25 00003 00 010 0014
                   СМ   23=             16 ПВ   А77,                                             03272  00 003 0023 16 31 01756
                13 ПИ   2=              ,                                                        03273  13 044 0002 00 000 0000
          Г47:     ПБ   Е=              ,                                                        03274  00 30 74012 00 000 0000
   Э;     Г34:6,
   К;     Г60:  14 ПВ   Z3=             ,                     RАNDОМ                             03275  14 31 12664 00 000 0000
                17 СА   Г61=            ,                                                        03276  17 25 00002 00 000 0000
   К;              ВР   77=             17 ЗЧ   1,                                               03277  00 030 0077 17 000 0001
                   РА   3=                 СЧ   ХRАND,                                           03300  00 037 0003 00 010 3306
                   АУ   АRАND=             МР   ,                                                03301  00 017 3307 00 031 0000
                   ЦС   СRАND=             ЛУ   ЕВПИЛ,                                           03302  00 013 3310 00 011 3311
                   ЛС   ЕСОРВ=             ЗЧ   ХRАND,                                           03303  00 015 3312 00 000 3306
                   РА   =                  АС   ,                                                03304  00 037 0000 00 004 0000
                17 РК   1=                 ПБ   ЮЮR,                                             03305  17 027 0001 00 30 03313
   С;   ХRАND:  0,                                                                               03306  00 000 0000 00 000 0000
        АRАND:  4004142135623735,                                                                03307  10 004 1421 07 162 3735
        СRАND:  0003303130564677,                                                                03310  00 003 3031 06 056 4677
        ЕВПИЛ:  0017777777777777,                                                                03311  00 017 7777 17 37 77777
   Л;   ЕСОРВ:  В1/57,                                                                           03312  10 000 0000 00 000 0000
   К;     ЮЮR:     ЗЧ   =               ,                                                        03313  00 000 0000 00 000 0000
                 3 ЗЧ   3=                 ПБ   Е,                                               03314  03 000 0003 00 30 74012
   Э;     Г61:2,
   К;     Г63:  14 ПВ   Z3=             ,                     RАND0                              03315  14 31 12664 00 000 0000
                17 СА   Г64=            ,                                                        03316  17 25 00001 00 000 0000
   К;              Э053 10=             ,                                                        03317  00 053 0010 00 000 0000
                   СД   /-31/=             ЗЧ   ХRАND,                                           03320  00 036 0047 00 000 3306
                   Э050 114=            ,                                                        03321  00 050 0114 00 000 0000
                   СД   /-5/=              ЦС   ХRАND,                                           03322  00 036 0073 00 013 3306
                   ЛУ   ЕВПИЛ=             ЛС   ЕСОРВ,                                           03323  00 011 3311 00 015 3312
                   ЗЧ   ХRАND=          ,                                                        03324  00 000 3306 00 000 0000
                   ПБ   Е=              ,                                                        03325  00 30 74012 00 000 0000
   Э;     Г64:1,
   К;     Г66:  17 ЗЧ   4=              14 ПВ   Z3,           RАNDIN                             03326  17 000 0004 14 31 12664
                17 СА   Г67=             3 СЧ   4,                                               03327  17 25 00003 03 010 0004
                16 ПВ   R=              ,                                                        03330  16 31 74202 00 000 0000
                17 ЗЧ   =               16 ПВ   Г60,                                             03331  17 000 0000 16 31 03275
                13 ПИ   3=              17 СЧ   3,                                               03332  13 044 0003 17 010 0003
                   РА   =               17 АУ   ,                                                03333  00 037 0000 17 017 0000
                16 ПВ   ТR=             ,                                                        03334  16 31 74141 00 000 0000
                 3 ЗЧ   3=                 ПБ   Е,                                               03335  03 000 0003 00 30 74012
   Э;     Г67:3,
   К;     Г71:  17 ЗЧ   4=              14 ПВ   Z3,           СНЕСКЕ                             03336  17 000 0004 14 31 12664
                17 СА   Г72=            ,                                                        03337  17 25 00003 00 000 0000
         ТУТ2:   7 ПА   ТУТ2=              ПБ   ДАВАЙ,                                           03340  07 24 03340 00 30 03351
   С;           7760000000000000,                                                                03341  17 36 00000 00 000 0000
                7777740000000000,                                                                03342  17 37 77400 00 000 0000
                7777777700000000,                                                                03343  17 37 77777 00 000 0000
                7777777777600000,                                                                03344  17 37 77777 17 36 00000
                7777777777777400,                                                                03345  17 37 77777 17 37 77400
                377,                                                                             03346  00 000 0000 00 000 0377
                15,                                                                              03347  00 000 0000 00 000 0015
                17,                                                                              03350  00 000 0000 00 000 0017
   К;   ДАВАЙ:   3 СЧ   4=               7 ЛУ   6,                                               03351  03 010 0004 07 011 0006
                   УИ   6=               1 СЧ   12,                                              03352  00 040 0006 01 010 0012
                 3 СР   4=               6 ИА   ,                                                03353  03 012 0004 06 22 00000
                 7 ЛУ   =                3 ЗЧ   4,                                               03354  07 011 0000 03 000 0004
                 3 СЧ   4=                 СР   12,                                              03355  03 010 0004 00 012 0012
                   У1   Г74=               СЧ   13,                                              03356  00 27 03360 00 010 0013
                   ПБ   Г75=            ,                                                        03357  00 30 03361 00 000 0000
          Г74:     СЧ   12=             ,                                                        03360  00 010 0012 00 000 0000
          Г75:   3 ЗЧ   3=                 ПБ   Е,                                               03361  03 000 0003 00 30 74012
________________________________________________________________________________________________________________________________
                АВТОКОД  00.00.70. БЛОК           N 000001 ЛИСТ 000020


Кстати, номер листа был восьмеричный! Номер предыдущего - 17.

Ну и не без загадочки, как обычно. Найдите на распечатке пустой рукав.
juan_gandhi: (Default)

[personal profile] juan_gandhi 2019-02-07 07:58 pm (UTC)(link)
WTF is пустой рукав?
sab123: (Default)

[personal profile] sab123 2019-02-07 08:49 pm (UTC)(link)
"ЮЮR"! Вот это мешанина русских и латинских букв!

[personal profile] kouzdra 2019-02-08 01:03 am (UTC)(link)
Автокот "Инженер", что на Минск-22 (кстати очень хороший и грамотный - это не ассемблер, а такой типа фортран только с очевидной трансляцией в машинные команды) не только страницы в распечатке нумеровал, но еще и в рамочку их брал!

[personal profile] kouzdra 2019-02-08 02:44 am (UTC)(link)
Я с ним имел немножко дело в 239 школе (у нас там как раз в 80-м году Минск стоял) - учили конечно Алголу-60, но АКИ для энтузиастов был доступен - и я очень высокого мнения об этом язычке. Потому как универсальный ЯВУ на дорогущих железках с очень ограниченными ресурсами типа Минска - явно не то, что надо, а вот АКИ попадал почти "в десятку". Вполне вменяемый язык и при этом не утрачивающий контроль над кодом - что для как раз минскообразных компов было надо.

PS: Виртовский PL/360 и PL/11 мне тоже очень понравились.

PPS: Распечатка с встроенным форматированием кстати у нашего по крайней мере Минска была суровой необходимостью - потому как набивалось это все на ленточных телетайпах, где в общем об "отступах" и читабельности никто не думал даж - там пробелами в основном делили по принципу "чтобы этот фрагмент кода было удобно вырезать ножницами и на его место клеем вклеить правильный"
Edited 2019-02-08 03:19 (UTC)

[personal profile] kouzdra 2019-02-08 06:23 am (UTC)(link)
Абсолютная незначимость пробелов в Фортране (кроме отступов и строковых констант) как раз стандартный челлендж для студоты которая думает что она все уже умеет.
oryx_and_crake: (Default)

[personal profile] oryx_and_crake 2019-02-08 05:16 am (UTC)(link)
...и все время шел снег!!!