tx · 9rGAALcW9ZCyu8GpvTVRWJ8wjaYUtotUeiivgpUdcxoY

3N1dMZiRHyPfV3HE1UP73tMqZyrajT8s7Gd:  -0.03500000 Waves

2022.12.07 16:01 [2349956] smart account 3N1dMZiRHyPfV3HE1UP73tMqZyrajT8s7Gd > SELF 0.00000000 Waves

{ "type": 13, "id": "9rGAALcW9ZCyu8GpvTVRWJ8wjaYUtotUeiivgpUdcxoY", "fee": 3500000, "feeAssetId": null, "timestamp": 1670417906423, "version": 1, "sender": "3N1dMZiRHyPfV3HE1UP73tMqZyrajT8s7Gd", "senderPublicKey": "5nXNn4nUrku3ormf7LVLKqY9doTY1LZWZ3uDiDHre72C", "proofs": [ "2ZKaD2Sj2a3q9rsmedmtRuQfpbBFPy1VZK1VnMDA9QbBuLv6BF5ZEjPhMSKr96AVPYUhYNfg1z36ofBDpJCuNFkc" ], "script": "base64:BgL1LAgCEgMKAQgSABIECgIBBBIDCgEBEgQKAgEEEgQKAggBEgQKAggBEgQKAggBEgUKAwEIARIAEgQKAgEBEgMKAQESBQoDAQEBEgQKAggIEgASABIDCgEIEgUKAwEBARIECgIBARIECgIIARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCBIAEgMKAQESAwoBARIECgIIASIKbFBkZWNpbWFscyIGc2NhbGU4IgxzY2FsZThCaWdJbnQiB3NjYWxlMTgiCnplcm9CaWdJbnQiBGJpZzAiBGJpZzEiBGJpZzIiC3dhdmVzU3RyaW5nIgNTRVAiClBvb2xBY3RpdmUiD1Bvb2xQdXREaXNhYmxlZCITUG9vbE1hdGNoZXJEaXNhYmxlZCIMUG9vbFNodXRkb3duIg5pZHhQb29sQWRkcmVzcyINaWR4UG9vbFN0YXR1cyIQaWR4UG9vbExQQXNzZXRJZCINaWR4QW10QXNzZXRJZCIPaWR4UHJpY2VBc3NldElkIg5pZHhBbXRBc3NldERjbSIQaWR4UHJpY2VBc3NldERjbSIOaWR4SUFtdEFzc2V0SWQiEGlkeElQcmljZUFzc2V0SWQiDWlkeExQQXNzZXREY20iEmlkeFBvb2xBbXRBc3NldEFtdCIUaWR4UG9vbFByaWNlQXNzZXRBbXQiEWlkeFBvb2xMUEFzc2V0QW10IhlpZHhGYWN0b3J5U3Rha2luZ0NvbnRyYWN0IhppZHhGYWN0b3J5U2xpcHBhZ2VDb250cmFjdCIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiA3ZhbCIPcmVzdWx0U2NhbGVNdWx0Igd0b1NjYWxlIgNhbXQiCHJlc1NjYWxlIghjdXJTY2FsZSIDYWJzIglhYnNCaWdJbnQiAmZjIgNtcGsiBHBtcGsiAnBsIgJwaCIBaCIJdGltZXN0YW1wIgNwYXUiC3VzZXJBZGRyZXNzIgR0eElkIgNnYXUiAmFhIgJwYSIGa2V5RmVlIgpmZWVEZWZhdWx0IgNmZWUiBmtleUtMcCIVa2V5S0xwUmVmcmVzaGVkSGVpZ2h0IhJrZXlLTHBSZWZyZXNoRGVsYXkiFmtMcFJlZnJlc2hEZWxheURlZmF1bHQiD2tMcFJlZnJlc2hEZWxheSIQa2V5RmFjdG9yeUNvbmZpZyINa2V5TWF0Y2hlclB1YiIpa2V5TWFwcGluZ1Bvb2xDb250cmFjdEFkZHJlc3NUb1Bvb2xBc3NldHMiE3Bvb2xDb250cmFjdEFkZHJlc3MiDWtleVBvb2xDb25maWciCWlBbXRBc3NldCILaVByaWNlQXNzZXQiH2tleU1hcHBpbmdzQmFzZUFzc2V0MmludGVybmFsSWQiDGJhc2VBc3NldFN0ciITa2V5QWxsUG9vbHNTaHV0ZG93biINa2V5UG9vbFdlaWdodCIPY29udHJhY3RBZGRyZXNzIhZrZXlBbGxvd2VkTHBTY3JpcHRIYXNoIhZrZXlGZWVDb2xsZWN0b3JBZGRyZXNzIg90aHJvd09yZGVyRXJyb3IiCm9yZGVyVmFsaWQiC3NlbmRlclZhbGlkIgxtYXRjaGVyVmFsaWQiD2dldFN0cmluZ09yRmFpbCIHYWRkcmVzcyIDa2V5IgxnZXRJbnRPckZhaWwiCHRocm93RXJyIgNtc2ciBmZtdEVyciIPZmFjdG9yeUNvbnRyYWN0IhNmZWVDb2xsZWN0b3JBZGRyZXNzIhBpc0dsb2JhbFNodXRkb3duIhNnZXRNYXRjaGVyUHViT3JGYWlsIg1nZXRQb29sQ29uZmlnIghhbXRBc3NldCIKcHJpY2VBc3NldCIMcGFyc2VBc3NldElkIgVpbnB1dCIPYXNzZXRJZFRvU3RyaW5nIg9wYXJzZVBvb2xDb25maWciCnBvb2xDb25maWciEHBvb2xDb25maWdQYXJzZWQiCyR0MDc5MTU4MDgxIg5jZmdQb29sQWRkcmVzcyINY2ZnUG9vbFN0YXR1cyIMY2ZnTHBBc3NldElkIhBjZmdBbW91bnRBc3NldElkIg9jZmdQcmljZUFzc2V0SWQiFmNmZ0Ftb3VudEFzc2V0RGVjaW1hbHMiFWNmZ1ByaWNlQXNzZXREZWNpbWFscyIQZ2V0RmFjdG9yeUNvbmZpZyIPc3Rha2luZ0NvbnRyYWN0IhBzbGlwcGFnZUNvbnRyYWN0IhFkYXRhUHV0QWN0aW9uSW5mbyINaW5BbXRBc3NldEFtdCIPaW5QcmljZUFzc2V0QW10IghvdXRMcEFtdCIFcHJpY2UiHXNsaXBwYWdlVG9sZXJhbmNlUGFzc2VkQnlVc2VyIhVzbGlwcGFnZVRvbGVyYW5jZVJlYWwiCHR4SGVpZ2h0Igt0eFRpbWVzdGFtcCISc2xpcGFnZUFtdEFzc2V0QW10IhRzbGlwYWdlUHJpY2VBc3NldEFtdCIRZGF0YUdldEFjdGlvbkluZm8iDm91dEFtdEFzc2V0QW10IhBvdXRQcmljZUFzc2V0QW10IgdpbkxwQW10Ig1nZXRBY2NCYWxhbmNlIgdhc3NldElkIg9jYWxjUHJpY2VCaWdJbnQiCHByQW10WDE4IghhbUFtdFgxOCIQcHJpdmF0ZUNhbGNQcmljZSIKYW1Bc3NldERjbSIKcHJBc3NldERjbSIFYW1BbXQiBXByQW10Ig5hbXRBc3NldEFtdFgxOCIQcHJpY2VBc3NldEFtdFgxOCIKY2FsY1ByaWNlcyIFbHBBbXQiA2NmZyILYW10QXNzZXREY20iDXByaWNlQXNzZXREY20iCHByaWNlWDE4IghscEFtdFgxOCITbHBQcmljZUluQW1Bc3NldFgxOCITbHBQcmljZUluUHJBc3NldFgxOCIPY2FsY3VsYXRlUHJpY2VzIgZwcmljZXMiFGVzdGltYXRlR2V0T3BlcmF0aW9uIgZ0eElkNTgiCnBtdEFzc2V0SWQiCHBtdExwQW10IglscEFzc2V0SWQiCWFtQXNzZXRJZCIJcHJBc3NldElkIgpwb29sU3RhdHVzIgpscEVtaXNzaW9uIglhbUJhbGFuY2UiDGFtQmFsYW5jZVgxOCIJcHJCYWxhbmNlIgxwckJhbGFuY2VYMTgiC2N1clByaWNlWDE4IghjdXJQcmljZSILcG10THBBbXRYMTgiDWxwRW1pc3Npb25YMTgiC291dEFtQW10WDE4IgtvdXRQckFtdFgxOCIIb3V0QW1BbXQiCG91dFByQW10IgVzdGF0ZSIUZXN0aW1hdGVQdXRPcGVyYXRpb24iEXNsaXBwYWdlVG9sZXJhbmNlIgxpbkFtQXNzZXRBbXQiC2luQW1Bc3NldElkIgxpblByQXNzZXRBbXQiC2luUHJBc3NldElkIgppc0V2YWx1YXRlIgZlbWl0THAiDGFtQXNzZXRJZFN0ciIMcHJBc3NldElkU3RyIgtpQW10QXNzZXRJZCINaVByaWNlQXNzZXRJZCIOaW5BbUFzc2V0SWRTdHIiDmluUHJBc3NldElkU3RyIg9pbkFtQXNzZXRBbXRYMTgiD2luUHJBc3NldEFtdFgxOCIMdXNlclByaWNlWDE4IgNyZXMiC3NsaXBwYWdlWDE4IhRzbGlwcGFnZVRvbGVyYW5jZVgxOCIKcHJWaWFBbVgxOCIKYW1WaWFQclgxOCIMZXhwZWN0ZWRBbXRzIhFleHBBbXRBc3NldEFtdFgxOCITZXhwUHJpY2VBc3NldEFtdFgxOCIJY2FsY0xwQW10Ig5jYWxjQW1Bc3NldFBtdCIOY2FsY1ByQXNzZXRQbXQiDHNsaXBwYWdlQ2FsYyIJZW1pdExwQW10IgZhbURpZmYiBnByRGlmZiILY29tbW9uU3RhdGUiB2NhbGNLTHAiDWFtb3VudEJhbGFuY2UiDHByaWNlQmFsYW5jZSIKdXBkYXRlZEtMcCIOY2FsY0N1cnJlbnRLTHAiEGFtb3VudEFzc2V0RGVsdGEiD3ByaWNlQXNzZXREZWx0YSIUbHBBc3NldEVtaXNzaW9uRGVsdGEiEmFtb3VudEFzc2V0QmFsYW5jZSIRcHJpY2VBc3NldEJhbGFuY2UiD2xwQXNzZXRFbWlzc2lvbiIKY3VycmVudEtMcCIScmVmcmVzaEtMcEludGVybmFsIhdhbW91bnRBc3NldEJhbGFuY2VEZWx0YSIWcHJpY2VBc3NldEJhbGFuY2VEZWx0YSIHYWN0aW9ucyISdmFsaWRhdGVVcGRhdGVkS0xwIgZvbGRLTHAiG3ZhbGlkYXRlTWF0Y2hlck9yZGVyQWxsb3dlZCIFb3JkZXIiEWFtb3VudEFzc2V0QW1vdW50IhBwcmljZUFzc2V0QW1vdW50Ig0kdDAyMDM1OTIwNTcxIgNrTHAiDSR0MDIxMDQyMjExNDIiDXVudXNlZEFjdGlvbnMiBmtMcE5ldyIMaXNPcmRlclZhbGlkIgljb21tb25HZXQiAWkiA3BtdCIGcG10QW10Igljb21tb25QdXQiCmFtQXNzZXRQbXQiCnByQXNzZXRQbXQiBmVzdFB1dCIEZW1pdCIGYW1vdW50IgdlbWl0SW52Ig1lbWl0SW52TGVnYWN5IgckbWF0Y2gwIhVsZWdhY3lGYWN0b3J5Q29udHJhY3QiB3Rha2VGZWUiCWZlZUFtb3VudCIPY2FsY1B1dE9uZVRva2VuIhBwYXltZW50QW1vdW50UmF3Ig5wYXltZW50QXNzZXRJZCIGaXNFdmFsIhBhbW91bnRCYWxhbmNlUmF3Ig9wcmljZUJhbGFuY2VSYXciFHBheW1lbnRJbkFtb3VudEFzc2V0Ig0kdDAyMzgyNzI0MTIwIhBhbW91bnRCYWxhbmNlT2xkIg9wcmljZUJhbGFuY2VPbGQiDSR0MDI0MTI0MjQyNzMiFGFtb3VudEFzc2V0QW1vdW50UmF3IhNwcmljZUFzc2V0QW1vdW50UmF3Ig0kdDAyNDM5NTI0NDU0Ig1wYXltZW50QW1vdW50IhBhbW91bnRCYWxhbmNlTmV3Ig9wcmljZUJhbGFuY2VOZXciC3ByaWNlTmV3WDE4IghwcmljZU5ldyIOcGF5bWVudEJhbGFuY2UiFHBheW1lbnRCYWxhbmNlQmlnSW50IgxzdXBwbHlCaWdJbnQiC2NoZWNoU3VwcGx5Ig1kZXBvc2l0QmlnSW50Igtpc3N1ZUFtb3VudCILcHJpY2VPbGRYMTgiCHByaWNlT2xkIgRsb3NzIg0kdDAyNTkzMTI2MDk4IgdiYWxhbmNlIg9pc3N1ZUFtb3VudEJvdGgiD2NhbGNHZXRPbmVUb2tlbiIKb3V0QXNzZXRJZCIGY2hlY2tzIhBvdXRJbkFtb3VudEFzc2V0Ig1iYWxhbmNlQmlnSW50IgxhbUJhbGFuY2VPbGQiDHByQmFsYW5jZU9sZCIKb3V0QmFsYW5jZSIQb3V0QmFsYW5jZUJpZ0ludCIOcmVkZWVtZWRCaWdJbnQiCWFtb3VudFJhdyINJHQwMjc3MDAyNzc1MCILdG90YWxBbW91bnQiDSR0MDI3NzU0Mjc5ODAiC291dEFtQW1vdW50IgtvdXRQckFtb3VudCIMYW1CYWxhbmNlTmV3IgxwckJhbGFuY2VOZXciGGFtb3VudEJvdGhJblBheW1lbnRBc3NldCIWbWFuYWdlclB1YmxpY0tleU9yVW5pdCIBcyIdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQiCWlzTWFuYWdlciICcGsiC211c3RNYW5hZ2VyIgJwZCIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiC2NoZWNrQ2FsbGVyIhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSIPc2hvdWxkQXV0b1N0YWtlIgRhbUlkIgRwcklkIgxzbGlwcGFnZUFJbnYiDHNsaXBwYWdlUEludiIKbHBUcmFuc2ZlciILc2xwU3Rha2VJbnYiFGxwQXNzZXRFbWlzc2lvbkFmdGVyIg0kdDAzMjUwMDMyNTY4IhFyZWZyZXNoS0xwQWN0aW9ucyIFZXJyb3IiEWlzVXBkYXRlZEtMcFZhbGlkIgttYXhTbGlwcGFnZSINJHQwMzM1MDAzMzU2NSIMbWluT3V0QW1vdW50IglhdXRvU3Rha2UiIGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkIgFAIg1pc1B1dERpc2FibGVkIgdwYXltZW50Ig0kdDAzNDc1MDM0OTAyIgVib251cyITZW1pdEFtb3VudEVzdGltYXRlZCIKZW1pdEFtb3VudCIIc3Rha2VJbnYiB3NlbmRGZWUiDSR0MDM1NDg4MzU2ODUiDSR0MDM1Njg4MzU3OTYiDSR0MDM2MTAyMzYyNTkiDW91dEFzc2V0SWRTdHIiDWlzR2V0RGlzYWJsZWQiDSR0MDM3MTUzMzczMDYiD2Ftb3VudEVzdGltYXRlZCIHYnVybkludiINYXNzZXRUcmFuc2ZlciINJHQwMzc4MDYzODA1MyIQZmVlQW1vdW50Rm9yQ2FsYyINJHQwMzgwNTYzODE2NCINJHQwMzg0MjEzODU3NyINdW5zdGFrZUFtb3VudCIKdW5zdGFrZUludiINJHQwMzk0NzkzOTYzMCINJHQwNDAxMjU0MDM3MiINJHQwNDAzNzU0MDQ4MyIJb3V0QW10QW10IhRidXJuTFBBc3NldE9uRmFjdG9yeSINJHQwNDE0MzE0MTUxMyISbm9MZXNzVGhlbkFtdEFzc2V0IhRub0xlc3NUaGVuUHJpY2VBc3NldCINJHQwNDI0NjQ0MjU0NSINY2hlY2tQYXltZW50cyIPY2hlY2tQb29sU3RhdHVzIg0kdDA0MzY2ODQzNzQ5IhVub0xlc3NUaGVuQW1vdW50QXNzZXQiDGNoZWNrQW1vdW50cyINJHQwNDUwNDE0NTEyMiILYW10QXNzZXRTdHIiDXByaWNlQXNzZXRTdHIiGGxhc3RSZWZyZXNoZWRCbG9ja0hlaWdodCIdY2hlY2tMYXN0UmVmcmVzaGVkQmxvY2tIZWlnaHQiDSR0MDQ2MzA5NDYzNzMiEGtMcFVwZGF0ZUFjdGlvbnMiCmFtdEFzc2V0SWQiDHByaWNlQXNzZXRJZCINcG9vbExQQmFsYW5jZSISYWNjQW10QXNzZXRCYWxhbmNlIhRhY2NQcmljZUFzc2V0QmFsYW5jZSIKcHJpY2VzTGlzdCIPbHBBbXRBc3NldFNoYXJlIhFscFByaWNlQXNzZXRTaGFyZSIKcG9vbFdlaWdodCIMY3VyUHJpY2VDYWxjIgxhbUJhbGFuY2VSYXciDHByQmFsYW5jZVJhdyIPYW1CYWxhbmNlUmF3WDE4Ig9wckJhbGFuY2VSYXdYMTgiEHBheW1lbnRMcEFzc2V0SWQiDHBheW1lbnRMcEFtdCICdHgiBnZlcmlmeSIPdGFyZ2V0UHVibGljS2V5IgptYXRjaGVyUHViIgduZXdIYXNoIgthbGxvd2VkSGFzaCILY3VycmVudEhhc2htAAFhAAgAAWIAgMLXLwABYwkAtgIBAIDC1y8AAWQJALYCAQCAgJC7utat8A0AAWUJALYCAQAAAAFmCQC2AgEAAAABZwkAtgIBAAEAAWgJALYCAQACAAFpAgVXQVZFUwABagICX18AAWsAAQABbAACAAFtAAMAAW4ABAABbwABAAFwAAIAAXEAAwABcgAEAAFzAAUAAXQABgABdQAHAAF2AAgAAXcACQABeAAKAAF5AAEAAXoAAgABQQADAAFCAAEAAUMABwEBRAIBRQFGCQC8AgMJALYCAQUBRQUBZAkAtgIBBQFGAQFHAgFIAUkJAKADAQkAvAIDBQFICQC2AgEFAUkFAWQBAUoDAUsBTAFNCQBrAwUBSwUBTAUBTQEBTgEBSAMJAGYCAAAFAUgJAQEtAQUBSAUBSAEBTwEBSAMJAL8CAgUBZQUBSAkAvgIBBQFIBQFIAQFQAAITJXNfX2ZhY3RvcnlDb250cmFjdAEBUQACFCVzX19tYW5hZ2VyUHVibGljS2V5AQFSAAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQFTAAIRJXMlc19fcHJpY2VfX2xhc3QBAVQCAVUBVgkAuQkCCQDMCAICGCVzJXMlZCVkX19wcmljZV9faGlzdG9yeQkAzAgCCQCkAwEFAVUJAMwIAgkApAMBBQFWBQNuaWwFAWoBAVcCAVgBWQkArAICCQCsAgIJAKwCAgILJXMlcyVzX19QX18FAVgCAl9fBQFZAQFaAgFYAVkJAKwCAgkArAICCQCsAgICCyVzJXMlc19fR19fBQFYAgJfXwUBWQECYWEAAg8lc19fYW1vdW50QXNzZXQBAmFiAAIOJXNfX3ByaWNlQXNzZXQAAmFjAgclc19fZmVlAAJhZAkAawMACgUBYgCQTgACYWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUCYWMFAmFkAAJhZgkAuQkCCQDMCAICAiVzCQDMCAICA2tMcAUDbmlsBQFqAAJhZwkAuQkCCQDMCAICAiVzCQDMCAICEmtMcFJlZnJlc2hlZEhlaWdodAUDbmlsBQFqAAJhaAkAuQkCCQDMCAICAiVzCQDMCAICD3JlZnJlc2hLTHBEZWxheQUDbmlsBQFqAAJhaQAeAAJhagkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQJhaAUCYWkBAmFrAAIRJXNfX2ZhY3RvcnlDb25maWcBAmFsAAIYJXMlc19fbWF0Y2hlcl9fcHVibGljS2V5AQJhbQECYW4JAKwCAgkArAICAgglcyVzJXNfXwUCYW4CIF9fbWFwcGluZ3NfX3Bvb2xDb250cmFjdDJMcEFzc2V0AQJhbwICYXACYXEJAKwCAgkArAICCQCsAgIJAKwCAgIIJWQlZCVzX18FAmFwAgJfXwUCYXECCF9fY29uZmlnAQJhcgECYXMJAKwCAgIoJXMlcyVzX19tYXBwaW5nc19fYmFzZUFzc2V0MmludGVybmFsSWRfXwUCYXMBAmF0AAIMJXNfX3NodXRkb3duAQJhdQECYXYJAKwCAgISJXMlc19fcG9vbFdlaWdodF9fBQJhdgECYXcAAhclc19fYWxsb3dlZExwU2NyaXB0SGFzaAACYXgCFyVzX19mZWVDb2xsZWN0b3JBZGRyZXNzAQJheQMCYXoCYUECYUIJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIkb3JkZXIgdmFsaWRhdGlvbiBmYWlsZWQ6IG9yZGVyVmFsaWQ9CQClAwEFAmF6Ag0gc2VuZGVyVmFsaWQ9CQClAwEFAmFBAg4gbWF0Y2hlclZhbGlkPQkApQMBBQJhQgECYUMCAmFEAmFFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUCYUQFAmFFCQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFAmFECQDMCAICAS4JAMwIAgUCYUUJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAECYUYCAmFEAmFFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUCYUQFAmFFCQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFAmFECQDMCAICAS4JAMwIAgUCYUUJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAECYUcBAmFICQACAQkAuQkCCQDMCAICCGxwLnJpZGU6CQDMCAIFAmFIBQNuaWwCASABAmFJAQJhSAkAuQkCCQDMCAICCGxwLnJpZGU6CQDMCAIFAmFIBQNuaWwCASAAAmFKCQERQGV4dHJOYXRpdmUoMTA2MikBCQECYUMCBQR0aGlzCQEBUAAAAmFLCQERQGV4dHJOYXRpdmUoMTA2MikBCQECYUMCBQJhSgUCYXgBAmFMAAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQJhSgkBAmF0AAcBAmFNAAkA2QQBCQECYUMCBQJhSgkBAmFsAAECYU4ABAJhTwkBAmFDAgUEdGhpcwkBAmFhAAQCYVAJAQJhQwIFBHRoaXMJAQJhYgAEAmFxCQECYUYCBQJhSgkBAmFyAQUCYVAEAmFwCQECYUYCBQJhSgkBAmFyAQUCYU8JALUJAgkBAmFDAgUCYUoJAQJhbwIJAKQDAQUCYXAJAKQDAQUCYXEFAWoBAmFRAQJhUgMJAAACBQJhUgUBaQUEdW5pdAkA2QQBBQJhUgECYVMBAmFSAwkAAAIFAmFSBQR1bml0BQFpCQDYBAEJAQV2YWx1ZQEFAmFSAQJhVAECYVUJAJkKBwkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQJhVQUBbwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmFVBQFwCQDZBAEJAJEDAgUCYVUFAXEJAQJhUQEJAJEDAgUCYVUFAXIJAQJhUQEJAJEDAgUCYVUFAXMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJhVQUBdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmFVBQF1AAJhVgkBAmFUAQkBAmFOAAACYVcFAmFWAAJhWAgFAmFXAl8xAAJhWQgFAmFXAl8yAAJhWggFAmFXAl8zAAJiYQgFAmFXAl80AAJiYggFAmFXAl81AAJiYwgFAmFXAl82AAJiZAgFAmFXAl83AQJiZQAJALUJAgkBAmFDAgUCYUoJAQJhawAFAWoAAmJmCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCCQECYmUABQFCAhlpbmNvcnJlY3Qgc3Rha2luZyBhZGRyZXNzAAJiZwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgkBAmJlAAUBQwIZaW5jb3JyZWN0IHN0YWtpbmcgYWRkcmVzcwECYmgKAmJpAmJqAmJrAmJsAmJtAmJuAmJvAmJwAmJxAmJyCQC5CQIJAMwIAgIUJWQlZCVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJiaQkAzAgCCQCkAwEFAmJqCQDMCAIJAKQDAQUCYmsJAMwIAgkApAMBBQJibAkAzAgCCQCkAwEFAmJtCQDMCAIJAKQDAQUCYm4JAMwIAgkApAMBBQJibwkAzAgCCQCkAwEFAmJwCQDMCAIJAKQDAQUCYnEJAMwIAgkApAMBBQJicgUDbmlsBQFqAQJicwYCYnQCYnUCYnYCYmwCYm8CYnAJALkJAgkAzAgCAgwlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJidAkAzAgCCQCkAwEFAmJ1CQDMCAIJAKQDAQUCYnYJAMwIAgkApAMBBQJibAkAzAgCCQCkAwEFAmJvCQDMCAIJAKQDAQUCYnAFA25pbAUBagECYncBAmJ4AwkAAAIFAmJ4AgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQJieAECYnkCAmJ6AmJBCQC8AgMFAmJ6BQFkBQJiQQECYkIEAmJDAmJEAmJFAmJGBAJiRwkBAUQCBQJiRQUCYkMEAmJICQEBRAIFAmJGBQJiRAkBAmJ5AgUCYkgFAmJHAQJiSQMCYkUCYkYCYkoEAmJLCQECYU4ABAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJiTgkBAmJCBAUCYkwFAmJNBQJiRQUCYkYEAmJBCQEBRAIFAmJFBQJiTAQCYnoJAQFEAgUCYkYFAmJNBAJiTwkBAUQCBQJiSgUBYgQCYlAJAQJieQIFAmJBBQJiTwQCYlEJAQJieQIFAmJ6BQJiTwkAzAgCBQJiTgkAzAgCBQJiUAkAzAgCBQJiUQUDbmlsAQJiUgMCYkUCYkYCYkoEAmJTCQECYkkDBQJiRQUCYkYFAmJKCQDMCAIJAQFHAgkAkQMCBQJiUwAABQFiCQDMCAIJAQFHAgkAkQMCBQJiUwABBQFiCQDMCAIJAQFHAgkAkQMCBQJiUwACBQFiBQNuaWwBAmJUBAJiVQJiVgJiVwFYBAJiSwkBAmFOAAQCYlgJAJEDAgUCYksFAXEEAmJZCQCRAwIFAmJLBQFyBAJiWgkAkQMCBQJiSwUBcwQCYkMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdAQCYkQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiSwUBdQQCY2EJAJEDAgUCYksFAXAEAmNiCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUCYlgJAKwCAgkArAICAgZBc3NldCAFAmJYAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQMJAQIhPQIFAmJYBQJiVgkAAgECFUludmFsaWQgYXNzZXQgcGFzc2VkLgQCY2MJAQJidwEFAmJZBAJjZAkBAUQCBQJjYwUCYkMEAmNlCQECYncBBQJiWgQCY2YJAQFEAgUCY2UFAmJEBAJjZwkBAmJ5AgUCY2YFAmNkBAJjaAkBAUcCBQJjZwUBYgQCY2kJAQFEAgUCYlcFAWIEAmNqCQEBRAIFAmNiBQFiBAJjawkAvAIDBQJjZAUCY2kFAmNqBAJjbAkAvAIDBQJjZgUCY2kFAmNqBAJjbQkBAUcCBQJjawUCYkMEAmNuCQEBRwIFAmNsBQJiRAQCY28DCQAAAgUCYlUCAAUDbmlsCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAVgFAmNtAwkAAAIFAmJZAgVXQVZFUwUEdW5pdAkA2QQBBQJiWQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQFYBQJjbgMJAAACBQJiWgIFV0FWRVMFBHVuaXQJANkEAQUCYloJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVoCCQClCAEFAVgFAmJVCQECYnMGBQJjbQUCY24FAmJXBQJjaAUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVMABQJjaAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVQCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjaAUDbmlsCQCcCgoFAmNtBQJjbgUCYlkFAmJaBQJjYwUCY2UFAmNiBQJjZwUCY2EFAmNvAQJjcAkCYlUCY3ECY3ICY3MCY3QCY3UBWAJjdgJjdwQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmN4CQCRAwIFAmJLBQFyBAJjeQkAkQMCBQJiSwUBcwQCY3oJAJEDAgUCYksFAXYEAmNBCQCRAwIFAmJLBQF3BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJjYQkAkQMCBQJiSwUBcAQCY2IICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlgJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYlgCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJjQgkA2AQBCQELdmFsdWVPckVsc2UCBQJjcwkA2QQBAgVXQVZFUwQCY0MJANgEAQkBC3ZhbHVlT3JFbHNlAgUCY3UJANkEAQIFV0FWRVMDAwkBAiE9AgUCY3gFAmNCBgkBAiE9AgUCY3kFAmNDCQACAQIiSW52YWxpZCBhbXQgb3IgcHJpY2UgYXNzZXQgcGFzc2VkLgQCY2MDBQJjdgkBAmJ3AQUCY3gJAGUCCQECYncBBQJjeAUCY3IEAmNlAwUCY3YJAQJidwEFAmN5CQBlAgkBAmJ3AQUCY3kFAmN0BAJjRAkBAUQCBQJjcgUCYkwEAmNFCQEBRAIFAmN0BQJiTQQCY0YJAQJieQIFAmNFBQJjRAQCY2QJAQFEAgUCY2MFAmJMBAJjZgkBAUQCBQJjZQUCYk0EAmNHAwkAAAIFAmNiAAAEAmNnBQFlBAJjSAUBZQQCYk8JAHYGCQC5AgIFAmNEBQJjRQAACQC2AgEABQABAAAFBERPV04JAJcKBQkBAUcCBQJiTwUBYgkBAUcCBQJjRAUCYkwJAQFHAgUCY0UFAmJNCQECYnkCCQC3AgIFAmNmBQJjRQkAtwICBQJjZAUCY0QFAmNIBAJjZwkBAmJ5AgUCY2YFAmNkBAJjSAkAvAIDCQEBTwEJALgCAgUCY2cFAmNGBQFkBQJjZwQCY0kJAQFEAgUCY3EFAWIDAwkBAiE9AgUCY2cFAWUJAL8CAgUCY0gFAmNJBwkAAgEJAKwCAgkArAICCQCsAgICD1ByaWNlIHNsaXBwYWdlIAkApgMBBQJjSAIeIGV4Y2VlZGVkIHRoZSBwYXNzZWQgbGltaXQgb2YgCQCmAwEFAmNJBAJjagkBAUQCBQJjYgUBYgQCY0oJAL0CBAUCY0QFAmNnBQFkBQdDRUlMSU5HBAJjSwkAvQIEBQJjRQUBZAUCY2cFB0NFSUxJTkcEAmNMAwkAvwICBQJjSgUCY0UJAJQKAgUCY0sFAmNFCQCUCgIFAmNEBQJjSgQCY00IBQJjTAJfMQQCY04IBQJjTAJfMgQCYk8JALwCAwUCY2oFAmNOBQJjZgkAlwoFCQEBRwIFAmJPBQFiCQEBRwIFAmNNBQJiTAkBAUcCBQJjTgUCYk0FAmNnBQJjSAQCY08IBQJjRwJfMQQCY1AIBQJjRwJfMgQCY1EIBQJjRwJfMwQCY2gJAQFHAggFAmNHAl80BQFiBAJjUgkBAUcCCAUCY0cCXzUFAWIDCQBnAgAABQJjTwkAAgECNkludmFsaWQgY2FsY3VsYXRpb25zLiBMUCBjYWxjdWxhdGVkIGlzIGxlc3MgdGhhbiB6ZXJvLgQCY1MDCQEBIQEFAmN3AAAFAmNPBAJjVAkAZQIFAmNyBQJjUAQCY1UJAGUCBQJjdAUCY1EEAmNWCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmNoCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNoCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFXAgUBWAUCYlUJAQJiaAoFAmNQBQJjUQUCY1MFAmNoBQJjcQUCY1IFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNUBQJjVQUDbmlsCQCfCg0FAmNPBQJjUwUCY2gFAmNjBQJjZQUCY2IFAmJYBQJjYQUCY1YFAmNUBQJjVQUCY3MFAmN1AQJjVwMCY1gCY1kCY2IEAmNaCQC8AgMJAHYGCQC5AgIFAmNYBQJjWQAACQC2AgEABQABABIFBERPV04FAWcFAmNiAwkAAAIFAmNiBQFmBQFmBQJjWgECZGEDAmRiAmRjAmRkBAJkZQkAuAICCQC2AgEJAQJidwEJAQJhUwEFAmJhBQJkYgQCZGYJALgCAgkAtgIBCQECYncBCQECYVMBBQJiYgUCZGMEAmRnCQC4AgIJALYCAQgJAQV2YWx1ZQEJAOwHAQUCYVoIcXVhbnRpdHkFAmRkBAJkaAkBAmNXAwUCZGUFAmRmBQJkZwUCZGgBAmRpAwJkagJkawJkZAQCZGUJAGQCCQECYncBCQECYVMBBQJiYQUCZGoEAmRmCQBkAgkBAmJ3AQkBAmFTAQUCYmIFAmRrBAJkZwkAZAIICQEFdmFsdWUBCQDsBwEFAmFaCHF1YW50aXR5BQJkZAQCY1oJAQJjVwMJALYCAQUCZGUJALYCAQUCZGYJALYCAQUCZGcEAmRsCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJhZwUGaGVpZ2h0CQDMCAIJAQtTdHJpbmdFbnRyeQIFAmFmCQCmAwEFAmNaBQNuaWwJAJQKAgUCZGwFAmNaAQJkbQICZG4CY1oDCQDAAgIFAmNaBQJkbgYJAQJhRwEJALkJAgkAzAgCAiJ1cGRhdGVkIEtMcCBsb3dlciB0aGFuIGN1cnJlbnQgS0xwCQDMCAIJAKYDAQUCZG4JAMwIAgkApgMBBQJjWgUDbmlsAgEgAQJkbwECZHAEAmRxCAUCZHAGYW1vdW50BAJkcgkAbgQIBQJkcAZhbW91bnQIBQJkcAVwcmljZQUBYgUFRkxPT1IEAmRzAwkAAAIIBQJkcAlvcmRlclR5cGUFA0J1eQkAlAoCBQJkcQkBAS0BBQJkcgkAlAoCCQEBLQEFAmRxBQJkcgQCZGoIBQJkcwJfMQQCZGsIBQJkcwJfMgMDAwkBAmFMAAYJAAACBQJhWQUBbQYJAAACBQJhWQUBbgkAAgECHEV4Y2hhbmdlIG9wZXJhdGlvbnMgZGlzYWJsZWQDAwkBAiE9AggIBQJkcAlhc3NldFBhaXILYW1vdW50QXNzZXQFAmJhBgkBAiE9AggIBQJkcAlhc3NldFBhaXIKcHJpY2VBc3NldAUCYmIJAAIBAhNXcm9uZyBvcmRlciBhc3NldHMuBAJkdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCoAwEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQJhZgkBAmFJAQIPa0xwIGlzIHJlcXVpcmVkCQECYUkBAgtpbnZhbGlkIGtMcAQCZHUJAQJkaQMFAmRqBQJkawAABAJkdggFAmR1Al8xBAJkdwgFAmR1Al8yBAJkeAkAwAICBQJkdwUCZHQFAmR4AQJkeQECZHoDCQECIT0CCQCQAwEIBQJkeghwYXltZW50cwABCQACAQIdZXhhY3RseSAxIHBheW1lbnQgaXMgZXhwZWN0ZWQEAmRBCQEFdmFsdWUBCQCRAwIIBQJkeghwYXltZW50cwAABAJiVgkBBXZhbHVlAQgFAmRBB2Fzc2V0SWQEAmRCCAUCZEEGYW1vdW50BAJjRwkBAmJUBAkA2AQBCAUCZHoNdHJhbnNhY3Rpb25JZAkA2AQBBQJiVgUCZEIIBQJkegZjYWxsZXIEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJjRwJfOQQCY28IBQJjRwNfMTADAwkBAmFMAAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsR2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EJAJcKBQUCY20FAmNuBQJkQgUCYlYFAmNvAQJkQwMCZHoCY3ECY3cDCQECIT0CCQCQAwEIBQJkeghwYXltZW50cwACCQACAQIfZXhhY3RseSAyIHBheW1lbnRzIGFyZSBleHBlY3RlZAQCZEQJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAAEAmRFCQEFdmFsdWUBCQCRAwIIBQJkeghwYXltZW50cwABBAJkRgkBAmNwCQkA2AQBCAUCZHoNdHJhbnNhY3Rpb25JZAUCY3EIBQJkRAZhbW91bnQIBQJkRAdhc3NldElkCAUCZEUGYW1vdW50CAUCZEUHYXNzZXRJZAkApQgBCAUCZHoGY2FsbGVyBwUCY3cEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJkRgJfOAMDAwkBAmFMAAYJAAACBQJjYQUBbAYJAAACBQJjYQUBbgkAAgEJAKwCAgIsUHV0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluLiBTdGF0dXMgPSAJAKQDAQUCY2EFAmRGAQJkRwECZEgEAmRJCQD8BwQFAmFKAgRlbWl0CQDMCAIFAmRIBQNuaWwFA25pbAMJAAACBQJkSQUCZEkEAmRKBAJkSwUCZEkDCQABAgUCZEsCB0FkZHJlc3MEAmRMBQJkSwkA/AcEBQJkTAIEZW1pdAkAzAgCBQJkSAUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCZEoFAmRKBQJkSAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECZE0BAmRIBAJkTgkAawMFAmRIBQJhZQUBYgkAlAoCCQBlAgUCZEgFAmROBQJkTgECZE8EAmRQAmRRAVgBWQQCZFIJAAACBQFZBQR1bml0BAJkUwkBAmJ3AQkBAmFTAQUCYmEEAmRUCQECYncBCQECYVMBBQJiYgQCZFUDCQAAAgUCZFEFAmJhBgMJAAACBQJkUQUCYmIHCQECYUcBAg1pbnZhbGlkIGFzc2V0BAJkVgMFAmRSCQCUCgIFAmRTBQJkVAMFAmRVCQCUCgIJAGUCBQJkUwUCZFAFAmRUCQCUCgIFAmRTCQBlAgUCZFQFAmRQBAJkVwgFAmRWAl8xBAJkWAgFAmRWAl8yBAJkWQMFAmRVCQCUCgIFAmRQAAAJAJQKAgAABQJkUAQCZFoIBQJkWQJfMQQCZWEIBQJkWQJfMgQCZHEICQECZE0BBQJkWgJfMQQCZHIICQECZE0BBQJlYQJfMQQCZWIJAQJkTQEFAmRQBAJlYwgFAmViAl8xBAJkTggFAmViAl8yBAJlZAkAZAIFAmRXBQJkcQQCZWUJAGQCBQJkWAUCZHIEAmVmCQECYnkCCQEBRAIFAmVlBQJiZAkBAUQCBQJlZAUCYmMEAmVnCQEBRwIFAmVmBQFiBAJlaAMFAmRVBQJkVwUCZFgEAmVpCQC2AgEFAmVoBAJlagkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmFaCQCsAgIJAKwCAgIGYXNzZXQgCQDYBAEFAmFaAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZWsDCQC/AgIFAmVqBQFmBgkBAmFHAQIiaW5pdGlhbCBkZXBvc2l0IHJlcXVpcmVzIGFsbCBjb2lucwMJAAACBQJlawUCZWsEAmVsCQC2AgEFAmVjBAJlbQkAlgMBCQDMCAIAAAkAzAgCCQCgAwEJALoCAgkAuQICBQJlagkAuAICCQEKc3FydEJpZ0ludAQJALcCAgUBZAkAugICCQC5AgIFAmVsBQFkBQJlaQASABIFBERPV04FAWQFAWQFA25pbAQCY1YDBQJkUgUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmVnCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVnCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFXAgkApQgBCQEFdmFsdWUBBQFYCQDYBAEJAQV2YWx1ZQEFAVkJAQJiaAoFAmRaBQJlYQUCZW0FAmVnAAAAAAUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAAAAAAFA25pbAQCZW4JAQJieQIJAQFEAgUCZFgFAmJkCQEBRAIFAmRXBQJiYwQCZW8JAQFHAgUCZW4FAWIEAmVwBAJlcQMFAmRVCQCUCgIFAmRaBQJkVwkAlAoCBQJlYQUCZFgEAmRICAUCZXECXzEEAmVyCAUCZXECXzIEAmVzCQCgAwEJALwCAwUCZWoJALYCAQkAaQIFAmRIAAIJALYCAQUCZXIJAGsDCQBlAgUCZW0FAmVzBQFiBQJlcwkAlwoFBQJlbQUCY1YFAmROBQJlcAUCZFUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmV0BQJldQJlYwJkUQFYAVkEAmRSCQAAAgUBWQUEdW5pdAQCZXYJAMwIAgMJAAACBQJkUQUCYVoGCQECYUcBAhBpbnZhbGlkIGxwIGFzc2V0BQNuaWwDCQAAAgUCZXYFAmV2BAJldwMJAAACBQJldQUCYmEGAwkAAAIFAmV1BQJiYgcJAQJhRwECDWludmFsaWQgYXNzZXQEAmV4AwUCZXcJALYCAQkBAmJ3AQkBAmFTAQUCYmEJALYCAQkBAmJ3AQkBAmFTAQUCYmIEAmV5CQECYncBCQECYVMBBQJiYQQCZXoJAQJidwEJAQJhUwEFAmJiBAJlQQMFAmV3BQJleQUCZXoEAmVCCQC2AgEFAmVBBAJlagkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFAmFaCQCsAgIJAKwCAgIGYXNzZXQgCQDYBAEFAmFaAg4gZG9lc24ndCBleGlzdAhxdWFudGl0eQQCZUMJALYCAQUCZWMEAmVECQCWAwEJAMwIAgAACQDMCAIJAKADAQkAugICCQC5AgIFAmV4CQC4AgIFAWQJAHYGCQC4AgIFAWQJALoCAgkAuQICBQJlQwUBZAUCZWoAEgUBaAAAABIFBERPV04FAWQFA25pbAQCZUUJAQJkTQEFAmVEBAJlRggFAmVFAl8xBAJkTggFAmVFAl8yBAJlRwMFAmV3CQCWCgQFAmVGAAAJAGUCBQJleQUCZUQFAmV6CQCWCgQAAAUCZUYFAmV5CQBlAgUCZXoFAmVEBAJlSAgFAmVHAl8xBAJlSQgFAmVHAl8yBAJlSggFAmVHAl8zBAJlSwgFAmVHAl80BAJlZgkBAmJ5AgkBAUQCBQJlSwUCYmQJAQFEAgUCZUoFAmJjBAJlZwkBAUcCBQJlZgUBYgQCY1YDBQJkUgUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFaAgkApQgBCQEFdmFsdWUBBQFYCQDYBAEJAQV2YWx1ZQEFAVkJAQJicwYFAmVIBQJlSQUCZWMFAmVnBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmVnCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVnBQNuaWwEAmVuCQECYnkCCQEBRAIFAmV6BQJiZAkBAUQCBQJleQUCYmMEAmVvCQEBRwIFAmVuBQFiBAJlcAQCZUwJAGgCCQCgAwEJALwCAwUCZXgFAmVDBQJlagACCQBrAwkAZQIFAmVGBQJlTAUBYgUCZUwJAJcKBQUCZUYFAmNWBQJkTgUCZXAFAmV3CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJlTQAEAmRLCQCiCAEJAQFRAAMJAAECBQJkSwIGU3RyaW5nBAJlTgUCZEsJANkEAQUCZU4DCQABAgUCZEsCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECZU8ABAJkSwkAoggBCQEBUgADCQABAgUCZEsCBlN0cmluZwQCZU4FAmRLCQDZBAEFAmVOAwkAAQIFAmRLAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBAmVQAQJkegQCZEsJAQJlTQADCQABAgUCZEsCCkJ5dGVWZWN0b3IEAmVRBQJkSwkAAAIIBQJkeg9jYWxsZXJQdWJsaWNLZXkFAmVRAwkAAQIFAmRLAgRVbml0CQAAAggFAmR6BmNhbGxlcgUEdGhpcwkAAgECC01hdGNoIGVycm9yAQJlUgECZHoEAmVTCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEAmRLCQECZU0AAwkAAQIFAmRLAgpCeXRlVmVjdG9yBAJlUQUCZEsDCQAAAggFAmR6D2NhbGxlclB1YmxpY0tleQUCZVEGBQJlUwMJAAECBQJkSwIEVW5pdAMJAAACCAUCZHoGY2FsbGVyBQR0aGlzBgUCZVMJAAIBAgtNYXRjaCBlcnJvchsCZHoBCnNldE1hbmFnZXIBAmVUBAJlVQkBAmVSAQUCZHoDCQAAAgUCZVUFAmVVBAJlVgkA2QQBBQJlVAMJAAACBQJlVgUCZVYJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVIABQJlVAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQ5jb25maXJtTWFuYWdlcgAEAmVXCQECZU8ABAJlWAMJAQlpc0RlZmluZWQBBQJlVwYJAAIBAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUCZVgFAmVYBAJlWQMJAAACCAUCZHoPY2FsbGVyUHVibGljS2V5CQEFdmFsdWUBBQJlVwYJAAIBAhtZb3UgYXJlIG5vdCBwZW5kaW5nIG1hbmFnZXIDCQAAAgUCZVkFAmVZCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFRAAkA2AQBCQEFdmFsdWUBBQJlVwkAzAgCCQELRGVsZXRlRW50cnkBCQEBUgAFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEDcHV0AgJjcQJlWgMJAGYCAAAFAmNxCQACAQIgSW52YWxpZCBzbGlwcGFnZVRvbGVyYW5jZSBwYXNzZWQEAmRGCQECZEMDBQJkegUCY3EGBAJjUwgFAmRGAl8yBAJiWAgFAmRGAl83BAJjbwgFAmRGAl85BAJjVAgFAmRGA18xMAQCY1UIBQJkRgNfMTEEAmZhCAUCZEYDXzEyBAJmYggFAmRGA18xMwQCZEQJALYCAQgJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAAGYW1vdW50BAJkRQkAtgIBCAkBBXZhbHVlAQkAkQMCCAUCZHoIcGF5bWVudHMAAQZhbW91bnQEAmRlCQC4AgIJALYCAQkBAmJ3AQkBAmFTAQUCYmEFAmREAwkAAAIFAmRlBQJkZQQCZGYJALgCAgkAtgIBCQECYncBCQECYVMBBQJiYgUCZEUDCQAAAgUCZGYFAmRmBAJkZwkAtgIBCAkBBXZhbHVlAQkA7AcBBQJhWghxdWFudGl0eQMJAAACBQJkZwUCZGcEAmRoCQECZGEDBQJkRAUCZEUJALYCAQAAAwkAAAIFAmRoBQJkaAQCZEkJAPwHBAUCYUoCBGVtaXQJAMwIAgUCY1MFA25pbAUDbmlsAwkAAAIFAmRJBQJkSQQCZEoEAmRLBQJkSQMJAAECBQJkSwIHQWRkcmVzcwQCZEwFAmRLCQD8BwQFAmRMAgRlbWl0CQDMCAIFAmNTBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkSgUCZEoEAmZjAwkAZgIFAmNUAAAJAPwHBAUCYmcCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJmYQUCY1QFA25pbAUDbmlsAwkAAAIFAmZjBQJmYwQCZmQDCQBmAgUCY1UAAAkA/AcEBQJiZwIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmZiBQJjVQUDbmlsBQNuaWwDCQAAAgUCZmQFAmZkBAJmZQMFAmVaBAJmZgkA/AcEBQJiZgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlgFAmNTBQNuaWwDCQAAAgUCZmYFAmZmBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmR6BmNhbGxlcgUCY1MFAmJYBQNuaWwEAmZnCAkBBXZhbHVlAQkA7AcBBQJhWghxdWFudGl0eQMJAAACBQJmZwUCZmcEAmZoCQECZGkDAAAAAAAAAwkAAAIFAmZoBQJmaAQCY1oIBQJmaAJfMgQCZmkIBQJmaAJfMQQCZmoJAQJhRwEJALkJAgkAzAgCCQCmAwEFAmRlCQDMCAIJAKYDAQUCZGYJAMwIAgkApgMBBQJkZwkAzAgCCQCmAwEFAmRoCQDMCAIJAKYDAQUCY1oJAMwIAgkApAMBBQJjUwkAzAgCCQCkAwEFAmNUCQDMCAIJAKQDAQUCY1UJAMwIAgkApgMBBQJkZwkAzAgCCQCkAwEFAmZnBQNuaWwCASADCQAAAgUCZmoFAmZqBAJmawkBAmRtAgUCZGgFAmNaAwkAAAIFAmZrBQJmawkAzggCCQDOCAIFAmNvBQJmZQUCZmkJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBCnB1dEZvckZyZWUBAmZsAwkAZgIAAAUCZmwJAAIBAhRJbnZhbGlkIHZhbHVlIHBhc3NlZAQCZEYJAQJkQwMFAmR6BQJmbAcEAmNvCAUCZEYCXzkEAmRECQC2AgEICQEFdmFsdWUBCQCRAwIIBQJkeghwYXltZW50cwAABmFtb3VudAQCZEUJALYCAQgJAQV2YWx1ZQEJAJEDAggFAmR6CHBheW1lbnRzAAEGYW1vdW50BAJkaAkBAmRhAwUCZEQFAmRFCQC2AgEAAAMJAAACBQJkaAUCZGgEAmZtCQECZGkDAAAAAAAABAJmaQgFAmZtAl8xBAJjWggFAmZtAl8yBAJmawkBAmRtAgUCZGgFAmNaAwkAAAIFAmZrBQJmawkAzggCBQJjbwUCZmkJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHoBCXB1dE9uZVRrbgICZm4CZm8EAmZwCgACZnEJAPwHBAUCYUoCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgkApQgBBQR0aGlzBQNuaWwFA25pbAMJAAECBQJmcQIHQm9vbGVhbgUCZnEJAAIBCQCsAgIJAAMBBQJmcQIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZnIDAwMJAQJhTAAGCQAAAgUCYVkFAWwGCQAAAgUCYVkFAW4GBQJmcAQCZXYJAMwIAgMDCQEBIQEFAmZyBgkBAmVQAQUCZHoGCQECYUcBAiFwdXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkeghwYXltZW50cwABBgkBAmFHAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXYFAmV2BAJmcwkAkQMCCAUCZHoIcGF5bWVudHMAAAQCZFEIBQJmcwdhc3NldElkBAJkUAgFAmZzBmFtb3VudAQCZGgDCQAAAgUCZFEFAmJhCQECZGEDCQC2AgEFAmRQCQC2AgEAAAkAtgIBAAADCQAAAgUCZFEFAmJiCQECZGEDCQC2AgEAAAkAtgIBBQJkUAkAtgIBAAAJAQJhRwECHnBheW1lbnQgYXNzZXQgaXMgbm90IHN1cHBvcnRlZAQBWAgFAmR6BmNhbGxlcgQBWQgFAmR6DXRyYW5zYWN0aW9uSWQEAmZ0CQECZE8EBQJkUAUCZFEFAVgFAVkDCQAAAgUCZnQFAmZ0BAJkVQgFAmZ0Al81BAJmdQgFAmZ0Al80BAJkTggFAmZ0Al8zBAJjVggFAmZ0Al8yBAJmdggFAmZ0Al8xBAJmdwMDCQBmAgUCZm4AAAkAZgIFAmZuBQJmdgcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZm4FA25pbAIABQJmdgQCZEkJAQJkRwEFAmZ3AwkAAAIFAmRJBQJkSQQCZmUDBQJmbwQCZngJAPwHBAUCYmYCBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmFaBQJmdwUDbmlsAwkAAAIFAmZ4BQJmeAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJkegZjYWxsZXIFAmZ3BQJhWgUDbmlsBAJmeQMJAGYCBQJkTgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFLBQJkTgUCZFEFA25pbAUDbmlsBAJmegMJAAACBQR0aGlzBQJhSwkAlAoCAAAAAAMFAmRVCQCUCgIJAQEtAQUCZE4AAAkAlAoCAAAJAQEtAQUCZE4EAmRqCAUCZnoCXzEEAmRrCAUCZnoCXzIEAmZBCQECZGkDBQJkagUCZGsAAAQCZmkIBQJmQQJfMQQCY1oIBQJmQQJfMgQCZHQJAQV2YWx1ZQEJAKIIAQUCYWYEAmZrCQECZG0CBQJkaAUCY1oDCQAAAgUCZmsFAmZrCQCUCgIJAM4IAgkAzggCCQDOCAIFAmNWBQJmZQUCZnkFAmZpBQJmdwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegERcHV0T25lVGtuUkVBRE9OTFkCAmRRAmRQBAJmQgkBAmRPBAUCZFAJAQJhUQEFAmRRBQR1bml0BQR1bml0BAJmdggFAmZCAl8xBAJjVggFAmZCAl8yBAJkTggFAmZCAl8zBAJmdQgFAmZCAl80BAJkVQgFAmZCAl81CQCUCgIFA25pbAkAlQoDBQJmdgUCZE4FAmZ1AmR6AQlnZXRPbmVUa24CAmZDAmZuBAJmcAoAAmZxCQD8BwQFAmFKAihpc1Bvb2xPbmVUb2tlbk9wZXJhdGlvbnNEaXNhYmxlZFJFQURPTkxZCQDMCAIJAKUIAQUEdGhpcwUDbmlsBQNuaWwDCQABAgUCZnECB0Jvb2xlYW4FAmZxCQACAQkArAICCQADAQUCZnECHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4EAmZEAwMJAQJhTAAGCQAAAgUCYVkFAW4GBQJmcAQCZXYJAMwIAgMDCQEBIQEFAmZEBgkBAmVQAQUCZHoGCQECYUcBAiFnZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkeghwYXltZW50cwABBgkBAmFHAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUCZXYFAmV2BAJldQkBAmFRAQUCZkMEAmZzCQCRAwIIBQJkeghwYXltZW50cwAABAJkUQgFAmZzB2Fzc2V0SWQEAmVjCAUCZnMGYW1vdW50BAJkaAkBAmRhAwkAtgIBAAAJALYCAQAACQC2AgEFAmVjBAFYCAUCZHoGY2FsbGVyBAFZCAUCZHoNdHJhbnNhY3Rpb25JZAQCZkUJAQJldAUFAmV1BQJlYwUCZFEFAVgFAVkDCQAAAgUCZkUFAmZFBAJldwgFAmZFAl81BAJmdQgFAmZFAl80BAJkTggFAmZFAl8zBAJjVggFAmZFAl8yBAJmRggFAmZFAl8xBAJkSAMDCQBmAgUCZm4AAAkAZgIFAmZuBQJmRgcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZm4FA25pbAIABQJmRgQCZkcJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZWMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZFEFAmVjBQNuaWwDCQAAAgUCZkcFAmZHBAJmSAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQFYBQJkSAUCZXUFA25pbAQCZnkDCQBmAgUCZE4AAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZE4FAmV1BQNuaWwFA25pbAQCZkkEAmZKAwkAAAIFBHRoaXMFAmFLAAAFAmROAwUCZXcJAJQKAgkBAS0BCQBkAgUCZEgFAmZKAAAJAJQKAgAACQEBLQEJAGQCBQJkSAUCZkoEAmRqCAUCZkkCXzEEAmRrCAUCZkkCXzIEAmZLCQECZGkDBQJkagUCZGsAAAQCZmkIBQJmSwJfMQQCY1oIBQJmSwJfMgQCZmsJAQJkbQIFAmRoBQJjWgMJAAACBQJmawUCZmsJAJQKAgkAzggCCQDOCAIJAM4IAgUCY1YFAmZIBQJmeQUCZmkFAmRICQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6ARFnZXRPbmVUa25SRUFET05MWQICZXUCZWMEAmZMCQECZXQFCQECYVEBBQJldQUCZWMFAmFaBQR1bml0BQR1bml0BAJmRggFAmZMAl8xBAJjVggFAmZMAl8yBAJkTggFAmZMAl8zBAJmdQgFAmZMAl80BAJldwgFAmZMAl81CQCUCgIFA25pbAkAlQoDBQJmRgUCZE4FAmZ1AmR6ARN1bnN0YWtlQW5kR2V0T25lVGtuAwJmTQJmQwJmbgQCZnAKAAJmcQkA/AcEBQJhSgIoaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWRSRUFET05MWQkAzAgCCQClCAEFBHRoaXMFA25pbAUDbmlsAwkAAQIFAmZxAgdCb29sZWFuBQJmcQkAAgEJAKwCAgkAAwEFAmZxAhwgY291bGRuJ3QgYmUgY2FzdCB0byBCb29sZWFuBAJmRAMDCQECYUwABgkAAAIFAmFZBQFuBgUCZnAEAmV2CQDMCAIDAwkBASEBBQJmRAYJAQJlUAEFAmR6BgkBAmFHAQIhZ2V0IG9wZXJhdGlvbiBpcyBibG9ja2VkIGJ5IGFkbWluCQDMCAIDCQAAAgkAkAMBCAUCZHoIcGF5bWVudHMAAAYJAQJhRwECGG5vIHBheW1lbnRzIGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmV2BQJldgQCZXUJAQJhUQEFAmZDBAFYCAUCZHoGY2FsbGVyBAFZCAUCZHoNdHJhbnNhY3Rpb25JZAQCZGgJAQJkYQMJALYCAQAACQC2AgEAAAkAtgIBAAAEAmZOCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYVoJAMwIAgUCZk0FA25pbAUDbmlsAwkAAAIFAmZOBQJmTgQCZk8JAQJldAUFAmV1BQJmTQUCYVoFAVgFAVkDCQAAAgUCZk8FAmZPBAJldwgFAmZPAl81BAJmdQgFAmZPAl80BAJkTggFAmZPAl8zBAJjVggFAmZPAl8yBAJmRggFAmZPAl8xBAJkSAMDCQBmAgUCZm4AAAkAZgIFAmZuBQJmRgcJAQJhRwEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZm4FA25pbAIABQJmRgQCZkcJAPwHBAUCYUoCBGJ1cm4JAMwIAgUCZk0FA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYVoFAmZNBQNuaWwDCQAAAgUCZkcFAmZHBAJmSAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHoGY2FsbGVyBQJkSAUCZXUFA25pbAQCZnkDCQBmAgUCZE4AAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhSwUCZE4FAmV1BQNuaWwFA25pbAQCZlAEAmZKAwkAAAIFBHRoaXMFAmFLAAAFAmROAwUCZXcJAJQKAgkBAS0BCQBkAgUCZEgFAmZKAAAJAJQKAgAACQEBLQEJAGQCBQJkSAUCZkoEAmRqCAUCZlACXzEEAmRrCAUCZlACXzIEAmZRCQECZGkDBQJkagUCZGsAAAQCZmkIBQJmUQJfMQQCY1oIBQJmUQJfMgQCZmsJAQJkbQIFAmRoBQJjWgMJAAACBQJmawUCZmsJAJQKAgkAzggCCQDOCAIJAM4IAgUCY1YFAmZIBQJmeQUCZmkFAmRICQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQNnZXQABAJjRwkBAmR5AQUCZHoEAmZSCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmRCCAUCY0cCXzMEAmJWCAUCY0cCXzQEAmNvCAUCY0cCXzUEAmRoCQECZGEDCQC2AgEAAAkAtgIBAAAJALYCAQUCZEIEAmZTCQD8BwQFAmFKAgRidXJuCQDMCAIFAmRCBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJWBQJkQgUDbmlsAwkAAAIFAmZTBQJmUwQCZlQJAQJkaQMJAQEtAQUCZlIJAQEtAQUCY24AAAQCZmkIBQJmVAJfMQQCY1oIBQJmVAJfMgQCZmsJAQJkbQIFAmRoBQJjWgMJAAACBQJmawUCZmsJAM4IAgUCY28FAmZpCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQlnZXROb0xlc3MCAmZVAmZWBAJjRwkBAmR5AQUCZHoEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmRCCAUCY0cCXzMEAmJWCAUCY0cCXzQEAmNvCAUCY0cCXzUDCQBmAgUCZlUFAmNtCQACAQkArAICCQCsAgIJAKwCAgIcbm9MZXNzVGhlbkFtdEFzc2V0IGZhaWxlZDogIAkApAMBBQJjbQIDIDwgCQCkAwEFAmZVAwkAZgIFAmZWBQJjbgkAAgEJAKwCAgkArAICCQCsAgICHW5vTGVzc1RoZW5QcmljZUFzc2V0IGZhaWxlZDogCQCkAwEFAmNuAgMgPCAJAKQDAQUCZlYEAmRoCQECZGEDCQC2AgEAAAkAtgIBAAAJALYCAQUCZEIEAmZTCQD8BwQFAmFKAgRidXJuCQDMCAIFAmRCBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJWBQJkQgUDbmlsAwkAAAIFAmZTBQJmUwQCZlcJAQJkaQMJAQEtAQUCY20JAQEtAQUCY24AAAQCZmkIBQJmVwJfMQQCY1oIBQJmVwJfMgQCZmsJAQJkbQIFAmRoBQJjWgMJAAACBQJmawUCZmsJAM4IAgUCY28FAmZpCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6AQ11bnN0YWtlQW5kR2V0AQJkSAQCZlgDCQECIT0CCQCQAwEIBQJkeghwYXltZW50cwAACQACAQIYTm8gcGF5bWVudHMgYXJlIGV4cGVjdGVkBgMJAAACBQJmWAUCZlgEAmJLCQECYU4ABAJiWAkA2QQBCQCRAwIFAmJLBQFxBAJkaAkBAmRhAwkAtgIBAAAJALYCAQAACQC2AgEAAAQCZk4JAPwHBAUCYmYCB3Vuc3Rha2UJAMwIAgkA2AQBBQJiWAkAzAgCBQJkSAUDbmlsBQNuaWwDCQAAAgUCZk4FAmZOBAJjRwkBAmJUBAkA2AQBCAUCZHoNdHJhbnNhY3Rpb25JZAkA2AQBBQJiWAUCZEgIBQJkegZjYWxsZXIEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJjRwJfOQQCY28IBQJjRwNfMTAEAmZZAwMJAQJhTAAGCQAAAgUCY2EFAW4JAAIBCQCsAgICLEdldCBvcGVyYXRpb24gaXMgYmxvY2tlZCBieSBhZG1pbi4gU3RhdHVzID0gCQCkAwEFAmNhBgMJAAACBQJmWQUCZlkEAmZTCQD8BwQFAmFKAgRidXJuCQDMCAIFAmRIBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJYBQJkSAUDbmlsAwkAAAIFAmZTBQJmUwQCZloJAQJkaQMJAQEtAQUCY20JAQEtAQUCY24AAAQCZmkIBQJmWgJfMQQCY1oIBQJmWgJfMgQCZmsJAQJkbQIFAmRoBQJjWgMJAAACBQJmawUCZmsJAM4IAgUCY28FAmZpCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6ARN1bnN0YWtlQW5kR2V0Tm9MZXNzAwJmTQJnYQJmVgQCZkQDCQECYUwABgkAAAIFAmFZBQFuBAJldgkAzAgCAwkBASEBBQJmRAYJAAIBAiFnZXQgb3BlcmF0aW9uIGlzIGJsb2NrZWQgYnkgYWRtaW4JAMwIAgMJAAACCQCQAwEIBQJkeghwYXltZW50cwAABgkAAgECGG5vIHBheW1lbnRzIGFyZSBleHBlY3RlZAUDbmlsAwkAAAIFAmV2BQJldgQCZGgJAQJkYQMJALYCAQAACQC2AgEAAAkAtgIBAAAEAmZOCQD8BwQFAmJmAgd1bnN0YWtlCQDMCAIJANgEAQUCYVoJAMwIAgUCZk0FA25pbAUDbmlsAwkAAAIFAmZOBQJmTgQCY0cJAQJiVAQJANgEAQgFAmR6DXRyYW5zYWN0aW9uSWQJANgEAQUCYVoFAmZNCAUCZHoGY2FsbGVyBAJjbQgFAmNHAl8xBAJjbggFAmNHAl8yBAJjbwgFAmNHA18xMAQCZ2IJAMwIAgMJAGcCBQJjbQUCZ2EGCQACAQkAuQkCCQDMCAICLGFtb3VudCBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZ2EFA25pbAIACQDMCAIDCQBnAgUCY24FAmZWBgkAAgEJALkJAgkAzAgCAitwcmljZSBhc3NldCBhbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZlYFA25pbAIABQNuaWwDCQAAAgUCZ2IFAmdiBAJmUwkA/AcEBQJhSgIEYnVybgkAzAgCBQJmTQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJhWgUCZk0FA25pbAMJAAACBQJmUwUCZlMEAmdjCQECZGkDCQEBLQEFAmNtCQEBLQEFAmNuAAAEAmZpCAUCZ2MCXzEEAmNaCAUCZ2MCXzIEAmZrCQECZG0CBQJkaAUCY1oDCQAAAgUCZmsFAmZrCQDOCAIFAmNvBQJmaQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkegEIYWN0aXZhdGUCAmdkAmdlAwkBAiE9AgkApQgBCAUCZHoGY2FsbGVyCQClCAEFAmFKCQACAQIScGVybWlzc2lvbnMgZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFhAAUCZ2QJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFiAAUCZ2UFA25pbAIHc3VjY2VzcwJkegEKcmVmcmVzaEtMcAAEAmdmCQELdmFsdWVPckVsc2UCCQCfCAEFAmFnAAAEAmdnAwkAZwIJAGUCBQZoZWlnaHQFAmdmBQJhagUEdW5pdAkBAmFHAQkAuQkCCQDMCAIJAKQDAQUCYWoJAMwIAgIvIGJsb2NrcyBoYXZlIG5vdCBwYXNzZWQgc2luY2UgdGhlIHByZXZpb3VzIGNhbGwFA25pbAIAAwkAAAIFAmdnBQJnZwQCZHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAqAMBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFAmFmAgEwCQECYUkBAgtpbnZhbGlkIGtMcAQCZ2gJAQJkaQMAAAAAAAAEAmdpCAUCZ2gCXzEEAmNaCAUCZ2gCXzIEAmRsAwkBAiE9AgUCZHQFAmNaBQJnaQkBAmFHAQISbm90aGluZyB0byByZWZyZXNoCQCUCgIFAmRsCQCmAwEFAmNaCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmR6ARxnZXRQb29sQ29uZmlnV3JhcHBlclJFQURPTkxZAAkAlAoCBQNuaWwJAQJhTgACZHoBHGdldEFjY0JhbGFuY2VXcmFwcGVyUkVBRE9OTFkBAmJ4CQCUCgIFA25pbAkBAmJ3AQUCYngCZHoBGWNhbGNQcmljZXNXcmFwcGVyUkVBRE9OTFkDAmJFAmJGAmJKBAJiUwkBAmJJAwUCYkUFAmJGBQJiSgkAlAoCBQNuaWwJAMwIAgkApgMBCQCRAwIFAmJTAAAJAMwIAgkApgMBCQCRAwIFAmJTAAEJAMwIAgkApgMBCQCRAwIFAmJTAAIFA25pbAJkegEUdG9YMThXcmFwcGVyUkVBRE9OTFkCAUUBRgkAlAoCBQNuaWwJAKYDAQkBAUQCBQFFBQFGAmR6ARZmcm9tWDE4V3JhcHBlclJFQURPTkxZAgFIAUkJAJQKAgUDbmlsCQEBRwIJAKcDAQUBSAUBSQJkegEeY2FsY1ByaWNlQmlnSW50V3JhcHBlclJFQURPTkxZAgJiegJiQQkAlAoCBQNuaWwJAKYDAQkBAmJ5AgkApwMBBQJiegkApwMBBQJiQQJkegEjZXN0aW1hdGVQdXRPcGVyYXRpb25XcmFwcGVyUkVBRE9OTFkJAmJVAmNxAmNyAmNzAmN0AmN1AVgCY3YCY3cJAJQKAgUDbmlsCQECY3AJBQJiVQUCY3EFAmNyBQJjcwUCY3QFAmN1BQFYBQJjdgUCY3cCZHoBI2VzdGltYXRlR2V0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZBAJiVQJiVgJiVwFYBAJjRwkBAmJUBAUCYlUFAmJWBQJiVwkBEUBleHRyTmF0aXZlKDEwNjIpAQUBWAkAlAoCBQNuaWwJAJwKCggFAmNHAl8xCAUCY0cCXzIIBQJjRwJfMwgFAmNHAl80CAUCY0cCXzUIBQJjRwJfNggFAmNHAl83CQCmAwEIBQJjRwJfOAgFAmNHAl85CAUCY0cDXzEwAmR6AQ1zdGF0c1JFQURPTkxZAAQCYksJAQJhTgAEAmJYCQDZBAEJAJEDAgUCYksFAXEEAmdqCQCRAwIFAmJLBQFyBAJnawkAkQMCBQJiSwUBcwQCY3oJAJEDAgUCYksFAXYEAmNBCQCRAwIFAmJLBQF3BAJiTAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF0BAJiTQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJLBQF1BAJnbAgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmdtCQECYncBBQJnagQCZ24JAQJidwEFAmdrBAJnbwMJAAACBQJnbAAACQDMCAIFAWUJAMwIAgUBZQkAzAgCBQFlBQNuaWwJAQJiSQMFAmdtBQJnbgUCZ2wEAmNoAAAEAmdwCQEBRwIJAJEDAgUCZ28AAQUBYgQCZ3EJAQFHAgkAkQMCBQJnbwACBQFiBAJncgkBBXZhbHVlAQkAmggCBQJhSgkBAmF1AQkApQgBBQR0aGlzCQCUCgIFA25pbAkAuQkCCQDMCAICDiVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCZ20JAMwIAgkApAMBBQJnbgkAzAgCCQCkAwEFAmdsCQDMCAIJAKQDAQUCY2gJAMwIAgkApAMBBQJncAkAzAgCCQCkAwEFAmdxCQDMCAIJAKQDAQUCZ3IFA25pbAUBagJkegEgZXZhbHVhdGVQdXRCeUFtb3VudEFzc2V0UkVBRE9OTFkBAmNyBAJiSwkBAmFOAAQCYlgJANkEAQkAkQMCBQJiSwUBcQQCY3gJAJEDAgUCYksFAXIEAmJZCQDZBAEFAmN4BAJjeQkAkQMCBQJiSwUBcwQCYloJANkEAQUCY3kEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJnbAgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmdtCQECYncBBQJjeAQCZ24JAQJidwEFAmN5BAJiRwkBAUQCBQJnbQUCYkwEAmJICQEBRAIFAmduBQJiTQQCY2cDCQAAAgUCZ2wAAAUBZQkBAmJ5AgUCYkgFAmJHBAJjRAkBAUQCBQJjcgUCYkwEAmNFCQC8AgMFAmNEBQJjZwUBZAQCY3QJAQFHAgUCY0UFAmJNBAJkRgkBAmNwCQIAAKDCHgUCY3IFAmJZBQJjdAUCYloCAAYHBAJjTwgFAmRGAl8xBAJncwgFAmRGAl8zBAJjYwgFAmRGAl80BAJjZQgFAmRGAl81BAJjYggFAmRGAl82CQCUCgIFA25pbAkAuQkCCQDMCAICECVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJjTwkAzAgCCQCkAwEJAQFHAgUCY2cFAWIJAMwIAgkApAMBBQJjYwkAzAgCCQCkAwEFAmNlCQDMCAIJAKQDAQUCY2IJAMwIAgUCY2EJAMwIAgkApAMBBQJjcgkAzAgCCQCkAwEFAmN0BQNuaWwFAWoCZHoBH2V2YWx1YXRlUHV0QnlQcmljZUFzc2V0UkVBRE9OTFkBAmN0BAJiSwkBAmFOAAQCYlgJANkEAQkAkQMCBQJiSwUBcQQCY3gJAJEDAgUCYksFAXIEAmJZCQDZBAEFAmN4BAJjeQkAkQMCBQJiSwUBcwQCYloJANkEAQUCY3kEAmJMCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXQEAmJNCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYksFAXUEAmNhCQCRAwIFAmJLBQFwBAJnbAgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiWAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiWAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmd0CQECYncBBQJjeAQCZ3UJAQJidwEFAmN5BAJndgkBAUQCBQJndAUCYkwEAmd3CQEBRAIFAmd1BQJiTQQCY2cDCQAAAgUCZ2wAAAUBZQkBAmJ5AgUCZ3cFAmd2BAJjRQkBAUQCBQJjdAUCYk0EAmNECQC8AgMFAmNFBQFkBQJjZwQCY3IJAQFHAgUCY0QFAmJMBAJkRgkBAmNwCQIAAKDCHgUCY3IFAmJZBQJjdAUCYloCAAYHBAJjTwgFAmRGAl8xBAJncwgFAmRGAl8zBAJjYwgFAmRGAl80BAJjZQgFAmRGAl81BAJjYggFAmRGAl82CQCUCgIFA25pbAkAuQkCCQDMCAICECVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJjTwkAzAgCCQCkAwEJAQFHAgUCY2cFAWIJAMwIAgkApAMBBQJjYwkAzAgCCQCkAwEFAmNlCQDMCAIJAKQDAQUCY2IJAMwIAgUCY2EJAMwIAgkApAMBBQJjcgkAzAgCCQCkAwEFAmN0BQNuaWwFAWoCZHoBE2V2YWx1YXRlR2V0UkVBRE9OTFkCAmd4Amd5BAJjRwkBAmJUBAIABQJneAUCZ3kFBHRoaXMEAmNtCAUCY0cCXzEEAmNuCAUCY0cCXzIEAmNjCAUCY0cCXzUEAmNlCAUCY0cCXzYEAmNiCAUCY0cCXzcEAmNoCAUCY0cCXzgEAmNhCQENcGFyc2VJbnRWYWx1ZQEIBQJjRwJfOQkAlAoCBQNuaWwJALkJAgkAzAgCAg4lZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmNtCQDMCAIJAKQDAQUCY24JAMwIAgkApAMBBQJjYwkAzAgCCQCkAwEFAmNlCQDMCAIJAKQDAQUCY2IJAMwIAgkApgMBBQJjaAkAzAgCCQCkAwEFAmNhBQNuaWwFAWoBAmd6AQJnQQAEAmdCBAJkSwkBAmVNAAMJAAECBQJkSwIKQnl0ZVZlY3RvcgQCZVEFAmRLBQJlUQMJAAECBQJkSwIEVW5pdAgFAmd6D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yBAJkSwUCZ3oDCQABAgUCZEsCBU9yZGVyBAJkcAUCZEsEAmdDCQECYU0ABAJhegkBAmRvAQUCZHAEAmFBCQD0AwMIBQJkcAlib2R5Qnl0ZXMJAJEDAggFAmRwBnByb29mcwAACAUCZHAPc2VuZGVyUHVibGljS2V5BAJhQgkA9AMDCAUCZHAJYm9keUJ5dGVzCQCRAwIIBQJkcAZwcm9vZnMAAQUCZ0MDAwMFAmF6BQJhQQcFAmFCBwYJAQJheQMFAmF6BQJhQQUCYUIDCQABAgUCZEsCFFNldFNjcmlwdFRyYW5zYWN0aW9uBAJlTgUCZEsEAmdECQD2AwEJAQV2YWx1ZQEIBQJlTgZzY3JpcHQEAmdFCQDbBAEJAQV2YWx1ZQEJAJ0IAgUCYUoJAQJhdwAEAmdGCQDxBwEFBHRoaXMDAwkAAAIFAmdFBQJnRAkBAiE9AgUCZ0YFAmdEBwYJAPQDAwgFAmd6CWJvZHlCeXRlcwkAkQMCCAUCZ3oGcHJvb2ZzAAAFAmdCCQD0AwMIBQJneglib2R5Qnl0ZXMJAJEDAggFAmd6BnByb29mcwAABQJnQkW6zQo=", "chainId": 84, "height": 2349956, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 7ErBRixD4T6iE1ExrqigAkA6B6otf3Sa4uJaFpuQy2BE Next: 7SWszB55GTh8FRL2oCxrW748zWdPTADYBjjd65sXNRVU Diff:
OldNewDifferences
342342 then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18)))
343343 else {
344344 let lpEmissionX18 = toX18(lpEmission, scale8)
345- let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
346- let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
345+ let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18, CEILING)
346+ let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18, CEILING)
347347 let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
348348 then $Tuple2(amViaPrX18, inPrAssetAmtX18)
349349 else $Tuple2(inAmAssetAmtX18, prViaAmX18)
374374
375375
376376 func calcKLp (amountBalance,priceBalance,lpEmission) = {
377- let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 12, DOWN), big1, lpEmission)
377+ let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 18, DOWN), big1, lpEmission)
378378 if ((lpEmission == big0))
379379 then big0
380380 else updatedKLp
408408 func validateMatcherOrderAllowed (order) = {
409409 let amountAssetAmount = order.amount
410410 let priceAssetAmount = fraction(order.amount, order.price, scale8, FLOOR)
411- let $t02034120553 = if ((order.orderType == Buy))
411+ let $t02035920571 = if ((order.orderType == Buy))
412412 then $Tuple2(amountAssetAmount, -(priceAssetAmount))
413413 else $Tuple2(-(amountAssetAmount), priceAssetAmount)
414- let amountAssetBalanceDelta = $t02034120553._1
415- let priceAssetBalanceDelta = $t02034120553._2
414+ let amountAssetBalanceDelta = $t02035920571._1
415+ let priceAssetBalanceDelta = $t02035920571._2
416416 if (if (if (isGlobalShutdown())
417417 then true
418418 else (cfgPoolStatus == PoolMatcherDisabled))
425425 then throw("Wrong order assets.")
426426 else {
427427 let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
428- let $t02102421124 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
429- let unusedActions = $t02102421124._1
430- let kLpNew = $t02102421124._2
428+ let $t02104221142 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
429+ let unusedActions = $t02104221142._1
430+ let kLpNew = $t02104221142._2
431431 let isOrderValid = (kLpNew >= kLp)
432432 isOrderValid
433433 }
503503 else if ((paymentAssetId == cfgPriceAssetId))
504504 then false
505505 else throwErr("invalid asset")
506- let $t02380924102 = if (isEval)
506+ let $t02382724120 = if (isEval)
507507 then $Tuple2(amountBalanceRaw, priceBalanceRaw)
508508 else if (paymentInAmountAsset)
509509 then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
510510 else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
511- let amountBalanceOld = $t02380924102._1
512- let priceBalanceOld = $t02380924102._2
513- let $t02410624255 = if (paymentInAmountAsset)
511+ let amountBalanceOld = $t02382724120._1
512+ let priceBalanceOld = $t02382724120._2
513+ let $t02412424273 = if (paymentInAmountAsset)
514514 then $Tuple2(paymentAmountRaw, 0)
515515 else $Tuple2(0, paymentAmountRaw)
516- let amountAssetAmountRaw = $t02410624255._1
517- let priceAssetAmountRaw = $t02410624255._2
516+ let amountAssetAmountRaw = $t02412424273._1
517+ let priceAssetAmountRaw = $t02412424273._2
518518 let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
519519 let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
520- let $t02437724436 = takeFee(paymentAmountRaw)
521- let paymentAmount = $t02437724436._1
522- let feeAmount = $t02437724436._2
520+ let $t02439524454 = takeFee(paymentAmountRaw)
521+ let paymentAmount = $t02439524454._1
522+ let feeAmount = $t02439524454._2
523523 let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
524524 let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
525525 let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
542542 let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
543543 let priceOld = fromX18(priceOldX18, scale8)
544544 let loss = {
545- let $t02591326080 = if (paymentInAmountAsset)
545+ let $t02593126098 = if (paymentInAmountAsset)
546546 then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
547547 else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
548- let amount = $t02591326080._1
549- let balance = $t02591326080._2
548+ let amount = $t02593126098._1
549+ let balance = $t02593126098._2
550550 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
551551 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
552552 }
580580 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
581581 let redeemedBigInt = toBigInt(paymentAmount)
582582 let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
583- let $t02768227732 = takeFee(amountRaw)
584- let totalAmount = $t02768227732._1
585- let feeAmount = $t02768227732._2
586- let $t02773627962 = if (outInAmountAsset)
583+ let $t02770027750 = takeFee(amountRaw)
584+ let totalAmount = $t02770027750._1
585+ let feeAmount = $t02770027750._2
586+ let $t02775427980 = if (outInAmountAsset)
587587 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
588588 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
589- let outAmAmount = $t02773627962._1
590- let outPrAmount = $t02773627962._2
591- let amBalanceNew = $t02773627962._3
592- let prBalanceNew = $t02773627962._4
589+ let outAmAmount = $t02775427980._1
590+ let outPrAmount = $t02775427980._2
591+ let amBalanceNew = $t02775427980._3
592+ let prBalanceNew = $t02775427980._4
593593 let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
594594 let priceNew = fromX18(priceNewX18, scale8)
595595 let commonState = if (isEval)
703703 let prId = estPut._13
704704 let amAssetPmt = toBigInt(value(i.payments[0]).amount)
705705 let prAssetPmt = toBigInt(value(i.payments[1]).amount)
706- let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
707- if ((currentKLp == currentKLp))
706+ let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amAssetPmt)
707+ if ((amountAssetBalance == amountAssetBalance))
708708 then {
709- let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
710- if ((emitInv == emitInv))
709+ let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - prAssetPmt)
710+ if ((priceAssetBalance == priceAssetBalance))
711711 then {
712- let emitInvLegacy = match emitInv {
713- case legacyFactoryContract: Address =>
714- invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
715- case _ =>
716- unit
717- }
718- if ((emitInvLegacy == emitInvLegacy))
712+ let lpAssetEmission = toBigInt(value(assetInfo(cfgLpAssetId)).quantity)
713+ if ((lpAssetEmission == lpAssetEmission))
719714 then {
720- let slippageAInv = if ((amDiff > 0))
721- then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
722- else nil
723- if ((slippageAInv == slippageAInv))
715+ let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
716+ if ((currentKLp == currentKLp))
724717 then {
725- let slippagePInv = if ((prDiff > 0))
726- then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
727- else nil
728- if ((slippagePInv == slippagePInv))
718+ let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
719+ if ((emitInv == emitInv))
729720 then {
730- let lpTransfer = if (shouldAutoStake)
721+ let emitInvLegacy = match emitInv {
722+ case legacyFactoryContract: Address =>
723+ invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
724+ case _ =>
725+ unit
726+ }
727+ if ((emitInvLegacy == emitInvLegacy))
731728 then {
732- let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
733- if ((slpStakeInv == slpStakeInv))
734- then nil
735- else throw("Strict value is not equal to itself.")
736- }
737- else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
738- let $t03211432182 = refreshKLpInternal(0, 0, 0)
739- if (($t03211432182 == $t03211432182))
740- then {
741- let updatedKLp = $t03211432182._2
742- let refreshKLpActions = $t03211432182._1
743- let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
744- if ((isUpdatedKLpValid == isUpdatedKLpValid))
745- then ((state ++ lpTransfer) ++ refreshKLpActions)
729+ let slippageAInv = if ((amDiff > 0))
730+ then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
731+ else nil
732+ if ((slippageAInv == slippageAInv))
733+ then {
734+ let slippagePInv = if ((prDiff > 0))
735+ then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
736+ else nil
737+ if ((slippagePInv == slippagePInv))
738+ then {
739+ let lpTransfer = if (shouldAutoStake)
740+ then {
741+ let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
742+ if ((slpStakeInv == slpStakeInv))
743+ then nil
744+ else throw("Strict value is not equal to itself.")
745+ }
746+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
747+ let lpAssetEmissionAfter = value(assetInfo(cfgLpAssetId)).quantity
748+ if ((lpAssetEmissionAfter == lpAssetEmissionAfter))
749+ then {
750+ let $t03250032568 = refreshKLpInternal(0, 0, 0)
751+ if (($t03250032568 == $t03250032568))
752+ then {
753+ let updatedKLp = $t03250032568._2
754+ let refreshKLpActions = $t03250032568._1
755+ let error = throwErr(makeString([toString(amountAssetBalance), toString(priceAssetBalance), toString(lpAssetEmission), toString(currentKLp), toString(updatedKLp), toString(emitLpAmt), toString(amDiff), toString(prDiff), toString(lpAssetEmission), toString(lpAssetEmissionAfter)], " "))
756+ if ((error == error))
757+ then {
758+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
759+ if ((isUpdatedKLpValid == isUpdatedKLpValid))
760+ then ((state ++ lpTransfer) ++ refreshKLpActions)
761+ else throw("Strict value is not equal to itself.")
762+ }
763+ else throw("Strict value is not equal to itself.")
764+ }
765+ else throw("Strict value is not equal to itself.")
766+ }
767+ else throw("Strict value is not equal to itself.")
768+ }
769+ else throw("Strict value is not equal to itself.")
770+ }
746771 else throw("Strict value is not equal to itself.")
747772 }
748773 else throw("Strict value is not equal to itself.")
771796 let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
772797 if ((currentKLp == currentKLp))
773798 then {
774- let $t03274432809 = refreshKLpInternal(0, 0, 0)
775- let refreshKLpActions = $t03274432809._1
776- let updatedKLp = $t03274432809._2
799+ let $t03350033565 = refreshKLpInternal(0, 0, 0)
800+ let refreshKLpActions = $t03350033565._1
801+ let updatedKLp = $t03350033565._2
777802 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
778803 if ((isUpdatedKLpValid == isUpdatedKLpValid))
779804 then (state ++ refreshKLpActions)
818843 else throwErr("payment asset is not supported")
819844 let userAddress = i.caller
820845 let txId = i.transactionId
821- let $t03399434146 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
822- if (($t03399434146 == $t03399434146))
846+ let $t03475034902 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
847+ if (($t03475034902 == $t03475034902))
823848 then {
824- let paymentInAmountAsset = $t03399434146._5
825- let bonus = $t03399434146._4
826- let feeAmount = $t03399434146._3
827- let commonState = $t03399434146._2
828- let emitAmountEstimated = $t03399434146._1
849+ let paymentInAmountAsset = $t03475034902._5
850+ let bonus = $t03475034902._4
851+ let feeAmount = $t03475034902._3
852+ let commonState = $t03475034902._2
853+ let emitAmountEstimated = $t03475034902._1
829854 let emitAmount = if (if ((minOutAmount > 0))
830855 then (minOutAmount > emitAmountEstimated)
831856 else false)
845870 let sendFee = if ((feeAmount > 0))
846871 then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
847872 else nil
848- let $t03473234929 = if ((this == feeCollectorAddress))
873+ let $t03548835685 = if ((this == feeCollectorAddress))
849874 then $Tuple2(0, 0)
850875 else if (paymentInAmountAsset)
851876 then $Tuple2(-(feeAmount), 0)
852877 else $Tuple2(0, -(feeAmount))
853- let amountAssetBalanceDelta = $t03473234929._1
854- let priceAssetBalanceDelta = $t03473234929._2
855- let $t03493235040 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
856- let refreshKLpActions = $t03493235040._1
857- let updatedKLp = $t03493235040._2
878+ let amountAssetBalanceDelta = $t03548835685._1
879+ let priceAssetBalanceDelta = $t03548835685._2
880+ let $t03568835796 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
881+ let refreshKLpActions = $t03568835796._1
882+ let updatedKLp = $t03568835796._2
858883 let kLp = value(getString(keyKLp))
859884 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
860885 if ((isUpdatedKLpValid == isUpdatedKLpValid))
872897
873898 @Callable(i)
874899 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
875- let $t03534635503 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
876- let emitAmountEstimated = $t03534635503._1
877- let commonState = $t03534635503._2
878- let feeAmount = $t03534635503._3
879- let bonus = $t03534635503._4
880- let paymentInAmountAsset = $t03534635503._5
900+ let $t03610236259 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
901+ let emitAmountEstimated = $t03610236259._1
902+ let commonState = $t03610236259._2
903+ let feeAmount = $t03610236259._3
904+ let bonus = $t03610236259._4
905+ let paymentInAmountAsset = $t03610236259._5
881906 $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
882907 }
883908
912937 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(paymentAmount))
913938 let userAddress = i.caller
914939 let txId = i.transactionId
915- let $t03639736550 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
916- if (($t03639736550 == $t03639736550))
940+ let $t03715337306 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
941+ if (($t03715337306 == $t03715337306))
917942 then {
918- let outInAmountAsset = $t03639736550._5
919- let bonus = $t03639736550._4
920- let feeAmount = $t03639736550._3
921- let commonState = $t03639736550._2
922- let amountEstimated = $t03639736550._1
943+ let outInAmountAsset = $t03715337306._5
944+ let bonus = $t03715337306._4
945+ let feeAmount = $t03715337306._3
946+ let commonState = $t03715337306._2
947+ let amountEstimated = $t03715337306._1
923948 let amount = if (if ((minOutAmount > 0))
924949 then (minOutAmount > amountEstimated)
925950 else false)
932957 let sendFee = if ((feeAmount > 0))
933958 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
934959 else nil
935- let $t03705037297 = {
960+ let $t03780638053 = {
936961 let feeAmountForCalc = if ((this == feeCollectorAddress))
937962 then 0
938963 else feeAmount
940965 then $Tuple2(-((amount + feeAmountForCalc)), 0)
941966 else $Tuple2(0, -((amount + feeAmountForCalc)))
942967 }
943- let amountAssetBalanceDelta = $t03705037297._1
944- let priceAssetBalanceDelta = $t03705037297._2
945- let $t03730037408 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
946- let refreshKLpActions = $t03730037408._1
947- let updatedKLp = $t03730037408._2
968+ let amountAssetBalanceDelta = $t03780638053._1
969+ let priceAssetBalanceDelta = $t03780638053._2
970+ let $t03805638164 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
971+ let refreshKLpActions = $t03805638164._1
972+ let updatedKLp = $t03805638164._2
948973 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
949974 if ((isUpdatedKLpValid == isUpdatedKLpValid))
950975 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
961986
962987 @Callable(i)
963988 func getOneTknREADONLY (outAssetId,paymentAmount) = {
964- let $t03766537821 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
965- let amountEstimated = $t03766537821._1
966- let commonState = $t03766537821._2
967- let feeAmount = $t03766537821._3
968- let bonus = $t03766537821._4
969- let outInAmountAsset = $t03766537821._5
989+ let $t03842138577 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
990+ let amountEstimated = $t03842138577._1
991+ let commonState = $t03842138577._2
992+ let feeAmount = $t03842138577._3
993+ let bonus = $t03842138577._4
994+ let outInAmountAsset = $t03842138577._5
970995 $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
971996 }
972997
10011026 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
10021027 if ((unstakeInv == unstakeInv))
10031028 then {
1004- let $t03872338874 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1005- if (($t03872338874 == $t03872338874))
1029+ let $t03947939630 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1030+ if (($t03947939630 == $t03947939630))
10061031 then {
1007- let outInAmountAsset = $t03872338874._5
1008- let bonus = $t03872338874._4
1009- let feeAmount = $t03872338874._3
1010- let commonState = $t03872338874._2
1011- let amountEstimated = $t03872338874._1
1032+ let outInAmountAsset = $t03947939630._5
1033+ let bonus = $t03947939630._4
1034+ let feeAmount = $t03947939630._3
1035+ let commonState = $t03947939630._2
1036+ let amountEstimated = $t03947939630._1
10121037 let amount = if (if ((minOutAmount > 0))
10131038 then (minOutAmount > amountEstimated)
10141039 else false)
10211046 let sendFee = if ((feeAmount > 0))
10221047 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
10231048 else nil
1024- let $t03936939616 = {
1049+ let $t04012540372 = {
10251050 let feeAmountForCalc = if ((this == feeCollectorAddress))
10261051 then 0
10271052 else feeAmount
10291054 then $Tuple2(-((amount + feeAmountForCalc)), 0)
10301055 else $Tuple2(0, -((amount + feeAmountForCalc)))
10311056 }
1032- let amountAssetBalanceDelta = $t03936939616._1
1033- let priceAssetBalanceDelta = $t03936939616._2
1034- let $t03961939727 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1035- let refreshKLpActions = $t03961939727._1
1036- let updatedKLp = $t03961939727._2
1057+ let amountAssetBalanceDelta = $t04012540372._1
1058+ let priceAssetBalanceDelta = $t04012540372._2
1059+ let $t04037540483 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1060+ let refreshKLpActions = $t04037540483._1
1061+ let updatedKLp = $t04037540483._2
10371062 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10381063 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10391064 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
10621087 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10631088 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10641089 then {
1065- let $t04067540757 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1066- let refreshKLpActions = $t04067540757._1
1067- let updatedKLp = $t04067540757._2
1090+ let $t04143141513 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1091+ let refreshKLpActions = $t04143141513._1
1092+ let updatedKLp = $t04143141513._2
10681093 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10691094 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10701095 then (state ++ refreshKLpActions)
10921117 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10931118 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10941119 then {
1095- let $t04170841789 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1096- let refreshKLpActions = $t04170841789._1
1097- let updatedKLp = $t04170841789._2
1120+ let $t04246442545 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1121+ let refreshKLpActions = $t04246442545._1
1122+ let updatedKLp = $t04246442545._2
10981123 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10991124 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11001125 then (state ++ refreshKLpActions)
11341159 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
11351160 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11361161 then {
1137- let $t04291242993 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1138- let refreshKLpActions = $t04291242993._1
1139- let updatedKLp = $t04291242993._2
1162+ let $t04366843749 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1163+ let refreshKLpActions = $t04366843749._1
1164+ let updatedKLp = $t04366843749._2
11401165 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11411166 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11421167 then (state ++ refreshKLpActions)
11831208 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11841209 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11851210 then {
1186- let $t04428544366 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1187- let refreshKLpActions = $t04428544366._1
1188- let updatedKLp = $t04428544366._2
1211+ let $t04504145122 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1212+ let refreshKLpActions = $t04504145122._1
1213+ let updatedKLp = $t04504145122._2
11891214 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11901215 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11911216 then (state ++ refreshKLpActions)
12181243 if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
12191244 then {
12201245 let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp"))
1221- let $t04555345617 = refreshKLpInternal(0, 0, 0)
1222- let kLpUpdateActions = $t04555345617._1
1223- let updatedKLp = $t04555345617._2
1246+ let $t04630946373 = refreshKLpInternal(0, 0, 0)
1247+ let kLpUpdateActions = $t04630946373._1
1248+ let updatedKLp = $t04630946373._2
12241249 let actions = if ((kLp != updatedKLp))
12251250 then kLpUpdateActions
12261251 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)
345- let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
346- let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
345+ let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18, CEILING)
346+ let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18, CEILING)
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) = {
377- let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 12, DOWN), big1, lpEmission)
377+ let updatedKLp = fraction(pow((amountBalance * priceBalance), 0, toBigInt(5), 1, 18, DOWN), big1, lpEmission)
378378 if ((lpEmission == big0))
379379 then big0
380380 else updatedKLp
381381 }
382382
383383
384384 func calcCurrentKLp (amountAssetDelta,priceAssetDelta,lpAssetEmissionDelta) = {
385385 let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amountAssetDelta)
386386 let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - priceAssetDelta)
387387 let lpAssetEmission = (toBigInt(value(assetInfo(cfgLpAssetId)).quantity) - lpAssetEmissionDelta)
388388 let currentKLp = calcKLp(amountAssetBalance, priceAssetBalance, lpAssetEmission)
389389 currentKLp
390390 }
391391
392392
393393 func refreshKLpInternal (amountAssetBalanceDelta,priceAssetBalanceDelta,lpAssetEmissionDelta) = {
394394 let amountAssetBalance = (getAccBalance(assetIdToString(cfgAmountAssetId)) + amountAssetBalanceDelta)
395395 let priceAssetBalance = (getAccBalance(assetIdToString(cfgPriceAssetId)) + priceAssetBalanceDelta)
396396 let lpAssetEmission = (value(assetInfo(cfgLpAssetId)).quantity + lpAssetEmissionDelta)
397397 let updatedKLp = calcKLp(toBigInt(amountAssetBalance), toBigInt(priceAssetBalance), toBigInt(lpAssetEmission))
398398 let actions = [IntegerEntry(keyKLpRefreshedHeight, height), StringEntry(keyKLp, toString(updatedKLp))]
399399 $Tuple2(actions, updatedKLp)
400400 }
401401
402402
403403 func validateUpdatedKLp (oldKLp,updatedKLp) = if ((updatedKLp >= oldKLp))
404404 then true
405405 else throwErr(makeString(["updated KLp lower than current KLp", toString(oldKLp), toString(updatedKLp)], " "))
406406
407407
408408 func validateMatcherOrderAllowed (order) = {
409409 let amountAssetAmount = order.amount
410410 let priceAssetAmount = fraction(order.amount, order.price, scale8, FLOOR)
411- let $t02034120553 = if ((order.orderType == Buy))
411+ let $t02035920571 = if ((order.orderType == Buy))
412412 then $Tuple2(amountAssetAmount, -(priceAssetAmount))
413413 else $Tuple2(-(amountAssetAmount), priceAssetAmount)
414- let amountAssetBalanceDelta = $t02034120553._1
415- let priceAssetBalanceDelta = $t02034120553._2
414+ let amountAssetBalanceDelta = $t02035920571._1
415+ let priceAssetBalanceDelta = $t02035920571._2
416416 if (if (if (isGlobalShutdown())
417417 then true
418418 else (cfgPoolStatus == PoolMatcherDisabled))
419419 then true
420420 else (cfgPoolStatus == PoolShutdown))
421421 then throw("Exchange operations disabled")
422422 else if (if ((order.assetPair.amountAsset != cfgAmountAssetId))
423423 then true
424424 else (order.assetPair.priceAsset != cfgPriceAssetId))
425425 then throw("Wrong order assets.")
426426 else {
427427 let kLp = valueOrErrorMessage(parseBigInt(valueOrErrorMessage(getString(this, keyKLp), fmtErr("kLp is required"))), fmtErr("invalid kLp"))
428- let $t02102421124 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
429- let unusedActions = $t02102421124._1
430- let kLpNew = $t02102421124._2
428+ let $t02104221142 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
429+ let unusedActions = $t02104221142._1
430+ let kLpNew = $t02104221142._2
431431 let isOrderValid = (kLpNew >= kLp)
432432 isOrderValid
433433 }
434434 }
435435
436436
437437 func commonGet (i) = if ((size(i.payments) != 1))
438438 then throw("exactly 1 payment is expected")
439439 else {
440440 let pmt = value(i.payments[0])
441441 let pmtAssetId = value(pmt.assetId)
442442 let pmtAmt = pmt.amount
443443 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
444444 let outAmAmt = res._1
445445 let outPrAmt = res._2
446446 let poolStatus = parseIntValue(res._9)
447447 let state = res._10
448448 if (if (isGlobalShutdown())
449449 then true
450450 else (poolStatus == PoolShutdown))
451451 then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
452452 else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
453453 }
454454
455455
456456 func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2))
457457 then throw("exactly 2 payments are expected")
458458 else {
459459 let amAssetPmt = value(i.payments[0])
460460 let prAssetPmt = value(i.payments[1])
461461 let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp)
462462 let poolStatus = parseIntValue(estPut._8)
463463 if (if (if (isGlobalShutdown())
464464 then true
465465 else (poolStatus == PoolPutDisabled))
466466 then true
467467 else (poolStatus == PoolShutdown))
468468 then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus)))
469469 else estPut
470470 }
471471
472472
473473 func emit (amount) = {
474474 let emitInv = invoke(factoryContract, "emit", [amount], nil)
475475 if ((emitInv == emitInv))
476476 then {
477477 let emitInvLegacy = match emitInv {
478478 case legacyFactoryContract: Address =>
479479 invoke(legacyFactoryContract, "emit", [amount], nil)
480480 case _ =>
481481 unit
482482 }
483483 if ((emitInvLegacy == emitInvLegacy))
484484 then amount
485485 else throw("Strict value is not equal to itself.")
486486 }
487487 else throw("Strict value is not equal to itself.")
488488 }
489489
490490
491491 func takeFee (amount) = {
492492 let feeAmount = fraction(amount, fee, scale8)
493493 $Tuple2((amount - feeAmount), feeAmount)
494494 }
495495
496496
497497 func calcPutOneToken (paymentAmountRaw,paymentAssetId,userAddress,txId) = {
498498 let isEval = (txId == unit)
499499 let amountBalanceRaw = getAccBalance(assetIdToString(cfgAmountAssetId))
500500 let priceBalanceRaw = getAccBalance(assetIdToString(cfgPriceAssetId))
501501 let paymentInAmountAsset = if ((paymentAssetId == cfgAmountAssetId))
502502 then true
503503 else if ((paymentAssetId == cfgPriceAssetId))
504504 then false
505505 else throwErr("invalid asset")
506- let $t02380924102 = if (isEval)
506+ let $t02382724120 = if (isEval)
507507 then $Tuple2(amountBalanceRaw, priceBalanceRaw)
508508 else if (paymentInAmountAsset)
509509 then $Tuple2((amountBalanceRaw - paymentAmountRaw), priceBalanceRaw)
510510 else $Tuple2(amountBalanceRaw, (priceBalanceRaw - paymentAmountRaw))
511- let amountBalanceOld = $t02380924102._1
512- let priceBalanceOld = $t02380924102._2
513- let $t02410624255 = if (paymentInAmountAsset)
511+ let amountBalanceOld = $t02382724120._1
512+ let priceBalanceOld = $t02382724120._2
513+ let $t02412424273 = if (paymentInAmountAsset)
514514 then $Tuple2(paymentAmountRaw, 0)
515515 else $Tuple2(0, paymentAmountRaw)
516- let amountAssetAmountRaw = $t02410624255._1
517- let priceAssetAmountRaw = $t02410624255._2
516+ let amountAssetAmountRaw = $t02412424273._1
517+ let priceAssetAmountRaw = $t02412424273._2
518518 let amountAssetAmount = takeFee(amountAssetAmountRaw)._1
519519 let priceAssetAmount = takeFee(priceAssetAmountRaw)._1
520- let $t02437724436 = takeFee(paymentAmountRaw)
521- let paymentAmount = $t02437724436._1
522- let feeAmount = $t02437724436._2
520+ let $t02439524454 = takeFee(paymentAmountRaw)
521+ let paymentAmount = $t02439524454._1
522+ let feeAmount = $t02439524454._2
523523 let amountBalanceNew = (amountBalanceOld + amountAssetAmount)
524524 let priceBalanceNew = (priceBalanceOld + priceAssetAmount)
525525 let priceNewX18 = calcPriceBigInt(toX18(priceBalanceNew, cfgPriceAssetDecimals), toX18(amountBalanceNew, cfgAmountAssetDecimals))
526526 let priceNew = fromX18(priceNewX18, scale8)
527527 let paymentBalance = if (paymentInAmountAsset)
528528 then amountBalanceOld
529529 else priceBalanceOld
530530 let paymentBalanceBigInt = toBigInt(paymentBalance)
531531 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
532532 let chechSupply = if ((supplyBigInt > big0))
533533 then true
534534 else throwErr("initial deposit requires all coins")
535535 if ((chechSupply == chechSupply))
536536 then {
537537 let depositBigInt = toBigInt(paymentAmount)
538538 let issueAmount = max([0, toInt(((supplyBigInt * (sqrtBigInt((scale18 + ((depositBigInt * scale18) / paymentBalanceBigInt)), 18, 18, DOWN) - scale18)) / scale18))])
539539 let commonState = if (isEval)
540540 then nil
541541 else [IntegerEntry(pl(), priceNew), IntegerEntry(ph(height, lastBlock.timestamp), priceNew), StringEntry(pau(toString(value(userAddress)), toBase58String(value(txId))), dataPutActionInfo(amountAssetAmountRaw, priceAssetAmountRaw, issueAmount, priceNew, 0, 0, height, lastBlock.timestamp, 0, 0))]
542542 let priceOldX18 = calcPriceBigInt(toX18(priceBalanceOld, cfgPriceAssetDecimals), toX18(amountBalanceOld, cfgAmountAssetDecimals))
543543 let priceOld = fromX18(priceOldX18, scale8)
544544 let loss = {
545- let $t02591326080 = if (paymentInAmountAsset)
545+ let $t02593126098 = if (paymentInAmountAsset)
546546 then $Tuple2(amountAssetAmountRaw, amountBalanceOld)
547547 else $Tuple2(priceAssetAmountRaw, priceBalanceOld)
548- let amount = $t02591326080._1
549- let balance = $t02591326080._2
548+ let amount = $t02593126098._1
549+ let balance = $t02593126098._2
550550 let issueAmountBoth = toInt(fraction(supplyBigInt, toBigInt((amount / 2)), toBigInt(balance)))
551551 fraction((issueAmount - issueAmountBoth), scale8, issueAmountBoth)
552552 }
553553 $Tuple5(issueAmount, commonState, feeAmount, loss, paymentInAmountAsset)
554554 }
555555 else throw("Strict value is not equal to itself.")
556556 }
557557
558558
559559 func calcGetOneToken (outAssetId,paymentAmount,paymentAssetId,userAddress,txId) = {
560560 let isEval = (txId == unit)
561561 let checks = [if ((paymentAssetId == cfgLpAssetId))
562562 then true
563563 else throwErr("invalid lp asset")]
564564 if ((checks == checks))
565565 then {
566566 let outInAmountAsset = if ((outAssetId == cfgAmountAssetId))
567567 then true
568568 else if ((outAssetId == cfgPriceAssetId))
569569 then false
570570 else throwErr("invalid asset")
571571 let balanceBigInt = if (outInAmountAsset)
572572 then toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId)))
573573 else toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId)))
574574 let amBalanceOld = getAccBalance(assetIdToString(cfgAmountAssetId))
575575 let prBalanceOld = getAccBalance(assetIdToString(cfgPriceAssetId))
576576 let outBalance = if (outInAmountAsset)
577577 then amBalanceOld
578578 else prBalanceOld
579579 let outBalanceBigInt = toBigInt(outBalance)
580580 let supplyBigInt = toBigInt(valueOrErrorMessage(assetInfo(cfgLpAssetId), (("asset " + toBase58String(cfgLpAssetId)) + " doesn't exist")).quantity)
581581 let redeemedBigInt = toBigInt(paymentAmount)
582582 let amountRaw = max([0, toInt(((balanceBigInt * (scale18 - pow((scale18 - ((redeemedBigInt * scale18) / supplyBigInt)), 18, big2, 0, 18, DOWN))) / scale18))])
583- let $t02768227732 = takeFee(amountRaw)
584- let totalAmount = $t02768227732._1
585- let feeAmount = $t02768227732._2
586- let $t02773627962 = if (outInAmountAsset)
583+ let $t02770027750 = takeFee(amountRaw)
584+ let totalAmount = $t02770027750._1
585+ let feeAmount = $t02770027750._2
586+ let $t02775427980 = if (outInAmountAsset)
587587 then $Tuple4(totalAmount, 0, (amBalanceOld - amountRaw), prBalanceOld)
588588 else $Tuple4(0, totalAmount, amBalanceOld, (prBalanceOld - amountRaw))
589- let outAmAmount = $t02773627962._1
590- let outPrAmount = $t02773627962._2
591- let amBalanceNew = $t02773627962._3
592- let prBalanceNew = $t02773627962._4
589+ let outAmAmount = $t02775427980._1
590+ let outPrAmount = $t02775427980._2
591+ let amBalanceNew = $t02775427980._3
592+ let prBalanceNew = $t02775427980._4
593593 let priceNewX18 = calcPriceBigInt(toX18(prBalanceNew, cfgPriceAssetDecimals), toX18(amBalanceNew, cfgAmountAssetDecimals))
594594 let priceNew = fromX18(priceNewX18, scale8)
595595 let commonState = if (isEval)
596596 then nil
597597 else [StringEntry(gau(toString(value(userAddress)), toBase58String(value(txId))), dataGetActionInfo(outAmAmount, outPrAmount, paymentAmount, priceNew, height, lastBlock.timestamp)), IntegerEntry(pl(), priceNew), IntegerEntry(ph(height, lastBlock.timestamp), priceNew)]
598598 let priceOldX18 = calcPriceBigInt(toX18(prBalanceOld, cfgPriceAssetDecimals), toX18(amBalanceOld, cfgAmountAssetDecimals))
599599 let priceOld = fromX18(priceOldX18, scale8)
600600 let loss = {
601601 let amountBothInPaymentAsset = (toInt(fraction(balanceBigInt, redeemedBigInt, supplyBigInt)) * 2)
602602 fraction((totalAmount - amountBothInPaymentAsset), scale8, amountBothInPaymentAsset)
603603 }
604604 $Tuple5(totalAmount, commonState, feeAmount, loss, outInAmountAsset)
605605 }
606606 else throw("Strict value is not equal to itself.")
607607 }
608608
609609
610610 func managerPublicKeyOrUnit () = match getString(mpk()) {
611611 case s: String =>
612612 fromBase58String(s)
613613 case _: Unit =>
614614 unit
615615 case _ =>
616616 throw("Match error")
617617 }
618618
619619
620620 func pendingManagerPublicKeyOrUnit () = match getString(pmpk()) {
621621 case s: String =>
622622 fromBase58String(s)
623623 case _: Unit =>
624624 unit
625625 case _ =>
626626 throw("Match error")
627627 }
628628
629629
630630 func isManager (i) = match managerPublicKeyOrUnit() {
631631 case pk: ByteVector =>
632632 (i.callerPublicKey == pk)
633633 case _: Unit =>
634634 (i.caller == this)
635635 case _ =>
636636 throw("Match error")
637637 }
638638
639639
640640 func mustManager (i) = {
641641 let pd = throw("Permission denied")
642642 match managerPublicKeyOrUnit() {
643643 case pk: ByteVector =>
644644 if ((i.callerPublicKey == pk))
645645 then true
646646 else pd
647647 case _: Unit =>
648648 if ((i.caller == this))
649649 then true
650650 else pd
651651 case _ =>
652652 throw("Match error")
653653 }
654654 }
655655
656656
657657 @Callable(i)
658658 func setManager (pendingManagerPublicKey) = {
659659 let checkCaller = mustManager(i)
660660 if ((checkCaller == checkCaller))
661661 then {
662662 let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
663663 if ((checkManagerPublicKey == checkManagerPublicKey))
664664 then [StringEntry(pmpk(), pendingManagerPublicKey)]
665665 else throw("Strict value is not equal to itself.")
666666 }
667667 else throw("Strict value is not equal to itself.")
668668 }
669669
670670
671671
672672 @Callable(i)
673673 func confirmManager () = {
674674 let pm = pendingManagerPublicKeyOrUnit()
675675 let hasPM = if (isDefined(pm))
676676 then true
677677 else throw("No pending manager")
678678 if ((hasPM == hasPM))
679679 then {
680680 let checkPM = if ((i.callerPublicKey == value(pm)))
681681 then true
682682 else throw("You are not pending manager")
683683 if ((checkPM == checkPM))
684684 then [StringEntry(mpk(), toBase58String(value(pm))), DeleteEntry(pmpk())]
685685 else throw("Strict value is not equal to itself.")
686686 }
687687 else throw("Strict value is not equal to itself.")
688688 }
689689
690690
691691
692692 @Callable(i)
693693 func put (slippageTolerance,shouldAutoStake) = if ((0 > slippageTolerance))
694694 then throw("Invalid slippageTolerance passed")
695695 else {
696696 let estPut = commonPut(i, slippageTolerance, true)
697697 let emitLpAmt = estPut._2
698698 let lpAssetId = estPut._7
699699 let state = estPut._9
700700 let amDiff = estPut._10
701701 let prDiff = estPut._11
702702 let amId = estPut._12
703703 let prId = estPut._13
704704 let amAssetPmt = toBigInt(value(i.payments[0]).amount)
705705 let prAssetPmt = toBigInt(value(i.payments[1]).amount)
706- let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
707- if ((currentKLp == currentKLp))
706+ let amountAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgAmountAssetId))) - amAssetPmt)
707+ if ((amountAssetBalance == amountAssetBalance))
708708 then {
709- let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
710- if ((emitInv == emitInv))
709+ let priceAssetBalance = (toBigInt(getAccBalance(assetIdToString(cfgPriceAssetId))) - prAssetPmt)
710+ if ((priceAssetBalance == priceAssetBalance))
711711 then {
712- let emitInvLegacy = match emitInv {
713- case legacyFactoryContract: Address =>
714- invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
715- case _ =>
716- unit
717- }
718- if ((emitInvLegacy == emitInvLegacy))
712+ let lpAssetEmission = toBigInt(value(assetInfo(cfgLpAssetId)).quantity)
713+ if ((lpAssetEmission == lpAssetEmission))
719714 then {
720- let slippageAInv = if ((amDiff > 0))
721- then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
722- else nil
723- if ((slippageAInv == slippageAInv))
715+ let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
716+ if ((currentKLp == currentKLp))
724717 then {
725- let slippagePInv = if ((prDiff > 0))
726- then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
727- else nil
728- if ((slippagePInv == slippagePInv))
718+ let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
719+ if ((emitInv == emitInv))
729720 then {
730- let lpTransfer = if (shouldAutoStake)
721+ let emitInvLegacy = match emitInv {
722+ case legacyFactoryContract: Address =>
723+ invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
724+ case _ =>
725+ unit
726+ }
727+ if ((emitInvLegacy == emitInvLegacy))
731728 then {
732- let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
733- if ((slpStakeInv == slpStakeInv))
734- then nil
735- else throw("Strict value is not equal to itself.")
736- }
737- else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
738- let $t03211432182 = refreshKLpInternal(0, 0, 0)
739- if (($t03211432182 == $t03211432182))
740- then {
741- let updatedKLp = $t03211432182._2
742- let refreshKLpActions = $t03211432182._1
743- let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
744- if ((isUpdatedKLpValid == isUpdatedKLpValid))
745- then ((state ++ lpTransfer) ++ refreshKLpActions)
729+ let slippageAInv = if ((amDiff > 0))
730+ then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
731+ else nil
732+ if ((slippageAInv == slippageAInv))
733+ then {
734+ let slippagePInv = if ((prDiff > 0))
735+ then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
736+ else nil
737+ if ((slippagePInv == slippagePInv))
738+ then {
739+ let lpTransfer = if (shouldAutoStake)
740+ then {
741+ let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
742+ if ((slpStakeInv == slpStakeInv))
743+ then nil
744+ else throw("Strict value is not equal to itself.")
745+ }
746+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
747+ let lpAssetEmissionAfter = value(assetInfo(cfgLpAssetId)).quantity
748+ if ((lpAssetEmissionAfter == lpAssetEmissionAfter))
749+ then {
750+ let $t03250032568 = refreshKLpInternal(0, 0, 0)
751+ if (($t03250032568 == $t03250032568))
752+ then {
753+ let updatedKLp = $t03250032568._2
754+ let refreshKLpActions = $t03250032568._1
755+ let error = throwErr(makeString([toString(amountAssetBalance), toString(priceAssetBalance), toString(lpAssetEmission), toString(currentKLp), toString(updatedKLp), toString(emitLpAmt), toString(amDiff), toString(prDiff), toString(lpAssetEmission), toString(lpAssetEmissionAfter)], " "))
756+ if ((error == error))
757+ then {
758+ let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
759+ if ((isUpdatedKLpValid == isUpdatedKLpValid))
760+ then ((state ++ lpTransfer) ++ refreshKLpActions)
761+ else throw("Strict value is not equal to itself.")
762+ }
763+ else throw("Strict value is not equal to itself.")
764+ }
765+ else throw("Strict value is not equal to itself.")
766+ }
767+ else throw("Strict value is not equal to itself.")
768+ }
769+ else throw("Strict value is not equal to itself.")
770+ }
746771 else throw("Strict value is not equal to itself.")
747772 }
748773 else throw("Strict value is not equal to itself.")
749774 }
750775 else throw("Strict value is not equal to itself.")
751776 }
752777 else throw("Strict value is not equal to itself.")
753778 }
754779 else throw("Strict value is not equal to itself.")
755780 }
756781 else throw("Strict value is not equal to itself.")
757782 }
758783 else throw("Strict value is not equal to itself.")
759784 }
760785
761786
762787
763788 @Callable(i)
764789 func putForFree (maxSlippage) = if ((0 > maxSlippage))
765790 then throw("Invalid value passed")
766791 else {
767792 let estPut = commonPut(i, maxSlippage, false)
768793 let state = estPut._9
769794 let amAssetPmt = toBigInt(value(i.payments[0]).amount)
770795 let prAssetPmt = toBigInt(value(i.payments[1]).amount)
771796 let currentKLp = calcCurrentKLp(amAssetPmt, prAssetPmt, toBigInt(0))
772797 if ((currentKLp == currentKLp))
773798 then {
774- let $t03274432809 = refreshKLpInternal(0, 0, 0)
775- let refreshKLpActions = $t03274432809._1
776- let updatedKLp = $t03274432809._2
799+ let $t03350033565 = refreshKLpInternal(0, 0, 0)
800+ let refreshKLpActions = $t03350033565._1
801+ let updatedKLp = $t03350033565._2
777802 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
778803 if ((isUpdatedKLpValid == isUpdatedKLpValid))
779804 then (state ++ refreshKLpActions)
780805 else throw("Strict value is not equal to itself.")
781806 }
782807 else throw("Strict value is not equal to itself.")
783808 }
784809
785810
786811
787812 @Callable(i)
788813 func putOneTkn (minOutAmount,autoStake) = {
789814 let isPoolOneTokenOperationsDisabled = {
790815 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
791816 if ($isInstanceOf(@, "Boolean"))
792817 then @
793818 else throw(($getType(@) + " couldn't be cast to Boolean"))
794819 }
795820 let isPutDisabled = if (if (if (isGlobalShutdown())
796821 then true
797822 else (cfgPoolStatus == PoolPutDisabled))
798823 then true
799824 else (cfgPoolStatus == PoolShutdown))
800825 then true
801826 else isPoolOneTokenOperationsDisabled
802827 let checks = [if (if (!(isPutDisabled))
803828 then true
804829 else isManager(i))
805830 then true
806831 else throwErr("put operation is blocked by admin"), if ((size(i.payments) == 1))
807832 then true
808833 else throwErr("exactly 1 payment are expected")]
809834 if ((checks == checks))
810835 then {
811836 let payment = i.payments[0]
812837 let paymentAssetId = payment.assetId
813838 let paymentAmountRaw = payment.amount
814839 let currentKLp = if ((paymentAssetId == cfgAmountAssetId))
815840 then calcCurrentKLp(toBigInt(paymentAmountRaw), toBigInt(0), toBigInt(0))
816841 else if ((paymentAssetId == cfgPriceAssetId))
817842 then calcCurrentKLp(toBigInt(0), toBigInt(paymentAmountRaw), toBigInt(0))
818843 else throwErr("payment asset is not supported")
819844 let userAddress = i.caller
820845 let txId = i.transactionId
821- let $t03399434146 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
822- if (($t03399434146 == $t03399434146))
846+ let $t03475034902 = calcPutOneToken(paymentAmountRaw, paymentAssetId, userAddress, txId)
847+ if (($t03475034902 == $t03475034902))
823848 then {
824- let paymentInAmountAsset = $t03399434146._5
825- let bonus = $t03399434146._4
826- let feeAmount = $t03399434146._3
827- let commonState = $t03399434146._2
828- let emitAmountEstimated = $t03399434146._1
849+ let paymentInAmountAsset = $t03475034902._5
850+ let bonus = $t03475034902._4
851+ let feeAmount = $t03475034902._3
852+ let commonState = $t03475034902._2
853+ let emitAmountEstimated = $t03475034902._1
829854 let emitAmount = if (if ((minOutAmount > 0))
830855 then (minOutAmount > emitAmountEstimated)
831856 else false)
832857 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
833858 else emitAmountEstimated
834859 let emitInv = emit(emitAmount)
835860 if ((emitInv == emitInv))
836861 then {
837862 let lpTransfer = if (autoStake)
838863 then {
839864 let stakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(cfgLpAssetId, emitAmount)])
840865 if ((stakeInv == stakeInv))
841866 then nil
842867 else throw("Strict value is not equal to itself.")
843868 }
844869 else [ScriptTransfer(i.caller, emitAmount, cfgLpAssetId)]
845870 let sendFee = if ((feeAmount > 0))
846871 then [ScriptTransfer(feeCollectorAddress, feeAmount, paymentAssetId)]
847872 else nil
848- let $t03473234929 = if ((this == feeCollectorAddress))
873+ let $t03548835685 = if ((this == feeCollectorAddress))
849874 then $Tuple2(0, 0)
850875 else if (paymentInAmountAsset)
851876 then $Tuple2(-(feeAmount), 0)
852877 else $Tuple2(0, -(feeAmount))
853- let amountAssetBalanceDelta = $t03473234929._1
854- let priceAssetBalanceDelta = $t03473234929._2
855- let $t03493235040 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
856- let refreshKLpActions = $t03493235040._1
857- let updatedKLp = $t03493235040._2
878+ let amountAssetBalanceDelta = $t03548835685._1
879+ let priceAssetBalanceDelta = $t03548835685._2
880+ let $t03568835796 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
881+ let refreshKLpActions = $t03568835796._1
882+ let updatedKLp = $t03568835796._2
858883 let kLp = value(getString(keyKLp))
859884 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
860885 if ((isUpdatedKLpValid == isUpdatedKLpValid))
861886 then $Tuple2((((commonState ++ lpTransfer) ++ sendFee) ++ refreshKLpActions), emitAmount)
862887 else throw("Strict value is not equal to itself.")
863888 }
864889 else throw("Strict value is not equal to itself.")
865890 }
866891 else throw("Strict value is not equal to itself.")
867892 }
868893 else throw("Strict value is not equal to itself.")
869894 }
870895
871896
872897
873898 @Callable(i)
874899 func putOneTknREADONLY (paymentAssetId,paymentAmountRaw) = {
875- let $t03534635503 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
876- let emitAmountEstimated = $t03534635503._1
877- let commonState = $t03534635503._2
878- let feeAmount = $t03534635503._3
879- let bonus = $t03534635503._4
880- let paymentInAmountAsset = $t03534635503._5
900+ let $t03610236259 = calcPutOneToken(paymentAmountRaw, parseAssetId(paymentAssetId), unit, unit)
901+ let emitAmountEstimated = $t03610236259._1
902+ let commonState = $t03610236259._2
903+ let feeAmount = $t03610236259._3
904+ let bonus = $t03610236259._4
905+ let paymentInAmountAsset = $t03610236259._5
881906 $Tuple2(nil, $Tuple3(emitAmountEstimated, feeAmount, bonus))
882907 }
883908
884909
885910
886911 @Callable(i)
887912 func getOneTkn (outAssetIdStr,minOutAmount) = {
888913 let isPoolOneTokenOperationsDisabled = {
889914 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
890915 if ($isInstanceOf(@, "Boolean"))
891916 then @
892917 else throw(($getType(@) + " couldn't be cast to Boolean"))
893918 }
894919 let isGetDisabled = if (if (isGlobalShutdown())
895920 then true
896921 else (cfgPoolStatus == PoolShutdown))
897922 then true
898923 else isPoolOneTokenOperationsDisabled
899924 let checks = [if (if (!(isGetDisabled))
900925 then true
901926 else isManager(i))
902927 then true
903928 else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 1))
904929 then true
905930 else throwErr("exactly 1 payment are expected")]
906931 if ((checks == checks))
907932 then {
908933 let outAssetId = parseAssetId(outAssetIdStr)
909934 let payment = i.payments[0]
910935 let paymentAssetId = payment.assetId
911936 let paymentAmount = payment.amount
912937 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(paymentAmount))
913938 let userAddress = i.caller
914939 let txId = i.transactionId
915- let $t03639736550 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
916- if (($t03639736550 == $t03639736550))
940+ let $t03715337306 = calcGetOneToken(outAssetId, paymentAmount, paymentAssetId, userAddress, txId)
941+ if (($t03715337306 == $t03715337306))
917942 then {
918- let outInAmountAsset = $t03639736550._5
919- let bonus = $t03639736550._4
920- let feeAmount = $t03639736550._3
921- let commonState = $t03639736550._2
922- let amountEstimated = $t03639736550._1
943+ let outInAmountAsset = $t03715337306._5
944+ let bonus = $t03715337306._4
945+ let feeAmount = $t03715337306._3
946+ let commonState = $t03715337306._2
947+ let amountEstimated = $t03715337306._1
923948 let amount = if (if ((minOutAmount > 0))
924949 then (minOutAmount > amountEstimated)
925950 else false)
926951 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
927952 else amountEstimated
928953 let burnInv = invoke(factoryContract, "burn", [paymentAmount], [AttachedPayment(paymentAssetId, paymentAmount)])
929954 if ((burnInv == burnInv))
930955 then {
931956 let assetTransfer = [ScriptTransfer(userAddress, amount, outAssetId)]
932957 let sendFee = if ((feeAmount > 0))
933958 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
934959 else nil
935- let $t03705037297 = {
960+ let $t03780638053 = {
936961 let feeAmountForCalc = if ((this == feeCollectorAddress))
937962 then 0
938963 else feeAmount
939964 if (outInAmountAsset)
940965 then $Tuple2(-((amount + feeAmountForCalc)), 0)
941966 else $Tuple2(0, -((amount + feeAmountForCalc)))
942967 }
943- let amountAssetBalanceDelta = $t03705037297._1
944- let priceAssetBalanceDelta = $t03705037297._2
945- let $t03730037408 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
946- let refreshKLpActions = $t03730037408._1
947- let updatedKLp = $t03730037408._2
968+ let amountAssetBalanceDelta = $t03780638053._1
969+ let priceAssetBalanceDelta = $t03780638053._2
970+ let $t03805638164 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
971+ let refreshKLpActions = $t03805638164._1
972+ let updatedKLp = $t03805638164._2
948973 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
949974 if ((isUpdatedKLpValid == isUpdatedKLpValid))
950975 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
951976 else throw("Strict value is not equal to itself.")
952977 }
953978 else throw("Strict value is not equal to itself.")
954979 }
955980 else throw("Strict value is not equal to itself.")
956981 }
957982 else throw("Strict value is not equal to itself.")
958983 }
959984
960985
961986
962987 @Callable(i)
963988 func getOneTknREADONLY (outAssetId,paymentAmount) = {
964- let $t03766537821 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
965- let amountEstimated = $t03766537821._1
966- let commonState = $t03766537821._2
967- let feeAmount = $t03766537821._3
968- let bonus = $t03766537821._4
969- let outInAmountAsset = $t03766537821._5
989+ let $t03842138577 = calcGetOneToken(parseAssetId(outAssetId), paymentAmount, cfgLpAssetId, unit, unit)
990+ let amountEstimated = $t03842138577._1
991+ let commonState = $t03842138577._2
992+ let feeAmount = $t03842138577._3
993+ let bonus = $t03842138577._4
994+ let outInAmountAsset = $t03842138577._5
970995 $Tuple2(nil, $Tuple3(amountEstimated, feeAmount, bonus))
971996 }
972997
973998
974999
9751000 @Callable(i)
9761001 func unstakeAndGetOneTkn (unstakeAmount,outAssetIdStr,minOutAmount) = {
9771002 let isPoolOneTokenOperationsDisabled = {
9781003 let @ = invoke(factoryContract, "isPoolOneTokenOperationsDisabledREADONLY", [toString(this)], nil)
9791004 if ($isInstanceOf(@, "Boolean"))
9801005 then @
9811006 else throw(($getType(@) + " couldn't be cast to Boolean"))
9821007 }
9831008 let isGetDisabled = if (if (isGlobalShutdown())
9841009 then true
9851010 else (cfgPoolStatus == PoolShutdown))
9861011 then true
9871012 else isPoolOneTokenOperationsDisabled
9881013 let checks = [if (if (!(isGetDisabled))
9891014 then true
9901015 else isManager(i))
9911016 then true
9921017 else throwErr("get operation is blocked by admin"), if ((size(i.payments) == 0))
9931018 then true
9941019 else throwErr("no payments are expected")]
9951020 if ((checks == checks))
9961021 then {
9971022 let outAssetId = parseAssetId(outAssetIdStr)
9981023 let userAddress = i.caller
9991024 let txId = i.transactionId
10001025 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
10011026 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
10021027 if ((unstakeInv == unstakeInv))
10031028 then {
1004- let $t03872338874 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1005- if (($t03872338874 == $t03872338874))
1029+ let $t03947939630 = calcGetOneToken(outAssetId, unstakeAmount, cfgLpAssetId, userAddress, txId)
1030+ if (($t03947939630 == $t03947939630))
10061031 then {
1007- let outInAmountAsset = $t03872338874._5
1008- let bonus = $t03872338874._4
1009- let feeAmount = $t03872338874._3
1010- let commonState = $t03872338874._2
1011- let amountEstimated = $t03872338874._1
1032+ let outInAmountAsset = $t03947939630._5
1033+ let bonus = $t03947939630._4
1034+ let feeAmount = $t03947939630._3
1035+ let commonState = $t03947939630._2
1036+ let amountEstimated = $t03947939630._1
10121037 let amount = if (if ((minOutAmount > 0))
10131038 then (minOutAmount > amountEstimated)
10141039 else false)
10151040 then throwErr(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
10161041 else amountEstimated
10171042 let burnInv = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
10181043 if ((burnInv == burnInv))
10191044 then {
10201045 let assetTransfer = [ScriptTransfer(i.caller, amount, outAssetId)]
10211046 let sendFee = if ((feeAmount > 0))
10221047 then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetId)]
10231048 else nil
1024- let $t03936939616 = {
1049+ let $t04012540372 = {
10251050 let feeAmountForCalc = if ((this == feeCollectorAddress))
10261051 then 0
10271052 else feeAmount
10281053 if (outInAmountAsset)
10291054 then $Tuple2(-((amount + feeAmountForCalc)), 0)
10301055 else $Tuple2(0, -((amount + feeAmountForCalc)))
10311056 }
1032- let amountAssetBalanceDelta = $t03936939616._1
1033- let priceAssetBalanceDelta = $t03936939616._2
1034- let $t03961939727 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1035- let refreshKLpActions = $t03961939727._1
1036- let updatedKLp = $t03961939727._2
1057+ let amountAssetBalanceDelta = $t04012540372._1
1058+ let priceAssetBalanceDelta = $t04012540372._2
1059+ let $t04037540483 = refreshKLpInternal(amountAssetBalanceDelta, priceAssetBalanceDelta, 0)
1060+ let refreshKLpActions = $t04037540483._1
1061+ let updatedKLp = $t04037540483._2
10371062 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10381063 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10391064 then $Tuple2((((commonState ++ assetTransfer) ++ sendFee) ++ refreshKLpActions), amount)
10401065 else throw("Strict value is not equal to itself.")
10411066 }
10421067 else throw("Strict value is not equal to itself.")
10431068 }
10441069 else throw("Strict value is not equal to itself.")
10451070 }
10461071 else throw("Strict value is not equal to itself.")
10471072 }
10481073 else throw("Strict value is not equal to itself.")
10491074 }
10501075
10511076
10521077
10531078 @Callable(i)
10541079 func get () = {
10551080 let res = commonGet(i)
10561081 let outAmtAmt = res._1
10571082 let outPrAmt = res._2
10581083 let pmtAmt = res._3
10591084 let pmtAssetId = res._4
10601085 let state = res._5
10611086 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10621087 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10631088 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10641089 then {
1065- let $t04067540757 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1066- let refreshKLpActions = $t04067540757._1
1067- let updatedKLp = $t04067540757._2
1090+ let $t04143141513 = refreshKLpInternal(-(outAmtAmt), -(outPrAmt), 0)
1091+ let refreshKLpActions = $t04143141513._1
1092+ let updatedKLp = $t04143141513._2
10681093 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10691094 if ((isUpdatedKLpValid == isUpdatedKLpValid))
10701095 then (state ++ refreshKLpActions)
10711096 else throw("Strict value is not equal to itself.")
10721097 }
10731098 else throw("Strict value is not equal to itself.")
10741099 }
10751100
10761101
10771102
10781103 @Callable(i)
10791104 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
10801105 let res = commonGet(i)
10811106 let outAmAmt = res._1
10821107 let outPrAmt = res._2
10831108 let pmtAmt = res._3
10841109 let pmtAssetId = res._4
10851110 let state = res._5
10861111 if ((noLessThenAmtAsset > outAmAmt))
10871112 then throw(((("noLessThenAmtAsset failed: " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
10881113 else if ((noLessThenPriceAsset > outPrAmt))
10891114 then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
10901115 else {
10911116 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(pmtAmt))
10921117 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10931118 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
10941119 then {
1095- let $t04170841789 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1096- let refreshKLpActions = $t04170841789._1
1097- let updatedKLp = $t04170841789._2
1120+ let $t04246442545 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1121+ let refreshKLpActions = $t04246442545._1
1122+ let updatedKLp = $t04246442545._2
10981123 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
10991124 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11001125 then (state ++ refreshKLpActions)
11011126 else throw("Strict value is not equal to itself.")
11021127 }
11031128 else throw("Strict value is not equal to itself.")
11041129 }
11051130 }
11061131
11071132
11081133
11091134 @Callable(i)
11101135 func unstakeAndGet (amount) = {
11111136 let checkPayments = if ((size(i.payments) != 0))
11121137 then throw("No payments are expected")
11131138 else true
11141139 if ((checkPayments == checkPayments))
11151140 then {
11161141 let cfg = getPoolConfig()
11171142 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
11181143 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
11191144 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
11201145 if ((unstakeInv == unstakeInv))
11211146 then {
11221147 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
11231148 let outAmAmt = res._1
11241149 let outPrAmt = res._2
11251150 let poolStatus = parseIntValue(res._9)
11261151 let state = res._10
11271152 let checkPoolStatus = if (if (isGlobalShutdown())
11281153 then true
11291154 else (poolStatus == PoolShutdown))
11301155 then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
11311156 else true
11321157 if ((checkPoolStatus == checkPoolStatus))
11331158 then {
11341159 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
11351160 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11361161 then {
1137- let $t04291242993 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1138- let refreshKLpActions = $t04291242993._1
1139- let updatedKLp = $t04291242993._2
1162+ let $t04366843749 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1163+ let refreshKLpActions = $t04366843749._1
1164+ let updatedKLp = $t04366843749._2
11401165 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11411166 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11421167 then (state ++ refreshKLpActions)
11431168 else throw("Strict value is not equal to itself.")
11441169 }
11451170 else throw("Strict value is not equal to itself.")
11461171 }
11471172 else throw("Strict value is not equal to itself.")
11481173 }
11491174 else throw("Strict value is not equal to itself.")
11501175 }
11511176 else throw("Strict value is not equal to itself.")
11521177 }
11531178
11541179
11551180
11561181 @Callable(i)
11571182 func unstakeAndGetNoLess (unstakeAmount,noLessThenAmountAsset,noLessThenPriceAsset) = {
11581183 let isGetDisabled = if (isGlobalShutdown())
11591184 then true
11601185 else (cfgPoolStatus == PoolShutdown)
11611186 let checks = [if (!(isGetDisabled))
11621187 then true
11631188 else throw("get operation is blocked by admin"), if ((size(i.payments) == 0))
11641189 then true
11651190 else throw("no payments are expected")]
11661191 if ((checks == checks))
11671192 then {
11681193 let currentKLp = calcCurrentKLp(toBigInt(0), toBigInt(0), toBigInt(0))
11691194 let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(cfgLpAssetId), unstakeAmount], nil)
11701195 if ((unstakeInv == unstakeInv))
11711196 then {
11721197 let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(cfgLpAssetId), unstakeAmount, i.caller)
11731198 let outAmAmt = res._1
11741199 let outPrAmt = res._2
11751200 let state = res._10
11761201 let checkAmounts = [if ((outAmAmt >= noLessThenAmountAsset))
11771202 then true
11781203 else throw(makeString(["amount asset amount to receive is less than ", toString(noLessThenAmountAsset)], "")), if ((outPrAmt >= noLessThenPriceAsset))
11791204 then true
11801205 else throw(makeString(["price asset amount to receive is less than ", toString(noLessThenPriceAsset)], ""))]
11811206 if ((checkAmounts == checkAmounts))
11821207 then {
11831208 let burnLPAssetOnFactory = invoke(factoryContract, "burn", [unstakeAmount], [AttachedPayment(cfgLpAssetId, unstakeAmount)])
11841209 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11851210 then {
1186- let $t04428544366 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1187- let refreshKLpActions = $t04428544366._1
1188- let updatedKLp = $t04428544366._2
1211+ let $t04504145122 = refreshKLpInternal(-(outAmAmt), -(outPrAmt), 0)
1212+ let refreshKLpActions = $t04504145122._1
1213+ let updatedKLp = $t04504145122._2
11891214 let isUpdatedKLpValid = validateUpdatedKLp(currentKLp, updatedKLp)
11901215 if ((isUpdatedKLpValid == isUpdatedKLpValid))
11911216 then (state ++ refreshKLpActions)
11921217 else throw("Strict value is not equal to itself.")
11931218 }
11941219 else throw("Strict value is not equal to itself.")
11951220 }
11961221 else throw("Strict value is not equal to itself.")
11971222 }
11981223 else throw("Strict value is not equal to itself.")
11991224 }
12001225 else throw("Strict value is not equal to itself.")
12011226 }
12021227
12031228
12041229
12051230 @Callable(i)
12061231 func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
12071232 then throw("permissions denied")
12081233 else $Tuple2([StringEntry(aa(), amtAssetStr), StringEntry(pa(), priceAssetStr)], "success")
12091234
12101235
12111236
12121237 @Callable(i)
12131238 func refreshKLp () = {
12141239 let lastRefreshedBlockHeight = valueOrElse(getInteger(keyKLpRefreshedHeight), 0)
12151240 let checkLastRefreshedBlockHeight = if (((height - lastRefreshedBlockHeight) >= kLpRefreshDelay))
12161241 then unit
12171242 else throwErr(makeString([toString(kLpRefreshDelay), " blocks have not passed since the previous call"], ""))
12181243 if ((checkLastRefreshedBlockHeight == checkLastRefreshedBlockHeight))
12191244 then {
12201245 let kLp = valueOrErrorMessage(parseBigInt(valueOrElse(getString(this, keyKLp), "0")), fmtErr("invalid kLp"))
1221- let $t04555345617 = refreshKLpInternal(0, 0, 0)
1222- let kLpUpdateActions = $t04555345617._1
1223- let updatedKLp = $t04555345617._2
1246+ let $t04630946373 = refreshKLpInternal(0, 0, 0)
1247+ let kLpUpdateActions = $t04630946373._1
1248+ let updatedKLp = $t04630946373._2
12241249 let actions = if ((kLp != updatedKLp))
12251250 then kLpUpdateActions
12261251 else throwErr("nothing to refresh")
12271252 $Tuple2(actions, toString(updatedKLp))
12281253 }
12291254 else throw("Strict value is not equal to itself.")
12301255 }
12311256
12321257
12331258
12341259 @Callable(i)
12351260 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig())
12361261
12371262
12381263
12391264 @Callable(i)
12401265 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
12411266
12421267
12431268
12441269 @Callable(i)
12451270 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
12461271 let prices = calcPrices(amAmt, prAmt, lpAmt)
12471272 $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])])
12481273 }
12491274
12501275
12511276
12521277 @Callable(i)
12531278 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult)))
12541279
12551280
12561281
12571282 @Callable(i)
12581283 func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult))
12591284
12601285
12611286
12621287 @Callable(i)
12631288 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
12641289
12651290
12661291
12671292 @Callable(i)
12681293 func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp))
12691294
12701295
12711296
12721297 @Callable(i)
12731298 func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
12741299 let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress))
12751300 $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10))
12761301 }
12771302
12781303
12791304
12801305 @Callable(i)
12811306 func statsREADONLY () = {
12821307 let cfg = getPoolConfig()
12831308 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
12841309 let amtAssetId = cfg[idxAmtAssetId]
12851310 let priceAssetId = cfg[idxPriceAssetId]
12861311 let iAmtAssetId = cfg[idxIAmtAssetId]
12871312 let iPriceAssetId = cfg[idxIPriceAssetId]
12881313 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
12891314 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
12901315 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
12911316 let accAmtAssetBalance = getAccBalance(amtAssetId)
12921317 let accPriceAssetBalance = getAccBalance(priceAssetId)
12931318 let pricesList = if ((poolLPBalance == 0))
12941319 then [zeroBigInt, zeroBigInt, zeroBigInt]
12951320 else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance)
12961321 let curPrice = 0
12971322 let lpAmtAssetShare = fromX18(pricesList[1], scale8)
12981323 let lpPriceAssetShare = fromX18(pricesList[2], scale8)
12991324 let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this))))
13001325 $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))
13011326 }
13021327
13031328
13041329
13051330 @Callable(i)
13061331 func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = {
13071332 let cfg = getPoolConfig()
13081333 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
13091334 let amAssetIdStr = cfg[idxAmtAssetId]
13101335 let amAssetId = fromBase58String(amAssetIdStr)
13111336 let prAssetIdStr = cfg[idxPriceAssetId]
13121337 let prAssetId = fromBase58String(prAssetIdStr)
13131338 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
13141339 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
13151340 let poolStatus = cfg[idxPoolStatus]
13161341 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
13171342 let accAmtAssetBalance = getAccBalance(amAssetIdStr)
13181343 let accPriceAssetBalance = getAccBalance(prAssetIdStr)
13191344 let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm)
13201345 let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm)
13211346 let curPriceX18 = if ((poolLPBalance == 0))
13221347 then zeroBigInt
13231348 else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
13241349 let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
13251350 let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
13261351 let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm)
13271352 let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
13281353 let calcLpAmt = estPut._1
13291354 let curPriceCalc = estPut._3
13301355 let amBalance = estPut._4
13311356 let prBalance = estPut._5
13321357 let lpEmission = estPut._6
13331358 $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))
13341359 }
13351360
13361361
13371362
13381363 @Callable(i)
13391364 func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = {
13401365 let cfg = getPoolConfig()
13411366 let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
13421367 let amAssetIdStr = cfg[idxAmtAssetId]
13431368 let amAssetId = fromBase58String(amAssetIdStr)
13441369 let prAssetIdStr = cfg[idxPriceAssetId]
13451370 let prAssetId = fromBase58String(prAssetIdStr)
13461371 let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
13471372 let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
13481373 let poolStatus = cfg[idxPoolStatus]
13491374 let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
13501375 let amBalanceRaw = getAccBalance(amAssetIdStr)
13511376 let prBalanceRaw = getAccBalance(prAssetIdStr)
13521377 let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm)
13531378 let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm)
13541379 let curPriceX18 = if ((poolLPBalance == 0))
13551380 then zeroBigInt
13561381 else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18)
13571382 let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
13581383 let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
13591384 let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm)
13601385 let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
13611386 let calcLpAmt = estPut._1
13621387 let curPriceCalc = estPut._3
13631388 let amBalance = estPut._4
13641389 let prBalance = estPut._5
13651390 let lpEmission = estPut._6
13661391 $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))
13671392 }
13681393
13691394
13701395
13711396 @Callable(i)
13721397 func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
13731398 let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this)
13741399 let outAmAmt = res._1
13751400 let outPrAmt = res._2
13761401 let amBalance = res._5
13771402 let prBalance = res._6
13781403 let lpEmission = res._7
13791404 let curPrice = res._8
13801405 let poolStatus = parseIntValue(res._9)
13811406 $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))
13821407 }
13831408
13841409
13851410 @Verifier(tx)
13861411 func verify () = {
13871412 let targetPublicKey = match managerPublicKeyOrUnit() {
13881413 case pk: ByteVector =>
13891414 pk
13901415 case _: Unit =>
13911416 tx.senderPublicKey
13921417 case _ =>
13931418 throw("Match error")
13941419 }
13951420 match tx {
13961421 case order: Order =>
13971422 let matcherPub = getMatcherPubOrFail()
13981423 let orderValid = validateMatcherOrderAllowed(order)
13991424 let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
14001425 let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
14011426 if (if (if (orderValid)
14021427 then senderValid
14031428 else false)
14041429 then matcherValid
14051430 else false)
14061431 then true
14071432 else throwOrderError(orderValid, senderValid, matcherValid)
14081433 case s: SetScriptTransaction =>
14091434 let newHash = blake2b256(value(s.script))
14101435 let allowedHash = fromBase64String(value(getString(factoryContract, keyAllowedLpScriptHash())))
14111436 let currentHash = scriptHash(this)
14121437 if (if ((allowedHash == newHash))
14131438 then (currentHash != newHash)
14141439 else false)
14151440 then true
14161441 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
14171442 case _ =>
14181443 sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
14191444 }
14201445 }
14211446

github/deemru/w8io/fabc49c 
164.39 ms