tx · JCqsmqE4t58V8kV3JcwaDMyAU5TKhVg6AUAyS4x2q15i

3NAYA6kg7zqKjXc1AYGVi3FfawRbUULFzC1:  -0.03400000 Waves

2022.12.06 17:11 [2348589] smart account 3NAYA6kg7zqKjXc1AYGVi3FfawRbUULFzC1 > SELF 0.00000000 Waves

{ "type": 13, "id": "JCqsmqE4t58V8kV3JcwaDMyAU5TKhVg6AUAyS4x2q15i", "fee": 3400000, "feeAssetId": null, "timestamp": 1670335784063, "version": 1, "sender": "3NAYA6kg7zqKjXc1AYGVi3FfawRbUULFzC1", "senderPublicKey": "7GiECPCqZ7JvTb1VfaViHDJj2avcCTMMR2nPfA48MFiY", "proofs": [ "4XMK56JkrQZM2Mt2qNMtiX6nFLLQ7dwYkqfPLBnbPEHcR34PPyc1FitRdDt7EmHBKQXh4udB2PWvX19qMijH2B5N" ], "script": "base64:BgLYLAgCEgMKAQgSABIECgIBBBIDCgEBEgQKAgEEEgQKAggBEgQKAggBEgQKAggBEgUKAwEIARIAEgQKAgEBEgMKAQESBQoDAQEBEgQKAggIEgASABIDCgEIEgUKAwEBARIECgIBARIECgIIARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCBIAEgMKAQESAwoBARIECgIIASIKbFBkZWNpbWFscyIGc2NhbGU4IgxzY2FsZThCaWdJbnQiB3NjYWxlMTgiCnplcm9CaWdJbnQiBGJpZzAiBGJpZzEiBGJpZzIiC3dhdmVzU3RyaW5nIgNTRVAiClBvb2xBY3RpdmUiD1Bvb2xQdXREaXNhYmxlZCITUG9vbE1hdGNoZXJEaXNhYmxlZCIMUG9vbFNodXRkb3duIg5pZHhQb29sQWRkcmVzcyINaWR4UG9vbFN0YXR1cyIQaWR4UG9vbExQQXNzZXRJZCINaWR4QW10QXNzZXRJZCIPaWR4UHJpY2VBc3NldElkIg5pZHhBbXRBc3NldERjbSIQaWR4UHJpY2VBc3NldERjbSIOaWR4SUFtdEFzc2V0SWQiEGlkeElQcmljZUFzc2V0SWQiDWlkeExQQXNzZXREY20iEmlkeFBvb2xBbXRBc3NldEFtdCIUaWR4UG9vbFByaWNlQXNzZXRBbXQiEWlkeFBvb2xMUEFzc2V0QW10IhlpZHhGYWN0b3J5U3Rha2luZ0NvbnRyYWN0IhppZHhGYWN0b3J5U2xpcHBhZ2VDb250cmFjdCIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiA3ZhbCIPcmVzdWx0U2NhbGVNdWx0Igd0b1NjYWxlIgNhbXQiCHJlc1NjYWxlIghjdXJTY2FsZSIDYWJzIglhYnNCaWdJbnQiAmZjIgNtcGsiBHBtcGsiAnBsIgJwaCIBaCIJdGltZXN0YW1wIgNwYXUiC3VzZXJBZGRyZXNzIgR0eElkIgNnYXUiAmFhIgJwYSIGa2V5RmVlIgpmZWVEZWZhdWx0IgNmZWUiBmtleUtMcCIVa2V5S0xwUmVmcmVzaGVkSGVpZ2h0IhJrZXlLTHBSZWZyZXNoRGVsYXkiFmtMcFJlZnJlc2hEZWxheURlZmF1bHQiD2tMcFJlZnJlc2hEZWxheSIQa2V5RmFjdG9yeUNvbmZpZyINa2V5TWF0Y2hlclB1YiIpa2V5TWFwcGluZ1Bvb2xDb250cmFjdEFkZHJlc3NUb1Bvb2xBc3NldHMiE3Bvb2xDb250cmFjdEFkZHJlc3MiDWtleVBvb2xDb25maWciCWlBbXRBc3NldCILaVByaWNlQXNzZXQiH2tleU1hcHBpbmdzQmFzZUFzc2V0MmludGVybmFsSWQiDGJhc2VBc3NldFN0ciITa2V5QWxsUG9vbHNTaHV0ZG93biINa2V5UG9vbFdlaWdodCIPY29udHJhY3RBZGRyZXNzIhZrZXlBbGxvd2VkTHBTY3JpcHRIYXNoIhZrZXlGZWVDb2xsZWN0b3JBZGRyZXNzIg90aHJvd09yZGVyRXJyb3IiCm9yZGVyVmFsaWQiC3NlbmRlclZhbGlkIgxtYXRjaGVyVmFsaWQiD2dldFN0cmluZ09yRmFpbCIHYWRkcmVzcyIDa2V5IgxnZXRJbnRPckZhaWwiCHRocm93RXJyIgNtc2ciBmZtdEVyciIPZmFjdG9yeUNvbnRyYWN0IhNmZWVDb2xsZWN0b3JBZGRyZXNzIhBpc0dsb2JhbFNodXRkb3duIhNnZXRNYXRjaGVyUHViT3JGYWlsIg1nZXRQb29sQ29uZmlnIghhbXRBc3NldCIKcHJpY2VBc3NldCIMcGFyc2VBc3NldElkIgVpbnB1dCIPYXNzZXRJZFRvU3RyaW5nIg9wYXJzZVBvb2xDb25maWciCnBvb2xDb25maWciEHBvb2xDb25maWdQYXJzZWQiCyR0MDc5MTU4MDgxIg5jZmdQb29sQWRkcmVzcyINY2ZnUG9vbFN0YXR1cyIMY2ZnTHBBc3NldElkIhBjZmdBbW91bnRBc3NldElkIg9jZmdQcmljZUFzc2V0SWQiFmNmZ0Ftb3VudEFzc2V0RGVjaW1hbHMiFWNmZ1ByaWNlQXNzZXREZWNpbWFscyIQZ2V0RmFjdG9yeUNvbmZpZyIPc3Rha2luZ0NvbnRyYWN0IhBzbGlwcGFnZUNvbnRyYWN0IhFkYXRhUHV0QWN0aW9uSW5mbyINaW5BbXRBc3NldEFtdCIPaW5QcmljZUFzc2V0QW10IghvdXRMcEFtdCIFcHJpY2UiHXNsaXBwYWdlVG9sZXJhbmNlUGFzc2VkQnlVc2VyIhVzbGlwcGFnZVRvbGVyYW5jZVJlYWwiCHR4SGVpZ2h0Igt0eFRpbWVzdGFtcCISc2xpcGFnZUFtdEFzc2V0QW10IhRzbGlwYWdlUHJpY2VBc3NldEFtdCIRZGF0YUdldEFjdGlvbkluZm8iDm91dEFtdEFzc2V0QW10IhBvdXRQcmljZUFzc2V0QW10IgdpbkxwQW10Ig1nZXRBY2NCYWxhbmNlIgdhc3NldElkIg9jYWxjUHJpY2VCaWdJbnQiCHByQW10WDE4IghhbUFtdFgxOCIQcHJpdmF0ZUNhbGNQcmljZSIKYW1Bc3NldERjbSIKcHJBc3NldERjbSIFYW1BbXQiBXByQW10Ig5hbXRBc3NldEFtdFgxOCIQcHJpY2VBc3NldEFtdFgxOCIKY2FsY1ByaWNlcyIFbHBBbXQiA2NmZyILYW10QXNzZXREY20iDXByaWNlQXNzZXREY20iCHByaWNlWDE4IghscEFtdFgxOCITbHBQcmljZUluQW1Bc3NldFgxOCITbHBQcmljZUluUHJBc3NldFgxOCIPY2FsY3VsYXRlUHJpY2VzIgZwcmljZXMiFGVzdGltYXRlR2V0T3BlcmF0aW9uIgZ0eElkNTgiCnBtdEFzc2V0SWQiCHBtdExwQW10IglscEFzc2V0SWQiCWFtQXNzZXRJZCIJcHJBc3NldElkIgpwb29sU3RhdHVzIgpscEVtaXNzaW9uIglhbUJhbGFuY2UiDGFtQmFsYW5jZVgxOCIJcHJCYWxhbmNlIgxwckJhbGFuY2VYMTgiC2N1clByaWNlWDE4IghjdXJQcmljZSILcG10THBBbXRYMTgiDWxwRW1pc3Npb25YMTgiC291dEFtQW10WDE4IgtvdXRQckFtdFgxOCIIb3V0QW1BbXQiCG91dFByQW10IgVzdGF0ZSIUZXN0aW1hdGVQdXRPcGVyYXRpb24iEXNsaXBwYWdlVG9sZXJhbmNlIgxpbkFtQXNzZXRBbXQiC2luQW1Bc3NldElkIgxpblByQXNzZXRBbXQiC2luUHJBc3NldElkIgppc0V2YWx1YXRlIgZlbWl0THAiDGFtQXNzZXRJZFN0ciIMcHJBc3NldElkU3RyIgtpQW10QXNzZXRJZCINaVByaWNlQXNzZXRJZCIOaW5BbUFzc2V0SWRTdHIiDmluUHJBc3NldElkU3RyIg9pbkFtQXNzZXRBbXRYMTgiD2luUHJBc3NldEFtdFgxOCIMdXNlclByaWNlWDE4IgNyZXMiC3NsaXBwYWdlWDE4IhRzbGlwcGFnZVRvbGVyYW5jZVgxOCIKcHJWaWFBbVgxOCIKYW1WaWFQclgxOCIMZXhwZWN0ZWRBbXRzIhFleHBBbXRBc3NldEFtdFgxOCITZXhwUHJpY2VBc3NldEFtdFgxOCIJY2FsY0xwQW10Ig5jYWxjQW1Bc3NldFBtdCIOY2FsY1ByQXNzZXRQbXQiDHNsaXBwYWdlQ2FsYyIJZW1pdExwQW10IgZhbURpZmYiBnByRGlmZiILY29tbW9uU3RhdGUiB2NhbGNLTHAiDWFtb3VudEJhbGFuY2UiDHByaWNlQmFsYW5jZSIKdXBkYXRlZEtMcCIOY2FsY0N1cnJlbnRLTHAiEGFtb3VudEFzc2V0RGVsdGEiD3ByaWNlQXNzZXREZWx0YSIUbHBBc3NldEVtaXNzaW9uRGVsdGEiEmFtb3VudEFzc2V0QmFsYW5jZSIRcHJpY2VBc3NldEJhbGFuY2UiD2xwQXNzZXRFbWlzc2lvbiIKY3VycmVudEtMcCIScmVmcmVzaEtMcEludGVybmFsIhdhbW91bnRBc3NldEJhbGFuY2VEZWx0YSIWcHJpY2VBc3NldEJhbGFuY2VEZWx0YSIHYWN0aW9ucyISdmFsaWRhdGVVcGRhdGVkS0xwIgZvbGRLTHAiG3ZhbGlkYXRlTWF0Y2hlck9yZGVyQWxsb3dlZCIFb3JkZXIiEWFtb3VudEFzc2V0QW1vdW50IhBwcmljZUFzc2V0QW1vdW50Ig0kdDAyMDIxODIwNDMwIgNrTHAiDSR0MDIwOTAxMjEwMDEiDXVudXNlZEFjdGlvbnMiBmtMcE5ldyIMaXNPcmRlclZhbGlkIgljb21tb25HZXQiAWkiA3BtdCIGcG10QW10Igljb21tb25QdXQiCmFtQXNzZXRQbXQiCnByQXNzZXRQbXQiBmVzdFB1dCIEZW1pdCIGYW1vdW50IgdlbWl0SW52Ig1lbWl0SW52TGVnYWN5IgckbWF0Y2gwIhVsZWdhY3lGYWN0b3J5Q29udHJhY3QiB3Rha2VGZWUiCWZlZUFtb3VudCIPY2FsY1B1dE9uZVRva2VuIhBwYXltZW50QW1vdW50UmF3Ig5wYXltZW50QXNzZXRJZCIGaXNFdmFsIhBhbW91bnRCYWxhbmNlUmF3Ig9wcmljZUJhbGFuY2VSYXciFHBheW1lbnRJbkFtb3VudEFzc2V0Ig0kdDAyMzY4NTIzOTc4IhBhbW91bnRCYWxhbmNlT2xkIg9wcmljZUJhbGFuY2VPbGQiDSR0MDIzOTgyMjQxMzEiFGFtb3VudEFzc2V0QW1vdW50UmF3IhNwcmljZUFzc2V0QW1vdW50UmF3Ig0kdDAyNDI1MzI0MzEyIg1wYXltZW50QW1vdW50IhBhbW91bnRCYWxhbmNlTmV3Ig9wcmljZUJhbGFuY2VOZXciC3ByaWNlTmV3WDE4IghwcmljZU5ldyIOcGF5bWVudEJhbGFuY2UiFHBheW1lbnRCYWxhbmNlQmlnSW50IgxzdXBwbHlCaWdJbnQiC2NoZWNoU3VwcGx5Ig1kZXBvc2l0QmlnSW50Igtpc3N1ZUFtb3VudCILcHJpY2VPbGRYMTgiCHByaWNlT2xkIgRsb3NzIg0kdDAyNTc4OTI1OTU2IgdiYWxhbmNlIg9pc3N1ZUFtb3VudEJvdGgiD2NhbGNHZXRPbmVUb2tlbiIKb3V0QXNzZXRJZCIGY2hlY2tzIhBvdXRJbkFtb3VudEFzc2V0Ig1iYWxhbmNlQmlnSW50IgxhbUJhbGFuY2VPbGQiDHByQmFsYW5jZU9sZCIKb3V0QmFsYW5jZSIQb3V0QmFsYW5jZUJpZ0ludCIOcmVkZWVtZWRCaWdJbnQiCWFtb3VudFJhdyINJHQwMjc1NTgyNzYwOCILdG90YWxBbW91bnQiDSR0MDI3NjEyMjc4MzgiC291dEFtQW1vdW50IgtvdXRQckFtb3VudCIMYW1CYWxhbmNlTmV3IgxwckJhbGFuY2VOZXciGGFtb3VudEJvdGhJblBheW1lbnRBc3NldCIWbWFuYWdlclB1YmxpY0tleU9yVW5pdCIBcyIdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQiCWlzTWFuYWdlciICcGsiC211c3RNYW5hZ2VyIgJwZCIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiC2NoZWNrQ2FsbGVyIhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSIPc2hvdWxkQXV0b1N0YWtlIgRhbUlkIgRwcklkIgxzbGlwcGFnZUFJbnYiDHNsaXBwYWdlUEludiIKbHBUcmFuc2ZlciILc2xwU3Rha2VJbnYiDSR0MDMxOTkwMzIwNTUiEXJlZnJlc2hLTHBBY3Rpb25zIhFpc1VwZGF0ZWRLTHBWYWxpZCILbWF4U2xpcHBhZ2UiDSR0MDMyNjE3MzI2ODIiDG1pbk91dEFtb3VudCIJYXV0b1N0YWtlIiBpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZCIBQCINaXNQdXREaXNhYmxlZCIHcGF5bWVudCINJHQwMzM4NjczNDAxOSIFYm9udXMiE2VtaXRBbW91bnRFc3RpbWF0ZWQiCmVtaXRBbW91bnQiCHN0YWtlSW52IgdzZW5kRmVlIg0kdDAzNDYwNTM0ODAyIg0kdDAzNDgwNTM0OTEzIg0kdDAzNTE3OTM1MzM2Ig1vdXRBc3NldElkU3RyIg1pc0dldERpc2FibGVkIg0kdDAzNjIzMDM2MzgzIg9hbW91bnRFc3RpbWF0ZWQiB2J1cm5JbnYiDWFzc2V0VHJhbnNmZXIiDSR0MDM2ODgzMzcxMzAiEGZlZUFtb3VudEZvckNhbGMiDSR0MDM3MTMzMzcyNDEiDSR0MDM3NDk4Mzc2NTQiDXVuc3Rha2VBbW91bnQiCnVuc3Rha2VJbnYiDSR0MDM4NTU2Mzg3MDciDSR0MDM5MjAyMzk0NDkiDSR0MDM5NDUyMzk1NjAiCW91dEFtdEFtdCIUYnVybkxQQXNzZXRPbkZhY3RvcnkiDSR0MDQwNTA4NDA1OTAiEm5vTGVzc1RoZW5BbXRBc3NldCIUbm9MZXNzVGhlblByaWNlQXNzZXQiDSR0MDQxNTQxNDE2MjIiDWNoZWNrUGF5bWVudHMiD2NoZWNrUG9vbFN0YXR1cyINJHQwNDI3NDU0MjgyNiIVbm9MZXNzVGhlbkFtb3VudEFzc2V0IgxjaGVja0Ftb3VudHMiDSR0MDQ0MTE4NDQxOTkiC2FtdEFzc2V0U3RyIg1wcmljZUFzc2V0U3RyIhhsYXN0UmVmcmVzaGVkQmxvY2tIZWlnaHQiHWNoZWNrTGFzdFJlZnJlc2hlZEJsb2NrSGVpZ2h0Ig0kdDA0NTM4NjQ1NDUwIhBrTHBVcGRhdGVBY3Rpb25zIgphbXRBc3NldElkIgxwcmljZUFzc2V0SWQiDXBvb2xMUEJhbGFuY2UiEmFjY0FtdEFzc2V0QmFsYW5jZSIUYWNjUHJpY2VBc3NldEJhbGFuY2UiCnByaWNlc0xpc3QiD2xwQW10QXNzZXRTaGFyZSIRbHBQcmljZUFzc2V0U2hhcmUiCnBvb2xXZWlnaHQiDGN1clByaWNlQ2FsYyIMYW1CYWxhbmNlUmF3IgxwckJhbGFuY2VSYXciD2FtQmFsYW5jZVJhd1gxOCIPcHJCYWxhbmNlUmF3WDE4IhBwYXltZW50THBBc3NldElkIgxwYXltZW50THBBbXQiAnR4IgZ2ZXJpZnkiD3RhcmdldFB1YmxpY0tleSIKbWF0Y2hlclB1YiIHbmV3SGFzaCILYWxsb3dlZEhhc2giC2N1cnJlbnRIYXNobQABYQAIAAFiAIDC1y8AAWMJALYCAQCAwtcvAAFkCQC2AgEAgICQu7rWrfANAAFlCQC2AgEAAAABZgkAtgIBAAAAAWcJALYCAQABAAFoCQC2AgEAAgABaQIFV0FWRVMAAWoCAl9fAAFrAAEAAWwAAgABbQADAAFuAAQAAW8AAQABcAACAAFxAAMAAXIABAABcwAFAAF0AAYAAXUABwABdgAIAAF3AAkAAXgACgABeQABAAF6AAIAAUEAAwABQgABAAFDAAcBAUQCAUUBRgkAvAIDCQC2AgEFAUUFAWQJALYCAQUBRgEBRwIBSAFJCQCgAwEJALwCAwUBSAkAtgIBBQFJBQFkAQFKAwFLAUwBTQkAawMFAUsFAUwFAU0BAU4BAUgDCQBmAgAABQFICQEBLQEFAUgFAUgBAU8BAUgDCQC/AgIFAWUFAUgJAL4CAQUBSAUBSAEBUAACEyVzX19mYWN0b3J5Q29udHJhY3QBAVEAAhQlc19fbWFuYWdlclB1YmxpY0tleQEBUgACGyVzX19wZW5kaW5nTWFuYWdlclB1YmxpY0tleQEBUwACESVzJXNfX3ByaWNlX19sYXN0AQFUAgFVAVYJALkJAgkAzAgCAhglcyVzJWQlZF9fcHJpY2VfX2hpc3RvcnkJAMwIAgkApAMBBQFVCQDMCAIJAKQDAQUBVgUDbmlsBQFqAQFXAgFYAVkJAKwCAgkArAICCQCsAgICCyVzJXMlc19fUF9fBQFYAgJfXwUBWQEBWgIBWAFZCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX0dfXwUBWAICX18FAVkBAmFhAAIPJXNfX2Ftb3VudEFzc2V0AQJhYgACDiVzX19wcmljZUFzc2V0AAJhYwIHJXNfX2ZlZQACYWQJAGsDAAoFAWIAkE4AAmFlCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAmFjBQJhZAACYWYJALkJAgkAzAgCAgIlcwkAzAgCAgNrTHAFA25pbAUBagACYWcJALkJAgkAzAgCAgIlcwkAzAgCAhJrTHBSZWZyZXNoZWRIZWlnaHQFA25pbAUBagACYWgJALkJAgkAzAgCAgIlcwkAzAgCAg9yZWZyZXNoS0xwRGVsYXkFA25pbAUBagACYWkAHgACYWoJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUCYWgFAmFpAQJhawACESVzX19mYWN0b3J5Q29uZmlnAQJhbAACGCVzJXNfX21hdGNoZXJfX3B1YmxpY0tleQECYW0BAmFuCQCsAgIJAKwCAgIIJXMlcyVzX18FAmFuAiBfX21hcHBpbmdzX19wb29sQ29udHJhY3QyTHBBc3NldAECYW8CAmFwAmFxCQCsAgIJAKwCAgkArAICCQCsAgICCCVkJWQlc19fBQJhcAICX18FAmFxAghfX2NvbmZpZwECYXIBAmFzCQCsAgICKCVzJXMlc19fbWFwcGluZ3NfX2Jhc2VBc3NldDJpbnRlcm5hbElkX18FAmFzAQJhdAACDCVzX19zaHV0ZG93bgECYXUBAmF2CQCsAgICEiVzJXNfX3Bvb2xXZWlnaHRfXwUCYXYBAmF3AAIXJXNfX2FsbG93ZWRMcFNjcmlwdEhhc2gAAmF4Ahclc19fZmVlQ29sbGVjdG9yQWRkcmVzcwECYXkDAmF6AmFBAmFCCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICJG9yZGVyIHZhbGlkYXRpb24gZmFpbGVkOiBvcmRlclZhbGlkPQkApQMBBQJhegINIHNlbmRlclZhbGlkPQkApQMBBQJhQQIOIG1hdGNoZXJWYWxpZD0JAKUDAQUCYUIBAmFDAgJhRAJhRQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFEBQJhRQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQJhRAkAzAgCAgEuCQDMCAIFAmFFCQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABAmFGAgJhRAJhRQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFAmFEBQJhRQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQJhRAkAzAgCAgEuCQDMCAIFAmFFCQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABAmFHAQJhSAkAAgEJALkJAgkAzAgCAghscC5yaWRlOgkAzAgCBQJhSAUDbmlsAgEgAQJhSQECYUgJALkJAgkAzAgCAghscC5yaWRlOgkAzAgCBQJhSAUDbmlsAgEgAAJhSgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmFDAgUEdGhpcwkBAVAAAAJhSwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmFDAgUCYUoFAmF4AQJhTAAJAQt2YWx1ZU9yRWxzZQIJAJsIAgUCYUoJAQJhdAAHAQJhTQAJANkEAQkBAmFDAgUCYUoJAQJhbAABAmFOAAQCYU8JAQJhQwIFBHRoaXMJAQJhYQAEAmFQCQECYUMCBQR0aGlzCQECYWIABAJhcQkBAmFGAgUCYUoJAQJhcgEFAmFQBAJhcAkBAmFGAgUCYUoJAQJhcgEFAmFPCQC1CQIJAQJhQwIFAmFKCQECYW8CCQCkAwEFAmFwCQCkAwEFAmFxBQFqAQJhUQECYVIDCQAAAgUCYVIFAWkFBHVuaXQJANkEAQUCYVIBAmFTAQJhUgMJAAACBQJhUgUEdW5pdAUBaQkA2AQBCQEFdmFsdWUBBQJhUgECYVQBAmFVCQCZCgcJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYVUFAW8JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhVQUBcAkA2QQBCQCRAwIFAmFVBQFxCQECYVEBCQCRAwIFAmFVBQFyCQECYVEBCQCRAwIFAmFVBQFzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYVUFAXQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhVQUBdQACYVYJAQJhVAEJAQJhTgAAAmFXBQJhVgACYVgIBQJhVwJfMQACYVkIBQJhVwJfMgACYVoIBQJhVwJfMwACYmEIBQJhVwJfNAACYmIIBQJhVwJfNQACYmMIBQJhVwJfNgACYmQIBQJhVwJfNwECYmUACQC1CQIJAQJhQwIFAmFKCQECYWsABQFqAAJiZgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgkBAmJlAAUBQgIZaW5jb3JyZWN0IHN0YWtpbmcgYWRkcmVzcwACYmcJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIJAQJiZQAFAUMCGWluY29ycmVjdCBzdGFraW5nIGFkZHJlc3MBAmJoCgJiaQJiagJiawJibAJibQJibgJibwJicAJicQJicgkAuQkCCQDMCAICFCVkJWQlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYmkJAMwIAgkApAMBBQJiagkAzAgCCQCkAwEFAmJrCQDMCAIJAKQDAQUCYmwJAMwIAgkApAMBBQJibQkAzAgCCQCkAwEFAmJuCQDMCAIJAKQDAQUCYm8JAMwIAgkApAMBBQJicAkAzAgCCQCkAwEFAmJxCQDMCAIJAKQDAQUCYnIFA25pbAUBagECYnMGAmJ0AmJ1AmJ2AmJsAmJvAmJwCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYnQJAMwIAgkApAMBBQJidQkAzAgCCQCkAwEFAmJ2CQDMCAIJAKQDAQUCYmwJAMwIAgkApAMBBQJibwkAzAgCCQCkAwEFAmJwBQNuaWwFAWoBAmJ3AQJieAMJAAACBQJieAIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUCYngBAmJ5AgJiegJiQQkAvAIDBQJiegUBZAUCYkEBAmJCBAJiQwJiRAJiRQJiRgQCYkcJAQFEAgUCYkUFAmJDBAJiSAkBAUQCBQJiRgUCYkQJAQJieQIFAmJIBQJiRwECYkkDAmJFAmJGAmJKBAJiSwkBAmFOAAQCYkwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYk0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCYk4JAQJiQgQFAmJMBQJiTQUCYkUFAmJGBAJiQQkBAUQCBQJiRQUCYkwEAmJ6CQEBRAIFAmJGBQJiTQQCYk8JAQFEAgUCYkoFAWIEAmJQCQECYnkCBQJiQQUCYk8EAmJRCQECYnkCBQJiegUCYk8JAMwIAgUCYk4JAMwIAgUCYlAJAMwIAgUCYlEFA25pbAECYlIDAmJFAmJGAmJKBAJiUwkBAmJJAwUCYkUFAmJGBQJiSgkAzAgCCQEBRwIJAJEDAgUCYlMAAAUBYgkAzAgCCQEBRwIJAJEDAgUCYlMAAQUBYgkAzAgCCQEBRwIJAJEDAgUCYlMAAgUBYgUDbmlsAQJiVAQCYlUCYlYCYlcBWAQCYksJAQJhTgAEAmJYCQCRAwIFAmJLBQFxBAJiWQkAkQMCBQJiSwUBcgQCYloJAJEDAgUCYksFAXMEAmJDCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJECQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJjYggJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFAmJYCQCsAgIJAKwCAgIGQXNzZXQgBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkDCQECIT0CBQJiWAUCYlYJAAIBAhVJbnZhbGlkIGFzc2V0IHBhc3NlZC4EAmNjCQECYncBBQJiWQQCY2QJAQFEAgUCY2MFAmJDBAJjZQkBAmJ3AQUCYloEAmNmCQEBRAIFAmNlBQJiRAQCY2cJAQJieQIFAmNmBQJjZAQCY2gJAQFHAgUCY2cFAWIEAmNpCQEBRAIFAmJXBQFiBAJjagkBAUQCBQJjYgUBYgQCY2sJALwCAwUCY2QFAmNpBQJjagQCY2wJALwCAwUCY2YFAmNpBQJjagQCY20JAQFHAgUCY2sFAmJDBAJjbgkBAUcCBQJjbAUCYkQEAmNvAwkAAAIFAmJVAgAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQFYBQJjbQMJAAACBQJiWQIFV0FWRVMFBHVuaXQJANkEAQUCYlkJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUBWAUCY24DCQAAAgUCYloCBVdBVkVTBQR1bml0CQDZBAEFAmJaCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFaAgkApQgBBQFYBQJiVQkBAmJzBgUCY20FAmNuBQJiVwUCY2gFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCY2gJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY2gFA25pbAkAnAoKBQJjbQUCY24FAmJZBQJiWgUCY2MFAmNlBQJjYgUCY2cFAmNhBQJjbwECY3AJAmJVAmNxAmNyAmNzAmN0AmN1AVgCY3YCY3cEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJjeAkAkQMCBQJiSwUBcgQCY3kJAJEDAgUCYksFAXMEAmN6CQCRAwIFAmJLBQF2BAJjQQkAkQMCBQJiSwUBdwQCYkwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYk0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCY2EJAJEDAgUCYksFAXAEAmNiCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmJYCQCsAgIJAKwCAgIGQXNzZXQgCQDYBAEFAmJYAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCY0IJANgEAQkBC3ZhbHVlT3JFbHNlAgUCY3MJANkEAQIFV0FWRVMEAmNDCQDYBAEJAQt2YWx1ZU9yRWxzZQIFAmN1CQDZBAECBVdBVkVTAwMJAQIhPQIFAmN4BQJjQgYJAQIhPQIFAmN5BQJjQwkAAgECIkludmFsaWQgYW10IG9yIHByaWNlIGFzc2V0IHBhc3NlZC4EAmNjAwUCY3YJAQJidwEFAmN4CQBlAgkBAmJ3AQUCY3gFAmNyBAJjZQMFAmN2CQECYncBBQJjeQkAZQIJAQJidwEFAmN5BQJjdAQCY0QJAQFEAgUCY3IFAmJMBAJjRQkBAUQCBQJjdAUCYk0EAmNGCQECYnkCBQJjRQUCY0QEAmNkCQEBRAIFAmNjBQJiTAQCY2YJAQFEAgUCY2UFAmJNBAJjRwMJAAACBQJjYgAABAJjZwUBZQQCY0gFAWUEAmJPCQB2BgkAuQICBQJjRAUCY0UAAAkAtgIBAAUAAQAABQRET1dOCQCXCgUJAQFHAgUCYk8FAWIJAQFHAgUCY0QFAmJMCQEBRwIFAmNFBQJiTQkBAmJ5AgkAtwICBQJjZgUCY0UJALcCAgUCY2QFAmNEBQJjSAQCY2cJAQJieQIFAmNmBQJjZAQCY0gJALwCAwkBAU8BCQC4AgIFAmNnBQJjRgUBZAUCY2cEAmNJCQEBRAIFAmNxBQFiAwMJAQIhPQIFAmNnBQFlCQC/AgIFAmNIBQJjSQcJAAIBCQCsAgIJAKwCAgkArAICAg9QcmljZSBzbGlwcGFnZSAJAKYDAQUCY0gCHiBleGNlZWRlZCB0aGUgcGFzc2VkIGxpbWl0IG9mIAkApgMBBQJjSQQCY2oJAQFEAgUCY2IFAWIEAmNKCQC8AgMFAmNEBQJjZwUBZAQCY0sJALwCAwUCY0UFAWQFAmNnBAJjTAMJAL8CAgUCY0oFAmNFCQCUCgIFAmNLBQJjRQkAlAoCBQJjRAUCY0oEAmNNCAUCY0wCXzEEAmNOCAUCY0wCXzIEAmJPCQC8AgMFAmNqBQJjTgUCY2YJAJcKBQkBAUcCBQJiTwUBYgkBAUcCBQJjTQUCYkwJAQFHAgUCY04FAmJNBQJjZwUCY0gEAmNPCAUCY0cCXzEEAmNQCAUCY0cCXzIEAmNRCAUCY0cCXzMEAmNoCQEBRwIIBQJjRwJfNAUBYgQCY1IJAQFHAggFAmNHAl81BQFiAwkAZwIAAAUCY08JAAIBAjZJbnZhbGlkIGNhbGN1bGF0aW9ucy4gTFAgY2FsY3VsYXRlZCBpcyBsZXNzIHRoYW4gemVyby4EAmNTAwkBASEBBQJjdwAABQJjTwQCY1QJAGUCBQJjcgUCY1AEAmNVCQBlAgUCY3QFAmNRBAJjVgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVMABQJjaAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVQCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjaAkAzAgCCQELU3RyaW5nRW50cnkCCQEBVwIFAVgFAmJVCQECYmgKBQJjUAUCY1EFAmNTBQJjaAUCY3EFAmNSBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjVAUCY1UFA25pbAkAnwoNBQJjTwUCY1MFAmNoBQJjYwUCY2UFAmNiBQJiWAUCY2EFAmNWBQJjVAUCY1UFAmNzBQJjdQECY1cDAmNYAmNZAmNiBAJjWgkAvAIDCQB2BgkAuQICBQJjWAUCY1kAAAkAtgIBAAUAAQAABQRET1dOBQFkBQJjYgUCY1oBAmRhAwJkYgJkYwJkZAQCZGUJALgCAgkAtgIBCQECYncBCQECYVMBBQJiYQUCZGIEAmRmCQC4AgIJALYCAQkBAmJ3AQkBAmFTAQUCYmIFAmRjBAJkZwkAuAICCQC2AgEICQEFdmFsdWUBCQDsBwEFAmFaCHF1YW50aXR5BQJkZAQCZGgJAQJjVwMFAmRlBQJkZgUCZGcFAmRoAQJkaQMCZGoCZGsCZGQEAmRlCQBkAgkBAmJ3AQkBAmFTAQUCYmEFAmRqBAJkZgkAZAIJAQJidwEJAQJhUwEFAmJiBQJkawQCZGcJAGQCCAkBBXZhbHVlAQkA7AcBBQJhWghxdWFudGl0eQUCZGQEAmNaCQECY1cDCQC2AgEFAmRlCQC2AgEFAmRmCQC2AgEFAmRnBAJkbAkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYWcFBmhlaWdodAkAzAgCCQELU3RyaW5nRW50cnkCBQJhZgkApgMBBQJjWgUDbmlsCQCUCgIFAmRsBQJjWgECZG0CAmRuAmNaAwkAwAICBQJjWgUCZG4GCQECYUcBAiJ1cGRhdGVkIEtMcCBsb3dlciB0aGFuIGN1cnJlbnQgS0xwAQJkbwECZHAEAmRxCAUCZHAGYW1vdW50BAJkcgkAawMIBQJkcAZhbW91bnQIBQJkcAVwcmljZQUBYgQCZHMDCQAAAggFAmRwCW9yZGVyVHlwZQUDQnV5CQCUCgIFAmRxCQEBLQEFAmRyCQCUCgIJAQEtAQUCZHEFAmRyBAJkaggFAmRzAl8xBAJkawgFAmRzAl8yAwMDCQECYUwABgkAAAIFAmFZBQFtBgkAAAIFAmFZBQFuCQACAQIcRXhjaGFuZ2Ugb3BlcmF0aW9ucyBkaXNhYmxlZAMDCQECIT0CCAgFAmRwCWFzc2V0UGFpcgthbW91bnRBc3NldAUCYmEGCQECIT0CCAgFAmRwCWFzc2V0UGFpcgpwcmljZUFzc2V0BQJiYgkAAgECE1dyb25nIG9yZGVyIGFzc2V0cy4EAmR0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKgDAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFAmFmCQECYUkBAg9rTHAgaXMgcmVxdWlyZWQJAQJhSQECC2ludmFsaWQga0xwBAJkdQkBAmRpAwUCZGoFAmRrAAAEAmR2CAUCZHUCXzEEAmR3CAUCZHUCXzIEAmR4CQC/AgIFAmR3BQJkdAUCZHgBAmR5AQJkegMJAQIhPQIJAJADAQgFAmR6CHBheW1lbnRzAAEJAAIBAh1leGFjdGx5IDEgcGF5bWVudCBpcyBleHBlY3RlZAQCZEEJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAAEAmJWCQEFdmFsdWUBCAUCZEEHYXNzZXRJZAQCZEIIBQJkQQZhbW91bnQEAmNHCQECYlQECQDYBAEIBQJkeg10cmFuc2FjdGlvbklkCQDYBAEFAmJWBQJkQggFAmR6BmNhbGxlcgQCY20IBQJjRwJfMQQCY24IBQJjRwJfMgQCY2EJAQ1wYXJzZUludFZhbHVlAQgFAmNHAl85BAJjbwgFAmNHA18xMAMDCQECYUwABgkAAAIFAmNhBQFuCQACAQkArAICAixHZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4uIFN0YXR1cyA9IAkApAMBBQJjYQkAlwoFBQJjbQUCY24FAmRCBQJiVgUCY28BAmRDAwJkegJjcQJjdwMJAQIhPQIJAJADAQgFAmR6CHBheW1lbnRzAAIJAAIBAh9leGFjdGx5IDIgcGF5bWVudHMgYXJlIGV4cGVjdGVkBAJkRAkBBXZhbHVlAQkAkQMCCAUCZHoIcGF5bWVudHMAAAQCZEUJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAEEAmRGCQECY3AJCQDYBAEIBQJkeg10cmFuc2FjdGlvbklkBQJjcQgFAmREBmFtb3VudAgFAmREB2Fzc2V0SWQIBQJkRQZhbW91bnQIBQJkRQdhc3NldElkCQClCAEIBQJkegZjYWxsZXIHBQJjdwQCY2EJAQ1wYXJzZUludFZhbHVlAQgFAmRGAl84AwMDCQECYUwABgkAAAIFAmNhBQFsBgkAAAIFAmNhBQFuCQACAQkArAICAixQdXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4uIFN0YXR1cyA9IAkApAMBBQJjYQUCZEYBAmRHAQJkSAQCZEkJAPwHBAUCYUoCBGVtaXQJAMwIAgUCZEgFA25pbAUDbmlsAwkAAAIFAmRJBQJkSQQCZEoEAmRLBQJkSQMJAAECBQJkSwIHQWRkcmVzcwQCZEwFAmRLCQD8BwQFAmRMAgRlbWl0CQDMCAIFAmRIBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkSgUCZEoFAmRICQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJkTQECZEgEAmROCQBrAwUCZEgFAmFlBQFiCQCUCgIJAGUCBQJkSAUCZE4FAmROAQJkTwQCZFACZFEBWAFZBAJkUgkAAAIFAVkFBHVuaXQEAmRTCQECYncBCQECYVMBBQJiYQQCZFQJAQJidwEJAQJhUwEFAmJiBAJkVQMJAAACBQJkUQUCYmEGAwkAAAIFAmRRBQJiYgcJAQJhRwECDWludmFsaWQgYXNzZXQEAmRWAwUCZFIJAJQKAgUCZFMFAmRUAwUCZFUJAJQKAgkAZQIFAmRTBQJkUAUCZFQJAJQKAgUCZFMJAGUCBQJkVAUCZFAEAmRXCAUCZFYCXzEEAmRYCAUCZFYCXzIEAmRZAwUCZFUJAJQKAgUCZFAAAAkAlAoCAAAFAmRQBAJkWggFAmRZAl8xBAJlYQgFAmRZAl8yBAJkcQgJAQJkTQEFAmRaAl8xBAJkcggJAQJkTQEFAmVhAl8xBAJlYgkBAmRNAQUCZFAEAmVjCAUCZWICXzEEAmROCAUCZWICXzIEAmVkCQBkAgUCZFcFAmRxBAJlZQkAZAIFAmRYBQJkcgQCZWYJAQJieQIJAQFEAgUCZWUFAmJkCQEBRAIFAmVkBQJiYwQCZWcJAQFHAgUCZWYFAWIEAmVoAwUCZFUFAmRXBQJkWAQCZWkJALYCAQUCZWgEAmVqCQC2AgEICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYVoJAKwCAgkArAICAgZhc3NldCAJANgEAQUCYVoCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJlawMJAL8CAgUCZWoFAWYGCQECYUcBAiJpbml0aWFsIGRlcG9zaXQgcmVxdWlyZXMgYWxsIGNvaW5zAwkAAAIFAmVrBQJlawQCZWwJALYCAQUCZWMEAmVtCQCWAwEJAMwIAgAACQDMCAIJAKADAQkAugICCQC5AgIFAmVqCQC4AgIJAQpzcXJ0QmlnSW50BAkAtwICBQFkCQC6AgIJALkCAgUCZWwFAWQFAmVpABIAEgUERE9XTgUBZAUBZAUDbmlsBAJjVgMFAmRSBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCZWcJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCZWcJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVcCCQClCAEJAQV2YWx1ZQEFAVgJANgEAQkBBXZhbHVlAQUBWQkBAmJoCgUCZFoFAmVhBQJlbQUCZWcAAAAABQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wAAAAAAUDbmlsBAJlbgkBAmJ5AgkBAUQCBQJkWAUCYmQJAQFEAgUCZFcFAmJjBAJlbwkBAUcCBQJlbgUBYgQCZXAEAmVxAwUCZFUJAJQKAgUCZFoFAmRXCQCUCgIFAmVhBQJkWAQCZEgIBQJlcQJfMQQCZXIIBQJlcQJfMgQCZXMJAKADAQkAvAIDBQJlagkAtgIBCQBpAgUCZEgAAgkAtgIBBQJlcgkAawMJAGUCBQJlbQUCZXMFAWIFAmVzCQCXCgUFAmVtBQJjVgUCZE4FAmVwBQJkVQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECZXQFAmV1AmVjAmRRAVgBWQQCZFIJAAACBQFZBQR1bml0BAJldgkAzAgCAwkAAAIFAmRRBQJhWgYJAQJhRwECEGludmFsaWQgbHAgYXNzZXQFA25pbAMJAAACBQJldgUCZXYEAmV3AwkAAAIFAmV1BQJiYQYDCQAAAgUCZXUFAmJiBwkBAmFHAQINaW52YWxpZCBhc3NldAQCZXgDBQJldwkAtgIBCQECYncBCQECYVMBBQJiYQkAtgIBCQECYncBCQECYVMBBQJiYgQCZXkJAQJidwEJAQJhUwEFAmJhBAJlegkBAmJ3AQkBAmFTAQUCYmIEAmVBAwUCZXcFAmV5BQJlegQCZUIJALYCAQUCZUEEAmVqCQC2AgEICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYVoJAKwCAgkArAICAgZhc3NldCAJANgEAQUCYVoCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJlQwkAtgIBBQJlYwQCZUQJAJYDAQkAzAgCAAAJAMwIAgkAoAMBCQC6AgIJALkCAgUCZXgJALgCAgUBZAkAdgYJALgCAgUBZAkAugICCQC5AgIFAmVDBQFkBQJlagASBQFoAAAAEgUERE9XTgUBZAUDbmlsBAJlRQkBAmRNAQUCZUQEAmVGCAUCZUUCXzEEAmROCAUCZUUCXzIEAmVHAwUCZXcJAJYKBAUCZUYAAAkAZQIFAmV5BQJlRAUCZXoJAJYKBAAABQJlRgUCZXkJAGUCBQJlegUCZUQEAmVICAUCZUcCXzEEAmVJCAUCZUcCXzIEAmVKCAUCZUcCXzMEAmVLCAUCZUcCXzQEAmVmCQECYnkCCQEBRAIFAmVLBQJiZAkBAUQCBQJlSgUCYmMEAmVnCQEBRwIFAmVmBQFiBAJjVgMFAmRSBQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVoCCQClCAEJAQV2YWx1ZQEFAVgJANgEAQkBBXZhbHVlAQUBWQkBAmJzBgUCZUgFAmVJBQJlYwUCZWcFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAAUCZWcJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFUAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCZWcFA25pbAQCZW4JAQJieQIJAQFEAgUCZXoFAmJkCQEBRAIFAmV5BQJiYwQCZW8JAQFHAgUCZW4FAWIEAmVwBAJlTAkAaAIJAKADAQkAvAIDBQJleAUCZUMFAmVqAAIJAGsDCQBlAgUCZUYFAmVMBQFiBQJlTAkAlwoFBQJlRgUCY1YFAmROBQJlcAUCZXcJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmVNAAQCZEsJAKIIAQkBAVEAAwkAAQIFAmRLAgZTdHJpbmcEAmVOBQJkSwkA2QQBBQJlTgMJAAECBQJkSwIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJlTwAEAmRLCQCiCAEJAQFSAAMJAAECBQJkSwIGU3RyaW5nBAJlTgUCZEsJANkEAQUCZU4DCQABAgUCZEsCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECZVABAmR6BAJkSwkBAmVNAAMJAAECBQJkSwIKQnl0ZVZlY3RvcgQCZVEFAmRLCQAAAggFAmR6D2NhbGxlclB1YmxpY0tleQUCZVEDCQABAgUCZEsCBFVuaXQJAAACCAUCZHoGY2FsbGVyBQR0aGlzCQACAQILTWF0Y2ggZXJyb3IBAmVSAQJkegQCZVMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQCZEsJAQJlTQADCQABAgUCZEsCCkJ5dGVWZWN0b3IEAmVRBQJkSwMJAAACCAUCZHoPY2FsbGVyUHVibGljS2V5BQJlUQYFAmVTAwkAAQIFAmRLAgRVbml0AwkAAAIIBQJkegZjYWxsZXIFBHRoaXMGBQJlUwkAAgECC01hdGNoIGVycm9yGwJkegEKc2V0TWFuYWdlcgECZVQEAmVVCQECZVIBBQJkegMJAAACBQJlVQUCZVUEAmVWCQDZBAEFAmVUAwkAAAIFAmVWBQJlVgkAzAgCCQELU3RyaW5nRW50cnkCCQEBUgAFAmVUBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBDmNvbmZpcm1NYW5hZ2VyAAQCZVcJAQJlTwAEAmVYAwkBCWlzRGVmaW5lZAEFAmVXBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJlWAUCZVgEAmVZAwkAAAIIBQJkeg9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmVXBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJlWQUCZVkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVEACQDYBAEJAQV2YWx1ZQEFAmVXCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFSAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQNwdXQCAmNxAmVaAwkAZgIAAAUCY3EJAAIBAiBJbnZhbGlkIHNsaXBwYWdlVG9sZXJhbmNlIHBhc3NlZAQCZEYJAQJkQwMFAmR6BQJjcQYEAmNTCAUCZEYCXzIEAmJYCAUCZEYCXzcEAmNvCAUCZEYCXzkEAmNUCAUCZEYDXzEwBAJjVQgFAmRGA18xMQQCZmEIBQJkRgNfMTIEAmZiCAUCZEYDXzEzBAJkRAkAtgIBCAkBBXZhbHVlAQkAkQMCCAUCZHoIcGF5bWVudHMAAAZhbW91bnQEAmRFCQC2AgEICQEFdmFsdWUBCQCRAwIIBQJkeghwYXltZW50cwABBmFtb3VudAQCZGgJAQJkYQMFAmREBQJkRQkAtgIBAAADCQAAAgUCZGgFAmRoBAJkSQkA/AcEBQJhSgIEZW1pdAkAzAgCBQJjUwUDbmlsBQNuaWwDCQAAAgUCZEkFAmRJBAJkSgQCZEsFAmRJAwkAAQIFAmRLAgdBZGRyZXNzBAJkTAUCZEsJAPwHBAUCZEwCBGVtaXQJAMwIAgUCY1MFA25pbAUDbmlsBQR1bml0AwkAAAIFAmRKBQJkSgQCZmMDCQBmAgUCY1QAAAkA/AcEBQJiZwIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmZhBQJjVAUDbmlsBQNuaWwDCQAAAgUCZmMFAmZjBAJmZAMJAGYCBQJjVQAACQD8BwQFAmJnAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZmIFAmNVBQNuaWwFA25pbAMJAAACBQJmZAUCZmQEAmZlAwUCZVoEAmZmCQD8BwQFAmJmAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiWAUCY1MFA25pbAMJAAACBQJmZgUCZmYFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHoGY2FsbGVyBQJjUwUCYlgFA25pbAQCZmcJAQJkaQMAAAAAAAAEAmZoCAUCZmcCXzEEAmNaCAUCZmcCXzIEAmZpCQECZG0CBQJkaAUCY1oDCQAAAgUCZmkFAmZpCQDOCAIJAM4IAgUCY28FAmZlBQJmaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEKcHV0Rm9yRnJlZQECZmoDCQBmAgAABQJmagkAAgECFEludmFsaWQgdmFsdWUgcGFzc2VkBAJkRgkBAmRDAwUCZHoFAmZqBwQCY28IBQJkRgJfOQQCZEQJALYCAQgJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAAGYW1vdW50BAJkRQkAtgIBCAkBBXZhbHVlAQkAkQMCCAUCZHoIcGF5bWVudHMAAQZhbW91bnQEAmRoCQECZGEDBQJkRAUCZEUJALYCAQAAAwkAAAIFAmRoBQJkaAQCZmsJAQJkaQMAAAAAAAAEAmZoCAUCZmsCXzEEAmNaCAUCZmsCXzIEAmZpCQECZG0CBQJkaAUCY1oDCQAAAgUCZmkFAmZpCQDOCAIFAmNvBQJmaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEJcHV0T25lVGtuAgJmbAJmbQQCZm4KAAJmbwkA/AcEBQJhSgIoaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWRSRUFET05MWQkAzAgCCQClCAEFBHRoaXMFA25pbAUDbmlsAwkAAQIFAmZvAgdCb29sZWFuBQJmbwkAAgEJAKwCAgkAAwEFAmZvAhwgY291bGRuJ3QgYmUgY2FzdCB0byBCb29sZWFuBAJmcAMDAwkBAmFMAAYJAAACBQJhWQUBbAYJAAACBQJhWQUBbgYFAmZuBAJldgkAzAgCAwMJAQEhAQUCZnAGCQECZVABBQJkegYJAQJhRwECIXB1dCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbgkAzAgCAwkAAAIJAJADAQgFAmR6CHBheW1lbnRzAAEGCQECYUcBAh5leGFjdGx5IDEgcGF5bWVudCBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJldgUCZXYEAmZxCQCRAwIIBQJkeghwYXltZW50cwAABAJkUQgFAmZxB2Fzc2V0SWQEAmRQCAUCZnEGYW1vdW50BAJkaAMJAAACBQJkUQUCYmEJAQJkYQMJALYCAQUCZFAJALYCAQAACQC2AgEAAAMJAAACBQJkUQUCYmIJAQJkYQMJALYCAQAACQC2AgEFAmRQCQC2AgEAAAkBAmFHAQIecGF5bWVudCBhc3NldCBpcyBub3Qgc3VwcG9ydGVkBAFYCAUCZHoGY2FsbGVyBAFZCAUCZHoNdHJhbnNhY3Rpb25JZAQCZnIJAQJkTwQFAmRQBQJkUQUBWAUBWQMJAAACBQJmcgUCZnIEAmRVCAUCZnICXzUEAmZzCAUCZnICXzQEAmROCAUCZnICXzMEAmNWCAUCZnICXzIEAmZ0CAUCZnICXzEEAmZ1AwMJAGYCBQJmbAAACQBmAgUCZmwFAmZ0BwkBAmFHAQkAuQkCCQDMCAICH2Ftb3VudCB0byByZWNlaXZlIGlzIGxlc3MgdGhhbiAJAMwIAgkApAMBBQJmbAUDbmlsAgAFAmZ0BAJkSQkBAmRHAQUCZnUDCQAAAgUCZEkFAmRJBAJmZQMFAmZtBAJmdgkA/AcEBQJiZgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYVoFAmZ1BQNuaWwDCQAAAgUCZnYFAmZ2BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmR6BmNhbGxlcgUCZnUFAmFaBQNuaWwEAmZ3AwkAZgIFAmROAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUsFAmROBQJkUQUDbmlsBQNuaWwEAmZ4AwkAAAIFBHRoaXMFAmFLCQCUCgIAAAAAAwUCZFUJAJQKAgkBAS0BBQJkTgAACQCUCgIAAAkBAS0BBQJkTgQCZGoIBQJmeAJfMQQCZGsIBQJmeAJfMgQCZnkJAQJkaQMFAmRqBQJkawAABAJmaAgFAmZ5Al8xBAJjWggFAmZ5Al8yBAJmaQkBAmRtAgUCZGgFAmNaAwkAAAIFAmZpBQJmaQkAlAoCCQDOCAIJAM4IAgkAzggCBQJjVgUCZmUFAmZ3BQJmaAUCZnUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBEXB1dE9uZVRrblJFQURPTkxZAgJkUQJkUAQCZnoJAQJkTwQFAmRQCQECYVEBBQJkUQUEdW5pdAUEdW5pdAQCZnQIBQJmegJfMQQCY1YIBQJmegJfMgQCZE4IBQJmegJfMwQCZnMIBQJmegJfNAQCZFUIBQJmegJfNQkAlAoCBQNuaWwJAJUKAwUCZnQFAmROBQJmcwJkegEJZ2V0T25lVGtuAgJmQQJmbAQCZm4KAAJmbwkA/AcEBQJhSgIoaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWRSRUFET05MWQkAzAgCCQClCAEFBHRoaXMFA25pbAUDbmlsAwkAAQIFAmZvAgdCb29sZWFuBQJmbwkAAgEJAKwCAgkAAwEFAmZvAhwgY291bGRuJ3QgYmUgY2FzdCB0byBCb29sZWFuBAJmQgMDCQECYUwABgkAAAIFAmFZBQFuBgUCZm4EAmV2CQDMCAIDAwkBASEBBQJmQgYJAQJlUAEFAmR6BgkBAmFHAQIhZ2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHoIcGF5bWVudHMAAQYJAQJhRwECHmV4YWN0bHkgMSBwYXltZW50IGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmV2BQJldgQCZXUJAQJhUQEFAmZBBAJmcQkAkQMCCAUCZHoIcGF5bWVudHMAAAQCZFEIBQJmcQdhc3NldElkBAJlYwgFAmZxBmFtb3VudAQCZGgJAQJkYQMJALYCAQAACQC2AgEAAAkAtgIBBQJlYwQBWAgFAmR6BmNhbGxlcgQBWQgFAmR6DXRyYW5zYWN0aW9uSWQEAmZDCQECZXQFBQJldQUCZWMFAmRRBQFYBQFZAwkAAAIFAmZDBQJmQwQCZXcIBQJmQwJfNQQCZnMIBQJmQwJfNAQCZE4IBQJmQwJfMwQCY1YIBQJmQwJfMgQCZkQIBQJmQwJfMQQCZEgDAwkAZgIFAmZsAAAJAGYCBQJmbAUCZkQHCQECYUcBCQC5CQIJAMwIAgIfYW1vdW50IHRvIHJlY2VpdmUgaXMgbGVzcyB0aGFuIAkAzAgCCQCkAwEFAmZsBQNuaWwCAAUCZkQEAmZFCQD8BwQFAmFKAgRidXJuCQDMCAIFAmVjBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmRRBQJlYwUDbmlsAwkAAAIFAmZFBQJmRQQCZkYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUBWAUCZEgFAmV1BQNuaWwEAmZ3AwkAZgIFAmROAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUsFAmROBQJldQUDbmlsBQNuaWwEAmZHBAJmSAMJAAACBQR0aGlzBQJhSwAABQJkTgMFAmV3CQCUCgIJAQEtAQkAZAIFAmRIBQJmSAAACQCUCgIAAAkBAS0BCQBkAgUCZEgFAmZIBAJkaggFAmZHAl8xBAJkawgFAmZHAl8yBAJmSQkBAmRpAwUCZGoFAmRrAAAEAmZoCAUCZkkCXzEEAmNaCAUCZkkCXzIEAmZpCQECZG0CBQJkaAUCY1oDCQAAAgUCZmkFAmZpCQCUCgIJAM4IAgkAzggCCQDOCAIFAmNWBQJmRgUCZncFAmZoBQJkSAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegERZ2V0T25lVGtuUkVBRE9OTFkCAmV1AmVjBAJmSgkBAmV0BQkBAmFRAQUCZXUFAmVjBQJhWgUEdW5pdAUEdW5pdAQCZkQIBQJmSgJfMQQCY1YIBQJmSgJfMgQCZE4IBQJmSgJfMwQCZnMIBQJmSgJfNAQCZXcIBQJmSgJfNQkAlAoCBQNuaWwJAJUKAwUCZkQFAmROBQJmcwJkegETdW5zdGFrZUFuZEdldE9uZVRrbgMCZksCZkECZmwEAmZuCgACZm8JAPwHBAUCYUoCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgkApQgBBQR0aGlzBQNuaWwFA25pbAMJAAECBQJmbwIHQm9vbGVhbgUCZm8JAAIBCQCsAgIJAAMBBQJmbwIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZkIDAwkBAmFMAAYJAAACBQJhWQUBbgYFAmZuBAJldgkAzAgCAwMJAQEhAQUCZkIGCQECZVABBQJkegYJAQJhRwECIWdldCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbgkAzAgCAwkAAAIJAJADAQgFAmR6CHBheW1lbnRzAAAGCQECYUcBAhhubyBwYXltZW50cyBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJldgUCZXYEAmV1CQECYVEBBQJmQQQBWAgFAmR6BmNhbGxlcgQBWQgFAmR6DXRyYW5zYWN0aW9uSWQEAmRoCQECZGEDCQC2AgEAAAkAtgIBAAAJALYCAQAABAJmTAkA/AcEBQJiZgIHdW5zdGFrZQkAzAgCCQDYBAEFAmFaCQDMCAIFAmZLBQNuaWwFA25pbAMJAAACBQJmTAUCZkwEAmZNCQECZXQFBQJldQUCZksFAmFaBQFYBQFZAwkAAAIFAmZNBQJmTQQCZXcIBQJmTQJfNQQCZnMIBQJmTQJfNAQCZE4IBQJmTQJfMwQCY1YIBQJmTQJfMgQCZkQIBQJmTQJfMQQCZEgDAwkAZgIFAmZsAAAJAGYCBQJmbAUCZkQHCQECYUcBCQC5CQIJAMwIAgIfYW1vdW50IHRvIHJlY2VpdmUgaXMgbGVzcyB0aGFuIAkAzAgCCQCkAwEFAmZsBQNuaWwCAAUCZkQEAmZFCQD8BwQFAmFKAgRidXJuCQDMCAIFAmZLBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmFaBQJmSwUDbmlsAwkAAAIFAmZFBQJmRQQCZkYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmR6BmNhbGxlcgUCZEgFAmV1BQNuaWwEAmZ3AwkAZgIFAmROAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUsFAmROBQJldQUDbmlsBQNuaWwEAmZOBAJmSAMJAAACBQR0aGlzBQJhSwAABQJkTgMFAmV3CQCUCgIJAQEtAQkAZAIFAmRIBQJmSAAACQCUCgIAAAkBAS0BCQBkAgUCZEgFAmZIBAJkaggFAmZOAl8xBAJkawgFAmZOAl8yBAJmTwkBAmRpAwUCZGoFAmRrAAAEAmZoCAUCZk8CXzEEAmNaCAUCZk8CXzIEAmZpCQECZG0CBQJkaAUCY1oDCQAAAgUCZmkFAmZpCQCUCgIJAM4IAgkAzggCCQDOCAIFAmNWBQJmRgUCZncFAmZoBQJkSAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEDZ2V0AAQCY0cJAQJkeQEFAmR6BAJmUAgFAmNHAl8xBAJjbggFAmNHAl8yBAJkQggFAmNHAl8zBAJiVggFAmNHAl80BAJjbwgFAmNHAl81BAJkaAkBAmRhAwkAtgIBAAAJALYCAQAACQC2AgEFAmRCBAJmUQkA/AcEBQJhSgIEYnVybgkAzAgCBQJkQgUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiVgUCZEIFA25pbAMJAAACBQJmUQUCZlEEAmZSCQECZGkDCQEBLQEFAmZQCQEBLQEFAmNuAAAEAmZoCAUCZlICXzEEAmNaCAUCZlICXzIEAmZpCQECZG0CBQJkaAUCY1oDCQAAAgUCZmkFAmZpCQDOCAIFAmNvBQJmaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEJZ2V0Tm9MZXNzAgJmUwJmVAQCY0cJAQJkeQEFAmR6BAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJkQggFAmNHAl8zBAJiVggFAmNHAl80BAJjbwgFAmNHAl81AwkAZgIFAmZTBQJjbQkAAgEJAKwCAgkArAICCQCsAgICHG5vTGVzc1RoZW5BbXRBc3NldCBmYWlsZWQ6ICAJAKQDAQUCY20CAyA8IAkApAMBBQJmUwMJAGYCBQJmVAUCY24JAAIBCQCsAgIJAKwCAgkArAICAh1ub0xlc3NUaGVuUHJpY2VBc3NldCBmYWlsZWQ6IAkApAMBBQJjbgIDIDwgCQCkAwEFAmZUBAJkaAkBAmRhAwkAtgIBAAAJALYCAQAACQC2AgEFAmRCBAJmUQkA/AcEBQJhSgIEYnVybgkAzAgCBQJkQgUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiVgUCZEIFA25pbAMJAAACBQJmUQUCZlEEAmZVCQECZGkDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZoCAUCZlUCXzEEAmNaCAUCZlUCXzIEAmZpCQECZG0CBQJkaAUCY1oDCQAAAgUCZmkFAmZpCQDOCAIFAmNvBQJmaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegENdW5zdGFrZUFuZEdldAECZEgEAmZWAwkBAiE9AgkAkAMBCAUCZHoIcGF5bWVudHMAAAkAAgECGE5vIHBheW1lbnRzIGFyZSBleHBlY3RlZAYDCQAAAgUCZlYFAmZWBAJiSwkBAmFOAAQCYlgJANkEAQkAkQMCBQJiSwUBcQQCZGgJAQJkYQMJALYCAQAACQC2AgEAAAkAtgIBAAAEAmZMCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYlgJAMwIAgUCZEgFA25pbAUDbmlsAwkAAAIFAmZMBQJmTAQCY0cJAQJiVAQJANgEAQgFAmR6DXRyYW5zYWN0aW9uSWQJANgEAQUCYlgFAmRICAUCZHoGY2FsbGVyBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjYQkBDXBhcnNlSW50VmFsdWUBCAUCY0cCXzkEAmNvCAUCY0cDXzEwBAJmVwMDCQECYUwABgkAAAIFAmNhBQFuCQACAQkArAICAixHZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4uIFN0YXR1cyA9IAkApAMBBQJjYQYDCQAAAgUCZlcFAmZXBAJmUQkA/AcEBQJhSgIEYnVybgkAzAgCBQJkSAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiWAUCZEgFA25pbAMJAAACBQJmUQUCZlEEAmZYCQECZGkDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZoCAUCZlgCXzEEAmNaCAUCZlgCXzIEAmZpCQECZG0CBQJkaAUCY1oDCQAAAgUCZmkFAmZpCQDOCAIFAmNvBQJmaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegETdW5zdGFrZUFuZEdldE5vTGVzcwMCZksCZlkCZlQEAmZCAwkBAmFMAAYJAAACBQJhWQUBbgQCZXYJAMwIAgMJAQEhAQUCZkIGCQACAQIhZ2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHoIcGF5bWVudHMAAAYJAAIBAhhubyBwYXltZW50cyBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQJldgUCZXYEAmRoCQECZGEDCQC2AgEAAAkAtgIBAAAJALYCAQAABAJmTAkA/AcEBQJiZgIHdW5zdGFrZQkAzAgCCQDYBAEFAmFaCQDMCAIFAmZLBQNuaWwFA25pbAMJAAACBQJmTAUCZkwEAmNHCQECYlQECQDYBAEIBQJkeg10cmFuc2FjdGlvbklkCQDYBAEFAmFaBQJmSwgFAmR6BmNhbGxlcgQCY20IBQJjRwJfMQQCY24IBQJjRwJfMgQCY28IBQJjRwNfMTAEAmZaCQDMCAIDCQBnAgUCY20FAmZZBgkAAgEJALkJAgkAzAgCAixhbW91bnQgYXNzZXQgYW1vdW50IHRvIHJlY2VpdmUgaXMgbGVzcyB0aGFuIAkAzAgCCQCkAwEFAmZZBQNuaWwCAAkAzAgCAwkAZwIFAmNuBQJmVAYJAAIBCQC5CQIJAMwIAgIrcHJpY2UgYXNzZXQgYW1vdW50IHRvIHJlY2VpdmUgaXMgbGVzcyB0aGFuIAkAzAgCCQCkAwEFAmZUBQNuaWwCAAUDbmlsAwkAAAIFAmZaBQJmWgQCZlEJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZksFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYVoFAmZLBQNuaWwDCQAAAgUCZlEFAmZRBAJnYQkBAmRpAwkBAS0BBQJjbQkBAS0BBQJjbgAABAJmaAgFAmdhAl8xBAJjWggFAmdhAl8yBAJmaQkBAmRtAgUCZGgFAmNaAwkAAAIFAmZpBQJmaQkAzggCBQJjbwUCZmgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBCGFjdGl2YXRlAgJnYgJnYwMJAQIhPQIJAKUIAQgFAmR6BmNhbGxlcgkApQgBBQJhSgkAAgECEnBlcm1pc3Npb25zIGRlbmllZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhYQAFAmdiCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhYgAFAmdjBQNuaWwCB3N1Y2Nlc3MCZHoBCnJlZnJlc2hLTHAABAJnZAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQJhZwAABAJnZQMJAGcCCQBlAgUGaGVpZ2h0BQJnZAUCYWoFBHVuaXQJAQJhRwEJALkJAgkAzAgCCQCkAwEFAmFqCQDMCAICLyBibG9ja3MgaGF2ZSBub3QgcGFzc2VkIHNpbmNlIHRoZSBwcmV2aW91cyBjYWxsBQNuaWwCAAMJAAACBQJnZQUCZ2UEAmR0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKgDAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzBQJhZgIBMAkBAmFJAQILaW52YWxpZCBrTHAEAmdmCQECZGkDAAAAAAAABAJnZwgFAmdmAl8xBAJjWggFAmdmAl8yBAJkbAMJAQIhPQIFAmR0BQJjWgUCZ2cJAQJhRwECEm5vdGhpbmcgdG8gcmVmcmVzaAkAlAoCBQJkbAkApgMBBQJjWgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEcZ2V0UG9vbENvbmZpZ1dyYXBwZXJSRUFET05MWQAJAJQKAgUDbmlsCQECYU4AAmR6ARxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZAQJieAkAlAoCBQNuaWwJAQJidwEFAmJ4AmR6ARljYWxjUHJpY2VzV3JhcHBlclJFQURPTkxZAwJiRQJiRgJiSgQCYlMJAQJiSQMFAmJFBQJiRgUCYkoJAJQKAgUDbmlsCQDMCAIJAKYDAQkAkQMCBQJiUwAACQDMCAIJAKYDAQkAkQMCBQJiUwABCQDMCAIJAKYDAQkAkQMCBQJiUwACBQNuaWwCZHoBFHRvWDE4V3JhcHBlclJFQURPTkxZAgFFAUYJAJQKAgUDbmlsCQCmAwEJAQFEAgUBRQUBRgJkegEWZnJvbVgxOFdyYXBwZXJSRUFET05MWQIBSAFJCQCUCgIFA25pbAkBAUcCCQCnAwEFAUgFAUkCZHoBHmNhbGNQcmljZUJpZ0ludFdyYXBwZXJSRUFET05MWQICYnoCYkEJAJQKAgUDbmlsCQCmAwEJAQJieQIJAKcDAQUCYnoJAKcDAQUCYkECZHoBI2VzdGltYXRlUHV0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZCQJiVQJjcQJjcgJjcwJjdAJjdQFYAmN2AmN3CQCUCgIFA25pbAkBAmNwCQUCYlUFAmNxBQJjcgUCY3MFAmN0BQJjdQUBWAUCY3YFAmN3AmR6ASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQCYlUCYlYCYlcBWAQCY0cJAQJiVAQFAmJVBQJiVgUCYlcJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAVgJAJQKAgUDbmlsCQCcCgoIBQJjRwJfMQgFAmNHAl8yCAUCY0cCXzMIBQJjRwJfNAgFAmNHAl81CAUCY0cCXzYIBQJjRwJfNwkApgMBCAUCY0cCXzgIBQJjRwJfOQgFAmNHA18xMAJkegENc3RhdHNSRUFET05MWQAEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJnaAkAkQMCBQJiSwUBcgQCZ2kJAJEDAgUCYksFAXMEAmN6CQCRAwIFAmJLBQF2BAJjQQkAkQMCBQJiSwUBdwQCYkwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYk0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCZ2oICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnawkBAmJ3AQUCZ2gEAmdsCQECYncBBQJnaQQCZ20DCQAAAgUCZ2oAAAkAzAgCBQFlCQDMCAIFAWUJAMwIAgUBZQUDbmlsCQECYkkDBQJnawUCZ2wFAmdqBAJjaAAABAJnbgkBAUcCCQCRAwIFAmdtAAEFAWIEAmdvCQEBRwIJAJEDAgUCZ20AAgUBYgQCZ3AJAQV2YWx1ZQEJAJoIAgUCYUoJAQJhdQEJAKUIAQUEdGhpcwkAlAoCBQNuaWwJALkJAgkAzAgCAg4lZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmdrCQDMCAIJAKQDAQUCZ2wJAMwIAgkApAMBBQJnagkAzAgCCQCkAwEFAmNoCQDMCAIJAKQDAQUCZ24JAMwIAgkApAMBBQJnbwkAzAgCCQCkAwEFAmdwBQNuaWwFAWoCZHoBIGV2YWx1YXRlUHV0QnlBbW91bnRBc3NldFJFQURPTkxZAQJjcgQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmN4CQCRAwIFAmJLBQFyBAJiWQkA2QQBBQJjeAQCY3kJAJEDAgUCYksFAXMEAmJaCQDZBAEFAmN5BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCZ2oICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJnawkBAmJ3AQUCY3gEAmdsCQECYncBBQJjeQQCYkcJAQFEAgUCZ2sFAmJMBAJiSAkBAUQCBQJnbAUCYk0EAmNnAwkAAAIFAmdqAAAFAWUJAQJieQIFAmJIBQJiRwQCY0QJAQFEAgUCY3IFAmJMBAJjRQkAvAIDBQJjRAUCY2cFAWQEAmN0CQEBRwIFAmNFBQJiTQQCZEYJAQJjcAkCAACgwh4FAmNyBQJiWQUCY3QFAmJaAgAGBwQCY08IBQJkRgJfMQQCZ3EIBQJkRgJfMwQCY2MIBQJkRgJfNAQCY2UIBQJkRgJfNQQCY2IIBQJkRgJfNgkAlAoCBQNuaWwJALkJAgkAzAgCAhAlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCY08JAMwIAgkApAMBCQEBRwIFAmNnBQFiCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIFAmNhCQDMCAIJAKQDAQUCY3IJAMwIAgkApAMBBQJjdAUDbmlsBQFqAmR6AR9ldmFsdWF0ZVB1dEJ5UHJpY2VBc3NldFJFQURPTkxZAQJjdAQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmN4CQCRAwIFAmJLBQFyBAJiWQkA2QQBBQJjeAQCY3kJAJEDAgUCYksFAXMEAmJaCQDZBAEFAmN5BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCZ2oICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJncgkBAmJ3AQUCY3gEAmdzCQECYncBBQJjeQQCZ3QJAQFEAgUCZ3IFAmJMBAJndQkBAUQCBQJncwUCYk0EAmNnAwkAAAIFAmdqAAAFAWUJAQJieQIFAmd1BQJndAQCY0UJAQFEAgUCY3QFAmJNBAJjRAkAvAIDBQJjRQUBZAUCY2cEAmNyCQEBRwIFAmNEBQJiTAQCZEYJAQJjcAkCAACgwh4FAmNyBQJiWQUCY3QFAmJaAgAGBwQCY08IBQJkRgJfMQQCZ3EIBQJkRgJfMwQCY2MIBQJkRgJfNAQCY2UIBQJkRgJfNQQCY2IIBQJkRgJfNgkAlAoCBQNuaWwJALkJAgkAzAgCAhAlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCY08JAMwIAgkApAMBCQEBRwIFAmNnBQFiCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIFAmNhCQDMCAIJAKQDAQUCY3IJAMwIAgkApAMBBQJjdAUDbmlsBQFqAmR6ARNldmFsdWF0ZUdldFJFQURPTkxZAgJndgJndwQCY0cJAQJiVAQCAAUCZ3YFAmd3BQR0aGlzBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjYwgFAmNHAl81BAJjZQgFAmNHAl82BAJjYggFAmNHAl83BAJjaAgFAmNHAl84BAJjYQkBDXBhcnNlSW50VmFsdWUBCAUCY0cCXzkJAJQKAgUDbmlsCQC5CQIJAMwIAgIOJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJjbQkAzAgCCQCkAwEFAmNuCQDMCAIJAKQDAQUCY2MJAMwIAgkApAMBBQJjZQkAzAgCCQCkAwEFAmNiCQDMCAIJAKYDAQUCY2gJAMwIAgkApAMBBQJjYQUDbmlsBQFqAQJneAECZ3kABAJnegQCZEsJAQJlTQADCQABAgUCZEsCCkJ5dGVWZWN0b3IEAmVRBQJkSwUCZVEDCQABAgUCZEsCBFVuaXQIBQJneA9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgQCZEsFAmd4AwkAAQIFAmRLAgVPcmRlcgQCZHAFAmRLBAJnQQkBAmFNAAQCYXoJAQJkbwEFAmRwBAJhQQkA9AMDCAUCZHAJYm9keUJ5dGVzCQCRAwIIBQJkcAZwcm9vZnMAAAgFAmRwD3NlbmRlclB1YmxpY0tleQQCYUIJAPQDAwgFAmRwCWJvZHlCeXRlcwkAkQMCCAUCZHAGcHJvb2ZzAAEFAmdBAwMDBQJhegUCYUEHBQJhQgcGCQECYXkDBQJhegUCYUEFAmFCAwkAAQIFAmRLAhRTZXRTY3JpcHRUcmFuc2FjdGlvbgQCZU4FAmRLBAJnQgkA9gMBCQEFdmFsdWUBCAUCZU4Gc2NyaXB0BAJnQwkA2wQBCQEFdmFsdWUBCQCdCAIFAmFKCQECYXcABAJnRAkA8QcBBQR0aGlzAwMJAAACBQJnQwUCZ0IJAQIhPQIFAmdEBQJnQgcGCQD0AwMIBQJneAlib2R5Qnl0ZXMJAJEDAggFAmd4BnByb29mcwAABQJnegkA9AMDCAUCZ3gJYm9keUJ5dGVzCQCRAwIIBQJneAZwcm9vZnMAAAUCZ3oAsH45", "chainId": 84, "height": 2348589, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: J2pmBkBmb2ijAdNMdctgwyWcLkJg3BJvXjt8yWyKS686 Next: Do2bCiAsuS9CRmhyuVBwSDPq54rDgWKwGobWo157NxU8 Diff:
OldNewDifferences
379379 }
380380
381381
382+func calcCurrentKLp (amountAssetDelta,priceAssetDelta,lpAssetEmissionDelta) = {
383+ let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amountAssetDelta)
384+ let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - priceAssetDelta)
385+ let lpAssetEmission = (toBigInt(value(assetInfo(cfgLpAssetId)).quantity) - lpAssetEmissionDelta)
386+ let currentKLp = calcKLp(amountAssetBalance, priceAssetBalance, lpAssetEmission)
387+ currentKLp
388+ }
389+
390+
382391 func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
383392 let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
384393 let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
389398 }
390399
391400
392-func validateUpdatedKLp (updatedKLp) = {
393- let amountAssetBalance = getAccBalance(assetIdToString(cfgAmountAssetId))
394- let priceAssetBalance = getAccBalance(assetIdToString(cfgPriceAssetId))
395- let lpAssetEmission = value(assetInfo(cfgLpAssetId)).quantity
396- let currentKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
397- if ((updatedKLp >= currentKLp))
398- then true
399- else throwErr("updated KLp lower than current KLp")
400- }
401+func validateUpdatedKLp (oldKLp,updatedKLp) = if ((updatedKLp >= oldKLp))
402+ then true
403+ else throwErr("updated KLp lower than current KLp")
401404
402405
403406 func validateMatcherOrderAllowed (order) = {
404407 let amountAssetAmount = order.amount
405408 let priceAssetAmount = fraction(order.amount, order.price, scale8)
406- let $t02002520237 = if ((order.orderType == Buy))
409+ let $t02021820430 = if ((order.orderType == Buy))
407410 then $Tuple2(amountAssetAmount, -(priceAssetAmount))
408411 else $Tuple2(-(amountAssetAmount), priceAssetAmount)
409- let amountAssetBalanceDelta = $t02002520237._1
410- let priceAssetBalanceDelta = $t02002520237._2
412+ let amountAssetBalanceDelta = $t02021820430._1
413+ let priceAssetBalanceDelta = $t02021820430._2
411414 if (if (if (isGlobalShutdown())
412415 then true
413416 else (cfgPoolStatus == PoolMatcherDisabled))
420423 then throw("Wrong order assets.")
421424 else {
422425 let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
423- let $t02070820808 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
424- let unusedActions = $t02070820808._1
425- let kLpNew = $t02070820808._2
426+ let $t02090121001 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
427+ let unusedActions = $t02090121001._1
428+ let kLpNew = $t02090121001._2
426429 let isOrderValid = (kLpNew > kLp)
427430 isOrderValid
428431 }
498501 else if ((paymentAssetId == cfgPriceAssetId))
499502 then false
500503 else throwErr("invalid asset")
501- let $t02349223785 = if (isEval)
504+ let $t02368523978 = if (isEval)
502505 then $Tuple2(amountBalanceRaw, priceBalanceRaw)
503506 else if (paymentInAmountAsset)
504507 then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
505508 else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
506- let amountBalanceOld = $t02349223785._1
507- let priceBalanceOld = $t02349223785._2
508- let $t02378923938 = if (paymentInAmountAsset)
509+ let amountBalanceOld = $t02368523978._1
510+ let priceBalanceOld = $t02368523978._2
511+ let $t02398224131 = if (paymentInAmountAsset)
509512 then $Tuple2(paymentAmountRaw, 0)
510513 else $Tuple2(0, paymentAmountRaw)
511- let amountAssetAmountRaw = $t02378923938._1
512- let priceAssetAmountRaw = $t02378923938._2
514+ let amountAssetAmountRaw = $t02398224131._1
515+ let priceAssetAmountRaw = $t02398224131._2
513516 let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
514517 let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
515- let $t02406024119 = takeFee(paymentAmountRaw)
516- let paymentAmount = $t02406024119._1
517- let feeAmount = $t02406024119._2
518+ let $t02425324312 = takeFee(paymentAmountRaw)
519+ let paymentAmount = $t02425324312._1
520+ let feeAmount = $t02425324312._2
518521 let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
519522 let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
520523 let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
537540 let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
538541 let priceOld = fromX18(priceOldX18, scale8)
539542 let loss = {
540- let $t02559625763 = if (paymentInAmountAsset)
543+ let $t02578925956 = if (paymentInAmountAsset)
541544 then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
542545 else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
543- let amount = $t02559625763._1
544- let balance = $t02559625763._2
546+ let amount = $t02578925956._1
547+ let balance = $t02578925956._2
545548 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
546549 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
547550 }
575578 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
576579 let redeemedBigInt = toBigInt(paymentAmount)
577580 let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
578- let $t02736527415 = takeFee(amountRaw)
579- let totalAmount = $t02736527415._1
580- let feeAmount = $t02736527415._2
581- let $t02741927645 = if (outInAmountAsset)
581+ let $t02755827608 = takeFee(amountRaw)
582+ let totalAmount = $t02755827608._1
583+ let feeAmount = $t02755827608._2
584+ let $t02761227838 = if (outInAmountAsset)
582585 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
583586 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
584- let outAmAmount = $t02741927645._1
585- let outPrAmount = $t02741927645._2
586- let amBalanceNew = $t02741927645._3
587- let prBalanceNew = $t02741927645._4
587+ let outAmAmount = $t02761227838._1
588+ let outPrAmount = $t02761227838._2
589+ let amBalanceNew = $t02761227838._3
590+ let prBalanceNew = $t02761227838._4
588591 let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
589592 let priceNew = fromX18(priceNewX18, scale8)
590593 let commonState = if (isEval)
696699 let prDiff = estPut._11
697700 let amId = estPut._12
698701 let prId = estPut._13
699- let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
700- if ((emitInv == emitInv))
702+ let amAssetPmt = toBigInt(value(i.payments[0]).amount)
703+ let prAssetPmt = toBigInt(value(i.payments[1]).amount)
704+ let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
705+ if ((currentKLp == currentKLp))
701706 then {
702- let emitInvLegacy = match emitInv {
703- case legacyFactoryContract: Address =>
704- invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
705- case _ =>
706- unit
707- }
708- if ((emitInvLegacy == emitInvLegacy))
707+ let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
708+ if ((emitInv == emitInv))
709709 then {
710- let slippageAInv = if ((amDiff > 0))
711- then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
712- else nil
713- if ((slippageAInv == slippageAInv))
710+ let emitInvLegacy = match emitInv {
711+ case legacyFactoryContract: Address =>
712+ invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
713+ case _ =>
714+ unit
715+ }
716+ if ((emitInvLegacy == emitInvLegacy))
714717 then {
715- let slippagePInv = if ((prDiff > 0))
716- then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
718+ let slippageAInv = if ((amDiff > 0))
719+ then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
717720 else nil
718- if ((slippagePInv == slippagePInv))
721+ if ((slippageAInv == slippageAInv))
719722 then {
720- let lpTransfer = if (shouldAutoStake)
723+ let slippagePInv = if ((prDiff > 0))
724+ then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
725+ else nil
726+ if ((slippagePInv == slippagePInv))
721727 then {
722- let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
723- if ((slpStakeInv == slpStakeInv))
724- then nil
728+ let lpTransfer = if (shouldAutoStake)
729+ then {
730+ let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
731+ if ((slpStakeInv == slpStakeInv))
732+ then nil
733+ else throw("Strict value is not equal to itself.")
734+ }
735+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
736+ let $t03199032055 = refreshKLpInternal(0, 0, 0)
737+ let refreshKLpActions = $t03199032055._1
738+ let updatedKLp = $t03199032055._2
739+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
740+ if ((isUpdatedKLpValid == isUpdatedKLpValid))
741+ then ((state ++ lpTransfer) ++ refreshKLpActions)
725742 else throw("Strict value is not equal to itself.")
726743 }
727- else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
728- let $t03159631661 = refreshKLpInternal(0, 0, 0)
729- let refreshKLpActions = $t03159631661._1
730- let updatedKLp = $t03159631661._2
731- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
732- if ((isUpdatedKLpValid == isUpdatedKLpValid))
733- then ((state ++ lpTransfer) ++ refreshKLpActions)
734744 else throw("Strict value is not equal to itself.")
735745 }
736746 else throw("Strict value is not equal to itself.")
750760 else {
751761 let estPut = commonPut(i, maxSlippage, false)
752762 let state = estPut._9
753- let $t03201032075 = refreshKLpInternal(0, 0, 0)
754- let refreshKLpActions = $t03201032075._1
755- let updatedKLp = $t03201032075._2
756- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
757- if ((isUpdatedKLpValid == isUpdatedKLpValid))
758- then (state ++ refreshKLpActions)
763+ let amAssetPmt = toBigInt(value(i.payments[0]).amount)
764+ let prAssetPmt = toBigInt(value(i.payments[1]).amount)
765+ let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
766+ if ((currentKLp == currentKLp))
767+ then {
768+ let $t03261732682 = refreshKLpInternal(0, 0, 0)
769+ let refreshKLpActions = $t03261732682._1
770+ let updatedKLp = $t03261732682._2
771+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
772+ if ((isUpdatedKLpValid == isUpdatedKLpValid))
773+ then (state ++ refreshKLpActions)
774+ else throw("Strict value is not equal to itself.")
775+ }
759776 else throw("Strict value is not equal to itself.")
760777 }
761778
788805 let payment = i.payments[0]
789806 let paymentAssetId = payment.assetId
790807 let paymentAmountRaw = payment.amount
808+ let currentKLp = if ((paymentAssetId == cfgAmountAssetId))
809+ then calcCurrentKLp(toBigInt(paymentAmountRaw), toBigInt(0), toBigInt(0))
810+ else if ((paymentAssetId == cfgPriceAssetId))
811+ then calcCurrentKLp(toBigInt(0), toBigInt(paymentAmountRaw), toBigInt(0))
812+ else throwErr("payment asset is not supported")
791813 let userAddress = i.caller
792814 let txId = i.transactionId
793- let $t03291333065 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
794- if (($t03291333065 == $t03291333065))
815+ let $t03386734019 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
816+ if (($t03386734019 == $t03386734019))
795817 then {
796- let paymentInAmountAsset = $t03291333065._5
797- let bonus = $t03291333065._4
798- let feeAmount = $t03291333065._3
799- let commonState = $t03291333065._2
800- let emitAmountEstimated = $t03291333065._1
818+ let paymentInAmountAsset = $t03386734019._5
819+ let bonus = $t03386734019._4
820+ let feeAmount = $t03386734019._3
821+ let commonState = $t03386734019._2
822+ let emitAmountEstimated = $t03386734019._1
801823 let emitAmount = if (if ((minOutAmount > 0))
802824 then (minOutAmount > emitAmountEstimated)
803825 else false)
817839 let sendFee = if ((feeAmount > 0))
818840 then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
819841 else nil
820- let $t03365133848 = if ((this == feeCollectorAddress))
842+ let $t03460534802 = if ((this == feeCollectorAddress))
821843 then $Tuple2(0, 0)
822844 else if (paymentInAmountAsset)
823845 then $Tuple2(-(feeAmount), 0)
824846 else $Tuple2(0, -(feeAmount))
825- let amountAssetBalanceDelta = $t03365133848._1
826- let priceAssetBalanceDelta = $t03365133848._2
827- let $t03385133959 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
828- let refreshKLpActions = $t03385133959._1
829- let updatedKLp = $t03385133959._2
830- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
847+ let amountAssetBalanceDelta = $t03460534802._1
848+ let priceAssetBalanceDelta = $t03460534802._2
849+ let $t03480534913 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
850+ let refreshKLpActions = $t03480534913._1
851+ let updatedKLp = $t03480534913._2
852+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
831853 if ((isUpdatedKLpValid == isUpdatedKLpValid))
832854 then $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
833855 else throw("Strict value is not equal to itself.")
843865
844866 @Callable(i)
845867 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
846- let $t03421334370 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
847- let emitAmountEstimated = $t03421334370._1
848- let commonState = $t03421334370._2
849- let feeAmount = $t03421334370._3
850- let bonus = $t03421334370._4
851- let paymentInAmountAsset = $t03421334370._5
868+ let $t03517935336 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
869+ let emitAmountEstimated = $t03517935336._1
870+ let commonState = $t03517935336._2
871+ let feeAmount = $t03517935336._3
872+ let bonus = $t03517935336._4
873+ let paymentInAmountAsset = $t03517935336._5
852874 $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
853875 }
854876
880902 let payment = i.payments[0]
881903 let paymentAssetId = payment.assetId
882904 let paymentAmount = payment.amount
905+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(paymentAmount))
883906 let userAddress = i.caller
884907 let txId = i.transactionId
885- let $t03517535328 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
886- if (($t03517535328 == $t03517535328))
908+ let $t03623036383 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
909+ if (($t03623036383 == $t03623036383))
887910 then {
888- let outInAmountAsset = $t03517535328._5
889- let bonus = $t03517535328._4
890- let feeAmount = $t03517535328._3
891- let commonState = $t03517535328._2
892- let amountEstimated = $t03517535328._1
911+ let outInAmountAsset = $t03623036383._5
912+ let bonus = $t03623036383._4
913+ let feeAmount = $t03623036383._3
914+ let commonState = $t03623036383._2
915+ let amountEstimated = $t03623036383._1
893916 let amount = if (if ((minOutAmount > 0))
894917 then (minOutAmount > amountEstimated)
895918 else false)
902925 let sendFee = if ((feeAmount > 0))
903926 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
904927 else nil
905- let $t03582836075 = {
928+ let $t03688337130 = {
906929 let feeAmountForCalc = if ((this == feeCollectorAddress))
907930 then 0
908931 else feeAmount
910933 then $Tuple2(-((amount + feeAmountForCalc)), 0)
911934 else $Tuple2(0, -((amount + feeAmountForCalc)))
912935 }
913- let amountAssetBalanceDelta = $t03582836075._1
914- let priceAssetBalanceDelta = $t03582836075._2
915- let $t03607836186 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
916- let refreshKLpActions = $t03607836186._1
917- let updatedKLp = $t03607836186._2
918- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
936+ let amountAssetBalanceDelta = $t03688337130._1
937+ let priceAssetBalanceDelta = $t03688337130._2
938+ let $t03713337241 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
939+ let refreshKLpActions = $t03713337241._1
940+ let updatedKLp = $t03713337241._2
941+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
919942 if ((isUpdatedKLpValid == isUpdatedKLpValid))
920943 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
921944 else throw("Strict value is not equal to itself.")
931954
932955 @Callable(i)
933956 func getOneTknREADONLY (outAssetId,paymentAmount) = {
934- let $t03643136587 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
935- let amountEstimated = $t03643136587._1
936- let commonState = $t03643136587._2
937- let feeAmount = $t03643136587._3
938- let bonus = $t03643136587._4
939- let outInAmountAsset = $t03643136587._5
957+ let $t03749837654 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
958+ let amountEstimated = $t03749837654._1
959+ let commonState = $t03749837654._2
960+ let feeAmount = $t03749837654._3
961+ let bonus = $t03749837654._4
962+ let outInAmountAsset = $t03749837654._5
940963 $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
941964 }
942965
967990 let outAssetId = parseAssetId(outAssetIdStr)
968991 let userAddress = i.caller
969992 let txId = i.transactionId
993+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
970994 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
971995 if ((unstakeInv == unstakeInv))
972996 then {
973- let $t03741237563 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
974- if (($t03741237563 == $t03741237563))
997+ let $t03855638707 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
998+ if (($t03855638707 == $t03855638707))
975999 then {
976- let outInAmountAsset = $t03741237563._5
977- let bonus = $t03741237563._4
978- let feeAmount = $t03741237563._3
979- let commonState = $t03741237563._2
980- let amountEstimated = $t03741237563._1
1000+ let outInAmountAsset = $t03855638707._5
1001+ let bonus = $t03855638707._4
1002+ let feeAmount = $t03855638707._3
1003+ let commonState = $t03855638707._2
1004+ let amountEstimated = $t03855638707._1
9811005 let amount = if (if ((minOutAmount > 0))
9821006 then (minOutAmount > amountEstimated)
9831007 else false)
9901014 let sendFee = if ((feeAmount > 0))
9911015 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
9921016 else nil
993- let $t03805838305 = {
1017+ let $t03920239449 = {
9941018 let feeAmountForCalc = if ((this == feeCollectorAddress))
9951019 then 0
9961020 else feeAmount
9981022 then $Tuple2(-((amount + feeAmountForCalc)), 0)
9991023 else $Tuple2(0, -((amount + feeAmountForCalc)))
10001024 }
1001- let amountAssetBalanceDelta = $t03805838305._1
1002- let priceAssetBalanceDelta = $t03805838305._2
1003- let $t03830838416 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1004- let refreshKLpActions = $t03830838416._1
1005- let updatedKLp = $t03830838416._2
1006- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1025+ let amountAssetBalanceDelta = $t03920239449._1
1026+ let priceAssetBalanceDelta = $t03920239449._2
1027+ let $t03945239560 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1028+ let refreshKLpActions = $t03945239560._1
1029+ let updatedKLp = $t03945239560._2
1030+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10071031 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10081032 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
10091033 else throw("Strict value is not equal to itself.")
10271051 let pmtAmt = res._3
10281052 let pmtAssetId = res._4
10291053 let state = res._5
1054+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10301055 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10311056 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10321057 then {
1033- let $t03926939351 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1034- let refreshKLpActions = $t03926939351._1
1035- let updatedKLp = $t03926939351._2
1036- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1058+ let $t04050840590 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1059+ let refreshKLpActions = $t04050840590._1
1060+ let updatedKLp = $t04050840590._2
1061+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10371062 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10381063 then (state ++ refreshKLpActions)
10391064 else throw("Strict value is not equal to itself.")
10561081 else if ((noLessThenPriceAsset > outPrAmt))
10571082 then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
10581083 else {
1084+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10591085 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10601086 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10611087 then {
1062- let $t04020840289 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1063- let refreshKLpActions = $t04020840289._1
1064- let updatedKLp = $t04020840289._2
1065- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1088+ let $t04154141622 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1089+ let refreshKLpActions = $t04154141622._1
1090+ let updatedKLp = $t04154141622._2
1091+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10661092 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10671093 then (state ++ refreshKLpActions)
10681094 else throw("Strict value is not equal to itself.")
10821108 then {
10831109 let cfg = getPoolConfig()
10841110 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
1111+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
10851112 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
10861113 if ((unstakeInv == unstakeInv))
10871114 then {
11001127 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
11011128 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11021129 then {
1103- let $t04132341404 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1104- let refreshKLpActions = $t04132341404._1
1105- let updatedKLp = $t04132341404._2
1106- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1130+ let $t04274542826 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1131+ let refreshKLpActions = $t04274542826._1
1132+ let updatedKLp = $t04274542826._2
1133+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11071134 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11081135 then (state ++ refreshKLpActions)
11091136 else throw("Strict value is not equal to itself.")
11311158 else throw("no payments are expected")]
11321159 if ((checks == checks))
11331160 then {
1161+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
11341162 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
11351163 if ((unstakeInv == unstakeInv))
11361164 then {
11481176 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11491177 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11501178 then {
1151- let $t04260742688 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1152- let refreshKLpActions = $t04260742688._1
1153- let updatedKLp = $t04260742688._2
1154- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1179+ let $t04411844199 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1180+ let refreshKLpActions = $t04411844199._1
1181+ let updatedKLp = $t04411844199._2
1182+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11551183 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11561184 then (state ++ refreshKLpActions)
11571185 else throw("Strict value is not equal to itself.")
11831211 if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
11841212 then {
11851213 let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp"))
1186- let $t04386343927 = refreshKLpInternal(0, 0, 0)
1187- let kLpUpdateActions = $t04386343927._1
1188- let updatedKLp = $t04386343927._2
1214+ let $t04538645450 = refreshKLpInternal(0, 0, 0)
1215+ let kLpUpdateActions = $t04538645450._1
1216+ let updatedKLp = $t04538645450._2
11891217 let actions = if ((kLp != updatedKLp))
11901218 then kLpUpdateActions
11911219 else throwErr("nothing to refresh")
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let lPdecimals = 8
55
66 let scale8 = 100000000
77
88 let scale8BigInt = toBigInt(100000000)
99
1010 let scale18 = toBigInt(1000000000000000000)
1111
1212 let zeroBigInt = toBigInt(0)
1313
1414 let big0 = toBigInt(0)
1515
1616 let big1 = toBigInt(1)
1717
1818 let big2 = toBigInt(2)
1919
2020 let wavesString = "WAVES"
2121
2222 let SEP = "__"
2323
2424 let PoolActive = 1
2525
2626 let PoolPutDisabled = 2
2727
2828 let PoolMatcherDisabled = 3
2929
3030 let PoolShutdown = 4
3131
3232 let idxPoolAddress = 1
3333
3434 let idxPoolStatus = 2
3535
3636 let idxPoolLPAssetId = 3
3737
3838 let idxAmtAssetId = 4
3939
4040 let idxPriceAssetId = 5
4141
4242 let idxAmtAssetDcm = 6
4343
4444 let idxPriceAssetDcm = 7
4545
4646 let idxIAmtAssetId = 8
4747
4848 let idxIPriceAssetId = 9
4949
5050 let idxLPAssetDcm = 10
5151
5252 let idxPoolAmtAssetAmt = 1
5353
5454 let idxPoolPriceAssetAmt = 2
5555
5656 let idxPoolLPAssetAmt = 3
5757
5858 let idxFactoryStakingContract = 1
5959
6060 let idxFactorySlippageContract = 7
6161
6262 func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
6363
6464
6565 func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
6666
6767
6868 func toScale (amt,resScale,curScale) = fraction(amt, resScale, curScale)
6969
7070
7171 func abs (val) = if ((0 > val))
7272 then -(val)
7373 else val
7474
7575
7676 func absBigInt (val) = if ((zeroBigInt > val))
7777 then -(val)
7878 else val
7979
8080
8181 func fc () = "%s__factoryContract"
8282
8383
8484 func mpk () = "%s__managerPublicKey"
8585
8686
8787 func pmpk () = "%s__pendingManagerPublicKey"
8888
8989
9090 func pl () = "%s%s__price__last"
9191
9292
9393 func ph (h,timestamp) = makeString(["%s%s%d%d__price__history", toString(h), toString(timestamp)], SEP)
9494
9595
9696 func pau (userAddress,txId) = ((("%s%s%s__P__" + userAddress) + "__") + txId)
9797
9898
9999 func gau (userAddress,txId) = ((("%s%s%s__G__" + userAddress) + "__") + txId)
100100
101101
102102 func aa () = "%s__amountAsset"
103103
104104
105105 func pa () = "%s__priceAsset"
106106
107107
108108 let keyFee = "%s__fee"
109109
110110 let feeDefault = fraction(10, scale8, 10000)
111111
112112 let fee = valueOrElse(getInteger(this, keyFee), feeDefault)
113113
114114 let keyKLp = makeString(["%s", "kLp"], SEP)
115115
116116 let keyKLpRefreshedHeight = makeString(["%s", "kLpRefreshedHeight"], SEP)
117117
118118 let keyKLpRefreshDelay = makeString(["%s", "refreshKLpDelay"], SEP)
119119
120120 let kLpRefreshDelayDefault = 30
121121
122122 let kLpRefreshDelay = valueOrElse(getInteger(this, keyKLpRefreshDelay), kLpRefreshDelayDefault)
123123
124124 func keyFactoryConfig () = "%s__factoryConfig"
125125
126126
127127 func keyMatcherPub () = "%s%s__matcher__publicKey"
128128
129129
130130 func keyMappingPoolContractAddressToPoolAssets (poolContractAddress) = (("%s%s%s__" + poolContractAddress) + "__mappings__poolContract2LpAsset")
131131
132132
133133 func keyPoolConfig (iAmtAsset,iPriceAsset) = (((("%d%d%s__" + iAmtAsset) + "__") + iPriceAsset) + "__config")
134134
135135
136136 func keyMappingsBaseAsset2internalId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2internalId__" + baseAssetStr)
137137
138138
139139 func keyAllPoolsShutdown () = "%s__shutdown"
140140
141141
142142 func keyPoolWeight (contractAddress) = ("%s%s__poolWeight__" + contractAddress)
143143
144144
145145 func keyAllowedLpScriptHash () = "%s__allowedLpScriptHash"
146146
147147
148148 let keyFeeCollectorAddress = "%s__feeCollectorAddress"
149149
150150 func throwOrderError (orderValid,senderValid,matcherValid) = throw(((((("order validation failed: orderValid=" + toString(orderValid)) + " senderValid=") + toString(senderValid)) + " matcherValid=") + toString(matcherValid)))
151151
152152
153153 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
154154
155155
156156 func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
157157
158158
159159 func throwErr (msg) = throw(makeString(["lp.ride:", msg], " "))
160160
161161
162162 func fmtErr (msg) = makeString(["lp.ride:", msg], " ")
163163
164164
165165 let factoryContract = addressFromStringValue(getStringOrFail(this, fc()))
166166
167167 let feeCollectorAddress = addressFromStringValue(getStringOrFail(factoryContract, keyFeeCollectorAddress))
168168
169169 func isGlobalShutdown () = valueOrElse(getBoolean(factoryContract, keyAllPoolsShutdown()), false)
170170
171171
172172 func getMatcherPubOrFail () = fromBase58String(getStringOrFail(factoryContract, keyMatcherPub()))
173173
174174
175175 func getPoolConfig () = {
176176 let amtAsset = getStringOrFail(this, aa())
177177 let priceAsset = getStringOrFail(this, pa())
178178 let iPriceAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(priceAsset))
179179 let iAmtAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(amtAsset))
180180 split(getStringOrFail(factoryContract, keyPoolConfig(toString(iAmtAsset), toString(iPriceAsset))), SEP)
181181 }
182182
183183
184184 func parseAssetId (input) = if ((input == wavesString))
185185 then unit
186186 else fromBase58String(input)
187187
188188
189189 func assetIdToString (input) = if ((input == unit))
190190 then wavesString
191191 else toBase58String(value(input))
192192
193193
194194 func parsePoolConfig (poolConfig) = $Tuple7(addressFromStringValue(poolConfig[idxPoolAddress]), parseIntValue(poolConfig[idxPoolStatus]), fromBase58String(poolConfig[idxPoolLPAssetId]), parseAssetId(poolConfig[idxAmtAssetId]), parseAssetId(poolConfig[idxPriceAssetId]), parseIntValue(poolConfig[idxAmtAssetDcm]), parseIntValue(poolConfig[idxPriceAssetDcm]))
195195
196196
197197 let poolConfigParsed = parsePoolConfig(getPoolConfig())
198198
199199 let $t079158081 = poolConfigParsed
200200
201201 let cfgPoolAddress = $t079158081._1
202202
203203 let cfgPoolStatus = $t079158081._2
204204
205205 let cfgLpAssetId = $t079158081._3
206206
207207 let cfgAmountAssetId = $t079158081._4
208208
209209 let cfgPriceAssetId = $t079158081._5
210210
211211 let cfgAmountAssetDecimals = $t079158081._6
212212
213213 let cfgPriceAssetDecimals = $t079158081._7
214214
215215 func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP)
216216
217217
218218 let stakingContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactoryStakingContract]), "incorrect staking address")
219219
220220 let slippageContract = valueOrErrorMessage(addressFromString(getFactoryConfig()[idxFactorySlippageContract]), "incorrect staking address")
221221
222222 func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slippageTolerancePassedByUser,slippageToleranceReal,txHeight,txTimestamp,slipageAmtAssetAmt,slipagePriceAssetAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slippageTolerancePassedByUser), toString(slippageToleranceReal), toString(txHeight), toString(txTimestamp), toString(slipageAmtAssetAmt), toString(slipagePriceAssetAmt)], SEP)
223223
224224
225225 func dataGetActionInfo (outAmtAssetAmt,outPriceAssetAmt,inLpAmt,price,txHeight,txTimestamp) = makeString(["%d%d%d%d%d%d", toString(outAmtAssetAmt), toString(outPriceAssetAmt), toString(inLpAmt), toString(price), toString(txHeight), toString(txTimestamp)], SEP)
226226
227227
228228 func getAccBalance (assetId) = if ((assetId == "WAVES"))
229229 then wavesBalance(this).available
230230 else assetBalance(this, fromBase58String(assetId))
231231
232232
233233 func calcPriceBigInt (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
234234
235235
236236 func privateCalcPrice (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
237237 let amtAssetAmtX18 = toX18(amAmt, amAssetDcm)
238238 let priceAssetAmtX18 = toX18(prAmt, prAssetDcm)
239239 calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
240240 }
241241
242242
243243 func calcPrices (amAmt,prAmt,lpAmt) = {
244244 let cfg = getPoolConfig()
245245 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
246246 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
247247 let priceX18 = privateCalcPrice(amtAssetDcm, priceAssetDcm, amAmt, prAmt)
248248 let amAmtX18 = toX18(amAmt, amtAssetDcm)
249249 let prAmtX18 = toX18(prAmt, priceAssetDcm)
250250 let lpAmtX18 = toX18(lpAmt, scale8)
251251 let lpPriceInAmAssetX18 = calcPriceBigInt(amAmtX18, lpAmtX18)
252252 let lpPriceInPrAssetX18 = calcPriceBigInt(prAmtX18, lpAmtX18)
253253 [priceX18, lpPriceInAmAssetX18, lpPriceInPrAssetX18]
254254 }
255255
256256
257257 func calculatePrices (amAmt,prAmt,lpAmt) = {
258258 let prices = calcPrices(amAmt, prAmt, lpAmt)
259259 [fromX18(prices[0], scale8), fromX18(prices[1], scale8), fromX18(prices[2], scale8)]
260260 }
261261
262262
263263 func estimateGetOperation (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
264264 let cfg = getPoolConfig()
265265 let lpAssetId = cfg[idxPoolLPAssetId]
266266 let amAssetId = cfg[idxAmtAssetId]
267267 let prAssetId = cfg[idxPriceAssetId]
268268 let amAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
269269 let prAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
270270 let poolStatus = cfg[idxPoolStatus]
271271 let lpEmission = valueOrErrorMessage(assetInfo(fromBase58String(lpAssetId)), (("Asset " + lpAssetId) + " doesn't exist")).quantity
272272 if ((lpAssetId != pmtAssetId))
273273 then throw("Invalid asset passed.")
274274 else {
275275 let amBalance = getAccBalance(amAssetId)
276276 let amBalanceX18 = toX18(amBalance, amAssetDcm)
277277 let prBalance = getAccBalance(prAssetId)
278278 let prBalanceX18 = toX18(prBalance, prAssetDcm)
279279 let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
280280 let curPrice = fromX18(curPriceX18, scale8)
281281 let pmtLpAmtX18 = toX18(pmtLpAmt, scale8)
282282 let lpEmissionX18 = toX18(lpEmission, scale8)
283283 let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissionX18)
284284 let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissionX18)
285285 let outAmAmt = fromX18(outAmAmtX18, amAssetDcm)
286286 let outPrAmt = fromX18(outPrAmtX18, prAssetDcm)
287287 let state = if ((txId58 == ""))
288288 then nil
289289 else [ScriptTransfer(userAddress, outAmAmt, if ((amAssetId == "WAVES"))
290290 then unit
291291 else fromBase58String(amAssetId)), ScriptTransfer(userAddress, outPrAmt, if ((prAssetId == "WAVES"))
292292 then unit
293293 else fromBase58String(prAssetId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice)]
294294 $Tuple10(outAmAmt, outPrAmt, amAssetId, prAssetId, amBalance, prBalance, lpEmission, curPriceX18, poolStatus, state)
295295 }
296296 }
297297
298298
299299 func estimatePutOperation (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = {
300300 let cfg = getPoolConfig()
301301 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
302302 let amAssetIdStr = cfg[idxAmtAssetId]
303303 let prAssetIdStr = cfg[idxPriceAssetId]
304304 let iAmtAssetId = cfg[idxIAmtAssetId]
305305 let iPriceAssetId = cfg[idxIPriceAssetId]
306306 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
307307 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
308308 let poolStatus = cfg[idxPoolStatus]
309309 let lpEmission = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
310310 let inAmAssetIdStr = toBase58String(valueOrElse(inAmAssetId, fromBase58String("WAVES")))
311311 let inPrAssetIdStr = toBase58String(valueOrElse(inPrAssetId, fromBase58String("WAVES")))
312312 if (if ((amAssetIdStr != inAmAssetIdStr))
313313 then true
314314 else (prAssetIdStr != inPrAssetIdStr))
315315 then throw("Invalid amt or price asset passed.")
316316 else {
317317 let amBalance = if (isEvaluate)
318318 then getAccBalance(amAssetIdStr)
319319 else (getAccBalance(amAssetIdStr) - inAmAssetAmt)
320320 let prBalance = if (isEvaluate)
321321 then getAccBalance(prAssetIdStr)
322322 else (getAccBalance(prAssetIdStr) - inPrAssetAmt)
323323 let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
324324 let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
325325 let userPriceX18 = calcPriceBigInt(inPrAssetAmtX18, inAmAssetAmtX18)
326326 let amBalanceX18 = toX18(amBalance, amtAssetDcm)
327327 let prBalanceX18 = toX18(prBalance, priceAssetDcm)
328328 let res = if ((lpEmission == 0))
329329 then {
330330 let curPriceX18 = zeroBigInt
331331 let slippageX18 = zeroBigInt
332332 let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
333333 $Tuple5(fromX18(lpAmtX18, scale8), fromX18(inAmAssetAmtX18, amtAssetDcm), fromX18(inPrAssetAmtX18, priceAssetDcm), calcPriceBigInt((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
334334 }
335335 else {
336336 let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
337337 let slippageX18 = fraction(absBigInt((curPriceX18 - userPriceX18)), scale18, curPriceX18)
338338 let slippageToleranceX18 = toX18(slippageTolerance, scale8)
339339 if (if ((curPriceX18 != zeroBigInt))
340340 then (slippageX18 > slippageToleranceX18)
341341 else false)
342342 then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18)))
343343 else {
344344 let lpEmissionX18 = toX18(lpEmission, scale8)
345345 let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
346346 let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
347347 let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
348348 then $Tuple2(amViaPrX18, inPrAssetAmtX18)
349349 else $Tuple2(inAmAssetAmtX18, prViaAmX18)
350350 let expAmtAssetAmtX18 = expectedAmts._1
351351 let expPriceAssetAmtX18 = expectedAmts._2
352352 let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
353353 $Tuple5(fromX18(lpAmtX18, scale8), fromX18(expAmtAssetAmtX18, amtAssetDcm), fromX18(expPriceAssetAmtX18, priceAssetDcm), curPriceX18, slippageX18)
354354 }
355355 }
356356 let calcLpAmt = res._1
357357 let calcAmAssetPmt = res._2
358358 let calcPrAssetPmt = res._3
359359 let curPrice = fromX18(res._4, scale8)
360360 let slippageCalc = fromX18(res._5, scale8)
361361 if ((0 >= calcLpAmt))
362362 then throw("Invalid calculations. LP calculated is less than zero.")
363363 else {
364364 let emitLpAmt = if (!(emitLp))
365365 then 0
366366 else calcLpAmt
367367 let amDiff = (inAmAssetAmt - calcAmAssetPmt)
368368 let prDiff = (inPrAssetAmt - calcPrAssetPmt)
369369 let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(calcAmAssetPmt, calcPrAssetPmt, emitLpAmt, curPrice, slippageTolerance, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
370370 $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEmission, lpAssetId, poolStatus, commonState, amDiff, prDiff, inAmAssetId, inPrAssetId)
371371 }
372372 }
373373 }
374374
375375
376376 func calcKLp (amountBalance,priceBalance,lpEmission) = {
377377 let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 0, DOWN), scale18, lpEmission)
378378 updatedKLp
379379 }
380380
381381
382+func calcCurrentKLp (amountAssetDelta,priceAssetDelta,lpAssetEmissionDelta) = {
383+ let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amountAssetDelta)
384+ let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - priceAssetDelta)
385+ let lpAssetEmission = (toBigInt(value(assetInfo(cfgLpAssetId)).quantity) - lpAssetEmissionDelta)
386+ let currentKLp = calcKLp(amountAssetBalance, priceAssetBalance, lpAssetEmission)
387+ currentKLp
388+ }
389+
390+
382391 func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
383392 let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
384393 let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
385394 let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
386395 let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
387396 let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
388397 $Tuple2(actions, updatedKLp)
389398 }
390399
391400
392-func validateUpdatedKLp (updatedKLp) = {
393- let amountAssetBalance = getAccBalance(assetIdToString(cfgAmountAssetId))
394- let priceAssetBalance = getAccBalance(assetIdToString(cfgPriceAssetId))
395- let lpAssetEmission = value(assetInfo(cfgLpAssetId)).quantity
396- let currentKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
397- if ((updatedKLp >= currentKLp))
398- then true
399- else throwErr("updated KLp lower than current KLp")
400- }
401+func validateUpdatedKLp (oldKLp,updatedKLp) = if ((updatedKLp >= oldKLp))
402+ then true
403+ else throwErr("updated KLp lower than current KLp")
401404
402405
403406 func validateMatcherOrderAllowed (order) = {
404407 let amountAssetAmount = order.amount
405408 let priceAssetAmount = fraction(order.amount, order.price, scale8)
406- let $t02002520237 = if ((order.orderType == Buy))
409+ let $t02021820430 = if ((order.orderType == Buy))
407410 then $Tuple2(amountAssetAmount, -(priceAssetAmount))
408411 else $Tuple2(-(amountAssetAmount), priceAssetAmount)
409- let amountAssetBalanceDelta = $t02002520237._1
410- let priceAssetBalanceDelta = $t02002520237._2
412+ let amountAssetBalanceDelta = $t02021820430._1
413+ let priceAssetBalanceDelta = $t02021820430._2
411414 if (if (if (isGlobalShutdown())
412415 then true
413416 else (cfgPoolStatus == PoolMatcherDisabled))
414417 then true
415418 else (cfgPoolStatus == PoolShutdown))
416419 then throw("Exchange operations disabled")
417420 else if (if ((order.assetPair.amountAsset != cfgAmountAssetId))
418421 then true
419422 else (order.assetPair.priceAsset != cfgPriceAssetId))
420423 then throw("Wrong order assets.")
421424 else {
422425 let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
423- let $t02070820808 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
424- let unusedActions = $t02070820808._1
425- let kLpNew = $t02070820808._2
426+ let $t02090121001 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
427+ let unusedActions = $t02090121001._1
428+ let kLpNew = $t02090121001._2
426429 let isOrderValid = (kLpNew > kLp)
427430 isOrderValid
428431 }
429432 }
430433
431434
432435 func commonGet (i) = if ((size(i.payments) != 1))
433436 then throw("exactly 1 payment is expected")
434437 else {
435438 let pmt = value(i.payments[0])
436439 let pmtAssetId = value(pmt.assetId)
437440 let pmtAmt = pmt.amount
438441 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
439442 let outAmAmt = res._1
440443 let outPrAmt = res._2
441444 let poolStatus = parseIntValue(res._9)
442445 let state = res._10
443446 if (if (isGlobalShutdown())
444447 then true
445448 else (poolStatus == PoolShutdown))
446449 then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
447450 else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
448451 }
449452
450453
451454 func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2))
452455 then throw("exactly 2 payments are expected")
453456 else {
454457 let amAssetPmt = value(i.payments[0])
455458 let prAssetPmt = value(i.payments[1])
456459 let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp)
457460 let poolStatus = parseIntValue(estPut._8)
458461 if (if (if (isGlobalShutdown())
459462 then true
460463 else (poolStatus == PoolPutDisabled))
461464 then true
462465 else (poolStatus == PoolShutdown))
463466 then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus)))
464467 else estPut
465468 }
466469
467470
468471 func emit (amount) = {
469472 let emitInv = invoke(factoryContract, "emit", [amount], nil)
470473 if ((emitInv == emitInv))
471474 then {
472475 let emitInvLegacy = match emitInv {
473476 case legacyFactoryContract: Address =>
474477 invoke(legacyFactoryContract, "emit", [amount], nil)
475478 case _ =>
476479 unit
477480 }
478481 if ((emitInvLegacy == emitInvLegacy))
479482 then amount
480483 else throw("Strict value is not equal to itself.")
481484 }
482485 else throw("Strict value is not equal to itself.")
483486 }
484487
485488
486489 func takeFee (amount) = {
487490 let feeAmount = fraction(amount, fee, scale8)
488491 $Tuple2((amount - feeAmount), feeAmount)
489492 }
490493
491494
492495 func calcPutOneToken (paymentAmountRaw,paymentAssetId,userAddress,txId) = {
493496 let isEval = (txId == unit)
494497 let amountBalanceRaw = getAccBalance(assetIdToString(cfgAmountAssetId))
495498 let priceBalanceRaw = getAccBalance(assetIdToString(cfgPriceAssetId))
496499 let paymentInAmountAsset = if ((paymentAssetId == cfgAmountAssetId))
497500 then true
498501 else if ((paymentAssetId == cfgPriceAssetId))
499502 then false
500503 else throwErr("invalid asset")
501- let $t02349223785 = if (isEval)
504+ let $t02368523978 = if (isEval)
502505 then $Tuple2(amountBalanceRaw, priceBalanceRaw)
503506 else if (paymentInAmountAsset)
504507 then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
505508 else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
506- let amountBalanceOld = $t02349223785._1
507- let priceBalanceOld = $t02349223785._2
508- let $t02378923938 = if (paymentInAmountAsset)
509+ let amountBalanceOld = $t02368523978._1
510+ let priceBalanceOld = $t02368523978._2
511+ let $t02398224131 = if (paymentInAmountAsset)
509512 then $Tuple2(paymentAmountRaw, 0)
510513 else $Tuple2(0, paymentAmountRaw)
511- let amountAssetAmountRaw = $t02378923938._1
512- let priceAssetAmountRaw = $t02378923938._2
514+ let amountAssetAmountRaw = $t02398224131._1
515+ let priceAssetAmountRaw = $t02398224131._2
513516 let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
514517 let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
515- let $t02406024119 = takeFee(paymentAmountRaw)
516- let paymentAmount = $t02406024119._1
517- let feeAmount = $t02406024119._2
518+ let $t02425324312 = takeFee(paymentAmountRaw)
519+ let paymentAmount = $t02425324312._1
520+ let feeAmount = $t02425324312._2
518521 let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
519522 let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
520523 let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
521524 let priceNew = fromX18(priceNewX18, scale8)
522525 let paymentBalance = if (paymentInAmountAsset)
523526 then amountBalanceOld
524527 else priceBalanceOld
525528 let paymentBalanceBigInt = toBigInt(paymentBalance)
526529 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
527530 let chechSupply = if ((supplyBigInt > big0))
528531 then true
529532 else throwErr("initial deposit requires all coins")
530533 if ((chechSupply == chechSupply))
531534 then {
532535 let depositBigInt = toBigInt(paymentAmount)
533536 let issueAmount = max([0, toInt(((supplyBigInt * (sqrtBigInt((scale18 + ((depositBigInt * scale18) / paymentBalanceBigInt)), 18, 18, DOWN) - scale18)) / scale18))])
534537 let commonState = if (isEval)
535538 then nil
536539 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))]
537540 let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
538541 let priceOld = fromX18(priceOldX18, scale8)
539542 let loss = {
540- let $t02559625763 = if (paymentInAmountAsset)
543+ let $t02578925956 = if (paymentInAmountAsset)
541544 then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
542545 else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
543- let amount = $t02559625763._1
544- let balance = $t02559625763._2
546+ let amount = $t02578925956._1
547+ let balance = $t02578925956._2
545548 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
546549 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
547550 }
548551 $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset)
549552 }
550553 else throw("Strict value is not equal to itself.")
551554 }
552555
553556
554557 func calcGetOneToken (outAssetId,paymentAmount,paymentAssetId,userAddress,txId) = {
555558 let isEval = (txId == unit)
556559 let checks = [if ((paymentAssetId == cfgLpAssetId))
557560 then true
558561 else throwErr("invalid lp asset")]
559562 if ((checks == checks))
560563 then {
561564 let outInAmountAsset = if ((outAssetId == cfgAmountAssetId))
562565 then true
563566 else if ((outAssetId == cfgPriceAssetId))
564567 then false
565568 else throwErr("invalid asset")
566569 let balanceBigInt = if (outInAmountAsset)
567570 then toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId)))
568571 else toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId)))
569572 let amBalanceOld = getAccBalance(assetIdToString(cfgAmountAssetId))
570573 let prBalanceOld = getAccBalance(assetIdToString(cfgPriceAssetId))
571574 let outBalance = if (outInAmountAsset)
572575 then amBalanceOld
573576 else prBalanceOld
574577 let outBalanceBigInt = toBigInt(outBalance)
575578 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
576579 let redeemedBigInt = toBigInt(paymentAmount)
577580 let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
578- let $t02736527415 = takeFee(amountRaw)
579- let totalAmount = $t02736527415._1
580- let feeAmount = $t02736527415._2
581- let $t02741927645 = if (outInAmountAsset)
581+ let $t02755827608 = takeFee(amountRaw)
582+ let totalAmount = $t02755827608._1
583+ let feeAmount = $t02755827608._2
584+ let $t02761227838 = if (outInAmountAsset)
582585 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
583586 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
584- let outAmAmount = $t02741927645._1
585- let outPrAmount = $t02741927645._2
586- let amBalanceNew = $t02741927645._3
587- let prBalanceNew = $t02741927645._4
587+ let outAmAmount = $t02761227838._1
588+ let outPrAmount = $t02761227838._2
589+ let amBalanceNew = $t02761227838._3
590+ let prBalanceNew = $t02761227838._4
588591 let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
589592 let priceNew = fromX18(priceNewX18, scale8)
590593 let commonState = if (isEval)
591594 then nil
592595 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)]
593596 let priceOldX18 = calcPriceBigInt(toX18(prBalanceOld, cfgPriceAssetDecimals), toX18(amBalanceOld, cfgAmountAssetDecimals))
594597 let priceOld = fromX18(priceOldX18, scale8)
595598 let loss = {
596599 let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2)
597600 fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset)
598601 }
599602 $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset)
600603 }
601604 else throw("Strict value is not equal to itself.")
602605 }
603606
604607
605608 func managerPublicKeyOrUnit () = match getString(mpk()) {
606609 case s: String =>
607610 fromBase58String(s)
608611 case _: Unit =>
609612 unit
610613 case _ =>
611614 throw("Match error")
612615 }
613616
614617
615618 func pendingManagerPublicKeyOrUnit () = match getString(pmpk()) {
616619 case s: String =>
617620 fromBase58String(s)
618621 case _: Unit =>
619622 unit
620623 case _ =>
621624 throw("Match error")
622625 }
623626
624627
625628 func isManager (i) = match managerPublicKeyOrUnit() {
626629 case pk: ByteVector =>
627630 (i.callerPublicKey == pk)
628631 case _: Unit =>
629632 (i.caller == this)
630633 case _ =>
631634 throw("Match error")
632635 }
633636
634637
635638 func mustManager (i) = {
636639 let pd = throw("Permission denied")
637640 match managerPublicKeyOrUnit() {
638641 case pk: ByteVector =>
639642 if ((i.callerPublicKey == pk))
640643 then true
641644 else pd
642645 case _: Unit =>
643646 if ((i.caller == this))
644647 then true
645648 else pd
646649 case _ =>
647650 throw("Match error")
648651 }
649652 }
650653
651654
652655 @Callable(i)
653656 func setManager (pendingManagerPublicKey) = {
654657 let checkCaller = mustManager(i)
655658 if ((checkCaller == checkCaller))
656659 then {
657660 let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
658661 if ((checkManagerPublicKey == checkManagerPublicKey))
659662 then [StringEntry(pmpk(), pendingManagerPublicKey)]
660663 else throw("Strict value is not equal to itself.")
661664 }
662665 else throw("Strict value is not equal to itself.")
663666 }
664667
665668
666669
667670 @Callable(i)
668671 func confirmManager () = {
669672 let pm = pendingManagerPublicKeyOrUnit()
670673 let hasPM = if (isDefined(pm))
671674 then true
672675 else throw("No pending manager")
673676 if ((hasPM == hasPM))
674677 then {
675678 let checkPM = if ((i.callerPublicKey == value(pm)))
676679 then true
677680 else throw("You are not pending manager")
678681 if ((checkPM == checkPM))
679682 then [StringEntry(mpk(), toBase58String(value(pm))), DeleteEntry(pmpk())]
680683 else throw("Strict value is not equal to itself.")
681684 }
682685 else throw("Strict value is not equal to itself.")
683686 }
684687
685688
686689
687690 @Callable(i)
688691 func put (slippageTolerance,shouldAutoStake) = if ((0 > slippageTolerance))
689692 then throw("Invalid slippageTolerance passed")
690693 else {
691694 let estPut = commonPut(i, slippageTolerance, true)
692695 let emitLpAmt = estPut._2
693696 let lpAssetId = estPut._7
694697 let state = estPut._9
695698 let amDiff = estPut._10
696699 let prDiff = estPut._11
697700 let amId = estPut._12
698701 let prId = estPut._13
699- let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
700- if ((emitInv == emitInv))
702+ let amAssetPmt = toBigInt(value(i.payments[0]).amount)
703+ let prAssetPmt = toBigInt(value(i.payments[1]).amount)
704+ let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
705+ if ((currentKLp == currentKLp))
701706 then {
702- let emitInvLegacy = match emitInv {
703- case legacyFactoryContract: Address =>
704- invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
705- case _ =>
706- unit
707- }
708- if ((emitInvLegacy == emitInvLegacy))
707+ let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
708+ if ((emitInv == emitInv))
709709 then {
710- let slippageAInv = if ((amDiff > 0))
711- then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
712- else nil
713- if ((slippageAInv == slippageAInv))
710+ let emitInvLegacy = match emitInv {
711+ case legacyFactoryContract: Address =>
712+ invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
713+ case _ =>
714+ unit
715+ }
716+ if ((emitInvLegacy == emitInvLegacy))
714717 then {
715- let slippagePInv = if ((prDiff > 0))
716- then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
718+ let slippageAInv = if ((amDiff > 0))
719+ then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
717720 else nil
718- if ((slippagePInv == slippagePInv))
721+ if ((slippageAInv == slippageAInv))
719722 then {
720- let lpTransfer = if (shouldAutoStake)
723+ let slippagePInv = if ((prDiff > 0))
724+ then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
725+ else nil
726+ if ((slippagePInv == slippagePInv))
721727 then {
722- let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
723- if ((slpStakeInv == slpStakeInv))
724- then nil
728+ let lpTransfer = if (shouldAutoStake)
729+ then {
730+ let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
731+ if ((slpStakeInv == slpStakeInv))
732+ then nil
733+ else throw("Strict value is not equal to itself.")
734+ }
735+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
736+ let $t03199032055 = refreshKLpInternal(0, 0, 0)
737+ let refreshKLpActions = $t03199032055._1
738+ let updatedKLp = $t03199032055._2
739+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
740+ if ((isUpdatedKLpValid == isUpdatedKLpValid))
741+ then ((state ++ lpTransfer) ++ refreshKLpActions)
725742 else throw("Strict value is not equal to itself.")
726743 }
727- else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
728- let $t03159631661 = refreshKLpInternal(0, 0, 0)
729- let refreshKLpActions = $t03159631661._1
730- let updatedKLp = $t03159631661._2
731- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
732- if ((isUpdatedKLpValid == isUpdatedKLpValid))
733- then ((state ++ lpTransfer) ++ refreshKLpActions)
734744 else throw("Strict value is not equal to itself.")
735745 }
736746 else throw("Strict value is not equal to itself.")
737747 }
738748 else throw("Strict value is not equal to itself.")
739749 }
740750 else throw("Strict value is not equal to itself.")
741751 }
742752 else throw("Strict value is not equal to itself.")
743753 }
744754
745755
746756
747757 @Callable(i)
748758 func putForFree (maxSlippage) = if ((0 > maxSlippage))
749759 then throw("Invalid value passed")
750760 else {
751761 let estPut = commonPut(i, maxSlippage, false)
752762 let state = estPut._9
753- let $t03201032075 = refreshKLpInternal(0, 0, 0)
754- let refreshKLpActions = $t03201032075._1
755- let updatedKLp = $t03201032075._2
756- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
757- if ((isUpdatedKLpValid == isUpdatedKLpValid))
758- then (state ++ refreshKLpActions)
763+ let amAssetPmt = toBigInt(value(i.payments[0]).amount)
764+ let prAssetPmt = toBigInt(value(i.payments[1]).amount)
765+ let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
766+ if ((currentKLp == currentKLp))
767+ then {
768+ let $t03261732682 = refreshKLpInternal(0, 0, 0)
769+ let refreshKLpActions = $t03261732682._1
770+ let updatedKLp = $t03261732682._2
771+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
772+ if ((isUpdatedKLpValid == isUpdatedKLpValid))
773+ then (state ++ refreshKLpActions)
774+ else throw("Strict value is not equal to itself.")
775+ }
759776 else throw("Strict value is not equal to itself.")
760777 }
761778
762779
763780
764781 @Callable(i)
765782 func putOneTkn (minOutAmount,autoStake) = {
766783 let isPoolOneTokenOperationsDisabled = {
767784 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
768785 if ($isInstanceOf(@, "Boolean"))
769786 then @
770787 else throw(($getType(@) + " couldn't be cast to Boolean"))
771788 }
772789 let isPutDisabled = if (if (if (isGlobalShutdown())
773790 then true
774791 else (cfgPoolStatus == PoolPutDisabled))
775792 then true
776793 else (cfgPoolStatus == PoolShutdown))
777794 then true
778795 else isPoolOneTokenOperationsDisabled
779796 let checks = [if (if (!(isPutDisabled))
780797 then true
781798 else isManager(i))
782799 then true
783800 else throwErr("put operation is blocked by admin"), if ((size(i.payments) == 1))
784801 then true
785802 else throwErr("exactly 1 payment are expected")]
786803 if ((checks == checks))
787804 then {
788805 let payment = i.payments[0]
789806 let paymentAssetId = payment.assetId
790807 let paymentAmountRaw = payment.amount
808+ let currentKLp = if ((paymentAssetId == cfgAmountAssetId))
809+ then calcCurrentKLp(toBigInt(paymentAmountRaw), toBigInt(0), toBigInt(0))
810+ else if ((paymentAssetId == cfgPriceAssetId))
811+ then calcCurrentKLp(toBigInt(0), toBigInt(paymentAmountRaw), toBigInt(0))
812+ else throwErr("payment asset is not supported")
791813 let userAddress = i.caller
792814 let txId = i.transactionId
793- let $t03291333065 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
794- if (($t03291333065 == $t03291333065))
815+ let $t03386734019 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
816+ if (($t03386734019 == $t03386734019))
795817 then {
796- let paymentInAmountAsset = $t03291333065._5
797- let bonus = $t03291333065._4
798- let feeAmount = $t03291333065._3
799- let commonState = $t03291333065._2
800- let emitAmountEstimated = $t03291333065._1
818+ let paymentInAmountAsset = $t03386734019._5
819+ let bonus = $t03386734019._4
820+ let feeAmount = $t03386734019._3
821+ let commonState = $t03386734019._2
822+ let emitAmountEstimated = $t03386734019._1
801823 let emitAmount = if (if ((minOutAmount > 0))
802824 then (minOutAmount > emitAmountEstimated)
803825 else false)
804826 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
805827 else emitAmountEstimated
806828 let emitInv = emit(emitAmount)
807829 if ((emitInv == emitInv))
808830 then {
809831 let lpTransfer = if (autoStake)
810832 then {
811833 let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
812834 if ((stakeInv == stakeInv))
813835 then nil
814836 else throw("Strict value is not equal to itself.")
815837 }
816838 else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
817839 let sendFee = if ((feeAmount > 0))
818840 then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
819841 else nil
820- let $t03365133848 = if ((this == feeCollectorAddress))
842+ let $t03460534802 = if ((this == feeCollectorAddress))
821843 then $Tuple2(0, 0)
822844 else if (paymentInAmountAsset)
823845 then $Tuple2(-(feeAmount), 0)
824846 else $Tuple2(0, -(feeAmount))
825- let amountAssetBalanceDelta = $t03365133848._1
826- let priceAssetBalanceDelta = $t03365133848._2
827- let $t03385133959 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
828- let refreshKLpActions = $t03385133959._1
829- let updatedKLp = $t03385133959._2
830- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
847+ let amountAssetBalanceDelta = $t03460534802._1
848+ let priceAssetBalanceDelta = $t03460534802._2
849+ let $t03480534913 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
850+ let refreshKLpActions = $t03480534913._1
851+ let updatedKLp = $t03480534913._2
852+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
831853 if ((isUpdatedKLpValid == isUpdatedKLpValid))
832854 then $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
833855 else throw("Strict value is not equal to itself.")
834856 }
835857 else throw("Strict value is not equal to itself.")
836858 }
837859 else throw("Strict value is not equal to itself.")
838860 }
839861 else throw("Strict value is not equal to itself.")
840862 }
841863
842864
843865
844866 @Callable(i)
845867 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
846- let $t03421334370 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
847- let emitAmountEstimated = $t03421334370._1
848- let commonState = $t03421334370._2
849- let feeAmount = $t03421334370._3
850- let bonus = $t03421334370._4
851- let paymentInAmountAsset = $t03421334370._5
868+ let $t03517935336 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
869+ let emitAmountEstimated = $t03517935336._1
870+ let commonState = $t03517935336._2
871+ let feeAmount = $t03517935336._3
872+ let bonus = $t03517935336._4
873+ let paymentInAmountAsset = $t03517935336._5
852874 $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
853875 }
854876
855877
856878
857879 @Callable(i)
858880 func getOneTkn (outAssetIdStr,minOutAmount) = {
859881 let isPoolOneTokenOperationsDisabled = {
860882 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
861883 if ($isInstanceOf(@, "Boolean"))
862884 then @
863885 else throw(($getType(@) + " couldn't be cast to Boolean"))
864886 }
865887 let isGetDisabled = if (if (isGlobalShutdown())
866888 then true
867889 else (cfgPoolStatus == PoolShutdown))
868890 then true
869891 else isPoolOneTokenOperationsDisabled
870892 let checks = [if (if (!(isGetDisabled))
871893 then true
872894 else isManager(i))
873895 then true
874896 else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 1))
875897 then true
876898 else throwErr("exactly 1 payment are expected")]
877899 if ((checks == checks))
878900 then {
879901 let outAssetId = parseAssetId(outAssetIdStr)
880902 let payment = i.payments[0]
881903 let paymentAssetId = payment.assetId
882904 let paymentAmount = payment.amount
905+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(paymentAmount))
883906 let userAddress = i.caller
884907 let txId = i.transactionId
885- let $t03517535328 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
886- if (($t03517535328 == $t03517535328))
908+ let $t03623036383 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
909+ if (($t03623036383 == $t03623036383))
887910 then {
888- let outInAmountAsset = $t03517535328._5
889- let bonus = $t03517535328._4
890- let feeAmount = $t03517535328._3
891- let commonState = $t03517535328._2
892- let amountEstimated = $t03517535328._1
911+ let outInAmountAsset = $t03623036383._5
912+ let bonus = $t03623036383._4
913+ let feeAmount = $t03623036383._3
914+ let commonState = $t03623036383._2
915+ let amountEstimated = $t03623036383._1
893916 let amount = if (if ((minOutAmount > 0))
894917 then (minOutAmount > amountEstimated)
895918 else false)
896919 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
897920 else amountEstimated
898921 let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
899922 if ((burnInv == burnInv))
900923 then {
901924 let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
902925 let sendFee = if ((feeAmount > 0))
903926 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
904927 else nil
905- let $t03582836075 = {
928+ let $t03688337130 = {
906929 let feeAmountForCalc = if ((this == feeCollectorAddress))
907930 then 0
908931 else feeAmount
909932 if (outInAmountAsset)
910933 then $Tuple2(-((amount + feeAmountForCalc)), 0)
911934 else $Tuple2(0, -((amount + feeAmountForCalc)))
912935 }
913- let amountAssetBalanceDelta = $t03582836075._1
914- let priceAssetBalanceDelta = $t03582836075._2
915- let $t03607836186 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
916- let refreshKLpActions = $t03607836186._1
917- let updatedKLp = $t03607836186._2
918- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
936+ let amountAssetBalanceDelta = $t03688337130._1
937+ let priceAssetBalanceDelta = $t03688337130._2
938+ let $t03713337241 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
939+ let refreshKLpActions = $t03713337241._1
940+ let updatedKLp = $t03713337241._2
941+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
919942 if ((isUpdatedKLpValid == isUpdatedKLpValid))
920943 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
921944 else throw("Strict value is not equal to itself.")
922945 }
923946 else throw("Strict value is not equal to itself.")
924947 }
925948 else throw("Strict value is not equal to itself.")
926949 }
927950 else throw("Strict value is not equal to itself.")
928951 }
929952
930953
931954
932955 @Callable(i)
933956 func getOneTknREADONLY (outAssetId,paymentAmount) = {
934- let $t03643136587 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
935- let amountEstimated = $t03643136587._1
936- let commonState = $t03643136587._2
937- let feeAmount = $t03643136587._3
938- let bonus = $t03643136587._4
939- let outInAmountAsset = $t03643136587._5
957+ let $t03749837654 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
958+ let amountEstimated = $t03749837654._1
959+ let commonState = $t03749837654._2
960+ let feeAmount = $t03749837654._3
961+ let bonus = $t03749837654._4
962+ let outInAmountAsset = $t03749837654._5
940963 $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
941964 }
942965
943966
944967
945968 @Callable(i)
946969 func unstakeAndGetOneTkn (unstakeAmount,outAssetIdStr,minOutAmount) = {
947970 let isPoolOneTokenOperationsDisabled = {
948971 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
949972 if ($isInstanceOf(@, "Boolean"))
950973 then @
951974 else throw(($getType(@) + " couldn't be cast to Boolean"))
952975 }
953976 let isGetDisabled = if (if (isGlobalShutdown())
954977 then true
955978 else (cfgPoolStatus == PoolShutdown))
956979 then true
957980 else isPoolOneTokenOperationsDisabled
958981 let checks = [if (if (!(isGetDisabled))
959982 then true
960983 else isManager(i))
961984 then true
962985 else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 0))
963986 then true
964987 else throwErr("no payments are expected")]
965988 if ((checks == checks))
966989 then {
967990 let outAssetId = parseAssetId(outAssetIdStr)
968991 let userAddress = i.caller
969992 let txId = i.transactionId
993+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
970994 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
971995 if ((unstakeInv == unstakeInv))
972996 then {
973- let $t03741237563 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
974- if (($t03741237563 == $t03741237563))
997+ let $t03855638707 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
998+ if (($t03855638707 == $t03855638707))
975999 then {
976- let outInAmountAsset = $t03741237563._5
977- let bonus = $t03741237563._4
978- let feeAmount = $t03741237563._3
979- let commonState = $t03741237563._2
980- let amountEstimated = $t03741237563._1
1000+ let outInAmountAsset = $t03855638707._5
1001+ let bonus = $t03855638707._4
1002+ let feeAmount = $t03855638707._3
1003+ let commonState = $t03855638707._2
1004+ let amountEstimated = $t03855638707._1
9811005 let amount = if (if ((minOutAmount > 0))
9821006 then (minOutAmount > amountEstimated)
9831007 else false)
9841008 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
9851009 else amountEstimated
9861010 let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
9871011 if ((burnInv == burnInv))
9881012 then {
9891013 let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
9901014 let sendFee = if ((feeAmount > 0))
9911015 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
9921016 else nil
993- let $t03805838305 = {
1017+ let $t03920239449 = {
9941018 let feeAmountForCalc = if ((this == feeCollectorAddress))
9951019 then 0
9961020 else feeAmount
9971021 if (outInAmountAsset)
9981022 then $Tuple2(-((amount + feeAmountForCalc)), 0)
9991023 else $Tuple2(0, -((amount + feeAmountForCalc)))
10001024 }
1001- let amountAssetBalanceDelta = $t03805838305._1
1002- let priceAssetBalanceDelta = $t03805838305._2
1003- let $t03830838416 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1004- let refreshKLpActions = $t03830838416._1
1005- let updatedKLp = $t03830838416._2
1006- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1025+ let amountAssetBalanceDelta = $t03920239449._1
1026+ let priceAssetBalanceDelta = $t03920239449._2
1027+ let $t03945239560 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1028+ let refreshKLpActions = $t03945239560._1
1029+ let updatedKLp = $t03945239560._2
1030+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10071031 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10081032 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
10091033 else throw("Strict value is not equal to itself.")
10101034 }
10111035 else throw("Strict value is not equal to itself.")
10121036 }
10131037 else throw("Strict value is not equal to itself.")
10141038 }
10151039 else throw("Strict value is not equal to itself.")
10161040 }
10171041 else throw("Strict value is not equal to itself.")
10181042 }
10191043
10201044
10211045
10221046 @Callable(i)
10231047 func get () = {
10241048 let res = commonGet(i)
10251049 let outAmtAmt = res._1
10261050 let outPrAmt = res._2
10271051 let pmtAmt = res._3
10281052 let pmtAssetId = res._4
10291053 let state = res._5
1054+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10301055 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10311056 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10321057 then {
1033- let $t03926939351 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1034- let refreshKLpActions = $t03926939351._1
1035- let updatedKLp = $t03926939351._2
1036- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1058+ let $t04050840590 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1059+ let refreshKLpActions = $t04050840590._1
1060+ let updatedKLp = $t04050840590._2
1061+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10371062 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10381063 then (state ++ refreshKLpActions)
10391064 else throw("Strict value is not equal to itself.")
10401065 }
10411066 else throw("Strict value is not equal to itself.")
10421067 }
10431068
10441069
10451070
10461071 @Callable(i)
10471072 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
10481073 let res = commonGet(i)
10491074 let outAmAmt = res._1
10501075 let outPrAmt = res._2
10511076 let pmtAmt = res._3
10521077 let pmtAssetId = res._4
10531078 let state = res._5
10541079 if ((noLessThenAmtAsset > outAmAmt))
10551080 then throw(((("noLessThenAmtAsset failed: " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
10561081 else if ((noLessThenPriceAsset > outPrAmt))
10571082 then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
10581083 else {
1084+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10591085 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10601086 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10611087 then {
1062- let $t04020840289 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1063- let refreshKLpActions = $t04020840289._1
1064- let updatedKLp = $t04020840289._2
1065- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1088+ let $t04154141622 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1089+ let refreshKLpActions = $t04154141622._1
1090+ let updatedKLp = $t04154141622._2
1091+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10661092 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10671093 then (state ++ refreshKLpActions)
10681094 else throw("Strict value is not equal to itself.")
10691095 }
10701096 else throw("Strict value is not equal to itself.")
10711097 }
10721098 }
10731099
10741100
10751101
10761102 @Callable(i)
10771103 func unstakeAndGet (amount) = {
10781104 let checkPayments = if ((size(i.payments) != 0))
10791105 then throw("No payments are expected")
10801106 else true
10811107 if ((checkPayments == checkPayments))
10821108 then {
10831109 let cfg = getPoolConfig()
10841110 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
1111+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
10851112 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
10861113 if ((unstakeInv == unstakeInv))
10871114 then {
10881115 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
10891116 let outAmAmt = res._1
10901117 let outPrAmt = res._2
10911118 let poolStatus = parseIntValue(res._9)
10921119 let state = res._10
10931120 let checkPoolStatus = if (if (isGlobalShutdown())
10941121 then true
10951122 else (poolStatus == PoolShutdown))
10961123 then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
10971124 else true
10981125 if ((checkPoolStatus == checkPoolStatus))
10991126 then {
11001127 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
11011128 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11021129 then {
1103- let $t04132341404 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1104- let refreshKLpActions = $t04132341404._1
1105- let updatedKLp = $t04132341404._2
1106- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1130+ let $t04274542826 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1131+ let refreshKLpActions = $t04274542826._1
1132+ let updatedKLp = $t04274542826._2
1133+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11071134 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11081135 then (state ++ refreshKLpActions)
11091136 else throw("Strict value is not equal to itself.")
11101137 }
11111138 else throw("Strict value is not equal to itself.")
11121139 }
11131140 else throw("Strict value is not equal to itself.")
11141141 }
11151142 else throw("Strict value is not equal to itself.")
11161143 }
11171144 else throw("Strict value is not equal to itself.")
11181145 }
11191146
11201147
11211148
11221149 @Callable(i)
11231150 func unstakeAndGetNoLess (unstakeAmount,noLessThenAmountAsset,noLessThenPriceAsset) = {
11241151 let isGetDisabled = if (isGlobalShutdown())
11251152 then true
11261153 else (cfgPoolStatus == PoolShutdown)
11271154 let checks = [if (!(isGetDisabled))
11281155 then true
11291156 else throw("get operation is blocked by admin"), if ((size(i.payments) == 0))
11301157 then true
11311158 else throw("no payments are expected")]
11321159 if ((checks == checks))
11331160 then {
1161+ let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
11341162 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
11351163 if ((unstakeInv == unstakeInv))
11361164 then {
11371165 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(cfgLpAssetId), unstakeAmount, i.caller)
11381166 let outAmAmt = res._1
11391167 let outPrAmt = res._2
11401168 let state = res._10
11411169 let checkAmounts = [if ((outAmAmt >= noLessThenAmountAsset))
11421170 then true
11431171 else throw(makeString(["amount asset amount to receive is less than ", toString(noLessThenAmountAsset)], "")), if ((outPrAmt >= noLessThenPriceAsset))
11441172 then true
11451173 else throw(makeString(["price asset amount to receive is less than ", toString(noLessThenPriceAsset)], ""))]
11461174 if ((checkAmounts == checkAmounts))
11471175 then {
11481176 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11491177 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11501178 then {
1151- let $t04260742688 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1152- let refreshKLpActions = $t04260742688._1
1153- let updatedKLp = $t04260742688._2
1154- let isUpdatedKLpValid = validateUpdatedKLp(updatedKLp)
1179+ let $t04411844199 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1180+ let refreshKLpActions = $t04411844199._1
1181+ let updatedKLp = $t04411844199._2
1182+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11551183 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11561184 then (state ++ refreshKLpActions)
11571185 else throw("Strict value is not equal to itself.")
11581186 }
11591187 else throw("Strict value is not equal to itself.")
11601188 }
11611189 else throw("Strict value is not equal to itself.")
11621190 }
11631191 else throw("Strict value is not equal to itself.")
11641192 }
11651193 else throw("Strict value is not equal to itself.")
11661194 }
11671195
11681196
11691197
11701198 @Callable(i)
11711199 func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
11721200 then throw("permissions denied")
11731201 else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success")
11741202
11751203
11761204
11771205 @Callable(i)
11781206 func refreshKLp () = {
11791207 let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0)
11801208 let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay))
11811209 then unit
11821210 else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], ""))
11831211 if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
11841212 then {
11851213 let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp"))
1186- let $t04386343927 = refreshKLpInternal(0, 0, 0)
1187- let kLpUpdateActions = $t04386343927._1
1188- let updatedKLp = $t04386343927._2
1214+ let $t04538645450 = refreshKLpInternal(0, 0, 0)
1215+ let kLpUpdateActions = $t04538645450._1
1216+ let updatedKLp = $t04538645450._2
11891217 let actions = if ((kLp != updatedKLp))
11901218 then kLpUpdateActions
11911219 else throwErr("nothing to refresh")
11921220 $Tuple2(actions, toString(updatedKLp))
11931221 }
11941222 else throw("Strict value is not equal to itself.")
11951223 }
11961224
11971225
11981226
11991227 @Callable(i)
12001228 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig())
12011229
12021230
12031231
12041232 @Callable(i)
12051233 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
12061234
12071235
12081236
12091237 @Callable(i)
12101238 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
12111239 let prices = calcPrices(amAmt, prAmt, lpAmt)
12121240 $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])])
12131241 }
12141242
12151243
12161244
12171245 @Callable(i)
12181246 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult)))
12191247
12201248
12211249
12221250 @Callable(i)
12231251 func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult))
12241252
12251253
12261254
12271255 @Callable(i)
12281256 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
12291257
12301258
12311259
12321260 @Callable(i)
12331261 func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp))
12341262
12351263
12361264
12371265 @Callable(i)
12381266 func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
12391267 let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress))
12401268 $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10))
12411269 }
12421270
12431271
12441272
12451273 @Callable(i)
12461274 func statsREADONLY () = {
12471275 let cfg = getPoolConfig()
12481276 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
12491277 let amtAssetId = cfg[idxAmtAssetId]
12501278 let priceAssetId = cfg[idxPriceAssetId]
12511279 let iAmtAssetId = cfg[idxIAmtAssetId]
12521280 let iPriceAssetId = cfg[idxIPriceAssetId]
12531281 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
12541282 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
12551283 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
12561284 let accAmtAssetBalance = getAccBalance(amtAssetId)
12571285 let accPriceAssetBalance = getAccBalance(priceAssetId)
12581286 let pricesList = if ((poolLPBalance == 0))
12591287 then [zeroBigInt, zeroBigInt, zeroBigInt]
12601288 else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance)
12611289 let curPrice = 0
12621290 let lpAmtAssetShare = fromX18(pricesList[1], scale8)
12631291 let lpPriceAssetShare = fromX18(pricesList[2], scale8)
12641292 let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this))))
12651293 $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))
12661294 }
12671295
12681296
12691297
12701298 @Callable(i)
12711299 func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = {
12721300 let cfg = getPoolConfig()
12731301 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
12741302 let amAssetIdStr = cfg[idxAmtAssetId]
12751303 let amAssetId = fromBase58String(amAssetIdStr)
12761304 let prAssetIdStr = cfg[idxPriceAssetId]
12771305 let prAssetId = fromBase58String(prAssetIdStr)
12781306 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
12791307 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
12801308 let poolStatus = cfg[idxPoolStatus]
12811309 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
12821310 let accAmtAssetBalance = getAccBalance(amAssetIdStr)
12831311 let accPriceAssetBalance = getAccBalance(prAssetIdStr)
12841312 let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm)
12851313 let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm)
12861314 let curPriceX18 = if ((poolLPBalance == 0))
12871315 then zeroBigInt
12881316 else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
12891317 let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
12901318 let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
12911319 let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm)
12921320 let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
12931321 let calcLpAmt = estPut._1
12941322 let curPriceCalc = estPut._3
12951323 let amBalance = estPut._4
12961324 let prBalance = estPut._5
12971325 let lpEmission = estPut._6
12981326 $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))
12991327 }
13001328
13011329
13021330
13031331 @Callable(i)
13041332 func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = {
13051333 let cfg = getPoolConfig()
13061334 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
13071335 let amAssetIdStr = cfg[idxAmtAssetId]
13081336 let amAssetId = fromBase58String(amAssetIdStr)
13091337 let prAssetIdStr = cfg[idxPriceAssetId]
13101338 let prAssetId = fromBase58String(prAssetIdStr)
13111339 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
13121340 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
13131341 let poolStatus = cfg[idxPoolStatus]
13141342 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
13151343 let amBalanceRaw = getAccBalance(amAssetIdStr)
13161344 let prBalanceRaw = getAccBalance(prAssetIdStr)
13171345 let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm)
13181346 let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm)
13191347 let curPriceX18 = if ((poolLPBalance == 0))
13201348 then zeroBigInt
13211349 else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18)
13221350 let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
13231351 let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
13241352 let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm)
13251353 let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
13261354 let calcLpAmt = estPut._1
13271355 let curPriceCalc = estPut._3
13281356 let amBalance = estPut._4
13291357 let prBalance = estPut._5
13301358 let lpEmission = estPut._6
13311359 $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))
13321360 }
13331361
13341362
13351363
13361364 @Callable(i)
13371365 func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
13381366 let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this)
13391367 let outAmAmt = res._1
13401368 let outPrAmt = res._2
13411369 let amBalance = res._5
13421370 let prBalance = res._6
13431371 let lpEmission = res._7
13441372 let curPrice = res._8
13451373 let poolStatus = parseIntValue(res._9)
13461374 $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))
13471375 }
13481376
13491377
13501378 @Verifier(tx)
13511379 func verify () = {
13521380 let targetPublicKey = match managerPublicKeyOrUnit() {
13531381 case pk: ByteVector =>
13541382 pk
13551383 case _: Unit =>
13561384 tx.senderPublicKey
13571385 case _ =>
13581386 throw("Match error")
13591387 }
13601388 match tx {
13611389 case order: Order =>
13621390 let matcherPub = getMatcherPubOrFail()
13631391 let orderValid = validateMatcherOrderAllowed(order)
13641392 let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
13651393 let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
13661394 if (if (if (orderValid)
13671395 then senderValid
13681396 else false)
13691397 then matcherValid
13701398 else false)
13711399 then true
13721400 else throwOrderError(orderValid, senderValid, matcherValid)
13731401 case s: SetScriptTransaction =>
13741402 let newHash = blake2b256(value(s.script))
13751403 let allowedHash = fromBase64String(value(getString(factoryContract, keyAllowedLpScriptHash())))
13761404 let currentHash = scriptHash(this)
13771405 if (if ((allowedHash == newHash))
13781406 then (currentHash != newHash)
13791407 else false)
13801408 then true
13811409 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
13821410 case _ =>
13831411 sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
13841412 }
13851413 }
13861414

github/deemru/w8io/026f985 
180.05 ms