tx · BkFrV4Vu8jNu6e9hinBNFHUb4UnE5361iHEAakChjP68

3P2cpE7nusQRRFt3Tg22WtKfdi6bUKwmqVM:  -0.00300000 Waves

2022.11.07 21:06 [3372421] smart account 3P2cpE7nusQRRFt3Tg22WtKfdi6bUKwmqVM > SELF 0.00000000 Waves

{ "type": 13, "id": "BkFrV4Vu8jNu6e9hinBNFHUb4UnE5361iHEAakChjP68", "fee": 300000, "feeAssetId": null, "timestamp": 1667844450904, "version": 1, "sender": "3P2cpE7nusQRRFt3Tg22WtKfdi6bUKwmqVM", "senderPublicKey": "8xtgNUbDeY3bAbSDK7Dkkgkqb6NYfMaKQqRVQxArsCgP", "proofs": [ "3RmRH41dvYpXFtvLDQ4Ahuvt7KYb8YRgQ61FQjUtZ78WdiitZWdoKLE1F8FwCYyRBagrMieB23Ms5zsjw6Xqtwsc" ], "script": "base64:BgIKCAISBAoCAQgSAAQABFVTRE4BILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAAxhZG1pbkFkZHJlc3MJAQdBZGRyZXNzAQEaAVc0FN9xREbfMFTR97icc0UMqzorm02OJmEAEHZpcmVzTWFpbkFkZHJlc3MJAQdBZGRyZXNzAQEaAVdewZYZMMmiQ3hGadYm1vHmuEPQvfZMHrgABnVzZGNMcAEg1oaacWthwTdC30x+4yrVGXT/80n5kiC/TDA74pgCkbECAWkBAWUCBmFtb3VudAphZGRyZXNzU3RyAwkBAiE9AggFAWkGY2FsbGVyBQxhZG1pbkFkZHJlc3MJAAIBAhFvbmx5IGFkbWluIGNhbiBkbwQEaW52MQkA/AcEBRB2aXJlc01haW5BZGRyZXNzAgptaW50QXRva2VuCQDMCAIJANgEAQUGdXNkY0xwCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUEaW52MQUEaW52MQQEaW52MgkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQphZGRyZXNzU3RyAgFpBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBnVzZGNMcAUGYW1vdW50BQNuaWwDCQAAAgUEaW52MgUEaW52MgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBA2ZfZQADCQECIT0CCAUBaQZjYWxsZXIFDGFkbWluQWRkcmVzcwkAAgECEW9ubHkgYWRtaW4gY2FuIGRvBARpbnYxCQD8BwQFEHZpcmVzTWFpbkFkZHJlc3MCCm1pbnRBdG9rZW4JAMwIAgkA2AQBBQZ1c2RjTHAJAMwIAgDA3LeRAQUDbmlsBQNuaWwDCQAAAgUEaW52MQUEaW52MQoBBWVGb2xkAgVhY2N1bQRuZXh0BAZhbW91bnQAoJfEBgQBZAkAaAIFBWFjY3VtAKiuCAQEaW52MgkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQRuZXh0AgFpBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBnVzZGNMcAkAZQIFBmFtb3VudAUBZAUDbmlsAwkAAAIFBGludjIFBGludjIJAGQCBQVhY2N1bQABCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBApmb2xkUmVzdWx0CgACJGwJAMwIAgIjM1A1NTlCVXJxb2dtOXYyUzllaWJvYVJGU3AyaFdISHdFaHAJAMwIAgIjM1BMYXY0Y21oMVhWemdwNnVDZDJqNGtrUHd2V2lhb1Q0WkIJAMwIAgIjM1AzdWloTHFvY2VqYnkzcXppN0Z6SzNIcHNZV2FMQ0NxcUsJAMwIAgIjM1A3ZFVWcjZ0a1F1clphRHRmeFFnMnZ0VzNIZ1dwenhMczMJAMwIAgIjM1BLOGNwcU5UZ0xad25zUFZCOE5BaHUxVUYzbTczZDRtMVkJAMwIAgIjM1A5Q2lLdXFvVHBrcXV0aHVOWHBKMXUzTTZVRGlMdlMyVkEJAMwIAgIjM1BOSko0U2ZYb2M5cDRQUldWRDVuVlh4OTJqeGpidFBtY3oJAMwIAgIjM1BETkRONVRFcHVFdHV5cjQyS2hMSzZ5RVRKR2JDcUhyYWQJAMwIAgIjM1BOMWJ4VHhaOFFNb3YxVU14bkhENHA1YTRCOEpEOXBRd0YJAMwIAgIjM1A2M29uYlJXNFIyVG84VExXalNqR0Npb1FzbjNDUTNzdTMJAMwIAgIjM1Axem5WVVhtNW1TclJOVlJ2UUVIa3JmRDlaRFJDM1phRnYJAMwIAgIjM1A5WWdkdk5ON2hKdkRFNjF3SGNwS2NRM3ByUEFqVlRUdnkJAMwIAgIjM1BBMUw0akQ1QWRIN0hQcGtXc0NNWDd6cHJ4a3dKTnF2S3gJAMwIAgIjM1A3WmVQaEJVQzFDdENjNldnbVRncDFhRnVucENRWUUza1QJAMwIAgIjM1AyeXRGZko5Tk56WEhIMkhOOG14R3dVVzZobnBENkRKNVAJAMwIAgIjM1BIZVNoZ3VWdlJnbVdCcktvcHVudWRVbmN4NzRuSHVMNDgJAMwIAgIjM1BEbng2d1dqeU1xQXVDWkVOZDRZOFM3ZmJOWjNybnV6YUoJAMwIAgIjM1BEcEZjRnFDTHE2dXFkQlR6Q3dDaXFoZThtdnFiRmRia3gJAMwIAgIjM1BKYkdkNnpvYzdFTXZkazRENUFzZnNVN1FMR3Q2ZFdUaGoJAMwIAgIjM1BBN29vUndlZUtIQllTaGU4N3pzbWh2RnNFZzdHTEZKSkwJAMwIAgIjM1A4dlNCd0hQM2tUcXk5akZUVVJvcE1haFBTVXdONVJFRUYJAMwIAgIjM1BIcDVTY3U4TlFhWU10NG1Zc255cThOQnRuSGVhNnZCTkUJAMwIAgIjM1BFaEVDM1VnWU10dU5kcG16S2ozZkdma3c0WXRBTUZHZGcJAMwIAgIjM1A1UjhoTGRVS2hYVTZXTGhSMmJ4VmI5dUtvQnNzamFnQ1YJAMwIAgIjM1BHQW1uZWV0anlOeEplcWMyOXBNNGdKTW9vMTk0YjVVcVUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFZUZvbGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDI1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkDCQAAAgUKZm9sZFJlc3VsdAUKZm9sZFJlc3VsdAkAlAoCBQNuaWwAiQEJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AIJJRsg==", "chainId": 87, "height": 3372421, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 821312nez4qEqYopZYdx4rAPxakzwGZ1xCvXDp67sSLz Next: 92gExeHi8XUAKSXuvnMzAJdh2dtpQRuySEjuEMiFFJk3 Diff:
OldNewDifferences
2525 }
2626
2727
28+
29+@Callable(i)
30+func f_e () = if ((i.caller != adminAddress))
31+ then throw("only admin can do")
32+ else {
33+ let inv1 = invoke(viresMainAddress, "mintAtoken", [toBase58String(usdcLp), 305000000], nil)
34+ if ((inv1 == inv1))
35+ then {
36+ func eFold (accum,next) = {
37+ let amount = 13700000
38+ let d = (accum * 137000)
39+ let inv2 = invoke(addressFromStringValue(next), "i", nil, [AttachedPayment(usdcLp, (amount - d))])
40+ if ((inv2 == inv2))
41+ then (accum + 1)
42+ else throw("Strict value is not equal to itself.")
43+ }
44+
45+ let foldResult = {
46+ let $l = ["3P559BUrqogm9v2S9eiboaRFSp2hWHHwEhp", "3PLav4cmh1XVzgp6uCd2j4kkPwvWiaoT4ZB", "3P3uihLqocejby3qzi7FzK3HpsYWaLCCqqK", "3P7dUVr6tkQurZaDtfxQg2vtW3HgWpzxLs3", "3PK8cpqNTgLZwnsPVB8NAhu1UF3m73d4m1Y", "3P9CiKuqoTpkquthuNXpJ1u3M6UDiLvS2VA", "3PNJJ4SfXoc9p4PRWVD5nVXx92jxjbtPmcz", "3PDNDN5TEpuEtuyr42KhLK6yETJGbCqHrad", "3PN1bxTxZ8QMov1UMxnHD4p5a4B8JD9pQwF", "3P63onbRW4R2To8TLWjSjGCioQsn3CQ3su3", "3P1znVUXm5mSrRNVRvQEHkrfD9ZDRC3ZaFv", "3P9YgdvNN7hJvDE61wHcpKcQ3prPAjVTTvy", "3PA1L4jD5AdH7HPpkWsCMX7zprxkwJNqvKx", "3P7ZePhBUC1CtCc6WgmTgp1aFunpCQYE3kT", "3P2ytFfJ9NNzXHH2HN8mxGwUW6hnpD6DJ5P", "3PHeShguVvRgmWBrKopunudUncx74nHuL48", "3PDnx6wWjyMqAuCZENd4Y8S7fbNZ3rnuzaJ", "3PDpFcFqCLq6uqdBTzCwCiqhe8mvqbFdbkx", "3PJbGd6zoc7EMvdk4D5AsfsU7QLGt6dWThj", "3PA7ooRweeKHBYShe87zsmhvFsEg7GLFJJL", "3P8vSBwHP3kTqy9jFTURopMahPSUwN5REEF", "3PHp5Scu8NQaYMt4mYsnyq8NBtnHea6vBNE", "3PEhEC3UgYMtuNdpmzKj3fGfkw4YtAMFGdg", "3P5R8hLdUKhXU6WLhR2bxVb9uKoBssjagCV", "3PGAmneetjyNxJeqc29pM4gJMoo194b5UqU"]
47+ let $s = size($l)
48+ let $acc0 = 0
49+ func $f0_1 ($a,$i) = if (($i >= $s))
50+ then $a
51+ else eFold($a, $l[$i])
52+
53+ func $f0_2 ($a,$i) = if (($i >= $s))
54+ then $a
55+ else throw("List size exceeds 25")
56+
57+ $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($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)
58+ }
59+ if ((foldResult == foldResult))
60+ then $Tuple2(nil, 137)
61+ else throw("Strict value is not equal to itself.")
62+ }
63+ else throw("Strict value is not equal to itself.")
64+ }
65+
66+
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let USDN = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
55
66 let adminAddress = Address(base58'3P6gGsVQbD2xgmaNxN7Rj3arohPsBxvo5GC')
77
88 let viresMainAddress = Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT')
99
1010 let usdcLp = base58'FSRHtSyXRXQjzQLRtmaqFpBDDCNjY8PU8KNtwoGXVBmr'
1111
1212 @Callable(i)
1313 func e (amount,addressStr) = if ((i.caller != adminAddress))
1414 then throw("only admin can do")
1515 else {
1616 let inv1 = invoke(viresMainAddress, "mintAtoken", [toBase58String(usdcLp), amount], nil)
1717 if ((inv1 == inv1))
1818 then {
1919 let inv2 = invoke(addressFromStringValue(addressStr), "i", nil, [AttachedPayment(usdcLp, amount)])
2020 if ((inv2 == inv2))
2121 then nil
2222 else throw("Strict value is not equal to itself.")
2323 }
2424 else throw("Strict value is not equal to itself.")
2525 }
2626
2727
28+
29+@Callable(i)
30+func f_e () = if ((i.caller != adminAddress))
31+ then throw("only admin can do")
32+ else {
33+ let inv1 = invoke(viresMainAddress, "mintAtoken", [toBase58String(usdcLp), 305000000], nil)
34+ if ((inv1 == inv1))
35+ then {
36+ func eFold (accum,next) = {
37+ let amount = 13700000
38+ let d = (accum * 137000)
39+ let inv2 = invoke(addressFromStringValue(next), "i", nil, [AttachedPayment(usdcLp, (amount - d))])
40+ if ((inv2 == inv2))
41+ then (accum + 1)
42+ else throw("Strict value is not equal to itself.")
43+ }
44+
45+ let foldResult = {
46+ let $l = ["3P559BUrqogm9v2S9eiboaRFSp2hWHHwEhp", "3PLav4cmh1XVzgp6uCd2j4kkPwvWiaoT4ZB", "3P3uihLqocejby3qzi7FzK3HpsYWaLCCqqK", "3P7dUVr6tkQurZaDtfxQg2vtW3HgWpzxLs3", "3PK8cpqNTgLZwnsPVB8NAhu1UF3m73d4m1Y", "3P9CiKuqoTpkquthuNXpJ1u3M6UDiLvS2VA", "3PNJJ4SfXoc9p4PRWVD5nVXx92jxjbtPmcz", "3PDNDN5TEpuEtuyr42KhLK6yETJGbCqHrad", "3PN1bxTxZ8QMov1UMxnHD4p5a4B8JD9pQwF", "3P63onbRW4R2To8TLWjSjGCioQsn3CQ3su3", "3P1znVUXm5mSrRNVRvQEHkrfD9ZDRC3ZaFv", "3P9YgdvNN7hJvDE61wHcpKcQ3prPAjVTTvy", "3PA1L4jD5AdH7HPpkWsCMX7zprxkwJNqvKx", "3P7ZePhBUC1CtCc6WgmTgp1aFunpCQYE3kT", "3P2ytFfJ9NNzXHH2HN8mxGwUW6hnpD6DJ5P", "3PHeShguVvRgmWBrKopunudUncx74nHuL48", "3PDnx6wWjyMqAuCZENd4Y8S7fbNZ3rnuzaJ", "3PDpFcFqCLq6uqdBTzCwCiqhe8mvqbFdbkx", "3PJbGd6zoc7EMvdk4D5AsfsU7QLGt6dWThj", "3PA7ooRweeKHBYShe87zsmhvFsEg7GLFJJL", "3P8vSBwHP3kTqy9jFTURopMahPSUwN5REEF", "3PHp5Scu8NQaYMt4mYsnyq8NBtnHea6vBNE", "3PEhEC3UgYMtuNdpmzKj3fGfkw4YtAMFGdg", "3P5R8hLdUKhXU6WLhR2bxVb9uKoBssjagCV", "3PGAmneetjyNxJeqc29pM4gJMoo194b5UqU"]
47+ let $s = size($l)
48+ let $acc0 = 0
49+ func $f0_1 ($a,$i) = if (($i >= $s))
50+ then $a
51+ else eFold($a, $l[$i])
52+
53+ func $f0_2 ($a,$i) = if (($i >= $s))
54+ then $a
55+ else throw("List size exceeds 25")
56+
57+ $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($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)
58+ }
59+ if ((foldResult == foldResult))
60+ then $Tuple2(nil, 137)
61+ else throw("Strict value is not equal to itself.")
62+ }
63+ else throw("Strict value is not equal to itself.")
64+ }
65+
66+

github/deemru/w8io/169f3d6 
58.59 ms