tx · FiAPZWT3mqGXGSk3bxPBLk5jCTLnzvUabUv9pCnqxFH9

3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz:  -0.02400000 Waves

2023.05.19 15:30 [2584845] smart account 3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz > SELF 0.00000000 Waves

{ "type": 13, "id": "FiAPZWT3mqGXGSk3bxPBLk5jCTLnzvUabUv9pCnqxFH9", "fee": 2400000, "feeAssetId": null, "timestamp": 1684499470199, "version": 2, "chainId": 84, "sender": "3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz", "senderPublicKey": "D28XoueZWsMfm8Y5pa6C5ZFuYoWgre2Wm8tzJANJgMnq", "proofs": [ "475VMPFyCpRskXFDcXnRNsqoFk7Cgh2H4j9fWTPqc81VSdi4S13TrYbZUFum9znZRqDCA6VnFgCTYzLQsTPREtvK" ], "script": "base64:BgK/IAgCEgMKAQgSAwoBCBIAEgMKAQgSBAoCCAESBgoEAgECAhIDCgEIEgMKAQgSBQoDCAgEEgYKBAEYCBgSBAoCGAgSBAoCCAgSBAoCCAgSAwoBCBIDCgEIEgQKAggIIgZTQ0FMRTgiBU1VTFQzIgVNVUxUOCIHU0NBTEUxOCIGTVVMVDE4IgNTRVAiDlBPT0xXRUlHSFRNVUxUIgp6ZXJvQmlnSW50IglvbmVCaWdJbnQiB3dyYXBFcnIiA21zZyIIdGhyb3dFcnIiCWFzQW55TGlzdCIDdmFsIgckbWF0Y2gwIgp2YWxBbnlMeXN0IgVhc0ludCIGdmFsSW50Ighhc1N0cmluZyIGdmFsU3RyIgxhc0J5dGVWZWN0b3IiBnZhbEJpbiIPZ2V0U3RyaW5nT3JGYWlsIgdhZGRyZXNzIgNrZXkiGGdldFN0cmluZ0J5QWRkcmVzc09yRmFpbCIMZ2V0SW50T3JaZXJvIg9nZXRJbnRPckRlZmF1bHQiCmRlZmF1bHRWYWwiDGdldEludE9yRmFpbCIZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybyIcZ2V0QmlnSW50RnJvbVN0cmluZ09yRGVmYXVsdCIBcyIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiD3Jlc3VsdFNjYWxlTXVsdCIRa2V5RmFjdG9yeUFkZHJlc3MiGWtleVZvdGluZ0VtaXNzaW9uQ29udHJhY3QiGElkeEZhY3RvcnlDZmdTdGFraW5nRGFwcCIZSWR4RmFjdG9yeUNmZ0Jvb3N0aW5nRGFwcCIUSWR4RmFjdG9yeUNmZ0lkb0RhcHAiFUlkeEZhY3RvcnlDZmdUZWFtRGFwcCIZSWR4RmFjdG9yeUNmZ0VtaXNzaW9uRGFwcCIVSWR4RmFjdG9yeUNmZ1Jlc3REYXBwIhlJZHhGYWN0b3J5Q2ZnU2xpcHBhZ2VEYXBwIg1rZXlGYWN0b3J5Q2ZnIhNrZXlNYW5hZ2VyUHVibGljS2V5IhZrZXlNYW5hZ2VyVmF1bHRBZGRyZXNzIhprZXlGYWN0b3J5THAyQXNzZXRzTWFwcGluZyIKbHBBc3NldFN0ciIQa2V5RmFjdG9yeUxwTGlzdCIma2V5RmFjdG9yeUxwQXNzZXRUb1Bvb2xDb250cmFjdEFkZHJlc3MiFGtleUZhY3RvcnlQb29sV2VpZ2h0Ig9jb250cmFjdEFkZHJlc3MiCnJlYWRMcExpc3QiB2ZhY3RvcnkiFHJlYWRGYWN0b3J5Q2ZnT3JGYWlsIhhnZXRCb29zdGluZ0FkZHJlc3NPckZhaWwiCmZhY3RvcnlDZmciGGdldEVtaXNzaW9uQWRkcmVzc09yRmFpbCIXZ2V0U3Rha2luZ0FkZHJlc3NPckZhaWwiHGdldE1hbmFnZXJWYXVsdEFkZHJlc3NPclRoaXMiHmtleUVtaXNzaW9uUmF0ZVBlckJsb2NrQ3VycmVudCIha2V5RW1pc3Npb25SYXRlUGVyQmxvY2tNYXhDdXJyZW50IhVrZXlFbWlzc2lvblN0YXJ0QmxvY2siG2tleUVtaXNzaW9uRHVyYXRpb25JbkJsb2NrcyITa2V5RW1pc3Npb25FbmRCbG9jayIPa2V5U3Rha2VkQnlVc2VyIg51c2VyQWRkcmVzc1N0ciIMbHBBc3NldElkU3RyIg5rZXlTdGFrZWRUb3RhbCIQa2V5Q2xhaW1lZEJ5VXNlciIZa2V5Q2xhaW1lZEJ5VXNlck1pblJld2FyZCIba2V5Q2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkIg9rZXlDbGFpbWVkVG90YWwiCnJlYWRTdGFrZWQiFWtleUxhc3RUb3RhbExwQmFsYW5jZSIJbHBBc3NldElkIhRrZXlMYXN0VXNlckxwQmFsYW5jZSILdXNlckFkZHJlc3MiGWtleVRvdGFsTHBCYWxhbmNlSW50ZWdyYWwiGGtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbCIma2V5VG90YWxMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQiJWtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQiEmtleVd4UGVyTHBJbnRlZ3JhbCIfa2V5V3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodCIQa2V5V3hUb0NsYWltVXNlciIja2V5V3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQiCmtleVd4UGVyTHAiDWtleVd4UGVyTHBYMTgiGmtleVd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0IhlrZXlPcGVyYXRpb25IaXN0b3J5UmVjb3JkIgR0eXBlIgZ0eElkNTgiE2Zvcm1hdEhpc3RvcnlSZWNvcmQiBmFtb3VudCIVT3BlcmF0aW9uSGlzdG9yeUVudHJ5IgR0eElkIg5mYWN0b3J5QWRkcmVzcyIPZmFjdG9yeUNvbnRyYWN0IhBlbWlzc2lvbkNvbnRyYWN0IhBib29zdGluZ0NvbnRyYWN0Igpib29zdENvZWZmIgFAIhZscFN0YWtpbmdQb29sc0NvbnRyYWN0IgtrZXlOZXh0VXNlciIQZ2V0VXNlcnNMaXN0TmFtZSILa2V5TGlzdEhlYWQiCGxpc3ROYW1lIgtrZXlMaXN0U2l6ZSILa2V5TGlzdFByZXYiAmlkIgtrZXlMaXN0TmV4dCIMY29udGFpbnNOb2RlIgpoZWFkT3JVbml0IgpwcmV2T3JVbml0IgpuZXh0T3JVbml0IhFpbnNlcnROb2RlQWN0aW9ucyIIbGlzdFNpemUiCWNoZWNrTm9kZSIRZGVsZXRlTm9kZUFjdGlvbnMiG2NhbGNXeFBlckxwSW50ZWdyYWxVc2VyTGFzdCIMc3Rha2VkQnlVc2VyIiZ3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE9yWmVybyISd3hQZXJMcEludGVncmFsTmV3Ihp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdEtFWSIUcmVmcmVzaFBvb2xJTlRFR1JBTFMiDnBvb2xBZGRyZXNzU3RyIg1scERlbHRhQW1vdW50Ig5zdGFrZWRUb3RhbEtFWSILc3Rha2VkVG90YWwiEm5vblplcm9TdGFrZWRUb3RhbCIKcG9vbFdlaWdodCISZW1pc3Npb25TdGFydEJsb2NrIhR3eEVtaXNzaW9uUGVyQmxvY2tYMyIYcG9vbFd4RW1pc3Npb25QZXJCbG9ja1gzIhJ3eFBlckxwSW50ZWdyYWxLRVkiH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkiCnd4UGVyTHBLRVkiHHd4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHQiD3d4UGVyTHBJbnRlZ3JhbCIPd3hQZXJMcE9yWmVyb1gzIgJkaCIJd3hQZXJMcFgzIg5zdGFrZWRUb3RhbE5ldyIVbm9uWmVyb1N0YWtlZFRvdGFsTmV3Igx3eFBlckxwWDNOZXciH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHROZXciBWRlYnVnIhByZWZyZXNoSU5URUdSQUxTIg0kdDAxNDg3NTE0OTk3IhFwb29sSW50ZWdyYWxTVEFURSIJcG9vbERFQlVHIg9zdGFrZWRCeVVzZXJLRVkiEHd4VG9DbGFpbVVzZXJLRVkiI3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0S0VZIg13eFRvQ2xhaW1Vc2VyIhd3eFBlckxwSW50ZWdyYWxVc2VyTGFzdCIGTVVMVDExIhB3eFRvQ2xhaW1Vc2VyTmV3Ihp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdE5ldyIjd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHROZXciFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQiE21hbmFnZXJWYXVsdEFkZHJlc3MiFXBlcm1pc3Npb25EZW5pZWRFcnJvciIIbXVzdFRoaXMiAWkiC211c3RNYW5hZ2VyIgJwayIfZW5zdXJlVm90aW5nRW1pc3Npb25Jc0ZpbmFsaXplZCIWdm90aW5nRW1pc3Npb25Db250cmFjdCIkdm90aW5nRW1pc3Npb25GaW5hbGl6YXRpb25JblByb2dyZXNzIgxzdGFrZUFjdGlvbnMiC3Bvb2xBZGRyZXNzIh9jaGVja1ZvdGluZ0VtaXNzaW9uRmluYWxpemF0aW9uIhFyZWZyZXNoU3Rha2VkVm90ZSINJHQwMTg1OTkxODcxNiINaW50ZWdyYWxTVEFURSILbGlzdEFjdGlvbnMiDnVuc3Rha2VBY3Rpb25zIhdscEFzc2V0UmVjaXBpZW50QWRkcmVzcyIWY2xhaW1lZEJ5VXNlck1pblJld2FyZCIQYXZhaWxhYmxlVG9DbGFpbSIVdGhyb3dJZk5vdGhpbmdUb0NsYWltIgFyIhFmYWN0b3J5QWRkcmVzc1N0ciILY2hlY2tDYWxsZXIiBWNoZWtzIgNwbXQiCWNhbGxlclN0ciIGcmVzdWx0IhBjbGFpbWVkQnlVc2VyS0VZIg9jbGFpbWVkVG90YWxLRVkiGWNsYWltZWRCeVVzZXJNaW5SZXdhcmRLRVkiG2NsYWltZWRCeVVzZXJCb29zdFJld2FyZEtFWSINY2xhaW1lZEJ5VXNlciIYY2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkIgxjbGFpbWVkVG90YWwiDSR0MDI1OTg0MjYwOTYiEnd4QW1vdW50Qm9vc3RUb3RhbCINbWluUmV3YXJkUGFydCIPYm9vc3RSZXdhcmRQYXJ0Igt0b3RhbFJld2FyZCIJd3hBc3NldElkIgllbWl0Qm9vc3QiEmNsYWltZWRCeVVzZXJWYWx1ZSIeY2xhaW1lZEJ5VXNlck1pblJld2FyZFBsdXNQYXJ0IitjbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmRQbHVzQm9vc3RSZXdhcmRQYXJ0IiBjbGFpbWVkVG90YWxQbHVzQXZhaWxhYmxlVG9DbGFpbSILY3VycmVudEl0ZXIiCmxwQXNzZXRJZHMiBnJlc0FjYyIEaW5mbyIJdW5jbGFpbWVkIgdjbGFpbWVkIhF1c2VyVm90ZUZpbmFsaXplZCIDcmVzIgNpbnYiEnd4RW1pc3Npb25QZXJCbG9jayIMcGFzc2VkQmxvY2tzIg5wb29sV3hFbWlzc2lvbiIMdXNlcld4UmV3YXJkIg0kdDAzMDE0NzMwMjU5Ig5ib29zdEludlJlc3VsdCIKYm9vc3REZWJ1ZyIKdXNlck9yVW5pdCIHJG1hdGNoMSIEaGVhZCIObmV4dFVzZXJPclVuaXQiCG5leHRVc2VyIg0kdDAzMzA0OTMzMTU5IgJ0eCIGdmVyaWZ5Ig90YXJnZXRQdWJsaWNLZXlkAAFhAAgAAWIA6AcAAWMAgMLXLwABZAASAAFlCQC2AgEAgICQu7rWrfANAAFmAgJfXwABZwUBYwABaAkAtgIBAAAAAWkJALYCAQABAQFqAQFrCQC5CQIJAMwIAgINc3Rha2luZy5yaWRlOgkAzAgCCQClCAEFBHRoaXMJAMwIAgUBawUDbmlsAgEgAQFsAQFrCQACAQkBAWoBBQFrAQFtAQFuBAFvBQFuAwkAAQIFAW8CCUxpc3RbQW55XQQBcAUBbwUBcAkBAWwBAhtmYWlsIHRvIGNhc3QgaW50byBMaXN0W0FueV0BAXEBAW4EAW8FAW4DCQABAgUBbwIDSW50BAFyBQFvBQFyCQEBbAECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEBcwEBbgQBbwUBbgMJAAECBQFvAgZTdHJpbmcEAXQFAW8FAXQJAQFsAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQF1AQFuBAFvBQFuAwkAAQIFAW8CCkJ5dGVWZWN0b3IEAXYFAW8FAXYJAQFsAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQF3AgF4AXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQF4BQF5CQEBagEJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FAXkCDyBpcyBub3QgZGVmaW5lZAEBegIBeAF5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUBeAUBeQkBAWoBCQCsAgIJAKwCAgkArAICCQCsAgICCm1hbmRhdG9yeSAJAKUIAQUBeAIBLgUBeQIPIGlzIG5vdCBkZWZpbmVkAQFBAgF4AXkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUBeAUBeQAAAQFCAwF4AXkBQwkBC3ZhbHVlT3JFbHNlAgkAmggCBQF4BQF5BQFDAQFEAgF4AXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQF4BQF5CQEBagEJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FAXkCDyBpcyBub3QgZGVmaW5lZAEBRQIBeAF5CQEFdmFsdWUBCQCoAwEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUBeAUBeQIBMAEBRgMBeAF5AUMEAW8JAJ0IAgUBeAUBeQMJAAECBQFvAgZTdHJpbmcEAUcFAW8JAQV2YWx1ZQEJAKgDAQUBRwMJAAECBQFvAgRVbml0BQFDCQACAQILTWF0Y2ggZXJyb3IBAUgCAUkBSgkAvAIDCQC2AgEFAUkFAWUJALYCAQUBSgEBSwIBbgFMCQCgAwEJALwCAwUBbgkAtgIBBQFMBQFlAQFNAAIcJXMlc19fY29uZmlnX19mYWN0b3J5QWRkcmVzcwEBTgACGiVzX192b3RpbmdFbWlzc2lvbkNvbnRyYWN0AAFPAAEAAVAAAgABUQADAAFSAAQAAVMABQABVAAGAAFVAAcBAVYAAhElc19fZmFjdG9yeUNvbmZpZwEBVwACFCVzX19tYW5hZ2VyUHVibGljS2V5AQFYAAIXJXNfX21hbmFnZXJWYXVsdEFkZHJlc3MBAVkBAVoJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUBWgkAzAgCAh5tYXBwaW5nc19fbHBBc3NldDJQb29sQ29udHJhY3QFA25pbAUBZgECYWEAAhAlc19fbHBUb2tlbnNMaXN0AQJhYgEBWgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQFaCQDMCAICHm1hcHBpbmdzX19scEFzc2V0MlBvb2xDb250cmFjdAUDbmlsBQFmAQJhYwECYWQJALkJAgkAzAgCAgQlcyVzCQDMCAICCnBvb2xXZWlnaHQJAMwIAgUCYWQFA25pbAUBZgECYWUBAmFmCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUCYWYJAQJhYQACAAUBZgECYWcBAmFmCQC1CQIJAQF6AgUCYWYJAQFWAAUBZgECYWgBAmFpCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFpBQFQAQJhagECYWkJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYWkFAVMBAmFrAQJhaQkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQJhaQUBTwECYWwABAFvCQCiCAEJAQFYAAMJAAECBQFvAgZTdHJpbmcEAUcFAW8JARFAZXh0ck5hdGl2ZSgxMDYyKQEFAUcFBHRoaXMBAmFtAAIbJXMlc19fcmF0ZVBlckJsb2NrX19jdXJyZW50AQJhbgACHiVzJXNfX3JhdGVQZXJCbG9ja01heF9fY3VycmVudAECYW8AAholcyVzX19lbWlzc2lvbl9fc3RhcnRCbG9jawECYXAAAhglcyVzX19lbWlzc2lvbl9fZHVyYXRpb24BAmFxAAIYJXMlc19fZW1pc3Npb25fX2VuZEJsb2NrAQJhcgICYXMCYXQJALkJAgkAzAgCAg4lcyVzJXNfX3N0YWtlZAkAzAgCBQJhcwkAzAgCBQJhdAUDbmlsBQFmAQJhdQECYXQJAKwCAgIXJXMlcyVzX19zdGFrZWRfX3RvdGFsX18FAmF0AQJhdgICYXQCYXMJALkJAgkAzAgCAg8lcyVzJXNfX2NsYWltZWQJAMwIAgUCYXMJAMwIAgUCYXQFA25pbAUBZgECYXcCAmF0AmFzCQC5CQIJAMwIAgIYJXMlcyVzX19jbGFpbWVkTWluUmV3YXJkCQDMCAIFAmFzCQDMCAIFAmF0BQNuaWwFAWYBAmF4AgJhdAJhcwkAuQkCCQDMCAICGiVzJXMlc19fY2xhaW1lZEJvb3N0UmV3YXJkCQDMCAIFAmFzCQDMCAIFAmF0BQNuaWwFAWYBAmF5AQJhdAkAuQkCCQDMCAICFiVzJXMlc19fY2xhaW1lZF9fdG90YWwJAMwIAgUCYXQFA25pbAUBZgECYXoBAXkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBeQAAAQJhQQECYUIJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUIJAMwIAgIFdG90YWwJAMwIAgIDYmFsBQNuaWwFAWYBAmFDAgJhQgJhRAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQgkAzAgCBQJhRAkAzAgCAgNiYWwFA25pbAUBZgECYUUBAmFCCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFCCQDMCAICBXRvdGFsCQDMCAICBmJhbElOVAUDbmlsBQFmAQJhRgICYUICYUQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUIJAMwIAgUCYUQJAMwIAgIGYmFsSU5UBQNuaWwFAWYBAmFHAQJhQgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQgkAzAgCAgV0b3RhbAkAzAgCAgdsYXN0VXBkBQNuaWwFAWYBAmFIAgJhQgJhRAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQgkAzAgCBQJhRAkAzAgCAgdsYXN0VXBkBQNuaWwFAWYBAmFJAQJhQgkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFCCQDMCAICBmNvbW1vbgkAzAgCAgVscEludAUDbmlsBQFmAQJhSgECYUIJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJhQgkAzAgCAgZjb21tb24JAMwIAgIGbHBJbnRIBQNuaWwFAWYBAmFLAgJhQgJhRAkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFCCQDMCAIFAmFECQDMCAICBWxwSW50BQNuaWwFAWYBAmFMAgJhQgJhRAkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFCCQDMCAIFAmFECQDMCAICBmxwSW50SAUDbmlsBQFmAQJhTQECYUIJALkJAgkAzAgCAgIlcwkAzAgCBQJhQgkAzAgCAgd3eFBlckxwBQNuaWwFAWYBAmFOAQJhQgkAuQkCCQDMCAICAiVzCQDMCAIFAmFCCQDMCAICCnd4UGVyTHBYMTgFA25pbAUBZgECYU8CAmFCAmFECQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYUIJAMwIAgUCYUQJAMwIAgIFdUludEwFA25pbAUBZgECYVADAmFRAmFEAmFSCQC5CQIJAMwIAgIRJXMlcyVzJXNfX2hpc3RvcnkJAMwIAgUCYVEJAMwIAgUCYUQJAMwIAgUCYVIFA25pbAUBZgECYVMEAmFEAmFCAmFRAmFUCQC5CQIJAMwIAgIMJXMlcyVzJWQlZCVkCQDMCAIFAmFECQDMCAIFAmFCCQDMCAIFAmFRCQDMCAIJAKQDAQUGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBBQJhVAUDbmlsBQFmAQJhVQUCYVECYUQCYUICYVQCYVYJAQtTdHJpbmdFbnRyeQIJAQJhUAMFAmFRBQJhRAkA2AQBBQJhVgkBAmFTBAUCYUQFAmFCBQJhUQUCYVQAAmFXCQEBdwIFBHRoaXMJAQFNAAACYVgJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAmFXAAJhaQkBAmFnAQUCYVgAAmFZCQECYWoBBQJhaQACYVoJAQJhaAEFAmFpAAJiYQoAAmJiCQD8BwQFAmFZAhVnZXRCb29zdENvZWZmUkVBRE9OTFkFA25pbAUDbmlsAwkAAQIFAmJiAgNJbnQFAmJiCQACAQkArAICCQADAQUCYmICGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAACYmMJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkAuQkCCQDMCAICAiVzCQDMCAICFmxwU3Rha2luZ1Bvb2xzQ29udHJhY3QFA25pbAUBZgkBAWoBAi5scF9zdGFraW5nX3Bvb2xzIGNvbnRyYWN0IGFkZHJlc3MgaXMgdW5kZWZpbmVkCQEBagECKWludmFsaWQgbHBfc3Rha2luZ19wb29scyBjb250cmFjdCBhZGRyZXNzAQJiZAECYUIJALkJAgkAzAgCAgQlcyVzCQDMCAIFAmFCCQDMCAICCG5leHRVc2VyBQNuaWwFAWYBAmJlAQJhQgkAuQkCCQDMCAICBXVzZXJzCQDMCAIFAmFCBQNuaWwFAWYBAmJmAQJiZwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJiZwkAzAgCAgRoZWFkBQNuaWwFAWYBAmJoAQJiZwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJiZwkAzAgCAgRzaXplBQNuaWwFAWYBAmJpAgJiZwJiagkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmJnCQDMCAIFAmJqCQDMCAICBHByZXYFA25pbAUBZgECYmsCAmJnAmJqCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYmcJAMwIAgUCYmoJAMwIAgIEbmV4dAUDbmlsBQFmAQJibAICYmcCYmoEAmJtCQCdCAIFBHRoaXMJAQJiZgEFAmJnBAJibgkAnQgCBQR0aGlzCQECYmkCBQJiZwUCYmoEAmJvCQCdCAIFBHRoaXMJAQJiawIFAmJnBQJiagMDCQAAAgUCYmoJAQt2YWx1ZU9yRWxzZQIFAmJtAgAGCQECIT0CBQJibgUEdW5pdAYJAQIhPQIFAmJvBQR1bml0AQJicAICYmcCYmoEAmJtCQCdCAIFBHRoaXMJAQJiZgEFAmJnBAJicQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQECYmgBBQJiZwAABAJicgMJAQEhAQkBAmJsAgUCYmcFAmJqBgkBAWwBAgtOb2RlIGV4aXN0cwMJAAACBQJicgUCYnIJAM4IAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYmgBBQJiZwkAZAIFAmJxAAEFA25pbAMJAQIhPQIFAmJtBQR1bml0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiawIFAmJnBQJiagkBBXZhbHVlAQUCYm0JAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJpAgUCYmcJAQV2YWx1ZQEFAmJtBQJiagUDbmlsBQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJmAQUCYmcFAmJqBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmJzAgJiZwJiagQCYm0JAJ0IAgUEdGhpcwkBAmJmAQUCYmcEAmJxCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAQJiaAEFAmJnAAAEAmJuCQCdCAIFBHRoaXMJAQJiaQIFAmJnBQJiagQCYm8JAJ0IAgUEdGhpcwkBAmJrAgUCYmcFAmJqCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJiaAEFAmJnCQBlAgUCYnEAAQUDbmlsAwMJAQIhPQIFAmJuBQR1bml0CQECIT0CBQJibwUEdW5pdAcJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJrAgUCYmcJAQV2YWx1ZQEFAmJuCQEFdmFsdWUBBQJibwkAzAgCCQELU3RyaW5nRW50cnkCCQECYmkCBQJiZwkBBXZhbHVlAQUCYm8JAQV2YWx1ZQEFAmJuCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiaQIFAmJnBQJiagkAzAgCCQELRGVsZXRlRW50cnkBCQECYmsCBQJiZwUCYmoFA25pbAMJAQIhPQIFAmJvBQR1bml0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZgEFAmJnCQEFdmFsdWUBBQJibwkAzAgCCQELRGVsZXRlRW50cnkBCQECYmsCBQJiZwUCYmoJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJpAgUCYmcJAQV2YWx1ZQEFAmJvBQNuaWwDCQECIT0CBQJibgUEdW5pdAkAzAgCCQELRGVsZXRlRW50cnkBCQECYmkCBQJiZwUCYmoJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJrAgUCYmcJAQV2YWx1ZQEFAmJuBQNuaWwDCQAAAgUCYmoJAQt2YWx1ZU9yRWxzZQIFAmJtAgAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJmAQUCYmcFA25pbAkBAWwBCQCsAgIJAKwCAgkArAICAg5pbnZhbGlkIG5vZGU6IAUCYmcCAS4FAmJqAQJidAQCYnUCYnYCYncCYngDAwkAAAIFAmJ2BQFoCQC/AgIFAmJ1BQFoBwUBaAMJAAACBQJidQUBaAUCYncDAwkAvwICBQJidgUBaAkAvwICBQJidQUBaAcJAQV2YWx1ZQEJAKgDAQkBAXcCBQR0aGlzBQJieAkBAWwBAi1jYWxjV3hQZXJMcEludGVncmFsVXNlckxhc3Q6IHVuZXhwZWN0ZWQgc3RhdGUBAmJ5AwJhdAJiegJiQQQCYkIJAQJhdQEFAmF0BAJiQwkAtgIBCQECYXoBBQJiQgQCYkQDCQAAAgUCYkMFAWgFAWkFAmJDBAJiRQkBEUBleHRyTmF0aXZlKDEwNTApAgUCYVgJAQJhYwEFAmJ6BAJiRgkBAUQCBQJhWQkBAmFvAAQCYkcJAGgCCQEBRAIFAmFZCQECYW0ABQFiBAJiSAkAawMFAmJHBQJiRQkAaAIFAWcFAmJhBAJiSQkBAmFJAQUCYXQEAmJKCQECYUoBBQJhdAQCYksJAQJhTQEFAmF0BAJiTAkBAUIDBQR0aGlzBQJiSgUCYkYEAmJNCQEBRQIFBHRoaXMFAmJJBAJiTgAABAJiTwkAlgMBCQDMCAIJAGUCBQZoZWlnaHQFAmJMCQDMCAIAAAUDbmlsBAJiUAMJAQIhPQIFAmJOAAAJALYCAQUCYk4JALwCAwkAtgIBBQJiSAkAtgIBBQFjBQJiRAQCYlEJALcCAgUCYkMJALYCAQUCYkEEAmJSAwkAAAIFAmJRBQFoBQFpBQJiUQQCYncJALcCAgUCYk0JALkCAgUCYlAJALYCAQUCYk8EAmJTCQC6AgIJALYCAQUCYkgFAmJSBAJiVAUGaGVpZ2h0BAJiVQkAuQkCCQDMCAIJAKYDAQUCYncJAMwIAgkApAMBBQJiTwkAzAgCCQCmAwEFAmJQCQDMCAIJAKYDAQUCYkMJAMwIAgkApAMBBQJiSAkAzAgCCQCkAwEFAmJHCQDMCAIJAKQDAQUCYkUFA25pbAICOjoJAJUKAwUCYncJAMwIAgkBC1N0cmluZ0VudHJ5AgUCYkkJAKYDAQUCYncJAMwIAgkBDEludGVnZXJFbnRyeQIFAmJKBQJiVAkAzAgCCQELU3RyaW5nRW50cnkCBQJiSwkApgMBBQJiUwUDbmlsBQJiVQECYlYEAmF0AmFzAmJ6AmJBBAJiVwkBAmJ5AwUCYXQFAmJ6BQJiQQQCYncIBQJiVwJfMQQCYlgIBQJiVwJfMgQCYlkIBQJiVwJfMwQCYloJAQJhcgIFAmFzBQJhdAQCYnUJAQJhegEFAmJaBAJjYQkBAmFLAgUCYXQFAmFzBAJjYgkBAmFMAgUCYXQFAmFzBAJieAkBAmFPAgUCYXQFAmFzBAJjYwkBAUUCBQR0aGlzBQJjYQQCYnYJAQFBAgUEdGhpcwUCY2IEAmNkCQECYnQECQC2AgEFAmJ1CQC2AgEFAmJ2BQJidwUCYngEAmNlCQBoAgUBYwUBYgQCY2YJAJgDAQkAzAgCCQC3AgIFAmNjCQC8AgMJALgCAgUCYncFAmNkCQC2AgEFAmJ1CQC2AgEFAmNlCQDMCAIFAWgFA25pbAQCY2cFAmJ3BAJjaAUGaGVpZ2h0BAJiVQkAuQkCCQDMCAIJAKYDAQUCY2MJAMwIAgkApgMBBQJjZAkAzAgCCQCkAwEFAmJ1CQDMCAIFAmJZCQDMCAIJAKQDAQUGaGVpZ2h0BQNuaWwCAjo6CQCVCgMFAmNmCQDOCAIFAmJYCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmNhCQCmAwEFAmNmCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJjYgUCY2gJAMwIAgkBC1N0cmluZ0VudHJ5AgUCYngJAKYDAQUCY2cFA25pbAUCYlUBAmNpAAQCY2oJAQJhbAAEAW8JAJ0IAgUCY2oJAQFXAAMJAAECBQFvAgZTdHJpbmcEAUcFAW8JANkEAQUBRwMJAAECBQFvAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAAmNrCQEBbAECEVBlcm1pc3Npb24gZGVuaWVkAQJjbAECY20DCQAAAggFAmNtBmNhbGxlcgUEdGhpcwYFAmNrAQJjbgECY20EAW8JAQJjaQADCQABAgUBbwIKQnl0ZVZlY3RvcgQCY28FAW8DCQAAAggFAmNtD2NhbGxlclB1YmxpY0tleQUCY28GBQJjawMJAAECBQFvAgRVbml0AwkAAAIIBQJjbQZjYWxsZXIFBHRoaXMGBQJjawkAAgECC01hdGNoIGVycm9yAQJjcAAEAmNxCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQEBTgAEAmNyCgACYmIJAPwHBAUCY3ECGGlzRmluYWxpemF0aW9uSW5Qcm9ncmVzcwUDbmlsBQNuaWwDCQABAgUCYmICB0Jvb2xlYW4FAmJiCQACAQkArAICCQADAQUCYmICHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4DCQEBIQEFAmNyBgkBAWwBAiN2b3RpbmcgZW1pc3Npb24gc2hvdWxkIGJlIGZpbmFsaXplZAECY3MFAmNtAmFCAmN0AmFEAmFUBAJjdQkBAmNwAAMJAAACBQJjdQUCY3UEAmFzCQClCAEFAmFEBAJhdAkA2AQBBQJhQgQCYnoJAKUIAQUCY3QEAmJaCQECYXICBQJhcwUCYXQEAmJCCQECYXUBBQJhdAQCYnUJAQJhegEFAmJaBAJjdgMJAAACBQJidQAACQD8BwQFAmFaAhJvblN0YWtlZFZvdGVVcGRhdGUJAMwIAgUCYXQJAMwIAgUCYXMJAMwIAgYFA25pbAUDbmlsBQR1bml0AwkAAAIFAmN2BQJjdgQCYkMJAQJhegEFAmJCBAJjdwkBAmJWBAUCYXQFAmFzBQJiegUCYVQEAmNmCAUCY3cCXzEEAmN4CAUCY3cCXzIEAmJVCAUCY3cCXzMEAmJnCQECYmUBBQJhdAQCY3kDCQECYmwCBQJiZwUCYXMFA25pbAkBAmJwAgUCYmcFAmFzCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYloJAGQCBQJidQUCYVQJAMwIAgkBDEludGVnZXJFbnRyeQIFAmJCCQBkAgUCYkMFAmFUCQDMCAIJAQJhVQUCBXN0YWtlBQJhcwUCYXQFAmFUCAUCY20NdHJhbnNhY3Rpb25JZAUDbmlsBQJjeAUCY3kJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmN6BgJjbQJhQgJjdAJhRAJjQQJhVAQCY3UJAQJjcAADCQAAAgUCY3UFAmN1BAJhcwkApQgBBQJhRAQCYXQJANgEAQUCYUIEAmJ6CQClCAEFAmN0BAJiWgkBAmFyAgUCYXMFAmF0BAJiQgkBAmF1AQUCYXQEAmJ1CQECYXoBBQJiWgQCYkMJAQJhegEFAmJCBAJjeAgJAQJiVgQFAmF0BQJhcwUCYnoJAQEtAQUCYVQCXzIEAmJnCQECYmUBBQJhdAQCY3kDAwkBAmJsAgUCYmcFAmFzCQAAAgUCYVQFAmJ1BwkBAmJzAgUCYmcFAmFzBQNuaWwEAmN2AwkAAAIFAmFUBQJidQkA/AcEBQJhWgISb25TdGFrZWRWb3RlVXBkYXRlCQDMCAIFAmF0CQDMCAIFAmFzCQDMCAIHBQNuaWwFA25pbAUEdW5pdAMJAAACBQJjdgUCY3YEAmNCCQEBRQIFBHRoaXMJAQJhdwIFAmF0BQJhcwQCY2YICQECYlYEBQJhdAUCYXMFAmJ6AAACXzEEAmNDCQC4AgIFAmNmBQJjQgQCY0QGBAJjRQMJAL8CAgUCY0MFAWgJAPwHBAUEdGhpcwIPY2xhaW1XeElOVEVSTkFMCQDMCAIFAmF0CQDMCAIFAmFzCQDMCAIFAmNEBQNuaWwFA25pbAUEdW5pdAMJAAACBQJjRQUCY0UDCQBmAgUCYVQFAmJ1CQEBbAEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIOcGFzc2VkIGFtb3VudD0JAKQDAQUCYVQCGyBpcyBncmVhdGVyIHRoYW4gYXZhaWxhYmxlPQkApAMBBQJidQIMLiBscEFzc2V0SWQ9BQJhdAISLiBzdGFrZWRCeVVzZXJLRVk9BQJiWgkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFAmJaCQBlAgUCYnUFAmFUCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiQgkAZQIFAmJDBQJhVAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJjQQUCYVQFAmFCCQDMCAIJAQJhVQUCB3Vuc3Rha2UFAmFzBQJhdAUCYVQIBQJjbQ10cmFuc2FjdGlvbklkBQNuaWwFAmN4BQJjeQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLhACY20BC2NvbnN0cnVjdG9yAQJjRgQCY0cJAQJjbgEFAmNtAwkAAAIFAmNHBQJjRwkAzAgCCQELU3RyaW5nRW50cnkCCQEBTQAFAmNGBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY20BDWNvbnN0cnVjdG9yVjIBAmNxBAJjSAkAzAgCCQECY24BBQJjbQkAzAgCAwkBAiE9AgkApggBBQJjcQUEdW5pdAYCKGludmFsaWQgdm90aW5nIGVtaXNzaW9uIGNvbnRyYWN0IGFkZHJlc3MFA25pbAMJAAACBQJjSAUCY0gJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAU4ABQJjcQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNtAQVzdGFrZQADCQECIT0CCQCQAwEIBQJjbQhwYXltZW50cwABCQEBbAECNGludmFsaWQgcGF5bWVudCAtIGV4YWN0IG9uZSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEAmNJCQCRAwIIBQJjbQhwYXltZW50cwAABAJhQgkBBXZhbHVlAQgFAmNJB2Fzc2V0SWQEAmF0CQDYBAEFAmFCBAJhVAgFAmNJBmFtb3VudAQCYnoJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhWAkBAVkBBQJhdAkBAWoBCQCsAgICFXVuc3VwcG9ydGVkIGxwIGFzc2V0IAUCYXQEAmN0CQERQGV4dHJOYXRpdmUoMTA2MikBBQJiegQCYUQDCQAAAggFAmNtBmNhbGxlcgUCY3QIBQJjbQxvcmlnaW5DYWxsZXIIBQJjbQZjYWxsZXIJAQJjcwUFAmNtBQJhQgUCY3QFAmFEBQJhVAJjbQEIc3Rha2VGb3IBAmFzAwkBAiE9AgkAkAMBCAUCY20IcGF5bWVudHMAAQkBAWwBAjRpbnZhbGlkIHBheW1lbnQgLSBleGFjdCBvbmUgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBAJjSQkAkQMCCAUCY20IcGF5bWVudHMAAAQCYUIJAQV2YWx1ZQEIBQJjSQdhc3NldElkBAJhdAkA2AQBBQJhQgQCYVQIBQJjSQZhbW91bnQEAmJ6CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUCYVgJAQFZAQUCYXQJAQFqAQkArAICAhV1bnN1cHBvcnRlZCBscCBhc3NldCAFAmF0BAJjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQUCYnoEAmFECQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQUCYXMJAQFqAQIUaW52YWxpZCB1c2VyIGFkZHJlc3MJAQJjcwUFAmNtBQJhQgUCY3QFAmFEBQJhVAJjbQEHdW5zdGFrZQICYXQCYVQEAmFCCQDZBAEFAmF0BAJiegkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFYCQEBWQEFAmF0CQEBagEJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQJhdAQCY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAmJ6BAJjSgkApQgBCAUCY20GY2FsbGVyBAJhRAMJAAACBQJjSgUCYnoIBQJjbQxvcmlnaW5DYWxsZXIIBQJjbQZjYWxsZXIEAmNBCAUCY20GY2FsbGVyCQECY3oGBQJjbQUCYUIFAmN0BQJhRAUCY0EFAmFUAmNtAQ91bnN0YWtlSU5URVJOQUwEAmFCAmFUAmFEAmNBBAJhdAkA2AQBBQJhQgQCY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhWAkBAVkBBQJhdAkBAWoBCQCsAgICFXVuc3VwcG9ydGVkIGxwIGFzc2V0IAUCYXQEAmNHAwkAAAIIBQJjbQZjYWxsZXIFAmN0BgUCY2sDCQAAAgUCY0cFAmNHCQECY3oGBQJjbQUCYUIFAmN0CQEHQWRkcmVzcwEFAmFECQEHQWRkcmVzcwEFAmNBBQJhVAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJjbQEHY2xhaW1XeAECYXQEAmFzCQClCAEIBQJjbQZjYWxsZXIEAmNEBgQCY0sJAPwHBAUEdGhpcwIPY2xhaW1XeElOVEVSTkFMCQDMCAIFAmF0CQDMCAIFAmFzCQDMCAIFAmNEBQNuaWwFA25pbAkAlAoCBQNuaWwFAmNLAmNtARFjbGFpbVd4RG9Ob3RUaHJvdwECYXQEAmFzCQClCAEIBQJjbQZjYWxsZXIEAmNEBwQCY0sJAPwHBAUEdGhpcwIPY2xhaW1XeElOVEVSTkFMCQDMCAIFAmF0CQDMCAIFAmFzCQDMCAIFAmNEBQNuaWwFA25pbAkAlAoCBQNuaWwFAmNLAmNtAQ9jbGFpbVd4SU5URVJOQUwDAmF0AmFzAmNEBAJjRwkBAmNsAQUCY20DCQAAAgUCY0cFAmNHBAJhRAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEFAmFzCQEBagECJWNsYWltV3hJTlRFUk5BTDogaW52YWxpZCB1c2VyIGFkZHJlc3MEAmJ6CQEBegIFAmFYCQECYWIBBQJhdAQCY0wJAQJhdgIFAmF0BQJhcwQCY00JAQJheQEFAmF0BAJjTgkBAmF3AgUCYXQFAmFzBAJjTwkBAmF4AgUCYXQFAmFzBAJjUAkBAUUCBQR0aGlzBQJjTAQCY0IJAQFFAgUEdGhpcwUCY04EAmNRCQEBRQIFBHRoaXMFAmNPBAJjUgkBAUUCBQR0aGlzBQJjTQQCY1MJAQJiVgQFAmF0BQJhcwUCYnoAAAQCY2YIBQJjUwJfMQQCY3gIBQJjUwJfMgQCYlUIBQJjUwJfMwQCY0MJAJgDAQkAzAgCCQC4AgIFAmNmBQJjQgkAzAgCBQFoBQNuaWwDCQDAAgIFAWgFAmNDAwUCY0QJAQFsAQIQbm90aGluZyB0byBjbGFpbQkAlAoCBQNuaWwAAAQCY1QJAJYDAQkAzAgCCQEBcQEJAJEDAgkBAW0BCQD8BwQFAmFaAgxjbGFpbVd4Qm9vc3QJAMwIAgUCYXQJAMwIAgUCYXMFA25pbAUDbmlsAAAJAMwIAgAABQNuaWwEAmNVBQJjQwQCY1YJAJkDAQkAzAgCCQC5AgIFAmNVCQC2AgEJAGUCBQJiYQABCQDMCAIJALYCAQUCY1QFA25pbAQCY1cJALcCAgUCY1UFAmNWBAJjWAkBAXUBCQCRAwIJAQFtAQkA/AcEBQJhWQIEZW1pdAkAzAgCCQCgAwEFAmNVBQNuaWwFA25pbAAABAJjWQkBAW0BCQD8BwQFAmFZAgRlbWl0CQDMCAIJAKADAQUCY1YFA25pbAUDbmlsAwkAAAIFAmNZBQJjWQQCY1oJALcCAgkAtwICBQJjUAUCY1UFAmNWBAJkYQkAtwICBQJjQgUCY1UEAmRiCQC3AgIFAmNRBQJjVgQCZGMJALcCAgUCY1IFAmNDCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUCY0wJAKYDAQUCY1oJAMwIAgkBC1N0cmluZ0VudHJ5AgUCY04JAKYDAQUCZGEJAMwIAgkBC1N0cmluZ0VudHJ5AgUCY08JAKYDAQUCZGIJAMwIAgkBC1N0cmluZ0VudHJ5AgUCY00JAKYDAQUCZGMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUQJAKADAQUCY1UFAmNYCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmFECQCgAwEFAmNWBQJjWAkAzAgCCQECYVUFAgVjbGFpbQUCYXMFAmF0CQCgAwEFAmNDCAUCY20NdHJhbnNhY3Rpb25JZAUDbmlsCQCgAwEFAmNXCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNtARtjbGFpbVd4QnVsa0ludGVybmFsUkVBRE9OTFkEAmRkAmRlAmFzAmRmAwkAAAIFAmRkCQCQAwEFAmRlCQCUCgIFA25pbAUCZGYEAmFCCQCRAwIFAmRlBQJkZAQCZGcJALUJAgoAAmJiCQD8BwQFBHRoaXMCD2NsYWltV3hSRUFET05MWQkAzAgCBQJhQgkAzAgCBQJhcwUDbmlsBQNuaWwDCQABAgUCYmICBlN0cmluZwUCYmIJAAIBCQCsAgIJAAMBBQJiYgIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBQFmBAJkaAkAkQMCBQJkZwADBAJkaQkAkQMCBQJkZwAEBAJkagoAAmJiCQD8BwQFAmFaAhxnZXRVc2VyVm90ZUZpbmFsaXplZFJFQURPTkxZCQDMCAIFAmFCCQDMCAIFAmFzBQNuaWwFA25pbAMJAAECBQJiYgIDSW50BQJiYgkAAgEJAKwCAgkAAwEFAmJiAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQEAmRrCQDNCAIFAmRmCQC5CQIJAMwIAgIGJWQlZCVkCQDMCAIFAmRoCQDMCAIFAmRpCQDMCAIJAKQDAQUCZGoFA25pbAUBZgQCZGwKAAJiYgkA/AcEBQR0aGlzAhtjbGFpbVd4QnVsa0ludGVybmFsUkVBRE9OTFkJAMwIAgkAZAIFAmRkAAEJAMwIAgUCZGUJAMwIAgUCYXMJAMwIAgUCZGsFA25pbAUDbmlsAwkAAQIFAmJiAglMaXN0W0FueV0FAmJiCQACAQkArAICCQADAQUCYmICHiBjb3VsZG4ndCBiZSBjYXN0IHRvIExpc3RbQW55XQMJAAACBQJkbAUCZGwJAJQKAgUDbmlsBQJkbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJjbQETY2xhaW1XeEJ1bGtSRUFET05MWQICZGUCYXMEAmRrCQD8BwQFBHRoaXMCG2NsYWltV3hCdWxrSW50ZXJuYWxSRUFET05MWQkAzAgCAAAJAMwIAgUCZGUJAMwIAgUCYXMJAMwIAgUDbmlsBQNuaWwFA25pbAkAlAoCBQNuaWwFAmRrAmNtAQ9jbGFpbVd4UkVBRE9OTFkCAmF0AmFzBAJiWgkBAmFyAgUCYXMFAmF0BAJiQgkBAmF1AQUCYXQEAmNMCQECYXYCBQJhdAUCYXMEAmNOCQECYXcCBQJhdAUCYXMEAmJ1CQECYXoBBQJiWgQCYkMJAQJhegEFAmJCBAJjUAkBAUUCBQR0aGlzBQJjTAQCY0IJAQFFAgUEdGhpcwUCY04EAmJ6CQEBegIFAmFYCQECYWIBBQJhdAQCYkUJARFAZXh0ck5hdGl2ZSgxMDUwKQIFAmFYCQECYWMBBQJiegQCZG0JAQFEAgUCYVkJAQJhbQAEAmJGCQEBRAIFAmFZCQECYW8ABAJkbgMJAGYCBQJiRgUGaGVpZ2h0AAAJAGUCBQZoZWlnaHQFAmJGBAJkbwkAawMJAGgCBQJkbQUCZG4FAmJFBQFnBAJkcAkAawMFAmRvBQJidQUCYkMEAmRxCQECYlYEBQJhdAUCYXMFAmJ6AAAEAmNmCAUCZHECXzEEAmN4CAUCZHECXzIEAmJVCAUCZHECXzMEAmNDCQCYAwEJAMwIAgkAuAICBQJjZgUCY0IJAMwIAgUBaAUDbmlsBAJkcgkBAW0BCQD8BwQFAmFaAhRjbGFpbVd4Qm9vc3RSRUFET05MWQkAzAgCBQJhdAkAzAgCBQJhcwUDbmlsBQNuaWwEAmNUCQCWAwEJAMwIAgkBAXEBCQCRAwIFAmRyAAAJAMwIAgAABQNuaWwEAmRzCQEBcwEJAJEDAgUCZHIAAQQCY1UFAmNDBAJjVgkAmQMBCQDMCAIJALkCAgUCY1UJALYCAQkAZQIFAmJhAAEJAMwIAgkAtgIBBQJjVAUDbmlsBAJjVwkAtwICBQJjVQUCY1YJAJQKAgUDbmlsCQC5CQIJAMwIAgIOJXMlcyVkJWQlZCVkJXMJAMwIAgUCYXQJAMwIAgUCYXMJAMwIAgkApgMBBQJjVwkAzAgCCQCmAwEFAmNQCQDMCAIJAKYDAQUCY1UJAMwIAgkApgMBBQJjVgkAzAgCAgRzb29uBQNuaWwFAWYCY20BFHN0YWtlZEJ5VXNlclJFQURPTkxZAgJhdAJhcwQCYnUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAmFyAgUCYXMFAmF0AAAJAJQKAgUDbmlsBQJidQJjbQETc3Rha2VkVG90YWxSRUFET05MWQECYXQEAmJDCQELdmFsdWVPckVsc2UCCQCfCAEJAQJhdQEFAmF0AAAJAJQKAgUDbmlsBQJiQwJjbQESdXNlcnNMaXN0VHJhdmVyc2FsAQJhQgQCY0cDCQAAAgkA2AQBCAgFAmNtBmNhbGxlcgVieXRlcwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEBTgACAAYJAQJjbgEFAmNtAwkAAAIFAmNHBQJjRwQCYmcJAQJiZQEFAmFCBAJkdAkAoggBCQECYmQBBQJhQgQCYm0JAKIIAQkBAmJmAQUCYmcEAW8FAmR0AwkAAQIFAW8CBFVuaXQEAmR1BQJibQMJAAECBQJkdQIEVW5pdAkAlAoCBQNuaWwHAwkAAQIFAmR1AgZTdHJpbmcEAmR2BQJkdQkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZAEFAmFCBQJkdgUDbmlsBgkAAgECC01hdGNoIGVycm9yAwkAAQIFAW8CBlN0cmluZwQCYUQFAW8EAmNCCQEBRQIFBHRoaXMJAQJhdwIFAmFCBQJhRAQCY3QJAQF6AgUCYVgJAQJhYgEFAmFCBAJjZggJAQJiVgQFAmFCBQJhRAUCY3QAAAJfMQQCY0MJALgCAgUCY2YFAmNCBAJjRAYEAmNFAwkAvwICBQJjQwUBaAkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYUIJAMwIAgUCYUQJAMwIAgUCY0QFA25pbAUDbmlsBQR1bml0AwkAAAIFAmNFBQJjRQQCZHcJAKIIAQkBAmJrAgUCYmcFAmFEBAJkdQUCZHcDCQABAgUCZHUCBFVuaXQJAJQKAgkAzAgCCQELRGVsZXRlRW50cnkBCQECYmQBBQJhQgUDbmlsBwMJAAECBQJkdQIGU3RyaW5nBAJkeAUCZHUJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQECYmQBBQJhQgUCZHgFA25pbAYJAAIBAgtNYXRjaCBlcnJvcgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECC01hdGNoIGVycm9yCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNtAQ5vbk1vZGlmeVdlaWdodAICYXQCYnoDCQECIT0CCAUCY20GY2FsbGVyBQJhWAkBAWwBAhJwZXJtaXNzaW9ucyBkZW5pZWQEAmR5CQECYnkDBQJhdAUCYnoAAAQCYncIBQJkeQJfMQQCYlgIBQJkeQJfMgQCYlkIBQJkeQJfMwUCYlgBAmR6AQJkQQAEAmRCBAFvCQECY2kAAwkAAQIFAW8CCkJ5dGVWZWN0b3IEAmNvBQFvBQJjbwMJAAECBQFvAgRVbml0CAUCZHoPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IJAPQDAwgFAmR6CWJvZHlCeXRlcwkAkQMCCAUCZHoGcHJvb2ZzAAAFAmRCWccqog==", "height": 2584845, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 4vzT63LRv1LELbTyZ6kyXMNVSTqMRb2e4P95sd3nc3K2 Next: 8wGpJrgWQjW7kGEhVwq6rfw5sWC3b8EcaVkS1XaQPzPs Diff:
OldNewDifferences
422422 }
423423
424424
425+func ensureVotingEmissionIsFinalized () = {
426+ let votingEmissionContract = addressFromStringValue(getStringValue(this, keyVotingEmissionContract()))
427+ let votingEmissionFinalizationInProgress = {
428+ let @ = invoke(votingEmissionContract, "isFinalizationInProgress", nil, nil)
429+ if ($isInstanceOf(@, "Boolean"))
430+ then @
431+ else throw(($getType(@) + " couldn't be cast to Boolean"))
432+ }
433+ if (!(votingEmissionFinalizationInProgress))
434+ then true
435+ else throwErr("voting emission should be finalized")
436+ }
437+
438+
425439 func stakeActions (i,lpAssetId,poolAddress,userAddress,amount) = {
426- let userAddressStr = toString(userAddress)
427- let lpAssetIdStr = toBase58String(lpAssetId)
428- let poolAddressStr = toString(poolAddress)
429- let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
430- let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
431- let stakedByUser = readStaked(stakedByUserKEY)
432- let refreshStakedVote = if ((stakedByUser == 0))
433- then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, true], nil)
434- else unit
435- if ((refreshStakedVote == refreshStakedVote))
440+ let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
441+ if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
436442 then {
437- let stakedTotal = readStaked(stakedTotalKEY)
438- let $t01815118268 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
439- let wxToClaimUserNew = $t01815118268._1
440- let integralSTATE = $t01815118268._2
441- let debug = $t01815118268._3
442- let listName = getUsersListName(lpAssetIdStr)
443- let listActions = if (containsNode(listName, userAddressStr))
444- then nil
445- else insertNodeActions(listName, userAddressStr)
446- (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
443+ let userAddressStr = toString(userAddress)
444+ let lpAssetIdStr = toBase58String(lpAssetId)
445+ let poolAddressStr = toString(poolAddress)
446+ let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
447+ let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
448+ let stakedByUser = readStaked(stakedByUserKEY)
449+ let refreshStakedVote = if ((stakedByUser == 0))
450+ then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, true], nil)
451+ else unit
452+ if ((refreshStakedVote == refreshStakedVote))
453+ then {
454+ let stakedTotal = readStaked(stakedTotalKEY)
455+ let $t01859918716 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
456+ let wxToClaimUserNew = $t01859918716._1
457+ let integralSTATE = $t01859918716._2
458+ let debug = $t01859918716._3
459+ let listName = getUsersListName(lpAssetIdStr)
460+ let listActions = if (containsNode(listName, userAddressStr))
461+ then nil
462+ else insertNodeActions(listName, userAddressStr)
463+ (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
464+ }
465+ else throw("Strict value is not equal to itself.")
447466 }
448467 else throw("Strict value is not equal to itself.")
449468 }
450469
451470
452471 func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
453- let userAddressStr = toString(userAddress)
454- let lpAssetIdStr = toBase58String(lpAssetId)
455- let poolAddressStr = toString(poolAddress)
456- let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
457- let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
458- let stakedByUser = readStaked(stakedByUserKEY)
459- let stakedTotal = readStaked(stakedTotalKEY)
460- let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
461- let listName = getUsersListName(lpAssetIdStr)
462- let listActions = if (if (containsNode(listName, userAddressStr))
463- then (amount == stakedByUser)
464- else false)
465- then deleteNodeActions(listName, userAddressStr)
466- else nil
467- let refreshStakedVote = if ((amount == stakedByUser))
468- then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
469- else unit
470- if ((refreshStakedVote == refreshStakedVote))
472+ let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
473+ if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
471474 then {
472- let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
473- let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
474- let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
475- let throwIfNothingToClaim = true
476- let r = if ((availableToClaim > zeroBigInt))
477- then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
475+ let userAddressStr = toString(userAddress)
476+ let lpAssetIdStr = toBase58String(lpAssetId)
477+ let poolAddressStr = toString(poolAddress)
478+ let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
479+ let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
480+ let stakedByUser = readStaked(stakedByUserKEY)
481+ let stakedTotal = readStaked(stakedTotalKEY)
482+ let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
483+ let listName = getUsersListName(lpAssetIdStr)
484+ let listActions = if (if (containsNode(listName, userAddressStr))
485+ then (amount == stakedByUser)
486+ else false)
487+ then deleteNodeActions(listName, userAddressStr)
488+ else nil
489+ let refreshStakedVote = if ((amount == stakedByUser))
490+ then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
478491 else unit
479- if ((r == r))
480- then if ((amount > stakedByUser))
481- then throwErr(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
482- else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
492+ if ((refreshStakedVote == refreshStakedVote))
493+ then {
494+ let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
495+ let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
496+ let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
497+ let throwIfNothingToClaim = true
498+ let r = if ((availableToClaim > zeroBigInt))
499+ then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
500+ else unit
501+ if ((r == r))
502+ then if ((amount > stakedByUser))
503+ then throwErr(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
504+ else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
505+ else throw("Strict value is not equal to itself.")
506+ }
483507 else throw("Strict value is not equal to itself.")
484508 }
485509 else throw("Strict value is not equal to itself.")
606630 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
607631 let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
608632 let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
609- let $t02545925571 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
610- let wxToClaimUserNew = $t02545925571._1
611- let integralSTATE = $t02545925571._2
612- let debug = $t02545925571._3
633+ let $t02598426096 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
634+ let wxToClaimUserNew = $t02598426096._1
635+ let integralSTATE = $t02598426096._2
636+ let debug = $t02598426096._3
613637 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
614638 if ((zeroBigInt >= availableToClaim))
615639 then if (throwIfNothingToClaim)
698722 else (height - emissionStartBlock)
699723 let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
700724 let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
701- let $t02962229734 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
702- let wxToClaimUserNew = $t02962229734._1
703- let integralSTATE = $t02962229734._2
704- let debug = $t02962229734._3
725+ let $t03014730259 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
726+ let wxToClaimUserNew = $t03014730259._1
727+ let integralSTATE = $t03014730259._2
728+ let debug = $t03014730259._3
705729 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
706730 let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
707731 let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
785809 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
786810 then throwErr("permissions denied")
787811 else {
788- let $t03252432634 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
789- let wxPerLpIntegralNew = $t03252432634._1
790- let poolIntegralSTATE = $t03252432634._2
791- let poolDEBUG = $t03252432634._3
812+ let $t03304933159 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
813+ let wxPerLpIntegralNew = $t03304933159._1
814+ let poolIntegralSTATE = $t03304933159._2
815+ let poolDEBUG = $t03304933159._3
792816 poolIntegralSTATE
793817 }
794818
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SCALE8 = 8
55
66 let MULT3 = 1000
77
88 let MULT8 = 100000000
99
1010 let SCALE18 = 18
1111
1212 let MULT18 = toBigInt(1000000000000000000)
1313
1414 let SEP = "__"
1515
1616 let POOLWEIGHTMULT = MULT8
1717
1818 let zeroBigInt = toBigInt(0)
1919
2020 let oneBigInt = toBigInt(1)
2121
2222 func wrapErr (msg) = makeString(["staking.ride:", toString(this), msg], " ")
2323
2424
2525 func throwErr (msg) = throw(wrapErr(msg))
2626
2727
2828 func asAnyList (val) = match val {
2929 case valAnyLyst: List[Any] =>
3030 valAnyLyst
3131 case _ =>
3232 throwErr("fail to cast into List[Any]")
3333 }
3434
3535
3636 func asInt (val) = match val {
3737 case valInt: Int =>
3838 valInt
3939 case _ =>
4040 throwErr("fail to cast into Int")
4141 }
4242
4343
4444 func asString (val) = match val {
4545 case valStr: String =>
4646 valStr
4747 case _ =>
4848 throwErr("fail to cast into Int")
4949 }
5050
5151
5252 func asByteVector (val) = match val {
5353 case valBin: ByteVector =>
5454 valBin
5555 case _ =>
5656 throwErr("fail to cast into Int")
5757 }
5858
5959
6060 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), wrapErr((("mandatory this." + key) + " is not defined")))
6161
6262
6363 func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), wrapErr((((("mandatory " + toString(address)) + ".") + key) + " is not defined")))
6464
6565
6666 func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
6767
6868
6969 func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
7070
7171
7272 func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), wrapErr((("mandatory this." + key) + " is not defined")))
7373
7474
7575 func getBigIntFromStringOrZero (address,key) = value(parseBigInt(valueOrElse(getString(address, key), "0")))
7676
7777
7878 func getBigIntFromStringOrDefault (address,key,defaultVal) = match getString(address, key) {
7979 case s: String =>
8080 value(parseBigInt(s))
8181 case _: Unit =>
8282 defaultVal
8383 case _ =>
8484 throw("Match error")
8585 }
8686
8787
8888 func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
8989
9090
9191 func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
9292
9393
9494 func keyFactoryAddress () = "%s%s__config__factoryAddress"
9595
9696
9797 func keyVotingEmissionContract () = "%s__votingEmissionContract"
9898
9999
100100 let IdxFactoryCfgStakingDapp = 1
101101
102102 let IdxFactoryCfgBoostingDapp = 2
103103
104104 let IdxFactoryCfgIdoDapp = 3
105105
106106 let IdxFactoryCfgTeamDapp = 4
107107
108108 let IdxFactoryCfgEmissionDapp = 5
109109
110110 let IdxFactoryCfgRestDapp = 6
111111
112112 let IdxFactoryCfgSlippageDapp = 7
113113
114114 func keyFactoryCfg () = "%s__factoryConfig"
115115
116116
117117 func keyManagerPublicKey () = "%s__managerPublicKey"
118118
119119
120120 func keyManagerVaultAddress () = "%s__managerVaultAddress"
121121
122122
123123 func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
124124
125125
126126 func keyFactoryLpList () = "%s__lpTokensList"
127127
128128
129129 func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
130130
131131
132132 func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
133133
134134
135135 func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
136136
137137
138138 func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
139139
140140
141141 func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
142142
143143
144144 func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
145145
146146
147147 func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
148148
149149
150150 func getManagerVaultAddressOrThis () = match getString(keyManagerVaultAddress()) {
151151 case s: String =>
152152 addressFromStringValue(s)
153153 case _ =>
154154 this
155155 }
156156
157157
158158 func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
159159
160160
161161 func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
162162
163163
164164 func keyEmissionStartBlock () = "%s%s__emission__startBlock"
165165
166166
167167 func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
168168
169169
170170 func keyEmissionEndBlock () = "%s%s__emission__endBlock"
171171
172172
173173 func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
174174
175175
176176 func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
177177
178178
179179 func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
180180
181181
182182 func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
183183
184184
185185 func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
186186
187187
188188 func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed__total", lpAssetIdStr], SEP)
189189
190190
191191 func readStaked (key) = valueOrElse(getInteger(this, key), 0)
192192
193193
194194 func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
195195
196196
197197 func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
198198
199199
200200 func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
201201
202202
203203 func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
204204
205205
206206 func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
207207
208208
209209 func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
210210
211211
212212 func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
213213
214214
215215 func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
216216
217217
218218 func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
219219
220220
221221 func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
222222
223223
224224 func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
225225
226226
227227 func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
228228
229229
230230 func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
231231
232232
233233 func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
234234
235235
236236 func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
237237
238238
239239 func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
240240
241241
242242 let factoryAddress = getStringOrFail(this, keyFactoryAddress())
243243
244244 let factoryContract = addressFromStringValue(factoryAddress)
245245
246246 let factoryCfg = readFactoryCfgOrFail(factoryContract)
247247
248248 let emissionContract = getEmissionAddressOrFail(factoryCfg)
249249
250250 let boostingContract = getBoostingAddressOrFail(factoryCfg)
251251
252252 let boostCoeff = {
253253 let @ = invoke(emissionContract, "getBoostCoeffREADONLY", nil, nil)
254254 if ($isInstanceOf(@, "Int"))
255255 then @
256256 else throw(($getType(@) + " couldn't be cast to Int"))
257257 }
258258
259259 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"))
260260
261261 func keyNextUser (lpAssetId) = makeString(["%s%s", lpAssetId, "nextUser"], SEP)
262262
263263
264264 func getUsersListName (lpAssetId) = makeString(["users", lpAssetId], SEP)
265265
266266
267267 func keyListHead (listName) = makeString(["%s%s%s", listName, "head"], SEP)
268268
269269
270270 func keyListSize (listName) = makeString(["%s%s%s", listName, "size"], SEP)
271271
272272
273273 func keyListPrev (listName,id) = makeString(["%s%s%s%s", listName, id, "prev"], SEP)
274274
275275
276276 func keyListNext (listName,id) = makeString(["%s%s%s%s", listName, id, "next"], SEP)
277277
278278
279279 func containsNode (listName,id) = {
280280 let headOrUnit = getString(this, keyListHead(listName))
281281 let prevOrUnit = getString(this, keyListPrev(listName, id))
282282 let nextOrUnit = getString(this, keyListNext(listName, id))
283283 if (if ((id == valueOrElse(headOrUnit, "")))
284284 then true
285285 else (prevOrUnit != unit))
286286 then true
287287 else (nextOrUnit != unit)
288288 }
289289
290290
291291 func insertNodeActions (listName,id) = {
292292 let headOrUnit = getString(this, keyListHead(listName))
293293 let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
294294 let checkNode = if (!(containsNode(listName, id)))
295295 then true
296296 else throwErr("Node exists")
297297 if ((checkNode == checkNode))
298298 then (([IntegerEntry(keyListSize(listName), (listSize + 1))] ++ (if ((headOrUnit != unit))
299299 then [StringEntry(keyListNext(listName, id), value(headOrUnit)), StringEntry(keyListPrev(listName, value(headOrUnit)), id)]
300300 else nil)) ++ [StringEntry(keyListHead(listName), id)])
301301 else throw("Strict value is not equal to itself.")
302302 }
303303
304304
305305 func deleteNodeActions (listName,id) = {
306306 let headOrUnit = getString(this, keyListHead(listName))
307307 let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
308308 let prevOrUnit = getString(this, keyListPrev(listName, id))
309309 let nextOrUnit = getString(this, keyListNext(listName, id))
310310 ([IntegerEntry(keyListSize(listName), (listSize - 1))] ++ (if (if ((prevOrUnit != unit))
311311 then (nextOrUnit != unit)
312312 else false)
313313 then [StringEntry(keyListNext(listName, value(prevOrUnit)), value(nextOrUnit)), StringEntry(keyListPrev(listName, value(nextOrUnit)), value(prevOrUnit)), DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, id))]
314314 else if ((nextOrUnit != unit))
315315 then [StringEntry(keyListHead(listName), value(nextOrUnit)), DeleteEntry(keyListNext(listName, id)), DeleteEntry(keyListPrev(listName, value(nextOrUnit)))]
316316 else if ((prevOrUnit != unit))
317317 then [DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, value(prevOrUnit)))]
318318 else if ((id == valueOrElse(headOrUnit, "")))
319319 then [DeleteEntry(keyListHead(listName))]
320320 else throwErr(((("invalid node: " + listName) + ".") + id))))
321321 }
322322
323323
324324 func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
325325 then (stakedByUser > zeroBigInt)
326326 else false)
327327 then zeroBigInt
328328 else if ((stakedByUser == zeroBigInt))
329329 then wxPerLpIntegralNew
330330 else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
331331 then (stakedByUser > zeroBigInt)
332332 else false)
333333 then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
334334 else throwErr("calcWxPerLpIntegralUserLast: unexpected state")
335335
336336
337337 func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
338338 let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
339339 let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
340340 let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
341341 then oneBigInt
342342 else stakedTotal
343343 let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
344344 let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
345345 let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
346346 let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * boostCoeff))
347347 let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
348348 let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
349349 let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
350350 let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
351351 let wxPerLpIntegral = getBigIntFromStringOrZero(this, wxPerLpIntegralKEY)
352352 let wxPerLpOrZeroX3 = 0
353353 let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
354354 let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
355355 then toBigInt(wxPerLpOrZeroX3)
356356 else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
357357 let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
358358 let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
359359 then oneBigInt
360360 else stakedTotalNew
361361 let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLpX3 * toBigInt(dh)))
362362 let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
363363 let wxPerLpIntegralLastUpdHeightNew = height
364364 let debug = makeString([toString(wxPerLpIntegralNew), toString(dh), toString(wxPerLpX3), toString(stakedTotal), toString(poolWxEmissionPerBlockX3), toString(wxEmissionPerBlockX3), toString(poolWeight)], "::")
365365 $Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
366366 }
367367
368368
369369 func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
370370 let $t01487514997 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
371371 let wxPerLpIntegralNew = $t01487514997._1
372372 let poolIntegralSTATE = $t01487514997._2
373373 let poolDEBUG = $t01487514997._3
374374 let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
375375 let stakedByUser = readStaked(stakedByUserKEY)
376376 let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
377377 let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
378378 let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
379379 let wxToClaimUser = getBigIntFromStringOrZero(this, wxToClaimUserKEY)
380380 let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
381381 let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
382382 let MULT11 = (MULT8 * MULT3)
383383 let wxToClaimUserNew = max([(wxToClaimUser + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11))), zeroBigInt])
384384 let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
385385 let wxPerLpIntegralUserLastUpdHeightNew = height
386386 let debug = makeString([toString(wxToClaimUser), toString(wxPerLpIntegralUserLast), toString(stakedByUser), poolDEBUG, toString(height)], "::")
387387 $Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
388388 }
389389
390390
391391 func managerPublicKeyOrUnit () = {
392392 let managerVaultAddress = getManagerVaultAddressOrThis()
393393 match getString(managerVaultAddress, keyManagerPublicKey()) {
394394 case s: String =>
395395 fromBase58String(s)
396396 case _: Unit =>
397397 unit
398398 case _ =>
399399 throw("Match error")
400400 }
401401 }
402402
403403
404404 let permissionDeniedError = throwErr("Permission denied")
405405
406406 func mustThis (i) = if ((i.caller == this))
407407 then true
408408 else permissionDeniedError
409409
410410
411411 func mustManager (i) = match managerPublicKeyOrUnit() {
412412 case pk: ByteVector =>
413413 if ((i.callerPublicKey == pk))
414414 then true
415415 else permissionDeniedError
416416 case _: Unit =>
417417 if ((i.caller == this))
418418 then true
419419 else permissionDeniedError
420420 case _ =>
421421 throw("Match error")
422422 }
423423
424424
425+func ensureVotingEmissionIsFinalized () = {
426+ let votingEmissionContract = addressFromStringValue(getStringValue(this, keyVotingEmissionContract()))
427+ let votingEmissionFinalizationInProgress = {
428+ let @ = invoke(votingEmissionContract, "isFinalizationInProgress", nil, nil)
429+ if ($isInstanceOf(@, "Boolean"))
430+ then @
431+ else throw(($getType(@) + " couldn't be cast to Boolean"))
432+ }
433+ if (!(votingEmissionFinalizationInProgress))
434+ then true
435+ else throwErr("voting emission should be finalized")
436+ }
437+
438+
425439 func stakeActions (i,lpAssetId,poolAddress,userAddress,amount) = {
426- let userAddressStr = toString(userAddress)
427- let lpAssetIdStr = toBase58String(lpAssetId)
428- let poolAddressStr = toString(poolAddress)
429- let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
430- let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
431- let stakedByUser = readStaked(stakedByUserKEY)
432- let refreshStakedVote = if ((stakedByUser == 0))
433- then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, true], nil)
434- else unit
435- if ((refreshStakedVote == refreshStakedVote))
440+ let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
441+ if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
436442 then {
437- let stakedTotal = readStaked(stakedTotalKEY)
438- let $t01815118268 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
439- let wxToClaimUserNew = $t01815118268._1
440- let integralSTATE = $t01815118268._2
441- let debug = $t01815118268._3
442- let listName = getUsersListName(lpAssetIdStr)
443- let listActions = if (containsNode(listName, userAddressStr))
444- then nil
445- else insertNodeActions(listName, userAddressStr)
446- (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
443+ let userAddressStr = toString(userAddress)
444+ let lpAssetIdStr = toBase58String(lpAssetId)
445+ let poolAddressStr = toString(poolAddress)
446+ let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
447+ let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
448+ let stakedByUser = readStaked(stakedByUserKEY)
449+ let refreshStakedVote = if ((stakedByUser == 0))
450+ then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, true], nil)
451+ else unit
452+ if ((refreshStakedVote == refreshStakedVote))
453+ then {
454+ let stakedTotal = readStaked(stakedTotalKEY)
455+ let $t01859918716 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
456+ let wxToClaimUserNew = $t01859918716._1
457+ let integralSTATE = $t01859918716._2
458+ let debug = $t01859918716._3
459+ let listName = getUsersListName(lpAssetIdStr)
460+ let listActions = if (containsNode(listName, userAddressStr))
461+ then nil
462+ else insertNodeActions(listName, userAddressStr)
463+ (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
464+ }
465+ else throw("Strict value is not equal to itself.")
447466 }
448467 else throw("Strict value is not equal to itself.")
449468 }
450469
451470
452471 func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
453- let userAddressStr = toString(userAddress)
454- let lpAssetIdStr = toBase58String(lpAssetId)
455- let poolAddressStr = toString(poolAddress)
456- let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
457- let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
458- let stakedByUser = readStaked(stakedByUserKEY)
459- let stakedTotal = readStaked(stakedTotalKEY)
460- let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
461- let listName = getUsersListName(lpAssetIdStr)
462- let listActions = if (if (containsNode(listName, userAddressStr))
463- then (amount == stakedByUser)
464- else false)
465- then deleteNodeActions(listName, userAddressStr)
466- else nil
467- let refreshStakedVote = if ((amount == stakedByUser))
468- then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
469- else unit
470- if ((refreshStakedVote == refreshStakedVote))
472+ let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
473+ if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
471474 then {
472- let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
473- let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
474- let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
475- let throwIfNothingToClaim = true
476- let r = if ((availableToClaim > zeroBigInt))
477- then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
475+ let userAddressStr = toString(userAddress)
476+ let lpAssetIdStr = toBase58String(lpAssetId)
477+ let poolAddressStr = toString(poolAddress)
478+ let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
479+ let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
480+ let stakedByUser = readStaked(stakedByUserKEY)
481+ let stakedTotal = readStaked(stakedTotalKEY)
482+ let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
483+ let listName = getUsersListName(lpAssetIdStr)
484+ let listActions = if (if (containsNode(listName, userAddressStr))
485+ then (amount == stakedByUser)
486+ else false)
487+ then deleteNodeActions(listName, userAddressStr)
488+ else nil
489+ let refreshStakedVote = if ((amount == stakedByUser))
490+ then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
478491 else unit
479- if ((r == r))
480- then if ((amount > stakedByUser))
481- then throwErr(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
482- else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
492+ if ((refreshStakedVote == refreshStakedVote))
493+ then {
494+ let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
495+ let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
496+ let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
497+ let throwIfNothingToClaim = true
498+ let r = if ((availableToClaim > zeroBigInt))
499+ then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
500+ else unit
501+ if ((r == r))
502+ then if ((amount > stakedByUser))
503+ then throwErr(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
504+ else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
505+ else throw("Strict value is not equal to itself.")
506+ }
483507 else throw("Strict value is not equal to itself.")
484508 }
485509 else throw("Strict value is not equal to itself.")
486510 }
487511
488512
489513 @Callable(i)
490514 func constructor (factoryAddressStr) = {
491515 let checkCaller = mustManager(i)
492516 if ((checkCaller == checkCaller))
493517 then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
494518 else throw("Strict value is not equal to itself.")
495519 }
496520
497521
498522
499523 @Callable(i)
500524 func constructorV2 (votingEmissionContract) = {
501525 let cheks = [mustManager(i), if ((addressFromString(votingEmissionContract) != unit))
502526 then true
503527 else "invalid voting emission contract address"]
504528 if ((cheks == cheks))
505529 then [StringEntry(keyVotingEmissionContract(), votingEmissionContract)]
506530 else throw("Strict value is not equal to itself.")
507531 }
508532
509533
510534
511535 @Callable(i)
512536 func stake () = if ((size(i.payments) != 1))
513537 then throwErr("invalid payment - exact one payment must be attached")
514538 else {
515539 let pmt = i.payments[0]
516540 let lpAssetId = value(pmt.assetId)
517541 let lpAssetIdStr = toBase58String(lpAssetId)
518542 let amount = pmt.amount
519543 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr)))
520544 let poolAddress = addressFromStringValue(poolAddressStr)
521545 let userAddress = if ((i.caller == poolAddress))
522546 then i.originCaller
523547 else i.caller
524548 stakeActions(i, lpAssetId, poolAddress, userAddress, amount)
525549 }
526550
527551
528552
529553 @Callable(i)
530554 func stakeFor (userAddressStr) = if ((size(i.payments) != 1))
531555 then throwErr("invalid payment - exact one payment must be attached")
532556 else {
533557 let pmt = i.payments[0]
534558 let lpAssetId = value(pmt.assetId)
535559 let lpAssetIdStr = toBase58String(lpAssetId)
536560 let amount = pmt.amount
537561 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr)))
538562 let poolAddress = addressFromStringValue(poolAddressStr)
539563 let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("invalid user address"))
540564 stakeActions(i, lpAssetId, poolAddress, userAddress, amount)
541565 }
542566
543567
544568
545569 @Callable(i)
546570 func unstake (lpAssetIdStr,amount) = {
547571 let lpAssetId = fromBase58String(lpAssetIdStr)
548572 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr)))
549573 let poolAddress = addressFromStringValue(poolAddressStr)
550574 let callerStr = toString(i.caller)
551575 let userAddress = if ((callerStr == poolAddressStr))
552576 then i.originCaller
553577 else i.caller
554578 let lpAssetRecipientAddress = i.caller
555579 unstakeActions(i, lpAssetId, poolAddress, userAddress, lpAssetRecipientAddress, amount)
556580 }
557581
558582
559583
560584 @Callable(i)
561585 func unstakeINTERNAL (lpAssetId,amount,userAddress,lpAssetRecipientAddress) = {
562586 let lpAssetIdStr = toBase58String(lpAssetId)
563587 let poolAddress = addressFromStringValue(valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr))))
564588 let checkCaller = if ((i.caller == poolAddress))
565589 then true
566590 else permissionDeniedError
567591 if ((checkCaller == checkCaller))
568592 then unstakeActions(i, lpAssetId, poolAddress, Address(userAddress), Address(lpAssetRecipientAddress), amount)
569593 else throw("Strict value is not equal to itself.")
570594 }
571595
572596
573597
574598 @Callable(i)
575599 func claimWx (lpAssetIdStr) = {
576600 let userAddressStr = toString(i.caller)
577601 let throwIfNothingToClaim = true
578602 let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
579603 $Tuple2(nil, result)
580604 }
581605
582606
583607
584608 @Callable(i)
585609 func claimWxDoNotThrow (lpAssetIdStr) = {
586610 let userAddressStr = toString(i.caller)
587611 let throwIfNothingToClaim = false
588612 let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
589613 $Tuple2(nil, result)
590614 }
591615
592616
593617
594618 @Callable(i)
595619 func claimWxINTERNAL (lpAssetIdStr,userAddressStr,throwIfNothingToClaim) = {
596620 let checkCaller = mustThis(i)
597621 if ((checkCaller == checkCaller))
598622 then {
599623 let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("claimWxINTERNAL: invalid user address"))
600624 let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
601625 let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
602626 let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
603627 let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
604628 let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
605629 let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
606630 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
607631 let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
608632 let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
609- let $t02545925571 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
610- let wxToClaimUserNew = $t02545925571._1
611- let integralSTATE = $t02545925571._2
612- let debug = $t02545925571._3
633+ let $t02598426096 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
634+ let wxToClaimUserNew = $t02598426096._1
635+ let integralSTATE = $t02598426096._2
636+ let debug = $t02598426096._3
613637 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
614638 if ((zeroBigInt >= availableToClaim))
615639 then if (throwIfNothingToClaim)
616640 then throwErr("nothing to claim")
617641 else $Tuple2(nil, 0)
618642 else {
619643 let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
620644 let minRewardPart = availableToClaim
621645 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
622646 let totalReward = (minRewardPart + boostRewardPart)
623647 let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
624648 let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
625649 if ((emitBoost == emitBoost))
626650 then {
627651 let claimedByUserValue = ((claimedByUser + minRewardPart) + boostRewardPart)
628652 let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
629653 let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserBoostReward + boostRewardPart)
630654 let claimedTotalPlusAvailableToClaim = (claimedTotal + availableToClaim)
631655 $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))
632656 }
633657 else throw("Strict value is not equal to itself.")
634658 }
635659 }
636660 else throw("Strict value is not equal to itself.")
637661 }
638662
639663
640664
641665 @Callable(i)
642666 func claimWxBulkInternalREADONLY (currentIter,lpAssetIds,userAddressStr,resAcc) = if ((currentIter == size(lpAssetIds)))
643667 then $Tuple2(nil, resAcc)
644668 else {
645669 let lpAssetId = lpAssetIds[currentIter]
646670 let info = split({
647671 let @ = invoke(this, "claimWxREADONLY", [lpAssetId, userAddressStr], nil)
648672 if ($isInstanceOf(@, "String"))
649673 then @
650674 else throw(($getType(@) + " couldn't be cast to String"))
651675 }, SEP)
652676 let unclaimed = info[3]
653677 let claimed = info[4]
654678 let userVoteFinalized = {
655679 let @ = invoke(boostingContract, "getUserVoteFinalizedREADONLY", [lpAssetId, userAddressStr], nil)
656680 if ($isInstanceOf(@, "Int"))
657681 then @
658682 else throw(($getType(@) + " couldn't be cast to Int"))
659683 }
660684 let res = (resAcc :+ makeString(["%d%d%d", unclaimed, claimed, toString(userVoteFinalized)], SEP))
661685 let inv = {
662686 let @ = invoke(this, "claimWxBulkInternalREADONLY", [(currentIter + 1), lpAssetIds, userAddressStr, res], nil)
663687 if ($isInstanceOf(@, "List[Any]"))
664688 then @
665689 else throw(($getType(@) + " couldn't be cast to List[Any]"))
666690 }
667691 if ((inv == inv))
668692 then $Tuple2(nil, inv)
669693 else throw("Strict value is not equal to itself.")
670694 }
671695
672696
673697
674698 @Callable(i)
675699 func claimWxBulkREADONLY (lpAssetIds,userAddressStr) = {
676700 let res = invoke(this, "claimWxBulkInternalREADONLY", [0, lpAssetIds, userAddressStr, nil], nil)
677701 $Tuple2(nil, res)
678702 }
679703
680704
681705
682706 @Callable(i)
683707 func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
684708 let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
685709 let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
686710 let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
687711 let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
688712 let stakedByUser = readStaked(stakedByUserKEY)
689713 let stakedTotal = readStaked(stakedTotalKEY)
690714 let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
691715 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
692716 let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
693717 let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
694718 let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
695719 let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
696720 let passedBlocks = if ((emissionStartBlock > height))
697721 then 0
698722 else (height - emissionStartBlock)
699723 let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
700724 let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
701- let $t02962229734 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
702- let wxToClaimUserNew = $t02962229734._1
703- let integralSTATE = $t02962229734._2
704- let debug = $t02962229734._3
725+ let $t03014730259 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
726+ let wxToClaimUserNew = $t03014730259._1
727+ let integralSTATE = $t03014730259._2
728+ let debug = $t03014730259._3
705729 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
706730 let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
707731 let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
708732 let boostDebug = asString(boostInvResult[1])
709733 let minRewardPart = availableToClaim
710734 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
711735 let totalReward = (minRewardPart + boostRewardPart)
712736 $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), "soon"], SEP))
713737 }
714738
715739
716740
717741 @Callable(i)
718742 func stakedByUserREADONLY (lpAssetIdStr,userAddressStr) = {
719743 let stakedByUser = valueOrElse(getInteger(keyStakedByUser(userAddressStr, lpAssetIdStr)), 0)
720744 $Tuple2(nil, stakedByUser)
721745 }
722746
723747
724748
725749 @Callable(i)
726750 func stakedTotalREADONLY (lpAssetIdStr) = {
727751 let stakedTotal = valueOrElse(getInteger(keyStakedTotal(lpAssetIdStr)), 0)
728752 $Tuple2(nil, stakedTotal)
729753 }
730754
731755
732756
733757 @Callable(i)
734758 func usersListTraversal (lpAssetId) = {
735759 let checkCaller = if ((toBase58String(i.caller.bytes) == valueOrElse(getString(this, keyVotingEmissionContract()), "")))
736760 then true
737761 else mustManager(i)
738762 if ((checkCaller == checkCaller))
739763 then {
740764 let listName = getUsersListName(lpAssetId)
741765 let userOrUnit = getString(keyNextUser(lpAssetId))
742766 let headOrUnit = getString(keyListHead(listName))
743767 match userOrUnit {
744768 case _: Unit =>
745769 match headOrUnit {
746770 case _: Unit =>
747771 $Tuple2(nil, false)
748772 case head: String =>
749773 $Tuple2([StringEntry(keyNextUser(lpAssetId), head)], true)
750774 case _ =>
751775 throw("Match error")
752776 }
753777 case userAddress: String =>
754778 let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetId, userAddress))
755779 let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
756780 let wxToClaimUserNew = refreshINTEGRALS(lpAssetId, userAddress, poolAddress, 0)._1
757781 let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
758782 let throwIfNothingToClaim = true
759783 let r = if ((availableToClaim > zeroBigInt))
760784 then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress, throwIfNothingToClaim], nil)
761785 else unit
762786 if ((r == r))
763787 then {
764788 let nextUserOrUnit = getString(keyListNext(listName, userAddress))
765789 match nextUserOrUnit {
766790 case _: Unit =>
767791 $Tuple2([DeleteEntry(keyNextUser(lpAssetId))], false)
768792 case nextUser: String =>
769793 $Tuple2([StringEntry(keyNextUser(lpAssetId), nextUser)], true)
770794 case _ =>
771795 throw("Match error")
772796 }
773797 }
774798 else throw("Strict value is not equal to itself.")
775799 case _ =>
776800 throw("Match error")
777801 }
778802 }
779803 else throw("Strict value is not equal to itself.")
780804 }
781805
782806
783807
784808 @Callable(i)
785809 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
786810 then throwErr("permissions denied")
787811 else {
788- let $t03252432634 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
789- let wxPerLpIntegralNew = $t03252432634._1
790- let poolIntegralSTATE = $t03252432634._2
791- let poolDEBUG = $t03252432634._3
812+ let $t03304933159 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
813+ let wxPerLpIntegralNew = $t03304933159._1
814+ let poolIntegralSTATE = $t03304933159._2
815+ let poolDEBUG = $t03304933159._3
792816 poolIntegralSTATE
793817 }
794818
795819
796820 @Verifier(tx)
797821 func verify () = {
798822 let targetPublicKey = match managerPublicKeyOrUnit() {
799823 case pk: ByteVector =>
800824 pk
801825 case _: Unit =>
802826 tx.senderPublicKey
803827 case _ =>
804828 throw("Match error")
805829 }
806830 sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
807831 }
808832

github/deemru/w8io/026f985 
98.33 ms