blob: 1392380ce3bd8bd87418fddf03ac1883b61094be (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
/- sur=nostril
|%
++ gen-keys |= eny=@ ^- keys:sur
=, secp256k1:secp:crypto
=/ privkey
|-
=/ k (~(rad og eny) (bex 256))
?. (lth k n.t) $ k
=/ pubkey (priv-to-pub privkey)
~& priv=privkey
~& pub=pubkey
=/ pub (compress-point pubkey)
:: =/ pub (serialize-point pubkey)
~& pub-hex=((x-co:co 0) pub)
[pub=pub priv=privkey]
::
++ cards
|_ =bowl:gall
++ shim-binding ^- card:agent:gall
[%pass /binding %arvo %e %connect [~ /nostr-shim] dap.bowl]
--
--
|
