tx · FVjSRL7rA8gcrmNaJpvsGmU32Lbds9iiHbo9viX1yN9C

3NAefciWv6f9fWvEXdGgpHfanJFG8HqfjuT:  -0.03300000 Waves

2022.10.05 16:16 [2259075] smart account 3NAefciWv6f9fWvEXdGgpHfanJFG8HqfjuT > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FVjSRL7rA8gcrmNaJpvsGmU32Lbds9iiHbo9viX1yN9C",
    "fee": 3300000,
    "feeAssetId": null,
    "timestamp": 1664975765215,
    "version": 1,
    "sender": "3NAefciWv6f9fWvEXdGgpHfanJFG8HqfjuT",
    "senderPublicKey": "D1BL65meykxFZTCuq7jq9HSGLLnWvQamQPUNrguW5w39",
    "proofs": [
        "5qmkiTgWLDVQaNL3tXGTbe6MzFciy1Q8bhzYPsDnJi6FmSFa5CFUwQPhkKm5QhCY81mGqXvENvFkjrPv8dN2GLLD"
    ],
    "script": "base64:BgLAIQgCEgMKAQgSAwoBCBIAEgQKAgEEEgcKBQEBAQEEEgQKAgEEEgQKAgEIEgQKAgEIEgMKAQESABIHCgUBAQEIARIECgIIARIECgIIARIECgIIARIECgIBARIDCgEBEgUKAwEIARIAEgQKAggIEgQKAggIEgQKAggBEgASAwoBCBIFCgMBAQESBAoCCAESBAoCAQESBAoCCAgSCwoJCAEBAgECCAQEEgYKBAgIAQgSACIGc2NhbGU4IgxzY2FsZThCaWdJbnQiB3NjYWxlMTgiCnplcm9CaWdJbnQiBGJpZzAiBGJpZzEiCnNsaXBwYWdlNEQiBUFtdWx0IgVEY29udiIDU0VQIgVFTVBUWSIKUG9vbEFjdGl2ZSIKUG9vbFB1dERpcyIOUG9vbE1hdGNoZXJEaXMiDFBvb2xTaHV0ZG93biIOaWR4UG9vbEFkZHJlc3MiCWlkeFBvb2xTdCIJaWR4TFBBc0lkIglpZHhBbUFzSWQiCWlkeFByQXNJZCILaWR4QW10QXNEY20iDWlkeFByaWNlQXNEY20iC2lkeElBbXRBc0lkIg1pZHhJUHJpY2VBc0lkIg9pZHhGYWN0U3Rha0NudHIiEGlkeEZhY3RTbGlwcENudHIiEWlkeEZhY3RHd3hSZXdDbnRyIgpmZWVEZWZhdWx0IgJ0MSIHb3JpZ1ZhbCINb3JpZ1NjYWxlTXVsdCICZjEiA3ZhbCIPcmVzdWx0U2NhbGVNdWx0IgJ0cyIDYW10IghyZXNTY2FsZSIIY3VyU2NhbGUiA2FicyIJYWJzQmlnSW50IgJmYyIDbXBrIgRwbXBrIgJwbCICcGgiAWgiAXQiA3BhdSICdWEiBHR4SWQiA2dhdSICYWEiAnBhIgNhbXAiA2FkYSIGa2V5RmVlIgNmZWUiBGZjZmciBG10cGsiAnBjIgZpQW10QXMiBWlQckFzIgNtYmEiBWJBU3RyIgNhcHMiHGtleUFsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2giFmtleUZlZUNvbGxlY3RvckFkZHJlc3MiA3RvZSIDb3JWIgZzZW5kclYiBm1hdGNoViIDc3RyIgckbWF0Y2gwIgZ2YWxTdHIiBHN0cmYiBGFkZHIiA2tleSIEaW50ZiIDZmNhIgFBIgNpZ3MiAm1wIhNmZWVDb2xsZWN0b3JBZGRyZXNzIgNncGMiBWFtdEFzIgdwcmljZUFzIghpUHJpY2VBcyIDZ2ZjIg1mYWN0b3J5Q29uZmlnIg9zdGFraW5nQ29udHJhY3QiD3NsaXBhZ2VDb250cmFjdCILZ3d4Q29udHJhY3QiEWRhdGFQdXRBY3Rpb25JbmZvIg1pbkFtdEFzc2V0QW10Ig9pblByaWNlQXNzZXRBbXQiCG91dExwQW10IgVwcmljZSIKc2xpcEJ5VXNlciIMc2xpcHBhZ2VSZWFsIgh0eEhlaWdodCILdHhUaW1lc3RhbXAiDHNsaXBhZ2VBbUFtdCIMc2xpcGFnZVByQW10IhFkYXRhR2V0QWN0aW9uSW5mbyIOb3V0QW10QXNzZXRBbXQiEG91dFByaWNlQXNzZXRBbXQiB2luTHBBbXQiDWdldEFjY0JhbGFuY2UiB2Fzc2V0SWQiBGNwYmkiCHByQW10WDE4IghhbUFtdFgxOCIDdmFkIgJBMSICQTIiCHNsaXBwYWdlIgRkaWZmIgRwYXNzIgJ2ZCICRDEiAkQwIgRzbHBnIgRmYWlsIgNwY3AiCmFtQXNzZXREY20iCnByQXNzZXREY20iBWFtQW10IgVwckFtdCILYW10QXNBbXRYMTgiCnByQXNBbXRYMTgiCmNhbGNQcmljZXMiBWxwQW10IgNjZmciCGFtdEFzRGNtIgdwckFzRGNtIghwcmljZVgxOCIIbHBBbXRYMTgiDWxwUHJJbkFtQXNYMTgiDWxwUHJJblByQXNYMTgiD2NhbGN1bGF0ZVByaWNlcyIBcCIHdGFrZUZlZSIGYW1vdW50IglmZWVBbW91bnQiA2VnbyIGdHhJZDU4IgpwbXRBc3NldElkIghwbXRMcEFtdCILdXNlckFkZHJlc3MiBGxwSWQiBGFtSWQiBHBySWQiBWFtRGNtIgVwckRjbSIDc3RzIgdscEVtaXNzIglhbUJhbGFuY2UiDGFtQmFsYW5jZVgxOCIJcHJCYWxhbmNlIgxwckJhbGFuY2VYMTgiC2N1clByaWNlWDE4IghjdXJQcmljZSILcG10THBBbXRYMTgiCmxwRW1pc3NYMTgiC291dEFtQW10WDE4IgtvdXRQckFtdFgxOCIIb3V0QW1BbXQiCG91dFByQW10IgVzdGF0ZSIDZXBvIgdpbkFtQW10IgZpbkFtSWQiB2luUHJBbXQiBmluUHJJZCIGaXNFdmFsIgZlbWl0THAiCmlzT25lQXNzZXQiEHZhbGlkYXRlU2xpcHBhZ2UiBnBtdEFtdCIFcG10SWQiB2FtSWRTdHIiB3BySWRTdHIiCWluQW1JZFN0ciIJaW5QcklkU3RyIgZhbXREY20iCHByaWNlRGNtIgRscEVtIg9pbkFtQXNzZXRBbXRYMTgiD2luUHJBc3NldEFtdFgxOCIMdXNlclByaWNlWDE4IgFyIgtzbGlwcGFnZVgxOCIPc2xpcHBhZ2VSZWFsWDE4Ig1scEVtaXNzaW9uWDE4IgpwclZpYUFtWDE4IgphbVZpYVByWDE4IgxleHBlY3RlZEFtdHMiEWV4cEFtdEFzc2V0QW10WDE4IhNleHBQcmljZUFzc2V0QW10WDE4IgljYWxjTHBBbXQiDmNhbGNBbUFzc2V0UG10Ig5jYWxjUHJBc3NldFBtdCIMc2xpcHBhZ2VDYWxjIgllbWl0THBBbXQiBmFtRGlmZiIGcHJEaWZmIg0kdDAxNjMyNzE2NjcyIgp3cml0ZUFtQW10Igp3cml0ZVByQW10Igtjb21tb25TdGF0ZSIDbW9hIgVvcmRlciIHYW10QXNJZCIGcHJBc0lkIg9hY2NBbXRBc0JhbGFuY2UiDmFjY1ByQXNCYWxhbmNlIgpvckFtdEFzc2V0IgpvckFtdEFzU3RyIglvclByQXNzZXQiCW9yUHJBc1N0ciIKb3JkZXJQcmljZSIOY2FzdE9yZGVyUHJpY2UiEWlzT3JkZXJQcmljZVZhbGlkIgJjZyIBaSIDcG10IgJjcCIGY2FsbGVyIgdhbUFzUG10IgdwckFzUG10IhNlc3RpbWF0ZVB1dE9uZVRrblYyIglwbXRBbXRSYXciCnBvb2xDb25maWciDSR0MDIxMDAzMjEwNDgiDSR0MDIxMDUyMjE1MTMiDGFtQmFsYW5jZU5vdyIMcHJCYWxhbmNlTm93Ig0kdDAyMTUxNzIxNjUxIhBhbUJhbGFuY2VGb3JDYWxjIhBwckJhbGFuY2VGb3JDYWxjIgp4UHJlY2lzaW9uIgZyZXN1bHQiAUAiDSR0MDIyMTIwMjIyMTYiC2FtQXNzZXRQYXJ0IgtwckFzc2V0UGFydCIGZXN0UHV0Igdlc3RpbUxQIglscEFzc2V0SWQiE2dldE9uZVRrblYySW50ZXJuYWwiCm91dEFzc2V0SWQiDG1pbk91dEFtb3VudCIIcGF5bWVudHMiDG9yaWdpbkNhbGxlciINdHJhbnNhY3Rpb25JZCIKYW1EZWNpbWFscyIKcHJEZWNpbWFscyIKcG9vbFN0YXR1cyINJHQwMjM1NzEyMzY3OSIIdG90YWxHZXQiC3RvdGFsQW1vdW50Ig0kdDAyMzg2NjIzOTUzIgVvdXRBbSIFb3V0UHIiCGN1clByWDE4IgVjdXJQciIRb3V0QXNzZXRJZE9yV2F2ZXMiEHNlbmRGZWVUb01hdGNoZXIiBGJ1cm4iBGdldEQiAnhwIgFuIgN4cDAiA3hwMSIKYVByZWNpc2lvbiIBYSIBcyIDYW5uIgRjYWxjIgNhY2MiA2N1ciINJHQwMjUxMTkyNTEzOSIBZCIFZm91bmQiAmRwIgVkTmV4dCIFZERpZmYiA2FyciINJHQwMjU1NjYyNTYxMiICJGwiAiRzIgUkYWNjMCIFJGYwXzEiAiRhIgIkaSIFJGYwXzIiAW0iAnBtIgJwZCICbW0iAnBrIgFjIhdwZW5kaW5nTWFuYWdlclB1YmxpY0tleSICY20iA2hwbSIDY3BtIgRzbGlwIglhdXRvU3Rha2UiB2ZhY3RDZmciC3N0YWtpbmdDbnRyIghzbGlwQ250ciIBZSICZWwiBmxlZ2FjeSICc2EiAnNwIghscFRybnNmciICc3MiBW91dExwIgdnd3hDbnRyIgdwb29sQ2ZnIgVhZGRvbiIQcGF5bWVudEFtb3VudFJhdyINJHQwMzAzMjIzMDM3NCINJHQwMzA1MzQzMTE1MCIMdmlydFN3YXBJbkFtIg12aXJ0U3dhcE91dFByIgx2aXJ0U3dhcEluUHIiDXZpcnRTd2FwT3V0QW0iBkQwdnNEMSIJbHBDYWxjUmVzIg1wYXltZW50QW1vdW50Ig5wYXltZW50QXNzZXRJZCIPbHBBc3NldEVtaXNzaW9uIg5wb29sUHJvcG9ydGlvbiIPYW1vdW50QXNzZXRQYXJ0Ig5wcmljZUFzc2V0UGFydCIJbHBBbXRCb3RoIgVib251cyIHbWF4U2xwZyIJb3V0QW10QW10IgFiIgpleGNoUmVzdWx0Igdub3RVc2VkIglvdXRBbW91bnQiCmVzdGltQW1BbXQiCmVzdGltUHJBbXQiDSR0MDM5NDA1Mzk4NjUiC3RvdGFsR2V0UmF3IghmaW5hbFJlcyINJHQwNDA2MTI0MDcxNiINJHQwNDE3NDE0MTg5NiINbHBBc3NldEFtb3VudCINJHQwNDI0MDY0MjcxNCIUYW1vdW50QmFsYW5jZUZvclN3YXAiE3ByaWNlQmFsYW5jZUZvclN3YXAiDGFtb3VudFRvU3dhcCILYW1vdW50VG9BZGQiCnlQcmVjaXNpb24iDSR0MDQzMjQyNDMyOTEiDSR0MDQzNjM1NDM3NTAiDnN1bU9mR2V0QXNzZXRzIhJub0xlc3NUaGVuQW10QXNzZXQiFG5vTGVzc1RoZW5QcmljZUFzc2V0IhRidXJuTFBBc3NldE9uRmFjdG9yeSINY2hlY2tQYXltZW50cyIKZmFjdG9yeUNmZyIHc3Rha2luZyIKdW5zdGFrZUludiIBdiIFYnVybkEiDXVuc3Rha2VBbW91bnQiDSR0MDQ2MDU1NDYyNDMiB3BheW1lbnQiDHBheW1lbnRBc3NldCINJHQwNDY1NzI0NjYzMSINJHQwNDY2MzU0NjkwNSIIYW1BbW91bnQiCHByQW1vdW50IgxhbUJhbGFuY2VOZXciDHByQmFsYW5jZU5ldyIMYW1CYWxhbmNlT2xkIgxwckJhbGFuY2VPbGQiCmxwRW1pc3Npb24iCGxwQW1vdW50IghhbXRBc1N0ciIHcHJBc1N0ciIBayICcHIiDHJlc1NjYWxlTXVsdCIHdXNyQWRkciIHcG10QXNJZCICdHgiBnZlcmlmeSIPdGFyZ2V0UHVibGljS2V5IgptYXRjaGVyUHViIgpvcmRlclZhbGlkIgtzZW5kZXJWYWxpZCIMbWF0Y2hlclZhbGlkIgduZXdIYXNoIgthbGxvd2VkSGFzaCILY3VycmVudEhhc2haAAFhAIDC1y8AAWIJALYCAQCAwtcvAAFjCQC2AgEAgICQu7rWrfANAAFkCQC2AgEAAAABZQkAtgIBAAAAAWYJALYCAQABAAFnCQC2AgEJAGUCBQFhCQBpAgkAaAIFAWEAAQUBYQABaAIDMTAwAAFpAgExAAFqAgJfXwABawIAAAFsAAEAAW0AAgABbgADAAFvAAQAAXAAAQABcQACAAFyAAMAAXMABAABdAAFAAF1AAYAAXYABwABdwAIAAF4AAkAAXkAAQABegAHAAFBAAoAAUIJAGsDAAUFAWEAkE4BAUMCAUQBRQkAvAIDCQC2AgEFAUQFAWMJALYCAQUBRQEBRgIBRwFICQCgAwEJALwCAwUBRwkAtgIBBQFIBQFjAQFJAwFKAUsBTAkAawMFAUoFAUsFAUwBAU0BAUcDCQC/AgIFAWQFAUcJAL4CAQUBRwUBRwEBTgEBRwMJAL8CAgUBZAUBRwkAvgIBBQFHBQFHAQFPAAITJXNfX2ZhY3RvcnlDb250cmFjdAEBUAACFCVzX19tYW5hZ2VyUHVibGljS2V5AQFRAAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQFSAAIRJXMlc19fcHJpY2VfX2xhc3QBAVMCAVQBVQkAuQkCCQDMCAICGCVzJXMlZCVkX19wcmljZV9faGlzdG9yeQkAzAgCCQCkAwEFAVQJAMwIAgkApAMBBQFVBQNuaWwFAWoBAVYCAVcBWAkArAICCQCsAgIJAKwCAgILJXMlcyVzX19QX18FAVcCAl9fBQFYAQFZAgFXAVgJAKwCAgkArAICCQCsAgICCyVzJXMlc19fR19fBQFXAgJfXwUBWAEBWgACDyVzX19hbW91bnRBc3NldAECYWEAAg4lc19fcHJpY2VBc3NldAECYWIAAgclc19fYW1wAQJhYwACDSVzX19hZGRvbkFkZHIAAmFkAgclc19fZmVlAAJhZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQJhZAUBQgECYWYAAhElc19fZmFjdG9yeUNvbmZpZwECYWcAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAmFoAgJhaQJhagkArAICCQCsAgIJAKwCAgkArAICAgglZCVkJXNfXwUCYWkCAl9fBQJhagIIX19jb25maWcBAmFrAQJhbAkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQJhbAECYW0AAgwlc19fc2h1dGRvd24BAmFuAAIdJXNfX2FsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gBAmFvAAIXJXNfX2ZlZUNvbGxlY3RvckFkZHJlc3MBAmFwAwJhcQJhcgJhcwkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhFGYWlsZWQ6IG9yZFZhbGlkPQkApQMBBQJhcQILIHNuZHJWYWxpZD0JAKUDAQUCYXICDCBtdGNoclZhbGlkPQkApQMBBQJhcwECYXQBAUcEAmF1BQFHAwkAAQIFAmF1AgZTdHJpbmcEAmF2BQJhdQUCYXYJAAIBAhNmYWlsIGNhc3QgdG8gU3RyaW5nAQJhdwICYXgCYXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJheAUCYXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYXgJAMwIAgIBLgkAzAgCBQJheQkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAQJhegICYXgCYXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQJheAUCYXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUCYXgJAMwIAgIBLgkAzAgCBQJheQkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAAJhQQkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmF3AgUEdGhpcwkBAU8AAAJhQgkBAmF3AgUEdGhpcwkBAmFiAAECYUMACQELdmFsdWVPckVsc2UCCQCbCAIFAmFBCQECYW0ABwECYUQACQDZBAEJAQJhdwIFAmFBCQECYWcAAAJhRQkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAmF3AgUCYUEJAQJhbwABAmFGAAQCYUcJAQJhdwIFBHRoaXMJAQFaAAQCYUgJAQJhdwIFBHRoaXMJAQJhYQAEAmFJCQECYXoCBQJhQQkBAmFrAQUCYUgEAmFpCQECYXoCBQJhQQkBAmFrAQUCYUcJALUJAgkBAmF3AgUCYUEJAQJhaAIJAKQDAQUCYWkJAKQDAQUCYUkFAWoBAmFKAAkAtQkCCQECYXcCBQJhQQkBAmFmAAUBagACYUsJAQJhSgAAAmFMCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQJhSwUBeQIgSW52YWxpZCBzdGFraW5nIGNvbnRyYWN0IGFkZHJlc3MAAmFNCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQJhSwUBegIgSW52YWxpZCBzbGlwYWdlIGNvbnRyYWN0IGFkZHJlc3MAAmFOCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQJhSwUBQQIcSW52YWxpZCBnd3ggY29udHJhY3QgYWRkcmVzcwECYU8KAmFQAmFRAmFSAmFTAmFUAmFVAmFWAmFXAmFYAmFZCQC5CQIJAMwIAgIUJWQlZCVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJhUAkAzAgCCQCkAwEFAmFRCQDMCAIJAKQDAQUCYVIJAMwIAgkApAMBBQJhUwkAzAgCCQCkAwEFAmFUCQDMCAIJAKQDAQUCYVUJAMwIAgkApAMBBQJhVgkAzAgCCQCkAwEFAmFXCQDMCAIJAKQDAQUCYVgJAMwIAgkApAMBBQJhWQUDbmlsBQFqAQJhWgYCYmECYmICYmMCYVMCYVYCYVcJALkJAgkAzAgCAgwlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJiYQkAzAgCCQCkAwEFAmJiCQDMCAIJAKQDAQUCYmMJAMwIAgkApAMBBQJhUwkAzAgCCQCkAwEFAmFWCQDMCAIJAKQDAQUCYVcFA25pbAUBagECYmQBAmJlAwkAAAIFAmJlAgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQJiZQECYmYCAmJnAmJoCQC8AgMFAmJnBQFjBQJiaAECYmkDAmJqAmJrAmJsBAJibQkAvAIDCQC4AgIFAmJqBQJiawUBYgUCYmsEAmJuCQC/AgIJALgCAgUCYmwJAQFNAQUCYm0FAWQDCQEBIQEFAmJuCQACAQkArAICAgpCaWcgc2xwZzogCQCmAwEFAmJtCQCUCgIFAmJuCQCZAwEJAMwIAgUCYmoJAMwIAgUCYmsFA25pbAECYm8DAmJwAmJxAmJyBAJibQkAvAIDBQJicQUBYgUCYnAEAmJzCQC/AgIFAmJyBQJibQMDBQJicwYJAL8CAgUCYnEFAmJwCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkApgMBBQJicQIBIAkApgMBBQJicAIBIAkApgMBBQJibQIBIAkApgMBBQJicgUCYnMBAmJ0BAJidQJidgJidwJieAQCYnkJAQFDAgUCYncFAmJ1BAJiegkBAUMCBQJieAUCYnYJAQJiZgIFAmJ6BQJieQECYkEDAmJ3AmJ4AmJCBAJiQwkBAmFGAAQCYkQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiQwUBdQQCYkUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJiQwUBdgQCYkYJAQJidAQFAmJEBQJiRQUCYncFAmJ4BAJiaAkBAUMCBQJidwUCYkQEAmJnCQEBQwIFAmJ4BQJiRQQCYkcJAQFDAgUCYkIFAWEEAmJICQECYmYCBQJiaAUCYkcEAmJJCQECYmYCBQJiZwUCYkcJAMwIAgUCYkYJAMwIAgUCYkgJAMwIAgUCYkkFA25pbAECYkoDAmJ3AmJ4AmJCBAJiSwkBAmJBAwUCYncFAmJ4BQJiQgkAzAgCCQEBRgIJAJEDAgUCYksAAAUBYQkAzAgCCQEBRgIJAJEDAgUCYksAAQUBYQkAzAgCCQEBRgIJAJEDAgUCYksAAgUBYQUDbmlsAQJiTAECYk0EAmJOCQBrAwUCYk0FAmFlBQFhCQCUCgIJAGUCBQJiTQUCYk4FAmJOAQJiTwQCYlACYlECYlICYlMEAmJDCQECYUYABAJiVAkAkQMCBQJiQwUBcgQCYlUJAJEDAgUCYkMFAXMEAmJWCQCRAwIFAmJDBQF0BAJiVwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJDBQF1BAJiWAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJDBQF2BAJiWQkAkQMCBQJiQwUBcQQCYloICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQJiVAILV3JvbmcgTFAgaWQIcXVhbnRpdHkDCQECIT0CBQJiVAUCYlEJAAIBAg9Xcm9uZyBwbXQgYXNzZXQEAmNhCQECYmQBBQJiVQQCY2IJAQFDAgUCY2EFAmJXBAJjYwkBAmJkAQUCYlYEAmNkCQEBQwIFAmNjBQJiWAQCY2UJAQJiZgIFAmNkBQJjYgQCY2YJAQFGAgUCY2UFAWEEAmNnCQEBQwIFAmJSBQFhBAJjaAkBAUMCBQJiWgUBYQQCY2kJALwCAwUCY2IFAmNnBQJjaAQCY2oJALwCAwUCY2QFAmNnBQJjaAQCY2sJAQFGAgUCY2kFAmJXBAJjbAkBAUYCBQJjagUCYlgEAmNtAwkAAAIFAmJQAgAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJiUwUCY2sDCQAAAgUCYlUCBVdBVkVTBQR1bml0CQDZBAEFAmJVCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmJTBQJjbAMJAAACBQJiVgIFV0FWRVMFBHVuaXQJANkEAQUCYlYJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVkCCQClCAEFAmJTBQJiUAkBAmFaBgUCY2sFAmNsBQJiUgUCY2YFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFSAAUCY2YJAMwIAgkBDEludGVnZXJFbnRyeQIJAQFTAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUCY2YFA25pbAkAnAoKBQJjawUCY2wFAmJVBQJiVgUCY2EFAmNjBQJiWgUCY2UFAmJZBQJjbQECY24NAmJQAmJsAmNvAmNwAmNxAmNyAmJTAmNzAmN0AmN1AmN2AmN3AmN4BAJiQwkBAmFGAAQCYlQJANkEAQkAkQMCBQJiQwUBcgQCY3kJAJEDAgUCYkMFAXMEAmN6CQCRAwIFAmJDBQF0BAJjQQkAkQMCBQJiQwUBdwQCY0IJAJEDAgUCYkMFAXgEAmNDCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYkMFAXUEAmNECQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYkMFAXYEAmJZCQCRAwIFAmJDBQFxBAJjRQgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiVAIIV3IgbHAgYXMIcXVhbnRpdHkEAmNhAwUCY3MJAQJiZAEFAmN5AwMFAmN1CQAAAgUCY3gFAmN5BwkAZQIJAQJiZAEFAmN5BQJjdwMFAmN1CQECYmQBBQJjeQkAZQIJAQJiZAEFAmN5BQJjbwQCY2MDBQJjcwkBAmJkAQUCY3oDAwUCY3UJAAACBQJjeAUCY3oHCQBlAgkBAmJkAQUCY3oFAmN3AwUCY3UJAQJiZAEFAmN6CQBlAgkBAmJkAQUCY3oFAmNxBAJjRgkBAUMCBQJjbwUCY0MEAmNHCQEBQwIFAmNxBQJjRAQCY0gJAQJiZgIFAmNHBQJjRgQCY2IJAQFDAgUCY2EFAmNDBAJjZAkBAUMCBQJjYwUCY0QEAmNJAwkAAAIFAmNFAAAEAmNlBQFkBAJjSgUBZAQCYkcJAHYGCQC5AgIFAmNGBQJjRwAACQC2AgEABQABAAAFBERPV04JAJcKBQkBAUYCBQJiRwUBYQkBAUYCBQJjRgUCY0MJAQFGAgUCY0cFAmNECQECYmYCCQC3AgIFAmNkBQJjRwkAtwICBQJjYgUCY0YFAmNKBAJjZQkBAmJmAgUCY2QFAmNiBAJjSwkAvAIDCQEBTQEJALgCAgUCY2UFAmNIBQFjBQJjZQQCY0oJAQFDAgUCYmwFAWEDAwMFAmN2CQECIT0CBQJjZQUBZAcJAL8CAgUCY0sFAmNKBwkAAgEJAKwCAgkArAICCQCsAgICD1ByaWNlIHNsaXBwYWdlIAkApgMBBQJjSwIDID4gCQCmAwEFAmNKBAJjTAkBAUMCBQJjRQUBYQQCY00JALwCAwUCY0YFAmNlBQFjBAJjTgkAvAIDBQJjRwUBYwUCY2UEAmNPAwkAvwICBQJjTQUCY0cJAJQKAgUCY04FAmNHCQCUCgIFAmNGBQJjTQQCY1AIBQJjTwJfMQQCY1EIBQJjTwJfMgQCYkcJALwCAwUCY0wFAmNRBQJjZAkAlwoFCQEBRgIFAmJHBQFhCQEBRgIFAmNQBQJjQwkBAUYCBQJjUQUCY0QFAmNlBQJjSgQCY1IIBQJjSQJfMQQCY1MIBQJjSQJfMgQCY1QIBQJjSQJfMwQCY2YJAQFGAggFAmNJAl80BQFhBAJjVQkBAUYCCAUCY0kCXzUFAWEDCQBnAgAABQJjUgkAAgECB0xQIDw9IDAEAmNWAwkBASEBBQJjdAAABQJjUgQCY1cJAGUCBQJjbwUCY1MEAmNYCQBlAgUCY3EFAmNUBAJjWQMDBQJjdQkAAAIFAmN4BQJjeQcJAJQKAgUCY3cAAAMDBQJjdQkAAAIFAmN4BQJjegcJAJQKAgAABQJjdwkAlAoCBQJjUwUCY1QEAmNaCAUCY1kCXzEEAmRhCAUCY1kCXzIEAmRiCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUgAFAmNmCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmNmCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFWAgUCYlMFAmJQCQECYU8KBQJjWgUCZGEFAmNWBQJjZgUCYmwFAmNVBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJjVwUCY1gFA25pbAkAnwoNBQJjUgUCY1YFAmNmBQJjYQUCY2MFAmNFBQJiVAUCYlkFAmRiBQJjVwUCY1gFAmNwBQJjcgECZGMBAmRkBAJiQwkBAmFGAAQCZGUJAJEDAgUCYkMFAXMEAmRmCQCRAwIFAmJDBQF0BAJiWQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJDBQFxBAJiRAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJDBQF1BAJiRQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmJDBQF2BAJkZwkBAmJkAQUCZGUEAmRoCQECYmQBBQJkZgQCY2UDCQAAAggFAmRkCW9yZGVyVHlwZQUDQnV5CQECYnQEBQJiRAUCYkUJAGQCBQJkZwgFAmRkBmFtb3VudAUCZGgJAQJidAQFAmJEBQJiRQkAZQIFAmRnCAUCZGQGYW1vdW50BQJkaAQCY2YJAQFGAgUCY2UFAWEDAwMJAQJhQwAGCQAAAgUCYlkFAW4GCQAAAgUCYlkFAW8JAAIBAg1BZG1pbiBibG9ja2VkBAJkaQgIBQJkZAlhc3NldFBhaXILYW1vdW50QXNzZXQEAmRqAwkAAAIFAmRpBQR1bml0AgVXQVZFUwkA2AQBCQEFdmFsdWUBBQJkaQQCZGsICAUCZGQJYXNzZXRQYWlyCnByaWNlQXNzZXQEAmRsAwkAAAIFAmRrBQR1bml0AgVXQVZFUwkA2AQBCQEFdmFsdWUBBQJkawMDCQECIT0CBQJkagUCZGUGCQECIT0CBQJkbAUCZGYJAAIBAglXciBhc3NldHMEAmRtCAUCZGQFcHJpY2UEAmNECQBrAwUBYQUCYkUFAmJEBAJkbgkBAUkDBQJkbQUBYQUCY0QEAmRvAwkAAAIIBQJkZAlvcmRlclR5cGUFA0J1eQkAZwIFAmNmBQJkbgkAZwIFAmRuBQJjZgYBAmRwAQJkcQMJAQIhPQIJAJADAQgFAmRxCHBheW1lbnRzAAEJAAIBAgoxIHBtbnQgZXhwBAJkcgkBBXZhbHVlAQkAkQMCCAUCZHEIcGF5bWVudHMAAAQCYlEJAQV2YWx1ZQEIBQJkcgdhc3NldElkBAJjdwgFAmRyBmFtb3VudAQCY0kJAQJiTwQJANgEAQgFAmRxDXRyYW5zYWN0aW9uSWQJANgEAQUCYlEFAmN3CAUCZHEGY2FsbGVyBAJjawgFAmNJAl8xBAJjbAgFAmNJAl8yBAJiWQkBDXBhcnNlSW50VmFsdWUBCAUCY0kCXzkEAmNtCAUCY0kDXzEwAwMJAQJhQwAGCQAAAgUCYlkFAW8JAAIBCQCsAgICD0FkbWluIGJsb2NrZWQ6IAkApAMBBQJiWQkAlwoFBQJjawUCY2wFAmN3BQJiUQUCY20BAmRzCgJkdAFYAmR1AmR2AmJsAmN0AmN1AmN2AmN3AmN4BAJjSQkBAmNuDQUBWAUCYmwICQEFdmFsdWUBBQJkdQZhbW91bnQICQEFdmFsdWUBBQJkdQdhc3NldElkCAkBBXZhbHVlAQUCZHYGYW1vdW50CAkBBXZhbHVlAQUCZHYHYXNzZXRJZAUCZHQJAAACBQFYAgAFAmN0BQJjdQUCY3YFAmN3BQJjeAQCYlkJAQ1wYXJzZUludFZhbHVlAQgFAmNJAl84AwMDCQECYUMABgkAAAIFAmJZBQFtBgkAAAIFAmJZBQFvCQACAQkArAICAghCbG9ja2VkOgkApAMBBQJiWQUCY0kBAmR3BAJkeAJiUQJiUwFYBAJkeQkBAmFGAAQCYlUJAJEDAgUCZHkFAXMEAmJWCQCRAwIFAmR5BQF0BAJjYQkBAmJkAQUCYlUEAmNjCQECYmQBBQJiVgQCZHoJAQJiTAEFAmR4BAJjdwgFAmR6Al8xBAJiTggFAmR6Al8yBAJkQQMJAAACBQFYAgAJAJQKAgUCY2EFAmNjAwkAAAIFAmJRBQJiVQMJAGYCBQJkeAUCY2EJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIJAGUCBQJjYQUCZHgFAmNjAwkAAAIFAmJRBQJiVgMJAGYCBQJkeAUCY2MJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIFAmNhCQBlAgUCY2MFAmR4CQACAQIQd3JvbmcgcG10QXNzZXRJZAQCZEIIBQJkQQJfMQQCZEMIBQJkQQJfMgQCZEQDCQAAAgUCYlEFAmJVCQCUCgIFAmRCBQJkQwkAlAoCBQJkQwUCZEIEAmRFCAUCZEQCXzEEAmRGCAUCZEQCXzIEAmRHAAEEAmRICgACZEkJAPwHBAUCYU4CDGNhbGNQdXRYT25seQkAzAgCCQCkAwEFAmN3CQDMCAIJAKQDAQUCZEUJAMwIAgkApAMBBQJkRgkAzAgCAgAJAMwIAgUCYUIJAMwIAgUBaAkAzAgCCQCkAwEFAmRHCQDMCAIFAWkFA25pbAUDbmlsAwkAAQIFAmRJAgooSW50LCBJbnQpBQJkSQkAAgEJAKwCAgkAAwEFAmRJAh8gY291bGRuJ3QgYmUgY2FzdCB0byAoSW50LCBJbnQpBAJkSgMJAAACBQJiUQUCYlUFAmRICQCUCgIIBQJkSAJfMggFAmRIAl8xBAJkSwgFAmRKAl8xBAJkTAgFAmRKAl8yBAJkTQkBAmRzCgUCYlMFAVgJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFAmJVBQJkSwkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUCYlYFAmRMAAAGBgcFAmR4BQJiUQQCZE4IBQJkTQJfMgQCZE8IBQJkTQJfNwQCY20IBQJkTQJfOQQCY1cIBQJkTQNfMTAEAmNYCAUCZE0DXzExBQJkTQECZFAGAmRRAmRSAmRTAmR0AmRUAmRVAwkBAiE9AgkAkAMBBQJkUwABCQACAQILMSBwbW50IGV4cGQEAmR5CQECYUYABAJiVAkAkQMCBQJkeQUBcgQCYlUJAJEDAgUCZHkFAXMEAmJWCQCRAwIFAmR5BQF0BAJkVgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmR5BQF1BAJkVwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmR5BQF2BAJkWAkAkQMCBQJkeQUBcQQCYlMDCQAAAgUCZHQFBHRoaXMFAmRUBQJkdAQCZHIJAQV2YWx1ZQEJAJEDAgUCZFMAAAQCYlEJAQV2YWx1ZQEIBQJkcgdhc3NldElkBAJjdwgFAmRyBmFtb3VudAMJAGYCAICU69wDBQJjdwkAAgECDU1pbiBwbXQgMTAgTFAEAmJQCQDYBAEFAmRVAwkBAiE9AgUCYlQJANgEAQUCYlEJAAIBAghXcm9uZyBMUAQCY2EJAQJiZAEFAmJVBAJjYwkBAmJkAQUCYlYEAmRZCgACZEkJAPwHBAUEdGhpcwITZ2V0T25lVGtuVjJSRUFET05MWQkAzAgCBQJkUQkAzAgCBQJjdwUDbmlsBQNuaWwDCQABAgUCZEkCCihJbnQsIEludCkFAmRJCQACAQkArAICCQADAQUCZEkCHyBjb3VsZG4ndCBiZSBjYXN0IHRvIChJbnQsIEludCkEAmRaCAUCZFkCXzEEAmJOCAUCZFkCXzIEAmVhAwMJAGYCBQJkUgAACQBmAgUCZFIFAmRaBwkAAgEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUCZFIFA25pbAIABQJkWgQCZWIDCQAAAgUCZFEFAmJVCQCUCgIFAmVhAAAJAJQKAgAABQJlYQQCZWMIBQJlYgJfMQQCZWQIBQJlYgJfMgQCZWUJAQJiZgIJAQFDAgUCY2MFAmRXCQEBQwIFAmNhBQJkVgQCZWYJAQFGAgUCZWUFAWEEAmVnAwkAAAIFAmRRAgVXQVZFUwUEdW5pdAkA2QQBBQJkUQQCZWgDCQBmAgUCYk4AAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhRQUCYk4FAmVnBQNuaWwFA25pbAQCY20JAM4IAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJiUwUCZWEFAmVnCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFZAgkApQgBBQJiUwUCYlAJAQJhWgYFAmVjBQJlZAUCY3cFAmVmBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUgAFAmVmCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEBUwIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFAmVmBQNuaWwFAmVoAwkAAAIFAmNtBQJjbQQCZWkJAPwHBAUCYUECBGJ1cm4JAMwIAgUCY3cFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlEFAmN3BQNuaWwDCQAAAgUCZWkFAmVpCQCUCgIFAmNtBQJlYQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECZWoBAmVrBAJlbAkAtgIBAAIEAmVtCQCRAwIFAmVrAAAEAmVuCQCRAwIFAmVrAAEEAmVvCQCnAwEFAWgEAmVwCQC5AgIJAKcDAQUCYUIFAmVvBAJlcQkAtwICBQJlbQUCZW4DCQAAAgUCZXEFAWUFAWUEAmVyCQC5AgIFAmVwBQJlbAoBAmVzAgJldAJldQQCZXYFAmV0BAJldwgFAmV2Al8xBAJleAgFAmV2Al8yAwkBAiE9AgUCZXgFBHVuaXQFAmV0BAJleQkAugICCQC5AgIJALkCAgUCZXcFAmV3BQJldwkAuQICCQC5AgIJALkCAgUCZW0FAmVuBQJlbAUCZWwEAmV6CQC6AgIJALkCAgkAtwICCQC6AgIJALkCAgUCZXIFAmVxBQJlbwkAuQICBQJleQUCZWwFAmV3CQC3AgIJALoCAgkAuQICCQC4AgIFAmVyBQJlbwUCZXcFAmVvCQC5AgIJALcCAgUCZWwJALYCAQABBQJleQQCZUEJAQFOAQkAuAICBQJlegkBBXZhbHVlAQUCZXcDCQDAAgIFAWYFAmVBCQCUCgIFAmV6BQJldQkAlAoCBQJlegUEdW5pdAQCZUIJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGCQDMCAIABwUDbmlsBAJlQwoAAmVEBQJlQgoAAmVFCQCQAwEFAmVECgACZUYJAJQKAgUCZXEFBHVuaXQKAQJlRwICZUgCZUkDCQBnAgUCZUkFAmVFBQJlSAkBAmVzAgUCZUgJAJEDAgUCZUQFAmVJCgECZUoCAmVIAmVJAwkAZwIFAmVJBQJlRQUCZUgJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA3CQECZUoCCQECZUcCCQECZUcCCQECZUcCCQECZUcCCQECZUcCCQECZUcCCQECZUcCBQJlRgAAAAEAAgADAAQABQAGAAcEAmV3CAUCZUMCXzEEAmV4CAUCZUMCXzIDCQECIT0CBQJleAUEdW5pdAUCZXcJAAIBCQCsAgICGUQgY2FsY3VsYXRpb24gZXJyb3IsIEQgPSAJAKYDAQUCZXcBAmVLAAQCYXUJAKIIAQkBAVAAAwkAAQIFAmF1AgZTdHJpbmcEAmVxBQJhdQkA2QQBBQJlcQMJAAECBQJhdQIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJlTAAEAmF1CQCiCAEJAQFRAAMJAAECBQJhdQIGU3RyaW5nBAJlcQUCYXUJANkEAQUCZXEDCQABAgUCYXUCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgACZU0JAAIBAhFQZXJtaXNzaW9uIGRlbmllZAECZU4BAmRxBAJhdQkBAmVLAAMJAAECBQJhdQIKQnl0ZVZlY3RvcgQCZU8FAmF1AwkAAAIIBQJkcQ9jYWxsZXJQdWJsaWNLZXkFAmVPBgUCZU0DCQABAgUCYXUCBFVuaXQDCQAAAggFAmRxBmNhbGxlcgUEdGhpcwYFAmVNCQACAQILTWF0Y2ggZXJyb3IeAmRxAQtjb25zdHJ1Y3RvcgEBTwQCZVAJAQJlTgEFAmRxAwkAAAIFAmVQBQJlUAkAzAgCCQELU3RyaW5nRW50cnkCCQEBTwAFAU8FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkcQEKc2V0TWFuYWdlcgECZVEEAmVQCQECZU4BBQJkcQMJAAACBQJlUAUCZVAEAmVSCQDZBAEFAmVRAwkAAAIFAmVSBQJlUgkAzAgCCQELU3RyaW5nRW50cnkCCQEBUQAFAmVRBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHEBDmNvbmZpcm1NYW5hZ2VyAAQCYksJAQJlTAAEAmVTAwkBCWlzRGVmaW5lZAEFAmJLBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJlUwUCZVMEAmVUAwkAAAIIBQJkcQ9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmJLBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJlVAUCZVQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVAACQDYBAEJAQV2YWx1ZQEFAmJLCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFRAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRxAQNwdXQCAmVVAmVWBAJlVwkBAmFKAAQCZVgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmVXBQF5AgpXciBzdCBhZGRyBAJlWQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCZVcFAXoCCldyIHNsIGFkZHIDCQBmAgAABQJlVQkAAgECDldyb25nIHNsaXBwYWdlAwkBAiE9AgkAkAMBCAUCZHEIcGF5bWVudHMAAgkAAgECDDIgcG1udHMgZXhwZAQCZVoJAQJkcwoJAKUIAQgFAmRxBmNhbGxlcgkA2AQBCAUCZHENdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIICQEFdmFsdWUBCQCRAwIIBQJkcQhwYXltZW50cwAAB2Fzc2V0SWQICQEFdmFsdWUBCQCRAwIIBQJkcQhwYXltZW50cwAABmFtb3VudAkAkQMCCAUCZHEIcGF5bWVudHMAAQUCZVUGBwYAAAIABAJjVggFAmVaAl8yBAJkTwgFAmVaAl83BAJjbQgFAmVaAl85BAJjVwgFAmVaA18xMAQCY1gIBQJlWgNfMTEEAmJVCAUCZVoDXzEyBAJiVggFAmVaA18xMwQCY0kJAPwHBAUCYUECBGVtaXQJAMwIAgUCY1YFA25pbAUDbmlsAwkAAAIFAmNJBQJjSQQCZmEEAmF1BQJjSQMJAAECBQJhdQIHQWRkcmVzcwQCZmIFAmF1CQD8BwQFAmZiAgRlbWl0CQDMCAIFAmNWBQNuaWwFA25pbAUEdW5pdAMJAAACBQJmYQUCZmEEAmZjAwkAZgIFAmNXAAAJAPwHBAUCZVkCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJiVQUCY1cFA25pbAUDbmlsAwkAAAIFAmZjBQJmYwQCZmQDCQBmAgUCY1gAAAkA/AcEBQJlWQIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJWBQJjWAUDbmlsBQNuaWwDCQAAAgUCZmQFAmZkBAJmZQMFAmVWBAJmZgkA/AcEBQJlWAIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZE8FAmNWBQNuaWwDCQAAAgUCZmYFAmZmBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmRxBmNhbGxlcgUCY1YFAmRPBQNuaWwJAM4IAgUCY20FAmZlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRxAQlwdXRPbmVUa24FAmRLAmRMAmZnAmJsAmVWBAJiQwkBAmFKAAQCZVgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmJDBQF5AgpXciBzdCBhZGRyBAJlWQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUCYkMFAXoCCldyIHNsIGFkZHIEAmZoCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQJiQwUBQQILV3IgZ3d4IGFkZHIEAmZpCQECYUYABAJiVQkAkQMCBQJmaQUBcwQCYlYJAJEDAgUCZmkFAXQEAmJXCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZmkFAXUEAmJYCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZmkFAXYEAmZqCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQJhYwACAAQCYlMDCQAAAgUCZmoJAKUIAQgFAmRxBmNhbGxlcggFAmRxDG9yaWdpbkNhbGxlcggFAmRxBmNhbGxlcgMDAwMJAGcCAAAFAmJsBgkAZwIAAAUCZEsGCQBnAgAABQJkTAYJAGcCAAAFAmZnCQACAQIMV3JvbmcgcGFyYW1zAwkBAiE9AgkAkAMBCAUCZHEIcGF5bWVudHMAAQkAAgECCzEgcG1udCBleHBkBAJkcgkBBXZhbHVlAQkAkQMCCAUCZHEIcGF5bWVudHMAAAQCYlEJANgEAQkBBXZhbHVlAQgFAmRyB2Fzc2V0SWQEAmZrCAUCZHIGYW1vdW50BAJmbAkBAmJMAQUCZmsEAmN3CAUCZmwCXzEEAmJOCAUCZmwCXzIDCQBmAgCAreIEBQJmawkAAgECDVdyb25nIHBtdCBhbXQEAmNhCQECYmQBBQJiVQQCY2MJAQJiZAEFAmJWBAJmbQMJAAACBQJiUQUCYlUDAwkAZgIFAmZrBQJjYQYJAGYCBQJkSwUCY3cJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCYCgYJAGUCBQJjYQUCZmsFAmNjCQBlAgUCY3cFAmRLBQJkTAAAAAADCQAAAgUCYlEFAmJWAwMJAGYCBQJmawUCY2MGCQBmAgUCZEwFAmN3CQACAQIWaW52YWxpZCBwYXltZW50IGFtb3VudAkAmAoGBQJjYQkAZQIFAmNjBQJmawAAAAAJAGUCBQJjdwUCZEwFAmRLCQACAQIQd3JvbmcgcG10QXNzZXRJZAQCZEIIBQJmbQJfMQQCZEMIBQJmbQJfMgQCZm4IBQJmbQJfMwQCZm8IBQJmbQJfNAQCZnAIBQJmbQJfNQQCZnEIBQJmbQJfNgQCYnEJAPwHBAUCZmgCBWNhbGNECQDMCAIJAKQDAQUCZEIJAMwIAgkApAMBBQJkQwkAzAgCBQJhQgkAzAgCBQFoCQDMCAIFAWkFA25pbAUDbmlsBAJicAkA/AcEBQJmaAIFY2FsY0QJAMwIAgkApgMBCQC2AgEJAGUCCQBkAgUCZEIFAmZuBQJmcQkAzAgCCQCmAwEJALYCAQkAZQIJAGQCBQJkQwUCZnAFAmZvCQDMCAIFAmFCCQDMCAIFAWgJAMwIAgUBaQUDbmlsBQNuaWwEAmZyCQECYm8DCQCnAwEJAQJhdAEFAmJwCQCnAwEJAQJhdAEFAmJxBQFnAwkAAAIFAmZyBQJmcgQCZE0JAQJkcwoJAKUIAQgFAmRxBmNhbGxlcgkA2AQBCAUCZHENdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUCYlUFAmRLCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQJiVgUCZEwFAmJsBgYGBQJjdwUCYlEEAmROCAUCZE0CXzIEAmRPCAUCZE0CXzcEAmNtCAUCZE0CXzkEAmNXCAUCZE0DXzEwBAJjWAgFAmRNA18xMQQCZnMJAQJiaQMJALYCAQUCZE4JALYCAQUCZmcJALYCAQUCYmwEAmNWCQCgAwEIBQJmcwJfMgQCZVoJAPwHBAUCYUECBGVtaXQJAMwIAgUCY1YFA25pbAUDbmlsAwkAAAIFAmVaBQJlWgQCZmEEAmF1BQJlWgMJAAECBQJhdQIHQWRkcmVzcwQCZmIFAmF1CQD8BwQFAmZiAgRlbWl0CQDMCAIFAmNWBQNuaWwFA25pbAUEdW5pdAMJAAACBQJmYQUCZmEEAmZjAwkAZgIFAmNXAAAJAPwHBAUCZVkCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFAmJVBQJjVwUDbmlsBQNuaWwDCQAAAgUCZmMFAmZjBAJmZAMJAGYCBQJjWAAACQD8BwQFAmVZAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQJiVgUCY1gFA25pbAUDbmlsAwkAAAIFAmZkBQJmZAQCZmUDBQJlVgQCZmYJAPwHBAUCZVgCBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmRPBQJjVgUDbmlsAwkAAAIFAmZmBQJmZgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJkcQZjYWxsZXIFAmNWBQJkTwUDbmlsBAJlaAMJAGYCBQJiTgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFFBQJiTgkA2QQBBQJiUQUDbmlsBQNuaWwJAM4IAgkAzggCBQJjbQUCZmUFAmVoCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmRxAQtwdXRPbmVUa25WMgICZFICZVYDCQECIT0CCQCQAwEIBQJkcQhwYXltZW50cwABCQACAQILMSBwbW50IGV4cGQEAmR5CQECYUYABAJiVQkAkQMCBQJkeQUBcwQCYlYJAJEDAgUCZHkFAXQEAmRWCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZHkFAXUEAmRXCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCZHkFAXYEAmJTAwkAAAIIBQJkcQZjYWxsZXIFBHRoaXMIBQJkcQxvcmlnaW5DYWxsZXIIBQJkcQZjYWxsZXIEAmRyCQEFdmFsdWUBCQCRAwIIBQJkcQhwYXltZW50cwAABAJiUQkA2AQBCQEFdmFsdWUBCAUCZHIHYXNzZXRJZAQCY3cIBQJkcgZhbW91bnQDCQBmAgCAreIEBQJjdwkAAgECDVdyb25nIHBtdCBhbXQEAmNJCQECZHcEBQJjdwUCYlEJAKUIAQUCYlMJANgEAQgFAmRxDXRyYW5zYWN0aW9uSWQEAmROCAUCY0kCXzIEAmRPCAUCY0kCXzcEAmNtCAUCY0kCXzkEAmNXCAUCY0kDXzEwBAJjWAgFAmNJA18xMQQCY1YDAwkAZgIFAmRSAAAJAGYCBQJkUgUCZE4HCQACAQkAuQkCCQDMCAICH2Ftb3VudCB0byByZWNlaXZlIGlzIGxlc3MgdGhhbiAJAMwIAgkApAMBBQJkUgUDbmlsAgAFAmROBAJlWgkA/AcEBQJhQQIEZW1pdAkAzAgCBQJjVgUDbmlsBQNuaWwDCQAAAgUCZVoFAmVaBAJmYQQCYXUFAmVaAwkAAQIFAmF1AgdBZGRyZXNzBAJmYgUCYXUJAPwHBAUCZmICBGVtaXQJAMwIAgUCY1YFA25pbAUDbmlsBQR1bml0AwkAAAIFAmZhBQJmYQQCZmMDCQBmAgUCY1cAAAkA/AcEBQJhTQIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUCYlUFAmNXBQNuaWwFA25pbAMJAAACBQJmYwUCZmMEAmZkAwkAZgIFAmNYAAAJAPwHBAUCYU0CA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFAmJWBQJjWAUDbmlsBQNuaWwDCQAAAgUCZmQFAmZkBAJmZQMFAmVWBAJmZgkA/AcEBQJhTAIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCZE8FAmNWBQNuaWwDCQAAAgUCZmYFAmZmBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmRxBmNhbGxlcgUCY1YFAmRPBQNuaWwEAmJOCAkBAmJMAQUCY3cCXzIEAmVoAwkAZgIFAmJOAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUUFAmJOCQDZBAEFAmJRBQNuaWwFA25pbAkAlAoCCQDOCAIJAM4IAgUCY20FAmZlBQJlaAUCY1YJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHEBE3B1dE9uZVRrblYyUkVBRE9OTFkCAmZ0AmZ1BAJjSQkBAmR3BAUCZnQFAmZ1AgACAAQCZE4IBQJjSQJfMgQCZE8IBQJjSQJfNwQCY20IBQJjSQJfOQQCY1cIBQJjSQNfMTAEAmNYCAUCY0kDXzExCQCUCgIFA25pbAUCZE4CZHEBHHB1dE9uZVRrblYyV2l0aEJvbnVzUkVBRE9OTFkCAmZ0AmZ1BAJkeQkBAmFGAAQCYlUJAJEDAgUCZHkFAXMEAmJWCQCRAwIFAmR5BQF0BAJjSQkBAmR3BAUCZnQFAmZ1AgACAAQCZE4IBQJjSQJfMgQCY2YIBQJjSQJfMwQCZnYIBQJjSQJfNgQCZE8IBQJjSQJfNwQCY2EJAQJiZAEFAmJVBAJjYwkBAmJkAQUCYlYEAmZ3CQBrAwUCY2MFAWEFAmNhBAJmeAkAawMFAmZ0BQFhCQBkAgUCZncFAWEEAmZ5CQBlAgUCZnQFAmZ4BAJmegkAawMFAmZ2BQJmeQUCY2MEAmZBCQBrAwkAZQIFAmROBQJmegUBYQUCZnoEAmJOCAkBAmJMAQUCZnQCXzIJAJQKAgUDbmlsCQCVCgMFAmROBQJiTgUCZkECZHEBCnB1dEZvckZyZWUBAmZCAwkAZgIAAAUCZkIJAAIBAgpXcm9uZyBzbHBnAwkBAiE9AgkAkAMBCAUCZHEIcGF5bWVudHMAAgkAAgECDDIgcG1udHMgZXhwZAQCZE0JAQJkcwoJAKUIAQgFAmRxBmNhbGxlcgkA2AQBCAUCZHENdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIICQEFdmFsdWUBCQCRAwIIBQJkcQhwYXltZW50cwAAB2Fzc2V0SWQICQEFdmFsdWUBCQCRAwIIBQJkcQhwYXltZW50cwAABmFtb3VudAkAkQMCCAUCZHEIcGF5bWVudHMAAQUCZkIHBwYAAAIACAUCZE0CXzkCZHEBA2dldAAEAmNJCQECZHABBQJkcQQCZkMIBQJjSQJfMQQCY2wIBQJjSQJfMgQCY3cIBQJjSQJfMwQCYlEIBQJjSQJfNAQCY20IBQJjSQJfNQQCZkQJAPwHBAUCYUECBGJ1cm4JAMwIAgUCY3cFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlEFAmN3BQNuaWwDCQAAAgUCZkQFAmZEBQJjbQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkcQEJZ2V0T25lVGtuBQJmRQJmRgJmRwJkUQJibAMJAQIhPQIJAJADAQgFAmRxCHBheW1lbnRzAAEJAAIBAgsxIHBtbnQgZXhwZAQCYkMJAQJhRgAEAmJUCQCRAwIFAmJDBQFyBAJiVQkAkQMCBQJiQwUBcwQCYlYJAJEDAgUCYkMFAXQEAmJXCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYkMFAXUEAmJYCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCYkMFAXYEAmJZCQCRAwIFAmJDBQFxBAJlVwkBAmFKAAQCZmgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmVXBQFBAgpXciBzbCBhZGRyBAJkcgkBBXZhbHVlAQkAkQMCCAUCZHEIcGF5bWVudHMAAAQCZmoJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBAmFjAAIABAJiUwMJAAACBQJmagkApQgBCAUCZHEGY2FsbGVyCAUCZHEMb3JpZ2luQ2FsbGVyCAUCZHEGY2FsbGVyBAJiUAkA2AQBCAUCZHENdHJhbnNhY3Rpb25JZAQCYlEJAQV2YWx1ZQEIBQJkcgdhc3NldElkBAJjdwgFAmRyBmFtb3VudAMJAGYCAICU69wDBQJjdwkAAgECDU1pbiBwbXQgMTAgTFADAwMJAGYCAAAFAmJsBgkAZgIAAAUCZkUGCQBmAgAABQJmRwkAAgECDFdyb25nIHBhcmFtcwMJAQIhPQIFAmJUCQDYBAEFAmJRCQACAQIIV3JvbmcgTFAEAmNJCQECYk8ECQDYBAEIBQJkcQ10cmFuc2FjdGlvbklkCQDYBAEFAmJRBQJjdwgFAmRxBmNhbGxlcgQCZkgIBQJjSQJfMQQCZkkIBQJjSQJfMgQCY2EJAQJiZAEFAmJVBAJjYwkBAmJkAQUCYlYEAmZKAwkAAAIFAmRRBQJiVQkAmQoHCQBlAgUCY2EFAmZICQBlAgUCY2MFAmZJBQJmRQUCZkkAAAAACQBkAgUCZkgFAmZFAwkAAAIFAmRRBQJiVgkAmQoHCQBlAgUCY2EFAmZICQBlAgUCY2MFAmZJAAAAAAUCZkUFAmZICQBkAgUCZkkFAmZFCQACAQIQd3Jvbmcgb3V0QXNzZXRJZAQCZEIIBQJmSgJfMQQCZEMIBQJmSgJfMgQCZm4IBQJmSgJfMwQCZm8IBQJmSgJfNAQCZnAIBQJmSgJfNQQCZnEIBQJmSgJfNgQCZksIBQJmSgJfNwMDCQBmAgAABQJmbgYJAGYCAAAFAmZwCQACAQIKV3JvbmcgY2FsYwQCYnEJAPwHBAUCZmgCBWNhbGNECQDMCAIJAKQDAQUCZEIJAMwIAgkApAMBBQJkQwkAzAgCBQJhQgkAzAgCBQFoCQDMCAIFAWkFA25pbAUDbmlsBAJicAkA/AcEBQJmaAIFY2FsY0QJAMwIAgkApAMBCQBkAgkAZQIFAmRCBQJmbgUCZnEJAMwIAgkApAMBCQBlAgkAZAIFAmRDBQJmbwUCZnAJAMwIAgUCYUIJAMwIAgUBaAkAzAgCBQFpBQNuaWwFA25pbAQCZnIJAQJibwMJAKcDAQkBAmF0AQUCYnAJAKcDAQkBAmF0AQUCYnEFAWcDCQAAAgUCZnIFAmZyBAJkWggJAQJiTAEFAmZLAl8xBAJmTAkBAmJpAwkAtgIBBQJkWgkAtgIBBQJmRwkAtgIBBQJibAMJAAACBQJmTAUCZkwEAmZNAwkAAAIFAmRRBQJiVQkAlAoCCQCgAwEIBQJmTAJfMgAACQCUCgIAAAkAoAMBCAUCZkwCXzIEAmVjCAUCZk0CXzEEAmVkCAUCZk0CXzIEAmVhCQBkAgUCZWMFAmVkBAJiTgkAZQIFAmZLBQJkWgQCZWcDCQAAAgUCZFECBVdBVkVTBQR1bml0CQDZBAEFAmRRBAJlaAMJAGYCBQJiTgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFFBQJiTgUCZWcFA25pbAUDbmlsBAJlZQkBAmJmAgkBAUMCBQJjYwUCYlgJAQFDAgUCY2EFAmJXBAJlZgkBAUYCBQJlZQUBYQQCY20JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYlMFAmVhBQJlZwkAzAgCCQELU3RyaW5nRW50cnkCCQEBWQIJAKUIAQUCYlMFAmJQCQECYVoGBQJlYwUCZWQFAmN3BQJlZgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVIABQJlZgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAVMCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQJlZgUDbmlsAwkAAAIFAmNtBQJjbQQCZWkJAPwHBAUCYUECBGJ1cm4JAMwIAgUCY3cFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCYlEFAmN3BQNuaWwDCQAAAgUCZWkFAmVpCQDOCAIFAmNtBQJlaAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJkcQELZ2V0T25lVGtuVjICAmRRAmRSBAJmTgkBAmRQBgUCZFEFAmRSCAUCZHEIcGF5bWVudHMIBQJkcQZjYWxsZXIIBQJkcQxvcmlnaW5DYWxsZXIIBQJkcQ10cmFuc2FjdGlvbklkBAJjbQgFAmZOAl8xBAJlYQgFAmZOAl8yCQCUCgIFAmNtBQJlYQJkcQETZ2V0T25lVGtuVjJSRUFET05MWQICZFECZk8EAmR5CQECYUYABAJiVAkAkQMCBQJkeQUBcgQCYlUJAJEDAgUCZHkFAXMEAmJWCQCRAwIFAmR5BQF0BAJjSQkBAmJPBAIABQJiVAUCZk8FBHRoaXMEAmZICAUCY0kCXzEEAmZJCAUCY0kCXzIEAmNhCQECYmQBBQJiVQQCY2MJAQJiZAEFAmJWBAJkQgkAZQIFAmNhBQJmSAQCZEMJAGUCBQJjYwUCZkkEAmZQAwkAAAIFAmRRBQJiVQkAlgoEBQJkQwUCZEIFAmZJBQJmSAMJAAACBQJkUQUCYlYJAJYKBAUCZEIFAmRDBQJmSAUCZkkJAAIBAhB3cm9uZyBvdXRBc3NldElkBAJmUQgFAmZQAl8xBAJmUggFAmZQAl8yBAJmUwgFAmZQAl8zBAJmVAgFAmZQAl80BAJmVQABBAJmRQoAAmRJCQD8BwQFAmFOAgxjYWxjU3dhcFhUb1kJAMwIAgkApAMBBQJmUwkAzAgCCQCkAwEFAmZRCQDMCAIJAKQDAQUCZlIJAMwIAgIACQDMCAIFAmFCCQDMCAIFAWgJAMwIAgkApAMBBQJmVQkAzAgCBQFpBQNuaWwFA25pbAMJAAECBQJkSQIDSW50BQJkSQkAAgEJAKwCAgkAAwEFAmRJAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQEAmZLCQBkAgUCZkUFAmZUBAJmVgkBAmJMAQUCZksEAmRaCAUCZlYCXzEEAmJOCAUCZlYCXzIJAJQKAgUDbmlsCQCUCgIFAmRaBQJiTgJkcQEcZ2V0T25lVGtuVjJXaXRoQm9udXNSRUFET05MWQICZFECZk8EAmR5CQECYUYABAJiVQkAkQMCBQJkeQUBcwQCYlYJAJEDAgUCZHkFAXQEAmJUCQCRAwIFAmR5BQFyBAJjYQkBAmJkAQUCYlUEAmNjCQECYmQBBQJiVgQCZlcKAAJkSQkA/AcEBQR0aGlzAhNnZXRPbmVUa25WMlJFQURPTkxZCQDMCAIFAmRRCQDMCAIFAmZPBQNuaWwFA25pbAMJAAECBQJkSQIKKEludCwgSW50KQUCZEkJAAIBCQCsAgIJAAMBBQJkSQIfIGNvdWxkbid0IGJlIGNhc3QgdG8gKEludCwgSW50KQQCZFoIBQJmVwJfMQQCYk4IBQJmVwJfMgQCY0kJAQJiTwQCAAUCYlQFAmZPBQR0aGlzBAJjawgFAmNJAl8xBAJjbAgFAmNJAl8yBAJmWAkAZAIFAmNrBQJjbAQCZkEJAGsDCQBlAgUCZFoFAmZYBQFhBQJmWAkAlAoCBQNuaWwJAJUKAwUCZFoFAmJOBQJmQQJkcQEJZ2V0Tm9MZXNzAgJmWQJmWgQCY0kJAQJkcAEFAmRxBAJjawgFAmNJAl8xBAJjbAgFAmNJAl8yBAJjdwgFAmNJAl8zBAJiUQgFAmNJAl80BAJjbQgFAmNJAl81AwkAZgIFAmZZBQJjawkAAgEJAKwCAgkArAICCQCsAgICCUZhaWxlZDogIAkApAMBBQJjawIDIDwgCQCkAwEFAmZZAwkAZgIFAmZaBQJjbAkAAgEJAKwCAgkArAICCQCsAgICCEZhaWxlZDogCQCkAwEFAmNsAgMgPCAJAKQDAQUCZloEAmdhCQD8BwQFAmFBAgRidXJuCQDMCAIFAmN3BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmJRBQJjdwUDbmlsAwkAAAIFAmdhBQJnYQUCY20JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHEBDXVuc3Rha2VBbmRHZXQBAmJNBAJnYgMJAQIhPQIJAJADAQgFAmRxCHBheW1lbnRzAAAJAAIBAg1ObyBwbW50cyBleHBkBgMJAAACBQJnYgUCZ2IEAmJDCQECYUYABAJnYwkBAmFKAAQCZE8JANkEAQkAkQMCBQJiQwUBcgQCZ2QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmdjBQF5AgpXciBzdCBhZGRyBAJnZQkA/AcEBQJnZAIHdW5zdGFrZQkAzAgCCQDYBAEFAmRPCQDMCAIFAmJNBQNuaWwFA25pbAMJAAACBQJnZQUCZ2UEAmNJCQECYk8ECQDYBAEIBQJkcQ10cmFuc2FjdGlvbklkCQDYBAEFAmRPBQJiTQgFAmRxBmNhbGxlcgQCYlkJAQ1wYXJzZUludFZhbHVlAQgFAmNJAl85BAJjbQgFAmNJA18xMAQCZ2YDAwkBAmFDAAYJAAACBQJiWQUBbwkAAgEJAKwCAgIJQmxvY2tlZDogCQCkAwEFAmJZBgMJAAACBQJnZgUCZ2YEAmdnCQD8BwQFAmFBAgRidXJuCQDMCAIFAmJNBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmRPBQJiTQUDbmlsAwkAAAIFAmdnBQJnZwUCY20JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHEBE3Vuc3Rha2VBbmRHZXRPbmVUa24DAmdoAmRRAmRSBAJnYgMJAQIhPQIJAJADAQgFAmRxCHBheW1lbnRzAAAJAAIBAg1ObyBwbW50cyBleHBkBgMJAAACBQJnYgUCZ2IEAmJDCQECYUYABAJnYwkBAmFKAAQCZE8JANkEAQkAkQMCBQJiQwUBcgQCZ2QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFAmdjBQF5AgpXciBzdCBhZGRyBAJnZQkA/AcEBQJnZAIHdW5zdGFrZQkAzAgCCQDYBAEFAmRPCQDMCAIFAmdoBQNuaWwFA25pbAMJAAACBQJnZQUCZ2UEAmdpCQECZFAGBQJkUQUCZFIJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAmRPBQJnaAUDbmlsCAUCZHEGY2FsbGVyCAUCZHEMb3JpZ2luQ2FsbGVyCAUCZHENdHJhbnNhY3Rpb25JZAQCY20IBQJnaQJfMQQCZWEIBQJnaQJfMgkAlAoCBQJjbQUCZWEJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CZHEBC3B1dE9uZVRrblYzAAQCZHkJAQJhRgAEAmJVCQCRAwIFAmR5BQFzBAJiVgkAkQMCBQJkeQUBdAQCYlQJAJEDAgUCZHkFAXIEAmdqCQCRAwIIBQJkcQhwYXltZW50cwAABAJnawkA2AQBCQEFdmFsdWUBCAUCZ2oHYXNzZXRJZAQCZmsIBQJnagZhbW91bnQEAmdsCQECYkwBBQJmawQCZnQIBQJnbAJfMQQCYk4IBQJnbAJfMgQCZ20DCQAAAgkAkAMBCAUCZHEIcGF5bWVudHMAAQMJAAACBQJnawUCYlUJAJQKAgUCZnQAAAMJAAACBQJnawUCYlYJAJQKAgAABQJmdAkAAgECD2ludmFsaWQgcGF5bWVudAkAAgECFWludmFsaWQgcGF5bWVudHMgc2l6ZQQCZ24IBQJnbQJfMQQCZ28IBQJnbQJfMgQCZ3AJAQJiZAEFAmJVBAJncQkBAmJkAQUCYlYEAmdyCQBlAgUCZ3AFAmduBAJncwkAZQIFAmdxBQJnbwQCYnEJAQJlagEJAMwIAgkAtgIBBQJncgkAzAgCCQC2AgEFAmdzBQNuaWwEAmJwCQECZWoBCQDMCAIJALYCAQUCZ3AJAMwIAgkAtgIBBQJncQUDbmlsBAJndAkAtgIBCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUCYlQCEGludmFsaWQgbHAgYXNzZXQIcXVhbnRpdHkEAmd1CQC6AgIJALkCAgUCZ3QJALgCAgUCYnAFAmJxBQJicQkAlAoCBQNuaWwJAKADAQUCZ3UCZHEBCGFjdGl2YXRlAgJndgJndwMJAQIhPQIJAKUIAQgFAmRxBmNhbGxlcgkApQgBBQJhQQkAAgECBmRlbmllZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFaAAUCZ3YJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFhAAUCZ3cFA25pbAIHc3VjY2VzcwJkcQEEc2V0UwICZ3gCZ2YDCQECIT0CCQClCAEIBQJkcQZjYWxsZXIJAQJhdwIFBHRoaXMJAQJhYwAFAmVNCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmd4BQJnZgUDbmlsAmRxAQRzZXRJAgJneAJnZgMJAQIhPQIJAKUIAQgFAmRxBmNhbGxlcgkBAmF3AgUEdGhpcwkBAmFjAAUCZU0JAMwIAgkBDEludGVnZXJFbnRyeQIFAmd4BQJnZgUDbmlsAmRxARxnZXRQb29sQ29uZmlnV3JhcHBlclJFQURPTkxZAAkAlAoCBQNuaWwJAQJhRgACZHEBHGdldEFjY0JhbGFuY2VXcmFwcGVyUkVBRE9OTFkBAmJlCQCUCgIFA25pbAkBAmJkAQUCYmUCZHEBGWNhbGNQcmljZXNXcmFwcGVyUkVBRE9OTFkDAmJ3AmJ4AmJCBAJneQkBAmJBAwUCYncFAmJ4BQJiQgkAlAoCBQNuaWwJAMwIAgkApgMBCQCRAwIFAmd5AAAJAMwIAgkApgMBCQCRAwIFAmd5AAEJAMwIAgkApgMBCQCRAwIFAmd5AAIFA25pbAJkcQEWZnJvbVgxOFdyYXBwZXJSRUFET05MWQIBRwJnegkAlAoCBQNuaWwJAQFGAgkApwMBBQFHBQJnegJkcQEUdG9YMThXcmFwcGVyUkVBRE9OTFkCAUQBRQkAlAoCBQNuaWwJAKYDAQkBAUMCBQFEBQFFAmRxAR5jYWxjUHJpY2VCaWdJbnRXcmFwcGVyUkVBRE9OTFkCAmJnAmJoCQCUCgIFA25pbAkApgMBCQECYmYCCQCnAwEFAmJnCQCnAwEFAmJoAmRxASNlc3RpbWF0ZVB1dE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQkCYlACYmwCY28CY3ACY3ECY3ICZ0ECY3MCY3QJAJQKAgUDbmlsCQECY24NBQJiUAUCYmwFAmNvBQJjcAUCY3EFAmNyBQJnQQUCY3MFAmN0BgcAAAIAAmRxASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQCYlACZ0ICYlICZ0EEAmNJCQECYk8EBQJiUAUCZ0IFAmJSCQERQGV4dHJOYXRpdmUoMTA2MikBBQJnQQkAlAoCBQNuaWwJAJwKCggFAmNJAl8xCAUCY0kCXzIIBQJjSQJfMwgFAmNJAl80CAUCY0kCXzUIBQJjSQJfNggFAmNJAl83CQCmAwEIBQJjSQJfOAgFAmNJAl85CAUCY0kDXzEwAmRxAQ5nZXRGZWVSRUFET05MWQAJAJQKAgUDbmlsBQJhZQECZ0MBAmdEAAQCZ0UEAmF1CQECZUsAAwkAAQIFAmF1AgpCeXRlVmVjdG9yBAJlTwUCYXUFAmVPAwkAAQIFAmF1AgRVbml0CAUCZ0MPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IEAmF1BQJnQwMJAAECBQJhdQIFT3JkZXIEAmRkBQJhdQQCZ0YJAQJhRAAEAmdHCQECZGMBBQJkZAQCZ0gJAPQDAwgFAmRkCWJvZHlCeXRlcwkAkQMCCAUCZGQGcHJvb2ZzAAAIBQJkZA9zZW5kZXJQdWJsaWNLZXkEAmdJCQD0AwMIBQJkZAlib2R5Qnl0ZXMJAJEDAggFAmRkBnByb29mcwABBQJnRgMDAwUCZ0cFAmdIBwUCZ0kHBgkBAmFwAwUCZ0cFAmdIBQJnSQMJAAECBQJhdQIUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAmVxBQJhdQQCZ0oJAPYDAQkBBXZhbHVlAQgFAmVxBnNjcmlwdAQCZ0sJANsEAQkBBXZhbHVlAQkAnQgCBQJhQQkBAmFuAAQCZ0wJAPEHAQUEdGhpcwMDCQAAAgUCZ0sFAmdKCQECIT0CBQJnTAUCZ0oHBgkA9AMDCAUCZ0MJYm9keUJ5dGVzCQCRAwIIBQJnQwZwcm9vZnMAAAUCZ0UJAPQDAwgFAmdDCWJvZHlCeXRlcwkAkQMCCAUCZ0MGcHJvb2ZzAAAFAmdFRnrPfg==",
    "chainId": 84,
    "height": 2259075,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7AXMWTy9PurFxB3pFmgAeEGHP4dBteqUgKnMMW3qkBDU
Next: 4q8pTyDckPs1X3iVKwwS2ECzoKgc8c7qPxB7KFkEFUi9

Diff: 

OldNewDifferences
99 
1010 let zeroBigInt = toBigInt(0)
1111 
12-let oneBigInt = toBigInt(1)
12+let big0 = toBigInt(0)
13+
14+let big1 = toBigInt(1)
1315 
1416 let slippage4D = toBigInt((scale8 - ((scale8 * 1) / scale8)))
1517 
6567 
6668 
6769 func abs (val) = if ((zeroBigInt > val))
70+    then -(val)
71+    else val
72+
73+
74+func absBigInt (val) = if ((zeroBigInt > val))
6875     then -(val)
6976     else val
7077 
356363                 else calcLpAmt
357364             let amDiff = (inAmAmt - calcAmAssetPmt)
358365             let prDiff = (inPrAmt - calcPrAssetPmt)
359-            let $t01623716582 = if (if (isOneAsset)
366+            let $t01632716672 = if (if (isOneAsset)
360367                 then (pmtId == amIdStr)
361368                 else false)
362369                 then $Tuple2(pmtAmt, 0)
365372                     else false)
366373                     then $Tuple2(0, pmtAmt)
367374                     else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
368-            let writeAmAmt = $t01623716582._1
369-            let writePrAmt = $t01623716582._2
375+            let writeAmAmt = $t01632716672._1
376+            let writePrAmt = $t01632716672._2
370377             let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(writeAmAmt, writePrAmt, emitLpAmt, curPrice, slippage, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
371378             $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
372379             }
456463     let prId = poolConfig[idxPrAsId]
457464     let amBalance = getAccBalance(amId)
458465     let prBalance = getAccBalance(prId)
459-    let $t02091320958 = takeFee(pmtAmtRaw)
460-    let pmtAmt = $t02091320958._1
461-    let feeAmount = $t02091320958._2
462-    let $t02096221423 = if ((txId == ""))
466+    let $t02100321048 = takeFee(pmtAmtRaw)
467+    let pmtAmt = $t02100321048._1
468+    let feeAmount = $t02100321048._2
469+    let $t02105221513 = if ((txId == ""))
463470         then $Tuple2(amBalance, prBalance)
464471         else if ((pmtAssetId == amId))
465472             then if ((pmtAmtRaw > amBalance))
470477                     then throw("invalid payment amount")
471478                     else $Tuple2(amBalance, (prBalance - pmtAmtRaw))
472479                 else throw("wrong pmtAssetId")
473-    let amBalanceNow = $t02096221423._1
474-    let prBalanceNow = $t02096221423._2
475-    let $t02142721561 = if ((pmtAssetId == amId))
480+    let amBalanceNow = $t02105221513._1
481+    let prBalanceNow = $t02105221513._2
482+    let $t02151721651 = if ((pmtAssetId == amId))
476483         then $Tuple2(amBalanceNow, prBalanceNow)
477484         else $Tuple2(prBalanceNow, amBalanceNow)
478-    let amBalanceForCalc = $t02142721561._1
479-    let prBalanceForCalc = $t02142721561._2
485+    let amBalanceForCalc = $t02151721651._1
486+    let prBalanceForCalc = $t02151721651._2
480487     let xPrecision = 1
481488     let result = {
482489         let @ = invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)
484491             then @
485492             else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
486493         }
487-    let $t02203022126 = if ((pmtAssetId == amId))
494+    let $t02212022216 = if ((pmtAssetId == amId))
488495         then result
489496         else $Tuple2(result._2, result._1)
490-    let amAssetPart = $t02203022126._1
491-    let prAssetPart = $t02203022126._2
497+    let amAssetPart = $t02212022216._1
498+    let prAssetPart = $t02212022216._2
492499     let estPut = cp(userAddress, txId, AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), 0, true, true, false, pmtAmtRaw, pmtAssetId)
493500     let estimLP = estPut._2
494501     let lpAssetId = estPut._7
524531                     else {
525532                         let amBalance = getAccBalance(amId)
526533                         let prBalance = getAccBalance(prId)
527-                        let $t02348123589 = {
534+                        let $t02357123679 = {
528535                             let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)
529536                             if ($isInstanceOf(@, "(Int, Int)"))
530537                                 then @
531538                                 else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
532539                             }
533-                        let totalGet = $t02348123589._1
534-                        let feeAmount = $t02348123589._2
540+                        let totalGet = $t02357123679._1
541+                        let feeAmount = $t02357123679._2
535542                         let totalAmount = if (if ((minOutAmount > 0))
536543                             then (minOutAmount > totalGet)
537544                             else false)
538545                             then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
539546                             else totalGet
540-                        let $t02377623863 = if ((outAssetId == amId))
547+                        let $t02386623953 = if ((outAssetId == amId))
541548                             then $Tuple2(totalAmount, 0)
542549                             else $Tuple2(0, totalAmount)
543-                        let outAm = $t02377623863._1
544-                        let outPr = $t02377623863._2
550+                        let outAm = $t02386623953._1
551+                        let outPr = $t02386623953._2
545552                         let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
546553                         let curPr = f1(curPrX18, scale8)
547554                         let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
562569                         }
563570                 }
564571         }
572+
573+
574+func getD (xp) = {
575+    let n = toBigInt(2)
576+    let xp0 = xp[0]
577+    let xp1 = xp[1]
578+    let aPrecision = parseBigIntValue(Amult)
579+    let a = (parseBigIntValue(A) * aPrecision)
580+    let s = (xp0 + xp1)
581+    if ((s == big0))
582+        then big0
583+        else {
584+            let ann = (a * n)
585+            func calc (acc,cur) =             {
586+                let $t02511925139 = acc
587+                let d = $t02511925139._1
588+                let found = $t02511925139._2
589+                if ((found != unit))
590+                    then acc
591+                    else {
592+                        let dp = (((d * d) * d) / (((xp0 * xp1) * n) * n))
593+                        let dNext = (((((ann * s) / aPrecision) + (dp * n)) * d) / ((((ann - aPrecision) * d) / aPrecision) + ((n + toBigInt(1)) * dp)))
594+                        let dDiff = absBigInt((dNext - value(d)))
595+                        if ((big1 >= dDiff))
596+                            then $Tuple2(dNext, cur)
597+                            else $Tuple2(dNext, unit)
598+                        }
599+                }
600+
601+            let arr = [0, 1, 2, 3, 4, 5, 6, 7]
602+            let $t02556625612 = {
603+                let $l = arr
604+                let $s = size($l)
605+                let $acc0 = $Tuple2(s, unit)
606+                func $f0_1 ($a,$i) =                 if (($i >= $s))
607+                    then $a
608+                    else calc($a, $l[$i])
609+
610+                func $f0_2 ($a,$i) =                 if (($i >= $s))
611+                    then $a
612+                    else throw("List size exceeds 7")
613+
614+                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
615+                }
616+            let d = $t02556625612._1
617+            let found = $t02556625612._2
618+            if ((found != unit))
619+                then d
620+                else throw(("D calculation error, D = " + toString(d)))
621+            }
622+    }
565623 
566624 
567625 func m () = match getString(mpk()) {
735793                 let pmt = value(i.payments[0])
736794                 let pmtAssetId = toBase58String(value(pmt.assetId))
737795                 let paymentAmountRaw = pmt.amount
738-                let $t02924929301 = takeFee(paymentAmountRaw)
739-                let pmtAmt = $t02924929301._1
740-                let feeAmount = $t02924929301._2
796+                let $t03032230374 = takeFee(paymentAmountRaw)
797+                let pmtAmt = $t03032230374._1
798+                let feeAmount = $t03032230374._2
741799                 if ((10000000 > paymentAmountRaw))
742800                     then throw("Wrong pmt amt")
743801                     else {
744802                         let amBalance = getAccBalance(amId)
745803                         let prBalance = getAccBalance(prId)
746-                        let $t02946130077 = if ((pmtAssetId == amId))
804+                        let $t03053431150 = if ((pmtAssetId == amId))
747805                             then if (if ((paymentAmountRaw > amBalance))
748806                                 then true
749807                                 else (amAssetPart > pmtAmt))
756814                                     then throw("invalid payment amount")
757815                                     else $Tuple6(amBalance, (prBalance - paymentAmountRaw), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
758816                                 else throw("wrong pmtAssetId")
759-                        let amBalanceNow = $t02946130077._1
760-                        let prBalanceNow = $t02946130077._2
761-                        let virtSwapInAm = $t02946130077._3
762-                        let virtSwapOutPr = $t02946130077._4
763-                        let virtSwapInPr = $t02946130077._5
764-                        let virtSwapOutAm = $t02946130077._6
817+                        let amBalanceNow = $t03053431150._1
818+                        let prBalanceNow = $t03053431150._2
819+                        let virtSwapInAm = $t03053431150._3
820+                        let virtSwapOutPr = $t03053431150._4
821+                        let virtSwapInPr = $t03053431150._5
822+                        let virtSwapOutAm = $t03053431150._6
765823                         let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
766824                         let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
767825                         let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
10011059                         let estimPrAmt = r._2
10021060                         let amBalance = getAccBalance(amId)
10031061                         let prBalance = getAccBalance(prId)
1004-                        let $t03833238792 = if ((outAssetId == amId))
1062+                        let $t03940539865 = if ((outAssetId == amId))
10051063                             then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
10061064                             else if ((outAssetId == prId))
10071065                                 then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
10081066                                 else throw("wrong outAssetId")
1009-                        let amBalanceNow = $t03833238792._1
1010-                        let prBalanceNow = $t03833238792._2
1011-                        let virtSwapInAm = $t03833238792._3
1012-                        let virtSwapOutPr = $t03833238792._4
1013-                        let virtSwapInPr = $t03833238792._5
1014-                        let virtSwapOutAm = $t03833238792._6
1015-                        let totalGetRaw = $t03833238792._7
1067+                        let amBalanceNow = $t03940539865._1
1068+                        let prBalanceNow = $t03940539865._2
1069+                        let virtSwapInAm = $t03940539865._3
1070+                        let virtSwapOutPr = $t03940539865._4
1071+                        let virtSwapInPr = $t03940539865._5
1072+                        let virtSwapOutAm = $t03940539865._6
1073+                        let totalGetRaw = $t03940539865._7
10161074                         if (if ((0 > virtSwapInAm))
10171075                             then true
10181076                             else (0 > virtSwapInPr))
10271085                                         let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
10281086                                         if ((finalRes == finalRes))
10291087                                             then {
1030-                                                let $t03953939643 = if ((outAssetId == amId))
1088+                                                let $t04061240716 = if ((outAssetId == amId))
10311089                                                     then $Tuple2(toInt(finalRes._2), 0)
10321090                                                     else $Tuple2(0, toInt(finalRes._2))
1033-                                                let outAm = $t03953939643._1
1034-                                                let outPr = $t03953939643._2
1091+                                                let outAm = $t04061240716._1
1092+                                                let outPr = $t04061240716._2
10351093                                                 let totalAmount = (outAm + outPr)
10361094                                                 let feeAmount = (totalGetRaw - totalGet)
10371095                                                 let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
10631121 
10641122 @Callable(i)
10651123 func getOneTknV2 (outAssetId,minOutAmount) = {
1066-    let $t04066840823 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
1067-    let state = $t04066840823._1
1068-    let totalAmount = $t04066840823._2
1124+    let $t04174141896 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
1125+    let state = $t04174141896._1
1126+    let totalAmount = $t04174141896._2
10691127     $Tuple2(state, totalAmount)
10701128     }
10711129 
10841142     let prBalance = getAccBalance(prId)
10851143     let amBalanceNow = (amBalance - estimAmAmt)
10861144     let prBalanceNow = (prBalance - estimPrAmt)
1087-    let $t04133341641 = if ((outAssetId == amId))
1145+    let $t04240642714 = if ((outAssetId == amId))
10881146         then $Tuple4(prBalanceNow, amBalanceNow, estimPrAmt, estimAmAmt)
10891147         else if ((outAssetId == prId))
10901148             then $Tuple4(amBalanceNow, prBalanceNow, estimAmAmt, estimPrAmt)
10911149             else throw("wrong outAssetId")
1092-    let amountBalanceForSwap = $t04133341641._1
1093-    let priceBalanceForSwap = $t04133341641._2
1094-    let amountToSwap = $t04133341641._3
1095-    let amountToAdd = $t04133341641._4
1150+    let amountBalanceForSwap = $t04240642714._1
1151+    let priceBalanceForSwap = $t04240642714._2
1152+    let amountToSwap = $t04240642714._3
1153+    let amountToAdd = $t04240642714._4
10961154     let yPrecision = 1
10971155     let exchResult = {
10981156         let @ = invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)
11011159             else throw(($getType(@) + " couldn't be cast to Int"))
11021160         }
11031161     let totalGetRaw = (exchResult + amountToAdd)
1104-    let $t04216942218 = takeFee(totalGetRaw)
1105-    let totalGet = $t04216942218._1
1106-    let feeAmount = $t04216942218._2
1162+    let $t04324243291 = takeFee(totalGetRaw)
1163+    let totalGet = $t04324243291._1
1164+    let feeAmount = $t04324243291._2
11071165     $Tuple2(nil, $Tuple2(totalGet, feeAmount))
11081166     }
11091167 
11171175     let lpId = poolConfig[idxLPAsId]
11181176     let amBalance = getAccBalance(amId)
11191177     let prBalance = getAccBalance(prId)
1120-    let $t04256242677 = {
1178+    let $t04363543750 = {
11211179         let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, lpAssetAmount], nil)
11221180         if ($isInstanceOf(@, "(Int, Int)"))
11231181             then @
11241182             else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
11251183         }
1126-    let totalGet = $t04256242677._1
1127-    let feeAmount = $t04256242677._2
1184+    let totalGet = $t04363543750._1
1185+    let feeAmount = $t04363543750._2
11281186     let r = ego("", lpId, lpAssetAmount, this)
11291187     let outAmAmt = r._1
11301188     let outPrAmt = r._2
12091267             let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), unstakeAmount], nil)
12101268             if ((unstakeInv == unstakeInv))
12111269                 then {
1212-                    let $t04498245170 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1213-                    let state = $t04498245170._1
1214-                    let totalAmount = $t04498245170._2
1270+                    let $t04605546243 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1271+                    let state = $t04605546243._1
1272+                    let totalAmount = $t04605546243._2
12151273                     $Tuple2(state, totalAmount)
12161274                     }
12171275                 else throw("Strict value is not equal to itself.")
12181276             }
12191277         else throw("Strict value is not equal to itself.")
1278+    }
1279+
1280+
1281+
1282+@Callable(i)
1283+func putOneTknV3 () = {
1284+    let poolConfig = gpc()
1285+    let amId = poolConfig[idxAmAsId]
1286+    let prId = poolConfig[idxPrAsId]
1287+    let lpId = poolConfig[idxLPAsId]
1288+    let payment = i.payments[0]
1289+    let paymentAsset = toBase58String(value(payment.assetId))
1290+    let paymentAmountRaw = payment.amount
1291+    let $t04657246631 = takeFee(paymentAmountRaw)
1292+    let paymentAmount = $t04657246631._1
1293+    let feeAmount = $t04657246631._2
1294+    let $t04663546905 = if ((size(i.payments) == 1))
1295+        then if ((paymentAsset == amId))
1296+            then $Tuple2(paymentAmount, 0)
1297+            else if ((paymentAsset == prId))
1298+                then $Tuple2(0, paymentAmount)
1299+                else throw("invalid payment")
1300+        else throw("invalid payments size")
1301+    let amAmount = $t04663546905._1
1302+    let prAmount = $t04663546905._2
1303+    let amBalanceNew = getAccBalance(amId)
1304+    let prBalanceNew = getAccBalance(prId)
1305+    let amBalanceOld = (amBalanceNew - amAmount)
1306+    let prBalanceOld = (prBalanceNew - prAmount)
1307+    let D0 = getD([toBigInt(amBalanceOld), toBigInt(prBalanceOld)])
1308+    let D1 = getD([toBigInt(amBalanceNew), toBigInt(prBalanceNew)])
1309+    let lpEmission = toBigInt(valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "invalid lp asset").quantity)
1310+    let lpAmount = ((lpEmission * (D1 - D0)) / D0)
1311+    $Tuple2(nil, toInt(lpAmount))
12201312     }
12211313 
12221314 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let scale8 = 100000000
55 
66 let scale8BigInt = toBigInt(100000000)
77 
88 let scale18 = toBigInt(1000000000000000000)
99 
1010 let zeroBigInt = toBigInt(0)
1111 
12-let oneBigInt = toBigInt(1)
12+let big0 = toBigInt(0)
13+
14+let big1 = toBigInt(1)
1315 
1416 let slippage4D = toBigInt((scale8 - ((scale8 * 1) / scale8)))
1517 
1618 let Amult = "100"
1719 
1820 let Dconv = "1"
1921 
2022 let SEP = "__"
2123 
2224 let EMPTY = ""
2325 
2426 let PoolActive = 1
2527 
2628 let PoolPutDis = 2
2729 
2830 let PoolMatcherDis = 3
2931 
3032 let PoolShutdown = 4
3133 
3234 let idxPoolAddress = 1
3335 
3436 let idxPoolSt = 2
3537 
3638 let idxLPAsId = 3
3739 
3840 let idxAmAsId = 4
3941 
4042 let idxPrAsId = 5
4143 
4244 let idxAmtAsDcm = 6
4345 
4446 let idxPriceAsDcm = 7
4547 
4648 let idxIAmtAsId = 8
4749 
4850 let idxIPriceAsId = 9
4951 
5052 let idxFactStakCntr = 1
5153 
5254 let idxFactSlippCntr = 7
5355 
5456 let idxFactGwxRewCntr = 10
5557 
5658 let feeDefault = fraction(5, scale8, 10000)
5759 
5860 func t1 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
5961 
6062 
6163 func f1 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
6264 
6365 
6466 func ts (amt,resScale,curScale) = fraction(amt, resScale, curScale)
6567 
6668 
6769 func abs (val) = if ((zeroBigInt > val))
70+    then -(val)
71+    else val
72+
73+
74+func absBigInt (val) = if ((zeroBigInt > val))
6875     then -(val)
6976     else val
7077 
7178 
7279 func fc () = "%s__factoryContract"
7380 
7481 
7582 func mpk () = "%s__managerPublicKey"
7683 
7784 
7885 func pmpk () = "%s__pendingManagerPublicKey"
7986 
8087 
8188 func pl () = "%s%s__price__last"
8289 
8390 
8491 func ph (h,t) = makeString(["%s%s%d%d__price__history", toString(h), toString(t)], SEP)
8592 
8693 
8794 func pau (ua,txId) = ((("%s%s%s__P__" + ua) + "__") + txId)
8895 
8996 
9097 func gau (ua,txId) = ((("%s%s%s__G__" + ua) + "__") + txId)
9198 
9299 
93100 func aa () = "%s__amountAsset"
94101 
95102 
96103 func pa () = "%s__priceAsset"
97104 
98105 
99106 func amp () = "%s__amp"
100107 
101108 
102109 func ada () = "%s__addonAddr"
103110 
104111 
105112 let keyFee = "%s__fee"
106113 
107114 let fee = valueOrElse(getInteger(this, keyFee), feeDefault)
108115 
109116 func fcfg () = "%s__factoryConfig"
110117 
111118 
112119 func mtpk () = "%s%s__matcher__publicKey"
113120 
114121 
115122 func pc (iAmtAs,iPrAs) = (((("%d%d%s__" + iAmtAs) + "__") + iPrAs) + "__config")
116123 
117124 
118125 func mba (bAStr) = ("%s%s%s__mappings__baseAsset2internalId__" + bAStr)
119126 
120127 
121128 func aps () = "%s__shutdown"
122129 
123130 
124131 func keyAllowedLpStableScriptHash () = "%s__allowedLpStableScriptHash"
125132 
126133 
127134 func keyFeeCollectorAddress () = "%s__feeCollectorAddress"
128135 
129136 
130137 func toe (orV,sendrV,matchV) = throw(((((("Failed: ordValid=" + toString(orV)) + " sndrValid=") + toString(sendrV)) + " mtchrValid=") + toString(matchV)))
131138 
132139 
133140 func str (val) = match val {
134141     case valStr: String => 
135142         valStr
136143     case _ => 
137144         throw("fail cast to String")
138145 }
139146 
140147 
141148 func strf (addr,key) = valueOrErrorMessage(getString(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
142149 
143150 
144151 func intf (addr,key) = valueOrErrorMessage(getInteger(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
145152 
146153 
147154 let fca = addressFromStringValue(strf(this, fc()))
148155 
149156 let A = strf(this, amp())
150157 
151158 func igs () = valueOrElse(getBoolean(fca, aps()), false)
152159 
153160 
154161 func mp () = fromBase58String(strf(fca, mtpk()))
155162 
156163 
157164 let feeCollectorAddress = addressFromStringValue(strf(fca, keyFeeCollectorAddress()))
158165 
159166 func gpc () = {
160167     let amtAs = strf(this, aa())
161168     let priceAs = strf(this, pa())
162169     let iPriceAs = intf(fca, mba(priceAs))
163170     let iAmtAs = intf(fca, mba(amtAs))
164171     split(strf(fca, pc(toString(iAmtAs), toString(iPriceAs))), SEP)
165172     }
166173 
167174 
168175 func gfc () = split(strf(fca, fcfg()), SEP)
169176 
170177 
171178 let factoryConfig = gfc()
172179 
173180 let stakingContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactStakCntr]), "Invalid staking contract address")
174181 
175182 let slipageContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactSlippCntr]), "Invalid slipage contract address")
176183 
177184 let gwxContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactGwxRewCntr]), "Invalid gwx contract address")
178185 
179186 func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slipByUser,slippageReal,txHeight,txTimestamp,slipageAmAmt,slipagePrAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slipByUser), toString(slippageReal), toString(txHeight), toString(txTimestamp), toString(slipageAmAmt), toString(slipagePrAmt)], SEP)
180187 
181188 
182189 func dataGetActionInfo (outAmtAssetAmt,outPriceAssetAmt,inLpAmt,price,txHeight,txTimestamp) = makeString(["%d%d%d%d%d%d", toString(outAmtAssetAmt), toString(outPriceAssetAmt), toString(inLpAmt), toString(price), toString(txHeight), toString(txTimestamp)], SEP)
183190 
184191 
185192 func getAccBalance (assetId) = if ((assetId == "WAVES"))
186193     then wavesBalance(this).available
187194     else assetBalance(this, fromBase58String(assetId))
188195 
189196 
190197 func cpbi (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
191198 
192199 
193200 func vad (A1,A2,slippage) = {
194201     let diff = fraction((A1 - A2), scale8BigInt, A2)
195202     let pass = ((slippage - abs(diff)) > zeroBigInt)
196203     if (!(pass))
197204         then throw(("Big slpg: " + toString(diff)))
198205         else $Tuple2(pass, min([A1, A2]))
199206     }
200207 
201208 
202209 func vd (D1,D0,slpg) = {
203210     let diff = fraction(D0, scale8BigInt, D1)
204211     let fail = (slpg > diff)
205212     if (if (fail)
206213         then true
207214         else (D0 > D1))
208215         then throw(((((((toString(D0) + " ") + toString(D1)) + " ") + toString(diff)) + " ") + toString(slpg)))
209216         else fail
210217     }
211218 
212219 
213220 func pcp (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
214221     let amtAsAmtX18 = t1(amAmt, amAssetDcm)
215222     let prAsAmtX18 = t1(prAmt, prAssetDcm)
216223     cpbi(prAsAmtX18, amtAsAmtX18)
217224     }
218225 
219226 
220227 func calcPrices (amAmt,prAmt,lpAmt) = {
221228     let cfg = gpc()
222229     let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
223230     let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
224231     let priceX18 = pcp(amtAsDcm, prAsDcm, amAmt, prAmt)
225232     let amAmtX18 = t1(amAmt, amtAsDcm)
226233     let prAmtX18 = t1(prAmt, prAsDcm)
227234     let lpAmtX18 = t1(lpAmt, scale8)
228235     let lpPrInAmAsX18 = cpbi(amAmtX18, lpAmtX18)
229236     let lpPrInPrAsX18 = cpbi(prAmtX18, lpAmtX18)
230237 [priceX18, lpPrInAmAsX18, lpPrInPrAsX18]
231238     }
232239 
233240 
234241 func calculatePrices (amAmt,prAmt,lpAmt) = {
235242     let p = calcPrices(amAmt, prAmt, lpAmt)
236243 [f1(p[0], scale8), f1(p[1], scale8), f1(p[2], scale8)]
237244     }
238245 
239246 
240247 func takeFee (amount) = {
241248     let feeAmount = fraction(amount, fee, scale8)
242249     $Tuple2((amount - feeAmount), feeAmount)
243250     }
244251 
245252 
246253 func ego (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
247254     let cfg = gpc()
248255     let lpId = cfg[idxLPAsId]
249256     let amId = cfg[idxAmAsId]
250257     let prId = cfg[idxPrAsId]
251258     let amDcm = parseIntValue(cfg[idxAmtAsDcm])
252259     let prDcm = parseIntValue(cfg[idxPriceAsDcm])
253260     let sts = cfg[idxPoolSt]
254261     let lpEmiss = valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "Wrong LP id").quantity
255262     if ((lpId != pmtAssetId))
256263         then throw("Wrong pmt asset")
257264         else {
258265             let amBalance = getAccBalance(amId)
259266             let amBalanceX18 = t1(amBalance, amDcm)
260267             let prBalance = getAccBalance(prId)
261268             let prBalanceX18 = t1(prBalance, prDcm)
262269             let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
263270             let curPrice = f1(curPriceX18, scale8)
264271             let pmtLpAmtX18 = t1(pmtLpAmt, scale8)
265272             let lpEmissX18 = t1(lpEmiss, scale8)
266273             let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissX18)
267274             let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissX18)
268275             let outAmAmt = f1(outAmAmtX18, amDcm)
269276             let outPrAmt = f1(outPrAmtX18, prDcm)
270277             let state = if ((txId58 == ""))
271278                 then nil
272279                 else [ScriptTransfer(userAddress, outAmAmt, if ((amId == "WAVES"))
273280                     then unit
274281                     else fromBase58String(amId)), ScriptTransfer(userAddress, outPrAmt, if ((prId == "WAVES"))
275282                     then unit
276283                     else fromBase58String(prId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice)]
277284             $Tuple10(outAmAmt, outPrAmt, amId, prId, amBalance, prBalance, lpEmiss, curPriceX18, sts, state)
278285             }
279286     }
280287 
281288 
282289 func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,validateSlippage,pmtAmt,pmtId) = {
283290     let cfg = gpc()
284291     let lpId = fromBase58String(cfg[idxLPAsId])
285292     let amIdStr = cfg[idxAmAsId]
286293     let prIdStr = cfg[idxPrAsId]
287294     let inAmIdStr = cfg[idxIAmtAsId]
288295     let inPrIdStr = cfg[idxIPriceAsId]
289296     let amtDcm = parseIntValue(cfg[idxAmtAsDcm])
290297     let priceDcm = parseIntValue(cfg[idxPriceAsDcm])
291298     let sts = cfg[idxPoolSt]
292299     let lpEm = valueOrErrorMessage(assetInfo(lpId), "Wr lp as").quantity
293300     let amBalance = if (isEval)
294301         then getAccBalance(amIdStr)
295302         else if (if (isOneAsset)
296303             then (pmtId == amIdStr)
297304             else false)
298305             then (getAccBalance(amIdStr) - pmtAmt)
299306             else if (isOneAsset)
300307                 then getAccBalance(amIdStr)
301308                 else (getAccBalance(amIdStr) - inAmAmt)
302309     let prBalance = if (isEval)
303310         then getAccBalance(prIdStr)
304311         else if (if (isOneAsset)
305312             then (pmtId == prIdStr)
306313             else false)
307314             then (getAccBalance(prIdStr) - pmtAmt)
308315             else if (isOneAsset)
309316                 then getAccBalance(prIdStr)
310317                 else (getAccBalance(prIdStr) - inPrAmt)
311318     let inAmAssetAmtX18 = t1(inAmAmt, amtDcm)
312319     let inPrAssetAmtX18 = t1(inPrAmt, priceDcm)
313320     let userPriceX18 = cpbi(inPrAssetAmtX18, inAmAssetAmtX18)
314321     let amBalanceX18 = t1(amBalance, amtDcm)
315322     let prBalanceX18 = t1(prBalance, priceDcm)
316323     let r = if ((lpEm == 0))
317324         then {
318325             let curPriceX18 = zeroBigInt
319326             let slippageX18 = zeroBigInt
320327             let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
321328             $Tuple5(f1(lpAmtX18, scale8), f1(inAmAssetAmtX18, amtDcm), f1(inPrAssetAmtX18, priceDcm), cpbi((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
322329             }
323330         else {
324331             let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
325332             let slippageRealX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
326333             let slippageX18 = t1(slippage, scale8)
327334             if (if (if (validateSlippage)
328335                 then (curPriceX18 != zeroBigInt)
329336                 else false)
330337                 then (slippageRealX18 > slippageX18)
331338                 else false)
332339                 then throw(((("Price slippage " + toString(slippageRealX18)) + " > ") + toString(slippageX18)))
333340                 else {
334341                     let lpEmissionX18 = t1(lpEm, scale8)
335342                     let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
336343                     let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
337344                     let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
338345                         then $Tuple2(amViaPrX18, inPrAssetAmtX18)
339346                         else $Tuple2(inAmAssetAmtX18, prViaAmX18)
340347                     let expAmtAssetAmtX18 = expectedAmts._1
341348                     let expPriceAssetAmtX18 = expectedAmts._2
342349                     let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
343350                     $Tuple5(f1(lpAmtX18, scale8), f1(expAmtAssetAmtX18, amtDcm), f1(expPriceAssetAmtX18, priceDcm), curPriceX18, slippageX18)
344351                     }
345352             }
346353     let calcLpAmt = r._1
347354     let calcAmAssetPmt = r._2
348355     let calcPrAssetPmt = r._3
349356     let curPrice = f1(r._4, scale8)
350357     let slippageCalc = f1(r._5, scale8)
351358     if ((0 >= calcLpAmt))
352359         then throw("LP <= 0")
353360         else {
354361             let emitLpAmt = if (!(emitLp))
355362                 then 0
356363                 else calcLpAmt
357364             let amDiff = (inAmAmt - calcAmAssetPmt)
358365             let prDiff = (inPrAmt - calcPrAssetPmt)
359-            let $t01623716582 = if (if (isOneAsset)
366+            let $t01632716672 = if (if (isOneAsset)
360367                 then (pmtId == amIdStr)
361368                 else false)
362369                 then $Tuple2(pmtAmt, 0)
363370                 else if (if (isOneAsset)
364371                     then (pmtId == prIdStr)
365372                     else false)
366373                     then $Tuple2(0, pmtAmt)
367374                     else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
368-            let writeAmAmt = $t01623716582._1
369-            let writePrAmt = $t01623716582._2
375+            let writeAmAmt = $t01632716672._1
376+            let writePrAmt = $t01632716672._2
370377             let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(writeAmAmt, writePrAmt, emitLpAmt, curPrice, slippage, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
371378             $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
372379             }
373380     }
374381 
375382 
376383 func moa (order) = {
377384     let cfg = gpc()
378385     let amtAsId = cfg[idxAmAsId]
379386     let prAsId = cfg[idxPrAsId]
380387     let sts = parseIntValue(cfg[idxPoolSt])
381388     let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
382389     let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
383390     let accAmtAsBalance = getAccBalance(amtAsId)
384391     let accPrAsBalance = getAccBalance(prAsId)
385392     let curPriceX18 = if ((order.orderType == Buy))
386393         then pcp(amtAsDcm, prAsDcm, (accAmtAsBalance + order.amount), accPrAsBalance)
387394         else pcp(amtAsDcm, prAsDcm, (accAmtAsBalance - order.amount), accPrAsBalance)
388395     let curPrice = f1(curPriceX18, scale8)
389396     if (if (if (igs())
390397         then true
391398         else (sts == PoolMatcherDis))
392399         then true
393400         else (sts == PoolShutdown))
394401         then throw("Admin blocked")
395402         else {
396403             let orAmtAsset = order.assetPair.amountAsset
397404             let orAmtAsStr = if ((orAmtAsset == unit))
398405                 then "WAVES"
399406                 else toBase58String(value(orAmtAsset))
400407             let orPrAsset = order.assetPair.priceAsset
401408             let orPrAsStr = if ((orPrAsset == unit))
402409                 then "WAVES"
403410                 else toBase58String(value(orPrAsset))
404411             if (if ((orAmtAsStr != amtAsId))
405412                 then true
406413                 else (orPrAsStr != prAsId))
407414                 then throw("Wr assets")
408415                 else {
409416                     let orderPrice = order.price
410417                     let priceDcm = fraction(scale8, prAsDcm, amtAsDcm)
411418                     let castOrderPrice = ts(orderPrice, scale8, priceDcm)
412419                     let isOrderPriceValid = if ((order.orderType == Buy))
413420                         then (curPrice >= castOrderPrice)
414421                         else (castOrderPrice >= curPrice)
415422                     true
416423                     }
417424             }
418425     }
419426 
420427 
421428 func cg (i) = if ((size(i.payments) != 1))
422429     then throw("1 pmnt exp")
423430     else {
424431         let pmt = value(i.payments[0])
425432         let pmtAssetId = value(pmt.assetId)
426433         let pmtAmt = pmt.amount
427434         let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
428435         let outAmAmt = r._1
429436         let outPrAmt = r._2
430437         let sts = parseIntValue(r._9)
431438         let state = r._10
432439         if (if (igs())
433440             then true
434441             else (sts == PoolShutdown))
435442             then throw(("Admin blocked: " + toString(sts)))
436443             else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
437444         }
438445 
439446 
440447 func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,validateSlippage,pmtAmt,pmtId) = {
441448     let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, (txId == ""), emitLp, isOneAsset, validateSlippage, pmtAmt, pmtId)
442449     let sts = parseIntValue(r._8)
443450     if (if (if (igs())
444451         then true
445452         else (sts == PoolPutDis))
446453         then true
447454         else (sts == PoolShutdown))
448455         then throw(("Blocked:" + toString(sts)))
449456         else r
450457     }
451458 
452459 
453460 func estimatePutOneTknV2 (pmtAmtRaw,pmtAssetId,userAddress,txId) = {
454461     let poolConfig = gpc()
455462     let amId = poolConfig[idxAmAsId]
456463     let prId = poolConfig[idxPrAsId]
457464     let amBalance = getAccBalance(amId)
458465     let prBalance = getAccBalance(prId)
459-    let $t02091320958 = takeFee(pmtAmtRaw)
460-    let pmtAmt = $t02091320958._1
461-    let feeAmount = $t02091320958._2
462-    let $t02096221423 = if ((txId == ""))
466+    let $t02100321048 = takeFee(pmtAmtRaw)
467+    let pmtAmt = $t02100321048._1
468+    let feeAmount = $t02100321048._2
469+    let $t02105221513 = if ((txId == ""))
463470         then $Tuple2(amBalance, prBalance)
464471         else if ((pmtAssetId == amId))
465472             then if ((pmtAmtRaw > amBalance))
466473                 then throw("invalid payment amount")
467474                 else $Tuple2((amBalance - pmtAmtRaw), prBalance)
468475             else if ((pmtAssetId == prId))
469476                 then if ((pmtAmtRaw > prBalance))
470477                     then throw("invalid payment amount")
471478                     else $Tuple2(amBalance, (prBalance - pmtAmtRaw))
472479                 else throw("wrong pmtAssetId")
473-    let amBalanceNow = $t02096221423._1
474-    let prBalanceNow = $t02096221423._2
475-    let $t02142721561 = if ((pmtAssetId == amId))
480+    let amBalanceNow = $t02105221513._1
481+    let prBalanceNow = $t02105221513._2
482+    let $t02151721651 = if ((pmtAssetId == amId))
476483         then $Tuple2(amBalanceNow, prBalanceNow)
477484         else $Tuple2(prBalanceNow, amBalanceNow)
478-    let amBalanceForCalc = $t02142721561._1
479-    let prBalanceForCalc = $t02142721561._2
485+    let amBalanceForCalc = $t02151721651._1
486+    let prBalanceForCalc = $t02151721651._2
480487     let xPrecision = 1
481488     let result = {
482489         let @ = invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)
483490         if ($isInstanceOf(@, "(Int, Int)"))
484491             then @
485492             else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
486493         }
487-    let $t02203022126 = if ((pmtAssetId == amId))
494+    let $t02212022216 = if ((pmtAssetId == amId))
488495         then result
489496         else $Tuple2(result._2, result._1)
490-    let amAssetPart = $t02203022126._1
491-    let prAssetPart = $t02203022126._2
497+    let amAssetPart = $t02212022216._1
498+    let prAssetPart = $t02212022216._2
492499     let estPut = cp(userAddress, txId, AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), 0, true, true, false, pmtAmtRaw, pmtAssetId)
493500     let estimLP = estPut._2
494501     let lpAssetId = estPut._7
495502     let state = estPut._9
496503     let amDiff = estPut._10
497504     let prDiff = estPut._11
498505     estPut
499506     }
500507 
501508 
502509 func getOneTknV2Internal (outAssetId,minOutAmount,payments,caller,originCaller,transactionId) = if ((size(payments) != 1))
503510     then throw("1 pmnt expd")
504511     else {
505512         let poolConfig = gpc()
506513         let lpId = poolConfig[idxLPAsId]
507514         let amId = poolConfig[idxAmAsId]
508515         let prId = poolConfig[idxPrAsId]
509516         let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
510517         let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
511518         let poolStatus = poolConfig[idxPoolSt]
512519         let userAddress = if ((caller == this))
513520             then originCaller
514521             else caller
515522         let pmt = value(payments[0])
516523         let pmtAssetId = value(pmt.assetId)
517524         let pmtAmt = pmt.amount
518525         if ((1000000000 > pmtAmt))
519526             then throw("Min pmt 10 LP")
520527             else {
521528                 let txId58 = toBase58String(transactionId)
522529                 if ((lpId != toBase58String(pmtAssetId)))
523530                     then throw("Wrong LP")
524531                     else {
525532                         let amBalance = getAccBalance(amId)
526533                         let prBalance = getAccBalance(prId)
527-                        let $t02348123589 = {
534+                        let $t02357123679 = {
528535                             let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)
529536                             if ($isInstanceOf(@, "(Int, Int)"))
530537                                 then @
531538                                 else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
532539                             }
533-                        let totalGet = $t02348123589._1
534-                        let feeAmount = $t02348123589._2
540+                        let totalGet = $t02357123679._1
541+                        let feeAmount = $t02357123679._2
535542                         let totalAmount = if (if ((minOutAmount > 0))
536543                             then (minOutAmount > totalGet)
537544                             else false)
538545                             then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
539546                             else totalGet
540-                        let $t02377623863 = if ((outAssetId == amId))
547+                        let $t02386623953 = if ((outAssetId == amId))
541548                             then $Tuple2(totalAmount, 0)
542549                             else $Tuple2(0, totalAmount)
543-                        let outAm = $t02377623863._1
544-                        let outPr = $t02377623863._2
550+                        let outAm = $t02386623953._1
551+                        let outPr = $t02386623953._2
545552                         let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
546553                         let curPr = f1(curPrX18, scale8)
547554                         let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
548555                             then unit
549556                             else fromBase58String(outAssetId)
550557                         let sendFeeToMatcher = if ((feeAmount > 0))
551558                             then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetIdOrWaves)]
552559                             else nil
553560                         let state = ([ScriptTransfer(userAddress, totalAmount, outAssetIdOrWaves), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)] ++ sendFeeToMatcher)
554561                         if ((state == state))
555562                             then {
556563                                 let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
557564                                 if ((burn == burn))
558565                                     then $Tuple2(state, totalAmount)
559566                                     else throw("Strict value is not equal to itself.")
560567                                 }
561568                             else throw("Strict value is not equal to itself.")
562569                         }
563570                 }
564571         }
572+
573+
574+func getD (xp) = {
575+    let n = toBigInt(2)
576+    let xp0 = xp[0]
577+    let xp1 = xp[1]
578+    let aPrecision = parseBigIntValue(Amult)
579+    let a = (parseBigIntValue(A) * aPrecision)
580+    let s = (xp0 + xp1)
581+    if ((s == big0))
582+        then big0
583+        else {
584+            let ann = (a * n)
585+            func calc (acc,cur) =             {
586+                let $t02511925139 = acc
587+                let d = $t02511925139._1
588+                let found = $t02511925139._2
589+                if ((found != unit))
590+                    then acc
591+                    else {
592+                        let dp = (((d * d) * d) / (((xp0 * xp1) * n) * n))
593+                        let dNext = (((((ann * s) / aPrecision) + (dp * n)) * d) / ((((ann - aPrecision) * d) / aPrecision) + ((n + toBigInt(1)) * dp)))
594+                        let dDiff = absBigInt((dNext - value(d)))
595+                        if ((big1 >= dDiff))
596+                            then $Tuple2(dNext, cur)
597+                            else $Tuple2(dNext, unit)
598+                        }
599+                }
600+
601+            let arr = [0, 1, 2, 3, 4, 5, 6, 7]
602+            let $t02556625612 = {
603+                let $l = arr
604+                let $s = size($l)
605+                let $acc0 = $Tuple2(s, unit)
606+                func $f0_1 ($a,$i) =                 if (($i >= $s))
607+                    then $a
608+                    else calc($a, $l[$i])
609+
610+                func $f0_2 ($a,$i) =                 if (($i >= $s))
611+                    then $a
612+                    else throw("List size exceeds 7")
613+
614+                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
615+                }
616+            let d = $t02556625612._1
617+            let found = $t02556625612._2
618+            if ((found != unit))
619+                then d
620+                else throw(("D calculation error, D = " + toString(d)))
621+            }
622+    }
565623 
566624 
567625 func m () = match getString(mpk()) {
568626     case s: String => 
569627         fromBase58String(s)
570628     case _: Unit => 
571629         unit
572630     case _ => 
573631         throw("Match error")
574632 }
575633 
576634 
577635 func pm () = match getString(pmpk()) {
578636     case s: String => 
579637         fromBase58String(s)
580638     case _: Unit => 
581639         unit
582640     case _ => 
583641         throw("Match error")
584642 }
585643 
586644 
587645 let pd = throw("Permission denied")
588646 
589647 func mm (i) = match m() {
590648     case pk: ByteVector => 
591649         if ((i.callerPublicKey == pk))
592650             then true
593651             else pd
594652     case _: Unit => 
595653         if ((i.caller == this))
596654             then true
597655             else pd
598656     case _ => 
599657         throw("Match error")
600658 }
601659 
602660 
603661 @Callable(i)
604662 func constructor (fc) = {
605663     let c = mm(i)
606664     if ((c == c))
607665         then [StringEntry(fc(), fc)]
608666         else throw("Strict value is not equal to itself.")
609667     }
610668 
611669 
612670 
613671 @Callable(i)
614672 func setManager (pendingManagerPublicKey) = {
615673     let c = mm(i)
616674     if ((c == c))
617675         then {
618676             let cm = fromBase58String(pendingManagerPublicKey)
619677             if ((cm == cm))
620678                 then [StringEntry(pmpk(), pendingManagerPublicKey)]
621679                 else throw("Strict value is not equal to itself.")
622680             }
623681         else throw("Strict value is not equal to itself.")
624682     }
625683 
626684 
627685 
628686 @Callable(i)
629687 func confirmManager () = {
630688     let p = pm()
631689     let hpm = if (isDefined(p))
632690         then true
633691         else throw("No pending manager")
634692     if ((hpm == hpm))
635693         then {
636694             let cpm = if ((i.callerPublicKey == value(p)))
637695                 then true
638696                 else throw("You are not pending manager")
639697             if ((cpm == cpm))
640698                 then [StringEntry(mpk(), toBase58String(value(p))), DeleteEntry(pmpk())]
641699                 else throw("Strict value is not equal to itself.")
642700             }
643701         else throw("Strict value is not equal to itself.")
644702     }
645703 
646704 
647705 
648706 @Callable(i)
649707 func put (slip,autoStake) = {
650708     let factCfg = gfc()
651709     let stakingCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactStakCntr]), "Wr st addr")
652710     let slipCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactSlippCntr]), "Wr sl addr")
653711     if ((0 > slip))
654712         then throw("Wrong slippage")
655713         else if ((size(i.payments) != 2))
656714             then throw("2 pmnts expd")
657715             else {
658716                 let e = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(value(i.payments[0]).assetId, value(i.payments[0]).amount), i.payments[1], slip, true, false, true, 0, "")
659717                 let emitLpAmt = e._2
660718                 let lpAssetId = e._7
661719                 let state = e._9
662720                 let amDiff = e._10
663721                 let prDiff = e._11
664722                 let amId = e._12
665723                 let prId = e._13
666724                 let r = invoke(fca, "emit", [emitLpAmt], nil)
667725                 if ((r == r))
668726                     then {
669727                         let el =                         match r {
670728                             case legacy: Address => 
671729                                 invoke(legacy, "emit", [emitLpAmt], nil)
672730                             case _ => 
673731                                 unit
674732                         }
675733                         if ((el == el))
676734                             then {
677735                                 let sa = if ((amDiff > 0))
678736                                     then invoke(slipCntr, "put", nil, [AttachedPayment(amId, amDiff)])
679737                                     else nil
680738                                 if ((sa == sa))
681739                                     then {
682740                                         let sp = if ((prDiff > 0))
683741                                             then invoke(slipCntr, "put", nil, [AttachedPayment(prId, prDiff)])
684742                                             else nil
685743                                         if ((sp == sp))
686744                                             then {
687745                                                 let lpTrnsfr = if (autoStake)
688746                                                     then {
689747                                                         let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
690748                                                         if ((ss == ss))
691749                                                             then nil
692750                                                             else throw("Strict value is not equal to itself.")
693751                                                         }
694752                                                     else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
695753                                                 (state ++ lpTrnsfr)
696754                                                 }
697755                                             else throw("Strict value is not equal to itself.")
698756                                         }
699757                                     else throw("Strict value is not equal to itself.")
700758                                 }
701759                             else throw("Strict value is not equal to itself.")
702760                         }
703761                     else throw("Strict value is not equal to itself.")
704762                 }
705763     }
706764 
707765 
708766 
709767 @Callable(i)
710768 func putOneTkn (amAssetPart,prAssetPart,outLp,slippage,autoStake) = {
711769     let cfg = gfc()
712770     let stakingCntr = valueOrErrorMessage(addressFromString(cfg[idxFactStakCntr]), "Wr st addr")
713771     let slipCntr = valueOrErrorMessage(addressFromString(cfg[idxFactSlippCntr]), "Wr sl addr")
714772     let gwxCntr = valueOrErrorMessage(addressFromString(cfg[idxFactGwxRewCntr]), "Wr gwx addr")
715773     let poolCfg = gpc()
716774     let amId = poolCfg[idxAmAsId]
717775     let prId = poolCfg[idxPrAsId]
718776     let amDcm = parseIntValue(poolCfg[idxAmtAsDcm])
719777     let prDcm = parseIntValue(poolCfg[idxPriceAsDcm])
720778     let addon = valueOrElse(getString(this, ada()), "")
721779     let userAddress = if ((addon == toString(i.caller)))
722780         then i.originCaller
723781         else i.caller
724782     if (if (if (if ((0 >= slippage))
725783         then true
726784         else (0 >= amAssetPart))
727785         then true
728786         else (0 >= prAssetPart))
729787         then true
730788         else (0 >= outLp))
731789         then throw("Wrong params")
732790         else if ((size(i.payments) != 1))
733791             then throw("1 pmnt expd")
734792             else {
735793                 let pmt = value(i.payments[0])
736794                 let pmtAssetId = toBase58String(value(pmt.assetId))
737795                 let paymentAmountRaw = pmt.amount
738-                let $t02924929301 = takeFee(paymentAmountRaw)
739-                let pmtAmt = $t02924929301._1
740-                let feeAmount = $t02924929301._2
796+                let $t03032230374 = takeFee(paymentAmountRaw)
797+                let pmtAmt = $t03032230374._1
798+                let feeAmount = $t03032230374._2
741799                 if ((10000000 > paymentAmountRaw))
742800                     then throw("Wrong pmt amt")
743801                     else {
744802                         let amBalance = getAccBalance(amId)
745803                         let prBalance = getAccBalance(prId)
746-                        let $t02946130077 = if ((pmtAssetId == amId))
804+                        let $t03053431150 = if ((pmtAssetId == amId))
747805                             then if (if ((paymentAmountRaw > amBalance))
748806                                 then true
749807                                 else (amAssetPart > pmtAmt))
750808                                 then throw("invalid payment amount")
751809                                 else $Tuple6((amBalance - paymentAmountRaw), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
752810                             else if ((pmtAssetId == prId))
753811                                 then if (if ((paymentAmountRaw > prBalance))
754812                                     then true
755813                                     else (prAssetPart > pmtAmt))
756814                                     then throw("invalid payment amount")
757815                                     else $Tuple6(amBalance, (prBalance - paymentAmountRaw), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
758816                                 else throw("wrong pmtAssetId")
759-                        let amBalanceNow = $t02946130077._1
760-                        let prBalanceNow = $t02946130077._2
761-                        let virtSwapInAm = $t02946130077._3
762-                        let virtSwapOutPr = $t02946130077._4
763-                        let virtSwapInPr = $t02946130077._5
764-                        let virtSwapOutAm = $t02946130077._6
817+                        let amBalanceNow = $t03053431150._1
818+                        let prBalanceNow = $t03053431150._2
819+                        let virtSwapInAm = $t03053431150._3
820+                        let virtSwapOutPr = $t03053431150._4
821+                        let virtSwapInPr = $t03053431150._5
822+                        let virtSwapOutAm = $t03053431150._6
765823                         let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
766824                         let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
767825                         let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
768826                         if ((D0vsD1 == D0vsD1))
769827                             then {
770828                                 let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, true, pmtAmt, pmtAssetId)
771829                                 let estimLP = estPut._2
772830                                 let lpAssetId = estPut._7
773831                                 let state = estPut._9
774832                                 let amDiff = estPut._10
775833                                 let prDiff = estPut._11
776834                                 let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
777835                                 let emitLpAmt = toInt(lpCalcRes._2)
778836                                 let e = invoke(fca, "emit", [emitLpAmt], nil)
779837                                 if ((e == e))
780838                                     then {
781839                                         let el =                                         match e {
782840                                             case legacy: Address => 
783841                                                 invoke(legacy, "emit", [emitLpAmt], nil)
784842                                             case _ => 
785843                                                 unit
786844                                         }
787845                                         if ((el == el))
788846                                             then {
789847                                                 let sa = if ((amDiff > 0))
790848                                                     then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
791849                                                     else nil
792850                                                 if ((sa == sa))
793851                                                     then {
794852                                                         let sp = if ((prDiff > 0))
795853                                                             then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
796854                                                             else nil
797855                                                         if ((sp == sp))
798856                                                             then {
799857                                                                 let lpTrnsfr = if (autoStake)
800858                                                                     then {
801859                                                                         let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
802860                                                                         if ((ss == ss))
803861                                                                             then nil
804862                                                                             else throw("Strict value is not equal to itself.")
805863                                                                         }
806864                                                                     else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
807865                                                                 let sendFeeToMatcher = if ((feeAmount > 0))
808866                                                                     then [ScriptTransfer(feeCollectorAddress, feeAmount, fromBase58String(pmtAssetId))]
809867                                                                     else nil
810868                                                                 ((state ++ lpTrnsfr) ++ sendFeeToMatcher)
811869                                                                 }
812870                                                             else throw("Strict value is not equal to itself.")
813871                                                         }
814872                                                     else throw("Strict value is not equal to itself.")
815873                                                 }
816874                                             else throw("Strict value is not equal to itself.")
817875                                         }
818876                                     else throw("Strict value is not equal to itself.")
819877                                 }
820878                             else throw("Strict value is not equal to itself.")
821879                         }
822880                 }
823881     }
824882 
825883 
826884 
827885 @Callable(i)
828886 func putOneTknV2 (minOutAmount,autoStake) = if ((size(i.payments) != 1))
829887     then throw("1 pmnt expd")
830888     else {
831889         let poolConfig = gpc()
832890         let amId = poolConfig[idxAmAsId]
833891         let prId = poolConfig[idxPrAsId]
834892         let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
835893         let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
836894         let userAddress = if ((i.caller == this))
837895             then i.originCaller
838896             else i.caller
839897         let pmt = value(i.payments[0])
840898         let pmtAssetId = toBase58String(value(pmt.assetId))
841899         let pmtAmt = pmt.amount
842900         if ((10000000 > pmtAmt))
843901             then throw("Wrong pmt amt")
844902             else {
845903                 let r = estimatePutOneTknV2(pmtAmt, pmtAssetId, toString(userAddress), toBase58String(i.transactionId))
846904                 let estimLP = r._2
847905                 let lpAssetId = r._7
848906                 let state = r._9
849907                 let amDiff = r._10
850908                 let prDiff = r._11
851909                 let emitLpAmt = if (if ((minOutAmount > 0))
852910                     then (minOutAmount > estimLP)
853911                     else false)
854912                     then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
855913                     else estimLP
856914                 let e = invoke(fca, "emit", [emitLpAmt], nil)
857915                 if ((e == e))
858916                     then {
859917                         let el =                         match e {
860918                             case legacy: Address => 
861919                                 invoke(legacy, "emit", [emitLpAmt], nil)
862920                             case _ => 
863921                                 unit
864922                         }
865923                         if ((el == el))
866924                             then {
867925                                 let sa = if ((amDiff > 0))
868926                                     then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
869927                                     else nil
870928                                 if ((sa == sa))
871929                                     then {
872930                                         let sp = if ((prDiff > 0))
873931                                             then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
874932                                             else nil
875933                                         if ((sp == sp))
876934                                             then {
877935                                                 let lpTrnsfr = if (autoStake)
878936                                                     then {
879937                                                         let ss = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
880938                                                         if ((ss == ss))
881939                                                             then nil
882940                                                             else throw("Strict value is not equal to itself.")
883941                                                         }
884942                                                     else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
885943                                                 let feeAmount = takeFee(pmtAmt)._2
886944                                                 let sendFeeToMatcher = if ((feeAmount > 0))
887945                                                     then [ScriptTransfer(feeCollectorAddress, feeAmount, fromBase58String(pmtAssetId))]
888946                                                     else nil
889947                                                 $Tuple2(((state ++ lpTrnsfr) ++ sendFeeToMatcher), emitLpAmt)
890948                                                 }
891949                                             else throw("Strict value is not equal to itself.")
892950                                         }
893951                                     else throw("Strict value is not equal to itself.")
894952                                 }
895953                             else throw("Strict value is not equal to itself.")
896954                         }
897955                     else throw("Strict value is not equal to itself.")
898956                 }
899957         }
900958 
901959 
902960 
903961 @Callable(i)
904962 func putOneTknV2READONLY (paymentAmount,paymentAssetId) = {
905963     let r = estimatePutOneTknV2(paymentAmount, paymentAssetId, "", "")
906964     let estimLP = r._2
907965     let lpAssetId = r._7
908966     let state = r._9
909967     let amDiff = r._10
910968     let prDiff = r._11
911969     $Tuple2(nil, estimLP)
912970     }
913971 
914972 
915973 
916974 @Callable(i)
917975 func putOneTknV2WithBonusREADONLY (paymentAmount,paymentAssetId) = {
918976     let poolConfig = gpc()
919977     let amId = poolConfig[idxAmAsId]
920978     let prId = poolConfig[idxPrAsId]
921979     let r = estimatePutOneTknV2(paymentAmount, paymentAssetId, "", "")
922980     let estimLP = r._2
923981     let curPrice = r._3
924982     let lpAssetEmission = r._6
925983     let lpAssetId = r._7
926984     let amBalance = getAccBalance(amId)
927985     let prBalance = getAccBalance(prId)
928986     let poolProportion = fraction(prBalance, scale8, amBalance)
929987     let amountAssetPart = fraction(paymentAmount, scale8, (poolProportion + scale8))
930988     let priceAssetPart = (paymentAmount - amountAssetPart)
931989     let lpAmtBoth = fraction(lpAssetEmission, priceAssetPart, prBalance)
932990     let bonus = fraction((estimLP - lpAmtBoth), scale8, lpAmtBoth)
933991     let feeAmount = takeFee(paymentAmount)._2
934992     $Tuple2(nil, $Tuple3(estimLP, feeAmount, bonus))
935993     }
936994 
937995 
938996 
939997 @Callable(i)
940998 func putForFree (maxSlpg) = if ((0 > maxSlpg))
941999     then throw("Wrong slpg")
9421000     else if ((size(i.payments) != 2))
9431001         then throw("2 pmnts expd")
9441002         else {
9451003             let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(value(i.payments[0]).assetId, value(i.payments[0]).amount), i.payments[1], maxSlpg, false, false, true, 0, "")
9461004             estPut._9
9471005             }
9481006 
9491007 
9501008 
9511009 @Callable(i)
9521010 func get () = {
9531011     let r = cg(i)
9541012     let outAmtAmt = r._1
9551013     let outPrAmt = r._2
9561014     let pmtAmt = r._3
9571015     let pmtAssetId = r._4
9581016     let state = r._5
9591017     let b = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
9601018     if ((b == b))
9611019         then state
9621020         else throw("Strict value is not equal to itself.")
9631021     }
9641022 
9651023 
9661024 
9671025 @Callable(i)
9681026 func getOneTkn (exchResult,notUsed,outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
9691027     then throw("1 pmnt expd")
9701028     else {
9711029         let cfg = gpc()
9721030         let lpId = cfg[idxLPAsId]
9731031         let amId = cfg[idxAmAsId]
9741032         let prId = cfg[idxPrAsId]
9751033         let amDcm = parseIntValue(cfg[idxAmtAsDcm])
9761034         let prDcm = parseIntValue(cfg[idxPriceAsDcm])
9771035         let sts = cfg[idxPoolSt]
9781036         let factCfg = gfc()
9791037         let gwxCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactGwxRewCntr]), "Wr sl addr")
9801038         let pmt = value(i.payments[0])
9811039         let addon = valueOrElse(getString(this, ada()), "")
9821040         let userAddress = if ((addon == toString(i.caller)))
9831041             then i.originCaller
9841042             else i.caller
9851043         let txId58 = toBase58String(i.transactionId)
9861044         let pmtAssetId = value(pmt.assetId)
9871045         let pmtAmt = pmt.amount
9881046         if ((1000000000 > pmtAmt))
9891047             then throw("Min pmt 10 LP")
9901048             else if (if (if ((0 > slippage))
9911049                 then true
9921050                 else (0 > exchResult))
9931051                 then true
9941052                 else (0 > outAmount))
9951053                 then throw("Wrong params")
9961054                 else if ((lpId != toBase58String(pmtAssetId)))
9971055                     then throw("Wrong LP")
9981056                     else {
9991057                         let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
10001058                         let estimAmAmt = r._1
10011059                         let estimPrAmt = r._2
10021060                         let amBalance = getAccBalance(amId)
10031061                         let prBalance = getAccBalance(prId)
1004-                        let $t03833238792 = if ((outAssetId == amId))
1062+                        let $t03940539865 = if ((outAssetId == amId))
10051063                             then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
10061064                             else if ((outAssetId == prId))
10071065                                 then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
10081066                                 else throw("wrong outAssetId")
1009-                        let amBalanceNow = $t03833238792._1
1010-                        let prBalanceNow = $t03833238792._2
1011-                        let virtSwapInAm = $t03833238792._3
1012-                        let virtSwapOutPr = $t03833238792._4
1013-                        let virtSwapInPr = $t03833238792._5
1014-                        let virtSwapOutAm = $t03833238792._6
1015-                        let totalGetRaw = $t03833238792._7
1067+                        let amBalanceNow = $t03940539865._1
1068+                        let prBalanceNow = $t03940539865._2
1069+                        let virtSwapInAm = $t03940539865._3
1070+                        let virtSwapOutPr = $t03940539865._4
1071+                        let virtSwapInPr = $t03940539865._5
1072+                        let virtSwapOutAm = $t03940539865._6
1073+                        let totalGetRaw = $t03940539865._7
10161074                         if (if ((0 > virtSwapInAm))
10171075                             then true
10181076                             else (0 > virtSwapInPr))
10191077                             then throw("Wrong calc")
10201078                             else {
10211079                                 let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
10221080                                 let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
10231081                                 let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
10241082                                 if ((D0vsD1 == D0vsD1))
10251083                                     then {
10261084                                         let totalGet = takeFee(totalGetRaw)._1
10271085                                         let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
10281086                                         if ((finalRes == finalRes))
10291087                                             then {
1030-                                                let $t03953939643 = if ((outAssetId == amId))
1088+                                                let $t04061240716 = if ((outAssetId == amId))
10311089                                                     then $Tuple2(toInt(finalRes._2), 0)
10321090                                                     else $Tuple2(0, toInt(finalRes._2))
1033-                                                let outAm = $t03953939643._1
1034-                                                let outPr = $t03953939643._2
1091+                                                let outAm = $t04061240716._1
1092+                                                let outPr = $t04061240716._2
10351093                                                 let totalAmount = (outAm + outPr)
10361094                                                 let feeAmount = (totalGetRaw - totalGet)
10371095                                                 let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
10381096                                                     then unit
10391097                                                     else fromBase58String(outAssetId)
10401098                                                 let sendFeeToMatcher = if ((feeAmount > 0))
10411099                                                     then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetIdOrWaves)]
10421100                                                     else nil
10431101                                                 let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
10441102                                                 let curPr = f1(curPrX18, scale8)
10451103                                                 let state = [ScriptTransfer(userAddress, totalAmount, outAssetIdOrWaves), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
10461104                                                 if ((state == state))
10471105                                                     then {
10481106                                                         let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
10491107                                                         if ((burn == burn))
10501108                                                             then (state ++ sendFeeToMatcher)
10511109                                                             else throw("Strict value is not equal to itself.")
10521110                                                         }
10531111                                                     else throw("Strict value is not equal to itself.")
10541112                                                 }
10551113                                             else throw("Strict value is not equal to itself.")
10561114                                         }
10571115                                     else throw("Strict value is not equal to itself.")
10581116                                 }
10591117                         }
10601118         }
10611119 
10621120 
10631121 
10641122 @Callable(i)
10651123 func getOneTknV2 (outAssetId,minOutAmount) = {
1066-    let $t04066840823 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
1067-    let state = $t04066840823._1
1068-    let totalAmount = $t04066840823._2
1124+    let $t04174141896 = getOneTknV2Internal(outAssetId, minOutAmount, i.payments, i.caller, i.originCaller, i.transactionId)
1125+    let state = $t04174141896._1
1126+    let totalAmount = $t04174141896._2
10691127     $Tuple2(state, totalAmount)
10701128     }
10711129 
10721130 
10731131 
10741132 @Callable(i)
10751133 func getOneTknV2READONLY (outAssetId,lpAssetAmount) = {
10761134     let poolConfig = gpc()
10771135     let lpId = poolConfig[idxLPAsId]
10781136     let amId = poolConfig[idxAmAsId]
10791137     let prId = poolConfig[idxPrAsId]
10801138     let r = ego("", lpId, lpAssetAmount, this)
10811139     let estimAmAmt = r._1
10821140     let estimPrAmt = r._2
10831141     let amBalance = getAccBalance(amId)
10841142     let prBalance = getAccBalance(prId)
10851143     let amBalanceNow = (amBalance - estimAmAmt)
10861144     let prBalanceNow = (prBalance - estimPrAmt)
1087-    let $t04133341641 = if ((outAssetId == amId))
1145+    let $t04240642714 = if ((outAssetId == amId))
10881146         then $Tuple4(prBalanceNow, amBalanceNow, estimPrAmt, estimAmAmt)
10891147         else if ((outAssetId == prId))
10901148             then $Tuple4(amBalanceNow, prBalanceNow, estimAmAmt, estimPrAmt)
10911149             else throw("wrong outAssetId")
1092-    let amountBalanceForSwap = $t04133341641._1
1093-    let priceBalanceForSwap = $t04133341641._2
1094-    let amountToSwap = $t04133341641._3
1095-    let amountToAdd = $t04133341641._4
1150+    let amountBalanceForSwap = $t04240642714._1
1151+    let priceBalanceForSwap = $t04240642714._2
1152+    let amountToSwap = $t04240642714._3
1153+    let amountToAdd = $t04240642714._4
10961154     let yPrecision = 1
10971155     let exchResult = {
10981156         let @ = invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)
10991157         if ($isInstanceOf(@, "Int"))
11001158             then @
11011159             else throw(($getType(@) + " couldn't be cast to Int"))
11021160         }
11031161     let totalGetRaw = (exchResult + amountToAdd)
1104-    let $t04216942218 = takeFee(totalGetRaw)
1105-    let totalGet = $t04216942218._1
1106-    let feeAmount = $t04216942218._2
1162+    let $t04324243291 = takeFee(totalGetRaw)
1163+    let totalGet = $t04324243291._1
1164+    let feeAmount = $t04324243291._2
11071165     $Tuple2(nil, $Tuple2(totalGet, feeAmount))
11081166     }
11091167 
11101168 
11111169 
11121170 @Callable(i)
11131171 func getOneTknV2WithBonusREADONLY (outAssetId,lpAssetAmount) = {
11141172     let poolConfig = gpc()
11151173     let amId = poolConfig[idxAmAsId]
11161174     let prId = poolConfig[idxPrAsId]
11171175     let lpId = poolConfig[idxLPAsId]
11181176     let amBalance = getAccBalance(amId)
11191177     let prBalance = getAccBalance(prId)
1120-    let $t04256242677 = {
1178+    let $t04363543750 = {
11211179         let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, lpAssetAmount], nil)
11221180         if ($isInstanceOf(@, "(Int, Int)"))
11231181             then @
11241182             else throw(($getType(@) + " couldn't be cast to (Int, Int)"))
11251183         }
1126-    let totalGet = $t04256242677._1
1127-    let feeAmount = $t04256242677._2
1184+    let totalGet = $t04363543750._1
1185+    let feeAmount = $t04363543750._2
11281186     let r = ego("", lpId, lpAssetAmount, this)
11291187     let outAmAmt = r._1
11301188     let outPrAmt = r._2
11311189     let sumOfGetAssets = (outAmAmt + outPrAmt)
11321190     let bonus = fraction((totalGet - sumOfGetAssets), scale8, sumOfGetAssets)
11331191     $Tuple2(nil, $Tuple3(totalGet, feeAmount, bonus))
11341192     }
11351193 
11361194 
11371195 
11381196 @Callable(i)
11391197 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
11401198     let r = cg(i)
11411199     let outAmAmt = r._1
11421200     let outPrAmt = r._2
11431201     let pmtAmt = r._3
11441202     let pmtAssetId = r._4
11451203     let state = r._5
11461204     if ((noLessThenAmtAsset > outAmAmt))
11471205         then throw(((("Failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
11481206         else if ((noLessThenPriceAsset > outPrAmt))
11491207             then throw(((("Failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
11501208             else {
11511209                 let burnLPAssetOnFactory = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
11521210                 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
11531211                     then state
11541212                     else throw("Strict value is not equal to itself.")
11551213                 }
11561214     }
11571215 
11581216 
11591217 
11601218 @Callable(i)
11611219 func unstakeAndGet (amount) = {
11621220     let checkPayments = if ((size(i.payments) != 0))
11631221         then throw("No pmnts expd")
11641222         else true
11651223     if ((checkPayments == checkPayments))
11661224         then {
11671225             let cfg = gpc()
11681226             let factoryCfg = gfc()
11691227             let lpAssetId = fromBase58String(cfg[idxLPAsId])
11701228             let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
11711229             let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
11721230             if ((unstakeInv == unstakeInv))
11731231                 then {
11741232                     let r = ego(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
11751233                     let sts = parseIntValue(r._9)
11761234                     let state = r._10
11771235                     let v = if (if (igs())
11781236                         then true
11791237                         else (sts == PoolShutdown))
11801238                         then throw(("Blocked: " + toString(sts)))
11811239                         else true
11821240                     if ((v == v))
11831241                         then {
11841242                             let burnA = invoke(fca, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
11851243                             if ((burnA == burnA))
11861244                                 then state
11871245                                 else throw("Strict value is not equal to itself.")
11881246                             }
11891247                         else throw("Strict value is not equal to itself.")
11901248                     }
11911249                 else throw("Strict value is not equal to itself.")
11921250             }
11931251         else throw("Strict value is not equal to itself.")
11941252     }
11951253 
11961254 
11971255 
11981256 @Callable(i)
11991257 func unstakeAndGetOneTkn (unstakeAmount,outAssetId,minOutAmount) = {
12001258     let checkPayments = if ((size(i.payments) != 0))
12011259         then throw("No pmnts expd")
12021260         else true
12031261     if ((checkPayments == checkPayments))
12041262         then {
12051263             let cfg = gpc()
12061264             let factoryCfg = gfc()
12071265             let lpAssetId = fromBase58String(cfg[idxLPAsId])
12081266             let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
12091267             let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), unstakeAmount], nil)
12101268             if ((unstakeInv == unstakeInv))
12111269                 then {
1212-                    let $t04498245170 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1213-                    let state = $t04498245170._1
1214-                    let totalAmount = $t04498245170._2
1270+                    let $t04605546243 = getOneTknV2Internal(outAssetId, minOutAmount, [AttachedPayment(lpAssetId, unstakeAmount)], i.caller, i.originCaller, i.transactionId)
1271+                    let state = $t04605546243._1
1272+                    let totalAmount = $t04605546243._2
12151273                     $Tuple2(state, totalAmount)
12161274                     }
12171275                 else throw("Strict value is not equal to itself.")
12181276             }
12191277         else throw("Strict value is not equal to itself.")
1278+    }
1279+
1280+
1281+
1282+@Callable(i)
1283+func putOneTknV3 () = {
1284+    let poolConfig = gpc()
1285+    let amId = poolConfig[idxAmAsId]
1286+    let prId = poolConfig[idxPrAsId]
1287+    let lpId = poolConfig[idxLPAsId]
1288+    let payment = i.payments[0]
1289+    let paymentAsset = toBase58String(value(payment.assetId))
1290+    let paymentAmountRaw = payment.amount
1291+    let $t04657246631 = takeFee(paymentAmountRaw)
1292+    let paymentAmount = $t04657246631._1
1293+    let feeAmount = $t04657246631._2
1294+    let $t04663546905 = if ((size(i.payments) == 1))
1295+        then if ((paymentAsset == amId))
1296+            then $Tuple2(paymentAmount, 0)
1297+            else if ((paymentAsset == prId))
1298+                then $Tuple2(0, paymentAmount)
1299+                else throw("invalid payment")
1300+        else throw("invalid payments size")
1301+    let amAmount = $t04663546905._1
1302+    let prAmount = $t04663546905._2
1303+    let amBalanceNew = getAccBalance(amId)
1304+    let prBalanceNew = getAccBalance(prId)
1305+    let amBalanceOld = (amBalanceNew - amAmount)
1306+    let prBalanceOld = (prBalanceNew - prAmount)
1307+    let D0 = getD([toBigInt(amBalanceOld), toBigInt(prBalanceOld)])
1308+    let D1 = getD([toBigInt(amBalanceNew), toBigInt(prBalanceNew)])
1309+    let lpEmission = toBigInt(valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "invalid lp asset").quantity)
1310+    let lpAmount = ((lpEmission * (D1 - D0)) / D0)
1311+    $Tuple2(nil, toInt(lpAmount))
12201312     }
12211313 
12221314 
12231315 
12241316 @Callable(i)
12251317 func activate (amtAsStr,prAsStr) = if ((toString(i.caller) != toString(fca)))
12261318     then throw("denied")
12271319     else $Tuple2([StringEntry(aa(), amtAsStr), StringEntry(pa(), prAsStr)], "success")
12281320 
12291321 
12301322 
12311323 @Callable(i)
12321324 func setS (k,v) = if ((toString(i.caller) != strf(this, ada())))
12331325     then pd
12341326     else [StringEntry(k, v)]
12351327 
12361328 
12371329 
12381330 @Callable(i)
12391331 func setI (k,v) = if ((toString(i.caller) != strf(this, ada())))
12401332     then pd
12411333     else [IntegerEntry(k, v)]
12421334 
12431335 
12441336 
12451337 @Callable(i)
12461338 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, gpc())
12471339 
12481340 
12491341 
12501342 @Callable(i)
12511343 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
12521344 
12531345 
12541346 
12551347 @Callable(i)
12561348 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
12571349     let pr = calcPrices(amAmt, prAmt, lpAmt)
12581350     $Tuple2(nil, [toString(pr[0]), toString(pr[1]), toString(pr[2])])
12591351     }
12601352 
12611353 
12621354 
12631355 @Callable(i)
12641356 func fromX18WrapperREADONLY (val,resScaleMult) = $Tuple2(nil, f1(parseBigIntValue(val), resScaleMult))
12651357 
12661358 
12671359 
12681360 @Callable(i)
12691361 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(t1(origVal, origScaleMult)))
12701362 
12711363 
12721364 
12731365 @Callable(i)
12741366 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(cpbi(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
12751367 
12761368 
12771369 
12781370 @Callable(i)
12791371 func estimatePutOperationWrapperREADONLY (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,usrAddr,isEval,emitLp) = $Tuple2(nil, epo(txId58, slippage, inAmAmt, inAmId, inPrAmt, inPrId, usrAddr, isEval, emitLp, true, false, 0, ""))
12801372 
12811373 
12821374 
12831375 @Callable(i)
12841376 func estimateGetOperationWrapperREADONLY (txId58,pmtAsId,pmtLpAmt,usrAddr) = {
12851377     let r = ego(txId58, pmtAsId, pmtLpAmt, addressFromStringValue(usrAddr))
12861378     $Tuple2(nil, $Tuple10(r._1, r._2, r._3, r._4, r._5, r._6, r._7, toString(r._8), r._9, r._10))
12871379     }
12881380 
12891381 
12901382 
12911383 @Callable(i)
12921384 func getFeeREADONLY () = $Tuple2(nil, fee)
12931385 
12941386 
12951387 @Verifier(tx)
12961388 func verify () = {
12971389     let targetPublicKey =     match m() {
12981390         case pk: ByteVector => 
12991391             pk
13001392         case _: Unit => 
13011393             tx.senderPublicKey
13021394         case _ => 
13031395             throw("Match error")
13041396     }
13051397     match tx {
13061398         case order: Order => 
13071399             let matcherPub = mp()
13081400             let orderValid = moa(order)
13091401             let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
13101402             let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
13111403             if (if (if (orderValid)
13121404                 then senderValid
13131405                 else false)
13141406                 then matcherValid
13151407                 else false)
13161408                 then true
13171409                 else toe(orderValid, senderValid, matcherValid)
13181410         case s: SetScriptTransaction => 
13191411             let newHash = blake2b256(value(s.script))
13201412             let allowedHash = fromBase64String(value(getString(fca, keyAllowedLpStableScriptHash())))
13211413             let currentHash = scriptHash(this)
13221414             if (if ((allowedHash == newHash))
13231415                 then (currentHash != newHash)
13241416                 else false)
13251417                 then true
13261418                 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
13271419         case _ => 
13281420             sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
13291421     }
13301422     }
13311423 
github/deemru/w8io/c3f4982 
137.96 ms ◑