tx · 81dPvve61h8jTCag6CpRpW55HfbWdDApTx3SniDeGeMy 3N45khsjRq7bYfsvbxX1YBURhNRBBDRFNYV: -0.03500000 Waves 2022.12.16 16:29 [2362923] smart account 3N45khsjRq7bYfsvbxX1YBURhNRBBDRFNYV > SELF 0.00000000 Waves
{ "type": 13, "id": "81dPvve61h8jTCag6CpRpW55HfbWdDApTx3SniDeGeMy", "fee": 3500000, "feeAssetId": null, "timestamp": 1671197388679, "version": 1, "sender": "3N45khsjRq7bYfsvbxX1YBURhNRBBDRFNYV", "senderPublicKey": "9QeKzbcXevL66Vm5v2GCmySfZ86o8jcD5y7pPmfRcRYE", "proofs": [ "mq2aCsCbHjSWgsav7RNAoEoxKkazNuc3eehsoKjbM1hqCvvvirQSn7bion1ZJPBESJvZTaqvVVEeayxy61sYUPD" ], "script": "base64:BgKdLQgCEgMKAQgSABIECgIBBBIDCgEBEgQKAgEEEgQKAggBEgQKAggBEgQKAggBEgUKAwEIARIAEgQKAgEBEgMKAQESBQoDAQEBEgQKAggIEgASABIDCgEIEgUKAwEBARIECgIBARIECgIIARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCBIAEgMKAQESAwoBARIECgIIASIKbFBkZWNpbWFscyIGc2NhbGU4IgxzY2FsZThCaWdJbnQiB3NjYWxlMTgiCnplcm9CaWdJbnQiBGJpZzAiBGJpZzEiBGJpZzIiC3dhdmVzU3RyaW5nIgNTRVAiClBvb2xBY3RpdmUiD1Bvb2xQdXREaXNhYmxlZCITUG9vbE1hdGNoZXJEaXNhYmxlZCIMUG9vbFNodXRkb3duIg5pZHhQb29sQWRkcmVzcyINaWR4UG9vbFN0YXR1cyIQaWR4UG9vbExQQXNzZXRJZCINaWR4QW10QXNzZXRJZCIPaWR4UHJpY2VBc3NldElkIg5pZHhBbXRBc3NldERjbSIQaWR4UHJpY2VBc3NldERjbSIOaWR4SUFtdEFzc2V0SWQiEGlkeElQcmljZUFzc2V0SWQiDWlkeExQQXNzZXREY20iEmlkeFBvb2xBbXRBc3NldEFtdCIUaWR4UG9vbFByaWNlQXNzZXRBbXQiEWlkeFBvb2xMUEFzc2V0QW10IhlpZHhGYWN0b3J5U3Rha2luZ0NvbnRyYWN0IhppZHhGYWN0b3J5U2xpcHBhZ2VDb250cmFjdCIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiA3ZhbCIPcmVzdWx0U2NhbGVNdWx0Igxmcm9tWDE4Um91bmQiBXJvdW5kIgd0b1NjYWxlIgNhbXQiCHJlc1NjYWxlIghjdXJTY2FsZSIDYWJzIglhYnNCaWdJbnQiAmZjIgNtcGsiBHBtcGsiAnBsIgJwaCIBaCIJdGltZXN0YW1wIgNwYXUiC3VzZXJBZGRyZXNzIgR0eElkIgNnYXUiAmFhIgJwYSIGa2V5RmVlIgpmZWVEZWZhdWx0IgNmZWUiBmtleUtMcCIVa2V5S0xwUmVmcmVzaGVkSGVpZ2h0IhJrZXlLTHBSZWZyZXNoRGVsYXkiFmtMcFJlZnJlc2hEZWxheURlZmF1bHQiD2tMcFJlZnJlc2hEZWxheSIQa2V5RmFjdG9yeUNvbmZpZyINa2V5TWF0Y2hlclB1YiIpa2V5TWFwcGluZ1Bvb2xDb250cmFjdEFkZHJlc3NUb1Bvb2xBc3NldHMiE3Bvb2xDb250cmFjdEFkZHJlc3MiDWtleVBvb2xDb25maWciCWlBbXRBc3NldCILaVByaWNlQXNzZXQiH2tleU1hcHBpbmdzQmFzZUFzc2V0MmludGVybmFsSWQiDGJhc2VBc3NldFN0ciITa2V5QWxsUG9vbHNTaHV0ZG93biINa2V5UG9vbFdlaWdodCIPY29udHJhY3RBZGRyZXNzIhZrZXlBbGxvd2VkTHBTY3JpcHRIYXNoIhZrZXlGZWVDb2xsZWN0b3JBZGRyZXNzIg90aHJvd09yZGVyRXJyb3IiCm9yZGVyVmFsaWQiC3NlbmRlclZhbGlkIgxtYXRjaGVyVmFsaWQiD2dldFN0cmluZ09yRmFpbCIHYWRkcmVzcyIDa2V5IgxnZXRJbnRPckZhaWwiCHRocm93RXJyIgNtc2ciBmZtdEVyciIPZmFjdG9yeUNvbnRyYWN0IhNmZWVDb2xsZWN0b3JBZGRyZXNzIhBpc0dsb2JhbFNodXRkb3duIhNnZXRNYXRjaGVyUHViT3JGYWlsIg1nZXRQb29sQ29uZmlnIghhbXRBc3NldCIKcHJpY2VBc3NldCIMcGFyc2VBc3NldElkIgVpbnB1dCIPYXNzZXRJZFRvU3RyaW5nIg9wYXJzZVBvb2xDb25maWciCnBvb2xDb25maWciEHBvb2xDb25maWdQYXJzZWQiCyR0MDgwNTg4MjI0Ig5jZmdQb29sQWRkcmVzcyINY2ZnUG9vbFN0YXR1cyIMY2ZnTHBBc3NldElkIhBjZmdBbW91bnRBc3NldElkIg9jZmdQcmljZUFzc2V0SWQiFmNmZ0Ftb3VudEFzc2V0RGVjaW1hbHMiFWNmZ1ByaWNlQXNzZXREZWNpbWFscyIQZ2V0RmFjdG9yeUNvbmZpZyIPc3Rha2luZ0NvbnRyYWN0IhBzbGlwcGFnZUNvbnRyYWN0IhFkYXRhUHV0QWN0aW9uSW5mbyINaW5BbXRBc3NldEFtdCIPaW5QcmljZUFzc2V0QW10IghvdXRMcEFtdCIFcHJpY2UiHXNsaXBwYWdlVG9sZXJhbmNlUGFzc2VkQnlVc2VyIhVzbGlwcGFnZVRvbGVyYW5jZVJlYWwiCHR4SGVpZ2h0Igt0eFRpbWVzdGFtcCISc2xpcGFnZUFtdEFzc2V0QW10IhRzbGlwYWdlUHJpY2VBc3NldEFtdCIRZGF0YUdldEFjdGlvbkluZm8iDm91dEFtdEFzc2V0QW10IhBvdXRQcmljZUFzc2V0QW10IgdpbkxwQW10Ig1nZXRBY2NCYWxhbmNlIgdhc3NldElkIg9jYWxjUHJpY2VCaWdJbnQiCHByQW10WDE4IghhbUFtdFgxOCIUY2FsY1ByaWNlQmlnSW50Um91bmQiEHByaXZhdGVDYWxjUHJpY2UiCmFtQXNzZXREY20iCnByQXNzZXREY20iBWFtQW10IgVwckFtdCIOYW10QXNzZXRBbXRYMTgiEHByaWNlQXNzZXRBbXRYMTgiCmNhbGNQcmljZXMiBWxwQW10IgNjZmciC2FtdEFzc2V0RGNtIg1wcmljZUFzc2V0RGNtIghwcmljZVgxOCIIbHBBbXRYMTgiE2xwUHJpY2VJbkFtQXNzZXRYMTgiE2xwUHJpY2VJblByQXNzZXRYMTgiD2NhbGN1bGF0ZVByaWNlcyIGcHJpY2VzIhRlc3RpbWF0ZUdldE9wZXJhdGlvbiIGdHhJZDU4IgpwbXRBc3NldElkIghwbXRMcEFtdCIJbHBBc3NldElkIglhbUFzc2V0SWQiCXByQXNzZXRJZCIKcG9vbFN0YXR1cyIKbHBFbWlzc2lvbiIJYW1CYWxhbmNlIgxhbUJhbGFuY2VYMTgiCXByQmFsYW5jZSIMcHJCYWxhbmNlWDE4IgtjdXJQcmljZVgxOCIIY3VyUHJpY2UiC3BtdExwQW10WDE4Ig1scEVtaXNzaW9uWDE4IgtvdXRBbUFtdFgxOCILb3V0UHJBbXRYMTgiCG91dEFtQW10IghvdXRQckFtdCIFc3RhdGUiFGVzdGltYXRlUHV0T3BlcmF0aW9uIhFzbGlwcGFnZVRvbGVyYW5jZSIMaW5BbUFzc2V0QW10IgtpbkFtQXNzZXRJZCIMaW5QckFzc2V0QW10IgtpblByQXNzZXRJZCIKaXNFdmFsdWF0ZSIGZW1pdExwIgxhbUFzc2V0SWRTdHIiDHByQXNzZXRJZFN0ciILaUFtdEFzc2V0SWQiDWlQcmljZUFzc2V0SWQiDmluQW1Bc3NldElkU3RyIg5pblByQXNzZXRJZFN0ciIPaW5BbUFzc2V0QW10WDE4Ig9pblByQXNzZXRBbXRYMTgiDHVzZXJQcmljZVgxOCIDcmVzIgtzbGlwcGFnZVgxOCIUc2xpcHBhZ2VUb2xlcmFuY2VYMTgiCnByVmlhQW1YMTgiCmFtVmlhUHJYMTgiDGV4cGVjdGVkQW10cyIRZXhwQW10QXNzZXRBbXRYMTgiE2V4cFByaWNlQXNzZXRBbXRYMTgiCWNhbGNMcEFtdCIOY2FsY0FtQXNzZXRQbXQiDmNhbGNQckFzc2V0UG10IgxzbGlwcGFnZUNhbGMiCWVtaXRMcEFtdCIGYW1EaWZmIgZwckRpZmYiC2NvbW1vblN0YXRlIgdjYWxjS0xwIg1hbW91bnRCYWxhbmNlIgxwcmljZUJhbGFuY2UiCnVwZGF0ZWRLTHAiDmNhbGNDdXJyZW50S0xwIhBhbW91bnRBc3NldERlbHRhIg9wcmljZUFzc2V0RGVsdGEiFGxwQXNzZXRFbWlzc2lvbkRlbHRhIhJhbW91bnRBc3NldEJhbGFuY2UiEXByaWNlQXNzZXRCYWxhbmNlIg9scEFzc2V0RW1pc3Npb24iCmN1cnJlbnRLTHAiEnJlZnJlc2hLTHBJbnRlcm5hbCIXYW1vdW50QXNzZXRCYWxhbmNlRGVsdGEiFnByaWNlQXNzZXRCYWxhbmNlRGVsdGEiB2FjdGlvbnMiEnZhbGlkYXRlVXBkYXRlZEtMcCIGb2xkS0xwIht2YWxpZGF0ZU1hdGNoZXJPcmRlckFsbG93ZWQiBW9yZGVyIhFhbW91bnRBc3NldEFtb3VudCIQcHJpY2VBc3NldEFtb3VudCINJHQwMjA4MDEyMTAxMyIDa0xwIg0kdDAyMTQ4NDIxNTg0Ig11bnVzZWRBY3Rpb25zIgZrTHBOZXciDGlzT3JkZXJWYWxpZCIJY29tbW9uR2V0IgFpIgNwbXQiBnBtdEFtdCIJY29tbW9uUHV0IgphbUFzc2V0UG10IgpwckFzc2V0UG10IgZlc3RQdXQiBGVtaXQiBmFtb3VudCIHZW1pdEludiINZW1pdEludkxlZ2FjeSIHJG1hdGNoMCIVbGVnYWN5RmFjdG9yeUNvbnRyYWN0Igd0YWtlRmVlIglmZWVBbW91bnQiD2NhbGNQdXRPbmVUb2tlbiIQcGF5bWVudEFtb3VudFJhdyIOcGF5bWVudEFzc2V0SWQiBmlzRXZhbCIQYW1vdW50QmFsYW5jZVJhdyIPcHJpY2VCYWxhbmNlUmF3IhRwYXltZW50SW5BbW91bnRBc3NldCINJHQwMjQyNjkyNDU2MiIQYW1vdW50QmFsYW5jZU9sZCIPcHJpY2VCYWxhbmNlT2xkIg0kdDAyNDU2NjI0NzE1IhRhbW91bnRBc3NldEFtb3VudFJhdyITcHJpY2VBc3NldEFtb3VudFJhdyINJHQwMjQ4MzcyNDg5NiINcGF5bWVudEFtb3VudCIQYW1vdW50QmFsYW5jZU5ldyIPcHJpY2VCYWxhbmNlTmV3IgtwcmljZU5ld1gxOCIIcHJpY2VOZXciDnBheW1lbnRCYWxhbmNlIhRwYXltZW50QmFsYW5jZUJpZ0ludCIMc3VwcGx5QmlnSW50IgtjaGVjaFN1cHBseSINZGVwb3NpdEJpZ0ludCILaXNzdWVBbW91bnQiC3ByaWNlT2xkWDE4IghwcmljZU9sZCIEbG9zcyINJHQwMjYzOTcyNjU2NCIHYmFsYW5jZSIPaXNzdWVBbW91bnRCb3RoIg9jYWxjR2V0T25lVG9rZW4iCm91dEFzc2V0SWQiBmNoZWNrcyIQb3V0SW5BbW91bnRBc3NldCINYmFsYW5jZUJpZ0ludCIYb3V0SW5BbW91bnRBc3NldERlY2ltYWxzIgxhbUJhbGFuY2VPbGQiDHByQmFsYW5jZU9sZCIKb3V0QmFsYW5jZSIQb3V0QmFsYW5jZUJpZ0ludCIOcmVkZWVtZWRCaWdJbnQiCWFtb3VudFJhdyINJHQwMjg0NjUyODUxNSILdG90YWxBbW91bnQiDSR0MDI4NTE5Mjg3NDUiC291dEFtQW1vdW50IgtvdXRQckFtb3VudCIMYW1CYWxhbmNlTmV3IgxwckJhbGFuY2VOZXciGGFtb3VudEJvdGhJblBheW1lbnRBc3NldCIWbWFuYWdlclB1YmxpY0tleU9yVW5pdCIBcyIdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQiCWlzTWFuYWdlciICcGsiC211c3RNYW5hZ2VyIgJwZCIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiC2NoZWNrQ2FsbGVyIhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSIPc2hvdWxkQXV0b1N0YWtlIgRhbUlkIgRwcklkIgxzbGlwcGFnZUFJbnYiDHNsaXBwYWdlUEludiIKbHBUcmFuc2ZlciILc2xwU3Rha2VJbnYiDSR0MDMzMjczMzM3MzUiEXJlZnJlc2hLTHBBY3Rpb25zIhFpc1VwZGF0ZWRLTHBWYWxpZCILbWF4U2xpcHBhZ2UiDSR0MDM0Mjk3MzQzNjIiDG1pbk91dEFtb3VudCIJYXV0b1N0YWtlIiBpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZCIBQCINaXNQdXREaXNhYmxlZCIHcGF5bWVudCINJHQwMzU1NTAzNTcwMiIFYm9udXMiE2VtaXRBbW91bnRFc3RpbWF0ZWQiCmVtaXRBbW91bnQiCHN0YWtlSW52IgdzZW5kRmVlIg0kdDAzNjI4ODM2NDg1Ig0kdDAzNjQ4ODM2NTk2Ig0kdDAzNjkwMjM3MDU5Ig1vdXRBc3NldElkU3RyIg1pc0dldERpc2FibGVkIg0kdDAzNzk0NDM4MDk3Ig9hbW91bnRFc3RpbWF0ZWQiB2J1cm5JbnYiDWFzc2V0VHJhbnNmZXIiDSR0MDM4NTk3Mzg4NDQiEGZlZUFtb3VudEZvckNhbGMiDSR0MDM4ODQ3Mzg5NTUiDSR0MDM5MjEyMzkzNjgiDXVuc3Rha2VBbW91bnQiCnVuc3Rha2VJbnYiDSR0MDQwMjcwNDA0MjEiDSR0MDQwOTE2NDExNjMiDSR0MDQxMTY2NDEyNzQiCW91dEFtdEFtdCIUYnVybkxQQXNzZXRPbkZhY3RvcnkiDSR0MDQyMjIwNDIzMDIiEm5vTGVzc1RoZW5BbXRBc3NldCIUbm9MZXNzVGhlblByaWNlQXNzZXQiDSR0MDQzMjUzNDMzMzQiDWNoZWNrUGF5bWVudHMiD2NoZWNrUG9vbFN0YXR1cyINJHQwNDQ0NTc0NDUzOCIVbm9MZXNzVGhlbkFtb3VudEFzc2V0IgxjaGVja0Ftb3VudHMiDSR0MDQ1ODMwNDU5MTEiC2FtdEFzc2V0U3RyIg1wcmljZUFzc2V0U3RyIhhsYXN0UmVmcmVzaGVkQmxvY2tIZWlnaHQiHWNoZWNrTGFzdFJlZnJlc2hlZEJsb2NrSGVpZ2h0Ig0kdDA0NzA5ODQ3MTYyIhBrTHBVcGRhdGVBY3Rpb25zIgphbXRBc3NldElkIgxwcmljZUFzc2V0SWQiDXBvb2xMUEJhbGFuY2UiEmFjY0FtdEFzc2V0QmFsYW5jZSIUYWNjUHJpY2VBc3NldEJhbGFuY2UiCnByaWNlc0xpc3QiD2xwQW10QXNzZXRTaGFyZSIRbHBQcmljZUFzc2V0U2hhcmUiCnBvb2xXZWlnaHQiDGN1clByaWNlQ2FsYyIMYW1CYWxhbmNlUmF3IgxwckJhbGFuY2VSYXciD2FtQmFsYW5jZVJhd1gxOCIPcHJCYWxhbmNlUmF3WDE4IhBwYXltZW50THBBc3NldElkIgxwYXltZW50THBBbXQiAnR4IgZ2ZXJpZnkiD3RhcmdldFB1YmxpY0tleSIKbWF0Y2hlclB1YiIHbmV3SGFzaCILYWxsb3dlZEhhc2giC2N1cnJlbnRIYXNobwABYQAIAAFiAIDC1y8AAWMJALYCAQCAwtcvAAFkCQC2AgEAgICQu7rWrfANAAFlCQC2AgEAAAABZgkAtgIBAAAAAWcJALYCAQABAAFoCQC2AgEAAgABaQIFV0FWRVMAAWoCAl9fAAFrAAEAAWwAAgABbQADAAFuAAQAAW8AAQABcAACAAFxAAMAAXIABAABcwAFAAF0AAYAAXUABwABdgAIAAF3AAkAAXgACgABeQABAAF6AAIAAUEAAwABQgABAAFDAAcBAUQCAUUBRgkAvAIDCQC2AgEFAUUFAWQJALYCAQUBRgEBRwIBSAFJCQCgAwEJALwCAwUBSAkAtgIBBQFJBQFkAQFKAwFIAUkBSwkAoAMBCQC9AgQFAUgJALYCAQUBSQUBZAUBSwEBTAMBTQFOAU8JAGsDBQFNBQFOBQFPAQFQAQFIAwkAZgIAAAUBSAkBAS0BBQFIBQFIAQFRAQFIAwkAvwICBQFlBQFICQC+AgEFAUgFAUgBAVIAAhMlc19fZmFjdG9yeUNvbnRyYWN0AQFTAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBAVQAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAVUAAhElcyVzX19wcmljZV9fbGFzdAEBVgIBVwFYCQC5CQIJAMwIAgIYJXMlcyVkJWRfX3ByaWNlX19oaXN0b3J5CQDMCAIJAKQDAQUBVwkAzAgCCQCkAwEFAVgFA25pbAUBagEBWQIBWgJhYQkArAICCQCsAgIJAKwCAgILJXMlcyVzX19QX18FAVoCAl9fBQJhYQECYWICAVoCYWEJAKwCAgkArAICCQCsAgICCyVzJXMlc19fR19fBQFaAgJfXwUCYWEBAmFjAAIPJXNfX2Ftb3VudEFzc2V0AQJhZAACDiVzX19wcmljZUFzc2V0AAJhZQIHJXNfX2ZlZQACYWYJAGsDAAoFAWIAkE4AAmFnCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAmFlBQJhZgACYWgJALkJAgkAzAgCAgIlcwkAzAgCAgNrTHAFA25pbAUBagACYWkJALkJAgkAzAgCAgIlcwkAzAgCAhJrTHBSZWZyZXNoZWRIZWlnaHQFA25pbAUBagACYWoJALkJAgkAzAgCAgIlcwkAzAgCAg9yZWZyZXNoS0xwRGVsYXkFA25pbAUBagACYWsAHgACYWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUCYWoFAmFrAQJhbQACESVzX19mYWN0b3J5Q29uZmlnAQJhbgACGCVzJXNfX21hdGNoZXJfX3B1YmxpY0tleQECYW8BAmFwCQCsAgIJAKwCAgIIJXMlcyVzX18FAmFwAiBfX21hcHBpbmdzX19wb29sQ29udHJhY3QyTHBBc3NldAECYXECAmFyAmFzCQCsAgIJAKwCAgkArAICCQCsAgICCCVkJWQlc19fBQJhcgICX18FAmFzAghfX2NvbmZpZwECYXQBAmF1CQCsAgICKCVzJXMlc19fbWFwcGluZ3NfX2Jhc2VBc3NldDJpbnRlcm5hbElkX18FAmF1AQJhdgACDCVzX19zaHV0ZG93bgECYXcBAmF4CQCsAgICEiVzJXNfX3Bvb2xXZWlnaHRfXwUCYXgBAmF5AAIXJXNfX2FsbG93ZWRMcFNjcmlwdEhhc2gAAmF6Ahclc19fZmVlQ29sbGVjdG9yQWRkcmVzcwECYUEDAmFCAmFDAmFECQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICJG9yZGVyIHZhbGlkYXRpb24gZmFpbGVkOiBvcmRlclZhbGlkPQkApQMBBQJhQgINIHNlbmRlclZhbGlkPQkApQMBBQJhQwIOIG1hdGNoZXJWYWxpZD0JAKUDAQUCYUQBAmFFAgJhRgJhRwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFGBQJhRwkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQJhRgkAzAgCAgEuCQDMCAIFAmFHCQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABAmFIAgJhRgJhRwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFAmFGBQJhRwkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQJhRgkAzAgCAgEuCQDMCAIFAmFHCQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABAmFJAQJhSgkAAgEJALkJAgkAzAgCAghscC5yaWRlOgkAzAgCBQJhSgUDbmlsAgEgAQJhSwECYUoJALkJAgkAzAgCAghscC5yaWRlOgkAzAgCBQJhSgUDbmlsAgEgAAJhTAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmFFAgUEdGhpcwkBAVIAAAJhTQkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmFFAgUCYUwFAmF6AQJhTgAJAQt2YWx1ZU9yRWxzZQIJAJsIAgUCYUwJAQJhdgAHAQJhTwAJANkEAQkBAmFFAgUCYUwJAQJhbgABAmFQAAQCYVEJAQJhRQIFBHRoaXMJAQJhYwAEAmFSCQECYUUCBQR0aGlzCQECYWQABAJhcwkBAmFIAgUCYUwJAQJhdAEFAmFSBAJhcgkBAmFIAgUCYUwJAQJhdAEFAmFRCQC1CQIJAQJhRQIFAmFMCQECYXECCQCkAwEFAmFyCQCkAwEFAmFzBQFqAQJhUwECYVQDCQAAAgUCYVQFAWkFBHVuaXQJANkEAQUCYVQBAmFVAQJhVAMJAAACBQJhVAUEdW5pdAUBaQkA2AQBCQEFdmFsdWUBBQJhVAECYVYBAmFXCQCZCgcJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYVcFAW8JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhVwUBcAkA2QQBCQCRAwIFAmFXBQFxCQECYVMBCQCRAwIFAmFXBQFyCQECYVMBCQCRAwIFAmFXBQFzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYVcFAXQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhVwUBdQACYVgJAQJhVgEJAQJhUAAAAmFZBQJhWAACYVoIBQJhWQJfMQACYmEIBQJhWQJfMgACYmIIBQJhWQJfMwACYmMIBQJhWQJfNAACYmQIBQJhWQJfNQACYmUIBQJhWQJfNgACYmYIBQJhWQJfNwECYmcACQC1CQIJAQJhRQIFAmFMCQECYW0ABQFqAAJiaAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgkBAmJnAAUBQgIZaW5jb3JyZWN0IHN0YWtpbmcgYWRkcmVzcwACYmkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIJAQJiZwAFAUMCGWluY29ycmVjdCBzdGFraW5nIGFkZHJlc3MBAmJqCgJiawJibAJibQJibgJibwJicAJicQJicgJicwJidAkAuQkCCQDMCAICFCVkJWQlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYmsJAMwIAgkApAMBBQJibAkAzAgCCQCkAwEFAmJtCQDMCAIJAKQDAQUCYm4JAMwIAgkApAMBBQJibwkAzAgCCQCkAwEFAmJwCQDMCAIJAKQDAQUCYnEJAMwIAgkApAMBBQJicgkAzAgCCQCkAwEFAmJzCQDMCAIJAKQDAQUCYnQFA25pbAUBagECYnUGAmJ2AmJ3AmJ4AmJuAmJxAmJyCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYnYJAMwIAgkApAMBBQJidwkAzAgCCQCkAwEFAmJ4CQDMCAIJAKQDAQUCYm4JAMwIAgkApAMBBQJicQkAzAgCCQCkAwEFAmJyBQNuaWwFAWoBAmJ5AQJiegMJAAACBQJiegIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUCYnoBAmJBAgJiQgJiQwkAvAIDBQJiQgUBZAUCYkMBAmJEAwJiQgJiQwFLCQC9AgQFAmJCBQFkBQJiQwUBSwECYkUEAmJGAmJHAmJIAmJJBAJiSgkBAUQCBQJiSAUCYkYEAmJLCQEBRAIFAmJJBQJiRwkBAmJBAgUCYksFAmJKAQJiTAMCYkgCYkkCYk0EAmJOCQECYVAABAJiTwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJOBQF0BAJiUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJOBQF1BAJiUQkBAmJFBAUCYk8FAmJQBQJiSAUCYkkEAmJDCQEBRAIFAmJIBQJiTwQCYkIJAQFEAgUCYkkFAmJQBAJiUgkBAUQCBQJiTQUBYgQCYlMJAQJiQQIFAmJDBQJiUgQCYlQJAQJiQQIFAmJCBQJiUgkAzAgCBQJiUQkAzAgCBQJiUwkAzAgCBQJiVAUDbmlsAQJiVQMCYkgCYkkCYk0EAmJWCQECYkwDBQJiSAUCYkkFAmJNCQDMCAIJAQFHAgkAkQMCBQJiVgAABQFiCQDMCAIJAQFHAgkAkQMCBQJiVgABBQFiCQDMCAIJAQFHAgkAkQMCBQJiVgACBQFiBQNuaWwBAmJXBAJiWAJiWQJiWgFaBAJiTgkBAmFQAAQCY2EJAJEDAgUCYk4FAXEEAmNiCQCRAwIFAmJOBQFyBAJjYwkAkQMCBQJiTgUBcwQCYkYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiTgUBdAQCYkcJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiTgUBdQQCY2QJAJEDAgUCYk4FAXAEAmNlCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUCY2EJAKwCAgkArAICAgZBc3NldCAFAmNhAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQMJAQIhPQIFAmNhBQJiWQkAAgECFUludmFsaWQgYXNzZXQgcGFzc2VkLgQCY2YJAQJieQEFAmNiBAJjZwkBAUQCBQJjZgUCYkYEAmNoCQECYnkBBQJjYwQCY2kJAQFEAgUCY2gFAmJHBAJjagkBAmJBAgUCY2kFAmNnBAJjawkBAUcCBQJjagUBYgQCY2wJAQFEAgUCYloFAWIEAmNtCQEBRAIFAmNlBQFiBAJjbgkAvAIDBQJjZwUCY2wFAmNtBAJjbwkAvAIDBQJjaQUCY2wFAmNtBAJjcAkBAUoDBQJjbgUCYkYFBUZMT09SBAJjcQkBAUoDBQJjbwUCYkcFBUZMT09SBAJjcgMJAAACBQJiWAIABQNuaWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUBWgUCY3ADCQAAAgUCY2ICBVdBVkVTBQR1bml0CQDZBAEFAmNiCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAVoFAmNxAwkAAAIFAmNjAgVXQVZFUwUEdW5pdAkA2QQBBQJjYwkAzAgCCQELU3RyaW5nRW50cnkCCQECYWICCQClCAEFAVoFAmJYCQECYnUGBQJjcAUCY3EFAmJaBQJjawUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVUABQJjawkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVYCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjawUDbmlsCQCcCgoFAmNwBQJjcQUCY2IFAmNjBQJjZgUCY2gFAmNlBQJjagUCY2QFAmNyAQJjcwkCYlgCY3QCY3UCY3YCY3cCY3gBWgJjeQJjegQCYk4JAQJhUAAEAmNhCQDZBAEJAJEDAgUCYk4FAXEEAmNBCQCRAwIFAmJOBQFyBAJjQgkAkQMCBQJiTgUBcwQCY0MJAJEDAgUCYk4FAXYEAmNECQCRAwIFAmJOBQF3BAJiTwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJOBQF0BAJiUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJOBQF1BAJjZAkAkQMCBQJiTgUBcAQCY2UICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCY2EJAKwCAgkArAICAgZBc3NldCAJANgEAQUCY2ECDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJjRQkA2AQBCQELdmFsdWVPckVsc2UCBQJjdgkA2QQBAgVXQVZFUwQCY0YJANgEAQkBC3ZhbHVlT3JFbHNlAgUCY3gJANkEAQIFV0FWRVMDAwkBAiE9AgUCY0EFAmNFBgkBAiE9AgUCY0IFAmNGCQACAQIiSW52YWxpZCBhbXQgb3IgcHJpY2UgYXNzZXQgcGFzc2VkLgQCY2YDBQJjeQkBAmJ5AQUCY0EJAGUCCQECYnkBBQJjQQUCY3UEAmNoAwUCY3kJAQJieQEFAmNCCQBlAgkBAmJ5AQUCY0IFAmN3BAJjRwkBAUQCBQJjdQUCYk8EAmNICQEBRAIFAmN3BQJiUAQCY0kJAQJiQQIFAmNIBQJjRwQCY2cJAQFEAgUCY2YFAmJPBAJjaQkBAUQCBQJjaAUCYlAEAmNKAwkAAAIFAmNlAAAEAmNqBQFlBAJjSwUBZQQCYlIJAHYGCQC5AgIFAmNHBQJjSAAACQC2AgEABQABAAAFBERPV04JAJcKBQkBAUcCBQJiUgUBYgkBAUcCBQJjRwUCYk8JAQFHAgUCY0gFAmJQCQECYkECCQC3AgIFAmNpBQJjSAkAtwICBQJjZwUCY0cFAmNLBAJjagkBAmJBAgUCY2kFAmNnBAJjSwkAvAIDCQEBUQEJALgCAgUCY2oFAmNJBQFkBQJjagQCY0wJAQFEAgUCY3QFAWIDAwkBAiE9AgUCY2oFAWUJAL8CAgUCY0sFAmNMBwkAAgEJAKwCAgkArAICCQCsAgICD1ByaWNlIHNsaXBwYWdlIAkApgMBBQJjSwIeIGV4Y2VlZGVkIHRoZSBwYXNzZWQgbGltaXQgb2YgCQCmAwEFAmNMBAJjbQkBAUQCBQJjZQUBYgQCY00JAL0CBAUCY0cJAQJiRAMFAmNpBQJjZwUHQ0VJTElORwUBZAUHQ0VJTElORwQCY04JAL0CBAUCY0gFAWQJAQJiRAMFAmNpBQJjZwUFRkxPT1IFB0NFSUxJTkcEAmNPAwkAvwICBQJjTQUCY0gJAJQKAgUCY04FAmNICQCUCgIFAmNHBQJjTQQCY1AIBQJjTwJfMQQCY1EIBQJjTwJfMgQCYlIJAL0CBAUCY20FAmNRBQJjaQUFRkxPT1IJAJcKBQkBAUoDBQJiUgUBYgUFRkxPT1IJAQFKAwUCY1AFAmJPBQdDRUlMSU5HCQEBSgMFAmNRBQJiUAUHQ0VJTElORwUCY2oFAmNLBAJjUggFAmNKAl8xBAJjUwgFAmNKAl8yBAJjVAgFAmNKAl8zBAJjawkBAUcCCAUCY0oCXzQFAWIEAmNVCQEBRwIIBQJjSgJfNQUBYgMJAGcCAAAFAmNSCQACAQI2SW52YWxpZCBjYWxjdWxhdGlvbnMuIExQIGNhbGN1bGF0ZWQgaXMgbGVzcyB0aGFuIHplcm8uBAJjVgMJAQEhAQUCY3oAAAUCY1IEAmNXCQBlAgUCY3UFAmNTBAJjWAkAZQIFAmN3BQJjVAQCY1kJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFVAAUCY2sJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFWAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY2sJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVkCBQFaBQJiWAkBAmJqCgUCY1MFAmNUBQJjVgUCY2sFAmN0BQJjVQUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY1cFAmNYBQNuaWwJAJ8KDQUCY1IFAmNWBQJjawUCY2YFAmNoBQJjZQUCY2EFAmNkBQJjWQUCY1cFAmNYBQJjdgUCY3gBAmNaAwJkYQJkYgJjZQQCZGMJALwCAwkAdgYJALkCAgUCZGEFAmRiAAAJALYCAQAFAAEAEgUERE9XTgUBZwUCY2UDCQAAAgUCY2UFAWYFAWYFAmRjAQJkZAMCZGUCZGYCZGcEAmRoCQC4AgIJALYCAQkBAmJ5AQkBAmFVAQUCYmMFAmRlBAJkaQkAuAICCQC2AgEJAQJieQEJAQJhVQEFAmJkBQJkZgQCZGoJALgCAgkAtgIBCAkBBXZhbHVlAQkA7AcBBQJiYghxdWFudGl0eQUCZGcEAmRrCQECY1oDBQJkaAUCZGkFAmRqBQJkawECZGwDAmRtAmRuAmRnBAJkaAkAZAIJAQJieQEJAQJhVQEFAmJjBQJkbQQCZGkJAGQCCQECYnkBCQECYVUBBQJiZAUCZG4EAmRqCQBkAggJAQV2YWx1ZQEJAOwHAQUCYmIIcXVhbnRpdHkFAmRnBAJkYwkBAmNaAwkAtgIBBQJkaAkAtgIBBQJkaQkAtgIBBQJkagQCZG8JAMwIAgkBDEludGVnZXJFbnRyeQIFAmFpBQZoZWlnaHQJAMwIAgkBC1N0cmluZ0VudHJ5AgUCYWgJAKYDAQUCZGMFA25pbAkAlAoCBQJkbwUCZGMBAmRwAgJkcQJkYwMJAMACAgUCZGMFAmRxBgkBAmFJAQkAuQkCCQDMCAICInVwZGF0ZWQgS0xwIGxvd2VyIHRoYW4gY3VycmVudCBLTHAJAMwIAgkApgMBBQJkcQkAzAgCCQCmAwEFAmRjBQNuaWwCASABAmRyAQJkcwQCZHQIBQJkcwZhbW91bnQEAmR1CQBuBAgFAmRzBmFtb3VudAgFAmRzBXByaWNlBQFiBQVGTE9PUgQCZHYDCQAAAggFAmRzCW9yZGVyVHlwZQUDQnV5CQCUCgIFAmR0CQEBLQEFAmR1CQCUCgIJAQEtAQUCZHQFAmR1BAJkbQgFAmR2Al8xBAJkbggFAmR2Al8yAwMDCQECYU4ABgkAAAIFAmJhBQFtBgkAAAIFAmJhBQFuCQACAQIcRXhjaGFuZ2Ugb3BlcmF0aW9ucyBkaXNhYmxlZAMDCQECIT0CCAgFAmRzCWFzc2V0UGFpcgthbW91bnRBc3NldAUCYmMGCQECIT0CCAgFAmRzCWFzc2V0UGFpcgpwcmljZUFzc2V0BQJiZAkAAgECE1dyb25nIG9yZGVyIGFzc2V0cy4EAmR3CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKgDAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFAmFoCQECYUsBAg9rTHAgaXMgcmVxdWlyZWQJAQJhSwECC2ludmFsaWQga0xwBAJkeAkBAmRsAwUCZG0FAmRuAAAEAmR5CAUCZHgCXzEEAmR6CAUCZHgCXzIEAmRBCQDAAgIFAmR6BQJkdwUCZEEBAmRCAQJkQwMJAQIhPQIJAJADAQgFAmRDCHBheW1lbnRzAAEJAAIBAh1leGFjdGx5IDEgcGF5bWVudCBpcyBleHBlY3RlZAQCZEQJAQV2YWx1ZQEJAJEDAggFAmRDCHBheW1lbnRzAAAEAmJZCQEFdmFsdWUBCAUCZEQHYXNzZXRJZAQCZEUIBQJkRAZhbW91bnQEAmNKCQECYlcECQDYBAEIBQJkQw10cmFuc2FjdGlvbklkCQDYBAEFAmJZBQJkRQgFAmRDBmNhbGxlcgQCY3AIBQJjSgJfMQQCY3EIBQJjSgJfMgQCY2QJAQ1wYXJzZUludFZhbHVlAQgFAmNKAl85BAJjcggFAmNKA18xMAMDCQECYU4ABgkAAAIFAmNkBQFuCQACAQkArAICAixHZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4uIFN0YXR1cyA9IAkApAMBBQJjZAkAlwoFBQJjcAUCY3EFAmRFBQJiWQUCY3IBAmRGAwJkQwJjdAJjegMJAQIhPQIJAJADAQgFAmRDCHBheW1lbnRzAAIJAAIBAh9leGFjdGx5IDIgcGF5bWVudHMgYXJlIGV4cGVjdGVkBAJkRwkBBXZhbHVlAQkAkQMCCAUCZEMIcGF5bWVudHMAAAQCZEgJAQV2YWx1ZQEJAJEDAggFAmRDCHBheW1lbnRzAAEEAmRJCQECY3MJCQDYBAEIBQJkQw10cmFuc2FjdGlvbklkBQJjdAgFAmRHBmFtb3VudAgFAmRHB2Fzc2V0SWQIBQJkSAZhbW91bnQIBQJkSAdhc3NldElkCQClCAEIBQJkQwZjYWxsZXIHBQJjegQCY2QJAQ1wYXJzZUludFZhbHVlAQgFAmRJAl84AwMDCQECYU4ABgkAAAIFAmNkBQFsBgkAAAIFAmNkBQFuCQACAQkArAICAixQdXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4uIFN0YXR1cyA9IAkApAMBBQJjZAUCZEkBAmRKAQJkSwQCZEwJAPwHBAUCYUwCBGVtaXQJAMwIAgUCZEsFA25pbAUDbmlsAwkAAAIFAmRMBQJkTAQCZE0EAmROBQJkTAMJAAECBQJkTgIHQWRkcmVzcwQCZE8FAmROCQD8BwQFAmRPAgRlbWl0CQDMCAIFAmRLBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkTQUCZE0FAmRLCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJkUAECZEsEAmRRCQBrAwUCZEsFAmFnBQFiCQCUCgIJAGUCBQJkSwUCZFEFAmRRAQJkUgQCZFMCZFQBWgJhYQQCZFUJAAACBQJhYQUEdW5pdAQCZFYJAQJieQEJAQJhVQEFAmJjBAJkVwkBAmJ5AQkBAmFVAQUCYmQEAmRYAwkAAAIFAmRUBQJiYwYDCQAAAgUCZFQFAmJkBwkBAmFJAQINaW52YWxpZCBhc3NldAQCZFkDBQJkVQkAlAoCBQJkVgUCZFcDBQJkWAkAlAoCCQBlAgUCZFYFAmRTBQJkVwkAlAoCBQJkVgkAZQIFAmRXBQJkUwQCZFoIBQJkWQJfMQQCZWEIBQJkWQJfMgQCZWIDBQJkWAkAlAoCBQJkUwAACQCUCgIAAAUCZFMEAmVjCAUCZWICXzEEAmVkCAUCZWICXzIEAmR0CAkBAmRQAQUCZWMCXzEEAmR1CAkBAmRQAQUCZWQCXzEEAmVlCQECZFABBQJkUwQCZWYIBQJlZQJfMQQCZFEIBQJlZQJfMgQCZWcJAGQCBQJkWgUCZHQEAmVoCQBkAgUCZWEFAmR1BAJlaQkBAmJBAgkBAUQCBQJlaAUCYmYJAQFEAgUCZWcFAmJlBAJlagkBAUcCBQJlaQUBYgQCZWsDBQJkWAUCZFoFAmVhBAJlbAkAtgIBBQJlawQCZW0JALYCAQgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiYgkArAICCQCsAgICBmFzc2V0IAkA2AQBBQJiYgIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmVuAwkAvwICBQJlbQUBZgYJAQJhSQECImluaXRpYWwgZGVwb3NpdCByZXF1aXJlcyBhbGwgY29pbnMDCQAAAgUCZW4FAmVuBAJlbwkAtgIBBQJlZgQCZXAJAJYDAQkAzAgCAAAJAMwIAgkBAUoDCQC8AgMFAmVtCQC4AgIJAQpzcXJ0QmlnSW50BAkAtwICBQFkCQC6AgIJALkCAgUCZW8FAWQFAmVsABIAEgUERE9XTgUBZAUBZAUBYgUFRkxPT1IFA25pbAQCY1kDBQJkVQUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVQAFAmVqCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVgIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVqCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFZAgkApQgBCQEFdmFsdWUBBQFaCQDYBAEJAQV2YWx1ZQEFAmFhCQECYmoKBQJlYwUCZWQFAmVwBQJlagAAAAAFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAAAAAABQNuaWwEAmVxCQECYkECCQEBRAIFAmVhBQJiZgkBAUQCBQJkWgUCYmUEAmVyCQEBRwIFAmVxBQFiBAJlcwQCZXQDBQJkWAkAlAoCBQJlYwUCZFoJAJQKAgUCZWQFAmVhBAJkSwgFAmV0Al8xBAJldQgFAmV0Al8yBAJldgkAoAMBCQC8AgMFAmVtCQC2AgEJAGkCBQJkSwACCQC2AgEFAmV1CQBrAwkAZQIFAmVwBQJldgUBYgUCZXYJAJcKBQUCZXAFAmNZBQJkUQUCZXMFAmRYCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJldwUCZXgCZWYCZFQBWgJhYQQCZFUJAAACBQJhYQUEdW5pdAQCYk4JAQJhUAAEAmJPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYk4FAXQEAmJQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYk4FAXUEAmV5CQDMCAIDCQAAAgUCZFQFAmJiBgkBAmFJAQIQaW52YWxpZCBscCBhc3NldAUDbmlsAwkAAAIFAmV5BQJleQQCZXoDCQAAAgUCZXgFAmJjBgMJAAACBQJleAUCYmQHCQECYUkBAg1pbnZhbGlkIGFzc2V0BAJlQQMFAmV6CQC2AgEJAQJieQEJAQJhVQEFAmJjCQC2AgEJAQJieQEJAQJhVQEFAmJkBAJlQgMFAmV6BQJiTwUCYlAEAmVDCQECYnkBCQECYVUBBQJiYwQCZUQJAQJieQEJAQJhVQEFAmJkBAJlRQMFAmV6BQJlQwUCZUQEAmVGCQC2AgEFAmVFBAJlbQkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmJiCQCsAgIJAKwCAgIGYXNzZXQgCQDYBAEFAmJiAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZUcJALYCAQUCZWYEAmVICQCWAwEJAMwIAgAACQDMCAIJAQFKAwkAvAIDBQJlQQkAuAICBQFkCQB2BgkAuAICBQFkCQC6AgIJALkCAgUCZUcFAWQFAmVtABIFAWgAAAASBQRET1dOBQFkBQJlQgUFRkxPT1IFA25pbAQCZUkJAQJkUAEFAmVIBAJlSggFAmVJAl8xBAJkUQgFAmVJAl8yBAJlSwMFAmV6CQCWCgQFAmVKAAAJAGUCBQJlQwUCZUgFAmVECQCWCgQAAAUCZUoFAmVDCQBlAgUCZUQFAmVIBAJlTAgFAmVLAl8xBAJlTQgFAmVLAl8yBAJlTggFAmVLAl8zBAJlTwgFAmVLAl80BAJlaQkBAmJBAgkBAUQCBQJlTwUCYmYJAQFEAgUCZU4FAmJlBAJlagkBAUcCBQJlaQUBYgQCY1kDBQJkVQUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhYgIJAKUIAQkBBXZhbHVlAQUBWgkA2AQBCQEFdmFsdWUBBQJhYQkBAmJ1BgUCZUwFAmVNBQJlZgUCZWoFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFVAAUCZWoJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFWAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCZWoFA25pbAQCZXEJAQJiQQIJAQFEAgUCZUQFAmJmCQEBRAIFAmVDBQJiZQQCZXIJAQFHAgUCZXEFAWIEAmVzBAJlUAkAaAIJAKADAQkAvAIDBQJlQQUCZUcFAmVtAAIJAGsDCQBlAgUCZUoFAmVQBQFiBQJlUAkAlwoFBQJlSgUCY1kFAmRRBQJlcwUCZXoJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmVRAAQCZE4JAKIIAQkBAVMAAwkAAQIFAmROAgZTdHJpbmcEAmVSBQJkTgkA2QQBBQJlUgMJAAECBQJkTgIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJlUwAEAmROCQCiCAEJAQFUAAMJAAECBQJkTgIGU3RyaW5nBAJlUgUCZE4JANkEAQUCZVIDCQABAgUCZE4CBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECZVQBAmRDBAJkTgkBAmVRAAMJAAECBQJkTgIKQnl0ZVZlY3RvcgQCZVUFAmROCQAAAggFAmRDD2NhbGxlclB1YmxpY0tleQUCZVUDCQABAgUCZE4CBFVuaXQJAAACCAUCZEMGY2FsbGVyBQR0aGlzCQACAQILTWF0Y2ggZXJyb3IBAmVWAQJkQwQCZVcJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQCZE4JAQJlUQADCQABAgUCZE4CCkJ5dGVWZWN0b3IEAmVVBQJkTgMJAAACCAUCZEMPY2FsbGVyUHVibGljS2V5BQJlVQYFAmVXAwkAAQIFAmROAgRVbml0AwkAAAIIBQJkQwZjYWxsZXIFBHRoaXMGBQJlVwkAAgECC01hdGNoIGVycm9yGwJkQwEKc2V0TWFuYWdlcgECZVgEAmVZCQECZVYBBQJkQwMJAAACBQJlWQUCZVkEAmVaCQDZBAEFAmVYAwkAAAIFAmVaBQJlWgkAzAgCCQELU3RyaW5nRW50cnkCCQEBVAAFAmVYBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZEMBDmNvbmZpcm1NYW5hZ2VyAAQCZmEJAQJlUwAEAmZiAwkBCWlzRGVmaW5lZAEFAmZhBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJmYgUCZmIEAmZjAwkAAAIIBQJkQw9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmZhBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJmYwUCZmMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVMACQDYBAEJAQV2YWx1ZQEFAmZhCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFUAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRDAQNwdXQCAmN0AmZkAwkAZgIAAAUCY3QJAAIBAiBJbnZhbGlkIHNsaXBwYWdlVG9sZXJhbmNlIHBhc3NlZAQCZEkJAQJkRgMFAmRDBQJjdAYEAmNWCAUCZEkCXzIEAmNhCAUCZEkCXzcEAmNyCAUCZEkCXzkEAmNXCAUCZEkDXzEwBAJjWAgFAmRJA18xMQQCZmUIBQJkSQNfMTIEAmZmCAUCZEkDXzEzBAJkRwkAtgIBCAkBBXZhbHVlAQkAkQMCCAUCZEMIcGF5bWVudHMAAAZhbW91bnQEAmRICQC2AgEICQEFdmFsdWUBCQCRAwIIBQJkQwhwYXltZW50cwABBmFtb3VudAQCZGsJAQJkZAMFAmRHBQJkSAkAtgIBAAADCQAAAgUCZGsFAmRrBAJkTAkA/AcEBQJhTAIEZW1pdAkAzAgCBQJjVgUDbmlsBQNuaWwDCQAAAgUCZEwFAmRMBAJkTQQCZE4FAmRMAwkAAQIFAmROAgdBZGRyZXNzBAJkTwUCZE4JAPwHBAUCZE8CBGVtaXQJAMwIAgUCY1YFA25pbAUDbmlsBQR1bml0AwkAAAIFAmRNBQJkTQQCZmcDCQBmAgUCY1cAAAkA/AcEBQJiaQIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmZlBQJjVwUDbmlsBQNuaWwDCQAAAgUCZmcFAmZnBAJmaAMJAGYCBQJjWAAACQD8BwQFAmJpAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZmYFAmNYBQNuaWwFA25pbAMJAAACBQJmaAUCZmgEAmZpAwUCZmQEAmZqCQD8BwQFAmJoAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJjYQUCY1YFA25pbAMJAAACBQJmagUCZmoFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZEMGY2FsbGVyBQJjVgUCY2EFA25pbAQCZmsJAQJkbAMAAAAAAAADCQAAAgUCZmsFAmZrBAJkYwgFAmZrAl8yBAJmbAgFAmZrAl8xBAJmbQkBAmRwAgUCZGsFAmRjAwkAAAIFAmZtBQJmbQkAzggCCQDOCAIFAmNyBQJmaQUCZmwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZEMBCnB1dEZvckZyZWUBAmZuAwkAZgIAAAUCZm4JAAIBAhRJbnZhbGlkIHZhbHVlIHBhc3NlZAQCZEkJAQJkRgMFAmRDBQJmbgcEAmNyCAUCZEkCXzkEAmRHCQC2AgEICQEFdmFsdWUBCQCRAwIIBQJkQwhwYXltZW50cwAABmFtb3VudAQCZEgJALYCAQgJAQV2YWx1ZQEJAJEDAggFAmRDCHBheW1lbnRzAAEGYW1vdW50BAJkawkBAmRkAwUCZEcFAmRICQC2AgEAAAMJAAACBQJkawUCZGsEAmZvCQECZGwDAAAAAAAABAJmbAgFAmZvAl8xBAJkYwgFAmZvAl8yBAJmbQkBAmRwAgUCZGsFAmRjAwkAAAIFAmZtBQJmbQkAzggCBQJjcgUCZmwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZEMBCXB1dE9uZVRrbgICZnACZnEEAmZyCgACZnMJAPwHBAUCYUwCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgkApQgBBQR0aGlzBQNuaWwFA25pbAMJAAECBQJmcwIHQm9vbGVhbgUCZnMJAAIBCQCsAgIJAAMBBQJmcwIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZnQDAwMJAQJhTgAGCQAAAgUCYmEFAWwGCQAAAgUCYmEFAW4GBQJmcgQCZXkJAMwIAgMDCQEBIQEFAmZ0BgkBAmVUAQUCZEMGCQECYUkBAiFwdXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkQwhwYXltZW50cwABBgkBAmFJAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXkFAmV5BAJmdQkAkQMCCAUCZEMIcGF5bWVudHMAAAQCZFQIBQJmdQdhc3NldElkBAJkUwgFAmZ1BmFtb3VudAQCZGsDCQAAAgUCZFQFAmJjCQECZGQDCQC2AgEFAmRTCQC2AgEAAAkAtgIBAAADCQAAAgUCZFQFAmJkCQECZGQDCQC2AgEAAAkAtgIBBQJkUwkAtgIBAAAJAQJhSQECHnBheW1lbnQgYXNzZXQgaXMgbm90IHN1cHBvcnRlZAMJAAACBQJkawUCZGsEAVoIBQJkQwZjYWxsZXIEAmFhCAUCZEMNdHJhbnNhY3Rpb25JZAQCZnYJAQJkUgQFAmRTBQJkVAUBWgUCYWEDCQAAAgUCZnYFAmZ2BAJkWAgFAmZ2Al81BAJmdwgFAmZ2Al80BAJkUQgFAmZ2Al8zBAJjWQgFAmZ2Al8yBAJmeAgFAmZ2Al8xBAJmeQMDCQBmAgUCZnAAAAkAZgIFAmZwBQJmeAcJAQJhSQEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZnAFA25pbAIABQJmeAQCZEwJAQJkSgEFAmZ5AwkAAAIFAmRMBQJkTAQCZmkDBQJmcQQCZnoJAPwHBAUCYmgCBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJiBQJmeQUDbmlsAwkAAAIFAmZ6BQJmegUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJkQwZjYWxsZXIFAmZ5BQJiYgUDbmlsBAJmQQMJAGYCBQJkUQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFNBQJkUQUCZFQFA25pbAUDbmlsBAJmQgMJAAACBQR0aGlzBQJhTQkAlAoCAAAAAAMFAmRYCQCUCgIJAQEtAQUCZFEAAAkAlAoCAAAJAQEtAQUCZFEEAmRtCAUCZkICXzEEAmRuCAUCZkICXzIEAmZDCQECZGwDBQJkbQUCZG4AAAQCZmwIBQJmQwJfMQQCZGMIBQJmQwJfMgQCZHcJAQV2YWx1ZQEJAKIIAQUCYWgEAmZtCQECZHACBQJkawUCZGMDCQAAAgUCZm0FAmZtCQCUCgIJAM4IAgkAzggCCQDOCAIFAmNZBQJmaQUCZkEFAmZsBQJmeQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkQwERcHV0T25lVGtuUkVBRE9OTFkCAmRUAmRTBAJmRAkBAmRSBAUCZFMJAQJhUwEFAmRUBQR1bml0BQR1bml0BAJmeAgFAmZEAl8xBAJjWQgFAmZEAl8yBAJkUQgFAmZEAl8zBAJmdwgFAmZEAl80BAJkWAgFAmZEAl81CQCUCgIFA25pbAkAlQoDBQJmeAUCZFEFAmZ3AmRDAQlnZXRPbmVUa24CAmZFAmZwBAJmcgoAAmZzCQD8BwQFAmFMAihpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZFJFQURPTkxZCQDMCAIJAKUIAQUEdGhpcwUDbmlsBQNuaWwDCQABAgUCZnMCB0Jvb2xlYW4FAmZzCQACAQkArAICCQADAQUCZnMCHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4EAmZGAwMJAQJhTgAGCQAAAgUCYmEFAW4GBQJmcgQCZXkJAMwIAgMDCQEBIQEFAmZGBgkBAmVUAQUCZEMGCQECYUkBAiFnZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkQwhwYXltZW50cwABBgkBAmFJAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXkFAmV5BAJleAkBAmFTAQUCZkUEAmZ1CQCRAwIIBQJkQwhwYXltZW50cwAABAJkVAgFAmZ1B2Fzc2V0SWQEAmVmCAUCZnUGYW1vdW50BAJkawkBAmRkAwkAtgIBAAAJALYCAQAACQC2AgEAAAMJAAACBQJkawUCZGsEAVoIBQJkQwZjYWxsZXIEAmFhCAUCZEMNdHJhbnNhY3Rpb25JZAQCZkcJAQJldwUFAmV4BQJlZgUCZFQFAVoFAmFhAwkAAAIFAmZHBQJmRwQCZXoIBQJmRwJfNQQCZncIBQJmRwJfNAQCZFEIBQJmRwJfMwQCY1kIBQJmRwJfMgQCZkgIBQJmRwJfMQQCZEsDAwkAZgIFAmZwAAAJAGYCBQJmcAUCZkgHCQECYUkBCQC5CQIJAMwIAgIfYW1vdW50IHRvIHJlY2VpdmUgaXMgbGVzcyB0aGFuIAkAzAgCCQCkAwEFAmZwBQNuaWwCAAUCZkgEAmZJCQD8BwQFAmFMAgRidXJuCQDMCAIFAmVmBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmRUBQJlZgUDbmlsAwkAAAIFAmZJBQJmSQQCZkoJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUBWgUCZEsFAmV4BQNuaWwEAmZBAwkAZgIFAmRRAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYU0FAmRRBQJleAUDbmlsBQNuaWwEAmZLBAJmTAMJAAACBQR0aGlzBQJhTQAABQJkUQMFAmV6CQCUCgIJAQEtAQkAZAIFAmRLBQJmTAAACQCUCgIAAAkBAS0BCQBkAgUCZEsFAmZMBAJkbQgFAmZLAl8xBAJkbggFAmZLAl8yBAJmTQkBAmRsAwUCZG0FAmRuAAAEAmZsCAUCZk0CXzEEAmRjCAUCZk0CXzIEAmZtCQECZHACBQJkawUCZGMDCQAAAgUCZm0FAmZtCQCUCgIJAM4IAgkAzggCCQDOCAIFAmNZBQJmSgUCZkEFAmZsBQJkSwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkQwERZ2V0T25lVGtuUkVBRE9OTFkCAmV4AmVmBAJmTgkBAmV3BQkBAmFTAQUCZXgFAmVmBQJiYgUEdW5pdAUEdW5pdAQCZkgIBQJmTgJfMQQCY1kIBQJmTgJfMgQCZFEIBQJmTgJfMwQCZncIBQJmTgJfNAQCZXoIBQJmTgJfNQkAlAoCBQNuaWwJAJUKAwUCZkgFAmRRBQJmdwJkQwETdW5zdGFrZUFuZEdldE9uZVRrbgMCZk8CZkUCZnAEAmZyCgACZnMJAPwHBAUCYUwCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgkApQgBBQR0aGlzBQNuaWwFA25pbAMJAAECBQJmcwIHQm9vbGVhbgUCZnMJAAIBCQCsAgIJAAMBBQJmcwIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZkYDAwkBAmFOAAYJAAACBQJiYQUBbgYFAmZyBAJleQkAzAgCAwMJAQEhAQUCZkYGCQECZVQBBQJkQwYJAQJhSQECIWdldCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbgkAzAgCAwkAAAIJAJADAQgFAmRDCHBheW1lbnRzAAAGCQECYUkBAhhubyBwYXltZW50cyBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJleQUCZXkEAmV4CQECYVMBBQJmRQQBWggFAmRDBmNhbGxlcgQCYWEIBQJkQw10cmFuc2FjdGlvbklkBAJkawkBAmRkAwkAtgIBAAAJALYCAQAACQC2AgEAAAQCZlAJAPwHBAUCYmgCB3Vuc3Rha2UJAMwIAgkA2AQBBQJiYgkAzAgCBQJmTwUDbmlsBQNuaWwDCQAAAgUCZlAFAmZQBAJmUQkBAmV3BQUCZXgFAmZPBQJiYgUBWgUCYWEDCQAAAgUCZlEFAmZRBAJleggFAmZRAl81BAJmdwgFAmZRAl80BAJkUQgFAmZRAl8zBAJjWQgFAmZRAl8yBAJmSAgFAmZRAl8xBAJkSwMDCQBmAgUCZnAAAAkAZgIFAmZwBQJmSAcJAQJhSQEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZnAFA25pbAIABQJmSAQCZkkJAPwHBAUCYUwCBGJ1cm4JAMwIAgUCZk8FA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYmIFAmZPBQNuaWwDCQAAAgUCZkkFAmZJBAJmSgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZEMGY2FsbGVyBQJkSwUCZXgFA25pbAQCZkEDCQBmAgUCZFEAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhTQUCZFEFAmV4BQNuaWwFA25pbAQCZlIEAmZMAwkAAAIFBHRoaXMFAmFNAAAFAmRRAwUCZXoJAJQKAgkBAS0BCQBkAgUCZEsFAmZMAAAJAJQKAgAACQEBLQEJAGQCBQJkSwUCZkwEAmRtCAUCZlICXzEEAmRuCAUCZlICXzIEAmZTCQECZGwDBQJkbQUCZG4AAAQCZmwIBQJmUwJfMQQCZGMIBQJmUwJfMgQCZm0JAQJkcAIFAmRrBQJkYwMJAAACBQJmbQUCZm0JAJQKAgkAzggCCQDOCAIJAM4IAgUCY1kFAmZKBQJmQQUCZmwFAmRLCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRDAQNnZXQABAJjSgkBAmRCAQUCZEMEAmZUCAUCY0oCXzEEAmNxCAUCY0oCXzIEAmRFCAUCY0oCXzMEAmJZCAUCY0oCXzQEAmNyCAUCY0oCXzUEAmRrCQECZGQDCQC2AgEAAAkAtgIBAAAJALYCAQAAAwkAAAIFAmRrBQJkawQCZlUJAPwHBAUCYUwCBGJ1cm4JAMwIAgUCZEUFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlkFAmRFBQNuaWwDCQAAAgUCZlUFAmZVBAJmVgkBAmRsAwkBAS0BBQJmVAkBAS0BBQJjcQAABAJmbAgFAmZWAl8xBAJkYwgFAmZWAl8yBAJmbQkBAmRwAgUCZGsFAmRjAwkAAAIFAmZtBQJmbQkAzggCBQJjcgUCZmwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZEMBCWdldE5vTGVzcwICZlcCZlgEAmNKCQECZEIBBQJkQwQCY3AIBQJjSgJfMQQCY3EIBQJjSgJfMgQCZEUIBQJjSgJfMwQCYlkIBQJjSgJfNAQCY3IIBQJjSgJfNQMJAGYCBQJmVwUCY3AJAAIBCQCsAgIJAKwCAgkArAICAhxub0xlc3NUaGVuQW10QXNzZXQgZmFpbGVkOiAgCQCkAwEFAmNwAgMgPCAJAKQDAQUCZlcDCQBmAgUCZlgFAmNxCQACAQkArAICCQCsAgIJAKwCAgIdbm9MZXNzVGhlblByaWNlQXNzZXQgZmFpbGVkOiAJAKQDAQUCY3ECAyA8IAkApAMBBQJmWAQCZGsJAQJkZAMJALYCAQAACQC2AgEAAAkAtgIBBQJkRQQCZlUJAPwHBAUCYUwCBGJ1cm4JAMwIAgUCZEUFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlkFAmRFBQNuaWwDCQAAAgUCZlUFAmZVBAJmWQkBAmRsAwkBAS0BBQJjcAkBAS0BBQJjcQAABAJmbAgFAmZZAl8xBAJkYwgFAmZZAl8yBAJmbQkBAmRwAgUCZGsFAmRjAwkAAAIFAmZtBQJmbQkAzggCBQJjcgUCZmwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZEMBDXVuc3Rha2VBbmRHZXQBAmRLBAJmWgMJAQIhPQIJAJADAQgFAmRDCHBheW1lbnRzAAAJAAIBAhhObyBwYXltZW50cyBhcmUgZXhwZWN0ZWQGAwkAAAIFAmZaBQJmWgQCYk4JAQJhUAAEAmNhCQDZBAEJAJEDAgUCYk4FAXEEAmRrCQECZGQDCQC2AgEAAAkAtgIBAAAJALYCAQAABAJmUAkA/AcEBQJiaAIHdW5zdGFrZQkAzAgCCQDYBAEFAmNhCQDMCAIFAmRLBQNuaWwFA25pbAMJAAACBQJmUAUCZlAEAmNKCQECYlcECQDYBAEIBQJkQw10cmFuc2FjdGlvbklkCQDYBAEFAmNhBQJkSwgFAmRDBmNhbGxlcgQCY3AIBQJjSgJfMQQCY3EIBQJjSgJfMgQCY2QJAQ1wYXJzZUludFZhbHVlAQgFAmNKAl85BAJjcggFAmNKA18xMAQCZ2EDAwkBAmFOAAYJAAACBQJjZAUBbgkAAgEJAKwCAgIsR2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2QGAwkAAAIFAmdhBQJnYQQCZlUJAPwHBAUCYUwCBGJ1cm4JAMwIAgUCZEsFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCY2EFAmRLBQNuaWwDCQAAAgUCZlUFAmZVBAJnYgkBAmRsAwkBAS0BBQJjcAkBAS0BBQJjcQAABAJmbAgFAmdiAl8xBAJkYwgFAmdiAl8yBAJmbQkBAmRwAgUCZGsFAmRjAwkAAAIFAmZtBQJmbQkAzggCBQJjcgUCZmwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZEMBE3Vuc3Rha2VBbmRHZXROb0xlc3MDAmZPAmdjAmZYBAJmRgMJAQJhTgAGCQAAAgUCYmEFAW4EAmV5CQDMCAIDCQEBIQEFAmZGBgkAAgECIWdldCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbgkAzAgCAwkAAAIJAJADAQgFAmRDCHBheW1lbnRzAAAGCQACAQIYbm8gcGF5bWVudHMgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXkFAmV5BAJkawkBAmRkAwkAtgIBAAAJALYCAQAACQC2AgEAAAQCZlAJAPwHBAUCYmgCB3Vuc3Rha2UJAMwIAgkA2AQBBQJiYgkAzAgCBQJmTwUDbmlsBQNuaWwDCQAAAgUCZlAFAmZQBAJjSgkBAmJXBAkA2AQBCAUCZEMNdHJhbnNhY3Rpb25JZAkA2AQBBQJiYgUCZk8IBQJkQwZjYWxsZXIEAmNwCAUCY0oCXzEEAmNxCAUCY0oCXzIEAmNyCAUCY0oDXzEwBAJnZAkAzAgCAwkAZwIFAmNwBQJnYwYJAAIBCQC5CQIJAMwIAgIsYW1vdW50IGFzc2V0IGFtb3VudCB0byByZWNlaXZlIGlzIGxlc3MgdGhhbiAJAMwIAgkApAMBBQJnYwUDbmlsAgAJAMwIAgMJAGcCBQJjcQUCZlgGCQACAQkAuQkCCQDMCAICK3ByaWNlIGFzc2V0IGFtb3VudCB0byByZWNlaXZlIGlzIGxlc3MgdGhhbiAJAMwIAgkApAMBBQJmWAUDbmlsAgAFA25pbAMJAAACBQJnZAUCZ2QEAmZVCQD8BwQFAmFMAgRidXJuCQDMCAIFAmZPBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJiBQJmTwUDbmlsAwkAAAIFAmZVBQJmVQQCZ2UJAQJkbAMJAQEtAQUCY3AJAQEtAQUCY3EAAAQCZmwIBQJnZQJfMQQCZGMIBQJnZQJfMgQCZm0JAQJkcAIFAmRrBQJkYwMJAAACBQJmbQUCZm0JAM4IAgUCY3IFAmZsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRDAQhhY3RpdmF0ZQICZ2YCZ2cDCQECIT0CCQClCAEIBQJkQwZjYWxsZXIJAKUIAQUCYUwJAAIBAhJwZXJtaXNzaW9ucyBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQECYWMABQJnZgkAzAgCCQELU3RyaW5nRW50cnkCCQECYWQABQJnZwUDbmlsAgdzdWNjZXNzAmRDAQpyZWZyZXNoS0xwAAQCZ2gJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUCYWkAAAQCZ2kDCQBnAgkAZQIFBmhlaWdodAUCZ2gFAmFsBQR1bml0CQECYUkBCQC5CQIJAMwIAgkApAMBBQJhbAkAzAgCAi8gYmxvY2tzIGhhdmUgbm90IHBhc3NlZCBzaW5jZSB0aGUgcHJldmlvdXMgY2FsbAUDbmlsAgADCQAAAgUCZ2kFAmdpBAJkdwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCoAwEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUCYWgCATAJAQJhSwECC2ludmFsaWQga0xwBAJnagkBAmRsAwAAAAAAAAQCZ2sIBQJnagJfMQQCZGMIBQJnagJfMgQCZG8DCQECIT0CBQJkdwUCZGMFAmdrCQECYUkBAhJub3RoaW5nIHRvIHJlZnJlc2gJAJQKAgUCZG8JAKYDAQUCZGMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZEMBHGdldFBvb2xDb25maWdXcmFwcGVyUkVBRE9OTFkACQCUCgIFA25pbAkBAmFQAAJkQwEcZ2V0QWNjQmFsYW5jZVdyYXBwZXJSRUFET05MWQECYnoJAJQKAgUDbmlsCQECYnkBBQJiegJkQwEZY2FsY1ByaWNlc1dyYXBwZXJSRUFET05MWQMCYkgCYkkCYk0EAmJWCQECYkwDBQJiSAUCYkkFAmJNCQCUCgIFA25pbAkAzAgCCQCmAwEJAJEDAgUCYlYAAAkAzAgCCQCmAwEJAJEDAgUCYlYAAQkAzAgCCQCmAwEJAJEDAgUCYlYAAgUDbmlsAmRDARR0b1gxOFdyYXBwZXJSRUFET05MWQIBRQFGCQCUCgIFA25pbAkApgMBCQEBRAIFAUUFAUYCZEMBFmZyb21YMThXcmFwcGVyUkVBRE9OTFkCAUgBSQkAlAoCBQNuaWwJAQFHAgkApwMBBQFIBQFJAmRDAR5jYWxjUHJpY2VCaWdJbnRXcmFwcGVyUkVBRE9OTFkCAmJCAmJDCQCUCgIFA25pbAkApgMBCQECYkECCQCnAwEFAmJCCQCnAwEFAmJDAmRDASNlc3RpbWF0ZVB1dE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQkCYlgCY3QCY3UCY3YCY3cCY3gBWgJjeQJjegkAlAoCBQNuaWwJAQJjcwkFAmJYBQJjdAUCY3UFAmN2BQJjdwUCY3gFAVoFAmN5BQJjegJkQwEjZXN0aW1hdGVHZXRPcGVyYXRpb25XcmFwcGVyUkVBRE9OTFkEAmJYAmJZAmJaAVoEAmNKCQECYlcEBQJiWAUCYlkFAmJaCQERQGV4dHJOYXRpdmUoMTA2MikBBQFaCQCUCgIFA25pbAkAnAoKCAUCY0oCXzEIBQJjSgJfMggFAmNKAl8zCAUCY0oCXzQIBQJjSgJfNQgFAmNKAl82CAUCY0oCXzcJAKYDAQgFAmNKAl84CAUCY0oCXzkIBQJjSgNfMTACZEMBDXN0YXRzUkVBRE9OTFkABAJiTgkBAmFQAAQCY2EJANkEAQkAkQMCBQJiTgUBcQQCZ2wJAJEDAgUCYk4FAXIEAmdtCQCRAwIFAmJOBQFzBAJjQwkAkQMCBQJiTgUBdgQCY0QJAJEDAgUCYk4FAXcEAmJPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYk4FAXQEAmJQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYk4FAXUEAmduCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmNhCQCsAgIJAKwCAgIGQXNzZXQgCQDYBAEFAmNhAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZ28JAQJieQEFAmdsBAJncAkBAmJ5AQUCZ20EAmdxAwkAAAIFAmduAAAJAMwIAgUBZQkAzAgCBQFlCQDMCAIFAWUFA25pbAkBAmJMAwUCZ28FAmdwBQJnbgQCY2sAAAQCZ3IJAQFHAgkAkQMCBQJncQABBQFiBAJncwkBAUcCCQCRAwIFAmdxAAIFAWIEAmd0CQEFdmFsdWUBCQCaCAIFAmFMCQECYXcBCQClCAEFBHRoaXMJAJQKAgUDbmlsCQC5CQIJAMwIAgIOJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJnbwkAzAgCCQCkAwEFAmdwCQDMCAIJAKQDAQUCZ24JAMwIAgkApAMBBQJjawkAzAgCCQCkAwEFAmdyCQDMCAIJAKQDAQUCZ3MJAMwIAgkApAMBBQJndAUDbmlsBQFqAmRDASBldmFsdWF0ZVB1dEJ5QW1vdW50QXNzZXRSRUFET05MWQECY3UEAmJOCQECYVAABAJjYQkA2QQBCQCRAwIFAmJOBQFxBAJjQQkAkQMCBQJiTgUBcgQCY2IJANkEAQUCY0EEAmNCCQCRAwIFAmJOBQFzBAJjYwkA2QQBBQJjQgQCYk8JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiTgUBdAQCYlAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiTgUBdQQCY2QJAJEDAgUCYk4FAXAEAmduCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmNhCQCsAgIJAKwCAgIGQXNzZXQgCQDYBAEFAmNhAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZ28JAQJieQEFAmNBBAJncAkBAmJ5AQUCY0IEAmJKCQEBRAIFAmdvBQJiTwQCYksJAQFEAgUCZ3AFAmJQBAJjagMJAAACBQJnbgAABQFlCQECYkECBQJiSwUCYkoEAmNHCQEBRAIFAmN1BQJiTwQCY0gJALwCAwUCY0cFAmNqBQFkBAJjdwkBAUcCBQJjSAUCYlAEAmRJCQECY3MJAgAAoMIeBQJjdQUCY2IFAmN3BQJjYwIABgcEAmNSCAUCZEkCXzEEAmd1CAUCZEkCXzMEAmNmCAUCZEkCXzQEAmNoCAUCZEkCXzUEAmNlCAUCZEkCXzYJAJQKAgUDbmlsCQC5CQIJAMwIAgIQJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmNSCQDMCAIJAKQDAQkBAUcCBQJjagUBYgkAzAgCCQCkAwEFAmNmCQDMCAIJAKQDAQUCY2gJAMwIAgkApAMBBQJjZQkAzAgCBQJjZAkAzAgCCQCkAwEFAmN1CQDMCAIJAKQDAQUCY3cFA25pbAUBagJkQwEfZXZhbHVhdGVQdXRCeVByaWNlQXNzZXRSRUFET05MWQECY3cEAmJOCQECYVAABAJjYQkA2QQBCQCRAwIFAmJOBQFxBAJjQQkAkQMCBQJiTgUBcgQCY2IJANkEAQUCY0EEAmNCCQCRAwIFAmJOBQFzBAJjYwkA2QQBBQJjQgQCYk8JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiTgUBdAQCYlAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiTgUBdQQCY2QJAJEDAgUCYk4FAXAEAmduCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmNhCQCsAgIJAKwCAgIGQXNzZXQgCQDYBAEFAmNhAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZ3YJAQJieQEFAmNBBAJndwkBAmJ5AQUCY0IEAmd4CQEBRAIFAmd2BQJiTwQCZ3kJAQFEAgUCZ3cFAmJQBAJjagMJAAACBQJnbgAABQFlCQECYkECBQJneQUCZ3gEAmNICQEBRAIFAmN3BQJiUAQCY0cJALwCAwUCY0gFAWQFAmNqBAJjdQkBAUcCBQJjRwUCYk8EAmRJCQECY3MJAgAAoMIeBQJjdQUCY2IFAmN3BQJjYwIABgcEAmNSCAUCZEkCXzEEAmd1CAUCZEkCXzMEAmNmCAUCZEkCXzQEAmNoCAUCZEkCXzUEAmNlCAUCZEkCXzYJAJQKAgUDbmlsCQC5CQIJAMwIAgIQJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmNSCQDMCAIJAKQDAQkBAUcCBQJjagUBYgkAzAgCCQCkAwEFAmNmCQDMCAIJAKQDAQUCY2gJAMwIAgkApAMBBQJjZQkAzAgCBQJjZAkAzAgCCQCkAwEFAmN1CQDMCAIJAKQDAQUCY3cFA25pbAUBagJkQwETZXZhbHVhdGVHZXRSRUFET05MWQICZ3oCZ0EEAmNKCQECYlcEAgAFAmd6BQJnQQUEdGhpcwQCY3AIBQJjSgJfMQQCY3EIBQJjSgJfMgQCY2YIBQJjSgJfNQQCY2gIBQJjSgJfNgQCY2UIBQJjSgJfNwQCY2sIBQJjSgJfOAQCY2QJAQ1wYXJzZUludFZhbHVlAQgFAmNKAl85CQCUCgIFA25pbAkAuQkCCQDMCAICDiVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCY3AJAMwIAgkApAMBBQJjcQkAzAgCCQCkAwEFAmNmCQDMCAIJAKQDAQUCY2gJAMwIAgkApAMBBQJjZQkAzAgCCQCmAwEFAmNrCQDMCAIJAKQDAQUCY2QFA25pbAUBagECZ0IBAmdDAAQCZ0QEAmROCQECZVEAAwkAAQIFAmROAgpCeXRlVmVjdG9yBAJlVQUCZE4FAmVVAwkAAQIFAmROAgRVbml0CAUCZ0IPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IEAmROBQJnQgMJAAECBQJkTgIFT3JkZXIEAmRzBQJkTgQCZ0UJAQJhTwAEAmFCCQECZHIBBQJkcwQCYUMJAPQDAwgFAmRzCWJvZHlCeXRlcwkAkQMCCAUCZHMGcHJvb2ZzAAAIBQJkcw9zZW5kZXJQdWJsaWNLZXkEAmFECQD0AwMIBQJkcwlib2R5Qnl0ZXMJAJEDAggFAmRzBnByb29mcwABBQJnRQMDAwUCYUIFAmFDBwUCYUQHBgkBAmFBAwUCYUIFAmFDBQJhRAMJAAECBQJkTgIUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAmVSBQJkTgQCZ0YJAPYDAQkBBXZhbHVlAQgFAmVSBnNjcmlwdAQCZ0cJANsEAQkBBXZhbHVlAQkAnQgCBQJhTAkBAmF5AAQCZ0gJAPEHAQUEdGhpcwMDCQAAAgUCZ0cFAmdGCQECIT0CBQJnSAUCZ0YHBgkA9AMDCAUCZ0IJYm9keUJ5dGVzCQCRAwIIBQJnQgZwcm9vZnMAAAUCZ0QJAPQDAwgFAmdCCWJvZHlCeXRlcwkAkQMCCAUCZ0IGcHJvb2ZzAAAFAmdEo9rwJg==", "chainId": 84, "height": 2362923, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: AEHT9g9CY6QjPjqBECyVfeoGRnWQgYBipGjGcZhDNcB Next: 4EBgAyp18EwEfLHcFnHCzTKQmckhpDnfqKZ64tAtK3jD Diff:
Old | New | Differences | |
---|---|---|---|
65 | 65 | func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18)) | |
66 | 66 | ||
67 | 67 | ||
68 | + | func fromX18Round (val,resultScaleMult,round) = toInt(fraction(val, toBigInt(resultScaleMult), scale18, round)) | |
69 | + | ||
70 | + | ||
68 | 71 | func toScale (amt,resScale,curScale) = fraction(amt, resScale, curScale) | |
69 | 72 | ||
70 | 73 | ||
105 | 108 | func pa () = "%s__priceAsset" | |
106 | 109 | ||
107 | 110 | ||
111 | + | let keyFee = "%s__fee" | |
112 | + | ||
113 | + | let feeDefault = fraction(10, scale8, 10000) | |
114 | + | ||
115 | + | let fee = valueOrElse(getInteger(this, keyFee), feeDefault) | |
116 | + | ||
117 | + | let keyKLp = makeString(["%s", "kLp"], SEP) | |
118 | + | ||
119 | + | let keyKLpRefreshedHeight = makeString(["%s", "kLpRefreshedHeight"], SEP) | |
120 | + | ||
121 | + | let keyKLpRefreshDelay = makeString(["%s", "refreshKLpDelay"], SEP) | |
122 | + | ||
123 | + | let kLpRefreshDelayDefault = 30 | |
124 | + | ||
125 | + | let kLpRefreshDelay = valueOrElse(getInteger(this, keyKLpRefreshDelay), kLpRefreshDelayDefault) | |
126 | + | ||
108 | 127 | func keyFactoryConfig () = "%s__factoryConfig" | |
109 | 128 | ||
110 | 129 | ||
143 | 162 | func throwErr (msg) = throw(makeString(["lp.ride:", msg], " ")) | |
144 | 163 | ||
145 | 164 | ||
165 | + | func fmtErr (msg) = makeString(["lp.ride:", msg], " ") | |
166 | + | ||
167 | + | ||
146 | 168 | let factoryContract = addressFromStringValue(getStringOrFail(this, fc())) | |
147 | 169 | ||
148 | 170 | let feeCollectorAddress = addressFromStringValue(getStringOrFail(factoryContract, keyFeeCollectorAddress)) | |
149 | - | ||
150 | - | let inFee = { | |
151 | - | let @ = invoke(factoryContract, "getInFeeREADONLY", [toString(this)], nil) | |
152 | - | if ($isInstanceOf(@, "Int")) | |
153 | - | then @ | |
154 | - | else throw(($getType(@) + " couldn't be cast to Int")) | |
155 | - | } | |
156 | - | ||
157 | - | let outFee = { | |
158 | - | let @ = invoke(factoryContract, "getOutFeeREADONLY", [toString(this)], nil) | |
159 | - | if ($isInstanceOf(@, "Int")) | |
160 | - | then @ | |
161 | - | else throw(($getType(@) + " couldn't be cast to Int")) | |
162 | - | } | |
163 | 171 | ||
164 | 172 | func isGlobalShutdown () = valueOrElse(getBoolean(factoryContract, keyAllPoolsShutdown()), false) | |
165 | 173 | ||
191 | 199 | ||
192 | 200 | let poolConfigParsed = parsePoolConfig(getPoolConfig()) | |
193 | 201 | ||
194 | - | let $ | |
202 | + | let $t080588224 = poolConfigParsed | |
195 | 203 | ||
196 | - | let cfgPoolAddress = $ | |
204 | + | let cfgPoolAddress = $t080588224._1 | |
197 | 205 | ||
198 | - | let cfgPoolStatus = $ | |
206 | + | let cfgPoolStatus = $t080588224._2 | |
199 | 207 | ||
200 | - | let cfgLpAssetId = $ | |
208 | + | let cfgLpAssetId = $t080588224._3 | |
201 | 209 | ||
202 | - | let cfgAmountAssetId = $ | |
210 | + | let cfgAmountAssetId = $t080588224._4 | |
203 | 211 | ||
204 | - | let cfgPriceAssetId = $ | |
212 | + | let cfgPriceAssetId = $t080588224._5 | |
205 | 213 | ||
206 | - | let cfgAmountAssetDecimals = $ | |
214 | + | let cfgAmountAssetDecimals = $t080588224._6 | |
207 | 215 | ||
208 | - | let cfgPriceAssetDecimals = $ | |
216 | + | let cfgPriceAssetDecimals = $t080588224._7 | |
209 | 217 | ||
210 | 218 | func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP) | |
211 | 219 | ||
226 | 234 | ||
227 | 235 | ||
228 | 236 | func calcPriceBigInt (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18) | |
237 | + | ||
238 | + | ||
239 | + | func calcPriceBigIntRound (prAmtX18,amAmtX18,round) = fraction(prAmtX18, scale18, amAmtX18, round) | |
229 | 240 | ||
230 | 241 | ||
231 | 242 | func privateCalcPrice (amAssetDcm,prAssetDcm,amAmt,prAmt) = { | |
277 | 288 | let lpEmissionX18 = toX18(lpEmission, scale8) | |
278 | 289 | let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissionX18) | |
279 | 290 | let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissionX18) | |
280 | - | let outAmAmt = | |
281 | - | let outPrAmt = | |
291 | + | let outAmAmt = fromX18Round(outAmAmtX18, amAssetDcm, FLOOR) | |
292 | + | let outPrAmt = fromX18Round(outPrAmtX18, prAssetDcm, FLOOR) | |
282 | 293 | let state = if ((txId58 == "")) | |
283 | 294 | then nil | |
284 | 295 | else [ScriptTransfer(userAddress, outAmAmt, if ((amAssetId == "WAVES")) | |
337 | 348 | then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18))) | |
338 | 349 | else { | |
339 | 350 | let lpEmissionX18 = toX18(lpEmission, scale8) | |
340 | - | let prViaAmX18 = fraction(inAmAssetAmtX18, | |
341 | - | let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, | |
351 | + | let prViaAmX18 = fraction(inAmAssetAmtX18, calcPriceBigIntRound(prBalanceX18, amBalanceX18, CEILING), scale18, CEILING) | |
352 | + | let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, calcPriceBigIntRound(prBalanceX18, amBalanceX18, FLOOR), CEILING) | |
342 | 353 | let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18)) | |
343 | 354 | then $Tuple2(amViaPrX18, inPrAssetAmtX18) | |
344 | 355 | else $Tuple2(inAmAssetAmtX18, prViaAmX18) | |
345 | 356 | let expAmtAssetAmtX18 = expectedAmts._1 | |
346 | 357 | let expPriceAssetAmtX18 = expectedAmts._2 | |
347 | - | let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18) | |
348 | - | $Tuple5( | |
358 | + | let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18, FLOOR) | |
359 | + | $Tuple5(fromX18Round(lpAmtX18, scale8, FLOOR), fromX18Round(expAmtAssetAmtX18, amtAssetDcm, CEILING), fromX18Round(expPriceAssetAmtX18, priceAssetDcm, CEILING), curPriceX18, slippageX18) | |
349 | 360 | } | |
350 | 361 | } | |
351 | 362 | let calcLpAmt = res._1 | |
368 | 379 | } | |
369 | 380 | ||
370 | 381 | ||
382 | + | func calcKLp (amountBalance,priceBalance,lpEmission) = { | |
383 | + | let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 18, DOWN), big1, lpEmission) | |
384 | + | if ((lpEmission == big0)) | |
385 | + | then big0 | |
386 | + | else updatedKLp | |
387 | + | } | |
388 | + | ||
389 | + | ||
390 | + | func calcCurrentKLp (amountAssetDelta,priceAssetDelta,lpAssetEmissionDelta) = { | |
391 | + | let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amountAssetDelta) | |
392 | + | let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - priceAssetDelta) | |
393 | + | let lpAssetEmission = (toBigInt(value(assetInfo(cfgLpAssetId)).quantity) - lpAssetEmissionDelta) | |
394 | + | let currentKLp = calcKLp(amountAssetBalance, priceAssetBalance, lpAssetEmission) | |
395 | + | currentKLp | |
396 | + | } | |
397 | + | ||
398 | + | ||
399 | + | func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = { | |
400 | + | let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta) | |
401 | + | let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta) | |
402 | + | let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta) | |
403 | + | let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission)) | |
404 | + | let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))] | |
405 | + | $Tuple2(actions, updatedKLp) | |
406 | + | } | |
407 | + | ||
408 | + | ||
409 | + | func validateUpdatedKLp (oldKLp,updatedKLp) = if ((updatedKLp >= oldKLp)) | |
410 | + | then true | |
411 | + | else throwErr(makeString(["updated KLp lower than current KLp", toString(oldKLp), toString(updatedKLp)], " ")) | |
412 | + | ||
413 | + | ||
371 | 414 | func validateMatcherOrderAllowed (order) = { | |
372 | - | let cfg = getPoolConfig() | |
373 | - | let amtAssetId = cfg[idxAmtAssetId] | |
374 | - | let priceAssetId = cfg[idxPriceAssetId] | |
375 | - | let poolStatus = parseIntValue(cfg[idxPoolStatus]) | |
376 | - | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
377 | - | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
378 | - | let accAmtAssetBalance = getAccBalance(amtAssetId) | |
379 | - | let accPriceAssetBalance = getAccBalance(priceAssetId) | |
380 | - | let curPriceX18 = if ((order.orderType == Buy)) | |
381 | - | then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance) | |
382 | - | else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance) | |
383 | - | let curPrice = fromX18(curPriceX18, scale8) | |
415 | + | let amountAssetAmount = order.amount | |
416 | + | let priceAssetAmount = fraction(order.amount, order.price, scale8, FLOOR) | |
417 | + | let $t02080121013 = if ((order.orderType == Buy)) | |
418 | + | then $Tuple2(amountAssetAmount, -(priceAssetAmount)) | |
419 | + | else $Tuple2(-(amountAssetAmount), priceAssetAmount) | |
420 | + | let amountAssetBalanceDelta = $t02080121013._1 | |
421 | + | let priceAssetBalanceDelta = $t02080121013._2 | |
384 | 422 | if (if (if (isGlobalShutdown()) | |
385 | 423 | then true | |
386 | - | else ( | |
424 | + | else (cfgPoolStatus == PoolMatcherDisabled)) | |
387 | 425 | then true | |
388 | - | else ( | |
426 | + | else (cfgPoolStatus == PoolShutdown)) | |
389 | 427 | then throw("Exchange operations disabled") | |
390 | - | else { | |
391 | - | let orderAmtAsset = order.assetPair.amountAsset | |
392 | - | let orderAmtAssetStr = if ((orderAmtAsset == unit)) | |
393 | - | then "WAVES" | |
394 | - | else toBase58String(value(orderAmtAsset)) | |
395 | - | let orderPriceAsset = order.assetPair.priceAsset | |
396 | - | let orderPriceAssetStr = if ((orderPriceAsset == unit)) | |
397 | - | then "WAVES" | |
398 | - | else toBase58String(value(orderPriceAsset)) | |
399 | - | if (if ((orderAmtAssetStr != amtAssetId)) | |
400 | - | then true | |
401 | - | else (orderPriceAssetStr != priceAssetId)) | |
402 | - | then throw("Wrong order assets.") | |
403 | - | else { | |
404 | - | let orderPrice = order.price | |
405 | - | let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm) | |
406 | - | let castedOrderPrice = toScale(orderPrice, scale8, priceDcm) | |
407 | - | let isOrderPriceValid = if ((order.orderType == Buy)) | |
408 | - | then (curPrice >= castedOrderPrice) | |
409 | - | else (castedOrderPrice >= curPrice) | |
410 | - | true | |
411 | - | } | |
412 | - | } | |
428 | + | else if (if ((order.assetPair.amountAsset != cfgAmountAssetId)) | |
429 | + | then true | |
430 | + | else (order.assetPair.priceAsset != cfgPriceAssetId)) | |
431 | + | then throw("Wrong order assets.") | |
432 | + | else { | |
433 | + | let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp")) | |
434 | + | let $t02148421584 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
435 | + | let unusedActions = $t02148421584._1 | |
436 | + | let kLpNew = $t02148421584._2 | |
437 | + | let isOrderValid = (kLpNew >= kLp) | |
438 | + | isOrderValid | |
439 | + | } | |
413 | 440 | } | |
414 | 441 | ||
415 | 442 | ||
467 | 494 | } | |
468 | 495 | ||
469 | 496 | ||
470 | - | func takeFee (amount,fee) = { | |
471 | - | let feeAmount = if ((fee == 0)) | |
472 | - | then 0 | |
473 | - | else fraction(amount, fee, scale8) | |
497 | + | func takeFee (amount) = { | |
498 | + | let feeAmount = fraction(amount, fee, scale8) | |
474 | 499 | $Tuple2((amount - feeAmount), feeAmount) | |
475 | 500 | } | |
476 | 501 | ||
484 | 509 | else if ((paymentAssetId == cfgPriceAssetId)) | |
485 | 510 | then false | |
486 | 511 | else throwErr("invalid asset") | |
487 | - | let $ | |
512 | + | let $t02426924562 = if (isEval) | |
488 | 513 | then $Tuple2(amountBalanceRaw, priceBalanceRaw) | |
489 | 514 | else if (paymentInAmountAsset) | |
490 | 515 | then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw) | |
491 | 516 | else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw)) | |
492 | - | let amountBalanceOld = $ | |
493 | - | let priceBalanceOld = $ | |
494 | - | let $ | |
517 | + | let amountBalanceOld = $t02426924562._1 | |
518 | + | let priceBalanceOld = $t02426924562._2 | |
519 | + | let $t02456624715 = if (paymentInAmountAsset) | |
495 | 520 | then $Tuple2(paymentAmountRaw, 0) | |
496 | 521 | else $Tuple2(0, paymentAmountRaw) | |
497 | - | let amountAssetAmountRaw = $ | |
498 | - | let priceAssetAmountRaw = $ | |
499 | - | let amountAssetAmount = takeFee(amountAssetAmountRaw | |
500 | - | let priceAssetAmount = takeFee(priceAssetAmountRaw | |
501 | - | let $ | |
502 | - | let paymentAmount = $ | |
503 | - | let feeAmount = $ | |
522 | + | let amountAssetAmountRaw = $t02456624715._1 | |
523 | + | let priceAssetAmountRaw = $t02456624715._2 | |
524 | + | let amountAssetAmount = takeFee(amountAssetAmountRaw)._1 | |
525 | + | let priceAssetAmount = takeFee(priceAssetAmountRaw)._1 | |
526 | + | let $t02483724896 = takeFee(paymentAmountRaw) | |
527 | + | let paymentAmount = $t02483724896._1 | |
528 | + | let feeAmount = $t02483724896._2 | |
504 | 529 | let amountBalanceNew = (amountBalanceOld + amountAssetAmount) | |
505 | 530 | let priceBalanceNew = (priceBalanceOld + priceAssetAmount) | |
506 | 531 | let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals)) | |
516 | 541 | if ((chechSupply == chechSupply)) | |
517 | 542 | then { | |
518 | 543 | let depositBigInt = toBigInt(paymentAmount) | |
519 | - | let issueAmount = max([0, | |
544 | + | let issueAmount = max([0, fromX18Round(fraction(supplyBigInt, (sqrtBigInt((scale18 + ((depositBigInt * scale18) / paymentBalanceBigInt)), 18, 18, DOWN) - scale18), scale18), scale8, FLOOR)]) | |
520 | 545 | let commonState = if (isEval) | |
521 | 546 | then nil | |
522 | 547 | else [IntegerEntry(pl(), priceNew), IntegerEntry(ph(height, lastBlock.timestamp), priceNew), StringEntry(pau(toString(value(userAddress)), toBase58String(value(txId))), dataPutActionInfo(amountAssetAmountRaw, priceAssetAmountRaw, issueAmount, priceNew, 0, 0, height, lastBlock.timestamp, 0, 0))] | |
523 | 548 | let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals)) | |
524 | 549 | let priceOld = fromX18(priceOldX18, scale8) | |
525 | 550 | let loss = { | |
526 | - | let $ | |
551 | + | let $t02639726564 = if (paymentInAmountAsset) | |
527 | 552 | then $Tuple2(amountAssetAmountRaw, amountBalanceOld) | |
528 | 553 | else $Tuple2(priceAssetAmountRaw, priceBalanceOld) | |
529 | - | let amount = $ | |
530 | - | let balance = $ | |
554 | + | let amount = $t02639726564._1 | |
555 | + | let balance = $t02639726564._2 | |
531 | 556 | let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance))) | |
532 | 557 | fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth) | |
533 | 558 | } | |
534 | - | $ | |
559 | + | $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset) | |
535 | 560 | } | |
536 | 561 | else throw("Strict value is not equal to itself.") | |
537 | 562 | } | |
539 | 564 | ||
540 | 565 | func calcGetOneToken (outAssetId,paymentAmount,paymentAssetId,userAddress,txId) = { | |
541 | 566 | let isEval = (txId == unit) | |
567 | + | let cfg = getPoolConfig() | |
568 | + | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
569 | + | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
542 | 570 | let checks = [if ((paymentAssetId == cfgLpAssetId)) | |
543 | 571 | then true | |
544 | 572 | else throwErr("invalid lp asset")] | |
552 | 580 | let balanceBigInt = if (outInAmountAsset) | |
553 | 581 | then toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) | |
554 | 582 | else toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) | |
583 | + | let outInAmountAssetDecimals = if (outInAmountAsset) | |
584 | + | then amtAssetDcm | |
585 | + | else priceAssetDcm | |
555 | 586 | let amBalanceOld = getAccBalance(assetIdToString(cfgAmountAssetId)) | |
556 | 587 | let prBalanceOld = getAccBalance(assetIdToString(cfgPriceAssetId)) | |
557 | 588 | let outBalance = if (outInAmountAsset) | |
560 | 591 | let outBalanceBigInt = toBigInt(outBalance) | |
561 | 592 | let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity) | |
562 | 593 | let redeemedBigInt = toBigInt(paymentAmount) | |
563 | - | let amountRaw = max([0, | |
564 | - | let $ | |
565 | - | let totalAmount = $ | |
566 | - | let feeAmount = $ | |
567 | - | let $ | |
594 | + | let amountRaw = max([0, fromX18Round(fraction(balanceBigInt, (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN)), scale18), outInAmountAssetDecimals, FLOOR)]) | |
595 | + | let $t02846528515 = takeFee(amountRaw) | |
596 | + | let totalAmount = $t02846528515._1 | |
597 | + | let feeAmount = $t02846528515._2 | |
598 | + | let $t02851928745 = if (outInAmountAsset) | |
568 | 599 | then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld) | |
569 | 600 | else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw)) | |
570 | - | let outAmAmount = $ | |
571 | - | let outPrAmount = $ | |
572 | - | let amBalanceNew = $ | |
573 | - | let prBalanceNew = $ | |
601 | + | let outAmAmount = $t02851928745._1 | |
602 | + | let outPrAmount = $t02851928745._2 | |
603 | + | let amBalanceNew = $t02851928745._3 | |
604 | + | let prBalanceNew = $t02851928745._4 | |
574 | 605 | let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals)) | |
575 | 606 | let priceNew = fromX18(priceNewX18, scale8) | |
576 | 607 | let commonState = if (isEval) | |
582 | 613 | let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2) | |
583 | 614 | fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset) | |
584 | 615 | } | |
585 | - | $ | |
616 | + | $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset) | |
586 | 617 | } | |
587 | 618 | else throw("Strict value is not equal to itself.") | |
588 | 619 | } | |
682 | 713 | let prDiff = estPut._11 | |
683 | 714 | let amId = estPut._12 | |
684 | 715 | let prId = estPut._13 | |
685 | - | let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil) | |
686 | - | if ((emitInv == emitInv)) | |
716 | + | let amAssetPmt = toBigInt(value(i.payments[0]).amount) | |
717 | + | let prAssetPmt = toBigInt(value(i.payments[1]).amount) | |
718 | + | let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0)) | |
719 | + | if ((currentKLp == currentKLp)) | |
687 | 720 | then { | |
688 | - | let emitInvLegacy = match emitInv { | |
689 | - | case legacyFactoryContract: Address => | |
690 | - | invoke(legacyFactoryContract, "emit", [emitLpAmt], nil) | |
691 | - | case _ => | |
692 | - | unit | |
693 | - | } | |
694 | - | if ((emitInvLegacy == emitInvLegacy)) | |
721 | + | let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil) | |
722 | + | if ((emitInv == emitInv)) | |
695 | 723 | then { | |
696 | - | let slippageAInv = if ((amDiff > 0)) | |
697 | - | then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)]) | |
698 | - | else nil | |
699 | - | if ((slippageAInv == slippageAInv)) | |
724 | + | let emitInvLegacy = match emitInv { | |
725 | + | case legacyFactoryContract: Address => | |
726 | + | invoke(legacyFactoryContract, "emit", [emitLpAmt], nil) | |
727 | + | case _ => | |
728 | + | unit | |
729 | + | } | |
730 | + | if ((emitInvLegacy == emitInvLegacy)) | |
700 | 731 | then { | |
701 | - | let | |
702 | - | then invoke(slippageContract, "put", nil, [AttachedPayment( | |
732 | + | let slippageAInv = if ((amDiff > 0)) | |
733 | + | then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)]) | |
703 | 734 | else nil | |
704 | - | if (( | |
735 | + | if ((slippageAInv == slippageAInv)) | |
705 | 736 | then { | |
706 | - | let lpTransfer = if (shouldAutoStake) | |
737 | + | let slippagePInv = if ((prDiff > 0)) | |
738 | + | then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)]) | |
739 | + | else nil | |
740 | + | if ((slippagePInv == slippagePInv)) | |
707 | 741 | then { | |
708 | - | let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)]) | |
709 | - | if ((slpStakeInv == slpStakeInv)) | |
710 | - | then nil | |
742 | + | let lpTransfer = if (shouldAutoStake) | |
743 | + | then { | |
744 | + | let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)]) | |
745 | + | if ((slpStakeInv == slpStakeInv)) | |
746 | + | then nil | |
747 | + | else throw("Strict value is not equal to itself.") | |
748 | + | } | |
749 | + | else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)] | |
750 | + | let $t03327333735 = refreshKLpInternal(0, 0, 0) | |
751 | + | if (($t03327333735 == $t03327333735)) | |
752 | + | then { | |
753 | + | let updatedKLp = $t03327333735._2 | |
754 | + | let refreshKLpActions = $t03327333735._1 | |
755 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
756 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
757 | + | then ((state ++ lpTransfer) ++ refreshKLpActions) | |
758 | + | else throw("Strict value is not equal to itself.") | |
759 | + | } | |
711 | 760 | else throw("Strict value is not equal to itself.") | |
712 | 761 | } | |
713 | - | else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)] | |
714 | - | (state ++ lpTransfer) | |
762 | + | else throw("Strict value is not equal to itself.") | |
715 | 763 | } | |
716 | 764 | else throw("Strict value is not equal to itself.") | |
717 | 765 | } | |
729 | 777 | then throw("Invalid value passed") | |
730 | 778 | else { | |
731 | 779 | let estPut = commonPut(i, maxSlippage, false) | |
732 | - | estPut._9 | |
780 | + | let state = estPut._9 | |
781 | + | let amAssetPmt = toBigInt(value(i.payments[0]).amount) | |
782 | + | let prAssetPmt = toBigInt(value(i.payments[1]).amount) | |
783 | + | let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0)) | |
784 | + | if ((currentKLp == currentKLp)) | |
785 | + | then { | |
786 | + | let $t03429734362 = refreshKLpInternal(0, 0, 0) | |
787 | + | let refreshKLpActions = $t03429734362._1 | |
788 | + | let updatedKLp = $t03429734362._2 | |
789 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
790 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
791 | + | then (state ++ refreshKLpActions) | |
792 | + | else throw("Strict value is not equal to itself.") | |
793 | + | } | |
794 | + | else throw("Strict value is not equal to itself.") | |
733 | 795 | } | |
734 | 796 | ||
735 | 797 | ||
761 | 823 | let payment = i.payments[0] | |
762 | 824 | let paymentAssetId = payment.assetId | |
763 | 825 | let paymentAmountRaw = payment.amount | |
764 | - | let userAddress = i.caller | |
765 | - | let txId = i.transactionId | |
766 | - | let $t03172331853 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId) | |
767 | - | if (($t03172331853 == $t03172331853)) | |
826 | + | let currentKLp = if ((paymentAssetId == cfgAmountAssetId)) | |
827 | + | then calcCurrentKLp(toBigInt(paymentAmountRaw), toBigInt(0), toBigInt(0)) | |
828 | + | else if ((paymentAssetId == cfgPriceAssetId)) | |
829 | + | then calcCurrentKLp(toBigInt(0), toBigInt(paymentAmountRaw), toBigInt(0)) | |
830 | + | else throwErr("payment asset is not supported") | |
831 | + | if ((currentKLp == currentKLp)) | |
768 | 832 | then { | |
769 | - | let bonus = $t03172331853._4 | |
770 | - | let feeAmount = $t03172331853._3 | |
771 | - | let commonState = $t03172331853._2 | |
772 | - | let emitAmountEstimated = $t03172331853._1 | |
773 | - | let emitAmount = if (if ((minOutAmount > 0)) | |
774 | - | then (minOutAmount > emitAmountEstimated) | |
775 | - | else false) | |
776 | - | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
777 | - | else emitAmountEstimated | |
778 | - | let emitInv = emit(emitAmount) | |
779 | - | if ((emitInv == emitInv)) | |
833 | + | let userAddress = i.caller | |
834 | + | let txId = i.transactionId | |
835 | + | let $t03555035702 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId) | |
836 | + | if (($t03555035702 == $t03555035702)) | |
780 | 837 | then { | |
781 | - | let lpTransfer = if (autoStake) | |
838 | + | let paymentInAmountAsset = $t03555035702._5 | |
839 | + | let bonus = $t03555035702._4 | |
840 | + | let feeAmount = $t03555035702._3 | |
841 | + | let commonState = $t03555035702._2 | |
842 | + | let emitAmountEstimated = $t03555035702._1 | |
843 | + | let emitAmount = if (if ((minOutAmount > 0)) | |
844 | + | then (minOutAmount > emitAmountEstimated) | |
845 | + | else false) | |
846 | + | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
847 | + | else emitAmountEstimated | |
848 | + | let emitInv = emit(emitAmount) | |
849 | + | if ((emitInv == emitInv)) | |
782 | 850 | then { | |
783 | - | let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)]) | |
784 | - | if ((stakeInv == stakeInv)) | |
785 | - | then nil | |
851 | + | let lpTransfer = if (autoStake) | |
852 | + | then { | |
853 | + | let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)]) | |
854 | + | if ((stakeInv == stakeInv)) | |
855 | + | then nil | |
856 | + | else throw("Strict value is not equal to itself.") | |
857 | + | } | |
858 | + | else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)] | |
859 | + | let sendFee = if ((feeAmount > 0)) | |
860 | + | then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)] | |
861 | + | else nil | |
862 | + | let $t03628836485 = if ((this == feeCollectorAddress)) | |
863 | + | then $Tuple2(0, 0) | |
864 | + | else if (paymentInAmountAsset) | |
865 | + | then $Tuple2(-(feeAmount), 0) | |
866 | + | else $Tuple2(0, -(feeAmount)) | |
867 | + | let amountAssetBalanceDelta = $t03628836485._1 | |
868 | + | let priceAssetBalanceDelta = $t03628836485._2 | |
869 | + | let $t03648836596 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
870 | + | let refreshKLpActions = $t03648836596._1 | |
871 | + | let updatedKLp = $t03648836596._2 | |
872 | + | let kLp = value(getString(keyKLp)) | |
873 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
874 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
875 | + | then $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount) | |
786 | 876 | else throw("Strict value is not equal to itself.") | |
787 | 877 | } | |
788 | - | else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)] | |
789 | - | let sendFee = if ((feeAmount > 0)) | |
790 | - | then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)] | |
791 | - | else nil | |
792 | - | $Tuple2(((commonState ++ lpTransfer) ++ sendFee), emitAmount) | |
878 | + | else throw("Strict value is not equal to itself.") | |
793 | 879 | } | |
794 | 880 | else throw("Strict value is not equal to itself.") | |
795 | 881 | } | |
802 | 888 | ||
803 | 889 | @Callable(i) | |
804 | 890 | func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = { | |
805 | - | let $t03258232717 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit) | |
806 | - | let emitAmountEstimated = $t03258232717._1 | |
807 | - | let commonState = $t03258232717._2 | |
808 | - | let feeAmount = $t03258232717._3 | |
809 | - | let bonus = $t03258232717._4 | |
891 | + | let $t03690237059 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit) | |
892 | + | let emitAmountEstimated = $t03690237059._1 | |
893 | + | let commonState = $t03690237059._2 | |
894 | + | let feeAmount = $t03690237059._3 | |
895 | + | let bonus = $t03690237059._4 | |
896 | + | let paymentInAmountAsset = $t03690237059._5 | |
810 | 897 | $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus)) | |
811 | 898 | } | |
812 | 899 | ||
838 | 925 | let payment = i.payments[0] | |
839 | 926 | let paymentAssetId = payment.assetId | |
840 | 927 | let paymentAmount = payment.amount | |
841 | - | let userAddress = i.caller | |
842 | - | let txId = i.transactionId | |
843 | - | let $t03352233657 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId) | |
844 | - | if (($t03352233657 == $t03352233657)) | |
928 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
929 | + | if ((currentKLp == currentKLp)) | |
845 | 930 | then { | |
846 | - | let bonus = $t03352233657._4 | |
847 | - | let feeAmount = $t03352233657._3 | |
848 | - | let commonState = $t03352233657._2 | |
849 | - | let amountEstimated = $t03352233657._1 | |
850 | - | let amount = if (if ((minOutAmount > 0)) | |
851 | - | then (minOutAmount > amountEstimated) | |
852 | - | else false) | |
853 | - | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
854 | - | else amountEstimated | |
855 | - | let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)]) | |
856 | - | if ((burnInv == burnInv)) | |
931 | + | let userAddress = i.caller | |
932 | + | let txId = i.transactionId | |
933 | + | let $t03794438097 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId) | |
934 | + | if (($t03794438097 == $t03794438097)) | |
857 | 935 | then { | |
858 | - | let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)] | |
859 | - | let sendFee = if ((feeAmount > 0)) | |
860 | - | then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)] | |
861 | - | else nil | |
862 | - | $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount) | |
936 | + | let outInAmountAsset = $t03794438097._5 | |
937 | + | let bonus = $t03794438097._4 | |
938 | + | let feeAmount = $t03794438097._3 | |
939 | + | let commonState = $t03794438097._2 | |
940 | + | let amountEstimated = $t03794438097._1 | |
941 | + | let amount = if (if ((minOutAmount > 0)) | |
942 | + | then (minOutAmount > amountEstimated) | |
943 | + | else false) | |
944 | + | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
945 | + | else amountEstimated | |
946 | + | let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)]) | |
947 | + | if ((burnInv == burnInv)) | |
948 | + | then { | |
949 | + | let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)] | |
950 | + | let sendFee = if ((feeAmount > 0)) | |
951 | + | then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)] | |
952 | + | else nil | |
953 | + | let $t03859738844 = { | |
954 | + | let feeAmountForCalc = if ((this == feeCollectorAddress)) | |
955 | + | then 0 | |
956 | + | else feeAmount | |
957 | + | if (outInAmountAsset) | |
958 | + | then $Tuple2(-((amount + feeAmountForCalc)), 0) | |
959 | + | else $Tuple2(0, -((amount + feeAmountForCalc))) | |
960 | + | } | |
961 | + | let amountAssetBalanceDelta = $t03859738844._1 | |
962 | + | let priceAssetBalanceDelta = $t03859738844._2 | |
963 | + | let $t03884738955 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
964 | + | let refreshKLpActions = $t03884738955._1 | |
965 | + | let updatedKLp = $t03884738955._2 | |
966 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
967 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
968 | + | then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount) | |
969 | + | else throw("Strict value is not equal to itself.") | |
970 | + | } | |
971 | + | else throw("Strict value is not equal to itself.") | |
863 | 972 | } | |
864 | 973 | else throw("Strict value is not equal to itself.") | |
865 | 974 | } | |
872 | 981 | ||
873 | 982 | @Callable(i) | |
874 | 983 | func getOneTknREADONLY (outAssetId,paymentAmount) = { | |
875 | - | let $t03429234430 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit) | |
876 | - | let amountEstimated = $t03429234430._1 | |
877 | - | let commonState = $t03429234430._2 | |
878 | - | let feeAmount = $t03429234430._3 | |
879 | - | let bonus = $t03429234430._4 | |
984 | + | let $t03921239368 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit) | |
985 | + | let amountEstimated = $t03921239368._1 | |
986 | + | let commonState = $t03921239368._2 | |
987 | + | let feeAmount = $t03921239368._3 | |
988 | + | let bonus = $t03921239368._4 | |
989 | + | let outInAmountAsset = $t03921239368._5 | |
880 | 990 | $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus)) | |
881 | 991 | } | |
882 | 992 | ||
907 | 1017 | let outAssetId = parseAssetId(outAssetIdStr) | |
908 | 1018 | let userAddress = i.caller | |
909 | 1019 | let txId = i.transactionId | |
1020 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
910 | 1021 | let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil) | |
911 | 1022 | if ((unstakeInv == unstakeInv)) | |
912 | 1023 | then { | |
913 | - | let $ | |
914 | - | if (($ | |
1024 | + | let $t04027040421 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId) | |
1025 | + | if (($t04027040421 == $t04027040421)) | |
915 | 1026 | then { | |
916 | - | let bonus = $t03525535388._4 | |
917 | - | let feeAmount = $t03525535388._3 | |
918 | - | let commonState = $t03525535388._2 | |
919 | - | let amountEstimated = $t03525535388._1 | |
1027 | + | let outInAmountAsset = $t04027040421._5 | |
1028 | + | let bonus = $t04027040421._4 | |
1029 | + | let feeAmount = $t04027040421._3 | |
1030 | + | let commonState = $t04027040421._2 | |
1031 | + | let amountEstimated = $t04027040421._1 | |
920 | 1032 | let amount = if (if ((minOutAmount > 0)) | |
921 | 1033 | then (minOutAmount > amountEstimated) | |
922 | 1034 | else false) | |
929 | 1041 | let sendFee = if ((feeAmount > 0)) | |
930 | 1042 | then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)] | |
931 | 1043 | else nil | |
932 | - | $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount) | |
1044 | + | let $t04091641163 = { | |
1045 | + | let feeAmountForCalc = if ((this == feeCollectorAddress)) | |
1046 | + | then 0 | |
1047 | + | else feeAmount | |
1048 | + | if (outInAmountAsset) | |
1049 | + | then $Tuple2(-((amount + feeAmountForCalc)), 0) | |
1050 | + | else $Tuple2(0, -((amount + feeAmountForCalc))) | |
1051 | + | } | |
1052 | + | let amountAssetBalanceDelta = $t04091641163._1 | |
1053 | + | let priceAssetBalanceDelta = $t04091641163._2 | |
1054 | + | let $t04116641274 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
1055 | + | let refreshKLpActions = $t04116641274._1 | |
1056 | + | let updatedKLp = $t04116641274._2 | |
1057 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1058 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1059 | + | then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount) | |
1060 | + | else throw("Strict value is not equal to itself.") | |
933 | 1061 | } | |
934 | 1062 | else throw("Strict value is not equal to itself.") | |
935 | 1063 | } | |
950 | 1078 | let pmtAmt = res._3 | |
951 | 1079 | let pmtAssetId = res._4 | |
952 | 1080 | let state = res._5 | |
953 | - | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)]) | |
954 | - | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
955 | - | then state | |
1081 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
1082 | + | if ((currentKLp == currentKLp)) | |
1083 | + | then { | |
1084 | + | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)]) | |
1085 | + | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
1086 | + | then { | |
1087 | + | let $t04222042302 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0) | |
1088 | + | let refreshKLpActions = $t04222042302._1 | |
1089 | + | let updatedKLp = $t04222042302._2 | |
1090 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1091 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1092 | + | then (state ++ refreshKLpActions) | |
1093 | + | else throw("Strict value is not equal to itself.") | |
1094 | + | } | |
1095 | + | else throw("Strict value is not equal to itself.") | |
1096 | + | } | |
956 | 1097 | else throw("Strict value is not equal to itself.") | |
957 | 1098 | } | |
958 | 1099 | ||
971 | 1112 | else if ((noLessThenPriceAsset > outPrAmt)) | |
972 | 1113 | then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset))) | |
973 | 1114 | else { | |
1115 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt)) | |
974 | 1116 | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)]) | |
975 | 1117 | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
976 | - | then state | |
1118 | + | then { | |
1119 | + | let $t04325343334 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0) | |
1120 | + | let refreshKLpActions = $t04325343334._1 | |
1121 | + | let updatedKLp = $t04325343334._2 | |
1122 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1123 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1124 | + | then (state ++ refreshKLpActions) | |
1125 | + | else throw("Strict value is not equal to itself.") | |
1126 | + | } | |
977 | 1127 | else throw("Strict value is not equal to itself.") | |
978 | 1128 | } | |
979 | 1129 | } | |
989 | 1139 | then { | |
990 | 1140 | let cfg = getPoolConfig() | |
991 | 1141 | let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId]) | |
1142 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
992 | 1143 | let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil) | |
993 | 1144 | if ((unstakeInv == unstakeInv)) | |
994 | 1145 | then { | |
995 | 1146 | let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller) | |
1147 | + | let outAmAmt = res._1 | |
1148 | + | let outPrAmt = res._2 | |
996 | 1149 | let poolStatus = parseIntValue(res._9) | |
997 | 1150 | let state = res._10 | |
998 | 1151 | let checkPoolStatus = if (if (isGlobalShutdown()) | |
1004 | 1157 | then { | |
1005 | 1158 | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)]) | |
1006 | 1159 | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
1007 | - | then state | |
1160 | + | then { | |
1161 | + | let $t04445744538 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0) | |
1162 | + | let refreshKLpActions = $t04445744538._1 | |
1163 | + | let updatedKLp = $t04445744538._2 | |
1164 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1165 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1166 | + | then (state ++ refreshKLpActions) | |
1167 | + | else throw("Strict value is not equal to itself.") | |
1168 | + | } | |
1008 | 1169 | else throw("Strict value is not equal to itself.") | |
1009 | 1170 | } | |
1010 | 1171 | else throw("Strict value is not equal to itself.") | |
1028 | 1189 | else throw("no payments are expected")] | |
1029 | 1190 | if ((checks == checks)) | |
1030 | 1191 | then { | |
1192 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
1031 | 1193 | let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil) | |
1032 | 1194 | if ((unstakeInv == unstakeInv)) | |
1033 | 1195 | then { | |
1044 | 1206 | then { | |
1045 | 1207 | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)]) | |
1046 | 1208 | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
1047 | - | then state | |
1209 | + | then { | |
1210 | + | let $t04583045911 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0) | |
1211 | + | let refreshKLpActions = $t04583045911._1 | |
1212 | + | let updatedKLp = $t04583045911._2 | |
1213 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1214 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1215 | + | then (state ++ refreshKLpActions) | |
1216 | + | else throw("Strict value is not equal to itself.") | |
1217 | + | } | |
1048 | 1218 | else throw("Strict value is not equal to itself.") | |
1049 | 1219 | } | |
1050 | 1220 | else throw("Strict value is not equal to itself.") | |
1060 | 1230 | func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract))) | |
1061 | 1231 | then throw("permissions denied") | |
1062 | 1232 | else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success") | |
1233 | + | ||
1234 | + | ||
1235 | + | ||
1236 | + | @Callable(i) | |
1237 | + | func refreshKLp () = { | |
1238 | + | let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0) | |
1239 | + | let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay)) | |
1240 | + | then unit | |
1241 | + | else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], "")) | |
1242 | + | if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight)) | |
1243 | + | then { | |
1244 | + | let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp")) | |
1245 | + | let $t04709847162 = refreshKLpInternal(0, 0, 0) | |
1246 | + | let kLpUpdateActions = $t04709847162._1 | |
1247 | + | let updatedKLp = $t04709847162._2 | |
1248 | + | let actions = if ((kLp != updatedKLp)) | |
1249 | + | then kLpUpdateActions | |
1250 | + | else throwErr("nothing to refresh") | |
1251 | + | $Tuple2(actions, toString(updatedKLp)) | |
1252 | + | } | |
1253 | + | else throw("Strict value is not equal to itself.") | |
1254 | + | } | |
1063 | 1255 | ||
1064 | 1256 | ||
1065 | 1257 |
Old | New | Differences | |
---|---|---|---|
1 | 1 | {-# STDLIB_VERSION 6 #-} | |
2 | 2 | {-# SCRIPT_TYPE ACCOUNT #-} | |
3 | 3 | {-# CONTENT_TYPE DAPP #-} | |
4 | 4 | let lPdecimals = 8 | |
5 | 5 | ||
6 | 6 | let scale8 = 100000000 | |
7 | 7 | ||
8 | 8 | let scale8BigInt = toBigInt(100000000) | |
9 | 9 | ||
10 | 10 | let scale18 = toBigInt(1000000000000000000) | |
11 | 11 | ||
12 | 12 | let zeroBigInt = toBigInt(0) | |
13 | 13 | ||
14 | 14 | let big0 = toBigInt(0) | |
15 | 15 | ||
16 | 16 | let big1 = toBigInt(1) | |
17 | 17 | ||
18 | 18 | let big2 = toBigInt(2) | |
19 | 19 | ||
20 | 20 | let wavesString = "WAVES" | |
21 | 21 | ||
22 | 22 | let SEP = "__" | |
23 | 23 | ||
24 | 24 | let PoolActive = 1 | |
25 | 25 | ||
26 | 26 | let PoolPutDisabled = 2 | |
27 | 27 | ||
28 | 28 | let PoolMatcherDisabled = 3 | |
29 | 29 | ||
30 | 30 | let PoolShutdown = 4 | |
31 | 31 | ||
32 | 32 | let idxPoolAddress = 1 | |
33 | 33 | ||
34 | 34 | let idxPoolStatus = 2 | |
35 | 35 | ||
36 | 36 | let idxPoolLPAssetId = 3 | |
37 | 37 | ||
38 | 38 | let idxAmtAssetId = 4 | |
39 | 39 | ||
40 | 40 | let idxPriceAssetId = 5 | |
41 | 41 | ||
42 | 42 | let idxAmtAssetDcm = 6 | |
43 | 43 | ||
44 | 44 | let idxPriceAssetDcm = 7 | |
45 | 45 | ||
46 | 46 | let idxIAmtAssetId = 8 | |
47 | 47 | ||
48 | 48 | let idxIPriceAssetId = 9 | |
49 | 49 | ||
50 | 50 | let idxLPAssetDcm = 10 | |
51 | 51 | ||
52 | 52 | let idxPoolAmtAssetAmt = 1 | |
53 | 53 | ||
54 | 54 | let idxPoolPriceAssetAmt = 2 | |
55 | 55 | ||
56 | 56 | let idxPoolLPAssetAmt = 3 | |
57 | 57 | ||
58 | 58 | let idxFactoryStakingContract = 1 | |
59 | 59 | ||
60 | 60 | let idxFactorySlippageContract = 7 | |
61 | 61 | ||
62 | 62 | func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult)) | |
63 | 63 | ||
64 | 64 | ||
65 | 65 | func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18)) | |
66 | 66 | ||
67 | 67 | ||
68 | + | func fromX18Round (val,resultScaleMult,round) = toInt(fraction(val, toBigInt(resultScaleMult), scale18, round)) | |
69 | + | ||
70 | + | ||
68 | 71 | func toScale (amt,resScale,curScale) = fraction(amt, resScale, curScale) | |
69 | 72 | ||
70 | 73 | ||
71 | 74 | func abs (val) = if ((0 > val)) | |
72 | 75 | then -(val) | |
73 | 76 | else val | |
74 | 77 | ||
75 | 78 | ||
76 | 79 | func absBigInt (val) = if ((zeroBigInt > val)) | |
77 | 80 | then -(val) | |
78 | 81 | else val | |
79 | 82 | ||
80 | 83 | ||
81 | 84 | func fc () = "%s__factoryContract" | |
82 | 85 | ||
83 | 86 | ||
84 | 87 | func mpk () = "%s__managerPublicKey" | |
85 | 88 | ||
86 | 89 | ||
87 | 90 | func pmpk () = "%s__pendingManagerPublicKey" | |
88 | 91 | ||
89 | 92 | ||
90 | 93 | func pl () = "%s%s__price__last" | |
91 | 94 | ||
92 | 95 | ||
93 | 96 | func ph (h,timestamp) = makeString(["%s%s%d%d__price__history", toString(h), toString(timestamp)], SEP) | |
94 | 97 | ||
95 | 98 | ||
96 | 99 | func pau (userAddress,txId) = ((("%s%s%s__P__" + userAddress) + "__") + txId) | |
97 | 100 | ||
98 | 101 | ||
99 | 102 | func gau (userAddress,txId) = ((("%s%s%s__G__" + userAddress) + "__") + txId) | |
100 | 103 | ||
101 | 104 | ||
102 | 105 | func aa () = "%s__amountAsset" | |
103 | 106 | ||
104 | 107 | ||
105 | 108 | func pa () = "%s__priceAsset" | |
106 | 109 | ||
107 | 110 | ||
111 | + | let keyFee = "%s__fee" | |
112 | + | ||
113 | + | let feeDefault = fraction(10, scale8, 10000) | |
114 | + | ||
115 | + | let fee = valueOrElse(getInteger(this, keyFee), feeDefault) | |
116 | + | ||
117 | + | let keyKLp = makeString(["%s", "kLp"], SEP) | |
118 | + | ||
119 | + | let keyKLpRefreshedHeight = makeString(["%s", "kLpRefreshedHeight"], SEP) | |
120 | + | ||
121 | + | let keyKLpRefreshDelay = makeString(["%s", "refreshKLpDelay"], SEP) | |
122 | + | ||
123 | + | let kLpRefreshDelayDefault = 30 | |
124 | + | ||
125 | + | let kLpRefreshDelay = valueOrElse(getInteger(this, keyKLpRefreshDelay), kLpRefreshDelayDefault) | |
126 | + | ||
108 | 127 | func keyFactoryConfig () = "%s__factoryConfig" | |
109 | 128 | ||
110 | 129 | ||
111 | 130 | func keyMatcherPub () = "%s%s__matcher__publicKey" | |
112 | 131 | ||
113 | 132 | ||
114 | 133 | func keyMappingPoolContractAddressToPoolAssets (poolContractAddress) = (("%s%s%s__" + poolContractAddress) + "__mappings__poolContract2LpAsset") | |
115 | 134 | ||
116 | 135 | ||
117 | 136 | func keyPoolConfig (iAmtAsset,iPriceAsset) = (((("%d%d%s__" + iAmtAsset) + "__") + iPriceAsset) + "__config") | |
118 | 137 | ||
119 | 138 | ||
120 | 139 | func keyMappingsBaseAsset2internalId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2internalId__" + baseAssetStr) | |
121 | 140 | ||
122 | 141 | ||
123 | 142 | func keyAllPoolsShutdown () = "%s__shutdown" | |
124 | 143 | ||
125 | 144 | ||
126 | 145 | func keyPoolWeight (contractAddress) = ("%s%s__poolWeight__" + contractAddress) | |
127 | 146 | ||
128 | 147 | ||
129 | 148 | func keyAllowedLpScriptHash () = "%s__allowedLpScriptHash" | |
130 | 149 | ||
131 | 150 | ||
132 | 151 | let keyFeeCollectorAddress = "%s__feeCollectorAddress" | |
133 | 152 | ||
134 | 153 | func throwOrderError (orderValid,senderValid,matcherValid) = throw(((((("order validation failed: orderValid=" + toString(orderValid)) + " senderValid=") + toString(senderValid)) + " matcherValid=") + toString(matcherValid))) | |
135 | 154 | ||
136 | 155 | ||
137 | 156 | func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], "")) | |
138 | 157 | ||
139 | 158 | ||
140 | 159 | func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], "")) | |
141 | 160 | ||
142 | 161 | ||
143 | 162 | func throwErr (msg) = throw(makeString(["lp.ride:", msg], " ")) | |
144 | 163 | ||
145 | 164 | ||
165 | + | func fmtErr (msg) = makeString(["lp.ride:", msg], " ") | |
166 | + | ||
167 | + | ||
146 | 168 | let factoryContract = addressFromStringValue(getStringOrFail(this, fc())) | |
147 | 169 | ||
148 | 170 | let feeCollectorAddress = addressFromStringValue(getStringOrFail(factoryContract, keyFeeCollectorAddress)) | |
149 | - | ||
150 | - | let inFee = { | |
151 | - | let @ = invoke(factoryContract, "getInFeeREADONLY", [toString(this)], nil) | |
152 | - | if ($isInstanceOf(@, "Int")) | |
153 | - | then @ | |
154 | - | else throw(($getType(@) + " couldn't be cast to Int")) | |
155 | - | } | |
156 | - | ||
157 | - | let outFee = { | |
158 | - | let @ = invoke(factoryContract, "getOutFeeREADONLY", [toString(this)], nil) | |
159 | - | if ($isInstanceOf(@, "Int")) | |
160 | - | then @ | |
161 | - | else throw(($getType(@) + " couldn't be cast to Int")) | |
162 | - | } | |
163 | 171 | ||
164 | 172 | func isGlobalShutdown () = valueOrElse(getBoolean(factoryContract, keyAllPoolsShutdown()), false) | |
165 | 173 | ||
166 | 174 | ||
167 | 175 | func getMatcherPubOrFail () = fromBase58String(getStringOrFail(factoryContract, keyMatcherPub())) | |
168 | 176 | ||
169 | 177 | ||
170 | 178 | func getPoolConfig () = { | |
171 | 179 | let amtAsset = getStringOrFail(this, aa()) | |
172 | 180 | let priceAsset = getStringOrFail(this, pa()) | |
173 | 181 | let iPriceAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(priceAsset)) | |
174 | 182 | let iAmtAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(amtAsset)) | |
175 | 183 | split(getStringOrFail(factoryContract, keyPoolConfig(toString(iAmtAsset), toString(iPriceAsset))), SEP) | |
176 | 184 | } | |
177 | 185 | ||
178 | 186 | ||
179 | 187 | func parseAssetId (input) = if ((input == wavesString)) | |
180 | 188 | then unit | |
181 | 189 | else fromBase58String(input) | |
182 | 190 | ||
183 | 191 | ||
184 | 192 | func assetIdToString (input) = if ((input == unit)) | |
185 | 193 | then wavesString | |
186 | 194 | else toBase58String(value(input)) | |
187 | 195 | ||
188 | 196 | ||
189 | 197 | func parsePoolConfig (poolConfig) = $Tuple7(addressFromStringValue(poolConfig[idxPoolAddress]), parseIntValue(poolConfig[idxPoolStatus]), fromBase58String(poolConfig[idxPoolLPAssetId]), parseAssetId(poolConfig[idxAmtAssetId]), parseAssetId(poolConfig[idxPriceAssetId]), parseIntValue(poolConfig[idxAmtAssetDcm]), parseIntValue(poolConfig[idxPriceAssetDcm])) | |
190 | 198 | ||
191 | 199 | ||
192 | 200 | let poolConfigParsed = parsePoolConfig(getPoolConfig()) | |
193 | 201 | ||
194 | - | let $ | |
202 | + | let $t080588224 = poolConfigParsed | |
195 | 203 | ||
196 | - | let cfgPoolAddress = $ | |
204 | + | let cfgPoolAddress = $t080588224._1 | |
197 | 205 | ||
198 | - | let cfgPoolStatus = $ | |
206 | + | let cfgPoolStatus = $t080588224._2 | |
199 | 207 | ||
200 | - | let cfgLpAssetId = $ | |
208 | + | let cfgLpAssetId = $t080588224._3 | |
201 | 209 | ||
202 | - | let cfgAmountAssetId = $ | |
210 | + | let cfgAmountAssetId = $t080588224._4 | |
203 | 211 | ||
204 | - | let cfgPriceAssetId = $ | |
212 | + | let cfgPriceAssetId = $t080588224._5 | |
205 | 213 | ||
206 | - | let cfgAmountAssetDecimals = $ | |
214 | + | let cfgAmountAssetDecimals = $t080588224._6 | |
207 | 215 | ||
208 | - | let cfgPriceAssetDecimals = $ | |
216 | + | let cfgPriceAssetDecimals = $t080588224._7 | |
209 | 217 | ||
210 | 218 | func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP) | |
211 | 219 | ||
212 | 220 | ||
213 | 221 | let stakingContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactoryStakingContract]), "incorrect staking address") | |
214 | 222 | ||
215 | 223 | let slippageContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactorySlippageContract]), "incorrect staking address") | |
216 | 224 | ||
217 | 225 | func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slippageTolerancePassedByUser,slippageToleranceReal,txHeight,txTimestamp,slipageAmtAssetAmt,slipagePriceAssetAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slippageTolerancePassedByUser), toString(slippageToleranceReal), toString(txHeight), toString(txTimestamp), toString(slipageAmtAssetAmt), toString(slipagePriceAssetAmt)], SEP) | |
218 | 226 | ||
219 | 227 | ||
220 | 228 | func dataGetActionInfo (outAmtAssetAmt,outPriceAssetAmt,inLpAmt,price,txHeight,txTimestamp) = makeString(["%d%d%d%d%d%d", toString(outAmtAssetAmt), toString(outPriceAssetAmt), toString(inLpAmt), toString(price), toString(txHeight), toString(txTimestamp)], SEP) | |
221 | 229 | ||
222 | 230 | ||
223 | 231 | func getAccBalance (assetId) = if ((assetId == "WAVES")) | |
224 | 232 | then wavesBalance(this).available | |
225 | 233 | else assetBalance(this, fromBase58String(assetId)) | |
226 | 234 | ||
227 | 235 | ||
228 | 236 | func calcPriceBigInt (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18) | |
237 | + | ||
238 | + | ||
239 | + | func calcPriceBigIntRound (prAmtX18,amAmtX18,round) = fraction(prAmtX18, scale18, amAmtX18, round) | |
229 | 240 | ||
230 | 241 | ||
231 | 242 | func privateCalcPrice (amAssetDcm,prAssetDcm,amAmt,prAmt) = { | |
232 | 243 | let amtAssetAmtX18 = toX18(amAmt, amAssetDcm) | |
233 | 244 | let priceAssetAmtX18 = toX18(prAmt, prAssetDcm) | |
234 | 245 | calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18) | |
235 | 246 | } | |
236 | 247 | ||
237 | 248 | ||
238 | 249 | func calcPrices (amAmt,prAmt,lpAmt) = { | |
239 | 250 | let cfg = getPoolConfig() | |
240 | 251 | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
241 | 252 | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
242 | 253 | let priceX18 = privateCalcPrice(amtAssetDcm, priceAssetDcm, amAmt, prAmt) | |
243 | 254 | let amAmtX18 = toX18(amAmt, amtAssetDcm) | |
244 | 255 | let prAmtX18 = toX18(prAmt, priceAssetDcm) | |
245 | 256 | let lpAmtX18 = toX18(lpAmt, scale8) | |
246 | 257 | let lpPriceInAmAssetX18 = calcPriceBigInt(amAmtX18, lpAmtX18) | |
247 | 258 | let lpPriceInPrAssetX18 = calcPriceBigInt(prAmtX18, lpAmtX18) | |
248 | 259 | [priceX18, lpPriceInAmAssetX18, lpPriceInPrAssetX18] | |
249 | 260 | } | |
250 | 261 | ||
251 | 262 | ||
252 | 263 | func calculatePrices (amAmt,prAmt,lpAmt) = { | |
253 | 264 | let prices = calcPrices(amAmt, prAmt, lpAmt) | |
254 | 265 | [fromX18(prices[0], scale8), fromX18(prices[1], scale8), fromX18(prices[2], scale8)] | |
255 | 266 | } | |
256 | 267 | ||
257 | 268 | ||
258 | 269 | func estimateGetOperation (txId58,pmtAssetId,pmtLpAmt,userAddress) = { | |
259 | 270 | let cfg = getPoolConfig() | |
260 | 271 | let lpAssetId = cfg[idxPoolLPAssetId] | |
261 | 272 | let amAssetId = cfg[idxAmtAssetId] | |
262 | 273 | let prAssetId = cfg[idxPriceAssetId] | |
263 | 274 | let amAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
264 | 275 | let prAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
265 | 276 | let poolStatus = cfg[idxPoolStatus] | |
266 | 277 | let lpEmission = valueOrErrorMessage(assetInfo(fromBase58String(lpAssetId)), (("Asset " + lpAssetId) + " doesn't exist")).quantity | |
267 | 278 | if ((lpAssetId != pmtAssetId)) | |
268 | 279 | then throw("Invalid asset passed.") | |
269 | 280 | else { | |
270 | 281 | let amBalance = getAccBalance(amAssetId) | |
271 | 282 | let amBalanceX18 = toX18(amBalance, amAssetDcm) | |
272 | 283 | let prBalance = getAccBalance(prAssetId) | |
273 | 284 | let prBalanceX18 = toX18(prBalance, prAssetDcm) | |
274 | 285 | let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18) | |
275 | 286 | let curPrice = fromX18(curPriceX18, scale8) | |
276 | 287 | let pmtLpAmtX18 = toX18(pmtLpAmt, scale8) | |
277 | 288 | let lpEmissionX18 = toX18(lpEmission, scale8) | |
278 | 289 | let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissionX18) | |
279 | 290 | let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissionX18) | |
280 | - | let outAmAmt = | |
281 | - | let outPrAmt = | |
291 | + | let outAmAmt = fromX18Round(outAmAmtX18, amAssetDcm, FLOOR) | |
292 | + | let outPrAmt = fromX18Round(outPrAmtX18, prAssetDcm, FLOOR) | |
282 | 293 | let state = if ((txId58 == "")) | |
283 | 294 | then nil | |
284 | 295 | else [ScriptTransfer(userAddress, outAmAmt, if ((amAssetId == "WAVES")) | |
285 | 296 | then unit | |
286 | 297 | else fromBase58String(amAssetId)), ScriptTransfer(userAddress, outPrAmt, if ((prAssetId == "WAVES")) | |
287 | 298 | then unit | |
288 | 299 | else fromBase58String(prAssetId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice)] | |
289 | 300 | $Tuple10(outAmAmt, outPrAmt, amAssetId, prAssetId, amBalance, prBalance, lpEmission, curPriceX18, poolStatus, state) | |
290 | 301 | } | |
291 | 302 | } | |
292 | 303 | ||
293 | 304 | ||
294 | 305 | func estimatePutOperation (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = { | |
295 | 306 | let cfg = getPoolConfig() | |
296 | 307 | let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId]) | |
297 | 308 | let amAssetIdStr = cfg[idxAmtAssetId] | |
298 | 309 | let prAssetIdStr = cfg[idxPriceAssetId] | |
299 | 310 | let iAmtAssetId = cfg[idxIAmtAssetId] | |
300 | 311 | let iPriceAssetId = cfg[idxIPriceAssetId] | |
301 | 312 | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
302 | 313 | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
303 | 314 | let poolStatus = cfg[idxPoolStatus] | |
304 | 315 | let lpEmission = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity | |
305 | 316 | let inAmAssetIdStr = toBase58String(valueOrElse(inAmAssetId, fromBase58String("WAVES"))) | |
306 | 317 | let inPrAssetIdStr = toBase58String(valueOrElse(inPrAssetId, fromBase58String("WAVES"))) | |
307 | 318 | if (if ((amAssetIdStr != inAmAssetIdStr)) | |
308 | 319 | then true | |
309 | 320 | else (prAssetIdStr != inPrAssetIdStr)) | |
310 | 321 | then throw("Invalid amt or price asset passed.") | |
311 | 322 | else { | |
312 | 323 | let amBalance = if (isEvaluate) | |
313 | 324 | then getAccBalance(amAssetIdStr) | |
314 | 325 | else (getAccBalance(amAssetIdStr) - inAmAssetAmt) | |
315 | 326 | let prBalance = if (isEvaluate) | |
316 | 327 | then getAccBalance(prAssetIdStr) | |
317 | 328 | else (getAccBalance(prAssetIdStr) - inPrAssetAmt) | |
318 | 329 | let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm) | |
319 | 330 | let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm) | |
320 | 331 | let userPriceX18 = calcPriceBigInt(inPrAssetAmtX18, inAmAssetAmtX18) | |
321 | 332 | let amBalanceX18 = toX18(amBalance, amtAssetDcm) | |
322 | 333 | let prBalanceX18 = toX18(prBalance, priceAssetDcm) | |
323 | 334 | let res = if ((lpEmission == 0)) | |
324 | 335 | then { | |
325 | 336 | let curPriceX18 = zeroBigInt | |
326 | 337 | let slippageX18 = zeroBigInt | |
327 | 338 | let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN) | |
328 | 339 | $Tuple5(fromX18(lpAmtX18, scale8), fromX18(inAmAssetAmtX18, amtAssetDcm), fromX18(inPrAssetAmtX18, priceAssetDcm), calcPriceBigInt((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18) | |
329 | 340 | } | |
330 | 341 | else { | |
331 | 342 | let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18) | |
332 | 343 | let slippageX18 = fraction(absBigInt((curPriceX18 - userPriceX18)), scale18, curPriceX18) | |
333 | 344 | let slippageToleranceX18 = toX18(slippageTolerance, scale8) | |
334 | 345 | if (if ((curPriceX18 != zeroBigInt)) | |
335 | 346 | then (slippageX18 > slippageToleranceX18) | |
336 | 347 | else false) | |
337 | 348 | then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18))) | |
338 | 349 | else { | |
339 | 350 | let lpEmissionX18 = toX18(lpEmission, scale8) | |
340 | - | let prViaAmX18 = fraction(inAmAssetAmtX18, | |
341 | - | let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, | |
351 | + | let prViaAmX18 = fraction(inAmAssetAmtX18, calcPriceBigIntRound(prBalanceX18, amBalanceX18, CEILING), scale18, CEILING) | |
352 | + | let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, calcPriceBigIntRound(prBalanceX18, amBalanceX18, FLOOR), CEILING) | |
342 | 353 | let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18)) | |
343 | 354 | then $Tuple2(amViaPrX18, inPrAssetAmtX18) | |
344 | 355 | else $Tuple2(inAmAssetAmtX18, prViaAmX18) | |
345 | 356 | let expAmtAssetAmtX18 = expectedAmts._1 | |
346 | 357 | let expPriceAssetAmtX18 = expectedAmts._2 | |
347 | - | let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18) | |
348 | - | $Tuple5( | |
358 | + | let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18, FLOOR) | |
359 | + | $Tuple5(fromX18Round(lpAmtX18, scale8, FLOOR), fromX18Round(expAmtAssetAmtX18, amtAssetDcm, CEILING), fromX18Round(expPriceAssetAmtX18, priceAssetDcm, CEILING), curPriceX18, slippageX18) | |
349 | 360 | } | |
350 | 361 | } | |
351 | 362 | let calcLpAmt = res._1 | |
352 | 363 | let calcAmAssetPmt = res._2 | |
353 | 364 | let calcPrAssetPmt = res._3 | |
354 | 365 | let curPrice = fromX18(res._4, scale8) | |
355 | 366 | let slippageCalc = fromX18(res._5, scale8) | |
356 | 367 | if ((0 >= calcLpAmt)) | |
357 | 368 | then throw("Invalid calculations. LP calculated is less than zero.") | |
358 | 369 | else { | |
359 | 370 | let emitLpAmt = if (!(emitLp)) | |
360 | 371 | then 0 | |
361 | 372 | else calcLpAmt | |
362 | 373 | let amDiff = (inAmAssetAmt - calcAmAssetPmt) | |
363 | 374 | let prDiff = (inPrAssetAmt - calcPrAssetPmt) | |
364 | 375 | let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(calcAmAssetPmt, calcPrAssetPmt, emitLpAmt, curPrice, slippageTolerance, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))] | |
365 | 376 | $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEmission, lpAssetId, poolStatus, commonState, amDiff, prDiff, inAmAssetId, inPrAssetId) | |
366 | 377 | } | |
367 | 378 | } | |
368 | 379 | } | |
369 | 380 | ||
370 | 381 | ||
382 | + | func calcKLp (amountBalance,priceBalance,lpEmission) = { | |
383 | + | let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 18, DOWN), big1, lpEmission) | |
384 | + | if ((lpEmission == big0)) | |
385 | + | then big0 | |
386 | + | else updatedKLp | |
387 | + | } | |
388 | + | ||
389 | + | ||
390 | + | func calcCurrentKLp (amountAssetDelta,priceAssetDelta,lpAssetEmissionDelta) = { | |
391 | + | let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amountAssetDelta) | |
392 | + | let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - priceAssetDelta) | |
393 | + | let lpAssetEmission = (toBigInt(value(assetInfo(cfgLpAssetId)).quantity) - lpAssetEmissionDelta) | |
394 | + | let currentKLp = calcKLp(amountAssetBalance, priceAssetBalance, lpAssetEmission) | |
395 | + | currentKLp | |
396 | + | } | |
397 | + | ||
398 | + | ||
399 | + | func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = { | |
400 | + | let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta) | |
401 | + | let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta) | |
402 | + | let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta) | |
403 | + | let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission)) | |
404 | + | let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))] | |
405 | + | $Tuple2(actions, updatedKLp) | |
406 | + | } | |
407 | + | ||
408 | + | ||
409 | + | func validateUpdatedKLp (oldKLp,updatedKLp) = if ((updatedKLp >= oldKLp)) | |
410 | + | then true | |
411 | + | else throwErr(makeString(["updated KLp lower than current KLp", toString(oldKLp), toString(updatedKLp)], " ")) | |
412 | + | ||
413 | + | ||
371 | 414 | func validateMatcherOrderAllowed (order) = { | |
372 | - | let cfg = getPoolConfig() | |
373 | - | let amtAssetId = cfg[idxAmtAssetId] | |
374 | - | let priceAssetId = cfg[idxPriceAssetId] | |
375 | - | let poolStatus = parseIntValue(cfg[idxPoolStatus]) | |
376 | - | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
377 | - | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
378 | - | let accAmtAssetBalance = getAccBalance(amtAssetId) | |
379 | - | let accPriceAssetBalance = getAccBalance(priceAssetId) | |
380 | - | let curPriceX18 = if ((order.orderType == Buy)) | |
381 | - | then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance) | |
382 | - | else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance) | |
383 | - | let curPrice = fromX18(curPriceX18, scale8) | |
415 | + | let amountAssetAmount = order.amount | |
416 | + | let priceAssetAmount = fraction(order.amount, order.price, scale8, FLOOR) | |
417 | + | let $t02080121013 = if ((order.orderType == Buy)) | |
418 | + | then $Tuple2(amountAssetAmount, -(priceAssetAmount)) | |
419 | + | else $Tuple2(-(amountAssetAmount), priceAssetAmount) | |
420 | + | let amountAssetBalanceDelta = $t02080121013._1 | |
421 | + | let priceAssetBalanceDelta = $t02080121013._2 | |
384 | 422 | if (if (if (isGlobalShutdown()) | |
385 | 423 | then true | |
386 | - | else ( | |
424 | + | else (cfgPoolStatus == PoolMatcherDisabled)) | |
387 | 425 | then true | |
388 | - | else ( | |
426 | + | else (cfgPoolStatus == PoolShutdown)) | |
389 | 427 | then throw("Exchange operations disabled") | |
390 | - | else { | |
391 | - | let orderAmtAsset = order.assetPair.amountAsset | |
392 | - | let orderAmtAssetStr = if ((orderAmtAsset == unit)) | |
393 | - | then "WAVES" | |
394 | - | else toBase58String(value(orderAmtAsset)) | |
395 | - | let orderPriceAsset = order.assetPair.priceAsset | |
396 | - | let orderPriceAssetStr = if ((orderPriceAsset == unit)) | |
397 | - | then "WAVES" | |
398 | - | else toBase58String(value(orderPriceAsset)) | |
399 | - | if (if ((orderAmtAssetStr != amtAssetId)) | |
400 | - | then true | |
401 | - | else (orderPriceAssetStr != priceAssetId)) | |
402 | - | then throw("Wrong order assets.") | |
403 | - | else { | |
404 | - | let orderPrice = order.price | |
405 | - | let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm) | |
406 | - | let castedOrderPrice = toScale(orderPrice, scale8, priceDcm) | |
407 | - | let isOrderPriceValid = if ((order.orderType == Buy)) | |
408 | - | then (curPrice >= castedOrderPrice) | |
409 | - | else (castedOrderPrice >= curPrice) | |
410 | - | true | |
411 | - | } | |
412 | - | } | |
428 | + | else if (if ((order.assetPair.amountAsset != cfgAmountAssetId)) | |
429 | + | then true | |
430 | + | else (order.assetPair.priceAsset != cfgPriceAssetId)) | |
431 | + | then throw("Wrong order assets.") | |
432 | + | else { | |
433 | + | let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp")) | |
434 | + | let $t02148421584 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
435 | + | let unusedActions = $t02148421584._1 | |
436 | + | let kLpNew = $t02148421584._2 | |
437 | + | let isOrderValid = (kLpNew >= kLp) | |
438 | + | isOrderValid | |
439 | + | } | |
413 | 440 | } | |
414 | 441 | ||
415 | 442 | ||
416 | 443 | func commonGet (i) = if ((size(i.payments) != 1)) | |
417 | 444 | then throw("exactly 1 payment is expected") | |
418 | 445 | else { | |
419 | 446 | let pmt = value(i.payments[0]) | |
420 | 447 | let pmtAssetId = value(pmt.assetId) | |
421 | 448 | let pmtAmt = pmt.amount | |
422 | 449 | let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller) | |
423 | 450 | let outAmAmt = res._1 | |
424 | 451 | let outPrAmt = res._2 | |
425 | 452 | let poolStatus = parseIntValue(res._9) | |
426 | 453 | let state = res._10 | |
427 | 454 | if (if (isGlobalShutdown()) | |
428 | 455 | then true | |
429 | 456 | else (poolStatus == PoolShutdown)) | |
430 | 457 | then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus))) | |
431 | 458 | else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state) | |
432 | 459 | } | |
433 | 460 | ||
434 | 461 | ||
435 | 462 | func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2)) | |
436 | 463 | then throw("exactly 2 payments are expected") | |
437 | 464 | else { | |
438 | 465 | let amAssetPmt = value(i.payments[0]) | |
439 | 466 | let prAssetPmt = value(i.payments[1]) | |
440 | 467 | let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp) | |
441 | 468 | let poolStatus = parseIntValue(estPut._8) | |
442 | 469 | if (if (if (isGlobalShutdown()) | |
443 | 470 | then true | |
444 | 471 | else (poolStatus == PoolPutDisabled)) | |
445 | 472 | then true | |
446 | 473 | else (poolStatus == PoolShutdown)) | |
447 | 474 | then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus))) | |
448 | 475 | else estPut | |
449 | 476 | } | |
450 | 477 | ||
451 | 478 | ||
452 | 479 | func emit (amount) = { | |
453 | 480 | let emitInv = invoke(factoryContract, "emit", [amount], nil) | |
454 | 481 | if ((emitInv == emitInv)) | |
455 | 482 | then { | |
456 | 483 | let emitInvLegacy = match emitInv { | |
457 | 484 | case legacyFactoryContract: Address => | |
458 | 485 | invoke(legacyFactoryContract, "emit", [amount], nil) | |
459 | 486 | case _ => | |
460 | 487 | unit | |
461 | 488 | } | |
462 | 489 | if ((emitInvLegacy == emitInvLegacy)) | |
463 | 490 | then amount | |
464 | 491 | else throw("Strict value is not equal to itself.") | |
465 | 492 | } | |
466 | 493 | else throw("Strict value is not equal to itself.") | |
467 | 494 | } | |
468 | 495 | ||
469 | 496 | ||
470 | - | func takeFee (amount,fee) = { | |
471 | - | let feeAmount = if ((fee == 0)) | |
472 | - | then 0 | |
473 | - | else fraction(amount, fee, scale8) | |
497 | + | func takeFee (amount) = { | |
498 | + | let feeAmount = fraction(amount, fee, scale8) | |
474 | 499 | $Tuple2((amount - feeAmount), feeAmount) | |
475 | 500 | } | |
476 | 501 | ||
477 | 502 | ||
478 | 503 | func calcPutOneToken (paymentAmountRaw,paymentAssetId,userAddress,txId) = { | |
479 | 504 | let isEval = (txId == unit) | |
480 | 505 | let amountBalanceRaw = getAccBalance(assetIdToString(cfgAmountAssetId)) | |
481 | 506 | let priceBalanceRaw = getAccBalance(assetIdToString(cfgPriceAssetId)) | |
482 | 507 | let paymentInAmountAsset = if ((paymentAssetId == cfgAmountAssetId)) | |
483 | 508 | then true | |
484 | 509 | else if ((paymentAssetId == cfgPriceAssetId)) | |
485 | 510 | then false | |
486 | 511 | else throwErr("invalid asset") | |
487 | - | let $ | |
512 | + | let $t02426924562 = if (isEval) | |
488 | 513 | then $Tuple2(amountBalanceRaw, priceBalanceRaw) | |
489 | 514 | else if (paymentInAmountAsset) | |
490 | 515 | then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw) | |
491 | 516 | else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw)) | |
492 | - | let amountBalanceOld = $ | |
493 | - | let priceBalanceOld = $ | |
494 | - | let $ | |
517 | + | let amountBalanceOld = $t02426924562._1 | |
518 | + | let priceBalanceOld = $t02426924562._2 | |
519 | + | let $t02456624715 = if (paymentInAmountAsset) | |
495 | 520 | then $Tuple2(paymentAmountRaw, 0) | |
496 | 521 | else $Tuple2(0, paymentAmountRaw) | |
497 | - | let amountAssetAmountRaw = $ | |
498 | - | let priceAssetAmountRaw = $ | |
499 | - | let amountAssetAmount = takeFee(amountAssetAmountRaw | |
500 | - | let priceAssetAmount = takeFee(priceAssetAmountRaw | |
501 | - | let $ | |
502 | - | let paymentAmount = $ | |
503 | - | let feeAmount = $ | |
522 | + | let amountAssetAmountRaw = $t02456624715._1 | |
523 | + | let priceAssetAmountRaw = $t02456624715._2 | |
524 | + | let amountAssetAmount = takeFee(amountAssetAmountRaw)._1 | |
525 | + | let priceAssetAmount = takeFee(priceAssetAmountRaw)._1 | |
526 | + | let $t02483724896 = takeFee(paymentAmountRaw) | |
527 | + | let paymentAmount = $t02483724896._1 | |
528 | + | let feeAmount = $t02483724896._2 | |
504 | 529 | let amountBalanceNew = (amountBalanceOld + amountAssetAmount) | |
505 | 530 | let priceBalanceNew = (priceBalanceOld + priceAssetAmount) | |
506 | 531 | let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals)) | |
507 | 532 | let priceNew = fromX18(priceNewX18, scale8) | |
508 | 533 | let paymentBalance = if (paymentInAmountAsset) | |
509 | 534 | then amountBalanceOld | |
510 | 535 | else priceBalanceOld | |
511 | 536 | let paymentBalanceBigInt = toBigInt(paymentBalance) | |
512 | 537 | let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity) | |
513 | 538 | let chechSupply = if ((supplyBigInt > big0)) | |
514 | 539 | then true | |
515 | 540 | else throwErr("initial deposit requires all coins") | |
516 | 541 | if ((chechSupply == chechSupply)) | |
517 | 542 | then { | |
518 | 543 | let depositBigInt = toBigInt(paymentAmount) | |
519 | - | let issueAmount = max([0, | |
544 | + | let issueAmount = max([0, fromX18Round(fraction(supplyBigInt, (sqrtBigInt((scale18 + ((depositBigInt * scale18) / paymentBalanceBigInt)), 18, 18, DOWN) - scale18), scale18), scale8, FLOOR)]) | |
520 | 545 | let commonState = if (isEval) | |
521 | 546 | then nil | |
522 | 547 | else [IntegerEntry(pl(), priceNew), IntegerEntry(ph(height, lastBlock.timestamp), priceNew), StringEntry(pau(toString(value(userAddress)), toBase58String(value(txId))), dataPutActionInfo(amountAssetAmountRaw, priceAssetAmountRaw, issueAmount, priceNew, 0, 0, height, lastBlock.timestamp, 0, 0))] | |
523 | 548 | let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals)) | |
524 | 549 | let priceOld = fromX18(priceOldX18, scale8) | |
525 | 550 | let loss = { | |
526 | - | let $ | |
551 | + | let $t02639726564 = if (paymentInAmountAsset) | |
527 | 552 | then $Tuple2(amountAssetAmountRaw, amountBalanceOld) | |
528 | 553 | else $Tuple2(priceAssetAmountRaw, priceBalanceOld) | |
529 | - | let amount = $ | |
530 | - | let balance = $ | |
554 | + | let amount = $t02639726564._1 | |
555 | + | let balance = $t02639726564._2 | |
531 | 556 | let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance))) | |
532 | 557 | fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth) | |
533 | 558 | } | |
534 | - | $ | |
559 | + | $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset) | |
535 | 560 | } | |
536 | 561 | else throw("Strict value is not equal to itself.") | |
537 | 562 | } | |
538 | 563 | ||
539 | 564 | ||
540 | 565 | func calcGetOneToken (outAssetId,paymentAmount,paymentAssetId,userAddress,txId) = { | |
541 | 566 | let isEval = (txId == unit) | |
567 | + | let cfg = getPoolConfig() | |
568 | + | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
569 | + | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
542 | 570 | let checks = [if ((paymentAssetId == cfgLpAssetId)) | |
543 | 571 | then true | |
544 | 572 | else throwErr("invalid lp asset")] | |
545 | 573 | if ((checks == checks)) | |
546 | 574 | then { | |
547 | 575 | let outInAmountAsset = if ((outAssetId == cfgAmountAssetId)) | |
548 | 576 | then true | |
549 | 577 | else if ((outAssetId == cfgPriceAssetId)) | |
550 | 578 | then false | |
551 | 579 | else throwErr("invalid asset") | |
552 | 580 | let balanceBigInt = if (outInAmountAsset) | |
553 | 581 | then toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) | |
554 | 582 | else toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) | |
583 | + | let outInAmountAssetDecimals = if (outInAmountAsset) | |
584 | + | then amtAssetDcm | |
585 | + | else priceAssetDcm | |
555 | 586 | let amBalanceOld = getAccBalance(assetIdToString(cfgAmountAssetId)) | |
556 | 587 | let prBalanceOld = getAccBalance(assetIdToString(cfgPriceAssetId)) | |
557 | 588 | let outBalance = if (outInAmountAsset) | |
558 | 589 | then amBalanceOld | |
559 | 590 | else prBalanceOld | |
560 | 591 | let outBalanceBigInt = toBigInt(outBalance) | |
561 | 592 | let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity) | |
562 | 593 | let redeemedBigInt = toBigInt(paymentAmount) | |
563 | - | let amountRaw = max([0, | |
564 | - | let $ | |
565 | - | let totalAmount = $ | |
566 | - | let feeAmount = $ | |
567 | - | let $ | |
594 | + | let amountRaw = max([0, fromX18Round(fraction(balanceBigInt, (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN)), scale18), outInAmountAssetDecimals, FLOOR)]) | |
595 | + | let $t02846528515 = takeFee(amountRaw) | |
596 | + | let totalAmount = $t02846528515._1 | |
597 | + | let feeAmount = $t02846528515._2 | |
598 | + | let $t02851928745 = if (outInAmountAsset) | |
568 | 599 | then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld) | |
569 | 600 | else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw)) | |
570 | - | let outAmAmount = $ | |
571 | - | let outPrAmount = $ | |
572 | - | let amBalanceNew = $ | |
573 | - | let prBalanceNew = $ | |
601 | + | let outAmAmount = $t02851928745._1 | |
602 | + | let outPrAmount = $t02851928745._2 | |
603 | + | let amBalanceNew = $t02851928745._3 | |
604 | + | let prBalanceNew = $t02851928745._4 | |
574 | 605 | let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals)) | |
575 | 606 | let priceNew = fromX18(priceNewX18, scale8) | |
576 | 607 | let commonState = if (isEval) | |
577 | 608 | then nil | |
578 | 609 | else [StringEntry(gau(toString(value(userAddress)), toBase58String(value(txId))), dataGetActionInfo(outAmAmount, outPrAmount, paymentAmount, priceNew, height, lastBlock.timestamp)), IntegerEntry(pl(), priceNew), IntegerEntry(ph(height, lastBlock.timestamp), priceNew)] | |
579 | 610 | let priceOldX18 = calcPriceBigInt(toX18(prBalanceOld, cfgPriceAssetDecimals), toX18(amBalanceOld, cfgAmountAssetDecimals)) | |
580 | 611 | let priceOld = fromX18(priceOldX18, scale8) | |
581 | 612 | let loss = { | |
582 | 613 | let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2) | |
583 | 614 | fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset) | |
584 | 615 | } | |
585 | - | $ | |
616 | + | $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset) | |
586 | 617 | } | |
587 | 618 | else throw("Strict value is not equal to itself.") | |
588 | 619 | } | |
589 | 620 | ||
590 | 621 | ||
591 | 622 | func managerPublicKeyOrUnit () = match getString(mpk()) { | |
592 | 623 | case s: String => | |
593 | 624 | fromBase58String(s) | |
594 | 625 | case _: Unit => | |
595 | 626 | unit | |
596 | 627 | case _ => | |
597 | 628 | throw("Match error") | |
598 | 629 | } | |
599 | 630 | ||
600 | 631 | ||
601 | 632 | func pendingManagerPublicKeyOrUnit () = match getString(pmpk()) { | |
602 | 633 | case s: String => | |
603 | 634 | fromBase58String(s) | |
604 | 635 | case _: Unit => | |
605 | 636 | unit | |
606 | 637 | case _ => | |
607 | 638 | throw("Match error") | |
608 | 639 | } | |
609 | 640 | ||
610 | 641 | ||
611 | 642 | func isManager (i) = match managerPublicKeyOrUnit() { | |
612 | 643 | case pk: ByteVector => | |
613 | 644 | (i.callerPublicKey == pk) | |
614 | 645 | case _: Unit => | |
615 | 646 | (i.caller == this) | |
616 | 647 | case _ => | |
617 | 648 | throw("Match error") | |
618 | 649 | } | |
619 | 650 | ||
620 | 651 | ||
621 | 652 | func mustManager (i) = { | |
622 | 653 | let pd = throw("Permission denied") | |
623 | 654 | match managerPublicKeyOrUnit() { | |
624 | 655 | case pk: ByteVector => | |
625 | 656 | if ((i.callerPublicKey == pk)) | |
626 | 657 | then true | |
627 | 658 | else pd | |
628 | 659 | case _: Unit => | |
629 | 660 | if ((i.caller == this)) | |
630 | 661 | then true | |
631 | 662 | else pd | |
632 | 663 | case _ => | |
633 | 664 | throw("Match error") | |
634 | 665 | } | |
635 | 666 | } | |
636 | 667 | ||
637 | 668 | ||
638 | 669 | @Callable(i) | |
639 | 670 | func setManager (pendingManagerPublicKey) = { | |
640 | 671 | let checkCaller = mustManager(i) | |
641 | 672 | if ((checkCaller == checkCaller)) | |
642 | 673 | then { | |
643 | 674 | let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey) | |
644 | 675 | if ((checkManagerPublicKey == checkManagerPublicKey)) | |
645 | 676 | then [StringEntry(pmpk(), pendingManagerPublicKey)] | |
646 | 677 | else throw("Strict value is not equal to itself.") | |
647 | 678 | } | |
648 | 679 | else throw("Strict value is not equal to itself.") | |
649 | 680 | } | |
650 | 681 | ||
651 | 682 | ||
652 | 683 | ||
653 | 684 | @Callable(i) | |
654 | 685 | func confirmManager () = { | |
655 | 686 | let pm = pendingManagerPublicKeyOrUnit() | |
656 | 687 | let hasPM = if (isDefined(pm)) | |
657 | 688 | then true | |
658 | 689 | else throw("No pending manager") | |
659 | 690 | if ((hasPM == hasPM)) | |
660 | 691 | then { | |
661 | 692 | let checkPM = if ((i.callerPublicKey == value(pm))) | |
662 | 693 | then true | |
663 | 694 | else throw("You are not pending manager") | |
664 | 695 | if ((checkPM == checkPM)) | |
665 | 696 | then [StringEntry(mpk(), toBase58String(value(pm))), DeleteEntry(pmpk())] | |
666 | 697 | else throw("Strict value is not equal to itself.") | |
667 | 698 | } | |
668 | 699 | else throw("Strict value is not equal to itself.") | |
669 | 700 | } | |
670 | 701 | ||
671 | 702 | ||
672 | 703 | ||
673 | 704 | @Callable(i) | |
674 | 705 | func put (slippageTolerance,shouldAutoStake) = if ((0 > slippageTolerance)) | |
675 | 706 | then throw("Invalid slippageTolerance passed") | |
676 | 707 | else { | |
677 | 708 | let estPut = commonPut(i, slippageTolerance, true) | |
678 | 709 | let emitLpAmt = estPut._2 | |
679 | 710 | let lpAssetId = estPut._7 | |
680 | 711 | let state = estPut._9 | |
681 | 712 | let amDiff = estPut._10 | |
682 | 713 | let prDiff = estPut._11 | |
683 | 714 | let amId = estPut._12 | |
684 | 715 | let prId = estPut._13 | |
685 | - | let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil) | |
686 | - | if ((emitInv == emitInv)) | |
716 | + | let amAssetPmt = toBigInt(value(i.payments[0]).amount) | |
717 | + | let prAssetPmt = toBigInt(value(i.payments[1]).amount) | |
718 | + | let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0)) | |
719 | + | if ((currentKLp == currentKLp)) | |
687 | 720 | then { | |
688 | - | let emitInvLegacy = match emitInv { | |
689 | - | case legacyFactoryContract: Address => | |
690 | - | invoke(legacyFactoryContract, "emit", [emitLpAmt], nil) | |
691 | - | case _ => | |
692 | - | unit | |
693 | - | } | |
694 | - | if ((emitInvLegacy == emitInvLegacy)) | |
721 | + | let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil) | |
722 | + | if ((emitInv == emitInv)) | |
695 | 723 | then { | |
696 | - | let slippageAInv = if ((amDiff > 0)) | |
697 | - | then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)]) | |
698 | - | else nil | |
699 | - | if ((slippageAInv == slippageAInv)) | |
724 | + | let emitInvLegacy = match emitInv { | |
725 | + | case legacyFactoryContract: Address => | |
726 | + | invoke(legacyFactoryContract, "emit", [emitLpAmt], nil) | |
727 | + | case _ => | |
728 | + | unit | |
729 | + | } | |
730 | + | if ((emitInvLegacy == emitInvLegacy)) | |
700 | 731 | then { | |
701 | - | let | |
702 | - | then invoke(slippageContract, "put", nil, [AttachedPayment( | |
732 | + | let slippageAInv = if ((amDiff > 0)) | |
733 | + | then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)]) | |
703 | 734 | else nil | |
704 | - | if (( | |
735 | + | if ((slippageAInv == slippageAInv)) | |
705 | 736 | then { | |
706 | - | let lpTransfer = if (shouldAutoStake) | |
737 | + | let slippagePInv = if ((prDiff > 0)) | |
738 | + | then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)]) | |
739 | + | else nil | |
740 | + | if ((slippagePInv == slippagePInv)) | |
707 | 741 | then { | |
708 | - | let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)]) | |
709 | - | if ((slpStakeInv == slpStakeInv)) | |
710 | - | then nil | |
742 | + | let lpTransfer = if (shouldAutoStake) | |
743 | + | then { | |
744 | + | let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)]) | |
745 | + | if ((slpStakeInv == slpStakeInv)) | |
746 | + | then nil | |
747 | + | else throw("Strict value is not equal to itself.") | |
748 | + | } | |
749 | + | else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)] | |
750 | + | let $t03327333735 = refreshKLpInternal(0, 0, 0) | |
751 | + | if (($t03327333735 == $t03327333735)) | |
752 | + | then { | |
753 | + | let updatedKLp = $t03327333735._2 | |
754 | + | let refreshKLpActions = $t03327333735._1 | |
755 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
756 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
757 | + | then ((state ++ lpTransfer) ++ refreshKLpActions) | |
758 | + | else throw("Strict value is not equal to itself.") | |
759 | + | } | |
711 | 760 | else throw("Strict value is not equal to itself.") | |
712 | 761 | } | |
713 | - | else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)] | |
714 | - | (state ++ lpTransfer) | |
762 | + | else throw("Strict value is not equal to itself.") | |
715 | 763 | } | |
716 | 764 | else throw("Strict value is not equal to itself.") | |
717 | 765 | } | |
718 | 766 | else throw("Strict value is not equal to itself.") | |
719 | 767 | } | |
720 | 768 | else throw("Strict value is not equal to itself.") | |
721 | 769 | } | |
722 | 770 | else throw("Strict value is not equal to itself.") | |
723 | 771 | } | |
724 | 772 | ||
725 | 773 | ||
726 | 774 | ||
727 | 775 | @Callable(i) | |
728 | 776 | func putForFree (maxSlippage) = if ((0 > maxSlippage)) | |
729 | 777 | then throw("Invalid value passed") | |
730 | 778 | else { | |
731 | 779 | let estPut = commonPut(i, maxSlippage, false) | |
732 | - | estPut._9 | |
780 | + | let state = estPut._9 | |
781 | + | let amAssetPmt = toBigInt(value(i.payments[0]).amount) | |
782 | + | let prAssetPmt = toBigInt(value(i.payments[1]).amount) | |
783 | + | let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0)) | |
784 | + | if ((currentKLp == currentKLp)) | |
785 | + | then { | |
786 | + | let $t03429734362 = refreshKLpInternal(0, 0, 0) | |
787 | + | let refreshKLpActions = $t03429734362._1 | |
788 | + | let updatedKLp = $t03429734362._2 | |
789 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
790 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
791 | + | then (state ++ refreshKLpActions) | |
792 | + | else throw("Strict value is not equal to itself.") | |
793 | + | } | |
794 | + | else throw("Strict value is not equal to itself.") | |
733 | 795 | } | |
734 | 796 | ||
735 | 797 | ||
736 | 798 | ||
737 | 799 | @Callable(i) | |
738 | 800 | func putOneTkn (minOutAmount,autoStake) = { | |
739 | 801 | let isPoolOneTokenOperationsDisabled = { | |
740 | 802 | let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil) | |
741 | 803 | if ($isInstanceOf(@, "Boolean")) | |
742 | 804 | then @ | |
743 | 805 | else throw(($getType(@) + " couldn't be cast to Boolean")) | |
744 | 806 | } | |
745 | 807 | let isPutDisabled = if (if (if (isGlobalShutdown()) | |
746 | 808 | then true | |
747 | 809 | else (cfgPoolStatus == PoolPutDisabled)) | |
748 | 810 | then true | |
749 | 811 | else (cfgPoolStatus == PoolShutdown)) | |
750 | 812 | then true | |
751 | 813 | else isPoolOneTokenOperationsDisabled | |
752 | 814 | let checks = [if (if (!(isPutDisabled)) | |
753 | 815 | then true | |
754 | 816 | else isManager(i)) | |
755 | 817 | then true | |
756 | 818 | else throwErr("put operation is blocked by admin"), if ((size(i.payments) == 1)) | |
757 | 819 | then true | |
758 | 820 | else throwErr("exactly 1 payment are expected")] | |
759 | 821 | if ((checks == checks)) | |
760 | 822 | then { | |
761 | 823 | let payment = i.payments[0] | |
762 | 824 | let paymentAssetId = payment.assetId | |
763 | 825 | let paymentAmountRaw = payment.amount | |
764 | - | let userAddress = i.caller | |
765 | - | let txId = i.transactionId | |
766 | - | let $t03172331853 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId) | |
767 | - | if (($t03172331853 == $t03172331853)) | |
826 | + | let currentKLp = if ((paymentAssetId == cfgAmountAssetId)) | |
827 | + | then calcCurrentKLp(toBigInt(paymentAmountRaw), toBigInt(0), toBigInt(0)) | |
828 | + | else if ((paymentAssetId == cfgPriceAssetId)) | |
829 | + | then calcCurrentKLp(toBigInt(0), toBigInt(paymentAmountRaw), toBigInt(0)) | |
830 | + | else throwErr("payment asset is not supported") | |
831 | + | if ((currentKLp == currentKLp)) | |
768 | 832 | then { | |
769 | - | let bonus = $t03172331853._4 | |
770 | - | let feeAmount = $t03172331853._3 | |
771 | - | let commonState = $t03172331853._2 | |
772 | - | let emitAmountEstimated = $t03172331853._1 | |
773 | - | let emitAmount = if (if ((minOutAmount > 0)) | |
774 | - | then (minOutAmount > emitAmountEstimated) | |
775 | - | else false) | |
776 | - | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
777 | - | else emitAmountEstimated | |
778 | - | let emitInv = emit(emitAmount) | |
779 | - | if ((emitInv == emitInv)) | |
833 | + | let userAddress = i.caller | |
834 | + | let txId = i.transactionId | |
835 | + | let $t03555035702 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId) | |
836 | + | if (($t03555035702 == $t03555035702)) | |
780 | 837 | then { | |
781 | - | let lpTransfer = if (autoStake) | |
838 | + | let paymentInAmountAsset = $t03555035702._5 | |
839 | + | let bonus = $t03555035702._4 | |
840 | + | let feeAmount = $t03555035702._3 | |
841 | + | let commonState = $t03555035702._2 | |
842 | + | let emitAmountEstimated = $t03555035702._1 | |
843 | + | let emitAmount = if (if ((minOutAmount > 0)) | |
844 | + | then (minOutAmount > emitAmountEstimated) | |
845 | + | else false) | |
846 | + | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
847 | + | else emitAmountEstimated | |
848 | + | let emitInv = emit(emitAmount) | |
849 | + | if ((emitInv == emitInv)) | |
782 | 850 | then { | |
783 | - | let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)]) | |
784 | - | if ((stakeInv == stakeInv)) | |
785 | - | then nil | |
851 | + | let lpTransfer = if (autoStake) | |
852 | + | then { | |
853 | + | let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)]) | |
854 | + | if ((stakeInv == stakeInv)) | |
855 | + | then nil | |
856 | + | else throw("Strict value is not equal to itself.") | |
857 | + | } | |
858 | + | else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)] | |
859 | + | let sendFee = if ((feeAmount > 0)) | |
860 | + | then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)] | |
861 | + | else nil | |
862 | + | let $t03628836485 = if ((this == feeCollectorAddress)) | |
863 | + | then $Tuple2(0, 0) | |
864 | + | else if (paymentInAmountAsset) | |
865 | + | then $Tuple2(-(feeAmount), 0) | |
866 | + | else $Tuple2(0, -(feeAmount)) | |
867 | + | let amountAssetBalanceDelta = $t03628836485._1 | |
868 | + | let priceAssetBalanceDelta = $t03628836485._2 | |
869 | + | let $t03648836596 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
870 | + | let refreshKLpActions = $t03648836596._1 | |
871 | + | let updatedKLp = $t03648836596._2 | |
872 | + | let kLp = value(getString(keyKLp)) | |
873 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
874 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
875 | + | then $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount) | |
786 | 876 | else throw("Strict value is not equal to itself.") | |
787 | 877 | } | |
788 | - | else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)] | |
789 | - | let sendFee = if ((feeAmount > 0)) | |
790 | - | then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)] | |
791 | - | else nil | |
792 | - | $Tuple2(((commonState ++ lpTransfer) ++ sendFee), emitAmount) | |
878 | + | else throw("Strict value is not equal to itself.") | |
793 | 879 | } | |
794 | 880 | else throw("Strict value is not equal to itself.") | |
795 | 881 | } | |
796 | 882 | else throw("Strict value is not equal to itself.") | |
797 | 883 | } | |
798 | 884 | else throw("Strict value is not equal to itself.") | |
799 | 885 | } | |
800 | 886 | ||
801 | 887 | ||
802 | 888 | ||
803 | 889 | @Callable(i) | |
804 | 890 | func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = { | |
805 | - | let $t03258232717 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit) | |
806 | - | let emitAmountEstimated = $t03258232717._1 | |
807 | - | let commonState = $t03258232717._2 | |
808 | - | let feeAmount = $t03258232717._3 | |
809 | - | let bonus = $t03258232717._4 | |
891 | + | let $t03690237059 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit) | |
892 | + | let emitAmountEstimated = $t03690237059._1 | |
893 | + | let commonState = $t03690237059._2 | |
894 | + | let feeAmount = $t03690237059._3 | |
895 | + | let bonus = $t03690237059._4 | |
896 | + | let paymentInAmountAsset = $t03690237059._5 | |
810 | 897 | $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus)) | |
811 | 898 | } | |
812 | 899 | ||
813 | 900 | ||
814 | 901 | ||
815 | 902 | @Callable(i) | |
816 | 903 | func getOneTkn (outAssetIdStr,minOutAmount) = { | |
817 | 904 | let isPoolOneTokenOperationsDisabled = { | |
818 | 905 | let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil) | |
819 | 906 | if ($isInstanceOf(@, "Boolean")) | |
820 | 907 | then @ | |
821 | 908 | else throw(($getType(@) + " couldn't be cast to Boolean")) | |
822 | 909 | } | |
823 | 910 | let isGetDisabled = if (if (isGlobalShutdown()) | |
824 | 911 | then true | |
825 | 912 | else (cfgPoolStatus == PoolShutdown)) | |
826 | 913 | then true | |
827 | 914 | else isPoolOneTokenOperationsDisabled | |
828 | 915 | let checks = [if (if (!(isGetDisabled)) | |
829 | 916 | then true | |
830 | 917 | else isManager(i)) | |
831 | 918 | then true | |
832 | 919 | else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 1)) | |
833 | 920 | then true | |
834 | 921 | else throwErr("exactly 1 payment are expected")] | |
835 | 922 | if ((checks == checks)) | |
836 | 923 | then { | |
837 | 924 | let outAssetId = parseAssetId(outAssetIdStr) | |
838 | 925 | let payment = i.payments[0] | |
839 | 926 | let paymentAssetId = payment.assetId | |
840 | 927 | let paymentAmount = payment.amount | |
841 | - | let userAddress = i.caller | |
842 | - | let txId = i.transactionId | |
843 | - | let $t03352233657 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId) | |
844 | - | if (($t03352233657 == $t03352233657)) | |
928 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
929 | + | if ((currentKLp == currentKLp)) | |
845 | 930 | then { | |
846 | - | let bonus = $t03352233657._4 | |
847 | - | let feeAmount = $t03352233657._3 | |
848 | - | let commonState = $t03352233657._2 | |
849 | - | let amountEstimated = $t03352233657._1 | |
850 | - | let amount = if (if ((minOutAmount > 0)) | |
851 | - | then (minOutAmount > amountEstimated) | |
852 | - | else false) | |
853 | - | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
854 | - | else amountEstimated | |
855 | - | let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)]) | |
856 | - | if ((burnInv == burnInv)) | |
931 | + | let userAddress = i.caller | |
932 | + | let txId = i.transactionId | |
933 | + | let $t03794438097 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId) | |
934 | + | if (($t03794438097 == $t03794438097)) | |
857 | 935 | then { | |
858 | - | let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)] | |
859 | - | let sendFee = if ((feeAmount > 0)) | |
860 | - | then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)] | |
861 | - | else nil | |
862 | - | $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount) | |
936 | + | let outInAmountAsset = $t03794438097._5 | |
937 | + | let bonus = $t03794438097._4 | |
938 | + | let feeAmount = $t03794438097._3 | |
939 | + | let commonState = $t03794438097._2 | |
940 | + | let amountEstimated = $t03794438097._1 | |
941 | + | let amount = if (if ((minOutAmount > 0)) | |
942 | + | then (minOutAmount > amountEstimated) | |
943 | + | else false) | |
944 | + | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
945 | + | else amountEstimated | |
946 | + | let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)]) | |
947 | + | if ((burnInv == burnInv)) | |
948 | + | then { | |
949 | + | let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)] | |
950 | + | let sendFee = if ((feeAmount > 0)) | |
951 | + | then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)] | |
952 | + | else nil | |
953 | + | let $t03859738844 = { | |
954 | + | let feeAmountForCalc = if ((this == feeCollectorAddress)) | |
955 | + | then 0 | |
956 | + | else feeAmount | |
957 | + | if (outInAmountAsset) | |
958 | + | then $Tuple2(-((amount + feeAmountForCalc)), 0) | |
959 | + | else $Tuple2(0, -((amount + feeAmountForCalc))) | |
960 | + | } | |
961 | + | let amountAssetBalanceDelta = $t03859738844._1 | |
962 | + | let priceAssetBalanceDelta = $t03859738844._2 | |
963 | + | let $t03884738955 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
964 | + | let refreshKLpActions = $t03884738955._1 | |
965 | + | let updatedKLp = $t03884738955._2 | |
966 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
967 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
968 | + | then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount) | |
969 | + | else throw("Strict value is not equal to itself.") | |
970 | + | } | |
971 | + | else throw("Strict value is not equal to itself.") | |
863 | 972 | } | |
864 | 973 | else throw("Strict value is not equal to itself.") | |
865 | 974 | } | |
866 | 975 | else throw("Strict value is not equal to itself.") | |
867 | 976 | } | |
868 | 977 | else throw("Strict value is not equal to itself.") | |
869 | 978 | } | |
870 | 979 | ||
871 | 980 | ||
872 | 981 | ||
873 | 982 | @Callable(i) | |
874 | 983 | func getOneTknREADONLY (outAssetId,paymentAmount) = { | |
875 | - | let $t03429234430 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit) | |
876 | - | let amountEstimated = $t03429234430._1 | |
877 | - | let commonState = $t03429234430._2 | |
878 | - | let feeAmount = $t03429234430._3 | |
879 | - | let bonus = $t03429234430._4 | |
984 | + | let $t03921239368 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit) | |
985 | + | let amountEstimated = $t03921239368._1 | |
986 | + | let commonState = $t03921239368._2 | |
987 | + | let feeAmount = $t03921239368._3 | |
988 | + | let bonus = $t03921239368._4 | |
989 | + | let outInAmountAsset = $t03921239368._5 | |
880 | 990 | $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus)) | |
881 | 991 | } | |
882 | 992 | ||
883 | 993 | ||
884 | 994 | ||
885 | 995 | @Callable(i) | |
886 | 996 | func unstakeAndGetOneTkn (unstakeAmount,outAssetIdStr,minOutAmount) = { | |
887 | 997 | let isPoolOneTokenOperationsDisabled = { | |
888 | 998 | let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil) | |
889 | 999 | if ($isInstanceOf(@, "Boolean")) | |
890 | 1000 | then @ | |
891 | 1001 | else throw(($getType(@) + " couldn't be cast to Boolean")) | |
892 | 1002 | } | |
893 | 1003 | let isGetDisabled = if (if (isGlobalShutdown()) | |
894 | 1004 | then true | |
895 | 1005 | else (cfgPoolStatus == PoolShutdown)) | |
896 | 1006 | then true | |
897 | 1007 | else isPoolOneTokenOperationsDisabled | |
898 | 1008 | let checks = [if (if (!(isGetDisabled)) | |
899 | 1009 | then true | |
900 | 1010 | else isManager(i)) | |
901 | 1011 | then true | |
902 | 1012 | else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 0)) | |
903 | 1013 | then true | |
904 | 1014 | else throwErr("no payments are expected")] | |
905 | 1015 | if ((checks == checks)) | |
906 | 1016 | then { | |
907 | 1017 | let outAssetId = parseAssetId(outAssetIdStr) | |
908 | 1018 | let userAddress = i.caller | |
909 | 1019 | let txId = i.transactionId | |
1020 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
910 | 1021 | let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil) | |
911 | 1022 | if ((unstakeInv == unstakeInv)) | |
912 | 1023 | then { | |
913 | - | let $ | |
914 | - | if (($ | |
1024 | + | let $t04027040421 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId) | |
1025 | + | if (($t04027040421 == $t04027040421)) | |
915 | 1026 | then { | |
916 | - | let bonus = $t03525535388._4 | |
917 | - | let feeAmount = $t03525535388._3 | |
918 | - | let commonState = $t03525535388._2 | |
919 | - | let amountEstimated = $t03525535388._1 | |
1027 | + | let outInAmountAsset = $t04027040421._5 | |
1028 | + | let bonus = $t04027040421._4 | |
1029 | + | let feeAmount = $t04027040421._3 | |
1030 | + | let commonState = $t04027040421._2 | |
1031 | + | let amountEstimated = $t04027040421._1 | |
920 | 1032 | let amount = if (if ((minOutAmount > 0)) | |
921 | 1033 | then (minOutAmount > amountEstimated) | |
922 | 1034 | else false) | |
923 | 1035 | then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], "")) | |
924 | 1036 | else amountEstimated | |
925 | 1037 | let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)]) | |
926 | 1038 | if ((burnInv == burnInv)) | |
927 | 1039 | then { | |
928 | 1040 | let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)] | |
929 | 1041 | let sendFee = if ((feeAmount > 0)) | |
930 | 1042 | then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)] | |
931 | 1043 | else nil | |
932 | - | $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount) | |
1044 | + | let $t04091641163 = { | |
1045 | + | let feeAmountForCalc = if ((this == feeCollectorAddress)) | |
1046 | + | then 0 | |
1047 | + | else feeAmount | |
1048 | + | if (outInAmountAsset) | |
1049 | + | then $Tuple2(-((amount + feeAmountForCalc)), 0) | |
1050 | + | else $Tuple2(0, -((amount + feeAmountForCalc))) | |
1051 | + | } | |
1052 | + | let amountAssetBalanceDelta = $t04091641163._1 | |
1053 | + | let priceAssetBalanceDelta = $t04091641163._2 | |
1054 | + | let $t04116641274 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0) | |
1055 | + | let refreshKLpActions = $t04116641274._1 | |
1056 | + | let updatedKLp = $t04116641274._2 | |
1057 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1058 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1059 | + | then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount) | |
1060 | + | else throw("Strict value is not equal to itself.") | |
933 | 1061 | } | |
934 | 1062 | else throw("Strict value is not equal to itself.") | |
935 | 1063 | } | |
936 | 1064 | else throw("Strict value is not equal to itself.") | |
937 | 1065 | } | |
938 | 1066 | else throw("Strict value is not equal to itself.") | |
939 | 1067 | } | |
940 | 1068 | else throw("Strict value is not equal to itself.") | |
941 | 1069 | } | |
942 | 1070 | ||
943 | 1071 | ||
944 | 1072 | ||
945 | 1073 | @Callable(i) | |
946 | 1074 | func get () = { | |
947 | 1075 | let res = commonGet(i) | |
948 | 1076 | let outAmtAmt = res._1 | |
949 | 1077 | let outPrAmt = res._2 | |
950 | 1078 | let pmtAmt = res._3 | |
951 | 1079 | let pmtAssetId = res._4 | |
952 | 1080 | let state = res._5 | |
953 | - | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)]) | |
954 | - | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
955 | - | then state | |
1081 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
1082 | + | if ((currentKLp == currentKLp)) | |
1083 | + | then { | |
1084 | + | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)]) | |
1085 | + | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
1086 | + | then { | |
1087 | + | let $t04222042302 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0) | |
1088 | + | let refreshKLpActions = $t04222042302._1 | |
1089 | + | let updatedKLp = $t04222042302._2 | |
1090 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1091 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1092 | + | then (state ++ refreshKLpActions) | |
1093 | + | else throw("Strict value is not equal to itself.") | |
1094 | + | } | |
1095 | + | else throw("Strict value is not equal to itself.") | |
1096 | + | } | |
956 | 1097 | else throw("Strict value is not equal to itself.") | |
957 | 1098 | } | |
958 | 1099 | ||
959 | 1100 | ||
960 | 1101 | ||
961 | 1102 | @Callable(i) | |
962 | 1103 | func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = { | |
963 | 1104 | let res = commonGet(i) | |
964 | 1105 | let outAmAmt = res._1 | |
965 | 1106 | let outPrAmt = res._2 | |
966 | 1107 | let pmtAmt = res._3 | |
967 | 1108 | let pmtAssetId = res._4 | |
968 | 1109 | let state = res._5 | |
969 | 1110 | if ((noLessThenAmtAsset > outAmAmt)) | |
970 | 1111 | then throw(((("noLessThenAmtAsset failed: " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset))) | |
971 | 1112 | else if ((noLessThenPriceAsset > outPrAmt)) | |
972 | 1113 | then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset))) | |
973 | 1114 | else { | |
1115 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt)) | |
974 | 1116 | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)]) | |
975 | 1117 | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
976 | - | then state | |
1118 | + | then { | |
1119 | + | let $t04325343334 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0) | |
1120 | + | let refreshKLpActions = $t04325343334._1 | |
1121 | + | let updatedKLp = $t04325343334._2 | |
1122 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1123 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1124 | + | then (state ++ refreshKLpActions) | |
1125 | + | else throw("Strict value is not equal to itself.") | |
1126 | + | } | |
977 | 1127 | else throw("Strict value is not equal to itself.") | |
978 | 1128 | } | |
979 | 1129 | } | |
980 | 1130 | ||
981 | 1131 | ||
982 | 1132 | ||
983 | 1133 | @Callable(i) | |
984 | 1134 | func unstakeAndGet (amount) = { | |
985 | 1135 | let checkPayments = if ((size(i.payments) != 0)) | |
986 | 1136 | then throw("No payments are expected") | |
987 | 1137 | else true | |
988 | 1138 | if ((checkPayments == checkPayments)) | |
989 | 1139 | then { | |
990 | 1140 | let cfg = getPoolConfig() | |
991 | 1141 | let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId]) | |
1142 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
992 | 1143 | let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil) | |
993 | 1144 | if ((unstakeInv == unstakeInv)) | |
994 | 1145 | then { | |
995 | 1146 | let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller) | |
1147 | + | let outAmAmt = res._1 | |
1148 | + | let outPrAmt = res._2 | |
996 | 1149 | let poolStatus = parseIntValue(res._9) | |
997 | 1150 | let state = res._10 | |
998 | 1151 | let checkPoolStatus = if (if (isGlobalShutdown()) | |
999 | 1152 | then true | |
1000 | 1153 | else (poolStatus == PoolShutdown)) | |
1001 | 1154 | then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus))) | |
1002 | 1155 | else true | |
1003 | 1156 | if ((checkPoolStatus == checkPoolStatus)) | |
1004 | 1157 | then { | |
1005 | 1158 | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)]) | |
1006 | 1159 | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
1007 | - | then state | |
1160 | + | then { | |
1161 | + | let $t04445744538 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0) | |
1162 | + | let refreshKLpActions = $t04445744538._1 | |
1163 | + | let updatedKLp = $t04445744538._2 | |
1164 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1165 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1166 | + | then (state ++ refreshKLpActions) | |
1167 | + | else throw("Strict value is not equal to itself.") | |
1168 | + | } | |
1008 | 1169 | else throw("Strict value is not equal to itself.") | |
1009 | 1170 | } | |
1010 | 1171 | else throw("Strict value is not equal to itself.") | |
1011 | 1172 | } | |
1012 | 1173 | else throw("Strict value is not equal to itself.") | |
1013 | 1174 | } | |
1014 | 1175 | else throw("Strict value is not equal to itself.") | |
1015 | 1176 | } | |
1016 | 1177 | ||
1017 | 1178 | ||
1018 | 1179 | ||
1019 | 1180 | @Callable(i) | |
1020 | 1181 | func unstakeAndGetNoLess (unstakeAmount,noLessThenAmountAsset,noLessThenPriceAsset) = { | |
1021 | 1182 | let isGetDisabled = if (isGlobalShutdown()) | |
1022 | 1183 | then true | |
1023 | 1184 | else (cfgPoolStatus == PoolShutdown) | |
1024 | 1185 | let checks = [if (!(isGetDisabled)) | |
1025 | 1186 | then true | |
1026 | 1187 | else throw("get operation is blocked by admin"), if ((size(i.payments) == 0)) | |
1027 | 1188 | then true | |
1028 | 1189 | else throw("no payments are expected")] | |
1029 | 1190 | if ((checks == checks)) | |
1030 | 1191 | then { | |
1192 | + | let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0)) | |
1031 | 1193 | let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil) | |
1032 | 1194 | if ((unstakeInv == unstakeInv)) | |
1033 | 1195 | then { | |
1034 | 1196 | let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(cfgLpAssetId), unstakeAmount, i.caller) | |
1035 | 1197 | let outAmAmt = res._1 | |
1036 | 1198 | let outPrAmt = res._2 | |
1037 | 1199 | let state = res._10 | |
1038 | 1200 | let checkAmounts = [if ((outAmAmt >= noLessThenAmountAsset)) | |
1039 | 1201 | then true | |
1040 | 1202 | else throw(makeString(["amount asset amount to receive is less than ", toString(noLessThenAmountAsset)], "")), if ((outPrAmt >= noLessThenPriceAsset)) | |
1041 | 1203 | then true | |
1042 | 1204 | else throw(makeString(["price asset amount to receive is less than ", toString(noLessThenPriceAsset)], ""))] | |
1043 | 1205 | if ((checkAmounts == checkAmounts)) | |
1044 | 1206 | then { | |
1045 | 1207 | let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)]) | |
1046 | 1208 | if ((burnLPAssetOnFactory == burnLPAssetOnFactory)) | |
1047 | - | then state | |
1209 | + | then { | |
1210 | + | let $t04583045911 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0) | |
1211 | + | let refreshKLpActions = $t04583045911._1 | |
1212 | + | let updatedKLp = $t04583045911._2 | |
1213 | + | let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp) | |
1214 | + | if ((isUpdatedKLpValid == isUpdatedKLpValid)) | |
1215 | + | then (state ++ refreshKLpActions) | |
1216 | + | else throw("Strict value is not equal to itself.") | |
1217 | + | } | |
1048 | 1218 | else throw("Strict value is not equal to itself.") | |
1049 | 1219 | } | |
1050 | 1220 | else throw("Strict value is not equal to itself.") | |
1051 | 1221 | } | |
1052 | 1222 | else throw("Strict value is not equal to itself.") | |
1053 | 1223 | } | |
1054 | 1224 | else throw("Strict value is not equal to itself.") | |
1055 | 1225 | } | |
1056 | 1226 | ||
1057 | 1227 | ||
1058 | 1228 | ||
1059 | 1229 | @Callable(i) | |
1060 | 1230 | func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract))) | |
1061 | 1231 | then throw("permissions denied") | |
1062 | 1232 | else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success") | |
1233 | + | ||
1234 | + | ||
1235 | + | ||
1236 | + | @Callable(i) | |
1237 | + | func refreshKLp () = { | |
1238 | + | let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0) | |
1239 | + | let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay)) | |
1240 | + | then unit | |
1241 | + | else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], "")) | |
1242 | + | if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight)) | |
1243 | + | then { | |
1244 | + | let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp")) | |
1245 | + | let $t04709847162 = refreshKLpInternal(0, 0, 0) | |
1246 | + | let kLpUpdateActions = $t04709847162._1 | |
1247 | + | let updatedKLp = $t04709847162._2 | |
1248 | + | let actions = if ((kLp != updatedKLp)) | |
1249 | + | then kLpUpdateActions | |
1250 | + | else throwErr("nothing to refresh") | |
1251 | + | $Tuple2(actions, toString(updatedKLp)) | |
1252 | + | } | |
1253 | + | else throw("Strict value is not equal to itself.") | |
1254 | + | } | |
1063 | 1255 | ||
1064 | 1256 | ||
1065 | 1257 | ||
1066 | 1258 | @Callable(i) | |
1067 | 1259 | func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig()) | |
1068 | 1260 | ||
1069 | 1261 | ||
1070 | 1262 | ||
1071 | 1263 | @Callable(i) | |
1072 | 1264 | func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId)) | |
1073 | 1265 | ||
1074 | 1266 | ||
1075 | 1267 | ||
1076 | 1268 | @Callable(i) | |
1077 | 1269 | func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = { | |
1078 | 1270 | let prices = calcPrices(amAmt, prAmt, lpAmt) | |
1079 | 1271 | $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])]) | |
1080 | 1272 | } | |
1081 | 1273 | ||
1082 | 1274 | ||
1083 | 1275 | ||
1084 | 1276 | @Callable(i) | |
1085 | 1277 | func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult))) | |
1086 | 1278 | ||
1087 | 1279 | ||
1088 | 1280 | ||
1089 | 1281 | @Callable(i) | |
1090 | 1282 | func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult)) | |
1091 | 1283 | ||
1092 | 1284 | ||
1093 | 1285 | ||
1094 | 1286 | @Callable(i) | |
1095 | 1287 | func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18)))) | |
1096 | 1288 | ||
1097 | 1289 | ||
1098 | 1290 | ||
1099 | 1291 | @Callable(i) | |
1100 | 1292 | func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp)) | |
1101 | 1293 | ||
1102 | 1294 | ||
1103 | 1295 | ||
1104 | 1296 | @Callable(i) | |
1105 | 1297 | func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = { | |
1106 | 1298 | let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress)) | |
1107 | 1299 | $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10)) | |
1108 | 1300 | } | |
1109 | 1301 | ||
1110 | 1302 | ||
1111 | 1303 | ||
1112 | 1304 | @Callable(i) | |
1113 | 1305 | func statsREADONLY () = { | |
1114 | 1306 | let cfg = getPoolConfig() | |
1115 | 1307 | let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId]) | |
1116 | 1308 | let amtAssetId = cfg[idxAmtAssetId] | |
1117 | 1309 | let priceAssetId = cfg[idxPriceAssetId] | |
1118 | 1310 | let iAmtAssetId = cfg[idxIAmtAssetId] | |
1119 | 1311 | let iPriceAssetId = cfg[idxIPriceAssetId] | |
1120 | 1312 | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
1121 | 1313 | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
1122 | 1314 | let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity | |
1123 | 1315 | let accAmtAssetBalance = getAccBalance(amtAssetId) | |
1124 | 1316 | let accPriceAssetBalance = getAccBalance(priceAssetId) | |
1125 | 1317 | let pricesList = if ((poolLPBalance == 0)) | |
1126 | 1318 | then [zeroBigInt, zeroBigInt, zeroBigInt] | |
1127 | 1319 | else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance) | |
1128 | 1320 | let curPrice = 0 | |
1129 | 1321 | let lpAmtAssetShare = fromX18(pricesList[1], scale8) | |
1130 | 1322 | let lpPriceAssetShare = fromX18(pricesList[2], scale8) | |
1131 | 1323 | let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this)))) | |
1132 | 1324 | $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(accAmtAssetBalance), toString(accPriceAssetBalance), toString(poolLPBalance), toString(curPrice), toString(lpAmtAssetShare), toString(lpPriceAssetShare), toString(poolWeight)], SEP)) | |
1133 | 1325 | } | |
1134 | 1326 | ||
1135 | 1327 | ||
1136 | 1328 | ||
1137 | 1329 | @Callable(i) | |
1138 | 1330 | func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = { | |
1139 | 1331 | let cfg = getPoolConfig() | |
1140 | 1332 | let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId]) | |
1141 | 1333 | let amAssetIdStr = cfg[idxAmtAssetId] | |
1142 | 1334 | let amAssetId = fromBase58String(amAssetIdStr) | |
1143 | 1335 | let prAssetIdStr = cfg[idxPriceAssetId] | |
1144 | 1336 | let prAssetId = fromBase58String(prAssetIdStr) | |
1145 | 1337 | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
1146 | 1338 | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
1147 | 1339 | let poolStatus = cfg[idxPoolStatus] | |
1148 | 1340 | let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity | |
1149 | 1341 | let accAmtAssetBalance = getAccBalance(amAssetIdStr) | |
1150 | 1342 | let accPriceAssetBalance = getAccBalance(prAssetIdStr) | |
1151 | 1343 | let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm) | |
1152 | 1344 | let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm) | |
1153 | 1345 | let curPriceX18 = if ((poolLPBalance == 0)) | |
1154 | 1346 | then zeroBigInt | |
1155 | 1347 | else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18) | |
1156 | 1348 | let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm) | |
1157 | 1349 | let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18) | |
1158 | 1350 | let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm) | |
1159 | 1351 | let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false) | |
1160 | 1352 | let calcLpAmt = estPut._1 | |
1161 | 1353 | let curPriceCalc = estPut._3 | |
1162 | 1354 | let amBalance = estPut._4 | |
1163 | 1355 | let prBalance = estPut._5 | |
1164 | 1356 | let lpEmission = estPut._6 | |
1165 | 1357 | $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(fromX18(curPriceX18, scale8)), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP)) | |
1166 | 1358 | } | |
1167 | 1359 | ||
1168 | 1360 | ||
1169 | 1361 | ||
1170 | 1362 | @Callable(i) | |
1171 | 1363 | func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = { | |
1172 | 1364 | let cfg = getPoolConfig() | |
1173 | 1365 | let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId]) | |
1174 | 1366 | let amAssetIdStr = cfg[idxAmtAssetId] | |
1175 | 1367 | let amAssetId = fromBase58String(amAssetIdStr) | |
1176 | 1368 | let prAssetIdStr = cfg[idxPriceAssetId] | |
1177 | 1369 | let prAssetId = fromBase58String(prAssetIdStr) | |
1178 | 1370 | let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm]) | |
1179 | 1371 | let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm]) | |
1180 | 1372 | let poolStatus = cfg[idxPoolStatus] | |
1181 | 1373 | let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity | |
1182 | 1374 | let amBalanceRaw = getAccBalance(amAssetIdStr) | |
1183 | 1375 | let prBalanceRaw = getAccBalance(prAssetIdStr) | |
1184 | 1376 | let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm) | |
1185 | 1377 | let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm) | |
1186 | 1378 | let curPriceX18 = if ((poolLPBalance == 0)) | |
1187 | 1379 | then zeroBigInt | |
1188 | 1380 | else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18) | |
1189 | 1381 | let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm) | |
1190 | 1382 | let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18) | |
1191 | 1383 | let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm) | |
1192 | 1384 | let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false) | |
1193 | 1385 | let calcLpAmt = estPut._1 | |
1194 | 1386 | let curPriceCalc = estPut._3 | |
1195 | 1387 | let amBalance = estPut._4 | |
1196 | 1388 | let prBalance = estPut._5 | |
1197 | 1389 | let lpEmission = estPut._6 | |
1198 | 1390 | $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(fromX18(curPriceX18, scale8)), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP)) | |
1199 | 1391 | } | |
1200 | 1392 | ||
1201 | 1393 | ||
1202 | 1394 | ||
1203 | 1395 | @Callable(i) | |
1204 | 1396 | func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = { | |
1205 | 1397 | let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this) | |
1206 | 1398 | let outAmAmt = res._1 | |
1207 | 1399 | let outPrAmt = res._2 | |
1208 | 1400 | let amBalance = res._5 | |
1209 | 1401 | let prBalance = res._6 | |
1210 | 1402 | let lpEmission = res._7 | |
1211 | 1403 | let curPrice = res._8 | |
1212 | 1404 | let poolStatus = parseIntValue(res._9) | |
1213 | 1405 | $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(outAmAmt), toString(outPrAmt), toString(amBalance), toString(prBalance), toString(lpEmission), toString(curPrice), toString(poolStatus)], SEP)) | |
1214 | 1406 | } | |
1215 | 1407 | ||
1216 | 1408 | ||
1217 | 1409 | @Verifier(tx) | |
1218 | 1410 | func verify () = { | |
1219 | 1411 | let targetPublicKey = match managerPublicKeyOrUnit() { | |
1220 | 1412 | case pk: ByteVector => | |
1221 | 1413 | pk | |
1222 | 1414 | case _: Unit => | |
1223 | 1415 | tx.senderPublicKey | |
1224 | 1416 | case _ => | |
1225 | 1417 | throw("Match error") | |
1226 | 1418 | } | |
1227 | 1419 | match tx { | |
1228 | 1420 | case order: Order => | |
1229 | 1421 | let matcherPub = getMatcherPubOrFail() | |
1230 | 1422 | let orderValid = validateMatcherOrderAllowed(order) | |
1231 | 1423 | let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey) | |
1232 | 1424 | let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub) | |
1233 | 1425 | if (if (if (orderValid) | |
1234 | 1426 | then senderValid | |
1235 | 1427 | else false) | |
1236 | 1428 | then matcherValid | |
1237 | 1429 | else false) | |
1238 | 1430 | then true | |
1239 | 1431 | else throwOrderError(orderValid, senderValid, matcherValid) | |
1240 | 1432 | case s: SetScriptTransaction => | |
1241 | 1433 | let newHash = blake2b256(value(s.script)) | |
1242 | 1434 | let allowedHash = fromBase64String(value(getString(factoryContract, keyAllowedLpScriptHash()))) | |
1243 | 1435 | let currentHash = scriptHash(this) | |
1244 | 1436 | if (if ((allowedHash == newHash)) | |
1245 | 1437 | then (currentHash != newHash) | |
1246 | 1438 | else false) | |
1247 | 1439 | then true | |
1248 | 1440 | else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey) | |
1249 | 1441 | case _ => | |
1250 | 1442 | sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey) | |
1251 | 1443 | } | |
1252 | 1444 | } | |
1253 | 1445 |
github/deemru/w8io/026f985 195.64 ms ◑