commit 946401a
zzo38
·
2023-05-03 21:42:20 +0000 UTC
parent c5f75ed
Add prg/thuemorse.tal
1 files changed,
+24,
-0
+24,
-0
1@@ -0,0 +1,24 @@
2+\\ Thue-Morse
3+\\ (public domain)
4+
5+|0100
6+ LITr 30 LIT2r :hi [;
7+ [@
8+ LDAk STH2rk STA
9+ INC2 INC2r
10+ STH2rk ORA
11+ ]?
12+ STHrk INCk STArk !hi
13+ ]@
14+ \_@
15+ [@
16+ [@
17+ LDArk LITr 18 DEOr
18+ LDArk LITr 01 EORr STH2k STAr
19+ INC2 INC2r
20+ STH2rk SUB2k NEQ2
21+ ]?
22+ POP2r #0a18 DEO
23+ ]&
24+ \_@,-0,- \@hi
25+