Bối cảnh

Đó là ngày lễ tình nhân. Người duy nhất bạn từng yêu đã rời bỏ bạn ngày hôm qua vì anh chàng này, cô luôn thấy "ngu ngốc và không thú vị" . Trên đường về nhà, bạn đã bị kẹt xe, nghe những bài hát cũ trên radio, cơn mưa đập vào kính chắn gió đang làm bạn rung chuyển. Sau một thời gian ngồi trong xe, bạn thấy mình cô đơn trong căn hộ nhỏ của mình không thể nghĩ ra điều gì khác ngoài cô ấy. Không có ánh sáng và bạn nhìn chằm chằm vào cửa sổ, để bóng tối bao quanh bạn. Không có ai để nói chuyện, bạn bè của bạn đã biến mất từ ​​lâu sau khi cảnh báo bạn về cô gái mới này ám ảnh tâm trí bạn. Bạn khởi động máy tính của mình, vì đó là điều duy nhất bạn có thể làm, mở trình duyệt của bạn và đăng một câu đố lập trình mới lên stackexchange, trong nỗ lực thay đổi suy nghĩ của bạn.

Thử thách

Viết chương trình bằng ngôn ngữ bạn chọn mô phỏng cơn mưa rơi trên mặt đất. Đầu ra có thể bao gồm các ký tự ASCII hoặc kết xuất 2D / 3D. Camera được cố định: bạn ở trên nhìn thẳng xuống đất. Chương trình của bạn phải bao gồm một số loại hoạt hình như làm mới bảng điều khiển hoặc trang mỗi khi bạn tạo một "khung" mới. Nó phải thực tế, tôi biết đó là một chút chủ quan nhưng giả sử bạn không thể lấp đầy tất cả chỉ trong một giọt lớn.

Đầu ra không phải là một hình ảnh nhưng nếu bạn đang sử dụng ngôn ngữ khó hiểu thì tốt hơn là cung cấp một .gif để minh họa cách nó hoạt động (nhưng tất nhiên, nó sẽ không ảnh hưởng đến điểm số của bạn nếu bạn không).

Quy tắc

• Điểm của bạn là tổng số byte được sử dụng
• -20 điểm nếu bạn sử dụng màu sắc
• -50 nếu bạn đạt được một số loại gió
• Điểm số thấp nhất sẽ thắng

Thí dụ

Một ví dụ rất cơ bản về những gì sẽ được kết xuất:

Tôi hy vọng bạn sẽ làm tốt hơn và tận hưởng thử thách này.

Xin lỗi vì tiếng Anh của tôi, vui lòng chỉnh sửa bài viết của tôi nếu bạn muốn sửa một số lỗi

Ban lãnh đạo

Nếu tên của bạn không được liệt kê thì đó là do nỗ lực của bạn đã bị coi là không phù hợp với quy tắc.

Tobia - APL - 35  
j6m8 - Processing.js - 38
The Guy with The Hat - Processing - 42  
ace - Processing - 74  
kelunik - JS/CSS - 89  
Riot - Bash - 91  
Michael - JS/jQuery - 105  
Florent - HTML/JS - 123  
David Carraher - Mathematica - 134  
Doorknob - HTML/JS - 150  
undergroundmonorail - Python - 175

Xin chúc mừng Tobia!

APL, 105 ký tự / byte * - 20 - 50 = 35 điểm

e←{⍞←∊'␛['⍵}
e¨'36m' '?25l' '2J'
{⍵←3⌊⍵+3×0=?t⍴50
⍵{(⍵c)←⍕¨⍵+1
e⍵';'c'H',' .∘⍟'[⍺]}¨⍳t
∇0⌈⍵-1}0⍴⍨t←24 80

*: Hầu hết các triển khai APL đều hỗ trợ một số dạng bộ ký tự byte đơn (cũ), ánh xạ các ký hiệu APL thành các giá trị 128 byte trên. Do đó, với mục đích chơi gôn, một chương trình chỉ sử dụng các ký tự ASCII và các ký hiệu APL có thể được ghi là chars = byte.

Tôi đã thử nghiệm nó trên apl.js mới nhất của Nick trên Node.js trong thiết bị đầu cuối OS X. Nhưng tôi chưa sử dụng bất cứ thứ gì cụ thể cho phương ngữ của anh ấy, vì vậy nó nên hoạt động trên bất kỳ APL hiện đại nào có thể chạy trên thiết bị đầu cuối ANSI và hỗ trợ các trò vui {...}, gán chuỗi (a b)←...và đi lại ⍨, như Dyalog cho Linux hoặc cho Raspberry PI ( với ⎕IO←0)

Các ␛phù hợp 1 là một ký tự thoát theo nghĩa đen (đó là 1 byte). Bạn có thể nhập nó bằng Ctrl-V Escthiết bị đầu cuối Linux hoặc trong Vim hoặc được cho là giống như Alt-027trong Windows. Ngoài ra, tôi không thể tìm thấy một cách đáng tin cậy để khám phá kích thước thiết bị đầu cuối, vì vậy bạn có thể muốn chỉnh sửa số lượng hàng và cột ở cuối dòng cuối cùng.

Tôi bảo vệ phần thưởng 50 bởi thực tế là mỗi hạt mưa trải qua các hình dạng sau: ⍟∘.mang lại ấn tượng về một cơn gió nhẹ, cho rằng cảnh tượng đang được nhìn từ trên cao. Trong thực tế, nhìn vào gif bên dưới, bạn sẽ có ấn tượng rằng mỗi giọt đang nhẹ nhàng di chuyển xuống dưới và sang trái, trước khi biến mất trên mặt đất.

Phiên bản bị đánh cắp:

e←{⍞←∊"␛["⍵}                  # utility to print escape sequence
e¨'36m' '?25l' '2J'            # set cyan, hide the cursor and clear screen
{                              # repeat (⍵=current board of raindrops)
  ⍵←3⌊⍵+3×0=?t⍴50              #   add some new drops (=3) in random places
  ⍵{                           #   print the drops (⍺=drop value, ⍵=coords)
    (r c)←⍕¨⍵+1                #     convert the coordinates to string
    e r';'c'H',' .∘⍟'[⍺]       #     print or clear the drop
  }¨⍳t                         #   ..
  ∇0⌈⍵-1                       #   remove 1 from every drop and repeat
}0⍴⍨t←24 80                    # ..starting with an empty board

Đầu ra:

APL, phong cách khác nhau

Hết cạnh tranh.

m←×/t←1+(ζη)←2×(βγ)←24 80
e←{⍞←∊(⎕UCS 27)'['⍵}
s←{⍵[β-1-⍳β;1+⍳γ]}
p←{⍺{e'H'⍺,⍨{⍺,';',⍵}/⍕¨⍵}¨(,s⍵)/,1+⍳βγ}
e¨'2J' '36m' '?25l'
{'/'p⍵←(200<m÷?t⍴m)∨0⍪⍵[⍳ζ;1+⍳η],0
' 'p(~⍵)∧0,⍵[1+⍳ζ;⍳η]⍪0
'.∘°'[?(+/,sδ)/3]pδ←⍵∧~d←.2<m÷⍨?t⍴m
∇⍵∧d}t⍴0

Ở đây, mục đích của tôi là tạo ra ấn tượng về những hạt mưa rơi với độ nghiêng và tích tụ trên mặt đất, trong khi cố gắng giữ cho số lượng giọt có thể nhìn thấy (có thể rơi hoặc bắn tung tóe) không đổi. Bí quyết là tạo ra một số giọt rơi mới /trong mỗi chu kỳ và để những giọt rơi đó "quét sạch" bất kỳ vật rơi vãi nào chúng đi qua.

Kết quả là gợi nhớ một cách kỳ lạ mã Matrix.

Đầu ra
(giật mỗi 5s là vòng lặp gif)

Bash: 111 byte - 20 = 91 điểm!

Một cơn mưa phùn chiêm nghiệm trong thiết bị đầu cuối của bạn. Điều chỉnh các số 819 và 41 cho chiều cao và chiều rộng khác nhau tương ứng.

e='printf \e';while :;do for i in {0..819};do((RANDOM<9))&&$e[1\;36m.||$e[1C;((i%41<1))&&$e'
';done;$e[20A;done

Một phần thưởng thú vị là cách con trỏ vỗ nhẹ qua khu vực mưa.

Chỉnh sửa: rút ngắn từ 140 byte xuống 129 byte nhờ các đề xuất của @ manatwork. Chỉnh sửa lần 2: rút ngắn từ 129 byte xuống 111 byte nhờ các đề xuất của @ manatwork và @ Tobia, cộng với nguồn cảm hứng bổ sung - xem bình luận.

(Lưu ý: ảnh chụp màn hình hiển thị phiên bản mã ít được đánh gôn trước đó, giống hệt về chức năng)

Python, 312 byte - 50 (gió) = 262

from pygame import*
R=__import__('random').randint
t,u=640,480;init();d=display;s=d.set_mode((t,u))
w=[255]*3;r=range(t)
a=[[R(0,t),R(0,u),R(3,6)]for i in r]
while time.wait(9):
 d.flip();event.get();s.fill(R(0,99)<1and w)
 for i in r:x,y,z=a[i];draw.line(s,w,(x,y),(x+z,y+2*z));a[i][0]=(x+z)%t;a[i][1]=(y+z*2)%u

Đầu ra mẫu (vòng lặp 50 khung hình):

Playpack thực tế là nhanh hơn đáng kể so với gifs cho phép.

HTML / JS, 170 ký tự - 20 = 150 điểm

<canvas id=c></canvas><script>d=400;with(c)width=height=d,t=getContext('2d');t.fillStyle='blue';setInterval("t.fillRect(Math.random()*d,Math.random()*d,5,5)",50)</script>

(sidenote: đánh gôn xa hơn bằng cách chuyển một chuỗi tới setInterval, withtên biến ID tự động ... cảm thấy rất sai! rùng mình )

Nó chỉ vẽ hình chữ nhật màu xanh ngẫu nhiên.

HTML / JS, 309 ký tự - 20 - 50 = 239 điểm

Bây giờ có gió!

<canvas id=c></canvas><script>s=400;r=Math.random;with(c)width=height=s,t=getContext('2d');t.fillStyle='blue';o=[];setInterval("t.clearRect(0,0,s,s);for(i=0;++i<o.length;)d=o[i],t.fillRect(d[0],d[1],d[2],d[2]),d[0]+=1,d[1]+=2,d[2]-=1,d[2]<0?o.splice(i,1):0;if(r()<.6)o.push([r()*400,r()*400,20])",50)</script>

JS + jQuery (172-20-50 = 102)

Sao chép / Dán dòng đó trong bảng điều khiển trình duyệt (thường nhấn phím F12):

r=Math.random;w=$(window);setInterval("$('<b>♥</b>').css({color:'red',position:'fixed',top:r()*w.height(),left:r()*w.width()}).appendTo('body').animate({fontSize:0},3e3)",9)

Hoạt hình trái tim đỏ mưa cho ngày Valentine!

Toán học

134 - 20 = 114

2D

n = 99; m = Array[0 &, {n, n}]; r := RandomInteger[{1, n}, {2}]
Table[ArrayPlot[m = ReplacePart[m, r ->  1], ColorRules -> {1 -> Blue}], {k, 250}];
Export["d.gif", d]

3D

Hình dạng hạt mưa được thực hiện thông qua một âm mưu cách mạng quanh trục z.

Ban đầu, mưa được tạo ra cho một khu vực mở rộng hơn khu vực hiển thị. Sự xuất hiện của mưa rơi đạt được bằng cách dịch chuyển Điểm nhìn lên trên dọc theo trục z. (Nó hiệu quả hơn so với tính toán lại vị trí của mỗi hạt mưa.)

r = RandomInteger; z = Table[{r@30, r@30, r@160}, {100}];
w = RevolutionPlot3D[{.7 Sin[x] Cos[x], 0,   1.4 Sin[x] }, {x, 0, -Pi/2}, 
PerformanceGoal -> "Speed"][[1]];
c = Map[Translate[w, #] &, z]; 
p = Table[Graphics3D[c, PlotRange -> {k, k + 50}], {k, 1, 100}]
Export["p.gif", p]

Với gió

Có chi phí đáng kể để làm cho mưa rơi với gió. Nhưng dù sao tôi cũng bao gồm ở đây.

Tầng màu xanh khá nhiều giữ cho khu vực xem {x, y} bị giới hạn trong khu vực quan tâm. Có một số trục trặc, nhưng, oh tốt,

r = RandomInteger;
z = Table[{r@120, r@30, r@180}, {800}];
w = RevolutionPlot3D[{.7 Sin[x] Cos[x], 0,   1.4 Sin[x] }, {x, 
     0, -Pi/2}, PerformanceGoal -> "Speed"][[1]];
c = Map[Translate[w, #] &, z];
g[k_, z1_, w_, c1_] :=
 Module[{z2},
  z2 = Cases[z, {x_, _, _} /; 0 + k < x < 30 + k];
  c = Map[Translate[w, #] &, z2];
  Graphics3D[{Polygon[{{0 + k, 0, 1 + k}, {30 + k, 0, 1 + k}, {30 + k,
        30, 1 + k}, {0 + k, 30, 1 + k}}], c}, 
   PlotRange -> {k, k + 50}]]

p = Table[g[k, z, w, c], {k, 1, 100, 1}];
Export["p.gif", p]

Từ trực tiếp trên

Những hạt mưa gần nhất được cắt bớt nhưng tôi sẽ bỏ qua điều đó.

m=40;
r=RandomInteger;
positions=Table[{r@m,r@m,r@1000},{800}];
g[lowZ_,pos_]:=
Module[{hiZ=lowZ+103},
Graphics3D[{PointSize[Small],White,Point[{{0,0,lowZ},{0,m,lowZ},{m,0,lowZ},{m,m,lowZ},{0,0,hiZ},{0,m,hiZ},{m,0,hiZ},{m,m,hiZ}}],
ImageSize-> 350,Sphere/@Cases[pos,{_,_,z1_}/;lowZ<z1<hiZ-2]},PlotRange->{lowZ,hiZ}, 
ViewPoint-> {0,0,1},ImagePadding->5]]

HTML / JavaScript, 156 123 (143 - 20)

<body bgcolor=0 onload="t=c.getContext('2d');t.fillStyle='#07d';setInterval('n=Math.random()*4e4;t.fillRect(n%270,n/150,1,1)',1)"><canvas id=c>

Phiên bản chú thích:

<body bgcolor="#000">
<canvas id="c"></canvas>
<script>
  onload = function() {
    // Retrieve the rendering context
    t=c.getContext('2d');
    // Set rain color
    t.fillStyle='#07d';
    // Render whenever it is possible
    setInterval(function() {
      // Generate a number between 0 and 40,000
      // 40,000 ~= 270 * 150
      n=Math.random()*4e4;
      // Draw a raindrop.
      // Since x and y are not rounded, the raindrop looks blurry!
      t.fillRect(n%270,n/150,1,1)
    }, 1);
  };
</script>
</body>

Smalltalk (Smalltalk / X)

với gió ngẫu nhiên ;-)

|BG CLR N1 H W v WIND drops gen newDrops draw remove move buffer|


BG := Color black.
CLR := Color blue lightened.
H := 100.
W := 100.
N1 := 10.
WIND := 0.
drops := OrderedCollection new.

gen := [:n | ((1 to:n) collect:[:i | Random nextIntegerBetween:1 and:W] as:Set) collect:[:x | x@0]].
newDrops := [drops addAll:(gen value:N1)].
draw := [buffer fill:BG; paint:CLR. drops do:[:d | buffer displayPoint:d]].
remove := [drops := drops reject:[:d | d y > H]].
move := [:wind | drops := drops collect:[:d| (d x + wind)\\W @ (d y + 1)]].
v := View new openAndWait.
buffer := Form extent:(v extent) depth:24 onDevice:v device.

[
    [v shown] whileTrue:[
        draw value.
        v displayForm:buffer.
        move value:WIND.
        remove value.
        newDrops value.
        WIND := (WIND+(Random nextBetween:-1 and:1)) clampBetween:-5 and:5.
        Delay waitForSeconds:0.1.
    ]
] fork.

đầu ra trong chế độ xem:

Đang xử lý, 94 - 20 = 74

void setup(){background(0);fill(0,0,255);}
void draw(){ellipse(random(0,99),random(0,99),3,3);}

(Dòng mới được thêm vào để dễ đọc.)

Nhấn vào đây để xem demo trực tuyến.

Bash

while true;do echo " / / / / /";echo "/ / / / / ";done

Tôi không chắc đây có phải là một môn đánh gôn không vì yêu cầu khắt khe về "cơn mưa" phải như thế nào.

EDIT: Nếu bạn muốn nó trông giống như máy ảnh đang hướng thẳng xuống, hãy sử dụng:

while true;do echo " . . . . .";echo ". . . . . ";done

Con trăn 2.7: 195 - 20 = 175

Tôi chắc chắn có nhiều việc có thể được thực hiện ở đây, nhưng đây là những gì tôi đã có bây giờ:

import os,time
from random import*
l=[i[:]for i in[[' ']*100]*50]
while 1:
 os.system('clear')
 l[randint(0,49)][randint(0,99)]='.'
 print'\033[94m\n'.join(''.join(r)for r in l)
 time.sleep(.05)

Tôi sẽ đăng một gif của đầu ra khi tôi nhớ làm thế nào để làm điều đó.

Điều này hoạt động trên linux. Thay thế 'clear'bằng 'cls'làm cho nó hoạt động trên các cửa sổ, nhưng sau đó màu ANSI không hoạt động và tôi mất phần thưởng.

Tôi có một mảng 2D gồm các chuỗi một ký tự, được khởi tạo thành . Cứ sau 0,05 giây, một trong số chúng được chọn ngẫu nhiên .và màn hình được vẽ lại.

from random import*lưu hai ký tự import os,time,randomvà sử dụng random.randint()hai lần, mặc dù tôi không tin đó là cách tốt nhất để chọn một ô. Tôi muốn sử dụng random.choice()nhưng tôi không thể nghĩ ra cách nào xung quanh các chuỗi bất biến sẽ không lãng phí nhiều ký tự hơn mức lưu.

132 + 27 - 20 - 50 = 89

Javascript (132)

r=Math.random;setInterval("$('body').append($('<i>∘</i>').css({left:r()*2e3,top:r()*2e3}).animate({left:'+=70',fontSize:0},500))",1)

CSS (27)

i{color:blue;position:fixed

Bản trình diễn: http://jsfiddle.net/kelunik/5WC87/4/embedded/result/

Đang xử lý, 62 - 20 = 42

void draw(){stroke(0,0,214);point(random(0,99),random(0,99));}

Tạo các pixel màu xanh trên nền trắng. Trình diễn bằng một ngôn ngữ rất giống nhau ở đây: https://www.khanacademy.org/cs/rain2/6172053633761280

Chế biến.js, 86 - 20 = 66

... nhưng nó cũng từ từ mờ dần (mặt đất hấp thụ mưa, một cách tự nhiên). Điểm cho điều đó?

g=99;r=random;void draw(){fill(0,9);rect(0,0,g,g);fill(0,g,r(g));rect(r(g),r(g),2,2);}

Các tính năng thưởng bao gồm khác nhau giữa màu xanh lục và màu xanh lam (rõ ràng là mưa 'thành phố' bẩn).

Ngoài ra, tôi rất hài lòng rằng tôi đã sử dụng hack JavaScript ở đây; Lưu ý rằng, bởi vì đây là xử lý. js , bạn có thể ném vào những thứ như việc kê khai typeless của g = 99, hoặc bí danh của rcho random(bí danh cross-language!).

Bất kỳ ý tưởng khác để giảm thiểu?

Phiên bản dễ đọc:

g = 99;
r = random;                  // Javascript trickery
void draw() {
    fill(0, 9);
    rect(0, 0, g, g);        // Fade the background
    fill(0, r(g), r);
    rect(r(g), r(g), 2, 2);  // Add a new drop
}

Toàn bộ điều có thể được xem ở đây .

... cộng với một phiên bản khác không phai: 58 - 20 = 38

Nếu bạn không thích phai màu và không bận tâm đến bụi bẩn xám:

r=random;void draw(){fill(0,0,255);rect(r(99),r(99),2,2);}

Tcl / Tk, 139 - 20 = 119

Sử dụng lại câu trả lời của riêng tôi http://codegolf.stackexchange.com/a/143018/29325

Phải được chạy trong vỏ tương tác

gri [can .c -w 40 -he 40]
set x 0
wh 1 {.c cr o $x [set y [exp int(rand()*40)]] $x [set x $y] -f #[form %06x [exp int(rand()*255**3)]]
upd}

Thật không may, chuyển đổi expr int(rand()*thành một proctập lệnh có thêm một byte!

Để dừng lại, người ta chỉ cần nhấp vào nút "X" không hiệu quả.