w8 · tx · Fz8···9vc

tx · Fz8XGheAiqPy5iQSzyAZibArWH7mqsxfC91NZ4Xy29vc

3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J:  -0.01400000 Waves

2022.03.24 09:26 [1977639] smart account 3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Fz8XGheAiqPy5iQSzyAZibArWH7mqsxfC91NZ4Xy29vc",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1648103223603,
    "version": 1,
    "sender": "3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J",
    "senderPublicKey": "4DthuG3xjZV9WtZ34Y66AummdAr67wRzwWsVQL4y2bob",
    "proofs": [
        "5tP9bLKVZyyaRcKeLMiEscoHTM5rCd7GWNfKFtexHvHa4RG3i1tWFAhKikQwYucFmr1HoecThD1FfZpxWJfi9ea3"
    ],
    "script": "base64:AAIFAAAAAAAAACAIAhIHCgUICAEBCBIAEgMKAQESABIAEgMKAQgSAwoBCAAAADQAAAAACXNlcGFyYXRvcgIAAAACX18AAAAABU1VTFQ2AAAAAAAAD0JAAAAAAAVNVUxUOAAAAAAABfXhAAAAAAAGTVVMVFg2CQABNgAAAAEFAAAABU1VTFQ2AAAAAAZNVUxUWDgJAAE2AAAAAQUAAAAFTVVMVDgAAAAAB01VTFRYMTgJAAE2AAAAAQAN4Lazp2QAAAAAAAAKV0FWRVNJRFNUUgIAAAAFV0FWRVMAAAAAB1dBVkVTSUQJAAJZAAAAAQUAAAAKV0FWRVNJRFNUUgEAAAAMa2V5Qm9uZEFzc2V0AAAAAAIAAAANYm9uZF9hc3NldF9pZAEAAAAZa2V5QXVjdGlvbkNvbnRyYWN0QWRkcmVzcwAAAAACAAAAEGF1Y3Rpb25fY29udHJhY3QBAAAAGmtleU5ldXRyaW5vQ29udHJhY3RBZGRyZXNzAAAAAAIAAAAbJXNfX25ldXRyaW5vQ29udHJhY3RBZGRyZXNzAQAAABZrZXlNYXRoQ29udHJhY3RBZGRyZXNzAAAAAAIAAAAQJXNfX21hdGhDb250cmFjdAEAAAAQa2V5TWluTG9ja0Ftb3VudAAAAAACAAAAESVzX19taW5Mb2NrQW1vdW50AQAAAAtrZXlIYWxmTGlmZQAAAAACAAAADCVzX19oYWxmTGlmZQEAAAAWa2V5TG9ja1BhcmFtVXNlckFtb3VudAAAAAEAAAALdXNlckFkZHJlc3MJAAS5AAAAAgkABEwAAAACAgAAAAYlcyVzJXMJAARMAAAAAgIAAAALcGFyYW1CeVVzZXIJAARMAAAAAgkABCUAAAABBQAAAAt1c2VyQWRkcmVzcwkABEwAAAACAgAAAAZhbW91bnQFAAAAA25pbAUAAAAJc2VwYXJhdG9yAQAAABZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAAAAAQAAAAt1c2VyQWRkcmVzcwkABLkAAAACCQAETAAAAAICAAAABiVzJXMlcwkABEwAAAACAgAAAAtwYXJhbUJ5VXNlcgkABEwAAAACCQAEJQAAAAEFAAAAC3VzZXJBZGRyZXNzCQAETAAAAAICAAAABXN0YXJ0BQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAAQa2V5SGlzdG9yeVJlY29yZAAAAAMAAAAEdHlwZQAAAAt1c2VyQWRkcmVzcwAAAAR0eElkCQAEuQAAAAIJAARMAAAAAgIAAAAIJXMlcyVzJXMJAARMAAAAAgIAAAAHaGlzdG9yeQkABEwAAAACBQAAAAR0eXBlCQAETAAAAAIJAAQlAAAAAQUAAAALdXNlckFkZHJlc3MJAARMAAAAAgkAAlgAAAABBQAAAAR0eElkBQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAAXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQAAAAACQAEuQAAAAIJAARMAAAAAgIAAAAEJXMlcwkABEwAAAACAgAAAAVzdGF0cwkABEwAAAACAgAAABFhY3RpdmVUb3RhbExvY2tlZAUAAAADbmlsBQAAAAlzZXBhcmF0b3IBAAAAEmtleVN0YXRzTG9ja3NDb3VudAAAAAAJAAS5AAAAAgkABEwAAAACAgAAAAQlcyVzCQAETAAAAAICAAAABXN0YXRzCQAETAAAAAICAAAACmxvY2tzQ291bnQFAAAAA25pbAUAAAAJc2VwYXJhdG9yAQAAABJrZXlTdGF0c1VzZXJzQ291bnQAAAAACQAEuQAAAAIJAARMAAAAAgIAAAAEJXMlcwkABEwAAAACAgAAAAVzdGF0cwkABEwAAAACAgAAABBhY3RpdmVVc2Vyc0NvdW50BQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAANa2V5TmV4dFBlcmlvZAAAAAACAAAADiVzX19uZXh0UGVyaW9kAQAAABhrZXlTdXBwb3J0ZWRSZXdhcmRBc3NldHMAAAAAAgAAABVzdXBwb3J0ZWRSZXdhcmRBc3NldHMBAAAAEWtleURlcG9zaXROdW1MYXN0AAAAAAkABLkAAAACCQAETAAAAAICAAAABiVzJXMlcwkABEwAAAACAgAAAANkZXAJAARMAAAAAgIAAAAHbGFzdE51bQUAAAADbmlsBQAAAAlzZXBhcmF0b3IBAAAAG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQAAAAEAAAALdXNlckFkZHJlc3MJAAS5AAAAAgkABEwAAAACAgAAAAYlcyVzJXMJAARMAAAAAgIAAAARdXNlclJ3ZEZyb21EZXBOdW0JAARMAAAAAgUAAAALdXNlckFkZHJlc3MFAAAAA25pbAUAAAAJc2VwYXJhdG9yAQAAABVrZXlSZXdhcmRQZXJOc2J0U3VtQXQAAAACAAAACmRlcG9zaXROdW0AAAADdGtuCQAEuQAAAAIJAARMAAAAAgIAAAAEJXMlZAkABEwAAAACAgAAABVyd2RQZXJOc2J0U3VtQnlEZXBOdW0JAARMAAAAAgkAAaQAAAABBQAAAApkZXBvc2l0TnVtCQAETAAAAAIFAAAAA3RrbgUAAAADbmlsBQAAAAlzZXBhcmF0b3IBAAAACWtleVJld2FyZAAAAAIAAAALdXNlckFkZHJlc3MAAAADdGtuCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAICAAAAA3J3ZAkABEwAAAACBQAAAAt1c2VyQWRkcmVzcwkABEwAAAACBQAAAAN0a24FAAAAA25pbAUAAAAJc2VwYXJhdG9yAQAAAAprZXlDbGFpbWVkAAAAAgAAAAt1c2VyQWRkcmVzcwAAAAN0a24JAAS5AAAAAgkABEwAAAACAgAAAAYlcyVzJXMJAARMAAAAAgIAAAADY2xtCQAETAAAAAIFAAAAC3VzZXJBZGRyZXNzCQAETAAAAAIFAAAAA3RrbgUAAAADbmlsBQAAAAlzZXBhcmF0b3IBAAAAF2tleU5vdERpc3RyaWJ1dGVkUmV3YXJkAAAAAQAAAAN0a24JAAS5AAAAAgkABEwAAAACAgAAAAQlcyVzCQAETAAAAAICAAAADm5vdERpc3RyaWJ1dGVkCQAETAAAAAIFAAAAA3RrbgUAAAADbmlsBQAAAAlzZXBhcmF0b3IBAAAABXRvWDE4AAAAAgAAAAdvcmlnVmFsAAAACG9yaWdNdWx0CQABPAAAAAMJAAE2AAAAAQUAAAAHb3JpZ1ZhbAUAAAAHTVVMVFgxOAUAAAAIb3JpZ011bHQBAAAADGdldEludE9yWmVybwAAAAEAAAADa2V5CQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQAAAAAAAAAAAAEAAAAMZ2V0SW50T3JFbHNlAAAAAgAAAANrZXkAAAAKZGVmYXVsdFZhbAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkFAAAACmRlZmF1bHRWYWwBAAAADGdldEludE9yRmFpbAAAAAEAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgIAAAAPTWFuZGF0b3J5IHRoaXMuBQAAAANrZXkCAAAADyBpcyBub3QgZGVmaW5lZAEAAAAMZ2V0U3RyT3JFbHNlAAAAAgAAAANrZXkAAAAKZGVmYXVsdFZhbAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkFAAAACmRlZmF1bHRWYWwBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgIAAAAPTWFuZGF0b3J5IHRoaXMuBQAAAANrZXkCAAAADyBpcyBub3QgZGVmaW5lZAEAAAAPdG9BZGRyZXNzT3JGYWlsAAAAAQAAAAphZGRyZXNzU3RyCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQmAAAAAQUAAAAKYWRkcmVzc1N0cgkAASwAAAACAgAAACFjb3VsZG4ndCBwYXJzZSBwYXNzZWQgYWRkcmVzc1N0cj0FAAAACmFkZHJlc3NTdHIBAAAAC3RvQXNzZXRWZWN0AAAAAQAAAAhhc3NldFN0cgMJAAAAAAAAAgUAAAAIYXNzZXRTdHIFAAAACldBVkVTSURTVFIFAAAABHVuaXQJAAJZAAAAAQUAAAAIYXNzZXRTdHIBAAAABWFzSW50AAAAAQAAAAN2YWwEAAAAByRtYXRjaDAFAAAAA3ZhbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAZ2YWxJbnQFAAAAByRtYXRjaDAFAAAABnZhbEludAkAAAIAAAABAgAAABVmYWlsIHRvIGNhc3QgaW50byBJbnQBAAAAE2Zvcm1hdEhpc3RvcnlSZWNvcmQAAAAEAAAACW9sZEFtb3VudAAAAAhvbGRTdGFydAAAAAluZXdBbW91bnQAAAAIbmV3U3RhcnQJAAS5AAAAAgkABEwAAAACAgAAAAwlZCVkJWQlZCVkJWQJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAkABEwAAAACCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQAETAAAAAIJAAGkAAAAAQUAAAAJb2xkQW1vdW50CQAETAAAAAIJAAGkAAAAAQUAAAAIb2xkU3RhcnQJAARMAAAAAgkAAaQAAAABBQAAAAluZXdBbW91bnQJAARMAAAAAgkAAaQAAAABBQAAAAhuZXdTdGFydAUAAAADbmlsBQAAAAlzZXBhcmF0b3IBAAAAGGZvcm1hdENsYWltSGlzdG9yeVJlY29yZAAAAAIAAAAEdXNlcgAAAA5jbGFpbWVkUmV3YXJkcwkABLkAAAACCQAETAAAAAICAAAACCVzJWQlZCVzCQAETAAAAAIFAAAABHVzZXIJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAkABEwAAAACCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQAETAAAAAIFAAAADmNsYWltZWRSZXdhcmRzBQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAASSGlzdG9yeVJlY29yZEVudHJ5AAAABwAAAAR0eXBlAAAAC3VzZXJBZGRyZXNzAAAABHR4SWQAAAAJb2xkQW1vdW50AAAACG9sZFN0YXJ0AAAACW5ld0Ftb3VudAAAAAhuZXdTdGFydAkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAEGtleUhpc3RvcnlSZWNvcmQAAAADBQAAAAR0eXBlBQAAAAt1c2VyQWRkcmVzcwUAAAAEdHhJZAkBAAAAE2Zvcm1hdEhpc3RvcnlSZWNvcmQAAAAEBQAAAAlvbGRBbW91bnQFAAAACG9sZFN0YXJ0BQAAAAluZXdBbW91bnQFAAAACG5ld1N0YXJ0AQAAABFDbGFpbUhpc3RvcnlFbnRyeQAAAAMAAAALdXNlckFkZHJlc3MAAAAEdHhJZAAAAA5jbGFpbWVkUmV3YXJkcwkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAEGtleUhpc3RvcnlSZWNvcmQAAAADAgAAAAVjbGFpbQUAAAALdXNlckFkZHJlc3MFAAAABHR4SWQJAQAAABhmb3JtYXRDbGFpbUhpc3RvcnlSZWNvcmQAAAACCQAEJQAAAAEFAAAAC3VzZXJBZGRyZXNzBQAAAA5jbGFpbWVkUmV3YXJkcwEAAAALU3RhdHNSZXN1bHQAAAADAAAADnRvdGFsTG9ja2VkSW5jAAAADGxvY2tDb3VudEluYwAAAA11c2Vyc0NvdW50SW5jBAAAAApsb2Nrc0NvdW50CQEAAAAMZ2V0SW50T3JaZXJvAAAAAQkBAAAAEmtleVN0YXRzTG9ja3NDb3VudAAAAAAEAAAACnVzZXJzQ291bnQJAQAAAAxnZXRJbnRPclplcm8AAAABCQEAAAASa2V5U3RhdHNVc2Vyc0NvdW50AAAAAAQAAAALdG90YWxBbW91bnQJAQAAAAxnZXRJbnRPclplcm8AAAABCQEAAAAXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQAAAAABAAAAA50b3RhbEFtb3VudE5ldwkAAGQAAAACBQAAAAt0b3RhbEFtb3VudAUAAAAOdG90YWxMb2NrZWRJbmMJAAUVAAAAAwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEmtleVN0YXRzTG9ja3NDb3VudAAAAAAJAABkAAAAAgUAAAAKbG9ja3NDb3VudAUAAAAMbG9ja0NvdW50SW5jCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAASa2V5U3RhdHNVc2Vyc0NvdW50AAAAAAkAAGQAAAACBQAAAAp1c2Vyc0NvdW50BQAAAA11c2Vyc0NvdW50SW5jCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQAAAAABQAAAA50b3RhbEFtb3VudE5ldwUAAAADbmlsBQAAAAt0b3RhbEFtb3VudAUAAAAOdG90YWxBbW91bnROZXcBAAAAD0xvY2tQYXJhbXNFbnRyeQAAAAMAAAALdXNlckFkZHJlc3MAAAAGYW1vdW50AAAABXN0YXJ0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAWa2V5TG9ja1BhcmFtVXNlckFtb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzBQAAAAZhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAAAAAQUAAAALdXNlckFkZHJlc3MFAAAABXN0YXJ0BQAAAANuaWwBAAAAD2dldFBhcmFtc09yRmFpbAAAAAAEAAAAEG5ldXRyaW5vQ29udHJhY3QJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABCQEAAAAaa2V5TmV1dHJpbm9Db250cmFjdEFkZHJlc3MAAAAACQAFFgAAAAQJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAQbmV1dHJpbm9Db250cmFjdAkBAAAAGWtleUF1Y3Rpb25Db250cmFjdEFkZHJlc3MAAAAACQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAAEG5ldXRyaW5vQ29udHJhY3QJAQAAAAxrZXlCb25kQXNzZXQAAAAACQEAAAAMZ2V0SW50T3JGYWlsAAAAAQkBAAAAEGtleU1pbkxvY2tBbW91bnQAAAAACQEAAAAMZ2V0SW50T3JGYWlsAAAAAQkBAAAAC2tleUhhbGZMaWZlAAAAAAEAAAAMaXNBY3RpdmVVc2VyAAAAAQAAAAt1c2VyQWRkcmVzcwkAAGYAAAACCQEAAAAMZ2V0SW50T3JFbHNlAAAAAgkBAAAAFmtleUxvY2tQYXJhbVVzZXJBbW91bnQAAAABBQAAAAt1c2VyQWRkcmVzcwAAAAAAAAAAAAAAAAAAAAAAAAEAAAATZ2V0VXNlclBhcmFtc09yVW5pdAAAAAEAAAALdXNlckFkZHJlc3MDCQEAAAAMaXNBY3RpdmVVc2VyAAAAAQUAAAALdXNlckFkZHJlc3MJAAUVAAAAAwcJAQAAAAxnZXRJbnRPckZhaWwAAAABCQEAAAAWa2V5TG9ja1BhcmFtVXNlckFtb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzCQEAAAAMZ2V0SW50T3JGYWlsAAAAAQkBAAAAFmtleUxvY2tQYXJhbVN0YXJ0QmxvY2sAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAAEdW5pdAEAAAATZ2V0VXNlclBhcmFtc09yRmFpbAAAAAEAAAALdXNlckFkZHJlc3MJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkBAAAAE2dldFVzZXJQYXJhbXNPclVuaXQAAAABBQAAAAt1c2VyQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAABVVzZXIgCQAEJQAAAAEFAAAAC3VzZXJBZGRyZXNzAgAAAA8gaXMgbm90IGRlZmluZWQAAAAAEnN1cHBvcnRlZEFzc2V0c1N0cgkBAAAADGdldFN0ck9yRWxzZQAAAAIJAQAAABhrZXlTdXBwb3J0ZWRSZXdhcmRBc3NldHMAAAAAAgAAAAAAAAAAE3N1cHBvcnRlZEFzc2V0c0xpc3QJAAS1AAAAAgUAAAASc3VwcG9ydGVkQXNzZXRzU3RyAgAAAAFfAQAAAApjYWxjUmV3YXJkAAAABQAAAAt1c2VyQWRkcmVzcwAAAAdhc3NldElkAAAADXN0YWtlZEFtb3VudFgAAAAOZGVwb3NpdE51bVVzZXIAAAAOZGVwb3NpdE51bUxhc3QEAAAAF3Jld2FyZFBlck5zYnRTdW1MYXN0S0VZCQEAAAAVa2V5UmV3YXJkUGVyTnNidFN1bUF0AAAAAgUAAAAOZGVwb3NpdE51bUxhc3QFAAAAB2Fzc2V0SWQEAAAACnN1bUxhc3RYMTgJAAGnAAAAAQkBAAAADGdldFN0ck9yRWxzZQAAAAIJAQAAABVrZXlSZXdhcmRQZXJOc2J0U3VtQXQAAAACBQAAAA5kZXBvc2l0TnVtTGFzdAUAAAAHYXNzZXRJZAIAAAABMAQAAAAKc3VtVXNlclgxOAkAAacAAAABCQEAAAAMZ2V0U3RyT3JFbHNlAAAAAgkBAAAAFWtleVJld2FyZFBlck5zYnRTdW1BdAAAAAIFAAAADmRlcG9zaXROdW1Vc2VyBQAAAAdhc3NldElkAgAAAAEwBAAAABFyZXdhcmREeW5hbWljUGFydAkAAaAAAAABCQABPAAAAAMJAAE4AAAAAgUAAAAKc3VtTGFzdFgxOAUAAAAKc3VtVXNlclgxOAUAAAANc3Rha2VkQW1vdW50WAUAAAAHTVVMVFgxOAQAAAATcmV3YXJkQ2FjaGVkUGFydEtFWQkBAAAACWtleVJld2FyZAAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAAdhc3NldElkBAAAABByZXdhcmRDYWNoZWRQYXJ0CQEAAAAMZ2V0SW50T3JFbHNlAAAAAgUAAAATcmV3YXJkQ2FjaGVkUGFydEtFWQAAAAAAAAAAAAkABRYAAAAECQAAZAAAAAIFAAAAEHJld2FyZENhY2hlZFBhcnQFAAAAEXJld2FyZER5bmFtaWNQYXJ0BQAAABByZXdhcmRDYWNoZWRQYXJ0BQAAABFyZXdhcmREeW5hbWljUGFydAUAAAATcmV3YXJkQ2FjaGVkUGFydEtFWQEAAAANUmV3YXJkRW50cmllcwAAAAMAAAAJaXNOZXdVc2VyAAAAC3VzZXJBZGRyZXNzAAAADHN0YWtlZEFtb3VudAQAAAANc3Rha2VkQW1vdW50WAkAATYAAAABBQAAAAxzdGFrZWRBbW91bnQEAAAAG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQkBAAAAG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQAAAAEFAAAAC3VzZXJBZGRyZXNzBAAAAA5kZXBvc2l0TnVtVXNlcgkBAAAADGdldEludE9yRWxzZQAAAAIFAAAAG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQD//////////wQAAAAOZGVwb3NpdE51bUxhc3QJAQAAAAxnZXRJbnRPckVsc2UAAAACCQEAAAARa2V5RGVwb3NpdE51bUxhc3QAAAAAAP//////////CgEAAAAbZm9yRWFjaEFzc2V0Q2FjaGVVc2VyUmV3YXJkAAAAAgAAAAVhY2N1bQAAAAVhc3NldAQAAAALJHQwNzM1OTc0OTQJAQAAAApjYWxjUmV3YXJkAAAABQUAAAALdXNlckFkZHJlc3MFAAAABWFzc2V0BQAAAA1zdGFrZWRBbW91bnRYBQAAAA5kZXBvc2l0TnVtVXNlcgUAAAAOZGVwb3NpdE51bUxhc3QEAAAAC3Jld2FyZFRvdGFsCAUAAAALJHQwNzM1OTc0OTQAAAACXzEEAAAABmNhY2hlZAgFAAAACyR0MDczNTk3NDk0AAAAAl8yBAAAAAdkeW5hbWljCAUAAAALJHQwNzM1OTc0OTQAAAACXzMEAAAAE3Jld2FyZENhY2hlZFBhcnRLRVkIBQAAAAskdDA3MzU5NzQ5NAAAAAJfNAkABE0AAAACBQAAAAVhY2N1bQkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAE3Jld2FyZENhY2hlZFBhcnRLRVkFAAAAC3Jld2FyZFRvdGFsAwMJAAAAAAAAAgUAAAAOZGVwb3NpdE51bUxhc3QA//////////8JAAAAAAAAAgUAAAAOZGVwb3NpdE51bVVzZXIA//////////8HBQAAAANuaWwDAwkAAAAAAAACBQAAAA5kZXBvc2l0TnVtTGFzdAD//////////wkAAGYAAAACBQAAAA5kZXBvc2l0TnVtVXNlcgD//////////wcJAAACAAAAAQIAAAAvaW52YWxpZCBkZXBvc2l0TnVtTGFzdCBhbmQgZGVwb3NpdE51bVVzZXIgc3RhdGUDAwkAAGYAAAACBQAAAA5kZXBvc2l0TnVtTGFzdAD//////////wkAAAAAAAACBQAAAA5kZXBvc2l0TnVtVXNlcgD//////////wcDBQAAAAlpc05ld1VzZXIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQUAAAAOZGVwb3NpdE51bUxhc3QFAAAAA25pbAkABE0AAAACCgAAAAACJGwFAAAAE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABtmb3JFYWNoQXNzZXRDYWNoZVVzZXJSZXdhcmQAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAUkZjBfMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAUkZjBfMgAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQAAAA5kZXBvc2l0TnVtTGFzdAMDCQAAZgAAAAIFAAAADmRlcG9zaXROdW1MYXN0AP//////////CQAAZgAAAAIFAAAADmRlcG9zaXROdW1Vc2VyAP//////////BwMFAAAACWlzTmV3VXNlcgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQAAAA5kZXBvc2l0TnVtTGFzdAUAAAADbmlsCQAETQAAAAIKAAAAAAIkbAUAAAATc3VwcG9ydGVkQXNzZXRzTGlzdAoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAABSRmMF8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAG2ZvckVhY2hBc3NldENhY2hlVXNlclJld2FyZAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkFAAAADmRlcG9zaXROdW1MYXN0CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAJHVuY292ZXJlZCBjb25kaXRpb246IGRlcG9zaXROdW1MYXN0PQkAAaQAAAABBQAAAA5kZXBvc2l0TnVtTGFzdAIAAAAQIGRlcG9zaXROdW1Vc2VyPQkAAaQAAAABBQAAAA5kZXBvc2l0TnVtVXNlcgEAAAAiSW5jcmVtZW50Tm90RGlzdHJpYnV0ZWRSZXdhcmRFbnRyeQAAAAIAAAADdGtuAAAACWFtb3VudEluYwQAAAAXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJAQAAABdrZXlOb3REaXN0cmlidXRlZFJld2FyZAAAAAEFAAAAA3RrbgQAAAAUbm90RGlzdHJpYnV0ZWRSZXdhcmQJAQAAAAxnZXRJbnRPckVsc2UAAAACBQAAABdub3REaXN0cmlidXRlZFJld2FyZEtFWQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJAABkAAAAAgUAAAAUbm90RGlzdHJpYnV0ZWRSZXdhcmQFAAAACWFtb3VudEluYwUAAAADbmlsAAAABwAAAAFpAQAAAAtjb25zdHJ1Y3RvcgAAAAUAAAAXbmV1dHJpbm9Db250cmFjdEFkZHJlc3MAAAATbWF0aENvbnRyYWN0QWRkcmVzcwAAAA1taW5Mb2NrQW1vdW50AAAACGhhbGZMaWZlAAAAFXN1cHBvcnRlZFJld2FyZEFzc2V0cwMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwkAAAIAAAABAgAAABFQZXJtaXNzaW9uIGRlbmllZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAaa2V5TmV1dHJpbm9Db250cmFjdEFkZHJlc3MAAAAABQAAABduZXV0cmlub0NvbnRyYWN0QWRkcmVzcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAWa2V5TWF0aENvbnRyYWN0QWRkcmVzcwAAAAAFAAAAE21hdGhDb250cmFjdEFkZHJlc3MJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABBrZXlNaW5Mb2NrQW1vdW50AAAAAAUAAAANbWluTG9ja0Ftb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAC2tleUhhbGZMaWZlAAAAAAUAAAAIaGFsZkxpZmUJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAGGtleVN1cHBvcnRlZFJld2FyZEFzc2V0cwAAAAAFAAAAFXN1cHBvcnRlZFJld2FyZEFzc2V0cwUAAAADbmlsAAAAAWkBAAAABXN0YWtlAAAAAAQAAAANJHQwMTExNDgxMTIyNwkBAAAAD2dldFBhcmFtc09yRmFpbAAAAAAEAAAAD2F1Y3Rpb25Db250cmFjdAgFAAAADSR0MDExMTQ4MTEyMjcAAAACXzEEAAAAC2JvbmRBc3NldElkCAUAAAANJHQwMTExNDgxMTIyNwAAAAJfMgQAAAANbWluTG9ja0Ftb3VudAgFAAAADSR0MDExMTQ4MTEyMjcAAAACXzMEAAAACGhhbGZMaWZlCAUAAAANJHQwMTExNDgxMTIyNwAAAAJfNAMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAAVSW52YWxpZCBwYXltZW50cyBzaXplBAAAAAdwYXltZW50CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAZhbW91bnQIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAATaW52YWxpZEFzc2V0TWVzc2FnZQkAASwAAAACCQABLAAAAAICAAAAD0ludmFsaWQgYXNzZXQuIAkAAlgAAAABBQAAAAtib25kQXNzZXRJZAIAAAAMIGlzIGV4cGVjdGVkBAAAAAdhc3NldElkCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAAE2ludmFsaWRBc3NldE1lc3NhZ2UDCQEAAAACIT0AAAACBQAAAAdhc3NldElkBQAAAAtib25kQXNzZXRJZAkAAAIAAAABBQAAABNpbnZhbGlkQXNzZXRNZXNzYWdlBAAAAAt1c2VyQWRkcmVzcwgFAAAAAWkAAAAGY2FsbGVyBAAAAA51c2VyQWRkcmVzc1N0cgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAADSR0MDExNzY5MTE4NzYJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAABNnZXRVc2VyUGFyYW1zT3JVbml0AAAAAQUAAAALdXNlckFkZHJlc3MJAAUVAAAAAwYAAAAAAAAAAAAA//////////8EAAAACWlzTmV3VXNlcggFAAAADSR0MDExNzY5MTE4NzYAAAACXzEEAAAACmxvY2tBbW91bnQIBQAAAA0kdDAxMTc2OTExODc2AAAAAl8yBAAAAA9sb2NrU3RhcnRIZWlnaHQIBQAAAA0kdDAxMTc2OTExODc2AAAAAl8zBAAAAAxtZXJnZWRBbW91bnQDBQAAAAlpc05ld1VzZXIFAAAABmFtb3VudAkAAGQAAAACBQAAAAZhbW91bnQFAAAACmxvY2tBbW91bnQEAAAAEW1lcmdlZFN0YXJ0SGVpZ2h0AwUAAAAJaXNOZXdVc2VyBQAAAAZoZWlnaHQEAAAADG1hdGhDb250cmFjdAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEJAQAAABZrZXlNYXRoQ29udHJhY3RBZGRyZXNzAAAAAAkBAAAABWFzSW50AAAAAQkAA/wAAAAEBQAAAAxtYXRoQ29udHJhY3QCAAAAE21lcmdlU3Rha2VzUkVBRE9OTFkJAARMAAAAAgUAAAAGYW1vdW50CQAETAAAAAIFAAAABmhlaWdodAkABEwAAAACBQAAAApsb2NrQW1vdW50CQAETAAAAAIFAAAAD2xvY2tTdGFydEhlaWdodAkABEwAAAACBQAAAAhoYWxmTGlmZQUAAAADbmlsBQAAAANuaWwDCQAAZgAAAAIFAAAADW1pbkxvY2tBbW91bnQFAAAADG1lcmdlZEFtb3VudAkAAAIAAAABCQABLAAAAAICAAAAE01pbiBsb2NrIGFtb3VudCBpcyAJAAGkAAAAAQUAAAANbWluTG9ja0Ftb3VudAQAAAANJHQwMTIzMjYxMjQyOAkBAAAAC1N0YXRzUmVzdWx0AAAAAwUAAAAGYW1vdW50AAAAAAAAAAABAwUAAAAJaXNOZXdVc2VyAAAAAAAAAAABAAAAAAAAAAAABAAAAAxzdGF0c0VudHJpZXMIBQAAAA0kdDAxMjMyNjEyNDI4AAAAAl8xBAAAAAt0b3RhbFN0YWtlZAgFAAAADSR0MDEyMzI2MTI0MjgAAAACXzIEAAAADnRvdGFsU3Rha2VkTmV3CAUAAAANJHQwMTIzMjYxMjQyOAAAAAJfMwkABE4AAAACCQAETgAAAAIJAAROAAAAAgkABEwAAAACCQEAAAASSGlzdG9yeVJlY29yZEVudHJ5AAAABwIAAAAFc3Rha2UFAAAAC3VzZXJBZGRyZXNzCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBQAAAApsb2NrQW1vdW50BQAAAA9sb2NrU3RhcnRIZWlnaHQFAAAADG1lcmdlZEFtb3VudAUAAAARbWVyZ2VkU3RhcnRIZWlnaHQFAAAAA25pbAkBAAAADVJld2FyZEVudHJpZXMAAAADBQAAAAlpc05ld1VzZXIFAAAADnVzZXJBZGRyZXNzU3RyBQAAAApsb2NrQW1vdW50CQEAAAAPTG9ja1BhcmFtc0VudHJ5AAAAAwUAAAALdXNlckFkZHJlc3MFAAAADG1lcmdlZEFtb3VudAUAAAARbWVyZ2VkU3RhcnRIZWlnaHQFAAAADHN0YXRzRW50cmllcwAAAAFpAQAAAAd1bnN0YWtlAAAAAQAAAAZhbW91bnQDCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAACQAAAgAAAAECAAAAI3Vuc3Rha2UgZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50BAAAAAt1c2VyQWRkcmVzcwgFAAAAAWkAAAAGY2FsbGVyBAAAAA51c2VyQWRkcmVzc1N0cgkABCUAAAABBQAAAAt1c2VyQWRkcmVzcwQAAAANJHQwMTI5MTQxMjk5MgkBAAAAD2dldFBhcmFtc09yRmFpbAAAAAAEAAAADmF1Y3Rpb25BZGRyZXNzCAUAAAANJHQwMTI5MTQxMjk5MgAAAAJfMQQAAAALYm9uZEFzc2V0SWQIBQAAAA0kdDAxMjkxNDEyOTkyAAAAAl8yBAAAAA1taW5Mb2NrQW1vdW50CAUAAAANJHQwMTI5MTQxMjk5MgAAAAJfMwQAAAAIaGFsZkxpZmUIBQAAAA0kdDAxMjkxNDEyOTkyAAAAAl80BAAAAA0kdDAxMjk5NTEzMDY5CQEAAAATZ2V0VXNlclBhcmFtc09yRmFpbAAAAAEFAAAAC3VzZXJBZGRyZXNzBAAAAAlpc05ld1VzZXIIBQAAAA0kdDAxMjk5NTEzMDY5AAAAAl8xBAAAAApsb2NrQW1vdW50CAUAAAANJHQwMTI5OTUxMzA2OQAAAAJfMgQAAAAJbG9ja1N0YXJ0CAUAAAANJHQwMTI5OTUxMzA2OQAAAAJfMwMJAABnAAAAAgAAAAAAAAAAAAUAAAAKbG9ja0Ftb3VudAkAAAIAAAABAgAAABJOb3RoaW5nIHRvIHVuc3Rha2UDCQAAZgAAAAIFAAAABmFtb3VudAUAAAAKbG9ja0Ftb3VudAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAApSZXF1ZXN0ZWQgCQABpAAAAAEFAAAABmFtb3VudAIAAAASLCBidXQgc3Rha2VkIG9ubHkgCQABpAAAAAEFAAAACmxvY2tBbW91bnQEAAAADG1hdGhDb250cmFjdAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEJAQAAABZrZXlNYXRoQ29udHJhY3RBZGRyZXNzAAAAAAQAAAAPY29taXNzaW9uQW1vdW50CQEAAAAFYXNJbnQAAAABCQAD/AAAAAQFAAAADG1hdGhDb250cmFjdAIAAAAhZ2V0VW5zdGFrZUNvbWlzc2lvbkFtb3VudFJFQURPTkxZCQAETAAAAAIFAAAABmFtb3VudAkABEwAAAACBQAAAAlsb2NrU3RhcnQJAARMAAAAAgUAAAAIaGFsZkxpZmUFAAAAA25pbAUAAAADbmlsBAAAAA0kdDAxMzQ3MDEzNjI0CQEAAAALU3RhdHNSZXN1bHQAAAADCQEAAAABLQAAAAEFAAAABmFtb3VudAMJAAAAAAAAAgUAAAAGYW1vdW50BQAAAApsb2NrQW1vdW50AP//////////AAAAAAAAAAAAAwkAAAAAAAACBQAAAAZhbW91bnQFAAAACmxvY2tBbW91bnQA//////////8AAAAAAAAAAAAEAAAADHN0YXRzRW50cmllcwgFAAAADSR0MDEzNDcwMTM2MjQAAAACXzEEAAAAC3RvdGFsU3Rha2VkCAUAAAANJHQwMTM0NzAxMzYyNAAAAAJfMgQAAAAOdG90YWxTdGFrZWROZXcIBQAAAA0kdDAxMzQ3MDEzNjI0AAAAAl8zCQAETgAAAAIJAAROAAAAAgkABE4AAAACCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3VzZXJBZGRyZXNzCQAAZQAAAAIFAAAABmFtb3VudAUAAAAPY29taXNzaW9uQW1vdW50BQAAAAtib25kQXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAHQWRkcmVzcwAAAAEFAAAADmF1Y3Rpb25BZGRyZXNzBQAAAA9jb21pc3Npb25BbW91bnQFAAAAC2JvbmRBc3NldElkCQAETAAAAAIJAQAAABJIaXN0b3J5UmVjb3JkRW50cnkAAAAHAgAAAAd1bnN0YWtlBQAAAAt1c2VyQWRkcmVzcwgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAUAAAAKbG9ja0Ftb3VudAUAAAAJbG9ja1N0YXJ0CQAAZQAAAAIFAAAACmxvY2tBbW91bnQFAAAABmFtb3VudAUAAAAJbG9ja1N0YXJ0BQAAAANuaWwJAQAAAA1SZXdhcmRFbnRyaWVzAAAAAwcFAAAADnVzZXJBZGRyZXNzU3RyBQAAAApsb2NrQW1vdW50CQEAAAAPTG9ja1BhcmFtc0VudHJ5AAAAAwUAAAALdXNlckFkZHJlc3MJAABlAAAAAgUAAAAKbG9ja0Ftb3VudAUAAAAGYW1vdW50BQAAAAlsb2NrU3RhcnQFAAAADHN0YXRzRW50cmllcwAAAAFpAQAAAAdkZXBvc2l0AAAAAAMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAAfZXhhY3QgMSBwYXltZW50IGlzIGFsbG93ZWQgb25seQQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAZhbW91bnQIBQAAAANwbXQAAAAGYW1vdW50BAAAAApwbXRBc3NldElkCQEAAAALdmFsdWVPckVsc2UAAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB1dBVkVTSUQEAAAADXBtdEFzc2V0SWRTdHIJAAJYAAAAAQUAAAAKcG10QXNzZXRJZAQAAAAIcG10TXVsdFgDCQAAAAAAAAIFAAAACnBtdEFzc2V0SWQFAAAAB1dBVkVTSUQFAAAABk1VTFRYOAUAAAAGTVVMVFg2BAAAAAdhbW91bnRYCQABNgAAAAEFAAAABmFtb3VudAQAAAALdG90YWxTdGFrZWQJAQAAAAxnZXRJbnRPckVsc2UAAAACCQEAAAAXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQAAAAAAAAAAAAAAAAABAAAAAx0b3RhbFN0YWtlZFgJAAE2AAAAAQUAAAALdG90YWxTdGFrZWQDCQAAZgAAAAIAAAAAAAAAAAAFAAAAC3RvdGFsU3Rha2VkCQAAAgAAAAECAAAAG1RPRE86IGNhc2UgaXMgbm90IHN1cHBvcnRlZAMJAAAAAAAAAgUAAAALdG90YWxTdGFrZWQAAAAAAAAAAAAJAQAAACJJbmNyZW1lbnROb3REaXN0cmlidXRlZFJld2FyZEVudHJ5AAAAAgUAAAANcG10QXNzZXRJZFN0cgUAAAAGYW1vdW50BAAAABByZXdhcmRQZXJOc2J0WDE4CQABPAAAAAMFAAAAB2Ftb3VudFgFAAAAB01VTFRYMTgFAAAADHRvdGFsU3Rha2VkWAQAAAARZGVwb3NpdE51bUxhc3RLRVkJAQAAABFrZXlEZXBvc2l0TnVtTGFzdAAAAAAEAAAADmRlcG9zaXROdW1MYXN0CQEAAAAMZ2V0SW50T3JFbHNlAAAAAgUAAAARZGVwb3NpdE51bUxhc3RLRVkA//////////8EAAAADWRlcG9zaXROdW1OZXcJAABkAAAAAgUAAAAOZGVwb3NpdE51bUxhc3QAAAAAAAAAAAEDCQEAAAABIQAAAAEJAQAAAAhjb250YWlucwAAAAIFAAAAEnN1cHBvcnRlZEFzc2V0c1N0cgUAAAANcG10QXNzZXRJZFN0cgkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgUAAAASc3VwcG9ydGVkQXNzZXRzU3RyAgAAABEgZG9lc24ndCBjb250YWluIAUAAAANcG10QXNzZXRJZFN0cgoBAAAAF3JlZnJlc2hSZXdhcmRQZXJOc2J0U1VNAAAAAgAAAAVhY2N1bQAAAAluZXh0QXNzZXQEAAAAFnJld2FyZFBlck5zYnRTdW1OZXdLRVkJAQAAABVrZXlSZXdhcmRQZXJOc2J0U3VtQXQAAAACBQAAAA1kZXBvc2l0TnVtTmV3BQAAAAluZXh0QXNzZXQEAAAACnN1bUxhc3RTdHIJAQAAAAxnZXRTdHJPckVsc2UAAAACCQEAAAAVa2V5UmV3YXJkUGVyTnNidFN1bUF0AAAAAgUAAAAOZGVwb3NpdE51bUxhc3QFAAAACW5leHRBc3NldAIAAAABMAkABE0AAAACBQAAAAVhY2N1bQMJAAAAAAAAAgUAAAAJbmV4dEFzc2V0BQAAAA1wbXRBc3NldElkU3RyCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABZyZXdhcmRQZXJOc2J0U3VtTmV3S0VZCQABpgAAAAEJAAE3AAAAAgkAAacAAAABBQAAAApzdW1MYXN0U3RyBQAAABByZXdhcmRQZXJOc2J0WDE4CQEAAAALU3RyaW5nRW50cnkAAAACBQAAABZyZXdhcmRQZXJOc2J0U3VtTmV3S0VZBQAAAApzdW1MYXN0U3RyCQAETQAAAAIKAAAAAAIkbAUAAAATc3VwcG9ydGVkQXNzZXRzTGlzdAoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAABSRmMF8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAF3JlZnJlc2hSZXdhcmRQZXJOc2J0U1VNAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAEWRlcG9zaXROdW1MYXN0S0VZBQAAAA1kZXBvc2l0TnVtTmV3AAAAAWkBAAAADGNsYWltUmV3YXJkcwAAAAAEAAAAC3VzZXJBZGRyZXNzCAUAAAABaQAAAAZjYWxsZXIEAAAADnVzZXJBZGRyZXNzU3RyCQAEJQAAAAEFAAAAC3VzZXJBZGRyZXNzAwkAAGYAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAACQAAAgAAAAECAAAAGXBheW1lbnRzIGFyZSBub3QgYWNjZXB0ZWQEAAAADSR0MDE1ODgwMTU5ODUJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAABNnZXRVc2VyUGFyYW1zT3JVbml0AAAAAQUAAAALdXNlckFkZHJlc3MJAAUVAAAAAwYAAAAAAAAAAAAAAAAAAAAAAAAEAAAACWlzTmV3VXNlcggFAAAADSR0MDE1ODgwMTU5ODUAAAACXzEEAAAADHN0YWtlZEFtb3VudAgFAAAADSR0MDE1ODgwMTU5ODUAAAACXzIEAAAADHN0YWtpbmdTdGFydAgFAAAADSR0MDE1ODgwMTU5ODUAAAACXzMEAAAADXN0YWtlZEFtb3VudFgJAAE2AAAAAQUAAAAMc3Rha2VkQW1vdW50BAAAABt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJAQAAABtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0AAAABBQAAAA51c2VyQWRkcmVzc1N0cgQAAAAOZGVwb3NpdE51bVVzZXIJAQAAAAxnZXRJbnRPckVsc2UAAAACBQAAABt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA//////////8EAAAADmRlcG9zaXROdW1MYXN0CQEAAAAMZ2V0SW50T3JFbHNlAAAAAgkBAAAAEWtleURlcG9zaXROdW1MYXN0AAAAAAD//////////woBAAAAH2ZvckVhY2hBc3NldENhbGNVbmNsYWltZWRSZXdhcmQAAAACAAAABWFjY3VtAAAABWFzc2V0BAAAAA0kdDAxNjM1NjE2NDk0CQEAAAAKY2FsY1Jld2FyZAAAAAUFAAAADnVzZXJBZGRyZXNzU3RyBQAAAAVhc3NldAUAAAANc3Rha2VkQW1vdW50WAUAAAAOZGVwb3NpdE51bVVzZXIFAAAADmRlcG9zaXROdW1MYXN0BAAAAAtyZXdhcmRUb3RhbAgFAAAADSR0MDE2MzU2MTY0OTQAAAACXzEEAAAABmNhY2hlZAgFAAAADSR0MDE2MzU2MTY0OTQAAAACXzIEAAAAB2R5bmFtaWMIBQAAAA0kdDAxNjM1NjE2NDk0AAAAAl8zBAAAABNyZXdhcmRDYWNoZWRQYXJ0S0VZCAUAAAANJHQwMTYzNTYxNjQ5NAAAAAJfNAQAAAAKY2xhaW1lZEtFWQkBAAAACmtleUNsYWltZWQAAAACBQAAAA51c2VyQWRkcmVzc1N0cgUAAAAFYXNzZXQEAAAADSR0MDE2NTU0MTY1OTEFAAAABWFjY3VtBAAAAARkYXRhCAUAAAANJHQwMTY1NTQxNjU5MQAAAAJfMQQAAAARY2xhaW1lZEFtdEJ5QXNzZXQIBQAAAA0kdDAxNjU1NDE2NTkxAAAAAl8yBAAAAAduZXdQYXJ0CQAEuQAAAAIJAARMAAAAAgUAAAAFYXNzZXQJAARMAAAAAgkAAaQAAAABBQAAAAtyZXdhcmRUb3RhbAUAAAADbmlsAgAAAAE6BAAAABRjbGFpbWVkQW10QnlBc3NldE5ldwkABLkAAAACCQAETAAAAAIFAAAAEWNsYWltZWRBbXRCeUFzc2V0CQAETAAAAAIFAAAAB25ld1BhcnQFAAAAA25pbAIAAAABXwMJAABnAAAAAgAAAAAAAAAAAAUAAAALcmV3YXJkVG90YWwJAAUUAAAAAgUAAAAEZGF0YQUAAAAUY2xhaW1lZEFtdEJ5QXNzZXROZXcJAAUUAAAAAgkABE0AAAACCQAETQAAAAIJAARNAAAAAgUAAAAEZGF0YQkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAALdXNlckFkZHJlc3MFAAAAC3Jld2FyZFRvdGFsCQEAAAALdG9Bc3NldFZlY3QAAAABBQAAAAVhc3NldAkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAACmNsYWltZWRLRVkJAABkAAAAAgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB8AAAABBQAAAApjbGFpbWVkS0VZAAAAAAAAAAAABQAAAAtyZXdhcmRUb3RhbAkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAE3Jld2FyZENhY2hlZFBhcnRLRVkAAAAAAAAAAAAFAAAAFGNsYWltZWRBbXRCeUFzc2V0TmV3BAAAAA0kdDAxNzA1MTE3MTY1CgAAAAACJGwFAAAAE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwCQAFFAAAAAIFAAAAA25pbAIAAAAACgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAfZm9yRWFjaEFzc2V0Q2FsY1VuY2xhaW1lZFJld2FyZAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoEAAAACXRyYW5zZmVycwgFAAAADSR0MDE3MDUxMTcxNjUAAAACXzEEAAAAF2NsYWltZWRBbXRCeUFzc2V0UmVzdWx0CAUAAAANJHQwMTcwNTExNzE2NQAAAAJfMgMJAABnAAAAAgAAAAAAAAAAAAkAAZAAAAABBQAAAAl0cmFuc2ZlcnMJAAACAAAAAQIAAAAQbm90aGluZyB0byBjbGFpbQkABE0AAAACCQAETQAAAAIFAAAACXRyYW5zZmVycwkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQUAAAAOZGVwb3NpdE51bUxhc3QJAQAAABFDbGFpbUhpc3RvcnlFbnRyeQAAAAMFAAAAC3VzZXJBZGRyZXNzCAUAAAABaQAAAA10cmFuc2FjdGlvbklkCQABMAAAAAIFAAAAF2NsYWltZWRBbXRCeUFzc2V0UmVzdWx0AAAAAAAAAAABAAAAAWkBAAAAGHVuY2xhaW1lZFJld2FyZHNSRUFET05MWQAAAAEAAAAOdXNlckFkZHJlc3NTdHIKAQAAABZmb3JFYWNoQXNzZXRaZXJvUmV3YXJkAAAAAgAAAAVhY2N1bQAAAAVhc3NldAkAASwAAAACCQABLAAAAAIFAAAABWFjY3VtCQAEuQAAAAIJAARMAAAAAgUAAAAFYXNzZXQJAARMAAAAAgIAAAABMAkABEwAAAACAgAAAAEwBQAAAANuaWwCAAAAAToCAAAAAV8EAAAAEnVuY2xhaW1lZFJld2FyZFN0cgMJAAAAAAAAAgUAAAAOdXNlckFkZHJlc3NTdHICAAAAAAoAAAAAAiRsBQAAABNzdXBwb3J0ZWRBc3NldHNMaXN0CgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAIAAAAACgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAWZm9yRWFjaEFzc2V0WmVyb1Jld2FyZAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoEAAAAC3VzZXJBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA51c2VyQWRkcmVzc1N0cgQAAAANJHQwMTc4MjQxNzkyOQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAAE2dldFVzZXJQYXJhbXNPclVuaXQAAAABBQAAAAt1c2VyQWRkcmVzcwkABRUAAAADBgAAAAAAAAAAAAAAAAAAAAAAAAQAAAAJaXNOZXdVc2VyCAUAAAANJHQwMTc4MjQxNzkyOQAAAAJfMQQAAAAMc3Rha2VkQW1vdW50CAUAAAANJHQwMTc4MjQxNzkyOQAAAAJfMgQAAAAMc3Rha2luZ1N0YXJ0CAUAAAANJHQwMTc4MjQxNzkyOQAAAAJfMwQAAAANc3Rha2VkQW1vdW50WAkAATYAAAABBQAAAAxzdGFrZWRBbW91bnQEAAAAG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQkBAAAAG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQAAAAEFAAAADnVzZXJBZGRyZXNzU3RyBAAAAA5kZXBvc2l0TnVtVXNlcgkBAAAADGdldEludE9yRWxzZQAAAAIFAAAAG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQD//////////wQAAAAOZGVwb3NpdE51bUxhc3QJAQAAAAxnZXRJbnRPckVsc2UAAAACCQEAAAARa2V5RGVwb3NpdE51bUxhc3QAAAAAAP//////////CgEAAAAfZm9yRWFjaEFzc2V0Q2FsY1VuY2xhaW1lZFJld2FyZAAAAAIAAAAFYWNjdW0AAAAFYXNzZXQEAAAADSR0MDE4Mjc1MTg0MTMJAQAAAApjYWxjUmV3YXJkAAAABQUAAAAOdXNlckFkZHJlc3NTdHIFAAAABWFzc2V0BQAAAA1zdGFrZWRBbW91bnRYBQAAAA5kZXBvc2l0TnVtVXNlcgUAAAAOZGVwb3NpdE51bUxhc3QEAAAAC3Jld2FyZFRvdGFsCAUAAAANJHQwMTgyNzUxODQxMwAAAAJfMQQAAAAGY2FjaGVkCAUAAAANJHQwMTgyNzUxODQxMwAAAAJfMgQAAAAHZHluYW1pYwgFAAAADSR0MDE4Mjc1MTg0MTMAAAACXzMEAAAAE3Jld2FyZENhY2hlZFBhcnRLRVkIBQAAAA0kdDAxODI3NTE4NDEzAAAAAl80BAAAAAdjbGFpbWVkCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHwAAAAEJAQAAAAprZXlDbGFpbWVkAAAAAgUAAAAOdXNlckFkZHJlc3NTdHIFAAAABWFzc2V0AAAAAAAAAAAACQABLAAAAAIJAAEsAAAAAgUAAAAFYWNjdW0JAAS5AAAAAgkABEwAAAACBQAAAAVhc3NldAkABEwAAAACCQABpAAAAAEFAAAAC3Jld2FyZFRvdGFsCQAETAAAAAIJAAGkAAAAAQUAAAAHY2xhaW1lZAUAAAADbmlsAgAAAAE6AgAAAAFfCgAAAAACJGwFAAAAE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAgAAAAAKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAB9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgkABRQAAAACBQAAAANuaWwJAQAAAAlkcm9wUmlnaHQAAAACBQAAABJ1bmNsYWltZWRSZXdhcmRTdHIAAAAAAAAAAAEAAAABaQEAAAAWbnNidFN0YWtpbmdTWVNSRUFET05MWQAAAAEAAAAOdXNlckFkZHJlc3NTdHIEAAAADHRvdGFsTnNidEFtdAkBAAAADGdldEludE9yRWxzZQAAAAIJAQAAABdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAAAAAAAAAAAAAAAAADCQAAAAAAAAIFAAAADnVzZXJBZGRyZXNzU3RyAgAAAAAJAAUUAAAAAgUAAAADbmlsCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgUAAAAMdG90YWxOc2J0QW10CQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAQAAAALdXNlckFkZHJlc3MJAQAAAA90b0FkZHJlc3NPckZhaWwAAAABBQAAAA51c2VyQWRkcmVzc1N0cgQAAAANJHQwMTkwMTcxOTEyMQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAAE2dldFVzZXJQYXJhbXNPclVuaXQAAAABBQAAAAt1c2VyQWRkcmVzcwkABRUAAAADBgAAAAAAAAAAAAAAAAAAAAAAAAQAAAAJaXNOZXdVc2VyCAUAAAANJHQwMTkwMTcxOTEyMQAAAAJfMQQAAAALdXNlck5zYnRBbXQIBQAAAA0kdDAxOTAxNzE5MTIxAAAAAl8yBAAAAAxzdGFraW5nU3RhcnQIBQAAAA0kdDAxOTAxNzE5MTIxAAAAAl8zCQAFFAAAAAIFAAAAA25pbAkABEwAAAACBQAAAAt1c2VyTnNidEFtdAkABEwAAAACBQAAAAx0b3RhbE5zYnRBbXQJAARMAAAAAgUAAAAMc3Rha2luZ1N0YXJ0BQAAAANuaWwAAAAAEd4l2A==",
    "chainId": 84,
    "height": 1977639,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DH269kvVhknyaHD8irPkUJFpmN7AL2HoXCJizucjFngr
Next: 6dE1gqpaf9zpKivoEwrQki2CfnyWWU8EdDSXpQKEPL6m

Diff: 
Old New Differences
71 71  func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
72 72  
73 73  
74 + func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
75 + 
76 + 
74 77  func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
75 78  
76 79  
111 114  func formatHistoryRecord (oldAmount,oldStart,newAmount,newStart) = makeString(["%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(oldAmount), toString(oldStart), toString(newAmount), toString(newStart)], separator)
112 115  
113 116  
117 + func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
118 + 
119 + 
114 120  func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
121 + 
122 + 
123 + func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
115 124  
116 125  
117 126  func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
164 173      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
165 174      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
166 175      func forEachAssetCacheUserReward (accum,asset) =     {
167 -         let $t067986933 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
168 -         let rewardTotal = $t067986933._1
169 -         let cached = $t067986933._2
170 -         let dynamic = $t067986933._3
171 -         let rewardCachedPartKEY = $t067986933._4
176 +         let $t073597494 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
177 +         let rewardTotal = $t073597494._1
178 +         let cached = $t073597494._2
179 +         let dynamic = $t073597494._3
180 +         let rewardCachedPartKEY = $t073597494._4
172 181          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
173 182          }
174 183  
185 194                  else false)
186 195                  then if (isNewUser)
187 196                      then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
188 -                     else throw("isNewUser must not be false in 5 + 6 cases")
197 +                     else ({
198 +                         let $l = supportedAssetsList
199 +                         let $s = size($l)
200 +                         let $acc0 = nil
201 +                         func $f0_1 ($a,$i) =                         if (($i >= $s))
202 +                             then $a
203 +                             else forEachAssetCacheUserReward($a, $l[$i])
204 + 
205 +                         func $f0_2 ($a,$i) =                         if (($i >= $s))
206 +                             then $a
207 +                             else throw("List size exceeds 10")
208 + 
209 +                         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
210 +                         } :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
189 211                  else if (if ((depositNumLast > -1))
190 212                      then (depositNumUser > -1)
191 213                      else false)
192 214                      then if (isNewUser)
193 -                         then throw((((("invalid management for isNewUser=" + toString(isNewUser)) + " and depositNumUser=") + toString(depositNumUser)) + " during full unstake"))
215 +                         then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
194 216                          else ({
195 217                              let $l = supportedAssetsList
196 218                              let $s = size($l)
225 247  
226 248  @Callable(i)
227 249  func stake () = {
228 -     let $t01080310882 = getParamsOrFail()
229 -     let auctionContract = $t01080310882._1
230 -     let bondAssetId = $t01080310882._2
231 -     let minLockAmount = $t01080310882._3
232 -     let halfLife = $t01080310882._4
250 +     let $t01114811227 = getParamsOrFail()
251 +     let auctionContract = $t01114811227._1
252 +     let bondAssetId = $t01114811227._2
253 +     let minLockAmount = $t01114811227._3
254 +     let halfLife = $t01114811227._4
233 255      if ((size(i.payments) != 1))
234 256          then throw("Invalid payments size")
235 257          else {
242 264                  else {
243 265                      let userAddress = i.caller
244 266                      let userAddressStr = toString(i.caller)
245 -                     let $t01142411531 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
246 -                     let isNewUser = $t01142411531._1
247 -                     let lockAmount = $t01142411531._2
248 -                     let lockStartHeight = $t01142411531._3
267 +                     let $t01176911876 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
268 +                     let isNewUser = $t01176911876._1
269 +                     let lockAmount = $t01176911876._2
270 +                     let lockStartHeight = $t01176911876._3
249 271                      let mergedAmount = if (isNewUser)
250 272                          then amount
251 273                          else (amount + lockAmount)
258 280                      if ((minLockAmount > mergedAmount))
259 281                          then throw(("Min lock amount is " + toString(minLockAmount)))
260 282                          else {
261 -                             let $t01198112083 = StatsResult(amount, 1, if (isNewUser)
283 +                             let $t01232612428 = StatsResult(amount, 1, if (isNewUser)
262 284                                  then 1
263 285                                  else 0)
264 -                             let statsEntries = $t01198112083._1
265 -                             let totalStaked = $t01198112083._2
266 -                             let totalStakedNew = $t01198112083._3
286 +                             let statsEntries = $t01232612428._1
287 +                             let totalStaked = $t01232612428._2
288 +                             let totalStakedNew = $t01232612428._3
267 289                              ((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
268 290                              }
269 291                      }
278 300      else {
279 301          let userAddress = i.caller
280 302          let userAddressStr = toString(userAddress)
281 -         let $t01256912647 = getParamsOrFail()
282 -         let auctionAddress = $t01256912647._1
283 -         let bondAssetId = $t01256912647._2
284 -         let minLockAmount = $t01256912647._3
285 -         let halfLife = $t01256912647._4
286 -         let $t01265012724 = getUserParamsOrFail(userAddress)
287 -         let isNewUser = $t01265012724._1
288 -         let lockAmount = $t01265012724._2
289 -         let lockStart = $t01265012724._3
303 +         let $t01291412992 = getParamsOrFail()
304 +         let auctionAddress = $t01291412992._1
305 +         let bondAssetId = $t01291412992._2
306 +         let minLockAmount = $t01291412992._3
307 +         let halfLife = $t01291412992._4
308 +         let $t01299513069 = getUserParamsOrFail(userAddress)
309 +         let isNewUser = $t01299513069._1
310 +         let lockAmount = $t01299513069._2
311 +         let lockStart = $t01299513069._3
290 312          if ((0 >= lockAmount))
291 313              then throw("Nothing to unstake")
292 314              else if ((amount > lockAmount))
294 316                  else {
295 317                      let mathContract = addressFromStringValue(getStringOrFail(keyMathContractAddress()))
296 318                      let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
297 -                     let $t01312513279 = StatsResult(-(amount), if ((amount == lockAmount))
319 +                     let $t01347013624 = StatsResult(-(amount), if ((amount == lockAmount))
298 320                          then -1
299 321                          else 0, if ((amount == lockAmount))
300 322                          then -1
301 323                          else 0)
302 -                     let statsEntries = $t01312513279._1
303 -                     let totalStaked = $t01312513279._2
304 -                     let totalStakedNew = $t01312513279._3
324 +                     let statsEntries = $t01347013624._1
325 +                     let totalStaked = $t01347013624._2
326 +                     let totalStakedNew = $t01347013624._3
305 327                      ((([ScriptTransfer(userAddress, (amount - comissionAmount), bondAssetId), ScriptTransfer(Address(auctionAddress), comissionAmount, bondAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
306 328                      }
307 329          }
369 391      if ((size(i.payments) > 0))
370 392          then throw("payments are not accepted")
371 393          else {
372 -             let $t01553515640 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
373 -             let isNewUser = $t01553515640._1
374 -             let stakedAmount = $t01553515640._2
375 -             let stakingStart = $t01553515640._3
394 +             let $t01588015985 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
395 +             let isNewUser = $t01588015985._1
396 +             let stakedAmount = $t01588015985._2
397 +             let stakingStart = $t01588015985._3
376 398              let stakedAmountX = toBigInt(stakedAmount)
377 399              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
378 400              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
379 401              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
380 402              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
381 -                 let $t01600116139 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
382 -                 let rewardTotal = $t01600116139._1
383 -                 let cached = $t01600116139._2
384 -                 let dynamic = $t01600116139._3
385 -                 let rewardCachedPartKEY = $t01600116139._4
403 +                 let $t01635616494 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
404 +                 let rewardTotal = $t01635616494._1
405 +                 let cached = $t01635616494._2
406 +                 let dynamic = $t01635616494._3
407 +                 let rewardCachedPartKEY = $t01635616494._4
408 +                 let claimedKEY = keyClaimed(userAddressStr, asset)
409 +                 let $t01655416591 = accum
410 +                 let data = $t01655416591._1
411 +                 let claimedAmtByAsset = $t01655416591._2
412 +                 let newPart = makeString([asset, toString(rewardTotal)], ":")
413 +                 let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
386 414                  if ((0 >= rewardTotal))
387 -                     then accum
388 -                     else ((accum :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(rewardCachedPartKEY, 0))
415 +                     then $Tuple2(data, claimedAmtByAssetNew)
416 +                     else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
389 417                  }
390 418  
391 -             let transfers = {
419 +             let $t01705117165 = {
392 420                  let $l = supportedAssetsList
393 421                  let $s = size($l)
394 -                 let $acc0 = nil
422 +                 let $acc0 = $Tuple2(nil, "")
395 423                  func $f0_1 ($a,$i) =                 if (($i >= $s))
396 424                      then $a
397 425                      else forEachAssetCalcUnclaimedReward($a, $l[$i])
402 430  
403 431                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
404 432                  }
433 +             let transfers = $t01705117165._1
434 +             let claimedAmtByAssetResult = $t01705117165._2
405 435              if ((0 >= size(transfers)))
406 436                  then throw("nothing to claim")
407 -                 else (transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
437 +                 else ((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1)))
408 438              }
409 439      }
410 440  
431 461              }
432 462          else {
433 463              let userAddress = addressFromStringValue(userAddressStr)
434 -             let $t01696817073 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
435 -             let isNewUser = $t01696817073._1
436 -             let stakedAmount = $t01696817073._2
437 -             let stakingStart = $t01696817073._3
464 +             let $t01782417929 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
465 +             let isNewUser = $t01782417929._1
466 +             let stakedAmount = $t01782417929._2
467 +             let stakingStart = $t01782417929._3
438 468              let stakedAmountX = toBigInt(stakedAmount)
439 469              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
440 470              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
441 471              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
442 472              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
443 -                 let $t01741917557 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
444 -                 let rewardTotal = $t01741917557._1
445 -                 let cached = $t01741917557._2
446 -                 let dynamic = $t01741917557._3
447 -                 let rewardCachedPartKEY = $t01741917557._4
448 -                 ((accum + makeString([asset, toString(rewardTotal), "0"], ":")) + "_")
473 +                 let $t01827518413 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
474 +                 let rewardTotal = $t01827518413._1
475 +                 let cached = $t01827518413._2
476 +                 let dynamic = $t01827518413._3
477 +                 let rewardCachedPartKEY = $t01827518413._4
478 +                 let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
479 +                 ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
449 480                  }
450 481  
451 482              let $l = supportedAssetsList
473 504          then $Tuple2(nil, [0, totalNsbtAmt, 0])
474 505          else {
475 506              let userAddress = toAddressOrFail(userAddressStr)
476 -             let $t01806418168 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
477 -             let isNewUser = $t01806418168._1
478 -             let userNsbtAmt = $t01806418168._2
479 -             let stakingStart = $t01806418168._3
507 +             let $t01901719121 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
508 +             let isNewUser = $t01901719121._1
509 +             let userNsbtAmt = $t01901719121._2
510 +             let stakingStart = $t01901719121._3
480 511              $Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
481 512              }
482 513      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let separator = "__"
5 5  
6 6  let MULT6 = 1000000
7 7  
8 8  let MULT8 = 100000000
9 9  
10 10  let MULTX6 = toBigInt(MULT6)
11 11  
12 12  let MULTX8 = toBigInt(MULT8)
13 13  
14 14  let MULTX18 = toBigInt(1000000000000000000)
15 15  
16 16  let WAVESIDSTR = "WAVES"
17 17  
18 18  let WAVESID = fromBase58String(WAVESIDSTR)
19 19  
20 20  func keyBondAsset () = "bond_asset_id"
21 21  
22 22  
23 23  func keyAuctionContractAddress () = "auction_contract"
24 24  
25 25  
26 26  func keyNeutrinoContractAddress () = "%s__neutrinoContractAddress"
27 27  
28 28  
29 29  func keyMathContractAddress () = "%s__mathContract"
30 30  
31 31  
32 32  func keyMinLockAmount () = "%s__minLockAmount"
33 33  
34 34  
35 35  func keyHalfLife () = "%s__halfLife"
36 36  
37 37  
38 38  func keyLockParamUserAmount (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "amount"], separator)
39 39  
40 40  
41 41  func keyLockParamStartBlock (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "start"], separator)
42 42  
43 43  
44 44  func keyHistoryRecord (type,userAddress,txId) = makeString(["%s%s%s%s", "history", type, toString(userAddress), toBase58String(txId)], separator)
45 45  
46 46  
47 47  func keyLockParamTotalAmount () = makeString(["%s%s", "stats", "activeTotalLocked"], separator)
48 48  
49 49  
50 50  func keyStatsLocksCount () = makeString(["%s%s", "stats", "locksCount"], separator)
51 51  
52 52  
53 53  func keyStatsUsersCount () = makeString(["%s%s", "stats", "activeUsersCount"], separator)
54 54  
55 55  
56 56  func keyNextPeriod () = "%s__nextPeriod"
57 57  
58 58  
59 59  func keySupportedRewardAssets () = "supportedRewardAssets"
60 60  
61 61  
62 62  func keyDepositNumLast () = makeString(["%s%s%s", "dep", "lastNum"], separator)
63 63  
64 64  
65 65  func keyUserRewardFromDepositNum (userAddress) = makeString(["%s%s%s", "userRwdFromDepNum", userAddress], separator)
66 66  
67 67  
68 68  func keyRewardPerNsbtSumAt (depositNum,tkn) = makeString(["%s%d", "rwdPerNsbtSumByDepNum", toString(depositNum), tkn], separator)
69 69  
70 70  
71 71  func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
72 72  
73 73  
74 + func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
75 + 
76 + 
74 77  func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
75 78  
76 79  
77 80  func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
78 81  
79 82  
80 83  func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
81 84  
82 85  
83 86  func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
84 87  
85 88  
86 89  func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
87 90  
88 91  
89 92  func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
90 93  
91 94  
92 95  func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
93 96  
94 97  
95 98  func toAddressOrFail (addressStr) = valueOrErrorMessage(addressFromString(addressStr), ("couldn't parse passed addressStr=" + addressStr))
96 99  
97 100  
98 101  func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
99 102      then unit
100 103      else fromBase58String(assetStr)
101 104  
102 105  
103 106  func asInt (val) = match val {
104 107      case valInt: Int => 
105 108          valInt
106 109      case _ => 
107 110          throw("fail to cast into Int")
108 111  }
109 112  
110 113  
111 114  func formatHistoryRecord (oldAmount,oldStart,newAmount,newStart) = makeString(["%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(oldAmount), toString(oldStart), toString(newAmount), toString(newStart)], separator)
112 115  
113 116  
117 + func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
118 + 
119 + 
114 120  func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
121 + 
122 + 
123 + func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
115 124  
116 125  
117 126  func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
118 127      let locksCount = getIntOrZero(keyStatsLocksCount())
119 128      let usersCount = getIntOrZero(keyStatsUsersCount())
120 129      let totalAmount = getIntOrZero(keyLockParamTotalAmount())
121 130      let totalAmountNew = (totalAmount + totalLockedInc)
122 131      $Tuple3([IntegerEntry(keyStatsLocksCount(), (locksCount + lockCountInc)), IntegerEntry(keyStatsUsersCount(), (usersCount + usersCountInc)), IntegerEntry(keyLockParamTotalAmount(), totalAmountNew)], totalAmount, totalAmountNew)
123 132      }
124 133  
125 134  
126 135  func LockParamsEntry (userAddress,amount,start) = [IntegerEntry(keyLockParamUserAmount(userAddress), amount), IntegerEntry(keyLockParamStartBlock(userAddress), start)]
127 136  
128 137  
129 138  func getParamsOrFail () = {
130 139      let neutrinoContract = addressFromStringValue(getStringOrFail(keyNeutrinoContractAddress()))
131 140      $Tuple4(fromBase58String(getStringValue(neutrinoContract, keyAuctionContractAddress())), fromBase58String(getStringValue(neutrinoContract, keyBondAsset())), getIntOrFail(keyMinLockAmount()), getIntOrFail(keyHalfLife()))
132 141      }
133 142  
134 143  
135 144  func isActiveUser (userAddress) = (getIntOrElse(keyLockParamUserAmount(userAddress), 0) > 0)
136 145  
137 146  
138 147  func getUserParamsOrUnit (userAddress) = if (isActiveUser(userAddress))
139 148      then $Tuple3(false, getIntOrFail(keyLockParamUserAmount(userAddress)), getIntOrFail(keyLockParamStartBlock(userAddress)))
140 149      else unit
141 150  
142 151  
143 152  func getUserParamsOrFail (userAddress) = valueOrErrorMessage(getUserParamsOrUnit(userAddress), (("User " + toString(userAddress)) + " is not defined"))
144 153  
145 154  
146 155  let supportedAssetsStr = getStrOrElse(keySupportedRewardAssets(), "")
147 156  
148 157  let supportedAssetsList = split(supportedAssetsStr, "_")
149 158  
150 159  func calcReward (userAddress,assetId,stakedAmountX,depositNumUser,depositNumLast) = {
151 160      let rewardPerNsbtSumLastKEY = keyRewardPerNsbtSumAt(depositNumLast, assetId)
152 161      let sumLastX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, assetId), "0"))
153 162      let sumUserX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumUser, assetId), "0"))
154 163      let rewardDynamicPart = toInt(fraction((sumLastX18 - sumUserX18), stakedAmountX, MULTX18))
155 164      let rewardCachedPartKEY = keyReward(userAddress, assetId)
156 165      let rewardCachedPart = getIntOrElse(rewardCachedPartKEY, 0)
157 166      $Tuple4((rewardCachedPart + rewardDynamicPart), rewardCachedPart, rewardDynamicPart, rewardCachedPartKEY)
158 167      }
159 168  
160 169  
161 170  func RewardEntries (isNewUser,userAddress,stakedAmount) = {
162 171      let stakedAmountX = toBigInt(stakedAmount)
163 172      let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
164 173      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
165 174      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
166 175      func forEachAssetCacheUserReward (accum,asset) =     {
167 -         let $t067986933 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
168 -         let rewardTotal = $t067986933._1
169 -         let cached = $t067986933._2
170 -         let dynamic = $t067986933._3
171 -         let rewardCachedPartKEY = $t067986933._4
176 +         let $t073597494 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
177 +         let rewardTotal = $t073597494._1
178 +         let cached = $t073597494._2
179 +         let dynamic = $t073597494._3
180 +         let rewardCachedPartKEY = $t073597494._4
172 181          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
173 182          }
174 183  
175 184      if (if ((depositNumLast == -1))
176 185          then (depositNumUser == -1)
177 186          else false)
178 187          then nil
179 188          else if (if ((depositNumLast == -1))
180 189              then (depositNumUser > -1)
181 190              else false)
182 191              then throw("invalid depositNumLast and depositNumUser state")
183 192              else if (if ((depositNumLast > -1))
184 193                  then (depositNumUser == -1)
185 194                  else false)
186 195                  then if (isNewUser)
187 196                      then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
188 -                     else throw("isNewUser must not be false in 5 + 6 cases")
197 +                     else ({
198 +                         let $l = supportedAssetsList
199 +                         let $s = size($l)
200 +                         let $acc0 = nil
201 +                         func $f0_1 ($a,$i) =                         if (($i >= $s))
202 +                             then $a
203 +                             else forEachAssetCacheUserReward($a, $l[$i])
204 + 
205 +                         func $f0_2 ($a,$i) =                         if (($i >= $s))
206 +                             then $a
207 +                             else throw("List size exceeds 10")
208 + 
209 +                         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
210 +                         } :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
189 211                  else if (if ((depositNumLast > -1))
190 212                      then (depositNumUser > -1)
191 213                      else false)
192 214                      then if (isNewUser)
193 -                         then throw((((("invalid management for isNewUser=" + toString(isNewUser)) + " and depositNumUser=") + toString(depositNumUser)) + " during full unstake"))
215 +                         then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
194 216                          else ({
195 217                              let $l = supportedAssetsList
196 218                              let $s = size($l)
197 219                              let $acc0 = nil
198 220                              func $f0_1 ($a,$i) =                             if (($i >= $s))
199 221                                  then $a
200 222                                  else forEachAssetCacheUserReward($a, $l[$i])
201 223  
202 224                              func $f0_2 ($a,$i) =                             if (($i >= $s))
203 225                                  then $a
204 226                                  else throw("List size exceeds 10")
205 227  
206 228                              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
207 229                              } :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
208 230                      else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
209 231      }
210 232  
211 233  
212 234  func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
213 235      let notDistributedRewardKEY = keyNotDistributedReward(tkn)
214 236      let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
215 237  [IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))]
216 238      }
217 239  
218 240  
219 241  @Callable(i)
220 242  func constructor (neutrinoContractAddress,mathContractAddress,minLockAmount,halfLife,supportedRewardAssets) = if ((i.caller != this))
221 243      then throw("Permission denied")
222 244      else [StringEntry(keyNeutrinoContractAddress(), neutrinoContractAddress), StringEntry(keyMathContractAddress(), mathContractAddress), IntegerEntry(keyMinLockAmount(), minLockAmount), IntegerEntry(keyHalfLife(), halfLife), StringEntry(keySupportedRewardAssets(), supportedRewardAssets)]
223 245  
224 246  
225 247  
226 248  @Callable(i)
227 249  func stake () = {
228 -     let $t01080310882 = getParamsOrFail()
229 -     let auctionContract = $t01080310882._1
230 -     let bondAssetId = $t01080310882._2
231 -     let minLockAmount = $t01080310882._3
232 -     let halfLife = $t01080310882._4
250 +     let $t01114811227 = getParamsOrFail()
251 +     let auctionContract = $t01114811227._1
252 +     let bondAssetId = $t01114811227._2
253 +     let minLockAmount = $t01114811227._3
254 +     let halfLife = $t01114811227._4
233 255      if ((size(i.payments) != 1))
234 256          then throw("Invalid payments size")
235 257          else {
236 258              let payment = i.payments[0]
237 259              let amount = payment.amount
238 260              let invalidAssetMessage = (("Invalid asset. " + toBase58String(bondAssetId)) + " is expected")
239 261              let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
240 262              if ((assetId != bondAssetId))
241 263                  then throw(invalidAssetMessage)
242 264                  else {
243 265                      let userAddress = i.caller
244 266                      let userAddressStr = toString(i.caller)
245 -                     let $t01142411531 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
246 -                     let isNewUser = $t01142411531._1
247 -                     let lockAmount = $t01142411531._2
248 -                     let lockStartHeight = $t01142411531._3
267 +                     let $t01176911876 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
268 +                     let isNewUser = $t01176911876._1
269 +                     let lockAmount = $t01176911876._2
270 +                     let lockStartHeight = $t01176911876._3
249 271                      let mergedAmount = if (isNewUser)
250 272                          then amount
251 273                          else (amount + lockAmount)
252 274                      let mergedStartHeight = if (isNewUser)
253 275                          then height
254 276                          else {
255 277                              let mathContract = addressFromStringValue(getStringOrFail(keyMathContractAddress()))
256 278                              asInt(invoke(mathContract, "mergeStakesREADONLY", [amount, height, lockAmount, lockStartHeight, halfLife], nil))
257 279                              }
258 280                      if ((minLockAmount > mergedAmount))
259 281                          then throw(("Min lock amount is " + toString(minLockAmount)))
260 282                          else {
261 -                             let $t01198112083 = StatsResult(amount, 1, if (isNewUser)
283 +                             let $t01232612428 = StatsResult(amount, 1, if (isNewUser)
262 284                                  then 1
263 285                                  else 0)
264 -                             let statsEntries = $t01198112083._1
265 -                             let totalStaked = $t01198112083._2
266 -                             let totalStakedNew = $t01198112083._3
286 +                             let statsEntries = $t01232612428._1
287 +                             let totalStaked = $t01232612428._2
288 +                             let totalStakedNew = $t01232612428._3
267 289                              ((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
268 290                              }
269 291                      }
270 292              }
271 293      }
272 294  
273 295  
274 296  
275 297  @Callable(i)
276 298  func unstake (amount) = if ((size(i.payments) != 0))
277 299      then throw("unstake doesn't require any payment")
278 300      else {
279 301          let userAddress = i.caller
280 302          let userAddressStr = toString(userAddress)
281 -         let $t01256912647 = getParamsOrFail()
282 -         let auctionAddress = $t01256912647._1
283 -         let bondAssetId = $t01256912647._2
284 -         let minLockAmount = $t01256912647._3
285 -         let halfLife = $t01256912647._4
286 -         let $t01265012724 = getUserParamsOrFail(userAddress)
287 -         let isNewUser = $t01265012724._1
288 -         let lockAmount = $t01265012724._2
289 -         let lockStart = $t01265012724._3
303 +         let $t01291412992 = getParamsOrFail()
304 +         let auctionAddress = $t01291412992._1
305 +         let bondAssetId = $t01291412992._2
306 +         let minLockAmount = $t01291412992._3
307 +         let halfLife = $t01291412992._4
308 +         let $t01299513069 = getUserParamsOrFail(userAddress)
309 +         let isNewUser = $t01299513069._1
310 +         let lockAmount = $t01299513069._2
311 +         let lockStart = $t01299513069._3
290 312          if ((0 >= lockAmount))
291 313              then throw("Nothing to unstake")
292 314              else if ((amount > lockAmount))
293 315                  then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(lockAmount)))
294 316                  else {
295 317                      let mathContract = addressFromStringValue(getStringOrFail(keyMathContractAddress()))
296 318                      let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
297 -                     let $t01312513279 = StatsResult(-(amount), if ((amount == lockAmount))
319 +                     let $t01347013624 = StatsResult(-(amount), if ((amount == lockAmount))
298 320                          then -1
299 321                          else 0, if ((amount == lockAmount))
300 322                          then -1
301 323                          else 0)
302 -                     let statsEntries = $t01312513279._1
303 -                     let totalStaked = $t01312513279._2
304 -                     let totalStakedNew = $t01312513279._3
324 +                     let statsEntries = $t01347013624._1
325 +                     let totalStaked = $t01347013624._2
326 +                     let totalStakedNew = $t01347013624._3
305 327                      ((([ScriptTransfer(userAddress, (amount - comissionAmount), bondAssetId), ScriptTransfer(Address(auctionAddress), comissionAmount, bondAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
306 328                      }
307 329          }
308 330  
309 331  
310 332  
311 333  @Callable(i)
312 334  func deposit () = if ((size(i.payments) != 1))
313 335      then throw("exact 1 payment is allowed only")
314 336      else {
315 337          let pmt = i.payments[0]
316 338          let amount = pmt.amount
317 339          let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
318 340          let pmtAssetIdStr = toBase58String(pmtAssetId)
319 341          let pmtMultX = if ((pmtAssetId == WAVESID))
320 342              then MULTX8
321 343              else MULTX6
322 344          let amountX = toBigInt(amount)
323 345          let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
324 346          let totalStakedX = toBigInt(totalStaked)
325 347          if ((0 > totalStaked))
326 348              then throw("TODO: case is not supported")
327 349              else if ((totalStaked == 0))
328 350                  then IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)
329 351                  else {
330 352                      let rewardPerNsbtX18 = fraction(amountX, MULTX18, totalStakedX)
331 353                      let depositNumLastKEY = keyDepositNumLast()
332 354                      let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
333 355                      let depositNumNew = (depositNumLast + 1)
334 356                      if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
335 357                          then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
336 358                          else {
337 359                              func refreshRewardPerNsbtSUM (accum,nextAsset) =                             {
338 360                                  let rewardPerNsbtSumNewKEY = keyRewardPerNsbtSumAt(depositNumNew, nextAsset)
339 361                                  let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
340 362                                  (accum :+ (if ((nextAsset == pmtAssetIdStr))
341 363                                      then StringEntry(rewardPerNsbtSumNewKEY, toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18)))
342 364                                      else StringEntry(rewardPerNsbtSumNewKEY, sumLastStr)))
343 365                                  }
344 366  
345 367                              ({
346 368                                  let $l = supportedAssetsList
347 369                                  let $s = size($l)
348 370                                  let $acc0 = nil
349 371                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
350 372                                      then $a
351 373                                      else refreshRewardPerNsbtSUM($a, $l[$i])
352 374  
353 375                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
354 376                                      then $a
355 377                                      else throw("List size exceeds 10")
356 378  
357 379                                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
358 380                                  } :+ IntegerEntry(depositNumLastKEY, depositNumNew))
359 381                              }
360 382                      }
361 383          }
362 384  
363 385  
364 386  
365 387  @Callable(i)
366 388  func claimRewards () = {
367 389      let userAddress = i.caller
368 390      let userAddressStr = toString(userAddress)
369 391      if ((size(i.payments) > 0))
370 392          then throw("payments are not accepted")
371 393          else {
372 -             let $t01553515640 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
373 -             let isNewUser = $t01553515640._1
374 -             let stakedAmount = $t01553515640._2
375 -             let stakingStart = $t01553515640._3
394 +             let $t01588015985 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
395 +             let isNewUser = $t01588015985._1
396 +             let stakedAmount = $t01588015985._2
397 +             let stakingStart = $t01588015985._3
376 398              let stakedAmountX = toBigInt(stakedAmount)
377 399              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
378 400              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
379 401              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
380 402              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
381 -                 let $t01600116139 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
382 -                 let rewardTotal = $t01600116139._1
383 -                 let cached = $t01600116139._2
384 -                 let dynamic = $t01600116139._3
385 -                 let rewardCachedPartKEY = $t01600116139._4
403 +                 let $t01635616494 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
404 +                 let rewardTotal = $t01635616494._1
405 +                 let cached = $t01635616494._2
406 +                 let dynamic = $t01635616494._3
407 +                 let rewardCachedPartKEY = $t01635616494._4
408 +                 let claimedKEY = keyClaimed(userAddressStr, asset)
409 +                 let $t01655416591 = accum
410 +                 let data = $t01655416591._1
411 +                 let claimedAmtByAsset = $t01655416591._2
412 +                 let newPart = makeString([asset, toString(rewardTotal)], ":")
413 +                 let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
386 414                  if ((0 >= rewardTotal))
387 -                     then accum
388 -                     else ((accum :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(rewardCachedPartKEY, 0))
415 +                     then $Tuple2(data, claimedAmtByAssetNew)
416 +                     else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
389 417                  }
390 418  
391 -             let transfers = {
419 +             let $t01705117165 = {
392 420                  let $l = supportedAssetsList
393 421                  let $s = size($l)
394 -                 let $acc0 = nil
422 +                 let $acc0 = $Tuple2(nil, "")
395 423                  func $f0_1 ($a,$i) =                 if (($i >= $s))
396 424                      then $a
397 425                      else forEachAssetCalcUnclaimedReward($a, $l[$i])
398 426  
399 427                  func $f0_2 ($a,$i) =                 if (($i >= $s))
400 428                      then $a
401 429                      else throw("List size exceeds 10")
402 430  
403 431                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
404 432                  }
433 +             let transfers = $t01705117165._1
434 +             let claimedAmtByAssetResult = $t01705117165._2
405 435              if ((0 >= size(transfers)))
406 436                  then throw("nothing to claim")
407 -                 else (transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
437 +                 else ((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1)))
408 438              }
409 439      }
410 440  
411 441  
412 442  
413 443  @Callable(i)
414 444  func unclaimedRewardsREADONLY (userAddressStr) = {
415 445      func forEachAssetZeroReward (accum,asset) =     ((accum + makeString([asset, "0", "0"], ":")) + "_")
416 446  
417 447      let unclaimedRewardStr = if ((userAddressStr == ""))
418 448          then {
419 449              let $l = supportedAssetsList
420 450              let $s = size($l)
421 451              let $acc0 = ""
422 452              func $f0_1 ($a,$i) =             if (($i >= $s))
423 453                  then $a
424 454                  else forEachAssetZeroReward($a, $l[$i])
425 455  
426 456              func $f0_2 ($a,$i) =             if (($i >= $s))
427 457                  then $a
428 458                  else throw("List size exceeds 10")
429 459  
430 460              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
431 461              }
432 462          else {
433 463              let userAddress = addressFromStringValue(userAddressStr)
434 -             let $t01696817073 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
435 -             let isNewUser = $t01696817073._1
436 -             let stakedAmount = $t01696817073._2
437 -             let stakingStart = $t01696817073._3
464 +             let $t01782417929 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
465 +             let isNewUser = $t01782417929._1
466 +             let stakedAmount = $t01782417929._2
467 +             let stakingStart = $t01782417929._3
438 468              let stakedAmountX = toBigInt(stakedAmount)
439 469              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
440 470              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
441 471              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
442 472              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
443 -                 let $t01741917557 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
444 -                 let rewardTotal = $t01741917557._1
445 -                 let cached = $t01741917557._2
446 -                 let dynamic = $t01741917557._3
447 -                 let rewardCachedPartKEY = $t01741917557._4
448 -                 ((accum + makeString([asset, toString(rewardTotal), "0"], ":")) + "_")
473 +                 let $t01827518413 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
474 +                 let rewardTotal = $t01827518413._1
475 +                 let cached = $t01827518413._2
476 +                 let dynamic = $t01827518413._3
477 +                 let rewardCachedPartKEY = $t01827518413._4
478 +                 let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
479 +                 ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
449 480                  }
450 481  
451 482              let $l = supportedAssetsList
452 483              let $s = size($l)
453 484              let $acc0 = ""
454 485              func $f0_1 ($a,$i) =             if (($i >= $s))
455 486                  then $a
456 487                  else forEachAssetCalcUnclaimedReward($a, $l[$i])
457 488  
458 489              func $f0_2 ($a,$i) =             if (($i >= $s))
459 490                  then $a
460 491                  else throw("List size exceeds 10")
461 492  
462 493              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
463 494              }
464 495      $Tuple2(nil, dropRight(unclaimedRewardStr, 1))
465 496      }
466 497  
467 498  
468 499  
469 500  @Callable(i)
470 501  func nsbtStakingSYSREADONLY (userAddressStr) = {
471 502      let totalNsbtAmt = getIntOrElse(keyLockParamTotalAmount(), 0)
472 503      if ((userAddressStr == ""))
473 504          then $Tuple2(nil, [0, totalNsbtAmt, 0])
474 505          else {
475 506              let userAddress = toAddressOrFail(userAddressStr)
476 -             let $t01806418168 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
477 -             let isNewUser = $t01806418168._1
478 -             let userNsbtAmt = $t01806418168._2
479 -             let stakingStart = $t01806418168._3
507 +             let $t01901719121 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
508 +             let isNewUser = $t01901719121._1
509 +             let userNsbtAmt = $t01901719121._2
510 +             let stakingStart = $t01901719121._3
480 511              $Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
481 512              }
482 513      }
483 514  
484 515

Old	New		Differences
71	71		func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
72	72
73	73
	74	+	func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
	75	+
	76	+
74	77		func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
75	78
76	79

111	114		func formatHistoryRecord (oldAmount,oldStart,newAmount,newStart) = makeString(["%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(oldAmount), toString(oldStart), toString(newAmount), toString(newStart)], separator)
112	115
113	116
	117	+	func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
	118	+
	119	+
114	120		func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
	121	+
	122	+
	123	+	func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
115	124
116	125
117	126		func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {

164	173		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
165	174		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
166	175		func forEachAssetCacheUserReward (accum,asset) = {
167		-	let $~~t067986933~~ = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
168		-	let rewardTotal = $~~t067986933~~._1
169		-	let cached = $~~t067986933~~._2
170		-	let dynamic = $~~t067986933~~._3
171		-	let rewardCachedPartKEY = $~~t067986933~~._4
	176	+	let $t073597494 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
	177	+	let rewardTotal = $t073597494._1
	178	+	let cached = $t073597494._2
	179	+	let dynamic = $t073597494._3
	180	+	let rewardCachedPartKEY = $t073597494._4
172	181		(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
173	182		}
174	183

185	194		else false)
186	195		then if (isNewUser)
187	196		then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
188		-	else throw("isNewUser must not be false in 5 + 6 cases")
	197	+	else ({
	198	+	let $l = supportedAssetsList
	199	+	let $s = size($l)
	200	+	let $acc0 = nil
	201	+	func $f0_1 ($a,$i) = if (($i >= $s))
	202	+	then $a
	203	+	else forEachAssetCacheUserReward($a, $l[$i])
	204	+
	205	+	func $f0_2 ($a,$i) = if (($i >= $s))
	206	+	then $a
	207	+	else throw("List size exceeds 10")
	208	+
	209	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	210	+	} :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
189	211		else if (if ((depositNumLast > -1))
190	212		then (depositNumUser > -1)
191	213		else false)
192	214		then if (isNewUser)
193		-	then ~~throw~~(~~(((("invalid management for isNewUser=" + toString(isNewUser~~)~~) + " and depositNumUser=") + toString(depositNumUser)) + " during full unstake"))~~
	215	+	then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
194	216		else ({
195	217		let $l = supportedAssetsList
196	218		let $s = size($l)

225	247
226	248		@Callable(i)
227	249		func stake () = {
228		-	let $~~t01080310882~~ = getParamsOrFail()
229		-	let auctionContract = $~~t01080310882~~._1
230		-	let bondAssetId = $~~t01080310882~~._2
231		-	let minLockAmount = $~~t01080310882~~._3
232		-	let halfLife = $~~t01080310882~~._4
	250	+	let $t01114811227 = getParamsOrFail()
	251	+	let auctionContract = $t01114811227._1
	252	+	let bondAssetId = $t01114811227._2
	253	+	let minLockAmount = $t01114811227._3
	254	+	let halfLife = $t01114811227._4
233	255		if ((size(i.payments) != 1))
234	256		then throw("Invalid payments size")
235	257		else {

242	264		else {
243	265		let userAddress = i.caller
244	266		let userAddressStr = toString(i.caller)
245		-	let $~~t01142411531~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
246		-	let isNewUser = $~~t01142411531~~._1
247		-	let lockAmount = $~~t01142411531~~._2
248		-	let lockStartHeight = $~~t01142411531~~._3
	267	+	let $t01176911876 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
	268	+	let isNewUser = $t01176911876._1
	269	+	let lockAmount = $t01176911876._2
	270	+	let lockStartHeight = $t01176911876._3
249	271		let mergedAmount = if (isNewUser)
250	272		then amount
251	273		else (amount + lockAmount)

258	280		if ((minLockAmount > mergedAmount))
259	281		then throw(("Min lock amount is " + toString(minLockAmount)))
260	282		else {
261		-	let $~~t01198112083~~ = StatsResult(amount, 1, if (isNewUser)
	283	+	let $t01232612428 = StatsResult(amount, 1, if (isNewUser)
262	284		then 1
263	285		else 0)
264		-	let statsEntries = $~~t01198112083~~._1
265		-	let totalStaked = $~~t01198112083~~._2
266		-	let totalStakedNew = $~~t01198112083~~._3
	286	+	let statsEntries = $t01232612428._1
	287	+	let totalStaked = $t01232612428._2
	288	+	let totalStakedNew = $t01232612428._3
267	289		((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
268	290		}
269	291		}

278	300		else {
279	301		let userAddress = i.caller
280	302		let userAddressStr = toString(userAddress)
281		-	let $~~t01256912647~~ = getParamsOrFail()
282		-	let auctionAddress = $~~t01256912647~~._1
283		-	let bondAssetId = $~~t01256912647~~._2
284		-	let minLockAmount = $~~t01256912647~~._3
285		-	let halfLife = $~~t01256912647~~._4
286		-	let $~~t01265012724~~ = getUserParamsOrFail(userAddress)
287		-	let isNewUser = $~~t01265012724~~._1
288		-	let lockAmount = $~~t01265012724~~._2
289		-	let lockStart = $~~t01265012724~~._3
	303	+	let $t01291412992 = getParamsOrFail()
	304	+	let auctionAddress = $t01291412992._1
	305	+	let bondAssetId = $t01291412992._2
	306	+	let minLockAmount = $t01291412992._3
	307	+	let halfLife = $t01291412992._4
	308	+	let $t01299513069 = getUserParamsOrFail(userAddress)
	309	+	let isNewUser = $t01299513069._1
	310	+	let lockAmount = $t01299513069._2
	311	+	let lockStart = $t01299513069._3
290	312		if ((0 >= lockAmount))
291	313		then throw("Nothing to unstake")
292	314		else if ((amount > lockAmount))

294	316		else {
295	317		let mathContract = addressFromStringValue(getStringOrFail(keyMathContractAddress()))
296	318		let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
297		-	let $~~t01312513279~~ = StatsResult(-(amount), if ((amount == lockAmount))
	319	+	let $t01347013624 = StatsResult(-(amount), if ((amount == lockAmount))
298	320		then -1
299	321		else 0, if ((amount == lockAmount))
300	322		then -1
301	323		else 0)
302		-	let statsEntries = $~~t01312513279~~._1
303		-	let totalStaked = $~~t01312513279~~._2
304		-	let totalStakedNew = $~~t01312513279~~._3
	324	+	let statsEntries = $t01347013624._1
	325	+	let totalStaked = $t01347013624._2
	326	+	let totalStakedNew = $t01347013624._3
305	327		((([ScriptTransfer(userAddress, (amount - comissionAmount), bondAssetId), ScriptTransfer(Address(auctionAddress), comissionAmount, bondAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
306	328		}
307	329		}

369	391		if ((size(i.payments) > 0))
370	392		then throw("payments are not accepted")
371	393		else {
372		-	let $~~t01553515640~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
373		-	let isNewUser = $~~t01553515640~~._1
374		-	let stakedAmount = $~~t01553515640~~._2
375		-	let stakingStart = $~~t01553515640~~._3
	394	+	let $t01588015985 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	395	+	let isNewUser = $t01588015985._1
	396	+	let stakedAmount = $t01588015985._2
	397	+	let stakingStart = $t01588015985._3
376	398		let stakedAmountX = toBigInt(stakedAmount)
377	399		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
378	400		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
379	401		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
380	402		func forEachAssetCalcUnclaimedReward (accum,asset) = {
381		-	let $t01600116139 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
382		-	let rewardTotal = $t01600116139._1
383		-	let cached = $t01600116139._2
384		-	let dynamic = $t01600116139._3
385		-	let rewardCachedPartKEY = $t01600116139._4
	403	+	let $t01635616494 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	404	+	let rewardTotal = $t01635616494._1
	405	+	let cached = $t01635616494._2
	406	+	let dynamic = $t01635616494._3
	407	+	let rewardCachedPartKEY = $t01635616494._4
	408	+	let claimedKEY = keyClaimed(userAddressStr, asset)
	409	+	let $t01655416591 = accum
	410	+	let data = $t01655416591._1
	411	+	let claimedAmtByAsset = $t01655416591._2
	412	+	let newPart = makeString([asset, toString(rewardTotal)], ":")
	413	+	let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
386	414		if ((0 >= rewardTotal))
387		-	then ~~accum~~
388		-	else ((~~accum~~ :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(rewardCachedPartKEY, 0))
	415	+	then $Tuple2(data, claimedAmtByAssetNew)
	416	+	else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
389	417		}
390	418
391		-	let ~~transfers~~ = {
	419	+	let $t01705117165 = {
392	420		let $l = supportedAssetsList
393	421		let $s = size($l)
394		-	let $acc0 = nil
	422	+	let $acc0 = $Tuple2(nil, "")
395	423		func $f0_1 ($a,$i) = if (($i >= $s))
396	424		then $a
397	425		else forEachAssetCalcUnclaimedReward($a, $l[$i])

402	430
403	431		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
404	432		}
	433	+	let transfers = $t01705117165._1
	434	+	let claimedAmtByAssetResult = $t01705117165._2
405	435		if ((0 >= size(transfers)))
406	436		then throw("nothing to claim")
407		-	else (transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
	437	+	else ((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1)))
408	438		}
409	439		}
410	440

431	461		}
432	462		else {
433	463		let userAddress = addressFromStringValue(userAddressStr)
434		-	let $~~t01696817073~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
435		-	let isNewUser = $~~t01696817073~~._1
436		-	let stakedAmount = $~~t01696817073~~._2
437		-	let stakingStart = $~~t01696817073~~._3
	464	+	let $t01782417929 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	465	+	let isNewUser = $t01782417929._1
	466	+	let stakedAmount = $t01782417929._2
	467	+	let stakingStart = $t01782417929._3
438	468		let stakedAmountX = toBigInt(stakedAmount)
439	469		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
440	470		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
441	471		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
442	472		func forEachAssetCalcUnclaimedReward (accum,asset) = {
443		-	let $t01741917557 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
444		-	let rewardTotal = $t01741917557._1
445		-	let cached = $t01741917557._2
446		-	let dynamic = $t01741917557._3
447		-	let rewardCachedPartKEY = $t01741917557._4
448		-	((accum + makeString([asset, toString(rewardTotal), "0"], ":")) + "_")
	473	+	let $t01827518413 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	474	+	let rewardTotal = $t01827518413._1
	475	+	let cached = $t01827518413._2
	476	+	let dynamic = $t01827518413._3
	477	+	let rewardCachedPartKEY = $t01827518413._4
	478	+	let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
	479	+	((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
449	480		}
450	481
451	482		let $l = supportedAssetsList

473	504		then $Tuple2(nil, [0, totalNsbtAmt, 0])
474	505		else {
475	506		let userAddress = toAddressOrFail(userAddressStr)
476		-	let $~~t01806418168~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
477		-	let isNewUser = $~~t01806418168~~._1
478		-	let userNsbtAmt = $~~t01806418168~~._2
479		-	let stakingStart = $~~t01806418168~~._3
	507	+	let $t01901719121 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	508	+	let isNewUser = $t01901719121._1
	509	+	let userNsbtAmt = $t01901719121._2
	510	+	let stakingStart = $t01901719121._3
480	511		$Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
481	512		}
482	513		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let separator = "__"
5	5
6	6		let MULT6 = 1000000
7	7
8	8		let MULT8 = 100000000
9	9
10	10		let MULTX6 = toBigInt(MULT6)
11	11
12	12		let MULTX8 = toBigInt(MULT8)
13	13
14	14		let MULTX18 = toBigInt(1000000000000000000)
15	15
16	16		let WAVESIDSTR = "WAVES"
17	17
18	18		let WAVESID = fromBase58String(WAVESIDSTR)
19	19
20	20		func keyBondAsset () = "bond_asset_id"
21	21
22	22
23	23		func keyAuctionContractAddress () = "auction_contract"
24	24
25	25
26	26		func keyNeutrinoContractAddress () = "%s__neutrinoContractAddress"
27	27
28	28
29	29		func keyMathContractAddress () = "%s__mathContract"
30	30
31	31
32	32		func keyMinLockAmount () = "%s__minLockAmount"
33	33
34	34
35	35		func keyHalfLife () = "%s__halfLife"
36	36
37	37
38	38		func keyLockParamUserAmount (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "amount"], separator)
39	39
40	40
41	41		func keyLockParamStartBlock (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "start"], separator)
42	42
43	43
44	44		func keyHistoryRecord (type,userAddress,txId) = makeString(["%s%s%s%s", "history", type, toString(userAddress), toBase58String(txId)], separator)
45	45
46	46
47	47		func keyLockParamTotalAmount () = makeString(["%s%s", "stats", "activeTotalLocked"], separator)
48	48
49	49
50	50		func keyStatsLocksCount () = makeString(["%s%s", "stats", "locksCount"], separator)
51	51
52	52
53	53		func keyStatsUsersCount () = makeString(["%s%s", "stats", "activeUsersCount"], separator)
54	54
55	55
56	56		func keyNextPeriod () = "%s__nextPeriod"
57	57
58	58
59	59		func keySupportedRewardAssets () = "supportedRewardAssets"
60	60
61	61
62	62		func keyDepositNumLast () = makeString(["%s%s%s", "dep", "lastNum"], separator)
63	63
64	64
65	65		func keyUserRewardFromDepositNum (userAddress) = makeString(["%s%s%s", "userRwdFromDepNum", userAddress], separator)
66	66
67	67
68	68		func keyRewardPerNsbtSumAt (depositNum,tkn) = makeString(["%s%d", "rwdPerNsbtSumByDepNum", toString(depositNum), tkn], separator)
69	69
70	70
71	71		func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
72	72
73	73
	74	+	func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
	75	+
	76	+
74	77		func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
75	78
76	79
77	80		func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
78	81
79	82
80	83		func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
81	84
82	85
83	86		func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
84	87
85	88
86	89		func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
87	90
88	91
89	92		func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
90	93
91	94
92	95		func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
93	96
94	97
95	98		func toAddressOrFail (addressStr) = valueOrErrorMessage(addressFromString(addressStr), ("couldn't parse passed addressStr=" + addressStr))
96	99
97	100
98	101		func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
99	102		then unit
100	103		else fromBase58String(assetStr)
101	104
102	105
103	106		func asInt (val) = match val {
104	107		case valInt: Int =>
105	108		valInt
106	109		case _ =>
107	110		throw("fail to cast into Int")
108	111		}
109	112
110	113
111	114		func formatHistoryRecord (oldAmount,oldStart,newAmount,newStart) = makeString(["%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(oldAmount), toString(oldStart), toString(newAmount), toString(newStart)], separator)
112	115
113	116
	117	+	func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
	118	+
	119	+
114	120		func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
	121	+
	122	+
	123	+	func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
115	124
116	125
117	126		func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
118	127		let locksCount = getIntOrZero(keyStatsLocksCount())
119	128		let usersCount = getIntOrZero(keyStatsUsersCount())
120	129		let totalAmount = getIntOrZero(keyLockParamTotalAmount())
121	130		let totalAmountNew = (totalAmount + totalLockedInc)
122	131		$Tuple3([IntegerEntry(keyStatsLocksCount(), (locksCount + lockCountInc)), IntegerEntry(keyStatsUsersCount(), (usersCount + usersCountInc)), IntegerEntry(keyLockParamTotalAmount(), totalAmountNew)], totalAmount, totalAmountNew)
123	132		}
124	133
125	134
126	135		func LockParamsEntry (userAddress,amount,start) = [IntegerEntry(keyLockParamUserAmount(userAddress), amount), IntegerEntry(keyLockParamStartBlock(userAddress), start)]
127	136
128	137
129	138		func getParamsOrFail () = {
130	139		let neutrinoContract = addressFromStringValue(getStringOrFail(keyNeutrinoContractAddress()))
131	140		$Tuple4(fromBase58String(getStringValue(neutrinoContract, keyAuctionContractAddress())), fromBase58String(getStringValue(neutrinoContract, keyBondAsset())), getIntOrFail(keyMinLockAmount()), getIntOrFail(keyHalfLife()))
132	141		}
133	142
134	143
135	144		func isActiveUser (userAddress) = (getIntOrElse(keyLockParamUserAmount(userAddress), 0) > 0)
136	145
137	146
138	147		func getUserParamsOrUnit (userAddress) = if (isActiveUser(userAddress))
139	148		then $Tuple3(false, getIntOrFail(keyLockParamUserAmount(userAddress)), getIntOrFail(keyLockParamStartBlock(userAddress)))
140	149		else unit
141	150
142	151
143	152		func getUserParamsOrFail (userAddress) = valueOrErrorMessage(getUserParamsOrUnit(userAddress), (("User " + toString(userAddress)) + " is not defined"))
144	153
145	154
146	155		let supportedAssetsStr = getStrOrElse(keySupportedRewardAssets(), "")
147	156
148	157		let supportedAssetsList = split(supportedAssetsStr, "_")
149	158
150	159		func calcReward (userAddress,assetId,stakedAmountX,depositNumUser,depositNumLast) = {
151	160		let rewardPerNsbtSumLastKEY = keyRewardPerNsbtSumAt(depositNumLast, assetId)
152	161		let sumLastX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, assetId), "0"))
153	162		let sumUserX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumUser, assetId), "0"))
154	163		let rewardDynamicPart = toInt(fraction((sumLastX18 - sumUserX18), stakedAmountX, MULTX18))
155	164		let rewardCachedPartKEY = keyReward(userAddress, assetId)
156	165		let rewardCachedPart = getIntOrElse(rewardCachedPartKEY, 0)
157	166		$Tuple4((rewardCachedPart + rewardDynamicPart), rewardCachedPart, rewardDynamicPart, rewardCachedPartKEY)
158	167		}
159	168
160	169
161	170		func RewardEntries (isNewUser,userAddress,stakedAmount) = {
162	171		let stakedAmountX = toBigInt(stakedAmount)
163	172		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
164	173		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
165	174		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
166	175		func forEachAssetCacheUserReward (accum,asset) = {
167		-	let $~~t067986933~~ = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
168		-	let rewardTotal = $~~t067986933~~._1
169		-	let cached = $~~t067986933~~._2
170		-	let dynamic = $~~t067986933~~._3
171		-	let rewardCachedPartKEY = $~~t067986933~~._4
	176	+	let $t073597494 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
	177	+	let rewardTotal = $t073597494._1
	178	+	let cached = $t073597494._2
	179	+	let dynamic = $t073597494._3
	180	+	let rewardCachedPartKEY = $t073597494._4
172	181		(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
173	182		}
174	183
175	184		if (if ((depositNumLast == -1))
176	185		then (depositNumUser == -1)
177	186		else false)
178	187		then nil
179	188		else if (if ((depositNumLast == -1))
180	189		then (depositNumUser > -1)
181	190		else false)
182	191		then throw("invalid depositNumLast and depositNumUser state")
183	192		else if (if ((depositNumLast > -1))
184	193		then (depositNumUser == -1)
185	194		else false)
186	195		then if (isNewUser)
187	196		then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
188		-	else throw("isNewUser must not be false in 5 + 6 cases")
	197	+	else ({
	198	+	let $l = supportedAssetsList
	199	+	let $s = size($l)
	200	+	let $acc0 = nil
	201	+	func $f0_1 ($a,$i) = if (($i >= $s))
	202	+	then $a
	203	+	else forEachAssetCacheUserReward($a, $l[$i])
	204	+
	205	+	func $f0_2 ($a,$i) = if (($i >= $s))
	206	+	then $a
	207	+	else throw("List size exceeds 10")
	208	+
	209	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	210	+	} :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
189	211		else if (if ((depositNumLast > -1))
190	212		then (depositNumUser > -1)
191	213		else false)
192	214		then if (isNewUser)
193		-	then ~~throw~~(~~(((("invalid management for isNewUser=" + toString(isNewUser~~)~~) + " and depositNumUser=") + toString(depositNumUser)) + " during full unstake"))~~
	215	+	then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
194	216		else ({
195	217		let $l = supportedAssetsList
196	218		let $s = size($l)
197	219		let $acc0 = nil
198	220		func $f0_1 ($a,$i) = if (($i >= $s))
199	221		then $a
200	222		else forEachAssetCacheUserReward($a, $l[$i])
201	223
202	224		func $f0_2 ($a,$i) = if (($i >= $s))
203	225		then $a
204	226		else throw("List size exceeds 10")
205	227
206	228		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
207	229		} :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
208	230		else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
209	231		}
210	232
211	233
212	234		func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
213	235		let notDistributedRewardKEY = keyNotDistributedReward(tkn)
214	236		let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
215	237		[IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))]
216	238		}
217	239
218	240
219	241		@Callable(i)
220	242		func constructor (neutrinoContractAddress,mathContractAddress,minLockAmount,halfLife,supportedRewardAssets) = if ((i.caller != this))
221	243		then throw("Permission denied")
222	244		else [StringEntry(keyNeutrinoContractAddress(), neutrinoContractAddress), StringEntry(keyMathContractAddress(), mathContractAddress), IntegerEntry(keyMinLockAmount(), minLockAmount), IntegerEntry(keyHalfLife(), halfLife), StringEntry(keySupportedRewardAssets(), supportedRewardAssets)]
223	245
224	246
225	247
226	248		@Callable(i)
227	249		func stake () = {
228		-	let $~~t01080310882~~ = getParamsOrFail()
229		-	let auctionContract = $~~t01080310882~~._1
230		-	let bondAssetId = $~~t01080310882~~._2
231		-	let minLockAmount = $~~t01080310882~~._3
232		-	let halfLife = $~~t01080310882~~._4
	250	+	let $t01114811227 = getParamsOrFail()
	251	+	let auctionContract = $t01114811227._1
	252	+	let bondAssetId = $t01114811227._2
	253	+	let minLockAmount = $t01114811227._3
	254	+	let halfLife = $t01114811227._4
233	255		if ((size(i.payments) != 1))
234	256		then throw("Invalid payments size")
235	257		else {
236	258		let payment = i.payments[0]
237	259		let amount = payment.amount
238	260		let invalidAssetMessage = (("Invalid asset. " + toBase58String(bondAssetId)) + " is expected")
239	261		let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
240	262		if ((assetId != bondAssetId))
241	263		then throw(invalidAssetMessage)
242	264		else {
243	265		let userAddress = i.caller
244	266		let userAddressStr = toString(i.caller)
245		-	let $~~t01142411531~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
246		-	let isNewUser = $~~t01142411531~~._1
247		-	let lockAmount = $~~t01142411531~~._2
248		-	let lockStartHeight = $~~t01142411531~~._3
	267	+	let $t01176911876 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
	268	+	let isNewUser = $t01176911876._1
	269	+	let lockAmount = $t01176911876._2
	270	+	let lockStartHeight = $t01176911876._3
249	271		let mergedAmount = if (isNewUser)
250	272		then amount
251	273		else (amount + lockAmount)
252	274		let mergedStartHeight = if (isNewUser)
253	275		then height
254	276		else {
255	277		let mathContract = addressFromStringValue(getStringOrFail(keyMathContractAddress()))
256	278		asInt(invoke(mathContract, "mergeStakesREADONLY", [amount, height, lockAmount, lockStartHeight, halfLife], nil))
257	279		}
258	280		if ((minLockAmount > mergedAmount))
259	281		then throw(("Min lock amount is " + toString(minLockAmount)))
260	282		else {
261		-	let $~~t01198112083~~ = StatsResult(amount, 1, if (isNewUser)
	283	+	let $t01232612428 = StatsResult(amount, 1, if (isNewUser)
262	284		then 1
263	285		else 0)
264		-	let statsEntries = $~~t01198112083~~._1
265		-	let totalStaked = $~~t01198112083~~._2
266		-	let totalStakedNew = $~~t01198112083~~._3
	286	+	let statsEntries = $t01232612428._1
	287	+	let totalStaked = $t01232612428._2
	288	+	let totalStakedNew = $t01232612428._3
267	289		((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
268	290		}
269	291		}
270	292		}
271	293		}
272	294
273	295
274	296
275	297		@Callable(i)
276	298		func unstake (amount) = if ((size(i.payments) != 0))
277	299		then throw("unstake doesn't require any payment")
278	300		else {
279	301		let userAddress = i.caller
280	302		let userAddressStr = toString(userAddress)
281		-	let $~~t01256912647~~ = getParamsOrFail()
282		-	let auctionAddress = $~~t01256912647~~._1
283		-	let bondAssetId = $~~t01256912647~~._2
284		-	let minLockAmount = $~~t01256912647~~._3
285		-	let halfLife = $~~t01256912647~~._4
286		-	let $~~t01265012724~~ = getUserParamsOrFail(userAddress)
287		-	let isNewUser = $~~t01265012724~~._1
288		-	let lockAmount = $~~t01265012724~~._2
289		-	let lockStart = $~~t01265012724~~._3
	303	+	let $t01291412992 = getParamsOrFail()
	304	+	let auctionAddress = $t01291412992._1
	305	+	let bondAssetId = $t01291412992._2
	306	+	let minLockAmount = $t01291412992._3
	307	+	let halfLife = $t01291412992._4
	308	+	let $t01299513069 = getUserParamsOrFail(userAddress)
	309	+	let isNewUser = $t01299513069._1
	310	+	let lockAmount = $t01299513069._2
	311	+	let lockStart = $t01299513069._3
290	312		if ((0 >= lockAmount))
291	313		then throw("Nothing to unstake")
292	314		else if ((amount > lockAmount))
293	315		then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(lockAmount)))
294	316		else {
295	317		let mathContract = addressFromStringValue(getStringOrFail(keyMathContractAddress()))
296	318		let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
297		-	let $~~t01312513279~~ = StatsResult(-(amount), if ((amount == lockAmount))
	319	+	let $t01347013624 = StatsResult(-(amount), if ((amount == lockAmount))
298	320		then -1
299	321		else 0, if ((amount == lockAmount))
300	322		then -1
301	323		else 0)
302		-	let statsEntries = $~~t01312513279~~._1
303		-	let totalStaked = $~~t01312513279~~._2
304		-	let totalStakedNew = $~~t01312513279~~._3
	324	+	let statsEntries = $t01347013624._1
	325	+	let totalStaked = $t01347013624._2
	326	+	let totalStakedNew = $t01347013624._3
305	327		((([ScriptTransfer(userAddress, (amount - comissionAmount), bondAssetId), ScriptTransfer(Address(auctionAddress), comissionAmount, bondAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
306	328		}
307	329		}
308	330
309	331
310	332
311	333		@Callable(i)
312	334		func deposit () = if ((size(i.payments) != 1))
313	335		then throw("exact 1 payment is allowed only")
314	336		else {
315	337		let pmt = i.payments[0]
316	338		let amount = pmt.amount
317	339		let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
318	340		let pmtAssetIdStr = toBase58String(pmtAssetId)
319	341		let pmtMultX = if ((pmtAssetId == WAVESID))
320	342		then MULTX8
321	343		else MULTX6
322	344		let amountX = toBigInt(amount)
323	345		let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
324	346		let totalStakedX = toBigInt(totalStaked)
325	347		if ((0 > totalStaked))
326	348		then throw("TODO: case is not supported")
327	349		else if ((totalStaked == 0))
328	350		then IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)
329	351		else {
330	352		let rewardPerNsbtX18 = fraction(amountX, MULTX18, totalStakedX)
331	353		let depositNumLastKEY = keyDepositNumLast()
332	354		let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
333	355		let depositNumNew = (depositNumLast + 1)
334	356		if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
335	357		then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
336	358		else {
337	359		func refreshRewardPerNsbtSUM (accum,nextAsset) = {
338	360		let rewardPerNsbtSumNewKEY = keyRewardPerNsbtSumAt(depositNumNew, nextAsset)
339	361		let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
340	362		(accum :+ (if ((nextAsset == pmtAssetIdStr))
341	363		then StringEntry(rewardPerNsbtSumNewKEY, toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18)))
342	364		else StringEntry(rewardPerNsbtSumNewKEY, sumLastStr)))
343	365		}
344	366
345	367		({
346	368		let $l = supportedAssetsList
347	369		let $s = size($l)
348	370		let $acc0 = nil
349	371		func $f0_1 ($a,$i) = if (($i >= $s))
350	372		then $a
351	373		else refreshRewardPerNsbtSUM($a, $l[$i])
352	374
353	375		func $f0_2 ($a,$i) = if (($i >= $s))
354	376		then $a
355	377		else throw("List size exceeds 10")
356	378
357	379		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
358	380		} :+ IntegerEntry(depositNumLastKEY, depositNumNew))
359	381		}
360	382		}
361	383		}
362	384
363	385
364	386
365	387		@Callable(i)
366	388		func claimRewards () = {
367	389		let userAddress = i.caller
368	390		let userAddressStr = toString(userAddress)
369	391		if ((size(i.payments) > 0))
370	392		then throw("payments are not accepted")
371	393		else {
372		-	let $~~t01553515640~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
373		-	let isNewUser = $~~t01553515640~~._1
374		-	let stakedAmount = $~~t01553515640~~._2
375		-	let stakingStart = $~~t01553515640~~._3
	394	+	let $t01588015985 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	395	+	let isNewUser = $t01588015985._1
	396	+	let stakedAmount = $t01588015985._2
	397	+	let stakingStart = $t01588015985._3
376	398		let stakedAmountX = toBigInt(stakedAmount)
377	399		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
378	400		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
379	401		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
380	402		func forEachAssetCalcUnclaimedReward (accum,asset) = {
381		-	let $t01600116139 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
382		-	let rewardTotal = $t01600116139._1
383		-	let cached = $t01600116139._2
384		-	let dynamic = $t01600116139._3
385		-	let rewardCachedPartKEY = $t01600116139._4
	403	+	let $t01635616494 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	404	+	let rewardTotal = $t01635616494._1
	405	+	let cached = $t01635616494._2
	406	+	let dynamic = $t01635616494._3
	407	+	let rewardCachedPartKEY = $t01635616494._4
	408	+	let claimedKEY = keyClaimed(userAddressStr, asset)
	409	+	let $t01655416591 = accum
	410	+	let data = $t01655416591._1
	411	+	let claimedAmtByAsset = $t01655416591._2
	412	+	let newPart = makeString([asset, toString(rewardTotal)], ":")
	413	+	let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
386	414		if ((0 >= rewardTotal))
387		-	then ~~accum~~
388		-	else ((~~accum~~ :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(rewardCachedPartKEY, 0))
	415	+	then $Tuple2(data, claimedAmtByAssetNew)
	416	+	else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
389	417		}
390	418
391		-	let ~~transfers~~ = {
	419	+	let $t01705117165 = {
392	420		let $l = supportedAssetsList
393	421		let $s = size($l)
394		-	let $acc0 = nil
	422	+	let $acc0 = $Tuple2(nil, "")
395	423		func $f0_1 ($a,$i) = if (($i >= $s))
396	424		then $a
397	425		else forEachAssetCalcUnclaimedReward($a, $l[$i])
398	426
399	427		func $f0_2 ($a,$i) = if (($i >= $s))
400	428		then $a
401	429		else throw("List size exceeds 10")
402	430
403	431		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
404	432		}
	433	+	let transfers = $t01705117165._1
	434	+	let claimedAmtByAssetResult = $t01705117165._2
405	435		if ((0 >= size(transfers)))
406	436		then throw("nothing to claim")
407		-	else (transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
	437	+	else ((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1)))
408	438		}
409	439		}
410	440
411	441
412	442
413	443		@Callable(i)
414	444		func unclaimedRewardsREADONLY (userAddressStr) = {
415	445		func forEachAssetZeroReward (accum,asset) = ((accum + makeString([asset, "0", "0"], ":")) + "_")
416	446
417	447		let unclaimedRewardStr = if ((userAddressStr == ""))
418	448		then {
419	449		let $l = supportedAssetsList
420	450		let $s = size($l)
421	451		let $acc0 = ""
422	452		func $f0_1 ($a,$i) = if (($i >= $s))
423	453		then $a

github/deemru/w8io/169f3d6 
78.43 ms ◑