tx · 6qLT2jRtCE3ZfRPTWxwyecyepfn12pRqErtFMwmwA9Jh

3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d:  -0.01000000 Waves

2023.10.20 15:48 [2806929] smart account 3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6qLT2jRtCE3ZfRPTWxwyecyepfn12pRqErtFMwmwA9Jh",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1697806147198,
    "version": 2,
    "chainId": 84,
    "sender": "3Ms2ssGBpsFccHLtdb5zApeJ51jU3377r1d",
    "senderPublicKey": "7E4cNcg8gSYTmNbmLG2kvAiePh9KZoAT7W64shHxCc6n",
    "proofs": [
        "5sZi4x64AwMnKA9kh43cjKsamzpTvC2uSBxsEhv2NhCR7QnVedzdwSXXQT2dbPmyqVZnZYq8kivfRvy6yEioWYBT"
    ],
    "script": "base64:BgIPCAISBgoEGBERCBIDCgEBBQARbHBfYWRkcmVzc19wdWJrZXkBIHy+XBhI/rhv/LQUflYon8e8q0PT8nBDeExH6jeAesBrACBtYXNzdHJhbnNmZXJfd2hpdGVsaXN0ZWRfYWRkcmVzcwkApwgBBRFscF9hZGRyZXNzX3B1YmtleQALbmV0d29ya19mZWUAoMIeARF2YWxpZGF0ZUFyZ3VtZW50cwQKcmVjaXBpZW50cwdhbW91bnRzCnBheW1lbnRJZHgIcGF5bWVudHMEDnJlY2lwaWVudHNTaXplCQCQAwEFCnJlY2lwaWVudHMEC2Ftb3VudHNTaXplCQCQAwEFB2Ftb3VudHMEDnBheW1lbnRJZHhTaXplCQCQAwEFCnBheW1lbnRJZHgEDHBheW1lbnRzU2l6ZQkAkAMBBQhwYXltZW50cwQJbWluQW1vdW50CQCXAwEFB2Ftb3VudHMEDW1pblBheW1lbnRJZHgJAJcDAQUKcGF5bWVudElkeAQNbWF4UGF5bWVudElkeAkAlgMBBQpwYXltZW50SWR4CgERcGF5bWVudHNWYWxpZGF0b3ICDHBheW1lbnRBY2N1bQtuZXh0UGF5bWVudAQJJHQwNzg3ODI0BQxwYXltZW50QWNjdW0EDXZhbGlkUGF5bWVudHMIBQkkdDA3ODc4MjQCXzEEAWoIBQkkdDA3ODc4MjQCXzIDCQBnAgUBagUMcGF5bWVudHNTaXplCQCUCgIFDXZhbGlkUGF5bWVudHMJAGQCBQFqAAEKARFhbW91bnRzQWdncmVnYXRvcgILYW1vdW50QWNjdW0KbmV4dEFtb3VudAQKJHQwOTc5MTAwOAULYW1vdW50QWNjdW0EBmFtb3VudAgFCiR0MDk3OTEwMDgCXzEEAWsIBQokdDA5NzkxMDA4Al8yAwMJAGcCBQFrBQ5yZWNpcGllbnRzU2l6ZQYJAQIhPQIJAJEDAgUKcGF5bWVudElkeAUBawUBagkAlAoCBQZhbW91bnQJAGQCBQFrAAEJAJQKAgkAZAIFBmFtb3VudAUKbmV4dEFtb3VudAkAZAIFAWsAAQQQYWdncmVnYXRlZEFtb3VudAoAAiRsBQdhbW91bnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQERYW1vdW50c0FnZ3JlZ2F0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkAwkAAAIIBRBhZ2dyZWdhdGVkQW1vdW50Al8xCAULbmV4dFBheW1lbnQGYW1vdW50CQCUCgIJAGQCBQ12YWxpZFBheW1lbnRzAAEJAGQCBQFqAAEJAJQKAgUNdmFsaWRQYXltZW50cwkAZAIFAWoAAQQScGF5bWVudHNWYWxpZGF0aW9uCgACJGwFCHBheW1lbnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQERcGF5bWVudHNWYWxpZGF0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDAwMDAwMDAwkAAAIFDnJlY2lwaWVudHNTaXplBQthbW91bnRzU2l6ZQkAAAIFDnJlY2lwaWVudHNTaXplBQ5wYXltZW50SWR4U2l6ZQcJAGYCBQ5yZWNpcGllbnRzU2l6ZQAABwkAZwIAZAUOcmVjaXBpZW50c1NpemUHCQBmAgUMcGF5bWVudHNTaXplAAAHCQBmAgUJbWluQW1vdW50AAAHCQAAAgUNbWluUGF5bWVudElkeAAABwkAAAIFDW1heFBheW1lbnRJZHgJAGUCBQxwYXltZW50c1NpemUAAQcJAAACCAUScGF5bWVudHNWYWxpZGF0aW9uAl8xBQxwYXltZW50c1NpemUHAQ5NYXNzVHhubWVzc2FnZQIKYXR0YWNobWVudApyZWNpcGllbnRzBAdjb3VudGVyCQCRAwIJALUJAgUKYXR0YWNobWVudAIBXwAACQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHY291bnRlcgIPX1dpbm5lcnNfU3RhdHVzAgRQYWlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2NvdW50ZXICDl9Ub3RhbF9XaW5uZXJzCQCQAwEFCnJlY2lwaWVudHMFA25pbAIBaQEMbWFzc1RyYW5zZmVyBApyZWNpcGllbnRzB2Ftb3VudHMKcGF5bWVudElkeAphdHRhY2htZW50BANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQFpBmNhbGxlcgUgbWFzc3RyYW5zZmVyX3doaXRlbGlzdGVkX2FkZHJlc3MJAAIBCQCsAgIJAKwCAgISTm90IGFuIEFkbWluIG9ubHkgCQClCAEFIG1hc3N0cmFuc2Zlcl93aGl0ZWxpc3RlZF9hZGRyZXNzAg0gY2FuIHNpZ24gaXQuAwkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAkAAgECK09ubHkgV2F2ZXMgaXMgYWxsb3dlZCB0byBBdHRhY2ggYXMgcGF5bWVudC4DCQEBIQEJARF2YWxpZGF0ZUFyZ3VtZW50cwQFCnJlY2lwaWVudHMFB2Ftb3VudHMFCnBheW1lbnRJZHgIBQFpCHBheW1lbnRzCQACAQIRSW52YWxpZCBhcmd1bWVudHMEDnJlY2lwaWVudHNTaXplCQCQAwEFCnJlY2lwaWVudHMKARhzY3JpcHRUcmFuc2ZlcnNHZW5lcmF0b3ICBWFjY3VtBG5leHQECyR0MDI1ODEyNjEzBQVhY2N1bQQPc2NyaXB0VHJhbnNmZXJzCAULJHQwMjU4MTI2MTMCXzEEAWoIBQskdDAyNTgxMjYxMwJfMgMJAGcCBQFqBQ5yZWNpcGllbnRzU2l6ZQkAlAoCBQ9zY3JpcHRUcmFuc2ZlcnMJAGQCBQFqAAEJAJQKAgkAzQgCBQ9zY3JpcHRUcmFuc2ZlcnMJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUKcmVjaXBpZW50cwUBagUEbmV4dAgJAJEDAggFAWkIcGF5bWVudHMJAJEDAgUKcGF5bWVudElkeAUBagdhc3NldElkCQBkAgUBagABBAZyZXN1bHQKAAIkbAUHYW1vdW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBGHNjcmlwdFRyYW5zZmVyc0dlbmVyYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQECHBvc3RkYXRhCQEOTWFzc1R4bm1lc3NhZ2UCBQphdHRhY2htZW50BQpyZWNpcGllbnRzCQCUCgIIBQZyZXN1bHQCXzEFBHVuaXQBaQEPVXBkYXRlTFBCYWxhbmNlARZQYWlkTWFzc1RyYW5zZmVyQW1vdW50BBRyZWFkX2FjY291bnRfYmFsYW5jZQgJAO8HAQUEdGhpcwdyZWd1bGFyBBlyZWFkX3RvdGFsX3Bvb2xfbGlxdWlkaXR5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUEdGhpcwIUVG90YWxfUG9vbF9MaXF1aWRpdHkCJE5vIEluaXRpYWwgUG9vbCBMaXF1aWRpdHkgd2FzIEZvdW5kLgQVcmVjZWl2ZWRfb3JkZXJfYW1vdW50CQBlAgkAZQIFFHJlYWRfYWNjb3VudF9iYWxhbmNlBRlyZWFkX3RvdGFsX3Bvb2xfbGlxdWlkaXR5BQtuZXR3b3JrX2ZlZQQUdXBkYXRlZF9wb29sX2JhbGFuY2UJAGQCCQBlAgUZcmVhZF90b3RhbF9wb29sX2xpcXVpZGl0eQUWUGFpZE1hc3NUcmFuc2ZlckFtb3VudAUVcmVjZWl2ZWRfb3JkZXJfYW1vdW50BBtQcmV2aW91c01hc3NUcmFuc2ZlckNvdW50ZXIEByRtYXRjaDAJAJoIAgUEdGhpcwIVTWFzc19UcmFuc2Zlcl9Db3VudGVyAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBhUb3RhbE1hc3NUcmFuc2ZlckNvdW50ZXIJAGQCBRtQcmV2aW91c01hc3NUcmFuc2ZlckNvdW50ZXIAAQQYUHJldmlvdXNNYXNzVHJhbnNmZXJTZW5kBAckbWF0Y2gwCQCaCAIFBHRoaXMCGFRvdGFsX01hc3NfVHJhbnNmZXJfU2VuZAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVVG90YWxNYXNzVHJhbnNmZXJTZW5kCQBkAgUYUHJldmlvdXNNYXNzVHJhbnNmZXJTZW5kBRZQYWlkTWFzc1RyYW5zZmVyQW1vdW50AwkBAiE9AggFAWkGY2FsbGVyBSBtYXNzdHJhbnNmZXJfd2hpdGVsaXN0ZWRfYWRkcmVzcwkAAgEJAKwCAgkArAICAiVUaGlzIEFkZHJlc3MgaXMgbm90IEF1dGhvcml6ZWQuIE9ubHkgCQClCAEFIG1hc3N0cmFuc2Zlcl93aGl0ZWxpc3RlZF9hZGRyZXNzAiIgaXMgQXV0aG9yaXplZCBBZGRyZXNzIHRvIFNpZ24gaXQuAwkAZgIFFlBhaWRNYXNzVHJhbnNmZXJBbW91bnQFGXJlYWRfdG90YWxfcG9vbF9saXF1aWRpdHkJAAIBAkNQbGFjZWQgTWFzcyBUcmFuc2ZlciBBbW91bnQgU2l6ZSBpcyBtb3JlIHRoYW4gVG90YWwgUG9vbCBMaXF1aWRpdHkuCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhRUb3RhbF9Qb29sX0xpcXVpZGl0eQUUdXBkYXRlZF9wb29sX2JhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICFU1hc3NfVHJhbnNmZXJfQ291bnRlcgUYVG90YWxNYXNzVHJhbnNmZXJDb3VudGVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhhUb3RhbF9NYXNzX1RyYW5zZmVyX1NlbmQFFVRvdGFsTWFzc1RyYW5zZmVyU2VuZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCkAwEFGFRvdGFsTWFzc1RyYW5zZmVyQ291bnRlcgITX01hc3NfVHJhbnNmZXJfU2VuZAUWUGFpZE1hc3NUcmFuc2ZlckFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQCnCAEFEWxwX2FkZHJlc3NfcHVia2V5BRZQYWlkTWFzc1RyYW5zZmVyQW1vdW50BQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAKcIAQURbHBfYWRkcmVzc19wdWJrZXkFC25ldHdvcmtfZmVlBQR1bml0BQNuaWwAR8mKtg==",
    "height": 2806929,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EdmuZMkxjS8m9NZ4b7FFxeULPUptsdd1Mr1xRGJ12ezE
Next: 72A2VWvGek1uW2ATgWm1dgpJbp7fQ2MToAFVmgJBYft5

Diff: 
Old
New
Differences
87
87
 
    }
88
88
 
89
89
 
90
-
@Callable(K)
90
+
func K (L,e) = {
91
+
    let M = split(L, "_")[0]
92
+
[StringEntry((M + "_Winners_Status"), "Paid"), IntegerEntry((M + "_Total_Winners"), size(e))]
93
+
    }
94
+
95
+
96
+
@Callable(N)
91
97
 
func massTransfer (e,f,g,L) = {
92
-
    let M = value(K.payments[0])
93
-
    if ((K.caller != b))
98
+
    let O = value(N.payments[0])
99
+
    if ((N.caller != b))
94
100
 
        then throw((("Not an Admin only " + toString(b)) + " can sign it."))
95
-
        else if (isDefined(M.assetId))
101
+
        else if (isDefined(O.assetId))
96
102
 
            then throw("Only Waves is allowed to Attach as payment.")
97
-
            else if (!(d(e, f, g, K.payments)))
103
+
            else if (!(d(e, f, g, N.payments)))
98
104
 
                then throw("Invalid arguments")
99
105
 
                else {
100
106
 
                    let i = size(e)
101
-
                    func N (O,P) =                     {
102
-
                        let Q = O
103
-
                        let R = Q._1
104
-
                        let u = Q._2
107
+
                    func P (Q,R) =                     {
108
+
                        let S = Q
109
+
                        let T = S._1
110
+
                        let u = S._2
105
111
 
                        if ((u >= i))
106
-
                            then $Tuple2(R, (u + 1))
107
-
                            else $Tuple2((R :+ ScriptTransfer(addressFromStringValue(e[u]), P, K.payments[g[u]].assetId)), (u + 1))
112
+
                            then $Tuple2(T, (u + 1))
113
+
                            else $Tuple2((T :+ ScriptTransfer(addressFromStringValue(e[u]), R, N.payments[g[u]].assetId)), (u + 1))
108
114
 
                        }
109
115
 
110
-
                    let S = {
116
+
                    let U = {
111
117
 
                        let C = f
112
118
 
                        let D = size(C)
113
119
 
                        let E = $Tuple2(nil, 0)
114
120
 
                        func F (G,H) =                         if ((H >= D))
115
121
 
                            then G
116
-
                            else N(G, C[H])
122
+
                            else P(G, C[H])
117
123
 
118
124
 
                        func I (G,H) =                         if ((H >= D))
119
125
 
                            then G
121
127
 
122
128
 
                        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)
123
129
 
                        }
124
-
                    $Tuple2(S._1, unit)
130
+
                    let V = K(L, e)
131
+
                    $Tuple2(U._1, unit)
125
132
 
                    }
126
133
 
    }
127
134
 
128
135
 
129
136
 
130
-
@Callable(K)
131
-
func UpdateLPBalance (T) = {
132
-
    let U = wavesBalance(this).regular
133
-
    let V = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
134
-
    let W = ((U - V) - c)
135
-
    let X = ((V - T) + W)
136
-
    let Y = {
137
-
        let Z = getInteger(this, "Mass_Transfer_Counter")
138
-
        if ($isInstanceOf(Z, "Int"))
137
+
@Callable(N)
138
+
func UpdateLPBalance (W) = {
139
+
    let X = wavesBalance(this).regular
140
+
    let Y = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
141
+
    let Z = ((X - Y) - c)
142
+
    let aa = ((Y - W) + Z)
143
+
    let ab = {
144
+
        let ac = getInteger(this, "Mass_Transfer_Counter")
145
+
        if ($isInstanceOf(ac, "Int"))
139
146
 
            then {
140
-
                let aa = Z
141
-
                aa
147
+
                let ad = ac
148
+
                ad
142
149
 
                }
143
150
 
            else 0
144
151
 
        }
145
-
    let ab = (Y + 1)
146
-
    let ac = {
147
-
        let Z = getInteger(this, "Total_Mass_Transfer_Send")
148
-
        if ($isInstanceOf(Z, "Int"))
152
+
    let ae = (ab + 1)
153
+
    let af = {
154
+
        let ac = getInteger(this, "Total_Mass_Transfer_Send")
155
+
        if ($isInstanceOf(ac, "Int"))
149
156
 
            then {
150
-
                let aa = Z
151
-
                aa
157
+
                let ad = ac
158
+
                ad
152
159
 
                }
153
160
 
            else 0
154
161
 
        }
155
-
    let ad = (ac + T)
156
-
    if ((K.caller != b))
162
+
    let ag = (af + W)
163
+
    if ((N.caller != b))
157
164
 
        then throw((("This Address is not Authorized. Only " + toString(b)) + " is Authorized Address to Sign it."))
158
-
        else if ((T > V))
165
+
        else if ((W > Y))
159
166
 
            then throw("Placed Mass Transfer Amount Size is more than Total Pool Liquidity.")
160
-
            else [IntegerEntry("Total_Pool_Liquidity", X), IntegerEntry("Mass_Transfer_Counter", ab), IntegerEntry("Total_Mass_Transfer_Send", ad), IntegerEntry((toString(ab) + "_Mass_Transfer_Send"), T), ScriptTransfer(addressFromPublicKey(a), T, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
167
+
            else [IntegerEntry("Total_Pool_Liquidity", aa), IntegerEntry("Mass_Transfer_Counter", ae), IntegerEntry("Total_Mass_Transfer_Send", ag), IntegerEntry((toString(ae) + "_Mass_Transfer_Send"), W), ScriptTransfer(addressFromPublicKey(a), W, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
161
168
 
    }
162
169
 
163
170
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = base58'9Pwum3va2xrkVwsGRNiTeGxBBBNFEDaS9sfkZiSpSvdQ'
5
5
 
6
6
 
let b = addressFromPublicKey(a)
7
7
 
8
8
 
let c = 500000
9
9
 
10
10
 
func d (e,f,g,h) = {
11
11
 
    let i = size(e)
12
12
 
    let j = size(f)
13
13
 
    let k = size(g)
14
14
 
    let l = size(h)
15
15
 
    let m = min(f)
16
16
 
    let n = min(g)
17
17
 
    let o = max(g)
18
18
 
    func p (q,r) =     {
19
19
 
        let s = q
20
20
 
        let t = s._1
21
21
 
        let u = s._2
22
22
 
        if ((u >= l))
23
23
 
            then $Tuple2(t, (u + 1))
24
24
 
            else {
25
25
 
                func v (w,x) =                 {
26
26
 
                    let y = w
27
27
 
                    let z = y._1
28
28
 
                    let A = y._2
29
29
 
                    if (if ((A >= i))
30
30
 
                        then true
31
31
 
                        else (g[A] != u))
32
32
 
                        then $Tuple2(z, (A + 1))
33
33
 
                        else $Tuple2((z + x), (A + 1))
34
34
 
                    }
35
35
 
36
36
 
                let B = {
37
37
 
                    let C = f
38
38
 
                    let D = size(C)
39
39
 
                    let E = $Tuple2(0, 0)
40
40
 
                    func F (G,H) =                     if ((H >= D))
41
41
 
                        then G
42
42
 
                        else v(G, C[H])
43
43
 
44
44
 
                    func I (G,H) =                     if ((H >= D))
45
45
 
                        then G
46
46
 
                        else throw("List size exceeds 100")
47
47
 
48
48
 
                    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)
49
49
 
                    }
50
50
 
                if ((B._1 == r.amount))
51
51
 
                    then $Tuple2((t + 1), (u + 1))
52
52
 
                    else $Tuple2(t, (u + 1))
53
53
 
                }
54
54
 
        }
55
55
 
56
56
 
    let J = {
57
57
 
        let C = h
58
58
 
        let D = size(C)
59
59
 
        let E = $Tuple2(0, 0)
60
60
 
        func F (G,H) =         if ((H >= D))
61
61
 
            then G
62
62
 
            else p(G, C[H])
63
63
 
64
64
 
        func I (G,H) =         if ((H >= D))
65
65
 
            then G
66
66
 
            else throw("List size exceeds 10")
67
67
 
68
68
 
        I(F(F(F(F(F(F(F(F(F(F(E, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
69
69
 
        }
70
70
 
    if (if (if (if (if (if (if (if ((i == j))
71
71
 
        then (i == k)
72
72
 
        else false)
73
73
 
        then (i > 0)
74
74
 
        else false)
75
75
 
        then (100 >= i)
76
76
 
        else false)
77
77
 
        then (l > 0)
78
78
 
        else false)
79
79
 
        then (m > 0)
80
80
 
        else false)
81
81
 
        then (n == 0)
82
82
 
        else false)
83
83
 
        then (o == (l - 1))
84
84
 
        else false)
85
85
 
        then (J._1 == l)
86
86
 
        else false
87
87
 
    }
88
88
 
89
89
 
90
-
@Callable(K)
90
+
func K (L,e) = {
91
+
    let M = split(L, "_")[0]
92
+
[StringEntry((M + "_Winners_Status"), "Paid"), IntegerEntry((M + "_Total_Winners"), size(e))]
93
+
    }
94
+
95
+
96
+
@Callable(N)
91
97
 
func massTransfer (e,f,g,L) = {
92
-
    let M = value(K.payments[0])
93
-
    if ((K.caller != b))
98
+
    let O = value(N.payments[0])
99
+
    if ((N.caller != b))
94
100
 
        then throw((("Not an Admin only " + toString(b)) + " can sign it."))
95
-
        else if (isDefined(M.assetId))
101
+
        else if (isDefined(O.assetId))
96
102
 
            then throw("Only Waves is allowed to Attach as payment.")
97
-
            else if (!(d(e, f, g, K.payments)))
103
+
            else if (!(d(e, f, g, N.payments)))
98
104
 
                then throw("Invalid arguments")
99
105
 
                else {
100
106
 
                    let i = size(e)
101
-
                    func N (O,P) =                     {
102
-
                        let Q = O
103
-
                        let R = Q._1
104
-
                        let u = Q._2
107
+
                    func P (Q,R) =                     {
108
+
                        let S = Q
109
+
                        let T = S._1
110
+
                        let u = S._2
105
111
 
                        if ((u >= i))
106
-
                            then $Tuple2(R, (u + 1))
107
-
                            else $Tuple2((R :+ ScriptTransfer(addressFromStringValue(e[u]), P, K.payments[g[u]].assetId)), (u + 1))
112
+
                            then $Tuple2(T, (u + 1))
113
+
                            else $Tuple2((T :+ ScriptTransfer(addressFromStringValue(e[u]), R, N.payments[g[u]].assetId)), (u + 1))
108
114
 
                        }
109
115
 
110
-
                    let S = {
116
+
                    let U = {
111
117
 
                        let C = f
112
118
 
                        let D = size(C)
113
119
 
                        let E = $Tuple2(nil, 0)
114
120
 
                        func F (G,H) =                         if ((H >= D))
115
121
 
                            then G
116
-
                            else N(G, C[H])
122
+
                            else P(G, C[H])
117
123
 
118
124
 
                        func I (G,H) =                         if ((H >= D))
119
125
 
                            then G
120
126
 
                            else throw("List size exceeds 100")
121
127
 
122
128
 
                        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)
123
129
 
                        }
124
-
                    $Tuple2(S._1, unit)
130
+
                    let V = K(L, e)
131
+
                    $Tuple2(U._1, unit)
125
132
 
                    }
126
133
 
    }
127
134
 
128
135
 
129
136
 
130
-
@Callable(K)
131
-
func UpdateLPBalance (T) = {
132
-
    let U = wavesBalance(this).regular
133
-
    let V = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
134
-
    let W = ((U - V) - c)
135
-
    let X = ((V - T) + W)
136
-
    let Y = {
137
-
        let Z = getInteger(this, "Mass_Transfer_Counter")
138
-
        if ($isInstanceOf(Z, "Int"))
137
+
@Callable(N)
138
+
func UpdateLPBalance (W) = {
139
+
    let X = wavesBalance(this).regular
140
+
    let Y = valueOrErrorMessage(getInteger(this, "Total_Pool_Liquidity"), "No Initial Pool Liquidity was Found.")
141
+
    let Z = ((X - Y) - c)
142
+
    let aa = ((Y - W) + Z)
143
+
    let ab = {
144
+
        let ac = getInteger(this, "Mass_Transfer_Counter")
145
+
        if ($isInstanceOf(ac, "Int"))
139
146
 
            then {
140
-
                let aa = Z
141
-
                aa
147
+
                let ad = ac
148
+
                ad
142
149
 
                }
143
150
 
            else 0
144
151
 
        }
145
-
    let ab = (Y + 1)
146
-
    let ac = {
147
-
        let Z = getInteger(this, "Total_Mass_Transfer_Send")
148
-
        if ($isInstanceOf(Z, "Int"))
152
+
    let ae = (ab + 1)
153
+
    let af = {
154
+
        let ac = getInteger(this, "Total_Mass_Transfer_Send")
155
+
        if ($isInstanceOf(ac, "Int"))
149
156
 
            then {
150
-
                let aa = Z
151
-
                aa
157
+
                let ad = ac
158
+
                ad
152
159
 
                }
153
160
 
            else 0
154
161
 
        }
155
-
    let ad = (ac + T)
156
-
    if ((K.caller != b))
162
+
    let ag = (af + W)
163
+
    if ((N.caller != b))
157
164
 
        then throw((("This Address is not Authorized. Only " + toString(b)) + " is Authorized Address to Sign it."))
158
-
        else if ((T > V))
165
+
        else if ((W > Y))
159
166
 
            then throw("Placed Mass Transfer Amount Size is more than Total Pool Liquidity.")
160
-
            else [IntegerEntry("Total_Pool_Liquidity", X), IntegerEntry("Mass_Transfer_Counter", ab), IntegerEntry("Total_Mass_Transfer_Send", ad), IntegerEntry((toString(ab) + "_Mass_Transfer_Send"), T), ScriptTransfer(addressFromPublicKey(a), T, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
167
+
            else [IntegerEntry("Total_Pool_Liquidity", aa), IntegerEntry("Mass_Transfer_Counter", ae), IntegerEntry("Total_Mass_Transfer_Send", ag), IntegerEntry((toString(ae) + "_Mass_Transfer_Send"), W), ScriptTransfer(addressFromPublicKey(a), W, unit), ScriptTransfer(addressFromPublicKey(a), c, unit)]
161
168
 
    }
162
169
 
163
170
 

github/deemru/w8io/873ac7e 
44.60 ms ◑