Write language name in 3D ASCII: Difference between revisions

Content added Content deleted
(→‎{{header|Ruby}}: add banner3D_3 method)
No edit summary
Line 668: Line 668:
______'''_\/////////'''_______'''_\/////'''_______'''_\/////////////'''_________'''_\/////'''_______'''_\///////////////'''__
______'''_\/////////'''_______'''_\/////'''_______'''_\/////////////'''_________'''_\/////'''_______'''_\///////////////'''__
Press enter to stop appreciating COBOL in 3D.</pre>
Press enter to stop appreciating COBOL in 3D.</pre>

=={{header|Common Lisp}}==
<lang lisp>
(ql:quickload :cl-ppcre)
(defvar txt
"
xxxx xxxx x x x x xxxx x x x x xxxx xxxxx
x x x x xx xx xx xx x x xx x x x x x x
x x x x xx x x xx x x x x x x x x xxx x x
x x x x x x x x x x x x x x xxx xxxxx
x x x x x x x x x x x xx x x x x x
xxxx xxxx x x x x xxxx x x xxxxx x xxxx x
"
)
(princ (cl-ppcre:regex-replace-all " " (cl-ppcre:regex-replace-all "x" txt "_/") " " ))
</lang>
{{out}}
<pre>
_/_/_/_/ _/_/_/_/ _/ _/ _/ _/ _/_/_/_/ _/ _/ _/ _/ _/_/_/_/ _/_/_/_/_/
_/ _/ _/ _/ _/_/ _/_/ _/_/ _/_/ _/ _/ _/_/ _/ _/ _/ _/ _/ _/
_/ _/ _/ _/ _/_/ _/ _/ _/_/ _/ _/ _/ _/ _/ _/ _/ _/ _/_/_/ _/ _/
_/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/_/_/ _/_/_/_/_/
_/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/ _/_/ _/ _/ _/ _/ _/
_/_/_/_/ _/_/_/_/ _/ _/ _/ _/ _/_/_/_/ _/ _/ _/_/_/_/_/ _/ _/_/_/_/ _/

</pre>


=={{header|D}}==
=={{header|D}}==