パイク、5文字
0h.CE
これは無限に大きな数を生成し、それを文字列に変換してからPykeコードとして評価することができます。
コードの説明:
0
-スタックに0を追加します。これは番号を開始するために必要です
h
-前に数字を増やします。これを任意の回数繰り返すことで、無限に大きな数字を作成できます。Pykeは、Pythonで記述されたbignumをサポートします。これはデフォルトとして使用されます。
.C
-次のアルゴリズムを使用して、数値を文字列に変換します:(Githubリンク)
def to_string(num):
string = ""
while num > 256:
num, new = divmod(num, 256)
string = chr(new) + string
string = chr(num) + string
return string
この時点で、Pykeで任意の値を使用して任意の量の文字列と自然数を作成できます。数値は正規表現に対応する形式0(h)*
で作成でき、文字列は次のように作成できます0(h)*.C
。これらを互いに織り交ぜて、文字列と整数の任意の混合を作成できます。
E
-文字列をPykeコードとして評価します。これは、すでに実行されているPykeコードと同じ環境を使用するため、入力などを共有します。
Pykeがチューリング完了であることの証明を試みました。
言語を完全に表示する最も簡単な方法の1つは、Brainf * ckを実装することです。これはおそらくPykeが他の多くの言語よりもはるかに難しいのは、Pykeが実行されるように設計されている領域ではリストおよび辞書操作が必要ないためにほとんど存在しないためです。 code-golf)でです
まず、brainf * ckのインタープリターを作成し、上記のアルゴリズムを使用してエンコードして数値を作成し、その数値を0
とで表現しh
ます。次に、まったく同じ方法で実行するコードを含む文字列を作成します。そのままにしておくと、スタックは次のようになります。
string containing brainf*ck code
string containing brainf*ck interpreter
つまり、Pykeスタックは先入れ先出しであるため、コードは逆の形式にする必要があります。
楽しい部分は、なんと216バイトのbrainf * ckインタープリターです!
Q~B"><ht.,".:=B;Z]1=L;W~Bo@D=c"ht"{I~c~LZ@EZ]1~LR3:=L)~c\,qIz.oZ]1~LR3:=L)~c\.qI~LZ@.CpK)~c"<>"{I~c"<>""th".:ZE=ZZ1_qI0=Z~L0"":0]10:=L)Z~LlqI~L~Ll"":1_]10:=L))~c\[qI~LZ@0qI\]~B~o>@~o+h=o))~c\]qI~o\[~B~o<_@-t=o)~o~BlN
ここで試してみてください!
半完成だが編集可能な形式でコードを試してみたい場合は、 ここ試してください!
文字列から数値に変換するには、次のPythonコードを使用できます。
def conv(string, t=0):
t *= 256
t += ord(string[0])
if len(string) != 1:
return conv(string[1:], t)
return t
(ほぼ)最終的な解決策はここで試すことができます!
Brainf * ckインタープリターの説明
最初に、プログラムを部分に分割します。
Q~B"><ht.,".:=B;Z]1=L; - The initialisation part
Q~B"><ht.,".: - input.replace("><+-.,[]", "><ht.,")
- replace the characters in brainf*ck with some modified ones.
- this means we can `eval` the add and subtract bits easily.
=B; - set `B` to this.
- The `B` variable contains the instructions
Z]1=L; - set `L` to [0]
- `L` contains the stack, initialised with 0
W~Bo@D=c !code! ~o~BlN - The main loop
W - do
~Bo@D=c - c=B[o++]
- the c variable is used to store the current character.
~o~BlN - while
~o - o
N - ^ != V
~Bl - len(B)
- this stops the program running once it's finished.
"ht"{I~c~LZ@EZ]1~LR3:=L) - The bit that does incrementing and decrementing
"ht"{I ) - if c in "ht"
~LZ@ - L[Z]
- `Z` contains the current stack pointer
~c E - eval current character with ^ as an argument
- returns the contents of `Z` either incremented or decremented
Z]1~LR3:=L - L[Z] = ^
~c\,qIz.oZ]1~LR3:=L) - The code for output
~c\,qI ) - if character == ",":
z.o - ord(input)
Z]1~LR3:=L - L[Z] = ^
~c\.qI~LZ@.CpK) - The code for input
~c\.qI ) - if c == ".":
~LZ@ - L[Z]
.C - chr(^)
pK - print(^)
~c"<>"{I~c"<>""th".:ZE=Z - main part
~c"<>"{I - if "<>" in c:
~c"<>""th".: - c.replace("<>", "th")
ZE=Z - Z = eval(char, Z)
Z1_qI0=Z~L0"":0]10:=L) - lower bound check
Z1_qI ) - if Z == -1:
0=Z - Z = 0
~L0"": - L.insert("", 0)
0]10:=L - L[0] = 0
Z~LlqI~L~Ll"":1_]10:=L) - upper bound check
Z~LlqI ) - if Z == len(L):
~Ll"": - L.insert("", len(L))
~L 1_]10:=L - L[-1] = 0
~c\[qI~LZ@0qI\]~B~o>@~o+h=o)) - Code for `[`
~c\[qI ) - if c == "[":
~LZ@0qI ) - if L[Z] == 0:
~B~o> - B[o:]
\] @ - ^.find("]")
~o+h=o - o = o + ^ + 1
-そして ]
:
~c\]qI~o\[~B~o<_@-t=o) - Code for `]`
~c\]qI ) - if c == "]":
~B~o<_ - reversed(B[:o])
\[ @ - ^.find("[")
~o -t=o - o = o - ^ -1