w8 · tx · BEY···3qA

tx · BEYQytPetZM4UTAbmFFuScBxGoE4tB5uCN16AyBZQ3qA

3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg:  -0.01400000 Waves

2020.12.12 18:39 [1305634] smart account 3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BEYQytPetZM4UTAbmFFuScBxGoE4tB5uCN16AyBZQ3qA",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1607787613522,
    "version": 1,
    "sender": "3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg",
    "senderPublicKey": "38RJPSAs2g6F7P5zT5FJ6BAc1DyReFGja2vkw8rSz3ga",
    "proofs": [
        "645bGKUVrzEZwAzwM3Uxm1Mg2F25NoNhjGH96eAAi4sQbvUxwV96ui96Np1enS3BVQqVvPnoeJCLsG2wX8iS1S1R"
    ],
    "script": "base64:AAIEAAAAAAAAABkIAhIAEgMKAQgSAwoBCBIECgIIARIDCgEIAAAAHAAAAAAMYWRtaW5QdWJLZXkxAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkyAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkzAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAUYWRtaW5QdWJLZXlTdGFydFN0b3ABAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABJhZG1pblB1YktleVN0YWtpbmcBAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAIAAAAaX3RvdGFsX3NoYXJlX3Rva2Vuc19sb2NrZWQAAAAAEGtleUN1cnJlbnRSZXdhcmQCAAAAD19jdXJyZW50X3Jld2FyZAAAAAAVa2V5UmV3YXJkVXBkYXRlSGVpZ2h0AgAAABVfcmV3YXJkX3VwZGF0ZV9oZWlnaHQAAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAABBfcHJldmlvdXNfcmV3YXJkAAAAAA9rZXlMYXN0SW50ZXJlc3QCAAAADl9sYXN0X2ludGVyZXN0AAAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQCAAAAFV9sYXN0X2ludGVyZXN0X2hlaWdodAAAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkAgAAABRfc2hhcmVfdG9rZW5zX2xvY2tlZAAAAAATa2V5VXNlckxhc3RJbnRlcmVzdAIAAAAOX2xhc3RfaW50ZXJlc3QAAAAACWtleVNXT1BpZAIAAAAHU1dPUF9pZAAAAAAOa2V5UG9vbEFkZHJlc3MCAAAACF9hZGRyZXNzAAAAAA12b3RpbmdBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUqCFRtE6TAyfLRDQEs9/d4tPkrAlzHIB1AAAAAARTV09QCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAACWtleVNXT1BpZAAAAAAGc2NhbGU4AAAAAAAF9eEAAAAAABJoZWlnaHRSZXdhcmRVcGRhdGUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAFGhlaWdodF9yZXdhcmRfdXBkYXRlAQAAAA50aHJvd09ubHlBZG1pbgAAAAAJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQAAAA10aHJvd0lzQWN0aXZlAAAAAAkAAAIAAAABAgAAABZEQXBwIGlzIGFscmVhZHkgYWN0aXZlAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABAAAABHBvb2wJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAQAAAApyZXdhcmRJbmZvAAAAAQAAAARwb29sBAAAAA1jdXJyZW50UmV3YXJkCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAIAAAAMIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAADXZvdGluZ0FkZHJlc3MEAAAAFHJld2FyZFByZXZpb3VzQW1vdW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwkABRUAAAADBQAAAA1jdXJyZW50UmV3YXJkBQAAABJyZXdhcmRVcGRhdGVIZWlnaHQFAAAAFHJld2FyZFByZXZpb3VzQW1vdW50AQAAABNnZXRMYXN0SW50ZXJlc3RJbmZvAAAAAQAAAARwb29sBAAAAAxsYXN0SW50ZXJlc3QJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABRObyBkYXRhIG9uIHRoZSBrZXk6IAUAAAAEcG9vbAIAAAABXwUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BAAAABJsYXN0SW50ZXJlc3RIZWlnaHQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQJAAUUAAAAAgUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACAAAABHBvb2wAAAAKdXNlckFkZHJlcwQAAAAQdXNlckxhc3RJbnRlcmVzdAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QEAAAACXVzZXJTaGFyZQkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAQAAAAVdXNlckxhc3RJbnRlcmVzdFZhbHVlBAAAAAckbWF0Y2gwBQAAABB1c2VyTGFzdEludGVyZXN0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAEHVzZXJMYXN0SW50ZXJlc3QFAAAAByRtYXRjaDAFAAAAEHVzZXJMYXN0SW50ZXJlc3QAAAAAAAAAAAAEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAQAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAACXVzZXJTaGFyZQUAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAAAAAAAAAAAACQAFFAAAAAIFAAAAFXVzZXJMYXN0SW50ZXJlc3RWYWx1ZQUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50AQAAAAxjYWxjSW50ZXJlc3QAAAAGAAAAEmxhc3RJbnRlcmVzdEhlaWdodAAAABJyZXdhcmRVcGRhdGVIZWlnaHQAAAAMbGFzdEludGVyZXN0AAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawAAABBzaGFyZVRva2VuTG9ja2VkAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sDCQAAZgAAAAIFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0AwkAAAAAAAACBQAAABBzaGFyZVRva2VuTG9ja2VkAAAAAAAAAAAAAAAAAAAAAAAABAAAAAZyZXdhcmQJAABoAAAAAgUAAAAVY3VycmVudFJld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAABmhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0CQAAZAAAAAIJAABoAAAAAgUAAAAMbGFzdEludGVyZXN0BQAAAAZzY2FsZTgJAABrAAAAAwUAAAAGcmV3YXJkBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAAKnJld2FyZEFmdGVyTGFzdEludGVyZXN0QmVmb3JlUmVhd2FyZFVwZGF0ZQkAAGgAAAACBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0BAAAABNpbnRlcmVzdEFmdGVyVXBkYXRlCQAAZAAAAAIJAABoAAAAAgUAAAAMbGFzdEludGVyZXN0BQAAAAZzY2FsZTgJAABrAAAAAwUAAAAqcmV3YXJkQWZ0ZXJMYXN0SW50ZXJlc3RCZWZvcmVSZWF3YXJkVXBkYXRlBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAABnJld2FyZAkAAGgAAAACBQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQJAABkAAAAAgkAAGgAAAACBQAAABNpbnRlcmVzdEFmdGVyVXBkYXRlBQAAAAZzY2FsZTgJAABrAAAAAwUAAAAGcmV3YXJkBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQBAAAACUNsYWltQ2FsYwAAAAIAAAAEcG9vbAAAAAZjYWxsZXIEAAAAEHNoYXJlVG9rZW5Mb2NrZWQJAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAAAskdDA0NjA1NDY3MAkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAAskdDA0NjA1NDY3MAAAAAJfMQQAAAAMbGFzdEludGVyZXN0CAUAAAALJHQwNDYwNTQ2NzAAAAACXzIEAAAACyR0MDQ2NzU0NzYzCQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAACyR0MDQ2NzU0NzYzAAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA0Njc1NDc2MwAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDQ2NzU0NzYzAAAAAl8zBAAAAAskdDA0NzY4NDg0NwkBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACBQAAAARwb29sBQAAAAZjYWxsZXIEAAAAEHVzZXJMYXN0SW50ZXJlc3QIBQAAAAskdDA0NzY4NDg0NwAAAAJfMQQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNDc2ODQ4NDcAAAACXzIEAAAAD2N1cnJlbnRJbnRlcmVzdAkBAAAADGNhbGNJbnRlcmVzdAAAAAYFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QFAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawUAAAAQc2hhcmVUb2tlbkxvY2tlZAUAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawQAAAALY2xhaW1BbW91bnQJAABrAAAAAwUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CQAAZQAAAAIFAAAAD2N1cnJlbnRJbnRlcmVzdAkAAGgAAAACBQAAABB1c2VyTGFzdEludGVyZXN0BQAAAAZzY2FsZTgFAAAABnNjYWxlOAMGCQAAAgAAAAECAAAAAzExMQQAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAAUWAAAABAUAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QFAAAAC2NsYWltQW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQBAAAAFmNoZWNrUG10QXNzZXRJZENvcnJlY3QAAAACAAAABHBvb2wAAAAKcG10QXNzZXRJZAQAAAAKcG9vbEFkZHJlcwkBAAAABXZhbHVlAAAAAQkABCYAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBAAAABBwb29sU2hhcmVBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAACnBvb2xBZGRyZXMCAAAADnNoYXJlX2Fzc2V0X2lkAwkAAAAAAAACBQAAAApwbXRBc3NldElkBQAAABBwb29sU2hhcmVBc3NldElkBgcAAAAFAAAAAWkBAAAABGluaXQAAAAAAwkBAAAAASEAAAABCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgkABEwAAAACBQAAAAxhZG1pblB1YktleTEJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkyCQAETAAAAAIFAAAADGFkbWluUHViS2V5MwUAAAADbmlsCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBAAAAAlTV09QaXNzdWUJAARCAAAABQIAAAAEU1dPUAIAAAATU1dPUCBwcm90b2NvbCB0b2tlbgAAAAAAAAAAAQAAAAAAAAAACAYEAAAABlNXT1BpZAkABDgAAAABBQAAAAlTV09QaXNzdWUJAARMAAAAAgkABEIAAAAFAgAAAARTV09QAgAAABNTV09QIHByb3RvY29sIHRva2VuAAAAAAAAAAABAAAAAAAAAAAIBgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlrZXlTV09QaWQJAAJYAAAAAQUAAAAGU1dPUGlkBQAAAANuaWwAAAABaQEAAAAUaW5pdFBvb2xTaGFyZUxvY2tpbmcAAAABAAAABHBvb2wDCQEAAAABIQAAAAEJAQAAAA9jb250YWluc0VsZW1lbnQAAAACCQAETAAAAAIFAAAADGFkbWluUHViS2V5MQkABEwAAAACBQAAAAxhZG1pblB1YktleTIJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkzBQAAAANuaWwIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQkAAAIAAAABAgAAACFPbmx5IGFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EAAAACyR0MDYyMjQ2MzA0CQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAADWN1cnJlbnRSZXdhcmQIBQAAAAskdDA2MjI0NjMwNAAAAAJfMQQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CAUAAAALJHQwNjIyNDYzMDQAAAACXzIEAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sIBQAAAAskdDA2MjI0NjMwNAAAAAJfMwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBQAAAARwb29sCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEGtleUN1cnJlbnRSZXdhcmQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrBQAAAANuaWwAAAABaQEAAAAPbG9ja1NoYXJlVG9rZW5zAAAAAQAAAARwb29sBAAAAAskdDA2NzU0NjgyOQkABRQAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAACXBtdEFtb3VudAgFAAAACyR0MDY3NTQ2ODI5AAAAAl8xBAAAAApwbXRBc3NldElkCAUAAAALJHQwNjc1NDY4MjkAAAACXzIDCQEAAAABIQAAAAEJAQAAABZjaGVja1BtdEFzc2V0SWRDb3JyZWN0AAAAAgUAAAAEcG9vbAUAAAAKcG10QXNzZXRJZAkAAAIAAAABAgAAABRJbmNvcnJlY3QgcG10QXNzZXRJZAQAAAALJHQwNjkyMjcwMjAJAQAAAAlDbGFpbUNhbGMAAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIEAAAAD3VzZXJOZXdJbnRlcmVzdAgFAAAACyR0MDY5MjI3MDIwAAAAAl8xBAAAAA9jdXJyZW50SW50ZXJlc3QIBQAAAAskdDA2OTIyNzAyMAAAAAJfMgQAAAALY2xhaW1BbW91bnQIBQAAAAskdDA2OTIyNzAyMAAAAAJfMwQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNjkyMjcwMjAAAAACXzQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGQAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAACXBtdEFtb3VudAQAAAAQdG90YWxTaGFyZUFtb3VudAkBAAAAGGdldFRvdGFsU2hhcmVUb2tlbkxvY2tlZAAAAAEFAAAABHBvb2wEAAAAE3RvdGFsU2hhcmVBbW91bnROZXcJAABkAAAAAgUAAAAQdG90YWxTaGFyZUFtb3VudAUAAAAJcG10QW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAATa2V5VXNlckxhc3RJbnRlcmVzdAUAAAAPdXNlck5ld0ludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkBQAAABJ1c2VyU2hhcmVBbW91bnROZXcJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAUa2V5U2hhcmVUb2tlbnNMb2NrZWQFAAAAE3RvdGFsU2hhcmVBbW91bnROZXcFAAAAA25pbAAAAAFpAQAAABN3aXRoZHJhd1NoYXJlVG9rZW5zAAAAAgAAAARwb29sAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAACyR0MDc3OTY3ODk0CQEAAAAJQ2xhaW1DYWxjAAAAAgUAAAAEcG9vbAgFAAAAAWkAAAAGY2FsbGVyBAAAAA91c2VyTmV3SW50ZXJlc3QIBQAAAAskdDA3Nzk2Nzg5NAAAAAJfMQQAAAAPY3VycmVudEludGVyZXN0CAUAAAALJHQwNzc5Njc4OTQAAAACXzIEAAAAC2NsYWltQW1vdW50CAUAAAALJHQwNzc5Njc4OTQAAAACXzMEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAACyR0MDc3OTY3ODk0AAAAAl80AwkAAGYAAAACBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQJAAACAAAAAQIAAAAsV2l0aGRyYXcgYW1vdW50IG1vcmUgdGhlbiB1c2VyIGxvY2tlZCBhbW91bnQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGUAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAADXNoYXJlVG9rZW5zSWQJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAARwb29sAgAAAA5zaGFyZV9hc3NldF9pZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAUAAAASdXNlclNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAEU1dPUAUAAAALY2xhaW1BbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQFAAAABFNXT1AJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAAA1zaGFyZVRva2Vuc0lkBQAAAANuaWwAAAABaQEAAAAFY2xhaW0AAAABAAAABHBvb2wEAAAAEHNoYXJlVG9rZW5Mb2NrZWQJAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAAAskdDA4Nzk0ODg1OQkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAAskdDA4Nzk0ODg1OQAAAAJfMQQAAAAMbGFzdEludGVyZXN0CAUAAAALJHQwODc5NDg4NTkAAAACXzIEAAAACyR0MDg4NjQ5MDI4CQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAACyR0MDg4NjQ5MDI4AAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA4ODY0OTAyOAAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDg4NjQ5MDI4AAAAAl8zBAAAAAskdDA5MDMzOTQzOQkBAAAACUNsYWltQ2FsYwAAAAIFAAAABHBvb2wIBQAAAAFpAAAABmNhbGxlcgQAAAAPdXNlck5ld0ludGVyZXN0CAUAAAALJHQwOTAzMzk0MzkAAAACXzEEAAAAD2N1cnJlbnRJbnRlcmVzdAgFAAAACyR0MDkwMzM5NDM5AAAAAl8yBAAAAAtjbGFpbUFtb3VudAgFAAAACyR0MDkwMzM5NDM5AAAAAl8zBAAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQIBQAAAAskdDA5MDMzOTQzOQAAAAJfNAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8FAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADBQAAAARTV09QBQAAAAtjbGFpbUFtb3VudAYJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAtjbGFpbUFtb3VudAUAAAAEU1dPUAUAAAADbmlsAAAAAP1SiWY=",
    "chainId": 84,
    "height": 1305634,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2eAkA7NKzVY92Wg1iGWDCYVmiN4HJfu9HDXdxkA3b7sr
Next: PEUb7hA71LPEDYWogGQ7ns2s7t1NooWHAv7y233ykJq

Diff: 
Old New Differences
110 110      let userLastInterest = $t047684847._1
111 111      let userShareTokensAmount = $t047684847._2
112 112      let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
113 +     let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
113 114      if (true)
114 115          then throw("111")
115 116          else {
116 -             let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
117 117              let userNewInterest = currentInterest
118 118              $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
119 119              }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let adminPubKey1 = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
5 5  
6 6  let adminPubKey2 = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
7 7  
8 8  let adminPubKey3 = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
9 9  
10 10  let adminPubKeyStartStop = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
11 11  
12 12  let adminPubKeyStaking = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
13 13  
14 14  let keyShareTokensLocked = "_total_share_tokens_locked"
15 15  
16 16  let keyCurrentReward = "_current_reward"
17 17  
18 18  let keyRewardUpdateHeight = "_reward_update_height"
19 19  
20 20  let keyPreviousReward = "_previous_reward"
21 21  
22 22  let keyLastInterest = "_last_interest"
23 23  
24 24  let keyLastInterestHeight = "_last_interest_height"
25 25  
26 26  let keyUserShareTokensLocked = "_share_tokens_locked"
27 27  
28 28  let keyUserLastInterest = "_last_interest"
29 29  
30 30  let keySWOPid = "SWOP_id"
31 31  
32 32  let keyPoolAddress = "_address"
33 33  
34 34  let votingAddress = Address(base58'3N5F5DCmWNzT8ZPe1tBfiXaVYzWJriaJZ9E')
35 35  
36 36  let SWOP = fromBase58String(getStringValue(this, keySWOPid))
37 37  
38 38  let scale8 = 100000000
39 39  
40 40  let heightRewardUpdate = getIntegerValue(this, "height_reward_update")
41 41  
42 42  func throwOnlyAdmin () = throw("Only admin can call this function")
43 43  
44 44  
45 45  func throwIsActive () = throw("DApp is already active")
46 46  
47 47  
48 48  func getTotalShareTokenLocked (pool) = valueOrErrorMessage(getInteger(this, (pool + keyShareTokensLocked)), (("No data on the key: " + pool) + keyShareTokensLocked))
49 49  
50 50  
51 51  func rewardInfo (pool) = {
52 52      let currentReward = valueOrErrorMessage(getInteger(votingAddress, (pool + keyCurrentReward)), (((("No data on the key: " + pool) + keyCurrentReward) + " at address ") + toString(votingAddress)))
53 53      let rewardUpdateHeight = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyRewardUpdateHeight) + " at address ") + toString(votingAddress)))
54 54      let rewardPreviousAmount = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyPreviousReward) + " at address ") + toString(votingAddress)))
55 55      $Tuple3(currentReward, rewardUpdateHeight, rewardPreviousAmount)
56 56      }
57 57  
58 58  
59 59  func getLastInterestInfo (pool) = {
60 60      let lastInterest = valueOrErrorMessage(getInteger(this, (pool + keyLastInterest)), (((("No data on the key: " + pool) + "_") + pool) + keyLastInterest))
61 61      let lastInterestHeight = valueOrErrorMessage(getInteger(this, (pool + keyLastInterestHeight)), (("No data on the key: " + pool) + keyLastInterestHeight))
62 62      $Tuple2(lastInterestHeight, lastInterest)
63 63      }
64 64  
65 65  
66 66  func getUserInterestInfo (pool,userAddres) = {
67 67      let userLastInterest = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserLastInterest))
68 68      let userShare = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserShareTokensLocked))
69 69      let userLastInterestValue =     match userLastInterest {
70 70          case userLastInterest: Int => 
71 71              userLastInterest
72 72          case _ => 
73 73              0
74 74      }
75 75      let userShareTokensAmount =     match userShare {
76 76          case userShare: Int => 
77 77              userShare
78 78          case _ => 
79 79              0
80 80      }
81 81      $Tuple2(userLastInterestValue, userShareTokensAmount)
82 82      }
83 83  
84 84  
85 85  func calcInterest (lastInterestHeight,rewardUpdateHeight,lastInterest,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock) = if ((lastInterestHeight > rewardUpdateHeight))
86 86      then if ((shareTokenLocked == 0))
87 87          then 0
88 88          else {
89 89              let reward = (currentRewardPerBlock * (height - lastInterestHeight))
90 90              ((lastInterest * scale8) + fraction(reward, scale8, shareTokenLocked))
91 91              }
92 92      else {
93 93          let rewardAfterLastInterestBeforeReawardUpdate = (previousRewardPerBlock * (rewardUpdateHeight - lastInterestHeight))
94 94          let interestAfterUpdate = ((lastInterest * scale8) + fraction(rewardAfterLastInterestBeforeReawardUpdate, scale8, shareTokenLocked))
95 95          let reward = (currentRewardPerBlock * (height - rewardUpdateHeight))
96 96          ((interestAfterUpdate * scale8) + fraction(reward, scale8, shareTokenLocked))
97 97          }
98 98  
99 99  
100 100  func ClaimCalc (pool,caller) = {
101 101      let shareTokenLocked = getTotalShareTokenLocked(pool)
102 102      let $t046054670 = getLastInterestInfo(pool)
103 103      let lastInterestHeight = $t046054670._1
104 104      let lastInterest = $t046054670._2
105 105      let $t046754763 = rewardInfo(pool)
106 106      let currentRewardPerBlock = $t046754763._1
107 107      let rewardUpdateHeight = $t046754763._2
108 108      let previousRewardPerBlock = $t046754763._3
109 109      let $t047684847 = getUserInterestInfo(pool, caller)
110 110      let userLastInterest = $t047684847._1
111 111      let userShareTokensAmount = $t047684847._2
112 112      let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
113 +     let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
113 114      if (true)
114 115          then throw("111")
115 116          else {
116 -             let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
117 117              let userNewInterest = currentInterest
118 118              $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
119 119              }
120 120      }
121 121  
122 122  
123 123  func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
124 124      let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
125 125      let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
126 126      if ((pmtAssetId == poolShareAssetId))
127 127          then true
128 128          else false
129 129      }
130 130  
131 131  
132 132  @Callable(i)
133 133  func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
134 134      then throw("Only admin can call this function")
135 135      else {
136 136          let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
137 137          let SWOPid = calculateAssetId(SWOPissue)
138 138  [Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
139 139          }
140 140  
141 141  
142 142  
143 143  @Callable(i)
144 144  func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
145 145      then throw("Only admin can call this function")
146 146      else {
147 147          let $t062246304 = rewardInfo(pool)
148 148          let currentReward = $t062246304._1
149 149          let rewardUpdateHeight = $t062246304._2
150 150          let previousRewardPerBlock = $t062246304._3
151 151  [StringEntry((pool + keyPoolAddress), pool), IntegerEntry((pool + keyShareTokensLocked), 0), IntegerEntry((pool + keyCurrentReward), 0), IntegerEntry((pool + keyLastInterest), 0), IntegerEntry((pool + keyLastInterestHeight), height), IntegerEntry((pool + keyRewardUpdateHeight), rewardUpdateHeight), IntegerEntry((pool + keyPreviousReward), previousRewardPerBlock)]
152 152          }
153 153  
154 154  
155 155  
156 156  @Callable(i)
157 157  func lockShareTokens (pool) = {
158 158      let $t067546829 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
159 159      let pmtAmount = $t067546829._1
160 160      let pmtAssetId = $t067546829._2
161 161      if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
162 162          then throw("Incorrect pmtAssetId")
163 163          else {
164 164              let $t069227020 = ClaimCalc(pool, i.caller)
165 165              let userNewInterest = $t069227020._1
166 166              let currentInterest = $t069227020._2
167 167              let claimAmount = $t069227020._3
168 168              let userShareTokensAmount = $t069227020._4
169 169              let userShareAmountNew = (userShareTokensAmount + pmtAmount)
170 170              let totalShareAmount = getTotalShareTokenLocked(pool)
171 171              let totalShareAmountNew = (totalShareAmount + pmtAmount)
172 172  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserShareTokensLocked), userShareAmountNew), IntegerEntry((pool + keyLastInterest), currentInterest), IntegerEntry((pool + keyLastInterestHeight), height), IntegerEntry((pool + keyShareTokensLocked), totalShareAmountNew)]
173 173              }
174 174      }
175 175  
176 176  
177 177  
178 178  @Callable(i)
179 179  func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
180 180      let $t077967894 = ClaimCalc(pool, i.caller)
181 181      let userNewInterest = $t077967894._1
182 182      let currentInterest = $t077967894._2
183 183      let claimAmount = $t077967894._3
184 184      let userShareTokensAmount = $t077967894._4
185 185      if ((shareTokensWithdrawAmount > userShareTokensAmount))
186 186          then throw("Withdraw amount more then user locked amount")
187 187          else {
188 188              let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
189 189              let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
190 190  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserShareTokensLocked), userShareAmountNew), IntegerEntry((pool + keyLastInterest), currentInterest), IntegerEntry((pool + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
191 191              }
192 192      }
193 193  
194 194  
195 195  
196 196  @Callable(i)
197 197  func claim (pool) = {
198 198      let shareTokenLocked = getTotalShareTokenLocked(pool)
199 199      let $t087948859 = getLastInterestInfo(pool)
200 200      let lastInterestHeight = $t087948859._1
201 201      let lastInterest = $t087948859._2
202 202      let $t088649028 = rewardInfo(pool)
203 203      let currentRewardPerBlock = $t088649028._1
204 204      let rewardUpdateHeight = $t088649028._2
205 205      let previousRewardPerBlock = $t088649028._3
206 206      let $t090339439 = ClaimCalc(pool, i.caller)
207 207      let userNewInterest = $t090339439._1
208 208      let currentInterest = $t090339439._2
209 209      let claimAmount = $t090339439._3
210 210      let userShareTokensAmount = $t090339439._4
211 211  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
212 212      }
213 213  
214 214

Old	New		Differences
110	110		let userLastInterest = $t047684847._1
111	111		let userShareTokensAmount = $t047684847._2
112	112		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
	113	+	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
113	114		if (true)
114	115		then throw("111")
115	116		else {
116		-	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
117	117		let userNewInterest = currentInterest
118	118		$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
119	119		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let adminPubKey1 = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
5	5
6	6		let adminPubKey2 = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
7	7
8	8		let adminPubKey3 = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
9	9
10	10		let adminPubKeyStartStop = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
11	11
12	12		let adminPubKeyStaking = base58'289xpUrYrKbLjaKkqH3XNhfecukcYRaDRT3JDrvkvQRU'
13	13
14	14		let keyShareTokensLocked = "_total_share_tokens_locked"
15	15
16	16		let keyCurrentReward = "_current_reward"
17	17
18	18		let keyRewardUpdateHeight = "_reward_update_height"
19	19
20	20		let keyPreviousReward = "_previous_reward"
21	21
22	22		let keyLastInterest = "_last_interest"
23	23
24	24		let keyLastInterestHeight = "_last_interest_height"
25	25
26	26		let keyUserShareTokensLocked = "_share_tokens_locked"
27	27
28	28		let keyUserLastInterest = "_last_interest"
29	29
30	30		let keySWOPid = "SWOP_id"
31	31
32	32		let keyPoolAddress = "_address"
33	33
34	34		let votingAddress = Address(base58'3N5F5DCmWNzT8ZPe1tBfiXaVYzWJriaJZ9E')
35	35
36	36		let SWOP = fromBase58String(getStringValue(this, keySWOPid))
37	37
38	38		let scale8 = 100000000
39	39
40	40		let heightRewardUpdate = getIntegerValue(this, "height_reward_update")
41	41
42	42		func throwOnlyAdmin () = throw("Only admin can call this function")
43	43
44	44
45	45		func throwIsActive () = throw("DApp is already active")
46	46
47	47
48	48		func getTotalShareTokenLocked (pool) = valueOrErrorMessage(getInteger(this, (pool + keyShareTokensLocked)), (("No data on the key: " + pool) + keyShareTokensLocked))
49	49
50	50
51	51		func rewardInfo (pool) = {
52	52		let currentReward = valueOrErrorMessage(getInteger(votingAddress, (pool + keyCurrentReward)), (((("No data on the key: " + pool) + keyCurrentReward) + " at address ") + toString(votingAddress)))
53	53		let rewardUpdateHeight = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyRewardUpdateHeight) + " at address ") + toString(votingAddress)))
54	54		let rewardPreviousAmount = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyPreviousReward) + " at address ") + toString(votingAddress)))
55	55		$Tuple3(currentReward, rewardUpdateHeight, rewardPreviousAmount)
56	56		}
57	57
58	58
59	59		func getLastInterestInfo (pool) = {
60	60		let lastInterest = valueOrErrorMessage(getInteger(this, (pool + keyLastInterest)), (((("No data on the key: " + pool) + "_") + pool) + keyLastInterest))
61	61		let lastInterestHeight = valueOrErrorMessage(getInteger(this, (pool + keyLastInterestHeight)), (("No data on the key: " + pool) + keyLastInterestHeight))
62	62		$Tuple2(lastInterestHeight, lastInterest)
63	63		}
64	64
65	65
66	66		func getUserInterestInfo (pool,userAddres) = {
67	67		let userLastInterest = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserLastInterest))
68	68		let userShare = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserShareTokensLocked))
69	69		let userLastInterestValue = match userLastInterest {
70	70		case userLastInterest: Int =>
71	71		userLastInterest
72	72		case _ =>
73	73		0
74	74		}
75	75		let userShareTokensAmount = match userShare {
76	76		case userShare: Int =>
77	77		userShare
78	78		case _ =>
79	79		0
80	80		}
81	81		$Tuple2(userLastInterestValue, userShareTokensAmount)
82	82		}
83	83
84	84
85	85		func calcInterest (lastInterestHeight,rewardUpdateHeight,lastInterest,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock) = if ((lastInterestHeight > rewardUpdateHeight))
86	86		then if ((shareTokenLocked == 0))
87	87		then 0
88	88		else {
89	89		let reward = (currentRewardPerBlock * (height - lastInterestHeight))
90	90		((lastInterest * scale8) + fraction(reward, scale8, shareTokenLocked))
91	91		}
92	92		else {
93	93		let rewardAfterLastInterestBeforeReawardUpdate = (previousRewardPerBlock * (rewardUpdateHeight - lastInterestHeight))
94	94		let interestAfterUpdate = ((lastInterest * scale8) + fraction(rewardAfterLastInterestBeforeReawardUpdate, scale8, shareTokenLocked))
95	95		let reward = (currentRewardPerBlock * (height - rewardUpdateHeight))
96	96		((interestAfterUpdate * scale8) + fraction(reward, scale8, shareTokenLocked))
97	97		}
98	98
99	99
100	100		func ClaimCalc (pool,caller) = {
101	101		let shareTokenLocked = getTotalShareTokenLocked(pool)
102	102		let $t046054670 = getLastInterestInfo(pool)
103	103		let lastInterestHeight = $t046054670._1
104	104		let lastInterest = $t046054670._2
105	105		let $t046754763 = rewardInfo(pool)
106	106		let currentRewardPerBlock = $t046754763._1
107	107		let rewardUpdateHeight = $t046754763._2
108	108		let previousRewardPerBlock = $t046754763._3
109	109		let $t047684847 = getUserInterestInfo(pool, caller)
110	110		let userLastInterest = $t047684847._1
111	111		let userShareTokensAmount = $t047684847._2
112	112		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
	113	+	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
113	114		if (true)
114	115		then throw("111")
115	116		else {
116		-	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
117	117		let userNewInterest = currentInterest
118	118		$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
119	119		}
120	120		}
121	121
122	122
123	123		func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
124	124		let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
125	125		let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
126	126		if ((pmtAssetId == poolShareAssetId))
127	127		then true
128	128		else false
129	129		}
130	130
131	131
132	132		@Callable(i)
133	133		func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
134	134		then throw("Only admin can call this function")
135	135		else {
136	136		let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
137	137		let SWOPid = calculateAssetId(SWOPissue)
138	138		[Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
139	139		}
140	140
141	141
142	142
143	143		@Callable(i)
144	144		func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
145	145		then throw("Only admin can call this function")
146	146		else {
147	147		let $t062246304 = rewardInfo(pool)
148	148		let currentReward = $t062246304._1
149	149		let rewardUpdateHeight = $t062246304._2
150	150		let previousRewardPerBlock = $t062246304._3
151	151		[StringEntry((pool + keyPoolAddress), pool), IntegerEntry((pool + keyShareTokensLocked), 0), IntegerEntry((pool + keyCurrentReward), 0), IntegerEntry((pool + keyLastInterest), 0), IntegerEntry((pool + keyLastInterestHeight), height), IntegerEntry((pool + keyRewardUpdateHeight), rewardUpdateHeight), IntegerEntry((pool + keyPreviousReward), previousRewardPerBlock)]
152	152		}
153	153
154	154
155	155
156	156		@Callable(i)
157	157		func lockShareTokens (pool) = {
158	158		let $t067546829 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
159	159		let pmtAmount = $t067546829._1
160	160		let pmtAssetId = $t067546829._2
161	161		if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
162	162		then throw("Incorrect pmtAssetId")
163	163		else {
164	164		let $t069227020 = ClaimCalc(pool, i.caller)
165	165		let userNewInterest = $t069227020._1
166	166		let currentInterest = $t069227020._2
167	167		let claimAmount = $t069227020._3
168	168		let userShareTokensAmount = $t069227020._4
169	169		let userShareAmountNew = (userShareTokensAmount + pmtAmount)
170	170		let totalShareAmount = getTotalShareTokenLocked(pool)
171	171		let totalShareAmountNew = (totalShareAmount + pmtAmount)
172	172		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserShareTokensLocked), userShareAmountNew), IntegerEntry((pool + keyLastInterest), currentInterest), IntegerEntry((pool + keyLastInterestHeight), height), IntegerEntry((pool + keyShareTokensLocked), totalShareAmountNew)]
173	173		}
174	174		}
175	175
176	176
177	177
178	178		@Callable(i)
179	179		func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
180	180		let $t077967894 = ClaimCalc(pool, i.caller)
181	181		let userNewInterest = $t077967894._1
182	182		let currentInterest = $t077967894._2
183	183		let claimAmount = $t077967894._3
184	184		let userShareTokensAmount = $t077967894._4
185	185		if ((shareTokensWithdrawAmount > userShareTokensAmount))
186	186		then throw("Withdraw amount more then user locked amount")
187	187		else {
188	188		let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
189	189		let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
190	190		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserShareTokensLocked), userShareAmountNew), IntegerEntry((pool + keyLastInterest), currentInterest), IntegerEntry((pool + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP), ScriptTransfer(i.caller, shareTokensWithdrawAmount, shareTokensId)]
191	191		}
192	192		}
193	193
194	194
195	195
196	196		@Callable(i)
197	197		func claim (pool) = {
198	198		let shareTokenLocked = getTotalShareTokenLocked(pool)
199	199		let $t087948859 = getLastInterestInfo(pool)
200	200		let lastInterestHeight = $t087948859._1
201	201		let lastInterest = $t087948859._2
202	202		let $t088649028 = rewardInfo(pool)
203	203		let currentRewardPerBlock = $t088649028._1
204	204		let rewardUpdateHeight = $t088649028._2
205	205		let previousRewardPerBlock = $t088649028._3
206	206		let $t090339439 = ClaimCalc(pool, i.caller)
207	207		let userNewInterest = $t090339439._1
208	208		let currentInterest = $t090339439._2
209	209		let claimAmount = $t090339439._3
210	210		let userShareTokensAmount = $t090339439._4
211	211		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
212	212		}
213	213
214	214

github/deemru/w8io/873ac7e 
33.37 ms ◑