w8 · tx

2023.04.06 15:50 [3588357] smart account 3P8w8NXZUtYdCA13tHbDY5sW4mC27ZFJgG3 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "28MNVd1pzQ2SYPQFqEcdY4rqFJW1C4w3THonYdSnsJWZ",
    "fee": 2700000,
    "feeAssetId": null,
    "timestamp": 1680787540403,
    "version": 2,
    "chainId": 87,
    "sender": "3P8w8NXZUtYdCA13tHbDY5sW4mC27ZFJgG3",
    "senderPublicKey": "6uKJV5r5qjqG9uVK4Q24W7zG5KZtGtKXz3NWRMwfZbB7",
    "proofs": [
        "",
        "33UCeY3UFFF8yevbPDEnodZQiA7vR7eABTPQjbVR4UeEkupbS2f3ECPDBtJmfgkh2R1uuHLXATNZZFdP5Z58c9ix",
        "",
        "4YA6yePsWUk6rQLxYiifFZwhnFG7vkn6KfQ38bdJwoS7RbLVhhwusTxRQTfquggCbFckHiapnHwoygzQDNdHeU6G"
    ],
    "script": "base64:BgIpCAISBwoFCAgBAQgSABIDCgEBEgASABIAEgMKAQgSBAoCCAESBAoCCAFVAAtyZXZpc2lvbk51bQIoYzI3YTgyNTViZDljZTMxYTlkNDFiNTQ1ZjNmYzBhZDI2ZGQyYzEwNQAJc2VwYXJhdG9yAgJfXwADU0VQAgJfXwAFTVVMVDYAwIQ9AAVNVUxUOACAwtcvAAZNVUxUWDYJALYCAQUFTVVMVDYABk1VTFRYOAkAtgIBBQVNVUxUOAAHTVVMVFgxOAkAtgIBAICAkLu61q3wDQAKV0FWRVNJRFNUUgIFV0FWRVMAB1dBVkVTSUQJANkEAQUKV0FWRVNJRFNUUgAJREFZTUlMTElTAIC4mSkACU1BWEJBU0tFVAAJABlJZHhDb250cm9sQ2ZnTmV1dHJpbm9EYXBwAAEAGElkeENvbnRyb2xDZmdBdWN0aW9uRGFwcAACABRJZHhDb250cm9sQ2ZnUnBkRGFwcAADABVJZHhDb250cm9sQ2ZnTWF0aERhcHAABAAcSWR4Q29udHJvbENmZ0xpcXVpZGF0aW9uRGFwcAAFABVJZHhDb250cm9sQ2ZnUmVzdERhcHAABgAdSWR4Q29udHJvbENmZ05vZGVSZWdpc3RyeURhcHAABwAcSWR4Q29udHJvbENmZ05zYnRTdGFraW5nRGFwcAAIABlJZHhDb250cm9sQ2ZnTWVkaWF0b3JEYXBwAAkAG0lkeENvbnRyb2xDZmdHb3Zlcm5hbmNlRGFwcAANAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQCsAgIJAKwCAgkArAICCQCsAgICCm1hbmRhdG9yeSAJAKUIAQUHYWRkcmVzcwIBLgUDa2V5Ag8gaXMgbm90IGRlZmluZWQBEWtleUNvbnRyb2xBZGRyZXNzAAIcJXMlc19fY29uZmlnX19jb250cm9sQWRkcmVzcwENa2V5Q29udHJvbENmZwACESVzX19jb250cm9sQ29uZmlnARRyZWFkQ29udHJvbENmZ09yRmFpbAEHY29udHJvbAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUHY29udHJvbAkBDWtleUNvbnRyb2xDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIKY29udHJvbENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFCmNvbnRyb2xDZmcFA2lkeAkArAICAi1Db250cm9sIGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AA9jb250cm9sQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBEWtleUNvbnRyb2xBZGRyZXNzAAIjM1A1QmZkNThQUGZOdkJNMkh5OFFmYmNEcU1lTnR6ZzdLZlAACmNvbnRyb2xDZmcJARRyZWFkQ29udHJvbENmZ09yRmFpbAEFD2NvbnRyb2xDb250cmFjdAAMbWF0aENvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUVSWR4Q29udHJvbENmZ01hdGhEYXBwABBuZXV0cmlub0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUZSWR4Q29udHJvbENmZ05ldXRyaW5vRGFwcAAPYXVjdGlvbkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwAAtnb3ZDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCmNvbnRyb2xDZmcFG0lkeENvbnRyb2xDZmdHb3Zlcm5hbmNlRGFwcAEMa2V5Qm9uZEFzc2V0AAINYm9uZF9hc3NldF9pZAEXa2V5VXNlckduc2J0UmVsZWFzZVRpbWUBCHVzZXJBZGRyCQCsAgICGyVzJXNfdXNlckduc2J0UmVsZWFzZVRpbWVfXwUIdXNlckFkZHIBGmtleU5ldXRyaW5vQ29udHJhY3RBZGRyZXNzAAIbJXNfX25ldXRyaW5vQ29udHJhY3RBZGRyZXNzARZrZXlNYXRoQ29udHJhY3RBZGRyZXNzAAIQJXNfX21hdGhDb250cmFjdAEQa2V5TWluTG9ja0Ftb3VudAACESVzX19taW5Mb2NrQW1vdW50AQtrZXlIYWxmTGlmZQACDCVzX19oYWxmTGlmZQEWa2V5TG9ja1BhcmFtVXNlckFtb3VudAELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgILcGFyYW1CeVVzZXIJAMwIAgkApQgBBQt1c2VyQWRkcmVzcwkAzAgCAgZhbW91bnQFA25pbAUJc2VwYXJhdG9yARZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgtwYXJhbUJ5VXNlcgkAzAgCCQClCAEFC3VzZXJBZGRyZXNzCQDMCAICBXN0YXJ0BQNuaWwFCXNlcGFyYXRvcgEQa2V5SGlzdG9yeVJlY29yZAMEdHlwZQt1c2VyQWRkcmVzcwR0eElkCQC5CQIJAMwIAgIIJXMlcyVzJXMJAMwIAgIHaGlzdG9yeQkAzAgCBQR0eXBlCQDMCAIJAKUIAQULdXNlckFkZHJlc3MJAMwIAgkA2AQBBQR0eElkBQNuaWwFCXNlcGFyYXRvcgEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQACQC5CQIJAMwIAgIEJXMlcwkAzAgCAgVzdGF0cwkAzAgCAhFhY3RpdmVUb3RhbExvY2tlZAUDbmlsBQlzZXBhcmF0b3IBEmtleVN0YXRzTG9ja3NDb3VudAAJALkJAgkAzAgCAgQlcyVzCQDMCAICBXN0YXRzCQDMCAICCmxvY2tzQ291bnQFA25pbAUJc2VwYXJhdG9yARJrZXlTdGF0c1VzZXJzQ291bnQACQC5CQIJAMwIAgIEJXMlcwkAzAgCAgVzdGF0cwkAzAgCAhBhY3RpdmVVc2Vyc0NvdW50BQNuaWwFCXNlcGFyYXRvcgEXa2V5U3RhdHNEZXBvc2l0QW10QnlEYXkBCXRpbWVzdGFtcAkAuQkCCQDMCAICBiVzJXMlZAkAzAgCAgVzdGF0cwkAzAgCAg9kZXBvc2l0QW10QnlEYXkJAMwIAgkApAMBBQl0aW1lc3RhbXAFA25pbAUJc2VwYXJhdG9yARhrZXlTdGF0c0RlcG9zaXRBbXRUb3RhbHMACQC5CQIJAMwIAgIGJXMlcyVkCQDMCAICBXN0YXRzCQDMCAICEGRlcG9zaXRBbXRUb3RhbHMFA25pbAUJc2VwYXJhdG9yAQ1rZXlOZXh0UGVyaW9kAAIOJXNfX25leHRQZXJpb2QBGGtleVN1cHBvcnRlZFJld2FyZEFzc2V0cwACFXN1cHBvcnRlZFJld2FyZEFzc2V0cwERa2V5RGVwb3NpdE51bUxhc3QACQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICA2RlcAkAzAgCAgdsYXN0TnVtBQNuaWwFCXNlcGFyYXRvcgEba2V5VXNlclJld2FyZEZyb21EZXBvc2l0TnVtAQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAhF1c2VyUndkRnJvbURlcE51bQkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsBQlzZXBhcmF0b3IBFWtleVJld2FyZFBlck5zYnRTdW1BdAIKZGVwb3NpdE51bQN0a24JALkJAgkAzAgCAgQlcyVkCQDMCAICFXJ3ZFBlck5zYnRTdW1CeURlcE51bQkAzAgCCQCkAwEFCmRlcG9zaXROdW0JAMwIAgUDdGtuBQNuaWwFCXNlcGFyYXRvcgEJa2V5UmV3YXJkAgt1c2VyQWRkcmVzcwN0a24JALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIDcndkCQDMCAIFC3VzZXJBZGRyZXNzCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBCmtleUNsYWltZWQCC3VzZXJBZGRyZXNzA3RrbgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgNjbG0JAMwIAgULdXNlckFkZHJlc3MJAMwIAgUDdGtuBQNuaWwFCXNlcGFyYXRvcgEXa2V5Tm90RGlzdHJpYnV0ZWRSZXdhcmQBA3RrbgkAuQkCCQDMCAICBCVzJXMJAMwIAgIObm90RGlzdHJpYnV0ZWQJAMwIAgUDdGtuBQNuaWwFCXNlcGFyYXRvcgEFdG9YMTgCB29yaWdWYWwIb3JpZ011bHQJALwCAwkAtgIBBQdvcmlnVmFsBQdNVUxUWDE4BQhvcmlnTXVsdAEMZ2V0SW50T3JaZXJvAQNrZXkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUDa2V5AAABDGdldEludE9yRWxzZQIDa2V5CmRlZmF1bHRWYWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUDa2V5BQpkZWZhdWx0VmFsAQxnZXRJbnRPckZhaWwBA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBHRoaXMFA2tleQkArAICCQCsAgICD01hbmRhdG9yeSB0aGlzLgUDa2V5Ag8gaXMgbm90IGRlZmluZWQBDGdldFN0ck9yRWxzZQIDa2V5CmRlZmF1bHRWYWwJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUDa2V5BQpkZWZhdWx0VmFsAQ90b0FkZHJlc3NPckZhaWwBCmFkZHJlc3NTdHIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBBQphZGRyZXNzU3RyCQCsAgICIWNvdWxkbid0IHBhcnNlIHBhc3NlZCBhZGRyZXNzU3RyPQUKYWRkcmVzc1N0cgELdG9Bc3NldFZlY3QBCGFzc2V0U3RyAwkAAAIFCGFzc2V0U3RyBQpXQVZFU0lEU1RSBQR1bml0CQDZBAEFCGFzc2V0U3RyAQVhc0ludAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIDSW50BAZ2YWxJbnQFByRtYXRjaDAFBnZhbEludAkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAETZm9ybWF0SGlzdG9yeVJlY29yZAQJb2xkQW1vdW50CG9sZFN0YXJ0CW5ld0Ftb3VudAhuZXdTdGFydAkAuQkCCQDMCAICDCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBBQlvbGRBbW91bnQJAMwIAgkApAMBBQhvbGRTdGFydAkAzAgCCQCkAwEFCW5ld0Ftb3VudAkAzAgCCQCkAwEFCG5ld1N0YXJ0BQNuaWwFCXNlcGFyYXRvcgEYZm9ybWF0Q2xhaW1IaXN0b3J5UmVjb3JkAgR1c2VyDmNsYWltZWRSZXdhcmRzCQC5CQIJAMwIAgIIJXMlZCVkJXMJAMwIAgUEdXNlcgkAzAgCCQCkAwEIBQlsYXN0QmxvY2sGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgUOY2xhaW1lZFJld2FyZHMFA25pbAUJc2VwYXJhdG9yARJIaXN0b3J5UmVjb3JkRW50cnkHBHR5cGULdXNlckFkZHJlc3MEdHhJZAlvbGRBbW91bnQIb2xkU3RhcnQJbmV3QW1vdW50CG5ld1N0YXJ0CQELU3RyaW5nRW50cnkCCQEQa2V5SGlzdG9yeVJlY29yZAMFBHR5cGUFC3VzZXJBZGRyZXNzBQR0eElkCQETZm9ybWF0SGlzdG9yeVJlY29yZAQFCW9sZEFtb3VudAUIb2xkU3RhcnQFCW5ld0Ftb3VudAUIbmV3U3RhcnQBEUNsYWltSGlzdG9yeUVudHJ5Awt1c2VyQWRkcmVzcwR0eElkDmNsYWltZWRSZXdhcmRzCQELU3RyaW5nRW50cnkCCQEQa2V5SGlzdG9yeVJlY29yZAMCBWNsYWltBQt1c2VyQWRkcmVzcwUEdHhJZAkBGGZvcm1hdENsYWltSGlzdG9yeVJlY29yZAIJAKUIAQULdXNlckFkZHJlc3MFDmNsYWltZWRSZXdhcmRzAQtTdGF0c1Jlc3VsdAMOdG90YWxMb2NrZWRJbmMMbG9ja0NvdW50SW5jDXVzZXJzQ291bnRJbmMECmxvY2tzQ291bnQJAQxnZXRJbnRPclplcm8BCQESa2V5U3RhdHNMb2Nrc0NvdW50AAQKdXNlcnNDb3VudAkBDGdldEludE9yWmVybwEJARJrZXlTdGF0c1VzZXJzQ291bnQABAt0b3RhbEFtb3VudAkBDGdldEludE9yWmVybwEJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAEDnRvdGFsQW1vdW50TmV3CQBkAgULdG90YWxBbW91bnQFDnRvdGFsTG9ja2VkSW5jCQCVCgMJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlTdGF0c0xvY2tzQ291bnQACQBkAgUKbG9ja3NDb3VudAUMbG9ja0NvdW50SW5jCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5U3RhdHNVc2Vyc0NvdW50AAkAZAIFCnVzZXJzQ291bnQFDXVzZXJzQ291bnRJbmMJAMwIAgkBDEludGVnZXJFbnRyeQIJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAFDnRvdGFsQW1vdW50TmV3BQNuaWwFC3RvdGFsQW1vdW50BQ50b3RhbEFtb3VudE5ldwEPTG9ja1BhcmFtc0VudHJ5Awt1c2VyQWRkcmVzcwZhbW91bnQFc3RhcnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlMb2NrUGFyYW1Vc2VyQW1vdW50AQULdXNlckFkZHJlc3MFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleUxvY2tQYXJhbVN0YXJ0QmxvY2sBBQt1c2VyQWRkcmVzcwUFc3RhcnQFA25pbAEPZ2V0UGFyYW1zT3JGYWlsAAkAlQoDCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFEG5ldXRyaW5vQ29udHJhY3QJAQxrZXlCb25kQXNzZXQACQEMZ2V0SW50T3JGYWlsAQkBEGtleU1pbkxvY2tBbW91bnQACQEMZ2V0SW50T3JGYWlsAQkBC2tleUhhbGZMaWZlAAEMaXNBY3RpdmVVc2VyAQt1c2VyQWRkcmVzcwkAZgIJAQxnZXRJbnRPckVsc2UCCQEWa2V5TG9ja1BhcmFtVXNlckFtb3VudAEFC3VzZXJBZGRyZXNzAAAAAAETZ2V0VXNlclBhcmFtc09yVW5pdAELdXNlckFkZHJlc3MDCQEMaXNBY3RpdmVVc2VyAQULdXNlckFkZHJlc3MJAJUKAwcJAQxnZXRJbnRPckZhaWwBCQEWa2V5TG9ja1BhcmFtVXNlckFtb3VudAEFC3VzZXJBZGRyZXNzCQEMZ2V0SW50T3JGYWlsAQkBFmtleUxvY2tQYXJhbVN0YXJ0QmxvY2sBBQt1c2VyQWRkcmVzcwUEdW5pdAETZ2V0VXNlclBhcmFtc09yRmFpbAELdXNlckFkZHJlc3MJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkArAICCQCsAgICBVVzZXIgCQClCAEFC3VzZXJBZGRyZXNzAg8gaXMgbm90IGRlZmluZWQAEnN1cHBvcnRlZEFzc2V0c1N0cgkBDGdldFN0ck9yRWxzZQIJARhrZXlTdXBwb3J0ZWRSZXdhcmRBc3NldHMAAgAAE3N1cHBvcnRlZEFzc2V0c0xpc3QJALUJAgUSc3VwcG9ydGVkQXNzZXRzU3RyAgFfAQpjYWxjUmV3YXJkBQt1c2VyQWRkcmVzcwdhc3NldElkDXN0YWtlZEFtb3VudFgOZGVwb3NpdE51bVVzZXIOZGVwb3NpdE51bUxhc3QEF3Jld2FyZFBlck5zYnRTdW1MYXN0S0VZCQEVa2V5UmV3YXJkUGVyTnNidFN1bUF0AgUOZGVwb3NpdE51bUxhc3QFB2Fzc2V0SWQECnN1bUxhc3RYMTgJAKcDAQkBDGdldFN0ck9yRWxzZQIJARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCBQ5kZXBvc2l0TnVtTGFzdAUHYXNzZXRJZAIBMAQKc3VtVXNlclgxOAkApwMBCQEMZ2V0U3RyT3JFbHNlAgkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDmRlcG9zaXROdW1Vc2VyBQdhc3NldElkAgEwBBFyZXdhcmREeW5hbWljUGFydAkAoAMBCQC8AgMJALgCAgUKc3VtTGFzdFgxOAUKc3VtVXNlclgxOAUNc3Rha2VkQW1vdW50WAUHTVVMVFgxOAQTcmV3YXJkQ2FjaGVkUGFydEtFWQkBCWtleVJld2FyZAIFC3VzZXJBZGRyZXNzBQdhc3NldElkBBByZXdhcmRDYWNoZWRQYXJ0CQEMZ2V0SW50T3JFbHNlAgUTcmV3YXJkQ2FjaGVkUGFydEtFWQAACQCWCgQJAGQCBRByZXdhcmRDYWNoZWRQYXJ0BRFyZXdhcmREeW5hbWljUGFydAUQcmV3YXJkQ2FjaGVkUGFydAURcmV3YXJkRHluYW1pY1BhcnQFE3Jld2FyZENhY2hlZFBhcnRLRVkBDHRvU3RhcnRPZkRheQEJdGltZXN0YW1wCQBoAgkAaQIFCXRpbWVzdGFtcAUJREFZTUlMTElTBQlEQVlNSUxMSVMBE2ZpbmRFbGVtZW50UG9zaXRpb24DA3NyYwdlbGVtZW50A3NlcAQMZWxlbWVudFN0YXJ0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJALMJAgUDc3JjBQdlbGVtZW50CQCsAgIJAKwCAgkArAICAhZ0aGVyZSBpcyBubyBzdWJzdHJpbmcgBQdlbGVtZW50AgQgaW4gBQNzcmMDCQAAAgUMZWxlbWVudFN0YXJ0AAAAAAQEbGVmdAkArwICBQNzcmMFDGVsZW1lbnRTdGFydAkAZQIJAJADAQkAtQkCBQRsZWZ0BQNzZXAAAQATRGVwb3NpdFRvdGFsc1BSRUZJWAIkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZCVkABFkZWZhdWx0VG90YWxzREFUQQkArAICBRNEZXBvc2l0VG90YWxzUFJFRklYAjZfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzBfXzABB3BhZExpc3QBAmluBAhjdXJyU2l6ZQkAZQIJAJADAQUCaW4AAQoBCmxpc3RQYWRkZXICA2FjYwNpZHgDCQBmAgUIY3VyclNpemUFA2lkeAUDYWNjCQDNCAIFA2FjYwIBMAoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQkAzAgCAAoJAMwIAgALCQDMCAIADAkAzAgCAA0JAMwIAgAOCQDMCAIADwkAzAgCABAJAMwIAgARBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQJpbgoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKbGlzdFBhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTgJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIBCXBhZFN0cmluZwECaW4ECGN1cnJTaXplCQBlAgkAkAMBCQC8CQIFAmluBQNTRVAAAQoBCXN0clBhZGRlcgIDYWNjA2lkeAMJAGYCBQhjdXJyU2l6ZQUDaWR4BQNhY2MJAKwCAgUDYWNjAgNfXzAKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKCQDMCAIACwkAzAgCAAwJAMwIAgANCQDMCAIADgkAzAgCAA8JAMwIAgAQCQDMCAIAEQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUCaW4KAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCXN0clBhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTgJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIBDVJld2FyZEVudHJpZXMDCWlzTmV3VXNlcgt1c2VyQWRkcmVzcwxzdGFrZWRBbW91bnQEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQt1c2VyQWRkcmVzcwQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKARtmb3JFYWNoQXNzZXRDYWNoZVVzZXJSZXdhcmQCBWFjY3VtBWFzc2V0BA0kdDAxMDMwMTEwNDM2CQEKY2FsY1Jld2FyZAUFC3VzZXJBZGRyZXNzBQVhc3NldAUNc3Rha2VkQW1vdW50WAUOZGVwb3NpdE51bVVzZXIFDmRlcG9zaXROdW1MYXN0BAtyZXdhcmRUb3RhbAgFDSR0MDEwMzAxMTA0MzYCXzEEBmNhY2hlZAgFDSR0MDEwMzAxMTA0MzYCXzIEB2R5bmFtaWMIBQ0kdDAxMDMwMTEwNDM2Al8zBBNyZXdhcmRDYWNoZWRQYXJ0S0VZCAUNJHQwMTAzMDExMDQzNgJfNAkAzQgCBQVhY2N1bQkBDEludGVnZXJFbnRyeQIFE3Jld2FyZENhY2hlZFBhcnRLRVkFC3Jld2FyZFRvdGFsAwMJAAACBQ5kZXBvc2l0TnVtTGFzdAD///////////8BCQAAAgUOZGVwb3NpdE51bVVzZXIA////////////AQcFA25pbAMDCQAAAgUOZGVwb3NpdE51bUxhc3QA////////////AQkAZgIFDmRlcG9zaXROdW1Vc2VyAP///////////wEHCQACAQIvaW52YWxpZCBkZXBvc2l0TnVtTGFzdCBhbmQgZGVwb3NpdE51bVVzZXIgc3RhdGUDAwkAZgIFDmRlcG9zaXROdW1MYXN0AP///////////wEJAGcCBQ5kZXBvc2l0TnVtVXNlcgD///////////8BBwMFCWlzTmV3VXNlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgUbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQ5kZXBvc2l0TnVtTGFzdAUDbmlsCQDNCAIKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEbZm9yRWFjaEFzc2V0Q2FjaGVVc2VyUmV3YXJkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA5CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJCQEMSW50ZWdlckVudHJ5AgUbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQ5kZXBvc2l0TnVtTGFzdAkAAgEJAKwCAgkArAICCQCsAgICJHVuY292ZXJlZCBjb25kaXRpb246IGRlcG9zaXROdW1MYXN0PQkApAMBBQ5kZXBvc2l0TnVtTGFzdAIQIGRlcG9zaXROdW1Vc2VyPQkApAMBBQ5kZXBvc2l0TnVtVXNlcgEiSW5jcmVtZW50Tm90RGlzdHJpYnV0ZWRSZXdhcmRFbnRyeQIDdGtuCWFtb3VudEluYwQXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJARdrZXlOb3REaXN0cmlidXRlZFJld2FyZAEFA3RrbgQUbm90RGlzdHJpYnV0ZWRSZXdhcmQJAQxnZXRJbnRPckVsc2UCBRdub3REaXN0cmlidXRlZFJld2FyZEtFWQAACQEMSW50ZWdlckVudHJ5AgUXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJAGQCBRRub3REaXN0cmlidXRlZFJld2FyZAUJYW1vdW50SW5jAQtjb21tb25DbGFpbQILdXNlckFkZHJlc3MBaQQOdXNlckFkZHJlc3NTdHIJAKUIAQULdXNlckFkZHJlc3MDCQBmAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIZcGF5bWVudHMgYXJlIG5vdCBhY2NlcHRlZAQNJHQwMTMzNzcxMzQ4MgkBC3ZhbHVlT3JFbHNlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkAlQoDBgAAAAAECWlzTmV3VXNlcggFDSR0MDEzMzc3MTM0ODICXzEEDHN0YWtlZEFtb3VudAgFDSR0MDEzMzc3MTM0ODICXzIEDHN0YWtpbmdTdGFydAgFDSR0MDEzMzc3MTM0ODICXzMEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQ51c2VyQWRkcmVzc1N0cgQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgVhY2N1bQVhc3NldAQNJHQwMTM4NTMxMzk5MQkBCmNhbGNSZXdhcmQFBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQFDXN0YWtlZEFtb3VudFgFDmRlcG9zaXROdW1Vc2VyBQ5kZXBvc2l0TnVtTGFzdAQLcmV3YXJkVG90YWwIBQ0kdDAxMzg1MzEzOTkxAl8xBAZjYWNoZWQIBQ0kdDAxMzg1MzEzOTkxAl8yBAdkeW5hbWljCAUNJHQwMTM4NTMxMzk5MQJfMwQTcmV3YXJkQ2FjaGVkUGFydEtFWQgFDSR0MDEzODUzMTM5OTECXzQECmNsYWltZWRLRVkJAQprZXlDbGFpbWVkAgUOdXNlckFkZHJlc3NTdHIFBWFzc2V0BA0kdDAxNDA1MTE0MDg4BQVhY2N1bQQEZGF0YQgFDSR0MDE0MDUxMTQwODgCXzEEEWNsYWltZWRBbXRCeUFzc2V0CAUNJHQwMTQwNTExNDA4OAJfMgQHbmV3UGFydAkAuQkCCQDMCAIFBWFzc2V0CQDMCAIJAKQDAQULcmV3YXJkVG90YWwFA25pbAIBOgQUY2xhaW1lZEFtdEJ5QXNzZXROZXcJALkJAgkAzAgCBRFjbGFpbWVkQW10QnlBc3NldAkAzAgCBQduZXdQYXJ0BQNuaWwCAV8DCQBnAgAABQtyZXdhcmRUb3RhbAkAlAoCBQRkYXRhBRRjbGFpbWVkQW10QnlBc3NldE5ldwkAlAoCCQDNCAIJAM0IAgkAzQgCBQRkYXRhCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwULcmV3YXJkVG90YWwJAQt0b0Fzc2V0VmVjdAEFBWFzc2V0CQEMSW50ZWdlckVudHJ5AgUKY2xhaW1lZEtFWQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUKY2xhaW1lZEtFWQAABQtyZXdhcmRUb3RhbAkBDEludGVnZXJFbnRyeQIFE3Jld2FyZENhY2hlZFBhcnRLRVkAAAUUY2xhaW1lZEFtdEJ5QXNzZXROZXcEDSR0MDE0NTQ4MTQ2NjEKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBH2ZvckVhY2hBc3NldENhbGNVbmNsYWltZWRSZXdhcmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkECXRyYW5zZmVycwgFDSR0MDE0NTQ4MTQ2NjECXzEEF2NsYWltZWRBbXRCeUFzc2V0UmVzdWx0CAUNJHQwMTQ1NDgxNDY2MQJfMgMJAGcCAAAJAJADAQUJdHJhbnNmZXJzCQCUCgIFA25pbAAACQCUCgIJAM0IAgkAzQgCBQl0cmFuc2ZlcnMJAQxJbnRlZ2VyRW50cnkCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkFDmRlcG9zaXROdW1MYXN0CQERQ2xhaW1IaXN0b3J5RW50cnkDBQt1c2VyQWRkcmVzcwgFAWkNdHJhbnNhY3Rpb25JZAkAsAICBRdjbGFpbWVkQW10QnlBc3NldFJlc3VsdAABCQCQAwEFCXRyYW5zZmVycwkBaQENY29uc3RydWN0b3JWMQUXbmV1dHJpbm9Db250cmFjdEFkZHJlc3MTbWF0aENvbnRyYWN0QWRkcmVzcw1taW5Mb2NrQW1vdW50CGhhbGZMaWZlFXN1cHBvcnRlZFJld2FyZEFzc2V0cwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARprZXlOZXV0cmlub0NvbnRyYWN0QWRkcmVzcwAFF25ldXRyaW5vQ29udHJhY3RBZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlNYXRoQ29udHJhY3RBZGRyZXNzAAUTbWF0aENvbnRyYWN0QWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEGtleU1pbkxvY2tBbW91bnQABQ1taW5Mb2NrQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQELa2V5SGFsZkxpZmUABQhoYWxmTGlmZQkAzAgCCQELU3RyaW5nRW50cnkCCQEYa2V5U3VwcG9ydGVkUmV3YXJkQXNzZXRzAAUVc3VwcG9ydGVkUmV3YXJkQXNzZXRzBQNuaWwBaQEFc3Rha2UABA0kdDAxNTUxMjE1NTc0CQEPZ2V0UGFyYW1zT3JGYWlsAAQLYm9uZEFzc2V0SWQIBQ0kdDAxNTUxMjE1NTc0Al8xBA1taW5Mb2NrQW1vdW50CAUNJHQwMTU1MTIxNTU3NAJfMgQIaGFsZkxpZmUIBQ0kdDAxNTUxMjE1NTc0Al8zAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIVSW52YWxpZCBwYXltZW50cyBzaXplBAdwYXltZW50CQCRAwIIBQFpCHBheW1lbnRzAAAEBmFtb3VudAgFB3BheW1lbnQGYW1vdW50BBNpbnZhbGlkQXNzZXRNZXNzYWdlCQCsAgIJAKwCAgIPSW52YWxpZCBhc3NldC4gCQDYBAEFC2JvbmRBc3NldElkAgwgaXMgZXhwZWN0ZWQEB2Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFB3BheW1lbnQHYXNzZXRJZAUTaW52YWxpZEFzc2V0TWVzc2FnZQMJAQIhPQIFB2Fzc2V0SWQFC2JvbmRBc3NldElkCQACAQUTaW52YWxpZEFzc2V0TWVzc2FnZQQLdXNlckFkZHJlc3MIBQFpBmNhbGxlcgQOdXNlckFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyBA0kdDAxNjExNjE2MjIzCQELdmFsdWVPckVsc2UCCQETZ2V0VXNlclBhcmFtc09yVW5pdAEFC3VzZXJBZGRyZXNzCQCVCgMGAAAA////////////AQQJaXNOZXdVc2VyCAUNJHQwMTYxMTYxNjIyMwJfMQQKbG9ja0Ftb3VudAgFDSR0MDE2MTE2MTYyMjMCXzIED2xvY2tTdGFydEhlaWdodAgFDSR0MDE2MTE2MTYyMjMCXzMEDG1lcmdlZEFtb3VudAMFCWlzTmV3VXNlcgUGYW1vdW50CQBkAgUGYW1vdW50BQpsb2NrQW1vdW50BBFtZXJnZWRTdGFydEhlaWdodAMFCWlzTmV3VXNlcgUGaGVpZ2h0CQEFYXNJbnQBCQD8BwQFDG1hdGhDb250cmFjdAITbWVyZ2VTdGFrZXNSRUFET05MWQkAzAgCBQZhbW91bnQJAMwIAgUGaGVpZ2h0CQDMCAIFCmxvY2tBbW91bnQJAMwIAgUPbG9ja1N0YXJ0SGVpZ2h0CQDMCAIFCGhhbGZMaWZlBQNuaWwFA25pbAMJAGYCBQ1taW5Mb2NrQW1vdW50BQxtZXJnZWRBbW91bnQJAAIBCQCsAgICE01pbiBsb2NrIGFtb3VudCBpcyAJAKQDAQUNbWluTG9ja0Ftb3VudAQNJHQwMTY1ODQxNjY4NgkBC1N0YXRzUmVzdWx0AwUGYW1vdW50AAEDBQlpc05ld1VzZXIAAQAABAxzdGF0c0VudHJpZXMIBQ0kdDAxNjU4NDE2Njg2Al8xBAt0b3RhbFN0YWtlZAgFDSR0MDE2NTg0MTY2ODYCXzIEDnRvdGFsU3Rha2VkTmV3CAUNJHQwMTY1ODQxNjY4NgJfMwkAzggCCQDOCAIJAM4IAgkAzAgCCQESSGlzdG9yeVJlY29yZEVudHJ5BwIFc3Rha2UFC3VzZXJBZGRyZXNzCAUBaQ10cmFuc2FjdGlvbklkBQpsb2NrQW1vdW50BQ9sb2NrU3RhcnRIZWlnaHQFDG1lcmdlZEFtb3VudAURbWVyZ2VkU3RhcnRIZWlnaHQFA25pbAkBDVJld2FyZEVudHJpZXMDBQlpc05ld1VzZXIFDnVzZXJBZGRyZXNzU3RyBQpsb2NrQW1vdW50CQEPTG9ja1BhcmFtc0VudHJ5AwULdXNlckFkZHJlc3MFDG1lcmdlZEFtb3VudAURbWVyZ2VkU3RhcnRIZWlnaHQFDHN0YXRzRW50cmllcwFpAQd1bnN0YWtlAQZhbW91bnQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAiN1bnN0YWtlIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudAQLdXNlckFkZHJlc3MIBQFpBmNhbGxlcgQOdXNlckFkZHJlc3NTdHIJAKUIAQULdXNlckFkZHJlc3MEDSR0MDE3MTcyMTcyMzQJAQ9nZXRQYXJhbXNPckZhaWwABAtib25kQXNzZXRJZAgFDSR0MDE3MTcyMTcyMzQCXzEEDW1pbkxvY2tBbW91bnQIBQ0kdDAxNzE3MjE3MjM0Al8yBAhoYWxmTGlmZQgFDSR0MDE3MTcyMTcyMzQCXzMEDSR0MDE3MjM3MTczMTEJARNnZXRVc2VyUGFyYW1zT3JGYWlsAQULdXNlckFkZHJlc3MECWlzTmV3VXNlcggFDSR0MDE3MjM3MTczMTECXzEECmxvY2tBbW91bnQIBQ0kdDAxNzIzNzE3MzExAl8yBAlsb2NrU3RhcnQIBQ0kdDAxNzIzNzE3MzExAl8zAwkAZwIAAAUKbG9ja0Ftb3VudAkAAgECEk5vdGhpbmcgdG8gdW5zdGFrZQMJAGYCBQZhbW91bnQFCmxvY2tBbW91bnQJAAIBCQCsAgIJAKwCAgkArAICAgpSZXF1ZXN0ZWQgCQCkAwEFBmFtb3VudAISLCBidXQgc3Rha2VkIG9ubHkgCQCkAwEFCmxvY2tBbW91bnQEAXQICQEFdmFsdWUBCQDtBwEFBmhlaWdodAl0aW1lc3RhbXAEC3JlbGVhc2VUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFC2dvdkNvbnRyYWN0CQEXa2V5VXNlckduc2J0UmVsZWFzZVRpbWUBBQ51c2VyQWRkcmVzc1N0cgAAAwkAZwIFC3JlbGVhc2VUaW1lBQF0CQACAQkArAICAjtZb3VyIGdOc2J0IGFyZSB0YWtpbmcgcGFydCBpbiB2b3RpbmcsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQtyZWxlYXNlVGltZQQPY29taXNzaW9uQW1vdW50CQEFYXNJbnQBCQD8BwQFDG1hdGhDb250cmFjdAIhZ2V0VW5zdGFrZUNvbWlzc2lvbkFtb3VudFJFQURPTkxZCQDMCAIFBmFtb3VudAkAzAgCBQlsb2NrU3RhcnQJAMwIAgUIaGFsZkxpZmUFA25pbAUDbmlsBA0kdDAxNzk1MjE4MTA2CQELU3RhdHNSZXN1bHQDCQEBLQEFBmFtb3VudAMJAAACBQZhbW91bnQFCmxvY2tBbW91bnQA////////////AQAAAwkAAAIFBmFtb3VudAUKbG9ja0Ftb3VudAD///////////8BAAAEDHN0YXRzRW50cmllcwgFDSR0MDE3OTUyMTgxMDYCXzEEC3RvdGFsU3Rha2VkCAUNJHQwMTc5NTIxODEwNgJfMgQOdG90YWxTdGFrZWROZXcIBQ0kdDAxNzk1MjE4MTA2Al8zCQDOCAIJAM4IAgkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzCQBlAgUGYW1vdW50BQ9jb21pc3Npb25BbW91bnQFC2JvbmRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD2F1Y3Rpb25Db250cmFjdAUPY29taXNzaW9uQW1vdW50BQtib25kQXNzZXRJZAkAzAgCCQESSGlzdG9yeVJlY29yZEVudHJ5BwIHdW5zdGFrZQULdXNlckFkZHJlc3MIBQFpDXRyYW5zYWN0aW9uSWQFCmxvY2tBbW91bnQFCWxvY2tTdGFydAkAZQIFCmxvY2tBbW91bnQFBmFtb3VudAUJbG9ja1N0YXJ0BQNuaWwJAQ1SZXdhcmRFbnRyaWVzAwcFDnVzZXJBZGRyZXNzU3RyBQpsb2NrQW1vdW50CQEPTG9ja1BhcmFtc0VudHJ5AwULdXNlckFkZHJlc3MJAGUCBQpsb2NrQW1vdW50BQZhbW91bnQFCWxvY2tTdGFydAUMc3RhdHNFbnRyaWVzAWkBB2RlcG9zaXQABAt0b3RhbFN0YWtlZAkBDGdldEludE9yRWxzZQIJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAAAAMJAGYCAAAFC3RvdGFsU3Rha2VkCQACAQIbVE9ETzogY2FzZSBpcyBub3Qgc3VwcG9ydGVkBBFkZXBvc2l0TnVtTGFzdEtFWQkBEWtleURlcG9zaXROdW1MYXN0AAQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCBRFkZXBvc2l0TnVtTGFzdEtFWQD///////////8BBA1kZXBvc2l0TnVtTmV3CQBkAgUOZGVwb3NpdE51bUxhc3QAAQQJdG90YWxzS0VZCQEYa2V5U3RhdHNEZXBvc2l0QW10VG90YWxzAAQIYnlEYXlLRVkJARdrZXlTdGF0c0RlcG9zaXRBbXRCeURheQEJAQx0b1N0YXJ0T2ZEYXkBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQKY3VyclRvdGFscwkBB3BhZExpc3QBCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUJdG90YWxzS0VZBRFkZWZhdWx0VG90YWxzREFUQQUDU0VQCgEDZGVwAgNhY2MDcG10BAZhbW91bnQIBQNwbXQGYW1vdW50BA1wbXRBc3NldElkU3RyCQDYBAEJAQt2YWx1ZU9yRWxzZQIIBQNwbXQHYXNzZXRJZAUHV0FWRVNJRAMJAQEhAQkBCGNvbnRhaW5zAgUSc3VwcG9ydGVkQXNzZXRzU3RyBQ1wbXRBc3NldElkU3RyCQACAQkArAICCQCsAgIFEnN1cHBvcnRlZEFzc2V0c1N0cgIRIGRvZXNuJ3QgY29udGFpbiAFDXBtdEFzc2V0SWRTdHIDCQAAAgULdG90YWxTdGFrZWQAAAkAlgoECQDNCAIIBQNhY2MCXzEJASJJbmNyZW1lbnROb3REaXN0cmlidXRlZFJld2FyZEVudHJ5AgUNcG10QXNzZXRJZFN0cgUGYW1vdW50CQDNCAIIBQNhY2MCXzIFDXBtdEFzc2V0SWRTdHIJAM0IAggFA2FjYwJfMwkAtgIBAAAJAM0IAggFA2FjYwJfNAUGYW1vdW50BBByZXdhcmRQZXJOc2J0WDE4CQC8AgMJALYCAQUGYW1vdW50BQdNVUxUWDE4CQC2AgEFC3RvdGFsU3Rha2VkCQCWCgQIBQNhY2MCXzEJAM0IAggFA2FjYwJfMgUNcG10QXNzZXRJZFN0cgkAzQgCCAUDYWNjAl8zBRByZXdhcmRQZXJOc2J0WDE4CQDNCAIIBQNhY2MCXzQFBmFtb3VudAQKcG10c1Jlc3VsdAoAAiRsCAUBaQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAUDbmlsBQNuaWwFA25pbAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNkZXACBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoKARlyZWZyZXNoUmV3YXJkVXBkYXRlVG90YWxzAgVhY2N1bQluZXh0QXNzZXQEAWsIBQVhY2N1bQJfMwQKc3VtTGFzdFN0cgkBDGdldFN0ck9yRWxzZQIJARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCBQ5kZXBvc2l0TnVtTGFzdAUJbmV4dEFzc2V0AgEwBANpZHgJAM8IAggFCnBtdHNSZXN1bHQCXzIFCW5leHRBc3NldAQDc3VtAwkBCWlzRGVmaW5lZAEFA2lkeAQBagkBBXZhbHVlAQUDaWR4BApzdGF0c0RlbHRhCQCRAwIIBQpwbXRzUmVzdWx0Al80BQFqCQCUCgIJAKYDAQkAtwICCQCnAwEFCnN1bUxhc3RTdHIJAJEDAggFCnBtdHNSZXN1bHQCXzMFAWoJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpjdXJyVG90YWxzCQBkAgUBawABBQpzdGF0c0RlbHRhCQCUCgIFCnN1bUxhc3RTdHIJAJEDAgUKY3VyclRvdGFscwkAZAIFAWsAAQkAlQoDCQDNCAIIBQVhY2N1bQJfMQkBC1N0cmluZ0VudHJ5AgkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDWRlcG9zaXROdW1OZXcFCW5leHRBc3NldAgFA3N1bQJfMQkArAICCQCsAgIIBQVhY2N1bQJfMgUDU0VQCAUDc3VtAl8yCQBkAgUBawABBAxhc3NldHNSZXN1bHQKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwUDbmlsBRNEZXBvc2l0VG90YWxzUFJFRklYAAAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBGXJlZnJlc2hSZXdhcmRVcGRhdGVUb3RhbHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkEBnRvdGFscwkBCXBhZFN0cmluZwEIBQxhc3NldHNSZXN1bHQCXzIJAJQKAgkAzQgCCQDNCAIJAM0IAgkAzggCCAUKcG10c1Jlc3VsdAJfMQgFDGFzc2V0c1Jlc3VsdAJfMQkBDEludGVnZXJFbnRyeQIFEWRlcG9zaXROdW1MYXN0S0VZBQ1kZXBvc2l0TnVtTmV3CQELU3RyaW5nRW50cnkCBQl0b3RhbHNLRVkFBnRvdGFscwkBC1N0cmluZ0VudHJ5AgUIYnlEYXlLRVkFBnRvdGFscwUNZGVwb3NpdE51bU5ldwFpAQxjbGFpbVJld2FyZHMACQELY29tbW9uQ2xhaW0CCAUBaQZjYWxsZXIFAWkBaQEaY2xhaW1SZXdhcmRzQnlPcmlnaW5DYWxsZXIACQELY29tbW9uQ2xhaW0CCAUBaQxvcmlnaW5DYWxsZXIFAWkBaQEYdW5jbGFpbWVkUmV3YXJkc1JFQURPTkxZAQ51c2VyQWRkcmVzc1N0cgoBFmZvckVhY2hBc3NldFplcm9SZXdhcmQCBWFjY3VtBWFzc2V0CQCsAgIJAKwCAgUFYWNjdW0JALkJAgkAzAgCBQVhc3NldAkAzAgCAgEwCQDMCAICATAFA25pbAIBOgIBXwQSdW5jbGFpbWVkUmV3YXJkU3RyAwkAAAIFDnVzZXJBZGRyZXNzU3RyAgAKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEWZm9yRWFjaEFzc2V0WmVyb1Jld2FyZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQQLdXNlckFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDnVzZXJBZGRyZXNzU3RyBA0kdDAyMTk1NTIyMDYwCQELdmFsdWVPckVsc2UCCQETZ2V0VXNlclBhcmFtc09yVW5pdAEFC3VzZXJBZGRyZXNzCQCVCgMGAAAAAAQJaXNOZXdVc2VyCAUNJHQwMjE5NTUyMjA2MAJfMQQMc3Rha2VkQW1vdW50CAUNJHQwMjE5NTUyMjA2MAJfMgQMc3Rha2luZ1N0YXJ0CAUNJHQwMjE5NTUyMjA2MAJfMwQNc3Rha2VkQW1vdW50WAkAtgIBBQxzdGFrZWRBbW91bnQEG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQkBG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQEFDnVzZXJBZGRyZXNzU3RyBA5kZXBvc2l0TnVtVXNlcgkBDGdldEludE9yRWxzZQIFG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQD///////////8BBA5kZXBvc2l0TnVtTGFzdAkBDGdldEludE9yRWxzZQIJARFrZXlEZXBvc2l0TnVtTGFzdAAA////////////AQoBH2ZvckVhY2hBc3NldENhbGNVbmNsYWltZWRSZXdhcmQCBWFjY3VtBWFzc2V0BA0kdDAyMjQwNjIyNTQ0CQEKY2FsY1Jld2FyZAUFDnVzZXJBZGRyZXNzU3RyBQVhc3NldAUNc3Rha2VkQW1vdW50WAUOZGVwb3NpdE51bVVzZXIFDmRlcG9zaXROdW1MYXN0BAtyZXdhcmRUb3RhbAgFDSR0MDIyNDA2MjI1NDQCXzEEBmNhY2hlZAgFDSR0MDIyNDA2MjI1NDQCXzIEB2R5bmFtaWMIBQ0kdDAyMjQwNjIyNTQ0Al8zBBNyZXdhcmRDYWNoZWRQYXJ0S0VZCAUNJHQwMjI0MDYyMjU0NAJfNAQHY2xhaW1lZAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEKa2V5Q2xhaW1lZAIFDnVzZXJBZGRyZXNzU3RyBQVhc3NldAAACQCsAgIJAKwCAgUFYWNjdW0JALkJAgkAzAgCBQVhc3NldAkAzAgCCQCkAwEFC3Jld2FyZFRvdGFsCQDMCAIJAKQDAQUHY2xhaW1lZAUDbmlsAgE6AgFfCgACJGwFE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBH2ZvckVhY2hBc3NldENhbGNVbmNsYWltZWRSZXdhcmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkJAJQKAgUDbmlsCQCzAgIFEnVuY2xhaW1lZFJld2FyZFN0cgABAWkBGG5zYnRVbnN0YWtpbmdTWVNSRUFET05MWQIVdXNlckFkZHJlc3NTdHJPckVtcHR5C3Vuc3Rha2VBbXRQBAtyZXN1bHRBcnJheQMJAAACBRV1c2VyQWRkcmVzc1N0ck9yRW1wdHkCAAkAzAgCAAAJAMwIAgAACQDMCAIAAAkAzAgCAAAFA25pbAQLdXNlckFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFFXVzZXJBZGRyZXNzU3RyT3JFbXB0eQQHY2ZnREFUQQkBD2dldFBhcmFtc09yRmFpbAAEC25zYnRBc3NldElkCAUHY2ZnREFUQQJfMQQNbWluTG9ja0Ftb3VudAgFB2NmZ0RBVEECXzIECGhhbGZMaWZlCAUHY2ZnREFUQQJfMwQIdXNlckRBVEEJAQt2YWx1ZU9yRWxzZQIJARNnZXRVc2VyUGFyYW1zT3JVbml0AQULdXNlckFkZHJlc3MJAJUKAwYAAAAABAlpc05ld1VzZXIIBQh1c2VyREFUQQJfMQQMc3Rha2VkQW1vdW50CAUIdXNlckRBVEECXzIECWxvY2tTdGFydAgFCHVzZXJEQVRBAl8zBAp1bnN0YWtlQW10AwkAZgIFC3Vuc3Rha2VBbXRQBQxzdGFrZWRBbW91bnQFDHN0YWtlZEFtb3VudAULdW5zdGFrZUFtdFAED3N0YWtlZEFtb3VudE5FVwkAZQIFDHN0YWtlZEFtb3VudAUKdW5zdGFrZUFtdAQPY29taXNzaW9uQW1vdW50AwkAAAIFCnVuc3Rha2VBbXQAAAAACQEFYXNJbnQBCQD8BwQFDG1hdGhDb250cmFjdAIhZ2V0VW5zdGFrZUNvbWlzc2lvbkFtb3VudFJFQURPTkxZCQDMCAIFCnVuc3Rha2VBbXQJAMwIAgUJbG9ja1N0YXJ0CQDMCAIFCGhhbGZMaWZlBQNuaWwFA25pbAQNcmVjZWl2ZUFtb3VudAkAZQIFCnVuc3Rha2VBbXQFD2NvbWlzc2lvbkFtb3VudAkAzAgCBQxzdGFrZWRBbW91bnQJAMwIAgUPc3Rha2VkQW1vdW50TkVXCQDMCAIFDXJlY2VpdmVBbW91bnQJAMwIAgUPY29taXNzaW9uQW1vdW50BQNuaWwJAJQKAgUDbmlsBQtyZXN1bHRBcnJheQFpARZuc2J0U3Rha2luZ1NZU1JFQURPTkxZAg51c2VyQWRkcmVzc1N0cghuc2J0RGlmZgQMdG90YWxOc2J0QW10CQEMZ2V0SW50T3JFbHNlAgkBF2tleUxvY2tQYXJhbVRvdGFsQW1vdW50AAAAAwkAAAIFDnVzZXJBZGRyZXNzU3RyAgAJAJQKAgUDbmlsCQDMCAIAAAkAzAgCBQx0b3RhbE5zYnRBbXQJAMwIAgAABQNuaWwEC3VzZXJBZGRyZXNzCQEPdG9BZGRyZXNzT3JGYWlsAQUOdXNlckFkZHJlc3NTdHIEDSR0MDI0MjIyMjQzMjYJAQt2YWx1ZU9yRWxzZQIJARNnZXRVc2VyUGFyYW1zT3JVbml0AQULdXNlckFkZHJlc3MJAJUKAwYAAAAABAlpc05ld1VzZXIIBQ0kdDAyNDIyMjI0MzI2Al8xBAt1c2VyTnNidEFtdAgFDSR0MDI0MjIyMjQzMjYCXzIEDHN0YWtpbmdTdGFydAgFDSR0MDI0MjIyMjQzMjYCXzMJAJQKAgUDbmlsCQDMCAIFC3VzZXJOc2J0QW10CQDMCAIFDHRvdGFsTnNidEFtdAkAzAgCBQxzdGFraW5nU3RhcnQFA25pbAECdHgBBnZlcmlmeQAEE3B1YktleUFkbWluc0xpc3RTdHIJALkJAgkAzAgCAixHSmRMU2FMaXY1Szd4dWVqYWM4bWNSY0hveW8zZFByRVNydmt0RzNhNk1BUgkAzAgCAixFWXdabVVSZDVLS2FRUkJqc1ZhNmc4RFBpc0ZvUzZTb3ZSSnRGaUw1Z01IVQkAzAgCAixEdG1BZnVEZENySEs4c3BkQWVBWXpxNk1zWmVnZUQ5Z25zcnB1VFJrQ2JWQQkAzAgCAiw1V1JYRlNqd2NUYk5mS2NKczhacVhtU1NXWXNTVkpVdE12TXFaajVoSDROYwUDbmlsBQNTRVAEEHB1YktleUFkbWluc0xpc3QJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9jb250cm9sQ29udHJhY3QCDCVzX19tdWx0aXNpZwUTcHViS2V5QWRtaW5zTGlzdFN0cgUDU0VQBAVjb3VudAkAZAIJAGQCCQBkAgMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAAAAQAAAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQkA2QQBCQCRAwIFEHB1YktleUFkbWluc0xpc3QAAQABAAADCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACCQDZBAEJAJEDAgUQcHViS2V5QWRtaW5zTGlzdAACAAEAAAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAMJANkEAQkAkQMCBRBwdWJLZXlBZG1pbnNMaXN0AAMAAgAACQBnAgUFY291bnQAA430hi0=",
    "height": 3588357,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9yih3rZcBbGQbMxApQAsRBqMLU2sBpaJKcjFypPUfaHY
Next: J9KULedbcmqhz56d14WC1vaWZa3nmWTEB9xyY2peXXtK

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

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let revisionNum = "~~46ddf9ad4f4a67a79d872f7c5671aa012953a34b~~"
	4	+	let revisionNum = "c27a8255bd9ce31a9d41b545f3fc0ad26dd2c105"
5	5
6	6		let separator = "__"
7	7

22	22		let WAVESID = fromBase58String(WAVESIDSTR)
23	23
24	24		let DAYMILLIS = 86400000
	25	+
	26	+	let MAXBASKET = 9
25	27
26	28		let IdxControlCfgNeutrinoDapp = 1
27	29

238	240
239	241		let defaultTotalsDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
240	242
	243	+	func padList (in) = {
	244	+	let currSize = (size(in) - 1)
	245	+	func listPadder (acc,idx) = if ((currSize > idx))
	246	+	then acc
	247	+	else (acc :+ "0")
	248	+
	249	+	let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17]
	250	+	let $s = size($l)
	251	+	let $acc0 = in
	252	+	func $f0_1 ($a,$i) = if (($i >= $s))
	253	+	then $a
	254	+	else listPadder($a, $l[$i])
	255	+
	256	+	func $f0_2 ($a,$i) = if (($i >= $s))
	257	+	then $a
	258	+	else throw("List size exceeds 18")
	259	+
	260	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18)
	261	+	}
	262	+
	263	+
	264	+	func padString (in) = {
	265	+	let currSize = (size(split_4C(in, SEP)) - 1)
	266	+	func strPadder (acc,idx) = if ((currSize > idx))
	267	+	then acc
	268	+	else (acc + "__0")
	269	+
	270	+	let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17]
	271	+	let $s = size($l)
	272	+	let $acc0 = in
	273	+	func $f0_1 ($a,$i) = if (($i >= $s))
	274	+	then $a
	275	+	else strPadder($a, $l[$i])
	276	+
	277	+	func $f0_2 ($a,$i) = if (($i >= $s))
	278	+	then $a
	279	+	else throw("List size exceeds 18")
	280	+
	281	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18)
	282	+	}
	283	+
	284	+
241	285		func RewardEntries (isNewUser,userAddress,stakedAmount) = {
242	286		let stakedAmountX = toBigInt(stakedAmount)
243	287		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
244	288		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
245	289		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
246	290		func forEachAssetCacheUserReward (accum,asset) = {
247		-	let $~~t095619696~~ = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
248		-	let rewardTotal = $~~t095619696~~._1
249		-	let cached = $~~t095619696~~._2
250		-	let dynamic = $~~t095619696~~._3
251		-	let rewardCachedPartKEY = $~~t095619696~~._4
	291	+	let $t01030110436 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
	292	+	let rewardTotal = $t01030110436._1
	293	+	let cached = $t01030110436._2
	294	+	let dynamic = $t01030110436._3
	295	+	let rewardCachedPartKEY = $t01030110436._4
252	296		(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
253	297		}
254	298

295	339		if ((size(i.payments) > 0))
296	340		then throw("payments are not accepted")
297	341		else {
298		-	let $~~t01263712742~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
299		-	let isNewUser = $~~t01263712742~~._1
300		-	let stakedAmount = $~~t01263712742~~._2
301		-	let stakingStart = $~~t01263712742~~._3
	342	+	let $t01337713482 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	343	+	let isNewUser = $t01337713482._1
	344	+	let stakedAmount = $t01337713482._2
	345	+	let stakingStart = $t01337713482._3
302	346		let stakedAmountX = toBigInt(stakedAmount)
303	347		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
304	348		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
305	349		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
306	350		func forEachAssetCalcUnclaimedReward (accum,asset) = {
307		-	let $~~t01311313251~~ = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
308		-	let rewardTotal = $~~t01311313251~~._1
309		-	let cached = $~~t01311313251~~._2
310		-	let dynamic = $~~t01311313251~~._3
311		-	let rewardCachedPartKEY = $~~t01311313251~~._4
	351	+	let $t01385313991 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	352	+	let rewardTotal = $t01385313991._1
	353	+	let cached = $t01385313991._2
	354	+	let dynamic = $t01385313991._3
	355	+	let rewardCachedPartKEY = $t01385313991._4
312	356		let claimedKEY = keyClaimed(userAddressStr, asset)
313		-	let $~~t01331113348~~ = accum
314		-	let data = $~~t01331113348~~._1
315		-	let claimedAmtByAsset = $~~t01331113348~~._2
	357	+	let $t01405114088 = accum
	358	+	let data = $t01405114088._1
	359	+	let claimedAmtByAsset = $t01405114088._2
316	360		let newPart = makeString([asset, toString(rewardTotal)], ":")
317	361		let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
318	362		if ((0 >= rewardTotal))

320	364		else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
321	365		}
322	366
323		-	let $~~t01380813921~~ = {
	367	+	let $t01454814661 = {
324	368		let $l = supportedAssetsList
325	369		let $s = size($l)
326	370		let $acc0 = $Tuple2(nil, "")

334	378
335	379		$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)
336	380		}
337		-	let transfers = $~~t01380813921~~._1
338		-	let claimedAmtByAssetResult = $~~t01380813921~~._2
	381	+	let transfers = $t01454814661._1
	382	+	let claimedAmtByAssetResult = $t01454814661._2
339	383		if ((0 >= size(transfers)))
340	384		then $Tuple2(nil, 0)
341	385		else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))

352	396
353	397		@Callable(i)
354	398		func stake () = {
355		-	let $~~t01477214834~~ = getParamsOrFail()
356		-	let bondAssetId = $~~t01477214834~~._1
357		-	let minLockAmount = $~~t01477214834~~._2
358		-	let halfLife = $~~t01477214834~~._3
	399	+	let $t01551215574 = getParamsOrFail()
	400	+	let bondAssetId = $t01551215574._1
	401	+	let minLockAmount = $t01551215574._2
	402	+	let halfLife = $t01551215574._3
359	403		if ((size(i.payments) != 1))
360	404		then throw("Invalid payments size")
361	405		else {

368	412		else {
369	413		let userAddress = i.caller
370	414		let userAddressStr = toString(i.caller)
371		-	let $~~t01537615483~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
372		-	let isNewUser = $~~t01537615483~~._1
373		-	let lockAmount = $~~t01537615483~~._2
374		-	let lockStartHeight = $~~t01537615483~~._3
	415	+	let $t01611616223 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, -1))
	416	+	let isNewUser = $t01611616223._1
	417	+	let lockAmount = $t01611616223._2
	418	+	let lockStartHeight = $t01611616223._3
375	419		let mergedAmount = if (isNewUser)
376	420		then amount
377	421		else (amount + lockAmount)

381	425		if ((minLockAmount > mergedAmount))
382	426		then throw(("Min lock amount is " + toString(minLockAmount)))
383	427		else {
384		-	let $~~t01584415946~~ = StatsResult(amount, 1, if (isNewUser)
	428	+	let $t01658416686 = StatsResult(amount, 1, if (isNewUser)
385	429		then 1
386	430		else 0)
387		-	let statsEntries = $~~t01584415946~~._1
388		-	let totalStaked = $~~t01584415946~~._2
389		-	let totalStakedNew = $~~t01584415946~~._3
	431	+	let statsEntries = $t01658416686._1
	432	+	let totalStaked = $t01658416686._2
	433	+	let totalStakedNew = $t01658416686._3
390	434		((([HistoryRecordEntry("stake", userAddress, i.transactionId, lockAmount, lockStartHeight, mergedAmount, mergedStartHeight)] ++ RewardEntries(isNewUser, userAddressStr, lockAmount)) ++ LockParamsEntry(userAddress, mergedAmount, mergedStartHeight)) ++ statsEntries)
391	435		}
392	436		}

401	445		else {
402	446		let userAddress = i.caller
403	447		let userAddressStr = toString(userAddress)
404		-	let $~~t01643216494~~ = getParamsOrFail()
405		-	let bondAssetId = $~~t01643216494~~._1
406		-	let minLockAmount = $~~t01643216494~~._2
407		-	let halfLife = $~~t01643216494~~._3
408		-	let $~~t01649716571~~ = getUserParamsOrFail(userAddress)
409		-	let isNewUser = $~~t01649716571~~._1
410		-	let lockAmount = $~~t01649716571~~._2
411		-	let lockStart = $~~t01649716571~~._3
	448	+	let $t01717217234 = getParamsOrFail()
	449	+	let bondAssetId = $t01717217234._1
	450	+	let minLockAmount = $t01717217234._2
	451	+	let halfLife = $t01717217234._3
	452	+	let $t01723717311 = getUserParamsOrFail(userAddress)
	453	+	let isNewUser = $t01723717311._1
	454	+	let lockAmount = $t01723717311._2
	455	+	let lockStart = $t01723717311._3
412	456		if ((0 >= lockAmount))
413	457		then throw("Nothing to unstake")
414	458		else if ((amount > lockAmount))

420	464		then throw(("Your gNsbt are taking part in voting, cannot unstake until " + toString(releaseTime)))
421	465		else {
422	466		let comissionAmount = asInt(invoke(mathContract, "getUnstakeComissionAmountREADONLY", [amount, lockStart, halfLife], nil))
423		-	let $~~t01721217366~~ = StatsResult(-(amount), if ((amount == lockAmount))
	467	+	let $t01795218106 = StatsResult(-(amount), if ((amount == lockAmount))
424	468		then -1
425	469		else 0, if ((amount == lockAmount))
426	470		then -1
427	471		else 0)
428		-	let statsEntries = $~~t01721217366~~._1
429		-	let totalStaked = $~~t01721217366~~._2
430		-	let totalStakedNew = $~~t01721217366~~._3
	472	+	let statsEntries = $t01795218106._1
	473	+	let totalStaked = $t01795218106._2
	474	+	let totalStakedNew = $t01795218106._3
431	475		((([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)
432	476		}
433	477		}

446	490		let depositNumNew = (depositNumLast + 1)
447	491		let totalsKEY = keyStatsDepositAmtTotals()
448	492		let byDayKEY = keyStatsDepositAmtByDay(toStartOfDay(lastBlock.timestamp))
449		-	let currTotals = split(valueOrElse(getString(totalsKEY), defaultTotalsDATA), SEP)
450		-	let currByDay = split(valueOrElse(getString(byDayKEY), defaultTotalsDATA), SEP)
	493	+	let currTotals = padList(split(valueOrElse(getString(totalsKEY), defaultTotalsDATA), SEP))
451	494		func dep (acc,pmt) = {
452	495		let amount = pmt.amount
453	496		let pmtAssetIdStr = toBase58String(valueOrElse(pmt.assetId, WAVESID))

476	519		$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)
477	520		}
478	521		func refreshRewardUpdateTotals (accum,nextAsset) = {
479		-	let k = accum._4
	522	+	let k = accum._3
480	523		let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
481	524		let idx = indexOf(pmtsResult._2, nextAsset)
482	525		let sum = if (isDefined(idx))
483	526		then {
484	527		let j = value(idx)
485	528		let statsDelta = pmtsResult._4[j]
486		-	$~~Tuple3~~(toString((parseBigIntValue(sumLastStr) + pmtsResult._3[j])), toString((parseIntValue(currTotals[(k + 1)]) + statsDelta))~~, toString((parseIntValue(currByDay[(k + 1~~)~~]) + statsDelta)))~~
	529	+	$Tuple2(toString((parseBigIntValue(sumLastStr) + pmtsResult._3[j])), toString((parseIntValue(currTotals[(k + 1)]) + statsDelta)))
487	530		}
488		-	else $~~Tuple3~~(sumLastStr, currTotals[(k + 1)]~~, currByDay[(k + 1~~)])
489		-	$~~Tuple4~~((accum._1 :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), sum._1)), ((accum._2 + SEP) + sum._2), (~~(accum._3 + SEP) + sum._3), (~~k + 1))
	531	+	else $Tuple2(sumLastStr, currTotals[(k + 1)])
	532	+	$Tuple3((accum._1 :+ StringEntry(keyRewardPerNsbtSumAt(depositNumNew, nextAsset), sum._1)), ((accum._2 + SEP) + sum._2), (k + 1))
490	533		}
491	534
492	535		let assetsResult = {
493	536		let $l = supportedAssetsList
494	537		let $s = size($l)
495		-	let $acc0 = $~~Tuple4~~(nil, DepositTotalsPREFIX, ~~DepositTotalsPREFIX,~~ 0)
	538	+	let $acc0 = $Tuple3(nil, DepositTotalsPREFIX, 0)
496	539		func $f1_1 ($a,$i) = if (($i >= $s))
497	540		then $a
498	541		else refreshRewardUpdateTotals($a, $l[$i])

503	546
504	547		$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)
505	548		}
506		-	$Tuple2(((((pmtsResult._1 ++ assetsResult._1) :+ IntegerEntry(depositNumLastKEY, depositNumNew)) :+ StringEntry(totalsKEY, assetsResult._2)) :+ StringEntry(byDayKEY, assetsResult._3)), depositNumNew)
	549	+	let totals = padString(assetsResult._2)
	550	+	$Tuple2(((((pmtsResult._1 ++ assetsResult._1) :+ IntegerEntry(depositNumLastKEY, depositNumNew)) :+ StringEntry(totalsKEY, totals)) :+ StringEntry(byDayKEY, totals)), depositNumNew)
507	551		}
508	552		}
509	553

540	584		}
541	585		else {
542	586		let userAddress = addressFromStringValue(userAddressStr)
543		-	let $~~t02129721402~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
544		-	let isNewUser = $~~t02129721402~~._1
545		-	let stakedAmount = $~~t02129721402~~._2
546		-	let stakingStart = $~~t02129721402~~._3
	587	+	let $t02195522060 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	588	+	let isNewUser = $t02195522060._1
	589	+	let stakedAmount = $t02195522060._2
	590	+	let stakingStart = $t02195522060._3
547	591		let stakedAmountX = toBigInt(stakedAmount)
548	592		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
549	593		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
550	594		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
551	595		func forEachAssetCalcUnclaimedReward (accum,asset) = {
552		-	let $~~t02174821886~~ = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
553		-	let rewardTotal = $~~t02174821886~~._1
554		-	let cached = $~~t02174821886~~._2
555		-	let dynamic = $~~t02174821886~~._3
556		-	let rewardCachedPartKEY = $~~t02174821886~~._4
	596	+	let $t02240622544 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	597	+	let rewardTotal = $t02240622544._1
	598	+	let cached = $t02240622544._2
	599	+	let dynamic = $t02240622544._3
	600	+	let rewardCachedPartKEY = $t02240622544._4
557	601		let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
558	602		((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
559	603		}

612	656		then $Tuple2(nil, [0, totalNsbtAmt, 0])
613	657		else {
614	658		let userAddress = toAddressOrFail(userAddressStr)
615		-	let $~~t02356423668~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
616		-	let isNewUser = $~~t02356423668~~._1
617		-	let userNsbtAmt = $~~t02356423668~~._2
618		-	let stakingStart = $~~t02356423668~~._3
	659	+	let $t02422224326 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	660	+	let isNewUser = $t02422224326._1
	661	+	let userNsbtAmt = $t02422224326._2
	662	+	let stakingStart = $t02422224326._3
619	663		$Tuple2(nil, [userNsbtAmt, totalNsbtAmt, stakingStart])
620	664		}
621	665		}

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

github/deemru/w8io/786bc32 
151.58 ms ◑