tx · Fx4EaN274qJ7Y6v7kuJArMNcuzi1y1kfouCQeq7MzKCa

3MvdzbvEZLHEE3EXHXxaRQjgpNqq28733ao:  -0.01000000 Waves

2021.12.22 17:32 [1845593] smart account 3MvdzbvEZLHEE3EXHXxaRQjgpNqq28733ao > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Fx4EaN274qJ7Y6v7kuJArMNcuzi1y1kfouCQeq7MzKCa",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1640183581069,
    "version": 1,
    "sender": "3MvdzbvEZLHEE3EXHXxaRQjgpNqq28733ao",
    "senderPublicKey": "HQmnkZjA2Ehwb2iKXAadqRsrXsHGZChU6WfgmHRsMW8t",
    "proofs": [
        "5ToybxoyEoiqHURHTj9Dc3oQdcpq2jtRgaAX5Z4F6BnbLncJ3UV88apTcsin8gamwYozDvJv9qeJBKN5qheppLo1"
    ],
    "script": "base64:AAIFAAAAAAAAAAoIAhIGCgQICAEBAAAABwAAAAAJY29sbGVjdG9yCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFU47bKEjTub0Zv8MqogOOLr3FN8V5cdRMdAAAAAAZvcmFjbGUJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCYAAAABCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwIAAAAGb3JhY2xlAgAAAAACAAAAAAAAAAAFcG9vbHMJAAS1AAAAAgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABm9yYWNsZQIAAAAFcG9vbHMCAAAAAAIAAAABLAEAAAAKZ2V0QXNzZXRJZAAAAAEAAAAFYXNzZXQDCQAAAAAAAAIFAAAABWFzc2V0AgAAAAVXQVZFUwUAAAAEdW5pdAkAAlkAAAABBQAAAAVhc3NldAEAAAAKZ2V0QmFsYW5jZQAAAAEAAAAHYXNzZXRJZAQAAAAHJG1hdGNoMAUAAAAHYXNzZXRJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKQnl0ZVZlY3RvcgQAAAAFYXNzZXQFAAAAByRtYXRjaDAJAAPwAAAAAgUAAAAEdGhpcwUAAAAFYXNzZXQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQEAAAABXdhdmVzBQAAAAckbWF0Y2gwCAkAA+8AAAABBQAAAAR0aGlzAAAACWF2YWlsYWJsZQkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgAAAAAJZmVlQXNzZXRzBAAAAAZhc3NldHMJAAS1AAAAAgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMCAAAACmZlZS1hc3NldHMCAAAAAAIAAAABLAoBAAAACnRvQXNzZXRJZHMAAAACAAAAA2FjYwAAAAhhc3NldFN0cgkABE0AAAACBQAAAANhY2MJAQAAAApnZXRBc3NldElkAAAAAQUAAAAIYXNzZXRTdHIKAAAAAAIkbAUAAAAGYXNzZXRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAp0b0Fzc2V0SWRzAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgEAAAAGZG9Td2FwAAAABQAAAARwb29sAAAAB3BheW1lbnQAAAANYXNzZXRSZWNlaXZlZAAAAAttaW5SZWNlaXZlZAAAAAtlc3RSZWNlaXZlZAQAAAALcG9vbEFkZHJlc3MJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCYAAAABBQAAAARwb29sAgAAAAAEAAAAD2Fzc2V0UmVjZWl2ZWRJZAkBAAAACmdldEFzc2V0SWQAAAABBQAAAA1hc3NldFJlY2VpdmVkAwkAAGcAAAACAAAAAAAAAAAABQAAAAttaW5SZWNlaXZlZAkAAAIAAAABAgAAAAADCQAAZgAAAAIAAAAAAAAAAAAFAAAAC2VzdFJlY2VpdmVkCQAAAgAAAAECAAAAAAQAAAANYmFsYW5jZUJlZm9yZQkBAAAACmdldEJhbGFuY2UAAAABBQAAAA9hc3NldFJlY2VpdmVkSWQDCQAAAAAAAAIFAAAADWJhbGFuY2VCZWZvcmUFAAAADWJhbGFuY2VCZWZvcmUEAAAABnJlc3VsdAMJAQAAAAEhAAAAAQkBAAAAD2NvbnRhaW5zRWxlbWVudAAAAAIFAAAABXBvb2xzBQAAAARwb29sCQAAAgAAAAECAAAAAAQAAAAKcG9vbEFzc2V0QQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAAC3Bvb2xBZGRyZXNzAgAAAApBX2Fzc2V0X2lkAgAAAAAEAAAACnBvb2xBc3NldEIJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAtwb29sQWRkcmVzcwIAAAAKQl9hc3NldF9pZAIAAAAABAAAAAxwb29sQXNzZXRJZEEJAQAAAApnZXRBc3NldElkAAAAAQUAAAAKcG9vbEFzc2V0QQQAAAAMcG9vbEFzc2V0SWRCCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAACnBvb2xBc3NldEIEAAAADHZlcnNpb25NYWpvcgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEtgAAAAEJAAGRAAAAAgkABLUAAAACCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAALcG9vbEFkZHJlc3MCAAAAB3ZlcnNpb24CAAAAAAIAAAABLgAAAAAAAAAAAAIAAAAABAAAAARhcmdzAwkAAAAAAAACBQAAAAx2ZXJzaW9uTWFqb3IAAAAAAAAAAAEJAARMAAAAAgUAAAALbWluUmVjZWl2ZWQFAAAAA25pbAMJAAAAAAAAAgUAAAAMdmVyc2lvbk1ham9yAAAAAAAAAAACAwkAAGcAAAACAAAAAAAAAAAABQAAAAtlc3RSZWNlaXZlZAkAAAIAAAABAgAAAAAJAARMAAAAAgUAAAALZXN0UmVjZWl2ZWQJAARMAAAAAgUAAAALbWluUmVjZWl2ZWQFAAAAA25pbAkAAAIAAAABAgAAAAAJAAP8AAAABAUAAAALcG9vbEFkZHJlc3MCAAAACGV4Y2hhbmdlBQAAAARhcmdzCQAETAAAAAIFAAAAB3BheW1lbnQFAAAAA25pbAMJAAAAAAAAAgUAAAAGcmVzdWx0BQAAAAZyZXN1bHQEAAAACHJlY2VpdmVkCQAAZQAAAAIJAQAAAApnZXRCYWxhbmNlAAAAAQUAAAAPYXNzZXRSZWNlaXZlZElkBQAAAA1iYWxhbmNlQmVmb3JlAwkAAAAAAAACBQAAAAhyZWNlaXZlZAUAAAAIcmVjZWl2ZWQJAAUUAAAAAgUAAAANYmFsYW5jZUJlZm9yZQUAAAAIcmVjZWl2ZWQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABAAAAA2ludgEAAAAEc3dhcAAAAAQAAAAEcG9vbAAAAA5hc3NldFRvUmVjZWl2ZQAAAAttaW5SZWNlaXZlZAAAAAtlc3RSZWNlaXZlZAQAAAADcG10AwkAAGYAAAACCQABkAAAAAEIBQAAAANpbnYAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAGRAAAAAggFAAAAA2ludgAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAAAAEAAAAD2Fzc2V0UmVjZWl2ZWRJZAkBAAAACmdldEFzc2V0SWQAAAABBQAAAA5hc3NldFRvUmVjZWl2ZQoBAAAACWRlZHVjdEZlZQAAAAEAAAAGYW1vdW50CQAAawAAAAMFAAAABmFtb3VudAAAAAAAAAAAAQAAAAAAAAAD6AMJAABnAAAAAgAAAAAAAAAAAAUAAAALbWluUmVjZWl2ZWQJAAACAAAAAQIAAAAABAAAAAskdDAyODUxMzA1NgQAAAAHJG1hdGNoMAkBAAAABmRvU3dhcAAAAAUFAAAABHBvb2wFAAAAA3BtdAUAAAAOYXNzZXRUb1JlY2VpdmUFAAAAC21pblJlY2VpdmVkBQAAAAtlc3RSZWNlaXZlZAMDAwkAAAEAAAACCAUAAAAHJG1hdGNoMAAAAAJfMQIAAAADSW50CQAAAQAAAAIIBQAAAAckbWF0Y2gwAAAAAl8yAgAAAANJbnQHCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACihJbnQsIEludCkHBAAAAAZiZWZvcmUIBQAAAAckbWF0Y2gwAAAAAl8xBAAAAAZpbmNvbWUIBQAAAAckbWF0Y2gwAAAAAl8yCQAFFAAAAAIFAAAABmJlZm9yZQUAAAAGaW5jb21lCQAAAgAAAAECAAAAAAQAAAANYmFsYW5jZUJlZm9yZQgFAAAACyR0MDI4NTEzMDU2AAAAAl8xBAAAAAhyZWNlaXZlZAgFAAAACyR0MDI4NTEzMDU2AAAAAl8yAwkAAGcAAAACAAAAAAAAAAAABQAAAAhyZWNlaXZlZAkAAAIAAAABAgAAAAAEAAAAA2ZlZQkBAAAACWRlZHVjdEZlZQAAAAEFAAAACHJlY2VpdmVkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAANpbnYAAAAGY2FsbGVyCQAAZQAAAAIFAAAACHJlY2VpdmVkBQAAAANmZWUFAAAAD2Fzc2V0UmVjZWl2ZWRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAljb2xsZWN0b3IFAAAAA2ZlZQUAAAAPYXNzZXRSZWNlaXZlZElkBQAAAANuaWwAAAAA+2eoVg==",
    "chainId": 84,
    "height": 1845593,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: hJc2yCLUiTiqXXmM6Yfdxcx3mkVCU52bBFs721pry4S
Next: 28rFLZUpaFTfsrNinwV1sYCSHdfjkzRJbwFLBgUY5ps8

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let collector = Address(base58'')
4
+
let collector = Address(base58'3NAg88thAKj5n9SNE3PkyBj1e8bBM2k8qun')
5
5
 
6
6
 
let oracle = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(this, "oracle"), "")), "")
7
7
 
93
93
 
    if ((0 >= minReceived))
94
94
 
        then throw("")
95
95
 
        else {
96
-
            let $t028163021 =             match doSwap(pool, pmt, assetToReceive, minReceived, estReceived) {
96
+
            let $t028513056 =             match doSwap(pool, pmt, assetToReceive, minReceived, estReceived) {
97
97
 
                case _ => 
98
98
 
                    if (if (if ($isInstanceOf($match0._1, "Int"))
99
99
 
                        then $isInstanceOf($match0._2, "Int")
107
107
 
                            }
108
108
 
                        else throw("")
109
109
 
            }
110
-
            let balanceBefore = $t028163021._1
111
-
            let received = $t028163021._2
110
+
            let balanceBefore = $t028513056._1
111
+
            let received = $t028513056._2
112
112
 
            if ((0 >= received))
113
113
 
                then throw("")
114
114
 
                else {
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let collector = Address(base58'')
4
+
let collector = Address(base58'3NAg88thAKj5n9SNE3PkyBj1e8bBM2k8qun')
5
5
 
6
6
 
let oracle = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(this, "oracle"), "")), "")
7
7
 
8
8
 
let pools = split(valueOrErrorMessage(getString(oracle, "pools"), ""), ",")
9
9
 
10
10
 
func getAssetId (asset) = if ((asset == "WAVES"))
11
11
 
    then unit
12
12
 
    else fromBase58String(asset)
13
13
 
14
14
 
15
15
 
func getBalance (assetId) = match assetId {
16
16
 
    case asset: ByteVector => 
17
17
 
        assetBalance(this, asset)
18
18
 
    case waves: Unit => 
19
19
 
        wavesBalance(this).available
20
20
 
    case _ => 
21
21
 
        throw("Match error")
22
22
 
}
23
23
 
24
24
 
25
25
 
let feeAssets = {
26
26
 
    let assets = split(valueOrErrorMessage(getString(this, "fee-assets"), ""), ",")
27
27
 
    func toAssetIds (acc,assetStr) =     (acc :+ getAssetId(assetStr))
28
28
 
29
29
 
    let $l = assets
30
30
 
    let $s = size($l)
31
31
 
    let $acc0 = nil
32
32
 
    func 1 ($a,$i) =     if (($i >= $s))
33
33
 
        then $a
34
34
 
        else toAssetIds($a, $l[$i])
35
35
 
36
36
 
    func 2 ($a,$i) =     if (($i >= $s))
37
37
 
        then $a
38
38
 
        else throw("List size exceeds 10")
39
39
 
40
40
 
    2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
41
41
 
    }
42
42
 
43
43
 
func doSwap (pool,payment,assetReceived,minReceived,estReceived) = {
44
44
 
    let poolAddress = valueOrErrorMessage(addressFromString(pool), "")
45
45
 
    let assetReceivedId = getAssetId(assetReceived)
46
46
 
    if ((0 >= minReceived))
47
47
 
        then throw("")
48
48
 
        else if ((0 > estReceived))
49
49
 
            then throw("")
50
50
 
            else {
51
51
 
                let balanceBefore = getBalance(assetReceivedId)
52
52
 
                if ((balanceBefore == balanceBefore))
53
53
 
                    then {
54
54
 
                        let result = if (!(containsElement(pools, pool)))
55
55
 
                            then throw("")
56
56
 
                            else {
57
57
 
                                let poolAssetA = valueOrErrorMessage(getString(poolAddress, "A_asset_id"), "")
58
58
 
                                let poolAssetB = valueOrErrorMessage(getString(poolAddress, "B_asset_id"), "")
59
59
 
                                let poolAssetIdA = getAssetId(poolAssetA)
60
60
 
                                let poolAssetIdB = getAssetId(poolAssetB)
61
61
 
                                let versionMajor = valueOrErrorMessage(parseInt(split(valueOrErrorMessage(getString(poolAddress, "version"), ""), ".")[0]), "")
62
62
 
                                let args = if ((versionMajor == 1))
63
63
 
                                    then [minReceived]
64
64
 
                                    else if ((versionMajor == 2))
65
65
 
                                        then if ((0 >= estReceived))
66
66
 
                                            then throw("")
67
67
 
                                            else [estReceived, minReceived]
68
68
 
                                        else throw("")
69
69
 
                                invoke(poolAddress, "exchange", args, [payment])
70
70
 
                                }
71
71
 
                        if ((result == result))
72
72
 
                            then {
73
73
 
                                let received = (getBalance(assetReceivedId) - balanceBefore)
74
74
 
                                if ((received == received))
75
75
 
                                    then $Tuple2(balanceBefore, received)
76
76
 
                                    else throw("Strict value is not equal to itself.")
77
77
 
                                }
78
78
 
                            else throw("Strict value is not equal to itself.")
79
79
 
                        }
80
80
 
                    else throw("Strict value is not equal to itself.")
81
81
 
                }
82
82
 
    }
83
83
 
84
84
 
85
85
 
@Callable(inv)
86
86
 
func swap (pool,assetToReceive,minReceived,estReceived) = {
87
87
 
    let pmt = if ((size(inv.payments) > 0))
88
88
 
        then inv.payments[0]
89
89
 
        else throw("")
90
90
 
    let assetReceivedId = getAssetId(assetToReceive)
91
91
 
    func deductFee (amount) =     fraction(amount, 1, 1000)
92
92
 
93
93
 
    if ((0 >= minReceived))
94
94
 
        then throw("")
95
95
 
        else {
96
-
            let $t028163021 =             match doSwap(pool, pmt, assetToReceive, minReceived, estReceived) {
96
+
            let $t028513056 =             match doSwap(pool, pmt, assetToReceive, minReceived, estReceived) {
97
97
 
                case _ => 
98
98
 
                    if (if (if ($isInstanceOf($match0._1, "Int"))
99
99
 
                        then $isInstanceOf($match0._2, "Int")
100
100
 
                        else false)
101
101
 
                        then $isInstanceOf($match0, "(Int, Int)")
102
102
 
                        else false)
103
103
 
                        then {
104
104
 
                            let before = $match0._1
105
105
 
                            let income = $match0._2
106
106
 
                            $Tuple2(before, income)
107
107
 
                            }
108
108
 
                        else throw("")
109
109
 
            }
110
-
            let balanceBefore = $t028163021._1
111
-
            let received = $t028163021._2
110
+
            let balanceBefore = $t028513056._1
111
+
            let received = $t028513056._2
112
112
 
            if ((0 >= received))
113
113
 
                then throw("")
114
114
 
                else {
115
115
 
                    let fee = deductFee(received)
116
116
 
[ScriptTransfer(inv.caller, (received - fee), assetReceivedId), ScriptTransfer(collector, fee, assetReceivedId)]
117
117
 
                    }
118
118
 
            }
119
119
 
    }
120
120
 
121
121
 

github/deemru/w8io/873ac7e 
31.69 ms ◑