: A 10 MOD 3 - * ; : X 301 1 DO I 3 MOD I A I 10 / A IF I 0 .R ELSE ." aho"THEN CR LOOP ; X

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page