shrub/gen/hood/bonus.hoon
rmariani 579efd9972
Remove old-zuse (#867)
* removes old-zuse
2018-10-26 16:19:18 -07:00

17 lines
329 B
Plaintext

:: Womb: add planets/stars to balance
::
:::: /hoon/bonus/hood/gen
::
/? 310
::
::::
::
:- %say
|= $: {now/@da eny/@uvJ bec/beak}
{{pas/@uvG opt/$@(~ {planets/@u $@(~ {stars/@u ~})})} ~}
==
?~ opt $(opt [planets=1]~)
?~ +.opt $(+.opt [stars=0]~)
:- %womb-bonus
[(scot %uv pas) planets.opt stars.opt]