diff options
Diffstat (limited to 'sample/rcs.rb')
| -rw-r--r-- | sample/rcs.rb | 30 |
1 files changed, 10 insertions, 20 deletions
diff --git a/sample/rcs.rb b/sample/rcs.rb index 3f74da9ef2..0bdf81c45d 100644 --- a/sample/rcs.rb +++ b/sample/rcs.rb @@ -1,29 +1,30 @@ # random dot steraogram # usage: rcs.rb rcs.dat -sw = 40.0 # 元のパターンの幅 -dw = 78.0 # 生成される Random Character Streogram の幅 +sw = 40.0 # width of original pattern +dw = 78.0 # width of generating Random Character Streogram hdw = dw / 2.0 -w = 20.0 # 両眼の幅 -h =1.0 # 画面と基準面の距離 -d = 0.2 # 単位当たりの浮き上がり方 +w = 20.0 # distance between eyes +h =1.0 # distance from screen and base plane +d = 0.2 # z value unit ss="abcdefghijklmnopqrstuvwxyz0123456789#!$%^&*()-=\\[];'`,./" -rnd = srand() +rnd = srand() # You don't actually need this in ruby - srand() is called + # on the first call of rand(). while gets() # print($_) xr = -hdw; y = h * 1.0; maxxl = -999 - s = ""; + s = "" while xr < hdw x = xr * (1 + y) - y * w / 2 i = (x / (1 + h) + sw / 2) - if (1 < i && i < $_.length); + if (1 < i && i < $_.length) c = $_[i, 1].to_i else c = 0 end y = h - d * c - xl = xr - w * y / (1 + y); + xl = xr - w * y / (1 + y) if xl < -hdw || xl >= hdw || xl <= maxxl tt = rand(ss.length) c = ss[tt, 1] @@ -36,14 +37,3 @@ while gets() end print(s, "\n") end - - - - - - - - - - - |