tx · 8MAfPt5EzZNjJoHATMesYcYR7KUk5g8dmXWiBnwWqx5Y

3NAefciWv6f9fWvEXdGgpHfanJFG8HqfjuT:  -0.02600000 Waves

2022.08.15 16:43 [2185659] smart account 3NAefciWv6f9fWvEXdGgpHfanJFG8HqfjuT > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8MAfPt5EzZNjJoHATMesYcYR7KUk5g8dmXWiBnwWqx5Y",
    "fee": 2600000,
    "feeAssetId": null,
    "timestamp": 1660571044385,
    "version": 1,
    "sender": "3NAefciWv6f9fWvEXdGgpHfanJFG8HqfjuT",
    "senderPublicKey": "D1BL65meykxFZTCuq7jq9HSGLLnWvQamQPUNrguW5w39",
    "proofs": [
        "Z16KKSyqPoauauNEB2jZ4RRZXBTUpDzmPoLL2GyXk9Q7Bq6FvUs4GykaeZhVEsRw5aMq6RsKuSvj22Tmrctpzdo"
    ],
    "script": "base64:BgL+HwgCEgMKAQgSAwoBCBIAEgQKAgEEEgcKBQEBAQEEEgMKAQESABIHCgUBAQEIARIECgIBARIDCgEBEgQKAggIEgQKAggIEgQKAggBEgASAwoBCBIFCgMBAQESBAoCCAESBAoCAQESBAoCCAgSCwoJCAEBAgECCAQEEgYKBAgIAQgiBnNjYWxlOCIMc2NhbGU4QmlnSW50IgdzY2FsZTE4Igh0aG91c2FuZCIKemVyb0JpZ0ludCIJb25lQmlnSW50IgpzbGlwcGFnZTREIgVBbXVsdCIFRGNvbnYiA1NFUCIFRU1QVFkiClBvb2xBY3RpdmUiClBvb2xQdXREaXMiDlBvb2xNYXRjaGVyRGlzIgxQb29sU2h1dGRvd24iDmlkeFBvb2xBZGRyZXNzIglpZHhQb29sU3QiCWlkeExQQXNJZCIJaWR4QW1Bc0lkIglpZHhQckFzSWQiC2lkeEFtdEFzRGNtIg1pZHhQcmljZUFzRGNtIgtpZHhJQW10QXNJZCINaWR4SVByaWNlQXNJZCIPaWR4RmFjdFN0YWtDbnRyIhBpZHhGYWN0U2xpcHBDbnRyIhFpZHhGYWN0R3d4UmV3Q250ciISZmVlUGVybWlsbGVEZWZhdWx0IgV0b1gxOCIHb3JpZ1ZhbCINb3JpZ1NjYWxlTXVsdCIHZnJvbVgxOCIDdmFsIg9yZXN1bHRTY2FsZU11bHQiAnRzIgNhbXQiCHJlc1NjYWxlIghjdXJTY2FsZSIDYWJzIhFrZXlGYWN0b3J5Q29udGFjdCITa2V5TWFuYWdlclB1YmxpY0tleSIaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiDGtleVByaWNlTGFzdCIPa2V5UHJpY2VIaXN0b3J5IgFoIgF0IhJrZXlQdXRBY3Rpb25CeVVzZXIiAnVhIgR0eElkIhJrZXlHZXRBY3Rpb25CeVVzZXIiDmtleUFtb3VudEFzc2V0Ig1rZXlQcmljZUFzc2V0Ig9rZXlBbXBsaWZpY2F0b3IiD2tleUFkZG9uQWRkcmVzcyIOa2V5RmVlUGVybWlsbGUiC2ZlZVBlcm1pbGxlIgRmY2ZnIgRtdHBrIgJwYyIGaUFtdEFzIgVpUHJBcyIDbWJhIgViQVN0ciIDYXBzIgh0aHJvd0VyciIDbXNnIg90aHJvd09yZGVyRXJyb3IiA29yViIGc2VuZHJWIgZtYXRjaFYiA3N0ciIHJG1hdGNoMCIGdmFsU3RyIg9nZXRTdHJpbmdPckZhaWwiBGFkZHIiA2tleSIMZ2V0SW50T3JGYWlsIg9mYWN0b3J5Q29udHJhY3QiDGFtcGxpZmljYXRvciIQaXNHbG9iYWxTaHV0ZG93biITZ2V0TWF0Y2hlclB1Yk9yRmFpbCIObWF0Y2hlckFkZHJlc3MiDWdldFBvb2xDb25maWciBWFtdEFzIgdwcmljZUFzIghpUHJpY2VBcyIQZ2V0RmFjdG9yeUNvbmZpZyIRZGF0YVB1dEFjdGlvbkluZm8iDWluQW10QXNzZXRBbXQiD2luUHJpY2VBc3NldEFtdCIIb3V0THBBbXQiBXByaWNlIgpzbGlwQnlVc2VyIgxzbGlwcGFnZVJlYWwiCHR4SGVpZ2h0Igt0eFRpbWVzdGFtcCIMc2xpcGFnZUFtQW10IgxzbGlwYWdlUHJBbXQiEWRhdGFHZXRBY3Rpb25JbmZvIg5vdXRBbXRBc3NldEFtdCIQb3V0UHJpY2VBc3NldEFtdCIHaW5McEFtdCINZ2V0QWNjQmFsYW5jZSIHYXNzZXRJZCIPY2FsY1ByaWNlQmlnSW50IghwckFtdFgxOCIIYW1BbXRYMTgiD3ZhbGlkYXRlQWJzRGlmZiIKZXN0aW1hdGVMUCIFb3V0THAiCHNsaXBwYWdlIgRkaWZmIgRwYXNzIgl2YWxpZGF0ZUQiAkQxIgJEMCIEZmFpbCIQcHJpdmF0ZUNhbGNQcmljZSIKYW1Bc3NldERjbSIKcHJBc3NldERjbSIFYW1BbXQiBXByQW10IgthbXRBc0FtdFgxOCIKcHJBc0FtdFgxOCIKY2FsY1ByaWNlcyIFbHBBbXQiA2NmZyIIYW10QXNEY20iB3ByQXNEY20iCHByaWNlWDE4IghscEFtdFgxOCINbHBQckluQW1Bc1gxOCINbHBQckluUHJBc1gxOCIPY2FsY3VsYXRlUHJpY2VzIgFwIhRlc3RpbWF0ZUdldE9wZXJhdGlvbiIGdHhJZDU4Ig5wYXltZW50QXNzZXRJZCIPcGF5bWVudExwQW1vdW50Igt1c2VyQWRkcmVzcyIJbHBBc3NldElkIghhbW91bnRJZCIHcHJpY2VJZCIOYW1vdW50RGVjaW1hbHMiDXByaWNlRGVjaW1hbHMiA3N0cyIKbHBFbWlzc2lvbiIPdmFsaWRhdGlvbkJsb2NrIghkZWNpbWFscyINYW1vdW50QmFsYW5jZSIQYW1vdW50QmFsYW5jZVgxOCIMcHJpY2VCYWxhbmNlIg9wcmljZUJhbGFuY2VYMTgiD2N1cnJlbnRQcmljZVgxOCIIY3VyUHJpY2UiEnBheW1lbnRMcEFtb3VudFgxOCINbHBFbWlzc2lvblgxOCISb3V0QW1vdW50QW1vdW50WDE4IhFvdXRQcmljZUFtb3VudFgxOCIPb3V0QW1vdW50QW1vdW50Ig5vdXRQcmljZUFtb3VudCIFc3RhdGUiFGVzdGltYXRlUHV0T3BlcmF0aW9uIhFzbGlwcGFnZVRvbGVyYW5jZSITaW5BbW91bnRBc3NldEFtb3VudCIPaW5BbW91bnRBc3NldElkIhJpblByaWNlQXNzZXRBbW91bnQiDmluUHJpY2VBc3NldElkIgppc0V2YWx1YXRlIgZlbWl0THAiCmlzT25lQXNzZXQiDXBheW1lbnRBbW91bnQiCXBheW1lbnRJZCILYW1vdW50SWRTdHIiCnByaWNlSWRTdHIiDWluQW1vdW50SWRTdHIiDGluUHJpY2VJZFN0ciIWaW5BbW91bnRBc3NldEFtb3VudFgxOCIVaW5QcmljZUFzc2V0QW1vdW50WDE4Igx1c2VyUHJpY2VYMTgiAXIiC3NsaXBwYWdlWDE4IgtscEFtb3VudFgxOCIPc2xpcHBhZ2VSZWFsWDE4IgpwclZpYUFtWDE4IgphbVZpYVByWDE4Ig9leHBlY3RlZEFtb3VudHMiHGV4cGVjdGVkQW1vdW50QXNzZXRBbW91bnRYMTgiG2V4cGVjdGVkUHJpY2VBc3NldEFtb3VudFgxOCIRY2FsY3VsYXRlTHBBbW91bnQiG2NhbGN1bGF0ZUFtb3VudEFzc2V0UGF5bWVudCIaY2FsY3VsYXRlUHJpY2VBc3NldFBheW1lbnQiDGN1cnJlbnRQcmljZSIRc2xpcHBhZ2VDYWxjdWxhdGUiEWNoZWNrQ2FsY0xwQW1vdW50IgxlbWl0THBBbW91bnQiCmFtb3VudERpZmYiCXByaWNlRGlmZiINJHQwMTYxODkxNjQ0OCIKd3JpdGVBbUFtdCIKd3JpdGVQckFtdCILY29tbW9uU3RhdGUiG3ZhbGlkYXRlTWF0Y2hlck9yZGVyQWxsb3dlZCIFb3JkZXIiB2FtdEFzSWQiBnByQXNJZCIPYWNjQW10QXNCYWxhbmNlIg5hY2NQckFzQmFsYW5jZSIKb3JBbXRBc3NldCIKb3JBbXRBc1N0ciIJb3JQckFzc2V0IglvclByQXNTdHIiCm9yZGVyUHJpY2UiDmNhc3RPcmRlclByaWNlIhFpc09yZGVyUHJpY2VWYWxpZCIJY29tbW9uR2V0IgFpIg1jaGVja1BheW1lbnRzIgdwYXltZW50Igljb21tb25QdXQiBmNhbGxlciISYW1vdW50QXNzZXRQYXltZW50IhFwcmljZUFzc2V0UGF5bWVudCIHdGFrZUZlZSIGYW1vdW50IgNmZWUiFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQiAXMiHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0IgJwZCILbXVzdE1hbmFnZXIiAnBrIgtjaGVja0NhbGxlciIXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiFWNoZWNrTWFuYWdlclB1YmxpY0tleSICcG0iBWhhc1BNIgdjaGVja1BNIglhdXRvU3Rha2UiB2ZhY3RDZmciD3N0YWtpbmdDb250cmFjdCIQc2xpcHBhZ2VDb250cmFjdCINc2xpcHBhZ2VDaGVjayINcGF5bWVudHNDaGVjayILZXN0aW1hdGVQdXQiAmVsIgZsZWdhY3kiAnNhIgJzcCIJbHBUcmFzZmVyIgJzcyIPYW1vdW50QXNzZXRQYXJ0Ig5wcmljZUFzc2V0UGFydCIRZ3d4UmV3YXJkQ29udHJhY3QiB3Bvb2xDZmciBWFkZG9uIhBwYXltZW50QW1vdW50UmF3Ig0kdDAyNTYxNzI1Njc2IglmZWVBbW91bnQiDSR0MDI1OTQwMjYzOTUiEGFtb3VudEJhbGFuY2VOb3ciD3ByaWNlQmFsYW5jZU5vdyIMdmlydFN3YXBJbkFtIg12aXJ0U3dhcE91dFByIgx2aXJ0U3dhcEluUHIiDXZpcnRTd2FwT3V0QW0iBkQwdnNEMSIJbHBDYWxjUmVzIgFlIhBzZW5kRmVlVG9NYXRjaGVyIgttYXhzbGlwcGFnZSIJb3V0QW10QW10IgFiIgpleGNoUmVzdWx0Igdub3RVc2VkIglvdXRBbW91bnQiCm91dEFzc2V0SWQiCmVzdGltQW1BbXQiCmVzdGltUHJBbXQiDSR0MDMxNTM0MzIwMDIiCHRvdGFsR2V0IghmaW5hbFJlcyINJHQwMzI2NzEzMjc3OSIFb3V0QW0iBW91dFByIg50b3RhbEFtb3VudFJhdyINJHQwMzI4MTkzMjg3NCILdG90YWxBbW91bnQiEW91dEFzc2V0SWRPcldhdmVzIghjdXJQclgxOCIFY3VyUHIiBGJ1cm4iEm5vTGVzc1RoZW5BbXRBc3NldCIUbm9MZXNzVGhlblByaWNlQXNzZXQiFGNoZWNrT3V0QW1vdW50QW1vdW50IhNjaGVja091dFByaWNlQW1vdW50IhRidXJuTFBBc3NldE9uRmFjdG9yeSIKZmFjdG9yeUNmZyIHc3Rha2luZyIKdW5zdGFrZUludiIBdiIFYnVybkEiCGFtdEFzU3RyIgdwckFzU3RyIgFrIgJwciIMcmVzU2NhbGVNdWx0IgZpbkFtSWQiBmluUHJJZCIHdXNyQWRkciILcGF5bWVudEFzSWQiAnR4IgZ2ZXJpZnkiB210Y2hQdWIiBXNuZHJWIgVtdGNoViIPdGFyZ2V0UHVibGljS2V5IgckbWF0Y2gxUQABYQCAwtcvAAFiCQC2AgEAgMLXLwABYwkAtgIBAICAkLu61q3wDQABZADoBwABZQkAtgIBAAAAAWYJALYCAQABAAFnCQC2AgEJAGUCBQFhCQBpAgkAaAIFAWEAAQUBYQABaAIDMTAwAAFpAgExAAFqAgJfXwABawIAAAFsAAEAAW0AAgABbgADAAFvAAQAAXAAAQABcQACAAFyAAMAAXMABAABdAAFAAF1AAYAAXYABwABdwAIAAF4AAkAAXkAAQABegAHAAFBAAoAAUIAAAEBQwIBRAFFCQC8AgMJALYCAQUBRAUBYwkAtgIBBQFFAQFGAgFHAUgJAKADAQkAvAIDBQFHCQC2AgEFAUgFAWMBAUkDAUoBSwFMCQBrAwUBSgUBSwUBTAEBTQEBRwMJAL8CAgUBZQUBRwkAvgIBBQFHBQFHAQFOAAITJXNfX2ZhY3RvcnlDb250cmFjdAEBTwACFCVzX19tYW5hZ2VyUHVibGljS2V5AQFQAAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQFRAAIRJXMlc19fcHJpY2VfX2xhc3QBAVICAVMBVAkAuQkCCQDMCAICGCVzJXMlZCVkX19wcmljZV9faGlzdG9yeQkAzAgCCQCkAwEFAVMJAMwIAgkApAMBBQFUBQNuaWwFAWoBAVUCAVYBVwkArAICCQCsAgIJAKwCAgILJXMlcyVzX19QX18FAVYCAl9fBQFXAQFYAgFWAVcJAKwCAgkArAICCQCsAgICCyVzJXMlc19fR19fBQFWAgJfXwUBVwEBWQACDyVzX19hbW91bnRBc3NldAEBWgACDiVzX19wcmljZUFzc2V0AQJhYQACByVzX19hbXABAmFiAAINJXNfX2FkZG9uQWRkcgACYWMCDyVzX19mZWVQZXJtaWxsZQACYWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUCYWMFAUIBAmFlAAIRJXNfX2ZhY3RvcnlDb25maWcBAmFmAAIYJXMlc19fbWF0Y2hlcl9fcHVibGljS2V5AQJhZwICYWgCYWkJAKwCAgkArAICCQCsAgIJAKwCAgIIJWQlZCVzX18FAmFoAgJfXwUCYWkCCF9fY29uZmlnAQJhagECYWsJAKwCAgIoJXMlcyVzX19tYXBwaW5nc19fYmFzZUFzc2V0MmludGVybmFsSWRfXwUCYWsBAmFsAAIMJXNfX3NodXRkb3duAQJhbQECYW4JAAIBCQC5CQIJAMwIAgIPbHBfc3RhYmxlLnJpZGU6CQDMCAIFAmFuBQNuaWwCASABAmFvAwJhcAJhcQJhcgkBAmFtAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICEUZhaWxlZDogb3JkVmFsaWQ9CQClAwEFAmFwAgsgc25kclZhbGlkPQkApQMBBQJhcQIMIG10Y2hyVmFsaWQ9CQClAwEFAmFyAQJhcwEBRwQCYXQFAUcDCQABAgUCYXQCBlN0cmluZwQCYXUFAmF0BQJhdQkBAmFtAQITZmFpbCBjYXN0IHRvIFN0cmluZwECYXYCAmF3AmF4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUCYXcFAmF4CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFAmF3CQDMCAICAS4JAMwIAgUCYXgJAMwIAgIMIG5vdCBkZWZpbmVkBQNuaWwCAAECYXkCAmF3AmF4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUCYXcFAmF4CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFAmF3CQDMCAICAS4JAMwIAgUCYXgJAMwIAgIMIG5vdCBkZWZpbmVkBQNuaWwCAAACYXoJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQJhdgIFBHRoaXMJAQFOAAACYUEJAQJhdgIFBHRoaXMJAQJhYQABAmFCAAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQJhegkBAmFsAAcBAmFDAAkA2QQBCQECYXYCBQJhegkBAmFmAAACYUQJAKcIAQkBAmFDAAECYUUABAJhRgkBAmF2AgUEdGhpcwkBAVkABAJhRwkBAmF2AgUEdGhpcwkBAVoABAJhSAkBAmF5AgUCYXoJAQJhagEFAmFHBAJhaAkBAmF5AgUCYXoJAQJhagEFAmFGCQC1CQIJAQJhdgIFAmF6CQECYWcCCQCkAwEFAmFoCQCkAwEFAmFIBQFqAQJhSQAJALUJAgkBAmF2AgUCYXoJAQJhZQAFAWoBAmFKCgJhSwJhTAJhTQJhTgJhTwJhUAJhUQJhUgJhUwJhVAkAuQkCCQDMCAICFCVkJWQlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYUsJAMwIAgkApAMBBQJhTAkAzAgCCQCkAwEFAmFNCQDMCAIJAKQDAQUCYU4JAMwIAgkApAMBBQJhTwkAzAgCCQCkAwEFAmFQCQDMCAIJAKQDAQUCYVEJAMwIAgkApAMBBQJhUgkAzAgCCQCkAwEFAmFTCQDMCAIJAKQDAQUCYVQFA25pbAUBagECYVUGAmFWAmFXAmFYAmFOAmFRAmFSCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUCYVYJAMwIAgkApAMBBQJhVwkAzAgCCQCkAwEFAmFYCQDMCAIJAKQDAQUCYU4JAMwIAgkApAMBBQJhUQkAzAgCCQCkAwEFAmFSBQNuaWwFAWoBAmFZAQJhWgMJAAACBQJhWgIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUCYVoBAmJhAgJiYgJiYwkAvAIDBQJiYgUBYwUCYmMBAmJkAwJiZQJiZgJiZwQCYmgJALwCAwkAuAICBQJiZQUCYmYFAWIFAmJmBAJiaQkAvwICCQC4AgIFAmJnCQEBTQEFAmJoBQFlAwkBASEBBQJiaQkBAmFtAQkArAICAg5CaWcgc2xpcHBhZ2U6IAkApgMBBQJiaAkAlAoCBQJiaQkAmQMBCQDMCAIFAmJlCQDMCAIFAmJmBQNuaWwBAmJqAwJiawJibAJiZwQCYmgJALwCAwUCYmwFAWIFAmJrBAJibQkAvwICBQJiZwUCYmgDAwUCYm0GCQC/AgIFAmJsBQJiawkBAmFtAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkApgMBBQJibAIBIAkApgMBBQJiawIBIAkApgMBBQJiaAIBIAkApgMBBQJiZwUCYm0BAmJuBAJibwJicAJicQJicgQCYnMJAQFDAgUCYnEFAmJvBAJidAkBAUMCBQJicgUCYnAJAQJiYQIFAmJ0BQJicwECYnUDAmJxAmJyAmJ2BAJidwkBAmFFAAQCYngJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJidwUBdQQCYnkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJidwUBdgQCYnoJAQJibgQFAmJ4BQJieQUCYnEFAmJyBAJiYwkBAUMCBQJicQUCYngEAmJiCQEBQwIFAmJyBQJieQQCYkEJAQFDAgUCYnYFAWEEAmJCCQECYmECBQJiYwUCYkEEAmJDCQECYmECBQJiYgUCYkEJAMwIAgUCYnoJAMwIAgUCYkIJAMwIAgUCYkMFA25pbAECYkQDAmJxAmJyAmJ2BAJiRQkBAmJ1AwUCYnEFAmJyBQJidgkAzAgCCQEBRgIJAJEDAgUCYkUAAAUBYQkAzAgCCQEBRgIJAJEDAgUCYkUAAQUBYQkAzAgCCQEBRgIJAJEDAgUCYkUAAgUBYQUDbmlsAQJiRgQCYkcCYkgCYkkCYkoEAmJ3CQECYUUABAJiSwkAkQMCBQJidwUBcgQCYkwJAJEDAgUCYncFAXMEAmJNCQCRAwIFAmJ3BQF0BAJiTgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJ3BQF1BAJiTwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJ3BQF2BAJiUAkAkQMCBQJidwUBcQQCYlEICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQJiSwILV3JvbmcgTFAgaWQIcXVhbnRpdHkEAmJSAwkAAAIFAmJLBQJiSAYJAQJhbQECE1dyb25nIHBheW1lbnQgYXNzZXQDCQAAAgUCYlIFAmJSBAJiUwMJAGcCBQJiTgUCYk8FAmJOBQJiTwMJAAACBQJiUwUCYlMEAmJUCQECYVkBBQJiTAQCYlUJAQFDAgUCYlQFAmJTBAJiVgkBAmFZAQUCYk0EAmJXCQEBQwIFAmJWBQJiUwQCYlgJAQJiYQIFAmJXBQJiVQQCYlkJAQFGAgUCYlgFAWEEAmJaCQEBQwIFAmJJBQFhBAJjYQkBAUMCBQJiUQUBYQQCY2IJALwCAwUCYlUFAmJaBQJjYQQCY2MJALwCAwUCYlcFAmJaBQJjYQQCY2QJAQFGAgUCY2IFAmJTBAJjZQkBAUYCBQJjYwUCYlMEAmNmAwkAAAIFAmJHAgAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJiSgUCY2QDCQAAAgUCYkwCBVdBVkVTBQR1bml0CQDZBAEFAmJMCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmJKBQJjZQMJAAACBQJiTQIFV0FWRVMFBHVuaXQJANkEAQUCYk0JAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVgCCQClCAEFAmJKBQJiRwkBAmFVBgUCY2QFAmNlBQJiSQUCYlkFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFRAAUCYlkJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFSAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCYlkFA25pbAkAnAoKBQJjZAUCY2UFAmJMBQJiTQUCYlQFAmJWBQJiUQUCYlgFAmJQBQJjZgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECY2cMAmJHAmNoAmNpAmNqAmNrAmNsAmJKAmNtAmNuAmNvAmNwAmNxBAJidwkBAmFFAAQCYksJANkEAQkAkQMCBQJidwUBcgQCY3IJAJEDAgUCYncFAXMEAmNzCQCRAwIFAmJ3BQF0BAJjdAkAkQMCBQJidwUBdwQCY3UJAJEDAgUCYncFAXgEAmJOCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYncFAXUEAmJPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYncFAXYEAmJQCQCRAwIFAmJ3BQFxBAJiUQgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiSwIOV3JvbmcgbHAgYXNzZXQIcXVhbnRpdHkEAmJUAwUCY20JAQJhWQEFAmNyAwMFAmNvCQAAAgUCY3EFAmNyBwkAZQIJAQJhWQEFAmNyBQJjcAMFAmNvCQECYVkBBQJjcgkAZQIJAQJhWQEFAmNyBQJjaQQCYlYDBQJjbQkBAmFZAQUCY3MDAwUCY28JAAACBQJjcQUCY3MHCQBlAgkBAmFZAQUCY3MFAmNwAwUCY28JAQJhWQEFAmNzCQBlAgkBAmFZAQUCY3MFAmNrBAJiUwMJAGcCBQJiTgUCYk8FAmJOBQJiTwMJAAACBQJiUwUCYlMEAmN2CQEBQwIFAmNpBQJiUwQCY3cJAQFDAgUCY2sFAmJTBAJjeAkBAmJhAgUCY3cFAmN2BAJiVQkBAUMCBQJiVAUCYlMEAmJXCQEBQwIFAmJWBQJiUwQCY3kDCQAAAgUCYlEAAAQCYlgFAWUEAmN6BQFlBAJjQQkAdgYJALkCAgUCY3YFAmN3AAAJALYCAQAFAAEAAAUERE9XTgkAlwoFCQEBRgIFAmNBBQFhCQEBRgIFAmN2BQJiUwkBAUYCBQJjdwUCYlMJAQJiYQIJALcCAgUCYlcFAmN3CQC3AgIFAmJVBQJjdgUCY3oEAmJYCQECYmECBQJiVwUCYlUEAmNCCQC8AgMJAQFNAQkAuAICBQJiWAUCY3gFAWMFAmJYBAJjegkBAUMCBQJjaAUBYQMDCQECIT0CBQJiWAUBZQkAvwICBQJjQgUCY3oHCQECYW0BCQCsAgIJAKwCAgkArAICAg9QcmljZSBzbGlwcGFnZSAJAKYDAQUCY0ICAyA+IAkApgMBBQJjegQCY2EJAQFDAgUCYlEFAWEEAmNDCQC8AgMFAmN2BQJiWAUBYwQCY0QJALwCAwUCY3cFAWMFAmJYBAJjRQMJAL8CAgUCY0MFAmN3CQCUCgIFAmNEBQJjdgkAlAoCBQJjdgUCY0MEAmNGCAUCY0UCXzEEAmNHCAUCY0UCXzIEAmNBCQC8AgMFAmNhBQJjRwUCYlcJAJcKBQkBAUYCBQJjQQUBYQkBAUYCBQJjRgUCYlMJAQFGAgUCY0cFAmJTBQJiWAUCY3oEAmNICAUCY3kCXzEEAmNJCAUCY3kCXzIEAmNKCAUCY3kCXzMEAmNLCQEBRgIIBQJjeQJfNAUBYQQCY0wJAQFGAggFAmN5Al81BQFhBAJjTQMJAGYCBQJjSAAABgkBAmFtAQIHTFAgPD0gMAMJAAACBQJjTQUCY00EAmNOAwkBASEBBQJjbgAABQJjSAQCY08JAGUCBQJjaQUCY0kEAmNQCQBlAgUCY2sFAmNKBAJjUQMDBQJjbwkAAAIFAmNxBQJjcgcJAJQKAgUCY3AAAAMDBQJjbwkAAAIFAmNxBQJjcwcJAJQKAgAABQJjcAkAlAoCBQJjSQUCY0oEAmNSCAUCY1ECXzEEAmNTCAUCY1ECXzIEAmNUCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUQAFAmNLCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUgIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNLCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFVAgUCYkoFAmJHCQECYUoKBQJjUgUCY1MFAmNOBQJjSwUCY2gFAmNMBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjTwUCY1AFA25pbAkAnwoNBQJjSAUCY04FAmNLBQJiVAUCYlYFAmJRBQJiSwUCYlAFAmNUBQJjTwUCY1AFAmNqBQJjbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECY1UBAmNWBAJidwkBAmFFAAQCY1cJAJEDAgUCYncFAXMEAmNYCQCRAwIFAmJ3BQF0BAJiUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJ3BQFxBAJieAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJ3BQF1BAJieQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJ3BQF2BAJjWQkBAmFZAQUCY1cEAmNaCQECYVkBBQJjWAQCYlgDCQAAAggFAmNWCW9yZGVyVHlwZQUDQnV5CQECYm4EBQJieAUCYnkJAGQCBQJjWQgFAmNWBmFtb3VudAUCY1oJAQJibgQFAmJ4BQJieQkAZQIFAmNZCAUCY1YGYW1vdW50BQJjWgQCYlkJAQFGAgUCYlgFAWEDAwMJAQJhQgAGCQAAAgUCYlAFAW4GCQAAAgUCYlAFAW8JAQJhbQECDUFkbWluIGJsb2NrZWQEAmRhCAgFAmNWCWFzc2V0UGFpcgthbW91bnRBc3NldAQCZGIDCQAAAgUCZGEFBHVuaXQCBVdBVkVTCQDYBAEJAQV2YWx1ZQEFAmRhBAJkYwgIBQJjVglhc3NldFBhaXIKcHJpY2VBc3NldAQCZGQDCQAAAgUCZGMFBHVuaXQCBVdBVkVTCQDYBAEJAQV2YWx1ZQEFAmRjAwMJAQIhPQIFAmRiBQJjVwYJAQIhPQIFAmRkBQJjWAkBAmFtAQIJV3IgYXNzZXRzBAJkZQgFAmNWBXByaWNlBAJiTwkAawMFAWEFAmJ5BQJieAQCZGYJAQFJAwUCZGUFAWEFAmJPBAJkZwMJAAACCAUCY1YJb3JkZXJUeXBlBQNCdXkJAGcCBQJiWQUCZGYJAGcCBQJkZgUCYlkGAQJkaAECZGkEAmRqAwkAAAIJAJADAQgFAmRpCHBheW1lbnRzAAEGCQECYW0BAhIxIHBheW1lbnQgZXhwZWN0ZWQDCQAAAgUCZGoFAmRqBAJkawkBBXZhbHVlAQkAkQMCCAUCZGkIcGF5bWVudHMAAAQCYkgJAQV2YWx1ZQEIBQJkawdhc3NldElkBAJjcAgFAmRrBmFtb3VudAQCY3kJAQJiRgQJANgEAQgFAmRpDXRyYW5zYWN0aW9uSWQJANgEAQUCYkgFAmNwCAUCZGkGY2FsbGVyBAJjZAgFAmN5Al8xBAJjZQgFAmN5Al8yBAJiUAkBDXBhcnNlSW50VmFsdWUBCAUCY3kCXzkEAmNmCAUCY3kDXzEwAwMJAQJhQgAGCQAAAgUCYlAFAW8JAQJhbQEJAKwCAgIPQWRtaW4gYmxvY2tlZDogCQCkAwEFAmJQCQCXCgUFAmNkBQJjZQUCY3AFAmJIBQJjZgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECZGwJAmRtAVcCZG4CZG8CYmcCY24CY28CY3ACY3EEAmN5CQECY2cMBQFXBQJiZwgJAQV2YWx1ZQEFAmRuBmFtb3VudAgJAQV2YWx1ZQEFAmRuB2Fzc2V0SWQICQEFdmFsdWUBBQJkbwZhbW91bnQICQEFdmFsdWUBBQJkbwdhc3NldElkBQJkbQcFAmNuBQJjbwUCY3AFAmNxBAJiUAkBDXBhcnNlSW50VmFsdWUBCAUCY3kCXzgDAwMJAQJhQgAGCQAAAgUCYlAFAW0GCQAAAgUCYlAFAW8JAQJhbQEJAKwCAgIIQmxvY2tlZDoJAKQDAQUCYlAFAmN5AQJkcAECZHEEAmRyCQBrAwUCZHEFAmFkBQFkCQCUCgIJAGUCBQJkcQUCZHIFAmRyAQJkcwAEAmF0CQCiCAEJAQFPAAMJAAECBQJhdAIGU3RyaW5nBAJkdAUCYXQJANkEAQUCZHQDCQABAgUCYXQCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECZHUABAJhdAkAoggBCQEBUAADCQABAgUCYXQCBlN0cmluZwQCZHQFAmF0CQDZBAEFAmR0AwkAAQIFAmF0AgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAAmR2CQECYW0BAhFQZXJtaXNzaW9uIGRlbmllZAECZHcBAmRpBAJhdAkBAmRzAAMJAAECBQJhdAIKQnl0ZVZlY3RvcgQCZHgFAmF0AwkAAAIIBQJkaQ9jYWxsZXJQdWJsaWNLZXkFAmR4BgUCZHYDCQABAgUCYXQCBFVuaXQDCQAAAggFAmRpBmNhbGxlcgUEdGhpcwYFAmR2CQACAQILTWF0Y2ggZXJyb3IVAmRpAQtjb25zdHJ1Y3RvcgECYXoEAmR5CQECZHcBBQJkaQMJAAACBQJkeQUCZHkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAU4ABQJhegUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRpAQpzZXRNYW5hZ2VyAQJkegQCZHkJAQJkdwEFAmRpAwkAAAIFAmR5BQJkeQQCZEEJANkEAQUCZHoDCQAAAgUCZEEFAmRBCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFQAAUCZHoFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkaQEOY29uZmlybU1hbmFnZXIABAJkQgkBAmR1AAQCZEMDCQEJaXNEZWZpbmVkAQUCZEIGCQECYW0BAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUCZEMFAmRDBAJkRAMJAAACCAUCZGkPY2FsbGVyUHVibGljS2V5CQEFdmFsdWUBBQJkQgYJAQJhbQECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJkRAUCZEQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAU8ACQDYBAEJAQV2YWx1ZQEFAmRCCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFQAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRpAQNwdXQCAmJnAmRFBAJkRgkBAmFJAAQCZEcJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmRGBQF5AhZXcm9uZyBzdGFraW5nIGNvbnRyYWN0BAJkSAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCZEYFAXoCF1dyb2duIHNsaXBwYWdlIGNvbnRyYWN0BAJkSQMJAGcCBQJiZwAABgkBAmFtAQIOd3Jvbmcgc2xpcHBhZ2UDCQAAAgUCZEkFAmRJBAJkSgMJAAACCQCQAwEIBQJkaQhwYXltZW50cwACBgkBAmFtAQITMiBwYXltZW50cyBleHBlY3RlZAMJAAACBQJkSgUCZEoEAmRLCQECZGwJCQClCAEIBQJkaQZjYWxsZXIJANgEAQgFAmRpDXRyYW5zYWN0aW9uSWQJAQ9BdHRhY2hlZFBheW1lbnQCCAkBBXZhbHVlAQkAkQMCCAUCZGkIcGF5bWVudHMAAAdhc3NldElkCAkBBXZhbHVlAQkAkQMCCAUCZGkIcGF5bWVudHMAAAZhbW91bnQJAJEDAggFAmRpCHBheW1lbnRzAAEFAmJnBgcAAAIABAJjTggFAmRLAl8yBAJiSwgFAmRLAl83BAJjZggFAmRLAl85BAJjTwgFAmRLA18xMAQCY1AIBQJkSwNfMTEEAmJMCAUCZEsDXzEyBAJiTQgFAmRLA18xMwQCY3kJAPwHBAUCYXoCBGVtaXQJAMwIAgUCY04FA25pbAUDbmlsAwkAAAIFAmN5BQJjeQQCZEwEAmF0BQJjeQMJAAECBQJhdAIHQWRkcmVzcwQCZE0FAmF0CQD8BwQFAmRNAgRlbWl0CQDMCAIFAmNOBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkTAUCZEwEAmROAwkAZgIFAmNPAAAJAPwHBAUCZEgCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiTAUCY08FA25pbAUDbmlsAwkAAAIFAmROBQJkTgQCZE8DCQBmAgUCY1AAAAkA/AcEBQJkSAIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJNBQJjUAUDbmlsBQNuaWwDCQAAAgUCZE8FAmRPBAJkUAMFAmRFBAJkUQkA/AcEBQJkRwIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYksFAmNOBQNuaWwDCQAAAgUCZFEFAmRRBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmRpBmNhbGxlcgUCY04FAmJLBQNuaWwJAM4IAgUCY2YFAmRQCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRpAQlwdXRPbmVUa24FAmRSAmRTAmJmAmJnAmRFBAJidwkBAmFJAAQCZEcJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmJ3BQF5AhZXcm9uZyBzdGFraW5nIGNvbnRyYWN0BAJkSAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCYncFAXoCF1dyb25nIHNsaXBwYWdlIGNvbnRyYWN0BAJkVAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCYncFAUECGVdyb25nIGd3eCByZXdhcmQgY29udHJhY3QEAmRVCQECYUUABAJiTAkAkQMCBQJkVQUBcwQCYk0JAJEDAgUCZFUFAXQEAmJOCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZFUFAXUEAmJPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZFUFAXYEAmRWCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQJhYgACAAQCYkoDCQAAAgUCZFYJAKUIAQgFAmRpBmNhbGxlcggFAmRpDG9yaWdpbkNhbGxlcggFAmRpBmNhbGxlcgMDAwMJAGcCAAAFAmJnBgkAZwIAAAUCZFIGCQBnAgAABQJkUwYJAGcCAAAFAmJmCQECYW0BAgxXcm9uZyBwYXJhbXMDCQECIT0CCQCQAwEIBQJkaQhwYXltZW50cwABCQECYW0BAhIxIHBheW1lbnQgZXhwZWN0ZWQEAmRrCQEFdmFsdWUBCQCRAwIIBQJkaQhwYXltZW50cwAABAJiSAkA2AQBCQEFdmFsdWUBCAUCZGsHYXNzZXRJZAQCZFcIBQJkawZhbW91bnQEAmRYCQECZHABBQJkVwQCY3AIBQJkWAJfMQQCZFkIBQJkWAJfMgMDAwkAZgIFAmRSBQJjcAYJAGYCBQJkUwUCY3AGCQBmAgCAreIEBQJjcAkBAmFtAQIUd3JvbmcgcGF5bWVudCBhbW91bnQEAmJUCQECYVkBBQJiTAQCYlYJAQJhWQEFAmJNBAJkWgMJAAACBQJiSAUCYkwJAJgKBgkAZQIFAmJUBQJjcAUCYlYJAGUCBQJjcAUCZFIFAmRTAAAAAAMJAAACBQJiSAUCYk0JAJgKBgUCYlQJAGUCBQJiVgUCY3AAAAAACQBlAgUCY3AFAmRTBQJkUgkBAmFtAQIUd3JvbmcgcGF5bWVudEFzc2V0SWQEAmVhCAUCZFoCXzEEAmViCAUCZFoCXzIEAmVjCAUCZFoCXzMEAmVkCAUCZFoCXzQEAmVlCAUCZFoCXzUEAmVmCAUCZFoCXzYEAmJsCQD8BwQFAmRUAgVjYWxjRAkAzAgCCQCkAwEFAmVhCQDMCAIJAKQDAQUCZWIJAMwIAgUCYUEJAMwIAgUBaAkAzAgCBQFpBQNuaWwFA25pbAQCYmsJAPwHBAUCZFQCBWNhbGNECQDMCAIJAKYDAQkAtgIBCQBlAgkAZAIFAmVhBQJlYwUCZWYJAMwIAgkApgMBCQC2AgEJAGUCCQBkAgUCZWIFAmVlBQJlZAkAzAgCBQJhQQkAzAgCBQFoCQDMCAIFAWkFA25pbAUDbmlsBAJlZwkBAmJqAwkApwMBCQECYXMBBQJiawkApwMBCQECYXMBBQJibAUBZwMJAAACBQJlZwUCZWcEAmRLCQECZGwJCQClCAEIBQJkaQZjYWxsZXIJANgEAQgFAmRpDXRyYW5zYWN0aW9uSWQJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFAmJMBQJkUgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUCYk0FAmRTBQJiZwYGBQJjcAUCYkgEAmJlCAUCZEsCXzIEAmJLCAUCZEsCXzcEAmNmCAUCZEsCXzkEAmNPCAUCZEsDXzEwBAJjUAgFAmRLA18xMQQCZWgJAQJiZAMJALYCAQUCYmUJALYCAQUCYmYJALYCAQUCYmcEAmNOCQCgAwEIBQJlaAJfMgQCZWkJAPwHBAUCYXoCBGVtaXQJAMwIAgUCY04FA25pbAUDbmlsAwkAAAIFAmVpBQJlaQQCZEwEAmF0BQJlaQMJAAECBQJhdAIHQWRkcmVzcwQCZE0FAmF0CQD8BwQFAmRNAgRlbWl0CQDMCAIFAmNOBQNuaWwFA25pbAUEdW5pdAMJAAACBQJkTAUCZEwEAmROAwkAZgIFAmNPAAAJAPwHBAUCZEgCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFAmJMBQJjTwUDbmlsBQNuaWwDCQAAAgUCZE4FAmROBAJkTwMJAGYCBQJjUAAACQD8BwQFAmRIAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQJiTQUCY1AFA25pbAUDbmlsAwkAAAIFAmRPBQJkTwQCZFADBQJkRQQCZFEJAPwHBAUCZEcCBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJLBQJjTgUDbmlsAwkAAAIFAmRRBQJkUQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJkaQZjYWxsZXIFAmNOBQJiSwUDbmlsBAJlagMJAGYCBQJkWQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFEBQJkWQkA2QQBBQJiSAUDbmlsBQNuaWwJAM4IAgkAzggCBQJjZgUCZFAFAmVqCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRpAQpwdXRGb3JGcmVlAQJlawMJAGYCAAAFAmVrCQECYW0BAg53cm9uZyBzbGlwcGFnZQMJAQIhPQIJAJADAQgFAmRpCHBheW1lbnRzAAIJAQJhbQECEzIgcGF5bWVudHMgZXhwZWN0ZWQEAmRLCQECZGwJCQClCAEIBQJkaQZjYWxsZXIJANgEAQgFAmRpDXRyYW5zYWN0aW9uSWQJAQ9BdHRhY2hlZFBheW1lbnQCCAkBBXZhbHVlAQkAkQMCCAUCZGkIcGF5bWVudHMAAAdhc3NldElkCAkBBXZhbHVlAQkAkQMCCAUCZGkIcGF5bWVudHMAAAZhbW91bnQJAJEDAggFAmRpCHBheW1lbnRzAAEFAmVrBwcAAAIACAUCZEsCXzkCZGkBA2dldAAEAmN5CQECZGgBBQJkaQQCZWwIBQJjeQJfMQQCY2UIBQJjeQJfMgQCY3AIBQJjeQJfMwQCYkgIBQJjeQJfNAQCY2YIBQJjeQJfNQQCZW0JAPwHBAUCYXoCBGJ1cm4JAMwIAgUCY3AFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYkgFAmNwBQNuaWwDCQAAAgUCZW0FAmVtBQJjZgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkaQEJZ2V0T25lVGtuBQJlbgJlbwJlcAJlcQJiZwMJAQIhPQIJAJADAQgFAmRpCHBheW1lbnRzAAEJAQJhbQECEjEgcGF5bWVudCBleHBlY3RlZAQCYncJAQJhRQAEAmJLCQCRAwIFAmJ3BQFyBAJiTAkAkQMCBQJidwUBcwQCYk0JAJEDAgUCYncFAXQEAmJOCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYncFAXUEAmJPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYncFAXYEAmJQCQCRAwIFAmJ3BQFxBAJkRgkBAmFJAAQCZFQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmRGBQFBAh9Xcm9uZyBnd3hSZXdhcmRDb250cmFjdCBhZGRyZXNzBAJkawkBBXZhbHVlAQkAkQMCCAUCZGkIcGF5bWVudHMAAAQCZFYJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBAmFiAAIABAJiSgMJAAACBQJkVgkApQgBCAUCZGkGY2FsbGVyCAUCZGkMb3JpZ2luQ2FsbGVyCAUCZGkGY2FsbGVyBAJiRwkA2AQBCAUCZGkNdHJhbnNhY3Rpb25JZAQCYkgJAQV2YWx1ZQEIBQJkawdhc3NldElkBAJjcAgFAmRrBmFtb3VudAMJAGYCAICU69wDBQJjcAkBAmFtAQIRTWluIHBheW1lbnQgMTAgTFADAwMJAGYCAAAFAmJnBgkAZgIAAAUCZW4GCQBmAgAABQJlcAkBAmFtAQIMV3JvbmcgcGFyYW1zAwkBAiE9AgUCYksJANgEAQUCYkgJAQJhbQECCFdyb25nIExQBAJjeQkBAmJGBAkA2AQBCAUCZGkNdHJhbnNhY3Rpb25JZAkA2AQBBQJiSAUCY3AIBQJkaQZjYWxsZXIEAmVyCAUCY3kCXzEEAmVzCAUCY3kCXzIEAmJUCQECYVkBBQJiTAQCYlYJAQJhWQEFAmJNBAJldAMJAAACBQJlcQUCYkwJAJkKBwkAZQIFAmJUBQJlcgkAZQIFAmJWBQJlcwUCZW4FAmVzAAAAAAkAZAIFAmVyBQJlbgMJAAACBQJlcQUCYk0JAJkKBwkAZQIFAmJUBQJlcgkAZQIFAmJWBQJlcwAAAAAFAmVuBQJlcgkAZAIFAmVzBQJlbgkBAmFtAQIQd3Jvbmcgb3V0QXNzZXRJZAQCZWEIBQJldAJfMQQCZWIIBQJldAJfMgQCZWMIBQJldAJfMwQCZWQIBQJldAJfNAQCZWUIBQJldAJfNQQCZWYIBQJldAJfNgQCZXUIBQJldAJfNwMDCQBmAgAABQJlYwYJAGYCAAAFAmVlCQECYW0BAgpXcm9uZyBjYWxjBAJibAkA/AcEBQJkVAIFY2FsY0QJAMwIAgkApAMBBQJlYQkAzAgCCQCkAwEFAmViCQDMCAIFAmFBCQDMCAIFAWgJAMwIAgUBaQUDbmlsBQNuaWwEAmJrCQD8BwQFAmRUAgVjYWxjRAkAzAgCCQCkAwEJAGQCCQBlAgUCZWEFAmVjBQJlZgkAzAgCCQCkAwEJAGUCCQBkAgUCZWIFAmVkBQJlZQkAzAgCBQJhQQkAzAgCBQFoCQDMCAIFAWkFA25pbAUDbmlsBAJlZwkBAmJqAwkApwMBCQECYXMBBQJiawkApwMBCQECYXMBBQJibAUBZwMJAAACBQJlZwUCZWcEAmV2CQECYmQDCQC2AgEFAmV1CQC2AgEFAmVwCQC2AgEFAmJnAwkAAAIFAmV2BQJldgQCZXcDCQAAAgUCZXEFAmJMCQCUCgIJAKADAQgFAmV2Al8yAAAJAJQKAgAACQCgAwEIBQJldgJfMgQCZXgIBQJldwJfMQQCZXkIBQJldwJfMgQCZXoJAGQCBQJleAUCZXkEAmVBCQECZHABBQJlegQCZUIIBQJlQQJfMQQCZFkIBQJlQQJfMgQCZUMDCQAAAgUCZXECBVdBVkVTBQR1bml0CQDZBAEFAmVxBAJlagMJAGYCBQJkWQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFEBQJkWQUCZUMFA25pbAUDbmlsBAJiUwMJAGcCBQJiTgUCYk8FAmJOBQJiTwMJAAACBQJiUwUCYlMEAmVECQECYmECCQEBQwIFAmJWBQJiUwkBAUMCBQJiVAUCYlMEAmVFCQEBRgIFAmVEBQFhBAJjZgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJiSgUCZUIFAmVDCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFYAgkApQgBBQJiSgUCYkcJAQJhVQYFAmV4BQJleQUCY3AFAmVFBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUQAFAmVFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUgIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVFBQNuaWwDCQAAAgUCY2YFAmNmBAJlRgkA/AcEBQJhegIEYnVybgkAzAgCBQJjcAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiSAUCY3AFA25pbAMJAAACBQJlRgUCZUYJAM4IAgUCY2YFAmVqCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRpAQlnZXROb0xlc3MCAmVHAmVIBAJjeQkBAmRoAQUCZGkEAmNkCAUCY3kCXzEEAmNlCAUCY3kCXzIEAmNwCAUCY3kCXzMEAmJICAUCY3kCXzQEAmNmCAUCY3kCXzUEAmVJAwkAZwIFAmNkBQJlRwYJAQJhbQEJAKwCAgkArAICCQCsAgICCUZhaWxlZDogIAkApAMBBQJjZAIDIDwgCQCkAwEFAmVHAwkAAAIFAmVJBQJlSQQCZUoDCQBnAgUCY2UFAmVIBgkBAmFtAQkArAICCQCsAgIJAKwCAgIIRmFpbGVkOiAJAKQDAQUCY2UCAyA8IAkApAMBBQJlSAMJAAACBQJlSgUCZUoEAmVLCQD8BwQFAmF6AgRidXJuCQDMCAIFAmNwBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJIBQJjcAUDbmlsAwkAAAIFAmVLBQJlSwUCY2YJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZGkBDXVuc3Rha2VBbmRHZXQBAmRxBAJkagMJAQIhPQIJAJADAQgFAmRpCHBheW1lbnRzAAAJAQJhbQECFG5vIHBheW1lbnRzIGV4cGVjdGVkBgMJAAACBQJkagUCZGoEAmJ3CQECYUUABAJlTAkBAmFJAAQCYksJANkEAQkAkQMCBQJidwUBcgQCZU0JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmVMBQF5AgV3cm9uZwQCZU4JAPwHBAUCZU0CB3Vuc3Rha2UJAMwIAgkA2AQBBQJiSwkAzAgCBQJkcQUDbmlsBQNuaWwDCQAAAgUCZU4FAmVOBAJjeQkBAmJGBAkA2AQBCAUCZGkNdHJhbnNhY3Rpb25JZAkA2AQBBQJiSwUCZHEIBQJkaQZjYWxsZXIEAmJQCQENcGFyc2VJbnRWYWx1ZQEIBQJjeQJfOQQCY2YIBQJjeQNfMTAEAmVPAwMJAQJhQgAGCQAAAgUCYlAFAW8JAQJhbQEJAKwCAgIJQmxvY2tlZDogCQCkAwEFAmJQBgMJAAACBQJlTwUCZU8EAmVQCQD8BwQFAmF6AgRidXJuCQDMCAIFAmRxBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJLBQJkcQUDbmlsAwkAAAIFAmVQBQJlUAUCY2YJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZGkBCGFjdGl2YXRlAgJlUQJlUgMJAQIhPQIJAKUIAQgFAmRpBmNhbGxlcgkApQgBBQJhegkBAmFtAQIGZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVkABQJlUQkAzAgCCQELU3RyaW5nRW50cnkCCQEBWgAFAmVSBQNuaWwCB3N1Y2Nlc3MCZGkBBHNldFMCAmVTAmVPAwkBAiE9AgkApQgBCAUCZGkGY2FsbGVyCQECYXYCBQR0aGlzCQECYWIABQJkdgkAzAgCCQELU3RyaW5nRW50cnkCBQJlUwUCZU8FA25pbAJkaQEEc2V0SQICZVMCZU8DCQECIT0CCQClCAEIBQJkaQZjYWxsZXIJAQJhdgIFBHRoaXMJAQJhYgAFAmR2CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJlUwUCZU8FA25pbAJkaQEcZ2V0UG9vbENvbmZpZ1dyYXBwZXJSRUFET05MWQAJAJQKAgUDbmlsCQECYUUAAmRpARxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZAQJhWgkAlAoCBQNuaWwJAQJhWQEFAmFaAmRpARljYWxjUHJpY2VzV3JhcHBlclJFQURPTkxZAwJicQJicgJidgQCZVQJAQJidQMFAmJxBQJicgUCYnYJAJQKAgUDbmlsCQDMCAIJAKYDAQkAkQMCBQJlVAAACQDMCAIJAKYDAQkAkQMCBQJlVAABCQDMCAIJAKYDAQkAkQMCBQJlVAACBQNuaWwCZGkBFmZyb21YMThXcmFwcGVyUkVBRE9OTFkCAUcCZVUJAJQKAgUDbmlsCQEBRgIJAKcDAQUBRwUCZVUCZGkBFHRvWDE4V3JhcHBlclJFQURPTkxZAgFEAUUJAJQKAgUDbmlsCQCmAwEJAQFDAgUBRAUBRQJkaQEeY2FsY1ByaWNlQmlnSW50V3JhcHBlclJFQURPTkxZAgJiYgJiYwkAlAoCBQNuaWwJAKYDAQkBAmJhAgkApwMBBQJiYgkApwMBBQJiYwJkaQEjZXN0aW1hdGVQdXRPcGVyYXRpb25XcmFwcGVyUkVBRE9OTFkJAmJHAmJnAmNpAmVWAmNrAmVXAmVYAmNtAmNuCQCUCgIFA25pbAkBAmNnDAUCYkcFAmJnBQJjaQUCZVYFAmNrBQJlVwUCZVgFAmNtBQJjbgcAAAIAAmRpASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQCYkcCZVkCYkkCZVgEAmN5CQECYkYEBQJiRwUCZVkFAmJJCQERQGV4dHJOYXRpdmUoMTA2MikBBQJlWAkAlAoCBQNuaWwJAJwKCggFAmN5Al8xCAUCY3kCXzIIBQJjeQJfMwgFAmN5Al80CAUCY3kCXzUIBQJjeQJfNggFAmN5Al83CQCmAwEIBQJjeQJfOAgFAmN5Al85CAUCY3kDXzEwAQJlWgECZmEABAJhdAUCZVoDCQABAgUCYXQCBU9yZGVyBAJjVgUCYXQEAmZiCQECYUMABAJhcAkBAmNVAQUCY1YEAmZjCQD0AwMIBQJjVglib2R5Qnl0ZXMJAJEDAggFAmNWBnByb29mcwAACAUCY1YPc2VuZGVyUHVibGljS2V5BAJmZAkA9AMDCAUCY1YJYm9keUJ5dGVzCQCRAwIIBQJjVgZwcm9vZnMAAQUCZmIDAwMFAmFwBQJmYwcFAmZkBwYJAQJhbwMFAmFwBQJmYwUCZmQEAmZlBAJmZgkBAmRzAAMJAAECBQJmZgIKQnl0ZVZlY3RvcgQCZHgFAmZmBQJkeAMJAAECBQJmZgIEVW5pdAgFAmVaD3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yCQD0AwMIBQJlWglib2R5Qnl0ZXMJAJEDAggFAmVaBnByb29mcwAABQJmZd18zmc=",
    "chainId": 84,
    "height": 2185659,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: GnLbgHxUtdYbZ6fXnrR9fJy7CwyFkiGw9eNpp7oS75Dv
Next: E9UKfZ1BvAZ9E5bFRbs1oEn96SR5GHKWxjpEGyN7LfYL

Diff: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = 100000000
7
7
 
8
8
 
let c = toBigInt(1000000000000000000)
9
9
 
10
-
let d = toBigInt(0)
10
+
let d = 1000
11
11
 
12
-
let e = toBigInt(1)
12
+
let e = toBigInt(0)
13
13
 
14
-
let f = toBigInt((a - ((a * 1) / a)))
14
+
let f = toBigInt(1)
15
15
 
16
-
let g = "100"
16
+
let g = toBigInt((a - ((a * 1) / a)))
17
17
 
18
-
let h = "1"
18
+
let h = "100"
19
19
 
20
-
let i = "__"
20
+
let i = "1"
21
21
 
22
-
let j = ""
22
+
let j = "__"
23
23
 
24
-
let k = 1
24
+
let k = ""
25
25
 
26
-
let l = 2
26
+
let l = 1
27
27
 
28
-
let m = 3
28
+
let m = 2
29
29
 
30
-
let n = 4
30
+
let n = 3
31
31
 
32
-
let o = 1
32
+
let o = 4
33
33
 
34
-
let p = 2
34
+
let p = 1
35
35
 
36
-
let q = 3
36
+
let q = 2
37
37
 
38
-
let r = 4
38
+
let r = 3
39
39
 
40
-
let s = 5
40
+
let s = 4
41
41
 
42
-
let t = 6
42
+
let t = 5
43
43
 
44
-
let u = 7
44
+
let u = 6
45
45
 
46
-
let v = 8
46
+
let v = 7
47
47
 
48
-
let w = 9
48
+
let w = 8
49
49
 
50
-
let x = 1
50
+
let x = 9
51
51
 
52
-
let y = 7
52
+
let y = 1
53
53
 
54
-
let z = 10
54
+
let z = 7
55
55
 
56
-
let A = "%s__delay"
56
+
let A = 10
57
57
 
58
-
func B (C,D) = fraction(toBigInt(C), c, toBigInt(D))
58
+
let B = 0
59
+
60
+
func C (D,E) = fraction(toBigInt(D), c, toBigInt(E))
59
61
 
60
62
 
61
-
func E (F,G) = toInt(fraction(F, toBigInt(G), c))
63
+
func F (G,H) = toInt(fraction(G, toBigInt(H), c))
62
64
 
63
65
 
64
-
func H (I,J,K) = fraction(I, J, K)
66
+
func I (J,K,L) = fraction(J, K, L)
65
67
 
66
68
 
67
-
func L (F) = if ((d > F))
68
-
    then -(F)
69
-
    else F
69
+
func M (G) = if ((e > G))
70
+
    then -(G)
71
+
    else G
70
72
 
71
73
 
72
-
func M () = "%s__factoryContract"
74
+
func N () = "%s__factoryContract"
73
75
 
74
76
 
75
-
func N () = "%s__managerPublicKey"
77
+
func O () = "%s__managerPublicKey"
76
78
 
77
79
 
78
-
func O () = "%s__pendingManagerPublicKey"
80
+
func P () = "%s__pendingManagerPublicKey"
79
81
 
80
82
 
81
-
func P () = "%s%s__price__last"
83
+
func Q () = "%s%s__price__last"
82
84
 
83
85
 
84
-
func Q (R,S) = makeString(["%s%s%d%d__price__history", toString(R), toString(S)], i)
86
+
func R (S,T) = makeString(["%s%s%d%d__price__history", toString(S), toString(T)], j)
85
87
 
86
88
 
87
-
func T (U,V) = ((("%s%s%s__P__" + U) + "__") + V)
89
+
func U (V,W) = ((("%s%s%s__P__" + V) + "__") + W)
88
90
 
89
91
 
90
-
func W (U,V) = ((("%s%s%s__G__" + U) + "__") + V)
92
+
func X (V,W) = ((("%s%s%s__G__" + V) + "__") + W)
91
93
 
92
94
 
93
-
func X () = "%s__amountAsset"
95
+
func Y () = "%s__amountAsset"
94
96
 
95
97
 
96
-
func Y () = "%s__priceAsset"
98
+
func Z () = "%s__priceAsset"
97
99
 
98
100
 
99
-
func Z () = "%s__amp"
101
+
func aa () = "%s__amp"
100
102
 
101
103
 
102
-
func aa () = "%s__addonAddr"
104
+
func ab () = "%s__addonAddr"
103
105
 
104
106
 
105
-
func ab (ac) = makeString(["%s%s__lastGetOneTknCall", ac], i)
107
+
let ac = "%s__feePermille"
106
108
 
107
-
108
-
func ad (ac) = makeString(["%s%s__lastPutOneTknCall", ac], i)
109
-
109
+
let ad = valueOrElse(getInteger(this, ac), B)
110
110
 
111
111
 
func ae () = "%s__factoryConfig"
112
112
 
123
123
 
func al () = "%s__shutdown"
124
124
 
125
125
 
126
-
func am (an,ao,ap) = throw(((((("Failed: ordValid=" + toString(an)) + " sndrValid=") + toString(ao)) + " mtchrValid=") + toString(ap)))
126
+
func am (an) = throw(makeString(["lp_stable.ride:", an], " "))
127
127
 
128
128
 
129
-
func aq (F) = {
130
-
    let ar = F
131
-
    if ($isInstanceOf(ar, "String"))
129
+
func ao (ap,aq,ar) = am(((((("Failed: ordValid=" + toString(ap)) + " sndrValid=") + toString(aq)) + " mtchrValid=") + toString(ar)))
130
+
131
+
132
+
func as (G) = {
133
+
    let at = G
134
+
    if ($isInstanceOf(at, "String"))
132
135
 
        then {
133
-
            let as = ar
134
-
            as
136
+
            let au = at
137
+
            au
135
138
 
            }
136
-
        else throw("fail cast to String")
139
+
        else am("fail cast to String")
137
140
 
    }
138
141
 
139
142
 
140
-
func at (au,av) = valueOrErrorMessage(getString(au, av), makeString(["mandatory ", toString(au), ".", av, " not defined"], ""))
143
+
func av (aw,ax) = valueOrErrorMessage(getString(aw, ax), makeString(["mandatory ", toString(aw), ".", ax, " not defined"], ""))
141
144
 
142
145
 
143
-
func aw (au,av) = valueOrErrorMessage(getInteger(au, av), makeString(["mandatory ", toString(au), ".", av, " not defined"], ""))
146
+
func ay (aw,ax) = valueOrErrorMessage(getInteger(aw, ax), makeString(["mandatory ", toString(aw), ".", ax, " not defined"], ""))
144
147
 
145
148
 
146
-
let ax = addressFromStringValue(at(this, M()))
149
+
let az = addressFromStringValue(av(this, N()))
147
150
 
148
-
let ay = at(this, Z())
151
+
let aA = av(this, aa())
149
152
 
150
-
func az () = valueOrElse(getBoolean(ax, al()), false)
153
+
func aB () = valueOrElse(getBoolean(az, al()), false)
151
154
 
152
155
 
153
-
func aA () = fromBase58String(at(ax, af()))
156
+
func aC () = fromBase58String(av(az, af()))
154
157
 
155
158
 
156
-
func aB () = {
157
-
    let aC = at(this, X())
158
-
    let aD = at(this, Y())
159
-
    let aE = aw(ax, aj(aD))
160
-
    let ah = aw(ax, aj(aC))
161
-
    split(at(ax, ag(toString(ah), toString(aE))), i)
159
+
let aD = addressFromPublicKey(aC())
160
+
161
+
func aE () = {
162
+
    let aF = av(this, Y())
163
+
    let aG = av(this, Z())
164
+
    let aH = ay(az, aj(aG))
165
+
    let ah = ay(az, aj(aF))
166
+
    split(av(az, ag(toString(ah), toString(aH))), j)
162
167
 
    }
163
168
 
164
169
 
165
-
func aF () = split(at(ax, ae()), i)
170
+
func aI () = split(av(az, ae()), j)
166
171
 
167
172
 
168
-
func aG (aH,aI,aJ,aK,aL,aM,aN,aO,aP,aQ) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(aH), toString(aI), toString(aJ), toString(aK), toString(aL), toString(aM), toString(aN), toString(aO), toString(aP), toString(aQ)], i)
173
+
func aJ (aK,aL,aM,aN,aO,aP,aQ,aR,aS,aT) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(aK), toString(aL), toString(aM), toString(aN), toString(aO), toString(aP), toString(aQ), toString(aR), toString(aS), toString(aT)], j)
169
174
 
170
175
 
171
-
func aR (aS,aT,aU,aK,aN,aO) = makeString(["%d%d%d%d%d%d", toString(aS), toString(aT), toString(aU), toString(aK), toString(aN), toString(aO)], i)
176
+
func aU (aV,aW,aX,aN,aQ,aR) = makeString(["%d%d%d%d%d%d", toString(aV), toString(aW), toString(aX), toString(aN), toString(aQ), toString(aR)], j)
172
177
 
173
178
 
174
-
func aV (aW) = if ((aW == "WAVES"))
179
+
func aY (aZ) = if ((aZ == "WAVES"))
175
180
 
    then wavesBalance(this).available
176
-
    else assetBalance(this, fromBase58String(aW))
181
+
    else assetBalance(this, fromBase58String(aZ))
177
182
 
178
183
 
179
-
func aX (aY,aZ) = fraction(aY, c, aZ)
184
+
func ba (bb,bc) = fraction(bb, c, bc)
180
185
 
181
186
 
182
-
func ba (bb,bc,bd) = {
183
-
    let be = fraction((bb - bc), b, bc)
184
-
    let bf = ((bd - L(be)) > d)
185
-
    if (!(bf))
186
-
        then throw(("Big slpg: " + toString(be)))
187
-
        else $Tuple2(bf, min([bb, bc]))
187
+
func bd (be,bf,bg) = {
188
+
    let bh = fraction((be - bf), b, bf)
189
+
    let bi = ((bg - M(bh)) > e)
190
+
    if (!(bi))
191
+
        then am(("Big slippage: " + toString(bh)))
192
+
        else $Tuple2(bi, min([be, bf]))
188
193
 
    }
189
194
 
190
195
 
191
-
func bg (bh,bi,bj) = {
192
-
    let be = fraction(bi, b, bh)
193
-
    let bk = (bj > be)
194
-
    if (if (bk)
196
+
func bj (bk,bl,bg) = {
197
+
    let bh = fraction(bl, b, bk)
198
+
    let bm = (bg > bh)
199
+
    if (if (bm)
195
200
 
        then true
196
-
        else (bi > bh))
197
-
        then throw(((((((toString(bi) + " ") + toString(bh)) + " ") + toString(be)) + " ") + toString(bj)))
198
-
        else bk
201
+
        else (bl > bk))
202
+
        then am(((((((toString(bl) + " ") + toString(bk)) + " ") + toString(bh)) + " ") + toString(bg)))
203
+
        else bm
199
204
 
    }
200
205
 
201
206
 
202
-
func bl (bm,bn,bo,bp) = {
203
-
    let bq = B(bo, bm)
204
-
    let br = B(bp, bn)
205
-
    aX(br, bq)
207
+
func bn (bo,bp,bq,br) = {
208
+
    let bs = C(bq, bo)
209
+
    let bt = C(br, bp)
210
+
    ba(bt, bs)
206
211
 
    }
207
212
 
208
213
 
209
-
func bs (bo,bp,bt) = {
210
-
    let bu = aB()
211
-
    let bv = parseIntValue(bu[t])
212
-
    let bw = parseIntValue(bu[u])
213
-
    let bx = bl(bv, bw, bo, bp)
214
-
    let aZ = B(bo, bv)
215
-
    let aY = B(bp, bw)
216
-
    let by = B(bt, a)
217
-
    let bz = aX(aZ, by)
218
-
    let bA = aX(aY, by)
219
-
[bx, bz, bA]
214
+
func bu (bq,br,bv) = {
215
+
    let bw = aE()
216
+
    let bx = parseIntValue(bw[u])
217
+
    let by = parseIntValue(bw[v])
218
+
    let bz = bn(bx, by, bq, br)
219
+
    let bc = C(bq, bx)
220
+
    let bb = C(br, by)
221
+
    let bA = C(bv, a)
222
+
    let bB = ba(bc, bA)
223
+
    let bC = ba(bb, bA)
224
+
[bz, bB, bC]
220
225
 
    }
221
226
 
222
227
 
223
-
func bB (bo,bp,bt) = {
224
-
    let bC = bs(bo, bp, bt)
225
-
[E(bC[0], a), E(bC[1], a), E(bC[2], a)]
228
+
func bD (bq,br,bv) = {
229
+
    let bE = bu(bq, br, bv)
230
+
[F(bE[0], a), F(bE[1], a), F(bE[2], a)]
226
231
 
    }
227
232
 
228
233
 
229
-
func bD (bE,bF,bG,bH) = {
230
-
    let bu = aB()
231
-
    let bI = bu[q]
232
-
    let bJ = bu[r]
233
-
    let bK = bu[s]
234
-
    let bL = parseIntValue(bu[t])
235
-
    let bM = parseIntValue(bu[u])
236
-
    let bN = bu[p]
237
-
    let bO = valueOrErrorMessage(assetInfo(fromBase58String(bI)), "Wrong LP id").quantity
238
-
    if ((bI != bF))
239
-
        then throw("Wrong pmt asset")
240
-
        else {
241
-
            let bP = aV(bJ)
242
-
            let bQ = B(bP, bL)
243
-
            let bR = aV(bK)
244
-
            let bS = B(bR, bM)
245
-
            let bT = aX(bS, bQ)
246
-
            let bU = E(bT, a)
247
-
            let bV = B(bG, a)
248
-
            let bW = B(bO, a)
249
-
            let bX = fraction(bQ, bV, bW)
250
-
            let bY = fraction(bS, bV, bW)
251
-
            let bZ = E(bX, bL)
252
-
            let ca = E(bY, bM)
253
-
            let cb = if ((bE == ""))
254
-
                then nil
255
-
                else [ScriptTransfer(bH, bZ, if ((bJ == "WAVES"))
256
-
                    then unit
257
-
                    else fromBase58String(bJ)), ScriptTransfer(bH, ca, if ((bK == "WAVES"))
258
-
                    then unit
259
-
                    else fromBase58String(bK)), StringEntry(W(toString(bH), bE), aR(bZ, ca, bG, bU, height, lastBlock.timestamp)), IntegerEntry(P(), bU), IntegerEntry(Q(height, lastBlock.timestamp), bU)]
260
-
            $Tuple10(bZ, ca, bJ, bK, bP, bR, bO, bT, bN, cb)
234
+
func bF (bG,bH,bI,bJ) = {
235
+
    let bw = aE()
236
+
    let bK = bw[r]
237
+
    let bL = bw[s]
238
+
    let bM = bw[t]
239
+
    let bN = parseIntValue(bw[u])
240
+
    let bO = parseIntValue(bw[v])
241
+
    let bP = bw[q]
242
+
    let bQ = valueOrErrorMessage(assetInfo(fromBase58String(bK)), "Wrong LP id").quantity
243
+
    let bR = if ((bK == bH))
244
+
        then true
245
+
        else am("Wrong payment asset")
246
+
    if ((bR == bR))
247
+
        then {
248
+
            let bS = if ((bN >= bO))
249
+
                then bN
250
+
                else bO
251
+
            if ((bS == bS))
252
+
                then {
253
+
                    let bT = aY(bL)
254
+
                    let bU = C(bT, bS)
255
+
                    let bV = aY(bM)
256
+
                    let bW = C(bV, bS)
257
+
                    let bX = ba(bW, bU)
258
+
                    let bY = F(bX, a)
259
+
                    let bZ = C(bI, a)
260
+
                    let ca = C(bQ, a)
261
+
                    let cb = fraction(bU, bZ, ca)
262
+
                    let cc = fraction(bW, bZ, ca)
263
+
                    let cd = F(cb, bS)
264
+
                    let ce = F(cc, bS)
265
+
                    let cf = if ((bG == ""))
266
+
                        then nil
267
+
                        else [ScriptTransfer(bJ, cd, if ((bL == "WAVES"))
268
+
                            then unit
269
+
                            else fromBase58String(bL)), ScriptTransfer(bJ, ce, if ((bM == "WAVES"))
270
+
                            then unit
271
+
                            else fromBase58String(bM)), StringEntry(X(toString(bJ), bG), aU(cd, ce, bI, bY, height, lastBlock.timestamp)), IntegerEntry(Q(), bY), IntegerEntry(R(height, lastBlock.timestamp), bY)]
272
+
                    $Tuple10(cd, ce, bL, bM, bT, bV, bQ, bX, bP, cf)
273
+
                    }
274
+
                else throw("Strict value is not equal to itself.")
261
275
 
            }
276
+
        else throw("Strict value is not equal to itself.")
262
277
 
    }
263
278
 
264
279
 
265
-
func cc (bE,bd,cd,ce,cf,cg,bH,ch,ci,cj,ck,cl) = {
266
-
    let bu = aB()
267
-
    let bI = fromBase58String(bu[q])
268
-
    let cm = bu[r]
269
-
    let cn = bu[s]
270
-
    let co = bu[v]
271
-
    let cp = bu[w]
272
-
    let cq = parseIntValue(bu[t])
273
-
    let cr = parseIntValue(bu[u])
274
-
    let bN = bu[p]
275
-
    let cs = valueOrErrorMessage(assetInfo(bI), "Wr lp as").quantity
276
-
    let bP = if (ch)
277
-
        then aV(cm)
278
-
        else if (if (cj)
279
-
            then (cl == cm)
280
+
func cg (bG,ch,ci,cj,ck,cl,bJ,cm,cn,co,cp,cq) = {
281
+
    let bw = aE()
282
+
    let bK = fromBase58String(bw[r])
283
+
    let cr = bw[s]
284
+
    let cs = bw[t]
285
+
    let ct = bw[w]
286
+
    let cu = bw[x]
287
+
    let bN = parseIntValue(bw[u])
288
+
    let bO = parseIntValue(bw[v])
289
+
    let bP = bw[q]
290
+
    let bQ = valueOrErrorMessage(assetInfo(bK), "Wrong lp asset").quantity
291
+
    let bT = if (cm)
292
+
        then aY(cr)
293
+
        else if (if (co)
294
+
            then (cq == cr)
280
295
 
            else false)
281
-
            then (aV(cm) - ck)
282
-
            else if (cj)
283
-
                then aV(cm)
284
-
                else (aV(cm) - cd)
285
-
    let bR = if (ch)
286
-
        then aV(cn)
287
-
        else if (if (cj)
288
-
            then (cl == cn)
296
+
            then (aY(cr) - cp)
297
+
            else if (co)
298
+
                then aY(cr)
299
+
                else (aY(cr) - ci)
300
+
    let bV = if (cm)
301
+
        then aY(cs)
302
+
        else if (if (co)
303
+
            then (cq == cs)
289
304
 
            else false)
290
-
            then (aV(cn) - ck)
291
-
            else if (cj)
292
-
                then aV(cn)
293
-
                else (aV(cn) - cf)
294
-
    let ct = B(cd, cq)
295
-
    let cu = B(cf, cr)
296
-
    let cv = aX(cu, ct)
297
-
    let bQ = B(bP, cq)
298
-
    let bS = B(bR, cr)
299
-
    let cw = if ((cs == 0))
305
+
            then (aY(cs) - cp)
306
+
            else if (co)
307
+
                then aY(cs)
308
+
                else (aY(cs) - ck)
309
+
    let bS = if ((bN >= bO))
310
+
        then bN
311
+
        else bO
312
+
    if ((bS == bS))
300
313
 
        then {
301
-
            let bT = d
302
-
            let cx = d
303
-
            let by = pow((ct * cu), 0, toBigInt(5), 1, 0, DOWN)
304
-
            $Tuple5(E(by, a), E(ct, cq), E(cu, cr), aX((bS + cu), (bQ + ct)), cx)
314
+
            let cv = C(ci, bS)
315
+
            let cw = C(ck, bS)
316
+
            let cx = ba(cw, cv)
317
+
            let bU = C(bT, bS)
318
+
            let bW = C(bV, bS)
319
+
            let cy = if ((bQ == 0))
320
+
                then {
321
+
                    let bX = e
322
+
                    let cz = e
323
+
                    let cA = pow((cv * cw), 0, toBigInt(5), 1, 0, DOWN)
324
+
                    $Tuple5(F(cA, a), F(cv, bS), F(cw, bS), ba((bW + cw), (bU + cv)), cz)
325
+
                    }
326
+
                else {
327
+
                    let bX = ba(bW, bU)
328
+
                    let cB = fraction(M((bX - cx)), c, bX)
329
+
                    let cz = C(ch, a)
330
+
                    if (if ((bX != e))
331
+
                        then (cB > cz)
332
+
                        else false)
333
+
                        then am(((("Price slippage " + toString(cB)) + " > ") + toString(cz)))
334
+
                        else {
335
+
                            let ca = C(bQ, a)
336
+
                            let cC = fraction(cv, bX, c)
337
+
                            let cD = fraction(cw, c, bX)
338
+
                            let cE = if ((cC > cw))
339
+
                                then $Tuple2(cD, cv)
340
+
                                else $Tuple2(cv, cC)
341
+
                            let cF = cE._1
342
+
                            let cG = cE._2
343
+
                            let cA = fraction(ca, cG, bW)
344
+
                            $Tuple5(F(cA, a), F(cF, bS), F(cG, bS), bX, cz)
345
+
                            }
346
+
                    }
347
+
            let cH = cy._1
348
+
            let cI = cy._2
349
+
            let cJ = cy._3
350
+
            let cK = F(cy._4, a)
351
+
            let cL = F(cy._5, a)
352
+
            let cM = if ((cH > 0))
353
+
                then true
354
+
                else am("LP <= 0")
355
+
            if ((cM == cM))
356
+
                then {
357
+
                    let cN = if (!(cn))
358
+
                        then 0
359
+
                        else cH
360
+
                    let cO = (ci - cI)
361
+
                    let cP = (ck - cJ)
362
+
                    let cQ = if (if (co)
363
+
                        then (cq == cr)
364
+
                        else false)
365
+
                        then $Tuple2(cp, 0)
366
+
                        else if (if (co)
367
+
                            then (cq == cs)
368
+
                            else false)
369
+
                            then $Tuple2(0, cp)
370
+
                            else $Tuple2(cI, cJ)
371
+
                    let cR = cQ._1
372
+
                    let cS = cQ._2
373
+
                    let cT = [IntegerEntry(Q(), cK), IntegerEntry(R(height, lastBlock.timestamp), cK), StringEntry(U(bJ, bG), aJ(cR, cS, cN, cK, ch, cL, height, lastBlock.timestamp, cO, cP))]
374
+
                    $Tuple13(cH, cN, cK, bT, bV, bQ, bK, bP, cT, cO, cP, cj, cl)
375
+
                    }
376
+
                else throw("Strict value is not equal to itself.")
305
377
 
            }
306
-
        else {
307
-
            let bT = aX(bS, bQ)
308
-
            let cy = fraction(L((bT - cv)), c, bT)
309
-
            let cx = B(bd, a)
310
-
            if (if ((bT != d))
311
-
                then (cy > cx)
312
-
                else false)
313
-
                then throw(((("Price slippage " + toString(cy)) + " > ") + toString(cx)))
314
-
                else {
315
-
                    let cz = B(cs, a)
316
-
                    let cA = fraction(ct, bT, c)
317
-
                    let cB = fraction(cu, c, bT)
318
-
                    let cC = if ((cA > cu))
319
-
                        then $Tuple2(cB, cu)
320
-
                        else $Tuple2(ct, cA)
321
-
                    let cD = cC._1
322
-
                    let cE = cC._2
323
-
                    let by = fraction(cz, cE, bS)
324
-
                    $Tuple5(E(by, a), E(cD, cq), E(cE, cr), bT, cx)
325
-
                    }
326
-
            }
327
-
    let cF = cw._1
328
-
    let cG = cw._2
329
-
    let cH = cw._3
330
-
    let bU = E(cw._4, a)
331
-
    let cI = E(cw._5, a)
332
-
    if ((0 >= cF))
333
-
        then throw("LP <= 0")
334
-
        else {
335
-
            let cJ = if (!(ci))
336
-
                then 0
337
-
                else cF
338
-
            let cK = (cd - cG)
339
-
            let cL = (cf - cH)
340
-
            let cM = if (if (cj)
341
-
                then (cl == cm)
342
-
                else false)
343
-
                then $Tuple2(ck, 0)
344
-
                else if (if (cj)
345
-
                    then (cl == cn)
346
-
                    else false)
347
-
                    then $Tuple2(0, ck)
348
-
                    else $Tuple2(cG, cH)
349
-
            let cN = cM._1
350
-
            let cO = cM._2
351
-
            let cP = [IntegerEntry(P(), bU), IntegerEntry(Q(height, lastBlock.timestamp), bU), StringEntry(T(bH, bE), aG(cN, cO, cJ, bU, bd, cI, height, lastBlock.timestamp, cK, cL))]
352
-
            $Tuple13(cF, cJ, bU, bP, bR, cs, bI, bN, cP, cK, cL, ce, cg)
353
-
            }
378
+
        else throw("Strict value is not equal to itself.")
354
379
 
    }
355
380
 
356
381
 
357
-
func cQ (cR) = {
358
-
    let bu = aB()
359
-
    let cS = bu[r]
360
-
    let cT = bu[s]
361
-
    let bN = parseIntValue(bu[p])
362
-
    let bv = parseIntValue(bu[t])
363
-
    let bw = parseIntValue(bu[u])
364
-
    let cU = aV(cS)
365
-
    let cV = aV(cT)
366
-
    let bT = if ((cR.orderType == Buy))
367
-
        then bl(bv, bw, (cU + cR.amount), cV)
368
-
        else bl(bv, bw, (cU - cR.amount), cV)
369
-
    let bU = E(bT, a)
370
-
    if (if (if (az())
382
+
func cU (cV) = {
383
+
    let bw = aE()
384
+
    let cW = bw[s]
385
+
    let cX = bw[t]
386
+
    let bP = parseIntValue(bw[q])
387
+
    let bx = parseIntValue(bw[u])
388
+
    let by = parseIntValue(bw[v])
389
+
    let cY = aY(cW)
390
+
    let cZ = aY(cX)
391
+
    let bX = if ((cV.orderType == Buy))
392
+
        then bn(bx, by, (cY + cV.amount), cZ)
393
+
        else bn(bx, by, (cY - cV.amount), cZ)
394
+
    let bY = F(bX, a)
395
+
    if (if (if (aB())
371
396
 
        then true
372
-
        else (bN == m))
397
+
        else (bP == n))
373
398
 
        then true
374
-
        else (bN == n))
375
-
        then throw("Admin blocked")
399
+
        else (bP == o))
400
+
        then am("Admin blocked")
376
401
 
        else {
377
-
            let cW = cR.assetPair.amountAsset
378
-
            let cX = if ((cW == unit))
402
+
            let da = cV.assetPair.amountAsset
403
+
            let db = if ((da == unit))
379
404
 
                then "WAVES"
380
-
                else toBase58String(value(cW))
381
-
            let cY = cR.assetPair.priceAsset
382
-
            let cZ = if ((cY == unit))
405
+
                else toBase58String(value(da))
406
+
            let dc = cV.assetPair.priceAsset
407
+
            let dd = if ((dc == unit))
383
408
 
                then "WAVES"
384
-
                else toBase58String(value(cY))
385
-
            if (if ((cX != cS))
409
+
                else toBase58String(value(dc))
410
+
            if (if ((db != cW))
386
411
 
                then true
387
-
                else (cZ != cT))
388
-
                then throw("Wr assets")
412
+
                else (dd != cX))
413
+
                then am("Wr assets")
389
414
 
                else {
390
-
                    let da = cR.price
391
-
                    let cr = fraction(a, bw, bv)
392
-
                    let db = H(da, a, cr)
393
-
                    let dc = if ((cR.orderType == Buy))
394
-
                        then (bU >= db)
395
-
                        else (db >= bU)
415
+
                    let de = cV.price
416
+
                    let bO = fraction(a, by, bx)
417
+
                    let df = I(de, a, bO)
418
+
                    let dg = if ((cV.orderType == Buy))
419
+
                        then (bY >= df)
420
+
                        else (df >= bY)
396
421
 
                    true
397
422
 
                    }
398
423
 
            }
399
424
 
    }
400
425
 
401
426
 
402
-
func dd (de) = if ((size(de.payments) != 1))
403
-
    then throw("1 pmnt exp")
404
-
    else {
405
-
        let df = value(de.payments[0])
406
-
        let bF = value(df.assetId)
407
-
        let ck = df.amount
408
-
        let cw = bD(toBase58String(de.transactionId), toBase58String(bF), ck, de.caller)
409
-
        let bZ = cw._1
410
-
        let ca = cw._2
411
-
        let bN = parseIntValue(cw._9)
412
-
        let cb = cw._10
413
-
        if (if (az())
414
-
            then true
415
-
            else (bN == n))
416
-
            then throw(("Admin blocked: " + toString(bN)))
417
-
            else $Tuple5(bZ, ca, ck, bF, cb)
418
-
        }
419
-
420
-
421
-
func dg (ac,V,dh,di,bd,ci,cj,ck,cl) = {
422
-
    let cw = cc(V, bd, value(dh).amount, value(dh).assetId, value(di).amount, value(di).assetId, ac, false, ci, cj, ck, cl)
423
-
    let bN = parseIntValue(cw._8)
424
-
    if (if (if (az())
427
+
func dh (di) = {
428
+
    let dj = if ((size(di.payments) == 1))
425
429
 
        then true
426
-
        else (bN == l))
427
-
        then true
428
-
        else (bN == n))
429
-
        then throw(("Blocked:" + toString(bN)))
430
-
        else cw
430
+
        else am("1 payment expected")
431
+
    if ((dj == dj))
432
+
        then {
433
+
            let dk = value(di.payments[0])
434
+
            let bH = value(dk.assetId)
435
+
            let cp = dk.amount
436
+
            let cy = bF(toBase58String(di.transactionId), toBase58String(bH), cp, di.caller)
437
+
            let cd = cy._1
438
+
            let ce = cy._2
439
+
            let bP = parseIntValue(cy._9)
440
+
            let cf = cy._10
441
+
            if (if (aB())
442
+
                then true
443
+
                else (bP == o))
444
+
                then am(("Admin blocked: " + toString(bP)))
445
+
                else $Tuple5(cd, ce, cp, bH, cf)
446
+
            }
447
+
        else throw("Strict value is not equal to itself.")
431
448
 
    }
432
449
 
433
450
 
434
-
func dj () = {
435
-
    let ar = getString(N())
436
-
    if ($isInstanceOf(ar, "String"))
451
+
func dl (dm,W,dn,do,bg,cn,co,cp,cq) = {
452
+
    let cy = cg(W, bg, value(dn).amount, value(dn).assetId, value(do).amount, value(do).assetId, dm, false, cn, co, cp, cq)
453
+
    let bP = parseIntValue(cy._8)
454
+
    if (if (if (aB())
455
+
        then true
456
+
        else (bP == m))
457
+
        then true
458
+
        else (bP == o))
459
+
        then am(("Blocked:" + toString(bP)))
460
+
        else cy
461
+
    }
462
+
463
+
464
+
func dp (dq) = {
465
+
    let dr = fraction(dq, ad, d)
466
+
    $Tuple2((dq - dr), dr)
467
+
    }
468
+
469
+
470
+
func ds () = {
471
+
    let at = getString(O())
472
+
    if ($isInstanceOf(at, "String"))
437
473
 
        then {
438
-
            let dk = ar
439
-
            fromBase58String(dk)
474
+
            let dt = at
475
+
            fromBase58String(dt)
440
476
 
            }
441
-
        else if ($isInstanceOf(ar, "Unit"))
477
+
        else if ($isInstanceOf(at, "Unit"))
442
478
 
            then unit
443
479
 
            else throw("Match error")
444
480
 
    }
445
481
 
446
482
 
447
-
func dl () = {
448
-
    let ar = getString(O())
449
-
    if ($isInstanceOf(ar, "String"))
483
+
func du () = {
484
+
    let at = getString(P())
485
+
    if ($isInstanceOf(at, "String"))
450
486
 
        then {
451
-
            let dk = ar
452
-
            fromBase58String(dk)
487
+
            let dt = at
488
+
            fromBase58String(dt)
453
489
 
            }
454
-
        else if ($isInstanceOf(ar, "Unit"))
490
+
        else if ($isInstanceOf(at, "Unit"))
455
491
 
            then unit
456
492
 
            else throw("Match error")
457
493
 
    }
458
494
 
459
495
 
460
-
let dm = throw("Permission denied")
496
+
let dv = am("Permission denied")
461
497
 
462
-
func dn (de) = {
463
-
    let ar = dj()
464
-
    if ($isInstanceOf(ar, "ByteVector"))
498
+
func dw (di) = {
499
+
    let at = ds()
500
+
    if ($isInstanceOf(at, "ByteVector"))
465
501
 
        then {
466
-
            let do = ar
467
-
            if ((de.callerPublicKey == do))
502
+
            let dx = at
503
+
            if ((di.callerPublicKey == dx))
468
504
 
                then true
469
-
                else dm
505
+
                else dv
470
506
 
            }
471
-
        else if ($isInstanceOf(ar, "Unit"))
472
-
            then if ((de.caller == this))
507
+
        else if ($isInstanceOf(at, "Unit"))
508
+
            then if ((di.caller == this))
473
509
 
                then true
474
-
                else dm
510
+
                else dv
475
511
 
            else throw("Match error")
476
512
 
    }
477
513
 
478
514
 
479
-
@Callable(de)
480
-
func constructor (M) = {
481
-
    let dp = dn(de)
482
-
    if ((dp == dp))
483
-
        then [StringEntry(M(), M)]
515
+
@Callable(di)
516
+
func constructor (az) = {
517
+
    let dy = dw(di)
518
+
    if ((dy == dy))
519
+
        then [StringEntry(N(), az)]
484
520
 
        else throw("Strict value is not equal to itself.")
485
521
 
    }
486
522
 
487
523
 
488
524
 
489
-
@Callable(de)
490
-
func setManager (dq) = {
491
-
    let dp = dn(de)
492
-
    if ((dp == dp))
525
+
@Callable(di)
526
+
func setManager (dz) = {
527
+
    let dy = dw(di)
528
+
    if ((dy == dy))
493
529
 
        then {
494
-
            let dr = fromBase58String(dq)
495
-
            if ((dr == dr))
496
-
                then [StringEntry(O(), dq)]
530
+
            let dA = fromBase58String(dz)
531
+
            if ((dA == dA))
532
+
                then [StringEntry(P(), dz)]
497
533
 
                else throw("Strict value is not equal to itself.")
498
534
 
            }
499
535
 
        else throw("Strict value is not equal to itself.")
501
537
 
502
538
 
503
539
 
504
-
@Callable(de)
540
+
@Callable(di)
505
541
 
func confirmManager () = {
506
-
    let bC = dl()
507
-
    let ds = if (isDefined(bC))
542
+
    let dB = du()
543
+
    let dC = if (isDefined(dB))
508
544
 
        then true
509
-
        else throw("No pending manager")
510
-
    if ((ds == ds))
545
+
        else am("No pending manager")
546
+
    if ((dC == dC))
511
547
 
        then {
512
-
            let dt = if ((de.callerPublicKey == value(bC)))
548
+
            let dD = if ((di.callerPublicKey == value(dB)))
513
549
 
                then true
514
-
                else throw("You are not pending manager")
515
-
            if ((dt == dt))
516
-
                then [StringEntry(N(), toBase58String(value(bC))), DeleteEntry(O())]
550
+
                else am("You are not pending manager")
551
+
            if ((dD == dD))
552
+
                then [StringEntry(O(), toBase58String(value(dB))), DeleteEntry(P())]
517
553
 
                else throw("Strict value is not equal to itself.")
518
554
 
            }
519
555
 
        else throw("Strict value is not equal to itself.")
521
557
 
522
558
 
523
559
 
524
-
@Callable(de)
525
-
func put (du,dv) = {
526
-
    let dw = aF()
527
-
    let dx = valueOrErrorMessage(addressFromString(dw[x]), "Wr st addr")
528
-
    let dy = valueOrErrorMessage(addressFromString(dw[y]), "Wr sl addr")
529
-
    if ((0 > du))
530
-
        then throw("Wrong slippage")
531
-
        else if ((size(de.payments) != 2))
532
-
            then throw("2 pmnts expd")
533
-
            else {
534
-
                let dz = dg(toString(de.caller), toBase58String(de.transactionId), AttachedPayment(value(de.payments[0]).assetId, value(de.payments[0]).amount), de.payments[1], du, true, false, 0, "")
535
-
                let cJ = dz._2
536
-
                let dA = dz._7
537
-
                let cb = dz._9
538
-
                let cK = dz._10
539
-
                let cL = dz._11
540
-
                let bJ = dz._12
541
-
                let bK = dz._13
542
-
                let cw = invoke(ax, "emit", [cJ], nil)
543
-
                if ((cw == cw))
544
-
                    then {
545
-
                        let dB = {
546
-
                            let ar = cw
547
-
                            if ($isInstanceOf(ar, "Address"))
560
+
@Callable(di)
561
+
func put (bg,dE) = {
562
+
    let dF = aI()
563
+
    let dG = valueOrErrorMessage(addressFromString(dF[y]), "Wrong staking contract")
564
+
    let dH = valueOrErrorMessage(addressFromString(dF[z]), "Wrogn slippage contract")
565
+
    let dI = if ((bg >= 0))
566
+
        then true
567
+
        else am("wrong slippage")
568
+
    if ((dI == dI))
569
+
        then {
570
+
            let dJ = if ((size(di.payments) == 2))
571
+
                then true
572
+
                else am("2 payments expected")
573
+
            if ((dJ == dJ))
574
+
                then {
575
+
                    let dK = dl(toString(di.caller), toBase58String(di.transactionId), AttachedPayment(value(di.payments[0]).assetId, value(di.payments[0]).amount), di.payments[1], bg, true, false, 0, "")
576
+
                    let cN = dK._2
577
+
                    let bK = dK._7
578
+
                    let cf = dK._9
579
+
                    let cO = dK._10
580
+
                    let cP = dK._11
581
+
                    let bL = dK._12
582
+
                    let bM = dK._13
583
+
                    let cy = invoke(az, "emit", [cN], nil)
584
+
                    if ((cy == cy))
585
+
                        then {
586
+
                            let dL = {
587
+
                                let at = cy
588
+
                                if ($isInstanceOf(at, "Address"))
589
+
                                    then {
590
+
                                        let dM = at
591
+
                                        invoke(dM, "emit", [cN], nil)
592
+
                                        }
593
+
                                    else unit
594
+
                                }
595
+
                            if ((dL == dL))
548
596
 
                                then {
549
-
                                    let dC = ar
550
-
                                    invoke(dC, "emit", [cJ], nil)
551
-
                                    }
552
-
                                else unit
553
-
                            }
554
-
                        if ((dB == dB))
555
-
                            then {
556
-
                                let dD = if ((cK > 0))
557
-
                                    then invoke(dy, "put", nil, [AttachedPayment(bJ, cK)])
558
-
                                    else nil
559
-
                                if ((dD == dD))
560
-
                                    then {
561
-
                                        let dE = if ((cL > 0))
562
-
                                            then invoke(dy, "put", nil, [AttachedPayment(bK, cL)])
563
-
                                            else nil
564
-
                                        if ((dE == dE))
565
-
                                            then {
566
-
                                                let dF = if (dv)
567
-
                                                    then {
568
-
                                                        let dG = invoke(dx, "stake", nil, [AttachedPayment(dA, cJ)])
569
-
                                                        if ((dG == dG))
570
-
                                                            then nil
571
-
                                                            else throw("Strict value is not equal to itself.")
572
-
                                                        }
573
-
                                                    else [ScriptTransfer(de.caller, cJ, dA)]
574
-
                                                (cb ++ dF)
575
-
                                                }
576
-
                                            else throw("Strict value is not equal to itself.")
577
-
                                        }
578
-
                                    else throw("Strict value is not equal to itself.")
579
-
                                }
580
-
                            else throw("Strict value is not equal to itself.")
581
-
                        }
582
-
                    else throw("Strict value is not equal to itself.")
583
-
                }
584
-
    }
585
-
586
-
587
-
588
-
@Callable(de)
589
-
func putOneTkn (dH,dI,dJ,bd,dv) = {
590
-
    let bu = aF()
591
-
    let dx = valueOrErrorMessage(addressFromString(bu[x]), "Wr st addr")
592
-
    let dy = valueOrErrorMessage(addressFromString(bu[y]), "Wr sl addr")
593
-
    let dK = valueOrErrorMessage(addressFromString(bu[z]), "Wr gwx addr")
594
-
    let dL = aB()
595
-
    let bJ = dL[r]
596
-
    let bK = dL[s]
597
-
    let bL = parseIntValue(dL[t])
598
-
    let bM = parseIntValue(dL[u])
599
-
    let dM = valueOrElse(getString(this, aa()), "")
600
-
    let bH = if ((dM == toString(de.caller)))
601
-
        then de.originCaller
602
-
        else de.caller
603
-
    let dN = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(aa()), "no addons")), "addon address in not valid")
604
-
    let dO = reentrantInvoke(dN, "ensureCanPutOneTkn", [toString(bH)], nil)
605
-
    if ((dO == dO))
606
-
        then if (if (if (if ((0 >= bd))
607
-
            then true
608
-
            else (0 >= dH))
609
-
            then true
610
-
            else (0 >= dI))
611
-
            then true
612
-
            else (0 >= dJ))
613
-
            then throw("Wrong params")
614
-
            else if ((size(de.payments) != 1))
615
-
                then throw("1 pmnt expd")
616
-
                else {
617
-
                    let df = value(de.payments[0])
618
-
                    let bF = toBase58String(value(df.assetId))
619
-
                    let ck = df.amount
620
-
                    if (if (if ((dH > ck))
621
-
                        then true
622
-
                        else (dI > ck))
623
-
                        then true
624
-
                        else (10000000 > ck))
625
-
                        then throw("Wrong pmt amt")
626
-
                        else {
627
-
                            let bP = aV(bJ)
628
-
                            let bR = aV(bK)
629
-
                            let dP = if ((bF == bJ))
630
-
                                then $Tuple6((bP - ck), bR, (ck - dH), dI, 0, 0)
631
-
                                else if ((bF == bK))
632
-
                                    then $Tuple6(bP, (bR - ck), 0, 0, (ck - dI), dH)
633
-
                                    else throw("wrong pmtAssetId")
634
-
                            let dQ = dP._1
635
-
                            let dR = dP._2
636
-
                            let dS = dP._3
637
-
                            let dT = dP._4
638
-
                            let dU = dP._5
639
-
                            let dV = dP._6
640
-
                            let bi = invoke(dK, "calcD", [toString(dQ), toString(dR), ay, g, h], nil)
641
-
                            let bh = invoke(dK, "calcD", [toString(toBigInt(((dQ + dS) - dV))), toString(toBigInt(((dR + dU) - dT))), ay, g, h], nil)
642
-
                            let dW = bg(parseBigIntValue(aq(bh)), parseBigIntValue(aq(bi)), f)
643
-
                            if ((dW == dW))
644
-
                                then {
645
-
                                    let dX = dg(toString(de.caller), toBase58String(de.transactionId), AttachedPayment(fromBase58String(bJ), dH), AttachedPayment(fromBase58String(bK), dI), bd, true, true, ck, bF)
646
-
                                    let dY = dX._2
647
-
                                    let dA = dX._7
648
-
                                    let cb = dX._9
649
-
                                    let cK = dX._10
650
-
                                    let cL = dX._11
651
-
                                    let dZ = ba(toBigInt(dY), toBigInt(dJ), toBigInt(bd))
652
-
                                    let cJ = toInt(dZ._2)
653
-
                                    let dz = invoke(ax, "emit", [cJ], nil)
654
-
                                    if ((dz == dz))
597
+
                                    let dN = if ((cO > 0))
598
+
                                        then invoke(dH, "put", nil, [AttachedPayment(bL, cO)])
599
+
                                        else nil
600
+
                                    if ((dN == dN))
655
601
 
                                        then {
656
-
                                            let dB = {
657
-
                                                let ar = dz
658
-
                                                if ($isInstanceOf(ar, "Address"))
659
-
                                                    then {
660
-
                                                        let dC = ar
661
-
                                                        invoke(dC, "emit", [cJ], nil)
662
-
                                                        }
663
-
                                                    else unit
664
-
                                                }
665
-
                                            if ((dB == dB))
602
+
                                            let dO = if ((cP > 0))
603
+
                                                then invoke(dH, "put", nil, [AttachedPayment(bM, cP)])
604
+
                                                else nil
605
+
                                            if ((dO == dO))
666
606
 
                                                then {
667
-
                                                    let dD = if ((cK > 0))
668
-
                                                        then invoke(dy, "put", nil, [AttachedPayment(fromBase58String(bJ), cK)])
669
-
                                                        else nil
670
-
                                                    if ((dD == dD))
607
+
                                                    let dP = if (dE)
671
608
 
                                                        then {
672
-
                                                            let dE = if ((cL > 0))
673
-
                                                                then invoke(dy, "put", nil, [AttachedPayment(fromBase58String(bK), cL)])
674
-
                                                                else nil
675
-
                                                            if ((dE == dE))
676
-
                                                                then {
677
-
                                                                    let dF = if (dv)
678
-
                                                                        then {
679
-
                                                                            let dG = invoke(dx, "stake", nil, [AttachedPayment(dA, cJ)])
680
-
                                                                            if ((dG == dG))
681
-
                                                                                then nil
682
-
                                                                                else throw("Strict value is not equal to itself.")
683
-
                                                                            }
684
-
                                                                        else [ScriptTransfer(de.caller, cJ, dA)]
685
-
                                                                    (cb ++ dF)
686
-
                                                                    }
609
+
                                                            let dQ = invoke(dG, "stake", nil, [AttachedPayment(bK, cN)])
610
+
                                                            if ((dQ == dQ))
611
+
                                                                then nil
687
612
 
                                                                else throw("Strict value is not equal to itself.")
688
613
 
                                                            }
689
-
                                                        else throw("Strict value is not equal to itself.")
614
+
                                                        else [ScriptTransfer(di.caller, cN, bK)]
615
+
                                                    (cf ++ dP)
690
616
 
                                                    }
691
617
 
                                                else throw("Strict value is not equal to itself.")
692
618
 
                                            }
693
619
 
                                        else throw("Strict value is not equal to itself.")
694
620
 
                                    }
695
-
                                else throw("Strict value is not equal to itself.")
696
-
                            }
697
-
                    }
698
-
        else throw("Strict value is not equal to itself.")
699
-
    }
700
-
701
-
702
-
703
-
@Callable(de)
704
-
func putForFree (ea) = if ((0 > ea))
705
-
    then throw("Wrong slpg")
706
-
    else if ((size(de.payments) != 2))
707
-
        then throw("2 pmnts expd")
708
-
        else {
709
-
            let dX = dg(toString(de.caller), toBase58String(de.transactionId), AttachedPayment(value(de.payments[0]).assetId, value(de.payments[0]).amount), de.payments[1], ea, false, false, 0, "")
710
-
            dX._9
711
-
            }
712
-
713
-
714
-
715
-
@Callable(de)
716
-
func get () = {
717
-
    let cw = dd(de)
718
-
    let eb = cw._1
719
-
    let ca = cw._2
720
-
    let ck = cw._3
721
-
    let bF = cw._4
722
-
    let cb = cw._5
723
-
    let ec = invoke(ax, "burn", [ck], [AttachedPayment(bF, ck)])
724
-
    if ((ec == ec))
725
-
        then cb
726
-
        else throw("Strict value is not equal to itself.")
727
-
    }
728
-
729
-
730
-
731
-
@Callable(de)
732
-
func getOneTkn (ed,ee,ef,eg,bd) = if ((size(de.payments) != 1))
733
-
    then throw("1 pmnt expd")
734
-
    else {
735
-
        let bu = aB()
736
-
        let bI = bu[q]
737
-
        let bJ = bu[r]
738
-
        let bK = bu[s]
739
-
        let bL = parseIntValue(bu[t])
740
-
        let bM = parseIntValue(bu[u])
741
-
        let bN = bu[p]
742
-
        let dw = aF()
743
-
        let dK = valueOrErrorMessage(addressFromString(dw[z]), "Wr sl addr")
744
-
        let df = value(de.payments[0])
745
-
        let dM = valueOrElse(getString(this, aa()), "")
746
-
        let bH = if ((dM == toString(de.caller)))
747
-
            then de.originCaller
748
-
            else de.caller
749
-
        let bE = toBase58String(de.transactionId)
750
-
        let bF = value(df.assetId)
751
-
        let ck = df.amount
752
-
        let dN = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(aa()), "no addons")), "addon address in not valid")
753
-
        let dO = reentrantInvoke(dN, "ensureCanGetOneTkn", [toString(bH)], nil)
754
-
        if ((dO == dO))
755
-
            then if ((1000000000 > ck))
756
-
                then throw("Min pmt 10 LP")
757
-
                else if (if (if ((0 > bd))
758
-
                    then true
759
-
                    else (0 > ed))
760
-
                    then true
761
-
                    else (0 > ef))
762
-
                    then throw("Wrong params")
763
-
                    else if ((bI != toBase58String(bF)))
764
-
                        then throw("Wrong LP")
765
-
                        else {
766
-
                            let cw = bD(toBase58String(de.transactionId), toBase58String(bF), ck, de.caller)
767
-
                            let eh = cw._1
768
-
                            let ei = cw._2
769
-
                            let bP = aV(bJ)
770
-
                            let bR = aV(bK)
771
-
                            let ej = if ((eg == bJ))
772
-
                                then $Tuple7((bP - eh), (bR - ei), ed, ei, 0, 0, (eh + ed))
773
-
                                else if ((eg == bK))
774
-
                                    then $Tuple7((bP - eh), (bR - ei), 0, 0, ed, eh, (ei + ed))
775
-
                                    else throw("wrong outAssetId")
776
-
                            let dQ = ej._1
777
-
                            let dR = ej._2
778
-
                            let dS = ej._3
779
-
                            let dT = ej._4
780
-
                            let dU = ej._5
781
-
                            let dV = ej._6
782
-
                            let ek = ej._7
783
-
                            if (if ((0 > dS))
784
-
                                then true
785
-
                                else (0 > dU))
786
-
                                then throw("Wrong calc")
787
-
                                else {
788
-
                                    let bi = invoke(dK, "calcD", [toString(dQ), toString(dR), ay, g, h], nil)
789
-
                                    let bh = invoke(dK, "calcD", [toString(((dQ - dS) + dV)), toString(((dR + dT) - dU)), ay, g, h], nil)
790
-
                                    let dW = bg(parseBigIntValue(aq(bh)), parseBigIntValue(aq(bi)), f)
791
-
                                    if ((dW == dW))
792
-
                                        then {
793
-
                                            let el = ba(toBigInt(ek), toBigInt(ef), toBigInt(bd))
794
-
                                            if ((el == el))
795
-
                                                then {
796
-
                                                    let em = if ((eg == bJ))
797
-
                                                        then $Tuple2(toInt(el._2), 0)
798
-
                                                        else $Tuple2(0, toInt(el._2))
799
-
                                                    let en = em._1
800
-
                                                    let eo = em._2
801
-
                                                    let ep = aX(B(bR, bM), B(bP, bL))
802
-
                                                    let eq = E(ep, a)
803
-
                                                    let cb = [ScriptTransfer(bH, (en + eo), if ((eg == "WAVES"))
804
-
                                                        then unit
805
-
                                                        else fromBase58String(eg)), StringEntry(W(toString(bH), bE), aR(en, eo, ck, eq, height, lastBlock.timestamp)), IntegerEntry(P(), eq), IntegerEntry(Q(height, lastBlock.timestamp), eq)]
806
-
                                                    if ((cb == cb))
807
-
                                                        then {
808
-
                                                            let er = invoke(ax, "burn", [ck], [AttachedPayment(bF, ck)])
809
-
                                                            if ((er == er))
810
-
                                                                then cb
811
-
                                                                else throw("Strict value is not equal to itself.")
812
-
                                                            }
813
-
                                                        else throw("Strict value is not equal to itself.")
814
-
                                                    }
815
-
                                                else throw("Strict value is not equal to itself.")
816
-
                                            }
817
-
                                        else throw("Strict value is not equal to itself.")
818
-
                                    }
819
-
                            }
820
-
            else throw("Strict value is not equal to itself.")
821
-
        }
822
-
823
-
824
-
825
-
@Callable(de)
826
-
func getNoLess (es,et) = {
827
-
    let cw = dd(de)
828
-
    let bZ = cw._1
829
-
    let ca = cw._2
830
-
    let ck = cw._3
831
-
    let bF = cw._4
832
-
    let cb = cw._5
833
-
    if ((es > bZ))
834
-
        then throw(((("Failed:  " + toString(bZ)) + " < ") + toString(es)))
835
-
        else if ((et > ca))
836
-
            then throw(((("Failed: " + toString(ca)) + " < ") + toString(et)))
837
-
            else {
838
-
                let eu = invoke(ax, "burn", [ck], [AttachedPayment(bF, ck)])
839
-
                if ((eu == eu))
840
-
                    then cb
841
-
                    else throw("Strict value is not equal to itself.")
842
-
                }
843
-
    }
844
-
845
-
846
-
847
-
@Callable(de)
848
-
func unstakeAndGet (ev) = {
849
-
    let ew = if ((size(de.payments) != 0))
850
-
        then throw("No pmnts expd")
851
-
        else true
852
-
    if ((ew == ew))
853
-
        then {
854
-
            let bu = aB()
855
-
            let ex = aF()
856
-
            let dA = fromBase58String(bu[q])
857
-
            let ey = valueOrErrorMessage(addressFromString(ex[x]), "Wr st addr")
858
-
            let ez = invoke(ey, "unstake", [toBase58String(dA), ev], nil)
859
-
            if ((ez == ez))
860
-
                then {
861
-
                    let cw = bD(toBase58String(de.transactionId), toBase58String(dA), ev, de.caller)
862
-
                    let bN = parseIntValue(cw._9)
863
-
                    let cb = cw._10
864
-
                    let eA = if (if (az())
865
-
                        then true
866
-
                        else (bN == n))
867
-
                        then throw(("Blocked: " + toString(bN)))
868
-
                        else true
869
-
                    if ((eA == eA))
870
-
                        then {
871
-
                            let eB = invoke(ax, "burn", [ev], [AttachedPayment(dA, ev)])
872
-
                            if ((eB == eB))
873
-
                                then cb
874
621
 
                                else throw("Strict value is not equal to itself.")
875
622
 
                            }
876
623
 
                        else throw("Strict value is not equal to itself.")
882
629
 
883
630
 
884
631
 
885
-
@Callable(de)
886
-
func activate (eC,eD) = if ((toString(de.caller) != toString(ax)))
887
-
    then throw("denied")
888
-
    else $Tuple2([StringEntry(X(), eC), StringEntry(Y(), eD)], "success")
889
-
890
-
891
-
892
-
@Callable(de)
893
-
func setS (eE,eA) = if ((toString(de.caller) != at(this, aa())))
894
-
    then dm
895
-
    else [StringEntry(eE, eA)]
896
-
897
-
898
-
899
-
@Callable(de)
900
-
func setI (eE,eA) = if ((toString(de.caller) != at(this, aa())))
901
-
    then dm
902
-
    else [IntegerEntry(eE, eA)]
903
-
904
-
905
-
906
-
@Callable(de)
907
-
func getPoolConfigWrapperREADONLY () = $Tuple2(nil, aB())
908
-
909
-
910
-
911
-
@Callable(de)
912
-
func getAccBalanceWrapperREADONLY (aW) = $Tuple2(nil, aV(aW))
913
-
914
-
915
-
916
-
@Callable(de)
917
-
func calcPricesWrapperREADONLY (bo,bp,bt) = {
918
-
    let eF = bs(bo, bp, bt)
919
-
    $Tuple2(nil, [toString(eF[0]), toString(eF[1]), toString(eF[2])])
632
+
@Callable(di)
633
+
func putOneTkn (dR,dS,bf,bg,dE) = {
634
+
    let bw = aI()
635
+
    let dG = valueOrErrorMessage(addressFromString(bw[y]), "Wrong staking contract")
636
+
    let dH = valueOrErrorMessage(addressFromString(bw[z]), "Wrong slippage contract")
637
+
    let dT = valueOrErrorMessage(addressFromString(bw[A]), "Wrong gwx reward contract")
638
+
    let dU = aE()
639
+
    let bL = dU[s]
640
+
    let bM = dU[t]
641
+
    let bN = parseIntValue(dU[u])
642
+
    let bO = parseIntValue(dU[v])
643
+
    let dV = valueOrElse(getString(this, ab()), "")
644
+
    let bJ = if ((dV == toString(di.caller)))
645
+
        then di.originCaller
646
+
        else di.caller
647
+
    if (if (if (if ((0 >= bg))
648
+
        then true
649
+
        else (0 >= dR))
650
+
        then true
651
+
        else (0 >= dS))
652
+
        then true
653
+
        else (0 >= bf))
654
+
        then am("Wrong params")
655
+
        else if ((size(di.payments) != 1))
656
+
            then am("1 payment expected")
657
+
            else {
658
+
                let dk = value(di.payments[0])
659
+
                let bH = toBase58String(value(dk.assetId))
660
+
                let dW = dk.amount
661
+
                let dX = dp(dW)
662
+
                let cp = dX._1
663
+
                let dY = dX._2
664
+
                if (if (if ((dR > cp))
665
+
                    then true
666
+
                    else (dS > cp))
667
+
                    then true
668
+
                    else (10000000 > cp))
669
+
                    then am("wrong payment amount")
670
+
                    else {
671
+
                        let bT = aY(bL)
672
+
                        let bV = aY(bM)
673
+
                        let dZ = if ((bH == bL))
674
+
                            then $Tuple6((bT - cp), bV, (cp - dR), dS, 0, 0)
675
+
                            else if ((bH == bM))
676
+
                                then $Tuple6(bT, (bV - cp), 0, 0, (cp - dS), dR)
677
+
                                else am("wrong paymentAssetId")
678
+
                        let ea = dZ._1
679
+
                        let eb = dZ._2
680
+
                        let ec = dZ._3
681
+
                        let ed = dZ._4
682
+
                        let ee = dZ._5
683
+
                        let ef = dZ._6
684
+
                        let bl = invoke(dT, "calcD", [toString(ea), toString(eb), aA, h, i], nil)
685
+
                        let bk = invoke(dT, "calcD", [toString(toBigInt(((ea + ec) - ef))), toString(toBigInt(((eb + ee) - ed))), aA, h, i], nil)
686
+
                        let eg = bj(parseBigIntValue(as(bk)), parseBigIntValue(as(bl)), g)
687
+
                        if ((eg == eg))
688
+
                            then {
689
+
                                let dK = dl(toString(di.caller), toBase58String(di.transactionId), AttachedPayment(fromBase58String(bL), dR), AttachedPayment(fromBase58String(bM), dS), bg, true, true, cp, bH)
690
+
                                let be = dK._2
691
+
                                let bK = dK._7
692
+
                                let cf = dK._9
693
+
                                let cO = dK._10
694
+
                                let cP = dK._11
695
+
                                let eh = bd(toBigInt(be), toBigInt(bf), toBigInt(bg))
696
+
                                let cN = toInt(eh._2)
697
+
                                let ei = invoke(az, "emit", [cN], nil)
698
+
                                if ((ei == ei))
699
+
                                    then {
700
+
                                        let dL = {
701
+
                                            let at = ei
702
+
                                            if ($isInstanceOf(at, "Address"))
703
+
                                                then {
704
+
                                                    let dM = at
705
+
                                                    invoke(dM, "emit", [cN], nil)
706
+
                                                    }
707
+
                                                else unit
708
+
                                            }
709
+
                                        if ((dL == dL))
710
+
                                            then {
711
+
                                                let dN = if ((cO > 0))
712
+
                                                    then invoke(dH, "put", nil, [AttachedPayment(fromBase58String(bL), cO)])
713
+
                                                    else nil
714
+
                                                if ((dN == dN))
715
+
                                                    then {
716
+
                                                        let dO = if ((cP > 0))
717
+
                                                            then invoke(dH, "put", nil, [AttachedPayment(fromBase58String(bM), cP)])
718
+
                                                            else nil
719
+
                                                        if ((dO == dO))
720
+
                                                            then {
721
+
                                                                let dP = if (dE)
722
+
                                                                    then {
723
+
                                                                        let dQ = invoke(dG, "stake", nil, [AttachedPayment(bK, cN)])
724
+
                                                                        if ((dQ == dQ))
725
+
                                                                            then nil
726
+
                                                                            else throw("Strict value is not equal to itself.")
727
+
                                                                        }
728
+
                                                                    else [ScriptTransfer(di.caller, cN, bK)]
729
+
                                                                let ej = if ((dY > 0))
730
+
                                                                    then [ScriptTransfer(aD, dY, fromBase58String(bH))]
731
+
                                                                    else nil
732
+
                                                                ((cf ++ dP) ++ ej)
733
+
                                                                }
734
+
                                                            else throw("Strict value is not equal to itself.")
735
+
                                                        }
736
+
                                                    else throw("Strict value is not equal to itself.")
737
+
                                                }
738
+
                                            else throw("Strict value is not equal to itself.")
739
+
                                        }
740
+
                                    else throw("Strict value is not equal to itself.")
741
+
                                }
742
+
                            else throw("Strict value is not equal to itself.")
743
+
                        }
744
+
                }
920
745
 
    }
921
746
 
922
747
 
923
748
 
924
-
@Callable(de)
925
-
func fromX18WrapperREADONLY (F,eG) = $Tuple2(nil, E(parseBigIntValue(F), eG))
749
+
@Callable(di)
750
+
func putForFree (ek) = if ((0 > ek))
751
+
    then am("wrong slippage")
752
+
    else if ((size(di.payments) != 2))
753
+
        then am("2 payments expected")
754
+
        else {
755
+
            let dK = dl(toString(di.caller), toBase58String(di.transactionId), AttachedPayment(value(di.payments[0]).assetId, value(di.payments[0]).amount), di.payments[1], ek, false, false, 0, "")
756
+
            dK._9
757
+
            }
926
758
 
927
759
 
928
760
 
929
-
@Callable(de)
930
-
func toX18WrapperREADONLY (C,D) = $Tuple2(nil, toString(B(C, D)))
761
+
@Callable(di)
762
+
func get () = {
763
+
    let cy = dh(di)
764
+
    let el = cy._1
765
+
    let ce = cy._2
766
+
    let cp = cy._3
767
+
    let bH = cy._4
768
+
    let cf = cy._5
769
+
    let em = invoke(az, "burn", [cp], [AttachedPayment(bH, cp)])
770
+
    if ((em == em))
771
+
        then cf
772
+
        else throw("Strict value is not equal to itself.")
773
+
    }
931
774
 
932
775
 
933
776
 
934
-
@Callable(de)
935
-
func calcPriceBigIntWrapperREADONLY (aY,aZ) = $Tuple2(nil, toString(aX(parseBigIntValue(aY), parseBigIntValue(aZ))))
777
+
@Callable(di)
778
+
func getOneTkn (en,eo,ep,eq,bg) = if ((size(di.payments) != 1))
779
+
    then am("1 payment expected")
780
+
    else {
781
+
        let bw = aE()
782
+
        let bK = bw[r]
783
+
        let bL = bw[s]
784
+
        let bM = bw[t]
785
+
        let bN = parseIntValue(bw[u])
786
+
        let bO = parseIntValue(bw[v])
787
+
        let bP = bw[q]
788
+
        let dF = aI()
789
+
        let dT = valueOrErrorMessage(addressFromString(dF[A]), "Wrong gwxRewardContract address")
790
+
        let dk = value(di.payments[0])
791
+
        let dV = valueOrElse(getString(this, ab()), "")
792
+
        let bJ = if ((dV == toString(di.caller)))
793
+
            then di.originCaller
794
+
            else di.caller
795
+
        let bG = toBase58String(di.transactionId)
796
+
        let bH = value(dk.assetId)
797
+
        let cp = dk.amount
798
+
        if ((1000000000 > cp))
799
+
            then am("Min payment 10 LP")
800
+
            else if (if (if ((0 > bg))
801
+
                then true
802
+
                else (0 > en))
803
+
                then true
804
+
                else (0 > ep))
805
+
                then am("Wrong params")
806
+
                else if ((bK != toBase58String(bH)))
807
+
                    then am("Wrong LP")
808
+
                    else {
809
+
                        let cy = bF(toBase58String(di.transactionId), toBase58String(bH), cp, di.caller)
810
+
                        let er = cy._1
811
+
                        let es = cy._2
812
+
                        let bT = aY(bL)
813
+
                        let bV = aY(bM)
814
+
                        let et = if ((eq == bL))
815
+
                            then $Tuple7((bT - er), (bV - es), en, es, 0, 0, (er + en))
816
+
                            else if ((eq == bM))
817
+
                                then $Tuple7((bT - er), (bV - es), 0, 0, en, er, (es + en))
818
+
                                else am("wrong outAssetId")
819
+
                        let ea = et._1
820
+
                        let eb = et._2
821
+
                        let ec = et._3
822
+
                        let ed = et._4
823
+
                        let ee = et._5
824
+
                        let ef = et._6
825
+
                        let eu = et._7
826
+
                        if (if ((0 > ec))
827
+
                            then true
828
+
                            else (0 > ee))
829
+
                            then am("Wrong calc")
830
+
                            else {
831
+
                                let bl = invoke(dT, "calcD", [toString(ea), toString(eb), aA, h, i], nil)
832
+
                                let bk = invoke(dT, "calcD", [toString(((ea - ec) + ef)), toString(((eb + ed) - ee)), aA, h, i], nil)
833
+
                                let eg = bj(parseBigIntValue(as(bk)), parseBigIntValue(as(bl)), g)
834
+
                                if ((eg == eg))
835
+
                                    then {
836
+
                                        let ev = bd(toBigInt(eu), toBigInt(ep), toBigInt(bg))
837
+
                                        if ((ev == ev))
838
+
                                            then {
839
+
                                                let ew = if ((eq == bL))
840
+
                                                    then $Tuple2(toInt(ev._2), 0)
841
+
                                                    else $Tuple2(0, toInt(ev._2))
842
+
                                                let ex = ew._1
843
+
                                                let ey = ew._2
844
+
                                                let ez = (ex + ey)
845
+
                                                let eA = dp(ez)
846
+
                                                let eB = eA._1
847
+
                                                let dY = eA._2
848
+
                                                let eC = if ((eq == "WAVES"))
849
+
                                                    then unit
850
+
                                                    else fromBase58String(eq)
851
+
                                                let ej = if ((dY > 0))
852
+
                                                    then [ScriptTransfer(aD, dY, eC)]
853
+
                                                    else nil
854
+
                                                let bS = if ((bN >= bO))
855
+
                                                    then bN
856
+
                                                    else bO
857
+
                                                if ((bS == bS))
858
+
                                                    then {
859
+
                                                        let eD = ba(C(bV, bS), C(bT, bS))
860
+
                                                        let eE = F(eD, a)
861
+
                                                        let cf = [ScriptTransfer(bJ, eB, eC), StringEntry(X(toString(bJ), bG), aU(ex, ey, cp, eE, height, lastBlock.timestamp)), IntegerEntry(Q(), eE), IntegerEntry(R(height, lastBlock.timestamp), eE)]
862
+
                                                        if ((cf == cf))
863
+
                                                            then {
864
+
                                                                let eF = invoke(az, "burn", [cp], [AttachedPayment(bH, cp)])
865
+
                                                                if ((eF == eF))
866
+
                                                                    then (cf ++ ej)
867
+
                                                                    else throw("Strict value is not equal to itself.")
868
+
                                                                }
869
+
                                                            else throw("Strict value is not equal to itself.")
870
+
                                                        }
871
+
                                                    else throw("Strict value is not equal to itself.")
872
+
                                                }
873
+
                                            else throw("Strict value is not equal to itself.")
874
+
                                        }
875
+
                                    else throw("Strict value is not equal to itself.")
876
+
                                }
877
+
                        }
878
+
        }
936
879
 
937
880
 
938
881
 
939
-
@Callable(de)
940
-
func estimatePutOperationWrapperREADONLY (bE,bd,cd,ce,cf,cg,eH,ch,ci) = $Tuple2(nil, cc(bE, bd, cd, ce, cf, cg, eH, ch, ci, false, 0, ""))
882
+
@Callable(di)
883
+
func getNoLess (eG,eH) = {
884
+
    let cy = dh(di)
885
+
    let cd = cy._1
886
+
    let ce = cy._2
887
+
    let cp = cy._3
888
+
    let bH = cy._4
889
+
    let cf = cy._5
890
+
    let eI = if ((cd >= eG))
891
+
        then true
892
+
        else am(((("Failed:  " + toString(cd)) + " < ") + toString(eG)))
893
+
    if ((eI == eI))
894
+
        then {
895
+
            let eJ = if ((ce >= eH))
896
+
                then true
897
+
                else am(((("Failed: " + toString(ce)) + " < ") + toString(eH)))
898
+
            if ((eJ == eJ))
899
+
                then {
900
+
                    let eK = invoke(az, "burn", [cp], [AttachedPayment(bH, cp)])
901
+
                    if ((eK == eK))
902
+
                        then cf
903
+
                        else throw("Strict value is not equal to itself.")
904
+
                    }
905
+
                else throw("Strict value is not equal to itself.")
906
+
            }
907
+
        else throw("Strict value is not equal to itself.")
908
+
    }
941
909
 
942
910
 
943
911
 
944
-
@Callable(de)
945
-
func estimateGetOperationWrapperREADONLY (bE,eI,bG,eH) = {
946
-
    let cw = bD(bE, eI, bG, addressFromStringValue(eH))
947
-
    $Tuple2(nil, $Tuple10(cw._1, cw._2, cw._3, cw._4, cw._5, cw._6, cw._7, toString(cw._8), cw._9, cw._10))
912
+
@Callable(di)
913
+
func unstakeAndGet (dq) = {
914
+
    let dj = if ((size(di.payments) != 0))
915
+
        then am("no payments expected")
916
+
        else true
917
+
    if ((dj == dj))
918
+
        then {
919
+
            let bw = aE()
920
+
            let eL = aI()
921
+
            let bK = fromBase58String(bw[r])
922
+
            let eM = valueOrErrorMessage(addressFromString(eL[y]), "wrong")
923
+
            let eN = invoke(eM, "unstake", [toBase58String(bK), dq], nil)
924
+
            if ((eN == eN))
925
+
                then {
926
+
                    let cy = bF(toBase58String(di.transactionId), toBase58String(bK), dq, di.caller)
927
+
                    let bP = parseIntValue(cy._9)
928
+
                    let cf = cy._10
929
+
                    let eO = if (if (aB())
930
+
                        then true
931
+
                        else (bP == o))
932
+
                        then am(("Blocked: " + toString(bP)))
933
+
                        else true
934
+
                    if ((eO == eO))
935
+
                        then {
936
+
                            let eP = invoke(az, "burn", [dq], [AttachedPayment(bK, dq)])
937
+
                            if ((eP == eP))
938
+
                                then cf
939
+
                                else throw("Strict value is not equal to itself.")
940
+
                            }
941
+
                        else throw("Strict value is not equal to itself.")
942
+
                    }
943
+
                else throw("Strict value is not equal to itself.")
944
+
            }
945
+
        else throw("Strict value is not equal to itself.")
948
946
 
    }
949
947
 
950
948
 
951
-
@Verifier(eJ)
952
-
func eK () = {
953
-
    let ar = eJ
954
-
    if ($isInstanceOf(ar, "Order"))
949
+
950
+
@Callable(di)
951
+
func activate (eQ,eR) = if ((toString(di.caller) != toString(az)))
952
+
    then am("denied")
953
+
    else $Tuple2([StringEntry(Y(), eQ), StringEntry(Z(), eR)], "success")
954
+
955
+
956
+
957
+
@Callable(di)
958
+
func setS (eS,eO) = if ((toString(di.caller) != av(this, ab())))
959
+
    then dv
960
+
    else [StringEntry(eS, eO)]
961
+
962
+
963
+
964
+
@Callable(di)
965
+
func setI (eS,eO) = if ((toString(di.caller) != av(this, ab())))
966
+
    then dv
967
+
    else [IntegerEntry(eS, eO)]
968
+
969
+
970
+
971
+
@Callable(di)
972
+
func getPoolConfigWrapperREADONLY () = $Tuple2(nil, aE())
973
+
974
+
975
+
976
+
@Callable(di)
977
+
func getAccBalanceWrapperREADONLY (aZ) = $Tuple2(nil, aY(aZ))
978
+
979
+
980
+
981
+
@Callable(di)
982
+
func calcPricesWrapperREADONLY (bq,br,bv) = {
983
+
    let eT = bu(bq, br, bv)
984
+
    $Tuple2(nil, [toString(eT[0]), toString(eT[1]), toString(eT[2])])
985
+
    }
986
+
987
+
988
+
989
+
@Callable(di)
990
+
func fromX18WrapperREADONLY (G,eU) = $Tuple2(nil, F(parseBigIntValue(G), eU))
991
+
992
+
993
+
994
+
@Callable(di)
995
+
func toX18WrapperREADONLY (D,E) = $Tuple2(nil, toString(C(D, E)))
996
+
997
+
998
+
999
+
@Callable(di)
1000
+
func calcPriceBigIntWrapperREADONLY (bb,bc) = $Tuple2(nil, toString(ba(parseBigIntValue(bb), parseBigIntValue(bc))))
1001
+
1002
+
1003
+
1004
+
@Callable(di)
1005
+
func estimatePutOperationWrapperREADONLY (bG,bg,ci,eV,ck,eW,eX,cm,cn) = $Tuple2(nil, cg(bG, bg, ci, eV, ck, eW, eX, cm, cn, false, 0, ""))
1006
+
1007
+
1008
+
1009
+
@Callable(di)
1010
+
func estimateGetOperationWrapperREADONLY (bG,eY,bI,eX) = {
1011
+
    let cy = bF(bG, eY, bI, addressFromStringValue(eX))
1012
+
    $Tuple2(nil, $Tuple10(cy._1, cy._2, cy._3, cy._4, cy._5, cy._6, cy._7, toString(cy._8), cy._9, cy._10))
1013
+
    }
1014
+
1015
+
1016
+
@Verifier(eZ)
1017
+
func fa () = {
1018
+
    let at = eZ
1019
+
    if ($isInstanceOf(at, "Order"))
955
1020
 
        then {
956
-
            let cR = ar
957
-
            let eL = aA()
958
-
            let an = cQ(cR)
959
-
            let eM = sigVerify(cR.bodyBytes, cR.proofs[0], cR.senderPublicKey)
960
-
            let eN = sigVerify(cR.bodyBytes, cR.proofs[1], eL)
961
-
            if (if (if (an)
962
-
                then eM
1021
+
            let cV = at
1022
+
            let fb = aC()
1023
+
            let ap = cU(cV)
1024
+
            let fc = sigVerify(cV.bodyBytes, cV.proofs[0], cV.senderPublicKey)
1025
+
            let fd = sigVerify(cV.bodyBytes, cV.proofs[1], fb)
1026
+
            if (if (if (ap)
1027
+
                then fc
963
1028
 
                else false)
964
-
                then eN
1029
+
                then fd
965
1030
 
                else false)
966
1031
 
                then true
967
-
                else am(an, eM, eN)
1032
+
                else ao(ap, fc, fd)
968
1033
 
            }
969
1034
 
        else {
970
-
            let eO = {
971
-
                let eP = dj()
972
-
                if ($isInstanceOf(eP, "ByteVector"))
1035
+
            let fe = {
1036
+
                let ff = ds()
1037
+
                if ($isInstanceOf(ff, "ByteVector"))
973
1038
 
                    then {
974
-
                        let do = eP
975
-
                        do
1039
+
                        let dx = ff
1040
+
                        dx
976
1041
 
                        }
977
-
                    else if ($isInstanceOf(eP, "Unit"))
978
-
                        then eJ.senderPublicKey
1042
+
                    else if ($isInstanceOf(ff, "Unit"))
1043
+
                        then eZ.senderPublicKey
979
1044
 
                        else throw("Match error")
980
1045
 
                }
981
-
            sigVerify(eJ.bodyBytes, eJ.proofs[0], eO)
1046
+
            sigVerify(eZ.bodyBytes, eZ.proofs[0], fe)
982
1047
 
            }
983
1048
 
    }
984
1049
 

Full: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = 100000000
5
5
 
6
6
 
let b = toBigInt(100000000)
7
7
 
8
8
 
let c = toBigInt(1000000000000000000)
9
9
 
10
-
let d = toBigInt(0)
10
+
let d = 1000
11
11
 
12
-
let e = toBigInt(1)
12
+
let e = toBigInt(0)
13
13
 
14
-
let f = toBigInt((a - ((a * 1) / a)))
14
+
let f = toBigInt(1)
15
15
 
16
-
let g = "100"
16
+
let g = toBigInt((a - ((a * 1) / a)))
17
17
 
18
-
let h = "1"
18
+
let h = "100"
19
19
 
20
-
let i = "__"
20
+
let i = "1"
21
21
 
22
-
let j = ""
22
+
let j = "__"
23
23
 
24
-
let k = 1
24
+
let k = ""
25
25
 
26
-
let l = 2
26
+
let l = 1
27
27
 
28
-
let m = 3
28
+
let m = 2
29
29
 
30
-
let n = 4
30
+
let n = 3
31
31
 
32
-
let o = 1
32
+
let o = 4
33
33
 
34
-
let p = 2
34
+
let p = 1
35
35
 
36
-
let q = 3
36
+
let q = 2
37
37
 
38
-
let r = 4
38
+
let r = 3
39
39
 
40
-
let s = 5
40
+
let s = 4
41
41
 
42
-
let t = 6
42
+
let t = 5
43
43
 
44
-
let u = 7
44
+
let u = 6
45
45
 
46
-
let v = 8
46
+
let v = 7
47
47
 
48
-
let w = 9
48
+
let w = 8
49
49
 
50
-
let x = 1
50
+
let x = 9
51
51
 
52
-
let y = 7
52
+
let y = 1
53
53
 
54
-
let z = 10
54
+
let z = 7
55
55
 
56
-
let A = "%s__delay"
56
+
let A = 10
57
57
 
58
-
func B (C,D) = fraction(toBigInt(C), c, toBigInt(D))
58
+
let B = 0
59
+
60
+
func C (D,E) = fraction(toBigInt(D), c, toBigInt(E))
59
61
 
60
62
 
61
-
func E (F,G) = toInt(fraction(F, toBigInt(G), c))
63
+
func F (G,H) = toInt(fraction(G, toBigInt(H), c))
62
64
 
63
65
 
64
-
func H (I,J,K) = fraction(I, J, K)
66
+
func I (J,K,L) = fraction(J, K, L)
65
67
 
66
68
 
67
-
func L (F) = if ((d > F))
68
-
    then -(F)
69
-
    else F
69
+
func M (G) = if ((e > G))
70
+
    then -(G)
71
+
    else G
70
72
 
71
73
 
72
-
func M () = "%s__factoryContract"
74
+
func N () = "%s__factoryContract"
73
75
 
74
76
 
75
-
func N () = "%s__managerPublicKey"
77
+
func O () = "%s__managerPublicKey"
76
78
 
77
79
 
78
-
func O () = "%s__pendingManagerPublicKey"
80
+
func P () = "%s__pendingManagerPublicKey"
79
81
 
80
82
 
81
-
func P () = "%s%s__price__last"
83
+
func Q () = "%s%s__price__last"
82
84
 
83
85
 
84
-
func Q (R,S) = makeString(["%s%s%d%d__price__history", toString(R), toString(S)], i)
86
+
func R (S,T) = makeString(["%s%s%d%d__price__history", toString(S), toString(T)], j)
85
87
 
86
88
 
87
-
func T (U,V) = ((("%s%s%s__P__" + U) + "__") + V)
89
+
func U (V,W) = ((("%s%s%s__P__" + V) + "__") + W)
88
90
 
89
91
 
90
-
func W (U,V) = ((("%s%s%s__G__" + U) + "__") + V)
92
+
func X (V,W) = ((("%s%s%s__G__" + V) + "__") + W)
91
93
 
92
94
 
93
-
func X () = "%s__amountAsset"
95
+
func Y () = "%s__amountAsset"
94
96
 
95
97
 
96
-
func Y () = "%s__priceAsset"
98
+
func Z () = "%s__priceAsset"
97
99
 
98
100
 
99
-
func Z () = "%s__amp"
101
+
func aa () = "%s__amp"
100
102
 
101
103
 
102
-
func aa () = "%s__addonAddr"
104
+
func ab () = "%s__addonAddr"
103
105
 
104
106
 
105
-
func ab (ac) = makeString(["%s%s__lastGetOneTknCall", ac], i)
107
+
let ac = "%s__feePermille"
106
108
 
107
-
108
-
func ad (ac) = makeString(["%s%s__lastPutOneTknCall", ac], i)
109
-
109
+
let ad = valueOrElse(getInteger(this, ac), B)
110
110
 
111
111
 
func ae () = "%s__factoryConfig"
112
112
 
113
113
 
114
114
 
func af () = "%s%s__matcher__publicKey"
115
115
 
116
116
 
117
117
 
func ag (ah,ai) = (((("%d%d%s__" + ah) + "__") + ai) + "__config")
118
118
 
119
119
 
120
120
 
func aj (ak) = ("%s%s%s__mappings__baseAsset2internalId__" + ak)
121
121
 
122
122
 
123
123
 
func al () = "%s__shutdown"
124
124
 
125
125
 
126
-
func am (an,ao,ap) = throw(((((("Failed: ordValid=" + toString(an)) + " sndrValid=") + toString(ao)) + " mtchrValid=") + toString(ap)))
126
+
func am (an) = throw(makeString(["lp_stable.ride:", an], " "))
127
127
 
128
128
 
129
-
func aq (F) = {
130
-
    let ar = F
131
-
    if ($isInstanceOf(ar, "String"))
129
+
func ao (ap,aq,ar) = am(((((("Failed: ordValid=" + toString(ap)) + " sndrValid=") + toString(aq)) + " mtchrValid=") + toString(ar)))
130
+
131
+
132
+
func as (G) = {
133
+
    let at = G
134
+
    if ($isInstanceOf(at, "String"))
132
135
 
        then {
133
-
            let as = ar
134
-
            as
136
+
            let au = at
137
+
            au
135
138
 
            }
136
-
        else throw("fail cast to String")
139
+
        else am("fail cast to String")
137
140
 
    }
138
141
 
139
142
 
140
-
func at (au,av) = valueOrErrorMessage(getString(au, av), makeString(["mandatory ", toString(au), ".", av, " not defined"], ""))
143
+
func av (aw,ax) = valueOrErrorMessage(getString(aw, ax), makeString(["mandatory ", toString(aw), ".", ax, " not defined"], ""))
141
144
 
142
145
 
143
-
func aw (au,av) = valueOrErrorMessage(getInteger(au, av), makeString(["mandatory ", toString(au), ".", av, " not defined"], ""))
146
+
func ay (aw,ax) = valueOrErrorMessage(getInteger(aw, ax), makeString(["mandatory ", toString(aw), ".", ax, " not defined"], ""))
144
147
 
145
148
 
146
-
let ax = addressFromStringValue(at(this, M()))
149
+
let az = addressFromStringValue(av(this, N()))
147
150
 
148
-
let ay = at(this, Z())
151
+
let aA = av(this, aa())
149
152
 
150
-
func az () = valueOrElse(getBoolean(ax, al()), false)
153
+
func aB () = valueOrElse(getBoolean(az, al()), false)
151
154
 
152
155
 
153
-
func aA () = fromBase58String(at(ax, af()))
156
+
func aC () = fromBase58String(av(az, af()))
154
157
 
155
158
 
156
-
func aB () = {
157
-
    let aC = at(this, X())
158
-
    let aD = at(this, Y())
159
-
    let aE = aw(ax, aj(aD))
160
-
    let ah = aw(ax, aj(aC))
161
-
    split(at(ax, ag(toString(ah), toString(aE))), i)
159
+
let aD = addressFromPublicKey(aC())
160
+
161
+
func aE () = {
162
+
    let aF = av(this, Y())
163
+
    let aG = av(this, Z())
164
+
    let aH = ay(az, aj(aG))
165
+
    let ah = ay(az, aj(aF))
166
+
    split(av(az, ag(toString(ah), toString(aH))), j)
162
167
 
    }
163
168
 
164
169
 
165
-
func aF () = split(at(ax, ae()), i)
170
+
func aI () = split(av(az, ae()), j)
166
171
 
167
172
 
168
-
func aG (aH,aI,aJ,aK,aL,aM,aN,aO,aP,aQ) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(aH), toString(aI), toString(aJ), toString(aK), toString(aL), toString(aM), toString(aN), toString(aO), toString(aP), toString(aQ)], i)
173
+
func aJ (aK,aL,aM,aN,aO,aP,aQ,aR,aS,aT) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(aK), toString(aL), toString(aM), toString(aN), toString(aO), toString(aP), toString(aQ), toString(aR), toString(aS), toString(aT)], j)
169
174
 
170
175
 
171
-
func aR (aS,aT,aU,aK,aN,aO) = makeString(["%d%d%d%d%d%d", toString(aS), toString(aT), toString(aU), toString(aK), toString(aN), toString(aO)], i)
176
+
func aU (aV,aW,aX,aN,aQ,aR) = makeString(["%d%d%d%d%d%d", toString(aV), toString(aW), toString(aX), toString(aN), toString(aQ), toString(aR)], j)
172
177
 
173
178
 
174
-
func aV (aW) = if ((aW == "WAVES"))
179
+
func aY (aZ) = if ((aZ == "WAVES"))
175
180
 
    then wavesBalance(this).available
176
-
    else assetBalance(this, fromBase58String(aW))
181
+
    else assetBalance(this, fromBase58String(aZ))
177
182
 
178
183
 
179
-
func aX (aY,aZ) = fraction(aY, c, aZ)
184
+
func ba (bb,bc) = fraction(bb, c, bc)
180
185
 
181
186
 
182
-
func ba (bb,bc,bd) = {
183
-
    let be = fraction((bb - bc), b, bc)
184
-
    let bf = ((bd - L(be)) > d)
185
-
    if (!(bf))
186
-
        then throw(("Big slpg: " + toString(be)))
187
-
        else $Tuple2(bf, min([bb, bc]))
187
+
func bd (be,bf,bg) = {
188
+
    let bh = fraction((be - bf), b, bf)
189
+
    let bi = ((bg - M(bh)) > e)
190
+
    if (!(bi))
191
+
        then am(("Big slippage: " + toString(bh)))
192
+
        else $Tuple2(bi, min([be, bf]))
188
193
 
    }
189
194
 
190
195
 
191
-
func bg (bh,bi,bj) = {
192
-
    let be = fraction(bi, b, bh)
193
-
    let bk = (bj > be)
194
-
    if (if (bk)
196
+
func bj (bk,bl,bg) = {
197
+
    let bh = fraction(bl, b, bk)
198
+
    let bm = (bg > bh)
199
+
    if (if (bm)
195
200
 
        then true
196
-
        else (bi > bh))
197
-
        then throw(((((((toString(bi) + " ") + toString(bh)) + " ") + toString(be)) + " ") + toString(bj)))
198
-
        else bk
201
+
        else (bl > bk))
202
+
        then am(((((((toString(bl) + " ") + toString(bk)) + " ") + toString(bh)) + " ") + toString(bg)))
203
+
        else bm
199
204
 
    }
200
205
 
201
206
 
202
-
func bl (bm,bn,bo,bp) = {
203
-
    let bq = B(bo, bm)
204
-
    let br = B(bp, bn)
205
-
    aX(br, bq)
207
+
func bn (bo,bp,bq,br) = {
208
+
    let bs = C(bq, bo)
209
+
    let bt = C(br, bp)
210
+
    ba(bt, bs)
206
211
 
    }
207
212
 
208
213
 
209
-
func bs (bo,bp,bt) = {
210
-
    let bu = aB()
211
-
    let bv = parseIntValue(bu[t])
212
-
    let bw = parseIntValue(bu[u])
213
-
    let bx = bl(bv, bw, bo, bp)
214
-
    let aZ = B(bo, bv)
215
-
    let aY = B(bp, bw)
216
-
    let by = B(bt, a)
217
-
    let bz = aX(aZ, by)
218
-
    let bA = aX(aY, by)
219
-
[bx, bz, bA]
214
+
func bu (bq,br,bv) = {
215
+
    let bw = aE()
216
+
    let bx = parseIntValue(bw[u])
217
+
    let by = parseIntValue(bw[v])
218
+
    let bz = bn(bx, by, bq, br)
219
+
    let bc = C(bq, bx)
220
+
    let bb = C(br, by)
221
+
    let bA = C(bv, a)
222
+
    let bB = ba(bc, bA)
223
+
    let bC = ba(bb, bA)
224
+
[bz, bB, bC]
220
225
 
    }
221
226
 
222
227
 
223
-
func bB (bo,bp,bt) = {
224
-
    let bC = bs(bo, bp, bt)
225
-
[E(bC[0], a), E(bC[1], a), E(bC[2], a)]
228
+
func bD (bq,br,bv) = {
229
+
    let bE = bu(bq, br, bv)
230
+
[F(bE[0], a), F(bE[1], a), F(bE[2], a)]
226
231
 
    }
227
232
 
228
233
 
229
-
func bD (bE,bF,bG,bH) = {
230
-
    let bu = aB()
231
-
    let bI = bu[q]
232
-
    let bJ = bu[r]
233
-
    let bK = bu[s]
234
-
    let bL = parseIntValue(bu[t])
235
-
    let bM = parseIntValue(bu[u])
236
-
    let bN = bu[p]
237
-
    let bO = valueOrErrorMessage(assetInfo(fromBase58String(bI)), "Wrong LP id").quantity
238
-
    if ((bI != bF))
239
-
        then throw("Wrong pmt asset")
240
-
        else {
241
-
            let bP = aV(bJ)
242
-
            let bQ = B(bP, bL)
243
-
            let bR = aV(bK)
244
-
            let bS = B(bR, bM)
245
-
            let bT = aX(bS, bQ)
246
-
            let bU = E(bT, a)
247
-
            let bV = B(bG, a)
248
-
            let bW = B(bO, a)
249
-
            let bX = fraction(bQ, bV, bW)
250
-
            let bY = fraction(bS, bV, bW)
251
-
            let bZ = E(bX, bL)
252
-
            let ca = E(bY, bM)
253
-
            let cb = if ((bE == ""))
254
-
                then nil
255
-
                else [ScriptTransfer(bH, bZ, if ((bJ == "WAVES"))
256
-
                    then unit
257
-
                    else fromBase58String(bJ)), ScriptTransfer(bH, ca, if ((bK == "WAVES"))
258
-
                    then unit
259
-
                    else fromBase58String(bK)), StringEntry(W(toString(bH), bE), aR(bZ, ca, bG, bU, height, lastBlock.timestamp)), IntegerEntry(P(), bU), IntegerEntry(Q(height, lastBlock.timestamp), bU)]
260
-
            $Tuple10(bZ, ca, bJ, bK, bP, bR, bO, bT, bN, cb)
234
+
func bF (bG,bH,bI,bJ) = {
235
+
    let bw = aE()
236
+
    let bK = bw[r]
237
+
    let bL = bw[s]
238
+
    let bM = bw[t]
239
+
    let bN = parseIntValue(bw[u])
240
+
    let bO = parseIntValue(bw[v])
241
+
    let bP = bw[q]
242
+
    let bQ = valueOrErrorMessage(assetInfo(fromBase58String(bK)), "Wrong LP id").quantity
243
+
    let bR = if ((bK == bH))
244
+
        then true
245
+
        else am("Wrong payment asset")
246
+
    if ((bR == bR))
247
+
        then {
248
+
            let bS = if ((bN >= bO))
249
+
                then bN
250
+
                else bO
251
+
            if ((bS == bS))
252
+
                then {
253
+
                    let bT = aY(bL)
254
+
                    let bU = C(bT, bS)
255
+
                    let bV = aY(bM)
256
+
                    let bW = C(bV, bS)
257
+
                    let bX = ba(bW, bU)
258
+
                    let bY = F(bX, a)
259
+
                    let bZ = C(bI, a)
260
+
                    let ca = C(bQ, a)
261
+
                    let cb = fraction(bU, bZ, ca)
262
+
                    let cc = fraction(bW, bZ, ca)
263
+
                    let cd = F(cb, bS)
264
+
                    let ce = F(cc, bS)
265
+
                    let cf = if ((bG == ""))
266
+
                        then nil
267
+
                        else [ScriptTransfer(bJ, cd, if ((bL == "WAVES"))
268
+
                            then unit
269
+
                            else fromBase58String(bL)), ScriptTransfer(bJ, ce, if ((bM == "WAVES"))
270
+
                            then unit
271
+
                            else fromBase58String(bM)), StringEntry(X(toString(bJ), bG), aU(cd, ce, bI, bY, height, lastBlock.timestamp)), IntegerEntry(Q(), bY), IntegerEntry(R(height, lastBlock.timestamp), bY)]
272
+
                    $Tuple10(cd, ce, bL, bM, bT, bV, bQ, bX, bP, cf)
273
+
                    }
274
+
                else throw("Strict value is not equal to itself.")
261
275
 
            }
276
+
        else throw("Strict value is not equal to itself.")
262
277
 
    }
263
278
 
264
279
 
265
-
func cc (bE,bd,cd,ce,cf,cg,bH,ch,ci,cj,ck,cl) = {
266
-
    let bu = aB()
267
-
    let bI = fromBase58String(bu[q])
268
-
    let cm = bu[r]
269
-
    let cn = bu[s]
270
-
    let co = bu[v]
271
-
    let cp = bu[w]
272
-
    let cq = parseIntValue(bu[t])
273
-
    let cr = parseIntValue(bu[u])
274
-
    let bN = bu[p]
275
-
    let cs = valueOrErrorMessage(assetInfo(bI), "Wr lp as").quantity
276
-
    let bP = if (ch)
277
-
        then aV(cm)
278
-
        else if (if (cj)
279
-
            then (cl == cm)
280
+
func cg (bG,ch,ci,cj,ck,cl,bJ,cm,cn,co,cp,cq) = {
281
+
    let bw = aE()
282
+
    let bK = fromBase58String(bw[r])
283
+
    let cr = bw[s]
284
+
    let cs = bw[t]
285
+
    let ct = bw[w]
286
+
    let cu = bw[x]
287
+
    let bN = parseIntValue(bw[u])
288
+
    let bO = parseIntValue(bw[v])
289
+
    let bP = bw[q]
290
+
    let bQ = valueOrErrorMessage(assetInfo(bK), "Wrong lp asset").quantity
291
+
    let bT = if (cm)
292
+
        then aY(cr)
293
+
        else if (if (co)
294
+
            then (cq == cr)
280
295
 
            else false)
281
-
            then (aV(cm) - ck)
282
-
            else if (cj)
283
-
                then aV(cm)
284
-
                else (aV(cm) - cd)
285
-
    let bR = if (ch)
286
-
        then aV(cn)
287
-
        else if (if (cj)
288
-
            then (cl == cn)
296
+
            then (aY(cr) - cp)
297
+
            else if (co)
298
+
                then aY(cr)
299
+
                else (aY(cr) - ci)
300
+
    let bV = if (cm)
301
+
        then aY(cs)
302
+
        else if (if (co)
303
+
            then (cq == cs)
289
304
 
            else false)
290
-
            then (aV(cn) - ck)
291
-
            else if (cj)
292
-
                then aV(cn)
293
-
                else (aV(cn) - cf)
294
-
    let ct = B(cd, cq)
295
-
    let cu = B(cf, cr)
296
-
    let cv = aX(cu, ct)
297
-
    let bQ = B(bP, cq)
298
-
    let bS = B(bR, cr)
299
-
    let cw = if ((cs == 0))
305
+
            then (aY(cs) - cp)
306
+
            else if (co)
307
+
                then aY(cs)
308
+
                else (aY(cs) - ck)
309
+
    let bS = if ((bN >= bO))
310
+
        then bN
311
+
        else bO
312
+
    if ((bS == bS))
300
313
 
        then {
301
-
            let bT = d
302
-
            let cx = d
303
-
            let by = pow((ct * cu), 0, toBigInt(5), 1, 0, DOWN)
304
-
            $Tuple5(E(by, a), E(ct, cq), E(cu, cr), aX((bS + cu), (bQ + ct)), cx)
314
+
            let cv = C(ci, bS)
315
+
            let cw = C(ck, bS)
316
+
            let cx = ba(cw, cv)
317
+
            let bU = C(bT, bS)
318
+
            let bW = C(bV, bS)
319
+
            let cy = if ((bQ == 0))
320
+
                then {
321
+
                    let bX = e
322
+
                    let cz = e
323
+
                    let cA = pow((cv * cw), 0, toBigInt(5), 1, 0, DOWN)
324
+
                    $Tuple5(F(cA, a), F(cv, bS), F(cw, bS), ba((bW + cw), (bU + cv)), cz)
325
+
                    }
326
+
                else {
327
+
                    let bX = ba(bW, bU)
328
+
                    let cB = fraction(M((bX - cx)), c, bX)
329
+
                    let cz = C(ch, a)
330
+
                    if (if ((bX != e))
331
+
                        then (cB > cz)
332
+
                        else false)
333
+
                        then am(((("Price slippage " + toString(cB)) + " > ") + toString(cz)))
334
+
                        else {
335
+
                            let ca = C(bQ, a)
336
+
                            let cC = fraction(cv, bX, c)
337
+
                            let cD = fraction(cw, c, bX)
338
+
                            let cE = if ((cC > cw))
339
+
                                then $Tuple2(cD, cv)
340
+
                                else $Tuple2(cv, cC)
341
+
                            let cF = cE._1
342
+
                            let cG = cE._2
343
+
                            let cA = fraction(ca, cG, bW)
344
+
                            $Tuple5(F(cA, a), F(cF, bS), F(cG, bS), bX, cz)
345
+
                            }
346
+
                    }
347
+
            let cH = cy._1
348
+
            let cI = cy._2
349
+
            let cJ = cy._3
350
+
            let cK = F(cy._4, a)
351
+
            let cL = F(cy._5, a)
352
+
            let cM = if ((cH > 0))
353
+
                then true
354
+
                else am("LP <= 0")
355
+
            if ((cM == cM))
356
+
                then {
357
+
                    let cN = if (!(cn))
358
+
                        then 0
359
+
                        else cH
360
+
                    let cO = (ci - cI)
361
+
                    let cP = (ck - cJ)
362
+
                    let cQ = if (if (co)
363
+
                        then (cq == cr)
364
+
                        else false)
365
+
                        then $Tuple2(cp, 0)
366
+
                        else if (if (co)
367
+
                            then (cq == cs)
368
+
                            else false)
369
+
                            then $Tuple2(0, cp)
370
+
                            else $Tuple2(cI, cJ)
371
+
                    let cR = cQ._1
372
+
                    let cS = cQ._2
373
+
                    let cT = [IntegerEntry(Q(), cK), IntegerEntry(R(height, lastBlock.timestamp), cK), StringEntry(U(bJ, bG), aJ(cR, cS, cN, cK, ch, cL, height, lastBlock.timestamp, cO, cP))]
374
+
                    $Tuple13(cH, cN, cK, bT, bV, bQ, bK, bP, cT, cO, cP, cj, cl)
375
+
                    }
376
+
                else throw("Strict value is not equal to itself.")
305
377
 
            }
306
-
        else {
307
-
            let bT = aX(bS, bQ)
308
-
            let cy = fraction(L((bT - cv)), c, bT)
309
-
            let cx = B(bd, a)
310
-
            if (if ((bT != d))
311
-
                then (cy > cx)
312
-
                else false)
313
-
                then throw(((("Price slippage " + toString(cy)) + " > ") + toString(cx)))
314
-
                else {
315
-
                    let cz = B(cs, a)
316
-
                    let cA = fraction(ct, bT, c)
317
-
                    let cB = fraction(cu, c, bT)
318
-
                    let cC = if ((cA > cu))
319
-
                        then $Tuple2(cB, cu)
320
-
                        else $Tuple2(ct, cA)
321
-
                    let cD = cC._1
322
-
                    let cE = cC._2
323
-
                    let by = fraction(cz, cE, bS)
324
-
                    $Tuple5(E(by, a), E(cD, cq), E(cE, cr), bT, cx)
325
-
                    }
326
-
            }
327
-
    let cF = cw._1
328
-
    let cG = cw._2
329
-
    let cH = cw._3
330
-
    let bU = E(cw._4, a)
331
-
    let cI = E(cw._5, a)
332
-
    if ((0 >= cF))
333
-
        then throw("LP <= 0")
334
-
        else {
335
-
            let cJ = if (!(ci))
336
-
                then 0
337
-
                else cF
338
-
            let cK = (cd - cG)
339
-
            let cL = (cf - cH)
340
-
            let cM = if (if (cj)
341
-
                then (cl == cm)
342
-
                else false)
343
-
                then $Tuple2(ck, 0)
344
-
                else if (if (cj)
345
-
                    then (cl == cn)
346
-
                    else false)
347
-
                    then $Tuple2(0, ck)
348
-
                    else $Tuple2(cG, cH)
349
-
            let cN = cM._1
350
-
            let cO = cM._2
351
-
            let cP = [IntegerEntry(P(), bU), IntegerEntry(Q(height, lastBlock.timestamp), bU), StringEntry(T(bH, bE), aG(cN, cO, cJ, bU, bd, cI, height, lastBlock.timestamp, cK, cL))]
352
-
            $Tuple13(cF, cJ, bU, bP, bR, cs, bI, bN, cP, cK, cL, ce, cg)
353
-
            }
378
+
        else throw("Strict value is not equal to itself.")
354
379
 
    }
355
380
 
356
381
 
357
-
func cQ (cR) = {
358
-
    let bu = aB()
359
-
    let cS = bu[r]
360
-
    let cT = bu[s]
361
-
    let bN = parseIntValue(bu[p])
362
-
    let bv = parseIntValue(bu[t])
363
-
    let bw = parseIntValue(bu[u])
364
-
    let cU = aV(cS)
365
-
    let cV = aV(cT)
366
-
    let bT = if ((cR.orderType == Buy))
367
-
        then bl(bv, bw, (cU + cR.amount), cV)
368
-
        else bl(bv, bw, (cU - cR.amount), cV)
369
-
    let bU = E(bT, a)
370
-
    if (if (if (az())
382
+
func cU (cV) = {
383
+
    let bw = aE()
384
+
    let cW = bw[s]
385
+
    let cX = bw[t]
386
+
    let bP = parseIntValue(bw[q])
387
+
    let bx = parseIntValue(bw[u])
388
+
    let by = parseIntValue(bw[v])
389
+
    let cY = aY(cW)
390
+
    let cZ = aY(cX)
391
+
    let bX = if ((cV.orderType == Buy))
392
+
        then bn(bx, by, (cY + cV.amount), cZ)
393
+
        else bn(bx, by, (cY - cV.amount), cZ)
394
+
    let bY = F(bX, a)
395
+
    if (if (if (aB())
371
396
 
        then true
372
-
        else (bN == m))
397
+
        else (bP == n))
373
398
 
        then true
374
-
        else (bN == n))
375
-
        then throw("Admin blocked")
399
+
        else (bP == o))
400
+
        then am("Admin blocked")
376
401
 
        else {
377
-
            let cW = cR.assetPair.amountAsset
378
-
            let cX = if ((cW == unit))
402
+
            let da = cV.assetPair.amountAsset
403
+
            let db = if ((da == unit))
379
404
 
                then "WAVES"
380
-
                else toBase58String(value(cW))
381
-
            let cY = cR.assetPair.priceAsset
382
-
            let cZ = if ((cY == unit))
405
+
                else toBase58String(value(da))
406
+
            let dc = cV.assetPair.priceAsset
407
+
            let dd = if ((dc == unit))
383
408
 
                then "WAVES"
384
-
                else toBase58String(value(cY))
385
-
            if (if ((cX != cS))
409
+
                else toBase58String(value(dc))
410
+
            if (if ((db != cW))
386
411
 
                then true
387
-
                else (cZ != cT))
388
-
                then throw("Wr assets")
412
+
                else (dd != cX))
413
+
                then am("Wr assets")
389
414
 
                else {
390
-
                    let da = cR.price
391
-
                    let cr = fraction(a, bw, bv)
392
-
                    let db = H(da, a, cr)
393
-
                    let dc = if ((cR.orderType == Buy))
394
-
                        then (bU >= db)
395
-
                        else (db >= bU)
415
+
                    let de = cV.price
416
+
                    let bO = fraction(a, by, bx)
417
+
                    let df = I(de, a, bO)
418
+
                    let dg = if ((cV.orderType == Buy))
419
+
                        then (bY >= df)
420
+
                        else (df >= bY)
396
421
 
                    true
397
422
 
                    }
398
423
 
            }
399
424
 
    }
400
425
 
401
426
 
402
-
func dd (de) = if ((size(de.payments) != 1))
403
-
    then throw("1 pmnt exp")
404
-
    else {
405
-
        let df = value(de.payments[0])
406
-
        let bF = value(df.assetId)
407
-
        let ck = df.amount
408
-
        let cw = bD(toBase58String(de.transactionId), toBase58String(bF), ck, de.caller)
409
-
        let bZ = cw._1
410
-
        let ca = cw._2
411
-
        let bN = parseIntValue(cw._9)
412
-
        let cb = cw._10
413
-
        if (if (az())
414
-
            then true
415
-
            else (bN == n))
416
-
            then throw(("Admin blocked: " + toString(bN)))
417
-
            else $Tuple5(bZ, ca, ck, bF, cb)
418
-
        }
419
-
420
-
421
-
func dg (ac,V,dh,di,bd,ci,cj,ck,cl) = {
422
-
    let cw = cc(V, bd, value(dh).amount, value(dh).assetId, value(di).amount, value(di).assetId, ac, false, ci, cj, ck, cl)
423
-
    let bN = parseIntValue(cw._8)
424
-
    if (if (if (az())
427
+
func dh (di) = {
428
+
    let dj = if ((size(di.payments) == 1))
425
429
 
        then true
426
-
        else (bN == l))
427
-
        then true
428
-
        else (bN == n))
429
-
        then throw(("Blocked:" + toString(bN)))
430
-
        else cw
430
+
        else am("1 payment expected")
431
+
    if ((dj == dj))
432
+
        then {
433
+
            let dk = value(di.payments[0])
434
+
            let bH = value(dk.assetId)
435
+
            let cp = dk.amount
436
+
            let cy = bF(toBase58String(di.transactionId), toBase58String(bH), cp, di.caller)
437
+
            let cd = cy._1
438
+
            let ce = cy._2
439
+
            let bP = parseIntValue(cy._9)
440
+
            let cf = cy._10
441
+
            if (if (aB())
442
+
                then true
443
+
                else (bP == o))
444
+
                then am(("Admin blocked: " + toString(bP)))
445
+
                else $Tuple5(cd, ce, cp, bH, cf)
446
+
            }
447
+
        else throw("Strict value is not equal to itself.")
431
448
 
    }
432
449
 
433
450
 
434
-
func dj () = {
435
-
    let ar = getString(N())
436
-
    if ($isInstanceOf(ar, "String"))
451
+
func dl (dm,W,dn,do,bg,cn,co,cp,cq) = {
452
+
    let cy = cg(W, bg, value(dn).amount, value(dn).assetId, value(do).amount, value(do).assetId, dm, false, cn, co, cp, cq)
453
+
    let bP = parseIntValue(cy._8)
454
+
    if (if (if (aB())
455
+
        then true
456
+
        else (bP == m))
457
+
        then true
458
+
        else (bP == o))
459
+
        then am(("Blocked:" + toString(bP)))
460
+
        else cy
461
+
    }
462
+
463
+
464
+
func dp (dq) = {
465
+
    let dr = fraction(dq, ad, d)
466
+
    $Tuple2((dq - dr), dr)
467
+
    }
468
+
469
+
470
+
func ds () = {
471
+
    let at = getString(O())
472
+
    if ($isInstanceOf(at, "String"))
437
473
 
        then {
438
-
            let dk = ar
439
-
            fromBase58String(dk)
474
+
            let dt = at
475
+
            fromBase58String(dt)
440
476
 
            }
441
-
        else if ($isInstanceOf(ar, "Unit"))
477
+
        else if ($isInstanceOf(at, "Unit"))
442
478
 
            then unit
443
479
 
            else throw("Match error")
444
480
 
    }
445
481
 
446
482
 
447
-
func dl () = {
448
-
    let ar = getString(O())
449
-
    if ($isInstanceOf(ar, "String"))
483
+
func du () = {
484
+
    let at = getString(P())
485
+
    if ($isInstanceOf(at, "String"))
450
486
 
        then {
451
-
            let dk = ar
452
-
            fromBase58String(dk)
487
+
            let dt = at
488
+
            fromBase58String(dt)
453
489
 
            }
454
-
        else if ($isInstanceOf(ar, "Unit"))
490
+
        else if ($isInstanceOf(at, "Unit"))
455
491
 
            then unit
456
492
 
            else throw("Match error")
457
493
 
    }
458
494
 
459
495
 
460
-
let dm = throw("Permission denied")
496
+
let dv = am("Permission denied")
461
497
 
462
-
func dn (de) = {
463
-
    let ar = dj()
464
-
    if ($isInstanceOf(ar, "ByteVector"))
498
+
func dw (di) = {
499
+
    let at = ds()
500
+
    if ($isInstanceOf(at, "ByteVector"))
465
501
 
        then {
466
-
            let do = ar
467
-
            if ((de.callerPublicKey == do))
502
+
            let dx = at
503
+
            if ((di.callerPublicKey == dx))
468
504
 
                then true
469
-
                else dm
505
+
                else dv
470
506
 
            }
471
-
        else if ($isInstanceOf(ar, "Unit"))
472
-
            then if ((de.caller == this))
507
+
        else if ($isInstanceOf(at, "Unit"))
508
+
            then if ((di.caller == this))
473
509
 
                then true
474
-
                else dm
510
+
                else dv
475
511
 
            else throw("Match error")
476
512
 
    }
477
513
 
478
514
 
479
-
@Callable(de)
480
-
func constructor (M) = {
481
-
    let dp = dn(de)
482
-
    if ((dp == dp))
483
-
        then [StringEntry(M(), M)]
515
+
@Callable(di)
516
+
func constructor (az) = {
517
+
    let dy = dw(di)
518
+
    if ((dy == dy))
519
+
        then [StringEntry(N(), az)]
484
520
 
        else throw("Strict value is not equal to itself.")
485
521
 
    }
486
522
 
487
523
 
488
524
 
489
-
@Callable(de)
490
-
func setManager (dq) = {
491
-
    let dp = dn(de)
492
-
    if ((dp == dp))
525
+
@Callable(di)
526
+
func setManager (dz) = {
527
+
    let dy = dw(di)
528
+
    if ((dy == dy))
493
529
 
        then {
494
-
            let dr = fromBase58String(dq)
495
-
            if ((dr == dr))
496
-
                then [StringEntry(O(), dq)]
530
+
            let dA = fromBase58String(dz)
531
+
            if ((dA == dA))
532
+
                then [StringEntry(P(), dz)]
497
533
 
                else throw("Strict value is not equal to itself.")
498
534
 
            }
499
535
 
        else throw("Strict value is not equal to itself.")
500
536
 
    }
501
537
 
502
538
 
503
539
 
504
-
@Callable(de)
540
+
@Callable(di)
505
541
 
func confirmManager () = {
506
-
    let bC = dl()
507
-
    let ds = if (isDefined(bC))
542
+
    let dB = du()
543
+
    let dC = if (isDefined(dB))
508
544
 
        then true
509
-
        else throw("No pending manager")
510
-
    if ((ds == ds))
545
+
        else am("No pending manager")
546
+
    if ((dC == dC))
511
547
 
        then {
512
-
            let dt = if ((de.callerPublicKey == value(bC)))
548
+
            let dD = if ((di.callerPublicKey == value(dB)))
513
549
 
                then true
514
-
                else throw("You are not pending manager")
515
-
            if ((dt == dt))
516
-
                then [StringEntry(N(), toBase58String(value(bC))), DeleteEntry(O())]
550
+
                else am("You are not pending manager")
551
+
            if ((dD == dD))
552
+
                then [StringEntry(O(), toBase58String(value(dB))), DeleteEntry(P())]
517
553
 
                else throw("Strict value is not equal to itself.")
518
554
 
            }
519
555
 
        else throw("Strict value is not equal to itself.")
520
556
 
    }
521
557
 
522
558
 
523
559
 
524
-
@Callable(de)
525
-
func put (du,dv) = {
526
-
    let dw = aF()
527
-
    let dx = valueOrErrorMessage(addressFromString(dw[x]), "Wr st addr")
528
-
    let dy = valueOrErrorMessage(addressFromString(dw[y]), "Wr sl addr")
529
-
    if ((0 > du))
530
-
        then throw("Wrong slippage")
531
-
        else if ((size(de.payments) != 2))
532
-
            then throw("2 pmnts expd")
533
-
            else {
534
-
                let dz = dg(toString(de.caller), toBase58String(de.transactionId), AttachedPayment(value(de.payments[0]).assetId, value(de.payments[0]).amount), de.payments[1], du, true, false, 0, "")
535
-
                let cJ = dz._2
536
-
                let dA = dz._7
537
-
                let cb = dz._9
538
-
                let cK = dz._10
539
-
                let cL = dz._11
540
-
                let bJ = dz._12
541
-
                let bK = dz._13
542
-
                let cw = invoke(ax, "emit", [cJ], nil)
543
-
                if ((cw == cw))
544
-
                    then {
545
-
                        let dB = {
546
-
                            let ar = cw
547
-
                            if ($isInstanceOf(ar, "Address"))
560
+
@Callable(di)
561
+
func put (bg,dE) = {
562
+
    let dF = aI()
563
+
    let dG = valueOrErrorMessage(addressFromString(dF[y]), "Wrong staking contract")
564
+
    let dH = valueOrErrorMessage(addressFromString(dF[z]), "Wrogn slippage contract")
565
+
    let dI = if ((bg >= 0))
566
+
        then true
567
+
        else am("wrong slippage")
568
+
    if ((dI == dI))
569
+
        then {
570
+
            let dJ = if ((size(di.payments) == 2))
571
+
                then true
572
+
                else am("2 payments expected")
573
+
            if ((dJ == dJ))
574
+
                then {
575
+
                    let dK = dl(toString(di.caller), toBase58String(di.transactionId), AttachedPayment(value(di.payments[0]).assetId, value(di.payments[0]).amount), di.payments[1], bg, true, false, 0, "")
576
+
                    let cN = dK._2
577
+
                    let bK = dK._7
578
+
                    let cf = dK._9
579
+
                    let cO = dK._10
580
+
                    let cP = dK._11
581
+
                    let bL = dK._12
582
+
                    let bM = dK._13
583
+
                    let cy = invoke(az, "emit", [cN], nil)
584
+
                    if ((cy == cy))
585
+
                        then {
586
+
                            let dL = {
587
+
                                let at = cy
588
+
                                if ($isInstanceOf(at, "Address"))
589
+
                                    then {
590
+
                                        let dM = at
591
+
                                        invoke(dM, "emit", [cN], nil)
592
+
                                        }
593
+
                                    else unit
594
+
                                }
595
+
                            if ((dL == dL))
548
596
 
                                then {
549
-
                                    let dC = ar
550
-
                                    invoke(dC, "emit", [cJ], nil)
551
-
                                    }
552
-
                                else unit
553
-
                            }
554
-
                        if ((dB == dB))
555
-
                            then {
556
-
                                let dD = if ((cK > 0))
557
-
                                    then invoke(dy, "put", nil, [AttachedPayment(bJ, cK)])
558
-
                                    else nil
559
-
                                if ((dD == dD))
560
-
                                    then {
561
-
                                        let dE = if ((cL > 0))
562
-
                                            then invoke(dy, "put", nil, [AttachedPayment(bK, cL)])
563
-
                                            else nil
564
-
                                        if ((dE == dE))
565
-
                                            then {
566
-
                                                let dF = if (dv)
567
-
                                                    then {
568
-
                                                        let dG = invoke(dx, "stake", nil, [AttachedPayment(dA, cJ)])
569
-
                                                        if ((dG == dG))
570
-
                                                            then nil
571
-
                                                            else throw("Strict value is not equal to itself.")
572
-
                                                        }
573
-
                                                    else [ScriptTransfer(de.caller, cJ, dA)]
574
-
                                                (cb ++ dF)
575
-
                                                }
576
-
                                            else throw("Strict value is not equal to itself.")
577
-
                                        }
578
-
                                    else throw("Strict value is not equal to itself.")
579
-
                                }
580
-
                            else throw("Strict value is not equal to itself.")
581
-
                        }
582
-
                    else throw("Strict value is not equal to itself.")
583
-
                }
584
-
    }
585
-
586
-
587
-
588
-
@Callable(de)
589
-
func putOneTkn (dH,dI,dJ,bd,dv) = {
590
-
    let bu = aF()
591
-
    let dx = valueOrErrorMessage(addressFromString(bu[x]), "Wr st addr")
592
-
    let dy = valueOrErrorMessage(addressFromString(bu[y]), "Wr sl addr")
593
-
    let dK = valueOrErrorMessage(addressFromString(bu[z]), "Wr gwx addr")
594
-
    let dL = aB()
595
-
    let bJ = dL[r]
596
-
    let bK = dL[s]
597
-
    let bL = parseIntValue(dL[t])
598
-
    let bM = parseIntValue(dL[u])
599
-
    let dM = valueOrElse(getString(this, aa()), "")
600
-
    let bH = if ((dM == toString(de.caller)))
601
-
        then de.originCaller
602
-
        else de.caller
603
-
    let dN = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(aa()), "no addons")), "addon address in not valid")
604
-
    let dO = reentrantInvoke(dN, "ensureCanPutOneTkn", [toString(bH)], nil)
605
-
    if ((dO == dO))
606
-
        then if (if (if (if ((0 >= bd))
607
-
            then true
608
-
            else (0 >= dH))
609
-
            then true
610
-
            else (0 >= dI))
611
-
            then true
612
-
            else (0 >= dJ))
613
-
            then throw("Wrong params")
614
-
            else if ((size(de.payments) != 1))
615
-
                then throw("1 pmnt expd")
616
-
                else {
617
-
                    let df = value(de.payments[0])
618
-
                    let bF = toBase58String(value(df.assetId))
619
-
                    let ck = df.amount
620
-
                    if (if (if ((dH > ck))
621
-
                        then true
622
-
                        else (dI > ck))
623
-
                        then true
624
-
                        else (10000000 > ck))
625
-
                        then throw("Wrong pmt amt")
626
-
                        else {
627
-
                            let bP = aV(bJ)
628
-
                            let bR = aV(bK)
629
-
                            let dP = if ((bF == bJ))
630
-
                                then $Tuple6((bP - ck), bR, (ck - dH), dI, 0, 0)
631
-
                                else if ((bF == bK))
632
-
                                    then $Tuple6(bP, (bR - ck), 0, 0, (ck - dI), dH)
633
-
                                    else throw("wrong pmtAssetId")
634
-
                            let dQ = dP._1
635
-
                            let dR = dP._2
636
-
                            let dS = dP._3
637
-
                            let dT = dP._4
638
-
                            let dU = dP._5
639
-
                            let dV = dP._6
640
-
                            let bi = invoke(dK, "calcD", [toString(dQ), toString(dR), ay, g, h], nil)
641
-
                            let bh = invoke(dK, "calcD", [toString(toBigInt(((dQ + dS) - dV))), toString(toBigInt(((dR + dU) - dT))), ay, g, h], nil)
642
-
                            let dW = bg(parseBigIntValue(aq(bh)), parseBigIntValue(aq(bi)), f)
643
-
                            if ((dW == dW))
644
-
                                then {
645
-
                                    let dX = dg(toString(de.caller), toBase58String(de.transactionId), AttachedPayment(fromBase58String(bJ), dH), AttachedPayment(fromBase58String(bK), dI), bd, true, true, ck, bF)
646
-
                                    let dY = dX._2
647
-
                                    let dA = dX._7
648
-
                                    let cb = dX._9
649
-
                                    let cK = dX._10
650
-
                                    let cL = dX._11
651
-
                                    let dZ = ba(toBigInt(dY), toBigInt(dJ), toBigInt(bd))
652
-
                                    let cJ = toInt(dZ._2)
653
-
                                    let dz = invoke(ax, "emit", [cJ], nil)
654
-
                                    if ((dz == dz))
597
+
                                    let dN = if ((cO > 0))
598
+
                                        then invoke(dH, "put", nil, [AttachedPayment(bL, cO)])
599
+
                                        else nil
600
+
                                    if ((dN == dN))
655
601
 
                                        then {
656
-
                                            let dB = {
657
-
                                                let ar = dz
658
-
                                                if ($isInstanceOf(ar, "Address"))
659
-
                                                    then {
660
-
                                                        let dC = ar
661
-
                                                        invoke(dC, "emit", [cJ], nil)
662
-
                                                        }
663
-
                                                    else unit
664
-
                                                }
665
-
                                            if ((dB == dB))
602
+
                                            let dO = if ((cP > 0))
603
+
                                                then invoke(dH, "put", nil, [AttachedPayment(bM, cP)])
604
+
                                                else nil
605
+
                                            if ((dO == dO))
666
606
 
                                                then {
667
-
                                                    let dD = if ((cK > 0))
668
-
                                                        then invoke(dy, "put", nil, [AttachedPayment(fromBase58String(bJ), cK)])
669
-
                                                        else nil
670
-
                                                    if ((dD == dD))
607
+
                                                    let dP = if (dE)
671
608
 
                                                        then {
672
-
                                                            let dE = if ((cL > 0))
673
-
                                                                then invoke(dy, "put", nil, [AttachedPayment(fromBase58String(bK), cL)])
674
-
                                                                else nil
675
-
                                                            if ((dE == dE))
676
-
                                                                then {
677
-
                                                                    let dF = if (dv)
678
-
                                                                        then {
679
-
                                                                            let dG = invoke(dx, "stake", nil, [AttachedPayment(dA, cJ)])
680
-
                                                                            if ((dG == dG))
681
-
                                                                                then nil
682
-
                                                                                else throw("Strict value is not equal to itself.")
683
-
                                                                            }
684
-
                                                                        else [ScriptTransfer(de.caller, cJ, dA)]
685
-
                                                                    (cb ++ dF)
686
-
                                                                    }
609
+
                                                            let dQ = invoke(dG, "stake", nil, [AttachedPayment(bK, cN)])
610
+
                                                            if ((dQ == dQ))
611
+
                                                                then nil
687
612
 
                                                                else throw("Strict value is not equal to itself.")
688
613
 
                                                            }
689
-
                                                        else throw("Strict value is not equal to itself.")
614
+
                                                        else [ScriptTransfer(di.caller, cN, bK)]
615
+
                                                    (cf ++ dP)
690
616
 
                                                    }
691
617
 
                                                else throw("Strict value is not equal to itself.")
692
618
 
                                            }
693
619
 
                                        else throw("Strict value is not equal to itself.")
694
620
 
                                    }
695
-
                                else throw("Strict value is not equal to itself.")
696
-
                            }
697
-
                    }
698
-
        else throw("Strict value is not equal to itself.")
699
-
    }
700
-
701
-
702
-
703
-
@Callable(de)
704
-
func putForFree (ea) = if ((0 > ea))
705
-
    then throw("Wrong slpg")
706
-
    else if ((size(de.payments) != 2))
707
-
        then throw("2 pmnts expd")
708
-
        else {
709
-
            let dX = dg(toString(de.caller), toBase58String(de.transactionId), AttachedPayment(value(de.payments[0]).assetId, value(de.payments[0]).amount), de.payments[1], ea, false, false, 0, "")
710
-
            dX._9
711
-
            }
712
-
713
-
714
-
715
-
@Callable(de)
716
-
func get () = {
717
-
    let cw = dd(de)
718
-
    let eb = cw._1
719
-
    let ca = cw._2
720
-
    let ck = cw._3
721
-
    let bF = cw._4
722
-
    let cb = cw._5
723
-
    let ec = invoke(ax, "burn", [ck], [AttachedPayment(bF, ck)])
724
-
    if ((ec == ec))
725
-
        then cb
726
-
        else throw("Strict value is not equal to itself.")
727
-
    }
728
-
729
-
730
-
731
-
@Callable(de)
732
-
func getOneTkn (ed,ee,ef,eg,bd) = if ((size(de.payments) != 1))
733
-
    then throw("1 pmnt expd")
734
-
    else {
735
-
        let bu = aB()
736
-
        let bI = bu[q]
737
-
        let bJ = bu[r]
738
-
        let bK = bu[s]
739
-
        let bL = parseIntValue(bu[t])
740
-
        let bM = parseIntValue(bu[u])
741
-
        let bN = bu[p]
742
-
        let dw = aF()
743
-
        let dK = valueOrErrorMessage(addressFromString(dw[z]), "Wr sl addr")
744
-
        let df = value(de.payments[0])
745
-
        let dM = valueOrElse(getString(this, aa()), "")
746
-
        let bH = if ((dM == toString(de.caller)))
747
-
            then de.originCaller
748
-
            else de.caller
749
-
        let bE = toBase58String(de.transactionId)
750
-
        let bF = value(df.assetId)
751
-
        let ck = df.amount
752
-
        let dN = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(aa()), "no addons")), "addon address in not valid")
753
-
        let dO = reentrantInvoke(dN, "ensureCanGetOneTkn", [toString(bH)], nil)
754
-
        if ((dO == dO))
755
-
            then if ((1000000000 > ck))
756
-
                then throw("Min pmt 10 LP")
757
-
                else if (if (if ((0 > bd))
758
-
                    then true
759
-
                    else (0 > ed))
760
-
                    then true
761
-
                    else (0 > ef))
762
-
                    then throw("Wrong params")
763
-
                    else if ((bI != toBase58String(bF)))
764
-
                        then throw("Wrong LP")
765
-
                        else {
766
-
                            let cw = bD(toBase58String(de.transactionId), toBase58String(bF), ck, de.caller)
767
-
                            let eh = cw._1
768
-
                            let ei = cw._2
769
-
                            let bP = aV(bJ)
770
-
                            let bR = aV(bK)
771
-
                            let ej = if ((eg == bJ))
772
-
                                then $Tuple7((bP - eh), (bR - ei), ed, ei, 0, 0, (eh + ed))
773
-
                                else if ((eg == bK))
774
-
                                    then $Tuple7((bP - eh), (bR - ei), 0, 0, ed, eh, (ei + ed))
775
-
                                    else throw("wrong outAssetId")
776
-
                            let dQ = ej._1
777
-
                            let dR = ej._2
778
-
                            let dS = ej._3
779
-
                            let dT = ej._4
780
-
                            let dU = ej._5
781
-
                            let dV = ej._6
782
-
                            let ek = ej._7
783
-
                            if (if ((0 > dS))
784
-
                                then true
785
-
                                else (0 > dU))
786
-
                                then throw("Wrong calc")
787
-
                                else {
788
-
                                    let bi = invoke(dK, "calcD", [toString(dQ), toString(dR), ay, g, h], nil)
789
-
                                    let bh = invoke(dK, "calcD", [toString(((dQ - dS) + dV)), toString(((dR + dT) - dU)), ay, g, h], nil)
790
-
                                    let dW = bg(parseBigIntValue(aq(bh)), parseBigIntValue(aq(bi)), f)
791
-
                                    if ((dW == dW))
792
-
                                        then {
793
-
                                            let el = ba(toBigInt(ek), toBigInt(ef), toBigInt(bd))
794
-
                                            if ((el == el))
795
-
                                                then {
796
-
                                                    let em = if ((eg == bJ))
797
-
                                                        then $Tuple2(toInt(el._2), 0)
798
-
                                                        else $Tuple2(0, toInt(el._2))
799
-
                                                    let en = em._1
800
-
                                                    let eo = em._2
801
-
                                                    let ep = aX(B(bR, bM), B(bP, bL))
802
-
                                                    let eq = E(ep, a)
803
-
                                                    let cb = [ScriptTransfer(bH, (en + eo), if ((eg == "WAVES"))
804
-
                                                        then unit
805
-
                                                        else fromBase58String(eg)), StringEntry(W(toString(bH), bE), aR(en, eo, ck, eq, height, lastBlock.timestamp)), IntegerEntry(P(), eq), IntegerEntry(Q(height, lastBlock.timestamp), eq)]
806
-
                                                    if ((cb == cb))
807
-
                                                        then {
808
-
                                                            let er = invoke(ax, "burn", [ck], [AttachedPayment(bF, ck)])
809
-
                                                            if ((er == er))
810
-
                                                                then cb
811
-
                                                                else throw("Strict value is not equal to itself.")
812
-
                                                            }
813
-
                                                        else throw("Strict value is not equal to itself.")
814
-
                                                    }
815
-
                                                else throw("Strict value is not equal to itself.")
816
-
                                            }
817
-
                                        else throw("Strict value is not equal to itself.")
818
-
                                    }
819
-
                            }
820
-
            else throw("Strict value is not equal to itself.")
821
-
        }
822
-
823
-
824
-
825
-
@Callable(de)
826
-
func getNoLess (es,et) = {
827
-
    let cw = dd(de)
828
-
    let bZ = cw._1
829
-
    let ca = cw._2
830
-
    let ck = cw._3
831
-
    let bF = cw._4
832
-
    let cb = cw._5
833
-
    if ((es > bZ))
834
-
        then throw(((("Failed:  " + toString(bZ)) + " < ") + toString(es)))
835
-
        else if ((et > ca))
836
-
            then throw(((("Failed: " + toString(ca)) + " < ") + toString(et)))
837
-
            else {
838
-
                let eu = invoke(ax, "burn", [ck], [AttachedPayment(bF, ck)])
839
-
                if ((eu == eu))
840
-
                    then cb
841
-
                    else throw("Strict value is not equal to itself.")
842
-
                }
843
-
    }
844
-
845
-
846
-
847
-
@Callable(de)
848
-
func unstakeAndGet (ev) = {
849
-
    let ew = if ((size(de.payments) != 0))
850
-
        then throw("No pmnts expd")
851
-
        else true
852
-
    if ((ew == ew))
853
-
        then {
854
-
            let bu = aB()
855
-
            let ex = aF()
856
-
            let dA = fromBase58String(bu[q])
857
-
            let ey = valueOrErrorMessage(addressFromString(ex[x]), "Wr st addr")
858
-
            let ez = invoke(ey, "unstake", [toBase58String(dA), ev], nil)
859
-
            if ((ez == ez))
860
-
                then {
861
-
                    let cw = bD(toBase58String(de.transactionId), toBase58String(dA), ev, de.caller)
862
-
                    let bN = parseIntValue(cw._9)
863
-
                    let cb = cw._10
864
-
                    let eA = if (if (az())
865
-
                        then true
866
-
                        else (bN == n))
867
-
                        then throw(("Blocked: " + toString(bN)))
868
-
                        else true
869
-
                    if ((eA == eA))
870
-
                        then {
871
-
                            let eB = invoke(ax, "burn", [ev], [AttachedPayment(dA, ev)])
872
-
                            if ((eB == eB))
873
-
                                then cb
874
621
 
                                else throw("Strict value is not equal to itself.")
875
622
 
                            }
876
623
 
                        else throw("Strict value is not equal to itself.")
877
624
 
                    }
878
625
 
                else throw("Strict value is not equal to itself.")
879
626
 
            }
880
627
 
        else throw("Strict value is not equal to itself.")
881
628
 
    }
882
629
 
883
630
 
884
631
 
885
-
@Callable(de)
886
-
func activate (eC,eD) = if ((toString(de.caller) != toString(ax)))
887
-
    then throw("denied")
888
-
    else $Tuple2([StringEntry(X(), eC), StringEntry(Y(), eD)], "success")
889
-
890
-
891
-
892
-
@Callable(de)
893
-
func setS (eE,eA) = if ((toString(de.caller) != at(this, aa())))
894
-
    then dm
895
-
    else [StringEntry(eE, eA)]
896
-
897
-
898
-
899
-
@Callable(de)
900
-
func setI (eE,eA) = if ((toString(de.caller) != at(this, aa())))
901
-
    then dm
902
-
    else [IntegerEntry(eE, eA)]
903
-
904
-
905
-
906
-
@Callable(de)
907
-
func getPoolConfigWrapperREADONLY () = $Tuple2(nil, aB())
908
-
909
-
910
-
911
-
@Callable(de)
912
-
func getAccBalanceWrapperREADONLY (aW) = $Tuple2(nil, aV(aW))
913
-
914
-
915
-
916
-
@Callable(de)
917
-
func calcPricesWrapperREADONLY (bo,bp,bt) = {
918
-
    let eF = bs(bo, bp, bt)
919
-
    $Tuple2(nil, [toString(eF[0]), toString(eF[1]), toString(eF[2])])
632
+
@Callable(di)
633
+
func putOneTkn (dR,dS,bf,bg,dE) = {
634
+
    let bw = aI()
635
+
    let dG = valueOrErrorMessage(addressFromString(bw[y]), "Wrong staking contract")
636
+
    let dH = valueOrErrorMessage(addressFromString(bw[z]), "Wrong slippage contract")
637
+
    let dT = valueOrErrorMessage(addressFromString(bw[A]), "Wrong gwx reward contract")
638
+
    let dU = aE()
639
+
    let bL = dU[s]
640
+
    let bM = dU[t]
641
+
    let bN = parseIntValue(dU[u])
642
+
    let bO = parseIntValue(dU[v])
643
+
    let dV = valueOrElse(getString(this, ab()), "")
644
+
    let bJ = if ((dV == toString(di.caller)))
645
+
        then di.originCaller
646
+
        else di.caller
647
+
    if (if (if (if ((0 >= bg))
648
+
        then true
649
+
        else (0 >= dR))
650
+
        then true
651
+
        else (0 >= dS))
652
+
        then true
653
+
        else (0 >= bf))
654
+
        then am("Wrong params")
655
+
        else if ((size(di.payments) != 1))
656
+
            then am("1 payment expected")
657
+
            else {
658
+
                let dk = value(di.payments[0])
659
+
                let bH = toBase58String(value(dk.assetId))
660
+
                let dW = dk.amount
661
+
                let dX = dp(dW)
662
+
                let cp = dX._1
663
+
                let dY = dX._2
664
+
                if (if (if ((dR > cp))
665
+
                    then true
666
+
                    else (dS > cp))
667
+
                    then true
668
+
                    else (10000000 > cp))
669
+
                    then am("wrong payment amount")
670
+
                    else {
671
+
                        let bT = aY(bL)
672
+
                        let bV = aY(bM)
673
+
                        let dZ = if ((bH == bL))
674
+
                            then $Tuple6((bT - cp), bV, (cp - dR), dS, 0, 0)
675
+
                            else if ((bH == bM))
676
+
                                then $Tuple6(bT, (bV - cp), 0, 0, (cp - dS), dR)
677
+
                                else am("wrong paymentAssetId")
678
+
                        let ea = dZ._1
679
+
                        let eb = dZ._2
680
+
                        let ec = dZ._3
681
+
                        let ed = dZ._4
682
+
                        let ee = dZ._5
683
+
                        let ef = dZ._6
684
+
                        let bl = invoke(dT, "calcD", [toString(ea), toString(eb), aA, h, i], nil)
685
+
                        let bk = invoke(dT, "calcD", [toString(toBigInt(((ea + ec) - ef))), toString(toBigInt(((eb + ee) - ed))), aA, h, i], nil)
686
+
                        let eg = bj(parseBigIntValue(as(bk)), parseBigIntValue(as(bl)), g)
687
+
                        if ((eg == eg))
688
+
                            then {
689
+
                                let dK = dl(toString(di.caller), toBase58String(di.transactionId), AttachedPayment(fromBase58String(bL), dR), AttachedPayment(fromBase58String(bM), dS), bg, true, true, cp, bH)
690
+
                                let be = dK._2
691
+
                                let bK = dK._7
692
+
                                let cf = dK._9
693
+
                                let cO = dK._10
694
+
                                let cP = dK._11
695
+
                                let eh = bd(toBigInt(be), toBigInt(bf), toBigInt(bg))
696
+
                                let cN = toInt(eh._2)
697
+
                                let ei = invoke(az, "emit", [cN], nil)
698
+
                                if ((ei == ei))
699
+
                                    then {
700
+
                                        let dL = {
701
+
                                            let at = ei
702
+
                                            if ($isInstanceOf(at, "Address"))
703
+
                                                then {
704
+
                                                    let dM = at
705
+
                                                    invoke(dM, "emit", [cN], nil)
706
+
                                                    }
707
+
                                                else unit
708
+
                                            }
709
+
                                        if ((dL == dL))
710
+
                                            then {
711
+
                                                let dN = if ((cO > 0))
712
+
                                                    then invoke(dH, "put", nil, [AttachedPayment(fromBase58String(bL), cO)])
713
+
                                                    else nil
714
+
                                                if ((dN == dN))
715
+
                                                    then {
716
+
                                                        let dO = if ((cP > 0))
717
+
                                                            then invoke(dH, "put", nil, [AttachedPayment(fromBase58String(bM), cP)])
718
+
                                                            else nil
719
+
                                                        if ((dO == dO))
720
+
                                                            then {
721
+
                                                                let dP = if (dE)
722
+
                                                                    then {
723
+
                                                                        let dQ = invoke(dG, "stake", nil, [AttachedPayment(bK, cN)])
724
+
                                                                        if ((dQ == dQ))
725
+
                                                                            then nil
726
+
                                                                            else throw("Strict value is not equal to itself.")
727
+
                                                                        }
728
+
                                                                    else [ScriptTransfer(di.caller, cN, bK)]
729
+
                                                                let ej = if ((dY > 0))
730
+
                                                                    then [ScriptTransfer(aD, dY, fromBase58String(bH))]
731
+
                                                                    else nil
732
+
                                                                ((cf ++ dP) ++ ej)
733
+
                                                                }
734
+
                                                            else throw("Strict value is not equal to itself.")
735
+
                                                        }
736
+
                                                    else throw("Strict value is not equal to itself.")
737
+
                                                }
738
+
                                            else throw("Strict value is not equal to itself.")
739
+
                                        }
740
+
                                    else throw("Strict value is not equal to itself.")
741
+
                                }
742
+
                            else throw("Strict value is not equal to itself.")
743
+
                        }
744
+
                }
920
745
 
    }
921
746
 
922
747
 
923
748
 
924
-
@Callable(de)
925
-
func fromX18WrapperREADONLY (F,eG) = $Tuple2(nil, E(parseBigIntValue(F), eG))
749
+
@Callable(di)
750
+
func putForFree (ek) = if ((0 > ek))
751
+
    then am("wrong slippage")
752
+
    else if ((size(di.payments) != 2))
753
+
        then am("2 payments expected")
754
+
        else {
755
+
            let dK = dl(toString(di.caller), toBase58String(di.transactionId), AttachedPayment(value(di.payments[0]).assetId, value(di.payments[0]).amount), di.payments[1], ek, false, false, 0, "")
756
+
            dK._9
757
+
            }
926
758
 
927
759
 
928
760
 
929
-
@Callable(de)
930
-
func toX18WrapperREADONLY (C,D) = $Tuple2(nil, toString(B(C, D)))
761
+
@Callable(di)
762
+
func get () = {
763
+
    let cy = dh(di)
764
+
    let el = cy._1
765
+
    let ce = cy._2
766
+
    let cp = cy._3
767
+
    let bH = cy._4
768
+
    let cf = cy._5
769
+
    let em = invoke(az, "burn", [cp], [AttachedPayment(bH, cp)])
770
+
    if ((em == em))
771
+
        then cf
772
+
        else throw("Strict value is not equal to itself.")
773
+
    }
931
774
 
932
775
 
933
776
 
934
-
@Callable(de)
935
-
func calcPriceBigIntWrapperREADONLY (aY,aZ) = $Tuple2(nil, toString(aX(parseBigIntValue(aY), parseBigIntValue(aZ))))
777
+
@Callable(di)
778
+
func getOneTkn (en,eo,ep,eq,bg) = if ((size(di.payments) != 1))
779
+
    then am("1 payment expected")
780
+
    else {
781
+
        let bw = aE()
782
+
        let bK = bw[r]
783
+
        let bL = bw[s]
784
+
        let bM = bw[t]
785
+
        let bN = parseIntValue(bw[u])
786
+
        let bO = parseIntValue(bw[v])
787
+
        let bP = bw[q]
788
+
        let dF = aI()
789
+
        let dT = valueOrErrorMessage(addressFromString(dF[A]), "Wrong gwxRewardContract address")
790
+
        let dk = value(di.payments[0])
791
+
        let dV = valueOrElse(getString(this, ab()), "")
792
+
        let bJ = if ((dV == toString(di.caller)))
793
+
            then di.originCaller
794
+
            else di.caller
795
+
        let bG = toBase58String(di.transactionId)
796
+
        let bH = value(dk.assetId)
797
+
        let cp = dk.amount
798
+
        if ((1000000000 > cp))
799
+
            then am("Min payment 10 LP")
800
+
            else if (if (if ((0 > bg))
801
+
                then true
802
+
                else (0 > en))
803
+
                then true
804
+
                else (0 > ep))
805
+
                then am("Wrong params")
806
+
                else if ((bK != toBase58String(bH)))
807
+
                    then am("Wrong LP")
808
+
                    else {
809
+
                        let cy = bF(toBase58String(di.transactionId), toBase58String(bH), cp, di.caller)
810
+
                        let er = cy._1
811
+
                        let es = cy._2
812
+
                        let bT = aY(bL)
813
+
                        let bV = aY(bM)
814
+
                        let et = if ((eq == bL))
815
+
                            then $Tuple7((bT - er), (bV - es), en, es, 0, 0, (er + en))
816
+
                            else if ((eq == bM))
817
+
                                then $Tuple7((bT - er), (bV - es), 0, 0, en, er, (es + en))
818
+
                                else am("wrong outAssetId")
819
+
                        let ea = et._1
820
+
                        let eb = et._2
821
+
                        let ec = et._3
822
+
                        let ed = et._4
823
+
                        let ee = et._5
824
+
                        let ef = et._6
825
+
                        let eu = et._7
826
+
                        if (if ((0 > ec))
827
+
                            then true
828
+
                            else (0 > ee))
829
+
                            then am("Wrong calc")
830
+
                            else {
831
+
                                let bl = invoke(dT, "calcD", [toString(ea), toString(eb), aA, h, i], nil)
832
+
                                let bk = invoke(dT, "calcD", [toString(((ea - ec) + ef)), toString(((eb + ed) - ee)), aA, h, i], nil)
833
+
                                let eg = bj(parseBigIntValue(as(bk)), parseBigIntValue(as(bl)), g)
834
+
                                if ((eg == eg))
835
+
                                    then {
836
+
                                        let ev = bd(toBigInt(eu), toBigInt(ep), toBigInt(bg))
837
+
                                        if ((ev == ev))
838
+
                                            then {
839
+
                                                let ew = if ((eq == bL))
840
+
                                                    then $Tuple2(toInt(ev._2), 0)
841
+
                                                    else $Tuple2(0, toInt(ev._2))
842
+
                                                let ex = ew._1
843
+
                                                let ey = ew._2
844
+
                                                let ez = (ex + ey)
845
+
                                                let eA = dp(ez)
846
+
                                                let eB = eA._1
847
+
                                                let dY = eA._2
848
+
                                                let eC = if ((eq == "WAVES"))
849
+
                                                    then unit
850
+
                                                    else fromBase58String(eq)
851
+
                                                let ej = if ((dY > 0))
852
+
                                                    then [ScriptTransfer(aD, dY, eC)]
853
+
                                                    else nil
854
+
                                                let bS = if ((bN >= bO))
855
+
                                                    then bN
856
+
                                                    else bO
857
+
                                                if ((bS == bS))
858
+
                                                    then {
859
+
                                                        let eD = ba(C(bV, bS), C(bT, bS))
860
+
                                                        let eE = F(eD, a)
861
+
                                                        let cf = [ScriptTransfer(bJ, eB, eC), StringEntry(X(toString(bJ), bG), aU(ex, ey, cp, eE, height, lastBlock.timestamp)), IntegerEntry(Q(), eE), IntegerEntry(R(height, lastBlock.timestamp), eE)]
862
+
                                                        if ((cf == cf))
863
+
                                                            then {
864
+
                                                                let eF = invoke(az, "burn", [cp], [AttachedPayment(bH, cp)])
865
+
                                                                if ((eF == eF))
866
+
                                                                    then (cf ++ ej)
867
+
                                                                    else throw("Strict value is not equal to itself.")
868
+
                                                                }
869
+
                                                            else throw("Strict value is not equal to itself.")
870
+
                                                        }
871
+
                                                    else throw("Strict value is not equal to itself.")
872
+
                                                }
873
+
                                            else throw("Strict value is not equal to itself.")
874
+
                                        }
875
+
                                    else throw("Strict value is not equal to itself.")
876
+
                                }
877
+
                        }
878
+
        }
936
879
 
937
880
 
938
881
 
939
-
@Callable(de)
940
-
func estimatePutOperationWrapperREADONLY (bE,bd,cd,ce,cf,cg,eH,ch,ci) = $Tuple2(nil, cc(bE, bd, cd, ce, cf, cg, eH, ch, ci, false, 0, ""))
882
+
@Callable(di)
883
+
func getNoLess (eG,eH) = {
884
+
    let cy = dh(di)
885
+
    let cd = cy._1
886
+
    let ce = cy._2
887
+
    let cp = cy._3
888
+
    let bH = cy._4
889
+
    let cf = cy._5
890
+
    let eI = if ((cd >= eG))
891
+
        then true
892
+
        else am(((("Failed:  " + toString(cd)) + " < ") + toString(eG)))
893
+
    if ((eI == eI))
894
+
        then {
895
+
            let eJ = if ((ce >= eH))
896
+
                then true
897
+
                else am(((("Failed: " + toString(ce)) + " < ") + toString(eH)))
898
+
            if ((eJ == eJ))
899
+
                then {
900
+
                    let eK = invoke(az, "burn", [cp], [AttachedPayment(bH, cp)])
901
+
                    if ((eK == eK))
902
+
                        then cf
903
+
                        else throw("Strict value is not equal to itself.")
904
+
                    }
905
+
                else throw("Strict value is not equal to itself.")
906
+
            }
907
+
        else throw("Strict value is not equal to itself.")
908
+
    }
941
909
 
942
910
 
943
911
 
944
-
@Callable(de)
945
-
func estimateGetOperationWrapperREADONLY (bE,eI,bG,eH) = {
946
-
    let cw = bD(bE, eI, bG, addressFromStringValue(eH))
947
-
    $Tuple2(nil, $Tuple10(cw._1, cw._2, cw._3, cw._4, cw._5, cw._6, cw._7, toString(cw._8), cw._9, cw._10))
912
+
@Callable(di)
913
+
func unstakeAndGet (dq) = {
914
+
    let dj = if ((size(di.payments) != 0))
915
+
        then am("no payments expected")
916
+
        else true
917
+
    if ((dj == dj))
918
+
        then {
919
+
            let bw = aE()
920
+
            let eL = aI()
921
+
            let bK = fromBase58String(bw[r])
922
+
            let eM = valueOrErrorMessage(addressFromString(eL[y]), "wrong")
923
+
            let eN = invoke(eM, "unstake", [toBase58String(bK), dq], nil)
924
+
            if ((eN == eN))
925
+
                then {
926
+
                    let cy = bF(toBase58String(di.transactionId), toBase58String(bK), dq, di.caller)
927
+
                    let bP = parseIntValue(cy._9)
928
+
                    let cf = cy._10
929
+
                    let eO = if (if (aB())
930
+
                        then true
931
+
                        else (bP == o))
932
+
                        then am(("Blocked: " + toString(bP)))
933
+
                        else true
934
+
                    if ((eO == eO))
935
+
                        then {
936
+
                            let eP = invoke(az, "burn", [dq], [AttachedPayment(bK, dq)])
937
+
                            if ((eP == eP))
938
+
                                then cf
939
+
                                else throw("Strict value is not equal to itself.")
940
+
                            }
941
+
                        else throw("Strict value is not equal to itself.")
942
+
                    }
943
+
                else throw("Strict value is not equal to itself.")
944
+
            }
945
+
        else throw("Strict value is not equal to itself.")
948
946
 
    }
949
947
 
950
948
 
951
-
@Verifier(eJ)
952
-
func eK () = {
953
-
    let ar = eJ
954
-
    if ($isInstanceOf(ar, "Order"))
949
+
950
+
@Callable(di)
951
+
func activate (eQ,eR) = if ((toString(di.caller) != toString(az)))
952
+
    then am("denied")
953
+
    else $Tuple2([StringEntry(Y(), eQ), StringEntry(Z(), eR)], "success")
954
+
955
+
956
+
957
+
@Callable(di)
958
+
func setS (eS,eO) = if ((toString(di.caller) != av(this, ab())))
959
+
    then dv
960
+
    else [StringEntry(eS, eO)]
961
+
962
+
963
+
964
+
@Callable(di)
965
+
func setI (eS,eO) = if ((toString(di.caller) != av(this, ab())))
966
+
    then dv
967
+
    else [IntegerEntry(eS, eO)]
968
+
969
+
970
+
971
+
@Callable(di)
972
+
func getPoolConfigWrapperREADONLY () = $Tuple2(nil, aE())
973
+
974
+
975
+
976
+
@Callable(di)
977
+
func getAccBalanceWrapperREADONLY (aZ) = $Tuple2(nil, aY(aZ))
978
+
979
+
980
+
981
+
@Callable(di)
982
+
func calcPricesWrapperREADONLY (bq,br,bv) = {
983
+
    let eT = bu(bq, br, bv)
984
+
    $Tuple2(nil, [toString(eT[0]), toString(eT[1]), toString(eT[2])])
985
+
    }
986
+
987
+
988
+
989
+
@Callable(di)
990
+
func fromX18WrapperREADONLY (G,eU) = $Tuple2(nil, F(parseBigIntValue(G), eU))
991
+
992
+
993
+
994
+
@Callable(di)
995
+
func toX18WrapperREADONLY (D,E) = $Tuple2(nil, toString(C(D, E)))
996
+
997
+
998
+
999
+
@Callable(di)
1000
+
func calcPriceBigIntWrapperREADONLY (bb,bc) = $Tuple2(nil, toString(ba(parseBigIntValue(bb), parseBigIntValue(bc))))
1001
+
1002
+
1003
+
1004
+
@Callable(di)
1005
+
func estimatePutOperationWrapperREADONLY (bG,bg,ci,eV,ck,eW,eX,cm,cn) = $Tuple2(nil, cg(bG, bg, ci, eV, ck, eW, eX, cm, cn, false, 0, ""))
1006
+
1007
+
1008
+
1009
+
@Callable(di)
1010
+
func estimateGetOperationWrapperREADONLY (bG,eY,bI,eX) = {
1011
+
    let cy = bF(bG, eY, bI, addressFromStringValue(eX))
1012
+
    $Tuple2(nil, $Tuple10(cy._1, cy._2, cy._3, cy._4, cy._5, cy._6, cy._7, toString(cy._8), cy._9, cy._10))
1013
+
    }
1014
+
1015
+
1016
+
@Verifier(eZ)
1017
+
func fa () = {
1018
+
    let at = eZ
1019
+
    if ($isInstanceOf(at, "Order"))
955
1020
 
        then {
956
-
            let cR = ar
957
-
            let eL = aA()
958
-
            let an = cQ(cR)
959
-
            let eM = sigVerify(cR.bodyBytes, cR.proofs[0], cR.senderPublicKey)
960
-
            let eN = sigVerify(cR.bodyBytes, cR.proofs[1], eL)
961
-
            if (if (if (an)
962
-
                then eM
1021
+
            let cV = at
1022
+
            let fb = aC()
1023
+
            let ap = cU(cV)
1024
+
            let fc = sigVerify(cV.bodyBytes, cV.proofs[0], cV.senderPublicKey)
1025
+
            let fd = sigVerify(cV.bodyBytes, cV.proofs[1], fb)
1026
+
            if (if (if (ap)
1027
+
                then fc
963
1028
 
                else false)
964
-
                then eN
1029
+
                then fd
965
1030
 
                else false)
966
1031
 
                then true
967
-
                else am(an, eM, eN)
1032
+
                else ao(ap, fc, fd)
968
1033
 
            }
969
1034
 
        else {
970
-
            let eO = {
971
-
                let eP = dj()
972
-
                if ($isInstanceOf(eP, "ByteVector"))
1035
+
            let fe = {
1036
+
                let ff = ds()
1037
+
                if ($isInstanceOf(ff, "ByteVector"))
973
1038
 
                    then {
974
-
                        let do = eP
975
-
                        do
1039
+
                        let dx = ff
1040
+
                        dx
976
1041
 
                        }
977
-
                    else if ($isInstanceOf(eP, "Unit"))
978
-
                        then eJ.senderPublicKey
1042
+
                    else if ($isInstanceOf(ff, "Unit"))
1043
+
                        then eZ.senderPublicKey
979
1044
 
                        else throw("Match error")
980
1045
 
                }
981
-
            sigVerify(eJ.bodyBytes, eJ.proofs[0], eO)
1046
+
            sigVerify(eZ.bodyBytes, eZ.proofs[0], fe)
982
1047
 
            }
983
1048
 
    }
984
1049