w8 · tx · 7Pt···xRe

tx · 7PtKSiaQ2zQvqbfNPJT2B3oDv3uaR76rG3B7NL1CZxRe

3P73HDkPqG15nLXevjCbmXtazHYTZbpPoPw:  -0.04000000 Waves

2023.02.13 15:09 [3513423] smart account 3P73HDkPqG15nLXevjCbmXtazHYTZbpPoPw > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7PtKSiaQ2zQvqbfNPJT2B3oDv3uaR76rG3B7NL1CZxRe",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1676289945784,
    "version": 2,
    "chainId": 87,
    "sender": "3P73HDkPqG15nLXevjCbmXtazHYTZbpPoPw",
    "senderPublicKey": "B3jG1KiAb24bgwe28D9JKKkg9mtpiGTeEAYmQPrtHwQQ",
    "proofs": [
        "",
        "5YaSYizL5HkFMb6TFSa6Ji4MKsVi1PBd11WHs57j4MGKbnqBCjGAPUCEPMHFkPukSLUYantCwAvcBL3eVi5AfvDM",
        "4jbL5ZPoztRhozUvrectUkf3AmoWidgeiimnLxuMueiMpLGBsM73BQZu5Atj2MuUiYxQ9ucfh1deuVGC7asP914s"
    ],
    "script": "base64:BgJiCAISAwoBCBIDCgEIEgMKAQgSBAoCCAESBQoDAggBEgUKAwgBARIECgIICBIECgIICBIECgIIARIFCgMCCAESAwoBCBIECgIIAhIDCgEIEgMKARgSAwoBGBIECgIICBIAEgBgAAdrQWN0aXZlAgZhY3RpdmUAC2tBY3RpdmVHbG9iAhRhY3RpdmVfYWxsX2NvbnRyYWN0cwAPa0RlcHJlY2F0ZWRQb29sAgtkZXByZWNhdGVkXwAGa0NhdXNlAg5zaHV0ZG93bl9jYXVzZQAaa1Jld2FyZFBvb2xGcmFjdGlvbkN1cnJlbnQCHV9jdXJyZW50X3Bvb2xfZnJhY3Rpb25fcmV3YXJkABtrUmV3YXJkUG9vbEZyYWN0aW9uUHJldmlvdXMCHl9wcmV2aW91c19wb29sX2ZyYWN0aW9uX3Jld2FyZAATa0hlaWdodFBvb2xGcmFjdGlvbgIaX3Bvb2xfcmV3YXJkX3VwZGF0ZV9oZWlnaHQAE2tSZXdhcmRVcGRhdGVIZWlnaHQCFHJld2FyZF91cGRhdGVfaGVpZ2h0ABZrVXNlclNoYXJlVG9rZW5zU3Rha2VkAhRfc2hhcmVfdG9rZW5zX2xvY2tlZAAWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAIVX3NoYXJlX3Rva2Vuc19ibG9ja2VkABprVXNlclNoYXJlVG9rZW5zTG9ja2VkVHlwZQIaX3NoYXJlX3Rva2Vuc19ibG9ja2VkX3R5cGUAHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQCHF9zaGFyZV90b2tlbnNfYmxvY2tlZF9oZWlnaHQAF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsAhVfc2hhcmVfdG9rZW5zX3ZpcnR1YWwAFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMCGl90b3RhbF9zaGFyZV90b2tlbnNfbG9ja2VkABNrU2hhcmVUb2tlbnNWaXJ0dWFsAhtfdG90YWxfc2hhcmVfdG9rZW5zX3ZpcnR1YWwAC2tMb2NrUGFyYW1zAgxfbG9ja19wYXJhbXMADWtMb2NrV2F2ZXNGZWUCDmxvY2tfd2F2ZXNfZmVlAA5rUG9vbEJvb3N0Q29lZgILX2Jvb3N0X2NvZWYAEWtGYXJtTGFzdEludGVyZXN0Ag5fbGFzdF9pbnRlcmVzdAAVa0Zhcm1Vc2VyTGFzdEludGVyZXN0Ag5fbGFzdF9pbnRlcmVzdAASa0Jvb3N0TGFzdEludGVyZXN0AhBfbGFzdF9pbnRlcmVzdF9iABZrQm9vc3RVc2VyTGFzdEludGVyZXN0AhJfbGFzdF9pbnRlcmVzdF91X2IAE2tMYXN0SW50ZXJlc3RIZWlnaHQCFV9sYXN0X2ludGVyZXN0X2hlaWdodAAHa1NXT1BpZAIHU1dPUF9pZAAOa0F2YWlsYWJsZVNXT1ACD19hdmFpbGFibGVfU1dPUAAQa0hhcnZlc3RQb29sVm90ZQIYX2hhcnZlc3RfcG9vbF92b3RlX2dTV09QAAlrUG9vbFZvdGUCEF9wb29sX3ZvdGVfZ1NXT1AADWtVc2VyUG9vbFZvdGUCEF91c2VyX3ZvdGVfZ1NXT1AACmtQb29sU3RydWMCC19wb29sX3N0cnVjAA5rVXNlclBvb2xTdHJ1YwIQX3VzZXJfcG9vbF9zdHJ1YwAUa0hhcnZlc3RVc2VyUG9vbFZvdGUCHV9oYXJ2ZXN0X3VzZXJfcG9vbF92b3RlX2dTV09QABNrRmlyc3RIYXJ2ZXN0SGVpZ2h0AhRmaXJzdF9oYXJ2ZXN0X2hlaWdodAANa1NoYXJlTGltaXRGSAIcc2hhcmVfbGltaXRfb25fZmlyc3RfaGFydmVzdAATa1N0cmF0QkZhcm1JbnRlcmVzdAIWX3N0cmF0X2JfZmFybV9pbnRlcmVzdAANa0NwbW1Db250cmFjdAINY3BtbV9jb250cmFjdAANa0FkbWluUHViS2V5MQILYWRtaW5fcHViXzEADWtBZG1pblB1YktleTICC2FkbWluX3B1Yl8yAA1rQWRtaW5QdWJLZXkzAgthZG1pbl9wdWJfMwASa0FkbWluSW52b2tlUHViS2V5AhBhZG1pbl9pbnZva2VfcHViABBrTW9uZXlCb3hBZGRyZXNzAhFtb25leV9ib3hfYWRkcmVzcwAOa1ZvdGluZ0FkZHJlc3MCDnZvdGluZ19hZGRyZXNzAAtrR292QWRkcmVzcwISZ292ZXJuYW5jZV9hZGRyZXNzABFrTFBGYXJtaW5nQWRkcmVzcwIKbHBfZmFybWluZwAUa0Zhcm1pbmdUcmVhc3VyZUFkZHICEGZhcm1pbmdfdHJlYXN1cmUABm9yYWNsZQkBB0FkZHJlc3MBARoBV4r/CGiaNbpAzWF08hI33qY38Po4zugeOAAOdG90YWxWb3RlU2hhcmUAgMivoCUAC3NjYWxlVmFsdWU4AIDC1y8AEmxvY2tCb29zdENvZWZTY2FsZQDoBwAQZGVmUG9vbEJvb3N0Q29lZgD0AwAOc3RhcnRFbWlzc2lvbkgA0Ni1AQAQc3dvcFllYXJFbWlzc2lvbgCAgOmDsd4WAA1ibG9ja3NQZXJZZWFyAPqPIAETZ2V0QmFzZTU4RnJvbU9yYWNsZQEDa2V5BAckbWF0Y2gwCQCdCAIFBm9yYWNsZQUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQGc3RyaW5nBQckbWF0Y2gwCQDZBAEFBnN0cmluZwQHbm90aGluZwUHJG1hdGNoMAkAAgEJAKwCAgUDa2V5AghpcyBlbXB0eQAMYWRtaW5QdWJLZXkxCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTEADGFkbWluUHViS2V5MgkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkyAAxhZG1pblB1YktleTMJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MwAPbW9uZXlCb3hBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUQa01vbmV5Qm94QWRkcmVzcwANdm90aW5nQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDmtWb3RpbmdBZGRyZXNzAApnb3ZBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQULa0dvdkFkZHJlc3MAEWFkbWluSW52b2tlUHViS2V5CQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFEmtBZG1pbkludm9rZVB1YktleQAQbHBGYXJtaW5nQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFEWtMUEZhcm1pbmdBZGRyZXNzABNmYXJtaW5nVHJlYXN1cmVBZGRyCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUUa0Zhcm1pbmdUcmVhc3VyZUFkZHIADGNwbW1Db250cmFjdAkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtDcG1tQ29udHJhY3QABmFjdGl2ZQkBEUBleHRyTmF0aXZlKDEwNTEpAgUEdGhpcwUHa0FjdGl2ZQAKYWN0aXZlR2xvYgkBC3ZhbHVlT3JFbHNlAgkAmwgCBQZvcmFjbGUFC2tBY3RpdmVHbG9iBgAEU1dPUAkA2QQBCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzBQdrU1dPUGlkARZnZXRSZXdhcmRzUGVyQmxvY2tJbmZvAAQPZW1pc3Npb25QZXJpb2RzCQBpAgkAZQIFBmhlaWdodAUOc3RhcnRFbWlzc2lvbkgFDWJsb2Nrc1BlclllYXIKAQxjYWxjRW1pc3Npb24CA2FjYwFpBAskdDA0NzQ2NDc4MwUDYWNjBAtjdXJFbWlzc2lvbggFCyR0MDQ3NDY0NzgzAl8xBAxwcmV2RW1pc3Npb24IBQskdDA0NzQ2NDc4MwJfMgMJAGYCBQ9lbWlzc2lvblBlcmlvZHMFAWkJAJQKAgkAawMFC2N1ckVtaXNzaW9uAEsAZAULY3VyRW1pc3Npb24JAJQKAgULY3VyRW1pc3Npb24FDHByZXZFbWlzc2lvbgQLJHQwNDk0MTUxMDcKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKCQDMCAIACwkAzAgCAAwJAMwIAgANCQDMCAIADgkAzAgCAA8JAMwIAgAQCQDMCAIAEQkAzAgCABIJAMwIAgATBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFEHN3b3BZZWFyRW1pc3Npb24FEHN3b3BZZWFyRW1pc3Npb24KAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDGNhbGNFbWlzc2lvbgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMjAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUBAtjdXJFbWlzc2lvbggFCyR0MDQ5NDE1MTA3Al8xBAxwcmV2RW1pc3Npb24IBQskdDA0OTQxNTEwNwJfMgkAlQoDCQBpAgULY3VyRW1pc3Npb24FDWJsb2Nrc1BlclllYXIJAGkCBQxwcmV2RW1pc3Npb24FDWJsb2Nrc1BlclllYXIJAGQCBQ5zdGFydEVtaXNzaW9uSAkAaAIFDWJsb2Nrc1BlclllYXIFD2VtaXNzaW9uUGVyaW9kcwEVZ2V0SGVpZ2h0Rmlyc3RIYXJ2ZXN0AQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIJAQdBZGRyZXNzAQkA2QQBBQRwb29sBRNrRmlyc3RIYXJ2ZXN0SGVpZ2h0AAABFGdldEZIU2hhcmVMaW1pdFRva2VuAQRwb29sCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUEcG9vbAUNa1NoYXJlTGltaXRGSAkArAICAhRObyBkYXRhIG9uIHRoZSBrZXk6IAUNa1NoYXJlTGltaXRGSAESZ2V0VG90YWxTaGFyZVRva2VuAQRwb29sCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBRZrU2hhcmVUb3RhbFNoYXJlVG9rZW5zCQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFBHBvb2wFFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMBDGdldFBvb2xWb3RlZAEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ12b3RpbmdBZGRyZXNzCQCsAgIFBHBvb2wFCWtQb29sVm90ZQkBC3ZhbHVlT3JFbHNlAgkAtgkBCQCRAwIJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ12b3RpbmdBZGRyZXNzCQCsAgIFBHBvb2wFCmtQb29sU3RydWMCAAIBXwAAAAABEGdldFVzZXJQb29sVm90ZWQCBHBvb2wEdXNlcgkBC3ZhbHVlT3JFbHNlAgkAmggCBQ12b3RpbmdBZGRyZXNzCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sBQ1rVXNlclBvb2xWb3RlCQELdmFsdWVPckVsc2UCCQC2CQEJAJEDAgkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFDXZvdGluZ0FkZHJlc3MJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wFDmtVc2VyUG9vbFN0cnVjAgACAV8AAAAAAQ9nZXRTaGFyZUFzc2V0SWQBBHBvb2wJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgkBBXZhbHVlAQkApggBBQRwb29sAg5zaGFyZV9hc3NldF9pZAEOYWNjb3VudEJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCaWQFByRtYXRjaDAJAPAHAgUEdGhpcwUCaWQDCQABAgUHJG1hdGNoMAIEVW5pdAQFd2F2ZXMFByRtYXRjaDAICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQACAQILTWF0Y2ggZXJyb3IBDmNhbGNTY2FsZVZhbHVlAghhc3NldElkMQhhc3NldElkMgQQYXNzZXRJZDFEZWNpbWFscwgJAQV2YWx1ZQEJAOwHAQUIYXNzZXRJZDEIZGVjaW1hbHMEEGFzc2V0SWQyRGVjaW1hbHMICQEFdmFsdWUBCQDsBwEFCGFzc2V0SWQyCGRlY2ltYWxzBAtzY2FsZURpZ2l0cwkAZAIJAGUCBRBhc3NldElkMkRlY2ltYWxzBRBhc3NldElkMURlY2ltYWxzAAgJAGwGAAoAAAULc2NhbGVEaWdpdHMAAAAABQRET1dOARF1c2VyQXZhaWxhYmxlU1dPUAIEcG9vbAR1c2VyCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFDmtBdmFpbGFibGVTV09QAAABCnJld2FyZEluZm8BBHBvb2wECyR0MDY5MjI3MDM3CQEWZ2V0UmV3YXJkc1BlckJsb2NrSW5mbwAEGnRvdGFsUmV3YXJkUGVyQmxvY2tDdXJyZW50CAULJHQwNjkyMjcwMzcCXzEEG3RvdGFsUmV3YXJkUGVyQmxvY2tQcmV2aW91cwgFCyR0MDY5MjI3MDM3Al8yBBhsYXN0RW1pc3Npb25VcGRhdGVIZWlnaHQIBQskdDA2OTIyNzAzNwJfMwQZcmV3YXJkUG9vbEZyYWN0aW9uQ3VycmVudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCmdvdkFkZHJlc3MJAKwCAgUEcG9vbAUaa1Jld2FyZFBvb2xGcmFjdGlvbkN1cnJlbnQJAKwCAgkArAICCQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFBHBvb2wFGmtSZXdhcmRQb29sRnJhY3Rpb25DdXJyZW50AgwgYXQgYWRkcmVzcyAJAKUIAQUKZ292QWRkcmVzcwQScmV3YXJkVXBkYXRlSGVpZ2h0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUKZ292QWRkcmVzcwUTa1Jld2FyZFVwZGF0ZUhlaWdodAkArAICCQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFE2tSZXdhcmRVcGRhdGVIZWlnaHQCDCBhdCBhZGRyZXNzIAkApQgBBQpnb3ZBZGRyZXNzBBZwb29sUmV3YXJkVXBkYXRlSGVpZ2h0CQELdmFsdWVPckVsc2UCCQCaCAIFCmdvdkFkZHJlc3MJAKwCAgUEcG9vbAUTa0hlaWdodFBvb2xGcmFjdGlvbgUScmV3YXJkVXBkYXRlSGVpZ2h0BBpyZXdhcmRQb29sRnJhY3Rpb25QcmV2aW91cwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCmdvdkFkZHJlc3MJAKwCAgUEcG9vbAUba1Jld2FyZFBvb2xGcmFjdGlvblByZXZpb3VzCQCsAgIJAKwCAgkArAICCQCsAgICFE5vIGRhdGEgb24gdGhlIGtleTogBQRwb29sBRtrUmV3YXJkUG9vbEZyYWN0aW9uUHJldmlvdXMCDCBhdCBhZGRyZXNzIAkApQgBBQpnb3ZBZGRyZXNzBBFyZXdhcmRQb29sQ3VycmVudAkAawMFGnRvdGFsUmV3YXJkUGVyQmxvY2tDdXJyZW50BRlyZXdhcmRQb29sRnJhY3Rpb25DdXJyZW50BQ50b3RhbFZvdGVTaGFyZQQScmV3YXJkUG9vbFByZXZpb3VzCQBrAwUadG90YWxSZXdhcmRQZXJCbG9ja0N1cnJlbnQFGnJld2FyZFBvb2xGcmFjdGlvblByZXZpb3VzBQ50b3RhbFZvdGVTaGFyZQQVcmV3YXJkUG9vbFByZXZDdXJyZW50CQBrAwUbdG90YWxSZXdhcmRQZXJCbG9ja1ByZXZpb3VzBRlyZXdhcmRQb29sRnJhY3Rpb25DdXJyZW50BQ50b3RhbFZvdGVTaGFyZQQWcmV3YXJkUG9vbFByZXZQcmV2aW91cwkAawMFG3RvdGFsUmV3YXJkUGVyQmxvY2tQcmV2aW91cwUacmV3YXJkUG9vbEZyYWN0aW9uUHJldmlvdXMFDnRvdGFsVm90ZVNoYXJlAwMJAGYCBRFyZXdhcmRQb29sQ3VycmVudAUadG90YWxSZXdhcmRQZXJCbG9ja0N1cnJlbnQGCQBmAgUScmV3YXJkUG9vbFByZXZpb3VzBRt0b3RhbFJld2FyZFBlckJsb2NrUHJldmlvdXMJAAIBAmJyZXdhcmRQb29sQ3VycmVudCA+IHRvdGFsUmV3YXJkUGVyQmxvY2tDdXJyZW50IG9yIHJld2FyZFBvb2xQcmV2aW91cyA+IHRvdGFsUmV3YXJkUGVyQmxvY2tQcmV2aW91cwkAmQoHBRFyZXdhcmRQb29sQ3VycmVudAUScmV3YXJkVXBkYXRlSGVpZ2h0BRJyZXdhcmRQb29sUHJldmlvdXMFFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQFGGxhc3RFbWlzc2lvblVwZGF0ZUhlaWdodAUVcmV3YXJkUG9vbFByZXZDdXJyZW50BRZyZXdhcmRQb29sUHJldlByZXZpb3VzARNnZXRMYXN0SW50ZXJlc3RJbmZvAQRwb29sBAxmYXJtSW50ZXJlc3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0CQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BA1ib29zdEludGVyZXN0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0AAAEEmxhc3RJbnRlcmVzdEhlaWdodAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAlQoDBRJsYXN0SW50ZXJlc3RIZWlnaHQFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAELY2FsY0Zhcm1Sd2QCBHBvb2wOY3VyVG90YWxSZXdhcmQEDXBvb2xCb29zdENvZWYJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBQ5rUG9vbEJvb3N0Q29lZgUQZGVmUG9vbEJvb3N0Q29lZgkAawMFDmN1clRvdGFsUmV3YXJkBRJsb2NrQm9vc3RDb2VmU2NhbGUJAGQCBQ1wb29sQm9vc3RDb2VmBRJsb2NrQm9vc3RDb2VmU2NhbGUBDGNhbGNCb29zdFJ3ZAIEcG9vbA5jdXJUb3RhbFJld2FyZAQNcG9vbEJvb3N0Q29lZgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFDmtQb29sQm9vc3RDb2VmBRBkZWZQb29sQm9vc3RDb2VmCQBrAwUOY3VyVG90YWxSZXdhcmQFDXBvb2xCb29zdENvZWYJAGQCBQ1wb29sQm9vc3RDb2VmBRJsb2NrQm9vc3RDb2VmU2NhbGUBDGNhbGNJbnRlcmVzdAwEcG9vbBJsYXN0SW50ZXJlc3RIZWlnaHQScmV3YXJkVXBkYXRlSGVpZ2h0FnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQMZmFybUludGVyZXN0DWJvb3N0SW50ZXJlc3QJcG9vbFZvdGVkFWN1cnJlbnRSZXdhcmRQZXJCbG9jaxBzaGFyZVRva2VuTG9ja2VkFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sKc2NhbGVWYWx1ZQh0b0hlaWdodAQNJHQwMTAwNTExMTIzNgMDAwkAZgIFEnJld2FyZFVwZGF0ZUhlaWdodAUIdG9IZWlnaHQJAAACBRJyZXdhcmRVcGRhdGVIZWlnaHQFFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQHBgMJAGYCBQh0b0hlaWdodAUScmV3YXJkVXBkYXRlSGVpZ2h0CQECIT0CBRJyZXdhcmRVcGRhdGVIZWlnaHQFFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQHBAFyCQBoAgUWcHJldmlvdXNSZXdhcmRQZXJCbG9jawkAZQIFCHRvSGVpZ2h0BRJsYXN0SW50ZXJlc3RIZWlnaHQJAJUKAwUBcgUMZmFybUludGVyZXN0BQ1ib29zdEludGVyZXN0AwMDCQBmAgUIdG9IZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAkAAAIFEnJld2FyZFVwZGF0ZUhlaWdodAUWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAcJAGYCBRJsYXN0SW50ZXJlc3RIZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAcEAXIJAGgCBRVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAGUCBQh0b0hlaWdodAUSbGFzdEludGVyZXN0SGVpZ2h0CQCVCgMFAXIFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAQJcndkQmZyVXBkCQBoAgUWcHJldmlvdXNSZXdhcmRQZXJCbG9jawkAZQIFEnJld2FyZFVwZGF0ZUhlaWdodAUSbGFzdEludGVyZXN0SGVpZ2h0BAZmQmZyVXAJAGQCBQxmYXJtSW50ZXJlc3QJAGsDCQELY2FsY0Zhcm1Sd2QCBQRwb29sBQlyd2RCZnJVcGQFCnNjYWxlVmFsdWUFEHNoYXJlVG9rZW5Mb2NrZWQEBmJCZnJVcAkAZAIFDWJvb3N0SW50ZXJlc3QDCQBmAgUJcG9vbFZvdGVkAAAJAGsDCQEMY2FsY0Jvb3N0UndkAgUEcG9vbAUJcndkQmZyVXBkBQtzY2FsZVZhbHVlOAUJcG9vbFZvdGVkAAAEA3J3ZAkAaAIFFWN1cnJlbnRSZXdhcmRQZXJCbG9jawkAZQIFCHRvSGVpZ2h0BRJyZXdhcmRVcGRhdGVIZWlnaHQJAJUKAwUDcndkBQZmQmZyVXAFBmJCZnJVcAQGcmV3YXJkCAUNJHQwMTAwNTExMTIzNgJfMQQOZmFybUludHJCZWZvcmUIBQ0kdDAxMDA1MTExMjM2Al8yBA9ib29zdEludHJCZWZvcmUIBQ0kdDAxMDA1MTExMjM2Al8zBA9uZXdGYXJtSW50ZXJlc3QJAGQCBQ5mYXJtSW50ckJlZm9yZQkAawMJAQtjYWxjRmFybVJ3ZAIFBHBvb2wFBnJld2FyZAUKc2NhbGVWYWx1ZQUQc2hhcmVUb2tlbkxvY2tlZAQQbmV3Qm9vc3RJbnRlcmVzdAkAZAIFD2Jvb3N0SW50ckJlZm9yZQMJAGYCBQlwb29sVm90ZWQAAAkAawMJAQxjYWxjQm9vc3RSd2QCBQRwb29sBQZyZXdhcmQFC3NjYWxlVmFsdWU4BQlwb29sVm90ZWQAAAkAlAoCBQ9uZXdGYXJtSW50ZXJlc3QFEG5ld0Jvb3N0SW50ZXJlc3QBCWNsYWltQ2FsYwIEcG9vbAR1c2VyBApzY2FsZVZhbHVlCQEOY2FsY1NjYWxlVmFsdWUCBQRTV09QCQEPZ2V0U2hhcmVBc3NldElkAQUEcG9vbAQJcG9vbFZvdGVkCQEMZ2V0UG9vbFZvdGVkAQUEcG9vbAQKdVBvb2xWb3RlZAkBEGdldFVzZXJQb29sVm90ZWQCBQRwb29sBQR1c2VyBApzaGFyZVRva2VuCQESZ2V0VG90YWxTaGFyZVRva2VuAQUEcG9vbAQRdG90YWxTaGFyZVZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsBQpzaGFyZVRva2VuBBJzdHJhdEJGYXJtSW50ZXJlc3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBRNrU3RyYXRCRmFybUludGVyZXN0AAAEDSR0MDEyMDc0MTIxNTUJARNnZXRMYXN0SW50ZXJlc3RJbmZvAQUEcG9vbAQSbGFzdEludGVyZXN0SGVpZ2h0CAUNJHQwMTIwNzQxMjE1NQJfMQQMZmFybUludGVyZXN0CAUNJHQwMTIwNzQxMjE1NQJfMgQNYm9vc3RJbnRlcmVzdAgFDSR0MDEyMDc0MTIxNTUCXzMEDSR0MDEyMTYwMTI0MTcJAQpyZXdhcmRJbmZvAQUEcG9vbAQVY3VycmVudFJld2FyZFBlckJsb2NrCAUNJHQwMTIxNjAxMjQxNwJfMQQScmV3YXJkVXBkYXRlSGVpZ2h0CAUNJHQwMTIxNjAxMjQxNwJfMgQWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFDSR0MDEyMTYwMTI0MTcCXzMEFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQIBQ0kdDAxMjE2MDEyNDE3Al80BBRlbWlzc2lvblVwZGF0ZUhlaWdodAgFDSR0MDEyMTYwMTI0MTcCXzUEGXByZXZDdXJyZW50UmV3YXJkUGVyQmxvY2sIBQ0kdDAxMjE2MDEyNDE3Al82BBpwcmV2UHJldmlvdXNSZXdhcmRQZXJCbG9jawgFDSR0MDEyMTYwMTI0MTcCXzcEDXVGYXJtSW50ZXJlc3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QEDnVCb29zdEludGVyZXN0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QDAwkAZgIFEnN0cmF0QkZhcm1JbnRlcmVzdAUNdUZhcm1JbnRlcmVzdAkAZgIFCnVQb29sVm90ZWQAAAcAAAUNYm9vc3RJbnRlcmVzdAQSdVNoYXJlVG9rZW5zU3Rha2VkCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQAAAQQdVNoYXJlVG9rZW5zVmlydAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUSdVNoYXJlVG9rZW5zU3Rha2VkAwkAAAIFEXRvdGFsU2hhcmVWaXJ0dWFsAAAECnRvVHJlYXN1cnkDCQBmAgUUZW1pc3Npb25VcGRhdGVIZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAkAZAIJAGgCBRlwcmV2Q3VycmVudFJld2FyZFBlckJsb2NrCQBlAgUUZW1pc3Npb25VcGRhdGVIZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAkAaAIFFWN1cnJlbnRSZXdhcmRQZXJCbG9jawkAZQIFBmhlaWdodAUUZW1pc3Npb25VcGRhdGVIZWlnaHQJAGgCBRVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAGUCBQZoZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAkAlgoEBQxmYXJtSW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QAAAUKdG9UcmVhc3VyeQQNJHQwMTMzNzUxNDUxMgMJAGYCBRRlbWlzc2lvblVwZGF0ZUhlaWdodAUSbGFzdEludGVyZXN0SGVpZ2h0BA0kdDAxMzc4ODE0MzQ3CQEMY2FsY0ludGVyZXN0DAUEcG9vbAUSbGFzdEludGVyZXN0SGVpZ2h0BRJyZXdhcmRVcGRhdGVIZWlnaHQFFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAUJcG9vbFZvdGVkBRlwcmV2Q3VycmVudFJld2FyZFBlckJsb2NrBRF0b3RhbFNoYXJlVmlydHVhbAUacHJldlByZXZpb3VzUmV3YXJkUGVyQmxvY2sFCnNjYWxlVmFsdWUFFGVtaXNzaW9uVXBkYXRlSGVpZ2h0BBNwcmV2TmV3RmFybUludGVyZXN0CAUNJHQwMTM3ODgxNDM0NwJfMQQUcHJldk5ld0Jvb3N0SW50ZXJlc3QIBQ0kdDAxMzc4ODE0MzQ3Al8yCQCVCgMFE3ByZXZOZXdGYXJtSW50ZXJlc3QFFHByZXZOZXdCb29zdEludGVyZXN0BRRlbWlzc2lvblVwZGF0ZUhlaWdodAkAlQoDBQxmYXJtSW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QFEmxhc3RJbnRlcmVzdEhlaWdodAQQcHJldkZhcm1JbnRlcmVzdAgFDSR0MDEzMzc1MTQ1MTICXzEEEXByZXZCb29zdEludGVyZXN0CAUNJHQwMTMzNzUxNDUxMgJfMgQITElIZWlnaHQIBQ0kdDAxMzM3NTE0NTEyAl8zBA0kdDAxNDUyMTE0OTQ0CQEMY2FsY0ludGVyZXN0DAUEcG9vbAUITElIZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAUWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAUQcHJldkZhcm1JbnRlcmVzdAURcHJldkJvb3N0SW50ZXJlc3QFCXBvb2xWb3RlZAUVY3VycmVudFJld2FyZFBlckJsb2NrBRF0b3RhbFNoYXJlVmlydHVhbAUWcHJldmlvdXNSZXdhcmRQZXJCbG9jawUKc2NhbGVWYWx1ZQUGaGVpZ2h0BA9uZXdGYXJtSW50ZXJlc3QIBQ0kdDAxNDUyMTE0OTQ0Al8xBBBuZXdCb29zdEludGVyZXN0CAUNJHQwMTQ1MjExNDk0NAJfMgQHZmFybVJ3ZAkAawMFEHVTaGFyZVRva2Vuc1ZpcnQJAGUCBQ9uZXdGYXJtSW50ZXJlc3QFDXVGYXJtSW50ZXJlc3QFCnNjYWxlVmFsdWUEDXBvb2xCb29zdENvZWYJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBQ5rUG9vbEJvb3N0Q29lZgUQZGVmUG9vbEJvb3N0Q29lZgQLYm9vc3RSd2RNYXgJAGsDCQBrAwUQdVNoYXJlVG9rZW5zVmlydAkAZQIFD25ld0Zhcm1JbnRlcmVzdAkAlgMBCQDMCAIFDXVGYXJtSW50ZXJlc3QJAMwIAgUSc3RyYXRCRmFybUludGVyZXN0BQNuaWwFCnNjYWxlVmFsdWUFDXBvb2xCb29zdENvZWYFEmxvY2tCb29zdENvZWZTY2FsZQQLY3VyQm9vc3RSd2QJAGsDCQBlAgUQbmV3Qm9vc3RJbnRlcmVzdAUOdUJvb3N0SW50ZXJlc3QFCnVQb29sVm90ZWQFC3NjYWxlVmFsdWU4BAhib29zdFJ3ZAkAlwMBCQDMCAIFC2Jvb3N0UndkTWF4CQDMCAIFC2N1ckJvb3N0UndkBQNuaWwECnRvVHJlYXN1cnkJAGUCBQtib29zdFJ3ZE1heAUIYm9vc3RSd2QDCQBmAgAABQp0b1RyZWFzdXJ5CQACAQIOdG9UcmVhc3VyeSA8IDAJAJYKBAUPbmV3RmFybUludGVyZXN0BRBuZXdCb29zdEludGVyZXN0CQBkAgUHZmFybVJ3ZAUIYm9vc3RSd2QFCnRvVHJlYXN1cnkBG2F2YWlsYWJsZUNsYWltQ2FsY0FsbEJ5VXNlcgIFcG9vbHMEdXNlcgoBDWNhbGNBdmFpbGFibGUCA2FjYwRwb29sBA0kdDAxNTgxMzE1ODQyBQNhY2MECG5ld1Bvb2xzCAUNJHQwMTU4MTMxNTg0MgJfMQQHYW1vdW50cwgFDSR0MDE1ODEzMTU4NDICXzIEDSR0MDE1ODUxMTU5MDQJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAJmaQgFDSR0MDE1ODUxMTU5MDQCXzEEAmJpCAUNJHQwMTU4NTExNTkwNAJfMgQLY2xhaW1BbW91bnQIBQ0kdDAxNTg1MTE1OTA0Al8zBAJ0dAgFDSR0MDE1ODUxMTU5MDQCXzQEDWF2YWlsYWJsZUZ1bmQJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAkAlAoCCQDNCAIFCG5ld1Bvb2xzBQRwb29sCQDNCAIFB2Ftb3VudHMFDWF2YWlsYWJsZUZ1bmQKAAIkbAUFcG9vbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ1jYWxjQXZhaWxhYmxlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA2MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAEVY2FuTG9ja0luRmlyc3RIYXJ2ZXN0BQRwb29sBHVzZXIVdXNlclNoYXJlVG9rZW5zU3Rha2VkCXBtdEFtb3VudAhsb2NrVHlwZQMJAGYCCQEVZ2V0SGVpZ2h0Rmlyc3RIYXJ2ZXN0AQUEcG9vbAUGaGVpZ2h0BA90b3RhbFZvdGVBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUNdm90aW5nQWRkcmVzcwkArAICBQRwb29sBRBrSGFydmVzdFBvb2xWb3RlAAAEDnVzZXJWb3RlQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFDXZvdGluZ0FkZHJlc3MJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wFFGtIYXJ2ZXN0VXNlclBvb2xWb3RlAAAEEUZIU2hhcmVUb2tlbkxpbWl0CQEUZ2V0RkhTaGFyZUxpbWl0VG9rZW4BCQERQGV4dHJOYXRpdmUoMTA2MikBBQRwb29sBBVGSFNoYXJlVG9rZW5Vc2VyTGltaXQJAGUCCQBrAwURRkhTaGFyZVRva2VuTGltaXQFDnVzZXJWb3RlQW1vdW50BQ90b3RhbFZvdGVBbW91bnQFFXVzZXJTaGFyZVRva2Vuc1N0YWtlZAMJAGYCBQhsb2NrVHlwZQAACQACAQIyWW91IGNhbid0IGxvY2sgc2hhcmVUb2tlbnMgdGlsbCBmaXJzdCBoYXJ2ZXN0IGVuZC4DCQAAAgUOdXNlclZvdGVBbW91bnQAAAAAAwkAZwIFCXBtdEFtb3VudAUVRkhTaGFyZVRva2VuVXNlckxpbWl0CQBlAgUJcG10QW1vdW50BRVGSFNoYXJlVG9rZW5Vc2VyTGltaXQAAAAAAQ1nZXRMb2NrUGFyYW1zAQR0eXBlBApsb2NrUGFyYW1zCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzCQCsAgIJAKQDAQUEdHlwZQULa0xvY2tQYXJhbXMJAKwCAgIeVGhlcmUgYXJlIG5vIGtleSBmb3IgbG9jayB0eXBlCQCkAwEFBHR5cGUCAV8JAJQKAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmxvY2tQYXJhbXMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmxvY2tQYXJhbXMAAQEHc3VzcGVuZAEFY2F1c2UJAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2tBY3RpdmUHCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmtDYXVzZQUFY2F1c2UFA25pbAEIaXNBY3RpdmUAAwMFBmFjdGl2ZQUKYWN0aXZlR2xvYgcFBHVuaXQJAAIBAh9EQXBwIGlzIGluYWN0aXZlIGF0IHRoaXMgbW9tZW50AQtpc0FkbWluQ2FsbAEBaQMJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFDGFkbWluUHViS2V5MQkAzAgCBQxhZG1pblB1YktleTIJAMwIAgUMYWRtaW5QdWJLZXkzBQNuaWwIBQFpD2NhbGxlclB1YmxpY0tleQUEdW5pdAkAAgECIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEKaXNQb29sQ2FsbAIBaQRwb29sAwMJAAACCQClCAEIBQFpBmNhbGxlcgUEcG9vbAYJAAACCAUBaQZjYWxsZXIFDGNwbW1Db250cmFjdAUEdW5pdAkAAgECIE9ubHkgcG9vbCBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uARFnZXREZXByZWNhdGVkUG9vbAEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQZvcmFjbGUJAKwCAgUPa0RlcHJlY2F0ZWRQb29sBQRwb29sBwEQaXNEZXByZWNhdGVkUG9vbAEEcG9vbAMJAQEhAQkBEWdldERlcHJlY2F0ZWRQb29sAQUEcG9vbAUEdW5pdAkAAgECL1Bvb2wgaXMgZGVwcmVjYXRlZC4gT25seSB1bmxvY2sgYWN0aW9uIGFsbG93ZWQuAQppc1NlbGZDYWxsAQFpAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwUEdW5pdAkAAgECK09ubHkgY29udHJhY3QgaXRzZWxmIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BE2NhbGNMb2NrU2hhcmVUb2tlbnMEAWkGY2FsbGVyBHBvb2wIbG9ja1R5cGUEDHNoYXJlQXNzZXRJZAkBD2dldFNoYXJlQXNzZXRJZAEFBHBvb2wEBHVzZXIJAKUIAQUGY2FsbGVyBAp0b3RhbFNoYXJlCQESZ2V0VG90YWxTaGFyZVRva2VuAQUEcG9vbAQRdG90YWxTaGFyZVZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsBQp0b3RhbFNoYXJlBBB1c2VyU3Rha2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQAAAQPdXNlckxvY2tlZEhlaWd0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQAAAQQdXNlckxvY2tlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAAAEEXVzZXJBbW91bnRWaXJ0dWFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRB1c2VyU3Rha2VkQW1vdW50BBR0b3RhbFVzZXJTaGFyZVRva2VucwkAZAIJAGQCBRB1c2VyU3Rha2VkQW1vdW50BRB1c2VyTG9ja2VkQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQNJHQwMTg5NTMxOTAwNQkBDWdldExvY2tQYXJhbXMBBQhsb2NrVHlwZQQKbG9ja1BlcmlvZAgFDSR0MDE4OTUzMTkwMDUCXzEECGxvY2tDb2VmCAUNJHQwMTg5NTMxOTAwNQJfMgQMbG9ja1dhdmVzRmVlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQ1rTG9ja1dhdmVzRmVlAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQxzaGFyZUFzc2V0SWQJAAIBAhtXcm9uZyBzaGFyZXRva2VuIGluIHBheW1lbnQDCQBnAgAACAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAkAAgECJVBheW1lbnQgYW1vdW50IG11c3QgYmUgZ3JlYXRlciB0aGFuIDADCQBmAgAABQhsb2NrVHlwZQkAAgECFWxvY2tUeXBlIG11c3QgYmUgPj0gMAQVc2hhcmVUb2tlbnNDaGFuZ2VPbkZICQEVY2FuTG9ja0luRmlyc3RIYXJ2ZXN0BQUEcG9vbAUEdXNlcgUQdXNlclN0YWtlZEFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFCGxvY2tUeXBlAwkAAAIFFXNoYXJlVG9rZW5zQ2hhbmdlT25GSAUVc2hhcmVUb2tlbnNDaGFuZ2VPbkZIBA0kdDAxOTQzMjIxMzY2AwkAAAIFCGxvY2tUeXBlAAAEFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQBlAgkAZAIFEXVzZXJBbW91bnRWaXJ0dWFsCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUVc2hhcmVUb2tlbnNDaGFuZ2VPbkZICQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQJAGUCCQBkAgUQdXNlclN0YWtlZEFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFFXNoYXJlVG9rZW5zQ2hhbmdlT25GSAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwJAGUCCQBkAgURdG90YWxTaGFyZVZpcnR1YWwICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGY2FsbGVyBRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDbmlsCQBlAgkAZAIFCnRvdGFsU2hhcmUICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgDAwkAAAIFD3VzZXJMb2NrZWRIZWlndAAAAwMJAGYCAAIJAJADAQgFAWkIcGF5bWVudHMGCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwABB2Fzc2V0SWQFBHVuaXQGCQBmAgUMbG9ja1dhdmVzRmVlCAkAkQMCCAUBaQhwYXltZW50cwABBmFtb3VudAcJAAIBCQCsAgIJAKwCAgIrWW91IG5lZWQgdG8gcGF5IGFkZGl0aW9uYWwgd2F2ZXMgY29taXNzaW9uIAkApAMBBQxsb2NrV2F2ZXNGZWUCBVdBVkVTAwkAZgIFD3VzZXJMb2NrZWRIZWlndAkAZAIFBmhlaWdodAUKbG9ja1BlcmlvZAkAAgECT1lvdSBjYW5ub3QgbG9jayBzaGFyZXRva2VucyBmb3IgYSBwZXJpb2QgbGVzcyB0aGFuIHdoYXQgeW91IGhhdmUgYWxyZWFkeSBsb2NrZWQEE3VzZXJMb2NrZWRBbW91bnROZXcJAGQCBRB1c2VyTG9ja2VkQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQSdXNlckxvY2tlZEhlaWd0TmV3CQBkAgUGaGVpZ2h0BQpsb2NrUGVyaW9kBBR1c2VyQW1vdW50VmlydHVhbE5ldwkAZAIJAGsDBRN1c2VyTG9ja2VkQW1vdW50TmV3BQhsb2NrQ29lZgUSbG9ja0Jvb3N0Q29lZlNjYWxlBRB1c2VyU3Rha2VkQW1vdW50CQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQFE3VzZXJMb2NrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQFEnVzZXJMb2NrZWRIZWlndE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUaa1VzZXJTaGFyZVRva2Vuc0xvY2tlZFR5cGUFCGxvY2tUeXBlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAkAZAIJAGUCBRF0b3RhbFNoYXJlVmlydHVhbAURdXNlckFtb3VudFZpcnR1YWwFFHVzZXJBbW91bnRWaXJ0dWFsTmV3BQNuaWwJAGQCBQp0b3RhbFNoYXJlCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQLbG9ja0VudHJpZXMIBQ0kdDAxOTQzMjIxMzY2Al8xBA10b3RhbFNoYXJlTmV3CAUNJHQwMTk0MzIyMTM2NgJfMgMJAGYCCQEOYWNjb3VudEJhbGFuY2UBBQxzaGFyZUFzc2V0SWQFDXRvdGFsU2hhcmVOZXcJAAIBAjBCYWxhbmNlIG9mIHNoYXJlLXRva2VuIGlzIGxvd2VyIHRoYW4gdG90YWxBbW91bnQEDSR0MDIxNDkxMjE1NzMJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAyMTQ5MTIxNTczAl8xBA1ib29zdEludGVyZXN0CAUNJHQwMjE0OTEyMTU3MwJfMgQLY2xhaW1BbW91bnQIBQ0kdDAyMTQ5MTIxNTczAl8zBAp0b1RyZWFzdXJlCAUNJHQwMjE0OTEyMTU3MwJfNAQRYXZhaWxhYmxlRnVuZHNOZXcJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAQEdXBscAMJAAACCQCdCAIJAQdBZGRyZXNzAQkA2QQBBQRwb29sAgd2ZXJzaW9uAgUzLjAuMAkA/AcEBRBscEZhcm1pbmdBZGRyZXNzAhJ1cGRhdGVVc2VySW50ZXJlc3QJAMwIAgUEdXNlcgkAzAgCBQRwb29sCQDMCAIFFHRvdGFsVXNlclNoYXJlVG9rZW5zBQNuaWwFA25pbAAAAwkAAAIFBHVwbHAFBHVwbHAJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMFDXRvdGFsU2hhcmVOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFDmtBdmFpbGFibGVTV09QBRFhdmFpbGFibGVGdW5kc05ldwkAzAgCCQEHUmVpc3N1ZQMFBFNXT1AFCnRvVHJlYXN1cmUGCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFE2Zhcm1pbmdUcmVhc3VyZUFkZHIFCnRvVHJlYXN1cmUFBFNXT1AFA25pbAULbG9ja0VudHJpZXMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BF2NhbGNXaXRoZHJhd1NoYXJlVG9rZW5zBAFpBmNhbGxlcgRwb29sGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEA2ludgMJARFnZXREZXByZWNhdGVkUG9vbAEFBHBvb2wJAPwHBAUEdGhpcwIYdW5sb2NrVXNlckxvY2tEZXByZWNhdGVkCQDMCAIFBHBvb2wJAMwIAgkApQgBBQZjYWxsZXIFA25pbAUDbmlsAAADCQAAAgUDaW52BQNpbnYEDXNoYXJlVG9rZW5zSWQJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgkBBXZhbHVlAQkApggBBQRwb29sAg5zaGFyZV9hc3NldF9pZAQEdXNlcgkApQgBBQZjYWxsZXIEDSR0MDIyODcwMjI5NTIJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAyMjg3MDIyOTUyAl8xBA1ib29zdEludGVyZXN0CAUNJHQwMjI4NzAyMjk1MgJfMgQLY2xhaW1BbW91bnQIBQ0kdDAyMjg3MDIyOTUyAl8zBAp0b1RyZWFzdXJlCAUNJHQwMjI4NzAyMjk1MgJfNAQQdXNlclN0YWtlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zU3Rha2VkAAAEEHVzZXJMb2NrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAAABBF1c2VyQW1vdW50VmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUQdXNlclN0YWtlZEFtb3VudAQTdXNlclN0YWtlZEFtb3VudE5ldwkAZQIFEHVzZXJTdGFrZWRBbW91bnQFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEEWF2YWlsYWJsZUZ1bmRzTmV3CQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQEEHRvdGFsU2hhcmVBbW91bnQJARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBBF0b3RhbFNoYXJlVmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFEHRvdGFsU2hhcmVBbW91bnQEE3RvdGFsU2hhcmVBbW91bnROZXcJAGUCBRB0b3RhbFNoYXJlQW1vdW50BRlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BBR0b3RhbFNoYXJlVmlydHVhbE5ldwkAZQIFEXRvdGFsU2hhcmVWaXJ0dWFsBRlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BBR1c2VyQW1vdW50VmlydHVhbE5ldwkAZQIFEXVzZXJBbW91bnRWaXJ0dWFsBRlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50AwkAZgIFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQFEHVzZXJTdGFrZWRBbW91bnQJAAIBAixXaXRoZHJhdyBhbW91bnQgbW9yZSB0aGVuIHVzZXIgbG9ja2VkIGFtb3VudAMJAGYCCQEOYWNjb3VudEJhbGFuY2UBBQ1zaGFyZVRva2Vuc0lkBRB0b3RhbFNoYXJlQW1vdW50CQACAQIwQmFsYW5jZSBvZiBzaGFyZS10b2tlbiBpcyBsb3dlciB0aGFuIHRvdGFsQW1vdW50BAR1cGxwAwkAAAIJAJ0IAgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wCB3ZlcnNpb24CBTMuMC4wCQD8BwQFEGxwRmFybWluZ0FkZHJlc3MCEnVwZGF0ZVVzZXJJbnRlcmVzdAkAzAgCBQR1c2VyCQDMCAIFBHBvb2wJAMwIAgkAZAIFEHVzZXJTdGFrZWRBbW91bnQFEHVzZXJMb2NrZWRBbW91bnQFA25pbAUDbmlsAAADCQAAAgUEdXBscAUEdXBscAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zU3Rha2VkBRN1c2VyU3Rha2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUWa1NoYXJlVG90YWxTaGFyZVRva2VucwUTdG90YWxTaGFyZUFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsBRR0b3RhbFNoYXJlVmlydHVhbE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AFEWF2YWlsYWJsZUZ1bmRzTmV3CQDMCAIJAQdSZWlzc3VlAwUEU1dPUAUKdG9UcmVhc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQFDXNoYXJlVG9rZW5zSWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEJY2FsY0NsYWltAwFpBHBvb2wGY2FsbGVyBA1zaGFyZVRva2Vuc0lkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIJAQV2YWx1ZQEJAKYIAQUEcG9vbAIOc2hhcmVfYXNzZXRfaWQEBHVzZXIJAKUIAQUGY2FsbGVyBBBzaGFyZVRva2VuTG9ja2VkCQESZ2V0VG90YWxTaGFyZVRva2VuAQUEcG9vbAQNJHQwMjU0NjMyNTU0NQkBCWNsYWltQ2FsYwIFBHBvb2wFBHVzZXIEDGZhcm1JbnRlcmVzdAgFDSR0MDI1NDYzMjU1NDUCXzEEDWJvb3N0SW50ZXJlc3QIBQ0kdDAyNTQ2MzI1NTQ1Al8yBAtjbGFpbUFtb3VudAgFDSR0MDI1NDYzMjU1NDUCXzMECnRvVHJlYXN1cmUIBQ0kdDAyNTQ2MzI1NTQ1Al80BA1hdmFpbGFibGVGdW5kCQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQDCQBmAgkBDmFjY291bnRCYWxhbmNlAQUNc2hhcmVUb2tlbnNJZAUQc2hhcmVUb2tlbkxvY2tlZAkAAgECMEJhbGFuY2Ugb2Ygc2hhcmUtdG9rZW4gaXMgbG93ZXIgdGhhbiB0b3RhbEFtb3VudAQGdVRyYW5zAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUNYXZhaWxhYmxlRnVuZAUEU1dPUAUDbmlsBQNuaWwJAJQKAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRVrRmFybVVzZXJMYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa0Jvb3N0VXNlckxhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFDmtBdmFpbGFibGVTV09QAAAJAMwIAgkBB1JlaXNzdWUDBQRTV09QCQBkAgUKdG9UcmVhc3VyZQUNYXZhaWxhYmxlRnVuZAYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAUDbmlsBQZ1VHJhbnMFDWF2YWlsYWJsZUZ1bmQBEnVubG9ja1VzZXJMb2NrQ2FsYwMBaQRwb29sBHVzZXIEEXRvdGFsU2hhcmVWaXJ0dWFsCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwEEHVzZXJTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAAABBB1c2VyTG9ja2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQAAAQRdXNlckFtb3VudFZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFEHVzZXJTdGFrZWRBbW91bnQEE3VzZXJTdGFrZWRBbW91bnROZXcJAGQCBRB1c2VyU3Rha2VkQW1vdW50BRB1c2VyTG9ja2VkQW1vdW50BA0kdDAyNjk0ODI3MDMwCQEJY2xhaW1DYWxjAgUEcG9vbAUEdXNlcgQMZmFybUludGVyZXN0CAUNJHQwMjY5NDgyNzAzMAJfMQQNYm9vc3RJbnRlcmVzdAgFDSR0MDI2OTQ4MjcwMzACXzIEC2NsYWltQW1vdW50CAUNJHQwMjY5NDgyNzAzMAJfMwQKdG9UcmVhc3VyZQgFDSR0MDI2OTQ4MjcwMzACXzQEEWF2YWlsYWJsZUZ1bmRzTmV3CQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFWtGYXJtVXNlckxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrQm9vc3RVc2VyTGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAUTdXNlclN0YWtlZEFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFE3VzZXJTdGFrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAkAZAIJAGUCBRF0b3RhbFNoYXJlVmlydHVhbAURdXNlckFtb3VudFZpcnR1YWwFE3VzZXJTdGFrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFDmtBdmFpbGFibGVTV09QBRFhdmFpbGFibGVGdW5kc05ldwkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUaa1VzZXJTaGFyZVRva2Vuc0xvY2tlZFR5cGUJAMwIAgkBB1JlaXNzdWUDBQRTV09QBQp0b1RyZWFzdXJlBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmYXJtaW5nVHJlYXN1cmVBZGRyBQp0b1RyZWFzdXJlBQRTV09QBQNuaWwSAWkBBGluaXQBB2Vhcmx5TFADCQEJaXNEZWZpbmVkAQkAnQgCBQR0aGlzBQdrU1dPUGlkCQACAQIYU1dPUCBhbHJlYWR5IGluaXRpYWxpemVkBAppbml0QW1vdW50AICA6YOx3hYECVNXT1Bpc3N1ZQkAwggFAgRTV09QAhNTV09QIHByb3RvY29sIHRva2VuBQppbml0QW1vdW50AAgGBAZTV09QaWQJALgIAQUJU1dPUGlzc3VlCQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBgkAzAgCCQDCCAUCBFNXT1ACE1NXT1AgcHJvdG9jb2wgdG9rZW4FCmluaXRBbW91bnQACAYJAMwIAgkBC1N0cmluZ0VudHJ5AgUHa1NXT1BpZAkA2AQBBQZTV09QaWQFA25pbAFpARRpbml0UG9vbFNoYXJlRmFybWluZwEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBC2lzQWRtaW5DYWxsAQUBaQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRZrU2hhcmVUb3RhbFNoYXJlVG9rZW5zAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQFA25pbAFpARJ1cGRhdGVQb29sSW50ZXJlc3QBBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQADCQECIT0CCAUBaQZjYWxsZXIFCmdvdkFkZHJlc3MJAAIBAiZPbmx5IEdvdmVybmFuY2UgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgQEdXNlcgkApQgBCQCnCAEFEWFkbWluSW52b2tlUHViS2V5BA0kdDAyOTE5NjI5MjcwCQEJY2xhaW1DYWxjAgUEcG9vbAUEdXNlcgQMZmFybUludGVyZXN0CAUNJHQwMjkxOTYyOTI3MAJfMQQNYm9vc3RJbnRlcmVzdAgFDSR0MDI5MTk2MjkyNzACXzIED2Jvb3N0TFBpbnRlcmVzdAgFDSR0MDI5MTk2MjkyNzACXzMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0BQNuaWwBaQEPbG9ja1NoYXJlVG9rZW5zAgRwb29sCGxvY2tUeXBlCQELdmFsdWVPckVsc2UCCQEQaXNEZXByZWNhdGVkUG9vbAEFBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJARNjYWxjTG9ja1NoYXJlVG9rZW5zBAUBaQgFAWkGY2FsbGVyBQRwb29sBQhsb2NrVHlwZQFpARdsb2NrU2hhcmVUb2tlbnNGcm9tUG9vbAMLY2FsbGVyQnl0ZXMEcG9vbAhsb2NrVHlwZQkBC3ZhbHVlT3JFbHNlAgkBEGlzRGVwcmVjYXRlZFBvb2wBBQRwb29sCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQELdmFsdWVPckVsc2UCCQEKaXNQb29sQ2FsbAIFAWkFBHBvb2wJARNjYWxjTG9ja1NoYXJlVG9rZW5zBAUBaQkBB0FkZHJlc3MBBQtjYWxsZXJCeXRlcwUEcG9vbAUIbG9ja1R5cGUBaQEVbG9ja1N0YWtlZFNoYXJlVG9rZW5zAwRwb29sCGxvY2tUeXBlCmxvY2tBbW91bnQJAQt2YWx1ZU9yRWxzZQIJARBpc0RlcHJlY2F0ZWRQb29sAQUEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQMc2hhcmVBc3NldElkCQEPZ2V0U2hhcmVBc3NldElkAQUEcG9vbAQEdXNlcgkApQgBCAUBaQZjYWxsZXIECnRvdGFsU2hhcmUJARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBBF0b3RhbFNoYXJlVmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFCnRvdGFsU2hhcmUEEHVzZXJTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAAABA91c2VyTG9ja2VkSGVpZ3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUca1VzZXJTaGFyZVRva2Vuc0xvY2tlZEhlaWdodAAABBB1c2VyTG9ja2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQAAAQRdXNlckFtb3VudFZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFEHVzZXJTdGFrZWRBbW91bnQEFHRvdGFsVXNlclNoYXJlVG9rZW5zCQBkAgUQdXNlclN0YWtlZEFtb3VudAUQdXNlckxvY2tlZEFtb3VudAQNJHQwMzA4OTkzMDk1MQkBDWdldExvY2tQYXJhbXMBBQhsb2NrVHlwZQQKbG9ja1BlcmlvZAgFDSR0MDMwODk5MzA5NTECXzEECGxvY2tDb2VmCAUNJHQwMzA4OTkzMDk1MQJfMgQMbG9ja1dhdmVzRmVlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQ1rTG9ja1dhdmVzRmVlAwkAZgIJARVnZXRIZWlnaHRGaXJzdEhhcnZlc3QBBQRwb29sBQZoZWlnaHQJAAIBAjJZb3UgY2FuJ3QgbG9jayBzaGFyZVRva2VucyB0aWxsIGZpcnN0IGhhcnZlc3QgZW5kLgMJAGcCAAAFCGxvY2tUeXBlCQACAQIUbG9ja1R5cGUgbXVzdCBiZSA+IDADCQBmAgUKbG9ja0Ftb3VudAUQdXNlclN0YWtlZEFtb3VudAkAAgEJAKwCAgIZWW91IGNhbid0IGxvY2sgbW9yZSB0aGFuIAkApAMBBRB1c2VyU3Rha2VkQW1vdW50AwkAZgIJAQ5hY2NvdW50QmFsYW5jZQEFDHNoYXJlQXNzZXRJZAUKdG90YWxTaGFyZQkAAgECMEJhbGFuY2Ugb2Ygc2hhcmUtdG9rZW4gaXMgbG93ZXIgdGhhbiB0b3RhbEFtb3VudAMDCQAAAgUPdXNlckxvY2tlZEhlaWd0AAADAwkAZgIAAQkAkAMBCAUBaQhwYXltZW50cwYJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUEdW5pdAYJAGYCBQxsb2NrV2F2ZXNGZWUICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BwkAAgEJAKwCAgkArAICAitZb3UgbmVlZCB0byBwYXkgYWRkaXRpb25hbCB3YXZlcyBjb21pc3Npb24gCQCkAwEFDGxvY2tXYXZlc0ZlZQIFV0FWRVMDAwkAAAIFD3VzZXJMb2NrZWRIZWlndAAACQBnAgAABQpsb2NrQW1vdW50BwkAAgECIWxvY2tBbW91bnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gMAMJAGYCAAAFCmxvY2tBbW91bnQJAAIBAhtsb2NrQW1vdW50IG11c3QgYmUgcG9zaXRpdmUDCQBmAgUPdXNlckxvY2tlZEhlaWd0CQBkAgUGaGVpZ2h0BQpsb2NrUGVyaW9kCQACAQJPWW91IGNhbm5vdCBsb2NrIHNoYXJldG9rZW5zIGZvciBhIHBlcmlvZCBsZXNzIHRoYW4gd2hhdCB5b3UgaGF2ZSBhbHJlYWR5IGxvY2tlZAQTdXNlckxvY2tlZEFtb3VudE5ldwkAZAIFEHVzZXJMb2NrZWRBbW91bnQFCmxvY2tBbW91bnQEE3VzZXJTdGFrZWRBbW91bnROZXcJAGUCBRB1c2VyU3Rha2VkQW1vdW50BQpsb2NrQW1vdW50BBJ1c2VyTG9ja2VkSGVpZ3ROZXcJAGQCBQZoZWlnaHQFCmxvY2tQZXJpb2QEFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQBkAgkAawMFE3VzZXJMb2NrZWRBbW91bnROZXcFCGxvY2tDb2VmBRJsb2NrQm9vc3RDb2VmU2NhbGUFE3VzZXJTdGFrZWRBbW91bnROZXcEDSR0MDMyMjk3MzIzNzkJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAzMjI5NzMyMzc5Al8xBA1ib29zdEludGVyZXN0CAUNJHQwMzIyOTczMjM3OQJfMgQLY2xhaW1BbW91bnQIBQ0kdDAzMjI5NzMyMzc5Al8zBAp0b1RyZWFzdXJlCAUNJHQwMzIyOTczMjM3OQJfNAQRYXZhaWxhYmxlRnVuZHNOZXcJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAUTdXNlclN0YWtlZEFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAUTdXNlckxvY2tlZEFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUca1VzZXJTaGFyZVRva2Vuc0xvY2tlZEhlaWdodAUSdXNlckxvY2tlZEhlaWd0TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRprVXNlclNoYXJlVG9rZW5zTG9ja2VkVHlwZQUIbG9ja1R5cGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRR1c2VyQW1vdW50VmlydHVhbE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsCQBkAgkAZQIFEXRvdGFsU2hhcmVWaXJ0dWFsBRF1c2VyQW1vdW50VmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFWtGYXJtVXNlckxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrQm9vc3RVc2VyTGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AFEWF2YWlsYWJsZUZ1bmRzTmV3CQDMCAIJAQdSZWlzc3VlAwUEU1dPUAUKdG9UcmVhc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAUDbmlsAWkBDnVubG9ja1VzZXJMb2NrAgRwb29sBHVzZXIJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAED3VzZXJMb2NrZWRIZWlndAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQJAKwCAgkArAICCQCsAgIJAKwCAgIRVGhlcmUgaXMgbm8gcG9vbCAFBHBvb2wCCSBvciB1c2VyIAUEdXNlcgIJd2l0aCBsb2NrAwkAZgIFD3VzZXJMb2NrZWRIZWlndAUGaGVpZ2h0CQACAQkArAICAiJZb3UgY2FuJ3QgdW5sb2NrIHNoYXJldG9rZW5zIHRpbGwgCQCkAwEFD3VzZXJMb2NrZWRIZWlndAkAzggCCQESdW5sb2NrVXNlckxvY2tDYWxjAwUBaQUEcG9vbAUEdXNlcgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMFDWtMb2NrV2F2ZXNGZWUFBHVuaXQFA25pbAFpARh1bmxvY2tVc2VyTG9ja0RlcHJlY2F0ZWQCBHBvb2wEdXNlcgkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBC3ZhbHVlT3JFbHNlAgkBCmlzU2VsZkNhbGwBBQFpAwkBASEBCQERZ2V0RGVwcmVjYXRlZFBvb2wBBQRwb29sCQACAQIXUG9vbCBtdXN0IGJlIGRlcHJlY2F0ZWQDCQEJaXNEZWZpbmVkAQkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRxrVXNlclNoYXJlVG9rZW5zTG9ja2VkSGVpZ2h0CQDOCAIJARJ1bmxvY2tVc2VyTG9ja0NhbGMDBQFpBQRwb29sBQR1c2VyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD21vbmV5Qm94QWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwUNa0xvY2tXYXZlc0ZlZQUEdW5pdAUDbmlsBQNuaWwBaQETd2l0aGRyYXdTaGFyZVRva2VucwIEcG9vbBlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50CQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQEXY2FsY1dpdGhkcmF3U2hhcmVUb2tlbnMEBQFpCAUBaQZjYWxsZXIFBHBvb2wFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQBaQEbd2l0aGRyYXdTaGFyZVRva2Vuc0Zyb21Qb29sAwtjYWxsZXJCeXRlcwRwb29sGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQppc1Bvb2xDYWxsAgUBaQUEcG9vbAkBF2NhbGNXaXRoZHJhd1NoYXJlVG9rZW5zBAUBaQkBB0FkZHJlc3MBBQtjYWxsZXJCeXRlcwUEcG9vbAUZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAFpAQVjbGFpbQEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQBcgkBCWNhbGNDbGFpbQMFAWkFBHBvb2wIBQFpBmNhbGxlcgMJAAACCAUBcgJfMgAACQACAQIZWW91IGhhdmUgMCBhdmFpbGFibGUgU1dPUAUBcgFpAQ1jbGFpbUludGVybmFsAgRwb29sBmNhbGxlcgkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBC3ZhbHVlT3JFbHNlAgkBCmlzU2VsZkNhbGwBBQFpCQEJY2FsY0NsYWltAwUBaQUEcG9vbAkBB0FkZHJlc3MBBQZjYWxsZXIBaQENY2xhaW1BbmRTdGFrZQEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQLY2xhaW1BbW91bnQKAAFACQD8BwQFBHRoaXMCDWNsYWltSW50ZXJuYWwJAMwIAgUEcG9vbAkAzAgCCAgFAWkGY2FsbGVyBWJ5dGVzBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQDCQAAAgULY2xhaW1BbW91bnQFC2NsYWltQW1vdW50AwkAAAIFC2NsYWltQW1vdW50AAAJAAIBAhlZb3UgaGF2ZSAwIGF2YWlsYWJsZSBTV09QBApzdGFrZVRvR292CQD8BwQFCmdvdkFkZHJlc3MCE2xvY2tTV09QRnJvbUZhcm1pbmcFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEU1dPUAULY2xhaW1BbW91bnQFA25pbAMJAAACBQpzdGFrZVRvR292BQpzdGFrZVRvR292BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIY2xhaW1BbGwBBXBvb2xzCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACgEIY2xhaW1JbnYCCmNsYWltVG90YWwEcG9vbAQLY2xhaW1BbW91bnQKAAFACQD8BwQFBHRoaXMCDWNsYWltSW50ZXJuYWwJAMwIAgUEcG9vbAkAzAgCCAgFAWkGY2FsbGVyBWJ5dGVzBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQDCQAAAgULY2xhaW1BbW91bnQFC2NsYWltQW1vdW50CQBkAgUKY2xhaW1Ub3RhbAULY2xhaW1BbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4ECmNsYWltVG90YWwKAAIkbAUFcG9vbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGNsYWltSW52AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA2MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAMJAAACBQpjbGFpbVRvdGFsAAAJAAIBAhlZb3UgaGF2ZSAwIGF2YWlsYWJsZSBTV09QCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUKY2xhaW1Ub3RhbAUEU1dPUAUDbmlsAWkBEGNsYWltQWxsQW5kU3Rha2UBBXBvb2xzCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACgEIY2xhaW1JbnYCCmNsYWltVG90YWwEcG9vbAQLY2xhaW1BbW91bnQKAAFACQD8BwQFBHRoaXMCDWNsYWltSW50ZXJuYWwJAMwIAgUEcG9vbAkAzAgCCAgFAWkGY2FsbGVyBWJ5dGVzBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQDCQAAAgULY2xhaW1BbW91bnQFC2NsYWltQW1vdW50CQBkAgUKY2xhaW1Ub3RhbAULY2xhaW1BbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4ECmNsYWltVG90YWwKAAIkbAUFcG9vbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGNsYWltSW52AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA2MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAMJAAACBQpjbGFpbVRvdGFsAAAJAAIBAhlZb3UgaGF2ZSAwIGF2YWlsYWJsZSBTV09QBApzdGFrZVRvR292CQD8BwQFCmdvdkFkZHJlc3MCE2xvY2tTV09QRnJvbUZhcm1pbmcFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEU1dPUAUKY2xhaW1Ub3RhbAUDbmlsAwkAAAIFCnN0YWtlVG9Hb3YFCnN0YWtlVG9Hb3YFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARd1cGRhdGVVc2VyQm9vc3RJbnRlcmVzdAIEcG9vbAR1c2VyCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUAAwkBAiE9AggFAWkGY2FsbGVyBQ12b3RpbmdBZGRyZXNzCQACAQIjT25seSB2b2l0aW5nIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EDSR0MDM3MTI4MzcyMTAJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAzNzEyODM3MjEwAl8xBA1ib29zdEludGVyZXN0CAUNJHQwMzcxMjgzNzIxMAJfMgQLY2xhaW1BbW91bnQIBQ0kdDAzNzEyODM3MjEwAl8zBAp0b1RyZWFzdXJlCAUNJHQwMzcxMjgzNzIxMAJfNAQRYXZhaWxhYmxlRnVuZHNOZXcJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBQ5rQXZhaWxhYmxlU1dPUAURYXZhaWxhYmxlRnVuZHNOZXcJAMwIAgkBB1JlaXNzdWUDBQRTV09QBQp0b1RyZWFzdXJlBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmYXJtaW5nVHJlYXN1cmVBZGRyBQp0b1RyZWFzdXJlBQRTV09QBQNuaWwBaQEIc2h1dGRvd24ACQELdmFsdWVPckVsc2UCCQELaXNBZG1pbkNhbGwBBQFpAwkBASEBBQZhY3RpdmUJAAIBCQCsAgICIkRBcHAgaXMgYWxyZWFkeSBzdXNwZW5kZWQuIENhdXNlOiAJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUGa0NhdXNlAhp0aGUgY2F1c2Ugd2Fzbid0IHNwZWNpZmllZAkBB3N1c3BlbmQBAg9QYXVzZWQgYnkgYWRtaW4BaQEIYWN0aXZhdGUACQELdmFsdWVPckVsc2UCCQELaXNBZG1pbkNhbGwBBQFpAwUGYWN0aXZlCQACAQIWREFwcCBpcyBhbHJlYWR5IGFjdGl2ZQkAzAgCCQEMQm9vbGVhbkVudHJ5AgUHa0FjdGl2ZQYJAMwIAgkBC0RlbGV0ZUVudHJ5AQUGa0NhdXNlBQNuaWwBAnR4AQZ2ZXJpZnkABAckbWF0Y2gwBQJ0eAQSYWRtaW5QdWJLZXkxU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkxAAEAAAQSYWRtaW5QdWJLZXkyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQUMYWRtaW5QdWJLZXkyAAEAAAQSYWRtaW5QdWJLZXkzU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAgUMYWRtaW5QdWJLZXkzAAEAAAkAZwIJAGQCCQBkAgUSYWRtaW5QdWJLZXkxU2lnbmVkBRJhZG1pblB1YktleTJTaWduZWQFEmFkbWluUHViS2V5M1NpZ25lZAACqdeVXg==",
    "height": 3513423,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4wFZR8eisJpTh8CmikypBA8VNo3Fr9sYaGs3U2eerd9u
Next: AUQbLFpXQ616chpogKqx7ajwcUqfERKeujfpDDMRaVyU

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

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

140	142		func getRewardsPerBlockInfo () = {
141	143		let emissionPeriods = ((height - startEmissionH) / blocksPerYear)
142	144		func calcEmission (acc,i) = {
143		-	let $~~t047104747~~ = acc
144		-	let curEmission = $~~t047104747~~._1
145		-	let prevEmission = $~~t047104747~~._2
	145	+	let $t047464783 = acc
	146	+	let curEmission = $t047464783._1
	147	+	let prevEmission = $t047464783._2
146	148		if ((emissionPeriods > i))
147	149		then $Tuple2(fraction(curEmission, 75, 100), curEmission)
148	150		else $Tuple2(curEmission, prevEmission)
149	151		}
150	152
151		-	let $~~t049055071~~ = {
	153	+	let $t049415107 = {
152	154		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
153	155		let $s = size($l)
154	156		let $acc0 = $Tuple2(swopYearEmission, swopYearEmission)

162	164
163	165		$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	166		}
165		-	let curEmission = $~~t049055071~~._1
166		-	let prevEmission = $~~t049055071~~._2
	167	+	let curEmission = $t049415107._1
	168	+	let prevEmission = $t049415107._2
167	169		$Tuple3((curEmission / blocksPerYear), (prevEmission / blocksPerYear), (startEmissionH + (blocksPerYear * emissionPeriods)))
168	170		}
169	171

208	210
209	211
210	212		func rewardInfo (pool) = {
211		-	let $~~t068867001~~ = getRewardsPerBlockInfo()
212		-	let totalRewardPerBlockCurrent = $~~t068867001~~._1
213		-	let totalRewardPerBlockPrevious = $~~t068867001~~._2
214		-	let lastEmissionUpdateHeight = $~~t068867001~~._3
	213	+	let $t069227037 = getRewardsPerBlockInfo()
	214	+	let totalRewardPerBlockCurrent = $t069227037._1
	215	+	let totalRewardPerBlockPrevious = $t069227037._2
	216	+	let lastEmissionUpdateHeight = $t069227037._3
215	217		let rewardPoolFractionCurrent = valueOrErrorMessage(getInteger(govAddress, (pool + kRewardPoolFractionCurrent)), (((("No data on the key: " + pool) + kRewardPoolFractionCurrent) + " at address ") + toString(govAddress)))
216	218		let rewardUpdateHeight = valueOrErrorMessage(getInteger(govAddress, kRewardUpdateHeight), ((("No data on the key: " + kRewardUpdateHeight) + " at address ") + toString(govAddress)))
217	219		let poolRewardUpdateHeight = valueOrElse(getInteger(govAddress, (pool + kHeightPoolFraction)), rewardUpdateHeight)

249	251
250	252
251	253		func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue,toHeight) = {
252		-	let $~~t01001511200~~ = if (if (if ((rewardUpdateHeight > toHeight))
	254	+	let $t01005111236 = if (if (if ((rewardUpdateHeight > toHeight))
253	255		then (rewardUpdateHeight == poolRewardUpdateHeight)
254	256		else false)
255	257		then true

278	280		let rwd = (currentRewardPerBlock * (toHeight - rewardUpdateHeight))
279	281		$Tuple3(rwd, fBfrUp, bBfrUp)
280	282		}
281		-	let reward = $~~t01001511200~~._1
282		-	let farmIntrBefore = $~~t01001511200~~._2
283		-	let boostIntrBefore = $~~t01001511200~~._3
	283	+	let reward = $t01005111236._1
	284	+	let farmIntrBefore = $t01005111236._2
	285	+	let boostIntrBefore = $t01005111236._3
284	286		let newFarmInterest = (farmIntrBefore + fraction(calcFarmRwd(pool, reward), scaleValue, shareTokenLocked))
285	287		let newBoostInterest = (boostIntrBefore + (if ((poolVoted > 0))
286	288		then fraction(calcBoostRwd(pool, reward), scaleValue8, poolVoted)

296	298		let shareToken = getTotalShareToken(pool)
297	299		let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), shareToken)
298	300		let stratBFarmInterest = valueOrElse(getInteger(this, (pool + kStratBFarmInterest)), 0)
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
	301	+	let $t01207412155 = getLastInterestInfo(pool)
	302	+	let lastInterestHeight = $t01207412155._1
	303	+	let farmInterest = $t01207412155._2
	304	+	let boostInterest = $t01207412155._3
	305	+	let $t01216012417 = rewardInfo(pool)
	306	+	let currentRewardPerBlock = $t01216012417._1
	307	+	let rewardUpdateHeight = $t01216012417._2
	308	+	let previousRewardPerBlock = $t01216012417._3
	309	+	let poolRewardUpdateHeight = $t01216012417._4
	310	+	let emissionUpdateHeight = $t01216012417._5
	311	+	let prevCurrentRewardPerBlock = $t01216012417._6
	312	+	let prevPreviousRewardPerBlock = $t01216012417._7
311	313		let uFarmInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kFarmUserLastInterest)), farmInterest)
312	314		let uBoostInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kBoostUserLastInterest)), if (if ((stratBFarmInterest > uFarmInterest))
313	315		then (uPoolVoted > 0)

324	326		$Tuple4(farmInterest, boostInterest, 0, toTreasury)
325	327		}
326	328		else {
327		-	let $~~t01333914476~~ = if ((emissionUpdateHeight > lastInterestHeight))
	329	+	let $t01337514512 = if ((emissionUpdateHeight > lastInterestHeight))
328	330		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
	331	+	let $t01378814347 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, prevCurrentRewardPerBlock, totalShareVirtual, prevPreviousRewardPerBlock, scaleValue, emissionUpdateHeight)
	332	+	let prevNewFarmInterest = $t01378814347._1
	333	+	let prevNewBoostInterest = $t01378814347._2
332	334		$Tuple3(prevNewFarmInterest, prevNewBoostInterest, emissionUpdateHeight)
333	335		}
334	336		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
	337	+	let prevFarmInterest = $t01337514512._1
	338	+	let prevBoostInterest = $t01337514512._2
	339	+	let LIHeight = $t01337514512._3
	340	+	let $t01452114944 = calcInterest(pool, LIHeight, rewardUpdateHeight, poolRewardUpdateHeight, prevFarmInterest, prevBoostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue, height)
	341	+	let newFarmInterest = $t01452114944._1
	342	+	let newBoostInterest = $t01452114944._2
341	343		let farmRwd = fraction(uShareTokensVirt, (newFarmInterest - uFarmInterest), scaleValue)
342	344		let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
343	345		let boostRwdMax = fraction(fraction(uShareTokensVirt, (newFarmInterest - max([uFarmInterest, stratBFarmInterest])), scaleValue), poolBoostCoef, lockBoostCoefScale)

353	355
354	356		func availableClaimCalcAllByUser (pools,user) = {
355	357		func calcAvailable (acc,pool) = {
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
	358	+	let $t01581315842 = acc
	359	+	let newPools = $t01581315842._1
	360	+	let amounts = $t01581315842._2
	361	+	let $t01585115904 = claimCalc(pool, user)
	362	+	let fi = $t01585115904._1
	363	+	let bi = $t01585115904._2
	364	+	let claimAmount = $t01585115904._3
	365	+	let tt = $t01585115904._4
364	366		let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
365	367		$Tuple2((newPools :+ pool), (amounts :+ availableFund))
366	368		}

425	427		else throw("Only pool can call this function")
426	428
427	429
	430	+	func getDeprecatedPool (pool) = valueOrElse(getBoolean(oracle, (kDeprecatedPool + pool)), false)
	431	+
	432	+
	433	+	func isDeprecatedPool (pool) = if (!(getDeprecatedPool(pool)))
	434	+	then unit
	435	+	else throw("Pool is deprecated. Only unlock action allowed.")
	436	+
	437	+
428	438		func isSelfCall (i) = if ((i.caller == this))
429	439		then unit
430	440		else throw("Only contract itself can call this function")

440	450		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
441	451		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
442	452		let totalUserShareTokens = ((userStakedAmount + userLockedAmount) + i.payments[0].amount)
443		-	let $~~t01866918721~~ = getLockParams(lockType)
444		-	let lockPeriod = $~~t01866918721~~._1
445		-	let lockCoef = $~~t01866918721~~._2
	453	+	let $t01895319005 = getLockParams(lockType)
	454	+	let lockPeriod = $t01895319005._1
	455	+	let lockCoef = $t01895319005._2
446	456		let lockWavesFee = getIntegerValue(this, kLockWavesFee)
447	457		if ((i.payments[0].assetId != shareAssetId))
448	458		then throw("Wrong sharetoken in payment")

454	464		let shareTokensChangeOnFH = canLockInFirstHarvest(pool, user, userStakedAmount, i.payments[0].amount, lockType)
455	465		if ((shareTokensChangeOnFH == shareTokensChangeOnFH))
456	466		then {
457		-	let $~~t01914821082~~ = if ((lockType == 0))
	467	+	let $t01943221366 = if ((lockType == 0))
458	468		then {
459	469		let userAmountVirtualNew = ((userAmountVirtual + i.payments[0].amount) - shareTokensChangeOnFH)
460	470		$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))

475	485		let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmount)
476	486		$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))
477	487		}
478		-	let lockEntries = $~~t01914821082~~._1
479		-	let totalShareNew = $~~t01914821082~~._2
	488	+	let lockEntries = $t01943221366._1
	489	+	let totalShareNew = $t01943221366._2
480	490		if ((accountBalance(shareAssetId) > totalShareNew))
481	491		then throw("Balance of share-token is lower than totalAmount")
482	492		else {
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
	493	+	let $t02149121573 = claimCalc(pool, user)
	494	+	let farmInterest = $t02149121573._1
	495	+	let boostInterest = $t02149121573._2
	496	+	let claimAmount = $t02149121573._3
	497	+	let toTreasure = $t02149121573._4
488	498		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
489	499		let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
490	500		then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, totalUserShareTokens], nil)

499	509		}
500	510
501	511
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		-	})
	512	+	func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = {
	513	+	let inv = if (getDeprecatedPool(pool))
	514	+	then invoke(this, "unlockUserLockDeprecated", [pool, toString(caller)], nil)
	515	+	else 0
	516	+	if ((inv == inv))
	517	+	then {
	518	+	let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
	519	+	let user = toString(caller)
	520	+	let $t02287022952 = claimCalc(pool, user)
	521	+	let farmInterest = $t02287022952._1
	522	+	let boostInterest = $t02287022952._2
	523	+	let claimAmount = $t02287022952._3
	524	+	let toTreasure = $t02287022952._4
	525	+	let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
	526	+	let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
	527	+	let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
	528	+	let userStakedAmountNew = (userStakedAmount - shareTokensWithdrawAmount)
	529	+	let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
	530	+	let totalShareAmount = getTotalShareToken(pool)
	531	+	let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), totalShareAmount)
	532	+	let totalShareAmountNew = (totalShareAmount - shareTokensWithdrawAmount)
	533	+	let totalShareVirtualNew = (totalShareVirtual - shareTokensWithdrawAmount)
	534	+	let userAmountVirtualNew = (userAmountVirtual - shareTokensWithdrawAmount)
	535	+	if ((shareTokensWithdrawAmount > userStakedAmount))
	536	+	then throw("Withdraw amount more then user locked amount")
	537	+	else if ((accountBalance(shareTokensId) > totalShareAmount))
	538	+	then throw("Balance of share-token is lower than totalAmount")
	539	+	else {
	540	+	let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
	541	+	then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, (userStakedAmount + userLockedAmount)], nil)
	542	+	else 0
	543	+	if ((uplp == uplp))
	544	+	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)]
	545	+	else throw("Strict value is not equal to itself.")
	546	+	}
	547	+	}
	548	+	else throw("Strict value is not equal to itself.")
	549	+	}
533	550
534	551
535	552		func calcClaim (i,pool,caller) = {
536	553		let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
537	554		let user = toString(caller)
538	555		let shareTokenLocked = getTotalShareToken(pool)
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
	556	+	let $t02546325545 = claimCalc(pool, user)
	557	+	let farmInterest = $t02546325545._1
	558	+	let boostInterest = $t02546325545._2
	559	+	let claimAmount = $t02546325545._3
	560	+	let toTreasure = $t02546325545._4
544	561		let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
545	562		if ((accountBalance(shareTokensId) > shareTokenLocked))
546	563		then throw("Balance of share-token is lower than totalAmount")

550	567		else nil
551	568		$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)
552	569		}
	570	+	}
	571	+
	572	+
	573	+	func unlockUserLockCalc (i,pool,user) = {
	574	+	let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
	575	+	let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
	576	+	let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
	577	+	let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
	578	+	let userStakedAmountNew = (userStakedAmount + userLockedAmount)
	579	+	let $t02694827030 = claimCalc(pool, user)
	580	+	let farmInterest = $t02694827030._1
	581	+	let boostInterest = $t02694827030._2
	582	+	let claimAmount = $t02694827030._3
	583	+	let toTreasure = $t02694827030._4
	584	+	let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
	585	+	[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)]
553	586		}
554	587
555	588

575	608		then throw("Only Governance can call this function")
576	609		else {
577	610		let user = toString(addressFromPublicKey(adminInvokePubKey))
578		-	let $~~t02703527109~~ = claimCalc(pool, user)
579		-	let farmInterest = $~~t02703527109~~._1
580		-	let boostInterest = $~~t02703527109~~._2
581		-	let boostLPinterest = $~~t02703527109~~._3
	611	+	let $t02919629270 = claimCalc(pool, user)
	612	+	let farmInterest = $t02919629270._1
	613	+	let boostInterest = $t02919629270._2
	614	+	let boostLPinterest = $t02919629270._3
582	615		[IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height)]
583	616		})
584	617
585	618
586	619
587	620		@Callable(i)
588		-	func lockShareTokens (pool,lockType) = valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType))
	621	+	func lockShareTokens (pool,lockType) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), calcLockShareTokens(i, i.caller, pool, lockType)))
589	622
590	623
591	624
592	625		@Callable(i)
593		-	func lockShareTokensFromPool (callerBytes,pool,lockType) = valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType)))
	626	+	func lockShareTokensFromPool (callerBytes,pool,lockType) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), valueOrElse(isPoolCall(i, pool), calcLockShareTokens(i, Address(callerBytes), pool, lockType))))
594	627
595	628
596	629
597	630		@Callable(i)
598		-	func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(isActive(), {
	631	+	func lockStakedShareTokens (pool,lockType,lockAmount) = valueOrElse(isDeprecatedPool(pool), valueOrElse(isActive(), {
599	632		let shareAssetId = getShareAssetId(pool)
600	633		let user = toString(i.caller)
601	634		let totalShare = getTotalShareToken(pool)

605	638		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
606	639		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
607	640		let totalUserShareTokens = (userStakedAmount + userLockedAmount)
608		-	let $~~t02852828580~~ = getLockParams(lockType)
609		-	let lockPeriod = $~~t02852828580~~._1
610		-	let lockCoef = $~~t02852828580~~._2
	641	+	let $t03089930951 = getLockParams(lockType)
	642	+	let lockPeriod = $t03089930951._1
	643	+	let lockCoef = $t03089930951._2
611	644		let lockWavesFee = getIntegerValue(this, kLockWavesFee)
612	645		if ((getHeightFirstHarvest(pool) > height))
613	646		then throw("You can't lock shareTokens till first harvest end.")

638	671		let userStakedAmountNew = (userStakedAmount - lockAmount)
639	672		let userLockedHeigtNew = (height + lockPeriod)
640	673		let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmountNew)
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
	674	+	let $t03229732379 = claimCalc(pool, user)
	675	+	let farmInterest = $t03229732379._1
	676	+	let boostInterest = $t03229732379._2
	677	+	let claimAmount = $t03229732379._3
	678	+	let toTreasure = $t03229732379._4
646	679		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
647	680		[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)]
648	681		}
	682	+	}))
	683	+
	684	+
	685	+
	686	+	@Callable(i)
	687	+	func unlockUserLock (pool,user) = valueOrElse(isActive(), {
	688	+	let userLockedHeigt = valueOrErrorMessage(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), (((("There is no pool " + pool) + " or user ") + user) + "with lock"))
	689	+	if ((userLockedHeigt > height))
	690	+	then throw(("You can't unlock sharetokens till " + toString(userLockedHeigt)))
	691	+	else (unlockUserLockCalc(i, pool, user) ++ [ScriptTransfer(i.caller, getIntegerValue(this, kLockWavesFee), unit)])
649	692		})
650	693
651	694
652	695
653	696		@Callable(i)
654		-	func unlockUserLock (pool,user) = valueOrElse(isActive(), {
655		-	let lockWavesFee = getIntegerValue(this, kLockWavesFee)
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)
661		-	if ((userLockedHeigt > height))
662		-	then throw(("You can't unlock sharetokens till " + toString(userLockedHeigt)))
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		-	}
673		-	})
	697	+	func unlockUserLockDeprecated (pool,user) = valueOrElse(isActive(), valueOrElse(isSelfCall(i), if (!(getDeprecatedPool(pool)))
	698	+	then throw("Pool must be deprecated")
	699	+	else if (isDefined(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight))))
	700	+	then (unlockUserLockCalc(i, pool, user) ++ [ScriptTransfer(moneyBoxAddress, getIntegerValue(this, kLockWavesFee), unit)])
	701	+	else nil))
674	702
675	703
676	704

800	828		func updateUserBoostInterest (pool,user) = valueOrElse(isActive(), if ((i.caller != votingAddress))
801	829		then throw("Only voiting can call this function")
802	830		else {
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
	831	+	let $t03712837210 = claimCalc(pool, user)
	832	+	let farmInterest = $t03712837210._1
	833	+	let boostInterest = $t03712837210._2
	834	+	let claimAmount = $t03712837210._3
	835	+	let toTreasure = $t03712837210._4
808	836		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
809	837		[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)]
810	838		})

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

github/deemru/w8io/6500d08 
156.13 ms ◑