tx · 29ftgnCs3LUbMs57o3VXqSnxtkVwFQWj3EapXmdPo2Pe

3MsXwm6KeMva32skLvFrFfYYmcxT2ZDc4fD:  -0.03300000 Waves

2022.11.28 16:02 [2336991] smart account 3MsXwm6KeMva32skLvFrFfYYmcxT2ZDc4fD > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "29ftgnCs3LUbMs57o3VXqSnxtkVwFQWj3EapXmdPo2Pe",
    "fee": 3300000,
    "feeAssetId": null,
    "timestamp": 1669640389012,
    "version": 1,
    "sender": "3MsXwm6KeMva32skLvFrFfYYmcxT2ZDc4fD",
    "senderPublicKey": "33aHdznSeq5cGxgbnLJ54tzNfiqS5SCQYHgFGMFsNQzs",
    "proofs": [
        "2zVLRLf7Q3kQyXrzwL8Zu9tV3JfZjQw2bAVvzTaffCEr8mnqfqbeC3cmzJZ9u4WPCUX8ozzNmVv7XAfcGmj2qzWg"
    ],
    "script": "base64:BgL+KwgCEgMKAQgSABIECgIBBBIDCgEBEgQKAgEEEgQKAggBEgQKAggBEgQKAggBEgUKAwEIARIAEgQKAgEBEgMKAQESBQoDAQEBEgQKAggIEgASABIDCgEIEgUKAwEBARIECgIBARIECgIIARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCBIAEgMKAQESAwoBARIECgIIASIKbFBkZWNpbWFscyIGc2NhbGU4IgxzY2FsZThCaWdJbnQiB3NjYWxlMTgiCnplcm9CaWdJbnQiBGJpZzAiBGJpZzEiBGJpZzIiC3dhdmVzU3RyaW5nIgNTRVAiClBvb2xBY3RpdmUiD1Bvb2xQdXREaXNhYmxlZCITUG9vbE1hdGNoZXJEaXNhYmxlZCIMUG9vbFNodXRkb3duIg5pZHhQb29sQWRkcmVzcyINaWR4UG9vbFN0YXR1cyIQaWR4UG9vbExQQXNzZXRJZCINaWR4QW10QXNzZXRJZCIPaWR4UHJpY2VBc3NldElkIg5pZHhBbXRBc3NldERjbSIQaWR4UHJpY2VBc3NldERjbSIOaWR4SUFtdEFzc2V0SWQiEGlkeElQcmljZUFzc2V0SWQiDWlkeExQQXNzZXREY20iEmlkeFBvb2xBbXRBc3NldEFtdCIUaWR4UG9vbFByaWNlQXNzZXRBbXQiEWlkeFBvb2xMUEFzc2V0QW10IhlpZHhGYWN0b3J5U3Rha2luZ0NvbnRyYWN0IhppZHhGYWN0b3J5U2xpcHBhZ2VDb250cmFjdCIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiA3ZhbCIPcmVzdWx0U2NhbGVNdWx0Igd0b1NjYWxlIgNhbXQiCHJlc1NjYWxlIghjdXJTY2FsZSIDYWJzIglhYnNCaWdJbnQiAmZjIgNtcGsiBHBtcGsiAnBsIgJwaCIBaCIJdGltZXN0YW1wIgNwYXUiC3VzZXJBZGRyZXNzIgR0eElkIgNnYXUiAmFhIgJwYSIGa2V5RmVlIgpmZWVEZWZhdWx0IgNmZWUiBmtleUtMcCIVa2V5S0xwUmVmcmVzaGVkSGVpZ2h0IhJrZXlLTHBSZWZyZXNoRGVsYXkiFmtMcFJlZnJlc2hEZWxheURlZmF1bHQiD2tMcFJlZnJlc2hEZWxheSIQa2V5RmFjdG9yeUNvbmZpZyINa2V5TWF0Y2hlclB1YiIpa2V5TWFwcGluZ1Bvb2xDb250cmFjdEFkZHJlc3NUb1Bvb2xBc3NldHMiE3Bvb2xDb250cmFjdEFkZHJlc3MiDWtleVBvb2xDb25maWciCWlBbXRBc3NldCILaVByaWNlQXNzZXQiH2tleU1hcHBpbmdzQmFzZUFzc2V0MmludGVybmFsSWQiDGJhc2VBc3NldFN0ciITa2V5QWxsUG9vbHNTaHV0ZG93biINa2V5UG9vbFdlaWdodCIPY29udHJhY3RBZGRyZXNzIhZrZXlBbGxvd2VkTHBTY3JpcHRIYXNoIhZrZXlGZWVDb2xsZWN0b3JBZGRyZXNzIg90aHJvd09yZGVyRXJyb3IiCm9yZGVyVmFsaWQiC3NlbmRlclZhbGlkIgxtYXRjaGVyVmFsaWQiD2dldFN0cmluZ09yRmFpbCIHYWRkcmVzcyIDa2V5IgxnZXRJbnRPckZhaWwiCHRocm93RXJyIgNtc2ciBmZtdEVyciIPZmFjdG9yeUNvbnRyYWN0IhNmZWVDb2xsZWN0b3JBZGRyZXNzIhBpc0dsb2JhbFNodXRkb3duIhNnZXRNYXRjaGVyUHViT3JGYWlsIg1nZXRQb29sQ29uZmlnIghhbXRBc3NldCIKcHJpY2VBc3NldCIMcGFyc2VBc3NldElkIgVpbnB1dCIPYXNzZXRJZFRvU3RyaW5nIg9wYXJzZVBvb2xDb25maWciCnBvb2xDb25maWciEHBvb2xDb25maWdQYXJzZWQiCyR0MDc5MTU4MDgxIg5jZmdQb29sQWRkcmVzcyINY2ZnUG9vbFN0YXR1cyIMY2ZnTHBBc3NldElkIhBjZmdBbW91bnRBc3NldElkIg9jZmdQcmljZUFzc2V0SWQiFmNmZ0Ftb3VudEFzc2V0RGVjaW1hbHMiFWNmZ1ByaWNlQXNzZXREZWNpbWFscyIQZ2V0RmFjdG9yeUNvbmZpZyIPc3Rha2luZ0NvbnRyYWN0IhBzbGlwcGFnZUNvbnRyYWN0IhFkYXRhUHV0QWN0aW9uSW5mbyINaW5BbXRBc3NldEFtdCIPaW5QcmljZUFzc2V0QW10IghvdXRMcEFtdCIFcHJpY2UiHXNsaXBwYWdlVG9sZXJhbmNlUGFzc2VkQnlVc2VyIhVzbGlwcGFnZVRvbGVyYW5jZVJlYWwiCHR4SGVpZ2h0Igt0eFRpbWVzdGFtcCISc2xpcGFnZUFtdEFzc2V0QW10IhRzbGlwYWdlUHJpY2VBc3NldEFtdCIRZGF0YUdldEFjdGlvbkluZm8iDm91dEFtdEFzc2V0QW10IhBvdXRQcmljZUFzc2V0QW10IgdpbkxwQW10Ig1nZXRBY2NCYWxhbmNlIgdhc3NldElkIg9jYWxjUHJpY2VCaWdJbnQiCHByQW10WDE4IghhbUFtdFgxOCIQcHJpdmF0ZUNhbGNQcmljZSIKYW1Bc3NldERjbSIKcHJBc3NldERjbSIFYW1BbXQiBXByQW10Ig5hbXRBc3NldEFtdFgxOCIQcHJpY2VBc3NldEFtdFgxOCIKY2FsY1ByaWNlcyIFbHBBbXQiA2NmZyILYW10QXNzZXREY20iDXByaWNlQXNzZXREY20iCHByaWNlWDE4IghscEFtdFgxOCITbHBQcmljZUluQW1Bc3NldFgxOCITbHBQcmljZUluUHJBc3NldFgxOCIPY2FsY3VsYXRlUHJpY2VzIgZwcmljZXMiFGVzdGltYXRlR2V0T3BlcmF0aW9uIgZ0eElkNTgiCnBtdEFzc2V0SWQiCHBtdExwQW10IglscEFzc2V0SWQiCWFtQXNzZXRJZCIJcHJBc3NldElkIgpwb29sU3RhdHVzIgpscEVtaXNzaW9uIglhbUJhbGFuY2UiDGFtQmFsYW5jZVgxOCIJcHJCYWxhbmNlIgxwckJhbGFuY2VYMTgiC2N1clByaWNlWDE4IghjdXJQcmljZSILcG10THBBbXRYMTgiDWxwRW1pc3Npb25YMTgiC291dEFtQW10WDE4IgtvdXRQckFtdFgxOCIIb3V0QW1BbXQiCG91dFByQW10IgVzdGF0ZSIUZXN0aW1hdGVQdXRPcGVyYXRpb24iEXNsaXBwYWdlVG9sZXJhbmNlIgxpbkFtQXNzZXRBbXQiC2luQW1Bc3NldElkIgxpblByQXNzZXRBbXQiC2luUHJBc3NldElkIgppc0V2YWx1YXRlIgZlbWl0THAiDGFtQXNzZXRJZFN0ciIMcHJBc3NldElkU3RyIgtpQW10QXNzZXRJZCINaVByaWNlQXNzZXRJZCIOaW5BbUFzc2V0SWRTdHIiDmluUHJBc3NldElkU3RyIg9pbkFtQXNzZXRBbXRYMTgiD2luUHJBc3NldEFtdFgxOCIMdXNlclByaWNlWDE4IgNyZXMiC3NsaXBwYWdlWDE4IhRzbGlwcGFnZVRvbGVyYW5jZVgxOCIKcHJWaWFBbVgxOCIKYW1WaWFQclgxOCIMZXhwZWN0ZWRBbXRzIhFleHBBbXRBc3NldEFtdFgxOCITZXhwUHJpY2VBc3NldEFtdFgxOCIJY2FsY0xwQW10Ig5jYWxjQW1Bc3NldFBtdCIOY2FsY1ByQXNzZXRQbXQiDHNsaXBwYWdlQ2FsYyIJZW1pdExwQW10IgZhbURpZmYiBnByRGlmZiILY29tbW9uU3RhdGUiB2NhbGNLTHAiDWFtb3VudEJhbGFuY2UiDHByaWNlQmFsYW5jZSIKdXBkYXRlZEtMcCIScmVmcmVzaEtMcEludGVybmFsIhdhbW91bnRBc3NldEJhbGFuY2VEZWx0YSIWcHJpY2VBc3NldEJhbGFuY2VEZWx0YSIUbHBBc3NldEVtaXNzaW9uRGVsdGEiEmFtb3VudEFzc2V0QmFsYW5jZSIRcHJpY2VBc3NldEJhbGFuY2UiD2xwQXNzZXRFbWlzc2lvbiIHYWN0aW9ucyIbdmFsaWRhdGVNYXRjaGVyT3JkZXJBbGxvd2VkIgVvcmRlciIKYW10QXNzZXRJZCIMcHJpY2VBc3NldElkIhFhbW91bnRBc3NldEFtb3VudCIQcHJpY2VBc3NldEFtb3VudCINJHQwMTk4MzgyMDA1MCIQb3JkZXJBbXRBc3NldFN0ciISb3JkZXJQcmljZUFzc2V0U3RyIgNrTHAiDSR0MDIwNjQ1MjA3NDUiDXVudXNlZEFjdGlvbnMiBmtMcE5ldyIMaXNPcmRlclZhbGlkIgljb21tb25HZXQiAWkiA3BtdCIGcG10QW10Igljb21tb25QdXQiCmFtQXNzZXRQbXQiCnByQXNzZXRQbXQiBmVzdFB1dCIEZW1pdCIGYW1vdW50IgdlbWl0SW52Ig1lbWl0SW52TGVnYWN5IgckbWF0Y2gwIhVsZWdhY3lGYWN0b3J5Q29udHJhY3QiB3Rha2VGZWUiCWZlZUFtb3VudCIPY2FsY1B1dE9uZVRva2VuIhBwYXltZW50QW1vdW50UmF3Ig5wYXltZW50QXNzZXRJZCIGaXNFdmFsIhBhbW91bnRCYWxhbmNlUmF3Ig9wcmljZUJhbGFuY2VSYXciFHBheW1lbnRJbkFtb3VudEFzc2V0Ig0kdDAyMzQyOTIzNzIyIhBhbW91bnRCYWxhbmNlT2xkIg9wcmljZUJhbGFuY2VPbGQiDSR0MDIzNzI2MjM4NzUiFGFtb3VudEFzc2V0QW1vdW50UmF3IhNwcmljZUFzc2V0QW1vdW50UmF3Ig0kdDAyMzk5NzI0MDU2Ig1wYXltZW50QW1vdW50IhBhbW91bnRCYWxhbmNlTmV3Ig9wcmljZUJhbGFuY2VOZXciC3ByaWNlTmV3WDE4IghwcmljZU5ldyIOcGF5bWVudEJhbGFuY2UiFHBheW1lbnRCYWxhbmNlQmlnSW50IgxzdXBwbHlCaWdJbnQiC2NoZWNoU3VwcGx5Ig1kZXBvc2l0QmlnSW50Igtpc3N1ZUFtb3VudCILcHJpY2VPbGRYMTgiCHByaWNlT2xkIgRsb3NzIg0kdDAyNTUzMzI1NzAwIgdiYWxhbmNlIg9pc3N1ZUFtb3VudEJvdGgiD2NhbGNHZXRPbmVUb2tlbiIKb3V0QXNzZXRJZCIGY2hlY2tzIhBvdXRJbkFtb3VudEFzc2V0Ig1iYWxhbmNlQmlnSW50IgxhbUJhbGFuY2VPbGQiDHByQmFsYW5jZU9sZCIKb3V0QmFsYW5jZSIQb3V0QmFsYW5jZUJpZ0ludCIOcmVkZWVtZWRCaWdJbnQiCWFtb3VudFJhdyINJHQwMjczMDIyNzM1MiILdG90YWxBbW91bnQiDSR0MDI3MzU2Mjc1ODIiC291dEFtQW1vdW50IgtvdXRQckFtb3VudCIMYW1CYWxhbmNlTmV3IgxwckJhbGFuY2VOZXciGGFtb3VudEJvdGhJblBheW1lbnRBc3NldCIWbWFuYWdlclB1YmxpY0tleU9yVW5pdCIBcyIdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQiCWlzTWFuYWdlciICcGsiC211c3RNYW5hZ2VyIgJwZCIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiC2NoZWNrQ2FsbGVyIhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSIPc2hvdWxkQXV0b1N0YWtlIgRhbUlkIgRwcklkIgxzbGlwcGFnZUFJbnYiDHNsaXBwYWdlUEludiIKbHBUcmFuc2ZlciILc2xwU3Rha2VJbnYiDSR0MDMxNTMzMzE1OTgiEXJlZnJlc2hLTHBBY3Rpb25zIgttYXhTbGlwcGFnZSINJHQwMzE4ODQzMTk0OSIMbWluT3V0QW1vdW50IglhdXRvU3Rha2UiIGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkIgFAIg1pc1B1dERpc2FibGVkIgdwYXltZW50Ig0kdDAzMjcyNTMyODc0IhNlbWl0QW1vdW50RXN0aW1hdGVkIgVib251cyIKZW1pdEFtb3VudCIIc3Rha2VJbnYiB3NlbmRGZWUiDSR0MDMzNDYwMzM2NTciDSR0MDMzNjYwMzM3NjgiDSR0MDMzOTYxMzQxMTgiDW91dEFzc2V0SWRTdHIiDWlzR2V0RGlzYWJsZWQiDSR0MDM0OTIzMzUwNzMiD2Ftb3VudEVzdGltYXRlZCIHYnVybkludiINYXNzZXRUcmFuc2ZlciINJHQwMzU1NzMzNTgyMCIQZmVlQW1vdW50Rm9yQ2FsYyINJHQwMzU4MjMzNTkzMSINJHQwMzYxMTUzNjI3MSINdW5zdGFrZUFtb3VudCIKdW5zdGFrZUludiINJHQwMzcwOTYzNzI0NCINJHQwMzc3MzkzNzk4NiINJHQwMzc5ODkzODA5NyIJb3V0QW10QW10IhRidXJuTFBBc3NldE9uRmFjdG9yeSINJHQwMzg4ODkzODk3MSISbm9MZXNzVGhlbkFtdEFzc2V0IhRub0xlc3NUaGVuUHJpY2VBc3NldCINJHQwMzk3NjczOTg0OCINY2hlY2tQYXltZW50cyIPY2hlY2tQb29sU3RhdHVzIg0kdDA0MDgyMTQwOTAyIhVub0xlc3NUaGVuQW1vdW50QXNzZXQiDGNoZWNrQW1vdW50cyINJHQwNDIwNDI0MjEyMyILYW10QXNzZXRTdHIiDXByaWNlQXNzZXRTdHIiGGxhc3RSZWZyZXNoZWRCbG9ja0hlaWdodCIdY2hlY2tMYXN0UmVmcmVzaGVkQmxvY2tIZWlnaHQiDSR0MDQzMTExNDMxNjYiDXBvb2xMUEJhbGFuY2UiEmFjY0FtdEFzc2V0QmFsYW5jZSIUYWNjUHJpY2VBc3NldEJhbGFuY2UiCnByaWNlc0xpc3QiD2xwQW10QXNzZXRTaGFyZSIRbHBQcmljZUFzc2V0U2hhcmUiCnBvb2xXZWlnaHQiDGN1clByaWNlQ2FsYyIMYW1CYWxhbmNlUmF3IgxwckJhbGFuY2VSYXciD2FtQmFsYW5jZVJhd1gxOCIPcHJCYWxhbmNlUmF3WDE4IhBwYXltZW50THBBc3NldElkIgxwYXltZW50THBBbXQiAnR4IgZ2ZXJpZnkiD3RhcmdldFB1YmxpY0tleSIKbWF0Y2hlclB1YiIHbmV3SGFzaCILYWxsb3dlZEhhc2giC2N1cnJlbnRIYXNoawABYQAIAAFiAIDC1y8AAWMJALYCAQCAwtcvAAFkCQC2AgEAgICQu7rWrfANAAFlCQC2AgEAAAABZgkAtgIBAAAAAWcJALYCAQABAAFoCQC2AgEAAgABaQIFV0FWRVMAAWoCAl9fAAFrAAEAAWwAAgABbQADAAFuAAQAAW8AAQABcAACAAFxAAMAAXIABAABcwAFAAF0AAYAAXUABwABdgAIAAF3AAkAAXgACgABeQABAAF6AAIAAUEAAwABQgABAAFDAAcBAUQCAUUBRgkAvAIDCQC2AgEFAUUFAWQJALYCAQUBRgEBRwIBSAFJCQCgAwEJALwCAwUBSAkAtgIBBQFJBQFkAQFKAwFLAUwBTQkAawMFAUsFAUwFAU0BAU4BAUgDCQBmAgAABQFICQEBLQEFAUgFAUgBAU8BAUgDCQC/AgIFAWUFAUgJAL4CAQUBSAUBSAEBUAACEyVzX19mYWN0b3J5Q29udHJhY3QBAVEAAhQlc19fbWFuYWdlclB1YmxpY0tleQEBUgACGyVzX19wZW5kaW5nTWFuYWdlclB1YmxpY0tleQEBUwACESVzJXNfX3ByaWNlX19sYXN0AQFUAgFVAVYJALkJAgkAzAgCAhglcyVzJWQlZF9fcHJpY2VfX2hpc3RvcnkJAMwIAgkApAMBBQFVCQDMCAIJAKQDAQUBVgUDbmlsBQFqAQFXAgFYAVkJAKwCAgkArAICCQCsAgICCyVzJXMlc19fUF9fBQFYAgJfXwUBWQEBWgIBWAFZCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX0dfXwUBWAICX18FAVkBAmFhAAIPJXNfX2Ftb3VudEFzc2V0AQJhYgACDiVzX19wcmljZUFzc2V0AAJhYwIHJXNfX2ZlZQACYWQJAGsDAAoFAWIAkE4AAmFlCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAmFjBQJhZAACYWYJALkJAgkAzAgCAgIlcwkAzAgCAgNrTHAFA25pbAUBagACYWcJALkJAgkAzAgCAgIlcwkAzAgCAhJrTHBSZWZyZXNoZWRIZWlnaHQFA25pbAUBagACYWgJALkJAgkAzAgCAgIlcwkAzAgCAg9yZWZyZXNoS0xwRGVsYXkFA25pbAUBagACYWkAHgACYWoJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUCYWgFAmFpAQJhawACESVzX19mYWN0b3J5Q29uZmlnAQJhbAACGCVzJXNfX21hdGNoZXJfX3B1YmxpY0tleQECYW0BAmFuCQCsAgIJAKwCAgIIJXMlcyVzX18FAmFuAiBfX21hcHBpbmdzX19wb29sQ29udHJhY3QyTHBBc3NldAECYW8CAmFwAmFxCQCsAgIJAKwCAgkArAICCQCsAgICCCVkJWQlc19fBQJhcAICX18FAmFxAghfX2NvbmZpZwECYXIBAmFzCQCsAgICKCVzJXMlc19fbWFwcGluZ3NfX2Jhc2VBc3NldDJpbnRlcm5hbElkX18FAmFzAQJhdAACDCVzX19zaHV0ZG93bgECYXUBAmF2CQCsAgICEiVzJXNfX3Bvb2xXZWlnaHRfXwUCYXYBAmF3AAIXJXNfX2FsbG93ZWRMcFNjcmlwdEhhc2gAAmF4Ahclc19fZmVlQ29sbGVjdG9yQWRkcmVzcwECYXkDAmF6AmFBAmFCCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICJG9yZGVyIHZhbGlkYXRpb24gZmFpbGVkOiBvcmRlclZhbGlkPQkApQMBBQJhegINIHNlbmRlclZhbGlkPQkApQMBBQJhQQIOIG1hdGNoZXJWYWxpZD0JAKUDAQUCYUIBAmFDAgJhRAJhRQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFEBQJhRQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQJhRAkAzAgCAgEuCQDMCAIFAmFFCQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABAmFGAgJhRAJhRQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFAmFEBQJhRQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQJhRAkAzAgCAgEuCQDMCAIFAmFFCQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABAmFHAQJhSAkAAgEJALkJAgkAzAgCAghscC5yaWRlOgkAzAgCBQJhSAUDbmlsAgEgAQJhSQECYUgJALkJAgkAzAgCAghscC5yaWRlOgkAzAgCBQJhSAUDbmlsAgEgAAJhSgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmFDAgUEdGhpcwkBAVAAAAJhSwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmFDAgUCYUoFAmF4AQJhTAAJAQt2YWx1ZU9yRWxzZQIJAJsIAgUCYUoJAQJhdAAHAQJhTQAJANkEAQkBAmFDAgUCYUoJAQJhbAABAmFOAAQCYU8JAQJhQwIFBHRoaXMJAQJhYQAEAmFQCQECYUMCBQR0aGlzCQECYWIABAJhcQkBAmFGAgUCYUoJAQJhcgEFAmFQBAJhcAkBAmFGAgUCYUoJAQJhcgEFAmFPCQC1CQIJAQJhQwIFAmFKCQECYW8CCQCkAwEFAmFwCQCkAwEFAmFxBQFqAQJhUQECYVIDCQAAAgUCYVIFAWkFBHVuaXQJANkEAQUCYVIBAmFTAQJhUgMJAAACBQJhUgUEdW5pdAUBaQkA2AQBCQEFdmFsdWUBBQJhUgECYVQBAmFVCQCZCgcJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYVUFAW8JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhVQUBcAkA2QQBCQCRAwIFAmFVBQFxCQECYVEBCQCRAwIFAmFVBQFyCQECYVEBCQCRAwIFAmFVBQFzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYVUFAXQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhVQUBdQACYVYJAQJhVAEJAQJhTgAAAmFXBQJhVgACYVgIBQJhVwJfMQACYVkIBQJhVwJfMgACYVoIBQJhVwJfMwACYmEIBQJhVwJfNAACYmIIBQJhVwJfNQACYmMIBQJhVwJfNgACYmQIBQJhVwJfNwECYmUACQC1CQIJAQJhQwIFAmFKCQECYWsABQFqAAJiZgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgkBAmJlAAUBQgIZaW5jb3JyZWN0IHN0YWtpbmcgYWRkcmVzcwACYmcJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIJAQJiZQAFAUMCGWluY29ycmVjdCBzdGFraW5nIGFkZHJlc3MBAmJoCgJiaQJiagJiawJibAJibQJibgJibwJicAJicQJicgkAuQkCCQDMCAICFCVkJWQlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYmkJAMwIAgkApAMBBQJiagkAzAgCCQCkAwEFAmJrCQDMCAIJAKQDAQUCYmwJAMwIAgkApAMBBQJibQkAzAgCCQCkAwEFAmJuCQDMCAIJAKQDAQUCYm8JAMwIAgkApAMBBQJicAkAzAgCCQCkAwEFAmJxCQDMCAIJAKQDAQUCYnIFA25pbAUBagECYnMGAmJ0AmJ1AmJ2AmJsAmJvAmJwCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYnQJAMwIAgkApAMBBQJidQkAzAgCCQCkAwEFAmJ2CQDMCAIJAKQDAQUCYmwJAMwIAgkApAMBBQJibwkAzAgCCQCkAwEFAmJwBQNuaWwFAWoBAmJ3AQJieAMJAAACBQJieAIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUCYngBAmJ5AgJiegJiQQkAvAIDBQJiegUBZAUCYkEBAmJCBAJiQwJiRAJiRQJiRgQCYkcJAQFEAgUCYkUFAmJDBAJiSAkBAUQCBQJiRgUCYkQJAQJieQIFAmJIBQJiRwECYkkDAmJFAmJGAmJKBAJiSwkBAmFOAAQCYkwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYk0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCYk4JAQJiQgQFAmJMBQJiTQUCYkUFAmJGBAJiQQkBAUQCBQJiRQUCYkwEAmJ6CQEBRAIFAmJGBQJiTQQCYk8JAQFEAgUCYkoFAWIEAmJQCQECYnkCBQJiQQUCYk8EAmJRCQECYnkCBQJiegUCYk8JAMwIAgUCYk4JAMwIAgUCYlAJAMwIAgUCYlEFA25pbAECYlIDAmJFAmJGAmJKBAJiUwkBAmJJAwUCYkUFAmJGBQJiSgkAzAgCCQEBRwIJAJEDAgUCYlMAAAUBYgkAzAgCCQEBRwIJAJEDAgUCYlMAAQUBYgkAzAgCCQEBRwIJAJEDAgUCYlMAAgUBYgUDbmlsAQJiVAQCYlUCYlYCYlcBWAQCYksJAQJhTgAEAmJYCQCRAwIFAmJLBQFxBAJiWQkAkQMCBQJiSwUBcgQCYloJAJEDAgUCYksFAXMEAmJDCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJECQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJjYggJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFAmJYCQCsAgIJAKwCAgIGQXNzZXQgBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkDCQECIT0CBQJiWAUCYlYJAAIBAhVJbnZhbGlkIGFzc2V0IHBhc3NlZC4EAmNjCQECYncBBQJiWQQCY2QJAQFEAgUCY2MFAmJDBAJjZQkBAmJ3AQUCYloEAmNmCQEBRAIFAmNlBQJiRAQCY2cJAQJieQIFAmNmBQJjZAQCY2gJAQFHAgUCY2cFAWIEAmNpCQEBRAIFAmJXBQFiBAJjagkBAUQCBQJjYgUBYgQCY2sJALwCAwUCY2QFAmNpBQJjagQCY2wJALwCAwUCY2YFAmNpBQJjagQCY20JAQFHAgUCY2sFAmJDBAJjbgkBAUcCBQJjbAUCYkQEAmNvAwkAAAIFAmJVAgAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQFYBQJjbQMJAAACBQJiWQIFV0FWRVMFBHVuaXQJANkEAQUCYlkJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUBWAUCY24DCQAAAgUCYloCBVdBVkVTBQR1bml0CQDZBAEFAmJaCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFaAgkApQgBBQFYBQJiVQkBAmJzBgUCY20FAmNuBQJiVwUCY2gFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCY2gJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY2gFA25pbAkAnAoKBQJjbQUCY24FAmJZBQJiWgUCY2MFAmNlBQJjYgUCY2cFAmNhBQJjbwECY3AJAmJVAmNxAmNyAmNzAmN0AmN1AVgCY3YCY3cEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJjeAkAkQMCBQJiSwUBcgQCY3kJAJEDAgUCYksFAXMEAmN6CQCRAwIFAmJLBQF2BAJjQQkAkQMCBQJiSwUBdwQCYkwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYk0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCY2EJAJEDAgUCYksFAXAEAmNiCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmJYCQCsAgIJAKwCAgIGQXNzZXQgCQDYBAEFAmJYAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCY0IJANgEAQkBC3ZhbHVlT3JFbHNlAgUCY3MJANkEAQIFV0FWRVMEAmNDCQDYBAEJAQt2YWx1ZU9yRWxzZQIFAmN1CQDZBAECBVdBVkVTAwMJAQIhPQIFAmN4BQJjQgYJAQIhPQIFAmN5BQJjQwkAAgECIkludmFsaWQgYW10IG9yIHByaWNlIGFzc2V0IHBhc3NlZC4EAmNjAwUCY3YJAQJidwEFAmN4CQBlAgkBAmJ3AQUCY3gFAmNyBAJjZQMFAmN2CQECYncBBQJjeQkAZQIJAQJidwEFAmN5BQJjdAQCY0QJAQFEAgUCY3IFAmJMBAJjRQkBAUQCBQJjdAUCYk0EAmNGCQECYnkCBQJjRQUCY0QEAmNkCQEBRAIFAmNjBQJiTAQCY2YJAQFEAgUCY2UFAmJNBAJjRwMJAAACBQJjYgAABAJjZwUBZQQCY0gFAWUEAmJPCQB2BgkAuQICBQJjRAUCY0UAAAkAtgIBAAUAAQAABQRET1dOCQCXCgUJAQFHAgUCYk8FAWIJAQFHAgUCY0QFAmJMCQEBRwIFAmNFBQJiTQkBAmJ5AgkAtwICBQJjZgUCY0UJALcCAgUCY2QFAmNEBQJjSAQCY2cJAQJieQIFAmNmBQJjZAQCY0gJALwCAwkBAU8BCQC4AgIFAmNnBQJjRgUBZAUCY2cEAmNJCQEBRAIFAmNxBQFiAwMJAQIhPQIFAmNnBQFlCQC/AgIFAmNIBQJjSQcJAAIBCQCsAgIJAKwCAgkArAICAg9QcmljZSBzbGlwcGFnZSAJAKYDAQUCY0gCHiBleGNlZWRlZCB0aGUgcGFzc2VkIGxpbWl0IG9mIAkApgMBBQJjSQQCY2oJAQFEAgUCY2IFAWIEAmNKCQC8AgMFAmNEBQJjZwUBZAQCY0sJALwCAwUCY0UFAWQFAmNnBAJjTAMJAL8CAgUCY0oFAmNFCQCUCgIFAmNLBQJjRQkAlAoCBQJjRAUCY0oEAmNNCAUCY0wCXzEEAmNOCAUCY0wCXzIEAmJPCQC8AgMFAmNqBQJjTgUCY2YJAJcKBQkBAUcCBQJiTwUBYgkBAUcCBQJjTQUCYkwJAQFHAgUCY04FAmJNBQJjZwUCY0gEAmNPCAUCY0cCXzEEAmNQCAUCY0cCXzIEAmNRCAUCY0cCXzMEAmNoCQEBRwIIBQJjRwJfNAUBYgQCY1IJAQFHAggFAmNHAl81BQFiAwkAZwIAAAUCY08JAAIBAjZJbnZhbGlkIGNhbGN1bGF0aW9ucy4gTFAgY2FsY3VsYXRlZCBpcyBsZXNzIHRoYW4gemVyby4EAmNTAwkBASEBBQJjdwAABQJjTwQCY1QJAGUCBQJjcgUCY1AEAmNVCQBlAgUCY3QFAmNRBAJjVgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVMABQJjaAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVQCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjaAkAzAgCCQELU3RyaW5nRW50cnkCCQEBVwIFAVgFAmJVCQECYmgKBQJjUAUCY1EFAmNTBQJjaAUCY3EFAmNSBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjVAUCY1UFA25pbAkAnwoNBQJjTwUCY1MFAmNoBQJjYwUCY2UFAmNiBQJiWAUCY2EFAmNWBQJjVAUCY1UFAmNzBQJjdQECY1cDAmNYAmNZAmNiBAJjWgkAvAIDCQB2BgkAuQICBQJjWAUCY1kAAAkAtgIBAAUAAQAABQRET1dOBQFkBQJjYgUCY1oBAmRhAwJkYgJkYwJkZAQCZGUJAGQCCQECYncBCQECYVMBBQJiYQUCZGIEAmRmCQBkAgkBAmJ3AQkBAmFTAQUCYmIFAmRjBAJkZwkAZAIICQEFdmFsdWUBCQDsBwEFAmFaCHF1YW50aXR5BQJkZAQCY1oJAQJjVwMJALYCAQUCZGUJALYCAQUCZGYJALYCAQUCZGcEAmRoCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJhZwUGaGVpZ2h0CQDMCAIJAQtTdHJpbmdFbnRyeQIFAmFmCQCmAwEFAmNaBQNuaWwJAJQKAgUCZGgFAmNaAQJkaQECZGoEAmJLCQECYU4ABAJkawkAkQMCBQJiSwUBcgQCZGwJAJEDAgUCYksFAXMEAmNhCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXAEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmRtCAUCZGoGYW1vdW50BAJkbgkAawMIBQJkagZhbW91bnQIBQJkagVwcmljZQUBYgQCZG8DCQAAAggFAmRqCW9yZGVyVHlwZQUDQnV5CQCUCgIFAmRtCQEBLQEFAmRuCQCUCgIJAQEtAQUCZG0FAmRuBAJkYggFAmRvAl8xBAJkYwgFAmRvAl8yAwMDCQECYUwABgkAAAIFAmNhBQFtBgkAAAIFAmNhBQFuCQACAQIcRXhjaGFuZ2Ugb3BlcmF0aW9ucyBkaXNhYmxlZAQCZHAJAQJhUwEJAQV2YWx1ZQEICAUCZGoJYXNzZXRQYWlyC2Ftb3VudEFzc2V0BAJkcQkBAmFTAQkBBXZhbHVlAQgIBQJkaglhc3NldFBhaXIKcHJpY2VBc3NldAMDCQECIT0CBQJkcAUCZGsGCQECIT0CBQJkcQUCZGwJAAIBAhNXcm9uZyBvcmRlciBhc3NldHMuBAJkcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCoAwEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQJhZgkBAmFJAQIPa0xwIGlzIHJlcXVpcmVkCQECYUkBAgtpbnZhbGlkIGtMcAQCZHMJAQJkYQMFAmRiBQJkYwAABAJkdAgFAmRzAl8xBAJkdQgFAmRzAl8yBAJkdgkAvwICBQJkdQUCZHIFAmR2AQJkdwECZHgDCQECIT0CCQCQAwEIBQJkeAhwYXltZW50cwABCQACAQIdZXhhY3RseSAxIHBheW1lbnQgaXMgZXhwZWN0ZWQEAmR5CQEFdmFsdWUBCQCRAwIIBQJkeAhwYXltZW50cwAABAJiVgkBBXZhbHVlAQgFAmR5B2Fzc2V0SWQEAmR6CAUCZHkGYW1vdW50BAJjRwkBAmJUBAkA2AQBCAUCZHgNdHJhbnNhY3Rpb25JZAkA2AQBBQJiVgUCZHoIBQJkeAZjYWxsZXIEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJjRwJfOQQCY28IBQJjRwNfMTADAwkBAmFMAAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsR2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EJAJcKBQUCY20FAmNuBQJkegUCYlYFAmNvAQJkQQMCZHgCY3ECY3cDCQECIT0CCQCQAwEIBQJkeAhwYXltZW50cwACCQACAQIfZXhhY3RseSAyIHBheW1lbnRzIGFyZSBleHBlY3RlZAQCZEIJAQV2YWx1ZQEJAJEDAggFAmR4CHBheW1lbnRzAAAEAmRDCQEFdmFsdWUBCQCRAwIIBQJkeAhwYXltZW50cwABBAJkRAkBAmNwCQkA2AQBCAUCZHgNdHJhbnNhY3Rpb25JZAUCY3EIBQJkQgZhbW91bnQIBQJkQgdhc3NldElkCAUCZEMGYW1vdW50CAUCZEMHYXNzZXRJZAkApQgBCAUCZHgGY2FsbGVyBwUCY3cEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJkRAJfOAMDAwkBAmFMAAYJAAACBQJjYQUBbAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsUHV0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EFAmREAQJkRQECZEYEAmRHCQD8BwQFAmFKAgRlbWl0CQDMCAIFAmRGBQNuaWwFA25pbAMJAAACBQJkRwUCZEcEAmRIBAJkSQUCZEcDCQABAgUCZEkCB0FkZHJlc3MEAmRKBQJkSQkA/AcEBQJkSgIEZW1pdAkAzAgCBQJkRgUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCZEgFAmRIBQJkRgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECZEsBAmRGBAJkTAkAawMFAmRGBQJhZQUBYgkAlAoCCQBlAgUCZEYFAmRMBQJkTAECZE0EAmROAmRPAVgBWQQCZFAJAAACBQFZBQR1bml0BAJkUQkBAmJ3AQkBAmFTAQUCYmEEAmRSCQECYncBCQECYVMBBQJiYgQCZFMDCQAAAgUCZE8FAmJhBgMJAAACBQJkTwUCYmIHCQECYUcBAg1pbnZhbGlkIGFzc2V0BAJkVAMFAmRQCQCUCgIFAmRRBQJkUgMFAmRTCQCUCgIJAGUCBQJkUQUCZE4FAmRSCQCUCgIFAmRRCQBlAgUCZFIFAmROBAJkVQgFAmRUAl8xBAJkVggFAmRUAl8yBAJkVwMFAmRTCQCUCgIFAmROAAAJAJQKAgAABQJkTgQCZFgIBQJkVwJfMQQCZFkIBQJkVwJfMgQCZG0ICQECZEsBBQJkWAJfMQQCZG4ICQECZEsBBQJkWQJfMQQCZFoJAQJkSwEFAmROBAJlYQgFAmRaAl8xBAJkTAgFAmRaAl8yBAJlYgkAZAIFAmRVBQJkbQQCZWMJAGQCBQJkVgUCZG4EAmVkCQECYnkCCQEBRAIFAmVjBQJiZAkBAUQCBQJlYgUCYmMEAmVlCQEBRwIFAmVkBQFiBAJlZgMFAmRTBQJkVQUCZFYEAmVnCQC2AgEFAmVmBAJlaAkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmFaCQCsAgIJAKwCAgIGYXNzZXQgCQDYBAEFAmFaAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZWkDCQC/AgIFAmVoBQFmBgkBAmFHAQIiaW5pdGlhbCBkZXBvc2l0IHJlcXVpcmVzIGFsbCBjb2lucwMJAAACBQJlaQUCZWkEAmVqCQC2AgEFAmVhBAJlawkAlgMBCQDMCAIAAAkAzAgCCQCgAwEJALoCAgkAuQICBQJlaAkAuAICCQEKc3FydEJpZ0ludAQJALcCAgUBZAkAugICCQC5AgIFAmVqBQFkBQJlZwASABIFBERPV04FAWQFAWQFA25pbAQCY1YDBQJkUAUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmVlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFXAgkApQgBCQEFdmFsdWUBBQFYCQDYBAEJAQV2YWx1ZQEFAVkJAQJiaAoFAmRYBQJkWQUCZWsFAmVlAAAAAAUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAAAAAAFA25pbAQCZWwJAQJieQIJAQFEAgUCZFYFAmJkCQEBRAIFAmRVBQJiYwQCZW0JAQFHAgUCZWwFAWIEAmVuBAJlbwMFAmRTCQCUCgIFAmRYBQJkVQkAlAoCBQJkWQUCZFYEAmRGCAUCZW8CXzEEAmVwCAUCZW8CXzIEAmVxCQCgAwEJALwCAwUCZWgJALYCAQkAaQIFAmRGAAIJALYCAQUCZXAJAGsDCQBlAgUCZWsFAmVxBQFiBQJlcQkAlwoFBQJlawUCY1YFAmRMBQJlbgUCZFMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmVyBQJlcwJlYQJkTwFYAVkEAmRQCQAAAgUBWQUEdW5pdAQCZXQJAMwIAgMJAAACBQJkTwUCYVoGCQECYUcBAhBpbnZhbGlkIGxwIGFzc2V0BQNuaWwDCQAAAgUCZXQFAmV0BAJldQMJAAACBQJlcwUCYmEGAwkAAAIFAmVzBQJiYgcJAQJhRwECDWludmFsaWQgYXNzZXQEAmV2AwUCZXUJALYCAQkBAmJ3AQkBAmFTAQUCYmEJALYCAQkBAmJ3AQkBAmFTAQUCYmIEAmV3CQECYncBCQECYVMBBQJiYQQCZXgJAQJidwEJAQJhUwEFAmJiBAJleQMFAmV1BQJldwUCZXgEAmV6CQC2AgEFAmV5BAJlaAkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmFaCQCsAgIJAKwCAgIGYXNzZXQgCQDYBAEFAmFaAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZUEJALYCAQUCZWEEAmVCCQCWAwEJAMwIAgAACQDMCAIJAKADAQkAugICCQC5AgIFAmV2CQC4AgIFAWQJAHYGCQC4AgIFAWQJALoCAgkAuQICBQJlQQUBZAUCZWgAEgUBaAAAABIFBERPV04FAWQFA25pbAQCZUMJAQJkSwEFAmVCBAJlRAgFAmVDAl8xBAJkTAgFAmVDAl8yBAJlRQMFAmV1CQCWCgQFAmVEAAAJAGUCBQJldwUCZUIFAmV4CQCWCgQAAAUCZUQFAmV3CQBlAgUCZXgFAmVCBAJlRggFAmVFAl8xBAJlRwgFAmVFAl8yBAJlSAgFAmVFAl8zBAJlSQgFAmVFAl80BAJlZAkBAmJ5AgkBAUQCBQJlSQUCYmQJAQFEAgUCZUgFAmJjBAJlZQkBAUcCBQJlZAUBYgQCY1YDBQJkUAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFaAgkApQgBCQEFdmFsdWUBBQFYCQDYBAEJAQV2YWx1ZQEFAVkJAQJicwYFAmVGBQJlRwUCZWEFAmVlBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmVlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVlBQNuaWwEAmVsCQECYnkCCQEBRAIFAmV4BQJiZAkBAUQCBQJldwUCYmMEAmVtCQEBRwIFAmVsBQFiBAJlbgQCZUoJAGgCCQCgAwEJALwCAwUCZXYFAmVBBQJlaAACCQBrAwkAZQIFAmVEBQJlSgUBYgUCZUoJAJcKBQUCZUQFAmNWBQJkTAUCZW4FAmV1CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJlSwAEAmRJCQCiCAEJAQFRAAMJAAECBQJkSQIGU3RyaW5nBAJlTAUCZEkJANkEAQUCZUwDCQABAgUCZEkCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECZU0ABAJkSQkAoggBCQEBUgADCQABAgUCZEkCBlN0cmluZwQCZUwFAmRJCQDZBAEFAmVMAwkAAQIFAmRJAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBAmVOAQJkeAQCZEkJAQJlSwADCQABAgUCZEkCCkJ5dGVWZWN0b3IEAmVPBQJkSQkAAAIIBQJkeA9jYWxsZXJQdWJsaWNLZXkFAmVPAwkAAQIFAmRJAgRVbml0CQAAAggFAmR4BmNhbGxlcgUEdGhpcwkAAgECC01hdGNoIGVycm9yAQJlUAECZHgEAmVRCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEAmRJCQECZUsAAwkAAQIFAmRJAgpCeXRlVmVjdG9yBAJlTwUCZEkDCQAAAggFAmR4D2NhbGxlclB1YmxpY0tleQUCZU8GBQJlUQMJAAECBQJkSQIEVW5pdAMJAAACCAUCZHgGY2FsbGVyBQR0aGlzBgUCZVEJAAIBAgtNYXRjaCBlcnJvchsCZHgBCnNldE1hbmFnZXIBAmVSBAJlUwkBAmVQAQUCZHgDCQAAAgUCZVMFAmVTBAJlVAkA2QQBBQJlUgMJAAACBQJlVAUCZVQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVIABQJlUgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR4AQ5jb25maXJtTWFuYWdlcgAEAmVVCQECZU0ABAJlVgMJAQlpc0RlZmluZWQBBQJlVQYJAAIBAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUCZVYFAmVWBAJlVwMJAAACCAUCZHgPY2FsbGVyUHVibGljS2V5CQEFdmFsdWUBBQJlVQYJAAIBAhtZb3UgYXJlIG5vdCBwZW5kaW5nIG1hbmFnZXIDCQAAAgUCZVcFAmVXCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFRAAkA2AQBCQEFdmFsdWUBBQJlVQkAzAgCCQELRGVsZXRlRW50cnkBCQEBUgAFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkeAEDcHV0AgJjcQJlWAMJAGYCAAAFAmNxCQACAQIgSW52YWxpZCBzbGlwcGFnZVRvbGVyYW5jZSBwYXNzZWQEAmRECQECZEEDBQJkeAUCY3EGBAJjUwgFAmREAl8yBAJiWAgFAmREAl83BAJjbwgFAmREAl85BAJjVAgFAmREA18xMAQCY1UIBQJkRANfMTEEAmVZCAUCZEQDXzEyBAJlWggFAmREA18xMwQCZEcJAPwHBAUCYUoCBGVtaXQJAMwIAgUCY1MFA25pbAUDbmlsAwkAAAIFAmRHBQJkRwQCZEgEAmRJBQJkRwMJAAECBQJkSQIHQWRkcmVzcwQCZEoFAmRJCQD8BwQFAmRKAgRlbWl0CQDMCAIFAmNTBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkSAUCZEgEAmZhAwkAZgIFAmNUAAAJAPwHBAUCYmcCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJlWQUCY1QFA25pbAUDbmlsAwkAAAIFAmZhBQJmYQQCZmIDCQBmAgUCY1UAAAkA/AcEBQJiZwIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmVaBQJjVQUDbmlsBQNuaWwDCQAAAgUCZmIFAmZiBAJmYwMFAmVYBAJmZAkA/AcEBQJiZgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlgFAmNTBQNuaWwDCQAAAgUCZmQFAmZkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmR4BmNhbGxlcgUCY1MFAmJYBQNuaWwEAmZlCQECZGEDAAAAAAAABAJmZggFAmZlAl8xBAJjWggFAmZlAl8yCQDOCAIJAM4IAgUCY28FAmZjBQJmZgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkeAEKcHV0Rm9yRnJlZQECZmcDCQBmAgAABQJmZwkAAgECFEludmFsaWQgdmFsdWUgcGFzc2VkBAJkRAkBAmRBAwUCZHgFAmZnBwQCY28IBQJkRAJfOQQCZmgJAQJkYQMAAAAAAAAEAmZmCAUCZmgCXzEEAmNaCAUCZmgCXzIJAM4IAgUCY28FAmZmAmR4AQlwdXRPbmVUa24CAmZpAmZqBAJmawoAAmZsCQD8BwQFAmFKAihpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZFJFQURPTkxZCQDMCAIJAKUIAQUEdGhpcwUDbmlsBQNuaWwDCQABAgUCZmwCB0Jvb2xlYW4FAmZsCQACAQkArAICCQADAQUCZmwCHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4EAmZtAwMDCQECYUwABgkAAAIFAmFZBQFsBgkAAAIFAmFZBQFuBgUCZmsEAmV0CQDMCAIDAwkBASEBBQJmbQYJAQJlTgEFAmR4BgkBAmFHAQIhcHV0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHgIcGF5bWVudHMAAQYJAQJhRwECHmV4YWN0bHkgMSBwYXltZW50IGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmV0BQJldAQCZm4JAJEDAggFAmR4CHBheW1lbnRzAAAEAmRPCAUCZm4HYXNzZXRJZAQCZE4IBQJmbgZhbW91bnQEAVgIBQJkeAZjYWxsZXIEAVkIBQJkeA10cmFuc2FjdGlvbklkBAJmbwkBAmRNBAUCZE4FAmRPBQFYBQFZBAJmcAgFAmZvAl8xBAJjVggFAmZvAl8yBAJkTAgFAmZvAl8zBAJmcQgFAmZvAl80BAJkUwgFAmZvAl81BAJmcgMDCQBmAgUCZmkAAAkAZgIFAmZpBQJmcAcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZmkFA25pbAIABQJmcAQCZEcJAQJkRQEFAmZyAwkAAAIFAmRHBQJkRwQCZmMDBQJmagQCZnMJAPwHBAUCYmYCBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmFaBQJmcgUDbmlsAwkAAAIFAmZzBQJmcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJkeAZjYWxsZXIFAmZyBQJhWgUDbmlsBAJmdAMJAGYCBQJkTAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFLBQJkTAUCZE8FA25pbAUDbmlsBAJmdQMJAAACBQR0aGlzBQJhSwkAlAoCAAAAAAMFAmRTCQCUCgIJAQEtAQUCZEwAAAkAlAoCAAAJAQEtAQUCZEwEAmRiCAUCZnUCXzEEAmRjCAUCZnUCXzIEAmZ2CQECZGEDBQJkYgUCZGMAAAQCZmYIBQJmdgJfMQQCY1oIBQJmdgJfMgkAlAoCCQDOCAIJAM4IAgkAzggCBQJjVgUCZmMFAmZ0BQJmZgUCZnIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHgBEXB1dE9uZVRrblJFQURPTkxZAgJkTwJkTgQCZncJAQJkTQQFAmROCQECYVEBBQJkTwUEdW5pdAUEdW5pdAQCZnAIBQJmdwJfMQQCY1YIBQJmdwJfMgQCZEwIBQJmdwJfMwQCZnEIBQJmdwJfNAQCZFMIBQJmdwJfNQkAlAoCBQNuaWwJAJUKAwUCZnAFAmRMBQJmcQJkeAEJZ2V0T25lVGtuAgJmeAJmaQQCZmsKAAJmbAkA/AcEBQJhSgIoaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWRSRUFET05MWQkAzAgCCQClCAEFBHRoaXMFA25pbAUDbmlsAwkAAQIFAmZsAgdCb29sZWFuBQJmbAkAAgEJAKwCAgkAAwEFAmZsAhwgY291bGRuJ3QgYmUgY2FzdCB0byBCb29sZWFuBAJmeQMDCQECYUwABgkAAAIFAmFZBQFuBgUCZmsEAmV0CQDMCAIDAwkBASEBBQJmeQYJAQJlTgEFAmR4BgkBAmFHAQIhZ2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHgIcGF5bWVudHMAAQYJAQJhRwECHmV4YWN0bHkgMSBwYXltZW50IGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmV0BQJldAQCZXMJAQJhUQEFAmZ4BAJmbgkAkQMCCAUCZHgIcGF5bWVudHMAAAQCZE8IBQJmbgdhc3NldElkBAJlYQgFAmZuBmFtb3VudAQBWAgFAmR4BmNhbGxlcgQBWQgFAmR4DXRyYW5zYWN0aW9uSWQEAmZ6CQECZXIFBQJlcwUCZWEFAmRPBQFYBQFZBAJmQQgFAmZ6Al8xBAJjVggFAmZ6Al8yBAJkTAgFAmZ6Al8zBAJmcQgFAmZ6Al80BAJldQgFAmZ6Al81BAJkRgMDCQBmAgUCZmkAAAkAZgIFAmZpBQJmQQcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZmkFA25pbAIABQJmQQQCZkIJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZWEFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZE8FAmVhBQNuaWwDCQAAAgUCZkIFAmZCBAJmQwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQFYBQJkRgUCZXMFA25pbAQCZnQDCQBmAgUCZEwAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZEwFAmVzBQNuaWwFA25pbAQCZkQEAmZFAwkAAAIFBHRoaXMFAmFLAAAFAmRMAwUCZXUJAJQKAgkBAS0BCQBkAgUCZEYFAmZFAAAJAJQKAgAACQEBLQEJAGQCBQJkRgUCZkUEAmRiCAUCZkQCXzEEAmRjCAUCZkQCXzIEAmZGCQECZGEDBQJkYgUCZGMAAAQCZmYIBQJmRgJfMQQCY1oIBQJmRgJfMgkAlAoCCQDOCAIJAM4IAgkAzggCBQJjVgUCZkMFAmZ0BQJmZgUCZEYJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHgBEWdldE9uZVRrblJFQURPTkxZAgJlcwJlYQQCZkcJAQJlcgUJAQJhUQEFAmVzBQJlYQUCYVoFBHVuaXQFBHVuaXQEAmZBCAUCZkcCXzEEAmNWCAUCZkcCXzIEAmRMCAUCZkcCXzMEAmZxCAUCZkcCXzQEAmV1CAUCZkcCXzUJAJQKAgUDbmlsCQCVCgMFAmZBBQJkTAUCZnECZHgBE3Vuc3Rha2VBbmRHZXRPbmVUa24DAmZIAmZ4AmZpBAJmawoAAmZsCQD8BwQFAmFKAihpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZFJFQURPTkxZCQDMCAIJAKUIAQUEdGhpcwUDbmlsBQNuaWwDCQABAgUCZmwCB0Jvb2xlYW4FAmZsCQACAQkArAICCQADAQUCZmwCHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4EAmZ5AwMJAQJhTAAGCQAAAgUCYVkFAW4GBQJmawQCZXQJAMwIAgMDCQEBIQEFAmZ5BgkBAmVOAQUCZHgGCQECYUcBAiFnZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkeAhwYXltZW50cwAABgkBAmFHAQIYbm8gcGF5bWVudHMgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXQFAmV0BAJlcwkBAmFRAQUCZngEAVgIBQJkeAZjYWxsZXIEAVkIBQJkeA10cmFuc2FjdGlvbklkBAJmSQkA/AcEBQJiZgIHdW5zdGFrZQkAzAgCCQDYBAEFAmFaCQDMCAIFAmZIBQNuaWwFA25pbAMJAAACBQJmSQUCZkkEAmZKCQECZXIFBQJlcwUCZkgFAmFaBQFYBQFZBAJmQQgFAmZKAl8xBAJjVggFAmZKAl8yBAJkTAgFAmZKAl8zBAJmcQgFAmZKAl80BAJldQgFAmZKAl81BAJkRgMDCQBmAgUCZmkAAAkAZgIFAmZpBQJmQQcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZmkFA25pbAIABQJmQQQCZkIJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZkgFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYVoFAmZIBQNuaWwDCQAAAgUCZkIFAmZCBAJmQwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHgGY2FsbGVyBQJkRgUCZXMFA25pbAQCZnQDCQBmAgUCZEwAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZEwFAmVzBQNuaWwFA25pbAQCZksEAmZFAwkAAAIFBHRoaXMFAmFLAAAFAmRMAwUCZXUJAJQKAgkBAS0BCQBkAgUCZEYFAmZFAAAJAJQKAgAACQEBLQEJAGQCBQJkRgUCZkUEAmRiCAUCZksCXzEEAmRjCAUCZksCXzIEAmZMCQECZGEDBQJkYgUCZGMAAAQCZmYIBQJmTAJfMQQCY1oIBQJmTAJfMgkAlAoCCQDOCAIJAM4IAgkAzggCBQJjVgUCZkMFAmZ0BQJmZgUCZEYJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHgBA2dldAAEAmNHCQECZHcBBQJkeAQCZk0IBQJjRwJfMQQCY24IBQJjRwJfMgQCZHoIBQJjRwJfMwQCYlYIBQJjRwJfNAQCY28IBQJjRwJfNQQCZk4JAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZHoFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlYFAmR6BQNuaWwDCQAAAgUCZk4FAmZOBAJmTwkBAmRhAwkBAS0BBQJmTQkBAS0BBQJjbgAABAJmZggFAmZPAl8xBAJjWggFAmZPAl8yCQDOCAIFAmNvBQJmZgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkeAEJZ2V0Tm9MZXNzAgJmUAJmUQQCY0cJAQJkdwEFAmR4BAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJkeggFAmNHAl8zBAJiVggFAmNHAl80BAJjbwgFAmNHAl81AwkAZgIFAmZQBQJjbQkAAgEJAKwCAgkArAICCQCsAgICHG5vTGVzc1RoZW5BbXRBc3NldCBmYWlsZWQ6ICAJAKQDAQUCY20CAyA8IAkApAMBBQJmUAMJAGYCBQJmUQUCY24JAAIBCQCsAgIJAKwCAgkArAICAh1ub0xlc3NUaGVuUHJpY2VBc3NldCBmYWlsZWQ6IAkApAMBBQJjbgIDIDwgCQCkAwEFAmZRBAJmTgkA/AcEBQJhSgIEYnVybgkAzAgCBQJkegUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiVgUCZHoFA25pbAMJAAACBQJmTgUCZk4EAmZSCQECZGEDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZmCAUCZlICXzEEAmNaCAUCZlICXzIJAM4IAgUCY28FAmZmCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR4AQ11bnN0YWtlQW5kR2V0AQJkRgQCZlMDCQECIT0CCQCQAwEIBQJkeAhwYXltZW50cwAACQACAQIYTm8gcGF5bWVudHMgYXJlIGV4cGVjdGVkBgMJAAACBQJmUwUCZlMEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJmSQkA/AcEBQJiZgIHdW5zdGFrZQkAzAgCCQDYBAEFAmJYCQDMCAIFAmRGBQNuaWwFA25pbAMJAAACBQJmSQUCZkkEAmNHCQECYlQECQDYBAEIBQJkeA10cmFuc2FjdGlvbklkCQDYBAEFAmJYBQJkRggFAmR4BmNhbGxlcgQCY20IBQJjRwJfMQQCY24IBQJjRwJfMgQCY2EJAQ1wYXJzZUludFZhbHVlAQgFAmNHAl85BAJjbwgFAmNHA18xMAQCZlQDAwkBAmFMAAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsR2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EGAwkAAAIFAmZUBQJmVAQCZk4JAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZEYFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlgFAmRGBQNuaWwDCQAAAgUCZk4FAmZOBAJmVQkBAmRhAwkBAS0BBQJjbQkBAS0BBQJjbgAABAJmZggFAmZVAl8xBAJjWggFAmZVAl8yCQDOCAIFAmNvBQJmZgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkeAETdW5zdGFrZUFuZEdldE5vTGVzcwMCZkgCZlYCZlEEAmZ5AwkBAmFMAAYJAAACBQJhWQUBbgQCZXQJAMwIAgMJAQEhAQUCZnkGCQACAQIhZ2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHgIcGF5bWVudHMAAAYJAAIBAhhubyBwYXltZW50cyBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJldAUCZXQEAmZJCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYVoJAMwIAgUCZkgFA25pbAUDbmlsAwkAAAIFAmZJBQJmSQQCY0cJAQJiVAQJANgEAQgFAmR4DXRyYW5zYWN0aW9uSWQJANgEAQUCYVoFAmZICAUCZHgGY2FsbGVyBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjbwgFAmNHA18xMAQCZlcJAMwIAgMJAGcCBQJjbQUCZlYGCQACAQkAuQkCCQDMCAICLGFtb3VudCBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZlYFA25pbAIACQDMCAIDCQBnAgUCY24FAmZRBgkAAgEJALkJAgkAzAgCAitwcmljZSBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZlEFA25pbAIABQNuaWwDCQAAAgUCZlcFAmZXBAJmTgkA/AcEBQJhSgIEYnVybgkAzAgCBQJmSAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJhWgUCZkgFA25pbAMJAAACBQJmTgUCZk4EAmZYCQECZGEDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZmCAUCZlgCXzEEAmNaCAUCZlgCXzIJAM4IAgUCY28FAmZmCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR4AQhhY3RpdmF0ZQICZlkCZloDCQECIT0CCQClCAEIBQJkeAZjYWxsZXIJAKUIAQUCYUoJAAIBAhJwZXJtaXNzaW9ucyBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQECYWEABQJmWQkAzAgCCQELU3RyaW5nRW50cnkCCQECYWIABQJmWgUDbmlsAgdzdWNjZXNzAmR4AQpyZWZyZXNoS0xwAAQCZ2EJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUCYWcAAAQCZ2IDCQBnAgkAZQIFBmhlaWdodAUCZ2EFAmFqBQR1bml0CQECYUcBCQC5CQIJAMwIAgkApAMBBQJhagkAzAgCAi8gYmxvY2tzIGhhdmUgbm90IHBhc3NlZCBzaW5jZSB0aGUgcHJldmlvdXMgY2FsbAUDbmlsAgADCQAAAgUCZ2IFAmdiBAJnYwkBAmRhAwAAAAAAAAQCZGgIBQJnYwJfMQQCY1oIBQJnYwJfMgkAlAoCBQJkaAkApgMBBQJjWgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkeAEcZ2V0UG9vbENvbmZpZ1dyYXBwZXJSRUFET05MWQAJAJQKAgUDbmlsCQECYU4AAmR4ARxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZAQJieAkAlAoCBQNuaWwJAQJidwEFAmJ4AmR4ARljYWxjUHJpY2VzV3JhcHBlclJFQURPTkxZAwJiRQJiRgJiSgQCYlMJAQJiSQMFAmJFBQJiRgUCYkoJAJQKAgUDbmlsCQDMCAIJAKYDAQkAkQMCBQJiUwAACQDMCAIJAKYDAQkAkQMCBQJiUwABCQDMCAIJAKYDAQkAkQMCBQJiUwACBQNuaWwCZHgBFHRvWDE4V3JhcHBlclJFQURPTkxZAgFFAUYJAJQKAgUDbmlsCQCmAwEJAQFEAgUBRQUBRgJkeAEWZnJvbVgxOFdyYXBwZXJSRUFET05MWQIBSAFJCQCUCgIFA25pbAkBAUcCCQCnAwEFAUgFAUkCZHgBHmNhbGNQcmljZUJpZ0ludFdyYXBwZXJSRUFET05MWQICYnoCYkEJAJQKAgUDbmlsCQCmAwEJAQJieQIJAKcDAQUCYnoJAKcDAQUCYkECZHgBI2VzdGltYXRlUHV0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZCQJiVQJjcQJjcgJjcwJjdAJjdQFYAmN2AmN3CQCUCgIFA25pbAkBAmNwCQUCYlUFAmNxBQJjcgUCY3MFAmN0BQJjdQUBWAUCY3YFAmN3AmR4ASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQCYlUCYlYCYlcBWAQCY0cJAQJiVAQFAmJVBQJiVgUCYlcJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAVgJAJQKAgUDbmlsCQCcCgoIBQJjRwJfMQgFAmNHAl8yCAUCY0cCXzMIBQJjRwJfNAgFAmNHAl81CAUCY0cCXzYIBQJjRwJfNwkApgMBCAUCY0cCXzgIBQJjRwJfOQgFAmNHA18xMAJkeAENc3RhdHNSRUFET05MWQAEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJkawkAkQMCBQJiSwUBcgQCZGwJAJEDAgUCYksFAXMEAmN6CQCRAwIFAmJLBQF2BAJjQQkAkQMCBQJiSwUBdwQCYkwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYk0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCZ2QICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnZQkBAmJ3AQUCZGsEAmdmCQECYncBBQJkbAQCZ2cDCQAAAgUCZ2QAAAkAzAgCBQFlCQDMCAIFAWUJAMwIAgUBZQUDbmlsCQECYkkDBQJnZQUCZ2YFAmdkBAJjaAAABAJnaAkBAUcCCQCRAwIFAmdnAAEFAWIEAmdpCQEBRwIJAJEDAgUCZ2cAAgUBYgQCZ2oJAQV2YWx1ZQEJAJoIAgUCYUoJAQJhdQEJAKUIAQUEdGhpcwkAlAoCBQNuaWwJALkJAgkAzAgCAg4lZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmdlCQDMCAIJAKQDAQUCZ2YJAMwIAgkApAMBBQJnZAkAzAgCCQCkAwEFAmNoCQDMCAIJAKQDAQUCZ2gJAMwIAgkApAMBBQJnaQkAzAgCCQCkAwEFAmdqBQNuaWwFAWoCZHgBIGV2YWx1YXRlUHV0QnlBbW91bnRBc3NldFJFQURPTkxZAQJjcgQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmN4CQCRAwIFAmJLBQFyBAJiWQkA2QQBBQJjeAQCY3kJAJEDAgUCYksFAXMEAmJaCQDZBAEFAmN5BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCZ2QICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnZQkBAmJ3AQUCY3gEAmdmCQECYncBBQJjeQQCYkcJAQFEAgUCZ2UFAmJMBAJiSAkBAUQCBQJnZgUCYk0EAmNnAwkAAAIFAmdkAAAFAWUJAQJieQIFAmJIBQJiRwQCY0QJAQFEAgUCY3IFAmJMBAJjRQkAvAIDBQJjRAUCY2cFAWQEAmN0CQEBRwIFAmNFBQJiTQQCZEQJAQJjcAkCAACgwh4FAmNyBQJiWQUCY3QFAmJaAgAGBwQCY08IBQJkRAJfMQQCZ2sIBQJkRAJfMwQCY2MIBQJkRAJfNAQCY2UIBQJkRAJfNQQCY2IIBQJkRAJfNgkAlAoCBQNuaWwJALkJAgkAzAgCAhAlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCY08JAMwIAgkApAMBCQEBRwIFAmNnBQFiCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIFAmNhCQDMCAIJAKQDAQUCY3IJAMwIAgkApAMBBQJjdAUDbmlsBQFqAmR4AR9ldmFsdWF0ZVB1dEJ5UHJpY2VBc3NldFJFQURPTkxZAQJjdAQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmN4CQCRAwIFAmJLBQFyBAJiWQkA2QQBBQJjeAQCY3kJAJEDAgUCYksFAXMEAmJaCQDZBAEFAmN5BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCZ2QICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnbAkBAmJ3AQUCY3gEAmdtCQECYncBBQJjeQQCZ24JAQFEAgUCZ2wFAmJMBAJnbwkBAUQCBQJnbQUCYk0EAmNnAwkAAAIFAmdkAAAFAWUJAQJieQIFAmdvBQJnbgQCY0UJAQFEAgUCY3QFAmJNBAJjRAkAvAIDBQJjRQUBZAUCY2cEAmNyCQEBRwIFAmNEBQJiTAQCZEQJAQJjcAkCAACgwh4FAmNyBQJiWQUCY3QFAmJaAgAGBwQCY08IBQJkRAJfMQQCZ2sIBQJkRAJfMwQCY2MIBQJkRAJfNAQCY2UIBQJkRAJfNQQCY2IIBQJkRAJfNgkAlAoCBQNuaWwJALkJAgkAzAgCAhAlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCY08JAMwIAgkApAMBCQEBRwIFAmNnBQFiCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIFAmNhCQDMCAIJAKQDAQUCY3IJAMwIAgkApAMBBQJjdAUDbmlsBQFqAmR4ARNldmFsdWF0ZUdldFJFQURPTkxZAgJncAJncQQCY0cJAQJiVAQCAAUCZ3AFAmdxBQR0aGlzBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjYwgFAmNHAl81BAJjZQgFAmNHAl82BAJjYggFAmNHAl83BAJjaAgFAmNHAl84BAJjYQkBDXBhcnNlSW50VmFsdWUBCAUCY0cCXzkJAJQKAgUDbmlsCQC5CQIJAMwIAgIOJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJjbQkAzAgCCQCkAwEFAmNuCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIJAKYDAQUCY2gJAMwIAgkApAMBBQJjYQUDbmlsBQFqAQJncgECZ3MABAJndAQCZEkJAQJlSwADCQABAgUCZEkCCkJ5dGVWZWN0b3IEAmVPBQJkSQUCZU8DCQABAgUCZEkCBFVuaXQIBQJncg9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgQCZEkFAmdyAwkAAQIFAmRJAgVPcmRlcgQCZGoFAmRJBAJndQkBAmFNAAQCYXoJAQJkaQEFAmRqBAJhQQkA9AMDCAUCZGoJYm9keUJ5dGVzCQCRAwIIBQJkagZwcm9vZnMAAAgFAmRqD3NlbmRlclB1YmxpY0tleQQCYUIJAPQDAwgFAmRqCWJvZHlCeXRlcwkAkQMCCAUCZGoGcHJvb2ZzAAEFAmd1AwMDBQJhegUCYUEHBQJhQgcGCQECYXkDBQJhegUCYUEFAmFCAwkAAQIFAmRJAhRTZXRTY3JpcHRUcmFuc2FjdGlvbgQCZUwFAmRJBAJndgkA9gMBCQEFdmFsdWUBCAUCZUwGc2NyaXB0BAJndwkA2wQBCQEFdmFsdWUBCQCdCAIFAmFKCQECYXcABAJneAkA8QcBBQR0aGlzAwMJAAACBQJndwUCZ3YJAQIhPQIFAmd4BQJndgcGCQD0AwMIBQJncglib2R5Qnl0ZXMJAJEDAggFAmdyBnByb29mcwAABQJndAkA9AMDCAUCZ3IJYm9keUJ5dGVzCQCRAwIIBQJncgZwcm9vZnMAAAUCZ3RFDX3+",
    "chainId": 84,
    "height": 2336991,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8ysgBWB45NCi3cudQ8xknUk33XTeSgT6rCSxZ1AkB8jM
Next: G9947JqEuCpv5yzoxoNLZZdRRj8H6CtopAYKG28jxAhf

Diff: 

OldNewDifferences
373373     }
374374 
375375 
376+func calcKLp (amountBalance,priceBalance,lpEmission) = {
377+    let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 0, DOWN), scale18, lpEmission)
378+    updatedKLp
379+    }
380+
381+
382+func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
383+    let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
384+    let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
385+    let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
386+    let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
387+    let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
388+    $Tuple2(actions, updatedKLp)
389+    }
390+
391+
376392 func validateMatcherOrderAllowed (order) = {
377393     let cfg = getPoolConfig()
378394     let amtAssetId = cfg[idxAmtAssetId]
380396     let poolStatus = parseIntValue(cfg[idxPoolStatus])
381397     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
382398     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
383-    let accAmtAssetBalance = getAccBalance(amtAssetId)
384-    let accPriceAssetBalance = getAccBalance(priceAssetId)
385-    let curPriceX18 = if ((order.orderType == Buy))
386-        then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance)
387-        else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance)
388-    let curPrice = fromX18(curPriceX18, scale8)
399+    let amountAssetAmount = order.amount
400+    let priceAssetAmount = fraction(order.amount, order.price, scale8)
401+    let $t01983820050 = if ((order.orderType == Buy))
402+        then $Tuple2(amountAssetAmount, -(priceAssetAmount))
403+        else $Tuple2(-(amountAssetAmount), priceAssetAmount)
404+    let amountAssetBalanceDelta = $t01983820050._1
405+    let priceAssetBalanceDelta = $t01983820050._2
389406     if (if (if (isGlobalShutdown())
390407         then true
391408         else (poolStatus == PoolMatcherDisabled))
393410         else (poolStatus == PoolShutdown))
394411         then throw("Exchange operations disabled")
395412         else {
396-            let orderAmtAsset = order.assetPair.amountAsset
397-            let orderAmtAssetStr = if ((orderAmtAsset == unit))
398-                then "WAVES"
399-                else toBase58String(value(orderAmtAsset))
400-            let orderPriceAsset = order.assetPair.priceAsset
401-            let orderPriceAssetStr = if ((orderPriceAsset == unit))
402-                then "WAVES"
403-                else toBase58String(value(orderPriceAsset))
413+            let orderAmtAssetStr = assetIdToString(value(order.assetPair.amountAsset))
414+            let orderPriceAssetStr = assetIdToString(value(order.assetPair.priceAsset))
404415             if (if ((orderAmtAssetStr != amtAssetId))
405416                 then true
406417                 else (orderPriceAssetStr != priceAssetId))
407418                 then throw("Wrong order assets.")
408419                 else {
409-                    let orderPrice = order.price
410-                    let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm)
411-                    let castedOrderPrice = toScale(orderPrice, scale8, priceDcm)
412-                    let isOrderPriceValid = if ((order.orderType == Buy))
413-                        then (curPrice >= castedOrderPrice)
414-                        else (castedOrderPrice >= curPrice)
415-                    let kLp = valueOrErrorMessage(getInteger(this, keyKLp), fmtErr("kLp is required"))
416-                    let kLpNew = 0
420+                    let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
421+                    let $t02064520745 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
422+                    let unusedActions = $t02064520745._1
423+                    let kLpNew = $t02064520745._2
417424                     let isOrderValid = (kLpNew > kLp)
418425                     isOrderValid
419426                     }
490497         else if ((paymentAssetId == cfgPriceAssetId))
491498             then false
492499             else throwErr("invalid asset")
493-    let $t02309923392 = if (isEval)
500+    let $t02342923722 = if (isEval)
494501         then $Tuple2(amountBalanceRaw, priceBalanceRaw)
495502         else if (paymentInAmountAsset)
496503             then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
497504             else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
498-    let amountBalanceOld = $t02309923392._1
499-    let priceBalanceOld = $t02309923392._2
500-    let $t02339623545 = if (paymentInAmountAsset)
505+    let amountBalanceOld = $t02342923722._1
506+    let priceBalanceOld = $t02342923722._2
507+    let $t02372623875 = if (paymentInAmountAsset)
501508         then $Tuple2(paymentAmountRaw, 0)
502509         else $Tuple2(0, paymentAmountRaw)
503-    let amountAssetAmountRaw = $t02339623545._1
504-    let priceAssetAmountRaw = $t02339623545._2
510+    let amountAssetAmountRaw = $t02372623875._1
511+    let priceAssetAmountRaw = $t02372623875._2
505512     let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
506513     let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
507-    let $t02366723726 = takeFee(paymentAmountRaw)
508-    let paymentAmount = $t02366723726._1
509-    let feeAmount = $t02366723726._2
514+    let $t02399724056 = takeFee(paymentAmountRaw)
515+    let paymentAmount = $t02399724056._1
516+    let feeAmount = $t02399724056._2
510517     let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
511518     let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
512519     let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
529536             let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
530537             let priceOld = fromX18(priceOldX18, scale8)
531538             let loss = {
532-                let $t02520325370 = if (paymentInAmountAsset)
539+                let $t02553325700 = if (paymentInAmountAsset)
533540                     then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
534541                     else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
535-                let amount = $t02520325370._1
536-                let balance = $t02520325370._2
542+                let amount = $t02553325700._1
543+                let balance = $t02553325700._2
537544                 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
538545                 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
539546                 }
567574             let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
568575             let redeemedBigInt = toBigInt(paymentAmount)
569576             let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
570-            let $t02697227022 = takeFee(amountRaw)
571-            let totalAmount = $t02697227022._1
572-            let feeAmount = $t02697227022._2
573-            let $t02702627252 = if (outInAmountAsset)
577+            let $t02730227352 = takeFee(amountRaw)
578+            let totalAmount = $t02730227352._1
579+            let feeAmount = $t02730227352._2
580+            let $t02735627582 = if (outInAmountAsset)
574581                 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
575582                 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
576-            let outAmAmount = $t02702627252._1
577-            let outPrAmount = $t02702627252._2
578-            let amBalanceNew = $t02702627252._3
579-            let prBalanceNew = $t02702627252._4
583+            let outAmAmount = $t02735627582._1
584+            let outPrAmount = $t02735627582._2
585+            let amBalanceNew = $t02735627582._3
586+            let prBalanceNew = $t02735627582._4
580587             let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
581588             let priceNew = fromX18(priceNewX18, scale8)
582589             let commonState = if (isEval)
591598             $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset)
592599             }
593600         else throw("Strict value is not equal to itself.")
594-    }
595-
596-
597-func calcKLp (amountBalance,priceBalance,lpEmission) = {
598-    let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 0, DOWN), scale18, lpEmission)
599-    updatedKLp
600-    }
601-
602-
603-func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
604-    let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
605-    let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
606-    let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
607-    let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
608-    let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
609-    $Tuple2(actions, updatedKLp)
610601     }
611602 
612603 
733724                                                     else throw("Strict value is not equal to itself.")
734725                                                 }
735726                                             else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
736-                                        let $t03215332218 = refreshKLpInternal(0, 0, 0)
737-                                        let refreshKLpActions = $t03215332218._1
738-                                        let updatedKLp = $t03215332218._2
727+                                        let $t03153331598 = refreshKLpInternal(0, 0, 0)
728+                                        let refreshKLpActions = $t03153331598._1
729+                                        let updatedKLp = $t03153331598._2
739730                                         ((state ++ lpTransfer) ++ refreshKLpActions)
740731                                         }
741732                                     else throw("Strict value is not equal to itself.")
755746     else {
756747         let estPut = commonPut(i, maxSlippage, false)
757748         let state = estPut._9
758-        let $t03250432569 = refreshKLpInternal(0, 0, 0)
759-        let refreshKLpActions = $t03250432569._1
760-        let updatedKLp = $t03250432569._2
749+        let $t03188431949 = refreshKLpInternal(0, 0, 0)
750+        let refreshKLpActions = $t03188431949._1
751+        let updatedKLp = $t03188431949._2
761752         (state ++ refreshKLpActions)
762753         }
763754 
792783             let paymentAmountRaw = payment.amount
793784             let userAddress = i.caller
794785             let txId = i.transactionId
795-            let $t03334533494 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
796-            let emitAmountEstimated = $t03334533494._1
797-            let commonState = $t03334533494._2
798-            let feeAmount = $t03334533494._3
799-            let bonus = $t03334533494._4
800-            let paymentInAmountAsset = $t03334533494._5
786+            let $t03272532874 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
787+            let emitAmountEstimated = $t03272532874._1
788+            let commonState = $t03272532874._2
789+            let feeAmount = $t03272532874._3
790+            let bonus = $t03272532874._4
791+            let paymentInAmountAsset = $t03272532874._5
801792             let emitAmount = if (if ((minOutAmount > 0))
802793                 then (minOutAmount > emitAmountEstimated)
803794                 else false)
817808                     let sendFee = if ((feeAmount > 0))
818809                         then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
819810                         else nil
820-                    let $t03408034277 = if ((this == feeCollectorAddress))
811+                    let $t03346033657 = if ((this == feeCollectorAddress))
821812                         then $Tuple2(0, 0)
822813                         else if (paymentInAmountAsset)
823814                             then $Tuple2(-(feeAmount), 0)
824815                             else $Tuple2(0, -(feeAmount))
825-                    let amountAssetBalanceDelta = $t03408034277._1
826-                    let priceAssetBalanceDelta = $t03408034277._2
827-                    let $t03428034388 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
828-                    let refreshKLpActions = $t03428034388._1
829-                    let updatedKLp = $t03428034388._2
816+                    let amountAssetBalanceDelta = $t03346033657._1
817+                    let priceAssetBalanceDelta = $t03346033657._2
818+                    let $t03366033768 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
819+                    let refreshKLpActions = $t03366033768._1
820+                    let updatedKLp = $t03366033768._2
830821                     $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
831822                     }
832823                 else throw("Strict value is not equal to itself.")
838829 
839830 @Callable(i)
840831 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
841-    let $t03458134738 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
842-    let emitAmountEstimated = $t03458134738._1
843-    let commonState = $t03458134738._2
844-    let feeAmount = $t03458134738._3
845-    let bonus = $t03458134738._4
846-    let paymentInAmountAsset = $t03458134738._5
832+    let $t03396134118 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
833+    let emitAmountEstimated = $t03396134118._1
834+    let commonState = $t03396134118._2
835+    let feeAmount = $t03396134118._3
836+    let bonus = $t03396134118._4
837+    let paymentInAmountAsset = $t03396134118._5
847838     $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
848839     }
849840 
877868             let paymentAmount = payment.amount
878869             let userAddress = i.caller
879870             let txId = i.transactionId
880-            let $t03554335693 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
881-            let amountEstimated = $t03554335693._1
882-            let commonState = $t03554335693._2
883-            let feeAmount = $t03554335693._3
884-            let bonus = $t03554335693._4
885-            let outInAmountAsset = $t03554335693._5
871+            let $t03492335073 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
872+            let amountEstimated = $t03492335073._1
873+            let commonState = $t03492335073._2
874+            let feeAmount = $t03492335073._3
875+            let bonus = $t03492335073._4
876+            let outInAmountAsset = $t03492335073._5
886877             let amount = if (if ((minOutAmount > 0))
887878                 then (minOutAmount > amountEstimated)
888879                 else false)
895886                     let sendFee = if ((feeAmount > 0))
896887                         then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
897888                         else nil
898-                    let $t03619336440 = {
889+                    let $t03557335820 = {
899890                         let feeAmountForCalc = if ((this == feeCollectorAddress))
900891                             then 0
901892                             else feeAmount
903894                             then $Tuple2(-((amount + feeAmountForCalc)), 0)
904895                             else $Tuple2(0, -((amount + feeAmountForCalc)))
905896                         }
906-                    let amountAssetBalanceDelta = $t03619336440._1
907-                    let priceAssetBalanceDelta = $t03619336440._2
908-                    let $t03644336551 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
909-                    let refreshKLpActions = $t03644336551._1
910-                    let updatedKLp = $t03644336551._2
897+                    let amountAssetBalanceDelta = $t03557335820._1
898+                    let priceAssetBalanceDelta = $t03557335820._2
899+                    let $t03582335931 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
900+                    let refreshKLpActions = $t03582335931._1
901+                    let updatedKLp = $t03582335931._2
911902                     $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
912903                     }
913904                 else throw("Strict value is not equal to itself.")
919910 
920911 @Callable(i)
921912 func getOneTknREADONLY (outAssetId,paymentAmount) = {
922-    let $t03673536891 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
923-    let amountEstimated = $t03673536891._1
924-    let commonState = $t03673536891._2
925-    let feeAmount = $t03673536891._3
926-    let bonus = $t03673536891._4
927-    let outInAmountAsset = $t03673536891._5
913+    let $t03611536271 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
914+    let amountEstimated = $t03611536271._1
915+    let commonState = $t03611536271._2
916+    let feeAmount = $t03611536271._3
917+    let bonus = $t03611536271._4
918+    let outInAmountAsset = $t03611536271._5
928919     $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
929920     }
930921 
958949             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
959950             if ((unstakeInv == unstakeInv))
960951                 then {
961-                    let $t03771637864 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
962-                    let amountEstimated = $t03771637864._1
963-                    let commonState = $t03771637864._2
964-                    let feeAmount = $t03771637864._3
965-                    let bonus = $t03771637864._4
966-                    let outInAmountAsset = $t03771637864._5
952+                    let $t03709637244 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
953+                    let amountEstimated = $t03709637244._1
954+                    let commonState = $t03709637244._2
955+                    let feeAmount = $t03709637244._3
956+                    let bonus = $t03709637244._4
957+                    let outInAmountAsset = $t03709637244._5
967958                     let amount = if (if ((minOutAmount > 0))
968959                         then (minOutAmount > amountEstimated)
969960                         else false)
976967                             let sendFee = if ((feeAmount > 0))
977968                                 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
978969                                 else nil
979-                            let $t03835938606 = {
970+                            let $t03773937986 = {
980971                                 let feeAmountForCalc = if ((this == feeCollectorAddress))
981972                                     then 0
982973                                     else feeAmount
984975                                     then $Tuple2(-((amount + feeAmountForCalc)), 0)
985976                                     else $Tuple2(0, -((amount + feeAmountForCalc)))
986977                                 }
987-                            let amountAssetBalanceDelta = $t03835938606._1
988-                            let priceAssetBalanceDelta = $t03835938606._2
989-                            let $t03860938717 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
990-                            let refreshKLpActions = $t03860938717._1
991-                            let updatedKLp = $t03860938717._2
978+                            let amountAssetBalanceDelta = $t03773937986._1
979+                            let priceAssetBalanceDelta = $t03773937986._2
980+                            let $t03798938097 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
981+                            let refreshKLpActions = $t03798938097._1
982+                            let updatedKLp = $t03798938097._2
992983                             $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
993984                             }
994985                         else throw("Strict value is not equal to itself.")
10111002     let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10121003     if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10131004         then {
1014-            let $t03950939591 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1015-            let refreshKLpActions = $t03950939591._1
1016-            let updatedKLp = $t03950939591._2
1005+            let $t03888938971 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1006+            let refreshKLpActions = $t03888938971._1
1007+            let updatedKLp = $t03888938971._2
10171008             (state ++ refreshKLpActions)
10181009             }
10191010         else throw("Strict value is not equal to itself.")
10371028                 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10381029                 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10391030                     then {
1040-                        let $t04038740468 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1041-                        let refreshKLpActions = $t04038740468._1
1042-                        let updatedKLp = $t04038740468._2
1031+                        let $t03976739848 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1032+                        let refreshKLpActions = $t03976739848._1
1033+                        let updatedKLp = $t03976739848._2
10431034                         (state ++ refreshKLpActions)
10441035                         }
10451036                     else throw("Strict value is not equal to itself.")
10751066                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
10761067                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10771068                                 then {
1078-                                    let $t04144141522 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1079-                                    let refreshKLpActions = $t04144141522._1
1080-                                    let updatedKLp = $t04144141522._2
1069+                                    let $t04082140902 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1070+                                    let refreshKLpActions = $t04082140902._1
1071+                                    let updatedKLp = $t04082140902._2
10811072                                     (state ++ refreshKLpActions)
10821073                                     }
10831074                                 else throw("Strict value is not equal to itself.")
11201111                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11211112                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11221113                                 then {
1123-                                    let $t04266242743 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1124-                                    let refreshKLpActions = $t04266242743._1
1125-                                    let updatedKLp = $t04266242743._2
1114+                                    let $t04204242123 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1115+                                    let refreshKLpActions = $t04204242123._1
1116+                                    let updatedKLp = $t04204242123._2
11261117                                     (state ++ refreshKLpActions)
11271118                                     }
11281119                                 else throw("Strict value is not equal to itself.")
11511142         else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], ""))
11521143     if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
11531144         then {
1154-            let $t04373143786 = refreshKLpInternal(0, 0, 0)
1155-            let actions = $t04373143786._1
1156-            let updatedKLp = $t04373143786._2
1145+            let $t04311143166 = refreshKLpInternal(0, 0, 0)
1146+            let actions = $t04311143166._1
1147+            let updatedKLp = $t04311143166._2
11571148             $Tuple2(actions, toString(updatedKLp))
11581149             }
11591150         else throw("Strict value is not equal to itself.")

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 
376+func calcKLp (amountBalance,priceBalance,lpEmission) = {
377+    let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 0, DOWN), scale18, lpEmission)
378+    updatedKLp
379+    }
380+
381+
382+func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
383+    let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
384+    let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
385+    let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
386+    let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
387+    let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
388+    $Tuple2(actions, updatedKLp)
389+    }
390+
391+
376392 func validateMatcherOrderAllowed (order) = {
377393     let cfg = getPoolConfig()
378394     let amtAssetId = cfg[idxAmtAssetId]
379395     let priceAssetId = cfg[idxPriceAssetId]
380396     let poolStatus = parseIntValue(cfg[idxPoolStatus])
381397     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
382398     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
383-    let accAmtAssetBalance = getAccBalance(amtAssetId)
384-    let accPriceAssetBalance = getAccBalance(priceAssetId)
385-    let curPriceX18 = if ((order.orderType == Buy))
386-        then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance)
387-        else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance)
388-    let curPrice = fromX18(curPriceX18, scale8)
399+    let amountAssetAmount = order.amount
400+    let priceAssetAmount = fraction(order.amount, order.price, scale8)
401+    let $t01983820050 = if ((order.orderType == Buy))
402+        then $Tuple2(amountAssetAmount, -(priceAssetAmount))
403+        else $Tuple2(-(amountAssetAmount), priceAssetAmount)
404+    let amountAssetBalanceDelta = $t01983820050._1
405+    let priceAssetBalanceDelta = $t01983820050._2
389406     if (if (if (isGlobalShutdown())
390407         then true
391408         else (poolStatus == PoolMatcherDisabled))
392409         then true
393410         else (poolStatus == PoolShutdown))
394411         then throw("Exchange operations disabled")
395412         else {
396-            let orderAmtAsset = order.assetPair.amountAsset
397-            let orderAmtAssetStr = if ((orderAmtAsset == unit))
398-                then "WAVES"
399-                else toBase58String(value(orderAmtAsset))
400-            let orderPriceAsset = order.assetPair.priceAsset
401-            let orderPriceAssetStr = if ((orderPriceAsset == unit))
402-                then "WAVES"
403-                else toBase58String(value(orderPriceAsset))
413+            let orderAmtAssetStr = assetIdToString(value(order.assetPair.amountAsset))
414+            let orderPriceAssetStr = assetIdToString(value(order.assetPair.priceAsset))
404415             if (if ((orderAmtAssetStr != amtAssetId))
405416                 then true
406417                 else (orderPriceAssetStr != priceAssetId))
407418                 then throw("Wrong order assets.")
408419                 else {
409-                    let orderPrice = order.price
410-                    let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm)
411-                    let castedOrderPrice = toScale(orderPrice, scale8, priceDcm)
412-                    let isOrderPriceValid = if ((order.orderType == Buy))
413-                        then (curPrice >= castedOrderPrice)
414-                        else (castedOrderPrice >= curPrice)
415-                    let kLp = valueOrErrorMessage(getInteger(this, keyKLp), fmtErr("kLp is required"))
416-                    let kLpNew = 0
420+                    let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
421+                    let $t02064520745 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
422+                    let unusedActions = $t02064520745._1
423+                    let kLpNew = $t02064520745._2
417424                     let isOrderValid = (kLpNew > kLp)
418425                     isOrderValid
419426                     }
420427             }
421428     }
422429 
423430 
424431 func commonGet (i) = if ((size(i.payments) != 1))
425432     then throw("exactly 1 payment is expected")
426433     else {
427434         let pmt = value(i.payments[0])
428435         let pmtAssetId = value(pmt.assetId)
429436         let pmtAmt = pmt.amount
430437         let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
431438         let outAmAmt = res._1
432439         let outPrAmt = res._2
433440         let poolStatus = parseIntValue(res._9)
434441         let state = res._10
435442         if (if (isGlobalShutdown())
436443             then true
437444             else (poolStatus == PoolShutdown))
438445             then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
439446             else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
440447         }
441448 
442449 
443450 func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2))
444451     then throw("exactly 2 payments are expected")
445452     else {
446453         let amAssetPmt = value(i.payments[0])
447454         let prAssetPmt = value(i.payments[1])
448455         let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp)
449456         let poolStatus = parseIntValue(estPut._8)
450457         if (if (if (isGlobalShutdown())
451458             then true
452459             else (poolStatus == PoolPutDisabled))
453460             then true
454461             else (poolStatus == PoolShutdown))
455462             then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus)))
456463             else estPut
457464         }
458465 
459466 
460467 func emit (amount) = {
461468     let emitInv = invoke(factoryContract, "emit", [amount], nil)
462469     if ((emitInv == emitInv))
463470         then {
464471             let emitInvLegacy =             match emitInv {
465472                 case legacyFactoryContract: Address => 
466473                     invoke(legacyFactoryContract, "emit", [amount], nil)
467474                 case _ => 
468475                     unit
469476             }
470477             if ((emitInvLegacy == emitInvLegacy))
471478                 then amount
472479                 else throw("Strict value is not equal to itself.")
473480             }
474481         else throw("Strict value is not equal to itself.")
475482     }
476483 
477484 
478485 func takeFee (amount) = {
479486     let feeAmount = fraction(amount, fee, scale8)
480487     $Tuple2((amount - feeAmount), feeAmount)
481488     }
482489 
483490 
484491 func calcPutOneToken (paymentAmountRaw,paymentAssetId,userAddress,txId) = {
485492     let isEval = (txId == unit)
486493     let amountBalanceRaw = getAccBalance(assetIdToString(cfgAmountAssetId))
487494     let priceBalanceRaw = getAccBalance(assetIdToString(cfgPriceAssetId))
488495     let paymentInAmountAsset = if ((paymentAssetId == cfgAmountAssetId))
489496         then true
490497         else if ((paymentAssetId == cfgPriceAssetId))
491498             then false
492499             else throwErr("invalid asset")
493-    let $t02309923392 = if (isEval)
500+    let $t02342923722 = if (isEval)
494501         then $Tuple2(amountBalanceRaw, priceBalanceRaw)
495502         else if (paymentInAmountAsset)
496503             then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
497504             else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
498-    let amountBalanceOld = $t02309923392._1
499-    let priceBalanceOld = $t02309923392._2
500-    let $t02339623545 = if (paymentInAmountAsset)
505+    let amountBalanceOld = $t02342923722._1
506+    let priceBalanceOld = $t02342923722._2
507+    let $t02372623875 = if (paymentInAmountAsset)
501508         then $Tuple2(paymentAmountRaw, 0)
502509         else $Tuple2(0, paymentAmountRaw)
503-    let amountAssetAmountRaw = $t02339623545._1
504-    let priceAssetAmountRaw = $t02339623545._2
510+    let amountAssetAmountRaw = $t02372623875._1
511+    let priceAssetAmountRaw = $t02372623875._2
505512     let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
506513     let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
507-    let $t02366723726 = takeFee(paymentAmountRaw)
508-    let paymentAmount = $t02366723726._1
509-    let feeAmount = $t02366723726._2
514+    let $t02399724056 = takeFee(paymentAmountRaw)
515+    let paymentAmount = $t02399724056._1
516+    let feeAmount = $t02399724056._2
510517     let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
511518     let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
512519     let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
513520     let priceNew = fromX18(priceNewX18, scale8)
514521     let paymentBalance = if (paymentInAmountAsset)
515522         then amountBalanceOld
516523         else priceBalanceOld
517524     let paymentBalanceBigInt = toBigInt(paymentBalance)
518525     let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
519526     let chechSupply = if ((supplyBigInt > big0))
520527         then true
521528         else throwErr("initial deposit requires all coins")
522529     if ((chechSupply == chechSupply))
523530         then {
524531             let depositBigInt = toBigInt(paymentAmount)
525532             let issueAmount = max([0, toInt(((supplyBigInt * (sqrtBigInt((scale18 + ((depositBigInt * scale18) / paymentBalanceBigInt)), 18, 18, DOWN) - scale18)) / scale18))])
526533             let commonState = if (isEval)
527534                 then nil
528535                 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))]
529536             let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
530537             let priceOld = fromX18(priceOldX18, scale8)
531538             let loss = {
532-                let $t02520325370 = if (paymentInAmountAsset)
539+                let $t02553325700 = if (paymentInAmountAsset)
533540                     then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
534541                     else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
535-                let amount = $t02520325370._1
536-                let balance = $t02520325370._2
542+                let amount = $t02553325700._1
543+                let balance = $t02553325700._2
537544                 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
538545                 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
539546                 }
540547             $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset)
541548             }
542549         else throw("Strict value is not equal to itself.")
543550     }
544551 
545552 
546553 func calcGetOneToken (outAssetId,paymentAmount,paymentAssetId,userAddress,txId) = {
547554     let isEval = (txId == unit)
548555     let checks = [if ((paymentAssetId == cfgLpAssetId))
549556         then true
550557         else throwErr("invalid lp asset")]
551558     if ((checks == checks))
552559         then {
553560             let outInAmountAsset = if ((outAssetId == cfgAmountAssetId))
554561                 then true
555562                 else if ((outAssetId == cfgPriceAssetId))
556563                     then false
557564                     else throwErr("invalid asset")
558565             let balanceBigInt = if (outInAmountAsset)
559566                 then toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId)))
560567                 else toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId)))
561568             let amBalanceOld = getAccBalance(assetIdToString(cfgAmountAssetId))
562569             let prBalanceOld = getAccBalance(assetIdToString(cfgPriceAssetId))
563570             let outBalance = if (outInAmountAsset)
564571                 then amBalanceOld
565572                 else prBalanceOld
566573             let outBalanceBigInt = toBigInt(outBalance)
567574             let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
568575             let redeemedBigInt = toBigInt(paymentAmount)
569576             let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
570-            let $t02697227022 = takeFee(amountRaw)
571-            let totalAmount = $t02697227022._1
572-            let feeAmount = $t02697227022._2
573-            let $t02702627252 = if (outInAmountAsset)
577+            let $t02730227352 = takeFee(amountRaw)
578+            let totalAmount = $t02730227352._1
579+            let feeAmount = $t02730227352._2
580+            let $t02735627582 = if (outInAmountAsset)
574581                 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
575582                 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
576-            let outAmAmount = $t02702627252._1
577-            let outPrAmount = $t02702627252._2
578-            let amBalanceNew = $t02702627252._3
579-            let prBalanceNew = $t02702627252._4
583+            let outAmAmount = $t02735627582._1
584+            let outPrAmount = $t02735627582._2
585+            let amBalanceNew = $t02735627582._3
586+            let prBalanceNew = $t02735627582._4
580587             let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
581588             let priceNew = fromX18(priceNewX18, scale8)
582589             let commonState = if (isEval)
583590                 then nil
584591                 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)]
585592             let priceOldX18 = calcPriceBigInt(toX18(prBalanceOld, cfgPriceAssetDecimals), toX18(amBalanceOld, cfgAmountAssetDecimals))
586593             let priceOld = fromX18(priceOldX18, scale8)
587594             let loss = {
588595                 let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2)
589596                 fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset)
590597                 }
591598             $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset)
592599             }
593600         else throw("Strict value is not equal to itself.")
594-    }
595-
596-
597-func calcKLp (amountBalance,priceBalance,lpEmission) = {
598-    let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 0, DOWN), scale18, lpEmission)
599-    updatedKLp
600-    }
601-
602-
603-func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
604-    let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
605-    let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
606-    let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
607-    let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
608-    let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
609-    $Tuple2(actions, updatedKLp)
610601     }
611602 
612603 
613604 func managerPublicKeyOrUnit () = match getString(mpk()) {
614605     case s: String => 
615606         fromBase58String(s)
616607     case _: Unit => 
617608         unit
618609     case _ => 
619610         throw("Match error")
620611 }
621612 
622613 
623614 func pendingManagerPublicKeyOrUnit () = match getString(pmpk()) {
624615     case s: String => 
625616         fromBase58String(s)
626617     case _: Unit => 
627618         unit
628619     case _ => 
629620         throw("Match error")
630621 }
631622 
632623 
633624 func isManager (i) = match managerPublicKeyOrUnit() {
634625     case pk: ByteVector => 
635626         (i.callerPublicKey == pk)
636627     case _: Unit => 
637628         (i.caller == this)
638629     case _ => 
639630         throw("Match error")
640631 }
641632 
642633 
643634 func mustManager (i) = {
644635     let pd = throw("Permission denied")
645636     match managerPublicKeyOrUnit() {
646637         case pk: ByteVector => 
647638             if ((i.callerPublicKey == pk))
648639                 then true
649640                 else pd
650641         case _: Unit => 
651642             if ((i.caller == this))
652643                 then true
653644                 else pd
654645         case _ => 
655646             throw("Match error")
656647     }
657648     }
658649 
659650 
660651 @Callable(i)
661652 func setManager (pendingManagerPublicKey) = {
662653     let checkCaller = mustManager(i)
663654     if ((checkCaller == checkCaller))
664655         then {
665656             let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
666657             if ((checkManagerPublicKey == checkManagerPublicKey))
667658                 then [StringEntry(pmpk(), pendingManagerPublicKey)]
668659                 else throw("Strict value is not equal to itself.")
669660             }
670661         else throw("Strict value is not equal to itself.")
671662     }
672663 
673664 
674665 
675666 @Callable(i)
676667 func confirmManager () = {
677668     let pm = pendingManagerPublicKeyOrUnit()
678669     let hasPM = if (isDefined(pm))
679670         then true
680671         else throw("No pending manager")
681672     if ((hasPM == hasPM))
682673         then {
683674             let checkPM = if ((i.callerPublicKey == value(pm)))
684675                 then true
685676                 else throw("You are not pending manager")
686677             if ((checkPM == checkPM))
687678                 then [StringEntry(mpk(), toBase58String(value(pm))), DeleteEntry(pmpk())]
688679                 else throw("Strict value is not equal to itself.")
689680             }
690681         else throw("Strict value is not equal to itself.")
691682     }
692683 
693684 
694685 
695686 @Callable(i)
696687 func put (slippageTolerance,shouldAutoStake) = if ((0 > slippageTolerance))
697688     then throw("Invalid slippageTolerance passed")
698689     else {
699690         let estPut = commonPut(i, slippageTolerance, true)
700691         let emitLpAmt = estPut._2
701692         let lpAssetId = estPut._7
702693         let state = estPut._9
703694         let amDiff = estPut._10
704695         let prDiff = estPut._11
705696         let amId = estPut._12
706697         let prId = estPut._13
707698         let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
708699         if ((emitInv == emitInv))
709700             then {
710701                 let emitInvLegacy =                 match emitInv {
711702                     case legacyFactoryContract: Address => 
712703                         invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
713704                     case _ => 
714705                         unit
715706                 }
716707                 if ((emitInvLegacy == emitInvLegacy))
717708                     then {
718709                         let slippageAInv = if ((amDiff > 0))
719710                             then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
720711                             else nil
721712                         if ((slippageAInv == slippageAInv))
722713                             then {
723714                                 let slippagePInv = if ((prDiff > 0))
724715                                     then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
725716                                     else nil
726717                                 if ((slippagePInv == slippagePInv))
727718                                     then {
728719                                         let lpTransfer = if (shouldAutoStake)
729720                                             then {
730721                                                 let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
731722                                                 if ((slpStakeInv == slpStakeInv))
732723                                                     then nil
733724                                                     else throw("Strict value is not equal to itself.")
734725                                                 }
735726                                             else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
736-                                        let $t03215332218 = refreshKLpInternal(0, 0, 0)
737-                                        let refreshKLpActions = $t03215332218._1
738-                                        let updatedKLp = $t03215332218._2
727+                                        let $t03153331598 = refreshKLpInternal(0, 0, 0)
728+                                        let refreshKLpActions = $t03153331598._1
729+                                        let updatedKLp = $t03153331598._2
739730                                         ((state ++ lpTransfer) ++ refreshKLpActions)
740731                                         }
741732                                     else throw("Strict value is not equal to itself.")
742733                                 }
743734                             else throw("Strict value is not equal to itself.")
744735                         }
745736                     else throw("Strict value is not equal to itself.")
746737                 }
747738             else throw("Strict value is not equal to itself.")
748739         }
749740 
750741 
751742 
752743 @Callable(i)
753744 func putForFree (maxSlippage) = if ((0 > maxSlippage))
754745     then throw("Invalid value passed")
755746     else {
756747         let estPut = commonPut(i, maxSlippage, false)
757748         let state = estPut._9
758-        let $t03250432569 = refreshKLpInternal(0, 0, 0)
759-        let refreshKLpActions = $t03250432569._1
760-        let updatedKLp = $t03250432569._2
749+        let $t03188431949 = refreshKLpInternal(0, 0, 0)
750+        let refreshKLpActions = $t03188431949._1
751+        let updatedKLp = $t03188431949._2
761752         (state ++ refreshKLpActions)
762753         }
763754 
764755 
765756 
766757 @Callable(i)
767758 func putOneTkn (minOutAmount,autoStake) = {
768759     let isPoolOneTokenOperationsDisabled = {
769760         let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
770761         if ($isInstanceOf(@, "Boolean"))
771762             then @
772763             else throw(($getType(@) + " couldn't be cast to Boolean"))
773764         }
774765     let isPutDisabled = if (if (if (isGlobalShutdown())
775766         then true
776767         else (cfgPoolStatus == PoolPutDisabled))
777768         then true
778769         else (cfgPoolStatus == PoolShutdown))
779770         then true
780771         else isPoolOneTokenOperationsDisabled
781772     let checks = [if (if (!(isPutDisabled))
782773         then true
783774         else isManager(i))
784775         then true
785776         else throwErr("put operation is blocked by admin"), if ((size(i.payments) == 1))
786777         then true
787778         else throwErr("exactly 1 payment are expected")]
788779     if ((checks == checks))
789780         then {
790781             let payment = i.payments[0]
791782             let paymentAssetId = payment.assetId
792783             let paymentAmountRaw = payment.amount
793784             let userAddress = i.caller
794785             let txId = i.transactionId
795-            let $t03334533494 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
796-            let emitAmountEstimated = $t03334533494._1
797-            let commonState = $t03334533494._2
798-            let feeAmount = $t03334533494._3
799-            let bonus = $t03334533494._4
800-            let paymentInAmountAsset = $t03334533494._5
786+            let $t03272532874 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
787+            let emitAmountEstimated = $t03272532874._1
788+            let commonState = $t03272532874._2
789+            let feeAmount = $t03272532874._3
790+            let bonus = $t03272532874._4
791+            let paymentInAmountAsset = $t03272532874._5
801792             let emitAmount = if (if ((minOutAmount > 0))
802793                 then (minOutAmount > emitAmountEstimated)
803794                 else false)
804795                 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
805796                 else emitAmountEstimated
806797             let emitInv = emit(emitAmount)
807798             if ((emitInv == emitInv))
808799                 then {
809800                     let lpTransfer = if (autoStake)
810801                         then {
811802                             let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
812803                             if ((stakeInv == stakeInv))
813804                                 then nil
814805                                 else throw("Strict value is not equal to itself.")
815806                             }
816807                         else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
817808                     let sendFee = if ((feeAmount > 0))
818809                         then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
819810                         else nil
820-                    let $t03408034277 = if ((this == feeCollectorAddress))
811+                    let $t03346033657 = if ((this == feeCollectorAddress))
821812                         then $Tuple2(0, 0)
822813                         else if (paymentInAmountAsset)
823814                             then $Tuple2(-(feeAmount), 0)
824815                             else $Tuple2(0, -(feeAmount))
825-                    let amountAssetBalanceDelta = $t03408034277._1
826-                    let priceAssetBalanceDelta = $t03408034277._2
827-                    let $t03428034388 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
828-                    let refreshKLpActions = $t03428034388._1
829-                    let updatedKLp = $t03428034388._2
816+                    let amountAssetBalanceDelta = $t03346033657._1
817+                    let priceAssetBalanceDelta = $t03346033657._2
818+                    let $t03366033768 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
819+                    let refreshKLpActions = $t03366033768._1
820+                    let updatedKLp = $t03366033768._2
830821                     $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
831822                     }
832823                 else throw("Strict value is not equal to itself.")
833824             }
834825         else throw("Strict value is not equal to itself.")
835826     }
836827 
837828 
838829 
839830 @Callable(i)
840831 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
841-    let $t03458134738 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
842-    let emitAmountEstimated = $t03458134738._1
843-    let commonState = $t03458134738._2
844-    let feeAmount = $t03458134738._3
845-    let bonus = $t03458134738._4
846-    let paymentInAmountAsset = $t03458134738._5
832+    let $t03396134118 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
833+    let emitAmountEstimated = $t03396134118._1
834+    let commonState = $t03396134118._2
835+    let feeAmount = $t03396134118._3
836+    let bonus = $t03396134118._4
837+    let paymentInAmountAsset = $t03396134118._5
847838     $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
848839     }
849840 
850841 
851842 
852843 @Callable(i)
853844 func getOneTkn (outAssetIdStr,minOutAmount) = {
854845     let isPoolOneTokenOperationsDisabled = {
855846         let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
856847         if ($isInstanceOf(@, "Boolean"))
857848             then @
858849             else throw(($getType(@) + " couldn't be cast to Boolean"))
859850         }
860851     let isGetDisabled = if (if (isGlobalShutdown())
861852         then true
862853         else (cfgPoolStatus == PoolShutdown))
863854         then true
864855         else isPoolOneTokenOperationsDisabled
865856     let checks = [if (if (!(isGetDisabled))
866857         then true
867858         else isManager(i))
868859         then true
869860         else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 1))
870861         then true
871862         else throwErr("exactly 1 payment are expected")]
872863     if ((checks == checks))
873864         then {
874865             let outAssetId = parseAssetId(outAssetIdStr)
875866             let payment = i.payments[0]
876867             let paymentAssetId = payment.assetId
877868             let paymentAmount = payment.amount
878869             let userAddress = i.caller
879870             let txId = i.transactionId
880-            let $t03554335693 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
881-            let amountEstimated = $t03554335693._1
882-            let commonState = $t03554335693._2
883-            let feeAmount = $t03554335693._3
884-            let bonus = $t03554335693._4
885-            let outInAmountAsset = $t03554335693._5
871+            let $t03492335073 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
872+            let amountEstimated = $t03492335073._1
873+            let commonState = $t03492335073._2
874+            let feeAmount = $t03492335073._3
875+            let bonus = $t03492335073._4
876+            let outInAmountAsset = $t03492335073._5
886877             let amount = if (if ((minOutAmount > 0))
887878                 then (minOutAmount > amountEstimated)
888879                 else false)
889880                 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
890881                 else amountEstimated
891882             let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
892883             if ((burnInv == burnInv))
893884                 then {
894885                     let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
895886                     let sendFee = if ((feeAmount > 0))
896887                         then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
897888                         else nil
898-                    let $t03619336440 = {
889+                    let $t03557335820 = {
899890                         let feeAmountForCalc = if ((this == feeCollectorAddress))
900891                             then 0
901892                             else feeAmount
902893                         if (outInAmountAsset)
903894                             then $Tuple2(-((amount + feeAmountForCalc)), 0)
904895                             else $Tuple2(0, -((amount + feeAmountForCalc)))
905896                         }
906-                    let amountAssetBalanceDelta = $t03619336440._1
907-                    let priceAssetBalanceDelta = $t03619336440._2
908-                    let $t03644336551 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
909-                    let refreshKLpActions = $t03644336551._1
910-                    let updatedKLp = $t03644336551._2
897+                    let amountAssetBalanceDelta = $t03557335820._1
898+                    let priceAssetBalanceDelta = $t03557335820._2
899+                    let $t03582335931 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
900+                    let refreshKLpActions = $t03582335931._1
901+                    let updatedKLp = $t03582335931._2
911902                     $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
912903                     }
913904                 else throw("Strict value is not equal to itself.")
914905             }
915906         else throw("Strict value is not equal to itself.")
916907     }
917908 
918909 
919910 
920911 @Callable(i)
921912 func getOneTknREADONLY (outAssetId,paymentAmount) = {
922-    let $t03673536891 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
923-    let amountEstimated = $t03673536891._1
924-    let commonState = $t03673536891._2
925-    let feeAmount = $t03673536891._3
926-    let bonus = $t03673536891._4
927-    let outInAmountAsset = $t03673536891._5
913+    let $t03611536271 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
914+    let amountEstimated = $t03611536271._1
915+    let commonState = $t03611536271._2
916+    let feeAmount = $t03611536271._3
917+    let bonus = $t03611536271._4
918+    let outInAmountAsset = $t03611536271._5
928919     $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
929920     }
930921 
931922 
932923 
933924 @Callable(i)
934925 func unstakeAndGetOneTkn (unstakeAmount,outAssetIdStr,minOutAmount) = {
935926     let isPoolOneTokenOperationsDisabled = {
936927         let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
937928         if ($isInstanceOf(@, "Boolean"))
938929             then @
939930             else throw(($getType(@) + " couldn't be cast to Boolean"))
940931         }
941932     let isGetDisabled = if (if (isGlobalShutdown())
942933         then true
943934         else (cfgPoolStatus == PoolShutdown))
944935         then true
945936         else isPoolOneTokenOperationsDisabled
946937     let checks = [if (if (!(isGetDisabled))
947938         then true
948939         else isManager(i))
949940         then true
950941         else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 0))
951942         then true
952943         else throwErr("no payments are expected")]
953944     if ((checks == checks))
954945         then {
955946             let outAssetId = parseAssetId(outAssetIdStr)
956947             let userAddress = i.caller
957948             let txId = i.transactionId
958949             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
959950             if ((unstakeInv == unstakeInv))
960951                 then {
961-                    let $t03771637864 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
962-                    let amountEstimated = $t03771637864._1
963-                    let commonState = $t03771637864._2
964-                    let feeAmount = $t03771637864._3
965-                    let bonus = $t03771637864._4
966-                    let outInAmountAsset = $t03771637864._5
952+                    let $t03709637244 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
953+                    let amountEstimated = $t03709637244._1
954+                    let commonState = $t03709637244._2
955+                    let feeAmount = $t03709637244._3
956+                    let bonus = $t03709637244._4
957+                    let outInAmountAsset = $t03709637244._5
967958                     let amount = if (if ((minOutAmount > 0))
968959                         then (minOutAmount > amountEstimated)
969960                         else false)
970961                         then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
971962                         else amountEstimated
972963                     let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
973964                     if ((burnInv == burnInv))
974965                         then {
975966                             let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
976967                             let sendFee = if ((feeAmount > 0))
977968                                 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
978969                                 else nil
979-                            let $t03835938606 = {
970+                            let $t03773937986 = {
980971                                 let feeAmountForCalc = if ((this == feeCollectorAddress))
981972                                     then 0
982973                                     else feeAmount
983974                                 if (outInAmountAsset)
984975                                     then $Tuple2(-((amount + feeAmountForCalc)), 0)
985976                                     else $Tuple2(0, -((amount + feeAmountForCalc)))
986977                                 }
987-                            let amountAssetBalanceDelta = $t03835938606._1
988-                            let priceAssetBalanceDelta = $t03835938606._2
989-                            let $t03860938717 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
990-                            let refreshKLpActions = $t03860938717._1
991-                            let updatedKLp = $t03860938717._2
978+                            let amountAssetBalanceDelta = $t03773937986._1
979+                            let priceAssetBalanceDelta = $t03773937986._2
980+                            let $t03798938097 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
981+                            let refreshKLpActions = $t03798938097._1
982+                            let updatedKLp = $t03798938097._2
992983                             $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
993984                             }
994985                         else throw("Strict value is not equal to itself.")
995986                     }
996987                 else throw("Strict value is not equal to itself.")
997988             }
998989         else throw("Strict value is not equal to itself.")
999990     }
1000991 
1001992 
1002993 
1003994 @Callable(i)
1004995 func get () = {
1005996     let res = commonGet(i)
1006997     let outAmtAmt = res._1
1007998     let outPrAmt = res._2
1008999     let pmtAmt = res._3
10091000     let pmtAssetId = res._4
10101001     let state = res._5
10111002     let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10121003     if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10131004         then {
1014-            let $t03950939591 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1015-            let refreshKLpActions = $t03950939591._1
1016-            let updatedKLp = $t03950939591._2
1005+            let $t03888938971 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1006+            let refreshKLpActions = $t03888938971._1
1007+            let updatedKLp = $t03888938971._2
10171008             (state ++ refreshKLpActions)
10181009             }
10191010         else throw("Strict value is not equal to itself.")
10201011     }
10211012 
10221013 
10231014 
10241015 @Callable(i)
10251016 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
10261017     let res = commonGet(i)
10271018     let outAmAmt = res._1
10281019     let outPrAmt = res._2
10291020     let pmtAmt = res._3
10301021     let pmtAssetId = res._4
10311022     let state = res._5
10321023     if ((noLessThenAmtAsset > outAmAmt))
10331024         then throw(((("noLessThenAmtAsset failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
10341025         else if ((noLessThenPriceAsset > outPrAmt))
10351026             then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
10361027             else {
10371028                 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10381029                 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10391030                     then {
1040-                        let $t04038740468 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1041-                        let refreshKLpActions = $t04038740468._1
1042-                        let updatedKLp = $t04038740468._2
1031+                        let $t03976739848 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1032+                        let refreshKLpActions = $t03976739848._1
1033+                        let updatedKLp = $t03976739848._2
10431034                         (state ++ refreshKLpActions)
10441035                         }
10451036                     else throw("Strict value is not equal to itself.")
10461037                 }
10471038     }
10481039 
10491040 
10501041 
10511042 @Callable(i)
10521043 func unstakeAndGet (amount) = {
10531044     let checkPayments = if ((size(i.payments) != 0))
10541045         then throw("No payments are expected")
10551046         else true
10561047     if ((checkPayments == checkPayments))
10571048         then {
10581049             let cfg = getPoolConfig()
10591050             let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
10601051             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
10611052             if ((unstakeInv == unstakeInv))
10621053                 then {
10631054                     let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
10641055                     let outAmAmt = res._1
10651056                     let outPrAmt = res._2
10661057                     let poolStatus = parseIntValue(res._9)
10671058                     let state = res._10
10681059                     let checkPoolStatus = if (if (isGlobalShutdown())
10691060                         then true
10701061                         else (poolStatus == PoolShutdown))
10711062                         then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
10721063                         else true
10731064                     if ((checkPoolStatus == checkPoolStatus))
10741065                         then {
10751066                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
10761067                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10771068                                 then {
1078-                                    let $t04144141522 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1079-                                    let refreshKLpActions = $t04144141522._1
1080-                                    let updatedKLp = $t04144141522._2
1069+                                    let $t04082140902 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1070+                                    let refreshKLpActions = $t04082140902._1
1071+                                    let updatedKLp = $t04082140902._2
10811072                                     (state ++ refreshKLpActions)
10821073                                     }
10831074                                 else throw("Strict value is not equal to itself.")
10841075                             }
10851076                         else throw("Strict value is not equal to itself.")
10861077                     }
10871078                 else throw("Strict value is not equal to itself.")
10881079             }
10891080         else throw("Strict value is not equal to itself.")
10901081     }
10911082 
10921083 
10931084 
10941085 @Callable(i)
10951086 func unstakeAndGetNoLess (unstakeAmount,noLessThenAmountAsset,noLessThenPriceAsset) = {
10961087     let isGetDisabled = if (isGlobalShutdown())
10971088         then true
10981089         else (cfgPoolStatus == PoolShutdown)
10991090     let checks = [if (!(isGetDisabled))
11001091         then true
11011092         else throw("get operation is blocked by admin"), if ((size(i.payments) == 0))
11021093         then true
11031094         else throw("no payments are expected")]
11041095     if ((checks == checks))
11051096         then {
11061097             let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
11071098             if ((unstakeInv == unstakeInv))
11081099                 then {
11091100                     let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(cfgLpAssetId), unstakeAmount, i.caller)
11101101                     let outAmAmt = res._1
11111102                     let outPrAmt = res._2
11121103                     let state = res._10
11131104                     let checkAmounts = [if ((outAmAmt >= noLessThenAmountAsset))
11141105                         then true
11151106                         else throw(makeString(["amount asset amount to receive is less than ", toString(noLessThenAmountAsset)], "")), if ((outPrAmt >= noLessThenPriceAsset))
11161107                         then true
11171108                         else throw(makeString(["price asset amount to receive is less than ", toString(noLessThenPriceAsset)], ""))]
11181109                     if ((checkAmounts == checkAmounts))
11191110                         then {
11201111                             let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11211112                             if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11221113                                 then {
1123-                                    let $t04266242743 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1124-                                    let refreshKLpActions = $t04266242743._1
1125-                                    let updatedKLp = $t04266242743._2
1114+                                    let $t04204242123 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1115+                                    let refreshKLpActions = $t04204242123._1
1116+                                    let updatedKLp = $t04204242123._2
11261117                                     (state ++ refreshKLpActions)
11271118                                     }
11281119                                 else throw("Strict value is not equal to itself.")
11291120                             }
11301121                         else throw("Strict value is not equal to itself.")
11311122                     }
11321123                 else throw("Strict value is not equal to itself.")
11331124             }
11341125         else throw("Strict value is not equal to itself.")
11351126     }
11361127 
11371128 
11381129 
11391130 @Callable(i)
11401131 func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
11411132     then throw("permissions denied")
11421133     else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success")
11431134 
11441135 
11451136 
11461137 @Callable(i)
11471138 func refreshKLp () = {
11481139     let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0)
11491140     let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay))
11501141         then unit
11511142         else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], ""))
11521143     if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
11531144         then {
1154-            let $t04373143786 = refreshKLpInternal(0, 0, 0)
1155-            let actions = $t04373143786._1
1156-            let updatedKLp = $t04373143786._2
1145+            let $t04311143166 = refreshKLpInternal(0, 0, 0)
1146+            let actions = $t04311143166._1
1147+            let updatedKLp = $t04311143166._2
11571148             $Tuple2(actions, toString(updatedKLp))
11581149             }
11591150         else throw("Strict value is not equal to itself.")
11601151     }
11611152 
11621153 
11631154 
11641155 @Callable(i)
11651156 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig())
11661157 
11671158 
11681159 
11691160 @Callable(i)
11701161 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
11711162 
11721163 
11731164 
11741165 @Callable(i)
11751166 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
11761167     let prices = calcPrices(amAmt, prAmt, lpAmt)
11771168     $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])])
11781169     }
11791170 
11801171 
11811172 
11821173 @Callable(i)
11831174 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult)))
11841175 
11851176 
11861177 
11871178 @Callable(i)
11881179 func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult))
11891180 
11901181 
11911182 
11921183 @Callable(i)
11931184 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
11941185 
11951186 
11961187 
11971188 @Callable(i)
11981189 func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp))
11991190 
12001191 
12011192 
12021193 @Callable(i)
12031194 func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
12041195     let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress))
12051196     $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10))
12061197     }
12071198 
12081199 
12091200 
12101201 @Callable(i)
12111202 func statsREADONLY () = {
12121203     let cfg = getPoolConfig()
12131204     let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
12141205     let amtAssetId = cfg[idxAmtAssetId]
12151206     let priceAssetId = cfg[idxPriceAssetId]
12161207     let iAmtAssetId = cfg[idxIAmtAssetId]
12171208     let iPriceAssetId = cfg[idxIPriceAssetId]
12181209     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
12191210     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
12201211     let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
12211212     let accAmtAssetBalance = getAccBalance(amtAssetId)
12221213     let accPriceAssetBalance = getAccBalance(priceAssetId)
12231214     let pricesList = if ((poolLPBalance == 0))
12241215         then [zeroBigInt, zeroBigInt, zeroBigInt]
12251216         else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance)
12261217     let curPrice = 0
12271218     let lpAmtAssetShare = fromX18(pricesList[1], scale8)
12281219     let lpPriceAssetShare = fromX18(pricesList[2], scale8)
12291220     let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this))))
12301221     $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))
12311222     }
12321223 
12331224 
12341225 
12351226 @Callable(i)
12361227 func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = {
12371228     let cfg = getPoolConfig()
12381229     let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
12391230     let amAssetIdStr = cfg[idxAmtAssetId]
12401231     let amAssetId = fromBase58String(amAssetIdStr)
12411232     let prAssetIdStr = cfg[idxPriceAssetId]
12421233     let prAssetId = fromBase58String(prAssetIdStr)
12431234     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
12441235     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
12451236     let poolStatus = cfg[idxPoolStatus]
12461237     let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
12471238     let accAmtAssetBalance = getAccBalance(amAssetIdStr)
12481239     let accPriceAssetBalance = getAccBalance(prAssetIdStr)
12491240     let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm)
12501241     let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm)
12511242     let curPriceX18 = if ((poolLPBalance == 0))
12521243         then zeroBigInt
12531244         else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
12541245     let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
12551246     let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
12561247     let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm)
12571248     let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
12581249     let calcLpAmt = estPut._1
12591250     let curPriceCalc = estPut._3
12601251     let amBalance = estPut._4
12611252     let prBalance = estPut._5
12621253     let lpEmission = estPut._6
12631254     $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))
12641255     }
12651256 
12661257 
12671258 
12681259 @Callable(i)
12691260 func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = {
12701261     let cfg = getPoolConfig()
12711262     let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
12721263     let amAssetIdStr = cfg[idxAmtAssetId]
12731264     let amAssetId = fromBase58String(amAssetIdStr)
12741265     let prAssetIdStr = cfg[idxPriceAssetId]
12751266     let prAssetId = fromBase58String(prAssetIdStr)
12761267     let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
12771268     let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
12781269     let poolStatus = cfg[idxPoolStatus]
12791270     let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
12801271     let amBalanceRaw = getAccBalance(amAssetIdStr)
12811272     let prBalanceRaw = getAccBalance(prAssetIdStr)
12821273     let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm)
12831274     let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm)
12841275     let curPriceX18 = if ((poolLPBalance == 0))
12851276         then zeroBigInt
12861277         else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18)
12871278     let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
12881279     let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
12891280     let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm)
12901281     let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
12911282     let calcLpAmt = estPut._1
12921283     let curPriceCalc = estPut._3
12931284     let amBalance = estPut._4
12941285     let prBalance = estPut._5
12951286     let lpEmission = estPut._6
12961287     $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))
12971288     }
12981289 
12991290 
13001291 
13011292 @Callable(i)
13021293 func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
13031294     let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this)
13041295     let outAmAmt = res._1
13051296     let outPrAmt = res._2
13061297     let amBalance = res._5
13071298     let prBalance = res._6
13081299     let lpEmission = res._7
13091300     let curPrice = res._8
13101301     let poolStatus = parseIntValue(res._9)
13111302     $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))
13121303     }
13131304 
13141305 
13151306 @Verifier(tx)
13161307 func verify () = {
13171308     let targetPublicKey =     match managerPublicKeyOrUnit() {
13181309         case pk: ByteVector => 
13191310             pk
13201311         case _: Unit => 
13211312             tx.senderPublicKey
13221313         case _ => 
13231314             throw("Match error")
13241315     }
13251316     match tx {
13261317         case order: Order => 
13271318             let matcherPub = getMatcherPubOrFail()
13281319             let orderValid = validateMatcherOrderAllowed(order)
13291320             let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
13301321             let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
13311322             if (if (if (orderValid)
13321323                 then senderValid
13331324                 else false)
13341325                 then matcherValid
13351326                 else false)
13361327                 then true
13371328                 else throwOrderError(orderValid, senderValid, matcherValid)
13381329         case s: SetScriptTransaction => 
13391330             let newHash = blake2b256(value(s.script))
13401331             let allowedHash = fromBase64String(value(getString(factoryContract, keyAllowedLpScriptHash())))
13411332             let currentHash = scriptHash(this)
13421333             if (if ((allowedHash == newHash))
13431334                 then (currentHash != newHash)
13441335                 else false)
13451336                 then true
13461337                 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
13471338         case _ => 
13481339             sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
13491340     }
13501341     }
13511342 
github/deemru/w8io/6500d08 
255.33 ms ◑