2021-12-07 18:13:39 +03:00
|
|
|
:: Creates a snapshot of the azimuth state and its indices
|
|
|
|
|
:: (owners and sposnors) from scrying /app/azimuth
|
|
|
|
|
::
|
2021-12-03 18:11:15 +03:00
|
|
|
::
|
|
|
|
|
/- spider, *dice
|
|
|
|
|
/+ strand, strandio, naive, ethereum, dice
|
|
|
|
|
=, strand=strand:spider
|
|
|
|
|
=, jael
|
|
|
|
|
::
|
|
|
|
|
=> |% +$ card card:agent:gall
|
|
|
|
|
+$ task task:clay
|
|
|
|
|
+$ events (list event-log:rpc:ethereum)
|
|
|
|
|
--
|
|
|
|
|
::
|
|
|
|
|
^- thread:spider
|
|
|
|
|
|= arg=vase
|
|
|
|
|
=/ m (strand ,vase)
|
|
|
|
|
^- form:m
|
|
|
|
|
=+ !<([~ =net name=@t] arg)
|
|
|
|
|
::
|
|
|
|
|
;< nas=^state:naive bind:m (scry:strandio ^state:naive /gx/azimuth/nas/noun)
|
|
|
|
|
;< =owners bind:m (scry:strandio owners /gx/azimuth/own/noun)
|
|
|
|
|
;< =sponsors bind:m (scry:strandio sponsors /gx/azimuth/spo/noun)
|
|
|
|
|
;< =events bind:m (scry:strandio events /gx/azimuth/logs/noun)
|
|
|
|
|
=/ =id:block (last-block-id:dice events)
|
|
|
|
|
::
|
|
|
|
|
%- %- slog
|
|
|
|
|
:~ leaf+"points: {<~(wyt by points.nas)>}"
|
|
|
|
|
leaf+"sponsors: {<~(wyt by sponsors)>}"
|
|
|
|
|
leaf+"owners: {<~(wyt by owners)>}"
|
|
|
|
|
==
|
|
|
|
|
::
|
2021-12-07 18:13:39 +03:00
|
|
|
=/ =path /app/azimuth/[name]/azimuth
|
|
|
|
|
=/ =cage azimuth+!>([%0 id nas owners sponsors])
|
2021-12-03 18:11:15 +03:00
|
|
|
=/ =task [%info %base %& [path %ins cage]~]
|
|
|
|
|
=/ =card [%pass /next %arvo %c task]
|
|
|
|
|
;< ~ bind:m (send-raw-card:strandio card)
|
2021-12-07 18:13:39 +03:00
|
|
|
(pure:m !>('azimuth state saved'))
|
