Fix up after pit/vase change.
::
=, clay
::
+=/ test-pit=vase !>(.)
+=/ ford-gate (ford-turbo test-pit)
+::
|%
++ move (pair bone card)
++ card
==
--
::
-|_ {bol/bowl:gall turbo/_(ford-turbo)}
+|_ {bol/bowl:gall turbo/_(ford-gate)}
:: +prep: clear the state on each reload
::
++ prep _`.
:: arvo. Change them so they're in gall format.
::
++ convert-moves
- |= vane-moves=(list move:ford-turbo)
+ |= vane-moves=(list move:ford-gate)
^- [(list move) _+>.$]
::
=/ gall-moves=(list move)
%+ murn vane-moves
- |= [=duct card=(wind note:ford-turbo gift:able:ford-api:ford-turbo)]
+ |= [=duct card=(wind note:ford-gate gift:able:ford-api:ford-gate)]
^- (unit move)
::
?+ -.card !!
~& [%scrying-for term beam]
~
--
-
