Trong thử thách chơi gôn mã này , bạn phải xuất ra một nghệ thuật lăn ngẫu nhiên.

như thế này:

   ________
  /\       \
 /  \   6   \
{ 4  }-------}
 \  /   5   /
  \/_______/

Xin lưu ý rằng:

   ________
  /\       \
 /  \   3   \
{ 4  }-------}
 \  /   5   /
  \/_______/

là đầu ra không hợp lệ, vì đó không phải là kết quả có thể xảy ra khi chết

Có 6(faces that could be up)*4(faces that could be the left face after the top is determined)*1(faces that could be the right face after the other two are determined)= 24 khả năng của cuộn chết.

Chương trình của bạn phải xuất một trong các cuộn chết này dưới dạng nghệ thuật ascii (được mô hình hóa như bên dưới, với xy và zs được thay thế bằng số) như trên, với mỗi đầu ra có> 0 xác suất xảy ra, nhưng xác suất không xảy ra phải là số chẵn (chúng được phép là xúc xắc, không giống như trong cuộc sống thực). Chương trình của bạn không thể xuất ra một cuộn chết không hợp lệ hoặc một cuộn không chết. Chương trình của bạn phải có xác suất 1 trong số đầu ra một cuộn hợp lệ

Xin lưu ý rằng cái chết của bạn không nhất thiết phải là một cái chết thuận tay phải như trong hình ảnh đầu tiên. (phải và tay trái mô tả mạng lưới của die)

right-handed die
   ________
  /\       \    net
 /  \   z   \     _|4|_ _
{ x  }-------}   |6|2|1|5|
 \  /   y   /      |3|
  \/_______/


left handed die
   ________
  /\       \    net
 /  \   y   \     _|3|_ _
{ x  }-------}   |6|2|1|5|
 \  /   z   /      |4|
  \/_______/

Nếu chết của bạn là thuận tay trái, sau đây là đầu ra hợp lệ, nhưng không phải nếu chết của bạn là thuận tay phải:

   ________
  /\       \
 /  \   2   \
{ 1  }-------}
 \  /   3   /
  \/_______/

Mặc dù bạn có thể chọn thuận tay trái hoặc tay phải, nhưng cái chết của bạn phải nhất quán: nó không thể thay đổi từ trái sang phải hoặc ngược lại

Sau đây là danh sách các đầu ra hợp lệ cho khuôn. Tham khảo các hình ảnh trên cho các vị trí của XYZ:

X-Y-Z
-----
5-4-1
1-5-4
4-1-5

5-6-4
4-5-6
6-4-5

5-3-6
6-5-3
3-6-5

5-1-3
3-5-1
1-3-5

2-6-3
3-2-6
6-3-2

2-4-6
6-2-4
4-6-2

2-1-4
4-2-1
1-4-2

2-3-1
1-2-3
3-1-2

một lần nữa, đây là môn đánh gôn , nên càng ít byte càng tốt

Python 3, 197 196 192 byte

from random import*;c=choice;r=range(1,7);u=c(r);l=c(list(set(r)-{u,u^7}));print(r'''   ________
  /\       \
 /  \%4d   \
{ %d  }-------}
 \  /%4d   /
  \/_______/'''%(u,l,3*u*l*(u*u-l*l)%7))

Kiểm tra nó trên ideone

Thuận tay phải (chuyển sang số ít bằng cách hoán đổi u*uvới l*ldòng cuối cùng)

Bị ràng buộc để đánh bại - nhưng chúng ta hãy thở dài xúc xắc - đặc biệt là vì tất cả những nỗ lực của tôi để đánh gôn ASCII ngoại trừ việc đi thô và sử dụng định dạng trường học cũ đều thất bại trong việc lưu byte;
- bất kỳ lời khuyên chơi gôn nào khác cho một n00b sẵn sàng đánh giá cao.

C, 177

f(r){r=rand()%24;r=(5545>>r%4*3&63^256-(r*2&8))*513>>r/8*3;printf("   ________\n  /\\%9s /  \\%4d   \\\n{ %d  }-------}\n \\  /%4d   /\n  \\/_______/","\\\n",7&r,7&r/8,7&r/64);}

Trong chương trình thử nghiệm

f(r){r=rand()%24;
r=(5545>>r%4*3&63^256-(r*2&8))*513>>r/8*3;
printf("   ________\n  /\\%9s /  \\%4d   \\\n{ %d  }-------}\n \\  /%4d   /\n  \\/_______/","\\\n",7&r,7&r/8,7&r/64);}

j;
main(){
    for(j=99;j--;puts(""))f();
}

Giải trình

r=                    \\after calculation, assign to r (in order to use only one variable.)
(5545>>r%4*3&63       \\5545 is 12651 in octal. Select 2 digts for the equator
^256-(r*2&8))         \\if 4's bit of r is 0, prepend 4=256/64. Else prepend 3 and reverse one of the faces by xoring with 7. 256-8 = 248 = 3*64+7*8.
*513                  \\now we have a 3 digit octal number. duplicate all digits by multiplying by 1001 octal.
>>r/8*3               \\rightshift 0,1 or 2 digits to rotate. 

Javascript 238 232 207 201 byte

var r=24*Math.random()|0,o=r%3,b=r-o,v="123513653263154214624564";console.log(`   ________
  /\\       \\
 /  \\   %s   \\
{ %s  }-------}
 \\  /   %s   /
  \\/_______/`,v[r],v[b+(o+1)%3],v[b+(o+2)%3])

mà khi không có ý thức là:

var r = 24 * Math.random() | 0,
    o = r % 3,
    b = r - o,
    v = "123513653263154214624564";
console.log(
`   ________
  /\\       \\
 /  \\   %s   \\
{ %s  }-------}
 \\  /   %s   /
  \\/_______/`,

    v[r],
    v[b+(o+1)%3]
    ,v[b+(o+2)%3]
)

Thuật toán

Hãy xem xét rằng tại mỗi 8 giao điểm góc của một khuôn, các giá trị khuôn mặt giao nhau được cố định nhưng có thể xuất hiện trong bất kỳ 3 góc quay nào. Ví dụ: trong khi nhìn xuống góc "1", "2", "3", khuôn có thể được xoay quanh một trục qua góc và ra góc đối diện, để hiển thị "1", "2" hoặc "3" trên đỉnh của nghệ thuật ASCII.

vmã cứng các mặt chết giao nhau ở mỗi góc, blà phần bù cho điểm bắt đầu của một góc ngẫu nhiên và olà điểm bắt đầu của phép quay trong dữ liệu góc. Nghệ thuật ASCII được ghi vào bàn điều khiển bằng console.logchuỗi định dạng.

TSQL 308 byte

DECLARE @ char(87)=(SELECT
REPLACE(REPLACE(REPLACE('   ________
  /\       \ 
 /  \   7   \ 
{ 8  }-------}
 \  /   9   /
  \/_______/',7,a),8,b),9,3*ABS(a*a*a*b-a*b*b*b)%7)
FROM(SELECT*,SUBSTRING(REPLACE(STUFF(123456,a,1,''),7-a,''),CAST(RAND()*4as int)+1,1)b
FROM(SELECT CAST(RAND()*6as int)+1a)x)x)PRINT @

280 byte (trong Server Management Studio: Truy vấn - kết quả thành văn bản)

SELECT
REPLACE(REPLACE(REPLACE('   ________
  /\       \ 
 /  \   7   \ 
{ 8  }-------}
 \  /   9   /
  \/_______/',7,a),8,b),9,3*ABS(a*a*a*b-a*b*b*b)%7)
FROM(SELECT*,SUBSTRING(REPLACE(STUFF(123456,a,1,''),7-a,''),CAST(RAND()*4as int)+1,1)b
FROM(SELECT CAST(RAND()*6as int)+1a)x)x

Lưu ý: bằng cách xóa phần in và phần khai báo - và xuất kết quả trực tiếp từ CHỌN. Tuy nhiên, điều đó sẽ không hoạt động trong fiddle

Vĩ cầm

Javascript, 251 byte

r="replace";a=()=>(0|Math.random()*6)+1;b=(x,y)=>3*x*y*(x*x+6*y*y)%7;u=()=>{x=a(),y=a();z=b(x,y);if(z==0)u();return"   ________\r\n  \/\\       \\\r\n \/  \\   1   \\\r\n{ 2  }-------}\r\n \\  \/   3   \/\r\n  \\\/_______\/"[r](1,x)[r](2,y)[r](3,z);}

Gọi bằng cách sử dụng u();
lâu nhưng đó là một câu trả lời và tôi đã không trả lời trong một thời gian dài.

Ruby, 150 byte

Tất cả các lạm dụng định dạng chuỗi !!!

Tín dụng cho công thức có được số cuối cùng được gửi tới @xnor tại đây .

u=1+rand(6)
l=([*1..6]-[u,u^7]).sample
$><<'%11s
  /\%8s
 /  \%4d%4s
{ %d  }%s}
 \  /%4d%4s
  \/%s/'%[?_*8,?\\,u,?\\,l,?-*7,3*u*l*(u*u-l*l)%7,?/,?_*7]