tx · 8hoCQUTLyWkkbudVjwmPDjZyHLxz3vVSPGNnJ3yDz1zn

3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz:  -0.02200000 Waves

2023.01.12 12:15 [2401539] smart account 3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8hoCQUTLyWkkbudVjwmPDjZyHLxz3vVSPGNnJ3yDz1zn",
    "fee": 2200000,
    "feeAssetId": null,
    "timestamp": 1673514931902,
    "version": 1,
    "sender": "3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz",
    "senderPublicKey": "D28XoueZWsMfm8Y5pa6C5ZFuYoWgre2Wm8tzJANJgMnq",
    "proofs": [
        "ewVDS6CL3kxRo9etADVQG11pRBP3qdK7bcY7nXZWJDsUScLmrvZceowM7QZUpWhheg3VGnVq4AZwqSWdVw46dhk"
    ],
    "script": "base64:BgLcHwgCEgMKAQgSAwoBCBIDCgEIEgASABIECgIIARIGCgQCAQICEgMKAQgSBAoCCAgSBgoEARgIGBIECgIYCBIECgIICBIECgIICBIDCgEIEgQKAggIIgZTQ0FMRTgiBU1VTFQ4IgdTQ0FMRTE4IgZNVUxUMTgiA1NFUCIOUE9PTFdFSUdIVE1VTFQiCnplcm9CaWdJbnQiCW9uZUJpZ0ludCIHd3JhcEVyciIDbXNnIgh0aHJvd0VyciIJYXNBbnlMaXN0IgN2YWwiByRtYXRjaDAiCnZhbEFueUx5c3QiBWFzSW50IgZ2YWxJbnQiCGFzU3RyaW5nIgZ2YWxTdHIiDGFzQnl0ZVZlY3RvciIGdmFsQmluIg9nZXRTdHJpbmdPckZhaWwiB2FkZHJlc3MiA2tleSIYZ2V0U3RyaW5nQnlBZGRyZXNzT3JGYWlsIgxnZXRJbnRPclplcm8iD2dldEludE9yRGVmYXVsdCIKZGVmYXVsdFZhbCIMZ2V0SW50T3JGYWlsIhlnZXRCaWdJbnRGcm9tU3RyaW5nT3JaZXJvIhxnZXRCaWdJbnRGcm9tU3RyaW5nT3JEZWZhdWx0IgFzIgV0b1gxOCIHb3JpZ1ZhbCINb3JpZ1NjYWxlTXVsdCIHZnJvbVgxOCIPcmVzdWx0U2NhbGVNdWx0IhFrZXlGYWN0b3J5QWRkcmVzcyIZa2V5Vm90aW5nRW1pc3Npb25Db250cmFjdCIYSWR4RmFjdG9yeUNmZ1N0YWtpbmdEYXBwIhlJZHhGYWN0b3J5Q2ZnQm9vc3RpbmdEYXBwIhRJZHhGYWN0b3J5Q2ZnSWRvRGFwcCIVSWR4RmFjdG9yeUNmZ1RlYW1EYXBwIhlJZHhGYWN0b3J5Q2ZnRW1pc3Npb25EYXBwIhVJZHhGYWN0b3J5Q2ZnUmVzdERhcHAiGUlkeEZhY3RvcnlDZmdTbGlwcGFnZURhcHAiDWtleUZhY3RvcnlDZmciE2tleU1hbmFnZXJQdWJsaWNLZXkiGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5IhZrZXlTdGFibGVQb29sQWRkb25BZGRyIgxrZXlBZGRvbkFkZHIiGmtleUZhY3RvcnlMcDJBc3NldHNNYXBwaW5nIgpscEFzc2V0U3RyIhBrZXlGYWN0b3J5THBMaXN0IiZrZXlGYWN0b3J5THBBc3NldFRvUG9vbENvbnRyYWN0QWRkcmVzcyIUa2V5RmFjdG9yeVBvb2xXZWlnaHQiD2NvbnRyYWN0QWRkcmVzcyIKcmVhZExwTGlzdCIHZmFjdG9yeSIUcmVhZEZhY3RvcnlDZmdPckZhaWwiGGdldEJvb3N0aW5nQWRkcmVzc09yRmFpbCIKZmFjdG9yeUNmZyIYZ2V0RW1pc3Npb25BZGRyZXNzT3JGYWlsIhdnZXRTdGFraW5nQWRkcmVzc09yRmFpbCIea2V5RW1pc3Npb25SYXRlUGVyQmxvY2tDdXJyZW50IiFrZXlFbWlzc2lvblJhdGVQZXJCbG9ja01heEN1cnJlbnQiFWtleUVtaXNzaW9uU3RhcnRCbG9jayIba2V5RW1pc3Npb25EdXJhdGlvbkluQmxvY2tzIhNrZXlFbWlzc2lvbkVuZEJsb2NrIg9rZXlTdGFrZWRCeVVzZXIiDnVzZXJBZGRyZXNzU3RyIgxscEFzc2V0SWRTdHIiDmtleVN0YWtlZFRvdGFsIhBrZXlDbGFpbWVkQnlVc2VyIhlrZXlDbGFpbWVkQnlVc2VyTWluUmV3YXJkIhtrZXlDbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmQiD2tleUNsYWltZWRUb3RhbCIKcmVhZFN0YWtlZCIVa2V5TGFzdFRvdGFsTHBCYWxhbmNlIglscEFzc2V0SWQiFGtleUxhc3RVc2VyTHBCYWxhbmNlIgt1c2VyQWRkcmVzcyIZa2V5VG90YWxMcEJhbGFuY2VJbnRlZ3JhbCIYa2V5VXNlckxwQmFsYW5jZUludGVncmFsIiZrZXlUb3RhbExwQmFsYW5jZUludGVncmFsTGFzdFVwZEhlaWdodCIla2V5VXNlckxwQmFsYW5jZUludGVncmFsTGFzdFVwZEhlaWdodCISa2V5V3hQZXJMcEludGVncmFsIh9rZXlXeFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0IhBrZXlXeFRvQ2xhaW1Vc2VyIiNrZXlXeFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodCIKa2V5V3hQZXJMcCINa2V5V3hQZXJMcFgxOCIaa2V5V3hQZXJMcEludGVncmFsVXNlckxhc3QiGWtleU9wZXJhdGlvbkhpc3RvcnlSZWNvcmQiBHR5cGUiBnR4SWQ1OCITZm9ybWF0SGlzdG9yeVJlY29yZCIGYW1vdW50IhVPcGVyYXRpb25IaXN0b3J5RW50cnkiBHR4SWQiDmZhY3RvcnlBZGRyZXNzIg9mYWN0b3J5Q29udHJhY3QiEGVtaXNzaW9uQ29udHJhY3QiEGJvb3N0aW5nQ29udHJhY3QiFmxwU3Rha2luZ1Bvb2xzQ29udHJhY3QiC2tleU5leHRVc2VyIhBnZXRVc2Vyc0xpc3ROYW1lIgtrZXlMaXN0SGVhZCIIbGlzdE5hbWUiC2tleUxpc3RTaXplIgtrZXlMaXN0UHJldiICaWQiC2tleUxpc3ROZXh0Igxjb250YWluc05vZGUiCmhlYWRPclVuaXQiCnByZXZPclVuaXQiCm5leHRPclVuaXQiEWluc2VydE5vZGVBY3Rpb25zIghsaXN0U2l6ZSIJY2hlY2tOb2RlIhFkZWxldGVOb2RlQWN0aW9ucyIbY2FsY1d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0IgxzdGFrZWRCeVVzZXIiJnd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0T3JaZXJvIhJ3eFBlckxwSW50ZWdyYWxOZXciGnd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0S0VZIhRyZWZyZXNoUG9vbElOVEVHUkFMUyIOcG9vbEFkZHJlc3NTdHIiDWxwRGVsdGFBbW91bnQiDnN0YWtlZFRvdGFsS0VZIgtzdGFrZWRUb3RhbCISbm9uWmVyb1N0YWtlZFRvdGFsIgpwb29sV2VpZ2h0IhJlbWlzc2lvblN0YXJ0QmxvY2siBU1VTFQzIhR3eEVtaXNzaW9uUGVyQmxvY2tYMyIYcG9vbFd4RW1pc3Npb25QZXJCbG9ja1gzIhJ3eFBlckxwSW50ZWdyYWxLRVkiH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkiCnd4UGVyTHBLRVkiHHd4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHQiD3d4UGVyTHBJbnRlZ3JhbCIPd3hQZXJMcE9yWmVyb1gzIgJkaCIJd3hQZXJMcFgzIg5zdGFrZWRUb3RhbE5ldyIVbm9uWmVyb1N0YWtlZFRvdGFsTmV3Igx3eFBlckxwWDNOZXciH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHROZXciBWRlYnVnIhByZWZyZXNoSU5URUdSQUxTIg0kdDAxNDc1MDE0ODcyIhFwb29sSW50ZWdyYWxTVEFURSIJcG9vbERFQlVHIg9zdGFrZWRCeVVzZXJLRVkiEHd4VG9DbGFpbVVzZXJLRVkiI3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0S0VZIg13eFRvQ2xhaW1Vc2VyIhd3eFBlckxwSW50ZWdyYWxVc2VyTGFzdCIGTVVMVDExIhB3eFRvQ2xhaW1Vc2VyTmV3Ihp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdE5ldyIjd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHROZXciFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQiHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0IhVwZXJtaXNzaW9uRGVuaWVkRXJyb3IiCG11c3RUaGlzIgFpIgttdXN0TWFuYWdlciICcGsiDnVuc3Rha2VBY3Rpb25zIgtwb29sQWRkcmVzcyIXbHBBc3NldFJlY2lwaWVudEFkZHJlc3MiDWludGVncmFsU1RBVEUiC2xpc3RBY3Rpb25zIg1jbGFpbWVkQnlVc2VyIhBhdmFpbGFibGVUb0NsYWltIgFyIhFmYWN0b3J5QWRkcmVzc1N0ciILY2hlY2tDYWxsZXIiFnZvdGluZ0VtaXNzaW9uQ29udHJhY3QiBWNoZWtzIhdwZW5kaW5nTWFuYWdlclB1YmxpY0tleSIVY2hlY2tNYW5hZ2VyUHVibGljS2V5IgJwbSIFaGFzUE0iB2NoZWNrUE0iA3BtdCIJY2FsbGVyU3RyIg0kdDAyMTA4ODIxMjA1Iglwb29sQWRkb24iBnJlc3VsdCIQY2xhaW1lZEJ5VXNlcktFWSIPY2xhaW1lZFRvdGFsS0VZIhljbGFpbWVkQnlVc2VyTWluUmV3YXJkS0VZIhtjbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmRLRVkiFmNsYWltZWRCeVVzZXJNaW5SZXdhcmQiGGNsYWltZWRCeVVzZXJCb29zdFJld2FyZCIMY2xhaW1lZFRvdGFsIg0kdDAyNDIzNjI0MzQ4IhJ3eEFtb3VudEJvb3N0VG90YWwiDW1pblJld2FyZFBhcnQiD2Jvb3N0UmV3YXJkUGFydCILdG90YWxSZXdhcmQiCXd4QXNzZXRJZCIJZW1pdEJvb3N0IhJjbGFpbWVkQnlVc2VyVmFsdWUiHmNsYWltZWRCeVVzZXJNaW5SZXdhcmRQbHVzUGFydCIrY2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkUGx1c0Jvb3N0UmV3YXJkUGFydCIgY2xhaW1lZFRvdGFsUGx1c0F2YWlsYWJsZVRvQ2xhaW0iC2N1cnJlbnRJdGVyIgpscEFzc2V0SWRzIgZyZXNBY2MiBGluZm8iAUAiCXVuY2xhaW1lZCIHY2xhaW1lZCIDcmVzIgNpbnYiEnd4RW1pc3Npb25QZXJCbG9jayIMcGFzc2VkQmxvY2tzIg5wb29sV3hFbWlzc2lvbiIMdXNlcld4UmV3YXJkIg0kdDAyNzkwMTI4MDEzIg5ib29zdEludlJlc3VsdCIKYm9vc3REZWJ1ZyIKdXNlck9yVW5pdCIHJG1hdGNoMSIEaGVhZCIObmV4dFVzZXJPclVuaXQiCG5leHRVc2VyIg0kdDAzMDUyMTMwNjMxIgJ0eCIGdmVyaWZ5Ig90YXJnZXRQdWJsaWNLZXliAAFhAAgAAWIAgMLXLwABYwASAAFkCQC2AgEAgICQu7rWrfANAAFlAgJfXwABZgUBYgABZwkAtgIBAAAAAWgJALYCAQABAQFpAQFqCQC5CQIJAMwIAgINc3Rha2luZy5yaWRlOgkAzAgCCQClCAEFBHRoaXMJAMwIAgUBagUDbmlsAgEgAQFrAQFqCQACAQkBAWkBBQFqAQFsAQFtBAFuBQFtAwkAAQIFAW4CCUxpc3RbQW55XQQBbwUBbgUBbwkAAgECG2ZhaWwgdG8gY2FzdCBpbnRvIExpc3RbQW55XQEBcAEBbQQBbgUBbQMJAAECBQFuAgNJbnQEAXEFAW4FAXEJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBAXIBAW0EAW4FAW0DCQABAgUBbgIGU3RyaW5nBAFzBQFuBQFzCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQF0AQFtBAFuBQFtAwkAAQIFAW4CCkJ5dGVWZWN0b3IEAXUFAW4FAXUJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBAXYCAXcBeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAXcFAXgJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FAXgCDyBpcyBub3QgZGVmaW5lZAEBeQIBdwF4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUBdwUBeAkArAICCQCsAgIJAKwCAgkArAICAgptYW5kYXRvcnkgCQClCAEFAXcCAS4FAXgCDyBpcyBub3QgZGVmaW5lZAEBegIBdwF4CQELdmFsdWVPckVsc2UCCQCaCAIFAXcFAXgAAAEBQQMBdwF4AUIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUBdwUBeAUBQgEBQwIBdwF4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUBdwUBeAkArAICCQCsAgICD21hbmRhdG9yeSB0aGlzLgUBeAIPIGlzIG5vdCBkZWZpbmVkAQFEAgF3AXgJAQV2YWx1ZQEJAKgDAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQF3BQF4AgEwAQFFAwF3AXgBQgQBbgkAnQgCBQF3BQF4AwkAAQIFAW4CBlN0cmluZwQBRgUBbgkBBXZhbHVlAQkAqAMBBQFGAwkAAQIFAW4CBFVuaXQFAUIJAAIBAgtNYXRjaCBlcnJvcgEBRwIBSAFJCQC8AgMJALYCAQUBSAUBZAkAtgIBBQFJAQFKAgFtAUsJAKADAQkAvAIDBQFtCQC2AgEFAUsFAWQBAUwAAhwlcyVzX19jb25maWdfX2ZhY3RvcnlBZGRyZXNzAQFNAAIaJXNfX3ZvdGluZ0VtaXNzaW9uQ29udHJhY3QAAU4AAQABTwACAAFQAAMAAVEABAABUgAFAAFTAAYAAVQABwEBVQACESVzX19mYWN0b3J5Q29uZmlnAQFWAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBAVcAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAVgAAhclc19fc3RhYmxlUG9vbEFkZG9uQWRkcgEBWQACDSVzX19hZGRvbkFkZHIBAVoBAmFhCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFhCQDMCAICHm1hcHBpbmdzX19scEFzc2V0MlBvb2xDb250cmFjdAUDbmlsBQFlAQJhYgACECVzX19scFRva2Vuc0xpc3QBAmFjAQJhYQkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhYQkAzAgCAh5tYXBwaW5nc19fbHBBc3NldDJQb29sQ29udHJhY3QFA25pbAUBZQECYWQBAmFlCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgpwb29sV2VpZ2h0CQDMCAIFAmFlBQNuaWwFAWUBAmFmAQJhZwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFAmFnCQECYWIAAgAFAWUBAmFoAQJhZwkAtQkCCQEBeQIFAmFnCQEBVQAFAWUBAmFpAQJhagkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQJhagUBTwECYWsBAmFqCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFqBQFSAQJhbAECYWoJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYWoFAU4BAmFtAAIbJXMlc19fcmF0ZVBlckJsb2NrX19jdXJyZW50AQJhbgACHiVzJXNfX3JhdGVQZXJCbG9ja01heF9fY3VycmVudAECYW8AAholcyVzX19lbWlzc2lvbl9fc3RhcnRCbG9jawECYXAAAhglcyVzX19lbWlzc2lvbl9fZHVyYXRpb24BAmFxAAIYJXMlc19fZW1pc3Npb25fX2VuZEJsb2NrAQJhcgICYXMCYXQJALkJAgkAzAgCAg4lcyVzJXNfX3N0YWtlZAkAzAgCBQJhcwkAzAgCBQJhdAUDbmlsBQFlAQJhdQECYXQJAKwCAgIXJXMlcyVzX19zdGFrZWRfX3RvdGFsX18FAmF0AQJhdgICYXQCYXMJALkJAgkAzAgCAg8lcyVzJXNfX2NsYWltZWQJAMwIAgUCYXMJAMwIAgUCYXQFA25pbAUBZQECYXcCAmF0AmFzCQC5CQIJAMwIAgIYJXMlcyVzX19jbGFpbWVkTWluUmV3YXJkCQDMCAIFAmFzCQDMCAIFAmF0BQNuaWwFAWUBAmF4AgJhdAJhcwkAuQkCCQDMCAICGiVzJXMlc19fY2xhaW1lZEJvb3N0UmV3YXJkCQDMCAIFAmFzCQDMCAIFAmF0BQNuaWwFAWUBAmF5AQJhdAkAuQkCCQDMCAICFiVzJXMlc19fY2xhaW1lZF9fdG90YWwJAMwIAgUCYXQFA25pbAUBZQECYXoBAXgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBeAAAAQJhQQECYUIJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUIJAMwIAgIFdG90YWwJAMwIAgIDYmFsBQNuaWwFAWUBAmFDAgJhQgJhRAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQgkAzAgCBQJhRAkAzAgCAgNiYWwFA25pbAUBZQECYUUBAmFCCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFCCQDMCAICBXRvdGFsCQDMCAICBmJhbElOVAUDbmlsBQFlAQJhRgICYUICYUQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUIJAMwIAgUCYUQJAMwIAgIGYmFsSU5UBQNuaWwFAWUBAmFHAQJhQgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQgkAzAgCAgV0b3RhbAkAzAgCAgdsYXN0VXBkBQNuaWwFAWUBAmFIAgJhQgJhRAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQgkAzAgCBQJhRAkAzAgCAgdsYXN0VXBkBQNuaWwFAWUBAmFJAQJhQgkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFCCQDMCAICBmNvbW1vbgkAzAgCAgVscEludAUDbmlsBQFlAQJhSgECYUIJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJhQgkAzAgCAgZjb21tb24JAMwIAgIGbHBJbnRIBQNuaWwFAWUBAmFLAgJhQgJhRAkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFCCQDMCAIFAmFECQDMCAICBWxwSW50BQNuaWwFAWUBAmFMAgJhQgJhRAkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFCCQDMCAIFAmFECQDMCAICBmxwSW50SAUDbmlsBQFlAQJhTQECYUIJALkJAgkAzAgCAgIlcwkAzAgCBQJhQgkAzAgCAgd3eFBlckxwBQNuaWwFAWUBAmFOAQJhQgkAuQkCCQDMCAICAiVzCQDMCAIFAmFCCQDMCAICCnd4UGVyTHBYMTgFA25pbAUBZQECYU8CAmFCAmFECQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYUIJAMwIAgUCYUQJAMwIAgIFdUludEwFA25pbAUBZQECYVADAmFRAmFEAmFSCQC5CQIJAMwIAgIRJXMlcyVzJXNfX2hpc3RvcnkJAMwIAgUCYVEJAMwIAgUCYUQJAMwIAgUCYVIFA25pbAUBZQECYVMEAmFEAmFCAmFRAmFUCQC5CQIJAMwIAgIMJXMlcyVzJWQlZCVkCQDMCAIFAmFECQDMCAIFAmFCCQDMCAIFAmFRCQDMCAIJAKQDAQUGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBBQJhVAUDbmlsBQFlAQJhVQUCYVECYUQCYUICYVQCYVYJAQtTdHJpbmdFbnRyeQIJAQJhUAMFAmFRBQJhRAkA2AQBBQJhVgkBAmFTBAUCYUQFAmFCBQJhUQUCYVQAAmFXCQEBdgIFBHRoaXMJAQFMAAACYVgJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAmFXAAJhagkBAmFoAQUCYVgAAmFZCQECYWsBBQJhagACYVoJAQJhaQEFAmFqAAJiYQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQC5CQIJAMwIAgICJXMJAMwIAgIWbHBTdGFraW5nUG9vbHNDb250cmFjdAUDbmlsBQFlCQEBaQECLmxwX3N0YWtpbmdfcG9vbHMgY29udHJhY3QgYWRkcmVzcyBpcyB1bmRlZmluZWQJAQFpAQIpaW52YWxpZCBscF9zdGFraW5nX3Bvb2xzIGNvbnRyYWN0IGFkZHJlc3MBAmJiAQJhQgkAuQkCCQDMCAICBCVzJXMJAMwIAgUCYUIJAMwIAgIIbmV4dFVzZXIFA25pbAUBZQECYmMBAmFCCQC5CQIJAMwIAgIFdXNlcnMJAMwIAgUCYUIFA25pbAUBZQECYmQBAmJlCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmJlCQDMCAICBGhlYWQFA25pbAUBZQECYmYBAmJlCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmJlCQDMCAICBHNpemUFA25pbAUBZQECYmcCAmJlAmJoCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYmUJAMwIAgUCYmgJAMwIAgIEcHJldgUDbmlsBQFlAQJiaQICYmUCYmgJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJiZQkAzAgCBQJiaAkAzAgCAgRuZXh0BQNuaWwFAWUBAmJqAgJiZQJiaAQCYmsJAJ0IAgUEdGhpcwkBAmJkAQUCYmUEAmJsCQCdCAIFBHRoaXMJAQJiZwIFAmJlBQJiaAQCYm0JAJ0IAgUEdGhpcwkBAmJpAgUCYmUFAmJoAwMJAAACBQJiaAkBC3ZhbHVlT3JFbHNlAgUCYmsCAAYJAQIhPQIFAmJsBQR1bml0BgkBAiE9AgUCYm0FBHVuaXQBAmJuAgJiZQJiaAQCYmsJAJ0IAgUEdGhpcwkBAmJkAQUCYmUEAmJvCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAQJiZgEFAmJlAAAEAmJwAwkBASEBCQECYmoCBQJiZQUCYmgGCQACAQILTm9kZSBleGlzdHMDCQAAAgUCYnAFAmJwCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmJmAQUCYmUJAGQCBQJibwABBQNuaWwDCQECIT0CBQJiawUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQECYmkCBQJiZQUCYmgJAQV2YWx1ZQEFAmJrCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZwIFAmJlCQEFdmFsdWUBBQJiawUCYmgFA25pbAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZAEFAmJlBQJiaAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJicQICYmUCYmgEAmJrCQCdCAIFBHRoaXMJAQJiZAEFAmJlBAJibwkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQECYmYBBQJiZQAABAJibAkAnQgCBQR0aGlzCQECYmcCBQJiZQUCYmgEAmJtCQCdCAIFBHRoaXMJAQJiaQIFAmJlBQJiaAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYmYBBQJiZQkAZQIFAmJvAAEFA25pbAMDCQECIT0CBQJibAUEdW5pdAkBAiE9AgUCYm0FBHVuaXQHCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiaQIFAmJlCQEFdmFsdWUBBQJibAkBBXZhbHVlAQUCYm0JAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJnAgUCYmUJAQV2YWx1ZQEFAmJtCQEFdmFsdWUBBQJibAkAzAgCCQELRGVsZXRlRW50cnkBCQECYmcCBQJiZQUCYmgJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJpAgUCYmUFAmJoBQNuaWwDCQECIT0CBQJibQUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQECYmQBBQJiZQkBBXZhbHVlAQUCYm0JAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJpAgUCYmUFAmJoCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiZwIFAmJlCQEFdmFsdWUBBQJibQUDbmlsAwkBAiE9AgUCYmwFBHVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJnAgUCYmUFAmJoCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiaQIFAmJlCQEFdmFsdWUBBQJibAUDbmlsAwkAAAIFAmJoCQELdmFsdWVPckVsc2UCBQJiawIACQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiZAEFAmJlBQNuaWwJAAIBCQCsAgIJAKwCAgkArAICAg5pbnZhbGlkIG5vZGU6IAUCYmUCAS4FAmJoAQJicgQCYnMCYnQCYnUCYnYDAwkAAAIFAmJ0BQFnCQC/AgIFAmJzBQFnBwUBZwMJAAACBQJicwUBZwUCYnUDAwkAvwICBQJidAUBZwkAvwICBQJicwUBZwcJAQV2YWx1ZQEJAKgDAQkBAXYCBQR0aGlzBQJidgkAAgECLWNhbGNXeFBlckxwSW50ZWdyYWxVc2VyTGFzdDogdW5leHBlY3RlZCBzdGF0ZQECYncDAmF0AmJ4AmJ5BAJiegkBAmF1AQUCYXQEAmJBCQC2AgEJAQJhegEFAmJ6BAJiQgMJAAACBQJiQQUBZwUBaAUCYkEEAmJDCQERQGV4dHJOYXRpdmUoMTA1MCkCBQJhWAkBAmFkAQUCYngEAmJECQEBQwIFAmFZCQECYW8ABAJiRQDoBwQCYkYJAGgCCQEBQwIFAmFZCQECYW0ABQJiRQQCYkcJAGsDBQJiRgUCYkMJAGgCBQFmAAMEAmJICQECYUkBBQJhdAQCYkkJAQJhSgEFAmF0BAJiSgkBAmFNAQUCYXQEAmJLCQEBQQMFBHRoaXMFAmJJBQJiRAQCYkwJAQFEAgUEdGhpcwUCYkgEAmJNAAAEAmJOCQCWAwEJAMwIAgkAZQIFBmhlaWdodAUCYksJAMwIAgAABQNuaWwEAmJPAwkBAiE9AgUCYk0AAAkAtgIBBQJiTQkAvAIDCQC2AgEFAmJHCQC2AgEFAWIFAmJCBAJiUAkAtwICBQJiQQkAtgIBBQJieQQCYlEDCQAAAgUCYlAFAWcFAWgFAmJQBAJidQkAtwICBQJiTAkAuQICBQJiTwkAtgIBBQJiTgQCYlIJALoCAgkAtgIBBQJiRwUCYlEEAmJTBQZoZWlnaHQEAmJUCQC5CQIJAMwIAgkApgMBBQJidQkAzAgCCQCkAwEFAmJOCQDMCAIJAKYDAQUCYk8JAMwIAgkApgMBBQJiQQkAzAgCCQCkAwEFAmJHCQDMCAIJAKQDAQUCYkYJAMwIAgkApAMBBQJiQwUDbmlsAgI6OgkAlQoDBQJidQkAzAgCCQELU3RyaW5nRW50cnkCBQJiSAkApgMBBQJidQkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYkkFAmJTCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmJKCQCmAwEFAmJSBQNuaWwFAmJUAQJiVQQCYXQCYXMCYngCYnkEAmJWCQECYncDBQJhdAUCYngFAmJ5BAJidQgFAmJWAl8xBAJiVwgFAmJWAl8yBAJiWAgFAmJWAl8zBAJiRQDoBwQCYlkJAQJhcgIFAmFzBQJhdAQCYnMJAQJhegEFAmJZBAJiWgkBAmFLAgUCYXQFAmFzBAJjYQkBAmFMAgUCYXQFAmFzBAJidgkBAmFPAgUCYXQFAmFzBAJjYgkBAUQCBQR0aGlzBQJiWgQCYnQJAQF6AgUEdGhpcwUCY2EEAmNjCQECYnIECQC2AgEFAmJzCQC2AgEFAmJ0BQJidQUCYnYEAmNkCQBoAgUBYgUCYkUEAmNlCQCYAwEJAMwIAgkAtwICBQJjYgkAvAIDCQC4AgIFAmJ1BQJjYwkAtgIBBQJicwkAtgIBBQJjZAkAzAgCBQFnBQNuaWwEAmNmBQJidQQCY2cFBmhlaWdodAQCYlQJALkJAgkAzAgCCQCmAwEFAmNiCQDMCAIJAKYDAQUCY2MJAMwIAgkApAMBBQJicwkAzAgCBQJiWAkAzAgCCQCkAwEFBmhlaWdodAUDbmlsAgI6OgkAlQoDBQJjZQkAzggCBQJiVwkAzAgCCQELU3RyaW5nRW50cnkCBQJiWgkApgMBBQJjZQkAzAgCCQEMSW50ZWdlckVudHJ5AgUCY2EFAmNnCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmJ2CQCmAwEFAmNmBQNuaWwFAmJUAQJjaAAEAW4JAKIIAQkBAVYAAwkAAQIFAW4CBlN0cmluZwQBRgUBbgkA2QQBBQFGAwkAAQIFAW4CBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECY2kABAFuCQCiCAEJAQFXAAMJAAECBQFuAgZTdHJpbmcEAUYFAW4JANkEAQUBRgMJAAECBQFuAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAAmNqCQACAQIRUGVybWlzc2lvbiBkZW5pZWQBAmNrAQJjbAMJAAACCAUCY2wGY2FsbGVyBQR0aGlzBgUCY2oBAmNtAQJjbAQBbgkBAmNoAAMJAAECBQFuAgpCeXRlVmVjdG9yBAJjbgUBbgMJAAACCAUCY2wPY2FsbGVyUHVibGljS2V5BQJjbgYFAmNqAwkAAQIFAW4CBFVuaXQDCQAAAggFAmNsBmNhbGxlcgUEdGhpcwYFAmNqCQACAQILTWF0Y2ggZXJyb3IBAmNvBgJjbAJhQgJjcAJhRAJjcQJhVAQCYXMJAKUIAQUCYUQEAmF0CQDYBAEFAmFCBAJieAkApQgBBQJjcAQCYlkJAQJhcgIFAmFzBQJhdAQCYnoJAQJhdQEFAmF0BAJicwkBAmF6AQUCYlkEAmJBCQECYXoBBQJiegQCY3IICQECYlUEBQJhdAUCYXMFAmJ4CQEBLQEFAmFUAl8yBAJiZQkBAmJjAQUCYXQEAmNzAwMJAQJiagIFAmJlBQJhcwkAAAIFAmFUBQJicwcJAQJicQIFAmJlBQJhcwUDbmlsBAJjdAkBAUQCBQR0aGlzCQECYXYCBQJhdAUCYXMEAmNlCAkBAmJVBAUCYXQFAmFzBQJieAAAAl8xBAJjdQkAuAICBQJjZQUCY3QEAmN2AwkAvwICBQJjdQUBZwkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXQJAMwIAgUCYXMFA25pbAUDbmlsBQR1bml0AwkAAAIFAmN2BQJjdgMJAGYCBQJhVAUCYnMJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICDnBhc3NlZCBhbW91bnQ9CQCkAwEFAmFUAhsgaXMgZ3JlYXRlciB0aGFuIGF2YWlsYWJsZT0JAKQDAQUCYnMCDC4gbHBBc3NldElkPQUCYXQCEi4gc3Rha2VkQnlVc2VyS0VZPQUCYlkJAM4IAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiWQkAZQIFAmJzBQJhVAkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYnoJAGUCBQJiQQUCYVQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCY3EFAmFUBQJhQgkAzAgCCQECYVUFAgd1bnN0YWtlBQJhcwUCYXQFAmFUCAUCY2wNdHJhbnNhY3Rpb25JZAUDbmlsBQJjcgUCY3MJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4PAmNsAQtjb25zdHJ1Y3RvcgECY3cEAmN4CQECY20BBQJjbAMJAAACBQJjeAUCY3gJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAUwABQJjdwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNsAQ1jb25zdHJ1Y3RvclYyAQJjeQQCY3oJAMwIAgkBAmNtAQUCY2wJAMwIAgMJAQIhPQIJAKYIAQUCY3kFBHVuaXQGAihpbnZhbGlkIHZvdGluZyBlbWlzc2lvbiBjb250cmFjdCBhZGRyZXNzBQNuaWwDCQAAAgUCY3oFAmN6CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFNAAUCY3kFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJjbAEKc2V0TWFuYWdlcgECY0EEAmN4CQECY20BBQJjbAMJAAACBQJjeAUCY3gEAmNCCQDZBAEFAmNBAwkAAAIFAmNCBQJjQgkAzAgCCQELU3RyaW5nRW50cnkCCQEBVwAFAmNBBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY2wBDmNvbmZpcm1NYW5hZ2VyAAQCY0MJAQJjaQAEAmNEAwkBCWlzRGVmaW5lZAEFAmNDBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJjRAUCY0QEAmNFAwkAAAIIBQJjbA9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmNDBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJjRQUCY0UJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVYACQDYBAEJAQV2YWx1ZQEFAmNDCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFXAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNsAQVzdGFrZQADCQECIT0CCQCQAwEIBQJjbAhwYXltZW50cwABCQACAQI0aW52YWxpZCBwYXltZW50IC0gZXhhY3Qgb25lIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQCY0YJAJEDAggFAmNsCHBheW1lbnRzAAAEAmFCCQEFdmFsdWUBCAUCY0YHYXNzZXRJZAQCYXQJANgEAQUCYUIEAmFUCAUCY0YGYW1vdW50BAJieAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFYCQEBWgEFAmF0CQCsAgICFXVuc3VwcG9ydGVkIGxwIGFzc2V0IAUCYXQEAmNHCQClCAEIBQJjbAZjYWxsZXIEAmFzAwkAAAIFAmNHBQJieAkApQgBCAUCY2wMb3JpZ2luQ2FsbGVyBQJjRwQCYlkJAQJhcgIFAmFzBQJhdAQCYnoJAQJhdQEFAmF0BAJicwkBAmF6AQUCYlkEAmJBCQECYXoBBQJiegQCY0gJAQJiVQQFAmF0BQJhcwUCYngFAmFUBAJjZQgFAmNIAl8xBAJjcggFAmNIAl8yBAJiVAgFAmNIAl8zBAJiZQkBAmJjAQUCYXQEAmNzAwkBAmJqAgUCYmUFAmFzBQNuaWwJAQJibgIFAmJlBQJhcwkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFAmJZCQBkAgUCYnMFAmFUCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiegkAZAIFAmJBBQJhVAkAzAgCCQECYVUFAgVzdGFrZQUCYXMFAmF0BQJhVAgFAmNsDXRyYW5zYWN0aW9uSWQFA25pbAUCY3IFAmNzAmNsAQd1bnN0YWtlAgJhdAJhVAQCYUIJANkEAQUCYXQEAmJ4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUCYVgJAQFaAQUCYXQJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQJhdAQCY3AJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAmJ4BAJjSQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQJjcAkBAVkABQJieAQCY0cJAKUIAQgFAmNsBmNhbGxlcgQCYUQDAwkAAAIFAmNHBQJieAYJAAACBQJjRwUCY0kIBQJjbAxvcmlnaW5DYWxsZXIIBQJjbAZjYWxsZXIEAmNxCAUCY2wGY2FsbGVyCQECY28GBQJjbAUCYUIFAmNwBQJhRAUCY3EFAmFUAmNsAQ91bnN0YWtlSU5URVJOQUwEAmFCAmFUAmFEAmNxBAJhdAkA2AQBBQJhQgQCY3AJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhWAkBAVoBBQJhdAkArAICAhV1bnN1cHBvcnRlZCBscCBhc3NldCAFAmF0BAJjeAMJAAACCAUCY2wGY2FsbGVyBQJjcAYFAmNqAwkAAAIFAmN4BQJjeAkBAmNvBgUCY2wFAmFCBQJjcAkBB0FkZHJlc3MBBQJhRAkBB0FkZHJlc3MBBQJjcQUCYVQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY2wBB2NsYWltV3gBAmF0BAJhcwkApQgBCAUCY2wGY2FsbGVyBAJjSgkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXQJAMwIAgUCYXMFA25pbAUDbmlsCQCUCgIFA25pbAUCY0oCY2wBD2NsYWltV3hJTlRFUk5BTAICYXQCYXMEAmN4CQECY2sBBQJjbAMJAAACBQJjeAUCY3gEAmFECQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQUCYXMCJWNsYWltV3hJTlRFUk5BTDogaW52YWxpZCB1c2VyIGFkZHJlc3MEAmJ4CQEBeQIFAmFYCQECYWMBBQJhdAQCY0sJAQJhdgIFAmF0BQJhcwQCY0wJAQJheQEFAmF0BAJjTQkBAmF3AgUCYXQFAmFzBAJjTgkBAmF4AgUCYXQFAmFzBAJjdAkBAUQCBQR0aGlzBQJjSwQCY08JAQFEAgUEdGhpcwUCY00EAmNQCQEBRAIFBHRoaXMFAmNOBAJjUQkBAUQCBQR0aGlzBQJjTAQCY1IJAQJiVQQFAmF0BQJhcwUCYngAAAQCY2UIBQJjUgJfMQQCY3IIBQJjUgJfMgQCYlQIBQJjUgJfMwQCY3UJAJgDAQkAzAgCCQC4AgIFAmNlBQJjdAkAzAgCBQFnBQNuaWwDCQDAAgIFAWcFAmN1CQACAQIQbm90aGluZyB0byBjbGFpbQQCY1MJAJYDAQkAzAgCCQEBcAEJAJEDAgkBAWwBCQD8BwQFAmFaAgxjbGFpbVd4Qm9vc3QJAMwIAgUCYXQJAMwIAgUCYXMFA25pbAUDbmlsAAAJAMwIAgAABQNuaWwEAmNUBQJjdQQCY1UJAJkDAQkAzAgCCQC5AgIFAmNUCQC2AgEAAgkAzAgCCQC2AgEFAmNTBQNuaWwEAmNWCQC3AgIFAmNUBQJjVQQCY1cJAQF0AQkAkQMCCQEBbAEJAPwHBAUCYVkCBGVtaXQJAMwIAgkAoAMBBQJjVAUDbmlsBQNuaWwAAAQCY1gJAQFsAQkA/AcEBQJhWQIEZW1pdAkAzAgCCQCgAwEFAmNVBQNuaWwFA25pbAMJAAACBQJjWAUCY1gEAmNZCQC3AgIFAmN0BQJjdQQCY1oJALcCAgUCY08FAmNUBAJkYQkAtwICBQJjTwUCY1QEAmRiCQC3AgIFAmNPBQJjVAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmNLCQCmAwEFAmNZCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmNNCQCmAwEFAmNaCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmNOCQCmAwEFAmRhCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmNMCQCmAwEFAmRiCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFECQCgAwEFAmNUBQJjVwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhRAkAoAMBBQJjVQUCY1cJAMwIAgkBAmFVBQIFY2xhaW0FAmFzBQJhdAkAoAMBBQJjdQgFAmNsDXRyYW5zYWN0aW9uSWQFA25pbAkAoAMBBQJjVgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJjbAEbY2xhaW1XeEJ1bGtJbnRlcm5hbFJFQURPTkxZBAJkYwJkZAJhcwJkZQMJAAACBQJkYwkAkAMBBQJkZAkAlAoCBQNuaWwFAmRlBAJhQgkAkQMCBQJkZAUCZGMEAmRmCQC1CQIKAAJkZwkA/AcEBQR0aGlzAg9jbGFpbVd4UkVBRE9OTFkJAMwIAgUCYUIJAMwIAgUCYXMFA25pbAUDbmlsAwkAAQIFAmRnAgZTdHJpbmcFAmRnCQACAQkArAICCQADAQUCZGcCGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwUBZQQCZGgJAJEDAgUCZGYAAwQCZGkJAJEDAgUCZGYABAQCZGoJAM0IAgUCZGUJALkJAgkAzAgCAgQlZCVkCQDMCAIFAmRoCQDMCAIFAmRpBQNuaWwFAWUEAmRrCgACZGcJAPwHBAUEdGhpcwIbY2xhaW1XeEJ1bGtJbnRlcm5hbFJFQURPTkxZCQDMCAIJAGQCBQJkYwABCQDMCAIFAmRkCQDMCAIFAmFzCQDMCAIFAmRqBQNuaWwFA25pbAMJAAECBQJkZwIJTGlzdFtBbnldBQJkZwkAAgEJAKwCAgkAAwEFAmRnAh4gY291bGRuJ3QgYmUgY2FzdCB0byBMaXN0W0FueV0DCQAAAgUCZGsFAmRrCQCUCgIFA25pbAUCZGsJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY2wBE2NsYWltV3hCdWxrUkVBRE9OTFkCAmRkAmFzBAJkagkA/AcEBQR0aGlzAhtjbGFpbVd4QnVsa0ludGVybmFsUkVBRE9OTFkJAMwIAgAACQDMCAIFAmRkCQDMCAIFAmFzCQDMCAIFA25pbAUDbmlsBQNuaWwJAJQKAgUDbmlsBQJkagJjbAEPY2xhaW1XeFJFQURPTkxZAgJhdAJhcwQCYlkJAQJhcgIFAmFzBQJhdAQCYnoJAQJhdQEFAmF0BAJjSwkBAmF2AgUCYXQFAmFzBAJicwkBAmF6AQUCYlkEAmJBCQECYXoBBQJiegQCY3QJAQFEAgUEdGhpcwUCY0sEAmJ4CQEBeQIFAmFYCQECYWMBBQJhdAQCYkMJARFAZXh0ck5hdGl2ZSgxMDUwKQIFAmFYCQECYWQBBQJieAQCZGwJAQFDAgUCYVkJAQJhbQAEAmJECQEBQwIFAmFZCQECYW8ABAJkbQMJAGYCBQJiRAUGaGVpZ2h0AAAJAGUCBQZoZWlnaHQFAmJEBAJkbgkAawMJAGgCBQJkbAUCZG0FAmJDBQFmBAJkbwkAawMFAmRuBQJicwUCYkEEAmRwCQECYlUEBQJhdAUCYXMFAmJ4AAAEAmNlCAUCZHACXzEEAmNyCAUCZHACXzIEAmJUCAUCZHACXzMEAmN1CQCYAwEJAMwIAgkAuAICBQJjZQUCY3QJAMwIAgUBZwUDbmlsBAJkcQkBAWwBCQD8BwQFAmFaAhRjbGFpbVd4Qm9vc3RSRUFET05MWQkAzAgCBQJhdAkAzAgCBQJhcwUDbmlsBQNuaWwEAmNTCQCWAwEJAMwIAgkBAXABCQCRAwIFAmRxAAAJAMwIAgAABQNuaWwEAmRyCQEBcgEJAJEDAgUCZHEAAQQCY1QFAmN1BAJjVQkAmQMBCQDMCAIJALkCAgUCY1QJALYCAQACCQDMCAIJALYCAQUCY1MFA25pbAQCY1YJALcCAgUCY1QFAmNVCQCUCgIFA25pbAkAuQkCCQDMCAICDiVzJXMlZCVkJWQlZCVzCQDMCAIFAmF0CQDMCAIFAmFzCQDMCAIJAKYDAQUCY1YJAMwIAgkApgMBBQJjdAkAzAgCCQCmAwEFAmNUCQDMCAIJAKYDAQUCY1UJAMwIAgIEc29vbgUDbmlsBQFlAmNsARRzdGFrZWRCeVVzZXJSRUFET05MWQICYXQCYXMEAmJzCQELdmFsdWVPckVsc2UCCQCfCAEJAQJhcgIFAmFzBQJhdAAACQCUCgIFA25pbAUCYnMCY2wBEnVzZXJzTGlzdFRyYXZlcnNhbAECYUIEAmN4AwkAAAIJANgEAQgIBQJjbAZjYWxsZXIFYnl0ZXMJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBAU0AAgAGCQECY20BBQJjbAMJAAACBQJjeAUCY3gEAmJlCQECYmMBBQJhQgQCZHMJAKIIAQkBAmJiAQUCYUIEAmJrCQCiCAEJAQJiZAEFAmJlBAFuBQJkcwMJAAECBQFuAgRVbml0BAJkdAUCYmsDCQABAgUCZHQCBFVuaXQJAJQKAgUDbmlsBwMJAAECBQJkdAIGU3RyaW5nBAJkdQUCZHQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQECYmIBBQJhQgUCZHUFA25pbAYJAAIBAgtNYXRjaCBlcnJvcgMJAAECBQFuAgZTdHJpbmcEAmFEBQFuBAJjdAkBAUQCBQR0aGlzCQECYXYCBQJhQgUCYUQEAmNwCQEBeQIFAmFYCQECYWMBBQJhQgQCY2UICQECYlUEBQJhQgUCYUQFAmNwAAACXzEEAmN1CQC4AgIFAmNlBQJjdAQCY3YDCQC/AgIFAmN1BQFnCQD8BwQFBHRoaXMCD2NsYWltV3hJTlRFUk5BTAkAzAgCBQJhQgkAzAgCBQJhRAUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCY3YFAmN2BAJkdgkAoggBCQECYmkCBQJiZQUCYUQEAmR0BQJkdgMJAAECBQJkdAIEVW5pdAkAlAoCCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiYgEFAmFCBQNuaWwHAwkAAQIFAmR0AgZTdHJpbmcEAmR3BQJkdAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiYgEFAmFCBQJkdwUDbmlsBgkAAgECC01hdGNoIGVycm9yCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQILTWF0Y2ggZXJyb3IJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY2wBDm9uTW9kaWZ5V2VpZ2h0AgJhdAJieAMJAQIhPQIIBQJjbAZjYWxsZXIFAmFYCQACAQIScGVybWlzc2lvbnMgZGVuaWVkBAJkeAkBAmJ3AwUCYXQFAmJ4AAAEAmJ1CAUCZHgCXzEEAmJXCAUCZHgCXzIEAmJYCAUCZHgCXzMFAmJXAQJkeQECZHoABAJkQQQBbgkBAmNoAAMJAAECBQFuAgpCeXRlVmVjdG9yBAJjbgUBbgUCY24DCQABAgUBbgIEVW5pdAgFAmR5D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yCQD0AwMIBQJkeQlib2R5Qnl0ZXMJAJEDAggFAmR5BnByb29mcwAABQJkQc9gSPk=",
    "chainId": 84,
    "height": 2401539,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3s5i5VQ7FQoQWcBz3K5KM7jB35NAPaTcYBK6WnEgSoMY
Next: 3ci8vhJ7Ka25hGXxocPCTygMu4fhUtmvUvP9kJH5ixqs

Diff: 

OldNewDifferences
420420 }
421421 
422422 
423+func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
424+    let userAddressStr = toString(userAddress)
425+    let lpAssetIdStr = toBase58String(lpAssetId)
426+    let poolAddressStr = toString(poolAddress)
427+    let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
428+    let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
429+    let stakedByUser = readStaked(stakedByUserKEY)
430+    let stakedTotal = readStaked(stakedTotalKEY)
431+    let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
432+    let listName = getUsersListName(lpAssetIdStr)
433+    let listActions = if (if (containsNode(listName, userAddressStr))
434+        then (amount == stakedByUser)
435+        else false)
436+        then deleteNodeActions(listName, userAddressStr)
437+        else nil
438+    let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetIdStr, userAddressStr))
439+    let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
440+    let availableToClaim = (wxToClaimUserNew - claimedByUser)
441+    let r = if ((availableToClaim > zeroBigInt))
442+        then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
443+        else unit
444+    if ((r == r))
445+        then if ((amount > stakedByUser))
446+            then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
447+            else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
448+        else throw("Strict value is not equal to itself.")
449+    }
450+
451+
423452 @Callable(i)
424453 func constructor (factoryAddressStr) = {
425454     let checkCaller = mustManager(i)
494523         let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
495524         let stakedByUser = readStaked(stakedByUserKEY)
496525         let stakedTotal = readStaked(stakedTotalKEY)
497-        let $t01930819425 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
498-        let wxToClaimUserNew = $t01930819425._1
499-        let integralSTATE = $t01930819425._2
500-        let debug = $t01930819425._3
526+        let $t02108821205 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
527+        let wxToClaimUserNew = $t02108821205._1
528+        let integralSTATE = $t02108821205._2
529+        let debug = $t02108821205._3
501530         let listName = getUsersListName(lpAssetIdStr)
502531         let listActions = if (containsNode(listName, userAddressStr))
503532             then nil
511540 func unstake (lpAssetIdStr,amount) = {
512541     let lpAssetId = fromBase58String(lpAssetIdStr)
513542     let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
514-    let poolAddon = valueOrElse(getString(addressFromStringValue(poolAddressStr), keyAddonAddr()), poolAddressStr)
543+    let poolAddress = addressFromStringValue(poolAddressStr)
544+    let poolAddon = valueOrElse(getString(poolAddress, keyAddonAddr()), poolAddressStr)
515545     let callerStr = toString(i.caller)
516-    let userAddressStr = if (if ((callerStr == poolAddressStr))
546+    let userAddress = if (if ((callerStr == poolAddressStr))
517547         then true
518548         else (callerStr == poolAddon))
519-        then toString(i.originCaller)
520-        else callerStr
521-    let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
522-    let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
523-    let stakedByUser = readStaked(stakedByUserKEY)
524-    let stakedTotal = readStaked(stakedTotalKEY)
525-    let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
526-    let listName = getUsersListName(lpAssetIdStr)
527-    let listActions = if (if (containsNode(listName, userAddressStr))
528-        then (amount == stakedByUser)
529-        else false)
530-        then deleteNodeActions(listName, userAddressStr)
531-        else nil
532-    let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetIdStr, userAddressStr))
533-    let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
534-    let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddress, 0)._1
535-    let availableToClaim = (wxToClaimUserNew - claimedByUser)
536-    let r = if ((availableToClaim > zeroBigInt))
537-        then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
538-        else unit
539-    if ((r == r))
540-        then if ((amount > stakedByUser))
541-            then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
542-            else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
549+        then i.originCaller
550+        else i.caller
551+    let lpAssetRecipientAddress = i.caller
552+    unstakeActions(i, lpAssetId, poolAddress, userAddress, lpAssetRecipientAddress, amount)
553+    }
554+
555+
556+
557+@Callable(i)
558+func unstakeINTERNAL (lpAssetId,amount,userAddress,lpAssetRecipientAddress) = {
559+    let lpAssetIdStr = toBase58String(lpAssetId)
560+    let poolAddress = addressFromStringValue(valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr)))
561+    let checkCaller = if ((i.caller == poolAddress))
562+        then true
563+        else permissionDeniedError
564+    if ((checkCaller == checkCaller))
565+        then unstakeActions(i, lpAssetId, poolAddress, Address(userAddress), Address(lpAssetRecipientAddress), amount)
543566         else throw("Strict value is not equal to itself.")
544567     }
545568 
569592             let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
570593             let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
571594             let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
572-            let $t02326323375 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
573-            let wxToClaimUserNew = $t02326323375._1
574-            let integralSTATE = $t02326323375._2
575-            let debug = $t02326323375._3
595+            let $t02423624348 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
596+            let wxToClaimUserNew = $t02423624348._1
597+            let integralSTATE = $t02423624348._2
598+            let debug = $t02423624348._3
576599             let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
577600             if ((zeroBigInt >= availableToClaim))
578601                 then throw("nothing to claim")
651674         else (height - emissionStartBlock)
652675     let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
653676     let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
654-    let $t02692827040 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
655-    let wxToClaimUserNew = $t02692827040._1
656-    let integralSTATE = $t02692827040._2
657-    let debug = $t02692827040._3
677+    let $t02790128013 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
678+    let wxToClaimUserNew = $t02790128013._1
679+    let integralSTATE = $t02790128013._2
680+    let debug = $t02790128013._3
658681     let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
659682     let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
660683     let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
729752 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
730753     then throw("permissions denied")
731754     else {
732-        let $t02954829658 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
733-        let wxPerLpIntegralNew = $t02954829658._1
734-        let poolIntegralSTATE = $t02954829658._2
735-        let poolDEBUG = $t02954829658._3
755+        let $t03052130631 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
756+        let wxPerLpIntegralNew = $t03052130631._1
757+        let poolIntegralSTATE = $t03052130631._2
758+        let poolDEBUG = $t03052130631._3
736759         poolIntegralSTATE
737760         }
738761 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SCALE8 = 8
55 
66 let MULT8 = 100000000
77 
88 let SCALE18 = 18
99 
1010 let MULT18 = toBigInt(1000000000000000000)
1111 
1212 let SEP = "__"
1313 
1414 let POOLWEIGHTMULT = MULT8
1515 
1616 let zeroBigInt = toBigInt(0)
1717 
1818 let oneBigInt = toBigInt(1)
1919 
2020 func wrapErr (msg) = makeString(["staking.ride:", toString(this), msg], " ")
2121 
2222 
2323 func throwErr (msg) = throw(wrapErr(msg))
2424 
2525 
2626 func asAnyList (val) = match val {
2727     case valAnyLyst: List[Any] => 
2828         valAnyLyst
2929     case _ => 
3030         throw("fail to cast into List[Any]")
3131 }
3232 
3333 
3434 func asInt (val) = match val {
3535     case valInt: Int => 
3636         valInt
3737     case _ => 
3838         throw("fail to cast into Int")
3939 }
4040 
4141 
4242 func asString (val) = match val {
4343     case valStr: String => 
4444         valStr
4545     case _ => 
4646         throw("fail to cast into Int")
4747 }
4848 
4949 
5050 func asByteVector (val) = match val {
5151     case valBin: ByteVector => 
5252         valBin
5353     case _ => 
5454         throw("fail to cast into Int")
5555 }
5656 
5757 
5858 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (("mandatory this." + key) + " is not defined"))
5959 
6060 
6161 func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
6262 
6363 
6464 func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
6565 
6666 
6767 func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
6868 
6969 
7070 func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
7171 
7272 
7373 func getBigIntFromStringOrZero (address,key) = value(parseBigInt(valueOrElse(getString(address, key), "0")))
7474 
7575 
7676 func getBigIntFromStringOrDefault (address,key,defaultVal) = match getString(address, key) {
7777     case s: String => 
7878         value(parseBigInt(s))
7979     case _: Unit => 
8080         defaultVal
8181     case _ => 
8282         throw("Match error")
8383 }
8484 
8585 
8686 func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
8787 
8888 
8989 func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
9090 
9191 
9292 func keyFactoryAddress () = "%s%s__config__factoryAddress"
9393 
9494 
9595 func keyVotingEmissionContract () = "%s__votingEmissionContract"
9696 
9797 
9898 let IdxFactoryCfgStakingDapp = 1
9999 
100100 let IdxFactoryCfgBoostingDapp = 2
101101 
102102 let IdxFactoryCfgIdoDapp = 3
103103 
104104 let IdxFactoryCfgTeamDapp = 4
105105 
106106 let IdxFactoryCfgEmissionDapp = 5
107107 
108108 let IdxFactoryCfgRestDapp = 6
109109 
110110 let IdxFactoryCfgSlippageDapp = 7
111111 
112112 func keyFactoryCfg () = "%s__factoryConfig"
113113 
114114 
115115 func keyManagerPublicKey () = "%s__managerPublicKey"
116116 
117117 
118118 func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
119119 
120120 
121121 func keyStablePoolAddonAddr () = "%s__stablePoolAddonAddr"
122122 
123123 
124124 func keyAddonAddr () = "%s__addonAddr"
125125 
126126 
127127 func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
128128 
129129 
130130 func keyFactoryLpList () = "%s__lpTokensList"
131131 
132132 
133133 func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
134134 
135135 
136136 func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
137137 
138138 
139139 func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
140140 
141141 
142142 func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
143143 
144144 
145145 func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
146146 
147147 
148148 func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
149149 
150150 
151151 func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
152152 
153153 
154154 func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
155155 
156156 
157157 func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
158158 
159159 
160160 func keyEmissionStartBlock () = "%s%s__emission__startBlock"
161161 
162162 
163163 func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
164164 
165165 
166166 func keyEmissionEndBlock () = "%s%s__emission__endBlock"
167167 
168168 
169169 func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
170170 
171171 
172172 func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
173173 
174174 
175175 func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
176176 
177177 
178178 func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
179179 
180180 
181181 func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
182182 
183183 
184184 func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed__total", lpAssetIdStr], SEP)
185185 
186186 
187187 func readStaked (key) = valueOrElse(getInteger(this, key), 0)
188188 
189189 
190190 func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
191191 
192192 
193193 func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
194194 
195195 
196196 func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
197197 
198198 
199199 func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
200200 
201201 
202202 func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
203203 
204204 
205205 func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
206206 
207207 
208208 func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
209209 
210210 
211211 func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
212212 
213213 
214214 func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
215215 
216216 
217217 func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
218218 
219219 
220220 func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
221221 
222222 
223223 func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
224224 
225225 
226226 func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
227227 
228228 
229229 func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
230230 
231231 
232232 func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
233233 
234234 
235235 func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
236236 
237237 
238238 let factoryAddress = getStringOrFail(this, keyFactoryAddress())
239239 
240240 let factoryContract = addressFromStringValue(factoryAddress)
241241 
242242 let factoryCfg = readFactoryCfgOrFail(factoryContract)
243243 
244244 let emissionContract = getEmissionAddressOrFail(factoryCfg)
245245 
246246 let boostingContract = getBoostingAddressOrFail(factoryCfg)
247247 
248248 let lpStakingPoolsContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(makeString(["%s", "lpStakingPoolsContract"], SEP)), wrapErr("lp_staking_pools contract address is undefined"))), wrapErr("invalid lp_staking_pools contract address"))
249249 
250250 func keyNextUser (lpAssetId) = makeString(["%s%s", lpAssetId, "nextUser"], SEP)
251251 
252252 
253253 func getUsersListName (lpAssetId) = makeString(["users", lpAssetId], SEP)
254254 
255255 
256256 func keyListHead (listName) = makeString(["%s%s%s", listName, "head"], SEP)
257257 
258258 
259259 func keyListSize (listName) = makeString(["%s%s%s", listName, "size"], SEP)
260260 
261261 
262262 func keyListPrev (listName,id) = makeString(["%s%s%s%s", listName, id, "prev"], SEP)
263263 
264264 
265265 func keyListNext (listName,id) = makeString(["%s%s%s%s", listName, id, "next"], SEP)
266266 
267267 
268268 func containsNode (listName,id) = {
269269     let headOrUnit = getString(this, keyListHead(listName))
270270     let prevOrUnit = getString(this, keyListPrev(listName, id))
271271     let nextOrUnit = getString(this, keyListNext(listName, id))
272272     if (if ((id == valueOrElse(headOrUnit, "")))
273273         then true
274274         else (prevOrUnit != unit))
275275         then true
276276         else (nextOrUnit != unit)
277277     }
278278 
279279 
280280 func insertNodeActions (listName,id) = {
281281     let headOrUnit = getString(this, keyListHead(listName))
282282     let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
283283     let checkNode = if (!(containsNode(listName, id)))
284284         then true
285285         else throw("Node exists")
286286     if ((checkNode == checkNode))
287287         then (([IntegerEntry(keyListSize(listName), (listSize + 1))] ++ (if ((headOrUnit != unit))
288288             then [StringEntry(keyListNext(listName, id), value(headOrUnit)), StringEntry(keyListPrev(listName, value(headOrUnit)), id)]
289289             else nil)) ++ [StringEntry(keyListHead(listName), id)])
290290         else throw("Strict value is not equal to itself.")
291291     }
292292 
293293 
294294 func deleteNodeActions (listName,id) = {
295295     let headOrUnit = getString(this, keyListHead(listName))
296296     let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
297297     let prevOrUnit = getString(this, keyListPrev(listName, id))
298298     let nextOrUnit = getString(this, keyListNext(listName, id))
299299     ([IntegerEntry(keyListSize(listName), (listSize - 1))] ++ (if (if ((prevOrUnit != unit))
300300         then (nextOrUnit != unit)
301301         else false)
302302         then [StringEntry(keyListNext(listName, value(prevOrUnit)), value(nextOrUnit)), StringEntry(keyListPrev(listName, value(nextOrUnit)), value(prevOrUnit)), DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, id))]
303303         else if ((nextOrUnit != unit))
304304             then [StringEntry(keyListHead(listName), value(nextOrUnit)), DeleteEntry(keyListNext(listName, id)), DeleteEntry(keyListPrev(listName, value(nextOrUnit)))]
305305             else if ((prevOrUnit != unit))
306306                 then [DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, value(prevOrUnit)))]
307307                 else if ((id == valueOrElse(headOrUnit, "")))
308308                     then [DeleteEntry(keyListHead(listName))]
309309                     else throw(((("invalid node: " + listName) + ".") + id))))
310310     }
311311 
312312 
313313 func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
314314     then (stakedByUser > zeroBigInt)
315315     else false)
316316     then zeroBigInt
317317     else if ((stakedByUser == zeroBigInt))
318318         then wxPerLpIntegralNew
319319         else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
320320             then (stakedByUser > zeroBigInt)
321321             else false)
322322             then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
323323             else throw("calcWxPerLpIntegralUserLast: unexpected state")
324324 
325325 
326326 func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
327327     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
328328     let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
329329     let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
330330         then oneBigInt
331331         else stakedTotal
332332     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
333333     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
334334     let MULT3 = 1000
335335     let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
336336     let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * 3))
337337     let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
338338     let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
339339     let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
340340     let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
341341     let wxPerLpIntegral = getBigIntFromStringOrZero(this, wxPerLpIntegralKEY)
342342     let wxPerLpOrZeroX3 = 0
343343     let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
344344     let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
345345         then toBigInt(wxPerLpOrZeroX3)
346346         else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
347347     let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
348348     let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
349349         then oneBigInt
350350         else stakedTotalNew
351351     let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLpX3 * toBigInt(dh)))
352352     let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
353353     let wxPerLpIntegralLastUpdHeightNew = height
354354     let debug = makeString([toString(wxPerLpIntegralNew), toString(dh), toString(wxPerLpX3), toString(stakedTotal), toString(poolWxEmissionPerBlockX3), toString(wxEmissionPerBlockX3), toString(poolWeight)], "::")
355355     $Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
356356     }
357357 
358358 
359359 func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
360360     let $t01475014872 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
361361     let wxPerLpIntegralNew = $t01475014872._1
362362     let poolIntegralSTATE = $t01475014872._2
363363     let poolDEBUG = $t01475014872._3
364364     let MULT3 = 1000
365365     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
366366     let stakedByUser = readStaked(stakedByUserKEY)
367367     let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
368368     let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
369369     let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
370370     let wxToClaimUser = getBigIntFromStringOrZero(this, wxToClaimUserKEY)
371371     let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
372372     let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
373373     let MULT11 = (MULT8 * MULT3)
374374     let wxToClaimUserNew = max([(wxToClaimUser + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11))), zeroBigInt])
375375     let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
376376     let wxPerLpIntegralUserLastUpdHeightNew = height
377377     let debug = makeString([toString(wxToClaimUser), toString(wxPerLpIntegralUserLast), toString(stakedByUser), poolDEBUG, toString(height)], "::")
378378     $Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
379379     }
380380 
381381 
382382 func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
383383     case s: String => 
384384         fromBase58String(s)
385385     case _: Unit => 
386386         unit
387387     case _ => 
388388         throw("Match error")
389389 }
390390 
391391 
392392 func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
393393     case s: String => 
394394         fromBase58String(s)
395395     case _: Unit => 
396396         unit
397397     case _ => 
398398         throw("Match error")
399399 }
400400 
401401 
402402 let permissionDeniedError = throw("Permission denied")
403403 
404404 func mustThis (i) = if ((i.caller == this))
405405     then true
406406     else permissionDeniedError
407407 
408408 
409409 func mustManager (i) = match managerPublicKeyOrUnit() {
410410     case pk: ByteVector => 
411411         if ((i.callerPublicKey == pk))
412412             then true
413413             else permissionDeniedError
414414     case _: Unit => 
415415         if ((i.caller == this))
416416             then true
417417             else permissionDeniedError
418418     case _ => 
419419         throw("Match error")
420420 }
421421 
422422 
423+func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
424+    let userAddressStr = toString(userAddress)
425+    let lpAssetIdStr = toBase58String(lpAssetId)
426+    let poolAddressStr = toString(poolAddress)
427+    let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
428+    let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
429+    let stakedByUser = readStaked(stakedByUserKEY)
430+    let stakedTotal = readStaked(stakedTotalKEY)
431+    let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
432+    let listName = getUsersListName(lpAssetIdStr)
433+    let listActions = if (if (containsNode(listName, userAddressStr))
434+        then (amount == stakedByUser)
435+        else false)
436+        then deleteNodeActions(listName, userAddressStr)
437+        else nil
438+    let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetIdStr, userAddressStr))
439+    let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
440+    let availableToClaim = (wxToClaimUserNew - claimedByUser)
441+    let r = if ((availableToClaim > zeroBigInt))
442+        then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
443+        else unit
444+    if ((r == r))
445+        then if ((amount > stakedByUser))
446+            then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
447+            else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
448+        else throw("Strict value is not equal to itself.")
449+    }
450+
451+
423452 @Callable(i)
424453 func constructor (factoryAddressStr) = {
425454     let checkCaller = mustManager(i)
426455     if ((checkCaller == checkCaller))
427456         then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
428457         else throw("Strict value is not equal to itself.")
429458     }
430459 
431460 
432461 
433462 @Callable(i)
434463 func constructorV2 (votingEmissionContract) = {
435464     let cheks = [mustManager(i), if ((addressFromString(votingEmissionContract) != unit))
436465         then true
437466         else "invalid voting emission contract address"]
438467     if ((cheks == cheks))
439468         then [StringEntry(keyVotingEmissionContract(), votingEmissionContract)]
440469         else throw("Strict value is not equal to itself.")
441470     }
442471 
443472 
444473 
445474 @Callable(i)
446475 func setManager (pendingManagerPublicKey) = {
447476     let checkCaller = mustManager(i)
448477     if ((checkCaller == checkCaller))
449478         then {
450479             let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
451480             if ((checkManagerPublicKey == checkManagerPublicKey))
452481                 then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
453482                 else throw("Strict value is not equal to itself.")
454483             }
455484         else throw("Strict value is not equal to itself.")
456485     }
457486 
458487 
459488 
460489 @Callable(i)
461490 func confirmManager () = {
462491     let pm = pendingManagerPublicKeyOrUnit()
463492     let hasPM = if (isDefined(pm))
464493         then true
465494         else throw("No pending manager")
466495     if ((hasPM == hasPM))
467496         then {
468497             let checkPM = if ((i.callerPublicKey == value(pm)))
469498                 then true
470499                 else throw("You are not pending manager")
471500             if ((checkPM == checkPM))
472501                 then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
473502                 else throw("Strict value is not equal to itself.")
474503             }
475504         else throw("Strict value is not equal to itself.")
476505     }
477506 
478507 
479508 
480509 @Callable(i)
481510 func stake () = if ((size(i.payments) != 1))
482511     then throw("invalid payment - exact one payment must be attached")
483512     else {
484513         let pmt = i.payments[0]
485514         let lpAssetId = value(pmt.assetId)
486515         let lpAssetIdStr = toBase58String(lpAssetId)
487516         let amount = pmt.amount
488517         let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
489518         let callerStr = toString(i.caller)
490519         let userAddressStr = if ((callerStr == poolAddressStr))
491520             then toString(i.originCaller)
492521             else callerStr
493522         let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
494523         let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
495524         let stakedByUser = readStaked(stakedByUserKEY)
496525         let stakedTotal = readStaked(stakedTotalKEY)
497-        let $t01930819425 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
498-        let wxToClaimUserNew = $t01930819425._1
499-        let integralSTATE = $t01930819425._2
500-        let debug = $t01930819425._3
526+        let $t02108821205 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
527+        let wxToClaimUserNew = $t02108821205._1
528+        let integralSTATE = $t02108821205._2
529+        let debug = $t02108821205._3
501530         let listName = getUsersListName(lpAssetIdStr)
502531         let listActions = if (containsNode(listName, userAddressStr))
503532             then nil
504533             else insertNodeActions(listName, userAddressStr)
505534         (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
506535         }
507536 
508537 
509538 
510539 @Callable(i)
511540 func unstake (lpAssetIdStr,amount) = {
512541     let lpAssetId = fromBase58String(lpAssetIdStr)
513542     let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
514-    let poolAddon = valueOrElse(getString(addressFromStringValue(poolAddressStr), keyAddonAddr()), poolAddressStr)
543+    let poolAddress = addressFromStringValue(poolAddressStr)
544+    let poolAddon = valueOrElse(getString(poolAddress, keyAddonAddr()), poolAddressStr)
515545     let callerStr = toString(i.caller)
516-    let userAddressStr = if (if ((callerStr == poolAddressStr))
546+    let userAddress = if (if ((callerStr == poolAddressStr))
517547         then true
518548         else (callerStr == poolAddon))
519-        then toString(i.originCaller)
520-        else callerStr
521-    let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
522-    let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
523-    let stakedByUser = readStaked(stakedByUserKEY)
524-    let stakedTotal = readStaked(stakedTotalKEY)
525-    let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
526-    let listName = getUsersListName(lpAssetIdStr)
527-    let listActions = if (if (containsNode(listName, userAddressStr))
528-        then (amount == stakedByUser)
529-        else false)
530-        then deleteNodeActions(listName, userAddressStr)
531-        else nil
532-    let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetIdStr, userAddressStr))
533-    let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
534-    let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddress, 0)._1
535-    let availableToClaim = (wxToClaimUserNew - claimedByUser)
536-    let r = if ((availableToClaim > zeroBigInt))
537-        then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
538-        else unit
539-    if ((r == r))
540-        then if ((amount > stakedByUser))
541-            then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
542-            else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
549+        then i.originCaller
550+        else i.caller
551+    let lpAssetRecipientAddress = i.caller
552+    unstakeActions(i, lpAssetId, poolAddress, userAddress, lpAssetRecipientAddress, amount)
553+    }
554+
555+
556+
557+@Callable(i)
558+func unstakeINTERNAL (lpAssetId,amount,userAddress,lpAssetRecipientAddress) = {
559+    let lpAssetIdStr = toBase58String(lpAssetId)
560+    let poolAddress = addressFromStringValue(valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr)))
561+    let checkCaller = if ((i.caller == poolAddress))
562+        then true
563+        else permissionDeniedError
564+    if ((checkCaller == checkCaller))
565+        then unstakeActions(i, lpAssetId, poolAddress, Address(userAddress), Address(lpAssetRecipientAddress), amount)
543566         else throw("Strict value is not equal to itself.")
544567     }
545568 
546569 
547570 
548571 @Callable(i)
549572 func claimWx (lpAssetIdStr) = {
550573     let userAddressStr = toString(i.caller)
551574     let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
552575     $Tuple2(nil, result)
553576     }
554577 
555578 
556579 
557580 @Callable(i)
558581 func claimWxINTERNAL (lpAssetIdStr,userAddressStr) = {
559582     let checkCaller = mustThis(i)
560583     if ((checkCaller == checkCaller))
561584         then {
562585             let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), "claimWxINTERNAL: invalid user address")
563586             let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
564587             let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
565588             let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
566589             let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
567590             let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
568591             let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
569592             let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
570593             let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
571594             let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
572-            let $t02326323375 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
573-            let wxToClaimUserNew = $t02326323375._1
574-            let integralSTATE = $t02326323375._2
575-            let debug = $t02326323375._3
595+            let $t02423624348 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
596+            let wxToClaimUserNew = $t02423624348._1
597+            let integralSTATE = $t02423624348._2
598+            let debug = $t02423624348._3
576599             let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
577600             if ((zeroBigInt >= availableToClaim))
578601                 then throw("nothing to claim")
579602                 else {
580603                     let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
581604                     let minRewardPart = availableToClaim
582605                     let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
583606                     let totalReward = (minRewardPart + boostRewardPart)
584607                     let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
585608                     let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
586609                     if ((emitBoost == emitBoost))
587610                         then {
588611                             let claimedByUserValue = (claimedByUser + availableToClaim)
589612                             let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
590613                             let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserMinReward + minRewardPart)
591614                             let claimedTotalPlusAvailableToClaim = (claimedByUserMinReward + minRewardPart)
592615                             $Tuple2([StringEntry(claimedByUserKEY, toString(claimedByUserValue)), StringEntry(claimedByUserMinRewardKEY, toString(claimedByUserMinRewardPlusPart)), StringEntry(claimedByUserBoostRewardKEY, toString(claimedByUserBoostRewardPlusBoostRewardPart)), StringEntry(claimedTotalKEY, toString(claimedTotalPlusAvailableToClaim)), ScriptTransfer(userAddress, toInt(minRewardPart), wxAssetId), ScriptTransfer(userAddress, toInt(boostRewardPart), wxAssetId), OperationHistoryEntry("claim", userAddressStr, lpAssetIdStr, toInt(availableToClaim), i.transactionId)], toInt(totalReward))
593616                             }
594617                         else throw("Strict value is not equal to itself.")
595618                     }
596619             }
597620         else throw("Strict value is not equal to itself.")
598621     }
599622 
600623 
601624 
602625 @Callable(i)
603626 func claimWxBulkInternalREADONLY (currentIter,lpAssetIds,userAddressStr,resAcc) = if ((currentIter == size(lpAssetIds)))
604627     then $Tuple2(nil, resAcc)
605628     else {
606629         let lpAssetId = lpAssetIds[currentIter]
607630         let info = split({
608631             let @ = invoke(this, "claimWxREADONLY", [lpAssetId, userAddressStr], nil)
609632             if ($isInstanceOf(@, "String"))
610633                 then @
611634                 else throw(($getType(@) + " couldn't be cast to String"))
612635             }, SEP)
613636         let unclaimed = info[3]
614637         let claimed = info[4]
615638         let res = (resAcc :+ makeString(["%d%d", unclaimed, claimed], SEP))
616639         let inv = {
617640             let @ = invoke(this, "claimWxBulkInternalREADONLY", [(currentIter + 1), lpAssetIds, userAddressStr, res], nil)
618641             if ($isInstanceOf(@, "List[Any]"))
619642                 then @
620643                 else throw(($getType(@) + " couldn't be cast to List[Any]"))
621644             }
622645         if ((inv == inv))
623646             then $Tuple2(nil, inv)
624647             else throw("Strict value is not equal to itself.")
625648         }
626649 
627650 
628651 
629652 @Callable(i)
630653 func claimWxBulkREADONLY (lpAssetIds,userAddressStr) = {
631654     let res = invoke(this, "claimWxBulkInternalREADONLY", [0, lpAssetIds, userAddressStr, nil], nil)
632655     $Tuple2(nil, res)
633656     }
634657 
635658 
636659 
637660 @Callable(i)
638661 func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
639662     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
640663     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
641664     let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
642665     let stakedByUser = readStaked(stakedByUserKEY)
643666     let stakedTotal = readStaked(stakedTotalKEY)
644667     let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
645668     let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
646669     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
647670     let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
648671     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
649672     let passedBlocks = if ((emissionStartBlock > height))
650673         then 0
651674         else (height - emissionStartBlock)
652675     let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
653676     let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
654-    let $t02692827040 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
655-    let wxToClaimUserNew = $t02692827040._1
656-    let integralSTATE = $t02692827040._2
657-    let debug = $t02692827040._3
677+    let $t02790128013 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
678+    let wxToClaimUserNew = $t02790128013._1
679+    let integralSTATE = $t02790128013._2
680+    let debug = $t02790128013._3
658681     let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
659682     let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
660683     let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
661684     let boostDebug = asString(boostInvResult[1])
662685     let minRewardPart = availableToClaim
663686     let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
664687     let totalReward = (minRewardPart + boostRewardPart)
665688     $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), "soon"], SEP))
666689     }
667690 
668691 
669692 
670693 @Callable(i)
671694 func stakedByUserREADONLY (lpAssetIdStr,userAddressStr) = {
672695     let stakedByUser = valueOrElse(getInteger(keyStakedByUser(userAddressStr, lpAssetIdStr)), 0)
673696     $Tuple2(nil, stakedByUser)
674697     }
675698 
676699 
677700 
678701 @Callable(i)
679702 func usersListTraversal (lpAssetId) = {
680703     let checkCaller = if ((toBase58String(i.caller.bytes) == valueOrElse(getString(this, keyVotingEmissionContract()), "")))
681704         then true
682705         else mustManager(i)
683706     if ((checkCaller == checkCaller))
684707         then {
685708             let listName = getUsersListName(lpAssetId)
686709             let userOrUnit = getString(keyNextUser(lpAssetId))
687710             let headOrUnit = getString(keyListHead(listName))
688711             match userOrUnit {
689712                 case _: Unit => 
690713                     match headOrUnit {
691714                         case _: Unit => 
692715                             $Tuple2(nil, false)
693716                         case head: String => 
694717                             $Tuple2([StringEntry(keyNextUser(lpAssetId), head)], true)
695718                         case _ => 
696719                             throw("Match error")
697720                     }
698721                 case userAddress: String => 
699722                     let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetId, userAddress))
700723                     let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
701724                     let wxToClaimUserNew = refreshINTEGRALS(lpAssetId, userAddress, poolAddress, 0)._1
702725                     let availableToClaim = (wxToClaimUserNew - claimedByUser)
703726                     let r = if ((availableToClaim > zeroBigInt))
704727                         then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress], nil)
705728                         else unit
706729                     if ((r == r))
707730                         then {
708731                             let nextUserOrUnit = getString(keyListNext(listName, userAddress))
709732                             match nextUserOrUnit {
710733                                 case _: Unit => 
711734                                     $Tuple2([DeleteEntry(keyNextUser(lpAssetId))], false)
712735                                 case nextUser: String => 
713736                                     $Tuple2([StringEntry(keyNextUser(lpAssetId), nextUser)], true)
714737                                 case _ => 
715738                                     throw("Match error")
716739                             }
717740                             }
718741                         else throw("Strict value is not equal to itself.")
719742                 case _ => 
720743                     throw("Match error")
721744             }
722745             }
723746         else throw("Strict value is not equal to itself.")
724747     }
725748 
726749 
727750 
728751 @Callable(i)
729752 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
730753     then throw("permissions denied")
731754     else {
732-        let $t02954829658 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
733-        let wxPerLpIntegralNew = $t02954829658._1
734-        let poolIntegralSTATE = $t02954829658._2
735-        let poolDEBUG = $t02954829658._3
755+        let $t03052130631 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
756+        let wxPerLpIntegralNew = $t03052130631._1
757+        let poolIntegralSTATE = $t03052130631._2
758+        let poolDEBUG = $t03052130631._3
736759         poolIntegralSTATE
737760         }
738761 
739762 
740763 @Verifier(tx)
741764 func verify () = {
742765     let targetPublicKey =     match managerPublicKeyOrUnit() {
743766         case pk: ByteVector => 
744767             pk
745768         case _: Unit => 
746769             tx.senderPublicKey
747770         case _ => 
748771             throw("Match error")
749772     }
750773     sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
751774     }
752775 
github/deemru/w8io/026f985 
93.04 ms ◑