Bir meydan okuma vardır Let oyun tenis tarafından Daniel . Kuzey-Güney yönünde bir mahkeme koymayı teklif ediyor. Benim önerim Doğu-Batı yönünde de tenis oynamak için bir mahkeme yaratmak.

Bir tenis kortu yazdırmanız gerekiyor, ancak gizli nedenlerden dolayı mümkün olan en az baytla yapmalısınız.

Tenis kortu

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

Orijinal kurallar:

• Fazladan boşluk yok.
• Haksız sekmeler olduğu için sekme yok.
• Bir isteğe bağlı son satırsonuna izin verilir.

Bu kod golf , bayt en kısa kod kazanır!

Tuval , 13 12 bayt

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

alanın sıkıştırılmış bir köşesini dörtlü palindromize eder .

Burada deneyin!

11 bayt büyük harf Xes ile, /daha iyi sıkıştırmak xve palindromize etmek gerçeği kullanarak üst üste binme /ve ayna \ile sonuçlanır, bu da sonuçlanırX

Python 2 , 59 bayt

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

Çevrimiçi deneyin!

Dizenin ilk yarısını ve ardından tersini yazdırır. Sıkıcı ama etkili. Ben dışarı s, özellikle, yinelenen bölümleri ayıklamaya çalıştı -, ama daha kısa bir şey bulamadık.

Python 2 , 59 bayt

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

Çevrimiçi deneyin!

Kullanılması Jo King'in inşaat .

Python 2 , 62 bayt

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

Çevrimiçi deneyin!

Her satırın ilk yarısını 'x', ardından da ilk yarısını ters çevirir.

Kömür , 15 bayt

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

Çevrimiçi deneyin! Bağlantı, kodun ayrıntılı versiyonudur. Açıklama yoluyla, çizim komutlarından her birinin sonucunu son yansımasına kadar göstereceğim:

↑²        |
          |

     ------
←⁶        |
          |

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

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

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

Python 3 , 65 62 bayt

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

Çevrimiçi deneyin!

Dyalog APL, 36 bayt

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

Çevrimiçi deneyin!

Adám'dan biraz yardım alarak

Python 3, 75 bayt

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

Muhtemelen golf oynayabilir - Daha önce kolmogorov-karmaşıklık zorluklarını hiç denemedim .

Çevrimiçi deneyin!

Python 2'de 76 bayta alabilirim

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

Perl 5 , 55 bayt

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

Çevrimiçi deneyin!

APL (Dyalog Klasik) , 35 bayt

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

Çevrimiçi deneyin!

Pip -l , 42 39 34 bayt

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

Çevrimiçi deneyin!

Alternatif çözüm, ayrıca 34 bayt:

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

Çevrimiçi deneyin!

Python 2 , 69 68 66 bayt

-2 Jo King sayesinde

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

Çevrimiçi deneyin!

: Biz döngüsü sonsuz üç desenleri aşağıdaki her ilk 6 karakterden kapalı ve dilim (6 kez yeterince amacımıza sonsuzdur) -, | ve | |--. Daha sonra tenis kortunu almak için xher hattın bir ve tersini birleştiriyoruz .

J , 53 bayt

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

Çevrimiçi deneyin!

MBASIC , 82 bayt

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

WIDTH yönergesini kötüye kullanmak beni yaklaşık 20 bayt kurtardı.

K (ngn / k) , 34 bayt

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

Çevrimiçi deneyin!

Bağlantı noktası K4 cevap. 2 bayt kaydedildi 4\, 1 bayt nedeniyle kayboldu+

05AB1E , 25 24 bayt

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

Çevrimiçi deneyin.

25 24 bayt alternatifi:

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

Çevrimiçi deneyin.

Açıklama:

"\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)

Neden •L®y[Â-Γ•olduğunu 5960566858660563ve •B°”Ñ•olduğunu anlamak için bu 05AB1E ucuma bakın ( Büyük tamsayılar nasıl sıkıştırılır? Bölümü )193812448 .

Sayesinde @MagicOctopusUrn 'ın ASCII sanat jeneratör için •L®y[Â-Γ•5BžLR"\n -x|"‡ve •B°”Ñ•3BžLR" -|"‡başka dilde yığın numarası ve dize değiştirerek daha da golfed edilmiş, bundan sonra, kullanmak вyerine Bbirlikte dizeye ve indeksi è.

Sakız , 28 bayt

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

Çevrimiçi deneyin!

Jöle , 22 bayt

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

Çevrimiçi deneyin!

V , 25 bayt

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

Çevrimiçi deneyin!

HexDump:

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

İşte benim sürecim:

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

Alternatif sürüm:

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.

JavaScript (Node.js) , 76 bayt

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

Çevrimiçi deneyin!

• Dize dizisine izin verilirse 68 bayt.

JavaScript (Node.js) , 75 bayt

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

Çevrimiçi deneyin!

• Bu bir çıktı 2d karakter dizisi. Daha fazla golf olabilir mi bilmiyorum.

Kırmızı , 98 80 bayt

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

Çevrimiçi deneyin!

Pyth , 32 bayt

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

Burada çevrimiçi deneyin . Yukarıdaki kod bazı garip karakterler içerdiğinden, kopyalama / yapıştırma muhtemelen çalışmaz.

Desenin ilk yarısını, ardından merkez olmadan tersini yazdırır 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

Powershell, 60 59 bayt

-1 bayt teşekkürler @AdmBorkBork

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

Stax , 19 bayt

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

Çalıştır ve hata ayıkla

C # (.NET Core) , 88 bayt

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

Çevrimiçi deneyin!

Ungolfed:

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

Adrianmp'ın ilk Let's Play Tennis iş parçacığındaki cevabına dayanan anonim bir işlevle bunu yapmanın alternatif bir yolu :

C # (.NET Core) , 88 bayt

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

Çevrimiçi deneyin!

Ungolfed:

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

K4 , 36 35 bayt

Çözüm:

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

Misal:

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

Açıklama:

Diziye bir dizin listesi oluşturmak istiyoruz "x-| ", ör.

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

Bunu üretmek için bu sayıların kapak-4 temellerini alabiliriz. Bu bize şunları verir:

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

İstediğimiz endekslerde farklı değerleri ve endeksi alabiliriz:

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

1 0 0 1 2 2 3 2 2 1 0 0 1Base-4'e dönüştürülen bu dizi

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

Çözüm için bu adımları tersine yapıyoruz.

"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-| "

/// , 46 bayt

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

Çevrimiçi deneyin!