w8 · tx · 2tE···Kg2

tx · 2tE6nPEivm9YfBgF12c2mRHKRtR54QqjLSimYRgNHKg2

3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d:  -0.01000000 Waves

2023.10.09 15:51 [2791115] smart account 3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2tE6nPEivm9YfBgF12c2mRHKRtR54QqjLSimYRgNHKg2",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1696855897735,
    "version": 2,
    "chainId": 84,
    "sender": "3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d",
    "senderPublicKey": "7E4cNcg8gSYTmNbmLG2kvAiePh9KZoAT7W64shHxCc6n",
    "proofs": [
        "3TnJEqZxpn2qWC7AHH1o4M74LEx2pBQWApXyYokbq8CBMD1tvDBwAL3mQB9Skfg5CHA371SAUXVntrbDNwNpCS4D"
    ],
    "script": "base64:BgIKCAISBgoEGBERCAEBEXZhbGlkYXRlQXJndW1lbnRzBApyZWNpcGllbnRzB2Ftb3VudHMKcGF5bWVudElkeAhwYXltZW50cwQOcmVjaXBpZW50c1NpemUJAJADAQUKcmVjaXBpZW50cwQLYW1vdW50c1NpemUJAJADAQUHYW1vdW50cwQOcGF5bWVudElkeFNpemUJAJADAQUKcGF5bWVudElkeAQMcGF5bWVudHNTaXplCQCQAwEFCHBheW1lbnRzBAltaW5BbW91bnQJAJcDAQUHYW1vdW50cwQNbWluUGF5bWVudElkeAkAlwMBBQpwYXltZW50SWR4BA1tYXhQYXltZW50SWR4CQCWAwEFCnBheW1lbnRJZHgKARFwYXltZW50c1ZhbGlkYXRvcgIMcGF5bWVudEFjY3VtC25leHRQYXltZW50BAkkdDA1ODM2MjAFDHBheW1lbnRBY2N1bQQNdmFsaWRQYXltZW50cwgFCSR0MDU4MzYyMAJfMQQBaggFCSR0MDU4MzYyMAJfMgMJAGcCBQFqBQxwYXltZW50c1NpemUJAJQKAgUNdmFsaWRQYXltZW50cwkAZAIFAWoAAQoBEWFtb3VudHNBZ2dyZWdhdG9yAgthbW91bnRBY2N1bQpuZXh0QW1vdW50BAkkdDA3NzU4MDQFC2Ftb3VudEFjY3VtBAZhbW91bnQIBQkkdDA3NzU4MDQCXzEEAWsIBQkkdDA3NzU4MDQCXzIDAwkAZwIFAWsFDnJlY2lwaWVudHNTaXplBgkBAiE9AgkAkQMCBQpwYXltZW50SWR4BQFrBQFqCQCUCgIFBmFtb3VudAkAZAIFAWsAAQkAlAoCCQBkAgUGYW1vdW50BQpuZXh0QW1vdW50CQBkAgUBawABBBBhZ2dyZWdhdGVkQW1vdW50CgACJGwFB2Ftb3VudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARFhbW91bnRzQWdncmVnYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQDCQAAAggFEGFnZ3JlZ2F0ZWRBbW91bnQCXzEIBQtuZXh0UGF5bWVudAZhbW91bnQJAJQKAgkAZAIFDXZhbGlkUGF5bWVudHMAAQkAZAIFAWoAAQkAlAoCBQ12YWxpZFBheW1lbnRzCQBkAgUBagABBBJwYXltZW50c1ZhbGlkYXRpb24KAAIkbAUIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARFwYXltZW50c1ZhbGlkYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgMDAwMDAwMDCQAAAgUOcmVjaXBpZW50c1NpemUFC2Ftb3VudHNTaXplCQAAAgUOcmVjaXBpZW50c1NpemUFDnBheW1lbnRJZHhTaXplBwkAZgIFDnJlY2lwaWVudHNTaXplAAAHCQBnAgBkBQ5yZWNpcGllbnRzU2l6ZQcJAGYCBQxwYXltZW50c1NpemUAAAcJAGYCBQltaW5BbW91bnQAAAcJAAACBQ1taW5QYXltZW50SWR4AAAHCQAAAgUNbWF4UGF5bWVudElkeAkAZQIFDHBheW1lbnRzU2l6ZQABBwkAAAIIBRJwYXltZW50c1ZhbGlkYXRpb24CXzEFDHBheW1lbnRzU2l6ZQcBAWkBDG1hc3NUcmFuc2ZlcgQKcmVjaXBpZW50cwdhbW91bnRzCnBheW1lbnRJZHgKYXR0YWNobWVudAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEEWxwX2FkZHJlc3NfcHVia2V5ASB8vlwYSP64b/y0FH5WKJ/HvKtD0/JwQ3hMR+o3gHrAawQgbWFzc3RyYW5zZmVyX3doaXRlbGlzdGVkX2FkZHJlc3MJAKcIAQURbHBfYWRkcmVzc19wdWJrZXkDCQECIT0CCAUBaQZjYWxsZXIFIG1hc3N0cmFuc2Zlcl93aGl0ZWxpc3RlZF9hZGRyZXNzCQACAQkArAICCQCsAgICEU5vdCBhbiBBZG1pbiBvbmx5CQClCAEFIG1hc3N0cmFuc2Zlcl93aGl0ZWxpc3RlZF9hZGRyZXNzAg0gY2FuIHNpZ24gaXQuAwkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAkAAgECK09ubHkgV2F2ZXMgaXMgYWxsb3dlZCB0byBBdHRhY2ggYXMgcGF5bWVudC4DCQEBIQEJARF2YWxpZGF0ZUFyZ3VtZW50cwQFCnJlY2lwaWVudHMFB2Ftb3VudHMFCnBheW1lbnRJZHgIBQFpCHBheW1lbnRzCQACAQIRSW52YWxpZCBhcmd1bWVudHMEDnJlY2lwaWVudHNTaXplCQCQAwEFCnJlY2lwaWVudHMKARhzY3JpcHRUcmFuc2ZlcnNHZW5lcmF0b3ICBWFjY3VtBG5leHQECyR0MDIzMjQyMzU2BQVhY2N1bQQPc2NyaXB0VHJhbnNmZXJzCAULJHQwMjMyNDIzNTYCXzEEAWoIBQskdDAyMzI0MjM1NgJfMgMJAGcCBQFqBQ5yZWNpcGllbnRzU2l6ZQkAlAoCBQ9zY3JpcHRUcmFuc2ZlcnMJAGQCBQFqAAEJAJQKAgkAzQgCBQ9zY3JpcHRUcmFuc2ZlcnMJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUKcmVjaXBpZW50cwUBagUEbmV4dAgJAJEDAggFAWkIcGF5bWVudHMJAJEDAgUKcGF5bWVudElkeAUBagdhc3NldElkCQBkAgUBagABBAZyZXN1bHQKAAIkbAUHYW1vdW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBGHNjcmlwdFRyYW5zZmVyc0dlbmVyYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAJQKAggFBnJlc3VsdAJfMQUEdW5pdACirnKN",
    "height": 2791115,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9z9GBzSVjAbFwrLfBNTXTA85dNrr2juPiJMFuTNJumD6
Next: 4ypGAEhcaZeUnbdPi9qe93M8NZgczVYr4xAsPuAEycR3

Diff: 
Old New Differences
84 84  @Callable(i)
85 85  func massTransfer (recipients,amounts,paymentIdx,attachment) = {
86 86      let pmt = value(i.payments[0])
87 -     let lp_address_pubkey = base58'GKmJ6BchUgQfwKp4mp5eX8Y9xLioYRm6e1gDfFgdAcCr'
87 +     let lp_address_pubkey = base58'9Pwum3va2xrkVwsGRNiTeGxBBBNFEDaS9sfkZiSpSvdQ'
88 88      let masstransfer_whitelisted_address = addressFromPublicKey(lp_address_pubkey)
89 89      if ((i.caller != masstransfer_whitelisted_address))
90 90          then throw((("Not an Admin only" + toString(masstransfer_whitelisted_address)) + " can sign it."))
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 100")
41 41  
42 42                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
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 60              else throw("List size exceeds 10")
61 61  
62 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 (100 >= 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) = {
86 86      let pmt = value(i.payments[0])
87 -     let lp_address_pubkey = base58'GKmJ6BchUgQfwKp4mp5eX8Y9xLioYRm6e1gDfFgdAcCr'
87 +     let lp_address_pubkey = base58'9Pwum3va2xrkVwsGRNiTeGxBBBNFEDaS9sfkZiSpSvdQ'
88 88      let masstransfer_whitelisted_address = addressFromPublicKey(lp_address_pubkey)
89 89      if ((i.caller != masstransfer_whitelisted_address))
90 90          then throw((("Not an Admin only" + toString(masstransfer_whitelisted_address)) + " can sign it."))
91 91          else if (isDefined(pmt.assetId))
92 92              then throw("Only Waves is allowed to Attach as payment.")
93 93              else if (!(validateArguments(recipients, amounts, paymentIdx, i.payments)))
94 94                  then throw("Invalid arguments")
95 95                  else {
96 96                      let recipientsSize = size(recipients)
97 97                      func scriptTransfersGenerator (accum,next) =                     {
98 98                          let $t023242356 = accum
99 99                          let scriptTransfers = $t023242356._1
100 100                          let j = $t023242356._2
101 101                          if ((j >= recipientsSize))
102 102                              then $Tuple2(scriptTransfers, (j + 1))
103 103                              else $Tuple2((scriptTransfers :+ ScriptTransfer(addressFromStringValue(recipients[j]), next, i.payments[paymentIdx[j]].assetId)), (j + 1))
104 104                          }
105 105  
106 106                      let result = {
107 107                          let $l = amounts
108 108                          let $s = size($l)
109 109                          let $acc0 = $Tuple2(nil, 0)
110 110                          func $f0_1 ($a,$i) =                         if (($i >= $s))
111 111                              then $a
112 112                              else scriptTransfersGenerator($a, $l[$i])
113 113  
114 114                          func $f0_2 ($a,$i) =                         if (($i >= $s))
115 115                              then $a
116 116                              else throw("List size exceeds 100")
117 117  
118 118                          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
119 119                          }
120 120                      $Tuple2(result._1, unit)
121 121                      }
122 122      }
123 123  
124 124

Old	New		Differences
84	84		@Callable(i)
85	85		func massTransfer (recipients,amounts,paymentIdx,attachment) = {
86	86		let pmt = value(i.payments[0])
87		-	let lp_address_pubkey = base58'~~GKmJ6BchUgQfwKp4mp5eX8Y9xLioYRm6e1gDfFgdAcCr~~'
	87	+	let lp_address_pubkey = base58'9Pwum3va2xrkVwsGRNiTeGxBBBNFEDaS9sfkZiSpSvdQ'
88	88		let masstransfer_whitelisted_address = addressFromPublicKey(lp_address_pubkey)
89	89		if ((i.caller != masstransfer_whitelisted_address))
90	90		then throw((("Not an Admin only" + toString(masstransfer_whitelisted_address)) + " can sign it."))

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 100")
41	41
42	42		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
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	60		else throw("List size exceeds 10")
61	61
62	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 (100 >= 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) = {
86	86		let pmt = value(i.payments[0])
87		-	let lp_address_pubkey = base58'~~GKmJ6BchUgQfwKp4mp5eX8Y9xLioYRm6e1gDfFgdAcCr~~'
	87	+	let lp_address_pubkey = base58'9Pwum3va2xrkVwsGRNiTeGxBBBNFEDaS9sfkZiSpSvdQ'
88	88		let masstransfer_whitelisted_address = addressFromPublicKey(lp_address_pubkey)
89	89		if ((i.caller != masstransfer_whitelisted_address))
90	90		then throw((("Not an Admin only" + toString(masstransfer_whitelisted_address)) + " can sign it."))
91	91		else if (isDefined(pmt.assetId))
92	92		then throw("Only Waves is allowed to Attach as payment.")
93	93		else if (!(validateArguments(recipients, amounts, paymentIdx, i.payments)))
94	94		then throw("Invalid arguments")
95	95		else {
96	96		let recipientsSize = size(recipients)
97	97		func scriptTransfersGenerator (accum,next) = {
98	98		let $t023242356 = accum
99	99		let scriptTransfers = $t023242356._1
100	100		let j = $t023242356._2
101	101		if ((j >= recipientsSize))
102	102		then $Tuple2(scriptTransfers, (j + 1))
103	103		else $Tuple2((scriptTransfers :+ ScriptTransfer(addressFromStringValue(recipients[j]), next, i.payments[paymentIdx[j]].assetId)), (j + 1))
104	104		}
105	105
106	106		let result = {
107	107		let $l = amounts
108	108		let $s = size($l)
109	109		let $acc0 = $Tuple2(nil, 0)
110	110		func $f0_1 ($a,$i) = if (($i >= $s))
111	111		then $a
112	112		else scriptTransfersGenerator($a, $l[$i])
113	113
114	114		func $f0_2 ($a,$i) = if (($i >= $s))
115	115		then $a
116	116		else throw("List size exceeds 100")
117	117
118	118		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
119	119		}
120	120		$Tuple2(result._1, unit)
121	121		}
122	122		}
123	123
124	124

github/deemru/w8io/169f3d6 
40.50 ms ◑