1
0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-30 02:12:22 +03:00
urbit/gen/womb/shop.hoon

13 lines
381 B
Plaintext
Raw Normal View History

2016-04-30 00:40:44 +03:00
::
:::: /hoon/shop/womb/gen
::
/? 310
:- %say
2016-08-12 10:18:04 +03:00
|= $: {now/@da eny/@uvJ bec/beak}
2016-04-30 00:40:44 +03:00
arg/$@($~ {typ/?($stars $planets $galaxies) $~})
who/(unit @p)
==
?~ arg $(arg ~[typ=%planets])
2016-07-07 00:48:45 +03:00
=- [%ships .^((list ship) %gx /[him]/hood/[cas]/womb/shop/[typ.arg]/[nth]/ships)]
2016-04-30 00:40:44 +03:00
[him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now) nth=(scot %ud %.(10 ~(rad og eny)))]