w8 · tx · GpG···4Zb

tx · GpGTtvCwy8Cw9qNThd2ppHgKmjc5oacx5QZoqkbfi4Zb

3ML3UDSVhKo4xtgVhX9KdhWwUJbKC9zwBG6:  -0.05500000 Waves

2025.08.17 17:07 [74771] smart account 3ML3UDSVhKo4xtgVhX9KdhWwUJbKC9zwBG6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GpGTtvCwy8Cw9qNThd2ppHgKmjc5oacx5QZoqkbfi4Zb",
    "fee": 5500000,
    "feeAssetId": null,
    "timestamp": 1755439634758,
    "version": 2,
    "chainId": 82,
    "sender": "3ML3UDSVhKo4xtgVhX9KdhWwUJbKC9zwBG6",
    "senderPublicKey": "3qCwYH8ynDptZNx8AbdvsVeihQwpjJRimu2pnLZXP5uo",
    "proofs": [
        "gBPgpJ4arBgWamVGXg3L4wcoWak7qTQrJHhYe2tK8VZUd5Vinmi6D5VnT8jCViYmmwew9HzscnBY27DSLpYosMz"
    ],
    "script": "base64:BgI5CAISAwoBCBIDCgEIEgASAwoBCBIDCgEIEgQKAggEEgQKAggIEgQKAggEEgQKAggEEgMKAQgSABIACgAHVkVSU0lPTgIOUkFOR0VIVUItMi4zLjAAEXNodXRkb3duQWRkcmVzc2VzCQDMCAICIzNNOThNdWJyd2hvdUJ6RlZmTXNORUdYR3NzYTdpcnF6Z0NHCQDMCAICIzNNSkRDYnhIeUpRMWtNTFdvMTN2cWpZVFJaYWRlWE5ma1F6BQNuaWwADUtfZ2xvYmFsUG9vbHMCDGdsb2JhbF9wb29scwASS19yYW5nZWRQb29sc0NvdW50AhByYW5nZWRQb29sc0NvdW50AAtLX3JhbmdlUG9vbAIGcmFuZ2VfAAhLX2FkbWlucwILc2h1dGRvd25lcnMBBnJlbW92ZQICbGkDdmFsCgEHaGFuZGxlcgIFYWNjdW0EbmV4dAMJAAACBQRuZXh0BQN2YWwFBWFjY3VtCQDOCAIFBWFjY3VtCQDMCAIFBG5leHQFA25pbAoAAiRsBQJsaQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHaGFuZGxlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQBC2dldEVudHJ5S2V5AQR0eXBlAwkAAAIFBHR5cGUCBXJhbmdlAhFnbG9iYWxfZW1wdHlQb29scwMJAAACBQR0eXBlAjNzdGFrZXJfQVA0Q2I1eExZR0g2WmlnSHJlQ1pIb1hwUVRXRGtQc0cyQkhxZkRVeDZ0YUoCQGdsb2JhbF9lbXB0eVN0YWtlcnNfQVA0Q2I1eExZR0g2WmlnSHJlQ1pIb1hwUVRXRGtQc0cyQkhxZkRVeDZ0YUoCE2dsb2JhbF9lbXB0eVVua25vd24BCGlzUmFuZ2VkAQdhZGRyZXNzCQECIT0CCQELdmFsdWVPckVsc2UCCQCiCAEJAKwCAgULS19yYW5nZVBvb2wFB2FkZHJlc3MCAAIAARFpc1ZhbGlkU2h1dGRvd25lcgEDYWRyBAVhZHJMaQkBBXZhbHVlAQkAvAkCCQELdmFsdWVPckVsc2UCCQCiCAECC3NodXRkb3duZXJzAgACASwEAm9rCQECIT0CCQDPCAIFBWFkckxpCQClCAEFA2FkcgUEdW5pdAUCb2sMAWkBEHVzZUVtcHR5Q29udHJhY3QBBHR5cGUECGVudHJ5S2V5CQELZ2V0RW50cnlLZXkBBQR0eXBlBAtjb250cmFjdHNMaQkBBXZhbHVlAQkAvAkCCQELdmFsdWVPckVsc2UCCQCiCAEFCGVudHJ5S2V5AgACASwEDWVtcHR5Q29udHJhY3QJAQt2YWx1ZU9yRWxzZQIJAJEDAgULY29udHJhY3RzTGkAAAIABA1uZXdDb250YWN0c0xpAwkAAAIFDWVtcHR5Q29udHJhY3QCAAULY29udHJhY3RzTGkJAQZyZW1vdmUCBQtjb250cmFjdHNMaQUNZW1wdHlDb250cmFjdAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFCGVudHJ5S2V5CQC5CQIFDW5ld0NvbnRhY3RzTGkCASwFA25pbAUNZW1wdHlDb250cmFjdAFpAQdhZGRQb29sAQdhZGRyZXNzAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwQFYWRkcmUJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MDCQAAAgUFYWRkcmUFBWFkZHJlBAhudW1Qb29scwkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJLX3JhbmdlZFBvb2xzQ291bnQAAAMJAQhpc1JhbmdlZAEFB2FkZHJlc3MFA25pbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFC0tfcmFuZ2VQb29sBQdhZGRyZXNzBQdhZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJLX3JhbmdlZFBvb2xzQ291bnQJAGQCBQhudW1Qb29scwABBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAglubyBhY2Nlc3MBaQELYWRkU2VsZlBvb2wABAlzY3JpcHRTdHIJANgEAQkBBXZhbHVlAQkA8QcBCAUBaQZjYWxsZXIDCQELdmFsdWVPckVsc2UCCQCgCAEJAKwCAgIPYXBwcm92ZWRTY3JpcHRfBQlzY3JpcHRTdHIHBANpbnYJAPwHBAUEdGhpcwIHYWRkUG9vbAkAzAgCCQClCAEIBQFpBmNhbGxlcgUDbmlsBQNuaWwDCQAAAgUDaW52BQNpbnYFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECHGFjY291bnQgc2NyaXB0IGlzIG5vdCBsaXN0ZWQBaQENYWRkU2h1dGRvd25lcgEHYWRkcmVzcwMJAAACCAUBaQZjYWxsZXIFBHRoaXMEBWFkZHJlCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzAwkAAAIFBWFkZHJlBQVhZGRyZQkAzAgCCQELU3RyaW5nRW50cnkCBQhLX2FkbWlucwkArAICCQCsAgIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUIS19hZG1pbnMCAAUHYWRkcmVzcwIBLAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIJbm8gYWNjZXNzAWkBEHJlbW92ZVNodXRkb3duZXIBB2FkZHJlc3MDCQAAAggFAWkGY2FsbGVyBQR0aGlzBA5zaHV0ZG93bmVyc1N0cgkBC3ZhbHVlT3JFbHNlAgkAoggBBQhLX2FkbWlucwIABAtzaHV0ZG93bmVycwkAtQkCBQ5zaHV0ZG93bmVyc1N0cgIBLAQObmV3U2h1dGRvd25lcnMJAQZyZW1vdmUCBQtzaHV0ZG93bmVycwUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCBQhLX2FkbWlucwkAugkCBQ5uZXdTaHV0ZG93bmVycwIBLAUDbmlsCQACAQIJbm8gYWNjZXNzAWkBD3doaXRlbGlzdFNjcmlwdAIJc2NyaXB0U3RyA3ZhbAMJAAACCQERaXNWYWxpZFNodXRkb3duZXIBCAUBaQZjYWxsZXIGCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgICD2FwcHJvdmVkU2NyaXB0XwUJc2NyaXB0U3RyBQN2YWwFA25pbAkAAgECCW5vIGFjY2VzcwFpARBhZGRFbXB0eUNvbnRyYWN0AgdhZGRyZXNzBHR5cGUECGVudHJ5S2V5CQELZ2V0RW50cnlLZXkBBQR0eXBlAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwkAzAgCCQELU3RyaW5nRW50cnkCBQhlbnRyeUtleQkArAICCQCsAgIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUIZW50cnlLZXkCAAUHYWRkcmVzcwIBLAUDbmlsCQACAQIJbm8gYWNjZXNzAWkBD3NodXRkb3duQXNzZXRJbgIIYXNzZXRTdHIDdmFsAwkAAAIJARFpc1ZhbGlkU2h1dGRvd25lcgEIBQFpBmNhbGxlcgYJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgISZ2xvYmFsX3NodXRkb3duSW5fBQhhc3NldFN0cgUDdmFsBQNuaWwJAAIBAglubyBhY2Nlc3MBaQEQc2h1dGRvd25Bc3NldE91dAIIYXNzZXRTdHIDdmFsAwkAAAIJARFpc1ZhbGlkU2h1dGRvd25lcgEIBQFpBmNhbGxlcgYJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgITZ2xvYmFsX3NodXRkb3duT3V0XwUIYXNzZXRTdHIFA3ZhbAUDbmlsCQACAQIJbm8gYWNjZXNzAWkBCnJlbW92ZVBvb2wBB2FkZHJlc3MDCQAAAggFAWkGY2FsbGVyBQR0aGlzBAhudW1Qb29scwkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJLX3JhbmdlZFBvb2xzQ291bnQAAAMJAQEhAQkBCGlzUmFuZ2VkAQUHYWRkcmVzcwUDbmlsCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgULS19yYW5nZVBvb2wFB2FkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIFEktfcmFuZ2VkUG9vbHNDb3VudAkAZQIFCG51bVBvb2xzAAEFA25pbAkAAgECCW5vIGFjY2VzcwFpARFleHBvcnRTaHV0ZG93bmVycwAKAQNhZGQCA2FjYwdhZGRyZXNzAwMJAQIhPQIFB2FkZHJlc3MCAAkBAiE9AgkApggBBQdhZGRyZXNzBQR1bml0BwkArAICCQCsAgIFA2FjYwUHYWRkcmVzcwIBLAUDYWNjBAZyZXN1bHQKAAIkbAURc2h1dGRvd25BZGRyZXNzZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA2FkZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAMwIAgkBC1N0cmluZ0VudHJ5AgUIS19hZG1pbnMFBnJlc3VsdAUDbmlsAWkBC2V4cG9ydFBvb2xzAAoBA2FkZAIDYWNjB2FkZHJlc3MDAwkBAiE9AgUHYWRkcmVzcwIACQECIT0CCQCmCAEFB2FkZHJlc3MFBHVuaXQHCQDOCAIFA2FjYwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFC0tfcmFuZ2VQb29sBQdhZGRyZXNzBQdhZGRyZXNzBQNuaWwFA2FjYwMJAAACCQELdmFsdWVPckVsc2UCCQCgCAECDXBvb2xzRXhwb3J0ZWQHBwQMY3VycmVudFBvb2xzCQC9CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUNS19nbG9iYWxQb29scwIAAgEsBAZyZXN1bHQKAAIkbAUMY3VycmVudFBvb2xzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNhZGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQDOCAIFBnJlc3VsdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSS19yYW5nZWRQb29sc0NvdW50CQCQAwEFBnJlc3VsdAkAzAgCCQEMQm9vbGVhbkVudHJ5AgINcG9vbHNFeHBvcnRlZAYFA25pbAUDbmlsANO1/PI=",
    "height": 74771,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8r1XCntX3y1WwQ7635rvUwikkkeTt7Rd8RFYsPiQU3fP
Next: none

Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let VERSION = "RANGEHUB-2.3.0"
5 5  
6 6  let shutdownAddresses = ["3M98MubrwhouBzFVfMsNEGXGssa7irqzgCG", "3MJDCbxHyJQ1kMLWo13vqjYTRZadeXNfkQz"]
7 7  
8 8  let K_globalPools = "global_pools"
9 9  
10 10  let K_rangedPoolsCount = "rangedPoolsCount"
11 11  
12 12  let K_rangePool = "range_"
13 13  
14 14  let K_admins = "shutdowners"
15 15  
16 16  func remove (li,val) = {
17 17      func handler (accum,next) =     if ((next == val))
18 18          then accum
19 19          else (accum ++ [next])
20 20  
21 21      let $l = li
22 22      let $s = size($l)
23 23      let $acc0 = nil
24 24      func $f0_1 ($a,$i) =     if (($i >= $s))
25 25          then $a
26 26          else handler($a, $l[$i])
27 27  
28 28      func $f0_2 ($a,$i) =     if (($i >= $s))
29 29          then $a
30 30          else throw("List size exceeds 100")
31 31  
32 32      $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)
33 33      }
34 34  
35 35  
36 36  func getEntryKey (type) = if ((type == "range"))
37 37      then "global_emptyPools"
38 38      else if ((type == "staker_AP4Cb5xLYGH6ZigHreCZHoXpQTWDkPsG2BHqfDUx6taJ"))
39 39          then "global_emptyStakers_AP4Cb5xLYGH6ZigHreCZHoXpQTWDkPsG2BHqfDUx6taJ"
40 40          else "global_emptyUnknown"
41 41  
42 42  
43 43  func isRanged (address) = (valueOrElse(getString((K_rangePool + address)), "") != "")
44 44  
45 45  
46 46  func isValidShutdowner (adr) = {
47 47      let adrLi = value(split_4C(valueOrElse(getString("shutdowners"), ""), ","))
48 48      let ok = (indexOf(adrLi, toString(adr)) != unit)
49 49      ok
50 50      }
51 51  
52 52  
53 53  @Callable(i)
54 54  func useEmptyContract (type) = {
55 55      let entryKey = getEntryKey(type)
56 56      let contractsLi = value(split_4C(valueOrElse(getString(entryKey), ""), ","))
57 57      let emptyContract = valueOrElse(contractsLi[0], "")
58 58      let newContactsLi = if ((emptyContract == ""))
59 59          then contractsLi
60 60          else remove(contractsLi, emptyContract)
61 61      $Tuple2([StringEntry(entryKey, makeString(newContactsLi, ","))], emptyContract)
62 62      }
63 63  
64 64  
65 65  
66 66  @Callable(i)
67 67  func addPool (address) = if ((i.caller == this))
68 68      then {
69 69          let addre = addressFromStringValue(address)
70 70          if ((addre == addre))
71 71              then {
72 72                  let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
73 73                  if (isRanged(address))
74 74                      then nil
75 75                      else [StringEntry((K_rangePool + address), address), IntegerEntry(K_rangedPoolsCount, (numPools + 1))]
76 76                  }
77 77              else throw("Strict value is not equal to itself.")
78 78          }
79 79      else throw("no access")
80 80  
81 81  
82 82  
83 83  @Callable(i)
84 84  func addSelfPool () = {
85 85      let scriptStr = toBase58String(value(scriptHash(i.caller)))
86 86      if (valueOrElse(getBoolean(("approvedScript_" + scriptStr)), false))
87 87          then {
88 88              let inv = invoke(this, "addPool", [toString(i.caller)], nil)
89 89              if ((inv == inv))
90 90                  then nil
91 91                  else throw("Strict value is not equal to itself.")
92 92              }
93 93          else throw("account script is not listed")
94 94      }
95 95  
96 96  
97 97  
98 98  @Callable(i)
99 99  func addShutdowner (address) = if ((i.caller == this))
100 100      then {
101 101          let addre = addressFromStringValue(address)
102 102          if ((addre == addre))
103 103              then [StringEntry(K_admins, ((valueOrElse(getString(K_admins), "") + address) + ","))]
104 104              else throw("Strict value is not equal to itself.")
105 105          }
106 106      else throw("no access")
107 107  
108 108  
109 109  
110 110  @Callable(i)
111 111  func removeShutdowner (address) = if ((i.caller == this))
112 112      then {
113 113          let shutdownersStr = valueOrElse(getString(K_admins), "")
114 114          let shutdowners = split(shutdownersStr, ",")
115 115          let newShutdowners = remove(shutdowners, address)
116 116  [StringEntry(K_admins, makeString_2C(newShutdowners, ","))]
117 117          }
118 118      else throw("no access")
119 119  
120 120  
121 121  
122 122  @Callable(i)
123 123  func whitelistScript (scriptStr,val) = if ((isValidShutdowner(i.caller) == true))
124 124      then [BooleanEntry(("approvedScript_" + scriptStr), val)]
125 125      else throw("no access")
126 126  
127 127  
128 128  
129 129  @Callable(i)
130 130  func addEmptyContract (address,type) = {
131 131      let entryKey = getEntryKey(type)
132 132      if ((i.caller == this))
133 133          then [StringEntry(entryKey, ((valueOrElse(getString(entryKey), "") + address) + ","))]
134 134          else throw("no access")
135 135      }
136 136  
137 137  
138 138  
139 139  @Callable(i)
140 140  func shutdownAssetIn (assetStr,val) = if ((isValidShutdowner(i.caller) == true))
141 141      then [BooleanEntry(("global_shutdownIn_" + assetStr), val)]
142 142      else throw("no access")
143 143  
144 144  
145 145  
146 146  @Callable(i)
147 147  func shutdownAssetOut (assetStr,val) = if ((isValidShutdowner(i.caller) == true))
148 148      then [BooleanEntry(("global_shutdownOut_" + assetStr), val)]
149 149      else throw("no access")
150 150  
151 151  
152 152  
153 153  @Callable(i)
154 154  func removePool (address) = if ((i.caller == this))
155 155      then {
156 156          let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
157 157          if (!(isRanged(address)))
158 158              then nil
159 159              else [DeleteEntry((K_rangePool + address)), IntegerEntry(K_rangedPoolsCount, (numPools - 1))]
160 160          }
161 161      else throw("no access")
162 162  
163 163  
164 164  
165 165  @Callable(i)
166 166  func exportShutdowners () = {
167 167      func add (acc,address) =     if (if ((address != ""))
168 168          then (addressFromString(address) != unit)
169 169          else false)
170 170          then ((acc + address) + ",")
171 171          else acc
172 172  
173 173      let result = {
174 174          let $l = shutdownAddresses
175 175          let $s = size($l)
176 176          let $acc0 = ""
177 177          func $f0_1 ($a,$i) =         if (($i >= $s))
178 178              then $a
179 179              else add($a, $l[$i])
180 180  
181 181          func $f0_2 ($a,$i) =         if (($i >= $s))
182 182              then $a
183 183              else throw("List size exceeds 100")
184 184  
185 185          $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)
186 186          }
187 187  [StringEntry(K_admins, result)]
188 188      }
189 189  
190 190  
191 191  
192 192  @Callable(i)
193 193  func exportPools () = {
194 194      func add (acc,address) =     if (if ((address != ""))
195 195          then (addressFromString(address) != unit)
196 196          else false)
197 197          then (acc ++ [StringEntry((K_rangePool + address), address)])
198 198          else acc
199 199  
200 200      if ((valueOrElse(getBoolean("poolsExported"), false) == false))
201 201          then {
202 202              let currentPools = split_51C(valueOrElse(getString(K_globalPools), ""), ",")
203 203              let result = {
204 204                  let $l = currentPools
205 205                  let $s = size($l)
206 206                  let $acc0 = nil
207 207                  func $f0_1 ($a,$i) =                 if (($i >= $s))
208 208                      then $a
209 209                      else add($a, $l[$i])
210 210  
211 211                  func $f0_2 ($a,$i) =                 if (($i >= $s))
212 212                      then $a
213 213                      else throw("List size exceeds 100")
214 214  
215 215                  $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)
216 216                  }
217 217              (result ++ [IntegerEntry(K_rangedPoolsCount, size(result)), BooleanEntry("poolsExported", true)])
218 218              }
219 219          else nil
220 220      }
221 221  
222 222

Old	New	Differences
1	1	{-# STDLIB_VERSION 6 #-}
2	2	{-# SCRIPT_TYPE ACCOUNT #-}
3	3	{-# CONTENT_TYPE DAPP #-}
4	4	let VERSION = "RANGEHUB-2.3.0"
5	5
6	6	let shutdownAddresses = ["3M98MubrwhouBzFVfMsNEGXGssa7irqzgCG", "3MJDCbxHyJQ1kMLWo13vqjYTRZadeXNfkQz"]
7	7
8	8	let K_globalPools = "global_pools"
9	9
10	10	let K_rangedPoolsCount = "rangedPoolsCount"
11	11
12	12	let K_rangePool = "range_"
13	13
14	14	let K_admins = "shutdowners"
15	15
16	16	func remove (li,val) = {
17	17	func handler (accum,next) = if ((next == val))
18	18	then accum
19	19	else (accum ++ [next])
20	20
21	21	let $l = li
22	22	let $s = size($l)
23	23	let $acc0 = nil
24	24	func $f0_1 ($a,$i) = if (($i >= $s))
25	25	then $a
26	26	else handler($a, $l[$i])
27	27
28	28	func $f0_2 ($a,$i) = if (($i >= $s))
29	29	then $a
30	30	else throw("List size exceeds 100")
31	31
32	32	$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)
33	33	}
34	34
35	35
36	36	func getEntryKey (type) = if ((type == "range"))
37	37	then "global_emptyPools"
38	38	else if ((type == "staker_AP4Cb5xLYGH6ZigHreCZHoXpQTWDkPsG2BHqfDUx6taJ"))
39	39	then "global_emptyStakers_AP4Cb5xLYGH6ZigHreCZHoXpQTWDkPsG2BHqfDUx6taJ"
40	40	else "global_emptyUnknown"
41	41
42	42
43	43	func isRanged (address) = (valueOrElse(getString((K_rangePool + address)), "") != "")
44	44
45	45
46	46	func isValidShutdowner (adr) = {
47	47	let adrLi = value(split_4C(valueOrElse(getString("shutdowners"), ""), ","))
48	48	let ok = (indexOf(adrLi, toString(adr)) != unit)
49	49	ok
50	50	}
51	51
52	52
53	53	@Callable(i)
54	54	func useEmptyContract (type) = {
55	55	let entryKey = getEntryKey(type)
56	56	let contractsLi = value(split_4C(valueOrElse(getString(entryKey), ""), ","))
57	57	let emptyContract = valueOrElse(contractsLi[0], "")
58	58	let newContactsLi = if ((emptyContract == ""))
59	59	then contractsLi
60	60	else remove(contractsLi, emptyContract)
61	61	$Tuple2([StringEntry(entryKey, makeString(newContactsLi, ","))], emptyContract)
62	62	}
63	63
64	64
65	65
66	66	@Callable(i)
67	67	func addPool (address) = if ((i.caller == this))
68	68	then {
69	69	let addre = addressFromStringValue(address)
70	70	if ((addre == addre))
71	71	then {
72	72	let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
73	73	if (isRanged(address))
74	74	then nil
75	75	else [StringEntry((K_rangePool + address), address), IntegerEntry(K_rangedPoolsCount, (numPools + 1))]
76	76	}
77	77	else throw("Strict value is not equal to itself.")
78	78	}
79	79	else throw("no access")
80	80
81	81
82	82
83	83	@Callable(i)
84	84	func addSelfPool () = {
85	85	let scriptStr = toBase58String(value(scriptHash(i.caller)))
86	86	if (valueOrElse(getBoolean(("approvedScript_" + scriptStr)), false))
87	87	then {
88	88	let inv = invoke(this, "addPool", [toString(i.caller)], nil)
89	89	if ((inv == inv))
90	90	then nil
91	91	else throw("Strict value is not equal to itself.")
92	92	}
93	93	else throw("account script is not listed")
94	94	}
95	95
96	96
97	97
98	98	@Callable(i)
99	99	func addShutdowner (address) = if ((i.caller == this))
100	100	then {
101	101	let addre = addressFromStringValue(address)
102	102	if ((addre == addre))
103	103	then [StringEntry(K_admins, ((valueOrElse(getString(K_admins), "") + address) + ","))]
104	104	else throw("Strict value is not equal to itself.")
105	105	}
106	106	else throw("no access")
107	107
108	108
109	109
110	110	@Callable(i)
111	111	func removeShutdowner (address) = if ((i.caller == this))
112	112	then {
113	113	let shutdownersStr = valueOrElse(getString(K_admins), "")
114	114	let shutdowners = split(shutdownersStr, ",")
115	115	let newShutdowners = remove(shutdowners, address)
116	116	[StringEntry(K_admins, makeString_2C(newShutdowners, ","))]
117	117	}
118	118	else throw("no access")
119	119
120	120
121	121
122	122	@Callable(i)
123	123	func whitelistScript (scriptStr,val) = if ((isValidShutdowner(i.caller) == true))
124	124	then [BooleanEntry(("approvedScript_" + scriptStr), val)]
125	125	else throw("no access")
126	126
127	127
128	128
129	129	@Callable(i)
130	130	func addEmptyContract (address,type) = {
131	131	let entryKey = getEntryKey(type)
132	132	if ((i.caller == this))
133	133	then [StringEntry(entryKey, ((valueOrElse(getString(entryKey), "") + address) + ","))]
134	134	else throw("no access")
135	135	}
136	136
137	137
138	138
139	139	@Callable(i)
140	140	func shutdownAssetIn (assetStr,val) = if ((isValidShutdowner(i.caller) == true))
141	141	then [BooleanEntry(("global_shutdownIn_" + assetStr), val)]
142	142	else throw("no access")
143	143
144	144
145	145
146	146	@Callable(i)
147	147	func shutdownAssetOut (assetStr,val) = if ((isValidShutdowner(i.caller) == true))
148	148	then [BooleanEntry(("global_shutdownOut_" + assetStr), val)]
149	149	else throw("no access")
150	150
151	151
152	152
153	153	@Callable(i)
154	154	func removePool (address) = if ((i.caller == this))
155	155	then {
156	156	let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
157	157	if (!(isRanged(address)))
158	158	then nil
159	159	else [DeleteEntry((K_rangePool + address)), IntegerEntry(K_rangedPoolsCount, (numPools - 1))]
160	160	}
161	161	else throw("no access")
162	162
163	163
164	164
165	165	@Callable(i)
166	166	func exportShutdowners () = {
167	167	func add (acc,address) = if (if ((address != ""))
168	168	then (addressFromString(address) != unit)
169	169	else false)
170	170	then ((acc + address) + ",")
171	171	else acc
172	172
173	173	let result = {
174	174	let $l = shutdownAddresses
175	175	let $s = size($l)
176	176	let $acc0 = ""
177	177	func $f0_1 ($a,$i) = if (($i >= $s))
178	178	then $a
179	179	else add($a, $l[$i])
180	180
181	181	func $f0_2 ($a,$i) = if (($i >= $s))
182	182	then $a
183	183	else throw("List size exceeds 100")
184	184
185	185	$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)
186	186	}
187	187	[StringEntry(K_admins, result)]
188	188	}
189	189
190	190
191	191
192	192	@Callable(i)
193	193	func exportPools () = {
194	194	func add (acc,address) = if (if ((address != ""))
195	195	then (addressFromString(address) != unit)
196	196	else false)
197	197	then (acc ++ [StringEntry((K_rangePool + address), address)])
198	198	else acc
199	199
200	200	if ((valueOrElse(getBoolean("poolsExported"), false) == false))
201	201	then {
202	202	let currentPools = split_51C(valueOrElse(getString(K_globalPools), ""), ",")
203	203	let result = {
204	204	let $l = currentPools
205	205	let $s = size($l)
206	206	let $acc0 = nil
207	207	func $f0_1 ($a,$i) = if (($i >= $s))
208	208	then $a
209	209	else add($a, $l[$i])
210	210
211	211	func $f0_2 ($a,$i) = if (($i >= $s))
212	212	then $a
213	213	else throw("List size exceeds 100")
214	214
215	215	$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)
216	216	}
217	217	(result ++ [IntegerEntry(K_rangedPoolsCount, size(result)), BooleanEntry("poolsExported", true)])
218	218	}
219	219	else nil
220	220	}
221	221
222	222

github/deemru/w8io
35.40 ms ◑