dary

Trong các sự kiện hoàn toàn không liên quan đến những gì sẽ hy vọng xảy ra với tôi trong vài ngày tới, tôi giao cho bạn viết mã thực hiện như sau:

1. In

   Legen... wait for it...
   

   ngay lập tức, với một dòng mới.

2. Đợi cho đến giờ đầy đủ tiếp theo (khi công việc định kỳ để trao huy hiệu chạy).

3. In

   dary!
   

   với một dòng mới tùy chọn .

Quy tắc bổ sung

• Bạn có thể viết một chương trình hoặc một chức năng, nhưng đầu ra phải được in thành STDOUT (hoặc ngôn ngữ thay thế gần nhất với ngôn ngữ của bạn).

• Bạn phải đợi đến giờ đầy đủ tiếp theo , không chỉ trong 60 phút. Nếu mã được chạy lúc 6:58, nó sẽ in dòng thứ hai lúc 7:00.

• Dòng cuối cùng phải được in không muộn hơn một giây sau toàn bộ giờ tiếp theo.

• Trong trường hợp chương trình được bắt đầu trong giây đầu tiên của toàn bộ giờ, nó sẽ đợi trong giờ đầy đủ tiếp theo.

• Bạn có thể truy vấn thời gian địa phương hoặc UTC.

• Luật golf tiêu chuẩn được áp dụng.

Bình thường, 42 41

J.d6." wâ«­hÖ`Ùá©h´^"WqJ.d6;"dary!

Dưới đây là một hexdump của mã:

00000000  4a 2e 64 36 2e 22 20 77  0c 10 89 e2 ab 1b ad 68  |J.d6." w.......h|
00000010  0f 8c d6 60 d9 e1 a9 68  82 b4 5e 22 57 71 4a 2e  |...`...h..^"WqJ.|
00000020  64 36 3b 22 64 61 72 79  21                       |d6;"dary!|

Đã lưu 1 byte nhờ @isaacg

Sử dụng .dchức năng để có được các giá trị liên quan đến thời gian địa phương. .d6trả về giờ hiện tại Thao tác này sẽ in chuỗi đầu tiên, sau đó đợi cho đến khi giờ khác với quảng cáo giờ bắt đầu chương trình và sau đó in chuỗi thứ hai.

Bạn có thể thử trực tuyến với .d7hoặc .d8trong vài phút / giây nhưng trình biên dịch trực tuyến chỉ in bất cứ thứ gì khi chương trình kết thúc.

Xin chúc mừng, Dennis! :)

JavaScript (ES6), 74 byte

Bạn có thể muốn thay đổi đồng hồ hệ thống của mình trước khi thử nghiệm, xin chúc mừng nếu bạn đã hạ cánh ở đây lúc 59 phút trước.

setTimeout(a=alert,36e5-new Date%36e5,"dary!");a`Legen... wait for it...
`

CJam, 49 48 byte

et3="Legen... wait for it...
"o{_et3==}g;"dary!"

Sử dụng giờ địa phương. Đối với mục đích thử nghiệm, bạn có thể thay thế hai trường hợp 3bằng 4hoặc 5để làm cho nó được in vào đầu phút / giây tiếp theo.

Kiểm tra nó ở đây. Nhưng lưu ý rằng trình thông dịch trực tuyến không hiển thị bất kỳ đầu ra nào cho đến khi chương trình kết thúc. Ngoài ra, bạn có thể chạy nó trên Dùng thử trực tuyến , trong đó đầu ra được hiển thị gần như ngay lập tức thay vì được đệm (nhưng khi bạn kiểm tra nó bằng giây thay vì hàng giờ, độ trễ sẽ đáng chú ý). Trong mọi trường hợp, nếu bạn chạy nó cục bộ với trình thông dịch Java, nó hoạt động như một bùa mê.

Giải trình

Điều này làm cho việc sử dụng của CJam etcung cấp cho bạn một loạt

[year month day hour minute second ms weekday utc_offset]

Đây là một sự cố của mã:

et3=       e# Get the current hour.
"Legen..." e# Push the first string including the linefeed.
o          e# Print it.
{          e# While the top of stack is truthy (which is popped)...
  _        e#   Copy the original hour.
  et3=     e#   Get the current hour.
  =        e#   Check for equality.
}g
;          e# Discard the original hour.
"dary!"    e# Push the second string which is printed automatically.

Thêm

Điều này cũng hoạt động cho cùng một số byte:

et4<"Legen... wait for it...
"o{et1$#!}g;"dary!"

Thay vì chọn giờ, chúng tôi sẽ chọn tiền tố với ngày và giờ và giữ cho vòng lặp tiếp tục trong khi mảng datetime vẫn có tiền tố đó.

AppleScript, 157 149 byte

Huh. Đáng ngạc nhiên tranh cãi.

đặt d thành số 1 trong chuỗi thời gian của (ngày hiện tại)
đăng nhập "Legen ... chờ đợi nó ..."
lặp lại trong khi d = số 1 trong chuỗi thời gian của (ngày hiện tại)
kết thúc
đăng nhập "dary!"

Vì login ra khung Tin nhắn của Script Editor, tôi coi nó là đầu ra gần nhất với STDOUT. Về cơ bản, nếu bạn có được chuỗi thời gian của ngày hiện tại, nó sẽ làm một cái gì đó như thế này:

Mã số:

chuỗi thời gian của (ngày hiện tại)

Đầu ra:

5:02:03

Nó sẽ lấy số đầu tiên ( 5) trước dấu hai chấm.

Tôi nghĩ rằng nó sẽ dài hơn thế này rất nhiều. xD

Người tuyết 1.0.2 , 70 69 byte

~"Legen... wait for it...
"sP3600000*vt#nDnC!*:vt+#nD!#nL;bD"dary!"sP

Giải trình:

~              Make all variables active.
"..."sP        Print the first string.
3600000*vt#nD  Get the number of hours since the Unix epoch.
nC             Ceiling (round up), giving the time (divided by 36000) at which to
                 print the second string.
!*             Save that in a permavar.
:...;bD        Do the stuff in the block while its "return value" is truthy.
  vt+#nD       Again, get the number of hours since epoch.
  !#             Store the permavar that we saved earlier.
  nL             Is the current time less than the target time? (if so,
                   keep looping)
"..."sP        Print the second string.

PHP, 76, 70, 65, 62 51 byte

Legen... wait for it...
<?while(+date(is));?>dary!

Logic trước (63b):

Legen... wait for it...
<?for($h=date(G);date(G)==$h;)?>dary!

Loại mã hóa này làm cho bạn mất việc, nhưng vòng lặp này cho đến khi thời gian còn hơn 1 giờ so với init.

-1 byte bằng cách thay thế {}afer các thời gian để ;(nhờ manatwork)
-5 byte bằng cách thay thế echo'dary!';để ?>dary!(nhờ manatwork)
-4 byte bằng cách thay thế <?phpcho phiên bản ngắn <?(nhờ primo)
-1 byte bằng cách thay thế whilecho một for
-3 byte bằng cách thay thế date(G)!=$h+1để date(G)==$h(cảm ơn

Perl 6 , 60 byte

sleep 60²-now%60²+say 'Legen... wait for it..';say 'dary!'

Javascript 94 90 87 byte

Không chơi gôn nhiều ...

alert`Legen... wait for it...`,l=l=>~~(Date.now()/36e5);for(z=l();z==l(););alert`dary!`

Phiên bản của hạ cấp:

(a=alert)`Legen... wait for it...`,z=(b=new Date().getHours)();for(;z==b(););a`dary!`

Nó lưu trữ giờ hiện tại và các vòng lặp miễn là giờ "cũ" bằng với giờ hiện tại. Ngay khi giờ đã thay đổi, nó sẽ in phần còn lại! :CƯỜI MỞ MIỆNG

Tuyên bố miễn trừ trách nhiệm: Nếu trình duyệt của bạn không thích nó, bạn đã được cảnh báo.

MATLAB - 89 byte

a=@()hour(now);disp('Legen... wait for it...');while(mod(a()+1,24)~=a())end;disp('dary!')

Khá tự giải thích. Đầu tiên, tạo một tay cầm chức năng để lấy giờ hiện tại của đồng hồ hệ thống. Sau đó, hiển thị Legen... wait for it...với lợi nhuận vận chuyển, và sau đó chúng tôi đi vào một whilevòng lặp trong đó chúng tôi tiếp tục kiểm tra xem giờ hiện tại được thêm bằng 1 không bằng với giờ hiện tại. Nếu có, hãy tiếp tục lặp. Chỉ cho đến khi tức thì khi giờ tiếp theo xảy ra, chúng tôi sẽ hiển thị dary!và trở lại vận chuyển xảy ra sau đó.

Giờ của MATLAB dựa trên lập chỉ mục 24 giờ, do đó, modhoạt động với cơ sở 24 là bắt buộc để xử lý tràn từ 11 giờ tối (23:00) đến nửa đêm (00:00).

Lưu ý nhỏ

Các hourchức năng đòi hỏi Financial Time Series hộp công cụ. Các nowchức năng không phụ thuộc vào giới hạn này, nhưng nó lấy ngày hiện tại và thời gian như một số serial mà hourdo đó sử dụng để tính toán giờ hiện hành.

Bạn muốn chạy cái này trong Octave?

Chắc chắn rồi! Vì Octave không có hộp công cụ này, chúng tôi chỉ cần sửa đổi hourhàm để nó gọi datevechàm vectơ gồm 6 phần tử - một phần tử cho mỗi năm, tháng, ngày, giờ, phút và giây. Bạn chỉ cần trích xuất phần tử thứ tư của đầu ra:

a=@()datevec(now)(4);disp('Legen... wait for it...');while(mod(a()+1,24)~=a())end;disp('dary!')

Các ký tự bổ sung làm cho giải pháp lên tới 98 byte, nhưng bạn sẽ có thể chạy nó trong Octave. Lưu ý lập chỉ mục tại chỗ mà không có biến tạm thời trong hàm xử lý.

Không có hộp công cụ chuỗi thời gian tài chính?

Nếu bạn muốn chạy cái này trong MATLAB mà không có Hộp công cụ chuỗi thời gian tài chính, bởi vì bạn không thể lập chỉ mục thành các biến ngay lập tức mà không có tạm thời, điều này sẽ mất thêm một chút byte để viết:

disp('Legen... wait for it...');h=datevec(now);ans=h;while(mod(h(4)+1,24)~=ans(4)),datevec(now);end;disp('dary!');

Điều này đầu tiên có được thời gian và ngày hiện tại và lưu trữ nó vào biến hcũng như lưu trữ này vào biến tự động được gọi ans. Sau đó, chúng tôi tiếp tục lặp và kiểm tra xem giờ hiện tại không bằng giờ tiếp theo. Ở mỗi lần lặp, chúng tôi tiếp tục cập nhật biến tự động với thời gian và ngày hiện tại. Ngay sau giờ tiếp theo khớp với ngày giờ hiện tại, chúng tôi sẽ hiển thị phần cuối của chuỗi và thoát. Điều này đẩy số byte lên 114.

Cũng lưu ý rằng bạn không thể thử trực tuyến này. Thông dịch viên Octave trực tuyến sẽ có giới hạn thời gian khi mã thực thi và vì đây là whilevòng lặp chờ giờ tiếp theo xảy ra, bạn sẽ có thời gian chờ trong khi chờ mã chạy. Điều tốt nhất bạn có thể làm là chạy nó trên máy của riêng bạn và kiểm tra xem nó có hoạt động không.

Toán học, 85 84 81 byte

c=Print;c@"Legen... wait for it...";a:=DateValue@"Hour";b=a;While[a==b];c@"dary!"

C, 163 byte

#include<time.h>
f(){puts("Legen... wait for it...");time_t t=time(0);struct tm l=*localtime(&t);while(l.tm_min+l.tm_sec)t=time(0),l=*localtime(&t);puts("dary!");}

Kính hiển vi II, 45 byte

"Legen... wait for it..."P[36s5E*sD%_]"dary!"

Cuối cùng, sử dụng cho Dhướng dẫn.

In chuỗi đầu tiên, liên tục mất thời gian UTC tính bằng mili giây modulo 3.600.000 cho đến khi điều này mang lại 0, và sau đó tạo ra chuỗi thứ hai được in ngầm. 3.600.000 được thể hiện trong mã là 36x10 ⁵ .

TI-BASIC, 70 64 byte

getTime
Disp "Legen... wait for it...
Repeat sum(getTime-Ans,1,1
End
"dary

Nguyền rủa những chữ cái viết thường hai byte!

getTimetrả về danh sách ba phần tử {hours minutes seconds}, do đó tổng từ phần tử thứ 1 đến phần 1 là số giờ. Khi có sự khác biệt giữa giờ bắt đầu và giờ hiện tại, vòng lặp kết thúc. Cảm ơn @FryAmTheEggman cho quan sát này.

R - 97 byte

cat('Legen... wait for it...\n')
Sys.sleep(1)
while(as.double(Sys.time())%%3600>0){}
cat('dary!')

Python 3 - 92 89 byte

from time import*;print("Legen... wait for it...");sleep(3600-time()%3600);print("dary!")

Python 2, 82 81 byte

from time import*;print'Legen... wait for it...';sleep(-time()%3600);print'dary!'

Danh tiếng quá thấp để bình luận. Phiên bản Python 2 của giải pháp Alexander Nigl. Lưu các ký tự bị mất trên ngoặc. Ngoài ra, 3600 không cần thiết trong tính toán thời gian ngủ.

7 ký tự được lưu tổng thể.

Chỉnh sửa: -1 byte nhờ @Kevin Cruijssen

Tập lệnh lệnh Windows, 87 byte

@set.=%time:~,2%&echo.Legen... wait for it...
:.
@if %.%==%time:~,2% goto:.
@echo.dary!

Điều này liên tục so sánh một biến số giờ được lưu trữ khi bắt đầu so với giờ hiện tại và thành công nếu khác nhau.

Perl, 62 byte

sleep -++$^T%3600+print'Legen... wait for it...
';print'dary!'

Biến đặc biệt $^T(aka $BASETIME) ghi lại số giây kể từ epoch từ khi tập lệnh được bắt đầu. May mắn thay, tổng số giây không được tính trong tổng số, do đó, các giá trị sau là tương đương:

print$^T%3600;
@T=gmtime;print$T[1]*60+$T[0];

Đáng ngạc nhiên, biến này không chỉ đọc.

Japt , 72 61 byte

`{?tT?e?t(Ã?t,36e5-?w D?e%36e5,'ÜÝ!'),'Leg?... Ø2 f? ?...\n'}

Mỗi ?đại diện cho một char không thể in Unicode. Đây là cách để có được toàn văn:

1. Mở trình thông dịch trực tuyến .
2. Dán mã này vào hộp Mã:

Oc"`\{setTimeout(alert,36e5-new Date%36e5,'dary!'),'Legen... wait for it...\\n'}

3. Chạy mã, sau đó xóa nó khỏi hộp Mã.
4. Chọn nội dung của hộp đầu ra và kéo vào hộp Mã. Sao chép sẽ không hoạt động .
5. Thay thế không gian đầu tiên bằng một không gian không phá vỡ.
6. (tùy chọn) Đặt đồng hồ trên máy tính của bạn thành xx: 59.
7. Chạy mã.

Ngoài ra, đây là một hexdump (hy vọng có thể đảo ngược):

00000000: 607b a074 548b 658c 7428 c300 742c 3336 65    `{ tT?e?t(Ã?t,36e
00000011: 352d 9a77 2044 8565 2533 3665 352c 27dc dd    5-?w D?e%36e5,'ÜÝ
00000022: 2127 293b 274c 6567 812e 2e2e 20d8 3220 66    !'),'Leg?... Ø2 f
00000033: 8e20 8a2e 2e2e 5c6e 277d                      ? ?...\n'}

Mã này dựa trên câu trả lời JavaScript của George Reith , với một vài thay đổi cụ thể của Japt. Tôi đã phát hiện ra một ngày khác rằng nếu bạn nén mã và chèn nó vào một chuỗi được bao bọc bởi backtick, nó sẽ tự động giải nén. Đây là cách nó được xử lý thông qua việc biên dịch:

`{?tT?e?t(Ã?t,36e5-?w D?e%36e5,'ÜÝ!'),'Leg?... Ø2 f? ?...\n'}
"{setTimeout(alert,36e5-new Date%36e5,'dary!'),'Legen... wait for it...\n'}"
""+(setTimeout(alert,36e5-new Date%36e5,'dary!'),'Legen... wait for it...\n')+""

Trong JS, một cặp dấu ngoặc đơn sẽ trả về giá trị cuối cùng bên trong; do đó, mã này đặt sự kiện được định thời gian, sau đó trả về 'Legen...'chuỗi, được tự động gửi đến STDOUT. Vì Japt hiện không có cách nào để thêm nội dung vào STDOUT ngoài đầu ra tự động khi biên dịch, thay vào đó tôi đã sử dụng chức năng vanilla JS alertcho đầu ra được định thời gian. Tôi hy vọng điều này được cho phép.

Powershell, 52 51 byte

-1 byte cảm ơn @Veskah

'Legen... wait for it...'
for(;Date|% M*e){}'dary!'

Biểu thức này Date|% M*enhận giá trị từ thuộc Minutetính từ giá trị DateTime hiện tại. Vòng lặp kết thúc khi Minutebằng 0.

Python, 112 byte

import time as t;print "Legen... wait for it...";n=t.ctime();t.sleep((60-n.tm_min)*60+60-n.tm_sec);print "dary!"

Khá tự giải thích.

Python - 159 byte

from datetime import*;from threading import*;p=print;n=datetime.now();p('Legen... wait for it...');Timer(3600-(n.minute*60+n.second),lambda:p('dary!')).start()

Chuột-2002 , 62 byte

Yêu cầu người dùng nhấn enter. Tôi nghĩ.

"Legen... wait for it..."?&HOUR 1+x:(&HOUR x.=["dary"33!'0^])

Được rồi, tốt, trong khi chúng ta đang lấy rất nhiều byte và không giành được bất cứ điều gì, hãy vui vẻ một chút.

"Legen... wait for it... "?     ~ print & require keypress

&HOUR 1+ x:                     ~ get hr, add 1 and assign
(                               ~ while(1)
  &HOUR x. =                    ~ cmp current hr, stored hr
  [                             ~ if same
    #B;                           ~ backspace
    "dary"36!'                    ~ print this string and a !
    0^                            ~ exit cleanly
  ]                             ~ fi
  &MIN 59 - &ABS !              ~ get min, subtract from 59, abs & print
  ":"                           ~ record sep
  &SEC 59 - &ABS !              ~ same for second
  #B;                           ~ backspace
)
$B 8!' 8 !' 8 !' 8 !' 8 !'@     ~ backspace 5*
$                               ~ \bye

Mẫu vật:

$ mouse legend.m02
Legen... wait for it... 20:32

Hãy xem, đó là đồng hồ đếm ngược tại chỗ cập nhật đến giờ tiếp theo! Nó sử dụng tốt vòng lặp while, thậm chí không làm gì cả sẽ chiếm một lõi.

CƠ BẢN, 90 byte

Print"Legen... wait for it...":x$=Left(Time,2):Do:Loop Until x$<>Left(Time,2):Print"dary!"

Nói thẳng, chơi gôn bằng cách sử dụng tiền tố loại và Endcâu lệnh ngầm . Chi phí là nó chỉ hoạt động trong phương ngữ FreeBasicfblite .

Befunge 98 - 69 63 byte

 v
v>a"...ti rof tiaw ...negeL<ETB>"k,
>"EMIT"4(MS+_"!yrad"5k,@

Mã chứa một ký tự không thể in được (đại diện <ETB>là không thể in được dường như không hiển thị trong các khối mã). Mã ký tự của nó là 23 (một ký tự khối truyền kết thúc ).

Cảnh báo: Mã trước sẽ chạy trong một vòng lặp bận rộn với ngăn xếp ngày càng lớn hơn mỗi lần lặp lại và do đó có thể tiêu thụ một lượng lớn bộ nhớ.

Jelly , 48 47 byte , không cạnh tranh

-1 byte nhờ vào Erik the Golfer (sử dụng "Leg" làm từ trong quá trình nén)

“ÇỴġƒḃhlḂṀ⁷*Ḣ¡w*Jḷv»Ṅø3ŒTṣ”:V_@59ḅ60‘œS@“dary!”

Dùng thử trực tuyến! hoặc chạy phiên bản thử nghiệm với chuỗi định dạng thời gian được mã hóa cứng của“59:57”("mm: ss").

Cam kết đầu tiên của Jelly được thực hiện bởi Dennis chỉ vài ngày sau khi anh ấy tạo ra thử thách này, tôi không chắc ngày mã này sẽ hoạt động vào ngày nào, nhưng nó không cạnh tranh trong mọi trường hợp.
Tại thời điểm viết, chỉ có một cách để truy cập thời gian bằng chuỗi được định dạng , ŒT.

Mã này tính toán thời gian chờ đợi và sau đó ngủ. Nếu được gọi tại hh:00:00nó chờ trong 3600vài giây: nó chuyển đổi "00:00"thành [0,0]sau đó trừ đi từ 59năng suất [59,59], chuyển đổi từ cơ sở sáu mươi để cung cấp 3599, sau đó thêm một cho tổng thời gian chờ của 3600giây.

Có lẽ một vòng lặp có thể được thực hiện; hoặc một chuỗi nén sử dụng toàn bộ từ "Huyền thoại" có thể được sử dụng bằng cách nào đó?

“ÇỴġƒḃhlḂṀ⁷*Ḣ¡w*Jḷv»Ṅø3ŒTṣ”:V_@59ḅ60‘œS@“dary!” - Main link: no arguments
“ÇỴġƒḃhlḂṀ⁷*Ḣ¡w*Jḷv»                            - compressed "Legen... wait for it..."
                    Ṅ                           - print z + '\n', return z
                     ø                          - niladic chain separation
                      3ŒT                       - '011' (3) time formatted string = "mm:ss"
                         ṣ”:                    - split on ':' -> ["mm","ss"]
                            V                   - eval -> [m,s]
                             _@59               - subtract from 59 - > [59-m, 59-s]
                                 ḅ60            - convert from base 60 -> 60*(59-m)+(59-s)
                                    ‘           - increment -> 60*(59-m)+(59-s) = y
                                        “dary!” - "dary!" = x
                                     œS@        - sleep y seconds then return x
                                                - implicit print

MathGolf , 39 byte

"Legen... wait for it..."pÆt♪/╚÷▼"dary!

Hãy thử trực tuyến!

Gần như đánh bại ...

Giải trình

Æ     ▼  Repeat the next 5 characters while false
 t       push unix time in milliseconds
  ♪/     divide by 1000
    ╚÷   check if divisible by 3600 (tio solution has 3 in its place)

Pyth - 36 byte

Chờ đến phút là 0 với một vòng lặp while.

"Legen... wait for it..."W.d7)"dary!

Java, 136 byte

class a{void A(){System.out.println("Legen... wait for it...");while(System.currentTimeMillis()%3600000!=0);System.out.print("dary!");}}

Có bao nhiêu mili giây trôi qua kể từ giờ đầy đủ cuối cùng là kết quả của System.currentTimeMillis()mod 3.600.000.

Chương trình nguyên khối tương đương dài 159 byte:

interface a{static void main(String[]A){System.out.println("Legen... wait for it...");while(System.currentTimeMillis()%3600000!=0);System.out.print("dary!");}}

QBIC , 58 byte

?@Legen... wait for it...|#Dary!|{~mid$$|(_d,4,2)=@00||_XB

Giải trình

?@Legen... wait for it...|     Define string literal "Leg[..]it..." and print it
#Dary!|                        Define string B as "Dary!", but don't use it yet
{                              Opens an indefinite DO loop
~mid$$|(...)=@00|              Translates to IF MID$(...) = C$, where C$ is "00"
    The MID$ takes two characters, starting from pos 4, from the system's time (_d)
    So, if the string "11:00" has "00" starting at pos 4,
_XB                            Terminate the program and print string B
(The DO loop and the IF are closed implicitly)