w8 · tx · Bvq···i2X

tx · BvqKfgeN4gRkc2Aj1co41KmUTAjFf1Ww5EAASJucki2X

3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J:  -0.02500000 Waves

2023.02.23 12:47 [2462140] smart account 3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BvqKfgeN4gRkc2Aj1co41KmUTAjFf1Ww5EAASJucki2X",
    "fee": 2500000,
    "feeAssetId": null,
    "timestamp": 1677145712177,
    "version": 2,
    "chainId": 84,
    "sender": "3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J",
    "senderPublicKey": "4DthuG3xjZV9WtZ34Y66AummdAr67wRzwWsVQL4y2bob",
    "proofs": [
        "2QD4b66QvK1KVF52NbyR2FeHH22CSX3AqLaQuKHTGSxauy42XfgFaxC5TG9gkq2QtMUS8rGSmnSw3xFApkuapyx",
        "3YMuXqk8hoaDtYmC3i9vxB4ArqtETL4W7pZs3z6eh2R2wqGQhxCxcKHXUCynZs2ET7hdot2xsbrCq92mcWtd5qDC",
        "2bW3CbAXD5ZxeqQ53XSV5rpKD9XfqEHdcTFTiAgB73HZKYYtvgSaxWnJoDqNkEGcq5sxF8T8nR2S92wupJKkm5VG"
    ],
    "script": "base64:BgIpCAISBwoFCAgBAQgSABIDCgEBEgASABIAEgMKAQgSBAoCCAESBAoCCAFRAAlzZXBhcmF0b3ICAl9fAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8ABk1VTFRYNgkAtgIBBQVNVUxUNgAGTVVMVFg4CQC2AgEFBU1VTFQ4AAdNVUxUWDE4CQC2AgEAgICQu7rWrfANAApXQVZFU0lEU1RSAgVXQVZFUwAHV0FWRVNJRAkA2QQBBQpXQVZFU0lEU1RSAAlEQVlNSUxMSVMAgLiZKQAZSWR4Q29udHJvbENmZ05ldXRyaW5vRGFwcAABABhJZHhDb250cm9sQ2ZnQXVjdGlvbkRhcHAAAgAUSWR4Q29udHJvbENmZ1JwZERhcHAAAwAVSWR4Q29udHJvbENmZ01hdGhEYXBwAAQAHElkeENvbnRyb2xDZmdMaXF1aWRhdGlvbkRhcHAABQAVSWR4Q29udHJvbENmZ1Jlc3REYXBwAAYAHUlkeENvbnRyb2xDZmdOb2RlUmVnaXN0cnlEYXBwAAcAHElkeENvbnRyb2xDZmdOc2J0U3Rha2luZ0RhcHAACAAZSWR4Q29udHJvbENmZ01lZGlhdG9yRGFwcAAJABtJZHhDb250cm9sQ2ZnR292ZXJuYW5jZURhcHAADQEPZ2V0U3RyaW5nT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFB2FkZHJlc3MFA2tleQkArAICCQCsAgIJAKwCAgkArAICAgptYW5kYXRvcnkgCQClCAEFB2FkZHJlc3MCAS4FA2tleQIPIGlzIG5vdCBkZWZpbmVkARFrZXlDb250cm9sQWRkcmVzcwACHCVzJXNfX2NvbmZpZ19fY29udHJvbEFkZHJlc3MBDWtleUNvbnRyb2xDZmcAAhElc19fY29udHJvbENvbmZpZwEUcmVhZENvbnRyb2xDZmdPckZhaWwBB2NvbnRyb2wJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFB2NvbnRyb2wJAQ1rZXlDb250cm9sQ2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCCmNvbnRyb2xDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQpjb250cm9sQ2ZnBQNpZHgJAKwCAgItQ29udHJvbCBjZmcgZG9lc24ndCBjb250YWluIGFkZHJlc3MgYXQgaW5kZXggCQCkAwEFA2lkeAAPY29udHJvbENvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJARFrZXlDb250cm9sQWRkcmVzcwACIzNONE5TN2Q0Sm85YTZGMTRMaUZVS0tZVmRVa2tmMmVQNFp4AApjb250cm9sQ2ZnCQEUcmVhZENvbnRyb2xDZmdPckZhaWwBBQ9jb250cm9sQ29udHJhY3QADG1hdGhDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFFUlkeENvbnRyb2xDZmdNYXRoRGFwcAAQbmV1dHJpbm9Db250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFGUlkeENvbnRyb2xDZmdOZXV0cmlub0RhcHAAD2F1Y3Rpb25Db250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFGElkeENvbnRyb2xDZmdBdWN0aW9uRGFwcAALZ292Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRtJZHhDb250cm9sQ2ZnR292ZXJuYW5jZURhcHABDGtleUJvbmRBc3NldAACDWJvbmRfYXNzZXRfaWQBF2tleVVzZXJHbnNidFJlbGVhc2VUaW1lAQh1c2VyQWRkcgkArAICAhslcyVzX3VzZXJHbnNidFJlbGVhc2VUaW1lX18FCHVzZXJBZGRyARprZXlOZXV0cmlub0NvbnRyYWN0QWRkcmVzcwACGyVzX19uZXV0cmlub0NvbnRyYWN0QWRkcmVzcwEWa2V5TWF0aENvbnRyYWN0QWRkcmVzcwACECVzX19tYXRoQ29udHJhY3QBEGtleU1pbkxvY2tBbW91bnQAAhElc19fbWluTG9ja0Ftb3VudAELa2V5SGFsZkxpZmUAAgwlc19faGFsZkxpZmUBFmtleUxvY2tQYXJhbVVzZXJBbW91bnQBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICC3BhcmFtQnlVc2VyCQDMCAIJAKUIAQULdXNlckFkZHJlc3MJAMwIAgIGYW1vdW50BQNuaWwFCXNlcGFyYXRvcgEWa2V5TG9ja1BhcmFtU3RhcnRCbG9jawELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgILcGFyYW1CeVVzZXIJAMwIAgkApQgBBQt1c2VyQWRkcmVzcwkAzAgCAgVzdGFydAUDbmlsBQlzZXBhcmF0b3IBEGtleUhpc3RvcnlSZWNvcmQDBHR5cGULdXNlckFkZHJlc3MEdHhJZAkAuQkCCQDMCAICCCVzJXMlcyVzCQDMCAICB2hpc3RvcnkJAMwIAgUEdHlwZQkAzAgCCQClCAEFC3VzZXJBZGRyZXNzCQDMCAIJANgEAQUEdHhJZAUDbmlsBQlzZXBhcmF0b3IBF2tleUxvY2tQYXJhbVRvdGFsQW1vdW50AAkAuQkCCQDMCAICBCVzJXMJAMwIAgIFc3RhdHMJAMwIAgIRYWN0aXZlVG90YWxMb2NrZWQFA25pbAUJc2VwYXJhdG9yARJrZXlTdGF0c0xvY2tzQ291bnQACQC5CQIJAMwIAgIEJXMlcwkAzAgCAgVzdGF0cwkAzAgCAgpsb2Nrc0NvdW50BQNuaWwFCXNlcGFyYXRvcgESa2V5U3RhdHNVc2Vyc0NvdW50AAkAuQkCCQDMCAICBCVzJXMJAMwIAgIFc3RhdHMJAMwIAgIQYWN0aXZlVXNlcnNDb3VudAUDbmlsBQlzZXBhcmF0b3IBF2tleVN0YXRzRGVwb3NpdEFtdEJ5RGF5AQl0aW1lc3RhbXAJALkJAgkAzAgCAgYlcyVzJWQJAMwIAgIFc3RhdHMJAMwIAgIPZGVwb3NpdEFtdEJ5RGF5CQDMCAIJAKQDAQUJdGltZXN0YW1wBQNuaWwFCXNlcGFyYXRvcgEYa2V5U3RhdHNEZXBvc2l0QW10VG90YWxzAAkAuQkCCQDMCAICBiVzJXMlZAkAzAgCAgVzdGF0cwkAzAgCAhBkZXBvc2l0QW10VG90YWxzBQNuaWwFCXNlcGFyYXRvcgENa2V5TmV4dFBlcmlvZAACDiVzX19uZXh0UGVyaW9kARhrZXlTdXBwb3J0ZWRSZXdhcmRBc3NldHMAAhVzdXBwb3J0ZWRSZXdhcmRBc3NldHMBEWtleURlcG9zaXROdW1MYXN0AAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgNkZXAJAMwIAgIHbGFzdE51bQUDbmlsBQlzZXBhcmF0b3IBG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIRdXNlclJ3ZEZyb21EZXBOdW0JAMwIAgULdXNlckFkZHJlc3MFA25pbAUJc2VwYXJhdG9yARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCCmRlcG9zaXROdW0DdGtuCQC5CQIJAMwIAgIEJXMlZAkAzAgCAhVyd2RQZXJOc2J0U3VtQnlEZXBOdW0JAMwIAgkApAMBBQpkZXBvc2l0TnVtCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBCWtleVJld2FyZAILdXNlckFkZHJlc3MDdGtuCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICA3J3ZAkAzAgCBQt1c2VyQWRkcmVzcwkAzAgCBQN0a24FA25pbAUJc2VwYXJhdG9yAQprZXlDbGFpbWVkAgt1c2VyQWRkcmVzcwN0a24JALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIDY2xtCQDMCAIFC3VzZXJBZGRyZXNzCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBF2tleU5vdERpc3RyaWJ1dGVkUmV3YXJkAQN0a24JALkJAgkAzAgCAgQlcyVzCQDMCAICDm5vdERpc3RyaWJ1dGVkCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBBXRvWDE4AgdvcmlnVmFsCG9yaWdNdWx0CQC8AgMJALYCAQUHb3JpZ1ZhbAUHTVVMVFgxOAUIb3JpZ011bHQBDGdldEludE9yWmVybwEDa2V5CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFA2tleQAAAQxnZXRJbnRPckVsc2UCA2tleQpkZWZhdWx0VmFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFA2tleQUKZGVmYXVsdFZhbAEMZ2V0SW50T3JGYWlsAQNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzBQNrZXkJAKwCAgkArAICAg9NYW5kYXRvcnkgdGhpcy4FA2tleQIPIGlzIG5vdCBkZWZpbmVkAQxnZXRTdHJPckVsc2UCA2tleQpkZWZhdWx0VmFsCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFA2tleQUKZGVmYXVsdFZhbAEPdG9BZGRyZXNzT3JGYWlsAQphZGRyZXNzU3RyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQUKYWRkcmVzc1N0cgkArAICAiFjb3VsZG4ndCBwYXJzZSBwYXNzZWQgYWRkcmVzc1N0cj0FCmFkZHJlc3NTdHIBC3RvQXNzZXRWZWN0AQhhc3NldFN0cgMJAAACBQhhc3NldFN0cgUKV0FWRVNJRFNUUgUEdW5pdAkA2QQBBQhhc3NldFN0cgEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBE2Zvcm1hdEhpc3RvcnlSZWNvcmQECW9sZEFtb3VudAhvbGRTdGFydAluZXdBbW91bnQIbmV3U3RhcnQJALkJAgkAzAgCAgwlZCVkJWQlZCVkJWQJAMwIAgkApAMBCAUJbGFzdEJsb2NrBmhlaWdodAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAKQDAQUJb2xkQW1vdW50CQDMCAIJAKQDAQUIb2xkU3RhcnQJAMwIAgkApAMBBQluZXdBbW91bnQJAMwIAgkApAMBBQhuZXdTdGFydAUDbmlsBQlzZXBhcmF0b3IBGGZvcm1hdENsYWltSGlzdG9yeVJlY29yZAIEdXNlcg5jbGFpbWVkUmV3YXJkcwkAuQkCCQDMCAICCCVzJWQlZCVzCQDMCAIFBHVzZXIJAMwIAgkApAMBCAUJbGFzdEJsb2NrBmhlaWdodAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIFDmNsYWltZWRSZXdhcmRzBQNuaWwFCXNlcGFyYXRvcgESSGlzdG9yeVJlY29yZEVudHJ5BwR0eXBlC3VzZXJBZGRyZXNzBHR4SWQJb2xkQW1vdW50CG9sZFN0YXJ0CW5ld0Ftb3VudAhuZXdTdGFydAkBC1N0cmluZ0VudHJ5AgkBEGtleUhpc3RvcnlSZWNvcmQDBQR0eXBlBQt1c2VyQWRkcmVzcwUEdHhJZAkBE2Zvcm1hdEhpc3RvcnlSZWNvcmQEBQlvbGRBbW91bnQFCG9sZFN0YXJ0BQluZXdBbW91bnQFCG5ld1N0YXJ0ARFDbGFpbUhpc3RvcnlFbnRyeQMLdXNlckFkZHJlc3MEdHhJZA5jbGFpbWVkUmV3YXJkcwkBC1N0cmluZ0VudHJ5AgkBEGtleUhpc3RvcnlSZWNvcmQDAgVjbGFpbQULdXNlckFkZHJlc3MFBHR4SWQJARhmb3JtYXRDbGFpbUhpc3RvcnlSZWNvcmQCCQClCAEFC3VzZXJBZGRyZXNzBQ5jbGFpbWVkUmV3YXJkcwELU3RhdHNSZXN1bHQDDnRvdGFsTG9ja2VkSW5jDGxvY2tDb3VudEluYw11c2Vyc0NvdW50SW5jBApsb2Nrc0NvdW50CQEMZ2V0SW50T3JaZXJvAQkBEmtleVN0YXRzTG9ja3NDb3VudAAECnVzZXJzQ291bnQJAQxnZXRJbnRPclplcm8BCQESa2V5U3RhdHNVc2Vyc0NvdW50AAQLdG90YWxBbW91bnQJAQxnZXRJbnRPclplcm8BCQEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQABA50b3RhbEFtb3VudE5ldwkAZAIFC3RvdGFsQW1vdW50BQ50b3RhbExvY2tlZEluYwkAlQoDCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5U3RhdHNMb2Nrc0NvdW50AAkAZAIFCmxvY2tzQ291bnQFDGxvY2tDb3VudEluYwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleVN0YXRzVXNlcnNDb3VudAAJAGQCBQp1c2Vyc0NvdW50BQ11c2Vyc0NvdW50SW5jCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQABQ50b3RhbEFtb3VudE5ldwUDbmlsBQt0b3RhbEFtb3VudAUOdG90YWxBbW91bnROZXcBD0xvY2tQYXJhbXNFbnRyeQMLdXNlckFkZHJlc3MGYW1vdW50BXN0YXJ0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5TG9ja1BhcmFtVXNlckFtb3VudAEFC3VzZXJBZGRyZXNzBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAQULdXNlckFkZHJlc3MFBXN0YXJ0BQNuaWwBD2dldFBhcmFtc09yRmFpbAAJAJUKAwkA2QQBCQERQGV4dHJOYXRpdmUoMTA1MykCBRBuZXV0cmlub0NvbnRyYWN0CQEMa2V5Qm9uZEFzc2V0AAkBDGdldEludE9yRmFpbAEJARBrZXlNaW5Mb2NrQW1vdW50AAkBDGdldEludE9yRmFpbAEJAQtrZXlIYWxmTGlmZQABDGlzQWN0aXZlVXNlcgELdXNlckFkZHJlc3MJAGYCCQEMZ2V0SW50T3JFbHNlAgkBFmtleUxvY2tQYXJhbVVzZXJBbW91bnQBBQt1c2VyQWRkcmVzcwAAAAABE2dldFVzZXJQYXJhbXNPclVuaXQBC3VzZXJBZGRyZXNzAwkBDGlzQWN0aXZlVXNlcgEFC3VzZXJBZGRyZXNzCQCVCgMHCQEMZ2V0SW50T3JGYWlsAQkBFmtleUxvY2tQYXJhbVVzZXJBbW91bnQBBQt1c2VyQWRkcmVzcwkBDGdldEludE9yRmFpbAEJARZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAQULdXNlckFkZHJlc3MFBHVuaXQBE2dldFVzZXJQYXJhbXNPckZhaWwBC3VzZXJBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIJARNnZXRVc2VyUGFyYW1zT3JVbml0AQULdXNlckFkZHJlc3MJAKwCAgkArAICAgVVc2VyIAkApQgBBQt1c2VyQWRkcmVzcwIPIGlzIG5vdCBkZWZpbmVkABJzdXBwb3J0ZWRBc3NldHNTdHIJAQxnZXRTdHJPckVsc2UCCQEYa2V5U3VwcG9ydGVkUmV3YXJkQXNzZXRzAAIAABNzdXBwb3J0ZWRBc3NldHNMaXN0CQC1CQIFEnN1cHBvcnRlZEFzc2V0c1N0cgIBXwEKY2FsY1Jld2FyZAULdXNlckFkZHJlc3MHYXNzZXRJZA1zdGFrZWRBbW91bnRYDmRlcG9zaXROdW1Vc2VyDmRlcG9zaXROdW1MYXN0BBdyZXdhcmRQZXJOc2J0U3VtTGFzdEtFWQkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDmRlcG9zaXROdW1MYXN0BQdhc3NldElkBApzdW1MYXN0WDE4CQCnAwEJAQxnZXRTdHJPckVsc2UCCQEVa2V5UmV3YXJkUGVyTnNidFN1bUF0AgUOZGVwb3NpdE51bUxhc3QFB2Fzc2V0SWQCATAECnN1bVVzZXJYMTgJAKcDAQkBDGdldFN0ck9yRWxzZQIJARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCBQ5kZXBvc2l0TnVtVXNlcgUHYXNzZXRJZAIBMAQRcmV3YXJkRHluYW1pY1BhcnQJAKADAQkAvAIDCQC4AgIFCnN1bUxhc3RYMTgFCnN1bVVzZXJYMTgFDXN0YWtlZEFtb3VudFgFB01VTFRYMTgEE3Jld2FyZENhY2hlZFBhcnRLRVkJAQlrZXlSZXdhcmQCBQt1c2VyQWRkcmVzcwUHYXNzZXRJZAQQcmV3YXJkQ2FjaGVkUGFydAkBDGdldEludE9yRWxzZQIFE3Jld2FyZENhY2hlZFBhcnRLRVkAAAkAlgoECQBkAgUQcmV3YXJkQ2FjaGVkUGFydAURcmV3YXJkRHluYW1pY1BhcnQFEHJld2FyZENhY2hlZFBhcnQFEXJld2FyZER5bmFtaWNQYXJ0BRNyZXdhcmRDYWNoZWRQYXJ0S0VZAQx0b1N0YXJ0T2ZEYXkBCXRpbWVzdGFtcAkAaAIJAGkCBQl0aW1lc3RhbXAFCURBWU1JTExJUwUJREFZTUlMTElTARNmaW5kRWxlbWVudFBvc2l0aW9uAwNzcmMHZWxlbWVudANzZXAEDGVsZW1lbnRTdGFydAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCzCQIFA3NyYwUHZWxlbWVudAkArAICCQCsAgIJAKwCAgIWdGhlcmUgaXMgbm8gc3Vic3RyaW5nIAUHZWxlbWVudAIEIGluIAUDc3JjAwkAAAIFDGVsZW1lbnRTdGFydAAAAAAEBGxlZnQJAK8CAgUDc3JjBQxlbGVtZW50U3RhcnQJAGUCCQCQAwEJALUJAgUEbGVmdAUDc2VwAAEAE0RlcG9zaXRUb3RhbHNQUkVGSVgCJCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZAARZGVmYXVsdFRvdGFsc0RBVEEJAKwCAgUTRGVwb3NpdFRvdGFsc1BSRUZJWAI2X18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wX18wAQ1SZXdhcmRFbnRyaWVzAwlpc05ld1VzZXILdXNlckFkZHJlc3MMc3Rha2VkQW1vdW50BA1zdGFrZWRBbW91bnRYCQC2AgEFDHN0YWtlZEFtb3VudAQbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZCQEba2V5VXNlclJld2FyZEZyb21EZXBvc2l0TnVtAQULdXNlckFkZHJlc3MEDmRlcG9zaXROdW1Vc2VyCQEMZ2V0SW50T3JFbHNlAgUbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZAP///////////wEEDmRlcG9zaXROdW1MYXN0CQEMZ2V0SW50T3JFbHNlAgkBEWtleURlcG9zaXROdW1MYXN0AAD///////////8BCgEbZm9yRWFjaEFzc2V0Q2FjaGVVc2VyUmV3YXJkAgVhY2N1bQVhc3NldAQLJHQwOTUyMDk2NTUJAQpjYWxjUmV3YXJkBQULdXNlckFkZHJlc3MFBWFzc2V0BQ1zdGFrZWRBbW91bnRYBQ5kZXBvc2l0TnVtVXNlcgUOZGVwb3NpdE51bUxhc3QEC3Jld2FyZFRvdGFsCAULJHQwOTUyMDk2NTUCXzEEBmNhY2hlZAgFCyR0MDk1MjA5NjU1Al8yBAdkeW5hbWljCAULJHQwOTUyMDk2NTUCXzMEE3Jld2FyZENhY2hlZFBhcnRLRVkIBQskdDA5NTIwOTY1NQJfNAkAzQgCBQVhY2N1bQkBDEludGVnZXJFbnRyeQIFE3Jld2FyZENhY2hlZFBhcnRLRVkFC3Jld2FyZFRvdGFsAwMJAAACBQ5kZXBvc2l0TnVtTGFzdAD///////////8BCQAAAgUOZGVwb3NpdE51bVVzZXIA////////////AQcFA25pbAMDCQAAAgUOZGVwb3NpdE51bUxhc3QA////////////AQkAZgIFDmRlcG9zaXROdW1Vc2VyAP///////////wEHCQACAQIvaW52YWxpZCBkZXBvc2l0TnVtTGFzdCBhbmQgZGVwb3NpdE51bVVzZXIgc3RhdGUDAwkAZgIFDmRlcG9zaXROdW1MYXN0AP///////////wEJAGcCBQ5kZXBvc2l0TnVtVXNlcgD///////////8BBwMFCWlzTmV3VXNlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgUbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQ5kZXBvc2l0TnVtTGFzdAUDbmlsCQDNCAIKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEbZm9yRWFjaEFzc2V0Q2FjaGVVc2VyUmV3YXJkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA5CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJCQEMSW50ZWdlckVudHJ5AgUbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQ5kZXBvc2l0TnVtTGFzdAkAAgEJAKwCAgkArAICCQCsAgICJHVuY292ZXJlZCBjb25kaXRpb246IGRlcG9zaXROdW1MYXN0PQkApAMBBQ5kZXBvc2l0TnVtTGFzdAIQIGRlcG9zaXROdW1Vc2VyPQkApAMBBQ5kZXBvc2l0TnVtVXNlcgEiSW5jcmVtZW50Tm90RGlzdHJpYnV0ZWRSZXdhcmRFbnRyeQIDdGtuCWFtb3VudEluYwQXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJARdrZXlOb3REaXN0cmlidXRlZFJld2FyZAEFA3RrbgQUbm90RGlzdHJpYnV0ZWRSZXdhcmQJAQxnZXRJbnRPckVsc2UCBRdub3REaXN0cmlidXRlZFJld2FyZEtFWQAACQEMSW50ZWdlckVudHJ5AgUXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJAGQCBRRub3REaXN0cmlidXRlZFJld2FyZAUJYW1vdW50SW5jAQtjb21tb25DbGFpbQILdXNlckFkZHJlc3MBaQQOdXNlckFkZHJlc3NTdHIJAKUIAQULdXNlckFkZHJlc3MDCQBmAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIZcGF5bWVudHMgYXJlIG5vdCBhY2NlcHRlZAQNJHQwMTI1OTYxMjcwMQkBC3ZhbHVlT3JFbHNlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkAlQoDBgAAAAAECWlzTmV3VXNlcggFDSR0MDEyNTk2MTI3MDECXzEEDHN0YWtlZEFtb3VudAgFDSR0MDEyNTk2MTI3MDECXzIEDHN0YWtpbmdTdGFydAgFDSR0MDEyNTk2MTI3MDECXzMEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQ51c2VyQWRkcmVzc1N0cgQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgVhY2N1bQVhc3NldAQNJHQwMTMwNzIxMzIxMAkBCmNhbGNSZXdhcmQFBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQFDXN0YWtlZEFtb3VudFgFDmRlcG9zaXROdW1Vc2VyBQ5kZXBvc2l0TnVtTGFzdAQLcmV3YXJkVG90YWwIBQ0kdDAxMzA3MjEzMjEwAl8xBAZjYWNoZWQIBQ0kdDAxMzA3MjEzMjEwAl8yBAdkeW5hbWljCAUNJHQwMTMwNzIxMzIxMAJfMwQTcmV3YXJkQ2FjaGVkUGFydEtFWQgFDSR0MDEzMDcyMTMyMTACXzQECmNsYWltZWRLRVkJAQprZXlDbGFpbWVkAgUOdXNlckFkZHJlc3NTdHIFBWFzc2V0BA0kdDAxMzI3MDEzMzA3BQVhY2N1bQQEZGF0YQgFDSR0MDEzMjcwMTMzMDcCXzEEEWNsYWltZWRBbXRCeUFzc2V0CAUNJHQwMTMyNzAxMzMwNwJfMgQHbmV3UGFydAkAuQkCCQDMCAIFBWFzc2V0CQDMCAIJAKQDAQULcmV3YXJkVG90YWwFA25pbAIBOgQUY2xhaW1lZEFtdEJ5QXNzZXROZXcJALkJAgkAzAgCBRFjbGFpbWVkQW10QnlBc3NldAkAzAgCBQduZXdQYXJ0BQNuaWwCAV8DCQBnAgAABQtyZXdhcmRUb3RhbAkAlAoCBQRkYXRhBRRjbGFpbWVkQW10QnlBc3NldE5ldwkAlAoCCQDNCAIJAM0IAgkAzQgCBQRkYXRhCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwULcmV3YXJkVG90YWwJAQt0b0Fzc2V0VmVjdAEFBWFzc2V0CQEMSW50ZWdlckVudHJ5AgUKY2xhaW1lZEtFWQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUKY2xhaW1lZEtFWQAABQtyZXdhcmRUb3RhbAkBDEludGVnZXJFbnRyeQIFE3Jld2FyZENhY2hlZFBhcnRLRVkAAAUUY2xhaW1lZEFtdEJ5QXNzZXROZXcEDSR0MDEzNzY3MTM4ODAKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBH2ZvckVhY2hBc3NldENhbGNVbmNsYWltZWRSZXdhcmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkECXRyYW5zZmVycwgFDSR0MDEzNzY3MTM4ODACXzEEF2NsYWltZWRBbXRCeUFzc2V0UmVzdWx0CAUNJHQwMTM3NjcxMzg4MAJfMgMJAGcCAAAJAJADAQUJdHJhbnNmZXJzCQCUCgIFA25pbAAACQCUCgIJAM0IAgkAzQgCBQl0cmFuc2ZlcnMJAQxJbnRlZ2VyRW50cnkCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkFDmRlcG9zaXROdW1MYXN0CQERQ2xhaW1IaXN0b3J5RW50cnkDBQt1c2VyQWRkcmVzcwgFAWkNdHJhbnNhY3Rpb25JZAkAsAICBRdjbGFpbWVkQW10QnlBc3NldFJlc3VsdAABCQCQAwEFCXRyYW5zZmVycwkBaQENY29uc3RydWN0b3JWMQUXbmV1dHJpbm9Db250cmFjdEFkZHJlc3MTbWF0aENvbnRyYWN0QWRkcmVzcw1taW5Mb2NrQW1vdW50CGhhbGZMaWZlFXN1cHBvcnRlZFJld2FyZEFzc2V0cwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARprZXlOZXV0cmlub0NvbnRyYWN0QWRkcmVzcwAFF25ldXRyaW5vQ29udHJhY3RBZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlNYXRoQ29udHJhY3RBZGRyZXNzAAUTbWF0aENvbnRyYWN0QWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEGtleU1pbkxvY2tBbW91bnQABQ1taW5Mb2NrQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQELa2V5SGFsZkxpZmUABQhoYWxmTGlmZQkAzAgCCQELU3RyaW5nRW50cnkCCQEYa2V5U3VwcG9ydGVkUmV3YXJkQXNzZXRzAAUVc3VwcG9ydGVkUmV3YXJkQXNzZXRzBQNuaWwBaQEFc3Rha2UABA0kdDAxNDczMTE0NzkzCQEPZ2V0UGFyYW1zT3JGYWlsAAQLYm9uZEFzc2V0SWQIBQ0kdDAxNDczMTE0NzkzAl8xBA1taW5Mb2NrQW1vdW50CAUNJHQwMTQ3MzExNDc5MwJfMgQIaGFsZkxpZmUIBQ0kdDAxNDczMTE0NzkzAl8zAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIVSW52YWxpZCBwYXltZW50cyBzaXplBAdwYXltZW50CQCRAwIIBQFpCHBheW1lbnRzAAAEBmFtb3VudAgFB3BheW1lbnQGYW1vdW50BBNpbnZhbGlkQXNzZXRNZXNzYWdlCQCsAgIJAKwCAgIPSW52YWxpZCBhc3NldC4gCQDYBAEFC2JvbmRBc3NldElkAgwgaXMgZXhwZWN0ZWQEB2Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFB3BheW1lbnQHYXNzZXRJZAUTaW52YWxpZEFzc2V0TWVzc2FnZQMJAQIhPQIFB2Fzc2V0SWQFC2JvbmRBc3NldElkCQACAQUTaW52YWxpZEFzc2V0TWVzc2FnZQQLdXNlckFkZHJlc3MIBQFpBmNhbGxlcgQOdXNlckFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyBA0kdDAxNTMzNTE1NDQyCQELdmFsdWVPckVsc2UCCQETZ2V0VXNlclBhcmFtc09yVW5pdAEFC3VzZXJBZGRyZXNzCQCVCgMGAAAA////////////AQQJaXNOZXdVc2VyCAUNJHQwMTUzMzUxNTQ0MgJfMQQKbG9ja0Ftb3VudAgFDSR0MDE1MzM1MTU0NDICXzIED2xvY2tTdGFydEhlaWdodAgFDSR0MDE1MzM1MTU0NDICXzMEDG1lcmdlZEFtb3VudAMFCWlzTmV3VXNlcgUGYW1vdW50CQBkAgUGYW1vdW50BQpsb2NrQW1vdW50BBFtZXJnZWRTdGFydEhlaWdodAMFCWlzTmV3VXNlcgUGaGVpZ2h0CQEFYXNJbnQBCQD8BwQFDG1hdGhDb250cmFjdAITbWVyZ2VTdGFrZXNSRUFET05MWQkAzAgCBQZhbW91bnQJAMwIAgUGaGVpZ2h0CQDMCAIFCmxvY2tBbW91bnQJAMwIAgUPbG9ja1N0YXJ0SGVpZ2h0CQDMCAIFCGhhbGZMaWZlBQNuaWwFA25pbAMJAGYCBQ1taW5Mb2NrQW1vdW50BQxtZXJnZWRBbW91bnQJAAIBCQCsAgICE01pbiBsb2NrIGFtb3VudCBpcyAJAKQDAQUNbWluTG9ja0Ftb3VudAQNJHQwMTU4MDMxNTkwNQkBC1N0YXRzUmVzdWx0AwUGYW1vdW50AAEDBQlpc05ld1VzZXIAAQAABAxzdGF0c0VudHJpZXMIBQ0kdDAxNTgwMzE1OTA1Al8xBAt0b3RhbFN0YWtlZAgFDSR0MDE1ODAzMTU5MDUCXzIEDnRvdGFsU3Rha2VkTmV3CAUNJHQwMTU4MDMxNTkwNQJfMwkAzggCCQDOCAIJAM4IAgkAzAgCCQESSGlzdG9yeVJlY29yZEVudHJ5BwIFc3Rha2UFC3VzZXJBZGRyZXNzCAUBaQ10cmFuc2FjdGlvbklkBQpsb2NrQW1vdW50BQ9sb2NrU3RhcnRIZWlnaHQFDG1lcmdlZEFtb3VudAURbWVyZ2VkU3RhcnRIZWlnaHQFA25pbAkBDVJld2FyZEVudHJpZXMDBQlpc05ld1VzZXIFDnVzZXJBZGRyZXNzU3RyBQpsb2NrQW1vdW50CQEPTG9ja1BhcmFtc0VudHJ5AwULdXNlckFkZHJlc3MFDG1lcmdlZEFtb3VudAURbWVyZ2VkU3RhcnRIZWlnaHQFDHN0YXRzRW50cmllcwFpAQd1bnN0YWtlAQZhbW91bnQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAiN1bnN0YWtlIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudAQLdXNlckFkZHJlc3MIBQFpBmNhbGxlcgQOdXNlckFkZHJlc3NTdHIJAKUIAQULdXNlckFkZHJlc3MEDSR0MDE2MzkxMTY0NTMJAQ9nZXRQYXJhbXNPckZhaWwABAtib25kQXNzZXRJZAgFDSR0MDE2MzkxMTY0NTMCXzEEDW1pbkxvY2tBbW91bnQIBQ0kdDAxNjM5MTE2NDUzAl8yBAhoYWxmTGlmZQgFDSR0MDE2MzkxMTY0NTMCXzMEDSR0MDE2NDU2MTY1MzAJARNnZXRVc2VyUGFyYW1zT3JGYWlsAQULdXNlckFkZHJlc3MECWlzTmV3VXNlcggFDSR0MDE2NDU2MTY1MzACXzEECmxvY2tBbW91bnQIBQ0kdDAxNjQ1NjE2NTMwAl8yBAlsb2NrU3RhcnQIBQ0kdDAxNjQ1NjE2NTMwAl8zAwkAZwIAAAUKbG9ja0Ftb3VudAkAAgECEk5vdGhpbmcgdG8gdW5zdGFrZQMJAGYCBQZhbW91bnQFCmxvY2tBbW91bnQJAAIBCQCsAgIJAKwCAgkArAICAgpSZXF1ZXN0ZWQgCQCkAwEFBmFtb3VudAISLCBidXQgc3Rha2VkIG9ubHkgCQCkAwEFCmxvY2tBbW91bnQEAXQICQEFdmFsdWUBCQDtBwEFBmhlaWdodAl0aW1lc3RhbXAEC3JlbGVhc2VUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFC2dvdkNvbnRyYWN0CQEXa2V5VXNlckduc2J0UmVsZWFzZVRpbWUBBQ51c2VyQWRkcmVzc1N0cgAAAwkAZwIFC3JlbGVhc2VUaW1lBQF0CQACAQkArAICAjtZb3VyIGdOc2J0IGFyZSB0YWtpbmcgcGFydCBpbiB2b3RpbmcsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQtyZWxlYXNlVGltZQQPY29taXNzaW9uQW1vdW50CQEFYXNJbnQBCQD8BwQFDG1hdGhDb250cmFjdAIhZ2V0VW5zdGFrZUNvbWlzc2lvbkFtb3VudFJFQURPTkxZCQDMCAIFBmFtb3VudAkAzAgCBQlsb2NrU3RhcnQJAMwIAgUIaGFsZkxpZmUFA25pbAUDbmlsBA0kdDAxNzE3MTE3MzI1CQELU3RhdHNSZXN1bHQDCQEBLQEFBmFtb3VudAMJAAACBQZhbW91bnQFCmxvY2tBbW91bnQA////////////AQAAAwkAAAIFBmFtb3VudAUKbG9ja0Ftb3VudAD///////////8BAAAEDHN0YXRzRW50cmllcwgFDSR0MDE3MTcxMTczMjUCXzEEC3RvdGFsU3Rha2VkCAUNJHQwMTcxNzExNzMyNQJfMgQOdG90YWxTdGFrZWROZXcIBQ0kdDAxNzE3MTE3MzI1Al8zCQDOCAIJAM4IAgkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzCQBlAgUGYW1vdW50BQ9jb21pc3Npb25BbW91bnQFC2JvbmRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD2F1Y3Rpb25Db250cmFjdAUPY29taXNzaW9uQW1vdW50BQtib25kQXNzZXRJZAkAzAgCCQESSGlzdG9yeVJlY29yZEVudHJ5BwIHdW5zdGFrZQULdXNlckFkZHJlc3MIBQFpDXRyYW5zYWN0aW9uSWQFCmxvY2tBbW91bnQFCWxvY2tTdGFydAkAZQIFCmxvY2tBbW91bnQFBmFtb3VudAUJbG9ja1N0YXJ0BQNuaWwJAQ1SZXdhcmRFbnRyaWVzAwcFDnVzZXJBZGRyZXNzU3RyBQpsb2NrQW1vdW50CQEPTG9ja1BhcmFtc0VudHJ5AwULdXNlckFkZHJlc3MJAGUCBQpsb2NrQW1vdW50BQZhbW91bnQFCWxvY2tTdGFydAUMc3RhdHNFbnRyaWVzAWkBB2RlcG9zaXQABAt0b3RhbFN0YWtlZAkBDGdldEludE9yRWxzZQIJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAAAAMJAGYCAAAFC3RvdGFsU3Rha2VkCQACAQIbVE9ETzogY2FzZSBpcyBub3Qgc3VwcG9ydGVkBBFkZXBvc2l0TnVtTGFzdEtFWQkBEWtleURlcG9zaXROdW1MYXN0AAQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCBRFkZXBvc2l0TnVtTGFzdEtFWQD///////////8BBA1kZXBvc2l0TnVtTmV3CQBkAgUOZGVwb3NpdE51bUxhc3QAAQQJdG90YWxzS0VZCQEYa2V5U3RhdHNEZXBvc2l0QW10VG90YWxzAAQIYnlEYXlLRVkJARdrZXlTdGF0c0RlcG9zaXRBbXRCeURheQEJAQx0b1N0YXJ0T2ZEYXkBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQKY3VyclRvdGFscwkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEFCXRvdGFsc0tFWQURZGVmYXVsdFRvdGFsc0RBVEEFA1NFUAQJY3VyckJ5RGF5CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUIYnlEYXlLRVkFEWRlZmF1bHRUb3RhbHNEQVRBBQNTRVAKAQNkZXACA2FjYwNwbXQEBmFtb3VudAgFA3BtdAZhbW91bnQEDXBtdEFzc2V0SWRTdHIJANgEAQkBC3ZhbHVlT3JFbHNlAggFA3BtdAdhc3NldElkBQdXQVZFU0lEAwkBASEBCQEIY29udGFpbnMCBRJzdXBwb3J0ZWRBc3NldHNTdHIFDXBtdEFzc2V0SWRTdHIJAAIBCQCsAgIJAKwCAgUSc3VwcG9ydGVkQXNzZXRzU3RyAhEgZG9lc24ndCBjb250YWluIAUNcG10QXNzZXRJZFN0cgMJAAACBQt0b3RhbFN0YWtlZAAACQCWCgQJAM0IAggFA2FjYwJfMQkBIkluY3JlbWVudE5vdERpc3RyaWJ1dGVkUmV3YXJkRW50cnkCBQ1wbXRBc3NldElkU3RyBQZhbW91bnQJAM0IAggFA2FjYwJfMgUNcG10QXNzZXRJZFN0cgkAzQgCCAUDYWNjAl8zCQC2AgEAAAkAzQgCCAUDYWNjAl80BQZhbW91bnQEEHJld2FyZFBlck5zYnRYMTgJALwCAwkAtgIBBQZhbW91bnQFB01VTFRYMTgJALYCAQULdG90YWxTdGFrZWQJAJYKBAgFA2FjYwJfMQkAzQgCCAUDYWNjAl8yBQ1wbXRBc3NldElkU3RyCQDNCAIIBQNhY2MCXzMFEHJld2FyZFBlck5zYnRYMTgJAM0IAggFA2FjYwJfNAUGYW1vdW50BApwbXRzUmVzdWx0CgACJGwIBQFpCHBheW1lbnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEBQNuaWwFA25pbAUDbmlsBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA2RlcAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgoBGXJlZnJlc2hSZXdhcmRVcGRhdGVUb3RhbHMCBWFjY3VtCW5leHRBc3NldAQBawgFBWFjY3VtAl80BApzdW1MYXN0U3RyCQEMZ2V0U3RyT3JFbHNlAgkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDmRlcG9zaXROdW1MYXN0BQluZXh0QXNzZXQCATAEA2lkeAkAzwgCCAUKcG10c1Jlc3VsdAJfMgUJbmV4dEFzc2V0BANzdW0DCQEJaXNEZWZpbmVkAQUDaWR4BAFqCQEFdmFsdWUBBQNpZHgECnN0YXRzRGVsdGEJAJEDAggFCnBtdHNSZXN1bHQCXzQFAWoJAJUKAwkApgMBCQC3AgIJAKcDAQUKc3VtTGFzdFN0cgkAkQMCCAUKcG10c1Jlc3VsdAJfMwUBagkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmN1cnJUb3RhbHMJAGQCBQFrAAEFCnN0YXRzRGVsdGEJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQljdXJyQnlEYXkJAGQCBQFrAAEFCnN0YXRzRGVsdGEJAJUKAwUKc3VtTGFzdFN0cgkAkQMCBQpjdXJyVG90YWxzCQBkAgUBawABCQCRAwIFCWN1cnJCeURheQkAZAIFAWsAAQkAlgoECQDNCAIIBQVhY2N1bQJfMQkBC1N0cmluZ0VudHJ5AgkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDWRlcG9zaXROdW1OZXcFCW5leHRBc3NldAgFA3N1bQJfMQkArAICCQCsAgIIBQVhY2N1bQJfMgUDU0VQCAUDc3VtAl8yCQCsAgIJAKwCAggFBWFjY3VtAl8zBQNTRVAIBQNzdW0CXzMJAGQCBQFrAAEEDGFzc2V0c1Jlc3VsdAoAAiRsBRNzdXBwb3J0ZWRBc3NldHNMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEBQNuaWwFE0RlcG9zaXRUb3RhbHNQUkVGSVgFE0RlcG9zaXRUb3RhbHNQUkVGSVgAAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEZcmVmcmVzaFJld2FyZFVwZGF0ZVRvdGFscwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOQkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQkAlAoCCQDNCAIJAM0IAgkAzQgCCQDOCAIIBQpwbXRzUmVzdWx0Al8xCAUMYXNzZXRzUmVzdWx0Al8xCQEMSW50ZWdlckVudHJ5AgURZGVwb3NpdE51bUxhc3RLRVkFDWRlcG9zaXROdW1OZXcJAQtTdHJpbmdFbnRyeQIFCXRvdGFsc0tFWQgFDGFzc2V0c1Jlc3VsdAJfMgkBC1N0cmluZ0VudHJ5AgUIYnlEYXlLRVkIBQxhc3NldHNSZXN1bHQCXzMFDWRlcG9zaXROdW1OZXcBaQEMY2xhaW1SZXdhcmRzAAkBC2NvbW1vbkNsYWltAggFAWkGY2FsbGVyBQFpAWkBGmNsYWltUmV3YXJkc0J5T3JpZ2luQ2FsbGVyAAkBC2NvbW1vbkNsYWltAggFAWkMb3JpZ2luQ2FsbGVyBQFpAWkBGHVuY2xhaW1lZFJld2FyZHNSRUFET05MWQEOdXNlckFkZHJlc3NTdHIKARZmb3JFYWNoQXNzZXRaZXJvUmV3YXJkAgVhY2N1bQVhc3NldAkArAICCQCsAgIFBWFjY3VtCQC5CQIJAMwIAgUFYXNzZXQJAMwIAgIBMAkAzAgCAgEwBQNuaWwCAToCAV8EEnVuY2xhaW1lZFJld2FyZFN0cgMJAAACBQ51c2VyQWRkcmVzc1N0cgIACgACJGwFE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBFmZvckVhY2hBc3NldFplcm9SZXdhcmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkEC3VzZXJBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBQ51c2VyQWRkcmVzc1N0cgQNJHQwMjEyNTYyMTM2MQkBC3ZhbHVlT3JFbHNlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkAlQoDBgAAAAAECWlzTmV3VXNlcggFDSR0MDIxMjU2MjEzNjECXzEEDHN0YWtlZEFtb3VudAgFDSR0MDIxMjU2MjEzNjECXzIEDHN0YWtpbmdTdGFydAgFDSR0MDIxMjU2MjEzNjECXzMEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQ51c2VyQWRkcmVzc1N0cgQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgVhY2N1bQVhc3NldAQNJHQwMjE3MDcyMTg0NQkBCmNhbGNSZXdhcmQFBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQFDXN0YWtlZEFtb3VudFgFDmRlcG9zaXROdW1Vc2VyBQ5kZXBvc2l0TnVtTGFzdAQLcmV3YXJkVG90YWwIBQ0kdDAyMTcwNzIxODQ1Al8xBAZjYWNoZWQIBQ0kdDAyMTcwNzIxODQ1Al8yBAdkeW5hbWljCAUNJHQwMjE3MDcyMTg0NQJfMwQTcmV3YXJkQ2FjaGVkUGFydEtFWQgFDSR0MDIxNzA3MjE4NDUCXzQEB2NsYWltZWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBCmtleUNsYWltZWQCBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQAAAkArAICCQCsAgIFBWFjY3VtCQC5CQIJAMwIAgUFYXNzZXQJAMwIAgkApAMBBQtyZXdhcmRUb3RhbAkAzAgCCQCkAwEFB2NsYWltZWQFA25pbAIBOgIBXwoAAiRsBRNzdXBwb3J0ZWRBc3NldHNMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA5CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJCQCUCgIFA25pbAkAswICBRJ1bmNsYWltZWRSZXdhcmRTdHIAAQFpARhuc2J0VW5zdGFraW5nU1lTUkVBRE9OTFkCFXVzZXJBZGRyZXNzU3RyT3JFbXB0eQt1bnN0YWtlQW10UAQLcmVzdWx0QXJyYXkDCQAAAgUVdXNlckFkZHJlc3NTdHJPckVtcHR5AgAJAMwIAgAACQDMCAIAAAkAzAgCAAAJAMwIAgAABQNuaWwEC3VzZXJBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBRV1c2VyQWRkcmVzc1N0ck9yRW1wdHkEB2NmZ0RBVEEJAQ9nZXRQYXJhbXNPckZhaWwABAtuc2J0QXNzZXRJZAgFB2NmZ0RBVEECXzEEDW1pbkxvY2tBbW91bnQIBQdjZmdEQVRBAl8yBAhoYWxmTGlmZQgFB2NmZ0RBVEECXzMECHVzZXJEQVRBCQELdmFsdWVPckVsc2UCCQETZ2V0VXNlclBhcmFtc09yVW5pdAEFC3VzZXJBZGRyZXNzCQCVCgMGAAAAAAQJaXNOZXdVc2VyCAUIdXNlckRBVEECXzEEDHN0YWtlZEFtb3VudAgFCHVzZXJEQVRBAl8yBAlsb2NrU3RhcnQIBQh1c2VyREFUQQJfMwQKdW5zdGFrZUFtdAMJAGYCBQt1bnN0YWtlQW10UAUMc3Rha2VkQW1vdW50BQxzdGFrZWRBbW91bnQFC3Vuc3Rha2VBbXRQBA9zdGFrZWRBbW91bnRORVcJAGUCBQxzdGFrZWRBbW91bnQFCnVuc3Rha2VBbXQED2NvbWlzc2lvbkFtb3VudAMJAAACBQp1bnN0YWtlQW10AAAAAAkBBWFzSW50AQkA/AcEBQxtYXRoQ29udHJhY3QCIWdldFVuc3Rha2VDb21pc3Npb25BbW91bnRSRUFET05MWQkAzAgCBQp1bnN0YWtlQW10CQDMCAIFCWxvY2tTdGFydAkAzAgCBQhoYWxmTGlmZQUDbmlsBQNuaWwEDXJlY2VpdmVBbW91bnQJAGUCBQp1bnN0YWtlQW10BQ9jb21pc3Npb25BbW91bnQJAMwIAgUMc3Rha2VkQW1vdW50CQDMCAIFD3N0YWtlZEFtb3VudE5FVwkAzAgCBQ1yZWNlaXZlQW1vdW50CQDMCAIFD2NvbWlzc2lvbkFtb3VudAUDbmlsCQCUCgIFA25pbAULcmVzdWx0QXJyYXkBaQEWbnNidFN0YWtpbmdTWVNSRUFET05MWQIOdXNlckFkZHJlc3NTdHIIbnNidERpZmYEDHRvdGFsTnNidEFtdAkBDGdldEludE9yRWxzZQIJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAAAAMJAAACBQ51c2VyQWRkcmVzc1N0cgIACQCUCgIFA25pbAkAzAgCAAAJAMwIAgUMdG90YWxOc2J0QW10CQDMCAIAAAUDbmlsBAt1c2VyQWRkcmVzcwkBD3RvQWRkcmVzc09yRmFpbAEFDnVzZXJBZGRyZXNzU3RyBA0kdDAyMzUyMzIzNjI3CQELdmFsdWVPckVsc2UCCQETZ2V0VXNlclBhcmFtc09yVW5pdAEFC3VzZXJBZGRyZXNzCQCVCgMGAAAAAAQJaXNOZXdVc2VyCAUNJHQwMjM1MjMyMzYyNwJfMQQLdXNlck5zYnRBbXQIBQ0kdDAyMzUyMzIzNjI3Al8yBAxzdGFraW5nU3RhcnQIBQ0kdDAyMzUyMzIzNjI3Al8zCQCUCgIFA25pbAkAzAgCBQt1c2VyTnNidEFtdAkAzAgCBQx0b3RhbE5zYnRBbXQJAMwIAgUMc3Rha2luZ1N0YXJ0BQNuaWwBAnR4AQZ2ZXJpZnkABBNwdWJLZXlBZG1pbnNMaXN0U3RyCQC5CQIJAMwIAgIsRXh0RUVLMTlubUtqOW1DcG5XeXZFRUpGWUFUTE1jVkVNdm9oaFVIa3lITm0JAMwIAgIsRXY1cHk1RmZCUVg5Y1pwWUtuZlFyVEI0OUJ5ZjhRbXBaV2VEVlJpbTR5VjcJAMwIAgIsRFV1dUxqWHU5OG5Cd1pjN2Zxd0NUanRBM25uUndnVGJrTVNyNVNVMk5tRFIJAMwIAgIsRFV1dUxqWHU5OG5Cd1pjN2Zxd0NUanRBM25uUndnVGJrTVNyNVNVMk5tRFIFA25pbAUDU0VQBBBwdWJLZXlBZG1pbnNMaXN0CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPY29udHJvbENvbnRyYWN0Agwlc19fbXVsdGlzaWcFE3B1YktleUFkbWluc0xpc3RTdHIFA1NFUAQFY291bnQJAGQCCQBkAgkAZAIDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAAAAAEAAAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAEJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAEAAQAAAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAgkA2QQBCQCRAwIFEHB1YktleUFkbWluc0xpc3QAAgABAAADCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwADCQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAADAAIAAAkAZwIFBWNvdW50AAOU6Kz7",
    "height": 2462140,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Hzn2zvuPQTct4fG3FAD2Vt8bz75SoGJbVryFdLzXJwyi
Next: FppeRUTHsduMTo3X6qpXvTziYBnAdi1qUiQmCUsxVUGB

Diff: 
Old New Differences
234 234  
235 235  let DepositTotalsPREFIX = "%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d"
236 236  
237 - func updateDepositTotals (currVal,idxToUpdate,deltaAmt) = {
238 -     let currArr = split(currVal, SEP)
239 -     func updDepTotByIdx (idx) =     if ((idx != idxToUpdate))
240 -         then currArr[idx]
241 -         else toString((parseIntValue(currArr[idx]) + deltaAmt))
242 - 
243 -     makeString([DepositTotalsPREFIX, updDepTotByIdx(1), updDepTotByIdx(2), updDepTotByIdx(3), updDepTotByIdx(4), updDepTotByIdx(5), updDepTotByIdx(6), updDepTotByIdx(7), updDepTotByIdx(8), updDepTotByIdx(9), updDepTotByIdx(10), updDepTotByIdx(11), updDepTotByIdx(12), updDepTotByIdx(13), updDepTotByIdx(14), updDepTotByIdx(15), updDepTotByIdx(16), updDepTotByIdx(17), updDepTotByIdx(18)], SEP)
244 -     }
245 - 
246 - 
247 - func DepositsTotalsEntries (depositAmount,assetIdStr) = {
248 -     let startOfDay = toStartOfDay(lastBlock.timestamp)
249 -     let byDayKEY = keyStatsDepositAmtByDay(startOfDay)
250 -     let totalsKEY = keyStatsDepositAmtTotals()
251 -     let position = findElementPosition(supportedAssetsStr, assetIdStr, "_")
252 -     let defaultDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
253 -     let currTotalsDATA = valueOrElse(getString(this, totalsKEY), defaultDATA)
254 -     let newTotalsDATA = updateDepositTotals(currTotalsDATA, (position + 1), depositAmount)
255 - [StringEntry(totalsKEY, newTotalsDATA), StringEntry(byDayKEY, newTotalsDATA)]
256 -     }
257 - 
237 + let defaultTotalsDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
258 238  
259 239  func RewardEntries (isNewUser,userAddress,stakedAmount) = {
260 240      let stakedAmountX = toBigInt(stakedAmount)
262 242      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
263 243      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
264 244      func forEachAssetCacheUserReward (accum,asset) =     {
265 -         let $t01079910934 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
266 -         let rewardTotal = $t01079910934._1
267 -         let cached = $t01079910934._2
268 -         let dynamic = $t01079910934._3
269 -         let rewardCachedPartKEY = $t01079910934._4
245 +         let $t095209655 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
246 +         let rewardTotal = $t095209655._1
247 +         let cached = $t095209655._2
248 +         let dynamic = $t095209655._3
249 +         let rewardCachedPartKEY = $t095209655._4
270 250          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
271 251          }
272 252  
313 293      if ((size(i.payments) > 0))
314 294          then throw("payments are not accepted")
315 295          else {
316 -             let $t01387513980 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
317 -             let isNewUser = $t01387513980._1
318 -             let stakedAmount = $t01387513980._2
319 -             let stakingStart = $t01387513980._3
296 +             let $t01259612701 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
297 +             let isNewUser = $t01259612701._1
298 +             let stakedAmount = $t01259612701._2
299 +             let stakingStart = $t01259612701._3
320 300              let stakedAmountX = toBigInt(stakedAmount)
321 301              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
322 302              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
323 303              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
324 304              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
325 -                 let $t01435114489 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
326 -                 let rewardTotal = $t01435114489._1
327 -                 let cached = $t01435114489._2
328 -                 let dynamic = $t01435114489._3
329 -                 let rewardCachedPartKEY = $t01435114489._4
305 +                 let $t01307213210 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
306 +                 let rewardTotal = $t01307213210._1
307 +                 let cached = $t01307213210._2
308 +                 let dynamic = $t01307213210._3
309 +                 let rewardCachedPartKEY = $t01307213210._4
330 310                  let claimedKEY = keyClaimed(userAddressStr, asset)
331 -                 let $t01454914586 = accum
332 -                 let data = $t01454914586._1
333 -                 let claimedAmtByAsset = $t01454914586._2
311 +                 let $t01327013307 = accum
312 +                 let data = $t01327013307._1
313 +                 let claimedAmtByAsset = $t01327013307._2
334 314                  let newPart = makeString([asset, toString(rewardTotal)], ":")
335 315                  let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
336 316                  if ((0 >= rewardTotal))
338 318                      else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
339 319                  }
340 320  
341 -             let $t01504615159 = {
321 +             let $t01376713880 = {
342 322                  let $l = supportedAssetsList
343 323                  let $s = size($l)
344 324                  let $acc0 = $Tuple2(nil, "")
352 332  
353 333                  $f0_2($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)
354 334                  }
355 -             let transfers = $t01504615159._1
356 -             let claimedAmtByAssetResult = $t01504615159._2
335 +             let transfers = $t01376713880._1
336 +             let claimedAmtByAssetResult = $t01376713880._2
357 337              if ((0 >= size(transfers)))
358 338                  then $Tuple2(nil, 0)
359 339                  else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))
370 350  
371 351  @Callable(i)
372 352  func stake () = {
373 -     let $t01601016072 = getParamsOrFail()
374 -     let bondAssetId = $t01601016072._1
375 -     let minLockAmount = $t01601016072._2
376 -     let halfLife = $t01601016072._3
353 +     let $t01473114793 = getParamsOrFail()
354 +     let bondAssetId = $t01473114793._1
355 +     let minLockAmount = $t01473114793._2
356 +     let halfLife = $t01473114793._3
377 357      if ((size(i.payments) != 1))
378 358          then throw("Invalid payments size")
379 359          else {
386 366                  else {
387 367                      let userAddress = i.caller
388 368                      let userAddressStr = toString(i.caller)
389 -                     let $t01661416721 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
390 -                     let isNewUser = $t01661416721._1
391 -                     let lockAmount = $t01661416721._2
392 -                     let lockStartHeight = $t01661416721._3
369 +                     let $t01533515442 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
370 +                     let isNewUser = $t01533515442._1
371 +                     let lockAmount = $t01533515442._2
372 +                     let lockStartHeight = $t01533515442._3
393 373                      let mergedAmount = if (isNewUser)
394 374                          then amount
395 375                          else (amount + lockAmount)
399 379                      if ((minLockAmount > mergedAmount))
400 380                          then throw(("Min lock amount is " + toString(minLockAmount)))
401 381                          else {
402 -                             let $t01708217184 = StatsResult(amount, 1, if (isNewUser)
382 +                             let $t01580315905 = StatsResult(amount, 1, if (isNewUser)
403 383                                  then 1
404 384                                  else 0)
405 -                             let statsEntries = $t01708217184._1
406 -                             let totalStaked = $t01708217184._2
407 -                             let totalStakedNew = $t01708217184._3
385 +                             let statsEntries = $t01580315905._1
386 +                             let totalStaked = $t01580315905._2
387 +                             let totalStakedNew = $t01580315905._3
408 388                              ((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
409 389                              }
410 390                      }
419 399      else {
420 400          let userAddress = i.caller
421 401          let userAddressStr = toString(userAddress)
422 -         let $t01767017732 = getParamsOrFail()
423 -         let bondAssetId = $t01767017732._1
424 -         let minLockAmount = $t01767017732._2
425 -         let halfLife = $t01767017732._3
426 -         let $t01773517809 = getUserParamsOrFail(userAddress)
427 -         let isNewUser = $t01773517809._1
428 -         let lockAmount = $t01773517809._2
429 -         let lockStart = $t01773517809._3
402 +         let $t01639116453 = getParamsOrFail()
403 +         let bondAssetId = $t01639116453._1
404 +         let minLockAmount = $t01639116453._2
405 +         let halfLife = $t01639116453._3
406 +         let $t01645616530 = getUserParamsOrFail(userAddress)
407 +         let isNewUser = $t01645616530._1
408 +         let lockAmount = $t01645616530._2
409 +         let lockStart = $t01645616530._3
430 410          if ((0 >= lockAmount))
431 411              then throw("Nothing to unstake")
432 412              else if ((amount > lockAmount))
438 418                          then throw(("Your gNsbt are taking part in voting, cannot unstake until " + toString(releaseTime)))
439 419                          else {
440 420                              let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
441 -                             let $t01845018604 = StatsResult(-(amount), if ((amount == lockAmount))
421 +                             let $t01717117325 = StatsResult(-(amount), if ((amount == lockAmount))
442 422                                  then -1
443 423                                  else 0, if ((amount == lockAmount))
444 424                                  then -1
445 425                                  else 0)
446 -                             let statsEntries = $t01845018604._1
447 -                             let totalStaked = $t01845018604._2
448 -                             let totalStakedNew = $t01845018604._3
426 +                             let statsEntries = $t01717117325._1
427 +                             let totalStaked = $t01717117325._2
428 +                             let totalStakedNew = $t01717117325._3
449 429                              ((([ScriptTransfer(userAddress, (amount - comissionAmount), bondAssetId), ScriptTransfer(auctionContract, comissionAmount, bondAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
450 430                              }
451 431                      }
462 442              let depositNumLastKEY = keyDepositNumLast()
463 443              let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
464 444              let depositNumNew = (depositNumLast + 1)
445 +             let totalsKEY = keyStatsDepositAmtTotals()
446 +             let byDayKEY = keyStatsDepositAmtByDay(toStartOfDay(lastBlock.timestamp))
447 +             let currTotals = split(valueOrElse(getString(totalsKEY), defaultTotalsDATA), SEP)
448 +             let currByDay = split(valueOrElse(getString(byDayKEY), defaultTotalsDATA), SEP)
465 449              func dep (acc,pmt) =             {
466 450                  let amount = pmt.amount
467 -                 let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
468 -                 let pmtAssetIdStr = toBase58String(pmtAssetId)
451 +                 let pmtAssetIdStr = toBase58String(valueOrElse(pmt.assetId, WAVESID))
469 452                  if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
470 453                      then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
471 454                      else if ((totalStaked == 0))
472 -                         then (acc :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount))
455 +                         then $Tuple4((acc._1 :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)), (acc._2 :+ pmtAssetIdStr), (acc._3 :+ toBigInt(0)), (acc._4 :+ amount))
473 456                          else {
474 457                              let rewardPerNsbtX18 = fraction(toBigInt(amount), MULTX18, toBigInt(totalStaked))
475 -                             func refreshRewardPerNsbtSUM (accum,nextAsset) =                             {
476 -                                 let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
477 -                                 (accum :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), if ((nextAsset == pmtAssetIdStr))
478 -                                     then toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18))
479 -                                     else sumLastStr))
480 -                                 }
481 - 
482 -                             ((acc ++ {
483 -                                 let $l = supportedAssetsList
484 -                                 let $s = size($l)
485 -                                 let $acc0 = nil
486 -                                 func $f0_1 ($a,$i) =                                 if (($i >= $s))
487 -                                     then $a
488 -                                     else refreshRewardPerNsbtSUM($a, $l[$i])
489 - 
490 -                                 func $f0_2 ($a,$i) =                                 if (($i >= $s))
491 -                                     then $a
492 -                                     else throw("List size exceeds 9")
493 - 
494 -                                 $f0_2($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)
495 -                                 }) ++ DepositsTotalsEntries(amount, pmtAssetIdStr))
458 +                             $Tuple4(acc._1, (acc._2 :+ pmtAssetIdStr), (acc._3 :+ rewardPerNsbtX18), (acc._4 :+ amount))
496 459                              }
497 460                  }
498 461  
499 -             ({
462 +             let pmtsResult = {
500 463                  let $l = i.payments
501 464                  let $s = size($l)
502 -                 let $acc0 = nil
465 +                 let $acc0 = $Tuple4(nil, nil, nil, nil)
503 466                  func $f0_1 ($a,$i) =                 if (($i >= $s))
504 467                      then $a
505 468                      else dep($a, $l[$i])
509 472                      else throw("List size exceeds 10")
510 473  
511 474                  $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)
512 -                 } :+ IntegerEntry(depositNumLastKEY, depositNumNew))
475 +                 }
476 +             func refreshRewardUpdateTotals (accum,nextAsset) =             {
477 +                 let k = accum._4
478 +                 let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
479 +                 let idx = indexOf(pmtsResult._2, nextAsset)
480 +                 let sum = if (isDefined(idx))
481 +                     then {
482 +                         let j = value(idx)
483 +                         let statsDelta = pmtsResult._4[j]
484 +                         $Tuple3(toString((parseBigIntValue(sumLastStr) + pmtsResult._3[j])), toString((parseIntValue(currTotals[(k + 1)]) + statsDelta)), toString((parseIntValue(currByDay[(k + 1)]) + statsDelta)))
485 +                         }
486 +                     else $Tuple3(sumLastStr, currTotals[(k + 1)], currByDay[(k + 1)])
487 +                 $Tuple4((accum._1 :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), sum._1)), ((accum._2 + SEP) + sum._2), ((accum._3 + SEP) + sum._3), (k + 1))
488 +                 }
489 + 
490 +             let assetsResult = {
491 +                 let $l = supportedAssetsList
492 +                 let $s = size($l)
493 +                 let $acc0 = $Tuple4(nil, DepositTotalsPREFIX, DepositTotalsPREFIX, 0)
494 +                 func $f1_1 ($a,$i) =                 if (($i >= $s))
495 +                     then $a
496 +                     else refreshRewardUpdateTotals($a, $l[$i])
497 + 
498 +                 func $f1_2 ($a,$i) =                 if (($i >= $s))
499 +                     then $a
500 +                     else throw("List size exceeds 9")
501 + 
502 +                 $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9)
503 +                 }
504 +             $Tuple2(((((pmtsResult._1 ++ assetsResult._1) :+ IntegerEntry(depositNumLastKEY, depositNumNew)) :+ StringEntry(totalsKEY, assetsResult._2)) :+ StringEntry(byDayKEY, assetsResult._3)), depositNumNew)
513 505              }
514 506      }
515 507  
546 538              }
547 539          else {
548 540              let userAddress = addressFromStringValue(userAddressStr)
549 -             let $t02111121216 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
550 -             let isNewUser = $t02111121216._1
551 -             let stakedAmount = $t02111121216._2
552 -             let stakingStart = $t02111121216._3
541 +             let $t02125621361 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
542 +             let isNewUser = $t02125621361._1
543 +             let stakedAmount = $t02125621361._2
544 +             let stakingStart = $t02125621361._3
553 545              let stakedAmountX = toBigInt(stakedAmount)
554 546              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
555 547              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
556 548              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
557 549              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
558 -                 let $t02156221700 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
559 -                 let rewardTotal = $t02156221700._1
560 -                 let cached = $t02156221700._2
561 -                 let dynamic = $t02156221700._3
562 -                 let rewardCachedPartKEY = $t02156221700._4
550 +                 let $t02170721845 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
551 +                 let rewardTotal = $t02170721845._1
552 +                 let cached = $t02170721845._2
553 +                 let dynamic = $t02170721845._3
554 +                 let rewardCachedPartKEY = $t02170721845._4
563 555                  let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
564 556                  ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
565 557                  }
618 610          then $Tuple2(nil, [0, totalNsbtAmt, 0])
619 611          else {
620 612              let userAddress = toAddressOrFail(userAddressStr)
621 -             let $t02337823482 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
622 -             let isNewUser = $t02337823482._1
623 -             let userNsbtAmt = $t02337823482._2
624 -             let stakingStart = $t02337823482._3
613 +             let $t02352323627 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
614 +             let isNewUser = $t02352323627._1
615 +             let userNsbtAmt = $t02352323627._2
616 +             let stakingStart = $t02352323627._3
625 617              $Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
626 618              }
627 619      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let separator = "__"
5 5  
6 6  let SEP = "__"
7 7  
8 8  let MULT6 = 1000000
9 9  
10 10  let MULT8 = 100000000
11 11  
12 12  let MULTX6 = toBigInt(MULT6)
13 13  
14 14  let MULTX8 = toBigInt(MULT8)
15 15  
16 16  let MULTX18 = toBigInt(1000000000000000000)
17 17  
18 18  let WAVESIDSTR = "WAVES"
19 19  
20 20  let WAVESID = fromBase58String(WAVESIDSTR)
21 21  
22 22  let DAYMILLIS = 86400000
23 23  
24 24  let IdxControlCfgNeutrinoDapp = 1
25 25  
26 26  let IdxControlCfgAuctionDapp = 2
27 27  
28 28  let IdxControlCfgRpdDapp = 3
29 29  
30 30  let IdxControlCfgMathDapp = 4
31 31  
32 32  let IdxControlCfgLiquidationDapp = 5
33 33  
34 34  let IdxControlCfgRestDapp = 6
35 35  
36 36  let IdxControlCfgNodeRegistryDapp = 7
37 37  
38 38  let IdxControlCfgNsbtStakingDapp = 8
39 39  
40 40  let IdxControlCfgMediatorDapp = 9
41 41  
42 42  let IdxControlCfgGovernanceDapp = 13
43 43  
44 44  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
45 45  
46 46  
47 47  func keyControlAddress () = "%s%s__config__controlAddress"
48 48  
49 49  
50 50  func keyControlCfg () = "%s__controlConfig"
51 51  
52 52  
53 53  func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
54 54  
55 55  
56 56  func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
57 57  
58 58  
59 59  let controlContract = addressFromStringValue(valueOrElse(getString(this, keyControlAddress()), "3N4NS7d4Jo9a6F14LiFUKKYVdUkkf2eP4Zx"))
60 60  
61 61  let controlCfg = readControlCfgOrFail(controlContract)
62 62  
63 63  let mathContract = getContractAddressOrFail(controlCfg, IdxControlCfgMathDapp)
64 64  
65 65  let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
66 66  
67 67  let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
68 68  
69 69  let govContract = getContractAddressOrFail(controlCfg, IdxControlCfgGovernanceDapp)
70 70  
71 71  func keyBondAsset () = "bond_asset_id"
72 72  
73 73  
74 74  func keyUserGnsbtReleaseTime (userAddr) = ("%s%s_userGnsbtReleaseTime__" + userAddr)
75 75  
76 76  
77 77  func keyNeutrinoContractAddress () = "%s__neutrinoContractAddress"
78 78  
79 79  
80 80  func keyMathContractAddress () = "%s__mathContract"
81 81  
82 82  
83 83  func keyMinLockAmount () = "%s__minLockAmount"
84 84  
85 85  
86 86  func keyHalfLife () = "%s__halfLife"
87 87  
88 88  
89 89  func keyLockParamUserAmount (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "amount"], separator)
90 90  
91 91  
92 92  func keyLockParamStartBlock (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "start"], separator)
93 93  
94 94  
95 95  func keyHistoryRecord (type,userAddress,txId) = makeString(["%s%s%s%s", "history", type, toString(userAddress), toBase58String(txId)], separator)
96 96  
97 97  
98 98  func keyLockParamTotalAmount () = makeString(["%s%s", "stats", "activeTotalLocked"], separator)
99 99  
100 100  
101 101  func keyStatsLocksCount () = makeString(["%s%s", "stats", "locksCount"], separator)
102 102  
103 103  
104 104  func keyStatsUsersCount () = makeString(["%s%s", "stats", "activeUsersCount"], separator)
105 105  
106 106  
107 107  func keyStatsDepositAmtByDay (timestamp) = makeString(["%s%s%d", "stats", "depositAmtByDay", toString(timestamp)], separator)
108 108  
109 109  
110 110  func keyStatsDepositAmtTotals () = makeString(["%s%s%d", "stats", "depositAmtTotals"], separator)
111 111  
112 112  
113 113  func keyNextPeriod () = "%s__nextPeriod"
114 114  
115 115  
116 116  func keySupportedRewardAssets () = "supportedRewardAssets"
117 117  
118 118  
119 119  func keyDepositNumLast () = makeString(["%s%s%s", "dep", "lastNum"], separator)
120 120  
121 121  
122 122  func keyUserRewardFromDepositNum (userAddress) = makeString(["%s%s%s", "userRwdFromDepNum", userAddress], separator)
123 123  
124 124  
125 125  func keyRewardPerNsbtSumAt (depositNum,tkn) = makeString(["%s%d", "rwdPerNsbtSumByDepNum", toString(depositNum), tkn], separator)
126 126  
127 127  
128 128  func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
129 129  
130 130  
131 131  func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
132 132  
133 133  
134 134  func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
135 135  
136 136  
137 137  func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
138 138  
139 139  
140 140  func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
141 141  
142 142  
143 143  func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
144 144  
145 145  
146 146  func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
147 147  
148 148  
149 149  func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
150 150  
151 151  
152 152  func toAddressOrFail (addressStr) = valueOrErrorMessage(addressFromString(addressStr), ("couldn't parse passed addressStr=" + addressStr))
153 153  
154 154  
155 155  func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
156 156      then unit
157 157      else fromBase58String(assetStr)
158 158  
159 159  
160 160  func asInt (val) = match val {
161 161      case valInt: Int => 
162 162          valInt
163 163      case _ => 
164 164          throw("fail to cast into Int")
165 165  }
166 166  
167 167  
168 168  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)
169 169  
170 170  
171 171  func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
172 172  
173 173  
174 174  func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
175 175  
176 176  
177 177  func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
178 178  
179 179  
180 180  func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
181 181      let locksCount = getIntOrZero(keyStatsLocksCount())
182 182      let usersCount = getIntOrZero(keyStatsUsersCount())
183 183      let totalAmount = getIntOrZero(keyLockParamTotalAmount())
184 184      let totalAmountNew = (totalAmount + totalLockedInc)
185 185      $Tuple3([IntegerEntry(keyStatsLocksCount(), (locksCount + lockCountInc)), IntegerEntry(keyStatsUsersCount(), (usersCount + usersCountInc)), IntegerEntry(keyLockParamTotalAmount(), totalAmountNew)], totalAmount, totalAmountNew)
186 186      }
187 187  
188 188  
189 189  func LockParamsEntry (userAddress,amount,start) = [IntegerEntry(keyLockParamUserAmount(userAddress), amount), IntegerEntry(keyLockParamStartBlock(userAddress), start)]
190 190  
191 191  
192 192  func getParamsOrFail () = $Tuple3(fromBase58String(getStringValue(neutrinoContract, keyBondAsset())), getIntOrFail(keyMinLockAmount()), getIntOrFail(keyHalfLife()))
193 193  
194 194  
195 195  func isActiveUser (userAddress) = (getIntOrElse(keyLockParamUserAmount(userAddress), 0) > 0)
196 196  
197 197  
198 198  func getUserParamsOrUnit (userAddress) = if (isActiveUser(userAddress))
199 199      then $Tuple3(false, getIntOrFail(keyLockParamUserAmount(userAddress)), getIntOrFail(keyLockParamStartBlock(userAddress)))
200 200      else unit
201 201  
202 202  
203 203  func getUserParamsOrFail (userAddress) = valueOrErrorMessage(getUserParamsOrUnit(userAddress), (("User " + toString(userAddress)) + " is not defined"))
204 204  
205 205  
206 206  let supportedAssetsStr = getStrOrElse(keySupportedRewardAssets(), "")
207 207  
208 208  let supportedAssetsList = split(supportedAssetsStr, "_")
209 209  
210 210  func calcReward (userAddress,assetId,stakedAmountX,depositNumUser,depositNumLast) = {
211 211      let rewardPerNsbtSumLastKEY = keyRewardPerNsbtSumAt(depositNumLast, assetId)
212 212      let sumLastX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, assetId), "0"))
213 213      let sumUserX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumUser, assetId), "0"))
214 214      let rewardDynamicPart = toInt(fraction((sumLastX18 - sumUserX18), stakedAmountX, MULTX18))
215 215      let rewardCachedPartKEY = keyReward(userAddress, assetId)
216 216      let rewardCachedPart = getIntOrElse(rewardCachedPartKEY, 0)
217 217      $Tuple4((rewardCachedPart + rewardDynamicPart), rewardCachedPart, rewardDynamicPart, rewardCachedPartKEY)
218 218      }
219 219  
220 220  
221 221  func toStartOfDay (timestamp) = ((timestamp / DAYMILLIS) * DAYMILLIS)
222 222  
223 223  
224 224  func findElementPosition (src,element,sep) = {
225 225      let elementStart = valueOrErrorMessage(indexOf(src, element), ((("there is no substring " + element) + " in ") + src))
226 226      if ((elementStart == 0))
227 227          then 0
228 228          else {
229 229              let left = take(src, elementStart)
230 230              (size(split(left, sep)) - 1)
231 231              }
232 232      }
233 233  
234 234  
235 235  let DepositTotalsPREFIX = "%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d"
236 236  
237 - func updateDepositTotals (currVal,idxToUpdate,deltaAmt) = {
238 -     let currArr = split(currVal, SEP)
239 -     func updDepTotByIdx (idx) =     if ((idx != idxToUpdate))
240 -         then currArr[idx]
241 -         else toString((parseIntValue(currArr[idx]) + deltaAmt))
242 - 
243 -     makeString([DepositTotalsPREFIX, updDepTotByIdx(1), updDepTotByIdx(2), updDepTotByIdx(3), updDepTotByIdx(4), updDepTotByIdx(5), updDepTotByIdx(6), updDepTotByIdx(7), updDepTotByIdx(8), updDepTotByIdx(9), updDepTotByIdx(10), updDepTotByIdx(11), updDepTotByIdx(12), updDepTotByIdx(13), updDepTotByIdx(14), updDepTotByIdx(15), updDepTotByIdx(16), updDepTotByIdx(17), updDepTotByIdx(18)], SEP)
244 -     }
245 - 
246 - 
247 - func DepositsTotalsEntries (depositAmount,assetIdStr) = {
248 -     let startOfDay = toStartOfDay(lastBlock.timestamp)
249 -     let byDayKEY = keyStatsDepositAmtByDay(startOfDay)
250 -     let totalsKEY = keyStatsDepositAmtTotals()
251 -     let position = findElementPosition(supportedAssetsStr, assetIdStr, "_")
252 -     let defaultDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
253 -     let currTotalsDATA = valueOrElse(getString(this, totalsKEY), defaultDATA)
254 -     let newTotalsDATA = updateDepositTotals(currTotalsDATA, (position + 1), depositAmount)
255 - [StringEntry(totalsKEY, newTotalsDATA), StringEntry(byDayKEY, newTotalsDATA)]
256 -     }
257 - 
237 + let defaultTotalsDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
258 238  
259 239  func RewardEntries (isNewUser,userAddress,stakedAmount) = {
260 240      let stakedAmountX = toBigInt(stakedAmount)
261 241      let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
262 242      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
263 243      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
264 244      func forEachAssetCacheUserReward (accum,asset) =     {
265 -         let $t01079910934 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
266 -         let rewardTotal = $t01079910934._1
267 -         let cached = $t01079910934._2
268 -         let dynamic = $t01079910934._3
269 -         let rewardCachedPartKEY = $t01079910934._4
245 +         let $t095209655 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
246 +         let rewardTotal = $t095209655._1
247 +         let cached = $t095209655._2
248 +         let dynamic = $t095209655._3
249 +         let rewardCachedPartKEY = $t095209655._4
270 250          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
271 251          }
272 252  
273 253      if (if ((depositNumLast == -1))
274 254          then (depositNumUser == -1)
275 255          else false)
276 256          then nil
277 257          else if (if ((depositNumLast == -1))
278 258              then (depositNumUser > -1)
279 259              else false)
280 260              then throw("invalid depositNumLast and depositNumUser state")
281 261              else if (if ((depositNumLast > -1))
282 262                  then (depositNumUser >= -1)
283 263                  else false)
284 264                  then if (isNewUser)
285 265                      then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
286 266                      else ({
287 267                          let $l = supportedAssetsList
288 268                          let $s = size($l)
289 269                          let $acc0 = nil
290 270                          func $f0_1 ($a,$i) =                         if (($i >= $s))
291 271                              then $a
292 272                              else forEachAssetCacheUserReward($a, $l[$i])
293 273  
294 274                          func $f0_2 ($a,$i) =                         if (($i >= $s))
295 275                              then $a
296 276                              else throw("List size exceeds 9")
297 277  
298 278                          $f0_2($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)
299 279                          } :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
300 280                  else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
301 281      }
302 282  
303 283  
304 284  func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
305 285      let notDistributedRewardKEY = keyNotDistributedReward(tkn)
306 286      let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
307 287      IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))
308 288      }
309 289  
310 290  
311 291  func commonClaim (userAddress,i) = {
312 292      let userAddressStr = toString(userAddress)
313 293      if ((size(i.payments) > 0))
314 294          then throw("payments are not accepted")
315 295          else {
316 -             let $t01387513980 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
317 -             let isNewUser = $t01387513980._1
318 -             let stakedAmount = $t01387513980._2
319 -             let stakingStart = $t01387513980._3
296 +             let $t01259612701 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
297 +             let isNewUser = $t01259612701._1
298 +             let stakedAmount = $t01259612701._2
299 +             let stakingStart = $t01259612701._3
320 300              let stakedAmountX = toBigInt(stakedAmount)
321 301              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
322 302              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
323 303              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
324 304              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
325 -                 let $t01435114489 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
326 -                 let rewardTotal = $t01435114489._1
327 -                 let cached = $t01435114489._2
328 -                 let dynamic = $t01435114489._3
329 -                 let rewardCachedPartKEY = $t01435114489._4
305 +                 let $t01307213210 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
306 +                 let rewardTotal = $t01307213210._1
307 +                 let cached = $t01307213210._2
308 +                 let dynamic = $t01307213210._3
309 +                 let rewardCachedPartKEY = $t01307213210._4
330 310                  let claimedKEY = keyClaimed(userAddressStr, asset)
331 -                 let $t01454914586 = accum
332 -                 let data = $t01454914586._1
333 -                 let claimedAmtByAsset = $t01454914586._2
311 +                 let $t01327013307 = accum
312 +                 let data = $t01327013307._1
313 +                 let claimedAmtByAsset = $t01327013307._2
334 314                  let newPart = makeString([asset, toString(rewardTotal)], ":")
335 315                  let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
336 316                  if ((0 >= rewardTotal))
337 317                      then $Tuple2(data, claimedAmtByAssetNew)
338 318                      else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
339 319                  }
340 320  
341 -             let $t01504615159 = {
321 +             let $t01376713880 = {
342 322                  let $l = supportedAssetsList
343 323                  let $s = size($l)
344 324                  let $acc0 = $Tuple2(nil, "")
345 325                  func $f0_1 ($a,$i) =                 if (($i >= $s))
346 326                      then $a
347 327                      else forEachAssetCalcUnclaimedReward($a, $l[$i])
348 328  
349 329                  func $f0_2 ($a,$i) =                 if (($i >= $s))
350 330                      then $a
351 331                      else throw("List size exceeds 9")
352 332  
353 333                  $f0_2($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)
354 334                  }
355 -             let transfers = $t01504615159._1
356 -             let claimedAmtByAssetResult = $t01504615159._2
335 +             let transfers = $t01376713880._1
336 +             let claimedAmtByAssetResult = $t01376713880._2
357 337              if ((0 >= size(transfers)))
358 338                  then $Tuple2(nil, 0)
359 339                  else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))
360 340              }
361 341      }
362 342  
363 343  
364 344  @Callable(i)
365 345  func constructorV1 (neutrinoContractAddress,mathContractAddress,minLockAmount,halfLife,supportedRewardAssets) = if ((i.caller != this))
366 346      then throw("Permission denied")
367 347      else [StringEntry(keyNeutrinoContractAddress(), neutrinoContractAddress), StringEntry(keyMathContractAddress(), mathContractAddress), IntegerEntry(keyMinLockAmount(), minLockAmount), IntegerEntry(keyHalfLife(), halfLife), StringEntry(keySupportedRewardAssets(), supportedRewardAssets)]
368 348  
369 349  
370 350  
371 351  @Callable(i)
372 352  func stake () = {
373 -     let $t01601016072 = getParamsOrFail()
374 -     let bondAssetId = $t01601016072._1
375 -     let minLockAmount = $t01601016072._2
376 -     let halfLife = $t01601016072._3
353 +     let $t01473114793 = getParamsOrFail()
354 +     let bondAssetId = $t01473114793._1
355 +     let minLockAmount = $t01473114793._2
356 +     let halfLife = $t01473114793._3
377 357      if ((size(i.payments) != 1))
378 358          then throw("Invalid payments size")
379 359          else {
380 360              let payment = i.payments[0]
381 361              let amount = payment.amount
382 362              let invalidAssetMessage = (("Invalid asset. " + toBase58String(bondAssetId)) + " is expected")
383 363              let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
384 364              if ((assetId != bondAssetId))
385 365                  then throw(invalidAssetMessage)
386 366                  else {
387 367                      let userAddress = i.caller
388 368                      let userAddressStr = toString(i.caller)
389 -                     let $t01661416721 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
390 -                     let isNewUser = $t01661416721._1
391 -                     let lockAmount = $t01661416721._2
392 -                     let lockStartHeight = $t01661416721._3
369 +                     let $t01533515442 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
370 +                     let isNewUser = $t01533515442._1
371 +                     let lockAmount = $t01533515442._2
372 +                     let lockStartHeight = $t01533515442._3
393 373                      let mergedAmount = if (isNewUser)
394 374                          then amount
395 375                          else (amount + lockAmount)
396 376                      let mergedStartHeight = if (isNewUser)
397 377                          then height
398 378                          else asInt(invoke(mathContract, "mergeStakesREADONLY", [amount, height, lockAmount, lockStartHeight, halfLife], nil))
399 379                      if ((minLockAmount > mergedAmount))
400 380                          then throw(("Min lock amount is " + toString(minLockAmount)))
401 381                          else {
402 -                             let $t01708217184 = StatsResult(amount, 1, if (isNewUser)
382 +                             let $t01580315905 = StatsResult(amount, 1, if (isNewUser)
403 383                                  then 1
404 384                                  else 0)
405 -                             let statsEntries = $t01708217184._1
406 -                             let totalStaked = $t01708217184._2
407 -                             let totalStakedNew = $t01708217184._3
385 +                             let statsEntries = $t01580315905._1
386 +                             let totalStaked = $t01580315905._2
387 +                             let totalStakedNew = $t01580315905._3
408 388                              ((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
409 389                              }
410 390                      }
411 391              }
412 392      }
413 393  
414 394  
415 395  
416 396  @Callable(i)
417 397  func unstake (amount) = if ((size(i.payments) != 0))
418 398      then throw("unstake doesn't require any payment")
419 399      else {
420 400          let userAddress = i.caller
421 401          let userAddressStr = toString(userAddress)
422 -         let $t01767017732 = getParamsOrFail()
423 -         let bondAssetId = $t01767017732._1
424 -         let minLockAmount = $t01767017732._2
425 -         let halfLife = $t01767017732._3
426 -         let $t01773517809 = getUserParamsOrFail(userAddress)
427 -         let isNewUser = $t01773517809._1
428 -         let lockAmount = $t01773517809._2
429 -         let lockStart = $t01773517809._3
402 +         let $t01639116453 = getParamsOrFail()
403 +         let bondAssetId = $t01639116453._1
404 +         let minLockAmount = $t01639116453._2
405 +         let halfLife = $t01639116453._3
406 +         let $t01645616530 = getUserParamsOrFail(userAddress)
407 +         let isNewUser = $t01645616530._1
408 +         let lockAmount = $t01645616530._2
409 +         let lockStart = $t01645616530._3
430 410          if ((0 >= lockAmount))
431 411              then throw("Nothing to unstake")
432 412              else if ((amount > lockAmount))
433 413                  then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(lockAmount)))
434 414                  else {
435 415                      let t = value(blockInfoByHeight(height)).timestamp
436 416                      let releaseTime = valueOrElse(getInteger(govContract, keyUserGnsbtReleaseTime(userAddressStr)), 0)
437 417                      if ((releaseTime >= t))
438 418                          then throw(("Your gNsbt are taking part in voting, cannot unstake until " + toString(releaseTime)))
439 419                          else {
440 420                              let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
441 -                             let $t01845018604 = StatsResult(-(amount), if ((amount == lockAmount))
421 +                             let $t01717117325 = StatsResult(-(amount), if ((amount == lockAmount))
442 422                                  then -1
443 423                                  else 0, if ((amount == lockAmount))
444 424                                  then -1
445 425                                  else 0)
446 -                             let statsEntries = $t01845018604._1
447 -                             let totalStaked = $t01845018604._2
448 -                             let totalStakedNew = $t01845018604._3
426 +                             let statsEntries = $t01717117325._1
427 +                             let totalStaked = $t01717117325._2
428 +                             let totalStakedNew = $t01717117325._3
449 429                              ((([ScriptTransfer(userAddress, (amount - comissionAmount), bondAssetId), ScriptTransfer(auctionContract, comissionAmount, bondAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
450 430                              }
451 431                      }
452 432          }
453 433  
454 434  
455 435  
456 436  @Callable(i)
457 437  func deposit () = {
458 438      let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
459 439      if ((0 > totalStaked))
460 440          then throw("TODO: case is not supported")
461 441          else {
462 442              let depositNumLastKEY = keyDepositNumLast()
463 443              let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
464 444              let depositNumNew = (depositNumLast + 1)
445 +             let totalsKEY = keyStatsDepositAmtTotals()
446 +             let byDayKEY = keyStatsDepositAmtByDay(toStartOfDay(lastBlock.timestamp))
447 +             let currTotals = split(valueOrElse(getString(totalsKEY), defaultTotalsDATA), SEP)
448 +             let currByDay = split(valueOrElse(getString(byDayKEY), defaultTotalsDATA), SEP)
465 449              func dep (acc,pmt) =             {
466 450                  let amount = pmt.amount
467 -                 let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
468 -                 let pmtAssetIdStr = toBase58String(pmtAssetId)
451 +                 let pmtAssetIdStr = toBase58String(valueOrElse(pmt.assetId, WAVESID))
469 452                  if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
470 453                      then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
471 454                      else if ((totalStaked == 0))
472 -                         then (acc :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount))
455 +                         then $Tuple4((acc._1 :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)), (acc._2 :+ pmtAssetIdStr), (acc._3 :+ toBigInt(0)), (acc._4 :+ amount))
473 456                          else {
474 457                              let rewardPerNsbtX18 = fraction(toBigInt(amount), MULTX18, toBigInt(totalStaked))
475 -                             func refreshRewardPerNsbtSUM (accum,nextAsset) =                             {
476 -                                 let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
477 -                                 (accum :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), if ((nextAsset == pmtAssetIdStr))
478 -                                     then toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18))
479 -                                     else sumLastStr))
480 -                                 }
481 - 
482 -                             ((acc ++ {
483 -                                 let $l = supportedAssetsList
484 -                                 let $s = size($l)
485 -                                 let $acc0 = nil
486 -                                 func $f0_1 ($a,$i) =                                 if (($i >= $s))
487 -                                     then $a
488 -                                     else refreshRewardPerNsbtSUM($a, $l[$i])
489 - 
490 -                                 func $f0_2 ($a,$i) =                                 if (($i >= $s))
491 -                                     then $a
492 -                                     else throw("List size exceeds 9")
493 - 
494 -                                 $f0_2($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)
495 -                                 }) ++ DepositsTotalsEntries(amount, pmtAssetIdStr))
458 +                             $Tuple4(acc._1, (acc._2 :+ pmtAssetIdStr), (acc._3 :+ rewardPerNsbtX18), (acc._4 :+ amount))
496 459                              }
497 460                  }
498 461  
499 -             ({
462 +             let pmtsResult = {
500 463                  let $l = i.payments
501 464                  let $s = size($l)
502 -                 let $acc0 = nil
465 +                 let $acc0 = $Tuple4(nil, nil, nil, nil)
503 466                  func $f0_1 ($a,$i) =                 if (($i >= $s))
504 467                      then $a
505 468                      else dep($a, $l[$i])
506 469  
507 470                  func $f0_2 ($a,$i) =                 if (($i >= $s))
508 471                      then $a
509 472                      else throw("List size exceeds 10")
510 473  
511 474                  $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)
512 -                 } :+ IntegerEntry(depositNumLastKEY, depositNumNew))
475 +                 }
476 +             func refreshRewardUpdateTotals (accum,nextAsset) =             {
477 +                 let k = accum._4
478 +                 let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
479 +                 let idx = indexOf(pmtsResult._2, nextAsset)
480 +                 let sum = if (isDefined(idx))
481 +                     then {
482 +                         let j = value(idx)
483 +                         let statsDelta = pmtsResult._4[j]
484 +                         $Tuple3(toString((parseBigIntValue(sumLastStr) + pmtsResult._3[j])), toString((parseIntValue(currTotals[(k + 1)]) + statsDelta)), toString((parseIntValue(currByDay[(k + 1)]) + statsDelta)))
485 +                         }
486 +                     else $Tuple3(sumLastStr, currTotals[(k + 1)], currByDay[(k + 1)])
487 +                 $Tuple4((accum._1 :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), sum._1)), ((accum._2 + SEP) + sum._2), ((accum._3 + SEP) + sum._3), (k + 1))
488 +                 }
489 + 
490 +             let assetsResult = {
491 +                 let $l = supportedAssetsList
492 +                 let $s = size($l)
493 +                 let $acc0 = $Tuple4(nil, DepositTotalsPREFIX, DepositTotalsPREFIX, 0)
494 +                 func $f1_1 ($a,$i) =                 if (($i >= $s))
495 +                     then $a
496 +                     else refreshRewardUpdateTotals($a, $l[$i])
497 + 
498 +                 func $f1_2 ($a,$i) =                 if (($i >= $s))
499 +                     then $a
500 +                     else throw("List size exceeds 9")
501 + 
502 +                 $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9)
503 +                 }
504 +             $Tuple2(((((pmtsResult._1 ++ assetsResult._1) :+ IntegerEntry(depositNumLastKEY, depositNumNew)) :+ StringEntry(totalsKEY, assetsResult._2)) :+ StringEntry(byDayKEY, assetsResult._3)), depositNumNew)
513 505              }
514 506      }
515 507  
516 508  
517 509  
518 510  @Callable(i)
519 511  func claimRewards () = commonClaim(i.caller, i)
520 512  
521 513  
522 514  
523 515  @Callable(i)
524 516  func claimRewardsByOriginCaller () = commonClaim(i.originCaller, i)
525 517  
526 518  
527 519  
528 520  @Callable(i)
529 521  func unclaimedRewardsREADONLY (userAddressStr) = {
530 522      func forEachAssetZeroReward (accum,asset) =     ((accum + makeString([asset, "0", "0"], ":")) + "_")
531 523  
532 524      let unclaimedRewardStr = if ((userAddressStr == ""))
533 525          then {
534 526              let $l = supportedAssetsList
535 527              let $s = size($l)
536 528              let $acc0 = ""
537 529              func $f0_1 ($a,$i) =             if (($i >= $s))
538 530                  then $a
539 531                  else forEachAssetZeroReward($a, $l[$i])
540 532  
541 533              func $f0_2 ($a,$i) =             if (($i >= $s))
542 534                  then $a
543 535                  else throw("List size exceeds 9")
544 536  
545 537              $f0_2($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)
546 538              }
547 539          else {
548 540              let userAddress = addressFromStringValue(userAddressStr)
549 -             let $t02111121216 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
550 -             let isNewUser = $t02111121216._1
551 -             let stakedAmount = $t02111121216._2
552 -             let stakingStart = $t02111121216._3
541 +             let $t02125621361 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
542 +             let isNewUser = $t02125621361._1
543 +             let stakedAmount = $t02125621361._2
544 +             let stakingStart = $t02125621361._3
553 545              let stakedAmountX = toBigInt(stakedAmount)
554 546              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
555 547              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
556 548              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
557 549              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
558 -                 let $t02156221700 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
559 -                 let rewardTotal = $t02156221700._1
560 -                 let cached = $t02156221700._2
561 -                 let dynamic = $t02156221700._3
562 -                 let rewardCachedPartKEY = $t02156221700._4
550 +                 let $t02170721845 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
551 +                 let rewardTotal = $t02170721845._1
552 +                 let cached = $t02170721845._2
553 +                 let dynamic = $t02170721845._3
554 +                 let rewardCachedPartKEY = $t02170721845._4
563 555                  let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
564 556                  ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
565 557                  }
566 558  
567 559              let $l = supportedAssetsList
568 560              let $s = size($l)
569 561              let $acc0 = ""
570 562              func $f0_1 ($a,$i) =             if (($i >= $s))
571 563                  then $a
572 564                  else forEachAssetCalcUnclaimedReward($a, $l[$i])
573 565  
574 566              func $f0_2 ($a,$i) =             if (($i >= $s))
575 567                  then $a
576 568                  else throw("List size exceeds 9")
577 569  
578 570              $f0_2($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)
579 571              }
580 572      $Tuple2(nil, dropRight(unclaimedRewardStr, 1))
581 573      }
582 574  
583 575  
584 576  
585 577  @Callable(i)
586 578  func nsbtUnstakingSYSREADONLY (userAddressStrOrEmpty,unstakeAmtP) = {
587 579      let resultArray = if ((userAddressStrOrEmpty == ""))
588 580          then [0, 0, 0, 0]
589 581          else {
590 582              let userAddress = addressFromStringValue(userAddressStrOrEmpty)
591 583              let cfgDATA = getParamsOrFail()
592 584              let nsbtAssetId = cfgDATA._1
593 585              let minLockAmount = cfgDATA._2
594 586              let halfLife = cfgDATA._3
595 587              let userDATA = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
596 588              let isNewUser = userDATA._1
597 589              let stakedAmount = userDATA._2
598 590              let lockStart = userDATA._3
599 591              let unstakeAmt = if ((unstakeAmtP > stakedAmount))
600 592                  then stakedAmount
601 593                  else unstakeAmtP
602 594              let stakedAmountNEW = (stakedAmount - unstakeAmt)
603 595              let comissionAmount = if ((unstakeAmt == 0))
604 596                  then 0
605 597                  else asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [unstakeAmt, lockStart, halfLife], nil))
606 598              let receiveAmount = (unstakeAmt - comissionAmount)
607 599  [stakedAmount, stakedAmountNEW, receiveAmount, comissionAmount]
608 600              }
609 601      $Tuple2(nil, resultArray)
610 602      }
611 603  
612 604  
613 605  
614 606  @Callable(i)
615 607  func nsbtStakingSYSREADONLY (userAddressStr,nsbtDiff) = {
616 608      let totalNsbtAmt = getIntOrElse(keyLockParamTotalAmount(), 0)
617 609      if ((userAddressStr == ""))
618 610          then $Tuple2(nil, [0, totalNsbtAmt, 0])
619 611          else {
620 612              let userAddress = toAddressOrFail(userAddressStr)
621 -             let $t02337823482 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
622 -             let isNewUser = $t02337823482._1
623 -             let userNsbtAmt = $t02337823482._2
624 -             let stakingStart = $t02337823482._3
613 +             let $t02352323627 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
614 +             let isNewUser = $t02352323627._1
615 +             let userNsbtAmt = $t02352323627._2
616 +             let stakingStart = $t02352323627._3
625 617              $Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
626 618              }
627 619      }
628 620  
629 621  
630 622  @Verifier(tx)
631 623  func verify () = {
632 624      let pubKeyAdminsListStr = makeString(["ExtEEK19nmKj9mCpnWyvEEJFYATLMcVEMvohhUHkyHNm", "Ev5py5FfBQX9cZpYKnfQrTB49Byf8QmpZWeDVRim4yV7", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR"], SEP)
633 625      let pubKeyAdminsList = split(valueOrElse(getString(controlContract, "%s__multisig"), pubKeyAdminsListStr), SEP)
634 626      let count = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(pubKeyAdminsList[0])))
635 627          then 1
636 628          else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(pubKeyAdminsList[1])))
637 629          then 1
638 630          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(pubKeyAdminsList[2])))
639 631          then 1
640 632          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[3], fromBase58String(pubKeyAdminsList[3])))
641 633          then 2
642 634          else 0))
643 635      (count >= 3)
644 636      }
645 637

Old	New		Differences
234	234
235	235		let DepositTotalsPREFIX = "%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d"
236	236
237		-	func updateDepositTotals (currVal,idxToUpdate,deltaAmt) = {
238		-	let currArr = split(currVal, SEP)
239		-	func updDepTotByIdx (idx) = if ((idx != idxToUpdate))
240		-	then currArr[idx]
241		-	else toString((parseIntValue(currArr[idx]) + deltaAmt))
242		-
243		-	makeString([DepositTotalsPREFIX, updDepTotByIdx(1), updDepTotByIdx(2), updDepTotByIdx(3), updDepTotByIdx(4), updDepTotByIdx(5), updDepTotByIdx(6), updDepTotByIdx(7), updDepTotByIdx(8), updDepTotByIdx(9), updDepTotByIdx(10), updDepTotByIdx(11), updDepTotByIdx(12), updDepTotByIdx(13), updDepTotByIdx(14), updDepTotByIdx(15), updDepTotByIdx(16), updDepTotByIdx(17), updDepTotByIdx(18)], SEP)
244		-	}
245		-
246		-
247		-	func DepositsTotalsEntries (depositAmount,assetIdStr) = {
248		-	let startOfDay = toStartOfDay(lastBlock.timestamp)
249		-	let byDayKEY = keyStatsDepositAmtByDay(startOfDay)
250		-	let totalsKEY = keyStatsDepositAmtTotals()
251		-	let position = findElementPosition(supportedAssetsStr, assetIdStr, "_")
252		-	let defaultDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
253		-	let currTotalsDATA = valueOrElse(getString(this, totalsKEY), defaultDATA)
254		-	let newTotalsDATA = updateDepositTotals(currTotalsDATA, (position + 1), depositAmount)
255		-	[StringEntry(totalsKEY, newTotalsDATA), StringEntry(byDayKEY, newTotalsDATA)]
256		-	}
257		-
	237	+	let defaultTotalsDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
258	238
259	239		func RewardEntries (isNewUser,userAddress,stakedAmount) = {
260	240		let stakedAmountX = toBigInt(stakedAmount)

262	242		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
263	243		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
264	244		func forEachAssetCacheUserReward (accum,asset) = {
265		-	let $~~t01079910934~~ = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
266		-	let rewardTotal = $~~t01079910934~~._1
267		-	let cached = $~~t01079910934~~._2
268		-	let dynamic = $~~t01079910934~~._3
269		-	let rewardCachedPartKEY = $~~t01079910934~~._4
	245	+	let $t095209655 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
	246	+	let rewardTotal = $t095209655._1
	247	+	let cached = $t095209655._2
	248	+	let dynamic = $t095209655._3
	249	+	let rewardCachedPartKEY = $t095209655._4
270	250		(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
271	251		}
272	252

313	293		if ((size(i.payments) > 0))
314	294		then throw("payments are not accepted")
315	295		else {
316		-	let $~~t01387513980~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
317		-	let isNewUser = $~~t01387513980~~._1
318		-	let stakedAmount = $~~t01387513980~~._2
319		-	let stakingStart = $~~t01387513980~~._3
	296	+	let $t01259612701 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	297	+	let isNewUser = $t01259612701._1
	298	+	let stakedAmount = $t01259612701._2
	299	+	let stakingStart = $t01259612701._3
320	300		let stakedAmountX = toBigInt(stakedAmount)
321	301		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
322	302		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
323	303		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
324	304		func forEachAssetCalcUnclaimedReward (accum,asset) = {
325		-	let $~~t01435114489~~ = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
326		-	let rewardTotal = $~~t01435114489~~._1
327		-	let cached = $~~t01435114489~~._2
328		-	let dynamic = $~~t01435114489~~._3
329		-	let rewardCachedPartKEY = $~~t01435114489~~._4
	305	+	let $t01307213210 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	306	+	let rewardTotal = $t01307213210._1
	307	+	let cached = $t01307213210._2
	308	+	let dynamic = $t01307213210._3
	309	+	let rewardCachedPartKEY = $t01307213210._4
330	310		let claimedKEY = keyClaimed(userAddressStr, asset)
331		-	let $~~t01454914586~~ = accum
332		-	let data = $~~t01454914586~~._1
333		-	let claimedAmtByAsset = $~~t01454914586~~._2
	311	+	let $t01327013307 = accum
	312	+	let data = $t01327013307._1
	313	+	let claimedAmtByAsset = $t01327013307._2
334	314		let newPart = makeString([asset, toString(rewardTotal)], ":")
335	315		let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
336	316		if ((0 >= rewardTotal))

338	318		else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
339	319		}
340	320
341		-	let $~~t01504615159~~ = {
	321	+	let $t01376713880 = {
342	322		let $l = supportedAssetsList
343	323		let $s = size($l)
344	324		let $acc0 = $Tuple2(nil, "")

352	332
353	333		$f0_2($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)
354	334		}
355		-	let transfers = $~~t01504615159~~._1
356		-	let claimedAmtByAssetResult = $~~t01504615159~~._2
	335	+	let transfers = $t01376713880._1
	336	+	let claimedAmtByAssetResult = $t01376713880._2
357	337		if ((0 >= size(transfers)))
358	338		then $Tuple2(nil, 0)
359	339		else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))

370	350
371	351		@Callable(i)
372	352		func stake () = {
373		-	let $~~t01601016072~~ = getParamsOrFail()
374		-	let bondAssetId = $~~t01601016072~~._1
375		-	let minLockAmount = $~~t01601016072~~._2
376		-	let halfLife = $~~t01601016072~~._3
	353	+	let $t01473114793 = getParamsOrFail()
	354	+	let bondAssetId = $t01473114793._1
	355	+	let minLockAmount = $t01473114793._2
	356	+	let halfLife = $t01473114793._3
377	357		if ((size(i.payments) != 1))
378	358		then throw("Invalid payments size")
379	359		else {

386	366		else {
387	367		let userAddress = i.caller
388	368		let userAddressStr = toString(i.caller)
389		-	let $~~t01661416721~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
390		-	let isNewUser = $~~t01661416721~~._1
391		-	let lockAmount = $~~t01661416721~~._2
392		-	let lockStartHeight = $~~t01661416721~~._3
	369	+	let $t01533515442 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
	370	+	let isNewUser = $t01533515442._1
	371	+	let lockAmount = $t01533515442._2
	372	+	let lockStartHeight = $t01533515442._3
393	373		let mergedAmount = if (isNewUser)
394	374		then amount
395	375		else (amount + lockAmount)

399	379		if ((minLockAmount > mergedAmount))
400	380		then throw(("Min lock amount is " + toString(minLockAmount)))
401	381		else {
402		-	let $~~t01708217184~~ = StatsResult(amount, 1, if (isNewUser)
	382	+	let $t01580315905 = StatsResult(amount, 1, if (isNewUser)
403	383		then 1
404	384		else 0)
405		-	let statsEntries = $~~t01708217184~~._1
406		-	let totalStaked = $~~t01708217184~~._2
407		-	let totalStakedNew = $~~t01708217184~~._3
	385	+	let statsEntries = $t01580315905._1
	386	+	let totalStaked = $t01580315905._2
	387	+	let totalStakedNew = $t01580315905._3
408	388		((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
409	389		}
410	390		}

419	399		else {
420	400		let userAddress = i.caller
421	401		let userAddressStr = toString(userAddress)
422		-	let $~~t01767017732~~ = getParamsOrFail()
423		-	let bondAssetId = $~~t01767017732~~._1
424		-	let minLockAmount = $~~t01767017732~~._2
425		-	let halfLife = $~~t01767017732~~._3
426		-	let $~~t01773517809~~ = getUserParamsOrFail(userAddress)
427		-	let isNewUser = $~~t01773517809~~._1
428		-	let lockAmount = $~~t01773517809~~._2
429		-	let lockStart = $~~t01773517809~~._3
	402	+	let $t01639116453 = getParamsOrFail()
	403	+	let bondAssetId = $t01639116453._1
	404	+	let minLockAmount = $t01639116453._2
	405	+	let halfLife = $t01639116453._3
	406	+	let $t01645616530 = getUserParamsOrFail(userAddress)
	407	+	let isNewUser = $t01645616530._1
	408	+	let lockAmount = $t01645616530._2
	409	+	let lockStart = $t01645616530._3
430	410		if ((0 >= lockAmount))
431	411		then throw("Nothing to unstake")
432	412		else if ((amount > lockAmount))

438	418		then throw(("Your gNsbt are taking part in voting, cannot unstake until " + toString(releaseTime)))
439	419		else {
440	420		let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
441		-	let $~~t01845018604~~ = StatsResult(-(amount), if ((amount == lockAmount))
	421	+	let $t01717117325 = StatsResult(-(amount), if ((amount == lockAmount))
442	422		then -1
443	423		else 0, if ((amount == lockAmount))
444	424		then -1
445	425		else 0)
446		-	let statsEntries = $~~t01845018604~~._1
447		-	let totalStaked = $~~t01845018604~~._2
448		-	let totalStakedNew = $~~t01845018604~~._3
	426	+	let statsEntries = $t01717117325._1
	427	+	let totalStaked = $t01717117325._2
	428	+	let totalStakedNew = $t01717117325._3
449	429		((([ScriptTransfer(userAddress, (amount - comissionAmount), bondAssetId), ScriptTransfer(auctionContract, comissionAmount, bondAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
450	430		}
451	431		}

462	442		let depositNumLastKEY = keyDepositNumLast()
463	443		let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
464	444		let depositNumNew = (depositNumLast + 1)
	445	+	let totalsKEY = keyStatsDepositAmtTotals()
	446	+	let byDayKEY = keyStatsDepositAmtByDay(toStartOfDay(lastBlock.timestamp))
	447	+	let currTotals = split(valueOrElse(getString(totalsKEY), defaultTotalsDATA), SEP)
	448	+	let currByDay = split(valueOrElse(getString(byDayKEY), defaultTotalsDATA), SEP)
465	449		func dep (acc,pmt) = {
466	450		let amount = pmt.amount
467		-	let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
468		-	let pmtAssetIdStr = toBase58String(pmtAssetId)
	451	+	let pmtAssetIdStr = toBase58String(valueOrElse(pmt.assetId, WAVESID))
469	452		if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
470	453		then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
471	454		else if ((totalStaked == 0))
472		-	then (acc :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount))
	455	+	then $Tuple4((acc._1 :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)), (acc._2 :+ pmtAssetIdStr), (acc._3 :+ toBigInt(0)), (acc._4 :+ amount))
473	456		else {
474	457		let rewardPerNsbtX18 = fraction(toBigInt(amount), MULTX18, toBigInt(totalStaked))
475		-	func refreshRewardPerNsbtSUM (accum,nextAsset) = {
476		-	let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
477		-	(accum :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), if ((nextAsset == pmtAssetIdStr))
478		-	then toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18))
479		-	else sumLastStr))
480		-	}
481		-
482		-	((acc ++ {
483		-	let $l = supportedAssetsList
484		-	let $s = size($l)
485		-	let $acc0 = nil
486		-	func $f0_1 ($a,$i) = if (($i >= $s))
487		-	then $a
488		-	else refreshRewardPerNsbtSUM($a, $l[$i])
489		-
490		-	func $f0_2 ($a,$i) = if (($i >= $s))
491		-	then $a
492		-	else throw("List size exceeds 9")
493		-
494		-	$f0_2($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)
495		-	}) ++ DepositsTotalsEntries(amount, pmtAssetIdStr))
	458	+	$Tuple4(acc._1, (acc._2 :+ pmtAssetIdStr), (acc._3 :+ rewardPerNsbtX18), (acc._4 :+ amount))
496	459		}
497	460		}
498	461
499		-	({
	462	+	let pmtsResult = {
500	463		let $l = i.payments
501	464		let $s = size($l)
502		-	let $acc0 = nil
	465	+	let $acc0 = $Tuple4(nil, nil, nil, nil)
503	466		func $f0_1 ($a,$i) = if (($i >= $s))
504	467		then $a
505	468		else dep($a, $l[$i])

509	472		else throw("List size exceeds 10")
510	473
511	474		$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)
512		-	} :+ IntegerEntry(depositNumLastKEY, depositNumNew))
	475	+	}
	476	+	func refreshRewardUpdateTotals (accum,nextAsset) = {
	477	+	let k = accum._4
	478	+	let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
	479	+	let idx = indexOf(pmtsResult._2, nextAsset)
	480	+	let sum = if (isDefined(idx))
	481	+	then {
	482	+	let j = value(idx)
	483	+	let statsDelta = pmtsResult._4[j]
	484	+	$Tuple3(toString((parseBigIntValue(sumLastStr) + pmtsResult._3[j])), toString((parseIntValue(currTotals[(k + 1)]) + statsDelta)), toString((parseIntValue(currByDay[(k + 1)]) + statsDelta)))
	485	+	}
	486	+	else $Tuple3(sumLastStr, currTotals[(k + 1)], currByDay[(k + 1)])
	487	+	$Tuple4((accum._1 :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), sum._1)), ((accum._2 + SEP) + sum._2), ((accum._3 + SEP) + sum._3), (k + 1))
	488	+	}
	489	+
	490	+	let assetsResult = {
	491	+	let $l = supportedAssetsList
	492	+	let $s = size($l)
	493	+	let $acc0 = $Tuple4(nil, DepositTotalsPREFIX, DepositTotalsPREFIX, 0)
	494	+	func $f1_1 ($a,$i) = if (($i >= $s))
	495	+	then $a
	496	+	else refreshRewardUpdateTotals($a, $l[$i])
	497	+
	498	+	func $f1_2 ($a,$i) = if (($i >= $s))
	499	+	then $a
	500	+	else throw("List size exceeds 9")
	501	+
	502	+	$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9)
	503	+	}
	504	+	$Tuple2(((((pmtsResult._1 ++ assetsResult._1) :+ IntegerEntry(depositNumLastKEY, depositNumNew)) :+ StringEntry(totalsKEY, assetsResult._2)) :+ StringEntry(byDayKEY, assetsResult._3)), depositNumNew)
513	505		}
514	506		}
515	507

546	538		}
547	539		else {
548	540		let userAddress = addressFromStringValue(userAddressStr)
549		-	let $~~t02111121216~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
550		-	let isNewUser = $~~t02111121216~~._1
551		-	let stakedAmount = $~~t02111121216~~._2
552		-	let stakingStart = $~~t02111121216~~._3
	541	+	let $t02125621361 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	542	+	let isNewUser = $t02125621361._1
	543	+	let stakedAmount = $t02125621361._2
	544	+	let stakingStart = $t02125621361._3
553	545		let stakedAmountX = toBigInt(stakedAmount)
554	546		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
555	547		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
556	548		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
557	549		func forEachAssetCalcUnclaimedReward (accum,asset) = {
558		-	let $~~t02156221700~~ = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
559		-	let rewardTotal = $~~t02156221700~~._1
560		-	let cached = $~~t02156221700~~._2
561		-	let dynamic = $~~t02156221700~~._3
562		-	let rewardCachedPartKEY = $~~t02156221700~~._4
	550	+	let $t02170721845 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	551	+	let rewardTotal = $t02170721845._1
	552	+	let cached = $t02170721845._2
	553	+	let dynamic = $t02170721845._3
	554	+	let rewardCachedPartKEY = $t02170721845._4
563	555		let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
564	556		((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
565	557		}

618	610		then $Tuple2(nil, [0, totalNsbtAmt, 0])
619	611		else {
620	612		let userAddress = toAddressOrFail(userAddressStr)
621		-	let $~~t02337823482~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
622		-	let isNewUser = $~~t02337823482~~._1
623		-	let userNsbtAmt = $~~t02337823482~~._2
624		-	let stakingStart = $~~t02337823482~~._3
	613	+	let $t02352323627 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	614	+	let isNewUser = $t02352323627._1
	615	+	let userNsbtAmt = $t02352323627._2
	616	+	let stakingStart = $t02352323627._3
625	617		$Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
626	618		}
627	619		}

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

github/deemru/w8io/3ef1775 
198.61 ms ◑