Seven-sided dice from five-sided dice: Difference between revisions

m
(add RPL)
Line 2,110:
≪ '''WHILE'''
dice5 EVAL 5 *
dice5 EVAL 16 - +
DUP 21 ≥
'''REPEAT''' DROP '''END'''
Line 2,119:
{{out}}
<pre>
1: [ -1252114557 -1263814245 -1237214255 -1239014400 -1274914224 -1885014151 -1875014168 ]
</pre>
Watchdog timer limits the loop to 100,000 items.
 
=={{header|Ruby}}==
{{trans|Tcl}}
1,150

edits