w8 · tx · 622···HRx

tx · 6229Fp6LJsi3o9qdiNpgSeexEv5wp1qrFfwqn5FJdHRx

3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez:  -0.01500000 Waves

2023.11.11 19:32 [2838939] smart account 3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6229Fp6LJsi3o9qdiNpgSeexEv5wp1qrFfwqn5FJdHRx",
    "fee": 1500000,
    "feeAssetId": null,
    "timestamp": 1699720403271,
    "version": 2,
    "chainId": 84,
    "sender": "3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez",
    "senderPublicKey": "Brp6cacBXyKUcZr5Uc6VDKsnFcaEeQ8nQzrZQyobDsuf",
    "proofs": [
        "5eX8RGiqtZDeQPZM1DAi61eHmmugzu6Bqq3WZDRcNMqUhj6xfTFGhSo7MT8SxhfTKxsNmRRSy1KTjQ7DGwu5twrW"
    ],
    "script": "base64:BgIXCAISABIAEgASABIAEgASABIDCgEIEgAVAAJkOACAwtcvABJyZWdpc3RyYXRpb25DbG9zZWQAAQENdHJ5R2V0SW50ZWdlcgIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJoIAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQx0cnlHZXRTdHJpbmcCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCdCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAAHYnVybnh0bgEgJE91eWp+Mzm4+wz/hKlxXF7KLd4zoMRdafnqRBHsTFQACXdoaXJscG9vbAEgWeON3MK1I7pKFNzE0K8UCeZk5gS+JQYLJk7lUG2XWccAA1BaMQEaAVeFnSww1fwDPmHFrd6Sv8UqkfOZrhpBQAoAA1BaMgEaAVf1RmgngA1o304mdXq0odMoMeAJv/V5eTcAA1BaMwEaAVdrUh3hZ11iM5xE9ppvCu7VVcjaIPzs5scAA1BaNAEaAVd8ufIkLHkd+cILYV2n5Ut+Pmb4MdnkIOIAA1BaNQEaAVdzM1uLVnknLEeNcZD2LCCz+T9Cl/2cRdIAA1BaNgEaAVdHHWb6sJRhaJYHMq62QOOh/3POTybYR7oAB1dYc3Rha2UBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAANXWDEBGgFXK+KucXt9yTC1IHnnFsVrbVdAgaU4Fj0+AANMUDECLEd5aUhkY041OXNaNDZiYUZ2ajY4cnVMbmdyVFBFdldEdHNkNmpIbTRvNDZuAANXWDIBGgFXwRfLSELOBVNDikdciGeU9BfVx8LU1MNSAANMUDICLDNNUEhNSlZ3WUd5ZUJMUnNIMVJzWWhyVG1lbXY3NTJBRUJ3dUZGVjdnNDlaAQVQWmJhbAILUG9vbGFkZHJlc3MHYWRkcmVzcwQLYnVybnh0bkluUFoJAQ10cnlHZXRJbnRlZ2VyAgkBB0FkZHJlc3MBBQtQb29sYWRkcmVzcwkArAICCQCsAgICB2dsb2JhbF8JANgEAQUHYnVybnh0bgIIX2JhbGFuY2UEDmFkZHJlc3NTdGFrZVBaCQENdHJ5R2V0SW50ZWdlcgIJAQdBZGRyZXNzAQULUG9vbGFkZHJlc3MJAKwCAgkApQgBBQdhZGRyZXNzAgxfaW5kZXhTdGFrZWQEDHRvdGFsU3Rha2VQWgkBDXRyeUdldEludGVnZXICCQEHQWRkcmVzcwEFC1Bvb2xhZGRyZXNzAhdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAkAawMFC2J1cm54dG5JblBaBQ5hZGRyZXNzU3Rha2VQWgUMdG90YWxTdGFrZVBaAQVXWGJhbAMLUG9vbGFkZHJlc3MHYWRkcmVzcwVMUHN0cgQLYnVybnh0bkluV1gJAPAHAgkBB0FkZHJlc3MBBQtQb29sYWRkcmVzcwUHYnVybnh0bgQOYWRkcmVzc1N0YWtlV1gJAQ10cnlHZXRJbnRlZ2VyAgkBB0FkZHJlc3MBBQdXWHN0YWtlCQCsAgIJAKwCAgkArAICAhAlcyVzJXNfX3N0YWtlZF9fCQClCAEFB2FkZHJlc3MCAl9fBQVMUHN0cgQMdG90YWxTdGFrZVdYCQENdHJ5R2V0SW50ZWdlcgIJAQdBZGRyZXNzAQUHV1hzdGFrZQkArAICAhclcyVzJXNfX3N0YWtlZF9fdG90YWxfXwUFTFBzdHIJAGsDBQtidXJueHRuSW5XWAUOYWRkcmVzc1N0YWtlV1gFDHRvdGFsU3Rha2VXWAEMdG90YWxCYWxhbmNlAQdhZGRyZXNzBA5idXJueHRuQmFsYW5jZQkA8AcCBQdhZGRyZXNzBQdidXJueHRuBApQWjFiYWxhbmNlCQEFUFpiYWwCBQNQWjEFB2FkZHJlc3MEClBaMmJhbGFuY2UJAQVQWmJhbAIFA1BaMgUHYWRkcmVzcwQKUFozYmFsYW5jZQkBBVBaYmFsAgUDUFozBQdhZGRyZXNzBApQWjRiYWxhbmNlCQEFUFpiYWwCBQNQWjQFB2FkZHJlc3MEClBaNWJhbGFuY2UJAQVQWmJhbAIFA1BaNQUHYWRkcmVzcwQKUFo2YmFsYW5jZQkBBVBaYmFsAgUDUFo2BQdhZGRyZXNzBApXWDFiYWxhbmNlCQEFV1hiYWwDBQNXWDEFB2FkZHJlc3MFA0xQMQQKV1gyYmFsYW5jZQkBBVdYYmFsAwUDV1gyBQdhZGRyZXNzBQNMUDIEBXRvdGFsCQBkAgkAZAIJAGQCCQBkAgkAZAIJAGQCCQBkAgkAZAIFDmJ1cm54dG5CYWxhbmNlBQpQWjFiYWxhbmNlBQpQWjJiYWxhbmNlBQpQWjNiYWxhbmNlBQpQWjRiYWxhbmNlBQpQWjViYWxhbmNlBQpQWjZiYWxhbmNlBQpXWDFiYWxhbmNlBQpXWDJiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg5idXJueHRuQmFsYW5jZQUOYnVybnh0bkJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaMWJhbGFuY2UFClBaMWJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaMmJhbGFuY2UFClBaMmJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaM2JhbGFuY2UFClBaM2JhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaNGJhbGFuY2UFClBaNGJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaNWJhbGFuY2UFClBaNWJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaNmJhbGFuY2UFClBaNmJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICCldYMWJhbGFuY2UFCldYMWJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICCldYMmJhbGFuY2UFCldYMmJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICBXRvdGFsBQV0b3RhbAUDbmlsAQ10b3RhbEJhbGFuY2UyAQdhZGRyZXNzBA5idXJueHRuQmFsYW5jZQkA8AcCBQdhZGRyZXNzBQdidXJueHRuBApQWjFiYWxhbmNlCQEFUFpiYWwCBQNQWjEFB2FkZHJlc3MEClBaMmJhbGFuY2UJAQVQWmJhbAIFA1BaMgUHYWRkcmVzcwQKUFozYmFsYW5jZQkBBVBaYmFsAgUDUFozBQdhZGRyZXNzBApQWjRiYWxhbmNlCQEFUFpiYWwCBQNQWjQFB2FkZHJlc3MEClBaNWJhbGFuY2UJAQVQWmJhbAIFA1BaNQUHYWRkcmVzcwQKUFo2YmFsYW5jZQkBBVBaYmFsAgUDUFo2BQdhZGRyZXNzBApXWDFiYWxhbmNlCQEFV1hiYWwDBQNXWDEFB2FkZHJlc3MFA0xQMQQKV1gyYmFsYW5jZQkBBVdYYmFsAwUDV1gyBQdhZGRyZXNzBQNMUDIJAGQCCQBkAgkAZAIJAGQCCQBkAgkAZAIJAGQCCQBkAgUOYnVybnh0bkJhbGFuY2UFClBaMWJhbGFuY2UFClBaMmJhbGFuY2UFClBaM2JhbGFuY2UFClBaNGJhbGFuY2UFClBaNWJhbGFuY2UFClBaNmJhbGFuY2UFCldYMWJhbGFuY2UFCldYMmJhbGFuY2UJAWkBCHJlZ2lzdGVyAAMJAQhjb250YWlucwIJAQx0cnlHZXRTdHJpbmcCBQR0aGlzAhJBZGRyZXNzIHJlZ2lzdGVyZWQJAKUIAQgFAWkGY2FsbGVyCQACAQISYWxyZWFkeSByZWdpc3RlcmVkAwkAZgIFBmhlaWdodAUScmVnaXN0cmF0aW9uQ2xvc2VkCQACAQITcmVnaXN0cmF0aW9uIGNsb3NlZAMJAAACCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMCEUFtb3VudCBSZWdpc3RlcmVkAGMJAAIBAhNyZWdpc3RyYXRpb24gY2xvc2VkCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhFBbW91bnQgUmVnaXN0ZXJlZAkAZAIJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwIRQW1vdW50IFJlZ2lzdGVyZWQAAQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICElJlZ2lzdGVyIGFkZHJlc3M6IAkApAMBCQBkAgkBDXRyeUdldEludGVnZXICBQR0aGlzAhFBbW91bnQgUmVnaXN0ZXJlZAABCQClCAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCAhJBZGRyZXNzIHJlZ2lzdGVyZWQJAKwCAgkArAICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkCQClCAEIBQFpBmNhbGxlcgIBLAUDbmlsAWkBBXN0YXJ0AAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIECWFkZHJlc3NlcwkAswICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkAAEEBGxpc3QJALUJAgUJYWRkcmVzc2VzAgEsCgEDYmFsAgVhY2N1bQdhZGRyZXNzCQDOCAIFBWFjY3VtCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQdhZGRyZXNzCAkA7wcBCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzCWF2YWlsYWJsZQUDbmlsBA1lbnRlckludGVnZXJzCgACJGwFBGxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA2JhbAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAM4IAgUDbmlsBQ1lbnRlckludGVnZXJzAWkBD2N1cnJlbnRQb3NpdGlvbgAECWFkZHJlc3NlcwkAswICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkAAEEBGxpc3QJALUJAgUJYWRkcmVzc2VzAgEsCgEDZGlmAgVhY2N1bQdhZGRyZXNzCQDOCAIFBWFjY3VtCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCWluY3JlYXNlIAUHYWRkcmVzcwkAZQIICQDvBwEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MJYXZhaWxhYmxlCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMFB2FkZHJlc3MFA25pbAQIZW50ZXJEaWYKAAIkbAUEbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDZGlmAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA5OAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIJAM4IAgUDbmlsBQhlbnRlckRpZgFpAQRzdG9wAAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIECWFkZHJlc3NlcwkAswICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkAAEEBGxpc3QJALUJAgUJYWRkcmVzc2VzAgEsCgEDZGlmAgVhY2N1bQdhZGRyZXNzCQDOCAIFBWFjY3VtCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICBXN0b3AgBQdhZGRyZXNzCQBlAggJAO8HAQkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwlhdmFpbGFibGUJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUHYWRkcmVzcwUDbmlsBAhlbnRlckRpZgoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNkaWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDk4CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgkAzggCBQNuaWwFCGVudGVyRGlmAWkBB3dpbm5lcnMAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQJYWRkcmVzc2VzCQCzAgIJAQx0cnlHZXRTdHJpbmcCBQR0aGlzAhJBZGRyZXNzIHJlZ2lzdGVyZWQAAQQEbGlzdAkAtQkCBQlhZGRyZXNzZXMCASwECGxpc3RTaXplCQCQAwEFBGxpc3QEC3JlcXVpcmVtZW50AAEKAQZmaWx0ZXICBWFjY3VtB2FkZHJlc3MDCQBmAgULcmVxdWlyZW1lbnQJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwkArAICAgVzdG9wIAUHYWRkcmVzcwUDbmlsCQDNCAIFBWFjY3VtBQdhZGRyZXNzBApmaWx0ZXJMaXN0CgACJGwFBGxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmZpbHRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgOTgJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiBA5maWx0ZXJMaXN0U2l6ZQkAkAMBBQpmaWx0ZXJMaXN0BARkaWZmCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMJAKwCAgIFc3RvcCACIzNNcUVBRVZrMU5jYlJBdUVQQVg3bnl6VXFNSGJodlJvZmV6BAVkaWZmMgkBDXRyeUdldEludGVnZXICBQR0aGlzCQCsAgICBXN0b3AgAiMzTjN5N25RZnFEYzdyQlVFeGpLUWk1WmJzcFdSaDlxOFBZSAQFZGlmZjMJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwkArAICAgVzdG9wIAIjM044dWVUQXVmRVVZREtXSkRiZks3YVo0SEh4QmtYNERYQTYJAMwIAgkBDEludGVnZXJFbnRyeQICFGxpc3Qgc2l6ZSBmaWx0ZXJMaXN0BQ5maWx0ZXJMaXN0U2l6ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgIoZGlmZiAzTXFFQUVWazFOY2JSQXVFUEFYN255elVxTUhiaHZSb2ZlegUEZGlmZgkAzAgCCQEMSW50ZWdlckVudHJ5AgIoZGlmZiAzTjN5N25RZnFEYzdyQlVFeGpLUWk1WmJzcFdSaDlxOFBZSAUFZGlmZjIJAMwIAgkBDEludGVnZXJFbnRyeQICKGRpZmYgM044dWVUQXVmRVVZREtXSkRiZks3YVo0SEh4QmtYNERYQTYFBWRpZmYzBQNuaWwBaQEJc3RhcnROZXh0AAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIECWFkZHJlc3NlcwkAswICCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwIHd2lubmVycwABBARsaXN0CQC1CQIFCWFkZHJlc3NlcwIBLAoBB25leHRCYWwCBWFjY3VtB2FkZHJlc3MJAM4IAgUFYWNjdW0JAMwIAgkBDEludGVnZXJFbnRyeQIFB2FkZHJlc3MICQDvBwEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MJYXZhaWxhYmxlBQNuaWwEDGVudGVyTmV4dEJhbAoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQduZXh0QmFsAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAoBAW4CBWFjY3VtB2FkZHJlc3MJAKwCAgUFYWNjdW0JAKwCAgUHYWRkcmVzcwIBLAQEbmV4dAoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQFuAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQICCm5leHQgcm91bmQFBG5leHQFA25pbAUMZW50ZXJOZXh0QmFsAWkBEnRvdGFsQmFsYW5jZUNhbGxlcgADCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyCQDOCAIFA25pbAkBDHRvdGFsQmFsYW5jZQEIBQFpBmNhbGxlcgFpARN0b3RhbEJhbGFuY2VBZGRyZXNzAQdhZGRyZXNzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgkAzggCBQNuaWwJAQx0b3RhbEJhbGFuY2UBCQEFdmFsdWUBCQCmCAEFB2FkZHJlc3MBaQEIdHJhbnNmZXIAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQHYXNzZXRJZAUJd2hpcmxwb29sBAZhbW91bnQJAGgCAAIFAmQ4BAlhZGRyZXNzZXMJALMCAgkBDHRyeUdldFN0cmluZwIFBHRoaXMCB3dpbm5lcnMAAQQEbGlzdAkAtQkCBQlhZGRyZXNzZXMCASwEEGFtb3VudFBlckFkZHJlc3MJAGkCBQZhbW91bnQJAJADAQUEbGlzdAoBAWYCBWFjY3VtB2FkZHJlc3MJAM4IAgUFYWNjdW0JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwUQYW1vdW50UGVyQWRkcmVzcwUHYXNzZXRJZAUDbmlsCgACJGwFBGxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkAIkxldY=",
    "height": 2838939,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3LX1FbR21ExNZAyBcBvqWiWkkdLhX2qjMJGezpVfyPne
Next: GPq8cq65kwMz5RA5rcmu962ESQGi52KxXaGvXuE14BBz

Diff: 
Old New Differences
189 189          let addresses = dropRight(tryGetString(this, "Address registered"), 1)
190 190          let list = split(addresses, ",")
191 191          let listSize = size(list)
192 -         let requirement = (1 * d8)
192 +         let requirement = 1
193 193          func filter (accum,address) =         if ((requirement > tryGetInteger(this, ("stop " + address))))
194 194              then nil
195 195              else (accum :+ address)
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let d8 = 100000000
5 5  
6 6  let registrationClosed = 1
7 7  
8 8  func tryGetInteger (address,key) = match getInteger(address, key) {
9 9      case b: Int => 
10 10          b
11 11      case _ => 
12 12          0
13 13  }
14 14  
15 15  
16 16  func tryGetString (address,key) = match getString(address, key) {
17 17      case b: String => 
18 18          b
19 19      case _ => 
20 20          ""
21 21  }
22 22  
23 23  
24 24  let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
25 25  
26 26  let whirlpool = base58'73tY3E6Gd5AWYmsuq8m8Kek7KnJNAYyS3GoveTbc6jCi'
27 27  
28 28  let PZ1 = base58'3PE7NtJdmVq4yo47LKDqurQ8RLDCouvJCPB'
29 29  
30 30  let PZ2 = base58'3PQHndCUVrv3wBuQjbvVP9SnGmfbfitGxfx'
31 31  
32 32  let PZ3 = base58'3PBiMQLnX8wd4bssXCgF8KuUqHv1H4zWHGi'
33 33  
34 34  let PZ4 = base58'3PDJPGn6vBEBqWN4E3fNcxoKBoDXbsmoaM7'
35 35  
36 36  let PZ5 = base58'3PCS1xhGQi2eM5mYcCBhUSHvB31Kk5gZoCm'
37 37  
38 38  let PZ6 = base58'3P8Quvmgt3VEWAjBR3bsfgCqzUh7zTmTC4q'
39 39  
40 40  let WXstake = base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'
41 41  
42 42  let WX1 = base58'3P5vwLbXddLWpsRspftMxLuzfsjk3dLT3n5'
43 43  
44 44  let LP1 = "GyiHdcN59sZ46baFvj68ruLngrTPEvWDtsd6jHm4o46n"
45 45  
46 46  let WX2 = base58'3PKXseWa31VUSWUvm2YiRKxW2VM9RsVk3ry'
47 47  
48 48  let LP2 = "3MPHMJVwYGyeBLRsH1RsYhrTmemv752AEBwuFFV7g49Z"
49 49  
50 50  func PZbal (Pooladdress,address) = {
51 51      let burnxtnInPZ = tryGetInteger(Address(Pooladdress), (("global_" + toBase58String(burnxtn)) + "_balance"))
52 52      let addressStakePZ = tryGetInteger(Address(Pooladdress), (toString(address) + "_indexStaked"))
53 53      let totalStakePZ = tryGetInteger(Address(Pooladdress), "global_poolToken_amount")
54 54      fraction(burnxtnInPZ, addressStakePZ, totalStakePZ)
55 55      }
56 56  
57 57  
58 58  func WXbal (Pooladdress,address,LPstr) = {
59 59      let burnxtnInWX = assetBalance(Address(Pooladdress), burnxtn)
60 60      let addressStakeWX = tryGetInteger(Address(WXstake), ((("%s%s%s__staked__" + toString(address)) + "__") + LPstr))
61 61      let totalStakeWX = tryGetInteger(Address(WXstake), ("%s%s%s__staked__total__" + LPstr))
62 62      fraction(burnxtnInWX, addressStakeWX, totalStakeWX)
63 63      }
64 64  
65 65  
66 66  func totalBalance (address) = {
67 67      let burnxtnBalance = assetBalance(address, burnxtn)
68 68      let PZ1balance = PZbal(PZ1, address)
69 69      let PZ2balance = PZbal(PZ2, address)
70 70      let PZ3balance = PZbal(PZ3, address)
71 71      let PZ4balance = PZbal(PZ4, address)
72 72      let PZ5balance = PZbal(PZ5, address)
73 73      let PZ6balance = PZbal(PZ6, address)
74 74      let WX1balance = WXbal(WX1, address, LP1)
75 75      let WX2balance = WXbal(WX2, address, LP2)
76 76      let total = ((((((((burnxtnBalance + PZ1balance) + PZ2balance) + PZ3balance) + PZ4balance) + PZ5balance) + PZ6balance) + WX1balance) + WX2balance)
77 77  [IntegerEntry("burnxtnBalance", burnxtnBalance), IntegerEntry("PZ1balance", PZ1balance), IntegerEntry("PZ2balance", PZ2balance), IntegerEntry("PZ3balance", PZ3balance), IntegerEntry("PZ4balance", PZ4balance), IntegerEntry("PZ5balance", PZ5balance), IntegerEntry("PZ6balance", PZ6balance), IntegerEntry("WX1balance", WX1balance), IntegerEntry("WX2balance", WX2balance), IntegerEntry("total", total)]
78 78      }
79 79  
80 80  
81 81  func totalBalance2 (address) = {
82 82      let burnxtnBalance = assetBalance(address, burnxtn)
83 83      let PZ1balance = PZbal(PZ1, address)
84 84      let PZ2balance = PZbal(PZ2, address)
85 85      let PZ3balance = PZbal(PZ3, address)
86 86      let PZ4balance = PZbal(PZ4, address)
87 87      let PZ5balance = PZbal(PZ5, address)
88 88      let PZ6balance = PZbal(PZ6, address)
89 89      let WX1balance = WXbal(WX1, address, LP1)
90 90      let WX2balance = WXbal(WX2, address, LP2)
91 91      ((((((((burnxtnBalance + PZ1balance) + PZ2balance) + PZ3balance) + PZ4balance) + PZ5balance) + PZ6balance) + WX1balance) + WX2balance)
92 92      }
93 93  
94 94  
95 95  @Callable(i)
96 96  func register () = if (contains(tryGetString(this, "Address registered"), toString(i.caller)))
97 97      then throw("already registered")
98 98      else if ((height > registrationClosed))
99 99          then throw("registration closed")
100 100          else if ((tryGetInteger(this, "Amount Registered") == 99))
101 101              then throw("registration closed")
102 102              else [IntegerEntry("Amount Registered", (tryGetInteger(this, "Amount Registered") + 1)), StringEntry(("Register address: " + toString((tryGetInteger(this, "Amount Registered") + 1))), toString(i.caller)), StringEntry("Address registered", ((tryGetString(this, "Address registered") + toString(i.caller)) + ","))]
103 103  
104 104  
105 105  
106 106  @Callable(i)
107 107  func start () = if ((i.caller != this))
108 108      then throw("access only by project owner")
109 109      else {
110 110          let addresses = dropRight(tryGetString(this, "Address registered"), 1)
111 111          let list = split(addresses, ",")
112 112          func bal (accum,address) =         (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
113 113  
114 114          let enterIntegers = {
115 115              let $l = list
116 116              let $s = size($l)
117 117              let $acc0 = nil
118 118              func $f0_1 ($a,$i) =             if (($i >= $s))
119 119                  then $a
120 120                  else bal($a, $l[$i])
121 121  
122 122              func $f0_2 ($a,$i) =             if (($i >= $s))
123 123                  then $a
124 124                  else throw("List size exceeds 100")
125 125  
126 126              $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)
127 127              }
128 128          (nil ++ enterIntegers)
129 129          }
130 130  
131 131  
132 132  
133 133  @Callable(i)
134 134  func currentPosition () = {
135 135      let addresses = dropRight(tryGetString(this, "Address registered"), 1)
136 136      let list = split(addresses, ",")
137 137      func dif (accum,address) =     (accum ++ [IntegerEntry(("increase " + address), (wavesBalance(addressFromStringValue(address)).available - tryGetInteger(this, address)))])
138 138  
139 139      let enterDif = {
140 140          let $l = list
141 141          let $s = size($l)
142 142          let $acc0 = nil
143 143          func $f0_1 ($a,$i) =         if (($i >= $s))
144 144              then $a
145 145              else dif($a, $l[$i])
146 146  
147 147          func $f0_2 ($a,$i) =         if (($i >= $s))
148 148              then $a
149 149              else throw("List size exceeds 98")
150 150  
151 151          $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($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)
152 152          }
153 153      (nil ++ enterDif)
154 154      }
155 155  
156 156  
157 157  
158 158  @Callable(i)
159 159  func stop () = if ((i.caller != this))
160 160      then throw("access only by project owner")
161 161      else {
162 162          let addresses = dropRight(tryGetString(this, "Address registered"), 1)
163 163          let list = split(addresses, ",")
164 164          func dif (accum,address) =         (accum ++ [IntegerEntry(("stop " + address), (wavesBalance(addressFromStringValue(address)).available - tryGetInteger(this, address)))])
165 165  
166 166          let enterDif = {
167 167              let $l = list
168 168              let $s = size($l)
169 169              let $acc0 = nil
170 170              func $f0_1 ($a,$i) =             if (($i >= $s))
171 171                  then $a
172 172                  else dif($a, $l[$i])
173 173  
174 174              func $f0_2 ($a,$i) =             if (($i >= $s))
175 175                  then $a
176 176                  else throw("List size exceeds 98")
177 177  
178 178              $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($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)
179 179              }
180 180          (nil ++ enterDif)
181 181          }
182 182  
183 183  
184 184  
185 185  @Callable(i)
186 186  func winners () = if ((i.caller != this))
187 187      then throw("access only by project owner")
188 188      else {
189 189          let addresses = dropRight(tryGetString(this, "Address registered"), 1)
190 190          let list = split(addresses, ",")
191 191          let listSize = size(list)
192 -         let requirement = (1 * d8)
192 +         let requirement = 1
193 193          func filter (accum,address) =         if ((requirement > tryGetInteger(this, ("stop " + address))))
194 194              then nil
195 195              else (accum :+ address)
196 196  
197 197          let filterList = {
198 198              let $l = list
199 199              let $s = size($l)
200 200              let $acc0 = nil
201 201              func $f0_1 ($a,$i) =             if (($i >= $s))
202 202                  then $a
203 203                  else filter($a, $l[$i])
204 204  
205 205              func $f0_2 ($a,$i) =             if (($i >= $s))
206 206                  then $a
207 207                  else throw("List size exceeds 98")
208 208  
209 209              $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($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)
210 210              }
211 211          let filterListSize = size(filterList)
212 212          let diff = tryGetInteger(this, ("stop " + "3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez"))
213 213          let diff2 = tryGetInteger(this, ("stop " + "3N3y7nQfqDc7rBUExjKQi5ZbspWRh9q8PYH"))
214 214          let diff3 = tryGetInteger(this, ("stop " + "3N8ueTAufEUYDKWJDbfK7aZ4HHxBkX4DXA6"))
215 215  [IntegerEntry("list size filterList", filterListSize), IntegerEntry("diff 3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez", diff), IntegerEntry("diff 3N3y7nQfqDc7rBUExjKQi5ZbspWRh9q8PYH", diff2), IntegerEntry("diff 3N8ueTAufEUYDKWJDbfK7aZ4HHxBkX4DXA6", diff3)]
216 216          }
217 217  
218 218  
219 219  
220 220  @Callable(i)
221 221  func startNext () = if ((i.caller != this))
222 222      then throw("access only by project owner")
223 223      else {
224 224          let addresses = dropRight(tryGetString(this, "winners"), 1)
225 225          let list = split(addresses, ",")
226 226          func nextBal (accum,address) =         (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
227 227  
228 228          let enterNextBal = {
229 229              let $l = list
230 230              let $s = size($l)
231 231              let $acc0 = nil
232 232              func $f0_1 ($a,$i) =             if (($i >= $s))
233 233                  then $a
234 234                  else nextBal($a, $l[$i])
235 235  
236 236              func $f0_2 ($a,$i) =             if (($i >= $s))
237 237                  then $a
238 238                  else throw("List size exceeds 100")
239 239  
240 240              $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)
241 241              }
242 242          func n (accum,address) =         (accum + (address + ","))
243 243  
244 244          let next = {
245 245              let $l = list
246 246              let $s = size($l)
247 247              let $acc0 = ""
248 248              func $f1_1 ($a,$i) =             if (($i >= $s))
249 249                  then $a
250 250                  else n($a, $l[$i])
251 251  
252 252              func $f1_2 ($a,$i) =             if (($i >= $s))
253 253                  then $a
254 254                  else throw("List size exceeds 100")
255 255  
256 256              $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_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)
257 257              }
258 258          ([StringEntry("next round", next)] ++ enterNextBal)
259 259          }
260 260  
261 261  
262 262  
263 263  @Callable(i)
264 264  func totalBalanceCaller () = if ((i.caller != this))
265 265      then throw("access only by project owner")
266 266      else (nil ++ totalBalance(i.caller))
267 267  
268 268  
269 269  
270 270  @Callable(i)
271 271  func totalBalanceAddress (address) = if ((i.caller != this))
272 272      then throw("access only by project owner")
273 273      else (nil ++ totalBalance(value(addressFromString(address))))
274 274  
275 275  
276 276  
277 277  @Callable(i)
278 278  func transfer () = if ((i.caller != this))
279 279      then throw("access only by project owner")
280 280      else {
281 281          let assetId = whirlpool
282 282          let amount = (2 * d8)
283 283          let addresses = dropRight(tryGetString(this, "winners"), 1)
284 284          let list = split(addresses, ",")
285 285          let amountPerAddress = (amount / size(list))
286 286          func f (accum,address) =         (accum ++ [ScriptTransfer(addressFromStringValue(address), amountPerAddress, assetId)])
287 287  
288 288          let $l = list
289 289          let $s = size($l)
290 290          let $acc0 = nil
291 291          func $f0_1 ($a,$i) =         if (($i >= $s))
292 292              then $a
293 293              else f($a, $l[$i])
294 294  
295 295          func $f0_2 ($a,$i) =         if (($i >= $s))
296 296              then $a
297 297              else throw("List size exceeds 100")
298 298  
299 299          $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)
300 300          }
301 301  
302 302

Old	New		Differences
189	189		let addresses = dropRight(tryGetString(this, "Address registered"), 1)
190	190		let list = split(addresses, ",")
191	191		let listSize = size(list)
192		-	let requirement = (1 * d8)
	192	+	let requirement = 1
193	193		func filter (accum,address) = if ((requirement > tryGetInteger(this, ("stop " + address))))
194	194		then nil
195	195		else (accum :+ address)

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let d8 = 100000000
5	5
6	6		let registrationClosed = 1
7	7
8	8		func tryGetInteger (address,key) = match getInteger(address, key) {
9	9		case b: Int =>
10	10		b
11	11		case _ =>
12	12		0
13	13		}
14	14
15	15
16	16		func tryGetString (address,key) = match getString(address, key) {
17	17		case b: String =>
18	18		b
19	19		case _ =>
20	20		""
21	21		}
22	22
23	23
24	24		let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
25	25
26	26		let whirlpool = base58'73tY3E6Gd5AWYmsuq8m8Kek7KnJNAYyS3GoveTbc6jCi'
27	27
28	28		let PZ1 = base58'3PE7NtJdmVq4yo47LKDqurQ8RLDCouvJCPB'
29	29
30	30		let PZ2 = base58'3PQHndCUVrv3wBuQjbvVP9SnGmfbfitGxfx'
31	31
32	32		let PZ3 = base58'3PBiMQLnX8wd4bssXCgF8KuUqHv1H4zWHGi'
33	33
34	34		let PZ4 = base58'3PDJPGn6vBEBqWN4E3fNcxoKBoDXbsmoaM7'
35	35
36	36		let PZ5 = base58'3PCS1xhGQi2eM5mYcCBhUSHvB31Kk5gZoCm'
37	37
38	38		let PZ6 = base58'3P8Quvmgt3VEWAjBR3bsfgCqzUh7zTmTC4q'
39	39
40	40		let WXstake = base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'
41	41
42	42		let WX1 = base58'3P5vwLbXddLWpsRspftMxLuzfsjk3dLT3n5'
43	43
44	44		let LP1 = "GyiHdcN59sZ46baFvj68ruLngrTPEvWDtsd6jHm4o46n"
45	45
46	46		let WX2 = base58'3PKXseWa31VUSWUvm2YiRKxW2VM9RsVk3ry'
47	47
48	48		let LP2 = "3MPHMJVwYGyeBLRsH1RsYhrTmemv752AEBwuFFV7g49Z"
49	49
50	50		func PZbal (Pooladdress,address) = {
51	51		let burnxtnInPZ = tryGetInteger(Address(Pooladdress), (("global_" + toBase58String(burnxtn)) + "_balance"))
52	52		let addressStakePZ = tryGetInteger(Address(Pooladdress), (toString(address) + "_indexStaked"))
53	53		let totalStakePZ = tryGetInteger(Address(Pooladdress), "global_poolToken_amount")
54	54		fraction(burnxtnInPZ, addressStakePZ, totalStakePZ)
55	55		}
56	56
57	57
58	58		func WXbal (Pooladdress,address,LPstr) = {
59	59		let burnxtnInWX = assetBalance(Address(Pooladdress), burnxtn)
60	60		let addressStakeWX = tryGetInteger(Address(WXstake), ((("%s%s%s__staked__" + toString(address)) + "__") + LPstr))
61	61		let totalStakeWX = tryGetInteger(Address(WXstake), ("%s%s%s__staked__total__" + LPstr))
62	62		fraction(burnxtnInWX, addressStakeWX, totalStakeWX)
63	63		}
64	64
65	65
66	66		func totalBalance (address) = {
67	67		let burnxtnBalance = assetBalance(address, burnxtn)
68	68		let PZ1balance = PZbal(PZ1, address)
69	69		let PZ2balance = PZbal(PZ2, address)
70	70		let PZ3balance = PZbal(PZ3, address)
71	71		let PZ4balance = PZbal(PZ4, address)
72	72		let PZ5balance = PZbal(PZ5, address)
73	73		let PZ6balance = PZbal(PZ6, address)
74	74		let WX1balance = WXbal(WX1, address, LP1)
75	75		let WX2balance = WXbal(WX2, address, LP2)
76	76		let total = ((((((((burnxtnBalance + PZ1balance) + PZ2balance) + PZ3balance) + PZ4balance) + PZ5balance) + PZ6balance) + WX1balance) + WX2balance)
77	77		[IntegerEntry("burnxtnBalance", burnxtnBalance), IntegerEntry("PZ1balance", PZ1balance), IntegerEntry("PZ2balance", PZ2balance), IntegerEntry("PZ3balance", PZ3balance), IntegerEntry("PZ4balance", PZ4balance), IntegerEntry("PZ5balance", PZ5balance), IntegerEntry("PZ6balance", PZ6balance), IntegerEntry("WX1balance", WX1balance), IntegerEntry("WX2balance", WX2balance), IntegerEntry("total", total)]
78	78		}
79	79
80	80
81	81		func totalBalance2 (address) = {
82	82		let burnxtnBalance = assetBalance(address, burnxtn)
83	83		let PZ1balance = PZbal(PZ1, address)
84	84		let PZ2balance = PZbal(PZ2, address)
85	85		let PZ3balance = PZbal(PZ3, address)
86	86		let PZ4balance = PZbal(PZ4, address)
87	87		let PZ5balance = PZbal(PZ5, address)
88	88		let PZ6balance = PZbal(PZ6, address)
89	89		let WX1balance = WXbal(WX1, address, LP1)
90	90		let WX2balance = WXbal(WX2, address, LP2)
91	91		((((((((burnxtnBalance + PZ1balance) + PZ2balance) + PZ3balance) + PZ4balance) + PZ5balance) + PZ6balance) + WX1balance) + WX2balance)
92	92		}
93	93
94	94
95	95		@Callable(i)
96	96		func register () = if (contains(tryGetString(this, "Address registered"), toString(i.caller)))
97	97		then throw("already registered")
98	98		else if ((height > registrationClosed))
99	99		then throw("registration closed")
100	100		else if ((tryGetInteger(this, "Amount Registered") == 99))
101	101		then throw("registration closed")
102	102		else [IntegerEntry("Amount Registered", (tryGetInteger(this, "Amount Registered") + 1)), StringEntry(("Register address: " + toString((tryGetInteger(this, "Amount Registered") + 1))), toString(i.caller)), StringEntry("Address registered", ((tryGetString(this, "Address registered") + toString(i.caller)) + ","))]
103	103
104	104
105	105
106	106		@Callable(i)
107	107		func start () = if ((i.caller != this))
108	108		then throw("access only by project owner")
109	109		else {
110	110		let addresses = dropRight(tryGetString(this, "Address registered"), 1)
111	111		let list = split(addresses, ",")
112	112		func bal (accum,address) = (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
113	113
114	114		let enterIntegers = {
115	115		let $l = list
116	116		let $s = size($l)
117	117		let $acc0 = nil
118	118		func $f0_1 ($a,$i) = if (($i >= $s))
119	119		then $a
120	120		else bal($a, $l[$i])
121	121
122	122		func $f0_2 ($a,$i) = if (($i >= $s))
123	123		then $a
124	124		else throw("List size exceeds 100")
125	125
126	126		$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)
127	127		}
128	128		(nil ++ enterIntegers)
129	129		}
130	130
131	131
132	132
133	133		@Callable(i)
134	134		func currentPosition () = {
135	135		let addresses = dropRight(tryGetString(this, "Address registered"), 1)
136	136		let list = split(addresses, ",")
137	137		func dif (accum,address) = (accum ++ [IntegerEntry(("increase " + address), (wavesBalance(addressFromStringValue(address)).available - tryGetInteger(this, address)))])
138	138
139	139		let enterDif = {
140	140		let $l = list
141	141		let $s = size($l)
142	142		let $acc0 = nil
143	143		func $f0_1 ($a,$i) = if (($i >= $s))
144	144		then $a
145	145		else dif($a, $l[$i])
146	146
147	147		func $f0_2 ($a,$i) = if (($i >= $s))
148	148		then $a
149	149		else throw("List size exceeds 98")
150	150
151	151		$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($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)
152	152		}
153	153		(nil ++ enterDif)
154	154		}
155	155
156	156
157	157
158	158		@Callable(i)
159	159		func stop () = if ((i.caller != this))
160	160		then throw("access only by project owner")
161	161		else {
162	162		let addresses = dropRight(tryGetString(this, "Address registered"), 1)
163	163		let list = split(addresses, ",")
164	164		func dif (accum,address) = (accum ++ [IntegerEntry(("stop " + address), (wavesBalance(addressFromStringValue(address)).available - tryGetInteger(this, address)))])
165	165
166	166		let enterDif = {
167	167		let $l = list
168	168		let $s = size($l)
169	169		let $acc0 = nil
170	170		func $f0_1 ($a,$i) = if (($i >= $s))
171	171		then $a
172	172		else dif($a, $l[$i])
173	173
174	174		func $f0_2 ($a,$i) = if (($i >= $s))
175	175		then $a
176	176		else throw("List size exceeds 98")
177	177
178	178		$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($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)
179	179		}
180	180		(nil ++ enterDif)
181	181		}
182	182
183	183
184	184
185	185		@Callable(i)
186	186		func winners () = if ((i.caller != this))
187	187		then throw("access only by project owner")
188	188		else {
189	189		let addresses = dropRight(tryGetString(this, "Address registered"), 1)
190	190		let list = split(addresses, ",")
191	191		let listSize = size(list)
192		-	let requirement = (1 * d8)
	192	+	let requirement = 1
193	193		func filter (accum,address) = if ((requirement > tryGetInteger(this, ("stop " + address))))
194	194		then nil
195	195		else (accum :+ address)
196	196
197	197		let filterList = {
198	198		let $l = list
199	199		let $s = size($l)
200	200		let $acc0 = nil
201	201		func $f0_1 ($a,$i) = if (($i >= $s))
202	202		then $a
203	203		else filter($a, $l[$i])
204	204
205	205		func $f0_2 ($a,$i) = if (($i >= $s))
206	206		then $a
207	207		else throw("List size exceeds 98")
208	208
209	209		$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($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)
210	210		}
211	211		let filterListSize = size(filterList)
212	212		let diff = tryGetInteger(this, ("stop " + "3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez"))
213	213		let diff2 = tryGetInteger(this, ("stop " + "3N3y7nQfqDc7rBUExjKQi5ZbspWRh9q8PYH"))
214	214		let diff3 = tryGetInteger(this, ("stop " + "3N8ueTAufEUYDKWJDbfK7aZ4HHxBkX4DXA6"))
215	215		[IntegerEntry("list size filterList", filterListSize), IntegerEntry("diff 3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez", diff), IntegerEntry("diff 3N3y7nQfqDc7rBUExjKQi5ZbspWRh9q8PYH", diff2), IntegerEntry("diff 3N8ueTAufEUYDKWJDbfK7aZ4HHxBkX4DXA6", diff3)]
216	216		}
217	217
218	218
219	219
220	220		@Callable(i)
221	221		func startNext () = if ((i.caller != this))
222	222		then throw("access only by project owner")
223	223		else {
224	224		let addresses = dropRight(tryGetString(this, "winners"), 1)
225	225		let list = split(addresses, ",")
226	226		func nextBal (accum,address) = (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
227	227
228	228		let enterNextBal = {
229	229		let $l = list
230	230		let $s = size($l)
231	231		let $acc0 = nil
232	232		func $f0_1 ($a,$i) = if (($i >= $s))
233	233		then $a
234	234		else nextBal($a, $l[$i])
235	235
236	236		func $f0_2 ($a,$i) = if (($i >= $s))
237	237		then $a
238	238		else throw("List size exceeds 100")
239	239
240	240		$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)
241	241		}
242	242		func n (accum,address) = (accum + (address + ","))
243	243
244	244		let next = {
245	245		let $l = list
246	246		let $s = size($l)
247	247		let $acc0 = ""
248	248		func $f1_1 ($a,$i) = if (($i >= $s))
249	249		then $a
250	250		else n($a, $l[$i])
251	251
252	252		func $f1_2 ($a,$i) = if (($i >= $s))
253	253		then $a
254	254		else throw("List size exceeds 100")
255	255
256	256		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_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)
257	257		}
258	258		([StringEntry("next round", next)] ++ enterNextBal)
259	259		}
260	260
261	261
262	262
263	263		@Callable(i)
264	264		func totalBalanceCaller () = if ((i.caller != this))
265	265		then throw("access only by project owner")
266	266		else (nil ++ totalBalance(i.caller))
267	267
268	268
269	269
270	270		@Callable(i)
271	271		func totalBalanceAddress (address) = if ((i.caller != this))
272	272		then throw("access only by project owner")
273	273		else (nil ++ totalBalance(value(addressFromString(address))))
274	274
275	275
276	276
277	277		@Callable(i)
278	278		func transfer () = if ((i.caller != this))
279	279		then throw("access only by project owner")
280	280		else {
281	281		let assetId = whirlpool
282	282		let amount = (2 * d8)
283	283		let addresses = dropRight(tryGetString(this, "winners"), 1)
284	284		let list = split(addresses, ",")
285	285		let amountPerAddress = (amount / size(list))
286	286		func f (accum,address) = (accum ++ [ScriptTransfer(addressFromStringValue(address), amountPerAddress, assetId)])
287	287
288	288		let $l = list
289	289		let $s = size($l)
290	290		let $acc0 = nil
291	291		func $f0_1 ($a,$i) = if (($i >= $s))
292	292		then $a
293	293		else f($a, $l[$i])
294	294
295	295		func $f0_2 ($a,$i) = if (($i >= $s))
296	296		then $a
297	297		else throw("List size exceeds 100")
298	298
299	299		$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)
300	300		}
301	301
302	302

github/deemru/w8io/fabc49c 
62.97 ms ◑