RPG attributes generator: Difference between revisions

added Arturo
(OCaml implementation)
(added Arturo)
Line 734:
</lang>
 
=={{header|Arturo}}==
 
<lang rebol>vals: []
 
while [or? 75 > sum vals
2 > size select vals => [&>=15]] [
vals: new []
 
while [6 > size vals][
rands: new map 1..4 => [random 1 6]
remove 'rands .once (min rands)
'vals ++ sum rands
]
]
 
print ["values:" vals ]
print ["with sum:" sum vals]<lang>
 
=={{header|C}}==
1,532

edits