for(P=readline(D=[i=j=0]);c=P[i];i++)v=D[j],c<'-'?D[j]=-~v:c<'.'?D[j]--:c<'<'?putstr(<>&#{v};</>):c>'>'?c<']'?p=i:i=v?p:i:j+=c<'>'?-1:1
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page