tx · 79AkM7aG2TTzEYn4BgsCpnofnNo7MA9A7tpUC3Tz6JRF

3MyXFjhxofZUKbHj3p8TUgZwDEPNzq7YNo3:  -0.01000000 Waves

2023.07.24 16:31 [2680006] smart account 3MyXFjhxofZUKbHj3p8TUgZwDEPNzq7YNo3 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "79AkM7aG2TTzEYn4BgsCpnofnNo7MA9A7tpUC3Tz6JRF",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1690205498045,
    "version": 2,
    "chainId": 84,
    "sender": "3MyXFjhxofZUKbHj3p8TUgZwDEPNzq7YNo3",
    "senderPublicKey": "GMSDsb2uuChLYT3PeuzaUNyxyxCVWUKaV6Y5dP7xWxUV",
    "proofs": [
        "4DfjdTgDwqXQF9khkCgccjHP4Bp6jdPLM4Q1RWwFUwfcFrsTDjte7v2fK2kGjXEnfzHhi8WyiiJcSmggfwo62Wk3"
    ],
    "script": "base64:BgIMCAISAwoBBBIDCgEIKgAMY29udHJhY3RGaWxlAg5sMm1wX3N3YXAucmlkZQADU0VQAgJfXwAGc2NhbGU4AIDC1y8AB3NjYWxlMTgAgICQu7rWrfANABJBRERSRVNTX0JZVEVTX1NJWkUAGgANQkxPQ0tTX0lOX0RBWQCgCwEHd3JhcEVycgEDbXNnCQCsAgIJAKwCAgUMY29udHJhY3RGaWxlAgI6IAUDbXNnAQh0aHJvd0VycgEDbXNnCQACAQkBB3dyYXBFcnIBBQNtc2cADGtleUFzc2V0SW5JZAkAuQkCCQDMCAICAiVzCQDMCAICCWFzc2V0SW5JZAUDbmlsBQNTRVAADWtleUFzc2V0T3V0SWQJALkJAgkAzAgCAgIlcwkAzAgCAgphc3NldE91dElkBQNuaWwFA1NFUAAQa2V5QXNzZXRPdXRQcmljZQkAuQkCCQDMCAICAiVzCQDMCAICDWFzc2V0T3V0UHJpY2UFA25pbAUDU0VQABFrZXlTdGFraW5nQWRkcmVzcwkAuQkCCQDMCAICAiVzCQDMCAICDnN0YWtpbmdBZGRyZXNzBQNuaWwFA1NFUAAPa2V5U3RhdHNUb3RhbEluCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgVzdGF0cwkAzAgCAgd0b3RhbEluBQNuaWwFA1NFUAAQa2V5U3RhdHNUb3RhbE91dAkAuQkCCQDMCAICBCVzJXMJAMwIAgIFc3RhdHMJAMwIAgIIdG90YWxPdXQFA25pbAUDU0VQARhrZXlTdGF0c1RvdGFsSW5CeUFkZHJlc3MBB2FkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIFc3RhdHMJAMwIAgIHdG90YWxJbgkAzAgCCQClCAEFB2FkZHJlc3MFA25pbAUDU0VQARlrZXlTdGF0c1RvdGFsT3V0QnlBZGRyZXNzAQdhZGRyZXNzCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICBXN0YXRzCQDMCAICCHRvdGFsT3V0CQDMCAIJAKUIAQUHYWRkcmVzcwUDbmlsBQNTRVABCmtleUhpc3RvcnkCB2FkZHJlc3MEdHhJZAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgdoaXN0b3J5CQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCCQDYBAEFBHR4SWQFA25pbAUDU0VQAQ1mb3JtYXRIaXN0b3J5AwhhbW91bnRJbglhbW91bnRPdXQFc3Rha2UJALkJAgkAzAgCAgYlZCVkJWQJAMwIAgkApAMBBQhhbW91bnRJbgkAzAgCCQCkAwEFCWFtb3VudE91dAkAzAgCCQClAwEFBXN0YWtlBQNuaWwFA1NFUAAJYXNzZXRJbklkCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQxrZXlBc3NldEluSWQJAQd3cmFwRXJyAQIRaW52YWxpZCBhc3NldEluSWQAC2Fzc2V0SW5JbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUJYXNzZXRJbklkCQEHd3JhcEVycgECE2ludmFsaWQgYXNzZXRJbkluZm8ACmFzc2V0T3V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFDWtleUFzc2V0T3V0SWQJAQd3cmFwRXJyAQIRaW52YWxpZCBhc3NldEluSWQADGFzc2V0T3V0SW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFCmFzc2V0T3V0SWQJAQd3cmFwRXJyAQIUaW52YWxpZCBhc3NldE91dEluZm8ADWFzc2V0T3V0UHJpY2UJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzBRBrZXlBc3NldE91dFByaWNlCQEHd3JhcEVycgECFWludmFsaWQgYXNzZXRPdXRQcmljZQAUc3Rha2luZ0FkZHJlc3NPcHRpb24EByRtYXRjaDAJAJ0IAgUEdGhpcwURa2V5U3Rha2luZ0FkZHJlc3MDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAA5zdGFraW5nQWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRRzdGFraW5nQWRkcmVzc09wdGlvbgkBB3dyYXBFcnIBAhZpbnZhbGlkIHN0YWtpbmdBZGRyZXNzAA9BRE1JTl9MSVNUX1NJWkUABQAGUVVPUlVNAAMAEVRYSURfQllURVNfTEVOR1RIACABGGtleUFsbG93ZWRUeElkVm90ZVByZWZpeAEEdHhJZAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAglhbGxvd1R4SWQJAMwIAgUEdHhJZAUDbmlsBQNTRVABEGtleUZ1bGxBZG1pblZvdGUCBnByZWZpeAxhZG1pbkFkZHJlc3MJALkJAgkAzAgCBQZwcmVmaXgJAMwIAgUMYWRtaW5BZGRyZXNzBQNuaWwFA1NFUAETa2V5QWRtaW5BZGRyZXNzTGlzdAAJALkJAgkAzAgCAgIlcwkAzAgCAhBhZG1pbkFkZHJlc3NMaXN0BQNuaWwFA1NFUAEOa2V5QWxsb3dlZFR4SWQACQC5CQIJAMwIAgICJXMJAMwIAgIEdHhJZAUDbmlsBQNTRVABDGdldEFkbWluVm90ZQIGcHJlZml4BWFkbWluBAd2b3RlS2V5CQEQa2V5RnVsbEFkbWluVm90ZQIFBnByZWZpeAUFYWRtaW4JAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdm90ZUtleQAAAQ1nZXRBZG1pbnNMaXN0AAQHJG1hdGNoMAkAnQgCBQR0aGlzCQETa2V5QWRtaW5BZGRyZXNzTGlzdAADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQC1CQIFAXMFA1NFUAUDbmlsAQ1pc0luQWRtaW5MaXN0AQdhZGRyZXNzCQEPY29udGFpbnNFbGVtZW50AgkBDWdldEFkbWluc0xpc3QABQdhZGRyZXNzARJnZW5Wb3Rlc0tleXNIZWxwZXICAWEMYWRtaW5BZGRyZXNzBAskdDAzMDIyMzA0NgUBYQQGcmVzdWx0CAULJHQwMzAyMjMwNDYCXzEEBnByZWZpeAgFCyR0MDMwMjIzMDQ2Al8yCQCUCgIJAM0IAgUGcmVzdWx0CQEQa2V5RnVsbEFkbWluVm90ZQIFBnByZWZpeAUMYWRtaW5BZGRyZXNzBQZwcmVmaXgBDGdlblZvdGVzS2V5cwEJa2V5UHJlZml4BAlhZG1pbkxpc3QJARNrZXlBZG1pbkFkZHJlc3NMaXN0AAQLJHQwMzE5MzMyNzcKAAIkbAkBDWdldEFkbWluc0xpc3QACgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFCWtleVByZWZpeAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQESZ2VuVm90ZXNLZXlzSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQQGcmVzdWx0CAULJHQwMzE5MzMyNzcCXzEEBnByZWZpeAgFCyR0MDMxOTMzMjc3Al8yBQZyZXN1bHQBEGNvdW50Vm90ZXNIZWxwZXICBnJlc3VsdAd2b3RlS2V5CQBkAgUGcmVzdWx0CQELdmFsdWVPckVsc2UCCQCfCAEFB3ZvdGVLZXkAAAEKY291bnRWb3RlcwEGcHJlZml4BAV2b3RlcwkBDGdlblZvdGVzS2V5cwEFBnByZWZpeAoAAiRsBQV2b3RlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEQY291bnRWb3Rlc0hlbHBlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUBEGNsZWFyVm90ZXNIZWxwZXICBnJlc3VsdANrZXkJAM0IAgUGcmVzdWx0CQELRGVsZXRlRW50cnkBBQNrZXkBE2dldENsZWFyVm90ZUVudHJpZXMBBnByZWZpeAQFdm90ZXMJAQxnZW5Wb3Rlc0tleXMBBQZwcmVmaXgKAAIkbAUFdm90ZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEGNsZWFyVm90ZXNIZWxwZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAQx2b3RlSU5URVJOQUwEE2NhbGxlckFkZHJlc3NTdHJpbmcJa2V5UHJlZml4CG1pblZvdGVzCnZvdGVSZXN1bHQEB3ZvdGVLZXkJARBrZXlGdWxsQWRtaW5Wb3RlAgUJa2V5UHJlZml4BRNjYWxsZXJBZGRyZXNzU3RyaW5nBBBhZG1pbkN1cnJlbnRWb3RlCQEMZ2V0QWRtaW5Wb3RlAgUJa2V5UHJlZml4BRNjYWxsZXJBZGRyZXNzU3RyaW5nBANlcnIDCQEBIQEJAQ1pc0luQWRtaW5MaXN0AQUTY2FsbGVyQWRkcmVzc1N0cmluZwkBCHRocm93RXJyAQkArAICCQCsAgICCUFkZHJlc3M6IAUTY2FsbGVyQWRkcmVzc1N0cmluZwISIG5vdCBpbiBBZG1pbiBsaXN0AwkAAAIFEGFkbWluQ3VycmVudFZvdGUAAQkBCHRocm93RXJyAQkArAICBQd2b3RlS2V5AhIgeW91IGFscmVhZHkgdm90ZWQFBHVuaXQDCQAAAgUDZXJyBQNlcnIEBXZvdGVzCQEKY291bnRWb3RlcwEFCWtleVByZWZpeAMJAGcCCQBkAgUFdm90ZXMAAQUIbWluVm90ZXMEEGNsZWFyVm90ZUVudHJpZXMJARNnZXRDbGVhclZvdGVFbnRyaWVzAQUJa2V5UHJlZml4CQDOCAIFEGNsZWFyVm90ZUVudHJpZXMFCnZvdGVSZXN1bHQJAMwIAgkBDEludGVnZXJFbnRyeQIFB3ZvdGVLZXkAAQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAgFpAQRzd2FwAQVzdGFrZQQLdXNlckFkZHJlc3MIBQFpBmNhbGxlcgQTcGF5bWVudFNpemVFeHBlY3RlZAABAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwUTcGF5bWVudFNpemVFeHBlY3RlZAkBCHRocm93RXJyAQIQaW52YWxpZCBwYXltZW50cwQHcGF5bWVudAkAkQMCCAUBaQhwYXltZW50cwAAAwkBAiE9AggFB3BheW1lbnQHYXNzZXRJZAUJYXNzZXRJbklkCQEIdGhyb3dFcnIBAhdpbnZhbGlkIHBheW1lbnQgYXNzZXRJZAMJAAACBQ1hc3NldE91dFByaWNlAAAJAQh0aHJvd0VycgECFWludmFsaWQgYXNzZXRPdXRQcmljZQQNYXNzZXRJbkFtb3VudAgFB3BheW1lbnQGYW1vdW50BA5hc3NldE91dEFtb3VudAkAawMFDWFzc2V0SW5BbW91bnQFBnNjYWxlOAUNYXNzZXRPdXRQcmljZQMJAAACBQ5hc3NldE91dEFtb3VudAAACQEIdGhyb3dFcnIBAhZpbnZhbGlkIGFzc2V0T3V0QW1vdW50BAhzdGFrZUludgMFBXN0YWtlCQD8BwQFDnN0YWtpbmdBZGRyZXNzAghzdGFrZUZvcgkAzAgCCQClCAEFC3VzZXJBZGRyZXNzBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCmFzc2V0T3V0SWQFDmFzc2V0T3V0QW1vdW50BQNuaWwFBHVuaXQDCQAAAgUIc3Rha2VJbnYFCHN0YWtlSW52CQCUCgIJAM4IAgkAzAgCCQEEQnVybgIFCWFzc2V0SW5JZAUNYXNzZXRJbkFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUPa2V5U3RhdHNUb3RhbEluCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQ9rZXlTdGF0c1RvdGFsSW4AAAUNYXNzZXRJbkFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUQa2V5U3RhdHNUb3RhbE91dAkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUQa2V5U3RhdHNUb3RhbE91dAAABQ5hc3NldE91dEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGGtleVN0YXRzVG90YWxJbkJ5QWRkcmVzcwEFC3VzZXJBZGRyZXNzCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQEYa2V5U3RhdHNUb3RhbEluQnlBZGRyZXNzAQULdXNlckFkZHJlc3MAAAUNYXNzZXRJbkFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGWtleVN0YXRzVG90YWxPdXRCeUFkZHJlc3MBBQt1c2VyQWRkcmVzcwkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBGWtleVN0YXRzVG90YWxPdXRCeUFkZHJlc3MBBQt1c2VyQWRkcmVzcwAABQ5hc3NldE91dEFtb3VudAkAzAgCCQELU3RyaW5nRW50cnkCCQEKa2V5SGlzdG9yeQIFC3VzZXJBZGRyZXNzCAUBaQ10cmFuc2FjdGlvbklkCQENZm9ybWF0SGlzdG9yeQMFDWFzc2V0SW5BbW91bnQFDmFzc2V0T3V0QW1vdW50BQVzdGFrZQUDbmlsAwUFc3Rha2UFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUOYXNzZXRPdXRBbW91bnQFCmFzc2V0T3V0SWQFA25pbAUOYXNzZXRPdXRBbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQELdm90ZUZvclR4SWQBBHR4SWQEE2NhbGxlckFkZHJlc3NTdHJpbmcJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQJa2V5UHJlZml4CQEYa2V5QWxsb3dlZFR4SWRWb3RlUHJlZml4AQUEdHhJZAQGcmVzdWx0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlBbGxvd2VkVHhJZAAFBHR4SWQFA25pbAQRYWxsb3dlZFR4SWRPcHRpb24JAJ0IAgUEdGhpcwkBDmtleUFsbG93ZWRUeElkAAQDZXJyCQDMCAIDCQAAAgkAyAEBCQDZBAEFBHR4SWQFEVRYSURfQllURVNfTEVOR1RIBgkBCHRocm93RXJyAQkArAICBQR0eElkAhIgaXMgbm90IHZhbGlkIHR4SWQJAMwIAgMDCQAAAgURYWxsb3dlZFR4SWRPcHRpb24FBHVuaXQGCQECIT0CCQEFdmFsdWUBBRFhbGxvd2VkVHhJZE9wdGlvbgUEdHhJZAYJAQh0aHJvd0VycgEJAKwCAgUEdHhJZAITIGlzIGFscmVhZHkgYWxsb3dlZAUDbmlsAwkAAAIFA2VycgUDZXJyCQEMdm90ZUlOVEVSTkFMBAUTY2FsbGVyQWRkcmVzc1N0cmluZwUJa2V5UHJlZml4BQZRVU9SVU0FBnJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAECGJ5QWRtaW5zCQAAAggFAnR4AmlkCQDZBAEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleUFsbG93ZWRUeElkAAIABAdieU93bmVyAwkAZwIJAJADAQkBDWdldEFkbWluc0xpc3QABQZRVU9SVU0HCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5AwUIYnlBZG1pbnMGBQdieU93bmVygjbsQQ==",
    "height": 2680006,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: HSjeiAp3BCHdYTNDypzBxkBmBgbPxoYGe53b9uZmR7e5

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let contractFile = "l2mp_swap.ride"
5+
6+let SEP = "__"
7+
8+let scale8 = 100000000
9+
10+let scale18 = 1000000000000000000
11+
12+let ADDRESS_BYTES_SIZE = 26
13+
14+let BLOCKS_IN_DAY = 1440
15+
16+func wrapErr (msg) = ((contractFile + ": ") + msg)
17+
18+
19+func throwErr (msg) = throw(wrapErr(msg))
20+
21+
22+let keyAssetInId = makeString(["%s", "assetInId"], SEP)
23+
24+let keyAssetOutId = makeString(["%s", "assetOutId"], SEP)
25+
26+let keyAssetOutPrice = makeString(["%s", "assetOutPrice"], SEP)
27+
28+let keyStakingAddress = makeString(["%s", "stakingAddress"], SEP)
29+
30+let keyStatsTotalIn = makeString(["%s%s", "stats", "totalIn"], SEP)
31+
32+let keyStatsTotalOut = makeString(["%s%s", "stats", "totalOut"], SEP)
33+
34+func keyStatsTotalInByAddress (address) = makeString(["%s%s%s", "stats", "totalIn", toString(address)], SEP)
35+
36+
37+func keyStatsTotalOutByAddress (address) = makeString(["%s%s%s", "stats", "totalOut", toString(address)], SEP)
38+
39+
40+func keyHistory (address,txId) = makeString(["%s%s%s", "history", toString(address), toBase58String(txId)], SEP)
41+
42+
43+func formatHistory (amountIn,amountOut,stake) = makeString(["%d%d%d", toString(amountIn), toString(amountOut), toString(stake)], SEP)
44+
45+
46+let assetInId = fromBase58String(valueOrErrorMessage(getString(this, keyAssetInId), wrapErr("invalid assetInId")))
47+
48+let assetInInfo = valueOrErrorMessage(assetInfo(assetInId), wrapErr("invalid assetInInfo"))
49+
50+let assetOutId = fromBase58String(valueOrErrorMessage(getString(this, keyAssetOutId), wrapErr("invalid assetInId")))
51+
52+let assetOutInfo = valueOrErrorMessage(assetInfo(assetOutId), wrapErr("invalid assetOutInfo"))
53+
54+let assetOutPrice = valueOrErrorMessage(getInteger(this, keyAssetOutPrice), wrapErr("invalid assetOutPrice"))
55+
56+let stakingAddressOption = match getString(this, keyStakingAddress) {
57+    case s: String => 
58+        addressFromString(s)
59+    case _: Unit => 
60+        unit
61+    case _ => 
62+        throw("Match error")
63+}
64+
65+let stakingAddress = valueOrErrorMessage(stakingAddressOption, wrapErr("invalid stakingAddress"))
66+
67+let ADMIN_LIST_SIZE = 5
68+
69+let QUORUM = 3
70+
71+let TXID_BYTES_LENGTH = 32
72+
73+func keyAllowedTxIdVotePrefix (txId) = makeString(["%s%s%s", "allowTxId", txId], SEP)
74+
75+
76+func keyFullAdminVote (prefix,adminAddress) = makeString([prefix, adminAddress], SEP)
77+
78+
79+func keyAdminAddressList () = makeString(["%s", "adminAddressList"], SEP)
80+
81+
82+func keyAllowedTxId () = makeString(["%s", "txId"], SEP)
83+
84+
85+func getAdminVote (prefix,admin) = {
86+    let voteKey = keyFullAdminVote(prefix, admin)
87+    valueOrElse(getInteger(voteKey), 0)
88+    }
89+
90+
91+func getAdminsList () = match getString(this, keyAdminAddressList()) {
92+    case s: String => 
93+        split(s, SEP)
94+    case _ => 
95+        nil
96+}
97+
98+
99+func isInAdminList (address) = containsElement(getAdminsList(), address)
100+
101+
102+func genVotesKeysHelper (a,adminAddress) = {
103+    let $t030223046 = a
104+    let result = $t030223046._1
105+    let prefix = $t030223046._2
106+    $Tuple2((result :+ keyFullAdminVote(prefix, adminAddress)), prefix)
107+    }
108+
109+
110+func genVotesKeys (keyPrefix) = {
111+    let adminList = keyAdminAddressList()
112+    let $t031933277 = {
113+        let $l = getAdminsList()
114+        let $s = size($l)
115+        let $acc0 = $Tuple2(nil, keyPrefix)
116+        func $f0_1 ($a,$i) =         if (($i >= $s))
117+            then $a
118+            else genVotesKeysHelper($a, $l[$i])
119+
120+        func $f0_2 ($a,$i) =         if (($i >= $s))
121+            then $a
122+            else throw("List size exceeds 5")
123+
124+        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
125+        }
126+    let result = $t031933277._1
127+    let prefix = $t031933277._2
128+    result
129+    }
130+
131+
132+func countVotesHelper (result,voteKey) = (result + valueOrElse(getInteger(voteKey), 0))
133+
134+
135+func countVotes (prefix) = {
136+    let votes = genVotesKeys(prefix)
137+    let $l = votes
138+    let $s = size($l)
139+    let $acc0 = 0
140+    func $f0_1 ($a,$i) =     if (($i >= $s))
141+        then $a
142+        else countVotesHelper($a, $l[$i])
143+
144+    func $f0_2 ($a,$i) =     if (($i >= $s))
145+        then $a
146+        else throw("List size exceeds 5")
147+
148+    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
149+    }
150+
151+
152+func clearVotesHelper (result,key) = (result :+ DeleteEntry(key))
153+
154+
155+func getClearVoteEntries (prefix) = {
156+    let votes = genVotesKeys(prefix)
157+    let $l = votes
158+    let $s = size($l)
159+    let $acc0 = nil
160+    func $f0_1 ($a,$i) =     if (($i >= $s))
161+        then $a
162+        else clearVotesHelper($a, $l[$i])
163+
164+    func $f0_2 ($a,$i) =     if (($i >= $s))
165+        then $a
166+        else throw("List size exceeds 5")
167+
168+    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
169+    }
170+
171+
172+func voteINTERNAL (callerAddressString,keyPrefix,minVotes,voteResult) = {
173+    let voteKey = keyFullAdminVote(keyPrefix, callerAddressString)
174+    let adminCurrentVote = getAdminVote(keyPrefix, callerAddressString)
175+    let err = if (!(isInAdminList(callerAddressString)))
176+        then throwErr((("Address: " + callerAddressString) + " not in Admin list"))
177+        else if ((adminCurrentVote == 1))
178+            then throwErr((voteKey + " you already voted"))
179+            else unit
180+    if ((err == err))
181+        then {
182+            let votes = countVotes(keyPrefix)
183+            if (((votes + 1) >= minVotes))
184+                then {
185+                    let clearVoteEntries = getClearVoteEntries(keyPrefix)
186+                    (clearVoteEntries ++ voteResult)
187+                    }
188+                else [IntegerEntry(voteKey, 1)]
189+            }
190+        else throw("Strict value is not equal to itself.")
191+    }
192+
193+
194+@Callable(i)
195+func swap (stake) = {
196+    let userAddress = i.caller
197+    let paymentSizeExpected = 1
198+    if ((size(i.payments) != paymentSizeExpected))
199+        then throwErr("invalid payments")
200+        else {
201+            let payment = i.payments[0]
202+            if ((payment.assetId != assetInId))
203+                then throwErr("invalid payment assetId")
204+                else if ((assetOutPrice == 0))
205+                    then throwErr("invalid assetOutPrice")
206+                    else {
207+                        let assetInAmount = payment.amount
208+                        let assetOutAmount = fraction(assetInAmount, scale8, assetOutPrice)
209+                        if ((assetOutAmount == 0))
210+                            then throwErr("invalid assetOutAmount")
211+                            else {
212+                                let stakeInv = if (stake)
213+                                    then invoke(stakingAddress, "stakeFor", [toString(userAddress)], [AttachedPayment(assetOutId, assetOutAmount)])
214+                                    else unit
215+                                if ((stakeInv == stakeInv))
216+                                    then $Tuple2(([Burn(assetInId, assetInAmount), IntegerEntry(keyStatsTotalIn, (valueOrElse(getInteger(this, keyStatsTotalIn), 0) + assetInAmount)), IntegerEntry(keyStatsTotalOut, (valueOrElse(getInteger(this, keyStatsTotalOut), 0) + assetOutAmount)), IntegerEntry(keyStatsTotalInByAddress(userAddress), (valueOrElse(getInteger(this, keyStatsTotalInByAddress(userAddress)), 0) + assetInAmount)), IntegerEntry(keyStatsTotalOutByAddress(userAddress), (valueOrElse(getInteger(this, keyStatsTotalOutByAddress(userAddress)), 0) + assetOutAmount)), StringEntry(keyHistory(userAddress, i.transactionId), formatHistory(assetInAmount, assetOutAmount, stake))] ++ (if (stake)
217+                                        then nil
218+                                        else [ScriptTransfer(userAddress, assetOutAmount, assetOutId)])), assetOutAmount)
219+                                    else throw("Strict value is not equal to itself.")
220+                                }
221+                        }
222+            }
223+    }
224+
225+
226+
227+@Callable(i)
228+func voteForTxId (txId) = {
229+    let callerAddressString = toBase58String(i.caller.bytes)
230+    let keyPrefix = keyAllowedTxIdVotePrefix(txId)
231+    let result = [StringEntry(keyAllowedTxId(), txId)]
232+    let allowedTxIdOption = getString(this, keyAllowedTxId())
233+    let err = [if ((size(fromBase58String(txId)) == TXID_BYTES_LENGTH))
234+        then true
235+        else throwErr((txId + " is not valid txId")), if (if ((allowedTxIdOption == unit))
236+        then true
237+        else (value(allowedTxIdOption) != txId))
238+        then true
239+        else throwErr((txId + " is already allowed"))]
240+    if ((err == err))
241+        then voteINTERNAL(callerAddressString, keyPrefix, QUORUM, result)
242+        else throw("Strict value is not equal to itself.")
243+    }
244+
245+
246+@Verifier(tx)
247+func verify () = {
248+    let byAdmins = (tx.id == fromBase58String(valueOrElse(getString(this, keyAllowedTxId()), "")))
249+    let byOwner = if ((size(getAdminsList()) >= QUORUM))
250+        then false
251+        else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
252+    if (byAdmins)
253+        then true
254+        else byOwner
255+    }
256+
github/deemru/w8io/c3f4982 
22.97 ms ◑