bfint.bef

http://twitter.com/syuu1228/status/7983144593

を見て、うーんこれ

http://fi.muni.cz/~xgoljer/bf.txt

そんな難しいんかいなややこしすぎなんじゃないか…とか思って、書いた。

v

>0>:#v~:3/9-2-!#v_v
  ^       +1p1\   <
v1\0$<         $<
p
0v+1  p0g00+g0g00+1<    -2<
>v+1  p0g00+*48~@#$                <    >$00g0g48*-,1+           00>$$
 >:1g:!#@_67*-1-:!#^_2-:!#^_1-:2+!#^_:!#^_6-8-:!#v_:2-!#v_93*-6-:!#^_2+!#v_1+
v^+1$<0                        <        p00+g00-1<      <                >
<    |!:-1\$_v#!-"]":g1:+1<\1$_^#!-*48g0g00:
     >    \0 >"["-!#v_    ^
                    >\1+\ ^

意外と大変だった。引用した bf.txt の通りにいじった rcfunge にて。エラー処理とかは入れやすい位置に置いておいたけど、めどいから放置。