Meydan okuma

Şu andaki zamanı sürekli olarak (bir kesme ile iptal edilinceye kadar), saniyede bir kez aşağıdaki yollardan biriyle göndermelisiniz:

• 24 saat ya da AM / PM formatında olmalıdır.
  • Eski ise, iki nokta üst üste yerleştirilmelidir (15:47:36).
  • İkincisi ise, iki nokta üst üste yerleştirilmeli ve AM / PM’yi izlemelidir (ör. 3:47:36 PM)
• İnternetten çekilebilir.
• Sistem zamanı olabilir.
• Seçtiğiniz metni destekleyen, doğal olarak erişilebilir herhangi bir çıktı biçimini çıkarması gerekir.
• Çıktı, içindeki zaman dışında bir ek bilgiye sahip olabilir, ancak saniyede bir ve yalnızca bir çıktı alınmasını garanti etmelisiniz .
• Sürekli çıkış ikinci bir saniye olmalıdır - ikinci çıkışlar arasında değişene kadar beklemeyi tercih ederseniz, bu iyidir. Her çıktı arasında bir saniye beklerseniz, kesin doğruluk kaybına rağmen, bu tamamen kabul edilebilir.

Bu bir katalog olduğundan, bu mücadeleden sonra oluşturulan dillerin rekabet etmesine izin verilir. Göndermenin test edilebilmesi için bir tercüman olması gerektiğini unutmayın. Daha önce uygulanmamış bir dil için bu tercümanı kendiniz yazmanıza izin verilir (ve hatta teşvik edilir). Bunun dışında tüm standart kod-golf kurallarına uyulmalıdır. Çoğu dilde yapılan gönderiler uygun bir önceden kodlanmış kodlamada (genellikle UTF-8) bayt olarak puanlanacaktır.

Katalog

Bu yazının altındaki Yığın Parçacığı, cevapları a) dil başına en kısa çözümün bir listesi olarak ve b) genel bir lider tablosu olarak oluşturur.

Cevabınızın göründüğünden emin olmak için, lütfen aşağıdaki Markdown şablonunu kullanarak cevabınızı bir başlık ile başlatın:

## Language Name, N bytes

Gönderinizin Nbüyüklüğü nerede ? Puanınızı artırmak varsa, olabilir onları içinden vurarak, başlığa eski hesapları tutmak. Örneğin:

## Ruby, <s>104</s> <s>101</s> 96 bytes

Başlığınıza birden fazla sayı eklemek istiyorsanız (örneğin, puanınız iki dosyanın toplamı olduğundan veya tercüman bayrağı cezalarını ayrı ayrı listelemek istediğiniz için), gerçek puanın başlıktaki son sayı olduğundan emin olun :

## Perl, 43 + 2 (-p flag) = 45 bytes

Dil adını, daha sonra pasajda görünecek bir bağlantı da yapabilirsiniz:

## [><>](http://esolangs.org/wiki/Fish), 121 bytes

var QUESTION_ID=65020,OVERRIDE_USER=44713;function answersUrl(e){return"//api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"//api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Minecraft 1.8.7, 7 + 8 = 15 blyte (bayt + blok)

Sadece bir komut bloğu dahil edildi:

xp 1 @p

Çıktı şöyle bir müşteri konsoluna gider:

Normal çıktının bir parçası olarak.

Bu sistem:

xpsözdizimi olan belirli bir oyuncuya belirtilen miktarda deneyim verir xp <amount> <player>. Bunun elde edebileceğim tekil çıktıya sahip en küçük emir olduğundan eminim.

JavaScript, 32 bayt

setInterval("alert(Date())",1e3)

SetInterval'in kodu değerlendirdiği gerçeğini kullanır . Bu önerilmez, ancak kod golf için bir endişe ne zamandı?

Date() şu anki saati ve tarihi buna benzer biçimde döndürür (sistem başına farklılık gösterebilir).

 Wed Jul 28 1993 14:39:07 GMT-0600 (PDT)

sh (+ izle), 11 bayt

Senaryo:

watch -n1 .

(takip eden yeni satır yok)

Çıktı:

Every 1,0s: . (SPACES) Sat Nov 28 19:07:51 2015

Boşlukların miktarı terminal genişliğine bağlıdır.

Debian8 ve NetBSD7'de test edilmiştir.

Snap , 8 7 6 blok

(Evet, MS Paint'te değiştirdim, çünkü başka bir ekran görüntüsü oluşturmak için çok tembeldim. Peki ya? En azından okunabilir.) 24-saat
çalışacak komut dosyasını tıklayın
.

Python 2, 47 bayt

from time import*
while[sleep(1)]:print ctime()

Çevrimiçi bağlantı yok, çünkü ideone bir şeyi yazdırmadan önce zaman aşımına uğradı (huehuehue).

while[sleep(1)]Hile ve numara için @ xsot'a teşekkürler ctime.

Geçerli tarih ve saati şöyle yazdırır: Fri Nov 27 21:23:02 2015

Perl, Komut Satırı, 24 bayt

sleep(say)while$_=gmtime

Bu, komut satırından çalıştırılmalıdır perl -E'sleep(say)while$_=gmtime'(Windows'da bunun yerine çift tırnak işareti kullanın). Tarih, izin verildiği anlaşılan saatle birlikte verilir .

Perl, 25 bayt

sleep print$/.gmtime;do$0

Skaler bağlamda, gmtimebenzer bir dize döndürür Sat Nov 28 10:23:05 2015. Her printzaman 1 olan sonuç , parametresi olarak kullanılır sleep. do$0Zamanlayıcı bittikten sonra betiği tekrar çalıştırmak için kullanılır.

Javascript ES6, 43 39 bayt

setInterval(_=>console.log(Date()),1e3)

En azından şimdiki zaman ayarları ile çalışır (bir süredir değiştirilmemiş, teşekkür ederim).

Conor O'Brien tarafından kaydedilen 4 bayt.

Arcyóu , 27 bayt

(@ t(pn(zz 1)(p(st %H:%M:%S

Bu meydan okuma için iki yeni işlevler birlikte kludge zorunda kaldı zzve st.

pn: Aynen Lisp'inki gibi progn.

zz: Python's'a doğrudan bağlantı time.sleep.

st: Python's'a doğrudan bağlantı time.strftime.

Normal olarak, biçim dizgisinde tırnak işaretleri gerekir, ancak boşluk olmadığı için bir simge olarak ayrıştırılır. Tercüman tanımsız sembolleri kendileri olarak değerlendirir, bu yüzden bir dizge alırız.

Bash, 51 31 24 21 20 bayt

Bazı çok yararlı yorumlar için @quartata teşekkürler. Açıklamalar ve daha fazla bayt kesmek için @Dennis teşekkür ederiz. Teşekkür ederim @VoteToClose (açıkçası ben okuma konusunda kötüyüm) kuralları netleştirmek için bayt daha da azaltarak.

date24 saatlik bir saatle tam tarihi görüntüler. sleep 1bir saniye uyur. exec $0betiği sonsuz döndürür.

date;sleep 1;exec $0

Befunge 98, 53 bayt

 v
v>"EMIT"4(>H.8,':,M.8,':,S:.8,d,
>:S-    !!k^

Notlar:

1. Bu program, yazdırdığı sayıları sıfırlamaz.
2. Bu program bir boşluk ve ardından her sayının ardından bir geri alma karakteri .basar , çünkü komut sonunda gizli bir alan yazdırır.
3. Bu programdaki yığının boyutu her saniye büyür ve bu nedenle sonunda bellek tükenir.
4. Bu program, yenisini yazdırdığında önceki zamanın üzerine yazacaktır. Her seferinde yeni bir satıra yazdırmak diçin, ilk satırına

mIRC 7.49 20 16 Bayt

/timer 0 1 $time

AutoHotkey, 50 bayt

x::Send,% a!=A_Sec? A_Hour ":" A_Min ":" a:=A_Sec:

Notlar:

1. xSürekli çıkış için tutmanızı gerektirir .
2. xÇıkışı kesmek ve bitirmek için parmağınızı çıkarın .
3. Çıktı 24 saat formatındadır.

C (Linux x64'te), 179 177 175 168 159 bayt

#include<time.h>
#include<sys/time.h>
main(){struct timeval a;char b[9];for(;;){gettimeofday(&a,0);strftime(b,9,"%T",localtime(&a.tv_sec));puts(b);sleep(1);}}

Ungolfed:

#include <time.h>
#include <sys/time.h>
main(){
  struct timeval a;
  char b[9];
  for(;;){
    gettimeofday(&a, 0);
    strftime(b, 9, "%T",localtime(&a.tv_sec));
    puts(b);
    sleep(1);
  }
}

Yalnızca Linux üzerinde test edildi ve muhtemelen çalışıyorsa, linux x64 (x32 çalışabilir, ancak diğer platformlar muhtemelen çalışmayabilir).

Bu program ile yayınlanan diğer C programı arasındaki temel fark, gerçek yazılım için korkunç bir uygulama olmasına rağmen, tüm derleyici uyarılarını göz ardı ederseniz, oldukça az sayıda bayt tasarrufu sağlayan linux-exclusive işlev çağrılarının kullanılmasıdır.

Jolf , 14 8 7 bayt

^{14 çarpı atıldı 1 mi? Hayır, asla yetişmeyecek;)}

Burada dene! Çalıştır'ı tıklatın, başka bir şeye tıklamayın ^ _ ^ sayfa oldukça patlayıcı. Evet. Güncelleştirilmiş sabit çıkış sistemi.

TaD#`~2

(Ben ve bazı sabitleri eklendi ~1için ~4yetkileri şunlardır 10.)

açıklama

setInterval("alert(Date())",1000);
     T         a      D#   ` ~2

Dyalog APL , 27 18 16 bayt

':',¨⎕TS⋄→≢⎕DL 1

Çevrimiçi deneyin!

⎕TSYMD hmst hazırla
':',¨: her
⋄yeni ifadeye
⎕DL 1bir saniye bekleyin ve gerçek bekleme süresini döndürün ; 1.0 saniye
≢içinde gerçek bekleme süresi taksitli, 1
→hatta 1 (1 = bu satır)

Perl 6 , 29 bayt

Bunu yapmanın doğru yolu:

Supply.interval(1).tap: -> $ {
  say join ':',.hour,.minute,.whole-second given DateTime.now
}
await Promise.new; # halt this thread indefinitely

22:21:58
22:21:59
22:22:0
22:22:1
22:22:2
…

Golf versiyonu

loop {sleep say join ':',now.polymod(1,60,60,24)[3…1]} # 56 bytes

3:59:26
3:59:27
3:59:28
3:59:29
…

Çıktının sadece zamanla sınırlandırılması gerekmediğinden, onu biraz daha kısa hale getirebilirim.

loop {sleep say DateTime.now} # 29 bytes

2015-11-27T22:18:10-06:00
2015-11-27T22:18:11-06:00
2015-11-27T22:18:12-06:00
2015-11-27T22:18:13-06:00
…

R, 38 bayt

repeat{Sys.sleep(1);print(Sys.time())}

Bu, şu anki zamanı aşağıdaki biçimde verir:

[1] "2015-11-28 07:34:01 CET"

Powershell, 19 bayt

for(){date;sleep 1}

PHP, 37 bayt

<?=date('G:i:s');header('refresh:1');

Biçimlendirilmiş sunucu saatini çıkarır ve sayfayı her saniye yenileyecek şekilde ayarlar.

Tabii ki, internet bağlantınıza ve sunucunuzun ne kadar hızlı yanıt verdiğine bağlı :)

gösteri

VBA, 69 Bayt

Zamanın gelmesi kolaydır, now()Sadece her 1 saniyede bir çıktısı alın… ÇOK daha ayrıntılı.

Bu, VBA'da 1 saniye beklemenin "Doğru" yoludur. 78 Bayt

Sub a():Debug.Print Now():Application.Wait Now()+TimeValue("0:0:1"):a:End Sub

Ya da bazı Köşeleri Kesmek İstiyorsanız ve Zamanın Yalnızca% 86'sı Yeterince İyi Olur 63 63 Bir Bayt
ekleyen bir SigFig sizi% 95 kesinliğe götürür ve üçüncüsü% 99,36'ya ulaştıracak

Sub a():Debug.Print Now():Application.Wait Now()+1e-5:a:End Sub

Yukarıdaki yöntemi% 100’e getirmek istiyorsanız, 69 Bayta ihtiyacınız var. (1/86400)

Sub a():Debug.Print Now():Application.Wait Now()+(1/86400):a:End Sub

Bu yöntemlerin tümü bir saniye sıçradı. Çünkü, 1 saniye beklemiyorlardı, ama 1 saniye bekleyin. Saatlerin bir saat geri düştüğü gece yarısında bu saat 1 saat boyunca durur ve sonra kaldığı yerden devam eder.

VBA, Uyku Yöntemi'ne izin veriyor ancak bayt bilgisayarınız mahvoldu. 97 Bayt

Declare Sub Sleep Lib "kernel32" (ByVal k as Long)
Sub a():Debug.Print Now():Sleep(1e3):a:End Sub

JavaScript, 47 38 35 bayt

for(p=1;t=Date();p=t)t!=p&&alert(t)

açıklama

Sürenin değişip değişmediğini sürekli olarak kontrol eder, eğer öyleyse alerts.

for(
  p=1;
  t=Date();
  p=t
)
  t!=p
    &&alert(t)

AppleScript, 51 35 bayt

tekrar et
geçerli tarihi günlüğe kaydet
gecikme 1
son

Oldukça dang bariz. Saati içeren geçerli tarihi yazdırır, bir saniyeyi geciktirir, ardından devam eder.

13, 13 karakter / 25 bayt

Ĥ⇀ôᶁ⬮+⬬),1𝕜)

Try it here(Firefox only).

Bu şaşırtıcı bir şekilde okunabilir.

Dyalog APL, 36 bayt

Bu sefer çok kısa değil.

{⎕←1↓∊'⊂:⊃,ZI2'⎕FMT 3↑3↓⎕TS⋄∇⎕DL 1}1

Bu, 24 saatlik bir zaman verir, yani:

14:37:44
14:37:45
14:37:46
...

Açıklama:

• {... }1: bir işlev tanımlayın ve çağırın (argüman yoksayılır, ancak yinelemeli olarak çağırmak için işleve ihtiyacımız var)
  • ⎕TS: yıl - ay - gün - saat - dakika - saniye - milisaniye biçiminde geçerli tarih ve saati döndüren bir sistem işlevi . ( ⎕TS= t im s tamp)
  • 3↑3↓: ilk 3 maddeyi bırakın (örneğin yıl - ay - gün) ve sonra kalan ilk 3 maddeyi alın (saat - dakika - saniye).
  • '⊂:⊃,ZI2'⎕FMT: her sayıyı iki noktadan oluşan bir tamsayı ( I2) ile önce gelen (0 Z) (önce iki nokta üst üste ( ⊂:⊃) ) gelecek şekilde sıfırlayın . (Bu bir matrisle sonuçlanır.)
  • ∊: Matristeki tüm öğeleri sıraya göre al. (Bu bir vektör verir, bu durumda bir dize.)
  • 1↓: ilk karakteri bırak (ki bu fazladan :)
  • ⎕←: çıktı
  • ⎕DL 1: Daha sonra bir ikinci (bekle ⎕DL= d , e l ay)
  • ∇: fonksiyonu tekrarlı olarak çağırın

QBasic, 18 bayt

?TIME$
SLEEP 1
RUN

Haskell, 98 96 85 bayt

import GHC.Conc
import Data.Time
m@main=getCurrentTime>>=print>>threadDelay(10^6)>>m

Alternatif sürüm kullanarak gösterim yapma:

main = do
  time <- getCurrentTime
  print time
  threadDelay 1000000
  main

İle şimdiki zaman alır getCurrentTimegelen Data.Timekütüphane, daha sonra boru bu içine print, 1.000.000 mikrosaniye (1 saniye) bekler ve çağırır.

Nimi ve Mauris'e teşekkürler!

Toplu iş - 34 40 bayt

Yerleşik değişkenleri seviyorum:

:A                    //Set label A
echo %time%           //Print the time in 24 hour format
timeout 1    //Wait 1 second (thanks DavidPostill)
goto A                //Jump back to A and repeat

_{sleepYakında Batch'ta kesinlikle bir emir olması gerekiyor .}

Python 3, 99 Bayt

Kodu tuhaf bir biçimde biçimlendirdiği için özür dileriz, bunu bir ipad'den yapın. (sorma). Bu kodun diğer cevaplardan bazıları dikkate alındığında büyük olduğunu biliyorum, fakat henüz bir python görmedim, bu yüzden eklemek istedim.

import time
import datetime
while(True):
 print(datetime.datetime.now().time())
 time.sleep(1)  

Java, 300 166 137 125 124 bayt

VoteToClose, Paülo Ebermann ve janschweizer sayesinde neredeyse yarı yarıya fazlası!

interface A{static void main(String[]a)throws Exception{for(;;Thread.sleep(1000))System.out.println(new java.util.Date());}}

Ungolfed:

interface A {
    static void main(String[] a) throws Exception {
        for (;; Thread.sleep(1000)) System.out.println(new java.util.Date());
    }
}

Perl, 99 81 75 51 40 36 29 27 bayt

sleep(print gmtime.$/);do$0