w8 · tx · ATG···AtS

tx · ATGScZ2BnkhhsgpdgkAYoeFEXYbXSJHxdc4eZnYCaAtS

3N5yarEiTQccnnuerogYT3BxM5Zc5bRgDZy:  -0.04000000 Waves

2022.08.05 07:13 [2170690] smart account 3N5yarEiTQccnnuerogYT3BxM5Zc5bRgDZy > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ATGScZ2BnkhhsgpdgkAYoeFEXYbXSJHxdc4eZnYCaAtS",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1659672816504,
    "version": 1,
    "sender": "3N5yarEiTQccnnuerogYT3BxM5Zc5bRgDZy",
    "senderPublicKey": "FK9j3YFWVChXKESTn33fMZz1JseCNMMqHhfB7smxJo4e",
    "proofs": [
        "5bix1iohb5KeApNcfPPjmYEodKrXLLU4TfpvQJmBxeBaB9NDSgBuUw6gusQZhSZxGFdTKowggwNh3p51AfcUM2K"
    ],
    "script": "base64:BgIlCAISBQoDAQgIEgASABIDCgEBEgASABIAEgMKAQgSBAoCCAESAE0ACXNlcGFyYXRvcgICX18AA1NFUAICX18ABU1VTFQ2AMCEPQAFTVVMVDgAgMLXLwAGTVVMVFg2CQC2AgEFBU1VTFQ2AAZNVUxUWDgJALYCAQUFTVVMVDgAB01VTFRYMTgJALYCAQCAgJC7utat8A0ACldBVkVTSURTVFICBVdBVkVTAAdXQVZFU0lECQDZBAEFCldBVkVTSURTVFIAGUlkeENvbnRyb2xDZmdOZXV0cmlub0RhcHAAAQAYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwAAIAFElkeENvbnRyb2xDZmdScGREYXBwAAMAFUlkeENvbnRyb2xDZmdNYXRoRGFwcAAEABxJZHhDb250cm9sQ2ZnTGlxdWlkYXRpb25EYXBwAAUAFUlkeENvbnRyb2xDZmdSZXN0RGFwcAAGAB1JZHhDb250cm9sQ2ZnTm9kZVJlZ2lzdHJ5RGFwcAAHABxJZHhDb250cm9sQ2ZnTnNidFN0YWtpbmdEYXBwAAgAGUlkeENvbnRyb2xDZmdNZWRpYXRvckRhcHAACQAcSWR4Q29udHJvbENmZ1N1cmZTdGFraW5nRGFwcAAKACBJZHhDb250cm9sQ2ZnR25zYnRDb250cm9sbGVyRGFwcAALAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQCsAgIJAKwCAgkArAICCQCsAgICCm1hbmRhdG9yeSAJAKUIAQUHYWRkcmVzcwIBLgUDa2V5Ag8gaXMgbm90IGRlZmluZWQBEWtleUNvbnRyb2xBZGRyZXNzAAIcJXMlc19fY29uZmlnX19jb250cm9sQWRkcmVzcwENa2V5Q29udHJvbENmZwACESVzX19jb250cm9sQ29uZmlnARRyZWFkQ29udHJvbENmZ09yRmFpbAEHY29udHJvbAkAtQkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUHY29udHJvbAkBDWtleUNvbnRyb2xDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIKY29udHJvbENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFCmNvbnRyb2xDZmcFA2lkeAkArAICAi1Db250cm9sIGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AA9jb250cm9sQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBEWtleUNvbnRyb2xBZGRyZXNzAAIjM040TlM3ZDRKbzlhNkYxNExpRlVLS1lWZFVra2YyZVA0WngACmNvbnRyb2xDZmcJARRyZWFkQ29udHJvbENmZ09yRmFpbAEFD2NvbnRyb2xDb250cmFjdAAMbWF0aENvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUVSWR4Q29udHJvbENmZ01hdGhEYXBwABBuZXV0cmlub0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUZSWR4Q29udHJvbENmZ05ldXRyaW5vRGFwcAAPYXVjdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwAQxrZXlCb25kQXNzZXQAAg1ib25kX2Fzc2V0X2lkARlrZXlBdWN0aW9uQ29udHJhY3RBZGRyZXNzAAIQYXVjdGlvbl9jb250cmFjdAEQa2V5TWluTG9ja0Ftb3VudAACESVzX19taW5Mb2NrQW1vdW50ARBrZXlTdGFrZWRBc3NldElkAAIRJXNfX3N0YWtlZEFzc2V0SWQBFmtleUxvY2tQYXJhbVVzZXJBbW91bnQBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICC3BhcmFtQnlVc2VyCQDMCAIJAKUIAQULdXNlckFkZHJlc3MJAMwIAgIGYW1vdW50BQNuaWwFCXNlcGFyYXRvcgEWa2V5TG9ja1BhcmFtU3RhcnRCbG9jawELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgILcGFyYW1CeVVzZXIJAMwIAgkApQgBBQt1c2VyQWRkcmVzcwkAzAgCAgVzdGFydAUDbmlsBQlzZXBhcmF0b3IBJmtleUxvY2tQYXJhbVZvdGluZ1Bvd2VyRWZmZWN0aXZlSGVpZ2h0AQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgtwYXJhbUJ5VXNlcgkAzAgCCQClCAEFC3VzZXJBZGRyZXNzCQDMCAICEXZwRWZmZWN0aXZlSGVpZ2h0BQNuaWwFCXNlcGFyYXRvcgEQa2V5SGlzdG9yeVJlY29yZAMEdHlwZQt1c2VyQWRkcmVzcwR0eElkCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgIHaGlzdG9yeQkAzAgCBQR0eXBlCQDMCAIJAKUIAQULdXNlckFkZHJlc3MJAMwIAgkA2AQBBQR0eElkBQNuaWwFCXNlcGFyYXRvcgEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQACQC5CQIJAMwIAgIEJXMlcwkAzAgCAgVzdGF0cwkAzAgCAhFhY3RpdmVUb3RhbExvY2tlZAUDbmlsBQlzZXBhcmF0b3IBEmtleVN0YXRzTG9ja3NDb3VudAAJALkJAgkAzAgCAgQlcyVzCQDMCAICBXN0YXRzCQDMCAICCmxvY2tzQ291bnQFA25pbAUJc2VwYXJhdG9yARJrZXlTdGF0c1VzZXJzQ291bnQACQC5CQIJAMwIAgIEJXMlcwkAzAgCAgVzdGF0cwkAzAgCAhBhY3RpdmVVc2Vyc0NvdW50BQNuaWwFCXNlcGFyYXRvcgENa2V5TmV4dFBlcmlvZAACDiVzX19uZXh0UGVyaW9kARhrZXlTdXBwb3J0ZWRSZXdhcmRBc3NldHMAAhVzdXBwb3J0ZWRSZXdhcmRBc3NldHMBEWtleURlcG9zaXROdW1MYXN0AAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgNkZXAJAMwIAgIHbGFzdE51bQUDbmlsBQlzZXBhcmF0b3IBG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIRdXNlclJ3ZEZyb21EZXBOdW0JAMwIAgULdXNlckFkZHJlc3MFA25pbAUJc2VwYXJhdG9yARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCCmRlcG9zaXROdW0DdGtuCQC5CQIJAMwIAgIEJXMlZAkAzAgCAhVyd2RQZXJOc2J0U3VtQnlEZXBOdW0JAMwIAgkApAMBBQpkZXBvc2l0TnVtCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBCWtleVJld2FyZAILdXNlckFkZHJlc3MDdGtuCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICA3J3ZAkAzAgCBQt1c2VyQWRkcmVzcwkAzAgCBQN0a24FA25pbAUJc2VwYXJhdG9yAQprZXlDbGFpbWVkAgt1c2VyQWRkcmVzcwN0a24JALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIDY2xtCQDMCAIFC3VzZXJBZGRyZXNzCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBF2tleU5vdERpc3RyaWJ1dGVkUmV3YXJkAQN0a24JALkJAgkAzAgCAgQlcyVzCQDMCAICDm5vdERpc3RyaWJ1dGVkCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBBXRvWDE4AgdvcmlnVmFsCG9yaWdNdWx0CQC8AgMJALYCAQUHb3JpZ1ZhbAUHTVVMVFgxOAUIb3JpZ011bHQBDGdldEludE9yWmVybwEDa2V5CQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFA2tleQAAAQxnZXRJbnRPckVsc2UCA2tleQpkZWZhdWx0VmFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFA2tleQUKZGVmYXVsdFZhbAEMZ2V0SW50T3JGYWlsAQNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQR0aGlzBQNrZXkJAKwCAgkArAICAg9NYW5kYXRvcnkgdGhpcy4FA2tleQIPIGlzIG5vdCBkZWZpbmVkAQxnZXRTdHJPckVsc2UCA2tleQpkZWZhdWx0VmFsCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFA2tleQUKZGVmYXVsdFZhbAEPdG9BZGRyZXNzT3JGYWlsAQphZGRyZXNzU3RyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQUKYWRkcmVzc1N0cgkArAICAiFjb3VsZG4ndCBwYXJzZSBwYXNzZWQgYWRkcmVzc1N0cj0FCmFkZHJlc3NTdHIBC3RvQXNzZXRWZWN0AQhhc3NldFN0cgMJAAACBQhhc3NldFN0cgUKV0FWRVNJRFNUUgUEdW5pdAkA2QQBBQhhc3NldFN0cgEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBE2Zvcm1hdEhpc3RvcnlSZWNvcmQECW9sZEFtb3VudAhvbGRTdGFydAluZXdBbW91bnQIbmV3U3RhcnQJALkJAgkAzAgCAgwlZCVkJWQlZCVkJWQJAMwIAgkApAMBCAUJbGFzdEJsb2NrBmhlaWdodAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAKQDAQUJb2xkQW1vdW50CQDMCAIJAKQDAQUIb2xkU3RhcnQJAMwIAgkApAMBBQluZXdBbW91bnQJAMwIAgkApAMBBQhuZXdTdGFydAUDbmlsBQlzZXBhcmF0b3IBGGZvcm1hdENsYWltSGlzdG9yeVJlY29yZAIEdXNlcg5jbGFpbWVkUmV3YXJkcwkAuQkCCQDMCAICCCVzJWQlZCVzCQDMCAIFBHVzZXIJAMwIAgkApAMBCAUJbGFzdEJsb2NrBmhlaWdodAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIFDmNsYWltZWRSZXdhcmRzBQNuaWwFCXNlcGFyYXRvcgESSGlzdG9yeVJlY29yZEVudHJ5BwR0eXBlC3VzZXJBZGRyZXNzBHR4SWQJb2xkQW1vdW50CG9sZFN0YXJ0CW5ld0Ftb3VudAhuZXdTdGFydAkBC1N0cmluZ0VudHJ5AgkBEGtleUhpc3RvcnlSZWNvcmQDBQR0eXBlBQt1c2VyQWRkcmVzcwUEdHhJZAkBE2Zvcm1hdEhpc3RvcnlSZWNvcmQEBQlvbGRBbW91bnQFCG9sZFN0YXJ0BQluZXdBbW91bnQFCG5ld1N0YXJ0ARFDbGFpbUhpc3RvcnlFbnRyeQMLdXNlckFkZHJlc3MEdHhJZA5jbGFpbWVkUmV3YXJkcwkBC1N0cmluZ0VudHJ5AgkBEGtleUhpc3RvcnlSZWNvcmQDAgVjbGFpbQULdXNlckFkZHJlc3MFBHR4SWQJARhmb3JtYXRDbGFpbUhpc3RvcnlSZWNvcmQCCQClCAEFC3VzZXJBZGRyZXNzBQ5jbGFpbWVkUmV3YXJkcwELU3RhdHNSZXN1bHQDDnRvdGFsTG9ja2VkSW5jDGxvY2tDb3VudEluYw11c2Vyc0NvdW50SW5jBApsb2Nrc0NvdW50CQEMZ2V0SW50T3JaZXJvAQkBEmtleVN0YXRzTG9ja3NDb3VudAAECnVzZXJzQ291bnQJAQxnZXRJbnRPclplcm8BCQESa2V5U3RhdHNVc2Vyc0NvdW50AAQLdG90YWxBbW91bnQJAQxnZXRJbnRPclplcm8BCQEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQABA50b3RhbEFtb3VudE5ldwkAZAIFC3RvdGFsQW1vdW50BQ50b3RhbExvY2tlZEluYwkAlQoDCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5U3RhdHNMb2Nrc0NvdW50AAkAZAIFCmxvY2tzQ291bnQFDGxvY2tDb3VudEluYwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleVN0YXRzVXNlcnNDb3VudAAJAGQCBQp1c2Vyc0NvdW50BQ11c2Vyc0NvdW50SW5jCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQABQ50b3RhbEFtb3VudE5ldwUDbmlsBQt0b3RhbEFtb3VudAUOdG90YWxBbW91bnROZXcBD0xvY2tQYXJhbXNFbnRyeQMLdXNlckFkZHJlc3MGYW1vdW50GnZvdGluZ1Bvd2VyRWZmZWN0aXZlSGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5TG9ja1BhcmFtVXNlckFtb3VudAEFC3VzZXJBZGRyZXNzBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAQULdXNlckFkZHJlc3MFGnZvdGluZ1Bvd2VyRWZmZWN0aXZlSGVpZ2h0BQNuaWwBD2dldFBhcmFtc09yRmFpbAAJAJQKAgkA2QQBCQEPZ2V0U3RyaW5nT3JGYWlsAgUEdGhpcwkBEGtleVN0YWtlZEFzc2V0SWQACQEMZ2V0SW50T3JGYWlsAQkBEGtleU1pbkxvY2tBbW91bnQAAQxpc0FjdGl2ZVVzZXIBC3VzZXJBZGRyZXNzCQBmAgkBDGdldEludE9yRWxzZQIJARZrZXlMb2NrUGFyYW1Vc2VyQW1vdW50AQULdXNlckFkZHJlc3MAAAAAARNnZXRVc2VyUGFyYW1zT3JVbml0AQt1c2VyQWRkcmVzcwMJAQxpc0FjdGl2ZVVzZXIBBQt1c2VyQWRkcmVzcwkAlQoDBwkBDGdldEludE9yRmFpbAEJARZrZXlMb2NrUGFyYW1Vc2VyQW1vdW50AQULdXNlckFkZHJlc3MJAQxnZXRJbnRPckZhaWwBCQEWa2V5TG9ja1BhcmFtU3RhcnRCbG9jawEFC3VzZXJBZGRyZXNzBQR1bml0ARNnZXRVc2VyUGFyYW1zT3JGYWlsAQt1c2VyQWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQETZ2V0VXNlclBhcmFtc09yVW5pdAEFC3VzZXJBZGRyZXNzCQCsAgIJAKwCAgIFVXNlciAJAKUIAQULdXNlckFkZHJlc3MCDyBpcyBub3QgZGVmaW5lZAASc3VwcG9ydGVkQXNzZXRzU3RyCQEMZ2V0U3RyT3JFbHNlAgkBGGtleVN1cHBvcnRlZFJld2FyZEFzc2V0cwACAAATc3VwcG9ydGVkQXNzZXRzTGlzdAkAtQkCBRJzdXBwb3J0ZWRBc3NldHNTdHICAV8BCmNhbGNSZXdhcmQFC3VzZXJBZGRyZXNzB2Fzc2V0SWQNc3Rha2VkQW1vdW50WA5kZXBvc2l0TnVtVXNlcg5kZXBvc2l0TnVtTGFzdAQXcmV3YXJkUGVyTnNidFN1bUxhc3RLRVkJARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCBQ5kZXBvc2l0TnVtTGFzdAUHYXNzZXRJZAQKc3VtTGFzdFgxOAkApwMBCQEMZ2V0U3RyT3JFbHNlAgkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDmRlcG9zaXROdW1MYXN0BQdhc3NldElkAgEwBApzdW1Vc2VyWDE4CQCnAwEJAQxnZXRTdHJPckVsc2UCCQEVa2V5UmV3YXJkUGVyTnNidFN1bUF0AgUOZGVwb3NpdE51bVVzZXIFB2Fzc2V0SWQCATAEEXJld2FyZER5bmFtaWNQYXJ0CQCgAwEJALwCAwkAuAICBQpzdW1MYXN0WDE4BQpzdW1Vc2VyWDE4BQ1zdGFrZWRBbW91bnRYBQdNVUxUWDE4BBNyZXdhcmRDYWNoZWRQYXJ0S0VZCQEJa2V5UmV3YXJkAgULdXNlckFkZHJlc3MFB2Fzc2V0SWQEEHJld2FyZENhY2hlZFBhcnQJAQxnZXRJbnRPckVsc2UCBRNyZXdhcmRDYWNoZWRQYXJ0S0VZAAAJAJYKBAkAZAIFEHJld2FyZENhY2hlZFBhcnQFEXJld2FyZER5bmFtaWNQYXJ0BRByZXdhcmRDYWNoZWRQYXJ0BRFyZXdhcmREeW5hbWljUGFydAUTcmV3YXJkQ2FjaGVkUGFydEtFWQENUmV3YXJkRW50cmllcwMJaXNOZXdVc2VyC3VzZXJBZGRyZXNzDHN0YWtlZEFtb3VudAQNc3Rha2VkQW1vdW50WAkAtgIBBQxzdGFrZWRBbW91bnQEG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQkBG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQEFC3VzZXJBZGRyZXNzBA5kZXBvc2l0TnVtVXNlcgkBDGdldEludE9yRWxzZQIFG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQD///////////8BBA5kZXBvc2l0TnVtTGFzdAkBDGdldEludE9yRWxzZQIJARFrZXlEZXBvc2l0TnVtTGFzdAAA////////////AQoBG2ZvckVhY2hBc3NldENhY2hlVXNlclJld2FyZAIFYWNjdW0FYXNzZXQECyR0MDg2Mzk4Nzc0CQEKY2FsY1Jld2FyZAUFC3VzZXJBZGRyZXNzBQVhc3NldAUNc3Rha2VkQW1vdW50WAUOZGVwb3NpdE51bVVzZXIFDmRlcG9zaXROdW1MYXN0BAtyZXdhcmRUb3RhbAgFCyR0MDg2Mzk4Nzc0Al8xBAZjYWNoZWQIBQskdDA4NjM5ODc3NAJfMgQHZHluYW1pYwgFCyR0MDg2Mzk4Nzc0Al8zBBNyZXdhcmRDYWNoZWRQYXJ0S0VZCAULJHQwODYzOTg3NzQCXzQJAM0IAgUFYWNjdW0JAQxJbnRlZ2VyRW50cnkCBRNyZXdhcmRDYWNoZWRQYXJ0S0VZBQtyZXdhcmRUb3RhbAMDCQAAAgUOZGVwb3NpdE51bUxhc3QA////////////AQkAAAIFDmRlcG9zaXROdW1Vc2VyAP///////////wEHBQNuaWwDAwkAAAIFDmRlcG9zaXROdW1MYXN0AP///////////wEJAGYCBQ5kZXBvc2l0TnVtVXNlcgD///////////8BBwkAAgECL2ludmFsaWQgZGVwb3NpdE51bUxhc3QgYW5kIGRlcG9zaXROdW1Vc2VyIHN0YXRlAwMJAGYCBQ5kZXBvc2l0TnVtTGFzdAD///////////8BCQBnAgUOZGVwb3NpdE51bVVzZXIA////////////AQcDBQlpc05ld1VzZXIJAMwIAgkBDEludGVnZXJFbnRyeQIFG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQUOZGVwb3NpdE51bUxhc3QFA25pbAkAzQgCCgACJGwFE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBG2ZvckVhY2hBc3NldENhY2hlVXNlclJld2FyZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgkBDEludGVnZXJFbnRyeQIFG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQUOZGVwb3NpdE51bUxhc3QJAAIBCQCsAgIJAKwCAgkArAICAiR1bmNvdmVyZWQgY29uZGl0aW9uOiBkZXBvc2l0TnVtTGFzdD0JAKQDAQUOZGVwb3NpdE51bUxhc3QCECBkZXBvc2l0TnVtVXNlcj0JAKQDAQUOZGVwb3NpdE51bVVzZXIBIkluY3JlbWVudE5vdERpc3RyaWJ1dGVkUmV3YXJkRW50cnkCA3RrbglhbW91bnRJbmMEF25vdERpc3RyaWJ1dGVkUmV3YXJkS0VZCQEXa2V5Tm90RGlzdHJpYnV0ZWRSZXdhcmQBBQN0a24EFG5vdERpc3RyaWJ1dGVkUmV3YXJkCQEMZ2V0SW50T3JFbHNlAgUXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJAGQCBRRub3REaXN0cmlidXRlZFJld2FyZAUJYW1vdW50SW5jBQNuaWwBC3N1cmZUb0duc2J0AQdzdXJmQW10CQBpAgUHc3VyZkFtdAA8AR9tZXJnZVZvdGluZ1Bvd2VyRWZmZWN0aXZlSGVpZ2h0BBBxdWFyYW50aW5lUGVyaW9kEXZwRWZmZWN0aXZlSGVpZ2h0CXN0YWtlZEFtdAxzdGFrZWRBbXRORVcED3JlbWFpbmluZ1RvV2FpdAkAZQIFEXZwRWZmZWN0aXZlSGVpZ2h0BQZoZWlnaHQDCQBnAgAABQ9yZW1haW5pbmdUb1dhaXQJAGQCBQZoZWlnaHQFEHF1YXJhbnRpbmVQZXJpb2QEDWFscmVhZHlXYWl0ZWQJAGUCBRBxdWFyYW50aW5lUGVyaW9kBQ9yZW1haW5pbmdUb1dhaXQEA2tYOAkAawMFCXN0YWtlZEFtdAUFTVVMVDgFDHN0YWtlZEFtdE5FVwkAZQIJAGQCBRBxdWFyYW50aW5lUGVyaW9kBQZoZWlnaHQJAGsDBQ1hbHJlYWR5V2FpdGVkBQNrWDgFBU1VTFQ4AQptZXJnZVN0YWtlAgt1c2VyQWRkcmVzcwthbW91bnRUb0FkZAQNJHQwMTIzNjcxMjQ3NwkBC3ZhbHVlT3JFbHNlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkAlQoDBgAAAAAECWlzTmV3VXNlcggFDSR0MDEyMzY3MTI0NzcCXzEEDHN0YWtlZEFtb3VudAgFDSR0MDEyMzY3MTI0NzcCXzIEEXZwRWZmZWN0aXZlSGVpZ2h0CAUNJHQwMTIzNjcxMjQ3NwJfMwQPc3Rha2VkQW1vdW50TkVXAwUJaXNOZXdVc2VyBQthbW91bnRUb0FkZAkAZAIFC2Ftb3VudFRvQWRkBQxzdGFrZWRBbW91bnQEEHF1YXJhbnRpbmVQZXJpb2QJAGgCAKALAA4EFHZwRWZmZWN0aXZlSGVpZ2h0TkVXAwUJaXNOZXdVc2VyCQBkAgUQcXVhcmFudGluZVBlcmlvZAUGaGVpZ2h0CQEfbWVyZ2VWb3RpbmdQb3dlckVmZmVjdGl2ZUhlaWdodAQFEHF1YXJhbnRpbmVQZXJpb2QFEXZwRWZmZWN0aXZlSGVpZ2h0BQxzdGFrZWRBbW91bnQFD3N0YWtlZEFtb3VudE5FVwkAlwoFBQlpc05ld1VzZXIFDHN0YWtlZEFtb3VudAURdnBFZmZlY3RpdmVIZWlnaHQFD3N0YWtlZEFtb3VudE5FVwUUdnBFZmZlY3RpdmVIZWlnaHRORVcBC2NvbW1vblN0YWtlAgt1c2VyQWRkcmVzcwFpBA0kdDAxMjk2MzEzMDE3CQEPZ2V0UGFyYW1zT3JGYWlsAAQNc3Rha2VkQXNzZXRJZAgFDSR0MDEyOTYzMTMwMTcCXzEEDW1pbkxvY2tBbW91bnQIBQ0kdDAxMjk2MzEzMDE3Al8yAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIVSW52YWxpZCBwYXltZW50cyBzaXplBAdwYXltZW50CQCRAwIIBQFpCHBheW1lbnRzAAAEBmFtb3VudAgFB3BheW1lbnQGYW1vdW50BBNpbnZhbGlkQXNzZXRNZXNzYWdlCQCsAgIJAKwCAgIPSW52YWxpZCBhc3NldC4gCQDYBAEFDXN0YWtlZEFzc2V0SWQCDCBpcyBleHBlY3RlZAQHYXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUHcGF5bWVudAdhc3NldElkBRNpbnZhbGlkQXNzZXRNZXNzYWdlAwkBAiE9AgUHYXNzZXRJZAUNc3Rha2VkQXNzZXRJZAkAAgEFE2ludmFsaWRBc3NldE1lc3NhZ2UEDnVzZXJBZGRyZXNzU3RyCQClCAEFC3VzZXJBZGRyZXNzBAptZXJnZWREYXRhCQEKbWVyZ2VTdGFrZQIFC3VzZXJBZGRyZXNzBQZhbW91bnQECWlzTmV3VXNlcggFCm1lcmdlZERhdGECXzEEDHN0YWtlZEFtb3VudAgFCm1lcmdlZERhdGECXzIEEXZwRWZmZWN0aXZlSGVpZ2h0CAUKbWVyZ2VkRGF0YQJfMwQPc3Rha2VkQW1vdW50TkVXCAUKbWVyZ2VkRGF0YQJfNAQUdnBFZmZlY3RpdmVIZWlnaHRORVcIBQptZXJnZWREYXRhAl81AwkAZgIFDW1pbkxvY2tBbW91bnQFD3N0YWtlZEFtb3VudE5FVwkAAgEJAKwCAgITTWluIGxvY2sgYW1vdW50IGlzIAkApAMBBQ1taW5Mb2NrQW1vdW50BA0kdDAxMzgxNjEzOTE4CQELU3RhdHNSZXN1bHQDBQZhbW91bnQAAQMFCWlzTmV3VXNlcgABAAAEDHN0YXRzRW50cmllcwgFDSR0MDEzODE2MTM5MTgCXzEEC3RvdGFsU3Rha2VkCAUNJHQwMTM4MTYxMzkxOAJfMgQOdG90YWxTdGFrZWROZXcIBQ0kdDAxMzgxNjEzOTE4Al8zCQDOCAIJAM4IAgkAzggCCQDMCAIJARJIaXN0b3J5UmVjb3JkRW50cnkHAgVzdGFrZQULdXNlckFkZHJlc3MIBQFpDXRyYW5zYWN0aW9uSWQFDHN0YWtlZEFtb3VudAURdnBFZmZlY3RpdmVIZWlnaHQFD3N0YWtlZEFtb3VudE5FVwUUdnBFZmZlY3RpdmVIZWlnaHRORVcFA25pbAkBDVJld2FyZEVudHJpZXMDBQlpc05ld1VzZXIFDnVzZXJBZGRyZXNzU3RyBQxzdGFrZWRBbW91bnQJAQ9Mb2NrUGFyYW1zRW50cnkDBQt1c2VyQWRkcmVzcwUPc3Rha2VkQW1vdW50TkVXBRR2cEVmZmVjdGl2ZUhlaWdodE5FVwUMc3RhdHNFbnRyaWVzAQtjb21tb25DbGFpbQILdXNlckFkZHJlc3MBaQQOdXNlckFkZHJlc3NTdHIJAKUIAQULdXNlckFkZHJlc3MDCQBmAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIZcGF5bWVudHMgYXJlIG5vdCBhY2NlcHRlZAQNJHQwMTQzOTcxNDUwMgkBC3ZhbHVlT3JFbHNlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkAlQoDBgAAAAAECWlzTmV3VXNlcggFDSR0MDE0Mzk3MTQ1MDICXzEEDHN0YWtlZEFtb3VudAgFDSR0MDE0Mzk3MTQ1MDICXzIEDHN0YWtpbmdTdGFydAgFDSR0MDE0Mzk3MTQ1MDICXzMEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQ51c2VyQWRkcmVzc1N0cgQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgVhY2N1bQVhc3NldAQNJHQwMTQ4NzMxNTAxMQkBCmNhbGNSZXdhcmQFBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQFDXN0YWtlZEFtb3VudFgFDmRlcG9zaXROdW1Vc2VyBQ5kZXBvc2l0TnVtTGFzdAQLcmV3YXJkVG90YWwIBQ0kdDAxNDg3MzE1MDExAl8xBAZjYWNoZWQIBQ0kdDAxNDg3MzE1MDExAl8yBAdkeW5hbWljCAUNJHQwMTQ4NzMxNTAxMQJfMwQTcmV3YXJkQ2FjaGVkUGFydEtFWQgFDSR0MDE0ODczMTUwMTECXzQECmNsYWltZWRLRVkJAQprZXlDbGFpbWVkAgUOdXNlckFkZHJlc3NTdHIFBWFzc2V0BA0kdDAxNTA3MTE1MTA4BQVhY2N1bQQEZGF0YQgFDSR0MDE1MDcxMTUxMDgCXzEEEWNsYWltZWRBbXRCeUFzc2V0CAUNJHQwMTUwNzExNTEwOAJfMgQHbmV3UGFydAkAuQkCCQDMCAIFBWFzc2V0CQDMCAIJAKQDAQULcmV3YXJkVG90YWwFA25pbAIBOgQUY2xhaW1lZEFtdEJ5QXNzZXROZXcJALkJAgkAzAgCBRFjbGFpbWVkQW10QnlBc3NldAkAzAgCBQduZXdQYXJ0BQNuaWwCAV8DCQBnAgAABQtyZXdhcmRUb3RhbAkAlAoCBQRkYXRhBRRjbGFpbWVkQW10QnlBc3NldE5ldwkAlAoCCQDNCAIJAM0IAgkAzQgCBQRkYXRhCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwULcmV3YXJkVG90YWwJAQt0b0Fzc2V0VmVjdAEFBWFzc2V0CQEMSW50ZWdlckVudHJ5AgUKY2xhaW1lZEtFWQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUKY2xhaW1lZEtFWQAABQtyZXdhcmRUb3RhbAkBDEludGVnZXJFbnRyeQIFE3Jld2FyZENhY2hlZFBhcnRLRVkAAAUUY2xhaW1lZEFtdEJ5QXNzZXROZXcEDSR0MDE1NTY4MTU2ODIKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBH2ZvckVhY2hBc3NldENhbGNVbmNsYWltZWRSZXdhcmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoECXRyYW5zZmVycwgFDSR0MDE1NTY4MTU2ODICXzEEF2NsYWltZWRBbXRCeUFzc2V0UmVzdWx0CAUNJHQwMTU1NjgxNTY4MgJfMgMJAGcCAAAJAJADAQUJdHJhbnNmZXJzBQNuaWwJAM0IAgkAzQgCBQl0cmFuc2ZlcnMJAQxJbnRlZ2VyRW50cnkCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkFDmRlcG9zaXROdW1MYXN0CQERQ2xhaW1IaXN0b3J5RW50cnkDBQt1c2VyQWRkcmVzcwgFAWkNdHJhbnNhY3Rpb25JZAkAsAICBRdjbGFpbWVkQW10QnlBc3NldFJlc3VsdAABCgFpAQtjb25zdHJ1Y3RvcgMNbWluTG9ja0Ftb3VudBVzdXBwb3J0ZWRSZXdhcmRBc3NldHMNc3Rha2VkQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEQa2V5TWluTG9ja0Ftb3VudAAFDW1pbkxvY2tBbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBGGtleVN1cHBvcnRlZFJld2FyZEFzc2V0cwAFFXN1cHBvcnRlZFJld2FyZEFzc2V0cwkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5U3Rha2VkQXNzZXRJZAAFDXN0YWtlZEFzc2V0SWQFA25pbAFpAQVzdGFrZQAJAQtjb21tb25TdGFrZQIIBQFpBmNhbGxlcgUBaQFpARNzdGFrZUJ5T3JpZ2luQ2FsbGVyAAkBC2NvbW1vblN0YWtlAggFAWkMb3JpZ2luQ2FsbGVyBQFpAWkBB3Vuc3Rha2UBBmFtb3VudAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECI3Vuc3Rha2UgZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50BAt1c2VyQWRkcmVzcwgFAWkGY2FsbGVyBA51c2VyQWRkcmVzc1N0cgkApQgBBQt1c2VyQWRkcmVzcwQNJHQwMTY1OTExNjY0NQkBD2dldFBhcmFtc09yRmFpbAAEDXN0YWtlZEFzc2V0SWQIBQ0kdDAxNjU5MTE2NjQ1Al8xBA1taW5Mb2NrQW1vdW50CAUNJHQwMTY1OTExNjY0NQJfMgQNJHQwMTY2NDgxNjcyMgkBE2dldFVzZXJQYXJhbXNPckZhaWwBBQt1c2VyQWRkcmVzcwQJaXNOZXdVc2VyCAUNJHQwMTY2NDgxNjcyMgJfMQQKbG9ja0Ftb3VudAgFDSR0MDE2NjQ4MTY3MjICXzIECWxvY2tTdGFydAgFDSR0MDE2NjQ4MTY3MjICXzMDCQBnAgAABQpsb2NrQW1vdW50CQACAQISTm90aGluZyB0byB1bnN0YWtlAwkAZgIFBmFtb3VudAUKbG9ja0Ftb3VudAkAAgEJAKwCAgkArAICCQCsAgICClJlcXVlc3RlZCAJAKQDAQUGYW1vdW50AhIsIGJ1dCBzdGFrZWQgb25seSAJAKQDAQUKbG9ja0Ftb3VudAQNJHQwMTY5MTIxNzA2NgkBC1N0YXRzUmVzdWx0AwkBAS0BBQZhbW91bnQDCQAAAgUGYW1vdW50BQpsb2NrQW1vdW50AP///////////wEAAAMJAAACBQZhbW91bnQFCmxvY2tBbW91bnQA////////////AQAABAxzdGF0c0VudHJpZXMIBQ0kdDAxNjkxMjE3MDY2Al8xBAt0b3RhbFN0YWtlZAgFDSR0MDE2OTEyMTcwNjYCXzIEDnRvdGFsU3Rha2VkTmV3CAUNJHQwMTY5MTIxNzA2NgJfMwkAzggCCQDOCAIJAM4IAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUGYW1vdW50BQ1zdGFrZWRBc3NldElkCQDMCAIJARJIaXN0b3J5UmVjb3JkRW50cnkHAgd1bnN0YWtlBQt1c2VyQWRkcmVzcwgFAWkNdHJhbnNhY3Rpb25JZAUKbG9ja0Ftb3VudAUJbG9ja1N0YXJ0CQBlAgUKbG9ja0Ftb3VudAUGYW1vdW50BQlsb2NrU3RhcnQFA25pbAkBDVJld2FyZEVudHJpZXMDBwUOdXNlckFkZHJlc3NTdHIFCmxvY2tBbW91bnQJAQ9Mb2NrUGFyYW1zRW50cnkDBQt1c2VyQWRkcmVzcwkAZQIFCmxvY2tBbW91bnQFBmFtb3VudAUJbG9ja1N0YXJ0BQxzdGF0c0VudHJpZXMBaQEHZGVwb3NpdAADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAh9leGFjdCAxIHBheW1lbnQgaXMgYWxsb3dlZCBvbmx5BANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQGYW1vdW50CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBC3ZhbHVlT3JFbHNlAggFA3BtdAdhc3NldElkBQdXQVZFU0lEBA1wbXRBc3NldElkU3RyCQDYBAEFCnBtdEFzc2V0SWQECHBtdE11bHRYAwkAAAIFCnBtdEFzc2V0SWQFB1dBVkVTSUQFBk1VTFRYOAUGTVVMVFg2BAdhbW91bnRYCQC2AgEFBmFtb3VudAQLdG90YWxTdGFrZWQJAQxnZXRJbnRPckVsc2UCCQEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQAAAAEDHRvdGFsU3Rha2VkWAkAtgIBBQt0b3RhbFN0YWtlZAMJAGYCAAAFC3RvdGFsU3Rha2VkCQACAQIbVE9ETzogY2FzZSBpcyBub3Qgc3VwcG9ydGVkAwkAAAIFC3RvdGFsU3Rha2VkAAAJASJJbmNyZW1lbnROb3REaXN0cmlidXRlZFJld2FyZEVudHJ5AgUNcG10QXNzZXRJZFN0cgUGYW1vdW50BBByZXdhcmRQZXJOc2J0WDE4CQC8AgMFB2Ftb3VudFgFB01VTFRYMTgFDHRvdGFsU3Rha2VkWAQRZGVwb3NpdE51bUxhc3RLRVkJARFrZXlEZXBvc2l0TnVtTGFzdAAEDmRlcG9zaXROdW1MYXN0CQEMZ2V0SW50T3JFbHNlAgURZGVwb3NpdE51bUxhc3RLRVkA////////////AQQNZGVwb3NpdE51bU5ldwkAZAIFDmRlcG9zaXROdW1MYXN0AAEDCQEBIQEJAQhjb250YWlucwIFEnN1cHBvcnRlZEFzc2V0c1N0cgUNcG10QXNzZXRJZFN0cgkAAgEJAKwCAgkArAICBRJzdXBwb3J0ZWRBc3NldHNTdHICESBkb2Vzbid0IGNvbnRhaW4gBQ1wbXRBc3NldElkU3RyCgEXcmVmcmVzaFJld2FyZFBlck5zYnRTVU0CBWFjY3VtCW5leHRBc3NldAQWcmV3YXJkUGVyTnNidFN1bU5ld0tFWQkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDWRlcG9zaXROdW1OZXcFCW5leHRBc3NldAQKc3VtTGFzdFN0cgkBDGdldFN0ck9yRWxzZQIJARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCBQ5kZXBvc2l0TnVtTGFzdAUJbmV4dEFzc2V0AgEwCQDNCAIFBWFjY3VtAwkAAAIFCW5leHRBc3NldAUNcG10QXNzZXRJZFN0cgkBC1N0cmluZ0VudHJ5AgUWcmV3YXJkUGVyTnNidFN1bU5ld0tFWQkApgMBCQC3AgIJAKcDAQUKc3VtTGFzdFN0cgUQcmV3YXJkUGVyTnNidFgxOAkBC1N0cmluZ0VudHJ5AgUWcmV3YXJkUGVyTnNidFN1bU5ld0tFWQUKc3VtTGFzdFN0cgkAzQgCCgACJGwFE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBF3JlZnJlc2hSZXdhcmRQZXJOc2J0U1VNAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQEMSW50ZWdlckVudHJ5AgURZGVwb3NpdE51bUxhc3RLRVkFDWRlcG9zaXROdW1OZXcBaQEMY2xhaW1SZXdhcmRzAAkBC2NvbW1vbkNsYWltAggFAWkGY2FsbGVyBQFpAWkBGmNsYWltUmV3YXJkc0J5T3JpZ2luQ2FsbGVyAAkBC2NvbW1vbkNsYWltAggFAWkMb3JpZ2luQ2FsbGVyBQFpAWkBGHVuY2xhaW1lZFJld2FyZHNSRUFET05MWQEOdXNlckFkZHJlc3NTdHIKARZmb3JFYWNoQXNzZXRaZXJvUmV3YXJkAgVhY2N1bQVhc3NldAkArAICCQCsAgIFBWFjY3VtCQC5CQIJAMwIAgUFYXNzZXQJAMwIAgIBMAkAzAgCAgEwBQNuaWwCAToCAV8EEnVuY2xhaW1lZFJld2FyZFN0cgMJAAACBQ51c2VyQWRkcmVzc1N0cgIACgACJGwFE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBFmZvckVhY2hBc3NldFplcm9SZXdhcmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoEC3VzZXJBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBQ51c2VyQWRkcmVzc1N0cgQNJHQwMTk2MjAxOTcyNQkBC3ZhbHVlT3JFbHNlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkAlQoDBgAAAAAECWlzTmV3VXNlcggFDSR0MDE5NjIwMTk3MjUCXzEEDHN0YWtlZEFtb3VudAgFDSR0MDE5NjIwMTk3MjUCXzIEDHN0YWtpbmdTdGFydAgFDSR0MDE5NjIwMTk3MjUCXzMEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQ51c2VyQWRkcmVzc1N0cgQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgVhY2N1bQVhc3NldAQNJHQwMjAwNzEyMDIwOQkBCmNhbGNSZXdhcmQFBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQFDXN0YWtlZEFtb3VudFgFDmRlcG9zaXROdW1Vc2VyBQ5kZXBvc2l0TnVtTGFzdAQLcmV3YXJkVG90YWwIBQ0kdDAyMDA3MTIwMjA5Al8xBAZjYWNoZWQIBQ0kdDAyMDA3MTIwMjA5Al8yBAdkeW5hbWljCAUNJHQwMjAwNzEyMDIwOQJfMwQTcmV3YXJkQ2FjaGVkUGFydEtFWQgFDSR0MDIwMDcxMjAyMDkCXzQEB2NsYWltZWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBCmtleUNsYWltZWQCBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQAAAkArAICCQCsAgIFBWFjY3VtCQC5CQIJAMwIAgUFYXNzZXQJAMwIAgkApAMBBQtyZXdhcmRUb3RhbAkAzAgCCQCkAwEFB2NsYWltZWQFA25pbAIBOgIBXwoAAiRsBRNzdXBwb3J0ZWRBc3NldHNMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQCUCgIFA25pbAkAswICBRJ1bmNsYWltZWRSZXdhcmRTdHIAAQFpARZzdXJmU3Rha2luZ1NZU1JFQURPTkxZAhV1c2VyQWRkcmVzc1N0ck9yRW1wdHkIc3VyZkRpZmYECXN1cmZUb3RhbAkBDGdldEludE9yRWxzZQIJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAAAAQSZ25zYnRGcm9tU3VyZlRvdGFsCQELc3VyZlRvR25zYnQBBQlzdXJmVG90YWwDCQAAAgUVdXNlckFkZHJlc3NTdHJPckVtcHR5AgAJAJQKAgUDbmlsCQDMCAIAAAkAzAgCBQlzdXJmVG90YWwJAMwIAgAACQDMCAIFEmduc2J0RnJvbVN1cmZUb3RhbAkAzAgCAAAJAMwIAgUGaGVpZ2h0CQDMCAIFBmhlaWdodAUDbmlsBAt1c2VyQWRkcmVzcwkBD3RvQWRkcmVzc09yRmFpbAEFFXVzZXJBZGRyZXNzU3RyT3JFbXB0eQQKbWVyZ2VkRGF0YQkBCm1lcmdlU3Rha2UCBQt1c2VyQWRkcmVzcwUIc3VyZkRpZmYECWlzTmV3VXNlcggFCm1lcmdlZERhdGECXzEEDHN0YWtlZEFtb3VudAgFCm1lcmdlZERhdGECXzIEEXZwRWZmZWN0aXZlSGVpZ2h0CAUKbWVyZ2VkRGF0YQJfMwQPc3Rha2VkQW1vdW50TkVXCAUKbWVyZ2VkRGF0YQJfNAQUdnBFZmZlY3RpdmVIZWlnaHRORVcIBQptZXJnZWREYXRhAl81BAhzdXJmVXNlcgUMc3Rha2VkQW1vdW50BBFnbnNidEZyb21TdXJmVXNlcgkBC3N1cmZUb0duc2J0AQUIc3VyZlVzZXIJAJQKAgUDbmlsCQDMCAIFCHN1cmZVc2VyCQDMCAIFCXN1cmZUb3RhbAkAzAgCBRFnbnNidEZyb21TdXJmVXNlcgkAzAgCBRJnbnNidEZyb21TdXJmVG90YWwJAMwIAgURdnBFZmZlY3RpdmVIZWlnaHQJAMwIAgUUdnBFZmZlY3RpdmVIZWlnaHRORVcFA25pbAFpARFjb25maWdTWVNSRUFET05MWQAECm1pbkxvY2tBbXQJARFAZXh0ck5hdGl2ZSgxMDU1KQEJARBrZXlNaW5Mb2NrQW1vdW50AAQSZ25zYnRGcm9tU3VyZkNvZWZmCQBoAgA8BQVNVUxUNgQgc3VyZlZvdGluZ1Bvd2VyUmVzdHJpY3RpdmVQZXJpb2QJAGgCAKALAA4EG2JyVG9TdGFydFN1cmZUcmFuc2Zvcm1hdGlvbgCwmEYJAJQKAgUDbmlsCQDMCAIFCm1pbkxvY2tBbXQJAMwIAgUSZ25zYnRGcm9tU3VyZkNvZWZmCQDMCAIFIHN1cmZWb3RpbmdQb3dlclJlc3RyaWN0aXZlUGVyaW9kCQDMCAIFG2JyVG9TdGFydFN1cmZUcmFuc2Zvcm1hdGlvbgUDbmlsAKfFJNE=",
    "chainId": 84,
    "height": 2170690,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5HtetvPxVF4qncRXZvhm9D3z1uCBUy7ehSNoELQHYnro
Next: BpFBPt4RYhW9VKevUY1B1p2diT7NWx66HPzzCB9PHuKf

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 IdxControlCfgNeutrinoDapp = 1
23 23  
24 24  let IdxControlCfgAuctionDapp = 2
25 25  
26 26  let IdxControlCfgRpdDapp = 3
27 27  
28 28  let IdxControlCfgMathDapp = 4
29 29  
30 30  let IdxControlCfgLiquidationDapp = 5
31 31  
32 32  let IdxControlCfgRestDapp = 6
33 33  
34 34  let IdxControlCfgNodeRegistryDapp = 7
35 35  
36 36  let IdxControlCfgNsbtStakingDapp = 8
37 37  
38 38  let IdxControlCfgMediatorDapp = 9
39 39  
40 40  let IdxControlCfgSurfStakingDapp = 10
41 41  
42 42  let IdxControlCfgGnsbtControllerDapp = 11
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(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  func keyBondAsset () = "bond_asset_id"
70 70  
71 71  
72 72  func keyAuctionContractAddress () = "auction_contract"
73 73  
74 74  
75 75  func keyMinLockAmount () = "%s__minLockAmount"
76 76  
77 77  
78 78  func keyStakedAssetId () = "%s__stakedAssetId"
79 79  
80 80  
81 81  func keyLockParamUserAmount (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "amount"], separator)
82 82  
83 83  
84 84  func keyLockParamStartBlock (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "start"], separator)
85 85  
86 86  
87 87  func keyLockParamVotingPowerEffectiveHeight (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "vpEffectiveHeight"], separator)
88 88  
89 89  
90 90  func keyHistoryRecord (type,userAddress,txId) = makeString(["%s%s%s%s", "history", type, toString(userAddress), toBase58String(txId)], separator)
91 91  
92 92  
93 93  func keyLockParamTotalAmount () = makeString(["%s%s", "stats", "activeTotalLocked"], separator)
94 94  
95 95  
96 96  func keyStatsLocksCount () = makeString(["%s%s", "stats", "locksCount"], separator)
97 97  
98 98  
99 99  func keyStatsUsersCount () = makeString(["%s%s", "stats", "activeUsersCount"], separator)
100 100  
101 101  
102 102  func keyNextPeriod () = "%s__nextPeriod"
103 103  
104 104  
105 105  func keySupportedRewardAssets () = "supportedRewardAssets"
106 106  
107 107  
108 108  func keyDepositNumLast () = makeString(["%s%s%s", "dep", "lastNum"], separator)
109 109  
110 110  
111 111  func keyUserRewardFromDepositNum (userAddress) = makeString(["%s%s%s", "userRwdFromDepNum", userAddress], separator)
112 112  
113 113  
114 114  func keyRewardPerNsbtSumAt (depositNum,tkn) = makeString(["%s%d", "rwdPerNsbtSumByDepNum", toString(depositNum), tkn], separator)
115 115  
116 116  
117 117  func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
118 118  
119 119  
120 120  func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
121 121  
122 122  
123 123  func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
124 124  
125 125  
126 126  func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
127 127  
128 128  
129 129  func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
130 130  
131 131  
132 132  func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
133 133  
134 134  
135 135  func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
136 136  
137 137  
138 138  func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
139 139  
140 140  
141 141  func toAddressOrFail (addressStr) = valueOrErrorMessage(addressFromString(addressStr), ("couldn't parse passed addressStr=" + addressStr))
142 142  
143 143  
144 144  func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
145 145      then unit
146 146      else fromBase58String(assetStr)
147 147  
148 148  
149 149  func asInt (val) = match val {
150 150      case valInt: Int => 
151 151          valInt
152 152      case _ => 
153 153          throw("fail to cast into Int")
154 154  }
155 155  
156 156  
157 157  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)
158 158  
159 159  
160 160  func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
161 161  
162 162  
163 163  func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
164 164  
165 165  
166 166  func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
167 167  
168 168  
169 169  func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
170 170      let locksCount = getIntOrZero(keyStatsLocksCount())
171 171      let usersCount = getIntOrZero(keyStatsUsersCount())
172 172      let totalAmount = getIntOrZero(keyLockParamTotalAmount())
173 173      let totalAmountNew = (totalAmount + totalLockedInc)
174 174      $Tuple3([IntegerEntry(keyStatsLocksCount(), (locksCount + lockCountInc)), IntegerEntry(keyStatsUsersCount(), (usersCount + usersCountInc)), IntegerEntry(keyLockParamTotalAmount(), totalAmountNew)], totalAmount, totalAmountNew)
175 175      }
176 176  
177 177  
178 178  func LockParamsEntry (userAddress,amount,votingPowerEffectiveHeight) = [IntegerEntry(keyLockParamUserAmount(userAddress), amount), IntegerEntry(keyLockParamStartBlock(userAddress), votingPowerEffectiveHeight)]
179 179  
180 180  
181 181  func getParamsOrFail () = $Tuple2(fromBase58String(getStringOrFail(this, keyStakedAssetId())), getIntOrFail(keyMinLockAmount()))
182 182  
183 183  
184 184  func isActiveUser (userAddress) = (getIntOrElse(keyLockParamUserAmount(userAddress), 0) > 0)
185 185  
186 186  
187 187  func getUserParamsOrUnit (userAddress) = if (isActiveUser(userAddress))
188 188      then $Tuple3(false, getIntOrFail(keyLockParamUserAmount(userAddress)), getIntOrFail(keyLockParamStartBlock(userAddress)))
189 189      else unit
190 190  
191 191  
192 192  func getUserParamsOrFail (userAddress) = valueOrErrorMessage(getUserParamsOrUnit(userAddress), (("User " + toString(userAddress)) + " is not defined"))
193 193  
194 194  
195 195  let supportedAssetsStr = getStrOrElse(keySupportedRewardAssets(), "")
196 196  
197 197  let supportedAssetsList = split(supportedAssetsStr, "_")
198 198  
199 199  func calcReward (userAddress,assetId,stakedAmountX,depositNumUser,depositNumLast) = {
200 200      let rewardPerNsbtSumLastKEY = keyRewardPerNsbtSumAt(depositNumLast, assetId)
201 201      let sumLastX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, assetId), "0"))
202 202      let sumUserX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumUser, assetId), "0"))
203 203      let rewardDynamicPart = toInt(fraction((sumLastX18 - sumUserX18), stakedAmountX, MULTX18))
204 204      let rewardCachedPartKEY = keyReward(userAddress, assetId)
205 205      let rewardCachedPart = getIntOrElse(rewardCachedPartKEY, 0)
206 206      $Tuple4((rewardCachedPart + rewardDynamicPart), rewardCachedPart, rewardDynamicPart, rewardCachedPartKEY)
207 207      }
208 208  
209 209  
210 210  func RewardEntries (isNewUser,userAddress,stakedAmount) = {
211 211      let stakedAmountX = toBigInt(stakedAmount)
212 212      let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
213 213      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
214 214      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
215 215      func forEachAssetCacheUserReward (accum,asset) =     {
216 216          let $t086398774 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
217 217          let rewardTotal = $t086398774._1
218 218          let cached = $t086398774._2
219 219          let dynamic = $t086398774._3
220 220          let rewardCachedPartKEY = $t086398774._4
221 221          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
222 222          }
223 223  
224 224      if (if ((depositNumLast == -1))
225 225          then (depositNumUser == -1)
226 226          else false)
227 227          then nil
228 228          else if (if ((depositNumLast == -1))
229 229              then (depositNumUser > -1)
230 230              else false)
231 231              then throw("invalid depositNumLast and depositNumUser state")
232 232              else if (if ((depositNumLast > -1))
233 233                  then (depositNumUser >= -1)
234 234                  else false)
235 235                  then if (isNewUser)
236 236                      then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
237 237                      else ({
238 238                          let $l = supportedAssetsList
239 239                          let $s = size($l)
240 240                          let $acc0 = nil
241 241                          func $f0_1 ($a,$i) =                         if (($i >= $s))
242 242                              then $a
243 243                              else forEachAssetCacheUserReward($a, $l[$i])
244 244  
245 245                          func $f0_2 ($a,$i) =                         if (($i >= $s))
246 246                              then $a
247 247                              else throw("List size exceeds 10")
248 248  
249 249                          $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)
250 250                          } :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
251 251                  else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
252 252      }
253 253  
254 254  
255 255  func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
256 256      let notDistributedRewardKEY = keyNotDistributedReward(tkn)
257 257      let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
258 258  [IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))]
259 259      }
260 260  
261 261  
262 262  func surfToGnsbt (surfAmt) = (surfAmt / 60)
263 263  
264 264  
265 265  func mergeVotingPowerEffectiveHeight (quarantinePeriod,vpEffectiveHeight,stakedAmt,stakedAmtNEW) = {
266 266      let remainingToWait = (vpEffectiveHeight - height)
267 267      if ((0 >= remainingToWait))
268 268          then (height + quarantinePeriod)
269 269          else {
270 270              let alreadyWaited = (quarantinePeriod - remainingToWait)
271 271              let kX8 = fraction(stakedAmt, MULT8, stakedAmtNEW)
272 272              ((quarantinePeriod + height) - fraction(alreadyWaited, kX8, MULT8))
273 273              }
274 274      }
275 275  
276 276  
277 277  func mergeStake (userAddress,amountToAdd) = {
278 278      let $t01236712477 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
279 279      let isNewUser = $t01236712477._1
280 280      let stakedAmount = $t01236712477._2
281 281      let vpEffectiveHeight = $t01236712477._3
282 282      let stakedAmountNEW = if (isNewUser)
283 283          then amountToAdd
284 284          else (amountToAdd + stakedAmount)
285 285      let quarantinePeriod = (1440 * 14)
286 286      let vpEffectiveHeightNEW = if (isNewUser)
287 287          then (quarantinePeriod + height)
288 288          else mergeVotingPowerEffectiveHeight(quarantinePeriod, vpEffectiveHeight, stakedAmount, stakedAmountNEW)
289 289      $Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)
290 290      }
291 291  
292 292  
293 293  func commonStake (userAddress,i) = {
294 294      let $t01296313017 = getParamsOrFail()
295 295      let stakedAssetId = $t01296313017._1
296 296      let minLockAmount = $t01296313017._2
297 297      if ((size(i.payments) != 1))
298 298          then throw("Invalid payments size")
299 299          else {
300 300              let payment = i.payments[0]
301 301              let amount = payment.amount
302 302              let invalidAssetMessage = (("Invalid asset. " + toBase58String(stakedAssetId)) + " is expected")
303 303              let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
304 304              if ((assetId != stakedAssetId))
305 305                  then throw(invalidAssetMessage)
306 306                  else {
307 307                      let userAddressStr = toString(userAddress)
308 308                      let mergedData = mergeStake(userAddress, amount)
309 309                      let isNewUser = mergedData._1
310 310                      let stakedAmount = mergedData._2
311 311                      let vpEffectiveHeight = mergedData._3
312 312                      let stakedAmountNEW = mergedData._4
313 313                      let vpEffectiveHeightNEW = mergedData._5
314 314                      if ((minLockAmount > stakedAmountNEW))
315 315                          then throw(("Min lock amount is " + toString(minLockAmount)))
316 316                          else {
317 317                              let $t01381613918 = StatsResult(amount, 1, if (isNewUser)
318 318                                  then 1
319 319                                  else 0)
320 320                              let statsEntries = $t01381613918._1
321 321                              let totalStaked = $t01381613918._2
322 322                              let totalStakedNew = $t01381613918._3
323 323                              ((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries)
324 324                              }
325 325                      }
326 326              }
327 327      }
328 328  
329 329  
330 330  func commonClaim (userAddress,i) = {
331 331      let userAddressStr = toString(userAddress)
332 332      if ((size(i.payments) > 0))
333 333          then throw("payments are not accepted")
334 334          else {
335 335              let $t01439714502 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
336 336              let isNewUser = $t01439714502._1
337 337              let stakedAmount = $t01439714502._2
338 338              let stakingStart = $t01439714502._3
339 339              let stakedAmountX = toBigInt(stakedAmount)
340 340              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
341 341              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
342 342              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
343 343              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
344 344                  let $t01487315011 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
345 345                  let rewardTotal = $t01487315011._1
346 346                  let cached = $t01487315011._2
347 347                  let dynamic = $t01487315011._3
348 348                  let rewardCachedPartKEY = $t01487315011._4
349 349                  let claimedKEY = keyClaimed(userAddressStr, asset)
350 350                  let $t01507115108 = accum
351 351                  let data = $t01507115108._1
352 352                  let claimedAmtByAsset = $t01507115108._2
353 353                  let newPart = makeString([asset, toString(rewardTotal)], ":")
354 354                  let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
355 355                  if ((0 >= rewardTotal))
356 356                      then $Tuple2(data, claimedAmtByAssetNew)
357 357                      else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
358 358                  }
359 359  
360 360              let $t01556815682 = {
361 361                  let $l = supportedAssetsList
362 362                  let $s = size($l)
363 363                  let $acc0 = $Tuple2(nil, "")
364 364                  func $f0_1 ($a,$i) =                 if (($i >= $s))
365 365                      then $a
366 366                      else forEachAssetCalcUnclaimedReward($a, $l[$i])
367 367  
368 368                  func $f0_2 ($a,$i) =                 if (($i >= $s))
369 369                      then $a
370 370                      else throw("List size exceeds 10")
371 371  
372 372                  $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)
373 373                  }
374 374              let transfers = $t01556815682._1
375 375              let claimedAmtByAssetResult = $t01556815682._2
376 376              if ((0 >= size(transfers)))
377 377                  then nil
378 378                  else ((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1)))
379 379              }
380 380      }
381 381  
382 382  
383 383  @Callable(i)
384 384  func constructor (minLockAmount,supportedRewardAssets,stakedAssetId) = if ((i.caller != this))
385 385      then throw("Permission denied")
386 386      else [IntegerEntry(keyMinLockAmount(), minLockAmount), StringEntry(keySupportedRewardAssets(), supportedRewardAssets), StringEntry(keyStakedAssetId(), stakedAssetId)]
387 387  
388 388  
389 389  
390 390  @Callable(i)
391 391  func stake () = commonStake(i.caller, i)
392 392  
393 393  
394 394  
395 395  @Callable(i)
396 396  func stakeByOriginCaller () = commonStake(i.originCaller, i)
397 397  
398 398  
399 399  
400 400  @Callable(i)
401 401  func unstake (amount) = if ((size(i.payments) != 0))
402 402      then throw("unstake doesn't require any payment")
403 403      else {
404 404          let userAddress = i.caller
405 405          let userAddressStr = toString(userAddress)
406 406          let $t01659116645 = getParamsOrFail()
407 407          let stakedAssetId = $t01659116645._1
408 408          let minLockAmount = $t01659116645._2
409 409          let $t01664816722 = getUserParamsOrFail(userAddress)
410 410          let isNewUser = $t01664816722._1
411 411          let lockAmount = $t01664816722._2
412 412          let lockStart = $t01664816722._3
413 413          if ((0 >= lockAmount))
414 414              then throw("Nothing to unstake")
415 415              else if ((amount > lockAmount))
416 416                  then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(lockAmount)))
417 417                  else {
418 418                      let $t01691217066 = StatsResult(-(amount), if ((amount == lockAmount))
419 419                          then -1
420 420                          else 0, if ((amount == lockAmount))
421 421                          then -1
422 422                          else 0)
423 423                      let statsEntries = $t01691217066._1
424 424                      let totalStaked = $t01691217066._2
425 425                      let totalStakedNew = $t01691217066._3
426 426                      ((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
427 427                      }
428 428          }
429 429  
430 430  
431 431  
432 432  @Callable(i)
433 433  func deposit () = if ((size(i.payments) != 1))
434 434      then throw("exact 1 payment is allowed only")
435 435      else {
436 436          let pmt = i.payments[0]
437 437          let amount = pmt.amount
438 438          let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
439 439          let pmtAssetIdStr = toBase58String(pmtAssetId)
440 440          let pmtMultX = if ((pmtAssetId == WAVESID))
441 441              then MULTX8
442 442              else MULTX6
443 443          let amountX = toBigInt(amount)
444 444          let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
445 445          let totalStakedX = toBigInt(totalStaked)
446 446          if ((0 > totalStaked))
447 447              then throw("TODO: case is not supported")
448 448              else if ((totalStaked == 0))
449 449                  then IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)
450 450                  else {
451 451                      let rewardPerNsbtX18 = fraction(amountX, MULTX18, totalStakedX)
452 452                      let depositNumLastKEY = keyDepositNumLast()
453 453                      let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
454 454                      let depositNumNew = (depositNumLast + 1)
455 455                      if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
456 456                          then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
457 457                          else {
458 458                              func refreshRewardPerNsbtSUM (accum,nextAsset) =                             {
459 459                                  let rewardPerNsbtSumNewKEY = keyRewardPerNsbtSumAt(depositNumNew, nextAsset)
460 460                                  let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
461 461                                  (accum :+ (if ((nextAsset == pmtAssetIdStr))
462 462                                      then StringEntry(rewardPerNsbtSumNewKEY, toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18)))
463 463                                      else StringEntry(rewardPerNsbtSumNewKEY, sumLastStr)))
464 464                                  }
465 465  
466 466                              ({
467 467                                  let $l = supportedAssetsList
468 468                                  let $s = size($l)
469 469                                  let $acc0 = nil
470 470                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
471 471                                      then $a
472 472                                      else refreshRewardPerNsbtSUM($a, $l[$i])
473 473  
474 474                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
475 475                                      then $a
476 476                                      else throw("List size exceeds 10")
477 477  
478 478                                  $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)
479 479                                  } :+ IntegerEntry(depositNumLastKEY, depositNumNew))
480 480                              }
481 481                      }
482 482          }
483 483  
484 484  
485 485  
486 486  @Callable(i)
487 487  func claimRewards () = commonClaim(i.caller, i)
488 488  
489 489  
490 490  
491 491  @Callable(i)
492 492  func claimRewardsByOriginCaller () = commonClaim(i.originCaller, i)
493 493  
494 494  
495 495  
496 496  @Callable(i)
497 497  func unclaimedRewardsREADONLY (userAddressStr) = {
498 498      func forEachAssetZeroReward (accum,asset) =     ((accum + makeString([asset, "0", "0"], ":")) + "_")
499 499  
500 500      let unclaimedRewardStr = if ((userAddressStr == ""))
501 501          then {
502 502              let $l = supportedAssetsList
503 503              let $s = size($l)
504 504              let $acc0 = ""
505 505              func $f0_1 ($a,$i) =             if (($i >= $s))
506 506                  then $a
507 507                  else forEachAssetZeroReward($a, $l[$i])
508 508  
509 509              func $f0_2 ($a,$i) =             if (($i >= $s))
510 510                  then $a
511 511                  else throw("List size exceeds 10")
512 512  
513 513              $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)
514 514              }
515 515          else {
516 516              let userAddress = addressFromStringValue(userAddressStr)
517 517              let $t01962019725 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
518 518              let isNewUser = $t01962019725._1
519 519              let stakedAmount = $t01962019725._2
520 520              let stakingStart = $t01962019725._3
521 521              let stakedAmountX = toBigInt(stakedAmount)
522 522              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
523 523              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
524 524              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
525 525              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
526 526                  let $t02007120209 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
527 527                  let rewardTotal = $t02007120209._1
528 528                  let cached = $t02007120209._2
529 529                  let dynamic = $t02007120209._3
530 530                  let rewardCachedPartKEY = $t02007120209._4
531 531                  let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
532 532                  ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
533 533                  }
534 534  
535 535              let $l = supportedAssetsList
536 536              let $s = size($l)
537 537              let $acc0 = ""
538 538              func $f0_1 ($a,$i) =             if (($i >= $s))
539 539                  then $a
540 540                  else forEachAssetCalcUnclaimedReward($a, $l[$i])
541 541  
542 542              func $f0_2 ($a,$i) =             if (($i >= $s))
543 543                  then $a
544 544                  else throw("List size exceeds 10")
545 545  
546 546              $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)
547 547              }
548 548      $Tuple2(nil, dropRight(unclaimedRewardStr, 1))
549 549      }
550 550  
551 551  
552 552  
553 553  @Callable(i)
554 554  func surfStakingSYSREADONLY (userAddressStrOrEmpty,surfDiff) = {
555 555      let surfTotal = getIntOrElse(keyLockParamTotalAmount(), 0)
556 556      let gnsbtFromSurfTotal = surfToGnsbt(surfTotal)
557 557      if ((userAddressStrOrEmpty == ""))
558 558          then $Tuple2(nil, [0, surfTotal, 0, gnsbtFromSurfTotal, 0, height, height])
559 559          else {
560 560              let userAddress = toAddressOrFail(userAddressStrOrEmpty)
561 561              let mergedData = mergeStake(userAddress, surfDiff)
562 562              let isNewUser = mergedData._1
563 563              let stakedAmount = mergedData._2
564 564              let vpEffectiveHeight = mergedData._3
565 565              let stakedAmountNEW = mergedData._4
566 566              let vpEffectiveHeightNEW = mergedData._5
567 567              let surfUser = stakedAmount
568 568              let gnsbtFromSurfUser = surfToGnsbt(surfUser)
569 569              $Tuple2(nil, [surfUser, surfTotal, gnsbtFromSurfUser, gnsbtFromSurfTotal, vpEffectiveHeight, vpEffectiveHeightNEW])
570 570              }
571 571      }
572 572  
573 573  
574 574  
575 575  @Callable(i)
576 576  func configSYSREADONLY () = {
577 577      let minLockAmt = getIntegerValue(keyMinLockAmount())
578 578      let gnsbtFromSurfCoeff = (60 * MULT6)
579 579      let surfVotingPowerRestrictivePeriod = (1440 * 14)
580 580      let brToStartSurfTransformation = 1150000
581 581      $Tuple2(nil, [minLockAmt, gnsbtFromSurfCoeff, surfVotingPowerRestrictivePeriod, brToStartSurfTransformation])
582 582      }
583 583  
584 584

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 IdxControlCfgNeutrinoDapp = 1
23	23
24	24	let IdxControlCfgAuctionDapp = 2
25	25
26	26	let IdxControlCfgRpdDapp = 3
27	27
28	28	let IdxControlCfgMathDapp = 4
29	29
30	30	let IdxControlCfgLiquidationDapp = 5
31	31
32	32	let IdxControlCfgRestDapp = 6
33	33
34	34	let IdxControlCfgNodeRegistryDapp = 7
35	35
36	36	let IdxControlCfgNsbtStakingDapp = 8
37	37
38	38	let IdxControlCfgMediatorDapp = 9
39	39
40	40	let IdxControlCfgSurfStakingDapp = 10
41	41
42	42	let IdxControlCfgGnsbtControllerDapp = 11
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(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	func keyBondAsset () = "bond_asset_id"
70	70
71	71
72	72	func keyAuctionContractAddress () = "auction_contract"
73	73
74	74
75	75	func keyMinLockAmount () = "%s__minLockAmount"
76	76
77	77
78	78	func keyStakedAssetId () = "%s__stakedAssetId"
79	79
80	80
81	81	func keyLockParamUserAmount (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "amount"], separator)
82	82
83	83
84	84	func keyLockParamStartBlock (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "start"], separator)
85	85
86	86
87	87	func keyLockParamVotingPowerEffectiveHeight (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "vpEffectiveHeight"], separator)
88	88
89	89
90	90	func keyHistoryRecord (type,userAddress,txId) = makeString(["%s%s%s%s", "history", type, toString(userAddress), toBase58String(txId)], separator)
91	91
92	92
93	93	func keyLockParamTotalAmount () = makeString(["%s%s", "stats", "activeTotalLocked"], separator)
94	94
95	95
96	96	func keyStatsLocksCount () = makeString(["%s%s", "stats", "locksCount"], separator)
97	97
98	98
99	99	func keyStatsUsersCount () = makeString(["%s%s", "stats", "activeUsersCount"], separator)
100	100
101	101
102	102	func keyNextPeriod () = "%s__nextPeriod"
103	103
104	104
105	105	func keySupportedRewardAssets () = "supportedRewardAssets"
106	106
107	107
108	108	func keyDepositNumLast () = makeString(["%s%s%s", "dep", "lastNum"], separator)
109	109
110	110
111	111	func keyUserRewardFromDepositNum (userAddress) = makeString(["%s%s%s", "userRwdFromDepNum", userAddress], separator)
112	112
113	113
114	114	func keyRewardPerNsbtSumAt (depositNum,tkn) = makeString(["%s%d", "rwdPerNsbtSumByDepNum", toString(depositNum), tkn], separator)
115	115
116	116
117	117	func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
118	118
119	119
120	120	func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
121	121
122	122
123	123	func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
124	124
125	125
126	126	func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
127	127
128	128
129	129	func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
130	130
131	131
132	132	func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
133	133
134	134
135	135	func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
136	136
137	137
138	138	func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
139	139
140	140
141	141	func toAddressOrFail (addressStr) = valueOrErrorMessage(addressFromString(addressStr), ("couldn't parse passed addressStr=" + addressStr))
142	142
143	143
144	144	func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
145	145	then unit
146	146	else fromBase58String(assetStr)
147	147
148	148
149	149	func asInt (val) = match val {
150	150	case valInt: Int =>
151	151	valInt
152	152	case _ =>
153	153	throw("fail to cast into Int")
154	154	}
155	155
156	156
157	157	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)
158	158
159	159
160	160	func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
161	161
162	162
163	163	func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
164	164
165	165
166	166	func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
167	167
168	168
169	169	func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
170	170	let locksCount = getIntOrZero(keyStatsLocksCount())
171	171	let usersCount = getIntOrZero(keyStatsUsersCount())
172	172	let totalAmount = getIntOrZero(keyLockParamTotalAmount())
173	173	let totalAmountNew = (totalAmount + totalLockedInc)
174	174	$Tuple3([IntegerEntry(keyStatsLocksCount(), (locksCount + lockCountInc)), IntegerEntry(keyStatsUsersCount(), (usersCount + usersCountInc)), IntegerEntry(keyLockParamTotalAmount(), totalAmountNew)], totalAmount, totalAmountNew)
175	175	}
176	176
177	177
178	178	func LockParamsEntry (userAddress,amount,votingPowerEffectiveHeight) = [IntegerEntry(keyLockParamUserAmount(userAddress), amount), IntegerEntry(keyLockParamStartBlock(userAddress), votingPowerEffectiveHeight)]
179	179
180	180
181	181	func getParamsOrFail () = $Tuple2(fromBase58String(getStringOrFail(this, keyStakedAssetId())), getIntOrFail(keyMinLockAmount()))
182	182
183	183
184	184	func isActiveUser (userAddress) = (getIntOrElse(keyLockParamUserAmount(userAddress), 0) > 0)
185	185
186	186
187	187	func getUserParamsOrUnit (userAddress) = if (isActiveUser(userAddress))
188	188	then $Tuple3(false, getIntOrFail(keyLockParamUserAmount(userAddress)), getIntOrFail(keyLockParamStartBlock(userAddress)))
189	189	else unit
190	190
191	191
192	192	func getUserParamsOrFail (userAddress) = valueOrErrorMessage(getUserParamsOrUnit(userAddress), (("User " + toString(userAddress)) + " is not defined"))
193	193
194	194
195	195	let supportedAssetsStr = getStrOrElse(keySupportedRewardAssets(), "")
196	196
197	197	let supportedAssetsList = split(supportedAssetsStr, "_")
198	198
199	199	func calcReward (userAddress,assetId,stakedAmountX,depositNumUser,depositNumLast) = {
200	200	let rewardPerNsbtSumLastKEY = keyRewardPerNsbtSumAt(depositNumLast, assetId)
201	201	let sumLastX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, assetId), "0"))
202	202	let sumUserX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumUser, assetId), "0"))
203	203	let rewardDynamicPart = toInt(fraction((sumLastX18 - sumUserX18), stakedAmountX, MULTX18))
204	204	let rewardCachedPartKEY = keyReward(userAddress, assetId)
205	205	let rewardCachedPart = getIntOrElse(rewardCachedPartKEY, 0)
206	206	$Tuple4((rewardCachedPart + rewardDynamicPart), rewardCachedPart, rewardDynamicPart, rewardCachedPartKEY)
207	207	}
208	208
209	209
210	210	func RewardEntries (isNewUser,userAddress,stakedAmount) = {
211	211	let stakedAmountX = toBigInt(stakedAmount)
212	212	let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
213	213	let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
214	214	let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
215	215	func forEachAssetCacheUserReward (accum,asset) = {
216	216	let $t086398774 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
217	217	let rewardTotal = $t086398774._1
218	218	let cached = $t086398774._2
219	219	let dynamic = $t086398774._3
220	220	let rewardCachedPartKEY = $t086398774._4
221	221	(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
222	222	}
223	223
224	224	if (if ((depositNumLast == -1))
225	225	then (depositNumUser == -1)
226	226	else false)
227	227	then nil
228	228	else if (if ((depositNumLast == -1))
229	229	then (depositNumUser > -1)
230	230	else false)
231	231	then throw("invalid depositNumLast and depositNumUser state")
232	232	else if (if ((depositNumLast > -1))
233	233	then (depositNumUser >= -1)
234	234	else false)
235	235	then if (isNewUser)
236	236	then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
237	237	else ({
238	238	let $l = supportedAssetsList
239	239	let $s = size($l)
240	240	let $acc0 = nil
241	241	func $f0_1 ($a,$i) = if (($i >= $s))
242	242	then $a
243	243	else forEachAssetCacheUserReward($a, $l[$i])
244	244
245	245	func $f0_2 ($a,$i) = if (($i >= $s))
246	246	then $a
247	247	else throw("List size exceeds 10")
248	248
249	249	$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)
250	250	} :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
251	251	else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
252	252	}
253	253
254	254
255	255	func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
256	256	let notDistributedRewardKEY = keyNotDistributedReward(tkn)
257	257	let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
258	258	[IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))]
259	259	}
260	260
261	261
262	262	func surfToGnsbt (surfAmt) = (surfAmt / 60)
263	263
264	264
265	265	func mergeVotingPowerEffectiveHeight (quarantinePeriod,vpEffectiveHeight,stakedAmt,stakedAmtNEW) = {
266	266	let remainingToWait = (vpEffectiveHeight - height)
267	267	if ((0 >= remainingToWait))
268	268	then (height + quarantinePeriod)
269	269	else {
270	270	let alreadyWaited = (quarantinePeriod - remainingToWait)
271	271	let kX8 = fraction(stakedAmt, MULT8, stakedAmtNEW)
272	272	((quarantinePeriod + height) - fraction(alreadyWaited, kX8, MULT8))
273	273	}
274	274	}
275	275
276	276
277	277	func mergeStake (userAddress,amountToAdd) = {
278	278	let $t01236712477 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
279	279	let isNewUser = $t01236712477._1
280	280	let stakedAmount = $t01236712477._2
281	281	let vpEffectiveHeight = $t01236712477._3
282	282	let stakedAmountNEW = if (isNewUser)
283	283	then amountToAdd
284	284	else (amountToAdd + stakedAmount)
285	285	let quarantinePeriod = (1440 * 14)
286	286	let vpEffectiveHeightNEW = if (isNewUser)
287	287	then (quarantinePeriod + height)
288	288	else mergeVotingPowerEffectiveHeight(quarantinePeriod, vpEffectiveHeight, stakedAmount, stakedAmountNEW)
289	289	$Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)
290	290	}
291	291
292	292
293	293	func commonStake (userAddress,i) = {
294	294	let $t01296313017 = getParamsOrFail()
295	295	let stakedAssetId = $t01296313017._1
296	296	let minLockAmount = $t01296313017._2
297	297	if ((size(i.payments) != 1))
298	298	then throw("Invalid payments size")
299	299	else {
300	300	let payment = i.payments[0]
301	301	let amount = payment.amount
302	302	let invalidAssetMessage = (("Invalid asset. " + toBase58String(stakedAssetId)) + " is expected")
303	303	let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
304	304	if ((assetId != stakedAssetId))
305	305	then throw(invalidAssetMessage)
306	306	else {
307	307	let userAddressStr = toString(userAddress)
308	308	let mergedData = mergeStake(userAddress, amount)
309	309	let isNewUser = mergedData._1
310	310	let stakedAmount = mergedData._2
311	311	let vpEffectiveHeight = mergedData._3
312	312	let stakedAmountNEW = mergedData._4
313	313	let vpEffectiveHeightNEW = mergedData._5
314	314	if ((minLockAmount > stakedAmountNEW))
315	315	then throw(("Min lock amount is " + toString(minLockAmount)))
316	316	else {
317	317	let $t01381613918 = StatsResult(amount, 1, if (isNewUser)
318	318	then 1
319	319	else 0)
320	320	let statsEntries = $t01381613918._1
321	321	let totalStaked = $t01381613918._2
322	322	let totalStakedNew = $t01381613918._3
323	323	((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries)
324	324	}
325	325	}
326	326	}
327	327	}
328	328
329	329
330	330	func commonClaim (userAddress,i) = {
331	331	let userAddressStr = toString(userAddress)
332	332	if ((size(i.payments) > 0))
333	333	then throw("payments are not accepted")
334	334	else {
335	335	let $t01439714502 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
336	336	let isNewUser = $t01439714502._1
337	337	let stakedAmount = $t01439714502._2
338	338	let stakingStart = $t01439714502._3
339	339	let stakedAmountX = toBigInt(stakedAmount)
340	340	let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
341	341	let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
342	342	let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
343	343	func forEachAssetCalcUnclaimedReward (accum,asset) = {
344	344	let $t01487315011 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
345	345	let rewardTotal = $t01487315011._1
346	346	let cached = $t01487315011._2
347	347	let dynamic = $t01487315011._3
348	348	let rewardCachedPartKEY = $t01487315011._4
349	349	let claimedKEY = keyClaimed(userAddressStr, asset)
350	350	let $t01507115108 = accum
351	351	let data = $t01507115108._1
352	352	let claimedAmtByAsset = $t01507115108._2
353	353	let newPart = makeString([asset, toString(rewardTotal)], ":")
354	354	let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
355	355	if ((0 >= rewardTotal))
356	356	then $Tuple2(data, claimedAmtByAssetNew)
357	357	else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
358	358	}
359	359
360	360	let $t01556815682 = {
361	361	let $l = supportedAssetsList
362	362	let $s = size($l)
363	363	let $acc0 = $Tuple2(nil, "")
364	364	func $f0_1 ($a,$i) = if (($i >= $s))
365	365	then $a
366	366	else forEachAssetCalcUnclaimedReward($a, $l[$i])
367	367
368	368	func $f0_2 ($a,$i) = if (($i >= $s))
369	369	then $a
370	370	else throw("List size exceeds 10")
371	371
372	372	$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)
373	373	}
374	374	let transfers = $t01556815682._1
375	375	let claimedAmtByAssetResult = $t01556815682._2
376	376	if ((0 >= size(transfers)))
377	377	then nil
378	378	else ((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1)))
379	379	}
380	380	}
381	381
382	382
383	383	@Callable(i)
384	384	func constructor (minLockAmount,supportedRewardAssets,stakedAssetId) = if ((i.caller != this))
385	385	then throw("Permission denied")
386	386	else [IntegerEntry(keyMinLockAmount(), minLockAmount), StringEntry(keySupportedRewardAssets(), supportedRewardAssets), StringEntry(keyStakedAssetId(), stakedAssetId)]
387	387
388	388
389	389
390	390	@Callable(i)
391	391	func stake () = commonStake(i.caller, i)
392	392
393	393
394	394
395	395	@Callable(i)
396	396	func stakeByOriginCaller () = commonStake(i.originCaller, i)
397	397
398	398
399	399
400	400	@Callable(i)
401	401	func unstake (amount) = if ((size(i.payments) != 0))
402	402	then throw("unstake doesn't require any payment")
403	403	else {
404	404	let userAddress = i.caller
405	405	let userAddressStr = toString(userAddress)
406	406	let $t01659116645 = getParamsOrFail()
407	407	let stakedAssetId = $t01659116645._1
408	408	let minLockAmount = $t01659116645._2
409	409	let $t01664816722 = getUserParamsOrFail(userAddress)
410	410	let isNewUser = $t01664816722._1
411	411	let lockAmount = $t01664816722._2
412	412	let lockStart = $t01664816722._3
413	413	if ((0 >= lockAmount))
414	414	then throw("Nothing to unstake")
415	415	else if ((amount > lockAmount))
416	416	then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(lockAmount)))
417	417	else {
418	418	let $t01691217066 = StatsResult(-(amount), if ((amount == lockAmount))
419	419	then -1
420	420	else 0, if ((amount == lockAmount))
421	421	then -1
422	422	else 0)
423	423	let statsEntries = $t01691217066._1
424	424	let totalStaked = $t01691217066._2
425	425	let totalStakedNew = $t01691217066._3
426	426	((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, lockAmount, lockStart, (lockAmount - amount), lockStart)] ++ RewardEntries(false, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, (lockAmount - amount), lockStart)) ++ statsEntries)
427	427	}
428	428	}
429	429
430	430
431	431
432	432	@Callable(i)
433	433	func deposit () = if ((size(i.payments) != 1))
434	434	then throw("exact 1 payment is allowed only")
435	435	else {
436	436	let pmt = i.payments[0]
437	437	let amount = pmt.amount
438	438	let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
439	439	let pmtAssetIdStr = toBase58String(pmtAssetId)
440	440	let pmtMultX = if ((pmtAssetId == WAVESID))
441	441	then MULTX8
442	442	else MULTX6
443	443	let amountX = toBigInt(amount)
444	444	let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
445	445	let totalStakedX = toBigInt(totalStaked)
446	446	if ((0 > totalStaked))
447	447	then throw("TODO: case is not supported")
448	448	else if ((totalStaked == 0))
449	449	then IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)
450	450	else {
451	451	let rewardPerNsbtX18 = fraction(amountX, MULTX18, totalStakedX)
452	452	let depositNumLastKEY = keyDepositNumLast()
453	453	let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
454	454	let depositNumNew = (depositNumLast + 1)
455	455	if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
456	456	then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
457	457	else {
458	458	func refreshRewardPerNsbtSUM (accum,nextAsset) = {
459	459	let rewardPerNsbtSumNewKEY = keyRewardPerNsbtSumAt(depositNumNew, nextAsset)
460	460	let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
461	461	(accum :+ (if ((nextAsset == pmtAssetIdStr))
462	462	then StringEntry(rewardPerNsbtSumNewKEY, toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18)))
463	463	else StringEntry(rewardPerNsbtSumNewKEY, sumLastStr)))
464	464	}
465	465
466	466	({
467	467	let $l = supportedAssetsList
468	468	let $s = size($l)
469	469	let $acc0 = nil
470	470	func $f0_1 ($a,$i) = if (($i >= $s))
471	471	then $a
472	472	else refreshRewardPerNsbtSUM($a, $l[$i])
473	473
474	474	func $f0_2 ($a,$i) = if (($i >= $s))
475	475	then $a
476	476	else throw("List size exceeds 10")
477	477
478	478	$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)
479	479	} :+ IntegerEntry(depositNumLastKEY, depositNumNew))
480	480	}
481	481	}
482	482	}
483	483
484	484
485	485
486	486	@Callable(i)
487	487	func claimRewards () = commonClaim(i.caller, i)
488	488
489	489
490	490
491	491	@Callable(i)
492	492	func claimRewardsByOriginCaller () = commonClaim(i.originCaller, i)
493	493
494	494
495	495
496	496	@Callable(i)
497	497	func unclaimedRewardsREADONLY (userAddressStr) = {
498	498	func forEachAssetZeroReward (accum,asset) = ((accum + makeString([asset, "0", "0"], ":")) + "_")
499	499
500	500	let unclaimedRewardStr = if ((userAddressStr == ""))

github/deemru/w8io/026f985 
50.59 ms ◑