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/fabc49c 
113.89 ms