tx · AKNep1RR2qEMxh24VqU35qkHfHSZWKMQuA2LAuh7zJ4X

3PChRF3AsJG9YX78ED7wkXLwgCz6LuJBT1Z:  -0.01000000 Waves

2024.02.01 14:44 [4022890] smart account 3PChRF3AsJG9YX78ED7wkXLwgCz6LuJBT1Z > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AKNep1RR2qEMxh24VqU35qkHfHSZWKMQuA2LAuh7zJ4X",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1706787914560,
    "version": 2,
    "chainId": 87,
    "sender": "3PChRF3AsJG9YX78ED7wkXLwgCz6LuJBT1Z",
    "senderPublicKey": "Zqe5SqPv6kYySiE63WTvm2zCtWbEqfp7H1DwyaK8H5n",
    "proofs": [
        "516ZBfkz6NgCBXPtf9DPjeUAWABBUMNBxCcB2g8LiajLuUChzCo7ZyDSvDRaVfzVQhCAhyTo9XMxJN3xfLUC9JEh"
    ],
    "script": "base64:AAIFAAAAAAAAAAsIAhIFCgMICAgSAAAAAC0AAAAAD0RFRkFVTFRfRkFDVE9SWQIAAAAjM1BDdUhzVFU1OFdLaENxb3RiY1N3QUJ2ZFB6cXFWQWJiVHYAAAAACkRFQ0lNQUxfMTgADeC2s6dkAAAAAAAACkRFQ0lNQUxfMTAAAAAAAlQL5AAAAAAACURFQ0lNQUxfOAAAAAAABfXhAAAAAAAJREVDSU1BTF82AAAAAAAAD0JAAAAAAANTRVACAAAAAl9fAAAAAAVFTVBUWQIAAAAAAAAAAAlQUkVDSVNJT04AAAAA6NSlEAAAAAAACERFQ0lNQUxTAAAAAAAF9eEAAAAAABVNQVhfUkFURV9IRUlHSFRfREVMVEEAAAAAAAAAAAUAAAAAD09SQUNMRV9ERUNJTUFMUwAAAAAAAA9CQAEAAAAEam9pbgAAAAEAAAACYXIJAAS5AAAAAgUAAAACYXIFAAAAA1NFUAEAAAAMY2hlY2tBZGRyZXNzAAAAAQAAAAhfYWRkcmVzcwQAAAAHJG1hdGNoMAkABCYAAAABBQAAAAhfYWRkcmVzcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAHQWRkcmVzcwQAAAAHYWRkcmVzcwUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQJAAACAAAAAQIAAAAPSW52YWxpZCBhZGRyZXNzCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAQAAAAVhc0ludAAAAAEAAAADdmFsBAAAAAckbWF0Y2gwBQAAAAN2YWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAAGdmFsSW50BQAAAAckbWF0Y2gwBQAAAAZ2YWxJbnQJAAACAAAAAQIAAAAVZmFpbCB0byBjYXN0IGludG8gSW50AQAAAAhhc1N0cmluZwAAAAEAAAADdmFsBAAAAAckbWF0Y2gwBQAAAAN2YWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAGdmFsU3RyBQAAAAckbWF0Y2gwBQAAAAZ2YWxTdHIJAAACAAAAAQIAAAAYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQAAAAh0b1NjYWxlOAAAAAIAAAADdmFsAAAAA2RjbQQAAAABawkAAGkAAAACBQAAAAlERUNJTUFMXzgFAAAAA2RjbQkAAGgAAAACBQAAAAN2YWwFAAAAAWsBAAAAC3RvSW50U2NhbGU4AAAAAQAAAAN2YWwJAAGgAAAAAQkAAToAAAACBQAAAAN2YWwJAAE2AAAAAQUAAAAKREVDSU1BTF8xOAAAAAAOSWR4UG9vbEFkZHJlc3MAAAAAAAAAAAEAAAAADUlkeFBvb2xTdGF0dXMAAAAAAAAAAAIAAAAAEElkeFBvb2xMUEFzc2V0SWQAAAAAAAAAAAMAAAAADUlkeEFtdEFzc2V0SWQAAAAAAAAAAAQAAAAAD0lkeFByaWNlQXNzZXRJZAAAAAAAAAAABQAAAAAOSWR4QW10QXNzZXREY20AAAAAAAAAAAYAAAAAEElkeFByaWNlQXNzZXREY20AAAAAAAAAAAcAAAAADklkeElBbXRBc3NldElkAAAAAAAAAAAIAAAAABBJZHhJUHJpY2VBc3NldElkAAAAAAAAAAAJAAAAAA1JZHhMUEFzc2V0RGNtAAAAAAAAAAAKAAAAAAtJZHhQb29sVHlwZQAAAAAAAAAACwEAAAAOa2V5UG9vbEFkZHJlc3MAAAAACQEAAAAEam9pbgAAAAEJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAALcG9vbEFkZHJlc3MFAAAAA25pbAEAAAAVa2V5UG9vbEZhY3RvcnlBZGRyZXNzAAAAAAkBAAAABGpvaW4AAAABCQAETAAAAAICAAAAAiVzCQAETAAAAAICAAAAEnBvb2xGYWN0b3J5QWRkcmVzcwUAAAADbmlsAQAAAAlrZXlUaWNrZXIAAAAACQEAAAAEam9pbgAAAAEJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAAGdGlja2VyBQAAAANuaWwBAAAAGmtleU9yYWNsZVRpY2tlclByaWNlSGVpZ2h0AAAAAQAAAAZ0aWNrZXIJAQAAAARqb2luAAAAAQkABEwAAAACAgAAAAQlcyVzCQAETAAAAAICAAAACmxhc3RIZWlnaHQJAARMAAAAAgUAAAAGdGlja2VyBQAAAANuaWwBAAAAEGtleU9yYWNsZUFkZHJlc3MAAAAACQEAAAAEam9pbgAAAAEJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAANb3JhY2xlQWRkcmVzcwUAAAADbmlsAQAAABRrZXlPcmFjbGVUaWNrZXJQcmljZQAAAAEAAAAGdGlja2VyCQEAAAAEam9pbgAAAAEJAARMAAAAAgIAAAAEJXMlcwkABEwAAAACAgAAAAVwcmljZQkABEwAAAACBQAAAAZ0aWNrZXIFAAAAA25pbAEAAAAOZ2V0UG9vbEFkZHJlc3MAAAAACQEAAAARQGV4dHJOYXRpdmUoMTA1OCkAAAABCQEAAAAOa2V5UG9vbEFkZHJlc3MAAAAAAQAAABVnZXRQb29sRmFjdG9yeUFkZHJlc3MAAAAACQEAAAALdmFsdWVPckVsc2UAAAACCQAEIgAAAAEJAQAAABVrZXlQb29sRmFjdG9yeUFkZHJlc3MAAAAABQAAAA9ERUZBVUxUX0ZBQ1RPUlkBAAAABHBvb2wAAAAACQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAAOZ2V0UG9vbEFkZHJlc3MAAAAAAQAAAAdmYWN0b3J5AAAAAAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkBAAAAFWdldFBvb2xGYWN0b3J5QWRkcmVzcwAAAAABAAAABm9yYWNsZQAAAAAJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCIAAAABCQEAAAAQa2V5T3JhY2xlQWRkcmVzcwAAAAACAAAAEU9yYWNsZSBpcyBub3Qgc2V0AQAAAClrZXlNYXBwaW5nUG9vbENvbnRyYWN0QWRkcmVzc1RvUG9vbEFzc2V0cwAAAAEAAAATcG9vbENvbnRyYWN0QWRkcmVzcwkBAAAABGpvaW4AAAABCQAETAAAAAICAAAABiVzJXMlcwkABEwAAAACBQAAABNwb29sQ29udHJhY3RBZGRyZXNzCQAETAAAAAICAAAACG1hcHBpbmdzCQAETAAAAAICAAAAF3Bvb2xDb250cmFjdDJQb29sQXNzZXRzBQAAAANuaWwBAAAADWtleVBvb2xDb25maWcAAAACAAAAE2Ftb3VudEFzc2V0SW50ZXJuYWwAAAAScHJpY2VBc3NldEludGVybmFsCQEAAAAEam9pbgAAAAEJAARMAAAAAgIAAAAGJWQlZCVzCQAETAAAAAIFAAAAE2Ftb3VudEFzc2V0SW50ZXJuYWwJAARMAAAAAgUAAAAScHJpY2VBc3NldEludGVybmFsCQAETAAAAAICAAAABmNvbmZpZwUAAAADbmlsAQAAAA1nZXRQb29sQ29uZmlnAAAAAAQAAAALcG9vbEFkZHJlc3MJAQAAAA5nZXRQb29sQWRkcmVzcwAAAAAEAAAACnBvb2xBc3NldHMJAAS1AAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAB2ZhY3RvcnkAAAAACQEAAAApa2V5TWFwcGluZ1Bvb2xDb250cmFjdEFkZHJlc3NUb1Bvb2xBc3NldHMAAAABBQAAAAtwb29sQWRkcmVzcwUAAAADU0VQBAAAABNhbW91bnRBc3NldEludGVybmFsCQABkQAAAAIFAAAACnBvb2xBc3NldHMAAAAAAAAAAAEEAAAAEnByaWNlQXNzZXRJbnRlcm5hbAkAAZEAAAACBQAAAApwb29sQXNzZXRzAAAAAAAAAAACCQAEtQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAAAdmYWN0b3J5AAAAAAkBAAAADWtleVBvb2xDb25maWcAAAACBQAAABNhbW91bnRBc3NldEludGVybmFsBQAAABJwcmljZUFzc2V0SW50ZXJuYWwFAAAAA1NFUAEAAAAQY2hlY2tIZWlnaHREZWx0YQAAAAEAAAALcHJpY2VIZWlnaHQEAAAADm1heEhlaWdodERlbHRhBQAAABVNQVhfUkFURV9IRUlHSFRfREVMVEEEAAAAC2N1cnJlbnREaWZmCQAAZQAAAAIIBQAAAAlsYXN0QmxvY2sAAAAGaGVpZ2h0BQAAAAtwcmljZUhlaWdodAMJAABnAAAAAgUAAAAObWF4SGVpZ2h0RGVsdGEFAAAAC2N1cnJlbnREaWZmBQAAAAR1bml0CQAAAgAAAAECAAAAEkxhcmdlIHByaWNlIGRlbHRhLgEAAAATZ2V0QW10QXNzZXRVc2RQcmljZQAAAAAEAAAABnRpY2tlcgkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQkBAAAACWtleVRpY2tlcgAAAAAEAAAAC3ByaWNlSGVpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACCQEAAAAGb3JhY2xlAAAAAAkBAAAAGmtleU9yYWNsZVRpY2tlclByaWNlSGVpZ2h0AAAAAQUAAAAGdGlja2VyBAAAAAtjaGVja0hlaWdodAkBAAAAEGNoZWNrSGVpZ2h0RGVsdGEAAAABBQAAAAtwcmljZUhlaWdodAMJAAAAAAAAAgUAAAALY2hlY2tIZWlnaHQFAAAAC2NoZWNrSGVpZ2h0BAAAAAVwcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgkBAAAABm9yYWNsZQAAAAAJAQAAABRrZXlPcmFjbGVUaWNrZXJQcmljZQAAAAEFAAAABnRpY2tlcgkAAGsAAAADBQAAAAVwcmljZQUAAAAJUFJFQ0lTSU9OBQAAAA9PUkFDTEVfREVDSU1BTFMJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQAAABBnZXRBc3NldFVzZFByaWNlAAAAAAQAAAADY2ZnCQEAAAANZ2V0UG9vbENvbmZpZwAAAAAEAAAACWxwQXNzZXRJZAkAAlkAAAABCQABkQAAAAIFAAAAA2NmZwUAAAAQSWR4UG9vbExQQXNzZXRJZAQAAAAKYW10QXNzZXRJZAkAAZEAAAACBQAAAANjZmcFAAAADUlkeEFtdEFzc2V0SWQEAAAAC2FtdEFzc2V0RGNtCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAADY2ZnBQAAAA5JZHhBbXRBc3NldERjbQQAAAANcG9vbExwQmFsYW5jZQgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAAJbHBBc3NldElkAAAACHF1YW50aXR5BAAAABJhY2NBbXRBc3NldEJhbGFuY2UJAQAAAAh0b1NjYWxlOAAAAAIJAQAAAAVhc0ludAAAAAEJAAP8AAAABAkBAAAABHBvb2wAAAAAAgAAABxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZCQAETAAAAAIFAAAACmFtdEFzc2V0SWQFAAAAA25pbAUAAAADbmlsBQAAAAthbXRBc3NldERjbQQAAAAQYWNjQW10QXNzZXRQcmljZQkBAAAAE2dldEFtdEFzc2V0VXNkUHJpY2UAAAAABAAAAAVwcmljZQkAAGsAAAADBQAAABJhY2NBbXRBc3NldEJhbGFuY2UJAABoAAAAAgUAAAAQYWNjQW10QXNzZXRQcmljZQAAAAAAAAAAAgUAAAANcG9vbExwQmFsYW5jZQkABRQAAAACBQAAAANuaWwJAARMAAAAAgUAAAAFcHJpY2UFAAAAA25pbAAAAAIAAAABaQEAAAAKaW5pdGlhbGl6ZQAAAAMAAAAOX29yYWNsZUFkZHJlc3MAAAAMX3Bvb2xBZGRyZXNzAAAAB190aWNrZXIEAAAACGRvQ2hlY2tzCQAETAAAAAIJAQAAAAxjaGVja0FkZHJlc3MAAAABBQAAAA5fb3JhY2xlQWRkcmVzcwkABEwAAAACCQEAAAAMY2hlY2tBZGRyZXNzAAAAAQUAAAAMX3Bvb2xBZGRyZXNzBQAAAANuaWwDCQAAAAAAAAIFAAAACGRvQ2hlY2tzBQAAAAhkb0NoZWNrcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAQa2V5T3JhY2xlQWRkcmVzcwAAAAAFAAAADl9vcmFjbGVBZGRyZXNzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAA5rZXlQb29sQWRkcmVzcwAAAAAFAAAADF9wb29sQWRkcmVzcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAJa2V5VGlja2VyAAAAAAUAAAAHX3RpY2tlcgUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAABJnZXRDdXJyZW50VXNkUHJpY2UAAAAACQAFFAAAAAIFAAAAA25pbAkBAAAAEGdldEFzc2V0VXNkUHJpY2UAAAAAAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXlKtKm4",
    "height": 4022890,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DSGzkF7sUbJZuFySy36kYaXajodAadhsBPdecv2qraqe
Next: 8E9dR9KPwYewWocqrZc1nxfzkU3M7RBw4UsoSq61PiiF

Diff: 
Old
New
Differences
157
157
 
    let cfg = getPoolConfig()
158
158
 
    let lpAssetId = fromBase58String(cfg[IdxPoolLPAssetId])
159
159
 
    let amtAssetId = cfg[IdxAmtAssetId]
160
-
    let priceAssetId = cfg[IdxPriceAssetId]
161
160
 
    let amtAssetDcm = parseIntValue(cfg[IdxAmtAssetDcm])
162
-
    let priceAssetDcm = parseIntValue(cfg[IdxPriceAssetDcm])
163
161
 
    let poolLpBalance = value(assetInfo(lpAssetId)).quantity
164
162
 
    let accAmtAssetBalance = toScale8(asInt(invoke(pool(), "getAccBalanceWrapperREADONLY", [amtAssetId], nil)), amtAssetDcm)
165
-
    let accPriceAssetBalance = toScale8(asInt(invoke(pool(), "getAccBalanceWrapperREADONLY", [priceAssetId], nil)), priceAssetDcm)
166
-
    let price = if ((poolLpBalance == 0))
167
-
        then 0
168
-
        else parseBigIntValue({
169
-
            let @ = ({
170
-
                let @ = invoke(pool(), "calcPricesWrapperREADONLY", [accAmtAssetBalance, accPriceAssetBalance, poolLpBalance], nil)
171
-
                if ($isInstanceOf(@, "List[Any]"))
172
-
                    then @
173
-
                    else throw("Couldn't cast Any to List[Any]")
174
-
                })[0]
175
-
            if ($isInstanceOf(@, "String"))
176
-
                then @
177
-
                else throw("Couldn't cast Any to String")
178
-
            })
179
-
    $Tuple2(nil, [poolLpBalance, accAmtAssetBalance, accPriceAssetBalance, price])
163
+
    let accAmtAssetPrice = getAmtAssetUsdPrice()
164
+
    let price = fraction(accAmtAssetBalance, (accAmtAssetPrice * 2), poolLpBalance)
165
+
    $Tuple2(nil, [price])
180
166
 
    }
181
167
 
182
168
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let DEFAULT_FACTORY = "3PCuHsTU58WKhCqotbcSwABvdPzqqVAbbTv"
5
5
 
6
6
 
let DECIMAL_18 = 1000000000000000000
7
7
 
8
8
 
let DECIMAL_10 = 10000000000
9
9
 
10
10
 
let DECIMAL_8 = 100000000
11
11
 
12
12
 
let DECIMAL_6 = 1000000
13
13
 
14
14
 
let SEP = "__"
15
15
 
16
16
 
let EMPTY = ""
17
17
 
18
18
 
let PRECISION = 1000000000000
19
19
 
20
20
 
let DECIMALS = 100000000
21
21
 
22
22
 
let MAX_RATE_HEIGHT_DELTA = 5
23
23
 
24
24
 
let ORACLE_DECIMALS = 1000000
25
25
 
26
26
 
func join (ar) = makeString(ar, SEP)
27
27
 
28
28
 
29
29
 
func checkAddress (_address) = match addressFromString(_address) {
30
30
 
    case address: Address => 
31
31
 
        true
32
32
 
    case _: Unit => 
33
33
 
        throw("Invalid address")
34
34
 
    case _ => 
35
35
 
        throw("Match error")
36
36
 
}
37
37
 
38
38
 
39
39
 
func asInt (val) = match val {
40
40
 
    case valInt: Int => 
41
41
 
        valInt
42
42
 
    case _ => 
43
43
 
        throw("fail to cast into Int")
44
44
 
}
45
45
 
46
46
 
47
47
 
func asString (val) = match val {
48
48
 
    case valStr: String => 
49
49
 
        valStr
50
50
 
    case _ => 
51
51
 
        throw("fail to cast into String")
52
52
 
}
53
53
 
54
54
 
55
55
 
func toScale8 (val,dcm) = {
56
56
 
    let k = (DECIMAL_8 / dcm)
57
57
 
    (val * k)
58
58
 
    }
59
59
 
60
60
 
61
61
 
func toIntScale8 (val) = toInt((val / toBigInt(DECIMAL_18)))
62
62
 
63
63
 
64
64
 
let IdxPoolAddress = 1
65
65
 
66
66
 
let IdxPoolStatus = 2
67
67
 
68
68
 
let IdxPoolLPAssetId = 3
69
69
 
70
70
 
let IdxAmtAssetId = 4
71
71
 
72
72
 
let IdxPriceAssetId = 5
73
73
 
74
74
 
let IdxAmtAssetDcm = 6
75
75
 
76
76
 
let IdxPriceAssetDcm = 7
77
77
 
78
78
 
let IdxIAmtAssetId = 8
79
79
 
80
80
 
let IdxIPriceAssetId = 9
81
81
 
82
82
 
let IdxLPAssetDcm = 10
83
83
 
84
84
 
let IdxPoolType = 11
85
85
 
86
86
 
func keyPoolAddress () = join(["%s", "poolAddress"])
87
87
 
88
88
 
89
89
 
func keyPoolFactoryAddress () = join(["%s", "poolFactoryAddress"])
90
90
 
91
91
 
92
92
 
func keyTicker () = join(["%s", "ticker"])
93
93
 
94
94
 
95
95
 
func keyOracleTickerPriceHeight (ticker) = join(["%s%s", "lastHeight", ticker])
96
96
 
97
97
 
98
98
 
func keyOracleAddress () = join(["%s", "oracleAddress"])
99
99
 
100
100
 
101
101
 
func keyOracleTickerPrice (ticker) = join(["%s%s", "price", ticker])
102
102
 
103
103
 
104
104
 
func getPoolAddress () = getStringValue(keyPoolAddress())
105
105
 
106
106
 
107
107
 
func getPoolFactoryAddress () = valueOrElse(getString(keyPoolFactoryAddress()), DEFAULT_FACTORY)
108
108
 
109
109
 
110
110
 
func pool () = addressFromStringValue(getPoolAddress())
111
111
 
112
112
 
113
113
 
func factory () = addressFromStringValue(getPoolFactoryAddress())
114
114
 
115
115
 
116
116
 
func oracle () = addressFromStringValue(valueOrErrorMessage(getString(keyOracleAddress()), "Oracle is not set"))
117
117
 
118
118
 
119
119
 
func keyMappingPoolContractAddressToPoolAssets (poolContractAddress) = join(["%s%s%s", poolContractAddress, "mappings", "poolContract2PoolAssets"])
120
120
 
121
121
 
122
122
 
func keyPoolConfig (amountAssetInternal,priceAssetInternal) = join(["%d%d%s", amountAssetInternal, priceAssetInternal, "config"])
123
123
 
124
124
 
125
125
 
func getPoolConfig () = {
126
126
 
    let poolAddress = getPoolAddress()
127
127
 
    let poolAssets = split(getStringValue(factory(), keyMappingPoolContractAddressToPoolAssets(poolAddress)), SEP)
128
128
 
    let amountAssetInternal = poolAssets[1]
129
129
 
    let priceAssetInternal = poolAssets[2]
130
130
 
    split(getStringValue(factory(), keyPoolConfig(amountAssetInternal, priceAssetInternal)), SEP)
131
131
 
    }
132
132
 
133
133
 
134
134
 
func checkHeightDelta (priceHeight) = {
135
135
 
    let maxHeightDelta = MAX_RATE_HEIGHT_DELTA
136
136
 
    let currentDiff = (lastBlock.height - priceHeight)
137
137
 
    if ((maxHeightDelta >= currentDiff))
138
138
 
        then unit
139
139
 
        else throw("Large price delta.")
140
140
 
    }
141
141
 
142
142
 
143
143
 
func getAmtAssetUsdPrice () = {
144
144
 
    let ticker = getStringValue(keyTicker())
145
145
 
    let priceHeight = getIntegerValue(oracle(), keyOracleTickerPriceHeight(ticker))
146
146
 
    let checkHeight = checkHeightDelta(priceHeight)
147
147
 
    if ((checkHeight == checkHeight))
148
148
 
        then {
149
149
 
            let price = getIntegerValue(oracle(), keyOracleTickerPrice(ticker))
150
150
 
            fraction(price, PRECISION, ORACLE_DECIMALS)
151
151
 
            }
152
152
 
        else throw("Strict value is not equal to itself.")
153
153
 
    }
154
154
 
155
155
 
156
156
 
func getAssetUsdPrice () = {
157
157
 
    let cfg = getPoolConfig()
158
158
 
    let lpAssetId = fromBase58String(cfg[IdxPoolLPAssetId])
159
159
 
    let amtAssetId = cfg[IdxAmtAssetId]
160
-
    let priceAssetId = cfg[IdxPriceAssetId]
161
160
 
    let amtAssetDcm = parseIntValue(cfg[IdxAmtAssetDcm])
162
-
    let priceAssetDcm = parseIntValue(cfg[IdxPriceAssetDcm])
163
161
 
    let poolLpBalance = value(assetInfo(lpAssetId)).quantity
164
162
 
    let accAmtAssetBalance = toScale8(asInt(invoke(pool(), "getAccBalanceWrapperREADONLY", [amtAssetId], nil)), amtAssetDcm)
165
-
    let accPriceAssetBalance = toScale8(asInt(invoke(pool(), "getAccBalanceWrapperREADONLY", [priceAssetId], nil)), priceAssetDcm)
166
-
    let price = if ((poolLpBalance == 0))
167
-
        then 0
168
-
        else parseBigIntValue({
169
-
            let @ = ({
170
-
                let @ = invoke(pool(), "calcPricesWrapperREADONLY", [accAmtAssetBalance, accPriceAssetBalance, poolLpBalance], nil)
171
-
                if ($isInstanceOf(@, "List[Any]"))
172
-
                    then @
173
-
                    else throw("Couldn't cast Any to List[Any]")
174
-
                })[0]
175
-
            if ($isInstanceOf(@, "String"))
176
-
                then @
177
-
                else throw("Couldn't cast Any to String")
178
-
            })
179
-
    $Tuple2(nil, [poolLpBalance, accAmtAssetBalance, accPriceAssetBalance, price])
163
+
    let accAmtAssetPrice = getAmtAssetUsdPrice()
164
+
    let price = fraction(accAmtAssetBalance, (accAmtAssetPrice * 2), poolLpBalance)
165
+
    $Tuple2(nil, [price])
180
166
 
    }
181
167
 
182
168
 
183
169
 
@Callable(i)
184
170
 
func initialize (_oracleAddress,_poolAddress,_ticker) = {
185
171
 
    let doChecks = [checkAddress(_oracleAddress), checkAddress(_poolAddress)]
186
172
 
    if ((doChecks == doChecks))
187
173
 
        then [StringEntry(keyOracleAddress(), _oracleAddress), StringEntry(keyPoolAddress(), _poolAddress), StringEntry(keyTicker(), _ticker)]
188
174
 
        else throw("Strict value is not equal to itself.")
189
175
 
    }
190
176
 
191
177
 
192
178
 
193
179
 
@Callable(i)
194
180
 
func getCurrentUsdPrice () = $Tuple2(nil, getAssetUsdPrice())
195
181
 
196
182
 
197
183
 
@Verifier(tx)
198
184
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
199
185
 

github/deemru/w8io/6500d08 
33.57 ms ◑