Write language name in 3D ASCII: Difference between revisions
→{{header|Phix}}
(Added a Pascal-Solution) |
|||
Line 1,812:
</pre></small>
=={{header|Phix}}==
<lang Phix>constant s =
"------*** * \n"&
"-----* * * \n"&
"----* * * * \n"&
"---*** * \n"&
"--* *** * * * \n"&
"-* * * * * \n"&
"* * * * * * \n"
puts(1,substitute(substitute(s,"*","_/")," "," "))
</lang>
{{out}}
<pre>
------_/_/_/ _/
-----_/ _/ _/
----_/ _/ _/ _/
---_/_/_/ _/
--_/ _/_/_/ _/ _/ _/
-_/ _/ _/ _/ _/
_/ _/ _/ _/ _/ _/
</pre>
=={{header|PicoLisp}}==
Line 1,863 ⟶ 1,886:
\\\/ \\\/ \\\\\\\\\\\\/ \\\\\\\\\\\\/ \\\\\\\\\\\\/ \\\/ \\\\\\\\\\\\/ \\\/
</pre>
=={{header|PureBasic}}==
<lang purebasic>If OpenConsole()
|