w8 · tx · 8hN···9Ty

tx · 8hNcYcVgiRSaBTrTeeeJBXye7CPDt6krFJuhbR9zQ9Ty

3MsXpzisJAwnzUr7XrEoW1BZo4U6rw4tsYK:  -0.09000000 Waves

2023.02.06 13:01 [2437604] smart account 3MsXpzisJAwnzUr7XrEoW1BZo4U6rw4tsYK > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8hNcYcVgiRSaBTrTeeeJBXye7CPDt6krFJuhbR9zQ9Ty",
    "fee": 9000000,
    "feeAssetId": null,
    "timestamp": 1675677727459,
    "version": 2,
    "chainId": 84,
    "sender": "3MsXpzisJAwnzUr7XrEoW1BZo4U6rw4tsYK",
    "senderPublicKey": "FFdBua5rzzMkZebvsvmN7sAdU7XhFK8QNJ3hiwwxAYRA",
    "proofs": [
        "hhQ82zxS6HNkDDKgBYB3CXh3bEEsXRiKDKA3atzjpypRe1tPErEczfpVS253nJNu1cYHJsL7qd3ok9y4iLbcNZM",
        "JuCHFH3tnt7NC4g6NuE9iDbTY9ZCFndeZLXFkUpCLJxx4uVmWotUtw7RUPwgPsKTqYiZv3Adkn4hJnuTHNUjScq"
    ],
    "script": "base64:BgJcCAISAwoBCBIDCgEIEgMKAQgSBAoCCAESBQoDAggBEgUKAwgBARIECgIICBIECgIIARIFCgMCCAESAwoBCBIECgIIAhIDCgEIEgMKARgSAwoBGBIECgIICBIAEgBcAAdrQWN0aXZlAgZhY3RpdmUAC2tBY3RpdmVHbG9iAhRhY3RpdmVfYWxsX2NvbnRyYWN0cwAGa0NhdXNlAg5zaHV0ZG93bl9jYXVzZQAaa1Jld2FyZFBvb2xGcmFjdGlvbkN1cnJlbnQCHV9jdXJyZW50X3Bvb2xfZnJhY3Rpb25fcmV3YXJkABtrUmV3YXJkUG9vbEZyYWN0aW9uUHJldmlvdXMCHl9wcmV2aW91c19wb29sX2ZyYWN0aW9uX3Jld2FyZAATa0hlaWdodFBvb2xGcmFjdGlvbgIaX3Bvb2xfcmV3YXJkX3VwZGF0ZV9oZWlnaHQAE2tSZXdhcmRVcGRhdGVIZWlnaHQCFHJld2FyZF91cGRhdGVfaGVpZ2h0ABZrVXNlclNoYXJlVG9rZW5zU3Rha2VkAhRfc2hhcmVfdG9rZW5zX2xvY2tlZAAWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAIVX3NoYXJlX3Rva2Vuc19ibG9ja2VkABprVXNlclNoYXJlVG9rZW5zTG9ja2VkVHlwZQIaX3NoYXJlX3Rva2Vuc19ibG9ja2VkX3R5cGUAHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQCHF9zaGFyZV90b2tlbnNfYmxvY2tlZF9oZWlnaHQAF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsAhVfc2hhcmVfdG9rZW5zX3ZpcnR1YWwAFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMCGl90b3RhbF9zaGFyZV90b2tlbnNfbG9ja2VkABNrU2hhcmVUb2tlbnNWaXJ0dWFsAhtfdG90YWxfc2hhcmVfdG9rZW5zX3ZpcnR1YWwAC2tMb2NrUGFyYW1zAgxfbG9ja19wYXJhbXMADWtMb2NrV2F2ZXNGZWUCDmxvY2tfd2F2ZXNfZmVlAA5rUG9vbEJvb3N0Q29lZgILX2Jvb3N0X2NvZWYAEWtGYXJtTGFzdEludGVyZXN0Ag5fbGFzdF9pbnRlcmVzdAAVa0Zhcm1Vc2VyTGFzdEludGVyZXN0Ag5fbGFzdF9pbnRlcmVzdAASa0Jvb3N0TGFzdEludGVyZXN0AhBfbGFzdF9pbnRlcmVzdF9iABZrQm9vc3RVc2VyTGFzdEludGVyZXN0AhJfbGFzdF9pbnRlcmVzdF91X2IAE2tMYXN0SW50ZXJlc3RIZWlnaHQCFV9sYXN0X2ludGVyZXN0X2hlaWdodAAHa1NXT1BpZAIHU1dPUF9pZAAOa0F2YWlsYWJsZVNXT1ACD19hdmFpbGFibGVfU1dPUAAQa0hhcnZlc3RQb29sVm90ZQIYX2hhcnZlc3RfcG9vbF92b3RlX2dTV09QAAlrUG9vbFZvdGUCEF9wb29sX3ZvdGVfZ1NXT1AADWtVc2VyUG9vbFZvdGUCEF91c2VyX3ZvdGVfZ1NXT1AACmtQb29sU3RydWMCC19wb29sX3N0cnVjAA5rVXNlclBvb2xTdHJ1YwIQX3VzZXJfcG9vbF9zdHJ1YwAUa0hhcnZlc3RVc2VyUG9vbFZvdGUCHV9oYXJ2ZXN0X3VzZXJfcG9vbF92b3RlX2dTV09QABNrRmlyc3RIYXJ2ZXN0SGVpZ2h0AhRmaXJzdF9oYXJ2ZXN0X2hlaWdodAANa1NoYXJlTGltaXRGSAIcc2hhcmVfbGltaXRfb25fZmlyc3RfaGFydmVzdAATa1N0cmF0QkZhcm1JbnRlcmVzdAIWX3N0cmF0X2JfZmFybV9pbnRlcmVzdAANa0NwbW1Db250cmFjdAINY3BtbV9jb250cmFjdAANa0FkbWluUHViS2V5MQILYWRtaW5fcHViXzEADWtBZG1pblB1YktleTICC2FkbWluX3B1Yl8yAA1rQWRtaW5QdWJLZXkzAgthZG1pbl9wdWJfMwASa0FkbWluSW52b2tlUHViS2V5AhBhZG1pbl9pbnZva2VfcHViABBrTW9uZXlCb3hBZGRyZXNzAhFtb25leV9ib3hfYWRkcmVzcwAOa1ZvdGluZ0FkZHJlc3MCDnZvdGluZ19hZGRyZXNzAAtrR292QWRkcmVzcwISZ292ZXJuYW5jZV9hZGRyZXNzABFrTFBGYXJtaW5nQWRkcmVzcwIKbHBfZmFybWluZwAUa0Zhcm1pbmdUcmVhc3VyZUFkZHICEGZhcm1pbmdfdHJlYXN1cmUABm9yYWNsZQkBB0FkZHJlc3MBARoBVEgTlwzA0zPMJTKAtin3p2RogKvjzHtLmQAOdG90YWxWb3RlU2hhcmUAgMivoCUAC3NjYWxlVmFsdWU4AIDC1y8AEmxvY2tCb29zdENvZWZTY2FsZQDoBwAQZGVmUG9vbEJvb3N0Q29lZgD0AwAOc3RhcnRFbWlzc2lvbkgA59N0ABBzd29wWWVhckVtaXNzaW9uAICA6YOx3hYADWJsb2Nrc1BlclllYXIA+o8gARNnZXRCYXNlNThGcm9tT3JhY2xlAQNrZXkEByRtYXRjaDAJAJ0IAgUGb3JhY2xlBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZzdHJpbmcFByRtYXRjaDAJANkEAQUGc3RyaW5nBAdub3RoaW5nBQckbWF0Y2gwCQACAQkArAICBQNrZXkCCGlzIGVtcHR5AAxhZG1pblB1YktleTEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MQAMYWRtaW5QdWJLZXkyCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTIADGFkbWluUHViS2V5MwkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkzAA9tb25leUJveEFkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBRBrTW9uZXlCb3hBZGRyZXNzAA12b3RpbmdBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUOa1ZvdGluZ0FkZHJlc3MACmdvdkFkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQtrR292QWRkcmVzcwARYWRtaW5JbnZva2VQdWJLZXkJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUSa0FkbWluSW52b2tlUHViS2V5ABBscEZhcm1pbmdBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQURa0xQRmFybWluZ0FkZHJlc3MAE2Zhcm1pbmdUcmVhc3VyZUFkZHIJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBRRrRmFybWluZ1RyZWFzdXJlQWRkcgAMY3BtbUNvbnRyYWN0CQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0NwbW1Db250cmFjdAAGYWN0aXZlCQERQGV4dHJOYXRpdmUoMTA1MSkCBQR0aGlzBQdrQWN0aXZlAAphY3RpdmVHbG9iCQELdmFsdWVPckVsc2UCCQCbCAIFBm9yYWNsZQULa0FjdGl2ZUdsb2IGAARTV09QCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFB2tTV09QaWQBFmdldFJld2FyZHNQZXJCbG9ja0luZm8ABA9lbWlzc2lvblBlcmlvZHMJAGkCCQBlAgUGaGVpZ2h0BQ5zdGFydEVtaXNzaW9uSAUNYmxvY2tzUGVyWWVhcgoBDGNhbGNFbWlzc2lvbgIDYWNjAWkECyR0MDQ3MTA0NzQ3BQNhY2MEC2N1ckVtaXNzaW9uCAULJHQwNDcxMDQ3NDcCXzEEDHByZXZFbWlzc2lvbggFCyR0MDQ3MTA0NzQ3Al8yAwkAZgIFD2VtaXNzaW9uUGVyaW9kcwUBaQkAlAoCCQBrAwULY3VyRW1pc3Npb24ASwBkBQtjdXJFbWlzc2lvbgkAlAoCBQtjdXJFbWlzc2lvbgUMcHJldkVtaXNzaW9uBAskdDA0OTA1NTA3MQoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQkAzAgCAAoJAMwIAgALCQDMCAIADAkAzAgCAA0JAMwIAgAOCQDMCAIADwkAzAgCABAJAMwIAgARCQDMCAIAEgkAzAgCABMFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUQc3dvcFllYXJFbWlzc2lvbgUQc3dvcFllYXJFbWlzc2lvbgoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMY2FsY0VtaXNzaW9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQEC2N1ckVtaXNzaW9uCAULJHQwNDkwNTUwNzECXzEEDHByZXZFbWlzc2lvbggFCyR0MDQ5MDU1MDcxAl8yCQCVCgMJAGkCBQtjdXJFbWlzc2lvbgUNYmxvY2tzUGVyWWVhcgkAaQIFDHByZXZFbWlzc2lvbgUNYmxvY2tzUGVyWWVhcgkAZAIFDnN0YXJ0RW1pc3Npb25ICQBoAgUNYmxvY2tzUGVyWWVhcgUPZW1pc3Npb25QZXJpb2RzARVnZXRIZWlnaHRGaXJzdEhhcnZlc3QBBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAJoIAgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wFE2tGaXJzdEhhcnZlc3RIZWlnaHQAAAEUZ2V0RkhTaGFyZUxpbWl0VG9rZW4BBHBvb2wJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQRwb29sBQ1rU2hhcmVMaW1pdEZICQCsAgICFE5vIGRhdGEgb24gdGhlIGtleTogBQ1rU2hhcmVMaW1pdEZIARJnZXRUb3RhbFNoYXJlVG9rZW4BBHBvb2wJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMJAKwCAgkArAICAhRObyBkYXRhIG9uIHRoZSBrZXk6IAUEcG9vbAUWa1NoYXJlVG90YWxTaGFyZVRva2VucwEMZ2V0UG9vbFZvdGVkAQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIFDXZvdGluZ0FkZHJlc3MJAKwCAgUEcG9vbAUJa1Bvb2xWb3RlCQELdmFsdWVPckVsc2UCCQC2CQEJAJEDAgkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFDXZvdGluZ0FkZHJlc3MJAKwCAgUEcG9vbAUKa1Bvb2xTdHJ1YwIAAgFfAAAAAAEQZ2V0VXNlclBvb2xWb3RlZAIEcG9vbAR1c2VyCQELdmFsdWVPckVsc2UCCQCaCAIFDXZvdGluZ0FkZHJlc3MJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wFDWtVc2VyUG9vbFZvdGUJAQt2YWx1ZU9yRWxzZQIJALYJAQkAkQMCCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUNdm90aW5nQWRkcmVzcwkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAUOa1VzZXJQb29sU3RydWMCAAIBXwAAAAABD2dldFNoYXJlQXNzZXRJZAEEcG9vbAkA2QQBCQERQGV4dHJOYXRpdmUoMTA1MykCCQEFdmFsdWUBCQCmCAEFBHBvb2wCDnNoYXJlX2Fzc2V0X2lkAQ5hY2NvdW50QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA8AcCBQR0aGlzBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAAIBAgtNYXRjaCBlcnJvcgEOY2FsY1NjYWxlVmFsdWUCCGFzc2V0SWQxCGFzc2V0SWQyBBBhc3NldElkMURlY2ltYWxzCAkBBXZhbHVlAQkA7AcBBQhhc3NldElkMQhkZWNpbWFscwQQYXNzZXRJZDJEZWNpbWFscwgJAQV2YWx1ZQEJAOwHAQUIYXNzZXRJZDIIZGVjaW1hbHMEC3NjYWxlRGlnaXRzCQBkAgkAZQIFEGFzc2V0SWQyRGVjaW1hbHMFEGFzc2V0SWQxRGVjaW1hbHMACAkAbAYACgAABQtzY2FsZURpZ2l0cwAAAAAFBERPV04BEXVzZXJBdmFpbGFibGVTV09QAgRwb29sBHVzZXIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AAAAEKcmV3YXJkSW5mbwEEcG9vbAQLJHQwNjg4NjcwMDEJARZnZXRSZXdhcmRzUGVyQmxvY2tJbmZvAAQadG90YWxSZXdhcmRQZXJCbG9ja0N1cnJlbnQIBQskdDA2ODg2NzAwMQJfMQQbdG90YWxSZXdhcmRQZXJCbG9ja1ByZXZpb3VzCAULJHQwNjg4NjcwMDECXzIEGGxhc3RFbWlzc2lvblVwZGF0ZUhlaWdodAgFCyR0MDY4ODY3MDAxAl8zBBlyZXdhcmRQb29sRnJhY3Rpb25DdXJyZW50CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUKZ292QWRkcmVzcwkArAICBQRwb29sBRprUmV3YXJkUG9vbEZyYWN0aW9uQ3VycmVudAkArAICCQCsAgIJAKwCAgkArAICAhRObyBkYXRhIG9uIHRoZSBrZXk6IAUEcG9vbAUaa1Jld2FyZFBvb2xGcmFjdGlvbkN1cnJlbnQCDCBhdCBhZGRyZXNzIAkApQgBBQpnb3ZBZGRyZXNzBBJyZXdhcmRVcGRhdGVIZWlnaHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQpnb3ZBZGRyZXNzBRNrUmV3YXJkVXBkYXRlSGVpZ2h0CQCsAgIJAKwCAgkArAICAhRObyBkYXRhIG9uIHRoZSBrZXk6IAUTa1Jld2FyZFVwZGF0ZUhlaWdodAIMIGF0IGFkZHJlc3MgCQClCAEFCmdvdkFkZHJlc3MEFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUKZ292QWRkcmVzcwkArAICBQRwb29sBRNrSGVpZ2h0UG9vbEZyYWN0aW9uBRJyZXdhcmRVcGRhdGVIZWlnaHQEGnJld2FyZFBvb2xGcmFjdGlvblByZXZpb3VzCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUKZ292QWRkcmVzcwkArAICBQRwb29sBRtrUmV3YXJkUG9vbEZyYWN0aW9uUHJldmlvdXMJAKwCAgkArAICCQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFBHBvb2wFG2tSZXdhcmRQb29sRnJhY3Rpb25QcmV2aW91cwIMIGF0IGFkZHJlc3MgCQClCAEFCmdvdkFkZHJlc3MEEXJld2FyZFBvb2xDdXJyZW50CQBrAwUadG90YWxSZXdhcmRQZXJCbG9ja0N1cnJlbnQFGXJld2FyZFBvb2xGcmFjdGlvbkN1cnJlbnQFDnRvdGFsVm90ZVNoYXJlBBJyZXdhcmRQb29sUHJldmlvdXMJAGsDBRp0b3RhbFJld2FyZFBlckJsb2NrQ3VycmVudAUacmV3YXJkUG9vbEZyYWN0aW9uUHJldmlvdXMFDnRvdGFsVm90ZVNoYXJlBBVyZXdhcmRQb29sUHJldkN1cnJlbnQJAGsDBRt0b3RhbFJld2FyZFBlckJsb2NrUHJldmlvdXMFGXJld2FyZFBvb2xGcmFjdGlvbkN1cnJlbnQFDnRvdGFsVm90ZVNoYXJlBBZyZXdhcmRQb29sUHJldlByZXZpb3VzCQBrAwUbdG90YWxSZXdhcmRQZXJCbG9ja1ByZXZpb3VzBRpyZXdhcmRQb29sRnJhY3Rpb25QcmV2aW91cwUOdG90YWxWb3RlU2hhcmUDAwkAZgIFEXJld2FyZFBvb2xDdXJyZW50BRp0b3RhbFJld2FyZFBlckJsb2NrQ3VycmVudAYJAGYCBRJyZXdhcmRQb29sUHJldmlvdXMFG3RvdGFsUmV3YXJkUGVyQmxvY2tQcmV2aW91cwkAAgECYnJld2FyZFBvb2xDdXJyZW50ID4gdG90YWxSZXdhcmRQZXJCbG9ja0N1cnJlbnQgb3IgcmV3YXJkUG9vbFByZXZpb3VzID4gdG90YWxSZXdhcmRQZXJCbG9ja1ByZXZpb3VzCQCZCgcFEXJld2FyZFBvb2xDdXJyZW50BRJyZXdhcmRVcGRhdGVIZWlnaHQFEnJld2FyZFBvb2xQcmV2aW91cwUWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAUYbGFzdEVtaXNzaW9uVXBkYXRlSGVpZ2h0BRVyZXdhcmRQb29sUHJldkN1cnJlbnQFFnJld2FyZFBvb2xQcmV2UHJldmlvdXMBE2dldExhc3RJbnRlcmVzdEluZm8BBHBvb2wEDGZhcm1JbnRlcmVzdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QJAKwCAgkArAICAhRObyBkYXRhIG9uIHRoZSBrZXk6IAUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QEDWJvb3N0SW50ZXJlc3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QAAAQSbGFzdEludGVyZXN0SGVpZ2h0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQCVCgMFEmxhc3RJbnRlcmVzdEhlaWdodAUMZmFybUludGVyZXN0BQ1ib29zdEludGVyZXN0AQtjYWxjRmFybVJ3ZAIEcG9vbA5jdXJUb3RhbFJld2FyZAQNcG9vbEJvb3N0Q29lZgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFDmtQb29sQm9vc3RDb2VmBRBkZWZQb29sQm9vc3RDb2VmCQBrAwUOY3VyVG90YWxSZXdhcmQFEmxvY2tCb29zdENvZWZTY2FsZQkAZAIFDXBvb2xCb29zdENvZWYFEmxvY2tCb29zdENvZWZTY2FsZQEMY2FsY0Jvb3N0UndkAgRwb29sDmN1clRvdGFsUmV3YXJkBA1wb29sQm9vc3RDb2VmCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1Bvb2xCb29zdENvZWYFEGRlZlBvb2xCb29zdENvZWYJAGsDBQ5jdXJUb3RhbFJld2FyZAUNcG9vbEJvb3N0Q29lZgkAZAIFDXBvb2xCb29zdENvZWYFEmxvY2tCb29zdENvZWZTY2FsZQEMY2FsY0ludGVyZXN0DARwb29sEmxhc3RJbnRlcmVzdEhlaWdodBJyZXdhcmRVcGRhdGVIZWlnaHQWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAxmYXJtSW50ZXJlc3QNYm9vc3RJbnRlcmVzdAlwb29sVm90ZWQVY3VycmVudFJld2FyZFBlckJsb2NrEHNoYXJlVG9rZW5Mb2NrZWQWcHJldmlvdXNSZXdhcmRQZXJCbG9jawpzY2FsZVZhbHVlCHRvSGVpZ2h0BA0kdDAxMDAxNTExMjAwAwMDCQBmAgUScmV3YXJkVXBkYXRlSGVpZ2h0BQh0b0hlaWdodAkAAAIFEnJld2FyZFVwZGF0ZUhlaWdodAUWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAcGAwkAZgIFCHRvSGVpZ2h0BRJyZXdhcmRVcGRhdGVIZWlnaHQJAQIhPQIFEnJld2FyZFVwZGF0ZUhlaWdodAUWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAcEAXIJAGgCBRZwcmV2aW91c1Jld2FyZFBlckJsb2NrCQBlAgUIdG9IZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAkAlQoDBQFyBQxmYXJtSW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QDAwMJAGYCBQh0b0hlaWdodAUScmV3YXJkVXBkYXRlSGVpZ2h0CQAAAgUScmV3YXJkVXBkYXRlSGVpZ2h0BRZwb29sUmV3YXJkVXBkYXRlSGVpZ2h0BwkAZgIFEmxhc3RJbnRlcmVzdEhlaWdodAUScmV3YXJkVXBkYXRlSGVpZ2h0BwQBcgkAaAIFFWN1cnJlbnRSZXdhcmRQZXJCbG9jawkAZQIFCHRvSGVpZ2h0BRJsYXN0SW50ZXJlc3RIZWlnaHQJAJUKAwUBcgUMZmFybUludGVyZXN0BQ1ib29zdEludGVyZXN0BAlyd2RCZnJVcGQJAGgCBRZwcmV2aW91c1Jld2FyZFBlckJsb2NrCQBlAgUScmV3YXJkVXBkYXRlSGVpZ2h0BRJsYXN0SW50ZXJlc3RIZWlnaHQEBmZCZnJVcAkAZAIFDGZhcm1JbnRlcmVzdAkAawMJAQtjYWxjRmFybVJ3ZAIFBHBvb2wFCXJ3ZEJmclVwZAUKc2NhbGVWYWx1ZQUQc2hhcmVUb2tlbkxvY2tlZAQGYkJmclVwCQBkAgUNYm9vc3RJbnRlcmVzdAMJAGYCBQlwb29sVm90ZWQAAAkAawMJAQxjYWxjQm9vc3RSd2QCBQRwb29sBQlyd2RCZnJVcGQFC3NjYWxlVmFsdWU4BQlwb29sVm90ZWQAAAQDcndkCQBoAgUVY3VycmVudFJld2FyZFBlckJsb2NrCQBlAgUIdG9IZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAkAlQoDBQNyd2QFBmZCZnJVcAUGYkJmclVwBAZyZXdhcmQIBQ0kdDAxMDAxNTExMjAwAl8xBA5mYXJtSW50ckJlZm9yZQgFDSR0MDEwMDE1MTEyMDACXzIED2Jvb3N0SW50ckJlZm9yZQgFDSR0MDEwMDE1MTEyMDACXzMED25ld0Zhcm1JbnRlcmVzdAkAZAIFDmZhcm1JbnRyQmVmb3JlCQBrAwkBC2NhbGNGYXJtUndkAgUEcG9vbAUGcmV3YXJkBQpzY2FsZVZhbHVlBRBzaGFyZVRva2VuTG9ja2VkBBBuZXdCb29zdEludGVyZXN0CQBkAgUPYm9vc3RJbnRyQmVmb3JlAwkAZgIFCXBvb2xWb3RlZAAACQBrAwkBDGNhbGNCb29zdFJ3ZAIFBHBvb2wFBnJld2FyZAULc2NhbGVWYWx1ZTgFCXBvb2xWb3RlZAAACQCUCgIFD25ld0Zhcm1JbnRlcmVzdAUQbmV3Qm9vc3RJbnRlcmVzdAEJY2xhaW1DYWxjAgRwb29sBHVzZXIECnNjYWxlVmFsdWUJAQ5jYWxjU2NhbGVWYWx1ZQIFBFNXT1AJAQ9nZXRTaGFyZUFzc2V0SWQBBQRwb29sBAlwb29sVm90ZWQJAQxnZXRQb29sVm90ZWQBBQRwb29sBAp1UG9vbFZvdGVkCQEQZ2V0VXNlclBvb2xWb3RlZAIFBHBvb2wFBHVzZXIECnNoYXJlVG9rZW4JARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBBF0b3RhbFNoYXJlVmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFCnNoYXJlVG9rZW4EEnN0cmF0QkZhcm1JbnRlcmVzdAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTdHJhdEJGYXJtSW50ZXJlc3QAAAQNJHQwMTIwMzgxMjExOQkBE2dldExhc3RJbnRlcmVzdEluZm8BBQRwb29sBBJsYXN0SW50ZXJlc3RIZWlnaHQIBQ0kdDAxMjAzODEyMTE5Al8xBAxmYXJtSW50ZXJlc3QIBQ0kdDAxMjAzODEyMTE5Al8yBA1ib29zdEludGVyZXN0CAUNJHQwMTIwMzgxMjExOQJfMwQNJHQwMTIxMjQxMjM4MQkBCnJld2FyZEluZm8BBQRwb29sBBVjdXJyZW50UmV3YXJkUGVyQmxvY2sIBQ0kdDAxMjEyNDEyMzgxAl8xBBJyZXdhcmRVcGRhdGVIZWlnaHQIBQ0kdDAxMjEyNDEyMzgxAl8yBBZwcmV2aW91c1Jld2FyZFBlckJsb2NrCAUNJHQwMTIxMjQxMjM4MQJfMwQWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAgFDSR0MDEyMTI0MTIzODECXzQEFGVtaXNzaW9uVXBkYXRlSGVpZ2h0CAUNJHQwMTIxMjQxMjM4MQJfNQQZcHJldkN1cnJlbnRSZXdhcmRQZXJCbG9jawgFDSR0MDEyMTI0MTIzODECXzYEGnByZXZQcmV2aW91c1Jld2FyZFBlckJsb2NrCAUNJHQwMTIxMjQxMjM4MQJfNwQNdUZhcm1JbnRlcmVzdAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRVrRmFybVVzZXJMYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAQOdUJvb3N0SW50ZXJlc3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa0Jvb3N0VXNlckxhc3RJbnRlcmVzdAMDCQBmAgUSc3RyYXRCRmFybUludGVyZXN0BQ11RmFybUludGVyZXN0CQBmAgUKdVBvb2xWb3RlZAAABwAABQ1ib29zdEludGVyZXN0BBJ1U2hhcmVUb2tlbnNTdGFrZWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAAABBB1U2hhcmVUb2tlbnNWaXJ0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRJ1U2hhcmVUb2tlbnNTdGFrZWQDCQAAAgURdG90YWxTaGFyZVZpcnR1YWwAAAQKdG9UcmVhc3VyeQMJAGYCBRRlbWlzc2lvblVwZGF0ZUhlaWdodAUSbGFzdEludGVyZXN0SGVpZ2h0CQBkAgkAaAIFGXByZXZDdXJyZW50UmV3YXJkUGVyQmxvY2sJAGUCBRRlbWlzc2lvblVwZGF0ZUhlaWdodAUSbGFzdEludGVyZXN0SGVpZ2h0CQBoAgUVY3VycmVudFJld2FyZFBlckJsb2NrCQBlAgUGaGVpZ2h0BRRlbWlzc2lvblVwZGF0ZUhlaWdodAkAaAIFFWN1cnJlbnRSZXdhcmRQZXJCbG9jawkAZQIFBmhlaWdodAUSbGFzdEludGVyZXN0SGVpZ2h0CQCWCgQFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAAABQp0b1RyZWFzdXJ5BA0kdDAxMzMzOTE0NDc2AwkAZgIFFGVtaXNzaW9uVXBkYXRlSGVpZ2h0BRJsYXN0SW50ZXJlc3RIZWlnaHQEDSR0MDEzNzUyMTQzMTEJAQxjYWxjSW50ZXJlc3QMBQRwb29sBRJsYXN0SW50ZXJlc3RIZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAUWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAUMZmFybUludGVyZXN0BQ1ib29zdEludGVyZXN0BQlwb29sVm90ZWQFGXByZXZDdXJyZW50UmV3YXJkUGVyQmxvY2sFEXRvdGFsU2hhcmVWaXJ0dWFsBRpwcmV2UHJldmlvdXNSZXdhcmRQZXJCbG9jawUKc2NhbGVWYWx1ZQUUZW1pc3Npb25VcGRhdGVIZWlnaHQEE3ByZXZOZXdGYXJtSW50ZXJlc3QIBQ0kdDAxMzc1MjE0MzExAl8xBBRwcmV2TmV3Qm9vc3RJbnRlcmVzdAgFDSR0MDEzNzUyMTQzMTECXzIJAJUKAwUTcHJldk5ld0Zhcm1JbnRlcmVzdAUUcHJldk5ld0Jvb3N0SW50ZXJlc3QFFGVtaXNzaW9uVXBkYXRlSGVpZ2h0CQCVCgMFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAUSbGFzdEludGVyZXN0SGVpZ2h0BBBwcmV2RmFybUludGVyZXN0CAUNJHQwMTMzMzkxNDQ3NgJfMQQRcHJldkJvb3N0SW50ZXJlc3QIBQ0kdDAxMzMzOTE0NDc2Al8yBAhMSUhlaWdodAgFDSR0MDEzMzM5MTQ0NzYCXzMEDSR0MDE0NDg1MTQ5MDgJAQxjYWxjSW50ZXJlc3QMBQRwb29sBQhMSUhlaWdodAUScmV3YXJkVXBkYXRlSGVpZ2h0BRZwb29sUmV3YXJkVXBkYXRlSGVpZ2h0BRBwcmV2RmFybUludGVyZXN0BRFwcmV2Qm9vc3RJbnRlcmVzdAUJcG9vbFZvdGVkBRVjdXJyZW50UmV3YXJkUGVyQmxvY2sFEXRvdGFsU2hhcmVWaXJ0dWFsBRZwcmV2aW91c1Jld2FyZFBlckJsb2NrBQpzY2FsZVZhbHVlBQZoZWlnaHQED25ld0Zhcm1JbnRlcmVzdAgFDSR0MDE0NDg1MTQ5MDgCXzEEEG5ld0Jvb3N0SW50ZXJlc3QIBQ0kdDAxNDQ4NTE0OTA4Al8yBAdmYXJtUndkCQBrAwUQdVNoYXJlVG9rZW5zVmlydAkAZQIFD25ld0Zhcm1JbnRlcmVzdAUNdUZhcm1JbnRlcmVzdAUKc2NhbGVWYWx1ZQQNcG9vbEJvb3N0Q29lZgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFDmtQb29sQm9vc3RDb2VmBRBkZWZQb29sQm9vc3RDb2VmBAtib29zdFJ3ZE1heAkAawMJAGsDBRB1U2hhcmVUb2tlbnNWaXJ0CQBlAgUPbmV3RmFybUludGVyZXN0CQCWAwEJAMwIAgUNdUZhcm1JbnRlcmVzdAkAzAgCBRJzdHJhdEJGYXJtSW50ZXJlc3QFA25pbAUKc2NhbGVWYWx1ZQUNcG9vbEJvb3N0Q29lZgUSbG9ja0Jvb3N0Q29lZlNjYWxlBAtjdXJCb29zdFJ3ZAkAawMJAGUCBRBuZXdCb29zdEludGVyZXN0BQ51Qm9vc3RJbnRlcmVzdAUKdVBvb2xWb3RlZAULc2NhbGVWYWx1ZTgECGJvb3N0UndkCQCXAwEJAMwIAgULYm9vc3RSd2RNYXgJAMwIAgULY3VyQm9vc3RSd2QFA25pbAQKdG9UcmVhc3VyeQkAZQIFC2Jvb3N0UndkTWF4BQhib29zdFJ3ZAMJAGYCAAAFCnRvVHJlYXN1cnkJAAIBAg50b1RyZWFzdXJ5IDwgMAkAlgoEBQ9uZXdGYXJtSW50ZXJlc3QFEG5ld0Jvb3N0SW50ZXJlc3QJAGQCBQdmYXJtUndkBQhib29zdFJ3ZAUKdG9UcmVhc3VyeQEbYXZhaWxhYmxlQ2xhaW1DYWxjQWxsQnlVc2VyAgVwb29scwR1c2VyCgENY2FsY0F2YWlsYWJsZQIDYWNjBHBvb2wEDSR0MDE1Nzc3MTU4MDYFA2FjYwQIbmV3UG9vbHMIBQ0kdDAxNTc3NzE1ODA2Al8xBAdhbW91bnRzCAUNJHQwMTU3NzcxNTgwNgJfMgQNJHQwMTU4MTUxNTg2OAkBCWNsYWltQ2FsYwIFBHBvb2wFBHVzZXIEAmZpCAUNJHQwMTU4MTUxNTg2OAJfMQQCYmkIBQ0kdDAxNTgxNTE1ODY4Al8yBAtjbGFpbUFtb3VudAgFDSR0MDE1ODE1MTU4NjgCXzMEAnR0CAUNJHQwMTU4MTUxNTg2OAJfNAQNYXZhaWxhYmxlRnVuZAkAZAIJARF1c2VyQXZhaWxhYmxlU1dPUAIFBHBvb2wFBHVzZXIFC2NsYWltQW1vdW50CQCUCgIJAM0IAgUIbmV3UG9vbHMFBHBvb2wJAM0IAgUHYW1vdW50cwUNYXZhaWxhYmxlRnVuZAoAAiRsBQVwb29scwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDWNhbGNBdmFpbGFibGUCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDYwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8ARVjYW5Mb2NrSW5GaXJzdEhhcnZlc3QFBHBvb2wEdXNlchV1c2VyU2hhcmVUb2tlbnNTdGFrZWQJcG10QW1vdW50CGxvY2tUeXBlAwkAZgIJARVnZXRIZWlnaHRGaXJzdEhhcnZlc3QBBQRwb29sBQZoZWlnaHQED3RvdGFsVm90ZUFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ12b3RpbmdBZGRyZXNzCQCsAgIFBHBvb2wFEGtIYXJ2ZXN0UG9vbFZvdGUAAAQOdXNlclZvdGVBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUNdm90aW5nQWRkcmVzcwkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAUUa0hhcnZlc3RVc2VyUG9vbFZvdGUAAAQRRkhTaGFyZVRva2VuTGltaXQJARRnZXRGSFNoYXJlTGltaXRUb2tlbgEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBHBvb2wEFUZIU2hhcmVUb2tlblVzZXJMaW1pdAkAZQIJAGsDBRFGSFNoYXJlVG9rZW5MaW1pdAUOdXNlclZvdGVBbW91bnQFD3RvdGFsVm90ZUFtb3VudAUVdXNlclNoYXJlVG9rZW5zU3Rha2VkAwkAZgIFCGxvY2tUeXBlAAAJAAIBAjJZb3UgY2FuJ3QgbG9jayBzaGFyZVRva2VucyB0aWxsIGZpcnN0IGhhcnZlc3QgZW5kLgMJAAACBQ51c2VyVm90ZUFtb3VudAAAAAADCQBnAgUJcG10QW1vdW50BRVGSFNoYXJlVG9rZW5Vc2VyTGltaXQJAGUCBQlwbXRBbW91bnQFFUZIU2hhcmVUb2tlblVzZXJMaW1pdAAAAAABDWdldExvY2tQYXJhbXMBBHR5cGUECmxvY2tQYXJhbXMJALUJAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgkApAMBBQR0eXBlBQtrTG9ja1BhcmFtcwkArAICAh5UaGVyZSBhcmUgbm8ga2V5IGZvciBsb2NrIHR5cGUJAKQDAQUEdHlwZQIBXwkAlAoCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKbG9ja1BhcmFtcwAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKbG9ja1BhcmFtcwABAQdzdXNwZW5kAQVjYXVzZQkAzAgCCQEMQm9vbGVhbkVudHJ5AgUHa0FjdGl2ZQcJAMwIAgkBC1N0cmluZ0VudHJ5AgUGa0NhdXNlBQVjYXVzZQUDbmlsAQhpc0FjdGl2ZQADAwUGYWN0aXZlBQphY3RpdmVHbG9iBwUEdW5pdAkAAgECH0RBcHAgaXMgaW5hY3RpdmUgYXQgdGhpcyBtb21lbnQBC2lzQWRtaW5DYWxsAQFpAwkBD2NvbnRhaW5zRWxlbWVudAIJAMwIAgUMYWRtaW5QdWJLZXkxCQDMCAIFDGFkbWluUHViS2V5MgkAzAgCBQxhZG1pblB1YktleTMFA25pbAgFAWkPY2FsbGVyUHVibGljS2V5BQR1bml0CQACAQIhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQppc1Bvb2xDYWxsAgFpBHBvb2wDAwkAAAIJAKUIAQgFAWkGY2FsbGVyBQRwb29sBgkAAAIIBQFpBmNhbGxlcgUMY3BtbUNvbnRyYWN0BQR1bml0CQACAQIgT25seSBwb29sIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BCmlzU2VsZkNhbGwBAWkDCQAAAggFAWkGY2FsbGVyBQR0aGlzBQR1bml0CQACAQIrT25seSBjb250cmFjdCBpdHNlbGYgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgETY2FsY0xvY2tTaGFyZVRva2VucwQBaQZjYWxsZXIEcG9vbAhsb2NrVHlwZQQMc2hhcmVBc3NldElkCQEPZ2V0U2hhcmVBc3NldElkAQUEcG9vbAQEdXNlcgkApQgBBQZjYWxsZXIECnRvdGFsU2hhcmUJARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBBF0b3RhbFNoYXJlVmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFCnRvdGFsU2hhcmUEEHVzZXJTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAAABA91c2VyTG9ja2VkSGVpZ3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUca1VzZXJTaGFyZVRva2Vuc0xvY2tlZEhlaWdodAAABBB1c2VyTG9ja2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQAAAQRdXNlckFtb3VudFZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFEHVzZXJTdGFrZWRBbW91bnQEFHRvdGFsVXNlclNoYXJlVG9rZW5zCQBkAgkAZAIFEHVzZXJTdGFrZWRBbW91bnQFEHVzZXJMb2NrZWRBbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BA0kdDAxODY2OTE4NzIxCQENZ2V0TG9ja1BhcmFtcwEFCGxvY2tUeXBlBApsb2NrUGVyaW9kCAUNJHQwMTg2NjkxODcyMQJfMQQIbG9ja0NvZWYIBQ0kdDAxODY2OTE4NzIxAl8yBAxsb2NrV2F2ZXNGZWUJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMFDWtMb2NrV2F2ZXNGZWUDCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFDHNoYXJlQXNzZXRJZAkAAgECG1dyb25nIHNoYXJldG9rZW4gaW4gcGF5bWVudAMJAGcCAAAICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50CQACAQIlUGF5bWVudCBhbW91bnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gMAMJAGYCAAAFCGxvY2tUeXBlCQACAQIVbG9ja1R5cGUgbXVzdCBiZSA+PSAwBBVzaGFyZVRva2Vuc0NoYW5nZU9uRkgJARVjYW5Mb2NrSW5GaXJzdEhhcnZlc3QFBQRwb29sBQR1c2VyBRB1c2VyU3Rha2VkQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUIbG9ja1R5cGUDCQAAAgUVc2hhcmVUb2tlbnNDaGFuZ2VPbkZIBRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgEDSR0MDE5MTQ4MjEwODIDCQAAAgUIbG9ja1R5cGUAAAQUdXNlckFtb3VudFZpcnR1YWxOZXcJAGUCCQBkAgURdXNlckFtb3VudFZpcnR1YWwICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAkAZQIJAGQCBRB1c2VyU3Rha2VkQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUVc2hhcmVUb2tlbnNDaGFuZ2VPbkZICQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAkAZQIJAGQCBRF0b3RhbFNoYXJlVmlydHVhbAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFFXNoYXJlVG9rZW5zQ2hhbmdlT25GSAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZjYWxsZXIFFXNoYXJlVG9rZW5zQ2hhbmdlT25GSAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNuaWwJAGUCCQBkAgUKdG90YWxTaGFyZQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFFXNoYXJlVG9rZW5zQ2hhbmdlT25GSAMDCQAAAgUPdXNlckxvY2tlZEhlaWd0AAADAwkAZgIAAgkAkAMBCAUBaQhwYXltZW50cwYJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAUEdW5pdAYJAGYCBQxsb2NrV2F2ZXNGZWUICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BwkAAgEJAKwCAgkArAICAitZb3UgbmVlZCB0byBwYXkgYWRkaXRpb25hbCB3YXZlcyBjb21pc3Npb24gCQCkAwEFDGxvY2tXYXZlc0ZlZQIFV0FWRVMDCQBmAgUPdXNlckxvY2tlZEhlaWd0CQBkAgUGaGVpZ2h0BQpsb2NrUGVyaW9kCQACAQJPWW91IGNhbm5vdCBsb2NrIHNoYXJldG9rZW5zIGZvciBhIHBlcmlvZCBsZXNzIHRoYW4gd2hhdCB5b3UgaGF2ZSBhbHJlYWR5IGxvY2tlZAQTdXNlckxvY2tlZEFtb3VudE5ldwkAZAIFEHVzZXJMb2NrZWRBbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BBJ1c2VyTG9ja2VkSGVpZ3ROZXcJAGQCBQZoZWlnaHQFCmxvY2tQZXJpb2QEFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQBkAgkAawMFE3VzZXJMb2NrZWRBbW91bnROZXcFCGxvY2tDb2VmBRJsb2NrQm9vc3RDb2VmU2NhbGUFEHVzZXJTdGFrZWRBbW91bnQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAUTdXNlckxvY2tlZEFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUca1VzZXJTaGFyZVRva2Vuc0xvY2tlZEhlaWdodAUSdXNlckxvY2tlZEhlaWd0TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRprVXNlclNoYXJlVG9rZW5zTG9ja2VkVHlwZQUIbG9ja1R5cGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRR1c2VyQW1vdW50VmlydHVhbE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsCQBkAgkAZQIFEXRvdGFsU2hhcmVWaXJ0dWFsBRF1c2VyQW1vdW50VmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcFA25pbAkAZAIFCnRvdGFsU2hhcmUICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAtsb2NrRW50cmllcwgFDSR0MDE5MTQ4MjEwODICXzEEDXRvdGFsU2hhcmVOZXcIBQ0kdDAxOTE0ODIxMDgyAl8yAwkAZgIJAQ5hY2NvdW50QmFsYW5jZQEFDHNoYXJlQXNzZXRJZAUNdG90YWxTaGFyZU5ldwkAAgECMEJhbGFuY2Ugb2Ygc2hhcmUtdG9rZW4gaXMgbG93ZXIgdGhhbiB0b3RhbEFtb3VudAQNJHQwMjEyMDcyMTI4OQkBCWNsYWltQ2FsYwIFBHBvb2wFBHVzZXIEDGZhcm1JbnRlcmVzdAgFDSR0MDIxMjA3MjEyODkCXzEEDWJvb3N0SW50ZXJlc3QIBQ0kdDAyMTIwNzIxMjg5Al8yBAtjbGFpbUFtb3VudAgFDSR0MDIxMjA3MjEyODkCXzMECnRvVHJlYXN1cmUIBQ0kdDAyMTIwNzIxMjg5Al80BBFhdmFpbGFibGVGdW5kc05ldwkAZAIJARF1c2VyQXZhaWxhYmxlU1dPUAIFBHBvb2wFBHVzZXIFC2NsYWltQW1vdW50BAR1cGxwAwkAAAIJAJ0IAgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wCB3ZlcnNpb24CBTMuMC4wCQD8BwQFEGxwRmFybWluZ0FkZHJlc3MCEnVwZGF0ZVVzZXJJbnRlcmVzdAkAzAgCBQR1c2VyCQDMCAIFBHBvb2wJAMwIAgUUdG90YWxVc2VyU2hhcmVUb2tlbnMFA25pbAUDbmlsAAADCQAAAgUEdXBscAUEdXBscAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRVrRmFybVVzZXJMYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa0Jvb3N0VXNlckxhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUWa1NoYXJlVG90YWxTaGFyZVRva2VucwUNdG90YWxTaGFyZU5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AFEWF2YWlsYWJsZUZ1bmRzTmV3CQDMCAIJAQdSZWlzc3VlAwUEU1dPUAUKdG9UcmVhc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAUDbmlsBQtsb2NrRW50cmllcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEXY2FsY1dpdGhkcmF3U2hhcmVUb2tlbnMEAWkGY2FsbGVyBHBvb2wZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQNc2hhcmVUb2tlbnNJZAkA2QQBCQERQGV4dHJOYXRpdmUoMTA1MykCCQEFdmFsdWUBCQCmCAEFBHBvb2wCDnNoYXJlX2Fzc2V0X2lkBAR1c2VyCQClCAEFBmNhbGxlcgQNJHQwMjI0ODEyMjU2MwkBCWNsYWltQ2FsYwIFBHBvb2wFBHVzZXIEDGZhcm1JbnRlcmVzdAgFDSR0MDIyNDgxMjI1NjMCXzEEDWJvb3N0SW50ZXJlc3QIBQ0kdDAyMjQ4MTIyNTYzAl8yBAtjbGFpbUFtb3VudAgFDSR0MDIyNDgxMjI1NjMCXzMECnRvVHJlYXN1cmUIBQ0kdDAyMjQ4MTIyNTYzAl80BBB1c2VyU3Rha2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQAAAQQdXNlckxvY2tlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAAAEEXVzZXJBbW91bnRWaXJ0dWFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRB1c2VyU3Rha2VkQW1vdW50BBN1c2VyU3Rha2VkQW1vdW50TmV3CQBlAgUQdXNlclN0YWtlZEFtb3VudAUZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAQRYXZhaWxhYmxlRnVuZHNOZXcJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAQQdG90YWxTaGFyZUFtb3VudAkBEmdldFRvdGFsU2hhcmVUb2tlbgEFBHBvb2wEEXRvdGFsU2hhcmVWaXJ0dWFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAUQdG90YWxTaGFyZUFtb3VudAQTdG90YWxTaGFyZUFtb3VudE5ldwkAZQIFEHRvdGFsU2hhcmVBbW91bnQFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEFHRvdGFsU2hhcmVWaXJ0dWFsTmV3CQBlAgURdG90YWxTaGFyZVZpcnR1YWwFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQBlAgURdXNlckFtb3VudFZpcnR1YWwFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQDCQBmAgUZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAUQdXNlclN0YWtlZEFtb3VudAkAAgECLFdpdGhkcmF3IGFtb3VudCBtb3JlIHRoZW4gdXNlciBsb2NrZWQgYW1vdW50AwkAZgIJAQ5hY2NvdW50QmFsYW5jZQEFDXNoYXJlVG9rZW5zSWQFEHRvdGFsU2hhcmVBbW91bnQJAAIBAjBCYWxhbmNlIG9mIHNoYXJlLXRva2VuIGlzIGxvd2VyIHRoYW4gdG90YWxBbW91bnQEBHVwbHADCQAAAgkAnQgCCQEHQWRkcmVzcwEJANkEAQUEcG9vbAIHdmVyc2lvbgIFMy4wLjAJAPwHBAUQbHBGYXJtaW5nQWRkcmVzcwISdXBkYXRlVXNlckludGVyZXN0CQDMCAIFBHVzZXIJAMwIAgUEcG9vbAkAzAgCCQBkAgUQdXNlclN0YWtlZEFtb3VudAUQdXNlckxvY2tlZEFtb3VudAUDbmlsBQNuaWwAAAMJAAACBQR1cGxwBQR1cGxwCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRVrRmFybVVzZXJMYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa0Jvb3N0VXNlckxhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQFE3VzZXJTdGFrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRR1c2VyQW1vdW50VmlydHVhbE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRZrU2hhcmVUb3RhbFNoYXJlVG9rZW5zBRN0b3RhbFNoYXJlQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFFHRvdGFsU2hhcmVWaXJ0dWFsTmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBQ5rQXZhaWxhYmxlU1dPUAURYXZhaWxhYmxlRnVuZHNOZXcJAMwIAgkBB1JlaXNzdWUDBQRTV09QBQp0b1RyZWFzdXJlBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmYXJtaW5nVHJlYXN1cmVBZGRyBQp0b1RyZWFzdXJlBQRTV09QCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAUNc2hhcmVUb2tlbnNJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQljYWxjQ2xhaW0DAWkEcG9vbAZjYWxsZXIEDXNoYXJlVG9rZW5zSWQJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgkBBXZhbHVlAQkApggBBQRwb29sAg5zaGFyZV9hc3NldF9pZAQEdXNlcgkApQgBBQZjYWxsZXIEEHNoYXJlVG9rZW5Mb2NrZWQJARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBA0kdDAyNTA3NjI1MTU4CQEJY2xhaW1DYWxjAgUEcG9vbAUEdXNlcgQMZmFybUludGVyZXN0CAUNJHQwMjUwNzYyNTE1OAJfMQQNYm9vc3RJbnRlcmVzdAgFDSR0MDI1MDc2MjUxNTgCXzIEC2NsYWltQW1vdW50CAUNJHQwMjUwNzYyNTE1OAJfMwQKdG9UcmVhc3VyZQgFDSR0MDI1MDc2MjUxNTgCXzQEDWF2YWlsYWJsZUZ1bmQJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAMJAGYCCQEOYWNjb3VudEJhbGFuY2UBBQ1zaGFyZVRva2Vuc0lkBRBzaGFyZVRva2VuTG9ja2VkCQACAQIwQmFsYW5jZSBvZiBzaGFyZS10b2tlbiBpcyBsb3dlciB0aGFuIHRvdGFsQW1vdW50BAZ1VHJhbnMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQ1hdmFpbGFibGVGdW5kBQRTV09QBQNuaWwFA25pbAkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFWtGYXJtVXNlckxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrQm9vc3RVc2VyTGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AAAAkAzAgCCQEHUmVpc3N1ZQMFBFNXT1AJAGQCBQp0b1RyZWFzdXJlBQ1hdmFpbGFibGVGdW5kBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmYXJtaW5nVHJlYXN1cmVBZGRyBQp0b1RyZWFzdXJlBQRTV09QBQNuaWwFBnVUcmFucwUNYXZhaWxhYmxlRnVuZBEBaQEEaW5pdAEHZWFybHlMUAMJAQlpc0RlZmluZWQBCQCdCAIFBHRoaXMFB2tTV09QaWQJAAIBAhhTV09QIGFscmVhZHkgaW5pdGlhbGl6ZWQECmluaXRBbW91bnQAgIDpg7HeFgQJU1dPUGlzc3VlCQDCCAUCBFNXT1ACE1NXT1AgcHJvdG9jb2wgdG9rZW4FCmluaXRBbW91bnQACAYEBlNXT1BpZAkAuAgBBQlTV09QaXNzdWUJAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2tBY3RpdmUGCQDMCAIJAMIIBQIEU1dPUAITU1dPUCBwcm90b2NvbCB0b2tlbgUKaW5pdEFtb3VudAAIBgkAzAgCCQELU3RyaW5nRW50cnkCBQdrU1dPUGlkCQDYBAEFBlNXT1BpZAUDbmlsAWkBFGluaXRQb29sU2hhcmVGYXJtaW5nAQRwb29sCQELdmFsdWVPckVsc2UCCQELaXNBZG1pbkNhbGwBBQFpCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAUDbmlsAWkBEnVwZGF0ZVBvb2xJbnRlcmVzdAEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAMJAQIhPQIIBQFpBmNhbGxlcgUKZ292QWRkcmVzcwkAAgECJk9ubHkgR292ZXJuYW5jZSBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBAR1c2VyCQClCAEJAKcIAQURYWRtaW5JbnZva2VQdWJLZXkEDSR0MDI3MDM1MjcxMDkJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAyNzAzNTI3MTA5Al8xBA1ib29zdEludGVyZXN0CAUNJHQwMjcwMzUyNzEwOQJfMgQPYm9vc3RMUGludGVyZXN0CAUNJHQwMjcwMzUyNzEwOQJfMwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQFA25pbAFpAQ9sb2NrU2hhcmVUb2tlbnMCBHBvb2wIbG9ja1R5cGUJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJARNjYWxjTG9ja1NoYXJlVG9rZW5zBAUBaQgFAWkGY2FsbGVyBQRwb29sBQhsb2NrVHlwZQFpARdsb2NrU2hhcmVUb2tlbnNGcm9tUG9vbAMLY2FsbGVyQnl0ZXMEcG9vbAhsb2NrVHlwZQkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBC3ZhbHVlT3JFbHNlAgkBCmlzUG9vbENhbGwCBQFpBQRwb29sCQETY2FsY0xvY2tTaGFyZVRva2VucwQFAWkJAQdBZGRyZXNzAQULY2FsbGVyQnl0ZXMFBHBvb2wFCGxvY2tUeXBlAWkBFWxvY2tTdGFrZWRTaGFyZVRva2VucwMEcG9vbAhsb2NrVHlwZQpsb2NrQW1vdW50CQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUABAxzaGFyZUFzc2V0SWQJAQ9nZXRTaGFyZUFzc2V0SWQBBQRwb29sBAR1c2VyCQClCAEIBQFpBmNhbGxlcgQKdG90YWxTaGFyZQkBEmdldFRvdGFsU2hhcmVUb2tlbgEFBHBvb2wEEXRvdGFsU2hhcmVWaXJ0dWFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAUKdG90YWxTaGFyZQQQdXNlclN0YWtlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zU3Rha2VkAAAED3VzZXJMb2NrZWRIZWlndAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRxrVXNlclNoYXJlVG9rZW5zTG9ja2VkSGVpZ2h0AAAEEHVzZXJMb2NrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAAABBF1c2VyQW1vdW50VmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUQdXNlclN0YWtlZEFtb3VudAQUdG90YWxVc2VyU2hhcmVUb2tlbnMJAGQCBRB1c2VyU3Rha2VkQW1vdW50BRB1c2VyTG9ja2VkQW1vdW50BA0kdDAyODUyODI4NTgwCQENZ2V0TG9ja1BhcmFtcwEFCGxvY2tUeXBlBApsb2NrUGVyaW9kCAUNJHQwMjg1MjgyODU4MAJfMQQIbG9ja0NvZWYIBQ0kdDAyODUyODI4NTgwAl8yBAxsb2NrV2F2ZXNGZWUJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMFDWtMb2NrV2F2ZXNGZWUDCQBmAgkBFWdldEhlaWdodEZpcnN0SGFydmVzdAEFBHBvb2wFBmhlaWdodAkAAgECMllvdSBjYW4ndCBsb2NrIHNoYXJlVG9rZW5zIHRpbGwgZmlyc3QgaGFydmVzdCBlbmQuAwkAZwIAAAUIbG9ja1R5cGUJAAIBAhRsb2NrVHlwZSBtdXN0IGJlID4gMAMJAGYCBQpsb2NrQW1vdW50BRB1c2VyU3Rha2VkQW1vdW50CQACAQkArAICAhlZb3UgY2FuJ3QgbG9jayBtb3JlIHRoYW4gCQCkAwEFEHVzZXJTdGFrZWRBbW91bnQDCQBmAgkBDmFjY291bnRCYWxhbmNlAQUMc2hhcmVBc3NldElkBQp0b3RhbFNoYXJlCQACAQIwQmFsYW5jZSBvZiBzaGFyZS10b2tlbiBpcyBsb3dlciB0aGFuIHRvdGFsQW1vdW50AwMJAAACBQ91c2VyTG9ja2VkSGVpZ3QAAAMDCQBmAgABCQCQAwEIBQFpCHBheW1lbnRzBgkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0BgkAZgIFDGxvY2tXYXZlc0ZlZQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQHCQACAQkArAICCQCsAgICK1lvdSBuZWVkIHRvIHBheSBhZGRpdGlvbmFsIHdhdmVzIGNvbWlzc2lvbiAJAKQDAQUMbG9ja1dhdmVzRmVlAgVXQVZFUwMDCQAAAgUPdXNlckxvY2tlZEhlaWd0AAAJAGcCAAAFCmxvY2tBbW91bnQHCQACAQIhbG9ja0Ftb3VudCBtdXN0IGJlIGdyZWF0ZXIgdGhhbiAwAwkAZgIAAAUKbG9ja0Ftb3VudAkAAgECG2xvY2tBbW91bnQgbXVzdCBiZSBwb3NpdGl2ZQMJAGYCBQ91c2VyTG9ja2VkSGVpZ3QJAGQCBQZoZWlnaHQFCmxvY2tQZXJpb2QJAAIBAk9Zb3UgY2Fubm90IGxvY2sgc2hhcmV0b2tlbnMgZm9yIGEgcGVyaW9kIGxlc3MgdGhhbiB3aGF0IHlvdSBoYXZlIGFscmVhZHkgbG9ja2VkBBN1c2VyTG9ja2VkQW1vdW50TmV3CQBkAgUQdXNlckxvY2tlZEFtb3VudAUKbG9ja0Ftb3VudAQTdXNlclN0YWtlZEFtb3VudE5ldwkAZQIFEHVzZXJTdGFrZWRBbW91bnQFCmxvY2tBbW91bnQEEnVzZXJMb2NrZWRIZWlndE5ldwkAZAIFBmhlaWdodAUKbG9ja1BlcmlvZAQUdXNlckFtb3VudFZpcnR1YWxOZXcJAGQCCQBrAwUTdXNlckxvY2tlZEFtb3VudE5ldwUIbG9ja0NvZWYFEmxvY2tCb29zdENvZWZTY2FsZQUTdXNlclN0YWtlZEFtb3VudE5ldwQNJHQwMjk4NzAyOTk1MgkBCWNsYWltQ2FsYwIFBHBvb2wFBHVzZXIEDGZhcm1JbnRlcmVzdAgFDSR0MDI5ODcwMjk5NTICXzEEDWJvb3N0SW50ZXJlc3QIBQ0kdDAyOTg3MDI5OTUyAl8yBAtjbGFpbUFtb3VudAgFDSR0MDI5ODcwMjk5NTICXzMECnRvVHJlYXN1cmUIBQ0kdDAyOTg3MDI5OTUyAl80BBFhdmFpbGFibGVGdW5kc05ldwkAZAIJARF1c2VyQXZhaWxhYmxlU1dPUAIFBHBvb2wFBHVzZXIFC2NsYWltQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zU3Rha2VkBRN1c2VyU3Rha2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkBRN1c2VyTG9ja2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRxrVXNlclNoYXJlVG9rZW5zTG9ja2VkSGVpZ2h0BRJ1c2VyTG9ja2VkSGVpZ3ROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFGmtVc2VyU2hhcmVUb2tlbnNMb2NrZWRUeXBlBQhsb2NrVHlwZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwJAGQCCQBlAgURdG90YWxTaGFyZVZpcnR1YWwFEXVzZXJBbW91bnRWaXJ0dWFsBRR1c2VyQW1vdW50VmlydHVhbE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBQ5rQXZhaWxhYmxlU1dPUAURYXZhaWxhYmxlRnVuZHNOZXcJAMwIAgkBB1JlaXNzdWUDBQRTV09QBQp0b1RyZWFzdXJlBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmYXJtaW5nVHJlYXN1cmVBZGRyBQp0b1RyZWFzdXJlBQRTV09QBQNuaWwBaQEOdW5sb2NrVXNlckxvY2sCBHBvb2wEdXNlcgkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQMbG9ja1dhdmVzRmVlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQ1rTG9ja1dhdmVzRmVlBA91c2VyTG9ja2VkSGVpZ3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRxrVXNlclNoYXJlVG9rZW5zTG9ja2VkSGVpZ2h0CQCsAgIJAKwCAgkArAICCQCsAgICEVRoZXJlIGlzIG5vIHBvb2wgBQRwb29sAgkgb3IgdXNlciAFBHVzZXICCXdpdGggbG9jawQRdG90YWxTaGFyZVZpcnR1YWwJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAQQdXNlclN0YWtlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zU3Rha2VkAAAEEHVzZXJMb2NrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAAABBF1c2VyQW1vdW50VmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUQdXNlclN0YWtlZEFtb3VudAMJAGYCBQ91c2VyTG9ja2VkSGVpZ3QFBmhlaWdodAkAAgEJAKwCAgIiWW91IGNhbid0IHVubG9jayBzaGFyZXRva2VucyB0aWxsIAkApAMBBQ91c2VyTG9ja2VkSGVpZ3QEE3VzZXJTdGFrZWRBbW91bnROZXcJAGQCBRB1c2VyU3Rha2VkQW1vdW50BRB1c2VyTG9ja2VkQW1vdW50BA0kdDAzMjAyOTMyMTExCQEJY2xhaW1DYWxjAgUEcG9vbAUEdXNlcgQMZmFybUludGVyZXN0CAUNJHQwMzIwMjkzMjExMQJfMQQNYm9vc3RJbnRlcmVzdAgFDSR0MDMyMDI5MzIxMTECXzIEC2NsYWltQW1vdW50CAUNJHQwMzIwMjkzMjExMQJfMwQKdG9UcmVhc3VyZQgFDSR0MDMyMDI5MzIxMTECXzQEEWF2YWlsYWJsZUZ1bmRzTmV3CQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFWtGYXJtVXNlckxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrQm9vc3RVc2VyTGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAUTdXNlclN0YWtlZEFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFE3VzZXJTdGFrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAkAZAIJAGUCBRF0b3RhbFNoYXJlVmlydHVhbAURdXNlckFtb3VudFZpcnR1YWwFE3VzZXJTdGFrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFDmtBdmFpbGFibGVTV09QBRFhdmFpbGFibGVGdW5kc05ldwkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUaa1VzZXJTaGFyZVRva2Vuc0xvY2tlZFR5cGUJAMwIAgkBB1JlaXNzdWUDBQRTV09QBQp0b1RyZWFzdXJlBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmYXJtaW5nVHJlYXN1cmVBZGRyBQp0b1RyZWFzdXJlBQRTV09QCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUMbG9ja1dhdmVzRmVlBQR1bml0BQNuaWwBaQETd2l0aGRyYXdTaGFyZVRva2VucwIEcG9vbBlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50CQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQEXY2FsY1dpdGhkcmF3U2hhcmVUb2tlbnMEBQFpCAUBaQZjYWxsZXIFBHBvb2wFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQBaQEbd2l0aGRyYXdTaGFyZVRva2Vuc0Zyb21Qb29sAwtjYWxsZXJCeXRlcwRwb29sGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQppc1Bvb2xDYWxsAgUBaQUEcG9vbAkBF2NhbGNXaXRoZHJhd1NoYXJlVG9rZW5zBAUBaQkBB0FkZHJlc3MBBQtjYWxsZXJCeXRlcwUEcG9vbAUZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAFpAQVjbGFpbQEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQBcgkBCWNhbGNDbGFpbQMFAWkFBHBvb2wIBQFpBmNhbGxlcgMJAAACCAUBcgJfMgAACQACAQIZWW91IGhhdmUgMCBhdmFpbGFibGUgU1dPUAUBcgFpAQ1jbGFpbUludGVybmFsAgRwb29sBmNhbGxlcgkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBC3ZhbHVlT3JFbHNlAgkBCmlzU2VsZkNhbGwBBQFpCQEJY2FsY0NsYWltAwUBaQUEcG9vbAkBB0FkZHJlc3MBBQZjYWxsZXIBaQENY2xhaW1BbmRTdGFrZQEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQLY2xhaW1BbW91bnQKAAFACQD8BwQFBHRoaXMCDWNsYWltSW50ZXJuYWwJAMwIAgUEcG9vbAkAzAgCCAgFAWkGY2FsbGVyBWJ5dGVzBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQDCQAAAgULY2xhaW1BbW91bnQFC2NsYWltQW1vdW50AwkAAAIFC2NsYWltQW1vdW50AAAJAAIBAhlZb3UgaGF2ZSAwIGF2YWlsYWJsZSBTV09QBApzdGFrZVRvR292CQD8BwQFCmdvdkFkZHJlc3MCE2xvY2tTV09QRnJvbUZhcm1pbmcFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEU1dPUAULY2xhaW1BbW91bnQFA25pbAMJAAACBQpzdGFrZVRvR292BQpzdGFrZVRvR292BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIY2xhaW1BbGwBBXBvb2xzCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACgEIY2xhaW1JbnYCCmNsYWltVG90YWwEcG9vbAQLY2xhaW1BbW91bnQKAAFACQD8BwQFBHRoaXMCDWNsYWltSW50ZXJuYWwJAMwIAgUEcG9vbAkAzAgCCAgFAWkGY2FsbGVyBWJ5dGVzBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQDCQAAAgULY2xhaW1BbW91bnQFC2NsYWltQW1vdW50CQBkAgUKY2xhaW1Ub3RhbAULY2xhaW1BbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4ECmNsYWltVG90YWwKAAIkbAUFcG9vbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGNsYWltSW52AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA2MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAMJAAACBQpjbGFpbVRvdGFsAAAJAAIBAhlZb3UgaGF2ZSAwIGF2YWlsYWJsZSBTV09QCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUKY2xhaW1Ub3RhbAUEU1dPUAUDbmlsAWkBEGNsYWltQWxsQW5kU3Rha2UBBXBvb2xzCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACgEIY2xhaW1JbnYCCmNsYWltVG90YWwEcG9vbAQLY2xhaW1BbW91bnQKAAFACQD8BwQFBHRoaXMCDWNsYWltSW50ZXJuYWwJAMwIAgUEcG9vbAkAzAgCCAgFAWkGY2FsbGVyBWJ5dGVzBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQDCQAAAgULY2xhaW1BbW91bnQFC2NsYWltQW1vdW50CQBkAgUKY2xhaW1Ub3RhbAULY2xhaW1BbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4ECmNsYWltVG90YWwKAAIkbAUFcG9vbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGNsYWltSW52AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA2MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAMJAAACBQpjbGFpbVRvdGFsAAAJAAIBAhlZb3UgaGF2ZSAwIGF2YWlsYWJsZSBTV09QBApzdGFrZVRvR292CQD8BwQFCmdvdkFkZHJlc3MCE2xvY2tTV09QRnJvbUZhcm1pbmcFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEU1dPUAUKY2xhaW1Ub3RhbAUDbmlsAwkAAAIFCnN0YWtlVG9Hb3YFCnN0YWtlVG9Hb3YFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARd1cGRhdGVVc2VyQm9vc3RJbnRlcmVzdAIEcG9vbAR1c2VyCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUAAwkBAiE9AggFAWkGY2FsbGVyBQ12b3RpbmdBZGRyZXNzCQACAQIjT25seSB2b2l0aW5nIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EDSR0MDM1NTg1MzU2NjcJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAzNTU4NTM1NjY3Al8xBA1ib29zdEludGVyZXN0CAUNJHQwMzU1ODUzNTY2NwJfMgQLY2xhaW1BbW91bnQIBQ0kdDAzNTU4NTM1NjY3Al8zBAp0b1RyZWFzdXJlCAUNJHQwMzU1ODUzNTY2NwJfNAQRYXZhaWxhYmxlRnVuZHNOZXcJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBQ5rQXZhaWxhYmxlU1dPUAURYXZhaWxhYmxlRnVuZHNOZXcJAMwIAgkBB1JlaXNzdWUDBQRTV09QBQp0b1RyZWFzdXJlBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmYXJtaW5nVHJlYXN1cmVBZGRyBQp0b1RyZWFzdXJlBQRTV09QBQNuaWwBaQEIc2h1dGRvd24ACQELdmFsdWVPckVsc2UCCQELaXNBZG1pbkNhbGwBBQFpAwkBASEBBQZhY3RpdmUJAAIBCQCsAgICIkRBcHAgaXMgYWxyZWFkeSBzdXNwZW5kZWQuIENhdXNlOiAJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUGa0NhdXNlAhp0aGUgY2F1c2Ugd2Fzbid0IHNwZWNpZmllZAkBB3N1c3BlbmQBAg9QYXVzZWQgYnkgYWRtaW4BaQEIYWN0aXZhdGUACQELdmFsdWVPckVsc2UCCQELaXNBZG1pbkNhbGwBBQFpAwUGYWN0aXZlCQACAQIWREFwcCBpcyBhbHJlYWR5IGFjdGl2ZQkAzAgCCQEMQm9vbGVhbkVudHJ5AgUHa0FjdGl2ZQYJAMwIAgkBC0RlbGV0ZUVudHJ5AQUGa0NhdXNlBQNuaWwBAnR4AQZ2ZXJpZnkABAckbWF0Y2gwBQJ0eAQSYWRtaW5QdWJLZXkxU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkxAAEAAAQSYWRtaW5QdWJLZXkyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQUMYWRtaW5QdWJLZXkyAAEAAAQSYWRtaW5QdWJLZXkzU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAgUMYWRtaW5QdWJLZXkzAAEAAAkAZwIJAGQCCQBkAgUSYWRtaW5QdWJLZXkxU2lnbmVkBRJhZG1pblB1YktleTJTaWduZWQFEmFkbWluUHViS2V5M1NpZ25lZAACrUdCgQ==",
    "height": 2437604,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: jK7o6TzhnCbo7VJCTjVDVF3HfyKxtXdTkVqxWzxtgeY
Next: 6ZYEWT36y8HhEf4MuifTYHDQt2SqYvpZgxyTNooAXeBP

Diff: 
Old New Differences
4 4  let kActive = "active"
5 5  
6 6  let kActiveGlob = "active_all_contracts"
7 - 
8 - let kDeprecatedPool = "deprecated_"
9 7  
10 8  let kCause = "shutdown_cause"
11 9  
14 12  let kRewardPoolFractionPrevious = "_previous_pool_fraction_reward"
15 13  
16 14  let kHeightPoolFraction = "_pool_reward_update_height"
17 - 
18 - let kTotalRewardPerBlockCurrent = "total_reward_per_block_current"
19 - 
20 - let kTotalRewardPerBlockPrevious = "total_reward_per_block_previous"
21 15  
22 16  let kRewardUpdateHeight = "reward_update_height"
23 17  
54 48  let kSWOPid = "SWOP_id"
55 49  
56 50  let kAvailableSWOP = "_available_SWOP"
57 - 
58 - let kSwopYearEmission = "swop_year_emission"
59 51  
60 52  let kHarvestPoolVote = "_harvest_pool_vote_gSWOP"
61 53  
105 97  
106 98  let defPoolBoostCoef = 500
107 99  
108 - let bStartH = 3397850
100 + let startEmissionH = 1911271
101 + 
102 + let swopYearEmission = 100000000000000
103 + 
104 + let blocksPerYear = 526330
109 105  
110 106  func getBase58FromOracle (key) = match getString(oracle, key) {
111 107      case string: String => 
140 136  let activeGlob = valueOrElse(getBoolean(oracle, kActiveGlob), true)
141 137  
142 138  let SWOP = fromBase58String(getStringValue(this, kSWOPid))
139 + 
140 + func getRewardsPerBlockInfo () = {
141 +     let emissionPeriods = ((height - startEmissionH) / blocksPerYear)
142 +     func calcEmission (acc,i) =     {
143 +         let $t047104747 = acc
144 +         let curEmission = $t047104747._1
145 +         let prevEmission = $t047104747._2
146 +         if ((emissionPeriods > i))
147 +             then $Tuple2(fraction(curEmission, 75, 100), curEmission)
148 +             else $Tuple2(curEmission, prevEmission)
149 +         }
150 + 
151 +     let $t049055071 = {
152 +         let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
153 +         let $s = size($l)
154 +         let $acc0 = $Tuple2(swopYearEmission, swopYearEmission)
155 +         func $f0_1 ($a,$i) =         if (($i >= $s))
156 +             then $a
157 +             else calcEmission($a, $l[$i])
158 + 
159 +         func $f0_2 ($a,$i) =         if (($i >= $s))
160 +             then $a
161 +             else throw("List size exceeds 20")
162 + 
163 +         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
164 +         }
165 +     let curEmission = $t049055071._1
166 +     let prevEmission = $t049055071._2
167 +     $Tuple3((curEmission / blocksPerYear), (prevEmission / blocksPerYear), (startEmissionH + (blocksPerYear * emissionPeriods)))
168 +     }
169 + 
143 170  
144 171  func getHeightFirstHarvest (pool) = valueOrElse(getInteger(Address(fromBase58String(pool)), kFirstHarvestHeight), 0)
145 172  
181 208  
182 209  
183 210  func rewardInfo (pool) = {
184 -     let totalRewardPerBlockCurrent = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockCurrent), ((("No data on the key: " + kTotalRewardPerBlockCurrent) + " at address ") + toString(govAddress)))
185 -     let totalRewardPerBlockPrevious = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockPrevious), ((("No data on the key: " + kTotalRewardPerBlockPrevious) + " at address ") + toString(govAddress)))
211 +     let $t068867001 = getRewardsPerBlockInfo()
212 +     let totalRewardPerBlockCurrent = $t068867001._1
213 +     let totalRewardPerBlockPrevious = $t068867001._2
214 +     let lastEmissionUpdateHeight = $t068867001._3
186 215      let rewardPoolFractionCurrent = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionCurrent)), (((("No data on the key: " + pool) + kRewardPoolFractionCurrent) + " at address ") + toString(govAddress)))
187 216      let rewardUpdateHeight = valueOrErrorMessage(getInteger(govAddress, kRewardUpdateHeight), ((("No data on the key: " + kRewardUpdateHeight) + " at address ") + toString(govAddress)))
188 217      let poolRewardUpdateHeight = valueOrElse(getInteger(govAddress, (pool + kHeightPoolFraction)), rewardUpdateHeight)
189 218      let rewardPoolFractionPrevious = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionPrevious)), (((("No data on the key: " + pool) + kRewardPoolFractionPrevious) + " at address ") + toString(govAddress)))
190 219      let rewardPoolCurrent = fraction(totalRewardPerBlockCurrent, rewardPoolFractionCurrent, totalVoteShare)
191 220      let rewardPoolPrevious = fraction(totalRewardPerBlockCurrent, rewardPoolFractionPrevious, totalVoteShare)
221 +     let rewardPoolPrevCurrent = fraction(totalRewardPerBlockPrevious, rewardPoolFractionCurrent, totalVoteShare)
222 +     let rewardPoolPrevPrevious = fraction(totalRewardPerBlockPrevious, rewardPoolFractionPrevious, totalVoteShare)
192 223      if (if ((rewardPoolCurrent > totalRewardPerBlockCurrent))
193 224          then true
194 225          else (rewardPoolPrevious > totalRewardPerBlockPrevious))
195 226          then throw("rewardPoolCurrent > totalRewardPerBlockCurrent or rewardPoolPrevious > totalRewardPerBlockPrevious")
196 -         else $Tuple4(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight)
227 +         else $Tuple7(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight, lastEmissionUpdateHeight, rewardPoolPrevCurrent, rewardPoolPrevPrevious)
197 228      }
198 229  
199 230  
217 248      }
218 249  
219 250  
220 - func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue) = {
221 -     let $t0951610689 = if (if (if ((rewardUpdateHeight > height))
251 + func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue,toHeight) = {
252 +     let $t01001511200 = if (if (if ((rewardUpdateHeight > toHeight))
222 253          then (rewardUpdateHeight == poolRewardUpdateHeight)
223 254          else false)
224 255          then true
225 -         else if ((height > rewardUpdateHeight))
256 +         else if ((toHeight > rewardUpdateHeight))
226 257              then (rewardUpdateHeight != poolRewardUpdateHeight)
227 258              else false)
228 259          then {
229 -             let r = (previousRewardPerBlock * (height - lastInterestHeight))
260 +             let r = (previousRewardPerBlock * (toHeight - lastInterestHeight))
230 261              $Tuple3(r, farmInterest, boostInterest)
231 262              }
232 -         else if (if (if ((height > rewardUpdateHeight))
263 +         else if (if (if ((toHeight > rewardUpdateHeight))
233 264              then (rewardUpdateHeight == poolRewardUpdateHeight)
234 265              else false)
235 266              then (lastInterestHeight > rewardUpdateHeight)
236 267              else false)
237 268              then {
238 -                 let r = (currentRewardPerBlock * (height - lastInterestHeight))
269 +                 let r = (currentRewardPerBlock * (toHeight - lastInterestHeight))
239 270                  $Tuple3(r, farmInterest, boostInterest)
240 271                  }
241 272              else {
244 275                  let bBfrUp = (boostInterest + (if ((poolVoted > 0))
245 276                      then fraction(calcBoostRwd(pool, rwdBfrUpd), scaleValue8, poolVoted)
246 277                      else 0))
247 -                 let rwd = (currentRewardPerBlock * (height - rewardUpdateHeight))
278 +                 let rwd = (currentRewardPerBlock * (toHeight - rewardUpdateHeight))
248 279                  $Tuple3(rwd, fBfrUp, bBfrUp)
249 280                  }
250 -     let reward = $t0951610689._1
251 -     let farmIntrBefore = $t0951610689._2
252 -     let boostIntrBefore = $t0951610689._3
281 +     let reward = $t01001511200._1
282 +     let farmIntrBefore = $t01001511200._2
283 +     let boostIntrBefore = $t01001511200._3
253 284      let newFarmInterest = (farmIntrBefore + fraction(calcFarmRwd(pool, reward), scaleValue, shareTokenLocked))
254 285      let newBoostInterest = (boostIntrBefore + (if ((poolVoted > 0))
255 286          then fraction(calcBoostRwd(pool, reward), scaleValue8, poolVoted)
265 296      let shareToken = getTotalShareToken(pool)
266 297      let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), shareToken)
267 298      let stratBFarmInterest = valueOrElse(getInteger(this, (pool + kStratBFarmInterest)), 0)
268 -     let $t01152711608 = getLastInterestInfo(pool)
269 -     let lastInterestHeight = $t01152711608._1
270 -     let farmInterest = $t01152711608._2
271 -     let boostInterest = $t01152711608._3
272 -     let $t01161311727 = rewardInfo(pool)
273 -     let currentRewardPerBlock = $t01161311727._1
274 -     let rewardUpdateHeight = $t01161311727._2
275 -     let previousRewardPerBlock = $t01161311727._3
276 -     let poolRewardUpdateHeight = $t01161311727._4
299 +     let $t01203812119 = getLastInterestInfo(pool)
300 +     let lastInterestHeight = $t01203812119._1
301 +     let farmInterest = $t01203812119._2
302 +     let boostInterest = $t01203812119._3
303 +     let $t01212412381 = rewardInfo(pool)
304 +     let currentRewardPerBlock = $t01212412381._1
305 +     let rewardUpdateHeight = $t01212412381._2
306 +     let previousRewardPerBlock = $t01212412381._3
307 +     let poolRewardUpdateHeight = $t01212412381._4
308 +     let emissionUpdateHeight = $t01212412381._5
309 +     let prevCurrentRewardPerBlock = $t01212412381._6
310 +     let prevPreviousRewardPerBlock = $t01212412381._7
277 311      let uFarmInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kFarmUserLastInterest)), farmInterest)
278 312      let uBoostInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kBoostUserLastInterest)), if (if ((stratBFarmInterest > uFarmInterest))
279 313          then (uPoolVoted > 0)
284 318      let uShareTokensVirt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), uShareTokensStaked)
285 319      if ((totalShareVirtual == 0))
286 320          then {
287 -             let toTreasury = (currentRewardPerBlock * (height - lastInterestHeight))
321 +             let toTreasury = if ((emissionUpdateHeight > lastInterestHeight))
322 +                 then ((prevCurrentRewardPerBlock * (emissionUpdateHeight - lastInterestHeight)) + (currentRewardPerBlock * (height - emissionUpdateHeight)))
323 +                 else (currentRewardPerBlock * (height - lastInterestHeight))
288 324              $Tuple4(farmInterest, boostInterest, 0, toTreasury)
289 325              }
290 326          else {
291 -             let $t01244012832 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue)
292 -             let newFarmInterest = $t01244012832._1
293 -             let newBoostInterest = $t01244012832._2
327 +             let $t01333914476 = if ((emissionUpdateHeight > lastInterestHeight))
328 +                 then {
329 +                     let $t01375214311 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, prevCurrentRewardPerBlock, totalShareVirtual, prevPreviousRewardPerBlock, scaleValue, emissionUpdateHeight)
330 +                     let prevNewFarmInterest = $t01375214311._1
331 +                     let prevNewBoostInterest = $t01375214311._2
332 +                     $Tuple3(prevNewFarmInterest, prevNewBoostInterest, emissionUpdateHeight)
333 +                     }
334 +                 else $Tuple3(farmInterest, boostInterest, lastInterestHeight)
335 +             let prevFarmInterest = $t01333914476._1
336 +             let prevBoostInterest = $t01333914476._2
337 +             let LIHeight = $t01333914476._3
338 +             let $t01448514908 = calcInterest(pool, LIHeight, rewardUpdateHeight, poolRewardUpdateHeight, prevFarmInterest, prevBoostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue, height)
339 +             let newFarmInterest = $t01448514908._1
340 +             let newBoostInterest = $t01448514908._2
294 341              let farmRwd = fraction(uShareTokensVirt, (newFarmInterest - uFarmInterest), scaleValue)
295 342              let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
296 343              let boostRwdMax = fraction(fraction(uShareTokensVirt, (newFarmInterest - max([uFarmInterest, stratBFarmInterest])), scaleValue), poolBoostCoef, lockBoostCoefScale)
306 353  
307 354  func availableClaimCalcAllByUser (pools,user) = {
308 355      func calcAvailable (acc,pool) =     {
309 -         let $t01370113730 = acc
310 -         let newPools = $t01370113730._1
311 -         let amounts = $t01370113730._2
312 -         let $t01373913792 = claimCalc(pool, user)
313 -         let fi = $t01373913792._1
314 -         let bi = $t01373913792._2
315 -         let claimAmount = $t01373913792._3
316 -         let tt = $t01373913792._4
356 +         let $t01577715806 = acc
357 +         let newPools = $t01577715806._1
358 +         let amounts = $t01577715806._2
359 +         let $t01581515868 = claimCalc(pool, user)
360 +         let fi = $t01581515868._1
361 +         let bi = $t01581515868._2
362 +         let claimAmount = $t01581515868._3
363 +         let tt = $t01581515868._4
317 364          let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
318 365          $Tuple2((newPools :+ pool), (amounts :+ availableFund))
319 366          }
378 425      else throw("Only pool can call this function")
379 426  
380 427  
381 - func getDeprecatedPool (pool) = valueOrElse(getBoolean(oracle, (kDeprecatedPool + pool)), false)
382 - 
383 - 
384 - func isDeprecatedPool (pool) = if (!(getDeprecatedPool(pool)))
385 -     then unit
386 -     else throw("Pool is deprecated. Only unlock action allowed.")
387 - 
388 - 
389 428  func isSelfCall (i) = if ((i.caller == this))
390 429      then unit
391 430      else throw("Only contract itself can call this function")
401 440      let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
402 441      let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
403 442      let totalUserShareTokens = ((userStakedAmount + userLockedAmount) + i.payments[0].amount)
404 -     let $t01684116893 = getLockParams(lockType)
405 -     let lockPeriod = $t01684116893._1
406 -     let lockCoef = $t01684116893._2
443 +     let $t01866918721 = getLockParams(lockType)
444 +     let lockPeriod = $t01866918721._1
445 +     let lockCoef = $t01866918721._2
407 446      let lockWavesFee = getIntegerValue(this, kLockWavesFee)
408 447      if ((i.payments[0].assetId != shareAssetId))
409 448          then throw("Wrong sharetoken in payment")
415 454                      let shareTokensChangeOnFH = canLockInFirstHarvest(pool, user, userStakedAmount, i.payments[0].amount, lockType)
416 455                      if ((shareTokensChangeOnFH == shareTokensChangeOnFH))
417 456                          then {
418 -                             let $t01732019254 = if ((lockType == 0))
457 +                             let $t01914821082 = if ((lockType == 0))
419 458                                  then {
420 459                                      let userAmountVirtualNew = ((userAmountVirtual + i.payments[0].amount) - shareTokensChangeOnFH)
421 460                                      $Tuple2([IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), ((userStakedAmount + i.payments[0].amount) - shareTokensChangeOnFH)), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual + i.payments[0].amount) - shareTokensChangeOnFH)), ScriptTransfer(caller, shareTokensChangeOnFH, i.payments[0].assetId)], ((totalShare + i.payments[0].amount) - shareTokensChangeOnFH))
436 475                                              let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmount)
437 476                                              $Tuple2([IntegerEntry((((pool + "_") + user) + kUserShareTokensLocked), userLockedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedHeight), userLockedHeigtNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedType), lockType), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userAmountVirtualNew))], (totalShare + i.payments[0].amount))
438 477                                              }
439 -                             let lockEntries = $t01732019254._1
440 -                             let totalShareNew = $t01732019254._2
478 +                             let lockEntries = $t01914821082._1
479 +                             let totalShareNew = $t01914821082._2
441 480                              if ((accountBalance(shareAssetId) > totalShareNew))
442 481                                  then throw("Balance of share-token is lower than totalAmount")
443 482                                  else {
444 -                                     let $t01937919461 = claimCalc(pool, user)
445 -                                     let farmInterest = $t01937919461._1
446 -                                     let boostInterest = $t01937919461._2
447 -                                     let claimAmount = $t01937919461._3
448 -                                     let toTreasure = $t01937919461._4
483 +                                     let $t02120721289 = claimCalc(pool, user)
484 +                                     let farmInterest = $t02120721289._1
485 +                                     let boostInterest = $t02120721289._2
486 +                                     let claimAmount = $t02120721289._3
487 +                                     let toTreasure = $t02120721289._4
449 488                                      let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
450 489                                      let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
451 490                                          then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, totalUserShareTokens], nil)
460 499      }
461 500  
462 501  
463 - func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = {
464 -     let inv = if (getDeprecatedPool(pool))
465 -         then invoke(this, "unlockUserLockDeprecated", [pool, toString(caller)], nil)
466 -         else 0
467 -     if ((inv == inv))
468 -         then {
469 -             let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
470 -             let user = toString(caller)
471 -             let $t02075820840 = claimCalc(pool, user)
472 -             let farmInterest = $t02075820840._1
473 -             let boostInterest = $t02075820840._2
474 -             let claimAmount = $t02075820840._3
475 -             let toTreasure = $t02075820840._4
476 -             let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
477 -             let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
478 -             let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
479 -             let userStakedAmountNew = (userStakedAmount - shareTokensWithdrawAmount)
480 -             let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
481 -             let totalShareAmount = getTotalShareToken(pool)
482 -             let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShareAmount)
483 -             let totalShareAmountNew = (totalShareAmount - shareTokensWithdrawAmount)
484 -             let totalShareVirtualNew = (totalShareVirtual - shareTokensWithdrawAmount)
485 -             let userAmountVirtualNew = (userAmountVirtual - shareTokensWithdrawAmount)
486 -             if ((shareTokensWithdrawAmount > userStakedAmount))
487 -                 then throw("Withdraw amount more then user locked amount")
488 -                 else if ((accountBalance(shareTokensId) > totalShareAmount))
489 -                     then throw("Balance of share-token is lower than totalAmount")
490 -                     else {
491 -                         let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
492 -                             then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, (userStakedAmount + userLockedAmount)], nil)
493 -                             else 0
494 -                         if ((uplp == uplp))
495 -                             then [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTotalShareTokens), totalShareAmountNew), IntegerEntry((pool + kShareTokensVirtual), totalShareVirtualNew), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
496 -                             else throw("Strict value is not equal to itself.")
497 -                         }
498 -             }
499 -         else throw("Strict value is not equal to itself.")
500 -     }
502 + func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = valueOrElse(isActive(), {
503 +     let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
504 +     let user = toString(caller)
505 +     let $t02248122563 = claimCalc(pool, user)
506 +     let farmInterest = $t02248122563._1
507 +     let boostInterest = $t02248122563._2
508 +     let claimAmount = $t02248122563._3
509 +     let toTreasure = $t02248122563._4
510 +     let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
511 +     let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
512 +     let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
513 +     let userStakedAmountNew = (userStakedAmount - shareTokensWithdrawAmount)
514 +     let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
515 +     let totalShareAmount = getTotalShareToken(pool)
516 +     let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShareAmount)
517 +     let totalShareAmountNew = (totalShareAmount - shareTokensWithdrawAmount)
518 +     let totalShareVirtualNew = (totalShareVirtual - shareTokensWithdrawAmount)
519 +     let userAmountVirtualNew = (userAmountVirtual - shareTokensWithdrawAmount)
520 +     if ((shareTokensWithdrawAmount > userStakedAmount))
521 +         then throw("Withdraw amount more then user locked amount")
522 +         else if ((accountBalance(shareTokensId) > totalShareAmount))
523 +             then throw("Balance of share-token is lower than totalAmount")
524 +             else {
525 +                 let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
526 +                     then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, (userStakedAmount + userLockedAmount)], nil)
527 +                     else 0
528 +                 if ((uplp == uplp))
529 +                     then [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTotalShareTokens), totalShareAmountNew), IntegerEntry((pool + kShareTokensVirtual), totalShareVirtualNew), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
530 +                     else throw("Strict value is not equal to itself.")
531 +                 }
532 +     })
501 533  
502 534  
503 535  func calcClaim (i,pool,caller) = {
504 536      let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
505 537      let user = toString(caller)
506 538      let shareTokenLocked = getTotalShareToken(pool)
507 -     let $t02335123433 = claimCalc(pool, user)
508 -     let farmInterest = $t02335123433._1
509 -     let boostInterest = $t02335123433._2
510 -     let claimAmount = $t02335123433._3
511 -     let toTreasure = $t02335123433._4
539 +     let $t02507625158 = claimCalc(pool, user)
540 +     let farmInterest = $t02507625158._1
541 +     let boostInterest = $t02507625158._2
542 +     let claimAmount = $t02507625158._3
543 +     let toTreasure = $t02507625158._4
512 544      let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
513 545      if ((accountBalance(shareTokensId) > shareTokenLocked))
514 546          then throw("Balance of share-token is lower than totalAmount")
518 550                  else nil
519 551              $Tuple2(([IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), 0), Reissue(SWOP, (toTreasure + availableFund), true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)] ++ uTrans), availableFund)
520 552              }
521 -     }
522 - 
523 - 
524 - func unlockUserLockCalc (i,pool,user) = {
525 -     let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
526 -     let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
527 -     let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
528 -     let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
529 -     let userStakedAmountNew = (userStakedAmount + userLockedAmount)
530 -     let $t02483624918 = claimCalc(pool, user)
531 -     let farmInterest = $t02483624918._1
532 -     let boostInterest = $t02483624918._2
533 -     let claimAmount = $t02483624918._3
534 -     let toTreasure = $t02483624918._4
535 -     let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
536 - [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userStakedAmountNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userStakedAmountNew)), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), DeleteEntry((((pool + "_") + user) + kUserShareTokensLocked)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedHeight)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedType)), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
537 553      }
538 554  
539 555  
559 575      then throw("Only Governance can call this function")
560 576      else {
561 577          let user = toString(addressFromPublicKey(adminInvokePubKey))
562 -         let $t02708427158 = claimCalc(pool, user)
563 -         let farmInterest = $t02708427158._1
564 -         let boostInterest = $t02708427158._2
565 -         let boostLPinterest = $t02708427158._3
578 +         let $t02703527109 = claimCalc(pool, user)
579 +         let farmInterest = $t02703527109._1
580 +         let boostInterest = $t02703527109._2
581 +         let boostLPinterest = $t02703527109._3
566 582  [IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height)]
567 583          })
568 584  
569 585  
570 586  
571 587  @Callable(i)
572 - func lockShareTokens (pool,lockType) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType)))
588 + func lockShareTokens (pool,lockType) = valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType))
573 589  
574 590  
575 591  
576 592  @Callable(i)
577 - func lockShareTokensFromPool (callerBytes,pool,lockType) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType))))
593 + func lockShareTokensFromPool (callerBytes,pool,lockType) = valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType)))
578 594  
579 595  
580 596  
581 597  @Callable(i)
582 - func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), {
598 + func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(isActive(), {
583 599      let shareAssetId = getShareAssetId(pool)
584 600      let user = toString(i.caller)
585 601      let totalShare = getTotalShareToken(pool)
589 605      let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
590 606      let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
591 607      let totalUserShareTokens = (userStakedAmount + userLockedAmount)
592 -     let $t02878728839 = getLockParams(lockType)
593 -     let lockPeriod = $t02878728839._1
594 -     let lockCoef = $t02878728839._2
608 +     let $t02852828580 = getLockParams(lockType)
609 +     let lockPeriod = $t02852828580._1
610 +     let lockCoef = $t02852828580._2
595 611      let lockWavesFee = getIntegerValue(this, kLockWavesFee)
596 612      if ((getHeightFirstHarvest(pool) > height))
597 613          then throw("You can't lock shareTokens till first harvest end.")
622 638                                          let userStakedAmountNew = (userStakedAmount - lockAmount)
623 639                                          let userLockedHeigtNew = (height + lockPeriod)
624 640                                          let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmountNew)
625 -                                         let $t03018530267 = claimCalc(pool, user)
626 -                                         let farmInterest = $t03018530267._1
627 -                                         let boostInterest = $t03018530267._2
628 -                                         let claimAmount = $t03018530267._3
629 -                                         let toTreasure = $t03018530267._4
641 +                                         let $t02987029952 = claimCalc(pool, user)
642 +                                         let farmInterest = $t02987029952._1
643 +                                         let boostInterest = $t02987029952._2
644 +                                         let claimAmount = $t02987029952._3
645 +                                         let toTreasure = $t02987029952._4
630 646                                          let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
631 647  [IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLocked), userLockedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedHeight), userLockedHeigtNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedType), lockType), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userAmountVirtualNew)), IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
632 648                                          }
633 -     }))
649 +     })
634 650  
635 651  
636 652  
637 653  @Callable(i)
638 654  func unlockUserLock (pool,user) = valueOrElse(isActive(), {
655 +     let lockWavesFee = getIntegerValue(this, kLockWavesFee)
639 656      let userLockedHeigt = valueOrErrorMessage(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), (((("There is no pool " + pool) + " or user ") + user) + "with lock"))
657 +     let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
658 +     let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
659 +     let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
660 +     let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
640 661      if ((userLockedHeigt > height))
641 662          then throw(("You can't unlock sharetokens till " + toString(userLockedHeigt)))
642 -         else (unlockUserLockCalc(i, pool, user) ++ [ScriptTransfer(i.caller, getIntegerValue(this, kLockWavesFee), unit)])
663 +         else {
664 +             let userStakedAmountNew = (userStakedAmount + userLockedAmount)
665 +             let $t03202932111 = claimCalc(pool, user)
666 +             let farmInterest = $t03202932111._1
667 +             let boostInterest = $t03202932111._2
668 +             let claimAmount = $t03202932111._3
669 +             let toTreasure = $t03202932111._4
670 +             let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
671 + [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userStakedAmountNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userStakedAmountNew)), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), DeleteEntry((((pool + "_") + user) + kUserShareTokensLocked)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedHeight)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedType)), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, lockWavesFee, unit)]
672 +             }
643 673      })
644 - 
645 - 
646 - 
647 - @Callable(i)
648 - func unlockUserLockDeprecated (pool,user) = valueOrElse(isActive(), valueOrElse(isSelfCall(i), if (!(getDeprecatedPool(pool)))
649 -     then throw("Pool must be deprecated")
650 -     else if (isDefined(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight))))
651 -         then (unlockUserLockCalc(i, pool, user) ++ [ScriptTransfer(moneyBoxAddress, getIntegerValue(this, kLockWavesFee), unit)])
652 -         else nil))
653 674  
654 675  
655 676  
779 800  func updateUserBoostInterest (pool,user) = valueOrElse(isActive(), if ((i.caller != votingAddress))
780 801      then throw("Only voiting can call this function")
781 802      else {
782 -         let $t03501635098 = claimCalc(pool, user)
783 -         let farmInterest = $t03501635098._1
784 -         let boostInterest = $t03501635098._2
785 -         let claimAmount = $t03501635098._3
786 -         let toTreasure = $t03501635098._4
803 +         let $t03558535667 = claimCalc(pool, user)
804 +         let farmInterest = $t03558535667._1
805 +         let boostInterest = $t03558535667._2
806 +         let claimAmount = $t03558535667._3
807 +         let toTreasure = $t03558535667._4
787 808          let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
788 809  [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
789 810          })
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let kActive = "active"
5 5  
6 6  let kActiveGlob = "active_all_contracts"
7 - 
8 - let kDeprecatedPool = "deprecated_"
9 7  
10 8  let kCause = "shutdown_cause"
11 9  
12 10  let kRewardPoolFractionCurrent = "_current_pool_fraction_reward"
13 11  
14 12  let kRewardPoolFractionPrevious = "_previous_pool_fraction_reward"
15 13  
16 14  let kHeightPoolFraction = "_pool_reward_update_height"
17 - 
18 - let kTotalRewardPerBlockCurrent = "total_reward_per_block_current"
19 - 
20 - let kTotalRewardPerBlockPrevious = "total_reward_per_block_previous"
21 15  
22 16  let kRewardUpdateHeight = "reward_update_height"
23 17  
24 18  let kUserShareTokensStaked = "_share_tokens_locked"
25 19  
26 20  let kUserShareTokensLocked = "_share_tokens_blocked"
27 21  
28 22  let kUserShareTokensLockedType = "_share_tokens_blocked_type"
29 23  
30 24  let kUserShareTokensLockedHeight = "_share_tokens_blocked_height"
31 25  
32 26  let kUserShareTokensVirtual = "_share_tokens_virtual"
33 27  
34 28  let kShareTotalShareTokens = "_total_share_tokens_locked"
35 29  
36 30  let kShareTokensVirtual = "_total_share_tokens_virtual"
37 31  
38 32  let kLockParams = "_lock_params"
39 33  
40 34  let kLockWavesFee = "lock_waves_fee"
41 35  
42 36  let kPoolBoostCoef = "_boost_coef"
43 37  
44 38  let kFarmLastInterest = "_last_interest"
45 39  
46 40  let kFarmUserLastInterest = "_last_interest"
47 41  
48 42  let kBoostLastInterest = "_last_interest_b"
49 43  
50 44  let kBoostUserLastInterest = "_last_interest_u_b"
51 45  
52 46  let kLastInterestHeight = "_last_interest_height"
53 47  
54 48  let kSWOPid = "SWOP_id"
55 49  
56 50  let kAvailableSWOP = "_available_SWOP"
57 - 
58 - let kSwopYearEmission = "swop_year_emission"
59 51  
60 52  let kHarvestPoolVote = "_harvest_pool_vote_gSWOP"
61 53  
62 54  let kPoolVote = "_pool_vote_gSWOP"
63 55  
64 56  let kUserPoolVote = "_user_vote_gSWOP"
65 57  
66 58  let kPoolStruc = "_pool_struc"
67 59  
68 60  let kUserPoolStruc = "_user_pool_struc"
69 61  
70 62  let kHarvestUserPoolVote = "_harvest_user_pool_vote_gSWOP"
71 63  
72 64  let kFirstHarvestHeight = "first_harvest_height"
73 65  
74 66  let kShareLimitFH = "share_limit_on_first_harvest"
75 67  
76 68  let kStratBFarmInterest = "_strat_b_farm_interest"
77 69  
78 70  let kCpmmContract = "cpmm_contract"
79 71  
80 72  let kAdminPubKey1 = "admin_pub_1"
81 73  
82 74  let kAdminPubKey2 = "admin_pub_2"
83 75  
84 76  let kAdminPubKey3 = "admin_pub_3"
85 77  
86 78  let kAdminInvokePubKey = "admin_invoke_pub"
87 79  
88 80  let kMoneyBoxAddress = "money_box_address"
89 81  
90 82  let kVotingAddress = "voting_address"
91 83  
92 84  let kGovAddress = "governance_address"
93 85  
94 86  let kLPFarmingAddress = "lp_farming"
95 87  
96 88  let kFarmingTreasureAddr = "farming_treasure"
97 89  
98 90  let oracle = Address(base58'3MvVBtsXroQpy1tsPw21TU2ET9A8WfmrNjz')
99 91  
100 92  let totalVoteShare = 10000000000
101 93  
102 94  let scaleValue8 = 100000000
103 95  
104 96  let lockBoostCoefScale = 1000
105 97  
106 98  let defPoolBoostCoef = 500
107 99  
108 - let bStartH = 3397850
100 + let startEmissionH = 1911271
101 + 
102 + let swopYearEmission = 100000000000000
103 + 
104 + let blocksPerYear = 526330
109 105  
110 106  func getBase58FromOracle (key) = match getString(oracle, key) {
111 107      case string: String => 
112 108          fromBase58String(string)
113 109      case nothing => 
114 110          throw((key + "is empty"))
115 111  }
116 112  
117 113  
118 114  let adminPubKey1 = getBase58FromOracle(kAdminPubKey1)
119 115  
120 116  let adminPubKey2 = getBase58FromOracle(kAdminPubKey2)
121 117  
122 118  let adminPubKey3 = getBase58FromOracle(kAdminPubKey3)
123 119  
124 120  let moneyBoxAddress = Address(getBase58FromOracle(kMoneyBoxAddress))
125 121  
126 122  let votingAddress = Address(getBase58FromOracle(kVotingAddress))
127 123  
128 124  let govAddress = Address(getBase58FromOracle(kGovAddress))
129 125  
130 126  let adminInvokePubKey = getBase58FromOracle(kAdminInvokePubKey)
131 127  
132 128  let lpFarmingAddress = Address(getBase58FromOracle(kLPFarmingAddress))
133 129  
134 130  let farmingTreasureAddr = Address(getBase58FromOracle(kFarmingTreasureAddr))
135 131  
136 132  let cpmmContract = Address(getBase58FromOracle(kCpmmContract))
137 133  
138 134  let active = getBooleanValue(this, kActive)
139 135  
140 136  let activeGlob = valueOrElse(getBoolean(oracle, kActiveGlob), true)
141 137  
142 138  let SWOP = fromBase58String(getStringValue(this, kSWOPid))
139 + 
140 + func getRewardsPerBlockInfo () = {
141 +     let emissionPeriods = ((height - startEmissionH) / blocksPerYear)
142 +     func calcEmission (acc,i) =     {
143 +         let $t047104747 = acc
144 +         let curEmission = $t047104747._1
145 +         let prevEmission = $t047104747._2
146 +         if ((emissionPeriods > i))
147 +             then $Tuple2(fraction(curEmission, 75, 100), curEmission)
148 +             else $Tuple2(curEmission, prevEmission)
149 +         }
150 + 
151 +     let $t049055071 = {
152 +         let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
153 +         let $s = size($l)
154 +         let $acc0 = $Tuple2(swopYearEmission, swopYearEmission)
155 +         func $f0_1 ($a,$i) =         if (($i >= $s))
156 +             then $a
157 +             else calcEmission($a, $l[$i])
158 + 
159 +         func $f0_2 ($a,$i) =         if (($i >= $s))
160 +             then $a
161 +             else throw("List size exceeds 20")
162 + 
163 +         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
164 +         }
165 +     let curEmission = $t049055071._1
166 +     let prevEmission = $t049055071._2
167 +     $Tuple3((curEmission / blocksPerYear), (prevEmission / blocksPerYear), (startEmissionH + (blocksPerYear * emissionPeriods)))
168 +     }
169 + 
143 170  
144 171  func getHeightFirstHarvest (pool) = valueOrElse(getInteger(Address(fromBase58String(pool)), kFirstHarvestHeight), 0)
145 172  
146 173  
147 174  func getFHShareLimitToken (pool) = valueOrErrorMessage(getInteger(pool, kShareLimitFH), ("No data on the key: " + kShareLimitFH))
148 175  
149 176  
150 177  func getTotalShareToken (pool) = valueOrErrorMessage(getInteger(this, (pool + kShareTotalShareTokens)), (("No data on the key: " + pool) + kShareTotalShareTokens))
151 178  
152 179  
153 180  func getPoolVoted (pool) = valueOrElse(getInteger(votingAddress, (pool + kPoolVote)), valueOrElse(parseInt(split(valueOrElse(getString(votingAddress, (pool + kPoolStruc)), ""), "_")[0]), 0))
154 181  
155 182  
156 183  func getUserPoolVoted (pool,user) = valueOrElse(getInteger(votingAddress, (((user + "_") + pool) + kUserPoolVote)), valueOrElse(parseInt(split(valueOrElse(getString(votingAddress, (((user + "_") + pool) + kUserPoolStruc)), ""), "_")[0]), 0))
157 184  
158 185  
159 186  func getShareAssetId (pool) = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
160 187  
161 188  
162 189  func accountBalance (assetId) = match assetId {
163 190      case id: ByteVector => 
164 191          assetBalance(this, id)
165 192      case waves: Unit => 
166 193          wavesBalance(this).available
167 194      case _ => 
168 195          throw("Match error")
169 196  }
170 197  
171 198  
172 199  func calcScaleValue (assetId1,assetId2) = {
173 200      let assetId1Decimals = value(assetInfo(assetId1)).decimals
174 201      let assetId2Decimals = value(assetInfo(assetId2)).decimals
175 202      let scaleDigits = ((assetId2Decimals - assetId1Decimals) + 8)
176 203      pow(10, 0, scaleDigits, 0, 0, DOWN)
177 204      }
178 205  
179 206  
180 207  func userAvailableSWOP (pool,user) = valueOrElse(getInteger(this, (((pool + "_") + user) + kAvailableSWOP)), 0)
181 208  
182 209  
183 210  func rewardInfo (pool) = {
184 -     let totalRewardPerBlockCurrent = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockCurrent), ((("No data on the key: " + kTotalRewardPerBlockCurrent) + " at address ") + toString(govAddress)))
185 -     let totalRewardPerBlockPrevious = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockPrevious), ((("No data on the key: " + kTotalRewardPerBlockPrevious) + " at address ") + toString(govAddress)))
211 +     let $t068867001 = getRewardsPerBlockInfo()
212 +     let totalRewardPerBlockCurrent = $t068867001._1
213 +     let totalRewardPerBlockPrevious = $t068867001._2
214 +     let lastEmissionUpdateHeight = $t068867001._3
186 215      let rewardPoolFractionCurrent = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionCurrent)), (((("No data on the key: " + pool) + kRewardPoolFractionCurrent) + " at address ") + toString(govAddress)))
187 216      let rewardUpdateHeight = valueOrErrorMessage(getInteger(govAddress, kRewardUpdateHeight), ((("No data on the key: " + kRewardUpdateHeight) + " at address ") + toString(govAddress)))
188 217      let poolRewardUpdateHeight = valueOrElse(getInteger(govAddress, (pool + kHeightPoolFraction)), rewardUpdateHeight)
189 218      let rewardPoolFractionPrevious = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionPrevious)), (((("No data on the key: " + pool) + kRewardPoolFractionPrevious) + " at address ") + toString(govAddress)))
190 219      let rewardPoolCurrent = fraction(totalRewardPerBlockCurrent, rewardPoolFractionCurrent, totalVoteShare)
191 220      let rewardPoolPrevious = fraction(totalRewardPerBlockCurrent, rewardPoolFractionPrevious, totalVoteShare)
221 +     let rewardPoolPrevCurrent = fraction(totalRewardPerBlockPrevious, rewardPoolFractionCurrent, totalVoteShare)
222 +     let rewardPoolPrevPrevious = fraction(totalRewardPerBlockPrevious, rewardPoolFractionPrevious, totalVoteShare)
192 223      if (if ((rewardPoolCurrent > totalRewardPerBlockCurrent))
193 224          then true
194 225          else (rewardPoolPrevious > totalRewardPerBlockPrevious))
195 226          then throw("rewardPoolCurrent > totalRewardPerBlockCurrent or rewardPoolPrevious > totalRewardPerBlockPrevious")
196 -         else $Tuple4(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight)
227 +         else $Tuple7(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight, lastEmissionUpdateHeight, rewardPoolPrevCurrent, rewardPoolPrevPrevious)
197 228      }
198 229  
199 230  
200 231  func getLastInterestInfo (pool) = {
201 232      let farmInterest = valueOrErrorMessage(getInteger(this, (pool + kFarmLastInterest)), (("No data on the key: " + pool) + kFarmLastInterest))
202 233      let boostInterest = valueOrElse(getInteger(this, (pool + kBoostLastInterest)), 0)
203 234      let lastInterestHeight = valueOrElse(getInteger(this, (pool + kLastInterestHeight)), height)
204 235      $Tuple3(lastInterestHeight, farmInterest, boostInterest)
205 236      }
206 237  
207 238  
208 239  func calcFarmRwd (pool,curTotalReward) = {
209 240      let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
210 241      fraction(curTotalReward, lockBoostCoefScale, (poolBoostCoef + lockBoostCoefScale))
211 242      }
212 243  
213 244  
214 245  func calcBoostRwd (pool,curTotalReward) = {
215 246      let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
216 247      fraction(curTotalReward, poolBoostCoef, (poolBoostCoef + lockBoostCoefScale))
217 248      }
218 249  
219 250  
220 - func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue) = {
221 -     let $t0951610689 = if (if (if ((rewardUpdateHeight > height))
251 + func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue,toHeight) = {
252 +     let $t01001511200 = if (if (if ((rewardUpdateHeight > toHeight))
222 253          then (rewardUpdateHeight == poolRewardUpdateHeight)
223 254          else false)
224 255          then true
225 -         else if ((height > rewardUpdateHeight))
256 +         else if ((toHeight > rewardUpdateHeight))
226 257              then (rewardUpdateHeight != poolRewardUpdateHeight)
227 258              else false)
228 259          then {
229 -             let r = (previousRewardPerBlock * (height - lastInterestHeight))
260 +             let r = (previousRewardPerBlock * (toHeight - lastInterestHeight))
230 261              $Tuple3(r, farmInterest, boostInterest)
231 262              }
232 -         else if (if (if ((height > rewardUpdateHeight))
263 +         else if (if (if ((toHeight > rewardUpdateHeight))
233 264              then (rewardUpdateHeight == poolRewardUpdateHeight)
234 265              else false)
235 266              then (lastInterestHeight > rewardUpdateHeight)
236 267              else false)
237 268              then {
238 -                 let r = (currentRewardPerBlock * (height - lastInterestHeight))
269 +                 let r = (currentRewardPerBlock * (toHeight - lastInterestHeight))
239 270                  $Tuple3(r, farmInterest, boostInterest)
240 271                  }
241 272              else {
242 273                  let rwdBfrUpd = (previousRewardPerBlock * (rewardUpdateHeight - lastInterestHeight))
243 274                  let fBfrUp = (farmInterest + fraction(calcFarmRwd(pool, rwdBfrUpd), scaleValue, shareTokenLocked))
244 275                  let bBfrUp = (boostInterest + (if ((poolVoted > 0))
245 276                      then fraction(calcBoostRwd(pool, rwdBfrUpd), scaleValue8, poolVoted)
246 277                      else 0))
247 -                 let rwd = (currentRewardPerBlock * (height - rewardUpdateHeight))
278 +                 let rwd = (currentRewardPerBlock * (toHeight - rewardUpdateHeight))
248 279                  $Tuple3(rwd, fBfrUp, bBfrUp)
249 280                  }
250 -     let reward = $t0951610689._1
251 -     let farmIntrBefore = $t0951610689._2
252 -     let boostIntrBefore = $t0951610689._3
281 +     let reward = $t01001511200._1
282 +     let farmIntrBefore = $t01001511200._2
283 +     let boostIntrBefore = $t01001511200._3
253 284      let newFarmInterest = (farmIntrBefore + fraction(calcFarmRwd(pool, reward), scaleValue, shareTokenLocked))
254 285      let newBoostInterest = (boostIntrBefore + (if ((poolVoted > 0))
255 286          then fraction(calcBoostRwd(pool, reward), scaleValue8, poolVoted)
256 287          else 0))
257 288      $Tuple2(newFarmInterest, newBoostInterest)
258 289      }
259 290  
260 291  
261 292  func claimCalc (pool,user) = {
262 293      let scaleValue = calcScaleValue(SWOP, getShareAssetId(pool))
263 294      let poolVoted = getPoolVoted(pool)
264 295      let uPoolVoted = getUserPoolVoted(pool, user)
265 296      let shareToken = getTotalShareToken(pool)
266 297      let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), shareToken)
267 298      let stratBFarmInterest = valueOrElse(getInteger(this, (pool + kStratBFarmInterest)), 0)
268 -     let $t01152711608 = getLastInterestInfo(pool)
269 -     let lastInterestHeight = $t01152711608._1
270 -     let farmInterest = $t01152711608._2
271 -     let boostInterest = $t01152711608._3
272 -     let $t01161311727 = rewardInfo(pool)
273 -     let currentRewardPerBlock = $t01161311727._1
274 -     let rewardUpdateHeight = $t01161311727._2
275 -     let previousRewardPerBlock = $t01161311727._3
276 -     let poolRewardUpdateHeight = $t01161311727._4
299 +     let $t01203812119 = getLastInterestInfo(pool)
300 +     let lastInterestHeight = $t01203812119._1
301 +     let farmInterest = $t01203812119._2
302 +     let boostInterest = $t01203812119._3
303 +     let $t01212412381 = rewardInfo(pool)
304 +     let currentRewardPerBlock = $t01212412381._1
305 +     let rewardUpdateHeight = $t01212412381._2
306 +     let previousRewardPerBlock = $t01212412381._3
307 +     let poolRewardUpdateHeight = $t01212412381._4
308 +     let emissionUpdateHeight = $t01212412381._5
309 +     let prevCurrentRewardPerBlock = $t01212412381._6
310 +     let prevPreviousRewardPerBlock = $t01212412381._7
277 311      let uFarmInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kFarmUserLastInterest)), farmInterest)
278 312      let uBoostInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kBoostUserLastInterest)), if (if ((stratBFarmInterest > uFarmInterest))
279 313          then (uPoolVoted > 0)
280 314          else false)
281 315          then 0
282 316          else boostInterest)
283 317      let uShareTokensStaked = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
284 318      let uShareTokensVirt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), uShareTokensStaked)
285 319      if ((totalShareVirtual == 0))
286 320          then {
287 -             let toTreasury = (currentRewardPerBlock * (height - lastInterestHeight))
321 +             let toTreasury = if ((emissionUpdateHeight > lastInterestHeight))
322 +                 then ((prevCurrentRewardPerBlock * (emissionUpdateHeight - lastInterestHeight)) + (currentRewardPerBlock * (height - emissionUpdateHeight)))
323 +                 else (currentRewardPerBlock * (height - lastInterestHeight))
288 324              $Tuple4(farmInterest, boostInterest, 0, toTreasury)
289 325              }
290 326          else {
291 -             let $t01244012832 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue)
292 -             let newFarmInterest = $t01244012832._1
293 -             let newBoostInterest = $t01244012832._2
327 +             let $t01333914476 = if ((emissionUpdateHeight > lastInterestHeight))
328 +                 then {
329 +                     let $t01375214311 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, prevCurrentRewardPerBlock, totalShareVirtual, prevPreviousRewardPerBlock, scaleValue, emissionUpdateHeight)
330 +                     let prevNewFarmInterest = $t01375214311._1
331 +                     let prevNewBoostInterest = $t01375214311._2
332 +                     $Tuple3(prevNewFarmInterest, prevNewBoostInterest, emissionUpdateHeight)
333 +                     }
334 +                 else $Tuple3(farmInterest, boostInterest, lastInterestHeight)
335 +             let prevFarmInterest = $t01333914476._1
336 +             let prevBoostInterest = $t01333914476._2
337 +             let LIHeight = $t01333914476._3
338 +             let $t01448514908 = calcInterest(pool, LIHeight, rewardUpdateHeight, poolRewardUpdateHeight, prevFarmInterest, prevBoostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue, height)
339 +             let newFarmInterest = $t01448514908._1
340 +             let newBoostInterest = $t01448514908._2
294 341              let farmRwd = fraction(uShareTokensVirt, (newFarmInterest - uFarmInterest), scaleValue)
295 342              let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
296 343              let boostRwdMax = fraction(fraction(uShareTokensVirt, (newFarmInterest - max([uFarmInterest, stratBFarmInterest])), scaleValue), poolBoostCoef, lockBoostCoefScale)
297 344              let curBoostRwd = fraction((newBoostInterest - uBoostInterest), uPoolVoted, scaleValue8)
298 345              let boostRwd = min([boostRwdMax, curBoostRwd])
299 346              let toTreasury = (boostRwdMax - boostRwd)
300 347              if ((0 > toTreasury))
301 348                  then throw("toTreasury < 0")
302 349                  else $Tuple4(newFarmInterest, newBoostInterest, (farmRwd + boostRwd), toTreasury)
303 350              }
304 351      }
305 352  
306 353  
307 354  func availableClaimCalcAllByUser (pools,user) = {
308 355      func calcAvailable (acc,pool) =     {
309 -         let $t01370113730 = acc
310 -         let newPools = $t01370113730._1
311 -         let amounts = $t01370113730._2
312 -         let $t01373913792 = claimCalc(pool, user)
313 -         let fi = $t01373913792._1
314 -         let bi = $t01373913792._2
315 -         let claimAmount = $t01373913792._3
316 -         let tt = $t01373913792._4
356 +         let $t01577715806 = acc
357 +         let newPools = $t01577715806._1
358 +         let amounts = $t01577715806._2
359 +         let $t01581515868 = claimCalc(pool, user)
360 +         let fi = $t01581515868._1
361 +         let bi = $t01581515868._2
362 +         let claimAmount = $t01581515868._3
363 +         let tt = $t01581515868._4
317 364          let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
318 365          $Tuple2((newPools :+ pool), (amounts :+ availableFund))
319 366          }
320 367  
321 368      let $l = pools
322 369      let $s = size($l)
323 370      let $acc0 = $Tuple2(nil, nil)
324 371      func $f0_1 ($a,$i) =     if (($i >= $s))
325 372          then $a
326 373          else calcAvailable($a, $l[$i])
327 374  
328 375      func $f0_2 ($a,$i) =     if (($i >= $s))
329 376          then $a
330 377          else throw("List size exceeds 60")
331 378  
332 379      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60)
333 380      }
334 381  
335 382  
336 383  func canLockInFirstHarvest (pool,user,userShareTokensStaked,pmtAmount,lockType) = if ((getHeightFirstHarvest(pool) > height))
337 384      then {
338 385          let totalVoteAmount = valueOrElse(getInteger(votingAddress, (pool + kHarvestPoolVote)), 0)
339 386          let userVoteAmount = valueOrElse(getInteger(votingAddress, (((user + "_") + pool) + kHarvestUserPoolVote)), 0)
340 387          let FHShareTokenLimit = getFHShareLimitToken(addressFromStringValue(pool))
341 388          let FHShareTokenUserLimit = (fraction(FHShareTokenLimit, userVoteAmount, totalVoteAmount) - userShareTokensStaked)
342 389          if ((lockType > 0))
343 390              then throw("You can't lock shareTokens till first harvest end.")
344 391              else if ((userVoteAmount == 0))
345 392                  then 0
346 393                  else if ((pmtAmount >= FHShareTokenUserLimit))
347 394                      then (pmtAmount - FHShareTokenUserLimit)
348 395                      else 0
349 396          }
350 397      else 0
351 398  
352 399  
353 400  func getLockParams (type) = {
354 401      let lockParams = split(valueOrErrorMessage(getString(this, (toString(type) + kLockParams)), ("There are no key for lock type" + toString(type))), "_")
355 402      $Tuple2(parseIntValue(lockParams[0]), parseIntValue(lockParams[1]))
356 403      }
357 404  
358 405  
359 406  func suspend (cause) = [BooleanEntry(kActive, false), StringEntry(kCause, cause)]
360 407  
361 408  
362 409  func isActive () = if (if (active)
363 410      then activeGlob
364 411      else false)
365 412      then unit
366 413      else throw("DApp is inactive at this moment")
367 414  
368 415  
369 416  func isAdminCall (i) = if (containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey))
370 417      then unit
371 418      else throw("Only admin can call this function")
372 419  
373 420  
374 421  func isPoolCall (i,pool) = if (if ((toString(i.caller) == pool))
375 422      then true
376 423      else (i.caller == cpmmContract))
377 424      then unit
378 425      else throw("Only pool can call this function")
379 426  
380 427  
381 - func getDeprecatedPool (pool) = valueOrElse(getBoolean(oracle, (kDeprecatedPool + pool)), false)
382 - 
383 - 
384 - func isDeprecatedPool (pool) = if (!(getDeprecatedPool(pool)))
385 -     then unit
386 -     else throw("Pool is deprecated. Only unlock action allowed.")
387 - 
388 - 
389 428  func isSelfCall (i) = if ((i.caller == this))
390 429      then unit
391 430      else throw("Only contract itself can call this function")
392 431  
393 432  
394 433  func calcLockShareTokens (i,caller,pool,lockType) = {
395 434      let shareAssetId = getShareAssetId(pool)
396 435      let user = toString(caller)
397 436      let totalShare = getTotalShareToken(pool)
398 437      let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShare)
399 438      let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
400 439      let userLockedHeigt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), 0)
401 440      let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
402 441      let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
403 442      let totalUserShareTokens = ((userStakedAmount + userLockedAmount) + i.payments[0].amount)
404 -     let $t01684116893 = getLockParams(lockType)
405 -     let lockPeriod = $t01684116893._1
406 -     let lockCoef = $t01684116893._2
443 +     let $t01866918721 = getLockParams(lockType)
444 +     let lockPeriod = $t01866918721._1
445 +     let lockCoef = $t01866918721._2
407 446      let lockWavesFee = getIntegerValue(this, kLockWavesFee)
408 447      if ((i.payments[0].assetId != shareAssetId))
409 448          then throw("Wrong sharetoken in payment")
410 449          else if ((0 >= i.payments[0].amount))
411 450              then throw("Payment amount must be greater than 0")
412 451              else if ((0 > lockType))
413 452                  then throw("lockType must be >= 0")
414 453                  else {
415 454                      let shareTokensChangeOnFH = canLockInFirstHarvest(pool, user, userStakedAmount, i.payments[0].amount, lockType)
416 455                      if ((shareTokensChangeOnFH == shareTokensChangeOnFH))
417 456                          then {
418 -                             let $t01732019254 = if ((lockType == 0))
457 +                             let $t01914821082 = if ((lockType == 0))
419 458                                  then {
420 459                                      let userAmountVirtualNew = ((userAmountVirtual + i.payments[0].amount) - shareTokensChangeOnFH)
421 460                                      $Tuple2([IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), ((userStakedAmount + i.payments[0].amount) - shareTokensChangeOnFH)), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual + i.payments[0].amount) - shareTokensChangeOnFH)), ScriptTransfer(caller, shareTokensChangeOnFH, i.payments[0].assetId)], ((totalShare + i.payments[0].amount) - shareTokensChangeOnFH))
422 461                                      }
423 462                                  else if (if ((userLockedHeigt == 0))
424 463                                      then if (if ((2 > size(i.payments)))
425 464                                          then true
426 465                                          else (i.payments[1].assetId != unit))
427 466                                          then true
428 467                                          else (lockWavesFee > i.payments[1].amount)
429 468                                      else false)
430 469                                      then throw((("You need to pay additional waves comission " + toString(lockWavesFee)) + "WAVES"))
431 470                                      else if ((userLockedHeigt > (height + lockPeriod)))
432 471                                          then throw("You cannot lock sharetokens for a period less than what you have already locked")
433 472                                          else {
434 473                                              let userLockedAmountNew = (userLockedAmount + i.payments[0].amount)
435 474                                              let userLockedHeigtNew = (height + lockPeriod)
436 475                                              let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmount)
437 476                                              $Tuple2([IntegerEntry((((pool + "_") + user) + kUserShareTokensLocked), userLockedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedHeight), userLockedHeigtNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedType), lockType), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userAmountVirtualNew))], (totalShare + i.payments[0].amount))
438 477                                              }
439 -                             let lockEntries = $t01732019254._1
440 -                             let totalShareNew = $t01732019254._2
478 +                             let lockEntries = $t01914821082._1
479 +                             let totalShareNew = $t01914821082._2
441 480                              if ((accountBalance(shareAssetId) > totalShareNew))
442 481                                  then throw("Balance of share-token is lower than totalAmount")
443 482                                  else {
444 -                                     let $t01937919461 = claimCalc(pool, user)
445 -                                     let farmInterest = $t01937919461._1
446 -                                     let boostInterest = $t01937919461._2
447 -                                     let claimAmount = $t01937919461._3
448 -                                     let toTreasure = $t01937919461._4
483 +                                     let $t02120721289 = claimCalc(pool, user)
484 +                                     let farmInterest = $t02120721289._1
485 +                                     let boostInterest = $t02120721289._2
486 +                                     let claimAmount = $t02120721289._3
487 +                                     let toTreasure = $t02120721289._4
449 488                                      let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
450 489                                      let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
451 490                                          then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, totalUserShareTokens], nil)
452 491                                          else 0
453 492                                      if ((uplp == uplp))
454 493                                          then ([IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((pool + kShareTotalShareTokens), totalShareNew), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)] ++ lockEntries)
455 494                                          else throw("Strict value is not equal to itself.")
456 495                                      }
457 496                              }
458 497                          else throw("Strict value is not equal to itself.")
459 498                      }
460 499      }
461 500  
462 501  
463 - func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = {
464 -     let inv = if (getDeprecatedPool(pool))
465 -         then invoke(this, "unlockUserLockDeprecated", [pool, toString(caller)], nil)
466 -         else 0
467 -     if ((inv == inv))
468 -         then {
469 -             let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
470 -             let user = toString(caller)
471 -             let $t02075820840 = claimCalc(pool, user)
472 -             let farmInterest = $t02075820840._1
473 -             let boostInterest = $t02075820840._2
474 -             let claimAmount = $t02075820840._3
475 -             let toTreasure = $t02075820840._4
476 -             let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
477 -             let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
478 -             let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
479 -             let userStakedAmountNew = (userStakedAmount - shareTokensWithdrawAmount)
480 -             let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
481 -             let totalShareAmount = getTotalShareToken(pool)
482 -             let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShareAmount)
483 -             let totalShareAmountNew = (totalShareAmount - shareTokensWithdrawAmount)
484 -             let totalShareVirtualNew = (totalShareVirtual - shareTokensWithdrawAmount)
485 -             let userAmountVirtualNew = (userAmountVirtual - shareTokensWithdrawAmount)
486 -             if ((shareTokensWithdrawAmount > userStakedAmount))
487 -                 then throw("Withdraw amount more then user locked amount")
488 -                 else if ((accountBalance(shareTokensId) > totalShareAmount))
489 -                     then throw("Balance of share-token is lower than totalAmount")
490 -                     else {
491 -                         let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
492 -                             then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, (userStakedAmount + userLockedAmount)], nil)
493 -                             else 0
494 -                         if ((uplp == uplp))
495 -                             then [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTotalShareTokens), totalShareAmountNew), IntegerEntry((pool + kShareTokensVirtual), totalShareVirtualNew), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
496 -                             else throw("Strict value is not equal to itself.")
497 -                         }
498 -             }
499 -         else throw("Strict value is not equal to itself.")
500 -     }
502 + func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = valueOrElse(isActive(), {
503 +     let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
504 +     let user = toString(caller)
505 +     let $t02248122563 = claimCalc(pool, user)
506 +     let farmInterest = $t02248122563._1
507 +     let boostInterest = $t02248122563._2
508 +     let claimAmount = $t02248122563._3
509 +     let toTreasure = $t02248122563._4
510 +     let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
511 +     let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
512 +     let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
513 +     let userStakedAmountNew = (userStakedAmount - shareTokensWithdrawAmount)
514 +     let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
515 +     let totalShareAmount = getTotalShareToken(pool)
516 +     let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShareAmount)
517 +     let totalShareAmountNew = (totalShareAmount - shareTokensWithdrawAmount)
518 +     let totalShareVirtualNew = (totalShareVirtual - shareTokensWithdrawAmount)
519 +     let userAmountVirtualNew = (userAmountVirtual - shareTokensWithdrawAmount)
520 +     if ((shareTokensWithdrawAmount > userStakedAmount))
521 +         then throw("Withdraw amount more then user locked amount")
522 +         else if ((accountBalance(shareTokensId) > totalShareAmount))
523 +             then throw("Balance of share-token is lower than totalAmount")
524 +             else {
525 +                 let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
526 +                     then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, (userStakedAmount + userLockedAmount)], nil)
527 +                     else 0
528 +                 if ((uplp == uplp))
529 +                     then [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTotalShareTokens), totalShareAmountNew), IntegerEntry((pool + kShareTokensVirtual), totalShareVirtualNew), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
530 +                     else throw("Strict value is not equal to itself.")
531 +                 }
532 +     })
501 533  
502 534  
503 535  func calcClaim (i,pool,caller) = {
504 536      let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
505 537      let user = toString(caller)
506 538      let shareTokenLocked = getTotalShareToken(pool)
507 -     let $t02335123433 = claimCalc(pool, user)
508 -     let farmInterest = $t02335123433._1
509 -     let boostInterest = $t02335123433._2
510 -     let claimAmount = $t02335123433._3
511 -     let toTreasure = $t02335123433._4
539 +     let $t02507625158 = claimCalc(pool, user)
540 +     let farmInterest = $t02507625158._1
541 +     let boostInterest = $t02507625158._2
542 +     let claimAmount = $t02507625158._3
543 +     let toTreasure = $t02507625158._4
512 544      let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
513 545      if ((accountBalance(shareTokensId) > shareTokenLocked))
514 546          then throw("Balance of share-token is lower than totalAmount")
515 547          else {
516 548              let uTrans = if ((i.caller != this))
517 549                  then [ScriptTransfer(i.caller, availableFund, SWOP)]
518 550                  else nil
519 551              $Tuple2(([IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), 0), Reissue(SWOP, (toTreasure + availableFund), true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)] ++ uTrans), availableFund)
520 552              }
521 -     }
522 - 
523 - 
524 - func unlockUserLockCalc (i,pool,user) = {
525 -     let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
526 -     let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
527 -     let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
528 -     let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
529 -     let userStakedAmountNew = (userStakedAmount + userLockedAmount)
530 -     let $t02483624918 = claimCalc(pool, user)
531 -     let farmInterest = $t02483624918._1
532 -     let boostInterest = $t02483624918._2
533 -     let claimAmount = $t02483624918._3
534 -     let toTreasure = $t02483624918._4
535 -     let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
536 - [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userStakedAmountNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userStakedAmountNew)), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), DeleteEntry((((pool + "_") + user) + kUserShareTokensLocked)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedHeight)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedType)), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
537 553      }
538 554  
539 555  
540 556  @Callable(i)
541 557  func init (earlyLP) = if (isDefined(getString(this, kSWOPid)))
542 558      then throw("SWOP already initialized")
543 559      else {
544 560          let initAmount = 100000000000000
545 561          let SWOPissue = Issue("SWOP", "SWOP protocol token", initAmount, 8, true)
546 562          let SWOPid = calculateAssetId(SWOPissue)
547 563  [BooleanEntry(kActive, true), Issue("SWOP", "SWOP protocol token", initAmount, 8, true), StringEntry(kSWOPid, toBase58String(SWOPid))]
548 564          }
549 565  
550 566  
551 567  
552 568  @Callable(i)
553 569  func initPoolShareFarming (pool) = valueOrElse(isAdminCall(i), [IntegerEntry((pool + kShareTotalShareTokens), 0), IntegerEntry((pool + kFarmLastInterest), 0), IntegerEntry((pool + kBoostLastInterest), 0), IntegerEntry((pool + kLastInterestHeight), height)])
554 570  
555 571  
556 572  
557 573  @Callable(i)
558 574  func updatePoolInterest (pool) = valueOrElse(isActive(), if ((i.caller != govAddress))
559 575      then throw("Only Governance can call this function")
560 576      else {
561 577          let user = toString(addressFromPublicKey(adminInvokePubKey))
562 -         let $t02708427158 = claimCalc(pool, user)
563 -         let farmInterest = $t02708427158._1
564 -         let boostInterest = $t02708427158._2
565 -         let boostLPinterest = $t02708427158._3
578 +         let $t02703527109 = claimCalc(pool, user)
579 +         let farmInterest = $t02703527109._1
580 +         let boostInterest = $t02703527109._2
581 +         let boostLPinterest = $t02703527109._3
566 582  [IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height)]
567 583          })
568 584  
569 585  
570 586  
571 587  @Callable(i)
572 - func lockShareTokens (pool,lockType) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType)))
588 + func lockShareTokens (pool,lockType) = valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType))
573 589  
574 590  
575 591  
576 592  @Callable(i)
577 - func lockShareTokensFromPool (callerBytes,pool,lockType) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType))))
593 + func lockShareTokensFromPool (callerBytes,pool,lockType) = valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType)))
578 594  
579 595  
580 596  
581 597  @Callable(i)
582 - func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), {
598 + func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(isActive(), {
583 599      let shareAssetId = getShareAssetId(pool)
584 600      let user = toString(i.caller)
585 601      let totalShare = getTotalShareToken(pool)
586 602      let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShare)
587 603      let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
588 604      let userLockedHeigt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), 0)
589 605      let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
590 606      let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
591 607      let totalUserShareTokens = (userStakedAmount + userLockedAmount)
592 -     let $t02878728839 = getLockParams(lockType)
593 -     let lockPeriod = $t02878728839._1
594 -     let lockCoef = $t02878728839._2
608 +     let $t02852828580 = getLockParams(lockType)
609 +     let lockPeriod = $t02852828580._1
610 +     let lockCoef = $t02852828580._2
595 611      let lockWavesFee = getIntegerValue(this, kLockWavesFee)
596 612      if ((getHeightFirstHarvest(pool) > height))
597 613          then throw("You can't lock shareTokens till first harvest end.")
598 614          else if ((0 >= lockType))
599 615              then throw("lockType must be > 0")
600 616              else if ((lockAmount > userStakedAmount))
601 617                  then throw(("You can't lock more than " + toString(userStakedAmount)))
602 618                  else if ((accountBalance(shareAssetId) > totalShare))
603 619                      then throw("Balance of share-token is lower than totalAmount")
604 620                      else if (if ((userLockedHeigt == 0))
605 621                          then if (if ((1 > size(i.payments)))
606 622                              then true
607 623                              else (i.payments[0].assetId != unit))
608 624                              then true
609 625                              else (lockWavesFee > i.payments[0].amount)
610 626                          else false)
611 627                          then throw((("You need to pay additional waves comission " + toString(lockWavesFee)) + "WAVES"))
612 628                          else if (if ((userLockedHeigt == 0))
613 629                              then (0 >= lockAmount)
614 630                              else false)
615 631                              then throw("lockAmount must be greater than 0")
616 632                              else if ((0 > lockAmount))
617 633                                  then throw("lockAmount must be positive")
618 634                                  else if ((userLockedHeigt > (height + lockPeriod)))
619 635                                      then throw("You cannot lock sharetokens for a period less than what you have already locked")
620 636                                      else {
621 637                                          let userLockedAmountNew = (userLockedAmount + lockAmount)
622 638                                          let userStakedAmountNew = (userStakedAmount - lockAmount)
623 639                                          let userLockedHeigtNew = (height + lockPeriod)
624 640                                          let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmountNew)
625 -                                         let $t03018530267 = claimCalc(pool, user)
626 -                                         let farmInterest = $t03018530267._1
627 -                                         let boostInterest = $t03018530267._2
628 -                                         let claimAmount = $t03018530267._3
629 -                                         let toTreasure = $t03018530267._4
641 +                                         let $t02987029952 = claimCalc(pool, user)
642 +                                         let farmInterest = $t02987029952._1
643 +                                         let boostInterest = $t02987029952._2
644 +                                         let claimAmount = $t02987029952._3
645 +                                         let toTreasure = $t02987029952._4
630 646                                          let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
631 647  [IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLocked), userLockedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedHeight), userLockedHeigtNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedType), lockType), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userAmountVirtualNew)), IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
632 648                                          }
633 -     }))
649 +     })
634 650  
635 651  
636 652  
637 653  @Callable(i)
638 654  func unlockUserLock (pool,user) = valueOrElse(isActive(), {
655 +     let lockWavesFee = getIntegerValue(this, kLockWavesFee)
639 656      let userLockedHeigt = valueOrErrorMessage(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), (((("There is no pool " + pool) + " or user ") + user) + "with lock"))
657 +     let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
658 +     let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
659 +     let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
660 +     let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
640 661      if ((userLockedHeigt > height))
641 662          then throw(("You can't unlock sharetokens till " + toString(userLockedHeigt)))
642 -         else (unlockUserLockCalc(i, pool, user) ++ [ScriptTransfer(i.caller, getIntegerValue(this, kLockWavesFee), unit)])
663 +         else {
664 +             let userStakedAmountNew = (userStakedAmount + userLockedAmount)
665 +             let $t03202932111 = claimCalc(pool, user)
666 +             let farmInterest = $t03202932111._1
667 +             let boostInterest = $t03202932111._2
668 +             let claimAmount = $t03202932111._3
669 +             let toTreasure = $t03202932111._4
670 +             let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
671 + [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userStakedAmountNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userStakedAmountNew)), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), DeleteEntry((((pool + "_") + user) + kUserShareTokensLocked)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedHeight)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedType)), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, lockWavesFee, unit)]
672 +             }
643 673      })
644 - 
645 - 
646 - 
647 - @Callable(i)
648 - func unlockUserLockDeprecated (pool,user) = valueOrElse(isActive(), valueOrElse(isSelfCall(i), if (!(getDeprecatedPool(pool)))
649 -     then throw("Pool must be deprecated")
650 -     else if (isDefined(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight))))
651 -         then (unlockUserLockCalc(i, pool, user) ++ [ScriptTransfer(moneyBoxAddress, getIntegerValue(this, kLockWavesFee), unit)])
652 -         else nil))
653 674  
654 675  
655 676  
656 677  @Callable(i)
657 678  func withdrawShareTokens (pool,shareTokensWithdrawAmount) = valueOrElse(isActive(), calcWithdrawShareTokens(i, i.caller, pool, shareTokensWithdrawAmount))
658 679  
659 680  
660 681  
661 682  @Callable(i)
662 683  func withdrawShareTokensFromPool (callerBytes,pool,shareTokensWithdrawAmount) = valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcWithdrawShareTokens(i, Address(callerBytes), pool, shareTokensWithdrawAmount)))
663 684  
664 685  
665 686  
666 687  @Callable(i)
667 688  func claim (pool) = valueOrElse(isActive(), {
668 689      let r = calcClaim(i, pool, i.caller)
669 690      if ((r._2 == 0))
670 691          then throw("You have 0 available SWOP")
671 692          else r
672 693      })
673 694  
674 695  
675 696  
676 697  @Callable(i)
677 698  func claimInternal (pool,caller) = valueOrElse(isActive(), valueOrElse(isSelfCall(i), calcClaim(i, pool, Address(caller))))
678 699  
679 700  
680 701  
681 702  @Callable(i)
682 703  func claimAndStake (pool) = valueOrElse(isActive(), {
683 704      let claimAmount = {
684 705          let @ = invoke(this, "claimInternal", [pool, i.caller.bytes], nil)
685 706          if ($isInstanceOf(@, "Int"))
686 707              then @
687 708              else throw(($getType(@) + " couldn't be cast to Int"))
688 709          }
689 710      if ((claimAmount == claimAmount))
690 711          then if ((claimAmount == 0))
691 712              then throw("You have 0 available SWOP")
692 713              else {
693 714                  let stakeToGov = invoke(govAddress, "lockSWOPFromFarming", nil, [AttachedPayment(SWOP, claimAmount)])
694 715                  if ((stakeToGov == stakeToGov))
695 716                      then nil
696 717                      else throw("Strict value is not equal to itself.")
697 718                  }
698 719          else throw("Strict value is not equal to itself.")
699 720      })
700 721  
701 722  
702 723  
703 724  @Callable(i)
704 725  func claimAll (pools) = valueOrElse(isActive(), {
705 726      func claimInv (claimTotal,pool) =     {
706 727          let claimAmount = {
707 728              let @ = invoke(this, "claimInternal", [pool, i.caller.bytes], nil)
708 729              if ($isInstanceOf(@, "Int"))
709 730                  then @
710 731                  else throw(($getType(@) + " couldn't be cast to Int"))
711 732              }
712 733          if ((claimAmount == claimAmount))
713 734              then (claimTotal + claimAmount)
714 735              else throw("Strict value is not equal to itself.")
715 736          }
716 737  
717 738      let claimTotal = {
718 739          let $l = pools
719 740          let $s = size($l)
720 741          let $acc0 = 0
721 742          func $f0_1 ($a,$i) =         if (($i >= $s))
722 743              then $a
723 744              else claimInv($a, $l[$i])
724 745  
725 746          func $f0_2 ($a,$i) =         if (($i >= $s))
726 747              then $a
727 748              else throw("List size exceeds 60")
728 749  
729 750          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60)
730 751          }
731 752      if ((claimTotal == 0))
732 753          then throw("You have 0 available SWOP")
733 754          else [ScriptTransfer(i.caller, claimTotal, SWOP)]
734 755      })
735 756  
736 757  
737 758  
738 759  @Callable(i)
739 760  func claimAllAndStake (pools) = valueOrElse(isActive(), {
740 761      func claimInv (claimTotal,pool) =     {
741 762          let claimAmount = {
742 763              let @ = invoke(this, "claimInternal", [pool, i.caller.bytes], nil)
743 764              if ($isInstanceOf(@, "Int"))
744 765                  then @
745 766                  else throw(($getType(@) + " couldn't be cast to Int"))
746 767              }
747 768          if ((claimAmount == claimAmount))
748 769              then (claimTotal + claimAmount)
749 770              else throw("Strict value is not equal to itself.")
750 771          }
751 772  
752 773      let claimTotal = {
753 774          let $l = pools
754 775          let $s = size($l)
755 776          let $acc0 = 0
756 777          func $f0_1 ($a,$i) =         if (($i >= $s))
757 778              then $a
758 779              else claimInv($a, $l[$i])
759 780  
760 781          func $f0_2 ($a,$i) =         if (($i >= $s))
761 782              then $a
762 783              else throw("List size exceeds 60")
763 784  
764 785          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60)
765 786          }
766 787      if ((claimTotal == 0))
767 788          then throw("You have 0 available SWOP")
768 789          else {
769 790              let stakeToGov = invoke(govAddress, "lockSWOPFromFarming", nil, [AttachedPayment(SWOP, claimTotal)])
770 791              if ((stakeToGov == stakeToGov))
771 792                  then nil
772 793                  else throw("Strict value is not equal to itself.")
773 794              }
774 795      })
775 796  
776 797  
777 798  
778 799  @Callable(i)
779 800  func updateUserBoostInterest (pool,user) = valueOrElse(isActive(), if ((i.caller != votingAddress))
780 801      then throw("Only voiting can call this function")
781 802      else {
782 -         let $t03501635098 = claimCalc(pool, user)
783 -         let farmInterest = $t03501635098._1
784 -         let boostInterest = $t03501635098._2
785 -         let claimAmount = $t03501635098._3
786 -         let toTreasure = $t03501635098._4
803 +         let $t03558535667 = claimCalc(pool, user)
804 +         let farmInterest = $t03558535667._1
805 +         let boostInterest = $t03558535667._2
806 +         let claimAmount = $t03558535667._3
807 +         let toTreasure = $t03558535667._4
787 808          let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
788 809  [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
789 810          })
790 811  
791 812  
792 813  
793 814  @Callable(i)
794 815  func shutdown () = valueOrElse(isAdminCall(i), if (!(active))
795 816      then throw(("DApp is already suspended. Cause: " + valueOrElse(getString(this, kCause), "the cause wasn't specified")))
796 817      else suspend("Paused by admin"))
797 818  
798 819  
799 820  
800 821  @Callable(i)
801 822  func activate () = valueOrElse(isAdminCall(i), if (active)
802 823      then throw("DApp is already active")
803 824      else [BooleanEntry(kActive, true), DeleteEntry(kCause)])
804 825  
805 826  
806 827  @Verifier(tx)
807 828  func verify () = match tx {
808 829      case _ => 
809 830          let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
810 831              then 1
811 832              else 0
812 833          let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[1], adminPubKey2))
813 834              then 1
814 835              else 0
815 836          let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[2], adminPubKey3))
816 837              then 1
817 838              else 0
818 839          (((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) >= 2)
819 840  }
820 841

Old	New		Differences
4	4		let kActive = "active"
5	5
6	6		let kActiveGlob = "active_all_contracts"
7		-
8		-	let kDeprecatedPool = "deprecated_"
9	7
10	8		let kCause = "shutdown_cause"
11	9

14	12		let kRewardPoolFractionPrevious = "_previous_pool_fraction_reward"
15	13
16	14		let kHeightPoolFraction = "_pool_reward_update_height"
17		-
18		-	let kTotalRewardPerBlockCurrent = "total_reward_per_block_current"
19		-
20		-	let kTotalRewardPerBlockPrevious = "total_reward_per_block_previous"
21	15
22	16		let kRewardUpdateHeight = "reward_update_height"
23	17

54	48		let kSWOPid = "SWOP_id"
55	49
56	50		let kAvailableSWOP = "_available_SWOP"
57		-
58		-	let kSwopYearEmission = "swop_year_emission"
59	51
60	52		let kHarvestPoolVote = "_harvest_pool_vote_gSWOP"
61	53

105	97
106	98		let defPoolBoostCoef = 500
107	99
108		-	let bStartH = 3397850
	100	+	let startEmissionH = 1911271
	101	+
	102	+	let swopYearEmission = 100000000000000
	103	+
	104	+	let blocksPerYear = 526330
109	105
110	106		func getBase58FromOracle (key) = match getString(oracle, key) {
111	107		case string: String =>

140	136		let activeGlob = valueOrElse(getBoolean(oracle, kActiveGlob), true)
141	137
142	138		let SWOP = fromBase58String(getStringValue(this, kSWOPid))
	139	+
	140	+	func getRewardsPerBlockInfo () = {
	141	+	let emissionPeriods = ((height - startEmissionH) / blocksPerYear)
	142	+	func calcEmission (acc,i) = {
	143	+	let $t047104747 = acc
	144	+	let curEmission = $t047104747._1
	145	+	let prevEmission = $t047104747._2
	146	+	if ((emissionPeriods > i))
	147	+	then $Tuple2(fraction(curEmission, 75, 100), curEmission)
	148	+	else $Tuple2(curEmission, prevEmission)
	149	+	}
	150	+
	151	+	let $t049055071 = {
	152	+	let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
	153	+	let $s = size($l)
	154	+	let $acc0 = $Tuple2(swopYearEmission, swopYearEmission)
	155	+	func $f0_1 ($a,$i) = if (($i >= $s))
	156	+	then $a
	157	+	else calcEmission($a, $l[$i])
	158	+
	159	+	func $f0_2 ($a,$i) = if (($i >= $s))
	160	+	then $a
	161	+	else throw("List size exceeds 20")
	162	+
	163	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
	164	+	}
	165	+	let curEmission = $t049055071._1
	166	+	let prevEmission = $t049055071._2
	167	+	$Tuple3((curEmission / blocksPerYear), (prevEmission / blocksPerYear), (startEmissionH + (blocksPerYear * emissionPeriods)))
	168	+	}
	169	+
143	170
144	171		func getHeightFirstHarvest (pool) = valueOrElse(getInteger(Address(fromBase58String(pool)), kFirstHarvestHeight), 0)
145	172

181	208
182	209
183	210		func rewardInfo (pool) = {
184		-	let totalRewardPerBlockCurrent = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockCurrent), ((("No data on the key: " + kTotalRewardPerBlockCurrent) + " at address ") + toString(govAddress)))
185		-	let totalRewardPerBlockPrevious = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockPrevious), ((("No data on the key: " + kTotalRewardPerBlockPrevious) + " at address ") + toString(govAddress)))
	211	+	let $t068867001 = getRewardsPerBlockInfo()
	212	+	let totalRewardPerBlockCurrent = $t068867001._1
	213	+	let totalRewardPerBlockPrevious = $t068867001._2
	214	+	let lastEmissionUpdateHeight = $t068867001._3
186	215		let rewardPoolFractionCurrent = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionCurrent)), (((("No data on the key: " + pool) + kRewardPoolFractionCurrent) + " at address ") + toString(govAddress)))
187	216		let rewardUpdateHeight = valueOrErrorMessage(getInteger(govAddress, kRewardUpdateHeight), ((("No data on the key: " + kRewardUpdateHeight) + " at address ") + toString(govAddress)))
188	217		let poolRewardUpdateHeight = valueOrElse(getInteger(govAddress, (pool + kHeightPoolFraction)), rewardUpdateHeight)
189	218		let rewardPoolFractionPrevious = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionPrevious)), (((("No data on the key: " + pool) + kRewardPoolFractionPrevious) + " at address ") + toString(govAddress)))
190	219		let rewardPoolCurrent = fraction(totalRewardPerBlockCurrent, rewardPoolFractionCurrent, totalVoteShare)
191	220		let rewardPoolPrevious = fraction(totalRewardPerBlockCurrent, rewardPoolFractionPrevious, totalVoteShare)
	221	+	let rewardPoolPrevCurrent = fraction(totalRewardPerBlockPrevious, rewardPoolFractionCurrent, totalVoteShare)
	222	+	let rewardPoolPrevPrevious = fraction(totalRewardPerBlockPrevious, rewardPoolFractionPrevious, totalVoteShare)
192	223		if (if ((rewardPoolCurrent > totalRewardPerBlockCurrent))
193	224		then true
194	225		else (rewardPoolPrevious > totalRewardPerBlockPrevious))
195	226		then throw("rewardPoolCurrent > totalRewardPerBlockCurrent or rewardPoolPrevious > totalRewardPerBlockPrevious")
196		-	else $~~Tuple4~~(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight)
	227	+	else $Tuple7(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight, lastEmissionUpdateHeight, rewardPoolPrevCurrent, rewardPoolPrevPrevious)
197	228		}
198	229
199	230

217	248		}
218	249
219	250
220		-	func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue) = {
221		-	let $~~t0951610689~~ = if (if (if ((rewardUpdateHeight > ~~height~~))
	251	+	func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue,toHeight) = {
	252	+	let $t01001511200 = if (if (if ((rewardUpdateHeight > toHeight))
222	253		then (rewardUpdateHeight == poolRewardUpdateHeight)
223	254		else false)
224	255		then true
225		-	else if ((~~height~~ > rewardUpdateHeight))
	256	+	else if ((toHeight > rewardUpdateHeight))
226	257		then (rewardUpdateHeight != poolRewardUpdateHeight)
227	258		else false)
228	259		then {
229		-	let r = (previousRewardPerBlock * (~~height~~ - lastInterestHeight))
	260	+	let r = (previousRewardPerBlock * (toHeight - lastInterestHeight))
230	261		$Tuple3(r, farmInterest, boostInterest)
231	262		}
232		-	else if (if (if ((~~height~~ > rewardUpdateHeight))
	263	+	else if (if (if ((toHeight > rewardUpdateHeight))
233	264		then (rewardUpdateHeight == poolRewardUpdateHeight)
234	265		else false)
235	266		then (lastInterestHeight > rewardUpdateHeight)
236	267		else false)
237	268		then {
238		-	let r = (currentRewardPerBlock * (~~height~~ - lastInterestHeight))
	269	+	let r = (currentRewardPerBlock * (toHeight - lastInterestHeight))
239	270		$Tuple3(r, farmInterest, boostInterest)
240	271		}
241	272		else {

244	275		let bBfrUp = (boostInterest + (if ((poolVoted > 0))
245	276		then fraction(calcBoostRwd(pool, rwdBfrUpd), scaleValue8, poolVoted)
246	277		else 0))
247		-	let rwd = (currentRewardPerBlock * (~~height~~ - rewardUpdateHeight))
	278	+	let rwd = (currentRewardPerBlock * (toHeight - rewardUpdateHeight))
248	279		$Tuple3(rwd, fBfrUp, bBfrUp)
249	280		}
250		-	let reward = $~~t0951610689~~._1
251		-	let farmIntrBefore = $~~t0951610689~~._2
252		-	let boostIntrBefore = $~~t0951610689~~._3
	281	+	let reward = $t01001511200._1
	282	+	let farmIntrBefore = $t01001511200._2
	283	+	let boostIntrBefore = $t01001511200._3
253	284		let newFarmInterest = (farmIntrBefore + fraction(calcFarmRwd(pool, reward), scaleValue, shareTokenLocked))
254	285		let newBoostInterest = (boostIntrBefore + (if ((poolVoted > 0))
255	286		then fraction(calcBoostRwd(pool, reward), scaleValue8, poolVoted)

265	296		let shareToken = getTotalShareToken(pool)
266	297		let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), shareToken)
267	298		let stratBFarmInterest = valueOrElse(getInteger(this, (pool + kStratBFarmInterest)), 0)
268		-	let $t01152711608 = getLastInterestInfo(pool)
269		-	let lastInterestHeight = $t01152711608._1
270		-	let farmInterest = $t01152711608._2
271		-	let boostInterest = $t01152711608._3
272		-	let $t01161311727 = rewardInfo(pool)
273		-	let currentRewardPerBlock = $t01161311727._1
274		-	let rewardUpdateHeight = $t01161311727._2
275		-	let previousRewardPerBlock = $t01161311727._3
276		-	let poolRewardUpdateHeight = $t01161311727._4
	299	+	let $t01203812119 = getLastInterestInfo(pool)
	300	+	let lastInterestHeight = $t01203812119._1
	301	+	let farmInterest = $t01203812119._2
	302	+	let boostInterest = $t01203812119._3
	303	+	let $t01212412381 = rewardInfo(pool)
	304	+	let currentRewardPerBlock = $t01212412381._1
	305	+	let rewardUpdateHeight = $t01212412381._2
	306	+	let previousRewardPerBlock = $t01212412381._3
	307	+	let poolRewardUpdateHeight = $t01212412381._4
	308	+	let emissionUpdateHeight = $t01212412381._5
	309	+	let prevCurrentRewardPerBlock = $t01212412381._6
	310	+	let prevPreviousRewardPerBlock = $t01212412381._7
277	311		let uFarmInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kFarmUserLastInterest)), farmInterest)
278	312		let uBoostInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kBoostUserLastInterest)), if (if ((stratBFarmInterest > uFarmInterest))
279	313		then (uPoolVoted > 0)

284	318		let uShareTokensVirt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), uShareTokensStaked)
285	319		if ((totalShareVirtual == 0))
286	320		then {
287		-	let toTreasury = (currentRewardPerBlock * (height - lastInterestHeight))
	321	+	let toTreasury = if ((emissionUpdateHeight > lastInterestHeight))
	322	+	then ((prevCurrentRewardPerBlock * (emissionUpdateHeight - lastInterestHeight)) + (currentRewardPerBlock * (height - emissionUpdateHeight)))
	323	+	else (currentRewardPerBlock * (height - lastInterestHeight))
288	324		$Tuple4(farmInterest, boostInterest, 0, toTreasury)
289	325		}
290	326		else {
291		-	let $t01244012832 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue)
292		-	let newFarmInterest = $t01244012832._1
293		-	let newBoostInterest = $t01244012832._2
	327	+	let $t01333914476 = if ((emissionUpdateHeight > lastInterestHeight))
	328	+	then {
	329	+	let $t01375214311 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, prevCurrentRewardPerBlock, totalShareVirtual, prevPreviousRewardPerBlock, scaleValue, emissionUpdateHeight)
	330	+	let prevNewFarmInterest = $t01375214311._1
	331	+	let prevNewBoostInterest = $t01375214311._2
	332	+	$Tuple3(prevNewFarmInterest, prevNewBoostInterest, emissionUpdateHeight)
	333	+	}
	334	+	else $Tuple3(farmInterest, boostInterest, lastInterestHeight)
	335	+	let prevFarmInterest = $t01333914476._1
	336	+	let prevBoostInterest = $t01333914476._2
	337	+	let LIHeight = $t01333914476._3
	338	+	let $t01448514908 = calcInterest(pool, LIHeight, rewardUpdateHeight, poolRewardUpdateHeight, prevFarmInterest, prevBoostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue, height)
	339	+	let newFarmInterest = $t01448514908._1
	340	+	let newBoostInterest = $t01448514908._2
294	341		let farmRwd = fraction(uShareTokensVirt, (newFarmInterest - uFarmInterest), scaleValue)
295	342		let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
296	343		let boostRwdMax = fraction(fraction(uShareTokensVirt, (newFarmInterest - max([uFarmInterest, stratBFarmInterest])), scaleValue), poolBoostCoef, lockBoostCoefScale)

306	353
307	354		func availableClaimCalcAllByUser (pools,user) = {
308	355		func calcAvailable (acc,pool) = {
309		-	let $~~t01370113730~~ = acc
310		-	let newPools = $~~t01370113730~~._1
311		-	let amounts = $~~t01370113730~~._2
312		-	let $~~t01373913792~~ = claimCalc(pool, user)
313		-	let fi = $~~t01373913792~~._1
314		-	let bi = $~~t01373913792~~._2
315		-	let claimAmount = $~~t01373913792~~._3
316		-	let tt = $~~t01373913792~~._4
	356	+	let $t01577715806 = acc
	357	+	let newPools = $t01577715806._1
	358	+	let amounts = $t01577715806._2
	359	+	let $t01581515868 = claimCalc(pool, user)
	360	+	let fi = $t01581515868._1
	361	+	let bi = $t01581515868._2
	362	+	let claimAmount = $t01581515868._3
	363	+	let tt = $t01581515868._4
317	364		let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
318	365		$Tuple2((newPools :+ pool), (amounts :+ availableFund))
319	366		}

378	425		else throw("Only pool can call this function")
379	426
380	427
381		-	func getDeprecatedPool (pool) = valueOrElse(getBoolean(oracle, (kDeprecatedPool + pool)), false)
382		-
383		-
384		-	func isDeprecatedPool (pool) = if (!(getDeprecatedPool(pool)))
385		-	then unit
386		-	else throw("Pool is deprecated. Only unlock action allowed.")
387		-
388		-
389	428		func isSelfCall (i) = if ((i.caller == this))
390	429		then unit
391	430		else throw("Only contract itself can call this function")

401	440		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
402	441		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
403	442		let totalUserShareTokens = ((userStakedAmount + userLockedAmount) + i.payments[0].amount)
404		-	let $~~t01684116893~~ = getLockParams(lockType)
405		-	let lockPeriod = $~~t01684116893~~._1
406		-	let lockCoef = $~~t01684116893~~._2
	443	+	let $t01866918721 = getLockParams(lockType)
	444	+	let lockPeriod = $t01866918721._1
	445	+	let lockCoef = $t01866918721._2
407	446		let lockWavesFee = getIntegerValue(this, kLockWavesFee)
408	447		if ((i.payments[0].assetId != shareAssetId))
409	448		then throw("Wrong sharetoken in payment")

415	454		let shareTokensChangeOnFH = canLockInFirstHarvest(pool, user, userStakedAmount, i.payments[0].amount, lockType)
416	455		if ((shareTokensChangeOnFH == shareTokensChangeOnFH))
417	456		then {
418		-	let $~~t01732019254~~ = if ((lockType == 0))
	457	+	let $t01914821082 = if ((lockType == 0))
419	458		then {
420	459		let userAmountVirtualNew = ((userAmountVirtual + i.payments[0].amount) - shareTokensChangeOnFH)
421	460		$Tuple2([IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), ((userStakedAmount + i.payments[0].amount) - shareTokensChangeOnFH)), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual + i.payments[0].amount) - shareTokensChangeOnFH)), ScriptTransfer(caller, shareTokensChangeOnFH, i.payments[0].assetId)], ((totalShare + i.payments[0].amount) - shareTokensChangeOnFH))

436	475		let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmount)
437	476		$Tuple2([IntegerEntry((((pool + "_") + user) + kUserShareTokensLocked), userLockedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedHeight), userLockedHeigtNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedType), lockType), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userAmountVirtualNew))], (totalShare + i.payments[0].amount))
438	477		}
439		-	let lockEntries = $~~t01732019254~~._1
440		-	let totalShareNew = $~~t01732019254~~._2
	478	+	let lockEntries = $t01914821082._1
	479	+	let totalShareNew = $t01914821082._2
441	480		if ((accountBalance(shareAssetId) > totalShareNew))
442	481		then throw("Balance of share-token is lower than totalAmount")
443	482		else {
444		-	let $~~t01937919461~~ = claimCalc(pool, user)
445		-	let farmInterest = $~~t01937919461~~._1
446		-	let boostInterest = $~~t01937919461~~._2
447		-	let claimAmount = $~~t01937919461~~._3
448		-	let toTreasure = $~~t01937919461~~._4
	483	+	let $t02120721289 = claimCalc(pool, user)
	484	+	let farmInterest = $t02120721289._1
	485	+	let boostInterest = $t02120721289._2
	486	+	let claimAmount = $t02120721289._3
	487	+	let toTreasure = $t02120721289._4
449	488		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
450	489		let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
451	490		then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, totalUserShareTokens], nil)

460	499		}
461	500
462	501
463		-	func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = {
464		-	let inv = if (getDeprecatedPool(pool))
465		-	then invoke(this, "unlockUserLockDeprecated", [pool, toString(caller)], nil)
466		-	else 0
467		-	if ((inv == inv))
468		-	then {
469		-	let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
470		-	let user = toString(caller)
471		-	let $t02075820840 = claimCalc(pool, user)
472		-	let farmInterest = $t02075820840._1
473		-	let boostInterest = $t02075820840._2
474		-	let claimAmount = $t02075820840._3
475		-	let toTreasure = $t02075820840._4
476		-	let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
477		-	let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
478		-	let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
479		-	let userStakedAmountNew = (userStakedAmount - shareTokensWithdrawAmount)
480		-	let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
481		-	let totalShareAmount = getTotalShareToken(pool)
482		-	let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShareAmount)
483		-	let totalShareAmountNew = (totalShareAmount - shareTokensWithdrawAmount)
484		-	let totalShareVirtualNew = (totalShareVirtual - shareTokensWithdrawAmount)
485		-	let userAmountVirtualNew = (userAmountVirtual - shareTokensWithdrawAmount)
486		-	if ((shareTokensWithdrawAmount > userStakedAmount))
487		-	then throw("Withdraw amount more then user locked amount")
488		-	else if ((accountBalance(shareTokensId) > totalShareAmount))
489		-	then throw("Balance of share-token is lower than totalAmount")
490		-	else {
491		-	let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
492		-	then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, (userStakedAmount + userLockedAmount)], nil)
493		-	else 0
494		-	if ((uplp == uplp))
495		-	then [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTotalShareTokens), totalShareAmountNew), IntegerEntry((pool + kShareTokensVirtual), totalShareVirtualNew), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
496		-	else throw("Strict value is not equal to itself.")
497		-	}
498		-	}
499		-	else throw("Strict value is not equal to itself.")
500		-	}
	502	+	func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = valueOrElse(isActive(), {
	503	+	let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
	504	+	let user = toString(caller)
	505	+	let $t02248122563 = claimCalc(pool, user)
	506	+	let farmInterest = $t02248122563._1
	507	+	let boostInterest = $t02248122563._2
	508	+	let claimAmount = $t02248122563._3
	509	+	let toTreasure = $t02248122563._4
	510	+	let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
	511	+	let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
	512	+	let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
	513	+	let userStakedAmountNew = (userStakedAmount - shareTokensWithdrawAmount)
	514	+	let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
	515	+	let totalShareAmount = getTotalShareToken(pool)
	516	+	let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShareAmount)
	517	+	let totalShareAmountNew = (totalShareAmount - shareTokensWithdrawAmount)
	518	+	let totalShareVirtualNew = (totalShareVirtual - shareTokensWithdrawAmount)
	519	+	let userAmountVirtualNew = (userAmountVirtual - shareTokensWithdrawAmount)
	520	+	if ((shareTokensWithdrawAmount > userStakedAmount))
	521	+	then throw("Withdraw amount more then user locked amount")
	522	+	else if ((accountBalance(shareTokensId) > totalShareAmount))
	523	+	then throw("Balance of share-token is lower than totalAmount")
	524	+	else {
	525	+	let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
	526	+	then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, (userStakedAmount + userLockedAmount)], nil)
	527	+	else 0
	528	+	if ((uplp == uplp))
	529	+	then [IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTotalShareTokens), totalShareAmountNew), IntegerEntry((pool + kShareTokensVirtual), totalShareVirtualNew), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
	530	+	else throw("Strict value is not equal to itself.")
	531	+	}
	532	+	})
501	533
502	534
503	535		func calcClaim (i,pool,caller) = {
504	536		let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
505	537		let user = toString(caller)
506	538		let shareTokenLocked = getTotalShareToken(pool)
507		-	let $~~t02335123433~~ = claimCalc(pool, user)
508		-	let farmInterest = $~~t02335123433~~._1
509		-	let boostInterest = $~~t02335123433~~._2
510		-	let claimAmount = $~~t02335123433~~._3
511		-	let toTreasure = $~~t02335123433~~._4
	539	+	let $t02507625158 = claimCalc(pool, user)
	540	+	let farmInterest = $t02507625158._1
	541	+	let boostInterest = $t02507625158._2
	542	+	let claimAmount = $t02507625158._3
	543	+	let toTreasure = $t02507625158._4
512	544		let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
513	545		if ((accountBalance(shareTokensId) > shareTokenLocked))
514	546		then throw("Balance of share-token is lower than totalAmount")

518	550		else nil
519	551		$Tuple2(([IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), 0), Reissue(SWOP, (toTreasure + availableFund), true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)] ++ uTrans), availableFund)
520	552		}
521		-	}
522		-
523		-
524		-	func unlockUserLockCalc (i,pool,user) = {
525		-	let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
526		-	let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
527		-	let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
528		-	let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
529		-	let userStakedAmountNew = (userStakedAmount + userLockedAmount)
530		-	let $t02483624918 = claimCalc(pool, user)
531		-	let farmInterest = $t02483624918._1
532		-	let boostInterest = $t02483624918._2
533		-	let claimAmount = $t02483624918._3
534		-	let toTreasure = $t02483624918._4
535		-	let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
536		-	[IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userStakedAmountNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userStakedAmountNew)), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), DeleteEntry((((pool + "_") + user) + kUserShareTokensLocked)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedHeight)), DeleteEntry((((pool + "_") + user) + kUserShareTokensLockedType)), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
537	553		}
538	554
539	555

559	575		then throw("Only Governance can call this function")
560	576		else {
561	577		let user = toString(addressFromPublicKey(adminInvokePubKey))
562		-	let $~~t02708427158~~ = claimCalc(pool, user)
563		-	let farmInterest = $~~t02708427158~~._1
564		-	let boostInterest = $~~t02708427158~~._2
565		-	let boostLPinterest = $~~t02708427158~~._3
	578	+	let $t02703527109 = claimCalc(pool, user)
	579	+	let farmInterest = $t02703527109._1
	580	+	let boostInterest = $t02703527109._2
	581	+	let boostLPinterest = $t02703527109._3
566	582		[IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height)]
567	583		})
568	584
569	585
570	586
571	587		@Callable(i)
572		-	func lockShareTokens (pool,lockType) = ~~valueOrElse(isDeprecatedPool(pool),~~ valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType)))
	588	+	func lockShareTokens (pool,lockType) = valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType))
573	589
574	590
575	591
576	592		@Callable(i)
577		-	func lockShareTokensFromPool (callerBytes,pool,lockType) = ~~valueOrElse(isDeprecatedPool(pool),~~ valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType))))
	593	+	func lockShareTokensFromPool (callerBytes,pool,lockType) = valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType)))
578	594
579	595
580	596
581	597		@Callable(i)
582		-	func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(~~isDeprecatedPool(pool), valueOrElse(~~isActive(), {
	598	+	func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(isActive(), {
583	599		let shareAssetId = getShareAssetId(pool)
584	600		let user = toString(i.caller)
585	601		let totalShare = getTotalShareToken(pool)

589	605		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
590	606		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
591	607		let totalUserShareTokens = (userStakedAmount + userLockedAmount)
592		-	let $~~t02878728839~~ = getLockParams(lockType)
593		-	let lockPeriod = $~~t02878728839~~._1
594		-	let lockCoef = $~~t02878728839~~._2
	608	+	let $t02852828580 = getLockParams(lockType)
	609	+	let lockPeriod = $t02852828580._1
	610	+	let lockCoef = $t02852828580._2
595	611		let lockWavesFee = getIntegerValue(this, kLockWavesFee)
596	612		if ((getHeightFirstHarvest(pool) > height))
597	613		then throw("You can't lock shareTokens till first harvest end.")

622	638		let userStakedAmountNew = (userStakedAmount - lockAmount)
623	639		let userLockedHeigtNew = (height + lockPeriod)
624	640		let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmountNew)
625		-	let $~~t03018530267~~ = claimCalc(pool, user)
626		-	let farmInterest = $~~t03018530267~~._1
627		-	let boostInterest = $~~t03018530267~~._2
628		-	let claimAmount = $~~t03018530267~~._3
629		-	let toTreasure = $~~t03018530267~~._4
	641	+	let $t02987029952 = claimCalc(pool, user)
	642	+	let farmInterest = $t02987029952._1
	643	+	let boostInterest = $t02987029952._2
	644	+	let claimAmount = $t02987029952._3
	645	+	let toTreasure = $t02987029952._4
630	646		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
631	647		[IntegerEntry((((pool + "_") + user) + kUserShareTokensStaked), userStakedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLocked), userLockedAmountNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedHeight), userLockedHeigtNew), IntegerEntry((((pool + "_") + user) + kUserShareTokensLockedType), lockType), IntegerEntry((((pool + "_") + user) + kUserShareTokensVirtual), userAmountVirtualNew), IntegerEntry((pool + kShareTokensVirtual), ((totalShareVirtual - userAmountVirtual) + userAmountVirtualNew)), IntegerEntry((((pool + "_") + user) + kFarmUserLastInterest), farmInterest), IntegerEntry((((pool + "_") + user) + kBoostUserLastInterest), boostInterest), IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height), IntegerEntry((((pool + "_") + user) + kAvailableSWOP), availableFundsNew), Reissue(SWOP, toTreasure, true), ScriptTransfer(farmingTreasureAddr, toTreasure, SWOP)]
632	648		}
633		-	}))
	649	+	})
634	650
635	651
636	652
637	653		@Callable(i)
638	654		func unlockUserLock (pool,user) = valueOrElse(isActive(), {
	655	+	let lockWavesFee = getIntegerValue(this, kLockWavesFee)
639	656		let userLockedHeigt = valueOrErrorMessage(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), (((("There is no pool " + pool) + " or user ") + user) + "with lock"))
	657	+	let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
	658	+	let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
	659	+	let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
	660	+	let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
640	661		if ((userLockedHeigt > height))
641	662		then throw(("You can't unlock sharetokens till " + toString(userLockedHeigt)))
642		-	else (unlockUserLockCalc(i, pool, user) ++ [ScriptTransfer(i.caller, getIntegerValue(this, kLockWavesFee), unit)])
	663	+	else {
	664	+	let userStakedAmountNew = (userStakedAmount + userLockedAmount)
	665	+	let $t03202932111 = claimCalc(pool, user)
	666	+	let farmInterest = $t03202932111._1
	667	+	let boostInterest = $t03202932111._2
	668	+	let claimAmount = $t03202932111._3

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let kActive = "active"
5	5
6	6		let kActiveGlob = "active_all_contracts"
7		-
8		-	let kDeprecatedPool = "deprecated_"
9	7
10	8		let kCause = "shutdown_cause"
11	9
12	10		let kRewardPoolFractionCurrent = "_current_pool_fraction_reward"
13	11
14	12		let kRewardPoolFractionPrevious = "_previous_pool_fraction_reward"
15	13
16	14		let kHeightPoolFraction = "_pool_reward_update_height"
17		-
18		-	let kTotalRewardPerBlockCurrent = "total_reward_per_block_current"
19		-
20		-	let kTotalRewardPerBlockPrevious = "total_reward_per_block_previous"
21	15
22	16		let kRewardUpdateHeight = "reward_update_height"
23	17
24	18		let kUserShareTokensStaked = "_share_tokens_locked"
25	19
26	20		let kUserShareTokensLocked = "_share_tokens_blocked"
27	21
28	22		let kUserShareTokensLockedType = "_share_tokens_blocked_type"
29	23
30	24		let kUserShareTokensLockedHeight = "_share_tokens_blocked_height"
31	25
32	26		let kUserShareTokensVirtual = "_share_tokens_virtual"
33	27
34	28		let kShareTotalShareTokens = "_total_share_tokens_locked"
35	29
36	30		let kShareTokensVirtual = "_total_share_tokens_virtual"
37	31
38	32		let kLockParams = "_lock_params"
39	33
40	34		let kLockWavesFee = "lock_waves_fee"
41	35
42	36		let kPoolBoostCoef = "_boost_coef"
43	37
44	38		let kFarmLastInterest = "_last_interest"
45	39
46	40		let kFarmUserLastInterest = "_last_interest"
47	41
48	42		let kBoostLastInterest = "_last_interest_b"
49	43
50	44		let kBoostUserLastInterest = "_last_interest_u_b"
51	45
52	46		let kLastInterestHeight = "_last_interest_height"
53	47
54	48		let kSWOPid = "SWOP_id"
55	49
56	50		let kAvailableSWOP = "_available_SWOP"
57		-
58		-	let kSwopYearEmission = "swop_year_emission"
59	51
60	52		let kHarvestPoolVote = "_harvest_pool_vote_gSWOP"
61	53
62	54		let kPoolVote = "_pool_vote_gSWOP"
63	55
64	56		let kUserPoolVote = "_user_vote_gSWOP"
65	57
66	58		let kPoolStruc = "_pool_struc"
67	59
68	60		let kUserPoolStruc = "_user_pool_struc"
69	61
70	62		let kHarvestUserPoolVote = "_harvest_user_pool_vote_gSWOP"
71	63
72	64		let kFirstHarvestHeight = "first_harvest_height"
73	65
74	66		let kShareLimitFH = "share_limit_on_first_harvest"
75	67
76	68		let kStratBFarmInterest = "_strat_b_farm_interest"
77	69
78	70		let kCpmmContract = "cpmm_contract"
79	71
80	72		let kAdminPubKey1 = "admin_pub_1"
81	73
82	74		let kAdminPubKey2 = "admin_pub_2"
83	75
84	76		let kAdminPubKey3 = "admin_pub_3"
85	77
86	78		let kAdminInvokePubKey = "admin_invoke_pub"
87	79
88	80		let kMoneyBoxAddress = "money_box_address"
89	81
90	82		let kVotingAddress = "voting_address"
91	83
92	84		let kGovAddress = "governance_address"
93	85
94	86		let kLPFarmingAddress = "lp_farming"
95	87
96	88		let kFarmingTreasureAddr = "farming_treasure"
97	89
98	90		let oracle = Address(base58'3MvVBtsXroQpy1tsPw21TU2ET9A8WfmrNjz')
99	91
100	92		let totalVoteShare = 10000000000
101	93
102	94		let scaleValue8 = 100000000
103	95
104	96		let lockBoostCoefScale = 1000
105	97
106	98		let defPoolBoostCoef = 500
107	99
108		-	let bStartH = 3397850
	100	+	let startEmissionH = 1911271
	101	+
	102	+	let swopYearEmission = 100000000000000
	103	+
	104	+	let blocksPerYear = 526330
109	105
110	106		func getBase58FromOracle (key) = match getString(oracle, key) {
111	107		case string: String =>
112	108		fromBase58String(string)
113	109		case nothing =>
114	110		throw((key + "is empty"))
115	111		}
116	112
117	113
118	114		let adminPubKey1 = getBase58FromOracle(kAdminPubKey1)
119	115
120	116		let adminPubKey2 = getBase58FromOracle(kAdminPubKey2)
121	117
122	118		let adminPubKey3 = getBase58FromOracle(kAdminPubKey3)
123	119
124	120		let moneyBoxAddress = Address(getBase58FromOracle(kMoneyBoxAddress))
125	121
126	122		let votingAddress = Address(getBase58FromOracle(kVotingAddress))
127	123
128	124		let govAddress = Address(getBase58FromOracle(kGovAddress))
129	125
130	126		let adminInvokePubKey = getBase58FromOracle(kAdminInvokePubKey)
131	127
132	128		let lpFarmingAddress = Address(getBase58FromOracle(kLPFarmingAddress))
133	129
134	130		let farmingTreasureAddr = Address(getBase58FromOracle(kFarmingTreasureAddr))
135	131
136	132		let cpmmContract = Address(getBase58FromOracle(kCpmmContract))
137	133
138	134		let active = getBooleanValue(this, kActive)
139	135
140	136		let activeGlob = valueOrElse(getBoolean(oracle, kActiveGlob), true)
141	137
142	138		let SWOP = fromBase58String(getStringValue(this, kSWOPid))
	139	+
	140	+	func getRewardsPerBlockInfo () = {
	141	+	let emissionPeriods = ((height - startEmissionH) / blocksPerYear)
	142	+	func calcEmission (acc,i) = {
	143	+	let $t047104747 = acc
	144	+	let curEmission = $t047104747._1
	145	+	let prevEmission = $t047104747._2
	146	+	if ((emissionPeriods > i))
	147	+	then $Tuple2(fraction(curEmission, 75, 100), curEmission)
	148	+	else $Tuple2(curEmission, prevEmission)
	149	+	}
	150	+
	151	+	let $t049055071 = {
	152	+	let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
	153	+	let $s = size($l)
	154	+	let $acc0 = $Tuple2(swopYearEmission, swopYearEmission)
	155	+	func $f0_1 ($a,$i) = if (($i >= $s))
	156	+	then $a
	157	+	else calcEmission($a, $l[$i])
	158	+
	159	+	func $f0_2 ($a,$i) = if (($i >= $s))
	160	+	then $a
	161	+	else throw("List size exceeds 20")
	162	+
	163	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
	164	+	}
	165	+	let curEmission = $t049055071._1
	166	+	let prevEmission = $t049055071._2
	167	+	$Tuple3((curEmission / blocksPerYear), (prevEmission / blocksPerYear), (startEmissionH + (blocksPerYear * emissionPeriods)))
	168	+	}
	169	+
143	170
144	171		func getHeightFirstHarvest (pool) = valueOrElse(getInteger(Address(fromBase58String(pool)), kFirstHarvestHeight), 0)
145	172
146	173
147	174		func getFHShareLimitToken (pool) = valueOrErrorMessage(getInteger(pool, kShareLimitFH), ("No data on the key: " + kShareLimitFH))
148	175
149	176
150	177		func getTotalShareToken (pool) = valueOrErrorMessage(getInteger(this, (pool + kShareTotalShareTokens)), (("No data on the key: " + pool) + kShareTotalShareTokens))
151	178
152	179
153	180		func getPoolVoted (pool) = valueOrElse(getInteger(votingAddress, (pool + kPoolVote)), valueOrElse(parseInt(split(valueOrElse(getString(votingAddress, (pool + kPoolStruc)), ""), "_")[0]), 0))
154	181
155	182
156	183		func getUserPoolVoted (pool,user) = valueOrElse(getInteger(votingAddress, (((user + "_") + pool) + kUserPoolVote)), valueOrElse(parseInt(split(valueOrElse(getString(votingAddress, (((user + "_") + pool) + kUserPoolStruc)), ""), "_")[0]), 0))
157	184
158	185
159	186		func getShareAssetId (pool) = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
160	187
161	188
162	189		func accountBalance (assetId) = match assetId {
163	190		case id: ByteVector =>
164	191		assetBalance(this, id)
165	192		case waves: Unit =>
166	193		wavesBalance(this).available
167	194		case _ =>
168	195		throw("Match error")
169	196		}
170	197
171	198
172	199		func calcScaleValue (assetId1,assetId2) = {
173	200		let assetId1Decimals = value(assetInfo(assetId1)).decimals
174	201		let assetId2Decimals = value(assetInfo(assetId2)).decimals
175	202		let scaleDigits = ((assetId2Decimals - assetId1Decimals) + 8)
176	203		pow(10, 0, scaleDigits, 0, 0, DOWN)
177	204		}
178	205
179	206
180	207		func userAvailableSWOP (pool,user) = valueOrElse(getInteger(this, (((pool + "_") + user) + kAvailableSWOP)), 0)
181	208
182	209
183	210		func rewardInfo (pool) = {
184		-	let totalRewardPerBlockCurrent = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockCurrent), ((("No data on the key: " + kTotalRewardPerBlockCurrent) + " at address ") + toString(govAddress)))
185		-	let totalRewardPerBlockPrevious = valueOrErrorMessage(getInteger(govAddress, kTotalRewardPerBlockPrevious), ((("No data on the key: " + kTotalRewardPerBlockPrevious) + " at address ") + toString(govAddress)))
	211	+	let $t068867001 = getRewardsPerBlockInfo()
	212	+	let totalRewardPerBlockCurrent = $t068867001._1
	213	+	let totalRewardPerBlockPrevious = $t068867001._2
	214	+	let lastEmissionUpdateHeight = $t068867001._3
186	215		let rewardPoolFractionCurrent = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionCurrent)), (((("No data on the key: " + pool) + kRewardPoolFractionCurrent) + " at address ") + toString(govAddress)))
187	216		let rewardUpdateHeight = valueOrErrorMessage(getInteger(govAddress, kRewardUpdateHeight), ((("No data on the key: " + kRewardUpdateHeight) + " at address ") + toString(govAddress)))
188	217		let poolRewardUpdateHeight = valueOrElse(getInteger(govAddress, (pool + kHeightPoolFraction)), rewardUpdateHeight)
189	218		let rewardPoolFractionPrevious = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionPrevious)), (((("No data on the key: " + pool) + kRewardPoolFractionPrevious) + " at address ") + toString(govAddress)))
190	219		let rewardPoolCurrent = fraction(totalRewardPerBlockCurrent, rewardPoolFractionCurrent, totalVoteShare)
191	220		let rewardPoolPrevious = fraction(totalRewardPerBlockCurrent, rewardPoolFractionPrevious, totalVoteShare)
	221	+	let rewardPoolPrevCurrent = fraction(totalRewardPerBlockPrevious, rewardPoolFractionCurrent, totalVoteShare)
	222	+	let rewardPoolPrevPrevious = fraction(totalRewardPerBlockPrevious, rewardPoolFractionPrevious, totalVoteShare)
192	223		if (if ((rewardPoolCurrent > totalRewardPerBlockCurrent))
193	224		then true
194	225		else (rewardPoolPrevious > totalRewardPerBlockPrevious))
195	226		then throw("rewardPoolCurrent > totalRewardPerBlockCurrent or rewardPoolPrevious > totalRewardPerBlockPrevious")
196		-	else $~~Tuple4~~(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight)
	227	+	else $Tuple7(rewardPoolCurrent, rewardUpdateHeight, rewardPoolPrevious, poolRewardUpdateHeight, lastEmissionUpdateHeight, rewardPoolPrevCurrent, rewardPoolPrevPrevious)
197	228		}
198	229
199	230
200	231		func getLastInterestInfo (pool) = {
201	232		let farmInterest = valueOrErrorMessage(getInteger(this, (pool + kFarmLastInterest)), (("No data on the key: " + pool) + kFarmLastInterest))
202	233		let boostInterest = valueOrElse(getInteger(this, (pool + kBoostLastInterest)), 0)
203	234		let lastInterestHeight = valueOrElse(getInteger(this, (pool + kLastInterestHeight)), height)
204	235		$Tuple3(lastInterestHeight, farmInterest, boostInterest)
205	236		}
206	237
207	238
208	239		func calcFarmRwd (pool,curTotalReward) = {
209	240		let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
210	241		fraction(curTotalReward, lockBoostCoefScale, (poolBoostCoef + lockBoostCoefScale))
211	242		}
212	243
213	244
214	245		func calcBoostRwd (pool,curTotalReward) = {
215	246		let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
216	247		fraction(curTotalReward, poolBoostCoef, (poolBoostCoef + lockBoostCoefScale))
217	248		}
218	249
219	250
220		-	func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue) = {
221		-	let $~~t0951610689~~ = if (if (if ((rewardUpdateHeight > ~~height~~))
	251	+	func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue,toHeight) = {
	252	+	let $t01001511200 = if (if (if ((rewardUpdateHeight > toHeight))
222	253		then (rewardUpdateHeight == poolRewardUpdateHeight)
223	254		else false)
224	255		then true
225		-	else if ((~~height~~ > rewardUpdateHeight))
	256	+	else if ((toHeight > rewardUpdateHeight))
226	257		then (rewardUpdateHeight != poolRewardUpdateHeight)
227	258		else false)
228	259		then {
229		-	let r = (previousRewardPerBlock * (~~height~~ - lastInterestHeight))
	260	+	let r = (previousRewardPerBlock * (toHeight - lastInterestHeight))
230	261		$Tuple3(r, farmInterest, boostInterest)
231	262		}
232		-	else if (if (if ((~~height~~ > rewardUpdateHeight))
	263	+	else if (if (if ((toHeight > rewardUpdateHeight))
233	264		then (rewardUpdateHeight == poolRewardUpdateHeight)
234	265		else false)
235	266		then (lastInterestHeight > rewardUpdateHeight)
236	267		else false)
237	268		then {
238		-	let r = (currentRewardPerBlock * (~~height~~ - lastInterestHeight))
	269	+	let r = (currentRewardPerBlock * (toHeight - lastInterestHeight))
239	270		$Tuple3(r, farmInterest, boostInterest)
240	271		}
241	272		else {
242	273		let rwdBfrUpd = (previousRewardPerBlock * (rewardUpdateHeight - lastInterestHeight))
243	274		let fBfrUp = (farmInterest + fraction(calcFarmRwd(pool, rwdBfrUpd), scaleValue, shareTokenLocked))
244	275		let bBfrUp = (boostInterest + (if ((poolVoted > 0))
245	276		then fraction(calcBoostRwd(pool, rwdBfrUpd), scaleValue8, poolVoted)
246	277		else 0))
247		-	let rwd = (currentRewardPerBlock * (~~height~~ - rewardUpdateHeight))
	278	+	let rwd = (currentRewardPerBlock * (toHeight - rewardUpdateHeight))
248	279		$Tuple3(rwd, fBfrUp, bBfrUp)
249	280		}
250		-	let reward = $~~t0951610689~~._1
251		-	let farmIntrBefore = $~~t0951610689~~._2
252		-	let boostIntrBefore = $~~t0951610689~~._3
	281	+	let reward = $t01001511200._1
	282	+	let farmIntrBefore = $t01001511200._2
	283	+	let boostIntrBefore = $t01001511200._3
253	284		let newFarmInterest = (farmIntrBefore + fraction(calcFarmRwd(pool, reward), scaleValue, shareTokenLocked))
254	285		let newBoostInterest = (boostIntrBefore + (if ((poolVoted > 0))
255	286		then fraction(calcBoostRwd(pool, reward), scaleValue8, poolVoted)
256	287		else 0))
257	288		$Tuple2(newFarmInterest, newBoostInterest)
258	289		}
259	290
260	291
261	292		func claimCalc (pool,user) = {
262	293		let scaleValue = calcScaleValue(SWOP, getShareAssetId(pool))
263	294		let poolVoted = getPoolVoted(pool)
264	295		let uPoolVoted = getUserPoolVoted(pool, user)
265	296		let shareToken = getTotalShareToken(pool)
266	297		let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), shareToken)
267	298		let stratBFarmInterest = valueOrElse(getInteger(this, (pool + kStratBFarmInterest)), 0)
268		-	let $t01152711608 = getLastInterestInfo(pool)
269		-	let lastInterestHeight = $t01152711608._1
270		-	let farmInterest = $t01152711608._2
271		-	let boostInterest = $t01152711608._3
272		-	let $t01161311727 = rewardInfo(pool)
273		-	let currentRewardPerBlock = $t01161311727._1
274		-	let rewardUpdateHeight = $t01161311727._2
275		-	let previousRewardPerBlock = $t01161311727._3
276		-	let poolRewardUpdateHeight = $t01161311727._4
	299	+	let $t01203812119 = getLastInterestInfo(pool)
	300	+	let lastInterestHeight = $t01203812119._1
	301	+	let farmInterest = $t01203812119._2
	302	+	let boostInterest = $t01203812119._3
	303	+	let $t01212412381 = rewardInfo(pool)
	304	+	let currentRewardPerBlock = $t01212412381._1
	305	+	let rewardUpdateHeight = $t01212412381._2
	306	+	let previousRewardPerBlock = $t01212412381._3
	307	+	let poolRewardUpdateHeight = $t01212412381._4
	308	+	let emissionUpdateHeight = $t01212412381._5
	309	+	let prevCurrentRewardPerBlock = $t01212412381._6
	310	+	let prevPreviousRewardPerBlock = $t01212412381._7
277	311		let uFarmInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kFarmUserLastInterest)), farmInterest)
278	312		let uBoostInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kBoostUserLastInterest)), if (if ((stratBFarmInterest > uFarmInterest))
279	313		then (uPoolVoted > 0)
280	314		else false)
281	315		then 0
282	316		else boostInterest)
283	317		let uShareTokensStaked = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
284	318		let uShareTokensVirt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), uShareTokensStaked)
285	319		if ((totalShareVirtual == 0))
286	320		then {
287		-	let toTreasury = (currentRewardPerBlock * (height - lastInterestHeight))
	321	+	let toTreasury = if ((emissionUpdateHeight > lastInterestHeight))
	322	+	then ((prevCurrentRewardPerBlock * (emissionUpdateHeight - lastInterestHeight)) + (currentRewardPerBlock * (height - emissionUpdateHeight)))
	323	+	else (currentRewardPerBlock * (height - lastInterestHeight))
288	324		$Tuple4(farmInterest, boostInterest, 0, toTreasury)
289	325		}
290	326		else {
291		-	let $t01244012832 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue)
292		-	let newFarmInterest = $t01244012832._1
293		-	let newBoostInterest = $t01244012832._2
	327	+	let $t01333914476 = if ((emissionUpdateHeight > lastInterestHeight))
	328	+	then {
	329	+	let $t01375214311 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, prevCurrentRewardPerBlock, totalShareVirtual, prevPreviousRewardPerBlock, scaleValue, emissionUpdateHeight)
	330	+	let prevNewFarmInterest = $t01375214311._1
	331	+	let prevNewBoostInterest = $t01375214311._2
	332	+	$Tuple3(prevNewFarmInterest, prevNewBoostInterest, emissionUpdateHeight)
	333	+	}
	334	+	else $Tuple3(farmInterest, boostInterest, lastInterestHeight)
	335	+	let prevFarmInterest = $t01333914476._1
	336	+	let prevBoostInterest = $t01333914476._2
	337	+	let LIHeight = $t01333914476._3
	338	+	let $t01448514908 = calcInterest(pool, LIHeight, rewardUpdateHeight, poolRewardUpdateHeight, prevFarmInterest, prevBoostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue, height)
	339	+	let newFarmInterest = $t01448514908._1
	340	+	let newBoostInterest = $t01448514908._2
294	341		let farmRwd = fraction(uShareTokensVirt, (newFarmInterest - uFarmInterest), scaleValue)
295	342		let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
296	343		let boostRwdMax = fraction(fraction(uShareTokensVirt, (newFarmInterest - max([uFarmInterest, stratBFarmInterest])), scaleValue), poolBoostCoef, lockBoostCoefScale)
297	344		let curBoostRwd = fraction((newBoostInterest - uBoostInterest), uPoolVoted, scaleValue8)
298	345		let boostRwd = min([boostRwdMax, curBoostRwd])
299	346		let toTreasury = (boostRwdMax - boostRwd)
300	347		if ((0 > toTreasury))
301	348		then throw("toTreasury < 0")
302	349		else $Tuple4(newFarmInterest, newBoostInterest, (farmRwd + boostRwd), toTreasury)
303	350		}
304	351		}
305	352
306	353
307	354		func availableClaimCalcAllByUser (pools,user) = {
308	355		func calcAvailable (acc,pool) = {
309		-	let $~~t01370113730~~ = acc
310		-	let newPools = $~~t01370113730~~._1
311		-	let amounts = $~~t01370113730~~._2
312		-	let $~~t01373913792~~ = claimCalc(pool, user)
313		-	let fi = $~~t01373913792~~._1
314		-	let bi = $~~t01373913792~~._2
315		-	let claimAmount = $~~t01373913792~~._3
316		-	let tt = $~~t01373913792~~._4
	356	+	let $t01577715806 = acc
	357	+	let newPools = $t01577715806._1
	358	+	let amounts = $t01577715806._2
	359	+	let $t01581515868 = claimCalc(pool, user)
	360	+	let fi = $t01581515868._1
	361	+	let bi = $t01581515868._2
	362	+	let claimAmount = $t01581515868._3
	363	+	let tt = $t01581515868._4
317	364		let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
318	365		$Tuple2((newPools :+ pool), (amounts :+ availableFund))
319	366		}
320	367
321	368		let $l = pools
322	369		let $s = size($l)
323	370		let $acc0 = $Tuple2(nil, nil)
324	371		func $f0_1 ($a,$i) = if (($i >= $s))
325	372		then $a
326	373		else calcAvailable($a, $l[$i])
327	374
328	375		func $f0_2 ($a,$i) = if (($i >= $s))
329	376		then $a
330	377		else throw("List size exceeds 60")
331	378
332	379		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60)
333	380		}
334	381
335	382
336	383		func canLockInFirstHarvest (pool,user,userShareTokensStaked,pmtAmount,lockType) = if ((getHeightFirstHarvest(pool) > height))
337	384		then {
338	385		let totalVoteAmount = valueOrElse(getInteger(votingAddress, (pool + kHarvestPoolVote)), 0)
339	386		let userVoteAmount = valueOrElse(getInteger(votingAddress, (((user + "_") + pool) + kHarvestUserPoolVote)), 0)
340	387		let FHShareTokenLimit = getFHShareLimitToken(addressFromStringValue(pool))
341	388		let FHShareTokenUserLimit = (fraction(FHShareTokenLimit, userVoteAmount, totalVoteAmount) - userShareTokensStaked)
342	389		if ((lockType > 0))
343	390		then throw("You can't lock shareTokens till first harvest end.")
344	391		else if ((userVoteAmount == 0))
345	392		then 0
346	393		else if ((pmtAmount >= FHShareTokenUserLimit))
347	394		then (pmtAmount - FHShareTokenUserLimit)
348	395		else 0
349	396		}
350	397		else 0
351	398
352	399
353	400		func getLockParams (type) = {
354	401		let lockParams = split(valueOrErrorMessage(getString(this, (toString(type) + kLockParams)), ("There are no key for lock type" + toString(type))), "_")
355	402		$Tuple2(parseIntValue(lockParams[0]), parseIntValue(lockParams[1]))
356	403		}
357	404
358	405
359	406		func suspend (cause) = [BooleanEntry(kActive, false), StringEntry(kCause, cause)]
360	407
361	408
362	409		func isActive () = if (if (active)
363	410		then activeGlob
364	411		else false)
365	412		then unit
366	413		else throw("DApp is inactive at this moment")
367	414
368	415
369	416		func isAdminCall (i) = if (containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey))
370	417		then unit
371	418		else throw("Only admin can call this function")
372	419
373	420
374	421		func isPoolCall (i,pool) = if (if ((toString(i.caller) == pool))
375	422		then true
376	423		else (i.caller == cpmmContract))
377	424		then unit
378	425		else throw("Only pool can call this function")
379	426
380	427
381		-	func getDeprecatedPool (pool) = valueOrElse(getBoolean(oracle, (kDeprecatedPool + pool)), false)
382		-
383		-
384		-	func isDeprecatedPool (pool) = if (!(getDeprecatedPool(pool)))
385		-	then unit
386		-	else throw("Pool is deprecated. Only unlock action allowed.")
387		-
388		-
389	428		func isSelfCall (i) = if ((i.caller == this))
390	429		then unit
391	430		else throw("Only contract itself can call this function")
392	431
393	432
394	433		func calcLockShareTokens (i,caller,pool,lockType) = {
395	434		let shareAssetId = getShareAssetId(pool)
396	435		let user = toString(caller)
397	436		let totalShare = getTotalShareToken(pool)
398	437		let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShare)
399	438		let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
400	439		let userLockedHeigt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), 0)
401	440		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
402	441		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
403	442		let totalUserShareTokens = ((userStakedAmount + userLockedAmount) + i.payments[0].amount)
404		-	let $~~t01684116893~~ = getLockParams(lockType)
405		-	let lockPeriod = $~~t01684116893~~._1
406		-	let lockCoef = $~~t01684116893~~._2
	443	+	let $t01866918721 = getLockParams(lockType)
	444	+	let lockPeriod = $t01866918721._1
	445	+	let lockCoef = $t01866918721._2
407	446		let lockWavesFee = getIntegerValue(this, kLockWavesFee)

github/deemru/w8io/026f985 
163.31 ms ◑