w8 · tx · 8nA···bJW

tx · 8nAmz4b52GRuJxvKgapCad3GjtggsPCwpCA8s2M9ebJW

3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J:  -0.02500000 Waves

2023.03.01 16:44 [2471076] smart account 3MuGfNhF98CNBCfthhoJEo6SYUv7zTgkK4J > SELF 0.00000000 Waves

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

View: original | compacted
Prev: DkR5VwKLzDvUNktFVrtBLJMsbqLxK2h5fxFcHFyz9mmN
Next: 8XRVz3C9SW18UN3dZCdJnc9DtfFpsQxNvSECtHRfA9ZJ

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 237  let defaultTotalsDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
238 238  
239 239  func RewardEntries (isNewUser,userAddress,stakedAmount) = {
240 240      let stakedAmountX = toBigInt(stakedAmount)
241 241      let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
242 242      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
243 243      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
244 244      func forEachAssetCacheUserReward (accum,asset) =     {
245 245          let $t095209655 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
246 246          let rewardTotal = $t095209655._1
247 247          let cached = $t095209655._2
248 248          let dynamic = $t095209655._3
249 249          let rewardCachedPartKEY = $t095209655._4
250 250          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
251 251          }
252 252  
253 253      if (if ((depositNumLast == -1))
254 254          then (depositNumUser == -1)
255 255          else false)
256 256          then nil
257 257          else if (if ((depositNumLast == -1))
258 258              then (depositNumUser > -1)
259 259              else false)
260 260              then throw("invalid depositNumLast and depositNumUser state")
261 261              else if (if ((depositNumLast > -1))
262 262                  then (depositNumUser >= -1)
263 263                  else false)
264 264                  then if (isNewUser)
265 265                      then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
266 266                      else ({
267 267                          let $l = supportedAssetsList
268 268                          let $s = size($l)
269 269                          let $acc0 = nil
270 270                          func $f0_1 ($a,$i) =                         if (($i >= $s))
271 271                              then $a
272 272                              else forEachAssetCacheUserReward($a, $l[$i])
273 273  
274 274                          func $f0_2 ($a,$i) =                         if (($i >= $s))
275 275                              then $a
276 276                              else throw("List size exceeds 9")
277 277  
278 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)
279 279                          } :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
280 280                  else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
281 281      }
282 282  
283 283  
284 284  func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
285 285      let notDistributedRewardKEY = keyNotDistributedReward(tkn)
286 286      let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
287 287      IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))
288 288      }
289 289  
290 290  
291 291  func commonClaim (userAddress,i) = {
292 292      let userAddressStr = toString(userAddress)
293 293      if ((size(i.payments) > 0))
294 294          then throw("payments are not accepted")
295 295          else {
296 296              let $t01259612701 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
297 297              let isNewUser = $t01259612701._1
298 298              let stakedAmount = $t01259612701._2
299 299              let stakingStart = $t01259612701._3
300 300              let stakedAmountX = toBigInt(stakedAmount)
301 301              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
302 302              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
303 303              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
304 304              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
305 305                  let $t01307213210 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
306 306                  let rewardTotal = $t01307213210._1
307 307                  let cached = $t01307213210._2
308 308                  let dynamic = $t01307213210._3
309 309                  let rewardCachedPartKEY = $t01307213210._4
310 310                  let claimedKEY = keyClaimed(userAddressStr, asset)
311 311                  let $t01327013307 = accum
312 312                  let data = $t01327013307._1
313 313                  let claimedAmtByAsset = $t01327013307._2
314 314                  let newPart = makeString([asset, toString(rewardTotal)], ":")
315 315                  let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
316 316                  if ((0 >= rewardTotal))
317 317                      then $Tuple2(data, claimedAmtByAssetNew)
318 318                      else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
319 319                  }
320 320  
321 321              let $t01376713880 = {
322 322                  let $l = supportedAssetsList
323 323                  let $s = size($l)
324 324                  let $acc0 = $Tuple2(nil, "")
325 325                  func $f0_1 ($a,$i) =                 if (($i >= $s))
326 326                      then $a
327 327                      else forEachAssetCalcUnclaimedReward($a, $l[$i])
328 328  
329 329                  func $f0_2 ($a,$i) =                 if (($i >= $s))
330 330                      then $a
331 331                      else throw("List size exceeds 9")
332 332  
333 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)
334 334                  }
335 335              let transfers = $t01376713880._1
336 336              let claimedAmtByAssetResult = $t01376713880._2
337 337              if ((0 >= size(transfers)))
338 338                  then $Tuple2(nil, 0)
339 339                  else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))
340 340              }
341 341      }
342 342  
343 343  
344 344  @Callable(i)
345 345  func constructorV1 (neutrinoContractAddress,mathContractAddress,minLockAmount,halfLife,supportedRewardAssets) = if ((i.caller != this))
346 346      then throw("Permission denied")
347 347      else [StringEntry(keyNeutrinoContractAddress(), neutrinoContractAddress), StringEntry(keyMathContractAddress(), mathContractAddress), IntegerEntry(keyMinLockAmount(), minLockAmount), IntegerEntry(keyHalfLife(), halfLife), StringEntry(keySupportedRewardAssets(), supportedRewardAssets)]
348 348  
349 349  
350 350  
351 351  @Callable(i)
352 352  func stake () = {
353 353      let $t01473114793 = getParamsOrFail()
354 354      let bondAssetId = $t01473114793._1
355 355      let minLockAmount = $t01473114793._2
356 356      let halfLife = $t01473114793._3
357 357      if ((size(i.payments) != 1))
358 358          then throw("Invalid payments size")
359 359          else {
360 360              let payment = i.payments[0]
361 361              let amount = payment.amount
362 362              let invalidAssetMessage = (("Invalid asset. " + toBase58String(bondAssetId)) + " is expected")
363 363              let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
364 364              if ((assetId != bondAssetId))
365 365                  then throw(invalidAssetMessage)
366 366                  else {
367 367                      let userAddress = i.caller
368 368                      let userAddressStr = toString(i.caller)
369 369                      let $t01533515442 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
370 370                      let isNewUser = $t01533515442._1
371 371                      let lockAmount = $t01533515442._2
372 372                      let lockStartHeight = $t01533515442._3
373 373                      let mergedAmount = if (isNewUser)
374 374                          then amount
375 375                          else (amount + lockAmount)
376 376                      let mergedStartHeight = if (isNewUser)
377 377                          then height
378 378                          else asInt(invoke(mathContract, "mergeStakesREADONLY", [amount, height, lockAmount, lockStartHeight, halfLife], nil))
379 379                      if ((minLockAmount > mergedAmount))
380 380                          then throw(("Min lock amount is " + toString(minLockAmount)))
381 381                          else {
382 382                              let $t01580315905 = StatsResult(amount, 1, if (isNewUser)
383 383                                  then 1
384 384                                  else 0)
385 385                              let statsEntries = $t01580315905._1
386 386                              let totalStaked = $t01580315905._2
387 387                              let totalStakedNew = $t01580315905._3
388 388                              ((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
389 389                              }
390 390                      }
391 391              }
392 392      }
393 393  
394 394  
395 395  
396 396  @Callable(i)
397 397  func unstake (amount) = if ((size(i.payments) != 0))
398 398      then throw("unstake doesn't require any payment")
399 399      else {
400 400          let userAddress = i.caller
401 401          let userAddressStr = toString(userAddress)
402 402          let $t01639116453 = getParamsOrFail()
403 403          let bondAssetId = $t01639116453._1
404 404          let minLockAmount = $t01639116453._2
405 405          let halfLife = $t01639116453._3
406 406          let $t01645616530 = getUserParamsOrFail(userAddress)
407 407          let isNewUser = $t01645616530._1
408 408          let lockAmount = $t01645616530._2
409 409          let lockStart = $t01645616530._3
410 410          if ((0 >= lockAmount))
411 411              then throw("Nothing to unstake")
412 412              else if ((amount > lockAmount))
413 413                  then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(lockAmount)))
414 414                  else {
415 415                      let t = value(blockInfoByHeight(height)).timestamp
416 416                      let releaseTime = valueOrElse(getInteger(govContract, keyUserGnsbtReleaseTime(userAddressStr)), 0)
417 417                      if ((releaseTime >= t))
418 418                          then throw(("Your gNsbt are taking part in voting, cannot unstake until " + toString(releaseTime)))
419 419                          else {
420 420                              let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
421 421                              let $t01717117325 = StatsResult(-(amount), if ((amount == lockAmount))
422 422                                  then -1
423 423                                  else 0, if ((amount == lockAmount))
424 424                                  then -1
425 425                                  else 0)
426 426                              let statsEntries = $t01717117325._1
427 427                              let totalStaked = $t01717117325._2
428 428                              let totalStakedNew = $t01717117325._3
429 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)
430 430                              }
431 431                      }
432 432          }
433 433  
434 434  
435 435  
436 436  @Callable(i)
437 437  func deposit () = {
438 438      let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
439 439      if ((0 > totalStaked))
440 440          then throw("TODO: case is not supported")
441 441          else {
442 442              let depositNumLastKEY = keyDepositNumLast()
443 443              let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
444 444              let depositNumNew = (depositNumLast + 1)
445 445              let totalsKEY = keyStatsDepositAmtTotals()
446 446              let byDayKEY = keyStatsDepositAmtByDay(toStartOfDay(lastBlock.timestamp))
447 447              let currTotals = split(valueOrElse(getString(totalsKEY), defaultTotalsDATA), SEP)
448 448              let currByDay = split(valueOrElse(getString(byDayKEY), defaultTotalsDATA), SEP)
449 449              func dep (acc,pmt) =             {
450 450                  let amount = pmt.amount
451 451                  let pmtAssetIdStr = toBase58String(valueOrElse(pmt.assetId, WAVESID))
452 452                  if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
453 453                      then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
454 454                      else if ((totalStaked == 0))
455 455                          then $Tuple4((acc._1 :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)), (acc._2 :+ pmtAssetIdStr), (acc._3 :+ toBigInt(0)), (acc._4 :+ amount))
456 456                          else {
457 457                              let rewardPerNsbtX18 = fraction(toBigInt(amount), MULTX18, toBigInt(totalStaked))
458 458                              $Tuple4(acc._1, (acc._2 :+ pmtAssetIdStr), (acc._3 :+ rewardPerNsbtX18), (acc._4 :+ amount))
459 459                              }
460 460                  }
461 461  
462 462              let pmtsResult = {
463 463                  let $l = i.payments
464 464                  let $s = size($l)
465 465                  let $acc0 = $Tuple4(nil, nil, nil, nil)
466 466                  func $f0_1 ($a,$i) =                 if (($i >= $s))
467 467                      then $a
468 468                      else dep($a, $l[$i])
469 469  
470 470                  func $f0_2 ($a,$i) =                 if (($i >= $s))
471 471                      then $a
472 472                      else throw("List size exceeds 10")
473 473  
474 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)
475 475                  }
476 476              func refreshRewardUpdateTotals (accum,nextAsset) =             {
477 477                  let k = accum._4
478 478                  let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
479 479                  let idx = indexOf(pmtsResult._2, nextAsset)
480 480                  let sum = if (isDefined(idx))
481 481                      then {
482 482                          let j = value(idx)
483 483                          let statsDelta = pmtsResult._4[j]
484 484                          $Tuple3(toString((parseBigIntValue(sumLastStr) + pmtsResult._3[j])), toString((parseIntValue(currTotals[(k + 1)]) + statsDelta)), toString((parseIntValue(currByDay[(k + 1)]) + statsDelta)))
485 485                          }
486 486                      else $Tuple3(sumLastStr, currTotals[(k + 1)], currByDay[(k + 1)])
487 487                  $Tuple4((accum._1 :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), sum._1)), ((accum._2 + SEP) + sum._2), ((accum._3 + SEP) + sum._3), (k + 1))
488 488                  }
489 489  
490 490              let assetsResult = {
491 491                  let $l = supportedAssetsList
492 492                  let $s = size($l)
493 493                  let $acc0 = $Tuple4(nil, DepositTotalsPREFIX, DepositTotalsPREFIX, 0)
494 494                  func $f1_1 ($a,$i) =                 if (($i >= $s))
495 495                      then $a
496 496                      else refreshRewardUpdateTotals($a, $l[$i])
497 497  
498 498                  func $f1_2 ($a,$i) =                 if (($i >= $s))
499 499                      then $a
500 500                      else throw("List size exceeds 9")
501 501  
502 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 503                  }
504 504              $Tuple2(((((pmtsResult._1 ++ assetsResult._1) :+ IntegerEntry(depositNumLastKEY, depositNumNew)) :+ StringEntry(totalsKEY, assetsResult._2)) :+ StringEntry(byDayKEY, assetsResult._3)), depositNumNew)
505 505              }
506 506      }
507 507  
508 508  
509 509  
510 510  @Callable(i)
511 511  func claimRewards () = commonClaim(i.caller, i)
512 512  
513 513  
514 514  
515 515  @Callable(i)
516 516  func claimRewardsByOriginCaller () = commonClaim(i.originCaller, i)
517 517  
518 518  
519 519  
520 520  @Callable(i)
521 521  func unclaimedRewardsREADONLY (userAddressStr) = {
522 522      func forEachAssetZeroReward (accum,asset) =     ((accum + makeString([asset, "0", "0"], ":")) + "_")
523 523  
524 524      let unclaimedRewardStr = if ((userAddressStr == ""))
525 525          then {
526 526              let $l = supportedAssetsList
527 527              let $s = size($l)
528 528              let $acc0 = ""
529 529              func $f0_1 ($a,$i) =             if (($i >= $s))
530 530                  then $a
531 531                  else forEachAssetZeroReward($a, $l[$i])
532 532  
533 533              func $f0_2 ($a,$i) =             if (($i >= $s))
534 534                  then $a
535 535                  else throw("List size exceeds 9")
536 536  
537 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)
538 538              }
539 539          else {
540 540              let userAddress = addressFromStringValue(userAddressStr)
541 541              let $t02125621361 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
542 542              let isNewUser = $t02125621361._1
543 543              let stakedAmount = $t02125621361._2
544 544              let stakingStart = $t02125621361._3
545 545              let stakedAmountX = toBigInt(stakedAmount)
546 546              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
547 547              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
548 548              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
549 549              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
550 550                  let $t02170721845 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
551 551                  let rewardTotal = $t02170721845._1
552 552                  let cached = $t02170721845._2
553 553                  let dynamic = $t02170721845._3
554 554                  let rewardCachedPartKEY = $t02170721845._4
555 555                  let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
556 556                  ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
557 557                  }
558 558  
559 559              let $l = supportedAssetsList
560 560              let $s = size($l)
561 561              let $acc0 = ""
562 562              func $f0_1 ($a,$i) =             if (($i >= $s))
563 563                  then $a
564 564                  else forEachAssetCalcUnclaimedReward($a, $l[$i])
565 565  
566 566              func $f0_2 ($a,$i) =             if (($i >= $s))
567 567                  then $a
568 568                  else throw("List size exceeds 9")
569 569  
570 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)
571 571              }
572 572      $Tuple2(nil, dropRight(unclaimedRewardStr, 1))
573 573      }
574 574  
575 575  
576 576  
577 577  @Callable(i)
578 578  func nsbtUnstakingSYSREADONLY (userAddressStrOrEmpty,unstakeAmtP) = {
579 579      let resultArray = if ((userAddressStrOrEmpty == ""))
580 580          then [0, 0, 0, 0]
581 581          else {
582 582              let userAddress = addressFromStringValue(userAddressStrOrEmpty)
583 583              let cfgDATA = getParamsOrFail()
584 584              let nsbtAssetId = cfgDATA._1
585 585              let minLockAmount = cfgDATA._2
586 586              let halfLife = cfgDATA._3
587 587              let userDATA = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
588 588              let isNewUser = userDATA._1
589 589              let stakedAmount = userDATA._2
590 590              let lockStart = userDATA._3
591 591              let unstakeAmt = if ((unstakeAmtP > stakedAmount))
592 592                  then stakedAmount
593 593                  else unstakeAmtP
594 594              let stakedAmountNEW = (stakedAmount - unstakeAmt)
595 595              let comissionAmount = if ((unstakeAmt == 0))
596 596                  then 0
597 597                  else asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [unstakeAmt, lockStart, halfLife], nil))
598 598              let receiveAmount = (unstakeAmt - comissionAmount)
599 599  [stakedAmount, stakedAmountNEW, receiveAmount, comissionAmount]
600 600              }
601 601      $Tuple2(nil, resultArray)
602 602      }
603 603  
604 604  
605 605  
606 606  @Callable(i)
607 607  func nsbtStakingSYSREADONLY (userAddressStr,nsbtDiff) = {
608 608      let totalNsbtAmt = getIntOrElse(keyLockParamTotalAmount(), 0)
609 609      if ((userAddressStr == ""))
610 610          then $Tuple2(nil, [0, totalNsbtAmt, 0])
611 611          else {
612 612              let userAddress = toAddressOrFail(userAddressStr)
613 613              let $t02352323627 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
614 614              let isNewUser = $t02352323627._1
615 615              let userNsbtAmt = $t02352323627._2
616 616              let stakingStart = $t02352323627._3
617 617              $Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
618 618              }
619 619      }
620 620  
621 621  
622 622  @Verifier(tx)
623 623  func verify () = {
624 624      let pubKeyAdminsListStr = makeString(["ExtEEK19nmKj9mCpnWyvEEJFYATLMcVEMvohhUHkyHNm", "Ev5py5FfBQX9cZpYKnfQrTB49Byf8QmpZWeDVRim4yV7", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR", "DUuuLjXu98nBwZc7fqwCTjtA3nnRwgTbkMSr5SU2NmDR"], SEP)
625 625      let pubKeyAdminsList = split(valueOrElse(getString(controlContract, "%s__multisig"), pubKeyAdminsListStr), SEP)
626 626      let count = ((((if (sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(pubKeyAdminsList[0])))
627 627          then 1
628 628          else 0) + (if (sigVerify(tx.bodyBytes, tx.proofs[1], fromBase58String(pubKeyAdminsList[1])))
629 629          then 1
630 630          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[2], fromBase58String(pubKeyAdminsList[2])))
631 631          then 1
632 632          else 0)) + (if (sigVerify(tx.bodyBytes, tx.proofs[3], fromBase58String(pubKeyAdminsList[3])))
633 633          then 2
634 634          else 0))
635 635      (count >= 3)
636 636      }
637 637

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	237	let defaultTotalsDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
238	238
239	239	func RewardEntries (isNewUser,userAddress,stakedAmount) = {
240	240	let stakedAmountX = toBigInt(stakedAmount)
241	241	let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
242	242	let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
243	243	let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
244	244	func forEachAssetCacheUserReward (accum,asset) = {
245	245	let $t095209655 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
246	246	let rewardTotal = $t095209655._1
247	247	let cached = $t095209655._2
248	248	let dynamic = $t095209655._3
249	249	let rewardCachedPartKEY = $t095209655._4
250	250	(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
251	251	}
252	252
253	253	if (if ((depositNumLast == -1))
254	254	then (depositNumUser == -1)
255	255	else false)
256	256	then nil
257	257	else if (if ((depositNumLast == -1))
258	258	then (depositNumUser > -1)
259	259	else false)
260	260	then throw("invalid depositNumLast and depositNumUser state")
261	261	else if (if ((depositNumLast > -1))
262	262	then (depositNumUser >= -1)
263	263	else false)
264	264	then if (isNewUser)
265	265	then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
266	266	else ({
267	267	let $l = supportedAssetsList
268	268	let $s = size($l)
269	269	let $acc0 = nil
270	270	func $f0_1 ($a,$i) = if (($i >= $s))
271	271	then $a
272	272	else forEachAssetCacheUserReward($a, $l[$i])
273	273
274	274	func $f0_2 ($a,$i) = if (($i >= $s))
275	275	then $a
276	276	else throw("List size exceeds 9")
277	277
278	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)
279	279	} :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
280	280	else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
281	281	}
282	282
283	283
284	284	func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
285	285	let notDistributedRewardKEY = keyNotDistributedReward(tkn)
286	286	let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
287	287	IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))
288	288	}
289	289
290	290
291	291	func commonClaim (userAddress,i) = {
292	292	let userAddressStr = toString(userAddress)
293	293	if ((size(i.payments) > 0))
294	294	then throw("payments are not accepted")
295	295	else {
296	296	let $t01259612701 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
297	297	let isNewUser = $t01259612701._1
298	298	let stakedAmount = $t01259612701._2
299	299	let stakingStart = $t01259612701._3
300	300	let stakedAmountX = toBigInt(stakedAmount)
301	301	let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
302	302	let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
303	303	let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
304	304	func forEachAssetCalcUnclaimedReward (accum,asset) = {
305	305	let $t01307213210 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
306	306	let rewardTotal = $t01307213210._1
307	307	let cached = $t01307213210._2
308	308	let dynamic = $t01307213210._3
309	309	let rewardCachedPartKEY = $t01307213210._4
310	310	let claimedKEY = keyClaimed(userAddressStr, asset)
311	311	let $t01327013307 = accum
312	312	let data = $t01327013307._1
313	313	let claimedAmtByAsset = $t01327013307._2
314	314	let newPart = makeString([asset, toString(rewardTotal)], ":")
315	315	let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
316	316	if ((0 >= rewardTotal))
317	317	then $Tuple2(data, claimedAmtByAssetNew)
318	318	else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
319	319	}
320	320
321	321	let $t01376713880 = {
322	322	let $l = supportedAssetsList
323	323	let $s = size($l)
324	324	let $acc0 = $Tuple2(nil, "")
325	325	func $f0_1 ($a,$i) = if (($i >= $s))
326	326	then $a
327	327	else forEachAssetCalcUnclaimedReward($a, $l[$i])
328	328
329	329	func $f0_2 ($a,$i) = if (($i >= $s))
330	330	then $a
331	331	else throw("List size exceeds 9")
332	332
333	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)
334	334	}
335	335	let transfers = $t01376713880._1
336	336	let claimedAmtByAssetResult = $t01376713880._2
337	337	if ((0 >= size(transfers)))
338	338	then $Tuple2(nil, 0)
339	339	else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))
340	340	}
341	341	}
342	342
343	343
344	344	@Callable(i)
345	345	func constructorV1 (neutrinoContractAddress,mathContractAddress,minLockAmount,halfLife,supportedRewardAssets) = if ((i.caller != this))
346	346	then throw("Permission denied")
347	347	else [StringEntry(keyNeutrinoContractAddress(), neutrinoContractAddress), StringEntry(keyMathContractAddress(), mathContractAddress), IntegerEntry(keyMinLockAmount(), minLockAmount), IntegerEntry(keyHalfLife(), halfLife), StringEntry(keySupportedRewardAssets(), supportedRewardAssets)]
348	348
349	349
350	350
351	351	@Callable(i)
352	352	func stake () = {
353	353	let $t01473114793 = getParamsOrFail()
354	354	let bondAssetId = $t01473114793._1
355	355	let minLockAmount = $t01473114793._2
356	356	let halfLife = $t01473114793._3
357	357	if ((size(i.payments) != 1))
358	358	then throw("Invalid payments size")
359	359	else {
360	360	let payment = i.payments[0]
361	361	let amount = payment.amount
362	362	let invalidAssetMessage = (("Invalid asset. " + toBase58String(bondAssetId)) + " is expected")
363	363	let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
364	364	if ((assetId != bondAssetId))
365	365	then throw(invalidAssetMessage)
366	366	else {
367	367	let userAddress = i.caller
368	368	let userAddressStr = toString(i.caller)
369	369	let $t01533515442 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
370	370	let isNewUser = $t01533515442._1
371	371	let lockAmount = $t01533515442._2
372	372	let lockStartHeight = $t01533515442._3
373	373	let mergedAmount = if (isNewUser)
374	374	then amount
375	375	else (amount + lockAmount)
376	376	let mergedStartHeight = if (isNewUser)
377	377	then height
378	378	else asInt(invoke(mathContract, "mergeStakesREADONLY", [amount, height, lockAmount, lockStartHeight, halfLife], nil))
379	379	if ((minLockAmount > mergedAmount))
380	380	then throw(("Min lock amount is " + toString(minLockAmount)))
381	381	else {
382	382	let $t01580315905 = StatsResult(amount, 1, if (isNewUser)
383	383	then 1
384	384	else 0)
385	385	let statsEntries = $t01580315905._1
386	386	let totalStaked = $t01580315905._2
387	387	let totalStakedNew = $t01580315905._3
388	388	((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
389	389	}
390	390	}
391	391	}
392	392	}
393	393
394	394
395	395
396	396	@Callable(i)
397	397	func unstake (amount) = if ((size(i.payments) != 0))
398	398	then throw("unstake doesn't require any payment")
399	399	else {
400	400	let userAddress = i.caller
401	401	let userAddressStr = toString(userAddress)
402	402	let $t01639116453 = getParamsOrFail()
403	403	let bondAssetId = $t01639116453._1
404	404	let minLockAmount = $t01639116453._2
405	405	let halfLife = $t01639116453._3
406	406	let $t01645616530 = getUserParamsOrFail(userAddress)
407	407	let isNewUser = $t01645616530._1
408	408	let lockAmount = $t01645616530._2
409	409	let lockStart = $t01645616530._3
410	410	if ((0 >= lockAmount))
411	411	then throw("Nothing to unstake")
412	412	else if ((amount > lockAmount))
413	413	then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(lockAmount)))
414	414	else {
415	415	let t = value(blockInfoByHeight(height)).timestamp
416	416	let releaseTime = valueOrElse(getInteger(govContract, keyUserGnsbtReleaseTime(userAddressStr)), 0)
417	417	if ((releaseTime >= t))
418	418	then throw(("Your gNsbt are taking part in voting, cannot unstake until " + toString(releaseTime)))
419	419	else {
420	420	let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
421	421	let $t01717117325 = StatsResult(-(amount), if ((amount == lockAmount))
422	422	then -1
423	423	else 0, if ((amount == lockAmount))
424	424	then -1
425	425	else 0)
426	426	let statsEntries = $t01717117325._1
427	427	let totalStaked = $t01717117325._2
428	428	let totalStakedNew = $t01717117325._3
429	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)
430	430	}
431	431	}
432	432	}
433	433
434	434
435	435
436	436	@Callable(i)
437	437	func deposit () = {
438	438	let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
439	439	if ((0 > totalStaked))
440	440	then throw("TODO: case is not supported")
441	441	else {
442	442	let depositNumLastKEY = keyDepositNumLast()
443	443	let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
444	444	let depositNumNew = (depositNumLast + 1)
445	445	let totalsKEY = keyStatsDepositAmtTotals()
446	446	let byDayKEY = keyStatsDepositAmtByDay(toStartOfDay(lastBlock.timestamp))
447	447	let currTotals = split(valueOrElse(getString(totalsKEY), defaultTotalsDATA), SEP)
448	448	let currByDay = split(valueOrElse(getString(byDayKEY), defaultTotalsDATA), SEP)
449	449	func dep (acc,pmt) = {
450	450	let amount = pmt.amount
451	451	let pmtAssetIdStr = toBase58String(valueOrElse(pmt.assetId, WAVESID))
452	452	if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
453	453	then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
454	454	else if ((totalStaked == 0))
455	455	then $Tuple4((acc._1 :+ IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)), (acc._2 :+ pmtAssetIdStr), (acc._3 :+ toBigInt(0)), (acc._4 :+ amount))
456	456	else {
457	457	let rewardPerNsbtX18 = fraction(toBigInt(amount), MULTX18, toBigInt(totalStaked))
458	458	$Tuple4(acc._1, (acc._2 :+ pmtAssetIdStr), (acc._3 :+ rewardPerNsbtX18), (acc._4 :+ amount))
459	459	}
460	460	}
461	461
462	462	let pmtsResult = {
463	463	let $l = i.payments
464	464	let $s = size($l)
465	465	let $acc0 = $Tuple4(nil, nil, nil, nil)
466	466	func $f0_1 ($a,$i) = if (($i >= $s))
467	467	then $a
468	468	else dep($a, $l[$i])
469	469
470	470	func $f0_2 ($a,$i) = if (($i >= $s))
471	471	then $a
472	472	else throw("List size exceeds 10")
473	473
474	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)
475	475	}
476	476	func refreshRewardUpdateTotals (accum,nextAsset) = {
477	477	let k = accum._4
478	478	let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
479	479	let idx = indexOf(pmtsResult._2, nextAsset)
480	480	let sum = if (isDefined(idx))
481	481	then {
482	482	let j = value(idx)
483	483	let statsDelta = pmtsResult._4[j]
484	484	$Tuple3(toString((parseBigIntValue(sumLastStr) + pmtsResult._3[j])), toString((parseIntValue(currTotals[(k + 1)]) + statsDelta)), toString((parseIntValue(currByDay[(k + 1)]) + statsDelta)))
485	485	}
486	486	else $Tuple3(sumLastStr, currTotals[(k + 1)], currByDay[(k + 1)])
487	487	$Tuple4((accum._1 :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), sum._1)), ((accum._2 + SEP) + sum._2), ((accum._3 + SEP) + sum._3), (k + 1))
488	488	}
489	489
490	490	let assetsResult = {
491	491	let $l = supportedAssetsList
492	492	let $s = size($l)
493	493	let $acc0 = $Tuple4(nil, DepositTotalsPREFIX, DepositTotalsPREFIX, 0)
494	494	func $f1_1 ($a,$i) = if (($i >= $s))
495	495	then $a
496	496	else refreshRewardUpdateTotals($a, $l[$i])
497	497
498	498	func $f1_2 ($a,$i) = if (($i >= $s))
499	499	then $a
500	500	else throw("List size exceeds 9")

github/deemru/w8io/169f3d6 
96.61 ms ◑