[quote="ath"]Это позволит выложить её в онлайн.[/quote]И зачем?

Эмулятор «Электроники МК-61» в онлайн можно найти, например, [url=https://pmk.arbinada.com/mk61emuweb.html]здесь[/url].
Эмулятор «Электроники МК-161» написан на FreePascal.

Теоретически Каллисто 1.0 можно попробовать перевести с входного языка МК-161 на байткод Java, если хорошо знать эту виртуальную машину. Это позволит выложить её в онлайн.

[quote="KPG"]Если Калисто-калькуятор делать на базисе ПК. то это будет калькулятор на базе Форт ОС для ПК
[/quote]
При его характеристиках проще эмулировать на Java, или даже JavaScript. Инженерные калькуляторы онлайн доступны в ассортименте. До МК-61, видимо, историки еще не добрались.

[quote="gudleifr"][quote="ath"]не интересна ... сама МК-161[/quote]Очень интересна.[/quote]
Если Калисто-калькуятор делать на базисе ПК. то это будет калькулятор на базе Форт ОС для ПК :)

Случайно нашелся рисунок.
Конец 80-х.
[url=https://servimg.com/view/19658934/683][img]https://i62.servimg.com/u/f62/19/65/89/34/th/alg2010.gif[/img][/url]
Можно видеть зачатки стековых комментариев (в виде подчеркиваний). Также (по смысловым комментариям) можно видеть, что "стандартные" FORTH-слова были бы только лишним геморроем.

[quote="ath"]не интересна ... сама МК-161[/quote]Очень интересна.

[quote="ath"]Кому не интересна сама МК-161 и работа над входным языком (его, кстати, можно будет перенести и на другие отечественные ПМК по мере их появления на рынке) — работайте над другими вещами, которые вам по жизни интересны больше.[/quote]
А кому интересна эта работа - могут использовать информационные ресурсы компании-разработчика МК-161. Использование данного форума в качестве площадки для общения подразумевает согласие обсуждать те темы и с той стороны, которая интересна сообществу. В том числе и вопросы вида "почему же все так печально?".

Повторюсь — первая версия Каллисто для МК-161 опубликована. Есть Proof of concept Форта для ЭКВМ. Вторая версия языка будет посвящена оптимизации по времени исполнения и принесёт некоторые другие улучшения. Например, уже продуман способ замены устаревшего <BUILDS DOES> на CREATE DOES> — что не так было просто сделать на МК-161 из-за невозможности исполнять код языка МК в области данных, где хранится шитый код.

Кому интересно, скачивайте, изучайте, присоединяйтесь. Исходный текст, руководство, документация, примеры, всё опубликовано и доступно по ссылкам в начале темы. По поводу второй версии — мне любопытно, например, обсудить способ хэширования имён слов в 12-разрядном десятичном регистре МК-161. Можно ещё задействовать 2 разряда порядка, знаки порядка и мантиссы. В идеале хотелось бы хранить 3 первых символа плюс длину имени. Это должно существенно ускорить FIND и дать выигрыш во времени компиляции «на борту».

Кому не интересна ни сама МК-161, ни работа над входным языком (его, кстати, можно будет перенести и на другие отечественные ПМК по мере их появления на рынке) — работайте над другими проектами и платформами, которые вам по жизни интересны больше. :D

P.S.
Попробую подвести итог.
FORTH - это средство получить от машины то, что надо, без лишнего напряга.
Но от МК-161 ничего нельзя получить в принципе.
Огромное количество операций "программирования" для этого девайса надо делать вручную только потому, что человек делает их лучше и быстрее него. И если кто-то хочет "FORTH для МК-161", то он должен включить человека внутрь FORTH-машины...

[quote="ath"] ... Pacman music ...[/quote]Спасибо за хороший пример. Понес к себе в "Работу над ошибками - Ненужные структурности".

[quote="gudleifr"][quote="ath"]то каллистянский читать и использовать проще.[/quote]Кому как. Я (на 34-м) привык к совершенно другому стилю.[/quote]
И этот стиль максимально сохранён, насколько возможно. Зато фортовская часть Каллисто позволяет делать, например, вот такие вещи:
[code]
listmkt v1.0 (c) Васильев И.В., 7 ноября 2017, Файл: B043.mkt
  0 \ Pacman music #43, AtH, 20150413
  1 
  2 forth definitions  5 value темп
  3 
  4 vocabulary ММЯ  ММЯ definitions  \ Музыкальный Макро Язык
  5 : нота  ( частота длительность −−)
  6   <builds темп × , , does> here 4 cmove 4 allot ;
  7 : ;  ( −−)   ?csp  here over 2+ − 4 / ↔ !
  8   [compile] forth ; immediate
  9 
 10 0 1 нота .  0 2 нота ..  0 10 нота .10
 11 2470 1 нота b<  4939 ↑ 1 нота b  2 нота b+  2616 1 нота c
 12 5233 1 нота c>  3111 ↑ 1 нота d# 3 нота d#++
 13 3296 ↑ 1 нота e 3 нота e++  3492 1 нота f   3699 1 нота f#
 14 3920 1 нота g  4153 1 нота g#  4400 1 нота a
 15 
 16 forth definitions
 17 : :мелодия  ( −−)   <builds here  2 allot  !csp  ММЯ
 18   does> ↑ 2+ ↔ u@ (play) ;
 19 
 20 :мелодия Пакмэн  \ Манве, 13 апреля 2015
 21   b< . b . f# . d# . b f# .. d#++ .     \ такт 1
 22   c . c> . g . e . c> g .. e++ .        \ такт 2
 23   b< . b . f# . d# . b f# .. d#++ .     \ такт 3
 24   d# e f . f f# g . g g# a . b+ .10 ;   \ такт 4
 25 
 26 : tune  \ ( −−)   воспроизведение мелодии
 27   begin Пакмэн ?break again ;
 28 \s
[/code]
На ходу создаётся собственный макроязык — после чего на этом языке записывается мелодия. На старом входном языке тоже можно проигрывать мелодии. Но свой макроязык создавать намного сложнее, а запись будет менее наглядная.

В данном случае возводится в квадрат не одно число, а два — после чего квадраты двух чисел суммируются. На языке МК это 5 шагов, включая команду останова или возврата из подпрограммы. Из них два шага — да, одношаговая операция возведения числа в квадрат.

Ваше «... а можно и просто x2.» по-прежнему загадка.

[quote="ath"]Рассуждать на тему «Электроники МК-161» и её старшей сестры МК-152 можно долго.[/quote]Ну, как бы, здесь это было бы интересно. Мы-то не в курсе ваших новосибирских инвенций. Кто берет, под что, за что хвалят, что просят добавить...

[quote="ath"]то каллистянский читать и использовать проще.[/quote]Кому как. Я (на 34-м) привык к совершенно другому стилю.

[quote="ath"]Вот этот ваш пример не понял.[/quote]Я к тому, что код возведения числа в квадрат - одна ячейка. Привязывать сюда стековые манипуляции, которые на MK привык оптимизировать, мне кажется избыточным.

[quote="ath"]Рассуждать на тему «Электроники МК-161» и её старшей сестры МК-152 можно долго. Но это мы уже лет 10 делаем и, честно говоря, скучно. Все ходы и выходы уже давно изучены, пластинка заезжана и новое вы вряд ли мне расскажете.[/quote]

И то, что это по сути фричество, не вызывает никаких ощущений? Факт тот, что имея определенную элементную базу МК, да при избыточности даже 8-разрядного ядра для решаемых задач, внутри можно делать хоть эмулятор Энигмы. И оно даже будет работать. Однако это ни в коей мере не доказывает эффективности подхода. По факту, МК-161 как самостоятельный процессор не существует, а представлен только в качестве эмулятора на МК с другой архитектурой. Что на этом оказались выпущены какие-то приборы - личное дело разработчиков, пока им нравится и пока укладываются в бюджет. Все равно при наличии в составе изделия пластика, металла и прочей фурнитуры экономить на копеечных электронных компонентах нет ни малейшего смысла. Однако нельзя игнорировать то, что эмулятор МК-161 (а также всей линейки советских ПМК) можно сделать и на каком-нибудь Java и загружать на планшет или дешевый ноутбук в качестве игрушки. Можно сделать и ZX-Spectrum в железе, но это не отменяет факта, что сейчас эмуляторы Спектрума доступны даже онлайн. Поэтому ностальгировать вполне можно, класть в собственные изделия по принципу legacy разработок - ну можно, раз такое групповое хобби образовалось. Но а дальше-то? Вести фортеров в светлое будущее, подсвечивая экраном 16x4 символа? :)

Рассуждать на тему «Электроники МК-161» и её старшей сестры МК-152 можно долго. Но это мы уже лет 10 делаем и, честно говоря, скучно. Все ходы и выходы уже давно изучены, пластинка заезжана и новое вы вряд ли мне расскажете.

Факт, что кому-то новосибирские ЭКВМ нравятся, кто-то от них в восторге. А кому-то они мало интересны, предпочитают технику зарубежного изготовления — первая доза обходится дешевле, работает быстрее и вроде как даже «глюки» ихних мобильников можно изучить, запомнить и простить. :D :D

Но если брать две программы. Старинную советскую (работает на МК-161 «из коробки»):

00.Fx² 01.↔︎ 02.Fx² 03.+ 04.С/П

и её современный каллистянский вариант (работает на МК-161 с Каллисто):

: SUMSQ x² ↔︎ x² + ;

то каллистянский читать и использовать проще. Новое слово SUMSQ легко использовать в последующих вычислениях. «Тепловая смерть вселенной» наступит не раньше. По [url=https://pmk.arbinada.com/ru/node/1200]скорости работы[/url] Каллисто медленнее родного языка «Электроники МК-161» в 44,5 раз, зато быстрее советской «Электроники МК 56» в 18,9 раз. А многие до сих пор пользуются советскими ПМК и ничего, Вселенная жива пока ещё.

[quote="gudleifr"][quote="ath"]можно ещё написать : SUMSQ x² ↔︎ x² + ;[/quote]... а можно и просто x2.[/quote]

Вот этот ваш пример не понял. Объясните, если не сложно.