update-randomness ( game -- game )


Vocabulary
hamurabi.private

Inputs
gamean object


Outputs
gamean object


Definition
USING: accessors math random ranges ;

IN: hamurabi.private

: update-randomness ( game -- game )
17 26 [a..b] random >>cost 5 [1..b] random >>yield
5 [1..b] random >>birth-factor 5 [1..b] random >>rat-factor
100 random 15 < >>plague ;