IchigoLatte FORTH で何か作ろうと考えて、
作ったものは……やっぱり風船でした。🎈😍←風船大好き
とはいっても IchigoLatte FORTH は数字しか表示できないので、
数字 0 で風船、数字 1 で糸を表現しています。
それでも風船だと分かってもらえるようです。
横座標を同じところにするため、乱数で出した値を
DUP で複製して 1 つをスタックに残します。
スクロール後、残した値が lc で使われています。
WHILE がない BEGIN~REPEAT で無限ループになります。
あとは FORTH の仕様が分かれば、
スタックの状態と共に解読できるかと思います。
0.4.0D 以降になっていますが、0.3.0D は
1 行目 \ Balloons を削除する事で動作可能です。
\ Balloons
cls
BEGIN
31 rnd
DUP 23 lc
0 .
100 sleep
0 scroll
23 lc
1 .
REPEAT
MixJuice・MicJack ダウンロード lash>echo MJ GET 15lt.eu.org/balloon.fs> uart;cat uart > .
SkyBerryJAM は 栃木県立栃木工業高等学校 が管理する登録商標であり、
SkyBerryJAM は 栃木県立栃木工業高等学校 の商標です。
Raspberry Pi は
Raspberry Pi 財団 の登録商標です。
Raspberry Pi is a registered trademark or
trademark of
the Raspberry Pi Foundation.
"RISC-V" の商品名は RISC-Vインターナショナル が管理する登録商標です。
The “RISC-V” trade name is a registered trade mark of
RISC-V International.