多くの電子機器、特に古いものは12:00、時間が設定されていないと点滅します。この課題の目的は、これを再現することです。

具体的には、タスクがする表示12:00と--:--無限ループに代わり。

期間は、 0.5秒の二つの期間に均等に分割し、1秒、であるべきです。ここで、「1秒」と「均等」は大まかに解釈できます。たとえば、結果の期間が1秒より少し長くなる場合でも、文字列の表示の間にコードが0.5秒間停止する場合は許容されます。最初の文字列を表示する前の最初の一時停止は許容されます。

それぞれの新しい文字列は、のいずれかによって表示することができ、元の文字列を置き換えるか、新しい行に。新しい文字列がそれぞれ異なる行にある場合、連続する文字列の間に空行があってはならないことを除いて、末尾の空白は許可されます。

バイト単位の最短コードが優先されます。

ゼリー、20バイト

.“12:00“--:--”ṄœS¥€ß

使い方

.“12:00“--:--”ṄœS¥€ß  Main link. No arguments.

.                     Set the return value to 0.5.
 “12:00“--:--”        Yield ["12:00", "--:--"].
                 ¥    Combine the two links to the left into a dyadic chain.
              Ṅ       Print the left argument.
               œS     Sleep as many seconds as the right argument specifies.
                  €   Map the created dyadic chain over the string array, with
                      right argument equal to the return value, i.e., 0.5.
                   ß  Recursive call the main link.

HTML / CSS、131 108 106 101 + 18 17 = 149 126 125 123 118バイト

a{background:#FFF;margin:-5ch;animation:a 1s steps(2,start)infinite}@keyframes a{to{visibility:hidden

<tt>--:--<a>12:00

編集：@insertusernamehereのおかげで23バイト保存されました。から<pre>に切り替えて1バイトを保存しました<tt>。@darrylyeoのおかげで2バイト節約されました。@DBSのおかげで5バイト節約されました。

シェルおよびpv26バイト

これは、yes標準ツールとpv シェルパイプライン要素を使用して、通過するデータを計測します

yes '12:00
--:--'|pv -qlL2

Python2、80の 75 73 69 67 66バイト

import time
n=0
while[time.sleep(.5)]:print"1-2-::0-0-"[n::2];n^=1

私は、文字列マジックが配列から文字列を選択するよりも少し長くなっていることに気付きました。気にせず、それを理解しました。

説明：

• カウンターnを0 に設定すると、0と1の間で切り替わります。

• 私はループで無限にループしますwhile 1。

• 私は、文字列の作成1-2-::0-0-文字列が含まれ、12:00および--:--interlappedを。

  • 2のステップでインデックス0から開始すると、次のようになります。 12:00

  • 2のステップでインデックス1から開始すると、次のようになります。 --:--

• 私は使用のn反復配列にするために0、1、0、1、0 ...文字列の開始インデックスとなります。

  • を使用してn^=1、各ループでそのシーケンスを取得します。^XOR演算子であること。
  • n == 0の場合-> n^=1結果は1
  • n == 1の場合-> n^=1結果は0
• 文字列を出力し、スリープ（.5-> 0.5）秒します。

@FlipTackは4バイトを節約しました！->ループを1行に配置します。

@Rodは2バイトを節約しました！-> n+=1to n^=1、したがってn%2to n。

@xnorはバイトを節約しました！- > while 1- > while[time.sleep(.5)]。

オクターブ、63 62 61 55バイト

c='--:--00:21';while c=flip(c)disp(c(1:5));pause(.5)end

トムカーペンターのおかげで2バイト節約できました！セル配列で2つの文字列の代わりに1つの文字列を使用する方が短かった。

説明：

c='--:--00:21';  % A string where the 5 first characters are --:-- or 12:00 when reversed
while c=flip(c)  % A string is always considered true in Octave, so this will loop forever
                 % while flipping the order of the string each time
 disp(c(1:5)     % display the 5 first characters of the string c
 pause(.5)       % Pause 0.5 second
end              % End loop

数バイトは、Octaveが間にコロンやセミコロンを必要としないため保存flip(c)とdisp()、との間pause(.5)とend。

JavaScript、59バイト

y=1;setInterval('console.log(["12:00","--:--"][y^=1])',500)

説明

setInterval('...',500) 文字列内のコードを500ミリ秒ごとに実行する間隔、つまり1秒あたり1/2を設定します。

y=1変数をy最初に1に設定します。このように、最初に印刷されるのは、配列へのアクセスに使用される12:00ためyです。

console.log(...)12:00またはのいずれかに、コンソールに何でも記録します--:--。

["12:00","--:--"][y^=1]両方の状態を含む文字列で配列を作成します。次に、y要素の1つにアクセスするために使用されます。最後に^=、またはXOR複合演算子はを行いy = y ^ 1ます。@TuukkaXが行ったのと同様に1 ^ 10で0 ^ 11であるため、これはビットを反転させるだけです。このように、ログに記録された文字列は配列内の2つの要素を交互に切り替え、点滅効果を作成します。

V、31 30 27 25 24バイト

保存された5の順序交換することにより、@ nmjcman101のおかげバイト12:00と--:--なるようにk除去することにより、いずれかを削除することができò、それが最後に暗黙のうちに追加されることができるように

@DJMcMayhemのおかげ12:00で--:--、1行で両方を入力して1バイト節約

i12:00--:--<ESC>bDòVp:sl500m

古いソリューション：

i12:00<ESC>ò:sl500m
Óä/-
:sl500m
uò

<ESC> は 0x1b

Hexdump：

00000000: 6931 323a 3030 2d2d 3a2d 2d1b 6244 f256  i12:00--:--.bD.V
00000010: 703a 736c 3530 306d                      p:sl500m

説明

i12:00--:--<ESC>   inserts 12:00\n--:--
bD                 go to the beginning of --:-- and delete it
ò                  recursively do:
 Vp                 select line and paste (effectively doing a replace)
 :sl500m            sleep for 500 milliseconds
                   the last ò is added implicitly at the end

Gif（時代遅れ）

注：強調表示がオンになっています

bash、58 56 45バイト

1番目の引数が数値であるため--、後に抑制することで3バイトを節約しましたset。

set 12:00 --:--;for((a=1;;a=3-a)){ echo ${!a};sleep .5;}

@DigitalTraumaの構文を使用して16バイトを保存しました：

f()(echo $1;sleep .5);f 12:00;f --:--;exec $0

その後、ツェッペリンのコメントのために5バイトを失います。

これはコマンドラインでテストできませんでした。を含むため$0、これを実行するスクリプトに書き込む必要があります。

迂回

少し準備をすれば、これがうまくなる可能性があります（412バイト）：

set -- "         ▗▖         
▗▄▄▖▗▄▄▖ ▝▘ ▗▄▄▖▗▄▄▖
         ▗▖         
         ▝▘         " " ▟▌ ▟▀▜▖ ▗▖ ▗▛▙ ▗▛▙ 
 ▐▌  ▗▟▘ ▝▘ █▗▐▌█▗▐▌
 ▐▌ ▗▛▗▖ ▗▖ ▜▖▟▘▜▖▟▘
▝▀▀▘▀▀▀▘ ▝▘  ▀▘  ▀▘ "
r=`tput cup 0`
clear;for((a=1;;a=3-a)){ printf "$r${!a}";sleep .5;}

または、同じ2行ですが、次のとおりです。

set -- '                                            






      HM!          .o#HMMMMM#o.                 .o#MMMMH#\\         .d#MMMMH#\\
    _HMMi         ?MMH*"""`"MMMb               dMMH"""`*MMH,      dMMH"""`*MMH.
##HMMMMMi        |MMP"       9MML             ?MMP      `MMM.    dMM?      `MMM.
`""`"9MM|        dMM!        -MMR     HMH}   .MMM        |MM}   .MMH        |MM|
     |MM|         "`         JMMT     dHH}   |MM|         MMM   |MM|        -MMM
     |MM!                 .,HMM*             |MM|         MMM.  ]MM|         MMM
     |MMi              _o#MMH*"              |MM|         MMM   {MM|         MMM
     |MMi           .dHMM#""                 |MM|         MMM"  {MM|        .MMM
     |MMi         .HMM*"                     `MM6        ,MMR   |MM}        |MMF
     |MMi        ,MMP"                        9MM,       dMM|    HMM,       dMM"
     {MMi        MMM?\\o,\\\\\\\\\\\\\\\\,     q##+    `HMM\\    .dMM?     `HMH\\    .dMM?
     |MM|       :MMMMMMMMMMMMMMM[     HMMk     `*HMM##MMM#"       `*HMM##MMMP"
      "`          "     ` ` ` `                   """"`""            """"""    ' '









                                      MHM|                                      
                                      HHH|                                      

               ______.  ._______.            ________.  ._______.               
               MMMMMM:  {MMMMMMM|            &MMMMMMM:  |MMMMMMM[               


                                      ###|                                      
                                      MMM|                                      
                                                                               '

Perl、49バイト

{select$,,$,,$,,0.5;say$|--?"12:00":"--:--";redo}

Perlのsleepできないスリープ1秒ベローズ期間の従って使用するためのselect undef, undef, undef, .5（置換することによってgolfed undefと$,睡眠0.5秒へ）。
その他の興味深いこと：または$|のみを保持0でき1ます。だから、$|--ちょうどから、その値をトグル0します1。
そして最後に、{... ;redo}無限ループのように動作します。

*> <>、43 42バイト

<v":1200----"
S>@5dov>~r@@}r5
1&}o:&<^!?:-

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

私はこれを短くすることができるように感じる、私はいくつかのアイデアを試してみてください...基本的にこれはのスタックを作ります:1200----。:スタックを分離し、スタックを反転させて、または（スタックの最後にある方に応じ:て）の中央に挿入します。----1200

また、これが使用する唯一の*> <>命令はS（sleep）であることに注意する必要があります。それ以外の場合、これは適切な> <>プログラムです。

更新：:レジスタで保護する代わりに右にシフトして1バイトを保存しました。

説明

初期化

<v":1200----"

ここで、プログラムの存続期間に使用するスタックを構築します。

<              move the IP left
  ":1200----"  push ":1200----" to the stack
 v             move the IP down into "output time"

出力時間

 >@5dov
1&}o:&<^!?:-

これは、実際に時間が出力されるセクションです。最初の5はスタックにプッシュされるため、以下のループは5回実行されることがわかります。

Initialisation:

 >@5dov

 >       move the IP right
  @      move the ":" back two spaces in the stack
   5     push 5 to the stack (let's call this `i`)
    do   output carriage return
      v  move IP down into "loop"

Loop:

1&}o:&<^!?:-

      <       move the IP left
     &        place i onto the register
  }o:         output a character and shift the stack left
 &            place i back onto the stack
1          -  decrement i by 1
       ^!?:   if i == 0, exit to "recover and swap"

回復して交換する

S      >~r@@}r5

ここで:、出力後の位置からを回復し、逆のスタックになります。これは実際には「出力時間」にうまく終了し、無限ループを引き起こします。

       >         move the IP right
        ~        remove trailing i from stack
         r@@     reverse the stack and move ":" to the front
            }r   reverse the stack again, keeping ":" on the front
S             5  sleep for 500ms

45バイトのソリューション

<v[5"12:00"1
d/S5
o/!?l
v>]?v
 00.>0"--:--"5[

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

これも基本的には> <>プログラムです。

私はこのアプローチでいくつかのバイトを節約できると本当に思った。これは非常に単純に出力し12:00、その後、--:--。出力ルーチンを再利用することでバイトを節約しますo/!?l（そのミラーを入り口と出口の両方として再利用します）。複数のスタックを使用して状態を出力し（出力12または--）、出力する状態を選択しますv>]?v。

^{説明はすぐに来ます！（1/2）}

HTML / CSS（Chromeのみ）、80 + 4 = 84バイト

tt:after{content:"--:--";animation:a 1s infinite}@keyframes a{to{content:"12:00"

<tt>

編集：「コンテンツ」属性がないアニメートすることによってCSSの仕様が、クロムのデスクトップブラウザ上です。

Noodel、非競合16 バイト

--:-- 12:00ḷçėḍh

Noodelはまだ非常に進行中の作業です。いくつかの課題で足を濡らそうとしているだけです。

それを試してみてください：）

使い方

--:--            # Creates the string literal "--:--" and places i into the front of the pipe.
                 # Space is a NOP command to separate the string literals.
      12:00      # Creates the string literal "12:00" and places it into the front of the pipe.
           ḷ     # Loop the following code unconditionally.
            ç    # Clear the screen and print a copy of what is in the pipe.
             ė   # Take what is in the front of the pipe and put it into the back.
              ḍh # Delay for half a second.

コードスニペットを次に示します。

<div id="noodel" code="--:-- 12:00ḷçėḍh" input="" cols="10" rows="2"></div>

<script src="https://tkellehe.github.io/noodel/noodel-latest.js"></script>
<script src="https://tkellehe.github.io/noodel/ppcg.min.js"></script>

QBIC、37 33バイト

{sleep 01?@12:00`┘sleep 01?@--:--

残念ながら、QBasicは数秒間しかスリープできません。すぐに柔軟性を高める方法を考案する予定です。01シミュレートするために1を入力しました.5。

説明：

{         Starts DO loop
sleep 01  Sleeps for 1 second
?@12:00`  Creates A$, sets value to "12:00" and prints A$
┘         Newline: a string literal doesn't break the line, so we need a newline to 
          control the compiled QBasic syntax
          <Rinse and repeat for "--:--">
          <DO-LOOP implicitly closed by QBIC>

QBICの古いビルドでは、$および （スペース）は予約文字でした。スペース（などsleep x）または$（left$(..)）を必要とするQBasic関数を呼び出すには、コードリテラルが必要です。

'QBASIC CODE`

コードリテラルブロック内のコードは、QBICによって解析されることなく、QBasicに直接渡されます。それらのシンボルから関数をオフロードすることにより（に$なり'、改行はの┘代わりに（alt-217）になりました）、シンボルはQBICによって特別な文字として認識されなくなり、単に渡されます。小文字のアルファベットについても同様です。QBICとQBasicの両方で数値変数を表すために使用され、変更されません。そのため、QBICに実装されていないQBasic機能（などSLEEP）を使用することは、単にQBICの予約文字を使用しないということです。これは、コマンドシンボルの最近の変更により簡単になりました。

JavaScript、77 76 72バイト

setInterval('l=console.log,l("12:00"),setTimeout("l(`--:--`)",‌​500)',1e3)

1バイトのKritixi Lithosと4バイトのL. Serneに感謝します！

Python 2、 88 85 73 71バイト

import time
c="--:--00:21"
while 1:print c[:5];c=c[::-1];time.sleep(.5)

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

リストをひっくり返すというStewie Griffinのアイデアを借用することで、プログラムは可能になりました。説明付きのゴルフバージョン：

import time                      # Import time module
c = "--:--00:21"                 # String with two values
while 1:                         # Infinite Loop
    print c[::5]                 # Print the first 5 chars in string
    c = c[::-1]                  # Flip the string
    time.sleep(.5)               # Wait 0.5 seconds

14バイトを節約してくれた@FlipTackに感謝します！

PHP、51 50 47

for(;;usleep(5e5))echo$i++%2?"--:--
":"12:00
";

manatworkにより1バイトが保存され、insertusernamehereにより3バイトが保存されました。ありがとう！

Pyth、23バイト

#?=!Z"12:00""--:--".d.5

擬似コードで：

                Z = 0
#               while 1:
 ?=!Z               if ( Z = not Z ):
     "12:00"            print("12:00")
                    else:
     "--:--"            print("--:--")
 .d.5               sleep(0.5)

事前に初期化された変数Zをフリップフロップとして使用し、状態ifを確認しようとするたびに状態を反転します。

ルビー、47 42バイト

ルビーの答えはまだないので、ここに私の最初の試みがあります：

%w{12:00 --:--}.cycle{|a|puts a;sleep 0.5}

GNU sed、39バイト

編集：

• スリープとi12：00の入れ替え（ソースコードを少し見やすくするため）

ゴルフ

s/^/sleep .5/
h
i12:00
e
i--:--
x
e
G
D

説明した

s/^/sleep .5/   #Put 'sleep .5' to the pattern space
h               #Copy pattern space to hold space
i12:00          #Print "12:00" (insert before a line) 
e               #Execute command that is found in pattern space
i--:--          #Print "--:--"
x               #Exchange the contents of the hold and pattern spaces
e               #Execute command that is found in pattern space

G               #Append a newline to the contents of the pattern 
                #space, and then append the contents of the hold
                #space to that of the pattern space.

D               #Delete text in the pattern space up to the 
                #first newline, and restart cycle with the 
                #resultant pattern space, without reading a new 
                #line of input.

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

dc（bash）、37バイト

[12:00][--:--][[rp!sleep .5]xlax]dsax

これは、2つの文字列「12:00」と「-：-」をスタックにプッシュし、値を繰り返しスワップし、スタックの一番上にあるアイテムを印刷し、0.5秒間スリープすることで機能します。

これを実行するには、ファイルに保存してから次を入力します。

dc ファイル名

または、bashコマンドラインから直接入力して実行できます

dc <<< '[12:00] [-：-] [[rp！sleep .5] xlax] dsax'

Perl 6の、 48の41  34バイト

loop {print "\r",<--:-- 12:00>[$_=!$_];sleep .5}

loop {put <--:-- 12:00>[$_=!$_];sleep .5}

sleep .put/2 for |<12:00 --:-->xx*

ゼリー、22バイト

®‘©ị“12:00“--:--”ṄœS.ß

TIOでは機能しません。QPython3を使用してJellyをAndroidで実行することも楽しい経験でした。

説明

®‘©ị“12:00“--:--”ṄœS.ß    Main link. No arguments. 
®                         Read the register. Initially 0.
 ‘                        Increment. 
  ©                       Save to the register.
   ị                      Get the n'th (wrapping) item of...
    “12:00“--:--”         ["12:00", "--:--"]
                 Ṅ        Print the string and a newline. 
                  œS      Sleep for...
                    .     ...0.5 seconds. (. is an alias for 0.5)
                     ß    Call this link again. 

Mathematica、38バイト

Dynamic@If[Clock[]>.5,"12:00","--:--"]

説明

Clock[]

毎秒0から1まで連続的に循環するクロック変数を出力します。

If[Clock[]>.5,"12:00","--:--"]

クロック変数が.5より大きい場合、「12:00」を出力します。そうでない場合は、「-：-」を出力します。

Dynamic@ ...

プログラムを動的にする（常に更新する）

Javascript、57 55

setInterval('console.log(++i%2?"12:00":"--:--")',i=500)

ETHproductionsのおかげで2バイト節約

追記225 214

楽しみのためだけに！これを実際のプリンターに送らないでください!!

/Courier findfont 9 scalefont setfont{usertime 500 mod 5 lt{newpath 9 9 moveto 1 setgray 99 setlinewidth 99 99 lineto stroke 0 setgray}if newpath 9 9 moveto usertime 999 mod 500 lt{(--:--)}{(12:00)}ifelse show}loop

それを試してみてください：

gs -c '/Courier findfont 9 scalefont setfont{usertime 500 mod 5 lt{newpath 9 9 moveto 1 setgray 99 setlinewidth 99 99 lineto stroke 0 setgray}if newpath 9 9 moveto usertime 999 mod 500 lt{(--:--)}{(12:00)}ifelse show}loop'

または

cat <<eops >/tmp/blinkingTwelve.ps
%!
/Courier findfont
9 scalefont
setfont
{
  usertime 500 mod 5 lt {
    newpath
    9 9 moveto
    1 setgray
    99 setlinewidth
    99 99 lineto
    stroke
    0 setgray
  } if
  newpath
  9 9 moveto
  usertime 999 mod 500 lt {
    (--:--)
  } {
    (12:00)
  } ifelse
  show
} loop
eops

それから

gs /tmp/blinkingTwelve.ps
gv /tmp/blinkingTwelve.ps

ただし、より洗練されたビューアでこれを開いて、デスクトップサムネールを気にしないでください。

Javascript（ブラウザ内）、174 160 159 122 112 111 109 107 66（91）バイト

私はのtakedきたpre私の新しいカウントがあるので、monotypedフォントを使用すると、要件の一部ではないので、66。等幅フォントを使用するためにいくつかの文字が追加されていますが、これは必要ないため、この25文字はカウントしません。

ETHproductionsが14バイトを節約してくれたおかげで、

1バイトを節約するためにKritixi Lithosに、

1 3バイトを節約するための管理に

さらに2バイトを節約してくれたChristophに

...の[..][b^=1]代わりにsetTimeout... を使用して37バイトを節約しfunction(){..}、二重引用符で置き換えることでさらに10

setInterval("document.body.innerHTML=++b%2?'12:00':'--:--'",b=500)

body{font-family:Courier}

...さらに悪いこと：

66からもっと ...

...しかし、楽しみのために、点滅するディスプレイの精神で：

SVG="http://www.w3.org/2000/svg";XLNK="http://www.w3.org/1999/xlink";
s=["1200","----"];p=0;function d(n){for(i=n.length;i>0;i--) {
  document.getElementById('n'+i).setAttribute('class','n'+n[i-1])}
  document.getElementById('sz').setAttribute('class','n'+n[0])}
setInterval("p=1-p;d(s[p])",500);

#svg2 { --c: #FF6;stroke:#432;stroke-width:12;stroke-linecap:round;stroke-linejoin:round; stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none; } path.b { fill:#543;stroke:none; } .blue     { --c: #68F; } .green    { --c: #6F8; } .red      { --c: #F88; } .dec rect  { stroke: var(--c); } .n1 #B { stroke: var(--c); }  .n1 #C { stroke: var(--c); } .n2 #A { stroke: var(--c); }  .n2 #B { stroke: var(--c); } .n2 #D { stroke: var(--c); }  .n2 #E { stroke: var(--c); } .n2 #G { stroke: var(--c); }  .n3 #A { stroke: var(--c); } .n3 #B { stroke: var(--c); }  .n3 #C { stroke: var(--c); } .n3 #D { stroke: var(--c); }  .n3 #G { stroke: var(--c); } .n4 #B { stroke: var(--c); }  .n4 #C { stroke: var(--c); } .n4 #F { stroke: var(--c); }  .n4 #G { stroke: var(--c); } .n5 #A { stroke: var(--c); }  .n5 #C { stroke: var(--c); } .n5 #D { stroke: var(--c); }  .n5 #F { stroke: var(--c); } .n5 #G { stroke: var(--c); } .n6 #A { stroke: var(--c); }  .n6 #C { stroke: var(--c); } .n6 #D { stroke: var(--c); }  .n6 #E { stroke: var(--c); } .n6 #F { stroke: var(--c); }  .n6 #G { stroke: var(--c); } .n7 #A { stroke: var(--c); }  .n7 #B { stroke: var(--c); } .n7 #C { stroke: var(--c); } .n8 #A { stroke: var(--c); }  .n8 #B { stroke: var(--c); } .n8 #C { stroke: var(--c); }  .n8 #D { stroke: var(--c); } .n8 #E { stroke: var(--c); }  .n8 #F { stroke: var(--c); } .n8 #G { stroke: var(--c); } .n9 #A { stroke: var(--c); }  .n9 #B { stroke: var(--c); } .n9 #C { stroke: var(--c); }  .n9 #D { stroke: var(--c); } .n9 #F { stroke: var(--c); }  .n9 #G { stroke: var(--c); } .n0 #A { stroke: var(--c); }  .n0 #B { stroke: var(--c); } .n0 #C { stroke: var(--c); }  .n0 #D { stroke: var(--c); } .n0 #E { stroke: var(--c); }  .n0 #F { stroke: var(--c); } .n11 #B { stroke: var(--c); } .n11 #C { stroke: var(--c); } .n11 #E { stroke: var(--c); } .n11 #F { stroke: var(--c); } .nA #A { stroke: var(--c); }  .nA #B { stroke: var(--c); } .nA #C { stroke: var(--c); }  .nA #E { stroke: var(--c); } .nA #F { stroke: var(--c); }  .nA #G { stroke: var(--c); } .nB #C { stroke: var(--c); }  .nB #D { stroke: var(--c); } .nB #E { stroke: var(--c); }  .nB #F { stroke: var(--c); } .nB #G { stroke: var(--c); } .nC #A { stroke: var(--c); }  .nC #D { stroke: var(--c); } .nC #E { stroke: var(--c); }  .nC #F { stroke: var(--c); } .nD #B { stroke: var(--c); }  .nD #C { stroke: var(--c); } .nD #D { stroke: var(--c); }  .nD #E { stroke: var(--c); } .nD #G { stroke: var(--c); } .nE #A { stroke: var(--c); }  .nE #D { stroke: var(--c); } .nE #E { stroke: var(--c); }  .nE #F { stroke: var(--c); } .nE #G { stroke: var(--c); } .nF #A { stroke: var(--c); }  .nF #E { stroke: var(--c); } .nF #F { stroke: var(--c); }  .nF #G { stroke: var(--c); } .nR #E { stroke: var(--c); }  .nR #G { stroke: var(--c); } .nO #C { stroke: var(--c); }  .nO #D { stroke: var(--c); } .nO #E { stroke: var(--c); }  .nO #G { stroke: var(--c); } .n- #G { stroke: var(--c); }  .n1 #y { stroke: var(--c); } .n1 #z { stroke: var(--c); }

<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<svg xmlns="http://www.w3.org/2000/svg" version="1.1" width="100%" height="100%" xmlns:xlink="http://www.w3.org/1999/xlink" viewBox="0 0 645 230" id="svg2"> <defs id="dfs4"><g id="n"><path d="M 15,5 155,5 145,225 5,225 z" class="b"/> <path id="A" d="M 45,15 125, 15"/><path id="B" d="M 135,25 125,105"/><path id="C" d="M 125,125 115,205"/><path id="D" d="M 25,215 105,215"/><path id="E" d="M 25,125 15,205"/><path id="F" d="M 35,25 25,105"/><path id="G" d="M 35,115 115,115"/><rect id="P" width="5" height="5" ry="2.5" x="130" y="205"/></g><g id="s"><path d="M 10,5 35,5 25,225 0,225 z" id="a" class="b"/><rect id="y" width="5" height="5" ry="2.5" x="13.5" y="145"/><rect id="z" width="5" x="17" height="5" ry="2.5" y="75"/></g></defs><use id="n1" xlink:href="#n" /><use id="n2" xlink:href="#n" transform="translate(150,0)" /><use xlink:href="#s" id="sz" transform="translate(305,0)"/><use id="n3" transform="translate(335,0)" xlink:href="#n" /><use id="n4" xlink:href="#n" transform="translate(485,0)" />
</svg>

QuickBASIC、167バイト（おいしい）

a%=VAL(RIGHT$(STR$(TIMER*100),2))
b%=a%+50
IF b%>99THEN b%=b%-99
DO
c%=VAL(RIGHT$(STR$(TIMER*100),2))
IF c%=a% THEN PRINT"--:--"
IF c%=b% THEN PRINT"12:00"
LOOP

とにかく勝つつもりはなかった。QBにはfloor（）がなく、xミリ秒スリープする機能もありません。したがって、これはTIMERの浮動小数点部分を取得することによって機能します（真夜中から経過した秒数と、2桁の10進数として表される現在の秒の一部を返します）。次に、ループアラウンド「50ユニット」を追加して、フェーズを「-：-」から「12:00」に切り替えるタイミングを決定し、「12:00」からの切り替えに元のTIMER小数を使用します「-：-」に。

最後に、かなり強力なマシンのDOSBoxでQB4.5に準拠してこれを実行しても、ビートはスキップされます。これは、QBが、比較を行っているMSの内部でDO-LOOPおよび評価を実行するのに十分なほど高速ではないためです。FUTUREのボックスが必要です！

とにかく、私は今100を見て、彼らがまだこれを教えているので、彼らはおそらく彼らのComp Sciクラスの答えを持っているので、私はすべてのアメリカの大学生を幸せにしました...

Clojure、79 62バイト

V2

-17バイト。これは、ひどいインデックスループから無限リストのループに変更することで実現します。

無限のリストを作成"12:00"し、"--:--"オーバー繰り返し何度も繰り返し、その後、使用してdoseq常に次のメッセージを引き出し、それを印刷します。

(doseq[m(cycle["12:00""--:--"])](Thread/sleep 500)(println m))

V1

(loop[i 0](Thread/sleep 500)(println(["12:00""--:--"]i))(recur(if(= 0 i)1 0))))

「12:00」と「-：-」定数を圧縮する良い方法が思いつかなかったので、ハードコーディングする必要がありました。

ゴルフをしていない：

(loop [i 0] ; Track which sign we showed last
    (Thread/sleep 500)
    (println (["12:00" "--:--"] i)) ; Index the vector to get the string to print
    (recur (if (= 0 i)1 0))) ; Swap the index, and loop again

Pushy、22バイト（非競合）

`--:`wO`12:0`&["500oWF

この答えは、2つのスタックを切り替えて、文字を順番に印刷することで使用します。

`--:`    \ Push these characters to stack 1
 w       \ Mirror around center, yielding "--:--"
 O       \ On the second stack...
 `12:0`  \ Push these characters
 &       \ Duplicate the last (for :00)

 [        \ Infinitely:
  "       \   Print the current stack
  500oW   \   Wait 500 milliseconds
  F       \   Swap stacks
          \ (Implicit end loop)

このoWコマンドは、チャレンジをポストデートする一連の実験的なコマンドの一部であり、この回答は競合しません。

Windows PowerShell、 46 55バイト

function a{sleep -m 500;cls};for(){"12:00";a;"--:--";a}

元のコード：

a{sleep -m 500;cls};for(){"12:00";a;"--:--";a}
^ this won't work on other PCs. No idea why.