ТЕЛКОМП

TELCOMP — язык программирования , разработанный в компании Bolt, Beranek and Newman (BBN) примерно в 1964 году и использовавшийся по крайней мере до 1974 года. BBN предлагала TELCOMP в качестве платной услуги, получив первую прибыль в октябре 1965 года. ^[1] Услуга была продана компании On-Line Systems, Inc. (OLS) в 1972 году. В Соединенном Королевстве TELCOMP предлагала компания Time Sharing, Ltd, партнерство между BBN и предпринимателем по имени Ричард Эванс.

Это был интерактивный разговорный язык на основе JOSS , разработанный BBN после того, как Клифф Шоу из RAND посетил лаборатории в 1964 году в рамках исследования NIH. Он был впервые реализован на PDP-1 и использовался для предоставления коммерческой услуги разделения времени BBN в районе Бостона, а затем Time Sharing Ltd. в Соединенном Королевстве.

В 1996 году Лео Беранек сказал: «Мы даже разработали язык программирования под названием TELCOMP, который до сих пор, как говорят некоторые, лучше языка программирования, принятого в отрасли, а именно BASIC». ^[2]

Существовало по крайней мере три версии: TELCOMP I, TELCOMP II и TELCOMP III.

TELCOMP I был реализован на PDP-1 , TELCOMP II на PDP-7 и TELCOMP III на PDP-10 , работающих под управлением операционной системы TOPS-10 компании DEC или собственной операционной системы TENEX компании BBN .

Программы TELCOMP обычно вводились через устройство чтения бумажной ленты на телетайпе модели 33 , который подключался к PDP через модем и акустическую телефонную линию. Данные можно было считывать с устройства чтения бумажной ленты или с клавиатуры телетайпа. Вывод либо печатался на телетайпе, либо отправлялся на перфоратор бумажной ленты. Ранние версии не имели возможности для хранения программ или данных в режиме онлайн.

Во время ввода данных с помощью телетайпа пользователь печатал ответ на распечатанную подсказку. Если вместо нажатия Returnпользователь нажимал , на той же строке печаталась другая, возможно, вычисленная подсказка. Этот процесс можно было повторять по всей ширине строки. Эта необычная функция позволяла вводить данные очень компактно, сравнимо с полноэкранным вводом данных на ЭЛТ. Она экономила бумагу, а раздел ввода формы становился частью распечатанного вывода программы.Tab ↹

Более поздняя производная TELCOMP под названием STRINGCOMP была ориентирована на обработку строк. Другая производная BBN JOSS под названием FILECOMP была разработана для системы GE MEDINET, которая была отменена. Неявная система обработки файлов, которая в ней содержалась, оказала влияние на глобальную систему баз данных MUMPS .

Первоначальное исследование LOGO было проведено в TELCOMP, но в реальный язык попали только ошибки и взаимодействие в стиле JOSS .

Программа TELCOMP состояла из пронумерованных строк, каждая из которых называлась Шагом. Шаги были сгруппированы в Части. Каждая строка содержала одну инструкцию.

СПРОС Прочитать входные данные с телетайпа ДЕЛАТЬ ЧАСТЬ Выполните все шаги в пронумерованной части, а затем вернитесь DO STEP Выполнить одну строку и вернуться DONE Остановить выполнение текущей части и вернуться к вызывающей стороне Условие IF, добавляемое к любой инструкции Цикл FOR, добавленный к любой инструкции PLOT Вывод данных на телетайп в виде графика ПЕЧАТЬ Вывод на печать на телетайп ЧИТАТЬ Прочитать входные данные с перфолентного считывателя ОТПРАВИТЬ Отправить вывод на перфоратор бумажной ленты SET Присвоить переменной значение выражения СТОП Полностью остановить выполнение К ЧАСТИ Перейти к указанной части К ШАГУ Перейти к указанной строке ТИП Эмулировать ввод телетайпа в режиме сохраненной операции (подобно функциональности TCL/TK Expect ) ; Комментарий, добавленный к любой строке FORM Спецификация для форматированного вывода (на самом деле это не команда)

1.04 ВВЕДИТЕ #,"ВВЕДИТЕ ОДНО ИЗ СЛЕДУЮЩИХ:-";МЕНЮ 1.05 ТИП ФОРМЫ X ДЛЯ X=1:1:4 ДЛЯ КОНЦА=10^15 1.06 ЧИТАЙТЕ GRNO В ФОРМЕ 15 1.065 ВЫПОЛНЕНО, ЕСЛИ GRNO=КОНЕЦ 1.07 ДО ШАГА 1.06 ЕСЛИ GRNO>4 1.08 К ЧАСТИ GRNO+1  2.01 ДЕЛАТЬ ЧАСТЬ 50 2.02 ЧИТАТЬ Н,К 2.03 ДЕЛАТЬ ЧАСТЬ 51 2.04 К ЧАСТИ 15  ..  15.01 ЛИНИЯ ДЛЯ X=1:1:3 15.02 ТИП MINPL,MAXPL В ФОРМЕ 17 15.03 ТИП ФОРМЫ 17 15.04 ДЕЛАТЬ ЧАСТЬ GRNO+15 ДЛЯ X=MNPL:STPL:MXPL  16.01 Y=(X^N)+К 16.02 Y1[X]=(((Y-MNPL)/(MXPL-MNPL))*2)-1  ..  ФОРМА 15 НОМЕР ТОВАРА? ##### ФОРМА 17 МИНИМУМ ##### МАКСИМУМ ######