blob: 9b458cc6c18aeb17e41e42e541ed48d2be6d0690 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
#!/usr/bin/env ruby
# d20+1 # 20 1 d 1 + p
# 10d6k8 # 6 10 d 10 8 keep 8 .+ p
# 3d6>2 # 6 3 d 3 2 > p
# 3d12/2 # 12 3 d + + 2 / p
stack = []
loop do
print "> "
gets.split.each do |token|
case token
when /[0-9]+/
stack.push(token.to_i)
when "+"
a, b = stack.pop(2)
stack.push(a + b)
when ".+"
l = stack.pop
h = stack.pop(n)
stack.push(h.sum)
when "-"
a, b = stack.pop(2)
stack.push(a - b)
when "*"
a, b = stack.pop(2)
stack.push(a * b)
when "/"
a, b = stack.pop(2)
stack.push(a / b)
when "%"
a, b = stack.pop(2)
stack.push(a % b)
when "d", "roll"
n = stack.pop
d = stack.pop
n.times { stack.push(rand(d) + 1) }
when "p"
puts stack.pop
when "s"
pp stack
when "k", "keep"
k = stack.pop
n = stack.pop
h = stack.pop(n).sort
stack.push(*h.pop(k))
when ">"
t = stack.pop
n = stack.pop
h = stack.pop(n)
stack.push(*h.select{|d|d > t})
when "<"
t = stack.pop
n = stack.pop
h = stack.pop(n)
stack.push(*h.select{|d|d < t})
when "q"
exit
else
puts "I don't know how to #{token}!"
end
end
end
|