54言語、1331バイト
> <>、
Gol> <>、
Foo、
Befunge-93、
Befunge-98、
brainfuck、
Brain-Flak、
Python 2、
Python 3、
Hexagony、
Perl、
Ruby、
Julia、
Cardinal、
Brainbash、
Turtlèd、
Deadfish〜、
Whitespace、
点字、
レール、
核分裂、
ETA、
トリガー、
自己修正Brainfuck、
Numberwang、
実際には、
絵文字、
象徴的Brainfuck、
TinCan、
Alphuck、
ショーブ、
COOD、
ワイズ、
幅、
囁き、
Thue、
サーフェス、
ストーンズ、
悪、
設定、
プレリュード、
Gaot ++、
Cubix、
立方、
PATH、
商業、
ブライアン&チャック、
サル、
Nhohnhehr、
ビーム、
AsciiDots、
Alumin、
アリス、
ワール
これは非常に長くなっているので、@ MDXFの提案では、サブプログラムとコメントを要点に移しています。ここでのプログラムは最終的なプログラムです。TIOテストドライバーを提供してくれたMDXFに再び感謝します。
##\$"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<>
オンラインでお試しください!
WhirlはTurning Tarpit [sic]として記述され、1と0の2つの命令のみを使用します。1は現在の命令のホイール(数学ホイールまたは演算ホイール)を回転し、0はホイールの回転を交換し、2つの0命令を実行し、車輪を切り替えます。関連する指示は最初の行にあります:
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)
先頭の01は互いに打ち消し合い、末尾の01は浮動小数点例外を引き起こします。
編集:壊れたものの束を修正
(コマンドは、将来的に注意します。UDLR%"[.]o473psjw
)
将来の言語で動作するプログラム、または現在または以前の言語で動作しないプログラムがある場合は、コメントしてください。