2023.05.15 12:18 [3644324] smart account 3P8d1E1BLKoD52y3bQJ1bDTd2TD1gpaLn9t > SELF 0.00000000 Waves

{ "type": 13, "id": "EfmxsJQTPSVwT3ZTHzQt2vKZrNHzNJsfozMLzS9MSwd5", "fee": 1000000, "feeAssetId": null, "timestamp": 1684142321758, "version": 2, "chainId": 87, "sender": "3P8d1E1BLKoD52y3bQJ1bDTd2TD1gpaLn9t", "senderPublicKey": "CjoWXzfYENobZJVQkEkfkmYHRP3vU7ZLpxCqJ6vD7bTC", "proofs": [ "4cUe1ewHHFZRNc4ZAUxwtALrkCn6j1CdB4EdDCiDRNgQgdiXmfV1Pch4SAiS1vezb6Hxxaf7J5qexRVmMbrTicqE" ], "script": "base64:BgIHCAISAwoBCBQABXh0bklkASC2JinDBPXOU5GkDkt1JC9kjFGx+t+vVCm9SNIdKrKq0QAIeHRuSWRTdHICLERHMnhGa1BkRHdLVW9Ca3pHQWhRdExwU0d6ZlhMaUNZUEV6ZUtIMkFkMjRwAAh0b2tlbklkcwkAzAgCAiwzNE45WWNFRVRMV245M3FZUTY0RXNQMXg4OXRTcnVKVTQ0UnJFTVNYWEVQSgkAzAgCAiw2WHRIanBYYnM5UlJKUDJTcjlHVXlWcXpBQ2NieTlUa1RoSFhualZDNUNESgkAzAgCAixIRUI4UWF3OXhyV3BXczh0SHNpQVRZR0JXREJ0UDJTN2tjUEFMck11NDNBUwkAzAgCAixBanNvNm5UVGpwdHUyVUhMeDZoZlNYVnRIRnRSQkpDa0tZZDVTQXlqN3pmNQkAzAgCAixEU2JiaExzU1RlRGc1THNpdWZrMkFuZWgzRGpWcUp1UHIyTTl1VTFnd3k1cAUDbmlsABB0b2tlbklzQmFzZUFzc2V0CQDMCAIGCQDMCAIGCQDMCAIHCQDMCAIHCQDMCAIHBQNuaWwADXRva2VuRGVjaW1hbHMJAMwIAgDAhD0JAMwIAgDAhD0JAMwIAgCAwtcvCQDMCAIAgMLXLwkAzAgCAIDC1y8FA25pbAAPdG9rZW5XWFdhdmVzTFBzCQDMCAICLEJ5SnRWdVlpNThDdGRqdGFzRHVUcXRnZXY4cVdrZEp5YkY3clkxeG9zbWhFCQDMCAICLEJvWHVmOWV3SlNFMVVNcktpYlptaWd6QzZ0Qnp2OFJGVGVabW9mRW9zMlpKCQDMCAICLDdHNjg3dWkzbTU5b0FkNnFreW5pMnZ0NzdiSEY0YmJBNnhjUGZEbzN1aVR1CQDMCAICLEVNc1pwcWNUOE51TVlaQ0VQSHp2cmhRQ1FLaGZYamRlZWtadmNXcEhzTnZoCQDMCAICLEUzWWhVUk5zQ21qVWFZTmlnSDZBYXlMeGJoOXU4MXVWR1UzWnZIS3puWTV2BQNuaWwAD3Rva2VuV1hYVE5Qb29scwkAzAgCAgAJAMwIAgIACQDMCAICIzNQNjE1eVhlUTlRdTRxQk0xUUdpbUd6aXh5TVM1VzRLdHVnCQDMCAICIzNQRWtENUx1SEdXaFVmZ0JXMW93WkZ4VnlkWW9XalY2SmlhCQDMCAICIzNQNUhqUG93Z2lwaVZCM1V2WHBoRGlQdktzNDI0V0M5eFF3BQNuaWwADnRva2VuU3dvcFBvb2xzCQDMCAICAAkAzAgCAgAJAMwIAgIjM1BCSHlFd21FUlIxQ0VrclROYlBqMmJneWlzVGZQUnFmZWUJAMwIAgIjM1BEU1h3d0EyeEF0bXhlbzJiZWJEUDNBQTV5bloyS3JnbncJAMwIAgIjM1BKNDhQM3Ayd3ZXVWpnUWFRaVoyY0ZicjhxbXhNb2tCR2QFA25pbAARd3hfcmVzdEFkZHJlc3NTdHICIzNQOE1vUG5zYXVyb2ZrMVZ5aHNkQUZrZVE2aWpwSllYQ3BXAAt3eF9yZXN0RGFwcAkBEUBleHRyTmF0aXZlKDEwNjIpAQURd3hfcmVzdEFkZHJlc3NTdHIADHN3b3BSZXN0RGFwcAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1A1NmpOUXpFQ1hucldwbmJiU0pLdzdFb29vNmZrVWFNUHAAC3JldmlzaW9uTnVtAgAAA1NFUAICX18BCGFzU3RyaW5nAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFpBQckbWF0Y2gwBQFpCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAA5kb3JhQWRkcmVzc1N0cgIjM1BLa29qS2RkNkJCelRmMVJYYlFWZlVEcmFORlhYSEt6UUYAC2RvcmFBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBQ5kb3JhQWRkcmVzc1N0cgANeHRuVXNkUHJpY2VYNgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFC2RvcmFBZGRyZXNzAhYlcyVzX19wcmljZV9fVVNETi1VU0RUAiRET1JBIGRvZXNuJ3QgY29udGFpbiBVU0ROL1VTRFQgcHJpY2UBDWdldFRva2VuUHJpY2UCCHRva2VuTnVtD3dhdmVzVXNkUHJpY2VYNgQKdG9rZW5JZFN0cgkAkQMCBQh0b2tlbklkcwUIdG9rZW5OdW0EB3Rva2VuSWQJANkEAQUKdG9rZW5JZFN0cgQQd3hfVmlyZXNXYXZlc19scAkAkQMCBQ90b2tlbldYV2F2ZXNMUHMFCHRva2VuTnVtBAx3eFJlc3RSZXN1bHQJALUJAgkBCGFzU3RyaW5nAQkA/AcEBQt3eF9yZXN0RGFwcAIRcG9vbFN0YXRzUkVBRE9OTFkJAMwIAgUQd3hfVmlyZXNXYXZlc19scAUDbmlsBQNuaWwCAl9fBAskdDAyNDA4MjUwMAMJAJEDAgUQdG9rZW5Jc0Jhc2VBc3NldAUIdG9rZW5OdW0JAJQKAgABAAIJAJQKAgACAAEEDndhdmVzSW5QYWlyTnVtCAULJHQwMjQwODI1MDACXzEEDnRva2VuSW5QYWlyTnVtCAULJHQwMjQwODI1MDACXzIEFXd4X1ZpcmVzV2F2ZXNfV0FWRVN4OAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDHd4UmVzdFJlc3VsdAUOd2F2ZXNJblBhaXJOdW0EFXd4X1ZpcmVzV2F2ZXNfVklSRVN4OAkAawMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQx3eFJlc3RSZXN1bHQFDnRva2VuSW5QYWlyTnVtAIDC1y8JAJEDAgUNdG9rZW5EZWNpbWFscwUIdG9rZW5OdW0EHXd4X1ZpcmVzV2F2ZXNfVmlyZXNVc2RQcmljZVg2CQBrAwUVd3hfVmlyZXNXYXZlc19XQVZFU3g4BQ93YXZlc1VzZFByaWNlWDYFFXd4X1ZpcmVzV2F2ZXNfVklSRVN4OAQUd3hfVmlyZXNXYXZlc19XZWlnaHQFFXd4X1ZpcmVzV2F2ZXNfVklSRVN4OAQWd3hfVmlyZXNYdG5fQWRkcmVzc1N0cgkAkQMCBQ90b2tlbldYWFROUG9vbHMFCHRva2VuTnVtBAskdDAyOTIxMzM4NgMJAAACBRZ3eF9WaXJlc1h0bl9BZGRyZXNzU3RyAgAJAJQKAgAAAAAEE3d4X1ZpcmVzWHRuX0FkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFFnd4X1ZpcmVzWHRuX0FkZHJlc3NTdHIEEXd4X1ZpcmVzWHRuX1hUTng2CQDwBwIFE3d4X1ZpcmVzWHRuX0FkZHJlc3MFBXh0bklkBBN3eF9WaXJlc1h0bl9WSVJFU3g4CQDwBwIFE3d4X1ZpcmVzWHRuX0FkZHJlc3MFB3Rva2VuSWQJAJQKAgkAawMJAGgCBRF3eF9WaXJlc1h0bl9YVE54NgkAaQIJAJEDAgUNdG9rZW5EZWNpbWFscwUIdG9rZW5OdW0AwIQ9BQ14dG5Vc2RQcmljZVg2BRN3eF9WaXJlc1h0bl9WSVJFU3g4BRN3eF9WaXJlc1h0bl9WSVJFU3g4BBt3eF9WaXJlc1h0bl9WaXJlc1VzZFByaWNlWDYIBQskdDAyOTIxMzM4NgJfMQQSd3hfVmlyZXNYdG5fV2VpZ2h0CAULJHQwMjkyMTMzODYCXzIEGHN3b3BfVmlyZXNYdG5fQWRkcmVzc1N0cgkAkQMCBQ50b2tlblN3b3BQb29scwUIdG9rZW5OdW0ECyR0MDM0NDg0MTA0AwkAAAIFGHN3b3BfVmlyZXNYdG5fQWRkcmVzc1N0cgIACQCUCgIAAAAABBVzd29wX1ZpcmVzWHRuX0FkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFGHN3b3BfVmlyZXNYdG5fQWRkcmVzc1N0cgQdc3dvcF9WaXJlc1h0bl9WaXJlc1h0blByaWNlWDYJAQVhc0ludAEJAPwHBAUMc3dvcFJlc3REYXBwAhFjYWxjR2V0QW1vdW50Q1BNTQkAzAgCBRhzd29wX1ZpcmVzWHRuX0FkZHJlc3NTdHIJAMwIAgIjM1A4OHFrMUt6RjFCS2pEN2ZDN0xqTlZBS000ZXpmZjVXRTYJAMwIAgUKdG9rZW5JZFN0cgkAzAgCCQCRAwIFDXRva2VuRGVjaW1hbHMFCHRva2VuTnVtBQNuaWwFA25pbAQdc3dvcF9WaXJlc1h0bl9WaXJlc1VzZFByaWNlWDYJAGsDBR1zd29wX1ZpcmVzWHRuX1ZpcmVzWHRuUHJpY2VYNgUNeHRuVXNkUHJpY2VYNgDAhD0EFHN3b3BfVmlyZXNYdG5fV2VpZ2h0CQERQGV4dHJOYXRpdmUoMTA1MCkCBRVzd29wX1ZpcmVzWHRuX0FkZHJlc3MCD0FfYXNzZXRfYmFsYW5jZQkAlAoCBR1zd29wX1ZpcmVzWHRuX1ZpcmVzVXNkUHJpY2VYNgUUc3dvcF9WaXJlc1h0bl9XZWlnaHQEHXN3b3BfVmlyZXNYdG5fVmlyZXNVc2RQcmljZVg2CAULJHQwMzQ0ODQxMDQCXzEEFHN3b3BfVmlyZXNYdG5fV2VpZ2h0CAULJHQwMzQ0ODQxMDQCXzIEAVcJAGQCCQBkAgUUd3hfVmlyZXNXYXZlc19XZWlnaHQFEnd4X1ZpcmVzWHRuX1dlaWdodAUUc3dvcF9WaXJlc1h0bl9XZWlnaHQED3ZpcmVzVXNkUHJpY2VYNgkAZAIJAGQCCQBrAwUdd3hfVmlyZXNXYXZlc19WaXJlc1VzZFByaWNlWDYFFHd4X1ZpcmVzV2F2ZXNfV2VpZ2h0BQFXCQBrAwUbd3hfVmlyZXNYdG5fVmlyZXNVc2RQcmljZVg2BRJ3eF9WaXJlc1h0bl9XZWlnaHQFAVcJAGsDBR1zd29wX1ZpcmVzWHRuX1ZpcmVzVXNkUHJpY2VYNgUUc3dvcF9WaXJlc1h0bl9XZWlnaHQFAVcEBWRlYnVnCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICEHZpcmVzVXNkUHJpY2VYNj0JAKQDAQUPdmlyZXNVc2RQcmljZVg2Ah8gd3hfVmlyZXNXYXZlc19WaXJlc1VzZFByaWNlWDY9CQCkAwEFHXd4X1ZpcmVzV2F2ZXNfVmlyZXNVc2RQcmljZVg2Ah0gd3hfVmlyZXNYdG5fVmlyZXNVc2RQcmljZVg2PQkApAMBBRt3eF9WaXJlc1h0bl9WaXJlc1VzZFByaWNlWDYCHyBzd29wX1ZpcmVzWHRuX1ZpcmVzVXNkUHJpY2VYNj0JAKQDAQUdc3dvcF9WaXJlc1h0bl9WaXJlc1VzZFByaWNlWDYJAJQKAgUPdmlyZXNVc2RQcmljZVg2BQVkZWJ1ZwEBaQEQdXBkYXRlVG9rZW5QcmljZQEKYXNzZXRJZFN0cgQKd2F2ZXNQcmljZQkBEUBleHRyTmF0aXZlKDEwNTApAgULZG9yYUFkZHJlc3MCFyVzJXNfX3ByaWNlX19XQVZFUy1VU0RUBAp0b2tlblByaWNlAwkAAAIFCmFzc2V0SWRTdHICBVdBVkVTBQp3YXZlc1ByaWNlAwkAAAIFCmFzc2V0SWRTdHIFCHh0bklkU3RyBQ14dG5Vc2RQcmljZVg2CAkBDWdldFRva2VuUHJpY2UCCQEFdmFsdWUBCQDPCAIFCHRva2VuSWRzBQphc3NldElkU3RyBQp3YXZlc1ByaWNlAl8xBAhsYXN0VHdhcAkBDXRyeUdldEludGVnZXIBCQCsAgIFCmFzc2V0SWRTdHICB190d2FwNUIECmxhc3RIZWlnaHQJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphc3NldElkU3RyAgpfbGFzdEJsb2NrBAl0b3RhbERhdGEJAQ10cnlHZXRJbnRlZ2VyAQkArAICBQphc3NldElkU3RyAgpfdG90YWxEYXRhAwMJAAACBQpsYXN0SGVpZ2h0AAAGCQBmAgkAZQIFBmhlaWdodAUKbGFzdEhlaWdodAAeCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFzc2V0SWRTdHICB190d2FwNUIFCnRva2VuUHJpY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYXNzZXRJZFN0cgIKX2xhc3RCbG9jawUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFzc2V0SWRTdHICCl90b3RhbERhdGEAAQUDbmlsAwkAZgIABQUJdG90YWxEYXRhCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFzc2V0SWRTdHICB190d2FwNUIJAGkCCQBkAgkAaAIFCGxhc3RUd2FwBQl0b3RhbERhdGEFCnRva2VuUHJpY2UJAGQCBQl0b3RhbERhdGEAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphc3NldElkU3RyAgpfbGFzdEJsb2NrBQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYXNzZXRJZFN0cgIKX3RvdGFsRGF0YQkAZAIFCXRvdGFsRGF0YQABBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYXNzZXRJZFN0cgIHX3R3YXA1QgkAaQIJAGQCCQBoAgUIbGFzdFR3YXAABQUKdG9rZW5QcmljZQAFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFzc2V0SWRTdHICCl9sYXN0QmxvY2sFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphc3NldElkU3RyAgpfdG90YWxEYXRhCQBkAgUJdG90YWxEYXRhAAEFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXlslDkK", "height": 3644324, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 2TG9kijSkJSmEA3bE6RsyzjGT375eLsfdnrFENafY13R Next: Gv25t2cG43Ujk6HQVcW9B4YNTAarZVBVivtTpXqp8VXi Diff:
OldNewDifferences
4343 }
4444
4545
46+func tryGetInteger (key) = match getInteger(this, key) {
47+ case b: Int =>
48+ b
49+ case _ =>
50+ 0
51+}
52+
53+
4654 let doraAddressStr = "3PKkojKdd6BBzTf1RXbQVfUDraNFXXHKzQF"
4755
4856 let doraAddress = addressFromStringValue(doraAddressStr)
4957
5058 let xtnUsdPriceX6 = valueOrErrorMessage(getInteger(doraAddress, "%s%s__price__USDN-USDT"), "DORA doesn't contain USDN/USDT price")
5159
52-@Callable(i)
53-func updateTokenPrice (tokenNum,wavesUsdPriceX6) = {
60+func getTokenPrice (tokenNum,wavesUsdPriceX6) = {
5461 let tokenIdStr = tokenIds[tokenNum]
5562 let tokenId = fromBase58String(tokenIdStr)
5663 let wx_ViresWaves_lp = tokenWXWavesLPs[tokenNum]
5764 let wxRestResult = split(asString(invoke(wx_restDapp, "poolStatsREADONLY", [wx_ViresWaves_lp], nil)), "__")
58- let $t023442436 = if (tokenIsBaseAsset[tokenNum])
65+ let $t024082500 = if (tokenIsBaseAsset[tokenNum])
5966 then $Tuple2(1, 2)
6067 else $Tuple2(2, 1)
61- let wavesInPairNum = $t023442436._1
62- let tokenInPairNum = $t023442436._2
68+ let wavesInPairNum = $t024082500._1
69+ let tokenInPairNum = $t024082500._2
6370 let wx_ViresWaves_WAVESx8 = parseIntValue(wxRestResult[wavesInPairNum])
6471 let wx_ViresWaves_VIRESx8 = fraction(parseIntValue(wxRestResult[tokenInPairNum]), 100000000, tokenDecimals[tokenNum])
6572 let wx_ViresWaves_ViresUsdPriceX6 = fraction(wx_ViresWaves_WAVESx8, wavesUsdPriceX6, wx_ViresWaves_VIRESx8)
6673 let wx_ViresWaves_Weight = wx_ViresWaves_VIRESx8
6774 let wx_ViresXtn_AddressStr = tokenWXXTNPools[tokenNum]
68- let $t028573322 = if ((wx_ViresXtn_AddressStr == ""))
75+ let $t029213386 = if ((wx_ViresXtn_AddressStr == ""))
6976 then $Tuple2(0, 0)
7077 else {
7178 let wx_ViresXtn_Address = addressFromStringValue(wx_ViresXtn_AddressStr)
7380 let wx_ViresXtn_VIRESx8 = assetBalance(wx_ViresXtn_Address, tokenId)
7481 $Tuple2(fraction((wx_ViresXtn_XTNx6 * (tokenDecimals[tokenNum] / 1000000)), xtnUsdPriceX6, wx_ViresXtn_VIRESx8), wx_ViresXtn_VIRESx8)
7582 }
76- let wx_ViresXtn_ViresUsdPriceX6 = $t028573322._1
77- let wx_ViresXtn_Weight = $t028573322._2
83+ let wx_ViresXtn_ViresUsdPriceX6 = $t029213386._1
84+ let wx_ViresXtn_Weight = $t029213386._2
7885 let swop_ViresXtn_AddressStr = tokenSwopPools[tokenNum]
79- let $t033844040 = if ((swop_ViresXtn_AddressStr == ""))
86+ let $t034484104 = if ((swop_ViresXtn_AddressStr == ""))
8087 then $Tuple2(0, 0)
8188 else {
8289 let swop_ViresXtn_Address = addressFromStringValue(swop_ViresXtn_AddressStr)
8592 let swop_ViresXtn_Weight = getIntegerValue(swop_ViresXtn_Address, "A_asset_balance")
8693 $Tuple2(swop_ViresXtn_ViresUsdPriceX6, swop_ViresXtn_Weight)
8794 }
88- let swop_ViresXtn_ViresUsdPriceX6 = $t033844040._1
89- let swop_ViresXtn_Weight = $t033844040._2
95+ let swop_ViresXtn_ViresUsdPriceX6 = $t034484104._1
96+ let swop_ViresXtn_Weight = $t034484104._2
9097 let W = ((wx_ViresWaves_Weight + wx_ViresXtn_Weight) + swop_ViresXtn_Weight)
9198 let viresUsdPriceX6 = ((fraction(wx_ViresWaves_ViresUsdPriceX6, wx_ViresWaves_Weight, W) + fraction(wx_ViresXtn_ViresUsdPriceX6, wx_ViresXtn_Weight, W)) + fraction(swop_ViresXtn_ViresUsdPriceX6, swop_ViresXtn_Weight, W))
9299 let debug = ((((((("viresUsdPriceX6=" + toString(viresUsdPriceX6)) + " wx_ViresWaves_ViresUsdPriceX6=") + toString(wx_ViresWaves_ViresUsdPriceX6)) + " wx_ViresXtn_ViresUsdPriceX6=") + toString(wx_ViresXtn_ViresUsdPriceX6)) + " swop_ViresXtn_ViresUsdPriceX6=") + toString(swop_ViresXtn_ViresUsdPriceX6))
93- throw(debug)
100+ $Tuple2(viresUsdPriceX6, debug)
101+ }
102+
103+
104+@Callable(i)
105+func updateTokenPrice (assetIdStr) = {
106+ let wavesPrice = getIntegerValue(doraAddress, "%s%s__price__WAVES-USDT")
107+ let tokenPrice = if ((assetIdStr == "WAVES"))
108+ then wavesPrice
109+ else if ((assetIdStr == xtnIdStr))
110+ then xtnUsdPriceX6
111+ else getTokenPrice(value(indexOf(tokenIds, assetIdStr)), wavesPrice)._1
112+ let lastTwap = tryGetInteger((assetIdStr + "_twap5B"))
113+ let lastHeight = tryGetInteger((assetIdStr + "_lastBlock"))
114+ let totalData = tryGetInteger((assetIdStr + "_totalData"))
115+ if (if ((lastHeight == 0))
116+ then true
117+ else ((height - lastHeight) > 30))
118+ then [IntegerEntry((assetIdStr + "_twap5B"), tokenPrice), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), 1)]
119+ else if ((5 > totalData))
120+ then [IntegerEntry((assetIdStr + "_twap5B"), (((lastTwap * totalData) + tokenPrice) / (totalData + 1))), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), (totalData + 1))]
121+ else [IntegerEntry((assetIdStr + "_twap5B"), (((lastTwap * 5) + tokenPrice) / 5)), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), (totalData + 1))]
94122 }
95123
96124
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let xtnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
55
66 let xtnIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
77
88 let tokenIds = ["34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ", "6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ", "HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS", "Ajso6nTTjptu2UHLx6hfSXVtHFtRBJCkKYd5SAyj7zf5", "DSbbhLsSTeDg5Lsiufk2Aneh3DjVqJuPr2M9uU1gwy5p"]
99
1010 let tokenIsBaseAsset = [true, true, false, false, false]
1111
1212 let tokenDecimals = [1000000, 1000000, 100000000, 100000000, 100000000]
1313
1414 let tokenWXWavesLPs = ["ByJtVuYi58CtdjtasDuTqtgev8qWkdJybF7rY1xosmhE", "BoXuf9ewJSE1UMrKibZmigzC6tBzv8RFTeZmofEos2ZJ", "7G687ui3m59oAd6qkyni2vt77bHF4bbA6xcPfDo3uiTu", "EMsZpqcT8NuMYZCEPHzvrhQCQKhfXjdeekZvcWpHsNvh", "E3YhURNsCmjUaYNigH6AayLxbh9u81uVGU3ZvHKznY5v"]
1515
1616 let tokenWXXTNPools = ["", "", "3P615yXeQ9Qu4qBM1QGimGzixyMS5W4Ktug", "3PEkD5LuHGWhUfgBW1owZFxVydYoWjV6Jia", "3P5HjPowgipiVB3UvXphDiPvKs424WC9xQw"]
1717
1818 let tokenSwopPools = ["", "", "3PBHyEwmERR1CEkrTNbPj2bgyisTfPRqfee", "3PDSXwwA2xAtmxeo2bebDP3AA5ynZ2Krgnw", "3PJ48P3p2wvWUjgQaQiZ2cFbr8qmxMokBGd"]
1919
2020 let wx_restAddressStr = "3P8MoPnsaurofk1VyhsdAFkeQ6ijpJYXCpW"
2121
2222 let wx_restDapp = addressFromStringValue(wx_restAddressStr)
2323
2424 let swopRestDapp = addressFromStringValue("3P56jNQzECXnrWpnbbSJKw7Eooo6fkUaMPp")
2525
2626 let revisionNum = ""
2727
2828 let SEP = "__"
2929
3030 func asString (v) = match v {
3131 case s: String =>
3232 s
3333 case _ =>
3434 throw("fail to cast into String")
3535 }
3636
3737
3838 func asInt (v) = match v {
3939 case i: Int =>
4040 i
4141 case _ =>
4242 throw("fail to cast into Int")
4343 }
4444
4545
46+func tryGetInteger (key) = match getInteger(this, key) {
47+ case b: Int =>
48+ b
49+ case _ =>
50+ 0
51+}
52+
53+
4654 let doraAddressStr = "3PKkojKdd6BBzTf1RXbQVfUDraNFXXHKzQF"
4755
4856 let doraAddress = addressFromStringValue(doraAddressStr)
4957
5058 let xtnUsdPriceX6 = valueOrErrorMessage(getInteger(doraAddress, "%s%s__price__USDN-USDT"), "DORA doesn't contain USDN/USDT price")
5159
52-@Callable(i)
53-func updateTokenPrice (tokenNum,wavesUsdPriceX6) = {
60+func getTokenPrice (tokenNum,wavesUsdPriceX6) = {
5461 let tokenIdStr = tokenIds[tokenNum]
5562 let tokenId = fromBase58String(tokenIdStr)
5663 let wx_ViresWaves_lp = tokenWXWavesLPs[tokenNum]
5764 let wxRestResult = split(asString(invoke(wx_restDapp, "poolStatsREADONLY", [wx_ViresWaves_lp], nil)), "__")
58- let $t023442436 = if (tokenIsBaseAsset[tokenNum])
65+ let $t024082500 = if (tokenIsBaseAsset[tokenNum])
5966 then $Tuple2(1, 2)
6067 else $Tuple2(2, 1)
61- let wavesInPairNum = $t023442436._1
62- let tokenInPairNum = $t023442436._2
68+ let wavesInPairNum = $t024082500._1
69+ let tokenInPairNum = $t024082500._2
6370 let wx_ViresWaves_WAVESx8 = parseIntValue(wxRestResult[wavesInPairNum])
6471 let wx_ViresWaves_VIRESx8 = fraction(parseIntValue(wxRestResult[tokenInPairNum]), 100000000, tokenDecimals[tokenNum])
6572 let wx_ViresWaves_ViresUsdPriceX6 = fraction(wx_ViresWaves_WAVESx8, wavesUsdPriceX6, wx_ViresWaves_VIRESx8)
6673 let wx_ViresWaves_Weight = wx_ViresWaves_VIRESx8
6774 let wx_ViresXtn_AddressStr = tokenWXXTNPools[tokenNum]
68- let $t028573322 = if ((wx_ViresXtn_AddressStr == ""))
75+ let $t029213386 = if ((wx_ViresXtn_AddressStr == ""))
6976 then $Tuple2(0, 0)
7077 else {
7178 let wx_ViresXtn_Address = addressFromStringValue(wx_ViresXtn_AddressStr)
7279 let wx_ViresXtn_XTNx6 = assetBalance(wx_ViresXtn_Address, xtnId)
7380 let wx_ViresXtn_VIRESx8 = assetBalance(wx_ViresXtn_Address, tokenId)
7481 $Tuple2(fraction((wx_ViresXtn_XTNx6 * (tokenDecimals[tokenNum] / 1000000)), xtnUsdPriceX6, wx_ViresXtn_VIRESx8), wx_ViresXtn_VIRESx8)
7582 }
76- let wx_ViresXtn_ViresUsdPriceX6 = $t028573322._1
77- let wx_ViresXtn_Weight = $t028573322._2
83+ let wx_ViresXtn_ViresUsdPriceX6 = $t029213386._1
84+ let wx_ViresXtn_Weight = $t029213386._2
7885 let swop_ViresXtn_AddressStr = tokenSwopPools[tokenNum]
79- let $t033844040 = if ((swop_ViresXtn_AddressStr == ""))
86+ let $t034484104 = if ((swop_ViresXtn_AddressStr == ""))
8087 then $Tuple2(0, 0)
8188 else {
8289 let swop_ViresXtn_Address = addressFromStringValue(swop_ViresXtn_AddressStr)
8390 let swop_ViresXtn_ViresXtnPriceX6 = asInt(invoke(swopRestDapp, "calcGetAmountCPMM", [swop_ViresXtn_AddressStr, "3P88qk1KzF1BKjD7fC7LjNVAKM4ezff5WE6", tokenIdStr, tokenDecimals[tokenNum]], nil))
8491 let swop_ViresXtn_ViresUsdPriceX6 = fraction(swop_ViresXtn_ViresXtnPriceX6, xtnUsdPriceX6, 1000000)
8592 let swop_ViresXtn_Weight = getIntegerValue(swop_ViresXtn_Address, "A_asset_balance")
8693 $Tuple2(swop_ViresXtn_ViresUsdPriceX6, swop_ViresXtn_Weight)
8794 }
88- let swop_ViresXtn_ViresUsdPriceX6 = $t033844040._1
89- let swop_ViresXtn_Weight = $t033844040._2
95+ let swop_ViresXtn_ViresUsdPriceX6 = $t034484104._1
96+ let swop_ViresXtn_Weight = $t034484104._2
9097 let W = ((wx_ViresWaves_Weight + wx_ViresXtn_Weight) + swop_ViresXtn_Weight)
9198 let viresUsdPriceX6 = ((fraction(wx_ViresWaves_ViresUsdPriceX6, wx_ViresWaves_Weight, W) + fraction(wx_ViresXtn_ViresUsdPriceX6, wx_ViresXtn_Weight, W)) + fraction(swop_ViresXtn_ViresUsdPriceX6, swop_ViresXtn_Weight, W))
9299 let debug = ((((((("viresUsdPriceX6=" + toString(viresUsdPriceX6)) + " wx_ViresWaves_ViresUsdPriceX6=") + toString(wx_ViresWaves_ViresUsdPriceX6)) + " wx_ViresXtn_ViresUsdPriceX6=") + toString(wx_ViresXtn_ViresUsdPriceX6)) + " swop_ViresXtn_ViresUsdPriceX6=") + toString(swop_ViresXtn_ViresUsdPriceX6))
93- throw(debug)
100+ $Tuple2(viresUsdPriceX6, debug)
101+ }
102+
103+
104+@Callable(i)
105+func updateTokenPrice (assetIdStr) = {
106+ let wavesPrice = getIntegerValue(doraAddress, "%s%s__price__WAVES-USDT")
107+ let tokenPrice = if ((assetIdStr == "WAVES"))
108+ then wavesPrice
109+ else if ((assetIdStr == xtnIdStr))
110+ then xtnUsdPriceX6
111+ else getTokenPrice(value(indexOf(tokenIds, assetIdStr)), wavesPrice)._1
112+ let lastTwap = tryGetInteger((assetIdStr + "_twap5B"))
113+ let lastHeight = tryGetInteger((assetIdStr + "_lastBlock"))
114+ let totalData = tryGetInteger((assetIdStr + "_totalData"))
115+ if (if ((lastHeight == 0))
116+ then true
117+ else ((height - lastHeight) > 30))
118+ then [IntegerEntry((assetIdStr + "_twap5B"), tokenPrice), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), 1)]
119+ else if ((5 > totalData))
120+ then [IntegerEntry((assetIdStr + "_twap5B"), (((lastTwap * totalData) + tokenPrice) / (totalData + 1))), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), (totalData + 1))]
121+ else [IntegerEntry((assetIdStr + "_twap5B"), (((lastTwap * 5) + tokenPrice) / 5)), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), (totalData + 1))]
94122 }
95123
96124
97125 @Verifier(tx)
98126 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
99127

github/deemru/w8io/786bc32 
29.85 ms