changed to :bit+send 0cADDRESS 'BTC-amount'

This commit is contained in:
Anton Dyudin 2015-05-20 12:17:52 -07:00
parent 31527132c6
commit 1515de98c3
2 changed files with 10 additions and 2 deletions

View File

@ -83,7 +83,15 @@ $: client-id=(unit ,@t) app-secret=(unit ,@t)
^- move
[ost %send way [his app.hid] %poke mez]
::
++ poke-bit-send :: send to ship
++ poke-bit-send :: send to address
|= [[ost=bone @] addr=@uc amount=@t]
:_ +>.$
:_ ~
=+ info=[to/s/(rsh 3 2 (scot %uc addr)) amount/s/amount ~]
=+ jon=(joba %transaction (jobe info))
(api-call ost /send /transactions/'send_money' %post jon)
::
++ poke-bit-ship-send :: send to ship
|= [[ost=bone @] to=ship amount=@t]
=. outgoing.vat (~(put by outgoing.vat) to amount)
:_ +>.$

View File

@ -5,7 +5,7 @@
::
:::::::
!:
|= [^ [to=ship amo=@t ~] ~]
|= [^ [to=@uc amo=@t ~] ~]
[%bit-send to amo]