Morphett's FALSE
Версия реализации Morphett's FALSE языка программирования FALSEЕдинственная версия этого интерпретатора.
Примеры:
Hello, World! - FALSE (391):
Строка эквивалентна команде вывода ее содержимого на печать.
"Hello, World!"
Факториал - FALSE (392):
Используется итеративное вычисление факториала. В переменных i
и f
хранятся текущее число (счетчик цикла) и текущее значение факториала. После инициализации переменных начинается цикл: [i;17=~]
— условие продолжения цикла: пока i не равно 17. Затем следует тело цикла, в котором выводится значение i
и символьная константа, затем i
увеличивается на 1, выводится старое значение факториала и вычисляется новое.
Для Wouter’s FALSE 1.2.CF значения факториала 13 и больше вычисляются с ошибкой из-за переполнения.
0i: 1f:
[i;17=~]
[i; $."! = " 1+$i: f;$.10, *f:]
#
Числа Фибоначчи - FALSE (393):
Используется итеративное вычисление чисел Фибоначчи. Текущие числа хранятся в переменных a
и b
, счетчик цикла — в i
.
Второй цикл примера очищает содержимое стека (числа Фибоначчи, записанные в него первым циклом). Некоторые интерпретаторы позволяют оставлять данные в стеке после конца работы программы, но, к примеру, Wouter’s FALSE 1.2.CF требует, чтобы стек был пустым, и выдает ошибку выполнения в противном случае.
0i: 1a: 1b:
[i;16=~]
[a; $. ", " $ b; $ a: + b: i;1+i:]
#
"..."
[1=~]
[]
#
%
CamelCase - FALSE (394):
Введенная строка обрабатывается посимвольно. В Morphett’s FALSE строки вводятся во всплывающем окне, и признаком конца ввода является пустая строка, которая преобразуется в значение -1; поэтому в качестве признака конца цикла используется -1. Условное выполнение команд ?
позволяет только выполнить команду, если условие истинно; для реализации ветви else
приходится дублировать условие (переменная l
), инвертировать его и использовать еще один оператор ?
.
1_s: ^
[$1_=~]
[ $$ 96> \123\> & [32-]?
$$ 64> \91\> & $l: [s;~[32+]? , 0s:]? l;~[1_s: %]?
^]
#
Комментарии
]]>blog comments powered by Disqus
]]>