Prayer -
minimalistic scripting programming language
Fibonacci Numbers
Loop Demo
Prime Generator
Short Manual
Prayer short manual
#Calculates Fibonacci numbers not exceeding 1000 sub main let 'max 1000 let 'xx 0 ; let 'yy 1 while $xx $max le ; call 'next_fib $xx $yy ; call 'println $xx sub next_fib a b let 'xx $b ; let 'yy $a $b +
# Numbers from 19 down to 1 are produced with step 2 sub main let 'x 20 while $x ; call 'condprint $x ; let 'x $x -1 + sub condprint z if $z 2 % ; call 'println $z
# Calculates first 30 prime numbers sub main let 'nums 0 ; call 'remember 2 ; call 'remember 3 let 'cur 4 while $nums 30 < ; call 'trynext let 'i 0 while $i $nums < ; call 'println 'a $i [] ; let 'i $i 1 + sub remember x let 'a $nums + $x let 'nums $nums 1 + sub trynext let 'c 0 while 'a $c [] dup dup * $cur <= $cur rot % and ; let 'c $c 1 + if 'a $c [] dup * $cur > ; call 'remember $cur let 'cur $cur 1 +