tx · 2BxzSun9bdECvdFx65B5UjpGouhuFGnnfqE3JdhFLXd6

3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz:  -0.02300000 Waves

2023.03.10 12:12 [2483780] smart account 3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz > SELF 0.00000000 Waves

{ "type": 13, "id": "2BxzSun9bdECvdFx65B5UjpGouhuFGnnfqE3JdhFLXd6", "fee": 2300000, "feeAssetId": null, "timestamp": 1678439539535, "version": 2, "chainId": 84, "sender": "3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz", "senderPublicKey": "D28XoueZWsMfm8Y5pa6C5ZFuYoWgre2Wm8tzJANJgMnq", "proofs": [ "bHnobnXRSzi5vdLLyiSacAuGVHZw8RvAM4bfQSfZ1THL8S3WJ5XfgcCc6wKTrQ4kSKFUMDXXriiM7bpL3kqxurj" ], "script": "base64:BgKrIAgCEgMKAQgSAwoBCBIDCgEIEgASABIECgIIARIGCgQCAQICEgMKAQgSAwoBCBIFCgMICAQSBgoEARgIGBIECgIYCBIECgIICBIECgIICBIDCgEIEgQKAggIIgZTQ0FMRTgiBU1VTFQzIgVNVUxUOCIHU0NBTEUxOCIGTVVMVDE4IgNTRVAiDlBPT0xXRUlHSFRNVUxUIgp6ZXJvQmlnSW50IglvbmVCaWdJbnQiB3dyYXBFcnIiA21zZyIIdGhyb3dFcnIiCWFzQW55TGlzdCIDdmFsIgckbWF0Y2gwIgp2YWxBbnlMeXN0IgVhc0ludCIGdmFsSW50Ighhc1N0cmluZyIGdmFsU3RyIgxhc0J5dGVWZWN0b3IiBnZhbEJpbiIPZ2V0U3RyaW5nT3JGYWlsIgdhZGRyZXNzIgNrZXkiGGdldFN0cmluZ0J5QWRkcmVzc09yRmFpbCIMZ2V0SW50T3JaZXJvIg9nZXRJbnRPckRlZmF1bHQiCmRlZmF1bHRWYWwiDGdldEludE9yRmFpbCIZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybyIcZ2V0QmlnSW50RnJvbVN0cmluZ09yRGVmYXVsdCIBcyIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiD3Jlc3VsdFNjYWxlTXVsdCIRa2V5RmFjdG9yeUFkZHJlc3MiGWtleVZvdGluZ0VtaXNzaW9uQ29udHJhY3QiGElkeEZhY3RvcnlDZmdTdGFraW5nRGFwcCIZSWR4RmFjdG9yeUNmZ0Jvb3N0aW5nRGFwcCIUSWR4RmFjdG9yeUNmZ0lkb0RhcHAiFUlkeEZhY3RvcnlDZmdUZWFtRGFwcCIZSWR4RmFjdG9yeUNmZ0VtaXNzaW9uRGFwcCIVSWR4RmFjdG9yeUNmZ1Jlc3REYXBwIhlJZHhGYWN0b3J5Q2ZnU2xpcHBhZ2VEYXBwIg1rZXlGYWN0b3J5Q2ZnIhNrZXlNYW5hZ2VyUHVibGljS2V5IhprZXlQZW5kaW5nTWFuYWdlclB1YmxpY0tleSIWa2V5U3RhYmxlUG9vbEFkZG9uQWRkciIMa2V5QWRkb25BZGRyIhprZXlGYWN0b3J5THAyQXNzZXRzTWFwcGluZyIKbHBBc3NldFN0ciIQa2V5RmFjdG9yeUxwTGlzdCIma2V5RmFjdG9yeUxwQXNzZXRUb1Bvb2xDb250cmFjdEFkZHJlc3MiFGtleUZhY3RvcnlQb29sV2VpZ2h0Ig9jb250cmFjdEFkZHJlc3MiCnJlYWRMcExpc3QiB2ZhY3RvcnkiFHJlYWRGYWN0b3J5Q2ZnT3JGYWlsIhhnZXRCb29zdGluZ0FkZHJlc3NPckZhaWwiCmZhY3RvcnlDZmciGGdldEVtaXNzaW9uQWRkcmVzc09yRmFpbCIXZ2V0U3Rha2luZ0FkZHJlc3NPckZhaWwiHmtleUVtaXNzaW9uUmF0ZVBlckJsb2NrQ3VycmVudCIha2V5RW1pc3Npb25SYXRlUGVyQmxvY2tNYXhDdXJyZW50IhVrZXlFbWlzc2lvblN0YXJ0QmxvY2siG2tleUVtaXNzaW9uRHVyYXRpb25JbkJsb2NrcyITa2V5RW1pc3Npb25FbmRCbG9jayIPa2V5U3Rha2VkQnlVc2VyIg51c2VyQWRkcmVzc1N0ciIMbHBBc3NldElkU3RyIg5rZXlTdGFrZWRUb3RhbCIQa2V5Q2xhaW1lZEJ5VXNlciIZa2V5Q2xhaW1lZEJ5VXNlck1pblJld2FyZCIba2V5Q2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkIg9rZXlDbGFpbWVkVG90YWwiCnJlYWRTdGFrZWQiFWtleUxhc3RUb3RhbExwQmFsYW5jZSIJbHBBc3NldElkIhRrZXlMYXN0VXNlckxwQmFsYW5jZSILdXNlckFkZHJlc3MiGWtleVRvdGFsTHBCYWxhbmNlSW50ZWdyYWwiGGtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbCIma2V5VG90YWxMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQiJWtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQiEmtleVd4UGVyTHBJbnRlZ3JhbCIfa2V5V3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodCIQa2V5V3hUb0NsYWltVXNlciIja2V5V3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQiCmtleVd4UGVyTHAiDWtleVd4UGVyTHBYMTgiGmtleVd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0IhlrZXlPcGVyYXRpb25IaXN0b3J5UmVjb3JkIgR0eXBlIgZ0eElkNTgiE2Zvcm1hdEhpc3RvcnlSZWNvcmQiBmFtb3VudCIVT3BlcmF0aW9uSGlzdG9yeUVudHJ5IgR0eElkIg5mYWN0b3J5QWRkcmVzcyIPZmFjdG9yeUNvbnRyYWN0IhBlbWlzc2lvbkNvbnRyYWN0IhBib29zdGluZ0NvbnRyYWN0Igpib29zdENvZWZmIgFAIhZscFN0YWtpbmdQb29sc0NvbnRyYWN0IgtrZXlOZXh0VXNlciIQZ2V0VXNlcnNMaXN0TmFtZSILa2V5TGlzdEhlYWQiCGxpc3ROYW1lIgtrZXlMaXN0U2l6ZSILa2V5TGlzdFByZXYiAmlkIgtrZXlMaXN0TmV4dCIMY29udGFpbnNOb2RlIgpoZWFkT3JVbml0IgpwcmV2T3JVbml0IgpuZXh0T3JVbml0IhFpbnNlcnROb2RlQWN0aW9ucyIIbGlzdFNpemUiCWNoZWNrTm9kZSIRZGVsZXRlTm9kZUFjdGlvbnMiG2NhbGNXeFBlckxwSW50ZWdyYWxVc2VyTGFzdCIMc3Rha2VkQnlVc2VyIiZ3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE9yWmVybyISd3hQZXJMcEludGVncmFsTmV3Ihp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdEtFWSIUcmVmcmVzaFBvb2xJTlRFR1JBTFMiDnBvb2xBZGRyZXNzU3RyIg1scERlbHRhQW1vdW50Ig5zdGFrZWRUb3RhbEtFWSILc3Rha2VkVG90YWwiEm5vblplcm9TdGFrZWRUb3RhbCIKcG9vbFdlaWdodCISZW1pc3Npb25TdGFydEJsb2NrIhR3eEVtaXNzaW9uUGVyQmxvY2tYMyIYcG9vbFd4RW1pc3Npb25QZXJCbG9ja1gzIhJ3eFBlckxwSW50ZWdyYWxLRVkiH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkiCnd4UGVyTHBLRVkiHHd4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHQiD3d4UGVyTHBJbnRlZ3JhbCIPd3hQZXJMcE9yWmVyb1gzIgJkaCIJd3hQZXJMcFgzIg5zdGFrZWRUb3RhbE5ldyIVbm9uWmVyb1N0YWtlZFRvdGFsTmV3Igx3eFBlckxwWDNOZXciH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHROZXciBWRlYnVnIhByZWZyZXNoSU5URUdSQUxTIg0kdDAxNDc2MjE0ODg0IhFwb29sSW50ZWdyYWxTVEFURSIJcG9vbERFQlVHIg9zdGFrZWRCeVVzZXJLRVkiEHd4VG9DbGFpbVVzZXJLRVkiI3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0S0VZIg13eFRvQ2xhaW1Vc2VyIhd3eFBlckxwSW50ZWdyYWxVc2VyTGFzdCIGTVVMVDExIhB3eFRvQ2xhaW1Vc2VyTmV3Ihp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdE5ldyIjd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHROZXciFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQiHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0IhVwZXJtaXNzaW9uRGVuaWVkRXJyb3IiCG11c3RUaGlzIgFpIgttdXN0TWFuYWdlciICcGsiDnVuc3Rha2VBY3Rpb25zIgtwb29sQWRkcmVzcyIXbHBBc3NldFJlY2lwaWVudEFkZHJlc3MiDWludGVncmFsU1RBVEUiC2xpc3RBY3Rpb25zIhFyZWZyZXNoU3Rha2VkVm90ZSIWY2xhaW1lZEJ5VXNlck1pblJld2FyZCIQYXZhaWxhYmxlVG9DbGFpbSIVdGhyb3dJZk5vdGhpbmdUb0NsYWltIgFyIhFmYWN0b3J5QWRkcmVzc1N0ciILY2hlY2tDYWxsZXIiFnZvdGluZ0VtaXNzaW9uQ29udHJhY3QiBWNoZWtzIhdwZW5kaW5nTWFuYWdlclB1YmxpY0tleSIVY2hlY2tNYW5hZ2VyUHVibGljS2V5IgJwbSIFaGFzUE0iB2NoZWNrUE0iA3BtdCIJY2FsbGVyU3RyIg0kdDAyMTYwNjIxNzIzIglwb29sQWRkb24iBnJlc3VsdCIQY2xhaW1lZEJ5VXNlcktFWSIPY2xhaW1lZFRvdGFsS0VZIhljbGFpbWVkQnlVc2VyTWluUmV3YXJkS0VZIhtjbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmRLRVkiDWNsYWltZWRCeVVzZXIiGGNsYWltZWRCeVVzZXJCb29zdFJld2FyZCIMY2xhaW1lZFRvdGFsIg0kdDAyNTEwOTI1MjIxIhJ3eEFtb3VudEJvb3N0VG90YWwiDW1pblJld2FyZFBhcnQiD2Jvb3N0UmV3YXJkUGFydCILdG90YWxSZXdhcmQiCXd4QXNzZXRJZCIJZW1pdEJvb3N0IhJjbGFpbWVkQnlVc2VyVmFsdWUiHmNsYWltZWRCeVVzZXJNaW5SZXdhcmRQbHVzUGFydCIrY2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkUGx1c0Jvb3N0UmV3YXJkUGFydCIgY2xhaW1lZFRvdGFsUGx1c0F2YWlsYWJsZVRvQ2xhaW0iC2N1cnJlbnRJdGVyIgpscEFzc2V0SWRzIgZyZXNBY2MiBGluZm8iCXVuY2xhaW1lZCIHY2xhaW1lZCIRdXNlclZvdGVGaW5hbGl6ZWQiA3JlcyIDaW52IhJ3eEVtaXNzaW9uUGVyQmxvY2siDHBhc3NlZEJsb2NrcyIOcG9vbFd4RW1pc3Npb24iDHVzZXJXeFJld2FyZCINJHQwMjkyNjkyOTM4MSIOYm9vc3RJbnZSZXN1bHQiCmJvb3N0RGVidWciCnVzZXJPclVuaXQiByRtYXRjaDEiBGhlYWQiDm5leHRVc2VyT3JVbml0IghuZXh0VXNlciINJHQwMzIwMDIzMjExMiICdHgiBnZlcmlmeSIPdGFyZ2V0UHVibGljS2V5ZAABYQAIAAFiAOgHAAFjAIDC1y8AAWQAEgABZQkAtgIBAICAkLu61q3wDQABZgICX18AAWcFAWMAAWgJALYCAQAAAAFpCQC2AgEAAQEBagEBawkAuQkCCQDMCAICDXN0YWtpbmcucmlkZToJAMwIAgkApQgBBQR0aGlzCQDMCAIFAWsFA25pbAIBIAEBbAEBawkAAgEJAQFqAQUBawEBbQEBbgQBbwUBbgMJAAECBQFvAglMaXN0W0FueV0EAXAFAW8FAXAJAAIBAhtmYWlsIHRvIGNhc3QgaW50byBMaXN0W0FueV0BAXEBAW4EAW8FAW4DCQABAgUBbwIDSW50BAFyBQFvBQFyCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQFzAQFuBAFvBQFuAwkAAQIFAW8CBlN0cmluZwQBdAUBbwUBdAkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEBdQEBbgQBbwUBbgMJAAECBQFvAgpCeXRlVmVjdG9yBAF2BQFvBQF2CQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQF3AgF4AXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQF4BQF5CQCsAgIJAKwCAgIPbWFuZGF0b3J5IHRoaXMuBQF5Ag8gaXMgbm90IGRlZmluZWQBAXoCAXgBeQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAXgFAXkJAKwCAgkArAICCQCsAgIJAKwCAgIKbWFuZGF0b3J5IAkApQgBBQF4AgEuBQF5Ag8gaXMgbm90IGRlZmluZWQBAUECAXgBeQkBC3ZhbHVlT3JFbHNlAgkAmggCBQF4BQF5AAABAUIDAXgBeQFDCQELdmFsdWVPckVsc2UCCQCaCAIFAXgFAXkFAUMBAUQCAXgBeQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFAXgFAXkJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FAXkCDyBpcyBub3QgZGVmaW5lZAEBRQIBeAF5CQEFdmFsdWUBCQCoAwEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUBeAUBeQIBMAEBRgMBeAF5AUMEAW8JAJ0IAgUBeAUBeQMJAAECBQFvAgZTdHJpbmcEAUcFAW8JAQV2YWx1ZQEJAKgDAQUBRwMJAAECBQFvAgRVbml0BQFDCQACAQILTWF0Y2ggZXJyb3IBAUgCAUkBSgkAvAIDCQC2AgEFAUkFAWUJALYCAQUBSgEBSwIBbgFMCQCgAwEJALwCAwUBbgkAtgIBBQFMBQFlAQFNAAIcJXMlc19fY29uZmlnX19mYWN0b3J5QWRkcmVzcwEBTgACGiVzX192b3RpbmdFbWlzc2lvbkNvbnRyYWN0AAFPAAEAAVAAAgABUQADAAFSAAQAAVMABQABVAAGAAFVAAcBAVYAAhElc19fZmFjdG9yeUNvbmZpZwEBVwACFCVzX19tYW5hZ2VyUHVibGljS2V5AQFYAAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQFZAAIXJXNfX3N0YWJsZVBvb2xBZGRvbkFkZHIBAVoAAg0lc19fYWRkb25BZGRyAQJhYQECYWIJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYWIJAMwIAgIebWFwcGluZ3NfX2xwQXNzZXQyUG9vbENvbnRyYWN0BQNuaWwFAWYBAmFjAAIQJXNfX2xwVG9rZW5zTGlzdAECYWQBAmFiCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFiCQDMCAICHm1hcHBpbmdzX19scEFzc2V0MlBvb2xDb250cmFjdAUDbmlsBQFmAQJhZQECYWYJALkJAgkAzAgCAgQlcyVzCQDMCAICCnBvb2xXZWlnaHQJAMwIAgUCYWYFA25pbAUBZgECYWcBAmFoCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUCYWgJAQJhYwACAAUBZgECYWkBAmFoCQC1CQIJAQF6AgUCYWgJAQFWAAUBZgECYWoBAmFrCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFrBQFQAQJhbAECYWsJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYWsFAVMBAmFtAQJhawkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQJhawUBTwECYW4AAhslcyVzX19yYXRlUGVyQmxvY2tfX2N1cnJlbnQBAmFvAAIeJXMlc19fcmF0ZVBlckJsb2NrTWF4X19jdXJyZW50AQJhcAACGiVzJXNfX2VtaXNzaW9uX19zdGFydEJsb2NrAQJhcQACGCVzJXNfX2VtaXNzaW9uX19kdXJhdGlvbgECYXIAAhglcyVzX19lbWlzc2lvbl9fZW5kQmxvY2sBAmFzAgJhdAJhdQkAuQkCCQDMCAICDiVzJXMlc19fc3Rha2VkCQDMCAIFAmF0CQDMCAIFAmF1BQNuaWwFAWYBAmF2AQJhdQkArAICAhclcyVzJXNfX3N0YWtlZF9fdG90YWxfXwUCYXUBAmF3AgJhdQJhdAkAuQkCCQDMCAICDyVzJXMlc19fY2xhaW1lZAkAzAgCBQJhdAkAzAgCBQJhdQUDbmlsBQFmAQJheAICYXUCYXQJALkJAgkAzAgCAhglcyVzJXNfX2NsYWltZWRNaW5SZXdhcmQJAMwIAgUCYXQJAMwIAgUCYXUFA25pbAUBZgECYXkCAmF1AmF0CQC5CQIJAMwIAgIaJXMlcyVzX19jbGFpbWVkQm9vc3RSZXdhcmQJAMwIAgUCYXQJAMwIAgUCYXUFA25pbAUBZgECYXoBAmF1CQC5CQIJAMwIAgIWJXMlcyVzX19jbGFpbWVkX190b3RhbAkAzAgCBQJhdQUDbmlsBQFmAQJhQQEBeQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQF5AAABAmFCAQJhQwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQwkAzAgCAgV0b3RhbAkAzAgCAgNiYWwFA25pbAUBZgECYUQCAmFDAmFFCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFDCQDMCAIFAmFFCQDMCAICA2JhbAUDbmlsBQFmAQJhRgECYUMJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUMJAMwIAgIFdG90YWwJAMwIAgIGYmFsSU5UBQNuaWwFAWYBAmFHAgJhQwJhRQkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQwkAzAgCBQJhRQkAzAgCAgZiYWxJTlQFA25pbAUBZgECYUgBAmFDCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFDCQDMCAICBXRvdGFsCQDMCAICB2xhc3RVcGQFA25pbAUBZgECYUkCAmFDAmFFCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFDCQDMCAIFAmFFCQDMCAICB2xhc3RVcGQFA25pbAUBZgECYUoBAmFDCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYUMJAMwIAgIGY29tbW9uCQDMCAICBWxwSW50BQNuaWwFAWYBAmFLAQJhQwkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFDCQDMCAICBmNvbW1vbgkAzAgCAgZscEludEgFA25pbAUBZgECYUwCAmFDAmFFCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYUMJAMwIAgUCYUUJAMwIAgIFbHBJbnQFA25pbAUBZgECYU0CAmFDAmFFCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYUMJAMwIAgUCYUUJAMwIAgIGbHBJbnRIBQNuaWwFAWYBAmFOAQJhQwkAuQkCCQDMCAICAiVzCQDMCAIFAmFDCQDMCAICB3d4UGVyTHAFA25pbAUBZgECYU8BAmFDCQC5CQIJAMwIAgICJXMJAMwIAgUCYUMJAMwIAgIKd3hQZXJMcFgxOAUDbmlsBQFmAQJhUAICYUMCYUUJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJhQwkAzAgCBQJhRQkAzAgCAgV1SW50TAUDbmlsBQFmAQJhUQMCYVICYUUCYVMJALkJAgkAzAgCAhElcyVzJXMlc19faGlzdG9yeQkAzAgCBQJhUgkAzAgCBQJhRQkAzAgCBQJhUwUDbmlsBQFmAQJhVAQCYUUCYUMCYVICYVUJALkJAgkAzAgCAgwlcyVzJXMlZCVkJWQJAMwIAgUCYUUJAMwIAgUCYUMJAMwIAgUCYVIJAMwIAgkApAMBBQZoZWlnaHQJAMwIAgkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQCkAwEFAmFVBQNuaWwFAWYBAmFWBQJhUgJhRQJhQwJhVQJhVwkBC1N0cmluZ0VudHJ5AgkBAmFRAwUCYVIFAmFFCQDYBAEFAmFXCQECYVQEBQJhRQUCYUMFAmFSBQJhVQACYVgJAQF3AgUEdGhpcwkBAU0AAAJhWQkBEUBleHRyTmF0aXZlKDEwNjIpAQUCYVgAAmFrCQECYWkBBQJhWQACYVoJAQJhbAEFAmFrAAJiYQkBAmFqAQUCYWsAAmJiCgACYmMJAPwHBAUCYVoCFWdldEJvb3N0Q29lZmZSRUFET05MWQUDbmlsBQNuaWwDCQABAgUCYmMCA0ludAUCYmMJAAIBCQCsAgIJAAMBBQJiYwIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50AAJiZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQC5CQIJAMwIAgICJXMJAMwIAgIWbHBTdGFraW5nUG9vbHNDb250cmFjdAUDbmlsBQFmCQEBagECLmxwX3N0YWtpbmdfcG9vbHMgY29udHJhY3QgYWRkcmVzcyBpcyB1bmRlZmluZWQJAQFqAQIpaW52YWxpZCBscF9zdGFraW5nX3Bvb2xzIGNvbnRyYWN0IGFkZHJlc3MBAmJlAQJhQwkAuQkCCQDMCAICBCVzJXMJAMwIAgUCYUMJAMwIAgIIbmV4dFVzZXIFA25pbAUBZgECYmYBAmFDCQC5CQIJAMwIAgIFdXNlcnMJAMwIAgUCYUMFA25pbAUBZgECYmcBAmJoCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmJoCQDMCAICBGhlYWQFA25pbAUBZgECYmkBAmJoCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmJoCQDMCAICBHNpemUFA25pbAUBZgECYmoCAmJoAmJrCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYmgJAMwIAgUCYmsJAMwIAgIEcHJldgUDbmlsBQFmAQJibAICYmgCYmsJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJiaAkAzAgCBQJiawkAzAgCAgRuZXh0BQNuaWwFAWYBAmJtAgJiaAJiawQCYm4JAJ0IAgUEdGhpcwkBAmJnAQUCYmgEAmJvCQCdCAIFBHRoaXMJAQJiagIFAmJoBQJiawQCYnAJAJ0IAgUEdGhpcwkBAmJsAgUCYmgFAmJrAwMJAAACBQJiawkBC3ZhbHVlT3JFbHNlAgUCYm4CAAYJAQIhPQIFAmJvBQR1bml0BgkBAiE9AgUCYnAFBHVuaXQBAmJxAgJiaAJiawQCYm4JAJ0IAgUEdGhpcwkBAmJnAQUCYmgEAmJyCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAQJiaQEFAmJoAAAEAmJzAwkBASEBCQECYm0CBQJiaAUCYmsGCQACAQILTm9kZSBleGlzdHMDCQAAAgUCYnMFAmJzCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmJpAQUCYmgJAGQCBQJicgABBQNuaWwDCQECIT0CBQJibgUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQECYmwCBQJiaAUCYmsJAQV2YWx1ZQEFAmJuCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiagIFAmJoCQEFdmFsdWUBBQJibgUCYmsFA25pbAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZwEFAmJoBQJiawUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJidAICYmgCYmsEAmJuCQCdCAIFBHRoaXMJAQJiZwEFAmJoBAJicgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQECYmkBBQJiaAAABAJibwkAnQgCBQR0aGlzCQECYmoCBQJiaAUCYmsEAmJwCQCdCAIFBHRoaXMJAQJibAIFAmJoBQJiawkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYmkBBQJiaAkAZQIFAmJyAAEFA25pbAMDCQECIT0CBQJibwUEdW5pdAkBAiE9AgUCYnAFBHVuaXQHCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJibAIFAmJoCQEFdmFsdWUBBQJibwkBBXZhbHVlAQUCYnAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJqAgUCYmgJAQV2YWx1ZQEFAmJwCQEFdmFsdWUBBQJibwkAzAgCCQELRGVsZXRlRW50cnkBCQECYmoCBQJiaAUCYmsJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJsAgUCYmgFAmJrBQNuaWwDCQECIT0CBQJicAUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQECYmcBBQJiaAkBBXZhbHVlAQUCYnAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJsAgUCYmgFAmJrCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiagIFAmJoCQEFdmFsdWUBBQJicAUDbmlsAwkBAiE9AgUCYm8FBHVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJqAgUCYmgFAmJrCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJibAIFAmJoCQEFdmFsdWUBBQJibwUDbmlsAwkAAAIFAmJrCQELdmFsdWVPckVsc2UCBQJibgIACQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiZwEFAmJoBQNuaWwJAAIBCQCsAgIJAKwCAgkArAICAg5pbnZhbGlkIG5vZGU6IAUCYmgCAS4FAmJrAQJidQQCYnYCYncCYngCYnkDAwkAAAIFAmJ3BQFoCQC/AgIFAmJ2BQFoBwUBaAMJAAACBQJidgUBaAUCYngDAwkAvwICBQJidwUBaAkAvwICBQJidgUBaAcJAQV2YWx1ZQEJAKgDAQkBAXcCBQR0aGlzBQJieQkAAgECLWNhbGNXeFBlckxwSW50ZWdyYWxVc2VyTGFzdDogdW5leHBlY3RlZCBzdGF0ZQECYnoDAmF1AmJBAmJCBAJiQwkBAmF2AQUCYXUEAmJECQC2AgEJAQJhQQEFAmJDBAJiRQMJAAACBQJiRAUBaAUBaQUCYkQEAmJGCQERQGV4dHJOYXRpdmUoMTA1MCkCBQJhWQkBAmFlAQUCYkEEAmJHCQEBRAIFAmFaCQECYXAABAJiSAkAaAIJAQFEAgUCYVoJAQJhbgAFAWIEAmJJCQBrAwUCYkgFAmJGCQBoAgUBZwUCYmIEAmJKCQECYUoBBQJhdQQCYksJAQJhSwEFAmF1BAJiTAkBAmFOAQUCYXUEAmJNCQEBQgMFBHRoaXMFAmJLBQJiRwQCYk4JAQFFAgUEdGhpcwUCYkoEAmJPAAAEAmJQCQCWAwEJAMwIAgkAZQIFBmhlaWdodAUCYk0JAMwIAgAABQNuaWwEAmJRAwkBAiE9AgUCYk8AAAkAtgIBBQJiTwkAvAIDCQC2AgEFAmJJCQC2AgEFAWMFAmJFBAJiUgkAtwICBQJiRAkAtgIBBQJiQgQCYlMDCQAAAgUCYlIFAWgFAWkFAmJSBAJieAkAtwICBQJiTgkAuQICBQJiUQkAtgIBBQJiUAQCYlQJALoCAgkAtgIBBQJiSQUCYlMEAmJVBQZoZWlnaHQEAmJWCQC5CQIJAMwIAgkApgMBBQJieAkAzAgCCQCkAwEFAmJQCQDMCAIJAKYDAQUCYlEJAMwIAgkApgMBBQJiRAkAzAgCCQCkAwEFAmJJCQDMCAIJAKQDAQUCYkgJAMwIAgkApAMBBQJiRgUDbmlsAgI6OgkAlQoDBQJieAkAzAgCCQELU3RyaW5nRW50cnkCBQJiSgkApgMBBQJieAkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYksFAmJVCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmJMCQCmAwEFAmJUBQNuaWwFAmJWAQJiVwQCYXUCYXQCYkECYkIEAmJYCQECYnoDBQJhdQUCYkEFAmJCBAJieAgFAmJYAl8xBAJiWQgFAmJYAl8yBAJiWggFAmJYAl8zBAJjYQkBAmFzAgUCYXQFAmF1BAJidgkBAmFBAQUCY2EEAmNiCQECYUwCBQJhdQUCYXQEAmNjCQECYU0CBQJhdQUCYXQEAmJ5CQECYVACBQJhdQUCYXQEAmNkCQEBRQIFBHRoaXMFAmNiBAJidwkBAUECBQR0aGlzBQJjYwQCY2UJAQJidQQJALYCAQUCYnYJALYCAQUCYncFAmJ4BQJieQQCY2YJAGgCBQFjBQFiBAJjZwkAmAMBCQDMCAIJALcCAgUCY2QJALwCAwkAuAICBQJieAUCY2UJALYCAQUCYnYJALYCAQUCY2YJAMwIAgUBaAUDbmlsBAJjaAUCYngEAmNpBQZoZWlnaHQEAmJWCQC5CQIJAMwIAgkApgMBBQJjZAkAzAgCCQCmAwEFAmNlCQDMCAIJAKQDAQUCYnYJAMwIAgUCYloJAMwIAgkApAMBBQZoZWlnaHQFA25pbAICOjoJAJUKAwUCY2cJAM4IAgUCYlkJAMwIAgkBC1N0cmluZ0VudHJ5AgUCY2IJAKYDAQUCY2cJAMwIAgkBDEludGVnZXJFbnRyeQIFAmNjBQJjaQkAzAgCCQELU3RyaW5nRW50cnkCBQJieQkApgMBBQJjaAUDbmlsBQJiVgECY2oABAFvCQCiCAEJAQFXAAMJAAECBQFvAgZTdHJpbmcEAUcFAW8JANkEAQUBRwMJAAECBQFvAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBAmNrAAQBbwkAoggBCQEBWAADCQABAgUBbwIGU3RyaW5nBAFHBQFvCQDZBAEFAUcDCQABAgUBbwIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAAJjbAkAAgECEVBlcm1pc3Npb24gZGVuaWVkAQJjbQECY24DCQAAAggFAmNuBmNhbGxlcgUEdGhpcwYFAmNsAQJjbwECY24EAW8JAQJjagADCQABAgUBbwIKQnl0ZVZlY3RvcgQCY3AFAW8DCQAAAggFAmNuD2NhbGxlclB1YmxpY0tleQUCY3AGBQJjbAMJAAECBQFvAgRVbml0AwkAAAIIBQJjbgZjYWxsZXIFBHRoaXMGBQJjbAkAAgECC01hdGNoIGVycm9yAQJjcQYCY24CYUMCY3ICYUUCY3MCYVUEAmF0CQClCAEFAmFFBAJhdQkA2AQBBQJhQwQCYkEJAKUIAQUCY3IEAmNhCQECYXMCBQJhdAUCYXUEAmJDCQECYXYBBQJhdQQCYnYJAQJhQQEFAmNhBAJiRAkBAmFBAQUCYkMEAmN0CAkBAmJXBAUCYXUFAmF0BQJiQQkBAS0BBQJhVQJfMgQCYmgJAQJiZgEFAmF1BAJjdQMDCQECYm0CBQJiaAUCYXQJAAACBQJhVQUCYnYHCQECYnQCBQJiaAUCYXQFA25pbAQCY3YDCQAAAgUCYVUFAmJ2CQD8BwQFAmJhAhJvblN0YWtlZFZvdGVVcGRhdGUJAMwIAgUCYXUJAMwIAgUCYXQJAMwIAgcFA25pbAUDbmlsBQR1bml0AwkAAAIFAmN2BQJjdgQCY3cJAQFFAgUEdGhpcwkBAmF4AgUCYXUFAmF0BAJjZwgJAQJiVwQFAmF1BQJhdAUCYkEAAAJfMQQCY3gJALgCAgUCY2cFAmN3BAJjeQYEAmN6AwkAvwICBQJjeAUBaAkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXUJAMwIAgUCYXQJAMwIAgUCY3kFA25pbAUDbmlsBQR1bml0AwkAAAIFAmN6BQJjegMJAGYCBQJhVQUCYnYJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICDnBhc3NlZCBhbW91bnQ9CQCkAwEFAmFVAhsgaXMgZ3JlYXRlciB0aGFuIGF2YWlsYWJsZT0JAKQDAQUCYnYCDC4gbHBBc3NldElkPQUCYXUCEi4gc3Rha2VkQnlVc2VyS0VZPQUCY2EJAM4IAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJjYQkAZQIFAmJ2BQJhVQkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYkMJAGUCBQJiRAUCYVUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCY3MFAmFVBQJhQwkAzAgCCQECYVYFAgd1bnN0YWtlBQJhdAUCYXUFAmFVCAUCY24NdHJhbnNhY3Rpb25JZAUDbmlsBQJjdAUCY3UJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4QAmNuAQtjb25zdHJ1Y3RvcgECY0EEAmNCCQECY28BBQJjbgMJAAACBQJjQgUCY0IJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAU0ABQJjQQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNuAQ1jb25zdHJ1Y3RvclYyAQJjQwQCY0QJAMwIAgkBAmNvAQUCY24JAMwIAgMJAQIhPQIJAKYIAQUCY0MFBHVuaXQGAihpbnZhbGlkIHZvdGluZyBlbWlzc2lvbiBjb250cmFjdCBhZGRyZXNzBQNuaWwDCQAAAgUCY0QFAmNECQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFOAAUCY0MFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJjbgEKc2V0TWFuYWdlcgECY0UEAmNCCQECY28BBQJjbgMJAAACBQJjQgUCY0IEAmNGCQDZBAEFAmNFAwkAAAIFAmNGBQJjRgkAzAgCCQELU3RyaW5nRW50cnkCCQEBWAAFAmNFBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY24BDmNvbmZpcm1NYW5hZ2VyAAQCY0cJAQJjawAEAmNIAwkBCWlzRGVmaW5lZAEFAmNHBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJjSAUCY0gEAmNJAwkAAAIIBQJjbg9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmNHBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJjSQUCY0kJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAVcACQDYBAEJAQV2YWx1ZQEFAmNHCQDMCAIJAQtEZWxldGVFbnRyeQEJAQFYAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNuAQVzdGFrZQADCQECIT0CCQCQAwEIBQJjbghwYXltZW50cwABCQACAQI0aW52YWxpZCBwYXltZW50IC0gZXhhY3Qgb25lIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQCY0oJAJEDAggFAmNuCHBheW1lbnRzAAAEAmFDCQEFdmFsdWUBCAUCY0oHYXNzZXRJZAQCYXUJANgEAQUCYUMEAmFVCAUCY0oGYW1vdW50BAJiQQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFZCQECYWEBBQJhdQkArAICAhV1bnN1cHBvcnRlZCBscCBhc3NldCAFAmF1BAJjSwkApQgBCAUCY24GY2FsbGVyBAJhdAMJAAACBQJjSwUCYkEJAKUIAQgFAmNuDG9yaWdpbkNhbGxlcgUCY0sEAmNhCQECYXMCBQJhdAUCYXUEAmJDCQECYXYBBQJhdQQCYnYJAQJhQQEFAmNhBAJjdgMJAAACBQJidgAACQD8BwQFAmJhAhJvblN0YWtlZFZvdGVVcGRhdGUJAMwIAgUCYXUJAMwIAgUCYXQJAMwIAgYFA25pbAUDbmlsBQR1bml0AwkAAAIFAmN2BQJjdgQCYkQJAQJhQQEFAmJDBAJjTAkBAmJXBAUCYXUFAmF0BQJiQQUCYVUEAmNnCAUCY0wCXzEEAmN0CAUCY0wCXzIEAmJWCAUCY0wCXzMEAmJoCQECYmYBBQJhdQQCY3UDCQECYm0CBQJiaAUCYXQFA25pbAkBAmJxAgUCYmgFAmF0CQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUCY2EJAGQCBQJidgUCYVUJAMwIAgkBDEludGVnZXJFbnRyeQIFAmJDCQBkAgUCYkQFAmFVCQDMCAIJAQJhVgUCBXN0YWtlBQJhdAUCYXUFAmFVCAUCY24NdHJhbnNhY3Rpb25JZAUDbmlsBQJjdAUCY3UJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY24BB3Vuc3Rha2UCAmF1AmFVBAJhQwkA2QQBBQJhdQQCYkEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhWQkBAmFhAQUCYXUJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQJhdQQCY3IJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAmJBBAJjTQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQJjcgkBAVoABQJiQQQCY0sJAKUIAQgFAmNuBmNhbGxlcgQCYUUDAwkAAAIFAmNLBQJiQQYJAAACBQJjSwUCY00IBQJjbgxvcmlnaW5DYWxsZXIIBQJjbgZjYWxsZXIEAmNzCAUCY24GY2FsbGVyCQECY3EGBQJjbgUCYUMFAmNyBQJhRQUCY3MFAmFVAmNuAQ91bnN0YWtlSU5URVJOQUwEAmFDAmFVAmFFAmNzBAJhdQkA2AQBBQJhQwQCY3IJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhWQkBAmFhAQUCYXUJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQJhdQQCY0IDCQAAAggFAmNuBmNhbGxlcgUCY3IGBQJjbAMJAAACBQJjQgUCY0IJAQJjcQYFAmNuBQJhQwUCY3IJAQdBZGRyZXNzAQUCYUUJAQdBZGRyZXNzAQUCY3MFAmFVCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNuAQdjbGFpbVd4AQJhdQQCYXQJAKUIAQgFAmNuBmNhbGxlcgQCY3kGBAJjTgkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXUJAMwIAgUCYXQJAMwIAgUCY3kFA25pbAUDbmlsCQCUCgIFA25pbAUCY04CY24BEWNsYWltV3hEb05vdFRocm93AQJhdQQCYXQJAKUIAQgFAmNuBmNhbGxlcgQCY3kHBAJjTgkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXUJAMwIAgUCYXQJAMwIAgUCY3kFA25pbAUDbmlsCQCUCgIFA25pbAUCY04CY24BD2NsYWltV3hJTlRFUk5BTAMCYXUCYXQCY3kEAmNCCQECY20BBQJjbgMJAAACBQJjQgUCY0IEAmFFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQUCYXQCJWNsYWltV3hJTlRFUk5BTDogaW52YWxpZCB1c2VyIGFkZHJlc3MEAmJBCQEBegIFAmFZCQECYWQBBQJhdQQCY08JAQJhdwIFAmF1BQJhdAQCY1AJAQJhegEFAmF1BAJjUQkBAmF4AgUCYXUFAmF0BAJjUgkBAmF5AgUCYXUFAmF0BAJjUwkBAUUCBQR0aGlzBQJjTwQCY3cJAQFFAgUEdGhpcwUCY1EEAmNUCQEBRQIFBHRoaXMFAmNSBAJjVQkBAUUCBQR0aGlzBQJjUAQCY1YJAQJiVwQFAmF1BQJhdAUCYkEAAAQCY2cIBQJjVgJfMQQCY3QIBQJjVgJfMgQCYlYIBQJjVgJfMwQCY3gJAJgDAQkAzAgCCQC4AgIFAmNnBQJjdwkAzAgCBQFoBQNuaWwDCQDAAgIFAWgFAmN4AwUCY3kJAAIBAhBub3RoaW5nIHRvIGNsYWltCQCUCgIFA25pbAAABAJjVwkAlgMBCQDMCAIJAQFxAQkAkQMCCQEBbQEJAPwHBAUCYmECDGNsYWltV3hCb29zdAkAzAgCBQJhdQkAzAgCBQJhdAUDbmlsBQNuaWwAAAkAzAgCAAAFA25pbAQCY1gFAmN4BAJjWQkAmQMBCQDMCAIJALkCAgUCY1gJALYCAQkAZQIFAmJiAAEJAMwIAgkAtgIBBQJjVwUDbmlsBAJjWgkAtwICBQJjWAUCY1kEAmRhCQEBdQEJAJEDAgkBAW0BCQD8BwQFAmFaAgRlbWl0CQDMCAIJAKADAQUCY1gFA25pbAUDbmlsAAAEAmRiCQEBbQEJAPwHBAUCYVoCBGVtaXQJAMwIAgkAoAMBBQJjWQUDbmlsBQNuaWwDCQAAAgUCZGIFAmRiBAJkYwkAtwICCQC3AgIFAmNTBQJjWAUCY1kEAmRkCQC3AgIFAmN3BQJjWAQCZGUJALcCAgUCY1QFAmNZBAJkZgkAtwICBQJjVQUCY3gJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQJjTwkApgMBBQJkYwkAzAgCCQELU3RyaW5nRW50cnkCBQJjUQkApgMBBQJkZAkAzAgCCQELU3RyaW5nRW50cnkCBQJjUgkApgMBBQJkZQkAzAgCCQELU3RyaW5nRW50cnkCBQJjUAkApgMBBQJkZgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhRQkAoAMBBQJjWAUCZGEJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUUJAKADAQUCY1kFAmRhCQDMCAIJAQJhVgUCBWNsYWltBQJhdAUCYXUJAKADAQUCY3gIBQJjbg10cmFuc2FjdGlvbklkBQNuaWwJAKADAQUCY1oJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY24BG2NsYWltV3hCdWxrSW50ZXJuYWxSRUFET05MWQQCZGcCZGgCYXQCZGkDCQAAAgUCZGcJAJADAQUCZGgJAJQKAgUDbmlsBQJkaQQCYUMJAJEDAgUCZGgFAmRnBAJkagkAtQkCCgACYmMJAPwHBAUEdGhpcwIPY2xhaW1XeFJFQURPTkxZCQDMCAIFAmFDCQDMCAIFAmF0BQNuaWwFA25pbAMJAAECBQJiYwIGU3RyaW5nBQJiYwkAAgEJAKwCAgkAAwEFAmJjAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcFAWYEAmRrCQCRAwIFAmRqAAMEAmRsCQCRAwIFAmRqAAQEAmRtCgACYmMJAPwHBAUCYmECHGdldFVzZXJWb3RlRmluYWxpemVkUkVBRE9OTFkJAMwIAgUCYUMJAMwIAgUCYXQFA25pbAUDbmlsAwkAAQIFAmJjAgNJbnQFAmJjCQACAQkArAICCQADAQUCYmMCGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAQCZG4JAM0IAgUCZGkJALkJAgkAzAgCAgYlZCVkJWQJAMwIAgUCZGsJAMwIAgUCZGwJAMwIAgkApAMBBQJkbQUDbmlsBQFmBAJkbwoAAmJjCQD8BwQFBHRoaXMCG2NsYWltV3hCdWxrSW50ZXJuYWxSRUFET05MWQkAzAgCCQBkAgUCZGcAAQkAzAgCBQJkaAkAzAgCBQJhdAkAzAgCBQJkbgUDbmlsBQNuaWwDCQABAgUCYmMCCUxpc3RbQW55XQUCYmMJAAIBCQCsAgIJAAMBBQJiYwIeIGNvdWxkbid0IGJlIGNhc3QgdG8gTGlzdFtBbnldAwkAAAIFAmRvBQJkbwkAlAoCBQNuaWwFAmRvCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNuARNjbGFpbVd4QnVsa1JFQURPTkxZAgJkaAJhdAQCZG4JAPwHBAUEdGhpcwIbY2xhaW1XeEJ1bGtJbnRlcm5hbFJFQURPTkxZCQDMCAIAAAkAzAgCBQJkaAkAzAgCBQJhdAkAzAgCBQNuaWwFA25pbAUDbmlsCQCUCgIFA25pbAUCZG4CY24BD2NsYWltV3hSRUFET05MWQICYXUCYXQEAmNhCQECYXMCBQJhdAUCYXUEAmJDCQECYXYBBQJhdQQCY08JAQJhdwIFAmF1BQJhdAQCY1EJAQJheAIFAmF1BQJhdAQCYnYJAQJhQQEFAmNhBAJiRAkBAmFBAQUCYkMEAmNTCQEBRQIFBHRoaXMFAmNPBAJjdwkBAUUCBQR0aGlzBQJjUQQCYkEJAQF6AgUCYVkJAQJhZAEFAmF1BAJiRgkBEUBleHRyTmF0aXZlKDEwNTApAgUCYVkJAQJhZQEFAmJBBAJkcAkBAUQCBQJhWgkBAmFuAAQCYkcJAQFEAgUCYVoJAQJhcAAEAmRxAwkAZgIFAmJHBQZoZWlnaHQAAAkAZQIFBmhlaWdodAUCYkcEAmRyCQBrAwkAaAIFAmRwBQJkcQUCYkYFAWcEAmRzCQBrAwUCZHIFAmJ2BQJiRAQCZHQJAQJiVwQFAmF1BQJhdAUCYkEAAAQCY2cIBQJkdAJfMQQCY3QIBQJkdAJfMgQCYlYIBQJkdAJfMwQCY3gJAJgDAQkAzAgCCQC4AgIFAmNnBQJjdwkAzAgCBQFoBQNuaWwEAmR1CQEBbQEJAPwHBAUCYmECFGNsYWltV3hCb29zdFJFQURPTkxZCQDMCAIFAmF1CQDMCAIFAmF0BQNuaWwFA25pbAQCY1cJAJYDAQkAzAgCCQEBcQEJAJEDAgUCZHUAAAkAzAgCAAAFA25pbAQCZHYJAQFzAQkAkQMCBQJkdQABBAJjWAUCY3gEAmNZCQCZAwEJAMwIAgkAuQICBQJjWAkAtgIBCQBlAgUCYmIAAQkAzAgCCQC2AgEFAmNXBQNuaWwEAmNaCQC3AgIFAmNYBQJjWQkAlAoCBQNuaWwJALkJAgkAzAgCAg4lcyVzJWQlZCVkJWQlcwkAzAgCBQJhdQkAzAgCBQJhdAkAzAgCCQCmAwEFAmNaCQDMCAIJAKYDAQUCY1MJAMwIAgkApgMBBQJjWAkAzAgCCQCmAwEFAmNZCQDMCAICBHNvb24FA25pbAUBZgJjbgEUc3Rha2VkQnlVc2VyUkVBRE9OTFkCAmF1AmF0BAJidgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYXMCBQJhdAUCYXUAAAkAlAoCBQNuaWwFAmJ2AmNuARJ1c2Vyc0xpc3RUcmF2ZXJzYWwBAmFDBAJjQgMJAAACCQDYBAEICAUCY24GY2FsbGVyBWJ5dGVzCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQFOAAIABgkBAmNvAQUCY24DCQAAAgUCY0IFAmNCBAJiaAkBAmJmAQUCYUMEAmR3CQCiCAEJAQJiZQEFAmFDBAJibgkAoggBCQECYmcBBQJiaAQBbwUCZHcDCQABAgUBbwIEVW5pdAQCZHgFAmJuAwkAAQIFAmR4AgRVbml0CQCUCgIFA25pbAcDCQABAgUCZHgCBlN0cmluZwQCZHkFAmR4CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJlAQUCYUMFAmR5BQNuaWwGCQACAQILTWF0Y2ggZXJyb3IDCQABAgUBbwIGU3RyaW5nBAJhRQUBbwQCY3cJAQFFAgUEdGhpcwkBAmF4AgUCYUMFAmFFBAJjcgkBAXoCBQJhWQkBAmFkAQUCYUMEAmNnCAkBAmJXBAUCYUMFAmFFBQJjcgAAAl8xBAJjeAkAuAICBQJjZwUCY3cEAmN5BgQCY3oDCQC/AgIFAmN4BQFoCQD8BwQFBHRoaXMCD2NsYWltV3hJTlRFUk5BTAkAzAgCBQJhQwkAzAgCBQJhRQkAzAgCBQJjeQUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCY3oFAmN6BAJkegkAoggBCQECYmwCBQJiaAUCYUUEAmR4BQJkegMJAAECBQJkeAIEVW5pdAkAlAoCCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiZQEFAmFDBQNuaWwHAwkAAQIFAmR4AgZTdHJpbmcEAmRBBQJkeAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZQEFAmFDBQJkQQUDbmlsBgkAAgECC01hdGNoIGVycm9yCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQILTWF0Y2ggZXJyb3IJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY24BDm9uTW9kaWZ5V2VpZ2h0AgJhdQJiQQMJAQIhPQIIBQJjbgZjYWxsZXIFAmFZCQACAQIScGVybWlzc2lvbnMgZGVuaWVkBAJkQgkBAmJ6AwUCYXUFAmJBAAAEAmJ4CAUCZEICXzEEAmJZCAUCZEICXzIEAmJaCAUCZEICXzMFAmJZAQJkQwECZEQABAJkRQQBbwkBAmNqAAMJAAECBQFvAgpCeXRlVmVjdG9yBAJjcAUBbwUCY3ADCQABAgUBbwIEVW5pdAgFAmRDD3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yCQD0AwMIBQJkQwlib2R5Qnl0ZXMJAJEDAggFAmRDBnByb29mcwAABQJkRQFUL/M=", "height": 2483780, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 9wdw25zHJFRAv4HbHsdQntcoacSpWEMTi5Ue4KoWDW6m Next: BCgjAX1cXff2ep4f9E1YwtMHZaLerpCf831HCJy58phs Diff:
OldNewDifferences
1818 let zeroBigInt = toBigInt(0)
1919
2020 let oneBigInt = toBigInt(1)
21+
22+func wrapErr (msg) = makeString(["staking.ride:", toString(this), msg], " ")
23+
24+
25+func throwErr (msg) = throw(wrapErr(msg))
26+
2127
2228 func asAnyList (val) = match val {
2329 case valAnyLyst: List[Any] =>
248254 else throw(($getType(@) + " couldn't be cast to Int"))
249255 }
250256
257+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"))
258+
251259 func keyNextUser (lpAssetId) = makeString(["%s%s", lpAssetId, "nextUser"], SEP)
252260
253261
357365
358366
359367 func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
360- let $t01428614408 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
361- let wxPerLpIntegralNew = $t01428614408._1
362- let poolIntegralSTATE = $t01428614408._2
363- let poolDEBUG = $t01428614408._3
368+ let $t01476214884 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
369+ let wxPerLpIntegralNew = $t01476214884._1
370+ let poolIntegralSTATE = $t01476214884._2
371+ let poolDEBUG = $t01476214884._3
364372 let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
365373 let stakedByUser = readStaked(stakedByUserKEY)
366374 let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
417425 case _ =>
418426 throw("Match error")
419427 }
428+
429+
430+func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
431+ let userAddressStr = toString(userAddress)
432+ let lpAssetIdStr = toBase58String(lpAssetId)
433+ let poolAddressStr = toString(poolAddress)
434+ let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
435+ let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
436+ let stakedByUser = readStaked(stakedByUserKEY)
437+ let stakedTotal = readStaked(stakedTotalKEY)
438+ let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
439+ let listName = getUsersListName(lpAssetIdStr)
440+ let listActions = if (if (containsNode(listName, userAddressStr))
441+ then (amount == stakedByUser)
442+ else false)
443+ then deleteNodeActions(listName, userAddressStr)
444+ else nil
445+ let refreshStakedVote = if ((amount == stakedByUser))
446+ then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
447+ else unit
448+ if ((refreshStakedVote == refreshStakedVote))
449+ then {
450+ let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
451+ let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
452+ let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
453+ let throwIfNothingToClaim = true
454+ let r = if ((availableToClaim > zeroBigInt))
455+ then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
456+ else unit
457+ if ((r == r))
458+ then if ((amount > stakedByUser))
459+ then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
460+ else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
461+ else throw("Strict value is not equal to itself.")
462+ }
463+ else throw("Strict value is not equal to itself.")
464+ }
420465
421466
422467 @Callable(i)
498543 if ((refreshStakedVote == refreshStakedVote))
499544 then {
500545 let stakedTotal = readStaked(stakedTotalKEY)
501- let $t01899019107 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
502- let wxToClaimUserNew = $t01899019107._1
503- let integralSTATE = $t01899019107._2
504- let debug = $t01899019107._3
546+ let $t02160621723 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
547+ let wxToClaimUserNew = $t02160621723._1
548+ let integralSTATE = $t02160621723._2
549+ let debug = $t02160621723._3
505550 let listName = getUsersListName(lpAssetIdStr)
506551 let listActions = if (containsNode(listName, userAddressStr))
507552 then nil
517562 func unstake (lpAssetIdStr,amount) = {
518563 let lpAssetId = fromBase58String(lpAssetIdStr)
519564 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
520- let poolAddon = valueOrElse(getString(addressFromStringValue(poolAddressStr), keyAddonAddr()), poolAddressStr)
565+ let poolAddress = addressFromStringValue(poolAddressStr)
566+ let poolAddon = valueOrElse(getString(poolAddress, keyAddonAddr()), poolAddressStr)
521567 let callerStr = toString(i.caller)
522- let userAddressStr = if (if ((callerStr == poolAddressStr))
568+ let userAddress = if (if ((callerStr == poolAddressStr))
523569 then true
524570 else (callerStr == poolAddon))
525- then toString(i.originCaller)
526- else callerStr
527- let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
528- let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
529- let stakedByUser = readStaked(stakedByUserKEY)
530- let stakedTotal = readStaked(stakedTotalKEY)
531- let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
532- let listName = getUsersListName(lpAssetIdStr)
533- let listActions = if (if (containsNode(listName, userAddressStr))
534- then (amount == stakedByUser)
535- else false)
536- then deleteNodeActions(listName, userAddressStr)
537- else nil
538- let refreshStakedVote = if ((amount == stakedByUser))
539- then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
540- else unit
541- if ((refreshStakedVote == refreshStakedVote))
542- then {
543- let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
544- let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
545- let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddress, 0)._1
546- let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
547- let r = if ((availableToClaim > zeroBigInt))
548- then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
549- else unit
550- if ((r == r))
551- then if ((amount > stakedByUser))
552- then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
553- else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
554- else throw("Strict value is not equal to itself.")
555- }
571+ then i.originCaller
572+ else i.caller
573+ let lpAssetRecipientAddress = i.caller
574+ unstakeActions(i, lpAssetId, poolAddress, userAddress, lpAssetRecipientAddress, amount)
575+ }
576+
577+
578+
579+@Callable(i)
580+func unstakeINTERNAL (lpAssetId,amount,userAddress,lpAssetRecipientAddress) = {
581+ let lpAssetIdStr = toBase58String(lpAssetId)
582+ let poolAddress = addressFromStringValue(valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr)))
583+ let checkCaller = if ((i.caller == poolAddress))
584+ then true
585+ else permissionDeniedError
586+ if ((checkCaller == checkCaller))
587+ then unstakeActions(i, lpAssetId, poolAddress, Address(userAddress), Address(lpAssetRecipientAddress), amount)
556588 else throw("Strict value is not equal to itself.")
557589 }
558590
561593 @Callable(i)
562594 func claimWx (lpAssetIdStr) = {
563595 let userAddressStr = toString(i.caller)
564- let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
596+ let throwIfNothingToClaim = true
597+ let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
565598 $Tuple2(nil, result)
566599 }
567600
568601
569602
570603 @Callable(i)
571-func claimWxINTERNAL (lpAssetIdStr,userAddressStr) = {
604+func claimWxDoNotThrow (lpAssetIdStr) = {
605+ let userAddressStr = toString(i.caller)
606+ let throwIfNothingToClaim = false
607+ let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
608+ $Tuple2(nil, result)
609+ }
610+
611+
612+
613+@Callable(i)
614+func claimWxINTERNAL (lpAssetIdStr,userAddressStr,throwIfNothingToClaim) = {
572615 let checkCaller = mustThis(i)
573616 if ((checkCaller == checkCaller))
574617 then {
582625 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
583626 let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
584627 let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
585- let $t02314423256 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
586- let wxToClaimUserNew = $t02314423256._1
587- let integralSTATE = $t02314423256._2
588- let debug = $t02314423256._3
628+ let $t02510925221 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
629+ let wxToClaimUserNew = $t02510925221._1
630+ let integralSTATE = $t02510925221._2
631+ let debug = $t02510925221._3
589632 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
590633 if ((zeroBigInt >= availableToClaim))
591- then throw("nothing to claim")
634+ then if (throwIfNothingToClaim)
635+ then throw("nothing to claim")
636+ else $Tuple2(nil, 0)
592637 else {
593638 let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
594639 let minRewardPart = availableToClaim
595640 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
641+ let totalReward = (minRewardPart + boostRewardPart)
596642 let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
597643 let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
598644 if ((emitBoost == emitBoost))
601647 let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
602648 let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserBoostReward + boostRewardPart)
603649 let claimedTotalPlusAvailableToClaim = (claimedTotal + availableToClaim)
604-[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)]
650+ $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))
605651 }
606652 else throw("Strict value is not equal to itself.")
607653 }
671717 else (height - emissionStartBlock)
672718 let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
673719 let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
674- let $t02715327265 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
675- let wxToClaimUserNew = $t02715327265._1
676- let integralSTATE = $t02715327265._2
677- let debug = $t02715327265._3
720+ let $t02926929381 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
721+ let wxToClaimUserNew = $t02926929381._1
722+ let integralSTATE = $t02926929381._2
723+ let debug = $t02926929381._3
678724 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
679725 let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
680726 let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
683729 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
684730 let totalReward = (minRewardPart + boostRewardPart)
685731 $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), "soon"], SEP))
732+ }
733+
734+
735+
736+@Callable(i)
737+func stakedByUserREADONLY (lpAssetIdStr,userAddressStr) = {
738+ let stakedByUser = valueOrElse(getInteger(keyStakedByUser(userAddressStr, lpAssetIdStr)), 0)
739+ $Tuple2(nil, stakedByUser)
686740 }
687741
688742
712766 let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
713767 let wxToClaimUserNew = refreshINTEGRALS(lpAssetId, userAddress, poolAddress, 0)._1
714768 let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
769+ let throwIfNothingToClaim = true
715770 let r = if ((availableToClaim > zeroBigInt))
716- then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress], nil)
771+ then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress, throwIfNothingToClaim], nil)
717772 else unit
718773 if ((r == r))
719774 then {
741796 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
742797 then throw("permissions denied")
743798 else {
744- let $t02961629726 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
745- let wxPerLpIntegralNew = $t02961629726._1
746- let poolIntegralSTATE = $t02961629726._2
747- let poolDEBUG = $t02961629726._3
799+ let $t03200232112 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
800+ let wxPerLpIntegralNew = $t03200232112._1
801+ let poolIntegralSTATE = $t03200232112._2
802+ let poolDEBUG = $t03200232112._3
748803 poolIntegralSTATE
749804 }
750805
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)
21+
22+func wrapErr (msg) = makeString(["staking.ride:", toString(this), msg], " ")
23+
24+
25+func throwErr (msg) = throw(wrapErr(msg))
26+
2127
2228 func asAnyList (val) = match val {
2329 case valAnyLyst: List[Any] =>
2430 valAnyLyst
2531 case _ =>
2632 throw("fail to cast into List[Any]")
2733 }
2834
2935
3036 func asInt (val) = match val {
3137 case valInt: Int =>
3238 valInt
3339 case _ =>
3440 throw("fail to cast into Int")
3541 }
3642
3743
3844 func asString (val) = match val {
3945 case valStr: String =>
4046 valStr
4147 case _ =>
4248 throw("fail to cast into Int")
4349 }
4450
4551
4652 func asByteVector (val) = match val {
4753 case valBin: ByteVector =>
4854 valBin
4955 case _ =>
5056 throw("fail to cast into Int")
5157 }
5258
5359
5460 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (("mandatory this." + key) + " is not defined"))
5561
5662
5763 func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
5864
5965
6066 func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
6167
6268
6369 func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
6470
6571
6672 func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
6773
6874
6975 func getBigIntFromStringOrZero (address,key) = value(parseBigInt(valueOrElse(getString(address, key), "0")))
7076
7177
7278 func getBigIntFromStringOrDefault (address,key,defaultVal) = match getString(address, key) {
7379 case s: String =>
7480 value(parseBigInt(s))
7581 case _: Unit =>
7682 defaultVal
7783 case _ =>
7884 throw("Match error")
7985 }
8086
8187
8288 func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
8389
8490
8591 func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
8692
8793
8894 func keyFactoryAddress () = "%s%s__config__factoryAddress"
8995
9096
9197 func keyVotingEmissionContract () = "%s__votingEmissionContract"
9298
9399
94100 let IdxFactoryCfgStakingDapp = 1
95101
96102 let IdxFactoryCfgBoostingDapp = 2
97103
98104 let IdxFactoryCfgIdoDapp = 3
99105
100106 let IdxFactoryCfgTeamDapp = 4
101107
102108 let IdxFactoryCfgEmissionDapp = 5
103109
104110 let IdxFactoryCfgRestDapp = 6
105111
106112 let IdxFactoryCfgSlippageDapp = 7
107113
108114 func keyFactoryCfg () = "%s__factoryConfig"
109115
110116
111117 func keyManagerPublicKey () = "%s__managerPublicKey"
112118
113119
114120 func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
115121
116122
117123 func keyStablePoolAddonAddr () = "%s__stablePoolAddonAddr"
118124
119125
120126 func keyAddonAddr () = "%s__addonAddr"
121127
122128
123129 func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
124130
125131
126132 func keyFactoryLpList () = "%s__lpTokensList"
127133
128134
129135 func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
130136
131137
132138 func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
133139
134140
135141 func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
136142
137143
138144 func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
139145
140146
141147 func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
142148
143149
144150 func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
145151
146152
147153 func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
148154
149155
150156 func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
151157
152158
153159 func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
154160
155161
156162 func keyEmissionStartBlock () = "%s%s__emission__startBlock"
157163
158164
159165 func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
160166
161167
162168 func keyEmissionEndBlock () = "%s%s__emission__endBlock"
163169
164170
165171 func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
166172
167173
168174 func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
169175
170176
171177 func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
172178
173179
174180 func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
175181
176182
177183 func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
178184
179185
180186 func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed__total", lpAssetIdStr], SEP)
181187
182188
183189 func readStaked (key) = valueOrElse(getInteger(this, key), 0)
184190
185191
186192 func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
187193
188194
189195 func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
190196
191197
192198 func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
193199
194200
195201 func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
196202
197203
198204 func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
199205
200206
201207 func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
202208
203209
204210 func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
205211
206212
207213 func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
208214
209215
210216 func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
211217
212218
213219 func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
214220
215221
216222 func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
217223
218224
219225 func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
220226
221227
222228 func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
223229
224230
225231 func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
226232
227233
228234 func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
229235
230236
231237 func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
232238
233239
234240 let factoryAddress = getStringOrFail(this, keyFactoryAddress())
235241
236242 let factoryContract = addressFromStringValue(factoryAddress)
237243
238244 let factoryCfg = readFactoryCfgOrFail(factoryContract)
239245
240246 let emissionContract = getEmissionAddressOrFail(factoryCfg)
241247
242248 let boostingContract = getBoostingAddressOrFail(factoryCfg)
243249
244250 let boostCoeff = {
245251 let @ = invoke(emissionContract, "getBoostCoeffREADONLY", nil, nil)
246252 if ($isInstanceOf(@, "Int"))
247253 then @
248254 else throw(($getType(@) + " couldn't be cast to Int"))
249255 }
250256
257+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"))
258+
251259 func keyNextUser (lpAssetId) = makeString(["%s%s", lpAssetId, "nextUser"], SEP)
252260
253261
254262 func getUsersListName (lpAssetId) = makeString(["users", lpAssetId], SEP)
255263
256264
257265 func keyListHead (listName) = makeString(["%s%s%s", listName, "head"], SEP)
258266
259267
260268 func keyListSize (listName) = makeString(["%s%s%s", listName, "size"], SEP)
261269
262270
263271 func keyListPrev (listName,id) = makeString(["%s%s%s%s", listName, id, "prev"], SEP)
264272
265273
266274 func keyListNext (listName,id) = makeString(["%s%s%s%s", listName, id, "next"], SEP)
267275
268276
269277 func containsNode (listName,id) = {
270278 let headOrUnit = getString(this, keyListHead(listName))
271279 let prevOrUnit = getString(this, keyListPrev(listName, id))
272280 let nextOrUnit = getString(this, keyListNext(listName, id))
273281 if (if ((id == valueOrElse(headOrUnit, "")))
274282 then true
275283 else (prevOrUnit != unit))
276284 then true
277285 else (nextOrUnit != unit)
278286 }
279287
280288
281289 func insertNodeActions (listName,id) = {
282290 let headOrUnit = getString(this, keyListHead(listName))
283291 let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
284292 let checkNode = if (!(containsNode(listName, id)))
285293 then true
286294 else throw("Node exists")
287295 if ((checkNode == checkNode))
288296 then (([IntegerEntry(keyListSize(listName), (listSize + 1))] ++ (if ((headOrUnit != unit))
289297 then [StringEntry(keyListNext(listName, id), value(headOrUnit)), StringEntry(keyListPrev(listName, value(headOrUnit)), id)]
290298 else nil)) ++ [StringEntry(keyListHead(listName), id)])
291299 else throw("Strict value is not equal to itself.")
292300 }
293301
294302
295303 func deleteNodeActions (listName,id) = {
296304 let headOrUnit = getString(this, keyListHead(listName))
297305 let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
298306 let prevOrUnit = getString(this, keyListPrev(listName, id))
299307 let nextOrUnit = getString(this, keyListNext(listName, id))
300308 ([IntegerEntry(keyListSize(listName), (listSize - 1))] ++ (if (if ((prevOrUnit != unit))
301309 then (nextOrUnit != unit)
302310 else false)
303311 then [StringEntry(keyListNext(listName, value(prevOrUnit)), value(nextOrUnit)), StringEntry(keyListPrev(listName, value(nextOrUnit)), value(prevOrUnit)), DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, id))]
304312 else if ((nextOrUnit != unit))
305313 then [StringEntry(keyListHead(listName), value(nextOrUnit)), DeleteEntry(keyListNext(listName, id)), DeleteEntry(keyListPrev(listName, value(nextOrUnit)))]
306314 else if ((prevOrUnit != unit))
307315 then [DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, value(prevOrUnit)))]
308316 else if ((id == valueOrElse(headOrUnit, "")))
309317 then [DeleteEntry(keyListHead(listName))]
310318 else throw(((("invalid node: " + listName) + ".") + id))))
311319 }
312320
313321
314322 func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
315323 then (stakedByUser > zeroBigInt)
316324 else false)
317325 then zeroBigInt
318326 else if ((stakedByUser == zeroBigInt))
319327 then wxPerLpIntegralNew
320328 else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
321329 then (stakedByUser > zeroBigInt)
322330 else false)
323331 then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
324332 else throw("calcWxPerLpIntegralUserLast: unexpected state")
325333
326334
327335 func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
328336 let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
329337 let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
330338 let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
331339 then oneBigInt
332340 else stakedTotal
333341 let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
334342 let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
335343 let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
336344 let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * boostCoeff))
337345 let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
338346 let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
339347 let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
340348 let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
341349 let wxPerLpIntegral = getBigIntFromStringOrZero(this, wxPerLpIntegralKEY)
342350 let wxPerLpOrZeroX3 = 0
343351 let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
344352 let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
345353 then toBigInt(wxPerLpOrZeroX3)
346354 else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
347355 let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
348356 let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
349357 then oneBigInt
350358 else stakedTotalNew
351359 let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLpX3 * toBigInt(dh)))
352360 let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
353361 let wxPerLpIntegralLastUpdHeightNew = height
354362 let debug = makeString([toString(wxPerLpIntegralNew), toString(dh), toString(wxPerLpX3), toString(stakedTotal), toString(poolWxEmissionPerBlockX3), toString(wxEmissionPerBlockX3), toString(poolWeight)], "::")
355363 $Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
356364 }
357365
358366
359367 func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
360- let $t01428614408 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
361- let wxPerLpIntegralNew = $t01428614408._1
362- let poolIntegralSTATE = $t01428614408._2
363- let poolDEBUG = $t01428614408._3
368+ let $t01476214884 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
369+ let wxPerLpIntegralNew = $t01476214884._1
370+ let poolIntegralSTATE = $t01476214884._2
371+ let poolDEBUG = $t01476214884._3
364372 let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
365373 let stakedByUser = readStaked(stakedByUserKEY)
366374 let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
367375 let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
368376 let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
369377 let wxToClaimUser = getBigIntFromStringOrZero(this, wxToClaimUserKEY)
370378 let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
371379 let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
372380 let MULT11 = (MULT8 * MULT3)
373381 let wxToClaimUserNew = max([(wxToClaimUser + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11))), zeroBigInt])
374382 let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
375383 let wxPerLpIntegralUserLastUpdHeightNew = height
376384 let debug = makeString([toString(wxToClaimUser), toString(wxPerLpIntegralUserLast), toString(stakedByUser), poolDEBUG, toString(height)], "::")
377385 $Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
378386 }
379387
380388
381389 func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
382390 case s: String =>
383391 fromBase58String(s)
384392 case _: Unit =>
385393 unit
386394 case _ =>
387395 throw("Match error")
388396 }
389397
390398
391399 func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
392400 case s: String =>
393401 fromBase58String(s)
394402 case _: Unit =>
395403 unit
396404 case _ =>
397405 throw("Match error")
398406 }
399407
400408
401409 let permissionDeniedError = throw("Permission denied")
402410
403411 func mustThis (i) = if ((i.caller == this))
404412 then true
405413 else permissionDeniedError
406414
407415
408416 func mustManager (i) = match managerPublicKeyOrUnit() {
409417 case pk: ByteVector =>
410418 if ((i.callerPublicKey == pk))
411419 then true
412420 else permissionDeniedError
413421 case _: Unit =>
414422 if ((i.caller == this))
415423 then true
416424 else permissionDeniedError
417425 case _ =>
418426 throw("Match error")
419427 }
428+
429+
430+func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
431+ let userAddressStr = toString(userAddress)
432+ let lpAssetIdStr = toBase58String(lpAssetId)
433+ let poolAddressStr = toString(poolAddress)
434+ let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
435+ let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
436+ let stakedByUser = readStaked(stakedByUserKEY)
437+ let stakedTotal = readStaked(stakedTotalKEY)
438+ let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
439+ let listName = getUsersListName(lpAssetIdStr)
440+ let listActions = if (if (containsNode(listName, userAddressStr))
441+ then (amount == stakedByUser)
442+ else false)
443+ then deleteNodeActions(listName, userAddressStr)
444+ else nil
445+ let refreshStakedVote = if ((amount == stakedByUser))
446+ then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
447+ else unit
448+ if ((refreshStakedVote == refreshStakedVote))
449+ then {
450+ let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
451+ let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)._1
452+ let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
453+ let throwIfNothingToClaim = true
454+ let r = if ((availableToClaim > zeroBigInt))
455+ then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
456+ else unit
457+ if ((r == r))
458+ then if ((amount > stakedByUser))
459+ then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
460+ else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(lpAssetRecipientAddress, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
461+ else throw("Strict value is not equal to itself.")
462+ }
463+ else throw("Strict value is not equal to itself.")
464+ }
420465
421466
422467 @Callable(i)
423468 func constructor (factoryAddressStr) = {
424469 let checkCaller = mustManager(i)
425470 if ((checkCaller == checkCaller))
426471 then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
427472 else throw("Strict value is not equal to itself.")
428473 }
429474
430475
431476
432477 @Callable(i)
433478 func constructorV2 (votingEmissionContract) = {
434479 let cheks = [mustManager(i), if ((addressFromString(votingEmissionContract) != unit))
435480 then true
436481 else "invalid voting emission contract address"]
437482 if ((cheks == cheks))
438483 then [StringEntry(keyVotingEmissionContract(), votingEmissionContract)]
439484 else throw("Strict value is not equal to itself.")
440485 }
441486
442487
443488
444489 @Callable(i)
445490 func setManager (pendingManagerPublicKey) = {
446491 let checkCaller = mustManager(i)
447492 if ((checkCaller == checkCaller))
448493 then {
449494 let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
450495 if ((checkManagerPublicKey == checkManagerPublicKey))
451496 then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
452497 else throw("Strict value is not equal to itself.")
453498 }
454499 else throw("Strict value is not equal to itself.")
455500 }
456501
457502
458503
459504 @Callable(i)
460505 func confirmManager () = {
461506 let pm = pendingManagerPublicKeyOrUnit()
462507 let hasPM = if (isDefined(pm))
463508 then true
464509 else throw("No pending manager")
465510 if ((hasPM == hasPM))
466511 then {
467512 let checkPM = if ((i.callerPublicKey == value(pm)))
468513 then true
469514 else throw("You are not pending manager")
470515 if ((checkPM == checkPM))
471516 then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
472517 else throw("Strict value is not equal to itself.")
473518 }
474519 else throw("Strict value is not equal to itself.")
475520 }
476521
477522
478523
479524 @Callable(i)
480525 func stake () = if ((size(i.payments) != 1))
481526 then throw("invalid payment - exact one payment must be attached")
482527 else {
483528 let pmt = i.payments[0]
484529 let lpAssetId = value(pmt.assetId)
485530 let lpAssetIdStr = toBase58String(lpAssetId)
486531 let amount = pmt.amount
487532 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
488533 let callerStr = toString(i.caller)
489534 let userAddressStr = if ((callerStr == poolAddressStr))
490535 then toString(i.originCaller)
491536 else callerStr
492537 let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
493538 let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
494539 let stakedByUser = readStaked(stakedByUserKEY)
495540 let refreshStakedVote = if ((stakedByUser == 0))
496541 then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, true], nil)
497542 else unit
498543 if ((refreshStakedVote == refreshStakedVote))
499544 then {
500545 let stakedTotal = readStaked(stakedTotalKEY)
501- let $t01899019107 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
502- let wxToClaimUserNew = $t01899019107._1
503- let integralSTATE = $t01899019107._2
504- let debug = $t01899019107._3
546+ let $t02160621723 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
547+ let wxToClaimUserNew = $t02160621723._1
548+ let integralSTATE = $t02160621723._2
549+ let debug = $t02160621723._3
505550 let listName = getUsersListName(lpAssetIdStr)
506551 let listActions = if (containsNode(listName, userAddressStr))
507552 then nil
508553 else insertNodeActions(listName, userAddressStr)
509554 (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
510555 }
511556 else throw("Strict value is not equal to itself.")
512557 }
513558
514559
515560
516561 @Callable(i)
517562 func unstake (lpAssetIdStr,amount) = {
518563 let lpAssetId = fromBase58String(lpAssetIdStr)
519564 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
520- let poolAddon = valueOrElse(getString(addressFromStringValue(poolAddressStr), keyAddonAddr()), poolAddressStr)
565+ let poolAddress = addressFromStringValue(poolAddressStr)
566+ let poolAddon = valueOrElse(getString(poolAddress, keyAddonAddr()), poolAddressStr)
521567 let callerStr = toString(i.caller)
522- let userAddressStr = if (if ((callerStr == poolAddressStr))
568+ let userAddress = if (if ((callerStr == poolAddressStr))
523569 then true
524570 else (callerStr == poolAddon))
525- then toString(i.originCaller)
526- else callerStr
527- let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
528- let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
529- let stakedByUser = readStaked(stakedByUserKEY)
530- let stakedTotal = readStaked(stakedTotalKEY)
531- let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
532- let listName = getUsersListName(lpAssetIdStr)
533- let listActions = if (if (containsNode(listName, userAddressStr))
534- then (amount == stakedByUser)
535- else false)
536- then deleteNodeActions(listName, userAddressStr)
537- else nil
538- let refreshStakedVote = if ((amount == stakedByUser))
539- then invoke(boostingContract, "onStakedVoteUpdate", [lpAssetIdStr, userAddressStr, false], nil)
540- else unit
541- if ((refreshStakedVote == refreshStakedVote))
542- then {
543- let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr))
544- let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
545- let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddress, 0)._1
546- let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
547- let r = if ((availableToClaim > zeroBigInt))
548- then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
549- else unit
550- if ((r == r))
551- then if ((amount > stakedByUser))
552- then throw(((((((("passed amount=" + toString(amount)) + " is greater than available=") + toString(stakedByUser)) + ". lpAssetId=") + lpAssetIdStr) + ". stakedByUserKEY=") + stakedByUserKEY))
553- else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
554- else throw("Strict value is not equal to itself.")
555- }
571+ then i.originCaller
572+ else i.caller
573+ let lpAssetRecipientAddress = i.caller
574+ unstakeActions(i, lpAssetId, poolAddress, userAddress, lpAssetRecipientAddress, amount)
575+ }
576+
577+
578+
579+@Callable(i)
580+func unstakeINTERNAL (lpAssetId,amount,userAddress,lpAssetRecipientAddress) = {
581+ let lpAssetIdStr = toBase58String(lpAssetId)
582+ let poolAddress = addressFromStringValue(valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr)))
583+ let checkCaller = if ((i.caller == poolAddress))
584+ then true
585+ else permissionDeniedError
586+ if ((checkCaller == checkCaller))
587+ then unstakeActions(i, lpAssetId, poolAddress, Address(userAddress), Address(lpAssetRecipientAddress), amount)
556588 else throw("Strict value is not equal to itself.")
557589 }
558590
559591
560592
561593 @Callable(i)
562594 func claimWx (lpAssetIdStr) = {
563595 let userAddressStr = toString(i.caller)
564- let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
596+ let throwIfNothingToClaim = true
597+ let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
565598 $Tuple2(nil, result)
566599 }
567600
568601
569602
570603 @Callable(i)
571-func claimWxINTERNAL (lpAssetIdStr,userAddressStr) = {
604+func claimWxDoNotThrow (lpAssetIdStr) = {
605+ let userAddressStr = toString(i.caller)
606+ let throwIfNothingToClaim = false
607+ let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
608+ $Tuple2(nil, result)
609+ }
610+
611+
612+
613+@Callable(i)
614+func claimWxINTERNAL (lpAssetIdStr,userAddressStr,throwIfNothingToClaim) = {
572615 let checkCaller = mustThis(i)
573616 if ((checkCaller == checkCaller))
574617 then {
575618 let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), "claimWxINTERNAL: invalid user address")
576619 let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
577620 let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
578621 let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
579622 let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
580623 let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
581624 let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
582625 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
583626 let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
584627 let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
585- let $t02314423256 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
586- let wxToClaimUserNew = $t02314423256._1
587- let integralSTATE = $t02314423256._2
588- let debug = $t02314423256._3
628+ let $t02510925221 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
629+ let wxToClaimUserNew = $t02510925221._1
630+ let integralSTATE = $t02510925221._2
631+ let debug = $t02510925221._3
589632 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
590633 if ((zeroBigInt >= availableToClaim))
591- then throw("nothing to claim")
634+ then if (throwIfNothingToClaim)
635+ then throw("nothing to claim")
636+ else $Tuple2(nil, 0)
592637 else {
593638 let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
594639 let minRewardPart = availableToClaim
595640 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
641+ let totalReward = (minRewardPart + boostRewardPart)
596642 let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
597643 let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
598644 if ((emitBoost == emitBoost))
599645 then {
600646 let claimedByUserValue = ((claimedByUser + minRewardPart) + boostRewardPart)
601647 let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
602648 let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserBoostReward + boostRewardPart)
603649 let claimedTotalPlusAvailableToClaim = (claimedTotal + availableToClaim)
604-[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)]
650+ $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))
605651 }
606652 else throw("Strict value is not equal to itself.")
607653 }
608654 }
609655 else throw("Strict value is not equal to itself.")
610656 }
611657
612658
613659
614660 @Callable(i)
615661 func claimWxBulkInternalREADONLY (currentIter,lpAssetIds,userAddressStr,resAcc) = if ((currentIter == size(lpAssetIds)))
616662 then $Tuple2(nil, resAcc)
617663 else {
618664 let lpAssetId = lpAssetIds[currentIter]
619665 let info = split({
620666 let @ = invoke(this, "claimWxREADONLY", [lpAssetId, userAddressStr], nil)
621667 if ($isInstanceOf(@, "String"))
622668 then @
623669 else throw(($getType(@) + " couldn't be cast to String"))
624670 }, SEP)
625671 let unclaimed = info[3]
626672 let claimed = info[4]
627673 let userVoteFinalized = {
628674 let @ = invoke(boostingContract, "getUserVoteFinalizedREADONLY", [lpAssetId, userAddressStr], nil)
629675 if ($isInstanceOf(@, "Int"))
630676 then @
631677 else throw(($getType(@) + " couldn't be cast to Int"))
632678 }
633679 let res = (resAcc :+ makeString(["%d%d%d", unclaimed, claimed, toString(userVoteFinalized)], SEP))
634680 let inv = {
635681 let @ = invoke(this, "claimWxBulkInternalREADONLY", [(currentIter + 1), lpAssetIds, userAddressStr, res], nil)
636682 if ($isInstanceOf(@, "List[Any]"))
637683 then @
638684 else throw(($getType(@) + " couldn't be cast to List[Any]"))
639685 }
640686 if ((inv == inv))
641687 then $Tuple2(nil, inv)
642688 else throw("Strict value is not equal to itself.")
643689 }
644690
645691
646692
647693 @Callable(i)
648694 func claimWxBulkREADONLY (lpAssetIds,userAddressStr) = {
649695 let res = invoke(this, "claimWxBulkInternalREADONLY", [0, lpAssetIds, userAddressStr, nil], nil)
650696 $Tuple2(nil, res)
651697 }
652698
653699
654700
655701 @Callable(i)
656702 func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
657703 let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
658704 let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
659705 let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
660706 let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
661707 let stakedByUser = readStaked(stakedByUserKEY)
662708 let stakedTotal = readStaked(stakedTotalKEY)
663709 let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
664710 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
665711 let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
666712 let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
667713 let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
668714 let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
669715 let passedBlocks = if ((emissionStartBlock > height))
670716 then 0
671717 else (height - emissionStartBlock)
672718 let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
673719 let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
674- let $t02715327265 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
675- let wxToClaimUserNew = $t02715327265._1
676- let integralSTATE = $t02715327265._2
677- let debug = $t02715327265._3
720+ let $t02926929381 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
721+ let wxToClaimUserNew = $t02926929381._1
722+ let integralSTATE = $t02926929381._2
723+ let debug = $t02926929381._3
678724 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
679725 let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
680726 let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
681727 let boostDebug = asString(boostInvResult[1])
682728 let minRewardPart = availableToClaim
683729 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
684730 let totalReward = (minRewardPart + boostRewardPart)
685731 $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), "soon"], SEP))
732+ }
733+
734+
735+
736+@Callable(i)
737+func stakedByUserREADONLY (lpAssetIdStr,userAddressStr) = {
738+ let stakedByUser = valueOrElse(getInteger(keyStakedByUser(userAddressStr, lpAssetIdStr)), 0)
739+ $Tuple2(nil, stakedByUser)
686740 }
687741
688742
689743
690744 @Callable(i)
691745 func usersListTraversal (lpAssetId) = {
692746 let checkCaller = if ((toBase58String(i.caller.bytes) == valueOrElse(getString(this, keyVotingEmissionContract()), "")))
693747 then true
694748 else mustManager(i)
695749 if ((checkCaller == checkCaller))
696750 then {
697751 let listName = getUsersListName(lpAssetId)
698752 let userOrUnit = getString(keyNextUser(lpAssetId))
699753 let headOrUnit = getString(keyListHead(listName))
700754 match userOrUnit {
701755 case _: Unit =>
702756 match headOrUnit {
703757 case _: Unit =>
704758 $Tuple2(nil, false)
705759 case head: String =>
706760 $Tuple2([StringEntry(keyNextUser(lpAssetId), head)], true)
707761 case _ =>
708762 throw("Match error")
709763 }
710764 case userAddress: String =>
711765 let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetId, userAddress))
712766 let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
713767 let wxToClaimUserNew = refreshINTEGRALS(lpAssetId, userAddress, poolAddress, 0)._1
714768 let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
769+ let throwIfNothingToClaim = true
715770 let r = if ((availableToClaim > zeroBigInt))
716- then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress], nil)
771+ then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress, throwIfNothingToClaim], nil)
717772 else unit
718773 if ((r == r))
719774 then {
720775 let nextUserOrUnit = getString(keyListNext(listName, userAddress))
721776 match nextUserOrUnit {
722777 case _: Unit =>
723778 $Tuple2([DeleteEntry(keyNextUser(lpAssetId))], false)
724779 case nextUser: String =>
725780 $Tuple2([StringEntry(keyNextUser(lpAssetId), nextUser)], true)
726781 case _ =>
727782 throw("Match error")
728783 }
729784 }
730785 else throw("Strict value is not equal to itself.")
731786 case _ =>
732787 throw("Match error")
733788 }
734789 }
735790 else throw("Strict value is not equal to itself.")
736791 }
737792
738793
739794
740795 @Callable(i)
741796 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
742797 then throw("permissions denied")
743798 else {
744- let $t02961629726 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
745- let wxPerLpIntegralNew = $t02961629726._1
746- let poolIntegralSTATE = $t02961629726._2
747- let poolDEBUG = $t02961629726._3
799+ let $t03200232112 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
800+ let wxPerLpIntegralNew = $t03200232112._1
801+ let poolIntegralSTATE = $t03200232112._2
802+ let poolDEBUG = $t03200232112._3
748803 poolIntegralSTATE
749804 }
750805
751806
752807 @Verifier(tx)
753808 func verify () = {
754809 let targetPublicKey = match managerPublicKeyOrUnit() {
755810 case pk: ByteVector =>
756811 pk
757812 case _: Unit =>
758813 tx.senderPublicKey
759814 case _ =>
760815 throw("Match error")
761816 }
762817 sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
763818 }
764819

github/deemru/w8io/fabc49c 
91.61 ms