ТЕЛКОМП
| Разработчик | ББН |
|---|---|
| Впервые появился | 1965 |
| Под влиянием | |
| ДЖОСС | |
| Под влиянием | |
| Свинка | |
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 , работающем на DEC. операционной системы ТОПС -10 или на собственной операционной системе АО «Техснабэкспорт» .
Программы TELCOMP обычно вводились через устройство чтения бумажной ленты на телетайпе модели 33 , который подключался к PDP через модем и акустическую телефонную линию. Данные можно было считывать с устройства чтения бумажной ленты или с клавиатуры телетайпа. Результат либо распечатывался на телетайпе, либо отправлялся на перфоратор бумажной ленты. Ранние версии не имели возможности онлайн-хранения программ или данных.
Во время ввода данных с помощью телетайпа пользователь печатал ответ на распечатанную подсказку. Если вместо удара Return, пользователь нажал Tab ↹, в той же строке будет напечатано другое, возможно, вычисленное приглашение. Этот процесс можно повторить для всей ширины линии. Эта необычная функция позволила очень компактно вводить данные, сравнимую с полноэкранным вводом данных на ЭЛТ. Это позволило сэкономить бумагу, а входная часть формы стала частью печатного вывода программы.
Более поздняя версия TELCOMP под названием STRINGCOMP была ориентирована на обработку строк. Другая производная от BBN JOSS под названием FILECOMP была разработана для системы GE MEDINET , которая была отменена. Содержащаяся в нем неявная система обработки файлов оказала влияние на глобальную систему баз данных MUMPS .
Первоначальное исследование LOGO было проведено в TELCOMP, но JOSS в реальный язык дошли только ошибки и взаимодействие в стиле .
Команды
[ редактировать ]Программа TELCOMP состояла из пронумерованных строк, каждая строка называлась шагом. Шаги были сгруппированы в Части. Каждая строка содержала одну инструкцию.
DEMAND Read input from the teletype DO PART Execute all of the steps in a numbered part and then return DO STEP Execute a single line and return DONE Stop execution of current part and return to caller IF Condition, suffixed to any instruction FOR Loop, suffixed to any instruction PLOT Type output to the teletype in the form of a graph PRINT Print output to the teletype READ Read input from the paper tape reader SEND Send output to the paper tape punch SET Assign a variable to the value of an expression STOP Stop execution completely TO PART Go to a specified part TO STEP Go to a specified line TYPE Emulate teletype input while in stored operation mode (like the TCL/TK Expect functionality) ; Comment, suffixed to any line FORM A specification for formatted output (not really a command)
Пример программы
[ редактировать ]1.04 TYPE #,"ENTER ONE OF THE FOLLOWING:-";MENU 1.05 TYPE FORM X FOR X=1:1:4 FOR END=10^15 1.06 READ GRNO IN FORM 15 1.065 DONE IF GRNO=END 1.07 TO STEP 1.06 IF GRNO>4 1.08 TO PART GRNO+1 2.01 DO PART 50 2.02 READ N,K 2.03 DO PART 51 2.04 TO PART 15 .. 15.01 LINE FOR X=1:1:3 15.02 TYPE MINPL,MAXPL IN FORM 17 15.03 TYPE FORM 17 15.04 DO PART GRNO+15 FOR X=MNPL:STPL:MXPL 16.01 Y=(X^N)+K 16.02 Y1[X]=(((Y-MNPL)/(MXPL-MNPL))*2)-1 .. FORM 15 ITEM NUMBER? ##### FORM 17 MINIMUM ##### MAXIMUM ######
Ссылки
[ редактировать ]- ^ «Культура инноваций. Инсайдерские отчеты о вычислениях и жизни в BBN: отчет за шестьдесят лет, с 18 октября 1948 г. по 1 июля 2010 г.» (PDF) . Уотерсайд Паблишинг. 2011. ISBN 978-0-9789737-0-4 . Проверено 10 февраля 2024 г.
- ^ «Устная история Лео Беранека» . Институт инженеров по электротехнике и электронике (IEEE) . Архивировано из оригинала 5 августа 2004 г. Проверено 16 сентября 2004 г.
