Thử thách này là một thử thách nghệ thuật ASCII đơn giản lấy cảm hứng từ nhật thực xảy ra vào ngày 21 tháng 8 năm 2017. Đưa ra một đầu vào 0 <= n <= 4, xuất ra giai đoạn tương ứng của nhật thực được mô tả dưới đây:

n=0:
   *****
 **     **
*         *
*         *
**       **
  *******

n=1:
   *****
 **  *****
*   *******
*   *******
**   ******
  *******

n=2:
   *****
 *********
***********
***********
***********
  *******

n=3:
   *****
 *****  **
*******   *
*******   *
******   **
  *******

n=4:
   *****
 **     **
*         *
*         *
**       **
  *******

Quy tắc

• Bạn có thể 0 hoặc 1 chỉ mục, nêu những gì bạn đã chọn.
• Các ký tự được sử dụng là không gian và *, bạn có thể sử dụng bất kỳ ký tự in có thể in nào *(ngoài không gian).
• Không gian lưu trữ là tùy chọn (bạn có thể có hoặc không có chúng).
• Đây là mã golf , số byte thấp nhất là người chiến thắng.

Python 2 , 161 149 142 135 byte

lambda n,u=u' *':u'''   *****
 ****
**
**
****
  *******'''.translate({1:u[0<n<3],2:u[0<n<4],3:u[1<n<4]})

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

-7 cảm ơn ông Xcoder .

Than , 82 81 55 43 byte

-38 byte nhờ Neil!

Ｎν”{“⟲ＦEd⧴_³⟲”‖Ｏ¿﹪ν⁴«Ｆ﹪ν²Ｇ↗³↑²↖²↙³*↑¤*¿⁼ν¹‖

Hãy thử trực tuyến! Liên kết là phiên bản dài dòng.

Tôi đã làm cho cái quái của nó. : P Tôi có thể bị loại ra ngoài 40 byte. 26 38 byte ... Đóng đủ chưa?

Quế Gum , 70 byte

Hexdump:

0000000: 6c33 5053 5050 d002 012e 20a5 0002 4026  l3PSPP.... ...@&
0000010: 9001 0568 6c20 07a6 0648 4080 b521 8a19  ...hl ...H@..!..
0000020: 30a6 1644 1093 0de3 a098 6184 6206 422d  0..D......a.b.B-
0000030: 6136 c20c 6374 3380 3cb8 5aa0 1436 36ba  a6..ct3.<.Z..66.
0000040: 5f4c 280f 0f00                           _L(...

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

Tôi đã chờ đợi rất lâu để tìm ra cách sử dụng ngôn ngữ này. : P

Vì vậy, Cinnamon Gum là Bubblegum, nhưng nó giống ngôn ngữ "thực" hơn Bubblegum.

Byte đầu tiên ( l) đặt chế độ thành chế độ từ điển. Phần còn lại của byte là chuỗi sau đây được nén.

0&   *****
 **     **
*         *
*         *
**       **
  *******;1&   *****
 **  *****
*   *******
*   *******
**   ******
  *******;2&   *****
 *********
***********
***********
***********
  *******;3&   *****
 *****  **
*******   *
*******   *
******   **
  *******;4&   *****
 **     **
*         *
*         *
**       **
  *******

Điều này về cơ bản làm cho một bảng tra cứu với mỗi văn bản được gán cho một số. Chương trình sau đó nhận đầu vào và đầu ra văn bản tương ứng.

JavaScript (ES6), 103 102 byte

f=
n=>`   *****
 **66733**${s=`
*666777333*`}${s}
**6667333**
  *******`.replace(/\d/g,c=>" *"[c*2>>n&1])

<input type=number min=0 max=4 oninput=o.textContent=f(this.value)><pre id=o>

Chỉnh sửa: Đã lưu 1 byte nhờ @darrylyeo.

SOGL V0.12 , 40 39 byte

"⁽Ρūa╔Ƨ ‘╥▓.4%?52"¹ο1¹‘╬¡╬5.H?:±}.2=?╬8

Hãy thử nó ở đây!

VI, 108 byte

D:let@a=@"%2?@":@"%4?"X":"\\d"<CR>
3i <Esc>5a*<Esc>Yphr*$a*<Esc>O**1110333**<Esc>YPi <Esc>3lx3lx"0px4lyl2p$xYp
:%s/<C-r>a/ /g<CR>
:%s/\d/*/g<CR>

<CR>là Enterđột quỵ, <C-?>tương ứng với Control + ?, và <Esc>để Escaperõ ràng. Mỗi trong số này được tính cho 1 byte (xem meta ). Các ngắt dòng trong giải pháp là để đọc. Chỉ <CR>đại diện cho Enternét thực sự .

Đầu vào

Các tập tin đầu vào chỉ nên chứa 1 ký tự n.

Phóng

VI nên được bắt đầu như:

vi -u NONE input

Giải thích

Có 3 phần trong giải pháp. Tôi sẽ mô tả phần 2 đầu tiên (dòng thứ 2), vì nó dễ giải thích nhất.

Vẽ mặt trời

Lệnh vẽ mặt trời là:

3i <Esc>5a*<Esc>Yphr*$a*<Esc>O**1110333**<Esc>YPi <Esc>3lx3lx"0px4lyl2p$xYp

Mặt trời phải được vẽ bằng , *, 0, 1và 3, như thế này:

   *****
 **11033**
*111000333*
*111000333*
**1110333**
  *******

Một đối xứng sẽ giúp giảm kích thước byte của phần này, nhưng nó không quan trọng. Tôi sẽ không giải thích đầy đủ các dòng, nhưng các mô hình *****được sử dụng để dễ dàng tạo ra những dòng cuối cùng, và các mô hình **1110333**đã được thực hiện như là một tài liệu tham khảo để tạo ra 3 dòng khác có chứa 0, 1và 3.

Điều quan trọng là sử dụng 0, 1và 3cho các phần mặt trời có thể được lấp đầy (xem phần giải thích tiếp theo). Vẽ mặt trời này mất 55 byte và có thể chơi golf với một số thủ thuật.

Lấp đầy mặt trời theo n

Để lấp đầy mặt trời một cách chính xác, các hướng dẫn cần tuân theo là:

• nếu n = 0, sau đó0, 1và 3(tất cả các chữ số) nên được thay thế bằng
• nếu n = 1 , sau đó 1nên được thay thế bằng , các chữ số khác với*
• nếu n = 2, sau đó0, 1và 3(tất cả các chữ số) nên được thay thế bằng*
• nếu n = 3 , sau đó 3nên được thay thế bằng , các chữ số khác với*
• nếu n = 4, sau đó 0, 1và 3(tất cả các chữ số) nên được thay thế bằng (như n = 0)

Từ đó, chúng ta có thể suy ra rằng sự thay thế cần có là:

• thay thế một số chữ số bằng ( thay thế đầu tiên )
• thay thế tất cả các chữ số khác bằng *( thay thế thứ hai )

Lưu ý rằng "một số chữ số" có thể có nghĩa là "không có chữ số" ( n = 2ví dụ). Và "tất cả các chữ số khác" cũng có thể biểu thị "không có chữ số", nếu tất cả các chữ số đã được thay thế bằng thay thế đầu tiên (n = 0 ví dụ).

Sự thay thế thứ hai có thể dễ dàng được viết bằng 11 byte :

:%s/\d/*/g<CR>

Sự thay thế đầu tiên phụ thuộc vào n, vì vậy trước tiên chúng ta phải tính toán những chữ số nào sẽ được thay thế. Nếu các ký tự thay thế được lưu trong thanh ghi a, lệnh thay thế cũng được viết bằng 11 byte :

:%s/<C-r>a/ /g<CR>

<C-r>ađược thay thế bởi nội dung của thanh ghi akhi lệnh được gõ.

Để tính giá trị của a, theo các hướng dẫn trước, thuật toán là (theo mã giả):

n := read()
if (n % 2 != 0)
then
    a := n
else
    if(n % 4 != 0)
    then
        a := "X"
    else
        a := "\d"

"X"chuỗi được sử dụng bởi vì khi n = 2, không có chữ số nào được thay thế bằng dấu cách. Bất kỳ chuỗi nào không phải là mặt trời đều có thể được sử dụng ở đây, miễn là lần thay thế đầu tiên không có gì.

Điều này có thể được viết bằng 31 byte :

D                                   # yank and delete the first character of the file (n) to register "" (yank by default) : n = @"
 :let@a=                            # define register "a content
        @"%2                        # if (n % 2 != 0)
            ?                       # then
             @"                     #   n
               :                    # else
                @"%4                #   if (n % 4 != 0)
                    ?               #   then
                     "X"            #       "X"
                        :           #   else
                         "\\d"      #       "\\d"
                              <CR>  # calculate "a

Dung dịch

Đặt tất cả các phần này theo đúng thứ tự, và bạn có giải pháp:

D:let@a=@"%2?@":@"%4?"X":"\\d"<CR>                                              # calculate the digits to replace with spaces
3i <Esc>5a*<Esc>Yphr*$a*<Esc>O**1110333**<Esc>YPi <Esc>3lx3lx"0px4lyl2p$xYp     # draw the sun with spaces, stars, 0, 1 and 3
:%s/<C-r>a/ /g<CR>                                                              # replace the pattern stored in register "a with spaces
:%s/\d/*/g<CR>                                                                  # replace the remaining digits with stars

PHP, 114 + 1 byte

+1 byte cho -R. Cảm ơn @Neil về gợi ý thay đổi.

for(;$c="   *****
 **66733**
*666777333*
*666777333*
**6667333**
  *******"[$i++];)echo+$c?" *"[$c*2>>$argn&1]:$c;

sử dụng dấu gạch dưới cho *, 0-index. Chạy như đường ống với -nRhoặc thử trực tuyến .

Yêu cầu PHP 5.5 trở lên:
PHP cũ hơn không hiểu lập chỉ mục chuỗi bằng chữ (lỗi phân tích cú pháp);
PHP 7.1 phàn nàn về các giá trị không phải là số (thay thế +$cbằng $c>0để sửa chữa).

Python 2 , 170 169 byte

• -1 byte nhờ @TheIOSCoder: sử dụng exec

def f(x,k=0):exec'print"".join(ord(i)*" *"[j%2]for j,i in enumerate(["		","	","	!",""][x%4]))[11*k:][:11];k+=1;'*6

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

Python 2 , 181 byte

lambda n,s=' ',a='*':"""   *****
 **%s**
*%s*
*%s*
**%s**
  *******"""%[(s*5,s*9,s*9,s*7),(s*2+a*3,s*3+a*6,s*3+a*6,s*3+a*4),(a*5,a*9,a*9,a*7),(a*3+s*2,a*6+s*3,a*6+s*3,a*4+s*3)][n%4]

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

Cách tiếp cận rất ngây thơ, làm việc trên golfin ' nvm.

Java 8, 225 213 211 byte

n->{String a=n<2|n>3?"   ":"***",b=n<1|n>2?"   ":"***",c=n%4<1?" ":"*",d=a+(n%4<1?"   ":"***")+b;return"   *****\n **"+(n<2|n>3?"  ":"**")+c+(n<1|n>2?"  ":"**")+"**\n*"+d+"*\n*"+d+"*\n**"+a+c+b+"**\n  *******";}

Hãy thử nó ở đây.

05AB1E , 46 byte

„* •zÇRéóĀ—ÚÂÐoʒ<]ÜA›¶Ò¿H¶ ∞m•b3äûIèSèJ6äIií}»

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