w8 · tx · 4i5···s8r

tx · 4i56MPrDRjS5SGYxJfBa1e72GQbRRvfaffrCmSZxUs8r

3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg:  -0.01400000 Waves

2020.12.12 18:05 [1305603] smart account 3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4i56MPrDRjS5SGYxJfBa1e72GQbRRvfaffrCmSZxUs8r",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1607785575079,
    "version": 1,
    "sender": "3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg",
    "senderPublicKey": "38RJPSAs2g6F7P5zT5FJ6BAc1DyReFGja2vkw8rSz3ga",
    "proofs": [
        "4fr4CJKnSFBgmQ3UrGGjrhXiu8PWsguDtPiRBEdkRTsBzt22ftkGqABQAHVxaDyun1y9iJToW7VbfcaJUQvfqLW8"
    ],
    "script": "base64:AAIEAAAAAAAAABkIAhIAEgMKAQgSAwoBCBIECgIIARIDCgEIAAAAHAAAAAAMYWRtaW5QdWJLZXkxAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkyAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkzAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAUYWRtaW5QdWJLZXlTdGFydFN0b3ABAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABJhZG1pblB1YktleVN0YWtpbmcBAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAIAAAAaX3RvdGFsX3NoYXJlX3Rva2Vuc19sb2NrZWQAAAAAEGtleUN1cnJlbnRSZXdhcmQCAAAAD19jdXJyZW50X3Jld2FyZAAAAAAVa2V5UmV3YXJkVXBkYXRlSGVpZ2h0AgAAABVfcmV3YXJkX3VwZGF0ZV9oZWlnaHQAAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAABBfcHJldmlvdXNfcmV3YXJkAAAAAA9rZXlMYXN0SW50ZXJlc3QCAAAADl9sYXN0X2ludGVyZXN0AAAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQCAAAAFV9sYXN0X2ludGVyZXN0X2hlaWdodAAAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkAgAAABRfc2hhcmVfdG9rZW5zX2xvY2tlZAAAAAATa2V5VXNlckxhc3RJbnRlcmVzdAIAAAAOX2xhc3RfaW50ZXJlc3QAAAAACWtleVNXT1BpZAIAAAAHU1dPUF9pZAAAAAAOa2V5UG9vbEFkZHJlc3MCAAAACF9hZGRyZXNzAAAAAA12b3RpbmdBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUqCFRtE6TAyfLRDQEs9/d4tPkrAlzHIB1AAAAAARTV09QCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAACWtleVNXT1BpZAAAAAAGc2NhbGU4AAAAAAAF9eEAAAAAABJoZWlnaHRSZXdhcmRVcGRhdGUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAFGhlaWdodF9yZXdhcmRfdXBkYXRlAQAAAA50aHJvd09ubHlBZG1pbgAAAAAJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQAAAA10aHJvd0lzQWN0aXZlAAAAAAkAAAIAAAABAgAAABZEQXBwIGlzIGFscmVhZHkgYWN0aXZlAQAAABhnZXRUb3RhbFNoYXRlVG9rZW5Mb2NrZWQAAAABAAAABHBvb2wJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAQAAAApyZXdhcmRJbmZvAAAAAQAAAARwb29sBAAAAA1jdXJyZW50UmV3YXJkCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAIAAAAMIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAADXZvdGluZ0FkZHJlc3MEAAAAFHJld2FyZFByZXZpb3VzQW1vdW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwkABRUAAAADBQAAAA1jdXJyZW50UmV3YXJkBQAAABJyZXdhcmRVcGRhdGVIZWlnaHQFAAAAFHJld2FyZFByZXZpb3VzQW1vdW50AQAAABNnZXRMYXN0SW50ZXJlc3RJbmZvAAAAAQAAAARwb29sBAAAAAxsYXN0SW50ZXJlc3QJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABRObyBkYXRhIG9uIHRoZSBrZXk6IAUAAAAEcG9vbAIAAAABXwUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BAAAABJsYXN0SW50ZXJlc3RIZWlnaHQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQJAAUUAAAAAgUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACAAAABHBvb2wAAAAKdXNlckFkZHJlcwQAAAAQdXNlckxhc3RJbnRlcmVzdAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QEAAAACXVzZXJTaGFyZQkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAQAAAAVdXNlckxhc3RJbnRlcmVzdFZhbHVlBAAAAAckbWF0Y2gwBQAAABB1c2VyTGFzdEludGVyZXN0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAEHVzZXJMYXN0SW50ZXJlc3QFAAAAByRtYXRjaDAFAAAAEHVzZXJMYXN0SW50ZXJlc3QAAAAAAAAAAAAEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAQAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAACXVzZXJTaGFyZQUAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAAAAAAAAAAAACQAFFAAAAAIFAAAAFXVzZXJMYXN0SW50ZXJlc3RWYWx1ZQUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50AQAAAAxjYWxjSW50ZXJlc3QAAAAGAAAAEmxhc3RJbnRlcmVzdEhlaWdodAAAABJyZXdhcmRVcGRhdGVIZWlnaHQAAAAMbGFzdEludGVyZXN0AAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawAAABBzaGFyZVRva2VuTG9ja2VkAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sDCQAAZgAAAAIFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0AwkAAAAAAAACBQAAABBzaGFyZVRva2VuTG9ja2VkAAAAAAAAAAAAAAAAAAAAAAAABAAAAAZyZXdhcmQJAABoAAAAAgUAAAAVY3VycmVudFJld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAABmhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0CQAAZAAAAAIJAABoAAAAAgUAAAAMbGFzdEludGVyZXN0BQAAAAZzY2FsZTgJAABrAAAAAwUAAAAGcmV3YXJkBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAAKnJld2FyZEFmdGVyTGFzdEludGVyZXN0QmVmb3JlUmVhd2FyZFVwZGF0ZQkAAGgAAAACBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0BAAAABNpbnRlcmVzdEFmdGVyVXBkYXRlCQAAZAAAAAIJAABoAAAAAgUAAAAMbGFzdEludGVyZXN0BQAAAAZzY2FsZTgJAABrAAAAAwUAAAAqcmV3YXJkQWZ0ZXJMYXN0SW50ZXJlc3RCZWZvcmVSZWF3YXJkVXBkYXRlBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAABnJld2FyZAkAAGgAAAACBQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQJAABkAAAAAgkAAGgAAAACBQAAABNpbnRlcmVzdEFmdGVyVXBkYXRlBQAAAAZzY2FsZTgJAABrAAAAAwUAAAAGcmV3YXJkBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQBAAAACUNsYWltQ2FsYwAAAAIAAAAEcG9vbAAAAAZjYWxsZXIEAAAAEHNoYXJlVG9rZW5Mb2NrZWQJAQAAABhnZXRUb3RhbFNoYXRlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sAwYJAAACAAAAAQkAAaQAAAABBQAAABBzaGFyZVRva2VuTG9ja2VkBAAAAAskdDA0NjA0NDY2OQkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAAskdDA0NjA0NDY2OQAAAAJfMQQAAAAMbGFzdEludGVyZXN0CAUAAAALJHQwNDYwNDQ2NjkAAAACXzIEAAAACyR0MDQ2NzQ0NzYyCQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAACyR0MDQ2NzQ0NzYyAAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA0Njc0NDc2MgAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDQ2NzQ0NzYyAAAAAl8zBAAAAAskdDA0NzY3NDg0NgkBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACBQAAAARwb29sBQAAAAZjYWxsZXIEAAAAEHVzZXJMYXN0SW50ZXJlc3QIBQAAAAskdDA0NzY3NDg0NgAAAAJfMQQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNDc2NzQ4NDYAAAACXzIEAAAAD2N1cnJlbnRJbnRlcmVzdAkBAAAADGNhbGNJbnRlcmVzdAAAAAYFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QFAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawUAAAAQc2hhcmVUb2tlbkxvY2tlZAUAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawQAAAALY2xhaW1BbW91bnQJAABrAAAAAwUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CQAAZQAAAAIFAAAAD2N1cnJlbnRJbnRlcmVzdAkAAGgAAAACBQAAABB1c2VyTGFzdEludGVyZXN0BQAAAAZzY2FsZTgFAAAABnNjYWxlOAQAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAAUWAAAABAUAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QFAAAAC2NsYWltQW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQBAAAAFmNoZWNrUG10QXNzZXRJZENvcnJlY3QAAAACAAAABHBvb2wAAAAKcG10QXNzZXRJZAQAAAAKcG9vbEFkZHJlcwkBAAAABXZhbHVlAAAAAQkABCYAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBAAAABBwb29sU2hhcmVBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAACnBvb2xBZGRyZXMCAAAADnNoYXJlX2Fzc2V0X2lkAwkAAAAAAAACBQAAAApwbXRBc3NldElkBQAAABBwb29sU2hhcmVBc3NldElkBgcAAAAFAAAAAWkBAAAABGluaXQAAAAAAwkBAAAAASEAAAABCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgkABEwAAAACBQAAAAxhZG1pblB1YktleTEJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkyCQAETAAAAAIFAAAADGFkbWluUHViS2V5MwUAAAADbmlsCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBAAAAAlTV09QaXNzdWUJAARCAAAABQIAAAAEU1dPUAIAAAATU1dPUCBwcm90b2NvbCB0b2tlbgAAAAAAAAAAAQAAAAAAAAAACAYEAAAABlNXT1BpZAkABDgAAAABBQAAAAlTV09QaXNzdWUJAARMAAAAAgkABEIAAAAFAgAAAARTV09QAgAAABNTV09QIHByb3RvY29sIHRva2VuAAAAAAAAAAABAAAAAAAAAAAIBgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlrZXlTV09QaWQJAAJYAAAAAQUAAAAGU1dPUGlkBQAAAANuaWwAAAABaQEAAAAUaW5pdFBvb2xTaGFyZUxvY2tpbmcAAAABAAAABHBvb2wDCQEAAAABIQAAAAEJAQAAAA9jb250YWluc0VsZW1lbnQAAAACCQAETAAAAAIFAAAADGFkbWluUHViS2V5MQkABEwAAAACBQAAAAxhZG1pblB1YktleTIJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkzBQAAAANuaWwIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQkAAAIAAAABAgAAACFPbmx5IGFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EAAAACyR0MDYxODg2MjY4CQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAADWN1cnJlbnRSZXdhcmQIBQAAAAskdDA2MTg4NjI2OAAAAAJfMQQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CAUAAAALJHQwNjE4ODYyNjgAAAACXzIEAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sIBQAAAAskdDA2MTg4NjI2OAAAAAJfMwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBQAAAARwb29sCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEGtleUN1cnJlbnRSZXdhcmQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrBQAAAANuaWwAAAABaQEAAAAPbG9ja1NoYXJlVG9rZW5zAAAAAQAAAARwb29sBAAAAAskdDA2NzE4Njc5MwkABRQAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAACXBtdEFtb3VudAgFAAAACyR0MDY3MTg2NzkzAAAAAl8xBAAAAApwbXRBc3NldElkCAUAAAALJHQwNjcxODY3OTMAAAACXzIDCQEAAAABIQAAAAEJAQAAABZjaGVja1BtdEFzc2V0SWRDb3JyZWN0AAAAAgUAAAAEcG9vbAUAAAAKcG10QXNzZXRJZAkAAAIAAAABAgAAABRJbmNvcnJlY3QgcG10QXNzZXRJZAQAAAALJHQwNjg4NjY5ODQJAQAAAAlDbGFpbUNhbGMAAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIEAAAAD3VzZXJOZXdJbnRlcmVzdAgFAAAACyR0MDY4ODY2OTg0AAAAAl8xBAAAAA9jdXJyZW50SW50ZXJlc3QIBQAAAAskdDA2ODg2Njk4NAAAAAJfMgQAAAALY2xhaW1BbW91bnQIBQAAAAskdDA2ODg2Njk4NAAAAAJfMwQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNjg4NjY5ODQAAAACXzQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGQAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAACXBtdEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAUAAAASdXNlclNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAEU1dPUAUAAAALY2xhaW1BbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQFAAAABFNXT1AFAAAAA25pbAAAAAFpAQAAABN3aXRoZHJhd1NoYXJlVG9rZW5zAAAAAgAAAARwb29sAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAACyR0MDc1Njg3NjY2CQEAAAAJQ2xhaW1DYWxjAAAAAgUAAAAEcG9vbAgFAAAAAWkAAAAGY2FsbGVyBAAAAA91c2VyTmV3SW50ZXJlc3QIBQAAAAskdDA3NTY4NzY2NgAAAAJfMQQAAAAPY3VycmVudEludGVyZXN0CAUAAAALJHQwNzU2ODc2NjYAAAACXzIEAAAAC2NsYWltQW1vdW50CAUAAAALJHQwNzU2ODc2NjYAAAACXzMEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAACyR0MDc1Njg3NjY2AAAAAl80AwkAAGYAAAACBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQJAAACAAAAAQIAAAAsV2l0aGRyYXcgYW1vdW50IG1vcmUgdGhlbiB1c2VyIGxvY2tlZCBhbW91bnQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGUAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAADXNoYXJlVG9rZW5zSWQJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAARwb29sAgAAAA5zaGFyZV9hc3NldF9pZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAUAAAASdXNlclNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAEU1dPUAUAAAALY2xhaW1BbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQFAAAABFNXT1AJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAAA1zaGFyZVRva2Vuc0lkBQAAAANuaWwAAAABaQEAAAAFY2xhaW0AAAABAAAABHBvb2wEAAAAEHNoYXJlVG9rZW5Mb2NrZWQJAQAAABhnZXRUb3RhbFNoYXRlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAAAskdDA4NTY2ODYzMQkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAAskdDA4NTY2ODYzMQAAAAJfMQQAAAAMbGFzdEludGVyZXN0CAUAAAALJHQwODU2Njg2MzEAAAACXzIEAAAACyR0MDg2MzY4NzI1CQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAACyR0MDg2MzY4NzI1AAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA4NjM2ODcyNQAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDg2MzY4NzI1AAAAAl8zBAAAAAskdDA4NzMwODc5OQkBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIEAAAAEHVzZXJMYXN0SW50ZXJlc3QIBQAAAAskdDA4NzMwODc5OQAAAAJfMQQAAAAJdXNlclNoYXJlCAUAAAALJHQwODczMDg3OTkAAAACXzIEAAAAD2N1cnJlbnRJbnRlcmVzdAkBAAAADGNhbGNJbnRlcmVzdAAAAAYFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QFAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawUAAAAQc2hhcmVUb2tlbkxvY2tlZAUAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawQAAAALY2xhaW1BbW91bnQJAABrAAAAAwUAAAAJdXNlclNoYXJlCQAAZQAAAAIFAAAAD2N1cnJlbnRJbnRlcmVzdAkAAGgAAAACBQAAABB1c2VyTGFzdEludGVyZXN0BQAAAAZzY2FsZTgFAAAABnNjYWxlOAQAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8JAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAABNrZXlVc2VyTGFzdEludGVyZXN0BQAAAA91c2VyTmV3SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfBQAAAA9rZXlMYXN0SW50ZXJlc3QFAAAAD2N1cnJlbnRJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8FAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAEU1dPUAUAAAALY2xhaW1BbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQFAAAABFNXT1AFAAAAA25pbAAAAAD8QSkh",
    "chainId": 84,
    "height": 1305603,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EmrQvHWYwi7cMhTtKnNXdEUJnVcXSkNneaWuAWoi16tf
Next: 7SRxAQCDvkDqUdvrHj5uEmgkcUqJhcDE3Aw4bXcXKcg5

Diff: 
Old New Differences
84 84  
85 85  func calcInterest (lastInterestHeight,rewardUpdateHeight,lastInterest,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock) = if ((lastInterestHeight > rewardUpdateHeight))
86 86      then if ((shareTokenLocked == 0))
87 -         then throw("11")
87 +         then 0
88 88          else {
89 89              let reward = (currentRewardPerBlock * (height - lastInterestHeight))
90 90              ((lastInterest * scale8) + fraction(reward, scale8, shareTokenLocked))
99 99  
100 100  func ClaimCalc (pool,caller) = {
101 101      let shareTokenLocked = getTotalShateTokenLocked(pool)
102 -     let $t045574622 = getLastInterestInfo(pool)
103 -     let lastInterestHeight = $t045574622._1
104 -     let lastInterest = $t045574622._2
105 -     let $t046274715 = rewardInfo(pool)
106 -     let currentRewardPerBlock = $t046274715._1
107 -     let rewardUpdateHeight = $t046274715._2
108 -     let previousRewardPerBlock = $t046274715._3
109 -     let $t047204799 = getUserInterestInfo(pool, caller)
110 -     let userLastInterest = $t047204799._1
111 -     let userShareTokensAmount = $t047204799._2
112 -     let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
113 -     let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
114 -     let userNewInterest = currentInterest
115 -     $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
102 +     if (true)
103 +         then throw(toString(shareTokenLocked))
104 +         else {
105 +             let $t046044669 = getLastInterestInfo(pool)
106 +             let lastInterestHeight = $t046044669._1
107 +             let lastInterest = $t046044669._2
108 +             let $t046744762 = rewardInfo(pool)
109 +             let currentRewardPerBlock = $t046744762._1
110 +             let rewardUpdateHeight = $t046744762._2
111 +             let previousRewardPerBlock = $t046744762._3
112 +             let $t047674846 = getUserInterestInfo(pool, caller)
113 +             let userLastInterest = $t047674846._1
114 +             let userShareTokensAmount = $t047674846._2
115 +             let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
116 +             let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
117 +             let userNewInterest = currentInterest
118 +             $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
119 +             }
116 120      }
117 121  
118 122  
140 144  func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
141 145      then throw("Only admin can call this function")
142 146      else {
143 -         let $t061416221 = rewardInfo(pool)
144 -         let currentReward = $t061416221._1
145 -         let rewardUpdateHeight = $t061416221._2
146 -         let previousRewardPerBlock = $t061416221._3
147 +         let $t061886268 = rewardInfo(pool)
148 +         let currentReward = $t061886268._1
149 +         let rewardUpdateHeight = $t061886268._2
150 +         let previousRewardPerBlock = $t061886268._3
147 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)]
148 152          }
149 153  
151 155  
152 156  @Callable(i)
153 157  func lockShareTokens (pool) = {
154 -     let $t066716746 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
155 -     let pmtAmount = $t066716746._1
156 -     let pmtAssetId = $t066716746._2
158 +     let $t067186793 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
159 +     let pmtAmount = $t067186793._1
160 +     let pmtAssetId = $t067186793._2
157 161      if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
158 162          then throw("Incorrect pmtAssetId")
159 163          else {
160 -             let $t068396937 = ClaimCalc(pool, i.caller)
161 -             let userNewInterest = $t068396937._1
162 -             let currentInterest = $t068396937._2
163 -             let claimAmount = $t068396937._3
164 -             let userShareTokensAmount = $t068396937._4
164 +             let $t068866984 = ClaimCalc(pool, i.caller)
165 +             let userNewInterest = $t068866984._1
166 +             let currentInterest = $t068866984._2
167 +             let claimAmount = $t068866984._3
168 +             let userShareTokensAmount = $t068866984._4
165 169              let userShareAmountNew = (userShareTokensAmount + pmtAmount)
166 170  [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)]
167 171              }
171 175  
172 176  @Callable(i)
173 177  func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
174 -     let $t075217619 = ClaimCalc(pool, i.caller)
175 -     let userNewInterest = $t075217619._1
176 -     let currentInterest = $t075217619._2
177 -     let claimAmount = $t075217619._3
178 -     let userShareTokensAmount = $t075217619._4
178 +     let $t075687666 = ClaimCalc(pool, i.caller)
179 +     let userNewInterest = $t075687666._1
180 +     let currentInterest = $t075687666._2
181 +     let claimAmount = $t075687666._3
182 +     let userShareTokensAmount = $t075687666._4
179 183      if ((shareTokensWithdrawAmount > userShareTokensAmount))
180 184          then throw("Withdraw amount more then user locked amount")
181 185          else {
190 194  @Callable(i)
191 195  func claim (pool) = {
192 196      let shareTokenLocked = getTotalShateTokenLocked(pool)
193 -     let $t085198584 = getLastInterestInfo(pool)
194 -     let lastInterestHeight = $t085198584._1
195 -     let lastInterest = $t085198584._2
196 -     let $t085898678 = rewardInfo(pool)
197 -     let currentRewardPerBlock = $t085898678._1
198 -     let rewardUpdateHeight = $t085898678._2
199 -     let previousRewardPerBlock = $t085898678._3
200 -     let $t086838752 = getUserInterestInfo(pool, i.caller)
201 -     let userLastInterest = $t086838752._1
202 -     let userShare = $t086838752._2
197 +     let $t085668631 = getLastInterestInfo(pool)
198 +     let lastInterestHeight = $t085668631._1
199 +     let lastInterest = $t085668631._2
200 +     let $t086368725 = rewardInfo(pool)
201 +     let currentRewardPerBlock = $t086368725._1
202 +     let rewardUpdateHeight = $t086368725._2
203 +     let previousRewardPerBlock = $t086368725._3
204 +     let $t087308799 = getUserInterestInfo(pool, i.caller)
205 +     let userLastInterest = $t087308799._1
206 +     let userShare = $t087308799._2
203 207      let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
204 208      let claimAmount = fraction(userShare, (currentInterest - (userLastInterest * scale8)), scale8)
205 209      let userNewInterest = currentInterest
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 getTotalShateTokenLocked (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 -         then throw("11")
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 = getTotalShateTokenLocked(pool)
102 -     let $t045574622 = getLastInterestInfo(pool)
103 -     let lastInterestHeight = $t045574622._1
104 -     let lastInterest = $t045574622._2
105 -     let $t046274715 = rewardInfo(pool)
106 -     let currentRewardPerBlock = $t046274715._1
107 -     let rewardUpdateHeight = $t046274715._2
108 -     let previousRewardPerBlock = $t046274715._3
109 -     let $t047204799 = getUserInterestInfo(pool, caller)
110 -     let userLastInterest = $t047204799._1
111 -     let userShareTokensAmount = $t047204799._2
112 -     let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
113 -     let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
114 -     let userNewInterest = currentInterest
115 -     $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
102 +     if (true)
103 +         then throw(toString(shareTokenLocked))
104 +         else {
105 +             let $t046044669 = getLastInterestInfo(pool)
106 +             let lastInterestHeight = $t046044669._1
107 +             let lastInterest = $t046044669._2
108 +             let $t046744762 = rewardInfo(pool)
109 +             let currentRewardPerBlock = $t046744762._1
110 +             let rewardUpdateHeight = $t046744762._2
111 +             let previousRewardPerBlock = $t046744762._3
112 +             let $t047674846 = getUserInterestInfo(pool, caller)
113 +             let userLastInterest = $t047674846._1
114 +             let userShareTokensAmount = $t047674846._2
115 +             let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
116 +             let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
117 +             let userNewInterest = currentInterest
118 +             $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
119 +             }
116 120      }
117 121  
118 122  
119 123  func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
120 124      let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
121 125      let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
122 126      if ((pmtAssetId == poolShareAssetId))
123 127          then true
124 128          else false
125 129      }
126 130  
127 131  
128 132  @Callable(i)
129 133  func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
130 134      then throw("Only admin can call this function")
131 135      else {
132 136          let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
133 137          let SWOPid = calculateAssetId(SWOPissue)
134 138  [Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
135 139          }
136 140  
137 141  
138 142  
139 143  @Callable(i)
140 144  func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
141 145      then throw("Only admin can call this function")
142 146      else {
143 -         let $t061416221 = rewardInfo(pool)
144 -         let currentReward = $t061416221._1
145 -         let rewardUpdateHeight = $t061416221._2
146 -         let previousRewardPerBlock = $t061416221._3
147 +         let $t061886268 = rewardInfo(pool)
148 +         let currentReward = $t061886268._1
149 +         let rewardUpdateHeight = $t061886268._2
150 +         let previousRewardPerBlock = $t061886268._3
147 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)]
148 152          }
149 153  
150 154  
151 155  
152 156  @Callable(i)
153 157  func lockShareTokens (pool) = {
154 -     let $t066716746 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
155 -     let pmtAmount = $t066716746._1
156 -     let pmtAssetId = $t066716746._2
158 +     let $t067186793 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
159 +     let pmtAmount = $t067186793._1
160 +     let pmtAssetId = $t067186793._2
157 161      if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
158 162          then throw("Incorrect pmtAssetId")
159 163          else {
160 -             let $t068396937 = ClaimCalc(pool, i.caller)
161 -             let userNewInterest = $t068396937._1
162 -             let currentInterest = $t068396937._2
163 -             let claimAmount = $t068396937._3
164 -             let userShareTokensAmount = $t068396937._4
164 +             let $t068866984 = ClaimCalc(pool, i.caller)
165 +             let userNewInterest = $t068866984._1
166 +             let currentInterest = $t068866984._2
167 +             let claimAmount = $t068866984._3
168 +             let userShareTokensAmount = $t068866984._4
165 169              let userShareAmountNew = (userShareTokensAmount + pmtAmount)
166 170  [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)]
167 171              }
168 172      }
169 173  
170 174  
171 175  
172 176  @Callable(i)
173 177  func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
174 -     let $t075217619 = ClaimCalc(pool, i.caller)
175 -     let userNewInterest = $t075217619._1
176 -     let currentInterest = $t075217619._2
177 -     let claimAmount = $t075217619._3
178 -     let userShareTokensAmount = $t075217619._4
178 +     let $t075687666 = ClaimCalc(pool, i.caller)
179 +     let userNewInterest = $t075687666._1
180 +     let currentInterest = $t075687666._2
181 +     let claimAmount = $t075687666._3
182 +     let userShareTokensAmount = $t075687666._4
179 183      if ((shareTokensWithdrawAmount > userShareTokensAmount))
180 184          then throw("Withdraw amount more then user locked amount")
181 185          else {
182 186              let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
183 187              let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
184 188  [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)]
185 189              }
186 190      }
187 191  
188 192  
189 193  
190 194  @Callable(i)
191 195  func claim (pool) = {
192 196      let shareTokenLocked = getTotalShateTokenLocked(pool)
193 -     let $t085198584 = getLastInterestInfo(pool)
194 -     let lastInterestHeight = $t085198584._1
195 -     let lastInterest = $t085198584._2
196 -     let $t085898678 = rewardInfo(pool)
197 -     let currentRewardPerBlock = $t085898678._1
198 -     let rewardUpdateHeight = $t085898678._2
199 -     let previousRewardPerBlock = $t085898678._3
200 -     let $t086838752 = getUserInterestInfo(pool, i.caller)
201 -     let userLastInterest = $t086838752._1
202 -     let userShare = $t086838752._2
197 +     let $t085668631 = getLastInterestInfo(pool)
198 +     let lastInterestHeight = $t085668631._1
199 +     let lastInterest = $t085668631._2
200 +     let $t086368725 = rewardInfo(pool)
201 +     let currentRewardPerBlock = $t086368725._1
202 +     let rewardUpdateHeight = $t086368725._2
203 +     let previousRewardPerBlock = $t086368725._3
204 +     let $t087308799 = getUserInterestInfo(pool, i.caller)
205 +     let userLastInterest = $t087308799._1
206 +     let userShare = $t087308799._2
203 207      let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
204 208      let claimAmount = fraction(userShare, (currentInterest - (userLastInterest * scale8)), scale8)
205 209      let userNewInterest = currentInterest
206 210  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
207 211      }
208 212  
209 213

Old	New		Differences
84	84
85	85		func calcInterest (lastInterestHeight,rewardUpdateHeight,lastInterest,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock) = if ((lastInterestHeight > rewardUpdateHeight))
86	86		then if ((shareTokenLocked == 0))
87		-	then ~~throw("11")~~
	87	+	then 0
88	88		else {
89	89		let reward = (currentRewardPerBlock * (height - lastInterestHeight))
90	90		((lastInterest * scale8) + fraction(reward, scale8, shareTokenLocked))

99	99
100	100		func ClaimCalc (pool,caller) = {
101	101		let shareTokenLocked = getTotalShateTokenLocked(pool)
102		-	let $t045574622 = getLastInterestInfo(pool)
103		-	let lastInterestHeight = $t045574622._1
104		-	let lastInterest = $t045574622._2
105		-	let $t046274715 = rewardInfo(pool)
106		-	let currentRewardPerBlock = $t046274715._1
107		-	let rewardUpdateHeight = $t046274715._2
108		-	let previousRewardPerBlock = $t046274715._3
109		-	let $t047204799 = getUserInterestInfo(pool, caller)
110		-	let userLastInterest = $t047204799._1
111		-	let userShareTokensAmount = $t047204799._2
112		-	let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
113		-	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
114		-	let userNewInterest = currentInterest
115		-	$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
	102	+	if (true)
	103	+	then throw(toString(shareTokenLocked))
	104	+	else {
	105	+	let $t046044669 = getLastInterestInfo(pool)
	106	+	let lastInterestHeight = $t046044669._1
	107	+	let lastInterest = $t046044669._2
	108	+	let $t046744762 = rewardInfo(pool)
	109	+	let currentRewardPerBlock = $t046744762._1
	110	+	let rewardUpdateHeight = $t046744762._2
	111	+	let previousRewardPerBlock = $t046744762._3
	112	+	let $t047674846 = getUserInterestInfo(pool, caller)
	113	+	let userLastInterest = $t047674846._1
	114	+	let userShareTokensAmount = $t047674846._2
	115	+	let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
	116	+	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
	117	+	let userNewInterest = currentInterest
	118	+	$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
	119	+	}
116	120		}
117	121
118	122

140	144		func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
141	145		then throw("Only admin can call this function")
142	146		else {
143		-	let $~~t061416221~~ = rewardInfo(pool)
144		-	let currentReward = $~~t061416221~~._1
145		-	let rewardUpdateHeight = $~~t061416221~~._2
146		-	let previousRewardPerBlock = $~~t061416221~~._3
	147	+	let $t061886268 = rewardInfo(pool)
	148	+	let currentReward = $t061886268._1
	149	+	let rewardUpdateHeight = $t061886268._2
	150	+	let previousRewardPerBlock = $t061886268._3
147	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)]
148	152		}
149	153

151	155
152	156		@Callable(i)
153	157		func lockShareTokens (pool) = {
154		-	let $~~t066716746~~ = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
155		-	let pmtAmount = $~~t066716746~~._1
156		-	let pmtAssetId = $~~t066716746~~._2
	158	+	let $t067186793 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
	159	+	let pmtAmount = $t067186793._1
	160	+	let pmtAssetId = $t067186793._2
157	161		if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
158	162		then throw("Incorrect pmtAssetId")
159	163		else {
160		-	let $~~t068396937~~ = ClaimCalc(pool, i.caller)
161		-	let userNewInterest = $~~t068396937~~._1
162		-	let currentInterest = $~~t068396937~~._2
163		-	let claimAmount = $~~t068396937~~._3
164		-	let userShareTokensAmount = $~~t068396937~~._4
	164	+	let $t068866984 = ClaimCalc(pool, i.caller)
	165	+	let userNewInterest = $t068866984._1
	166	+	let currentInterest = $t068866984._2
	167	+	let claimAmount = $t068866984._3
	168	+	let userShareTokensAmount = $t068866984._4
165	169		let userShareAmountNew = (userShareTokensAmount + pmtAmount)
166	170		[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)]
167	171		}

171	175
172	176		@Callable(i)
173	177		func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
174		-	let $~~t075217619~~ = ClaimCalc(pool, i.caller)
175		-	let userNewInterest = $~~t075217619~~._1
176		-	let currentInterest = $~~t075217619~~._2
177		-	let claimAmount = $~~t075217619~~._3
178		-	let userShareTokensAmount = $~~t075217619~~._4
	178	+	let $t075687666 = ClaimCalc(pool, i.caller)
	179	+	let userNewInterest = $t075687666._1
	180	+	let currentInterest = $t075687666._2
	181	+	let claimAmount = $t075687666._3
	182	+	let userShareTokensAmount = $t075687666._4
179	183		if ((shareTokensWithdrawAmount > userShareTokensAmount))
180	184		then throw("Withdraw amount more then user locked amount")
181	185		else {

190	194		@Callable(i)
191	195		func claim (pool) = {
192	196		let shareTokenLocked = getTotalShateTokenLocked(pool)
193		-	let $~~t085198584~~ = getLastInterestInfo(pool)
194		-	let lastInterestHeight = $~~t085198584~~._1
195		-	let lastInterest = $~~t085198584~~._2
196		-	let $~~t085898678~~ = rewardInfo(pool)
197		-	let currentRewardPerBlock = $~~t085898678~~._1
198		-	let rewardUpdateHeight = $~~t085898678~~._2
199		-	let previousRewardPerBlock = $~~t085898678~~._3
200		-	let $~~t086838752~~ = getUserInterestInfo(pool, i.caller)
201		-	let userLastInterest = $~~t086838752~~._1
202		-	let userShare = $~~t086838752~~._2
	197	+	let $t085668631 = getLastInterestInfo(pool)
	198	+	let lastInterestHeight = $t085668631._1
	199	+	let lastInterest = $t085668631._2
	200	+	let $t086368725 = rewardInfo(pool)
	201	+	let currentRewardPerBlock = $t086368725._1
	202	+	let rewardUpdateHeight = $t086368725._2
	203	+	let previousRewardPerBlock = $t086368725._3
	204	+	let $t087308799 = getUserInterestInfo(pool, i.caller)
	205	+	let userLastInterest = $t087308799._1
	206	+	let userShare = $t087308799._2
203	207		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
204	208		let claimAmount = fraction(userShare, (currentInterest - (userLastInterest * scale8)), scale8)
205	209		let userNewInterest = currentInterest

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 getTotalShateTokenLocked (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		-	then ~~throw("11")~~
	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 = getTotalShateTokenLocked(pool)
102		-	let $t045574622 = getLastInterestInfo(pool)
103		-	let lastInterestHeight = $t045574622._1
104		-	let lastInterest = $t045574622._2
105		-	let $t046274715 = rewardInfo(pool)
106		-	let currentRewardPerBlock = $t046274715._1
107		-	let rewardUpdateHeight = $t046274715._2
108		-	let previousRewardPerBlock = $t046274715._3
109		-	let $t047204799 = getUserInterestInfo(pool, caller)
110		-	let userLastInterest = $t047204799._1
111		-	let userShareTokensAmount = $t047204799._2
112		-	let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
113		-	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
114		-	let userNewInterest = currentInterest
115		-	$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
	102	+	if (true)
	103	+	then throw(toString(shareTokenLocked))
	104	+	else {
	105	+	let $t046044669 = getLastInterestInfo(pool)
	106	+	let lastInterestHeight = $t046044669._1
	107	+	let lastInterest = $t046044669._2
	108	+	let $t046744762 = rewardInfo(pool)
	109	+	let currentRewardPerBlock = $t046744762._1
	110	+	let rewardUpdateHeight = $t046744762._2
	111	+	let previousRewardPerBlock = $t046744762._3
	112	+	let $t047674846 = getUserInterestInfo(pool, caller)
	113	+	let userLastInterest = $t047674846._1
	114	+	let userShareTokensAmount = $t047674846._2
	115	+	let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
	116	+	let claimAmount = fraction(userShareTokensAmount, (currentInterest - (userLastInterest * scale8)), scale8)
	117	+	let userNewInterest = currentInterest
	118	+	$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
	119	+	}
116	120		}
117	121
118	122
119	123		func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
120	124		let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
121	125		let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
122	126		if ((pmtAssetId == poolShareAssetId))
123	127		then true
124	128		else false
125	129		}
126	130
127	131
128	132		@Callable(i)
129	133		func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
130	134		then throw("Only admin can call this function")
131	135		else {
132	136		let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
133	137		let SWOPid = calculateAssetId(SWOPissue)
134	138		[Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
135	139		}
136	140
137	141
138	142
139	143		@Callable(i)
140	144		func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
141	145		then throw("Only admin can call this function")
142	146		else {
143		-	let $~~t061416221~~ = rewardInfo(pool)
144		-	let currentReward = $~~t061416221~~._1
145		-	let rewardUpdateHeight = $~~t061416221~~._2
146		-	let previousRewardPerBlock = $~~t061416221~~._3
	147	+	let $t061886268 = rewardInfo(pool)
	148	+	let currentReward = $t061886268._1
	149	+	let rewardUpdateHeight = $t061886268._2
	150	+	let previousRewardPerBlock = $t061886268._3
147	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)]
148	152		}
149	153
150	154
151	155
152	156		@Callable(i)
153	157		func lockShareTokens (pool) = {
154		-	let $~~t066716746~~ = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
155		-	let pmtAmount = $~~t066716746~~._1
156		-	let pmtAssetId = $~~t066716746~~._2
	158	+	let $t067186793 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
	159	+	let pmtAmount = $t067186793._1
	160	+	let pmtAssetId = $t067186793._2
157	161		if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
158	162		then throw("Incorrect pmtAssetId")
159	163		else {
160		-	let $~~t068396937~~ = ClaimCalc(pool, i.caller)
161		-	let userNewInterest = $~~t068396937~~._1
162		-	let currentInterest = $~~t068396937~~._2
163		-	let claimAmount = $~~t068396937~~._3
164		-	let userShareTokensAmount = $~~t068396937~~._4
	164	+	let $t068866984 = ClaimCalc(pool, i.caller)
	165	+	let userNewInterest = $t068866984._1
	166	+	let currentInterest = $t068866984._2
	167	+	let claimAmount = $t068866984._3
	168	+	let userShareTokensAmount = $t068866984._4
165	169		let userShareAmountNew = (userShareTokensAmount + pmtAmount)
166	170		[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)]
167	171		}
168	172		}
169	173
170	174
171	175
172	176		@Callable(i)
173	177		func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
174		-	let $~~t075217619~~ = ClaimCalc(pool, i.caller)
175		-	let userNewInterest = $~~t075217619~~._1
176		-	let currentInterest = $~~t075217619~~._2
177		-	let claimAmount = $~~t075217619~~._3
178		-	let userShareTokensAmount = $~~t075217619~~._4
	178	+	let $t075687666 = ClaimCalc(pool, i.caller)
	179	+	let userNewInterest = $t075687666._1
	180	+	let currentInterest = $t075687666._2
	181	+	let claimAmount = $t075687666._3
	182	+	let userShareTokensAmount = $t075687666._4
179	183		if ((shareTokensWithdrawAmount > userShareTokensAmount))
180	184		then throw("Withdraw amount more then user locked amount")
181	185		else {
182	186		let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
183	187		let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
184	188		[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)]
185	189		}
186	190		}
187	191
188	192
189	193
190	194		@Callable(i)
191	195		func claim (pool) = {
192	196		let shareTokenLocked = getTotalShateTokenLocked(pool)
193		-	let $~~t085198584~~ = getLastInterestInfo(pool)
194		-	let lastInterestHeight = $~~t085198584~~._1
195		-	let lastInterest = $~~t085198584~~._2
196		-	let $~~t085898678~~ = rewardInfo(pool)
197		-	let currentRewardPerBlock = $~~t085898678~~._1
198		-	let rewardUpdateHeight = $~~t085898678~~._2
199		-	let previousRewardPerBlock = $~~t085898678~~._3
200		-	let $~~t086838752~~ = getUserInterestInfo(pool, i.caller)
201		-	let userLastInterest = $~~t086838752~~._1
202		-	let userShare = $~~t086838752~~._2
	197	+	let $t085668631 = getLastInterestInfo(pool)
	198	+	let lastInterestHeight = $t085668631._1
	199	+	let lastInterest = $t085668631._2
	200	+	let $t086368725 = rewardInfo(pool)
	201	+	let currentRewardPerBlock = $t086368725._1
	202	+	let rewardUpdateHeight = $t086368725._2
	203	+	let previousRewardPerBlock = $t086368725._3
	204	+	let $t087308799 = getUserInterestInfo(pool, i.caller)
	205	+	let userLastInterest = $t087308799._1
	206	+	let userShare = $t087308799._2
203	207		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock)
204	208		let claimAmount = fraction(userShare, (currentInterest - (userLastInterest * scale8)), scale8)
205	209		let userNewInterest = currentInterest
206	210		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
207	211		}
208	212
209	213

github/deemru/w8io/169f3d6 
148.55 ms ◑