anarchy golf - the source code

Numbering by pooq

to f :m :s
if :m>0[for[i 1 3][pr word :s i f :m-1(word "|   | :s i ".)]]
end
f rw " bye

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