(%stdin)(r)file 127 string readline pop{dup 48 eq{28}if dup 49 eq{( )dup 0 4 index 169 mul 56 idiv count add 59 sub put print clear}if}forall
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page