w8 · tx · 2Js···nVX

tx · 2JsLCLr8TAHm522o8DVhYvuosqNLE3aH4L4nVTMzpnVX

3NCCBQA6ADQN4o5mP4UpyWQy3QgAc2f68X8:  -0.01400000 Waves

2020.12.17 14:54 [1312669] smart account 3NCCBQA6ADQN4o5mP4UpyWQy3QgAc2f68X8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2JsLCLr8TAHm522o8DVhYvuosqNLE3aH4L4nVTMzpnVX",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1608206133267,
    "version": 1,
    "sender": "3NCCBQA6ADQN4o5mP4UpyWQy3QgAc2f68X8",
    "senderPublicKey": "7nhhzx1b9hckmwzpZJ7SPQmdrVrDgcfGCgZn9qvMnXCJ",
    "proofs": [
        "5N92i6zSWmnJudwDNvVAUrGsLZ1puFUZsSnJwS9fi2S1D2QkpUd5zVqxekHTWaCDS8EWyu5JkYAB3NkDidPDb2vB"
    ],
    "script": "base64:AAIEAAAAAAAAABoIAhIAEgMKAQgSAwoBCBIECgIIARIECgIIAQAAAB8AAAAADGFkbWluUHViS2V5MQEAAAAgELDi6uQgdVvao3EGz2pOOnWzKruRdXrpd4DobbWyZx8AAAAADGFkbWluUHViS2V5MgEAAAAgELDi6uQgdVvao3EGz2pOOnWzKruRdXrpd4DobbWyZx8AAAAADGFkbWluUHViS2V5MwEAAAAgELDi6uQgdVvao3EGz2pOOnWzKruRdXrpd4DobbWyZx8AAAAAFGFkbWluUHViS2V5U3RhcnRTdG9wAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAASYWRtaW5QdWJLZXlTdGFraW5nAQAAACAQsOLq5CB1W9qjcQbPak46dbMqu5F1eul3gOhttbJnHwAAAAAUa2V5U2hhcmVUb2tlbnNMb2NrZWQCAAAAGl90b3RhbF9zaGFyZV90b2tlbnNfbG9ja2VkAAAAABBrZXlDdXJyZW50UmV3YXJkAgAAAA9fY3VycmVudF9yZXdhcmQAAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAIAAAAVX3Jld2FyZF91cGRhdGVfaGVpZ2h0AAAAABFrZXlQcmV2aW91c1Jld2FyZAIAAAAQX3ByZXZpb3VzX3Jld2FyZAAAAAAPa2V5TGFzdEludGVyZXN0AgAAAA5fbGFzdF9pbnRlcmVzdAAAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0AgAAABVfbGFzdF9pbnRlcmVzdF9oZWlnaHQAAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAIAAAAUX3NoYXJlX3Rva2Vuc19sb2NrZWQAAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QCAAAADl9sYXN0X2ludGVyZXN0AAAAAAlrZXlTV09QaWQCAAAAB1NXT1BfaWQAAAAADmtleVBvb2xBZGRyZXNzAgAAAAhfYWRkcmVzcwAAAAARa2V5QXZhaWxhYmxlRnVuZHMCAAAAEF9hdmFpbGFibGVfZnVuZHMAAAAADXZvdGluZ0FkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVSoIVG0TpMDJ8tENASz393i0+SsCXMcgHUAAAAABFNXT1AJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAAJa2V5U1dPUGlkAAAAABJoZWlnaHRSZXdhcmRVcGRhdGUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAFGhlaWdodF9yZXdhcmRfdXBkYXRlAQAAAA50aHJvd09ubHlBZG1pbgAAAAAJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQAAAA10aHJvd0lzQWN0aXZlAAAAAAkAAAIAAAABAgAAABZEQXBwIGlzIGFscmVhZHkgYWN0aXZlAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABAAAABHBvb2wJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAQAAAA9nZXRTaGFyZUFzc2V0SWQAAAABAAAABHBvb2wJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAABXZhbHVlAAAAAQkABCYAAAABBQAAAARwb29sAgAAAA5zaGFyZV9hc3NldF9pZAEAAAAOY2FsY1NjYWxlVmFsdWUAAAACAAAACGFzc2V0SWQxAAAACGFzc2V0SWQyBAAAABBhc3NldElkMURlY2ltYWxzCAkBAAAABXZhbHVlAAAAAQkAA+wAAAABBQAAAAhhc3NldElkMQAAAAhkZWNpbWFscwQAAAAQYXNzZXRJZDJEZWNpbWFscwgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAAIYXNzZXRJZDIAAAAIZGVjaW1hbHMEAAAAC3NjbGFlRGlnaXRzCQAAZAAAAAIJAABlAAAAAgUAAAAQYXNzZXRJZDJEZWNpbWFscwUAAAAQYXNzZXRJZDFEZWNpbWFscwAAAAAAAAAACAkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAABQAAAAtzY2xhZURpZ2l0cwAAAAAAAAAAAAAAAAAAAAAAAAUAAAAISEFMRkRPV04BAAAAEnVzZXJBdmFpbGFibGVGdW5kcwAAAAIAAAAEcG9vbAAAAAR1c2VyBAAAAA5hdmFpbGFibGVGdW5kcwkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8JAAQlAAAAAQUAAAAEdXNlcgIAAAABXwUAAAARa2V5QXZhaWxhYmxlRnVuZHMEAAAABGF2YkYEAAAAByRtYXRjaDAFAAAADmF2YWlsYWJsZUZ1bmRzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAABGF2YkYFAAAAByRtYXRjaDAFAAAABGF2YkYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQEAAAABGF2YkYFAAAAByRtYXRjaDAAAAAAAAAAAAAJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IFAAAABGF2YkYBAAAACnJld2FyZEluZm8AAAABAAAABHBvb2wEAAAADWN1cnJlbnRSZXdhcmQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAA12b3RpbmdBZGRyZXNzCQABLAAAAAIFAAAABHBvb2wFAAAAEGtleUN1cnJlbnRSZXdhcmQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAEGtleUN1cnJlbnRSZXdhcmQCAAAADCBhdCBhZGRyZXNzIAkABCUAAAABBQAAAA12b3RpbmdBZGRyZXNzBAAAABJyZXdhcmRVcGRhdGVIZWlnaHQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAA12b3RpbmdBZGRyZXNzCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABRObyBkYXRhIG9uIHRoZSBrZXk6IAUAAAAEcG9vbAUAAAAVa2V5UmV3YXJkVXBkYXRlSGVpZ2h0AgAAAAwgYXQgYWRkcmVzcyAJAAQlAAAAAQUAAAANdm90aW5nQWRkcmVzcwQAAAAUcmV3YXJkUHJldmlvdXNBbW91bnQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAA12b3RpbmdBZGRyZXNzCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABRObyBkYXRhIG9uIHRoZSBrZXk6IAUAAAAEcG9vbAUAAAARa2V5UHJldmlvdXNSZXdhcmQCAAAADCBhdCBhZGRyZXNzIAkABCUAAAABBQAAAA12b3RpbmdBZGRyZXNzCQAFFQAAAAMFAAAADWN1cnJlbnRSZXdhcmQFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAAUcmV3YXJkUHJldmlvdXNBbW91bnQBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABAAAABHBvb2wEAAAADGxhc3RJbnRlcmVzdAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0CQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAFE5vIGRhdGEgb24gdGhlIGtleTogBQAAAARwb29sAgAAAAFfBQAAAARwb29sBQAAAA9rZXlMYXN0SW50ZXJlc3QEAAAAEmxhc3RJbnRlcmVzdEhlaWdodAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAEcG9vbAUAAAAVa2V5TGFzdEludGVyZXN0SGVpZ2h0CQABLAAAAAIJAAEsAAAAAgIAAAAUTm8gZGF0YSBvbiB0aGUga2V5OiAFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAkABRQAAAACBQAAABJsYXN0SW50ZXJlc3RIZWlnaHQFAAAADGxhc3RJbnRlcmVzdAEAAAATZ2V0VXNlckludGVyZXN0SW5mbwAAAAIAAAAEcG9vbAAAAAp1c2VyQWRkcmVzBAAAABB1c2VyTGFzdEludGVyZXN0CQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8JAAQlAAAAAQUAAAAKdXNlckFkZHJlcwUAAAATa2V5VXNlckxhc3RJbnRlcmVzdAQAAAAJdXNlclNoYXJlCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8JAAQlAAAAAQUAAAAKdXNlckFkZHJlcwUAAAAYa2V5VXNlclNoYXJlVG9rZW5zTG9ja2VkBAAAABV1c2VyTGFzdEludGVyZXN0VmFsdWUEAAAAByRtYXRjaDAFAAAAEHVzZXJMYXN0SW50ZXJlc3QDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAAQdXNlckxhc3RJbnRlcmVzdAUAAAAHJG1hdGNoMAUAAAAQdXNlckxhc3RJbnRlcmVzdAAAAAAAAAAAAAQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50BAAAAAckbWF0Y2gwBQAAAAl1c2VyU2hhcmUDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAAJdXNlclNoYXJlBQAAAAckbWF0Y2gwBQAAAAl1c2VyU2hhcmUAAAAAAAAAAAAJAAUUAAAAAgUAAAAVdXNlckxhc3RJbnRlcmVzdFZhbHVlBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQBAAAADGNhbGNJbnRlcmVzdAAAAAgAAAASbGFzdEludGVyZXN0SGVpZ2h0AAAAEnJld2FyZFVwZGF0ZUhlaWdodAAAAAxsYXN0SW50ZXJlc3QAAAAVY3VycmVudFJld2FyZFBlckJsb2NrAAAAEHNoYXJlVG9rZW5Mb2NrZWQAAAAWcHJldmlvdXNSZXdhcmRQZXJCbG9jawAAAAxzaGFyZUFzc2V0SWQAAAAKc2NhbGVWYWx1ZQMJAABmAAAAAgUAAAASbGFzdEludGVyZXN0SGVpZ2h0BQAAABJyZXdhcmRVcGRhdGVIZWlnaHQDCQAAAAAAAAIFAAAAEHNoYXJlVG9rZW5Mb2NrZWQAAAAAAAAAAAAAAAAAAAAAAAAEAAAABnJld2FyZAkAAGgAAAACBQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sJAABlAAAAAgUAAAAGaGVpZ2h0BQAAABJsYXN0SW50ZXJlc3RIZWlnaHQJAABkAAAAAgUAAAAMbGFzdEludGVyZXN0CQAAawAAAAMFAAAABnJld2FyZAUAAAAKc2NhbGVWYWx1ZQUAAAAQc2hhcmVUb2tlbkxvY2tlZAQAAAAqcmV3YXJkQWZ0ZXJMYXN0SW50ZXJlc3RCZWZvcmVSZWF3YXJkVXBkYXRlCQAAaAAAAAIFAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sJAABlAAAAAgUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0BQAAABJsYXN0SW50ZXJlc3RIZWlnaHQEAAAAE2ludGVyZXN0QWZ0ZXJVcGRhdGUJAABkAAAAAgUAAAAMbGFzdEludGVyZXN0CQAAawAAAAMFAAAAKnJld2FyZEFmdGVyTGFzdEludGVyZXN0QmVmb3JlUmVhd2FyZFVwZGF0ZQUAAAAKc2NhbGVWYWx1ZQUAAAAQc2hhcmVUb2tlbkxvY2tlZAQAAAAGcmV3YXJkCQAAaAAAAAIFAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawkAAGUAAAACBQAAAAZoZWlnaHQFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAkAAGQAAAACBQAAABNpbnRlcmVzdEFmdGVyVXBkYXRlCQAAawAAAAMFAAAABnJld2FyZAUAAAAKc2NhbGVWYWx1ZQUAAAAQc2hhcmVUb2tlbkxvY2tlZAEAAAAJY2xhaW1DYWxjAAAAAgAAAARwb29sAAAABmNhbGxlcgQAAAAMc2hhcmVBc3NldElkCQEAAAAPZ2V0U2hhcmVBc3NldElkAAAAAQUAAAAEcG9vbAQAAAAKc2NhbGVWYWx1ZQkBAAAADmNhbGNTY2FsZVZhbHVlAAAAAgUAAAAEU1dPUAUAAAAMc2hhcmVBc3NldElkBAAAABBzaGFyZVRva2VuTG9ja2VkCQEAAAAYZ2V0VG90YWxTaGFyZVRva2VuTG9ja2VkAAAAAQUAAAAEcG9vbAQAAAALJHQwNTUzNzU2MDIJAQAAABNnZXRMYXN0SW50ZXJlc3RJbmZvAAAAAQUAAAAEcG9vbAQAAAASbGFzdEludGVyZXN0SGVpZ2h0CAUAAAALJHQwNTUzNzU2MDIAAAACXzEEAAAADGxhc3RJbnRlcmVzdAgFAAAACyR0MDU1Mzc1NjAyAAAAAl8yBAAAAAskdDA1NjA3NTY5NQkBAAAACnJld2FyZEluZm8AAAABBQAAAARwb29sBAAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sIBQAAAAskdDA1NjA3NTY5NQAAAAJfMQQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CAUAAAALJHQwNTYwNzU2OTUAAAACXzIEAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sIBQAAAAskdDA1NjA3NTY5NQAAAAJfMwQAAAALJHQwNTcwMDU3NzkJAQAAABNnZXRVc2VySW50ZXJlc3RJbmZvAAAAAgUAAAAEcG9vbAUAAAAGY2FsbGVyBAAAABB1c2VyTGFzdEludGVyZXN0CAUAAAALJHQwNTcwMDU3NzkAAAACXzEEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAACyR0MDU3MDA1Nzc5AAAAAl8yBAAAAA9jdXJyZW50SW50ZXJlc3QJAQAAAAxjYWxjSW50ZXJlc3QAAAAIBQAAABJsYXN0SW50ZXJlc3RIZWlnaHQFAAAAEnJld2FyZFVwZGF0ZUhlaWdodAUAAAAMbGFzdEludGVyZXN0BQAAABVjdXJyZW50UmV3YXJkUGVyQmxvY2sFAAAAEHNoYXJlVG9rZW5Mb2NrZWQFAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sFAAAADHNoYXJlQXNzZXRJZAUAAAAKc2NhbGVWYWx1ZQQAAAALY2xhaW1BbW91bnQJAABrAAAAAwUAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CQAAZQAAAAIFAAAAD2N1cnJlbnRJbnRlcmVzdAUAAAAQdXNlckxhc3RJbnRlcmVzdAUAAAAKc2NhbGVWYWx1ZQQAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAAUWAAAABAUAAAAPdXNlck5ld0ludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QFAAAAC2NsYWltQW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQBAAAAFmNoZWNrUG10QXNzZXRJZENvcnJlY3QAAAACAAAABHBvb2wAAAAKcG10QXNzZXRJZAQAAAAKcG9vbEFkZHJlcwkBAAAABXZhbHVlAAAAAQkABCYAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBAAAABBwb29sU2hhcmVBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAACnBvb2xBZGRyZXMCAAAADnNoYXJlX2Fzc2V0X2lkAwkAAAAAAAACBQAAAApwbXRBc3NldElkBQAAABBwb29sU2hhcmVBc3NldElkBgcAAAAFAAAAAWkBAAAABGluaXQAAAAAAwkBAAAAASEAAAABCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgkABEwAAAACBQAAAAxhZG1pblB1YktleTEJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkyCQAETAAAAAIFAAAADGFkbWluUHViS2V5MwUAAAADbmlsCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkJAAACAAAAAQIAAAAhT25seSBhZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBAAAAAlTV09QaXNzdWUJAARCAAAABQIAAAAEU1dPUAIAAAATU1dPUCBwcm90b2NvbCB0b2tlbgAAAAAAAAAAAQAAAAAAAAAACAYEAAAABlNXT1BpZAkABDgAAAABBQAAAAlTV09QaXNzdWUJAARMAAAAAgkABEIAAAAFAgAAAARTV09QAgAAABNTV09QIHByb3RvY29sIHRva2VuAAAAAAAAAAABAAAAAAAAAAAIBgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlrZXlTV09QaWQJAAJYAAAAAQUAAAAGU1dPUGlkBQAAAANuaWwAAAABaQEAAAAUaW5pdFBvb2xTaGFyZUZhcm1pbmcAAAABAAAABHBvb2wDCQEAAAABIQAAAAEJAQAAAA9jb250YWluc0VsZW1lbnQAAAACCQAETAAAAAIFAAAADGFkbWluUHViS2V5MQkABEwAAAACBQAAAAxhZG1pblB1YktleTIJAARMAAAAAgUAAAAMYWRtaW5QdWJLZXkzBQAAAANuaWwIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQkAAAIAAAABAgAAACFPbmx5IGFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EAAAACyR0MDcxNDI3MjIyCQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAADWN1cnJlbnRSZXdhcmQIBQAAAAskdDA3MTQyNzIyMgAAAAJfMQQAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CAUAAAALJHQwNzE0MjcyMjIAAAACXzIEAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sIBQAAAAskdDA3MTQyNzIyMgAAAAJfMwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAADmtleVBvb2xBZGRyZXNzBQAAAARwb29sCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEGtleUN1cnJlbnRSZXdhcmQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAEcG9vbAUAAAAPa2V5TGFzdEludGVyZXN0AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleVJld2FyZFVwZGF0ZUhlaWdodAUAAAAScmV3YXJkVXBkYXRlSGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAEWtleVByZXZpb3VzUmV3YXJkBQAAABZwcmV2aW91c1Jld2FyZFBlckJsb2NrBQAAAANuaWwAAAABaQEAAAAPbG9ja1NoYXJlVG9rZW5zAAAAAQAAAARwb29sBAAAAAskdDA3NjcyNzc0NwkABRQAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAACXBtdEFtb3VudAgFAAAACyR0MDc2NzI3NzQ3AAAAAl8xBAAAAApwbXRBc3NldElkCAUAAAALJHQwNzY3Mjc3NDcAAAACXzIDCQEAAAABIQAAAAEJAQAAABZjaGVja1BtdEFzc2V0SWRDb3JyZWN0AAAAAgUAAAAEcG9vbAUAAAAKcG10QXNzZXRJZAkAAAIAAAABAgAAABRJbmNvcnJlY3QgcG10QXNzZXRJZAQAAAALJHQwNzg0MDc5MzgJAQAAAAljbGFpbUNhbGMAAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIEAAAAD3VzZXJOZXdJbnRlcmVzdAgFAAAACyR0MDc4NDA3OTM4AAAAAl8xBAAAAA9jdXJyZW50SW50ZXJlc3QIBQAAAAskdDA3ODQwNzkzOAAAAAJfMgQAAAALY2xhaW1BbW91bnQIBQAAAAskdDA3ODQwNzkzOAAAAAJfMwQAAAAVdXNlclNoYXJlVG9rZW5zQW1vdW50CAUAAAALJHQwNzg0MDc5MzgAAAACXzQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGQAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAACXBtdEFtb3VudAQAAAARYXZhaWxhYmxlRnVuZHNOZXcJAABkAAAAAgkBAAAAEnVzZXJBdmFpbGFibGVGdW5kcwAAAAIFAAAABHBvb2wIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQEAAAAEHRvdGFsU2hhcmVBbW91bnQJAQAAABhnZXRUb3RhbFNoYXJlVG9rZW5Mb2NrZWQAAAABBQAAAARwb29sBAAAABN0b3RhbFNoYXJlQW1vdW50TmV3CQAAZAAAAAIFAAAAEHRvdGFsU2hhcmVBbW91bnQFAAAACXBtdEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAE2tleVVzZXJMYXN0SW50ZXJlc3QFAAAAD3VzZXJOZXdJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAAGGtleVVzZXJTaGFyZVRva2Vuc0xvY2tlZAUAAAASdXNlclNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAD2tleUxhc3RJbnRlcmVzdAUAAAAPY3VycmVudEludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFWtleUxhc3RJbnRlcmVzdEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAABHBvb2wFAAAAFGtleVNoYXJlVG9rZW5zTG9ja2VkBQAAABN0b3RhbFNoYXJlQW1vdW50TmV3CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8JAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyAgAAAAFfBQAAABFrZXlBdmFpbGFibGVGdW5kcwUAAAARYXZhaWxhYmxlRnVuZHNOZXcFAAAAA25pbAAAAAFpAQAAABN3aXRoZHJhd1NoYXJlVG9rZW5zAAAAAgAAAARwb29sAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAACyR0MDg4OTE4OTg5CQEAAAAJY2xhaW1DYWxjAAAAAgUAAAAEcG9vbAgFAAAAAWkAAAAGY2FsbGVyBAAAAA91c2VyTmV3SW50ZXJlc3QIBQAAAAskdDA4ODkxODk4OQAAAAJfMQQAAAAPY3VycmVudEludGVyZXN0CAUAAAALJHQwODg5MTg5ODkAAAACXzIEAAAAC2NsYWltQW1vdW50CAUAAAALJHQwODg5MTg5ODkAAAACXzMEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAACyR0MDg4OTE4OTg5AAAAAl80AwkAAGYAAAACBQAAABlzaGFyZVRva2Vuc1dpdGhkcmF3QW1vdW50BQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQJAAACAAAAAQIAAAAsV2l0aGRyYXcgYW1vdW50IG1vcmUgdGhlbiB1c2VyIGxvY2tlZCBhbW91bnQEAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkAAGUAAAACBQAAABV1c2VyU2hhcmVUb2tlbnNBbW91bnQFAAAAGXNoYXJlVG9rZW5zV2l0aGRyYXdBbW91bnQEAAAAEWF2YWlsYWJsZUZ1bmRzTmV3CQAAZAAAAAIJAQAAABJ1c2VyQXZhaWxhYmxlRnVuZHMAAAACBQAAAARwb29sCAUAAAABaQAAAAZjYWxsZXIFAAAAC2NsYWltQW1vdW50BAAAAA1zaGFyZVRva2Vuc0lkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAAAV2YWx1ZQAAAAEJAAQmAAAAAQUAAAAEcG9vbAIAAAAOc2hhcmVfYXNzZXRfaWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8JAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAABNrZXlVc2VyTGFzdEludGVyZXN0BQAAAA91c2VyTmV3SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8JAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAABhrZXlVc2VyU2hhcmVUb2tlbnNMb2NrZWQFAAAAEnVzZXJTaGFyZUFtb3VudE5ldwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAAA9rZXlMYXN0SW50ZXJlc3QFAAAAD2N1cnJlbnRJbnRlcmVzdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAARwb29sBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgIAAAABXwUAAAARa2V5QXZhaWxhYmxlRnVuZHMFAAAAEWF2YWlsYWJsZUZ1bmRzTmV3CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAZc2hhcmVUb2tlbnNXaXRoZHJhd0Ftb3VudAUAAAANc2hhcmVUb2tlbnNJZAUAAAADbmlsAAAAAWkBAAAABWNsYWltAAAAAgAAAARwb29sAAAADmNsYWltQW1vdW50QXNrBAAAABBzaGFyZVRva2VuTG9ja2VkCQEAAAAYZ2V0VG90YWxTaGFyZVRva2VuTG9ja2VkAAAAAQUAAAAEcG9vbAQAAAANJHQwMTAwMDgxMDA3MwkBAAAAE2dldExhc3RJbnRlcmVzdEluZm8AAAABBQAAAARwb29sBAAAABJsYXN0SW50ZXJlc3RIZWlnaHQIBQAAAA0kdDAxMDAwODEwMDczAAAAAl8xBAAAAAxsYXN0SW50ZXJlc3QIBQAAAA0kdDAxMDAwODEwMDczAAAAAl8yBAAAAA0kdDAxMDA3ODEwMjQyCQEAAAAKcmV3YXJkSW5mbwAAAAEFAAAABHBvb2wEAAAAFWN1cnJlbnRSZXdhcmRQZXJCbG9jawgFAAAADSR0MDEwMDc4MTAyNDIAAAACXzEEAAAAEnJld2FyZFVwZGF0ZUhlaWdodAgFAAAADSR0MDEwMDc4MTAyNDIAAAACXzIEAAAAFnByZXZpb3VzUmV3YXJkUGVyQmxvY2sIBQAAAA0kdDAxMDA3ODEwMjQyAAAAAl8zBAAAAA0kdDAxMDI0NzEwMzQ1CQEAAAAJY2xhaW1DYWxjAAAAAgUAAAAEcG9vbAgFAAAAAWkAAAAGY2FsbGVyBAAAAA91c2VyTmV3SW50ZXJlc3QIBQAAAA0kdDAxMDI0NzEwMzQ1AAAAAl8xBAAAAA9jdXJyZW50SW50ZXJlc3QIBQAAAA0kdDAxMDI0NzEwMzQ1AAAAAl8yBAAAAAtjbGFpbUFtb3VudAgFAAAADSR0MDEwMjQ3MTAzNDUAAAACXzMEAAAAFXVzZXJTaGFyZVRva2Vuc0Ftb3VudAgFAAAADSR0MDEwMjQ3MTAzNDUAAAACXzQEAAAADWF2YWlsYWJsZUZ1bmQJAABkAAAAAgkBAAAAEnVzZXJBdmFpbGFibGVGdW5kcwAAAAIFAAAABHBvb2wIBQAAAAFpAAAABmNhbGxlcgUAAAALY2xhaW1BbW91bnQDCQAAZgAAAAIFAAAADmNsYWltQW1vdW50QXNrBQAAAA1hdmFpbGFibGVGdW5kCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAMVlvdSBhc2sgbW9yZSBTV09QIHRoZW4geW91IGhhdmUuIEF2YWlsYWJsZSBTV09QOiAJAAGkAAAAAQUAAAANYXZhaWxhYmxlRnVuZAIAAAALLiBZb3UgYXNrOiAJAAGkAAAAAQUAAAAOY2xhaW1BbW91bnRBc2sEAAAAEWF2YWlsYWJsZUZ1bmRzTmV3CQAAZQAAAAIFAAAADWF2YWlsYWJsZUZ1bmQFAAAADmNsYWltQW1vdW50QXNrCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAATa2V5VXNlckxhc3RJbnRlcmVzdAUAAAAPdXNlck5ld0ludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwUAAAAPa2V5TGFzdEludGVyZXN0BQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfBQAAABVrZXlMYXN0SW50ZXJlc3RIZWlnaHQFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAARwb29sAgAAAAFfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgIAAAABXwUAAAARa2V5QXZhaWxhYmxlRnVuZHMFAAAAEWF2YWlsYWJsZUZ1bmRzTmV3CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAEU1dPUAUAAAAOY2xhaW1BbW91bnRBc2sGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAOY2xhaW1BbW91bnRBc2sFAAAABFNXT1AFAAAAA25pbAAAAAAzku02",
    "chainId": 84,
    "height": 1312669,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4iPcNWCpR5gcSy1PjL2b8fByoQJG8KwYreH6UjLcV1Va
Next: none

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

Old	New		Differences
122	122		}
123	123
124	124
125		-	func ~~ClaimCalc~~ (pool,caller) = {
	125	+	func claimCalc (pool,caller) = {
126	126		let shareAssetId = getShareAssetId(pool)
127	127		let scaleValue = calcScaleValue(SWOP, shareAssetId)
128	128		let shareTokenLocked = getTotalShareTokenLocked(pool)
129		-	let $~~t055385603~~ = getLastInterestInfo(pool)
130		-	let lastInterestHeight = $~~t055385603~~._1
131		-	let lastInterest = $~~t055385603~~._2
132		-	let $~~t056085696~~ = rewardInfo(pool)
133		-	let currentRewardPerBlock = $~~t056085696~~._1
134		-	let rewardUpdateHeight = $~~t056085696~~._2
135		-	let previousRewardPerBlock = $~~t056085696~~._3
136		-	let $~~t057015780~~ = getUserInterestInfo(pool, caller)
137		-	let userLastInterest = $~~t057015780~~._1
138		-	let userShareTokensAmount = $~~t057015780~~._2
	129	+	let $t055375602 = getLastInterestInfo(pool)
	130	+	let lastInterestHeight = $t055375602._1
	131	+	let lastInterest = $t055375602._2
	132	+	let $t056075695 = rewardInfo(pool)
	133	+	let currentRewardPerBlock = $t056075695._1
	134	+	let rewardUpdateHeight = $t056075695._2
	135	+	let previousRewardPerBlock = $t056075695._3
	136	+	let $t057005779 = getUserInterestInfo(pool, caller)
	137	+	let userLastInterest = $t057005779._1
	138	+	let userShareTokensAmount = $t057005779._2
139	139		let currentInterest = calcInterest(lastInterestHeight, rewardUpdateHeight, lastInterest, currentRewardPerBlock, shareTokenLocked, previousRewardPerBlock, shareAssetId, scaleValue)
140	140		let claimAmount = fraction(userShareTokensAmount, (currentInterest - userLastInterest), scaleValue)
141	141		let userNewInterest = currentInterest

167	167		func initPoolShareFarming (pool) = if (!(containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey)))
168	168		then throw("Only admin can call this function")
169	169		else {
170		-	let $~~t071437223~~ = rewardInfo(pool)
171		-	let currentReward = $~~t071437223~~._1
172		-	let rewardUpdateHeight = $~~t071437223~~._2
173		-	let previousRewardPerBlock = $~~t071437223~~._3
	170	+	let $t071427222 = rewardInfo(pool)
	171	+	let currentReward = $t071427222._1
	172	+	let rewardUpdateHeight = $t071427222._2
	173	+	let previousRewardPerBlock = $t071427222._3
174	174		[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)]
175	175		}
176	176

178	178
179	179		@Callable(i)
180	180		func lockShareTokens (pool) = {
181		-	let $~~t076737748~~ = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
182		-	let pmtAmount = $~~t076737748~~._1
183		-	let pmtAssetId = $~~t076737748~~._2
	181	+	let $t076727747 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
	182	+	let pmtAmount = $t076727747._1
	183	+	let pmtAssetId = $t076727747._2
184	184		if (!(checkPmtAssetIdCorrect(pool, pmtAssetId)))
185	185		then throw("Incorrect pmtAssetId")
186	186		else {
187		-	let $~~t078417939~~ = ~~ClaimCalc~~(pool, i.caller)
188		-	let userNewInterest = $~~t078417939~~._1
189		-	let currentInterest = $~~t078417939~~._2
190		-	let claimAmount = $~~t078417939~~._3
191		-	let userShareTokensAmount = $~~t078417939~~._4
	187	+	let $t078407938 = claimCalc(pool, i.caller)
	188	+	let userNewInterest = $t078407938._1
	189	+	let currentInterest = $t078407938._2
	190	+	let claimAmount = $t078407938._3
	191	+	let userShareTokensAmount = $t078407938._4
192	192		let userShareAmountNew = (userShareTokensAmount + pmtAmount)
193	193		let availableFundsNew = (userAvailableFunds(pool, i.caller) + claimAmount)
194	194		let totalShareAmount = getTotalShareTokenLocked(pool)

201	201
202	202		@Callable(i)
203	203		func withdrawShareTokens (pool,shareTokensWithdrawAmount) = {
204		-	let $~~t088928990~~ = ~~ClaimCalc~~(pool, i.caller)
205		-	let userNewInterest = $~~t088928990~~._1
206		-	let currentInterest = $~~t088928990~~._2
207		-	let claimAmount = $~~t088928990~~._3
208		-	let userShareTokensAmount = $~~t088928990~~._4
	204	+	let $t088918989 = claimCalc(pool, i.caller)
	205	+	let userNewInterest = $t088918989._1
	206	+	let currentInterest = $t088918989._2
	207	+	let claimAmount = $t088918989._3
	208	+	let userShareTokensAmount = $t088918989._4
209	209		if ((shareTokensWithdrawAmount > userShareTokensAmount))
210	210		then throw("Withdraw amount more then user locked amount")
211	211		else {

221	221		@Callable(i)
222	222		func claim (pool,claimAmountAsk) = {
223	223		let shareTokenLocked = getTotalShareTokenLocked(pool)
224		-	let $~~t01000910074~~ = getLastInterestInfo(pool)
225		-	let lastInterestHeight = $~~t01000910074~~._1
226		-	let lastInterest = $~~t01000910074~~._2
227		-	let $~~t01007910243~~ = rewardInfo(pool)
228		-	let currentRewardPerBlock = $~~t01007910243~~._1
229		-	let rewardUpdateHeight = $~~t01007910243~~._2
230		-	let previousRewardPerBlock = $~~t01007910243~~._3
231		-	let $~~t01024810346~~ = ~~ClaimCalc~~(pool, i.caller)
232		-	let userNewInterest = $~~t01024810346~~._1
233		-	let currentInterest = $~~t01024810346~~._2
234		-	let claimAmount = $~~t01024810346~~._3
235		-	let userShareTokensAmount = $~~t01024810346~~._4
	224	+	let $t01000810073 = getLastInterestInfo(pool)
	225	+	let lastInterestHeight = $t01000810073._1
	226	+	let lastInterest = $t01000810073._2
	227	+	let $t01007810242 = rewardInfo(pool)
	228	+	let currentRewardPerBlock = $t01007810242._1
	229	+	let rewardUpdateHeight = $t01007810242._2
	230	+	let previousRewardPerBlock = $t01007810242._3
	231	+	let $t01024710345 = claimCalc(pool, i.caller)
	232	+	let userNewInterest = $t01024710345._1
	233	+	let currentInterest = $t01024710345._2
	234	+	let claimAmount = $t01024710345._3
	235	+	let userShareTokensAmount = $t01024710345._4
236	236		let availableFund = (userAvailableFunds(pool, i.caller) + claimAmount)
237	237		if ((claimAmountAsk > availableFund))
238	238		then throw(((("You ask more SWOP then you have. Available SWOP: " + toString(availableFund)) + ". You ask: ") + toString(claimAmountAsk)))

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

github/deemru/w8io/03bedc9 
57.36 ms ◑