Sokoban by pooq

m:-get0(X),X>0,Y is-5/\X,put(Y),m.

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

download

return top