tx · CUEGJsbdrbbjkmzzRDHTS76tspgo2DGf56eCrkwC32eY

3P4KBJT1v7EKubb5Dvij88FgpDBmJ21RPBR:  -0.01000000 Waves

2023.03.02 02:28 [3537136] smart account 3P4KBJT1v7EKubb5Dvij88FgpDBmJ21RPBR > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CUEGJsbdrbbjkmzzRDHTS76tspgo2DGf56eCrkwC32eY",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1677713381721,
    "version": 2,
    "chainId": 87,
    "sender": "3P4KBJT1v7EKubb5Dvij88FgpDBmJ21RPBR",
    "senderPublicKey": "EJ6kVs5NZQFA4cCHHhvVMfrvHXu4RdB1RiVHNrGkYYsU",
    "proofs": [
        "21fo3AkcQzmLZKExisBXMQ3fKjMP55t35NtXc4PnnkE4wE4Lp1zC32tXsvbT5AQW5a4oiZ3DfSqGV1ZpcmSjM3dv"
    ],
    "script": "base64:BgICCAIBARRmaW5hbGl6ZVd4VXNkT25jaGFpbgEPd2F2ZXNVc2RQcmljZVg2BA14dG5Vc2RQcmljZVg2AMCaDAQIeHRuSWRTdHICLERHMnhGa1BkRHdLVW9Ca3pHQWhRdExwU0d6ZlhMaUNZUEV6ZUtIMkFkMjRwBAZ1c2R0SWQCLDM0TjlZY0VFVExXbjkzcVlRNjRFc1AxeDg5dFNydUpVNDRSckVNU1hYRVBKBAd3eElkU3RyAixBdHF2NTlFWXpqRkd1aXRLVm5NUms2SDhGdWtqb1Yza3RQb3JiRXlzMjVvbgQFeHRuSWQJANkEAQUIeHRuSWRTdHIEBHd4SWQJANkEAQUHd3hJZFN0cgQVd3hfV3hXYXZlc19BZGRyZXNzU3RyAiMzUEZ6YUgyZ2hwd0FOSEZnamV2YTgzTjF5eHpFckVMeDJlaAQSd3hfV3hXYXZlc19BZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBRV3eF9XeFdhdmVzX0FkZHJlc3NTdHIEEXd4X1d4V2F2ZXNfV2VpZ2h0ANCGAwQSd3hfV3hXYXZlc19XQVZFU3g4CAkA7wcBBRJ3eF9XeFdhdmVzX0FkZHJlc3MHcmVndWxhcgQPd3hfV3hXYXZlc19XWHg4CQDwBwIFEnd4X1d4V2F2ZXNfQWRkcmVzcwUEd3hJZAQXd3hfV3hXYXZlc19XeFVzZFByaWNlWDYJAGsDBRJ3eF9XeFdhdmVzX1dBVkVTeDgFD3dhdmVzVXNkUHJpY2VYNgUPd3hfV3hXYXZlc19XWHg4BBN3eF9XeFh0bl9BZGRyZXNzU3RyAiMzUENFTnBFS2U4YXR3RUxaN29DU21jZEVmY1J1S1RyVXg5OQQQd3hfV3hYdG5fQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUTd3hfV3hYdG5fQWRkcmVzc1N0cgQPd3hfV3hYdG5fV2VpZ2h0ANCGAwQOd3hfV3hYdG5fWFROeDYJAPAHAgUQd3hfV3hYdG5fQWRkcmVzcwUFeHRuSWQEDXd4X1d4WHRuX1dYeDgJAPAHAgUQd3hfV3hYdG5fQWRkcmVzcwUEd3hJZAQVd3hfV3hYdG5fV3hVc2RQcmljZVg2CQBrAwkAaAIFDnd4X1d4WHRuX1hUTng2AGQFDXh0blVzZFByaWNlWDYFDXd4X1d4WHRuX1dYeDgEE3N3b3BXeFh0bkFkZHJlc3NTdHICIzNQS2k0RzNWWDJrNDJaU21OTnJtdmdkREg3SnpSYVVoWTdSBAhzd29wUmVzdAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1A1NmpOUXpFQ1hucldwbmJiU0pLdzdFb29vNmZrVWFNUHAED3N3b3BXeFh0bldlaWdodACIJwQQc3dvcFd4WHRuUHJpY2VYNgoAAUAJAPwHBAUIc3dvcFJlc3QCEWNhbGNHZXRBbW91bnRDUE1NCQDMCAIFE3N3b3BXeFh0bkFkZHJlc3NTdHIJAMwIAgIjM1A4OHFrMUt6RjFCS2pEN2ZDN0xqTlZBS000ZXpmZjVXRTYJAMwIAgUEd3hJZAkAzAgCAIDC1y8FA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEFAUACGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAkAzAgCBRd3eF9XeFdhdmVzX1d4VXNkUHJpY2VYNgkAzAgCBRV3eF9XeFh0bl9XeFVzZFByaWNlWDYJAMwIAgUQc3dvcFd4WHRuUHJpY2VYNgUDbmlsAAAlYZgz",
    "height": 3537136,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: JA9Z55KJc4X9eXfVScVu4YeGcDrwbkkT9HVKY8VPB2kf
Next: 9mexF1uRQUdkDeDRnKgUBVmkKELNcF8XAg482viq6NpY

Full: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
func finalizeUsdnUsdtOnchain () = {
5
-
    let wavesUsdtPriceX6 = 3000000
6
-
    let ethUsdtPriceX6 = 1700000000
7
-
    let symbol = "USDN-USDT"
4
+
func finalizeWxUsdOnchain (wavesUsdPriceX6) = {
5
+
    let xtnUsdPriceX6 = 200000
8
6
 
    let xtnIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
7
+
    let usdtId = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
8
+
    let wxIdStr = "Atqv59EYzjFGuitKVnMRk6H8FukjoV3ktPorbEys25on"
9
9
 
    let xtnId = fromBase58String(xtnIdStr)
10
-
    let usdtIdStr = "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ"
11
-
    let usdnAmount = 1000000000
12
-
    let wxUsdtXtnPoolStr = "3P8KMyAJCPWNcyedqrmymxaeWonvmkhGauz"
13
-
    let wxUsdtXtnPoolAddress = addressFromStringValue(wxUsdtXtnPoolStr)
14
-
    let wxUsdtXtnW = 67
15
-
    let $t0581729 = {
16
-
        let @ = invoke(wxUsdtXtnPoolAddress, "putOneTknV2WithBonusREADONLY", [usdnAmount, xtnIdStr], nil)
17
-
        if ($isInstanceOf(@, "(Int, Int, Int)"))
18
-
            then @
19
-
            else throw("Couldn't cast Any to (Int, Int, Int)")
20
-
        }
21
-
    let lpAmount = $t0581729._1
22
-
    let feeAmount1 = $t0581729._2
23
-
    let bonus = $t0581729._3
24
-
    let $t0732860 = {
25
-
        let @ = invoke(wxUsdtXtnPoolAddress, "getOneTknV2READONLY", [usdtIdStr, lpAmount], nil)
26
-
        if ($isInstanceOf(@, "(Int, Int)"))
27
-
            then @
28
-
            else throw("Couldn't cast Any to (Int, Int)")
29
-
        }
30
-
    let usdtAmount = $t0732860._1
31
-
    let feeAmount2 = $t0732860._2
32
-
    let wxUsdtXtnPrice = fraction(usdtAmount, 1000000, usdnAmount)
33
-
    let wxWavesXtnW = 487
34
-
    let wxWavesXtnPoolStr = "3PPZWgFNRKHLvM51pwS934C8VZ7d2F4Z58g"
35
-
    let wxWavesXtnPoolAddress = addressFromStringValue(wxWavesXtnPoolStr)
36
-
    let wavesWavesXtnX8 = wavesBalance(wxWavesXtnPoolAddress).regular
37
-
    let xtnWavesXtnX6 = assetBalance(wxWavesXtnPoolAddress, xtnId)
38
-
    let wavesXtnPriceX6 = fraction(xtnWavesXtnX6, 100000000, wavesWavesXtnX8)
39
-
    let wxWavesUsdtXtnPrice = fraction(wavesUsdtPriceX6, 1000000, wavesXtnPriceX6)
40
-
    let wxEthXtnW = 5
41
-
    let ethIdStr = "474jTeYx2r2Va35794tCScAXWJG9hU2HcgxzMowaZUnu"
42
-
    let ethId = fromBase58String(ethIdStr)
43
-
    let wxEthXtnPoolStr = "3PEMqetsaJDbYMw1XGovmE37FB8VUhGnX9A"
44
-
    let wxEthXtnPoolAddress = addressFromStringValue(wxEthXtnPoolStr)
45
-
    let ethEthXtnX8 = assetBalance(wxEthXtnPoolAddress, ethId)
46
-
    let xtnEthXtnX6 = assetBalance(wxEthXtnPoolAddress, xtnId)
47
-
    let ethXtnPriceX6 = fraction(xtnEthXtnX6, 100000000, ethEthXtnX8)
48
-
    let wxEthUsdtXtnPrice = fraction(ethUsdtPriceX6, 1000000, ethXtnPriceX6)
49
-
    let swopfiWavesXtnW = 433
50
-
    let swopfiRest = addressFromStringValue("3P56jNQzECXnrWpnbbSJKw7Eooo6fkUaMPp")
51
-
    let swopfiWavesXtnPriceX6 = {
52
-
        let @ = invoke(swopfiRest, "calcGetAmountCPMM", ["3PHaNgomBkrvEL2QnuJarQVJa71wjw9qiqG", "3PQHCTqfzE8e1Jo8m1QVaCXATSKyMmkYasF", "WAVES", 100000000], nil)
10
+
    let wxId = fromBase58String(wxIdStr)
11
+
    let wx_WxWaves_AddressStr = "3PFzaH2ghpwANHFgjeva83N1yxzErELx2eh"
12
+
    let wx_WxWaves_Address = addressFromStringValue(wx_WxWaves_AddressStr)
13
+
    let wx_WxWaves_Weight = 50000
14
+
    let wx_WxWaves_WAVESx8 = wavesBalance(wx_WxWaves_Address).regular
15
+
    let wx_WxWaves_WXx8 = assetBalance(wx_WxWaves_Address, wxId)
16
+
    let wx_WxWaves_WxUsdPriceX6 = fraction(wx_WxWaves_WAVESx8, wavesUsdPriceX6, wx_WxWaves_WXx8)
17
+
    let wx_WxXtn_AddressStr = "3PCENpEKe8atwELZ7oCSmcdEfcRuKTrUx99"
18
+
    let wx_WxXtn_Address = addressFromStringValue(wx_WxXtn_AddressStr)
19
+
    let wx_WxXtn_Weight = 50000
20
+
    let wx_WxXtn_XTNx6 = assetBalance(wx_WxXtn_Address, xtnId)
21
+
    let wx_WxXtn_WXx8 = assetBalance(wx_WxXtn_Address, wxId)
22
+
    let wx_WxXtn_WxUsdPriceX6 = fraction((wx_WxXtn_XTNx6 * 100), xtnUsdPriceX6, wx_WxXtn_WXx8)
23
+
    let swopWxXtnAddressStr = "3PKi4G3VX2k42ZSmNNrmvgdDH7JzRaUhY7R"
24
+
    let swopRest = addressFromStringValue("3P56jNQzECXnrWpnbbSJKw7Eooo6fkUaMPp")
25
+
    let swopWxXtnWeight = 5000
26
+
    let swopWxXtnPriceX6 = {
27
+
        let @ = invoke(swopRest, "calcGetAmountCPMM", [swopWxXtnAddressStr, "3P88qk1KzF1BKjD7fC7LjNVAKM4ezff5WE6", wxId, 100000000], nil)
53
28
 
        if ($isInstanceOf(@, "Int"))
54
29
 
            then @
55
-
            else throw("Couldn't cast Any to Int")
30
+
            else throw(($getType(@) + " couldn't be cast to Int"))
56
31
 
        }
57
-
    let swopfiWavesUsdtXtnPrice = fraction(wavesUsdtPriceX6, 1000000, swopfiWavesXtnPriceX6)
58
-
    let finalPrice = (((fraction(wxUsdtXtnPrice, wxUsdtXtnW, 1000) + fraction(wxWavesUsdtXtnPrice, wxWavesXtnW, 1000)) + fraction(wxEthUsdtXtnPrice, wxEthXtnW, 1000)) + fraction(swopfiWavesUsdtXtnPrice, swopfiWavesXtnW, 1000))
59
-
[toString(wxUsdtXtnPrice), toString(wxWavesUsdtXtnPrice), toString(wxEthUsdtXtnPrice), toString(swopfiWavesUsdtXtnPrice), toString(finalPrice)]
32
+
[wx_WxWaves_WxUsdPriceX6, wx_WxXtn_WxUsdPriceX6, swopWxXtnPriceX6]
60
33
 
    }
61
34
 
62
-
63
-
@Callable(i)
64
-
func test () = $Tuple2(nil, finalizeUsdnUsdtOnchain())
65
35
 
66
36
 

github/deemru/w8io/3ef1775 
33.68 ms ◑