w8 · tx · 2G5···Ug8

tx · 2G57SXTQSaois4J9hU1WHSBeephVKyFQThEBwZBBnUg8

3MyTUSFjgJWsmoQEBpeF3N1bmtdr2XMS1uU:  -0.01400000 Waves

2020.12.12 21:40 [1305821] smart account 3MyTUSFjgJWsmoQEBpeF3N1bmtdr2XMS1uU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2G57SXTQSaois4J9hU1WHSBeephVKyFQThEBwZBBnUg8",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1607798445179,
    "version": 1,
    "sender": "3MyTUSFjgJWsmoQEBpeF3N1bmtdr2XMS1uU",
    "senderPublicKey": "HNibf5h44NsszRrbctryRBWzFba3biyjEoufpZuraEha",
    "proofs": [
        "4F5SALQkmMaev1SyUX3ucogxmcAt4S3bFLpgebHWNxL3kiEEaiiJ59TZKm7ujBhQ7KJZYcyPbytDvkgF2GZSGir8"
    ],
    "script": "base64:AAIEAAAAAAAAABkIAhIAEgMKAQgSAwoBCBIECgIIARIDCgEIAAAAHQAAAAAMYWRtaW5QdWJLZXkxAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkyAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkzAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAUYWRtaW5QdWJLZXlTdGFydFN0b3ABAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABJhZG1pblB1YktleVN0YWtpbmcBAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAIAAAAaX3RvdGFsX3NoYXJlX3Rva2Vuc19sb2NrZWQAAAAAEGtleUN1cnJlbnRSZXdhcmQCAAAAD19jdXJyZW50X3Jld2FyZAAAAAAVa2V5UmV3YXJkVXBkYXRlSGVpZ2h0AgAAABVfcmV3YXJkX3VwZGF0ZV9oZWlnaHQAAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAABBfcHJldmlvdXNfcmV3YXJkAAAAAA9rZXlMYXN0SW50ZXJlc3QCAAAADl9sYXN0X2ludGVyZXN0AAAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQCAAAAFV9sYXN0X2ludGVyZXN0X2hlaWdodAAAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkAgAAABRfc2hhcmVfdG9rZW5zX2xvY2tlZAAAAAATa2V5VXNlckxhc3RJbnRlcmVzdAIAAAAOX2xhc3RfaW50ZXJlc3QAAAAACWtleVNXT1BpZAIAAAAHU1dPUF9pZAAAAAAOa2V5UG9vbEFkZHJlc3MCAAAACF9hZGRyZXNzAAAAAA12b3RpbmdBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUqCFRtE6TAyfLRDQEs9/d4tPkrAlzHIB1AAAAAARTV09QCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAACWtleVNXT1BpZAAAAAASaGVpZ2h0UmV3YXJkVXBkYXRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABRoZWlnaHRfcmV3YXJkX3VwZGF0ZQEAAAAOdGhyb3dPbmx5QWRtaW4AAAAACQAAAgAAAAECAAAAIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEAAAANdGhyb3dJc0FjdGl2ZQAAAAAJAAACAAAAAQIAAAAWREFwcCBpcyBhbHJlYWR5IGFjdGl2ZQEAAAAYZ2V0VG90YWxTaGFyZVRva2VuTG9ja2VkAAAAAQAAAARwb29sCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAARwb29sBQAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAEAAAAPZ2V0U2hhcmVBc3NldElkAAAAAQAAAARwb29sCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAAAV2YWx1ZQAAAAEJAAQmAAAAAQUAAAAEcG9vbAIAAAAOc2hhcmVfYXNzZXRfaWQBAAAADmNhbGNTY2FsZVZhbHVlAAAAAgAAAAhhc3NldElkMQAAAAhhc3NldElkMgQAAAAQYXNzZXRJZDFEZWNpbWFscwgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAAIYXNzZXRJZDEAAAAIZGVjaW1hbHMEAAAAEGFzc2V0SWQyRGVjaW1hbHMICQEAAAAFdmFsdWUAAAABCQAD7AAAAAEFAAAACGFzc2V0SWQyAAAACGRlY2ltYWxzBAAAAAtzY2xhZURpZ2l0cwkAAGQAAAACCQAAZQAAAAIFAAAAEGFzc2V0SWQyRGVjaW1hbHMFAAAAEGFzc2V0SWQxRGVjaW1hbHMAAAAAAAAAAAgJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAUAAAALc2NsYWVEaWdpdHMAAAAAAAAAAAAAAAAAAAAAAAAFAAAACEhBTEZET1dOAQAAAApyZXdhcmRJbmZvAAAAAQAAAARwb29sBAAAAA1jdXJyZW50UmV3YXJkCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAIAAAAMIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAADXZvdGluZ0FkZHJlc3MEAAAAFHJld2FyZFByZXZpb3VzQW1vdW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwkABRUAAAADBQAAAA1jdXJyZW50UmV3YXJkBQAAABJyZXdhcmRVcGRhdGVIZWlnaHQFAAAAFHJld2FyZFByZXZpb3VzQW1vdW50AQAAABNnZXRMYXN0SW50ZXJlc3RJbmZvAAAAAQAAAARwb29sBAAAAAxsYXN0SW50ZXJlc3QJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABRObyBkYXRhIG9uIHRoZSBrZXk6IAUAAAAEcG9vbAIAAAABXwUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BAAAABJsYXN0SW50ZXJlc3RIZWlnaHQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQJAAUUAAAAAgUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACAAAABHBvb2wAAAAKdXNlckFkZHJlcwQAAAAQdXNlckxhc3RJbnRlcmVzdAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QEAAAACXVzZXJTaGFyZQkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAQAAAAVdXNlckxhc3RJbnRlcmVzdFZhbHVlBAAAAAckbWF0Y2gwBQAAABB1c2VyTGFzdEludGVyZXN0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAEHVzZXJMYXN0SW50ZXJlc3QFAAAAByRtYXRjaDAFAAAAEHVzZXJMYXN0SW50ZXJlc3QAAAAAAAAAAAAEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAQAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAACXVzZXJTaGFyZQUAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAAAAAAAAAAAACQAFFAAAAAIFAAAAFXVzZXJMYXN0SW50ZXJlc3RWYWx1ZQUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50AQAAAAxjYWxjSW50ZXJlc3QAAAAIAAAAEmxhc3RJbnRlcmVzdEhlaWdodAAAABJyZXdhcmRVcGRhdGVIZWlnaHQAAAAMbGFzdEludGVyZXN0AAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawAAABBzaGFyZVRva2VuTG9ja2VkAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sAAAAMc2hhcmVBc3NldElkAAAACnNjYWxlVmFsdWUDCQAAZgAAAAIFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0AwkAAAAAAAACBQAAABBzaGFyZVRva2VuTG9ja2VkAAAAAAAAAAAAAAAAAAAAAAAABAAAAAZyZXdhcmQJAABoAAAAAgUAAAAVY3VycmVudFJld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAABmhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0CQAAZAAAAAIFAAAADGxhc3RJbnRlcmVzdAkAAGsAAAADBQAAAAZyZXdhcmQFAAAACnNjYWxlVmFsdWUFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAAKnJld2FyZEFmdGVyTGFzdEludGVyZXN0QmVmb3JlUmVhd2FyZFVwZGF0ZQkAAGgAAAACBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0BAAAABNpbnRlcmVzdEFmdGVyVXBkYXRlCQAAZAAAAAIFAAAADGxhc3RJbnRlcmVzdAkAAGsAAAADBQAAACpyZXdhcmRBZnRlckxhc3RJbnRlcmVzdEJlZm9yZVJlYXdhcmRVcGRhdGUFAAAACnNjYWxlVmFsdWUFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAABnJld2FyZAkAAGgAAAACBQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQJAABkAAAAAgUAAAATaW50ZXJlc3RBZnRlclVwZGF0ZQkAAGsAAAADBQAAAAZyZXdhcmQFAAAACnNjYWxlVmFsdWUFAAAAEHNoYXJlVG9rZW5Mb2NrZWQBAAAACUNsYWltQ2FsYwAAAAIAAAAEcG9vbAAAAAZjYWxsZXIEAAAADHNoYXJlQXNzZXRJZAkBAAAAD2dldFNoYXJlQXNzZXRJZAAAAAEFAAAABHBvb2wEAAAACnNjYWxlVmFsdWUJAQAAAA5jYWxjU2NhbGVWYWx1ZQAAAAIFAAAABFNXT1AFAAAADHNoYXJlQXNzZXRJZAQAAAAQc2hhcmVUb2tlbkxvY2tlZAkBAAAAGGdldFRvdGFsU2hhcmVUb2tlbkxvY2tlZAAAAAEFAAAABHBvb2wEAAAACyR0MDUyMDQ1MjY5CQEAAAATZ2V0TGFzdEludGVyZXN0SW5mbwAAAAEFAAAABHBvb2wEAAAAEmxhc3RJbnRlcmVzdEhlaWdodAgFAAAACyR0MDUyMDQ1MjY5AAAAAl8xBAAAAAxsYXN0SW50ZXJlc3QIBQAAAAskdDA1MjA0NTI2OQAAAAJfMgQAAAALJHQwNTI3NDUzNjIJAQAAAApyZXdhcmRJbmZvAAAAAQUAAAAEcG9vbAQAAAAVY3VycmVudFJld2FyZFBlckJsb2NrCAUAAAALJHQwNTI3NDUzNjIAAAACXzEEAAAAEnJld2FyZFVwZGF0ZUhlaWdodAgFAAAACyR0MDUyNzQ1MzYyAAAAAl8yBAAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCAUAAAALJHQwNTI3NDUzNjIAAAACXzMEAAAACyR0MDUzNjc1NDQ2CQEAAAATZ2V0VXNlckludGVyZXN0SW5mbwAAAAIFAAAABHBvb2wFAAAABmNhbGxlcgQAAAAQdXNlckxhc3RJbnRlcmVzdAgFAAAACyR0MDUzNjc1NDQ2AAAAAl8xBAAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQIBQAAAAskdDA1MzY3NTQ0NgAAAAJfMgQAAAAPY3VycmVudEludGVyZXN0CQEAAAAMY2FsY0ludGVyZXN0AAAACAUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQFAAAADGxhc3RJbnRlcmVzdAUAAAAVY3VycmVudFJld2FyZFBlckJsb2NrBQAAABBzaGFyZVRva2VuTG9ja2VkBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrBQAAAAxzaGFyZUFzc2V0SWQFAAAACnNjYWxlVmFsdWUEAAAAC2NsYWltQW1vdW50CQAAawAAAAMFAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAkAAGUAAAACBQAAAA9jdXJyZW50SW50ZXJlc3QFAAAAEHVzZXJMYXN0SW50ZXJlc3QFAAAACnNjYWxlVmFsdWUEAAAAD3VzZXJOZXdJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAFFgAAAAQFAAAAD3VzZXJOZXdJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0BQAAAAtjbGFpbUFtb3VudAUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50AQAAABZjaGVja1BtdEFzc2V0SWRDb3JyZWN0AAAAAgAAAARwb29sAAAACnBtdEFzc2V0SWQEAAAACnBvb2xBZGRyZXMJAQAAAAV2YWx1ZQAAAAEJAAQmAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAARwb29sBQAAAA5rZXlQb29sQWRkcmVzcwQAAAAQcG9vbFNoYXJlQXNzZXRJZAkAAlkAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAApwb29sQWRkcmVzAgAAAA5zaGFyZV9hc3NldF9pZAMJAAAAAAAAAgUAAAAKcG10QXNzZXRJZAUAAAAQcG9vbFNoYXJlQXNzZXRJZAYHAAAABQAAAAFpAQAAAARpbml0AAAAAAMJAQAAAAEhAAAAAQkBAAAAD2NvbnRhaW5zRWxlbWVudAAAAAIJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkxCQAETAAAAAIFAAAADGFkbWluUHViS2V5MgkABEwAAAACBQAAAAxhZG1pblB1YktleTMFAAAAA25pbAgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5CQAAAgAAAAECAAAAIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgQAAAAJU1dPUGlzc3VlCQAEQgAAAAUCAAAABFNXT1ACAAAAE1NXT1AgcHJvdG9jb2wgdG9rZW4AAAAAAAAAAAEAAAAAAAAAAAgGBAAAAAZTV09QaWQJAAQ4AAAAAQUAAAAJU1dPUGlzc3VlCQAETAAAAAIJAARCAAAABQIAAAAEU1dPUAIAAAATU1dPUCBwcm90b2NvbCB0b2tlbgAAAAAAAAAAAQAAAAAAAAAACAYJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAJa2V5U1dPUGlkCQACWAAAAAEFAAAABlNXT1BpZAUAAAADbmlsAAAAAWkBAAAAFGluaXRQb29sU2hhcmVMb2NraW5nAAAAAQAAAARwb29sAwkBAAAAASEAAAABCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgkABEwAAAACBQAAAAxhZG1pblB1YktleTEJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkyCQAETAAAAAIFAAAADGFkbWluUHViS2V5MwUAAAADbmlsCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBAAAAAskdDA2ODA5Njg4OQkBAAAACnJld2FyZEluZm8AAAABBQAAAARwb29sBAAAAA1jdXJyZW50UmV3YXJkCAUAAAALJHQwNjgwOTY4ODkAAAACXzEEAAAAEnJld2FyZFVwZGF0ZUhlaWdodAgFAAAACyR0MDY4MDk2ODg5AAAAAl8yBAAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCAUAAAALJHQwNjgwOTY4ODkAAAACXzMJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAAA5rZXlQb29sQWRkcmVzcwUAAAAEcG9vbAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAABFrZXlQcmV2aW91c1Jld2FyZAUAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawUAAAADbmlsAAAAAWkBAAAAD2xvY2tTaGFyZVRva2VucwAAAAEAAAAEcG9vbAQAAAALJHQwNzMzOTc0MTQJAAUUAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkBAAAAAlwbXRBbW91bnQIBQAAAAskdDA3MzM5NzQxNAAAAAJfMQQAAAAKcG10QXNzZXRJZAgFAAAACyR0MDczMzk3NDE0AAAAAl8yAwkBAAAAASEAAAABCQEAAAAWY2hlY2tQbXRBc3NldElkQ29ycmVjdAAAAAIFAAAABHBvb2wFAAAACnBtdEFzc2V0SWQJAAACAAAAAQIAAAAUSW5jb3JyZWN0IHBtdEFzc2V0SWQEAAAACyR0MDc1MDc3NjA1CQEAAAAJQ2xhaW1DYWxjAAAAAgUAAAAEcG9vbAgFAAAAAWkAAAAGY2FsbGVyBAAAAA91c2VyTmV3SW50ZXJlc3QIBQAAAAskdDA3NTA3NzYwNQAAAAJfMQQAAAAPY3VycmVudEludGVyZXN0CAUAAAALJHQwNzUwNzc2MDUAAAACXzIEAAAAC2NsYWltQW1vdW50CAUAAAALJHQwNzUwNzc2MDUAAAACXzMEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAACyR0MDc1MDc3NjA1AAAAAl80BAAAABJ1c2VyU2hhcmVBbW91bnROZXcJAABkAAAAAgUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50BQAAAAlwbXRBbW91bnQEAAAAEHRvdGFsU2hhcmVBbW91bnQJAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAABN0b3RhbFNoYXJlQW1vdW50TmV3CQAAZAAAAAIFAAAAEHRvdGFsU2hhcmVBbW91bnQFAAAACXBtdEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAUAAAASdXNlclNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkBQAAABN0b3RhbFNoYXJlQW1vdW50TmV3BQAAAANuaWwAAAABaQEAAAATd2l0aGRyYXdTaGFyZVRva2VucwAAAAIAAAAEcG9vbAAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BAAAAAskdDA4MzgxODQ3OQkBAAAACUNsYWltQ2FsYwAAAAIFAAAABHBvb2wIBQAAAAFpAAAABmNhbGxlcgQAAAAPdXNlck5ld0ludGVyZXN0CAUAAAALJHQwODM4MTg0NzkAAAACXzEEAAAAD2N1cnJlbnRJbnRlcmVzdAgFAAAACyR0MDgzODE4NDc5AAAAAl8yBAAAAAtjbGFpbUFtb3VudAgFAAAACyR0MDgzODE4NDc5AAAAAl8zBAAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQIBQAAAAskdDA4MzgxODQ3OQAAAAJfNAMJAABmAAAAAgUAAAAZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CQAAAgAAAAECAAAALFdpdGhkcmF3IGFtb3VudCBtb3JlIHRoZW4gdXNlciBsb2NrZWQgYW1vdW50BAAAABJ1c2VyU2hhcmVBbW91bnROZXcJAABlAAAAAgUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50BQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BAAAAA1zaGFyZVRva2Vuc0lkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAAAV2YWx1ZQAAAAEJAAQmAAAAAQUAAAAEcG9vbAkAASwAAAACBQAAAARwb29sAgAAAA5zaGFyZV9hc3NldF9pZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAUAAAASdXNlclNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAEU1dPUAUAAAALY2xhaW1BbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQFAAAABFNXT1AJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAAA1zaGFyZVRva2Vuc0lkBQAAAANuaWwAAAABaQEAAAAFY2xhaW0AAAABAAAABHBvb2wEAAAAEHNoYXJlVG9rZW5Mb2NrZWQJAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAAAskdDA5NDEyOTQ3NwkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAAskdDA5NDEyOTQ3NwAAAAJfMQQAAAAMbGFzdEludGVyZXN0CAUAAAALJHQwOTQxMjk0NzcAAAACXzIEAAAACyR0MDk0ODI5NjQ2CQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAACyR0MDk0ODI5NjQ2AAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA5NDgyOTY0NgAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDk0ODI5NjQ2AAAAAl8zBAAAAAwkdDA5NjUxMTAwNTcJAQAAAAlDbGFpbUNhbGMAAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIEAAAAD3VzZXJOZXdJbnRlcmVzdAgFAAAADCR0MDk2NTExMDA1NwAAAAJfMQQAAAAPY3VycmVudEludGVyZXN0CAUAAAAMJHQwOTY1MTEwMDU3AAAAAl8yBAAAAAtjbGFpbUFtb3VudAgFAAAADCR0MDk2NTExMDA1NwAAAAJfMwQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAAMJHQwOTY1MTEwMDU3AAAAAl80CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAATa2V5VXNlckxhc3RJbnRlcmVzdAUAAAAPdXNlck5ld0ludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwUAAAAPa2V5TGFzdEludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQFAAAABmhlaWdodAkABEwAAAACCQEAAAAHUmVpc3N1ZQAAAAMFAAAABFNXT1AFAAAAC2NsYWltQW1vdW50BgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAC2NsYWltQW1vdW50BQAAAARTV09QBQAAAANuaWwAAAAA6s2Ajg==",
    "chainId": 84,
    "height": 1305821,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Dknit9HQSbErXG3NBb3Cqm7bEH9h7wfHZX3Mibdinsdb
Next: 4cZ9E5Chnc1WFouGZzhwTRJqb9CJbJVtq3wqhm5dUTn3

Diff: 
Old New Differences
193 193          then throw("Withdraw amount more then user locked amount")
194 194          else {
195 195              let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
196 -             let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
197 -             if (true)
198 -                 then throw((pool + "share_asset_id"))
199 -                 else [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)]
196 +             let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), (pool + "share_asset_id")))
197 + [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)]
200 198              }
201 199      }
202 200  
205 203  @Callable(i)
206 204  func claim (pool) = {
207 205      let shareTokenLocked = getTotalShareTokenLocked(pool)
208 -     let $t094379502 = getLastInterestInfo(pool)
209 -     let lastInterestHeight = $t094379502._1
210 -     let lastInterest = $t094379502._2
211 -     let $t095079671 = rewardInfo(pool)
212 -     let currentRewardPerBlock = $t095079671._1
213 -     let rewardUpdateHeight = $t095079671._2
214 -     let previousRewardPerBlock = $t095079671._3
215 -     let $t0967610082 = ClaimCalc(pool, i.caller)
216 -     let userNewInterest = $t0967610082._1
217 -     let currentInterest = $t0967610082._2
218 -     let claimAmount = $t0967610082._3
219 -     let userShareTokensAmount = $t0967610082._4
206 +     let $t094129477 = getLastInterestInfo(pool)
207 +     let lastInterestHeight = $t094129477._1
208 +     let lastInterest = $t094129477._2
209 +     let $t094829646 = rewardInfo(pool)
210 +     let currentRewardPerBlock = $t094829646._1
211 +     let rewardUpdateHeight = $t094829646._2
212 +     let previousRewardPerBlock = $t094829646._3
213 +     let $t0965110057 = ClaimCalc(pool, i.caller)
214 +     let userNewInterest = $t0965110057._1
215 +     let currentInterest = $t0965110057._2
216 +     let claimAmount = $t0965110057._3
217 +     let userShareTokensAmount = $t0965110057._4
220 218  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
221 219      }
222 220  
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 heightRewardUpdate = getIntegerValue(this, "height_reward_update")
39 39  
40 40  func throwOnlyAdmin () = throw("Only admin can call this function")
41 41  
42 42  
43 43  func throwIsActive () = throw("DApp is already active")
44 44  
45 45  
46 46  func getTotalShareTokenLocked (pool) = valueOrErrorMessage(getInteger(this, (pool + keyShareTokensLocked)), (("No data on the key: " + pool) + keyShareTokensLocked))
47 47  
48 48  
49 49  func getShareAssetId (pool) = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
50 50  
51 51  
52 52  func calcScaleValue (assetId1,assetId2) = {
53 53      let assetId1Decimals = value(assetInfo(assetId1)).decimals
54 54      let assetId2Decimals = value(assetInfo(assetId2)).decimals
55 55      let sclaeDigits = ((assetId2Decimals - assetId1Decimals) + 8)
56 56      pow(10, 0, sclaeDigits, 0, 0, HALFDOWN)
57 57      }
58 58  
59 59  
60 60  func rewardInfo (pool) = {
61 61      let currentReward = valueOrErrorMessage(getInteger(votingAddress, (pool + keyCurrentReward)), (((("No data on the key: " + pool) + keyCurrentReward) + " at address ") + toString(votingAddress)))
62 62      let rewardUpdateHeight = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyRewardUpdateHeight) + " at address ") + toString(votingAddress)))
63 63      let rewardPreviousAmount = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyPreviousReward) + " at address ") + toString(votingAddress)))
64 64      $Tuple3(currentReward, rewardUpdateHeight, rewardPreviousAmount)
65 65      }
66 66  
67 67  
68 68  func getLastInterestInfo (pool) = {
69 69      let lastInterest = valueOrErrorMessage(getInteger(this, (pool + keyLastInterest)), (((("No data on the key: " + pool) + "_") + pool) + keyLastInterest))
70 70      let lastInterestHeight = valueOrErrorMessage(getInteger(this, (pool + keyLastInterestHeight)), (("No data on the key: " + pool) + keyLastInterestHeight))
71 71      $Tuple2(lastInterestHeight, lastInterest)
72 72      }
73 73  
74 74  
75 75  func getUserInterestInfo (pool,userAddres) = {
76 76      let userLastInterest = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserLastInterest))
77 77      let userShare = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserShareTokensLocked))
78 78      let userLastInterestValue =     match userLastInterest {
79 79          case userLastInterest: Int => 
80 80              userLastInterest
81 81          case _ => 
82 82              0
83 83      }
84 84      let userShareTokensAmount =     match userShare {
85 85          case userShare: Int => 
86 86              userShare
87 87          case _ => 
88 88              0
89 89      }
90 90      $Tuple2(userLastInterestValue, userShareTokensAmount)
91 91      }
92 92  
93 93  
94 94  func calcInterest (lastInterestHeight,rewardUpdateHeight,lastInterest,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,shareAssetId,scaleValue) = if ((lastInterestHeight > rewardUpdateHeight))
95 95      then if ((shareTokenLocked == 0))
96 96          then 0
97 97          else {
98 98              let reward = (currentRewardPerBlock * (height - lastInterestHeight))
99 99              (lastInterest + fraction(reward, scaleValue, shareTokenLocked))
100 100              }
101 101      else {
102 102          let rewardAfterLastInterestBeforeReawardUpdate = (previousRewardPerBlock * (rewardUpdateHeight - lastInterestHeight))
103 103          let interestAfterUpdate = (lastInterest + fraction(rewardAfterLastInterestBeforeReawardUpdate, scaleValue, shareTokenLocked))
104 104          let reward = (currentRewardPerBlock * (height - rewardUpdateHeight))
105 105          (interestAfterUpdate + fraction(reward, scaleValue, shareTokenLocked))
106 106          }
107 107  
108 108  
109 109  func ClaimCalc (pool,caller) = {
110 110      let shareAssetId = getShareAssetId(pool)
111 111      let scaleValue = calcScaleValue(SWOP, shareAssetId)
112 112      let shareTokenLocked = getTotalShareTokenLocked(pool)
113 113      let $t052045269 = getLastInterestInfo(pool)
114 114      let lastInterestHeight = $t052045269._1
115 115      let lastInterest = $t052045269._2
116 116      let $t052745362 = rewardInfo(pool)
117 117      let currentRewardPerBlock = $t052745362._1
118 118      let rewardUpdateHeight = $t052745362._2
119 119      let previousRewardPerBlock = $t052745362._3
120 120      let $t053675446 = getUserInterestInfo(pool, caller)
121 121      let userLastInterest = $t053675446._1
122 122      let userShareTokensAmount = $t053675446._2
123 123      let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock, shareAssetId, scaleValue)
124 124      let claimAmount = fraction(userShareTokensAmount, (currentInterest - userLastInterest), scaleValue)
125 125      let userNewInterest = currentInterest
126 126      $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
127 127      }
128 128  
129 129  
130 130  func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
131 131      let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
132 132      let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
133 133      if ((pmtAssetId == poolShareAssetId))
134 134          then true
135 135          else false
136 136      }
137 137  
138 138  
139 139  @Callable(i)
140 140  func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
141 141      then throw("Only admin can call this function")
142 142      else {
143 143          let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
144 144          let SWOPid = calculateAssetId(SWOPissue)
145 145  [Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
146 146          }
147 147  
148 148  
149 149  
150 150  @Callable(i)
151 151  func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
152 152      then throw("Only admin can call this function")
153 153      else {
154 154          let $t068096889 = rewardInfo(pool)
155 155          let currentReward = $t068096889._1
156 156          let rewardUpdateHeight = $t068096889._2
157 157          let previousRewardPerBlock = $t068096889._3
158 158  [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)]
159 159          }
160 160  
161 161  
162 162  
163 163  @Callable(i)
164 164  func lockShareTokens (pool) = {
165 165      let $t073397414 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
166 166      let pmtAmount = $t073397414._1
167 167      let pmtAssetId = $t073397414._2
168 168      if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
169 169          then throw("Incorrect pmtAssetId")
170 170          else {
171 171              let $t075077605 = ClaimCalc(pool, i.caller)
172 172              let userNewInterest = $t075077605._1
173 173              let currentInterest = $t075077605._2
174 174              let claimAmount = $t075077605._3
175 175              let userShareTokensAmount = $t075077605._4
176 176              let userShareAmountNew = (userShareTokensAmount + pmtAmount)
177 177              let totalShareAmount = getTotalShareTokenLocked(pool)
178 178              let totalShareAmountNew = (totalShareAmount + pmtAmount)
179 179  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserShareTokensLocked), userShareAmountNew), IntegerEntry((pool + keyLastInterest), currentInterest), IntegerEntry((pool + keyLastInterestHeight), height), IntegerEntry((pool + keyShareTokensLocked), totalShareAmountNew)]
180 180              }
181 181      }
182 182  
183 183  
184 184  
185 185  @Callable(i)
186 186  func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
187 187      let $t083818479 = ClaimCalc(pool, i.caller)
188 188      let userNewInterest = $t083818479._1
189 189      let currentInterest = $t083818479._2
190 190      let claimAmount = $t083818479._3
191 191      let userShareTokensAmount = $t083818479._4
192 192      if ((shareTokensWithdrawAmount > userShareTokensAmount))
193 193          then throw("Withdraw amount more then user locked amount")
194 194          else {
195 195              let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
196 -             let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
197 -             if (true)
198 -                 then throw((pool + "share_asset_id"))
199 -                 else [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)]
196 +             let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), (pool + "share_asset_id")))
197 + [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)]
200 198              }
201 199      }
202 200  
203 201  
204 202  
205 203  @Callable(i)
206 204  func claim (pool) = {
207 205      let shareTokenLocked = getTotalShareTokenLocked(pool)
208 -     let $t094379502 = getLastInterestInfo(pool)
209 -     let lastInterestHeight = $t094379502._1
210 -     let lastInterest = $t094379502._2
211 -     let $t095079671 = rewardInfo(pool)
212 -     let currentRewardPerBlock = $t095079671._1
213 -     let rewardUpdateHeight = $t095079671._2
214 -     let previousRewardPerBlock = $t095079671._3
215 -     let $t0967610082 = ClaimCalc(pool, i.caller)
216 -     let userNewInterest = $t0967610082._1
217 -     let currentInterest = $t0967610082._2
218 -     let claimAmount = $t0967610082._3
219 -     let userShareTokensAmount = $t0967610082._4
206 +     let $t094129477 = getLastInterestInfo(pool)
207 +     let lastInterestHeight = $t094129477._1
208 +     let lastInterest = $t094129477._2
209 +     let $t094829646 = rewardInfo(pool)
210 +     let currentRewardPerBlock = $t094829646._1
211 +     let rewardUpdateHeight = $t094829646._2
212 +     let previousRewardPerBlock = $t094829646._3
213 +     let $t0965110057 = ClaimCalc(pool, i.caller)
214 +     let userNewInterest = $t0965110057._1
215 +     let currentInterest = $t0965110057._2
216 +     let claimAmount = $t0965110057._3
217 +     let userShareTokensAmount = $t0965110057._4
220 218  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
221 219      }
222 220  
223 221

Old	New		Differences
193	193		then throw("Withdraw amount more then user locked amount")
194	194		else {
195	195		let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
196		-	let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
197		-	if (true)
198		-	then throw((pool + "share_asset_id"))
199		-	else [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)]
	196	+	let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), (pool + "share_asset_id")))
	197	+	[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)]
200	198		}
201	199		}
202	200

205	203		@Callable(i)
206	204		func claim (pool) = {
207	205		let shareTokenLocked = getTotalShareTokenLocked(pool)
208		-	let $~~t094379502~~ = getLastInterestInfo(pool)
209		-	let lastInterestHeight = $~~t094379502~~._1
210		-	let lastInterest = $~~t094379502~~._2
211		-	let $~~t095079671~~ = rewardInfo(pool)
212		-	let currentRewardPerBlock = $~~t095079671~~._1
213		-	let rewardUpdateHeight = $~~t095079671~~._2
214		-	let previousRewardPerBlock = $~~t095079671~~._3
215		-	let $~~t0967610082~~ = ClaimCalc(pool, i.caller)
216		-	let userNewInterest = $~~t0967610082~~._1
217		-	let currentInterest = $~~t0967610082~~._2
218		-	let claimAmount = $~~t0967610082~~._3
219		-	let userShareTokensAmount = $~~t0967610082~~._4
	206	+	let $t094129477 = getLastInterestInfo(pool)
	207	+	let lastInterestHeight = $t094129477._1
	208	+	let lastInterest = $t094129477._2
	209	+	let $t094829646 = rewardInfo(pool)
	210	+	let currentRewardPerBlock = $t094829646._1
	211	+	let rewardUpdateHeight = $t094829646._2
	212	+	let previousRewardPerBlock = $t094829646._3
	213	+	let $t0965110057 = ClaimCalc(pool, i.caller)
	214	+	let userNewInterest = $t0965110057._1
	215	+	let currentInterest = $t0965110057._2
	216	+	let claimAmount = $t0965110057._3
	217	+	let userShareTokensAmount = $t0965110057._4
220	218		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
221	219		}
222	220

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 heightRewardUpdate = getIntegerValue(this, "height_reward_update")
39	39
40	40		func throwOnlyAdmin () = throw("Only admin can call this function")
41	41
42	42
43	43		func throwIsActive () = throw("DApp is already active")
44	44
45	45
46	46		func getTotalShareTokenLocked (pool) = valueOrErrorMessage(getInteger(this, (pool + keyShareTokensLocked)), (("No data on the key: " + pool) + keyShareTokensLocked))
47	47
48	48
49	49		func getShareAssetId (pool) = fromBase58String(getStringValue(value(addressFromString(pool)), "share_asset_id"))
50	50
51	51
52	52		func calcScaleValue (assetId1,assetId2) = {
53	53		let assetId1Decimals = value(assetInfo(assetId1)).decimals
54	54		let assetId2Decimals = value(assetInfo(assetId2)).decimals
55	55		let sclaeDigits = ((assetId2Decimals - assetId1Decimals) + 8)
56	56		pow(10, 0, sclaeDigits, 0, 0, HALFDOWN)
57	57		}
58	58
59	59
60	60		func rewardInfo (pool) = {
61	61		let currentReward = valueOrErrorMessage(getInteger(votingAddress, (pool + keyCurrentReward)), (((("No data on the key: " + pool) + keyCurrentReward) + " at address ") + toString(votingAddress)))
62	62		let rewardUpdateHeight = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyRewardUpdateHeight) + " at address ") + toString(votingAddress)))
63	63		let rewardPreviousAmount = valueOrErrorMessage(getInteger(votingAddress, (pool + keyRewardUpdateHeight)), (((("No data on the key: " + pool) + keyPreviousReward) + " at address ") + toString(votingAddress)))
64	64		$Tuple3(currentReward, rewardUpdateHeight, rewardPreviousAmount)
65	65		}
66	66
67	67
68	68		func getLastInterestInfo (pool) = {
69	69		let lastInterest = valueOrErrorMessage(getInteger(this, (pool + keyLastInterest)), (((("No data on the key: " + pool) + "_") + pool) + keyLastInterest))
70	70		let lastInterestHeight = valueOrErrorMessage(getInteger(this, (pool + keyLastInterestHeight)), (("No data on the key: " + pool) + keyLastInterestHeight))
71	71		$Tuple2(lastInterestHeight, lastInterest)
72	72		}
73	73
74	74
75	75		func getUserInterestInfo (pool,userAddres) = {
76	76		let userLastInterest = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserLastInterest))
77	77		let userShare = getInteger(this, (((pool + "_") + toString(userAddres)) + keyUserShareTokensLocked))
78	78		let userLastInterestValue = match userLastInterest {
79	79		case userLastInterest: Int =>
80	80		userLastInterest
81	81		case _ =>
82	82		0
83	83		}
84	84		let userShareTokensAmount = match userShare {
85	85		case userShare: Int =>
86	86		userShare
87	87		case _ =>
88	88		0
89	89		}
90	90		$Tuple2(userLastInterestValue, userShareTokensAmount)
91	91		}
92	92
93	93
94	94		func calcInterest (lastInterestHeight,rewardUpdateHeight,lastInterest,currentRewardPerBlock,shareTokenLocked,previousRewardPerBlock,shareAssetId,scaleValue) = if ((lastInterestHeight > rewardUpdateHeight))
95	95		then if ((shareTokenLocked == 0))
96	96		then 0
97	97		else {
98	98		let reward = (currentRewardPerBlock * (height - lastInterestHeight))
99	99		(lastInterest + fraction(reward, scaleValue, shareTokenLocked))
100	100		}
101	101		else {
102	102		let rewardAfterLastInterestBeforeReawardUpdate = (previousRewardPerBlock * (rewardUpdateHeight - lastInterestHeight))
103	103		let interestAfterUpdate = (lastInterest + fraction(rewardAfterLastInterestBeforeReawardUpdate, scaleValue, shareTokenLocked))
104	104		let reward = (currentRewardPerBlock * (height - rewardUpdateHeight))
105	105		(interestAfterUpdate + fraction(reward, scaleValue, shareTokenLocked))
106	106		}
107	107
108	108
109	109		func ClaimCalc (pool,caller) = {
110	110		let shareAssetId = getShareAssetId(pool)
111	111		let scaleValue = calcScaleValue(SWOP, shareAssetId)
112	112		let shareTokenLocked = getTotalShareTokenLocked(pool)
113	113		let $t052045269 = getLastInterestInfo(pool)
114	114		let lastInterestHeight = $t052045269._1
115	115		let lastInterest = $t052045269._2
116	116		let $t052745362 = rewardInfo(pool)
117	117		let currentRewardPerBlock = $t052745362._1
118	118		let rewardUpdateHeight = $t052745362._2
119	119		let previousRewardPerBlock = $t052745362._3
120	120		let $t053675446 = getUserInterestInfo(pool, caller)
121	121		let userLastInterest = $t053675446._1
122	122		let userShareTokensAmount = $t053675446._2
123	123		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock, shareAssetId, scaleValue)
124	124		let claimAmount = fraction(userShareTokensAmount, (currentInterest - userLastInterest), scaleValue)
125	125		let userNewInterest = currentInterest
126	126		$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
127	127		}
128	128
129	129
130	130		func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
131	131		let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
132	132		let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
133	133		if ((pmtAssetId == poolShareAssetId))
134	134		then true
135	135		else false
136	136		}
137	137
138	138
139	139		@Callable(i)
140	140		func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
141	141		then throw("Only admin can call this function")
142	142		else {
143	143		let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
144	144		let SWOPid = calculateAssetId(SWOPissue)
145	145		[Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
146	146		}
147	147
148	148
149	149
150	150		@Callable(i)
151	151		func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
152	152		then throw("Only admin can call this function")
153	153		else {
154	154		let $t068096889 = rewardInfo(pool)
155	155		let currentReward = $t068096889._1
156	156		let rewardUpdateHeight = $t068096889._2
157	157		let previousRewardPerBlock = $t068096889._3
158	158		[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)]
159	159		}
160	160
161	161
162	162
163	163		@Callable(i)
164	164		func lockShareTokens (pool) = {
165	165		let $t073397414 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
166	166		let pmtAmount = $t073397414._1
167	167		let pmtAssetId = $t073397414._2
168	168		if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
169	169		then throw("Incorrect pmtAssetId")
170	170		else {
171	171		let $t075077605 = ClaimCalc(pool, i.caller)
172	172		let userNewInterest = $t075077605._1
173	173		let currentInterest = $t075077605._2
174	174		let claimAmount = $t075077605._3
175	175		let userShareTokensAmount = $t075077605._4
176	176		let userShareAmountNew = (userShareTokensAmount + pmtAmount)
177	177		let totalShareAmount = getTotalShareTokenLocked(pool)
178	178		let totalShareAmountNew = (totalShareAmount + pmtAmount)
179	179		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserShareTokensLocked), userShareAmountNew), IntegerEntry((pool + keyLastInterest), currentInterest), IntegerEntry((pool + keyLastInterestHeight), height), IntegerEntry((pool + keyShareTokensLocked), totalShareAmountNew)]
180	180		}
181	181		}
182	182
183	183
184	184
185	185		@Callable(i)
186	186		func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
187	187		let $t083818479 = ClaimCalc(pool, i.caller)
188	188		let userNewInterest = $t083818479._1
189	189		let currentInterest = $t083818479._2
190	190		let claimAmount = $t083818479._3
191	191		let userShareTokensAmount = $t083818479._4
192	192		if ((shareTokensWithdrawAmount > userShareTokensAmount))
193	193		then throw("Withdraw amount more then user locked amount")
194	194		else {
195	195		let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
196		-	let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
197		-	if (true)
198		-	then throw((pool + "share_asset_id"))
199		-	else [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)]
	196	+	let shareTokensId = fromBase58String(getStringValue(value(addressFromString(pool)), (pool + "share_asset_id")))
	197	+	[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)]
200	198		}
201	199		}
202	200
203	201
204	202
205	203		@Callable(i)
206	204		func claim (pool) = {
207	205		let shareTokenLocked = getTotalShareTokenLocked(pool)
208		-	let $~~t094379502~~ = getLastInterestInfo(pool)
209		-	let lastInterestHeight = $~~t094379502~~._1
210		-	let lastInterest = $~~t094379502~~._2
211		-	let $~~t095079671~~ = rewardInfo(pool)
212		-	let currentRewardPerBlock = $~~t095079671~~._1
213		-	let rewardUpdateHeight = $~~t095079671~~._2
214		-	let previousRewardPerBlock = $~~t095079671~~._3
215		-	let $~~t0967610082~~ = ClaimCalc(pool, i.caller)
216		-	let userNewInterest = $~~t0967610082~~._1
217		-	let currentInterest = $~~t0967610082~~._2
218		-	let claimAmount = $~~t0967610082~~._3
219		-	let userShareTokensAmount = $~~t0967610082~~._4
	206	+	let $t094129477 = getLastInterestInfo(pool)
	207	+	let lastInterestHeight = $t094129477._1
	208	+	let lastInterest = $t094129477._2
	209	+	let $t094829646 = rewardInfo(pool)
	210	+	let currentRewardPerBlock = $t094829646._1
	211	+	let rewardUpdateHeight = $t094829646._2
	212	+	let previousRewardPerBlock = $t094829646._3
	213	+	let $t0965110057 = ClaimCalc(pool, i.caller)
	214	+	let userNewInterest = $t0965110057._1
	215	+	let currentInterest = $t0965110057._2
	216	+	let claimAmount = $t0965110057._3
	217	+	let userShareTokensAmount = $t0965110057._4
220	218		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
221	219		}
222	220
223	221

github/deemru/w8io/169f3d6 
103.22 ms ◑