w8 · tx · 3iD···sJe

tx · 3iDp4Qq8qaKcb7EsdcR6qdLbXfEhQjsWKKhALLxV5sJe

3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi:  -0.02000000 Waves

2023.03.28 08:06 [2509362] smart account 3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3iDp4Qq8qaKcb7EsdcR6qdLbXfEhQjsWKKhALLxV5sJe",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1679980009290,
    "version": 2,
    "chainId": 84,
    "sender": "3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi",
    "senderPublicKey": "4qGVXRFATZNzo2RZZ5UYHXojGyJgSRBwtgJcCU8rJe5A",
    "proofs": [
        "2rMe9dHUDvD9Phzz7fVZunbFK8WAftHKd65SN44rAyFsAJNd4pXncxAQMDvvSxyHhpqNArnFcRjNuwvj3YnyHxo5",
        "4uwZ7kLUZGHhZtfrv5HxXJQFN414zKCnFUYYoum6oCKTkdymtpTkVNREgeyWXzG3UBDLkaVdyLfSyYrM8TgRNGts",
        "3wKMGAkaHmQHRZdoHJKqrssLBsJvm4jhnsrFJYQR2DU1dBmtL3UXt7yKnPZ9ZGYa5jAVLHDV4v4FF1oiit7nGSkc"
    ],
    "script": "base64:BgI5CAISBQoDCAgBEgMKAQESBwoFAQEBAQESAwoBARIECgIBAhIDCgEBEgASBQoDAQEBEgcKBQEBAQEBdQALcmV2aXNpb25OdW0CAAAJTVVMVFNDQUxFAAgAB1NDQUxFMTYAEAADU0VQAgJfXwAFSEFMRjgAgOHrFwAIRVVMRVJYMTYJALYCAQD0quOekdSkMAAEVFdPWAkAtgIBAAIABU1VTFQ2AMCEPQAGTVVMVFg2CQC2AgEAwIQ9AAVNVUxUOACAwtcvAAZNVUxUWDgJALYCAQCAwtcvAAdNVUxUWDEwCQC2AgEAgMivoCUAB01VTFRYMTYJALYCAQCAgIT+pt7hEQAHV0FWRVNJRAkA2QQBAgVXQVZFUwALa1Jlc3VsdElkeEEAAAAPa1Jlc3VsdElkeFBhdWxCAAEAGWtSZXN1bHRJZHhXUmVzZXJ2ZXNJblVzZG4AAgAQa1Jlc3VsdElkeE11bHRCUgADABNrUmVzdWx0SWR4TXVsdFBvd2VyAAQAG2tSZXN1bHRJZHhNdWx0RXhwSW5Qb3dlclN0cgAFABJrUmVzdWx0SWR4TXVsdEtTdHIABgAPbk1ldHJpY0lkeFByaWNlAAAAG25NZXRyaWNJZHhVc2RuTG9ja2VkQmFsYW5jZQABABxuTWV0cmljSWR4V2F2ZXNMb2NrZWRCYWxhbmNlAAIAEW5NZXRyaWNJZHhSZXNlcnZlAAMAF25NZXRyaWNJZHhSZXNlcnZlSW5Vc2RuAAQAFG5NZXRyaWNJZHhVc2RuU3VwcGx5AAUAEW5NZXRyaWNJZHhTdXJwbHVzAAYAGG5NZXRyaWNJZHhTdXJwbHVzUGVyY2VudAAHAAxuTWV0cmljSWR4QlIACAAUbk1ldHJpY0lkeE5zYnRTdXBwbHkACQAXbk1ldHJpY0lkeE1heE5zYnRTdXBwbHkACgAUbk1ldHJpY0lkeFN1cmZTdXBwbHkACwASbk1ldHJpY1VzZG5Vc2R0UGVnAAwAFm5NZXRyaWNDdXJyZW50UHJpY2VBZGoADQARbk1ldHJpY0Jhc2tldEluZm8ADgESa2V5TmV1dHJpbm9BZGRyZXNzAAIdJXMlc19fY29uZmlnX19uZXV0cmlub0FkZHJlc3MBE2tleVN3YXBBbW91bnRBUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBBUGFyYW0BE2tleVN3YXBBbW91bnRCUGFyYW0AAhglcyVzX19jb25maWdfX3N3YXBCUGFyYW0BF2tleVVzZG5Td2FwQW1vdW50QVBhcmFtAAIcJXMlc19fY29uZmlnX191c2RuU3dhcEFQYXJhbQEXa2V5VXNkblN3YXBBbW91bnRCUGFyYW0AAhwlcyVzX19jb25maWdfX3VzZG5Td2FwQlBhcmFtARNrZXlQcmljZUFkak1pbkNvZWZmAAIeJXMlc19fcHJpY2VBZGpfX21pbkNvZWZmaWNpZW50ARdrZXlQcmljZUFkakFyYlJlZ3VsYXRvcgACHCVzJXNfX3ByaWNlQWRqX19hcmJSZWd1bGF0b3IBEmtleU5ldXRyaW5vQXNzZXRJZAACEW5ldXRyaW5vX2Fzc2V0X2lkAQ5rZXlOc2J0QXNzZXRJZAACDWJvbmRfYXNzZXRfaWQBDmtleVN1cmZBc3NldElkAAINc3VyZl9hc3NldF9pZAERc3dhcHNUaW1lZnJhbWVLRVkAAg9zd2Fwc190aW1lZnJhbWUBGmtleVVzZXJMYXN0UXVpY2tTd2FwSGVpZ2h0AQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBCVzJXMJAMwIAgIXdXNlckxhc3RRdWlja1N3YXBIZWlnaHQJAMwIAgULdXNlckFkZHJlc3MFA25pbAUDU0VQAR1rZXlRdWlja1N3YXBVc2VyU3BlbnRJblBlcmlvZAELdXNlckFkZHJlc3MJALkJAgkAzAgCAgQlcyVzCQDMCAICGnF1aWNrU3dhcFVzZXJTcGVudEluUGVyaW9kCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFA1NFUAEPYmFza2V0QXNzZXRzS2V5AAIaJXMlc19fY29tbW9uX19iYXNrZXRBc3NldHMBCGtleVByaWNlAAIFcHJpY2UBD2tleVByaWNlQnlBc3NldAEHYXNzZXRJZAkArAICAh4lcyVzJXNfX2NvbW1vbl9fcHJpY2VCeUFzc2V0X18FB2Fzc2V0SWQADVJwZEJhbGFuY2VLZXkCC3JwZF9iYWxhbmNlARFycGRVc2VyQmFsYW5jZUtleQIFb3duZXIHYXNzZXRJZAkAuQkCCQDMCAIFDVJwZEJhbGFuY2VLZXkJAMwIAgUHYXNzZXRJZAkAzAgCBQVvd25lcgUDbmlsAgFfAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAEMZ2V0SW50T3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABDmdldE51bWJlckJ5S2V5AgdhZGRyZXNzA2tleQkBC3ZhbHVlT3JFbHNlAgkAmggCBQdhZGRyZXNzBQNrZXkAAAENZ2V0Qm9vbE9yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmwgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAARZjb252ZXJ0TmV1dHJpbm9Ub1dhdmVzAgZhbW91bnQFcHJpY2UJAGsDBQZhbW91bnQFBU1VTFQ4BQVwcmljZQEWY29udmVydFdhdmVzVG9OZXV0cmlubwIGYW1vdW50BXByaWNlCQBrAwUGYW1vdW50BQVwcmljZQUFTVVMVDgBBXRvWDE2AgdvcmlnVmFsDW9yaWdTY2FsZU11bHQJALwCAwkAtgIBBQdvcmlnVmFsBQdNVUxUWDE2CQC2AgEFDW9yaWdTY2FsZU11bHQBB2Zyb21YMTYCA3ZhbA9yZXN1bHRTY2FsZU11bHQJAKADAQkAvAIDBQN2YWwJALYCAQUPcmVzdWx0U2NhbGVNdWx0BQdNVUxUWDE2AQlhc0FueUxpc3QBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACCUxpc3RbQW55XQQKdmFsQW55THlzdAUHJG1hdGNoMAUKdmFsQW55THlzdAkAAgECG2ZhaWwgdG8gY2FzdCBpbnRvIExpc3RbQW55XQEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCGFzU3RyaW5nAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEBnZhbFN0cgUHJG1hdGNoMAUGdmFsU3RyCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQ1hc1ByaWNlU1RSVUNUAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACFChJbnQsIEludCwgSW50LCBJbnQpBAZzdHJ1Y3QFByRtYXRjaDAFBnN0cnVjdAkAAgECHWZhaWwgdG8gY2FzdCBpbnRvIFByaWNlU1RSVUNUABlJZHhDb250cm9sQ2ZnTmV1dHJpbm9EYXBwAAEAGElkeENvbnRyb2xDZmdBdWN0aW9uRGFwcAACABRJZHhDb250cm9sQ2ZnUnBkRGFwcAADABVJZHhDb250cm9sQ2ZnTWF0aERhcHAABAAcSWR4Q29udHJvbENmZ0xpcXVpZGF0aW9uRGFwcAAFABVJZHhDb250cm9sQ2ZnUmVzdERhcHAABgAdSWR4Q29udHJvbENmZ05vZGVSZWdpc3RyeURhcHAABwAcSWR4Q29udHJvbENmZ05zYnRTdGFraW5nRGFwcAAIABlJZHhDb250cm9sQ2ZnTWVkaWF0b3JEYXBwAAkAHElkeENvbnRyb2xDZmdTdXJmU3Rha2luZ0RhcHAACgAgSWR4Q29udHJvbENmZ0duc2J0Q29udHJvbGxlckRhcHAACwAXSWR4Q29udHJvbENmZ1Jlc3RWMkRhcHAADAAbSWR4Q29udHJvbENmZ0dvdmVybmFuY2VEYXBwAA0AHElkeENvbnRyb2xDZmdQZWdQcm92aWRlckRhcHAADgERa2V5Q29udHJvbEFkZHJlc3MAAhwlcyVzX19jb25maWdfX2NvbnRyb2xBZGRyZXNzAQ1rZXlDb250cm9sQ2ZnAAIRJXNfX2NvbnRyb2xDb25maWcBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQdjb250cm9sCQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQdjb250cm9sCQENa2V5Q29udHJvbENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgpjb250cm9sQ2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUKY29udHJvbENmZwUDaWR4CQCsAgICLUNvbnRyb2wgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgAD2NvbnRyb2xDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQERa2V5Q29udHJvbEFkZHJlc3MAAiMzTjROUzdkNEpvOWE2RjE0TGlGVUtLWVZkVWtrZjJlUDRaeAAKY29udHJvbENmZwkBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQUPY29udHJvbENvbnRyYWN0ABBuZXV0cmlub0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUZSWR4Q29udHJvbENmZ05ldXRyaW5vRGFwcAAPYXVjdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwABNsaXF1aWRhdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUcSWR4Q29udHJvbENmZ0xpcXVpZGF0aW9uRGFwcAATdXNkblN0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFFElkeENvbnRyb2xDZmdScGREYXBwABNwZWdQcm92aWRlckNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUcSWR4Q29udHJvbENmZ1BlZ1Byb3ZpZGVyRGFwcAASbmV1dHJpbm9Bc3NldElkU3RyCQEPZ2V0U3RyaW5nT3JGYWlsAgUQbmV1dHJpbm9Db250cmFjdAkBEmtleU5ldXRyaW5vQXNzZXRJZAAAD25ldXRyaW5vQXNzZXRJZAkA2QQBBRJuZXV0cmlub0Fzc2V0SWRTdHIAC25zYnRBc3NldElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFEG5ldXRyaW5vQ29udHJhY3QJAQ5rZXlOc2J0QXNzZXRJZAAAC3N1cmZBc3NldElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFD2F1Y3Rpb25Db250cmFjdAkBDmtleVN1cmZBc3NldElkAAEQa2V5QmFsYW5jZUxvY2tlZAACDWJhbGFuY2VfbG9ja18BDnRvdGFsTG9ja2VkS0VZAghzd2FwVHlwZQdhc3NldElkCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICC2JhbGFuY2VMb2NrCQDMCAIFCHN3YXBUeXBlCQDMCAIFB2Fzc2V0SWQFA25pbAUDU0VQARVrZXlUb2tlbkxvY2tlZEJhbGFuY2UBB2Fzc2V0SWQJAQ50b3RhbExvY2tlZEtFWQICC291dE5ldXRyaW5vBQdhc3NldElkARhrZXlOZXV0cmlub0xvY2tlZEJhbGFuY2UACQEOdG90YWxMb2NrZWRLRVkCAghvdXRNdWx0aQUSbmV1dHJpbm9Bc3NldElkU3RyARtrZXlPbGROZXV0cmlub0xvY2tlZEJhbGFuY2UACQCsAgIJARBrZXlCYWxhbmNlTG9ja2VkAAIIbmV1dHJpbm8BGGtleU9sZFdhdmVzTG9ja2VkQmFsYW5jZQAJAKwCAgkBEGtleUJhbGFuY2VMb2NrZWQAAgV3YXZlcwEZY2FsY1VzZG5PdXRPZk1hcmtldFN1cHBseQAEFm91dE9mTWFya2V0QWRkcmVzc0xpc3QJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPY29udHJvbENvbnRyYWN0AiUlcyVzX19jb250cm9sX19vdXRPZk1hcmtldEFkZHJlc3NMaXN0AgADCQAAAgUWb3V0T2ZNYXJrZXRBZGRyZXNzTGlzdAIAAAAKAQtiYWxhbmNlc1NVTQIRb3V0T2ZNYXJrZXRTdXBwbHkLbmV4dEFkZHJlc3MJAGQCCQBkAgURb3V0T2ZNYXJrZXRTdXBwbHkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUTdXNkblN0YWtpbmdDb250cmFjdAkBEXJwZFVzZXJCYWxhbmNlS2V5AgULbmV4dEFkZHJlc3MFEm5ldXRyaW5vQXNzZXRJZFN0cgAACQDwBwIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFC25leHRBZGRyZXNzBQ9uZXV0cmlub0Fzc2V0SWQKAAIkbAkAtQkCBRZvdXRPZk1hcmtldEFkZHJlc3NMaXN0BQNTRVAKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC2JhbGFuY2VzU1VNAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA3CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcBEXJlYWRDdXJyZW50QXZnUGVnAAgJAQ1hc1ByaWNlU1RSVUNUAQkA/AcEBRNwZWdQcm92aWRlckNvbnRyYWN0AgVwcmljZQkAzAgCAAQFA25pbAUDbmlsAl8yAQthZGp1c3RQcmljZQIHcHJpY2VYNg11c2RuVXNkdFBlZ1g2BAptaW5Db2VmZlg2CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARNrZXlQcmljZUFkak1pbkNvZWZmAADAzyQEDmFyYlJlZ3VsYXRvclg2CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJARdrZXlQcmljZUFkakFyYlJlZ3VsYXRvcgAA8JMJBA9tYXhQcmljZUNvZWZmWDYJAJYDAQkAzAgCBQptaW5Db2VmZlg2CQDMCAIJAGsDCQBkAgUFTVVMVDYFDmFyYlJlZ3VsYXRvclg2BQ11c2RuVXNkdFBlZ1g2BQVNVUxUNgUDbmlsBAxwcmljZUNvZWZmWDYJAJcDAQkAzAgCBQ9tYXhQcmljZUNvZWZmWDYJAMwIAgUFTVVMVDYFA25pbAkAawMFB3ByaWNlWDYFBU1VTFQ2BQxwcmljZUNvZWZmWDYADGN1cnJlbnRQcmljZQkBEUBleHRyTmF0aXZlKDEwNTApAgUPY29udHJvbENvbnRyYWN0CQEIa2V5UHJpY2UAAA11c2RuVXNkdFBlZ1g2CQERcmVhZEN1cnJlbnRBdmdQZWcAAA9jdXJyZW50UHJpY2VBZGoJAQthZGp1c3RQcmljZQIFDGN1cnJlbnRQcmljZQUNdXNkblVzZHRQZWdYNgAVbmV1dHJpbm9Mb2NrZWRCYWxhbmNlCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEba2V5T2xkTmV1dHJpbm9Mb2NrZWRCYWxhbmNlAAAACQELdmFsdWVPckVsc2UCCQCaCAIFEG5ldXRyaW5vQ29udHJhY3QJARhrZXlOZXV0cmlub0xvY2tlZEJhbGFuY2UAAAAAEndhdmVzTG9ja2VkQmFsYW5jZQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUQbmV1dHJpbm9Db250cmFjdAkBGGtleU9sZFdhdmVzTG9ja2VkQmFsYW5jZQAAAAkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEVa2V5VG9rZW5Mb2NrZWRCYWxhbmNlAQIFV0FWRVMAAAEHcmVzZXJ2ZQEHYXNzZXRJZAQLdGVtcEFzc2V0SWQJANkEAQUHYXNzZXRJZAMJAAACBQt0ZW1wQXNzZXRJZAUHV0FWRVNJRAkAZQIICQDvBwEFEG5ldXRyaW5vQ29udHJhY3QHcmVndWxhcgUSd2F2ZXNMb2NrZWRCYWxhbmNlCQBlAgkA8AcCBRBuZXV0cmlub0NvbnRyYWN0BQt0ZW1wQXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRBuZXV0cmlub0NvbnRyYWN0CQEVa2V5VG9rZW5Mb2NrZWRCYWxhbmNlAQUHYXNzZXRJZAAAAQ1yZXNlcnZlc0luVXNkAQdhc3NldElkBAN2b2wJAQdyZXNlcnZlAQUHYXNzZXRJZAQCcHIJAQV2YWx1ZQEJAJoIAgUPY29udHJvbENvbnRyYWN0CQEPa2V5UHJpY2VCeUFzc2V0AQUHYXNzZXRJZAkAawMFA3ZvbAUCcHIFBU1VTFQ4ABluZXV0cmlub091dE9mTWFya2V0U3VwcGx5CQEZY2FsY1VzZG5PdXRPZk1hcmtldFN1cHBseQAAE25ldXRyaW5vVG90YWxTdXBwbHkJAGUCCQBlAgkAZAIFFW5ldXRyaW5vTG9ja2VkQmFsYW5jZQgJAQV2YWx1ZQEJAOwHAQUPbmV1dHJpbm9Bc3NldElkCHF1YW50aXR5CQDwBwIFEG5ldXRyaW5vQ29udHJhY3QFD25ldXRyaW5vQXNzZXRJZAkA8AcCBRNsaXF1aWRhdGlvbkNvbnRyYWN0BQ9uZXV0cmlub0Fzc2V0SWQADm5ldXRyaW5vU3VwcGx5CQBlAgUTbmV1dHJpbm9Ub3RhbFN1cHBseQUZbmV1dHJpbm9PdXRPZk1hcmtldFN1cHBseQEFZ2V0QlIABAZiYXNrZXQJALUJAgkBBXZhbHVlAQkAnQgCBRBuZXV0cmlub0NvbnRyYWN0CQEPYmFza2V0QXNzZXRzS2V5AAUDU0VQCgEFYWRkQnICA2FjYwdhc3NldElkCQBkAgUDYWNjCQENcmVzZXJ2ZXNJblVzZAEFB2Fzc2V0SWQEC3N1bVJlc2VydmVzCgACJGwFBmJhc2tldAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkQnICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAGsDBQtzdW1SZXNlcnZlcwUFTVVMVDYFDm5ldXRyaW5vU3VwcGx5AAJCUgMJAAACBQ5uZXV0cmlub1N1cHBseQAAAAAJAQVnZXRCUgABDWdldEJhc2tldEluZm8ABAxiYXNrZXRBc3NldHMJAQV2YWx1ZQEJAJ0IAgUQbmV1dHJpbm9Db250cmFjdAkBD2Jhc2tldEFzc2V0c0tleQAEBmJhc2tldAkAtQkCBQxiYXNrZXRBc3NldHMFA1NFUAoBCndlaWdodENhbGMCA2FjYwdhc3NldElkBAN2b2wJAQdyZXNlcnZlAQUHYXNzZXRJZAQCcHIJAQV2YWx1ZQEJAJoIAgUPY29udHJvbENvbnRyYWN0CQEPa2V5UHJpY2VCeUFzc2V0AQUHYXNzZXRJZAQEcmVzVQkAawMFA3ZvbAUCcHIFBU1VTFQ4CQCUCgIJAM0IAggFA2FjYwJfMQkAlgoEBQdhc3NldElkBQN2b2wFBHJlc1UFAnByCQBkAggFA2FjYwJfMgUEcmVzVQQBdAoAAiRsBQZiYXNrZXQKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQp3ZWlnaHRDYWxjAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCgEHY29tYmluZQIDYWNjBGl0ZW0EBXNoYXJlAwkAAAIIBQF0Al8yAAAFBU1VTFQ2CQBrAwgFBGl0ZW0CXzMFBU1VTFQ2CAUBdAJfMgkAzQgCBQNhY2MJALkJAgkAzAgCCAUEaXRlbQJfMQkAzAgCCQCkAwEFBXNoYXJlCQDMCAIJAKQDAQgFBGl0ZW0CXzQJAMwIAgkApAMBCAUEaXRlbQJfMgUDbmlsAgE6BA13ZWlnaHRlZFByaWNlAwkAAAIFDm5ldXRyaW5vU3VwcGx5AAAAAAkAawMIBQF0Al8yBQVNVUxUNgUObmV1dHJpbm9TdXBwbHkJAJUKAwkAugkCCgACJGwIBQF0Al8xCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjb21iaW5lAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAgFfBQ13ZWlnaHRlZFByaWNlCAUBdAJfMgkBaQENY29uc3RydWN0b3JWMQMPbmV1dHJpbm9BZGRyZXNzD25zYnRMb2NrQWRkcmVzcxBzd2FwQW1vdW50QVBhcmFtAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIObm90IGF1dGhvcml6ZWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEmtleU5ldXRyaW5vQWRkcmVzcwAFD25ldXRyaW5vQWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBE2tleVN3YXBBbW91bnRBUGFyYW0ABRBzd2FwQW1vdW50QVBhcmFtBQNuaWwBaQEVY2FsY1N3YXBMaW1pdFJFQURPTkxZAQtnTnNidEFtb3VudAQVbGltaXRCYXNrZXRUb2tlbkluVXNkAwkAZwIAAAULZ05zYnRBbW91bnQAAAQIYVBhcmFtWDgJALYCAQkBDGdldEludE9yRmFpbAIFBHRoaXMJARNrZXlTd2FwQW1vdW50QVBhcmFtAAQJYlBhcmFtWDE2CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQETa2V5U3dhcEFtb3VudEJQYXJhbQAECXBvd1BhcnRYOAkAdgYJALYCAQULZ05zYnRBbW91bnQABgUJYlBhcmFtWDE2ABAACAUHQ0VJTElORwkAoAMBCQC8AgMFCGFQYXJhbVg4BQlwb3dQYXJ0WDgFB01VTFRYMTAECWxpbWl0VXNkbgMJAGcCAAAFC2dOc2J0QW1vdW50AAAECGFQYXJhbVg4CQC2AgEJAQxnZXRJbnRPckZhaWwCBQR0aGlzCQEXa2V5VXNkblN3YXBBbW91bnRBUGFyYW0ABAliUGFyYW1YMTYJALYCAQkBDGdldEludE9yRmFpbAIFBHRoaXMJARdrZXlVc2RuU3dhcEFtb3VudEJQYXJhbQAECXBvd1BhcnRYOAkAdgYJALYCAQULZ05zYnRBbW91bnQABgUJYlBhcmFtWDE2ABAACAUHQ0VJTElORwkAoAMBCQC8AgMFCGFQYXJhbVg4BQlwb3dQYXJ0WDgFB01VTFRYMTAJAJQKAgUDbmlsCQDMCAIFFWxpbWl0QmFza2V0VG9rZW5JblVzZAkAzAgCAAAJAMwIAgUJbGltaXRVc2RuBQNuaWwBaQESY2FsY3VsYXRlS1JFQURPTkxZBQR3UmF3BHVSYXcFcHJpY2UEbVJhdwRzUmF3BANFWFAJALYCAQDJ9KUBBAhFWFBTQ0FMRQAGBAFhCQELdmFsdWVPckVsc2UCCQCaCAIFD2F1Y3Rpb25Db250cmFjdAIQbnNidEN1cnZlUGFyYW1fYQADBAVwYXVsQgkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9hdWN0aW9uQ29udHJhY3QCEG5zYnRDdXJ2ZVBhcmFtX2IJAGkCCQBoAgADBQVNVUxUNgAKBA93UmVzZXJ2ZXNJblVzZG4JARZjb252ZXJ0V2F2ZXNUb05ldXRyaW5vAgUEd1JhdwUFcHJpY2UEBm11bHRCUgkAawMFD3dSZXNlcnZlc0luVXNkbgUFTVVMVDgFBHVSYXcDCQBmAgUGbXVsdEJSANDv9+MnCQACAQkArAICCQCsAgICA0JSPQkApAMBBQZtdWx0QlICJyA+IDEwNjc4LjU2NDgxNiUgd2lsbCBvdmVyZmxvdyBleHBvbmVudAQJbXVsdFBvd2VyCQBoAgUBYQkAZQIFBm11bHRCUgUFTVVMVDgEDm11bHRFeHBJblBvd2VyCQB2BgUDRVhQBQhFWFBTQ0FMRQkAtgIBBQltdWx0UG93ZXIFCU1VTFRTQ0FMRQUHU0NBTEUxNgUERE9XTgQFbXVsdEsJALwCAwkAtgIBBQVwYXVsQgUObXVsdEV4cEluUG93ZXIFBk1VTFRYNgkAlAoCBQNuaWwJAMwIAgUBYQkAzAgCBQVwYXVsQgkAzAgCBQ93UmVzZXJ2ZXNJblVzZG4JAMwIAgUGbXVsdEJSCQDMCAIFCW11bHRQb3dlcgkAzAgCCQCmAwEFDm11bHRFeHBJblBvd2VyCQDMCAIJAKYDAQUFbXVsdEsFA25pbAFpARVjdXJ2ZUZ1bmN0aW9uUkVBRE9OTFkBC3dhdmVzUGF5UmF3BA9uZXV0cmlub01ldHJpY3MJAQlhc0FueUxpc3QBCQD8BwQFBHRoaXMCGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZBQNuaWwFA25pbAQFcHJpY2UJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBQ9uTWV0cmljSWR4UHJpY2UEBHdSYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRFuTWV0cmljSWR4UmVzZXJ2ZQQEdVJhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhVc2RuU3VwcGx5BARzUmF3CQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUUbk1ldHJpY0lkeE5zYnRTdXBwbHkEBG1SYXcJAQVhc0ludAEJAJEDAgUPbmV1dHJpbm9NZXRyaWNzBRduTWV0cmljSWR4TWF4TnNidFN1cHBseQQKa0NhbGNBcnJheQkBCWFzQW55TGlzdAEJAPwHBAUEdGhpcwISY2FsY3VsYXRlS1JFQURPTkxZCQDMCAIFBHdSYXcJAMwIAgUEdVJhdwkAzAgCBQVwcmljZQkAzAgCBQRtUmF3CQDMCAIFBHNSYXcFA25pbAUDbmlsBAVtdWx0SwkApwMBCQEIYXNTdHJpbmcBCQCRAwIFCmtDYWxjQXJyYXkFEmtSZXN1bHRJZHhNdWx0S1N0cgQHdXNkblBheQkBFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8CBQt3YXZlc1BheVJhdwUFcHJpY2UEEGJpZ01heE5zYnRTdXBwbHkJALYCAQUEbVJhdwQNYmlnTnNidFN1cHBseQkAtgIBCQBlAgUEbVJhdwUEc1JhdwQFc3RlcDEJALwCAwkAtgIBBQd1c2RuUGF5BQdNVUxUWDE2BQVtdWx0SwQFc3RlcDIJALwCAwUFc3RlcDEFDWJpZ05zYnRTdXBwbHkFEGJpZ01heE5zYnRTdXBwbHkEBXN0ZXAzCQCgAwEJALwCAwUNYmlnTnNidFN1cHBseQUQYmlnTWF4TnNidFN1cHBseQkAtwICBQVzdGVwMgUQYmlnTWF4TnNidFN1cHBseQQNbnNidEFtb3VudFJhdwkAZQIJAGUCBQRtUmF3BQRzUmF3BQVzdGVwMwkAlAoCBQNuaWwJAMwIAgUNbnNidEFtb3VudFJhdwkAzAgCBQd1c2RuUGF5CQDMCAIFBHdSYXcJAMwIAgUEdVJhdwkAzAgCBQRtUmF3CQDMCAIFBHNSYXcJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BQtrUmVzdWx0SWR4QQkAzAgCCQEFYXNJbnQBCQCRAwIFCmtDYWxjQXJyYXkFD2tSZXN1bHRJZHhQYXVsQgkAzAgCCQEFYXNJbnQBCQCRAwIFCmtDYWxjQXJyYXkFGWtSZXN1bHRJZHhXUmVzZXJ2ZXNJblVzZG4JAMwIAgUFcHJpY2UJAMwIAgkBBWFzSW50AQkAkQMCBQprQ2FsY0FycmF5BRBrUmVzdWx0SWR4TXVsdEJSCQDMCAIJAQVhc0ludAEJAJEDAgUKa0NhbGNBcnJheQUTa1Jlc3VsdElkeE11bHRQb3dlcgkAzAgCCQCRAwIFCmtDYWxjQXJyYXkFG2tSZXN1bHRJZHhNdWx0RXhwSW5Qb3dlclN0cgkAzAgCCQCRAwIFCmtDYWxjQXJyYXkFEmtSZXN1bHRJZHhNdWx0S1N0cgkAzAgCCQCmAwEFBXN0ZXAxCQDMCAIJAKYDAQUFc3RlcDIJAMwIAgUFc3RlcDMFA25pbAFpARRzdXJmRnVuY3Rpb25SRUFET05MWQIGYW1vdW50B2Fzc2V0SWQDCQBmAgAABQZhbW91bnQJAAIBAhlhbW91bnQgc2hvdWxkIGJlIHBvc2l0aXZlBAVwcmljZQUMY3VycmVudFByaWNlBAhwcmljZUJpZwkAtgIBBQVwcmljZQQIcmVzZXJ2ZVcJAQdyZXNlcnZlAQIFV0FWRVMECnJlc2VydmVCaWcJALYCAQUIcmVzZXJ2ZVcEBnN1cHBseQUObmV1dHJpbm9TdXBwbHkECXN1cHBseUJpZwkAtgIBBQZzdXBwbHkDCQBnAgUCQlIFBU1VTFQ2CQACAQkArAICCQCsAgICBUJSID0gCQCkAwEFAkJSAhEsIGNhbm5vdCBidXkgU1VSRgQLbWF4V2F2ZXNQYXkJAGUCCQBrAwUGc3VwcGx5BQVNVUxUOAUFcHJpY2UFCHJlc2VydmVXBAptYXhVc2RuUGF5CQBlAgUGc3VwcGx5CQBrAwUIcmVzZXJ2ZVcFBXByaWNlBQVNVUxUOAQJdXNlQW1vdW50AwkAAAIFB2Fzc2V0SWQFD25ldXRyaW5vQXNzZXRJZAMJAGYCBQZhbW91bnQFCm1heFVzZG5QYXkFCm1heFVzZG5QYXkFBmFtb3VudAMJAAACBQdhc3NldElkBQdXQVZFU0lEAwkAZgIFBmFtb3VudAULbWF4V2F2ZXNQYXkFC21heFdhdmVzUGF5BQZhbW91bnQAAAQJYW1vdW50QmlnCQC2AgEFCXVzZUFtb3VudAMJAAACBQdhc3NldElkBQ9uZXV0cmlub0Fzc2V0SWQJAJQKAgUDbmlsCQDMCAIJAKADAQkAvAIDCQC8AgMFCWFtb3VudEJpZwUGTVVMVFg4BQhwcmljZUJpZwkAuAICBQlzdXBwbHlCaWcJALoCAgUJYW1vdW50QmlnBQRUV09YBQpyZXNlcnZlQmlnCQDMCAIAAAkAzAgCBQl1c2VBbW91bnQJAMwIAgUIcmVzZXJ2ZVcJAMwIAgUGc3VwcGx5CQDMCAIFAkJSCQDMCAIFCHJlc2VydmVXCQDMCAIJAGUCBQZzdXBwbHkFCXVzZUFtb3VudAkAzAgCCQBrAwkBFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8CBQhyZXNlcnZlVwUFcHJpY2UFBU1VTFQ2CQBlAgUGc3VwcGx5BQl1c2VBbW91bnQJAMwIAgkAZQIFBmFtb3VudAUJdXNlQW1vdW50CQDMCAIFBXByaWNlBQNuaWwDCQAAAgUHYXNzZXRJZAUHV0FWRVNJRAkAlAoCBQNuaWwJAMwIAgkAoAMBCQC8AgMFCXN1cHBseUJpZwkAdwYJALwCAwkAtwICBQpyZXNlcnZlQmlnBQlhbW91bnRCaWcFB01VTFRYMTYFCnJlc2VydmVCaWcAEAUIRVVMRVJYMTYAEAAQBQZIQUxGVVAFB01VTFRYMTYJAMwIAgUJdXNlQW1vdW50CQDMCAIAAAkAzAgCBQhyZXNlcnZlVwkAzAgCBQZzdXBwbHkJAMwIAgUCQlIJAMwIAgkAZAIFCHJlc2VydmVXBQl1c2VBbW91bnQJAMwIAgUGc3VwcGx5CQDMCAIJAGsDCQEWY29udmVydFdhdmVzVG9OZXV0cmlubwIJAGQCBQhyZXNlcnZlVwUJdXNlQW1vdW50BQVwcmljZQUFTVVMVDYFBnN1cHBseQkAzAgCCQBlAgUGYW1vdW50BQl1c2VBbW91bnQJAMwIAgUFcHJpY2UFA25pbAkAAgECEVVuc3VwcG9ydGVkIGFzc2V0AWkBIGNhbGNDb250cmFjdE5zYnRQcmljZVNZU1JFQURPTkxZAQ9uc2J0U3VwcGx5REVMVEEED25ldXRyaW5vTWV0cmljcwkBCWFzQW55TGlzdAEJAPwHBAUEdGhpcwIaY2FsY05ldXRpbm9NZXRyaWNzUkVBRE9OTFkFA25pbAUDbmlsBAVwcmljZQkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFD25NZXRyaWNJZHhQcmljZQQEd1JhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFEW5NZXRyaWNJZHhSZXNlcnZlBAR1UmF3CQBlAgkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFFG5NZXRyaWNJZHhVc2RuU3VwcGx5BQ9uc2J0U3VwcGx5REVMVEEEBHNSYXcJAGQCCQEFYXNJbnQBCQCRAwIFD25ldXRyaW5vTWV0cmljcwUUbk1ldHJpY0lkeE5zYnRTdXBwbHkFD25zYnRTdXBwbHlERUxUQQQEbVJhdwkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MFF25NZXRyaWNJZHhNYXhOc2J0U3VwcGx5BAprQ2FsY0FycmF5CQEJYXNBbnlMaXN0AQkA/AcEBQR0aGlzAhJjYWxjdWxhdGVLUkVBRE9OTFkJAMwIAgUEd1JhdwkAzAgCBQR1UmF3CQDMCAIFBXByaWNlCQDMCAIFBG1SYXcJAMwIAgUEc1JhdwUDbmlsBQNuaWwECG11bHRLWDE2CQCnAwEJAQhhc1N0cmluZwEJAJEDAgUKa0NhbGNBcnJheQUSa1Jlc3VsdElkeE11bHRLU3RyBAxtdWx0U3RlcDFYMTYJALwCAwkAtgIBBQRtUmF3BQdNVUxUWDE2CQC2AgEJAGUCBQRtUmF3BQRzUmF3BAxtdWx0U3RlcDJYMTYJALwCAwUMbXVsdFN0ZXAxWDE2BQxtdWx0U3RlcDFYMTYFB01VTFRYMTYEFW11bHROc2J0MnVzZG5QcmljZVgxNgkAvAIDBQhtdWx0S1gxNgUMbXVsdFN0ZXAyWDE2BQdNVUxUWDE2BA5uc2J0MnVzZG5QcmljZQkAoAMBCQC8AgMFFW11bHROc2J0MnVzZG5QcmljZVgxNgkAtgIBBQVNVUxUNgUHTVVMVFgxNgQPbnNidDJ3YXZlc1ByaWNlCQBrAwUObnNidDJ1c2RuUHJpY2UFBU1VTFQ2BQVwcmljZQkAlAoCBQNuaWwJAMwIAgUObnNidDJ1c2RuUHJpY2UJAMwIAgUPbnNidDJ3YXZlc1ByaWNlBQNuaWwBaQEaY2FsY05ldXRpbm9NZXRyaWNzUkVBRE9OTFkABA1uc2J0U3VwcGx5TUFYCAkBBXZhbHVlAQkA7AcBBQtuc2J0QXNzZXRJZAhxdWFudGl0eQQKbnNidFN1cHBseQkAZQIFDW5zYnRTdXBwbHlNQVgJAPAHAgUPYXVjdGlvbkNvbnRyYWN0BQtuc2J0QXNzZXRJZAQKc3VyZlN1cHBseQgJAQV2YWx1ZQEJAOwHAQULc3VyZkFzc2V0SWQIcXVhbnRpdHkECmJhc2tldEluZm8JAQ1nZXRCYXNrZXRJbmZvAAkAlAoCBQNuaWwJAMwIAgUMY3VycmVudFByaWNlCQDMCAIFFW5ldXRyaW5vTG9ja2VkQmFsYW5jZQkAzAgCBRJ3YXZlc0xvY2tlZEJhbGFuY2UJAMwIAgkBB3Jlc2VydmUBAgVXQVZFUwkAzAgCCQENcmVzZXJ2ZXNJblVzZAECBVdBVkVTCQDMCAIFDm5ldXRyaW5vU3VwcGx5CQDMCAIFGW5ldXRyaW5vT3V0T2ZNYXJrZXRTdXBwbHkJAMwIAgUTbmV1dHJpbm9Ub3RhbFN1cHBseQkAzAgCBQJCUgkAzAgCBQpuc2J0U3VwcGx5CQDMCAIFDW5zYnRTdXBwbHlNQVgJAMwIAgUKc3VyZlN1cHBseQkAzAgCBQ11c2RuVXNkdFBlZ1g2CQDMCAIFD2N1cnJlbnRQcmljZUFkagkAzAgCCAUKYmFza2V0SW5mbwJfMQkAzAgCCAUKYmFza2V0SW5mbwJfMgkAzAgCCAUKYmFza2V0SW5mbwJfMwUDbmlsAWkBIWdldFVuc3Rha2VDb21pc3Npb25BbW91bnRSRUFET05MWQMGYW1vdW50C3N0YXJ0SGVpZ2h0CGhhbGZMaWZlCQCUCgIFA25pbAkAawMFBmFtb3VudAkAbAYAAgAACQBrAwkBAS0BCQBlAgUGaGVpZ2h0BQtzdGFydEhlaWdodAUFTVVMVDgFCGhhbGZMaWZlAAgACAUGSEFMRlVQBQVNVUxUOAFpARNtZXJnZVN0YWtlc1JFQURPTkxZBQdhbW91bnQxB2hlaWdodDEHYW1vdW50MgdoZWlnaHQyCGhhbGZMaWZlBAF3CQBrAwUHYW1vdW50MgkAbAYAAgAACQBrAwkAZQIFB2hlaWdodDIFB2hlaWdodDEFBU1VTFQ4BQhoYWxmTGlmZQAIAAgFBkhBTEZVUAUFTVVMVDgEAXYJAGsDCQBkAgUHYW1vdW50MQUHYW1vdW50MgUFTVVMVDgJAGQCBQdhbW91bnQxBQF3CQCUCgIFA25pbAkAZAIFB2hlaWdodDEJAGkCCQBlAgUFSEFMRjgJAGgCBQhoYWxmTGlmZQkAbQYFAXYACAACAAAACAUGSEFMRlVQBQVNVUxUOAECdHgBBnZlcmlmeQAEE3B1YktleUFkbWluc0xpc3RTdHIJALkJAgkAzAgCAixFeHRFRUsxOW5tS2o5bUNwbld5dkVFSkZZQVRMTWNWRU12b2hoVUhreUhObQkAzAgCAixFdjVweTVGZkJRWDljWnBZS25mUXJUQjQ5QnlmOFFtcFpXZURWUmltNHlWNwkAzAgCAixEVXV1TGpYdTk4bkJ3WmM3ZnF3Q1RqdEEzbm5Sd2dUYmtNU3I1U1UyTm1EUgkAzAgCAixEVXV1TGpYdTk4bkJ3WmM3ZnF3Q1RqdEEzbm5Sd2dUYmtNU3I1U1UyTm1EUgUDbmlsBQNTRVAEEHB1YktleUFkbWluc0xpc3QJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9jb250cm9sQ29udHJhY3QCDCVzX19tdWx0aXNpZwUTcHViS2V5QWRtaW5zTGlzdFN0cgUDU0VQBAVjb3VudAkAZAIJAGQCCQBkAgMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAAAAQAAAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQkA2QQBCQCRAwIFEHB1YktleUFkbWluc0xpc3QAAQABAAADCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACCQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAACAAEAAAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAMJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAMAAgAACQBnAgUFY291bnQAA9sSGDY=",
    "height": 2509362,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Hu3ft7FaFxGBGF7Hkny9Uqt1MnRxAvscWCbx6bwuNbGv
Next: none

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

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

github/deemru/w8io/026f985 
50.03 ms ◑