tx · hJc2yCLUiTiqXXmM6Yfdxcx3mkVCU52bBFs721pry4S

3MvdzbvEZLHEE3EXHXxaRQjgpNqq28733ao:  -0.01000000 Waves

2021.12.22 17:30 [1845590] smart account 3MvdzbvEZLHEE3EXHXxaRQjgpNqq28733ao > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "hJc2yCLUiTiqXXmM6Yfdxcx3mkVCU52bBFs721pry4S",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1640183415693,
    "version": 1,
    "sender": "3MvdzbvEZLHEE3EXHXxaRQjgpNqq28733ao",
    "senderPublicKey": "HQmnkZjA2Ehwb2iKXAadqRsrXsHGZChU6WfgmHRsMW8t",
    "proofs": [
        "3NftwZr5wAeuDHSdiep2rtz2TKkghvhivh5Taf8rCWGdnKnst17uAimjPfSb2v8g2EBJj9dcGsoRSk32FAhXdQGb"
    ],
    "script": "base64:AAIFAAAAAAAAAAoIAhIGCgQICAEBAAAABwAAAAAJY29sbGVjdG9yCQEAAAAHQWRkcmVzcwAAAAEBAAAAAAAAAAAGb3JhY2xlCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQmAAAAAQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMCAAAABm9yYWNsZQIAAAAAAgAAAAAAAAAABXBvb2xzCQAEtQAAAAIJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAZvcmFjbGUCAAAABXBvb2xzAgAAAAACAAAAASwBAAAACmdldEFzc2V0SWQAAAABAAAABWFzc2V0AwkAAAAAAAACBQAAAAVhc3NldAIAAAAFV0FWRVMFAAAABHVuaXQJAAJZAAAAAQUAAAAFYXNzZXQBAAAACmdldEJhbGFuY2UAAAABAAAAB2Fzc2V0SWQEAAAAByRtYXRjaDAFAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAABWFzc2V0BQAAAAckbWF0Y2gwCQAD8AAAAAIFAAAABHRoaXMFAAAABWFzc2V0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0BAAAAAV3YXZlcwUAAAAHJG1hdGNoMAgJAAPvAAAAAQUAAAAEdGhpcwAAAAlhdmFpbGFibGUJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IAAAAACWZlZUFzc2V0cwQAAAAGYXNzZXRzCQAEtQAAAAIJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzAgAAAApmZWUtYXNzZXRzAgAAAAACAAAAASwKAQAAAAp0b0Fzc2V0SWRzAAAAAgAAAANhY2MAAAAIYXNzZXRTdHIJAARNAAAAAgUAAAADYWNjCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAACGFzc2V0U3RyCgAAAAACJGwFAAAABmFzc2V0cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAKdG9Bc3NldElkcwAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoBAAAABmRvU3dhcAAAAAUAAAAEcG9vbAAAAAdwYXltZW50AAAADWFzc2V0UmVjZWl2ZWQAAAALbWluUmVjZWl2ZWQAAAALZXN0UmVjZWl2ZWQEAAAAC3Bvb2xBZGRyZXNzCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQmAAAAAQUAAAAEcG9vbAIAAAAABAAAAA9hc3NldFJlY2VpdmVkSWQJAQAAAApnZXRBc3NldElkAAAAAQUAAAANYXNzZXRSZWNlaXZlZAMJAABnAAAAAgAAAAAAAAAAAAUAAAALbWluUmVjZWl2ZWQJAAACAAAAAQIAAAAAAwkAAGYAAAACAAAAAAAAAAAABQAAAAtlc3RSZWNlaXZlZAkAAAIAAAABAgAAAAAEAAAADWJhbGFuY2VCZWZvcmUJAQAAAApnZXRCYWxhbmNlAAAAAQUAAAAPYXNzZXRSZWNlaXZlZElkAwkAAAAAAAACBQAAAA1iYWxhbmNlQmVmb3JlBQAAAA1iYWxhbmNlQmVmb3JlBAAAAAZyZXN1bHQDCQEAAAABIQAAAAEJAQAAAA9jb250YWluc0VsZW1lbnQAAAACBQAAAAVwb29scwUAAAAEcG9vbAkAAAIAAAABAgAAAAAEAAAACnBvb2xBc3NldEEJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAtwb29sQWRkcmVzcwIAAAAKQV9hc3NldF9pZAIAAAAABAAAAApwb29sQXNzZXRCCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAALcG9vbEFkZHJlc3MCAAAACkJfYXNzZXRfaWQCAAAAAAQAAAAMcG9vbEFzc2V0SWRBCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAACnBvb2xBc3NldEEEAAAADHBvb2xBc3NldElkQgkBAAAACmdldEFzc2V0SWQAAAABBQAAAApwb29sQXNzZXRCBAAAAAx2ZXJzaW9uTWFqb3IJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABLYAAAABCQABkQAAAAIJAAS1AAAAAgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAAC3Bvb2xBZGRyZXNzAgAAAAd2ZXJzaW9uAgAAAAACAAAAAS4AAAAAAAAAAAACAAAAAAQAAAAEYXJncwMJAAAAAAAAAgUAAAAMdmVyc2lvbk1ham9yAAAAAAAAAAABCQAETAAAAAIFAAAAC21pblJlY2VpdmVkBQAAAANuaWwDCQAAAAAAAAIFAAAADHZlcnNpb25NYWpvcgAAAAAAAAAAAgMJAABnAAAAAgAAAAAAAAAAAAUAAAALZXN0UmVjZWl2ZWQJAAACAAAAAQIAAAAACQAETAAAAAIFAAAAC2VzdFJlY2VpdmVkCQAETAAAAAIFAAAAC21pblJlY2VpdmVkBQAAAANuaWwJAAACAAAAAQIAAAAACQAD/AAAAAQFAAAAC3Bvb2xBZGRyZXNzAgAAAAhleGNoYW5nZQUAAAAEYXJncwkABEwAAAACBQAAAAdwYXltZW50BQAAAANuaWwDCQAAAAAAAAIFAAAABnJlc3VsdAUAAAAGcmVzdWx0BAAAAAhyZWNlaXZlZAkAAGUAAAACCQEAAAAKZ2V0QmFsYW5jZQAAAAEFAAAAD2Fzc2V0UmVjZWl2ZWRJZAUAAAANYmFsYW5jZUJlZm9yZQMJAAAAAAAAAgUAAAAIcmVjZWl2ZWQFAAAACHJlY2VpdmVkCQAFFAAAAAIFAAAADWJhbGFuY2VCZWZvcmUFAAAACHJlY2VpdmVkCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAQAAAANpbnYBAAAABHN3YXAAAAAEAAAABHBvb2wAAAAOYXNzZXRUb1JlY2VpdmUAAAALbWluUmVjZWl2ZWQAAAALZXN0UmVjZWl2ZWQEAAAAA3BtdAMJAABmAAAAAgkAAZAAAAABCAUAAAADaW52AAAACHBheW1lbnRzAAAAAAAAAAAACQABkQAAAAIIBQAAAANpbnYAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAACAAAAAQIAAAAABAAAAA9hc3NldFJlY2VpdmVkSWQJAQAAAApnZXRBc3NldElkAAAAAQUAAAAOYXNzZXRUb1JlY2VpdmUKAQAAAAlkZWR1Y3RGZWUAAAABAAAABmFtb3VudAkAAGsAAAADBQAAAAZhbW91bnQAAAAAAAAAAAEAAAAAAAAAA+gDCQAAZwAAAAIAAAAAAAAAAAAFAAAAC21pblJlY2VpdmVkCQAAAgAAAAECAAAAAAQAAAALJHQwMjgxNjMwMjEEAAAAByRtYXRjaDAJAQAAAAZkb1N3YXAAAAAFBQAAAARwb29sBQAAAANwbXQFAAAADmFzc2V0VG9SZWNlaXZlBQAAAAttaW5SZWNlaXZlZAUAAAALZXN0UmVjZWl2ZWQDAwMJAAABAAAAAggFAAAAByRtYXRjaDAAAAACXzECAAAAA0ludAkAAAEAAAACCAUAAAAHJG1hdGNoMAAAAAJfMgIAAAADSW50BwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAooSW50LCBJbnQpBwQAAAAGYmVmb3JlCAUAAAAHJG1hdGNoMAAAAAJfMQQAAAAGaW5jb21lCAUAAAAHJG1hdGNoMAAAAAJfMgkABRQAAAACBQAAAAZiZWZvcmUFAAAABmluY29tZQkAAAIAAAABAgAAAAAEAAAADWJhbGFuY2VCZWZvcmUIBQAAAAskdDAyODE2MzAyMQAAAAJfMQQAAAAIcmVjZWl2ZWQIBQAAAAskdDAyODE2MzAyMQAAAAJfMgMJAABnAAAAAgAAAAAAAAAAAAUAAAAIcmVjZWl2ZWQJAAACAAAAAQIAAAAABAAAAANmZWUJAQAAAAlkZWR1Y3RGZWUAAAABBQAAAAhyZWNlaXZlZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAADaW52AAAABmNhbGxlcgkAAGUAAAACBQAAAAhyZWNlaXZlZAUAAAADZmVlBQAAAA9hc3NldFJlY2VpdmVkSWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJY29sbGVjdG9yBQAAAANmZWUFAAAAD2Fzc2V0UmVjZWl2ZWRJZAUAAAADbmlsAAAAAFy0SgI=",
    "chainId": 84,
    "height": 1845590,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9fj3ZmTGFxyvvQvRMp6zCJbStp2HExHRHauZGsuUG2MT
Next: Fx4EaN274qJ7Y6v7kuJArMNcuzi1y1kfouCQeq7MzKCa

Diff: 
Old
New
Differences
94
94
 
        then M.payments[0]
95
95
 
        else throw("")
96
96
 
    let C = d(N)
97
-
    let P = {
98
-
        let Q = valueOrElse(indexOf(j, O.assetId), -1)
99
-
        let R = valueOrElse(indexOf(j, C), -1)
100
-
        (R > Q)
101
-
        }
102
-
    func S (T) =     fraction(T, 1, 1000)
97
+
    func P (Q) =     fraction(Q, 1, 1000)
103
98
 
104
99
 
    if ((0 >= z))
105
100
 
        then throw("")
106
101
 
        else {
107
-
            let U = if (P)
108
-
                then AttachedPayment(O.assetId, S(O.amount))
109
-
                else O
110
-
            let V = {
102
+
            let R = {
111
103
 
                let h = v(w, O, N, z, A)
112
104
 
                if (if (if ($isInstanceOf(h._1, "Int"))
113
105
 
                    then $isInstanceOf(h._2, "Int")
115
107
 
                    then $isInstanceOf(h, "(Int, Int)")
116
108
 
                    else false)
117
109
 
                    then {
118
-
                        let W = h._1
119
-
                        let X = h._2
120
-
                        $Tuple2(W, X)
110
+
                        let S = h._1
111
+
                        let T = h._2
112
+
                        $Tuple2(S, T)
121
113
 
                        }
122
114
 
                    else throw("")
123
115
 
                }
124
-
            let D = V._1
125
-
            let L = V._2
116
+
            let D = R._1
117
+
            let L = R._2
126
118
 
            if ((0 >= L))
127
119
 
                then throw("")
128
-
                else if (P)
129
-
                    then [ScriptTransfer(M.caller, L, C), ScriptTransfer(a, (O.amount - U.amount), U.assetId)]
130
-
                    else {
131
-
                        let Y = S(L)
132
-
[ScriptTransfer(M.caller, (L - Y), C), ScriptTransfer(a, Y, C)]
133
-
                        }
120
+
                else {
121
+
                    let U = P(L)
122
+
[ScriptTransfer(M.caller, (L - U), C), ScriptTransfer(a, U, C)]
123
+
                    }
134
124
 
            }
135
125
 
    }
136
126
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = Address(base58'')
5
5
 
6
6
 
let b = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(this, "oracle"), "")), "")
7
7
 
8
8
 
let c = split(valueOrErrorMessage(getString(b, "pools"), ""), ",")
9
9
 
10
10
 
func d (e) = if ((e == "WAVES"))
11
11
 
    then unit
12
12
 
    else fromBase58String(e)
13
13
 
14
14
 
15
15
 
func f (g) = {
16
16
 
    let h = g
17
17
 
    if ($isInstanceOf(h, "ByteVector"))
18
18
 
        then {
19
19
 
            let e = h
20
20
 
            assetBalance(this, e)
21
21
 
            }
22
22
 
        else if ($isInstanceOf(h, "Unit"))
23
23
 
            then {
24
24
 
                let i = h
25
25
 
                wavesBalance(this).available
26
26
 
                }
27
27
 
            else throw("Match error")
28
28
 
    }
29
29
 
30
30
 
31
31
 
let j = {
32
32
 
    let k = split(valueOrErrorMessage(getString(this, "fee-assets"), ""), ",")
33
33
 
    func l (m,n) =     (m :+ d(n))
34
34
 
35
35
 
    let o = k
36
36
 
    let p = size(o)
37
37
 
    let q = nil
38
38
 
    func r (s,t) =     if ((t >= p))
39
39
 
        then s
40
40
 
        else l(s, o[t])
41
41
 
42
42
 
    func u (s,t) =     if ((t >= p))
43
43
 
        then s
44
44
 
        else throw("List size exceeds 10")
45
45
 
46
46
 
    u(r(r(r(r(r(r(r(r(r(r(q, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
47
47
 
    }
48
48
 
49
49
 
func v (w,x,y,z,A) = {
50
50
 
    let B = valueOrErrorMessage(addressFromString(w), "")
51
51
 
    let C = d(y)
52
52
 
    if ((0 >= z))
53
53
 
        then throw("")
54
54
 
        else if ((0 > A))
55
55
 
            then throw("")
56
56
 
            else {
57
57
 
                let D = f(C)
58
58
 
                if ((D == D))
59
59
 
                    then {
60
60
 
                        let E = if (!(containsElement(c, w)))
61
61
 
                            then throw("")
62
62
 
                            else {
63
63
 
                                let F = valueOrErrorMessage(getString(B, "A_asset_id"), "")
64
64
 
                                let G = valueOrErrorMessage(getString(B, "B_asset_id"), "")
65
65
 
                                let H = d(F)
66
66
 
                                let I = d(G)
67
67
 
                                let J = valueOrErrorMessage(parseInt(split(valueOrErrorMessage(getString(B, "version"), ""), ".")[0]), "")
68
68
 
                                let K = if ((J == 1))
69
69
 
                                    then [z]
70
70
 
                                    else if ((J == 2))
71
71
 
                                        then if ((0 >= A))
72
72
 
                                            then throw("")
73
73
 
                                            else [A, z]
74
74
 
                                        else throw("")
75
75
 
                                invoke(B, "exchange", K, [x])
76
76
 
                                }
77
77
 
                        if ((E == E))
78
78
 
                            then {
79
79
 
                                let L = (f(C) - D)
80
80
 
                                if ((L == L))
81
81
 
                                    then $Tuple2(D, L)
82
82
 
                                    else throw("Strict value is not equal to itself.")
83
83
 
                                }
84
84
 
                            else throw("Strict value is not equal to itself.")
85
85
 
                        }
86
86
 
                    else throw("Strict value is not equal to itself.")
87
87
 
                }
88
88
 
    }
89
89
 
90
90
 
91
91
 
@Callable(M)
92
92
 
func swap (w,N,z,A) = {
93
93
 
    let O = if ((size(M.payments) > 0))
94
94
 
        then M.payments[0]
95
95
 
        else throw("")
96
96
 
    let C = d(N)
97
-
    let P = {
98
-
        let Q = valueOrElse(indexOf(j, O.assetId), -1)
99
-
        let R = valueOrElse(indexOf(j, C), -1)
100
-
        (R > Q)
101
-
        }
102
-
    func S (T) =     fraction(T, 1, 1000)
97
+
    func P (Q) =     fraction(Q, 1, 1000)
103
98
 
104
99
 
    if ((0 >= z))
105
100
 
        then throw("")
106
101
 
        else {
107
-
            let U = if (P)
108
-
                then AttachedPayment(O.assetId, S(O.amount))
109
-
                else O
110
-
            let V = {
102
+
            let R = {
111
103
 
                let h = v(w, O, N, z, A)
112
104
 
                if (if (if ($isInstanceOf(h._1, "Int"))
113
105
 
                    then $isInstanceOf(h._2, "Int")
114
106
 
                    else false)
115
107
 
                    then $isInstanceOf(h, "(Int, Int)")
116
108
 
                    else false)
117
109
 
                    then {
118
-
                        let W = h._1
119
-
                        let X = h._2
120
-
                        $Tuple2(W, X)
110
+
                        let S = h._1
111
+
                        let T = h._2
112
+
                        $Tuple2(S, T)
121
113
 
                        }
122
114
 
                    else throw("")
123
115
 
                }
124
-
            let D = V._1
125
-
            let L = V._2
116
+
            let D = R._1
117
+
            let L = R._2
126
118
 
            if ((0 >= L))
127
119
 
                then throw("")
128
-
                else if (P)
129
-
                    then [ScriptTransfer(M.caller, L, C), ScriptTransfer(a, (O.amount - U.amount), U.assetId)]
130
-
                    else {
131
-
                        let Y = S(L)
132
-
[ScriptTransfer(M.caller, (L - Y), C), ScriptTransfer(a, Y, C)]
133
-
                        }
120
+
                else {
121
+
                    let U = P(L)
122
+
[ScriptTransfer(M.caller, (L - U), C), ScriptTransfer(a, U, C)]
123
+
                    }
134
124
 
            }
135
125
 
    }
136
126
 
137
127
 

github/deemru/w8io/169f3d6 
72.17 ms ◑