tx · 9xdjVKSCih7eUiPwR69ziopybXpYNnD4r4gac7HwVNVq

3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA:  -0.02800000 Waves

2022.10.10 12:40 [2266073] smart account 3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9xdjVKSCih7eUiPwR69ziopybXpYNnD4r4gac7HwVNVq",
    "fee": 2800000,
    "feeAssetId": null,
    "timestamp": 1665394864272,
    "version": 1,
    "sender": "3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA",
    "senderPublicKey": "35yd3qw1gxKDxKwGAykHN9fANbXNWwseaUwbWDj24o3x",
    "proofs": [
        "22hpW1zifX3FZ5L6vSddk7CAhHhVYSX3xJUAUZnDxHd6LopDjTVUiYmW8ggZZkFar5AtrGyokUEgRP8XjJ4darCZ"
    ],
    "script": "base64:BgLKHggCEgMKAQgSAwoBCBIAEgQKAgEEEgQKAgEEEgMKAQESABIECgIIARIECgIIARIECgIIARIECgIBARIDCgEBEgUKAwEIARIECgIBCBIECgIICBIECgIICBIECgIIARIAEgMKAQgSBQoDAQEBEgQKAggBEgQKAgEBEgQKAggIEgsKCQgBAQIBAggEBBIGCgQICAEIEgAiBnNjYWxlOCIMc2NhbGU4QmlnSW50IgdzY2FsZTE4Igp6ZXJvQmlnSW50IgRiaWcwIgRiaWcxIgRiaWcyIgpzbGlwcGFnZTREIgVBbXVsdCIFRGNvbnYiA1NFUCIFRU1QVFkiClBvb2xBY3RpdmUiClBvb2xQdXREaXMiDlBvb2xNYXRjaGVyRGlzIgxQb29sU2h1dGRvd24iDmlkeFBvb2xBZGRyZXNzIglpZHhQb29sU3QiCWlkeExQQXNJZCIJaWR4QW1Bc0lkIglpZHhQckFzSWQiC2lkeEFtdEFzRGNtIg1pZHhQcmljZUFzRGNtIgtpZHhJQW10QXNJZCINaWR4SVByaWNlQXNJZCIPaWR4RmFjdFN0YWtDbnRyIhBpZHhGYWN0U2xpcHBDbnRyIhFpZHhGYWN0R3d4UmV3Q250ciIKZmVlRGVmYXVsdCICdDEiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiAmYxIgN2YWwiD3Jlc3VsdFNjYWxlTXVsdCICdHMiA2FtdCIIcmVzU2NhbGUiCGN1clNjYWxlIgNhYnMiCWFic0JpZ0ludCICZmMiA21wayIEcG1wayICcGwiAnBoIgFoIgF0IgNwYXUiAnVhIgR0eElkIgNnYXUiAmFhIgJwYSIDYW1wIgNhZGEiBmtleUZlZSIDZmVlIgRmY2ZnIgRtdHBrIgJwYyIGaUFtdEFzIgVpUHJBcyIDbWJhIgViQVN0ciIDYXBzIhxrZXlBbGxvd2VkTHBTdGFibGVTY3JpcHRIYXNoIhZrZXlGZWVDb2xsZWN0b3JBZGRyZXNzIgN0b2UiA29yViIGc2VuZHJWIgZtYXRjaFYiA3N0ciIHJG1hdGNoMCIGdmFsU3RyIgRzdHJmIgRhZGRyIgNrZXkiBGludGYiA2ZjYSIBQSIDaWdzIgJtcCITZmVlQ29sbGVjdG9yQWRkcmVzcyIDZ3BjIgVhbXRBcyIHcHJpY2VBcyIIaVByaWNlQXMiA2dmYyINZmFjdG9yeUNvbmZpZyIPc3Rha2luZ0NvbnRyYWN0Ig9zbGlwYWdlQ29udHJhY3QiC2d3eENvbnRyYWN0IhFkYXRhUHV0QWN0aW9uSW5mbyINaW5BbXRBc3NldEFtdCIPaW5QcmljZUFzc2V0QW10IghvdXRMcEFtdCIFcHJpY2UiCnNsaXBCeVVzZXIiDHNsaXBwYWdlUmVhbCIIdHhIZWlnaHQiC3R4VGltZXN0YW1wIgxzbGlwYWdlQW1BbXQiDHNsaXBhZ2VQckFtdCIRZGF0YUdldEFjdGlvbkluZm8iDm91dEFtdEFzc2V0QW10IhBvdXRQcmljZUFzc2V0QW10IgdpbkxwQW10Ig1nZXRBY2NCYWxhbmNlIgdhc3NldElkIgRjcGJpIghwckFtdFgxOCIIYW1BbXRYMTgiA3ZhZCICQTEiAkEyIghzbGlwcGFnZSIEZGlmZiIEcGFzcyICdmQiAkQxIgJEMCIEc2xwZyIEZmFpbCIDcGNwIgphbUFzc2V0RGNtIgpwckFzc2V0RGNtIgVhbUFtdCIFcHJBbXQiC2FtdEFzQW10WDE4IgpwckFzQW10WDE4IgpjYWxjUHJpY2VzIgVscEFtdCIDY2ZnIghhbXRBc0RjbSIHcHJBc0RjbSIIcHJpY2VYMTgiCGxwQW10WDE4Ig1scFBySW5BbUFzWDE4Ig1scFBySW5QckFzWDE4Ig9jYWxjdWxhdGVQcmljZXMiAXAiB3Rha2VGZWUiBmFtb3VudCIJZmVlQW1vdW50IgNlZ28iBnR4SWQ1OCIKcG10QXNzZXRJZCIIcG10THBBbXQiC3VzZXJBZGRyZXNzIgRscElkIgRhbUlkIgRwcklkIgVhbURjbSIFcHJEY20iA3N0cyIHbHBFbWlzcyIJYW1CYWxhbmNlIgxhbUJhbGFuY2VYMTgiCXByQmFsYW5jZSIMcHJCYWxhbmNlWDE4IgtjdXJQcmljZVgxOCIIY3VyUHJpY2UiC3BtdExwQW10WDE4IgpscEVtaXNzWDE4IgtvdXRBbUFtdFgxOCILb3V0UHJBbXRYMTgiCG91dEFtQW10IghvdXRQckFtdCIFc3RhdGUiA2VwbyIHaW5BbUFtdCIGaW5BbUlkIgdpblByQW10IgZpblBySWQiBmlzRXZhbCIGZW1pdExwIgppc09uZUFzc2V0IhB2YWxpZGF0ZVNsaXBwYWdlIgZwbXRBbXQiBXBtdElkIgdhbUlkU3RyIgdwcklkU3RyIglpbkFtSWRTdHIiCWluUHJJZFN0ciIGYW10RGNtIghwcmljZURjbSIEbHBFbSIPaW5BbUFzc2V0QW10WDE4Ig9pblByQXNzZXRBbXRYMTgiDHVzZXJQcmljZVgxOCIBciILc2xpcHBhZ2VYMTgiD3NsaXBwYWdlUmVhbFgxOCINbHBFbWlzc2lvblgxOCIKcHJWaWFBbVgxOCIKYW1WaWFQclgxOCIMZXhwZWN0ZWRBbXRzIhFleHBBbXRBc3NldEFtdFgxOCITZXhwUHJpY2VBc3NldEFtdFgxOCIJY2FsY0xwQW10Ig5jYWxjQW1Bc3NldFBtdCIOY2FsY1ByQXNzZXRQbXQiDHNsaXBwYWdlQ2FsYyIJZW1pdExwQW10IgZhbURpZmYiBnByRGlmZiINJHQwMTYzNTExNjY5NiIKd3JpdGVBbUFtdCIKd3JpdGVQckFtdCILY29tbW9uU3RhdGUiA21vYSIFb3JkZXIiB2FtdEFzSWQiBnByQXNJZCIPYWNjQW10QXNCYWxhbmNlIg5hY2NQckFzQmFsYW5jZSIKb3JBbXRBc3NldCIKb3JBbXRBc1N0ciIJb3JQckFzc2V0IglvclByQXNTdHIiCm9yZGVyUHJpY2UiDmNhc3RPcmRlclByaWNlIhFpc09yZGVyUHJpY2VWYWxpZCICY2ciAWkiA3BtdCICY3AiBmNhbGxlciIHYW1Bc1BtdCIHcHJBc1BtdCIEZ2V0RCICeHAiAW4iA3hwMCIDeHAxIgphUHJlY2lzaW9uIgFhIgFzIgNhbm4iC3hwMF94cDFfbl9uIhBhbm5fc19hUHJlY2lzaW9uIg5hbm5fYVByZWNpc2lvbiICbjEiBGNhbGMiA2FjYyIDY3VyIg0kdDAyMTI0ODIxMjY4IgFkIgVmb3VuZCICZHAiBWROZXh0IgVkRGlmZiIDYXJyIg0kdDAyMTY4OTIxNzM2IgIkbCICJHMiBSRhY2MwIgUkZjBfMSICJGEiAiRpIgUkZjBfMiIFZ2V0WUQiAUQiAXgiAWMiAWIiDSR0MDIyMjM2MjIyNTYiAXkiBXlOZXh0IgV5RGlmZiINJHQwMjI1NjMyMjYxMCINY2FsY1B1dE9uZVRrbiIJcG10QW10UmF3Igpwb29sQ29uZmlnIg0kdDAyMzE1MjIzNjEzIgxhbUJhbGFuY2VPbGQiDHByQmFsYW5jZU9sZCINJHQwMjM2MTkyMzc5NSILYW1BbW91bnRSYXciC3ByQW1vdW50UmF3IghhbUFtb3VudCIIcHJBbW91bnQiDGFtQmFsYW5jZU5ldyIMcHJCYWxhbmNlTmV3IgZjaGVja0QiD2xwQXNzZXRFbWlzc2lvbiIIbHBBbW91bnQiDnBvb2xQcm9wb3J0aW9uIg9hbW91bnRBc3NldFBhcnQiDnByaWNlQXNzZXRQYXJ0IglscEFtdEJvdGgiBWJvbnVzIhNnZXRPbmVUa25WMkludGVybmFsIgpvdXRBc3NldElkIgxtaW5PdXRBbW91bnQiCHBheW1lbnRzIgxvcmlnaW5DYWxsZXIiDXRyYW5zYWN0aW9uSWQiCmFtRGVjaW1hbHMiCnByRGVjaW1hbHMiCnBvb2xTdGF0dXMiDSR0MDI2MjUyMjYzNjAiAUAiCHRvdGFsR2V0Igt0b3RhbEFtb3VudCINJHQwMjY1NDcyNjg1NCIFb3V0QW0iBW91dFByIghjdXJQclgxOCIFY3VyUHIiEW91dEFzc2V0SWRPcldhdmVzIhBzZW5kRmVlVG9NYXRjaGVyIgRidXJuIgFtIgJwbSICcGQiAm1tIgJwayIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiAmNtIgNocG0iA2NwbSIEc2xpcCIJYXV0b1N0YWtlIgdmYWN0Q2ZnIgtzdGFraW5nQ250ciIIc2xpcENudHIiAWUiCWxwQXNzZXRJZCICZWwiBmxlZ2FjeSICc2EiAnNwIghscFRybnNmciICc3MiDSR0MDMxNzMxMzE4NTYiB2VzdGltTFAiB21heFNscGciBmVzdFB1dCIJb3V0QW10QW10Ig0kdDAzNDAzOTM0MTk0Ig1scEFzc2V0QW1vdW50IgpscEVtaXNzaW9uIgVpbmRleCIEbmV3WSICZHkiC3RvdGFsR2V0UmF3Ig0kdDAzNDk3MzM1MDIyIg0kdDAzNTM2NzM1NDgyIg5zdW1PZkdldEFzc2V0cyISbm9MZXNzVGhlbkFtdEFzc2V0IhRub0xlc3NUaGVuUHJpY2VBc3NldCIUYnVybkxQQXNzZXRPbkZhY3RvcnkiDWNoZWNrUGF5bWVudHMiCmZhY3RvcnlDZmciB3N0YWtpbmciCnVuc3Rha2VJbnYiAXYiBWJ1cm5BIg11bnN0YWtlQW1vdW50Ig0kdDAzNzc4OTM3OTc3IhBwYXltZW50QW1vdW50UmF3Ig5wYXltZW50QXNzZXRJZCINJHQwMzgyMzYzODMzMyIIYW10QXNTdHIiB3ByQXNTdHIiAWsiAnByIgxyZXNTY2FsZU11bHQiB3VzckFkZHIiB3BtdEFzSWQiAnR4IgZ2ZXJpZnkiD3RhcmdldFB1YmxpY0tleSIKbWF0Y2hlclB1YiIKb3JkZXJWYWxpZCILc2VuZGVyVmFsaWQiDG1hdGNoZXJWYWxpZCIHbmV3SGFzaCILYWxsb3dlZEhhc2giC2N1cnJlbnRIYXNoXAABYQCAwtcvAAFiCQC2AgEAgMLXLwABYwkAtgIBAICAkLu61q3wDQABZAkAtgIBAAAAAWUJALYCAQAAAAFmCQC2AgEAAQABZwkAtgIBAAIAAWgJALYCAQkAZQIFAWEJAGkCCQBoAgUBYQABBQFhAAFpAgMxMDAAAWoCATEAAWsCAl9fAAFsAgAAAW0AAQABbgACAAFvAAMAAXAABAABcQABAAFyAAIAAXMAAwABdAAEAAF1AAUAAXYABgABdwAHAAF4AAgAAXkACQABegABAAFBAAcAAUIACgABQwkAawMABQUBYQCQTgEBRAIBRQFGCQC8AgMJALYCAQUBRQUBYwkAtgIBBQFGAQFHAgFIAUkJAKADAQkAvAIDBQFICQC2AgEFAUkFAWMBAUoDAUsBTAFNCQBrAwUBSwUBTAUBTQEBTgEBSAMJAL8CAgUBZAUBSAkAvgIBBQFIBQFIAQFPAQFIAwkAvwICBQFkBQFICQC+AgEFAUgFAUgBAVAAAhMlc19fZmFjdG9yeUNvbnRyYWN0AQFRAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBAVIAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAVMAAhElcyVzX19wcmljZV9fbGFzdAEBVAIBVQFWCQC5CQIJAMwIAgIYJXMlcyVkJWRfX3ByaWNlX19oaXN0b3J5CQDMCAIJAKQDAQUBVQkAzAgCCQCkAwEFAVYFA25pbAUBawEBVwIBWAFZCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX1BfXwUBWAICX18FAVkBAVoCAVgBWQkArAICCQCsAgIJAKwCAgILJXMlcyVzX19HX18FAVgCAl9fBQFZAQJhYQACDyVzX19hbW91bnRBc3NldAECYWIAAg4lc19fcHJpY2VBc3NldAECYWMAAgclc19fYW1wAQJhZAACDSVzX19hZGRvbkFkZHIAAmFlAgclc19fZmVlAAJhZgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQJhZQUBQwECYWcAAhElc19fZmFjdG9yeUNvbmZpZwECYWgAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAmFpAgJhagJhawkArAICCQCsAgIJAKwCAgkArAICAgglZCVkJXNfXwUCYWoCAl9fBQJhawIIX19jb25maWcBAmFsAQJhbQkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQJhbQECYW4AAgwlc19fc2h1dGRvd24BAmFvAAIdJXNfX2FsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gBAmFwAAIXJXNfX2ZlZUNvbGxlY3RvckFkZHJlc3MBAmFxAwJhcgJhcwJhdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhFGYWlsZWQ6IG9yZFZhbGlkPQkApQMBBQJhcgILIHNuZHJWYWxpZD0JAKUDAQUCYXMCDCBtdGNoclZhbGlkPQkApQMBBQJhdAECYXUBAUgEAmF2BQFIAwkAAQIFAmF2AgZTdHJpbmcEAmF3BQJhdgUCYXcJAAIBAhNmYWlsIGNhc3QgdG8gU3RyaW5nAQJheAICYXkCYXoJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJheQUCYXoJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYXkJAMwIAgIBLgkAzAgCBQJhegkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAQJhQQICYXkCYXoJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQJheQUCYXoJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYXkJAMwIAgIBLgkAzAgCBQJhegkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAAJhQgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmF4AgUEdGhpcwkBAVAAAAJhQwkBAmF4AgUEdGhpcwkBAmFjAAECYUQACQELdmFsdWVPckVsc2UCCQCbCAIFAmFCCQECYW4ABwECYUUACQDZBAEJAQJheAIFAmFCCQECYWgAAAJhRgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmF4AgUCYUIJAQJhcAABAmFHAAQCYUgJAQJheAIFBHRoaXMJAQJhYQAEAmFJCQECYXgCBQR0aGlzCQECYWIABAJhSgkBAmFBAgUCYUIJAQJhbAEFAmFJBAJhagkBAmFBAgUCYUIJAQJhbAEFAmFICQC1CQIJAQJheAIFAmFCCQECYWkCCQCkAwEFAmFqCQCkAwEFAmFKBQFrAQJhSwAJALUJAgkBAmF4AgUCYUIJAQJhZwAFAWsAAmFMCQECYUsAAAJhTQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCYUwFAXoCIEludmFsaWQgc3Rha2luZyBjb250cmFjdCBhZGRyZXNzAAJhTgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCYUwFAUECIEludmFsaWQgc2xpcGFnZSBjb250cmFjdCBhZGRyZXNzAAJhTwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCYUwFAUICHEludmFsaWQgZ3d4IGNvbnRyYWN0IGFkZHJlc3MBAmFQCgJhUQJhUgJhUwJhVAJhVQJhVgJhVwJhWAJhWQJhWgkAuQkCCQDMCAICFCVkJWQlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYVEJAMwIAgkApAMBBQJhUgkAzAgCCQCkAwEFAmFTCQDMCAIJAKQDAQUCYVQJAMwIAgkApAMBBQJhVQkAzAgCCQCkAwEFAmFWCQDMCAIJAKQDAQUCYVcJAMwIAgkApAMBBQJhWAkAzAgCCQCkAwEFAmFZCQDMCAIJAKQDAQUCYVoFA25pbAUBawECYmEGAmJiAmJjAmJkAmFUAmFXAmFYCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYmIJAMwIAgkApAMBBQJiYwkAzAgCCQCkAwEFAmJkCQDMCAIJAKQDAQUCYVQJAMwIAgkApAMBBQJhVwkAzAgCCQCkAwEFAmFYBQNuaWwFAWsBAmJlAQJiZgMJAAACBQJiZgIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUCYmYBAmJnAgJiaAJiaQkAvAIDBQJiaAUBYwUCYmkBAmJqAwJiawJibAJibQQCYm4JALwCAwkAuAICBQJiawUCYmwFAWIFAmJsBAJibwkAvwICCQC4AgIFAmJtCQEBTgEFAmJuBQFkAwkBASEBBQJibwkAAgEJAKwCAgIKQmlnIHNscGc6IAkApgMBBQJibgkAlAoCBQJibwkAmQMBCQDMCAIFAmJrCQDMCAIFAmJsBQNuaWwBAmJwAwJicQJicgJicwQCYm4JALwCAwUCYnIFAWIFAmJxBAJidAkAvwICBQJicwUCYm4DAwUCYnQGCQC/AgIFAmJyBQJicQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKYDAQUCYnICASAJAKYDAQUCYnECASAJAKYDAQUCYm4CASAJAKYDAQUCYnMFAmJ0AQJidQQCYnYCYncCYngCYnkEAmJ6CQEBRAIFAmJ4BQJidgQCYkEJAQFEAgUCYnkFAmJ3CQECYmcCBQJiQQUCYnoBAmJCAwJieAJieQJiQwQCYkQJAQJhRwAEAmJFCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYkQFAXYEAmJGCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYkQFAXcEAmJHCQECYnUEBQJiRQUCYkYFAmJ4BQJieQQCYmkJAQFEAgUCYngFAmJFBAJiaAkBAUQCBQJieQUCYkYEAmJICQEBRAIFAmJDBQFhBAJiSQkBAmJnAgUCYmkFAmJIBAJiSgkBAmJnAgUCYmgFAmJICQDMCAIFAmJHCQDMCAIFAmJJCQDMCAIFAmJKBQNuaWwBAmJLAwJieAJieQJiQwQCYkwJAQJiQgMFAmJ4BQJieQUCYkMJAMwIAgkBAUcCCQCRAwIFAmJMAAAFAWEJAMwIAgkBAUcCCQCRAwIFAmJMAAEFAWEJAMwIAgkBAUcCCQCRAwIFAmJMAAIFAWEFA25pbAECYk0BAmJOBAJiTwkAawMFAmJOBQJhZgUBYQkAlAoCCQBlAgUCYk4FAmJPBQJiTwECYlAEAmJRAmJSAmJTAmJUBAJiRAkBAmFHAAQCYlUJAJEDAgUCYkQFAXMEAmJWCQCRAwIFAmJEBQF0BAJiVwkAkQMCBQJiRAUBdQQCYlgJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiRAUBdgQCYlkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiRAUBdwQCYloJAJEDAgUCYkQFAXIEAmNhCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUCYlUCC1dyb25nIExQIGlkCHF1YW50aXR5AwkBAiE9AgUCYlUFAmJSCQACAQIPV3JvbmcgcG10IGFzc2V0BAJjYgkBAmJlAQUCYlYEAmNjCQEBRAIFAmNiBQJiWAQCY2QJAQJiZQEFAmJXBAJjZQkBAUQCBQJjZAUCYlkEAmNmCQECYmcCBQJjZQUCY2MEAmNnCQEBRwIFAmNmBQFhBAJjaAkBAUQCBQJiUwUBYQQCY2kJAQFEAgUCY2EFAWEEAmNqCQC8AgMFAmNjBQJjaAUCY2kEAmNrCQC8AgMFAmNlBQJjaAUCY2kEAmNsCQEBRwIFAmNqBQJiWAQCY20JAQFHAgUCY2sFAmJZBAJjbgMJAAACBQJiUQIABQNuaWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYlQFAmNsAwkAAAIFAmJWAgVXQVZFUwUEdW5pdAkA2QQBBQJiVgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJiVAUCY20DCQAAAgUCYlcCBVdBVkVTBQR1bml0CQDZBAEFAmJXCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFaAgkApQgBBQJiVAUCYlEJAQJiYQYFAmNsBQJjbQUCYlMFAmNnBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmNnCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNnBQNuaWwJAJwKCgUCY2wFAmNtBQJiVgUCYlcFAmNiBQJjZAUCY2EFAmNmBQJiWgUCY24BAmNvDQJiUQJibQJjcAJjcQJjcgJjcwJiVAJjdAJjdQJjdgJjdwJjeAJjeQQCYkQJAQJhRwAEAmJVCQDZBAEJAJEDAgUCYkQFAXMEAmN6CQCRAwIFAmJEBQF0BAJjQQkAkQMCBQJiRAUBdQQCY0IJAJEDAgUCYkQFAXgEAmNDCQCRAwIFAmJEBQF5BAJjRAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJEBQF2BAJjRQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJEBQF3BAJiWgkAkQMCBQJiRAUBcgQCY0YICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYlUCCFdyIGxwIGFzCHF1YW50aXR5BAJjYgMFAmN0CQECYmUBBQJjegMDBQJjdgkAAAIFAmN5BQJjegcJAGUCCQECYmUBBQJjegUCY3gDBQJjdgkBAmJlAQUCY3oJAGUCCQECYmUBBQJjegUCY3AEAmNkAwUCY3QJAQJiZQEFAmNBAwMFAmN2CQAAAgUCY3kFAmNBBwkAZQIJAQJiZQEFAmNBBQJjeAMFAmN2CQECYmUBBQJjQQkAZQIJAQJiZQEFAmNBBQJjcgQCY0cJAQFEAgUCY3AFAmNEBAJjSAkBAUQCBQJjcgUCY0UEAmNJCQECYmcCBQJjSAUCY0cEAmNjCQEBRAIFAmNiBQJjRAQCY2UJAQFEAgUCY2QFAmNFBAJjSgMJAAACBQJjRgAABAJjZgUBZAQCY0sFAWQEAmJICQB2BgkAuQICBQJjRwUCY0gAAAkAtgIBAAUAAQAABQRET1dOCQCXCgUJAQFHAgUCYkgFAWEJAQFHAgUCY0cFAmNECQEBRwIFAmNIBQJjRQkBAmJnAgkAtwICBQJjZQUCY0gJALcCAgUCY2MFAmNHBQJjSwQCY2YJAQJiZwIFAmNlBQJjYwQCY0wJALwCAwkBAU4BCQC4AgIFAmNmBQJjSQUBYwUCY2YEAmNLCQEBRAIFAmJtBQFhAwMDBQJjdwkBAiE9AgUCY2YFAWQHCQC/AgIFAmNMBQJjSwcJAAIBCQCsAgIJAKwCAgkArAICAg9QcmljZSBzbGlwcGFnZSAJAKYDAQUCY0wCAyA+IAkApgMBBQJjSwQCY00JAQFEAgUCY0YFAWEEAmNOCQC8AgMFAmNHBQJjZgUBYwQCY08JALwCAwUCY0gFAWMFAmNmBAJjUAMJAL8CAgUCY04FAmNICQCUCgIFAmNPBQJjSAkAlAoCBQJjRwUCY04EAmNRCAUCY1ACXzEEAmNSCAUCY1ACXzIEAmJICQC8AgMFAmNNBQJjUgUCY2UJAJcKBQkBAUcCBQJiSAUBYQkBAUcCBQJjUQUCY0QJAQFHAgUCY1IFAmNFBQJjZgUCY0sEAmNTCAUCY0oCXzEEAmNUCAUCY0oCXzIEAmNVCAUCY0oCXzMEAmNnCQEBRwIIBQJjSgJfNAUBYQQCY1YJAQFHAggFAmNKAl81BQFhAwkAZwIAAAUCY1MJAAIBAgdMUCA8PSAwBAJjVwMJAQEhAQUCY3UAAAUCY1MEAmNYCQBlAgUCY3AFAmNUBAJjWQkAZQIFAmNyBQJjVQQCY1oDAwUCY3YJAAACBQJjeQUCY3oHCQCUCgIFAmN4AAADAwUCY3YJAAACBQJjeQUCY0EHCQCUCgIAAAUCY3gJAJQKAgUCY1QFAmNVBAJkYQgFAmNaAl8xBAJkYggFAmNaAl8yBAJkYwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVMABQJjZwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVQCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjZwkAzAgCCQELU3RyaW5nRW50cnkCCQEBVwIFAmJUBQJiUQkBAmFQCgUCZGEFAmRiBQJjVwUCY2cFAmJtBQJjVgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY1gFAmNZBQNuaWwJAJ8KDQUCY1MFAmNXBQJjZwUCY2IFAmNkBQJjRgUCYlUFAmJaBQJkYwUCY1gFAmNZBQJjcQUCY3MBAmRkAQJkZQQCYkQJAQJhRwAEAmRmCQCRAwIFAmJEBQF0BAJkZwkAkQMCBQJiRAUBdQQCYloJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiRAUBcgQCYkUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiRAUBdgQCYkYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiRAUBdwQCZGgJAQJiZQEFAmRmBAJkaQkBAmJlAQUCZGcEAmNmAwkAAAIIBQJkZQlvcmRlclR5cGUFA0J1eQkBAmJ1BAUCYkUFAmJGCQBkAgUCZGgIBQJkZQZhbW91bnQFAmRpCQECYnUEBQJiRQUCYkYJAGUCBQJkaAgFAmRlBmFtb3VudAUCZGkEAmNnCQEBRwIFAmNmBQFhAwMDCQECYUQABgkAAAIFAmJaBQFvBgkAAAIFAmJaBQFwCQACAQINQWRtaW4gYmxvY2tlZAQCZGoICAUCZGUJYXNzZXRQYWlyC2Ftb3VudEFzc2V0BAJkawMJAAACBQJkagUEdW5pdAIFV0FWRVMJANgEAQkBBXZhbHVlAQUCZGoEAmRsCAgFAmRlCWFzc2V0UGFpcgpwcmljZUFzc2V0BAJkbQMJAAACBQJkbAUEdW5pdAIFV0FWRVMJANgEAQkBBXZhbHVlAQUCZGwDAwkBAiE9AgUCZGsFAmRmBgkBAiE9AgUCZG0FAmRnCQACAQIJV3IgYXNzZXRzBAJkbggFAmRlBXByaWNlBAJjRQkAawMFAWEFAmJGBQJiRQQCZG8JAQFKAwUCZG4FAWEFAmNFBAJkcAMJAAACCAUCZGUJb3JkZXJUeXBlBQNCdXkJAGcCBQJjZwUCZG8JAGcCBQJkbwUCY2cGAQJkcQECZHIDCQECIT0CCQCQAwEIBQJkcghwYXltZW50cwABCQACAQIKMSBwbW50IGV4cAQCZHMJAQV2YWx1ZQEJAJEDAggFAmRyCHBheW1lbnRzAAAEAmJSCQEFdmFsdWUBCAUCZHMHYXNzZXRJZAQCY3gIBQJkcwZhbW91bnQEAmNKCQECYlAECQDYBAEIBQJkcg10cmFuc2FjdGlvbklkCQDYBAEFAmJSBQJjeAgFAmRyBmNhbGxlcgQCY2wIBQJjSgJfMQQCY20IBQJjSgJfMgQCYloJAQ1wYXJzZUludFZhbHVlAQgFAmNKAl85BAJjbggFAmNKA18xMAMDCQECYUQABgkAAAIFAmJaBQFwCQACAQkArAICAg9BZG1pbiBibG9ja2VkOiAJAKQDAQUCYloJAJcKBQUCY2wFAmNtBQJjeAUCYlIFAmNuAQJkdAoCZHUBWQJkdgJkdwJibQJjdQJjdgJjdwJjeAJjeQQCY0oJAQJjbw0FAVkFAmJtCAkBBXZhbHVlAQUCZHYGYW1vdW50CAkBBXZhbHVlAQUCZHYHYXNzZXRJZAgJAQV2YWx1ZQEFAmR3BmFtb3VudAgJAQV2YWx1ZQEFAmR3B2Fzc2V0SWQFAmR1CQAAAgUBWQIABQJjdQUCY3YFAmN3BQJjeAUCY3kEAmJaCQENcGFyc2VJbnRWYWx1ZQEIBQJjSgJfOAMDAwkBAmFEAAYJAAACBQJiWgUBbgYJAAACBQJiWgUBcAkAAgEJAKwCAgIIQmxvY2tlZDoJAKQDAQUCYloFAmNKAQJkeAECZHkEAmR6BQFnBAJkQQkAkQMCBQJkeQAABAJkQgkAkQMCBQJkeQABBAJkQwkApwMBBQFpBAJkRAkAuQICCQCnAwEFAmFDBQJkQwQCZEUJALcCAgUCZEEFAmRCAwkAAAIFAmRFBQFlBQFlBAJkRgkAuQICBQJkRAUCZHoEAmRHCQC5AgIJALkCAgkAuQICBQJkQQUCZEIFAmR6BQJkegQCZEgJALoCAgkAuQICBQJkRgUCZEUFAmRDBAJkSQkAuAICBQJkRgUCZEMEAmRKCQC3AgIFAmR6BQFmCgECZEsCAmRMAmRNBAJkTgUCZEwEAmRPCAUCZE4CXzEEAmRQCAUCZE4CXzIDCQECIT0CBQJkUAUEdW5pdAUCZEwEAmRRCQC6AgIJALkCAgkAuQICBQJkTwUCZE8FAmRPBQJkRwQCZFIJALoCAgkAuQICCQC3AgIFAmRICQC5AgIFAmRRBQJkegUCZE8JALcCAgkAugICCQC5AgIFAmRJBQJkTwUCZEMJALkCAgUCZEoFAmRRBAJkUwkBAU8BCQC4AgIFAmRSCQEFdmFsdWUBBQJkTwMJAMACAgUBZgUCZFMJAJQKAgUCZFIFAmRNCQCUCgIFAmRSBQR1bml0BAJkVAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKCQDMCAIACwkAzAgCAAwJAMwIAgANCQDMCAIADgUDbmlsBAJkVQoAAmRWBQJkVAoAAmRXCQCQAwEFAmRWCgACZFgJAJQKAgUCZEUFBHVuaXQKAQJkWQICZFoCZWEDCQBnAgUCZWEFAmRXBQJkWgkBAmRLAgUCZFoJAJEDAgUCZFYFAmVhCgECZWICAmRaAmVhAwkAZwIFAmVhBQJkVwUCZFoJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBAmViAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgkBAmRZAgUCZFgAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQCZE8IBQJkVQJfMQQCZFAIBQJkVQJfMgMJAQIhPQIFAmRQBQR1bml0BQJkTwkAAgEJAKwCAgIZRCBjYWxjdWxhdGlvbiBlcnJvciwgRCA9IAkApgMBBQJkTwECZWMDAmR5AmRyAmVkBAJkegUBZwQCZWUJAJEDAgUCZHkDCQAAAgUCZHIAAAABAAAEAmRDCQCnAwEFAWkEAmRECQC5AgIJAKcDAQUCYUMFAmRDBAJkRQUCZWUEAmRGCQC5AgIFAmREBQJkegQCZWYJALoCAgkAuQICCQC5AgIJALoCAgkAuQICBQJlZAUCZWQJALkCAgUCZWUFAmR6BQJlZAUCZEMJALkCAgUCZEYFAmR6BAJlZwkAuAICCQC3AgIFAmRFCQC6AgIJALkCAgUCZWQFAmRDBQJkRgUCZWQKAQJkSwICZEwCZE0EAmVoBQJkTAQCZWkIBQJlaAJfMQQCZFAIBQJlaAJfMgMJAQIhPQIFAmRQBQR1bml0BQJkTAQCZWoJALoCAgkAtwICCQC5AgIFAmVpBQJlaQUCZWYJALcCAgkAuQICBQFnBQJlaQUCZWcEAmVrCQEBTwEJALgCAgUCZWoJAQV2YWx1ZQEFAmVpAwkAwAICBQFmBQJlawkAlAoCBQJlagUCZE0JAJQKAgUCZWoFBHVuaXQEAmRUCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQkAzAgCAAoJAMwIAgALCQDMCAIADAkAzAgCAA0JAMwIAgAOBQNuaWwEAmVsCgACZFYFAmRUCgACZFcJAJADAQUCZFYKAAJkWAkAlAoCBQJlZAUEdW5pdAoBAmRZAgJkWgJlYQMJAGcCBQJlYQUCZFcFAmRaCQECZEsCBQJkWgkAkQMCBQJkVgUCZWEKAQJlYgICZFoCZWEDCQBnAgUCZWEFAmRXBQJkWgkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQECZWICCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCCQECZFkCBQJkWAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPBAJlaQgFAmVsAl8xBAJkUAgFAmVsAl8yAwkBAiE9AgUCZFAFBHVuaXQFAmVpCQACAQkArAICAhlZIGNhbGN1bGF0aW9uIGVycm9yLCBZID0gCQCmAwEFAmVpAQJlbQQCZW4CYlICYlQBWQQCZW8JAQJhRwAEAmJWCQCRAwIFAmVvBQF0BAJiVwkAkQMCBQJlbwUBdQQCYlUJAJEDAgUCZW8FAXMEAmNECQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZW8FAXYEAmNFCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZW8FAXcEAmNiCQECYmUBBQJiVgQCY2QJAQJiZQEFAmJXBAJlcAMJAAACBQFZAgAJAJQKAgUCY2IFAmNkAwkAAAIFAmJSBQJiVgMJAGYCBQJlbgUCY2IJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIJAGUCBQJjYgUCZW4FAmNkAwkAAAIFAmJSBQJiVwMJAGYCBQJlbgUCY2QJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIFAmNiCQBlAgUCY2QFAmVuCQACAQIQd3JvbmcgcG10QXNzZXRJZAQCZXEIBQJlcAJfMQQCZXIIBQJlcAJfMgQCZXMDCQAAAgUCYlIFAmJWCQCUCgIFAmVuAAADCQAAAgUCYlIFAmJXCQCUCgIAAAUCZW4JAAIBAg9pbnZhbGlkIHBheW1lbnQEAmV0CAUCZXMCXzEEAmV1CAUCZXMCXzIEAmV2CAkBAmJNAQUCZXQCXzEEAmV3CAkBAmJNAQUCZXUCXzEEAmJPCAkBAmJNAQUCZW4CXzIEAmV4CQBkAgUCZXEFAmV2BAJleQkAZAIFAmVyBQJldwQCYnIJAQJkeAEJAMwIAgkAtgIBBQJlcQkAzAgCCQC2AgEFAmVyBQNuaWwEAmJxCQECZHgBCQDMCAIJALYCAQUCZXgJAMwIAgkAtgIBBQJleQUDbmlsBAJlegMJAL8CAgUCYnEFAmJyBgkBBXRocm93AAMJAAACBQJlegUCZXoEAmVBCQC2AgEICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQJiVQIQaW52YWxpZCBscCBhc3NldAhxdWFudGl0eQQCZUIDCQC/AgIFAmVBBQFlCQC8AgMFAmVBCQC4AgIFAmJxBQJicgUCYnIJAAIBAiJpbml0aWFsIGRlcG9zaXQgcmVxdWlyZXMgYWxsIGNvaW5zBAJjZwkBAUcCCQECYmcCCQEBRAIFAmV5BQJjRQkBAUQCBQJleAUCY0QFAWEEAmRjCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwAFAmNnCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBVAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNnCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFXAgUCYlQFAVkJAQJhUAoFAmV0BQJldQkAoAMBBQJlQgUCY2cAAAAABQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wAAAAAAUDbmlsBAJlQwkAawMFAmVyBQFhBQJlcQQCZUQJAGsDBQJlbgUBYQkAZAIFAmVDBQFhBAJlRQkAZQIFAmVuBQJlRAQCZUYJALwCAwUCZUEJALYCAQUCZUUJALYCAQUCZXIEAmVHCQCgAwEJALwCAwkAuAICBQJlQgUCZUYFAWIFAmVGCQCWCgQJAKADAQUCZUIFAmRjBQJiTwUCZUcJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmVIBgJlSQJlSgJlSwJkdQJlTAJlTQMJAQIhPQIJAJADAQUCZUsAAQkAAgECCzEgcG1udCBleHBkBAJlbwkBAmFHAAQCYlUJAJEDAgUCZW8FAXMEAmJWCQCRAwIFAmVvBQF0BAJiVwkAkQMCBQJlbwUBdQQCZU4JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJlbwUBdgQCZU8JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJlbwUBdwQCZVAJAJEDAgUCZW8FAXIEAmJUAwkAAAIFAmR1BQR0aGlzBQJlTAUCZHUEAmRzCQEFdmFsdWUBCQCRAwIFAmVLAAAEAmJSCQEFdmFsdWUBCAUCZHMHYXNzZXRJZAQCY3gIBQJkcwZhbW91bnQDCQBmAgCAlOvcAwUCY3gJAAIBAg1NaW4gcG10IDEwIExQBAJiUQkA2AQBBQJlTQMJAQIhPQIFAmJVCQDYBAEFAmJSCQACAQIIV3JvbmcgTFAEAmNiCQECYmUBBQJiVgQCY2QJAQJiZQEFAmJXBAJlUQoAAmVSCQD8BwQFBHRoaXMCE2dldE9uZVRrblYyUkVBRE9OTFkJAMwIAgUCZUkJAMwIAgUCY3gFA25pbAUDbmlsAwkAAQIFAmVSAgooSW50LCBJbnQpBQJlUgkAAgEJAKwCAgkAAwEFAmVSAh8gY291bGRuJ3QgYmUgY2FzdCB0byAoSW50LCBJbnQpBAJlUwgFAmVRAl8xBAJiTwgFAmVRAl8yBAJlVAMDCQBmAgUCZUoAAAkAZgIFAmVKBQJlUwcJAAIBCQC5CQIJAMwIAgIfYW1vdW50IHRvIHJlY2VpdmUgaXMgbGVzcyB0aGFuIAkAzAgCCQCkAwEFAmVKBQNuaWwCAAUCZVMEAmVVAwkAAAIFAmVJBQJiVgkAlgoEBQJlVAAACQBlAgkAZQIFAmNiBQJlVAUCYk8FAmNkAwkAAAIFAmVJBQJiVwkAlgoEAAAFAmVUBQJjYgkAZQIJAGUCBQJjZAUCZVQFAmJPCQACAQIUaW52YWxpZCBvdXQgYXNzZXQgaWQEAmVWCAUCZVUCXzEEAmVXCAUCZVUCXzIEAmV4CAUCZVUCXzMEAmV5CAUCZVUCXzQEAmVYCQECYmcCCQEBRAIFAmV5BQJlTwkBAUQCBQJleAUCZU4EAmVZCQEBRwIFAmVYBQFhBAJlWgMJAAACBQJlSQIFV0FWRVMFBHVuaXQJANkEAQUCZUkEAmZhAwkAZgIFAmJPAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUYFAmJPBQJlWgUDbmlsBQNuaWwEAmNuCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYlQFAmVUBQJlWgkAzAgCCQELU3RyaW5nRW50cnkCCQEBWgIJAKUIAQUCYlQFAmJRCQECYmEGBQJlVgUCZVcFAmN4BQJlWQUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVMABQJlWQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVQCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJlWQUDbmlsBQJmYQMJAAACBQJjbgUCY24EAmZiCQD8BwQFAmFCAgRidXJuCQDMCAIFAmN4BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJSBQJjeAUDbmlsAwkAAAIFAmZiBQJmYgkAlAoCBQJjbgUCZVQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmZjAAQCYXYJAKIIAQkBAVEAAwkAAQIFAmF2AgZTdHJpbmcEAmRFBQJhdgkA2QQBBQJkRQMJAAECBQJhdgIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJmZAAEAmF2CQCiCAEJAQFSAAMJAAECBQJhdgIGU3RyaW5nBAJkRQUCYXYJANkEAQUCZEUDCQABAgUCYXYCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgACZmUJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAECZmYBAmRyBAJhdgkBAmZjAAMJAAECBQJhdgIKQnl0ZVZlY3RvcgQCZmcFAmF2AwkAAAIIBQJkcg9jYWxsZXJQdWJsaWNLZXkFAmZnBgUCZmUDCQABAgUCYXYCBFVuaXQDCQAAAggFAmRyBmNhbGxlcgUEdGhpcwYFAmZlCQACAQILTWF0Y2ggZXJyb3IaAmRyAQtjb25zdHJ1Y3RvcgEBUAQCZWYJAQJmZgEFAmRyAwkAAAIFAmVmBQJlZgkAzAgCCQELU3RyaW5nRW50cnkCCQEBUAAFAVAFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkcgEKc2V0TWFuYWdlcgECZmgEAmVmCQECZmYBBQJkcgMJAAACBQJlZgUCZWYEAmZpCQDZBAEFAmZoAwkAAAIFAmZpBQJmaQkAzAgCCQELU3RyaW5nRW50cnkCCQEBUgAFAmZoBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHIBDmNvbmZpcm1NYW5hZ2VyAAQCYkwJAQJmZAAEAmZqAwkBCWlzRGVmaW5lZAEFAmJMBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJmagUCZmoEAmZrAwkAAAIIBQJkcg9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmJMBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJmawUCZmsJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVEACQDYBAEJAQV2YWx1ZQEFAmJMCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFSAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRyAQNwdXQCAmZsAmZtBAJmbgkBAmFLAAQCZm8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmZuBQF6AgpXciBzdCBhZGRyBAJmcAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCZm4FAUECCldyIHNsIGFkZHIDCQBmAgAABQJmbAkAAgECDldyb25nIHNsaXBwYWdlAwkBAiE9AgkAkAMBCAUCZHIIcGF5bWVudHMAAgkAAgECDDIgcG1udHMgZXhwZAQCZnEJAQJkdAoJAKUIAQgFAmRyBmNhbGxlcgkA2AQBCAUCZHINdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIICQEFdmFsdWUBCQCRAwIIBQJkcghwYXltZW50cwAAB2Fzc2V0SWQICQEFdmFsdWUBCQCRAwIIBQJkcghwYXltZW50cwAABmFtb3VudAkAkQMCCAUCZHIIcGF5bWVudHMAAQUCZmwGBwYAAAIABAJjVwgFAmZxAl8yBAJmcggFAmZxAl83BAJjbggFAmZxAl85BAJjWAgFAmZxA18xMAQCY1kIBQJmcQNfMTEEAmJWCAUCZnEDXzEyBAJiVwgFAmZxA18xMwQCY0oJAPwHBAUCYUICBGVtaXQJAMwIAgUCY1cFA25pbAUDbmlsAwkAAAIFAmNKBQJjSgQCZnMEAmF2BQJjSgMJAAECBQJhdgIHQWRkcmVzcwQCZnQFAmF2CQD8BwQFAmZ0AgRlbWl0CQDMCAIFAmNXBQNuaWwFA25pbAUEdW5pdAMJAAACBQJmcwUCZnMEAmZ1AwkAZgIFAmNYAAAJAPwHBAUCZnACA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiVgUCY1gFA25pbAUDbmlsAwkAAAIFAmZ1BQJmdQQCZnYDCQBmAgUCY1kAAAkA/AcEBQJmcAIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJXBQJjWQUDbmlsBQNuaWwDCQAAAgUCZnYFAmZ2BAJmdwMFAmZtBAJmeAkA/AcEBQJmbwIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZnIFAmNXBQNuaWwDCQAAAgUCZngFAmZ4BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmRyBmNhbGxlcgUCY1cFAmZyBQNuaWwJAM4IAgUCY24FAmZ3CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRyAQtwdXRPbmVUa25WMgICZUoCZm0DCQECIT0CCQCQAwEIBQJkcghwYXltZW50cwABCQACAQILMSBwbW50IGV4cGQEAmVvCQECYUcABAJiVgkAkQMCBQJlbwUBdAQCYlcJAJEDAgUCZW8FAXUEAmJVCQDZBAEJAJEDAgUCZW8FAXMEAmVOCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZW8FAXYEAmVPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZW8FAXcEAmJUAwkAAAIIBQJkcgZjYWxsZXIFBHRoaXMIBQJkcgxvcmlnaW5DYWxsZXIIBQJkcgZjYWxsZXIEAmRzCQEFdmFsdWUBCQCRAwIIBQJkcghwYXltZW50cwAABAJiUgkA2AQBCQEFdmFsdWUBCAUCZHMHYXNzZXRJZAQCY3gIBQJkcwZhbW91bnQDCQBmAgCAreIEBQJjeAkAAgECDVdyb25nIHBtdCBhbXQEAmZ5CQECZW0EBQJjeAUCYlIJAKUIAQUCYlQJANgEAQgFAmRyDXRyYW5zYWN0aW9uSWQEAmZ6CAUCZnkCXzEEAmNuCAUCZnkCXzIEAmJPCAUCZnkCXzMEAmNXAwMJAGYCBQJlSgAACQBmAgUCZUoFAmZ6BwkAAgEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZUoFA25pbAIABQJmegQCZnEJAPwHBAUCYUICBGVtaXQJAMwIAgUCY1cFA25pbAUDbmlsAwkAAAIFAmZxBQJmcQQCZnMEAmF2BQJmcQMJAAECBQJhdgIHQWRkcmVzcwQCZnQFAmF2CQD8BwQFAmZ0AgRlbWl0CQDMCAIFAmNXBQNuaWwFA25pbAUEdW5pdAMJAAACBQJmcwUCZnMEAmZ3AwUCZm0EAmZ4CQD8BwQFAmFNAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiVQUCY1cFA25pbAMJAAACBQJmeAUCZngFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCZHIGY2FsbGVyBQJjVwUCYlUFA25pbAQCZmEDCQBmAgUCYk8AAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhRgUCYk8JANkEAQUCYlIFA25pbAUDbmlsCQCUCgIJAM4IAgkAzggCBQJjbgUCZncFAmZhBQJjVwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkcgEKcHV0Rm9yRnJlZQECZkEDCQBmAgAABQJmQQkAAgECCldyb25nIHNscGcDCQECIT0CCQCQAwEIBQJkcghwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAJmQgkBAmR0CgkApQgBCAUCZHIGY2FsbGVyCQDYBAEIBQJkcg10cmFuc2FjdGlvbklkCQEPQXR0YWNoZWRQYXltZW50AggJAQV2YWx1ZQEJAJEDAggFAmRyCHBheW1lbnRzAAAHYXNzZXRJZAgJAQV2YWx1ZQEJAJEDAggFAmRyCHBheW1lbnRzAAAGYW1vdW50CQCRAwIIBQJkcghwYXltZW50cwABBQJmQQcHBgAAAgAIBQJmQgJfOQJkcgEDZ2V0AAQCY0oJAQJkcQEFAmRyBAJmQwgFAmNKAl8xBAJjbQgFAmNKAl8yBAJjeAgFAmNKAl8zBAJiUggFAmNKAl80BAJjbggFAmNKAl81BAJlZwkA/AcEBQJhQgIEYnVybgkAzAgCBQJjeAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiUgUCY3gFA25pbAMJAAACBQJlZwUCZWcFAmNuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRyAQtnZXRPbmVUa25WMgICZUkCZUoEAmZECQECZUgGBQJlSQUCZUoIBQJkcghwYXltZW50cwgFAmRyBmNhbGxlcggFAmRyDG9yaWdpbkNhbGxlcggFAmRyDXRyYW5zYWN0aW9uSWQEAmNuCAUCZkQCXzEEAmVUCAUCZkQCXzIJAJQKAgUCY24FAmVUAmRyARNnZXRPbmVUa25WMlJFQURPTkxZAgJlSQJmRQQCZW8JAQJhRwAEAmJWCQCRAwIFAmVvBQF0BAJiVwkAkQMCBQJlbwUBdQQCYlUJAJEDAgUCZW8FAXMEAmR5CQDMCAIJALYCAQkBAmJlAQUCYlYJAMwIAgkAtgIBCQECYmUBBQJiVwUDbmlsBAJmRgkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUCYlUCEGludmFsaWQgbHAgYXNzZXQIcXVhbnRpdHkEAmJyCQECZHgBBQJkeQQCYnEJALgCAgUCYnIJALwCAwkAtgIBBQJmRQUCYnIFAmZGBAJmRwMJAAACBQJlSQUCYlYAAAMJAAACBQJlSQUCYlcAAQkAAgECFGludmFsaWQgb3V0IGFzc2V0IGlkBAJmSAkBAmVjAwUCZHkFAmZHBQJicQQCZkkJALgCAgkAkQMCBQJkeQUCZkcFAmZIBAJmSgkAoAMBCQC4AgIFAmZJBQFmBAJmSwkBAmJNAQUCZkoEAmVTCAUCZksCXzEEAmJPCAUCZksCXzIJAJQKAgUDbmlsCQCUCgIFAmVTBQJiTwJkcgEcZ2V0T25lVGtuVjJXaXRoQm9udXNSRUFET05MWQICZUkCZkUEAmVvCQECYUcABAJiVgkAkQMCBQJlbwUBdAQCYlcJAJEDAgUCZW8FAXUEAmJVCQCRAwIFAmVvBQFzBAJjYgkBAmJlAQUCYlYEAmNkCQECYmUBBQJiVwQCZkwKAAJlUgkA/AcEBQR0aGlzAhNnZXRPbmVUa25WMlJFQURPTkxZCQDMCAIFAmVJCQDMCAIFAmZFBQNuaWwFA25pbAMJAAECBQJlUgIKKEludCwgSW50KQUCZVIJAAIBCQCsAgIJAAMBBQJlUgIfIGNvdWxkbid0IGJlIGNhc3QgdG8gKEludCwgSW50KQQCZVMIBQJmTAJfMQQCYk8IBQJmTAJfMgQCY0oJAQJiUAQCAAUCYlUFAmZFBQR0aGlzBAJjbAgFAmNKAl8xBAJjbQgFAmNKAl8yBAJmTQkAZAIFAmNsBQJjbQQCZUcJAGsDCQBlAgUCZVMFAmZNBQFhBQJmTQkAlAoCBQNuaWwJAJUKAwUCZVMFAmJPBQJlRwJkcgEJZ2V0Tm9MZXNzAgJmTgJmTwQCY0oJAQJkcQEFAmRyBAJjbAgFAmNKAl8xBAJjbQgFAmNKAl8yBAJjeAgFAmNKAl8zBAJiUggFAmNKAl80BAJjbggFAmNKAl81AwkAZgIFAmZOBQJjbAkAAgEJAKwCAgkArAICCQCsAgICCUZhaWxlZDogIAkApAMBBQJjbAIDIDwgCQCkAwEFAmZOAwkAZgIFAmZPBQJjbQkAAgEJAKwCAgkArAICCQCsAgICCEZhaWxlZDogCQCkAwEFAmNtAgMgPCAJAKQDAQUCZk8EAmZQCQD8BwQFAmFCAgRidXJuCQDMCAIFAmN4BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJSBQJjeAUDbmlsAwkAAAIFAmZQBQJmUAUCY24JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHIBDXVuc3Rha2VBbmRHZXQBAmJOBAJmUQMJAQIhPQIJAJADAQgFAmRyCHBheW1lbnRzAAAJAAIBAg1ObyBwbW50cyBleHBkBgMJAAACBQJmUQUCZlEEAmJECQECYUcABAJmUgkBAmFLAAQCZnIJANkEAQkAkQMCBQJiRAUBcwQCZlMJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmZSBQF6AgpXciBzdCBhZGRyBAJmVAkA/AcEBQJmUwIHdW5zdGFrZQkAzAgCCQDYBAEFAmZyCQDMCAIFAmJOBQNuaWwFA25pbAMJAAACBQJmVAUCZlQEAmNKCQECYlAECQDYBAEIBQJkcg10cmFuc2FjdGlvbklkCQDYBAEFAmZyBQJiTggFAmRyBmNhbGxlcgQCYloJAQ1wYXJzZUludFZhbHVlAQgFAmNKAl85BAJjbggFAmNKA18xMAQCZlUDAwkBAmFEAAYJAAACBQJiWgUBcAkAAgEJAKwCAgIJQmxvY2tlZDogCQCkAwEFAmJaBgMJAAACBQJmVQUCZlUEAmZWCQD8BwQFAmFCAgRidXJuCQDMCAIFAmJOBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmZyBQJiTgUDbmlsAwkAAAIFAmZWBQJmVgUCY24JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHIBFXVuc3Rha2VBbmRHZXRPbmVUa25WMgMCZlcCZUkCZUoEAmZRAwkBAiE9AgkAkAMBCAUCZHIIcGF5bWVudHMAAAkAAgECDU5vIHBtbnRzIGV4cGQGAwkAAAIFAmZRBQJmUQQCYkQJAQJhRwAEAmZSCQECYUsABAJmcgkA2QQBCQCRAwIFAmJEBQFzBAJmUwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCZlIFAXoCCldyIHN0IGFkZHIEAmZUCQD8BwQFAmZTAgd1bnN0YWtlCQDMCAIJANgEAQUCZnIJAMwIAgUCZlcFA25pbAUDbmlsAwkAAAIFAmZUBQJmVAQCZlgJAQJlSAYFAmVJBQJlSgkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZnIFAmZXBQNuaWwIBQJkcgZjYWxsZXIIBQJkcgxvcmlnaW5DYWxsZXIIBQJkcg10cmFuc2FjdGlvbklkBAJjbggFAmZYAl8xBAJlVAgFAmZYAl8yCQCUCgIFAmNuBQJlVAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkcgEccHV0T25lVGtuVjJXaXRoQm9udXNSRUFET05MWQICZlkCZloEAmVvCQECYUcABAJiVgkAkQMCBQJlbwUBdAQCYlcJAJEDAgUCZW8FAXUEAmJVCQCRAwIFAmVvBQFzBAJnYQkBAmVtBAUCZlkFAmZaAgACAAQCZUIIBQJnYQJfMQQCY24IBQJnYQJfMgQCYk8IBQJnYQJfMwQCZUcIBQJnYQJfNAkAlAoCBQNuaWwJAJUKAwUCZUIFAmJPBQJlRwJkcgEIYWN0aXZhdGUCAmdiAmdjAwkBAiE9AgkApQgBCAUCZHIGY2FsbGVyCQClCAEFAmFCCQACAQIGZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFhAAUCZ2IJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFiAAUCZ2MFA25pbAIHc3VjY2VzcwJkcgEEc2V0UwICZ2QCZlUDCQECIT0CCQClCAEIBQJkcgZjYWxsZXIJAQJheAIFBHRoaXMJAQJhZAAFAmZlCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmdkBQJmVQUDbmlsAmRyAQRzZXRJAgJnZAJmVQMJAQIhPQIJAKUIAQgFAmRyBmNhbGxlcgkBAmF4AgUEdGhpcwkBAmFkAAUCZmUJAMwIAgkBDEludGVnZXJFbnRyeQIFAmdkBQJmVQUDbmlsAmRyARxnZXRQb29sQ29uZmlnV3JhcHBlclJFQURPTkxZAAkAlAoCBQNuaWwJAQJhRwACZHIBHGdldEFjY0JhbGFuY2VXcmFwcGVyUkVBRE9OTFkBAmJmCQCUCgIFA25pbAkBAmJlAQUCYmYCZHIBGWNhbGNQcmljZXNXcmFwcGVyUkVBRE9OTFkDAmJ4AmJ5AmJDBAJnZQkBAmJCAwUCYngFAmJ5BQJiQwkAlAoCBQNuaWwJAMwIAgkApgMBCQCRAwIFAmdlAAAJAMwIAgkApgMBCQCRAwIFAmdlAAEJAMwIAgkApgMBCQCRAwIFAmdlAAIFA25pbAJkcgEWZnJvbVgxOFdyYXBwZXJSRUFET05MWQIBSAJnZgkAlAoCBQNuaWwJAQFHAgkApwMBBQFIBQJnZgJkcgEUdG9YMThXcmFwcGVyUkVBRE9OTFkCAUUBRgkAlAoCBQNuaWwJAKYDAQkBAUQCBQFFBQFGAmRyAR5jYWxjUHJpY2VCaWdJbnRXcmFwcGVyUkVBRE9OTFkCAmJoAmJpCQCUCgIFA25pbAkApgMBCQECYmcCCQCnAwEFAmJoCQCnAwEFAmJpAmRyASNlc3RpbWF0ZVB1dE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQkCYlECYm0CY3ACY3ECY3ICY3MCZ2cCY3QCY3UJAJQKAgUDbmlsCQECY28NBQJiUQUCYm0FAmNwBQJjcQUCY3IFAmNzBQJnZwUCY3QFAmN1BgcAAAIAAmRyASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQCYlECZ2gCYlMCZ2cEAmNKCQECYlAEBQJiUQUCZ2gFAmJTCQERQGV4dHJOYXRpdmUoMTA2MikBBQJnZwkAlAoCBQNuaWwJAJwKCggFAmNKAl8xCAUCY0oCXzIIBQJjSgJfMwgFAmNKAl80CAUCY0oCXzUIBQJjSgJfNggFAmNKAl83CQCmAwEIBQJjSgJfOAgFAmNKAl85CAUCY0oDXzEwAmRyAQ5nZXRGZWVSRUFET05MWQAJAJQKAgUDbmlsBQJhZgECZ2kBAmdqAAQCZ2sEAmF2CQECZmMAAwkAAQIFAmF2AgpCeXRlVmVjdG9yBAJmZwUCYXYFAmZnAwkAAQIFAmF2AgRVbml0CAUCZ2kPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IEAmF2BQJnaQMJAAECBQJhdgIFT3JkZXIEAmRlBQJhdgQCZ2wJAQJhRQAEAmdtCQECZGQBBQJkZQQCZ24JAPQDAwgFAmRlCWJvZHlCeXRlcwkAkQMCCAUCZGUGcHJvb2ZzAAAIBQJkZQ9zZW5kZXJQdWJsaWNLZXkEAmdvCQD0AwMIBQJkZQlib2R5Qnl0ZXMJAJEDAggFAmRlBnByb29mcwABBQJnbAMDAwUCZ20FAmduBwUCZ28HBgkBAmFxAwUCZ20FAmduBQJnbwMJAAECBQJhdgIUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAmRFBQJhdgQCZ3AJAPYDAQkBBXZhbHVlAQgFAmRFBnNjcmlwdAQCZ3EJANsEAQkBBXZhbHVlAQkAnQgCBQJhQgkBAmFvAAQCZ3IJAPEHAQUEdGhpcwMDCQAAAgUCZ3EFAmdwCQECIT0CBQJncgUCZ3AHBgkA9AMDCAUCZ2kJYm9keUJ5dGVzCQCRAwIIBQJnaQZwcm9vZnMAAAUCZ2sJAPQDAwgFAmdpCWJvZHlCeXRlcwkAkQMCCAUCZ2kGcHJvb2ZzAAAFAmdr9/U28Q==",
    "chainId": 84,
    "height": 2266073,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6y6jQYoGQ1X4kXBpP31S8nbngmt2EP6Tc954naMZqP3D
Next: BQ5jMy4iGBGzSPFhsjaz2EKPP9r9ZFgLQF1nv4iiVi72

Diff: 

OldNewDifferences
608608             let lpAmount = if ((lpAssetEmission > big0))
609609                 then fraction(lpAssetEmission, (D1 - D0), D0)
610610                 else throw("initial deposit requires all coins")
611-            let curPrice = f1(cpbi(t1(prBalance, priceDcm), t1(amBalance, amtDcm)), scale8)
611+            let curPrice = f1(cpbi(t1(prBalanceNew, priceDcm), t1(amBalanceNew, amtDcm)), scale8)
612612             let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId), dataPutActionInfo(amAmountRaw, prAmountRaw, toInt(lpAmount), curPrice, 0, 0, height, lastBlock.timestamp, 0, 0))]
613613             let poolProportion = fraction(prBalanceOld, scale8, amBalanceOld)
614614             let amountAssetPart = fraction(pmtAmtRaw, scale8, (poolProportion + scale8))
646646                     else {
647647                         let amBalance = getAccBalance(amId)
648648                         let prBalance = getAccBalance(prId)
649-                        let $t02624626354 = {
649+                        let $t02625226360 = {
650650                             let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)
651651                             if ($isInstanceOf(@, "(Int, Int)"))
652652                                 then @
653653                                 else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
654654                             }
655-                        let totalGet = $t02624626354._1
656-                        let feeAmount = $t02624626354._2
655+                        let totalGet = $t02625226360._1
656+                        let feeAmount = $t02625226360._2
657657                         let totalAmount = if (if ((minOutAmount > 0))
658658                             then (minOutAmount > totalGet)
659659                             else false)
660660                             then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
661661                             else totalGet
662-                        let $t02654126724 = if ((outAssetId == amId))
663-                            then $Tuple2(totalAmount, 0)
662+                        let $t02654726854 = if ((outAssetId == amId))
663+                            then $Tuple4(totalAmount, 0, ((amBalance - totalAmount) - feeAmount), prBalance)
664664                             else if ((outAssetId == prId))
665-                                then $Tuple2(0, totalAmount)
665+                                then $Tuple4(0, totalAmount, amBalance, ((prBalance - totalAmount) - feeAmount))
666666                                 else throw("invalid out asset id")
667-                        let outAm = $t02654126724._1
668-                        let outPr = $t02654126724._2
669-                        let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
667+                        let outAm = $t02654726854._1
668+                        let outPr = $t02654726854._2
669+                        let amBalanceNew = $t02654726854._3
670+                        let prBalanceNew = $t02654726854._4
671+                        let curPrX18 = cpbi(t1(prBalanceNew, prDecimals), t1(amBalanceNew, amDecimals))
670672                         let curPr = f1(curPrX18, scale8)
671673                         let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
672674                             then unit
831833 
832834 
833835 @Callable(i)
834-func putOneTkn (amAssetPart,prAssetPart,outLp,slippage,autoStake) = {
835-    let cfg = gfc()
836-    let stakingCntr = valueOrErrorMessage(addressFromString(cfg[idxFactStakCntr]), "Wr st addr")
837-    let slipCntr = valueOrErrorMessage(addressFromString(cfg[idxFactSlippCntr]), "Wr sl addr")
838-    let gwxCntr = valueOrErrorMessage(addressFromString(cfg[idxFactGwxRewCntr]), "Wr gwx addr")
839-    let poolCfg = gpc()
840-    let amId = poolCfg[idxAmAsId]
841-    let prId = poolCfg[idxPrAsId]
842-    let amDcm = parseIntValue(poolCfg[idxAmtAsDcm])
843-    let prDcm = parseIntValue(poolCfg[idxPriceAsDcm])
844-    let addon = valueOrElse(getString(this, ada()), "")
845-    let userAddress = if ((addon == toString(i.caller)))
846-        then i.originCaller
847-        else i.caller
848-    if (if (if (if ((0 >= slippage))
849-        then true
850-        else (0 >= amAssetPart))
851-        then true
852-        else (0 >= prAssetPart))
853-        then true
854-        else (0 >= outLp))
855-        then throw("Wrong params")
856-        else if ((size(i.payments) != 1))
857-            then throw("1 pmnt expd")
858-            else {
859-                let pmt = value(i.payments[0])
860-                let pmtAssetId = toBase58String(value(pmt.assetId))
861-                let paymentAmountRaw = pmt.amount
862-                let $t03211032162 = takeFee(paymentAmountRaw)
863-                let pmtAmt = $t03211032162._1
864-                let feeAmount = $t03211032162._2
865-                if ((10000000 > paymentAmountRaw))
866-                    then throw("Wrong pmt amt")
867-                    else {
868-                        let amBalance = getAccBalance(amId)
869-                        let prBalance = getAccBalance(prId)
870-                        let $t03232232938 = if ((pmtAssetId == amId))
871-                            then if (if ((paymentAmountRaw > amBalance))
872-                                then true
873-                                else (amAssetPart > pmtAmt))
874-                                then throw("invalid payment amount")
875-                                else $Tuple6((amBalance - paymentAmountRaw), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
876-                            else if ((pmtAssetId == prId))
877-                                then if (if ((paymentAmountRaw > prBalance))
878-                                    then true
879-                                    else (prAssetPart > pmtAmt))
880-                                    then throw("invalid payment amount")
881-                                    else $Tuple6(amBalance, (prBalance - paymentAmountRaw), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
882-                                else throw("wrong pmtAssetId")
883-                        let amBalanceNow = $t03232232938._1
884-                        let prBalanceNow = $t03232232938._2
885-                        let virtSwapInAm = $t03232232938._3
886-                        let virtSwapOutPr = $t03232232938._4
887-                        let virtSwapInPr = $t03232232938._5
888-                        let virtSwapOutAm = $t03232232938._6
889-                        let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
890-                        let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
891-                        let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
892-                        if ((D0vsD1 == D0vsD1))
893-                            then {
894-                                let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, true, pmtAmt, pmtAssetId)
895-                                let estimLP = estPut._2
896-                                let lpAssetId = estPut._7
897-                                let state = estPut._9
898-                                let amDiff = estPut._10
899-                                let prDiff = estPut._11
900-                                let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
901-                                let emitLpAmt = toInt(lpCalcRes._2)
902-                                let e = invoke(fca, "emit", [emitLpAmt], nil)
903-                                if ((e == e))
904-                                    then {
905-                                        let el =                                         match e {
906-                                            case legacy: Address => 
907-                                                invoke(legacy, "emit", [emitLpAmt], nil)
908-                                            case _ => 
909-                                                unit
910-                                        }
911-                                        if ((el == el))
912-                                            then {
913-                                                let sa = if ((amDiff > 0))
914-                                                    then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
915-                                                    else nil
916-                                                if ((sa == sa))
917-                                                    then {
918-                                                        let sp = if ((prDiff > 0))
919-                                                            then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
920-                                                            else nil
921-                                                        if ((sp == sp))
922-                                                            then {
923-                                                                let lpTrnsfr = if (autoStake)
924-                                                                    then {
925-                                                                        let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
926-                                                                        if ((ss == ss))
927-                                                                            then nil
928-                                                                            else throw("Strict value is not equal to itself.")
929-                                                                        }
930-                                                                    else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
931-                                                                let sendFeeToMatcher = if ((feeAmount > 0))
932-                                                                    then [ScriptTransfer(feeCollectorAddress, feeAmount, fromBase58String(pmtAssetId))]
933-                                                                    else nil
934-                                                                ((state ++ lpTrnsfr) ++ sendFeeToMatcher)
935-                                                                }
936-                                                            else throw("Strict value is not equal to itself.")
937-                                                        }
938-                                                    else throw("Strict value is not equal to itself.")
939-                                                }
940-                                            else throw("Strict value is not equal to itself.")
941-                                        }
942-                                    else throw("Strict value is not equal to itself.")
943-                                }
944-                            else throw("Strict value is not equal to itself.")
945-                        }
946-                }
947-    }
948-
949-
950-
951-@Callable(i)
952836 func putOneTknV2 (minOutAmount,autoStake) = if ((size(i.payments) != 1))
953837     then throw("1 pmnt expd")
954838     else {
967851         if ((10000000 > pmtAmt))
968852             then throw("Wrong pmt amt")
969853             else {
970-                let $t03584435969 = calcPutOneTkn(pmtAmt, pmtAssetId, toString(userAddress), toBase58String(i.transactionId))
971-                let estimLP = $t03584435969._1
972-                let state = $t03584435969._2
973-                let feeAmount = $t03584435969._3
854+                let $t03173131856 = calcPutOneTkn(pmtAmt, pmtAssetId, toString(userAddress), toBase58String(i.transactionId))
855+                let estimLP = $t03173131856._1
856+                let state = $t03173131856._2
857+                let feeAmount = $t03173131856._3
974858                 let emitLpAmt = if (if ((minOutAmount > 0))
975859                     then (minOutAmount > estimLP)
976860                     else false)
1037921 
1038922 
1039923 @Callable(i)
1040-func getOneTkn (exchResult,notUsed,outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
1041-    then throw("1 pmnt expd")
1042-    else {
1043-        let cfg = gpc()
1044-        let lpId = cfg[idxLPAsId]
1045-        let amId = cfg[idxAmAsId]
1046-        let prId = cfg[idxPrAsId]
1047-        let amDcm = parseIntValue(cfg[idxAmtAsDcm])
1048-        let prDcm = parseIntValue(cfg[idxPriceAsDcm])
1049-        let sts = cfg[idxPoolSt]
1050-        let factCfg = gfc()
1051-        let gwxCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactGwxRewCntr]), "Wr sl addr")
1052-        let pmt = value(i.payments[0])
1053-        let addon = valueOrElse(getString(this, ada()), "")
1054-        let userAddress = if ((addon == toString(i.caller)))
1055-            then i.originCaller
1056-            else i.caller
1057-        let txId58 = toBase58String(i.transactionId)
1058-        let pmtAssetId = value(pmt.assetId)
1059-        let pmtAmt = pmt.amount
1060-        if ((1000000000 > pmtAmt))
1061-            then throw("Min pmt 10 LP")
1062-            else if (if (if ((0 > slippage))
1063-                then true
1064-                else (0 > exchResult))
1065-                then true
1066-                else (0 > outAmount))
1067-                then throw("Wrong params")
1068-                else if ((lpId != toBase58String(pmtAssetId)))
1069-                    then throw("Wrong LP")
1070-                    else {
1071-                        let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
1072-                        let estimAmAmt = r._1
1073-                        let estimPrAmt = r._2
1074-                        let amBalance = getAccBalance(amId)
1075-                        let prBalance = getAccBalance(prId)
1076-                        let $t03960040060 = if ((outAssetId == amId))
1077-                            then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
1078-                            else if ((outAssetId == prId))
1079-                                then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
1080-                                else throw("wrong outAssetId")
1081-                        let amBalanceNow = $t03960040060._1
1082-                        let prBalanceNow = $t03960040060._2
1083-                        let virtSwapInAm = $t03960040060._3
1084-                        let virtSwapOutPr = $t03960040060._4
1085-                        let virtSwapInPr = $t03960040060._5
1086-                        let virtSwapOutAm = $t03960040060._6
1087-                        let totalGetRaw = $t03960040060._7
1088-                        if (if ((0 > virtSwapInAm))
1089-                            then true
1090-                            else (0 > virtSwapInPr))
1091-                            then throw("Wrong calc")
1092-                            else {
1093-                                let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
1094-                                let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
1095-                                let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
1096-                                if ((D0vsD1 == D0vsD1))
1097-                                    then {
1098-                                        let totalGet = takeFee(totalGetRaw)._1
1099-                                        let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
1100-                                        if ((finalRes == finalRes))
1101-                                            then {
1102-                                                let $t04080740911 = if ((outAssetId == amId))
1103-                                                    then $Tuple2(toInt(finalRes._2), 0)
1104-                                                    else $Tuple2(0, toInt(finalRes._2))
1105-                                                let outAm = $t04080740911._1
1106-                                                let outPr = $t04080740911._2
1107-                                                let totalAmount = (outAm + outPr)
1108-                                                let feeAmount = (totalGetRaw - totalGet)
1109-                                                let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
1110-                                                    then unit
1111-                                                    else fromBase58String(outAssetId)
1112-                                                let sendFeeToMatcher = if ((feeAmount > 0))
1113-                                                    then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetIdOrWaves)]
1114-                                                    else nil
1115-                                                let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
1116-                                                let curPr = f1(curPrX18, scale8)
1117-                                                let state = [ScriptTransfer(userAddress, totalAmount, outAssetIdOrWaves), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
1118-                                                if ((state == state))
1119-                                                    then {
1120-                                                        let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
1121-                                                        if ((burn == burn))
1122-                                                            then (state ++ sendFeeToMatcher)
1123-                                                            else throw("Strict value is not equal to itself.")
1124-                                                        }
1125-                                                    else throw("Strict value is not equal to itself.")
1126-                                                }
1127-                                            else throw("Strict value is not equal to itself.")
1128-                                        }
1129-                                    else throw("Strict value is not equal to itself.")
1130-                                }
1131-                        }
1132-        }
1133-
1134-
1135-
1136-@Callable(i)
1137924 func getOneTknV2 (outAssetId,minOutAmount) = {
1138-    let $t04193642091 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
1139-    let state = $t04193642091._1
1140-    let totalAmount = $t04193642091._2
925+    let $t03403934194 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
926+    let state = $t03403934194._1
927+    let totalAmount = $t03403934194._2
1141928     $Tuple2(state, totalAmount)
1142929     }
1143930 
1161948     let newY = getYD(xp, index, D1)
1162949     let dy = (xp[index] - newY)
1163950     let totalGetRaw = toInt((dy - big1))
1164-    let $t04287042919 = takeFee(totalGetRaw)
1165-    let totalGet = $t04287042919._1
1166-    let feeAmount = $t04287042919._2
951+    let $t03497335022 = takeFee(totalGetRaw)
952+    let totalGet = $t03497335022._1
953+    let feeAmount = $t03497335022._2
1167954     $Tuple2(nil, $Tuple2(totalGet, feeAmount))
1168955     }
1169956 
1177964     let lpId = poolConfig[idxLPAsId]
1178965     let amBalance = getAccBalance(amId)
1179966     let prBalance = getAccBalance(prId)
1180-    let $t04326443379 = {
967+    let $t03536735482 = {
1181968         let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, lpAssetAmount], nil)
1182969         if ($isInstanceOf(@, "(Int, Int)"))
1183970             then @
1184971             else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
1185972         }
1186-    let totalGet = $t04326443379._1
1187-    let feeAmount = $t04326443379._2
973+    let totalGet = $t03536735482._1
974+    let feeAmount = $t03536735482._2
1188975     let r = ego("", lpId, lpAssetAmount, this)
1189976     let outAmAmt = r._1
1190977     let outPrAmt = r._2
12561043 
12571044 
12581045 @Callable(i)
1259-func unstakeAndGetOneTkn (unstakeAmount,outAssetId,minOutAmount) = {
1046+func unstakeAndGetOneTknV2 (unstakeAmount,outAssetId,minOutAmount) = {
12601047     let checkPayments = if ((size(i.payments) != 0))
12611048         then throw("No pmnts expd")
12621049         else true
12691056             let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), unstakeAmount], nil)
12701057             if ((unstakeInv == unstakeInv))
12711058                 then {
1272-                    let $t04568445872 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1273-                    let state = $t04568445872._1
1274-                    let totalAmount = $t04568445872._2
1059+                    let $t03778937977 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1060+                    let state = $t03778937977._1
1061+                    let totalAmount = $t03778937977._2
12751062                     $Tuple2(state, totalAmount)
12761063                     }
12771064                 else throw("Strict value is not equal to itself.")
12871074     let amId = poolConfig[idxAmAsId]
12881075     let prId = poolConfig[idxPrAsId]
12891076     let lpId = poolConfig[idxLPAsId]
1290-    let $t04613146228 = calcPutOneTkn(paymentAmountRaw, paymentAssetId, "", "")
1291-    let lpAmount = $t04613146228._1
1292-    let state = $t04613146228._2
1293-    let feeAmount = $t04613146228._3
1294-    let bonus = $t04613146228._4
1077+    let $t03823638333 = calcPutOneTkn(paymentAmountRaw, paymentAssetId, "", "")
1078+    let lpAmount = $t03823638333._1
1079+    let state = $t03823638333._2
1080+    let feeAmount = $t03823638333._3
1081+    let bonus = $t03823638333._4
12951082     $Tuple2(nil, $Tuple3(lpAmount, feeAmount, bonus))
12961083     }
12971084 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let scale8 = 100000000
55 
66 let scale8BigInt = toBigInt(100000000)
77 
88 let scale18 = toBigInt(1000000000000000000)
99 
1010 let zeroBigInt = toBigInt(0)
1111 
1212 let big0 = toBigInt(0)
1313 
1414 let big1 = toBigInt(1)
1515 
1616 let big2 = toBigInt(2)
1717 
1818 let slippage4D = toBigInt((scale8 - ((scale8 * 1) / scale8)))
1919 
2020 let Amult = "100"
2121 
2222 let Dconv = "1"
2323 
2424 let SEP = "__"
2525 
2626 let EMPTY = ""
2727 
2828 let PoolActive = 1
2929 
3030 let PoolPutDis = 2
3131 
3232 let PoolMatcherDis = 3
3333 
3434 let PoolShutdown = 4
3535 
3636 let idxPoolAddress = 1
3737 
3838 let idxPoolSt = 2
3939 
4040 let idxLPAsId = 3
4141 
4242 let idxAmAsId = 4
4343 
4444 let idxPrAsId = 5
4545 
4646 let idxAmtAsDcm = 6
4747 
4848 let idxPriceAsDcm = 7
4949 
5050 let idxIAmtAsId = 8
5151 
5252 let idxIPriceAsId = 9
5353 
5454 let idxFactStakCntr = 1
5555 
5656 let idxFactSlippCntr = 7
5757 
5858 let idxFactGwxRewCntr = 10
5959 
6060 let feeDefault = fraction(5, scale8, 10000)
6161 
6262 func t1 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
6363 
6464 
6565 func f1 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
6666 
6767 
6868 func ts (amt,resScale,curScale) = fraction(amt, resScale, curScale)
6969 
7070 
7171 func abs (val) = if ((zeroBigInt > 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,t) = makeString(["%s%s%d%d__price__history", toString(h), toString(t)], SEP)
9494 
9595 
9696 func pau (ua,txId) = ((("%s%s%s__P__" + ua) + "__") + txId)
9797 
9898 
9999 func gau (ua,txId) = ((("%s%s%s__G__" + ua) + "__") + txId)
100100 
101101 
102102 func aa () = "%s__amountAsset"
103103 
104104 
105105 func pa () = "%s__priceAsset"
106106 
107107 
108108 func amp () = "%s__amp"
109109 
110110 
111111 func ada () = "%s__addonAddr"
112112 
113113 
114114 let keyFee = "%s__fee"
115115 
116116 let fee = valueOrElse(getInteger(this, keyFee), feeDefault)
117117 
118118 func fcfg () = "%s__factoryConfig"
119119 
120120 
121121 func mtpk () = "%s%s__matcher__publicKey"
122122 
123123 
124124 func pc (iAmtAs,iPrAs) = (((("%d%d%s__" + iAmtAs) + "__") + iPrAs) + "__config")
125125 
126126 
127127 func mba (bAStr) = ("%s%s%s__mappings__baseAsset2internalId__" + bAStr)
128128 
129129 
130130 func aps () = "%s__shutdown"
131131 
132132 
133133 func keyAllowedLpStableScriptHash () = "%s__allowedLpStableScriptHash"
134134 
135135 
136136 func keyFeeCollectorAddress () = "%s__feeCollectorAddress"
137137 
138138 
139139 func toe (orV,sendrV,matchV) = throw(((((("Failed: ordValid=" + toString(orV)) + " sndrValid=") + toString(sendrV)) + " mtchrValid=") + toString(matchV)))
140140 
141141 
142142 func str (val) = match val {
143143     case valStr: String => 
144144         valStr
145145     case _ => 
146146         throw("fail cast to String")
147147 }
148148 
149149 
150150 func strf (addr,key) = valueOrErrorMessage(getString(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
151151 
152152 
153153 func intf (addr,key) = valueOrErrorMessage(getInteger(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
154154 
155155 
156156 let fca = addressFromStringValue(strf(this, fc()))
157157 
158158 let A = strf(this, amp())
159159 
160160 func igs () = valueOrElse(getBoolean(fca, aps()), false)
161161 
162162 
163163 func mp () = fromBase58String(strf(fca, mtpk()))
164164 
165165 
166166 let feeCollectorAddress = addressFromStringValue(strf(fca, keyFeeCollectorAddress()))
167167 
168168 func gpc () = {
169169     let amtAs = strf(this, aa())
170170     let priceAs = strf(this, pa())
171171     let iPriceAs = intf(fca, mba(priceAs))
172172     let iAmtAs = intf(fca, mba(amtAs))
173173     split(strf(fca, pc(toString(iAmtAs), toString(iPriceAs))), SEP)
174174     }
175175 
176176 
177177 func gfc () = split(strf(fca, fcfg()), SEP)
178178 
179179 
180180 let factoryConfig = gfc()
181181 
182182 let stakingContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactStakCntr]), "Invalid staking contract address")
183183 
184184 let slipageContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactSlippCntr]), "Invalid slipage contract address")
185185 
186186 let gwxContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactGwxRewCntr]), "Invalid gwx contract address")
187187 
188188 func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slipByUser,slippageReal,txHeight,txTimestamp,slipageAmAmt,slipagePrAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slipByUser), toString(slippageReal), toString(txHeight), toString(txTimestamp), toString(slipageAmAmt), toString(slipagePrAmt)], SEP)
189189 
190190 
191191 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)
192192 
193193 
194194 func getAccBalance (assetId) = if ((assetId == "WAVES"))
195195     then wavesBalance(this).available
196196     else assetBalance(this, fromBase58String(assetId))
197197 
198198 
199199 func cpbi (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
200200 
201201 
202202 func vad (A1,A2,slippage) = {
203203     let diff = fraction((A1 - A2), scale8BigInt, A2)
204204     let pass = ((slippage - abs(diff)) > zeroBigInt)
205205     if (!(pass))
206206         then throw(("Big slpg: " + toString(diff)))
207207         else $Tuple2(pass, min([A1, A2]))
208208     }
209209 
210210 
211211 func vd (D1,D0,slpg) = {
212212     let diff = fraction(D0, scale8BigInt, D1)
213213     let fail = (slpg > diff)
214214     if (if (fail)
215215         then true
216216         else (D0 > D1))
217217         then throw(((((((toString(D0) + " ") + toString(D1)) + " ") + toString(diff)) + " ") + toString(slpg)))
218218         else fail
219219     }
220220 
221221 
222222 func pcp (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
223223     let amtAsAmtX18 = t1(amAmt, amAssetDcm)
224224     let prAsAmtX18 = t1(prAmt, prAssetDcm)
225225     cpbi(prAsAmtX18, amtAsAmtX18)
226226     }
227227 
228228 
229229 func calcPrices (amAmt,prAmt,lpAmt) = {
230230     let cfg = gpc()
231231     let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
232232     let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
233233     let priceX18 = pcp(amtAsDcm, prAsDcm, amAmt, prAmt)
234234     let amAmtX18 = t1(amAmt, amtAsDcm)
235235     let prAmtX18 = t1(prAmt, prAsDcm)
236236     let lpAmtX18 = t1(lpAmt, scale8)
237237     let lpPrInAmAsX18 = cpbi(amAmtX18, lpAmtX18)
238238     let lpPrInPrAsX18 = cpbi(prAmtX18, lpAmtX18)
239239 [priceX18, lpPrInAmAsX18, lpPrInPrAsX18]
240240     }
241241 
242242 
243243 func calculatePrices (amAmt,prAmt,lpAmt) = {
244244     let p = calcPrices(amAmt, prAmt, lpAmt)
245245 [f1(p[0], scale8), f1(p[1], scale8), f1(p[2], scale8)]
246246     }
247247 
248248 
249249 func takeFee (amount) = {
250250     let feeAmount = fraction(amount, fee, scale8)
251251     $Tuple2((amount - feeAmount), feeAmount)
252252     }
253253 
254254 
255255 func ego (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
256256     let cfg = gpc()
257257     let lpId = cfg[idxLPAsId]
258258     let amId = cfg[idxAmAsId]
259259     let prId = cfg[idxPrAsId]
260260     let amDcm = parseIntValue(cfg[idxAmtAsDcm])
261261     let prDcm = parseIntValue(cfg[idxPriceAsDcm])
262262     let sts = cfg[idxPoolSt]
263263     let lpEmiss = valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "Wrong LP id").quantity
264264     if ((lpId != pmtAssetId))
265265         then throw("Wrong pmt asset")
266266         else {
267267             let amBalance = getAccBalance(amId)
268268             let amBalanceX18 = t1(amBalance, amDcm)
269269             let prBalance = getAccBalance(prId)
270270             let prBalanceX18 = t1(prBalance, prDcm)
271271             let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
272272             let curPrice = f1(curPriceX18, scale8)
273273             let pmtLpAmtX18 = t1(pmtLpAmt, scale8)
274274             let lpEmissX18 = t1(lpEmiss, scale8)
275275             let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissX18)
276276             let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissX18)
277277             let outAmAmt = f1(outAmAmtX18, amDcm)
278278             let outPrAmt = f1(outPrAmtX18, prDcm)
279279             let state = if ((txId58 == ""))
280280                 then nil
281281                 else [ScriptTransfer(userAddress, outAmAmt, if ((amId == "WAVES"))
282282                     then unit
283283                     else fromBase58String(amId)), ScriptTransfer(userAddress, outPrAmt, if ((prId == "WAVES"))
284284                     then unit
285285                     else fromBase58String(prId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice)]
286286             $Tuple10(outAmAmt, outPrAmt, amId, prId, amBalance, prBalance, lpEmiss, curPriceX18, sts, state)
287287             }
288288     }
289289 
290290 
291291 func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,validateSlippage,pmtAmt,pmtId) = {
292292     let cfg = gpc()
293293     let lpId = fromBase58String(cfg[idxLPAsId])
294294     let amIdStr = cfg[idxAmAsId]
295295     let prIdStr = cfg[idxPrAsId]
296296     let inAmIdStr = cfg[idxIAmtAsId]
297297     let inPrIdStr = cfg[idxIPriceAsId]
298298     let amtDcm = parseIntValue(cfg[idxAmtAsDcm])
299299     let priceDcm = parseIntValue(cfg[idxPriceAsDcm])
300300     let sts = cfg[idxPoolSt]
301301     let lpEm = valueOrErrorMessage(assetInfo(lpId), "Wr lp as").quantity
302302     let amBalance = if (isEval)
303303         then getAccBalance(amIdStr)
304304         else if (if (isOneAsset)
305305             then (pmtId == amIdStr)
306306             else false)
307307             then (getAccBalance(amIdStr) - pmtAmt)
308308             else if (isOneAsset)
309309                 then getAccBalance(amIdStr)
310310                 else (getAccBalance(amIdStr) - inAmAmt)
311311     let prBalance = if (isEval)
312312         then getAccBalance(prIdStr)
313313         else if (if (isOneAsset)
314314             then (pmtId == prIdStr)
315315             else false)
316316             then (getAccBalance(prIdStr) - pmtAmt)
317317             else if (isOneAsset)
318318                 then getAccBalance(prIdStr)
319319                 else (getAccBalance(prIdStr) - inPrAmt)
320320     let inAmAssetAmtX18 = t1(inAmAmt, amtDcm)
321321     let inPrAssetAmtX18 = t1(inPrAmt, priceDcm)
322322     let userPriceX18 = cpbi(inPrAssetAmtX18, inAmAssetAmtX18)
323323     let amBalanceX18 = t1(amBalance, amtDcm)
324324     let prBalanceX18 = t1(prBalance, priceDcm)
325325     let r = if ((lpEm == 0))
326326         then {
327327             let curPriceX18 = zeroBigInt
328328             let slippageX18 = zeroBigInt
329329             let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
330330             $Tuple5(f1(lpAmtX18, scale8), f1(inAmAssetAmtX18, amtDcm), f1(inPrAssetAmtX18, priceDcm), cpbi((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
331331             }
332332         else {
333333             let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
334334             let slippageRealX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
335335             let slippageX18 = t1(slippage, scale8)
336336             if (if (if (validateSlippage)
337337                 then (curPriceX18 != zeroBigInt)
338338                 else false)
339339                 then (slippageRealX18 > slippageX18)
340340                 else false)
341341                 then throw(((("Price slippage " + toString(slippageRealX18)) + " > ") + toString(slippageX18)))
342342                 else {
343343                     let lpEmissionX18 = t1(lpEm, scale8)
344344                     let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
345345                     let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
346346                     let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
347347                         then $Tuple2(amViaPrX18, inPrAssetAmtX18)
348348                         else $Tuple2(inAmAssetAmtX18, prViaAmX18)
349349                     let expAmtAssetAmtX18 = expectedAmts._1
350350                     let expPriceAssetAmtX18 = expectedAmts._2
351351                     let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
352352                     $Tuple5(f1(lpAmtX18, scale8), f1(expAmtAssetAmtX18, amtDcm), f1(expPriceAssetAmtX18, priceDcm), curPriceX18, slippageX18)
353353                     }
354354             }
355355     let calcLpAmt = r._1
356356     let calcAmAssetPmt = r._2
357357     let calcPrAssetPmt = r._3
358358     let curPrice = f1(r._4, scale8)
359359     let slippageCalc = f1(r._5, scale8)
360360     if ((0 >= calcLpAmt))
361361         then throw("LP <= 0")
362362         else {
363363             let emitLpAmt = if (!(emitLp))
364364                 then 0
365365                 else calcLpAmt
366366             let amDiff = (inAmAmt - calcAmAssetPmt)
367367             let prDiff = (inPrAmt - calcPrAssetPmt)
368368             let $t01635116696 = if (if (isOneAsset)
369369                 then (pmtId == amIdStr)
370370                 else false)
371371                 then $Tuple2(pmtAmt, 0)
372372                 else if (if (isOneAsset)
373373                     then (pmtId == prIdStr)
374374                     else false)
375375                     then $Tuple2(0, pmtAmt)
376376                     else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
377377             let writeAmAmt = $t01635116696._1
378378             let writePrAmt = $t01635116696._2
379379             let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(writeAmAmt, writePrAmt, emitLpAmt, curPrice, slippage, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
380380             $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
381381             }
382382     }
383383 
384384 
385385 func moa (order) = {
386386     let cfg = gpc()
387387     let amtAsId = cfg[idxAmAsId]
388388     let prAsId = cfg[idxPrAsId]
389389     let sts = parseIntValue(cfg[idxPoolSt])
390390     let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
391391     let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
392392     let accAmtAsBalance = getAccBalance(amtAsId)
393393     let accPrAsBalance = getAccBalance(prAsId)
394394     let curPriceX18 = if ((order.orderType == Buy))
395395         then pcp(amtAsDcm, prAsDcm, (accAmtAsBalance + order.amount), accPrAsBalance)
396396         else pcp(amtAsDcm, prAsDcm, (accAmtAsBalance - order.amount), accPrAsBalance)
397397     let curPrice = f1(curPriceX18, scale8)
398398     if (if (if (igs())
399399         then true
400400         else (sts == PoolMatcherDis))
401401         then true
402402         else (sts == PoolShutdown))
403403         then throw("Admin blocked")
404404         else {
405405             let orAmtAsset = order.assetPair.amountAsset
406406             let orAmtAsStr = if ((orAmtAsset == unit))
407407                 then "WAVES"
408408                 else toBase58String(value(orAmtAsset))
409409             let orPrAsset = order.assetPair.priceAsset
410410             let orPrAsStr = if ((orPrAsset == unit))
411411                 then "WAVES"
412412                 else toBase58String(value(orPrAsset))
413413             if (if ((orAmtAsStr != amtAsId))
414414                 then true
415415                 else (orPrAsStr != prAsId))
416416                 then throw("Wr assets")
417417                 else {
418418                     let orderPrice = order.price
419419                     let priceDcm = fraction(scale8, prAsDcm, amtAsDcm)
420420                     let castOrderPrice = ts(orderPrice, scale8, priceDcm)
421421                     let isOrderPriceValid = if ((order.orderType == Buy))
422422                         then (curPrice >= castOrderPrice)
423423                         else (castOrderPrice >= curPrice)
424424                     true
425425                     }
426426             }
427427     }
428428 
429429 
430430 func cg (i) = if ((size(i.payments) != 1))
431431     then throw("1 pmnt exp")
432432     else {
433433         let pmt = value(i.payments[0])
434434         let pmtAssetId = value(pmt.assetId)
435435         let pmtAmt = pmt.amount
436436         let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
437437         let outAmAmt = r._1
438438         let outPrAmt = r._2
439439         let sts = parseIntValue(r._9)
440440         let state = r._10
441441         if (if (igs())
442442             then true
443443             else (sts == PoolShutdown))
444444             then throw(("Admin blocked: " + toString(sts)))
445445             else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
446446         }
447447 
448448 
449449 func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,validateSlippage,pmtAmt,pmtId) = {
450450     let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, (txId == ""), emitLp, isOneAsset, validateSlippage, pmtAmt, pmtId)
451451     let sts = parseIntValue(r._8)
452452     if (if (if (igs())
453453         then true
454454         else (sts == PoolPutDis))
455455         then true
456456         else (sts == PoolShutdown))
457457         then throw(("Blocked:" + toString(sts)))
458458         else r
459459     }
460460 
461461 
462462 func getD (xp) = {
463463     let n = big2
464464     let xp0 = xp[0]
465465     let xp1 = xp[1]
466466     let aPrecision = parseBigIntValue(Amult)
467467     let a = (parseBigIntValue(A) * aPrecision)
468468     let s = (xp0 + xp1)
469469     if ((s == big0))
470470         then big0
471471         else {
472472             let ann = (a * n)
473473             let xp0_xp1_n_n = (((xp0 * xp1) * n) * n)
474474             let ann_s_aPrecision = ((ann * s) / aPrecision)
475475             let ann_aPrecision = (ann - aPrecision)
476476             let n1 = (n + big1)
477477             func calc (acc,cur) =             {
478478                 let $t02124821268 = acc
479479                 let d = $t02124821268._1
480480                 let found = $t02124821268._2
481481                 if ((found != unit))
482482                     then acc
483483                     else {
484484                         let dp = (((d * d) * d) / xp0_xp1_n_n)
485485                         let dNext = (((ann_s_aPrecision + (dp * n)) * d) / (((ann_aPrecision * d) / aPrecision) + (n1 * dp)))
486486                         let dDiff = absBigInt((dNext - value(d)))
487487                         if ((big1 >= dDiff))
488488                             then $Tuple2(dNext, cur)
489489                             else $Tuple2(dNext, unit)
490490                         }
491491                 }
492492 
493493             let arr = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
494494             let $t02168921736 = {
495495                 let $l = arr
496496                 let $s = size($l)
497497                 let $acc0 = $Tuple2(s, unit)
498498                 func $f0_1 ($a,$i) =                 if (($i >= $s))
499499                     then $a
500500                     else calc($a, $l[$i])
501501 
502502                 func $f0_2 ($a,$i) =                 if (($i >= $s))
503503                     then $a
504504                     else throw("List size exceeds 15")
505505 
506506                 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
507507                 }
508508             let d = $t02168921736._1
509509             let found = $t02168921736._2
510510             if ((found != unit))
511511                 then d
512512                 else throw(("D calculation error, D = " + toString(d)))
513513             }
514514     }
515515 
516516 
517517 func getYD (xp,i,D) = {
518518     let n = big2
519519     let x = xp[if ((i == 0))
520520         then 1
521521         else 0]
522522     let aPrecision = parseBigIntValue(Amult)
523523     let a = (parseBigIntValue(A) * aPrecision)
524524     let s = x
525525     let ann = (a * n)
526526     let c = (((((D * D) / (x * n)) * D) * aPrecision) / (ann * n))
527527     let b = ((s + ((D * aPrecision) / ann)) - D)
528528     func calc (acc,cur) =     {
529529         let $t02223622256 = acc
530530         let y = $t02223622256._1
531531         let found = $t02223622256._2
532532         if ((found != unit))
533533             then acc
534534             else {
535535                 let yNext = (((y * y) + c) / ((big2 * y) + b))
536536                 let yDiff = absBigInt((yNext - value(y)))
537537                 if ((big1 >= yDiff))
538538                     then $Tuple2(yNext, cur)
539539                     else $Tuple2(yNext, unit)
540540                 }
541541         }
542542 
543543     let arr = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
544544     let $t02256322610 = {
545545         let $l = arr
546546         let $s = size($l)
547547         let $acc0 = $Tuple2(D, unit)
548548         func $f0_1 ($a,$i) =         if (($i >= $s))
549549             then $a
550550             else calc($a, $l[$i])
551551 
552552         func $f0_2 ($a,$i) =         if (($i >= $s))
553553             then $a
554554             else throw("List size exceeds 15")
555555 
556556         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
557557         }
558558     let y = $t02256322610._1
559559     let found = $t02256322610._2
560560     if ((found != unit))
561561         then y
562562         else throw(("Y calculation error, Y = " + toString(y)))
563563     }
564564 
565565 
566566 func calcPutOneTkn (pmtAmtRaw,pmtAssetId,userAddress,txId) = {
567567     let poolConfig = gpc()
568568     let amId = poolConfig[idxAmAsId]
569569     let prId = poolConfig[idxPrAsId]
570570     let lpId = poolConfig[idxLPAsId]
571571     let amtDcm = parseIntValue(poolConfig[idxAmtAsDcm])
572572     let priceDcm = parseIntValue(poolConfig[idxPriceAsDcm])
573573     let amBalance = getAccBalance(amId)
574574     let prBalance = getAccBalance(prId)
575575     let $t02315223613 = if ((txId == ""))
576576         then $Tuple2(amBalance, prBalance)
577577         else if ((pmtAssetId == amId))
578578             then if ((pmtAmtRaw > amBalance))
579579                 then throw("invalid payment amount")
580580                 else $Tuple2((amBalance - pmtAmtRaw), prBalance)
581581             else if ((pmtAssetId == prId))
582582                 then if ((pmtAmtRaw > prBalance))
583583                     then throw("invalid payment amount")
584584                     else $Tuple2(amBalance, (prBalance - pmtAmtRaw))
585585                 else throw("wrong pmtAssetId")
586586     let amBalanceOld = $t02315223613._1
587587     let prBalanceOld = $t02315223613._2
588588     let $t02361923795 = if ((pmtAssetId == amId))
589589         then $Tuple2(pmtAmtRaw, 0)
590590         else if ((pmtAssetId == prId))
591591             then $Tuple2(0, pmtAmtRaw)
592592             else throw("invalid payment")
593593     let amAmountRaw = $t02361923795._1
594594     let prAmountRaw = $t02361923795._2
595595     let amAmount = takeFee(amAmountRaw)._1
596596     let prAmount = takeFee(prAmountRaw)._1
597597     let feeAmount = takeFee(pmtAmtRaw)._2
598598     let amBalanceNew = (amBalanceOld + amAmount)
599599     let prBalanceNew = (prBalanceOld + prAmount)
600600     let D0 = getD([toBigInt(amBalanceOld), toBigInt(prBalanceOld)])
601601     let D1 = getD([toBigInt(amBalanceNew), toBigInt(prBalanceNew)])
602602     let checkD = if ((D1 > D0))
603603         then true
604604         else throw()
605605     if ((checkD == checkD))
606606         then {
607607             let lpAssetEmission = toBigInt(valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "invalid lp asset").quantity)
608608             let lpAmount = if ((lpAssetEmission > big0))
609609                 then fraction(lpAssetEmission, (D1 - D0), D0)
610610                 else throw("initial deposit requires all coins")
611-            let curPrice = f1(cpbi(t1(prBalance, priceDcm), t1(amBalance, amtDcm)), scale8)
611+            let curPrice = f1(cpbi(t1(prBalanceNew, priceDcm), t1(amBalanceNew, amtDcm)), scale8)
612612             let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId), dataPutActionInfo(amAmountRaw, prAmountRaw, toInt(lpAmount), curPrice, 0, 0, height, lastBlock.timestamp, 0, 0))]
613613             let poolProportion = fraction(prBalanceOld, scale8, amBalanceOld)
614614             let amountAssetPart = fraction(pmtAmtRaw, scale8, (poolProportion + scale8))
615615             let priceAssetPart = (pmtAmtRaw - amountAssetPart)
616616             let lpAmtBoth = fraction(lpAssetEmission, toBigInt(priceAssetPart), toBigInt(prBalanceOld))
617617             let bonus = toInt(fraction((lpAmount - lpAmtBoth), scale8BigInt, lpAmtBoth))
618618             $Tuple4(toInt(lpAmount), commonState, feeAmount, bonus)
619619             }
620620         else throw("Strict value is not equal to itself.")
621621     }
622622 
623623 
624624 func getOneTknV2Internal (outAssetId,minOutAmount,payments,caller,originCaller,transactionId) = if ((size(payments) != 1))
625625     then throw("1 pmnt expd")
626626     else {
627627         let poolConfig = gpc()
628628         let lpId = poolConfig[idxLPAsId]
629629         let amId = poolConfig[idxAmAsId]
630630         let prId = poolConfig[idxPrAsId]
631631         let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
632632         let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
633633         let poolStatus = poolConfig[idxPoolSt]
634634         let userAddress = if ((caller == this))
635635             then originCaller
636636             else caller
637637         let pmt = value(payments[0])
638638         let pmtAssetId = value(pmt.assetId)
639639         let pmtAmt = pmt.amount
640640         if ((1000000000 > pmtAmt))
641641             then throw("Min pmt 10 LP")
642642             else {
643643                 let txId58 = toBase58String(transactionId)
644644                 if ((lpId != toBase58String(pmtAssetId)))
645645                     then throw("Wrong LP")
646646                     else {
647647                         let amBalance = getAccBalance(amId)
648648                         let prBalance = getAccBalance(prId)
649-                        let $t02624626354 = {
649+                        let $t02625226360 = {
650650                             let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)
651651                             if ($isInstanceOf(@, "(Int, Int)"))
652652                                 then @
653653                                 else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
654654                             }
655-                        let totalGet = $t02624626354._1
656-                        let feeAmount = $t02624626354._2
655+                        let totalGet = $t02625226360._1
656+                        let feeAmount = $t02625226360._2
657657                         let totalAmount = if (if ((minOutAmount > 0))
658658                             then (minOutAmount > totalGet)
659659                             else false)
660660                             then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
661661                             else totalGet
662-                        let $t02654126724 = if ((outAssetId == amId))
663-                            then $Tuple2(totalAmount, 0)
662+                        let $t02654726854 = if ((outAssetId == amId))
663+                            then $Tuple4(totalAmount, 0, ((amBalance - totalAmount) - feeAmount), prBalance)
664664                             else if ((outAssetId == prId))
665-                                then $Tuple2(0, totalAmount)
665+                                then $Tuple4(0, totalAmount, amBalance, ((prBalance - totalAmount) - feeAmount))
666666                                 else throw("invalid out asset id")
667-                        let outAm = $t02654126724._1
668-                        let outPr = $t02654126724._2
669-                        let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
667+                        let outAm = $t02654726854._1
668+                        let outPr = $t02654726854._2
669+                        let amBalanceNew = $t02654726854._3
670+                        let prBalanceNew = $t02654726854._4
671+                        let curPrX18 = cpbi(t1(prBalanceNew, prDecimals), t1(amBalanceNew, amDecimals))
670672                         let curPr = f1(curPrX18, scale8)
671673                         let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
672674                             then unit
673675                             else fromBase58String(outAssetId)
674676                         let sendFeeToMatcher = if ((feeAmount > 0))
675677                             then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetIdOrWaves)]
676678                             else nil
677679                         let state = ([ScriptTransfer(userAddress, totalAmount, outAssetIdOrWaves), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)] ++ sendFeeToMatcher)
678680                         if ((state == state))
679681                             then {
680682                                 let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
681683                                 if ((burn == burn))
682684                                     then $Tuple2(state, totalAmount)
683685                                     else throw("Strict value is not equal to itself.")
684686                                 }
685687                             else throw("Strict value is not equal to itself.")
686688                         }
687689                 }
688690         }
689691 
690692 
691693 func m () = match getString(mpk()) {
692694     case s: String => 
693695         fromBase58String(s)
694696     case _: Unit => 
695697         unit
696698     case _ => 
697699         throw("Match error")
698700 }
699701 
700702 
701703 func pm () = match getString(pmpk()) {
702704     case s: String => 
703705         fromBase58String(s)
704706     case _: Unit => 
705707         unit
706708     case _ => 
707709         throw("Match error")
708710 }
709711 
710712 
711713 let pd = throw("Permission denied")
712714 
713715 func mm (i) = match m() {
714716     case pk: ByteVector => 
715717         if ((i.callerPublicKey == pk))
716718             then true
717719             else pd
718720     case _: Unit => 
719721         if ((i.caller == this))
720722             then true
721723             else pd
722724     case _ => 
723725         throw("Match error")
724726 }
725727 
726728 
727729 @Callable(i)
728730 func constructor (fc) = {
729731     let c = mm(i)
730732     if ((c == c))
731733         then [StringEntry(fc(), fc)]
732734         else throw("Strict value is not equal to itself.")
733735     }
734736 
735737 
736738 
737739 @Callable(i)
738740 func setManager (pendingManagerPublicKey) = {
739741     let c = mm(i)
740742     if ((c == c))
741743         then {
742744             let cm = fromBase58String(pendingManagerPublicKey)
743745             if ((cm == cm))
744746                 then [StringEntry(pmpk(), pendingManagerPublicKey)]
745747                 else throw("Strict value is not equal to itself.")
746748             }
747749         else throw("Strict value is not equal to itself.")
748750     }
749751 
750752 
751753 
752754 @Callable(i)
753755 func confirmManager () = {
754756     let p = pm()
755757     let hpm = if (isDefined(p))
756758         then true
757759         else throw("No pending manager")
758760     if ((hpm == hpm))
759761         then {
760762             let cpm = if ((i.callerPublicKey == value(p)))
761763                 then true
762764                 else throw("You are not pending manager")
763765             if ((cpm == cpm))
764766                 then [StringEntry(mpk(), toBase58String(value(p))), DeleteEntry(pmpk())]
765767                 else throw("Strict value is not equal to itself.")
766768             }
767769         else throw("Strict value is not equal to itself.")
768770     }
769771 
770772 
771773 
772774 @Callable(i)
773775 func put (slip,autoStake) = {
774776     let factCfg = gfc()
775777     let stakingCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactStakCntr]), "Wr st addr")
776778     let slipCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactSlippCntr]), "Wr sl addr")
777779     if ((0 > slip))
778780         then throw("Wrong slippage")
779781         else if ((size(i.payments) != 2))
780782             then throw("2 pmnts expd")
781783             else {
782784                 let e = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(value(i.payments[0]).assetId, value(i.payments[0]).amount), i.payments[1], slip, true, false, true, 0, "")
783785                 let emitLpAmt = e._2
784786                 let lpAssetId = e._7
785787                 let state = e._9
786788                 let amDiff = e._10
787789                 let prDiff = e._11
788790                 let amId = e._12
789791                 let prId = e._13
790792                 let r = invoke(fca, "emit", [emitLpAmt], nil)
791793                 if ((r == r))
792794                     then {
793795                         let el =                         match r {
794796                             case legacy: Address => 
795797                                 invoke(legacy, "emit", [emitLpAmt], nil)
796798                             case _ => 
797799                                 unit
798800                         }
799801                         if ((el == el))
800802                             then {
801803                                 let sa = if ((amDiff > 0))
802804                                     then invoke(slipCntr, "put", nil, [AttachedPayment(amId, amDiff)])
803805                                     else nil
804806                                 if ((sa == sa))
805807                                     then {
806808                                         let sp = if ((prDiff > 0))
807809                                             then invoke(slipCntr, "put", nil, [AttachedPayment(prId, prDiff)])
808810                                             else nil
809811                                         if ((sp == sp))
810812                                             then {
811813                                                 let lpTrnsfr = if (autoStake)
812814                                                     then {
813815                                                         let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
814816                                                         if ((ss == ss))
815817                                                             then nil
816818                                                             else throw("Strict value is not equal to itself.")
817819                                                         }
818820                                                     else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
819821                                                 (state ++ lpTrnsfr)
820822                                                 }
821823                                             else throw("Strict value is not equal to itself.")
822824                                         }
823825                                     else throw("Strict value is not equal to itself.")
824826                                 }
825827                             else throw("Strict value is not equal to itself.")
826828                         }
827829                     else throw("Strict value is not equal to itself.")
828830                 }
829831     }
830832 
831833 
832834 
833835 @Callable(i)
834-func putOneTkn (amAssetPart,prAssetPart,outLp,slippage,autoStake) = {
835-    let cfg = gfc()
836-    let stakingCntr = valueOrErrorMessage(addressFromString(cfg[idxFactStakCntr]), "Wr st addr")
837-    let slipCntr = valueOrErrorMessage(addressFromString(cfg[idxFactSlippCntr]), "Wr sl addr")
838-    let gwxCntr = valueOrErrorMessage(addressFromString(cfg[idxFactGwxRewCntr]), "Wr gwx addr")
839-    let poolCfg = gpc()
840-    let amId = poolCfg[idxAmAsId]
841-    let prId = poolCfg[idxPrAsId]
842-    let amDcm = parseIntValue(poolCfg[idxAmtAsDcm])
843-    let prDcm = parseIntValue(poolCfg[idxPriceAsDcm])
844-    let addon = valueOrElse(getString(this, ada()), "")
845-    let userAddress = if ((addon == toString(i.caller)))
846-        then i.originCaller
847-        else i.caller
848-    if (if (if (if ((0 >= slippage))
849-        then true
850-        else (0 >= amAssetPart))
851-        then true
852-        else (0 >= prAssetPart))
853-        then true
854-        else (0 >= outLp))
855-        then throw("Wrong params")
856-        else if ((size(i.payments) != 1))
857-            then throw("1 pmnt expd")
858-            else {
859-                let pmt = value(i.payments[0])
860-                let pmtAssetId = toBase58String(value(pmt.assetId))
861-                let paymentAmountRaw = pmt.amount
862-                let $t03211032162 = takeFee(paymentAmountRaw)
863-                let pmtAmt = $t03211032162._1
864-                let feeAmount = $t03211032162._2
865-                if ((10000000 > paymentAmountRaw))
866-                    then throw("Wrong pmt amt")
867-                    else {
868-                        let amBalance = getAccBalance(amId)
869-                        let prBalance = getAccBalance(prId)
870-                        let $t03232232938 = if ((pmtAssetId == amId))
871-                            then if (if ((paymentAmountRaw > amBalance))
872-                                then true
873-                                else (amAssetPart > pmtAmt))
874-                                then throw("invalid payment amount")
875-                                else $Tuple6((amBalance - paymentAmountRaw), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
876-                            else if ((pmtAssetId == prId))
877-                                then if (if ((paymentAmountRaw > prBalance))
878-                                    then true
879-                                    else (prAssetPart > pmtAmt))
880-                                    then throw("invalid payment amount")
881-                                    else $Tuple6(amBalance, (prBalance - paymentAmountRaw), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
882-                                else throw("wrong pmtAssetId")
883-                        let amBalanceNow = $t03232232938._1
884-                        let prBalanceNow = $t03232232938._2
885-                        let virtSwapInAm = $t03232232938._3
886-                        let virtSwapOutPr = $t03232232938._4
887-                        let virtSwapInPr = $t03232232938._5
888-                        let virtSwapOutAm = $t03232232938._6
889-                        let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
890-                        let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
891-                        let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
892-                        if ((D0vsD1 == D0vsD1))
893-                            then {
894-                                let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, true, pmtAmt, pmtAssetId)
895-                                let estimLP = estPut._2
896-                                let lpAssetId = estPut._7
897-                                let state = estPut._9
898-                                let amDiff = estPut._10
899-                                let prDiff = estPut._11
900-                                let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
901-                                let emitLpAmt = toInt(lpCalcRes._2)
902-                                let e = invoke(fca, "emit", [emitLpAmt], nil)
903-                                if ((e == e))
904-                                    then {
905-                                        let el =                                         match e {
906-                                            case legacy: Address => 
907-                                                invoke(legacy, "emit", [emitLpAmt], nil)
908-                                            case _ => 
909-                                                unit
910-                                        }
911-                                        if ((el == el))
912-                                            then {
913-                                                let sa = if ((amDiff > 0))
914-                                                    then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
915-                                                    else nil
916-                                                if ((sa == sa))
917-                                                    then {
918-                                                        let sp = if ((prDiff > 0))
919-                                                            then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
920-                                                            else nil
921-                                                        if ((sp == sp))
922-                                                            then {
923-                                                                let lpTrnsfr = if (autoStake)
924-                                                                    then {
925-                                                                        let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
926-                                                                        if ((ss == ss))
927-                                                                            then nil
928-                                                                            else throw("Strict value is not equal to itself.")
929-                                                                        }
930-                                                                    else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
931-                                                                let sendFeeToMatcher = if ((feeAmount > 0))
932-                                                                    then [ScriptTransfer(feeCollectorAddress, feeAmount, fromBase58String(pmtAssetId))]
933-                                                                    else nil
934-                                                                ((state ++ lpTrnsfr) ++ sendFeeToMatcher)
935-                                                                }
936-                                                            else throw("Strict value is not equal to itself.")
937-                                                        }
938-                                                    else throw("Strict value is not equal to itself.")
939-                                                }
940-                                            else throw("Strict value is not equal to itself.")
941-                                        }
942-                                    else throw("Strict value is not equal to itself.")
943-                                }
944-                            else throw("Strict value is not equal to itself.")
945-                        }
946-                }
947-    }
948-
949-
950-
951-@Callable(i)
952836 func putOneTknV2 (minOutAmount,autoStake) = if ((size(i.payments) != 1))
953837     then throw("1 pmnt expd")
954838     else {
955839         let poolConfig = gpc()
956840         let amId = poolConfig[idxAmAsId]
957841         let prId = poolConfig[idxPrAsId]
958842         let lpId = fromBase58String(poolConfig[idxLPAsId])
959843         let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
960844         let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
961845         let userAddress = if ((i.caller == this))
962846             then i.originCaller
963847             else i.caller
964848         let pmt = value(i.payments[0])
965849         let pmtAssetId = toBase58String(value(pmt.assetId))
966850         let pmtAmt = pmt.amount
967851         if ((10000000 > pmtAmt))
968852             then throw("Wrong pmt amt")
969853             else {
970-                let $t03584435969 = calcPutOneTkn(pmtAmt, pmtAssetId, toString(userAddress), toBase58String(i.transactionId))
971-                let estimLP = $t03584435969._1
972-                let state = $t03584435969._2
973-                let feeAmount = $t03584435969._3
854+                let $t03173131856 = calcPutOneTkn(pmtAmt, pmtAssetId, toString(userAddress), toBase58String(i.transactionId))
855+                let estimLP = $t03173131856._1
856+                let state = $t03173131856._2
857+                let feeAmount = $t03173131856._3
974858                 let emitLpAmt = if (if ((minOutAmount > 0))
975859                     then (minOutAmount > estimLP)
976860                     else false)
977861                     then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
978862                     else estimLP
979863                 let e = invoke(fca, "emit", [emitLpAmt], nil)
980864                 if ((e == e))
981865                     then {
982866                         let el =                         match e {
983867                             case legacy: Address => 
984868                                 invoke(legacy, "emit", [emitLpAmt], nil)
985869                             case _ => 
986870                                 unit
987871                         }
988872                         if ((el == el))
989873                             then {
990874                                 let lpTrnsfr = if (autoStake)
991875                                     then {
992876                                         let ss = invoke(stakingContract, "stake", nil, [AttachedPayment(lpId, emitLpAmt)])
993877                                         if ((ss == ss))
994878                                             then nil
995879                                             else throw("Strict value is not equal to itself.")
996880                                         }
997881                                     else [ScriptTransfer(i.caller, emitLpAmt, lpId)]
998882                                 let sendFeeToMatcher = if ((feeAmount > 0))
999883                                     then [ScriptTransfer(feeCollectorAddress, feeAmount, fromBase58String(pmtAssetId))]
1000884                                     else nil
1001885                                 $Tuple2(((state ++ lpTrnsfr) ++ sendFeeToMatcher), emitLpAmt)
1002886                                 }
1003887                             else throw("Strict value is not equal to itself.")
1004888                         }
1005889                     else throw("Strict value is not equal to itself.")
1006890                 }
1007891         }
1008892 
1009893 
1010894 
1011895 @Callable(i)
1012896 func putForFree (maxSlpg) = if ((0 > maxSlpg))
1013897     then throw("Wrong slpg")
1014898     else if ((size(i.payments) != 2))
1015899         then throw("2 pmnts expd")
1016900         else {
1017901             let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(value(i.payments[0]).assetId, value(i.payments[0]).amount), i.payments[1], maxSlpg, false, false, true, 0, "")
1018902             estPut._9
1019903             }
1020904 
1021905 
1022906 
1023907 @Callable(i)
1024908 func get () = {
1025909     let r = cg(i)
1026910     let outAmtAmt = r._1
1027911     let outPrAmt = r._2
1028912     let pmtAmt = r._3
1029913     let pmtAssetId = r._4
1030914     let state = r._5
1031915     let b = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
1032916     if ((b == b))
1033917         then state
1034918         else throw("Strict value is not equal to itself.")
1035919     }
1036920 
1037921 
1038922 
1039923 @Callable(i)
1040-func getOneTkn (exchResult,notUsed,outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
1041-    then throw("1 pmnt expd")
1042-    else {
1043-        let cfg = gpc()
1044-        let lpId = cfg[idxLPAsId]
1045-        let amId = cfg[idxAmAsId]
1046-        let prId = cfg[idxPrAsId]
1047-        let amDcm = parseIntValue(cfg[idxAmtAsDcm])
1048-        let prDcm = parseIntValue(cfg[idxPriceAsDcm])
1049-        let sts = cfg[idxPoolSt]
1050-        let factCfg = gfc()
1051-        let gwxCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactGwxRewCntr]), "Wr sl addr")
1052-        let pmt = value(i.payments[0])
1053-        let addon = valueOrElse(getString(this, ada()), "")
1054-        let userAddress = if ((addon == toString(i.caller)))
1055-            then i.originCaller
1056-            else i.caller
1057-        let txId58 = toBase58String(i.transactionId)
1058-        let pmtAssetId = value(pmt.assetId)
1059-        let pmtAmt = pmt.amount
1060-        if ((1000000000 > pmtAmt))
1061-            then throw("Min pmt 10 LP")
1062-            else if (if (if ((0 > slippage))
1063-                then true
1064-                else (0 > exchResult))
1065-                then true
1066-                else (0 > outAmount))
1067-                then throw("Wrong params")
1068-                else if ((lpId != toBase58String(pmtAssetId)))
1069-                    then throw("Wrong LP")
1070-                    else {
1071-                        let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
1072-                        let estimAmAmt = r._1
1073-                        let estimPrAmt = r._2
1074-                        let amBalance = getAccBalance(amId)
1075-                        let prBalance = getAccBalance(prId)
1076-                        let $t03960040060 = if ((outAssetId == amId))
1077-                            then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
1078-                            else if ((outAssetId == prId))
1079-                                then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
1080-                                else throw("wrong outAssetId")
1081-                        let amBalanceNow = $t03960040060._1
1082-                        let prBalanceNow = $t03960040060._2
1083-                        let virtSwapInAm = $t03960040060._3
1084-                        let virtSwapOutPr = $t03960040060._4
1085-                        let virtSwapInPr = $t03960040060._5
1086-                        let virtSwapOutAm = $t03960040060._6
1087-                        let totalGetRaw = $t03960040060._7
1088-                        if (if ((0 > virtSwapInAm))
1089-                            then true
1090-                            else (0 > virtSwapInPr))
1091-                            then throw("Wrong calc")
1092-                            else {
1093-                                let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
1094-                                let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
1095-                                let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
1096-                                if ((D0vsD1 == D0vsD1))
1097-                                    then {
1098-                                        let totalGet = takeFee(totalGetRaw)._1
1099-                                        let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
1100-                                        if ((finalRes == finalRes))
1101-                                            then {
1102-                                                let $t04080740911 = if ((outAssetId == amId))
1103-                                                    then $Tuple2(toInt(finalRes._2), 0)
1104-                                                    else $Tuple2(0, toInt(finalRes._2))
1105-                                                let outAm = $t04080740911._1
1106-                                                let outPr = $t04080740911._2
1107-                                                let totalAmount = (outAm + outPr)
1108-                                                let feeAmount = (totalGetRaw - totalGet)
1109-                                                let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
1110-                                                    then unit
1111-                                                    else fromBase58String(outAssetId)
1112-                                                let sendFeeToMatcher = if ((feeAmount > 0))
1113-                                                    then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetIdOrWaves)]
1114-                                                    else nil
1115-                                                let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
1116-                                                let curPr = f1(curPrX18, scale8)
1117-                                                let state = [ScriptTransfer(userAddress, totalAmount, outAssetIdOrWaves), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
1118-                                                if ((state == state))
1119-                                                    then {
1120-                                                        let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
1121-                                                        if ((burn == burn))
1122-                                                            then (state ++ sendFeeToMatcher)
1123-                                                            else throw("Strict value is not equal to itself.")
1124-                                                        }
1125-                                                    else throw("Strict value is not equal to itself.")
1126-                                                }
1127-                                            else throw("Strict value is not equal to itself.")
1128-                                        }
1129-                                    else throw("Strict value is not equal to itself.")
1130-                                }
1131-                        }
1132-        }
1133-
1134-
1135-
1136-@Callable(i)
1137924 func getOneTknV2 (outAssetId,minOutAmount) = {
1138-    let $t04193642091 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
1139-    let state = $t04193642091._1
1140-    let totalAmount = $t04193642091._2
925+    let $t03403934194 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
926+    let state = $t03403934194._1
927+    let totalAmount = $t03403934194._2
1141928     $Tuple2(state, totalAmount)
1142929     }
1143930 
1144931 
1145932 
1146933 @Callable(i)
1147934 func getOneTknV2READONLY (outAssetId,lpAssetAmount) = {
1148935     let poolConfig = gpc()
1149936     let amId = poolConfig[idxAmAsId]
1150937     let prId = poolConfig[idxPrAsId]
1151938     let lpId = poolConfig[idxLPAsId]
1152939     let xp = [toBigInt(getAccBalance(amId)), toBigInt(getAccBalance(prId))]
1153940     let lpEmission = toBigInt(valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "invalid lp asset").quantity)
1154941     let D0 = getD(xp)
1155942     let D1 = (D0 - fraction(toBigInt(lpAssetAmount), D0, lpEmission))
1156943     let index = if ((outAssetId == amId))
1157944         then 0
1158945         else if ((outAssetId == prId))
1159946             then 1
1160947             else throw("invalid out asset id")
1161948     let newY = getYD(xp, index, D1)
1162949     let dy = (xp[index] - newY)
1163950     let totalGetRaw = toInt((dy - big1))
1164-    let $t04287042919 = takeFee(totalGetRaw)
1165-    let totalGet = $t04287042919._1
1166-    let feeAmount = $t04287042919._2
951+    let $t03497335022 = takeFee(totalGetRaw)
952+    let totalGet = $t03497335022._1
953+    let feeAmount = $t03497335022._2
1167954     $Tuple2(nil, $Tuple2(totalGet, feeAmount))
1168955     }
1169956 
1170957 
1171958 
1172959 @Callable(i)
1173960 func getOneTknV2WithBonusREADONLY (outAssetId,lpAssetAmount) = {
1174961     let poolConfig = gpc()
1175962     let amId = poolConfig[idxAmAsId]
1176963     let prId = poolConfig[idxPrAsId]
1177964     let lpId = poolConfig[idxLPAsId]
1178965     let amBalance = getAccBalance(amId)
1179966     let prBalance = getAccBalance(prId)
1180-    let $t04326443379 = {
967+    let $t03536735482 = {
1181968         let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, lpAssetAmount], nil)
1182969         if ($isInstanceOf(@, "(Int, Int)"))
1183970             then @
1184971             else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
1185972         }
1186-    let totalGet = $t04326443379._1
1187-    let feeAmount = $t04326443379._2
973+    let totalGet = $t03536735482._1
974+    let feeAmount = $t03536735482._2
1188975     let r = ego("", lpId, lpAssetAmount, this)
1189976     let outAmAmt = r._1
1190977     let outPrAmt = r._2
1191978     let sumOfGetAssets = (outAmAmt + outPrAmt)
1192979     let bonus = fraction((totalGet - sumOfGetAssets), scale8, sumOfGetAssets)
1193980     $Tuple2(nil, $Tuple3(totalGet, feeAmount, bonus))
1194981     }
1195982 
1196983 
1197984 
1198985 @Callable(i)
1199986 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
1200987     let r = cg(i)
1201988     let outAmAmt = r._1
1202989     let outPrAmt = r._2
1203990     let pmtAmt = r._3
1204991     let pmtAssetId = r._4
1205992     let state = r._5
1206993     if ((noLessThenAmtAsset > outAmAmt))
1207994         then throw(((("Failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
1208995         else if ((noLessThenPriceAsset > outPrAmt))
1209996             then throw(((("Failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
1210997             else {
1211998                 let burnLPAssetOnFactory = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
1212999                 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
12131000                     then state
12141001                     else throw("Strict value is not equal to itself.")
12151002                 }
12161003     }
12171004 
12181005 
12191006 
12201007 @Callable(i)
12211008 func unstakeAndGet (amount) = {
12221009     let checkPayments = if ((size(i.payments) != 0))
12231010         then throw("No pmnts expd")
12241011         else true
12251012     if ((checkPayments == checkPayments))
12261013         then {
12271014             let cfg = gpc()
12281015             let factoryCfg = gfc()
12291016             let lpAssetId = fromBase58String(cfg[idxLPAsId])
12301017             let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
12311018             let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
12321019             if ((unstakeInv == unstakeInv))
12331020                 then {
12341021                     let r = ego(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
12351022                     let sts = parseIntValue(r._9)
12361023                     let state = r._10
12371024                     let v = if (if (igs())
12381025                         then true
12391026                         else (sts == PoolShutdown))
12401027                         then throw(("Blocked: " + toString(sts)))
12411028                         else true
12421029                     if ((v == v))
12431030                         then {
12441031                             let burnA = invoke(fca, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
12451032                             if ((burnA == burnA))
12461033                                 then state
12471034                                 else throw("Strict value is not equal to itself.")
12481035                             }
12491036                         else throw("Strict value is not equal to itself.")
12501037                     }
12511038                 else throw("Strict value is not equal to itself.")
12521039             }
12531040         else throw("Strict value is not equal to itself.")
12541041     }
12551042 
12561043 
12571044 
12581045 @Callable(i)
1259-func unstakeAndGetOneTkn (unstakeAmount,outAssetId,minOutAmount) = {
1046+func unstakeAndGetOneTknV2 (unstakeAmount,outAssetId,minOutAmount) = {
12601047     let checkPayments = if ((size(i.payments) != 0))
12611048         then throw("No pmnts expd")
12621049         else true
12631050     if ((checkPayments == checkPayments))
12641051         then {
12651052             let cfg = gpc()
12661053             let factoryCfg = gfc()
12671054             let lpAssetId = fromBase58String(cfg[idxLPAsId])
12681055             let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
12691056             let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), unstakeAmount], nil)
12701057             if ((unstakeInv == unstakeInv))
12711058                 then {
1272-                    let $t04568445872 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1273-                    let state = $t04568445872._1
1274-                    let totalAmount = $t04568445872._2
1059+                    let $t03778937977 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1060+                    let state = $t03778937977._1
1061+                    let totalAmount = $t03778937977._2
12751062                     $Tuple2(state, totalAmount)
12761063                     }
12771064                 else throw("Strict value is not equal to itself.")
12781065             }
12791066         else throw("Strict value is not equal to itself.")
12801067     }
12811068 
12821069 
12831070 
12841071 @Callable(i)
12851072 func putOneTknV2WithBonusREADONLY (paymentAmountRaw,paymentAssetId) = {
12861073     let poolConfig = gpc()
12871074     let amId = poolConfig[idxAmAsId]
12881075     let prId = poolConfig[idxPrAsId]
12891076     let lpId = poolConfig[idxLPAsId]
1290-    let $t04613146228 = calcPutOneTkn(paymentAmountRaw, paymentAssetId, "", "")
1291-    let lpAmount = $t04613146228._1
1292-    let state = $t04613146228._2
1293-    let feeAmount = $t04613146228._3
1294-    let bonus = $t04613146228._4
1077+    let $t03823638333 = calcPutOneTkn(paymentAmountRaw, paymentAssetId, "", "")
1078+    let lpAmount = $t03823638333._1
1079+    let state = $t03823638333._2
1080+    let feeAmount = $t03823638333._3
1081+    let bonus = $t03823638333._4
12951082     $Tuple2(nil, $Tuple3(lpAmount, feeAmount, bonus))
12961083     }
12971084 
12981085 
12991086 
13001087 @Callable(i)
13011088 func activate (amtAsStr,prAsStr) = if ((toString(i.caller) != toString(fca)))
13021089     then throw("denied")
13031090     else $Tuple2([StringEntry(aa(), amtAsStr), StringEntry(pa(), prAsStr)], "success")
13041091 
13051092 
13061093 
13071094 @Callable(i)
13081095 func setS (k,v) = if ((toString(i.caller) != strf(this, ada())))
13091096     then pd
13101097     else [StringEntry(k, v)]
13111098 
13121099 
13131100 
13141101 @Callable(i)
13151102 func setI (k,v) = if ((toString(i.caller) != strf(this, ada())))
13161103     then pd
13171104     else [IntegerEntry(k, v)]
13181105 
13191106 
13201107 
13211108 @Callable(i)
13221109 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, gpc())
13231110 
13241111 
13251112 
13261113 @Callable(i)
13271114 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
13281115 
13291116 
13301117 
13311118 @Callable(i)
13321119 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
13331120     let pr = calcPrices(amAmt, prAmt, lpAmt)
13341121     $Tuple2(nil, [toString(pr[0]), toString(pr[1]), toString(pr[2])])
13351122     }
13361123 
13371124 
13381125 
13391126 @Callable(i)
13401127 func fromX18WrapperREADONLY (val,resScaleMult) = $Tuple2(nil, f1(parseBigIntValue(val), resScaleMult))
13411128 
13421129 
13431130 
13441131 @Callable(i)
13451132 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(t1(origVal, origScaleMult)))
13461133 
13471134 
13481135 
13491136 @Callable(i)
13501137 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(cpbi(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
13511138 
13521139 
13531140 
13541141 @Callable(i)
13551142 func estimatePutOperationWrapperREADONLY (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,usrAddr,isEval,emitLp) = $Tuple2(nil, epo(txId58, slippage, inAmAmt, inAmId, inPrAmt, inPrId, usrAddr, isEval, emitLp, true, false, 0, ""))
13561143 
13571144 
13581145 
13591146 @Callable(i)
13601147 func estimateGetOperationWrapperREADONLY (txId58,pmtAsId,pmtLpAmt,usrAddr) = {
13611148     let r = ego(txId58, pmtAsId, pmtLpAmt, addressFromStringValue(usrAddr))
13621149     $Tuple2(nil, $Tuple10(r._1, r._2, r._3, r._4, r._5, r._6, r._7, toString(r._8), r._9, r._10))
13631150     }
13641151 
13651152 
13661153 
13671154 @Callable(i)
13681155 func getFeeREADONLY () = $Tuple2(nil, fee)
13691156 
13701157 
13711158 @Verifier(tx)
13721159 func verify () = {
13731160     let targetPublicKey =     match m() {
13741161         case pk: ByteVector => 
13751162             pk
13761163         case _: Unit => 
13771164             tx.senderPublicKey
13781165         case _ => 
13791166             throw("Match error")
13801167     }
13811168     match tx {
13821169         case order: Order => 
13831170             let matcherPub = mp()
13841171             let orderValid = moa(order)
13851172             let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
13861173             let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
13871174             if (if (if (orderValid)
13881175                 then senderValid
13891176                 else false)
13901177                 then matcherValid
13911178                 else false)
13921179                 then true
13931180                 else toe(orderValid, senderValid, matcherValid)
13941181         case s: SetScriptTransaction => 
13951182             let newHash = blake2b256(value(s.script))
13961183             let allowedHash = fromBase64String(value(getString(fca, keyAllowedLpStableScriptHash())))
13971184             let currentHash = scriptHash(this)
13981185             if (if ((allowedHash == newHash))
13991186                 then (currentHash != newHash)
14001187                 else false)
14011188                 then true
14021189                 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
14031190         case _ => 
14041191             sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
14051192     }
14061193     }
14071194 
github/deemru/w8io/03bedc9 
140.80 ms ◑