/
arkadiko-ui-stake-v1-4.clar
31 lines (28 loc) · 1.2 KB
/
arkadiko-ui-stake-v1-4.clar
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
(define-public (get-stake-amounts (user principal))
(let (
(stake-amount-diko-usda (contract-call? .arkadiko-stake-pool-diko-usda-v1-1 get-stake-amount-of user))
(stake-amount-wstx-usda (contract-call? .arkadiko-stake-pool-wstx-usda-v1-1 get-stake-amount-of user))
(stake-amount-wstx-diko (contract-call? .arkadiko-stake-pool-wstx-diko-v1-1 get-stake-amount-of user))
)
(ok {
stake-amount-diko-usda: stake-amount-diko-usda,
stake-amount-wstx-usda: stake-amount-wstx-usda,
stake-amount-wstx-diko: stake-amount-wstx-diko,
})
)
)
(define-public (get-stake-totals)
(let (
(stake-total-diko (contract-call? .arkadiko-stake-pool-diko-v1-4 get-total-staked))
(stake-total-diko-usda (contract-call? .arkadiko-stake-pool-diko-usda-v1-1 get-total-staked))
(stake-total-wstx-usda (contract-call? .arkadiko-stake-pool-wstx-usda-v1-1 get-total-staked))
(stake-total-wstx-diko (contract-call? .arkadiko-stake-pool-wstx-diko-v1-1 get-total-staked))
)
(ok {
stake-total-diko: stake-total-diko,
stake-total-diko-usda: stake-total-diko-usda,
stake-total-wstx-usda: stake-total-wstx-usda,
stake-total-wstx-diko: stake-total-wstx-diko,
})
)
)