tx · 9cLQ4r55mTjDMhtqnPLFyoRNQnvWztpxLt4CB3KnQXdq

3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz:  -0.02300000 Waves

2023.06.01 12:22 [2603411] smart account 3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz > SELF 0.00000000 Waves

{ "type": 13, "id": "9cLQ4r55mTjDMhtqnPLFyoRNQnvWztpxLt4CB3KnQXdq", "fee": 2300000, "feeAssetId": null, "timestamp": 1685611368721, "version": 2, "chainId": 84, "sender": "3Mx3zmXrMcLFCafMuPtXAzR4ZPVeZYb6qLz", "senderPublicKey": "D28XoueZWsMfm8Y5pa6C5ZFuYoWgre2Wm8tzJANJgMnq", "proofs": [ "3xFkhLdEReh8mMyNwe51pX2tCYXYBqmxA6hQpZKmVFfqLbhQkYr3fhnfUqM7voUYo439NN8PBFCLW12dcChGHXK7" ], "script": "base64:BgLXHwgCEgMKAQgSAwoBCBIAEgMKAQgSBAoCCAESBgoEAgECAhIDCgEIEgMKAQgSBQoDCAgEEgYKBAEYCBgSBAoCGAgSBAoCCAgSBAoCCAgSAwoBCBIDCgEIEgQKAggIIgZTQ0FMRTgiBU1VTFQzIgVNVUxUOCIHU0NBTEUxOCIGTVVMVDE4IgNTRVAiDlBPT0xXRUlHSFRNVUxUIgp6ZXJvQmlnSW50IglvbmVCaWdJbnQiB3dyYXBFcnIiA21zZyIIdGhyb3dFcnIiCWFzQW55TGlzdCIDdmFsIgckbWF0Y2gwIgp2YWxBbnlMeXN0IgVhc0ludCIGdmFsSW50Ighhc1N0cmluZyIGdmFsU3RyIgxhc0J5dGVWZWN0b3IiBnZhbEJpbiIPZ2V0U3RyaW5nT3JGYWlsIgdhZGRyZXNzIgNrZXkiGGdldFN0cmluZ0J5QWRkcmVzc09yRmFpbCIMZ2V0SW50T3JaZXJvIg9nZXRJbnRPckRlZmF1bHQiCmRlZmF1bHRWYWwiDGdldEludE9yRmFpbCIZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybyIcZ2V0QmlnSW50RnJvbVN0cmluZ09yRGVmYXVsdCIBcyIFdG9YMTgiB29yaWdWYWwiDW9yaWdTY2FsZU11bHQiB2Zyb21YMTgiD3Jlc3VsdFNjYWxlTXVsdCIRa2V5RmFjdG9yeUFkZHJlc3MiGWtleVZvdGluZ0VtaXNzaW9uQ29udHJhY3QiGElkeEZhY3RvcnlDZmdTdGFraW5nRGFwcCIZSWR4RmFjdG9yeUNmZ0Jvb3N0aW5nRGFwcCIUSWR4RmFjdG9yeUNmZ0lkb0RhcHAiFUlkeEZhY3RvcnlDZmdUZWFtRGFwcCIZSWR4RmFjdG9yeUNmZ0VtaXNzaW9uRGFwcCIVSWR4RmFjdG9yeUNmZ1Jlc3REYXBwIhlJZHhGYWN0b3J5Q2ZnU2xpcHBhZ2VEYXBwIg1rZXlGYWN0b3J5Q2ZnIhNrZXlNYW5hZ2VyUHVibGljS2V5IhZrZXlNYW5hZ2VyVmF1bHRBZGRyZXNzIhprZXlGYWN0b3J5THAyQXNzZXRzTWFwcGluZyIKbHBBc3NldFN0ciIQa2V5RmFjdG9yeUxwTGlzdCIma2V5RmFjdG9yeUxwQXNzZXRUb1Bvb2xDb250cmFjdEFkZHJlc3MiFGtleUZhY3RvcnlQb29sV2VpZ2h0Ig9jb250cmFjdEFkZHJlc3MiCnJlYWRMcExpc3QiB2ZhY3RvcnkiFHJlYWRGYWN0b3J5Q2ZnT3JGYWlsIhhnZXRCb29zdGluZ0FkZHJlc3NPckZhaWwiCmZhY3RvcnlDZmciGGdldEVtaXNzaW9uQWRkcmVzc09yRmFpbCIXZ2V0U3Rha2luZ0FkZHJlc3NPckZhaWwiHGdldE1hbmFnZXJWYXVsdEFkZHJlc3NPclRoaXMiHmtleUVtaXNzaW9uUmF0ZVBlckJsb2NrQ3VycmVudCIha2V5RW1pc3Npb25SYXRlUGVyQmxvY2tNYXhDdXJyZW50IhVrZXlFbWlzc2lvblN0YXJ0QmxvY2siG2tleUVtaXNzaW9uRHVyYXRpb25JbkJsb2NrcyITa2V5RW1pc3Npb25FbmRCbG9jayIPa2V5U3Rha2VkQnlVc2VyIg51c2VyQWRkcmVzc1N0ciIMbHBBc3NldElkU3RyIg5rZXlTdGFrZWRUb3RhbCIQa2V5Q2xhaW1lZEJ5VXNlciIZa2V5Q2xhaW1lZEJ5VXNlck1pblJld2FyZCIba2V5Q2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkIg9rZXlDbGFpbWVkVG90YWwiCnJlYWRTdGFrZWQiFWtleUxhc3RUb3RhbExwQmFsYW5jZSIJbHBBc3NldElkIhRrZXlMYXN0VXNlckxwQmFsYW5jZSILdXNlckFkZHJlc3MiGWtleVRvdGFsTHBCYWxhbmNlSW50ZWdyYWwiGGtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbCIma2V5VG90YWxMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQiJWtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQiEmtleVd4UGVyTHBJbnRlZ3JhbCIfa2V5V3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodCIQa2V5V3hUb0NsYWltVXNlciIja2V5V3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQiCmtleVd4UGVyTHAiDWtleVd4UGVyTHBYMTgiGmtleVd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0IhlrZXlPcGVyYXRpb25IaXN0b3J5UmVjb3JkIgR0eXBlIgZ0eElkNTgiE2Zvcm1hdEhpc3RvcnlSZWNvcmQiBmFtb3VudCIVT3BlcmF0aW9uSGlzdG9yeUVudHJ5IgR0eElkIg5mYWN0b3J5QWRkcmVzcyIPZmFjdG9yeUNvbnRyYWN0IhBlbWlzc2lvbkNvbnRyYWN0IhBib29zdGluZ0NvbnRyYWN0Igpib29zdENvZWZmIgFAIhZscFN0YWtpbmdQb29sc0NvbnRyYWN0IgtrZXlOZXh0VXNlciIQZ2V0VXNlcnNMaXN0TmFtZSILa2V5TGlzdEhlYWQiCGxpc3ROYW1lIgtrZXlMaXN0U2l6ZSILa2V5TGlzdFByZXYiAmlkIgtrZXlMaXN0TmV4dCIMY29udGFpbnNOb2RlIgpoZWFkT3JVbml0IgpwcmV2T3JVbml0IgpuZXh0T3JVbml0IhFpbnNlcnROb2RlQWN0aW9ucyIIbGlzdFNpemUiCWNoZWNrTm9kZSIRZGVsZXRlTm9kZUFjdGlvbnMiG2NhbGNXeFBlckxwSW50ZWdyYWxVc2VyTGFzdCIMc3Rha2VkQnlVc2VyIiZ3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE9yWmVybyISd3hQZXJMcEludGVncmFsTmV3Ihp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdEtFWSIUcmVmcmVzaFBvb2xJTlRFR1JBTFMiDnBvb2xBZGRyZXNzU3RyIg1scERlbHRhQW1vdW50Ig5zdGFrZWRUb3RhbEtFWSILc3Rha2VkVG90YWwiEm5vblplcm9TdGFrZWRUb3RhbCIKcG9vbFdlaWdodCISZW1pc3Npb25TdGFydEJsb2NrIhR3eEVtaXNzaW9uUGVyQmxvY2tYMyIYcG9vbFd4RW1pc3Npb25QZXJCbG9ja1gzIhJ3eFBlckxwSW50ZWdyYWxLRVkiH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkiCnd4UGVyTHBLRVkiHHd4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHQiD3d4UGVyTHBJbnRlZ3JhbCIPd3hQZXJMcE9yWmVyb1gzIgJkaCIJd3hQZXJMcFgzIg5zdGFrZWRUb3RhbE5ldyIVbm9uWmVyb1N0YWtlZFRvdGFsTmV3Igx3eFBlckxwWDNOZXciH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHROZXciBWRlYnVnIhByZWZyZXNoSU5URUdSQUxTIg0kdDAxNDg3NTE0OTk3IhFwb29sSW50ZWdyYWxTVEFURSIJcG9vbERFQlVHIg9zdGFrZWRCeVVzZXJLRVkiEHd4VG9DbGFpbVVzZXJLRVkiI3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0S0VZIg13eFRvQ2xhaW1Vc2VyIhd3eFBlckxwSW50ZWdyYWxVc2VyTGFzdCIGTVVMVDExIhB3eFRvQ2xhaW1Vc2VyTmV3Ihp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdE5ldyIjd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHROZXciFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQiE21hbmFnZXJWYXVsdEFkZHJlc3MiFXBlcm1pc3Npb25EZW5pZWRFcnJvciIIbXVzdFRoaXMiAWkiC211c3RNYW5hZ2VyIgJwayIMc3Rha2VBY3Rpb25zIgtwb29sQWRkcmVzcyIRcmVmcmVzaFN0YWtlZFZvdGUiDSR0MDE4MTUxMTgyNjgiDWludGVncmFsU1RBVEUiC2xpc3RBY3Rpb25zIg51bnN0YWtlQWN0aW9ucyIXbHBBc3NldFJlY2lwaWVudEFkZHJlc3MiFmNsYWltZWRCeVVzZXJNaW5SZXdhcmQiEGF2YWlsYWJsZVRvQ2xhaW0iFXRocm93SWZOb3RoaW5nVG9DbGFpbSIBciIRZmFjdG9yeUFkZHJlc3NTdHIiC2NoZWNrQ2FsbGVyIhZ2b3RpbmdFbWlzc2lvbkNvbnRyYWN0IgVjaGVrcyIDcG10IgljYWxsZXJTdHIiBnJlc3VsdCIQY2xhaW1lZEJ5VXNlcktFWSIPY2xhaW1lZFRvdGFsS0VZIhljbGFpbWVkQnlVc2VyTWluUmV3YXJkS0VZIhtjbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmRLRVkiDWNsYWltZWRCeVVzZXIiGGNsYWltZWRCeVVzZXJCb29zdFJld2FyZCIMY2xhaW1lZFRvdGFsIg0kdDAyNTQ1OTI1NTcxIhJ3eEFtb3VudEJvb3N0VG90YWwiDW1pblJld2FyZFBhcnQiD2Jvb3N0UmV3YXJkUGFydCILdG90YWxSZXdhcmQiCXd4QXNzZXRJZCIJZW1pdEJvb3N0IhJjbGFpbWVkQnlVc2VyVmFsdWUiHmNsYWltZWRCeVVzZXJNaW5SZXdhcmRQbHVzUGFydCIrY2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkUGx1c0Jvb3N0UmV3YXJkUGFydCIgY2xhaW1lZFRvdGFsUGx1c0F2YWlsYWJsZVRvQ2xhaW0iC2N1cnJlbnRJdGVyIgpscEFzc2V0SWRzIgZyZXNBY2MiBGluZm8iCXVuY2xhaW1lZCIHY2xhaW1lZCIRdXNlclZvdGVGaW5hbGl6ZWQiA3JlcyIDaW52IhJ3eEVtaXNzaW9uUGVyQmxvY2siDHBhc3NlZEJsb2NrcyIOcG9vbFd4RW1pc3Npb24iDHVzZXJXeFJld2FyZCINJHQwMjk2MjIyOTczNCIOYm9vc3RJbnZSZXN1bHQiCmJvb3N0RGVidWciCnVzZXJPclVuaXQiByRtYXRjaDEiBGhlYWQiDm5leHRVc2VyT3JVbml0IghuZXh0VXNlciINJHQwMzI1MjQzMjYzNCICdHgiBnZlcmlmeSIPdGFyZ2V0UHVibGljS2V5YwABYQAIAAFiAOgHAAFjAIDC1y8AAWQAEgABZQkAtgIBAICAkLu61q3wDQABZgICX18AAWcFAWMAAWgJALYCAQAAAAFpCQC2AgEAAQEBagEBawkAuQkCCQDMCAICDXN0YWtpbmcucmlkZToJAMwIAgkApQgBBQR0aGlzCQDMCAIFAWsFA25pbAIBIAEBbAEBawkAAgEJAQFqAQUBawEBbQEBbgQBbwUBbgMJAAECBQFvAglMaXN0W0FueV0EAXAFAW8FAXAJAQFsAQIbZmFpbCB0byBjYXN0IGludG8gTGlzdFtBbnldAQFxAQFuBAFvBQFuAwkAAQIFAW8CA0ludAQBcgUBbwUBcgkBAWwBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBAXMBAW4EAW8FAW4DCQABAgUBbwIGU3RyaW5nBAF0BQFvBQF0CQEBbAECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEBdQEBbgQBbwUBbgMJAAECBQFvAgpCeXRlVmVjdG9yBAF2BQFvBQF2CQEBbAECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEBdwIBeAF5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUBeAUBeQkBAWoBCQCsAgIJAKwCAgIPbWFuZGF0b3J5IHRoaXMuBQF5Ag8gaXMgbm90IGRlZmluZWQBAXoCAXgBeQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAXgFAXkJAQFqAQkArAICCQCsAgIJAKwCAgkArAICAgptYW5kYXRvcnkgCQClCAEFAXgCAS4FAXkCDyBpcyBub3QgZGVmaW5lZAEBQQIBeAF5CQELdmFsdWVPckVsc2UCCQCaCAIFAXgFAXkAAAEBQgMBeAF5AUMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUBeAUBeQUBQwEBRAIBeAF5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUBeAUBeQkBAWoBCQCsAgIJAKwCAgIPbWFuZGF0b3J5IHRoaXMuBQF5Ag8gaXMgbm90IGRlZmluZWQBAUUCAXgBeQkBBXZhbHVlAQkAqAMBCQELdmFsdWVPckVsc2UCCQCdCAIFAXgFAXkCATABAUYDAXgBeQFDBAFvCQCdCAIFAXgFAXkDCQABAgUBbwIGU3RyaW5nBAFHBQFvCQEFdmFsdWUBCQCoAwEFAUcDCQABAgUBbwIEVW5pdAUBQwkAAgECC01hdGNoIGVycm9yAQFIAgFJAUoJALwCAwkAtgIBBQFJBQFlCQC2AgEFAUoBAUsCAW4BTAkAoAMBCQC8AgMFAW4JALYCAQUBTAUBZQEBTQACHCVzJXNfX2NvbmZpZ19fZmFjdG9yeUFkZHJlc3MBAU4AAholc19fdm90aW5nRW1pc3Npb25Db250cmFjdAABTwABAAFQAAIAAVEAAwABUgAEAAFTAAUAAVQABgABVQAHAQFWAAIRJXNfX2ZhY3RvcnlDb25maWcBAVcAAhQlc19fbWFuYWdlclB1YmxpY0tleQEBWAACFyVzX19tYW5hZ2VyVmF1bHRBZGRyZXNzAQFZAQFaCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAVoJAMwIAgIebWFwcGluZ3NfX2xwQXNzZXQyUG9vbENvbnRyYWN0BQNuaWwFAWYBAmFhAAIQJXNfX2xwVG9rZW5zTGlzdAECYWIBAVoJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUBWgkAzAgCAh5tYXBwaW5nc19fbHBBc3NldDJQb29sQ29udHJhY3QFA25pbAUBZgECYWMBAmFkCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgpwb29sV2VpZ2h0CQDMCAIFAmFkBQNuaWwFAWYBAmFlAQJhZgkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFAmFmCQECYWEAAgAFAWYBAmFnAQJhZgkAtQkCCQEBegIFAmFmCQEBVgAFAWYBAmFoAQJhaQkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQJhaQUBUAECYWoBAmFpCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFpBQFTAQJhawECYWkJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYWkFAU8BAmFsAAQBbwkAoggBCQEBWAADCQABAgUBbwIGU3RyaW5nBAFHBQFvCQERQGV4dHJOYXRpdmUoMTA2MikBBQFHBQR0aGlzAQJhbQACGyVzJXNfX3JhdGVQZXJCbG9ja19fY3VycmVudAECYW4AAh4lcyVzX19yYXRlUGVyQmxvY2tNYXhfX2N1cnJlbnQBAmFvAAIaJXMlc19fZW1pc3Npb25fX3N0YXJ0QmxvY2sBAmFwAAIYJXMlc19fZW1pc3Npb25fX2R1cmF0aW9uAQJhcQACGCVzJXNfX2VtaXNzaW9uX19lbmRCbG9jawECYXICAmFzAmF0CQC5CQIJAMwIAgIOJXMlcyVzX19zdGFrZWQJAMwIAgUCYXMJAMwIAgUCYXQFA25pbAUBZgECYXUBAmF0CQCsAgICFyVzJXMlc19fc3Rha2VkX190b3RhbF9fBQJhdAECYXYCAmF0AmFzCQC5CQIJAMwIAgIPJXMlcyVzX19jbGFpbWVkCQDMCAIFAmFzCQDMCAIFAmF0BQNuaWwFAWYBAmF3AgJhdAJhcwkAuQkCCQDMCAICGCVzJXMlc19fY2xhaW1lZE1pblJld2FyZAkAzAgCBQJhcwkAzAgCBQJhdAUDbmlsBQFmAQJheAICYXQCYXMJALkJAgkAzAgCAholcyVzJXNfX2NsYWltZWRCb29zdFJld2FyZAkAzAgCBQJhcwkAzAgCBQJhdAUDbmlsBQFmAQJheQECYXQJALkJAgkAzAgCAhYlcyVzJXNfX2NsYWltZWRfX3RvdGFsCQDMCAIFAmF0BQNuaWwFAWYBAmF6AQF5CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAXkAAAECYUEBAmFCCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFCCQDMCAICBXRvdGFsCQDMCAICA2JhbAUDbmlsBQFmAQJhQwICYUICYUQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUIJAMwIAgUCYUQJAMwIAgIDYmFsBQNuaWwFAWYBAmFFAQJhQgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQJhQgkAzAgCAgV0b3RhbAkAzAgCAgZiYWxJTlQFA25pbAUBZgECYUYCAmFCAmFECQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFAmFCCQDMCAIFAmFECQDMCAICBmJhbElOVAUDbmlsBQFmAQJhRwECYUIJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUIJAMwIAgIFdG90YWwJAMwIAgIHbGFzdFVwZAUDbmlsBQFmAQJhSAICYUICYUQJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYUIJAMwIAgUCYUQJAMwIAgIHbGFzdFVwZAUDbmlsBQFmAQJhSQECYUIJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJhQgkAzAgCAgZjb21tb24JAMwIAgIFbHBJbnQFA25pbAUBZgECYUoBAmFCCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUCYUIJAMwIAgIGY29tbW9uCQDMCAICBmxwSW50SAUDbmlsBQFmAQJhSwICYUICYUQJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJhQgkAzAgCBQJhRAkAzAgCAgVscEludAUDbmlsBQFmAQJhTAICYUICYUQJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJhQgkAzAgCBQJhRAkAzAgCAgZscEludEgFA25pbAUBZgECYU0BAmFCCQC5CQIJAMwIAgICJXMJAMwIAgUCYUIJAMwIAgIHd3hQZXJMcAUDbmlsBQFmAQJhTgECYUIJALkJAgkAzAgCAgIlcwkAzAgCBQJhQgkAzAgCAgp3eFBlckxwWDE4BQNuaWwFAWYBAmFPAgJhQgJhRAkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmFCCQDMCAIFAmFECQDMCAICBXVJbnRMBQNuaWwFAWYBAmFQAwJhUQJhRAJhUgkAuQkCCQDMCAICESVzJXMlcyVzX19oaXN0b3J5CQDMCAIFAmFRCQDMCAIFAmFECQDMCAIFAmFSBQNuaWwFAWYBAmFTBAJhRAJhQgJhUQJhVAkAuQkCCQDMCAICDCVzJXMlcyVkJWQlZAkAzAgCBQJhRAkAzAgCBQJhQgkAzAgCBQJhUQkAzAgCCQCkAwEFBmhlaWdodAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAKQDAQUCYVQFA25pbAUBZgECYVUFAmFRAmFEAmFCAmFUAmFWCQELU3RyaW5nRW50cnkCCQECYVADBQJhUQUCYUQJANgEAQUCYVYJAQJhUwQFAmFEBQJhQgUCYVEFAmFUAAJhVwkBAXcCBQR0aGlzCQEBTQAAAmFYCQERQGV4dHJOYXRpdmUoMTA2MikBBQJhVwACYWkJAQJhZwEFAmFYAAJhWQkBAmFqAQUCYWkAAmFaCQECYWgBBQJhaQACYmEKAAJiYgkA/AcEBQJhWQIVZ2V0Qm9vc3RDb2VmZlJFQURPTkxZBQNuaWwFA25pbAMJAAECBQJiYgIDSW50BQJiYgkAAgEJAKwCAgkAAwEFAmJiAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQAAmJjCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJALkJAgkAzAgCAgIlcwkAzAgCAhZscFN0YWtpbmdQb29sc0NvbnRyYWN0BQNuaWwFAWYJAQFqAQIubHBfc3Rha2luZ19wb29scyBjb250cmFjdCBhZGRyZXNzIGlzIHVuZGVmaW5lZAkBAWoBAilpbnZhbGlkIGxwX3N0YWtpbmdfcG9vbHMgY29udHJhY3QgYWRkcmVzcwECYmQBAmFCCQC5CQIJAMwIAgIEJXMlcwkAzAgCBQJhQgkAzAgCAghuZXh0VXNlcgUDbmlsBQFmAQJiZQECYUIJALkJAgkAzAgCAgV1c2VycwkAzAgCBQJhQgUDbmlsBQFmAQJiZgECYmcJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYmcJAMwIAgIEaGVhZAUDbmlsBQFmAQJiaAECYmcJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUCYmcJAMwIAgIEc2l6ZQUDbmlsBQFmAQJiaQICYmcCYmoJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQJiZwkAzAgCBQJiagkAzAgCAgRwcmV2BQNuaWwFAWYBAmJrAgJiZwJiagkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFAmJnCQDMCAIFAmJqCQDMCAICBG5leHQFA25pbAUBZgECYmwCAmJnAmJqBAJibQkAnQgCBQR0aGlzCQECYmYBBQJiZwQCYm4JAJ0IAgUEdGhpcwkBAmJpAgUCYmcFAmJqBAJibwkAnQgCBQR0aGlzCQECYmsCBQJiZwUCYmoDAwkAAAIFAmJqCQELdmFsdWVPckVsc2UCBQJibQIABgkBAiE9AgUCYm4FBHVuaXQGCQECIT0CBQJibwUEdW5pdAECYnACAmJnAmJqBAJibQkAnQgCBQR0aGlzCQECYmYBBQJiZwQCYnEJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBAmJoAQUCYmcAAAQCYnIDCQEBIQEJAQJibAIFAmJnBQJiagYJAQFsAQILTm9kZSBleGlzdHMDCQAAAgUCYnIFAmJyCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmJoAQUCYmcJAGQCBQJicQABBQNuaWwDCQECIT0CBQJibQUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQECYmsCBQJiZwUCYmoJAQV2YWx1ZQEFAmJtCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiaQIFAmJnCQEFdmFsdWUBBQJibQUCYmoFA25pbAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZgEFAmJnBQJiagUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJicwICYmcCYmoEAmJtCQCdCAIFBHRoaXMJAQJiZgEFAmJnBAJicQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQECYmgBBQJiZwAABAJibgkAnQgCBQR0aGlzCQECYmkCBQJiZwUCYmoEAmJvCQCdCAIFBHRoaXMJAQJiawIFAmJnBQJiagkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYmgBBQJiZwkAZQIFAmJxAAEFA25pbAMDCQECIT0CBQJibgUEdW5pdAkBAiE9AgUCYm8FBHVuaXQHCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiawIFAmJnCQEFdmFsdWUBBQJibgkBBXZhbHVlAQUCYm8JAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJpAgUCYmcJAQV2YWx1ZQEFAmJvCQEFdmFsdWUBBQJibgkAzAgCCQELRGVsZXRlRW50cnkBCQECYmkCBQJiZwUCYmoJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJrAgUCYmcFAmJqBQNuaWwDCQECIT0CBQJibwUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQECYmYBBQJiZwkBBXZhbHVlAQUCYm8JAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJrAgUCYmcFAmJqCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiaQIFAmJnCQEFdmFsdWUBBQJibwUDbmlsAwkBAiE9AgUCYm4FBHVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAmJpAgUCYmcFAmJqCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiawIFAmJnCQEFdmFsdWUBBQJibgUDbmlsAwkAAAIFAmJqCQELdmFsdWVPckVsc2UCBQJibQIACQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiZgEFAmJnBQNuaWwJAQFsAQkArAICCQCsAgIJAKwCAgIOaW52YWxpZCBub2RlOiAFAmJnAgEuBQJiagECYnQEAmJ1AmJ2AmJ3AmJ4AwMJAAACBQJidgUBaAkAvwICBQJidQUBaAcFAWgDCQAAAgUCYnUFAWgFAmJ3AwMJAL8CAgUCYnYFAWgJAL8CAgUCYnUFAWgHCQEFdmFsdWUBCQCoAwEJAQF3AgUEdGhpcwUCYngJAQFsAQItY2FsY1d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0OiB1bmV4cGVjdGVkIHN0YXRlAQJieQMCYXQCYnoCYkEEAmJCCQECYXUBBQJhdAQCYkMJALYCAQkBAmF6AQUCYkIEAmJEAwkAAAIFAmJDBQFoBQFpBQJiQwQCYkUJARFAZXh0ck5hdGl2ZSgxMDUwKQIFAmFYCQECYWMBBQJiegQCYkYJAQFEAgUCYVkJAQJhbwAEAmJHCQBoAgkBAUQCBQJhWQkBAmFtAAUBYgQCYkgJAGsDBQJiRwUCYkUJAGgCBQFnBQJiYQQCYkkJAQJhSQEFAmF0BAJiSgkBAmFKAQUCYXQEAmJLCQECYU0BBQJhdAQCYkwJAQFCAwUEdGhpcwUCYkoFAmJGBAJiTQkBAUUCBQR0aGlzBQJiSQQCYk4AAAQCYk8JAJYDAQkAzAgCCQBlAgUGaGVpZ2h0BQJiTAkAzAgCAAAFA25pbAQCYlADCQECIT0CBQJiTgAACQC2AgEFAmJOCQC8AgMJALYCAQUCYkgJALYCAQUBYwUCYkQEAmJRCQC3AgIFAmJDCQC2AgEFAmJBBAJiUgMJAAACBQJiUQUBaAUBaQUCYlEEAmJ3CQC3AgIFAmJNCQC5AgIFAmJQCQC2AgEFAmJPBAJiUwkAugICCQC2AgEFAmJIBQJiUgQCYlQFBmhlaWdodAQCYlUJALkJAgkAzAgCCQCmAwEFAmJ3CQDMCAIJAKQDAQUCYk8JAMwIAgkApgMBBQJiUAkAzAgCCQCmAwEFAmJDCQDMCAIJAKQDAQUCYkgJAMwIAgkApAMBBQJiRwkAzAgCCQCkAwEFAmJFBQNuaWwCAjo6CQCVCgMFAmJ3CQDMCAIJAQtTdHJpbmdFbnRyeQIFAmJJCQCmAwEFAmJ3CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiSgUCYlQJAMwIAgkBC1N0cmluZ0VudHJ5AgUCYksJAKYDAQUCYlMFA25pbAUCYlUBAmJWBAJhdAJhcwJiegJiQQQCYlcJAQJieQMFAmF0BQJiegUCYkEEAmJ3CAUCYlcCXzEEAmJYCAUCYlcCXzIEAmJZCAUCYlcCXzMEAmJaCQECYXICBQJhcwUCYXQEAmJ1CQECYXoBBQJiWgQCY2EJAQJhSwIFAmF0BQJhcwQCY2IJAQJhTAIFAmF0BQJhcwQCYngJAQJhTwIFAmF0BQJhcwQCY2MJAQFFAgUEdGhpcwUCY2EEAmJ2CQEBQQIFBHRoaXMFAmNiBAJjZAkBAmJ0BAkAtgIBBQJidQkAtgIBBQJidgUCYncFAmJ4BAJjZQkAaAIFAWMFAWIEAmNmCQCYAwEJAMwIAgkAtwICBQJjYwkAvAIDCQC4AgIFAmJ3BQJjZAkAtgIBBQJidQkAtgIBBQJjZQkAzAgCBQFoBQNuaWwEAmNnBQJidwQCY2gFBmhlaWdodAQCYlUJALkJAgkAzAgCCQCmAwEFAmNjCQDMCAIJAKYDAQUCY2QJAMwIAgkApAMBBQJidQkAzAgCBQJiWQkAzAgCCQCkAwEFBmhlaWdodAUDbmlsAgI6OgkAlQoDBQJjZgkAzggCBQJiWAkAzAgCCQELU3RyaW5nRW50cnkCBQJjYQkApgMBBQJjZgkAzAgCCQEMSW50ZWdlckVudHJ5AgUCY2IFAmNoCQDMCAIJAQtTdHJpbmdFbnRyeQIFAmJ4CQCmAwEFAmNnBQNuaWwFAmJVAQJjaQAEAmNqCQECYWwABAFvCQCdCAIFAmNqCQEBVwADCQABAgUBbwIGU3RyaW5nBAFHBQFvCQDZBAEFAUcDCQABAgUBbwIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAAJjawkBAWwBAhFQZXJtaXNzaW9uIGRlbmllZAECY2wBAmNtAwkAAAIIBQJjbQZjYWxsZXIFBHRoaXMGBQJjawECY24BAmNtBAFvCQECY2kAAwkAAQIFAW8CCkJ5dGVWZWN0b3IEAmNvBQFvAwkAAAIIBQJjbQ9jYWxsZXJQdWJsaWNLZXkFAmNvBgUCY2sDCQABAgUBbwIEVW5pdAMJAAACCAUCY20GY2FsbGVyBQR0aGlzBgUCY2sJAAIBAgtNYXRjaCBlcnJvcgECY3AFAmNtAmFCAmNxAmFEAmFUBAJhcwkApQgBBQJhRAQCYXQJANgEAQUCYUIEAmJ6CQClCAEFAmNxBAJiWgkBAmFyAgUCYXMFAmF0BAJiQgkBAmF1AQUCYXQEAmJ1CQECYXoBBQJiWgQCY3IDCQAAAgUCYnUAAAkA/AcEBQJhWgISb25TdGFrZWRWb3RlVXBkYXRlCQDMCAIFAmF0CQDMCAIFAmFzCQDMCAIGBQNuaWwFA25pbAUEdW5pdAMJAAACBQJjcgUCY3IEAmJDCQECYXoBBQJiQgQCY3MJAQJiVgQFAmF0BQJhcwUCYnoFAmFUBAJjZggFAmNzAl8xBAJjdAgFAmNzAl8yBAJiVQgFAmNzAl8zBAJiZwkBAmJlAQUCYXQEAmN1AwkBAmJsAgUCYmcFAmFzBQNuaWwJAQJicAIFAmJnBQJhcwkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFAmJaCQBkAgUCYnUFAmFUCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiQgkAZAIFAmJDBQJhVAkAzAgCCQECYVUFAgVzdGFrZQUCYXMFAmF0BQJhVAgFAmNtDXRyYW5zYWN0aW9uSWQFA25pbAUCY3QFAmN1CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJjdgYCY20CYUICY3ECYUQCY3cCYVQEAmFzCQClCAEFAmFEBAJhdAkA2AQBBQJhQgQCYnoJAKUIAQUCY3EEAmJaCQECYXICBQJhcwUCYXQEAmJCCQECYXUBBQJhdAQCYnUJAQJhegEFAmJaBAJiQwkBAmF6AQUCYkIEAmN0CAkBAmJWBAUCYXQFAmFzBQJiegkBAS0BBQJhVAJfMgQCYmcJAQJiZQEFAmF0BAJjdQMDCQECYmwCBQJiZwUCYXMJAAACBQJhVAUCYnUHCQECYnMCBQJiZwUCYXMFA25pbAQCY3IDCQAAAgUCYVQFAmJ1CQD8BwQFAmFaAhJvblN0YWtlZFZvdGVVcGRhdGUJAMwIAgUCYXQJAMwIAgUCYXMJAMwIAgcFA25pbAUDbmlsBQR1bml0AwkAAAIFAmNyBQJjcgQCY3gJAQFFAgUEdGhpcwkBAmF3AgUCYXQFAmFzBAJjZggJAQJiVgQFAmF0BQJhcwUCYnoAAAJfMQQCY3kJALgCAgUCY2YFAmN4BAJjegYEAmNBAwkAvwICBQJjeQUBaAkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXQJAMwIAgUCYXMJAMwIAgUCY3oFA25pbAUDbmlsBQR1bml0AwkAAAIFAmNBBQJjQQMJAGYCBQJhVAUCYnUJAQFsAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAg5wYXNzZWQgYW1vdW50PQkApAMBBQJhVAIbIGlzIGdyZWF0ZXIgdGhhbiBhdmFpbGFibGU9CQCkAwEFAmJ1AgwuIGxwQXNzZXRJZD0FAmF0AhIuIHN0YWtlZEJ5VXNlcktFWT0FAmJaCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYloJAGUCBQJidQUCYVQJAMwIAgkBDEludGVnZXJFbnRyeQIFAmJCCQBlAgUCYkMFAmFUCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFAmN3BQJhVAUCYUIJAMwIAgkBAmFVBQIHdW5zdGFrZQUCYXMFAmF0BQJhVAgFAmNtDXRyYW5zYWN0aW9uSWQFA25pbAUCY3QFAmN1CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuEAJjbQELY29uc3RydWN0b3IBAmNCBAJjQwkBAmNuAQUCY20DCQAAAgUCY0MFAmNDCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFNAAUCY0IFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJjbQENY29uc3RydWN0b3JWMgECY0QEAmNFCQDMCAIJAQJjbgEFAmNtCQDMCAIDCQECIT0CCQCmCAEFAmNEBQR1bml0BgIoaW52YWxpZCB2b3RpbmcgZW1pc3Npb24gY29udHJhY3QgYWRkcmVzcwUDbmlsAwkAAAIFAmNFBQJjRQkAzAgCCQELU3RyaW5nRW50cnkCCQEBTgAFAmNEBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY20BBXN0YWtlAAMJAQIhPQIJAJADAQgFAmNtCHBheW1lbnRzAAEJAQFsAQI0aW52YWxpZCBwYXltZW50IC0gZXhhY3Qgb25lIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQCY0YJAJEDAggFAmNtCHBheW1lbnRzAAAEAmFCCQEFdmFsdWUBCAUCY0YHYXNzZXRJZAQCYXQJANgEAQUCYUIEAmFUCAUCY0YGYW1vdW50BAJiegkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFYCQEBWQEFAmF0CQEBagEJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQJhdAQCY3EJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAmJ6BAJhRAMJAAACCAUCY20GY2FsbGVyBQJjcQgFAmNtDG9yaWdpbkNhbGxlcggFAmNtBmNhbGxlcgkBAmNwBQUCY20FAmFCBQJjcQUCYUQFAmFUAmNtAQhzdGFrZUZvcgECYXMDCQECIT0CCQCQAwEIBQJjbQhwYXltZW50cwABCQEBbAECNGludmFsaWQgcGF5bWVudCAtIGV4YWN0IG9uZSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEAmNGCQCRAwIIBQJjbQhwYXltZW50cwAABAJhQgkBBXZhbHVlAQgFAmNGB2Fzc2V0SWQEAmF0CQDYBAEFAmFCBAJhVAgFAmNGBmFtb3VudAQCYnoJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQJhWAkBAVkBBQJhdAkBAWoBCQCsAgICFXVuc3VwcG9ydGVkIGxwIGFzc2V0IAUCYXQEAmNxCQERQGV4dHJOYXRpdmUoMTA2MikBBQJiegQCYUQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBBQJhcwkBAWoBAhRpbnZhbGlkIHVzZXIgYWRkcmVzcwkBAmNwBQUCY20FAmFCBQJjcQUCYUQFAmFUAmNtAQd1bnN0YWtlAgJhdAJhVAQCYUIJANkEAQUCYXQEAmJ6CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUCYVgJAQFZAQUCYXQJAQFqAQkArAICAhV1bnN1cHBvcnRlZCBscCBhc3NldCAFAmF0BAJjcQkBEUBleHRyTmF0aXZlKDEwNjIpAQUCYnoEAmNHCQClCAEIBQJjbQZjYWxsZXIEAmFEAwkAAAIFAmNHBQJieggFAmNtDG9yaWdpbkNhbGxlcggFAmNtBmNhbGxlcgQCY3cIBQJjbQZjYWxsZXIJAQJjdgYFAmNtBQJhQgUCY3EFAmFEBQJjdwUCYVQCY20BD3Vuc3Rha2VJTlRFUk5BTAQCYUICYVQCYUQCY3cEAmF0CQDYBAEFAmFCBAJjcQkBEUBleHRyTmF0aXZlKDEwNjIpAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAmFYCQEBWQEFAmF0CQEBagEJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQJhdAQCY0MDCQAAAggFAmNtBmNhbGxlcgUCY3EGBQJjawMJAAACBQJjQwUCY0MJAQJjdgYFAmNtBQJhQgUCY3EJAQdBZGRyZXNzAQUCYUQJAQdBZGRyZXNzAQUCY3cFAmFUCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNtAQdjbGFpbVd4AQJhdAQCYXMJAKUIAQgFAmNtBmNhbGxlcgQCY3oGBAJjSAkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXQJAMwIAgUCYXMJAMwIAgUCY3oFA25pbAUDbmlsCQCUCgIFA25pbAUCY0gCY20BEWNsYWltV3hEb05vdFRocm93AQJhdAQCYXMJAKUIAQgFAmNtBmNhbGxlcgQCY3oHBAJjSAkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUCYXQJAMwIAgUCYXMJAMwIAgUCY3oFA25pbAUDbmlsCQCUCgIFA25pbAUCY0gCY20BD2NsYWltV3hJTlRFUk5BTAMCYXQCYXMCY3oEAmNDCQECY2wBBQJjbQMJAAACBQJjQwUCY0MEAmFECQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQUCYXMJAQFqAQIlY2xhaW1XeElOVEVSTkFMOiBpbnZhbGlkIHVzZXIgYWRkcmVzcwQCYnoJAQF6AgUCYVgJAQJhYgEFAmF0BAJjSQkBAmF2AgUCYXQFAmFzBAJjSgkBAmF5AQUCYXQEAmNLCQECYXcCBQJhdAUCYXMEAmNMCQECYXgCBQJhdAUCYXMEAmNNCQEBRQIFBHRoaXMFAmNJBAJjeAkBAUUCBQR0aGlzBQJjSwQCY04JAQFFAgUEdGhpcwUCY0wEAmNPCQEBRQIFBHRoaXMFAmNKBAJjUAkBAmJWBAUCYXQFAmFzBQJiegAABAJjZggFAmNQAl8xBAJjdAgFAmNQAl8yBAJiVQgFAmNQAl8zBAJjeQkAmAMBCQDMCAIJALgCAgUCY2YFAmN4CQDMCAIFAWgFA25pbAMJAMACAgUBaAUCY3kDBQJjegkBAWwBAhBub3RoaW5nIHRvIGNsYWltCQCUCgIFA25pbAAABAJjUQkAlgMBCQDMCAIJAQFxAQkAkQMCCQEBbQEJAPwHBAUCYVoCDGNsYWltV3hCb29zdAkAzAgCBQJhdAkAzAgCBQJhcwUDbmlsBQNuaWwAAAkAzAgCAAAFA25pbAQCY1IFAmN5BAJjUwkAmQMBCQDMCAIJALkCAgUCY1IJALYCAQkAZQIFAmJhAAEJAMwIAgkAtgIBBQJjUQUDbmlsBAJjVAkAtwICBQJjUgUCY1MEAmNVCQEBdQEJAJEDAgkBAW0BCQD8BwQFAmFZAgRlbWl0CQDMCAIJAKADAQUCY1IFA25pbAUDbmlsAAAEAmNWCQEBbQEJAPwHBAUCYVkCBGVtaXQJAMwIAgkAoAMBBQJjUwUDbmlsBQNuaWwDCQAAAgUCY1YFAmNWBAJjVwkAtwICCQC3AgIFAmNNBQJjUgUCY1MEAmNYCQC3AgIFAmN4BQJjUgQCY1kJALcCAgUCY04FAmNTBAJjWgkAtwICBQJjTwUCY3kJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQJjSQkApgMBBQJjVwkAzAgCCQELU3RyaW5nRW50cnkCBQJjSwkApgMBBQJjWAkAzAgCCQELU3RyaW5nRW50cnkCBQJjTAkApgMBBQJjWQkAzAgCCQELU3RyaW5nRW50cnkCBQJjSgkApgMBBQJjWgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQJhRAkAoAMBBQJjUgUCY1UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUCYUQJAKADAQUCY1MFAmNVCQDMCAIJAQJhVQUCBWNsYWltBQJhcwUCYXQJAKADAQUCY3kIBQJjbQ10cmFuc2FjdGlvbklkBQNuaWwJAKADAQUCY1QJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY20BG2NsYWltV3hCdWxrSW50ZXJuYWxSRUFET05MWQQCZGECZGICYXMCZGMDCQAAAgUCZGEJAJADAQUCZGIJAJQKAgUDbmlsBQJkYwQCYUIJAJEDAgUCZGIFAmRhBAJkZAkAtQkCCgACYmIJAPwHBAUEdGhpcwIPY2xhaW1XeFJFQURPTkxZCQDMCAIFAmFCCQDMCAIFAmFzBQNuaWwFA25pbAMJAAECBQJiYgIGU3RyaW5nBQJiYgkAAgEJAKwCAgkAAwEFAmJiAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcFAWYEAmRlCQCRAwIFAmRkAAMEAmRmCQCRAwIFAmRkAAQEAmRnCgACYmIJAPwHBAUCYVoCHGdldFVzZXJWb3RlRmluYWxpemVkUkVBRE9OTFkJAMwIAgUCYUIJAMwIAgUCYXMFA25pbAUDbmlsAwkAAQIFAmJiAgNJbnQFAmJiCQACAQkArAICCQADAQUCYmICGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAQCZGgJAM0IAgUCZGMJALkJAgkAzAgCAgYlZCVkJWQJAMwIAgUCZGUJAMwIAgUCZGYJAMwIAgkApAMBBQJkZwUDbmlsBQFmBAJkaQoAAmJiCQD8BwQFBHRoaXMCG2NsYWltV3hCdWxrSW50ZXJuYWxSRUFET05MWQkAzAgCCQBkAgUCZGEAAQkAzAgCBQJkYgkAzAgCBQJhcwkAzAgCBQJkaAUDbmlsBQNuaWwDCQABAgUCYmICCUxpc3RbQW55XQUCYmIJAAIBCQCsAgIJAAMBBQJiYgIeIGNvdWxkbid0IGJlIGNhc3QgdG8gTGlzdFtBbnldAwkAAAIFAmRpBQJkaQkAlAoCBQNuaWwFAmRpCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmNtARNjbGFpbVd4QnVsa1JFQURPTkxZAgJkYgJhcwQCZGgJAPwHBAUEdGhpcwIbY2xhaW1XeEJ1bGtJbnRlcm5hbFJFQURPTkxZCQDMCAIAAAkAzAgCBQJkYgkAzAgCBQJhcwkAzAgCBQNuaWwFA25pbAUDbmlsCQCUCgIFA25pbAUCZGgCY20BD2NsYWltV3hSRUFET05MWQICYXQCYXMEAmJaCQECYXICBQJhcwUCYXQEAmJCCQECYXUBBQJhdAQCY0kJAQJhdgIFAmF0BQJhcwQCY0sJAQJhdwIFAmF0BQJhcwQCYnUJAQJhegEFAmJaBAJiQwkBAmF6AQUCYkIEAmNNCQEBRQIFBHRoaXMFAmNJBAJjeAkBAUUCBQR0aGlzBQJjSwQCYnoJAQF6AgUCYVgJAQJhYgEFAmF0BAJiRQkBEUBleHRyTmF0aXZlKDEwNTApAgUCYVgJAQJhYwEFAmJ6BAJkagkBAUQCBQJhWQkBAmFtAAQCYkYJAQFEAgUCYVkJAQJhbwAEAmRrAwkAZgIFAmJGBQZoZWlnaHQAAAkAZQIFBmhlaWdodAUCYkYEAmRsCQBrAwkAaAIFAmRqBQJkawUCYkUFAWcEAmRtCQBrAwUCZGwFAmJ1BQJiQwQCZG4JAQJiVgQFAmF0BQJhcwUCYnoAAAQCY2YIBQJkbgJfMQQCY3QIBQJkbgJfMgQCYlUIBQJkbgJfMwQCY3kJAJgDAQkAzAgCCQC4AgIFAmNmBQJjeAkAzAgCBQFoBQNuaWwEAmRvCQEBbQEJAPwHBAUCYVoCFGNsYWltV3hCb29zdFJFQURPTkxZCQDMCAIFAmF0CQDMCAIFAmFzBQNuaWwFA25pbAQCY1EJAJYDAQkAzAgCCQEBcQEJAJEDAgUCZG8AAAkAzAgCAAAFA25pbAQCZHAJAQFzAQkAkQMCBQJkbwABBAJjUgUCY3kEAmNTCQCZAwEJAMwIAgkAuQICBQJjUgkAtgIBCQBlAgUCYmEAAQkAzAgCCQC2AgEFAmNRBQNuaWwEAmNUCQC3AgIFAmNSBQJjUwkAlAoCBQNuaWwJALkJAgkAzAgCAg4lcyVzJWQlZCVkJWQlcwkAzAgCBQJhdAkAzAgCBQJhcwkAzAgCCQCmAwEFAmNUCQDMCAIJAKYDAQUCY00JAMwIAgkApgMBBQJjUgkAzAgCCQCmAwEFAmNTCQDMCAICBHNvb24FA25pbAUBZgJjbQEUc3Rha2VkQnlVc2VyUkVBRE9OTFkCAmF0AmFzBAJidQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQECYXICBQJhcwUCYXQAAAkAlAoCBQNuaWwFAmJ1AmNtARNzdGFrZWRUb3RhbFJFQURPTkxZAQJhdAQCYkMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAmF1AQUCYXQAAAkAlAoCBQNuaWwFAmJDAmNtARJ1c2Vyc0xpc3RUcmF2ZXJzYWwBAmFCBAJjQwMJAAACCQDYBAEICAUCY20GY2FsbGVyBWJ5dGVzCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQFOAAIABgkBAmNuAQUCY20DCQAAAgUCY0MFAmNDBAJiZwkBAmJlAQUCYUIEAmRxCQCiCAEJAQJiZAEFAmFCBAJibQkAoggBCQECYmYBBQJiZwQBbwUCZHEDCQABAgUBbwIEVW5pdAQCZHIFAmJtAwkAAQIFAmRyAgRVbml0CQCUCgIFA25pbAcDCQABAgUCZHICBlN0cmluZwQCZHMFAmRyCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmJkAQUCYUIFAmRzBQNuaWwGCQACAQILTWF0Y2ggZXJyb3IDCQABAgUBbwIGU3RyaW5nBAJhRAUBbwQCY3gJAQFFAgUEdGhpcwkBAmF3AgUCYUIFAmFEBAJjcQkBAXoCBQJhWAkBAmFiAQUCYUIEAmNmCAkBAmJWBAUCYUIFAmFEBQJjcQAAAl8xBAJjeQkAuAICBQJjZgUCY3gEAmN6BgQCY0EDCQC/AgIFAmN5BQFoCQD8BwQFBHRoaXMCD2NsYWltV3hJTlRFUk5BTAkAzAgCBQJhQgkAzAgCBQJhRAkAzAgCBQJjegUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCY0EFAmNBBAJkdAkAoggBCQECYmsCBQJiZwUCYUQEAmRyBQJkdAMJAAECBQJkcgIEVW5pdAkAlAoCCQDMCAIJAQtEZWxldGVFbnRyeQEJAQJiZAEFAmFCBQNuaWwHAwkAAQIFAmRyAgZTdHJpbmcEAmR1BQJkcgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJiZAEFAmFCBQJkdQUDbmlsBgkAAgECC01hdGNoIGVycm9yCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQILTWF0Y2ggZXJyb3IJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CY20BDm9uTW9kaWZ5V2VpZ2h0AgJhdAJiegMJAQIhPQIIBQJjbQZjYWxsZXIFAmFYCQEBbAECEnBlcm1pc3Npb25zIGRlbmllZAQCZHYJAQJieQMFAmF0BQJiegAABAJidwgFAmR2Al8xBAJiWAgFAmR2Al8yBAJiWQgFAmR2Al8zBQJiWAECZHcBAmR4AAQCZHkEAW8JAQJjaQADCQABAgUBbwIKQnl0ZVZlY3RvcgQCY28FAW8FAmNvAwkAAQIFAW8CBFVuaXQIBQJkdw9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgkA9AMDCAUCZHcJYm9keUJ5dGVzCQCRAwIIBQJkdwZwcm9vZnMAAAUCZHkyO9aQ", "height": 2603411, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: FNYnGBjhcwhstvut1rSzopRQR2b5Nsbswikk2pjB5pQn Next: AFHdZEQfnEQzhqs8vnDF58dzpi5yEGBoctLTuA9op1FT 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-
439425 func stakeActions (i,lpAssetId,poolAddress,userAddress,amount) = {
440- let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
441- if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
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))
442436 then {
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.")
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)
466447 }
467448 else throw("Strict value is not equal to itself.")
468449 }
469450
470451
471452 func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
472- let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
473- if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
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))
474471 then {
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)
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)
491478 else unit
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- }
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)
507483 else throw("Strict value is not equal to itself.")
508484 }
509485 else throw("Strict value is not equal to itself.")
630606 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
631607 let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
632608 let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
633- let $t02598726099 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
634- let wxToClaimUserNew = $t02598726099._1
635- let integralSTATE = $t02598726099._2
636- let debug = $t02598726099._3
609+ let $t02545925571 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
610+ let wxToClaimUserNew = $t02545925571._1
611+ let integralSTATE = $t02545925571._2
612+ let debug = $t02545925571._3
637613 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
638614 if ((zeroBigInt >= availableToClaim))
639615 then if (throwIfNothingToClaim)
722698 else (height - emissionStartBlock)
723699 let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
724700 let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
725- let $t03015030262 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
726- let wxToClaimUserNew = $t03015030262._1
727- let integralSTATE = $t03015030262._2
728- let debug = $t03015030262._3
701+ let $t02962229734 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
702+ let wxToClaimUserNew = $t02962229734._1
703+ let integralSTATE = $t02962229734._2
704+ let debug = $t02962229734._3
729705 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
730706 let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
731707 let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
809785 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
810786 then throwErr("permissions denied")
811787 else {
812- let $t03305233162 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
813- let wxPerLpIntegralNew = $t03305233162._1
814- let poolIntegralSTATE = $t03305233162._2
815- let poolDEBUG = $t03305233162._3
788+ let $t03252432634 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
789+ let wxPerLpIntegralNew = $t03252432634._1
790+ let poolIntegralSTATE = $t03252432634._2
791+ let poolDEBUG = $t03252432634._3
816792 poolIntegralSTATE
817793 }
818794
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-
439425 func stakeActions (i,lpAssetId,poolAddress,userAddress,amount) = {
440- let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
441- if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
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))
442436 then {
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.")
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)
466447 }
467448 else throw("Strict value is not equal to itself.")
468449 }
469450
470451
471452 func unstakeActions (i,lpAssetId,poolAddress,userAddress,lpAssetRecipientAddress,amount) = {
472- let checkVotingEmissionFinalization = ensureVotingEmissionIsFinalized()
473- if ((checkVotingEmissionFinalization == checkVotingEmissionFinalization))
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))
474471 then {
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)
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)
491478 else unit
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- }
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)
507483 else throw("Strict value is not equal to itself.")
508484 }
509485 else throw("Strict value is not equal to itself.")
510486 }
511487
512488
513489 @Callable(i)
514490 func constructor (factoryAddressStr) = {
515491 let checkCaller = mustManager(i)
516492 if ((checkCaller == checkCaller))
517493 then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
518494 else throw("Strict value is not equal to itself.")
519495 }
520496
521497
522498
523499 @Callable(i)
524500 func constructorV2 (votingEmissionContract) = {
525501 let cheks = [mustManager(i), if ((addressFromString(votingEmissionContract) != unit))
526502 then true
527503 else "invalid voting emission contract address"]
528504 if ((cheks == cheks))
529505 then [StringEntry(keyVotingEmissionContract(), votingEmissionContract)]
530506 else throw("Strict value is not equal to itself.")
531507 }
532508
533509
534510
535511 @Callable(i)
536512 func stake () = if ((size(i.payments) != 1))
537513 then throwErr("invalid payment - exact one payment must be attached")
538514 else {
539515 let pmt = i.payments[0]
540516 let lpAssetId = value(pmt.assetId)
541517 let lpAssetIdStr = toBase58String(lpAssetId)
542518 let amount = pmt.amount
543519 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr)))
544520 let poolAddress = addressFromStringValue(poolAddressStr)
545521 let userAddress = if ((i.caller == poolAddress))
546522 then i.originCaller
547523 else i.caller
548524 stakeActions(i, lpAssetId, poolAddress, userAddress, amount)
549525 }
550526
551527
552528
553529 @Callable(i)
554530 func stakeFor (userAddressStr) = if ((size(i.payments) != 1))
555531 then throwErr("invalid payment - exact one payment must be attached")
556532 else {
557533 let pmt = i.payments[0]
558534 let lpAssetId = value(pmt.assetId)
559535 let lpAssetIdStr = toBase58String(lpAssetId)
560536 let amount = pmt.amount
561537 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr)))
562538 let poolAddress = addressFromStringValue(poolAddressStr)
563539 let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("invalid user address"))
564540 stakeActions(i, lpAssetId, poolAddress, userAddress, amount)
565541 }
566542
567543
568544
569545 @Callable(i)
570546 func unstake (lpAssetIdStr,amount) = {
571547 let lpAssetId = fromBase58String(lpAssetIdStr)
572548 let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr)))
573549 let poolAddress = addressFromStringValue(poolAddressStr)
574550 let callerStr = toString(i.caller)
575551 let userAddress = if ((callerStr == poolAddressStr))
576552 then i.originCaller
577553 else i.caller
578554 let lpAssetRecipientAddress = i.caller
579555 unstakeActions(i, lpAssetId, poolAddress, userAddress, lpAssetRecipientAddress, amount)
580556 }
581557
582558
583559
584560 @Callable(i)
585561 func unstakeINTERNAL (lpAssetId,amount,userAddress,lpAssetRecipientAddress) = {
586562 let lpAssetIdStr = toBase58String(lpAssetId)
587563 let poolAddress = addressFromStringValue(valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), wrapErr(("unsupported lp asset " + lpAssetIdStr))))
588564 let checkCaller = if ((i.caller == poolAddress))
589565 then true
590566 else permissionDeniedError
591567 if ((checkCaller == checkCaller))
592568 then unstakeActions(i, lpAssetId, poolAddress, Address(userAddress), Address(lpAssetRecipientAddress), amount)
593569 else throw("Strict value is not equal to itself.")
594570 }
595571
596572
597573
598574 @Callable(i)
599575 func claimWx (lpAssetIdStr) = {
600576 let userAddressStr = toString(i.caller)
601577 let throwIfNothingToClaim = true
602578 let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
603579 $Tuple2(nil, result)
604580 }
605581
606582
607583
608584 @Callable(i)
609585 func claimWxDoNotThrow (lpAssetIdStr) = {
610586 let userAddressStr = toString(i.caller)
611587 let throwIfNothingToClaim = false
612588 let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr, throwIfNothingToClaim], nil)
613589 $Tuple2(nil, result)
614590 }
615591
616592
617593
618594 @Callable(i)
619595 func claimWxINTERNAL (lpAssetIdStr,userAddressStr,throwIfNothingToClaim) = {
620596 let checkCaller = mustThis(i)
621597 if ((checkCaller == checkCaller))
622598 then {
623599 let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("claimWxINTERNAL: invalid user address"))
624600 let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
625601 let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
626602 let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
627603 let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
628604 let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
629605 let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
630606 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
631607 let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
632608 let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
633- let $t02598726099 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
634- let wxToClaimUserNew = $t02598726099._1
635- let integralSTATE = $t02598726099._2
636- let debug = $t02598726099._3
609+ let $t02545925571 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
610+ let wxToClaimUserNew = $t02545925571._1
611+ let integralSTATE = $t02545925571._2
612+ let debug = $t02545925571._3
637613 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
638614 if ((zeroBigInt >= availableToClaim))
639615 then if (throwIfNothingToClaim)
640616 then throwErr("nothing to claim")
641617 else $Tuple2(nil, 0)
642618 else {
643619 let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
644620 let minRewardPart = availableToClaim
645621 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
646622 let totalReward = (minRewardPart + boostRewardPart)
647623 let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
648624 let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
649625 if ((emitBoost == emitBoost))
650626 then {
651627 let claimedByUserValue = ((claimedByUser + minRewardPart) + boostRewardPart)
652628 let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
653629 let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserBoostReward + boostRewardPart)
654630 let claimedTotalPlusAvailableToClaim = (claimedTotal + availableToClaim)
655631 $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))
656632 }
657633 else throw("Strict value is not equal to itself.")
658634 }
659635 }
660636 else throw("Strict value is not equal to itself.")
661637 }
662638
663639
664640
665641 @Callable(i)
666642 func claimWxBulkInternalREADONLY (currentIter,lpAssetIds,userAddressStr,resAcc) = if ((currentIter == size(lpAssetIds)))
667643 then $Tuple2(nil, resAcc)
668644 else {
669645 let lpAssetId = lpAssetIds[currentIter]
670646 let info = split({
671647 let @ = invoke(this, "claimWxREADONLY", [lpAssetId, userAddressStr], nil)
672648 if ($isInstanceOf(@, "String"))
673649 then @
674650 else throw(($getType(@) + " couldn't be cast to String"))
675651 }, SEP)
676652 let unclaimed = info[3]
677653 let claimed = info[4]
678654 let userVoteFinalized = {
679655 let @ = invoke(boostingContract, "getUserVoteFinalizedREADONLY", [lpAssetId, userAddressStr], nil)
680656 if ($isInstanceOf(@, "Int"))
681657 then @
682658 else throw(($getType(@) + " couldn't be cast to Int"))
683659 }
684660 let res = (resAcc :+ makeString(["%d%d%d", unclaimed, claimed, toString(userVoteFinalized)], SEP))
685661 let inv = {
686662 let @ = invoke(this, "claimWxBulkInternalREADONLY", [(currentIter + 1), lpAssetIds, userAddressStr, res], nil)
687663 if ($isInstanceOf(@, "List[Any]"))
688664 then @
689665 else throw(($getType(@) + " couldn't be cast to List[Any]"))
690666 }
691667 if ((inv == inv))
692668 then $Tuple2(nil, inv)
693669 else throw("Strict value is not equal to itself.")
694670 }
695671
696672
697673
698674 @Callable(i)
699675 func claimWxBulkREADONLY (lpAssetIds,userAddressStr) = {
700676 let res = invoke(this, "claimWxBulkInternalREADONLY", [0, lpAssetIds, userAddressStr, nil], nil)
701677 $Tuple2(nil, res)
702678 }
703679
704680
705681
706682 @Callable(i)
707683 func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
708684 let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
709685 let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
710686 let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
711687 let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
712688 let stakedByUser = readStaked(stakedByUserKEY)
713689 let stakedTotal = readStaked(stakedTotalKEY)
714690 let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
715691 let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
716692 let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
717693 let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
718694 let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
719695 let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
720696 let passedBlocks = if ((emissionStartBlock > height))
721697 then 0
722698 else (height - emissionStartBlock)
723699 let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
724700 let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
725- let $t03015030262 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
726- let wxToClaimUserNew = $t03015030262._1
727- let integralSTATE = $t03015030262._2
728- let debug = $t03015030262._3
701+ let $t02962229734 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
702+ let wxToClaimUserNew = $t02962229734._1
703+ let integralSTATE = $t02962229734._2
704+ let debug = $t02962229734._3
729705 let availableToClaim = max([(wxToClaimUserNew - claimedByUserMinReward), zeroBigInt])
730706 let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
731707 let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
732708 let boostDebug = asString(boostInvResult[1])
733709 let minRewardPart = availableToClaim
734710 let boostRewardPart = min([(minRewardPart * toBigInt((boostCoeff - 1))), toBigInt(wxAmountBoostTotal)])
735711 let totalReward = (minRewardPart + boostRewardPart)
736712 $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), "soon"], SEP))
737713 }
738714
739715
740716
741717 @Callable(i)
742718 func stakedByUserREADONLY (lpAssetIdStr,userAddressStr) = {
743719 let stakedByUser = valueOrElse(getInteger(keyStakedByUser(userAddressStr, lpAssetIdStr)), 0)
744720 $Tuple2(nil, stakedByUser)
745721 }
746722
747723
748724
749725 @Callable(i)
750726 func stakedTotalREADONLY (lpAssetIdStr) = {
751727 let stakedTotal = valueOrElse(getInteger(keyStakedTotal(lpAssetIdStr)), 0)
752728 $Tuple2(nil, stakedTotal)
753729 }
754730
755731
756732
757733 @Callable(i)
758734 func usersListTraversal (lpAssetId) = {
759735 let checkCaller = if ((toBase58String(i.caller.bytes) == valueOrElse(getString(this, keyVotingEmissionContract()), "")))
760736 then true
761737 else mustManager(i)
762738 if ((checkCaller == checkCaller))
763739 then {
764740 let listName = getUsersListName(lpAssetId)
765741 let userOrUnit = getString(keyNextUser(lpAssetId))
766742 let headOrUnit = getString(keyListHead(listName))
767743 match userOrUnit {
768744 case _: Unit =>
769745 match headOrUnit {
770746 case _: Unit =>
771747 $Tuple2(nil, false)
772748 case head: String =>
773749 $Tuple2([StringEntry(keyNextUser(lpAssetId), head)], true)
774750 case _ =>
775751 throw("Match error")
776752 }
777753 case userAddress: String =>
778754 let claimedByUserMinReward = getBigIntFromStringOrZero(this, keyClaimedByUserMinReward(lpAssetId, userAddress))
779755 let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
780756 let wxToClaimUserNew = refreshINTEGRALS(lpAssetId, userAddress, poolAddress, 0)._1
781757 let availableToClaim = (wxToClaimUserNew - claimedByUserMinReward)
782758 let throwIfNothingToClaim = true
783759 let r = if ((availableToClaim > zeroBigInt))
784760 then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress, throwIfNothingToClaim], nil)
785761 else unit
786762 if ((r == r))
787763 then {
788764 let nextUserOrUnit = getString(keyListNext(listName, userAddress))
789765 match nextUserOrUnit {
790766 case _: Unit =>
791767 $Tuple2([DeleteEntry(keyNextUser(lpAssetId))], false)
792768 case nextUser: String =>
793769 $Tuple2([StringEntry(keyNextUser(lpAssetId), nextUser)], true)
794770 case _ =>
795771 throw("Match error")
796772 }
797773 }
798774 else throw("Strict value is not equal to itself.")
799775 case _ =>
800776 throw("Match error")
801777 }
802778 }
803779 else throw("Strict value is not equal to itself.")
804780 }
805781
806782
807783
808784 @Callable(i)
809785 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
810786 then throwErr("permissions denied")
811787 else {
812- let $t03305233162 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
813- let wxPerLpIntegralNew = $t03305233162._1
814- let poolIntegralSTATE = $t03305233162._2
815- let poolDEBUG = $t03305233162._3
788+ let $t03252432634 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
789+ let wxPerLpIntegralNew = $t03252432634._1
790+ let poolIntegralSTATE = $t03252432634._2
791+ let poolDEBUG = $t03252432634._3
816792 poolIntegralSTATE
817793 }
818794
819795
820796 @Verifier(tx)
821797 func verify () = {
822798 let targetPublicKey = match managerPublicKeyOrUnit() {
823799 case pk: ByteVector =>
824800 pk
825801 case _: Unit =>
826802 tx.senderPublicKey
827803 case _ =>
828804 throw("Match error")
829805 }
830806 sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
831807 }
832808

github/deemru/w8io/026f985 
97.17 ms