tx · HYVK9BDTDqQ48tZ49EPDTQnjjT3BmJmmZzAvSNZJEV9o

3N6VuZMbPQQ9LjuAGMzCKSBKNZdXdVMqzuy:  -0.03500000 Waves

2022.12.07 12:23 [2349743] smart account 3N6VuZMbPQQ9LjuAGMzCKSBKNZdXdVMqzuy > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HYVK9BDTDqQ48tZ49EPDTQnjjT3BmJmmZzAvSNZJEV9o",
    "fee": 3500000,
    "feeAssetId": null,
    "timestamp": 1670405007438,
    "version": 1,
    "sender": "3N6VuZMbPQQ9LjuAGMzCKSBKNZdXdVMqzuy",
    "senderPublicKey": "EBrsNJxDcF3dp4oPjbdRu1B95ZcFy6ruHsGywkaD73hN",
    "proofs": [
        "3EjhMX6GEM18n24dPQPjqEVjqvffhuxDozBPidkAxhXa1VT1f5EhEhoNH9yMupbUJRCJpA7A6K844dqftMsbdHQL"
    ],
    "script": "base64:BgLfLAgCEgMKAQgSABIECgIBBBIDCgEBEgQKAgEEEgQKAggBEgQKAggBEgQKAggBEgUKAwEIARIAEgQKAgEBEgMKAQESBQoDAQEBEgQKAggIEgASABIDCgEIEgUKAwEBARIECgIBARIECgIIARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCBIAEgMKAQESAwoBARIECgIIASIKbFBkZWNpbWFscyIGc2NhbGU4IgxzY2FsZThCaWdJbnQiB3NjYWxlMTgiCnplcm9CaWdJbnQiBGJpZzAiBGJpZzEiBGJpZzIiC3dhdmVzU3RyaW5nIgNTRVAiClBvb2xBY3RpdmUiD1Bvb2xQdXREaXNhYmxlZCITUG9vbE1hdGNoZXJEaXNhYmxlZCIMUG9vbFNodXRkb3duIg5pZHhQb29sQWRkcmVzcyINaWR4UG9vbFN0YXR1cyIQaWR4UG9vbExQQXNzZXRJZCINaWR4QW10QXNzZXRJZCIPaWR4UHJpY2VBc3NldElkIg5pZHhBbXRBc3NldERjbSIQaWR4UHJpY2VBc3NldERjbSIOaWR4SUFtdEFzc2V0SWQiEGlkeElQcmljZUFzc2V0SWQiDWlkeExQQXNzZXREY20iEmlkeFBvb2xBbXRBc3NldEFtdCIUaWR4UG9vbFByaWNlQXNzZXRBbXQiEWlkeFBvb2xMUEFzc2V0QW10IhlpZHhGYWN0b3J5U3Rha2luZ0NvbnRyYWN0IhppZHhGYWN0b3J5U2xpcHBhZ2VDb250cmFjdCIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiA3ZhbCIPcmVzdWx0U2NhbGVNdWx0Igd0b1NjYWxlIgNhbXQiCHJlc1NjYWxlIghjdXJTY2FsZSIDYWJzIglhYnNCaWdJbnQiAmZjIgNtcGsiBHBtcGsiAnBsIgJwaCIBaCIJdGltZXN0YW1wIgNwYXUiC3VzZXJBZGRyZXNzIgR0eElkIgNnYXUiAmFhIgJwYSIGa2V5RmVlIgpmZWVEZWZhdWx0IgNmZWUiBmtleUtMcCIVa2V5S0xwUmVmcmVzaGVkSGVpZ2h0IhJrZXlLTHBSZWZyZXNoRGVsYXkiFmtMcFJlZnJlc2hEZWxheURlZmF1bHQiD2tMcFJlZnJlc2hEZWxheSIQa2V5RmFjdG9yeUNvbmZpZyINa2V5TWF0Y2hlclB1YiIpa2V5TWFwcGluZ1Bvb2xDb250cmFjdEFkZHJlc3NUb1Bvb2xBc3NldHMiE3Bvb2xDb250cmFjdEFkZHJlc3MiDWtleVBvb2xDb25maWciCWlBbXRBc3NldCILaVByaWNlQXNzZXQiH2tleU1hcHBpbmdzQmFzZUFzc2V0MmludGVybmFsSWQiDGJhc2VBc3NldFN0ciITa2V5QWxsUG9vbHNTaHV0ZG93biINa2V5UG9vbFdlaWdodCIPY29udHJhY3RBZGRyZXNzIhZrZXlBbGxvd2VkTHBTY3JpcHRIYXNoIhZrZXlGZWVDb2xsZWN0b3JBZGRyZXNzIg90aHJvd09yZGVyRXJyb3IiCm9yZGVyVmFsaWQiC3NlbmRlclZhbGlkIgxtYXRjaGVyVmFsaWQiD2dldFN0cmluZ09yRmFpbCIHYWRkcmVzcyIDa2V5IgxnZXRJbnRPckZhaWwiCHRocm93RXJyIgNtc2ciBmZtdEVyciIPZmFjdG9yeUNvbnRyYWN0IhNmZWVDb2xsZWN0b3JBZGRyZXNzIhBpc0dsb2JhbFNodXRkb3duIhNnZXRNYXRjaGVyUHViT3JGYWlsIg1nZXRQb29sQ29uZmlnIghhbXRBc3NldCIKcHJpY2VBc3NldCIMcGFyc2VBc3NldElkIgVpbnB1dCIPYXNzZXRJZFRvU3RyaW5nIg9wYXJzZVBvb2xDb25maWciCnBvb2xDb25maWciEHBvb2xDb25maWdQYXJzZWQiCyR0MDc5MTU4MDgxIg5jZmdQb29sQWRkcmVzcyINY2ZnUG9vbFN0YXR1cyIMY2ZnTHBBc3NldElkIhBjZmdBbW91bnRBc3NldElkIg9jZmdQcmljZUFzc2V0SWQiFmNmZ0Ftb3VudEFzc2V0RGVjaW1hbHMiFWNmZ1ByaWNlQXNzZXREZWNpbWFscyIQZ2V0RmFjdG9yeUNvbmZpZyIPc3Rha2luZ0NvbnRyYWN0IhBzbGlwcGFnZUNvbnRyYWN0IhFkYXRhUHV0QWN0aW9uSW5mbyINaW5BbXRBc3NldEFtdCIPaW5QcmljZUFzc2V0QW10IghvdXRMcEFtdCIFcHJpY2UiHXNsaXBwYWdlVG9sZXJhbmNlUGFzc2VkQnlVc2VyIhVzbGlwcGFnZVRvbGVyYW5jZVJlYWwiCHR4SGVpZ2h0Igt0eFRpbWVzdGFtcCISc2xpcGFnZUFtdEFzc2V0QW10IhRzbGlwYWdlUHJpY2VBc3NldEFtdCIRZGF0YUdldEFjdGlvbkluZm8iDm91dEFtdEFzc2V0QW10IhBvdXRQcmljZUFzc2V0QW10IgdpbkxwQW10Ig1nZXRBY2NCYWxhbmNlIgdhc3NldElkIg9jYWxjUHJpY2VCaWdJbnQiCHByQW10WDE4IghhbUFtdFgxOCIQcHJpdmF0ZUNhbGNQcmljZSIKYW1Bc3NldERjbSIKcHJBc3NldERjbSIFYW1BbXQiBXByQW10Ig5hbXRBc3NldEFtdFgxOCIQcHJpY2VBc3NldEFtdFgxOCIKY2FsY1ByaWNlcyIFbHBBbXQiA2NmZyILYW10QXNzZXREY20iDXByaWNlQXNzZXREY20iCHByaWNlWDE4IghscEFtdFgxOCITbHBQcmljZUluQW1Bc3NldFgxOCITbHBQcmljZUluUHJBc3NldFgxOCIPY2FsY3VsYXRlUHJpY2VzIgZwcmljZXMiFGVzdGltYXRlR2V0T3BlcmF0aW9uIgZ0eElkNTgiCnBtdEFzc2V0SWQiCHBtdExwQW10IglscEFzc2V0SWQiCWFtQXNzZXRJZCIJcHJBc3NldElkIgpwb29sU3RhdHVzIgpscEVtaXNzaW9uIglhbUJhbGFuY2UiDGFtQmFsYW5jZVgxOCIJcHJCYWxhbmNlIgxwckJhbGFuY2VYMTgiC2N1clByaWNlWDE4IghjdXJQcmljZSILcG10THBBbXRYMTgiDWxwRW1pc3Npb25YMTgiC291dEFtQW10WDE4IgtvdXRQckFtdFgxOCIIb3V0QW1BbXQiCG91dFByQW10IgVzdGF0ZSIUZXN0aW1hdGVQdXRPcGVyYXRpb24iEXNsaXBwYWdlVG9sZXJhbmNlIgxpbkFtQXNzZXRBbXQiC2luQW1Bc3NldElkIgxpblByQXNzZXRBbXQiC2luUHJBc3NldElkIgppc0V2YWx1YXRlIgZlbWl0THAiDGFtQXNzZXRJZFN0ciIMcHJBc3NldElkU3RyIgtpQW10QXNzZXRJZCINaVByaWNlQXNzZXRJZCIOaW5BbUFzc2V0SWRTdHIiDmluUHJBc3NldElkU3RyIg9pbkFtQXNzZXRBbXRYMTgiD2luUHJBc3NldEFtdFgxOCIMdXNlclByaWNlWDE4IgNyZXMiC3NsaXBwYWdlWDE4IhRzbGlwcGFnZVRvbGVyYW5jZVgxOCIKcHJWaWFBbVgxOCIKYW1WaWFQclgxOCIMZXhwZWN0ZWRBbXRzIhFleHBBbXRBc3NldEFtdFgxOCITZXhwUHJpY2VBc3NldEFtdFgxOCIJY2FsY0xwQW10Ig5jYWxjQW1Bc3NldFBtdCIOY2FsY1ByQXNzZXRQbXQiDHNsaXBwYWdlQ2FsYyIJZW1pdExwQW10IgZhbURpZmYiBnByRGlmZiILY29tbW9uU3RhdGUiB2NhbGNLTHAiDWFtb3VudEJhbGFuY2UiDHByaWNlQmFsYW5jZSIKdXBkYXRlZEtMcCIOY2FsY0N1cnJlbnRLTHAiEGFtb3VudEFzc2V0RGVsdGEiD3ByaWNlQXNzZXREZWx0YSIUbHBBc3NldEVtaXNzaW9uRGVsdGEiEmFtb3VudEFzc2V0QmFsYW5jZSIRcHJpY2VBc3NldEJhbGFuY2UiD2xwQXNzZXRFbWlzc2lvbiIKY3VycmVudEtMcCIScmVmcmVzaEtMcEludGVybmFsIhdhbW91bnRBc3NldEJhbGFuY2VEZWx0YSIWcHJpY2VBc3NldEJhbGFuY2VEZWx0YSIHYWN0aW9ucyISdmFsaWRhdGVVcGRhdGVkS0xwIgZvbGRLTHAiG3ZhbGlkYXRlTWF0Y2hlck9yZGVyQWxsb3dlZCIFb3JkZXIiEWFtb3VudEFzc2V0QW1vdW50IhBwcmljZUFzc2V0QW1vdW50Ig0kdDAyMDM0MTIwNTUzIgNrTHAiDSR0MDIxMDI0MjExMjQiDXVudXNlZEFjdGlvbnMiBmtMcE5ldyIMaXNPcmRlclZhbGlkIgljb21tb25HZXQiAWkiA3BtdCIGcG10QW10Igljb21tb25QdXQiCmFtQXNzZXRQbXQiCnByQXNzZXRQbXQiBmVzdFB1dCIEZW1pdCIGYW1vdW50IgdlbWl0SW52Ig1lbWl0SW52TGVnYWN5IgckbWF0Y2gwIhVsZWdhY3lGYWN0b3J5Q29udHJhY3QiB3Rha2VGZWUiCWZlZUFtb3VudCIPY2FsY1B1dE9uZVRva2VuIhBwYXltZW50QW1vdW50UmF3Ig5wYXltZW50QXNzZXRJZCIGaXNFdmFsIhBhbW91bnRCYWxhbmNlUmF3Ig9wcmljZUJhbGFuY2VSYXciFHBheW1lbnRJbkFtb3VudEFzc2V0Ig0kdDAyMzgwOTI0MTAyIhBhbW91bnRCYWxhbmNlT2xkIg9wcmljZUJhbGFuY2VPbGQiDSR0MDI0MTA2MjQyNTUiFGFtb3VudEFzc2V0QW1vdW50UmF3IhNwcmljZUFzc2V0QW1vdW50UmF3Ig0kdDAyNDM3NzI0NDM2Ig1wYXltZW50QW1vdW50IhBhbW91bnRCYWxhbmNlTmV3Ig9wcmljZUJhbGFuY2VOZXciC3ByaWNlTmV3WDE4IghwcmljZU5ldyIOcGF5bWVudEJhbGFuY2UiFHBheW1lbnRCYWxhbmNlQmlnSW50IgxzdXBwbHlCaWdJbnQiC2NoZWNoU3VwcGx5Ig1kZXBvc2l0QmlnSW50Igtpc3N1ZUFtb3VudCILcHJpY2VPbGRYMTgiCHByaWNlT2xkIgRsb3NzIg0kdDAyNTkxMzI2MDgwIgdiYWxhbmNlIg9pc3N1ZUFtb3VudEJvdGgiD2NhbGNHZXRPbmVUb2tlbiIKb3V0QXNzZXRJZCIGY2hlY2tzIhBvdXRJbkFtb3VudEFzc2V0Ig1iYWxhbmNlQmlnSW50IgxhbUJhbGFuY2VPbGQiDHByQmFsYW5jZU9sZCIKb3V0QmFsYW5jZSIQb3V0QmFsYW5jZUJpZ0ludCIOcmVkZWVtZWRCaWdJbnQiCWFtb3VudFJhdyINJHQwMjc2ODIyNzczMiILdG90YWxBbW91bnQiDSR0MDI3NzM2Mjc5NjIiC291dEFtQW1vdW50IgtvdXRQckFtb3VudCIMYW1CYWxhbmNlTmV3IgxwckJhbGFuY2VOZXciGGFtb3VudEJvdGhJblBheW1lbnRBc3NldCIWbWFuYWdlclB1YmxpY0tleU9yVW5pdCIBcyIdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQiCWlzTWFuYWdlciICcGsiC211c3RNYW5hZ2VyIgJwZCIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiC2NoZWNrQ2FsbGVyIhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSIPc2hvdWxkQXV0b1N0YWtlIgRhbUlkIgRwcklkIgxzbGlwcGFnZUFJbnYiDHNsaXBwYWdlUEludiIKbHBUcmFuc2ZlciILc2xwU3Rha2VJbnYiDSR0MDMyNDA3MzI0NzIiEXJlZnJlc2hLTHBBY3Rpb25zIgVlcnJvciIRaXNVcGRhdGVkS0xwVmFsaWQiC21heFNsaXBwYWdlIg0kdDAzMzI1MzMzMzE4IgxtaW5PdXRBbW91bnQiCWF1dG9TdGFrZSIgaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWQiAUAiDWlzUHV0RGlzYWJsZWQiB3BheW1lbnQiDSR0MDM0NTAzMzQ2NTUiBWJvbnVzIhNlbWl0QW1vdW50RXN0aW1hdGVkIgplbWl0QW1vdW50IghzdGFrZUludiIHc2VuZEZlZSINJHQwMzUyNDEzNTQzOCINJHQwMzU0NDEzNTU0OSINJHQwMzU4NTUzNjAxMiINb3V0QXNzZXRJZFN0ciINaXNHZXREaXNhYmxlZCINJHQwMzY5MDYzNzA1OSIPYW1vdW50RXN0aW1hdGVkIgdidXJuSW52Ig1hc3NldFRyYW5zZmVyIg0kdDAzNzU1OTM3ODA2IhBmZWVBbW91bnRGb3JDYWxjIg0kdDAzNzgwOTM3OTE3Ig0kdDAzODE3NDM4MzMwIg11bnN0YWtlQW1vdW50Igp1bnN0YWtlSW52Ig0kdDAzOTIzMjM5MzgzIg0kdDAzOTg3ODQwMTI1Ig0kdDA0MDEyODQwMjM2IglvdXRBbXRBbXQiFGJ1cm5MUEFzc2V0T25GYWN0b3J5Ig0kdDA0MTE4NDQxMjY2IhJub0xlc3NUaGVuQW10QXNzZXQiFG5vTGVzc1RoZW5QcmljZUFzc2V0Ig0kdDA0MjIxNzQyMjk4Ig1jaGVja1BheW1lbnRzIg9jaGVja1Bvb2xTdGF0dXMiDSR0MDQzNDIxNDM1MDIiFW5vTGVzc1RoZW5BbW91bnRBc3NldCIMY2hlY2tBbW91bnRzIg0kdDA0NDc5NDQ0ODc1IgthbXRBc3NldFN0ciINcHJpY2VBc3NldFN0ciIYbGFzdFJlZnJlc2hlZEJsb2NrSGVpZ2h0Ih1jaGVja0xhc3RSZWZyZXNoZWRCbG9ja0hlaWdodCINJHQwNDYwNjI0NjEyNiIQa0xwVXBkYXRlQWN0aW9ucyIKYW10QXNzZXRJZCIMcHJpY2VBc3NldElkIg1wb29sTFBCYWxhbmNlIhJhY2NBbXRBc3NldEJhbGFuY2UiFGFjY1ByaWNlQXNzZXRCYWxhbmNlIgpwcmljZXNMaXN0Ig9scEFtdEFzc2V0U2hhcmUiEWxwUHJpY2VBc3NldFNoYXJlIgpwb29sV2VpZ2h0IgxjdXJQcmljZUNhbGMiDGFtQmFsYW5jZVJhdyIMcHJCYWxhbmNlUmF3Ig9hbUJhbGFuY2VSYXdYMTgiD3ByQmFsYW5jZVJhd1gxOCIQcGF5bWVudExwQXNzZXRJZCIMcGF5bWVudExwQW10IgJ0eCIGdmVyaWZ5Ig90YXJnZXRQdWJsaWNLZXkiCm1hdGNoZXJQdWIiB25ld0hhc2giC2FsbG93ZWRIYXNoIgtjdXJyZW50SGFzaG0AAWEACAABYgCAwtcvAAFjCQC2AgEAgMLXLwABZAkAtgIBAICAkLu61q3wDQABZQkAtgIBAAAAAWYJALYCAQAAAAFnCQC2AgEAAQABaAkAtgIBAAIAAWkCBVdBVkVTAAFqAgJfXwABawABAAFsAAIAAW0AAwABbgAEAAFvAAEAAXAAAgABcQADAAFyAAQAAXMABQABdAAGAAF1AAcAAXYACAABdwAJAAF4AAoAAXkAAQABegACAAFBAAMAAUIAAQABQwAHAQFEAgFFAUYJALwCAwkAtgIBBQFFBQFkCQC2AgEFAUYBAUcCAUgBSQkAoAMBCQC8AgMFAUgJALYCAQUBSQUBZAEBSgMBSwFMAU0JAGsDBQFLBQFMBQFNAQFOAQFIAwkAZgIAAAUBSAkBAS0BBQFIBQFIAQFPAQFIAwkAvwICBQFlBQFICQC+AgEFAUgFAUgBAVAAAhMlc19fZmFjdG9yeUNvbnRyYWN0AQFRAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBAVIAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAVMAAhElcyVzX19wcmljZV9fbGFzdAEBVAIBVQFWCQC5CQIJAMwIAgIYJXMlcyVkJWRfX3ByaWNlX19oaXN0b3J5CQDMCAIJAKQDAQUBVQkAzAgCCQCkAwEFAVYFA25pbAUBagEBVwIBWAFZCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX1BfXwUBWAICX18FAVkBAVoCAVgBWQkArAICCQCsAgIJAKwCAgILJXMlcyVzX19HX18FAVgCAl9fBQFZAQJhYQACDyVzX19hbW91bnRBc3NldAECYWIAAg4lc19fcHJpY2VBc3NldAACYWMCByVzX19mZWUAAmFkCQBrAwAKBQFiAJBOAAJhZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQJhYwUCYWQAAmFmCQC5CQIJAMwIAgICJXMJAMwIAgIDa0xwBQNuaWwFAWoAAmFnCQC5CQIJAMwIAgICJXMJAMwIAgISa0xwUmVmcmVzaGVkSGVpZ2h0BQNuaWwFAWoAAmFoCQC5CQIJAMwIAgICJXMJAMwIAgIPcmVmcmVzaEtMcERlbGF5BQNuaWwFAWoAAmFpAB4AAmFqCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAmFoBQJhaQECYWsAAhElc19fZmFjdG9yeUNvbmZpZwECYWwAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAmFtAQJhbgkArAICCQCsAgICCCVzJXMlc19fBQJhbgIgX19tYXBwaW5nc19fcG9vbENvbnRyYWN0MkxwQXNzZXQBAmFvAgJhcAJhcQkArAICCQCsAgIJAKwCAgkArAICAgglZCVkJXNfXwUCYXACAl9fBQJhcQIIX19jb25maWcBAmFyAQJhcwkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQJhcwECYXQAAgwlc19fc2h1dGRvd24BAmF1AQJhdgkArAICAhIlcyVzX19wb29sV2VpZ2h0X18FAmF2AQJhdwACFyVzX19hbGxvd2VkTHBTY3JpcHRIYXNoAAJheAIXJXNfX2ZlZUNvbGxlY3RvckFkZHJlc3MBAmF5AwJhegJhQQJhQgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAiRvcmRlciB2YWxpZGF0aW9uIGZhaWxlZDogb3JkZXJWYWxpZD0JAKUDAQUCYXoCDSBzZW5kZXJWYWxpZD0JAKUDAQUCYUECDiBtYXRjaGVyVmFsaWQ9CQClAwEFAmFCAQJhQwICYUQCYUUJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhRAUCYUUJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYUQJAMwIAgIBLgkAzAgCBQJhRQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAAQJhRgICYUQCYUUJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQJhRAUCYUUJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYUQJAMwIAgIBLgkAzAgCBQJhRQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAAQJhRwECYUgJAAIBCQC5CQIJAMwIAgIIbHAucmlkZToJAMwIAgUCYUgFA25pbAIBIAECYUkBAmFICQC5CQIJAMwIAgIIbHAucmlkZToJAMwIAgUCYUgFA25pbAIBIAACYUoJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQJhQwIFBHRoaXMJAQFQAAACYUsJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQJhQwIFAmFKBQJheAECYUwACQELdmFsdWVPckVsc2UCCQCbCAIFAmFKCQECYXQABwECYU0ACQDZBAEJAQJhQwIFAmFKCQECYWwAAQJhTgAEAmFPCQECYUMCBQR0aGlzCQECYWEABAJhUAkBAmFDAgUEdGhpcwkBAmFiAAQCYXEJAQJhRgIFAmFKCQECYXIBBQJhUAQCYXAJAQJhRgIFAmFKCQECYXIBBQJhTwkAtQkCCQECYUMCBQJhSgkBAmFvAgkApAMBBQJhcAkApAMBBQJhcQUBagECYVEBAmFSAwkAAAIFAmFSBQFpBQR1bml0CQDZBAEFAmFSAQJhUwECYVIDCQAAAgUCYVIFBHVuaXQFAWkJANgEAQkBBXZhbHVlAQUCYVIBAmFUAQJhVQkAmQoHCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFVBQFvCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYVUFAXAJANkEAQkAkQMCBQJhVQUBcQkBAmFRAQkAkQMCBQJhVQUBcgkBAmFRAQkAkQMCBQJhVQUBcwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmFVBQF0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYVUFAXUAAmFWCQECYVQBCQECYU4AAAJhVwUCYVYAAmFYCAUCYVcCXzEAAmFZCAUCYVcCXzIAAmFaCAUCYVcCXzMAAmJhCAUCYVcCXzQAAmJiCAUCYVcCXzUAAmJjCAUCYVcCXzYAAmJkCAUCYVcCXzcBAmJlAAkAtQkCCQECYUMCBQJhSgkBAmFrAAUBagACYmYJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIJAQJiZQAFAUICGWluY29ycmVjdCBzdGFraW5nIGFkZHJlc3MAAmJnCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCCQECYmUABQFDAhlpbmNvcnJlY3Qgc3Rha2luZyBhZGRyZXNzAQJiaAoCYmkCYmoCYmsCYmwCYm0CYm4CYm8CYnACYnECYnIJALkJAgkAzAgCAhQlZCVkJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmJpCQDMCAIJAKQDAQUCYmoJAMwIAgkApAMBBQJiawkAzAgCCQCkAwEFAmJsCQDMCAIJAKQDAQUCYm0JAMwIAgkApAMBBQJibgkAzAgCCQCkAwEFAmJvCQDMCAIJAKQDAQUCYnAJAMwIAgkApAMBBQJicQkAzAgCCQCkAwEFAmJyBQNuaWwFAWoBAmJzBgJidAJidQJidgJibAJibwJicAkAuQkCCQDMCAICDCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmJ0CQDMCAIJAKQDAQUCYnUJAMwIAgkApAMBBQJidgkAzAgCCQCkAwEFAmJsCQDMCAIJAKQDAQUCYm8JAMwIAgkApAMBBQJicAUDbmlsBQFqAQJidwECYngDCQAAAgUCYngCBVdBVkVTCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQDZBAEFAmJ4AQJieQICYnoCYkEJALwCAwUCYnoFAWQFAmJBAQJiQgQCYkMCYkQCYkUCYkYEAmJHCQEBRAIFAmJFBQJiQwQCYkgJAQFEAgUCYkYFAmJECQECYnkCBQJiSAUCYkcBAmJJAwJiRQJiRgJiSgQCYksJAQJhTgAEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmJOCQECYkIEBQJiTAUCYk0FAmJFBQJiRgQCYkEJAQFEAgUCYkUFAmJMBAJiegkBAUQCBQJiRgUCYk0EAmJPCQEBRAIFAmJKBQFiBAJiUAkBAmJ5AgUCYkEFAmJPBAJiUQkBAmJ5AgUCYnoFAmJPCQDMCAIFAmJOCQDMCAIFAmJQCQDMCAIFAmJRBQNuaWwBAmJSAwJiRQJiRgJiSgQCYlMJAQJiSQMFAmJFBQJiRgUCYkoJAMwIAgkBAUcCCQCRAwIFAmJTAAAFAWIJAMwIAgkBAUcCCQCRAwIFAmJTAAEFAWIJAMwIAgkBAUcCCQCRAwIFAmJTAAIFAWIFA25pbAECYlQEAmJVAmJWAmJXAVgEAmJLCQECYU4ABAJiWAkAkQMCBQJiSwUBcQQCYlkJAJEDAgUCYksFAXIEAmJaCQCRAwIFAmJLBQFzBAJiQwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiRAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCY2IICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQJiWAkArAICCQCsAgICBkFzc2V0IAUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5AwkBAiE9AgUCYlgFAmJWCQACAQIVSW52YWxpZCBhc3NldCBwYXNzZWQuBAJjYwkBAmJ3AQUCYlkEAmNkCQEBRAIFAmNjBQJiQwQCY2UJAQJidwEFAmJaBAJjZgkBAUQCBQJjZQUCYkQEAmNnCQECYnkCBQJjZgUCY2QEAmNoCQEBRwIFAmNnBQFiBAJjaQkBAUQCBQJiVwUBYgQCY2oJAQFEAgUCY2IFAWIEAmNrCQC8AgMFAmNkBQJjaQUCY2oEAmNsCQC8AgMFAmNmBQJjaQUCY2oEAmNtCQEBRwIFAmNrBQJiQwQCY24JAQFHAgUCY2wFAmJEBAJjbwMJAAACBQJiVQIABQNuaWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUBWAUCY20DCQAAAgUCYlkCBVdBVkVTBQR1bml0CQDZBAEFAmJZCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAVgFAmNuAwkAAAIFAmJaAgVXQVZFUwUEdW5pdAkA2QQBBQJiWgkAzAgCCQELU3RyaW5nRW50cnkCCQEBWgIJAKUIAQUBWAUCYlUJAQJicwYFAmNtBQJjbgUCYlcFAmNoBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmNoCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNoBQNuaWwJAJwKCgUCY20FAmNuBQJiWQUCYloFAmNjBQJjZQUCY2IFAmNnBQJjYQUCY28BAmNwCQJiVQJjcQJjcgJjcwJjdAJjdQFYAmN2AmN3BAJiSwkBAmFOAAQCYlgJANkEAQkAkQMCBQJiSwUBcQQCY3gJAJEDAgUCYksFAXIEAmN5CQCRAwIFAmJLBQFzBAJjegkAkQMCBQJiSwUBdgQCY0EJAJEDAgUCYksFAXcEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJjYggJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmNCCQDYBAEJAQt2YWx1ZU9yRWxzZQIFAmNzCQDZBAECBVdBVkVTBAJjQwkA2AQBCQELdmFsdWVPckVsc2UCBQJjdQkA2QQBAgVXQVZFUwMDCQECIT0CBQJjeAUCY0IGCQECIT0CBQJjeQUCY0MJAAIBAiJJbnZhbGlkIGFtdCBvciBwcmljZSBhc3NldCBwYXNzZWQuBAJjYwMFAmN2CQECYncBBQJjeAkAZQIJAQJidwEFAmN4BQJjcgQCY2UDBQJjdgkBAmJ3AQUCY3kJAGUCCQECYncBBQJjeQUCY3QEAmNECQEBRAIFAmNyBQJiTAQCY0UJAQFEAgUCY3QFAmJNBAJjRgkBAmJ5AgUCY0UFAmNEBAJjZAkBAUQCBQJjYwUCYkwEAmNmCQEBRAIFAmNlBQJiTQQCY0cDCQAAAgUCY2IAAAQCY2cFAWUEAmNIBQFlBAJiTwkAdgYJALkCAgUCY0QFAmNFAAAJALYCAQAFAAEAAAUERE9XTgkAlwoFCQEBRwIFAmJPBQFiCQEBRwIFAmNEBQJiTAkBAUcCBQJjRQUCYk0JAQJieQIJALcCAgUCY2YFAmNFCQC3AgIFAmNkBQJjRAUCY0gEAmNnCQECYnkCBQJjZgUCY2QEAmNICQC8AgMJAQFPAQkAuAICBQJjZwUCY0YFAWQFAmNnBAJjSQkBAUQCBQJjcQUBYgMDCQECIT0CBQJjZwUBZQkAvwICBQJjSAUCY0kHCQACAQkArAICCQCsAgIJAKwCAgIPUHJpY2Ugc2xpcHBhZ2UgCQCmAwEFAmNIAh4gZXhjZWVkZWQgdGhlIHBhc3NlZCBsaW1pdCBvZiAJAKYDAQUCY0kEAmNqCQEBRAIFAmNiBQFiBAJjSgkAvAIDBQJjRAUCY2cFAWQEAmNLCQC8AgMFAmNFBQFkBQJjZwQCY0wDCQC/AgIFAmNKBQJjRQkAlAoCBQJjSwUCY0UJAJQKAgUCY0QFAmNKBAJjTQgFAmNMAl8xBAJjTggFAmNMAl8yBAJiTwkAvAIDBQJjagUCY04FAmNmCQCXCgUJAQFHAgUCYk8FAWIJAQFHAgUCY00FAmJMCQEBRwIFAmNOBQJiTQUCY2cFAmNIBAJjTwgFAmNHAl8xBAJjUAgFAmNHAl8yBAJjUQgFAmNHAl8zBAJjaAkBAUcCCAUCY0cCXzQFAWIEAmNSCQEBRwIIBQJjRwJfNQUBYgMJAGcCAAAFAmNPCQACAQI2SW52YWxpZCBjYWxjdWxhdGlvbnMuIExQIGNhbGN1bGF0ZWQgaXMgbGVzcyB0aGFuIHplcm8uBAJjUwMJAQEhAQUCY3cAAAUCY08EAmNUCQBlAgUCY3IFAmNQBAJjVQkAZQIFAmN0BQJjUQQCY1YJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCY2gJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY2gJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVcCBQFYBQJiVQkBAmJoCgUCY1AFAmNRBQJjUwUCY2gFAmNxBQJjUgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY1QFAmNVBQNuaWwJAJ8KDQUCY08FAmNTBQJjaAUCY2MFAmNlBQJjYgUCYlgFAmNhBQJjVgUCY1QFAmNVBQJjcwUCY3UBAmNXAwJjWAJjWQJjYgQCY1oJALwCAwkAdgYJALkCAgUCY1gFAmNZAAAJALYCAQAFAAEAEgUERE9XTgUBZwUCY2IDCQAAAgUCY2IFAWYFAWYFAmNaAQJkYQMCZGICZGMCZGQEAmRlCQC4AgIJALYCAQkBAmJ3AQkBAmFTAQUCYmEFAmRiBAJkZgkAuAICCQC2AgEJAQJidwEJAQJhUwEFAmJiBQJkYwQCZGcJALgCAgkAtgIBCAkBBXZhbHVlAQkA7AcBBQJhWghxdWFudGl0eQUCZGQEAmRoCQECY1cDBQJkZQUCZGYFAmRnBQJkaAECZGkDAmRqAmRrAmRkBAJkZQkAZAIJAQJidwEJAQJhUwEFAmJhBQJkagQCZGYJAGQCCQECYncBCQECYVMBBQJiYgUCZGsEAmRnCQBkAggJAQV2YWx1ZQEJAOwHAQUCYVoIcXVhbnRpdHkFAmRkBAJjWgkBAmNXAwkAtgIBBQJkZQkAtgIBBQJkZgkAtgIBBQJkZwQCZGwJAMwIAgkBDEludGVnZXJFbnRyeQIFAmFnBQZoZWlnaHQJAMwIAgkBC1N0cmluZ0VudHJ5AgUCYWYJAKYDAQUCY1oFA25pbAkAlAoCBQJkbAUCY1oBAmRtAgJkbgJjWgMJAMACAgUCY1oFAmRuBgkBAmFHAQkAuQkCCQDMCAICInVwZGF0ZWQgS0xwIGxvd2VyIHRoYW4gY3VycmVudCBLTHAJAMwIAgkApgMBBQJkbgkAzAgCCQCmAwEFAmNaBQNuaWwCASABAmRvAQJkcAQCZHEIBQJkcAZhbW91bnQEAmRyCQBuBAgFAmRwBmFtb3VudAgFAmRwBXByaWNlBQFiBQVGTE9PUgQCZHMDCQAAAggFAmRwCW9yZGVyVHlwZQUDQnV5CQCUCgIFAmRxCQEBLQEFAmRyCQCUCgIJAQEtAQUCZHEFAmRyBAJkaggFAmRzAl8xBAJkawgFAmRzAl8yAwMDCQECYUwABgkAAAIFAmFZBQFtBgkAAAIFAmFZBQFuCQACAQIcRXhjaGFuZ2Ugb3BlcmF0aW9ucyBkaXNhYmxlZAMDCQECIT0CCAgFAmRwCWFzc2V0UGFpcgthbW91bnRBc3NldAUCYmEGCQECIT0CCAgFAmRwCWFzc2V0UGFpcgpwcmljZUFzc2V0BQJiYgkAAgECE1dyb25nIG9yZGVyIGFzc2V0cy4EAmR0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKgDAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFAmFmCQECYUkBAg9rTHAgaXMgcmVxdWlyZWQJAQJhSQECC2ludmFsaWQga0xwBAJkdQkBAmRpAwUCZGoFAmRrAAAEAmR2CAUCZHUCXzEEAmR3CAUCZHUCXzIEAmR4CQDAAgIFAmR3BQJkdAUCZHgBAmR5AQJkegMJAQIhPQIJAJADAQgFAmR6CHBheW1lbnRzAAEJAAIBAh1leGFjdGx5IDEgcGF5bWVudCBpcyBleHBlY3RlZAQCZEEJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAAEAmJWCQEFdmFsdWUBCAUCZEEHYXNzZXRJZAQCZEIIBQJkQQZhbW91bnQEAmNHCQECYlQECQDYBAEIBQJkeg10cmFuc2FjdGlvbklkCQDYBAEFAmJWBQJkQggFAmR6BmNhbGxlcgQCY20IBQJjRwJfMQQCY24IBQJjRwJfMgQCY2EJAQ1wYXJzZUludFZhbHVlAQgFAmNHAl85BAJjbwgFAmNHA18xMAMDCQECYUwABgkAAAIFAmNhBQFuCQACAQkArAICAixHZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4uIFN0YXR1cyA9IAkApAMBBQJjYQkAlwoFBQJjbQUCY24FAmRCBQJiVgUCY28BAmRDAwJkegJjcQJjdwMJAQIhPQIJAJADAQgFAmR6CHBheW1lbnRzAAIJAAIBAh9leGFjdGx5IDIgcGF5bWVudHMgYXJlIGV4cGVjdGVkBAJkRAkBBXZhbHVlAQkAkQMCCAUCZHoIcGF5bWVudHMAAAQCZEUJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAEEAmRGCQECY3AJCQDYBAEIBQJkeg10cmFuc2FjdGlvbklkBQJjcQgFAmREBmFtb3VudAgFAmREB2Fzc2V0SWQIBQJkRQZhbW91bnQIBQJkRQdhc3NldElkCQClCAEIBQJkegZjYWxsZXIHBQJjdwQCY2EJAQ1wYXJzZUludFZhbHVlAQgFAmRGAl84AwMDCQECYUwABgkAAAIFAmNhBQFsBgkAAAIFAmNhBQFuCQACAQkArAICAixQdXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4uIFN0YXR1cyA9IAkApAMBBQJjYQUCZEYBAmRHAQJkSAQCZEkJAPwHBAUCYUoCBGVtaXQJAMwIAgUCZEgFA25pbAUDbmlsAwkAAAIFAmRJBQJkSQQCZEoEAmRLBQJkSQMJAAECBQJkSwIHQWRkcmVzcwQCZEwFAmRLCQD8BwQFAmRMAgRlbWl0CQDMCAIFAmRIBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkSgUCZEoFAmRICQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJkTQECZEgEAmROCQBrAwUCZEgFAmFlBQFiCQCUCgIJAGUCBQJkSAUCZE4FAmROAQJkTwQCZFACZFEBWAFZBAJkUgkAAAIFAVkFBHVuaXQEAmRTCQECYncBCQECYVMBBQJiYQQCZFQJAQJidwEJAQJhUwEFAmJiBAJkVQMJAAACBQJkUQUCYmEGAwkAAAIFAmRRBQJiYgcJAQJhRwECDWludmFsaWQgYXNzZXQEAmRWAwUCZFIJAJQKAgUCZFMFAmRUAwUCZFUJAJQKAgkAZQIFAmRTBQJkUAUCZFQJAJQKAgUCZFMJAGUCBQJkVAUCZFAEAmRXCAUCZFYCXzEEAmRYCAUCZFYCXzIEAmRZAwUCZFUJAJQKAgUCZFAAAAkAlAoCAAAFAmRQBAJkWggFAmRZAl8xBAJlYQgFAmRZAl8yBAJkcQgJAQJkTQEFAmRaAl8xBAJkcggJAQJkTQEFAmVhAl8xBAJlYgkBAmRNAQUCZFAEAmVjCAUCZWICXzEEAmROCAUCZWICXzIEAmVkCQBkAgUCZFcFAmRxBAJlZQkAZAIFAmRYBQJkcgQCZWYJAQJieQIJAQFEAgUCZWUFAmJkCQEBRAIFAmVkBQJiYwQCZWcJAQFHAgUCZWYFAWIEAmVoAwUCZFUFAmRXBQJkWAQCZWkJALYCAQUCZWgEAmVqCQC2AgEICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYVoJAKwCAgkArAICAgZhc3NldCAJANgEAQUCYVoCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJlawMJAL8CAgUCZWoFAWYGCQECYUcBAiJpbml0aWFsIGRlcG9zaXQgcmVxdWlyZXMgYWxsIGNvaW5zAwkAAAIFAmVrBQJlawQCZWwJALYCAQUCZWMEAmVtCQCWAwEJAMwIAgAACQDMCAIJAKADAQkAugICCQC5AgIFAmVqCQC4AgIJAQpzcXJ0QmlnSW50BAkAtwICBQFkCQC6AgIJALkCAgUCZWwFAWQFAmVpABIAEgUERE9XTgUBZAUBZAUDbmlsBAJjVgMFAmRSBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCZWcJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCZWcJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVcCCQClCAEJAQV2YWx1ZQEFAVgJANgEAQkBBXZhbHVlAQUBWQkBAmJoCgUCZFoFAmVhBQJlbQUCZWcAAAAABQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wAAAAAAUDbmlsBAJlbgkBAmJ5AgkBAUQCBQJkWAUCYmQJAQFEAgUCZFcFAmJjBAJlbwkBAUcCBQJlbgUBYgQCZXAEAmVxAwUCZFUJAJQKAgUCZFoFAmRXCQCUCgIFAmVhBQJkWAQCZEgIBQJlcQJfMQQCZXIIBQJlcQJfMgQCZXMJAKADAQkAvAIDBQJlagkAtgIBCQBpAgUCZEgAAgkAtgIBBQJlcgkAawMJAGUCBQJlbQUCZXMFAWIFAmVzCQCXCgUFAmVtBQJjVgUCZE4FAmVwBQJkVQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECZXQFAmV1AmVjAmRRAVgBWQQCZFIJAAACBQFZBQR1bml0BAJldgkAzAgCAwkAAAIFAmRRBQJhWgYJAQJhRwECEGludmFsaWQgbHAgYXNzZXQFA25pbAMJAAACBQJldgUCZXYEAmV3AwkAAAIFAmV1BQJiYQYDCQAAAgUCZXUFAmJiBwkBAmFHAQINaW52YWxpZCBhc3NldAQCZXgDBQJldwkAtgIBCQECYncBCQECYVMBBQJiYQkAtgIBCQECYncBCQECYVMBBQJiYgQCZXkJAQJidwEJAQJhUwEFAmJhBAJlegkBAmJ3AQkBAmFTAQUCYmIEAmVBAwUCZXcFAmV5BQJlegQCZUIJALYCAQUCZUEEAmVqCQC2AgEICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYVoJAKwCAgkArAICAgZhc3NldCAJANgEAQUCYVoCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJlQwkAtgIBBQJlYwQCZUQJAJYDAQkAzAgCAAAJAMwIAgkAoAMBCQC6AgIJALkCAgUCZXgJALgCAgUBZAkAdgYJALgCAgUBZAkAugICCQC5AgIFAmVDBQFkBQJlagASBQFoAAAAEgUERE9XTgUBZAUDbmlsBAJlRQkBAmRNAQUCZUQEAmVGCAUCZUUCXzEEAmROCAUCZUUCXzIEAmVHAwUCZXcJAJYKBAUCZUYAAAkAZQIFAmV5BQJlRAUCZXoJAJYKBAAABQJlRgUCZXkJAGUCBQJlegUCZUQEAmVICAUCZUcCXzEEAmVJCAUCZUcCXzIEAmVKCAUCZUcCXzMEAmVLCAUCZUcCXzQEAmVmCQECYnkCCQEBRAIFAmVLBQJiZAkBAUQCBQJlSgUCYmMEAmVnCQEBRwIFAmVmBQFiBAJjVgMFAmRSBQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVoCCQClCAEJAQV2YWx1ZQEFAVgJANgEAQkBBXZhbHVlAQUBWQkBAmJzBgUCZUgFAmVJBQJlYwUCZWcFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCZWcJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCZWcFA25pbAQCZW4JAQJieQIJAQFEAgUCZXoFAmJkCQEBRAIFAmV5BQJiYwQCZW8JAQFHAgUCZW4FAWIEAmVwBAJlTAkAaAIJAKADAQkAvAIDBQJleAUCZUMFAmVqAAIJAGsDCQBlAgUCZUYFAmVMBQFiBQJlTAkAlwoFBQJlRgUCY1YFAmROBQJlcAUCZXcJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmVNAAQCZEsJAKIIAQkBAVEAAwkAAQIFAmRLAgZTdHJpbmcEAmVOBQJkSwkA2QQBBQJlTgMJAAECBQJkSwIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJlTwAEAmRLCQCiCAEJAQFSAAMJAAECBQJkSwIGU3RyaW5nBAJlTgUCZEsJANkEAQUCZU4DCQABAgUCZEsCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECZVABAmR6BAJkSwkBAmVNAAMJAAECBQJkSwIKQnl0ZVZlY3RvcgQCZVEFAmRLCQAAAggFAmR6D2NhbGxlclB1YmxpY0tleQUCZVEDCQABAgUCZEsCBFVuaXQJAAACCAUCZHoGY2FsbGVyBQR0aGlzCQACAQILTWF0Y2ggZXJyb3IBAmVSAQJkegQCZVMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQCZEsJAQJlTQADCQABAgUCZEsCCkJ5dGVWZWN0b3IEAmVRBQJkSwMJAAACCAUCZHoPY2FsbGVyUHVibGljS2V5BQJlUQYFAmVTAwkAAQIFAmRLAgRVbml0AwkAAAIIBQJkegZjYWxsZXIFBHRoaXMGBQJlUwkAAgECC01hdGNoIGVycm9yGwJkegEKc2V0TWFuYWdlcgECZVQEAmVVCQECZVIBBQJkegMJAAACBQJlVQUCZVUEAmVWCQDZBAEFAmVUAwkAAAIFAmVWBQJlVgkAzAgCCQELU3RyaW5nRW50cnkCCQEBUgAFAmVUBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBDmNvbmZpcm1NYW5hZ2VyAAQCZVcJAQJlTwAEAmVYAwkBCWlzRGVmaW5lZAEFAmVXBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJlWAUCZVgEAmVZAwkAAAIIBQJkeg9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmVXBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJlWQUCZVkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVEACQDYBAEJAQV2YWx1ZQEFAmVXCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFSAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQNwdXQCAmNxAmVaAwkAZgIAAAUCY3EJAAIBAiBJbnZhbGlkIHNsaXBwYWdlVG9sZXJhbmNlIHBhc3NlZAQCZEYJAQJkQwMFAmR6BQJjcQYEAmNTCAUCZEYCXzIEAmJYCAUCZEYCXzcEAmNvCAUCZEYCXzkEAmNUCAUCZEYDXzEwBAJjVQgFAmRGA18xMQQCZmEIBQJkRgNfMTIEAmZiCAUCZEYDXzEzBAJkRAkAtgIBCAkBBXZhbHVlAQkAkQMCCAUCZHoIcGF5bWVudHMAAAZhbW91bnQEAmRFCQC2AgEICQEFdmFsdWUBCQCRAwIIBQJkeghwYXltZW50cwABBmFtb3VudAQCZGUJALgCAgkAtgIBCQECYncBCQECYVMBBQJiYQUCZEQDCQAAAgUCZGUFAmRlBAJkZgkAuAICCQC2AgEJAQJidwEJAQJhUwEFAmJiBQJkRQMJAAACBQJkZgUCZGYEAmRnCQC2AgEICQEFdmFsdWUBCQDsBwEFAmFaCHF1YW50aXR5AwkAAAIFAmRnBQJkZwQCZGgJAQJkYQMFAmREBQJkRQkAtgIBAAADCQAAAgUCZGgFAmRoBAJkSQkA/AcEBQJhSgIEZW1pdAkAzAgCBQJjUwUDbmlsBQNuaWwDCQAAAgUCZEkFAmRJBAJkSgQCZEsFAmRJAwkAAQIFAmRLAgdBZGRyZXNzBAJkTAUCZEsJAPwHBAUCZEwCBGVtaXQJAMwIAgUCY1MFA25pbAUDbmlsBQR1bml0AwkAAAIFAmRKBQJkSgQCZmMDCQBmAgUCY1QAAAkA/AcEBQJiZwIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmZhBQJjVAUDbmlsBQNuaWwDCQAAAgUCZmMFAmZjBAJmZAMJAGYCBQJjVQAACQD8BwQFAmJnAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZmIFAmNVBQNuaWwFA25pbAMJAAACBQJmZAUCZmQEAmZlAwUCZVoEAmZmCQD8BwQFAmJmAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiWAUCY1MFA25pbAMJAAACBQJmZgUCZmYFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHoGY2FsbGVyBQJjUwUCYlgFA25pbAQCZmcJAQJkaQMAAAAAAAAEAmZoCAUCZmcCXzEEAmNaCAUCZmcCXzIEAmZpCQECYUcBCQC5CQIJAMwIAgkApgMBBQJkZQkAzAgCCQCmAwEFAmRmCQDMCAIJAKYDAQUCZGcJAMwIAgkApgMBBQJkaAkAzAgCCQCmAwEFAmNaBQNuaWwCASADCQAAAgUCZmkFAmZpBAJmagkBAmRtAgUCZGgFAmNaAwkAAAIFAmZqBQJmagkAzggCCQDOCAIFAmNvBQJmZQUCZmgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBCnB1dEZvckZyZWUBAmZrAwkAZgIAAAUCZmsJAAIBAhRJbnZhbGlkIHZhbHVlIHBhc3NlZAQCZEYJAQJkQwMFAmR6BQJmawcEAmNvCAUCZEYCXzkEAmRECQC2AgEICQEFdmFsdWUBCQCRAwIIBQJkeghwYXltZW50cwAABmFtb3VudAQCZEUJALYCAQgJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAEGYW1vdW50BAJkaAkBAmRhAwUCZEQFAmRFCQC2AgEAAAMJAAACBQJkaAUCZGgEAmZsCQECZGkDAAAAAAAABAJmaAgFAmZsAl8xBAJjWggFAmZsAl8yBAJmagkBAmRtAgUCZGgFAmNaAwkAAAIFAmZqBQJmagkAzggCBQJjbwUCZmgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBCXB1dE9uZVRrbgICZm0CZm4EAmZvCgACZnAJAPwHBAUCYUoCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgkApQgBBQR0aGlzBQNuaWwFA25pbAMJAAECBQJmcAIHQm9vbGVhbgUCZnAJAAIBCQCsAgIJAAMBBQJmcAIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZnEDAwMJAQJhTAAGCQAAAgUCYVkFAWwGCQAAAgUCYVkFAW4GBQJmbwQCZXYJAMwIAgMDCQEBIQEFAmZxBgkBAmVQAQUCZHoGCQECYUcBAiFwdXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkeghwYXltZW50cwABBgkBAmFHAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXYFAmV2BAJmcgkAkQMCCAUCZHoIcGF5bWVudHMAAAQCZFEIBQJmcgdhc3NldElkBAJkUAgFAmZyBmFtb3VudAQCZGgDCQAAAgUCZFEFAmJhCQECZGEDCQC2AgEFAmRQCQC2AgEAAAkAtgIBAAADCQAAAgUCZFEFAmJiCQECZGEDCQC2AgEAAAkAtgIBBQJkUAkAtgIBAAAJAQJhRwECHnBheW1lbnQgYXNzZXQgaXMgbm90IHN1cHBvcnRlZAQBWAgFAmR6BmNhbGxlcgQBWQgFAmR6DXRyYW5zYWN0aW9uSWQEAmZzCQECZE8EBQJkUAUCZFEFAVgFAVkDCQAAAgUCZnMFAmZzBAJkVQgFAmZzAl81BAJmdAgFAmZzAl80BAJkTggFAmZzAl8zBAJjVggFAmZzAl8yBAJmdQgFAmZzAl8xBAJmdgMDCQBmAgUCZm0AAAkAZgIFAmZtBQJmdQcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZm0FA25pbAIABQJmdQQCZEkJAQJkRwEFAmZ2AwkAAAIFAmRJBQJkSQQCZmUDBQJmbgQCZncJAPwHBAUCYmYCBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmFaBQJmdgUDbmlsAwkAAAIFAmZ3BQJmdwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJkegZjYWxsZXIFAmZ2BQJhWgUDbmlsBAJmeAMJAGYCBQJkTgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFLBQJkTgUCZFEFA25pbAUDbmlsBAJmeQMJAAACBQR0aGlzBQJhSwkAlAoCAAAAAAMFAmRVCQCUCgIJAQEtAQUCZE4AAAkAlAoCAAAJAQEtAQUCZE4EAmRqCAUCZnkCXzEEAmRrCAUCZnkCXzIEAmZ6CQECZGkDBQJkagUCZGsAAAQCZmgIBQJmegJfMQQCY1oIBQJmegJfMgQCZHQJAQV2YWx1ZQEJAKIIAQUCYWYEAmZqCQECZG0CBQJkaAUCY1oDCQAAAgUCZmoFAmZqCQCUCgIJAM4IAgkAzggCCQDOCAIFAmNWBQJmZQUCZngFAmZoBQJmdgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegERcHV0T25lVGtuUkVBRE9OTFkCAmRRAmRQBAJmQQkBAmRPBAUCZFAJAQJhUQEFAmRRBQR1bml0BQR1bml0BAJmdQgFAmZBAl8xBAJjVggFAmZBAl8yBAJkTggFAmZBAl8zBAJmdAgFAmZBAl80BAJkVQgFAmZBAl81CQCUCgIFA25pbAkAlQoDBQJmdQUCZE4FAmZ0AmR6AQlnZXRPbmVUa24CAmZCAmZtBAJmbwoAAmZwCQD8BwQFAmFKAihpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZFJFQURPTkxZCQDMCAIJAKUIAQUEdGhpcwUDbmlsBQNuaWwDCQABAgUCZnACB0Jvb2xlYW4FAmZwCQACAQkArAICCQADAQUCZnACHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4EAmZDAwMJAQJhTAAGCQAAAgUCYVkFAW4GBQJmbwQCZXYJAMwIAgMDCQEBIQEFAmZDBgkBAmVQAQUCZHoGCQECYUcBAiFnZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkeghwYXltZW50cwABBgkBAmFHAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXYFAmV2BAJldQkBAmFRAQUCZkIEAmZyCQCRAwIIBQJkeghwYXltZW50cwAABAJkUQgFAmZyB2Fzc2V0SWQEAmVjCAUCZnIGYW1vdW50BAJkaAkBAmRhAwkAtgIBAAAJALYCAQAACQC2AgEFAmVjBAFYCAUCZHoGY2FsbGVyBAFZCAUCZHoNdHJhbnNhY3Rpb25JZAQCZkQJAQJldAUFAmV1BQJlYwUCZFEFAVgFAVkDCQAAAgUCZkQFAmZEBAJldwgFAmZEAl81BAJmdAgFAmZEAl80BAJkTggFAmZEAl8zBAJjVggFAmZEAl8yBAJmRQgFAmZEAl8xBAJkSAMDCQBmAgUCZm0AAAkAZgIFAmZtBQJmRQcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZm0FA25pbAIABQJmRQQCZkYJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZWMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZFEFAmVjBQNuaWwDCQAAAgUCZkYFAmZGBAJmRwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQFYBQJkSAUCZXUFA25pbAQCZngDCQBmAgUCZE4AAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZE4FAmV1BQNuaWwFA25pbAQCZkgEAmZJAwkAAAIFBHRoaXMFAmFLAAAFAmROAwUCZXcJAJQKAgkBAS0BCQBkAgUCZEgFAmZJAAAJAJQKAgAACQEBLQEJAGQCBQJkSAUCZkkEAmRqCAUCZkgCXzEEAmRrCAUCZkgCXzIEAmZKCQECZGkDBQJkagUCZGsAAAQCZmgIBQJmSgJfMQQCY1oIBQJmSgJfMgQCZmoJAQJkbQIFAmRoBQJjWgMJAAACBQJmagUCZmoJAJQKAgkAzggCCQDOCAIJAM4IAgUCY1YFAmZHBQJmeAUCZmgFAmRICQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6ARFnZXRPbmVUa25SRUFET05MWQICZXUCZWMEAmZLCQECZXQFCQECYVEBBQJldQUCZWMFAmFaBQR1bml0BQR1bml0BAJmRQgFAmZLAl8xBAJjVggFAmZLAl8yBAJkTggFAmZLAl8zBAJmdAgFAmZLAl80BAJldwgFAmZLAl81CQCUCgIFA25pbAkAlQoDBQJmRQUCZE4FAmZ0AmR6ARN1bnN0YWtlQW5kR2V0T25lVGtuAwJmTAJmQgJmbQQCZm8KAAJmcAkA/AcEBQJhSgIoaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWRSRUFET05MWQkAzAgCCQClCAEFBHRoaXMFA25pbAUDbmlsAwkAAQIFAmZwAgdCb29sZWFuBQJmcAkAAgEJAKwCAgkAAwEFAmZwAhwgY291bGRuJ3QgYmUgY2FzdCB0byBCb29sZWFuBAJmQwMDCQECYUwABgkAAAIFAmFZBQFuBgUCZm8EAmV2CQDMCAIDAwkBASEBBQJmQwYJAQJlUAEFAmR6BgkBAmFHAQIhZ2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHoIcGF5bWVudHMAAAYJAQJhRwECGG5vIHBheW1lbnRzIGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmV2BQJldgQCZXUJAQJhUQEFAmZCBAFYCAUCZHoGY2FsbGVyBAFZCAUCZHoNdHJhbnNhY3Rpb25JZAQCZGgJAQJkYQMJALYCAQAACQC2AgEAAAkAtgIBAAAEAmZNCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYVoJAMwIAgUCZkwFA25pbAUDbmlsAwkAAAIFAmZNBQJmTQQCZk4JAQJldAUFAmV1BQJmTAUCYVoFAVgFAVkDCQAAAgUCZk4FAmZOBAJldwgFAmZOAl81BAJmdAgFAmZOAl80BAJkTggFAmZOAl8zBAJjVggFAmZOAl8yBAJmRQgFAmZOAl8xBAJkSAMDCQBmAgUCZm0AAAkAZgIFAmZtBQJmRQcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZm0FA25pbAIABQJmRQQCZkYJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZkwFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYVoFAmZMBQNuaWwDCQAAAgUCZkYFAmZGBAJmRwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHoGY2FsbGVyBQJkSAUCZXUFA25pbAQCZngDCQBmAgUCZE4AAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZE4FAmV1BQNuaWwFA25pbAQCZk8EAmZJAwkAAAIFBHRoaXMFAmFLAAAFAmROAwUCZXcJAJQKAgkBAS0BCQBkAgUCZEgFAmZJAAAJAJQKAgAACQEBLQEJAGQCBQJkSAUCZkkEAmRqCAUCZk8CXzEEAmRrCAUCZk8CXzIEAmZQCQECZGkDBQJkagUCZGsAAAQCZmgIBQJmUAJfMQQCY1oIBQJmUAJfMgQCZmoJAQJkbQIFAmRoBQJjWgMJAAACBQJmagUCZmoJAJQKAgkAzggCCQDOCAIJAM4IAgUCY1YFAmZHBQJmeAUCZmgFAmRICQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQNnZXQABAJjRwkBAmR5AQUCZHoEAmZRCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmRCCAUCY0cCXzMEAmJWCAUCY0cCXzQEAmNvCAUCY0cCXzUEAmRoCQECZGEDCQC2AgEAAAkAtgIBAAAJALYCAQUCZEIEAmZSCQD8BwQFAmFKAgRidXJuCQDMCAIFAmRCBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJWBQJkQgUDbmlsAwkAAAIFAmZSBQJmUgQCZlMJAQJkaQMJAQEtAQUCZlEJAQEtAQUCY24AAAQCZmgIBQJmUwJfMQQCY1oIBQJmUwJfMgQCZmoJAQJkbQIFAmRoBQJjWgMJAAACBQJmagUCZmoJAM4IAgUCY28FAmZoCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQlnZXROb0xlc3MCAmZUAmZVBAJjRwkBAmR5AQUCZHoEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmRCCAUCY0cCXzMEAmJWCAUCY0cCXzQEAmNvCAUCY0cCXzUDCQBmAgUCZlQFAmNtCQACAQkArAICCQCsAgIJAKwCAgIcbm9MZXNzVGhlbkFtdEFzc2V0IGZhaWxlZDogIAkApAMBBQJjbQIDIDwgCQCkAwEFAmZUAwkAZgIFAmZVBQJjbgkAAgEJAKwCAgkArAICCQCsAgICHW5vTGVzc1RoZW5QcmljZUFzc2V0IGZhaWxlZDogCQCkAwEFAmNuAgMgPCAJAKQDAQUCZlUEAmRoCQECZGEDCQC2AgEAAAkAtgIBAAAJALYCAQUCZEIEAmZSCQD8BwQFAmFKAgRidXJuCQDMCAIFAmRCBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJWBQJkQgUDbmlsAwkAAAIFAmZSBQJmUgQCZlYJAQJkaQMJAQEtAQUCY20JAQEtAQUCY24AAAQCZmgIBQJmVgJfMQQCY1oIBQJmVgJfMgQCZmoJAQJkbQIFAmRoBQJjWgMJAAACBQJmagUCZmoJAM4IAgUCY28FAmZoCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQ11bnN0YWtlQW5kR2V0AQJkSAQCZlcDCQECIT0CCQCQAwEIBQJkeghwYXltZW50cwAACQACAQIYTm8gcGF5bWVudHMgYXJlIGV4cGVjdGVkBgMJAAACBQJmVwUCZlcEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJkaAkBAmRhAwkAtgIBAAAJALYCAQAACQC2AgEAAAQCZk0JAPwHBAUCYmYCB3Vuc3Rha2UJAMwIAgkA2AQBBQJiWAkAzAgCBQJkSAUDbmlsBQNuaWwDCQAAAgUCZk0FAmZNBAJjRwkBAmJUBAkA2AQBCAUCZHoNdHJhbnNhY3Rpb25JZAkA2AQBBQJiWAUCZEgIBQJkegZjYWxsZXIEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJjRwJfOQQCY28IBQJjRwNfMTAEAmZYAwMJAQJhTAAGCQAAAgUCY2EFAW4JAAIBCQCsAgICLEdldCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbi4gU3RhdHVzID0gCQCkAwEFAmNhBgMJAAACBQJmWAUCZlgEAmZSCQD8BwQFAmFKAgRidXJuCQDMCAIFAmRIBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJYBQJkSAUDbmlsAwkAAAIFAmZSBQJmUgQCZlkJAQJkaQMJAQEtAQUCY20JAQEtAQUCY24AAAQCZmgIBQJmWQJfMQQCY1oIBQJmWQJfMgQCZmoJAQJkbQIFAmRoBQJjWgMJAAACBQJmagUCZmoJAM4IAgUCY28FAmZoCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6ARN1bnN0YWtlQW5kR2V0Tm9MZXNzAwJmTAJmWgJmVQQCZkMDCQECYUwABgkAAAIFAmFZBQFuBAJldgkAzAgCAwkBASEBBQJmQwYJAAIBAiFnZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkeghwYXltZW50cwAABgkAAgECGG5vIHBheW1lbnRzIGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmV2BQJldgQCZGgJAQJkYQMJALYCAQAACQC2AgEAAAkAtgIBAAAEAmZNCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYVoJAMwIAgUCZkwFA25pbAUDbmlsAwkAAAIFAmZNBQJmTQQCY0cJAQJiVAQJANgEAQgFAmR6DXRyYW5zYWN0aW9uSWQJANgEAQUCYVoFAmZMCAUCZHoGY2FsbGVyBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjbwgFAmNHA18xMAQCZ2EJAMwIAgMJAGcCBQJjbQUCZloGCQACAQkAuQkCCQDMCAICLGFtb3VudCBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZloFA25pbAIACQDMCAIDCQBnAgUCY24FAmZVBgkAAgEJALkJAgkAzAgCAitwcmljZSBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZlUFA25pbAIABQNuaWwDCQAAAgUCZ2EFAmdhBAJmUgkA/AcEBQJhSgIEYnVybgkAzAgCBQJmTAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJhWgUCZkwFA25pbAMJAAACBQJmUgUCZlIEAmdiCQECZGkDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZoCAUCZ2ICXzEEAmNaCAUCZ2ICXzIEAmZqCQECZG0CBQJkaAUCY1oDCQAAAgUCZmoFAmZqCQDOCAIFAmNvBQJmaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEIYWN0aXZhdGUCAmdjAmdkAwkBAiE9AgkApQgBCAUCZHoGY2FsbGVyCQClCAEFAmFKCQACAQIScGVybWlzc2lvbnMgZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFhAAUCZ2MJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFiAAUCZ2QFA25pbAIHc3VjY2VzcwJkegEKcmVmcmVzaEtMcAAEAmdlCQELdmFsdWVPckVsc2UCCQCfCAEFAmFnAAAEAmdmAwkAZwIJAGUCBQZoZWlnaHQFAmdlBQJhagUEdW5pdAkBAmFHAQkAuQkCCQDMCAIJAKQDAQUCYWoJAMwIAgIvIGJsb2NrcyBoYXZlIG5vdCBwYXNzZWQgc2luY2UgdGhlIHByZXZpb3VzIGNhbGwFA25pbAIAAwkAAAIFAmdmBQJnZgQCZHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAqAMBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFAmFmAgEwCQECYUkBAgtpbnZhbGlkIGtMcAQCZ2cJAQJkaQMAAAAAAAAEAmdoCAUCZ2cCXzEEAmNaCAUCZ2cCXzIEAmRsAwkBAiE9AgUCZHQFAmNaBQJnaAkBAmFHAQISbm90aGluZyB0byByZWZyZXNoCQCUCgIFAmRsCQCmAwEFAmNaCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6ARxnZXRQb29sQ29uZmlnV3JhcHBlclJFQURPTkxZAAkAlAoCBQNuaWwJAQJhTgACZHoBHGdldEFjY0JhbGFuY2VXcmFwcGVyUkVBRE9OTFkBAmJ4CQCUCgIFA25pbAkBAmJ3AQUCYngCZHoBGWNhbGNQcmljZXNXcmFwcGVyUkVBRE9OTFkDAmJFAmJGAmJKBAJiUwkBAmJJAwUCYkUFAmJGBQJiSgkAlAoCBQNuaWwJAMwIAgkApgMBCQCRAwIFAmJTAAAJAMwIAgkApgMBCQCRAwIFAmJTAAEJAMwIAgkApgMBCQCRAwIFAmJTAAIFA25pbAJkegEUdG9YMThXcmFwcGVyUkVBRE9OTFkCAUUBRgkAlAoCBQNuaWwJAKYDAQkBAUQCBQFFBQFGAmR6ARZmcm9tWDE4V3JhcHBlclJFQURPTkxZAgFIAUkJAJQKAgUDbmlsCQEBRwIJAKcDAQUBSAUBSQJkegEeY2FsY1ByaWNlQmlnSW50V3JhcHBlclJFQURPTkxZAgJiegJiQQkAlAoCBQNuaWwJAKYDAQkBAmJ5AgkApwMBBQJiegkApwMBBQJiQQJkegEjZXN0aW1hdGVQdXRPcGVyYXRpb25XcmFwcGVyUkVBRE9OTFkJAmJVAmNxAmNyAmNzAmN0AmN1AVgCY3YCY3cJAJQKAgUDbmlsCQECY3AJBQJiVQUCY3EFAmNyBQJjcwUCY3QFAmN1BQFYBQJjdgUCY3cCZHoBI2VzdGltYXRlR2V0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZBAJiVQJiVgJiVwFYBAJjRwkBAmJUBAUCYlUFAmJWBQJiVwkBEUBleHRyTmF0aXZlKDEwNjIpAQUBWAkAlAoCBQNuaWwJAJwKCggFAmNHAl8xCAUCY0cCXzIIBQJjRwJfMwgFAmNHAl80CAUCY0cCXzUIBQJjRwJfNggFAmNHAl83CQCmAwEIBQJjRwJfOAgFAmNHAl85CAUCY0cDXzEwAmR6AQ1zdGF0c1JFQURPTkxZAAQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmdpCQCRAwIFAmJLBQFyBAJnagkAkQMCBQJiSwUBcwQCY3oJAJEDAgUCYksFAXYEAmNBCQCRAwIFAmJLBQF3BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJnawgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmdsCQECYncBBQJnaQQCZ20JAQJidwEFAmdqBAJnbgMJAAACBQJnawAACQDMCAIFAWUJAMwIAgUBZQkAzAgCBQFlBQNuaWwJAQJiSQMFAmdsBQJnbQUCZ2sEAmNoAAAEAmdvCQEBRwIJAJEDAgUCZ24AAQUBYgQCZ3AJAQFHAgkAkQMCBQJnbgACBQFiBAJncQkBBXZhbHVlAQkAmggCBQJhSgkBAmF1AQkApQgBBQR0aGlzCQCUCgIFA25pbAkAuQkCCQDMCAICDiVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCZ2wJAMwIAgkApAMBBQJnbQkAzAgCCQCkAwEFAmdrCQDMCAIJAKQDAQUCY2gJAMwIAgkApAMBBQJnbwkAzAgCCQCkAwEFAmdwCQDMCAIJAKQDAQUCZ3EFA25pbAUBagJkegEgZXZhbHVhdGVQdXRCeUFtb3VudEFzc2V0UkVBRE9OTFkBAmNyBAJiSwkBAmFOAAQCYlgJANkEAQkAkQMCBQJiSwUBcQQCY3gJAJEDAgUCYksFAXIEAmJZCQDZBAEFAmN4BAJjeQkAkQMCBQJiSwUBcwQCYloJANkEAQUCY3kEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJnawgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmdsCQECYncBBQJjeAQCZ20JAQJidwEFAmN5BAJiRwkBAUQCBQJnbAUCYkwEAmJICQEBRAIFAmdtBQJiTQQCY2cDCQAAAgUCZ2sAAAUBZQkBAmJ5AgUCYkgFAmJHBAJjRAkBAUQCBQJjcgUCYkwEAmNFCQC8AgMFAmNEBQJjZwUBZAQCY3QJAQFHAgUCY0UFAmJNBAJkRgkBAmNwCQIAAKDCHgUCY3IFAmJZBQJjdAUCYloCAAYHBAJjTwgFAmRGAl8xBAJncggFAmRGAl8zBAJjYwgFAmRGAl80BAJjZQgFAmRGAl81BAJjYggFAmRGAl82CQCUCgIFA25pbAkAuQkCCQDMCAICECVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJjTwkAzAgCCQCkAwEJAQFHAgUCY2cFAWIJAMwIAgkApAMBBQJjYwkAzAgCCQCkAwEFAmNlCQDMCAIJAKQDAQUCY2IJAMwIAgUCY2EJAMwIAgkApAMBBQJjcgkAzAgCCQCkAwEFAmN0BQNuaWwFAWoCZHoBH2V2YWx1YXRlUHV0QnlQcmljZUFzc2V0UkVBRE9OTFkBAmN0BAJiSwkBAmFOAAQCYlgJANkEAQkAkQMCBQJiSwUBcQQCY3gJAJEDAgUCYksFAXIEAmJZCQDZBAEFAmN4BAJjeQkAkQMCBQJiSwUBcwQCYloJANkEAQUCY3kEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJnawgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmdzCQECYncBBQJjeAQCZ3QJAQJidwEFAmN5BAJndQkBAUQCBQJncwUCYkwEAmd2CQEBRAIFAmd0BQJiTQQCY2cDCQAAAgUCZ2sAAAUBZQkBAmJ5AgUCZ3YFAmd1BAJjRQkBAUQCBQJjdAUCYk0EAmNECQC8AgMFAmNFBQFkBQJjZwQCY3IJAQFHAgUCY0QFAmJMBAJkRgkBAmNwCQIAAKDCHgUCY3IFAmJZBQJjdAUCYloCAAYHBAJjTwgFAmRGAl8xBAJncggFAmRGAl8zBAJjYwgFAmRGAl80BAJjZQgFAmRGAl81BAJjYggFAmRGAl82CQCUCgIFA25pbAkAuQkCCQDMCAICECVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJjTwkAzAgCCQCkAwEJAQFHAgUCY2cFAWIJAMwIAgkApAMBBQJjYwkAzAgCCQCkAwEFAmNlCQDMCAIJAKQDAQUCY2IJAMwIAgUCY2EJAMwIAgkApAMBBQJjcgkAzAgCCQCkAwEFAmN0BQNuaWwFAWoCZHoBE2V2YWx1YXRlR2V0UkVBRE9OTFkCAmd3Amd4BAJjRwkBAmJUBAIABQJndwUCZ3gFBHRoaXMEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmNjCAUCY0cCXzUEAmNlCAUCY0cCXzYEAmNiCAUCY0cCXzcEAmNoCAUCY0cCXzgEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJjRwJfOQkAlAoCBQNuaWwJALkJAgkAzAgCAg4lZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmNtCQDMCAIJAKQDAQUCY24JAMwIAgkApAMBBQJjYwkAzAgCCQCkAwEFAmNlCQDMCAIJAKQDAQUCY2IJAMwIAgkApgMBBQJjaAkAzAgCCQCkAwEFAmNhBQNuaWwFAWoBAmd5AQJnegAEAmdBBAJkSwkBAmVNAAMJAAECBQJkSwIKQnl0ZVZlY3RvcgQCZVEFAmRLBQJlUQMJAAECBQJkSwIEVW5pdAgFAmd5D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yBAJkSwUCZ3kDCQABAgUCZEsCBU9yZGVyBAJkcAUCZEsEAmdCCQECYU0ABAJhegkBAmRvAQUCZHAEAmFBCQD0AwMIBQJkcAlib2R5Qnl0ZXMJAJEDAggFAmRwBnByb29mcwAACAUCZHAPc2VuZGVyUHVibGljS2V5BAJhQgkA9AMDCAUCZHAJYm9keUJ5dGVzCQCRAwIIBQJkcAZwcm9vZnMAAQUCZ0IDAwMFAmF6BQJhQQcFAmFCBwYJAQJheQMFAmF6BQJhQQUCYUIDCQABAgUCZEsCFFNldFNjcmlwdFRyYW5zYWN0aW9uBAJlTgUCZEsEAmdDCQD2AwEJAQV2YWx1ZQEIBQJlTgZzY3JpcHQEAmdECQDbBAEJAQV2YWx1ZQEJAJ0IAgUCYUoJAQJhdwAEAmdFCQDxBwEFBHRoaXMDAwkAAAIFAmdEBQJnQwkBAiE9AgUCZ0UFAmdDBwYJAPQDAwgFAmd5CWJvZHlCeXRlcwkAkQMCCAUCZ3kGcHJvb2ZzAAAFAmdBCQD0AwMIBQJneQlib2R5Qnl0ZXMJAJEDAggFAmd5BnByb29mcwAABQJnQTbwpA0=",
    "chainId": 84,
    "height": 2349743,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5UPMhDtunkA4g3W78bHExPvzNxqRASQ2HL2KruDMwD9D
Next: 9Gi5juUU4RorWGUAG4MsaX9fMDxHQniD719ejh6PkWP6

Diff: 

OldNewDifferences
703703         let prId = estPut._13
704704         let amAssetPmt = toBigInt(value(i.payments[0]).amount)
705705         let prAssetPmt = toBigInt(value(i.payments[1]).amount)
706-        let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
707-        if ((currentKLp == currentKLp))
706+        let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amAssetPmt)
707+        if ((amountAssetBalance == amountAssetBalance))
708708             then {
709-                let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
710-                if ((emitInv == emitInv))
709+                let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - prAssetPmt)
710+                if ((priceAssetBalance == priceAssetBalance))
711711                     then {
712-                        let emitInvLegacy =                         match emitInv {
713-                            case legacyFactoryContract: Address => 
714-                                invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
715-                            case _ => 
716-                                unit
717-                        }
718-                        if ((emitInvLegacy == emitInvLegacy))
712+                        let lpAssetEmission = toBigInt(value(assetInfo(cfgLpAssetId)).quantity)
713+                        if ((lpAssetEmission == lpAssetEmission))
719714                             then {
720-                                let slippageAInv = if ((amDiff > 0))
721-                                    then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
722-                                    else nil
723-                                if ((slippageAInv == slippageAInv))
715+                                let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
716+                                if ((currentKLp == currentKLp))
724717                                     then {
725-                                        let slippagePInv = if ((prDiff > 0))
726-                                            then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
727-                                            else nil
728-                                        if ((slippagePInv == slippagePInv))
718+                                        let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
719+                                        if ((emitInv == emitInv))
729720                                             then {
730-                                                let lpTransfer = if (shouldAutoStake)
721+                                                let emitInvLegacy =                                                 match emitInv {
722+                                                    case legacyFactoryContract: Address => 
723+                                                        invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
724+                                                    case _ => 
725+                                                        unit
726+                                                }
727+                                                if ((emitInvLegacy == emitInvLegacy))
731728                                                     then {
732-                                                        let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
733-                                                        if ((slpStakeInv == slpStakeInv))
734-                                                            then nil
735-                                                            else throw("Strict value is not equal to itself.")
736-                                                        }
737-                                                    else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
738-                                                let $t03211432179 = refreshKLpInternal(0, 0, 0)
739-                                                let refreshKLpActions = $t03211432179._1
740-                                                let updatedKLp = $t03211432179._2
741-                                                let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amAssetPmt)
742-                                                let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - prAssetPmt)
743-                                                let lpAssetEmission = toBigInt(value(assetInfo(cfgLpAssetId)).quantity)
744-                                                let error = throwErr(makeString([toString(amountAssetBalance), toString(priceAssetBalance), toString(lpAssetEmission), toString(currentKLp), toString(updatedKLp)], " "))
745-                                                if ((error == error))
746-                                                    then {
747-                                                        let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
748-                                                        if ((isUpdatedKLpValid == isUpdatedKLpValid))
749-                                                            then ((state ++ lpTransfer) ++ refreshKLpActions)
729+                                                        let slippageAInv = if ((amDiff > 0))
730+                                                            then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
731+                                                            else nil
732+                                                        if ((slippageAInv == slippageAInv))
733+                                                            then {
734+                                                                let slippagePInv = if ((prDiff > 0))
735+                                                                    then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
736+                                                                    else nil
737+                                                                if ((slippagePInv == slippagePInv))
738+                                                                    then {
739+                                                                        let lpTransfer = if (shouldAutoStake)
740+                                                                            then {
741+                                                                                let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
742+                                                                                if ((slpStakeInv == slpStakeInv))
743+                                                                                    then nil
744+                                                                                    else throw("Strict value is not equal to itself.")
745+                                                                                }
746+                                                                            else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
747+                                                                        let $t03240732472 = refreshKLpInternal(0, 0, 0)
748+                                                                        let refreshKLpActions = $t03240732472._1
749+                                                                        let updatedKLp = $t03240732472._2
750+                                                                        let error = throwErr(makeString([toString(amountAssetBalance), toString(priceAssetBalance), toString(lpAssetEmission), toString(currentKLp), toString(updatedKLp)], " "))
751+                                                                        if ((error == error))
752+                                                                            then {
753+                                                                                let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
754+                                                                                if ((isUpdatedKLpValid == isUpdatedKLpValid))
755+                                                                                    then ((state ++ lpTransfer) ++ refreshKLpActions)
756+                                                                                    else throw("Strict value is not equal to itself.")
757+                                                                                }
758+                                                                            else throw("Strict value is not equal to itself.")
759+                                                                        }
760+                                                                    else throw("Strict value is not equal to itself.")
761+                                                                }
750762                                                             else throw("Strict value is not equal to itself.")
751763                                                         }
752764                                                     else throw("Strict value is not equal to itself.")
775787         let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
776788         if ((currentKLp == currentKLp))
777789             then {
778-                let $t03324533310 = refreshKLpInternal(0, 0, 0)
779-                let refreshKLpActions = $t03324533310._1
780-                let updatedKLp = $t03324533310._2
790+                let $t03325333318 = refreshKLpInternal(0, 0, 0)
791+                let refreshKLpActions = $t03325333318._1
792+                let updatedKLp = $t03325333318._2
781793                 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
782794                 if ((isUpdatedKLpValid == isUpdatedKLpValid))
783795                     then (state ++ refreshKLpActions)
822834                     else throwErr("payment asset is not supported")
823835             let userAddress = i.caller
824836             let txId = i.transactionId
825-            let $t03449534647 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
826-            if (($t03449534647 == $t03449534647))
837+            let $t03450334655 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
838+            if (($t03450334655 == $t03450334655))
827839                 then {
828-                    let paymentInAmountAsset = $t03449534647._5
829-                    let bonus = $t03449534647._4
830-                    let feeAmount = $t03449534647._3
831-                    let commonState = $t03449534647._2
832-                    let emitAmountEstimated = $t03449534647._1
840+                    let paymentInAmountAsset = $t03450334655._5
841+                    let bonus = $t03450334655._4
842+                    let feeAmount = $t03450334655._3
843+                    let commonState = $t03450334655._2
844+                    let emitAmountEstimated = $t03450334655._1
833845                     let emitAmount = if (if ((minOutAmount > 0))
834846                         then (minOutAmount > emitAmountEstimated)
835847                         else false)
849861                             let sendFee = if ((feeAmount > 0))
850862                                 then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
851863                                 else nil
852-                            let $t03523335430 = if ((this == feeCollectorAddress))
864+                            let $t03524135438 = if ((this == feeCollectorAddress))
853865                                 then $Tuple2(0, 0)
854866                                 else if (paymentInAmountAsset)
855867                                     then $Tuple2(-(feeAmount), 0)
856868                                     else $Tuple2(0, -(feeAmount))
857-                            let amountAssetBalanceDelta = $t03523335430._1
858-                            let priceAssetBalanceDelta = $t03523335430._2
859-                            let $t03543335541 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
860-                            let refreshKLpActions = $t03543335541._1
861-                            let updatedKLp = $t03543335541._2
869+                            let amountAssetBalanceDelta = $t03524135438._1
870+                            let priceAssetBalanceDelta = $t03524135438._2
871+                            let $t03544135549 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
872+                            let refreshKLpActions = $t03544135549._1
873+                            let updatedKLp = $t03544135549._2
862874                             let kLp = value(getString(keyKLp))
863875                             let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
864876                             if ((isUpdatedKLpValid == isUpdatedKLpValid))
876888 
877889 @Callable(i)
878890 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
879-    let $t03584736004 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
880-    let emitAmountEstimated = $t03584736004._1
881-    let commonState = $t03584736004._2
882-    let feeAmount = $t03584736004._3
883-    let bonus = $t03584736004._4
884-    let paymentInAmountAsset = $t03584736004._5
891+    let $t03585536012 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
892+    let emitAmountEstimated = $t03585536012._1
893+    let commonState = $t03585536012._2
894+    let feeAmount = $t03585536012._3
895+    let bonus = $t03585536012._4
896+    let paymentInAmountAsset = $t03585536012._5
885897     $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
886898     }
887899 
916928             let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(paymentAmount))
917929             let userAddress = i.caller
918930             let txId = i.transactionId
919-            let $t03689837051 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
920-            if (($t03689837051 == $t03689837051))
931+            let $t03690637059 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
932+            if (($t03690637059 == $t03690637059))
921933                 then {
922-                    let outInAmountAsset = $t03689837051._5
923-                    let bonus = $t03689837051._4
924-                    let feeAmount = $t03689837051._3
925-                    let commonState = $t03689837051._2
926-                    let amountEstimated = $t03689837051._1
934+                    let outInAmountAsset = $t03690637059._5
935+                    let bonus = $t03690637059._4
936+                    let feeAmount = $t03690637059._3
937+                    let commonState = $t03690637059._2
938+                    let amountEstimated = $t03690637059._1
927939                     let amount = if (if ((minOutAmount > 0))
928940                         then (minOutAmount > amountEstimated)
929941                         else false)
936948                             let sendFee = if ((feeAmount > 0))
937949                                 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
938950                                 else nil
939-                            let $t03755137798 = {
951+                            let $t03755937806 = {
940952                                 let feeAmountForCalc = if ((this == feeCollectorAddress))
941953                                     then 0
942954                                     else feeAmount
944956                                     then $Tuple2(-((amount + feeAmountForCalc)), 0)
945957                                     else $Tuple2(0, -((amount + feeAmountForCalc)))
946958                                 }
947-                            let amountAssetBalanceDelta = $t03755137798._1
948-                            let priceAssetBalanceDelta = $t03755137798._2
949-                            let $t03780137909 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
950-                            let refreshKLpActions = $t03780137909._1
951-                            let updatedKLp = $t03780137909._2
959+                            let amountAssetBalanceDelta = $t03755937806._1
960+                            let priceAssetBalanceDelta = $t03755937806._2
961+                            let $t03780937917 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
962+                            let refreshKLpActions = $t03780937917._1
963+                            let updatedKLp = $t03780937917._2
952964                             let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
953965                             if ((isUpdatedKLpValid == isUpdatedKLpValid))
954966                                 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
965977 
966978 @Callable(i)
967979 func getOneTknREADONLY (outAssetId,paymentAmount) = {
968-    let $t03816638322 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
969-    let amountEstimated = $t03816638322._1
970-    let commonState = $t03816638322._2
971-    let feeAmount = $t03816638322._3
972-    let bonus = $t03816638322._4
973-    let outInAmountAsset = $t03816638322._5
980+    let $t03817438330 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
981+    let amountEstimated = $t03817438330._1
982+    let commonState = $t03817438330._2
983+    let feeAmount = $t03817438330._3
984+    let bonus = $t03817438330._4
985+    let outInAmountAsset = $t03817438330._5
974986     $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
975987     }
976988 
10051017             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
10061018             if ((unstakeInv == unstakeInv))
10071019                 then {
1008-                    let $t03922439375 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1009-                    if (($t03922439375 == $t03922439375))
1020+                    let $t03923239383 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1021+                    if (($t03923239383 == $t03923239383))
10101022                         then {
1011-                            let outInAmountAsset = $t03922439375._5
1012-                            let bonus = $t03922439375._4
1013-                            let feeAmount = $t03922439375._3
1014-                            let commonState = $t03922439375._2
1015-                            let amountEstimated = $t03922439375._1
1023+                            let outInAmountAsset = $t03923239383._5
1024+                            let bonus = $t03923239383._4
1025+                            let feeAmount = $t03923239383._3
1026+                            let commonState = $t03923239383._2
1027+                            let amountEstimated = $t03923239383._1
10161028                             let amount = if (if ((minOutAmount > 0))
10171029                                 then (minOutAmount > amountEstimated)
10181030                                 else false)
10251037                                     let sendFee = if ((feeAmount > 0))
10261038                                         then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
10271039                                         else nil
1028-                                    let $t03987040117 = {
1040+                                    let $t03987840125 = {
10291041                                         let feeAmountForCalc = if ((this == feeCollectorAddress))
10301042                                             then 0
10311043                                             else feeAmount
10331045                                             then $Tuple2(-((amount + feeAmountForCalc)), 0)
10341046                                             else $Tuple2(0, -((amount + feeAmountForCalc)))
10351047                                         }
1036-                                    let amountAssetBalanceDelta = $t03987040117._1
1037-                                    let priceAssetBalanceDelta = $t03987040117._2
1038-                                    let $t04012040228 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1039-                                    let refreshKLpActions = $t04012040228._1
1040-                                    let updatedKLp = $t04012040228._2
1048+                                    let amountAssetBalanceDelta = $t03987840125._1
1049+                                    let priceAssetBalanceDelta = $t03987840125._2
1050+                                    let $t04012840236 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1051+                                    let refreshKLpActions = $t04012840236._1
1052+                                    let updatedKLp = $t04012840236._2
10411053                                     let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10421054                                     if ((isUpdatedKLpValid == isUpdatedKLpValid))
10431055                                         then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
10661078     let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10671079     if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10681080         then {
1069-            let $t04117641258 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1070-            let refreshKLpActions = $t04117641258._1
1071-            let updatedKLp = $t04117641258._2
1081+            let $t04118441266 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1082+            let refreshKLpActions = $t04118441266._1
1083+            let updatedKLp = $t04118441266._2
10721084             let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10731085             if ((isUpdatedKLpValid == isUpdatedKLpValid))
10741086                 then (state ++ refreshKLpActions)
10961108                 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10971109                 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10981110                     then {
1099-                        let $t04220942290 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1100-                        let refreshKLpActions = $t04220942290._1
1101-                        let updatedKLp = $t04220942290._2
1111+                        let $t04221742298 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1112+                        let refreshKLpActions = $t04221742298._1
1113+                        let updatedKLp = $t04221742298._2
11021114                         let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11031115                         if ((isUpdatedKLpValid == isUpdatedKLpValid))
11041116                             then (state ++ refreshKLpActions)
11381150                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
11391151                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11401152                                 then {
1141-                                    let $t04341343494 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1142-                                    let refreshKLpActions = $t04341343494._1
1143-                                    let updatedKLp = $t04341343494._2
1153+                                    let $t04342143502 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1154+                                    let refreshKLpActions = $t04342143502._1
1155+                                    let updatedKLp = $t04342143502._2
11441156                                     let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11451157                                     if ((isUpdatedKLpValid == isUpdatedKLpValid))
11461158                                         then (state ++ refreshKLpActions)
11871199                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11881200                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11891201                                 then {
1190-                                    let $t04478644867 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1191-                                    let refreshKLpActions = $t04478644867._1
1192-                                    let updatedKLp = $t04478644867._2
1202+                                    let $t04479444875 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1203+                                    let refreshKLpActions = $t04479444875._1
1204+                                    let updatedKLp = $t04479444875._2
11931205                                     let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11941206                                     if ((isUpdatedKLpValid == isUpdatedKLpValid))
11951207                                         then (state ++ refreshKLpActions)
12221234     if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
12231235         then {
12241236             let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp"))
1225-            let $t04605446118 = refreshKLpInternal(0, 0, 0)
1226-            let kLpUpdateActions = $t04605446118._1
1227-            let updatedKLp = $t04605446118._2
1237+            let $t04606246126 = refreshKLpInternal(0, 0, 0)
1238+            let kLpUpdateActions = $t04606246126._1
1239+            let updatedKLp = $t04606246126._2
12281240             let actions = if ((kLp != updatedKLp))
12291241                 then kLpUpdateActions
12301242                 else throwErr("nothing to refresh")

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 
114114 let keyKLp = makeString(["%s", "kLp"], SEP)
115115 
116116 let keyKLpRefreshedHeight = makeString(["%s", "kLpRefreshedHeight"], SEP)
117117 
118118 let keyKLpRefreshDelay = makeString(["%s", "refreshKLpDelay"], SEP)
119119 
120120 let kLpRefreshDelayDefault = 30
121121 
122122 let kLpRefreshDelay = valueOrElse(getInteger(this, keyKLpRefreshDelay), kLpRefreshDelayDefault)
123123 
124124 func keyFactoryConfig () = "%s__factoryConfig"
125125 
126126 
127127 func keyMatcherPub () = "%s%s__matcher__publicKey"
128128 
129129 
130130 func keyMappingPoolContractAddressToPoolAssets (poolContractAddress) = (("%s%s%s__" + poolContractAddress) + "__mappings__poolContract2LpAsset")
131131 
132132 
133133 func keyPoolConfig (iAmtAsset,iPriceAsset) = (((("%d%d%s__" + iAmtAsset) + "__") + iPriceAsset) + "__config")
134134 
135135 
136136 func keyMappingsBaseAsset2internalId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2internalId__" + baseAssetStr)
137137 
138138 
139139 func keyAllPoolsShutdown () = "%s__shutdown"
140140 
141141 
142142 func keyPoolWeight (contractAddress) = ("%s%s__poolWeight__" + contractAddress)
143143 
144144 
145145 func keyAllowedLpScriptHash () = "%s__allowedLpScriptHash"
146146 
147147 
148148 let keyFeeCollectorAddress = "%s__feeCollectorAddress"
149149 
150150 func throwOrderError (orderValid,senderValid,matcherValid) = throw(((((("order validation failed: orderValid=" + toString(orderValid)) + " senderValid=") + toString(senderValid)) + " matcherValid=") + toString(matcherValid)))
151151 
152152 
153153 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
154154 
155155 
156156 func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
157157 
158158 
159159 func throwErr (msg) = throw(makeString(["lp.ride:", msg], " "))
160160 
161161 
162162 func fmtErr (msg) = makeString(["lp.ride:", msg], " ")
163163 
164164 
165165 let factoryContract = addressFromStringValue(getStringOrFail(this, fc()))
166166 
167167 let feeCollectorAddress = addressFromStringValue(getStringOrFail(factoryContract, keyFeeCollectorAddress))
168168 
169169 func isGlobalShutdown () = valueOrElse(getBoolean(factoryContract, keyAllPoolsShutdown()), false)
170170 
171171 
172172 func getMatcherPubOrFail () = fromBase58String(getStringOrFail(factoryContract, keyMatcherPub()))
173173 
174174 
175175 func getPoolConfig () = {
176176     let amtAsset = getStringOrFail(this, aa())
177177     let priceAsset = getStringOrFail(this, pa())
178178     let iPriceAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(priceAsset))
179179     let iAmtAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(amtAsset))
180180     split(getStringOrFail(factoryContract, keyPoolConfig(toString(iAmtAsset), toString(iPriceAsset))), SEP)
181181     }
182182 
183183 
184184 func parseAssetId (input) = if ((input == wavesString))
185185     then unit
186186     else fromBase58String(input)
187187 
188188 
189189 func assetIdToString (input) = if ((input == unit))
190190     then wavesString
191191     else toBase58String(value(input))
192192 
193193 
194194 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]))
195195 
196196 
197197 let poolConfigParsed = parsePoolConfig(getPoolConfig())
198198 
199199 let $t079158081 = poolConfigParsed
200200 
201201 let cfgPoolAddress = $t079158081._1
202202 
203203 let cfgPoolStatus = $t079158081._2
204204 
205205 let cfgLpAssetId = $t079158081._3
206206 
207207 let cfgAmountAssetId = $t079158081._4
208208 
209209 let cfgPriceAssetId = $t079158081._5
210210 
211211 let cfgAmountAssetDecimals = $t079158081._6
212212 
213213 let cfgPriceAssetDecimals = $t079158081._7
214214 
215215 func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP)
216216 
217217 
218218 let stakingContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactoryStakingContract]), "incorrect staking address")
219219 
220220 let slippageContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactorySlippageContract]), "incorrect staking address")
221221 
222222 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)
223223 
224224 
225225 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)
226226 
227227 
228228 func getAccBalance (assetId) = if ((assetId == "WAVES"))
229229     then wavesBalance(this).available
230230     else assetBalance(this, fromBase58String(assetId))
231231 
232232 
233233 func calcPriceBigInt (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
234234 
235235 
236236 func privateCalcPrice (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
237237     let amtAssetAmtX18 = toX18(amAmt, amAssetDcm)
238238     let priceAssetAmtX18 = toX18(prAmt, prAssetDcm)
239239     calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
240240     }
241241 
242242 
243243 func calcPrices (amAmt,prAmt,lpAmt) = {
244244     let cfg = getPoolConfig()
245245     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
246246     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
247247     let priceX18 = privateCalcPrice(amtAssetDcm, priceAssetDcm, amAmt, prAmt)
248248     let amAmtX18 = toX18(amAmt, amtAssetDcm)
249249     let prAmtX18 = toX18(prAmt, priceAssetDcm)
250250     let lpAmtX18 = toX18(lpAmt, scale8)
251251     let lpPriceInAmAssetX18 = calcPriceBigInt(amAmtX18, lpAmtX18)
252252     let lpPriceInPrAssetX18 = calcPriceBigInt(prAmtX18, lpAmtX18)
253253 [priceX18, lpPriceInAmAssetX18, lpPriceInPrAssetX18]
254254     }
255255 
256256 
257257 func calculatePrices (amAmt,prAmt,lpAmt) = {
258258     let prices = calcPrices(amAmt, prAmt, lpAmt)
259259 [fromX18(prices[0], scale8), fromX18(prices[1], scale8), fromX18(prices[2], scale8)]
260260     }
261261 
262262 
263263 func estimateGetOperation (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
264264     let cfg = getPoolConfig()
265265     let lpAssetId = cfg[idxPoolLPAssetId]
266266     let amAssetId = cfg[idxAmtAssetId]
267267     let prAssetId = cfg[idxPriceAssetId]
268268     let amAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
269269     let prAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
270270     let poolStatus = cfg[idxPoolStatus]
271271     let lpEmission = valueOrErrorMessage(assetInfo(fromBase58String(lpAssetId)), (("Asset " + lpAssetId) + " doesn't exist")).quantity
272272     if ((lpAssetId != pmtAssetId))
273273         then throw("Invalid asset passed.")
274274         else {
275275             let amBalance = getAccBalance(amAssetId)
276276             let amBalanceX18 = toX18(amBalance, amAssetDcm)
277277             let prBalance = getAccBalance(prAssetId)
278278             let prBalanceX18 = toX18(prBalance, prAssetDcm)
279279             let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
280280             let curPrice = fromX18(curPriceX18, scale8)
281281             let pmtLpAmtX18 = toX18(pmtLpAmt, scale8)
282282             let lpEmissionX18 = toX18(lpEmission, scale8)
283283             let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissionX18)
284284             let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissionX18)
285285             let outAmAmt = fromX18(outAmAmtX18, amAssetDcm)
286286             let outPrAmt = fromX18(outPrAmtX18, prAssetDcm)
287287             let state = if ((txId58 == ""))
288288                 then nil
289289                 else [ScriptTransfer(userAddress, outAmAmt, if ((amAssetId == "WAVES"))
290290                     then unit
291291                     else fromBase58String(amAssetId)), ScriptTransfer(userAddress, outPrAmt, if ((prAssetId == "WAVES"))
292292                     then unit
293293                     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)]
294294             $Tuple10(outAmAmt, outPrAmt, amAssetId, prAssetId, amBalance, prBalance, lpEmission, curPriceX18, poolStatus, state)
295295             }
296296     }
297297 
298298 
299299 func estimatePutOperation (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = {
300300     let cfg = getPoolConfig()
301301     let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
302302     let amAssetIdStr = cfg[idxAmtAssetId]
303303     let prAssetIdStr = cfg[idxPriceAssetId]
304304     let iAmtAssetId = cfg[idxIAmtAssetId]
305305     let iPriceAssetId = cfg[idxIPriceAssetId]
306306     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
307307     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
308308     let poolStatus = cfg[idxPoolStatus]
309309     let lpEmission = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
310310     let inAmAssetIdStr = toBase58String(valueOrElse(inAmAssetId, fromBase58String("WAVES")))
311311     let inPrAssetIdStr = toBase58String(valueOrElse(inPrAssetId, fromBase58String("WAVES")))
312312     if (if ((amAssetIdStr != inAmAssetIdStr))
313313         then true
314314         else (prAssetIdStr != inPrAssetIdStr))
315315         then throw("Invalid amt or price asset passed.")
316316         else {
317317             let amBalance = if (isEvaluate)
318318                 then getAccBalance(amAssetIdStr)
319319                 else (getAccBalance(amAssetIdStr) - inAmAssetAmt)
320320             let prBalance = if (isEvaluate)
321321                 then getAccBalance(prAssetIdStr)
322322                 else (getAccBalance(prAssetIdStr) - inPrAssetAmt)
323323             let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
324324             let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
325325             let userPriceX18 = calcPriceBigInt(inPrAssetAmtX18, inAmAssetAmtX18)
326326             let amBalanceX18 = toX18(amBalance, amtAssetDcm)
327327             let prBalanceX18 = toX18(prBalance, priceAssetDcm)
328328             let res = if ((lpEmission == 0))
329329                 then {
330330                     let curPriceX18 = zeroBigInt
331331                     let slippageX18 = zeroBigInt
332332                     let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
333333                     $Tuple5(fromX18(lpAmtX18, scale8), fromX18(inAmAssetAmtX18, amtAssetDcm), fromX18(inPrAssetAmtX18, priceAssetDcm), calcPriceBigInt((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
334334                     }
335335                 else {
336336                     let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
337337                     let slippageX18 = fraction(absBigInt((curPriceX18 - userPriceX18)), scale18, curPriceX18)
338338                     let slippageToleranceX18 = toX18(slippageTolerance, scale8)
339339                     if (if ((curPriceX18 != zeroBigInt))
340340                         then (slippageX18 > slippageToleranceX18)
341341                         else false)
342342                         then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18)))
343343                         else {
344344                             let lpEmissionX18 = toX18(lpEmission, scale8)
345345                             let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
346346                             let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
347347                             let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
348348                                 then $Tuple2(amViaPrX18, inPrAssetAmtX18)
349349                                 else $Tuple2(inAmAssetAmtX18, prViaAmX18)
350350                             let expAmtAssetAmtX18 = expectedAmts._1
351351                             let expPriceAssetAmtX18 = expectedAmts._2
352352                             let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
353353                             $Tuple5(fromX18(lpAmtX18, scale8), fromX18(expAmtAssetAmtX18, amtAssetDcm), fromX18(expPriceAssetAmtX18, priceAssetDcm), curPriceX18, slippageX18)
354354                             }
355355                     }
356356             let calcLpAmt = res._1
357357             let calcAmAssetPmt = res._2
358358             let calcPrAssetPmt = res._3
359359             let curPrice = fromX18(res._4, scale8)
360360             let slippageCalc = fromX18(res._5, scale8)
361361             if ((0 >= calcLpAmt))
362362                 then throw("Invalid calculations. LP calculated is less than zero.")
363363                 else {
364364                     let emitLpAmt = if (!(emitLp))
365365                         then 0
366366                         else calcLpAmt
367367                     let amDiff = (inAmAssetAmt - calcAmAssetPmt)
368368                     let prDiff = (inPrAssetAmt - calcPrAssetPmt)
369369                     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))]
370370                     $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEmission, lpAssetId, poolStatus, commonState, amDiff, prDiff, inAmAssetId, inPrAssetId)
371371                     }
372372             }
373373     }
374374 
375375 
376376 func calcKLp (amountBalance,priceBalance,lpEmission) = {
377377     let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 18, DOWN), big1, lpEmission)
378378     if ((lpEmission == big0))
379379         then big0
380380         else updatedKLp
381381     }
382382 
383383 
384384 func calcCurrentKLp (amountAssetDelta,priceAssetDelta,lpAssetEmissionDelta) = {
385385     let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amountAssetDelta)
386386     let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - priceAssetDelta)
387387     let lpAssetEmission = (toBigInt(value(assetInfo(cfgLpAssetId)).quantity) - lpAssetEmissionDelta)
388388     let currentKLp = calcKLp(amountAssetBalance, priceAssetBalance, lpAssetEmission)
389389     currentKLp
390390     }
391391 
392392 
393393 func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
394394     let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
395395     let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
396396     let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
397397     let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
398398     let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
399399     $Tuple2(actions, updatedKLp)
400400     }
401401 
402402 
403403 func validateUpdatedKLp (oldKLp,updatedKLp) = if ((updatedKLp >= oldKLp))
404404     then true
405405     else throwErr(makeString(["updated KLp lower than current KLp", toString(oldKLp), toString(updatedKLp)], " "))
406406 
407407 
408408 func validateMatcherOrderAllowed (order) = {
409409     let amountAssetAmount = order.amount
410410     let priceAssetAmount = fraction(order.amount, order.price, scale8, FLOOR)
411411     let $t02034120553 = if ((order.orderType == Buy))
412412         then $Tuple2(amountAssetAmount, -(priceAssetAmount))
413413         else $Tuple2(-(amountAssetAmount), priceAssetAmount)
414414     let amountAssetBalanceDelta = $t02034120553._1
415415     let priceAssetBalanceDelta = $t02034120553._2
416416     if (if (if (isGlobalShutdown())
417417         then true
418418         else (cfgPoolStatus == PoolMatcherDisabled))
419419         then true
420420         else (cfgPoolStatus == PoolShutdown))
421421         then throw("Exchange operations disabled")
422422         else if (if ((order.assetPair.amountAsset != cfgAmountAssetId))
423423             then true
424424             else (order.assetPair.priceAsset != cfgPriceAssetId))
425425             then throw("Wrong order assets.")
426426             else {
427427                 let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
428428                 let $t02102421124 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
429429                 let unusedActions = $t02102421124._1
430430                 let kLpNew = $t02102421124._2
431431                 let isOrderValid = (kLpNew >= kLp)
432432                 isOrderValid
433433                 }
434434     }
435435 
436436 
437437 func commonGet (i) = if ((size(i.payments) != 1))
438438     then throw("exactly 1 payment is expected")
439439     else {
440440         let pmt = value(i.payments[0])
441441         let pmtAssetId = value(pmt.assetId)
442442         let pmtAmt = pmt.amount
443443         let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
444444         let outAmAmt = res._1
445445         let outPrAmt = res._2
446446         let poolStatus = parseIntValue(res._9)
447447         let state = res._10
448448         if (if (isGlobalShutdown())
449449             then true
450450             else (poolStatus == PoolShutdown))
451451             then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
452452             else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
453453         }
454454 
455455 
456456 func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2))
457457     then throw("exactly 2 payments are expected")
458458     else {
459459         let amAssetPmt = value(i.payments[0])
460460         let prAssetPmt = value(i.payments[1])
461461         let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp)
462462         let poolStatus = parseIntValue(estPut._8)
463463         if (if (if (isGlobalShutdown())
464464             then true
465465             else (poolStatus == PoolPutDisabled))
466466             then true
467467             else (poolStatus == PoolShutdown))
468468             then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus)))
469469             else estPut
470470         }
471471 
472472 
473473 func emit (amount) = {
474474     let emitInv = invoke(factoryContract, "emit", [amount], nil)
475475     if ((emitInv == emitInv))
476476         then {
477477             let emitInvLegacy =             match emitInv {
478478                 case legacyFactoryContract: Address => 
479479                     invoke(legacyFactoryContract, "emit", [amount], nil)
480480                 case _ => 
481481                     unit
482482             }
483483             if ((emitInvLegacy == emitInvLegacy))
484484                 then amount
485485                 else throw("Strict value is not equal to itself.")
486486             }
487487         else throw("Strict value is not equal to itself.")
488488     }
489489 
490490 
491491 func takeFee (amount) = {
492492     let feeAmount = fraction(amount, fee, scale8)
493493     $Tuple2((amount - feeAmount), feeAmount)
494494     }
495495 
496496 
497497 func calcPutOneToken (paymentAmountRaw,paymentAssetId,userAddress,txId) = {
498498     let isEval = (txId == unit)
499499     let amountBalanceRaw = getAccBalance(assetIdToString(cfgAmountAssetId))
500500     let priceBalanceRaw = getAccBalance(assetIdToString(cfgPriceAssetId))
501501     let paymentInAmountAsset = if ((paymentAssetId == cfgAmountAssetId))
502502         then true
503503         else if ((paymentAssetId == cfgPriceAssetId))
504504             then false
505505             else throwErr("invalid asset")
506506     let $t02380924102 = if (isEval)
507507         then $Tuple2(amountBalanceRaw, priceBalanceRaw)
508508         else if (paymentInAmountAsset)
509509             then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
510510             else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
511511     let amountBalanceOld = $t02380924102._1
512512     let priceBalanceOld = $t02380924102._2
513513     let $t02410624255 = if (paymentInAmountAsset)
514514         then $Tuple2(paymentAmountRaw, 0)
515515         else $Tuple2(0, paymentAmountRaw)
516516     let amountAssetAmountRaw = $t02410624255._1
517517     let priceAssetAmountRaw = $t02410624255._2
518518     let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
519519     let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
520520     let $t02437724436 = takeFee(paymentAmountRaw)
521521     let paymentAmount = $t02437724436._1
522522     let feeAmount = $t02437724436._2
523523     let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
524524     let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
525525     let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
526526     let priceNew = fromX18(priceNewX18, scale8)
527527     let paymentBalance = if (paymentInAmountAsset)
528528         then amountBalanceOld
529529         else priceBalanceOld
530530     let paymentBalanceBigInt = toBigInt(paymentBalance)
531531     let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
532532     let chechSupply = if ((supplyBigInt > big0))
533533         then true
534534         else throwErr("initial deposit requires all coins")
535535     if ((chechSupply == chechSupply))
536536         then {
537537             let depositBigInt = toBigInt(paymentAmount)
538538             let issueAmount = max([0, toInt(((supplyBigInt * (sqrtBigInt((scale18 + ((depositBigInt * scale18) / paymentBalanceBigInt)), 18, 18, DOWN) - scale18)) / scale18))])
539539             let commonState = if (isEval)
540540                 then nil
541541                 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))]
542542             let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
543543             let priceOld = fromX18(priceOldX18, scale8)
544544             let loss = {
545545                 let $t02591326080 = if (paymentInAmountAsset)
546546                     then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
547547                     else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
548548                 let amount = $t02591326080._1
549549                 let balance = $t02591326080._2
550550                 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
551551                 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
552552                 }
553553             $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset)
554554             }
555555         else throw("Strict value is not equal to itself.")
556556     }
557557 
558558 
559559 func calcGetOneToken (outAssetId,paymentAmount,paymentAssetId,userAddress,txId) = {
560560     let isEval = (txId == unit)
561561     let checks = [if ((paymentAssetId == cfgLpAssetId))
562562         then true
563563         else throwErr("invalid lp asset")]
564564     if ((checks == checks))
565565         then {
566566             let outInAmountAsset = if ((outAssetId == cfgAmountAssetId))
567567                 then true
568568                 else if ((outAssetId == cfgPriceAssetId))
569569                     then false
570570                     else throwErr("invalid asset")
571571             let balanceBigInt = if (outInAmountAsset)
572572                 then toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId)))
573573                 else toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId)))
574574             let amBalanceOld = getAccBalance(assetIdToString(cfgAmountAssetId))
575575             let prBalanceOld = getAccBalance(assetIdToString(cfgPriceAssetId))
576576             let outBalance = if (outInAmountAsset)
577577                 then amBalanceOld
578578                 else prBalanceOld
579579             let outBalanceBigInt = toBigInt(outBalance)
580580             let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
581581             let redeemedBigInt = toBigInt(paymentAmount)
582582             let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
583583             let $t02768227732 = takeFee(amountRaw)
584584             let totalAmount = $t02768227732._1
585585             let feeAmount = $t02768227732._2
586586             let $t02773627962 = if (outInAmountAsset)
587587                 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
588588                 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
589589             let outAmAmount = $t02773627962._1
590590             let outPrAmount = $t02773627962._2
591591             let amBalanceNew = $t02773627962._3
592592             let prBalanceNew = $t02773627962._4
593593             let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
594594             let priceNew = fromX18(priceNewX18, scale8)
595595             let commonState = if (isEval)
596596                 then nil
597597                 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)]
598598             let priceOldX18 = calcPriceBigInt(toX18(prBalanceOld, cfgPriceAssetDecimals), toX18(amBalanceOld, cfgAmountAssetDecimals))
599599             let priceOld = fromX18(priceOldX18, scale8)
600600             let loss = {
601601                 let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2)
602602                 fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset)
603603                 }
604604             $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset)
605605             }
606606         else throw("Strict value is not equal to itself.")
607607     }
608608 
609609 
610610 func managerPublicKeyOrUnit () = match getString(mpk()) {
611611     case s: String => 
612612         fromBase58String(s)
613613     case _: Unit => 
614614         unit
615615     case _ => 
616616         throw("Match error")
617617 }
618618 
619619 
620620 func pendingManagerPublicKeyOrUnit () = match getString(pmpk()) {
621621     case s: String => 
622622         fromBase58String(s)
623623     case _: Unit => 
624624         unit
625625     case _ => 
626626         throw("Match error")
627627 }
628628 
629629 
630630 func isManager (i) = match managerPublicKeyOrUnit() {
631631     case pk: ByteVector => 
632632         (i.callerPublicKey == pk)
633633     case _: Unit => 
634634         (i.caller == this)
635635     case _ => 
636636         throw("Match error")
637637 }
638638 
639639 
640640 func mustManager (i) = {
641641     let pd = throw("Permission denied")
642642     match managerPublicKeyOrUnit() {
643643         case pk: ByteVector => 
644644             if ((i.callerPublicKey == pk))
645645                 then true
646646                 else pd
647647         case _: Unit => 
648648             if ((i.caller == this))
649649                 then true
650650                 else pd
651651         case _ => 
652652             throw("Match error")
653653     }
654654     }
655655 
656656 
657657 @Callable(i)
658658 func setManager (pendingManagerPublicKey) = {
659659     let checkCaller = mustManager(i)
660660     if ((checkCaller == checkCaller))
661661         then {
662662             let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
663663             if ((checkManagerPublicKey == checkManagerPublicKey))
664664                 then [StringEntry(pmpk(), pendingManagerPublicKey)]
665665                 else throw("Strict value is not equal to itself.")
666666             }
667667         else throw("Strict value is not equal to itself.")
668668     }
669669 
670670 
671671 
672672 @Callable(i)
673673 func confirmManager () = {
674674     let pm = pendingManagerPublicKeyOrUnit()
675675     let hasPM = if (isDefined(pm))
676676         then true
677677         else throw("No pending manager")
678678     if ((hasPM == hasPM))
679679         then {
680680             let checkPM = if ((i.callerPublicKey == value(pm)))
681681                 then true
682682                 else throw("You are not pending manager")
683683             if ((checkPM == checkPM))
684684                 then [StringEntry(mpk(), toBase58String(value(pm))), DeleteEntry(pmpk())]
685685                 else throw("Strict value is not equal to itself.")
686686             }
687687         else throw("Strict value is not equal to itself.")
688688     }
689689 
690690 
691691 
692692 @Callable(i)
693693 func put (slippageTolerance,shouldAutoStake) = if ((0 > slippageTolerance))
694694     then throw("Invalid slippageTolerance passed")
695695     else {
696696         let estPut = commonPut(i, slippageTolerance, true)
697697         let emitLpAmt = estPut._2
698698         let lpAssetId = estPut._7
699699         let state = estPut._9
700700         let amDiff = estPut._10
701701         let prDiff = estPut._11
702702         let amId = estPut._12
703703         let prId = estPut._13
704704         let amAssetPmt = toBigInt(value(i.payments[0]).amount)
705705         let prAssetPmt = toBigInt(value(i.payments[1]).amount)
706-        let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
707-        if ((currentKLp == currentKLp))
706+        let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amAssetPmt)
707+        if ((amountAssetBalance == amountAssetBalance))
708708             then {
709-                let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
710-                if ((emitInv == emitInv))
709+                let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - prAssetPmt)
710+                if ((priceAssetBalance == priceAssetBalance))
711711                     then {
712-                        let emitInvLegacy =                         match emitInv {
713-                            case legacyFactoryContract: Address => 
714-                                invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
715-                            case _ => 
716-                                unit
717-                        }
718-                        if ((emitInvLegacy == emitInvLegacy))
712+                        let lpAssetEmission = toBigInt(value(assetInfo(cfgLpAssetId)).quantity)
713+                        if ((lpAssetEmission == lpAssetEmission))
719714                             then {
720-                                let slippageAInv = if ((amDiff > 0))
721-                                    then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
722-                                    else nil
723-                                if ((slippageAInv == slippageAInv))
715+                                let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
716+                                if ((currentKLp == currentKLp))
724717                                     then {
725-                                        let slippagePInv = if ((prDiff > 0))
726-                                            then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
727-                                            else nil
728-                                        if ((slippagePInv == slippagePInv))
718+                                        let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
719+                                        if ((emitInv == emitInv))
729720                                             then {
730-                                                let lpTransfer = if (shouldAutoStake)
721+                                                let emitInvLegacy =                                                 match emitInv {
722+                                                    case legacyFactoryContract: Address => 
723+                                                        invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
724+                                                    case _ => 
725+                                                        unit
726+                                                }
727+                                                if ((emitInvLegacy == emitInvLegacy))
731728                                                     then {
732-                                                        let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
733-                                                        if ((slpStakeInv == slpStakeInv))
734-                                                            then nil
735-                                                            else throw("Strict value is not equal to itself.")
736-                                                        }
737-                                                    else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
738-                                                let $t03211432179 = refreshKLpInternal(0, 0, 0)
739-                                                let refreshKLpActions = $t03211432179._1
740-                                                let updatedKLp = $t03211432179._2
741-                                                let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amAssetPmt)
742-                                                let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - prAssetPmt)
743-                                                let lpAssetEmission = toBigInt(value(assetInfo(cfgLpAssetId)).quantity)
744-                                                let error = throwErr(makeString([toString(amountAssetBalance), toString(priceAssetBalance), toString(lpAssetEmission), toString(currentKLp), toString(updatedKLp)], " "))
745-                                                if ((error == error))
746-                                                    then {
747-                                                        let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
748-                                                        if ((isUpdatedKLpValid == isUpdatedKLpValid))
749-                                                            then ((state ++ lpTransfer) ++ refreshKLpActions)
729+                                                        let slippageAInv = if ((amDiff > 0))
730+                                                            then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
731+                                                            else nil
732+                                                        if ((slippageAInv == slippageAInv))
733+                                                            then {
734+                                                                let slippagePInv = if ((prDiff > 0))
735+                                                                    then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
736+                                                                    else nil
737+                                                                if ((slippagePInv == slippagePInv))
738+                                                                    then {
739+                                                                        let lpTransfer = if (shouldAutoStake)
740+                                                                            then {
741+                                                                                let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
742+                                                                                if ((slpStakeInv == slpStakeInv))
743+                                                                                    then nil
744+                                                                                    else throw("Strict value is not equal to itself.")
745+                                                                                }
746+                                                                            else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
747+                                                                        let $t03240732472 = refreshKLpInternal(0, 0, 0)
748+                                                                        let refreshKLpActions = $t03240732472._1
749+                                                                        let updatedKLp = $t03240732472._2
750+                                                                        let error = throwErr(makeString([toString(amountAssetBalance), toString(priceAssetBalance), toString(lpAssetEmission), toString(currentKLp), toString(updatedKLp)], " "))
751+                                                                        if ((error == error))
752+                                                                            then {
753+                                                                                let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
754+                                                                                if ((isUpdatedKLpValid == isUpdatedKLpValid))
755+                                                                                    then ((state ++ lpTransfer) ++ refreshKLpActions)
756+                                                                                    else throw("Strict value is not equal to itself.")
757+                                                                                }
758+                                                                            else throw("Strict value is not equal to itself.")
759+                                                                        }
760+                                                                    else throw("Strict value is not equal to itself.")
761+                                                                }
750762                                                             else throw("Strict value is not equal to itself.")
751763                                                         }
752764                                                     else throw("Strict value is not equal to itself.")
753765                                                 }
754766                                             else throw("Strict value is not equal to itself.")
755767                                         }
756768                                     else throw("Strict value is not equal to itself.")
757769                                 }
758770                             else throw("Strict value is not equal to itself.")
759771                         }
760772                     else throw("Strict value is not equal to itself.")
761773                 }
762774             else throw("Strict value is not equal to itself.")
763775         }
764776 
765777 
766778 
767779 @Callable(i)
768780 func putForFree (maxSlippage) = if ((0 > maxSlippage))
769781     then throw("Invalid value passed")
770782     else {
771783         let estPut = commonPut(i, maxSlippage, false)
772784         let state = estPut._9
773785         let amAssetPmt = toBigInt(value(i.payments[0]).amount)
774786         let prAssetPmt = toBigInt(value(i.payments[1]).amount)
775787         let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
776788         if ((currentKLp == currentKLp))
777789             then {
778-                let $t03324533310 = refreshKLpInternal(0, 0, 0)
779-                let refreshKLpActions = $t03324533310._1
780-                let updatedKLp = $t03324533310._2
790+                let $t03325333318 = refreshKLpInternal(0, 0, 0)
791+                let refreshKLpActions = $t03325333318._1
792+                let updatedKLp = $t03325333318._2
781793                 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
782794                 if ((isUpdatedKLpValid == isUpdatedKLpValid))
783795                     then (state ++ refreshKLpActions)
784796                     else throw("Strict value is not equal to itself.")
785797                 }
786798             else throw("Strict value is not equal to itself.")
787799         }
788800 
789801 
790802 
791803 @Callable(i)
792804 func putOneTkn (minOutAmount,autoStake) = {
793805     let isPoolOneTokenOperationsDisabled = {
794806         let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
795807         if ($isInstanceOf(@, "Boolean"))
796808             then @
797809             else throw(($getType(@) + " couldn't be cast to Boolean"))
798810         }
799811     let isPutDisabled = if (if (if (isGlobalShutdown())
800812         then true
801813         else (cfgPoolStatus == PoolPutDisabled))
802814         then true
803815         else (cfgPoolStatus == PoolShutdown))
804816         then true
805817         else isPoolOneTokenOperationsDisabled
806818     let checks = [if (if (!(isPutDisabled))
807819         then true
808820         else isManager(i))
809821         then true
810822         else throwErr("put operation is blocked by admin"), if ((size(i.payments) == 1))
811823         then true
812824         else throwErr("exactly 1 payment are expected")]
813825     if ((checks == checks))
814826         then {
815827             let payment = i.payments[0]
816828             let paymentAssetId = payment.assetId
817829             let paymentAmountRaw = payment.amount
818830             let currentKLp = if ((paymentAssetId == cfgAmountAssetId))
819831                 then calcCurrentKLp(toBigInt(paymentAmountRaw), toBigInt(0), toBigInt(0))
820832                 else if ((paymentAssetId == cfgPriceAssetId))
821833                     then calcCurrentKLp(toBigInt(0), toBigInt(paymentAmountRaw), toBigInt(0))
822834                     else throwErr("payment asset is not supported")
823835             let userAddress = i.caller
824836             let txId = i.transactionId
825-            let $t03449534647 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
826-            if (($t03449534647 == $t03449534647))
837+            let $t03450334655 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
838+            if (($t03450334655 == $t03450334655))
827839                 then {
828-                    let paymentInAmountAsset = $t03449534647._5
829-                    let bonus = $t03449534647._4
830-                    let feeAmount = $t03449534647._3
831-                    let commonState = $t03449534647._2
832-                    let emitAmountEstimated = $t03449534647._1
840+                    let paymentInAmountAsset = $t03450334655._5
841+                    let bonus = $t03450334655._4
842+                    let feeAmount = $t03450334655._3
843+                    let commonState = $t03450334655._2
844+                    let emitAmountEstimated = $t03450334655._1
833845                     let emitAmount = if (if ((minOutAmount > 0))
834846                         then (minOutAmount > emitAmountEstimated)
835847                         else false)
836848                         then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
837849                         else emitAmountEstimated
838850                     let emitInv = emit(emitAmount)
839851                     if ((emitInv == emitInv))
840852                         then {
841853                             let lpTransfer = if (autoStake)
842854                                 then {
843855                                     let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
844856                                     if ((stakeInv == stakeInv))
845857                                         then nil
846858                                         else throw("Strict value is not equal to itself.")
847859                                     }
848860                                 else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
849861                             let sendFee = if ((feeAmount > 0))
850862                                 then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
851863                                 else nil
852-                            let $t03523335430 = if ((this == feeCollectorAddress))
864+                            let $t03524135438 = if ((this == feeCollectorAddress))
853865                                 then $Tuple2(0, 0)
854866                                 else if (paymentInAmountAsset)
855867                                     then $Tuple2(-(feeAmount), 0)
856868                                     else $Tuple2(0, -(feeAmount))
857-                            let amountAssetBalanceDelta = $t03523335430._1
858-                            let priceAssetBalanceDelta = $t03523335430._2
859-                            let $t03543335541 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
860-                            let refreshKLpActions = $t03543335541._1
861-                            let updatedKLp = $t03543335541._2
869+                            let amountAssetBalanceDelta = $t03524135438._1
870+                            let priceAssetBalanceDelta = $t03524135438._2
871+                            let $t03544135549 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
872+                            let refreshKLpActions = $t03544135549._1
873+                            let updatedKLp = $t03544135549._2
862874                             let kLp = value(getString(keyKLp))
863875                             let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
864876                             if ((isUpdatedKLpValid == isUpdatedKLpValid))
865877                                 then $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
866878                                 else throw("Strict value is not equal to itself.")
867879                             }
868880                         else throw("Strict value is not equal to itself.")
869881                     }
870882                 else throw("Strict value is not equal to itself.")
871883             }
872884         else throw("Strict value is not equal to itself.")
873885     }
874886 
875887 
876888 
877889 @Callable(i)
878890 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
879-    let $t03584736004 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
880-    let emitAmountEstimated = $t03584736004._1
881-    let commonState = $t03584736004._2
882-    let feeAmount = $t03584736004._3
883-    let bonus = $t03584736004._4
884-    let paymentInAmountAsset = $t03584736004._5
891+    let $t03585536012 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
892+    let emitAmountEstimated = $t03585536012._1
893+    let commonState = $t03585536012._2
894+    let feeAmount = $t03585536012._3
895+    let bonus = $t03585536012._4
896+    let paymentInAmountAsset = $t03585536012._5
885897     $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
886898     }
887899 
888900 
889901 
890902 @Callable(i)
891903 func getOneTkn (outAssetIdStr,minOutAmount) = {
892904     let isPoolOneTokenOperationsDisabled = {
893905         let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
894906         if ($isInstanceOf(@, "Boolean"))
895907             then @
896908             else throw(($getType(@) + " couldn't be cast to Boolean"))
897909         }
898910     let isGetDisabled = if (if (isGlobalShutdown())
899911         then true
900912         else (cfgPoolStatus == PoolShutdown))
901913         then true
902914         else isPoolOneTokenOperationsDisabled
903915     let checks = [if (if (!(isGetDisabled))
904916         then true
905917         else isManager(i))
906918         then true
907919         else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 1))
908920         then true
909921         else throwErr("exactly 1 payment are expected")]
910922     if ((checks == checks))
911923         then {
912924             let outAssetId = parseAssetId(outAssetIdStr)
913925             let payment = i.payments[0]
914926             let paymentAssetId = payment.assetId
915927             let paymentAmount = payment.amount
916928             let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(paymentAmount))
917929             let userAddress = i.caller
918930             let txId = i.transactionId
919-            let $t03689837051 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
920-            if (($t03689837051 == $t03689837051))
931+            let $t03690637059 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
932+            if (($t03690637059 == $t03690637059))
921933                 then {
922-                    let outInAmountAsset = $t03689837051._5
923-                    let bonus = $t03689837051._4
924-                    let feeAmount = $t03689837051._3
925-                    let commonState = $t03689837051._2
926-                    let amountEstimated = $t03689837051._1
934+                    let outInAmountAsset = $t03690637059._5
935+                    let bonus = $t03690637059._4
936+                    let feeAmount = $t03690637059._3
937+                    let commonState = $t03690637059._2
938+                    let amountEstimated = $t03690637059._1
927939                     let amount = if (if ((minOutAmount > 0))
928940                         then (minOutAmount > amountEstimated)
929941                         else false)
930942                         then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
931943                         else amountEstimated
932944                     let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
933945                     if ((burnInv == burnInv))
934946                         then {
935947                             let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
936948                             let sendFee = if ((feeAmount > 0))
937949                                 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
938950                                 else nil
939-                            let $t03755137798 = {
951+                            let $t03755937806 = {
940952                                 let feeAmountForCalc = if ((this == feeCollectorAddress))
941953                                     then 0
942954                                     else feeAmount
943955                                 if (outInAmountAsset)
944956                                     then $Tuple2(-((amount + feeAmountForCalc)), 0)
945957                                     else $Tuple2(0, -((amount + feeAmountForCalc)))
946958                                 }
947-                            let amountAssetBalanceDelta = $t03755137798._1
948-                            let priceAssetBalanceDelta = $t03755137798._2
949-                            let $t03780137909 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
950-                            let refreshKLpActions = $t03780137909._1
951-                            let updatedKLp = $t03780137909._2
959+                            let amountAssetBalanceDelta = $t03755937806._1
960+                            let priceAssetBalanceDelta = $t03755937806._2
961+                            let $t03780937917 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
962+                            let refreshKLpActions = $t03780937917._1
963+                            let updatedKLp = $t03780937917._2
952964                             let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
953965                             if ((isUpdatedKLpValid == isUpdatedKLpValid))
954966                                 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
955967                                 else throw("Strict value is not equal to itself.")
956968                             }
957969                         else throw("Strict value is not equal to itself.")
958970                     }
959971                 else throw("Strict value is not equal to itself.")
960972             }
961973         else throw("Strict value is not equal to itself.")
962974     }
963975 
964976 
965977 
966978 @Callable(i)
967979 func getOneTknREADONLY (outAssetId,paymentAmount) = {
968-    let $t03816638322 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
969-    let amountEstimated = $t03816638322._1
970-    let commonState = $t03816638322._2
971-    let feeAmount = $t03816638322._3
972-    let bonus = $t03816638322._4
973-    let outInAmountAsset = $t03816638322._5
980+    let $t03817438330 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
981+    let amountEstimated = $t03817438330._1
982+    let commonState = $t03817438330._2
983+    let feeAmount = $t03817438330._3
984+    let bonus = $t03817438330._4
985+    let outInAmountAsset = $t03817438330._5
974986     $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
975987     }
976988 
977989 
978990 
979991 @Callable(i)
980992 func unstakeAndGetOneTkn (unstakeAmount,outAssetIdStr,minOutAmount) = {
981993     let isPoolOneTokenOperationsDisabled = {
982994         let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
983995         if ($isInstanceOf(@, "Boolean"))
984996             then @
985997             else throw(($getType(@) + " couldn't be cast to Boolean"))
986998         }
987999     let isGetDisabled = if (if (isGlobalShutdown())
9881000         then true
9891001         else (cfgPoolStatus == PoolShutdown))
9901002         then true
9911003         else isPoolOneTokenOperationsDisabled
9921004     let checks = [if (if (!(isGetDisabled))
9931005         then true
9941006         else isManager(i))
9951007         then true
9961008         else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 0))
9971009         then true
9981010         else throwErr("no payments are expected")]
9991011     if ((checks == checks))
10001012         then {
10011013             let outAssetId = parseAssetId(outAssetIdStr)
10021014             let userAddress = i.caller
10031015             let txId = i.transactionId
10041016             let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
10051017             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
10061018             if ((unstakeInv == unstakeInv))
10071019                 then {
1008-                    let $t03922439375 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1009-                    if (($t03922439375 == $t03922439375))
1020+                    let $t03923239383 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1021+                    if (($t03923239383 == $t03923239383))
10101022                         then {
1011-                            let outInAmountAsset = $t03922439375._5
1012-                            let bonus = $t03922439375._4
1013-                            let feeAmount = $t03922439375._3
1014-                            let commonState = $t03922439375._2
1015-                            let amountEstimated = $t03922439375._1
1023+                            let outInAmountAsset = $t03923239383._5
1024+                            let bonus = $t03923239383._4
1025+                            let feeAmount = $t03923239383._3
1026+                            let commonState = $t03923239383._2
1027+                            let amountEstimated = $t03923239383._1
10161028                             let amount = if (if ((minOutAmount > 0))
10171029                                 then (minOutAmount > amountEstimated)
10181030                                 else false)
10191031                                 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
10201032                                 else amountEstimated
10211033                             let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
10221034                             if ((burnInv == burnInv))
10231035                                 then {
10241036                                     let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
10251037                                     let sendFee = if ((feeAmount > 0))
10261038                                         then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
10271039                                         else nil
1028-                                    let $t03987040117 = {
1040+                                    let $t03987840125 = {
10291041                                         let feeAmountForCalc = if ((this == feeCollectorAddress))
10301042                                             then 0
10311043                                             else feeAmount
10321044                                         if (outInAmountAsset)
10331045                                             then $Tuple2(-((amount + feeAmountForCalc)), 0)
10341046                                             else $Tuple2(0, -((amount + feeAmountForCalc)))
10351047                                         }
1036-                                    let amountAssetBalanceDelta = $t03987040117._1
1037-                                    let priceAssetBalanceDelta = $t03987040117._2
1038-                                    let $t04012040228 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1039-                                    let refreshKLpActions = $t04012040228._1
1040-                                    let updatedKLp = $t04012040228._2
1048+                                    let amountAssetBalanceDelta = $t03987840125._1
1049+                                    let priceAssetBalanceDelta = $t03987840125._2
1050+                                    let $t04012840236 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1051+                                    let refreshKLpActions = $t04012840236._1
1052+                                    let updatedKLp = $t04012840236._2
10411053                                     let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10421054                                     if ((isUpdatedKLpValid == isUpdatedKLpValid))
10431055                                         then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
10441056                                         else throw("Strict value is not equal to itself.")
10451057                                     }
10461058                                 else throw("Strict value is not equal to itself.")
10471059                             }
10481060                         else throw("Strict value is not equal to itself.")
10491061                     }
10501062                 else throw("Strict value is not equal to itself.")
10511063             }
10521064         else throw("Strict value is not equal to itself.")
10531065     }
10541066 
10551067 
10561068 
10571069 @Callable(i)
10581070 func get () = {
10591071     let res = commonGet(i)
10601072     let outAmtAmt = res._1
10611073     let outPrAmt = res._2
10621074     let pmtAmt = res._3
10631075     let pmtAssetId = res._4
10641076     let state = res._5
10651077     let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10661078     let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10671079     if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10681080         then {
1069-            let $t04117641258 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1070-            let refreshKLpActions = $t04117641258._1
1071-            let updatedKLp = $t04117641258._2
1081+            let $t04118441266 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1082+            let refreshKLpActions = $t04118441266._1
1083+            let updatedKLp = $t04118441266._2
10721084             let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10731085             if ((isUpdatedKLpValid == isUpdatedKLpValid))
10741086                 then (state ++ refreshKLpActions)
10751087                 else throw("Strict value is not equal to itself.")
10761088             }
10771089         else throw("Strict value is not equal to itself.")
10781090     }
10791091 
10801092 
10811093 
10821094 @Callable(i)
10831095 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
10841096     let res = commonGet(i)
10851097     let outAmAmt = res._1
10861098     let outPrAmt = res._2
10871099     let pmtAmt = res._3
10881100     let pmtAssetId = res._4
10891101     let state = res._5
10901102     if ((noLessThenAmtAsset > outAmAmt))
10911103         then throw(((("noLessThenAmtAsset failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
10921104         else if ((noLessThenPriceAsset > outPrAmt))
10931105             then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
10941106             else {
10951107                 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10961108                 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10971109                 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10981110                     then {
1099-                        let $t04220942290 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1100-                        let refreshKLpActions = $t04220942290._1
1101-                        let updatedKLp = $t04220942290._2
1111+                        let $t04221742298 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1112+                        let refreshKLpActions = $t04221742298._1
1113+                        let updatedKLp = $t04221742298._2
11021114                         let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11031115                         if ((isUpdatedKLpValid == isUpdatedKLpValid))
11041116                             then (state ++ refreshKLpActions)
11051117                             else throw("Strict value is not equal to itself.")
11061118                         }
11071119                     else throw("Strict value is not equal to itself.")
11081120                 }
11091121     }
11101122 
11111123 
11121124 
11131125 @Callable(i)
11141126 func unstakeAndGet (amount) = {
11151127     let checkPayments = if ((size(i.payments) != 0))
11161128         then throw("No payments are expected")
11171129         else true
11181130     if ((checkPayments == checkPayments))
11191131         then {
11201132             let cfg = getPoolConfig()
11211133             let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
11221134             let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
11231135             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
11241136             if ((unstakeInv == unstakeInv))
11251137                 then {
11261138                     let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
11271139                     let outAmAmt = res._1
11281140                     let outPrAmt = res._2
11291141                     let poolStatus = parseIntValue(res._9)
11301142                     let state = res._10
11311143                     let checkPoolStatus = if (if (isGlobalShutdown())
11321144                         then true
11331145                         else (poolStatus == PoolShutdown))
11341146                         then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
11351147                         else true
11361148                     if ((checkPoolStatus == checkPoolStatus))
11371149                         then {
11381150                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
11391151                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11401152                                 then {
1141-                                    let $t04341343494 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1142-                                    let refreshKLpActions = $t04341343494._1
1143-                                    let updatedKLp = $t04341343494._2
1153+                                    let $t04342143502 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1154+                                    let refreshKLpActions = $t04342143502._1
1155+                                    let updatedKLp = $t04342143502._2
11441156                                     let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11451157                                     if ((isUpdatedKLpValid == isUpdatedKLpValid))
11461158                                         then (state ++ refreshKLpActions)
11471159                                         else throw("Strict value is not equal to itself.")
11481160                                     }
11491161                                 else throw("Strict value is not equal to itself.")
11501162                             }
11511163                         else throw("Strict value is not equal to itself.")
11521164                     }
11531165                 else throw("Strict value is not equal to itself.")
11541166             }
11551167         else throw("Strict value is not equal to itself.")
11561168     }
11571169 
11581170 
11591171 
11601172 @Callable(i)
11611173 func unstakeAndGetNoLess (unstakeAmount,noLessThenAmountAsset,noLessThenPriceAsset) = {
11621174     let isGetDisabled = if (isGlobalShutdown())
11631175         then true
11641176         else (cfgPoolStatus == PoolShutdown)
11651177     let checks = [if (!(isGetDisabled))
11661178         then true
11671179         else throw("get operation is blocked by admin"), if ((size(i.payments) == 0))
11681180         then true
11691181         else throw("no payments are expected")]
11701182     if ((checks == checks))
11711183         then {
11721184             let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
11731185             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
11741186             if ((unstakeInv == unstakeInv))
11751187                 then {
11761188                     let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(cfgLpAssetId), unstakeAmount, i.caller)
11771189                     let outAmAmt = res._1
11781190                     let outPrAmt = res._2
11791191                     let state = res._10
11801192                     let checkAmounts = [if ((outAmAmt >= noLessThenAmountAsset))
11811193                         then true
11821194                         else throw(makeString(["amount asset amount to receive is less than ", toString(noLessThenAmountAsset)], "")), if ((outPrAmt >= noLessThenPriceAsset))
11831195                         then true
11841196                         else throw(makeString(["price asset amount to receive is less than ", toString(noLessThenPriceAsset)], ""))]
11851197                     if ((checkAmounts == checkAmounts))
11861198                         then {
11871199                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11881200                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11891201                                 then {
1190-                                    let $t04478644867 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1191-                                    let refreshKLpActions = $t04478644867._1
1192-                                    let updatedKLp = $t04478644867._2
1202+                                    let $t04479444875 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1203+                                    let refreshKLpActions = $t04479444875._1
1204+                                    let updatedKLp = $t04479444875._2
11931205                                     let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11941206                                     if ((isUpdatedKLpValid == isUpdatedKLpValid))
11951207                                         then (state ++ refreshKLpActions)
11961208                                         else throw("Strict value is not equal to itself.")
11971209                                     }
11981210                                 else throw("Strict value is not equal to itself.")
11991211                             }
12001212                         else throw("Strict value is not equal to itself.")
12011213                     }
12021214                 else throw("Strict value is not equal to itself.")
12031215             }
12041216         else throw("Strict value is not equal to itself.")
12051217     }
12061218 
12071219 
12081220 
12091221 @Callable(i)
12101222 func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
12111223     then throw("permissions denied")
12121224     else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success")
12131225 
12141226 
12151227 
12161228 @Callable(i)
12171229 func refreshKLp () = {
12181230     let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0)
12191231     let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay))
12201232         then unit
12211233         else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], ""))
12221234     if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
12231235         then {
12241236             let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp"))
1225-            let $t04605446118 = refreshKLpInternal(0, 0, 0)
1226-            let kLpUpdateActions = $t04605446118._1
1227-            let updatedKLp = $t04605446118._2
1237+            let $t04606246126 = refreshKLpInternal(0, 0, 0)
1238+            let kLpUpdateActions = $t04606246126._1
1239+            let updatedKLp = $t04606246126._2
12281240             let actions = if ((kLp != updatedKLp))
12291241                 then kLpUpdateActions
12301242                 else throwErr("nothing to refresh")
12311243             $Tuple2(actions, toString(updatedKLp))
12321244             }
12331245         else throw("Strict value is not equal to itself.")
12341246     }
12351247 
12361248 
12371249 
12381250 @Callable(i)
12391251 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig())
12401252 
12411253 
12421254 
12431255 @Callable(i)
12441256 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
12451257 
12461258 
12471259 
12481260 @Callable(i)
12491261 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
12501262     let prices = calcPrices(amAmt, prAmt, lpAmt)
12511263     $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])])
12521264     }
12531265 
12541266 
12551267 
12561268 @Callable(i)
12571269 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult)))
12581270 
12591271 
12601272 
12611273 @Callable(i)
12621274 func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult))
12631275 
12641276 
12651277 
12661278 @Callable(i)
12671279 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
12681280 
12691281 
12701282 
12711283 @Callable(i)
12721284 func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp))
12731285 
12741286 
12751287 
12761288 @Callable(i)
12771289 func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
12781290     let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress))
12791291     $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10))
12801292     }
12811293 
12821294 
12831295 
12841296 @Callable(i)
12851297 func statsREADONLY () = {
12861298     let cfg = getPoolConfig()
12871299     let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
12881300     let amtAssetId = cfg[idxAmtAssetId]
12891301     let priceAssetId = cfg[idxPriceAssetId]
12901302     let iAmtAssetId = cfg[idxIAmtAssetId]
12911303     let iPriceAssetId = cfg[idxIPriceAssetId]
12921304     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
12931305     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
12941306     let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
12951307     let accAmtAssetBalance = getAccBalance(amtAssetId)
12961308     let accPriceAssetBalance = getAccBalance(priceAssetId)
12971309     let pricesList = if ((poolLPBalance == 0))
12981310         then [zeroBigInt, zeroBigInt, zeroBigInt]
12991311         else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance)
13001312     let curPrice = 0
13011313     let lpAmtAssetShare = fromX18(pricesList[1], scale8)
13021314     let lpPriceAssetShare = fromX18(pricesList[2], scale8)
13031315     let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this))))
13041316     $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))
13051317     }
13061318 
13071319 
13081320 
13091321 @Callable(i)
13101322 func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = {
13111323     let cfg = getPoolConfig()
13121324     let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
13131325     let amAssetIdStr = cfg[idxAmtAssetId]
13141326     let amAssetId = fromBase58String(amAssetIdStr)
13151327     let prAssetIdStr = cfg[idxPriceAssetId]
13161328     let prAssetId = fromBase58String(prAssetIdStr)
13171329     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
13181330     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
13191331     let poolStatus = cfg[idxPoolStatus]
13201332     let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
13211333     let accAmtAssetBalance = getAccBalance(amAssetIdStr)
13221334     let accPriceAssetBalance = getAccBalance(prAssetIdStr)
13231335     let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm)
13241336     let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm)
13251337     let curPriceX18 = if ((poolLPBalance == 0))
13261338         then zeroBigInt
13271339         else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
13281340     let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
13291341     let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
13301342     let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm)
13311343     let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
13321344     let calcLpAmt = estPut._1
13331345     let curPriceCalc = estPut._3
13341346     let amBalance = estPut._4
13351347     let prBalance = estPut._5
13361348     let lpEmission = estPut._6
13371349     $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))
13381350     }
13391351 
13401352 
13411353 
13421354 @Callable(i)
13431355 func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = {
13441356     let cfg = getPoolConfig()
13451357     let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
13461358     let amAssetIdStr = cfg[idxAmtAssetId]
13471359     let amAssetId = fromBase58String(amAssetIdStr)
13481360     let prAssetIdStr = cfg[idxPriceAssetId]
13491361     let prAssetId = fromBase58String(prAssetIdStr)
13501362     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
13511363     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
13521364     let poolStatus = cfg[idxPoolStatus]
13531365     let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
13541366     let amBalanceRaw = getAccBalance(amAssetIdStr)
13551367     let prBalanceRaw = getAccBalance(prAssetIdStr)
13561368     let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm)
13571369     let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm)
13581370     let curPriceX18 = if ((poolLPBalance == 0))
13591371         then zeroBigInt
13601372         else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18)
13611373     let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
13621374     let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
13631375     let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm)
13641376     let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
13651377     let calcLpAmt = estPut._1
13661378     let curPriceCalc = estPut._3
13671379     let amBalance = estPut._4
13681380     let prBalance = estPut._5
13691381     let lpEmission = estPut._6
13701382     $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))
13711383     }
13721384 
13731385 
13741386 
13751387 @Callable(i)
13761388 func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
13771389     let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this)
13781390     let outAmAmt = res._1
13791391     let outPrAmt = res._2
13801392     let amBalance = res._5
13811393     let prBalance = res._6
13821394     let lpEmission = res._7
13831395     let curPrice = res._8
13841396     let poolStatus = parseIntValue(res._9)
13851397     $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))
13861398     }
13871399 
13881400 
13891401 @Verifier(tx)
13901402 func verify () = {
13911403     let targetPublicKey =     match managerPublicKeyOrUnit() {
13921404         case pk: ByteVector => 
13931405             pk
13941406         case _: Unit => 
13951407             tx.senderPublicKey
13961408         case _ => 
13971409             throw("Match error")
13981410     }
13991411     match tx {
14001412         case order: Order => 
14011413             let matcherPub = getMatcherPubOrFail()
14021414             let orderValid = validateMatcherOrderAllowed(order)
14031415             let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
14041416             let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
14051417             if (if (if (orderValid)
14061418                 then senderValid
14071419                 else false)
14081420                 then matcherValid
14091421                 else false)
14101422                 then true
14111423                 else throwOrderError(orderValid, senderValid, matcherValid)
14121424         case s: SetScriptTransaction => 
14131425             let newHash = blake2b256(value(s.script))
14141426             let allowedHash = fromBase64String(value(getString(factoryContract, keyAllowedLpScriptHash())))
14151427             let currentHash = scriptHash(this)
14161428             if (if ((allowedHash == newHash))
14171429                 then (currentHash != newHash)
14181430                 else false)
14191431                 then true
14201432                 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
14211433         case _ => 
14221434             sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
14231435     }
14241436     }
14251437 
github/deemru/w8io/169f3d6 
201.90 ms ◑