w8 · tx · DZV···fCd

tx · DZVDTYDyH4tFV86YeESgmpT5tdHQ6w4NDhiYc5ynzfCd

3MJDCbxHyJQ1kMLWo13vqjYTRZadeXNfkQz:  -0.05500000 Waves

2025.08.16 23:35 [68626] smart account 3MJDCbxHyJQ1kMLWo13vqjYTRZadeXNfkQz > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DZVDTYDyH4tFV86YeESgmpT5tdHQ6w4NDhiYc5ynzfCd",
    "fee": 5500000,
    "feeAssetId": null,
    "timestamp": 1755376578252,
    "version": 2,
    "chainId": 82,
    "sender": "3MJDCbxHyJQ1kMLWo13vqjYTRZadeXNfkQz",
    "senderPublicKey": "4s7DV2Mb9oasVBTUBRXZKvgUncSxKaJYa5MiJFgZbjH9",
    "proofs": [
        "3ttUTjdiPqumJHj3s125cfCQPECwd5NnSYSzWGESXDpmLVoAp114UAgBED7BZd1nMB4TPG9ZdXaZMAxs9rcKRkzS"
    ],
    "script": "base64:BgI5CAISAwoBCBIDCgEIEgMKAQgSABIDCgEIEgMKAQgSBAoCCAQSBAoCCAgSBAoCCAQSBAoCCAQSABIACgAHVkVSU0lPTgIOUkFOR0VIVUItMi4zLjAAEXNodXRkb3duQWRkcmVzc2VzCQDMCAICIzNQTUtBTDRjZDc3b25rWXV1VTM1MTE1V292MXNMTUVjRnN2CQDMCAICIzNQOXhYODQ5WUpYZzdDODd2ODJjRHlEeTVWaEtpUEpwSG84BQNuaWwADUtfZ2xvYmFsUG9vbHMCDGdsb2JhbF9wb29scwASS19yYW5nZWRQb29sc0NvdW50AhByYW5nZWRQb29sc0NvdW50AAtLX3JhbmdlUG9vbAIKcmFuZ2VQb29sXwAIS19hZG1pbnMCC3NodXRkb3duZXJzAQZyZW1vdmUCAmxpA3ZhbAoBB2hhbmRsZXICBWFjY3VtBG5leHQDCQAAAgUEbmV4dAUDdmFsBQVhY2N1bQkAzggCBQVhY2N1bQkAzAgCBQRuZXh0BQNuaWwKAAIkbAUCbGkKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkAQtnZXRFbnRyeUtleQEEdHlwZQMJAAACBQR0eXBlAgVyYW5nZQIRZ2xvYmFsX2VtcHR5UG9vbHMDCQAAAgUEdHlwZQIzc3Rha2VyX0FQNENiNXhMWUdINlppZ0hyZUNaSG9YcFFUV0RrUHNHMkJIcWZEVXg2dGFKAkBnbG9iYWxfZW1wdHlTdGFrZXJzX0FQNENiNXhMWUdINlppZ0hyZUNaSG9YcFFUV0RrUHNHMkJIcWZEVXg2dGFKAhNnbG9iYWxfZW1wdHlVbmtub3duAQlfaXNSYW5nZWQBB2FkZHJlc3MJAQIhPQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkArAICBQtLX3JhbmdlUG9vbAUHYWRkcmVzcwIAAgABE2lzX3ZhbGlkX3NodXRkb3duZXIBA2FkcgQFYWRyTGkJAQV2YWx1ZQEJALwJAgkBC3ZhbHVlT3JFbHNlAgkAoggBAgtzaHV0ZG93bmVycwIAAgEsBAJvawkBAiE9AgkAzwgCBQVhZHJMaQkApQgBBQNhZHIFBHVuaXQFAm9rDAFpARB1c2VFbXB0eUNvbnRyYWN0AQR0eXBlBAhlbnRyeUtleQkBC2dldEVudHJ5S2V5AQUEdHlwZQQLY29udHJhY3RzTGkJAQV2YWx1ZQEJALwJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQhlbnRyeUtleQIAAgEsBA1lbXB0eUNvbnRyYWN0CQELdmFsdWVPckVsc2UCCQCRAwIFC2NvbnRyYWN0c0xpAAACAAQNbmV3Q29udGFjdHNMaQMJAAACBQ1lbXB0eUNvbnRyYWN0AgAFC2NvbnRyYWN0c0xpCQEGcmVtb3ZlAgULY29udHJhY3RzTGkFDWVtcHR5Q29udHJhY3QJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQhlbnRyeUtleQkAuQkCBQ1uZXdDb250YWN0c0xpAgEsBQNuaWwFDWVtcHR5Q29udHJhY3QBaQEHYWRkUG9vbAEHYWRkcmVzcwMJAAACCAUBaQZjYWxsZXIFBHRoaXMEBWFkZHJlCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzBAhudW1Qb29scwkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJLX3JhbmdlZFBvb2xzQ291bnQAAAMJAQlfaXNSYW5nZWQBBQdhZGRyZXNzBQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQtLX3JhbmdlUG9vbAUHYWRkcmVzcwUHYWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgUSS19yYW5nZWRQb29sc0NvdW50CQBkAgUIbnVtUG9vbHMAAQUDbmlsCQACAQIJbm8gYWNjZXNzAWkBCnJlbW92ZVBvb2wBB2FkZHJlc3MDCQAAAggFAWkGY2FsbGVyBQR0aGlzBAhudW1Qb29scwkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJLX3JhbmdlZFBvb2xzQ291bnQAAAMJAQEhAQkBCV9pc1JhbmdlZAEFB2FkZHJlc3MFA25pbAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFC0tfcmFuZ2VQb29sBQdhZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJLX3JhbmdlZFBvb2xzQ291bnQJAGUCBQhudW1Qb29scwABBQNuaWwJAAIBAglubyBhY2Nlc3MBaQELYWRkU2VsZlBvb2wABAlzY3JpcHRTdHIJANgEAQkBBXZhbHVlAQkA8QcBCAUBaQZjYWxsZXIDCQELdmFsdWVPckVsc2UCCQCgCAEJAKwCAgIPYXBwcm92ZWRTY3JpcHRfBQlzY3JpcHRTdHIHBANpbnYJAPwHBAUEdGhpcwIHYWRkUG9vbAkAzAgCCQClCAEIBQFpBmNhbGxlcgUDbmlsBQNuaWwDCQAAAgUDaW52BQNpbnYFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECHGFjY291bnQgc2NyaXB0IGlzIG5vdCBsaXN0ZWQBaQENYWRkU2h1dGRvd25lcgEHYWRkcmVzcwMJAAACCAUBaQZjYWxsZXIFBHRoaXMEBWFkZHJlCQERQGV4dHJOYXRpdmUoMTA2MikBBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIFCEtfYWRtaW5zCQCsAgIJAKwCAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQhLX2FkbWlucwIABQdhZGRyZXNzAgEsBQNuaWwJAAIBAglubyBhY2Nlc3MBaQEQcmVtb3ZlU2h1dGRvd25lcgEHYWRkcmVzcwMJAAACCAUBaQZjYWxsZXIFBHRoaXMEDnNodXRkb3duZXJzU3RyCQELdmFsdWVPckVsc2UCCQCiCAEFCEtfYWRtaW5zAgAEC3NodXRkb3duZXJzCQC1CQIFDnNodXRkb3duZXJzU3RyAgEsBA5uZXdTaHV0ZG93bmVycwkBBnJlbW92ZQIFC3NodXRkb3duZXJzBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIFCEtfYWRtaW5zCQC6CQIFDm5ld1NodXRkb3duZXJzAgEsBQNuaWwJAAIBAglubyBhY2Nlc3MBaQEPd2hpdGVsaXN0U2NyaXB0AglzY3JpcHRTdHIDdmFsAwkBAiE9AgkAzwgCBRFzaHV0ZG93bkFkZHJlc3NlcwkApQgBCAUBaQZjYWxsZXIFBHVuaXQJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgIPYXBwcm92ZWRTY3JpcHRfBQlzY3JpcHRTdHIFA3ZhbAUDbmlsCQACAQIJbm8gYWNjZXNzAWkBEGFkZEVtcHR5Q29udHJhY3QCB2FkZHJlc3MEdHlwZQQIZW50cnlLZXkJAQtnZXRFbnRyeUtleQEFBHR5cGUDCQAAAggFAWkGY2FsbGVyBQR0aGlzCQDMCAIJAQtTdHJpbmdFbnRyeQIFCGVudHJ5S2V5CQCsAgIJAKwCAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQhlbnRyeUtleQIABQdhZGRyZXNzAgEsBQNuaWwJAAIBAglubyBhY2Nlc3MBaQEPc2h1dGRvd25Bc3NldEluAghhc3NldFN0cgN2YWwDCQECIT0CCQDPCAIFEXNodXRkb3duQWRkcmVzc2VzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICAhJnbG9iYWxfc2h1dGRvd25Jbl8FCGFzc2V0U3RyBQN2YWwFA25pbAkAAgECCW5vIGFjY2VzcwFpARBzaHV0ZG93bkFzc2V0T3V0Aghhc3NldFN0cgN2YWwDCQECIT0CCQDPCAIFEXNodXRkb3duQWRkcmVzc2VzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICAhNnbG9iYWxfc2h1dGRvd25PdXRfBQhhc3NldFN0cgUDdmFsBQNuaWwJAAIBAglubyBhY2Nlc3MBaQERZXhwb3J0U2h1dGRvd25lcnMACgEDYWRkAgNhY2MHYWRkcmVzcwMDCQECIT0CBQdhZGRyZXNzAgAJAQIhPQIJAKYIAQUHYWRkcmVzcwUEdW5pdAcJAKwCAgkArAICBQNhY2MFB2FkZHJlc3MCASwFA2FjYwQGcmVzdWx0CgACJGwFEXNodXRkb3duQWRkcmVzc2VzCgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNhZGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQDMCAIJAQtTdHJpbmdFbnRyeQIFCEtfYWRtaW5zBQZyZXN1bHQFA25pbAFpAQtleHBvcnRQb29scwAKAQNhZGQCA2FjYwdhZGRyZXNzAwMJAQIhPQIFB2FkZHJlc3MCAAkBAiE9AgkApggBBQdhZGRyZXNzBQR1bml0BwkAzggCBQNhY2MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQtLX3JhbmdlUG9vbAUHYWRkcmVzcwUHYWRkcmVzcwUDbmlsBQNhY2MDCQELdmFsdWVPckVsc2UCCQCgCAECDXBvb2xzRXhwb3J0ZWQHBAxjdXJyZW50UG9vbHMJAL0JAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQ1LX2dsb2JhbFBvb2xzAgACASwEBnJlc3VsdAoAAiRsBQxjdXJyZW50UG9vbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA2FkZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAM4IAgUGcmVzdWx0CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJLX3JhbmdlZFBvb2xzQ291bnQJAJADAQUMY3VycmVudFBvb2xzCQDMCAIJAQxCb29sZWFuRW50cnkCAg1wb29sc0V4cG9ydGVkBgUDbmlsBQNuaWwAPftEoA==",
    "height": 68626,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6xEbsroTW5en9So5joj7QuaHmRfRAQMkwaN16Srhboro
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 = ["3PMKAL4cd77onkYuuU35115Wov1sLMEcFsv", "3P9xX849YJXg7C87v82cDyDy5VhKiPJpHo8"]
7 7  
8 8  let K_globalPools = "global_pools"
9 9  
10 10  let K_rangedPoolsCount = "rangedPoolsCount"
11 11  
12 12  let K_rangePool = "rangePool_"
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 is_valid_shutdowner (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          let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
71 71          if (_isRanged(address))
72 72              then nil
73 73              else [StringEntry((K_rangePool + address), address), IntegerEntry(K_rangedPoolsCount, (numPools + 1))]
74 74          }
75 75      else throw("no access")
76 76  
77 77  
78 78  
79 79  @Callable(i)
80 80  func removePool (address) = if ((i.caller == this))
81 81      then {
82 82          let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
83 83          if (!(_isRanged(address)))
84 84              then nil
85 85              else [DeleteEntry((K_rangePool + address)), IntegerEntry(K_rangedPoolsCount, (numPools - 1))]
86 86          }
87 87      else throw("no access")
88 88  
89 89  
90 90  
91 91  @Callable(i)
92 92  func addSelfPool () = {
93 93      let scriptStr = toBase58String(value(scriptHash(i.caller)))
94 94      if (valueOrElse(getBoolean(("approvedScript_" + scriptStr)), false))
95 95          then {
96 96              let inv = invoke(this, "addPool", [toString(i.caller)], nil)
97 97              if ((inv == inv))
98 98                  then nil
99 99                  else throw("Strict value is not equal to itself.")
100 100              }
101 101          else throw("account script is not listed")
102 102      }
103 103  
104 104  
105 105  
106 106  @Callable(i)
107 107  func addShutdowner (address) = if ((i.caller == this))
108 108      then {
109 109          let addre = addressFromStringValue(address)
110 110  [StringEntry(K_admins, ((valueOrElse(getString(K_admins), "") + address) + ","))]
111 111          }
112 112      else throw("no access")
113 113  
114 114  
115 115  
116 116  @Callable(i)
117 117  func removeShutdowner (address) = if ((i.caller == this))
118 118      then {
119 119          let shutdownersStr = valueOrElse(getString(K_admins), "")
120 120          let shutdowners = split(shutdownersStr, ",")
121 121          let newShutdowners = remove(shutdowners, address)
122 122  [StringEntry(K_admins, makeString_2C(newShutdowners, ","))]
123 123          }
124 124      else throw("no access")
125 125  
126 126  
127 127  
128 128  @Callable(i)
129 129  func whitelistScript (scriptStr,val) = if ((indexOf(shutdownAddresses, toString(i.caller)) != unit))
130 130      then [BooleanEntry(("approvedScript_" + scriptStr), val)]
131 131      else throw("no access")
132 132  
133 133  
134 134  
135 135  @Callable(i)
136 136  func addEmptyContract (address,type) = {
137 137      let entryKey = getEntryKey(type)
138 138      if ((i.caller == this))
139 139          then [StringEntry(entryKey, ((valueOrElse(getString(entryKey), "") + address) + ","))]
140 140          else throw("no access")
141 141      }
142 142  
143 143  
144 144  
145 145  @Callable(i)
146 146  func shutdownAssetIn (assetStr,val) = if ((indexOf(shutdownAddresses, toString(i.caller)) != unit))
147 147      then [BooleanEntry(("global_shutdownIn_" + assetStr), val)]
148 148      else throw("no access")
149 149  
150 150  
151 151  
152 152  @Callable(i)
153 153  func shutdownAssetOut (assetStr,val) = if ((indexOf(shutdownAddresses, toString(i.caller)) != unit))
154 154      then [BooleanEntry(("global_shutdownOut_" + assetStr), val)]
155 155      else throw("no access")
156 156  
157 157  
158 158  
159 159  @Callable(i)
160 160  func exportShutdowners () = {
161 161      func add (acc,address) =     if (if ((address != ""))
162 162          then (addressFromString(address) != unit)
163 163          else false)
164 164          then ((acc + address) + ",")
165 165          else acc
166 166  
167 167      let result = {
168 168          let $l = shutdownAddresses
169 169          let $s = size($l)
170 170          let $acc0 = ""
171 171          func $f0_1 ($a,$i) =         if (($i >= $s))
172 172              then $a
173 173              else add($a, $l[$i])
174 174  
175 175          func $f0_2 ($a,$i) =         if (($i >= $s))
176 176              then $a
177 177              else throw("List size exceeds 100")
178 178  
179 179          $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)
180 180          }
181 181  [StringEntry(K_admins, result)]
182 182      }
183 183  
184 184  
185 185  
186 186  @Callable(i)
187 187  func exportPools () = {
188 188      func add (acc,address) =     if (if ((address != ""))
189 189          then (addressFromString(address) != unit)
190 190          else false)
191 191          then (acc ++ [StringEntry((K_rangePool + address), address)])
192 192          else acc
193 193  
194 194      if (valueOrElse(getBoolean("poolsExported"), false))
195 195          then {
196 196              let currentPools = split_51C(valueOrElse(getString(K_globalPools), ""), ",")
197 197              let result = {
198 198                  let $l = currentPools
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 add($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 100")
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($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)
210 210                  }
211 211              (result ++ [IntegerEntry(K_rangedPoolsCount, size(currentPools)), BooleanEntry("poolsExported", true)])
212 212              }
213 213          else nil
214 214      }
215 215  
216 216

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 = ["3PMKAL4cd77onkYuuU35115Wov1sLMEcFsv", "3P9xX849YJXg7C87v82cDyDy5VhKiPJpHo8"]
7	7
8	8	let K_globalPools = "global_pools"
9	9
10	10	let K_rangedPoolsCount = "rangedPoolsCount"
11	11
12	12	let K_rangePool = "rangePool_"
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 is_valid_shutdowner (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	let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
71	71	if (_isRanged(address))
72	72	then nil
73	73	else [StringEntry((K_rangePool + address), address), IntegerEntry(K_rangedPoolsCount, (numPools + 1))]
74	74	}
75	75	else throw("no access")
76	76
77	77
78	78
79	79	@Callable(i)
80	80	func removePool (address) = if ((i.caller == this))
81	81	then {
82	82	let numPools = valueOrElse(getInteger(K_rangedPoolsCount), 0)
83	83	if (!(_isRanged(address)))
84	84	then nil
85	85	else [DeleteEntry((K_rangePool + address)), IntegerEntry(K_rangedPoolsCount, (numPools - 1))]
86	86	}
87	87	else throw("no access")
88	88
89	89
90	90
91	91	@Callable(i)
92	92	func addSelfPool () = {
93	93	let scriptStr = toBase58String(value(scriptHash(i.caller)))
94	94	if (valueOrElse(getBoolean(("approvedScript_" + scriptStr)), false))
95	95	then {
96	96	let inv = invoke(this, "addPool", [toString(i.caller)], nil)
97	97	if ((inv == inv))
98	98	then nil
99	99	else throw("Strict value is not equal to itself.")
100	100	}
101	101	else throw("account script is not listed")
102	102	}
103	103
104	104
105	105
106	106	@Callable(i)
107	107	func addShutdowner (address) = if ((i.caller == this))
108	108	then {
109	109	let addre = addressFromStringValue(address)
110	110	[StringEntry(K_admins, ((valueOrElse(getString(K_admins), "") + address) + ","))]
111	111	}
112	112	else throw("no access")
113	113
114	114
115	115
116	116	@Callable(i)
117	117	func removeShutdowner (address) = if ((i.caller == this))
118	118	then {
119	119	let shutdownersStr = valueOrElse(getString(K_admins), "")
120	120	let shutdowners = split(shutdownersStr, ",")
121	121	let newShutdowners = remove(shutdowners, address)
122	122	[StringEntry(K_admins, makeString_2C(newShutdowners, ","))]
123	123	}
124	124	else throw("no access")
125	125
126	126
127	127
128	128	@Callable(i)
129	129	func whitelistScript (scriptStr,val) = if ((indexOf(shutdownAddresses, toString(i.caller)) != unit))
130	130	then [BooleanEntry(("approvedScript_" + scriptStr), val)]
131	131	else throw("no access")
132	132
133	133
134	134
135	135	@Callable(i)
136	136	func addEmptyContract (address,type) = {
137	137	let entryKey = getEntryKey(type)
138	138	if ((i.caller == this))
139	139	then [StringEntry(entryKey, ((valueOrElse(getString(entryKey), "") + address) + ","))]
140	140	else throw("no access")
141	141	}
142	142
143	143
144	144
145	145	@Callable(i)
146	146	func shutdownAssetIn (assetStr,val) = if ((indexOf(shutdownAddresses, toString(i.caller)) != unit))
147	147	then [BooleanEntry(("global_shutdownIn_" + assetStr), val)]
148	148	else throw("no access")
149	149
150	150
151	151
152	152	@Callable(i)
153	153	func shutdownAssetOut (assetStr,val) = if ((indexOf(shutdownAddresses, toString(i.caller)) != unit))
154	154	then [BooleanEntry(("global_shutdownOut_" + assetStr), val)]
155	155	else throw("no access")
156	156
157	157
158	158
159	159	@Callable(i)
160	160	func exportShutdowners () = {
161	161	func add (acc,address) = if (if ((address != ""))
162	162	then (addressFromString(address) != unit)
163	163	else false)
164	164	then ((acc + address) + ",")
165	165	else acc
166	166
167	167	let result = {
168	168	let $l = shutdownAddresses
169	169	let $s = size($l)
170	170	let $acc0 = ""
171	171	func $f0_1 ($a,$i) = if (($i >= $s))
172	172	then $a
173	173	else add($a, $l[$i])
174	174
175	175	func $f0_2 ($a,$i) = if (($i >= $s))
176	176	then $a
177	177	else throw("List size exceeds 100")
178	178
179	179	$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)
180	180	}
181	181	[StringEntry(K_admins, result)]
182	182	}
183	183
184	184
185	185
186	186	@Callable(i)
187	187	func exportPools () = {
188	188	func add (acc,address) = if (if ((address != ""))
189	189	then (addressFromString(address) != unit)
190	190	else false)
191	191	then (acc ++ [StringEntry((K_rangePool + address), address)])
192	192	else acc
193	193
194	194	if (valueOrElse(getBoolean("poolsExported"), false))
195	195	then {
196	196	let currentPools = split_51C(valueOrElse(getString(K_globalPools), ""), ",")
197	197	let result = {
198	198	let $l = currentPools
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 add($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 100")
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($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)
210	210	}
211	211	(result ++ [IntegerEntry(K_rangedPoolsCount, size(currentPools)), BooleanEntry("poolsExported", true)])
212	212	}
213	213	else nil
214	214	}
215	215
216	216

github/deemru/w8io
54.21 ms ◑