Anonymous user
Write language name in 3D ASCII: Difference between revisions
m
{{Out}} / moved Category to top
m (→block characters: enlarged the font size of the smiley.) |
m ({{Out}} / moved Category to top) |
||
Line 1:
{{task}}
{{omit from|GUISS}}▼
{{omit from|TUSCRIPT}}▼
The task is to write the language's name in 3D ASCII.
(We can leave the definition of "3D ASCII" fuzzy,
so long as the result is interesting or amusing,
not a cheap hack to satisfy the task.)
=={{header|Ada}}==
Quotes are not escaped by \ in ada (nor does \ have any meaning in strings),
so this turns out highlighting funny.
<lang Ada>with Ada.Text_IO; use Ada.Text_IO;
with Ada.Strings.Fixed; use Ada.Strings.Fixed;
Line 52 ⟶ 58:
GuiClose:
ExitApp</lang>
<pre> ______ __ __ __ __
/\ __ \/\ \_\ \/\ \/ /
Line 81 ⟶ 87:
}
</lang>
{{out}}
<pre>
_/_/_/_/ _/ _/ _/ _/
Line 181 ⟶ 187:
NEXT row%
ENDPROC</lang>
{{out}}
<pre>
##### ##### #### ##### #### #### ###### ####
Line 338 ⟶ 344:
==={{header|ZX Spectrum Basic}}===
We have used an extended (non-ASCII) character in this example to produce
an inverted space symbol (143 on the spectrum character table), for simplicity.
We could substitute another character, and change the handler
to cause a colour switch using a traditional space (ascii 32),
but the output would still look the same.
<lang zxbasic>10 LET s$="BASIC": REM our language name
Line 430 ⟶ 440:
^ $,< < < (code path reuse here,all 3 end in ,$ so I merged them)
</lang>
{{out}}
<pre>
Line 445 ⟶ 455:
const char*s = " _____\n /____/\\\n/ ___\\/\n\\ \\/__/\n \\____/";
int main(){ puts(s); return 0; }</lang>
{{out}}
<pre>
_____
Line 487 ⟶ 497:
//--------------------------------------------------------------------------------------------------
</lang>
{{out}}
<pre>
______ ______
Line 529 ⟶ 539:
}
</lang>
{{out}}
<pre>
/$$$$$$ /$$$$$$$ /$$$$$$$
Line 646 ⟶ 656:
.</lang>
<pre>
_______'''_/'''\\\\\\\\\_______'''_/'''\\\\\_______'''_/'''\\\\\\\\\\\\\_________'''_/'''\\\\\_______'''_/'''\\\_____________
____'''_/'''\\\'''////////'''______'''_/'''\\\'''///'''\\\____'''_\/'''\\\'''/////////'''\\\_____'''_/'''\\\'''///'''\\\____'''_\/'''\\\_____________
Line 656 ⟶ 667:
___'''_\////'''\\\\\\\\\____'''_\///'''\\\\\/_____'''_\/'''\\\\\\\\\\\\\'''/'''_____'''_\///'''\\\\\'''/'''_____'''_\/'''\\\\\\\\\\\\\\\_
______'''_\/////////'''_______'''_\/////'''_______'''_\/////////////'''_________'''_\/////'''_______'''_\///////////////'''__
Press enter to stop appreciating COBOL in 3D.</pre>
=={{header|D}}==
Line 939 ⟶ 950:
println "Groovy".asAsciiArt</lang>
{{out}}
<pre> _|_|_|
_| _| _|_| _|_| _|_| _| _| _| _|
Line 973 ⟶ 984:
</lang>
{{out}}
/\ \/\ \ /\ \ /\_ \ /\_ \
\ \ \_\ \ __ ____\ \ \/'\ __\//\ \ \//\ \
Line 1,019 ⟶ 1,031:
end</lang>
<pre> /\
\/
/\
Line 1,206 ⟶ 1,219:
</lang>
{{out}} With no parameters
▲{{Out}}
<pre>
_/
Line 1,337 ⟶ 1,349:
return \isTrue()
</lang>
{{out}}
<pre>
///\ ///\ ///////////////\
Line 1,370 ⟶ 1,382:
for i, l in lines:
echo repeatChar((lines.len - i) * 3), l</lang>
{{out}}
<pre> <<<> <<<> <<<<<<<<<<<<<<<> <<<> <<<> <<<<<<<<<<<<> <<<<<<<<<<<<> <<<<<<<<<<<<>
<<<<<<> <<<> <<<> <<<<<<> <<<<<<> <<<> <<<> <<<> <<<> <<<> <<<>
Line 1,522 ⟶ 1,534:
</lang>
{{out}}
<pre>
/@@@@@@@ /@@
Line 1,731 ⟶ 1,743:
end /*j*/ /* [↑] show a line and its shadow*/
/*stick a fork in it, we're done.*/</lang>
<pre>
////////////\
Line 2,074 ⟶ 2,086:
]</lang>
{{out}}
<pre>
///\ ///\ /////////\ ///\ ///////\
Line 2,093 ⟶ 2,105:
\\\/ \\\/ \\\/ \\\\\\\\\\\/ \\\\\\\/
</pre>
▲{{omit from|GUISS}}
▲{{omit from|TUSCRIPT}}
|