User:YufangTSTSU

Finally, this page isn't empty anymore!

Something I made

brainfuck interpreter in Befunge

"v v   < Row 0-3 & 5,5 stores data
 >0>1+\| Width is changeable
  vp550< (if greater than 62)
         (requires warp)
  >   >1-:::::0\0p0v                z=a=x=0;m=[0]*30000;c,_,q=\
brainF| p3\0p2\0p1\<                input().partition("!");q=[\
   in >$v          p20p2\g55:+1g20< *map(ord,q)]; #TooMuchSpace
 Befunge>55g1+:55p~:00p\0p00g"["-!| while(z<len(c)):exec("a+=1\
 By      v\g55p3g55:g2g20<          |a-=1|m[a]+=1|m[a]-=1|prin\
 Yufang  >3p02g1-02p    v|!-"]"g00< t(end=chr(m[a]))|m[a]=q.po\
        |-"!"g00        <<          p()|x=z|if m[a]:z=x".split\
v p000$$<                           ("|")["><+-.,[]".find(c[z])
v p00+1g00<                         ]);z+=1 #by zax2002, edited
v     >   ^          <     <     <     <       <        <     <
>00gv> v>      :v>   :v>   :v>   :v>   :v>      :v>      :v> v
v0+1< #"        "    #"    #"    #"    #" >-00p^ " >-00p^ "  "
>g:  ^ +  ^ p1\<-     .     ,     >     < ^1g3+ <[ ^1g3+ <]  !
>%\1p ^" >88**%^" >g,^" >1p^" >1p^" >1p^" >00g1 ^" >00g1 ^"  "
^**488<- ^4+"ÿ"<- ^1+<- ^+1<- ^0+<- ^0-<- |!g1<# - | g1<# -  -
>:1g1+^! >:1g  ^! >g1^! >1g^! >g1^! >g1^!  >1+^  !  >1+^  !  !
^+1g10$_^^+1g10$_^^10$_^^0~$_^^10$_^^10$_^ ^g10 $_^ ^g10 $_^@_^
                                         >    ^   >    ^