tx · 9sn1kkgK3utoR36m8JFkJeGf4CRygCtCVfuZXZYVNkgT

3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d:  -0.01000000 Waves

2023.10.20 18:26 [2807088] smart account 3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9sn1kkgK3utoR36m8JFkJeGf4CRygCtCVfuZXZYVNkgT",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1697815576704,
    "version": 2,
    "chainId": 84,
    "sender": "3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d",
    "senderPublicKey": "7E4cNcg8gSYTmNbmLG2kvAiePh9KZoAT7W64shHxCc6n",
    "proofs": [
        "dik3uTUrD3MbBVgWyZq3CixxMZnPmhmS3ZULvvd5Csec3HvnhvSv9S5jPy8kj2xtbK8fUt5nwoi8xscV6bLHeS2"
    ],
    "script": "base64:BgIPCAISBgoEGBERCBIDCgEBBAARbHBfYWRkcmVzc19wdWJrZXkBIHy+XBhI/rhv/LQUflYon8e8q0PT8nBDeExH6jeAesBrACBtYXNzdHJhbnNmZXJfd2hpdGVsaXN0ZWRfYWRkcmVzcwkApwgBBRFscF9hZGRyZXNzX3B1YmtleQALbmV0d29ya19mZWUAoMIeAR12YWxpZGF0ZU1hc3NUcmFuc2ZlckFyZ3VtZW50cwQKcmVjaXBpZW50cwdhbW91bnRzCnBheW1lbnRJZHgIcGF5bWVudHMEDnJlY2lwaWVudHNTaXplCQCQAwEFCnJlY2lwaWVudHMEC2Ftb3VudHNTaXplCQCQAwEFB2Ftb3VudHMEDnBheW1lbnRJZHhTaXplCQCQAwEFCnBheW1lbnRJZHgEDHBheW1lbnRzU2l6ZQkAkAMBBQhwYXltZW50cwQJbWluQW1vdW50CQCXAwEFB2Ftb3VudHMEDW1pblBheW1lbnRJZHgJAJcDAQUKcGF5bWVudElkeAQNbWF4UGF5bWVudElkeAkAlgMBBQpwYXltZW50SWR4CgERcGF5bWVudHNWYWxpZGF0b3ICDHBheW1lbnRBY2N1bQtuZXh0UGF5bWVudAQJJHQwNzk5ODM2BQxwYXltZW50QWNjdW0EDXZhbGlkUGF5bWVudHMIBQkkdDA3OTk4MzYCXzEEAWoIBQkkdDA3OTk4MzYCXzIDCQBnAgUBagUMcGF5bWVudHNTaXplCQCUCgIFDXZhbGlkUGF5bWVudHMJAGQCBQFqAAEKARFhbW91bnRzQWdncmVnYXRvcgILYW1vdW50QWNjdW0KbmV4dEFtb3VudAQKJHQwOTkxMTAyMAULYW1vdW50QWNjdW0EBmFtb3VudAgFCiR0MDk5MTEwMjACXzEEAWsIBQokdDA5OTExMDIwAl8yAwMJAGcCBQFrBQ5yZWNpcGllbnRzU2l6ZQYJAQIhPQIJAJEDAgUKcGF5bWVudElkeAUBawUBagkAlAoCBQZhbW91bnQJAGQCBQFrAAEJAJQKAgkAZAIFBmFtb3VudAUKbmV4dEFtb3VudAkAZAIFAWsAAQQQYWdncmVnYXRlZEFtb3VudAoAAiRsBQdhbW91bnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQERYW1vdW50c0FnZ3JlZ2F0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkAwkAAAIIBRBhZ2dyZWdhdGVkQW1vdW50Al8xCAULbmV4dFBheW1lbnQGYW1vdW50CQCUCgIJAGQCBQ12YWxpZFBheW1lbnRzAAEJAGQCBQFqAAEJAJQKAgUNdmFsaWRQYXltZW50cwkAZAIFAWoAAQQScGF5bWVudHNWYWxpZGF0aW9uCgACJGwFCHBheW1lbnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQERcGF5bWVudHNWYWxpZGF0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDAwMDAwMDAwkAAAIFDnJlY2lwaWVudHNTaXplBQthbW91bnRzU2l6ZQkAAAIFDnJlY2lwaWVudHNTaXplBQ5wYXltZW50SWR4U2l6ZQcJAGYCBQ5yZWNpcGllbnRzU2l6ZQAABwkAZwIAZAUOcmVjaXBpZW50c1NpemUHCQBmAgUMcGF5bWVudHNTaXplAAAHCQBmAgUJbWluQW1vdW50AAAHCQAAAgUNbWluUGF5bWVudElkeAAABwkAAAIFDW1heFBheW1lbnRJZHgJAGUCBQxwYXltZW50c1NpemUAAQcJAAACCAUScGF5bWVudHNWYWxpZGF0aW9uAl8xBQxwYXltZW50c1NpemUHAgFpAQxtYXNzVHJhbnNmZXIECnJlY2lwaWVudHMHYW1vdW50cwpwYXltZW50SWR4CmF0dGFjaG1lbnQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAZBbW91bnQIBQNwbXQGYW1vdW50BBVtYXhpbXVtX3BheW91dF9mYWN0b3IAEgQHQ291bnRlcgkAkQMCCQC1CQIFCmF0dGFjaG1lbnQCAV8AAAQLY2hlY2tzdGF0dXMJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgUHQ291bnRlcgIPX1dpbm5lcnNfU3RhdHVzBB1DaGVja1RvdGFsRnVuZHNBZGRlZEluQ291bnRlcgkBEUBleHRyTmF0aXZlKDEwNTUpAQkArAICAiJUb3RhbF9GdW5kc19BZGRlZF9Jbl9PcHRpb25fT3JkZXJfBQdDb3VudGVyBBBtYXNzcGF5b3V0bGltaXRzCQBrAwUdQ2hlY2tUb3RhbEZ1bmRzQWRkZWRJbkNvdW50ZXIFFW1heGltdW1fcGF5b3V0X2ZhY3RvcgAKAwkBAiE9AggFAWkGY2FsbGVyBSBtYXNzdHJhbnNmZXJfd2hpdGVsaXN0ZWRfYWRkcmVzcwkAAgEJAKwCAgkArAICAhJOb3QgYW4gQWRtaW4gb25seSAJAKUIAQUgbWFzc3RyYW5zZmVyX3doaXRlbGlzdGVkX2FkZHJlc3MCDSBjYW4gc2lnbiBpdC4DCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkCQACAQIrT25seSBXYXZlcyBpcyBhbGxvd2VkIHRvIEF0dGFjaCBhcyBwYXltZW50LgMJAQEhAQkBHXZhbGlkYXRlTWFzc1RyYW5zZmVyQXJndW1lbnRzBAUKcmVjaXBpZW50cwUHYW1vdW50cwUKcGF5bWVudElkeAgFAWkIcGF5bWVudHMJAAIBAhFJbnZhbGlkIGFyZ3VtZW50cwMJAAACBQtjaGVja3N0YXR1cwIEUGFpZAkAAgEJAKwCAgkArAICAiJNYXNzIFRyYW5zZmVyIGFnYWluc3QgQ291bnRlciBJRDogBQdDb3VudGVyAhUgaXMgYWxyZWFkeSByZWxlYXNlZC4DCQBmAgUGQW1vdW50BR1DaGVja1RvdGFsRnVuZHNBZGRlZEluQ291bnRlcgkAAgEJAKwCAgkArAICAklBdHRhY2hlZCBQYXltZW50IEFtb3VudCBpcyBleGNlZWRpbmcgbW9yZSB0aGFuIE1heGltdW0gRWxpZ2libGUgTGltaXQgb2YgCQCkAwEFEG1hc3NwYXlvdXRsaW1pdHMCCiBXYXZlbGV0cy4EDnJlY2lwaWVudHNTaXplCQCQAwEFCnJlY2lwaWVudHMKARhzY3JpcHRUcmFuc2ZlcnNHZW5lcmF0b3ICBWFjY3VtBG5leHQECyR0MDMwNTAzMDgyBQVhY2N1bQQPc2NyaXB0VHJhbnNmZXJzCAULJHQwMzA1MDMwODICXzEEAWoIBQskdDAzMDUwMzA4MgJfMgMJAGcCBQFqBQ5yZWNpcGllbnRzU2l6ZQkAlAoCBQ9zY3JpcHRUcmFuc2ZlcnMJAGQCBQFqAAEJAJQKAgkAzQgCBQ9zY3JpcHRUcmFuc2ZlcnMJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUKcmVjaXBpZW50cwUBagUEbmV4dAgJAJEDAggFAWkIcGF5bWVudHMJAJEDAgUKcGF5bWVudElkeAUBagdhc3NldElkCQBkAgUBagABBAZyZXN1bHQKAAIkbAUHYW1vdW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBGHNjcmlwdFRyYW5zZmVyc0dlbmVyYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAJQKAgkAzggCCAUGcmVzdWx0Al8xCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHQ291bnRlcgIPX1dpbm5lcnNfU3RhdHVzAgRQYWlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB0NvdW50ZXICEF9FbGlnaWJsZV9MaW1pdHMFEG1hc3NwYXlvdXRsaW1pdHMFA25pbAUEdW5pdAFpAQ9VcGRhdGVMUEJhbGFuY2UBFlBhaWRNYXNzVHJhbnNmZXJBbW91bnQEFHJlYWRfYWNjb3VudF9iYWxhbmNlCAkA7wcBBQR0aGlzB3JlZ3VsYXIEGXJlYWRfdG90YWxfcG9vbF9saXF1aWRpdHkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzAhRUb3RhbF9Qb29sX0xpcXVpZGl0eQIkTm8gSW5pdGlhbCBQb29sIExpcXVpZGl0eSB3YXMgRm91bmQuBBVyZWNlaXZlZF9vcmRlcl9hbW91bnQJAGUCCQBlAgUUcmVhZF9hY2NvdW50X2JhbGFuY2UFGXJlYWRfdG90YWxfcG9vbF9saXF1aWRpdHkFC25ldHdvcmtfZmVlBBR1cGRhdGVkX3Bvb2xfYmFsYW5jZQkAZAIJAGUCBRlyZWFkX3RvdGFsX3Bvb2xfbGlxdWlkaXR5BRZQYWlkTWFzc1RyYW5zZmVyQW1vdW50BRVyZWNlaXZlZF9vcmRlcl9hbW91bnQEG1ByZXZpb3VzTWFzc1RyYW5zZmVyQ291bnRlcgQHJG1hdGNoMAkAmggCBQR0aGlzAhVNYXNzX1RyYW5zZmVyX0NvdW50ZXIDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEGFRvdGFsTWFzc1RyYW5zZmVyQ291bnRlcgkAZAIFG1ByZXZpb3VzTWFzc1RyYW5zZmVyQ291bnRlcgABBBhQcmV2aW91c01hc3NUcmFuc2ZlclNlbmQEByRtYXRjaDAJAJoIAgUEdGhpcwIYVG90YWxfTWFzc19UcmFuc2Zlcl9TZW5kAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBVUb3RhbE1hc3NUcmFuc2ZlclNlbmQJAGQCBRhQcmV2aW91c01hc3NUcmFuc2ZlclNlbmQFFlBhaWRNYXNzVHJhbnNmZXJBbW91bnQDCQECIT0CCAUBaQZjYWxsZXIFIG1hc3N0cmFuc2Zlcl93aGl0ZWxpc3RlZF9hZGRyZXNzCQACAQkArAICCQCsAgICJVRoaXMgQWRkcmVzcyBpcyBub3QgQXV0aG9yaXplZC4gT25seSAJAKUIAQUgbWFzc3RyYW5zZmVyX3doaXRlbGlzdGVkX2FkZHJlc3MCIiBpcyBBdXRob3JpemVkIEFkZHJlc3MgdG8gU2lnbiBpdC4DCQBmAgUWUGFpZE1hc3NUcmFuc2ZlckFtb3VudAUZcmVhZF90b3RhbF9wb29sX2xpcXVpZGl0eQkAAgECQ1BsYWNlZCBNYXNzIFRyYW5zZmVyIEFtb3VudCBTaXplIGlzIG1vcmUgdGhhbiBUb3RhbCBQb29sIExpcXVpZGl0eS4JAMwIAgkBDEludGVnZXJFbnRyeQICFFRvdGFsX1Bvb2xfTGlxdWlkaXR5BRR1cGRhdGVkX3Bvb2xfYmFsYW5jZQkAzAgCCQEMSW50ZWdlckVudHJ5AgIVTWFzc19UcmFuc2Zlcl9Db3VudGVyBRhUb3RhbE1hc3NUcmFuc2ZlckNvdW50ZXIJAMwIAgkBDEludGVnZXJFbnRyeQICGFRvdGFsX01hc3NfVHJhbnNmZXJfU2VuZAUVVG90YWxNYXNzVHJhbnNmZXJTZW5kCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKQDAQUYVG90YWxNYXNzVHJhbnNmZXJDb3VudGVyAhNfTWFzc19UcmFuc2Zlcl9TZW5kBRZQYWlkTWFzc1RyYW5zZmVyQW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAKcIAQURbHBfYWRkcmVzc19wdWJrZXkFFlBhaWRNYXNzVHJhbnNmZXJBbW91bnQFBHVuaXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkApwgBBRFscF9hZGRyZXNzX3B1YmtleQULbmV0d29ya19mZWUFBHVuaXQFA25pbAAa5SRO",
    "height": 2807088,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Dx47NVFt8CGRXpSmeqLFQpkpaYeZLt4eCawZDnM7B9CU
Next: XXeyphCtsdMttyU7v5Zg2Q2p8aDk8p1EoM76SxYfvFP

Diff: 

OldNewDifferences
9090 @Callable(K)
9191 func massTransfer (e,f,g,L) = {
9292     let M = value(K.payments[0])
93-    let N = split(L, "_")[0]
94-    let O = getStringValue((N + "_Winners_Status"))
93+    let N = M.amount
94+    let O = 18
95+    let P = split(L, "_")[0]
96+    let Q = getStringValue((P + "_Winners_Status"))
97+    let R = getIntegerValue(("Total_Funds_Added_In_Option_Order_" + P))
98+    let S = fraction(R, O, 10)
9599     if ((K.caller != b))
96100         then throw((("Not an Admin only " + toString(b)) + " can sign it."))
97101         else if (isDefined(M.assetId))
98102             then throw("Only Waves is allowed to Attach as payment.")
99103             else if (!(d(e, f, g, K.payments)))
100104                 then throw("Invalid arguments")
101-                else if ((O == "Paid"))
102-                    then throw(("Mass Transfer was already released for Counter: " + N))
103-                    else {
104-                        let i = size(e)
105-                        func P (Q,R) =                         {
106-                            let S = Q
107-                            let T = S._1
108-                            let u = S._2
109-                            if ((u >= i))
110-                                then $Tuple2(T, (u + 1))
111-                                else $Tuple2((T :+ ScriptTransfer(addressFromStringValue(e[u]), R, K.payments[g[u]].assetId)), (u + 1))
105+                else if ((Q == "Paid"))
106+                    then throw((("Mass Transfer against Counter ID: " + P) + " is already released."))
107+                    else if ((N > R))
108+                        then throw((("Attached Payment Amount is exceeding more than Maximum Eligible Limit of " + toString(S)) + " Wavelets."))
109+                        else {
110+                            let i = size(e)
111+                            func T (U,V) =                             {
112+                                let W = U
113+                                let X = W._1
114+                                let u = W._2
115+                                if ((u >= i))
116+                                    then $Tuple2(X, (u + 1))
117+                                    else $Tuple2((X :+ ScriptTransfer(addressFromStringValue(e[u]), V, K.payments[g[u]].assetId)), (u + 1))
118+                                }
119+
120+                            let Y = {
121+                                let C = f
122+                                let D = size(C)
123+                                let E = $Tuple2(nil, 0)
124+                                func F (G,H) =                                 if ((H >= D))
125+                                    then G
126+                                    else T(G, C[H])
127+
128+                                func I (G,H) =                                 if ((H >= D))
129+                                    then G
130+                                    else throw("List size exceeds 100")
131+
132+                                I(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(E, 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)
133+                                }
134+                            $Tuple2((Y._1 ++ [StringEntry((P + "_Winners_Status"), "Paid"), IntegerEntry((P + "_Eligible_Limits"), S)]), unit)
112135                             }
113-
114-                        let U = {
115-                            let C = f
116-                            let D = size(C)
117-                            let E = $Tuple2(nil, 0)
118-                            func F (G,H) =                             if ((H >= D))
119-                                then G
120-                                else P(G, C[H])
121-
122-                            func I (G,H) =                             if ((H >= D))
123-                                then G
124-                                else throw("List size exceeds 100")
125-
126-                            I(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(E, 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)
127-                            }
128-                        $Tuple2((U._1 ++ [StringEntry((N + "_Winners_Status"), "Paid"), IntegerEntry((N + "_Total_Winners"), i)]), unit)
129-                        }
130136     }
131137 
132138 
133139 
134140 @Callable(K)
135-func UpdateLPBalance (V) = {
136-    let W = wavesBalance(this).regular
137-    let X = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
138-    let Y = ((W - X) - c)
139-    let Z = ((X - V) + Y)
140-    let aa = {
141-        let ab = getInteger(this, "Mass_Transfer_Counter")
142-        if ($isInstanceOf(ab, "Int"))
141+func UpdateLPBalance (Z) = {
142+    let aa = wavesBalance(this).regular
143+    let ab = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
144+    let ac = ((aa - ab) - c)
145+    let ad = ((ab - Z) + ac)
146+    let ae = {
147+        let af = getInteger(this, "Mass_Transfer_Counter")
148+        if ($isInstanceOf(af, "Int"))
143149             then {
144-                let ac = ab
145-                ac
150+                let ag = af
151+                ag
146152                 }
147153             else 0
148154         }
149-    let ad = (aa + 1)
150-    let ae = {
151-        let ab = getInteger(this, "Total_Mass_Transfer_Send")
152-        if ($isInstanceOf(ab, "Int"))
155+    let ah = (ae + 1)
156+    let ai = {
157+        let af = getInteger(this, "Total_Mass_Transfer_Send")
158+        if ($isInstanceOf(af, "Int"))
153159             then {
154-                let ac = ab
155-                ac
160+                let ag = af
161+                ag
156162                 }
157163             else 0
158164         }
159-    let af = (ae + V)
165+    let aj = (ai + Z)
160166     if ((K.caller != b))
161167         then throw((("This Address is not Authorized. Only " + toString(b)) + " is Authorized Address to Sign it."))
162-        else if ((V > X))
168+        else if ((Z > ab))
163169             then throw("Placed Mass Transfer Amount Size is more than Total Pool Liquidity.")
164-            else [IntegerEntry("Total_Pool_Liquidity", Z), IntegerEntry("Mass_Transfer_Counter", ad), IntegerEntry("Total_Mass_Transfer_Send", af), IntegerEntry((toString(ad) + "_Mass_Transfer_Send"), V), ScriptTransfer(addressFromPublicKey(a), V, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
170+            else [IntegerEntry("Total_Pool_Liquidity", ad), IntegerEntry("Mass_Transfer_Counter", ah), IntegerEntry("Total_Mass_Transfer_Send", aj), IntegerEntry((toString(ah) + "_Mass_Transfer_Send"), Z), ScriptTransfer(addressFromPublicKey(a), Z, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
165171     }
166172 
167173 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = base58'9Pwum3va2xrkVwsGRNiTeGxBBBNFEDaS9sfkZiSpSvdQ'
55 
66 let b = addressFromPublicKey(a)
77 
88 let c = 500000
99 
1010 func d (e,f,g,h) = {
1111     let i = size(e)
1212     let j = size(f)
1313     let k = size(g)
1414     let l = size(h)
1515     let m = min(f)
1616     let n = min(g)
1717     let o = max(g)
1818     func p (q,r) =     {
1919         let s = q
2020         let t = s._1
2121         let u = s._2
2222         if ((u >= l))
2323             then $Tuple2(t, (u + 1))
2424             else {
2525                 func v (w,x) =                 {
2626                     let y = w
2727                     let z = y._1
2828                     let A = y._2
2929                     if (if ((A >= i))
3030                         then true
3131                         else (g[A] != u))
3232                         then $Tuple2(z, (A + 1))
3333                         else $Tuple2((z + x), (A + 1))
3434                     }
3535 
3636                 let B = {
3737                     let C = f
3838                     let D = size(C)
3939                     let E = $Tuple2(0, 0)
4040                     func F (G,H) =                     if ((H >= D))
4141                         then G
4242                         else v(G, C[H])
4343 
4444                     func I (G,H) =                     if ((H >= D))
4545                         then G
4646                         else throw("List size exceeds 100")
4747 
4848                     I(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(E, 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)
4949                     }
5050                 if ((B._1 == r.amount))
5151                     then $Tuple2((t + 1), (u + 1))
5252                     else $Tuple2(t, (u + 1))
5353                 }
5454         }
5555 
5656     let J = {
5757         let C = h
5858         let D = size(C)
5959         let E = $Tuple2(0, 0)
6060         func F (G,H) =         if ((H >= D))
6161             then G
6262             else p(G, C[H])
6363 
6464         func I (G,H) =         if ((H >= D))
6565             then G
6666             else throw("List size exceeds 10")
6767 
6868         I(F(F(F(F(F(F(F(F(F(F(E, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
6969         }
7070     if (if (if (if (if (if (if (if ((i == j))
7171         then (i == k)
7272         else false)
7373         then (i > 0)
7474         else false)
7575         then (100 >= i)
7676         else false)
7777         then (l > 0)
7878         else false)
7979         then (m > 0)
8080         else false)
8181         then (n == 0)
8282         else false)
8383         then (o == (l - 1))
8484         else false)
8585         then (J._1 == l)
8686         else false
8787     }
8888 
8989 
9090 @Callable(K)
9191 func massTransfer (e,f,g,L) = {
9292     let M = value(K.payments[0])
93-    let N = split(L, "_")[0]
94-    let O = getStringValue((N + "_Winners_Status"))
93+    let N = M.amount
94+    let O = 18
95+    let P = split(L, "_")[0]
96+    let Q = getStringValue((P + "_Winners_Status"))
97+    let R = getIntegerValue(("Total_Funds_Added_In_Option_Order_" + P))
98+    let S = fraction(R, O, 10)
9599     if ((K.caller != b))
96100         then throw((("Not an Admin only " + toString(b)) + " can sign it."))
97101         else if (isDefined(M.assetId))
98102             then throw("Only Waves is allowed to Attach as payment.")
99103             else if (!(d(e, f, g, K.payments)))
100104                 then throw("Invalid arguments")
101-                else if ((O == "Paid"))
102-                    then throw(("Mass Transfer was already released for Counter: " + N))
103-                    else {
104-                        let i = size(e)
105-                        func P (Q,R) =                         {
106-                            let S = Q
107-                            let T = S._1
108-                            let u = S._2
109-                            if ((u >= i))
110-                                then $Tuple2(T, (u + 1))
111-                                else $Tuple2((T :+ ScriptTransfer(addressFromStringValue(e[u]), R, K.payments[g[u]].assetId)), (u + 1))
105+                else if ((Q == "Paid"))
106+                    then throw((("Mass Transfer against Counter ID: " + P) + " is already released."))
107+                    else if ((N > R))
108+                        then throw((("Attached Payment Amount is exceeding more than Maximum Eligible Limit of " + toString(S)) + " Wavelets."))
109+                        else {
110+                            let i = size(e)
111+                            func T (U,V) =                             {
112+                                let W = U
113+                                let X = W._1
114+                                let u = W._2
115+                                if ((u >= i))
116+                                    then $Tuple2(X, (u + 1))
117+                                    else $Tuple2((X :+ ScriptTransfer(addressFromStringValue(e[u]), V, K.payments[g[u]].assetId)), (u + 1))
118+                                }
119+
120+                            let Y = {
121+                                let C = f
122+                                let D = size(C)
123+                                let E = $Tuple2(nil, 0)
124+                                func F (G,H) =                                 if ((H >= D))
125+                                    then G
126+                                    else T(G, C[H])
127+
128+                                func I (G,H) =                                 if ((H >= D))
129+                                    then G
130+                                    else throw("List size exceeds 100")
131+
132+                                I(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(E, 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)
133+                                }
134+                            $Tuple2((Y._1 ++ [StringEntry((P + "_Winners_Status"), "Paid"), IntegerEntry((P + "_Eligible_Limits"), S)]), unit)
112135                             }
113-
114-                        let U = {
115-                            let C = f
116-                            let D = size(C)
117-                            let E = $Tuple2(nil, 0)
118-                            func F (G,H) =                             if ((H >= D))
119-                                then G
120-                                else P(G, C[H])
121-
122-                            func I (G,H) =                             if ((H >= D))
123-                                then G
124-                                else throw("List size exceeds 100")
125-
126-                            I(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(F(E, 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)
127-                            }
128-                        $Tuple2((U._1 ++ [StringEntry((N + "_Winners_Status"), "Paid"), IntegerEntry((N + "_Total_Winners"), i)]), unit)
129-                        }
130136     }
131137 
132138 
133139 
134140 @Callable(K)
135-func UpdateLPBalance (V) = {
136-    let W = wavesBalance(this).regular
137-    let X = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
138-    let Y = ((W - X) - c)
139-    let Z = ((X - V) + Y)
140-    let aa = {
141-        let ab = getInteger(this, "Mass_Transfer_Counter")
142-        if ($isInstanceOf(ab, "Int"))
141+func UpdateLPBalance (Z) = {
142+    let aa = wavesBalance(this).regular
143+    let ab = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
144+    let ac = ((aa - ab) - c)
145+    let ad = ((ab - Z) + ac)
146+    let ae = {
147+        let af = getInteger(this, "Mass_Transfer_Counter")
148+        if ($isInstanceOf(af, "Int"))
143149             then {
144-                let ac = ab
145-                ac
150+                let ag = af
151+                ag
146152                 }
147153             else 0
148154         }
149-    let ad = (aa + 1)
150-    let ae = {
151-        let ab = getInteger(this, "Total_Mass_Transfer_Send")
152-        if ($isInstanceOf(ab, "Int"))
155+    let ah = (ae + 1)
156+    let ai = {
157+        let af = getInteger(this, "Total_Mass_Transfer_Send")
158+        if ($isInstanceOf(af, "Int"))
153159             then {
154-                let ac = ab
155-                ac
160+                let ag = af
161+                ag
156162                 }
157163             else 0
158164         }
159-    let af = (ae + V)
165+    let aj = (ai + Z)
160166     if ((K.caller != b))
161167         then throw((("This Address is not Authorized. Only " + toString(b)) + " is Authorized Address to Sign it."))
162-        else if ((V > X))
168+        else if ((Z > ab))
163169             then throw("Placed Mass Transfer Amount Size is more than Total Pool Liquidity.")
164-            else [IntegerEntry("Total_Pool_Liquidity", Z), IntegerEntry("Mass_Transfer_Counter", ad), IntegerEntry("Total_Mass_Transfer_Send", af), IntegerEntry((toString(ad) + "_Mass_Transfer_Send"), V), ScriptTransfer(addressFromPublicKey(a), V, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
170+            else [IntegerEntry("Total_Pool_Liquidity", ad), IntegerEntry("Mass_Transfer_Counter", ah), IntegerEntry("Total_Mass_Transfer_Send", aj), IntegerEntry((toString(ah) + "_Mass_Transfer_Send"), Z), ScriptTransfer(addressFromPublicKey(a), Z, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
165171     }
166172 
167173 
github/deemru/w8io/169f3d6 
110.43 ms ◑