54 lingue, 1331 byte
> <> ,
Gol> <> ,
Foo ,
Befunge-93 ,
Befunge-98 ,
brainfuck ,
Brain-Flak ,
Python 2 ,
Python 3 ,
Hexagony ,
Perl ,
Ruby ,
Julia ,
Cardinal ,
Brainbash ,
Turtlèd ,
Deadfish ~ ,
Whitespace ,
Braille ,
Rail ,
Fission ,
ETA ,
Trigger ,
Brainfuck automodificante ,
Numberwang , in
realtà ,
Emoji ,
Brainfuck simbolico ,
TinCan ,
Alphuck ,
Shove ,
Cood ,
Wise ,
Width ,
Whispers ,
Thue ,
Surface ,
Stones ,
evil ,
Set ,
Prelude ,
Gaot ++ ,
Cubix ,
Cubically ,
PATH ,
Commercial ,
Brian e Chuck,
Scimmie ,
Nhohnhehr ,
Fascio ,
AsciiDots ,
Alumin ,
Alice ,
Whirl
Questo sta diventando molto lungo, quindi su suggerimento di @ MDXF, sto spostando i sottoprogrammi e i commenti su una sintesi . Il programma qui è solo il programma finale. Grazie ancora a MDXF per aver fornito il driver di test TIO.
##\$"404"#N#S# , ,,#$#?@\404!?@GJlICJlGCC*G^+0%=%=+0%x&fqpqqqiipsoddddoiipsohphhhhyhhhh? ?nnn4$4#!000110000011110000100000100000110000011001100000111100001110011000111000110000
#?\++++:----:++++:H@((((4O0O4O@((((()()()){}){x}x){}x()){}){}()){}){})<[-]>[-]-[<+>-----]<+x%"404"?.⌂----.++++.>11
#i(N/"404"ooo@ENTHOEONHSSEONTHOEONSETssipceaiiiiiscejiiiijeeeejapmzaeeaeueewzaeeeaeewzaeeaeueewqs??|?)999|997+|++++!999777+++++!999997+++++!
print(404)
__DATA__=1
# \"404"*CC'[-][ .-$_"404"&]
"""pp
I want 404 of this
How much is it
# -52, Z, -1 #
# -48, Y, -1 #
# -52, X, -1 #
[-][
x::=~404
::=
x
]<<<
> 404
>> Output 1
red up two blue up red up one blue up red up two blue up
baaaaa bleeeeeeeeet bleeeeeeeeet baaaaa bleeeeeeeeet
a now 404 dollar off!
a has been selling out worldwide!
2 LEFT
2 LEFT
2 UP
2 LEFT
2 TEACH
1 LEFT
1 RIGHT
1 BOND
1 BOND
1 TEACH
2 YELL
1 FIGHT
2 YELL
1 TEACH
2 YELL
set ! 52
set ! 48
set ! 52
+------+
|$0011\|
|/000\0|
|0/0@11|
|00 10|
|0\10/0|
|\1100/|
+------+
$'main'
\-444o000o444omm^
[-][$++++++++++++++++++++++++++++++++++++++++++++++++++++.----.++++.#
<<<<<<```>>>>.>.>.
]
ss"""
#7777777777777777777777777777724091557093543643💬404💬➡77▲▲▲²²▲²²¡▼▼▼▼¡▲▲▲▲¡⠎⡆⡎⡆⢐⠣⠃s&&&&~-<<:<<:<<<:<:>>>>>>>>:^||||G<>
Provalo online!
Whirl è descritto come un Tarpit di tornitura [sic], che utilizza solo due istruzioni, 1 e 0. 1 ruota la ruota delle istruzioni corrente (o la ruota matematica o la ruota delle operazioni), 0 scambia la rotazione della ruota e due 0 esegue l'istruzione e cambia le ruote. Le istruzioni pertinenti sono sulla prima riga:
000110000011110000100000100000110000011001100000111100001110011000111000110000
000110000 Switch to math wheel and execute math.not (math.val = 1)
011110000 Execute math.store, (memval = math.val = 1)
10000 Execute math.add, (math.val = math.val+memval = 1+1 = 2)
010000 Execute math.store (memval = math.val = 2)
0110000 Execute math.multiply, (math.val = math.val*memval = 2*2 = 4)
01100 Execute math.store (memval=math.val) and switch to the ops ring
110000 Execute ops.one (ops.val = 1)
011110000 Executes ops.intio, printing memval (4)
11100 Add one to memory pointer (memval=0)
1100 Execute maths.nop to switch back to ops ring
011100 Execute ops.intio, printing memval (0)
01100 Execute maths.store, (memval=maths.val=4)
00 Execute maths.intio, printing memval (4)
Gli 01 iniziali si annullano a vicenda e gli 01 finali causano un'eccezione in virgola mobile.
Modifica: risolto un mucchio di cose rotte
(Comandi di stare attenti in futuro UDLR%"[.]o473psjw
:)
Se qualche programma funziona per le lingue future o non funziona per le lingue correnti o precedenti, si prega di commentare.