tx · 3L4fcagzEd2QUjnUeVSTvo8dKnqiMDJbNF7ram67E74e

3P8d1E1BLKoD52y3bQJ1bDTd2TD1gpaLn9t:  -0.01000000 Waves

2023.05.15 12:45 [3644348] smart account 3P8d1E1BLKoD52y3bQJ1bDTd2TD1gpaLn9t > SELF 0.00000000 Waves

{ "type": 13, "id": "3L4fcagzEd2QUjnUeVSTvo8dKnqiMDJbNF7ram67E74e", "fee": 1000000, "feeAssetId": null, "timestamp": 1684143908985, "version": 2, "chainId": 87, "sender": "3P8d1E1BLKoD52y3bQJ1bDTd2TD1gpaLn9t", "senderPublicKey": "CjoWXzfYENobZJVQkEkfkmYHRP3vU7ZLpxCqJ6vD7bTC", "proofs": [ "2j7Xz49zRAb3s46pA5vwCxzrCodvLFfgJYAQFK3ySB6YvqsEbJxdVaztTGQ37xZiFjG8UkjgZXcCi1pkJqg4BggK" ], "script": "base64:BgIJCAISAwoBCBIAFAAFeHRuSWQBILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAAh4dG5JZFN0cgIsREcyeEZrUGREd0tVb0JrekdBaFF0THBTR3pmWExpQ1lQRXplS0gyQWQyNHAACHRva2VuSWRzCQDMCAICLDM0TjlZY0VFVExXbjkzcVlRNjRFc1AxeDg5dFNydUpVNDRSckVNU1hYRVBKCQDMCAICLDZYdEhqcFhiczlSUkpQMlNyOUdVeVZxekFDY2J5OVRrVGhIWG5qVkM1Q0RKCQDMCAICLEhFQjhRYXc5eHJXcFdzOHRIc2lBVFlHQldEQnRQMlM3a2NQQUxyTXU0M0FTCQDMCAICLEFqc282blRUanB0dTJVSEx4NmhmU1hWdEhGdFJCSkNrS1lkNVNBeWo3emY1CQDMCAICLERTYmJoTHNTVGVEZzVMc2l1ZmsyQW5laDNEalZxSnVQcjJNOXVVMWd3eTVwBQNuaWwAEHRva2VuSXNCYXNlQXNzZXQJAMwIAgYJAMwIAgYJAMwIAgcJAMwIAgcJAMwIAgcFA25pbAANdG9rZW5EZWNpbWFscwkAzAgCAMCEPQkAzAgCAMCEPQkAzAgCAIDC1y8JAMwIAgCAwtcvCQDMCAIAgMLXLwUDbmlsAA90b2tlbldYV2F2ZXNMUHMJAMwIAgIsQnlKdFZ1WWk1OEN0ZGp0YXNEdVRxdGdldjhxV2tkSnliRjdyWTF4b3NtaEUJAMwIAgIsQm9YdWY5ZXdKU0UxVU1yS2liWm1pZ3pDNnRCenY4UkZUZVptb2ZFb3MyWkoJAMwIAgIsN0c2ODd1aTNtNTlvQWQ2cWt5bmkydnQ3N2JIRjRiYkE2eGNQZkRvM3VpVHUJAMwIAgIsRU1zWnBxY1Q4TnVNWVpDRVBIenZyaFFDUUtoZlhqZGVla1p2Y1dwSHNOdmgJAMwIAgIsRTNZaFVSTnNDbWpVYVlOaWdINkFheUx4Ymg5dTgxdVZHVTNadkhLem5ZNXYFA25pbAAPdG9rZW5XWFhUTlBvb2xzCQDMCAICAAkAzAgCAgAJAMwIAgIjM1A2MTV5WGVROVF1NHFCTTFRR2ltR3ppeHlNUzVXNEt0dWcJAMwIAgIjM1BFa0Q1THVIR1doVWZnQlcxb3daRnhWeWRZb1dqVjZKaWEJAMwIAgIjM1A1SGpQb3dnaXBpVkIzVXZYcGhEaVB2S3M0MjRXQzl4UXcFA25pbAAOdG9rZW5Td29wUG9vbHMJAMwIAgIACQDMCAICAAkAzAgCAiMzUEJIeUV3bUVSUjFDRWtyVE5iUGoyYmd5aXNUZlBScWZlZQkAzAgCAiMzUERTWHd3QTJ4QXRteGVvMmJlYkRQM0FBNXluWjJLcmdudwkAzAgCAiMzUEo0OFAzcDJ3dldVamdRYVFpWjJjRmJyOHFteE1va0JHZAUDbmlsABF3eF9yZXN0QWRkcmVzc1N0cgIjM1A4TW9QbnNhdXJvZmsxVnloc2RBRmtlUTZpanBKWVhDcFcAC3d4X3Jlc3REYXBwCQERQGV4dHJOYXRpdmUoMTA2MikBBRF3eF9yZXN0QWRkcmVzc1N0cgAMc3dvcFJlc3REYXBwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUDU2ak5RekVDWG5yV3BuYmJTSkt3N0Vvb282ZmtVYU1QcAALcmV2aXNpb25OdW0CAAADU0VQAgJfXwEIYXNTdHJpbmcBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAWkFByRtYXRjaDAFAWkJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAAADmRvcmFBZGRyZXNzU3RyAiMzUEtrb2pLZGQ2QkJ6VGYxUlhiUVZmVURyYU5GWFhIS3pRRgALZG9yYUFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDmRvcmFBZGRyZXNzU3RyAA14dG5Vc2RQcmljZVg2CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgULZG9yYUFkZHJlc3MCFiVzJXNfX3ByaWNlX19VU0ROLVVTRFQCJERPUkEgZG9lc24ndCBjb250YWluIFVTRE4vVVNEVCBwcmljZQENZ2V0VG9rZW5QcmljZQIIdG9rZW5OdW0Pd2F2ZXNVc2RQcmljZVg2BAp0b2tlbklkU3RyCQCRAwIFCHRva2VuSWRzBQh0b2tlbk51bQQHdG9rZW5JZAkA2QQBBQp0b2tlbklkU3RyBA13eF9UMVdhdmVzX2xwCQCRAwIFD3Rva2VuV1hXYXZlc0xQcwUIdG9rZW5OdW0EDHd4UmVzdFJlc3VsdAkAtQkCCQEIYXNTdHJpbmcBCQD8BwQFC3d4X3Jlc3REYXBwAhFwb29sU3RhdHNSRUFET05MWQkAzAgCBQ13eF9UMVdhdmVzX2xwBQNuaWwFA25pbAICX18ECyR0MDI0MDIyNDk0AwkAkQMCBRB0b2tlbklzQmFzZUFzc2V0BQh0b2tlbk51bQkAlAoCAAEAAgkAlAoCAAIAAQQOd2F2ZXNJblBhaXJOdW0IBQskdDAyNDAyMjQ5NAJfMQQOdG9rZW5JblBhaXJOdW0IBQskdDAyNDAyMjQ5NAJfMgQSd3hfVDFXYXZlc19XQVZFU3g4CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUMd3hSZXN0UmVzdWx0BQ53YXZlc0luUGFpck51bQQPd3hfVDFXYXZlc19UMXg4CQBrAwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDHd4UmVzdFJlc3VsdAUOdG9rZW5JblBhaXJOdW0AgMLXLwkAkQMCBQ10b2tlbkRlY2ltYWxzBQh0b2tlbk51bQQXd3hfVDFXYXZlc19UMVVzZFByaWNlWDYJAGsDBRJ3eF9UMVdhdmVzX1dBVkVTeDgFD3dhdmVzVXNkUHJpY2VYNgUPd3hfVDFXYXZlc19UMXg4BBF3eF9UMVdhdmVzX1dlaWdodAUPd3hfVDFXYXZlc19UMXg4BBN3eF9UMVh0bl9BZGRyZXNzU3RyCQCRAwIFD3Rva2VuV1hYVE5Qb29scwUIdG9rZW5OdW0ECyR0MDI4NzkzMjk2AwkAAAIFE3d4X1QxWHRuX0FkZHJlc3NTdHICAAkAlAoCAAAAAAQQd3hfVDFYdG5fQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUTd3hfVDFYdG5fQWRkcmVzc1N0cgQOd3hfVDFYdG5fWFROeDYJAPAHAgUQd3hfVDFYdG5fQWRkcmVzcwUFeHRuSWQEDXd4X1QxWHRuX1QxeDgJAPAHAgUQd3hfVDFYdG5fQWRkcmVzcwUHdG9rZW5JZAkAlAoCCQBrAwkAaAIFDnd4X1QxWHRuX1hUTng2CQBpAgkAkQMCBQ10b2tlbkRlY2ltYWxzBQh0b2tlbk51bQDAhD0FDXh0blVzZFByaWNlWDYFDXd4X1QxWHRuX1QxeDgFDXd4X1QxWHRuX1QxeDgEFXd4X1QxWHRuX1QxVXNkUHJpY2VYNggFCyR0MDI4NzkzMjk2Al8xBA93eF9UMVh0bl9XZWlnaHQIBQskdDAyODc5MzI5NgJfMgQVc3dvcF9UMVh0bl9BZGRyZXNzU3RyCQCRAwIFDnRva2VuU3dvcFBvb2xzBQh0b2tlbk51bQQLJHQwMzM1NTM5NTcDCQAAAgUVc3dvcF9UMVh0bl9BZGRyZXNzU3RyAgAJAJQKAgAAAAAEEnN3b3BfVDFYdG5fQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUVc3dvcF9UMVh0bl9BZGRyZXNzU3RyBBdzd29wX1QxWHRuX1QxWHRuUHJpY2VYNgkBBWFzSW50AQkA/AcEBQxzd29wUmVzdERhcHACEWNhbGNHZXRBbW91bnRDUE1NCQDMCAIFFXN3b3BfVDFYdG5fQWRkcmVzc1N0cgkAzAgCAiMzUDg4cWsxS3pGMUJLakQ3ZkM3TGpOVkFLTTRlemZmNVdFNgkAzAgCBQp0b2tlbklkU3RyCQDMCAIJAJEDAgUNdG9rZW5EZWNpbWFscwUIdG9rZW5OdW0FA25pbAUDbmlsBBdzd29wX1QxWHRuX1QxVXNkUHJpY2VYNgkAawMFF3N3b3BfVDFYdG5fVDFYdG5QcmljZVg2BQ14dG5Vc2RQcmljZVg2AMCEPQQRc3dvcF9UMVh0bl9XZWlnaHQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFEnN3b3BfVDFYdG5fQWRkcmVzcwIPQV9hc3NldF9iYWxhbmNlCQCUCgIFF3N3b3BfVDFYdG5fVDFVc2RQcmljZVg2BRFzd29wX1QxWHRuX1dlaWdodAQXc3dvcF9UMVh0bl9UMVVzZFByaWNlWDYIBQskdDAzMzU1Mzk1NwJfMQQRc3dvcF9UMVh0bl9XZWlnaHQIBQskdDAzMzU1Mzk1NwJfMgQBVwkAZAIJAGQCBRF3eF9UMVdhdmVzX1dlaWdodAUPd3hfVDFYdG5fV2VpZ2h0BRFzd29wX1QxWHRuX1dlaWdodAQMVDFVc2RQcmljZVg2CQBkAgkAZAIJAGsDBRd3eF9UMVdhdmVzX1QxVXNkUHJpY2VYNgURd3hfVDFXYXZlc19XZWlnaHQFAVcJAGsDBRV3eF9UMVh0bl9UMVVzZFByaWNlWDYFD3d4X1QxWHRuX1dlaWdodAUBVwkAawMFF3N3b3BfVDFYdG5fVDFVc2RQcmljZVg2BRFzd29wX1QxWHRuX1dlaWdodAUBVwQFZGVidWcJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgINVDFVc2RQcmljZVg2PQkApAMBBQxUMVVzZFByaWNlWDYCGSB3eF9UMVdhdmVzX1QxVXNkUHJpY2VYNj0JAKQDAQUXd3hfVDFXYXZlc19UMVVzZFByaWNlWDYCFyB3eF9UMVh0bl9UMVVzZFByaWNlWDY9CQCkAwEFFXd4X1QxWHRuX1QxVXNkUHJpY2VYNgIZIHN3b3BfVDFYdG5fVDFVc2RQcmljZVg2PQkApAMBBRdzd29wX1QxWHRuX1QxVXNkUHJpY2VYNgkAlAoCBQxUMVVzZFByaWNlWDYFBWRlYnVnAgFpARB1cGRhdGVUb2tlblByaWNlAQphc3NldElkU3RyBAp3YXZlc1ByaWNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQtkb3JhQWRkcmVzcwIXJXMlc19fcHJpY2VfX1dBVkVTLVVTRFQECnRva2VuUHJpY2UDCQAAAgUKYXNzZXRJZFN0cgIFV0FWRVMFCndhdmVzUHJpY2UDCQAAAgUKYXNzZXRJZFN0cgUIeHRuSWRTdHIFDXh0blVzZFByaWNlWDYICQENZ2V0VG9rZW5QcmljZQIJAQV2YWx1ZQEJAM8IAgUIdG9rZW5JZHMFCmFzc2V0SWRTdHIFCndhdmVzUHJpY2UCXzEECGxhc3RUd2FwCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgUKYXNzZXRJZFN0cgIHX3R3YXA1QgQKbGFzdEhlaWdodAkBDXRyeUdldEludGVnZXIBCQCsAgIFCmFzc2V0SWRTdHICCl9sYXN0QmxvY2sECXRvdGFsRGF0YQkBDXRyeUdldEludGVnZXIBCQCsAgIFCmFzc2V0SWRTdHICCl90b3RhbERhdGEDAwkAAAIFCmxhc3RIZWlnaHQAAAYJAGYCCQBlAgUGaGVpZ2h0BQpsYXN0SGVpZ2h0AB4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYXNzZXRJZFN0cgIHX3R3YXA1QgUKdG9rZW5QcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphc3NldElkU3RyAgpfbGFzdEJsb2NrBQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYXNzZXRJZFN0cgIKX3RvdGFsRGF0YQABBQNuaWwDCQBmAgAFBQl0b3RhbERhdGEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYXNzZXRJZFN0cgIHX3R3YXA1QgkAaQIJAGQCCQBoAgUIbGFzdFR3YXAFCXRvdGFsRGF0YQUKdG9rZW5QcmljZQkAZAIFCXRvdGFsRGF0YQABCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFzc2V0SWRTdHICCl9sYXN0QmxvY2sFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphc3NldElkU3RyAgpfdG90YWxEYXRhCQBkAgUJdG90YWxEYXRhAAEFA25pbAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQphc3NldElkU3RyAgdfdHdhcDVCCQBpAgkAZAIJAGgCBQhsYXN0VHdhcAAEBQp0b2tlblByaWNlAAUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUKYXNzZXRJZFN0cgIKX2xhc3RCbG9jawUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCmFzc2V0SWRTdHICCl90b3RhbERhdGEJAGQCBQl0b3RhbERhdGEAAQUDbmlsAWkBDHVwZGF0ZVRva2VucwAEAmkxCQD8BwQFBHRoaXMCEHVwZGF0ZVRva2VuUHJpY2UJAMwIAgIFV0FWRVMFA25pbAUDbmlsAwkAAAIFAmkxBQJpMQQCaTIJAPwHBAUEdGhpcwIQdXBkYXRlVG9rZW5QcmljZQkAzAgCBQh4dG5JZFN0cgUDbmlsBQNuaWwDCQAAAgUCaTIFAmkyCgEFY2FsbHUCBWFjY3VtBG5leHQEAmkzCQD8BwQFBHRoaXMCEHVwZGF0ZVRva2VuUHJpY2UJAMwIAgUEbmV4dAUDbmlsBQNuaWwDCQAAAgUCaTMFAmkzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4KAAIkbAUIdG9rZW5JZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWNhbGx1AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXlXU7jJ", "height": 3644348, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 5399TUH2qhufUkdr9d76Ui38Aiou8U4hQkBEuAWZ9evg Next: Hwvt1xxsVmDvEoR9rcp2sHQZ88Sr9xGum4g6vUXzaPM6 Diff:
OldNewDifferences
6060 func getTokenPrice (tokenNum,wavesUsdPriceX6) = {
6161 let tokenIdStr = tokenIds[tokenNum]
6262 let tokenId = fromBase58String(tokenIdStr)
63- let wx_ViresWaves_lp = tokenWXWavesLPs[tokenNum]
64- let wxRestResult = split(asString(invoke(wx_restDapp, "poolStatsREADONLY", [wx_ViresWaves_lp], nil)), "__")
65- let $t024082500 = if (tokenIsBaseAsset[tokenNum])
63+ let wx_T1Waves_lp = tokenWXWavesLPs[tokenNum]
64+ let wxRestResult = split(asString(invoke(wx_restDapp, "poolStatsREADONLY", [wx_T1Waves_lp], nil)), "__")
65+ let $t024022494 = if (tokenIsBaseAsset[tokenNum])
6666 then $Tuple2(1, 2)
6767 else $Tuple2(2, 1)
68- let wavesInPairNum = $t024082500._1
69- let tokenInPairNum = $t024082500._2
70- let wx_ViresWaves_WAVESx8 = parseIntValue(wxRestResult[wavesInPairNum])
71- let wx_ViresWaves_VIRESx8 = fraction(parseIntValue(wxRestResult[tokenInPairNum]), 100000000, tokenDecimals[tokenNum])
72- let wx_ViresWaves_ViresUsdPriceX6 = fraction(wx_ViresWaves_WAVESx8, wavesUsdPriceX6, wx_ViresWaves_VIRESx8)
73- let wx_ViresWaves_Weight = wx_ViresWaves_VIRESx8
74- let wx_ViresXtn_AddressStr = tokenWXXTNPools[tokenNum]
75- let $t029213386 = if ((wx_ViresXtn_AddressStr == ""))
68+ let wavesInPairNum = $t024022494._1
69+ let tokenInPairNum = $t024022494._2
70+ let wx_T1Waves_WAVESx8 = parseIntValue(wxRestResult[wavesInPairNum])
71+ let wx_T1Waves_T1x8 = fraction(parseIntValue(wxRestResult[tokenInPairNum]), 100000000, tokenDecimals[tokenNum])
72+ let wx_T1Waves_T1UsdPriceX6 = fraction(wx_T1Waves_WAVESx8, wavesUsdPriceX6, wx_T1Waves_T1x8)
73+ let wx_T1Waves_Weight = wx_T1Waves_T1x8
74+ let wx_T1Xtn_AddressStr = tokenWXXTNPools[tokenNum]
75+ let $t028793296 = if ((wx_T1Xtn_AddressStr == ""))
7676 then $Tuple2(0, 0)
7777 else {
78- let wx_ViresXtn_Address = addressFromStringValue(wx_ViresXtn_AddressStr)
79- let wx_ViresXtn_XTNx6 = assetBalance(wx_ViresXtn_Address, xtnId)
80- let wx_ViresXtn_VIRESx8 = assetBalance(wx_ViresXtn_Address, tokenId)
81- $Tuple2(fraction((wx_ViresXtn_XTNx6 * (tokenDecimals[tokenNum] / 1000000)), xtnUsdPriceX6, wx_ViresXtn_VIRESx8), wx_ViresXtn_VIRESx8)
78+ let wx_T1Xtn_Address = addressFromStringValue(wx_T1Xtn_AddressStr)
79+ let wx_T1Xtn_XTNx6 = assetBalance(wx_T1Xtn_Address, xtnId)
80+ let wx_T1Xtn_T1x8 = assetBalance(wx_T1Xtn_Address, tokenId)
81+ $Tuple2(fraction((wx_T1Xtn_XTNx6 * (tokenDecimals[tokenNum] / 1000000)), xtnUsdPriceX6, wx_T1Xtn_T1x8), wx_T1Xtn_T1x8)
8282 }
83- let wx_ViresXtn_ViresUsdPriceX6 = $t029213386._1
84- let wx_ViresXtn_Weight = $t029213386._2
85- let swop_ViresXtn_AddressStr = tokenSwopPools[tokenNum]
86- let $t034484104 = if ((swop_ViresXtn_AddressStr == ""))
83+ let wx_T1Xtn_T1UsdPriceX6 = $t028793296._1
84+ let wx_T1Xtn_Weight = $t028793296._2
85+ let swop_T1Xtn_AddressStr = tokenSwopPools[tokenNum]
86+ let $t033553957 = if ((swop_T1Xtn_AddressStr == ""))
8787 then $Tuple2(0, 0)
8888 else {
89- let swop_ViresXtn_Address = addressFromStringValue(swop_ViresXtn_AddressStr)
90- let swop_ViresXtn_ViresXtnPriceX6 = asInt(invoke(swopRestDapp, "calcGetAmountCPMM", [swop_ViresXtn_AddressStr, "3P88qk1KzF1BKjD7fC7LjNVAKM4ezff5WE6", tokenIdStr, tokenDecimals[tokenNum]], nil))
91- let swop_ViresXtn_ViresUsdPriceX6 = fraction(swop_ViresXtn_ViresXtnPriceX6, xtnUsdPriceX6, 1000000)
92- let swop_ViresXtn_Weight = getIntegerValue(swop_ViresXtn_Address, "A_asset_balance")
93- $Tuple2(swop_ViresXtn_ViresUsdPriceX6, swop_ViresXtn_Weight)
89+ let swop_T1Xtn_Address = addressFromStringValue(swop_T1Xtn_AddressStr)
90+ let swop_T1Xtn_T1XtnPriceX6 = asInt(invoke(swopRestDapp, "calcGetAmountCPMM", [swop_T1Xtn_AddressStr, "3P88qk1KzF1BKjD7fC7LjNVAKM4ezff5WE6", tokenIdStr, tokenDecimals[tokenNum]], nil))
91+ let swop_T1Xtn_T1UsdPriceX6 = fraction(swop_T1Xtn_T1XtnPriceX6, xtnUsdPriceX6, 1000000)
92+ let swop_T1Xtn_Weight = getIntegerValue(swop_T1Xtn_Address, "A_asset_balance")
93+ $Tuple2(swop_T1Xtn_T1UsdPriceX6, swop_T1Xtn_Weight)
9494 }
95- let swop_ViresXtn_ViresUsdPriceX6 = $t034484104._1
96- let swop_ViresXtn_Weight = $t034484104._2
97- let W = ((wx_ViresWaves_Weight + wx_ViresXtn_Weight) + swop_ViresXtn_Weight)
98- 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))
99- 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))
100- $Tuple2(viresUsdPriceX6, debug)
95+ let swop_T1Xtn_T1UsdPriceX6 = $t033553957._1
96+ let swop_T1Xtn_Weight = $t033553957._2
97+ let W = ((wx_T1Waves_Weight + wx_T1Xtn_Weight) + swop_T1Xtn_Weight)
98+ let T1UsdPriceX6 = ((fraction(wx_T1Waves_T1UsdPriceX6, wx_T1Waves_Weight, W) + fraction(wx_T1Xtn_T1UsdPriceX6, wx_T1Xtn_Weight, W)) + fraction(swop_T1Xtn_T1UsdPriceX6, swop_T1Xtn_Weight, W))
99+ let debug = ((((((("T1UsdPriceX6=" + toString(T1UsdPriceX6)) + " wx_T1Waves_T1UsdPriceX6=") + toString(wx_T1Waves_T1UsdPriceX6)) + " wx_T1Xtn_T1UsdPriceX6=") + toString(wx_T1Xtn_T1UsdPriceX6)) + " swop_T1Xtn_T1UsdPriceX6=") + toString(swop_T1Xtn_T1UsdPriceX6))
100+ $Tuple2(T1UsdPriceX6, debug)
101101 }
102102
103103
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
4646 func tryGetInteger (key) = match getInteger(this, key) {
4747 case b: Int =>
4848 b
4949 case _ =>
5050 0
5151 }
5252
5353
5454 let doraAddressStr = "3PKkojKdd6BBzTf1RXbQVfUDraNFXXHKzQF"
5555
5656 let doraAddress = addressFromStringValue(doraAddressStr)
5757
5858 let xtnUsdPriceX6 = valueOrErrorMessage(getInteger(doraAddress, "%s%s__price__USDN-USDT"), "DORA doesn't contain USDN/USDT price")
5959
6060 func getTokenPrice (tokenNum,wavesUsdPriceX6) = {
6161 let tokenIdStr = tokenIds[tokenNum]
6262 let tokenId = fromBase58String(tokenIdStr)
63- let wx_ViresWaves_lp = tokenWXWavesLPs[tokenNum]
64- let wxRestResult = split(asString(invoke(wx_restDapp, "poolStatsREADONLY", [wx_ViresWaves_lp], nil)), "__")
65- let $t024082500 = if (tokenIsBaseAsset[tokenNum])
63+ let wx_T1Waves_lp = tokenWXWavesLPs[tokenNum]
64+ let wxRestResult = split(asString(invoke(wx_restDapp, "poolStatsREADONLY", [wx_T1Waves_lp], nil)), "__")
65+ let $t024022494 = if (tokenIsBaseAsset[tokenNum])
6666 then $Tuple2(1, 2)
6767 else $Tuple2(2, 1)
68- let wavesInPairNum = $t024082500._1
69- let tokenInPairNum = $t024082500._2
70- let wx_ViresWaves_WAVESx8 = parseIntValue(wxRestResult[wavesInPairNum])
71- let wx_ViresWaves_VIRESx8 = fraction(parseIntValue(wxRestResult[tokenInPairNum]), 100000000, tokenDecimals[tokenNum])
72- let wx_ViresWaves_ViresUsdPriceX6 = fraction(wx_ViresWaves_WAVESx8, wavesUsdPriceX6, wx_ViresWaves_VIRESx8)
73- let wx_ViresWaves_Weight = wx_ViresWaves_VIRESx8
74- let wx_ViresXtn_AddressStr = tokenWXXTNPools[tokenNum]
75- let $t029213386 = if ((wx_ViresXtn_AddressStr == ""))
68+ let wavesInPairNum = $t024022494._1
69+ let tokenInPairNum = $t024022494._2
70+ let wx_T1Waves_WAVESx8 = parseIntValue(wxRestResult[wavesInPairNum])
71+ let wx_T1Waves_T1x8 = fraction(parseIntValue(wxRestResult[tokenInPairNum]), 100000000, tokenDecimals[tokenNum])
72+ let wx_T1Waves_T1UsdPriceX6 = fraction(wx_T1Waves_WAVESx8, wavesUsdPriceX6, wx_T1Waves_T1x8)
73+ let wx_T1Waves_Weight = wx_T1Waves_T1x8
74+ let wx_T1Xtn_AddressStr = tokenWXXTNPools[tokenNum]
75+ let $t028793296 = if ((wx_T1Xtn_AddressStr == ""))
7676 then $Tuple2(0, 0)
7777 else {
78- let wx_ViresXtn_Address = addressFromStringValue(wx_ViresXtn_AddressStr)
79- let wx_ViresXtn_XTNx6 = assetBalance(wx_ViresXtn_Address, xtnId)
80- let wx_ViresXtn_VIRESx8 = assetBalance(wx_ViresXtn_Address, tokenId)
81- $Tuple2(fraction((wx_ViresXtn_XTNx6 * (tokenDecimals[tokenNum] / 1000000)), xtnUsdPriceX6, wx_ViresXtn_VIRESx8), wx_ViresXtn_VIRESx8)
78+ let wx_T1Xtn_Address = addressFromStringValue(wx_T1Xtn_AddressStr)
79+ let wx_T1Xtn_XTNx6 = assetBalance(wx_T1Xtn_Address, xtnId)
80+ let wx_T1Xtn_T1x8 = assetBalance(wx_T1Xtn_Address, tokenId)
81+ $Tuple2(fraction((wx_T1Xtn_XTNx6 * (tokenDecimals[tokenNum] / 1000000)), xtnUsdPriceX6, wx_T1Xtn_T1x8), wx_T1Xtn_T1x8)
8282 }
83- let wx_ViresXtn_ViresUsdPriceX6 = $t029213386._1
84- let wx_ViresXtn_Weight = $t029213386._2
85- let swop_ViresXtn_AddressStr = tokenSwopPools[tokenNum]
86- let $t034484104 = if ((swop_ViresXtn_AddressStr == ""))
83+ let wx_T1Xtn_T1UsdPriceX6 = $t028793296._1
84+ let wx_T1Xtn_Weight = $t028793296._2
85+ let swop_T1Xtn_AddressStr = tokenSwopPools[tokenNum]
86+ let $t033553957 = if ((swop_T1Xtn_AddressStr == ""))
8787 then $Tuple2(0, 0)
8888 else {
89- let swop_ViresXtn_Address = addressFromStringValue(swop_ViresXtn_AddressStr)
90- let swop_ViresXtn_ViresXtnPriceX6 = asInt(invoke(swopRestDapp, "calcGetAmountCPMM", [swop_ViresXtn_AddressStr, "3P88qk1KzF1BKjD7fC7LjNVAKM4ezff5WE6", tokenIdStr, tokenDecimals[tokenNum]], nil))
91- let swop_ViresXtn_ViresUsdPriceX6 = fraction(swop_ViresXtn_ViresXtnPriceX6, xtnUsdPriceX6, 1000000)
92- let swop_ViresXtn_Weight = getIntegerValue(swop_ViresXtn_Address, "A_asset_balance")
93- $Tuple2(swop_ViresXtn_ViresUsdPriceX6, swop_ViresXtn_Weight)
89+ let swop_T1Xtn_Address = addressFromStringValue(swop_T1Xtn_AddressStr)
90+ let swop_T1Xtn_T1XtnPriceX6 = asInt(invoke(swopRestDapp, "calcGetAmountCPMM", [swop_T1Xtn_AddressStr, "3P88qk1KzF1BKjD7fC7LjNVAKM4ezff5WE6", tokenIdStr, tokenDecimals[tokenNum]], nil))
91+ let swop_T1Xtn_T1UsdPriceX6 = fraction(swop_T1Xtn_T1XtnPriceX6, xtnUsdPriceX6, 1000000)
92+ let swop_T1Xtn_Weight = getIntegerValue(swop_T1Xtn_Address, "A_asset_balance")
93+ $Tuple2(swop_T1Xtn_T1UsdPriceX6, swop_T1Xtn_Weight)
9494 }
95- let swop_ViresXtn_ViresUsdPriceX6 = $t034484104._1
96- let swop_ViresXtn_Weight = $t034484104._2
97- let W = ((wx_ViresWaves_Weight + wx_ViresXtn_Weight) + swop_ViresXtn_Weight)
98- 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))
99- 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))
100- $Tuple2(viresUsdPriceX6, debug)
95+ let swop_T1Xtn_T1UsdPriceX6 = $t033553957._1
96+ let swop_T1Xtn_Weight = $t033553957._2
97+ let W = ((wx_T1Waves_Weight + wx_T1Xtn_Weight) + swop_T1Xtn_Weight)
98+ let T1UsdPriceX6 = ((fraction(wx_T1Waves_T1UsdPriceX6, wx_T1Waves_Weight, W) + fraction(wx_T1Xtn_T1UsdPriceX6, wx_T1Xtn_Weight, W)) + fraction(swop_T1Xtn_T1UsdPriceX6, swop_T1Xtn_Weight, W))
99+ let debug = ((((((("T1UsdPriceX6=" + toString(T1UsdPriceX6)) + " wx_T1Waves_T1UsdPriceX6=") + toString(wx_T1Waves_T1UsdPriceX6)) + " wx_T1Xtn_T1UsdPriceX6=") + toString(wx_T1Xtn_T1UsdPriceX6)) + " swop_T1Xtn_T1UsdPriceX6=") + toString(swop_T1Xtn_T1UsdPriceX6))
100+ $Tuple2(T1UsdPriceX6, debug)
101101 }
102102
103103
104104 @Callable(i)
105105 func updateTokenPrice (assetIdStr) = {
106106 let wavesPrice = getIntegerValue(doraAddress, "%s%s__price__WAVES-USDT")
107107 let tokenPrice = if ((assetIdStr == "WAVES"))
108108 then wavesPrice
109109 else if ((assetIdStr == xtnIdStr))
110110 then xtnUsdPriceX6
111111 else getTokenPrice(value(indexOf(tokenIds, assetIdStr)), wavesPrice)._1
112112 let lastTwap = tryGetInteger((assetIdStr + "_twap5B"))
113113 let lastHeight = tryGetInteger((assetIdStr + "_lastBlock"))
114114 let totalData = tryGetInteger((assetIdStr + "_totalData"))
115115 if (if ((lastHeight == 0))
116116 then true
117117 else ((height - lastHeight) > 30))
118118 then [IntegerEntry((assetIdStr + "_twap5B"), tokenPrice), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), 1)]
119119 else if ((5 > totalData))
120120 then [IntegerEntry((assetIdStr + "_twap5B"), (((lastTwap * totalData) + tokenPrice) / (totalData + 1))), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), (totalData + 1))]
121121 else [IntegerEntry((assetIdStr + "_twap5B"), (((lastTwap * 4) + tokenPrice) / 5)), IntegerEntry((assetIdStr + "_lastBlock"), height), IntegerEntry((assetIdStr + "_totalData"), (totalData + 1))]
122122 }
123123
124124
125125
126126 @Callable(i)
127127 func updateTokens () = {
128128 let i1 = invoke(this, "updateTokenPrice", ["WAVES"], nil)
129129 if ((i1 == i1))
130130 then {
131131 let i2 = invoke(this, "updateTokenPrice", [xtnIdStr], nil)
132132 if ((i2 == i2))
133133 then {
134134 func callu (accum,next) = {
135135 let i3 = invoke(this, "updateTokenPrice", [next], nil)
136136 if ((i3 == i3))
137137 then nil
138138 else throw("Strict value is not equal to itself.")
139139 }
140140
141141 let $l = tokenIds
142142 let $s = size($l)
143143 let $acc0 = nil
144144 func $f0_1 ($a,$i) = if (($i >= $s))
145145 then $a
146146 else callu($a, $l[$i])
147147
148148 func $f0_2 ($a,$i) = if (($i >= $s))
149149 then $a
150150 else throw("List size exceeds 12")
151151
152152 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12)
153153 }
154154 else throw("Strict value is not equal to itself.")
155155 }
156156 else throw("Strict value is not equal to itself.")
157157 }
158158
159159
160160 @Verifier(tx)
161161 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
162162

github/deemru/w8io/3ef1775 
72.49 ms