ท้าทาย

คุณต้องส่งออกเวลาปัจจุบันอย่างต่อเนื่อง (จนกระทั่งถูกยกเลิกโดยการขัดจังหวะ) ทุก ๆ วินาทีด้วยวิธีใดวิธีหนึ่งต่อไปนี้:

• ต้องอยู่ในรูปแบบ 24 ชั่วโมงหรือ AM / PM
  • หากเป็นอดีตจะต้องเว้นระยะด้วยโคลอน (เช่น 15:47:36)
  • ถ้าเป็นหลังจะต้องเว้นวรรคด้วยโคลอนและตามด้วย AM / PM ต่อไป (เช่น 3:47:36 PM)
• มันอาจถูกดึงออกมาจากอินเทอร์เน็ต
• อาจเป็นเวลาระบบ
• จะต้องส่งออกรูปแบบการส่งออกใด ๆ ที่เป็นธรรมชาติที่รองรับข้อความที่คุณเลือก
• เอาต์พุตอาจมีข้อมูลเพิ่มเติมนอกเหนือเวลา แต่คุณต้องรับประกันหนึ่งและมีเพียงหนึ่งเอาต์พุตเวลาต่อวินาที
• เอาต์พุตต่อเนื่องจะต้องอยู่ห่างกันเป็นวินาที - หากคุณเลือกที่จะรอจนกระทั่งการเปลี่ยนแปลงครั้งที่สองระหว่างเอาท์พุทนั่นเป็นเรื่องปกติ หากคุณรอสักครู่ระหว่างแต่ละเอาต์พุตนั่นก็เป็นที่ยอมรับได้อย่างสมบูรณ์แม้จะมีการสูญเสียความแม่นยำในที่สุด

เนื่องจากนี่คือแคตตาล็อกภาษาที่สร้างขึ้นหลังจากความท้าทายนี้ได้รับอนุญาตให้แข่งขัน โปรดทราบว่าจะต้องมีล่ามเพื่อให้สามารถส่งการทดสอบได้ ได้รับอนุญาต (และสนับสนุนให้) เขียนล่ามนี้ด้วยตัวคุณเองสำหรับภาษาที่ยังไม่ได้ใช้งานมาก่อน นอกจากนั้นต้องปฏิบัติตามกฎมาตรฐานทั้งหมดของcode-golf การส่งในภาษาส่วนใหญ่จะได้คะแนนเป็นไบต์ในการเข้ารหัสที่มีมาก่อน (ปกติคือ UTF-8)

แค็ตตาล็อก

สแต็คส่วนย่อยที่ด้านล่างของโพสต์นี้สร้างแคตตาล็อกจากคำตอบ a) เป็นรายการคำตอบสั้นที่สุดต่อภาษาและ b) เป็นลีดเดอร์บอร์ดโดยรวม

เพื่อให้แน่ใจว่าคำตอบของคุณปรากฏขึ้นโปรดเริ่มคำตอบด้วยหัวข้อโดยใช้เทมเพลต Markdown ต่อไปนี้:

## Language Name, N bytes

ที่Nมีขนาดของส่งของคุณ หากคุณปรับปรุงคะแนนของคุณคุณสามารถเก็บคะแนนเก่าไว้ในบรรทัดแรกโดยการตีพวกเขาผ่าน ตัวอย่างเช่น

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

หากคุณต้องการรวมหลายตัวเลขไว้ในส่วนหัวของคุณ (เช่นเนื่องจากคะแนนของคุณคือผลรวมของไฟล์สองไฟล์หรือคุณต้องการแสดงรายการบทลงโทษการตั้งค่าสถานะของล่ามแยกต่างหาก) ตรวจสอบให้แน่ใจว่าคะแนนจริงเป็นตัวเลขสุดท้ายในส่วนหัว:

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

คุณยังสามารถตั้งชื่อภาษาให้เป็นลิงค์ซึ่งจะปรากฏในตัวอย่างข้อมูล:

## [><>](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 blytes (ไบต์ + บล็อก)

บล็อกคำสั่งเดียวที่เกี่ยวข้อง:

xp 1 @p

เอาต์พุตไปที่คอนโซลไคลเอ็นต์เช่น:

เป็นส่วนหนึ่งของเอาท์พุทปกติ

นี่คือระบบ:

xpxp <amount> <player>จะช่วยให้จำนวนเงินที่ระบุของประสบการณ์ในการเป็นผู้เล่นที่ระบุไว้กับไวยากรณ์ ฉันค่อนข้างแน่ใจว่านี่เป็นคำสั่งที่เล็กที่สุดที่มีเอาต์พุตเอกพจน์ที่ฉันสามารถหาได้ตอนนี้

JavaScript ขนาด 32 ไบต์

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

ใช้ความจริงที่setIntervalประเมินโค้ด นี้ไม่แนะนำ แต่เมื่อใดที่มีความกังวลในรหัสกอล์ฟ?

Date() ส่งคืนเวลาและวันที่ปัจจุบันในรูปแบบเช่นนี้ (อาจแตกต่างกันไปตามระบบ)

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

sh (+ watch) 11 ไบต์

สคริปต์:

watch -n1 .

(ไม่ขึ้นบรรทัดใหม่)

เอาท์พุท:

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

จำนวนช่องว่างขึ้นอยู่กับความกว้างของเทอร์มินัล

ทดสอบบน Debian8 และ NetBSD7

Snap , 8 7 6 บล็อก

(ใช่ฉันเปลี่ยนเป็น MS Paint เพราะฉันขี้เกียจเกินกว่าที่จะสร้างภาพหน้าจออื่นได้แล้วอย่างน้อยก็อ่านได้)
คลิกที่สคริปต์เพื่อเรียกใช้
นาฬิกา 24 ชั่วโมง

Python 2, 47 ไบต์

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

ไม่มีลิงก์ออนไลน์เพราะ ideone หมดเวลา (huehuehue) ก่อนที่จะพิมพ์อะไร

ขอบคุณ @xsot สำหรับwhile[sleep(1)]เคล็ดลับและctimeเคล็ดลับ

พิมพ์วันที่และเวลาปัจจุบันดังนี้: Fri Nov 27 21:23:02 2015

Perl, Command Line, 24 ไบต์

sleep(say)while$_=gmtime

สิ่งนี้จะต้องถูกเรียกใช้จากบรรทัดคำสั่งเนื่องจากperl -E'sleep(say)while$_=gmtime'(บน windows ให้ใช้เครื่องหมายคำพูดคู่แทน) วันที่จะถูกส่งออกพร้อมกับเวลาที่ดูเหมือนว่าจะได้รับอนุญาต

Perl, 25 ไบต์

sleep print$/.gmtime;do$0

ในบริบทเกลาจะกลับสตริงคล้ายกับgmtime Sat Nov 28 10:23:05 2015ผลจากการprintเสมอ 1 sleepจะถูกใช้เป็นพารามิเตอร์สำหรับ do$0จะใช้ในการรันสคริปต์อีกครั้งหลังจากจับเวลาเสร็จสิ้น

Javascript ES6, 43 39 ไบต์

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

ทำงานร่วมกับการตั้งค่าเวลาปัจจุบันของฉัน (ซึ่งยังไม่ได้รับการเปลี่ยนแปลงบางครั้งขอขอบคุณ) อย่างน้อย

4 ไบต์บันทึกโดย Conor O'Brien

Arcyóu , 27 ไบต์

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

ฉันต้องแยกฟังก์ชั่นใหม่สองอย่างสำหรับความท้าทายนี้zzและst.

pn: prognเหมือนกับเสียงกระเพื่อมของ

zz: time.sleepการเชื่อมโยงโดยตรงกับงูใหญ่

st: time.strftimeการเชื่อมโยงโดยตรงกับงูใหญ่

โดยปกติแล้วอัญประกาศจะมีความจำเป็นรอบ ๆ สตริงรูปแบบ แต่เนื่องจากไม่มีที่ว่างจึงแยกวิเคราะห์เป็นสัญลักษณ์ ล่ามจะประเมินสัญลักษณ์ที่ไม่ได้กำหนดเหมือนกันดังนั้นเราจึงได้รับสตริง

Bash, 51 31 24 21 20 ไบต์

ขอบคุณ @quartata สำหรับความคิดเห็นที่เป็นประโยชน์มาก ขอบคุณ @Dennis สำหรับคำชี้แจงและการตัดไบต์ที่มากขึ้น ขอบคุณ @VoteToClose สำหรับการชี้แจงกฎ (ซึ่งเห็นได้ชัดว่าฉันไม่ดีที่อ่าน) ลดไบต์ต่อไป

dateแสดงวันที่แบบเต็มด้วยนาฬิกา 24 ชั่วโมง sleep 1นอนเป็นวินาที exec $0วนซ้ำสคริปต์อย่างไม่สิ้นสุด

date;sleep 1;exec $0

Befunge 98, 53 ไบต์

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

หมายเหตุ:

1. โปรแกรมนี้ไม่ให้ตัวเลขที่พิมพ์ออกมาเป็นศูนย์
2. โปรแกรมนี้พิมพ์ช่องว่างแล้วอักขระถอยกลับหลังทุกหมายเลขเนื่องจาก.คำสั่งพิมพ์พื้นที่โดยปริยายที่ท้าย
3. ขนาดของสแต็คในโปรแกรมนี้เพิ่มขึ้นทุกวินาทีและในที่สุดหน่วยความจำจะหมด
4. โปรแกรมนี้จะเขียนทับครั้งก่อนเมื่อพิมพ์ใหม่ หากต้องการให้พิมพ์แต่ละครั้งในบรรทัดใหม่ให้เปลี่ยนdบนบรรทัดแรกเป็นa

mIRC 7.49 20 16 ไบต์

/timer 0 1 $time

AutoHotkey ขนาด 50 ไบต์

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

หมายเหตุ:

1. คุณต้องกดค้างxเอาท์พุทต่อเนื่อง
2. เอานิ้วของคุณออกจากxเพื่อขัดจังหวะและจบผลลัพธ์
3. เอาต์พุตอยู่ในรูปแบบ 24 ชั่วโมง

C (บน Linux x64), 179 177 175 168 159 ไบต์

#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);
  }
}

ทดสอบเฉพาะในและอาจใช้งานได้กับฟังก์ชันเท่านั้นเท่านั้น linux x64 (x32 อาจทำงานได้ แต่แพลตฟอร์มอื่นอาจไม่ทำงาน)

ข้อแตกต่างที่สำคัญระหว่างโปรแกรมนี้และโปรแกรม C ที่โพสต์อื่น ๆ คือการใช้การเรียกใช้ฟังก์ชั่นพิเศษของ linux ซึ่งในขณะที่การฝึกฝนอย่างน่ากลัวสำหรับซอฟต์แวร์จริงจะช่วยประหยัดได้ไม่กี่ไบต์ ... หากคุณไม่สนใจคำเตือนของคอมไพเลอร์ทั้งหมด

Jolf , 14 8 7 ไบต์

^{ข้ามออกไป 14 เป็น 1 ขีด ไม่เลยมันจะไม่ติดกับ;)}

ลองที่นี่! คลิกเรียกใช้อย่าคลิกสิ่งอื่นใด ^ _ ^ หน้านี้เป็นอย่างมาก ... ระเบิดได้ ใช่. แก้ไขระบบเอาท์พุทพร้อมอัพเดท

TaD#`~2

(ผมเพิ่มค่าคงที่บางส่วนและ~1การ~4มีอำนาจของ10.)

คำอธิบาย

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

Dyalog APL , 27 18 16 ไบต์

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

ลองออนไลน์!

⎕TSYMD hmst
':',¨prepend: ไปที่
⋄คำสั่งใหม่แต่ละคำสั่ง
⎕DL 1รอหนึ่งวินาทีและส่งคืนเวลารอจริง 1.0 วินาทีบางครั้งจะ
≢นับเวลารอคอยจริงโดยให้ 1
→go to line (1 = บรรทัดนี้)

Perl 6 , 29 ไบต์

ขวาวิธีที่จะทำเช่นนี้:

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
…

รุ่น golfed

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
…

เนื่องจากผลผลิตไม่จำเป็นต้อง จำกัด เพียงแค่เวลาฉันสามารถทำให้มันค่อนข้างสั้น

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 ไบต์

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

สิ่งนี้จะแสดงเวลาปัจจุบันในรูปแบบต่อไปนี้:

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

Powershell, 19 ไบต์

for(){date;sleep 1}

PHP, 37 ไบต์

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

เอาต์พุตเวลาเซิร์ฟเวอร์ที่จัดรูปแบบและตั้งค่าหน้าให้รีเฟรชทุกวินาที

แน่นอนว่ามันขึ้นอยู่กับการเชื่อมต่ออินเทอร์เน็ตของคุณและความรวดเร็วในการตอบสนองต่อเซิร์ฟเวอร์ของคุณ :)

การสาธิต

VBA, 69 ไบต์

การรับเวลาเป็นเรื่องง่ายnow()เพียงแค่ส่งออกทุก ๆ 1 วินาที

นี่เป็นวิธี "ถูกต้อง" ในการรอ 1 วินาทีใน VBA 78 ไบต์

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

หรือถ้าคุณต้องการที่จะตัดมุมบางส่วนและเพียงถูก 86% ของเวลานั้นดีพอที่63 Bytes
เพิ่มหนึ่ง SigFig นำคุณไปสู่ความแม่นยำ 95% และที่สามจะได้รับคุณถึง 99.36%

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

หากคุณต้องการได้รับวิธีการดังกล่าวเป็น 100% แล้วคุณต้อง69 ไบต์ (1/86400)

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

วิธีการทั้งหมดเหล่านี้จะสะดุดในวินาทีกระโดดเพราะพวกเขาไม่รอ 1 วินาที แต่รอจนกว่า 1 วินาที ในเวลาเที่ยงคืนเมื่อนาฬิกาถอยกลับหนึ่งชั่วโมงนาฬิกานี้จะหยุดเป็นเวลา 1 ชั่วโมงจากนั้นเลือกตำแหน่งที่เหลือ

VBA ไม่อนุญาตให้ใช้วิธีการนอนหลับ แต่ตัวควบคุมไบต์ของคุณถูกทำลาย 97 ไบต์

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

JavaScript, 47 38 35 ไบต์

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

คำอธิบาย

ตรวจสอบอย่างต่อเนื่องว่าเวลามีการเปลี่ยนแปลงแล้วalertถ้ามี

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

AppleScript, 51 35 ไบต์

ทำซ้ำ
บันทึกวันที่ปัจจุบัน
ล่าช้า 1
ปลาย

เห็นได้ชัดว่าแดงสวย พิมพ์วันที่ปัจจุบันซึ่งมีเวลาหน่วงเวลาหนึ่งวินาทีจากนั้นดำเนินการต่อ

ch, 13 ตัวอักษร / 25 ไบต์

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

Try it here(Firefox only).

สิ่งนี้สามารถอ่านได้อย่างน่าประหลาดใจ

Dyalog APL ขนาด 36 ไบต์

ไม่สั้นมากในเวลานี้

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

เอาต์พุตนี้เวลา 24 ชั่วโมงเช่น:

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

คำอธิบาย:

• {... }1: กำหนดฟังก์ชั่นและเรียกมันว่า (อาร์กิวเมนต์ถูกละเว้น แต่เราต้องการฟังก์ชันเพื่อเรียกมันซ้ำ ๆ )
  • ⎕TS: ฟังก์ชั่นระบบที่ส่งกลับวันที่และเวลาปัจจุบันในรูปแบบปี - เดือน - วัน - ชั่วโมง - นาที - สอง - มิลลิวินาที ( ⎕TS= t ime s tamp)
  • 3↑3↓: วาง 3 รายการแรก (เช่นปี - เดือน - วัน) แล้วนำ 3 รายการแรกที่เหลือ (ชั่วโมง - นาที - วินาที)
  • '⊂:⊃,ZI2'⎕FMT: จัดรูปแบบแต่ละตัวเลขเป็นจำนวนเต็มสองหลัก ( I2) ด้วยเลขศูนย์นำหน้า ( Z) นำหน้าด้วยเครื่องหมายโคลอน ( ⊂:⊃) (ผลลัพธ์นี้เป็นเมทริกซ์)
  • ∊: รับองค์ประกอบทั้งหมดในเมทริกซ์ตามลำดับแถว (นี่จะให้เวกเตอร์ในกรณีนี้คือสตริง)
  • 1↓: วางอักขระแรก (ซึ่งเป็นพิเศษ:)
  • ⎕←: เอาท์พุทมัน
  • ⎕DL 1: จากนั้นรอหนึ่งวินาที ( ⎕DL= d e l ay)
  • ∇: เรียกใช้ฟังก์ชันซ้ำ ๆ

QBasic ขนาด 18 ไบต์

?TIME$
SLEEP 1
RUN

Haskell, 98 96 85 ไบต์

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

เวอร์ชันสำรองที่ใช้ทำเครื่องหมาย:

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

รับเวลาปัจจุบันด้วยgetCurrentTimeจากData.Timeไลบรารีจากนั้นส่งเข้าไปในprintนั้นรอ 1,000,000 microseconds (1 วินาที) และเรียกตัวเอง

ขอบคุณ nimi และ Mauris!

รุ่นที่ - 34 40ไบต์

ฉันชอบตัวแปรในตัว:

: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

_{จำเป็นต้องมีsleepคำสั่งบางอย่างในแบทช์ทุกเวลาเร็ว ๆ นี้}

Python 3, 99 ไบต์

ขอโทษถ้ามันรูปแบบรหัสแปลกทำเช่นนี้จาก iPad (ไม่ต้องถาม) ฉันรู้ว่ารหัสนี้มีขนาดใหญ่เมื่อพิจารณาคำตอบอื่น ๆ แต่ฉันไม่เห็นงูหลามเลยดังนั้นฉันต้องการที่จะเพิ่มเข้าไป

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

Java, 300 166 137 125 124 ไบต์

เกือบจะมากกว่าครึ่งได้ขอบคุณ VoteToClose, Paülo Ebermann และ janschweizer!

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 ไบต์

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