aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2025-02-27 18:35:13 -05:00
parent 8e4e15fa56
commit 72eb4943cb
1853 changed files with 35514 additions and 9441 deletions
Download patch file Download diff file Expand all files Collapse all files

19
Task/Write-language-name-in-3D-ASCII/M2000-Interpreter/write-language-name-in-3d-ascii.m2000 Normal file
View file

@ -0,0 +1,19 @@
Bold 0
Font "COURIER NEW"
Form 74, 8; ' ; set linespace to 0 ' center form to current monitor
Form ' cut the border so only 74X8 lines on a non head window displayed
' ASCII ART - 3D LANGUAGE NAME
Desktop 200 ' Opacity at 200/255*100%
?" _______ ______ _______ _________ _________ _________"
?" |\ ___\/ ___ \ / __ /||\ ____ \ |\ ____ \ |\ ____ \"
?" \ \ \_|\__\_|\ \ /_/|_/ / |\ \ \___|\ \\ \ \___|\ \\ \ \___|\ \"
?" \ \ \\|__| \ \ \ |_|// / / \ \ \ \ \ \\ \ \ \ \ \\ \ \ \ \ \"
?" \ \ \ \ \ \ / /_/____\ \ \__\_\ \\ \ \__\_\ \\ \ \__\_\ \"
?" \ \__\ \ \__\ |\________\\ \________\\ \________\\ \________\"
?" \|__| \|__| \|________| \|________| \|________| \|________|"
Push Key$: Drop
Desktop 255 ' 100% opacity
Font "Verdana"
Bold 1
Form; ' enable border - at screen size
Form 60, 32

1
Task/Write-language-name-in-3D-ASCII/Python/write-language-name-in-3d-ascii-2.py
View file

@ -46,7 +46,6 @@ charSet4 = [
" |__/ \________/ |__/ ",
]
# ...then the sets are combined back by barbequing them together!
charTable = [(charSet1[i] +
charSet2[i] +
charSet3[i] +