tx · 7sryQtzeeNCesA4q2yhLmrJjQy6Ts1tGLzBy2vkM81C2

3N4JvGpYF8iwSPzqwqWcubTfWWaKxdgmE4H:  -0.03300000 Waves

2022.12.05 09:30 [2346705] smart account 3N4JvGpYF8iwSPzqwqWcubTfWWaKxdgmE4H > SELF 0.00000000 Waves

{ "type": 13, "id": "7sryQtzeeNCesA4q2yhLmrJjQy6Ts1tGLzBy2vkM81C2", "fee": 3300000, "feeAssetId": null, "timestamp": 1670221786365, "version": 1, "sender": "3N4JvGpYF8iwSPzqwqWcubTfWWaKxdgmE4H", "senderPublicKey": "p2hzghiY7UemNr13x5jVMEC1aSdo6Tkv76kjMxRU9cZ", "proofs": [ "47wDvqywxD7e2DAXfMqp37GNt577gbM3f7hV1WdAP3pu2qzatu671rV81fNGFm1uuSq7LvM8XQpEuAdsKgwpiUVB" ], "script": "base64:BgLYKwgCEgMKAQgSABIECgIBBBIDCgEBEgQKAgEEEgQKAggBEgQKAggBEgQKAggBEgUKAwEIARIAEgQKAgEBEgMKAQESBQoDAQEBEgQKAggIEgASABIDCgEIEgUKAwEBARIECgIBARIECgIIARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCBIAEgMKAQESAwoBARIECgIIASIKbFBkZWNpbWFscyIGc2NhbGU4IgxzY2FsZThCaWdJbnQiB3NjYWxlMTgiCnplcm9CaWdJbnQiBGJpZzAiBGJpZzEiBGJpZzIiC3dhdmVzU3RyaW5nIgNTRVAiClBvb2xBY3RpdmUiD1Bvb2xQdXREaXNhYmxlZCITUG9vbE1hdGNoZXJEaXNhYmxlZCIMUG9vbFNodXRkb3duIg5pZHhQb29sQWRkcmVzcyINaWR4UG9vbFN0YXR1cyIQaWR4UG9vbExQQXNzZXRJZCINaWR4QW10QXNzZXRJZCIPaWR4UHJpY2VBc3NldElkIg5pZHhBbXRBc3NldERjbSIQaWR4UHJpY2VBc3NldERjbSIOaWR4SUFtdEFzc2V0SWQiEGlkeElQcmljZUFzc2V0SWQiDWlkeExQQXNzZXREY20iEmlkeFBvb2xBbXRBc3NldEFtdCIUaWR4UG9vbFByaWNlQXNzZXRBbXQiEWlkeFBvb2xMUEFzc2V0QW10IhlpZHhGYWN0b3J5U3Rha2luZ0NvbnRyYWN0IhppZHhGYWN0b3J5U2xpcHBhZ2VDb250cmFjdCIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiA3ZhbCIPcmVzdWx0U2NhbGVNdWx0Igd0b1NjYWxlIgNhbXQiCHJlc1NjYWxlIghjdXJTY2FsZSIDYWJzIglhYnNCaWdJbnQiAmZjIgNtcGsiBHBtcGsiAnBsIgJwaCIBaCIJdGltZXN0YW1wIgNwYXUiC3VzZXJBZGRyZXNzIgR0eElkIgNnYXUiAmFhIgJwYSIGa2V5RmVlIgpmZWVEZWZhdWx0IgNmZWUiBmtleUtMcCIVa2V5S0xwUmVmcmVzaGVkSGVpZ2h0IhJrZXlLTHBSZWZyZXNoRGVsYXkiFmtMcFJlZnJlc2hEZWxheURlZmF1bHQiD2tMcFJlZnJlc2hEZWxheSIQa2V5RmFjdG9yeUNvbmZpZyINa2V5TWF0Y2hlclB1YiIpa2V5TWFwcGluZ1Bvb2xDb250cmFjdEFkZHJlc3NUb1Bvb2xBc3NldHMiE3Bvb2xDb250cmFjdEFkZHJlc3MiDWtleVBvb2xDb25maWciCWlBbXRBc3NldCILaVByaWNlQXNzZXQiH2tleU1hcHBpbmdzQmFzZUFzc2V0MmludGVybmFsSWQiDGJhc2VBc3NldFN0ciITa2V5QWxsUG9vbHNTaHV0ZG93biINa2V5UG9vbFdlaWdodCIPY29udHJhY3RBZGRyZXNzIhZrZXlBbGxvd2VkTHBTY3JpcHRIYXNoIhZrZXlGZWVDb2xsZWN0b3JBZGRyZXNzIg90aHJvd09yZGVyRXJyb3IiCm9yZGVyVmFsaWQiC3NlbmRlclZhbGlkIgxtYXRjaGVyVmFsaWQiD2dldFN0cmluZ09yRmFpbCIHYWRkcmVzcyIDa2V5IgxnZXRJbnRPckZhaWwiCHRocm93RXJyIgNtc2ciBmZtdEVyciIPZmFjdG9yeUNvbnRyYWN0IhNmZWVDb2xsZWN0b3JBZGRyZXNzIhBpc0dsb2JhbFNodXRkb3duIhNnZXRNYXRjaGVyUHViT3JGYWlsIg1nZXRQb29sQ29uZmlnIghhbXRBc3NldCIKcHJpY2VBc3NldCIMcGFyc2VBc3NldElkIgVpbnB1dCIPYXNzZXRJZFRvU3RyaW5nIg9wYXJzZVBvb2xDb25maWciCnBvb2xDb25maWciEHBvb2xDb25maWdQYXJzZWQiCyR0MDc5MTU4MDgxIg5jZmdQb29sQWRkcmVzcyINY2ZnUG9vbFN0YXR1cyIMY2ZnTHBBc3NldElkIhBjZmdBbW91bnRBc3NldElkIg9jZmdQcmljZUFzc2V0SWQiFmNmZ0Ftb3VudEFzc2V0RGVjaW1hbHMiFWNmZ1ByaWNlQXNzZXREZWNpbWFscyIQZ2V0RmFjdG9yeUNvbmZpZyIPc3Rha2luZ0NvbnRyYWN0IhBzbGlwcGFnZUNvbnRyYWN0IhFkYXRhUHV0QWN0aW9uSW5mbyINaW5BbXRBc3NldEFtdCIPaW5QcmljZUFzc2V0QW10IghvdXRMcEFtdCIFcHJpY2UiHXNsaXBwYWdlVG9sZXJhbmNlUGFzc2VkQnlVc2VyIhVzbGlwcGFnZVRvbGVyYW5jZVJlYWwiCHR4SGVpZ2h0Igt0eFRpbWVzdGFtcCISc2xpcGFnZUFtdEFzc2V0QW10IhRzbGlwYWdlUHJpY2VBc3NldEFtdCIRZGF0YUdldEFjdGlvbkluZm8iDm91dEFtdEFzc2V0QW10IhBvdXRQcmljZUFzc2V0QW10IgdpbkxwQW10Ig1nZXRBY2NCYWxhbmNlIgdhc3NldElkIg9jYWxjUHJpY2VCaWdJbnQiCHByQW10WDE4IghhbUFtdFgxOCIQcHJpdmF0ZUNhbGNQcmljZSIKYW1Bc3NldERjbSIKcHJBc3NldERjbSIFYW1BbXQiBXByQW10Ig5hbXRBc3NldEFtdFgxOCIQcHJpY2VBc3NldEFtdFgxOCIKY2FsY1ByaWNlcyIFbHBBbXQiA2NmZyILYW10QXNzZXREY20iDXByaWNlQXNzZXREY20iCHByaWNlWDE4IghscEFtdFgxOCITbHBQcmljZUluQW1Bc3NldFgxOCITbHBQcmljZUluUHJBc3NldFgxOCIPY2FsY3VsYXRlUHJpY2VzIgZwcmljZXMiFGVzdGltYXRlR2V0T3BlcmF0aW9uIgZ0eElkNTgiCnBtdEFzc2V0SWQiCHBtdExwQW10IglscEFzc2V0SWQiCWFtQXNzZXRJZCIJcHJBc3NldElkIgpwb29sU3RhdHVzIgpscEVtaXNzaW9uIglhbUJhbGFuY2UiDGFtQmFsYW5jZVgxOCIJcHJCYWxhbmNlIgxwckJhbGFuY2VYMTgiC2N1clByaWNlWDE4IghjdXJQcmljZSILcG10THBBbXRYMTgiDWxwRW1pc3Npb25YMTgiC291dEFtQW10WDE4IgtvdXRQckFtdFgxOCIIb3V0QW1BbXQiCG91dFByQW10IgVzdGF0ZSIUZXN0aW1hdGVQdXRPcGVyYXRpb24iEXNsaXBwYWdlVG9sZXJhbmNlIgxpbkFtQXNzZXRBbXQiC2luQW1Bc3NldElkIgxpblByQXNzZXRBbXQiC2luUHJBc3NldElkIgppc0V2YWx1YXRlIgZlbWl0THAiDGFtQXNzZXRJZFN0ciIMcHJBc3NldElkU3RyIgtpQW10QXNzZXRJZCINaVByaWNlQXNzZXRJZCIOaW5BbUFzc2V0SWRTdHIiDmluUHJBc3NldElkU3RyIg9pbkFtQXNzZXRBbXRYMTgiD2luUHJBc3NldEFtdFgxOCIMdXNlclByaWNlWDE4IgNyZXMiC3NsaXBwYWdlWDE4IhRzbGlwcGFnZVRvbGVyYW5jZVgxOCIKcHJWaWFBbVgxOCIKYW1WaWFQclgxOCIMZXhwZWN0ZWRBbXRzIhFleHBBbXRBc3NldEFtdFgxOCITZXhwUHJpY2VBc3NldEFtdFgxOCIJY2FsY0xwQW10Ig5jYWxjQW1Bc3NldFBtdCIOY2FsY1ByQXNzZXRQbXQiDHNsaXBwYWdlQ2FsYyIJZW1pdExwQW10IgZhbURpZmYiBnByRGlmZiILY29tbW9uU3RhdGUiB2NhbGNLTHAiDWFtb3VudEJhbGFuY2UiDHByaWNlQmFsYW5jZSIKdXBkYXRlZEtMcCIScmVmcmVzaEtMcEludGVybmFsIhdhbW91bnRBc3NldEJhbGFuY2VEZWx0YSIWcHJpY2VBc3NldEJhbGFuY2VEZWx0YSIUbHBBc3NldEVtaXNzaW9uRGVsdGEiEmFtb3VudEFzc2V0QmFsYW5jZSIRcHJpY2VBc3NldEJhbGFuY2UiD2xwQXNzZXRFbWlzc2lvbiIHYWN0aW9ucyIbdmFsaWRhdGVNYXRjaGVyT3JkZXJBbGxvd2VkIgVvcmRlciIRYW1vdW50QXNzZXRBbW91bnQiEHByaWNlQXNzZXRBbW91bnQiDSR0MDE5NTU5MTk3NzEiA2tMcCINJHQwMjAyNDIyMDM0MiINdW51c2VkQWN0aW9ucyIGa0xwTmV3Igxpc09yZGVyVmFsaWQiCWNvbW1vbkdldCIBaSIDcG10IgZwbXRBbXQiCWNvbW1vblB1dCIKYW1Bc3NldFBtdCIKcHJBc3NldFBtdCIGZXN0UHV0IgRlbWl0IgZhbW91bnQiB2VtaXRJbnYiDWVtaXRJbnZMZWdhY3kiByRtYXRjaDAiFWxlZ2FjeUZhY3RvcnlDb250cmFjdCIHdGFrZUZlZSIJZmVlQW1vdW50Ig9jYWxjUHV0T25lVG9rZW4iEHBheW1lbnRBbW91bnRSYXciDnBheW1lbnRBc3NldElkIgZpc0V2YWwiEGFtb3VudEJhbGFuY2VSYXciD3ByaWNlQmFsYW5jZVJhdyIUcGF5bWVudEluQW1vdW50QXNzZXQiDSR0MDIzMDI2MjMzMTkiEGFtb3VudEJhbGFuY2VPbGQiD3ByaWNlQmFsYW5jZU9sZCINJHQwMjMzMjMyMzQ3MiIUYW1vdW50QXNzZXRBbW91bnRSYXciE3ByaWNlQXNzZXRBbW91bnRSYXciDSR0MDIzNTk0MjM2NTMiDXBheW1lbnRBbW91bnQiEGFtb3VudEJhbGFuY2VOZXciD3ByaWNlQmFsYW5jZU5ldyILcHJpY2VOZXdYMTgiCHByaWNlTmV3Ig5wYXltZW50QmFsYW5jZSIUcGF5bWVudEJhbGFuY2VCaWdJbnQiDHN1cHBseUJpZ0ludCILY2hlY2hTdXBwbHkiDWRlcG9zaXRCaWdJbnQiC2lzc3VlQW1vdW50IgtwcmljZU9sZFgxOCIIcHJpY2VPbGQiBGxvc3MiDSR0MDI1MTMwMjUyOTciB2JhbGFuY2UiD2lzc3VlQW1vdW50Qm90aCIPY2FsY0dldE9uZVRva2VuIgpvdXRBc3NldElkIgZjaGVja3MiEG91dEluQW1vdW50QXNzZXQiDWJhbGFuY2VCaWdJbnQiDGFtQmFsYW5jZU9sZCIMcHJCYWxhbmNlT2xkIgpvdXRCYWxhbmNlIhBvdXRCYWxhbmNlQmlnSW50Ig5yZWRlZW1lZEJpZ0ludCIJYW1vdW50UmF3Ig0kdDAyNjg5OTI2OTQ5Igt0b3RhbEFtb3VudCINJHQwMjY5NTMyNzE3OSILb3V0QW1BbW91bnQiC291dFByQW1vdW50IgxhbUJhbGFuY2VOZXciDHByQmFsYW5jZU5ldyIYYW1vdW50Qm90aEluUGF5bWVudEFzc2V0IhZtYW5hZ2VyUHVibGljS2V5T3JVbml0IgFzIh1wZW5kaW5nTWFuYWdlclB1YmxpY0tleU9yVW5pdCIJaXNNYW5hZ2VyIgJwayILbXVzdE1hbmFnZXIiAnBkIhdwZW5kaW5nTWFuYWdlclB1YmxpY0tleSILY2hlY2tDYWxsZXIiFWNoZWNrTWFuYWdlclB1YmxpY0tleSICcG0iBWhhc1BNIgdjaGVja1BNIg9zaG91bGRBdXRvU3Rha2UiBGFtSWQiBHBySWQiDHNsaXBwYWdlQUludiIMc2xpcHBhZ2VQSW52IgpscFRyYW5zZmVyIgtzbHBTdGFrZUludiINJHQwMzExMzAzMTE5NSIRcmVmcmVzaEtMcEFjdGlvbnMiC21heFNsaXBwYWdlIg0kdDAzMTQ4MTMxNTQ2IgxtaW5PdXRBbW91bnQiCWF1dG9TdGFrZSIgaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWQiAUAiDWlzUHV0RGlzYWJsZWQiB3BheW1lbnQiDSR0MDMyMzIyMzI0NzQiBWJvbnVzIhNlbWl0QW1vdW50RXN0aW1hdGVkIgplbWl0QW1vdW50IghzdGFrZUludiIHc2VuZEZlZSINJHQwMzMwNjAzMzI1NyINJHQwMzMyNjAzMzM2OCINJHQwMzM1NjEzMzcxOCINb3V0QXNzZXRJZFN0ciINaXNHZXREaXNhYmxlZCINJHQwMzQ1MjMzNDY3NiIPYW1vdW50RXN0aW1hdGVkIgdidXJuSW52Ig1hc3NldFRyYW5zZmVyIg0kdDAzNTE3NjM1NDIzIhBmZWVBbW91bnRGb3JDYWxjIg0kdDAzNTQyNjM1NTM0Ig0kdDAzNTcxODM1ODc0Ig11bnN0YWtlQW1vdW50Igp1bnN0YWtlSW52Ig0kdDAzNjY5OTM2ODUwIg0kdDAzNzM0NTM3NTkyIg0kdDAzNzU5NTM3NzAzIglvdXRBbXRBbXQiFGJ1cm5MUEFzc2V0T25GYWN0b3J5Ig0kdDAzODQ5NTM4NTc3IhJub0xlc3NUaGVuQW10QXNzZXQiFG5vTGVzc1RoZW5QcmljZUFzc2V0Ig0kdDAzOTM3MzM5NDU0Ig1jaGVja1BheW1lbnRzIg9jaGVja1Bvb2xTdGF0dXMiDSR0MDQwNDI3NDA1MDgiFW5vTGVzc1RoZW5BbW91bnRBc3NldCIMY2hlY2tBbW91bnRzIg0kdDA0MTY0ODQxNzI5IgthbXRBc3NldFN0ciINcHJpY2VBc3NldFN0ciIYbGFzdFJlZnJlc2hlZEJsb2NrSGVpZ2h0Ih1jaGVja0xhc3RSZWZyZXNoZWRCbG9ja0hlaWdodCINJHQwNDI3MTc0Mjc3MiIKYW10QXNzZXRJZCIMcHJpY2VBc3NldElkIg1wb29sTFBCYWxhbmNlIhJhY2NBbXRBc3NldEJhbGFuY2UiFGFjY1ByaWNlQXNzZXRCYWxhbmNlIgpwcmljZXNMaXN0Ig9scEFtdEFzc2V0U2hhcmUiEWxwUHJpY2VBc3NldFNoYXJlIgpwb29sV2VpZ2h0IgxjdXJQcmljZUNhbGMiDGFtQmFsYW5jZVJhdyIMcHJCYWxhbmNlUmF3Ig9hbUJhbGFuY2VSYXdYMTgiD3ByQmFsYW5jZVJhd1gxOCIQcGF5bWVudExwQXNzZXRJZCIMcGF5bWVudExwQW10IgJ0eCIGdmVyaWZ5Ig90YXJnZXRQdWJsaWNLZXkiCm1hdGNoZXJQdWIiB25ld0hhc2giC2FsbG93ZWRIYXNoIgtjdXJyZW50SGFzaGsAAWEACAABYgCAwtcvAAFjCQC2AgEAgMLXLwABZAkAtgIBAICAkLu61q3wDQABZQkAtgIBAAAAAWYJALYCAQAAAAFnCQC2AgEAAQABaAkAtgIBAAIAAWkCBVdBVkVTAAFqAgJfXwABawABAAFsAAIAAW0AAwABbgAEAAFvAAEAAXAAAgABcQADAAFyAAQAAXMABQABdAAGAAF1AAcAAXYACAABdwAJAAF4AAoAAXkAAQABegACAAFBAAMAAUIAAQABQwAHAQFEAgFFAUYJALwCAwkAtgIBBQFFBQFkCQC2AgEFAUYBAUcCAUgBSQkAoAMBCQC8AgMFAUgJALYCAQUBSQUBZAEBSgMBSwFMAU0JAGsDBQFLBQFMBQFNAQFOAQFIAwkAZgIAAAUBSAkBAS0BBQFIBQFIAQFPAQFIAwkAvwICBQFlBQFICQC+AgEFAUgFAUgBAVAAAhMlc19fZmFjdG9yeUNvbnRyYWN0AQFRAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBAVIAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAVMAAhElcyVzX19wcmljZV9fbGFzdAEBVAIBVQFWCQC5CQIJAMwIAgIYJXMlcyVkJWRfX3ByaWNlX19oaXN0b3J5CQDMCAIJAKQDAQUBVQkAzAgCCQCkAwEFAVYFA25pbAUBagEBVwIBWAFZCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX1BfXwUBWAICX18FAVkBAVoCAVgBWQkArAICCQCsAgIJAKwCAgILJXMlcyVzX19HX18FAVgCAl9fBQFZAQJhYQACDyVzX19hbW91bnRBc3NldAECYWIAAg4lc19fcHJpY2VBc3NldAACYWMCByVzX19mZWUAAmFkCQBrAwAKBQFiAJBOAAJhZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQJhYwUCYWQAAmFmCQC5CQIJAMwIAgICJXMJAMwIAgIDa0xwBQNuaWwFAWoAAmFnCQC5CQIJAMwIAgICJXMJAMwIAgISa0xwUmVmcmVzaGVkSGVpZ2h0BQNuaWwFAWoAAmFoCQC5CQIJAMwIAgICJXMJAMwIAgIPcmVmcmVzaEtMcERlbGF5BQNuaWwFAWoAAmFpAB4AAmFqCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAmFoBQJhaQECYWsAAhElc19fZmFjdG9yeUNvbmZpZwECYWwAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAmFtAQJhbgkArAICCQCsAgICCCVzJXMlc19fBQJhbgIgX19tYXBwaW5nc19fcG9vbENvbnRyYWN0MkxwQXNzZXQBAmFvAgJhcAJhcQkArAICCQCsAgIJAKwCAgkArAICAgglZCVkJXNfXwUCYXACAl9fBQJhcQIIX19jb25maWcBAmFyAQJhcwkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQJhcwECYXQAAgwlc19fc2h1dGRvd24BAmF1AQJhdgkArAICAhIlcyVzX19wb29sV2VpZ2h0X18FAmF2AQJhdwACFyVzX19hbGxvd2VkTHBTY3JpcHRIYXNoAAJheAIXJXNfX2ZlZUNvbGxlY3RvckFkZHJlc3MBAmF5AwJhegJhQQJhQgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAiRvcmRlciB2YWxpZGF0aW9uIGZhaWxlZDogb3JkZXJWYWxpZD0JAKUDAQUCYXoCDSBzZW5kZXJWYWxpZD0JAKUDAQUCYUECDiBtYXRjaGVyVmFsaWQ9CQClAwEFAmFCAQJhQwICYUQCYUUJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhRAUCYUUJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYUQJAMwIAgIBLgkAzAgCBQJhRQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAAQJhRgICYUQCYUUJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQJhRAUCYUUJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYUQJAMwIAgIBLgkAzAgCBQJhRQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAAQJhRwECYUgJAAIBCQC5CQIJAMwIAgIIbHAucmlkZToJAMwIAgUCYUgFA25pbAIBIAECYUkBAmFICQC5CQIJAMwIAgIIbHAucmlkZToJAMwIAgUCYUgFA25pbAIBIAACYUoJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQJhQwIFBHRoaXMJAQFQAAACYUsJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQJhQwIFAmFKBQJheAECYUwACQELdmFsdWVPckVsc2UCCQCbCAIFAmFKCQECYXQABwECYU0ACQDZBAEJAQJhQwIFAmFKCQECYWwAAQJhTgAEAmFPCQECYUMCBQR0aGlzCQECYWEABAJhUAkBAmFDAgUEdGhpcwkBAmFiAAQCYXEJAQJhRgIFAmFKCQECYXIBBQJhUAQCYXAJAQJhRgIFAmFKCQECYXIBBQJhTwkAtQkCCQECYUMCBQJhSgkBAmFvAgkApAMBBQJhcAkApAMBBQJhcQUBagECYVEBAmFSAwkAAAIFAmFSBQFpBQR1bml0CQDZBAEFAmFSAQJhUwECYVIDCQAAAgUCYVIFBHVuaXQFAWkJANgEAQkBBXZhbHVlAQUCYVIBAmFUAQJhVQkAmQoHCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFVBQFvCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYVUFAXAJANkEAQkAkQMCBQJhVQUBcQkBAmFRAQkAkQMCBQJhVQUBcgkBAmFRAQkAkQMCBQJhVQUBcwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmFVBQF0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYVUFAXUAAmFWCQECYVQBCQECYU4AAAJhVwUCYVYAAmFYCAUCYVcCXzEAAmFZCAUCYVcCXzIAAmFaCAUCYVcCXzMAAmJhCAUCYVcCXzQAAmJiCAUCYVcCXzUAAmJjCAUCYVcCXzYAAmJkCAUCYVcCXzcBAmJlAAkAtQkCCQECYUMCBQJhSgkBAmFrAAUBagACYmYJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIJAQJiZQAFAUICGWluY29ycmVjdCBzdGFraW5nIGFkZHJlc3MAAmJnCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCCQECYmUABQFDAhlpbmNvcnJlY3Qgc3Rha2luZyBhZGRyZXNzAQJiaAoCYmkCYmoCYmsCYmwCYm0CYm4CYm8CYnACYnECYnIJALkJAgkAzAgCAhQlZCVkJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmJpCQDMCAIJAKQDAQUCYmoJAMwIAgkApAMBBQJiawkAzAgCCQCkAwEFAmJsCQDMCAIJAKQDAQUCYm0JAMwIAgkApAMBBQJibgkAzAgCCQCkAwEFAmJvCQDMCAIJAKQDAQUCYnAJAMwIAgkApAMBBQJicQkAzAgCCQCkAwEFAmJyBQNuaWwFAWoBAmJzBgJidAJidQJidgJibAJibwJicAkAuQkCCQDMCAICDCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmJ0CQDMCAIJAKQDAQUCYnUJAMwIAgkApAMBBQJidgkAzAgCCQCkAwEFAmJsCQDMCAIJAKQDAQUCYm8JAMwIAgkApAMBBQJicAUDbmlsBQFqAQJidwECYngDCQAAAgUCYngCBVdBVkVTCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQDZBAEFAmJ4AQJieQICYnoCYkEJALwCAwUCYnoFAWQFAmJBAQJiQgQCYkMCYkQCYkUCYkYEAmJHCQEBRAIFAmJFBQJiQwQCYkgJAQFEAgUCYkYFAmJECQECYnkCBQJiSAUCYkcBAmJJAwJiRQJiRgJiSgQCYksJAQJhTgAEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmJOCQECYkIEBQJiTAUCYk0FAmJFBQJiRgQCYkEJAQFEAgUCYkUFAmJMBAJiegkBAUQCBQJiRgUCYk0EAmJPCQEBRAIFAmJKBQFiBAJiUAkBAmJ5AgUCYkEFAmJPBAJiUQkBAmJ5AgUCYnoFAmJPCQDMCAIFAmJOCQDMCAIFAmJQCQDMCAIFAmJRBQNuaWwBAmJSAwJiRQJiRgJiSgQCYlMJAQJiSQMFAmJFBQJiRgUCYkoJAMwIAgkBAUcCCQCRAwIFAmJTAAAFAWIJAMwIAgkBAUcCCQCRAwIFAmJTAAEFAWIJAMwIAgkBAUcCCQCRAwIFAmJTAAIFAWIFA25pbAECYlQEAmJVAmJWAmJXAVgEAmJLCQECYU4ABAJiWAkAkQMCBQJiSwUBcQQCYlkJAJEDAgUCYksFAXIEAmJaCQCRAwIFAmJLBQFzBAJiQwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiRAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCY2IICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQJiWAkArAICCQCsAgICBkFzc2V0IAUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5AwkBAiE9AgUCYlgFAmJWCQACAQIVSW52YWxpZCBhc3NldCBwYXNzZWQuBAJjYwkBAmJ3AQUCYlkEAmNkCQEBRAIFAmNjBQJiQwQCY2UJAQJidwEFAmJaBAJjZgkBAUQCBQJjZQUCYkQEAmNnCQECYnkCBQJjZgUCY2QEAmNoCQEBRwIFAmNnBQFiBAJjaQkBAUQCBQJiVwUBYgQCY2oJAQFEAgUCY2IFAWIEAmNrCQC8AgMFAmNkBQJjaQUCY2oEAmNsCQC8AgMFAmNmBQJjaQUCY2oEAmNtCQEBRwIFAmNrBQJiQwQCY24JAQFHAgUCY2wFAmJEBAJjbwMJAAACBQJiVQIABQNuaWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUBWAUCY20DCQAAAgUCYlkCBVdBVkVTBQR1bml0CQDZBAEFAmJZCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAVgFAmNuAwkAAAIFAmJaAgVXQVZFUwUEdW5pdAkA2QQBBQJiWgkAzAgCCQELU3RyaW5nRW50cnkCCQEBWgIJAKUIAQUBWAUCYlUJAQJicwYFAmNtBQJjbgUCYlcFAmNoBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmNoCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNoBQNuaWwJAJwKCgUCY20FAmNuBQJiWQUCYloFAmNjBQJjZQUCY2IFAmNnBQJjYQUCY28BAmNwCQJiVQJjcQJjcgJjcwJjdAJjdQFYAmN2AmN3BAJiSwkBAmFOAAQCYlgJANkEAQkAkQMCBQJiSwUBcQQCY3gJAJEDAgUCYksFAXIEAmN5CQCRAwIFAmJLBQFzBAJjegkAkQMCBQJiSwUBdgQCY0EJAJEDAgUCYksFAXcEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJjYggJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmNCCQDYBAEJAQt2YWx1ZU9yRWxzZQIFAmNzCQDZBAECBVdBVkVTBAJjQwkA2AQBCQELdmFsdWVPckVsc2UCBQJjdQkA2QQBAgVXQVZFUwMDCQECIT0CBQJjeAUCY0IGCQECIT0CBQJjeQUCY0MJAAIBAiJJbnZhbGlkIGFtdCBvciBwcmljZSBhc3NldCBwYXNzZWQuBAJjYwMFAmN2CQECYncBBQJjeAkAZQIJAQJidwEFAmN4BQJjcgQCY2UDBQJjdgkBAmJ3AQUCY3kJAGUCCQECYncBBQJjeQUCY3QEAmNECQEBRAIFAmNyBQJiTAQCY0UJAQFEAgUCY3QFAmJNBAJjRgkBAmJ5AgUCY0UFAmNEBAJjZAkBAUQCBQJjYwUCYkwEAmNmCQEBRAIFAmNlBQJiTQQCY0cDCQAAAgUCY2IAAAQCY2cFAWUEAmNIBQFlBAJiTwkAdgYJALkCAgUCY0QFAmNFAAAJALYCAQAFAAEAAAUERE9XTgkAlwoFCQEBRwIFAmJPBQFiCQEBRwIFAmNEBQJiTAkBAUcCBQJjRQUCYk0JAQJieQIJALcCAgUCY2YFAmNFCQC3AgIFAmNkBQJjRAUCY0gEAmNnCQECYnkCBQJjZgUCY2QEAmNICQC8AgMJAQFPAQkAuAICBQJjZwUCY0YFAWQFAmNnBAJjSQkBAUQCBQJjcQUBYgMDCQECIT0CBQJjZwUBZQkAvwICBQJjSAUCY0kHCQACAQkArAICCQCsAgIJAKwCAgIPUHJpY2Ugc2xpcHBhZ2UgCQCmAwEFAmNIAh4gZXhjZWVkZWQgdGhlIHBhc3NlZCBsaW1pdCBvZiAJAKYDAQUCY0kEAmNqCQEBRAIFAmNiBQFiBAJjSgkAvAIDBQJjRAUCY2cFAWQEAmNLCQC8AgMFAmNFBQFkBQJjZwQCY0wDCQC/AgIFAmNKBQJjRQkAlAoCBQJjSwUCY0UJAJQKAgUCY0QFAmNKBAJjTQgFAmNMAl8xBAJjTggFAmNMAl8yBAJiTwkAvAIDBQJjagUCY04FAmNmCQCXCgUJAQFHAgUCYk8FAWIJAQFHAgUCY00FAmJMCQEBRwIFAmNOBQJiTQUCY2cFAmNIBAJjTwgFAmNHAl8xBAJjUAgFAmNHAl8yBAJjUQgFAmNHAl8zBAJjaAkBAUcCCAUCY0cCXzQFAWIEAmNSCQEBRwIIBQJjRwJfNQUBYgMJAGcCAAAFAmNPCQACAQI2SW52YWxpZCBjYWxjdWxhdGlvbnMuIExQIGNhbGN1bGF0ZWQgaXMgbGVzcyB0aGFuIHplcm8uBAJjUwMJAQEhAQUCY3cAAAUCY08EAmNUCQBlAgUCY3IFAmNQBAJjVQkAZQIFAmN0BQJjUQQCY1YJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCY2gJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY2gJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVcCBQFYBQJiVQkBAmJoCgUCY1AFAmNRBQJjUwUCY2gFAmNxBQJjUgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY1QFAmNVBQNuaWwJAJ8KDQUCY08FAmNTBQJjaAUCY2MFAmNlBQJjYgUCYlgFAmNhBQJjVgUCY1QFAmNVBQJjcwUCY3UBAmNXAwJjWAJjWQJjYgQCY1oJALwCAwkAdgYJALkCAgUCY1gFAmNZAAAJALYCAQAFAAEAAAUERE9XTgUBZAUCY2IFAmNaAQJkYQMCZGICZGMCZGQEAmRlCQBkAgkBAmJ3AQkBAmFTAQUCYmEFAmRiBAJkZgkAZAIJAQJidwEJAQJhUwEFAmJiBQJkYwQCZGcJAGQCCAkBBXZhbHVlAQkA7AcBBQJhWghxdWFudGl0eQUCZGQEAmNaCQECY1cDCQC2AgEFAmRlCQC2AgEFAmRmCQC2AgEFAmRnBAJkaAkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYWcFBmhlaWdodAkAzAgCCQELU3RyaW5nRW50cnkCBQJhZgkApgMBBQJjWgUDbmlsCQCUCgIFAmRoBQJjWgECZGkBAmRqBAJkawgFAmRqBmFtb3VudAQCZGwJAGsDCAUCZGoGYW1vdW50CAUCZGoFcHJpY2UFAWIEAmRtAwkAAAIIBQJkaglvcmRlclR5cGUFA0J1eQkAlAoCBQJkawkBAS0BBQJkbAkAlAoCCQEBLQEFAmRrBQJkbAQCZGIIBQJkbQJfMQQCZGMIBQJkbQJfMgMDAwkBAmFMAAYJAAACBQJhWQUBbQYJAAACBQJhWQUBbgkAAgECHEV4Y2hhbmdlIG9wZXJhdGlvbnMgZGlzYWJsZWQDAwkBAiE9AggIBQJkaglhc3NldFBhaXILYW1vdW50QXNzZXQFAmJhBgkBAiE9AggIBQJkaglhc3NldFBhaXIKcHJpY2VBc3NldAUCYmIJAAIBAhNXcm9uZyBvcmRlciBhc3NldHMuBAJkbgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCoAwEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQJhZgkBAmFJAQIPa0xwIGlzIHJlcXVpcmVkCQECYUkBAgtpbnZhbGlkIGtMcAQCZG8JAQJkYQMFAmRiBQJkYwAABAJkcAgFAmRvAl8xBAJkcQgFAmRvAl8yBAJkcgkAvwICBQJkcQUCZG4FAmRyAQJkcwECZHQDCQECIT0CCQCQAwEIBQJkdAhwYXltZW50cwABCQACAQIdZXhhY3RseSAxIHBheW1lbnQgaXMgZXhwZWN0ZWQEAmR1CQEFdmFsdWUBCQCRAwIIBQJkdAhwYXltZW50cwAABAJiVgkBBXZhbHVlAQgFAmR1B2Fzc2V0SWQEAmR2CAUCZHUGYW1vdW50BAJjRwkBAmJUBAkA2AQBCAUCZHQNdHJhbnNhY3Rpb25JZAkA2AQBBQJiVgUCZHYIBQJkdAZjYWxsZXIEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJjRwJfOQQCY28IBQJjRwNfMTADAwkBAmFMAAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsR2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EJAJcKBQUCY20FAmNuBQJkdgUCYlYFAmNvAQJkdwMCZHQCY3ECY3cDCQECIT0CCQCQAwEIBQJkdAhwYXltZW50cwACCQACAQIfZXhhY3RseSAyIHBheW1lbnRzIGFyZSBleHBlY3RlZAQCZHgJAQV2YWx1ZQEJAJEDAggFAmR0CHBheW1lbnRzAAAEAmR5CQEFdmFsdWUBCQCRAwIIBQJkdAhwYXltZW50cwABBAJkegkBAmNwCQkA2AQBCAUCZHQNdHJhbnNhY3Rpb25JZAUCY3EIBQJkeAZhbW91bnQIBQJkeAdhc3NldElkCAUCZHkGYW1vdW50CAUCZHkHYXNzZXRJZAkApQgBCAUCZHQGY2FsbGVyBwUCY3cEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJkegJfOAMDAwkBAmFMAAYJAAACBQJjYQUBbAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsUHV0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EFAmR6AQJkQQECZEIEAmRDCQD8BwQFAmFKAgRlbWl0CQDMCAIFAmRCBQNuaWwFA25pbAMJAAACBQJkQwUCZEMEAmREBAJkRQUCZEMDCQABAgUCZEUCB0FkZHJlc3MEAmRGBQJkRQkA/AcEBQJkRgIEZW1pdAkAzAgCBQJkQgUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCZEQFAmREBQJkQgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECZEcBAmRCBAJkSAkAawMFAmRCBQJhZQUBYgkAlAoCCQBlAgUCZEIFAmRIBQJkSAECZEkEAmRKAmRLAVgBWQQCZEwJAAACBQFZBQR1bml0BAJkTQkBAmJ3AQkBAmFTAQUCYmEEAmROCQECYncBCQECYVMBBQJiYgQCZE8DCQAAAgUCZEsFAmJhBgMJAAACBQJkSwUCYmIHCQECYUcBAg1pbnZhbGlkIGFzc2V0BAJkUAMFAmRMCQCUCgIFAmRNBQJkTgMFAmRPCQCUCgIJAGUCBQJkTQUCZEoFAmROCQCUCgIFAmRNCQBlAgUCZE4FAmRKBAJkUQgFAmRQAl8xBAJkUggFAmRQAl8yBAJkUwMFAmRPCQCUCgIFAmRKAAAJAJQKAgAABQJkSgQCZFQIBQJkUwJfMQQCZFUIBQJkUwJfMgQCZGsICQECZEcBBQJkVAJfMQQCZGwICQECZEcBBQJkVQJfMQQCZFYJAQJkRwEFAmRKBAJkVwgFAmRWAl8xBAJkSAgFAmRWAl8yBAJkWAkAZAIFAmRRBQJkawQCZFkJAGQCBQJkUgUCZGwEAmRaCQECYnkCCQEBRAIFAmRZBQJiZAkBAUQCBQJkWAUCYmMEAmVhCQEBRwIFAmRaBQFiBAJlYgMFAmRPBQJkUQUCZFIEAmVjCQC2AgEFAmViBAJlZAkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmFaCQCsAgIJAKwCAgIGYXNzZXQgCQDYBAEFAmFaAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZWUDCQC/AgIFAmVkBQFmBgkBAmFHAQIiaW5pdGlhbCBkZXBvc2l0IHJlcXVpcmVzIGFsbCBjb2lucwMJAAACBQJlZQUCZWUEAmVmCQC2AgEFAmRXBAJlZwkAlgMBCQDMCAIAAAkAzAgCCQCgAwEJALoCAgkAuQICBQJlZAkAuAICCQEKc3FydEJpZ0ludAQJALcCAgUBZAkAugICCQC5AgIFAmVmBQFkBQJlYwASABIFBERPV04FAWQFAWQFA25pbAQCY1YDBQJkTAUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmVhCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVhCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFXAgkApQgBCQEFdmFsdWUBBQFYCQDYBAEJAQV2YWx1ZQEFAVkJAQJiaAoFAmRUBQJkVQUCZWcFAmVhAAAAAAUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAAAAAAFA25pbAQCZWgJAQJieQIJAQFEAgUCZFIFAmJkCQEBRAIFAmRRBQJiYwQCZWkJAQFHAgUCZWgFAWIEAmVqBAJlawMFAmRPCQCUCgIFAmRUBQJkUQkAlAoCBQJkVQUCZFIEAmRCCAUCZWsCXzEEAmVsCAUCZWsCXzIEAmVtCQCgAwEJALwCAwUCZWQJALYCAQkAaQIFAmRCAAIJALYCAQUCZWwJAGsDCQBlAgUCZWcFAmVtBQFiBQJlbQkAlwoFBQJlZwUCY1YFAmRIBQJlagUCZE8JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmVuBQJlbwJkVwJkSwFYAVkEAmRMCQAAAgUBWQUEdW5pdAQCZXAJAMwIAgMJAAACBQJkSwUCYVoGCQECYUcBAhBpbnZhbGlkIGxwIGFzc2V0BQNuaWwDCQAAAgUCZXAFAmVwBAJlcQMJAAACBQJlbwUCYmEGAwkAAAIFAmVvBQJiYgcJAQJhRwECDWludmFsaWQgYXNzZXQEAmVyAwUCZXEJALYCAQkBAmJ3AQkBAmFTAQUCYmEJALYCAQkBAmJ3AQkBAmFTAQUCYmIEAmVzCQECYncBCQECYVMBBQJiYQQCZXQJAQJidwEJAQJhUwEFAmJiBAJldQMFAmVxBQJlcwUCZXQEAmV2CQC2AgEFAmV1BAJlZAkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmFaCQCsAgIJAKwCAgIGYXNzZXQgCQDYBAEFAmFaAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZXcJALYCAQUCZFcEAmV4CQCWAwEJAMwIAgAACQDMCAIJAKADAQkAugICCQC5AgIFAmVyCQC4AgIFAWQJAHYGCQC4AgIFAWQJALoCAgkAuQICBQJldwUBZAUCZWQAEgUBaAAAABIFBERPV04FAWQFA25pbAQCZXkJAQJkRwEFAmV4BAJleggFAmV5Al8xBAJkSAgFAmV5Al8yBAJlQQMFAmVxCQCWCgQFAmV6AAAJAGUCBQJlcwUCZXgFAmV0CQCWCgQAAAUCZXoFAmVzCQBlAgUCZXQFAmV4BAJlQggFAmVBAl8xBAJlQwgFAmVBAl8yBAJlRAgFAmVBAl8zBAJlRQgFAmVBAl80BAJkWgkBAmJ5AgkBAUQCBQJlRQUCYmQJAQFEAgUCZUQFAmJjBAJlYQkBAUcCBQJkWgUBYgQCY1YDBQJkTAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFaAgkApQgBCQEFdmFsdWUBBQFYCQDYBAEJAQV2YWx1ZQEFAVkJAQJicwYFAmVCBQJlQwUCZFcFAmVhBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmVhCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVhBQNuaWwEAmVoCQECYnkCCQEBRAIFAmV0BQJiZAkBAUQCBQJlcwUCYmMEAmVpCQEBRwIFAmVoBQFiBAJlagQCZUYJAGgCCQCgAwEJALwCAwUCZXIFAmV3BQJlZAACCQBrAwkAZQIFAmV6BQJlRgUBYgUCZUYJAJcKBQUCZXoFAmNWBQJkSAUCZWoFAmVxCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJlRwAEAmRFCQCiCAEJAQFRAAMJAAECBQJkRQIGU3RyaW5nBAJlSAUCZEUJANkEAQUCZUgDCQABAgUCZEUCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECZUkABAJkRQkAoggBCQEBUgADCQABAgUCZEUCBlN0cmluZwQCZUgFAmRFCQDZBAEFAmVIAwkAAQIFAmRFAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBAmVKAQJkdAQCZEUJAQJlRwADCQABAgUCZEUCCkJ5dGVWZWN0b3IEAmVLBQJkRQkAAAIIBQJkdA9jYWxsZXJQdWJsaWNLZXkFAmVLAwkAAQIFAmRFAgRVbml0CQAAAggFAmR0BmNhbGxlcgUEdGhpcwkAAgECC01hdGNoIGVycm9yAQJlTAECZHQEAmVNCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEAmRFCQECZUcAAwkAAQIFAmRFAgpCeXRlVmVjdG9yBAJlSwUCZEUDCQAAAggFAmR0D2NhbGxlclB1YmxpY0tleQUCZUsGBQJlTQMJAAECBQJkRQIEVW5pdAMJAAACCAUCZHQGY2FsbGVyBQR0aGlzBgUCZU0JAAIBAgtNYXRjaCBlcnJvchsCZHQBCnNldE1hbmFnZXIBAmVOBAJlTwkBAmVMAQUCZHQDCQAAAgUCZU8FAmVPBAJlUAkA2QQBBQJlTgMJAAACBQJlUAUCZVAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVIABQJlTgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR0AQ5jb25maXJtTWFuYWdlcgAEAmVRCQECZUkABAJlUgMJAQlpc0RlZmluZWQBBQJlUQYJAAIBAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUCZVIFAmVSBAJlUwMJAAACCAUCZHQPY2FsbGVyUHVibGljS2V5CQEFdmFsdWUBBQJlUQYJAAIBAhtZb3UgYXJlIG5vdCBwZW5kaW5nIG1hbmFnZXIDCQAAAgUCZVMFAmVTCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFRAAkA2AQBCQEFdmFsdWUBBQJlUQkAzAgCCQELRGVsZXRlRW50cnkBCQEBUgAFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkdAEDcHV0AgJjcQJlVAMJAGYCAAAFAmNxCQACAQIgSW52YWxpZCBzbGlwcGFnZVRvbGVyYW5jZSBwYXNzZWQEAmR6CQECZHcDBQJkdAUCY3EGBAJjUwgFAmR6Al8yBAJiWAgFAmR6Al83BAJjbwgFAmR6Al85BAJjVAgFAmR6A18xMAQCY1UIBQJkegNfMTEEAmVVCAUCZHoDXzEyBAJlVggFAmR6A18xMwQCZEMJAPwHBAUCYUoCBGVtaXQJAMwIAgUCY1MFA25pbAUDbmlsAwkAAAIFAmRDBQJkQwQCZEQEAmRFBQJkQwMJAAECBQJkRQIHQWRkcmVzcwQCZEYFAmRFCQD8BwQFAmRGAgRlbWl0CQDMCAIFAmNTBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkRAUCZEQEAmVXAwkAZgIFAmNUAAAJAPwHBAUCYmcCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJlVQUCY1QFA25pbAUDbmlsAwkAAAIFAmVXBQJlVwQCZVgDCQBmAgUCY1UAAAkA/AcEBQJiZwIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmVWBQJjVQUDbmlsBQNuaWwDCQAAAgUCZVgFAmVYBAJlWQMFAmVUBAJlWgkA/AcEBQJiZgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlgFAmNTBQNuaWwDCQAAAgUCZVoFAmVaBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmR0BmNhbGxlcgUCY1MFAmJYBQNuaWwEAmZhCQECZGEDAAAAAAAABAJmYggFAmZhAl8xBAJjWggFAmZhAl8yCQDOCAIJAM4IAgUCY28FAmVZBQJmYgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkdAEKcHV0Rm9yRnJlZQECZmMDCQBmAgAABQJmYwkAAgECFEludmFsaWQgdmFsdWUgcGFzc2VkBAJkegkBAmR3AwUCZHQFAmZjBwQCY28IBQJkegJfOQQCZmQJAQJkYQMAAAAAAAAEAmZiCAUCZmQCXzEEAmNaCAUCZmQCXzIJAM4IAgUCY28FAmZiAmR0AQlwdXRPbmVUa24CAmZlAmZmBAJmZwoAAmZoCQD8BwQFAmFKAihpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZFJFQURPTkxZCQDMCAIJAKUIAQUEdGhpcwUDbmlsBQNuaWwDCQABAgUCZmgCB0Jvb2xlYW4FAmZoCQACAQkArAICCQADAQUCZmgCHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4EAmZpAwMDCQECYUwABgkAAAIFAmFZBQFsBgkAAAIFAmFZBQFuBgUCZmcEAmVwCQDMCAIDAwkBASEBBQJmaQYJAQJlSgEFAmR0BgkBAmFHAQIhcHV0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHQIcGF5bWVudHMAAQYJAQJhRwECHmV4YWN0bHkgMSBwYXltZW50IGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmVwBQJlcAQCZmoJAJEDAggFAmR0CHBheW1lbnRzAAAEAmRLCAUCZmoHYXNzZXRJZAQCZEoIBQJmagZhbW91bnQEAVgIBQJkdAZjYWxsZXIEAVkIBQJkdA10cmFuc2FjdGlvbklkBAJmawkBAmRJBAUCZEoFAmRLBQFYBQFZAwkAAAIFAmZrBQJmawQCZE8IBQJmawJfNQQCZmwIBQJmawJfNAQCZEgIBQJmawJfMwQCY1YIBQJmawJfMgQCZm0IBQJmawJfMQQCZm4DAwkAZgIFAmZlAAAJAGYCBQJmZQUCZm0HCQECYUcBCQC5CQIJAMwIAgIfYW1vdW50IHRvIHJlY2VpdmUgaXMgbGVzcyB0aGFuIAkAzAgCCQCkAwEFAmZlBQNuaWwCAAUCZm0EAmRDCQECZEEBBQJmbgMJAAACBQJkQwUCZEMEAmVZAwUCZmYEAmZvCQD8BwQFAmJmAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJhWgUCZm4FA25pbAMJAAACBQJmbwUCZm8FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHQGY2FsbGVyBQJmbgUCYVoFA25pbAQCZnADCQBmAgUCZEgAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZEgFAmRLBQNuaWwFA25pbAQCZnEDCQAAAgUEdGhpcwUCYUsJAJQKAgAAAAADBQJkTwkAlAoCCQEBLQEFAmRIAAAJAJQKAgAACQEBLQEFAmRIBAJkYggFAmZxAl8xBAJkYwgFAmZxAl8yBAJmcgkBAmRhAwUCZGIFAmRjAAAEAmZiCAUCZnICXzEEAmNaCAUCZnICXzIJAJQKAgkAzggCCQDOCAIJAM4IAgUCY1YFAmVZBQJmcAUCZmIFAmZuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR0ARFwdXRPbmVUa25SRUFET05MWQICZEsCZEoEAmZzCQECZEkEBQJkSgkBAmFRAQUCZEsFBHVuaXQFBHVuaXQEAmZtCAUCZnMCXzEEAmNWCAUCZnMCXzIEAmRICAUCZnMCXzMEAmZsCAUCZnMCXzQEAmRPCAUCZnMCXzUJAJQKAgUDbmlsCQCVCgMFAmZtBQJkSAUCZmwCZHQBCWdldE9uZVRrbgICZnQCZmUEAmZnCgACZmgJAPwHBAUCYUoCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgkApQgBBQR0aGlzBQNuaWwFA25pbAMJAAECBQJmaAIHQm9vbGVhbgUCZmgJAAIBCQCsAgIJAAMBBQJmaAIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZnUDAwkBAmFMAAYJAAACBQJhWQUBbgYFAmZnBAJlcAkAzAgCAwMJAQEhAQUCZnUGCQECZUoBBQJkdAYJAQJhRwECIWdldCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbgkAzAgCAwkAAAIJAJADAQgFAmR0CHBheW1lbnRzAAEGCQECYUcBAh5leGFjdGx5IDEgcGF5bWVudCBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJlcAUCZXAEAmVvCQECYVEBBQJmdAQCZmoJAJEDAggFAmR0CHBheW1lbnRzAAAEAmRLCAUCZmoHYXNzZXRJZAQCZFcIBQJmagZhbW91bnQEAVgIBQJkdAZjYWxsZXIEAVkIBQJkdA10cmFuc2FjdGlvbklkBAJmdgkBAmVuBQUCZW8FAmRXBQJkSwUBWAUBWQMJAAACBQJmdgUCZnYEAmVxCAUCZnYCXzUEAmZsCAUCZnYCXzQEAmRICAUCZnYCXzMEAmNWCAUCZnYCXzIEAmZ3CAUCZnYCXzEEAmRCAwMJAGYCBQJmZQAACQBmAgUCZmUFAmZ3BwkBAmFHAQkAuQkCCQDMCAICH2Ftb3VudCB0byByZWNlaXZlIGlzIGxlc3MgdGhhbiAJAMwIAgkApAMBBQJmZQUDbmlsAgAFAmZ3BAJmeAkA/AcEBQJhSgIEYnVybgkAzAgCBQJkVwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJkSwUCZFcFA25pbAMJAAACBQJmeAUCZngEAmZ5CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAVgFAmRCBQJlbwUDbmlsBAJmcAMJAGYCBQJkSAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFLBQJkSAUCZW8FA25pbAUDbmlsBAJmegQCZkEDCQAAAgUEdGhpcwUCYUsAAAUCZEgDBQJlcQkAlAoCCQEBLQEJAGQCBQJkQgUCZkEAAAkAlAoCAAAJAQEtAQkAZAIFAmRCBQJmQQQCZGIIBQJmegJfMQQCZGMIBQJmegJfMgQCZkIJAQJkYQMFAmRiBQJkYwAABAJmYggFAmZCAl8xBAJjWggFAmZCAl8yCQCUCgIJAM4IAgkAzggCCQDOCAIFAmNWBQJmeQUCZnAFAmZiBQJkQgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkdAERZ2V0T25lVGtuUkVBRE9OTFkCAmVvAmRXBAJmQwkBAmVuBQkBAmFRAQUCZW8FAmRXBQJhWgUEdW5pdAUEdW5pdAQCZncIBQJmQwJfMQQCY1YIBQJmQwJfMgQCZEgIBQJmQwJfMwQCZmwIBQJmQwJfNAQCZXEIBQJmQwJfNQkAlAoCBQNuaWwJAJUKAwUCZncFAmRIBQJmbAJkdAETdW5zdGFrZUFuZEdldE9uZVRrbgMCZkQCZnQCZmUEAmZnCgACZmgJAPwHBAUCYUoCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgkApQgBBQR0aGlzBQNuaWwFA25pbAMJAAECBQJmaAIHQm9vbGVhbgUCZmgJAAIBCQCsAgIJAAMBBQJmaAIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZnUDAwkBAmFMAAYJAAACBQJhWQUBbgYFAmZnBAJlcAkAzAgCAwMJAQEhAQUCZnUGCQECZUoBBQJkdAYJAQJhRwECIWdldCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbgkAzAgCAwkAAAIJAJADAQgFAmR0CHBheW1lbnRzAAAGCQECYUcBAhhubyBwYXltZW50cyBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJlcAUCZXAEAmVvCQECYVEBBQJmdAQBWAgFAmR0BmNhbGxlcgQBWQgFAmR0DXRyYW5zYWN0aW9uSWQEAmZFCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYVoJAMwIAgUCZkQFA25pbAUDbmlsAwkAAAIFAmZFBQJmRQQCZkYJAQJlbgUFAmVvBQJmRAUCYVoFAVgFAVkDCQAAAgUCZkYFAmZGBAJlcQgFAmZGAl81BAJmbAgFAmZGAl80BAJkSAgFAmZGAl8zBAJjVggFAmZGAl8yBAJmdwgFAmZGAl8xBAJkQgMDCQBmAgUCZmUAAAkAZgIFAmZlBQJmdwcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZmUFA25pbAIABQJmdwQCZngJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZkQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYVoFAmZEBQNuaWwDCQAAAgUCZngFAmZ4BAJmeQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHQGY2FsbGVyBQJkQgUCZW8FA25pbAQCZnADCQBmAgUCZEgAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZEgFAmVvBQNuaWwFA25pbAQCZkcEAmZBAwkAAAIFBHRoaXMFAmFLAAAFAmRIAwUCZXEJAJQKAgkBAS0BCQBkAgUCZEIFAmZBAAAJAJQKAgAACQEBLQEJAGQCBQJkQgUCZkEEAmRiCAUCZkcCXzEEAmRjCAUCZkcCXzIEAmZICQECZGEDBQJkYgUCZGMAAAQCZmIIBQJmSAJfMQQCY1oIBQJmSAJfMgkAlAoCCQDOCAIJAM4IAgkAzggCBQJjVgUCZnkFAmZwBQJmYgUCZEIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHQBA2dldAAEAmNHCQECZHMBBQJkdAQCZkkIBQJjRwJfMQQCY24IBQJjRwJfMgQCZHYIBQJjRwJfMwQCYlYIBQJjRwJfNAQCY28IBQJjRwJfNQQCZkoJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZHYFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlYFAmR2BQNuaWwDCQAAAgUCZkoFAmZKBAJmSwkBAmRhAwkBAS0BBQJmSQkBAS0BBQJjbgAABAJmYggFAmZLAl8xBAJjWggFAmZLAl8yCQDOCAIFAmNvBQJmYgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkdAEJZ2V0Tm9MZXNzAgJmTAJmTQQCY0cJAQJkcwEFAmR0BAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJkdggFAmNHAl8zBAJiVggFAmNHAl80BAJjbwgFAmNHAl81AwkAZgIFAmZMBQJjbQkAAgEJAKwCAgkArAICCQCsAgICHG5vTGVzc1RoZW5BbXRBc3NldCBmYWlsZWQ6ICAJAKQDAQUCY20CAyA8IAkApAMBBQJmTAMJAGYCBQJmTQUCY24JAAIBCQCsAgIJAKwCAgkArAICAh1ub0xlc3NUaGVuUHJpY2VBc3NldCBmYWlsZWQ6IAkApAMBBQJjbgIDIDwgCQCkAwEFAmZNBAJmSgkA/AcEBQJhSgIEYnVybgkAzAgCBQJkdgUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiVgUCZHYFA25pbAMJAAACBQJmSgUCZkoEAmZOCQECZGEDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZiCAUCZk4CXzEEAmNaCAUCZk4CXzIJAM4IAgUCY28FAmZiCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR0AQ11bnN0YWtlQW5kR2V0AQJkQgQCZk8DCQECIT0CCQCQAwEIBQJkdAhwYXltZW50cwAACQACAQIYTm8gcGF5bWVudHMgYXJlIGV4cGVjdGVkBgMJAAACBQJmTwUCZk8EAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJmRQkA/AcEBQJiZgIHdW5zdGFrZQkAzAgCCQDYBAEFAmJYCQDMCAIFAmRCBQNuaWwFA25pbAMJAAACBQJmRQUCZkUEAmNHCQECYlQECQDYBAEIBQJkdA10cmFuc2FjdGlvbklkCQDYBAEFAmJYBQJkQggFAmR0BmNhbGxlcgQCY20IBQJjRwJfMQQCY24IBQJjRwJfMgQCY2EJAQ1wYXJzZUludFZhbHVlAQgFAmNHAl85BAJjbwgFAmNHA18xMAQCZlADAwkBAmFMAAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsR2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EGAwkAAAIFAmZQBQJmUAQCZkoJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZEIFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlgFAmRCBQNuaWwDCQAAAgUCZkoFAmZKBAJmUQkBAmRhAwkBAS0BBQJjbQkBAS0BBQJjbgAABAJmYggFAmZRAl8xBAJjWggFAmZRAl8yCQDOCAIFAmNvBQJmYgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkdAETdW5zdGFrZUFuZEdldE5vTGVzcwMCZkQCZlICZk0EAmZ1AwkBAmFMAAYJAAACBQJhWQUBbgQCZXAJAMwIAgMJAQEhAQUCZnUGCQACAQIhZ2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHQIcGF5bWVudHMAAAYJAAIBAhhubyBwYXltZW50cyBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJlcAUCZXAEAmZFCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYVoJAMwIAgUCZkQFA25pbAUDbmlsAwkAAAIFAmZFBQJmRQQCY0cJAQJiVAQJANgEAQgFAmR0DXRyYW5zYWN0aW9uSWQJANgEAQUCYVoFAmZECAUCZHQGY2FsbGVyBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjbwgFAmNHA18xMAQCZlMJAMwIAgMJAGcCBQJjbQUCZlIGCQACAQkAuQkCCQDMCAICLGFtb3VudCBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZlIFA25pbAIACQDMCAIDCQBnAgUCY24FAmZNBgkAAgEJALkJAgkAzAgCAitwcmljZSBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZk0FA25pbAIABQNuaWwDCQAAAgUCZlMFAmZTBAJmSgkA/AcEBQJhSgIEYnVybgkAzAgCBQJmRAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJhWgUCZkQFA25pbAMJAAACBQJmSgUCZkoEAmZUCQECZGEDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZiCAUCZlQCXzEEAmNaCAUCZlQCXzIJAM4IAgUCY28FAmZiCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR0AQhhY3RpdmF0ZQICZlUCZlYDCQECIT0CCQClCAEIBQJkdAZjYWxsZXIJAKUIAQUCYUoJAAIBAhJwZXJtaXNzaW9ucyBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQECYWEABQJmVQkAzAgCCQELU3RyaW5nRW50cnkCCQECYWIABQJmVgUDbmlsAgdzdWNjZXNzAmR0AQpyZWZyZXNoS0xwAAQCZlcJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUCYWcAAAQCZlgDCQBnAgkAZQIFBmhlaWdodAUCZlcFAmFqBQR1bml0CQECYUcBCQC5CQIJAMwIAgkApAMBBQJhagkAzAgCAi8gYmxvY2tzIGhhdmUgbm90IHBhc3NlZCBzaW5jZSB0aGUgcHJldmlvdXMgY2FsbAUDbmlsAgADCQAAAgUCZlgFAmZYBAJmWQkBAmRhAwAAAAAAAAQCZGgIBQJmWQJfMQQCY1oIBQJmWQJfMgkAlAoCBQJkaAkApgMBBQJjWgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkdAEcZ2V0UG9vbENvbmZpZ1dyYXBwZXJSRUFET05MWQAJAJQKAgUDbmlsCQECYU4AAmR0ARxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZAQJieAkAlAoCBQNuaWwJAQJidwEFAmJ4AmR0ARljYWxjUHJpY2VzV3JhcHBlclJFQURPTkxZAwJiRQJiRgJiSgQCYlMJAQJiSQMFAmJFBQJiRgUCYkoJAJQKAgUDbmlsCQDMCAIJAKYDAQkAkQMCBQJiUwAACQDMCAIJAKYDAQkAkQMCBQJiUwABCQDMCAIJAKYDAQkAkQMCBQJiUwACBQNuaWwCZHQBFHRvWDE4V3JhcHBlclJFQURPTkxZAgFFAUYJAJQKAgUDbmlsCQCmAwEJAQFEAgUBRQUBRgJkdAEWZnJvbVgxOFdyYXBwZXJSRUFET05MWQIBSAFJCQCUCgIFA25pbAkBAUcCCQCnAwEFAUgFAUkCZHQBHmNhbGNQcmljZUJpZ0ludFdyYXBwZXJSRUFET05MWQICYnoCYkEJAJQKAgUDbmlsCQCmAwEJAQJieQIJAKcDAQUCYnoJAKcDAQUCYkECZHQBI2VzdGltYXRlUHV0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZCQJiVQJjcQJjcgJjcwJjdAJjdQFYAmN2AmN3CQCUCgIFA25pbAkBAmNwCQUCYlUFAmNxBQJjcgUCY3MFAmN0BQJjdQUBWAUCY3YFAmN3AmR0ASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQCYlUCYlYCYlcBWAQCY0cJAQJiVAQFAmJVBQJiVgUCYlcJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAVgJAJQKAgUDbmlsCQCcCgoIBQJjRwJfMQgFAmNHAl8yCAUCY0cCXzMIBQJjRwJfNAgFAmNHAl81CAUCY0cCXzYIBQJjRwJfNwkApgMBCAUCY0cCXzgIBQJjRwJfOQgFAmNHA18xMAJkdAENc3RhdHNSRUFET05MWQAEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJmWgkAkQMCBQJiSwUBcgQCZ2EJAJEDAgUCYksFAXMEAmN6CQCRAwIFAmJLBQF2BAJjQQkAkQMCBQJiSwUBdwQCYkwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYk0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCZ2IICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnYwkBAmJ3AQUCZloEAmdkCQECYncBBQJnYQQCZ2UDCQAAAgUCZ2IAAAkAzAgCBQFlCQDMCAIFAWUJAMwIAgUBZQUDbmlsCQECYkkDBQJnYwUCZ2QFAmdiBAJjaAAABAJnZgkBAUcCCQCRAwIFAmdlAAEFAWIEAmdnCQEBRwIJAJEDAgUCZ2UAAgUBYgQCZ2gJAQV2YWx1ZQEJAJoIAgUCYUoJAQJhdQEJAKUIAQUEdGhpcwkAlAoCBQNuaWwJALkJAgkAzAgCAg4lZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmdjCQDMCAIJAKQDAQUCZ2QJAMwIAgkApAMBBQJnYgkAzAgCCQCkAwEFAmNoCQDMCAIJAKQDAQUCZ2YJAMwIAgkApAMBBQJnZwkAzAgCCQCkAwEFAmdoBQNuaWwFAWoCZHQBIGV2YWx1YXRlUHV0QnlBbW91bnRBc3NldFJFQURPTkxZAQJjcgQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmN4CQCRAwIFAmJLBQFyBAJiWQkA2QQBBQJjeAQCY3kJAJEDAgUCYksFAXMEAmJaCQDZBAEFAmN5BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCZ2IICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnYwkBAmJ3AQUCY3gEAmdkCQECYncBBQJjeQQCYkcJAQFEAgUCZ2MFAmJMBAJiSAkBAUQCBQJnZAUCYk0EAmNnAwkAAAIFAmdiAAAFAWUJAQJieQIFAmJIBQJiRwQCY0QJAQFEAgUCY3IFAmJMBAJjRQkAvAIDBQJjRAUCY2cFAWQEAmN0CQEBRwIFAmNFBQJiTQQCZHoJAQJjcAkCAACgwh4FAmNyBQJiWQUCY3QFAmJaAgAGBwQCY08IBQJkegJfMQQCZ2kIBQJkegJfMwQCY2MIBQJkegJfNAQCY2UIBQJkegJfNQQCY2IIBQJkegJfNgkAlAoCBQNuaWwJALkJAgkAzAgCAhAlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCY08JAMwIAgkApAMBCQEBRwIFAmNnBQFiCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIFAmNhCQDMCAIJAKQDAQUCY3IJAMwIAgkApAMBBQJjdAUDbmlsBQFqAmR0AR9ldmFsdWF0ZVB1dEJ5UHJpY2VBc3NldFJFQURPTkxZAQJjdAQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmN4CQCRAwIFAmJLBQFyBAJiWQkA2QQBBQJjeAQCY3kJAJEDAgUCYksFAXMEAmJaCQDZBAEFAmN5BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCZ2IICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnagkBAmJ3AQUCY3gEAmdrCQECYncBBQJjeQQCZ2wJAQFEAgUCZ2oFAmJMBAJnbQkBAUQCBQJnawUCYk0EAmNnAwkAAAIFAmdiAAAFAWUJAQJieQIFAmdtBQJnbAQCY0UJAQFEAgUCY3QFAmJNBAJjRAkAvAIDBQJjRQUBZAUCY2cEAmNyCQEBRwIFAmNEBQJiTAQCZHoJAQJjcAkCAACgwh4FAmNyBQJiWQUCY3QFAmJaAgAGBwQCY08IBQJkegJfMQQCZ2kIBQJkegJfMwQCY2MIBQJkegJfNAQCY2UIBQJkegJfNQQCY2IIBQJkegJfNgkAlAoCBQNuaWwJALkJAgkAzAgCAhAlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCY08JAMwIAgkApAMBCQEBRwIFAmNnBQFiCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIFAmNhCQDMCAIJAKQDAQUCY3IJAMwIAgkApAMBBQJjdAUDbmlsBQFqAmR0ARNldmFsdWF0ZUdldFJFQURPTkxZAgJnbgJnbwQCY0cJAQJiVAQCAAUCZ24FAmdvBQR0aGlzBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjYwgFAmNHAl81BAJjZQgFAmNHAl82BAJjYggFAmNHAl83BAJjaAgFAmNHAl84BAJjYQkBDXBhcnNlSW50VmFsdWUBCAUCY0cCXzkJAJQKAgUDbmlsCQC5CQIJAMwIAgIOJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJjbQkAzAgCCQCkAwEFAmNuCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIJAKYDAQUCY2gJAMwIAgkApAMBBQJjYQUDbmlsBQFqAQJncAECZ3EABAJncgQCZEUJAQJlRwADCQABAgUCZEUCCkJ5dGVWZWN0b3IEAmVLBQJkRQUCZUsDCQABAgUCZEUCBFVuaXQIBQJncA9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgQCZEUFAmdwAwkAAQIFAmRFAgVPcmRlcgQCZGoFAmRFBAJncwkBAmFNAAQCYXoJAQJkaQEFAmRqBAJhQQkA9AMDCAUCZGoJYm9keUJ5dGVzCQCRAwIIBQJkagZwcm9vZnMAAAgFAmRqD3NlbmRlclB1YmxpY0tleQQCYUIJAPQDAwgFAmRqCWJvZHlCeXRlcwkAkQMCCAUCZGoGcHJvb2ZzAAEFAmdzAwMDBQJhegUCYUEHBQJhQgcGCQECYXkDBQJhegUCYUEFAmFCAwkAAQIFAmRFAhRTZXRTY3JpcHRUcmFuc2FjdGlvbgQCZUgFAmRFBAJndAkA9gMBCQEFdmFsdWUBCAUCZUgGc2NyaXB0BAJndQkA2wQBCQEFdmFsdWUBCQCdCAIFAmFKCQECYXcABAJndgkA8QcBBQR0aGlzAwMJAAACBQJndQUCZ3QJAQIhPQIFAmd2BQJndAcGCQD0AwMIBQJncAlib2R5Qnl0ZXMJAJEDAggFAmdwBnByb29mcwAABQJncgkA9AMDCAUCZ3AJYm9keUJ5dGVzCQCRAwIIBQJncAZwcm9vZnMAAAUCZ3JXKual", "chainId": 84, "height": 2346705, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: BMV2ouiqJQr2hGphEpD7BTX9d88jkcD2VXDDKswa87Ya Next: 5LXYZ6vhJgJNQAyVnbbP1JXG83WbhoxG6fks1a3N34vx Diff:
OldNewDifferences
111111
112112 let fee = valueOrElse(getInteger(this, keyFee), feeDefault)
113113
114+let keyKLp = makeString(["%s", "kLp"], SEP)
115+
116+let keyKLpRefreshedHeight = makeString(["%s", "kLpRefreshedHeight"], SEP)
117+
118+let keyKLpRefreshDelay = makeString(["%s", "refreshKLpDelay"], SEP)
119+
120+let kLpRefreshDelayDefault = 30
121+
122+let kLpRefreshDelay = valueOrElse(getInteger(this, keyKLpRefreshDelay), kLpRefreshDelayDefault)
123+
114124 func keyFactoryConfig () = "%s__factoryConfig"
115125
116126
149159 func throwErr (msg) = throw(makeString(["lp.ride:", msg], " "))
150160
151161
162+func fmtErr (msg) = makeString(["lp.ride:", msg], " ")
163+
164+
152165 let factoryContract = addressFromStringValue(getStringOrFail(this, fc()))
153166
154167 let feeCollectorAddress = addressFromStringValue(getStringOrFail(factoryContract, keyFeeCollectorAddress))
183196
184197 let poolConfigParsed = parsePoolConfig(getPoolConfig())
185198
186-let $t075447710 = poolConfigParsed
199+let $t079158081 = poolConfigParsed
187200
188-let cfgPoolAddress = $t075447710._1
201+let cfgPoolAddress = $t079158081._1
189202
190-let cfgPoolStatus = $t075447710._2
203+let cfgPoolStatus = $t079158081._2
191204
192-let cfgLpAssetId = $t075447710._3
205+let cfgLpAssetId = $t079158081._3
193206
194-let cfgAmountAssetId = $t075447710._4
207+let cfgAmountAssetId = $t079158081._4
195208
196-let cfgPriceAssetId = $t075447710._5
209+let cfgPriceAssetId = $t079158081._5
197210
198-let cfgAmountAssetDecimals = $t075447710._6
211+let cfgAmountAssetDecimals = $t079158081._6
199212
200-let cfgPriceAssetDecimals = $t075447710._7
213+let cfgPriceAssetDecimals = $t079158081._7
201214
202215 func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP)
203216
360373 }
361374
362375
376+func calcKLp (amountBalance,priceBalance,lpEmission) = {
377+ let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 0, DOWN), scale18, lpEmission)
378+ updatedKLp
379+ }
380+
381+
382+func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
383+ let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
384+ let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
385+ let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
386+ let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
387+ let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
388+ $Tuple2(actions, updatedKLp)
389+ }
390+
391+
363392 func validateMatcherOrderAllowed (order) = {
364- let cfg = getPoolConfig()
365- let amtAssetId = cfg[idxAmtAssetId]
366- let priceAssetId = cfg[idxPriceAssetId]
367- let poolStatus = parseIntValue(cfg[idxPoolStatus])
368- let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
369- let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
370- let accAmtAssetBalance = getAccBalance(amtAssetId)
371- let accPriceAssetBalance = getAccBalance(priceAssetId)
372- let curPriceX18 = if ((order.orderType == Buy))
373- then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance)
374- else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance)
375- let curPrice = fromX18(curPriceX18, scale8)
393+ let amountAssetAmount = order.amount
394+ let priceAssetAmount = fraction(order.amount, order.price, scale8)
395+ let $t01955919771 = if ((order.orderType == Buy))
396+ then $Tuple2(amountAssetAmount, -(priceAssetAmount))
397+ else $Tuple2(-(amountAssetAmount), priceAssetAmount)
398+ let amountAssetBalanceDelta = $t01955919771._1
399+ let priceAssetBalanceDelta = $t01955919771._2
376400 if (if (if (isGlobalShutdown())
377401 then true
378- else (poolStatus == PoolMatcherDisabled))
402+ else (cfgPoolStatus == PoolMatcherDisabled))
379403 then true
380- else (poolStatus == PoolShutdown))
404+ else (cfgPoolStatus == PoolShutdown))
381405 then throw("Exchange operations disabled")
382- else {
383- let orderAmtAsset = order.assetPair.amountAsset
384- let orderAmtAssetStr = if ((orderAmtAsset == unit))
385- then "WAVES"
386- else toBase58String(value(orderAmtAsset))
387- let orderPriceAsset = order.assetPair.priceAsset
388- let orderPriceAssetStr = if ((orderPriceAsset == unit))
389- then "WAVES"
390- else toBase58String(value(orderPriceAsset))
391- if (if ((orderAmtAssetStr != amtAssetId))
392- then true
393- else (orderPriceAssetStr != priceAssetId))
394- then throw("Wrong order assets.")
395- else {
396- let orderPrice = order.price
397- let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm)
398- let castedOrderPrice = toScale(orderPrice, scale8, priceDcm)
399- let isOrderPriceValid = if ((order.orderType == Buy))
400- then (curPrice >= castedOrderPrice)
401- else (castedOrderPrice >= curPrice)
402- true
403- }
404- }
406+ else if (if ((order.assetPair.amountAsset != cfgAmountAssetId))
407+ then true
408+ else (order.assetPair.priceAsset != cfgPriceAssetId))
409+ then throw("Wrong order assets.")
410+ else {
411+ let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
412+ let $t02024220342 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
413+ let unusedActions = $t02024220342._1
414+ let kLpNew = $t02024220342._2
415+ let isOrderValid = (kLpNew > kLp)
416+ isOrderValid
417+ }
405418 }
406419
407420
474487 else if ((paymentAssetId == cfgPriceAssetId))
475488 then false
476489 else throwErr("invalid asset")
477- let $t02257122864 = if (isEval)
490+ let $t02302623319 = if (isEval)
478491 then $Tuple2(amountBalanceRaw, priceBalanceRaw)
479492 else if (paymentInAmountAsset)
480493 then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
481494 else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
482- let amountBalanceOld = $t02257122864._1
483- let priceBalanceOld = $t02257122864._2
484- let $t02286823017 = if (paymentInAmountAsset)
495+ let amountBalanceOld = $t02302623319._1
496+ let priceBalanceOld = $t02302623319._2
497+ let $t02332323472 = if (paymentInAmountAsset)
485498 then $Tuple2(paymentAmountRaw, 0)
486499 else $Tuple2(0, paymentAmountRaw)
487- let amountAssetAmountRaw = $t02286823017._1
488- let priceAssetAmountRaw = $t02286823017._2
500+ let amountAssetAmountRaw = $t02332323472._1
501+ let priceAssetAmountRaw = $t02332323472._2
489502 let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
490503 let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
491- let $t02313923198 = takeFee(paymentAmountRaw)
492- let paymentAmount = $t02313923198._1
493- let feeAmount = $t02313923198._2
504+ let $t02359423653 = takeFee(paymentAmountRaw)
505+ let paymentAmount = $t02359423653._1
506+ let feeAmount = $t02359423653._2
494507 let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
495508 let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
496509 let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
513526 let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
514527 let priceOld = fromX18(priceOldX18, scale8)
515528 let loss = {
516- let $t02467524842 = if (paymentInAmountAsset)
529+ let $t02513025297 = if (paymentInAmountAsset)
517530 then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
518531 else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
519- let amount = $t02467524842._1
520- let balance = $t02467524842._2
532+ let amount = $t02513025297._1
533+ let balance = $t02513025297._2
521534 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
522535 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
523536 }
524- $Tuple4(issueAmount, commonState, feeAmount, loss)
537+ $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset)
525538 }
526539 else throw("Strict value is not equal to itself.")
527540 }
551564 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
552565 let redeemedBigInt = toBigInt(paymentAmount)
553566 let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
554- let $t02642226472 = takeFee(amountRaw)
555- let totalAmount = $t02642226472._1
556- let feeAmount = $t02642226472._2
557- let $t02647626702 = if (outInAmountAsset)
567+ let $t02689926949 = takeFee(amountRaw)
568+ let totalAmount = $t02689926949._1
569+ let feeAmount = $t02689926949._2
570+ let $t02695327179 = if (outInAmountAsset)
558571 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
559572 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
560- let outAmAmount = $t02647626702._1
561- let outPrAmount = $t02647626702._2
562- let amBalanceNew = $t02647626702._3
563- let prBalanceNew = $t02647626702._4
573+ let outAmAmount = $t02695327179._1
574+ let outPrAmount = $t02695327179._2
575+ let amBalanceNew = $t02695327179._3
576+ let prBalanceNew = $t02695327179._4
564577 let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
565578 let priceNew = fromX18(priceNewX18, scale8)
566579 let commonState = if (isEval)
572585 let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2)
573586 fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset)
574587 }
575- $Tuple4(totalAmount, commonState, feeAmount, loss)
588+ $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset)
576589 }
577590 else throw("Strict value is not equal to itself.")
578591 }
701714 else throw("Strict value is not equal to itself.")
702715 }
703716 else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
704- (state ++ lpTransfer)
717+ let $t03113031195 = refreshKLpInternal(0, 0, 0)
718+ let refreshKLpActions = $t03113031195._1
719+ let updatedKLp = $t03113031195._2
720+ ((state ++ lpTransfer) ++ refreshKLpActions)
705721 }
706722 else throw("Strict value is not equal to itself.")
707723 }
719735 then throw("Invalid value passed")
720736 else {
721737 let estPut = commonPut(i, maxSlippage, false)
722- estPut._9
738+ let state = estPut._9
739+ let $t03148131546 = refreshKLpInternal(0, 0, 0)
740+ let refreshKLpActions = $t03148131546._1
741+ let updatedKLp = $t03148131546._2
742+ (state ++ refreshKLpActions)
723743 }
724744
725745
753773 let paymentAmountRaw = payment.amount
754774 let userAddress = i.caller
755775 let txId = i.transactionId
756- let $t03160931736 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
757- let emitAmountEstimated = $t03160931736._1
758- let commonState = $t03160931736._2
759- let feeAmount = $t03160931736._3
760- let bonus = $t03160931736._4
761- let emitAmount = if (if ((minOutAmount > 0))
762- then (minOutAmount > emitAmountEstimated)
763- else false)
764- then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
765- else emitAmountEstimated
766- let emitInv = emit(emitAmount)
767- if ((emitInv == emitInv))
776+ let $t03232232474 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
777+ if (($t03232232474 == $t03232232474))
768778 then {
769- let lpTransfer = if (autoStake)
779+ let paymentInAmountAsset = $t03232232474._5
780+ let bonus = $t03232232474._4
781+ let feeAmount = $t03232232474._3
782+ let commonState = $t03232232474._2
783+ let emitAmountEstimated = $t03232232474._1
784+ let emitAmount = if (if ((minOutAmount > 0))
785+ then (minOutAmount > emitAmountEstimated)
786+ else false)
787+ then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
788+ else emitAmountEstimated
789+ let emitInv = emit(emitAmount)
790+ if ((emitInv == emitInv))
770791 then {
771- let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
772- if ((stakeInv == stakeInv))
773- then nil
774- else throw("Strict value is not equal to itself.")
792+ let lpTransfer = if (autoStake)
793+ then {
794+ let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
795+ if ((stakeInv == stakeInv))
796+ then nil
797+ else throw("Strict value is not equal to itself.")
798+ }
799+ else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
800+ let sendFee = if ((feeAmount > 0))
801+ then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
802+ else nil
803+ let $t03306033257 = if ((this == feeCollectorAddress))
804+ then $Tuple2(0, 0)
805+ else if (paymentInAmountAsset)
806+ then $Tuple2(-(feeAmount), 0)
807+ else $Tuple2(0, -(feeAmount))
808+ let amountAssetBalanceDelta = $t03306033257._1
809+ let priceAssetBalanceDelta = $t03306033257._2
810+ let $t03326033368 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
811+ let refreshKLpActions = $t03326033368._1
812+ let updatedKLp = $t03326033368._2
813+ $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
775814 }
776- else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
777- let sendFee = if ((feeAmount > 0))
778- then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
779- else nil
780- $Tuple2(((commonState ++ lpTransfer) ++ sendFee), emitAmount)
815+ else throw("Strict value is not equal to itself.")
781816 }
782817 else throw("Strict value is not equal to itself.")
783818 }
788823
789824 @Callable(i)
790825 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
791- let $t03246532600 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
792- let emitAmountEstimated = $t03246532600._1
793- let commonState = $t03246532600._2
794- let feeAmount = $t03246532600._3
795- let bonus = $t03246532600._4
826+ let $t03356133718 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
827+ let emitAmountEstimated = $t03356133718._1
828+ let commonState = $t03356133718._2
829+ let feeAmount = $t03356133718._3
830+ let bonus = $t03356133718._4
831+ let paymentInAmountAsset = $t03356133718._5
796832 $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
797833 }
798834
826862 let paymentAmount = payment.amount
827863 let userAddress = i.caller
828864 let txId = i.transactionId
829- let $t03340533537 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
830- let amountEstimated = $t03340533537._1
831- let commonState = $t03340533537._2
832- let feeAmount = $t03340533537._3
833- let bonus = $t03340533537._4
834- let amount = if (if ((minOutAmount > 0))
835- then (minOutAmount > amountEstimated)
836- else false)
837- then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
838- else amountEstimated
839- let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
840- if ((burnInv == burnInv))
865+ let $t03452334676 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
866+ if (($t03452334676 == $t03452334676))
841867 then {
842- let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
843- let sendFee = if ((feeAmount > 0))
844- then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
845- else nil
846- $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount)
868+ let outInAmountAsset = $t03452334676._5
869+ let bonus = $t03452334676._4
870+ let feeAmount = $t03452334676._3
871+ let commonState = $t03452334676._2
872+ let amountEstimated = $t03452334676._1
873+ let amount = if (if ((minOutAmount > 0))
874+ then (minOutAmount > amountEstimated)
875+ else false)
876+ then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
877+ else amountEstimated
878+ let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
879+ if ((burnInv == burnInv))
880+ then {
881+ let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
882+ let sendFee = if ((feeAmount > 0))
883+ then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
884+ else nil
885+ let $t03517635423 = {
886+ let feeAmountForCalc = if ((this == feeCollectorAddress))
887+ then 0
888+ else feeAmount
889+ if (outInAmountAsset)
890+ then $Tuple2(-((amount + feeAmountForCalc)), 0)
891+ else $Tuple2(0, -((amount + feeAmountForCalc)))
892+ }
893+ let amountAssetBalanceDelta = $t03517635423._1
894+ let priceAssetBalanceDelta = $t03517635423._2
895+ let $t03542635534 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
896+ let refreshKLpActions = $t03542635534._1
897+ let updatedKLp = $t03542635534._2
898+ $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
899+ }
900+ else throw("Strict value is not equal to itself.")
847901 }
848902 else throw("Strict value is not equal to itself.")
849903 }
854908
855909 @Callable(i)
856910 func getOneTknREADONLY (outAssetId,paymentAmount) = {
857- let $t03417234310 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
858- let amountEstimated = $t03417234310._1
859- let commonState = $t03417234310._2
860- let feeAmount = $t03417234310._3
861- let bonus = $t03417234310._4
911+ let $t03571835874 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
912+ let amountEstimated = $t03571835874._1
913+ let commonState = $t03571835874._2
914+ let feeAmount = $t03571835874._3
915+ let bonus = $t03571835874._4
916+ let outInAmountAsset = $t03571835874._5
862917 $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
863918 }
864919
892947 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
893948 if ((unstakeInv == unstakeInv))
894949 then {
895- let $t03513535265 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
896- let amountEstimated = $t03513535265._1
897- let commonState = $t03513535265._2
898- let feeAmount = $t03513535265._3
899- let bonus = $t03513535265._4
900- let amount = if (if ((minOutAmount > 0))
901- then (minOutAmount > amountEstimated)
902- else false)
903- then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
904- else amountEstimated
905- let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
906- if ((burnInv == burnInv))
950+ let $t03669936850 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
951+ if (($t03669936850 == $t03669936850))
907952 then {
908- let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
909- let sendFee = if ((feeAmount > 0))
910- then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
911- else nil
912- $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount)
953+ let outInAmountAsset = $t03669936850._5
954+ let bonus = $t03669936850._4
955+ let feeAmount = $t03669936850._3
956+ let commonState = $t03669936850._2
957+ let amountEstimated = $t03669936850._1
958+ let amount = if (if ((minOutAmount > 0))
959+ then (minOutAmount > amountEstimated)
960+ else false)
961+ then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
962+ else amountEstimated
963+ let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
964+ if ((burnInv == burnInv))
965+ then {
966+ let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
967+ let sendFee = if ((feeAmount > 0))
968+ then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
969+ else nil
970+ let $t03734537592 = {
971+ let feeAmountForCalc = if ((this == feeCollectorAddress))
972+ then 0
973+ else feeAmount
974+ if (outInAmountAsset)
975+ then $Tuple2(-((amount + feeAmountForCalc)), 0)
976+ else $Tuple2(0, -((amount + feeAmountForCalc)))
977+ }
978+ let amountAssetBalanceDelta = $t03734537592._1
979+ let priceAssetBalanceDelta = $t03734537592._2
980+ let $t03759537703 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
981+ let refreshKLpActions = $t03759537703._1
982+ let updatedKLp = $t03759537703._2
983+ $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
984+ }
985+ else throw("Strict value is not equal to itself.")
913986 }
914987 else throw("Strict value is not equal to itself.")
915988 }
9301003 let state = res._5
9311004 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
9321005 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
933- then state
1006+ then {
1007+ let $t03849538577 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1008+ let refreshKLpActions = $t03849538577._1
1009+ let updatedKLp = $t03849538577._2
1010+ (state ++ refreshKLpActions)
1011+ }
9341012 else throw("Strict value is not equal to itself.")
9351013 }
9361014
9511029 else {
9521030 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
9531031 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
954- then state
1032+ then {
1033+ let $t03937339454 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1034+ let refreshKLpActions = $t03937339454._1
1035+ let updatedKLp = $t03937339454._2
1036+ (state ++ refreshKLpActions)
1037+ }
9551038 else throw("Strict value is not equal to itself.")
9561039 }
9571040 }
9711054 if ((unstakeInv == unstakeInv))
9721055 then {
9731056 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
1057+ let outAmAmt = res._1
1058+ let outPrAmt = res._2
9741059 let poolStatus = parseIntValue(res._9)
9751060 let state = res._10
9761061 let checkPoolStatus = if (if (isGlobalShutdown())
9821067 then {
9831068 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
9841069 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
985- then state
1070+ then {
1071+ let $t04042740508 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1072+ let refreshKLpActions = $t04042740508._1
1073+ let updatedKLp = $t04042740508._2
1074+ (state ++ refreshKLpActions)
1075+ }
9861076 else throw("Strict value is not equal to itself.")
9871077 }
9881078 else throw("Strict value is not equal to itself.")
10221112 then {
10231113 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
10241114 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
1025- then state
1115+ then {
1116+ let $t04164841729 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1117+ let refreshKLpActions = $t04164841729._1
1118+ let updatedKLp = $t04164841729._2
1119+ (state ++ refreshKLpActions)
1120+ }
10261121 else throw("Strict value is not equal to itself.")
10271122 }
10281123 else throw("Strict value is not equal to itself.")
10381133 func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
10391134 then throw("permissions denied")
10401135 else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success")
1136+
1137+
1138+
1139+@Callable(i)
1140+func refreshKLp () = {
1141+ let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0)
1142+ let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay))
1143+ then unit
1144+ else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], ""))
1145+ if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
1146+ then {
1147+ let $t04271742772 = refreshKLpInternal(0, 0, 0)
1148+ let actions = $t04271742772._1
1149+ let updatedKLp = $t04271742772._2
1150+ $Tuple2(actions, toString(updatedKLp))
1151+ }
1152+ else throw("Strict value is not equal to itself.")
1153+ }
10411154
10421155
10431156
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let lPdecimals = 8
55
66 let scale8 = 100000000
77
88 let scale8BigInt = toBigInt(100000000)
99
1010 let scale18 = toBigInt(1000000000000000000)
1111
1212 let zeroBigInt = toBigInt(0)
1313
1414 let big0 = toBigInt(0)
1515
1616 let big1 = toBigInt(1)
1717
1818 let big2 = toBigInt(2)
1919
2020 let wavesString = "WAVES"
2121
2222 let SEP = "__"
2323
2424 let PoolActive = 1
2525
2626 let PoolPutDisabled = 2
2727
2828 let PoolMatcherDisabled = 3
2929
3030 let PoolShutdown = 4
3131
3232 let idxPoolAddress = 1
3333
3434 let idxPoolStatus = 2
3535
3636 let idxPoolLPAssetId = 3
3737
3838 let idxAmtAssetId = 4
3939
4040 let idxPriceAssetId = 5
4141
4242 let idxAmtAssetDcm = 6
4343
4444 let idxPriceAssetDcm = 7
4545
4646 let idxIAmtAssetId = 8
4747
4848 let idxIPriceAssetId = 9
4949
5050 let idxLPAssetDcm = 10
5151
5252 let idxPoolAmtAssetAmt = 1
5353
5454 let idxPoolPriceAssetAmt = 2
5555
5656 let idxPoolLPAssetAmt = 3
5757
5858 let idxFactoryStakingContract = 1
5959
6060 let idxFactorySlippageContract = 7
6161
6262 func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
6363
6464
6565 func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
6666
6767
6868 func toScale (amt,resScale,curScale) = fraction(amt, resScale, curScale)
6969
7070
7171 func abs (val) = if ((0 > val))
7272 then -(val)
7373 else val
7474
7575
7676 func absBigInt (val) = if ((zeroBigInt > val))
7777 then -(val)
7878 else val
7979
8080
8181 func fc () = "%s__factoryContract"
8282
8383
8484 func mpk () = "%s__managerPublicKey"
8585
8686
8787 func pmpk () = "%s__pendingManagerPublicKey"
8888
8989
9090 func pl () = "%s%s__price__last"
9191
9292
9393 func ph (h,timestamp) = makeString(["%s%s%d%d__price__history", toString(h), toString(timestamp)], SEP)
9494
9595
9696 func pau (userAddress,txId) = ((("%s%s%s__P__" + userAddress) + "__") + txId)
9797
9898
9999 func gau (userAddress,txId) = ((("%s%s%s__G__" + userAddress) + "__") + txId)
100100
101101
102102 func aa () = "%s__amountAsset"
103103
104104
105105 func pa () = "%s__priceAsset"
106106
107107
108108 let keyFee = "%s__fee"
109109
110110 let feeDefault = fraction(10, scale8, 10000)
111111
112112 let fee = valueOrElse(getInteger(this, keyFee), feeDefault)
113113
114+let keyKLp = makeString(["%s", "kLp"], SEP)
115+
116+let keyKLpRefreshedHeight = makeString(["%s", "kLpRefreshedHeight"], SEP)
117+
118+let keyKLpRefreshDelay = makeString(["%s", "refreshKLpDelay"], SEP)
119+
120+let kLpRefreshDelayDefault = 30
121+
122+let kLpRefreshDelay = valueOrElse(getInteger(this, keyKLpRefreshDelay), kLpRefreshDelayDefault)
123+
114124 func keyFactoryConfig () = "%s__factoryConfig"
115125
116126
117127 func keyMatcherPub () = "%s%s__matcher__publicKey"
118128
119129
120130 func keyMappingPoolContractAddressToPoolAssets (poolContractAddress) = (("%s%s%s__" + poolContractAddress) + "__mappings__poolContract2LpAsset")
121131
122132
123133 func keyPoolConfig (iAmtAsset,iPriceAsset) = (((("%d%d%s__" + iAmtAsset) + "__") + iPriceAsset) + "__config")
124134
125135
126136 func keyMappingsBaseAsset2internalId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2internalId__" + baseAssetStr)
127137
128138
129139 func keyAllPoolsShutdown () = "%s__shutdown"
130140
131141
132142 func keyPoolWeight (contractAddress) = ("%s%s__poolWeight__" + contractAddress)
133143
134144
135145 func keyAllowedLpScriptHash () = "%s__allowedLpScriptHash"
136146
137147
138148 let keyFeeCollectorAddress = "%s__feeCollectorAddress"
139149
140150 func throwOrderError (orderValid,senderValid,matcherValid) = throw(((((("order validation failed: orderValid=" + toString(orderValid)) + " senderValid=") + toString(senderValid)) + " matcherValid=") + toString(matcherValid)))
141151
142152
143153 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
144154
145155
146156 func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
147157
148158
149159 func throwErr (msg) = throw(makeString(["lp.ride:", msg], " "))
150160
151161
162+func fmtErr (msg) = makeString(["lp.ride:", msg], " ")
163+
164+
152165 let factoryContract = addressFromStringValue(getStringOrFail(this, fc()))
153166
154167 let feeCollectorAddress = addressFromStringValue(getStringOrFail(factoryContract, keyFeeCollectorAddress))
155168
156169 func isGlobalShutdown () = valueOrElse(getBoolean(factoryContract, keyAllPoolsShutdown()), false)
157170
158171
159172 func getMatcherPubOrFail () = fromBase58String(getStringOrFail(factoryContract, keyMatcherPub()))
160173
161174
162175 func getPoolConfig () = {
163176 let amtAsset = getStringOrFail(this, aa())
164177 let priceAsset = getStringOrFail(this, pa())
165178 let iPriceAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(priceAsset))
166179 let iAmtAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(amtAsset))
167180 split(getStringOrFail(factoryContract, keyPoolConfig(toString(iAmtAsset), toString(iPriceAsset))), SEP)
168181 }
169182
170183
171184 func parseAssetId (input) = if ((input == wavesString))
172185 then unit
173186 else fromBase58String(input)
174187
175188
176189 func assetIdToString (input) = if ((input == unit))
177190 then wavesString
178191 else toBase58String(value(input))
179192
180193
181194 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]))
182195
183196
184197 let poolConfigParsed = parsePoolConfig(getPoolConfig())
185198
186-let $t075447710 = poolConfigParsed
199+let $t079158081 = poolConfigParsed
187200
188-let cfgPoolAddress = $t075447710._1
201+let cfgPoolAddress = $t079158081._1
189202
190-let cfgPoolStatus = $t075447710._2
203+let cfgPoolStatus = $t079158081._2
191204
192-let cfgLpAssetId = $t075447710._3
205+let cfgLpAssetId = $t079158081._3
193206
194-let cfgAmountAssetId = $t075447710._4
207+let cfgAmountAssetId = $t079158081._4
195208
196-let cfgPriceAssetId = $t075447710._5
209+let cfgPriceAssetId = $t079158081._5
197210
198-let cfgAmountAssetDecimals = $t075447710._6
211+let cfgAmountAssetDecimals = $t079158081._6
199212
200-let cfgPriceAssetDecimals = $t075447710._7
213+let cfgPriceAssetDecimals = $t079158081._7
201214
202215 func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP)
203216
204217
205218 let stakingContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactoryStakingContract]), "incorrect staking address")
206219
207220 let slippageContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactorySlippageContract]), "incorrect staking address")
208221
209222 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)
210223
211224
212225 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)
213226
214227
215228 func getAccBalance (assetId) = if ((assetId == "WAVES"))
216229 then wavesBalance(this).available
217230 else assetBalance(this, fromBase58String(assetId))
218231
219232
220233 func calcPriceBigInt (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
221234
222235
223236 func privateCalcPrice (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
224237 let amtAssetAmtX18 = toX18(amAmt, amAssetDcm)
225238 let priceAssetAmtX18 = toX18(prAmt, prAssetDcm)
226239 calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
227240 }
228241
229242
230243 func calcPrices (amAmt,prAmt,lpAmt) = {
231244 let cfg = getPoolConfig()
232245 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
233246 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
234247 let priceX18 = privateCalcPrice(amtAssetDcm, priceAssetDcm, amAmt, prAmt)
235248 let amAmtX18 = toX18(amAmt, amtAssetDcm)
236249 let prAmtX18 = toX18(prAmt, priceAssetDcm)
237250 let lpAmtX18 = toX18(lpAmt, scale8)
238251 let lpPriceInAmAssetX18 = calcPriceBigInt(amAmtX18, lpAmtX18)
239252 let lpPriceInPrAssetX18 = calcPriceBigInt(prAmtX18, lpAmtX18)
240253 [priceX18, lpPriceInAmAssetX18, lpPriceInPrAssetX18]
241254 }
242255
243256
244257 func calculatePrices (amAmt,prAmt,lpAmt) = {
245258 let prices = calcPrices(amAmt, prAmt, lpAmt)
246259 [fromX18(prices[0], scale8), fromX18(prices[1], scale8), fromX18(prices[2], scale8)]
247260 }
248261
249262
250263 func estimateGetOperation (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
251264 let cfg = getPoolConfig()
252265 let lpAssetId = cfg[idxPoolLPAssetId]
253266 let amAssetId = cfg[idxAmtAssetId]
254267 let prAssetId = cfg[idxPriceAssetId]
255268 let amAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
256269 let prAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
257270 let poolStatus = cfg[idxPoolStatus]
258271 let lpEmission = valueOrErrorMessage(assetInfo(fromBase58String(lpAssetId)), (("Asset " + lpAssetId) + " doesn't exist")).quantity
259272 if ((lpAssetId != pmtAssetId))
260273 then throw("Invalid asset passed.")
261274 else {
262275 let amBalance = getAccBalance(amAssetId)
263276 let amBalanceX18 = toX18(amBalance, amAssetDcm)
264277 let prBalance = getAccBalance(prAssetId)
265278 let prBalanceX18 = toX18(prBalance, prAssetDcm)
266279 let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
267280 let curPrice = fromX18(curPriceX18, scale8)
268281 let pmtLpAmtX18 = toX18(pmtLpAmt, scale8)
269282 let lpEmissionX18 = toX18(lpEmission, scale8)
270283 let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissionX18)
271284 let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissionX18)
272285 let outAmAmt = fromX18(outAmAmtX18, amAssetDcm)
273286 let outPrAmt = fromX18(outPrAmtX18, prAssetDcm)
274287 let state = if ((txId58 == ""))
275288 then nil
276289 else [ScriptTransfer(userAddress, outAmAmt, if ((amAssetId == "WAVES"))
277290 then unit
278291 else fromBase58String(amAssetId)), ScriptTransfer(userAddress, outPrAmt, if ((prAssetId == "WAVES"))
279292 then unit
280293 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)]
281294 $Tuple10(outAmAmt, outPrAmt, amAssetId, prAssetId, amBalance, prBalance, lpEmission, curPriceX18, poolStatus, state)
282295 }
283296 }
284297
285298
286299 func estimatePutOperation (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = {
287300 let cfg = getPoolConfig()
288301 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
289302 let amAssetIdStr = cfg[idxAmtAssetId]
290303 let prAssetIdStr = cfg[idxPriceAssetId]
291304 let iAmtAssetId = cfg[idxIAmtAssetId]
292305 let iPriceAssetId = cfg[idxIPriceAssetId]
293306 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
294307 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
295308 let poolStatus = cfg[idxPoolStatus]
296309 let lpEmission = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
297310 let inAmAssetIdStr = toBase58String(valueOrElse(inAmAssetId, fromBase58String("WAVES")))
298311 let inPrAssetIdStr = toBase58String(valueOrElse(inPrAssetId, fromBase58String("WAVES")))
299312 if (if ((amAssetIdStr != inAmAssetIdStr))
300313 then true
301314 else (prAssetIdStr != inPrAssetIdStr))
302315 then throw("Invalid amt or price asset passed.")
303316 else {
304317 let amBalance = if (isEvaluate)
305318 then getAccBalance(amAssetIdStr)
306319 else (getAccBalance(amAssetIdStr) - inAmAssetAmt)
307320 let prBalance = if (isEvaluate)
308321 then getAccBalance(prAssetIdStr)
309322 else (getAccBalance(prAssetIdStr) - inPrAssetAmt)
310323 let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
311324 let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
312325 let userPriceX18 = calcPriceBigInt(inPrAssetAmtX18, inAmAssetAmtX18)
313326 let amBalanceX18 = toX18(amBalance, amtAssetDcm)
314327 let prBalanceX18 = toX18(prBalance, priceAssetDcm)
315328 let res = if ((lpEmission == 0))
316329 then {
317330 let curPriceX18 = zeroBigInt
318331 let slippageX18 = zeroBigInt
319332 let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
320333 $Tuple5(fromX18(lpAmtX18, scale8), fromX18(inAmAssetAmtX18, amtAssetDcm), fromX18(inPrAssetAmtX18, priceAssetDcm), calcPriceBigInt((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
321334 }
322335 else {
323336 let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
324337 let slippageX18 = fraction(absBigInt((curPriceX18 - userPriceX18)), scale18, curPriceX18)
325338 let slippageToleranceX18 = toX18(slippageTolerance, scale8)
326339 if (if ((curPriceX18 != zeroBigInt))
327340 then (slippageX18 > slippageToleranceX18)
328341 else false)
329342 then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18)))
330343 else {
331344 let lpEmissionX18 = toX18(lpEmission, scale8)
332345 let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
333346 let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
334347 let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
335348 then $Tuple2(amViaPrX18, inPrAssetAmtX18)
336349 else $Tuple2(inAmAssetAmtX18, prViaAmX18)
337350 let expAmtAssetAmtX18 = expectedAmts._1
338351 let expPriceAssetAmtX18 = expectedAmts._2
339352 let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
340353 $Tuple5(fromX18(lpAmtX18, scale8), fromX18(expAmtAssetAmtX18, amtAssetDcm), fromX18(expPriceAssetAmtX18, priceAssetDcm), curPriceX18, slippageX18)
341354 }
342355 }
343356 let calcLpAmt = res._1
344357 let calcAmAssetPmt = res._2
345358 let calcPrAssetPmt = res._3
346359 let curPrice = fromX18(res._4, scale8)
347360 let slippageCalc = fromX18(res._5, scale8)
348361 if ((0 >= calcLpAmt))
349362 then throw("Invalid calculations. LP calculated is less than zero.")
350363 else {
351364 let emitLpAmt = if (!(emitLp))
352365 then 0
353366 else calcLpAmt
354367 let amDiff = (inAmAssetAmt - calcAmAssetPmt)
355368 let prDiff = (inPrAssetAmt - calcPrAssetPmt)
356369 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))]
357370 $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEmission, lpAssetId, poolStatus, commonState, amDiff, prDiff, inAmAssetId, inPrAssetId)
358371 }
359372 }
360373 }
361374
362375
376+func calcKLp (amountBalance,priceBalance,lpEmission) = {
377+ let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 0, DOWN), scale18, lpEmission)
378+ updatedKLp
379+ }
380+
381+
382+func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
383+ let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
384+ let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
385+ let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
386+ let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
387+ let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
388+ $Tuple2(actions, updatedKLp)
389+ }
390+
391+
363392 func validateMatcherOrderAllowed (order) = {
364- let cfg = getPoolConfig()
365- let amtAssetId = cfg[idxAmtAssetId]
366- let priceAssetId = cfg[idxPriceAssetId]
367- let poolStatus = parseIntValue(cfg[idxPoolStatus])
368- let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
369- let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
370- let accAmtAssetBalance = getAccBalance(amtAssetId)
371- let accPriceAssetBalance = getAccBalance(priceAssetId)
372- let curPriceX18 = if ((order.orderType == Buy))
373- then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance)
374- else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance)
375- let curPrice = fromX18(curPriceX18, scale8)
393+ let amountAssetAmount = order.amount
394+ let priceAssetAmount = fraction(order.amount, order.price, scale8)
395+ let $t01955919771 = if ((order.orderType == Buy))
396+ then $Tuple2(amountAssetAmount, -(priceAssetAmount))
397+ else $Tuple2(-(amountAssetAmount), priceAssetAmount)
398+ let amountAssetBalanceDelta = $t01955919771._1
399+ let priceAssetBalanceDelta = $t01955919771._2
376400 if (if (if (isGlobalShutdown())
377401 then true
378- else (poolStatus == PoolMatcherDisabled))
402+ else (cfgPoolStatus == PoolMatcherDisabled))
379403 then true
380- else (poolStatus == PoolShutdown))
404+ else (cfgPoolStatus == PoolShutdown))
381405 then throw("Exchange operations disabled")
382- else {
383- let orderAmtAsset = order.assetPair.amountAsset
384- let orderAmtAssetStr = if ((orderAmtAsset == unit))
385- then "WAVES"
386- else toBase58String(value(orderAmtAsset))
387- let orderPriceAsset = order.assetPair.priceAsset
388- let orderPriceAssetStr = if ((orderPriceAsset == unit))
389- then "WAVES"
390- else toBase58String(value(orderPriceAsset))
391- if (if ((orderAmtAssetStr != amtAssetId))
392- then true
393- else (orderPriceAssetStr != priceAssetId))
394- then throw("Wrong order assets.")
395- else {
396- let orderPrice = order.price
397- let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm)
398- let castedOrderPrice = toScale(orderPrice, scale8, priceDcm)
399- let isOrderPriceValid = if ((order.orderType == Buy))
400- then (curPrice >= castedOrderPrice)
401- else (castedOrderPrice >= curPrice)
402- true
403- }
404- }
406+ else if (if ((order.assetPair.amountAsset != cfgAmountAssetId))
407+ then true
408+ else (order.assetPair.priceAsset != cfgPriceAssetId))
409+ then throw("Wrong order assets.")
410+ else {
411+ let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
412+ let $t02024220342 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
413+ let unusedActions = $t02024220342._1
414+ let kLpNew = $t02024220342._2
415+ let isOrderValid = (kLpNew > kLp)
416+ isOrderValid
417+ }
405418 }
406419
407420
408421 func commonGet (i) = if ((size(i.payments) != 1))
409422 then throw("exactly 1 payment is expected")
410423 else {
411424 let pmt = value(i.payments[0])
412425 let pmtAssetId = value(pmt.assetId)
413426 let pmtAmt = pmt.amount
414427 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
415428 let outAmAmt = res._1
416429 let outPrAmt = res._2
417430 let poolStatus = parseIntValue(res._9)
418431 let state = res._10
419432 if (if (isGlobalShutdown())
420433 then true
421434 else (poolStatus == PoolShutdown))
422435 then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
423436 else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
424437 }
425438
426439
427440 func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2))
428441 then throw("exactly 2 payments are expected")
429442 else {
430443 let amAssetPmt = value(i.payments[0])
431444 let prAssetPmt = value(i.payments[1])
432445 let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp)
433446 let poolStatus = parseIntValue(estPut._8)
434447 if (if (if (isGlobalShutdown())
435448 then true
436449 else (poolStatus == PoolPutDisabled))
437450 then true
438451 else (poolStatus == PoolShutdown))
439452 then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus)))
440453 else estPut
441454 }
442455
443456
444457 func emit (amount) = {
445458 let emitInv = invoke(factoryContract, "emit", [amount], nil)
446459 if ((emitInv == emitInv))
447460 then {
448461 let emitInvLegacy = match emitInv {
449462 case legacyFactoryContract: Address =>
450463 invoke(legacyFactoryContract, "emit", [amount], nil)
451464 case _ =>
452465 unit
453466 }
454467 if ((emitInvLegacy == emitInvLegacy))
455468 then amount
456469 else throw("Strict value is not equal to itself.")
457470 }
458471 else throw("Strict value is not equal to itself.")
459472 }
460473
461474
462475 func takeFee (amount) = {
463476 let feeAmount = fraction(amount, fee, scale8)
464477 $Tuple2((amount - feeAmount), feeAmount)
465478 }
466479
467480
468481 func calcPutOneToken (paymentAmountRaw,paymentAssetId,userAddress,txId) = {
469482 let isEval = (txId == unit)
470483 let amountBalanceRaw = getAccBalance(assetIdToString(cfgAmountAssetId))
471484 let priceBalanceRaw = getAccBalance(assetIdToString(cfgPriceAssetId))
472485 let paymentInAmountAsset = if ((paymentAssetId == cfgAmountAssetId))
473486 then true
474487 else if ((paymentAssetId == cfgPriceAssetId))
475488 then false
476489 else throwErr("invalid asset")
477- let $t02257122864 = if (isEval)
490+ let $t02302623319 = if (isEval)
478491 then $Tuple2(amountBalanceRaw, priceBalanceRaw)
479492 else if (paymentInAmountAsset)
480493 then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
481494 else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
482- let amountBalanceOld = $t02257122864._1
483- let priceBalanceOld = $t02257122864._2
484- let $t02286823017 = if (paymentInAmountAsset)
495+ let amountBalanceOld = $t02302623319._1
496+ let priceBalanceOld = $t02302623319._2
497+ let $t02332323472 = if (paymentInAmountAsset)
485498 then $Tuple2(paymentAmountRaw, 0)
486499 else $Tuple2(0, paymentAmountRaw)
487- let amountAssetAmountRaw = $t02286823017._1
488- let priceAssetAmountRaw = $t02286823017._2
500+ let amountAssetAmountRaw = $t02332323472._1
501+ let priceAssetAmountRaw = $t02332323472._2
489502 let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
490503 let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
491- let $t02313923198 = takeFee(paymentAmountRaw)
492- let paymentAmount = $t02313923198._1
493- let feeAmount = $t02313923198._2
504+ let $t02359423653 = takeFee(paymentAmountRaw)
505+ let paymentAmount = $t02359423653._1
506+ let feeAmount = $t02359423653._2
494507 let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
495508 let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
496509 let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
497510 let priceNew = fromX18(priceNewX18, scale8)
498511 let paymentBalance = if (paymentInAmountAsset)
499512 then amountBalanceOld
500513 else priceBalanceOld
501514 let paymentBalanceBigInt = toBigInt(paymentBalance)
502515 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
503516 let chechSupply = if ((supplyBigInt > big0))
504517 then true
505518 else throwErr("initial deposit requires all coins")
506519 if ((chechSupply == chechSupply))
507520 then {
508521 let depositBigInt = toBigInt(paymentAmount)
509522 let issueAmount = max([0, toInt(((supplyBigInt * (sqrtBigInt((scale18 + ((depositBigInt * scale18) / paymentBalanceBigInt)), 18, 18, DOWN) - scale18)) / scale18))])
510523 let commonState = if (isEval)
511524 then nil
512525 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))]
513526 let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
514527 let priceOld = fromX18(priceOldX18, scale8)
515528 let loss = {
516- let $t02467524842 = if (paymentInAmountAsset)
529+ let $t02513025297 = if (paymentInAmountAsset)
517530 then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
518531 else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
519- let amount = $t02467524842._1
520- let balance = $t02467524842._2
532+ let amount = $t02513025297._1
533+ let balance = $t02513025297._2
521534 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
522535 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
523536 }
524- $Tuple4(issueAmount, commonState, feeAmount, loss)
537+ $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset)
525538 }
526539 else throw("Strict value is not equal to itself.")
527540 }
528541
529542
530543 func calcGetOneToken (outAssetId,paymentAmount,paymentAssetId,userAddress,txId) = {
531544 let isEval = (txId == unit)
532545 let checks = [if ((paymentAssetId == cfgLpAssetId))
533546 then true
534547 else throwErr("invalid lp asset")]
535548 if ((checks == checks))
536549 then {
537550 let outInAmountAsset = if ((outAssetId == cfgAmountAssetId))
538551 then true
539552 else if ((outAssetId == cfgPriceAssetId))
540553 then false
541554 else throwErr("invalid asset")
542555 let balanceBigInt = if (outInAmountAsset)
543556 then toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId)))
544557 else toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId)))
545558 let amBalanceOld = getAccBalance(assetIdToString(cfgAmountAssetId))
546559 let prBalanceOld = getAccBalance(assetIdToString(cfgPriceAssetId))
547560 let outBalance = if (outInAmountAsset)
548561 then amBalanceOld
549562 else prBalanceOld
550563 let outBalanceBigInt = toBigInt(outBalance)
551564 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
552565 let redeemedBigInt = toBigInt(paymentAmount)
553566 let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
554- let $t02642226472 = takeFee(amountRaw)
555- let totalAmount = $t02642226472._1
556- let feeAmount = $t02642226472._2
557- let $t02647626702 = if (outInAmountAsset)
567+ let $t02689926949 = takeFee(amountRaw)
568+ let totalAmount = $t02689926949._1
569+ let feeAmount = $t02689926949._2
570+ let $t02695327179 = if (outInAmountAsset)
558571 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
559572 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
560- let outAmAmount = $t02647626702._1
561- let outPrAmount = $t02647626702._2
562- let amBalanceNew = $t02647626702._3
563- let prBalanceNew = $t02647626702._4
573+ let outAmAmount = $t02695327179._1
574+ let outPrAmount = $t02695327179._2
575+ let amBalanceNew = $t02695327179._3
576+ let prBalanceNew = $t02695327179._4
564577 let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
565578 let priceNew = fromX18(priceNewX18, scale8)
566579 let commonState = if (isEval)
567580 then nil
568581 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)]
569582 let priceOldX18 = calcPriceBigInt(toX18(prBalanceOld, cfgPriceAssetDecimals), toX18(amBalanceOld, cfgAmountAssetDecimals))
570583 let priceOld = fromX18(priceOldX18, scale8)
571584 let loss = {
572585 let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2)
573586 fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset)
574587 }
575- $Tuple4(totalAmount, commonState, feeAmount, loss)
588+ $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset)
576589 }
577590 else throw("Strict value is not equal to itself.")
578591 }
579592
580593
581594 func managerPublicKeyOrUnit () = match getString(mpk()) {
582595 case s: String =>
583596 fromBase58String(s)
584597 case _: Unit =>
585598 unit
586599 case _ =>
587600 throw("Match error")
588601 }
589602
590603
591604 func pendingManagerPublicKeyOrUnit () = match getString(pmpk()) {
592605 case s: String =>
593606 fromBase58String(s)
594607 case _: Unit =>
595608 unit
596609 case _ =>
597610 throw("Match error")
598611 }
599612
600613
601614 func isManager (i) = match managerPublicKeyOrUnit() {
602615 case pk: ByteVector =>
603616 (i.callerPublicKey == pk)
604617 case _: Unit =>
605618 (i.caller == this)
606619 case _ =>
607620 throw("Match error")
608621 }
609622
610623
611624 func mustManager (i) = {
612625 let pd = throw("Permission denied")
613626 match managerPublicKeyOrUnit() {
614627 case pk: ByteVector =>
615628 if ((i.callerPublicKey == pk))
616629 then true
617630 else pd
618631 case _: Unit =>
619632 if ((i.caller == this))
620633 then true
621634 else pd
622635 case _ =>
623636 throw("Match error")
624637 }
625638 }
626639
627640
628641 @Callable(i)
629642 func setManager (pendingManagerPublicKey) = {
630643 let checkCaller = mustManager(i)
631644 if ((checkCaller == checkCaller))
632645 then {
633646 let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
634647 if ((checkManagerPublicKey == checkManagerPublicKey))
635648 then [StringEntry(pmpk(), pendingManagerPublicKey)]
636649 else throw("Strict value is not equal to itself.")
637650 }
638651 else throw("Strict value is not equal to itself.")
639652 }
640653
641654
642655
643656 @Callable(i)
644657 func confirmManager () = {
645658 let pm = pendingManagerPublicKeyOrUnit()
646659 let hasPM = if (isDefined(pm))
647660 then true
648661 else throw("No pending manager")
649662 if ((hasPM == hasPM))
650663 then {
651664 let checkPM = if ((i.callerPublicKey == value(pm)))
652665 then true
653666 else throw("You are not pending manager")
654667 if ((checkPM == checkPM))
655668 then [StringEntry(mpk(), toBase58String(value(pm))), DeleteEntry(pmpk())]
656669 else throw("Strict value is not equal to itself.")
657670 }
658671 else throw("Strict value is not equal to itself.")
659672 }
660673
661674
662675
663676 @Callable(i)
664677 func put (slippageTolerance,shouldAutoStake) = if ((0 > slippageTolerance))
665678 then throw("Invalid slippageTolerance passed")
666679 else {
667680 let estPut = commonPut(i, slippageTolerance, true)
668681 let emitLpAmt = estPut._2
669682 let lpAssetId = estPut._7
670683 let state = estPut._9
671684 let amDiff = estPut._10
672685 let prDiff = estPut._11
673686 let amId = estPut._12
674687 let prId = estPut._13
675688 let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
676689 if ((emitInv == emitInv))
677690 then {
678691 let emitInvLegacy = match emitInv {
679692 case legacyFactoryContract: Address =>
680693 invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
681694 case _ =>
682695 unit
683696 }
684697 if ((emitInvLegacy == emitInvLegacy))
685698 then {
686699 let slippageAInv = if ((amDiff > 0))
687700 then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
688701 else nil
689702 if ((slippageAInv == slippageAInv))
690703 then {
691704 let slippagePInv = if ((prDiff > 0))
692705 then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
693706 else nil
694707 if ((slippagePInv == slippagePInv))
695708 then {
696709 let lpTransfer = if (shouldAutoStake)
697710 then {
698711 let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
699712 if ((slpStakeInv == slpStakeInv))
700713 then nil
701714 else throw("Strict value is not equal to itself.")
702715 }
703716 else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
704- (state ++ lpTransfer)
717+ let $t03113031195 = refreshKLpInternal(0, 0, 0)
718+ let refreshKLpActions = $t03113031195._1
719+ let updatedKLp = $t03113031195._2
720+ ((state ++ lpTransfer) ++ refreshKLpActions)
705721 }
706722 else throw("Strict value is not equal to itself.")
707723 }
708724 else throw("Strict value is not equal to itself.")
709725 }
710726 else throw("Strict value is not equal to itself.")
711727 }
712728 else throw("Strict value is not equal to itself.")
713729 }
714730
715731
716732
717733 @Callable(i)
718734 func putForFree (maxSlippage) = if ((0 > maxSlippage))
719735 then throw("Invalid value passed")
720736 else {
721737 let estPut = commonPut(i, maxSlippage, false)
722- estPut._9
738+ let state = estPut._9
739+ let $t03148131546 = refreshKLpInternal(0, 0, 0)
740+ let refreshKLpActions = $t03148131546._1
741+ let updatedKLp = $t03148131546._2
742+ (state ++ refreshKLpActions)
723743 }
724744
725745
726746
727747 @Callable(i)
728748 func putOneTkn (minOutAmount,autoStake) = {
729749 let isPoolOneTokenOperationsDisabled = {
730750 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
731751 if ($isInstanceOf(@, "Boolean"))
732752 then @
733753 else throw(($getType(@) + " couldn't be cast to Boolean"))
734754 }
735755 let isPutDisabled = if (if (if (isGlobalShutdown())
736756 then true
737757 else (cfgPoolStatus == PoolPutDisabled))
738758 then true
739759 else (cfgPoolStatus == PoolShutdown))
740760 then true
741761 else isPoolOneTokenOperationsDisabled
742762 let checks = [if (if (!(isPutDisabled))
743763 then true
744764 else isManager(i))
745765 then true
746766 else throwErr("put operation is blocked by admin"), if ((size(i.payments) == 1))
747767 then true
748768 else throwErr("exactly 1 payment are expected")]
749769 if ((checks == checks))
750770 then {
751771 let payment = i.payments[0]
752772 let paymentAssetId = payment.assetId
753773 let paymentAmountRaw = payment.amount
754774 let userAddress = i.caller
755775 let txId = i.transactionId
756- let $t03160931736 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
757- let emitAmountEstimated = $t03160931736._1
758- let commonState = $t03160931736._2
759- let feeAmount = $t03160931736._3
760- let bonus = $t03160931736._4
761- let emitAmount = if (if ((minOutAmount > 0))
762- then (minOutAmount > emitAmountEstimated)
763- else false)
764- then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
765- else emitAmountEstimated
766- let emitInv = emit(emitAmount)
767- if ((emitInv == emitInv))
776+ let $t03232232474 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
777+ if (($t03232232474 == $t03232232474))
768778 then {
769- let lpTransfer = if (autoStake)
779+ let paymentInAmountAsset = $t03232232474._5
780+ let bonus = $t03232232474._4
781+ let feeAmount = $t03232232474._3
782+ let commonState = $t03232232474._2
783+ let emitAmountEstimated = $t03232232474._1
784+ let emitAmount = if (if ((minOutAmount > 0))
785+ then (minOutAmount > emitAmountEstimated)
786+ else false)
787+ then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
788+ else emitAmountEstimated
789+ let emitInv = emit(emitAmount)
790+ if ((emitInv == emitInv))
770791 then {
771- let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
772- if ((stakeInv == stakeInv))
773- then nil
774- else throw("Strict value is not equal to itself.")
792+ let lpTransfer = if (autoStake)
793+ then {
794+ let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
795+ if ((stakeInv == stakeInv))
796+ then nil
797+ else throw("Strict value is not equal to itself.")
798+ }
799+ else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
800+ let sendFee = if ((feeAmount > 0))
801+ then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
802+ else nil
803+ let $t03306033257 = if ((this == feeCollectorAddress))
804+ then $Tuple2(0, 0)
805+ else if (paymentInAmountAsset)
806+ then $Tuple2(-(feeAmount), 0)
807+ else $Tuple2(0, -(feeAmount))
808+ let amountAssetBalanceDelta = $t03306033257._1
809+ let priceAssetBalanceDelta = $t03306033257._2
810+ let $t03326033368 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
811+ let refreshKLpActions = $t03326033368._1
812+ let updatedKLp = $t03326033368._2
813+ $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
775814 }
776- else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
777- let sendFee = if ((feeAmount > 0))
778- then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
779- else nil
780- $Tuple2(((commonState ++ lpTransfer) ++ sendFee), emitAmount)
815+ else throw("Strict value is not equal to itself.")
781816 }
782817 else throw("Strict value is not equal to itself.")
783818 }
784819 else throw("Strict value is not equal to itself.")
785820 }
786821
787822
788823
789824 @Callable(i)
790825 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
791- let $t03246532600 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
792- let emitAmountEstimated = $t03246532600._1
793- let commonState = $t03246532600._2
794- let feeAmount = $t03246532600._3
795- let bonus = $t03246532600._4
826+ let $t03356133718 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
827+ let emitAmountEstimated = $t03356133718._1
828+ let commonState = $t03356133718._2
829+ let feeAmount = $t03356133718._3
830+ let bonus = $t03356133718._4
831+ let paymentInAmountAsset = $t03356133718._5
796832 $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
797833 }
798834
799835
800836
801837 @Callable(i)
802838 func getOneTkn (outAssetIdStr,minOutAmount) = {
803839 let isPoolOneTokenOperationsDisabled = {
804840 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
805841 if ($isInstanceOf(@, "Boolean"))
806842 then @
807843 else throw(($getType(@) + " couldn't be cast to Boolean"))
808844 }
809845 let isGetDisabled = if (if (isGlobalShutdown())
810846 then true
811847 else (cfgPoolStatus == PoolShutdown))
812848 then true
813849 else isPoolOneTokenOperationsDisabled
814850 let checks = [if (if (!(isGetDisabled))
815851 then true
816852 else isManager(i))
817853 then true
818854 else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 1))
819855 then true
820856 else throwErr("exactly 1 payment are expected")]
821857 if ((checks == checks))
822858 then {
823859 let outAssetId = parseAssetId(outAssetIdStr)
824860 let payment = i.payments[0]
825861 let paymentAssetId = payment.assetId
826862 let paymentAmount = payment.amount
827863 let userAddress = i.caller
828864 let txId = i.transactionId
829- let $t03340533537 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
830- let amountEstimated = $t03340533537._1
831- let commonState = $t03340533537._2
832- let feeAmount = $t03340533537._3
833- let bonus = $t03340533537._4
834- let amount = if (if ((minOutAmount > 0))
835- then (minOutAmount > amountEstimated)
836- else false)
837- then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
838- else amountEstimated
839- let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
840- if ((burnInv == burnInv))
865+ let $t03452334676 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
866+ if (($t03452334676 == $t03452334676))
841867 then {
842- let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
843- let sendFee = if ((feeAmount > 0))
844- then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
845- else nil
846- $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount)
868+ let outInAmountAsset = $t03452334676._5
869+ let bonus = $t03452334676._4
870+ let feeAmount = $t03452334676._3
871+ let commonState = $t03452334676._2
872+ let amountEstimated = $t03452334676._1
873+ let amount = if (if ((minOutAmount > 0))
874+ then (minOutAmount > amountEstimated)
875+ else false)
876+ then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
877+ else amountEstimated
878+ let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
879+ if ((burnInv == burnInv))
880+ then {
881+ let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
882+ let sendFee = if ((feeAmount > 0))
883+ then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
884+ else nil
885+ let $t03517635423 = {
886+ let feeAmountForCalc = if ((this == feeCollectorAddress))
887+ then 0
888+ else feeAmount
889+ if (outInAmountAsset)
890+ then $Tuple2(-((amount + feeAmountForCalc)), 0)
891+ else $Tuple2(0, -((amount + feeAmountForCalc)))
892+ }
893+ let amountAssetBalanceDelta = $t03517635423._1
894+ let priceAssetBalanceDelta = $t03517635423._2
895+ let $t03542635534 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
896+ let refreshKLpActions = $t03542635534._1
897+ let updatedKLp = $t03542635534._2
898+ $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
899+ }
900+ else throw("Strict value is not equal to itself.")
847901 }
848902 else throw("Strict value is not equal to itself.")
849903 }
850904 else throw("Strict value is not equal to itself.")
851905 }
852906
853907
854908
855909 @Callable(i)
856910 func getOneTknREADONLY (outAssetId,paymentAmount) = {
857- let $t03417234310 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
858- let amountEstimated = $t03417234310._1
859- let commonState = $t03417234310._2
860- let feeAmount = $t03417234310._3
861- let bonus = $t03417234310._4
911+ let $t03571835874 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
912+ let amountEstimated = $t03571835874._1
913+ let commonState = $t03571835874._2
914+ let feeAmount = $t03571835874._3
915+ let bonus = $t03571835874._4
916+ let outInAmountAsset = $t03571835874._5
862917 $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
863918 }
864919
865920
866921
867922 @Callable(i)
868923 func unstakeAndGetOneTkn (unstakeAmount,outAssetIdStr,minOutAmount) = {
869924 let isPoolOneTokenOperationsDisabled = {
870925 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
871926 if ($isInstanceOf(@, "Boolean"))
872927 then @
873928 else throw(($getType(@) + " couldn't be cast to Boolean"))
874929 }
875930 let isGetDisabled = if (if (isGlobalShutdown())
876931 then true
877932 else (cfgPoolStatus == PoolShutdown))
878933 then true
879934 else isPoolOneTokenOperationsDisabled
880935 let checks = [if (if (!(isGetDisabled))
881936 then true
882937 else isManager(i))
883938 then true
884939 else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 0))
885940 then true
886941 else throwErr("no payments are expected")]
887942 if ((checks == checks))
888943 then {
889944 let outAssetId = parseAssetId(outAssetIdStr)
890945 let userAddress = i.caller
891946 let txId = i.transactionId
892947 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
893948 if ((unstakeInv == unstakeInv))
894949 then {
895- let $t03513535265 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
896- let amountEstimated = $t03513535265._1
897- let commonState = $t03513535265._2
898- let feeAmount = $t03513535265._3
899- let bonus = $t03513535265._4
900- let amount = if (if ((minOutAmount > 0))
901- then (minOutAmount > amountEstimated)
902- else false)
903- then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
904- else amountEstimated
905- let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
906- if ((burnInv == burnInv))
950+ let $t03669936850 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
951+ if (($t03669936850 == $t03669936850))
907952 then {
908- let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
909- let sendFee = if ((feeAmount > 0))
910- then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
911- else nil
912- $Tuple2(((commonState ++ assetTransfer) ++ sendFee), amount)
953+ let outInAmountAsset = $t03669936850._5
954+ let bonus = $t03669936850._4
955+ let feeAmount = $t03669936850._3
956+ let commonState = $t03669936850._2
957+ let amountEstimated = $t03669936850._1
958+ let amount = if (if ((minOutAmount > 0))
959+ then (minOutAmount > amountEstimated)
960+ else false)
961+ then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
962+ else amountEstimated
963+ let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
964+ if ((burnInv == burnInv))
965+ then {
966+ let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
967+ let sendFee = if ((feeAmount > 0))
968+ then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
969+ else nil
970+ let $t03734537592 = {
971+ let feeAmountForCalc = if ((this == feeCollectorAddress))
972+ then 0
973+ else feeAmount
974+ if (outInAmountAsset)
975+ then $Tuple2(-((amount + feeAmountForCalc)), 0)
976+ else $Tuple2(0, -((amount + feeAmountForCalc)))
977+ }
978+ let amountAssetBalanceDelta = $t03734537592._1
979+ let priceAssetBalanceDelta = $t03734537592._2
980+ let $t03759537703 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
981+ let refreshKLpActions = $t03759537703._1
982+ let updatedKLp = $t03759537703._2
983+ $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
984+ }
985+ else throw("Strict value is not equal to itself.")
913986 }
914987 else throw("Strict value is not equal to itself.")
915988 }
916989 else throw("Strict value is not equal to itself.")
917990 }
918991 else throw("Strict value is not equal to itself.")
919992 }
920993
921994
922995
923996 @Callable(i)
924997 func get () = {
925998 let res = commonGet(i)
926999 let outAmtAmt = res._1
9271000 let outPrAmt = res._2
9281001 let pmtAmt = res._3
9291002 let pmtAssetId = res._4
9301003 let state = res._5
9311004 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
9321005 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
933- then state
1006+ then {
1007+ let $t03849538577 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1008+ let refreshKLpActions = $t03849538577._1
1009+ let updatedKLp = $t03849538577._2
1010+ (state ++ refreshKLpActions)
1011+ }
9341012 else throw("Strict value is not equal to itself.")
9351013 }
9361014
9371015
9381016
9391017 @Callable(i)
9401018 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
9411019 let res = commonGet(i)
9421020 let outAmAmt = res._1
9431021 let outPrAmt = res._2
9441022 let pmtAmt = res._3
9451023 let pmtAssetId = res._4
9461024 let state = res._5
9471025 if ((noLessThenAmtAsset > outAmAmt))
9481026 then throw(((("noLessThenAmtAsset failed: " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
9491027 else if ((noLessThenPriceAsset > outPrAmt))
9501028 then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
9511029 else {
9521030 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
9531031 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
954- then state
1032+ then {
1033+ let $t03937339454 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1034+ let refreshKLpActions = $t03937339454._1
1035+ let updatedKLp = $t03937339454._2
1036+ (state ++ refreshKLpActions)
1037+ }
9551038 else throw("Strict value is not equal to itself.")
9561039 }
9571040 }
9581041
9591042
9601043
9611044 @Callable(i)
9621045 func unstakeAndGet (amount) = {
9631046 let checkPayments = if ((size(i.payments) != 0))
9641047 then throw("No payments are expected")
9651048 else true
9661049 if ((checkPayments == checkPayments))
9671050 then {
9681051 let cfg = getPoolConfig()
9691052 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
9701053 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
9711054 if ((unstakeInv == unstakeInv))
9721055 then {
9731056 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
1057+ let outAmAmt = res._1
1058+ let outPrAmt = res._2
9741059 let poolStatus = parseIntValue(res._9)
9751060 let state = res._10
9761061 let checkPoolStatus = if (if (isGlobalShutdown())
9771062 then true
9781063 else (poolStatus == PoolShutdown))
9791064 then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
9801065 else true
9811066 if ((checkPoolStatus == checkPoolStatus))
9821067 then {
9831068 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
9841069 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
985- then state
1070+ then {
1071+ let $t04042740508 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1072+ let refreshKLpActions = $t04042740508._1
1073+ let updatedKLp = $t04042740508._2
1074+ (state ++ refreshKLpActions)
1075+ }
9861076 else throw("Strict value is not equal to itself.")
9871077 }
9881078 else throw("Strict value is not equal to itself.")
9891079 }
9901080 else throw("Strict value is not equal to itself.")
9911081 }
9921082 else throw("Strict value is not equal to itself.")
9931083 }
9941084
9951085
9961086
9971087 @Callable(i)
9981088 func unstakeAndGetNoLess (unstakeAmount,noLessThenAmountAsset,noLessThenPriceAsset) = {
9991089 let isGetDisabled = if (isGlobalShutdown())
10001090 then true
10011091 else (cfgPoolStatus == PoolShutdown)
10021092 let checks = [if (!(isGetDisabled))
10031093 then true
10041094 else throw("get operation is blocked by admin"), if ((size(i.payments) == 0))
10051095 then true
10061096 else throw("no payments are expected")]
10071097 if ((checks == checks))
10081098 then {
10091099 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
10101100 if ((unstakeInv == unstakeInv))
10111101 then {
10121102 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(cfgLpAssetId), unstakeAmount, i.caller)
10131103 let outAmAmt = res._1
10141104 let outPrAmt = res._2
10151105 let state = res._10
10161106 let checkAmounts = [if ((outAmAmt >= noLessThenAmountAsset))
10171107 then true
10181108 else throw(makeString(["amount asset amount to receive is less than ", toString(noLessThenAmountAsset)], "")), if ((outPrAmt >= noLessThenPriceAsset))
10191109 then true
10201110 else throw(makeString(["price asset amount to receive is less than ", toString(noLessThenPriceAsset)], ""))]
10211111 if ((checkAmounts == checkAmounts))
10221112 then {
10231113 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
10241114 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
1025- then state
1115+ then {
1116+ let $t04164841729 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1117+ let refreshKLpActions = $t04164841729._1
1118+ let updatedKLp = $t04164841729._2
1119+ (state ++ refreshKLpActions)
1120+ }
10261121 else throw("Strict value is not equal to itself.")
10271122 }
10281123 else throw("Strict value is not equal to itself.")
10291124 }
10301125 else throw("Strict value is not equal to itself.")
10311126 }
10321127 else throw("Strict value is not equal to itself.")
10331128 }
10341129
10351130
10361131
10371132 @Callable(i)
10381133 func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
10391134 then throw("permissions denied")
10401135 else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success")
1136+
1137+
1138+
1139+@Callable(i)
1140+func refreshKLp () = {
1141+ let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0)
1142+ let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay))
1143+ then unit
1144+ else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], ""))
1145+ if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
1146+ then {
1147+ let $t04271742772 = refreshKLpInternal(0, 0, 0)
1148+ let actions = $t04271742772._1
1149+ let updatedKLp = $t04271742772._2
1150+ $Tuple2(actions, toString(updatedKLp))
1151+ }
1152+ else throw("Strict value is not equal to itself.")
1153+ }
10411154
10421155
10431156
10441157 @Callable(i)
10451158 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig())
10461159
10471160
10481161
10491162 @Callable(i)
10501163 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
10511164
10521165
10531166
10541167 @Callable(i)
10551168 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
10561169 let prices = calcPrices(amAmt, prAmt, lpAmt)
10571170 $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])])
10581171 }
10591172
10601173
10611174
10621175 @Callable(i)
10631176 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult)))
10641177
10651178
10661179
10671180 @Callable(i)
10681181 func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult))
10691182
10701183
10711184
10721185 @Callable(i)
10731186 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
10741187
10751188
10761189
10771190 @Callable(i)
10781191 func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp))
10791192
10801193
10811194
10821195 @Callable(i)
10831196 func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
10841197 let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress))
10851198 $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10))
10861199 }
10871200
10881201
10891202
10901203 @Callable(i)
10911204 func statsREADONLY () = {
10921205 let cfg = getPoolConfig()
10931206 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
10941207 let amtAssetId = cfg[idxAmtAssetId]
10951208 let priceAssetId = cfg[idxPriceAssetId]
10961209 let iAmtAssetId = cfg[idxIAmtAssetId]
10971210 let iPriceAssetId = cfg[idxIPriceAssetId]
10981211 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
10991212 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
11001213 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
11011214 let accAmtAssetBalance = getAccBalance(amtAssetId)
11021215 let accPriceAssetBalance = getAccBalance(priceAssetId)
11031216 let pricesList = if ((poolLPBalance == 0))
11041217 then [zeroBigInt, zeroBigInt, zeroBigInt]
11051218 else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance)
11061219 let curPrice = 0
11071220 let lpAmtAssetShare = fromX18(pricesList[1], scale8)
11081221 let lpPriceAssetShare = fromX18(pricesList[2], scale8)
11091222 let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this))))
11101223 $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))
11111224 }
11121225
11131226
11141227
11151228 @Callable(i)
11161229 func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = {
11171230 let cfg = getPoolConfig()
11181231 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
11191232 let amAssetIdStr = cfg[idxAmtAssetId]
11201233 let amAssetId = fromBase58String(amAssetIdStr)
11211234 let prAssetIdStr = cfg[idxPriceAssetId]
11221235 let prAssetId = fromBase58String(prAssetIdStr)
11231236 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
11241237 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
11251238 let poolStatus = cfg[idxPoolStatus]
11261239 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
11271240 let accAmtAssetBalance = getAccBalance(amAssetIdStr)
11281241 let accPriceAssetBalance = getAccBalance(prAssetIdStr)
11291242 let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm)
11301243 let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm)
11311244 let curPriceX18 = if ((poolLPBalance == 0))
11321245 then zeroBigInt
11331246 else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
11341247 let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
11351248 let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
11361249 let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm)
11371250 let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
11381251 let calcLpAmt = estPut._1
11391252 let curPriceCalc = estPut._3
11401253 let amBalance = estPut._4
11411254 let prBalance = estPut._5
11421255 let lpEmission = estPut._6
11431256 $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))
11441257 }
11451258
11461259
11471260
11481261 @Callable(i)
11491262 func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = {
11501263 let cfg = getPoolConfig()
11511264 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
11521265 let amAssetIdStr = cfg[idxAmtAssetId]
11531266 let amAssetId = fromBase58String(amAssetIdStr)
11541267 let prAssetIdStr = cfg[idxPriceAssetId]
11551268 let prAssetId = fromBase58String(prAssetIdStr)
11561269 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
11571270 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
11581271 let poolStatus = cfg[idxPoolStatus]
11591272 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
11601273 let amBalanceRaw = getAccBalance(amAssetIdStr)
11611274 let prBalanceRaw = getAccBalance(prAssetIdStr)
11621275 let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm)
11631276 let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm)
11641277 let curPriceX18 = if ((poolLPBalance == 0))
11651278 then zeroBigInt
11661279 else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18)
11671280 let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
11681281 let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
11691282 let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm)
11701283 let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
11711284 let calcLpAmt = estPut._1
11721285 let curPriceCalc = estPut._3
11731286 let amBalance = estPut._4
11741287 let prBalance = estPut._5
11751288 let lpEmission = estPut._6
11761289 $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))
11771290 }
11781291
11791292
11801293
11811294 @Callable(i)
11821295 func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
11831296 let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this)
11841297 let outAmAmt = res._1
11851298 let outPrAmt = res._2
11861299 let amBalance = res._5
11871300 let prBalance = res._6
11881301 let lpEmission = res._7
11891302 let curPrice = res._8
11901303 let poolStatus = parseIntValue(res._9)
11911304 $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))
11921305 }
11931306
11941307
11951308 @Verifier(tx)
11961309 func verify () = {
11971310 let targetPublicKey = match managerPublicKeyOrUnit() {
11981311 case pk: ByteVector =>
11991312 pk
12001313 case _: Unit =>
12011314 tx.senderPublicKey
12021315 case _ =>
12031316 throw("Match error")
12041317 }
12051318 match tx {
12061319 case order: Order =>
12071320 let matcherPub = getMatcherPubOrFail()
12081321 let orderValid = validateMatcherOrderAllowed(order)
12091322 let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
12101323 let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
12111324 if (if (if (orderValid)
12121325 then senderValid
12131326 else false)
12141327 then matcherValid
12151328 else false)
12161329 then true
12171330 else throwOrderError(orderValid, senderValid, matcherValid)
12181331 case s: SetScriptTransaction =>
12191332 let newHash = blake2b256(value(s.script))
12201333 let allowedHash = fromBase64String(value(getString(factoryContract, keyAllowedLpScriptHash())))
12211334 let currentHash = scriptHash(this)
12221335 if (if ((allowedHash == newHash))
12231336 then (currentHash != newHash)
12241337 else false)
12251338 then true
12261339 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
12271340 case _ =>
12281341 sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
12291342 }
12301343 }
12311344

github/deemru/w8io/026f985 
147.02 ms