mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-15 18:12:47 +03:00
13 lines
375 B
Plaintext
13 lines
375 B
Plaintext
|
::
|
||
|
|
:::: /hoon/shop/womb/gen
|
||
|
|
::
|
||
|
|
/? 310
|
||
|
|
:- %say
|
||
|
|
|= $: {now/@da eny/@uvI bec/beak}
|
||
|
|
arg/$@($~ {typ/?($stars $planets $galaxies) $~})
|
||
|
|
who/(unit @p)
|
||
|
|
==
|
||
|
|
?~ arg $(arg ~[typ=%planets])
|
||
|
|
=- [%ships .^((list ship) %gx /[him]/hood/[cas]/womb/shop/[typ.arg]/[nth])]
|
||
|
|
[him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now) nth=(scot %ud %.(10 ~(rad og eny)))]
|