7 lines
139 B
Smalltalk
7 lines
139 B
Smalltalk
|
accessing
|
||
|
|
roll
|
||
|
|
| diceRoll |
|
||
|
|
diceRoll := 100 atRandom.
|
||
|
|
self options keysAndValuesDo: [:k :v |
|
||
|
|
(k includes: diceRoll) ifTrue: [ ^ v ]
|
||
|
|
]
|