13 lines
409 B
Text
13 lines
409 B
Text
"+++++++++++[>++++++>+++++++++>+++>+<<<<-]>++.>+.+++++++..+++.>++.<<+++++++++++++++.>.+++.------.--------.>+.>." ##code
|
||
?£ƛ
|
||
:'+=["D:hi›$h$≜"| ##'+'
|
||
:'-=["D:hi‹$h$≜"| ##'-'
|
||
:'>=["0J:h›0$≜"| ##'>', auto-extends tape
|
||
:'<=[":h‹0$≜"| ##'<'
|
||
:'[=["{Dhi|"| ##'['
|
||
:']=['}| ##']'
|
||
:'.=["DhiO#,"| ##'.'
|
||
":h0¥ᑂ$£O≜" ##','
|
||
]”
|
||
1 0; ## initial tape T. T[0] is the pointer
|
||
$ᴥ ##run the code
|