w8 · tx · 3Lg···ULF

tx · 3LgE7R4w5wEhwTjRbtCKAPTMBiFBrLTSVD9dsXg3nULF

3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi:  -0.02000000 Waves

2023.03.01 18:18 [2471169] smart account 3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3LgE7R4w5wEhwTjRbtCKAPTMBiFBrLTSVD9dsXg3nULF",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1677683925717,
    "version": 2,
    "chainId": 84,
    "sender": "3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi",
    "senderPublicKey": "4qGVXRFATZNzo2RZZ5UYHXojGyJgSRBwtgJcCU8rJe5A",
    "proofs": [
        "2995Fmrx3YJLXS4qYT4x9jsQtngqvA8pLPTVN69cfZgRwtLrzi3MiX5mJQPWr8qMo3vqza5feRGK2TXXjaRPqjm6",
        "wWtuaASW4QxikyGfWVrEDmEgpYuJVpeGkHwu6RZzpSUhiRnvmxRcRngurzNaWaAwwFWaFzttBU9kHkXAagxMzwS",
        "55xp5VfST3Gn76atKtXt4JzULyDeNYMFQvv3wEwG6PQhRj5Zkqa9P9t4ynhiT8zwzxbx2RVPF6A2j9Am1mTuBMMT"
    ],
    "script": "base64:BgI5CAISBQoDCAgBEgMKAQESBwoFAQEBAQESAwoBARIECgIBAhIDCgEBEgASBQoDAQEBEgcKBQEBAQEBdQALcmV2aXNpb25OdW0CAAAJTVVMVFNDQUxFAAgAB1NDQUxFMTYAEAADU0VQAgJfXwAFSEFMRjgAgOHrFwAIRVVMRVJYMTYJALYCAQD0quOekdSkMAAEVFdPWAkAtgIBAAIABU1VTFQ2AMCEPQAGTVVMVFg2CQC2AgEAwIQ9AAVNVUxUOACAwtcvAAZNVUxUWDgJALYCAQCAwtcvAAdNVUxUWDEwCQC2AgEAgMivoCUAB01VTFRYMTYJALYCAQCAgIT+pt7hEQAHV0FWRVNJRAkA2QQBAgVXQVZFUwALa1Jlc3VsdElkeEEAAAAPa1Jlc3VsdElkeFBhdWxCAAEAGWtSZXN1bHRJZHhXUmVzZXJ2ZXNJblVzZG4AAgAQa1Jlc3VsdElkeE11bHRCUgADABNrUmVzdWx0SWR4TXVsdFBvd2VyAAQAG2tSZXN1bHRJZHhNdWx0RXhwSW5Qb3dlclN0cgAFABJrUmVzdWx0SWR4TXVsdEtTdHIABgAPbk1ldHJpY0lkeFByaWNlAAAAG25NZXRyaWNJZHhVc2RuTG9ja2VkQmFsYW5jZQABABxuTWV0cmljSWR4V2F2ZXNMb2NrZWRCYWxhbmNlAAIAEW5NZXRyaWNJZHhSZXNlcnZlAAMAF25NZXRyaWNJZHhSZXNlcnZlSW5Vc2RuAAQAFG5NZXRyaWNJZHhVc2RuU3VwcGx5AAUAEW5NZXRyaWNJZHhTdXJwbHVzAAYAGG5NZXRyaWNJZHhTdXJwbHVzUGVyY2VudAAHAAxuTWV0cmljSWR4QlIACAAUbk1ldHJpY0lkeE5zYnRTdXBwbHkACQAXbk1ldHJpY0lkeE1heE5zYnRTdXBwbHkACgAUbk1ldHJpY0lkeFN1cmZTdXBwbHkACwASbk1ldHJpY1VzZG5Vc2R0UGVnAAwAFm5NZXRyaWNDdXJyZW50UHJpY2VBZGoADQARbk1ldHJpY0Jhc2tldEluZm8ADgESa2V5TmV1dHJpbm9BZGRyZXNzAAIdJXMlc19fY29uZmlnX19uZXV0cmlub0FkZHJlc3MBE2tleVN3YXBBbW91bnRBUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBBUGFyYW0BE2tleVN3YXBBbW91bnRCUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBCUGFyYW0BF2tleVVzZG5Td2FwQW1vdW50QVBhcmFtAAIcJXMlc19fY29uZmlnX191c2RuU3dhcEFQYXJhbQEXa2V5VXNkblN3YXBBbW91bnRCUGFyYW0AAhwlcyVzX19jb25maWdfX3VzZG5Td2FwQlBhcmFtARNrZXlQcmljZUFkak1pbkNvZWZmAAIeJXMlc19fcHJpY2VBZGpfX21pbkNvZWZmaWNpZW50ARdrZXlQcmljZUFkakFyYlJlZ3VsYXRvcgACHCVzJXNfX3ByaWNlQWRqX19hcmJSZWd1bGF0b3IBEmtleU5ldXRyaW5vQXNzZXRJZAACEW5ldXRyaW5vX2Fzc2V0X2lkAQ5rZXlOc2J0QXNzZXRJZAACDWJvbmRfYXNzZXRfaWQBDmtleVN1cmZBc3NldElkAAINc3VyZl9hc3NldF9pZAERc3dhcHNUaW1lZnJhbWVLRVkAAg9zd2Fwc190aW1lZnJhbWUBGmtleVVzZXJMYXN0UXVpY2tTd2FwSGVpZ2h0AQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBCVzJXMJAMwIAgIXdXNlckxhc3RRdWlja1N3YXBIZWlnaHQJAMwIAgULdXNlckFkZHJlc3MFA25pbAUDU0VQAR1rZXlRdWlja1N3YXBVc2VyU3BlbnRJblBlcmlvZAELdXNlckFkZHJlc3MJALkJAgkAzAgCAgQlcyVzCQDMCAICGnF1aWNrU3dhcFVzZXJTcGVudEluUGVyaW9kCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEPYmFza2V0QXNzZXRzS2V5AAIaJXMlc19fY29tbW9uX19iYXNrZXRBc3NldHMBCGtleVByaWNlAAIFcHJpY2UBD2tleVByaWNlQnlBc3NldAEHYXNzZXRJZAkArAICAh4lcyVzJXNfX2NvbW1vbl9fcHJpY2VCeUFzc2V0X18FB2Fzc2V0SWQADVJwZEJhbGFuY2VLZXkCC3JwZF9iYWxhbmNlARFycGRVc2VyQmFsYW5jZUtleQIFb3duZXIHYXNzZXRJZAkAuQkCCQDMCAIFDVJwZEJhbGFuY2VLZXkJAMwIAgUHYXNzZXRJZAkAzAgCBQVvd25lcgUDbmlsAgFfAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAEMZ2V0SW50T3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABDmdldE51bWJlckJ5S2V5AgdhZGRyZXNzA2tleQkBC3ZhbHVlT3JFbHNlAgkAmggCBQdhZGRyZXNzBQNrZXkAAAENZ2V0Qm9vbE9yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmwgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAARZjb252ZXJ0TmV1dHJpbm9Ub1dhdmVzAgZhbW91bnQFcHJpY2UJAGsDBQZhbW91bnQFBU1VTFQ4BQVwcmljZQEWY29udmVydFdhdmVzVG9OZXV0cmlubwIGYW1vdW50BXByaWNlCQBrAwUGYW1vdW50BQVwcmljZQUFTVVMVDgBBXRvWDE2AgdvcmlnVmFsDW9yaWdTY2FsZU11bHQJALwCAwkAtgIBBQdvcmlnVmFsBQdNVUxUWDE2CQC2AgEFDW9yaWdTY2FsZU11bHQBB2Zyb21YMTYCA3ZhbA9yZXN1bHRTY2FsZU11bHQJAKADAQkAvAIDBQN2YWwJALYCAQUPcmVzdWx0U2NhbGVNdWx0BQdNVUxUWDE2AQlhc0FueUxpc3QBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACCUxpc3RbQW55XQQKdmFsQW55THlzdAUHJG1hdGNoMAUKdmFsQW55THlzdAkAAgECG2ZhaWwgdG8gY2FzdCBpbnRvIExpc3RbQW55XQEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCGFzU3RyaW5nAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEBnZhbFN0cgUHJG1hdGNoMAUGdmFsU3RyCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQ1hc1ByaWNlU1RSVUNUAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACFChJbnQsIEludCwgSW50LCBJbnQpBAZzdHJ1Y3QFByRtYXRjaDAFBnN0cnVjdAkAAgECHWZhaWwgdG8gY2FzdCBpbnRvIFByaWNlU1RSVUNUABlJZHhDb250cm9sQ2ZnTmV1dHJpbm9EYXBwAAEAGElkeENvbnRyb2xDZmdBdWN0aW9uRGFwcAACABRJZHhDb250cm9sQ2ZnUnBkRGFwcAADABVJZHhDb250cm9sQ2ZnTWF0aERhcHAABAAcSWR4Q29udHJvbENmZ0xpcXVpZGF0aW9uRGFwcAAFABVJZHhDb250cm9sQ2ZnUmVzdERhcHAABgAdSWR4Q29udHJvbENmZ05vZGVSZWdpc3RyeURhcHAABwAcSWR4Q29udHJvbENmZ05zYnRTdGFraW5nRGFwcAAIABlJZHhDb250cm9sQ2ZnTWVkaWF0b3JEYXBwAAkAHElkeENvbnRyb2xDZmdTdXJmU3Rha2luZ0RhcHAACgAgSWR4Q29udHJvbENmZ0duc2J0Q29udHJvbGxlckRhcHAACwAXSWR4Q29udHJvbENmZ1Jlc3RWMkRhcHAADAAbSWR4Q29udHJvbENmZ0dvdmVybmFuY2VEYXBwAA0AHElkeENvbnRyb2xDZmdQZWdQcm92aWRlckRhcHAADgERa2V5Q29udHJvbEFkZHJlc3MAAhwlcyVzX19jb25maWdfX2NvbnRyb2xBZGRyZXNzAQ1rZXlDb250cm9sQ2ZnAAIRJXNfX2NvbnRyb2xDb25maWcBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQdjb250cm9sCQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQdjb250cm9sCQENa2V5Q29udHJvbENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgpjb250cm9sQ2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUKY29udHJvbENmZwUDaWR4CQCsAgICLUNvbnRyb2wgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgAD2NvbnRyb2xDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQERa2V5Q29udHJvbEFkZHJlc3MAAiMzTjROUzdkNEpvOWE2RjE0TGlGVUtLWVZkVWtrZjJlUDRaeAAKY29udHJvbENmZwkBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQUPY29udHJvbENvbnRyYWN0ABBuZXV0cmlub0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUZSWR4Q29udHJvbENmZ05ldXRyaW5vRGFwcAAPYXVjdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwABNsaXF1aWRhdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUcSWR4Q29udHJvbENmZ0xpcXVpZGF0aW9uRGFwcAATdXNkblN0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFFElkeENvbnRyb2xDZmdScGREYXBwABNwZWdQcm92aWRlckNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUcSWR4Q29udHJvbENmZ1BlZ1Byb3ZpZGVyRGFwcAASbmV1dHJpbm9Bc3NldElkU3RyCQEPZ2V0U3RyaW5nT3JGYWlsAgUQbmV1dHJpbm9Db250cmFjdAkBEmtleU5ldXRyaW5vQXNzZXRJZAAAD25ldXRyaW5vQXNzZXRJZAkA2QQBBRJuZXV0cmlub0Fzc2V0SWRTdHIAC25zYnRBc3NldElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFEG5ldXRyaW5vQ29udHJhY3QJAQ5rZXlOc2J0QXNzZXRJZAAAC3N1cmZBc3NldElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFD2F1Y3Rpb25Db250cmFjdAkBDmtleVN1cmZBc3NldElkAAEQa2V5QmFsYW5jZUxvY2tlZAACDWJhbGFuY2VfbG9ja18BDnRvdGFsTG9ja2VkS0VZAghzd2FwVHlwZQdhc3NldElkCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICC2JhbGFuY2VMb2NrCQDMCAIFCHN3YXBUeXBlCQDMCAIFB2Fzc2V0SWQFA25pbAUDU0VQARVrZXlUb2tlbkxvY2tlZEJhbGFuY2UBB2Fzc2V0SWQJAQ50b3RhbExvY2tlZEtFWQICC291dE5ldXRyaW5vBQdhc3NldElkARhrZXlOZXV0cmlub0xvY2tlZEJhbGFuY2UACQEOdG90YWxMb2NrZWRLRVkCAghvdXRNdWx0aQUSbmV1dHJpbm9Bc3NldElkU3RyARtrZXlPbGROZXV0cmlub0xvY2tlZEJhbGFuY2UACQCsAgIJARBrZXlCYWxhbmNlTG9ja2VkAAIIbmV1dHJpbm8BGGtleU9sZFdhdmVzTG9ja2VkQmFsYW5jZQAJAKwCAgkBEGtleUJhbGFuY2VMb2NrZWQAAgV3YXZlcwEZY2FsY1VzZG5PdXRPZk1hcmtldFN1cHBseQAEFm91dE9mTWFya2V0QWRkcmVzc0xpc3QJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPY29udHJvbENvbnRyYWN0AiUlcyVzX19jb250cm9sX19vdXRPZk1hcmtldEFkZHJlc3NMaXN0AgADCQAAAgUWb3V0T2ZNYXJrZXRBZGRyZXNzTGlzdAIAAAAKAQtiYWxhbmNlc1NVTQIRb3V0T2ZNYXJrZXRTdXBwbHkLbmV4dEFkZHJlc3MJAGQCCQBkAgURb3V0T2ZNYXJrZXRTdXBwbHkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUTdXNkblN0YWtpbmdDb250cmFjdAkBEXJwZFVzZXJCYWxhbmNlS2V5AgULbmV4dEFkZHJlc3MFEm5ldXRyaW5vQXNzZXRJZFN0cgAACQDwBwIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFC25leHRBZGRyZXNzBQ9uZXV0cmlub0Fzc2V0SWQKAAIkbAkAtQkCBRZvdXRPZk1hcmtldEFkZHJlc3NMaXN0BQNTRVAKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC2JhbGFuY2VzU1VNAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA3CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcBEXJlYWRDdXJyZW50QXZnUGVnAAgJAQ1hc1ByaWNlU1RSVUNUAQkA/AcEBRNwZWdQcm92aWRlckNvbnRyYWN0AgVwcmljZQkAzAgCAAQFA25pbAUDbmlsAl8yAQthZGp1c3RQcmljZQIHcHJpY2VYNg11c2RuVXNkdFBlZ1g2BAptaW5Db2VmZlg2CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARNrZXlQcmljZUFkak1pbkNvZWZmAADAzyQEDmFyYlJlZ3VsYXRvclg2CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARdrZXlQcmljZUFkakFyYlJlZ3VsYXRvcgAA8JMJBA9tYXhQcmljZUNvZWZmWDYJAJYDAQkAzAgCBQptaW5Db2VmZlg2CQDMCAIJAGsDCQBkAgUFTVVMVDYFDmFyYlJlZ3VsYXRvclg2BQ11c2RuVXNkdFBlZ1g2BQVNVUxUNgUDbmlsBAxwcmljZUNvZWZmWDYJAJcDAQkAzAgCBQ9tYXhQcmljZUNvZWZmWDYJAMwIAgUFTVVMVDYFA25pbAkAawMFB3ByaWNlWDYFBU1VTFQ2BQxwcmljZUNvZWZmWDYADGN1cnJlbnRQcmljZQkBEUBleHRyTmF0aXZlKDEwNTApAgUPY29udHJvbENvbnRyYWN0CQEIa2V5UHJpY2UAAA11c2RuVXNkdFBlZ1g2CQERcmVhZEN1cnJlbnRBdmdQZWcAAA9jdXJyZW50UHJpY2VBZGoJAQthZGp1c3RQcmljZQIFDGN1cnJlbnRQcmljZQUNdXNkblVzZHRQZWdYNgAVbmV1dHJpbm9Mb2NrZWRCYWxhbmNlCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEba2V5T2xkTmV1dHJpbm9Mb2NrZWRCYWxhbmNlAAAACQELdmFsdWVPckVsc2UCCQCaCAIFEG5ldXRyaW5vQ29udHJhY3QJARhrZXlOZXV0cmlub0xvY2tlZEJhbGFuY2UAAAAAEndhdmVzTG9ja2VkQmFsYW5jZQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUQbmV1dHJpbm9Db250cmFjdAkBGGtleU9sZFdhdmVzTG9ja2VkQmFsYW5jZQAAAAkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEVa2V5VG9rZW5Mb2NrZWRCYWxhbmNlAQIFV0FWRVMAAAEHcmVzZXJ2ZQEHYXNzZXRJZAQLdGVtcEFzc2V0SWQJANkEAQUHYXNzZXRJZAMJAAACBQt0ZW1wQXNzZXRJZAUHV0FWRVNJRAkAZQIICQDvBwEFEG5ldXRyaW5vQ29udHJhY3QHcmVndWxhcgUSd2F2ZXNMb2NrZWRCYWxhbmNlCQBlAgkA8AcCBRBuZXV0cmlub0NvbnRyYWN0BQt0ZW1wQXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEVa2V5VG9rZW5Mb2NrZWRCYWxhbmNlAQUHYXNzZXRJZAAAAQ1yZXNlcnZlc0luVXNkAQdhc3NldElkBAN2b2wJAQdyZXNlcnZlAQUHYXNzZXRJZAQCcHIJAQV2YWx1ZQEJAJoIAgUPY29udHJvbENvbnRyYWN0CQEPa2V5UHJpY2VCeUFzc2V0AQUHYXNzZXRJZAkAawMFA3ZvbAUCcHIFBU1VTFQ4ABluZXV0cmlub091dE9mTWFya2V0U3VwcGx5CQEZY2FsY1VzZG5PdXRPZk1hcmtldFN1cHBseQAAE25ldXRyaW5vVG90YWxTdXBwbHkJAGUCCQBlAgkAZAIFFW5ldXRyaW5vTG9ja2VkQmFsYW5jZQgJAQV2YWx1ZQEJAOwHAQUPbmV1dHJpbm9Bc3NldElkCHF1YW50aXR5CQDwBwIFEG5ldXRyaW5vQ29udHJhY3QFD25ldXRyaW5vQXNzZXRJZAkA8AcCBRNsaXF1aWRhdGlvbkNvbnRyYWN0BQ9uZXV0cmlub0Fzc2V0SWQADm5ldXRyaW5vU3VwcGx5CQBlAgUTbmV1dHJpbm9Ub3RhbFN1cHBseQUZbmV1dHJpbm9PdXRPZk1hcmtldFN1cHBseQEFZ2V0QlIABAZiYXNrZXQJALUJAgkBBXZhbHVlAQkAnQgCBRBuZXV0cmlub0NvbnRyYWN0CQEPYmFza2V0QXNzZXRzS2V5AAUDU0VQCgEFYWRkQnICA2FjYwdhc3NldElkCQBkAgUDYWNjCQENcmVzZXJ2ZXNJblVzZAEFB2Fzc2V0SWQEC3N1bVJlc2VydmVzCgACJGwFBmJhc2tldAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkQnICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAGsDBQtzdW1SZXNlcnZlcwUFTVVMVDYFDm5ldXRyaW5vU3VwcGx5AAJCUgMJAAACBQ5uZXV0cmlub1N1cHBseQAAAAAJAQVnZXRCUgABDWdldEJhc2tldEluZm8ABAxiYXNrZXRBc3NldHMJAQV2YWx1ZQEJAJ0IAgUQbmV1dHJpbm9Db250cmFjdAkBD2Jhc2tldEFzc2V0c0tleQAEBmJhc2tldAkAtQkCBQxiYXNrZXRBc3NldHMFA1NFUAoBCndlaWdodENhbGMCA2FjYwdhc3NldElkBAN2b2wJAQdyZXNlcnZlAQUHYXNzZXRJZAQCcHIJAQV2YWx1ZQEJAJoIAgUPY29udHJvbENvbnRyYWN0CQEPa2V5UHJpY2VCeUFzc2V0AQUHYXNzZXRJZAQEcmVzVQkAawMFA3ZvbAUCcHIFBU1VTFQ4CQCUCgIJAM0IAggFA2FjYwJfMQkAlgoEBQdhc3NldElkBQN2b2wFBHJlc1UFAnByCQBkAggFA2FjYwJfMgUEcmVzVQQBdAoAAiRsBQZiYXNrZXQKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQp3ZWlnaHRDYWxjAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCgEHY29tYmluZQIDYWNjBGl0ZW0EBXNoYXJlAwkAAAIIBQF0Al8yAAAFBU1VTFQ2CQBrAwgFBGl0ZW0CXzMFBU1VTFQ2CAUBdAJfMgkAzQgCBQNhY2MJALkJAgkAzAgCCAUEaXRlbQJfMQkAzAgCCQCkAwEFBXNoYXJlCQDMCAIJAKQDAQgFBGl0ZW0CXzQJAMwIAgkApAMBCAUEaXRlbQJfMgUDbmlsAgE6BA13ZWlnaHRlZFByaWNlAwkAAAIFDm5ldXRyaW5vU3VwcGx5AAAAAAkAawMIBQF0Al8yBQVNVUxUNgUObmV1dHJpbm9TdXBwbHkJAJUKAwkAuQkCCgACJGwIBQF0Al8xCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjb21iaW5lAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAgFfBQ13ZWlnaHRlZFByaWNlCAUBdAJfMgkBaQENY29uc3RydWN0b3JWMQMPbmV1dHJpbm9BZGRyZXNzD25zYnRMb2NrQWRkcmVzcxBzd2FwQW1vdW50QVBhcmFtAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIObm90IGF1dGhvcml6ZWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEmtleU5ldXRyaW5vQWRkcmVzcwAFD25ldXRyaW5vQWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBE2tleVN3YXBBbW91bnRBUGFyYW0ABRBzd2FwQW1vdW50QVBhcmFtBQNuaWwBaQEVY2FsY1N3YXBMaW1pdFJFQURPTkxZAQtnTnNidEFtb3VudAQVbGltaXRCYXNrZXRUb2tlbkluVXNkAwkAZwIAAAULZ05zYnRBbW91bnQAAAQIYVBhcmFtWDgJALYCAQkBDGdldEludE9yRmFpbAIFBHRoaXMJARNrZXlTd2FwQW1vdW50QVBhcmFtAAQJYlBhcmFtWDE2CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQETa2V5U3dhcEFtb3VudEJQYXJhbQAECXBvd1BhcnRYOAkAdgYJALYCAQULZ05zYnRBbW91bnQABgUJYlBhcmFtWDE2ABAACAUHQ0VJTElORwkAoAMBCQC8AgMFCGFQYXJhbVg4BQlwb3dQYXJ0WDgFB01VTFRYMTAECWxpbWl0VXNkbgMJAGcCAAAFC2dOc2J0QW1vdW50AAAECGFQYXJhbVg4CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQEXa2V5VXNkblN3YXBBbW91bnRBUGFyYW0ABAliUGFyYW1YMTYJALYCAQkBDGdldEludE9yRmFpbAIFBHRoaXMJARdrZXlVc2RuU3dhcEFtb3VudEJQYXJhbQAEBGJyWDYJALYCAQUCQlIECXBvd1BhcnRYOAkAdgYJALYCAQULZ05zYnRBbW91bnQABgUJYlBhcmFtWDE2ABAACAUHQ0VJTElORwkAoAMBCQC8AgMJALwCAwUIYVBhcmFtWDgFCXBvd1BhcnRYOAUHTVVMVFgxMAUEYnJYNgUGTVVMVFg2CQCUCgIFA25pbAkAzAgCBRVsaW1pdEJhc2tldFRva2VuSW5Vc2QJAMwIAgAACQDMCAIFCWxpbWl0VXNkbgUDbmlsAWkBEmNhbGN1bGF0ZUtSRUFET05MWQUEd1JhdwR1UmF3BXByaWNlBG1SYXcEc1JhdwQDRVhQCQC2AgEAyfSlAQQIRVhQU0NBTEUABgQBYQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9hdWN0aW9uQ29udHJhY3QCEG5zYnRDdXJ2ZVBhcmFtX2EAAwQFcGF1bEIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPYXVjdGlvbkNvbnRyYWN0AhBuc2J0Q3VydmVQYXJhbV9iCQBpAgkAaAIAAwUFTVVMVDYACgQPd1Jlc2VydmVzSW5Vc2RuCQEWY29udmVydFdhdmVzVG9OZXV0cmlubwIFBHdSYXcFBXByaWNlBAZtdWx0QlIJAGsDBQ93UmVzZXJ2ZXNJblVzZG4FBU1VTFQ4BQR1UmF3AwkAZgIFBm11bHRCUgDQ7/fjJwkAAgEJAKwCAgkArAICAgNCUj0JAKQDAQUGbXVsdEJSAicgPiAxMDY3OC41NjQ4MTYlIHdpbGwgb3ZlcmZsb3cgZXhwb25lbnQECW11bHRQb3dlcgkAaAIFAWEJAGUCBQZtdWx0QlIFBU1VTFQ4BA5tdWx0RXhwSW5Qb3dlcgkAdgYFA0VYUAUIRVhQU0NBTEUJALYCAQUJbXVsdFBvd2VyBQlNVUxUU0NBTEUFB1NDQUxFMTYFBERPV04EBW11bHRLCQC8AgMJALYCAQUFcGF1bEIFDm11bHRFeHBJblBvd2VyBQZNVUxUWDYJAJQKAgUDbmlsCQDMCAIFAWEJAMwIAgUFcGF1bEIJAMwIAgUPd1Jlc2VydmVzSW5Vc2RuCQDMCAIFBm11bHRCUgkAzAgCBQltdWx0UG93ZXIJAMwIAgkApgMBBQ5tdWx0RXhwSW5Qb3dlcgkAzAgCCQCmAwEFBW11bHRLBQNuaWwBaQEVY3VydmVGdW5jdGlvblJFQURPTkxZAQt3YXZlc1BheVJhdwQPbmV1dHJpbm9NZXRyaWNzCQEJYXNBbnlMaXN0AQkA/AcEBQR0aGlzAhpjYWxjTmV1dGlub01ldHJpY3NSRUFET05MWQUDbmlsBQNuaWwEBXByaWNlCQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUPbk1ldHJpY0lkeFByaWNlBAR3UmF3CQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwURbk1ldHJpY0lkeFJlc2VydmUEBHVSYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRRuTWV0cmljSWR4VXNkblN1cHBseQQEc1JhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhOc2J0U3VwcGx5BARtUmF3CQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUXbk1ldHJpY0lkeE1heE5zYnRTdXBwbHkECmtDYWxjQXJyYXkJAQlhc0FueUxpc3QBCQD8BwQFBHRoaXMCEmNhbGN1bGF0ZUtSRUFET05MWQkAzAgCBQR3UmF3CQDMCAIFBHVSYXcJAMwIAgUFcHJpY2UJAMwIAgUEbVJhdwkAzAgCBQRzUmF3BQNuaWwFA25pbAQFbXVsdEsJAKcDAQkBCGFzU3RyaW5nAQkAkQMCBQprQ2FsY0FycmF5BRJrUmVzdWx0SWR4TXVsdEtTdHIEB3VzZG5QYXkJARZjb252ZXJ0V2F2ZXNUb05ldXRyaW5vAgULd2F2ZXNQYXlSYXcFBXByaWNlBBBiaWdNYXhOc2J0U3VwcGx5CQC2AgEFBG1SYXcEDWJpZ05zYnRTdXBwbHkJALYCAQkAZQIFBG1SYXcFBHNSYXcEBXN0ZXAxCQC8AgMJALYCAQUHdXNkblBheQUHTVVMVFgxNgUFbXVsdEsEBXN0ZXAyCQC8AgMFBXN0ZXAxBQ1iaWdOc2J0U3VwcGx5BRBiaWdNYXhOc2J0U3VwcGx5BAVzdGVwMwkAoAMBCQC8AgMFDWJpZ05zYnRTdXBwbHkFEGJpZ01heE5zYnRTdXBwbHkJALcCAgUFc3RlcDIFEGJpZ01heE5zYnRTdXBwbHkEDW5zYnRBbW91bnRSYXcJAGUCCQBlAgUEbVJhdwUEc1JhdwUFc3RlcDMJAJQKAgUDbmlsCQDMCAIFDW5zYnRBbW91bnRSYXcJAMwIAgUHdXNkblBheQkAzAgCBQR3UmF3CQDMCAIFBHVSYXcJAMwIAgUEbVJhdwkAzAgCBQRzUmF3CQDMCAIJAQVhc0ludAEJAJEDAgUKa0NhbGNBcnJheQULa1Jlc3VsdElkeEEJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BQ9rUmVzdWx0SWR4UGF1bEIJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BRlrUmVzdWx0SWR4V1Jlc2VydmVzSW5Vc2RuCQDMCAIFBXByaWNlCQDMCAIJAQVhc0ludAEJAJEDAgUKa0NhbGNBcnJheQUQa1Jlc3VsdElkeE11bHRCUgkAzAgCCQEFYXNJbnQBCQCRAwIFCmtDYWxjQXJyYXkFE2tSZXN1bHRJZHhNdWx0UG93ZXIJAMwIAgkAkQMCBQprQ2FsY0FycmF5BRtrUmVzdWx0SWR4TXVsdEV4cEluUG93ZXJTdHIJAMwIAgkAkQMCBQprQ2FsY0FycmF5BRJrUmVzdWx0SWR4TXVsdEtTdHIJAMwIAgkApgMBBQVzdGVwMQkAzAgCCQCmAwEFBXN0ZXAyCQDMCAIFBXN0ZXAzBQNuaWwBaQEUc3VyZkZ1bmN0aW9uUkVBRE9OTFkCBmFtb3VudAdhc3NldElkAwkAZgIAAAUGYW1vdW50CQACAQIZYW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQFcHJpY2UFDGN1cnJlbnRQcmljZQQIcHJpY2VCaWcJALYCAQUFcHJpY2UECHJlc2VydmVXCQEHcmVzZXJ2ZQECBVdBVkVTBApyZXNlcnZlQmlnCQC2AgEFCHJlc2VydmVXBAZzdXBwbHkFDm5ldXRyaW5vU3VwcGx5BAlzdXBwbHlCaWcJALYCAQUGc3VwcGx5AwkAZwIFAkJSBQVNVUxUNgkAAgEJAKwCAgkArAICAgVCUiA9IAkApAMBBQJCUgIRLCBjYW5ub3QgYnV5IFNVUkYEC21heFdhdmVzUGF5CQBlAgkAawMFBnN1cHBseQUFTVVMVDgFBXByaWNlBQhyZXNlcnZlVwQKbWF4VXNkblBheQkAZQIFBnN1cHBseQkAawMFCHJlc2VydmVXBQVwcmljZQUFTVVMVDgECXVzZUFtb3VudAMJAAACBQdhc3NldElkBQ9uZXV0cmlub0Fzc2V0SWQDCQBmAgUGYW1vdW50BQptYXhVc2RuUGF5BQptYXhVc2RuUGF5BQZhbW91bnQDCQAAAgUHYXNzZXRJZAUHV0FWRVNJRAMJAGYCBQZhbW91bnQFC21heFdhdmVzUGF5BQttYXhXYXZlc1BheQUGYW1vdW50AAAECWFtb3VudEJpZwkAtgIBBQl1c2VBbW91bnQDCQAAAgUHYXNzZXRJZAUPbmV1dHJpbm9Bc3NldElkCQCUCgIFA25pbAkAzAgCCQCgAwEJALwCAwkAvAIDBQlhbW91bnRCaWcFBk1VTFRYOAUIcHJpY2VCaWcJALgCAgUJc3VwcGx5QmlnCQC6AgIFCWFtb3VudEJpZwUEVFdPWAUKcmVzZXJ2ZUJpZwkAzAgCAAAJAMwIAgUJdXNlQW1vdW50CQDMCAIFCHJlc2VydmVXCQDMCAIFBnN1cHBseQkAzAgCBQJCUgkAzAgCBQhyZXNlcnZlVwkAzAgCCQBlAgUGc3VwcGx5BQl1c2VBbW91bnQJAMwIAgkAawMJARZjb252ZXJ0V2F2ZXNUb05ldXRyaW5vAgUIcmVzZXJ2ZVcFBXByaWNlBQVNVUxUNgkAZQIFBnN1cHBseQUJdXNlQW1vdW50CQDMCAIJAGUCBQZhbW91bnQFCXVzZUFtb3VudAkAzAgCBQVwcmljZQUDbmlsAwkAAAIFB2Fzc2V0SWQFB1dBVkVTSUQJAJQKAgUDbmlsCQDMCAIJAKADAQkAvAIDBQlzdXBwbHlCaWcJAHcGCQC8AgMJALcCAgUKcmVzZXJ2ZUJpZwUJYW1vdW50QmlnBQdNVUxUWDE2BQpyZXNlcnZlQmlnABAFCEVVTEVSWDE2ABAAEAUGSEFMRlVQBQdNVUxUWDE2CQDMCAIFCXVzZUFtb3VudAkAzAgCAAAJAMwIAgUIcmVzZXJ2ZVcJAMwIAgUGc3VwcGx5CQDMCAIFAkJSCQDMCAIJAGQCBQhyZXNlcnZlVwUJdXNlQW1vdW50CQDMCAIFBnN1cHBseQkAzAgCCQBrAwkBFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8CCQBkAgUIcmVzZXJ2ZVcFCXVzZUFtb3VudAUFcHJpY2UFBU1VTFQ2BQZzdXBwbHkJAMwIAgkAZQIFBmFtb3VudAUJdXNlQW1vdW50CQDMCAIFBXByaWNlBQNuaWwJAAIBAhFVbnN1cHBvcnRlZCBhc3NldAFpASBjYWxjQ29udHJhY3ROc2J0UHJpY2VTWVNSRUFET05MWQEPbnNidFN1cHBseURFTFRBBA9uZXV0cmlub01ldHJpY3MJAQlhc0FueUxpc3QBCQD8BwQFBHRoaXMCGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZBQNuaWwFA25pbAQFcHJpY2UJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBQ9uTWV0cmljSWR4UHJpY2UEBHdSYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRFuTWV0cmljSWR4UmVzZXJ2ZQQEdVJhdwkAZQIJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRRuTWV0cmljSWR4VXNkblN1cHBseQUPbnNidFN1cHBseURFTFRBBARzUmF3CQBkAgkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhOc2J0U3VwcGx5BQ9uc2J0U3VwcGx5REVMVEEEBG1SYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRduTWV0cmljSWR4TWF4TnNidFN1cHBseQQKa0NhbGNBcnJheQkBCWFzQW55TGlzdAEJAPwHBAUEdGhpcwISY2FsY3VsYXRlS1JFQURPTkxZCQDMCAIFBHdSYXcJAMwIAgUEdVJhdwkAzAgCBQVwcmljZQkAzAgCBQRtUmF3CQDMCAIFBHNSYXcFA25pbAUDbmlsBAhtdWx0S1gxNgkApwMBCQEIYXNTdHJpbmcBCQCRAwIFCmtDYWxjQXJyYXkFEmtSZXN1bHRJZHhNdWx0S1N0cgQMbXVsdFN0ZXAxWDE2CQC8AgMJALYCAQUEbVJhdwUHTVVMVFgxNgkAtgIBCQBlAgUEbVJhdwUEc1JhdwQMbXVsdFN0ZXAyWDE2CQC8AgMFDG11bHRTdGVwMVgxNgUMbXVsdFN0ZXAxWDE2BQdNVUxUWDE2BBVtdWx0TnNidDJ1c2RuUHJpY2VYMTYJALwCAwUIbXVsdEtYMTYFDG11bHRTdGVwMlgxNgUHTVVMVFgxNgQObnNidDJ1c2RuUHJpY2UJAKADAQkAvAIDBRVtdWx0TnNidDJ1c2RuUHJpY2VYMTYJALYCAQUFTVVMVDYFB01VTFRYMTYED25zYnQyd2F2ZXNQcmljZQkAawMFDm5zYnQydXNkblByaWNlBQVNVUxUNgUFcHJpY2UJAJQKAgUDbmlsCQDMCAIFDm5zYnQydXNkblByaWNlCQDMCAIFD25zYnQyd2F2ZXNQcmljZQUDbmlsAWkBGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZAAQNbnNidFN1cHBseU1BWAgJAQV2YWx1ZQEJAOwHAQULbnNidEFzc2V0SWQIcXVhbnRpdHkECm5zYnRTdXBwbHkJAGUCBQ1uc2J0U3VwcGx5TUFYCQDwBwIFD2F1Y3Rpb25Db250cmFjdAULbnNidEFzc2V0SWQECnN1cmZTdXBwbHkICQEFdmFsdWUBCQDsBwEFC3N1cmZBc3NldElkCHF1YW50aXR5BApiYXNrZXRJbmZvCQENZ2V0QmFza2V0SW5mbwAJAJQKAgUDbmlsCQDMCAIFDGN1cnJlbnRQcmljZQkAzAgCBRVuZXV0cmlub0xvY2tlZEJhbGFuY2UJAMwIAgUSd2F2ZXNMb2NrZWRCYWxhbmNlCQDMCAIJAQdyZXNlcnZlAQIFV0FWRVMJAMwIAgkBDXJlc2VydmVzSW5Vc2QBAgVXQVZFUwkAzAgCBQ5uZXV0cmlub1N1cHBseQkAzAgCBRluZXV0cmlub091dE9mTWFya2V0U3VwcGx5CQDMCAIFE25ldXRyaW5vVG90YWxTdXBwbHkJAMwIAgUCQlIJAMwIAgUKbnNidFN1cHBseQkAzAgCBQ1uc2J0U3VwcGx5TUFYCQDMCAIFCnN1cmZTdXBwbHkJAMwIAgUNdXNkblVzZHRQZWdYNgkAzAgCBQ9jdXJyZW50UHJpY2VBZGoJAMwIAggFCmJhc2tldEluZm8CXzEJAMwIAggFCmJhc2tldEluZm8CXzIJAMwIAggFCmJhc2tldEluZm8CXzMFA25pbAFpASFnZXRVbnN0YWtlQ29taXNzaW9uQW1vdW50UkVBRE9OTFkDBmFtb3VudAtzdGFydEhlaWdodAhoYWxmTGlmZQkAlAoCBQNuaWwJAGsDBQZhbW91bnQJAGwGAAIAAAkAawMJAQEtAQkAZQIFBmhlaWdodAULc3RhcnRIZWlnaHQFBU1VTFQ4BQhoYWxmTGlmZQAIAAgFBkhBTEZVUAUFTVVMVDgBaQETbWVyZ2VTdGFrZXNSRUFET05MWQUHYW1vdW50MQdoZWlnaHQxB2Ftb3VudDIHaGVpZ2h0MghoYWxmTGlmZQQBdwkAawMFB2Ftb3VudDIJAGwGAAIAAAkAawMJAGUCBQdoZWlnaHQyBQdoZWlnaHQxBQVNVUxUOAUIaGFsZkxpZmUACAAIBQZIQUxGVVAFBU1VTFQ4BAF2CQBrAwkAZAIFB2Ftb3VudDEFB2Ftb3VudDIFBU1VTFQ4CQBkAgUHYW1vdW50MQUBdwkAlAoCBQNuaWwJAGQCBQdoZWlnaHQxCQBpAgkAZQIFBUhBTEY4CQBoAgUIaGFsZkxpZmUJAG0GBQF2AAgAAgAAAAgFBkhBTEZVUAUFTVVMVDgBAnR4AQZ2ZXJpZnkABBNwdWJLZXlBZG1pbnNMaXN0U3RyCQC5CQIJAMwIAgIsRXh0RUVLMTlubUtqOW1DcG5XeXZFRUpGWUFUTE1jVkVNdm9oaFVIa3lITm0JAMwIAgIsRXY1cHk1RmZCUVg5Y1pwWUtuZlFyVEI0OUJ5ZjhRbXBaV2VEVlJpbTR5VjcJAMwIAgIsRFV1dUxqWHU5OG5Cd1pjN2Zxd0NUanRBM25uUndnVGJrTVNyNVNVMk5tRFIJAMwIAgIsRFV1dUxqWHU5OG5Cd1pjN2Zxd0NUanRBM25uUndnVGJrTVNyNVNVMk5tRFIFA25pbAUDU0VQBBBwdWJLZXlBZG1pbnNMaXN0CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPY29udHJvbENvbnRyYWN0Agwlc19fbXVsdGlzaWcFE3B1YktleUFkbWluc0xpc3RTdHIFA1NFUAQFY291bnQJAGQCCQBkAgkAZAIDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAAAAAEAAAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAEJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAEAAQAAAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAgkA2QQBCQCRAwIFEHB1YktleUFkbWluc0xpc3QAAgABAAADCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwADCQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAADAAIAAAkAZwIFBWNvdW50AAPIiXtE",
    "height": 2471169,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6G2CLdNyFLGjnGEAwZzNXWWqxS8BbkBpYTRctnuYkUFf
Next: oQ7kKpj284T27xovAnJBjUfevnCFzL1KJLA59sr6aK9

Diff: 
Old New Differences
1 - {-# STDLIB_VERSION 5 #-}
1 + {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let revisionNum = ""
216 216  func keyControlCfg () = "%s__controlConfig"
217 217  
218 218  
219 - func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
219 + func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
220 220  
221 221  
222 222  func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
Full: 
Old New Differences
1 - {-# STDLIB_VERSION 5 #-}
1 + {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let revisionNum = ""
5 5  
6 6  let MULTSCALE = 8
7 7  
8 8  let SCALE16 = 16
9 9  
10 10  let SEP = "__"
11 11  
12 12  let HALF8 = 50000000
13 13  
14 14  let EULERX16 = toBigInt(27182818284590452)
15 15  
16 16  let TWOX = toBigInt(2)
17 17  
18 18  let MULT6 = 1000000
19 19  
20 20  let MULTX6 = toBigInt(1000000)
21 21  
22 22  let MULT8 = 100000000
23 23  
24 24  let MULTX8 = toBigInt(100000000)
25 25  
26 26  let MULTX10 = toBigInt(10000000000)
27 27  
28 28  let MULTX16 = toBigInt(10000000000000000)
29 29  
30 30  let WAVESID = fromBase58String("WAVES")
31 31  
32 32  let kResultIdxA = 0
33 33  
34 34  let kResultIdxPaulB = 1
35 35  
36 36  let kResultIdxWReservesInUsdn = 2
37 37  
38 38  let kResultIdxMultBR = 3
39 39  
40 40  let kResultIdxMultPower = 4
41 41  
42 42  let kResultIdxMultExpInPowerStr = 5
43 43  
44 44  let kResultIdxMultKStr = 6
45 45  
46 46  let nMetricIdxPrice = 0
47 47  
48 48  let nMetricIdxUsdnLockedBalance = 1
49 49  
50 50  let nMetricIdxWavesLockedBalance = 2
51 51  
52 52  let nMetricIdxReserve = 3
53 53  
54 54  let nMetricIdxReserveInUsdn = 4
55 55  
56 56  let nMetricIdxUsdnSupply = 5
57 57  
58 58  let nMetricIdxSurplus = 6
59 59  
60 60  let nMetricIdxSurplusPercent = 7
61 61  
62 62  let nMetricIdxBR = 8
63 63  
64 64  let nMetricIdxNsbtSupply = 9
65 65  
66 66  let nMetricIdxMaxNsbtSupply = 10
67 67  
68 68  let nMetricIdxSurfSupply = 11
69 69  
70 70  let nMetricUsdnUsdtPeg = 12
71 71  
72 72  let nMetricCurrentPriceAdj = 13
73 73  
74 74  let nMetricBasketInfo = 14
75 75  
76 76  func keyNeutrinoAddress () = "%s%s__config__neutrinoAddress"
77 77  
78 78  
79 79  func keySwapAmountAParam () = "%s%s__config__swapAParam"
80 80  
81 81  
82 82  func keySwapAmountBParam () = "%s%s__config__swapBParam"
83 83  
84 84  
85 85  func keyUsdnSwapAmountAParam () = "%s%s__config__usdnSwapAParam"
86 86  
87 87  
88 88  func keyUsdnSwapAmountBParam () = "%s%s__config__usdnSwapBParam"
89 89  
90 90  
91 91  func keyPriceAdjMinCoeff () = "%s%s__priceAdj__minCoefficient"
92 92  
93 93  
94 94  func keyPriceAdjArbRegulator () = "%s%s__priceAdj__arbRegulator"
95 95  
96 96  
97 97  func keyNeutrinoAssetId () = "neutrino_asset_id"
98 98  
99 99  
100 100  func keyNsbtAssetId () = "bond_asset_id"
101 101  
102 102  
103 103  func keySurfAssetId () = "surf_asset_id"
104 104  
105 105  
106 106  func swapsTimeframeKEY () = "swaps_timeframe"
107 107  
108 108  
109 109  func keyUserLastQuickSwapHeight (userAddress) = makeString(["%s%s", "userLastQuickSwapHeight", userAddress], SEP)
110 110  
111 111  
112 112  func keyQuickSwapUserSpentInPeriod (userAddress) = makeString(["%s%s", "quickSwapUserSpentInPeriod", userAddress], SEP)
113 113  
114 114  
115 115  func basketAssetsKey () = "%s%s__common__basketAssets"
116 116  
117 117  
118 118  func keyPrice () = "price"
119 119  
120 120  
121 121  func keyPriceByAsset (assetId) = ("%s%s%s__common__priceByAsset__" + assetId)
122 122  
123 123  
124 124  let RpdBalanceKey = "rpd_balance"
125 125  
126 126  func rpdUserBalanceKey (owner,assetId) = makeString([RpdBalanceKey, assetId, owner], "_")
127 127  
128 128  
129 129  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
130 130  
131 131  
132 132  func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
133 133  
134 134  
135 135  func getNumberByKey (address,key) = valueOrElse(getInteger(address, key), 0)
136 136  
137 137  
138 138  func getBoolOrFail (address,key) = valueOrErrorMessage(getBoolean(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
139 139  
140 140  
141 141  func convertNeutrinoToWaves (amount,price) = fraction(amount, MULT8, price)
142 142  
143 143  
144 144  func convertWavesToNeutrino (amount,price) = fraction(amount, price, MULT8)
145 145  
146 146  
147 147  func toX16 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULTX16, toBigInt(origScaleMult))
148 148  
149 149  
150 150  func fromX16 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULTX16))
151 151  
152 152  
153 153  func asAnyList (val) = match val {
154 154      case valAnyLyst: List[Any] => 
155 155          valAnyLyst
156 156      case _ => 
157 157          throw("fail to cast into List[Any]")
158 158  }
159 159  
160 160  
161 161  func asInt (val) = match val {
162 162      case valInt: Int => 
163 163          valInt
164 164      case _ => 
165 165          throw("fail to cast into Int")
166 166  }
167 167  
168 168  
169 169  func asString (val) = match val {
170 170      case valStr: String => 
171 171          valStr
172 172      case _ => 
173 173          throw("fail to cast into String")
174 174  }
175 175  
176 176  
177 177  func asPriceSTRUCT (v) = match v {
178 178      case struct: (Int, Int, Int, Int) => 
179 179          struct
180 180      case _ => 
181 181          throw("fail to cast into PriceSTRUCT")
182 182  }
183 183  
184 184  
185 185  let IdxControlCfgNeutrinoDapp = 1
186 186  
187 187  let IdxControlCfgAuctionDapp = 2
188 188  
189 189  let IdxControlCfgRpdDapp = 3
190 190  
191 191  let IdxControlCfgMathDapp = 4
192 192  
193 193  let IdxControlCfgLiquidationDapp = 5
194 194  
195 195  let IdxControlCfgRestDapp = 6
196 196  
197 197  let IdxControlCfgNodeRegistryDapp = 7
198 198  
199 199  let IdxControlCfgNsbtStakingDapp = 8
200 200  
201 201  let IdxControlCfgMediatorDapp = 9
202 202  
203 203  let IdxControlCfgSurfStakingDapp = 10
204 204  
205 205  let IdxControlCfgGnsbtControllerDapp = 11
206 206  
207 207  let IdxControlCfgRestV2Dapp = 12
208 208  
209 209  let IdxControlCfgGovernanceDapp = 13
210 210  
211 211  let IdxControlCfgPegProviderDapp = 14
212 212  
213 213  func keyControlAddress () = "%s%s__config__controlAddress"
214 214  
215 215  
216 216  func keyControlCfg () = "%s__controlConfig"
217 217  
218 218  
219 - func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
219 + func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
220 220  
221 221  
222 222  func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
223 223  
224 224  
225 225  let controlContract = addressFromStringValue(valueOrElse(getString(this, keyControlAddress()), "3N4NS7d4Jo9a6F14LiFUKKYVdUkkf2eP4Zx"))
226 226  
227 227  let controlCfg = readControlCfgOrFail(controlContract)
228 228  
229 229  let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
230 230  
231 231  let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
232 232  
233 233  let liquidationContract = getContractAddressOrFail(controlCfg, IdxControlCfgLiquidationDapp)
234 234  
235 235  let usdnStakingContract = getContractAddressOrFail(controlCfg, IdxControlCfgRpdDapp)
236 236  
237 237  let pegProviderContract = getContractAddressOrFail(controlCfg, IdxControlCfgPegProviderDapp)
238 238  
239 239  let neutrinoAssetIdStr = getStringOrFail(neutrinoContract, keyNeutrinoAssetId())
240 240  
241 241  let neutrinoAssetId = fromBase58String(neutrinoAssetIdStr)
242 242  
243 243  let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyNsbtAssetId()))
244 244  
245 245  let surfAssetId = fromBase58String(getStringValue(auctionContract, keySurfAssetId()))
246 246  
247 247  func keyBalanceLocked () = "balance_lock_"
248 248  
249 249  
250 250  func totalLockedKEY (swapType,assetId) = makeString(["%s%s%s", "balanceLock", swapType, assetId], SEP)
251 251  
252 252  
253 253  func keyTokenLockedBalance (assetId) = totalLockedKEY("outNeutrino", assetId)
254 254  
255 255  
256 256  func keyNeutrinoLockedBalance () = totalLockedKEY("outMulti", neutrinoAssetIdStr)
257 257  
258 258  
259 259  func keyOldNeutrinoLockedBalance () = (keyBalanceLocked() + "neutrino")
260 260  
261 261  
262 262  func keyOldWavesLockedBalance () = (keyBalanceLocked() + "waves")
263 263  
264 264  
265 265  func calcUsdnOutOfMarketSupply () = {
266 266      let outOfMarketAddressList = valueOrElse(getString(controlContract, "%s%s__control__outOfMarketAddressList"), "")
267 267      if ((outOfMarketAddressList == ""))
268 268          then 0
269 269          else {
270 270              func balancesSUM (outOfMarketSupply,nextAddress) =             ((outOfMarketSupply + valueOrElse(getInteger(usdnStakingContract, rpdUserBalanceKey(nextAddress, neutrinoAssetIdStr)), 0)) + assetBalance(addressFromStringValue(nextAddress), neutrinoAssetId))
271 271  
272 272              let $l = split(outOfMarketAddressList, SEP)
273 273              let $s = size($l)
274 274              let $acc0 = 0
275 275              func $f0_1 ($a,$i) =             if (($i >= $s))
276 276                  then $a
277 277                  else balancesSUM($a, $l[$i])
278 278  
279 279              func $f0_2 ($a,$i) =             if (($i >= $s))
280 280                  then $a
281 281                  else throw("List size exceeds 7")
282 282  
283 283              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
284 284              }
285 285      }
286 286  
287 287  
288 288  func readCurrentAvgPeg () = asPriceSTRUCT(invoke(pegProviderContract, "price", [4], nil))._2
289 289  
290 290  
291 291  func adjustPrice (priceX6,usdnUsdtPegX6) = {
292 292      let minCoeffX6 = valueOrElse(getInteger(this, keyPriceAdjMinCoeff()), 600000)
293 293      let arbRegulatorX6 = valueOrElse(getInteger(this, keyPriceAdjArbRegulator()), 150000)
294 294      let maxPriceCoeffX6 = max([minCoeffX6, fraction((MULT6 + arbRegulatorX6), usdnUsdtPegX6, MULT6)])
295 295      let priceCoeffX6 = min([maxPriceCoeffX6, MULT6])
296 296      fraction(priceX6, MULT6, priceCoeffX6)
297 297      }
298 298  
299 299  
300 300  let currentPrice = getIntegerValue(controlContract, keyPrice())
301 301  
302 302  let usdnUsdtPegX6 = readCurrentAvgPeg()
303 303  
304 304  let currentPriceAdj = adjustPrice(currentPrice, usdnUsdtPegX6)
305 305  
306 306  let neutrinoLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldNeutrinoLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyNeutrinoLockedBalance()), 0))
307 307  
308 308  let wavesLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldWavesLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance("WAVES")), 0))
309 309  
310 310  func reserve (assetId) = {
311 311      let tempAssetId = fromBase58String(assetId)
312 312      if ((tempAssetId == WAVESID))
313 313          then (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
314 314          else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
315 315      }
316 316  
317 317  
318 318  func reservesInUsd (assetId) = {
319 319      let vol = reserve(assetId)
320 320      let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
321 321      fraction(vol, pr, MULT8)
322 322      }
323 323  
324 324  
325 325  let neutrinoOutOfMarketSupply = calcUsdnOutOfMarketSupply()
326 326  
327 327  let neutrinoTotalSupply = (((neutrinoLockedBalance + value(assetInfo(neutrinoAssetId)).quantity) - assetBalance(neutrinoContract, neutrinoAssetId)) - assetBalance(liquidationContract, neutrinoAssetId))
328 328  
329 329  let neutrinoSupply = (neutrinoTotalSupply - neutrinoOutOfMarketSupply)
330 330  
331 331  func getBR () = {
332 332      let basket = split(value(getString(neutrinoContract, basketAssetsKey())), SEP)
333 333      func addBr (acc,assetId) =     (acc + reservesInUsd(assetId))
334 334  
335 335      let sumReserves = {
336 336          let $l = basket
337 337          let $s = size($l)
338 338          let $acc0 = 0
339 339          func $f0_1 ($a,$i) =         if (($i >= $s))
340 340              then $a
341 341              else addBr($a, $l[$i])
342 342  
343 343          func $f0_2 ($a,$i) =         if (($i >= $s))
344 344              then $a
345 345              else throw("List size exceeds 10")
346 346  
347 347          $f0_2($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)
348 348          }
349 349      fraction(sumReserves, MULT6, neutrinoSupply)
350 350      }
351 351  
352 352  
353 353  let BR = if ((neutrinoSupply == 0))
354 354      then 0
355 355      else getBR()
356 356  
357 357  func getBasketInfo () = {
358 358      let basketAssets = value(getString(neutrinoContract, basketAssetsKey()))
359 359      let basket = split(basketAssets, SEP)
360 360      func weightCalc (acc,assetId) =     {
361 361          let vol = reserve(assetId)
362 362          let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
363 363          let resU = fraction(vol, pr, MULT8)
364 364          $Tuple2((acc._1 :+ $Tuple4(assetId, vol, resU, pr)), (acc._2 + resU))
365 365          }
366 366  
367 367      let t = {
368 368          let $l = basket
369 369          let $s = size($l)
370 370          let $acc0 = $Tuple2(nil, 0)
371 371          func $f0_1 ($a,$i) =         if (($i >= $s))
372 372              then $a
373 373              else weightCalc($a, $l[$i])
374 374  
375 375          func $f0_2 ($a,$i) =         if (($i >= $s))
376 376              then $a
377 377              else throw("List size exceeds 10")
378 378  
379 379          $f0_2($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)
380 380          }
381 381      func combine (acc,item) =     {
382 382          let share = if ((t._2 == 0))
383 383              then MULT6
384 384              else fraction(item._3, MULT6, t._2)
385 385          (acc :+ makeString([item._1, toString(share), toString(item._4), toString(item._2)], ":"))
386 386          }
387 387  
388 388      let weightedPrice = if ((neutrinoSupply == 0))
389 389          then 0
390 390          else fraction(t._2, MULT6, neutrinoSupply)
391 391      $Tuple3(makeString({
392 392          let $l = t._1
393 393          let $s = size($l)
394 394          let $acc0 = nil
395 395          func $f1_1 ($a,$i) =         if (($i >= $s))
396 396              then $a
397 397              else combine($a, $l[$i])
398 398  
399 399          func $f1_2 ($a,$i) =         if (($i >= $s))
400 400              then $a
401 401              else throw("List size exceeds 10")
402 402  
403 403          $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
404 404          }, "_"), weightedPrice, t._2)
405 405      }
406 406  
407 407  
408 408  @Callable(i)
409 409  func constructorV1 (neutrinoAddress,nsbtLockAddress,swapAmountAParam) = if ((i.caller != this))
410 410      then throw("not authorized")
411 411      else [StringEntry(keyNeutrinoAddress(), neutrinoAddress), IntegerEntry(keySwapAmountAParam(), swapAmountAParam)]
412 412  
413 413  
414 414  
415 415  @Callable(i)
416 416  func calcSwapLimitREADONLY (gNsbtAmount) = {
417 417      let limitBasketTokenInUsd = if ((0 >= gNsbtAmount))
418 418          then 0
419 419          else {
420 420              let aParamX8 = toBigInt(getIntOrFail(this, keySwapAmountAParam()))
421 421              let bParamX16 = toBigInt(getIntOrFail(this, keySwapAmountBParam()))
422 422              let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
423 423              toInt(fraction(aParamX8, powPartX8, MULTX10))
424 424              }
425 425      let limitUsdn = if ((0 >= gNsbtAmount))
426 426          then 0
427 427          else {
428 428              let aParamX8 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountAParam()))
429 429              let bParamX16 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountBParam()))
430 430              let brX6 = toBigInt(BR)
431 431              let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
432 432              toInt(fraction(fraction(aParamX8, powPartX8, MULTX10), brX6, MULTX6))
433 433              }
434 434      $Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
435 435      }
436 436  
437 437  
438 438  
439 439  @Callable(i)
440 440  func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
441 441      let EXP = toBigInt(2718281)
442 442      let EXPSCALE = 6
443 443      let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
444 444      let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * MULT6) / 10))
445 445      let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
446 446      let multBR = fraction(wReservesInUsdn, MULT8, uRaw)
447 447      if ((multBR > 10678564816))
448 448          then throw((("BR=" + toString(multBR)) + " > 10678.564816% will overflow exponent"))
449 449          else {
450 450              let multPower = (a * (multBR - MULT8))
451 451              let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
452 452              let multK = fraction(toBigInt(paulB), multExpInPower, MULTX6)
453 453              $Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
454 454              }
455 455      }
456 456  
457 457  
458 458  
459 459  @Callable(i)
460 460  func curveFunctionREADONLY (wavesPayRaw) = {
461 461      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
462 462      let price = asInt(neutrinoMetrics[nMetricIdxPrice])
463 463      let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
464 464      let uRaw = asInt(neutrinoMetrics[nMetricIdxUsdnSupply])
465 465      let sRaw = asInt(neutrinoMetrics[nMetricIdxNsbtSupply])
466 466      let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
467 467      let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
468 468      let multK = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
469 469      let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
470 470      let bigMaxNsbtSupply = toBigInt(mRaw)
471 471      let bigNsbtSupply = toBigInt((mRaw - sRaw))
472 472      let step1 = fraction(toBigInt(usdnPay), MULTX16, multK)
473 473      let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
474 474      let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
475 475      let nsbtAmountRaw = ((mRaw - sRaw) - step3)
476 476      $Tuple2(nil, [nsbtAmountRaw, usdnPay, wRaw, uRaw, mRaw, sRaw, asInt(kCalcArray[kResultIdxA]), asInt(kCalcArray[kResultIdxPaulB]), asInt(kCalcArray[kResultIdxWReservesInUsdn]), price, asInt(kCalcArray[kResultIdxMultBR]), asInt(kCalcArray[kResultIdxMultPower]), kCalcArray[kResultIdxMultExpInPowerStr], kCalcArray[kResultIdxMultKStr], toString(step1), toString(step2), step3])
477 477      }
478 478  
479 479  
480 480  
481 481  @Callable(i)
482 482  func surfFunctionREADONLY (amount,assetId) = if ((0 > amount))
483 483      then throw("amount should be positive")
484 484      else {
485 485          let price = currentPrice
486 486          let priceBig = toBigInt(price)
487 487          let reserveW = reserve("WAVES")
488 488          let reserveBig = toBigInt(reserveW)
489 489          let supply = neutrinoSupply
490 490          let supplyBig = toBigInt(supply)
491 491          if ((BR >= MULT6))
492 492              then throw((("BR = " + toString(BR)) + ", cannot buy SURF"))
493 493              else {
494 494                  let maxWavesPay = (fraction(supply, MULT8, price) - reserveW)
495 495                  let maxUsdnPay = (supply - fraction(reserveW, price, MULT8))
496 496                  let useAmount = if ((assetId == neutrinoAssetId))
497 497                      then if ((amount > maxUsdnPay))
498 498                          then maxUsdnPay
499 499                          else amount
500 500                      else if ((assetId == WAVESID))
501 501                          then if ((amount > maxWavesPay))
502 502                              then maxWavesPay
503 503                              else amount
504 504                          else 0
505 505                  let amountBig = toBigInt(useAmount)
506 506                  if ((assetId == neutrinoAssetId))
507 507                      then $Tuple2(nil, [toInt(fraction(fraction(amountBig, MULTX8, priceBig), (supplyBig - (amountBig / TWOX)), reserveBig)), 0, useAmount, reserveW, supply, BR, reserveW, (supply - useAmount), fraction(convertWavesToNeutrino(reserveW, price), MULT6, (supply - useAmount)), (amount - useAmount), price])
508 508                      else if ((assetId == WAVESID))
509 509                          then $Tuple2(nil, [toInt(fraction(supplyBig, log(fraction((reserveBig + amountBig), MULTX16, reserveBig), 16, EULERX16, 16, 16, HALFUP), MULTX16)), useAmount, 0, reserveW, supply, BR, (reserveW + useAmount), supply, fraction(convertWavesToNeutrino((reserveW + useAmount), price), MULT6, supply), (amount - useAmount), price])
510 510                          else throw("Unsupported asset")
511 511                  }
512 512          }
513 513  
514 514  
515 515  
516 516  @Callable(i)
517 517  func calcContractNsbtPriceSYSREADONLY (nsbtSupplyDELTA) = {
518 518      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
519 519      let price = asInt(neutrinoMetrics[nMetricIdxPrice])
520 520      let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
521 521      let uRaw = (asInt(neutrinoMetrics[nMetricIdxUsdnSupply]) - nsbtSupplyDELTA)
522 522      let sRaw = (asInt(neutrinoMetrics[nMetricIdxNsbtSupply]) + nsbtSupplyDELTA)
523 523      let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
524 524      let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
525 525      let multKX16 = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
526 526      let multStep1X16 = fraction(toBigInt(mRaw), MULTX16, toBigInt((mRaw - sRaw)))
527 527      let multStep2X16 = fraction(multStep1X16, multStep1X16, MULTX16)
528 528      let multNsbt2usdnPriceX16 = fraction(multKX16, multStep2X16, MULTX16)
529 529      let nsbt2usdnPrice = toInt(fraction(multNsbt2usdnPriceX16, toBigInt(MULT6), MULTX16))
530 530      let nsbt2wavesPrice = fraction(nsbt2usdnPrice, MULT6, price)
531 531      $Tuple2(nil, [nsbt2usdnPrice, nsbt2wavesPrice])
532 532      }
533 533  
534 534  
535 535  
536 536  @Callable(i)
537 537  func calcNeutinoMetricsREADONLY () = {
538 538      let nsbtSupplyMAX = value(assetInfo(nsbtAssetId)).quantity
539 539      let nsbtSupply = (nsbtSupplyMAX - assetBalance(auctionContract, nsbtAssetId))
540 540      let surfSupply = value(assetInfo(surfAssetId)).quantity
541 541      let basketInfo = getBasketInfo()
542 542      $Tuple2(nil, [currentPrice, neutrinoLockedBalance, wavesLockedBalance, reserve("WAVES"), reservesInUsd("WAVES"), neutrinoSupply, neutrinoOutOfMarketSupply, neutrinoTotalSupply, BR, nsbtSupply, nsbtSupplyMAX, surfSupply, usdnUsdtPegX6, currentPriceAdj, basketInfo._1, basketInfo._2, basketInfo._3])
543 543      }
544 544  
545 545  
546 546  
547 547  @Callable(i)
548 548  func getUnstakeComissionAmountREADONLY (amount,startHeight,halfLife) = $Tuple2(nil, fraction(amount, pow(2, 0, fraction(-((height - startHeight)), MULT8, halfLife), 8, 8, HALFUP), MULT8))
549 549  
550 550  
551 551  
552 552  @Callable(i)
553 553  func mergeStakesREADONLY (amount1,height1,amount2,height2,halfLife) = {
554 554      let w = fraction(amount2, pow(2, 0, fraction((height2 - height1), MULT8, halfLife), 8, 8, HALFUP), MULT8)
555 555      let v = fraction((amount1 + amount2), MULT8, (amount1 + w))
556 556      $Tuple2(nil, (height1 + ((HALF8 - (halfLife * log(v, 8, 2, 0, 8, HALFUP))) / MULT8)))
557 557      }
558 558  
559 559  
560 560  @Verifier(tx)
561 561  func verify () = {
562 562      let pubKeyAdminsListStr = makeString(["ExtEEK19nmKj9mCpnWyvEEJFYATLMcVEMvohhUHkyHNm", "Ev5py5FfBQX9cZpYKnfQrTB49Byf8QmpZWeDVRim4yV7", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR"], SEP)
563 563      let pubKeyAdminsList = split(valueOrElse(getString(controlContract, "%s__multisig"), pubKeyAdminsListStr), SEP)
564 564      let count = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(pubKeyAdminsList[0])))
565 565          then 1
566 566          else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(pubKeyAdminsList[1])))
567 567          then 1
568 568          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(pubKeyAdminsList[2])))
569 569          then 1
570 570          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[3], fromBase58String(pubKeyAdminsList[3])))
571 571          then 2
572 572          else 0))
573 573      (count >= 3)
574 574      }
575 575

Old	New		Differences
1		-	{-# STDLIB_VERSION 5 #-}
	1	+	{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let revisionNum = ""

216	216		func keyControlCfg () = "%s__controlConfig"
217	217
218	218
219		-	func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
	219	+	func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
220	220
221	221
222	222		func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))

Old	New		Differences
1		-	{-# STDLIB_VERSION 5 #-}
	1	+	{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let revisionNum = ""
5	5
6	6		let MULTSCALE = 8
7	7
8	8		let SCALE16 = 16
9	9
10	10		let SEP = "__"
11	11
12	12		let HALF8 = 50000000
13	13
14	14		let EULERX16 = toBigInt(27182818284590452)
15	15
16	16		let TWOX = toBigInt(2)
17	17
18	18		let MULT6 = 1000000
19	19
20	20		let MULTX6 = toBigInt(1000000)
21	21
22	22		let MULT8 = 100000000
23	23
24	24		let MULTX8 = toBigInt(100000000)
25	25
26	26		let MULTX10 = toBigInt(10000000000)
27	27
28	28		let MULTX16 = toBigInt(10000000000000000)
29	29
30	30		let WAVESID = fromBase58String("WAVES")
31	31
32	32		let kResultIdxA = 0
33	33
34	34		let kResultIdxPaulB = 1
35	35
36	36		let kResultIdxWReservesInUsdn = 2
37	37
38	38		let kResultIdxMultBR = 3
39	39
40	40		let kResultIdxMultPower = 4
41	41
42	42		let kResultIdxMultExpInPowerStr = 5
43	43
44	44		let kResultIdxMultKStr = 6
45	45
46	46		let nMetricIdxPrice = 0
47	47
48	48		let nMetricIdxUsdnLockedBalance = 1
49	49
50	50		let nMetricIdxWavesLockedBalance = 2
51	51
52	52		let nMetricIdxReserve = 3
53	53
54	54		let nMetricIdxReserveInUsdn = 4
55	55
56	56		let nMetricIdxUsdnSupply = 5
57	57
58	58		let nMetricIdxSurplus = 6
59	59
60	60		let nMetricIdxSurplusPercent = 7
61	61
62	62		let nMetricIdxBR = 8
63	63
64	64		let nMetricIdxNsbtSupply = 9
65	65
66	66		let nMetricIdxMaxNsbtSupply = 10
67	67
68	68		let nMetricIdxSurfSupply = 11
69	69
70	70		let nMetricUsdnUsdtPeg = 12
71	71
72	72		let nMetricCurrentPriceAdj = 13
73	73
74	74		let nMetricBasketInfo = 14
75	75
76	76		func keyNeutrinoAddress () = "%s%s__config__neutrinoAddress"
77	77
78	78
79	79		func keySwapAmountAParam () = "%s%s__config__swapAParam"
80	80
81	81
82	82		func keySwapAmountBParam () = "%s%s__config__swapBParam"
83	83
84	84
85	85		func keyUsdnSwapAmountAParam () = "%s%s__config__usdnSwapAParam"
86	86
87	87
88	88		func keyUsdnSwapAmountBParam () = "%s%s__config__usdnSwapBParam"
89	89
90	90
91	91		func keyPriceAdjMinCoeff () = "%s%s__priceAdj__minCoefficient"
92	92
93	93
94	94		func keyPriceAdjArbRegulator () = "%s%s__priceAdj__arbRegulator"
95	95
96	96
97	97		func keyNeutrinoAssetId () = "neutrino_asset_id"
98	98
99	99
100	100		func keyNsbtAssetId () = "bond_asset_id"
101	101
102	102
103	103		func keySurfAssetId () = "surf_asset_id"
104	104
105	105
106	106		func swapsTimeframeKEY () = "swaps_timeframe"
107	107
108	108
109	109		func keyUserLastQuickSwapHeight (userAddress) = makeString(["%s%s", "userLastQuickSwapHeight", userAddress], SEP)
110	110
111	111
112	112		func keyQuickSwapUserSpentInPeriod (userAddress) = makeString(["%s%s", "quickSwapUserSpentInPeriod", userAddress], SEP)
113	113
114	114
115	115		func basketAssetsKey () = "%s%s__common__basketAssets"
116	116
117	117
118	118		func keyPrice () = "price"
119	119
120	120
121	121		func keyPriceByAsset (assetId) = ("%s%s%s__common__priceByAsset__" + assetId)
122	122
123	123
124	124		let RpdBalanceKey = "rpd_balance"
125	125
126	126		func rpdUserBalanceKey (owner,assetId) = makeString([RpdBalanceKey, assetId, owner], "_")
127	127
128	128
129	129		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
130	130
131	131
132	132		func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
133	133
134	134
135	135		func getNumberByKey (address,key) = valueOrElse(getInteger(address, key), 0)
136	136
137	137
138	138		func getBoolOrFail (address,key) = valueOrErrorMessage(getBoolean(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
139	139
140	140
141	141		func convertNeutrinoToWaves (amount,price) = fraction(amount, MULT8, price)
142	142
143	143
144	144		func convertWavesToNeutrino (amount,price) = fraction(amount, price, MULT8)
145	145
146	146
147	147		func toX16 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULTX16, toBigInt(origScaleMult))
148	148
149	149
150	150		func fromX16 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULTX16))
151	151
152	152
153	153		func asAnyList (val) = match val {
154	154		case valAnyLyst: List[Any] =>
155	155		valAnyLyst
156	156		case _ =>
157	157		throw("fail to cast into List[Any]")
158	158		}
159	159
160	160
161	161		func asInt (val) = match val {
162	162		case valInt: Int =>
163	163		valInt
164	164		case _ =>
165	165		throw("fail to cast into Int")
166	166		}
167	167
168	168
169	169		func asString (val) = match val {
170	170		case valStr: String =>
171	171		valStr
172	172		case _ =>
173	173		throw("fail to cast into String")
174	174		}
175	175
176	176
177	177		func asPriceSTRUCT (v) = match v {
178	178		case struct: (Int, Int, Int, Int) =>
179	179		struct
180	180		case _ =>
181	181		throw("fail to cast into PriceSTRUCT")
182	182		}
183	183
184	184
185	185		let IdxControlCfgNeutrinoDapp = 1
186	186
187	187		let IdxControlCfgAuctionDapp = 2
188	188
189	189		let IdxControlCfgRpdDapp = 3
190	190
191	191		let IdxControlCfgMathDapp = 4
192	192
193	193		let IdxControlCfgLiquidationDapp = 5
194	194
195	195		let IdxControlCfgRestDapp = 6
196	196
197	197		let IdxControlCfgNodeRegistryDapp = 7
198	198
199	199		let IdxControlCfgNsbtStakingDapp = 8
200	200
201	201		let IdxControlCfgMediatorDapp = 9
202	202
203	203		let IdxControlCfgSurfStakingDapp = 10
204	204
205	205		let IdxControlCfgGnsbtControllerDapp = 11
206	206
207	207		let IdxControlCfgRestV2Dapp = 12
208	208
209	209		let IdxControlCfgGovernanceDapp = 13
210	210
211	211		let IdxControlCfgPegProviderDapp = 14
212	212
213	213		func keyControlAddress () = "%s%s__config__controlAddress"
214	214
215	215
216	216		func keyControlCfg () = "%s__controlConfig"
217	217
218	218
219		-	func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
	219	+	func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
220	220
221	221
222	222		func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
223	223
224	224
225	225		let controlContract = addressFromStringValue(valueOrElse(getString(this, keyControlAddress()), "3N4NS7d4Jo9a6F14LiFUKKYVdUkkf2eP4Zx"))
226	226
227	227		let controlCfg = readControlCfgOrFail(controlContract)
228	228
229	229		let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
230	230
231	231		let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
232	232
233	233		let liquidationContract = getContractAddressOrFail(controlCfg, IdxControlCfgLiquidationDapp)
234	234
235	235		let usdnStakingContract = getContractAddressOrFail(controlCfg, IdxControlCfgRpdDapp)
236	236
237	237		let pegProviderContract = getContractAddressOrFail(controlCfg, IdxControlCfgPegProviderDapp)
238	238
239	239		let neutrinoAssetIdStr = getStringOrFail(neutrinoContract, keyNeutrinoAssetId())
240	240
241	241		let neutrinoAssetId = fromBase58String(neutrinoAssetIdStr)
242	242
243	243		let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyNsbtAssetId()))
244	244
245	245		let surfAssetId = fromBase58String(getStringValue(auctionContract, keySurfAssetId()))
246	246
247	247		func keyBalanceLocked () = "balance_lock_"
248	248
249	249
250	250		func totalLockedKEY (swapType,assetId) = makeString(["%s%s%s", "balanceLock", swapType, assetId], SEP)
251	251
252	252
253	253		func keyTokenLockedBalance (assetId) = totalLockedKEY("outNeutrino", assetId)
254	254
255	255
256	256		func keyNeutrinoLockedBalance () = totalLockedKEY("outMulti", neutrinoAssetIdStr)
257	257
258	258
259	259		func keyOldNeutrinoLockedBalance () = (keyBalanceLocked() + "neutrino")
260	260
261	261
262	262		func keyOldWavesLockedBalance () = (keyBalanceLocked() + "waves")
263	263
264	264
265	265		func calcUsdnOutOfMarketSupply () = {
266	266		let outOfMarketAddressList = valueOrElse(getString(controlContract, "%s%s__control__outOfMarketAddressList"), "")
267	267		if ((outOfMarketAddressList == ""))
268	268		then 0
269	269		else {
270	270		func balancesSUM (outOfMarketSupply,nextAddress) = ((outOfMarketSupply + valueOrElse(getInteger(usdnStakingContract, rpdUserBalanceKey(nextAddress, neutrinoAssetIdStr)), 0)) + assetBalance(addressFromStringValue(nextAddress), neutrinoAssetId))
271	271
272	272		let $l = split(outOfMarketAddressList, SEP)
273	273		let $s = size($l)
274	274		let $acc0 = 0
275	275		func $f0_1 ($a,$i) = if (($i >= $s))
276	276		then $a
277	277		else balancesSUM($a, $l[$i])
278	278
279	279		func $f0_2 ($a,$i) = if (($i >= $s))
280	280		then $a
281	281		else throw("List size exceeds 7")
282	282
283	283		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
284	284		}
285	285		}
286	286
287	287
288	288		func readCurrentAvgPeg () = asPriceSTRUCT(invoke(pegProviderContract, "price", [4], nil))._2
289	289
290	290
291	291		func adjustPrice (priceX6,usdnUsdtPegX6) = {
292	292		let minCoeffX6 = valueOrElse(getInteger(this, keyPriceAdjMinCoeff()), 600000)
293	293		let arbRegulatorX6 = valueOrElse(getInteger(this, keyPriceAdjArbRegulator()), 150000)
294	294		let maxPriceCoeffX6 = max([minCoeffX6, fraction((MULT6 + arbRegulatorX6), usdnUsdtPegX6, MULT6)])
295	295		let priceCoeffX6 = min([maxPriceCoeffX6, MULT6])
296	296		fraction(priceX6, MULT6, priceCoeffX6)
297	297		}
298	298
299	299
300	300		let currentPrice = getIntegerValue(controlContract, keyPrice())
301	301
302	302		let usdnUsdtPegX6 = readCurrentAvgPeg()
303	303
304	304		let currentPriceAdj = adjustPrice(currentPrice, usdnUsdtPegX6)
305	305
306	306		let neutrinoLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldNeutrinoLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyNeutrinoLockedBalance()), 0))
307	307
308	308		let wavesLockedBalance = (valueOrElse(getInteger(neutrinoContract, keyOldWavesLockedBalance()), 0) + valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance("WAVES")), 0))
309	309
310	310		func reserve (assetId) = {
311	311		let tempAssetId = fromBase58String(assetId)
312	312		if ((tempAssetId == WAVESID))
313	313		then (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
314	314		else (assetBalance(neutrinoContract, tempAssetId) - valueOrElse(getInteger(neutrinoContract, keyTokenLockedBalance(assetId)), 0))
315	315		}
316	316
317	317
318	318		func reservesInUsd (assetId) = {
319	319		let vol = reserve(assetId)
320	320		let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
321	321		fraction(vol, pr, MULT8)
322	322		}
323	323
324	324
325	325		let neutrinoOutOfMarketSupply = calcUsdnOutOfMarketSupply()
326	326
327	327		let neutrinoTotalSupply = (((neutrinoLockedBalance + value(assetInfo(neutrinoAssetId)).quantity) - assetBalance(neutrinoContract, neutrinoAssetId)) - assetBalance(liquidationContract, neutrinoAssetId))
328	328
329	329		let neutrinoSupply = (neutrinoTotalSupply - neutrinoOutOfMarketSupply)
330	330
331	331		func getBR () = {
332	332		let basket = split(value(getString(neutrinoContract, basketAssetsKey())), SEP)
333	333		func addBr (acc,assetId) = (acc + reservesInUsd(assetId))
334	334
335	335		let sumReserves = {
336	336		let $l = basket
337	337		let $s = size($l)
338	338		let $acc0 = 0
339	339		func $f0_1 ($a,$i) = if (($i >= $s))
340	340		then $a
341	341		else addBr($a, $l[$i])
342	342
343	343		func $f0_2 ($a,$i) = if (($i >= $s))
344	344		then $a
345	345		else throw("List size exceeds 10")
346	346
347	347		$f0_2($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)
348	348		}
349	349		fraction(sumReserves, MULT6, neutrinoSupply)
350	350		}
351	351
352	352
353	353		let BR = if ((neutrinoSupply == 0))
354	354		then 0
355	355		else getBR()
356	356
357	357		func getBasketInfo () = {
358	358		let basketAssets = value(getString(neutrinoContract, basketAssetsKey()))
359	359		let basket = split(basketAssets, SEP)
360	360		func weightCalc (acc,assetId) = {
361	361		let vol = reserve(assetId)
362	362		let pr = value(getInteger(controlContract, keyPriceByAsset(assetId)))
363	363		let resU = fraction(vol, pr, MULT8)
364	364		$Tuple2((acc._1 :+ $Tuple4(assetId, vol, resU, pr)), (acc._2 + resU))
365	365		}
366	366
367	367		let t = {
368	368		let $l = basket
369	369		let $s = size($l)
370	370		let $acc0 = $Tuple2(nil, 0)
371	371		func $f0_1 ($a,$i) = if (($i >= $s))
372	372		then $a
373	373		else weightCalc($a, $l[$i])
374	374
375	375		func $f0_2 ($a,$i) = if (($i >= $s))
376	376		then $a
377	377		else throw("List size exceeds 10")
378	378
379	379		$f0_2($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)
380	380		}
381	381		func combine (acc,item) = {
382	382		let share = if ((t._2 == 0))
383	383		then MULT6
384	384		else fraction(item._3, MULT6, t._2)
385	385		(acc :+ makeString([item._1, toString(share), toString(item._4), toString(item._2)], ":"))
386	386		}
387	387
388	388		let weightedPrice = if ((neutrinoSupply == 0))
389	389		then 0
390	390		else fraction(t._2, MULT6, neutrinoSupply)
391	391		$Tuple3(makeString({
392	392		let $l = t._1
393	393		let $s = size($l)
394	394		let $acc0 = nil
395	395		func $f1_1 ($a,$i) = if (($i >= $s))
396	396		then $a
397	397		else combine($a, $l[$i])
398	398
399	399		func $f1_2 ($a,$i) = if (($i >= $s))
400	400		then $a
401	401		else throw("List size exceeds 10")
402	402
403	403		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
404	404		}, "_"), weightedPrice, t._2)
405	405		}
406	406
407	407
408	408		@Callable(i)
409	409		func constructorV1 (neutrinoAddress,nsbtLockAddress,swapAmountAParam) = if ((i.caller != this))
410	410		then throw("not authorized")
411	411		else [StringEntry(keyNeutrinoAddress(), neutrinoAddress), IntegerEntry(keySwapAmountAParam(), swapAmountAParam)]
412	412
413	413
414	414
415	415		@Callable(i)
416	416		func calcSwapLimitREADONLY (gNsbtAmount) = {
417	417		let limitBasketTokenInUsd = if ((0 >= gNsbtAmount))
418	418		then 0
419	419		else {
420	420		let aParamX8 = toBigInt(getIntOrFail(this, keySwapAmountAParam()))
421	421		let bParamX16 = toBigInt(getIntOrFail(this, keySwapAmountBParam()))
422	422		let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
423	423		toInt(fraction(aParamX8, powPartX8, MULTX10))
424	424		}
425	425		let limitUsdn = if ((0 >= gNsbtAmount))
426	426		then 0
427	427		else {
428	428		let aParamX8 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountAParam()))
429	429		let bParamX16 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountBParam()))
430	430		let brX6 = toBigInt(BR)
431	431		let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
432	432		toInt(fraction(fraction(aParamX8, powPartX8, MULTX10), brX6, MULTX6))
433	433		}
434	434		$Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
435	435		}
436	436
437	437
438	438
439	439		@Callable(i)
440	440		func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
441	441		let EXP = toBigInt(2718281)
442	442		let EXPSCALE = 6
443	443		let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
444	444		let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * MULT6) / 10))
445	445		let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
446	446		let multBR = fraction(wReservesInUsdn, MULT8, uRaw)
447	447		if ((multBR > 10678564816))
448	448		then throw((("BR=" + toString(multBR)) + " > 10678.564816% will overflow exponent"))
449	449		else {
450	450		let multPower = (a * (multBR - MULT8))
451	451		let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
452	452		let multK = fraction(toBigInt(paulB), multExpInPower, MULTX6)
453	453		$Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
454	454		}
455	455		}
456	456
457	457
458	458
459	459		@Callable(i)
460	460		func curveFunctionREADONLY (wavesPayRaw) = {
461	461		let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
462	462		let price = asInt(neutrinoMetrics[nMetricIdxPrice])
463	463		let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
464	464		let uRaw = asInt(neutrinoMetrics[nMetricIdxUsdnSupply])
465	465		let sRaw = asInt(neutrinoMetrics[nMetricIdxNsbtSupply])
466	466		let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
467	467		let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
468	468		let multK = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
469	469		let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
470	470		let bigMaxNsbtSupply = toBigInt(mRaw)
471	471		let bigNsbtSupply = toBigInt((mRaw - sRaw))
472	472		let step1 = fraction(toBigInt(usdnPay), MULTX16, multK)
473	473		let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
474	474		let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
475	475		let nsbtAmountRaw = ((mRaw - sRaw) - step3)
476	476		$Tuple2(nil, [nsbtAmountRaw, usdnPay, wRaw, uRaw, mRaw, sRaw, asInt(kCalcArray[kResultIdxA]), asInt(kCalcArray[kResultIdxPaulB]), asInt(kCalcArray[kResultIdxWReservesInUsdn]), price, asInt(kCalcArray[kResultIdxMultBR]), asInt(kCalcArray[kResultIdxMultPower]), kCalcArray[kResultIdxMultExpInPowerStr], kCalcArray[kResultIdxMultKStr], toString(step1), toString(step2), step3])
477	477		}
478	478
479	479
480	480
481	481		@Callable(i)
482	482		func surfFunctionREADONLY (amount,assetId) = if ((0 > amount))
483	483		then throw("amount should be positive")
484	484		else {
485	485		let price = currentPrice
486	486		let priceBig = toBigInt(price)
487	487		let reserveW = reserve("WAVES")
488	488		let reserveBig = toBigInt(reserveW)
489	489		let supply = neutrinoSupply
490	490		let supplyBig = toBigInt(supply)
491	491		if ((BR >= MULT6))
492	492		then throw((("BR = " + toString(BR)) + ", cannot buy SURF"))
493	493		else {
494	494		let maxWavesPay = (fraction(supply, MULT8, price) - reserveW)
495	495		let maxUsdnPay = (supply - fraction(reserveW, price, MULT8))
496	496		let useAmount = if ((assetId == neutrinoAssetId))
497	497		then if ((amount > maxUsdnPay))
498	498		then maxUsdnPay

github/deemru/w8io/026f985 
74.56 ms ◑