tx · Bc4Ndd6cA9GowBsunNB8ihcCE9SiptPwHySNLBkQbC9y

3P5UKXpQbom7GB2WGdPG5yGQPeQQuM3hFmw:  -0.01000000 Waves

2022.02.03 17:54 [2972628] smart account 3P5UKXpQbom7GB2WGdPG5yGQPeQQuM3hFmw > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Bc4Ndd6cA9GowBsunNB8ihcCE9SiptPwHySNLBkQbC9y",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1643900113196,
    "version": 1,
    "sender": "3P5UKXpQbom7GB2WGdPG5yGQPeQQuM3hFmw",
    "senderPublicKey": "4MfTwwE7yP4BFGaifQrcc9Nwb5BA9t92WKhVb6Ton65k",
    "proofs": [
        "65w6fGXhG3x57JbmMBsnr3avhumdtdtYNv93hgPvjHZVKgZkSL6WKMKnz43Drd3SgZA2UKi7pgz71ZrRRyyRyxsw"
    ],
    "script": "base64:AAIFAAAAAAAAAAsIAhIHCgUYGBEBAQAAAAwBAAAAEGdldFN0cmluZ09yVGhyb3cAAAACAAAAB2FkZHJlc3MAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAHYWRkcmVzcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAxDYW4ndCByZWFkICcFAAAAA2tleQIAAAANJyBhdCBhZGRyZXNzIAkABCUAAAABBQAAAAdhZGRyZXNzAQAAABNwYXJzZUFkZHJlc3NPclRocm93AAAAAQAAAAxtYXliZUFkZHJlc3MJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCYAAAABBQAAAAxtYXliZUFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAABpDYW4ndCBwYXJzZSBhZGRyZXNzIGZyb20gJwUAAAAMbWF5YmVBZGRyZXNzAgAAAAEnAQAAAA9wYXJzZUludE9yVGhyb3cAAAABAAAACG1heWJlSW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAS2AAAAAQUAAAAIbWF5YmVJbnQJAAEsAAAAAgkAASwAAAACAgAAABpDYW4ndCBwYXJzZSBpbnRlZ2VyIGZyb20gJwUAAAAIbWF5YmVJbnQCAAAAAScAAAAACWNvbGxlY3RvcgkBAAAAE3BhcnNlQWRkcmVzc09yVGhyb3cAAAABCQEAAAAQZ2V0U3RyaW5nT3JUaHJvdwAAAAIFAAAABHRoaXMCAAAACWNvbGxlY3RvcgAAAAAGb3JhY2xlCQEAAAATcGFyc2VBZGRyZXNzT3JUaHJvdwAAAAEJAQAAABBnZXRTdHJpbmdPclRocm93AAAAAgUAAAAEdGhpcwIAAAAGb3JhY2xlAAAAAAVwb29scwkABLUAAAACCQEAAAAQZ2V0U3RyaW5nT3JUaHJvdwAAAAIFAAAABm9yYWNsZQIAAAAFcG9vbHMCAAAAASwAAAAABnBQb29scwkABEwAAAACAgAAACMzUFBSSEhGOUpLdkRMa0FjM2FIRDNLZDV0UlpwMUNvcUFKYQkABEwAAAACAgAAACMzUEtZUEtKUEhaRU5BQXdIOWU3VEY1ZWREZ3VrTnh4QnQzTQkABEwAAAACAgAAACMzUERyWVBGNml6emEyc1hXZmZ6VFBGN2UyRmNpcjJDTXBraQkABEwAAAACAgAAACMzUE5LNXlwblBKaW9MbUxVemZLNmV6cGFlUEhMeFpkNlFMagkABEwAAAACAgAAACMzUEZEZ3p1MVV0c3dBa0NNeHFxUWpiVGVIYVg0Y01hYjhLaAUAAAADbmlsAQAAAApnZXRBc3NldElkAAAAAQAAAAVhc3NldAMJAAAAAAAAAgUAAAAFYXNzZXQCAAAABVdBVkVTBQAAAAR1bml0CQACWQAAAAEFAAAABWFzc2V0AQAAAA9hc3NldElkVG9TdHJpbmcAAAABAAAAB2Fzc2V0SWQEAAAAByRtYXRjaDAFAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAABWFzc2V0BQAAAAckbWF0Y2gwCQACWAAAAAEFAAAABWFzc2V0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0BAAAAAV3YXZlcwUAAAAHJG1hdGNoMAIAAAAFV0FWRVMJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IBAAAACmdldEJhbGFuY2UAAAABAAAAB2Fzc2V0SWQEAAAAByRtYXRjaDAFAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAABWFzc2V0BQAAAAckbWF0Y2gwCQAD8AAAAAIFAAAABHRoaXMFAAAABWFzc2V0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0BAAAAAV3YXZlcwUAAAAHJG1hdGNoMAgJAAPvAAAAAQUAAAAEdGhpcwAAAAlhdmFpbGFibGUJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IBAAAACWRlZHVjdEZlZQAAAAEAAAAGYW1vdW50CQAAawAAAAMFAAAABmFtb3VudAAAAAAAAAAAAQAAAAAAAAAD6AEAAAAGZG9Td2FwAAAABQAAAARwb29sAAAAB3BheW1lbnQAAAANYXNzZXRSZWNlaXZlZAAAABJlc3RBbW91bnRUb1JlY2VpdmUAAAARc2xpcHBhZ2VUb2xlcmFuY2UEAAAAC3Bvb2xBZGRyZXNzCQEAAAATcGFyc2VBZGRyZXNzT3JUaHJvdwAAAAEFAAAABHBvb2wEAAAADHZlcnNpb25NYWpvcgkBAAAAD3BhcnNlSW50T3JUaHJvdwAAAAEJAAGRAAAAAgkABLUAAAACCQEAAAAQZ2V0U3RyaW5nT3JUaHJvdwAAAAIFAAAAC3Bvb2xBZGRyZXNzAgAAAAd2ZXJzaW9uAgAAAAEuAAAAAAAAAAAABAAAAA9hc3NldFJlY2VpdmVkSWQJAQAAAApnZXRBc3NldElkAAAAAQUAAAANYXNzZXRSZWNlaXZlZAMJAABmAAAAAgAAAAAAAAAAAAUAAAASZXN0QW1vdW50VG9SZWNlaXZlCQAAAgAAAAECAAAAI2VzdEFtb3VudFRvUmVjZWl2ZSBtdXN0IGJlIHBvc2l0aXZlAwkBAAAAD2NvbnRhaW5zRWxlbWVudAAAAAIFAAAABXBvb2xzBQAAAARwb29sBAAAAApwb29sQXNzZXRBCQEAAAAQZ2V0U3RyaW5nT3JUaHJvdwAAAAIFAAAAC3Bvb2xBZGRyZXNzAgAAAApBX2Fzc2V0X2lkBAAAAApwb29sQXNzZXRCCQEAAAAQZ2V0U3RyaW5nT3JUaHJvdwAAAAIFAAAAC3Bvb2xBZGRyZXNzAgAAAApCX2Fzc2V0X2lkBAAAAAxwb29sQXNzZXRJZEEJAQAAAApnZXRBc3NldElkAAAAAQUAAAAKcG9vbEFzc2V0QQQAAAAMcG9vbEFzc2V0SWRCCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAACnBvb2xBc3NldEIEAAAACyR0MDIxNDMyNDg3AwMJAAAAAAAAAggFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAAMcG9vbEFzc2V0SWRBCQAAAAAAAAIFAAAAD2Fzc2V0UmVjZWl2ZWRJZAUAAAAMcG9vbEFzc2V0SWRCBwkABRQAAAACBQAAAAxwb29sQXNzZXRJZEEFAAAADHBvb2xBc3NldElkQgMDCQAAAAAAAAIFAAAAD2Fzc2V0UmVjZWl2ZWRJZAUAAAAMcG9vbEFzc2V0SWRBCQAAAAAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAADHBvb2xBc3NldElkQgcJAAUUAAAAAgUAAAAMcG9vbEFzc2V0SWRCBQAAAAxwb29sQXNzZXRJZEEJAAACAAAAAQIAAAAXVW5zdXBwb3J0ZWQgYXNzZXRzIHBhaXIEAAAAB2Fzc2V0SW4IBQAAAAskdDAyMTQzMjQ4NwAAAAJfMQQAAAAIYXNzZXRPdXQIBQAAAAskdDAyMTQzMjQ4NwAAAAJfMgQAAAAEYXJncwMJAAAAAAAAAgUAAAAMdmVyc2lvbk1ham9yAAAAAAAAAAABCQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAMJAAAAAAAAAgUAAAAMdmVyc2lvbk1ham9yAAAAAAAAAAACAwkAAGcAAAACAAAAAAAAAAAABQAAABJlc3RBbW91bnRUb1JlY2VpdmUJAAACAAAAAQIAAAAjZXN0QW1vdW50VG9SZWNlaXZlIG11c3QgYmUgcG9zaXRpdmUDAwkAAGYAAAACAAAAAAAAAAAABQAAABFzbGlwcGFnZVRvbGVyYW5jZQYJAABmAAAAAgUAAAARc2xpcHBhZ2VUb2xlcmFuY2UAAAAAAAAAA+gJAAACAAAAAQIAAABGU2xpcHBhZ2UgdG9sZXJhbmNlIG11c3QgYmUgbm9uLW5lZ2F0aXZlIGFuZCBsZXNzIHRoYW4gb3IgZXF1YWwgdG8gMTAwMAkABEwAAAACBQAAABJlc3RBbW91bnRUb1JlY2VpdmUJAARMAAAAAgkAAGUAAAACCAUAAAAHcGF5bWVudAAAAAZhbW91bnQJAABrAAAAAwgFAAAAB3BheW1lbnQAAAAGYW1vdW50BQAAABFzbGlwcGFnZVRvbGVyYW5jZQAAAAAAAAAD6AUAAAADbmlsCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABZVbmtub3duIHBvb2wgdmVyc2lvbiAnCQABpAAAAAEFAAAADHZlcnNpb25NYWpvcgIAAAAWJywgYnV0IDEgb3IgMiBleHBlY3RlZAQAAAANYmFsYW5jZUJlZm9yZQkBAAAACmdldEJhbGFuY2UAAAABBQAAAA9hc3NldFJlY2VpdmVkSWQDCQAAAAAAAAIFAAAADWJhbGFuY2VCZWZvcmUFAAAADWJhbGFuY2VCZWZvcmUEAAAABnJlc3VsdAkAA/wAAAAEBQAAAAtwb29sQWRkcmVzcwIAAAAIZXhjaGFuZ2UFAAAABGFyZ3MJAARMAAAAAgUAAAAHcGF5bWVudAUAAAADbmlsAwkAAAAAAAACBQAAAAZyZXN1bHQFAAAABnJlc3VsdAQAAAAIcmVjZWl2ZWQJAABlAAAAAgkBAAAACmdldEJhbGFuY2UAAAABBQAAAA9hc3NldFJlY2VpdmVkSWQFAAAADWJhbGFuY2VCZWZvcmUDCQAAAAAAAAIFAAAACHJlY2VpdmVkBQAAAAhyZWNlaXZlZAMJAABnAAAAAgAAAAAAAAAAAAUAAAAIcmVjZWl2ZWQJAAACAAAAAQIAAAAqUmVjZWl2ZWQgYW1vdW50IGZyb20gcG9vbCBtdXN0IGJlIHBvc2l0aXZlBQAAAAhyZWNlaXZlZAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAQAAAA9jb250YWluc0VsZW1lbnQAAAACBQAAAAZwUG9vbHMFAAAABHBvb2wEAAAADWJhbGFuY2VCZWZvcmUJAQAAAApnZXRCYWxhbmNlAAAAAQUAAAAPYXNzZXRSZWNlaXZlZElkAwkAAAAAAAACBQAAAA1iYWxhbmNlQmVmb3JlBQAAAA1iYWxhbmNlQmVmb3JlBAAAAAZyZXN1bHQJAAP8AAAABAUAAAALcG9vbEFkZHJlc3MCAAAABHN3YXAJAARMAAAAAgUAAAANYXNzZXRSZWNlaXZlZAkABEwAAAACAAAAAAAAAAAABQAAAANuaWwJAARMAAAAAgUAAAAHcGF5bWVudAUAAAADbmlsAwkAAAAAAAACBQAAAAZyZXN1bHQFAAAABnJlc3VsdAQAAAAIcmVjZWl2ZWQJAABlAAAAAgkBAAAACmdldEJhbGFuY2UAAAABBQAAAA9hc3NldFJlY2VpdmVkSWQFAAAADWJhbGFuY2VCZWZvcmUDCQAAAAAAAAIFAAAACHJlY2VpdmVkBQAAAAhyZWNlaXZlZAMJAABnAAAAAgAAAAAAAAAAAAUAAAAIcmVjZWl2ZWQJAAACAAAAAQIAAAAqUmVjZWl2ZWQgYW1vdW50IGZyb20gcG9vbCBtdXN0IGJlIHBvc2l0aXZlBQAAAAhyZWNlaXZlZAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAdVGhlcmUgaXMgbm8gcG9vbCBhdCBhZGRyZXNzICcFAAAABHBvb2wCAAAAAScAAAABAAAAA2ludgEAAAAHdGVzdFNlcQAAAAUAAAAJYWRkcmVzc2VzAAAAD2Fzc2V0c1RvUmVjZWl2ZQAAAAtlc3RSZWNlaXZlZAAAABFzbGlwcGFnZVRvbGVyYW5jZQAAAAttaW5SZWNlaXZlZAQAAAADcG10AwkAAGYAAAACCQABkAAAAAEIBQAAAANpbnYAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAGRAAAAAggFAAAAA2ludgAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAABBQYXltZW50IHJlcXVpcmVkBAAAAAphc3NldEZpbmFsCQABkQAAAAIFAAAAD2Fzc2V0c1RvUmVjZWl2ZQkAAGUAAAACCQABkAAAAAEFAAAAD2Fzc2V0c1RvUmVjZWl2ZQAAAAAAAAAAAQQAAAAMYXNzZXRGaW5hbElkCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAACmFzc2V0RmluYWwEAAAAB2luZGljZXMJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACAAAAAAAAAAABCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAAAwkABEwAAAACAAAAAAAAAAAECQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAABgkABEwAAAACAAAAAAAAAAAHCQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAACQUAAAADbmlsCgEAAAAIZm9sZFN3YXAAAAACAAAAEHByZXZpb3VzUmVjZWl2ZWQAAAAFaW5kZXgDCQAAZwAAAAIFAAAABWluZGV4CQABkAAAAAEFAAAACWFkZHJlc3NlcwUAAAAQcHJldmlvdXNSZWNlaXZlZAQAAAANYXNzZXRSZWNlaXZlZAkAAZEAAAACBQAAAA9hc3NldHNUb1JlY2VpdmUFAAAABWluZGV4BAAAAA9hc3NldFJlY2VpdmVkSWQJAQAAAApnZXRBc3NldElkAAAAAQUAAAANYXNzZXRSZWNlaXZlZAQAAAAHJG1hdGNoMAkBAAAABmRvU3dhcAAAAAUJAAGRAAAAAgUAAAAJYWRkcmVzc2VzBQAAAAVpbmRleAUAAAAQcHJldmlvdXNSZWNlaXZlZAUAAAANYXNzZXRSZWNlaXZlZAkAAZEAAAACBQAAAAtlc3RSZWNlaXZlZAUAAAAFaW5kZXgFAAAAEXNsaXBwYWdlVG9sZXJhbmNlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAABmluY29tZQUAAAAHJG1hdGNoMAkBAAAAD0F0dGFjaGVkUGF5bWVudAAAAAIFAAAAD2Fzc2V0UmVjZWl2ZWRJZAUAAAAGaW5jb21lCQAAAgAAAAECAAAAGENhbid0IGhhbmRsZSBzd2FwIHJlc3VsdAQAAAAFZmluYWwKAAAAAAIkbAUAAAAHaW5kaWNlcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA3BtdAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAIZm9sZFN3YXAAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKBAAAAANmZWUDCQAAZwAAAAIAAAAAAAAAAAAIBQAAAAVmaW5hbAAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAADFN3YXAgcmVzdWx0IAkAAaQAAAABCAUAAAAFZmluYWwAAAAGYW1vdW50AgAAABEgbXVzdCBiZSBwb3NpdGl2ZQMJAABmAAAAAgUAAAALbWluUmVjZWl2ZWQIBQAAAAVmaW5hbAAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAMU3dhcCByZXN1bHQgCQABpAAAAAEIBQAAAAVmaW5hbAAAAAZhbW91bnQCAAAAFyBpcyBsZXNzIHRoZW4gZXhwZWN0ZWQgCQABpAAAAAEFAAAAC21pblJlY2VpdmVkCQEAAAAJZGVkdWN0RmVlAAAAAQgFAAAABWZpbmFsAAAABmFtb3VudAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAADaW52AAAABmNhbGxlcgkAAGUAAAACCAUAAAAFZmluYWwAAAAGYW1vdW50BQAAAANmZWUFAAAADGFzc2V0RmluYWxJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAljb2xsZWN0b3IFAAAAA2ZlZQUAAAAMYXNzZXRGaW5hbElkBQAAAANuaWwAAAAA7Wxtug==",
    "chainId": 87,
    "height": 2972628,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FcKYWwudjgbrsyGVE7j56eo2NN2cWfvZD2YyM4n8P54Y
Next: 3N4iGmxHQQCiKoYZURT4bNosceVeREdGaRKiWqSDNJTm

Diff: 
Old
New
Differences
46
46
 
func deductFee (amount) = fraction(amount, 1, 1000)
47
47
 
48
48
 
49
-
func doSwap (pool,payment,assetReceived,estAmountToReceive) = {
49
+
func doSwap (pool,payment,assetReceived,estAmountToReceive,slippageTolerance) = {
50
50
 
    let poolAddress = parseAddressOrThrow(pool)
51
51
 
    let versionMajor = parseIntOrThrow(split(getStringOrThrow(poolAddress, "version"), ".")[0])
52
52
 
    let assetReceivedId = getAssetId(assetReceived)
58
58
 
                let poolAssetB = getStringOrThrow(poolAddress, "B_asset_id")
59
59
 
                let poolAssetIdA = getAssetId(poolAssetA)
60
60
 
                let poolAssetIdB = getAssetId(poolAssetB)
61
-
                let $t021192463 = if (if ((payment.assetId == poolAssetIdA))
61
+
                let $t021432487 = if (if ((payment.assetId == poolAssetIdA))
62
62
 
                    then (assetReceivedId == poolAssetIdB)
63
63
 
                    else false)
64
64
 
                    then $Tuple2(poolAssetIdA, poolAssetIdB)
67
67
 
                        else false)
68
68
 
                        then $Tuple2(poolAssetIdB, poolAssetIdA)
69
69
 
                        else throw("Unsupported assets pair")
70
-
                let assetIn = $t021192463._1
71
-
                let assetOut = $t021192463._2
70
+
                let assetIn = $t021432487._1
71
+
                let assetOut = $t021432487._2
72
72
 
                let args = if ((versionMajor == 1))
73
73
 
                    then [0]
74
74
 
                    else if ((versionMajor == 2))
75
75
 
                        then if ((0 >= estAmountToReceive))
76
76
 
                            then throw("estAmountToReceive must be positive")
77
-
                            else [estAmountToReceive, 0]
77
+
                            else if (if ((0 > slippageTolerance))
78
+
                                then true
79
+
                                else (slippageTolerance > 1000))
80
+
                                then throw("Slippage tolerance must be non-negative and less than or equal to 1000")
81
+
                                else [estAmountToReceive, (payment.amount - fraction(payment.amount, slippageTolerance, 1000))]
78
82
 
                        else throw((("Unknown pool version '" + toString(versionMajor)) + "', but 1 or 2 expected"))
79
83
 
                let balanceBefore = getBalance(assetReceivedId)
80
84
 
                if ((balanceBefore == balanceBefore))
117
121
 
118
122
 
119
123
 
@Callable(inv)
120
-
func testSeq (addresses,assetsToReceive,estReceived,minReceived) = {
124
+
func testSeq (addresses,assetsToReceive,estReceived,slippageTolerance,minReceived) = {
121
125
 
    let pmt = if ((size(inv.payments) > 0))
122
126
 
        then inv.payments[0]
123
127
 
        else throw("Payment required")
129
133
 
        else {
130
134
 
            let assetReceived = assetsToReceive[index]
131
135
 
            let assetReceivedId = getAssetId(assetReceived)
132
-
            match doSwap(addresses[index], previousReceived, assetReceived, estReceived[index]) {
136
+
            match doSwap(addresses[index], previousReceived, assetReceived, estReceived[index], slippageTolerance) {
133
137
 
                case income: Int => 
134
138
 
                    AttachedPayment(assetReceivedId, income)
135
139
 
                case _ => 
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func getStringOrThrow (address,key) = valueOrErrorMessage(getString(address, key), ((("Can't read '" + key) + "' at address ") + toString(address)))
5
5
 
6
6
 
7
7
 
func parseAddressOrThrow (maybeAddress) = valueOrErrorMessage(addressFromString(maybeAddress), (("Can't parse address from '" + maybeAddress) + "'"))
8
8
 
9
9
 
10
10
 
func parseIntOrThrow (maybeInt) = valueOrErrorMessage(parseInt(maybeInt), (("Can't parse integer from '" + maybeInt) + "'"))
11
11
 
12
12
 
13
13
 
let collector = parseAddressOrThrow(getStringOrThrow(this, "collector"))
14
14
 
15
15
 
let oracle = parseAddressOrThrow(getStringOrThrow(this, "oracle"))
16
16
 
17
17
 
let pools = split(getStringOrThrow(oracle, "pools"), ",")
18
18
 
19
19
 
let pPools = ["3PPRHHF9JKvDLkAc3aHD3Kd5tRZp1CoqAJa", "3PKYPKJPHZENAAwH9e7TF5edDgukNxxBt3M", "3PDrYPF6izza2sXWffzTPF7e2Fcir2CMpki", "3PNK5ypnPJioLmLUzfK6ezpaePHLxZd6QLj", "3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh"]
20
20
 
21
21
 
func getAssetId (asset) = if ((asset == "WAVES"))
22
22
 
    then unit
23
23
 
    else fromBase58String(asset)
24
24
 
25
25
 
26
26
 
func assetIdToString (assetId) = match assetId {
27
27
 
    case asset: ByteVector => 
28
28
 
        toBase58String(asset)
29
29
 
    case waves: Unit => 
30
30
 
        "WAVES"
31
31
 
    case _ => 
32
32
 
        throw("Match error")
33
33
 
}
34
34
 
35
35
 
36
36
 
func getBalance (assetId) = match assetId {
37
37
 
    case asset: ByteVector => 
38
38
 
        assetBalance(this, asset)
39
39
 
    case waves: Unit => 
40
40
 
        wavesBalance(this).available
41
41
 
    case _ => 
42
42
 
        throw("Match error")
43
43
 
}
44
44
 
45
45
 
46
46
 
func deductFee (amount) = fraction(amount, 1, 1000)
47
47
 
48
48
 
49
-
func doSwap (pool,payment,assetReceived,estAmountToReceive) = {
49
+
func doSwap (pool,payment,assetReceived,estAmountToReceive,slippageTolerance) = {
50
50
 
    let poolAddress = parseAddressOrThrow(pool)
51
51
 
    let versionMajor = parseIntOrThrow(split(getStringOrThrow(poolAddress, "version"), ".")[0])
52
52
 
    let assetReceivedId = getAssetId(assetReceived)
53
53
 
    if ((0 > estAmountToReceive))
54
54
 
        then throw("estAmountToReceive must be positive")
55
55
 
        else if (containsElement(pools, pool))
56
56
 
            then {
57
57
 
                let poolAssetA = getStringOrThrow(poolAddress, "A_asset_id")
58
58
 
                let poolAssetB = getStringOrThrow(poolAddress, "B_asset_id")
59
59
 
                let poolAssetIdA = getAssetId(poolAssetA)
60
60
 
                let poolAssetIdB = getAssetId(poolAssetB)
61
-
                let $t021192463 = if (if ((payment.assetId == poolAssetIdA))
61
+
                let $t021432487 = if (if ((payment.assetId == poolAssetIdA))
62
62
 
                    then (assetReceivedId == poolAssetIdB)
63
63
 
                    else false)
64
64
 
                    then $Tuple2(poolAssetIdA, poolAssetIdB)
65
65
 
                    else if (if ((assetReceivedId == poolAssetIdA))
66
66
 
                        then (payment.assetId == poolAssetIdB)
67
67
 
                        else false)
68
68
 
                        then $Tuple2(poolAssetIdB, poolAssetIdA)
69
69
 
                        else throw("Unsupported assets pair")
70
-
                let assetIn = $t021192463._1
71
-
                let assetOut = $t021192463._2
70
+
                let assetIn = $t021432487._1
71
+
                let assetOut = $t021432487._2
72
72
 
                let args = if ((versionMajor == 1))
73
73
 
                    then [0]
74
74
 
                    else if ((versionMajor == 2))
75
75
 
                        then if ((0 >= estAmountToReceive))
76
76
 
                            then throw("estAmountToReceive must be positive")
77
-
                            else [estAmountToReceive, 0]
77
+
                            else if (if ((0 > slippageTolerance))
78
+
                                then true
79
+
                                else (slippageTolerance > 1000))
80
+
                                then throw("Slippage tolerance must be non-negative and less than or equal to 1000")
81
+
                                else [estAmountToReceive, (payment.amount - fraction(payment.amount, slippageTolerance, 1000))]
78
82
 
                        else throw((("Unknown pool version '" + toString(versionMajor)) + "', but 1 or 2 expected"))
79
83
 
                let balanceBefore = getBalance(assetReceivedId)
80
84
 
                if ((balanceBefore == balanceBefore))
81
85
 
                    then {
82
86
 
                        let result = invoke(poolAddress, "exchange", args, [payment])
83
87
 
                        if ((result == result))
84
88
 
                            then {
85
89
 
                                let received = (getBalance(assetReceivedId) - balanceBefore)
86
90
 
                                if ((received == received))
87
91
 
                                    then if ((0 >= received))
88
92
 
                                        then throw("Received amount from pool must be positive")
89
93
 
                                        else received
90
94
 
                                    else throw("Strict value is not equal to itself.")
91
95
 
                                }
92
96
 
                            else throw("Strict value is not equal to itself.")
93
97
 
                        }
94
98
 
                    else throw("Strict value is not equal to itself.")
95
99
 
                }
96
100
 
            else if (containsElement(pPools, pool))
97
101
 
                then {
98
102
 
                    let balanceBefore = getBalance(assetReceivedId)
99
103
 
                    if ((balanceBefore == balanceBefore))
100
104
 
                        then {
101
105
 
                            let result = invoke(poolAddress, "swap", [assetReceived, 0], [payment])
102
106
 
                            if ((result == result))
103
107
 
                                then {
104
108
 
                                    let received = (getBalance(assetReceivedId) - balanceBefore)
105
109
 
                                    if ((received == received))
106
110
 
                                        then if ((0 >= received))
107
111
 
                                            then throw("Received amount from pool must be positive")
108
112
 
                                            else received
109
113
 
                                        else throw("Strict value is not equal to itself.")
110
114
 
                                    }
111
115
 
                                else throw("Strict value is not equal to itself.")
112
116
 
                            }
113
117
 
                        else throw("Strict value is not equal to itself.")
114
118
 
                    }
115
119
 
                else throw((("There is no pool at address '" + pool) + "'"))
116
120
 
    }
117
121
 
118
122
 
119
123
 
@Callable(inv)
120
-
func testSeq (addresses,assetsToReceive,estReceived,minReceived) = {
124
+
func testSeq (addresses,assetsToReceive,estReceived,slippageTolerance,minReceived) = {
121
125
 
    let pmt = if ((size(inv.payments) > 0))
122
126
 
        then inv.payments[0]
123
127
 
        else throw("Payment required")
124
128
 
    let assetFinal = assetsToReceive[(size(assetsToReceive) - 1)]
125
129
 
    let assetFinalId = getAssetId(assetFinal)
126
130
 
    let indices = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
127
131
 
    func foldSwap (previousReceived,index) =     if ((index >= size(addresses)))
128
132
 
        then previousReceived
129
133
 
        else {
130
134
 
            let assetReceived = assetsToReceive[index]
131
135
 
            let assetReceivedId = getAssetId(assetReceived)
132
-
            match doSwap(addresses[index], previousReceived, assetReceived, estReceived[index]) {
136
+
            match doSwap(addresses[index], previousReceived, assetReceived, estReceived[index], slippageTolerance) {
133
137
 
                case income: Int => 
134
138
 
                    AttachedPayment(assetReceivedId, income)
135
139
 
                case _ => 
136
140
 
                    throw("Can't handle swap result")
137
141
 
            }
138
142
 
            }
139
143
 
140
144
 
    let final = {
141
145
 
        let $l = indices
142
146
 
        let $s = size($l)
143
147
 
        let $acc0 = pmt
144
148
 
        func 1 ($a,$i) =         if (($i >= $s))
145
149
 
            then $a
146
150
 
            else foldSwap($a, $l[$i])
147
151
 
148
152
 
        func 2 ($a,$i) =         if (($i >= $s))
149
153
 
            then $a
150
154
 
            else throw("List size exceeds 10")
151
155
 
152
156
 
        2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
153
157
 
        }
154
158
 
    let fee = if ((0 >= final.amount))
155
159
 
        then throw((("Swap result " + toString(final.amount)) + " must be positive"))
156
160
 
        else if ((minReceived > final.amount))
157
161
 
            then throw(((("Swap result " + toString(final.amount)) + " is less then expected ") + toString(minReceived)))
158
162
 
            else deductFee(final.amount)
159
163
 
[ScriptTransfer(inv.caller, (final.amount - fee), assetFinalId), ScriptTransfer(collector, fee, assetFinalId)]
160
164
 
    }
161
165
 
162
166
 

github/deemru/w8io/3ef1775 
48.73 ms ◑