tx · H5D4FatLn1oC1mU1aP2VKcfagdHc48JUvorCjBxvu8yA

3N1Gvdh1nTHcAEF36MmwYtro9fFpSQYKq3C:  -0.01400000 Waves

2023.01.06 13:35 [2392980] smart account 3N1Gvdh1nTHcAEF36MmwYtro9fFpSQYKq3C > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "H5D4FatLn1oC1mU1aP2VKcfagdHc48JUvorCjBxvu8yA",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1673001317866,
    "version": 2,
    "chainId": 84,
    "sender": "3N1Gvdh1nTHcAEF36MmwYtro9fFpSQYKq3C",
    "senderPublicKey": "FdYKNQwdMUQAvn4qKaXm1ZGT4LjfePqGcYHGZSeAeZ9M",
    "proofs": [
        "gAZsvnRYJsUAAcZbcXEaHupemSZbYDq9zfw4LyGzgqf2Lfky62X5MyJnSeMzjQkM1ng9pNutMg64VjkfRHT1hk9"
    ],
    "script": "base64:BgIKCAISBgoEGBERCAEBEXZhbGlkYXRlQXJndW1lbnRzBApyZWNpcGllbnRzB2Ftb3VudHMKcGF5bWVudElkeAhwYXltZW50cwQOcmVjaXBpZW50c1NpemUJAJADAQUKcmVjaXBpZW50cwQLYW1vdW50c1NpemUJAJADAQUHYW1vdW50cwQOcGF5bWVudElkeFNpemUJAJADAQUKcGF5bWVudElkeAQMcGF5bWVudHNTaXplCQCQAwEFCHBheW1lbnRzBAltaW5BbW91bnQJAJcDAQUHYW1vdW50cwQNbWluUGF5bWVudElkeAkAlwMBBQpwYXltZW50SWR4BA1tYXhQYXltZW50SWR4CQCWAwEFCnBheW1lbnRJZHgKARFwYXltZW50c1ZhbGlkYXRvcgIMcGF5bWVudEFjY3VtC25leHRQYXltZW50BAkkdDA1ODM2MjAFDHBheW1lbnRBY2N1bQQNdmFsaWRQYXltZW50cwgFCSR0MDU4MzYyMAJfMQQBaggFCSR0MDU4MzYyMAJfMgMJAGcCBQFqBQxwYXltZW50c1NpemUJAJQKAgUNdmFsaWRQYXltZW50cwkAZAIFAWoAAQoBEWFtb3VudHNBZ2dyZWdhdG9yAgthbW91bnRBY2N1bQpuZXh0QW1vdW50BAkkdDA3NzU4MDQFC2Ftb3VudEFjY3VtBAZhbW91bnQIBQkkdDA3NzU4MDQCXzEEAWsIBQkkdDA3NzU4MDQCXzIDAwkAZwIFAWsFDnJlY2lwaWVudHNTaXplBgkBAiE9AgkAkQMCBQpwYXltZW50SWR4BQFrBQFqCQCUCgIFBmFtb3VudAkAZAIFAWsAAQkAlAoCCQBkAgUGYW1vdW50BQpuZXh0QW1vdW50CQBkAgUBawABBBBhZ2dyZWdhdGVkQW1vdW50CgACJGwFB2Ftb3VudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARFhbW91bnRzQWdncmVnYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIDCQAAAggFEGFnZ3JlZ2F0ZWRBbW91bnQCXzEIBQtuZXh0UGF5bWVudAZhbW91bnQJAJQKAgkAZAIFDXZhbGlkUGF5bWVudHMAAQkAZAIFAWoAAQkAlAoCBQ12YWxpZFBheW1lbnRzCQBkAgUBagABBBJwYXltZW50c1ZhbGlkYXRpb24KAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARFwYXltZW50c1ZhbGlkYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgMDAwMDAwMDCQAAAgUOcmVjaXBpZW50c1NpemUFC2Ftb3VudHNTaXplCQAAAgUOcmVjaXBpZW50c1NpemUFDnBheW1lbnRJZHhTaXplBwkAZgIFDnJlY2lwaWVudHNTaXplAAAHCQBnAgACBQ5yZWNpcGllbnRzU2l6ZQcJAGYCBQxwYXltZW50c1NpemUAAAcJAGYCBQltaW5BbW91bnQAAAcJAAACBQ1taW5QYXltZW50SWR4AAAHCQAAAgUNbWF4UGF5bWVudElkeAkAZQIFDHBheW1lbnRzU2l6ZQABBwkAAAIIBRJwYXltZW50c1ZhbGlkYXRpb24CXzEFDHBheW1lbnRzU2l6ZQcBAWkBDG1hc3NUcmFuc2ZlcgQKcmVjaXBpZW50cwdhbW91bnRzCnBheW1lbnRJZHgKYXR0YWNobWVudAMJAQEhAQkBEXZhbGlkYXRlQXJndW1lbnRzBAUKcmVjaXBpZW50cwUHYW1vdW50cwUKcGF5bWVudElkeAgFAWkIcGF5bWVudHMJAAIBAhFJbnZhbGlkIGFyZ3VtZW50cwQOcmVjaXBpZW50c1NpemUJAJADAQUKcmVjaXBpZW50cwoBGHNjcmlwdFRyYW5zZmVyc0dlbmVyYXRvcgIFYWNjdW0EbmV4dAQLJHQwMTkwMDE5MzIFBWFjY3VtBA9zY3JpcHRUcmFuc2ZlcnMIBQskdDAxOTAwMTkzMgJfMQQBaggFCyR0MDE5MDAxOTMyAl8yAwkAZwIFAWoFDnJlY2lwaWVudHNTaXplCQCUCgIFD3NjcmlwdFRyYW5zZmVycwkAZAIFAWoAAQkAlAoCCQDNCAIFD3NjcmlwdFRyYW5zZmVycwkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQpyZWNpcGllbnRzBQFqBQRuZXh0CAkAkQMCCAUBaQhwYXltZW50cwkAkQMCBQpwYXltZW50SWR4BQFqB2Fzc2V0SWQJAGQCBQFqAAEEBnJlc3VsdAoAAiRsBQdhbW91bnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEYc2NyaXB0VHJhbnNmZXJzR2VuZXJhdG9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAyCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgkAlAoCCAUGcmVzdWx0Al8xBQR1bml0ADFPFn4=",
    "height": 2392980,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3bdKQY1vrPJPqTDt1q7j3wQXtUMQKmwGHcNfZphtqizb
Next: GFBcyUDS8LhMtPQvtUatKqaqzdfX8iQtKucUS77nJszs

Diff: 
Old
New
Differences
57
57
 
58
58
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
59
59
 
            then $a
60
-
            else throw("List size exceeds 2")
60
+
            else throw("List size exceeds 10")
61
61
 
62
-
        $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
62
+
        $f0_2($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)
63
63
 
        }
64
64
 
    if (if (if (if (if (if (if (if ((recipientsSize == amountsSize))
65
65
 
        then (recipientsSize == paymentIdxSize)
87
87
 
    else {
88
88
 
        let recipientsSize = size(recipients)
89
89
 
        func scriptTransfersGenerator (accum,next) =         {
90
-
            let $t018991931 = accum
91
-
            let scriptTransfers = $t018991931._1
92
-
            let j = $t018991931._2
90
+
            let $t019001932 = accum
91
+
            let scriptTransfers = $t019001932._1
92
+
            let j = $t019001932._2
93
93
 
            if ((j >= recipientsSize))
94
94
 
                then $Tuple2(scriptTransfers, (j + 1))
95
95
 
                else $Tuple2((scriptTransfers :+ ScriptTransfer(addressFromStringValue(recipients[j]), next, i.payments[paymentIdx[j]].assetId)), (j + 1))
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func validateArguments (recipients,amounts,paymentIdx,payments) = {
5
5
 
    let recipientsSize = size(recipients)
6
6
 
    let amountsSize = size(amounts)
7
7
 
    let paymentIdxSize = size(paymentIdx)
8
8
 
    let paymentsSize = size(payments)
9
9
 
    let minAmount = min(amounts)
10
10
 
    let minPaymentIdx = min(paymentIdx)
11
11
 
    let maxPaymentIdx = max(paymentIdx)
12
12
 
    func paymentsValidator (paymentAccum,nextPayment) =     {
13
13
 
        let $t0583620 = paymentAccum
14
14
 
        let validPayments = $t0583620._1
15
15
 
        let j = $t0583620._2
16
16
 
        if ((j >= paymentsSize))
17
17
 
            then $Tuple2(validPayments, (j + 1))
18
18
 
            else {
19
19
 
                func amountsAggregator (amountAccum,nextAmount) =                 {
20
20
 
                    let $t0775804 = amountAccum
21
21
 
                    let amount = $t0775804._1
22
22
 
                    let k = $t0775804._2
23
23
 
                    if (if ((k >= recipientsSize))
24
24
 
                        then true
25
25
 
                        else (paymentIdx[k] != j))
26
26
 
                        then $Tuple2(amount, (k + 1))
27
27
 
                        else $Tuple2((amount + nextAmount), (k + 1))
28
28
 
                    }
29
29
 
30
30
 
                let aggregatedAmount = {
31
31
 
                    let $l = amounts
32
32
 
                    let $s = size($l)
33
33
 
                    let $acc0 = $Tuple2(0, 0)
34
34
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
35
35
 
                        then $a
36
36
 
                        else amountsAggregator($a, $l[$i])
37
37
 
38
38
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
39
39
 
                        then $a
40
40
 
                        else throw("List size exceeds 2")
41
41
 
42
42
 
                    $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
43
43
 
                    }
44
44
 
                if ((aggregatedAmount._1 == nextPayment.amount))
45
45
 
                    then $Tuple2((validPayments + 1), (j + 1))
46
46
 
                    else $Tuple2(validPayments, (j + 1))
47
47
 
                }
48
48
 
        }
49
49
 
50
50
 
    let paymentsValidation = {
51
51
 
        let $l = payments
52
52
 
        let $s = size($l)
53
53
 
        let $acc0 = $Tuple2(0, 0)
54
54
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
55
55
 
            then $a
56
56
 
            else paymentsValidator($a, $l[$i])
57
57
 
58
58
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
59
59
 
            then $a
60
-
            else throw("List size exceeds 2")
60
+
            else throw("List size exceeds 10")
61
61
 
62
-
        $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
62
+
        $f0_2($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)
63
63
 
        }
64
64
 
    if (if (if (if (if (if (if (if ((recipientsSize == amountsSize))
65
65
 
        then (recipientsSize == paymentIdxSize)
66
66
 
        else false)
67
67
 
        then (recipientsSize > 0)
68
68
 
        else false)
69
69
 
        then (2 >= recipientsSize)
70
70
 
        else false)
71
71
 
        then (paymentsSize > 0)
72
72
 
        else false)
73
73
 
        then (minAmount > 0)
74
74
 
        else false)
75
75
 
        then (minPaymentIdx == 0)
76
76
 
        else false)
77
77
 
        then (maxPaymentIdx == (paymentsSize - 1))
78
78
 
        else false)
79
79
 
        then (paymentsValidation._1 == paymentsSize)
80
80
 
        else false
81
81
 
    }
82
82
 
83
83
 
84
84
 
@Callable(i)
85
85
 
func massTransfer (recipients,amounts,paymentIdx,attachment) = if (!(validateArguments(recipients, amounts, paymentIdx, i.payments)))
86
86
 
    then throw("Invalid arguments")
87
87
 
    else {
88
88
 
        let recipientsSize = size(recipients)
89
89
 
        func scriptTransfersGenerator (accum,next) =         {
90
-
            let $t018991931 = accum
91
-
            let scriptTransfers = $t018991931._1
92
-
            let j = $t018991931._2
90
+
            let $t019001932 = accum
91
+
            let scriptTransfers = $t019001932._1
92
+
            let j = $t019001932._2
93
93
 
            if ((j >= recipientsSize))
94
94
 
                then $Tuple2(scriptTransfers, (j + 1))
95
95
 
                else $Tuple2((scriptTransfers :+ ScriptTransfer(addressFromStringValue(recipients[j]), next, i.payments[paymentIdx[j]].assetId)), (j + 1))
96
96
 
            }
97
97
 
98
98
 
        let result = {
99
99
 
            let $l = amounts
100
100
 
            let $s = size($l)
101
101
 
            let $acc0 = $Tuple2(nil, 0)
102
102
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
103
103
 
                then $a
104
104
 
                else scriptTransfersGenerator($a, $l[$i])
105
105
 
106
106
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
107
107
 
                then $a
108
108
 
                else throw("List size exceeds 2")
109
109
 
110
110
 
            $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
111
111
 
            }
112
112
 
        $Tuple2(result._1, unit)
113
113
 
        }
114
114
 
115
115
 

github/deemru/w8io/026f985 
25.98 ms ◑