2022.07.01 15:40 [3186201] smart account 3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5cRLYjibR8rMWd6WJXxpwa9qimRGtLnZVVLEGEFAv5Az",
    "fee": 3000000,
    "feeAssetId": null,
    "timestamp": 1656679041075,
    "version": 1,
    "sender": "3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV",
    "senderPublicKey": "EAtbDa63mS5omrvW7Pfr7DKWEVLuReJtu72vfiBLRXsx",
    "proofs": [
        "53y4vHZMzATCv6H45UntaCiZXuaDLZ7fjZpinFyiQMtMwHMfzukXXLbdZYUFKCAK2Wfo3up3vZHNnTLx9Bu7pxVx"
    ],
    "script": "base64:BgI8CAISAwoBCBIDCgEIEgMKAQgSABIAEgQKAggBEgMKAQgSBAoCCAgSBAoCCAgSAwoBCBIECgIICBIDCgEIXgAGU0NBTEU4AAgABU1VTFQ4AIDC1y8AB1NDQUxFMTgAEgAGTVVMVDE4CQC2AgEAgICQu7rWrfANAANTRVACAl9fAA5QT09MV0VJR0hUTVVMVAUFTVVMVDgACnplcm9CaWdJbnQJALYCAQAAAAlvbmVCaWdJbnQJALYCAQABAAtrZXlNaWdyYXRvcgIIbWlncmF0b3IBCWFzQW55TGlzdAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIJTGlzdFtBbnldBAp2YWxBbnlMeXN0BQckbWF0Y2gwBQp2YWxBbnlMeXN0CQACAQIbZmFpbCB0byBjYXN0IGludG8gTGlzdFtBbnldAQVhc0ludAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIDSW50BAZ2YWxJbnQFByRtYXRjaDAFBnZhbEludAkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEIYXNTdHJpbmcBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACBlN0cmluZwQGdmFsU3RyBQckbWF0Y2gwBQZ2YWxTdHIJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBDGFzQnl0ZVZlY3RvcgEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQGdmFsQmluBQckbWF0Y2gwBQZ2YWxCaW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FA2tleQIPIGlzIG5vdCBkZWZpbmVkARhnZXRTdHJpbmdCeUFkZHJlc3NPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQCsAgIJAKwCAgkArAICCQCsAgICCm1hbmRhdG9yeSAJAKUIAQUHYWRkcmVzcwIBLgUDa2V5Ag8gaXMgbm90IGRlZmluZWQBDGdldEludE9yWmVybwIHYWRkcmVzcwNrZXkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUHYWRkcmVzcwUDa2V5AAABD2dldEludE9yRGVmYXVsdAMHYWRkcmVzcwNrZXkKZGVmYXVsdFZhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQdhZGRyZXNzBQNrZXkFCmRlZmF1bHRWYWwBDGdldEludE9yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQdhZGRyZXNzBQNrZXkJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FA2tleQIPIGlzIG5vdCBkZWZpbmVkARlnZXRCaWdJbnRGcm9tU3RyaW5nT3JaZXJvAgdhZGRyZXNzA2tleQkBBXZhbHVlAQkAqAMBCQELdmFsdWVPckVsc2UCCQCdCAIFB2FkZHJlc3MFA2tleQIBMAEcZ2V0QmlnSW50RnJvbVN0cmluZ09yRGVmYXVsdAMHYWRkcmVzcwNrZXkKZGVmYXVsdFZhbAQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQEFdmFsdWUBCQCoAwEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUKZGVmYXVsdFZhbAkAAgECC01hdGNoIGVycm9yAQV0b1gxOAIHb3JpZ1ZhbA1vcmlnU2NhbGVNdWx0CQC8AgMJALYCAQUHb3JpZ1ZhbAUGTVVMVDE4CQC2AgEFDW9yaWdTY2FsZU11bHQBB2Zyb21YMTgCA3ZhbA9yZXN1bHRTY2FsZU11bHQJAKADAQkAvAIDBQN2YWwJALYCAQUPcmVzdWx0U2NhbGVNdWx0BQZNVUxUMTgBEWtleUZhY3RvcnlBZGRyZXNzAAIcJXMlc19fY29uZmlnX19mYWN0b3J5QWRkcmVzcwEZa2V5Vm90aW5nRW1pc3Npb25Db250cmFjdAACGiVzX192b3RpbmdFbWlzc2lvbkNvbnRyYWN0ABhJZHhGYWN0b3J5Q2ZnU3Rha2luZ0RhcHAAAQAZSWR4RmFjdG9yeUNmZ0Jvb3N0aW5nRGFwcAACABRJZHhGYWN0b3J5Q2ZnSWRvRGFwcAADABVJZHhGYWN0b3J5Q2ZnVGVhbURhcHAABAAZSWR4RmFjdG9yeUNmZ0VtaXNzaW9uRGFwcAAFABVJZHhGYWN0b3J5Q2ZnUmVzdERhcHAABgAZSWR4RmFjdG9yeUNmZ1NsaXBwYWdlRGFwcAAHAQ1rZXlGYWN0b3J5Q2ZnAAIRJXNfX2ZhY3RvcnlDb25maWcBE2tleU1hbmFnZXJQdWJsaWNLZXkAAhQlc19fbWFuYWdlclB1YmxpY0tleQEaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBFmtleVN0YWJsZVBvb2xBZGRvbkFkZHIAAhclc19fc3RhYmxlUG9vbEFkZG9uQWRkcgEaa2V5RmFjdG9yeUxwMkFzc2V0c01hcHBpbmcBCmxwQXNzZXRTdHIJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUKbHBBc3NldFN0cgkAzAgCAh5tYXBwaW5nc19fbHBBc3NldDJQb29sQ29udHJhY3QFA25pbAUDU0VQARBrZXlGYWN0b3J5THBMaXN0AAIQJXNfX2xwVG9rZW5zTGlzdAEma2V5RmFjdG9yeUxwQXNzZXRUb1Bvb2xDb250cmFjdEFkZHJlc3MBCmxwQXNzZXRTdHIJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgUKbHBBc3NldFN0cgkAzAgCAh5tYXBwaW5nc19fbHBBc3NldDJQb29sQ29udHJhY3QFA25pbAUDU0VQARRrZXlGYWN0b3J5UG9vbFdlaWdodAEPY29udHJhY3RBZGRyZXNzCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgpwb29sV2VpZ2h0CQDMCAIFD2NvbnRyYWN0QWRkcmVzcwUDbmlsBQNTRVABCnJlYWRMcExpc3QBB2ZhY3RvcnkJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQdmYWN0b3J5CQEQa2V5RmFjdG9yeUxwTGlzdAACAAUDU0VQARRyZWFkRmFjdG9yeUNmZ09yRmFpbAEHZmFjdG9yeQkAtQkCCQEYZ2V0U3RyaW5nQnlBZGRyZXNzT3JGYWlsAgUHZmFjdG9yeQkBDWtleUZhY3RvcnlDZmcABQNTRVABGGdldEJvb3N0aW5nQWRkcmVzc09yRmFpbAEKZmFjdG9yeUNmZwkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQpmYWN0b3J5Q2ZnBRlJZHhGYWN0b3J5Q2ZnQm9vc3RpbmdEYXBwARhnZXRFbWlzc2lvbkFkZHJlc3NPckZhaWwBCmZhY3RvcnlDZmcJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUKZmFjdG9yeUNmZwUZSWR4RmFjdG9yeUNmZ0VtaXNzaW9uRGFwcAEXZ2V0U3Rha2luZ0FkZHJlc3NPckZhaWwBCmZhY3RvcnlDZmcJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUKZmFjdG9yeUNmZwUYSWR4RmFjdG9yeUNmZ1N0YWtpbmdEYXBwAR5rZXlFbWlzc2lvblJhdGVQZXJCbG9ja0N1cnJlbnQAAhslcyVzX19yYXRlUGVyQmxvY2tfX2N1cnJlbnQBIWtleUVtaXNzaW9uUmF0ZVBlckJsb2NrTWF4Q3VycmVudAACHiVzJXNfX3JhdGVQZXJCbG9ja01heF9fY3VycmVudAEVa2V5RW1pc3Npb25TdGFydEJsb2NrAAIaJXMlc19fZW1pc3Npb25fX3N0YXJ0QmxvY2sBG2tleUVtaXNzaW9uRHVyYXRpb25JbkJsb2NrcwACGCVzJXNfX2VtaXNzaW9uX19kdXJhdGlvbgETa2V5RW1pc3Npb25FbmRCbG9jawACGCVzJXNfX2VtaXNzaW9uX19lbmRCbG9jawEPa2V5U3Rha2VkQnlVc2VyAg51c2VyQWRkcmVzc1N0cgxscEFzc2V0SWRTdHIJALkJAgkAzAgCAg4lcyVzJXNfX3N0YWtlZAkAzAgCBQ51c2VyQWRkcmVzc1N0cgkAzAgCBQxscEFzc2V0SWRTdHIFA25pbAUDU0VQAQ5rZXlTdGFrZWRUb3RhbAEMbHBBc3NldElkU3RyCQCsAgICFyVzJXMlc19fc3Rha2VkX190b3RhbF9fBQxscEFzc2V0SWRTdHIBEGtleUNsYWltZWRCeVVzZXICDGxwQXNzZXRJZFN0cg51c2VyQWRkcmVzc1N0cgkAuQkCCQDMCAICDyVzJXMlc19fY2xhaW1lZAkAzAgCBQ51c2VyQWRkcmVzc1N0cgkAzAgCBQxscEFzc2V0SWRTdHIFA25pbAUDU0VQARlrZXlDbGFpbWVkQnlVc2VyTWluUmV3YXJkAgxscEFzc2V0SWRTdHIOdXNlckFkZHJlc3NTdHIJALkJAgkAzAgCAhglcyVzJXNfX2NsYWltZWRNaW5SZXdhcmQJAMwIAgUOdXNlckFkZHJlc3NTdHIJAMwIAgUMbHBBc3NldElkU3RyBQNuaWwFA1NFUAEba2V5Q2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkAgxscEFzc2V0SWRTdHIOdXNlckFkZHJlc3NTdHIJALkJAgkAzAgCAholcyVzJXNfX2NsYWltZWRCb29zdFJld2FyZAkAzAgCBQ51c2VyQWRkcmVzc1N0cgkAzAgCBQxscEFzc2V0SWRTdHIFA25pbAUDU0VQAQ9rZXlDbGFpbWVkVG90YWwBDGxwQXNzZXRJZFN0cgkAuQkCCQDMCAICFiVzJXMlc19fY2xhaW1lZF9fdG90YWwJAMwIAgUMbHBBc3NldElkU3RyBQNuaWwFA1NFUAEKcmVhZFN0YWtlZAEDa2V5CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFA2tleQAAARVrZXlMYXN0VG90YWxMcEJhbGFuY2UBCWxwQXNzZXRJZAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQlscEFzc2V0SWQJAMwIAgIFdG90YWwJAMwIAgIDYmFsBQNuaWwFA1NFUAEUa2V5TGFzdFVzZXJMcEJhbGFuY2UCCWxwQXNzZXRJZAt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQlscEFzc2V0SWQJAMwIAgULdXNlckFkZHJlc3MJAMwIAgIDYmFsBQNuaWwFA1NFUAEZa2V5VG90YWxMcEJhbGFuY2VJbnRlZ3JhbAEJbHBBc3NldElkCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFCWxwQXNzZXRJZAkAzAgCAgV0b3RhbAkAzAgCAgZiYWxJTlQFA25pbAUDU0VQARhrZXlVc2VyTHBCYWxhbmNlSW50ZWdyYWwCCWxwQXNzZXRJZAt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQlscEFzc2V0SWQJAMwIAgULdXNlckFkZHJlc3MJAMwIAgIGYmFsSU5UBQNuaWwFA1NFUAEma2V5VG90YWxMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQBCWxwQXNzZXRJZAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQlscEFzc2V0SWQJAMwIAgIFdG90YWwJAMwIAgIHbGFzdFVwZAUDbmlsBQNTRVABJWtleVVzZXJMcEJhbGFuY2VJbnRlZ3JhbExhc3RVcGRIZWlnaHQCCWxwQXNzZXRJZAt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQlscEFzc2V0SWQJAMwIAgULdXNlckFkZHJlc3MJAMwIAgIHbGFzdFVwZAUDbmlsBQNTRVABEmtleVd4UGVyTHBJbnRlZ3JhbAEJbHBBc3NldElkCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUJbHBBc3NldElkCQDMCAICBmNvbW1vbgkAzAgCAgVscEludAUDbmlsBQNTRVABH2tleVd4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHQBCWxwQXNzZXRJZAkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFCWxwQXNzZXRJZAkAzAgCAgZjb21tb24JAMwIAgIGbHBJbnRIBQNuaWwFA1NFUAEQa2V5V3hUb0NsYWltVXNlcgIJbHBBc3NldElkC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUJbHBBc3NldElkCQDMCAIFC3VzZXJBZGRyZXNzCQDMCAICBWxwSW50BQNuaWwFA1NFUAEja2V5V3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHQCCWxwQXNzZXRJZAt1c2VyQWRkcmVzcwkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFCWxwQXNzZXRJZAkAzAgCBQt1c2VyQWRkcmVzcwkAzAgCAgZscEludEgFA25pbAUDU0VQAQprZXlXeFBlckxwAQlscEFzc2V0SWQJALkJAgkAzAgCAgIlcwkAzAgCBQlscEFzc2V0SWQJAMwIAgIHd3hQZXJMcAUDbmlsBQNTRVABDWtleVd4UGVyTHBYMTgBCWxwQXNzZXRJZAkAuQkCCQDMCAICAiVzCQDMCAIFCWxwQXNzZXRJZAkAzAgCAgp3eFBlckxwWDE4BQNuaWwFA1NFUAEaa2V5V3hQZXJMcEludGVncmFsVXNlckxhc3QCCWxwQXNzZXRJZAt1c2VyQWRkcmVzcwkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAIFCWxwQXNzZXRJZAkAzAgCBQt1c2VyQWRkcmVzcwkAzAgCAgV1SW50TAUDbmlsBQNTRVABGWtleU9wZXJhdGlvbkhpc3RvcnlSZWNvcmQDBHR5cGULdXNlckFkZHJlc3MGdHhJZDU4CQC5CQIJAMwIAgIRJXMlcyVzJXNfX2hpc3RvcnkJAMwIAgUEdHlwZQkAzAgCBQt1c2VyQWRkcmVzcwkAzAgCBQZ0eElkNTgFA25pbAUDU0VQARNmb3JtYXRIaXN0b3J5UmVjb3JkBAt1c2VyQWRkcmVzcwlscEFzc2V0SWQEdHlwZQZhbW91bnQJALkJAgkAzAgCAgwlcyVzJXMlZCVkJWQJAMwIAgULdXNlckFkZHJlc3MJAMwIAgUJbHBBc3NldElkCQDMCAIFBHR5cGUJAMwIAgkApAMBBQZoZWlnaHQJAMwIAgkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQCkAwEFBmFtb3VudAUDbmlsBQNTRVABFU9wZXJhdGlvbkhpc3RvcnlFbnRyeQUEdHlwZQt1c2VyQWRkcmVzcwlscEFzc2V0SWQGYW1vdW50BHR4SWQJAQtTdHJpbmdFbnRyeQIJARlrZXlPcGVyYXRpb25IaXN0b3J5UmVjb3JkAwUEdHlwZQULdXNlckFkZHJlc3MJANgEAQUEdHhJZAkBE2Zvcm1hdEhpc3RvcnlSZWNvcmQEBQt1c2VyQWRkcmVzcwUJbHBBc3NldElkBQR0eXBlBQZhbW91bnQADmZhY3RvcnlBZGRyZXNzCQEPZ2V0U3RyaW5nT3JGYWlsAgUEdGhpcwkBEWtleUZhY3RvcnlBZGRyZXNzAAAPZmFjdG9yeUNvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBBQ5mYWN0b3J5QWRkcmVzcwAKZmFjdG9yeUNmZwkBFHJlYWRGYWN0b3J5Q2ZnT3JGYWlsAQUPZmFjdG9yeUNvbnRyYWN0ABBlbWlzc2lvbkNvbnRyYWN0CQEYZ2V0RW1pc3Npb25BZGRyZXNzT3JGYWlsAQUKZmFjdG9yeUNmZwAQYm9vc3RpbmdDb250cmFjdAkBGGdldEJvb3N0aW5nQWRkcmVzc09yRmFpbAEFCmZhY3RvcnlDZmcBC2tleU5leHRVc2VyAQlscEFzc2V0SWQJALkJAgkAzAgCAgQlcyVzCQDMCAIFCWxwQXNzZXRJZAkAzAgCAghuZXh0VXNlcgUDbmlsBQNTRVABEGdldFVzZXJzTGlzdE5hbWUBCWxwQXNzZXRJZAkAuQkCCQDMCAICBXVzZXJzCQDMCAIFCWxwQXNzZXRJZAUDbmlsBQNTRVABC2tleUxpc3RIZWFkAQhsaXN0TmFtZQkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQhsaXN0TmFtZQkAzAgCAgRoZWFkBQNuaWwFA1NFUAELa2V5TGlzdFNpemUBCGxpc3ROYW1lCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFCGxpc3ROYW1lCQDMCAICBHNpemUFA25pbAUDU0VQAQtrZXlMaXN0UHJldgIIbGlzdE5hbWUCaWQJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCBQhsaXN0TmFtZQkAzAgCBQJpZAkAzAgCAgRwcmV2BQNuaWwFA1NFUAELa2V5TGlzdE5leHQCCGxpc3ROYW1lAmlkCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgUIbGlzdE5hbWUJAMwIAgUCaWQJAMwIAgIEbmV4dAUDbmlsBQNTRVABDGNvbnRhaW5zTm9kZQIIbGlzdE5hbWUCaWQECmhlYWRPclVuaXQJAJ0IAgUEdGhpcwkBC2tleUxpc3RIZWFkAQUIbGlzdE5hbWUECnByZXZPclVuaXQJAJ0IAgUEdGhpcwkBC2tleUxpc3RQcmV2AgUIbGlzdE5hbWUFAmlkBApuZXh0T3JVbml0CQCdCAIFBHRoaXMJAQtrZXlMaXN0TmV4dAIFCGxpc3ROYW1lBQJpZAMDCQAAAgUCaWQJAQt2YWx1ZU9yRWxzZQIFCmhlYWRPclVuaXQCAAYJAQIhPQIFCnByZXZPclVuaXQFBHVuaXQGCQECIT0CBQpuZXh0T3JVbml0BQR1bml0ARFpbnNlcnROb2RlQWN0aW9ucwIIbGlzdE5hbWUCaWQECmhlYWRPclVuaXQJAJ0IAgUEdGhpcwkBC2tleUxpc3RIZWFkAQUIbGlzdE5hbWUECGxpc3RTaXplCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAQtrZXlMaXN0U2l6ZQEFCGxpc3ROYW1lAAAECWNoZWNrTm9kZQMJAQEhAQkBDGNvbnRhaW5zTm9kZQIFCGxpc3ROYW1lBQJpZAYJAAIBAgtOb2RlIGV4aXN0cwMJAAACBQljaGVja05vZGUFCWNoZWNrTm9kZQkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQtrZXlMaXN0U2l6ZQEFCGxpc3ROYW1lCQBkAgUIbGlzdFNpemUAAQUDbmlsAwkBAiE9AgUKaGVhZE9yVW5pdAUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQELa2V5TGlzdE5leHQCBQhsaXN0TmFtZQUCaWQJAQV2YWx1ZQEFCmhlYWRPclVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBC2tleUxpc3RQcmV2AgUIbGlzdE5hbWUJAQV2YWx1ZQEFCmhlYWRPclVuaXQFAmlkBQNuaWwFA25pbAkAzAgCCQELU3RyaW5nRW50cnkCCQELa2V5TGlzdEhlYWQBBQhsaXN0TmFtZQUCaWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgERZGVsZXRlTm9kZUFjdGlvbnMCCGxpc3ROYW1lAmlkBApoZWFkT3JVbml0CQCdCAIFBHRoaXMJAQtrZXlMaXN0SGVhZAEFCGxpc3ROYW1lBAhsaXN0U2l6ZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQELa2V5TGlzdFNpemUBBQhsaXN0TmFtZQAABApwcmV2T3JVbml0CQCdCAIFBHRoaXMJAQtrZXlMaXN0UHJldgIFCGxpc3ROYW1lBQJpZAQKbmV4dE9yVW5pdAkAnQgCBQR0aGlzCQELa2V5TGlzdE5leHQCBQhsaXN0TmFtZQUCaWQJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBC2tleUxpc3RTaXplAQUIbGlzdE5hbWUJAGUCBQhsaXN0U2l6ZQABBQNuaWwDAwkBAiE9AgUKcHJldk9yVW5pdAUEdW5pdAkBAiE9AgUKbmV4dE9yVW5pdAUEdW5pdAcJAMwIAgkBC1N0cmluZ0VudHJ5AgkBC2tleUxpc3ROZXh0AgUIbGlzdE5hbWUJAQV2YWx1ZQEFCnByZXZPclVuaXQJAQV2YWx1ZQEFCm5leHRPclVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBC2tleUxpc3RQcmV2AgUIbGlzdE5hbWUJAQV2YWx1ZQEFCm5leHRPclVuaXQJAQV2YWx1ZQEFCnByZXZPclVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBC2tleUxpc3RQcmV2AgUIbGlzdE5hbWUFAmlkCQDMCAIJAQtEZWxldGVFbnRyeQEJAQtrZXlMaXN0TmV4dAIFCGxpc3ROYW1lBQJpZAUDbmlsAwkBAiE9AgUKbmV4dE9yVW5pdAUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQELa2V5TGlzdEhlYWQBBQhsaXN0TmFtZQkBBXZhbHVlAQUKbmV4dE9yVW5pdAkAzAgCCQELRGVsZXRlRW50cnkBCQELa2V5TGlzdE5leHQCBQhsaXN0TmFtZQUCaWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBC2tleUxpc3RQcmV2AgUIbGlzdE5hbWUJAQV2YWx1ZQEFCm5leHRPclVuaXQFA25pbAMJAQIhPQIFCnByZXZPclVuaXQFBHVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBC2tleUxpc3RQcmV2AgUIbGlzdE5hbWUFAmlkCQDMCAIJAQtEZWxldGVFbnRyeQEJAQtrZXlMaXN0TmV4dAIFCGxpc3ROYW1lCQEFdmFsdWUBBQpwcmV2T3JVbml0BQNuaWwDCQAAAgUCaWQJAQt2YWx1ZU9yRWxzZQIFCmhlYWRPclVuaXQCAAkAzAgCCQELRGVsZXRlRW50cnkBCQELa2V5TGlzdEhlYWQBBQhsaXN0TmFtZQUDbmlsCQACAQkArAICCQCsAgIJAKwCAgIOaW52YWxpZCBub2RlOiAFCGxpc3ROYW1lAgEuBQJpZAEbY2FsY1d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0BAxzdGFrZWRCeVVzZXImd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHRPclplcm8Sd3hQZXJMcEludGVncmFsTmV3Gnd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0S0VZAwMJAAACBSZ3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE9yWmVybwUKemVyb0JpZ0ludAkAvwICBQxzdGFrZWRCeVVzZXIFCnplcm9CaWdJbnQHBQp6ZXJvQmlnSW50AwkAAAIFDHN0YWtlZEJ5VXNlcgUKemVyb0JpZ0ludAUSd3hQZXJMcEludGVncmFsTmV3AwMJAL8CAgUmd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHRPclplcm8FCnplcm9CaWdJbnQJAL8CAgUMc3Rha2VkQnlVc2VyBQp6ZXJvQmlnSW50BwkBBXZhbHVlAQkAqAMBCQEPZ2V0U3RyaW5nT3JGYWlsAgUEdGhpcwUad3hQZXJMcEludGVncmFsVXNlckxhc3RLRVkJAAIBAi1jYWxjV3hQZXJMcEludGVncmFsVXNlckxhc3Q6IHVuZXhwZWN0ZWQgc3RhdGUBFHJlZnJlc2hQb29sSU5URUdSQUxTAwxscEFzc2V0SWRTdHIOcG9vbEFkZHJlc3NTdHINbHBEZWx0YUFtb3VudAQOc3Rha2VkVG90YWxLRVkJAQ5rZXlTdGFrZWRUb3RhbAEFDGxwQXNzZXRJZFN0cgQLc3Rha2VkVG90YWwJALYCAQkBCnJlYWRTdGFrZWQBBQ5zdGFrZWRUb3RhbEtFWQQSbm9uWmVyb1N0YWtlZFRvdGFsAwkAAAIFC3N0YWtlZFRvdGFsBQp6ZXJvQmlnSW50BQlvbmVCaWdJbnQFC3N0YWtlZFRvdGFsBApwb29sV2VpZ2h0CQERQGV4dHJOYXRpdmUoMTA1MCkCBQ9mYWN0b3J5Q29udHJhY3QJARRrZXlGYWN0b3J5UG9vbFdlaWdodAEFDnBvb2xBZGRyZXNzU3RyBBJlbWlzc2lvblN0YXJ0QmxvY2sJAQxnZXRJbnRPckZhaWwCBRBlbWlzc2lvbkNvbnRyYWN0CQEVa2V5RW1pc3Npb25TdGFydEJsb2NrAAQFTVVMVDMA6AcEFHd4RW1pc3Npb25QZXJCbG9ja1gzCQBoAgkBDGdldEludE9yRmFpbAIFEGVtaXNzaW9uQ29udHJhY3QJAR5rZXlFbWlzc2lvblJhdGVQZXJCbG9ja0N1cnJlbnQABQVNVUxUMwQYcG9vbFd4RW1pc3Npb25QZXJCbG9ja1gzCQBrAwUUd3hFbWlzc2lvblBlckJsb2NrWDMFCnBvb2xXZWlnaHQJAGgCBQ5QT09MV0VJR0hUTVVMVAADBBJ3eFBlckxwSW50ZWdyYWxLRVkJARJrZXlXeFBlckxwSW50ZWdyYWwBBQxscEFzc2V0SWRTdHIEH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkJAR9rZXlXeFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0AQUMbHBBc3NldElkU3RyBAp3eFBlckxwS0VZCQEKa2V5V3hQZXJMcAEFDGxwQXNzZXRJZFN0cgQcd3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodAkBD2dldEludE9yRGVmYXVsdAMFBHRoaXMFH3d4UGVyTHBJbnRlZ3JhbExhc3RVcGRIZWlnaHRLRVkFEmVtaXNzaW9uU3RhcnRCbG9jawQPd3hQZXJMcEludGVncmFsCQEZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybwIFBHRoaXMFEnd4UGVyTHBJbnRlZ3JhbEtFWQQPd3hQZXJMcE9yWmVyb1gzAAAEAmRoCQCWAwEJAMwIAgkAZQIFBmhlaWdodAUcd3hQZXJMcEludGVncmFsTGFzdFVwZEhlaWdodAkAzAgCAAAFA25pbAQJd3hQZXJMcFgzAwkBAiE9AgUPd3hQZXJMcE9yWmVyb1gzAAAJALYCAQUPd3hQZXJMcE9yWmVyb1gzCQC8AgMJALYCAQUYcG9vbFd4RW1pc3Npb25QZXJCbG9ja1gzCQC2AgEFBU1VTFQ4BRJub25aZXJvU3Rha2VkVG90YWwEDnN0YWtlZFRvdGFsTmV3CQC3AgIFC3N0YWtlZFRvdGFsCQC2AgEFDWxwRGVsdGFBbW91bnQEFW5vblplcm9TdGFrZWRUb3RhbE5ldwMJAAACBQ5zdGFrZWRUb3RhbE5ldwUKemVyb0JpZ0ludAUJb25lQmlnSW50BQ5zdGFrZWRUb3RhbE5ldwQSd3hQZXJMcEludGVncmFsTmV3CQC3AgIFD3d4UGVyTHBJbnRlZ3JhbAkAuQICBQl3eFBlckxwWDMJALYCAQUCZGgEDHd4UGVyTHBYM05ldwkAugICCQC2AgEFGHBvb2xXeEVtaXNzaW9uUGVyQmxvY2tYMwUVbm9uWmVyb1N0YWtlZFRvdGFsTmV3BB93eFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0TmV3BQZoZWlnaHQEBWRlYnVnCQC5CQIJAMwIAgkApgMBBRJ3eFBlckxwSW50ZWdyYWxOZXcJAMwIAgkApAMBBQJkaAkAzAgCCQCmAwEFCXd4UGVyTHBYMwkAzAgCCQCmAwEFC3N0YWtlZFRvdGFsCQDMCAIJAKQDAQUYcG9vbFd4RW1pc3Npb25QZXJCbG9ja1gzCQDMCAIJAKQDAQUUd3hFbWlzc2lvblBlckJsb2NrWDMJAMwIAgkApAMBBQpwb29sV2VpZ2h0BQNuaWwCAjo6CQCVCgMFEnd4UGVyTHBJbnRlZ3JhbE5ldwkAzAgCCQELU3RyaW5nRW50cnkCBRJ3eFBlckxwSW50ZWdyYWxLRVkJAKYDAQUSd3hQZXJMcEludGVncmFsTmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCBR93eFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0S0VZBR93eFBlckxwSW50ZWdyYWxMYXN0VXBkSGVpZ2h0TmV3CQDMCAIJAQtTdHJpbmdFbnRyeQIFCnd4UGVyTHBLRVkJAKYDAQUMd3hQZXJMcFgzTmV3BQNuaWwFBWRlYnVnARByZWZyZXNoSU5URUdSQUxTBAxscEFzc2V0SWRTdHIOdXNlckFkZHJlc3NTdHIOcG9vbEFkZHJlc3NTdHINbHBEZWx0YUFtb3VudAQNJHQwMTQyNDYxNDM2OAkBFHJlZnJlc2hQb29sSU5URUdSQUxTAwUMbHBBc3NldElkU3RyBQ5wb29sQWRkcmVzc1N0cgUNbHBEZWx0YUFtb3VudAQSd3hQZXJMcEludGVncmFsTmV3CAUNJHQwMTQyNDYxNDM2OAJfMQQRcG9vbEludGVncmFsU1RBVEUIBQ0kdDAxNDI0NjE0MzY4Al8yBAlwb29sREVCVUcIBQ0kdDAxNDI0NjE0MzY4Al8zBAVNVUxUMwDoBwQPc3Rha2VkQnlVc2VyS0VZCQEPa2V5U3Rha2VkQnlVc2VyAgUOdXNlckFkZHJlc3NTdHIFDGxwQXNzZXRJZFN0cgQMc3Rha2VkQnlVc2VyCQEKcmVhZFN0YWtlZAEFD3N0YWtlZEJ5VXNlcktFWQQQd3hUb0NsYWltVXNlcktFWQkBEGtleVd4VG9DbGFpbVVzZXICBQxscEFzc2V0SWRTdHIFDnVzZXJBZGRyZXNzU3RyBCN3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodEtFWQkBI2tleVd4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0AgUMbHBBc3NldElkU3RyBQ51c2VyQWRkcmVzc1N0cgQad3hQZXJMcEludGVncmFsVXNlckxhc3RLRVkJARprZXlXeFBlckxwSW50ZWdyYWxVc2VyTGFzdAIFDGxwQXNzZXRJZFN0cgUOdXNlckFkZHJlc3NTdHIEDXd4VG9DbGFpbVVzZXIJARlnZXRCaWdJbnRGcm9tU3RyaW5nT3JaZXJvAgUEdGhpcwUQd3hUb0NsYWltVXNlcktFWQQmd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHRPclplcm8JAQxnZXRJbnRPclplcm8CBQR0aGlzBSN3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodEtFWQQXd3hQZXJMcEludGVncmFsVXNlckxhc3QJARtjYWxjV3hQZXJMcEludGVncmFsVXNlckxhc3QECQC2AgEFDHN0YWtlZEJ5VXNlcgkAtgIBBSZ3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE9yWmVybwUSd3hQZXJMcEludGVncmFsTmV3BRp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdEtFWQQGTVVMVDExCQBoAgUFTVVMVDgFBU1VTFQzBBB3eFRvQ2xhaW1Vc2VyTmV3CQCYAwEJAMwIAgkAtwICBQ13eFRvQ2xhaW1Vc2VyCQC8AgMJALgCAgUSd3hQZXJMcEludGVncmFsTmV3BRd3eFBlckxwSW50ZWdyYWxVc2VyTGFzdAkAtgIBBQxzdGFrZWRCeVVzZXIJALYCAQUGTVVMVDExCQDMCAIFCnplcm9CaWdJbnQFA25pbAQad3hQZXJMcEludGVncmFsVXNlckxhc3ROZXcFEnd4UGVyTHBJbnRlZ3JhbE5ldwQjd3hQZXJMcEludGVncmFsVXNlckxhc3RVcGRIZWlnaHROZXcFBmhlaWdodAQFZGVidWcJALkJAgkAzAgCCQCmAwEFDXd4VG9DbGFpbVVzZXIJAMwIAgkApgMBBRd3eFBlckxwSW50ZWdyYWxVc2VyTGFzdAkAzAgCCQCkAwEFDHN0YWtlZEJ5VXNlcgkAzAgCBQlwb29sREVCVUcJAMwIAgkApAMBBQZoZWlnaHQFA25pbAICOjoJAJUKAwUQd3hUb0NsYWltVXNlck5ldwkAzggCBRFwb29sSW50ZWdyYWxTVEFURQkAzAgCCQELU3RyaW5nRW50cnkCBRB3eFRvQ2xhaW1Vc2VyS0VZCQCmAwEFEHd4VG9DbGFpbVVzZXJOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIFI3d4UGVyTHBJbnRlZ3JhbFVzZXJMYXN0VXBkSGVpZ2h0S0VZBSN3eFBlckxwSW50ZWdyYWxVc2VyTGFzdFVwZEhlaWdodE5ldwkAzAgCCQELU3RyaW5nRW50cnkCBRp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdEtFWQkApgMBBRp3eFBlckxwSW50ZWdyYWxVc2VyTGFzdE5ldwUDbmlsBQVkZWJ1ZwEWbWFuYWdlclB1YmxpY0tleU9yVW5pdAAEByRtYXRjaDAJAKIIAQkBE2tleU1hbmFnZXJQdWJsaWNLZXkAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgEdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQABAckbWF0Y2gwCQCiCAEJARprZXlQZW5kaW5nTWFuYWdlclB1YmxpY0tleQADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQDZBAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yABVwZXJtaXNzaW9uRGVuaWVkRXJyb3IJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAEIbXVzdFRoaXMBAWkDCQAAAggFAWkGY2FsbGVyBQR0aGlzBgUVcGVybWlzc2lvbkRlbmllZEVycm9yAQttdXN0TWFuYWdlcgEBaQQHJG1hdGNoMAkBFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQAAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAnBrBQckbWF0Y2gwAwkAAAIIBQFpD2NhbGxlclB1YmxpY0tleQUCcGsGBRVwZXJtaXNzaW9uRGVuaWVkRXJyb3IDCQABAgUHJG1hdGNoMAIEVW5pdAMJAAACCAUBaQZjYWxsZXIFBHRoaXMGBRVwZXJtaXNzaW9uRGVuaWVkRXJyb3IJAAIBAgtNYXRjaCBlcnJvcgwBaQELY29uc3RydWN0b3IBEWZhY3RvcnlBZGRyZXNzU3RyBAtjaGVja0NhbGxlcgkBC211c3RNYW5hZ2VyAQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUZhY3RvcnlBZGRyZXNzAAURZmFjdG9yeUFkZHJlc3NTdHIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ1jb25zdHJ1Y3RvclYyARZ2b3RpbmdFbWlzc2lvbkNvbnRyYWN0BAVjaGVrcwkAzAgCCQELbXVzdE1hbmFnZXIBBQFpCQDMCAIDCQECIT0CCQCmCAEFFnZvdGluZ0VtaXNzaW9uQ29udHJhY3QFBHVuaXQGAihpbnZhbGlkIHZvdGluZyBlbWlzc2lvbiBjb250cmFjdCBhZGRyZXNzBQNuaWwDCQAAAgUFY2hla3MFBWNoZWtzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARlrZXlWb3RpbmdFbWlzc2lvbkNvbnRyYWN0AAUWdm90aW5nRW1pc3Npb25Db250cmFjdAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnNldE1hbmFnZXIBF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BAtjaGVja0NhbGxlcgkBC211c3RNYW5hZ2VyAQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIEFWNoZWNrTWFuYWdlclB1YmxpY0tleQkA2QQBBRdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQMJAAACBRVjaGVja01hbmFnZXJQdWJsaWNLZXkFFWNoZWNrTWFuYWdlclB1YmxpY0tleQkAzAgCCQELU3RyaW5nRW50cnkCCQEaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkABRdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDmNvbmZpcm1NYW5hZ2VyAAQCcG0JAR1wZW5kaW5nTWFuYWdlclB1YmxpY0tleU9yVW5pdAAEBWhhc1BNAwkBCWlzRGVmaW5lZAEFAnBtBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQVoYXNQTQUFaGFzUE0EB2NoZWNrUE0DCQAAAggFAWkPY2FsbGVyUHVibGljS2V5CQEFdmFsdWUBBQJwbQYJAAIBAhtZb3UgYXJlIG5vdCBwZW5kaW5nIG1hbmFnZXIDCQAAAgUHY2hlY2tQTQUHY2hlY2tQTQkAzAgCCQELU3RyaW5nRW50cnkCCQETa2V5TWFuYWdlclB1YmxpY0tleQAJANgEAQkBBXZhbHVlAQUCcG0JAMwIAgkBC0RlbGV0ZUVudHJ5AQkBGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBXN0YWtlAAQJbWlncmF0aW9uAwkBAiE9AgkAnAgCBQR0aGlzBQtrZXlNaWdyYXRvcgUEdW5pdAkAAgECC21haW50ZW5hbmNlBQR1bml0AwkAAAIFCW1pZ3JhdGlvbgUJbWlncmF0aW9uAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQI0aW52YWxpZCBwYXltZW50IC0gZXhhY3Qgb25lIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAECWxwQXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAxscEFzc2V0SWRTdHIJANgEAQUJbHBBc3NldElkBAZhbW91bnQIBQNwbXQGYW1vdW50BA5wb29sQWRkcmVzc1N0cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD2ZhY3RvcnlDb250cmFjdAkBGmtleUZhY3RvcnlMcDJBc3NldHNNYXBwaW5nAQUMbHBBc3NldElkU3RyCQCsAgICFXVuc3VwcG9ydGVkIGxwIGFzc2V0IAUMbHBBc3NldElkU3RyBAljYWxsZXJTdHIJAKUIAQgFAWkGY2FsbGVyBA51c2VyQWRkcmVzc1N0cgMJAAACBQljYWxsZXJTdHIFDnBvb2xBZGRyZXNzU3RyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgUJY2FsbGVyU3RyBA9zdGFrZWRCeVVzZXJLRVkJAQ9rZXlTdGFrZWRCeVVzZXICBQ51c2VyQWRkcmVzc1N0cgUMbHBBc3NldElkU3RyBA5zdGFrZWRUb3RhbEtFWQkBDmtleVN0YWtlZFRvdGFsAQUMbHBBc3NldElkU3RyBAxzdGFrZWRCeVVzZXIJAQpyZWFkU3Rha2VkAQUPc3Rha2VkQnlVc2VyS0VZBAtzdGFrZWRUb3RhbAkBCnJlYWRTdGFrZWQBBQ5zdGFrZWRUb3RhbEtFWQQNJHQwMTg5MzYxOTA1MwkBEHJlZnJlc2hJTlRFR1JBTFMEBQxscEFzc2V0SWRTdHIFDnVzZXJBZGRyZXNzU3RyBQ5wb29sQWRkcmVzc1N0cgUGYW1vdW50BBB3eFRvQ2xhaW1Vc2VyTmV3CAUNJHQwMTg5MzYxOTA1MwJfMQQNaW50ZWdyYWxTVEFURQgFDSR0MDE4OTM2MTkwNTMCXzIEBWRlYnVnCAUNJHQwMTg5MzYxOTA1MwJfMwQIbGlzdE5hbWUJARBnZXRVc2Vyc0xpc3ROYW1lAQUMbHBBc3NldElkU3RyBAtsaXN0QWN0aW9ucwMJAQxjb250YWluc05vZGUCBQhsaXN0TmFtZQUOdXNlckFkZHJlc3NTdHIFA25pbAkBEWluc2VydE5vZGVBY3Rpb25zAgUIbGlzdE5hbWUFDnVzZXJBZGRyZXNzU3RyCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUPc3Rha2VkQnlVc2VyS0VZCQBkAgUMc3Rha2VkQnlVc2VyBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFDnN0YWtlZFRvdGFsS0VZCQBkAgULc3Rha2VkVG90YWwFBmFtb3VudAkAzAgCCQEVT3BlcmF0aW9uSGlzdG9yeUVudHJ5BQIFc3Rha2UFDnVzZXJBZGRyZXNzU3RyBQxscEFzc2V0SWRTdHIFBmFtb3VudAgFAWkNdHJhbnNhY3Rpb25JZAUDbmlsBQ1pbnRlZ3JhbFNUQVRFBQtsaXN0QWN0aW9ucwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQd1bnN0YWtlAgxscEFzc2V0SWRTdHIGYW1vdW50BAltaWdyYXRpb24DCQECIT0CCQCcCAIFBHRoaXMFC2tleU1pZ3JhdG9yBQR1bml0CQACAQILbWFpbnRlbmFuY2UFBHVuaXQDCQAAAgUJbWlncmF0aW9uBQltaWdyYXRpb24ECWxwQXNzZXRJZAkA2QQBBQxscEFzc2V0SWRTdHIEDnBvb2xBZGRyZXNzU3RyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUPZmFjdG9yeUNvbnRyYWN0CQEaa2V5RmFjdG9yeUxwMkFzc2V0c01hcHBpbmcBBQxscEFzc2V0SWRTdHIJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQxscEFzc2V0SWRTdHIECXBvb2xBZGRvbgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEWa2V5U3RhYmxlUG9vbEFkZG9uQWRkcgAFDnBvb2xBZGRyZXNzU3RyBAljYWxsZXJTdHIJAKUIAQgFAWkGY2FsbGVyBA51c2VyQWRkcmVzc1N0cgMDCQAAAgUJY2FsbGVyU3RyBQ5wb29sQWRkcmVzc1N0cgYJAAACBQljYWxsZXJTdHIFCXBvb2xBZGRvbgkApQgBCAUBaQxvcmlnaW5DYWxsZXIFCWNhbGxlclN0cgQPc3Rha2VkQnlVc2VyS0VZCQEPa2V5U3Rha2VkQnlVc2VyAgUOdXNlckFkZHJlc3NTdHIFDGxwQXNzZXRJZFN0cgQOc3Rha2VkVG90YWxLRVkJAQ5rZXlTdGFrZWRUb3RhbAEFDGxwQXNzZXRJZFN0cgQMc3Rha2VkQnlVc2VyCQEKcmVhZFN0YWtlZAEFD3N0YWtlZEJ5VXNlcktFWQQLc3Rha2VkVG90YWwJAQpyZWFkU3Rha2VkAQUOc3Rha2VkVG90YWxLRVkEDWludGVncmFsU1RBVEUICQEQcmVmcmVzaElOVEVHUkFMUwQFDGxwQXNzZXRJZFN0cgUOdXNlckFkZHJlc3NTdHIFDnBvb2xBZGRyZXNzU3RyCQEBLQEFBmFtb3VudAJfMgQIbGlzdE5hbWUJARBnZXRVc2Vyc0xpc3ROYW1lAQUMbHBBc3NldElkU3RyBAtsaXN0QWN0aW9ucwMDCQEMY29udGFpbnNOb2RlAgUIbGlzdE5hbWUFDnVzZXJBZGRyZXNzU3RyCQAAAgUGYW1vdW50BQxzdGFrZWRCeVVzZXIHCQERZGVsZXRlTm9kZUFjdGlvbnMCBQhsaXN0TmFtZQUOdXNlckFkZHJlc3NTdHIFA25pbAQNY2xhaW1lZEJ5VXNlcgkBGWdldEJpZ0ludEZyb21TdHJpbmdPclplcm8CBQR0aGlzCQEQa2V5Q2xhaW1lZEJ5VXNlcgIFDGxwQXNzZXRJZFN0cgUOdXNlckFkZHJlc3NTdHIEC3Bvb2xBZGRyZXNzCQEYZ2V0U3RyaW5nQnlBZGRyZXNzT3JGYWlsAgUPZmFjdG9yeUNvbnRyYWN0CQEma2V5RmFjdG9yeUxwQXNzZXRUb1Bvb2xDb250cmFjdEFkZHJlc3MBBQxscEFzc2V0SWRTdHIEEHd4VG9DbGFpbVVzZXJOZXcICQEQcmVmcmVzaElOVEVHUkFMUwQFDGxwQXNzZXRJZFN0cgUOdXNlckFkZHJlc3NTdHIFC3Bvb2xBZGRyZXNzAAACXzEEEGF2YWlsYWJsZVRvQ2xhaW0JALgCAgUQd3hUb0NsYWltVXNlck5ldwUNY2xhaW1lZEJ5VXNlcgQBcgMJAL8CAgUQYXZhaWxhYmxlVG9DbGFpbQUKemVyb0JpZ0ludAkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUMbHBBc3NldElkU3RyCQDMCAIFDnVzZXJBZGRyZXNzU3RyBQNuaWwFA25pbAUEdW5pdAMJAAACBQFyBQFyAwkAZgIFBmFtb3VudAUMc3Rha2VkQnlVc2VyCQACAQIkcGFzc2VkIGFtb3VudCBpcyBsZXNzIHRoZW4gYXZhaWxhYmxlCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUPc3Rha2VkQnlVc2VyS0VZCQBlAgUMc3Rha2VkQnlVc2VyBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFDnN0YWtlZFRvdGFsS0VZCQBlAgULc3Rha2VkVG90YWwFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFBmFtb3VudAUJbHBBc3NldElkCQDMCAIJARVPcGVyYXRpb25IaXN0b3J5RW50cnkFAgd1bnN0YWtlBQ51c2VyQWRkcmVzc1N0cgUMbHBBc3NldElkU3RyBQZhbW91bnQIBQFpDXRyYW5zYWN0aW9uSWQFA25pbAUNaW50ZWdyYWxTVEFURQULbGlzdEFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEHY2xhaW1XeAEMbHBBc3NldElkU3RyBA51c2VyQWRkcmVzc1N0cgkApQgBCAUBaQZjYWxsZXIEBnJlc3VsdAkA/AcEBQR0aGlzAg9jbGFpbVd4SU5URVJOQUwJAMwIAgUMbHBBc3NldElkU3RyCQDMCAIFDnVzZXJBZGRyZXNzU3RyBQNuaWwFA25pbAkAlAoCBQNuaWwFBnJlc3VsdAFpAQ9jbGFpbVd4SU5URVJOQUwCDGxwQXNzZXRJZFN0cg51c2VyQWRkcmVzc1N0cgQLY2hlY2tDYWxsZXIJAQhtdXN0VGhpcwEFAWkDCQAAAgULY2hlY2tDYWxsZXIFC2NoZWNrQ2FsbGVyBAt1c2VyQWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEFDnVzZXJBZGRyZXNzU3RyAiVjbGFpbVd4SU5URVJOQUw6IGludmFsaWQgdXNlciBhZGRyZXNzBA5wb29sQWRkcmVzc1N0cgkBGGdldFN0cmluZ0J5QWRkcmVzc09yRmFpbAIFD2ZhY3RvcnlDb250cmFjdAkBJmtleUZhY3RvcnlMcEFzc2V0VG9Qb29sQ29udHJhY3RBZGRyZXNzAQUMbHBBc3NldElkU3RyBBBjbGFpbWVkQnlVc2VyS0VZCQEQa2V5Q2xhaW1lZEJ5VXNlcgIFDGxwQXNzZXRJZFN0cgUOdXNlckFkZHJlc3NTdHIED2NsYWltZWRUb3RhbEtFWQkBD2tleUNsYWltZWRUb3RhbAEFDGxwQXNzZXRJZFN0cgQZY2xhaW1lZEJ5VXNlck1pblJld2FyZEtFWQkBGWtleUNsYWltZWRCeVVzZXJNaW5SZXdhcmQCBQxscEFzc2V0SWRTdHIFDnVzZXJBZGRyZXNzU3RyBBtjbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmRLRVkJARtrZXlDbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmQCBQxscEFzc2V0SWRTdHIFDnVzZXJBZGRyZXNzU3RyBA1jbGFpbWVkQnlVc2VyCQEZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybwIFBHRoaXMFEGNsYWltZWRCeVVzZXJLRVkEFmNsYWltZWRCeVVzZXJNaW5SZXdhcmQJARlnZXRCaWdJbnRGcm9tU3RyaW5nT3JaZXJvAgUEdGhpcwUZY2xhaW1lZEJ5VXNlck1pblJld2FyZEtFWQQYY2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkCQEZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybwIFBHRoaXMFG2NsYWltZWRCeVVzZXJCb29zdFJld2FyZEtFWQQMY2xhaW1lZFRvdGFsCQEZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybwIFBHRoaXMFD2NsYWltZWRUb3RhbEtFWQQNJHQwMjI4ODQyMjk5NgkBEHJlZnJlc2hJTlRFR1JBTFMEBQxscEFzc2V0SWRTdHIFDnVzZXJBZGRyZXNzU3RyBQ5wb29sQWRkcmVzc1N0cgAABBB3eFRvQ2xhaW1Vc2VyTmV3CAUNJHQwMjI4ODQyMjk5NgJfMQQNaW50ZWdyYWxTVEFURQgFDSR0MDIyODg0MjI5OTYCXzIEBWRlYnVnCAUNJHQwMjI4ODQyMjk5NgJfMwQQYXZhaWxhYmxlVG9DbGFpbQkAmAMBCQDMCAIJALgCAgUQd3hUb0NsYWltVXNlck5ldwUNY2xhaW1lZEJ5VXNlcgkAzAgCBQp6ZXJvQmlnSW50BQNuaWwDCQDAAgIFCnplcm9CaWdJbnQFEGF2YWlsYWJsZVRvQ2xhaW0JAAIBAhBub3RoaW5nIHRvIGNsYWltBBJ3eEFtb3VudEJvb3N0VG90YWwJAJYDAQkAzAgCCQEFYXNJbnQBCQCRAwIJAQlhc0FueUxpc3QBCQD8BwQFEGJvb3N0aW5nQ29udHJhY3QCDGNsYWltV3hCb29zdAkAzAgCBQxscEFzc2V0SWRTdHIJAMwIAgUOdXNlckFkZHJlc3NTdHIFA25pbAUDbmlsAAAJAMwIAgAABQNuaWwEDW1pblJld2FyZFBhcnQFEGF2YWlsYWJsZVRvQ2xhaW0ED2Jvb3N0UmV3YXJkUGFydAkAmQMBCQDMCAIJALkCAgUNbWluUmV3YXJkUGFydAkAtgIBAAIJAMwIAgkAtgIBBRJ3eEFtb3VudEJvb3N0VG90YWwFA25pbAQJd3hBc3NldElkCQEMYXNCeXRlVmVjdG9yAQkAkQMCCQEJYXNBbnlMaXN0AQkA/AcEBRBlbWlzc2lvbkNvbnRyYWN0AgRlbWl0CQDMCAIJAKADAQUNbWluUmV3YXJkUGFydAUDbmlsBQNuaWwAAAQJZW1pdEJvb3N0CQEJYXNBbnlMaXN0AQkA/AcEBRBlbWlzc2lvbkNvbnRyYWN0AgRlbWl0CQDMCAIJAKADAQUPYm9vc3RSZXdhcmRQYXJ0BQNuaWwFA25pbAMJAAACBQllbWl0Qm9vc3QFCWVtaXRCb29zdAQSY2xhaW1lZEJ5VXNlclZhbHVlCQC3AgIFDWNsYWltZWRCeVVzZXIFEGF2YWlsYWJsZVRvQ2xhaW0EHmNsYWltZWRCeVVzZXJNaW5SZXdhcmRQbHVzUGFydAkAtwICBRZjbGFpbWVkQnlVc2VyTWluUmV3YXJkBQ1taW5SZXdhcmRQYXJ0BCtjbGFpbWVkQnlVc2VyQm9vc3RSZXdhcmRQbHVzQm9vc3RSZXdhcmRQYXJ0CQC3AgIFFmNsYWltZWRCeVVzZXJNaW5SZXdhcmQFDW1pblJld2FyZFBhcnQEIGNsYWltZWRUb3RhbFBsdXNBdmFpbGFibGVUb0NsYWltCQC3AgIFFmNsYWltZWRCeVVzZXJNaW5SZXdhcmQFDW1pblJld2FyZFBhcnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUQY2xhaW1lZEJ5VXNlcktFWQkApgMBBRJjbGFpbWVkQnlVc2VyVmFsdWUJAMwIAgkBC1N0cmluZ0VudHJ5AgUZY2xhaW1lZEJ5VXNlck1pblJld2FyZEtFWQkApgMBBR5jbGFpbWVkQnlVc2VyTWluUmV3YXJkUGx1c1BhcnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUbY2xhaW1lZEJ5VXNlckJvb3N0UmV3YXJkS0VZCQCmAwEFK2NsYWltZWRCeVVzZXJCb29zdFJld2FyZFBsdXNCb29zdFJld2FyZFBhcnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUPY2xhaW1lZFRvdGFsS0VZCQCmAwEFIGNsYWltZWRUb3RhbFBsdXNBdmFpbGFibGVUb0NsYWltCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzCQCgAwEFDW1pblJld2FyZFBhcnQFCXd4QXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwkAoAMBBQ9ib29zdFJld2FyZFBhcnQFCXd4QXNzZXRJZAkAzAgCCQEVT3BlcmF0aW9uSGlzdG9yeUVudHJ5BQIFY2xhaW0FDnVzZXJBZGRyZXNzU3RyBQxscEFzc2V0SWRTdHIJAKADAQUQYXZhaWxhYmxlVG9DbGFpbQgFAWkNdHJhbnNhY3Rpb25JZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBD2NsYWltV3hSRUFET05MWQIMbHBBc3NldElkU3RyDnVzZXJBZGRyZXNzU3RyBA9zdGFrZWRCeVVzZXJLRVkJAQ9rZXlTdGFrZWRCeVVzZXICBQ51c2VyQWRkcmVzc1N0cgUMbHBBc3NldElkU3RyBA5zdGFrZWRUb3RhbEtFWQkBDmtleVN0YWtlZFRvdGFsAQUMbHBBc3NldElkU3RyBBBjbGFpbWVkQnlVc2VyS0VZCQEQa2V5Q2xhaW1lZEJ5VXNlcgIFDGxwQXNzZXRJZFN0cgUOdXNlckFkZHJlc3NTdHIEDHN0YWtlZEJ5VXNlcgkBCnJlYWRTdGFrZWQBBQ9zdGFrZWRCeVVzZXJLRVkEC3N0YWtlZFRvdGFsCQEKcmVhZFN0YWtlZAEFDnN0YWtlZFRvdGFsS0VZBA1jbGFpbWVkQnlVc2VyCQEZZ2V0QmlnSW50RnJvbVN0cmluZ09yWmVybwIFBHRoaXMFEGNsYWltZWRCeVVzZXJLRVkEDnBvb2xBZGRyZXNzU3RyCQEYZ2V0U3RyaW5nQnlBZGRyZXNzT3JGYWlsAgUPZmFjdG9yeUNvbnRyYWN0CQEma2V5RmFjdG9yeUxwQXNzZXRUb1Bvb2xDb250cmFjdEFkZHJlc3MBBQxscEFzc2V0SWRTdHIECnBvb2xXZWlnaHQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFD2ZhY3RvcnlDb250cmFjdAkBFGtleUZhY3RvcnlQb29sV2VpZ2h0AQUOcG9vbEFkZHJlc3NTdHIEEnd4RW1pc3Npb25QZXJCbG9jawkBDGdldEludE9yRmFpbAIFEGVtaXNzaW9uQ29udHJhY3QJAR5rZXlFbWlzc2lvblJhdGVQZXJCbG9ja0N1cnJlbnQABBJlbWlzc2lvblN0YXJ0QmxvY2sJAQxnZXRJbnRPckZhaWwCBRBlbWlzc2lvbkNvbnRyYWN0CQEVa2V5RW1pc3Npb25TdGFydEJsb2NrAAQMcGFzc2VkQmxvY2tzAwkAZgIFEmVtaXNzaW9uU3RhcnRCbG9jawUGaGVpZ2h0AAAJAGUCBQZoZWlnaHQFEmVtaXNzaW9uU3RhcnRCbG9jawQOcG9vbFd4RW1pc3Npb24JAGsDCQBoAgUSd3hFbWlzc2lvblBlckJsb2NrBQxwYXNzZWRCbG9ja3MFCnBvb2xXZWlnaHQFDlBPT0xXRUlHSFRNVUxUBAx1c2VyV3hSZXdhcmQJAGsDBQ5wb29sV3hFbWlzc2lvbgUMc3Rha2VkQnlVc2VyBQtzdGFrZWRUb3RhbAQNJHQwMjU2MzgyNTc1MAkBEHJlZnJlc2hJTlRFR1JBTFMEBQxscEFzc2V0SWRTdHIFDnVzZXJBZGRyZXNzU3RyBQ5wb29sQWRkcmVzc1N0cgAABBB3eFRvQ2xhaW1Vc2VyTmV3CAUNJHQwMjU2MzgyNTc1MAJfMQQNaW50ZWdyYWxTVEFURQgFDSR0MDI1NjM4MjU3NTACXzIEBWRlYnVnCAUNJHQwMjU2MzgyNTc1MAJfMwQQYXZhaWxhYmxlVG9DbGFpbQkAmAMBCQDMCAIJALgCAgUQd3hUb0NsYWltVXNlck5ldwUNY2xhaW1lZEJ5VXNlcgkAzAgCBQp6ZXJvQmlnSW50BQNuaWwEDmJvb3N0SW52UmVzdWx0CQEJYXNBbnlMaXN0AQkA/AcEBRBib29zdGluZ0NvbnRyYWN0AhRjbGFpbVd4Qm9vc3RSRUFET05MWQkAzAgCBQxscEFzc2V0SWRTdHIJAMwIAgUOdXNlckFkZHJlc3NTdHIFA25pbAUDbmlsBBJ3eEFtb3VudEJvb3N0VG90YWwJAJYDAQkAzAgCCQEFYXNJbnQBCQCRAwIFDmJvb3N0SW52UmVzdWx0AAAJAMwIAgAABQNuaWwECmJvb3N0RGVidWcJAQhhc1N0cmluZwEJAJEDAgUOYm9vc3RJbnZSZXN1bHQAAQQNbWluUmV3YXJkUGFydAUQYXZhaWxhYmxlVG9DbGFpbQQPYm9vc3RSZXdhcmRQYXJ0CQCZAwEJAMwIAgkAuQICBQ1taW5SZXdhcmRQYXJ0CQC2AgEAAgkAzAgCCQC2AgEFEnd4QW1vdW50Qm9vc3RUb3RhbAUDbmlsBAt0b3RhbFJld2FyZAkAtwICBQ1taW5SZXdhcmRQYXJ0BQ9ib29zdFJld2FyZFBhcnQJAJQKAgUDbmlsCQC5CQIJAMwIAgIOJXMlcyVkJWQlZCVkJXMJAMwIAgUMbHBBc3NldElkU3RyCQDMCAIFDnVzZXJBZGRyZXNzU3RyCQDMCAIJAKYDAQULdG90YWxSZXdhcmQJAMwIAgkApgMBBQ1jbGFpbWVkQnlVc2VyCQDMCAIJAKYDAQUNbWluUmV3YXJkUGFydAkAzAgCCQCmAwEFD2Jvb3N0UmV3YXJkUGFydAkAzAgCCQCsAgIJAKwCAgkArAICCQCsAgIFBWRlYnVnAgI6OgkApAMBBQx1c2VyV3hSZXdhcmQCCTo6Qk9PU1Q6OgUKYm9vc3REZWJ1ZwUDbmlsBQNTRVABaQESdXNlcnNMaXN0VHJhdmVyc2FsAQlscEFzc2V0SWQEC2NoZWNrQ2FsbGVyAwkAAAIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEZa2V5Vm90aW5nRW1pc3Npb25Db250cmFjdAACAAYJAQttdXN0TWFuYWdlcgEFAWkDCQAAAgULY2hlY2tDYWxsZXIFC2NoZWNrQ2FsbGVyBAhsaXN0TmFtZQkBEGdldFVzZXJzTGlzdE5hbWUBBQlscEFzc2V0SWQECnVzZXJPclVuaXQJAKIIAQkBC2tleU5leHRVc2VyAQUJbHBBc3NldElkBApoZWFkT3JVbml0CQCiCAEJAQtrZXlMaXN0SGVhZAEFCGxpc3ROYW1lBAckbWF0Y2gwBQp1c2VyT3JVbml0AwkAAQIFByRtYXRjaDACBFVuaXQEByRtYXRjaDEFCmhlYWRPclVuaXQDCQABAgUHJG1hdGNoMQIEVW5pdAkAlAoCBQNuaWwHAwkAAQIFByRtYXRjaDECBlN0cmluZwQEaGVhZAUHJG1hdGNoMQkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQtrZXlOZXh0VXNlcgEFCWxwQXNzZXRJZAUEaGVhZAUDbmlsBgkAAgECC01hdGNoIGVycm9yAwkAAQIFByRtYXRjaDACBlN0cmluZwQLdXNlckFkZHJlc3MFByRtYXRjaDAEDWNsYWltZWRCeVVzZXIJARlnZXRCaWdJbnRGcm9tU3RyaW5nT3JaZXJvAgUEdGhpcwkBEGtleUNsYWltZWRCeVVzZXICBQlscEFzc2V0SWQFC3VzZXJBZGRyZXNzBAtwb29sQWRkcmVzcwkBGGdldFN0cmluZ0J5QWRkcmVzc09yRmFpbAIFD2ZhY3RvcnlDb250cmFjdAkBJmtleUZhY3RvcnlMcEFzc2V0VG9Qb29sQ29udHJhY3RBZGRyZXNzAQUJbHBBc3NldElkBBB3eFRvQ2xhaW1Vc2VyTmV3CAkBEHJlZnJlc2hJTlRFR1JBTFMEBQlscEFzc2V0SWQFC3VzZXJBZGRyZXNzBQtwb29sQWRkcmVzcwAAAl8xBBBhdmFpbGFibGVUb0NsYWltCQC4AgIFEHd4VG9DbGFpbVVzZXJOZXcFDWNsYWltZWRCeVVzZXIEAXIDCQC/AgIFEGF2YWlsYWJsZVRvQ2xhaW0FCnplcm9CaWdJbnQJAPwHBAUEdGhpcwIPY2xhaW1XeElOVEVSTkFMCQDMCAIFCWxwQXNzZXRJZAkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsBQNuaWwFBHVuaXQDCQAAAgUBcgUBcgQObmV4dFVzZXJPclVuaXQJAKIIAQkBC2tleUxpc3ROZXh0AgUIbGlzdE5hbWUFC3VzZXJBZGRyZXNzBAckbWF0Y2gxBQ5uZXh0VXNlck9yVW5pdAMJAAECBQckbWF0Y2gxAgRVbml0CQCUCgIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBC2tleU5leHRVc2VyAQUJbHBBc3NldElkBQNuaWwHAwkAAQIFByRtYXRjaDECBlN0cmluZwQIbmV4dFVzZXIFByRtYXRjaDEJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQELa2V5TmV4dFVzZXIBBQlscEFzc2V0SWQFCG5leHRVc2VyBQNuaWwGCQACAQILTWF0Y2ggZXJyb3IJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAgtNYXRjaCBlcnJvcgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ5vbk1vZGlmeVdlaWdodAIMbHBBc3NldElkU3RyDnBvb2xBZGRyZXNzU3RyAwkBAiE9AggFAWkGY2FsbGVyBQ9mYWN0b3J5Q29udHJhY3QJAAIBAhJwZXJtaXNzaW9ucyBkZW5pZWQEDSR0MDI4MTAxMjgyMTEJARRyZWZyZXNoUG9vbElOVEVHUkFMUwMFDGxwQXNzZXRJZFN0cgUOcG9vbEFkZHJlc3NTdHIAAAQSd3hQZXJMcEludGVncmFsTmV3CAUNJHQwMjgxMDEyODIxMQJfMQQRcG9vbEludGVncmFsU1RBVEUIBQ0kdDAyODEwMTI4MjExAl8yBAlwb29sREVCVUcIBQ0kdDAyODEwMTI4MjExAl8zBRFwb29sSW50ZWdyYWxTVEFURQFpAQtzZXRNaWdyYXRvcgECcGsDCQAAAgUCcGsCAAkAzAgCCQELRGVsZXRlRW50cnkBBQtrZXlNaWdyYXRvcgUDbmlsCQDMCAIJAQtCaW5hcnlFbnRyeQIFC2tleU1pZ3JhdG9yCQDZBAEFAnBrBQNuaWwBAnR4AQZ2ZXJpZnkABA90YXJnZXRQdWJsaWNLZXkEByRtYXRjaDAJARZtYW5hZ2VyUHVibGljS2V5T3JVbml0AAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAUCcGsDCQABAgUHJG1hdGNoMAIEVW5pdAgFAnR4D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUPdGFyZ2V0UHVibGljS2V5BgkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAkBEUBleHRyTmF0aXZlKDEwNTIpAgUEdGhpcwULa2V5TWlncmF0b3J49EwX",
    "chainId": 87,
    "height": 3186201,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3dUnFm6Be3sbGAyqh3cUmsUs55oo1nCsWhmDsQD6xzwc
Next: 2chdSb6tNz3g6M6QXnPZAP1KME7E1cFFNC9QGbBuLG8S

Diff: 

OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SCALE8 = 8
1616 let zeroBigInt = toBigInt(0)
1717 
1818 let oneBigInt = toBigInt(1)
19+
20+let keyMigrator = "migrator"
1921 
2022 func asAnyList (val) = match val {
2123     case valAnyLyst: List[Any] => 
8486 
8587 
8688 func keyFactoryAddress () = "%s%s__config__factoryAddress"
89+
90+
91+func keyVotingEmissionContract () = "%s__votingEmissionContract"
8792 
8893 
8994 let IdxFactoryCfgStakingDapp = 1
233238 
234239 let boostingContract = getBoostingAddressOrFail(factoryCfg)
235240 
241+func keyNextUser (lpAssetId) = makeString(["%s%s", lpAssetId, "nextUser"], SEP)
242+
243+
244+func getUsersListName (lpAssetId) = makeString(["users", lpAssetId], SEP)
245+
246+
247+func keyListHead (listName) = makeString(["%s%s%s", listName, "head"], SEP)
248+
249+
250+func keyListSize (listName) = makeString(["%s%s%s", listName, "size"], SEP)
251+
252+
253+func keyListPrev (listName,id) = makeString(["%s%s%s%s", listName, id, "prev"], SEP)
254+
255+
256+func keyListNext (listName,id) = makeString(["%s%s%s%s", listName, id, "next"], SEP)
257+
258+
259+func containsNode (listName,id) = {
260+    let headOrUnit = getString(this, keyListHead(listName))
261+    let prevOrUnit = getString(this, keyListPrev(listName, id))
262+    let nextOrUnit = getString(this, keyListNext(listName, id))
263+    if (if ((id == valueOrElse(headOrUnit, "")))
264+        then true
265+        else (prevOrUnit != unit))
266+        then true
267+        else (nextOrUnit != unit)
268+    }
269+
270+
271+func insertNodeActions (listName,id) = {
272+    let headOrUnit = getString(this, keyListHead(listName))
273+    let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
274+    let checkNode = if (!(containsNode(listName, id)))
275+        then true
276+        else throw("Node exists")
277+    if ((checkNode == checkNode))
278+        then (([IntegerEntry(keyListSize(listName), (listSize + 1))] ++ (if ((headOrUnit != unit))
279+            then [StringEntry(keyListNext(listName, id), value(headOrUnit)), StringEntry(keyListPrev(listName, value(headOrUnit)), id)]
280+            else nil)) ++ [StringEntry(keyListHead(listName), id)])
281+        else throw("Strict value is not equal to itself.")
282+    }
283+
284+
285+func deleteNodeActions (listName,id) = {
286+    let headOrUnit = getString(this, keyListHead(listName))
287+    let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
288+    let prevOrUnit = getString(this, keyListPrev(listName, id))
289+    let nextOrUnit = getString(this, keyListNext(listName, id))
290+    ([IntegerEntry(keyListSize(listName), (listSize - 1))] ++ (if (if ((prevOrUnit != unit))
291+        then (nextOrUnit != unit)
292+        else false)
293+        then [StringEntry(keyListNext(listName, value(prevOrUnit)), value(nextOrUnit)), StringEntry(keyListPrev(listName, value(nextOrUnit)), value(prevOrUnit)), DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, id))]
294+        else if ((nextOrUnit != unit))
295+            then [StringEntry(keyListHead(listName), value(nextOrUnit)), DeleteEntry(keyListNext(listName, id)), DeleteEntry(keyListPrev(listName, value(nextOrUnit)))]
296+            else if ((prevOrUnit != unit))
297+                then [DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, value(prevOrUnit)))]
298+                else if ((id == valueOrElse(headOrUnit, "")))
299+                    then [DeleteEntry(keyListHead(listName))]
300+                    else throw(((("invalid node: " + listName) + ".") + id))))
301+    }
302+
303+
236304 func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
237305     then (stakedByUser > zeroBigInt)
238306     else false)
274342     let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLpX3 * toBigInt(dh)))
275343     let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
276344     let wxPerLpIntegralLastUpdHeightNew = height
277-    let debug = makeString([toString(wxPerLpIntegralNew), "dh=", toString(dh), "wxPerLpX3=", toString(wxPerLpX3), "stakedTotal=", toString(stakedTotal), toString(poolWxEmissionPerBlockX3), toString(wxEmissionPerBlockX3), "poolWeight=", toString(poolWeight)], "::")
345+    let debug = makeString([toString(wxPerLpIntegralNew), toString(dh), toString(wxPerLpX3), toString(stakedTotal), toString(poolWxEmissionPerBlockX3), toString(wxEmissionPerBlockX3), toString(poolWeight)], "::")
278346     $Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
279347     }
280348 
281349 
282350 func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
283-    let $t01142111543 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
284-    let wxPerLpIntegralNew = $t01142111543._1
285-    let poolIntegralSTATE = $t01142111543._2
286-    let poolDEBUG = $t01142111543._3
351+    let $t01424614368 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
352+    let wxPerLpIntegralNew = $t01424614368._1
353+    let poolIntegralSTATE = $t01424614368._2
354+    let poolDEBUG = $t01424614368._3
287355     let MULT3 = 1000
288356     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
289357     let stakedByUser = readStaked(stakedByUserKEY)
297365     let wxToClaimUserNew = max([(wxToClaimUser + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11))), zeroBigInt])
298366     let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
299367     let wxPerLpIntegralUserLastUpdHeightNew = height
300-    let debug = makeString(["wxToClaimUser", toString(wxToClaimUser), "wxPerLpInteg", toString(wxPerLpIntegralUserLastUpdHeightOrZero), "wxPerLpIntegralNew", toString(wxPerLpIntegralNew), "wxToClaimUserNew", toString(wxToClaimUserNew), "wxPerLpIntegralUserLast", toString(wxPerLpIntegralUserLast), toString(stakedByUser), "poolDEBUG=", poolDEBUG, "height=", toString(height)], "::")
368+    let debug = makeString([toString(wxToClaimUser), toString(wxPerLpIntegralUserLast), toString(stakedByUser), poolDEBUG, toString(height)], "::")
301369     $Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
302370     }
303371 
322390 }
323391 
324392 
325-func mustManager (i) = {
326-    let pd = throw("Permission denied")
327-    match managerPublicKeyOrUnit() {
328-        case pk: ByteVector => 
329-            if ((i.callerPublicKey == pk))
330-                then true
331-                else pd
332-        case _: Unit => 
333-            if ((i.caller == this))
334-                then true
335-                else pd
336-        case _ => 
337-            throw("Match error")
338-    }
339-    }
393+let permissionDeniedError = throw("Permission denied")
394+
395+func mustThis (i) = if ((i.caller == this))
396+    then true
397+    else permissionDeniedError
398+
399+
400+func mustManager (i) = match managerPublicKeyOrUnit() {
401+    case pk: ByteVector => 
402+        if ((i.callerPublicKey == pk))
403+            then true
404+            else permissionDeniedError
405+    case _: Unit => 
406+        if ((i.caller == this))
407+            then true
408+            else permissionDeniedError
409+    case _ => 
410+        throw("Match error")
411+}
340412 
341413 
342414 @Callable(i)
344416     let checkCaller = mustManager(i)
345417     if ((checkCaller == checkCaller))
346418         then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
419+        else throw("Strict value is not equal to itself.")
420+    }
421+
422+
423+
424+@Callable(i)
425+func constructorV2 (votingEmissionContract) = {
426+    let cheks = [mustManager(i), if ((addressFromString(votingEmissionContract) != unit))
427+        then true
428+        else "invalid voting emission contract address"]
429+    if ((cheks == cheks))
430+        then [StringEntry(keyVotingEmissionContract(), votingEmissionContract)]
347431         else throw("Strict value is not equal to itself.")
348432     }
349433 
385469 
386470 
387471 @Callable(i)
388-func stake () = if ((size(i.payments) != 1))
389-    then throw("invalid payment - exact one payment must be attached")
390-    else {
391-        let pmt = i.payments[0]
392-        let lpAssetId = value(pmt.assetId)
393-        let lpAssetIdStr = toBase58String(lpAssetId)
394-        let amount = pmt.amount
395-        let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
396-        let callerStr = toString(i.caller)
397-        let userAddressStr = if ((callerStr == poolAddressStr))
398-            then toString(i.originCaller)
399-            else callerStr
400-        let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
401-        let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
402-        let stakedByUser = readStaked(stakedByUserKEY)
403-        let stakedTotal = readStaked(stakedTotalKEY)
404-        let $t01582815945 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
405-        let wxToClaimUserNew = $t01582815945._1
406-        let integralSTATE = $t01582815945._2
407-        let debug = $t01582815945._3
408-        ([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
409-        }
472+func stake () = {
473+    let migration = if ((getBinary(this, keyMigrator) != unit))
474+        then throw("maintenance")
475+        else unit
476+    if ((migration == migration))
477+        then if ((size(i.payments) != 1))
478+            then throw("invalid payment - exact one payment must be attached")
479+            else {
480+                let pmt = i.payments[0]
481+                let lpAssetId = value(pmt.assetId)
482+                let lpAssetIdStr = toBase58String(lpAssetId)
483+                let amount = pmt.amount
484+                let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
485+                let callerStr = toString(i.caller)
486+                let userAddressStr = if ((callerStr == poolAddressStr))
487+                    then toString(i.originCaller)
488+                    else callerStr
489+                let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
490+                let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
491+                let stakedByUser = readStaked(stakedByUserKEY)
492+                let stakedTotal = readStaked(stakedTotalKEY)
493+                let $t01893619053 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
494+                let wxToClaimUserNew = $t01893619053._1
495+                let integralSTATE = $t01893619053._2
496+                let debug = $t01893619053._3
497+                let listName = getUsersListName(lpAssetIdStr)
498+                let listActions = if (containsNode(listName, userAddressStr))
499+                    then nil
500+                    else insertNodeActions(listName, userAddressStr)
501+                (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
502+                }
503+        else throw("Strict value is not equal to itself.")
504+    }
410505 
411506 
412507 
413508 @Callable(i)
414509 func unstake (lpAssetIdStr,amount) = {
415-    let lpAssetId = fromBase58String(lpAssetIdStr)
416-    let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
417-    let poolAddon = valueOrElse(getString(this, keyStablePoolAddonAddr()), poolAddressStr)
418-    let callerStr = toString(i.caller)
419-    let userAddressStr = if (if ((callerStr == poolAddressStr))
420-        then true
421-        else (callerStr == poolAddon))
422-        then toString(i.originCaller)
423-        else callerStr
424-    let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
425-    let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
426-    let stakedByUser = readStaked(stakedByUserKEY)
427-    let stakedTotal = readStaked(stakedTotalKEY)
428-    let $t01708217200 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))
429-    let wxToClaimUserNew = $t01708217200._1
430-    let integralSTATE = $t01708217200._2
431-    let debug = $t01708217200._3
432-    if ((amount > stakedByUser))
433-        then throw("passed amount is less then available")
434-        else ([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
510+    let migration = if ((getBinary(this, keyMigrator) != unit))
511+        then throw("maintenance")
512+        else unit
513+    if ((migration == migration))
514+        then {
515+            let lpAssetId = fromBase58String(lpAssetIdStr)
516+            let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
517+            let poolAddon = valueOrElse(getString(this, keyStablePoolAddonAddr()), poolAddressStr)
518+            let callerStr = toString(i.caller)
519+            let userAddressStr = if (if ((callerStr == poolAddressStr))
520+                then true
521+                else (callerStr == poolAddon))
522+                then toString(i.originCaller)
523+                else callerStr
524+            let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
525+            let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
526+            let stakedByUser = readStaked(stakedByUserKEY)
527+            let stakedTotal = readStaked(stakedTotalKEY)
528+            let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
529+            let listName = getUsersListName(lpAssetIdStr)
530+            let listActions = if (if (containsNode(listName, userAddressStr))
531+                then (amount == stakedByUser)
532+                else false)
533+                then deleteNodeActions(listName, userAddressStr)
534+                else nil
535+            let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetIdStr, userAddressStr))
536+            let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
537+            let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddress, 0)._1
538+            let availableToClaim = (wxToClaimUserNew - claimedByUser)
539+            let r = if ((availableToClaim > zeroBigInt))
540+                then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
541+                else unit
542+            if ((r == r))
543+                then if ((amount > stakedByUser))
544+                    then throw("passed amount is less then available")
545+                    else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
546+                else throw("Strict value is not equal to itself.")
547+            }
548+        else throw("Strict value is not equal to itself.")
435549     }
436550 
437551 
438552 
439553 @Callable(i)
440554 func claimWx (lpAssetIdStr) = {
441-    let userAddress = i.caller
442555     let userAddressStr = toString(i.caller)
443-    let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
444-    let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
445-    let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
446-    let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
447-    let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
448-    let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
449-    let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
450-    let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
451-    let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
452-    let $t01844418556 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
453-    let wxToClaimUserNew = $t01844418556._1
454-    let integralSTATE = $t01844418556._2
455-    let debug = $t01844418556._3
456-    let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
457-    if ((zeroBigInt >= availableToClaim))
458-        then throw("nothing to claim")
459-        else {
460-            let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
461-            let minRewardPart = availableToClaim
462-            let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
463-            let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
464-            let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
465-            if ((emitBoost == emitBoost))
466-                then {
467-                    let claimedByUserValue = (claimedByUser + availableToClaim)
468-                    let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
469-                    let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserMinReward + minRewardPart)
470-                    let claimedTotalPlusAvailableToClaim = (claimedByUserMinReward + minRewardPart)
556+    let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
557+    $Tuple2(nil, result)
558+    }
559+
560+
561+
562+@Callable(i)
563+func claimWxINTERNAL (lpAssetIdStr,userAddressStr) = {
564+    let checkCaller = mustThis(i)
565+    if ((checkCaller == checkCaller))
566+        then {
567+            let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), "claimWxINTERNAL: invalid user address")
568+            let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
569+            let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
570+            let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
571+            let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
572+            let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
573+            let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
574+            let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
575+            let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
576+            let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
577+            let $t02288422996 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
578+            let wxToClaimUserNew = $t02288422996._1
579+            let integralSTATE = $t02288422996._2
580+            let debug = $t02288422996._3
581+            let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
582+            if ((zeroBigInt >= availableToClaim))
583+                then throw("nothing to claim")
584+                else {
585+                    let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
586+                    let minRewardPart = availableToClaim
587+                    let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
588+                    let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
589+                    let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
590+                    if ((emitBoost == emitBoost))
591+                        then {
592+                            let claimedByUserValue = (claimedByUser + availableToClaim)
593+                            let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
594+                            let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserMinReward + minRewardPart)
595+                            let claimedTotalPlusAvailableToClaim = (claimedByUserMinReward + minRewardPart)
471596 [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)]
597+                            }
598+                        else throw("Strict value is not equal to itself.")
472599                     }
473-                else throw("Strict value is not equal to itself.")
474600             }
601+        else throw("Strict value is not equal to itself.")
475602     }
476603 
477604 
493620         else (height - emissionStartBlock)
494621     let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
495622     let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
496-    let $t02119821310 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
497-    let wxToClaimUserNew = $t02119821310._1
498-    let integralSTATE = $t02119821310._2
499-    let debug = $t02119821310._3
623+    let $t02563825750 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
624+    let wxToClaimUserNew = $t02563825750._1
625+    let integralSTATE = $t02563825750._2
626+    let debug = $t02563825750._3
500627     let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
501628     let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
502629     let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
504631     let minRewardPart = availableToClaim
505632     let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
506633     let totalReward = (minRewardPart + boostRewardPart)
507-    $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), ((((debug + "::") + toString(userWxReward)) + "::BOOSTDEBUG::") + boostDebug)], SEP))
634+    $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), ((((debug + "::") + toString(userWxReward)) + "::BOOST::") + boostDebug)], SEP))
635+    }
636+
637+
638+
639+@Callable(i)
640+func usersListTraversal (lpAssetId) = {
641+    let checkCaller = if ((toBase58String(i.caller.bytes) == valueOrElse(getString(this, keyVotingEmissionContract()), "")))
642+        then true
643+        else mustManager(i)
644+    if ((checkCaller == checkCaller))
645+        then {
646+            let listName = getUsersListName(lpAssetId)
647+            let userOrUnit = getString(keyNextUser(lpAssetId))
648+            let headOrUnit = getString(keyListHead(listName))
649+            match userOrUnit {
650+                case _: Unit => 
651+                    match headOrUnit {
652+                        case _: Unit => 
653+                            $Tuple2(nil, false)
654+                        case head: String => 
655+                            $Tuple2([StringEntry(keyNextUser(lpAssetId), head)], true)
656+                        case _ => 
657+                            throw("Match error")
658+                    }
659+                case userAddress: String => 
660+                    let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetId, userAddress))
661+                    let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
662+                    let wxToClaimUserNew = refreshINTEGRALS(lpAssetId, userAddress, poolAddress, 0)._1
663+                    let availableToClaim = (wxToClaimUserNew - claimedByUser)
664+                    let r = if ((availableToClaim > zeroBigInt))
665+                        then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress], nil)
666+                        else unit
667+                    if ((r == r))
668+                        then {
669+                            let nextUserOrUnit = getString(keyListNext(listName, userAddress))
670+                            match nextUserOrUnit {
671+                                case _: Unit => 
672+                                    $Tuple2([DeleteEntry(keyNextUser(lpAssetId))], false)
673+                                case nextUser: String => 
674+                                    $Tuple2([StringEntry(keyNextUser(lpAssetId), nextUser)], true)
675+                                case _ => 
676+                                    throw("Match error")
677+                            }
678+                            }
679+                        else throw("Strict value is not equal to itself.")
680+                case _ => 
681+                    throw("Match error")
682+            }
683+            }
684+        else throw("Strict value is not equal to itself.")
508685     }
509686 
510687 
513690 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
514691     then throw("permissions denied")
515692     else {
516-        let $t02224122351 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
517-        let wxPerLpIntegralNew = $t02224122351._1
518-        let poolIntegralSTATE = $t02224122351._2
519-        let poolDEBUG = $t02224122351._3
693+        let $t02810128211 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
694+        let wxPerLpIntegralNew = $t02810128211._1
695+        let poolIntegralSTATE = $t02810128211._2
696+        let poolDEBUG = $t02810128211._3
520697         poolIntegralSTATE
521698         }
699+
700+
701+
702+@Callable(i)
703+func setMigrator (pk) = if ((pk == ""))
704+    then [DeleteEntry(keyMigrator)]
705+    else [BinaryEntry(keyMigrator, fromBase58String(pk))]
522706 
523707 
524708 @Verifier(tx)
531715         case _ => 
532716             throw("Match error")
533717     }
534-    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
718+    if (sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey))
719+        then true
720+        else sigVerify(tx.bodyBytes, tx.proofs[0], getBinaryValue(this, keyMigrator))
535721     }
536722 

Full: 

OldNewDifferences
1-{-# STDLIB_VERSION 5 #-}
1+{-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SCALE8 = 8
55 
66 let MULT8 = 100000000
77 
88 let SCALE18 = 18
99 
1010 let MULT18 = toBigInt(1000000000000000000)
1111 
1212 let SEP = "__"
1313 
1414 let POOLWEIGHTMULT = MULT8
1515 
1616 let zeroBigInt = toBigInt(0)
1717 
1818 let oneBigInt = toBigInt(1)
19+
20+let keyMigrator = "migrator"
1921 
2022 func asAnyList (val) = match val {
2123     case valAnyLyst: List[Any] => 
2224         valAnyLyst
2325     case _ => 
2426         throw("fail to cast into List[Any]")
2527 }
2628 
2729 
2830 func asInt (val) = match val {
2931     case valInt: Int => 
3032         valInt
3133     case _ => 
3234         throw("fail to cast into Int")
3335 }
3436 
3537 
3638 func asString (val) = match val {
3739     case valStr: String => 
3840         valStr
3941     case _ => 
4042         throw("fail to cast into Int")
4143 }
4244 
4345 
4446 func asByteVector (val) = match val {
4547     case valBin: ByteVector => 
4648         valBin
4749     case _ => 
4850         throw("fail to cast into Int")
4951 }
5052 
5153 
5254 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (("mandatory this." + key) + " is not defined"))
5355 
5456 
5557 func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
5658 
5759 
5860 func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
5961 
6062 
6163 func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
6264 
6365 
6466 func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
6567 
6668 
6769 func getBigIntFromStringOrZero (address,key) = value(parseBigInt(valueOrElse(getString(address, key), "0")))
6870 
6971 
7072 func getBigIntFromStringOrDefault (address,key,defaultVal) = match getString(address, key) {
7173     case s: String => 
7274         value(parseBigInt(s))
7375     case _: Unit => 
7476         defaultVal
7577     case _ => 
7678         throw("Match error")
7779 }
7880 
7981 
8082 func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
8183 
8284 
8385 func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
8486 
8587 
8688 func keyFactoryAddress () = "%s%s__config__factoryAddress"
89+
90+
91+func keyVotingEmissionContract () = "%s__votingEmissionContract"
8792 
8893 
8994 let IdxFactoryCfgStakingDapp = 1
9095 
9196 let IdxFactoryCfgBoostingDapp = 2
9297 
9398 let IdxFactoryCfgIdoDapp = 3
9499 
95100 let IdxFactoryCfgTeamDapp = 4
96101 
97102 let IdxFactoryCfgEmissionDapp = 5
98103 
99104 let IdxFactoryCfgRestDapp = 6
100105 
101106 let IdxFactoryCfgSlippageDapp = 7
102107 
103108 func keyFactoryCfg () = "%s__factoryConfig"
104109 
105110 
106111 func keyManagerPublicKey () = "%s__managerPublicKey"
107112 
108113 
109114 func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
110115 
111116 
112117 func keyStablePoolAddonAddr () = "%s__stablePoolAddonAddr"
113118 
114119 
115120 func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
116121 
117122 
118123 func keyFactoryLpList () = "%s__lpTokensList"
119124 
120125 
121126 func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
122127 
123128 
124129 func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
125130 
126131 
127132 func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
128133 
129134 
130135 func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
131136 
132137 
133138 func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
134139 
135140 
136141 func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
137142 
138143 
139144 func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
140145 
141146 
142147 func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
143148 
144149 
145150 func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
146151 
147152 
148153 func keyEmissionStartBlock () = "%s%s__emission__startBlock"
149154 
150155 
151156 func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
152157 
153158 
154159 func keyEmissionEndBlock () = "%s%s__emission__endBlock"
155160 
156161 
157162 func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
158163 
159164 
160165 func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
161166 
162167 
163168 func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
164169 
165170 
166171 func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
167172 
168173 
169174 func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
170175 
171176 
172177 func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed__total", lpAssetIdStr], SEP)
173178 
174179 
175180 func readStaked (key) = valueOrElse(getInteger(this, key), 0)
176181 
177182 
178183 func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
179184 
180185 
181186 func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
182187 
183188 
184189 func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
185190 
186191 
187192 func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
188193 
189194 
190195 func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
191196 
192197 
193198 func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
194199 
195200 
196201 func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
197202 
198203 
199204 func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
200205 
201206 
202207 func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
203208 
204209 
205210 func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
206211 
207212 
208213 func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
209214 
210215 
211216 func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
212217 
213218 
214219 func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
215220 
216221 
217222 func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
218223 
219224 
220225 func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
221226 
222227 
223228 func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
224229 
225230 
226231 let factoryAddress = getStringOrFail(this, keyFactoryAddress())
227232 
228233 let factoryContract = addressFromStringValue(factoryAddress)
229234 
230235 let factoryCfg = readFactoryCfgOrFail(factoryContract)
231236 
232237 let emissionContract = getEmissionAddressOrFail(factoryCfg)
233238 
234239 let boostingContract = getBoostingAddressOrFail(factoryCfg)
235240 
241+func keyNextUser (lpAssetId) = makeString(["%s%s", lpAssetId, "nextUser"], SEP)
242+
243+
244+func getUsersListName (lpAssetId) = makeString(["users", lpAssetId], SEP)
245+
246+
247+func keyListHead (listName) = makeString(["%s%s%s", listName, "head"], SEP)
248+
249+
250+func keyListSize (listName) = makeString(["%s%s%s", listName, "size"], SEP)
251+
252+
253+func keyListPrev (listName,id) = makeString(["%s%s%s%s", listName, id, "prev"], SEP)
254+
255+
256+func keyListNext (listName,id) = makeString(["%s%s%s%s", listName, id, "next"], SEP)
257+
258+
259+func containsNode (listName,id) = {
260+    let headOrUnit = getString(this, keyListHead(listName))
261+    let prevOrUnit = getString(this, keyListPrev(listName, id))
262+    let nextOrUnit = getString(this, keyListNext(listName, id))
263+    if (if ((id == valueOrElse(headOrUnit, "")))
264+        then true
265+        else (prevOrUnit != unit))
266+        then true
267+        else (nextOrUnit != unit)
268+    }
269+
270+
271+func insertNodeActions (listName,id) = {
272+    let headOrUnit = getString(this, keyListHead(listName))
273+    let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
274+    let checkNode = if (!(containsNode(listName, id)))
275+        then true
276+        else throw("Node exists")
277+    if ((checkNode == checkNode))
278+        then (([IntegerEntry(keyListSize(listName), (listSize + 1))] ++ (if ((headOrUnit != unit))
279+            then [StringEntry(keyListNext(listName, id), value(headOrUnit)), StringEntry(keyListPrev(listName, value(headOrUnit)), id)]
280+            else nil)) ++ [StringEntry(keyListHead(listName), id)])
281+        else throw("Strict value is not equal to itself.")
282+    }
283+
284+
285+func deleteNodeActions (listName,id) = {
286+    let headOrUnit = getString(this, keyListHead(listName))
287+    let listSize = valueOrElse(getInteger(this, keyListSize(listName)), 0)
288+    let prevOrUnit = getString(this, keyListPrev(listName, id))
289+    let nextOrUnit = getString(this, keyListNext(listName, id))
290+    ([IntegerEntry(keyListSize(listName), (listSize - 1))] ++ (if (if ((prevOrUnit != unit))
291+        then (nextOrUnit != unit)
292+        else false)
293+        then [StringEntry(keyListNext(listName, value(prevOrUnit)), value(nextOrUnit)), StringEntry(keyListPrev(listName, value(nextOrUnit)), value(prevOrUnit)), DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, id))]
294+        else if ((nextOrUnit != unit))
295+            then [StringEntry(keyListHead(listName), value(nextOrUnit)), DeleteEntry(keyListNext(listName, id)), DeleteEntry(keyListPrev(listName, value(nextOrUnit)))]
296+            else if ((prevOrUnit != unit))
297+                then [DeleteEntry(keyListPrev(listName, id)), DeleteEntry(keyListNext(listName, value(prevOrUnit)))]
298+                else if ((id == valueOrElse(headOrUnit, "")))
299+                    then [DeleteEntry(keyListHead(listName))]
300+                    else throw(((("invalid node: " + listName) + ".") + id))))
301+    }
302+
303+
236304 func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
237305     then (stakedByUser > zeroBigInt)
238306     else false)
239307     then zeroBigInt
240308     else if ((stakedByUser == zeroBigInt))
241309         then wxPerLpIntegralNew
242310         else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
243311             then (stakedByUser > zeroBigInt)
244312             else false)
245313             then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
246314             else throw("calcWxPerLpIntegralUserLast: unexpected state")
247315 
248316 
249317 func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
250318     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
251319     let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
252320     let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
253321         then oneBigInt
254322         else stakedTotal
255323     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
256324     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
257325     let MULT3 = 1000
258326     let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
259327     let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * 3))
260328     let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
261329     let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
262330     let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
263331     let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
264332     let wxPerLpIntegral = getBigIntFromStringOrZero(this, wxPerLpIntegralKEY)
265333     let wxPerLpOrZeroX3 = 0
266334     let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
267335     let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
268336         then toBigInt(wxPerLpOrZeroX3)
269337         else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
270338     let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
271339     let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
272340         then oneBigInt
273341         else stakedTotalNew
274342     let wxPerLpIntegralNew = (wxPerLpIntegral + (wxPerLpX3 * toBigInt(dh)))
275343     let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
276344     let wxPerLpIntegralLastUpdHeightNew = height
277-    let debug = makeString([toString(wxPerLpIntegralNew), "dh=", toString(dh), "wxPerLpX3=", toString(wxPerLpX3), "stakedTotal=", toString(stakedTotal), toString(poolWxEmissionPerBlockX3), toString(wxEmissionPerBlockX3), "poolWeight=", toString(poolWeight)], "::")
345+    let debug = makeString([toString(wxPerLpIntegralNew), toString(dh), toString(wxPerLpX3), toString(stakedTotal), toString(poolWxEmissionPerBlockX3), toString(wxEmissionPerBlockX3), toString(poolWeight)], "::")
278346     $Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
279347     }
280348 
281349 
282350 func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
283-    let $t01142111543 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
284-    let wxPerLpIntegralNew = $t01142111543._1
285-    let poolIntegralSTATE = $t01142111543._2
286-    let poolDEBUG = $t01142111543._3
351+    let $t01424614368 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
352+    let wxPerLpIntegralNew = $t01424614368._1
353+    let poolIntegralSTATE = $t01424614368._2
354+    let poolDEBUG = $t01424614368._3
287355     let MULT3 = 1000
288356     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
289357     let stakedByUser = readStaked(stakedByUserKEY)
290358     let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
291359     let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
292360     let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
293361     let wxToClaimUser = getBigIntFromStringOrZero(this, wxToClaimUserKEY)
294362     let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
295363     let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
296364     let MULT11 = (MULT8 * MULT3)
297365     let wxToClaimUserNew = max([(wxToClaimUser + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11))), zeroBigInt])
298366     let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
299367     let wxPerLpIntegralUserLastUpdHeightNew = height
300-    let debug = makeString(["wxToClaimUser", toString(wxToClaimUser), "wxPerLpInteg", toString(wxPerLpIntegralUserLastUpdHeightOrZero), "wxPerLpIntegralNew", toString(wxPerLpIntegralNew), "wxToClaimUserNew", toString(wxToClaimUserNew), "wxPerLpIntegralUserLast", toString(wxPerLpIntegralUserLast), toString(stakedByUser), "poolDEBUG=", poolDEBUG, "height=", toString(height)], "::")
368+    let debug = makeString([toString(wxToClaimUser), toString(wxPerLpIntegralUserLast), toString(stakedByUser), poolDEBUG, toString(height)], "::")
301369     $Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
302370     }
303371 
304372 
305373 func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
306374     case s: String => 
307375         fromBase58String(s)
308376     case _: Unit => 
309377         unit
310378     case _ => 
311379         throw("Match error")
312380 }
313381 
314382 
315383 func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
316384     case s: String => 
317385         fromBase58String(s)
318386     case _: Unit => 
319387         unit
320388     case _ => 
321389         throw("Match error")
322390 }
323391 
324392 
325-func mustManager (i) = {
326-    let pd = throw("Permission denied")
327-    match managerPublicKeyOrUnit() {
328-        case pk: ByteVector => 
329-            if ((i.callerPublicKey == pk))
330-                then true
331-                else pd
332-        case _: Unit => 
333-            if ((i.caller == this))
334-                then true
335-                else pd
336-        case _ => 
337-            throw("Match error")
338-    }
339-    }
393+let permissionDeniedError = throw("Permission denied")
394+
395+func mustThis (i) = if ((i.caller == this))
396+    then true
397+    else permissionDeniedError
398+
399+
400+func mustManager (i) = match managerPublicKeyOrUnit() {
401+    case pk: ByteVector => 
402+        if ((i.callerPublicKey == pk))
403+            then true
404+            else permissionDeniedError
405+    case _: Unit => 
406+        if ((i.caller == this))
407+            then true
408+            else permissionDeniedError
409+    case _ => 
410+        throw("Match error")
411+}
340412 
341413 
342414 @Callable(i)
343415 func constructor (factoryAddressStr) = {
344416     let checkCaller = mustManager(i)
345417     if ((checkCaller == checkCaller))
346418         then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
419+        else throw("Strict value is not equal to itself.")
420+    }
421+
422+
423+
424+@Callable(i)
425+func constructorV2 (votingEmissionContract) = {
426+    let cheks = [mustManager(i), if ((addressFromString(votingEmissionContract) != unit))
427+        then true
428+        else "invalid voting emission contract address"]
429+    if ((cheks == cheks))
430+        then [StringEntry(keyVotingEmissionContract(), votingEmissionContract)]
347431         else throw("Strict value is not equal to itself.")
348432     }
349433 
350434 
351435 
352436 @Callable(i)
353437 func setManager (pendingManagerPublicKey) = {
354438     let checkCaller = mustManager(i)
355439     if ((checkCaller == checkCaller))
356440         then {
357441             let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
358442             if ((checkManagerPublicKey == checkManagerPublicKey))
359443                 then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
360444                 else throw("Strict value is not equal to itself.")
361445             }
362446         else throw("Strict value is not equal to itself.")
363447     }
364448 
365449 
366450 
367451 @Callable(i)
368452 func confirmManager () = {
369453     let pm = pendingManagerPublicKeyOrUnit()
370454     let hasPM = if (isDefined(pm))
371455         then true
372456         else throw("No pending manager")
373457     if ((hasPM == hasPM))
374458         then {
375459             let checkPM = if ((i.callerPublicKey == value(pm)))
376460                 then true
377461                 else throw("You are not pending manager")
378462             if ((checkPM == checkPM))
379463                 then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
380464                 else throw("Strict value is not equal to itself.")
381465             }
382466         else throw("Strict value is not equal to itself.")
383467     }
384468 
385469 
386470 
387471 @Callable(i)
388-func stake () = if ((size(i.payments) != 1))
389-    then throw("invalid payment - exact one payment must be attached")
390-    else {
391-        let pmt = i.payments[0]
392-        let lpAssetId = value(pmt.assetId)
393-        let lpAssetIdStr = toBase58String(lpAssetId)
394-        let amount = pmt.amount
395-        let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
396-        let callerStr = toString(i.caller)
397-        let userAddressStr = if ((callerStr == poolAddressStr))
398-            then toString(i.originCaller)
399-            else callerStr
400-        let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
401-        let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
402-        let stakedByUser = readStaked(stakedByUserKEY)
403-        let stakedTotal = readStaked(stakedTotalKEY)
404-        let $t01582815945 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
405-        let wxToClaimUserNew = $t01582815945._1
406-        let integralSTATE = $t01582815945._2
407-        let debug = $t01582815945._3
408-        ([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
409-        }
472+func stake () = {
473+    let migration = if ((getBinary(this, keyMigrator) != unit))
474+        then throw("maintenance")
475+        else unit
476+    if ((migration == migration))
477+        then if ((size(i.payments) != 1))
478+            then throw("invalid payment - exact one payment must be attached")
479+            else {
480+                let pmt = i.payments[0]
481+                let lpAssetId = value(pmt.assetId)
482+                let lpAssetIdStr = toBase58String(lpAssetId)
483+                let amount = pmt.amount
484+                let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
485+                let callerStr = toString(i.caller)
486+                let userAddressStr = if ((callerStr == poolAddressStr))
487+                    then toString(i.originCaller)
488+                    else callerStr
489+                let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
490+                let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
491+                let stakedByUser = readStaked(stakedByUserKEY)
492+                let stakedTotal = readStaked(stakedTotalKEY)
493+                let $t01893619053 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
494+                let wxToClaimUserNew = $t01893619053._1
495+                let integralSTATE = $t01893619053._2
496+                let debug = $t01893619053._3
497+                let listName = getUsersListName(lpAssetIdStr)
498+                let listActions = if (containsNode(listName, userAddressStr))
499+                    then nil
500+                    else insertNodeActions(listName, userAddressStr)
501+                (([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
502+                }
503+        else throw("Strict value is not equal to itself.")
504+    }
410505 
411506 
412507 
413508 @Callable(i)
414509 func unstake (lpAssetIdStr,amount) = {
415-    let lpAssetId = fromBase58String(lpAssetIdStr)
416-    let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
417-    let poolAddon = valueOrElse(getString(this, keyStablePoolAddonAddr()), poolAddressStr)
418-    let callerStr = toString(i.caller)
419-    let userAddressStr = if (if ((callerStr == poolAddressStr))
420-        then true
421-        else (callerStr == poolAddon))
422-        then toString(i.originCaller)
423-        else callerStr
424-    let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
425-    let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
426-    let stakedByUser = readStaked(stakedByUserKEY)
427-    let stakedTotal = readStaked(stakedTotalKEY)
428-    let $t01708217200 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))
429-    let wxToClaimUserNew = $t01708217200._1
430-    let integralSTATE = $t01708217200._2
431-    let debug = $t01708217200._3
432-    if ((amount > stakedByUser))
433-        then throw("passed amount is less then available")
434-        else ([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
510+    let migration = if ((getBinary(this, keyMigrator) != unit))
511+        then throw("maintenance")
512+        else unit
513+    if ((migration == migration))
514+        then {
515+            let lpAssetId = fromBase58String(lpAssetIdStr)
516+            let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
517+            let poolAddon = valueOrElse(getString(this, keyStablePoolAddonAddr()), poolAddressStr)
518+            let callerStr = toString(i.caller)
519+            let userAddressStr = if (if ((callerStr == poolAddressStr))
520+                then true
521+                else (callerStr == poolAddon))
522+                then toString(i.originCaller)
523+                else callerStr
524+            let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
525+            let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
526+            let stakedByUser = readStaked(stakedByUserKEY)
527+            let stakedTotal = readStaked(stakedTotalKEY)
528+            let integralSTATE = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))._2
529+            let listName = getUsersListName(lpAssetIdStr)
530+            let listActions = if (if (containsNode(listName, userAddressStr))
531+                then (amount == stakedByUser)
532+                else false)
533+                then deleteNodeActions(listName, userAddressStr)
534+                else nil
535+            let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetIdStr, userAddressStr))
536+            let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
537+            let wxToClaimUserNew = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddress, 0)._1
538+            let availableToClaim = (wxToClaimUserNew - claimedByUser)
539+            let r = if ((availableToClaim > zeroBigInt))
540+                then invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
541+                else unit
542+            if ((r == r))
543+                then if ((amount > stakedByUser))
544+                    then throw("passed amount is less then available")
545+                    else (([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE) ++ listActions)
546+                else throw("Strict value is not equal to itself.")
547+            }
548+        else throw("Strict value is not equal to itself.")
435549     }
436550 
437551 
438552 
439553 @Callable(i)
440554 func claimWx (lpAssetIdStr) = {
441-    let userAddress = i.caller
442555     let userAddressStr = toString(i.caller)
443-    let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
444-    let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
445-    let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
446-    let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
447-    let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
448-    let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
449-    let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
450-    let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
451-    let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
452-    let $t01844418556 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
453-    let wxToClaimUserNew = $t01844418556._1
454-    let integralSTATE = $t01844418556._2
455-    let debug = $t01844418556._3
456-    let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
457-    if ((zeroBigInt >= availableToClaim))
458-        then throw("nothing to claim")
459-        else {
460-            let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
461-            let minRewardPart = availableToClaim
462-            let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
463-            let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
464-            let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
465-            if ((emitBoost == emitBoost))
466-                then {
467-                    let claimedByUserValue = (claimedByUser + availableToClaim)
468-                    let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
469-                    let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserMinReward + minRewardPart)
470-                    let claimedTotalPlusAvailableToClaim = (claimedByUserMinReward + minRewardPart)
556+    let result = invoke(this, "claimWxINTERNAL", [lpAssetIdStr, userAddressStr], nil)
557+    $Tuple2(nil, result)
558+    }
559+
560+
561+
562+@Callable(i)
563+func claimWxINTERNAL (lpAssetIdStr,userAddressStr) = {
564+    let checkCaller = mustThis(i)
565+    if ((checkCaller == checkCaller))
566+        then {
567+            let userAddress = valueOrErrorMessage(addressFromString(userAddressStr), "claimWxINTERNAL: invalid user address")
568+            let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
569+            let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
570+            let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
571+            let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
572+            let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
573+            let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
574+            let claimedByUserMinReward = getBigIntFromStringOrZero(this, claimedByUserMinRewardKEY)
575+            let claimedByUserBoostReward = getBigIntFromStringOrZero(this, claimedByUserBoostRewardKEY)
576+            let claimedTotal = getBigIntFromStringOrZero(this, claimedTotalKEY)
577+            let $t02288422996 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
578+            let wxToClaimUserNew = $t02288422996._1
579+            let integralSTATE = $t02288422996._2
580+            let debug = $t02288422996._3
581+            let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
582+            if ((zeroBigInt >= availableToClaim))
583+                then throw("nothing to claim")
584+                else {
585+                    let wxAmountBoostTotal = max([asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0]), 0])
586+                    let minRewardPart = availableToClaim
587+                    let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
588+                    let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [toInt(minRewardPart)], nil))[0])
589+                    let emitBoost = asAnyList(invoke(emissionContract, "emit", [toInt(boostRewardPart)], nil))
590+                    if ((emitBoost == emitBoost))
591+                        then {
592+                            let claimedByUserValue = (claimedByUser + availableToClaim)
593+                            let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
594+                            let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserMinReward + minRewardPart)
595+                            let claimedTotalPlusAvailableToClaim = (claimedByUserMinReward + minRewardPart)
471596 [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)]
597+                            }
598+                        else throw("Strict value is not equal to itself.")
472599                     }
473-                else throw("Strict value is not equal to itself.")
474600             }
601+        else throw("Strict value is not equal to itself.")
475602     }
476603 
477604 
478605 
479606 @Callable(i)
480607 func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
481608     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
482609     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
483610     let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
484611     let stakedByUser = readStaked(stakedByUserKEY)
485612     let stakedTotal = readStaked(stakedTotalKEY)
486613     let claimedByUser = getBigIntFromStringOrZero(this, claimedByUserKEY)
487614     let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
488615     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
489616     let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
490617     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
491618     let passedBlocks = if ((emissionStartBlock > height))
492619         then 0
493620         else (height - emissionStartBlock)
494621     let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
495622     let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
496-    let $t02119821310 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
497-    let wxToClaimUserNew = $t02119821310._1
498-    let integralSTATE = $t02119821310._2
499-    let debug = $t02119821310._3
623+    let $t02563825750 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
624+    let wxToClaimUserNew = $t02563825750._1
625+    let integralSTATE = $t02563825750._2
626+    let debug = $t02563825750._3
500627     let availableToClaim = max([(wxToClaimUserNew - claimedByUser), zeroBigInt])
501628     let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
502629     let wxAmountBoostTotal = max([asInt(boostInvResult[0]), 0])
503630     let boostDebug = asString(boostInvResult[1])
504631     let minRewardPart = availableToClaim
505632     let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
506633     let totalReward = (minRewardPart + boostRewardPart)
507-    $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), ((((debug + "::") + toString(userWxReward)) + "::BOOSTDEBUG::") + boostDebug)], SEP))
634+    $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), ((((debug + "::") + toString(userWxReward)) + "::BOOST::") + boostDebug)], SEP))
635+    }
636+
637+
638+
639+@Callable(i)
640+func usersListTraversal (lpAssetId) = {
641+    let checkCaller = if ((toBase58String(i.caller.bytes) == valueOrElse(getString(this, keyVotingEmissionContract()), "")))
642+        then true
643+        else mustManager(i)
644+    if ((checkCaller == checkCaller))
645+        then {
646+            let listName = getUsersListName(lpAssetId)
647+            let userOrUnit = getString(keyNextUser(lpAssetId))
648+            let headOrUnit = getString(keyListHead(listName))
649+            match userOrUnit {
650+                case _: Unit => 
651+                    match headOrUnit {
652+                        case _: Unit => 
653+                            $Tuple2(nil, false)
654+                        case head: String => 
655+                            $Tuple2([StringEntry(keyNextUser(lpAssetId), head)], true)
656+                        case _ => 
657+                            throw("Match error")
658+                    }
659+                case userAddress: String => 
660+                    let claimedByUser = getBigIntFromStringOrZero(this, keyClaimedByUser(lpAssetId, userAddress))
661+                    let poolAddress = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
662+                    let wxToClaimUserNew = refreshINTEGRALS(lpAssetId, userAddress, poolAddress, 0)._1
663+                    let availableToClaim = (wxToClaimUserNew - claimedByUser)
664+                    let r = if ((availableToClaim > zeroBigInt))
665+                        then invoke(this, "claimWxINTERNAL", [lpAssetId, userAddress], nil)
666+                        else unit
667+                    if ((r == r))
668+                        then {
669+                            let nextUserOrUnit = getString(keyListNext(listName, userAddress))
670+                            match nextUserOrUnit {
671+                                case _: Unit => 
672+                                    $Tuple2([DeleteEntry(keyNextUser(lpAssetId))], false)
673+                                case nextUser: String => 
674+                                    $Tuple2([StringEntry(keyNextUser(lpAssetId), nextUser)], true)
675+                                case _ => 
676+                                    throw("Match error")
677+                            }
678+                            }
679+                        else throw("Strict value is not equal to itself.")
680+                case _ => 
681+                    throw("Match error")
682+            }
683+            }
684+        else throw("Strict value is not equal to itself.")
508685     }
509686 
510687 
511688 
512689 @Callable(i)
513690 func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
514691     then throw("permissions denied")
515692     else {
516-        let $t02224122351 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
517-        let wxPerLpIntegralNew = $t02224122351._1
518-        let poolIntegralSTATE = $t02224122351._2
519-        let poolDEBUG = $t02224122351._3
693+        let $t02810128211 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
694+        let wxPerLpIntegralNew = $t02810128211._1
695+        let poolIntegralSTATE = $t02810128211._2
696+        let poolDEBUG = $t02810128211._3
520697         poolIntegralSTATE
521698         }
699+
700+
701+
702+@Callable(i)
703+func setMigrator (pk) = if ((pk == ""))
704+    then [DeleteEntry(keyMigrator)]
705+    else [BinaryEntry(keyMigrator, fromBase58String(pk))]
522706 
523707 
524708 @Verifier(tx)
525709 func verify () = {
526710     let targetPublicKey =     match managerPublicKeyOrUnit() {
527711         case pk: ByteVector => 
528712             pk
529713         case _: Unit => 
530714             tx.senderPublicKey
531715         case _ => 
532716             throw("Match error")
533717     }
534-    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
718+    if (sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey))
719+        then true
720+        else sigVerify(tx.bodyBytes, tx.proofs[0], getBinaryValue(this, keyMigrator))
535721     }
536722 
github/deemru/w8io/786bc32 
81.35 ms ◑