w8 · tx · DsT···CLV

tx · DsTCPKeEaEKZH2zmDoodQPSTDf96YVfRmxiMNirK5CLV

3P73HDkPqG15nLXevjCbmXtazHYTZbpPoPw:  -0.04000000 Waves

2022.12.14 13:48 [3425356] smart account 3P73HDkPqG15nLXevjCbmXtazHYTZbpPoPw > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DsTCPKeEaEKZH2zmDoodQPSTDf96YVfRmxiMNirK5CLV",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1671014872941,
    "version": 2,
    "chainId": 87,
    "sender": "3P73HDkPqG15nLXevjCbmXtazHYTZbpPoPw",
    "senderPublicKey": "B3jG1KiAb24bgwe28D9JKKkg9mtpiGTeEAYmQPrtHwQQ",
    "proofs": [
        "",
        "2fCTmPe8BGHRPXqvZg3GgQNgYQndziRYaLNR3BS5QneJcnyY7RJQ4KHt1V5pPtJrjG26KAVtUQxjpNS7hHoKVRuU",
        "3MfEG45vZAku1YcFytomWqfitrwc2nZgrjHDA2RnVivvQPbjCpfmbZeBxc5tYYrSYxFphhPQNxt6ENNvzCSPK47v"
    ],
    "script": "base64:BgJhCAISAwoBCBIDCgEIEgMKAQgSBAoCCAESBQoDAggBEgUKAwgBARIECgIICBIDCgEIEgQKAggBEgUKAwIIARIDCgEIEgQKAggCEgMKAQgSAwoBGBIDCgEYEgQKAggIEgASAFwAB2tBY3RpdmUCBmFjdGl2ZQALa0FjdGl2ZUdsb2ICFGFjdGl2ZV9hbGxfY29udHJhY3RzAAZrQ2F1c2UCDnNodXRkb3duX2NhdXNlABprUmV3YXJkUG9vbEZyYWN0aW9uQ3VycmVudAIdX2N1cnJlbnRfcG9vbF9mcmFjdGlvbl9yZXdhcmQAG2tSZXdhcmRQb29sRnJhY3Rpb25QcmV2aW91cwIeX3ByZXZpb3VzX3Bvb2xfZnJhY3Rpb25fcmV3YXJkABNrSGVpZ2h0UG9vbEZyYWN0aW9uAhpfcG9vbF9yZXdhcmRfdXBkYXRlX2hlaWdodAAba1RvdGFsUmV3YXJkUGVyQmxvY2tDdXJyZW50Ah50b3RhbF9yZXdhcmRfcGVyX2Jsb2NrX2N1cnJlbnQAHGtUb3RhbFJld2FyZFBlckJsb2NrUHJldmlvdXMCH3RvdGFsX3Jld2FyZF9wZXJfYmxvY2tfcHJldmlvdXMAE2tSZXdhcmRVcGRhdGVIZWlnaHQCFHJld2FyZF91cGRhdGVfaGVpZ2h0ABZrVXNlclNoYXJlVG9rZW5zU3Rha2VkAhRfc2hhcmVfdG9rZW5zX2xvY2tlZAAWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAIVX3NoYXJlX3Rva2Vuc19ibG9ja2VkABprVXNlclNoYXJlVG9rZW5zTG9ja2VkVHlwZQIaX3NoYXJlX3Rva2Vuc19ibG9ja2VkX3R5cGUAHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQCHF9zaGFyZV90b2tlbnNfYmxvY2tlZF9oZWlnaHQAF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsAhVfc2hhcmVfdG9rZW5zX3ZpcnR1YWwAFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMCGl90b3RhbF9zaGFyZV90b2tlbnNfbG9ja2VkABNrU2hhcmVUb2tlbnNWaXJ0dWFsAhtfdG90YWxfc2hhcmVfdG9rZW5zX3ZpcnR1YWwAC2tMb2NrUGFyYW1zAgxfbG9ja19wYXJhbXMADWtMb2NrV2F2ZXNGZWUCDmxvY2tfd2F2ZXNfZmVlAA5rUG9vbEJvb3N0Q29lZgILX2Jvb3N0X2NvZWYAEWtGYXJtTGFzdEludGVyZXN0Ag5fbGFzdF9pbnRlcmVzdAAVa0Zhcm1Vc2VyTGFzdEludGVyZXN0Ag5fbGFzdF9pbnRlcmVzdAASa0Jvb3N0TGFzdEludGVyZXN0AhBfbGFzdF9pbnRlcmVzdF9iABZrQm9vc3RVc2VyTGFzdEludGVyZXN0AhJfbGFzdF9pbnRlcmVzdF91X2IAE2tMYXN0SW50ZXJlc3RIZWlnaHQCFV9sYXN0X2ludGVyZXN0X2hlaWdodAAHa1NXT1BpZAIHU1dPUF9pZAAOa0F2YWlsYWJsZVNXT1ACD19hdmFpbGFibGVfU1dPUAARa1N3b3BZZWFyRW1pc3Npb24CEnN3b3BfeWVhcl9lbWlzc2lvbgAQa0hhcnZlc3RQb29sVm90ZQIYX2hhcnZlc3RfcG9vbF92b3RlX2dTV09QAAlrUG9vbFZvdGUCEF9wb29sX3ZvdGVfZ1NXT1AADWtVc2VyUG9vbFZvdGUCEF91c2VyX3ZvdGVfZ1NXT1AACmtQb29sU3RydWMCC19wb29sX3N0cnVjAA5rVXNlclBvb2xTdHJ1YwIQX3VzZXJfcG9vbF9zdHJ1YwAUa0hhcnZlc3RVc2VyUG9vbFZvdGUCHV9oYXJ2ZXN0X3VzZXJfcG9vbF92b3RlX2dTV09QABNrRmlyc3RIYXJ2ZXN0SGVpZ2h0AhRmaXJzdF9oYXJ2ZXN0X2hlaWdodAANa1NoYXJlTGltaXRGSAIcc2hhcmVfbGltaXRfb25fZmlyc3RfaGFydmVzdAATa1N0cmF0QkZhcm1JbnRlcmVzdAIWX3N0cmF0X2JfZmFybV9pbnRlcmVzdAANa0NwbW1Db250cmFjdAINY3BtbV9jb250cmFjdAANa0FkbWluUHViS2V5MQILYWRtaW5fcHViXzEADWtBZG1pblB1YktleTICC2FkbWluX3B1Yl8yAA1rQWRtaW5QdWJLZXkzAgthZG1pbl9wdWJfMwASa0FkbWluSW52b2tlUHViS2V5AhBhZG1pbl9pbnZva2VfcHViABBrTW9uZXlCb3hBZGRyZXNzAhFtb25leV9ib3hfYWRkcmVzcwAOa1ZvdGluZ0FkZHJlc3MCDnZvdGluZ19hZGRyZXNzAAtrR292QWRkcmVzcwISZ292ZXJuYW5jZV9hZGRyZXNzABFrTFBGYXJtaW5nQWRkcmVzcwIKbHBfZmFybWluZwAUa0Zhcm1pbmdUcmVhc3VyZUFkZHICEGZhcm1pbmdfdHJlYXN1cmUABm9yYWNsZQkBB0FkZHJlc3MBARoBV4r/CGiaNbpAzWF08hI33qY38Po4zugeOAAOdG90YWxWb3RlU2hhcmUAgMivoCUAC3NjYWxlVmFsdWU4AIDC1y8AEmxvY2tCb29zdENvZWZTY2FsZQDoBwAQZGVmUG9vbEJvb3N0Q29lZgD0AwAHYlN0YXJ0SADasc8BARNnZXRCYXNlNThGcm9tT3JhY2xlAQNrZXkEByRtYXRjaDAJAJ0IAgUGb3JhY2xlBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZzdHJpbmcFByRtYXRjaDAJANkEAQUGc3RyaW5nBAdub3RoaW5nBQckbWF0Y2gwCQACAQkArAICBQNrZXkCCGlzIGVtcHR5AAxhZG1pblB1YktleTEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MQAMYWRtaW5QdWJLZXkyCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTIADGFkbWluUHViS2V5MwkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkzAA9tb25leUJveEFkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBRBrTW9uZXlCb3hBZGRyZXNzAA12b3RpbmdBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUOa1ZvdGluZ0FkZHJlc3MACmdvdkFkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQtrR292QWRkcmVzcwARYWRtaW5JbnZva2VQdWJLZXkJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUSa0FkbWluSW52b2tlUHViS2V5ABBscEZhcm1pbmdBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQURa0xQRmFybWluZ0FkZHJlc3MAE2Zhcm1pbmdUcmVhc3VyZUFkZHIJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBRRrRmFybWluZ1RyZWFzdXJlQWRkcgAMY3BtbUNvbnRyYWN0CQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0NwbW1Db250cmFjdAAGYWN0aXZlCQERQGV4dHJOYXRpdmUoMTA1MSkCBQR0aGlzBQdrQWN0aXZlAAphY3RpdmVHbG9iCQELdmFsdWVPckVsc2UCCQCbCAIFBm9yYWNsZQULa0FjdGl2ZUdsb2IGAARTV09QCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFB2tTV09QaWQBFWdldEhlaWdodEZpcnN0SGFydmVzdAEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkAmggCCQEHQWRkcmVzcwEJANkEAQUEcG9vbAUTa0ZpcnN0SGFydmVzdEhlaWdodAAAARRnZXRGSFNoYXJlTGltaXRUb2tlbgEEcG9vbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBHBvb2wFDWtTaGFyZUxpbWl0RkgJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFDWtTaGFyZUxpbWl0RkgBEmdldFRvdGFsU2hhcmVUb2tlbgEEcG9vbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUWa1NoYXJlVG90YWxTaGFyZVRva2VucwkArAICCQCsAgICFE5vIGRhdGEgb24gdGhlIGtleTogBQRwb29sBRZrU2hhcmVUb3RhbFNoYXJlVG9rZW5zAQxnZXRQb29sVm90ZWQBBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAJoIAgUNdm90aW5nQWRkcmVzcwkArAICBQRwb29sBQlrUG9vbFZvdGUJAQt2YWx1ZU9yRWxzZQIJALYJAQkAkQMCCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUNdm90aW5nQWRkcmVzcwkArAICBQRwb29sBQprUG9vbFN0cnVjAgACAV8AAAAAARBnZXRVc2VyUG9vbFZvdGVkAgRwb29sBHVzZXIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUNdm90aW5nQWRkcmVzcwkArAICCQCsAgIJAKwCAgUEdXNlcgIBXwUEcG9vbAUNa1VzZXJQb29sVm90ZQkBC3ZhbHVlT3JFbHNlAgkAtgkBCQCRAwIJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ12b3RpbmdBZGRyZXNzCQCsAgIJAKwCAgkArAICBQR1c2VyAgFfBQRwb29sBQ5rVXNlclBvb2xTdHJ1YwIAAgFfAAAAAAEPZ2V0U2hhcmVBc3NldElkAQRwb29sCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIJAQV2YWx1ZQEJAKYIAQUEcG9vbAIOc2hhcmVfYXNzZXRfaWQBDmFjY291bnRCYWxhbmNlAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwCQDwBwIFBHRoaXMFAmlkAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkAAgECC01hdGNoIGVycm9yAQ5jYWxjU2NhbGVWYWx1ZQIIYXNzZXRJZDEIYXNzZXRJZDIEEGFzc2V0SWQxRGVjaW1hbHMICQEFdmFsdWUBCQDsBwEFCGFzc2V0SWQxCGRlY2ltYWxzBBBhc3NldElkMkRlY2ltYWxzCAkBBXZhbHVlAQkA7AcBBQhhc3NldElkMghkZWNpbWFscwQLc2NhbGVEaWdpdHMJAGQCCQBlAgUQYXNzZXRJZDJEZWNpbWFscwUQYXNzZXRJZDFEZWNpbWFscwAICQBsBgAKAAAFC3NjYWxlRGlnaXRzAAAAAAUERE9XTgERdXNlckF2YWlsYWJsZVNXT1ACBHBvb2wEdXNlcgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBQ5rQXZhaWxhYmxlU1dPUAAAAQpyZXdhcmRJbmZvAQRwb29sBBp0b3RhbFJld2FyZFBlckJsb2NrQ3VycmVudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCmdvdkFkZHJlc3MFG2tUb3RhbFJld2FyZFBlckJsb2NrQ3VycmVudAkArAICCQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFG2tUb3RhbFJld2FyZFBlckJsb2NrQ3VycmVudAIMIGF0IGFkZHJlc3MgCQClCAEFCmdvdkFkZHJlc3MEG3RvdGFsUmV3YXJkUGVyQmxvY2tQcmV2aW91cwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCmdvdkFkZHJlc3MFHGtUb3RhbFJld2FyZFBlckJsb2NrUHJldmlvdXMJAKwCAgkArAICCQCsAgICFE5vIGRhdGEgb24gdGhlIGtleTogBRxrVG90YWxSZXdhcmRQZXJCbG9ja1ByZXZpb3VzAgwgYXQgYWRkcmVzcyAJAKUIAQUKZ292QWRkcmVzcwQZcmV3YXJkUG9vbEZyYWN0aW9uQ3VycmVudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCmdvdkFkZHJlc3MJAKwCAgUEcG9vbAUaa1Jld2FyZFBvb2xGcmFjdGlvbkN1cnJlbnQJAKwCAgkArAICCQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFBHBvb2wFGmtSZXdhcmRQb29sRnJhY3Rpb25DdXJyZW50AgwgYXQgYWRkcmVzcyAJAKUIAQUKZ292QWRkcmVzcwQScmV3YXJkVXBkYXRlSGVpZ2h0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUKZ292QWRkcmVzcwUTa1Jld2FyZFVwZGF0ZUhlaWdodAkArAICCQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFE2tSZXdhcmRVcGRhdGVIZWlnaHQCDCBhdCBhZGRyZXNzIAkApQgBBQpnb3ZBZGRyZXNzBBZwb29sUmV3YXJkVXBkYXRlSGVpZ2h0CQELdmFsdWVPckVsc2UCCQCaCAIFCmdvdkFkZHJlc3MJAKwCAgUEcG9vbAUTa0hlaWdodFBvb2xGcmFjdGlvbgUScmV3YXJkVXBkYXRlSGVpZ2h0BBpyZXdhcmRQb29sRnJhY3Rpb25QcmV2aW91cwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCmdvdkFkZHJlc3MJAKwCAgUEcG9vbAUba1Jld2FyZFBvb2xGcmFjdGlvblByZXZpb3VzCQCsAgIJAKwCAgkArAICCQCsAgICFE5vIGRhdGEgb24gdGhlIGtleTogBQRwb29sBRtrUmV3YXJkUG9vbEZyYWN0aW9uUHJldmlvdXMCDCBhdCBhZGRyZXNzIAkApQgBBQpnb3ZBZGRyZXNzBBFyZXdhcmRQb29sQ3VycmVudAkAawMFGnRvdGFsUmV3YXJkUGVyQmxvY2tDdXJyZW50BRlyZXdhcmRQb29sRnJhY3Rpb25DdXJyZW50BQ50b3RhbFZvdGVTaGFyZQQScmV3YXJkUG9vbFByZXZpb3VzCQBrAwUadG90YWxSZXdhcmRQZXJCbG9ja0N1cnJlbnQFGnJld2FyZFBvb2xGcmFjdGlvblByZXZpb3VzBQ50b3RhbFZvdGVTaGFyZQMDCQBmAgURcmV3YXJkUG9vbEN1cnJlbnQFGnRvdGFsUmV3YXJkUGVyQmxvY2tDdXJyZW50BgkAZgIFEnJld2FyZFBvb2xQcmV2aW91cwUbdG90YWxSZXdhcmRQZXJCbG9ja1ByZXZpb3VzCQACAQJicmV3YXJkUG9vbEN1cnJlbnQgPiB0b3RhbFJld2FyZFBlckJsb2NrQ3VycmVudCBvciByZXdhcmRQb29sUHJldmlvdXMgPiB0b3RhbFJld2FyZFBlckJsb2NrUHJldmlvdXMJAJYKBAURcmV3YXJkUG9vbEN1cnJlbnQFEnJld2FyZFVwZGF0ZUhlaWdodAUScmV3YXJkUG9vbFByZXZpb3VzBRZwb29sUmV3YXJkVXBkYXRlSGVpZ2h0ARNnZXRMYXN0SW50ZXJlc3RJbmZvAQRwb29sBAxmYXJtSW50ZXJlc3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0CQCsAgIJAKwCAgIUTm8gZGF0YSBvbiB0aGUga2V5OiAFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BA1ib29zdEludGVyZXN0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0AAAEEmxhc3RJbnRlcmVzdEhlaWdodAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAlQoDBRJsYXN0SW50ZXJlc3RIZWlnaHQFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAELY2FsY0Zhcm1Sd2QCBHBvb2wOY3VyVG90YWxSZXdhcmQEDXBvb2xCb29zdENvZWYJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBQ5rUG9vbEJvb3N0Q29lZgUQZGVmUG9vbEJvb3N0Q29lZgkAawMFDmN1clRvdGFsUmV3YXJkBRJsb2NrQm9vc3RDb2VmU2NhbGUJAGQCBQ1wb29sQm9vc3RDb2VmBRJsb2NrQm9vc3RDb2VmU2NhbGUBDGNhbGNCb29zdFJ3ZAIEcG9vbA5jdXJUb3RhbFJld2FyZAQNcG9vbEJvb3N0Q29lZgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFDmtQb29sQm9vc3RDb2VmBRBkZWZQb29sQm9vc3RDb2VmCQBrAwUOY3VyVG90YWxSZXdhcmQFDXBvb2xCb29zdENvZWYJAGQCBQ1wb29sQm9vc3RDb2VmBRJsb2NrQm9vc3RDb2VmU2NhbGUBDGNhbGNJbnRlcmVzdAsEcG9vbBJsYXN0SW50ZXJlc3RIZWlnaHQScmV3YXJkVXBkYXRlSGVpZ2h0FnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQMZmFybUludGVyZXN0DWJvb3N0SW50ZXJlc3QJcG9vbFZvdGVkFWN1cnJlbnRSZXdhcmRQZXJCbG9jaxBzaGFyZVRva2VuTG9ja2VkFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sKc2NhbGVWYWx1ZQQMJHQwOTQ4MDEwNjUzAwMDCQBmAgUScmV3YXJkVXBkYXRlSGVpZ2h0BQZoZWlnaHQJAAACBRJyZXdhcmRVcGRhdGVIZWlnaHQFFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQHBgMJAGYCBQZoZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAkBAiE9AgUScmV3YXJkVXBkYXRlSGVpZ2h0BRZwb29sUmV3YXJkVXBkYXRlSGVpZ2h0BwQBcgkAaAIFFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sJAGUCBQZoZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAkAlQoDBQFyBQxmYXJtSW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QDAwMJAGYCBQZoZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAkAAAIFEnJld2FyZFVwZGF0ZUhlaWdodAUWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAcJAGYCBRJsYXN0SW50ZXJlc3RIZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAcEAXIJAGgCBRVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAGUCBQZoZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAkAlQoDBQFyBQxmYXJtSW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QECXJ3ZEJmclVwZAkAaAIFFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sJAGUCBRJyZXdhcmRVcGRhdGVIZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAQGZkJmclVwCQBkAgUMZmFybUludGVyZXN0CQBrAwkBC2NhbGNGYXJtUndkAgUEcG9vbAUJcndkQmZyVXBkBQpzY2FsZVZhbHVlBRBzaGFyZVRva2VuTG9ja2VkBAZiQmZyVXAJAGQCBQ1ib29zdEludGVyZXN0AwkAZgIFCXBvb2xWb3RlZAAACQBrAwkBDGNhbGNCb29zdFJ3ZAIFBHBvb2wFCXJ3ZEJmclVwZAULc2NhbGVWYWx1ZTgFCXBvb2xWb3RlZAAABANyd2QJAGgCBRVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAGUCBQZoZWlnaHQFEnJld2FyZFVwZGF0ZUhlaWdodAkAlQoDBQNyd2QFBmZCZnJVcAUGYkJmclVwBAZyZXdhcmQIBQwkdDA5NDgwMTA2NTMCXzEEDmZhcm1JbnRyQmVmb3JlCAUMJHQwOTQ4MDEwNjUzAl8yBA9ib29zdEludHJCZWZvcmUIBQwkdDA5NDgwMTA2NTMCXzMED25ld0Zhcm1JbnRlcmVzdAkAZAIFDmZhcm1JbnRyQmVmb3JlCQBrAwkBC2NhbGNGYXJtUndkAgUEcG9vbAUGcmV3YXJkBQpzY2FsZVZhbHVlBRBzaGFyZVRva2VuTG9ja2VkBBBuZXdCb29zdEludGVyZXN0CQBkAgUPYm9vc3RJbnRyQmVmb3JlAwkAZgIFCXBvb2xWb3RlZAAACQBrAwkBDGNhbGNCb29zdFJ3ZAIFBHBvb2wFBnJld2FyZAULc2NhbGVWYWx1ZTgFCXBvb2xWb3RlZAAACQCUCgIFD25ld0Zhcm1JbnRlcmVzdAUQbmV3Qm9vc3RJbnRlcmVzdAEJY2xhaW1DYWxjAgRwb29sBHVzZXIECnNjYWxlVmFsdWUJAQ5jYWxjU2NhbGVWYWx1ZQIFBFNXT1AJAQ9nZXRTaGFyZUFzc2V0SWQBBQRwb29sBAlwb29sVm90ZWQJAQxnZXRQb29sVm90ZWQBBQRwb29sBAp1UG9vbFZvdGVkCQEQZ2V0VXNlclBvb2xWb3RlZAIFBHBvb2wFBHVzZXIECnNoYXJlVG9rZW4JARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBBF0b3RhbFNoYXJlVmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFCnNoYXJlVG9rZW4EEnN0cmF0QkZhcm1JbnRlcmVzdAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTdHJhdEJGYXJtSW50ZXJlc3QAAAQNJHQwMTE0OTExMTU3MgkBE2dldExhc3RJbnRlcmVzdEluZm8BBQRwb29sBBJsYXN0SW50ZXJlc3RIZWlnaHQIBQ0kdDAxMTQ5MTExNTcyAl8xBAxmYXJtSW50ZXJlc3QIBQ0kdDAxMTQ5MTExNTcyAl8yBA1ib29zdEludGVyZXN0CAUNJHQwMTE0OTExMTU3MgJfMwQNJHQwMTE1NzcxMTY5MQkBCnJld2FyZEluZm8BBQRwb29sBBVjdXJyZW50UmV3YXJkUGVyQmxvY2sIBQ0kdDAxMTU3NzExNjkxAl8xBBJyZXdhcmRVcGRhdGVIZWlnaHQIBQ0kdDAxMTU3NzExNjkxAl8yBBZwcmV2aW91c1Jld2FyZFBlckJsb2NrCAUNJHQwMTE1NzcxMTY5MQJfMwQWcG9vbFJld2FyZFVwZGF0ZUhlaWdodAgFDSR0MDExNTc3MTE2OTECXzQEDXVGYXJtSW50ZXJlc3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QEDnVCb29zdEludGVyZXN0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QDAwkAZgIFEnN0cmF0QkZhcm1JbnRlcmVzdAUNdUZhcm1JbnRlcmVzdAkAZgIFCnVQb29sVm90ZWQAAAcAAAUNYm9vc3RJbnRlcmVzdAQSdVNoYXJlVG9rZW5zU3Rha2VkCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQAAAQQdVNoYXJlVG9rZW5zVmlydAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUSdVNoYXJlVG9rZW5zU3Rha2VkAwkAAAIFEXRvdGFsU2hhcmVWaXJ0dWFsAAAECnRvVHJlYXN1cnkDCQAAAgUMZmFybUludGVyZXN0AAAJAGgCBRVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAGUCBQZoZWlnaHQFEmxhc3RJbnRlcmVzdEhlaWdodAAACQCWCgQFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAAABQp0b1RyZWFzdXJ5BA0kdDAxMjQ0MjEyODM0CQEMY2FsY0ludGVyZXN0CwUEcG9vbAUSbGFzdEludGVyZXN0SGVpZ2h0BRJyZXdhcmRVcGRhdGVIZWlnaHQFFnBvb2xSZXdhcmRVcGRhdGVIZWlnaHQFDGZhcm1JbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAUJcG9vbFZvdGVkBRVjdXJyZW50UmV3YXJkUGVyQmxvY2sFEXRvdGFsU2hhcmVWaXJ0dWFsBRZwcmV2aW91c1Jld2FyZFBlckJsb2NrBQpzY2FsZVZhbHVlBA9uZXdGYXJtSW50ZXJlc3QIBQ0kdDAxMjQ0MjEyODM0Al8xBBBuZXdCb29zdEludGVyZXN0CAUNJHQwMTI0NDIxMjgzNAJfMgQHZmFybVJ3ZAkAawMFEHVTaGFyZVRva2Vuc1ZpcnQJAGUCBQ9uZXdGYXJtSW50ZXJlc3QFDXVGYXJtSW50ZXJlc3QFCnNjYWxlVmFsdWUEDXBvb2xCb29zdENvZWYJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBQ5rUG9vbEJvb3N0Q29lZgUQZGVmUG9vbEJvb3N0Q29lZgQLYm9vc3RSd2RNYXgJAGsDCQBrAwUQdVNoYXJlVG9rZW5zVmlydAkAZQIFD25ld0Zhcm1JbnRlcmVzdAkAlgMBCQDMCAIFDXVGYXJtSW50ZXJlc3QJAMwIAgUSc3RyYXRCRmFybUludGVyZXN0BQNuaWwFCnNjYWxlVmFsdWUFDXBvb2xCb29zdENvZWYFEmxvY2tCb29zdENvZWZTY2FsZQQLY3VyQm9vc3RSd2QJAGsDCQBlAgUQbmV3Qm9vc3RJbnRlcmVzdAUOdUJvb3N0SW50ZXJlc3QFCnVQb29sVm90ZWQFC3NjYWxlVmFsdWU4BAhib29zdFJ3ZAkAlwMBCQDMCAIFC2Jvb3N0UndkTWF4CQDMCAIFC2N1ckJvb3N0UndkBQNuaWwECnRvVHJlYXN1cnkJAGUCBQtib29zdFJ3ZE1heAUIYm9vc3RSd2QDCQBmAgAABQp0b1RyZWFzdXJ5CQACAQIOdG9UcmVhc3VyeSA8IDAJAJYKBAUPbmV3RmFybUludGVyZXN0BRBuZXdCb29zdEludGVyZXN0CQBkAgUHZmFybVJ3ZAUIYm9vc3RSd2QFCnRvVHJlYXN1cnkBG2F2YWlsYWJsZUNsYWltQ2FsY0FsbEJ5VXNlcgIFcG9vbHMEdXNlcgoBDWNhbGNBdmFpbGFibGUCA2FjYwRwb29sBA0kdDAxMzcwMzEzNzMyBQNhY2MECG5ld1Bvb2xzCAUNJHQwMTM3MDMxMzczMgJfMQQHYW1vdW50cwgFDSR0MDEzNzAzMTM3MzICXzIEDSR0MDEzNzQxMTM3OTQJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAJmaQgFDSR0MDEzNzQxMTM3OTQCXzEEAmJpCAUNJHQwMTM3NDExMzc5NAJfMgQLY2xhaW1BbW91bnQIBQ0kdDAxMzc0MTEzNzk0Al8zBAJ0dAgFDSR0MDEzNzQxMTM3OTQCXzQEDWF2YWlsYWJsZUZ1bmQJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAkAlAoCCQDNCAIFCG5ld1Bvb2xzBQRwb29sCQDNCAIFB2Ftb3VudHMFDWF2YWlsYWJsZUZ1bmQKAAIkbAUFcG9vbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ1jYWxjQXZhaWxhYmxlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA2MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAEVY2FuTG9ja0luRmlyc3RIYXJ2ZXN0BQRwb29sBHVzZXIVdXNlclNoYXJlVG9rZW5zU3Rha2VkCXBtdEFtb3VudAhsb2NrVHlwZQMJAGYCCQEVZ2V0SGVpZ2h0Rmlyc3RIYXJ2ZXN0AQUEcG9vbAUGaGVpZ2h0BA90b3RhbFZvdGVBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUNdm90aW5nQWRkcmVzcwkArAICBQRwb29sBRBrSGFydmVzdFBvb2xWb3RlAAAEDnVzZXJWb3RlQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFDXZvdGluZ0FkZHJlc3MJAKwCAgkArAICCQCsAgIFBHVzZXICAV8FBHBvb2wFFGtIYXJ2ZXN0VXNlclBvb2xWb3RlAAAEEUZIU2hhcmVUb2tlbkxpbWl0CQEUZ2V0RkhTaGFyZUxpbWl0VG9rZW4BCQERQGV4dHJOYXRpdmUoMTA2MikBBQRwb29sBBVGSFNoYXJlVG9rZW5Vc2VyTGltaXQJAGUCCQBrAwURRkhTaGFyZVRva2VuTGltaXQFDnVzZXJWb3RlQW1vdW50BQ90b3RhbFZvdGVBbW91bnQFFXVzZXJTaGFyZVRva2Vuc1N0YWtlZAMJAGYCBQhsb2NrVHlwZQAACQACAQIyWW91IGNhbid0IGxvY2sgc2hhcmVUb2tlbnMgdGlsbCBmaXJzdCBoYXJ2ZXN0IGVuZC4DCQAAAgUOdXNlclZvdGVBbW91bnQAAAAAAwkAZwIFCXBtdEFtb3VudAUVRkhTaGFyZVRva2VuVXNlckxpbWl0CQBlAgUJcG10QW1vdW50BRVGSFNoYXJlVG9rZW5Vc2VyTGltaXQAAAAAAQ1nZXRMb2NrUGFyYW1zAQR0eXBlBApsb2NrUGFyYW1zCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzCQCsAgIJAKQDAQUEdHlwZQULa0xvY2tQYXJhbXMJAKwCAgIeVGhlcmUgYXJlIG5vIGtleSBmb3IgbG9jayB0eXBlCQCkAwEFBHR5cGUCAV8JAJQKAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmxvY2tQYXJhbXMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmxvY2tQYXJhbXMAAQEHc3VzcGVuZAEFY2F1c2UJAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2tBY3RpdmUHCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmtDYXVzZQUFY2F1c2UFA25pbAEIaXNBY3RpdmUAAwMFBmFjdGl2ZQUKYWN0aXZlR2xvYgcFBHVuaXQJAAIBAh9EQXBwIGlzIGluYWN0aXZlIGF0IHRoaXMgbW9tZW50AQtpc0FkbWluQ2FsbAEBaQMJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFDGFkbWluUHViS2V5MQkAzAgCBQxhZG1pblB1YktleTIJAMwIAgUMYWRtaW5QdWJLZXkzBQNuaWwIBQFpD2NhbGxlclB1YmxpY0tleQUEdW5pdAkAAgECIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEKaXNQb29sQ2FsbAIBaQRwb29sAwMJAAACCQClCAEIBQFpBmNhbGxlcgUEcG9vbAYJAAACCAUBaQZjYWxsZXIFDGNwbW1Db250cmFjdAUEdW5pdAkAAgECIE9ubHkgcG9vbCBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQppc1NlbGZDYWxsAQFpAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwUEdW5pdAkAAgECK09ubHkgY29udHJhY3QgaXRzZWxmIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BE2NhbGNMb2NrU2hhcmVUb2tlbnMEAWkGY2FsbGVyBHBvb2wIbG9ja1R5cGUEDHNoYXJlQXNzZXRJZAkBD2dldFNoYXJlQXNzZXRJZAEFBHBvb2wEBHVzZXIJAKUIAQUGY2FsbGVyBAp0b3RhbFNoYXJlCQESZ2V0VG90YWxTaGFyZVRva2VuAQUEcG9vbAQRdG90YWxTaGFyZVZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsBQp0b3RhbFNoYXJlBBB1c2VyU3Rha2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQAAAQPdXNlckxvY2tlZEhlaWd0CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQAAAQQdXNlckxvY2tlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zTG9ja2VkAAAEEXVzZXJBbW91bnRWaXJ0dWFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRB1c2VyU3Rha2VkQW1vdW50BBR0b3RhbFVzZXJTaGFyZVRva2VucwkAZAIJAGQCBRB1c2VyU3Rha2VkQW1vdW50BRB1c2VyTG9ja2VkQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQNJHQwMTY1OTUxNjY0NwkBDWdldExvY2tQYXJhbXMBBQhsb2NrVHlwZQQKbG9ja1BlcmlvZAgFDSR0MDE2NTk1MTY2NDcCXzEECGxvY2tDb2VmCAUNJHQwMTY1OTUxNjY0NwJfMgQMbG9ja1dhdmVzRmVlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQ1rTG9ja1dhdmVzRmVlAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQxzaGFyZUFzc2V0SWQJAAIBAhtXcm9uZyBzaGFyZXRva2VuIGluIHBheW1lbnQDCQBnAgAACAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAkAAgECJVBheW1lbnQgYW1vdW50IG11c3QgYmUgZ3JlYXRlciB0aGFuIDADCQBmAgAABQhsb2NrVHlwZQkAAgECFWxvY2tUeXBlIG11c3QgYmUgPj0gMAQVc2hhcmVUb2tlbnNDaGFuZ2VPbkZICQEVY2FuTG9ja0luRmlyc3RIYXJ2ZXN0BQUEcG9vbAUEdXNlcgUQdXNlclN0YWtlZEFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFCGxvY2tUeXBlAwkAAAIFFXNoYXJlVG9rZW5zQ2hhbmdlT25GSAUVc2hhcmVUb2tlbnNDaGFuZ2VPbkZIBA0kdDAxNzA3NDE5MDA4AwkAAAIFCGxvY2tUeXBlAAAEFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQBlAgkAZAIFEXVzZXJBbW91bnRWaXJ0dWFsCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUVc2hhcmVUb2tlbnNDaGFuZ2VPbkZICQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQJAGUCCQBkAgUQdXNlclN0YWtlZEFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFFXNoYXJlVG9rZW5zQ2hhbmdlT25GSAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwJAGUCCQBkAgURdG90YWxTaGFyZVZpcnR1YWwICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGY2FsbGVyBRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDbmlsCQBlAgkAZAIFCnRvdGFsU2hhcmUICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BRVzaGFyZVRva2Vuc0NoYW5nZU9uRkgDAwkAAAIFD3VzZXJMb2NrZWRIZWlndAAAAwMJAGYCAAIJAJADAQgFAWkIcGF5bWVudHMGCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwABB2Fzc2V0SWQFBHVuaXQGCQBmAgUMbG9ja1dhdmVzRmVlCAkAkQMCCAUBaQhwYXltZW50cwABBmFtb3VudAcJAAIBCQCsAgIJAKwCAgIrWW91IG5lZWQgdG8gcGF5IGFkZGl0aW9uYWwgd2F2ZXMgY29taXNzaW9uIAkApAMBBQxsb2NrV2F2ZXNGZWUCBVdBVkVTAwkAZgIFD3VzZXJMb2NrZWRIZWlndAkAZAIFBmhlaWdodAUKbG9ja1BlcmlvZAkAAgECT1lvdSBjYW5ub3QgbG9jayBzaGFyZXRva2VucyBmb3IgYSBwZXJpb2QgbGVzcyB0aGFuIHdoYXQgeW91IGhhdmUgYWxyZWFkeSBsb2NrZWQEE3VzZXJMb2NrZWRBbW91bnROZXcJAGQCBRB1c2VyTG9ja2VkQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQSdXNlckxvY2tlZEhlaWd0TmV3CQBkAgUGaGVpZ2h0BQpsb2NrUGVyaW9kBBR1c2VyQW1vdW50VmlydHVhbE5ldwkAZAIJAGsDBRN1c2VyTG9ja2VkQW1vdW50TmV3BQhsb2NrQ29lZgUSbG9ja0Jvb3N0Q29lZlNjYWxlBRB1c2VyU3Rha2VkQW1vdW50CQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQFE3VzZXJMb2NrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFHGtVc2VyU2hhcmVUb2tlbnNMb2NrZWRIZWlnaHQFEnVzZXJMb2NrZWRIZWlndE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUaa1VzZXJTaGFyZVRva2Vuc0xvY2tlZFR5cGUFCGxvY2tUeXBlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa1NoYXJlVG9rZW5zVmlydHVhbAkAZAIJAGUCBRF0b3RhbFNoYXJlVmlydHVhbAURdXNlckFtb3VudFZpcnR1YWwFFHVzZXJBbW91bnRWaXJ0dWFsTmV3BQNuaWwJAGQCBQp0b3RhbFNoYXJlCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQLbG9ja0VudHJpZXMIBQ0kdDAxNzA3NDE5MDA4Al8xBA10b3RhbFNoYXJlTmV3CAUNJHQwMTcwNzQxOTAwOAJfMgMJAGYCCQEOYWNjb3VudEJhbGFuY2UBBQxzaGFyZUFzc2V0SWQFDXRvdGFsU2hhcmVOZXcJAAIBAjBCYWxhbmNlIG9mIHNoYXJlLXRva2VuIGlzIGxvd2VyIHRoYW4gdG90YWxBbW91bnQEDSR0MDE5MTMzMTkyMTUJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAxOTEzMzE5MjE1Al8xBA1ib29zdEludGVyZXN0CAUNJHQwMTkxMzMxOTIxNQJfMgQLY2xhaW1BbW91bnQIBQ0kdDAxOTEzMzE5MjE1Al8zBAp0b1RyZWFzdXJlCAUNJHQwMTkxMzMxOTIxNQJfNAQRYXZhaWxhYmxlRnVuZHNOZXcJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAQEdXBscAMJAAACCQCdCAIJAQdBZGRyZXNzAQkA2QQBBQRwb29sAgd2ZXJzaW9uAgUzLjAuMAkA/AcEBRBscEZhcm1pbmdBZGRyZXNzAhJ1cGRhdGVVc2VySW50ZXJlc3QJAMwIAgUEdXNlcgkAzAgCBQRwb29sCQDMCAIFFHRvdGFsVXNlclNoYXJlVG9rZW5zBQNuaWwFA25pbAAAAwkAAAIFBHVwbHAFBHVwbHAJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFFmtTaGFyZVRvdGFsU2hhcmVUb2tlbnMFDXRvdGFsU2hhcmVOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFDmtBdmFpbGFibGVTV09QBRFhdmFpbGFibGVGdW5kc05ldwkAzAgCCQEHUmVpc3N1ZQMFBFNXT1AFCnRvVHJlYXN1cmUGCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFE2Zhcm1pbmdUcmVhc3VyZUFkZHIFCnRvVHJlYXN1cmUFBFNXT1AFA25pbAULbG9ja0VudHJpZXMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BF2NhbGNXaXRoZHJhd1NoYXJlVG9rZW5zBAFpBmNhbGxlcgRwb29sGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAEDXNoYXJlVG9rZW5zSWQJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgkBBXZhbHVlAQkApggBBQRwb29sAg5zaGFyZV9hc3NldF9pZAQEdXNlcgkApQgBBQZjYWxsZXIEDSR0MDIwNDA3MjA0ODkJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAyMDQwNzIwNDg5Al8xBA1ib29zdEludGVyZXN0CAUNJHQwMjA0MDcyMDQ4OQJfMgQLY2xhaW1BbW91bnQIBQ0kdDAyMDQwNzIwNDg5Al8zBAp0b1RyZWFzdXJlCAUNJHQwMjA0MDcyMDQ4OQJfNAQQdXNlclN0YWtlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zU3Rha2VkAAAEEHVzZXJMb2NrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAAABBF1c2VyQW1vdW50VmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUQdXNlclN0YWtlZEFtb3VudAQTdXNlclN0YWtlZEFtb3VudE5ldwkAZQIFEHVzZXJTdGFrZWRBbW91bnQFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEEWF2YWlsYWJsZUZ1bmRzTmV3CQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQEEHRvdGFsU2hhcmVBbW91bnQJARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBBF0b3RhbFNoYXJlVmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFEHRvdGFsU2hhcmVBbW91bnQEE3RvdGFsU2hhcmVBbW91bnROZXcJAGUCBRB0b3RhbFNoYXJlQW1vdW50BRlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BBR0b3RhbFNoYXJlVmlydHVhbE5ldwkAZQIFEXRvdGFsU2hhcmVWaXJ0dWFsBRlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BBR1c2VyQW1vdW50VmlydHVhbE5ldwkAZQIFEXVzZXJBbW91bnRWaXJ0dWFsBRlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50AwkAZgIFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQFEHVzZXJTdGFrZWRBbW91bnQJAAIBAixXaXRoZHJhdyBhbW91bnQgbW9yZSB0aGVuIHVzZXIgbG9ja2VkIGFtb3VudAMJAGYCCQEOYWNjb3VudEJhbGFuY2UBBQ1zaGFyZVRva2Vuc0lkBRB0b3RhbFNoYXJlQW1vdW50CQACAQIwQmFsYW5jZSBvZiBzaGFyZS10b2tlbiBpcyBsb3dlciB0aGFuIHRvdGFsQW1vdW50BAR1cGxwAwkAAAIJAJ0IAgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wCB3ZlcnNpb24CBTMuMC4wCQD8BwQFEGxwRmFybWluZ0FkZHJlc3MCEnVwZGF0ZVVzZXJJbnRlcmVzdAkAzAgCBQR1c2VyCQDMCAIFBHBvb2wJAMwIAgkAZAIFEHVzZXJTdGFrZWRBbW91bnQFEHVzZXJMb2NrZWRBbW91bnQFA25pbAUDbmlsAAADCQAAAgUEdXBscAUEdXBscAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUVa0Zhcm1Vc2VyTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtCb29zdFVzZXJMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrVXNlclNoYXJlVG9rZW5zU3Rha2VkBRN1c2VyU3Rha2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRdrVXNlclNoYXJlVG9rZW5zVmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUWa1NoYXJlVG90YWxTaGFyZVRva2VucwUTdG90YWxTaGFyZUFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsBRR0b3RhbFNoYXJlVmlydHVhbE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AFEWF2YWlsYWJsZUZ1bmRzTmV3CQDMCAIJAQdSZWlzc3VlAwUEU1dPUAUKdG9UcmVhc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQFDXNoYXJlVG9rZW5zSWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEJY2FsY0NsYWltAwFpBHBvb2wGY2FsbGVyBA1zaGFyZVRva2Vuc0lkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIJAQV2YWx1ZQEJAKYIAQUEcG9vbAIOc2hhcmVfYXNzZXRfaWQEBHVzZXIJAKUIAQUGY2FsbGVyBBBzaGFyZVRva2VuTG9ja2VkCQESZ2V0VG90YWxTaGFyZVRva2VuAQUEcG9vbAQNJHQwMjMwMDIyMzA4NAkBCWNsYWltQ2FsYwIFBHBvb2wFBHVzZXIEDGZhcm1JbnRlcmVzdAgFDSR0MDIzMDAyMjMwODQCXzEEDWJvb3N0SW50ZXJlc3QIBQ0kdDAyMzAwMjIzMDg0Al8yBAtjbGFpbUFtb3VudAgFDSR0MDIzMDAyMjMwODQCXzMECnRvVHJlYXN1cmUIBQ0kdDAyMzAwMjIzMDg0Al80BA1hdmFpbGFibGVGdW5kCQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQDCQBmAgkBDmFjY291bnRCYWxhbmNlAQUNc2hhcmVUb2tlbnNJZAUQc2hhcmVUb2tlbkxvY2tlZAkAAgECMEJhbGFuY2Ugb2Ygc2hhcmUtdG9rZW4gaXMgbG93ZXIgdGhhbiB0b3RhbEFtb3VudAQGdVRyYW5zAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUNYXZhaWxhYmxlRnVuZAUEU1dPUAUDbmlsBQNuaWwJAJQKAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRVrRmFybVVzZXJMYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa0Jvb3N0VXNlckxhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFDmtBdmFpbGFibGVTV09QAAAJAMwIAgkBB1JlaXNzdWUDBQRTV09QCQBkAgUKdG9UcmVhc3VyZQUNYXZhaWxhYmxlRnVuZAYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAUDbmlsBQZ1VHJhbnMFDWF2YWlsYWJsZUZ1bmQSAWkBBGluaXQBB2Vhcmx5TFADCQEJaXNEZWZpbmVkAQkAnQgCBQR0aGlzBQdrU1dPUGlkCQACAQIYU1dPUCBhbHJlYWR5IGluaXRpYWxpemVkBAppbml0QW1vdW50AICA6YOx3hYECVNXT1Bpc3N1ZQkAwggFAgRTV09QAhNTV09QIHByb3RvY29sIHRva2VuBQppbml0QW1vdW50AAgGBAZTV09QaWQJALgIAQUJU1dPUGlzc3VlCQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBgkAzAgCCQDCCAUCBFNXT1ACE1NXT1AgcHJvdG9jb2wgdG9rZW4FCmluaXRBbW91bnQACAYJAMwIAgkBC1N0cmluZ0VudHJ5AgUHa1NXT1BpZAkA2AQBBQZTV09QaWQFA25pbAFpARRpbml0UG9vbFNoYXJlRmFybWluZwEEcG9vbAkBC3ZhbHVlT3JFbHNlAgkBC2lzQWRtaW5DYWxsAQUBaQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRZrU2hhcmVUb3RhbFNoYXJlVG9rZW5zAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQFA25pbAFpARJ1cGRhdGVQb29sSW50ZXJlc3QBBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQADCQECIT0CCAUBaQZjYWxsZXIFCmdvdkFkZHJlc3MJAAIBAiZPbmx5IEdvdmVybmFuY2UgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgQEdXNlcgkApQgBCQCnCAEFEWFkbWluSW52b2tlUHViS2V5BA0kdDAyNDk2MTI1MDM1CQEJY2xhaW1DYWxjAgUEcG9vbAUEdXNlcgQMZmFybUludGVyZXN0CAUNJHQwMjQ5NjEyNTAzNQJfMQQNYm9vc3RJbnRlcmVzdAgFDSR0MDI0OTYxMjUwMzUCXzIED2Jvb3N0TFBpbnRlcmVzdAgFDSR0MDI0OTYxMjUwMzUCXzMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAURa0Zhcm1MYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRJrQm9vc3RMYXN0SW50ZXJlc3QFDWJvb3N0SW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUTa0xhc3RJbnRlcmVzdEhlaWdodAUGaGVpZ2h0BQNuaWwBaQEPbG9ja1NoYXJlVG9rZW5zAgRwb29sCGxvY2tUeXBlCQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQETY2FsY0xvY2tTaGFyZVRva2VucwQFAWkIBQFpBmNhbGxlcgUEcG9vbAUIbG9ja1R5cGUBaQEXbG9ja1NoYXJlVG9rZW5zRnJvbVBvb2wDC2NhbGxlckJ5dGVzBHBvb2wIbG9ja1R5cGUJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQppc1Bvb2xDYWxsAgUBaQUEcG9vbAkBE2NhbGNMb2NrU2hhcmVUb2tlbnMEBQFpCQEHQWRkcmVzcwEFC2NhbGxlckJ5dGVzBQRwb29sBQhsb2NrVHlwZQFpARVsb2NrU3Rha2VkU2hhcmVUb2tlbnMDBHBvb2wIbG9ja1R5cGUKbG9ja0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAQMc2hhcmVBc3NldElkCQEPZ2V0U2hhcmVBc3NldElkAQUEcG9vbAQEdXNlcgkApQgBCAUBaQZjYWxsZXIECnRvdGFsU2hhcmUJARJnZXRUb3RhbFNoYXJlVG9rZW4BBQRwb29sBBF0b3RhbFNoYXJlVmlydHVhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwFCnRvdGFsU2hhcmUEEHVzZXJTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAAABA91c2VyTG9ja2VkSGVpZ3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUca1VzZXJTaGFyZVRva2Vuc0xvY2tlZEhlaWdodAAABBB1c2VyTG9ja2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQAAAQRdXNlckFtb3VudFZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFEHVzZXJTdGFrZWRBbW91bnQEFHRvdGFsVXNlclNoYXJlVG9rZW5zCQBkAgUQdXNlclN0YWtlZEFtb3VudAUQdXNlckxvY2tlZEFtb3VudAQNJHQwMjY0NTQyNjUwNgkBDWdldExvY2tQYXJhbXMBBQhsb2NrVHlwZQQKbG9ja1BlcmlvZAgFDSR0MDI2NDU0MjY1MDYCXzEECGxvY2tDb2VmCAUNJHQwMjY0NTQyNjUwNgJfMgQMbG9ja1dhdmVzRmVlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQ1rTG9ja1dhdmVzRmVlAwkAZgIJARVnZXRIZWlnaHRGaXJzdEhhcnZlc3QBBQRwb29sBQZoZWlnaHQJAAIBAjJZb3UgY2FuJ3QgbG9jayBzaGFyZVRva2VucyB0aWxsIGZpcnN0IGhhcnZlc3QgZW5kLgMJAGcCAAAFCGxvY2tUeXBlCQACAQIUbG9ja1R5cGUgbXVzdCBiZSA+IDADCQBmAgUKbG9ja0Ftb3VudAUQdXNlclN0YWtlZEFtb3VudAkAAgEJAKwCAgIZWW91IGNhbid0IGxvY2sgbW9yZSB0aGFuIAkApAMBBRB1c2VyU3Rha2VkQW1vdW50AwkAZgIJAQ5hY2NvdW50QmFsYW5jZQEFDHNoYXJlQXNzZXRJZAUKdG90YWxTaGFyZQkAAgECMEJhbGFuY2Ugb2Ygc2hhcmUtdG9rZW4gaXMgbG93ZXIgdGhhbiB0b3RhbEFtb3VudAMDCQAAAgUPdXNlckxvY2tlZEhlaWd0AAADAwkAZgIAAQkAkAMBCAUBaQhwYXltZW50cwYJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUEdW5pdAYJAGYCBQxsb2NrV2F2ZXNGZWUICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BwkAAgEJAKwCAgkArAICAitZb3UgbmVlZCB0byBwYXkgYWRkaXRpb25hbCB3YXZlcyBjb21pc3Npb24gCQCkAwEFDGxvY2tXYXZlc0ZlZQIFV0FWRVMDAwkAAAIFD3VzZXJMb2NrZWRIZWlndAAACQBnAgAABQpsb2NrQW1vdW50BwkAAgECIWxvY2tBbW91bnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gMAMJAGYCAAAFCmxvY2tBbW91bnQJAAIBAhtsb2NrQW1vdW50IG11c3QgYmUgcG9zaXRpdmUDCQBmAgUPdXNlckxvY2tlZEhlaWd0CQBkAgUGaGVpZ2h0BQpsb2NrUGVyaW9kCQACAQJPWW91IGNhbm5vdCBsb2NrIHNoYXJldG9rZW5zIGZvciBhIHBlcmlvZCBsZXNzIHRoYW4gd2hhdCB5b3UgaGF2ZSBhbHJlYWR5IGxvY2tlZAQTdXNlckxvY2tlZEFtb3VudE5ldwkAZAIFEHVzZXJMb2NrZWRBbW91bnQFCmxvY2tBbW91bnQEE3VzZXJTdGFrZWRBbW91bnROZXcJAGUCBRB1c2VyU3Rha2VkQW1vdW50BQpsb2NrQW1vdW50BBJ1c2VyTG9ja2VkSGVpZ3ROZXcJAGQCBQZoZWlnaHQFCmxvY2tQZXJpb2QEFHVzZXJBbW91bnRWaXJ0dWFsTmV3CQBkAgkAawMFE3VzZXJMb2NrZWRBbW91bnROZXcFCGxvY2tDb2VmBRJsb2NrQm9vc3RDb2VmU2NhbGUFE3VzZXJTdGFrZWRBbW91bnROZXcEDSR0MDI3Nzk2Mjc4NzgJAQljbGFpbUNhbGMCBQRwb29sBQR1c2VyBAxmYXJtSW50ZXJlc3QIBQ0kdDAyNzc5NjI3ODc4Al8xBA1ib29zdEludGVyZXN0CAUNJHQwMjc3OTYyNzg3OAJfMgQLY2xhaW1BbW91bnQIBQ0kdDAyNzc5NjI3ODc4Al8zBAp0b1RyZWFzdXJlCAUNJHQwMjc3OTYyNzg3OAJfNAQRYXZhaWxhYmxlRnVuZHNOZXcJAGQCCQERdXNlckF2YWlsYWJsZVNXT1ACBQRwb29sBQR1c2VyBQtjbGFpbUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAUTdXNlclN0YWtlZEFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAUTdXNlckxvY2tlZEFtb3VudE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUca1VzZXJTaGFyZVRva2Vuc0xvY2tlZEhlaWdodAUSdXNlckxvY2tlZEhlaWd0TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRprVXNlclNoYXJlVG9rZW5zTG9ja2VkVHlwZQUIbG9ja1R5cGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRR1c2VyQW1vdW50VmlydHVhbE5ldwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrU2hhcmVUb2tlbnNWaXJ0dWFsCQBkAgkAZQIFEXRvdGFsU2hhcmVWaXJ0dWFsBRF1c2VyQW1vdW50VmlydHVhbAUUdXNlckFtb3VudFZpcnR1YWxOZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFWtGYXJtVXNlckxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrQm9vc3RVc2VyTGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AFEWF2YWlsYWJsZUZ1bmRzTmV3CQDMCAIJAQdSZWlzc3VlAwUEU1dPUAUKdG9UcmVhc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAUDbmlsAWkBDnVubG9ja1VzZXJMb2NrAgRwb29sBHVzZXIJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAEDGxvY2tXYXZlc0ZlZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwUNa0xvY2tXYXZlc0ZlZQQPdXNlckxvY2tlZEhlaWd0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUca1VzZXJTaGFyZVRva2Vuc0xvY2tlZEhlaWdodAkArAICCQCsAgIJAKwCAgkArAICAhFUaGVyZSBpcyBubyBwb29sIAUEcG9vbAIJIG9yIHVzZXIgBQR1c2VyAgl3aXRoIGxvY2sEEXRvdGFsU2hhcmVWaXJ0dWFsCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwEEHVzZXJTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAAABBB1c2VyTG9ja2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQAAAQRdXNlckFtb3VudFZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFEHVzZXJTdGFrZWRBbW91bnQDCQBmAgUPdXNlckxvY2tlZEhlaWd0BQZoZWlnaHQJAAIBCQCsAgICIllvdSBjYW4ndCB1bmxvY2sgc2hhcmV0b2tlbnMgdGlsbCAJAKQDAQUPdXNlckxvY2tlZEhlaWd0BBN1c2VyU3Rha2VkQW1vdW50TmV3CQBkAgUQdXNlclN0YWtlZEFtb3VudAUQdXNlckxvY2tlZEFtb3VudAQNJHQwMjk5NTUzMDAzNwkBCWNsYWltQ2FsYwIFBHBvb2wFBHVzZXIEDGZhcm1JbnRlcmVzdAgFDSR0MDI5OTU1MzAwMzcCXzEEDWJvb3N0SW50ZXJlc3QIBQ0kdDAyOTk1NTMwMDM3Al8yBAtjbGFpbUFtb3VudAgFDSR0MDI5OTU1MzAwMzcCXzMECnRvVHJlYXN1cmUIBQ0kdDAyOTk1NTMwMDM3Al80BBFhdmFpbGFibGVGdW5kc05ldwkAZAIJARF1c2VyQXZhaWxhYmxlU1dPUAIFBHBvb2wFBHVzZXIFC2NsYWltQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRVrRmFybVVzZXJMYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa0Jvb3N0VXNlckxhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQFE3VzZXJTdGFrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRN1c2VyU3Rha2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwJAGQCCQBlAgURdG90YWxTaGFyZVZpcnR1YWwFEXVzZXJBbW91bnRWaXJ0dWFsBRN1c2VyU3Rha2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBQ5rQXZhaWxhYmxlU1dPUAURYXZhaWxhYmxlRnVuZHNOZXcJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRxrVXNlclNoYXJlVG9rZW5zTG9ja2VkSGVpZ2h0CQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFGmtVc2VyU2hhcmVUb2tlbnNMb2NrZWRUeXBlCQDMCAIJAQdSZWlzc3VlAwUEU1dPUAUKdG9UcmVhc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGxvY2tXYXZlc0ZlZQUEdW5pdAUDbmlsAWkBEHVubG9ja1N0YWJsZUxvY2sBBHVzZXIJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAEDWFsbG93ZWRDYWxsZXIJAQdBZGRyZXNzAQEaAVedHOUcrA+uYawiCDYLlB+Wuk1GFS28pZEEC3N0YWJsZVBvb2xzCQDMCAICIzNQUEg3eDdpcW9iVzV6aXlpUkNpYzE5clFxS3I2blBZYUsxCQDMCAICIzNQSmdrTjRneTZiOHFwQTg2b3RjSjJLRFRiTDhheTJuOTFzCQDMCAICIzNQTmkxQkplbmRXWVllMkNSbnFwZkxvWXhVWjZVVGN4M0xGCQDMCAICIzNQTDVZelpnaVVkZGZhYkIzY2U0bUx5NG52RTd0UU52dFhFBQNuaWwEDGxvY2tXYXZlc0ZlZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwUNa0xvY2tXYXZlc0ZlZQMJAQIhPQIIBQFpBmNhbGxlcgUNYWxsb3dlZENhbGxlcgkAAgEJAKwCAgkArAICAgVPbmx5IAkApQgBBQ1hbGxvd2VkQ2FsbGVyAhZjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uCgEGdW5sb2NrAgFhBHBvb2wEDSR0MDMxODI0MzE4NjUFAWEEB2VudHJpZXMIBQ0kdDAzMTgyNDMxODY1Al8xBA10b1RyZWFzdXJlU3VtCAUNJHQwMzE4MjQzMTg2NQJfMgQHZmVlc1N1bQgFDSR0MDMxODI0MzE4NjUCXzMED3VzZXJMb2NrZWRIZWlndAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRxrVXNlclNoYXJlVG9rZW5zTG9ja2VkSGVpZ2h0AAADCQAAAgUPdXNlckxvY2tlZEhlaWd0AAAFAWEEEXRvdGFsU2hhcmVWaXJ0dWFsCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwEEHVzZXJTdGFrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc1N0YWtlZAAABBB1c2VyTG9ja2VkQW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNMb2NrZWQAAAQRdXNlckFtb3VudFZpcnR1YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUXa1VzZXJTaGFyZVRva2Vuc1ZpcnR1YWwFEHVzZXJTdGFrZWRBbW91bnQEE3VzZXJTdGFrZWRBbW91bnROZXcJAGQCBRB1c2VyU3Rha2VkQW1vdW50BRB1c2VyTG9ja2VkQW1vdW50BA0kdDAzMjUwNjMyNTg4CQEJY2xhaW1DYWxjAgUEcG9vbAUEdXNlcgQMZmFybUludGVyZXN0CAUNJHQwMzI1MDYzMjU4OAJfMQQNYm9vc3RJbnRlcmVzdAgFDSR0MDMyNTA2MzI1ODgCXzIEC2NsYWltQW1vdW50CAUNJHQwMzI1MDYzMjU4OAJfMwQKdG9UcmVhc3VyZQgFDSR0MDMyNTA2MzI1ODgCXzQEEWF2YWlsYWJsZUZ1bmRzTmV3CQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQJAJUKAwkAzggCBQdlbnRyaWVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRVrRmFybVVzZXJMYXN0SW50ZXJlc3QFDGZhcm1JbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa0Jvb3N0VXNlckxhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRFrRmFybUxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEmtCb29zdExhc3RJbnRlcmVzdAUNYm9vc3RJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBRNrTGFzdEludGVyZXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFmtVc2VyU2hhcmVUb2tlbnNTdGFrZWQFE3VzZXJTdGFrZWRBbW91bnROZXcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFF2tVc2VyU2hhcmVUb2tlbnNWaXJ0dWFsBRN1c2VyU3Rha2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tTaGFyZVRva2Vuc1ZpcnR1YWwJAGQCCQBlAgURdG90YWxTaGFyZVZpcnR1YWwFEXVzZXJBbW91bnRWaXJ0dWFsBRN1c2VyU3Rha2VkQW1vdW50TmV3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBQ5rQXZhaWxhYmxlU1dPUAURYXZhaWxhYmxlRnVuZHNOZXcJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUWa1VzZXJTaGFyZVRva2Vuc0xvY2tlZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRxrVXNlclNoYXJlVG9rZW5zTG9ja2VkSGVpZ2h0CQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFGmtVc2VyU2hhcmVUb2tlbnNMb2NrZWRUeXBlBQNuaWwJAGQCBQ10b1RyZWFzdXJlU3VtBQp0b1RyZWFzdXJlCQBkAgUHZmVlc1N1bQUMbG9ja1dhdmVzRmVlBA0kdDAzMzcyMzMzNzk2CgACJGwFC3N0YWJsZVBvb2xzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQZ1bmxvY2sCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAQHZW50cmllcwgFDSR0MDMzNzIzMzM3OTYCXzEECXRvVHJlc3VyZQgFDSR0MDMzNzIzMzM3OTYCXzIEBGZlZXMIBQ0kdDAzMzcyMzMzNzk2Al8zAwkAAAIJAJADAQUHZW50cmllcwAACQACAQIRTm90aGluZyB0byB1bmxvY2sJAM4IAgkAzAgCCQEHUmVpc3N1ZQMFBFNXT1AFCXRvVHJlc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUJdG9UcmVzdXJlBQRTV09QCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD21vbmV5Qm94QWRkcmVzcwUEZmVlcwUEdW5pdAUDbmlsBQdlbnRyaWVzAWkBE3dpdGhkcmF3U2hhcmVUb2tlbnMCBHBvb2wZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBF2NhbGNXaXRoZHJhd1NoYXJlVG9rZW5zBAUBaQgFAWkGY2FsbGVyBQRwb29sBRlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50AWkBG3dpdGhkcmF3U2hhcmVUb2tlbnNGcm9tUG9vbAMLY2FsbGVyQnl0ZXMEcG9vbBlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50CQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQELdmFsdWVPckVsc2UCCQEKaXNQb29sQ2FsbAIFAWkFBHBvb2wJARdjYWxjV2l0aGRyYXdTaGFyZVRva2VucwQFAWkJAQdBZGRyZXNzAQULY2FsbGVyQnl0ZXMFBHBvb2wFGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQBaQEFY2xhaW0BBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAEAXIJAQljYWxjQ2xhaW0DBQFpBQRwb29sCAUBaQZjYWxsZXIDCQAAAggFAXICXzIAAAkAAgECGVlvdSBoYXZlIDAgYXZhaWxhYmxlIFNXT1AFAXIBaQENY2xhaW1JbnRlcm5hbAIEcG9vbAZjYWxsZXIJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQppc1NlbGZDYWxsAQUBaQkBCWNhbGNDbGFpbQMFAWkFBHBvb2wJAQdBZGRyZXNzAQUGY2FsbGVyAWkBDWNsYWltQW5kU3Rha2UBBHBvb2wJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAEC2NsYWltQW1vdW50CgABQAkA/AcEBQR0aGlzAg1jbGFpbUludGVybmFsCQDMCAIFBHBvb2wJAMwIAggIBQFpBmNhbGxlcgVieXRlcwUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQUBQAIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50AwkAAAIFC2NsYWltQW1vdW50BQtjbGFpbUFtb3VudAMJAAACBQtjbGFpbUFtb3VudAAACQACAQIZWW91IGhhdmUgMCBhdmFpbGFibGUgU1dPUAQKc3Rha2VUb0dvdgkA/AcEBQpnb3ZBZGRyZXNzAhNsb2NrU1dPUEZyb21GYXJtaW5nBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBFNXT1AFC2NsYWltQW1vdW50BQNuaWwDCQAAAgUKc3Rha2VUb0dvdgUKc3Rha2VUb0dvdgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGNsYWltQWxsAQVwb29scwkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAoBCGNsYWltSW52AgpjbGFpbVRvdGFsBHBvb2wEC2NsYWltQW1vdW50CgABQAkA/AcEBQR0aGlzAg1jbGFpbUludGVybmFsCQDMCAIFBHBvb2wJAMwIAggIBQFpBmNhbGxlcgVieXRlcwUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQUBQAIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50AwkAAAIFC2NsYWltQW1vdW50BQtjbGFpbUFtb3VudAkAZAIFCmNsYWltVG90YWwFC2NsYWltQW1vdW50CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBApjbGFpbVRvdGFsCgACJGwFBXBvb2xzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhjbGFpbUludgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNjAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwDCQAAAgUKY2xhaW1Ub3RhbAAACQACAQIZWW91IGhhdmUgMCBhdmFpbGFibGUgU1dPUAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFCmNsYWltVG90YWwFBFNXT1AFA25pbAFpARBjbGFpbUFsbEFuZFN0YWtlAQVwb29scwkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAoBCGNsYWltSW52AgpjbGFpbVRvdGFsBHBvb2wEC2NsYWltQW1vdW50CgABQAkA/AcEBQR0aGlzAg1jbGFpbUludGVybmFsCQDMCAIFBHBvb2wJAMwIAggIBQFpBmNhbGxlcgVieXRlcwUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQUBQAIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50AwkAAAIFC2NsYWltQW1vdW50BQtjbGFpbUFtb3VudAkAZAIFCmNsYWltVG90YWwFC2NsYWltQW1vdW50CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBApjbGFpbVRvdGFsCgACJGwFBXBvb2xzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhjbGFpbUludgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNjAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwDCQAAAgUKY2xhaW1Ub3RhbAAACQACAQIZWW91IGhhdmUgMCBhdmFpbGFibGUgU1dPUAQKc3Rha2VUb0dvdgkA/AcEBQpnb3ZBZGRyZXNzAhNsb2NrU1dPUEZyb21GYXJtaW5nBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBFNXT1AFCmNsYWltVG90YWwFA25pbAMJAAACBQpzdGFrZVRvR292BQpzdGFrZVRvR292BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEXdXBkYXRlVXNlckJvb3N0SW50ZXJlc3QCBHBvb2wEdXNlcgkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAMJAQIhPQIIBQFpBmNhbGxlcgUNdm90aW5nQWRkcmVzcwkAAgECI09ubHkgdm9pdGluZyBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBA0kdDAzNjM2MDM2NDQyCQEJY2xhaW1DYWxjAgUEcG9vbAUEdXNlcgQMZmFybUludGVyZXN0CAUNJHQwMzYzNjAzNjQ0MgJfMQQNYm9vc3RJbnRlcmVzdAgFDSR0MDM2MzYwMzY0NDICXzIEC2NsYWltQW1vdW50CAUNJHQwMzYzNjAzNjQ0MgJfMwQKdG9UcmVhc3VyZQgFDSR0MDM2MzYwMzY0NDICXzQEEWF2YWlsYWJsZUZ1bmRzTmV3CQBkAgkBEXVzZXJBdmFpbGFibGVTV09QAgUEcG9vbAUEdXNlcgULY2xhaW1BbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFFWtGYXJtVXNlckxhc3RJbnRlcmVzdAUMZmFybUludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRZrQm9vc3RVc2VyTGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFEWtGYXJtTGFzdEludGVyZXN0BQxmYXJtSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUSa0Jvb3N0TGFzdEludGVyZXN0BQ1ib29zdEludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFE2tMYXN0SW50ZXJlc3RIZWlnaHQFBmhlaWdodAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUOa0F2YWlsYWJsZVNXT1AFEWF2YWlsYWJsZUZ1bmRzTmV3CQDMCAIJAQdSZWlzc3VlAwUEU1dPUAUKdG9UcmVhc3VyZQYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUTZmFybWluZ1RyZWFzdXJlQWRkcgUKdG9UcmVhc3VyZQUEU1dPUAUDbmlsAWkBCHNodXRkb3duAAkBC3ZhbHVlT3JFbHNlAgkBC2lzQWRtaW5DYWxsAQUBaQMJAQEhAQUGYWN0aXZlCQACAQkArAICAiJEQXBwIGlzIGFscmVhZHkgc3VzcGVuZGVkLiBDYXVzZTogCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFBmtDYXVzZQIadGhlIGNhdXNlIHdhc24ndCBzcGVjaWZpZWQJAQdzdXNwZW5kAQIPUGF1c2VkIGJ5IGFkbWluAWkBCGFjdGl2YXRlAAkBC3ZhbHVlT3JFbHNlAgkBC2lzQWRtaW5DYWxsAQUBaQMFBmFjdGl2ZQkAAgECFkRBcHAgaXMgYWxyZWFkeSBhY3RpdmUJAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2tBY3RpdmUGCQDMCAIJAQtEZWxldGVFbnRyeQEFBmtDYXVzZQUDbmlsAQJ0eAEGdmVyaWZ5AAQHJG1hdGNoMAUCdHgEEmFkbWluUHViS2V5MVNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFDGFkbWluUHViS2V5MQABAAAEEmFkbWluUHViS2V5MlNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAEFDGFkbWluUHViS2V5MgABAAAEEmFkbWluUHViS2V5M1NpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAIFDGFkbWluUHViS2V5MwABAAAJAGcCCQBkAgkAZAIFEmFkbWluUHViS2V5MVNpZ25lZAUSYWRtaW5QdWJLZXkyU2lnbmVkBRJhZG1pblB1YktleTNTaWduZWQAAnd272c=",
    "height": 3425356,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BikiFfphYkBVPvQK9NgRFNbrXwBVZhUHyPFDGkKTja2L
Next: 6eHKDwwVU8qt4gfmKJpfj6UYpPjBzkZncWavGGEMoPTt

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

Old	New		Differences
71	71
72	72		let kShareLimitFH = "share_limit_on_first_harvest"
73	73
	74	+	let kStratBFarmInterest = "_strat_b_farm_interest"
	75	+
74	76		let kCpmmContract = "cpmm_contract"
75	77
76	78		let kAdminPubKey1 = "admin_pub_1"

100	102		let lockBoostCoefScale = 1000
101	103
102	104		let defPoolBoostCoef = 500
	105	+
	106	+	let bStartH = 3397850
103	107
104	108		func getBase58FromOracle (key) = match getString(oracle, key) {
105	109		case string: String =>

212	216
213	217
214	218		func calcInterest (pool,lastInterestHeight,rewardUpdateHeight,poolRewardUpdateHeight,farmInterest,boostInterest,poolVoted,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,scaleValue) = {
215		-	let $~~t0938310556~~ = if (if (if ((rewardUpdateHeight > height))
	219	+	let $t0948010653 = if (if (if ((rewardUpdateHeight > height))
216	220		then (rewardUpdateHeight == poolRewardUpdateHeight)
217	221		else false)
218	222		then true

241	245		let rwd = (currentRewardPerBlock * (height - rewardUpdateHeight))
242	246		$Tuple3(rwd, fBfrUp, bBfrUp)
243	247		}
244		-	let reward = $~~t0938310556~~._1
245		-	let farmIntrBefore = $~~t0938310556~~._2
246		-	let boostIntrBefore = $~~t0938310556~~._3
	248	+	let reward = $t0948010653._1
	249	+	let farmIntrBefore = $t0948010653._2
	250	+	let boostIntrBefore = $t0948010653._3
247	251		let newFarmInterest = (farmIntrBefore + fraction(calcFarmRwd(pool, reward), scaleValue, shareTokenLocked))
248	252		let newBoostInterest = (boostIntrBefore + (if ((poolVoted > 0))
249	253		then fraction(calcBoostRwd(pool, reward), scaleValue8, poolVoted)

258	262		let uPoolVoted = getUserPoolVoted(pool, user)
259	263		let shareToken = getTotalShareToken(pool)
260	264		let totalShareVirtual = valueOrElse(getInteger(this, (pool + kShareTokensVirtual)), shareToken)
261		-	let $t01130611387 = getLastInterestInfo(pool)
262		-	let lastInterestHeight = $t01130611387._1
263		-	let farmInterest = $t01130611387._2
264		-	let boostInterest = $t01130611387._3
265		-	let $t01139211506 = rewardInfo(pool)
266		-	let currentRewardPerBlock = $t01139211506._1
267		-	let rewardUpdateHeight = $t01139211506._2
268		-	let previousRewardPerBlock = $t01139211506._3
269		-	let poolRewardUpdateHeight = $t01139211506._4
	265	+	let stratBFarmInterest = valueOrElse(getInteger(this, (pool + kStratBFarmInterest)), 0)
	266	+	let $t01149111572 = getLastInterestInfo(pool)
	267	+	let lastInterestHeight = $t01149111572._1
	268	+	let farmInterest = $t01149111572._2
	269	+	let boostInterest = $t01149111572._3
	270	+	let $t01157711691 = rewardInfo(pool)
	271	+	let currentRewardPerBlock = $t01157711691._1
	272	+	let rewardUpdateHeight = $t01157711691._2
	273	+	let previousRewardPerBlock = $t01157711691._3
	274	+	let poolRewardUpdateHeight = $t01157711691._4
270	275		let uFarmInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kFarmUserLastInterest)), farmInterest)
271		-	let uBoostInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kBoostUserLastInterest)), boostInterest)
	276	+	let uBoostInterest = valueOrElse(getInteger(this, (((pool + "_") + user) + kBoostUserLastInterest)), if (if ((stratBFarmInterest > uFarmInterest))
	277	+	then (uPoolVoted > 0)
	278	+	else false)
	279	+	then 0
	280	+	else boostInterest)
272	281		let uShareTokensStaked = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
273	282		let uShareTokensVirt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), uShareTokensStaked)
274	283		if ((totalShareVirtual == 0))

279	288		$Tuple4(farmInterest, boostInterest, 0, toTreasury)
280	289		}
281	290		else {
282		-	let $~~t01216712515~~ = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue)
283		-	let newFarmInterest = $~~t01216712515~~._1
284		-	let newBoostInterest = $~~t01216712515~~._2
	291	+	let $t01244212834 = calcInterest(pool, lastInterestHeight, rewardUpdateHeight, poolRewardUpdateHeight, farmInterest, boostInterest, poolVoted, currentRewardPerBlock, totalShareVirtual, previousRewardPerBlock, scaleValue)
	292	+	let newFarmInterest = $t01244212834._1
	293	+	let newBoostInterest = $t01244212834._2
285	294		let farmRwd = fraction(uShareTokensVirt, (newFarmInterest - uFarmInterest), scaleValue)
286	295		let poolBoostCoef = valueOrElse(getInteger(this, (pool + kPoolBoostCoef)), defPoolBoostCoef)
287		-	let boostRwdMax = fraction(~~farmRwd~~, poolBoostCoef, lockBoostCoefScale)
	296	+	let boostRwdMax = fraction(fraction(uShareTokensVirt, (newFarmInterest - max([uFarmInterest, stratBFarmInterest])), scaleValue), poolBoostCoef, lockBoostCoefScale)
288	297		let curBoostRwd = fraction((newBoostInterest - uBoostInterest), uPoolVoted, scaleValue8)
289	298		let boostRwd = min([boostRwdMax, curBoostRwd])
290	299		let toTreasury = (boostRwdMax - boostRwd)

297	306
298	307		func availableClaimCalcAllByUser (pools,user) = {
299	308		func calcAvailable (acc,pool) = {
300		-	let $~~t01326213291~~ = acc
301		-	let newPools = $~~t01326213291~~._1
302		-	let amounts = $~~t01326213291~~._2
303		-	let $~~t01330013353~~ = claimCalc(pool, user)
304		-	let fi = $~~t01330013353~~._1
305		-	let bi = $~~t01330013353~~._2
306		-	let claimAmount = $~~t01330013353~~._3
307		-	let tt = $~~t01330013353~~._4
	309	+	let $t01370313732 = acc
	310	+	let newPools = $t01370313732._1
	311	+	let amounts = $t01370313732._2
	312	+	let $t01374113794 = claimCalc(pool, user)
	313	+	let fi = $t01374113794._1
	314	+	let bi = $t01374113794._2
	315	+	let claimAmount = $t01374113794._3
	316	+	let tt = $t01374113794._4
308	317		let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
309	318		$Tuple2((newPools :+ pool), (amounts :+ availableFund))
310	319		}

384	393		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
385	394		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
386	395		let totalUserShareTokens = ((userStakedAmount + userLockedAmount) + i.payments[0].amount)
387		-	let $~~t01615416206~~ = getLockParams(lockType)
388		-	let lockPeriod = $~~t01615416206~~._1
389		-	let lockCoef = $~~t01615416206~~._2
	396	+	let $t01659516647 = getLockParams(lockType)
	397	+	let lockPeriod = $t01659516647._1
	398	+	let lockCoef = $t01659516647._2
390	399		let lockWavesFee = getIntegerValue(this, kLockWavesFee)
391	400		if ((i.payments[0].assetId != shareAssetId))
392	401		then throw("Wrong sharetoken in payment")

398	407		let shareTokensChangeOnFH = canLockInFirstHarvest(pool, user, userStakedAmount, i.payments[0].amount, lockType)
399	408		if ((shareTokensChangeOnFH == shareTokensChangeOnFH))
400	409		then {
401		-	let $~~t01663318567~~ = if ((lockType == 0))
	410	+	let $t01707419008 = if ((lockType == 0))
402	411		then {
403	412		let userAmountVirtualNew = ((userAmountVirtual + i.payments[0].amount) - shareTokensChangeOnFH)
404	413		$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))

419	428		let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmount)
420	429		$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))
421	430		}
422		-	let lockEntries = $~~t01663318567~~._1
423		-	let totalShareNew = $~~t01663318567~~._2
	431	+	let lockEntries = $t01707419008._1
	432	+	let totalShareNew = $t01707419008._2
424	433		if ((accountBalance(shareAssetId) > totalShareNew))
425	434		then throw("Balance of share-token is lower than totalAmount")
426	435		else {
427		-	let $~~t01869218774~~ = claimCalc(pool, user)
428		-	let farmInterest = $~~t01869218774~~._1
429		-	let boostInterest = $~~t01869218774~~._2
430		-	let claimAmount = $~~t01869218774~~._3
431		-	let toTreasure = $~~t01869218774~~._4
	436	+	let $t01913319215 = claimCalc(pool, user)
	437	+	let farmInterest = $t01913319215._1
	438	+	let boostInterest = $t01913319215._2
	439	+	let claimAmount = $t01913319215._3
	440	+	let toTreasure = $t01913319215._4
432	441		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
433	442		let uplp = if ((getString(Address(fromBase58String(pool)), "version") == "3.0.0"))
434	443		then invoke(lpFarmingAddress, "updateUserInterest", [user, pool, totalUserShareTokens], nil)

446	455		func calcWithdrawShareTokens (i,caller,pool,shareTokensWithdrawAmount) = valueOrElse(isActive(), {
447	456		let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
448	457		let user = toString(caller)
449		-	let $~~t01996620048~~ = claimCalc(pool, user)
450		-	let farmInterest = $~~t01996620048~~._1
451		-	let boostInterest = $~~t01996620048~~._2
452		-	let claimAmount = $~~t01996620048~~._3
453		-	let toTreasure = $~~t01996620048~~._4
	458	+	let $t02040720489 = claimCalc(pool, user)
	459	+	let farmInterest = $t02040720489._1
	460	+	let boostInterest = $t02040720489._2
	461	+	let claimAmount = $t02040720489._3
	462	+	let toTreasure = $t02040720489._4
454	463		let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
455	464		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
456	465		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)

480	489		let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
481	490		let user = toString(caller)
482	491		let shareTokenLocked = getTotalShareToken(pool)
483		-	let $~~t02256122643~~ = claimCalc(pool, user)
484		-	let farmInterest = $~~t02256122643~~._1
485		-	let boostInterest = $~~t02256122643~~._2
486		-	let claimAmount = $~~t02256122643~~._3
487		-	let toTreasure = $~~t02256122643~~._4
	492	+	let $t02300223084 = claimCalc(pool, user)
	493	+	let farmInterest = $t02300223084._1
	494	+	let boostInterest = $t02300223084._2
	495	+	let claimAmount = $t02300223084._3
	496	+	let toTreasure = $t02300223084._4
488	497		let availableFund = (userAvailableSWOP(pool, user) + claimAmount)
489	498		if ((accountBalance(shareTokensId) > shareTokenLocked))
490	499		then throw("Balance of share-token is lower than totalAmount")

519	528		then throw("Only Governance can call this function")
520	529		else {
521	530		let user = toString(addressFromPublicKey(adminInvokePubKey))
522		-	let $~~t02452024594~~ = claimCalc(pool, user)
523		-	let farmInterest = $~~t02452024594~~._1
524		-	let boostInterest = $~~t02452024594~~._2
525		-	let boostLPinterest = $~~t02452024594~~._3
	531	+	let $t02496125035 = claimCalc(pool, user)
	532	+	let farmInterest = $t02496125035._1
	533	+	let boostInterest = $t02496125035._2
	534	+	let boostLPinterest = $t02496125035._3
526	535		[IntegerEntry((pool + kFarmLastInterest), farmInterest), IntegerEntry((pool + kBoostLastInterest), boostInterest), IntegerEntry((pool + kLastInterestHeight), height)]
527	536		})
528	537

549	558		let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
550	559		let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
551	560		let totalUserShareTokens = (userStakedAmount + userLockedAmount)
552		-	let $~~t02601326065~~ = getLockParams(lockType)
553		-	let lockPeriod = $~~t02601326065~~._1
554		-	let lockCoef = $~~t02601326065~~._2
	561	+	let $t02645426506 = getLockParams(lockType)
	562	+	let lockPeriod = $t02645426506._1
	563	+	let lockCoef = $t02645426506._2
555	564		let lockWavesFee = getIntegerValue(this, kLockWavesFee)
556	565		if ((getHeightFirstHarvest(pool) > height))
557	566		then throw("You can't lock shareTokens till first harvest end.")

582	591		let userStakedAmountNew = (userStakedAmount - lockAmount)
583	592		let userLockedHeigtNew = (height + lockPeriod)
584	593		let userAmountVirtualNew = (fraction(userLockedAmountNew, lockCoef, lockBoostCoefScale) + userStakedAmountNew)
585		-	let $~~t02735527437~~ = claimCalc(pool, user)
586		-	let farmInterest = $~~t02735527437~~._1
587		-	let boostInterest = $~~t02735527437~~._2
588		-	let claimAmount = $~~t02735527437~~._3
589		-	let toTreasure = $~~t02735527437~~._4
	594	+	let $t02779627878 = claimCalc(pool, user)
	595	+	let farmInterest = $t02779627878._1
	596	+	let boostInterest = $t02779627878._2
	597	+	let claimAmount = $t02779627878._3
	598	+	let toTreasure = $t02779627878._4
590	599		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
591	600		[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)]
592	601		}

606	615		then throw(("You can't unlock sharetokens till " + toString(userLockedHeigt)))
607	616		else {
608	617		let userStakedAmountNew = (userStakedAmount + userLockedAmount)
609		-	let $~~t02951429596~~ = claimCalc(pool, user)
610		-	let farmInterest = $~~t02951429596~~._1
611		-	let boostInterest = $~~t02951429596~~._2
612		-	let claimAmount = $~~t02951429596~~._3
613		-	let toTreasure = $~~t02951429596~~._4
	618	+	let $t02995530037 = claimCalc(pool, user)
	619	+	let farmInterest = $t02995530037._1
	620	+	let boostInterest = $t02995530037._2
	621	+	let claimAmount = $t02995530037._3
	622	+	let toTreasure = $t02995530037._4
614	623		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
615	624		[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)]
	625	+	}
	626	+	})
	627	+
	628	+
	629	+
	630	+	@Callable(i)
	631	+	func unlockStableLock (user) = valueOrElse(isActive(), {
	632	+	let allowedCaller = Address(base58'3PGFdS2BvbdSX6wJEU2qtxKdrtianxWZ4n4')
	633	+	let stablePools = ["3PPH7x7iqobW5ziyiRCic19rQqKr6nPYaK1", "3PJgkN4gy6b8qpA86otcJ2KDTbL8ay2n91s", "3PNi1BJendWYYe2CRnqpfLoYxUZ6UTcx3LF", "3PL5YzZgiUddfabB3ce4mLy4nvE7tQNvtXE"]
	634	+	let lockWavesFee = getIntegerValue(this, kLockWavesFee)
	635	+	if ((i.caller != allowedCaller))
	636	+	then throw((("Only " + toString(allowedCaller)) + "can call this function"))
	637	+	else {
	638	+	func unlock (a,pool) = {
	639	+	let $t03182431865 = a
	640	+	let entries = $t03182431865._1
	641	+	let toTreasureSum = $t03182431865._2
	642	+	let feesSum = $t03182431865._3
	643	+	let userLockedHeigt = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLockedHeight)), 0)
	644	+	if ((userLockedHeigt == 0))
	645	+	then a
	646	+	else {
	647	+	let totalShareVirtual = getIntegerValue(this, (pool + kShareTokensVirtual))
	648	+	let userStakedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensStaked)), 0)
	649	+	let userLockedAmount = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensLocked)), 0)
	650	+	let userAmountVirtual = valueOrElse(getInteger(this, (((pool + "_") + user) + kUserShareTokensVirtual)), userStakedAmount)
	651	+	let userStakedAmountNew = (userStakedAmount + userLockedAmount)
	652	+	let $t03250632588 = claimCalc(pool, user)
	653	+	let farmInterest = $t03250632588._1
	654	+	let boostInterest = $t03250632588._2
	655	+	let claimAmount = $t03250632588._3
	656	+	let toTreasure = $t03250632588._4
	657	+	let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
	658	+	$Tuple3((entries ++ [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))]), (toTreasureSum + toTreasure), (feesSum + lockWavesFee))
	659	+	}
	660	+	}
	661	+
	662	+	let $t03372333796 = {
	663	+	let $l = stablePools
	664	+	let $s = size($l)
	665	+	let $acc0 = $Tuple3(nil, 0, 0)
	666	+	func $f0_1 ($a,$i) = if (($i >= $s))
	667	+	then $a
	668	+	else unlock($a, $l[$i])
	669	+
	670	+	func $f0_2 ($a,$i) = if (($i >= $s))
	671	+	then $a
	672	+	else throw("List size exceeds 4")
	673	+
	674	+	$f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
	675	+	}
	676	+	let entries = $t03372333796._1
	677	+	let toTresure = $t03372333796._2
	678	+	let fees = $t03372333796._3
	679	+	if ((size(entries) == 0))
	680	+	then throw("Nothing to unlock")
	681	+	else ([Reissue(SWOP, toTresure, true), ScriptTransfer(farmingTreasureAddr, toTresure, SWOP), ScriptTransfer(moneyBoxAddress, fees, unit)] ++ entries)
616	682		}
617	683		})
618	684

744	810		func updateUserBoostInterest (pool,user) = valueOrElse(isActive(), if ((i.caller != votingAddress))
745	811		then throw("Only voiting can call this function")
746	812		else {
747		-	let $~~t03307033152~~ = claimCalc(pool, user)
748		-	let farmInterest = $~~t03307033152~~._1
749		-	let boostInterest = $~~t03307033152~~._2
750		-	let claimAmount = $~~t03307033152~~._3
751		-	let toTreasure = $~~t03307033152~~._4
	813	+	let $t03636036442 = claimCalc(pool, user)
	814	+	let farmInterest = $t03636036442._1
	815	+	let boostInterest = $t03636036442._2
	816	+	let claimAmount = $t03636036442._3
	817	+	let toTreasure = $t03636036442._4
752	818		let availableFundsNew = (userAvailableSWOP(pool, user) + claimAmount)
753	819		[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)]
754	820		})

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

github/deemru/w8io/6500d08 
176.12 ms ◑