Write language name in 3D ASCII: Difference between revisions
Content added Content deleted
m (→simpler, shorter: changed an arror glyph.) |
|||
Line 2,860: | Line 2,860: | ||
$.2 = changestr( "\ ", $.2, '\/' ) |
$.2 = changestr( "\ ", $.2, '\/' ) |
||
do k=1 for 2; say strip(left('',#-j)$.k,"T") /*the LEFT BIF does indentation.*/ |
do k=1 for 2; say strip(left('',#-j)$.k,"T") /*the LEFT BIF does indentation.*/ |
||
end /*k*/ /* [ |
end /*k*/ /* [↑] display a line and its shadow.*/ |
||
end /*j*/ /*stick a fork in it, we're all done. */</lang> |
end /*j*/ /*stick a fork in it, we're all done. */</lang> |
||
'''output''' when using the default input: |
'''output''' when using the default input: |