w8 · tx · 6bX···bEM

tx · 6bX1SqJdoykj1Viwmbr4nAu3QB9t4d1B6u8D4fQsnbEM

3MyTUSFjgJWsmoQEBpeF3N1bmtdr2XMS1uU:  -0.01400000 Waves

2020.12.12 20:11 [1305727] smart account 3MyTUSFjgJWsmoQEBpeF3N1bmtdr2XMS1uU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6bX1SqJdoykj1Viwmbr4nAu3QB9t4d1B6u8D4fQsnbEM",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1607793108211,
    "version": 1,
    "sender": "3MyTUSFjgJWsmoQEBpeF3N1bmtdr2XMS1uU",
    "senderPublicKey": "HNibf5h44NsszRrbctryRBWzFba3biyjEoufpZuraEha",
    "proofs": [
        "23iaGpXaPatXJEBikz3iWys5ku1bdtY6J7AZb7fJ3KU9kHi7kS3UgpfPcaSdexpdzkKzDjaoGcp8dLb5UTn1S1v3"
    ],
    "script": "base64:AAIEAAAAAAAAABkIAhIAEgMKAQgSAwoBCBIECgIIARIDCgEIAAAAHQAAAAAMYWRtaW5QdWJLZXkxAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkyAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAMYWRtaW5QdWJLZXkzAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAUYWRtaW5QdWJLZXlTdGFydFN0b3ABAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABJhZG1pblB1YktleVN0YWtpbmcBAAAAIBCw4urkIHVb2qNxBs9qTjp1syq7kXV66XeA6G21smcfAAAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAIAAAAaX3RvdGFsX3NoYXJlX3Rva2Vuc19sb2NrZWQAAAAAEGtleUN1cnJlbnRSZXdhcmQCAAAAD19jdXJyZW50X3Jld2FyZAAAAAAVa2V5UmV3YXJkVXBkYXRlSGVpZ2h0AgAAABVfcmV3YXJkX3VwZGF0ZV9oZWlnaHQAAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAABBfcHJldmlvdXNfcmV3YXJkAAAAAA9rZXlMYXN0SW50ZXJlc3QCAAAADl9sYXN0X2ludGVyZXN0AAAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQCAAAAFV9sYXN0X2ludGVyZXN0X2hlaWdodAAAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkAgAAABRfc2hhcmVfdG9rZW5zX2xvY2tlZAAAAAATa2V5VXNlckxhc3RJbnRlcmVzdAIAAAAOX2xhc3RfaW50ZXJlc3QAAAAACWtleVNXT1BpZAIAAAAHU1dPUF9pZAAAAAAOa2V5UG9vbEFkZHJlc3MCAAAACF9hZGRyZXNzAAAAAA12b3RpbmdBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUqCFRtE6TAyfLRDQEs9/d4tPkrAlzHIB1AAAAAARTV09QCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAACWtleVNXT1BpZAAAAAASaGVpZ2h0UmV3YXJkVXBkYXRlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABRoZWlnaHRfcmV3YXJkX3VwZGF0ZQEAAAAOdGhyb3dPbmx5QWRtaW4AAAAACQAAAgAAAAECAAAAIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEAAAANdGhyb3dJc0FjdGl2ZQAAAAAJAAACAAAAAQIAAAAWREFwcCBpcyBhbHJlYWR5IGFjdGl2ZQEAAAAYZ2V0VG90YWxTaGFyZVRva2VuTG9ja2VkAAAAAQAAAARwb29sCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAARwb29sBQAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABRrZXlTaGFyZVRva2Vuc0xvY2tlZAEAAAAPZ2V0U2hhcmVBc3NldElkAAAAAQAAAARwb29sCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAEcG9vbAIAAAAOc2hhcmVfYXNzZXRfaWQBAAAADmNhbGNTY2FsZVZhbHVlAAAAAgAAAAhhc3NldElkMQAAAAhhc3NldElkMgQAAAAQYXNzZXRJZDFEZWNpbWFscwgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAAIYXNzZXRJZDEAAAAIZGVjaW1hbHMEAAAAEGFzc2V0SWQyRGVjaW1hbHMICQEAAAAFdmFsdWUAAAABCQAD7AAAAAEFAAAACGFzc2V0SWQyAAAACGRlY2ltYWxzBAAAAAtzY2xhZURpZ2l0cwkAAGQAAAACCQAAZQAAAAIFAAAAEGFzc2V0SWQyRGVjaW1hbHMFAAAAEGFzc2V0SWQxRGVjaW1hbHMAAAAAAAAAAAgJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAUAAAALc2NsYWVEaWdpdHMAAAAAAAAAAAAAAAAAAAAAAAAFAAAACEhBTEZET1dOAQAAAApyZXdhcmRJbmZvAAAAAQAAAARwb29sBAAAAA1jdXJyZW50UmV3YXJkCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABBrZXlDdXJyZW50UmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAIAAAAMIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAADXZvdGluZ0FkZHJlc3MEAAAAFHJld2FyZFByZXZpb3VzQW1vdW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAANdm90aW5nQWRkcmVzcwkAASwAAAACBQAAAARwb29sBQAAABVrZXlSZXdhcmRVcGRhdGVIZWlnaHQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkAgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwkABRUAAAADBQAAAA1jdXJyZW50UmV3YXJkBQAAABJyZXdhcmRVcGRhdGVIZWlnaHQFAAAAFHJld2FyZFByZXZpb3VzQW1vdW50AQAAABNnZXRMYXN0SW50ZXJlc3RJbmZvAAAAAQAAAARwb29sBAAAAAxsYXN0SW50ZXJlc3QJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABRObyBkYXRhIG9uIHRoZSBrZXk6IAUAAAAEcG9vbAIAAAABXwUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BAAAABJsYXN0SW50ZXJlc3RIZWlnaHQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQJAAUUAAAAAgUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAAAxsYXN0SW50ZXJlc3QBAAAAE2dldFVzZXJJbnRlcmVzdEluZm8AAAACAAAABHBvb2wAAAAKdXNlckFkZHJlcwQAAAAQdXNlckxhc3RJbnRlcmVzdAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QEAAAACXVzZXJTaGFyZQkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEFAAAACnVzZXJBZGRyZXMFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAQAAAAVdXNlckxhc3RJbnRlcmVzdFZhbHVlBAAAAAckbWF0Y2gwBQAAABB1c2VyTGFzdEludGVyZXN0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAEHVzZXJMYXN0SW50ZXJlc3QFAAAAByRtYXRjaDAFAAAAEHVzZXJMYXN0SW50ZXJlc3QAAAAAAAAAAAAEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAQAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAACXVzZXJTaGFyZQUAAAAHJG1hdGNoMAUAAAAJdXNlclNoYXJlAAAAAAAAAAAACQAFFAAAAAIFAAAAFXVzZXJMYXN0SW50ZXJlc3RWYWx1ZQUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50AQAAAAxjYWxjSW50ZXJlc3QAAAAIAAAAEmxhc3RJbnRlcmVzdEhlaWdodAAAABJyZXdhcmRVcGRhdGVIZWlnaHQAAAAMbGFzdEludGVyZXN0AAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawAAABBzaGFyZVRva2VuTG9ja2VkAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sAAAAMc2hhcmVBc3NldElkAAAACnNjYWxlVmFsdWUDCQAAZgAAAAIFAAAAEmxhc3RJbnRlcmVzdEhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0AwkAAAAAAAACBQAAABBzaGFyZVRva2VuTG9ja2VkAAAAAAAAAAAAAAAAAAAAAAAABAAAAAZyZXdhcmQJAABoAAAAAgUAAAAVY3VycmVudFJld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAABmhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0CQAAZAAAAAIFAAAADGxhc3RJbnRlcmVzdAkAAGsAAAADBQAAAAZyZXdhcmQFAAAACnNjYWxlVmFsdWUFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAAKnJld2FyZEFmdGVyTGFzdEludGVyZXN0QmVmb3JlUmVhd2FyZFVwZGF0ZQkAAGgAAAACBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrCQAAZQAAAAIFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAASbGFzdEludGVyZXN0SGVpZ2h0BAAAABNpbnRlcmVzdEFmdGVyVXBkYXRlCQAAZAAAAAIFAAAADGxhc3RJbnRlcmVzdAkAAGsAAAADBQAAACpyZXdhcmRBZnRlckxhc3RJbnRlcmVzdEJlZm9yZVJlYXdhcmRVcGRhdGUFAAAACnNjYWxlVmFsdWUFAAAAEHNoYXJlVG9rZW5Mb2NrZWQEAAAABnJld2FyZAkAAGgAAAACBQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQJAABkAAAAAgUAAAATaW50ZXJlc3RBZnRlclVwZGF0ZQkAAGsAAAADBQAAAAZyZXdhcmQFAAAACnNjYWxlVmFsdWUFAAAAEHNoYXJlVG9rZW5Mb2NrZWQBAAAACUNsYWltQ2FsYwAAAAIAAAAEcG9vbAAAAAZjYWxsZXIEAAAADHNoYXJlQXNzZXRJZAkBAAAAD2dldFNoYXJlQXNzZXRJZAAAAAEFAAAABHBvb2wDBgkAAAIAAAABCQACWAAAAAEFAAAADHNoYXJlQXNzZXRJZAQAAAAKc2NhbGVWYWx1ZQkBAAAADmNhbGNTY2FsZVZhbHVlAAAAAgUAAAAEU1dPUAUAAAAMc2hhcmVBc3NldElkBAAAABBzaGFyZVRva2VuTG9ja2VkCQEAAAAYZ2V0VG90YWxTaGFyZVRva2VuTG9ja2VkAAAAAQUAAAAEcG9vbAQAAAALJHQwNTE2NjUyMzEJAQAAABNnZXRMYXN0SW50ZXJlc3RJbmZvAAAAAQUAAAAEcG9vbAQAAAASbGFzdEludGVyZXN0SGVpZ2h0CAUAAAALJHQwNTE2NjUyMzEAAAACXzEEAAAADGxhc3RJbnRlcmVzdAgFAAAACyR0MDUxNjY1MjMxAAAAAl8yBAAAAAskdDA1MjM2NTMyNAkBAAAACnJld2FyZEluZm8AAAABBQAAAARwb29sBAAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sIBQAAAAskdDA1MjM2NTMyNAAAAAJfMQQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CAUAAAALJHQwNTIzNjUzMjQAAAACXzIEAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sIBQAAAAskdDA1MjM2NTMyNAAAAAJfMwQAAAALJHQwNTMyOTU0MDgJAQAAABNnZXRVc2VySW50ZXJlc3RJbmZvAAAAAgUAAAAEcG9vbAUAAAAGY2FsbGVyBAAAABB1c2VyTGFzdEludGVyZXN0CAUAAAALJHQwNTMyOTU0MDgAAAACXzEEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAACyR0MDUzMjk1NDA4AAAAAl8yBAAAAA9jdXJyZW50SW50ZXJlc3QJAQAAAAxjYWxjSW50ZXJlc3QAAAAIBQAAABJsYXN0SW50ZXJlc3RIZWlnaHQFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAAMbGFzdEludGVyZXN0BQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sFAAAAEHNoYXJlVG9rZW5Mb2NrZWQFAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sFAAAADHNoYXJlQXNzZXRJZAUAAAAKc2NhbGVWYWx1ZQQAAAALY2xhaW1BbW91bnQJAABrAAAAAwUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CQAAZQAAAAIFAAAAD2N1cnJlbnRJbnRlcmVzdAUAAAAQdXNlckxhc3RJbnRlcmVzdAUAAAAKc2NhbGVWYWx1ZQQAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAAUWAAAABAUAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QFAAAAC2NsYWltQW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQBAAAAFmNoZWNrUG10QXNzZXRJZENvcnJlY3QAAAACAAAABHBvb2wAAAAKcG10QXNzZXRJZAQAAAAKcG9vbEFkZHJlcwkBAAAABXZhbHVlAAAAAQkABCYAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBAAAABBwb29sU2hhcmVBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAACnBvb2xBZGRyZXMCAAAADnNoYXJlX2Fzc2V0X2lkAwkAAAAAAAACBQAAAApwbXRBc3NldElkBQAAABBwb29sU2hhcmVBc3NldElkBgcAAAAFAAAAAWkBAAAABGluaXQAAAAAAwkBAAAAASEAAAABCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgkABEwAAAACBQAAAAxhZG1pblB1YktleTEJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkyCQAETAAAAAIFAAAADGFkbWluUHViS2V5MwUAAAADbmlsCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBAAAAAlTV09QaXNzdWUJAARCAAAABQIAAAAEU1dPUAIAAAATU1dPUCBwcm90b2NvbCB0b2tlbgAAAAAAAAAAAQAAAAAAAAAACAYEAAAABlNXT1BpZAkABDgAAAABBQAAAAlTV09QaXNzdWUJAARMAAAAAgkABEIAAAAFAgAAAARTV09QAgAAABNTV09QIHByb3RvY29sIHRva2VuAAAAAAAAAAABAAAAAAAAAAAIBgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlrZXlTV09QaWQJAAJYAAAAAQUAAAAGU1dPUGlkBQAAAANuaWwAAAABaQEAAAAUaW5pdFBvb2xTaGFyZUxvY2tpbmcAAAABAAAABHBvb2wDCQEAAAABIQAAAAEJAQAAAA9jb250YWluc0VsZW1lbnQAAAACCQAETAAAAAIFAAAADGFkbWluUHViS2V5MQkABEwAAAACBQAAAAxhZG1pblB1YktleTIJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkzBQAAAANuaWwIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQkAAAIAAAABAgAAACFPbmx5IGFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EAAAACyR0MDY3NzE2ODUxCQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAADWN1cnJlbnRSZXdhcmQIBQAAAAskdDA2NzcxNjg1MQAAAAJfMQQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CAUAAAALJHQwNjc3MTY4NTEAAAACXzIEAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sIBQAAAAskdDA2NzcxNjg1MQAAAAJfMwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBQAAAARwb29sCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEGtleUN1cnJlbnRSZXdhcmQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrBQAAAANuaWwAAAABaQEAAAAPbG9ja1NoYXJlVG9rZW5zAAAAAQAAAARwb29sBAAAAAskdDA3MzAxNzM3NgkABRQAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAACXBtdEFtb3VudAgFAAAACyR0MDczMDE3Mzc2AAAAAl8xBAAAAApwbXRBc3NldElkCAUAAAALJHQwNzMwMTczNzYAAAACXzIDCQEAAAABIQAAAAEJAQAAABZjaGVja1BtdEFzc2V0SWRDb3JyZWN0AAAAAgUAAAAEcG9vbAUAAAAKcG10QXNzZXRJZAkAAAIAAAABAgAAABRJbmNvcnJlY3QgcG10QXNzZXRJZAQAAAALJHQwNzQ2OTc1NjcJAQAAAAlDbGFpbUNhbGMAAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIEAAAAD3VzZXJOZXdJbnRlcmVzdAgFAAAACyR0MDc0Njk3NTY3AAAAAl8xBAAAAA9jdXJyZW50SW50ZXJlc3QIBQAAAAskdDA3NDY5NzU2NwAAAAJfMgQAAAALY2xhaW1BbW91bnQIBQAAAAskdDA3NDY5NzU2NwAAAAJfMwQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNzQ2OTc1NjcAAAACXzQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGQAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAACXBtdEFtb3VudAQAAAAQdG90YWxTaGFyZUFtb3VudAkBAAAAGGdldFRvdGFsU2hhcmVUb2tlbkxvY2tlZAAAAAEFAAAABHBvb2wEAAAAE3RvdGFsU2hhcmVBbW91bnROZXcJAABkAAAAAgUAAAAQdG90YWxTaGFyZUFtb3VudAUAAAAJcG10QW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAATa2V5VXNlckxhc3RJbnRlcmVzdAUAAAAPdXNlck5ld0ludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkBQAAABJ1c2VyU2hhcmVBbW91bnROZXcJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAUa2V5U2hhcmVUb2tlbnNMb2NrZWQFAAAAE3RvdGFsU2hhcmVBbW91bnROZXcFAAAAA25pbAAAAAFpAQAAABN3aXRoZHJhd1NoYXJlVG9rZW5zAAAAAgAAAARwb29sAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAACyR0MDgzNDM4NDQxCQEAAAAJQ2xhaW1DYWxjAAAAAgUAAAAEcG9vbAgFAAAAAWkAAAAGY2FsbGVyBAAAAA91c2VyTmV3SW50ZXJlc3QIBQAAAAskdDA4MzQzODQ0MQAAAAJfMQQAAAAPY3VycmVudEludGVyZXN0CAUAAAALJHQwODM0Mzg0NDEAAAACXzIEAAAAC2NsYWltQW1vdW50CAUAAAALJHQwODM0Mzg0NDEAAAACXzMEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAACyR0MDgzNDM4NDQxAAAAAl80AwkAAGYAAAACBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQJAAACAAAAAQIAAAAsV2l0aGRyYXcgYW1vdW50IG1vcmUgdGhlbiB1c2VyIGxvY2tlZCBhbW91bnQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGUAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAADXNoYXJlVG9rZW5zSWQJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAARwb29sAgAAAA5zaGFyZV9hc3NldF9pZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAUAAAASdXNlclNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAEU1dPUAUAAAALY2xhaW1BbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQFAAAABFNXT1AJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAAA1zaGFyZVRva2Vuc0lkBQAAAANuaWwAAAABaQEAAAAFY2xhaW0AAAABAAAABHBvb2wEAAAAEHNoYXJlVG9rZW5Mb2NrZWQJAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAAAskdDA5MzQxOTQwNgkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAAskdDA5MzQxOTQwNgAAAAJfMQQAAAAMbGFzdEludGVyZXN0CAUAAAALJHQwOTM0MTk0MDYAAAACXzIEAAAACyR0MDk0MTE5NTc1CQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAACyR0MDk0MTE5NTc1AAAAAl8xBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQIBQAAAAskdDA5NDExOTU3NQAAAAJfMgQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawgFAAAACyR0MDk0MTE5NTc1AAAAAl8zBAAAAAskdDA5NTgwOTk4NgkBAAAACUNsYWltQ2FsYwAAAAIFAAAABHBvb2wIBQAAAAFpAAAABmNhbGxlcgQAAAAPdXNlck5ld0ludGVyZXN0CAUAAAALJHQwOTU4MDk5ODYAAAACXzEEAAAAD2N1cnJlbnRJbnRlcmVzdAgFAAAACyR0MDk1ODA5OTg2AAAAAl8yBAAAAAtjbGFpbUFtb3VudAgFAAAACyR0MDk1ODA5OTg2AAAAAl8zBAAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQIBQAAAAskdDA5NTgwOTk4NgAAAAJfNAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8FAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADBQAAAARTV09QBQAAAAtjbGFpbUFtb3VudAYJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAtjbGFpbUFtb3VudAUAAAAEU1dPUAUAAAADbmlsAAAAAJEYqP8=",
    "chainId": 84,
    "height": 1305727,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BbhcG5wqhw3UHuJYnYJhNWLoHsdBHr2xhfhry6SLCp1h
Next: 59xL6raXuLEGuTA1C8gLhWexsYSqzaYTGkKQ3txGepmd

Diff: 
Old New Differences
109 109  func ClaimCalc (pool,caller) = {
110 110      let shareAssetId = getShareAssetId(pool)
111 111      if (true)
112 -         then throw("111")
112 +         then throw(toBase58String(shareAssetId))
113 113          else {
114 114              let scaleValue = calcScaleValue(SWOP, shareAssetId)
115 115              let shareTokenLocked = getTotalShareTokenLocked(pool)
116 -             let $t051425207 = getLastInterestInfo(pool)
117 -             let lastInterestHeight = $t051425207._1
118 -             let lastInterest = $t051425207._2
119 -             let $t052125300 = rewardInfo(pool)
120 -             let currentRewardPerBlock = $t052125300._1
121 -             let rewardUpdateHeight = $t052125300._2
122 -             let previousRewardPerBlock = $t052125300._3
123 -             let $t053055384 = getUserInterestInfo(pool, caller)
124 -             let userLastInterest = $t053055384._1
125 -             let userShareTokensAmount = $t053055384._2
116 +             let $t051665231 = getLastInterestInfo(pool)
117 +             let lastInterestHeight = $t051665231._1
118 +             let lastInterest = $t051665231._2
119 +             let $t052365324 = rewardInfo(pool)
120 +             let currentRewardPerBlock = $t052365324._1
121 +             let rewardUpdateHeight = $t052365324._2
122 +             let previousRewardPerBlock = $t052365324._3
123 +             let $t053295408 = getUserInterestInfo(pool, caller)
124 +             let userLastInterest = $t053295408._1
125 +             let userShareTokensAmount = $t053295408._2
126 126              let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock, shareAssetId, scaleValue)
127 127              let claimAmount = fraction(userShareTokensAmount, (currentInterest - userLastInterest), scaleValue)
128 128              let userNewInterest = currentInterest
155 155  func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
156 156      then throw("Only admin can call this function")
157 157      else {
158 -         let $t067476827 = rewardInfo(pool)
159 -         let currentReward = $t067476827._1
160 -         let rewardUpdateHeight = $t067476827._2
161 -         let previousRewardPerBlock = $t067476827._3
158 +         let $t067716851 = rewardInfo(pool)
159 +         let currentReward = $t067716851._1
160 +         let rewardUpdateHeight = $t067716851._2
161 +         let previousRewardPerBlock = $t067716851._3
162 162  [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)]
163 163          }
164 164  
166 166  
167 167  @Callable(i)
168 168  func lockShareTokens (pool) = {
169 -     let $t072777352 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
170 -     let pmtAmount = $t072777352._1
171 -     let pmtAssetId = $t072777352._2
169 +     let $t073017376 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
170 +     let pmtAmount = $t073017376._1
171 +     let pmtAssetId = $t073017376._2
172 172      if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
173 173          then throw("Incorrect pmtAssetId")
174 174          else {
175 -             let $t074457543 = ClaimCalc(pool, i.caller)
176 -             let userNewInterest = $t074457543._1
177 -             let currentInterest = $t074457543._2
178 -             let claimAmount = $t074457543._3
179 -             let userShareTokensAmount = $t074457543._4
175 +             let $t074697567 = ClaimCalc(pool, i.caller)
176 +             let userNewInterest = $t074697567._1
177 +             let currentInterest = $t074697567._2
178 +             let claimAmount = $t074697567._3
179 +             let userShareTokensAmount = $t074697567._4
180 180              let userShareAmountNew = (userShareTokensAmount + pmtAmount)
181 181              let totalShareAmount = getTotalShareTokenLocked(pool)
182 182              let totalShareAmountNew = (totalShareAmount + pmtAmount)
188 188  
189 189  @Callable(i)
190 190  func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
191 -     let $t083198417 = ClaimCalc(pool, i.caller)
192 -     let userNewInterest = $t083198417._1
193 -     let currentInterest = $t083198417._2
194 -     let claimAmount = $t083198417._3
195 -     let userShareTokensAmount = $t083198417._4
191 +     let $t083438441 = ClaimCalc(pool, i.caller)
192 +     let userNewInterest = $t083438441._1
193 +     let currentInterest = $t083438441._2
194 +     let claimAmount = $t083438441._3
195 +     let userShareTokensAmount = $t083438441._4
196 196      if ((shareTokensWithdrawAmount > userShareTokensAmount))
197 197          then throw("Withdraw amount more then user locked amount")
198 198          else {
207 207  @Callable(i)
208 208  func claim (pool) = {
209 209      let shareTokenLocked = getTotalShareTokenLocked(pool)
210 -     let $t093179382 = getLastInterestInfo(pool)
211 -     let lastInterestHeight = $t093179382._1
212 -     let lastInterest = $t093179382._2
213 -     let $t093879551 = rewardInfo(pool)
214 -     let currentRewardPerBlock = $t093879551._1
215 -     let rewardUpdateHeight = $t093879551._2
216 -     let previousRewardPerBlock = $t093879551._3
217 -     let $t095569962 = ClaimCalc(pool, i.caller)
218 -     let userNewInterest = $t095569962._1
219 -     let currentInterest = $t095569962._2
220 -     let claimAmount = $t095569962._3
221 -     let userShareTokensAmount = $t095569962._4
210 +     let $t093419406 = getLastInterestInfo(pool)
211 +     let lastInterestHeight = $t093419406._1
212 +     let lastInterest = $t093419406._2
213 +     let $t094119575 = rewardInfo(pool)
214 +     let currentRewardPerBlock = $t094119575._1
215 +     let rewardUpdateHeight = $t094119575._2
216 +     let previousRewardPerBlock = $t094119575._3
217 +     let $t095809986 = ClaimCalc(pool, i.caller)
218 +     let userNewInterest = $t095809986._1
219 +     let currentInterest = $t095809986._2
220 +     let claimAmount = $t095809986._3
221 +     let userShareTokensAmount = $t095809986._4
222 222  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
223 223      }
224 224  
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(this, (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      if (true)
112 -         then throw("111")
112 +         then throw(toBase58String(shareAssetId))
113 113          else {
114 114              let scaleValue = calcScaleValue(SWOP, shareAssetId)
115 115              let shareTokenLocked = getTotalShareTokenLocked(pool)
116 -             let $t051425207 = getLastInterestInfo(pool)
117 -             let lastInterestHeight = $t051425207._1
118 -             let lastInterest = $t051425207._2
119 -             let $t052125300 = rewardInfo(pool)
120 -             let currentRewardPerBlock = $t052125300._1
121 -             let rewardUpdateHeight = $t052125300._2
122 -             let previousRewardPerBlock = $t052125300._3
123 -             let $t053055384 = getUserInterestInfo(pool, caller)
124 -             let userLastInterest = $t053055384._1
125 -             let userShareTokensAmount = $t053055384._2
116 +             let $t051665231 = getLastInterestInfo(pool)
117 +             let lastInterestHeight = $t051665231._1
118 +             let lastInterest = $t051665231._2
119 +             let $t052365324 = rewardInfo(pool)
120 +             let currentRewardPerBlock = $t052365324._1
121 +             let rewardUpdateHeight = $t052365324._2
122 +             let previousRewardPerBlock = $t052365324._3
123 +             let $t053295408 = getUserInterestInfo(pool, caller)
124 +             let userLastInterest = $t053295408._1
125 +             let userShareTokensAmount = $t053295408._2
126 126              let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock, shareAssetId, scaleValue)
127 127              let claimAmount = fraction(userShareTokensAmount, (currentInterest - userLastInterest), scaleValue)
128 128              let userNewInterest = currentInterest
129 129              $Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
130 130              }
131 131      }
132 132  
133 133  
134 134  func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
135 135      let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
136 136      let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
137 137      if ((pmtAssetId == poolShareAssetId))
138 138          then true
139 139          else false
140 140      }
141 141  
142 142  
143 143  @Callable(i)
144 144  func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
145 145      then throw("Only admin can call this function")
146 146      else {
147 147          let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
148 148          let SWOPid = calculateAssetId(SWOPissue)
149 149  [Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
150 150          }
151 151  
152 152  
153 153  
154 154  @Callable(i)
155 155  func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
156 156      then throw("Only admin can call this function")
157 157      else {
158 -         let $t067476827 = rewardInfo(pool)
159 -         let currentReward = $t067476827._1
160 -         let rewardUpdateHeight = $t067476827._2
161 -         let previousRewardPerBlock = $t067476827._3
158 +         let $t067716851 = rewardInfo(pool)
159 +         let currentReward = $t067716851._1
160 +         let rewardUpdateHeight = $t067716851._2
161 +         let previousRewardPerBlock = $t067716851._3
162 162  [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)]
163 163          }
164 164  
165 165  
166 166  
167 167  @Callable(i)
168 168  func lockShareTokens (pool) = {
169 -     let $t072777352 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
170 -     let pmtAmount = $t072777352._1
171 -     let pmtAssetId = $t072777352._2
169 +     let $t073017376 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
170 +     let pmtAmount = $t073017376._1
171 +     let pmtAssetId = $t073017376._2
172 172      if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
173 173          then throw("Incorrect pmtAssetId")
174 174          else {
175 -             let $t074457543 = ClaimCalc(pool, i.caller)
176 -             let userNewInterest = $t074457543._1
177 -             let currentInterest = $t074457543._2
178 -             let claimAmount = $t074457543._3
179 -             let userShareTokensAmount = $t074457543._4
175 +             let $t074697567 = ClaimCalc(pool, i.caller)
176 +             let userNewInterest = $t074697567._1
177 +             let currentInterest = $t074697567._2
178 +             let claimAmount = $t074697567._3
179 +             let userShareTokensAmount = $t074697567._4
180 180              let userShareAmountNew = (userShareTokensAmount + pmtAmount)
181 181              let totalShareAmount = getTotalShareTokenLocked(pool)
182 182              let totalShareAmountNew = (totalShareAmount + pmtAmount)
183 183  [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)]
184 184              }
185 185      }
186 186  
187 187  
188 188  
189 189  @Callable(i)
190 190  func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
191 -     let $t083198417 = ClaimCalc(pool, i.caller)
192 -     let userNewInterest = $t083198417._1
193 -     let currentInterest = $t083198417._2
194 -     let claimAmount = $t083198417._3
195 -     let userShareTokensAmount = $t083198417._4
191 +     let $t083438441 = ClaimCalc(pool, i.caller)
192 +     let userNewInterest = $t083438441._1
193 +     let currentInterest = $t083438441._2
194 +     let claimAmount = $t083438441._3
195 +     let userShareTokensAmount = $t083438441._4
196 196      if ((shareTokensWithdrawAmount > userShareTokensAmount))
197 197          then throw("Withdraw amount more then user locked amount")
198 198          else {
199 199              let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
200 200              let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
201 201  [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)]
202 202              }
203 203      }
204 204  
205 205  
206 206  
207 207  @Callable(i)
208 208  func claim (pool) = {
209 209      let shareTokenLocked = getTotalShareTokenLocked(pool)
210 -     let $t093179382 = getLastInterestInfo(pool)
211 -     let lastInterestHeight = $t093179382._1
212 -     let lastInterest = $t093179382._2
213 -     let $t093879551 = rewardInfo(pool)
214 -     let currentRewardPerBlock = $t093879551._1
215 -     let rewardUpdateHeight = $t093879551._2
216 -     let previousRewardPerBlock = $t093879551._3
217 -     let $t095569962 = ClaimCalc(pool, i.caller)
218 -     let userNewInterest = $t095569962._1
219 -     let currentInterest = $t095569962._2
220 -     let claimAmount = $t095569962._3
221 -     let userShareTokensAmount = $t095569962._4
210 +     let $t093419406 = getLastInterestInfo(pool)
211 +     let lastInterestHeight = $t093419406._1
212 +     let lastInterest = $t093419406._2
213 +     let $t094119575 = rewardInfo(pool)
214 +     let currentRewardPerBlock = $t094119575._1
215 +     let rewardUpdateHeight = $t094119575._2
216 +     let previousRewardPerBlock = $t094119575._3
217 +     let $t095809986 = ClaimCalc(pool, i.caller)
218 +     let userNewInterest = $t095809986._1
219 +     let currentInterest = $t095809986._2
220 +     let claimAmount = $t095809986._3
221 +     let userShareTokensAmount = $t095809986._4
222 222  [IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
223 223      }
224 224  
225 225

Old	New		Differences
109	109		func ClaimCalc (pool,caller) = {
110	110		let shareAssetId = getShareAssetId(pool)
111	111		if (true)
112		-	then throw(~~"111"~~)
	112	+	then throw(toBase58String(shareAssetId))
113	113		else {
114	114		let scaleValue = calcScaleValue(SWOP, shareAssetId)
115	115		let shareTokenLocked = getTotalShareTokenLocked(pool)
116		-	let $~~t051425207~~ = getLastInterestInfo(pool)
117		-	let lastInterestHeight = $~~t051425207~~._1
118		-	let lastInterest = $~~t051425207~~._2
119		-	let $~~t052125300~~ = rewardInfo(pool)
120		-	let currentRewardPerBlock = $~~t052125300~~._1
121		-	let rewardUpdateHeight = $~~t052125300~~._2
122		-	let previousRewardPerBlock = $~~t052125300~~._3
123		-	let $~~t053055384~~ = getUserInterestInfo(pool, caller)
124		-	let userLastInterest = $~~t053055384~~._1
125		-	let userShareTokensAmount = $~~t053055384~~._2
	116	+	let $t051665231 = getLastInterestInfo(pool)
	117	+	let lastInterestHeight = $t051665231._1
	118	+	let lastInterest = $t051665231._2
	119	+	let $t052365324 = rewardInfo(pool)
	120	+	let currentRewardPerBlock = $t052365324._1
	121	+	let rewardUpdateHeight = $t052365324._2
	122	+	let previousRewardPerBlock = $t052365324._3
	123	+	let $t053295408 = getUserInterestInfo(pool, caller)
	124	+	let userLastInterest = $t053295408._1
	125	+	let userShareTokensAmount = $t053295408._2
126	126		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock, shareAssetId, scaleValue)
127	127		let claimAmount = fraction(userShareTokensAmount, (currentInterest - userLastInterest), scaleValue)
128	128		let userNewInterest = currentInterest

155	155		func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
156	156		then throw("Only admin can call this function")
157	157		else {
158		-	let $~~t067476827~~ = rewardInfo(pool)
159		-	let currentReward = $~~t067476827~~._1
160		-	let rewardUpdateHeight = $~~t067476827~~._2
161		-	let previousRewardPerBlock = $~~t067476827~~._3
	158	+	let $t067716851 = rewardInfo(pool)
	159	+	let currentReward = $t067716851._1
	160	+	let rewardUpdateHeight = $t067716851._2
	161	+	let previousRewardPerBlock = $t067716851._3
162	162		[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)]
163	163		}
164	164

166	166
167	167		@Callable(i)
168	168		func lockShareTokens (pool) = {
169		-	let $~~t072777352~~ = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
170		-	let pmtAmount = $~~t072777352~~._1
171		-	let pmtAssetId = $~~t072777352~~._2
	169	+	let $t073017376 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
	170	+	let pmtAmount = $t073017376._1
	171	+	let pmtAssetId = $t073017376._2
172	172		if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
173	173		then throw("Incorrect pmtAssetId")
174	174		else {
175		-	let $~~t074457543~~ = ClaimCalc(pool, i.caller)
176		-	let userNewInterest = $~~t074457543~~._1
177		-	let currentInterest = $~~t074457543~~._2
178		-	let claimAmount = $~~t074457543~~._3
179		-	let userShareTokensAmount = $~~t074457543~~._4
	175	+	let $t074697567 = ClaimCalc(pool, i.caller)
	176	+	let userNewInterest = $t074697567._1
	177	+	let currentInterest = $t074697567._2
	178	+	let claimAmount = $t074697567._3
	179	+	let userShareTokensAmount = $t074697567._4
180	180		let userShareAmountNew = (userShareTokensAmount + pmtAmount)
181	181		let totalShareAmount = getTotalShareTokenLocked(pool)
182	182		let totalShareAmountNew = (totalShareAmount + pmtAmount)

188	188
189	189		@Callable(i)
190	190		func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
191		-	let $~~t083198417~~ = ClaimCalc(pool, i.caller)
192		-	let userNewInterest = $~~t083198417~~._1
193		-	let currentInterest = $~~t083198417~~._2
194		-	let claimAmount = $~~t083198417~~._3
195		-	let userShareTokensAmount = $~~t083198417~~._4
	191	+	let $t083438441 = ClaimCalc(pool, i.caller)
	192	+	let userNewInterest = $t083438441._1
	193	+	let currentInterest = $t083438441._2
	194	+	let claimAmount = $t083438441._3
	195	+	let userShareTokensAmount = $t083438441._4
196	196		if ((shareTokensWithdrawAmount > userShareTokensAmount))
197	197		then throw("Withdraw amount more then user locked amount")
198	198		else {

207	207		@Callable(i)
208	208		func claim (pool) = {
209	209		let shareTokenLocked = getTotalShareTokenLocked(pool)
210		-	let $~~t093179382~~ = getLastInterestInfo(pool)
211		-	let lastInterestHeight = $~~t093179382~~._1
212		-	let lastInterest = $~~t093179382~~._2
213		-	let $~~t093879551~~ = rewardInfo(pool)
214		-	let currentRewardPerBlock = $~~t093879551~~._1
215		-	let rewardUpdateHeight = $~~t093879551~~._2
216		-	let previousRewardPerBlock = $~~t093879551~~._3
217		-	let $~~t095569962~~ = ClaimCalc(pool, i.caller)
218		-	let userNewInterest = $~~t095569962~~._1
219		-	let currentInterest = $~~t095569962~~._2
220		-	let claimAmount = $~~t095569962~~._3
221		-	let userShareTokensAmount = $~~t095569962~~._4
	210	+	let $t093419406 = getLastInterestInfo(pool)
	211	+	let lastInterestHeight = $t093419406._1
	212	+	let lastInterest = $t093419406._2
	213	+	let $t094119575 = rewardInfo(pool)
	214	+	let currentRewardPerBlock = $t094119575._1
	215	+	let rewardUpdateHeight = $t094119575._2
	216	+	let previousRewardPerBlock = $t094119575._3
	217	+	let $t095809986 = ClaimCalc(pool, i.caller)
	218	+	let userNewInterest = $t095809986._1
	219	+	let currentInterest = $t095809986._2
	220	+	let claimAmount = $t095809986._3
	221	+	let userShareTokensAmount = $t095809986._4
222	222		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
223	223		}
224	224

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(this, (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		if (true)
112		-	then throw(~~"111"~~)
	112	+	then throw(toBase58String(shareAssetId))
113	113		else {
114	114		let scaleValue = calcScaleValue(SWOP, shareAssetId)
115	115		let shareTokenLocked = getTotalShareTokenLocked(pool)
116		-	let $~~t051425207~~ = getLastInterestInfo(pool)
117		-	let lastInterestHeight = $~~t051425207~~._1
118		-	let lastInterest = $~~t051425207~~._2
119		-	let $~~t052125300~~ = rewardInfo(pool)
120		-	let currentRewardPerBlock = $~~t052125300~~._1
121		-	let rewardUpdateHeight = $~~t052125300~~._2
122		-	let previousRewardPerBlock = $~~t052125300~~._3
123		-	let $~~t053055384~~ = getUserInterestInfo(pool, caller)
124		-	let userLastInterest = $~~t053055384~~._1
125		-	let userShareTokensAmount = $~~t053055384~~._2
	116	+	let $t051665231 = getLastInterestInfo(pool)
	117	+	let lastInterestHeight = $t051665231._1
	118	+	let lastInterest = $t051665231._2
	119	+	let $t052365324 = rewardInfo(pool)
	120	+	let currentRewardPerBlock = $t052365324._1
	121	+	let rewardUpdateHeight = $t052365324._2
	122	+	let previousRewardPerBlock = $t052365324._3
	123	+	let $t053295408 = getUserInterestInfo(pool, caller)
	124	+	let userLastInterest = $t053295408._1
	125	+	let userShareTokensAmount = $t053295408._2
126	126		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock, shareAssetId, scaleValue)
127	127		let claimAmount = fraction(userShareTokensAmount, (currentInterest - userLastInterest), scaleValue)
128	128		let userNewInterest = currentInterest
129	129		$Tuple4(userNewInterest, currentInterest, claimAmount, userShareTokensAmount)
130	130		}
131	131		}
132	132
133	133
134	134		func checkPmtAssetIdCorrect (pool,pmtAssetId) = {
135	135		let poolAddres = value(addressFromString(getStringValue(this, (pool + keyPoolAddress))))
136	136		let poolShareAssetId = fromBase58String(getStringValue(poolAddres, "share_asset_id"))
137	137		if ((pmtAssetId == poolShareAssetId))
138	138		then true
139	139		else false
140	140		}
141	141
142	142
143	143		@Callable(i)
144	144		func init () = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
145	145		then throw("Only admin can call this function")
146	146		else {
147	147		let SWOPissue = Issue("SWOP", "SWOP protocol token", 1, 8, true)
148	148		let SWOPid = calculateAssetId(SWOPissue)
149	149		[Issue("SWOP", "SWOP protocol token", 1, 8, true), StringEntry(keySWOPid, toBase58String(SWOPid))]
150	150		}
151	151
152	152
153	153
154	154		@Callable(i)
155	155		func initPoolShareLocking (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
156	156		then throw("Only admin can call this function")
157	157		else {
158		-	let $~~t067476827~~ = rewardInfo(pool)
159		-	let currentReward = $~~t067476827~~._1
160		-	let rewardUpdateHeight = $~~t067476827~~._2
161		-	let previousRewardPerBlock = $~~t067476827~~._3
	158	+	let $t067716851 = rewardInfo(pool)
	159	+	let currentReward = $t067716851._1
	160	+	let rewardUpdateHeight = $t067716851._2
	161	+	let previousRewardPerBlock = $t067716851._3
162	162		[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)]
163	163		}
164	164
165	165
166	166
167	167		@Callable(i)
168	168		func lockShareTokens (pool) = {
169		-	let $~~t072777352~~ = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
170		-	let pmtAmount = $~~t072777352~~._1
171		-	let pmtAssetId = $~~t072777352~~._2
	169	+	let $t073017376 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
	170	+	let pmtAmount = $t073017376._1
	171	+	let pmtAssetId = $t073017376._2
172	172		if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
173	173		then throw("Incorrect pmtAssetId")
174	174		else {
175		-	let $~~t074457543~~ = ClaimCalc(pool, i.caller)
176		-	let userNewInterest = $~~t074457543~~._1
177		-	let currentInterest = $~~t074457543~~._2
178		-	let claimAmount = $~~t074457543~~._3
179		-	let userShareTokensAmount = $~~t074457543~~._4
	175	+	let $t074697567 = ClaimCalc(pool, i.caller)
	176	+	let userNewInterest = $t074697567._1
	177	+	let currentInterest = $t074697567._2
	178	+	let claimAmount = $t074697567._3
	179	+	let userShareTokensAmount = $t074697567._4
180	180		let userShareAmountNew = (userShareTokensAmount + pmtAmount)
181	181		let totalShareAmount = getTotalShareTokenLocked(pool)
182	182		let totalShareAmountNew = (totalShareAmount + pmtAmount)
183	183		[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)]
184	184		}
185	185		}
186	186
187	187
188	188
189	189		@Callable(i)
190	190		func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
191		-	let $~~t083198417~~ = ClaimCalc(pool, i.caller)
192		-	let userNewInterest = $~~t083198417~~._1
193		-	let currentInterest = $~~t083198417~~._2
194		-	let claimAmount = $~~t083198417~~._3
195		-	let userShareTokensAmount = $~~t083198417~~._4
	191	+	let $t083438441 = ClaimCalc(pool, i.caller)
	192	+	let userNewInterest = $t083438441._1
	193	+	let currentInterest = $t083438441._2
	194	+	let claimAmount = $t083438441._3
	195	+	let userShareTokensAmount = $t083438441._4
196	196		if ((shareTokensWithdrawAmount > userShareTokensAmount))
197	197		then throw("Withdraw amount more then user locked amount")
198	198		else {
199	199		let userShareAmountNew = (userShareTokensAmount - shareTokensWithdrawAmount)
200	200		let shareTokensId = fromBase58String(getStringValue(this, (pool + "share_asset_id")))
201	201		[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)]
202	202		}
203	203		}
204	204
205	205
206	206
207	207		@Callable(i)
208	208		func claim (pool) = {
209	209		let shareTokenLocked = getTotalShareTokenLocked(pool)
210		-	let $~~t093179382~~ = getLastInterestInfo(pool)
211		-	let lastInterestHeight = $~~t093179382~~._1
212		-	let lastInterest = $~~t093179382~~._2
213		-	let $~~t093879551~~ = rewardInfo(pool)
214		-	let currentRewardPerBlock = $~~t093879551~~._1
215		-	let rewardUpdateHeight = $~~t093879551~~._2
216		-	let previousRewardPerBlock = $~~t093879551~~._3
217		-	let $~~t095569962~~ = ClaimCalc(pool, i.caller)
218		-	let userNewInterest = $~~t095569962~~._1
219		-	let currentInterest = $~~t095569962~~._2
220		-	let claimAmount = $~~t095569962~~._3
221		-	let userShareTokensAmount = $~~t095569962~~._4
	210	+	let $t093419406 = getLastInterestInfo(pool)
	211	+	let lastInterestHeight = $t093419406._1
	212	+	let lastInterest = $t093419406._2
	213	+	let $t094119575 = rewardInfo(pool)
	214	+	let currentRewardPerBlock = $t094119575._1
	215	+	let rewardUpdateHeight = $t094119575._2
	216	+	let previousRewardPerBlock = $t094119575._3
	217	+	let $t095809986 = ClaimCalc(pool, i.caller)
	218	+	let userNewInterest = $t095809986._1
	219	+	let currentInterest = $t095809986._2
	220	+	let claimAmount = $t095809986._3
	221	+	let userShareTokensAmount = $t095809986._4
222	222		[IntegerEntry((((pool + "_") + toString(i.caller)) + keyUserLastInterest), userNewInterest), IntegerEntry(((pool + "_") + keyLastInterest), currentInterest), IntegerEntry(((pool + "_") + keyLastInterestHeight), height), Reissue(SWOP, claimAmount, true), ScriptTransfer(i.caller, claimAmount, SWOP)]
223	223		}
224	224
225	225

github/deemru/w8io/c3f4982 
53.90 ms ◑