Ayo bermain tenis 2: permainan timur-barat

10

Ada tantangan Ayo bermain tenis oleh Daniel . Dia mengusulkan untuk menempatkan pengadilan di arah Utara-Selatan. Proposal saya adalah membuat pengadilan untuk bermain tenis di arah Timur-Barat juga.

Anda harus mencetak lapangan tenis, tetapi Anda harus melakukannya dalam byte sesedikit mungkin karena alasan rahasia.

Lapangan tenis

------x------
|  |  x  |  |
|  |--x--|  |
|  |  x  |  |
------x------

Aturan aslinya adalah:

Tidak ada ruang ekstra.
Tidak ada tab karena mereka tidak adil.
Satu baris tambahan opsional diizinkan.

Ini adalah kode-golf , jadi kode terpendek dalam byte menang!

code-golf string ascii-art kolmogorov-complexity

— mazzy
sumber

Jawaban:

6

Kanvas , 13 12 byte

«ω↕9:gＷ：ｔＣ‟┼

quad-palindromizes sudut bidang terkompresi .

11 byte dengan huruf besar X, menggunakan fakta bahwa /kompres lebih baik daripada xdan palindromizing akan menghasilkan tumpang tindih /dan cerminnya \, yang menghasilkanX

— dzaima
sumber

1

Lihat, pemikiran saya ketika pertama kali melihat pertanyaan ini adalah "apakah saya punya cukup waktu untuk belajar Kanvas sekarang dan kemudian mengirim solusi?" Jelas tidak: P

— Quintec

10

Python 2 , 59 byte

s="------x------\n|  |  x  |  |\n|  |--x"
print s+s[-2::-1]

Cobalah online!

Mencetak bagian pertama dari string diikuti dengan kebalikannya. Membosankan tapi efisien. Saya mencoba mengekstraksi bagian yang berulang s, terutama -, tetapi tidak menemukan yang lebih pendek.

Python 2 , 59 byte

for n in 6,0,2,0,6:x='-'*n+'  |  |'[n:];print x[::-1]+'x'+x

Cobalah online!

Menggunakan konstruksi Jo King .

Python 2 , 62 byte

b='|  '*2
for r in'-'*6,b,'|  |--',b,'-'*6:print r+'x'+r[::-1]

Cobalah online!

Mencetak bagian pertama dari setiap baris, diikuti oleh 'x', diikuti oleh bagian pertama dibalik.

— Tidak
sumber

7

Arang , 15 byte

↑²←⁶↓xx→x²↑²‖Ｏ¬

Cobalah online! Tautan adalah untuk mengucapkan versi kode. Sebagai penjelasan saya akan menunjukkan hasilnya setelah masing-masing gambar menggambar hingga refleksi terakhir:

↑²        |
          |

     ------
←⁶        |
          |

    x------
↓xx x     |
          |

    x------
→x² x     |
    x--   |

    x------
↑²  x  |  |
    x--|  |

— Neil
sumber

4

Python 3 , 65 62 byte

for n in 7,0,3,0,7:x="-"*n+"|  "*5;print(x[6:0:-1]+'x'+x[1:7])

Cobalah online!

— Jo King
sumber

4

Sekarang ini adalah jenis sihir mengiris string yang saya pikir harus jawaban Python untuk tantangan ini. Permainan yang bagus!

— DLosc

3

Dyalog APL, 36 byte

(⌽,'x',⊢)(⊢⍪'--|  |'⍪⊖)'-'⍪1 6⍴'  |'

Cobalah online!

Dengan sedikit bantuan dari Adám

— dzaima
sumber

2

Python 3, 75 byte

s='-'*6;p='|  |';w=s+'x'+s;a=p+'  x  '+p;print(w,a,p+w[4:9]+p,a,w,sep='\n')

Mungkin golf - saya belum pernah benar-benar mencoba tantangan kompleksitas-kolmogorov sebelumnya.

Cobalah online!

Dalam Python 2 saya bisa mendapatkannya hingga 76 byte

s='-'*6;p='|  |';w=s+'x'+s;a=p+'  x  '+p
for i in w,a,p+w[4:9]+p,a,w:print i

— Quintec
sumber

2

Perl 5 , 55 byte

say$_,x,~~reverse for('-'x6,'|  'x2,'|  |--')[0..2,1,0]

Cobalah online!

— nwellnhof
sumber

2

APL (Dyalog Classic) , 35 byte

' |-x'[(⍉⊖⍪1∘↓)⍣2⍉3⍪2,⍨676 28⊤⍨6⍴3]

Cobalah online!

— ngn
sumber

Saya baru saja melihat ini kudus apa

— Quintec

1

Pip `-l` , 42 39 34 byte

RV@<P"|  |".[s'-]X2PE'-X6M_.'x.RV_

Cobalah online!

Solusi alternatif, juga 34 byte:

RV@<P"-0|  0|  |--"^0M_@<16RA6,t'x

Cobalah online!

— DLosc
sumber

1

Python 2 , 69 68 66 byte

Terima kasih kepada Jo King

for l in"-","|  ","|  |--","|  ","-":l*=6;print l[:6]+"x"+l[5::-1]

Cobalah online!

Kami siklus berikut tiga pola jauh (6 kali cukup terbatas untuk tujuan kita) dan iris off pertama 6 karakter masing-masing: -, | , dan | |--. Kemudian, untuk mendapatkan lapangan tenis, kami menggabungkan xdan membalikkan setiap baris.

— DLosc
sumber

1

J , 53 byte

echo|:'x'(<6)}'-'(<2;~4+i.5)}13$3 5$'-|||',11$'--   '

Cobalah online!

— Galen Ivanov
sumber

1

MBASIC , 82 byte

1 WIDTH 13:PRINT"------x------|  |  x  |  ||  |--x--|  ||  |  x  |  |------x------

Menyalahgunakan arahan WIDTH menyelamatkan saya sekitar 20 byte.

— wooshinyobject
sumber

1

K (ngn / k) , 34 byte

+"x-| "@4\509 425 477 0@4\17218113

Cobalah online!

Jawaban Port K4. 2 byte disimpan dengan 4\, 1 byte hilang karena+

— streetster
sumber

1

05AB1E , 25 24 byte

"
 -x|"•L®y[Â-Γ•5вèJ.º.∊

Cobalah online.

25 24 byte alternatif:

… -|•B°”Ñ•3вèJ3ä'x«».º.∊

Cobalah online.

Penjelasan:

"\n -x|"       # Push string "\n -x|"
•L®y[Â-Γ•      # Push compressed number 5960566858660563
         5в    # Converted to Base-5 as list: 
               #  [2,2,2,2,2,2,3,0,4,1,1,4,1,1,3,0,4,1,1,4,2,2,3]
è              # Index each digit into the string
 J             # And join the list together
               #  "\n -x|" and [2,2,2,2,2,2,3,0,4,1,1,4,1,1,3,0,4,1,1,4,2,2,3]
               #   → "------x\n|  |  x\n|  |--x"
.º             # Intersect mirror everything horizontally
  .∊           # Intersect mirror everything vertically (and output implicitly)

… -|           # Push string " -|"
•B°”Ñ•         # Push compressed integer 193812448
      3в       # Converted to Base-3 as list: [1,1,1,1,1,1,2,0,0,2,0,0,2,0,0,2,1,1]
è              # Index each digit into the string
 J             # And join the list together
               #  " -|" and [1,1,1,1,1,1,2,0,0,2,0,0,2,0,0,2,1,1]
               #   → "------|  |  |  |--"
3ä             # Split the string into three parts: ["------","|  |  ","|  |--"]
  'x«         '# Append an "x" to each: ["------x","|  |  x","|  |--x"]
     »         # Join by newlines: "------x\n|  |  x\n|  |--x"
.º             # Intersect mirror everything horizontally
  .∊           # Intersect mirror everything vertically (and output implicitly)

Lihat tip tambang 05AB1E ini (bagian Bagaimana cara mengompresi bilangan bulat besar? ) Untuk memahami mengapa •L®y[Â-Γ•ada 5960566858660563atau •B°”Ñ•tidak 193812448.

Berkat generator ASCII-art @MagicOctopusUrn untuk •L®y[Â-Γ•5BžLR"\n -x|"‡dan •B°”Ñ•3BžLR" -|"‡, setelah itu transliterate telah di-golf lebih lanjut dengan menukar nomor dan string pada stack, gunakan вalih-alih B, dan indeks ke dalam string dengan è.

— Kevin Cruijssen
sumber

0

Bubblegum , 28 byte

00000000: d3d5 0581 0a30 a9cb 55a3 a000 4415 60b2  .....0..U...D.`.
00000010: 06cc 03cb c179 0839 5d14 7d00            .....y.9].}.

Cobalah online!

— Logern
sumber

0

Jelly , 22 byte

“Þḅ“ H“ \’ṃ“-|x ”ŒBŒḄY

Cobalah online!

— Jonathan Allan
sumber

0

V , 25 byte

13é-Äï5I  |<esc>ÄÙ4l5r-Îd^ãrx

Cobalah online!

Hexdump:

00000000: 3133 e92d c4ef 3549 2020 7c1b c4d9 346c  13.-..5I  |...4l
00000010: 3572 2dce 645e e372 78                   5r-.d^.rx

Inilah proses saya:

13é-Äï5I  |<esc>3<<ÄÙ4l5r-Gã<C-v>ërx
13é-Äï5I  |<esc>3<<ÄÙ4l5r-Î7|rx
13é-Äï5I  |<esc>3<<ÄÙ4l5r-Îãrx
13é-Äï5I  |<esc>ÄÙ4l5r-Îd^ãrx

Versi alternatif:

5I  |<esc>5ÄM4l5r-HÒ-G.Îxxãrx

Hexdump:

00000000: 3549 2020 7c1b 35c4 4d34 6c35 722d 48d2  5I  |.5.M4l5r-H.
00000010: 2d47 2ece 7878 e372 780a                 -G..xx.rx.

— James
sumber

0

JavaScript (Node.js) , 76 byte

(a='----',A='|  |',b='--x--',B='  x  ')=>[p=a+b+a,q=A+B+A,A+b+A,q,p].join`
`

Cobalah online!

68 byte jika array string diizinkan.

JavaScript (Node.js) , 75 byte

_=>[p='x---',q='x|  ','x| -',q,p].map(c=>[...'1221330331221'].map(d=>c[d]))

Cobalah online!

Yang ini menghasilkan array char 2d. Saya tidak tahu apakah bisa bermain golf lebih jauh.

— tsh
sumber

0

Merah , 98 80 byte

foreach r[1 2 3 2 1][print pick["------x------""|  |  x  |  |""|  |--x--|  |"]r]

Cobalah online!

— Galen Ivanov
sumber

0

Pyth , 32 byte

t_ps@L"x-
| "jC"??ôkË7"5

Cobalah online di sini . Kode di atas berisi beberapa karakter aneh, jadi menyalin / menempel mungkin tidak akan berhasil.

Mencetak bagian pertama dari pola, diikuti dengan kebalikannya tanpa pusat x.

t_ps@L"x-\n| "jC"..."5   Note newline replaced with \n, encoded string replaced with ...

               C"..."    Convert encoded string to base 256 number 727558509253668163499780
              j      5   Convert to base 5, yields [1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 2, 3, 4, 4, 3, 4, 4, 0, 4, 4, 3, 4, 4, 3, 2, 3, 4, 4, 3, 1, 1, 0]
    @L                   Map each of the above to...
      "x-\n| "           ... [x, -, newline, |, space]
   s                     Concatenate into string
  p                      Print without newline
 _                       Reverse
t                        All but first character, implicit print

— Sok
sumber

0

Powershell, 60 59 byte

-1 byte terima kasih @AdmBorkBork

('------x------','|  |  x  |  |','|  |--x--|  |')[0,1+2..0]

— mazzy
sumber

1

59 byte yang harus dilakukan[0,1+2..0]

— AdmBorkBork

0

Stax , 19 byte

⌡x♠=Γτ^┼¢Δ¶─êiö$≥⌐▓

Jalankan dan debug itu

— rekursif
sumber

0

C # (.NET Core) , 88 byte

string a="------x------\n",b="|  |  x  |  |\n";Console.Write(a+b+"|  |--x--|  |\n"+b+a);

Cobalah online!

Tidak Disatukan:

string a = "------x------\n",
       b = "|  |  x  |  |\n";
Console.Write(a + b + "|  |--x--|  |\n" + b + a);

Berikut cara alternatif untuk melakukannya dengan fungsi anonim berdasarkan jawaban adrianmp dari utas Let's Play Tennis pertama:

C # (.NET Core) , 88 byte

()=>{string a="------x------\n",b="|  |  x  |  |\n";return(a+b+"|  |--x--|  |\n"+b+a);};

Cobalah online!

Tidak Disatukan:

() =>
{
    string a = "------x------\n",
           b = "|  |  x  |  |\n";
    return(a + b + "|  |--x--|  |\n" + b + a);
};

— Meerkat
sumber

0

K4 , 36 35 byte

Larutan:

"x-| "@4\:509 425 477 0@4\:17218113

Contoh:

q)k)"x-| "@4\:509 425 477 0@4\:17218113
"------x------"
"|  |  x  |  |"
"|  |--x--|  |"
"|  |  x  |  |"
"------x------"

Penjelasan:

Kami ingin membuat daftar indeks ke dalam array "x-| ", mis

1 1 1 1 1 1 0 1 1 1 1 1 1
2 3 3 2 3 3 0 3 3 2 3 3 2
2 3 3 2 1 1 0 1 1 2 3 3 2
2 3 3 2 3 3 0 3 3 2 3 3 2
1 1 1 1 1 1 0 1 1 1 1 1 1

Untuk menghasilkan ini, kita dapat mengambil representasi basis-4 dari flip angka-angka ini. Ini memberi kita:

425 509 509 425 477 477 0 477 477 425 509 509 425

Kita dapat mengambil nilai dan indeks berbeda pada indeks yang kita butuhkan:

q)509 425 477 0@1 0 0 1 2 2 3 2 2 1 0 0 1
425 509 509 425 477 477 0 477 477 425 509 509 425

Array ini 1 0 0 1 2 2 3 2 2 1 0 0 1dikonversi ke basis-4 adalah

q)k)4/:1 0 0 1 2 2 3 2 2 1 0 0 1
17218113

Jadi untuk solusinya, kami hanya melakukan langkah-langkah ini secara terbalik.

"x-| "@4\:509 425 477 0@4\:17218113 / the solution
                        4\:17218113 / convert 17218113 into base-4
          509 425 477 0@            / index (@) into 509 425 477 0
       4\:                          / convert to base-4
"x-| "@                             / index (@) into "x-| "

— streetster
sumber

0

/// , 46 byte

/#/
!  x  !
//"/------//!/|  |/"x"#!--x--!#"x"

Cobalah online!

— Conor O'Brien
sumber

Dengan menggunakan situs kami, Anda mengakui telah membaca dan memahami Kebijakan Cookie dan Kebijakan Privasi kami.

Licensed under cc by-sa 3.0 with attribution required.