あなたの目標は、各行の後に新しい行を付けて、無期限に印刷するプログラムを作成することです。したがって、プログラムが1行の場合、出力のすべての行で繰り返されます。

例

プログラム：

A

出力：

A
A
A
...

ルール

• スニペットや関数ではなく、完全なプログラムでなければなりません。
• プログラムは、スタックオーバーフローまたは再帰制限エラーなしで永久にループする必要があります。
• 出力はstdoutまたは最も近い代替です。
• プログラム入力は受け入れられません。
• プログラムのファイルを開く、外部リソースにアクセスするなど、標準的な抜け穴は許可されません。空のプログラムは標準の抜け穴として許可されていません。
• プログラムのコードが末尾の改行で終わる場合、これはクイン間の必要な改行としてカウントされず、別の改行を印刷する必要があります。
• codegolf-最短コードが勝ちます！

核分裂、7バイト

'!+!NR"

私がこれまでに見つけた最短の核分裂クインのかなり単純な修正：私は単に改行の!代わりに非破壊を使用し、改行Oを追加しNています。

全体として、ここにそれがどのように機能するかがあります：制御フローはR、右向きのアトムから始まります。"文字列モードを切り替えます。これは、次"が出力されるまですべてを意味します：この場合'!+!NR。これにより"、改行が印刷されます。'!原子の質量を33に+設定し、それを34（の文字コード"）に!増やして、引用符を出力します。N改行を出力しますが、Rこの場合は何もしないので、ループは最初からやり直します。

次の7バイトソリューションも機能します。

"NR'!+!

> <>、16バイト

'ard3*o50l2)?.~~

従来の> <>クインではos が多すぎるため、印刷にはループを使用します。各ジャンプの前に5と0（ジャンプ先の座標）をプッシュし、その後.、印刷するものがある場合はジャンプするか、で上位2つの値をポップし~~ます。

（スタックオーバーフロールールを忘れていたため、16バージョンに戻しました。）

CJam、13バイト

{_o"_g
"o1}_g

オンラインインタープリターは、プログラムが終了するまで何も出力しないため、Javaインタープリターでこれをテストする必要があります。

説明

最後にで終わらない一般化されたCJamクイン_~。

{_o"_g
"o1}

これは単にブロックをプッシュするだけです。_gスタックの最上位が真実である間、ブロックを複製して繰り返し実行します（条件を破棄します）。

これでブロック内に、ブロックのもう1つのコピーがまだスタック上にあります。複製し_oてそれを印刷し、次に_g改行を続けて印刷します（クイン間に必要な追加の改行）"_g\n"o。最後に1、ループが繰り返されるようにスタックにプッシュします。残念なことに、CJamではブロックは真実（または偽）ではありません。

Python 2、39

whileループを通常のクインに追加するのは簡単なので、Pythonでのタスクはそれほど興味深いものではありません。

c='while 2:print"c=%r;exec c"%c';exec c

Perl 5.10以降、40 37バイト

$_=q{say"\$_=q{$_};eval"while 1};eval

または（37バイトも）

$_=q{{say"\$_=q{$_};eval";redo}};eval

-M5.010または-Eコマンドラインフラグを使用して呼び出します。たとえば、

$ perl -E '$_=q{say"\$_=q{$_};eval"while 1};eval'
$_=q{say"\$_=q{$_};eval"while 1};eval
$_=q{say"\$_=q{$_};eval"while 1};eval
$_=q{say"\$_=q{$_};eval"while 1};eval
...

元のソリューションから3バイトを削除したIlmari Karonenに感謝します。

eval while$_=q{say"eval while\$_=q{$_}"}

これは、上記の短い37バイトのソリューションと同様に、以下のクインのすべての単純なバリエーションであり、Ilmariの他の投稿の 1つで最初に見ました。

$_=q{say"\$_=q{$_};eval"};eval

元のソリューションに追加したのはwhileループだけだったので、彼はほとんどの功績に値します。:-)

自己修正Brainf ***（SMBF）、14バイト

末尾の改行\nは、リテラル、Unix、改行（ASCIIコード10）である必要があります。

[<[<]>[.>]<.]\n

説明：

コードはポインターをソースコードの左端に移​​動し、改行を含むすべてを印刷します（ルールのb / cを2回）。ループが続きます。

PowerShell、143バイト

$d='$d={0}{1}{0}{2}while(1){3}Write($d -f [char]39,$d,"`n",[char]123,[char]125){4}'
while(1){Write($d -f [char]39,$d,"`n",[char]123,[char]125)}

Rosetta Code PowerShellのquineに基づいて、これが最短ではないと確信しています。PowerShellでの文字列置換のフォーマットは、置換の配置先と同じ区切り文字{}もコードブロックを区切るwhile{}ため[char]、扱いにくいため、キャストを使用する必要があります。これにより、コードが大量に膨れ上がります。

アンダーロード、25バイト

初めてこのようなことを試してみましたが、2、3行なのですべてのルールに従うかどうかはわかりません。改行は少し苦痛でした。

(::a~*S:a~*^
)::a~*S:a~*^

Befunge、30 20バイト

<,+55,*2+98_ #!,#:<"

人気のあるbefungeクインのバリエーションで、改行を出力し、行が終了するとスタックに-1をポップします。
残念ながら、Befungeは1行で物事を行うと冗長になります。可能な限りすべてのランチパッド（#）を削除しようとしましたが、特定のコマンド（など,）をスキップするために残しておく必要がありました。

変更点：

30-20- >基本クインを、文字列入力を使用するカスタムクインに変更しました。このように、分岐ははるかに簡単です。

古い：

:0g,:93*`>0-10 #,+$#: #5 _1+>

これは最適とは思いませんが、今のところは許容範囲です。

K、30バイト

{f:$_f;{x}{`0:f,"[]\n";1}/1}[]

R、34バイト

repeat{write(commandArgs()[5],'')}

コマンドラインから次のように呼び出します。

Rscript -e "repeat{write(commandArgs()[5],'')}"

> <>、31 29バイト

従来の> <>クインの簡単な修正。

"ar00gc0.0+efooooooooooooooo|

実行するには、ここに貼り付け、[送信]、[開始]の順にクリックします（アニメーションなしで実行すると動作しません）。実行速度を上げてください。

Python 2、48バイト

c='c=\'%s\';while 1:print c%c';while 1:print c%c

GolfScript、16バイト

{.".do
":n\p}.do

これは最終的に、MartinBüttnerのCJamエントリによく似ています。おもしろい機能は、結局のところ".do"、印刷時にブロックに追加する最も簡単な方法は、ブロックを行終了記号に割り当てることnです。（もちろん、n通常含まれているものを置き換えるために、文字列に実際の改行を含める必要もあります。）同じ文字列（GolfScriptで真実である）も、doループがポップオフするためにスタックに残されます。永遠に実行されます。

BASH、76バイト

特にここのPowerShellでは、抵抗できませんでした:)

while true;do
a ()
{
    echo while true\;do
    declare -f a
    echo a\;done
}
a;done

空白は、EXACTコピーにとって重要です。

Javascript（ES6）、64

for(;;(_=>console.log(`for(;;(_=>${arguments.callee})());`))());

あるいは（64も）

a="for(;;)console.log(`a=${JSON.stringify(a)};eval(a)`)";eval(a)

マイクロスクリプト、22バイト

"f1{CqxCanx"f1{CqxCanx

Esolangs記事のクインに基づいて："fCqxah"fCqxah。言語が必要に応じて閉じ括弧を自動的に追加するという事実を利用します。これがないと、2バイト長くなります。

バッチ、10（ファイル名の長さは+ 4）

これが次の2つの理由に該当するかどうかはわかりません。

• 技術的には、Windowsコマンドシェルからのテキストによる副作用がある場合とない場合があります。これは、その構成方法によって異なります。
• このプログラムは名前で自分自身を呼び出しますが、それが規則（具体的には「プログラムファイルを開かない」規則）によって禁止されているかどうかはわかりません。テキストを読んだり印刷したりするために開かれるわけではありません。単にそれ自体を再実行しています。さらに、ファイルシステム構造は、旧式のバッチスクリプトの不可欠な部分です（多くの場合、プログラムの状態などを保存するためにも使用されます）。したがって、これが第5規則に違反しているかどうかはわかりません。

コード（q.batという名前のプログラムの場合）：

echo on&&q

セイロン、210 208バイト

もちろん、これは何も勝ちません...

shared void u(){value q="\"\"\"";value t="""shared void u(){value q="\"\"\"";value t=""";value b="""while(1<2){print(t+q+t+q+";value b="+q+b+q+";"+b);}}""";while(1<2){print(t+q+t+q+";value b="+q+b+q+";"+b);}}

元の：

shared void u(){value q="\"\"\"";value t="""shared void u(){value q="\"\"\"";value t=""";value b="""while(true){print(t+q+t+q+";value b="+q+b+q+";"+b);}}""";while(true){print(t+q+t+q+";value b="+q+b+q+";"+b);}}

Quineを2日前からwhile(true){...}ループを追加して変更したので、プレーンQuineの185バイトから210になりました（末尾の改行文字はもう必要ありません）。しかし、その後、私はwhile(1<2){...}ループはさらに2バイト短くなっ。

shared void u(){value q="\"\"\"";value t="""shared void u(){value q="\"\"\"";value t=""";value b="""while(1<2){print(t+q+t+q+";value b="+q+b+q+";"+b);}}""";while(1<2){print(t+q+t+q+";value b="+q+b+q+";"+b);}}

（Ceylonにはfor(;;)Javaのようなループはありません。このループには中括弧も必要です。）

PowerShell、132 107バイト

$a='$a={0}{1}{0};for(){2}$a-f[char]39,$a,[char]123,[char]125{3}';for(){$a-f[char]39,$a,[char]123,[char]125}

Rosetta Quine（@AdmBorkBorkと同じ）をベースにしていますが、文字列の置換にはフォーマットを使用していません... forループに切り替えてフォーマットを使用するのが最適でしょうか？

AdmBorkBorkが戻ってきた場合、彼らはこれをたくさん打ち負かすと確信しています：P

編集 forループと置換を計算しました、すべて私の前任者に感謝します:)

古い試み：

$a='$a=;for(){$a.substring(0,3)+[char]39+$a+[char]39+$a.substring(3)}';for(){$a.substring(0,3)+[char]39+$a+[char]39+$a.substring(3)}

ルビー、41 39バイト

ここにあるRubyカインの1つの修正。

_="_=%p;loop{puts _%%_}";loop{puts _%_}

Java 10、194バイト

interface M{static void main(String[]a){for(var s="interface M{static void main(String[]a){for(var s=%c%s%1$c;;)System.out.println(s.format(s,34,s));}}";;)System.out.println(s.format(s,34,s));}}

説明：

オンラインで試してください（60秒後にタイムアウト）。

interface M{                    // Class
  static void main(String[]a){  //  Mandatory main-method
    for(var s="interface M{static void main(String[]a){for(var s=%c%s%1$c;;)System.out.println(s.format(s,34,s));}}";
                                //   Unformatted source code
        ;)                      //   Loop indefinitely
       System.out.println(      //    Print with trailing new-line:
         s.format(s,34,s));}}   //     The formatted source code

QUINE -part：

• 文字列にsは、フォーマットされていないソースコードが含まれています。
• %s この文字列をそれ自体に入力するために使用されます s.format(...)。
• %c、%1$cおよびは34、二重引用符のフォーマットに使用されます。
• s.format(s,34,s) すべてをまとめる

チャレンジパート：

• for(;;) 無限ループに使用されます。
• System.out.println(...) 末尾の改行で印刷するために使用されます

ファンキー、29バイト

f=@print`f=[f]for)f()`for)f()

オンラインでお試しください！

RProgN 2、7バイト

«]³]]p:

オンラインでお試しください！

ゼリー、14バイト

“;@ṾṄṛ¢”;@ṾṄṛ¢

オンラインでお試しください！

Pyth、11バイト

#jN B"#jN B

ここで試してみてください！

Brachylog、16バイト

∋"∋~kgjẉ₁⊥"gjẉ₁⊥

あなたはかなりオンラインでそれを試すことはできませんでが、インストールで機能することを確認しました。

Brachylog、18バイト

∋"∋~kgjw₁⊥~n"gjw₁⊥

オンラインでお試しください！

このクインの代替バージョンから改作されたもので、私は当初、あらゆるもののボゴソートのために考案したバックトラッキングハックを使用していました。（末尾の改行で印刷するための通常の手段）がTIOの文字エンコーディングでいくつかの奇妙な問題にぶつかり、文字列リテラルに挿入された実際の改行がasとして印刷される~nためẉ、2バイトを使います。~k\n

               w      Print
 "∋~kgjw₁⊥~n"         "∋~kgjw₁⊥~n"
∋                     which is an element of
                      the (unused and unconstrained) input
                ₁     formatted
          ~n          (so that the ~n is replaced with a newline)
             gj       with itself
   ~k                 (so that the ~k is replaced with the string in quotes),
                 ⊥    then try again.

ためにはw₁リストとして入力を取得[string to be formatted, formatting arguments]してリスト内の文字列をラップし、g次いで自分自身にそれを連結しj、それ自体でフォーマットされることを可能にします。また、プログラムには入力が与えられないため、プログラムの先頭に暗黙的に存在する入力変数は任意の値を取ることができるため"∋~kgjw₁⊥~n"、要素として含まれる無限のリストの1つに制約され、単一のソースを印刷した後、プログラムがヒットしたときにバックトラックされる選択ポイント⊥。

パイソン3.6、48 43バイト。

@Jo Kingのおかげで-5バイト

x='while 1:print("x=%r;exec(x)"%x)';exec(x)

Gol> <>、10バイト

"r2sslRoao

オンラインでお試しください！

これはおそらくより多くのゴ​​ルフをすることができます