w8 · tx · 7FB···3X7

tx · 7FBtqWFZjvUVV3hkGPKc3bF6y9EMwxpjKjrumSqbv3X7

3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez:  -0.01400000 Waves

2023.11.12 15:35 [2840129] smart account 3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7FBtqWFZjvUVV3hkGPKc3bF6y9EMwxpjKjrumSqbv3X7",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1699792635980,
    "version": 2,
    "chainId": 84,
    "sender": "3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez",
    "senderPublicKey": "Brp6cacBXyKUcZr5Uc6VDKsnFcaEeQ8nQzrZQyobDsuf",
    "proofs": [
        "3AqNoRDS9s3KWWrutP6AK5M8yByuqivwukkQev3UJHU7dDFuBcm3CmP7bDzq1r5seVP4quoJ6L1Acmnxoekc2UKo"
    ],
    "script": "base64:BgIUCAISABIAEgASABIAEgASABIAEgAWAAJkOACAwtcvABJyZWdpc3RyYXRpb25DbG9zZWQAAQAXcmVnaXN0cmF0aW9uUmVxdWlyZW1lbnQJAGgCAMC4AgUCZDgBDXRyeUdldEludGVnZXICB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0U3RyaW5nAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgAAB2J1cm54dG4BICRPdXlqfjM5uPsM/4SpcVxeyi3eM6DEXWn56kQR7ExUAAl3aGlybHBvb2wBIFnjjdzCtSO6ShTcxNCvFAnmZOYEviUGCyZO5VBtl1nHAANQWjEBGgFXhZ0sMNX8Az5hxa3ekr/FKpHzma4aQUAKAANQWjIBGgFX9UZoJ4ANaN9OJnV6tKHTKDHgCb/1eXk3AANQWjMBGgFXa1Id4WddYjOcRPaabwru1VXI2iD87ObHAANQWjQBGgFXfLnyJCx5HfnCC2Fdp+VLfj5m+DHZ5CDiAANQWjUBGgFXczNbi1Z5JyxHjXGQ9iwgs/k/Qpf9nEXSAANQWjYBGgFXRx1m+rCUYWiWBzKutkDjof9zzk8m2Ee6AAdXWHN0YWtlARoBV+s7535uBRjCkaSYFhfhZtdFJyDuJUlWqAADV1gxARoBVyvirnF7fckwtSB55xbFa21XQIGlOBY9PgADTFAxAixHeWlIZGNONTlzWjQ2YmFGdmo2OHJ1TG5nclRQRXZXRHRzZDZqSG00bzQ2bgADV1gyARoBV8EXy0hCzgVTQ4pHXIhnlPQX1cfC1NTDUgADTFAyAiwzTVBITUpWd1lHeWVCTFJzSDFSc1loclRtZW12NzUyQUVCd3VGRlY3ZzQ5WgEFUFpiYWwCC1Bvb2xhZGRyZXNzB2FkZHJlc3MEC2J1cm54dG5JblBaCQENdHJ5R2V0SW50ZWdlcgIJAQdBZGRyZXNzAQULUG9vbGFkZHJlc3MJAKwCAgkArAICAgdnbG9iYWxfCQDYBAEFB2J1cm54dG4CCF9iYWxhbmNlBA5hZGRyZXNzU3Rha2VQWgkBDXRyeUdldEludGVnZXICCQEHQWRkcmVzcwEFC1Bvb2xhZGRyZXNzCQCsAgIJAKUIAQUHYWRkcmVzcwIMX2luZGV4U3Rha2VkBAx0b3RhbFN0YWtlUFoJAQ10cnlHZXRJbnRlZ2VyAgkBB0FkZHJlc3MBBQtQb29sYWRkcmVzcwIXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQJAGsDBQtidXJueHRuSW5QWgUOYWRkcmVzc1N0YWtlUFoFDHRvdGFsU3Rha2VQWgEFV1hiYWwDC1Bvb2xhZGRyZXNzB2FkZHJlc3MFTFBzdHIEC2J1cm54dG5JbldYCQDwBwIJAQdBZGRyZXNzAQULUG9vbGFkZHJlc3MFB2J1cm54dG4EDmFkZHJlc3NTdGFrZVdYCQENdHJ5R2V0SW50ZWdlcgIJAQdBZGRyZXNzAQUHV1hzdGFrZQkArAICCQCsAgIJAKwCAgIQJXMlcyVzX19zdGFrZWRfXwkApQgBBQdhZGRyZXNzAgJfXwUFTFBzdHIEDHRvdGFsU3Rha2VXWAkBDXRyeUdldEludGVnZXICCQEHQWRkcmVzcwEFB1dYc3Rha2UJAKwCAgIXJXMlcyVzX19zdGFrZWRfX3RvdGFsX18FBUxQc3RyCQBrAwULYnVybnh0bkluV1gFDmFkZHJlc3NTdGFrZVdYBQx0b3RhbFN0YWtlV1gBDHRvdGFsQmFsYW5jZQEHYWRkcmVzcwQOYnVybnh0bkJhbGFuY2UJAPAHAgUHYWRkcmVzcwUHYnVybnh0bgQKUFoxYmFsYW5jZQkBBVBaYmFsAgUDUFoxBQdhZGRyZXNzBApQWjJiYWxhbmNlCQEFUFpiYWwCBQNQWjIFB2FkZHJlc3MEClBaM2JhbGFuY2UJAQVQWmJhbAIFA1BaMwUHYWRkcmVzcwQKUFo0YmFsYW5jZQkBBVBaYmFsAgUDUFo0BQdhZGRyZXNzBApQWjViYWxhbmNlCQEFUFpiYWwCBQNQWjUFB2FkZHJlc3MEClBaNmJhbGFuY2UJAQVQWmJhbAIFA1BaNgUHYWRkcmVzcwQKV1gxYmFsYW5jZQkBBVdYYmFsAwUDV1gxBQdhZGRyZXNzBQNMUDEECldYMmJhbGFuY2UJAQVXWGJhbAMFA1dYMgUHYWRkcmVzcwUDTFAyBAV0b3RhbAkAZAIJAGQCCQBkAgkAZAIJAGQCCQBkAgkAZAIJAGQCBQ5idXJueHRuQmFsYW5jZQUKUFoxYmFsYW5jZQUKUFoyYmFsYW5jZQUKUFozYmFsYW5jZQUKUFo0YmFsYW5jZQUKUFo1YmFsYW5jZQUKUFo2YmFsYW5jZQUKV1gxYmFsYW5jZQUKV1gyYmFsYW5jZQkAzAgCCQEMSW50ZWdlckVudHJ5AgIOYnVybnh0bkJhbGFuY2UFDmJ1cm54dG5CYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpQWjFiYWxhbmNlBQpQWjFiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpQWjJiYWxhbmNlBQpQWjJiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpQWjNiYWxhbmNlBQpQWjNiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpQWjRiYWxhbmNlBQpQWjRiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpQWjViYWxhbmNlBQpQWjViYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpQWjZiYWxhbmNlBQpQWjZiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpXWDFiYWxhbmNlBQpXWDFiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgpXWDJiYWxhbmNlBQpXWDJiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgV0b3RhbAUFdG90YWwFA25pbAENdG90YWxCYWxhbmNlMgEHYWRkcmVzcwQOYnVybnh0bkJhbGFuY2UJAPAHAgUHYWRkcmVzcwUHYnVybnh0bgQKUFoxYmFsYW5jZQkBBVBaYmFsAgUDUFoxBQdhZGRyZXNzBApQWjJiYWxhbmNlCQEFUFpiYWwCBQNQWjIFB2FkZHJlc3MEClBaM2JhbGFuY2UJAQVQWmJhbAIFA1BaMwUHYWRkcmVzcwQKUFo0YmFsYW5jZQkBBVBaYmFsAgUDUFo0BQdhZGRyZXNzBApQWjViYWxhbmNlCQEFUFpiYWwCBQNQWjUFB2FkZHJlc3MEClBaNmJhbGFuY2UJAQVQWmJhbAIFA1BaNgUHYWRkcmVzcwQKV1gxYmFsYW5jZQkBBVdYYmFsAwUDV1gxBQdhZGRyZXNzBQNMUDEECldYMmJhbGFuY2UJAQVXWGJhbAMFA1dYMgUHYWRkcmVzcwUDTFAyCQBkAgkAZAIJAGQCCQBkAgkAZAIJAGQCCQBkAgkAZAIFDmJ1cm54dG5CYWxhbmNlBQpQWjFiYWxhbmNlBQpQWjJiYWxhbmNlBQpQWjNiYWxhbmNlBQpQWjRiYWxhbmNlBQpQWjViYWxhbmNlBQpQWjZiYWxhbmNlBQpXWDFiYWxhbmNlBQpXWDJiYWxhbmNlCQFpAQhyZWdpc3RlcgADCQEIY29udGFpbnMCCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkCQClCAEIBQFpBmNhbGxlcgkAAgECEmFscmVhZHkgcmVnaXN0ZXJlZAMJAGYCBQZoZWlnaHQFEnJlZ2lzdHJhdGlvbkNsb3NlZAkAAgECE3JlZ2lzdHJhdGlvbiBjbG9zZWQDCQBmAgUXcmVnaXN0cmF0aW9uUmVxdWlyZW1lbnQJAQ10b3RhbEJhbGFuY2UyAQgFAWkGY2FsbGVyCQACAQI3aGF2ZSBhdGxlYXN0IDQwayBCVVJOLVhUTiBpbiB3YWxsZXQgYW5kIGxpcXVpZGl0eSBwb29scwMJAAACCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMCEUFtb3VudCBSZWdpc3RlcmVkAGMJAAIBAhNyZWdpc3RyYXRpb24gY2xvc2VkCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQICEUFtb3VudCBSZWdpc3RlcmVkCQBkAgkBDXRyeUdldEludGVnZXICBQR0aGlzAhFBbW91bnQgUmVnaXN0ZXJlZAABCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgISUmVnaXN0ZXIgYWRkcmVzczogCQCkAwEJAGQCCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMCEUFtb3VudCBSZWdpc3RlcmVkAAEJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQICEkFkZHJlc3MgcmVnaXN0ZXJlZAkArAICCQCsAgIJAQx0cnlHZXRTdHJpbmcCBQR0aGlzAhJBZGRyZXNzIHJlZ2lzdGVyZWQJAKUIAQgFAWkGY2FsbGVyAgEsBQNuaWwJAQx0b3RhbEJhbGFuY2UBCAUBaQZjYWxsZXIBaQEFc3RhcnQAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQJYWRkcmVzc2VzCQCzAgIJAQx0cnlHZXRTdHJpbmcCBQR0aGlzAhJBZGRyZXNzIHJlZ2lzdGVyZWQAAQQEbGlzdAkAtQkCBQlhZGRyZXNzZXMCASwKAQNiYWwCBWFjY3VtB2FkZHJlc3MJAM4IAgUFYWNjdW0JAMwIAgkBDEludGVnZXJFbnRyeQIFB2FkZHJlc3MICQDvBwEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MJYXZhaWxhYmxlBQNuaWwEDWVudGVySW50ZWdlcnMKAAIkbAUEbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDYmFsAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAkAzggCBQNuaWwFDWVudGVySW50ZWdlcnMBaQEPY3VycmVudFBvc2l0aW9uAAQJYWRkcmVzc2VzCQCzAgIJAQx0cnlHZXRTdHJpbmcCBQR0aGlzAhJBZGRyZXNzIHJlZ2lzdGVyZWQAAQQEbGlzdAkAtQkCBQlhZGRyZXNzZXMCASwKAQNkaWYCBWFjY3VtB2FkZHJlc3MJAM4IAgUFYWNjdW0JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJaW5jcmVhc2UgBQdhZGRyZXNzCQBlAggJAO8HAQkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwlhdmFpbGFibGUJAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwUHYWRkcmVzcwUDbmlsBAhlbnRlckRpZgoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNkaWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDk4CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgkAzggCBQNuaWwFCGVudGVyRGlmAWkBBHN0b3AAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQJYWRkcmVzc2VzCQCzAgIJAQx0cnlHZXRTdHJpbmcCBQR0aGlzAhJBZGRyZXNzIHJlZ2lzdGVyZWQAAQQEbGlzdAkAtQkCBQlhZGRyZXNzZXMCASwKAQNkaWYCBWFjY3VtB2FkZHJlc3MJAM4IAgUFYWNjdW0JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIFc3RvcCAFB2FkZHJlc3MJAGUCCAkA7wcBCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzCWF2YWlsYWJsZQkBDXRyeUdldEludGVnZXICBQR0aGlzBQdhZGRyZXNzBQNuaWwECGVudGVyRGlmCgACJGwFBGxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA2RpZgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgOTgJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiCQDOCAIFA25pbAUIZW50ZXJEaWYBaQEHd2lubmVycwADCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyBAZmaWx0ZXIJAPwHBAUEdGhpcwIGZmlsdGVyBQNuaWwFA25pbAMJAAACBQZmaWx0ZXIFBmZpbHRlcgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBmZpbHRlcgADCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyBAlhZGRyZXNzZXMJALMCAgkBDHRyeUdldFN0cmluZwIFBHRoaXMCEkFkZHJlc3MgcmVnaXN0ZXJlZAABBARsaXN0CQC1CQIFCWFkZHJlc3NlcwIBLAQIbGlzdFNpemUJAJADAQUEbGlzdAQLcmVxdWlyZW1lbnQAAQoBBWZMaXN0AgVhY2N1bQdhZGRyZXNzAwkAZgIFC3JlcXVpcmVtZW50CQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMJAKwCAgIFc3RvcCAFB2FkZHJlc3MFA25pbAkAzQgCBQVhY2N1bQUHYWRkcmVzcwQKZmlsdGVyTGlzdAoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVmTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgOTgJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiBBBmaWx0ZXJMaXN0U3RyaW5nCQC5CQIFCmZpbHRlckxpc3QCASwEDmZpbHRlckxpc3RTaXplCQCQAwEFCmZpbHRlckxpc3QECGN1bGxTaXplCQBuBAUOZmlsdGVyTGlzdFNpemUAUABkBQRET1dOCQDMCAIJAQtTdHJpbmdFbnRyeQICBmZpbHRlcgUQZmlsdGVyTGlzdFN0cmluZwkAzAgCCQEMSW50ZWdlckVudHJ5AgIUbGlzdCBzaXplIGZpbHRlckxpc3QFDmZpbHRlckxpc3RTaXplCQDMCAIJAQxJbnRlZ2VyRW50cnkCAghjdWxsU2l6ZQUIY3VsbFNpemUFA25pbAFpAQZyZW1vdmUAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgMJAGcCCQERQGV4dHJOYXRpdmUoMTA1NSkBAghjdWxsU2l6ZQkBEUBleHRyTmF0aXZlKDEwNTUpAQIUbGlzdCBzaXplIGZpbHRlckxpc3QFA25pbAQEbGlzdAkAtQkCCQERQGV4dHJOYXRpdmUoMTA1OCkBAgZmaWx0ZXICASwKAQNiYWwCBWFjY3VtB2FkZHJlc3MJAM0IAgUFYWNjdW0JAQ10cnlHZXRJbnRlZ2VyAgUEdGhpcwkArAICAgVzdG9wIAUHYWRkcmVzcwQHYmFsTGlzdAoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNiYWwCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDk4CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgQGbG93ZXN0CQEFdmFsdWUBCQCXAwEFB2JhbExpc3QEC2luZGV4TG93ZXN0CQEFdmFsdWUBCQDPCAIFB2JhbExpc3QFBmxvd2VzdAQPbWludXNMb3dlc3RMaXN0CQDRCAIFBGxpc3QFC2luZGV4TG93ZXN0BBNtaW51c0xvd2VzdExpc3RTaXplCQCQAwEFD21pbnVzTG93ZXN0TGlzdAQRbWludXNMb3dlc3RTdHJpbmcJALkJAgUPbWludXNMb3dlc3RMaXN0AgEsCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhRsaXN0IHNpemUgZmlsdGVyTGlzdAUTbWludXNMb3dlc3RMaXN0U2l6ZQkAzAgCCQELU3RyaW5nRW50cnkCAgZmaWx0ZXIFEW1pbnVzTG93ZXN0U3RyaW5nBQNuaWwBaQEIdHJhbnNmZXIAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQHYXNzZXRJZAUJd2hpcmxwb29sBAZhbW91bnQJAGgCAAIFAmQ4BAlhZGRyZXNzZXMJALMCAgkBDHRyeUdldFN0cmluZwIFBHRoaXMCB3dpbm5lcnMAAQQEbGlzdAkAtQkCBQlhZGRyZXNzZXMCASwEEGFtb3VudFBlckFkZHJlc3MJAGkCBQZhbW91bnQJAJADAQUEbGlzdAoBAWYCBWFjY3VtB2FkZHJlc3MJAM4IAgUFYWNjdW0JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwUQYW1vdW50UGVyQWRkcmVzcwUHYXNzZXRJZAUDbmlsCgACJGwFBGxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkAWkBBWNoZWNrAAkAzAgCCQEMSW50ZWdlckVudHJ5AgIUbGlzdCBzaXplIGZpbHRlckxpc3QJARFAZXh0ck5hdGl2ZSgxMDU1KQECFGxpc3Qgc2l6ZSBmaWx0ZXJMaXN0CQDMCAIJAQtTdHJpbmdFbnRyeQICBmZpbHRlcgkBEUBleHRyTmF0aXZlKDEwNTgpAQIGZmlsdGVyBQNuaWwAABSvEg==",
    "height": 2840129,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: ABPXjrStzEi51Mrz7qzYY2CmB7bKH4vByXRifoDuVHFm
Next: DY7kFPgenPBm6NTja7yP47kAZhog3jqW9kaFkLStVhid

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

Old	New		Differences
291	291		}
292	292
293	293
	294	+
	295	+	@Callable(i)
	296	+	func check () = [IntegerEntry("list size filterList", getIntegerValue("list size filterList")), StringEntry("filter", getStringValue("filter"))]
	297	+
	298	+

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

github/deemru/w8io/169f3d6 
120.83 ms ◑