w8 · tx · 5nd···uqx

tx · 5ndRRpJQA9MLxdNBwBTUTFd8YJqfVDtsWDYj82FFuqx

3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg:  -0.01400000 Waves

2020.12.12 17:40 [1305578] smart account 3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5ndRRpJQA9MLxdNBwBTUTFd8YJqfVDtsWDYj82FFuqx",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1607784055779,
    "version": 1,
    "sender": "3MvenppyAqkqbJvpemDnU6P5dvSJ9fvRxRg",
    "senderPublicKey": "38RJPSAs2g6F7P5zT5FJ6BAc1DyReFGja2vkw8rSz3ga",
    "proofs": [
        "45xk3VBK6DUnVbhX48ZceEpuBpUbdL9CWM5XJvoc9wZsHsKbYriUBmFerfiQ4ouyCowDpmkExtYT8Qy4Et8upjsD"
    ],
    "script": "base64:AAIEAAAAAAAAABwIAhIDCgEIEgMKAQgSAwoBCBIECgIIARIDCgEIAAAAHAAAAAAMYWRtaW5QdWJLZXkxAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkyAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkzAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAUYWRtaW5QdWJLZXlTdGFydFN0b3ABAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABJhZG1pblB1YktleVN0YWtpbmcBAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAIAAAAaX3RvdGFsX3NoYXJlX3Rva2Vuc19sb2NrZWQAAAAAEGtleUN1cnJlbnRSZXdhcmQCAAAAD19jdXJyZW50X3Jld2FyZAAAAAAVa2V5UmV3YXJkVXBkYXRlSGVpZ2h0AgAAABVfcmV3YXJkX3VwZGF0ZV9oZWlnaHQAAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAABBfcHJldmlvdXNfcmV3YXJkAAAAAA9rZXlMYXN0SW50ZXJlc3QCAAAADl9sYXN0X2ludGVyZXN0AAAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQCAAAAFV9sYXN0X2ludGVyZXN0X2hlaWdodAAAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkAgAAABRfc2hhcmVfdG9rZW5zX2xvY2tlZAAAAAATa2V5VXNlckxhc3RJbnRlcmVzdAIAAAALX2xhc3RfaW5kZXgAAAAACWtleVNXT1BpZAIAAAAHU1dPUF9pZAAAAAAOa2V5UG9vbEFkZHJlc3MCAAAACF9hZGRyZXNzAAAAAA12b3RpbmdBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUqCFRtE6TAyfLRDQEs9/d4tPkrAlzHIB1AAAAAARTV09QCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAACWtleVNXT1BpZAAAAAAGc2NhbGU4AAAAAAAF9eEAAAAAABJoZWlnaHRSZXdhcmRVcGRhdGUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAFGhlaWdodF9yZXdhcmRfdXBkYXRlAQAAAA50aHJvd09ubHlBZG1pbgAAAAAJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQAAAA10aHJvd0lzQWN0aXZlAAAAAAkAAAIAAAABAgAAABZEQXBwIGlzIGFscmVhZHkgYWN0aXZlAQAAABhnZXRUb3RhbFNoYXRlVG9rZW5Mb2NrZWQAAAABAAAABHBvb2wJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAQAAAApyZXdhcmRJbmZvAAAAAQAAAARwb29sBAAAAA1jdXJyZW50UmV3YXJkCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAIAAAAMIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAADXZvdGluZ0FkZHJlc3MEAAAAFHJld2FyZFByZXZpb3VzQW1vdW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwkABRUAAAADBQAAAA1jdXJyZW50UmV3YXJkBQAAABJyZXdhcmRVcGRhdGVIZWlnaHQFAAAAFHJld2FyZFByZXZpb3VzQW1vdW50AQAAABNnZXRMYXN0SW50ZXJlc3RJbmZvAAAAAQAAAARwb29sBAAAAAxsYXN0SW50ZXJlc3QJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABRObyBkYXRhIG9uIHRoZSBrZXk6IAUAAAAEcG9vbAIAAAABXwUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BAAAABJsYXN0SW50ZXJlc3RIZWlnaHQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQJAAUUAAAAAgUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACAAAABHBvb2wAAAAKdXNlckFkZHJlcwQAAAAQdXNlckxhc3RJbnRlcmVzdAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QEAAAACXVzZXJTaGFyZQkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAQAAAAVdXNlckxhc3RJbnRlcmVzdFZhbHVlBAAAAAckbWF0Y2gwBQAAABB1c2VyTGFzdEludGVyZXN0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAEHVzZXJMYXN0SW50ZXJlc3QFAAAAByRtYXRjaDAFAAAAEHVzZXJMYXN0SW50ZXJlc3QAAAAAAAAAAAAEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAQAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAACXVzZXJTaGFyZQUAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAAAAAAAAAAAACQAFFAAAAAIFAAAAFXVzZXJMYXN0SW50ZXJlc3RWYWx1ZQUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50AQAAAAxjYWxjSW50ZXJlc3QAAAAGAAAAEmxhc3RJbnRlcmVzdEhlaWdodAAAABJyZXdhcmRVcGRhdGVIZWlnaHQAAAAMbGFzdEludGVyZXN0AAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawAAABBzaGFyZVRva2VuTG9ja2VkAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sDCQAAZgAAAAIFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0AwkAAAAAAAACBQAAABBzaGFyZVRva2VuTG9ja2VkAAAAAAAAAAAAAAAAAAAAAAAABAAAAAZyZXdhcmQJAABoAAAAAgUAAAAVY3VycmVudFJld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAABmhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0CQAAZAAAAAIJAABoAAAAAgUAAAAMbGFzdEludGVyZXN0BQAAAAZzY2FsZTgJAABrAAAAAwUAAAAGcmV3YXJkBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAAKnJld2FyZEFmdGVyTGFzdEludGVyZXN0QmVmb3JlUmVhd2FyZFVwZGF0ZQkAAGgAAAACBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0BAAAABNpbnRlcmVzdEFmdGVyVXBkYXRlCQAAZAAAAAIJAABoAAAAAgUAAAAMbGFzdEludGVyZXN0BQAAAAZzY2FsZTgJAABrAAAAAwUAAAAqcmV3YXJkQWZ0ZXJMYXN0SW50ZXJlc3RCZWZvcmVSZWF3YXJkVXBkYXRlBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAABnJld2FyZAkAAGgAAAACBQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQJAABkAAAAAgkAAGgAAAACBQAAABNpbnRlcmVzdEFmdGVyVXBkYXRlBQAAAAZzY2FsZTgJAABrAAAAAwUAAAAGcmV3YXJkBQAAAAZzY2FsZTgFAAAAEHNoYXJlVG9rZW5Mb2NrZWQBAAAACUNsYWltQ2FsYwAAAAIAAAAEcG9vbAAAAAZjYWxsZXIEAAAAEHNoYXJlVG9rZW5Mb2NrZWQJAQAAABhnZXRUb3RhbFNoYXRlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAAAskdDA0NTQ0NDYwOQkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAAskdDA0NTQ0NDYwOQAAAAJfMQQAAAAMbGFzdEludGVyZXN0CAUAAAALJHQwNDU0NDQ2MDkAAAACXzIEAAAACyR0MDQ2MTQ0NzAyCQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAACyR0MDQ2MTQ0NzAyAAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA0NjE0NDcwMgAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDQ2MTQ0NzAyAAAAAl8zBAAAAAskdDA0NzA3NDc4NgkBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACBQAAAARwb29sBQAAAAZjYWxsZXIEAAAAEHVzZXJMYXN0SW50ZXJlc3QIBQAAAAskdDA0NzA3NDc4NgAAAAJfMQQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNDcwNzQ3ODYAAAACXzIEAAAAD2N1cnJlbnRJbnRlcmVzdAkBAAAADGNhbGNJbnRlcmVzdAAAAAYFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QFAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawUAAAAQc2hhcmVUb2tlbkxvY2tlZAUAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawQAAAALY2xhaW1BbW91bnQJAABrAAAAAwUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CQAAZQAAAAIFAAAAD2N1cnJlbnRJbnRlcmVzdAkAAGgAAAACBQAAABB1c2VyTGFzdEludGVyZXN0BQAAAAZzY2FsZTgFAAAABnNjYWxlOAQAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAAUWAAAABAUAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QFAAAAC2NsYWltQW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQBAAAAFmNoZWNrUG10QXNzZXRJZENvcnJlY3QAAAACAAAABHBvb2wAAAAKcG10QXNzZXRJZAQAAAAKcG9vbEFkZHJlcwkBAAAABXZhbHVlAAAAAQkABCYAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBAAAABBwb29sU2hhcmVBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAACnBvb2xBZGRyZXMCAAAADnNoYXJlX2Fzc2V0X2lkAwkAAAAAAAACBQAAAApwbXRBc3NldElkBQAAABBwb29sU2hhcmVBc3NldElkBgcAAAAFAAAAAWkBAAAABGluaXQAAAABAAAABHBvb2wDCQEAAAABIQAAAAEJAQAAAA9jb250YWluc0VsZW1lbnQAAAACCQAETAAAAAIFAAAADGFkbWluUHViS2V5MQkABEwAAAACBQAAAAxhZG1pblB1YktleTIJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkzBQAAAANuaWwIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQkAAAIAAAABAgAAACFPbmx5IGFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EAAAACVNXT1Bpc3N1ZQkABEIAAAAFAgAAAARTV09QAgAAABNTV09QIHByb3RvY29sIHRva2VuAAAAAAAAAAABAAAAAAAAAAAIBgQAAAAGU1dPUGlkCQAEOAAAAAEFAAAACVNXT1Bpc3N1ZQkABEwAAAACCQAEQgAAAAUCAAAABFNXT1ACAAAAE1NXT1AgcHJvdG9jb2wgdG9rZW4AAAAAAAAAAAEAAAAAAAAAAAgGCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAACWtleVNXT1BpZAkAAlgAAAABBQAAAAZTV09QaWQFAAAAA25pbAAAAAFpAQAAABRpbml0UG9vbFNoYXJlTG9ja2luZwAAAAEAAAAEcG9vbAMJAQAAAAEhAAAAAQkBAAAAD2NvbnRhaW5zRWxlbWVudAAAAAIJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkxCQAETAAAAAIFAAAADGFkbWluUHViS2V5MgkABEwAAAACBQAAAAxhZG1pblB1YktleTMFAAAAA25pbAgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5CQAAAgAAAAECAAAAIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgQAAAALJHQwNjEzOTYyMTkJAQAAAApyZXdhcmRJbmZvAAAAAQUAAAAEcG9vbAQAAAANY3VycmVudFJld2FyZAgFAAAACyR0MDYxMzk2MjE5AAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA2MTM5NjIxOQAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDYxMzk2MjE5AAAAAl8zCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAOa2V5UG9vbEFkZHJlc3MFAAAABHBvb2wJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAUa2V5U2hhcmVUb2tlbnNMb2NrZWQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAQa2V5Q3VycmVudFJld2FyZAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAAA9rZXlMYXN0SW50ZXJlc3QAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAVa2V5UmV3YXJkVXBkYXRlSGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAARa2V5UHJldmlvdXNSZXdhcmQFAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sFAAAAA25pbAAAAAFpAQAAAA9sb2NrU2hhcmVUb2tlbnMAAAABAAAABHBvb2wEAAAACyR0MDY2Njk2NzQ0CQAFFAAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAQAAAAJcG10QW1vdW50CAUAAAALJHQwNjY2OTY3NDQAAAACXzEEAAAACnBtdEFzc2V0SWQIBQAAAAskdDA2NjY5Njc0NAAAAAJfMgMJAQAAAAEhAAAAAQkBAAAAFmNoZWNrUG10QXNzZXRJZENvcnJlY3QAAAACBQAAAARwb29sBQAAAApwbXRBc3NldElkCQAAAgAAAAECAAAAFEluY29ycmVjdCBwbXRBc3NldElkBAAAAAskdDA2ODM3NjkzNQkBAAAACUNsYWltQ2FsYwAAAAIFAAAABHBvb2wIBQAAAAFpAAAABmNhbGxlcgQAAAAPdXNlck5ld0ludGVyZXN0CAUAAAALJHQwNjgzNzY5MzUAAAACXzEEAAAAD2N1cnJlbnRJbnRlcmVzdAgFAAAACyR0MDY4Mzc2OTM1AAAAAl8yBAAAAAtjbGFpbUFtb3VudAgFAAAACyR0MDY4Mzc2OTM1AAAAAl8zBAAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQIBQAAAAskdDA2ODM3NjkzNQAAAAJfNAQAAAASdXNlclNoYXJlQW1vdW50TmV3CQAAZAAAAAIFAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAUAAAAJcG10QW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAATa2V5VXNlckxhc3RJbnRlcmVzdAUAAAAPdXNlck5ld0ludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkBQAAABJ1c2VyU2hhcmVBbW91bnROZXcJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADBQAAAARTV09QBQAAAAtjbGFpbUFtb3VudAYJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAtjbGFpbUFtb3VudAUAAAAEU1dPUAUAAAADbmlsAAAAAWkBAAAAE3dpdGhkcmF3U2hhcmVUb2tlbnMAAAACAAAABHBvb2wAAAAZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAQAAAALJHQwNzUxOTc2MTcJAQAAAAlDbGFpbUNhbGMAAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIEAAAAD3VzZXJOZXdJbnRlcmVzdAgFAAAACyR0MDc1MTk3NjE3AAAAAl8xBAAAAA9jdXJyZW50SW50ZXJlc3QIBQAAAAskdDA3NTE5NzYxNwAAAAJfMgQAAAALY2xhaW1BbW91bnQIBQAAAAskdDA3NTE5NzYxNwAAAAJfMwQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNzUxOTc2MTcAAAACXzQDCQAAZgAAAAIFAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQFAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAkAAAIAAAABAgAAACxXaXRoZHJhdyBhbW91bnQgbW9yZSB0aGVuIHVzZXIgbG9ja2VkIGFtb3VudAQAAAASdXNlclNoYXJlQW1vdW50TmV3CQAAZQAAAAIFAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAUAAAAZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAQAAAANc2hhcmVUb2tlbnNJZAkAAlkAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wCAAAADnNoYXJlX2Fzc2V0X2lkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAATa2V5VXNlckxhc3RJbnRlcmVzdAUAAAAPdXNlck5ld0ludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkBQAAABJ1c2VyU2hhcmVBbW91bnROZXcJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADBQAAAARTV09QBQAAAAtjbGFpbUFtb3VudAYJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAtjbGFpbUFtb3VudAUAAAAEU1dPUAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQFAAAADXNoYXJlVG9rZW5zSWQFAAAAA25pbAAAAAFpAQAAAAVjbGFpbQAAAAEAAAAEcG9vbAQAAAAQc2hhcmVUb2tlbkxvY2tlZAkBAAAAGGdldFRvdGFsU2hhdGVUb2tlbkxvY2tlZAAAAAEFAAAABHBvb2wEAAAACyR0MDg1MTc4NTgyCQEAAAATZ2V0TGFzdEludGVyZXN0SW5mbwAAAAEFAAAABHBvb2wEAAAAEmxhc3RJbnRlcmVzdEhlaWdodAgFAAAACyR0MDg1MTc4NTgyAAAAAl8xBAAAAAxsYXN0SW50ZXJlc3QIBQAAAAskdDA4NTE3ODU4MgAAAAJfMgQAAAALJHQwODU4Nzg2NzYJAQAAAApyZXdhcmRJbmZvAAAAAQUAAAAEcG9vbAQAAAAVY3VycmVudFJld2FyZFBlckJsb2NrCAUAAAALJHQwODU4Nzg2NzYAAAACXzEEAAAAEnJld2FyZFVwZGF0ZUhlaWdodAgFAAAACyR0MDg1ODc4Njc2AAAAAl8yBAAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCAUAAAALJHQwODU4Nzg2NzYAAAACXzMEAAAACyR0MDg2ODE4NzUwCQEAAAATZ2V0VXNlckludGVyZXN0SW5mbwAAAAIFAAAABHBvb2wIBQAAAAFpAAAABmNhbGxlcgQAAAAQdXNlckxhc3RJbnRlcmVzdAgFAAAACyR0MDg2ODE4NzUwAAAAAl8xBAAAAAl1c2VyU2hhcmUIBQAAAAskdDA4NjgxODc1MAAAAAJfMgQAAAAPY3VycmVudEludGVyZXN0CQEAAAAMY2FsY0ludGVyZXN0AAAABgUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQFAAAADGxhc3RJbnRlcmVzdAUAAAAVY3VycmVudFJld2FyZFBlckJsb2NrBQAAABBzaGFyZVRva2VuTG9ja2VkBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrBAAAAAtjbGFpbUFtb3VudAkAAGsAAAADBQAAAAl1c2VyU2hhcmUJAABlAAAAAgUAAAAPY3VycmVudEludGVyZXN0CQAAaAAAAAIFAAAAEHVzZXJMYXN0SW50ZXJlc3QFAAAABnNjYWxlOAUAAAAGc2NhbGU4BAAAAA91c2VyTmV3SW50ZXJlc3QFAAAAD2N1cnJlbnRJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8FAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADBQAAAARTV09QBQAAAAtjbGFpbUFtb3VudAYJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAtjbGFpbUFtb3VudAUAAAAEU1dPUAUAAAADbmlsAAAAAJ0+KZM=",
    "chainId": 84,
    "height": 1305578,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4Hk3tKT4cGkkRXmYszeqUNFvRYvQ67f54rx39U34b7RB
Next: 6KrbA9W32mHKaToRh8SgcSuYjzq5vayCeWxGyqLUnWmP

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

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

github/deemru/w8io/873ac7e 
44.42 ms ◑