w8 · tx · 7t7···UUa

tx · 7t74yhG8dBBeKbCaJb6A9zZFGZuY4RCTUpwjhcHWXUUa

3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi:  -0.02000000 Waves

2023.03.03 15:46 [2473894] smart account 3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7t74yhG8dBBeKbCaJb6A9zZFGZuY4RCTUpwjhcHWXUUa",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1677847572848,
    "version": 2,
    "chainId": 84,
    "sender": "3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi",
    "senderPublicKey": "4qGVXRFATZNzo2RZZ5UYHXojGyJgSRBwtgJcCU8rJe5A",
    "proofs": [
        "4eyzUxU9KUTB5bmMm1Nsb6U8YSFXWFn77dzsC5PTr54MQsMHpsXM9shPvJhPCMqxpSWPeGNSPTp4c7Hio1nfn9V8",
        "5MFW1Ciyoun5DQvxg983LSSixL5UrYY8iQaTze7RYckPD5w7oWmkfPTTPbeM89Yn4G2xktbnHQoydq8mZyrWpZ4G",
        "3AhaVVUwNqoPRQMWpdyhD66ngrBC2ukc1r5zX833xb4h8cK8x8zVmr8bR7wDVrEfFEh49AD5yCUAVvEzBiXqShmC"
    ],
    "script": "base64:BgI5CAISBQoDCAgBEgMKAQESBwoFAQEBAQESAwoBARIECgIBAhIDCgEBEgASBQoDAQEBEgcKBQEBAQEBdQALcmV2aXNpb25OdW0CAAAJTVVMVFNDQUxFAAgAB1NDQUxFMTYAEAADU0VQAgJfXwAFSEFMRjgAgOHrFwAIRVVMRVJYMTYJALYCAQD0quOekdSkMAAEVFdPWAkAtgIBAAIABU1VTFQ2AMCEPQAGTVVMVFg2CQC2AgEAwIQ9AAVNVUxUOACAwtcvAAZNVUxUWDgJALYCAQCAwtcvAAdNVUxUWDEwCQC2AgEAgMivoCUAB01VTFRYMTYJALYCAQCAgIT+pt7hEQAHV0FWRVNJRAkA2QQBAgVXQVZFUwALa1Jlc3VsdElkeEEAAAAPa1Jlc3VsdElkeFBhdWxCAAEAGWtSZXN1bHRJZHhXUmVzZXJ2ZXNJblVzZG4AAgAQa1Jlc3VsdElkeE11bHRCUgADABNrUmVzdWx0SWR4TXVsdFBvd2VyAAQAG2tSZXN1bHRJZHhNdWx0RXhwSW5Qb3dlclN0cgAFABJrUmVzdWx0SWR4TXVsdEtTdHIABgAPbk1ldHJpY0lkeFByaWNlAAAAG25NZXRyaWNJZHhVc2RuTG9ja2VkQmFsYW5jZQABABxuTWV0cmljSWR4V2F2ZXNMb2NrZWRCYWxhbmNlAAIAEW5NZXRyaWNJZHhSZXNlcnZlAAMAF25NZXRyaWNJZHhSZXNlcnZlSW5Vc2RuAAQAFG5NZXRyaWNJZHhVc2RuU3VwcGx5AAUAEW5NZXRyaWNJZHhTdXJwbHVzAAYAGG5NZXRyaWNJZHhTdXJwbHVzUGVyY2VudAAHAAxuTWV0cmljSWR4QlIACAAUbk1ldHJpY0lkeE5zYnRTdXBwbHkACQAXbk1ldHJpY0lkeE1heE5zYnRTdXBwbHkACgAUbk1ldHJpY0lkeFN1cmZTdXBwbHkACwASbk1ldHJpY1VzZG5Vc2R0UGVnAAwAFm5NZXRyaWNDdXJyZW50UHJpY2VBZGoADQARbk1ldHJpY0Jhc2tldEluZm8ADgESa2V5TmV1dHJpbm9BZGRyZXNzAAIdJXMlc19fY29uZmlnX19uZXV0cmlub0FkZHJlc3MBE2tleVN3YXBBbW91bnRBUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBBUGFyYW0BE2tleVN3YXBBbW91bnRCUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBCUGFyYW0BF2tleVVzZG5Td2FwQW1vdW50QVBhcmFtAAIcJXMlc19fY29uZmlnX191c2RuU3dhcEFQYXJhbQEXa2V5VXNkblN3YXBBbW91bnRCUGFyYW0AAhwlcyVzX19jb25maWdfX3VzZG5Td2FwQlBhcmFtARNrZXlQcmljZUFkak1pbkNvZWZmAAIeJXMlc19fcHJpY2VBZGpfX21pbkNvZWZmaWNpZW50ARdrZXlQcmljZUFkakFyYlJlZ3VsYXRvcgACHCVzJXNfX3ByaWNlQWRqX19hcmJSZWd1bGF0b3IBEmtleU5ldXRyaW5vQXNzZXRJZAACEW5ldXRyaW5vX2Fzc2V0X2lkAQ5rZXlOc2J0QXNzZXRJZAACDWJvbmRfYXNzZXRfaWQBDmtleVN1cmZBc3NldElkAAINc3VyZl9hc3NldF9pZAERc3dhcHNUaW1lZnJhbWVLRVkAAg9zd2Fwc190aW1lZnJhbWUBGmtleVVzZXJMYXN0UXVpY2tTd2FwSGVpZ2h0AQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBCVzJXMJAMwIAgIXdXNlckxhc3RRdWlja1N3YXBIZWlnaHQJAMwIAgULdXNlckFkZHJlc3MFA25pbAUDU0VQAR1rZXlRdWlja1N3YXBVc2VyU3BlbnRJblBlcmlvZAELdXNlckFkZHJlc3MJALkJAgkAzAgCAgQlcyVzCQDMCAICGnF1aWNrU3dhcFVzZXJTcGVudEluUGVyaW9kCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEPYmFza2V0QXNzZXRzS2V5AAIaJXMlc19fY29tbW9uX19iYXNrZXRBc3NldHMBCGtleVByaWNlAAIFcHJpY2UBD2tleVByaWNlQnlBc3NldAEHYXNzZXRJZAkArAICAh4lcyVzJXNfX2NvbW1vbl9fcHJpY2VCeUFzc2V0X18FB2Fzc2V0SWQADVJwZEJhbGFuY2VLZXkCC3JwZF9iYWxhbmNlARFycGRVc2VyQmFsYW5jZUtleQIFb3duZXIHYXNzZXRJZAkAuQkCCQDMCAIFDVJwZEJhbGFuY2VLZXkJAMwIAgUHYXNzZXRJZAkAzAgCBQVvd25lcgUDbmlsAgFfAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAEMZ2V0SW50T3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABDmdldE51bWJlckJ5S2V5AgdhZGRyZXNzA2tleQkBC3ZhbHVlT3JFbHNlAgkAmggCBQdhZGRyZXNzBQNrZXkAAAENZ2V0Qm9vbE9yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmwgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAARZjb252ZXJ0TmV1dHJpbm9Ub1dhdmVzAgZhbW91bnQFcHJpY2UJAGsDBQZhbW91bnQFBU1VTFQ4BQVwcmljZQEWY29udmVydFdhdmVzVG9OZXV0cmlubwIGYW1vdW50BXByaWNlCQBrAwUGYW1vdW50BQVwcmljZQUFTVVMVDgBBXRvWDE2AgdvcmlnVmFsDW9yaWdTY2FsZU11bHQJALwCAwkAtgIBBQdvcmlnVmFsBQdNVUxUWDE2CQC2AgEFDW9yaWdTY2FsZU11bHQBB2Zyb21YMTYCA3ZhbA9yZXN1bHRTY2FsZU11bHQJAKADAQkAvAIDBQN2YWwJALYCAQUPcmVzdWx0U2NhbGVNdWx0BQdNVUxUWDE2AQlhc0FueUxpc3QBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACCUxpc3RbQW55XQQKdmFsQW55THlzdAUHJG1hdGNoMAUKdmFsQW55THlzdAkAAgECG2ZhaWwgdG8gY2FzdCBpbnRvIExpc3RbQW55XQEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCGFzU3RyaW5nAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEBnZhbFN0cgUHJG1hdGNoMAUGdmFsU3RyCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQ1hc1ByaWNlU1RSVUNUAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACFChJbnQsIEludCwgSW50LCBJbnQpBAZzdHJ1Y3QFByRtYXRjaDAFBnN0cnVjdAkAAgECHWZhaWwgdG8gY2FzdCBpbnRvIFByaWNlU1RSVUNUABlJZHhDb250cm9sQ2ZnTmV1dHJpbm9EYXBwAAEAGElkeENvbnRyb2xDZmdBdWN0aW9uRGFwcAACABRJZHhDb250cm9sQ2ZnUnBkRGFwcAADABVJZHhDb250cm9sQ2ZnTWF0aERhcHAABAAcSWR4Q29udHJvbENmZ0xpcXVpZGF0aW9uRGFwcAAFABVJZHhDb250cm9sQ2ZnUmVzdERhcHAABgAdSWR4Q29udHJvbENmZ05vZGVSZWdpc3RyeURhcHAABwAcSWR4Q29udHJvbENmZ05zYnRTdGFraW5nRGFwcAAIABlJZHhDb250cm9sQ2ZnTWVkaWF0b3JEYXBwAAkAHElkeENvbnRyb2xDZmdTdXJmU3Rha2luZ0RhcHAACgAgSWR4Q29udHJvbENmZ0duc2J0Q29udHJvbGxlckRhcHAACwAXSWR4Q29udHJvbENmZ1Jlc3RWMkRhcHAADAAbSWR4Q29udHJvbENmZ0dvdmVybmFuY2VEYXBwAA0AHElkeENvbnRyb2xDZmdQZWdQcm92aWRlckRhcHAADgERa2V5Q29udHJvbEFkZHJlc3MAAhwlcyVzX19jb25maWdfX2NvbnRyb2xBZGRyZXNzAQ1rZXlDb250cm9sQ2ZnAAIRJXNfX2NvbnRyb2xDb25maWcBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQdjb250cm9sCQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQdjb250cm9sCQENa2V5Q29udHJvbENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgpjb250cm9sQ2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUKY29udHJvbENmZwUDaWR4CQCsAgICLUNvbnRyb2wgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgAD2NvbnRyb2xDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQERa2V5Q29udHJvbEFkZHJlc3MAAiMzTjROUzdkNEpvOWE2RjE0TGlGVUtLWVZkVWtrZjJlUDRaeAAKY29udHJvbENmZwkBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQUPY29udHJvbENvbnRyYWN0ABBuZXV0cmlub0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUZSWR4Q29udHJvbENmZ05ldXRyaW5vRGFwcAAPYXVjdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwABNsaXF1aWRhdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUcSWR4Q29udHJvbENmZ0xpcXVpZGF0aW9uRGFwcAATdXNkblN0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFFElkeENvbnRyb2xDZmdScGREYXBwABNwZWdQcm92aWRlckNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUcSWR4Q29udHJvbENmZ1BlZ1Byb3ZpZGVyRGFwcAASbmV1dHJpbm9Bc3NldElkU3RyCQEPZ2V0U3RyaW5nT3JGYWlsAgUQbmV1dHJpbm9Db250cmFjdAkBEmtleU5ldXRyaW5vQXNzZXRJZAAAD25ldXRyaW5vQXNzZXRJZAkA2QQBBRJuZXV0cmlub0Fzc2V0SWRTdHIAC25zYnRBc3NldElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFEG5ldXRyaW5vQ29udHJhY3QJAQ5rZXlOc2J0QXNzZXRJZAAAC3N1cmZBc3NldElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFD2F1Y3Rpb25Db250cmFjdAkBDmtleVN1cmZBc3NldElkAAEQa2V5QmFsYW5jZUxvY2tlZAACDWJhbGFuY2VfbG9ja18BDnRvdGFsTG9ja2VkS0VZAghzd2FwVHlwZQdhc3NldElkCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICC2JhbGFuY2VMb2NrCQDMCAIFCHN3YXBUeXBlCQDMCAIFB2Fzc2V0SWQFA25pbAUDU0VQARVrZXlUb2tlbkxvY2tlZEJhbGFuY2UBB2Fzc2V0SWQJAQ50b3RhbExvY2tlZEtFWQICC291dE5ldXRyaW5vBQdhc3NldElkARhrZXlOZXV0cmlub0xvY2tlZEJhbGFuY2UACQEOdG90YWxMb2NrZWRLRVkCAghvdXRNdWx0aQUSbmV1dHJpbm9Bc3NldElkU3RyARtrZXlPbGROZXV0cmlub0xvY2tlZEJhbGFuY2UACQCsAgIJARBrZXlCYWxhbmNlTG9ja2VkAAIIbmV1dHJpbm8BGGtleU9sZFdhdmVzTG9ja2VkQmFsYW5jZQAJAKwCAgkBEGtleUJhbGFuY2VMb2NrZWQAAgV3YXZlcwEZY2FsY1VzZG5PdXRPZk1hcmtldFN1cHBseQAEFm91dE9mTWFya2V0QWRkcmVzc0xpc3QJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPY29udHJvbENvbnRyYWN0AiUlcyVzX19jb250cm9sX19vdXRPZk1hcmtldEFkZHJlc3NMaXN0AgADCQAAAgUWb3V0T2ZNYXJrZXRBZGRyZXNzTGlzdAIAAAAKAQtiYWxhbmNlc1NVTQIRb3V0T2ZNYXJrZXRTdXBwbHkLbmV4dEFkZHJlc3MJAGQCCQBkAgURb3V0T2ZNYXJrZXRTdXBwbHkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUTdXNkblN0YWtpbmdDb250cmFjdAkBEXJwZFVzZXJCYWxhbmNlS2V5AgULbmV4dEFkZHJlc3MFEm5ldXRyaW5vQXNzZXRJZFN0cgAACQDwBwIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFC25leHRBZGRyZXNzBQ9uZXV0cmlub0Fzc2V0SWQKAAIkbAkAtQkCBRZvdXRPZk1hcmtldEFkZHJlc3NMaXN0BQNTRVAKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC2JhbGFuY2VzU1VNAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA3CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcBEXJlYWRDdXJyZW50QXZnUGVnAAgJAQ1hc1ByaWNlU1RSVUNUAQkA/AcEBRNwZWdQcm92aWRlckNvbnRyYWN0AgVwcmljZQkAzAgCAAQFA25pbAUDbmlsAl8yAQthZGp1c3RQcmljZQIHcHJpY2VYNg11c2RuVXNkdFBlZ1g2BAptaW5Db2VmZlg2CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARNrZXlQcmljZUFkak1pbkNvZWZmAADAzyQEDmFyYlJlZ3VsYXRvclg2CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARdrZXlQcmljZUFkakFyYlJlZ3VsYXRvcgAA8JMJBA9tYXhQcmljZUNvZWZmWDYJAJYDAQkAzAgCBQptaW5Db2VmZlg2CQDMCAIJAGsDCQBkAgUFTVVMVDYFDmFyYlJlZ3VsYXRvclg2BQ11c2RuVXNkdFBlZ1g2BQVNVUxUNgUDbmlsBAxwcmljZUNvZWZmWDYJAJcDAQkAzAgCBQ9tYXhQcmljZUNvZWZmWDYJAMwIAgUFTVVMVDYFA25pbAkAawMFB3ByaWNlWDYFBU1VTFQ2BQxwcmljZUNvZWZmWDYADGN1cnJlbnRQcmljZQkBEUBleHRyTmF0aXZlKDEwNTApAgUPY29udHJvbENvbnRyYWN0CQEIa2V5UHJpY2UAAA11c2RuVXNkdFBlZ1g2CQERcmVhZEN1cnJlbnRBdmdQZWcAAA9jdXJyZW50UHJpY2VBZGoJAQthZGp1c3RQcmljZQIFDGN1cnJlbnRQcmljZQUNdXNkblVzZHRQZWdYNgAVbmV1dHJpbm9Mb2NrZWRCYWxhbmNlCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEba2V5T2xkTmV1dHJpbm9Mb2NrZWRCYWxhbmNlAAAACQELdmFsdWVPckVsc2UCCQCaCAIFEG5ldXRyaW5vQ29udHJhY3QJARhrZXlOZXV0cmlub0xvY2tlZEJhbGFuY2UAAAAAEndhdmVzTG9ja2VkQmFsYW5jZQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUQbmV1dHJpbm9Db250cmFjdAkBGGtleU9sZFdhdmVzTG9ja2VkQmFsYW5jZQAAAAkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEVa2V5VG9rZW5Mb2NrZWRCYWxhbmNlAQIFV0FWRVMAAAEHcmVzZXJ2ZQEHYXNzZXRJZAQLdGVtcEFzc2V0SWQJANkEAQUHYXNzZXRJZAMJAAACBQt0ZW1wQXNzZXRJZAUHV0FWRVNJRAkAZQIICQDvBwEFEG5ldXRyaW5vQ29udHJhY3QHcmVndWxhcgUSd2F2ZXNMb2NrZWRCYWxhbmNlCQBlAgkA8AcCBRBuZXV0cmlub0NvbnRyYWN0BQt0ZW1wQXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEVa2V5VG9rZW5Mb2NrZWRCYWxhbmNlAQUHYXNzZXRJZAAAAQ1yZXNlcnZlc0luVXNkAQdhc3NldElkBAN2b2wJAQdyZXNlcnZlAQUHYXNzZXRJZAQCcHIJAQV2YWx1ZQEJAJoIAgUPY29udHJvbENvbnRyYWN0CQEPa2V5UHJpY2VCeUFzc2V0AQUHYXNzZXRJZAkAawMFA3ZvbAUCcHIFBU1VTFQ4ABluZXV0cmlub091dE9mTWFya2V0U3VwcGx5CQEZY2FsY1VzZG5PdXRPZk1hcmtldFN1cHBseQAAE25ldXRyaW5vVG90YWxTdXBwbHkJAGUCCQBlAgkAZAIFFW5ldXRyaW5vTG9ja2VkQmFsYW5jZQgJAQV2YWx1ZQEJAOwHAQUPbmV1dHJpbm9Bc3NldElkCHF1YW50aXR5CQDwBwIFEG5ldXRyaW5vQ29udHJhY3QFD25ldXRyaW5vQXNzZXRJZAkA8AcCBRNsaXF1aWRhdGlvbkNvbnRyYWN0BQ9uZXV0cmlub0Fzc2V0SWQADm5ldXRyaW5vU3VwcGx5CQBlAgUTbmV1dHJpbm9Ub3RhbFN1cHBseQUZbmV1dHJpbm9PdXRPZk1hcmtldFN1cHBseQEFZ2V0QlIABAZiYXNrZXQJALUJAgkBBXZhbHVlAQkAnQgCBRBuZXV0cmlub0NvbnRyYWN0CQEPYmFza2V0QXNzZXRzS2V5AAUDU0VQCgEFYWRkQnICA2FjYwdhc3NldElkCQBkAgUDYWNjCQENcmVzZXJ2ZXNJblVzZAEFB2Fzc2V0SWQEC3N1bVJlc2VydmVzCgACJGwFBmJhc2tldAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkQnICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAGsDBQtzdW1SZXNlcnZlcwUFTVVMVDYFDm5ldXRyaW5vU3VwcGx5AAJCUgMJAAACBQ5uZXV0cmlub1N1cHBseQAAAAAJAQVnZXRCUgABDWdldEJhc2tldEluZm8ABAxiYXNrZXRBc3NldHMJAQV2YWx1ZQEJAJ0IAgUQbmV1dHJpbm9Db250cmFjdAkBD2Jhc2tldEFzc2V0c0tleQAEBmJhc2tldAkAtQkCBQxiYXNrZXRBc3NldHMFA1NFUAoBCndlaWdodENhbGMCA2FjYwdhc3NldElkBAN2b2wJAQdyZXNlcnZlAQUHYXNzZXRJZAQCcHIJAQV2YWx1ZQEJAJoIAgUPY29udHJvbENvbnRyYWN0CQEPa2V5UHJpY2VCeUFzc2V0AQUHYXNzZXRJZAQEcmVzVQkAawMFA3ZvbAUCcHIFBU1VTFQ4CQCUCgIJAM0IAggFA2FjYwJfMQkAlgoEBQdhc3NldElkBQN2b2wFBHJlc1UFAnByCQBkAggFA2FjYwJfMgUEcmVzVQQBdAoAAiRsBQZiYXNrZXQKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQp3ZWlnaHRDYWxjAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCgEHY29tYmluZQIDYWNjBGl0ZW0EBXNoYXJlAwkAAAIIBQF0Al8yAAAFBU1VTFQ2CQBrAwgFBGl0ZW0CXzMFBU1VTFQ2CAUBdAJfMgkAzQgCBQNhY2MJALkJAgkAzAgCCAUEaXRlbQJfMQkAzAgCCQCkAwEFBXNoYXJlCQDMCAIJAKQDAQgFBGl0ZW0CXzQJAMwIAgkApAMBCAUEaXRlbQJfMgUDbmlsAgE6BA13ZWlnaHRlZFByaWNlAwkAAAIFDm5ldXRyaW5vU3VwcGx5AAAAAAkAawMIBQF0Al8yBQVNVUxUNgUObmV1dHJpbm9TdXBwbHkJAJUKAwkAuQkCCgACJGwIBQF0Al8xCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjb21iaW5lAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAgFfBQ13ZWlnaHRlZFByaWNlCAUBdAJfMgkBaQENY29uc3RydWN0b3JWMQMPbmV1dHJpbm9BZGRyZXNzD25zYnRMb2NrQWRkcmVzcxBzd2FwQW1vdW50QVBhcmFtAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIObm90IGF1dGhvcml6ZWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEmtleU5ldXRyaW5vQWRkcmVzcwAFD25ldXRyaW5vQWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBE2tleVN3YXBBbW91bnRBUGFyYW0ABRBzd2FwQW1vdW50QVBhcmFtBQNuaWwBaQEVY2FsY1N3YXBMaW1pdFJFQURPTkxZAQtnTnNidEFtb3VudAQVbGltaXRCYXNrZXRUb2tlbkluVXNkAwkAZwIAAAULZ05zYnRBbW91bnQAAAQIYVBhcmFtWDgJALYCAQkBDGdldEludE9yRmFpbAIFBHRoaXMJARNrZXlTd2FwQW1vdW50QVBhcmFtAAQJYlBhcmFtWDE2CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQETa2V5U3dhcEFtb3VudEJQYXJhbQAECXBvd1BhcnRYOAkAdgYJALYCAQULZ05zYnRBbW91bnQABgUJYlBhcmFtWDE2ABAACAUHQ0VJTElORwkAoAMBCQC8AgMFCGFQYXJhbVg4BQlwb3dQYXJ0WDgFB01VTFRYMTAECWxpbWl0VXNkbgMJAGcCAAAFC2dOc2J0QW1vdW50AAAECGFQYXJhbVg4CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQEXa2V5VXNkblN3YXBBbW91bnRBUGFyYW0ABAliUGFyYW1YMTYJALYCAQkBDGdldEludE9yRmFpbAIFBHRoaXMJARdrZXlVc2RuU3dhcEFtb3VudEJQYXJhbQAECXBvd1BhcnRYOAkAdgYJALYCAQULZ05zYnRBbW91bnQABgUJYlBhcmFtWDE2ABAACAUHQ0VJTElORwkAoAMBCQC8AgMFCGFQYXJhbVg4BQlwb3dQYXJ0WDgFB01VTFRYMTAJAJQKAgUDbmlsCQDMCAIFFWxpbWl0QmFza2V0VG9rZW5JblVzZAkAzAgCAAAJAMwIAgUJbGltaXRVc2RuBQNuaWwBaQESY2FsY3VsYXRlS1JFQURPTkxZBQR3UmF3BHVSYXcFcHJpY2UEbVJhdwRzUmF3BANFWFAJALYCAQDJ9KUBBAhFWFBTQ0FMRQAGBAFhCQELdmFsdWVPckVsc2UCCQCaCAIFD2F1Y3Rpb25Db250cmFjdAIQbnNidEN1cnZlUGFyYW1fYQADBAVwYXVsQgkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9hdWN0aW9uQ29udHJhY3QCEG5zYnRDdXJ2ZVBhcmFtX2IJAGkCCQBoAgADBQVNVUxUNgAKBA93UmVzZXJ2ZXNJblVzZG4JARZjb252ZXJ0V2F2ZXNUb05ldXRyaW5vAgUEd1JhdwUFcHJpY2UEBm11bHRCUgkAawMFD3dSZXNlcnZlc0luVXNkbgUFTVVMVDgFBHVSYXcDCQBmAgUGbXVsdEJSANDv9+MnCQACAQkArAICCQCsAgICA0JSPQkApAMBBQZtdWx0QlICJyA+IDEwNjc4LjU2NDgxNiUgd2lsbCBvdmVyZmxvdyBleHBvbmVudAQJbXVsdFBvd2VyCQBoAgUBYQkAZQIFBm11bHRCUgUFTVVMVDgEDm11bHRFeHBJblBvd2VyCQB2BgUDRVhQBQhFWFBTQ0FMRQkAtgIBBQltdWx0UG93ZXIFCU1VTFRTQ0FMRQUHU0NBTEUxNgUERE9XTgQFbXVsdEsJALwCAwkAtgIBBQVwYXVsQgUObXVsdEV4cEluUG93ZXIFBk1VTFRYNgkAlAoCBQNuaWwJAMwIAgUBYQkAzAgCBQVwYXVsQgkAzAgCBQ93UmVzZXJ2ZXNJblVzZG4JAMwIAgUGbXVsdEJSCQDMCAIFCW11bHRQb3dlcgkAzAgCCQCmAwEFDm11bHRFeHBJblBvd2VyCQDMCAIJAKYDAQUFbXVsdEsFA25pbAFpARVjdXJ2ZUZ1bmN0aW9uUkVBRE9OTFkBC3dhdmVzUGF5UmF3BA9uZXV0cmlub01ldHJpY3MJAQlhc0FueUxpc3QBCQD8BwQFBHRoaXMCGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZBQNuaWwFA25pbAQFcHJpY2UJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBQ9uTWV0cmljSWR4UHJpY2UEBHdSYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRFuTWV0cmljSWR4UmVzZXJ2ZQQEdVJhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhVc2RuU3VwcGx5BARzUmF3CQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUUbk1ldHJpY0lkeE5zYnRTdXBwbHkEBG1SYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRduTWV0cmljSWR4TWF4TnNidFN1cHBseQQKa0NhbGNBcnJheQkBCWFzQW55TGlzdAEJAPwHBAUEdGhpcwISY2FsY3VsYXRlS1JFQURPTkxZCQDMCAIFBHdSYXcJAMwIAgUEdVJhdwkAzAgCBQVwcmljZQkAzAgCBQRtUmF3CQDMCAIFBHNSYXcFA25pbAUDbmlsBAVtdWx0SwkApwMBCQEIYXNTdHJpbmcBCQCRAwIFCmtDYWxjQXJyYXkFEmtSZXN1bHRJZHhNdWx0S1N0cgQHdXNkblBheQkBFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8CBQt3YXZlc1BheVJhdwUFcHJpY2UEEGJpZ01heE5zYnRTdXBwbHkJALYCAQUEbVJhdwQNYmlnTnNidFN1cHBseQkAtgIBCQBlAgUEbVJhdwUEc1JhdwQFc3RlcDEJALwCAwkAtgIBBQd1c2RuUGF5BQdNVUxUWDE2BQVtdWx0SwQFc3RlcDIJALwCAwUFc3RlcDEFDWJpZ05zYnRTdXBwbHkFEGJpZ01heE5zYnRTdXBwbHkEBXN0ZXAzCQCgAwEJALwCAwUNYmlnTnNidFN1cHBseQUQYmlnTWF4TnNidFN1cHBseQkAtwICBQVzdGVwMgUQYmlnTWF4TnNidFN1cHBseQQNbnNidEFtb3VudFJhdwkAZQIJAGUCBQRtUmF3BQRzUmF3BQVzdGVwMwkAlAoCBQNuaWwJAMwIAgUNbnNidEFtb3VudFJhdwkAzAgCBQd1c2RuUGF5CQDMCAIFBHdSYXcJAMwIAgUEdVJhdwkAzAgCBQRtUmF3CQDMCAIFBHNSYXcJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BQtrUmVzdWx0SWR4QQkAzAgCCQEFYXNJbnQBCQCRAwIFCmtDYWxjQXJyYXkFD2tSZXN1bHRJZHhQYXVsQgkAzAgCCQEFYXNJbnQBCQCRAwIFCmtDYWxjQXJyYXkFGWtSZXN1bHRJZHhXUmVzZXJ2ZXNJblVzZG4JAMwIAgUFcHJpY2UJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BRBrUmVzdWx0SWR4TXVsdEJSCQDMCAIJAQVhc0ludAEJAJEDAgUKa0NhbGNBcnJheQUTa1Jlc3VsdElkeE11bHRQb3dlcgkAzAgCCQCRAwIFCmtDYWxjQXJyYXkFG2tSZXN1bHRJZHhNdWx0RXhwSW5Qb3dlclN0cgkAzAgCCQCRAwIFCmtDYWxjQXJyYXkFEmtSZXN1bHRJZHhNdWx0S1N0cgkAzAgCCQCmAwEFBXN0ZXAxCQDMCAIJAKYDAQUFc3RlcDIJAMwIAgUFc3RlcDMFA25pbAFpARRzdXJmRnVuY3Rpb25SRUFET05MWQIGYW1vdW50B2Fzc2V0SWQDCQBmAgAABQZhbW91bnQJAAIBAhlhbW91bnQgc2hvdWxkIGJlIHBvc2l0aXZlBAVwcmljZQUMY3VycmVudFByaWNlBAhwcmljZUJpZwkAtgIBBQVwcmljZQQIcmVzZXJ2ZVcJAQdyZXNlcnZlAQIFV0FWRVMECnJlc2VydmVCaWcJALYCAQUIcmVzZXJ2ZVcEBnN1cHBseQUObmV1dHJpbm9TdXBwbHkECXN1cHBseUJpZwkAtgIBBQZzdXBwbHkDCQBnAgUCQlIFBU1VTFQ2CQACAQkArAICCQCsAgICBUJSID0gCQCkAwEFAkJSAhEsIGNhbm5vdCBidXkgU1VSRgQLbWF4V2F2ZXNQYXkJAGUCCQBrAwUGc3VwcGx5BQVNVUxUOAUFcHJpY2UFCHJlc2VydmVXBAptYXhVc2RuUGF5CQBlAgUGc3VwcGx5CQBrAwUIcmVzZXJ2ZVcFBXByaWNlBQVNVUxUOAQJdXNlQW1vdW50AwkAAAIFB2Fzc2V0SWQFD25ldXRyaW5vQXNzZXRJZAMJAGYCBQZhbW91bnQFCm1heFVzZG5QYXkFCm1heFVzZG5QYXkFBmFtb3VudAMJAAACBQdhc3NldElkBQdXQVZFU0lEAwkAZgIFBmFtb3VudAULbWF4V2F2ZXNQYXkFC21heFdhdmVzUGF5BQZhbW91bnQAAAQJYW1vdW50QmlnCQC2AgEFCXVzZUFtb3VudAMJAAACBQdhc3NldElkBQ9uZXV0cmlub0Fzc2V0SWQJAJQKAgUDbmlsCQDMCAIJAKADAQkAvAIDCQC8AgMFCWFtb3VudEJpZwUGTVVMVFg4BQhwcmljZUJpZwkAuAICBQlzdXBwbHlCaWcJALoCAgUJYW1vdW50QmlnBQRUV09YBQpyZXNlcnZlQmlnCQDMCAIAAAkAzAgCBQl1c2VBbW91bnQJAMwIAgUIcmVzZXJ2ZVcJAMwIAgUGc3VwcGx5CQDMCAIFAkJSCQDMCAIFCHJlc2VydmVXCQDMCAIJAGUCBQZzdXBwbHkFCXVzZUFtb3VudAkAzAgCCQBrAwkBFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8CBQhyZXNlcnZlVwUFcHJpY2UFBU1VTFQ2CQBlAgUGc3VwcGx5BQl1c2VBbW91bnQJAMwIAgkAZQIFBmFtb3VudAUJdXNlQW1vdW50CQDMCAIFBXByaWNlBQNuaWwDCQAAAgUHYXNzZXRJZAUHV0FWRVNJRAkAlAoCBQNuaWwJAMwIAgkAoAMBCQC8AgMFCXN1cHBseUJpZwkAdwYJALwCAwkAtwICBQpyZXNlcnZlQmlnBQlhbW91bnRCaWcFB01VTFRYMTYFCnJlc2VydmVCaWcAEAUIRVVMRVJYMTYAEAAQBQZIQUxGVVAFB01VTFRYMTYJAMwIAgUJdXNlQW1vdW50CQDMCAIAAAkAzAgCBQhyZXNlcnZlVwkAzAgCBQZzdXBwbHkJAMwIAgUCQlIJAMwIAgkAZAIFCHJlc2VydmVXBQl1c2VBbW91bnQJAMwIAgUGc3VwcGx5CQDMCAIJAGsDCQEWY29udmVydFdhdmVzVG9OZXV0cmlubwIJAGQCBQhyZXNlcnZlVwUJdXNlQW1vdW50BQVwcmljZQUFTVVMVDYFBnN1cHBseQkAzAgCCQBlAgUGYW1vdW50BQl1c2VBbW91bnQJAMwIAgUFcHJpY2UFA25pbAkAAgECEVVuc3VwcG9ydGVkIGFzc2V0AWkBIGNhbGNDb250cmFjdE5zYnRQcmljZVNZU1JFQURPTkxZAQ9uc2J0U3VwcGx5REVMVEEED25ldXRyaW5vTWV0cmljcwkBCWFzQW55TGlzdAEJAPwHBAUEdGhpcwIaY2FsY05ldXRpbm9NZXRyaWNzUkVBRE9OTFkFA25pbAUDbmlsBAVwcmljZQkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFD25NZXRyaWNJZHhQcmljZQQEd1JhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFEW5NZXRyaWNJZHhSZXNlcnZlBAR1UmF3CQBlAgkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhVc2RuU3VwcGx5BQ9uc2J0U3VwcGx5REVMVEEEBHNSYXcJAGQCCQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUUbk1ldHJpY0lkeE5zYnRTdXBwbHkFD25zYnRTdXBwbHlERUxUQQQEbVJhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFF25NZXRyaWNJZHhNYXhOc2J0U3VwcGx5BAprQ2FsY0FycmF5CQEJYXNBbnlMaXN0AQkA/AcEBQR0aGlzAhJjYWxjdWxhdGVLUkVBRE9OTFkJAMwIAgUEd1JhdwkAzAgCBQR1UmF3CQDMCAIFBXByaWNlCQDMCAIFBG1SYXcJAMwIAgUEc1JhdwUDbmlsBQNuaWwECG11bHRLWDE2CQCnAwEJAQhhc1N0cmluZwEJAJEDAgUKa0NhbGNBcnJheQUSa1Jlc3VsdElkeE11bHRLU3RyBAxtdWx0U3RlcDFYMTYJALwCAwkAtgIBBQRtUmF3BQdNVUxUWDE2CQC2AgEJAGUCBQRtUmF3BQRzUmF3BAxtdWx0U3RlcDJYMTYJALwCAwUMbXVsdFN0ZXAxWDE2BQxtdWx0U3RlcDFYMTYFB01VTFRYMTYEFW11bHROc2J0MnVzZG5QcmljZVgxNgkAvAIDBQhtdWx0S1gxNgUMbXVsdFN0ZXAyWDE2BQdNVUxUWDE2BA5uc2J0MnVzZG5QcmljZQkAoAMBCQC8AgMFFW11bHROc2J0MnVzZG5QcmljZVgxNgkAtgIBBQVNVUxUNgUHTVVMVFgxNgQPbnNidDJ3YXZlc1ByaWNlCQBrAwUObnNidDJ1c2RuUHJpY2UFBU1VTFQ2BQVwcmljZQkAlAoCBQNuaWwJAMwIAgUObnNidDJ1c2RuUHJpY2UJAMwIAgUPbnNidDJ3YXZlc1ByaWNlBQNuaWwBaQEaY2FsY05ldXRpbm9NZXRyaWNzUkVBRE9OTFkABA1uc2J0U3VwcGx5TUFYCAkBBXZhbHVlAQkA7AcBBQtuc2J0QXNzZXRJZAhxdWFudGl0eQQKbnNidFN1cHBseQkAZQIFDW5zYnRTdXBwbHlNQVgJAPAHAgUPYXVjdGlvbkNvbnRyYWN0BQtuc2J0QXNzZXRJZAQKc3VyZlN1cHBseQgJAQV2YWx1ZQEJAOwHAQULc3VyZkFzc2V0SWQIcXVhbnRpdHkECmJhc2tldEluZm8JAQ1nZXRCYXNrZXRJbmZvAAkAlAoCBQNuaWwJAMwIAgUMY3VycmVudFByaWNlCQDMCAIFFW5ldXRyaW5vTG9ja2VkQmFsYW5jZQkAzAgCBRJ3YXZlc0xvY2tlZEJhbGFuY2UJAMwIAgkBB3Jlc2VydmUBAgVXQVZFUwkAzAgCCQENcmVzZXJ2ZXNJblVzZAECBVdBVkVTCQDMCAIFDm5ldXRyaW5vU3VwcGx5CQDMCAIFGW5ldXRyaW5vT3V0T2ZNYXJrZXRTdXBwbHkJAMwIAgUTbmV1dHJpbm9Ub3RhbFN1cHBseQkAzAgCBQJCUgkAzAgCBQpuc2J0U3VwcGx5CQDMCAIFDW5zYnRTdXBwbHlNQVgJAMwIAgUKc3VyZlN1cHBseQkAzAgCBQ11c2RuVXNkdFBlZ1g2CQDMCAIFD2N1cnJlbnRQcmljZUFkagkAzAgCCAUKYmFza2V0SW5mbwJfMQkAzAgCCAUKYmFza2V0SW5mbwJfMgkAzAgCCAUKYmFza2V0SW5mbwJfMwUDbmlsAWkBIWdldFVuc3Rha2VDb21pc3Npb25BbW91bnRSRUFET05MWQMGYW1vdW50C3N0YXJ0SGVpZ2h0CGhhbGZMaWZlCQCUCgIFA25pbAkAawMFBmFtb3VudAkAbAYAAgAACQBrAwkBAS0BCQBlAgUGaGVpZ2h0BQtzdGFydEhlaWdodAUFTVVMVDgFCGhhbGZMaWZlAAgACAUGSEFMRlVQBQVNVUxUOAFpARNtZXJnZVN0YWtlc1JFQURPTkxZBQdhbW91bnQxB2hlaWdodDEHYW1vdW50MgdoZWlnaHQyCGhhbGZMaWZlBAF3CQBrAwUHYW1vdW50MgkAbAYAAgAACQBrAwkAZQIFB2hlaWdodDIFB2hlaWdodDEFBU1VTFQ4BQhoYWxmTGlmZQAIAAgFBkhBTEZVUAUFTVVMVDgEAXYJAGsDCQBkAgUHYW1vdW50MQUHYW1vdW50MgUFTVVMVDgJAGQCBQdhbW91bnQxBQF3CQCUCgIFA25pbAkAZAIFB2hlaWdodDEJAGkCCQBlAgUFSEFMRjgJAGgCBQhoYWxmTGlmZQkAbQYFAXYACAACAAAACAUGSEFMRlVQBQVNVUxUOAECdHgBBnZlcmlmeQAEE3B1YktleUFkbWluc0xpc3RTdHIJALkJAgkAzAgCAixFeHRFRUsxOW5tS2o5bUNwbld5dkVFSkZZQVRMTWNWRU12b2hoVUhreUhObQkAzAgCAixFdjVweTVGZkJRWDljWnBZS25mUXJUQjQ5QnlmOFFtcFpXZURWUmltNHlWNwkAzAgCAixEVXV1TGpYdTk4bkJ3WmM3ZnF3Q1RqdEEzbm5Sd2dUYmtNU3I1U1UyTm1EUgkAzAgCAixEVXV1TGpYdTk4bkJ3WmM3ZnF3Q1RqdEEzbm5Sd2dUYmtNU3I1U1UyTm1EUgUDbmlsBQNTRVAEEHB1YktleUFkbWluc0xpc3QJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9jb250cm9sQ29udHJhY3QCDCVzX19tdWx0aXNpZwUTcHViS2V5QWRtaW5zTGlzdFN0cgUDU0VQBAVjb3VudAkAZAIJAGQCCQBkAgMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAAAAQAAAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQkA2QQBCQCRAwIFEHB1YktleUFkbWluc0xpc3QAAQABAAADCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACCQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAACAAEAAAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAMJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAMAAgAACQBnAgUFY291bnQAA2pi1DQ=",
    "height": 2473894,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EXNAKnP4RSLnP6F633uPE2HyHmemAjxMZcyLX9UDEKJb
Next: Hu3ft7FaFxGBGF7Hkny9Uqt1MnRxAvscWCbx6bwuNbGv

Diff: 
Old New Differences
427 427          else {
428 428              let aParamX8 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountAParam()))
429 429              let bParamX16 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountBParam()))
430 -             let brX6 = toBigInt(BR)
431 430              let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
432 -             toInt(fraction(fraction(aParamX8, powPartX8, MULTX10), brX6, MULTX6))
431 +             toInt(fraction(aParamX8, powPartX8, MULTX10))
433 432              }
434 433      $Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
435 434      }
Full: 
Old New Differences
1 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 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 -             let brX6 = toBigInt(BR)
431 430              let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
432 -             toInt(fraction(fraction(aParamX8, powPartX8, MULTX10), brX6, MULTX6))
431 +             toInt(fraction(aParamX8, powPartX8, MULTX10))
433 432              }
434 433      $Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
435 434      }
436 435  
437 436  
438 437  
439 438  @Callable(i)
440 439  func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
441 440      let EXP = toBigInt(2718281)
442 441      let EXPSCALE = 6
443 442      let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
444 443      let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * MULT6) / 10))
445 444      let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
446 445      let multBR = fraction(wReservesInUsdn, MULT8, uRaw)
447 446      if ((multBR > 10678564816))
448 447          then throw((("BR=" + toString(multBR)) + " > 10678.564816% will overflow exponent"))
449 448          else {
450 449              let multPower = (a * (multBR - MULT8))
451 450              let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
452 451              let multK = fraction(toBigInt(paulB), multExpInPower, MULTX6)
453 452              $Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
454 453              }
455 454      }
456 455  
457 456  
458 457  
459 458  @Callable(i)
460 459  func curveFunctionREADONLY (wavesPayRaw) = {
461 460      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
462 461      let price = asInt(neutrinoMetrics[nMetricIdxPrice])
463 462      let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
464 463      let uRaw = asInt(neutrinoMetrics[nMetricIdxUsdnSupply])
465 464      let sRaw = asInt(neutrinoMetrics[nMetricIdxNsbtSupply])
466 465      let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
467 466      let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
468 467      let multK = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
469 468      let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
470 469      let bigMaxNsbtSupply = toBigInt(mRaw)
471 470      let bigNsbtSupply = toBigInt((mRaw - sRaw))
472 471      let step1 = fraction(toBigInt(usdnPay), MULTX16, multK)
473 472      let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
474 473      let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
475 474      let nsbtAmountRaw = ((mRaw - sRaw) - step3)
476 475      $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 476      }
478 477  
479 478  
480 479  
481 480  @Callable(i)
482 481  func surfFunctionREADONLY (amount,assetId) = if ((0 > amount))
483 482      then throw("amount should be positive")
484 483      else {
485 484          let price = currentPrice
486 485          let priceBig = toBigInt(price)
487 486          let reserveW = reserve("WAVES")
488 487          let reserveBig = toBigInt(reserveW)
489 488          let supply = neutrinoSupply
490 489          let supplyBig = toBigInt(supply)
491 490          if ((BR >= MULT6))
492 491              then throw((("BR = " + toString(BR)) + ", cannot buy SURF"))
493 492              else {
494 493                  let maxWavesPay = (fraction(supply, MULT8, price) - reserveW)
495 494                  let maxUsdnPay = (supply - fraction(reserveW, price, MULT8))
496 495                  let useAmount = if ((assetId == neutrinoAssetId))
497 496                      then if ((amount > maxUsdnPay))
498 497                          then maxUsdnPay
499 498                          else amount
500 499                      else if ((assetId == WAVESID))
501 500                          then if ((amount > maxWavesPay))
502 501                              then maxWavesPay
503 502                              else amount
504 503                          else 0
505 504                  let amountBig = toBigInt(useAmount)
506 505                  if ((assetId == neutrinoAssetId))
507 506                      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 507                      else if ((assetId == WAVESID))
509 508                          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 509                          else throw("Unsupported asset")
511 510                  }
512 511          }
513 512  
514 513  
515 514  
516 515  @Callable(i)
517 516  func calcContractNsbtPriceSYSREADONLY (nsbtSupplyDELTA) = {
518 517      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
519 518      let price = asInt(neutrinoMetrics[nMetricIdxPrice])
520 519      let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
521 520      let uRaw = (asInt(neutrinoMetrics[nMetricIdxUsdnSupply]) - nsbtSupplyDELTA)
522 521      let sRaw = (asInt(neutrinoMetrics[nMetricIdxNsbtSupply]) + nsbtSupplyDELTA)
523 522      let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
524 523      let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
525 524      let multKX16 = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
526 525      let multStep1X16 = fraction(toBigInt(mRaw), MULTX16, toBigInt((mRaw - sRaw)))
527 526      let multStep2X16 = fraction(multStep1X16, multStep1X16, MULTX16)
528 527      let multNsbt2usdnPriceX16 = fraction(multKX16, multStep2X16, MULTX16)
529 528      let nsbt2usdnPrice = toInt(fraction(multNsbt2usdnPriceX16, toBigInt(MULT6), MULTX16))
530 529      let nsbt2wavesPrice = fraction(nsbt2usdnPrice, MULT6, price)
531 530      $Tuple2(nil, [nsbt2usdnPrice, nsbt2wavesPrice])
532 531      }
533 532  
534 533  
535 534  
536 535  @Callable(i)
537 536  func calcNeutinoMetricsREADONLY () = {
538 537      let nsbtSupplyMAX = value(assetInfo(nsbtAssetId)).quantity
539 538      let nsbtSupply = (nsbtSupplyMAX - assetBalance(auctionContract, nsbtAssetId))
540 539      let surfSupply = value(assetInfo(surfAssetId)).quantity
541 540      let basketInfo = getBasketInfo()
542 541      $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 542      }
544 543  
545 544  
546 545  
547 546  @Callable(i)
548 547  func getUnstakeComissionAmountREADONLY (amount,startHeight,halfLife) = $Tuple2(nil, fraction(amount, pow(2, 0, fraction(-((height - startHeight)), MULT8, halfLife), 8, 8, HALFUP), MULT8))
549 548  
550 549  
551 550  
552 551  @Callable(i)
553 552  func mergeStakesREADONLY (amount1,height1,amount2,height2,halfLife) = {
554 553      let w = fraction(amount2, pow(2, 0, fraction((height2 - height1), MULT8, halfLife), 8, 8, HALFUP), MULT8)
555 554      let v = fraction((amount1 + amount2), MULT8, (amount1 + w))
556 555      $Tuple2(nil, (height1 + ((HALF8 - (halfLife * log(v, 8, 2, 0, 8, HALFUP))) / MULT8)))
557 556      }
558 557  
559 558  
560 559  @Verifier(tx)
561 560  func verify () = {
562 561      let pubKeyAdminsListStr = makeString(["ExtEEK19nmKj9mCpnWyvEEJFYATLMcVEMvohhUHkyHNm", "Ev5py5FfBQX9cZpYKnfQrTB49Byf8QmpZWeDVRim4yV7", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR"], SEP)
563 562      let pubKeyAdminsList = split(valueOrElse(getString(controlContract, "%s__multisig"), pubKeyAdminsListStr), SEP)
564 563      let count = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(pubKeyAdminsList[0])))
565 564          then 1
566 565          else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(pubKeyAdminsList[1])))
567 566          then 1
568 567          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(pubKeyAdminsList[2])))
569 568          then 1
570 569          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[3], fromBase58String(pubKeyAdminsList[3])))
571 570          then 2
572 571          else 0))
573 572      (count >= 3)
574 573      }
575 574

Old	New		Differences
427	427		else {
428	428		let aParamX8 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountAParam()))
429	429		let bParamX16 = toBigInt(getIntOrFail(this, keyUsdnSwapAmountBParam()))
430		-	let brX6 = toBigInt(BR)
431	430		let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
432		-	toInt(fraction(~~fraction(~~aParamX8, powPartX8, MULTX10)~~, brX6, MULTX6~~))
	431	+	toInt(fraction(aParamX8, powPartX8, MULTX10))
433	432		}
434	433		$Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
435	434		}

Old	New		Differences
1	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	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		-	let brX6 = toBigInt(BR)
431	430		let powPartX8 = pow(toBigInt(gNsbtAmount), 6, bParamX16, 16, 8, CEILING)
432		-	toInt(fraction(~~fraction(~~aParamX8, powPartX8, MULTX10)~~, brX6, MULTX6~~))
	431	+	toInt(fraction(aParamX8, powPartX8, MULTX10))
433	432		}
434	433		$Tuple2(nil, [limitBasketTokenInUsd, 0, limitUsdn])
435	434		}
436	435
437	436
438	437
439	438		@Callable(i)
440	439		func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
441	440		let EXP = toBigInt(2718281)
442	441		let EXPSCALE = 6
443	442		let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
444	443		let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * MULT6) / 10))
445	444		let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
446	445		let multBR = fraction(wReservesInUsdn, MULT8, uRaw)
447	446		if ((multBR > 10678564816))
448	447		then throw((("BR=" + toString(multBR)) + " > 10678.564816% will overflow exponent"))
449	448		else {
450	449		let multPower = (a * (multBR - MULT8))
451	450		let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
452	451		let multK = fraction(toBigInt(paulB), multExpInPower, MULTX6)
453	452		$Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
454	453		}
455	454		}
456	455
457	456
458	457
459	458		@Callable(i)
460	459		func curveFunctionREADONLY (wavesPayRaw) = {
461	460		let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
462	461		let price = asInt(neutrinoMetrics[nMetricIdxPrice])
463	462		let wRaw = asInt(neutrinoMetrics[nMetricIdxReserve])
464	463		let uRaw = asInt(neutrinoMetrics[nMetricIdxUsdnSupply])
465	464		let sRaw = asInt(neutrinoMetrics[nMetricIdxNsbtSupply])
466	465		let mRaw = asInt(neutrinoMetrics[nMetricIdxMaxNsbtSupply])
467	466		let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
468	467		let multK = parseBigIntValue(asString(kCalcArray[kResultIdxMultKStr]))
469	468		let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
470	469		let bigMaxNsbtSupply = toBigInt(mRaw)
471	470		let bigNsbtSupply = toBigInt((mRaw - sRaw))
472	471		let step1 = fraction(toBigInt(usdnPay), MULTX16, multK)
473	472		let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
474	473		let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
475	474		let nsbtAmountRaw = ((mRaw - sRaw) - step3)
476	475		$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	476		}
478	477
479	478
480	479
481	480		@Callable(i)
482	481		func surfFunctionREADONLY (amount,assetId) = if ((0 > amount))
483	482		then throw("amount should be positive")
484	483		else {
485	484		let price = currentPrice
486	485		let priceBig = toBigInt(price)
487	486		let reserveW = reserve("WAVES")
488	487		let reserveBig = toBigInt(reserveW)
489	488		let supply = neutrinoSupply
490	489		let supplyBig = toBigInt(supply)
491	490		if ((BR >= MULT6))
492	491		then throw((("BR = " + toString(BR)) + ", cannot buy SURF"))
493	492		else {
494	493		let maxWavesPay = (fraction(supply, MULT8, price) - reserveW)
495	494		let maxUsdnPay = (supply - fraction(reserveW, price, MULT8))
496	495		let useAmount = if ((assetId == neutrinoAssetId))
497	496		then if ((amount > maxUsdnPay))
498	497		then maxUsdnPay
499	498		else amount

github/deemru/w8io/026f985 
59.74 ms ◑