w8 · tx · DHD···D48

tx · DHD1i6nmxwTkbgXS851QSDfKHrxtPcGGRZPz6hzQnD48

3PBiotFpqjRMkkeFBccnQNUXUopy7KFez5C:  -0.03200000 Waves

2022.11.30 15:55 [3405331] smart account 3PBiotFpqjRMkkeFBccnQNUXUopy7KFez5C > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DHD1i6nmxwTkbgXS851QSDfKHrxtPcGGRZPz6hzQnD48",
    "fee": 3200000,
    "feeAssetId": null,
    "timestamp": 1669815453860,
    "version": 1,
    "sender": "3PBiotFpqjRMkkeFBccnQNUXUopy7KFez5C",
    "senderPublicKey": "BYLtcNg4P4UcUd6tFdxeuhyRqgkYZujzyfwdEHNmo89c",
    "proofs": [
        "2oxmJyQmZESUrxKkkdWbFoYyYc17EzSkosXyrNmF3VTrx4HW5bPgpaRCn2MSkWv4y1fzruyEqDT76zSEpJVjuTnq"
    ],
    "script": "base64:BgIvCAISBQoDAQgIEgASABIDCgEBEgASABIAEgMKAQgSAwoBCBIECgIIARIDCgEBEgBqAAtyZXZpc2lvbk51bQIoYzU1NmRkN2U1ZjZlODNkYjA3MmFlYzY5OGI3YjEyYjJiOTQyYTM5NQAJc2VwYXJhdG9yAgJfXwADU0VQAgJfXwAFTVVMVDYAwIQ9AAVNVUxUOACAwtcvAAZNVUxUWDYJALYCAQUFTVVMVDYABk1VTFRYOAkAtgIBBQVNVUxUOAAHTVVMVFgxOAkAtgIBAICAkLu61q3wDQAKV0FWRVNJRFNUUgIFV0FWRVMAB1dBVkVTSUQJANkEAQUKV0FWRVNJRFNUUgAJREFZTUlMTElTAIC4mSkADURFRkFVTFRQRVJJT0QJAGgCAKALAA4AGUlkeENvbnRyb2xDZmdOZXV0cmlub0RhcHAAAQAYSWR4Q29udHJvbENmZ0F1Y3Rpb25EYXBwAAIAFElkeENvbnRyb2xDZmdScGREYXBwAAMAFUlkeENvbnRyb2xDZmdNYXRoRGFwcAAEABxJZHhDb250cm9sQ2ZnTGlxdWlkYXRpb25EYXBwAAUAFUlkeENvbnRyb2xDZmdSZXN0RGFwcAAGAB1JZHhDb250cm9sQ2ZnTm9kZVJlZ2lzdHJ5RGFwcAAHABxJZHhDb250cm9sQ2ZnTnNidFN0YWtpbmdEYXBwAAgAGUlkeENvbnRyb2xDZmdNZWRpYXRvckRhcHAACQAcSWR4Q29udHJvbENmZ1N1cmZTdGFraW5nRGFwcAAKACBJZHhDb250cm9sQ2ZnR25zYnRDb250cm9sbGVyRGFwcAALABdJZHhDb250cm9sQ2ZnUmVzdFYyRGFwcAAMABtJZHhDb250cm9sQ2ZnR292ZXJuYW5jZURhcHAADQEPZ2V0U3RyaW5nT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFB2FkZHJlc3MFA2tleQkArAICCQCsAgIJAKwCAgkArAICAgptYW5kYXRvcnkgCQClCAEFB2FkZHJlc3MCAS4FA2tleQIPIGlzIG5vdCBkZWZpbmVkARFrZXlDb250cm9sQWRkcmVzcwACHCVzJXNfX2NvbmZpZ19fY29udHJvbEFkZHJlc3MBDWtleUNvbnRyb2xDZmcAAhElc19fY29udHJvbENvbmZpZwEVa2V5R25zYnRGcm9tU3VyZkNvZWZmAAIdJXMlc19fY2ZnX19nbnNidEZyb21TdXJmQ29lZmYBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQdjb250cm9sCQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQdjb250cm9sCQENa2V5Q29udHJvbENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgpjb250cm9sQ2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUKY29udHJvbENmZwUDaWR4CQCsAgICLUNvbnRyb2wgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgAD2NvbnRyb2xDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQERa2V5Q29udHJvbEFkZHJlc3MAAiMzUDVCZmQ1OFBQZk52Qk0ySHk4UWZiY0RxTWVOdHpnN0tmUAAKY29udHJvbENmZwkBFHJlYWRDb250cm9sQ2ZnT3JGYWlsAQUPY29udHJvbENvbnRyYWN0AAxtYXRoQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRVJZHhDb250cm9sQ2ZnTWF0aERhcHAAEG5ldXRyaW5vQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRlJZHhDb250cm9sQ2ZnTmV1dHJpbm9EYXBwAA9hdWN0aW9uQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQpjb250cm9sQ2ZnBRhJZHhDb250cm9sQ2ZnQXVjdGlvbkRhcHAAC2dvdkNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUKY29udHJvbENmZwUbSWR4Q29udHJvbENmZ0dvdmVybmFuY2VEYXBwABJnbnNidEZyb21TdXJmQ29lZmYJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBFWtleUduc2J0RnJvbVN1cmZDb2VmZgAArAIBDGtleUJvbmRBc3NldAACDWJvbmRfYXNzZXRfaWQBGWtleUF1Y3Rpb25Db250cmFjdEFkZHJlc3MAAhBhdWN0aW9uX2NvbnRyYWN0ARBrZXlNaW5Mb2NrQW1vdW50AAIRJXNfX21pbkxvY2tBbW91bnQBEGtleVN0YWtlZEFzc2V0SWQAAhElc19fc3Rha2VkQXNzZXRJZAEWa2V5TG9ja1BhcmFtVXNlckFtb3VudAELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgILcGFyYW1CeVVzZXIJAMwIAgkApQgBBQt1c2VyQWRkcmVzcwkAzAgCAgZhbW91bnQFA25pbAUJc2VwYXJhdG9yARZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgtwYXJhbUJ5VXNlcgkAzAgCCQClCAEFC3VzZXJBZGRyZXNzCQDMCAICBXN0YXJ0BQNuaWwFCXNlcGFyYXRvcgEma2V5TG9ja1BhcmFtVm90aW5nUG93ZXJFZmZlY3RpdmVIZWlnaHQBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICC3BhcmFtQnlVc2VyCQDMCAIJAKUIAQULdXNlckFkZHJlc3MJAMwIAgIRdnBFZmZlY3RpdmVIZWlnaHQFA25pbAUJc2VwYXJhdG9yARBrZXlIaXN0b3J5UmVjb3JkAwR0eXBlC3VzZXJBZGRyZXNzBHR4SWQJALkJAgkAzAgCAgglcyVzJXMlcwkAzAgCAgdoaXN0b3J5CQDMCAIFBHR5cGUJAMwIAgkApQgBBQt1c2VyQWRkcmVzcwkAzAgCCQDYBAEFBHR4SWQFA25pbAUJc2VwYXJhdG9yARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAJALkJAgkAzAgCAgQlcyVzCQDMCAICBXN0YXRzCQDMCAICEWFjdGl2ZVRvdGFsTG9ja2VkBQNuaWwFCXNlcGFyYXRvcgESa2V5U3RhdHNMb2Nrc0NvdW50AAkAuQkCCQDMCAICBCVzJXMJAMwIAgIFc3RhdHMJAMwIAgIKbG9ja3NDb3VudAUDbmlsBQlzZXBhcmF0b3IBEmtleVN0YXRzVXNlcnNDb3VudAAJALkJAgkAzAgCAgQlcyVzCQDMCAICBXN0YXRzCQDMCAICEGFjdGl2ZVVzZXJzQ291bnQFA25pbAUJc2VwYXJhdG9yARdrZXlTdGF0c0RlcG9zaXRBbXRCeURheQEJdGltZXN0YW1wCQC5CQIJAMwIAgIGJXMlcyVkCQDMCAICBXN0YXRzCQDMCAICD2RlcG9zaXRBbXRCeURheQkAzAgCCQCkAwEFCXRpbWVzdGFtcAUDbmlsBQlzZXBhcmF0b3IBGGtleVN0YXRzRGVwb3NpdEFtdFRvdGFscwAJALkJAgkAzAgCAgYlcyVzJWQJAMwIAgIFc3RhdHMJAMwIAgIQZGVwb3NpdEFtdFRvdGFscwUDbmlsBQlzZXBhcmF0b3IBGGtleVN1cHBvcnRlZFJld2FyZEFzc2V0cwACFXN1cHBvcnRlZFJld2FyZEFzc2V0cwERa2V5RGVwb3NpdE51bUxhc3QACQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICA2RlcAkAzAgCAgdsYXN0TnVtBQNuaWwFCXNlcGFyYXRvcgEba2V5VXNlclJld2FyZEZyb21EZXBvc2l0TnVtAQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAhF1c2VyUndkRnJvbURlcE51bQkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsBQlzZXBhcmF0b3IBFWtleVJld2FyZFBlck5zYnRTdW1BdAIKZGVwb3NpdE51bQN0a24JALkJAgkAzAgCAgQlcyVkCQDMCAICFXJ3ZFBlck5zYnRTdW1CeURlcE51bQkAzAgCCQCkAwEFCmRlcG9zaXROdW0JAMwIAgUDdGtuBQNuaWwFCXNlcGFyYXRvcgEJa2V5UmV3YXJkAgt1c2VyQWRkcmVzcwN0a24JALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIDcndkCQDMCAIFC3VzZXJBZGRyZXNzCQDMCAIFA3RrbgUDbmlsBQlzZXBhcmF0b3IBCmtleUNsYWltZWQCC3VzZXJBZGRyZXNzA3RrbgkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgNjbG0JAMwIAgULdXNlckFkZHJlc3MJAMwIAgUDdGtuBQNuaWwFCXNlcGFyYXRvcgEXa2V5Tm90RGlzdHJpYnV0ZWRSZXdhcmQBA3RrbgkAuQkCCQDMCAICBCVzJXMJAMwIAgIObm90RGlzdHJpYnV0ZWQJAMwIAgUDdGtuBQNuaWwFCXNlcGFyYXRvcgETa2V5VnBQZXJpb2REdXJhdGlvbgAJALkJAgkAzAgCAgQlcyVzCQDMCAICAnZwCQDMCAICDnBlcmlvZER1cmF0aW9uBQNuaWwFCXNlcGFyYXRvcgEca2V5TGFzdFRvdGFsc1BlcmlvZFByb2Nlc3NlZAAJALkJAgkAzAgCAgQlcyVzCQDMCAICAnZwCQDMCAICGWxhc3RUb3RhbHNQZXJpb2RQcm9jZXNzZWQFA25pbAUJc2VwYXJhdG9yARprZXlMYXN0VXNlclBlcmlvZFByb2Nlc3NlZAELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgICdnAJAMwIAgIXbGFzdFVzZXJQZXJpb2RQcm9jZXNzZWQJAMwIAgULdXNlckFkZHJlc3MFA25pbAUJc2VwYXJhdG9yAQ5rZXlUb3RhbE1hdHVyZQAJALkJAgkAzAgCAgQlcyVzCQDMCAICAnZwCQDMCAICC3RvdGFsTWF0dXJlBQNuaWwFCXNlcGFyYXRvcgEMa2V5VG90YWxUZWVuAAkAuQkCCQDMCAICBCVzJXMJAMwIAgICdnAJAMwIAgIJdG90YWxUZWVuBQNuaWwFCXNlcGFyYXRvcgELa2V5VG90YWxLaWQACQC5CQIJAMwIAgIEJXMlcwkAzAgCAgJ2cAkAzAgCAgh0b3RhbEtpZAUDbmlsBQlzZXBhcmF0b3IBDWtleVVzZXJNYXR1cmUBC3VzZXJBZGRyZXNzCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICAnZwCQDMCAICCnVzZXJNYXR1cmUJAMwIAgULdXNlckFkZHJlc3MFA25pbAUJc2VwYXJhdG9yAQtrZXlVc2VyVGVlbgELdXNlckFkZHJlc3MJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgICdnAJAMwIAgIIdXNlclRlZW4JAMwIAgULdXNlckFkZHJlc3MFA25pbAUJc2VwYXJhdG9yAQprZXlVc2VyS2lkAQt1c2VyQWRkcmVzcwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAgJ2cAkAzAgCAgd1c2VyS2lkCQDMCAIFC3VzZXJBZGRyZXNzBQNuaWwFCXNlcGFyYXRvcgEFdG9YMTgCB29yaWdWYWwIb3JpZ011bHQJALwCAwkAtgIBBQdvcmlnVmFsBQdNVUxUWDE4BQhvcmlnTXVsdAEMZ2V0SW50T3JaZXJvAQNrZXkJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUDa2V5AAABDGdldEludE9yRWxzZQIDa2V5CmRlZmF1bHRWYWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUDa2V5BQpkZWZhdWx0VmFsAQxnZXRJbnRPckZhaWwBA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBHRoaXMFA2tleQkArAICCQCsAgICD01hbmRhdG9yeSB0aGlzLgUDa2V5Ag8gaXMgbm90IGRlZmluZWQBDGdldFN0ck9yRWxzZQIDa2V5CmRlZmF1bHRWYWwJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUDa2V5BQpkZWZhdWx0VmFsAQ90b0FkZHJlc3NPckZhaWwBCmFkZHJlc3NTdHIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBBQphZGRyZXNzU3RyCQCsAgICIWNvdWxkbid0IHBhcnNlIHBhc3NlZCBhZGRyZXNzU3RyPQUKYWRkcmVzc1N0cgELdG9Bc3NldFZlY3QBCGFzc2V0U3RyAwkAAAIFCGFzc2V0U3RyBQpXQVZFU0lEU1RSBQR1bml0CQDZBAEFCGFzc2V0U3RyAQVhc0ludAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIDSW50BAZ2YWxJbnQFByRtYXRjaDAFBnZhbEludAkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAESYXNTd2FwUGFyYW1zU1RSVUNUAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACIyhJbnQsIEludCwgSW50LCBJbnQsIEludCwgSW50LCBJbnQpBAZzdHJ1Y3QFByRtYXRjaDAFBnN0cnVjdAkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAETZm9ybWF0SGlzdG9yeVJlY29yZAQJb2xkQW1vdW50CG9sZFN0YXJ0CW5ld0Ftb3VudAhuZXdTdGFydAkAuQkCCQDMCAICDCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBBQlvbGRBbW91bnQJAMwIAgkApAMBBQhvbGRTdGFydAkAzAgCCQCkAwEFCW5ld0Ftb3VudAkAzAgCCQCkAwEFCG5ld1N0YXJ0BQNuaWwFCXNlcGFyYXRvcgEYZm9ybWF0Q2xhaW1IaXN0b3J5UmVjb3JkAgR1c2VyDmNsYWltZWRSZXdhcmRzCQC5CQIJAMwIAgIIJXMlZCVkJXMJAMwIAgUEdXNlcgkAzAgCCQCkAwEIBQlsYXN0QmxvY2sGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgUOY2xhaW1lZFJld2FyZHMFA25pbAUJc2VwYXJhdG9yARJIaXN0b3J5UmVjb3JkRW50cnkHBHR5cGULdXNlckFkZHJlc3MEdHhJZAlvbGRBbW91bnQIb2xkU3RhcnQJbmV3QW1vdW50CG5ld1N0YXJ0CQELU3RyaW5nRW50cnkCCQEQa2V5SGlzdG9yeVJlY29yZAMFBHR5cGUFC3VzZXJBZGRyZXNzBQR0eElkCQETZm9ybWF0SGlzdG9yeVJlY29yZAQFCW9sZEFtb3VudAUIb2xkU3RhcnQFCW5ld0Ftb3VudAUIbmV3U3RhcnQBEUNsYWltSGlzdG9yeUVudHJ5Awt1c2VyQWRkcmVzcwR0eElkDmNsYWltZWRSZXdhcmRzCQELU3RyaW5nRW50cnkCCQEQa2V5SGlzdG9yeVJlY29yZAMCBWNsYWltBQt1c2VyQWRkcmVzcwUEdHhJZAkBGGZvcm1hdENsYWltSGlzdG9yeVJlY29yZAIJAKUIAQULdXNlckFkZHJlc3MFDmNsYWltZWRSZXdhcmRzAQtTdGF0c1Jlc3VsdAMOdG90YWxMb2NrZWRJbmMMbG9ja0NvdW50SW5jDXVzZXJzQ291bnRJbmMECmxvY2tzQ291bnQJAQxnZXRJbnRPclplcm8BCQESa2V5U3RhdHNMb2Nrc0NvdW50AAQKdXNlcnNDb3VudAkBDGdldEludE9yWmVybwEJARJrZXlTdGF0c1VzZXJzQ291bnQABAt0b3RhbEFtb3VudAkBDGdldEludE9yWmVybwEJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAEDnRvdGFsQW1vdW50TmV3CQBkAgULdG90YWxBbW91bnQFDnRvdGFsTG9ja2VkSW5jCQCVCgMJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlTdGF0c0xvY2tzQ291bnQACQBkAgUKbG9ja3NDb3VudAUMbG9ja0NvdW50SW5jCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5U3RhdHNVc2Vyc0NvdW50AAkAZAIFCnVzZXJzQ291bnQFDXVzZXJzQ291bnRJbmMJAMwIAgkBDEludGVnZXJFbnRyeQIJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAFDnRvdGFsQW1vdW50TmV3BQNuaWwFC3RvdGFsQW1vdW50BQ50b3RhbEFtb3VudE5ldwEPTG9ja1BhcmFtc0VudHJ5Awt1c2VyQWRkcmVzcwZhbW91bnQadm90aW5nUG93ZXJFZmZlY3RpdmVIZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlMb2NrUGFyYW1Vc2VyQW1vdW50AQULdXNlckFkZHJlc3MFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleUxvY2tQYXJhbVN0YXJ0QmxvY2sBBQt1c2VyQWRkcmVzcwUadm90aW5nUG93ZXJFZmZlY3RpdmVIZWlnaHQFA25pbAEPZ2V0UGFyYW1zT3JGYWlsAAkAlAoCCQDZBAEJAQ9nZXRTdHJpbmdPckZhaWwCBQR0aGlzCQEQa2V5U3Rha2VkQXNzZXRJZAAJAQxnZXRJbnRPckZhaWwBCQEQa2V5TWluTG9ja0Ftb3VudAABDGlzQWN0aXZlVXNlcgELdXNlckFkZHJlc3MJAGYCCQEMZ2V0SW50T3JFbHNlAgkBFmtleUxvY2tQYXJhbVVzZXJBbW91bnQBBQt1c2VyQWRkcmVzcwAAAAABE2dldFVzZXJQYXJhbXNPclVuaXQBC3VzZXJBZGRyZXNzAwkBDGlzQWN0aXZlVXNlcgEFC3VzZXJBZGRyZXNzCQCVCgMHCQEMZ2V0SW50T3JGYWlsAQkBFmtleUxvY2tQYXJhbVVzZXJBbW91bnQBBQt1c2VyQWRkcmVzcwkBDGdldEludE9yRmFpbAEJARZrZXlMb2NrUGFyYW1TdGFydEJsb2NrAQULdXNlckFkZHJlc3MFBHVuaXQBE2dldFVzZXJQYXJhbXNPckZhaWwBC3VzZXJBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIJARNnZXRVc2VyUGFyYW1zT3JVbml0AQULdXNlckFkZHJlc3MJAKwCAgkArAICAgVVc2VyIAkApQgBBQt1c2VyQWRkcmVzcwIPIGlzIG5vdCBkZWZpbmVkABJzdXBwb3J0ZWRBc3NldHNTdHIJAQxnZXRTdHJPckVsc2UCCQEYa2V5U3VwcG9ydGVkUmV3YXJkQXNzZXRzAAIAABNzdXBwb3J0ZWRBc3NldHNMaXN0CQC1CQIFEnN1cHBvcnRlZEFzc2V0c1N0cgIBXwEKY2FsY1Jld2FyZAULdXNlckFkZHJlc3MHYXNzZXRJZA1zdGFrZWRBbW91bnRYDmRlcG9zaXROdW1Vc2VyDmRlcG9zaXROdW1MYXN0BBdyZXdhcmRQZXJOc2J0U3VtTGFzdEtFWQkBFWtleVJld2FyZFBlck5zYnRTdW1BdAIFDmRlcG9zaXROdW1MYXN0BQdhc3NldElkBApzdW1MYXN0WDE4CQCnAwEJAQxnZXRTdHJPckVsc2UCCQEVa2V5UmV3YXJkUGVyTnNidFN1bUF0AgUOZGVwb3NpdE51bUxhc3QFB2Fzc2V0SWQCATAECnN1bVVzZXJYMTgJAKcDAQkBDGdldFN0ck9yRWxzZQIJARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCBQ5kZXBvc2l0TnVtVXNlcgUHYXNzZXRJZAIBMAQRcmV3YXJkRHluYW1pY1BhcnQJAKADAQkAvAIDCQC4AgIFCnN1bUxhc3RYMTgFCnN1bVVzZXJYMTgFDXN0YWtlZEFtb3VudFgFB01VTFRYMTgEE3Jld2FyZENhY2hlZFBhcnRLRVkJAQlrZXlSZXdhcmQCBQt1c2VyQWRkcmVzcwUHYXNzZXRJZAQQcmV3YXJkQ2FjaGVkUGFydAkBDGdldEludE9yRWxzZQIFE3Jld2FyZENhY2hlZFBhcnRLRVkAAAkAlgoECQBkAgUQcmV3YXJkQ2FjaGVkUGFydAURcmV3YXJkRHluYW1pY1BhcnQFEHJld2FyZENhY2hlZFBhcnQFEXJld2FyZER5bmFtaWNQYXJ0BRNyZXdhcmRDYWNoZWRQYXJ0S0VZAQx0b1N0YXJ0T2ZEYXkBCXRpbWVzdGFtcAkAaAIJAGkCBQl0aW1lc3RhbXAFCURBWU1JTExJUwUJREFZTUlMTElTARNmaW5kRWxlbWVudFBvc2l0aW9uAwNzcmMHZWxlbWVudANzZXAEDGVsZW1lbnRTdGFydAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCzCQIFA3NyYwUHZWxlbWVudAkArAICCQCsAgIJAKwCAgIWdGhlcmUgaXMgbm8gc3Vic3RyaW5nIAUHZWxlbWVudAIEIGluIAUDc3JjAwkAAAIFDGVsZW1lbnRTdGFydAAAAAAEBGxlZnQJAK8CAgUDc3JjBQxlbGVtZW50U3RhcnQJAGUCCQCQAwEJALUJAgUEbGVmdAUDc2VwAAEAE0RlcG9zaXRUb3RhbHNQUkVGSVgCJCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZCVkJWQlZAETdXBkYXRlRGVwb3NpdFRvdGFscwMHY3VyclZhbAtpZHhUb1VwZGF0ZQhkZWx0YUFtdAQHY3VyckFycgkAtQkCBQdjdXJyVmFsBQNTRVAKAQ51cGREZXBUb3RCeUlkeAEDaWR4AwkBAiE9AgUDaWR4BQtpZHhUb1VwZGF0ZQkAkQMCBQdjdXJyQXJyBQNpZHgJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdjdXJyQXJyBQNpZHgFCGRlbHRhQW10CQC5CQIJAMwIAgUTRGVwb3NpdFRvdGFsc1BSRUZJWAkAzAgCCQEOdXBkRGVwVG90QnlJZHgBAAEJAMwIAgkBDnVwZERlcFRvdEJ5SWR4AQACCQDMCAIJAQ51cGREZXBUb3RCeUlkeAEAAwkAzAgCCQEOdXBkRGVwVG90QnlJZHgBAAQJAMwIAgkBDnVwZERlcFRvdEJ5SWR4AQAFCQDMCAIJAQ51cGREZXBUb3RCeUlkeAEABgkAzAgCCQEOdXBkRGVwVG90QnlJZHgBAAcJAMwIAgkBDnVwZERlcFRvdEJ5SWR4AQAICQDMCAIJAQ51cGREZXBUb3RCeUlkeAEACQkAzAgCCQEOdXBkRGVwVG90QnlJZHgBAAoJAMwIAgkBDnVwZERlcFRvdEJ5SWR4AQALCQDMCAIJAQ51cGREZXBUb3RCeUlkeAEADAkAzAgCCQEOdXBkRGVwVG90QnlJZHgBAA0JAMwIAgkBDnVwZERlcFRvdEJ5SWR4AQAOCQDMCAIJAQ51cGREZXBUb3RCeUlkeAEADwkAzAgCCQEOdXBkRGVwVG90QnlJZHgBABAJAMwIAgkBDnVwZERlcFRvdEJ5SWR4AQARCQDMCAIJAQ51cGREZXBUb3RCeUlkeAEAEgUDbmlsBQNTRVABFURlcG9zaXRzVG90YWxzRW50cmllcwINZGVwb3NpdEFtb3VudAphc3NldElkU3RyBApzdGFydE9mRGF5CQEMdG9TdGFydE9mRGF5AQgFCWxhc3RCbG9jawl0aW1lc3RhbXAECGJ5RGF5S0VZCQEXa2V5U3RhdHNEZXBvc2l0QW10QnlEYXkBBQpzdGFydE9mRGF5BAl0b3RhbHNLRVkJARhrZXlTdGF0c0RlcG9zaXRBbXRUb3RhbHMABAhwb3NpdGlvbgkBE2ZpbmRFbGVtZW50UG9zaXRpb24DBRJzdXBwb3J0ZWRBc3NldHNTdHIFCmFzc2V0SWRTdHICAV8EC2RlZmF1bHREQVRBCQCsAgIFE0RlcG9zaXRUb3RhbHNQUkVGSVgCNl9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMF9fMAQOY3VyclRvdGFsc0RBVEEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUJdG90YWxzS0VZBQtkZWZhdWx0REFUQQQNbmV3VG90YWxzREFUQQkBE3VwZGF0ZURlcG9zaXRUb3RhbHMDBQ5jdXJyVG90YWxzREFUQQkAZAIFCHBvc2l0aW9uAAEFDWRlcG9zaXRBbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUJdG90YWxzS0VZBQ1uZXdUb3RhbHNEQVRBCQDMCAIJAQtTdHJpbmdFbnRyeQIFCGJ5RGF5S0VZBQ1uZXdUb3RhbHNEQVRBBQNuaWwBDVJld2FyZEVudHJpZXMDCWlzTmV3VXNlcgt1c2VyQWRkcmVzcwxzdGFrZWRBbW91bnQEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQt1c2VyQWRkcmVzcwQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKARtmb3JFYWNoQXNzZXRDYWNoZVVzZXJSZXdhcmQCBWFjY3VtBWFzc2V0BA0kdDAxMjE1MTEyMjg2CQEKY2FsY1Jld2FyZAUFC3VzZXJBZGRyZXNzBQVhc3NldAUNc3Rha2VkQW1vdW50WAUOZGVwb3NpdE51bVVzZXIFDmRlcG9zaXROdW1MYXN0BAtyZXdhcmRUb3RhbAgFDSR0MDEyMTUxMTIyODYCXzEEBmNhY2hlZAgFDSR0MDEyMTUxMTIyODYCXzIEB2R5bmFtaWMIBQ0kdDAxMjE1MTEyMjg2Al8zBBNyZXdhcmRDYWNoZWRQYXJ0S0VZCAUNJHQwMTIxNTExMjI4NgJfNAkAzQgCBQVhY2N1bQkBDEludGVnZXJFbnRyeQIFE3Jld2FyZENhY2hlZFBhcnRLRVkFC3Jld2FyZFRvdGFsAwMJAAACBQ5kZXBvc2l0TnVtTGFzdAD///////////8BCQAAAgUOZGVwb3NpdE51bVVzZXIA////////////AQcFA25pbAMDCQAAAgUOZGVwb3NpdE51bUxhc3QA////////////AQkAZgIFDmRlcG9zaXROdW1Vc2VyAP///////////wEHCQACAQIvaW52YWxpZCBkZXBvc2l0TnVtTGFzdCBhbmQgZGVwb3NpdE51bVVzZXIgc3RhdGUDAwkAZgIFDmRlcG9zaXROdW1MYXN0AP///////////wEJAGcCBQ5kZXBvc2l0TnVtVXNlcgD///////////8BBwMFCWlzTmV3VXNlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgUbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQ5kZXBvc2l0TnVtTGFzdAUDbmlsCQDNCAIKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEbZm9yRWFjaEFzc2V0Q2FjaGVVc2VyUmV3YXJkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA5CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJCQEMSW50ZWdlckVudHJ5AgUbdXNlclJld2FyZEZyb21EZXBvc2l0TnVtS0VZBQ5kZXBvc2l0TnVtTGFzdAkAAgEJAKwCAgkArAICCQCsAgICJHVuY292ZXJlZCBjb25kaXRpb246IGRlcG9zaXROdW1MYXN0PQkApAMBBQ5kZXBvc2l0TnVtTGFzdAIQIGRlcG9zaXROdW1Vc2VyPQkApAMBBQ5kZXBvc2l0TnVtVXNlcgEiSW5jcmVtZW50Tm90RGlzdHJpYnV0ZWRSZXdhcmRFbnRyeQIDdGtuCWFtb3VudEluYwQXbm90RGlzdHJpYnV0ZWRSZXdhcmRLRVkJARdrZXlOb3REaXN0cmlidXRlZFJld2FyZAEFA3RrbgQUbm90RGlzdHJpYnV0ZWRSZXdhcmQJAQxnZXRJbnRPckVsc2UCBRdub3REaXN0cmlidXRlZFJld2FyZEtFWQAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBRdub3REaXN0cmlidXRlZFJld2FyZEtFWQkAZAIFFG5vdERpc3RyaWJ1dGVkUmV3YXJkBQlhbW91bnRJbmMFA25pbAELc3VyZlRvR25zYnQBB3N1cmZBbXQJAGkCBQdzdXJmQW10BRJnbnNidEZyb21TdXJmQ29lZmYBCm1lcmdlU3Rha2UEC3VzZXJBZGRyZXNzC2Ftb3VudFRvQWRkCHVzZXJUZWVuB3VzZXJLaWQEDSR0MDE1MjA5MTUzMTkJAQt2YWx1ZU9yRWxzZQIJARNnZXRVc2VyUGFyYW1zT3JVbml0AQULdXNlckFkZHJlc3MJAJUKAwYAAAAABAlpc05ld1VzZXIIBQ0kdDAxNTIwOTE1MzE5Al8xBAxzdGFrZWRBbW91bnQIBQ0kdDAxNTIwOTE1MzE5Al8yBBF2cEVmZmVjdGl2ZUhlaWdodAgFDSR0MDE1MjA5MTUzMTkCXzMED3N0YWtlZEFtb3VudE5FVwMFCWlzTmV3VXNlcgULYW1vdW50VG9BZGQJAGQCBQthbW91bnRUb0FkZAUMc3Rha2VkQW1vdW50BAJXMgkBDGdldEludE9yRWxzZQIJARNrZXlWcFBlcmlvZER1cmF0aW9uAAUNREVGQVVMVFBFUklPRAQGcGVyaW9kCQBpAgUGaGVpZ2h0BQJXMgQUdnBFZmZlY3RpdmVQZXJpb2RORVcDCQBmAgUHdXNlcktpZAAACQBkAgUGcGVyaW9kAAIDCQBmAgUIdXNlclRlZW4AAAkAZAIFBnBlcmlvZAABBQZwZXJpb2QJAJcKBQUJaXNOZXdVc2VyBQxzdGFrZWRBbW91bnQFEXZwRWZmZWN0aXZlSGVpZ2h0BQ9zdGFrZWRBbW91bnRORVcJAGgCBRR2cEVmZmVjdGl2ZVBlcmlvZE5FVwUCVzIBDHVwZGF0ZVRvdGFscwAEBnBlcmlvZAkAaQIFBmhlaWdodAkBDGdldEludE9yRWxzZQIJARNrZXlWcFBlcmlvZER1cmF0aW9uAAUNREVGQVVMVFBFUklPRAMJAGYCBQZwZXJpb2QJAQxnZXRJbnRPclplcm8BCQEca2V5TGFzdFRvdGFsc1BlcmlvZFByb2Nlc3NlZAAEC3RvdGFsTWF0dXJlCQELdmFsdWVPckVsc2UCCQCfCAEJAQ5rZXlUb3RhbE1hdHVyZQAJAQxnZXRJbnRPclplcm8BCQEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEOa2V5VG90YWxNYXR1cmUACQBkAgULdG90YWxNYXR1cmUJAQxnZXRJbnRPclplcm8BCQEMa2V5VG90YWxUZWVuAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDGtleVRvdGFsVGVlbgAJAQxnZXRJbnRPclplcm8BCQELa2V5VG90YWxLaWQACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQELa2V5VG90YWxLaWQAAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJARxrZXlMYXN0VG90YWxzUGVyaW9kUHJvY2Vzc2VkAAUGcGVyaW9kBQNuaWwFA25pbAEHb25TdGFrZQIOdXNlckFkZHJlc3NTdHILYW1vdW50VG9BZGQDCQBmAgAABQthbW91bnRUb0FkZAkAAgECGmFtb3VudFRvQWRkIHNob3VsZCBiZSA+PSAwBAJXMgkBDGdldEludE9yRWxzZQIJARNrZXlWcFBlcmlvZER1cmF0aW9uAAUNREVGQVVMVFBFUklPRAQGcGVyaW9kCQBpAgUGaGVpZ2h0BQJXMgQLdG90YWxNYXR1cmUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDmtleVRvdGFsTWF0dXJlAAkBDGdldEludE9yWmVybwEJARdrZXlMb2NrUGFyYW1Ub3RhbEFtb3VudAAECXRvdGFsVGVlbgkBDGdldEludE9yWmVybwEJAQxrZXlUb3RhbFRlZW4ABAh0b3RhbEtpZAkBDGdldEludE9yWmVybwEJAQtrZXlUb3RhbEtpZAAECnVzZXJNYXR1cmUDCQAAAgUOdXNlckFkZHJlc3NTdHICAAAACQELdmFsdWVPckVsc2UCCQCfCAEJAQ1rZXlVc2VyTWF0dXJlAQUOdXNlckFkZHJlc3NTdHIJAQxnZXRJbnRPclplcm8BCQEWa2V5TG9ja1BhcmFtVXNlckFtb3VudAEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDnVzZXJBZGRyZXNzU3RyBAh1c2VyVGVlbgkBDGdldEludE9yWmVybwEJAQtrZXlVc2VyVGVlbgEFDnVzZXJBZGRyZXNzU3RyBAd1c2VyS2lkCQEMZ2V0SW50T3JaZXJvAQkBCmtleVVzZXJLaWQBBQ51c2VyQWRkcmVzc1N0cgQDdG1wAwkAZgIFBnBlcmlvZAkBDGdldEludE9yWmVybwEJARprZXlMYXN0VXNlclBlcmlvZFByb2Nlc3NlZAEFDnVzZXJBZGRyZXNzU3RyCQCZCgcJAGQCBQt0b3RhbE1hdHVyZQUIdXNlclRlZW4JAGQCBQl0b3RhbFRlZW4JAGUCBQd1c2VyS2lkBQh1c2VyVGVlbgkAZQIFCHRvdGFsS2lkBQd1c2VyS2lkCQBkAgUKdXNlck1hdHVyZQUIdXNlclRlZW4FB3VzZXJLaWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGmtleUxhc3RVc2VyUGVyaW9kUHJvY2Vzc2VkAQUOdXNlckFkZHJlc3NTdHIFBnBlcmlvZAUDbmlsCQCZCgcFC3RvdGFsTWF0dXJlBQl0b3RhbFRlZW4FCHRvdGFsS2lkBQp1c2VyTWF0dXJlBQh1c2VyVGVlbgUHdXNlcktpZAUDbmlsBAZ0b3RhbHMDCQBmAgUGcGVyaW9kCQEMZ2V0SW50T3JaZXJvAQkBHGtleUxhc3RUb3RhbHNQZXJpb2RQcm9jZXNzZWQACQCWCgQJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ5rZXlUb3RhbE1hdHVyZQAJAGQCCAUDdG1wAl8xCAUDdG1wAl8yCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEMa2V5VG90YWxUZWVuAAgFA3RtcAJfMwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBC2tleVRvdGFsS2lkAAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEca2V5TGFzdFRvdGFsc1BlcmlvZFByb2Nlc3NlZAAFBnBlcmlvZAUDbmlsCQBkAggFA3RtcAJfMQgFA3RtcAJfMggFA3RtcAJfMwAACQCWCgQFA25pbAULdG90YWxNYXR1cmUFCXRvdGFsVGVlbgUIdG90YWxLaWQEBm5ld0tpZAkAawMFC2Ftb3VudFRvQWRkCQBqAgUGaGVpZ2h0BQJXMgUCVzIEB25ld1RlZW4JAGUCBQthbW91bnRUb0FkZAUGbmV3S2lkCQCZCgcJAM4IAgkAzQgCCQDNCAIJAM0IAggFBnRvdGFscwJfMQkBDEludGVnZXJFbnRyeQIJAQ1rZXlVc2VyTWF0dXJlAQUOdXNlckFkZHJlc3NTdHIIBQN0bXACXzQJAQxJbnRlZ2VyRW50cnkCCQELa2V5VXNlclRlZW4BBQ51c2VyQWRkcmVzc1N0cgkAZAIIBQN0bXACXzUFB25ld1RlZW4JAQxJbnRlZ2VyRW50cnkCCQEKa2V5VXNlcktpZAEFDnVzZXJBZGRyZXNzU3RyCQBkAggFA3RtcAJfNgUGbmV3S2lkCAUDdG1wAl83CAUGdG90YWxzAl8yCAUGdG90YWxzAl8zCAUGdG90YWxzAl80CAUDdG1wAl80CQBkAggFA3RtcAJfNQUHbmV3VGVlbgkAZAIIBQN0bXACXzYFBm5ld0tpZAAKSWR4TmV3RGlmZgAAAAtJZHhOZXdHbnNidAABAQx1c2VyRGVjcmVhc2UCBWduc2J0BGRpZmYDCQBnAgUEZGlmZgUFZ25zYnQJAMwIAgkAZQIFBGRpZmYFBWduc2J0CQDMCAIAAAUDbmlsCQDMCAIAAAkAzAgCCQBlAgUFZ25zYnQFBGRpZmYFA25pbAEJb25VbnN0YWtlAg51c2VyQWRkcmVzc1N0cg5hbW91bnRUb1JlbW92ZQMJAGcCAAAFDmFtb3VudFRvUmVtb3ZlCQACAQIcYW1vdW50VG9SZW1vdmUgc2hvdWxkIGJlID4gMAQCVzIJAQxnZXRJbnRPckVsc2UCCQETa2V5VnBQZXJpb2REdXJhdGlvbgAFDURFRkFVTFRQRVJJT0QEBnBlcmlvZAkAaQIFBmhlaWdodAUCVzIEC3RvdGFsTWF0dXJlCQELdmFsdWVPckVsc2UCCQCfCAEJAQ5rZXlUb3RhbE1hdHVyZQAJAQxnZXRJbnRPclplcm8BCQEXa2V5TG9ja1BhcmFtVG90YWxBbW91bnQABAl0b3RhbFRlZW4JAQxnZXRJbnRPclplcm8BCQEMa2V5VG90YWxUZWVuAAQIdG90YWxLaWQJAQxnZXRJbnRPclplcm8BCQELa2V5VG90YWxLaWQABAp1c2VyTWF0dXJlAwkAAAIFDnVzZXJBZGRyZXNzU3RyAgAAAAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQENa2V5VXNlck1hdHVyZQEFDnVzZXJBZGRyZXNzU3RyCQEMZ2V0SW50T3JaZXJvAQkBFmtleUxvY2tQYXJhbVVzZXJBbW91bnQBCQERQGV4dHJOYXRpdmUoMTA2MikBBQ51c2VyQWRkcmVzc1N0cgQIdXNlclRlZW4JAQxnZXRJbnRPclplcm8BCQELa2V5VXNlclRlZW4BBQ51c2VyQWRkcmVzc1N0cgQHdXNlcktpZAkBDGdldEludE9yWmVybwEJAQprZXlVc2VyS2lkAQUOdXNlckFkZHJlc3NTdHIEAnVtCQEMdXNlckRlY3JlYXNlAgUKdXNlck1hdHVyZQUOYW1vdW50VG9SZW1vdmUEAnV0CQEMdXNlckRlY3JlYXNlAgUIdXNlclRlZW4JAJEDAgUCdW0FCklkeE5ld0RpZmYEAnVrCQEMdXNlckRlY3JlYXNlAgUHdXNlcktpZAkAkQMCBQJ1dAUKSWR4TmV3RGlmZgMJAQIhPQIJAJEDAgUCdWsFCklkeE5ld0RpZmYAAAkAAgECEVNob3VsZCBub3QgaGFwcGVuBAN0bXADCQBmAgUGcGVyaW9kCQEMZ2V0SW50T3JaZXJvAQkBGmtleUxhc3RVc2VyUGVyaW9kUHJvY2Vzc2VkAQUOdXNlckFkZHJlc3NTdHIJAJkKBwkAZAIFC3RvdGFsTWF0dXJlCQCRAwIFAnV0BQtJZHhOZXdHbnNidAkAZAIFCXRvdGFsVGVlbgkAZQIJAJEDAgUCdWsFC0lkeE5ld0duc2J0CQCRAwIFAnV0BQtJZHhOZXdHbnNidAkAZQIFCHRvdGFsS2lkCQCRAwIFAnVrBQtJZHhOZXdHbnNidAkAZAIJAJEDAgUCdW0FC0lkeE5ld0duc2J0CQCRAwIFAnV0BQtJZHhOZXdHbnNidAkAkQMCBQJ1awULSWR4TmV3R25zYnQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGmtleUxhc3RVc2VyUGVyaW9kUHJvY2Vzc2VkAQUOdXNlckFkZHJlc3NTdHIFBnBlcmlvZAUDbmlsCQCZCgcFC3RvdGFsTWF0dXJlBQl0b3RhbFRlZW4FCHRvdGFsS2lkCQCRAwIFAnVtBQtJZHhOZXdHbnNidAkAkQMCBQJ1dAULSWR4TmV3R25zYnQJAJEDAgUCdWsFC0lkeE5ld0duc2J0BQNuaWwEBnRvdGFscwMJAGYCBQZwZXJpb2QJAQxnZXRJbnRPclplcm8BCQEca2V5TGFzdFRvdGFsc1BlcmlvZFByb2Nlc3NlZAAJAJYKBAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDmtleVRvdGFsTWF0dXJlAAkAZAIIBQN0bXACXzEIBQN0bXACXzIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQxrZXlUb3RhbFRlZW4ACAUDdG1wAl8zCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQELa2V5VG90YWxLaWQAAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJARxrZXlMYXN0VG90YWxzUGVyaW9kUHJvY2Vzc2VkAAUGcGVyaW9kBQNuaWwJAGQCCAUDdG1wAl8xCAUDdG1wAl8yCAUDdG1wAl8zAAAJAJYKBAUDbmlsBQt0b3RhbE1hdHVyZQUJdG90YWxUZWVuBQh0b3RhbEtpZAkAmQoHCQDOCAIJAM0IAgkAzQgCCQDNCAIIBQZ0b3RhbHMCXzEJAQxJbnRlZ2VyRW50cnkCCQENa2V5VXNlck1hdHVyZQEFDnVzZXJBZGRyZXNzU3RyCAUDdG1wAl80CQEMSW50ZWdlckVudHJ5AgkBC2tleVVzZXJUZWVuAQUOdXNlckFkZHJlc3NTdHIIBQN0bXACXzUJAQxJbnRlZ2VyRW50cnkCCQEKa2V5VXNlcktpZAEFDnVzZXJBZGRyZXNzU3RyCAUDdG1wAl82CAUDdG1wAl83CAUGdG90YWxzAl8yCAUGdG90YWxzAl8zCAUGdG90YWxzAl80CAUDdG1wAl80CAUDdG1wAl81CAUDdG1wAl82AQtjb21tb25TdGFrZQILdXNlckFkZHJlc3MBaQQNJHQwMjEyMDYyMTI2MAkBD2dldFBhcmFtc09yRmFpbAAEDXN0YWtlZEFzc2V0SWQIBQ0kdDAyMTIwNjIxMjYwAl8xBA1taW5Mb2NrQW1vdW50CAUNJHQwMjEyMDYyMTI2MAJfMgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECFUludmFsaWQgcGF5bWVudHMgc2l6ZQQHcGF5bWVudAkAkQMCCAUBaQhwYXltZW50cwAABAZhbW91bnQIBQdwYXltZW50BmFtb3VudAQTaW52YWxpZEFzc2V0TWVzc2FnZQkArAICCQCsAgICD0ludmFsaWQgYXNzZXQuIAkA2AQBBQ1zdGFrZWRBc3NldElkAgwgaXMgZXhwZWN0ZWQEB2Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFB3BheW1lbnQHYXNzZXRJZAUTaW52YWxpZEFzc2V0TWVzc2FnZQMJAQIhPQIFB2Fzc2V0SWQFDXN0YWtlZEFzc2V0SWQJAAIBBRNpbnZhbGlkQXNzZXRNZXNzYWdlBA51c2VyQWRkcmVzc1N0cgkApQgBBQt1c2VyQWRkcmVzcwQBcgkBB29uU3Rha2UCBQ51c2VyQWRkcmVzc1N0cgUGYW1vdW50BAptZXJnZWREYXRhCQEKbWVyZ2VTdGFrZQQFC3VzZXJBZGRyZXNzBQZhbW91bnQIBQFyAl82CAUBcgJfNwQJaXNOZXdVc2VyCAUKbWVyZ2VkRGF0YQJfMQQMc3Rha2VkQW1vdW50CAUKbWVyZ2VkRGF0YQJfMgQRdnBFZmZlY3RpdmVIZWlnaHQIBQptZXJnZWREYXRhAl8zBA9zdGFrZWRBbW91bnRORVcIBQptZXJnZWREYXRhAl80BBR2cEVmZmVjdGl2ZUhlaWdodE5FVwgFCm1lcmdlZERhdGECXzUDCQBmAgUNbWluTG9ja0Ftb3VudAUPc3Rha2VkQW1vdW50TkVXCQACAQkArAICAhNNaW4gbG9jayBhbW91bnQgaXMgCQCkAwEFDW1pbkxvY2tBbW91bnQEDSR0MDIyMTE0MjIyMTYJAQtTdGF0c1Jlc3VsdAMFBmFtb3VudAABAwUJaXNOZXdVc2VyAAEAAAQMc3RhdHNFbnRyaWVzCAUNJHQwMjIxMTQyMjIxNgJfMQQLdG90YWxTdGFrZWQIBQ0kdDAyMjExNDIyMjE2Al8yBA50b3RhbFN0YWtlZE5ldwgFDSR0MDIyMTE0MjIyMTYCXzMJAM4IAgkAzggCCQDOCAIJAM4IAgkAzAgCCQESSGlzdG9yeVJlY29yZEVudHJ5BwIFc3Rha2UFC3VzZXJBZGRyZXNzCAUBaQ10cmFuc2FjdGlvbklkBQxzdGFrZWRBbW91bnQFEXZwRWZmZWN0aXZlSGVpZ2h0BQ9zdGFrZWRBbW91bnRORVcFFHZwRWZmZWN0aXZlSGVpZ2h0TkVXBQNuaWwJAQ1SZXdhcmRFbnRyaWVzAwUJaXNOZXdVc2VyBQ51c2VyQWRkcmVzc1N0cgUMc3Rha2VkQW1vdW50CQEPTG9ja1BhcmFtc0VudHJ5AwULdXNlckFkZHJlc3MFD3N0YWtlZEFtb3VudE5FVwUUdnBFZmZlY3RpdmVIZWlnaHRORVcFDHN0YXRzRW50cmllcwgFAXICXzEBC2NvbW1vbkNsYWltAgt1c2VyQWRkcmVzcwFpBA51c2VyQWRkcmVzc1N0cgkApQgBBQt1c2VyQWRkcmVzcwMJAGYCCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhlwYXltZW50cyBhcmUgbm90IGFjY2VwdGVkBA0kdDAyMjcyMzIyODI4CQELdmFsdWVPckVsc2UCCQETZ2V0VXNlclBhcmFtc09yVW5pdAEFC3VzZXJBZGRyZXNzCQCVCgMGAAAAAAQJaXNOZXdVc2VyCAUNJHQwMjI3MjMyMjgyOAJfMQQMc3Rha2VkQW1vdW50CAUNJHQwMjI3MjMyMjgyOAJfMgQMc3Rha2luZ1N0YXJ0CAUNJHQwMjI3MjMyMjgyOAJfMwQNc3Rha2VkQW1vdW50WAkAtgIBBQxzdGFrZWRBbW91bnQEG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQkBG2tleVVzZXJSZXdhcmRGcm9tRGVwb3NpdE51bQEFDnVzZXJBZGRyZXNzU3RyBA5kZXBvc2l0TnVtVXNlcgkBDGdldEludE9yRWxzZQIFG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQD///////////8BBA5kZXBvc2l0TnVtTGFzdAkBDGdldEludE9yRWxzZQIJARFrZXlEZXBvc2l0TnVtTGFzdAAA////////////AQoBH2ZvckVhY2hBc3NldENhbGNVbmNsYWltZWRSZXdhcmQCBWFjY3VtBWFzc2V0BA0kdDAyMzE5OTIzMzM3CQEKY2FsY1Jld2FyZAUFDnVzZXJBZGRyZXNzU3RyBQVhc3NldAUNc3Rha2VkQW1vdW50WAUOZGVwb3NpdE51bVVzZXIFDmRlcG9zaXROdW1MYXN0BAtyZXdhcmRUb3RhbAgFDSR0MDIzMTk5MjMzMzcCXzEEBmNhY2hlZAgFDSR0MDIzMTk5MjMzMzcCXzIEB2R5bmFtaWMIBQ0kdDAyMzE5OTIzMzM3Al8zBBNyZXdhcmRDYWNoZWRQYXJ0S0VZCAUNJHQwMjMxOTkyMzMzNwJfNAQKY2xhaW1lZEtFWQkBCmtleUNsYWltZWQCBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQEDSR0MDIzMzk3MjM0MzQFBWFjY3VtBARkYXRhCAUNJHQwMjMzOTcyMzQzNAJfMQQRY2xhaW1lZEFtdEJ5QXNzZXQIBQ0kdDAyMzM5NzIzNDM0Al8yBAduZXdQYXJ0CQC5CQIJAMwIAgUFYXNzZXQJAMwIAgkApAMBBQtyZXdhcmRUb3RhbAUDbmlsAgE6BBRjbGFpbWVkQW10QnlBc3NldE5ldwkAuQkCCQDMCAIFEWNsYWltZWRBbXRCeUFzc2V0CQDMCAIFB25ld1BhcnQFA25pbAIBXwMJAGcCAAAFC3Jld2FyZFRvdGFsCQCUCgIFBGRhdGEFFGNsYWltZWRBbXRCeUFzc2V0TmV3CQCUCgIJAM0IAgkAzQgCCQDNCAIFBGRhdGEJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQtyZXdhcmRUb3RhbAkBC3RvQXNzZXRWZWN0AQUFYXNzZXQJAQxJbnRlZ2VyRW50cnkCBQpjbGFpbWVkS0VZCQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQpjbGFpbWVkS0VZAAAFC3Jld2FyZFRvdGFsCQEMSW50ZWdlckVudHJ5AgUTcmV3YXJkQ2FjaGVkUGFydEtFWQAABRRjbGFpbWVkQW10QnlBc3NldE5ldwQNJHQwMjM4OTQyNDAwNwoAAiRsBRNzdXBwb3J0ZWRBc3NldHNMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwCAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEfZm9yRWFjaEFzc2V0Q2FsY1VuY2xhaW1lZFJld2FyZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQQJdHJhbnNmZXJzCAUNJHQwMjM4OTQyNDAwNwJfMQQXY2xhaW1lZEFtdEJ5QXNzZXRSZXN1bHQIBQ0kdDAyMzg5NDI0MDA3Al8yAwkAZwIAAAkAkAMBBQl0cmFuc2ZlcnMJAJQKAgUDbmlsAAAJAJQKAgkAzQgCCQDNCAIFCXRyYW5zZmVycwkBDEludGVnZXJFbnRyeQIFG3VzZXJSZXdhcmRGcm9tRGVwb3NpdE51bUtFWQUOZGVwb3NpdE51bUxhc3QJARFDbGFpbUhpc3RvcnlFbnRyeQMFC3VzZXJBZGRyZXNzCAUBaQ10cmFuc2FjdGlvbklkCQCwAgIFF2NsYWltZWRBbXRCeUFzc2V0UmVzdWx0AAEJAJADAQUJdHJhbnNmZXJzDAFpAQtjb25zdHJ1Y3RvcgMNbWluTG9ja0Ftb3VudBVzdXBwb3J0ZWRSZXdhcmRBc3NldHMNc3Rha2VkQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEQa2V5TWluTG9ja0Ftb3VudAAFDW1pbkxvY2tBbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBGGtleVN1cHBvcnRlZFJld2FyZEFzc2V0cwAFFXN1cHBvcnRlZFJld2FyZEFzc2V0cwkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5U3Rha2VkQXNzZXRJZAAFDXN0YWtlZEFzc2V0SWQFA25pbAFpAQVzdGFrZQAJAQtjb21tb25TdGFrZQIIBQFpBmNhbGxlcgUBaQFpARNzdGFrZUJ5T3JpZ2luQ2FsbGVyAAkBC2NvbW1vblN0YWtlAggFAWkMb3JpZ2luQ2FsbGVyBQFpAWkBB3Vuc3Rha2UBBmFtb3VudAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECI3Vuc3Rha2UgZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50BAt1c2VyQWRkcmVzcwgFAWkGY2FsbGVyBA51c2VyQWRkcmVzc1N0cgkApQgBBQt1c2VyQWRkcmVzcwQNJHQwMjQ5NDEyNDk5NQkBD2dldFBhcmFtc09yRmFpbAAEDXN0YWtlZEFzc2V0SWQIBQ0kdDAyNDk0MTI0OTk1Al8xBA1taW5Mb2NrQW1vdW50CAUNJHQwMjQ5NDEyNDk5NQJfMgQNJHQwMjQ5OTgyNTA4MgkBE2dldFVzZXJQYXJhbXNPckZhaWwBBQt1c2VyQWRkcmVzcwQJaXNOZXdVc2VyCAUNJHQwMjQ5OTgyNTA4MgJfMQQMc3Rha2VkQW1vdW50CAUNJHQwMjQ5OTgyNTA4MgJfMgQRdnBFZmZlY3RpdmVIZWlnaHQIBQ0kdDAyNDk5ODI1MDgyAl8zBBBzd2FwUGFyYW1zU1RSVUNUCQESYXNTd2FwUGFyYW1zU1RSVUNUAQkA/QcEBRBuZXV0cmlub0NvbnRyYWN0Ahtzd2FwUGFyYW1zQnlVc2VyU1lTUkVBRE9OTFkJAMwIAgUOdXNlckFkZHJlc3NTdHIJAMwIAgAABQNuaWwFA25pbAQUc3dhcExpbWl0U3BlbnRJblVzZG4IBRBzd2FwUGFyYW1zU1RSVUNUAl8yBA5ibGNrczJMbXRSZXNldAgFEHN3YXBQYXJhbXNTVFJVQ1QCXzMDCQBmAgUUc3dhcExpbWl0U3BlbnRJblVzZG4AAAkAAgEJAKwCAgkArAICAi1Zb3UgaGF2ZSBhbHJlYWR5IG1hZGUgYSBzd2FwIG9wZXJhdGlvbi4gV2FpdCAJAKQDAQkAZAIFBmhlaWdodAUOYmxja3MyTG10UmVzZXQCEiBoZWlnaHQgdG8gdW5zdGFrZQMJAGcCAAAFDHN0YWtlZEFtb3VudAkAAgECEk5vdGhpbmcgdG8gdW5zdGFrZQMJAGYCBQZhbW91bnQFDHN0YWtlZEFtb3VudAkAAgEJAKwCAgkArAICCQCsAgICClJlcXVlc3RlZCAJAKQDAQUGYW1vdW50AhIsIGJ1dCBzdGFrZWQgb25seSAJAKQDAQUMc3Rha2VkQW1vdW50BA9zdGFrZWRBbW91bnRORVcJAGUCBQxzdGFrZWRBbW91bnQFBmFtb3VudAQNJHQwMjU3MjAyNTg3OAkBC1N0YXRzUmVzdWx0AwkBAS0BBQZhbW91bnQDCQAAAgUGYW1vdW50BQxzdGFrZWRBbW91bnQA////////////AQAAAwkAAAIFBmFtb3VudAUMc3Rha2VkQW1vdW50AP///////////wEAAAQMc3RhdHNFbnRyaWVzCAUNJHQwMjU3MjAyNTg3OAJfMQQLdG90YWxTdGFrZWQIBQ0kdDAyNTcyMDI1ODc4Al8yBA50b3RhbFN0YWtlZE5ldwgFDSR0MDI1NzIwMjU4NzgCXzMJAM4IAgkAzggCCQDOCAIJAM4IAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUGYW1vdW50BQ1zdGFrZWRBc3NldElkCQDMCAIJARJIaXN0b3J5UmVjb3JkRW50cnkHAgd1bnN0YWtlBQt1c2VyQWRkcmVzcwgFAWkNdHJhbnNhY3Rpb25JZAUMc3Rha2VkQW1vdW50BRF2cEVmZmVjdGl2ZUhlaWdodAUPc3Rha2VkQW1vdW50TkVXBRF2cEVmZmVjdGl2ZUhlaWdodAUDbmlsCQENUmV3YXJkRW50cmllcwMHBQ51c2VyQWRkcmVzc1N0cgUMc3Rha2VkQW1vdW50CQEPTG9ja1BhcmFtc0VudHJ5AwULdXNlckFkZHJlc3MFD3N0YWtlZEFtb3VudE5FVwURdnBFZmZlY3RpdmVIZWlnaHQFDHN0YXRzRW50cmllcwgJAQlvblVuc3Rha2UCBQ51c2VyQWRkcmVzc1N0cgUGYW1vdW50Al8xAWkBB2RlcG9zaXQAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIfZXhhY3QgMSBwYXltZW50IGlzIGFsbG93ZWQgb25seQQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEBmFtb3VudAgFA3BtdAZhbW91bnQECnBtdEFzc2V0SWQJAQt2YWx1ZU9yRWxzZQIIBQNwbXQHYXNzZXRJZAUHV0FWRVNJRAQNcG10QXNzZXRJZFN0cgkA2AQBBQpwbXRBc3NldElkBAhwbXRNdWx0WAMJAAACBQpwbXRBc3NldElkBQdXQVZFU0lEBQZNVUxUWDgFBk1VTFRYNgQHYW1vdW50WAkAtgIBBQZhbW91bnQEC3RvdGFsU3Rha2VkCQEMZ2V0SW50T3JFbHNlAgkBF2tleUxvY2tQYXJhbVRvdGFsQW1vdW50AAAABAx0b3RhbFN0YWtlZFgJALYCAQULdG90YWxTdGFrZWQDCQBmAgAABQt0b3RhbFN0YWtlZAkAAgECG1RPRE86IGNhc2UgaXMgbm90IHN1cHBvcnRlZAMJAAACBQt0b3RhbFN0YWtlZAAACQEiSW5jcmVtZW50Tm90RGlzdHJpYnV0ZWRSZXdhcmRFbnRyeQIFDXBtdEFzc2V0SWRTdHIFBmFtb3VudAQQcmV3YXJkUGVyTnNidFgxOAkAvAIDBQdhbW91bnRYBQdNVUxUWDE4BQx0b3RhbFN0YWtlZFgEEWRlcG9zaXROdW1MYXN0S0VZCQERa2V5RGVwb3NpdE51bUxhc3QABA5kZXBvc2l0TnVtTGFzdAkBDGdldEludE9yRWxzZQIFEWRlcG9zaXROdW1MYXN0S0VZAP///////////wEEDWRlcG9zaXROdW1OZXcJAGQCBQ5kZXBvc2l0TnVtTGFzdAABAwkBASEBCQEIY29udGFpbnMCBRJzdXBwb3J0ZWRBc3NldHNTdHIFDXBtdEFzc2V0SWRTdHIJAAIBCQCsAgIJAKwCAgUSc3VwcG9ydGVkQXNzZXRzU3RyAhEgZG9lc24ndCBjb250YWluIAUNcG10QXNzZXRJZFN0cgoBF3JlZnJlc2hSZXdhcmRQZXJOc2J0U1VNAgVhY2N1bQluZXh0QXNzZXQEFnJld2FyZFBlck5zYnRTdW1OZXdLRVkJARVrZXlSZXdhcmRQZXJOc2J0U3VtQXQCBQ1kZXBvc2l0TnVtTmV3BQluZXh0QXNzZXQECnN1bUxhc3RTdHIJAQxnZXRTdHJPckVsc2UCCQEVa2V5UmV3YXJkUGVyTnNidFN1bUF0AgUOZGVwb3NpdE51bUxhc3QFCW5leHRBc3NldAIBMAkAzQgCBQVhY2N1bQMJAAACBQluZXh0QXNzZXQFDXBtdEFzc2V0SWRTdHIJAQtTdHJpbmdFbnRyeQIFFnJld2FyZFBlck5zYnRTdW1OZXdLRVkJAKYDAQkAtwICCQCnAwEFCnN1bUxhc3RTdHIFEHJld2FyZFBlck5zYnRYMTgJAQtTdHJpbmdFbnRyeQIFFnJld2FyZFBlck5zYnRTdW1OZXdLRVkFCnN1bUxhc3RTdHIJAM4IAgkAzggCCQDNCAIKAAIkbAUTc3VwcG9ydGVkQXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEXcmVmcmVzaFJld2FyZFBlck5zYnRTVU0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkJAQxJbnRlZ2VyRW50cnkCBRFkZXBvc2l0TnVtTGFzdEtFWQUNZGVwb3NpdE51bU5ldwkBFURlcG9zaXRzVG90YWxzRW50cmllcwIFBmFtb3VudAUNcG10QXNzZXRJZFN0cgkBDHVwZGF0ZVRvdGFscwABaQEMY2xhaW1SZXdhcmRzAAkBC2NvbW1vbkNsYWltAggFAWkGY2FsbGVyBQFpAWkBGmNsYWltUmV3YXJkc0J5T3JpZ2luQ2FsbGVyAAkBC2NvbW1vbkNsYWltAggFAWkMb3JpZ2luQ2FsbGVyBQFpAWkBGHVuY2xhaW1lZFJld2FyZHNSRUFET05MWQEOdXNlckFkZHJlc3NTdHIKARZmb3JFYWNoQXNzZXRaZXJvUmV3YXJkAgVhY2N1bQVhc3NldAkArAICCQCsAgIFBWFjY3VtCQC5CQIJAMwIAgUFYXNzZXQJAMwIAgIBMAkAzAgCAgEwBQNuaWwCAToCAV8EEnVuY2xhaW1lZFJld2FyZFN0cgMJAAACBQ51c2VyQWRkcmVzc1N0cgIACgACJGwFE3N1cHBvcnRlZEFzc2V0c0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBFmZvckVhY2hBc3NldFplcm9SZXdhcmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkEC3VzZXJBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBQ51c2VyQWRkcmVzc1N0cgQNJHQwMjg2MDAyODcwNQkBC3ZhbHVlT3JFbHNlAgkBE2dldFVzZXJQYXJhbXNPclVuaXQBBQt1c2VyQWRkcmVzcwkAlQoDBgAAAAAECWlzTmV3VXNlcggFDSR0MDI4NjAwMjg3MDUCXzEEDHN0YWtlZEFtb3VudAgFDSR0MDI4NjAwMjg3MDUCXzIEDHN0YWtpbmdTdGFydAgFDSR0MDI4NjAwMjg3MDUCXzMEDXN0YWtlZEFtb3VudFgJALYCAQUMc3Rha2VkQW1vdW50BBt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkJARtrZXlVc2VyUmV3YXJkRnJvbURlcG9zaXROdW0BBQ51c2VyQWRkcmVzc1N0cgQOZGVwb3NpdE51bVVzZXIJAQxnZXRJbnRPckVsc2UCBRt1c2VyUmV3YXJkRnJvbURlcG9zaXROdW1LRVkA////////////AQQOZGVwb3NpdE51bUxhc3QJAQxnZXRJbnRPckVsc2UCCQERa2V5RGVwb3NpdE51bUxhc3QAAP///////////wEKAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgVhY2N1bQVhc3NldAQNJHQwMjkwNTEyOTE4OQkBCmNhbGNSZXdhcmQFBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQFDXN0YWtlZEFtb3VudFgFDmRlcG9zaXROdW1Vc2VyBQ5kZXBvc2l0TnVtTGFzdAQLcmV3YXJkVG90YWwIBQ0kdDAyOTA1MTI5MTg5Al8xBAZjYWNoZWQIBQ0kdDAyOTA1MTI5MTg5Al8yBAdkeW5hbWljCAUNJHQwMjkwNTEyOTE4OQJfMwQTcmV3YXJkQ2FjaGVkUGFydEtFWQgFDSR0MDI5MDUxMjkxODkCXzQEB2NsYWltZWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBCmtleUNsYWltZWQCBQ51c2VyQWRkcmVzc1N0cgUFYXNzZXQAAAkArAICCQCsAgIFBWFjY3VtCQC5CQIJAMwIAgUFYXNzZXQJAMwIAgkApAMBBQtyZXdhcmRUb3RhbAkAzAgCCQCkAwEFB2NsYWltZWQFA25pbAIBOgIBXwoAAiRsBRNzdXBwb3J0ZWRBc3NldHNMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAR9mb3JFYWNoQXNzZXRDYWxjVW5jbGFpbWVkUmV3YXJkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA5CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJCQCUCgIFA25pbAkAswICBRJ1bmNsYWltZWRSZXdhcmRTdHIAAQFpARF1cGRhdGVWb3RpbmdQb3dlcgEOdXNlckFkZHJlc3NTdHIDCQEBIQEJAQlpc0RlZmluZWQBCQCmCAEFDnVzZXJBZGRyZXNzU3RyCQACAQIUSW52YWxpZCB1c2VyIGFkZHJlc3MEAXIJAQdvblN0YWtlAgUOdXNlckFkZHJlc3NTdHIAAAkAlAoCCAUBcgJfMQkAzAgCCQELc3VyZlRvR25zYnQBCAUBcgJfMgkAzAgCCQELc3VyZlRvR25zYnQBCAUBcgJfMwkAzAgCCQELc3VyZlRvR25zYnQBCAUBcgJfNAkAzAgCCQELc3VyZlRvR25zYnQBCAUBcgJfNQkAzAgCCQELc3VyZlRvR25zYnQBCAUBcgJfNgkAzAgCCQELc3VyZlRvR25zYnQBCAUBcgJfNwUDbmlsAWkBFnN1cmZTdGFraW5nU1lTUkVBRE9OTFkCFXVzZXJBZGRyZXNzU3RyT3JFbXB0eQhzdXJmRGlmZgQJc3VyZlRvdGFsCQEMZ2V0SW50T3JFbHNlAgkBF2tleUxvY2tQYXJhbVRvdGFsQW1vdW50AAAABBJnbnNidEZyb21TdXJmVG90YWwJAQtzdXJmVG9HbnNidAEFCXN1cmZUb3RhbAQBcgMJAGcCBQhzdXJmRGlmZgAACQEHb25TdGFrZQIFFXVzZXJBZGRyZXNzU3RyT3JFbXB0eQUIc3VyZkRpZmYJAQlvblVuc3Rha2UCBRV1c2VyQWRkcmVzc1N0ck9yRW1wdHkJAQEtAQUIc3VyZkRpZmYDCQAAAgUVdXNlckFkZHJlc3NTdHJPckVtcHR5AgAJAJQKAgUDbmlsCQDMCAIAAAkAzAgCBQlzdXJmVG90YWwJAMwIAgAACQDMCAIFEmduc2J0RnJvbVN1cmZUb3RhbAkAzAgCBQZoZWlnaHQJAMwIAgUGaGVpZ2h0CQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl8yCQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl8zCQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl80CQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl81CQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl82CQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl83BQNuaWwEC3VzZXJBZGRyZXNzCQEPdG9BZGRyZXNzT3JGYWlsAQUVdXNlckFkZHJlc3NTdHJPckVtcHR5BAptZXJnZWREYXRhCQEKbWVyZ2VTdGFrZQQFC3VzZXJBZGRyZXNzBQhzdXJmRGlmZggFAXICXzYIBQFyAl83BAxzdGFrZWRBbW91bnQIBQptZXJnZWREYXRhAl8yBBF2cEVmZmVjdGl2ZUhlaWdodAgFCm1lcmdlZERhdGECXzMED3N0YWtlZEFtb3VudE5FVwgFCm1lcmdlZERhdGECXzQEFHZwRWZmZWN0aXZlSGVpZ2h0TkVXCAUKbWVyZ2VkRGF0YQJfNQQIc3VyZlVzZXIFDHN0YWtlZEFtb3VudAQRZ25zYnRGcm9tU3VyZlVzZXIJAQtzdXJmVG9HbnNidAEFCHN1cmZVc2VyCQCUCgIFA25pbAkAzAgCBQhzdXJmVXNlcgkAzAgCBQlzdXJmVG90YWwJAMwIAgURZ25zYnRGcm9tU3VyZlVzZXIJAMwIAgUSZ25zYnRGcm9tU3VyZlRvdGFsCQDMCAIFEXZwRWZmZWN0aXZlSGVpZ2h0CQDMCAIFFHZwRWZmZWN0aXZlSGVpZ2h0TkVXCQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl8yCQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl8zCQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl80CQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl81CQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl82CQDMCAIJAQtzdXJmVG9HbnNidAEIBQFyAl83BQNuaWwBaQEYZ25zYnRGcm9tU3VyZlNZU1JFQURPTkxZAQdzdXJmQW10CQCUCgIFA25pbAkBC3N1cmZUb0duc2J0AQUHc3VyZkFtdAFpARFjb25maWdTWVNSRUFET05MWQAECm1pbkxvY2tBbXQJARFAZXh0ck5hdGl2ZSgxMDU1KQEJARBrZXlNaW5Mb2NrQW1vdW50AAQgc3VyZlZvdGluZ1Bvd2VyUmVzdHJpY3RpdmVQZXJpb2QFDURFRkFVTFRQRVJJT0QEG2JyVG9TdGFydFN1cmZUcmFuc2Zvcm1hdGlvbgCwmEYJAJQKAgUDbmlsCQDMCAIFCm1pbkxvY2tBbXQJAMwIAgkAaAIFEmduc2J0RnJvbVN1cmZDb2VmZgUFTVVMVDYJAMwIAgUgc3VyZlZvdGluZ1Bvd2VyUmVzdHJpY3RpdmVQZXJpb2QJAMwIAgUbYnJUb1N0YXJ0U3VyZlRyYW5zZm9ybWF0aW9uBQNuaWwAzApGYQ==",
    "chainId": 87,
    "height": 3405331,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8G2dAhiHhEbuuaAP2TdFzX1bkwfh2HycbVuLN7e8Yn2y
Next: 8wgfW7zRKiTAc93bgKQYwhEGvguLiPJAPb1nQ9ixjkWY

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let revisionNum = "6a94b841b387e5d4bd8be8f8ed5f80057ef86186"
4 + let revisionNum = "c556dd7e5f6e83db072aec698b7b12b2b942a395"
5 5  
6 6  let separator = "__"
7 7  
22 22  let WAVESID = fromBase58String(WAVESIDSTR)
23 23  
24 24  let DAYMILLIS = 86400000
25 + 
26 + let DEFAULTPERIOD = (1440 * 14)
25 27  
26 28  let IdxControlCfgNeutrinoDapp = 1
27 29  
45 47  
46 48  let IdxControlCfgGnsbtControllerDapp = 11
47 49  
50 + let IdxControlCfgRestV2Dapp = 12
51 + 
52 + let IdxControlCfgGovernanceDapp = 13
53 + 
48 54  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
49 55  
50 56  
57 63  func keyGnsbtFromSurfCoeff () = "%s%s__cfg__gnsbtFromSurfCoeff"
58 64  
59 65  
60 - func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
66 + func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
61 67  
62 68  
63 69  func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
72 78  let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
73 79  
74 80  let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
81 + 
82 + let govContract = getContractAddressOrFail(controlCfg, IdxControlCfgGovernanceDapp)
75 83  
76 84  let gnsbtFromSurfCoeff = valueOrElse(getInteger(this, keyGnsbtFromSurfCoeff()), 300)
77 85  
114 122  func keyStatsDepositAmtTotals () = makeString(["%s%s%d", "stats", "depositAmtTotals"], separator)
115 123  
116 124  
117 - func keyNextPeriod () = "%s__nextPeriod"
118 - 
119 - 
120 125  func keySupportedRewardAssets () = "supportedRewardAssets"
121 126  
122 127  
136 141  
137 142  
138 143  func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
144 + 
145 + 
146 + func keyVpPeriodDuration () = makeString(["%s%s", "vp", "periodDuration"], separator)
147 + 
148 + 
149 + func keyLastTotalsPeriodProcessed () = makeString(["%s%s", "vp", "lastTotalsPeriodProcessed"], separator)
150 + 
151 + 
152 + func keyLastUserPeriodProcessed (userAddress) = makeString(["%s%s%s", "vp", "lastUserPeriodProcessed", userAddress], separator)
153 + 
154 + 
155 + func keyTotalMature () = makeString(["%s%s", "vp", "totalMature"], separator)
156 + 
157 + 
158 + func keyTotalTeen () = makeString(["%s%s", "vp", "totalTeen"], separator)
159 + 
160 + 
161 + func keyTotalKid () = makeString(["%s%s", "vp", "totalKid"], separator)
162 + 
163 + 
164 + func keyUserMature (userAddress) = makeString(["%s%s%s", "vp", "userMature", userAddress], separator)
165 + 
166 + 
167 + func keyUserTeen (userAddress) = makeString(["%s%s%s", "vp", "userTeen", userAddress], separator)
168 + 
169 + 
170 + func keyUserKid (userAddress) = makeString(["%s%s%s", "vp", "userKid", userAddress], separator)
139 171  
140 172  
141 173  func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
274 306      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
275 307      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
276 308      func forEachAssetCacheUserReward (accum,asset) =     {
277 -         let $t01112111256 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
278 -         let rewardTotal = $t01112111256._1
279 -         let cached = $t01112111256._2
280 -         let dynamic = $t01112111256._3
281 -         let rewardCachedPartKEY = $t01112111256._4
309 +         let $t01215112286 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
310 +         let rewardTotal = $t01215112286._1
311 +         let cached = $t01215112286._2
312 +         let dynamic = $t01215112286._3
313 +         let rewardCachedPartKEY = $t01215112286._4
282 314          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
283 315          }
284 316  
323 355  func surfToGnsbt (surfAmt) = (surfAmt / gnsbtFromSurfCoeff)
324 356  
325 357  
326 - func mergeVotingPowerEffectiveHeight (quarantinePeriod,vpEffectiveHeight,stakedAmt,stakedAmtNEW) = {
327 -     let remainingToWait = (vpEffectiveHeight - height)
328 -     if ((0 >= remainingToWait))
329 -         then (height + quarantinePeriod)
330 -         else {
331 -             let alreadyWaited = (quarantinePeriod - remainingToWait)
332 -             let kX8 = if ((stakedAmtNEW != 0))
333 -                 then fraction(stakedAmt, MULT8, stakedAmtNEW)
334 -                 else vpEffectiveHeight
335 -             ((quarantinePeriod + height) - fraction(alreadyWaited, kX8, MULT8))
336 -             }
358 + func mergeStake (userAddress,amountToAdd,userTeen,userKid) = {
359 +     let $t01520915319 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
360 +     let isNewUser = $t01520915319._1
361 +     let stakedAmount = $t01520915319._2
362 +     let vpEffectiveHeight = $t01520915319._3
363 +     let stakedAmountNEW = if (isNewUser)
364 +         then amountToAdd
365 +         else (amountToAdd + stakedAmount)
366 +     let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
367 +     let period = (height / W2)
368 +     let vpEffectivePeriodNEW = if ((userKid > 0))
369 +         then (period + 2)
370 +         else if ((userTeen > 0))
371 +             then (period + 1)
372 +             else period
373 +     $Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, (vpEffectivePeriodNEW * W2))
337 374      }
338 375  
339 376  
340 - func mergeStake (userAddress,amountToAdd) = {
341 -     let $t01490815018 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
342 -     let isNewUser = $t01490815018._1
343 -     let stakedAmount = $t01490815018._2
344 -     let vpEffectiveHeight = $t01490815018._3
345 -     let stakedAmountNEW = if (isNewUser)
346 -         then amountToAdd
347 -         else (amountToAdd + stakedAmount)
348 -     let quarantinePeriod = (1440 * 14)
349 -     let vpEffectiveHeightNEW = if (isNewUser)
350 -         then (quarantinePeriod + height)
351 -         else mergeVotingPowerEffectiveHeight(quarantinePeriod, vpEffectiveHeight, stakedAmount, stakedAmountNEW)
352 -     $Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)
377 + func updateTotals () = {
378 +     let period = (height / getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD))
379 +     if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
380 +         then {
381 +             let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
382 + [IntegerEntry(keyTotalMature(), (totalMature + getIntOrZero(keyTotalTeen()))), IntegerEntry(keyTotalTeen(), getIntOrZero(keyTotalKid())), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)]
383 +             }
384 +         else nil
353 385      }
354 386  
355 387  
388 + func onStake (userAddressStr,amountToAdd) = if ((0 > amountToAdd))
389 +     then throw("amountToAdd should be >= 0")
390 +     else {
391 +         let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
392 +         let period = (height / W2)
393 +         let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
394 +         let totalTeen = getIntOrZero(keyTotalTeen())
395 +         let totalKid = getIntOrZero(keyTotalKid())
396 +         let userMature = if ((userAddressStr == ""))
397 +             then 0
398 +             else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
399 +         let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
400 +         let userKid = getIntOrZero(keyUserKid(userAddressStr))
401 +         let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
402 +             then $Tuple7((totalMature + userTeen), (totalTeen + (userKid - userTeen)), (totalKid - userKid), (userMature + userTeen), userKid, 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
403 +             else $Tuple7(totalMature, totalTeen, totalKid, userMature, userTeen, userKid, nil)
404 +         let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
405 +             then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
406 +             else $Tuple4(nil, totalMature, totalTeen, totalKid)
407 +         let newKid = fraction(amountToAdd, (height % W2), W2)
408 +         let newTeen = (amountToAdd - newKid)
409 +         $Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), (tmp._5 + newTeen))) :+ IntegerEntry(keyUserKid(userAddressStr), (tmp._6 + newKid))) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, (tmp._5 + newTeen), (tmp._6 + newKid))
410 +         }
411 + 
412 + 
413 + let IdxNewDiff = 0
414 + 
415 + let IdxNewGnsbt = 1
416 + 
417 + func userDecrease (gnsbt,diff) = if ((diff >= gnsbt))
418 +     then [(diff - gnsbt), 0]
419 +     else [0, (gnsbt - diff)]
420 + 
421 + 
422 + func onUnstake (userAddressStr,amountToRemove) = if ((0 >= amountToRemove))
423 +     then throw("amountToRemove should be > 0")
424 +     else {
425 +         let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
426 +         let period = (height / W2)
427 +         let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
428 +         let totalTeen = getIntOrZero(keyTotalTeen())
429 +         let totalKid = getIntOrZero(keyTotalKid())
430 +         let userMature = if ((userAddressStr == ""))
431 +             then 0
432 +             else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
433 +         let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
434 +         let userKid = getIntOrZero(keyUserKid(userAddressStr))
435 +         let um = userDecrease(userMature, amountToRemove)
436 +         let ut = userDecrease(userTeen, um[IdxNewDiff])
437 +         let uk = userDecrease(userKid, ut[IdxNewDiff])
438 +         if ((uk[IdxNewDiff] != 0))
439 +             then throw("Should not happen")
440 +             else {
441 +                 let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
442 +                     then $Tuple7((totalMature + ut[IdxNewGnsbt]), (totalTeen + (uk[IdxNewGnsbt] - ut[IdxNewGnsbt])), (totalKid - uk[IdxNewGnsbt]), (um[IdxNewGnsbt] + ut[IdxNewGnsbt]), uk[IdxNewGnsbt], 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
443 +                     else $Tuple7(totalMature, totalTeen, totalKid, um[IdxNewGnsbt], ut[IdxNewGnsbt], uk[IdxNewGnsbt], nil)
444 +                 let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
445 +                     then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
446 +                     else $Tuple4(nil, totalMature, totalTeen, totalKid)
447 +                 $Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), tmp._5)) :+ IntegerEntry(keyUserKid(userAddressStr), tmp._6)) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, tmp._5, tmp._6)
448 +                 }
449 +         }
450 + 
451 + 
356 452  func commonStake (userAddress,i) = {
357 -     let $t01550415558 = getParamsOrFail()
358 -     let stakedAssetId = $t01550415558._1
359 -     let minLockAmount = $t01550415558._2
453 +     let $t02120621260 = getParamsOrFail()
454 +     let stakedAssetId = $t02120621260._1
455 +     let minLockAmount = $t02120621260._2
360 456      if ((size(i.payments) != 1))
361 457          then throw("Invalid payments size")
362 458          else {
368 464                  then throw(invalidAssetMessage)
369 465                  else {
370 466                      let userAddressStr = toString(userAddress)
371 -                     let mergedData = mergeStake(userAddress, amount)
467 +                     let r = onStake(userAddressStr, amount)
468 +                     let mergedData = mergeStake(userAddress, amount, r._6, r._7)
372 469                      let isNewUser = mergedData._1
373 470                      let stakedAmount = mergedData._2
374 471                      let vpEffectiveHeight = mergedData._3
377 474                      if ((minLockAmount > stakedAmountNEW))
378 475                          then throw(("Min lock amount is " + toString(minLockAmount)))
379 476                          else {
380 -                             let $t01635716459 = StatsResult(amount, 1, if (isNewUser)
477 +                             let $t02211422216 = StatsResult(amount, 1, if (isNewUser)
381 478                                  then 1
382 479                                  else 0)
383 -                             let statsEntries = $t01635716459._1
384 -                             let totalStaked = $t01635716459._2
385 -                             let totalStakedNew = $t01635716459._3
386 -                             ((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries)
480 +                             let statsEntries = $t02211422216._1
481 +                             let totalStaked = $t02211422216._2
482 +                             let totalStakedNew = $t02211422216._3
483 +                             (((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries) ++ r._1)
387 484                              }
388 485                      }
389 486              }
395 492      if ((size(i.payments) > 0))
396 493          then throw("payments are not accepted")
397 494          else {
398 -             let $t01693817043 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
399 -             let isNewUser = $t01693817043._1
400 -             let stakedAmount = $t01693817043._2
401 -             let stakingStart = $t01693817043._3
495 +             let $t02272322828 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
496 +             let isNewUser = $t02272322828._1
497 +             let stakedAmount = $t02272322828._2
498 +             let stakingStart = $t02272322828._3
402 499              let stakedAmountX = toBigInt(stakedAmount)
403 500              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
404 501              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
405 502              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
406 503              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
407 -                 let $t01741417552 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
408 -                 let rewardTotal = $t01741417552._1
409 -                 let cached = $t01741417552._2
410 -                 let dynamic = $t01741417552._3
411 -                 let rewardCachedPartKEY = $t01741417552._4
504 +                 let $t02319923337 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
505 +                 let rewardTotal = $t02319923337._1
506 +                 let cached = $t02319923337._2
507 +                 let dynamic = $t02319923337._3
508 +                 let rewardCachedPartKEY = $t02319923337._4
412 509                  let claimedKEY = keyClaimed(userAddressStr, asset)
413 -                 let $t01761217649 = accum
414 -                 let data = $t01761217649._1
415 -                 let claimedAmtByAsset = $t01761217649._2
510 +                 let $t02339723434 = accum
511 +                 let data = $t02339723434._1
512 +                 let claimedAmtByAsset = $t02339723434._2
416 513                  let newPart = makeString([asset, toString(rewardTotal)], ":")
417 514                  let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
418 515                  if ((0 >= rewardTotal))
420 517                      else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
421 518                  }
422 519  
423 -             let $t01810918222 = {
520 +             let $t02389424007 = {
424 521                  let $l = supportedAssetsList
425 522                  let $s = size($l)
426 523                  let $acc0 = $Tuple2(nil, "")
434 531  
435 532                  $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)
436 533                  }
437 -             let transfers = $t01810918222._1
438 -             let claimedAmtByAssetResult = $t01810918222._2
534 +             let transfers = $t02389424007._1
535 +             let claimedAmtByAssetResult = $t02389424007._2
439 536              if ((0 >= size(transfers)))
440 537                  then $Tuple2(nil, 0)
441 538                  else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))
466 563      else {
467 564          let userAddress = i.caller
468 565          let userAddressStr = toString(userAddress)
469 -         let $t01915619210 = getParamsOrFail()
470 -         let stakedAssetId = $t01915619210._1
471 -         let minLockAmount = $t01915619210._2
472 -         let $t01921319297 = getUserParamsOrFail(userAddress)
473 -         let isNewUser = $t01921319297._1
474 -         let stakedAmount = $t01921319297._2
475 -         let vpEffectiveHeight = $t01921319297._3
566 +         let $t02494124995 = getParamsOrFail()
567 +         let stakedAssetId = $t02494124995._1
568 +         let minLockAmount = $t02494124995._2
569 +         let $t02499825082 = getUserParamsOrFail(userAddress)
570 +         let isNewUser = $t02499825082._1
571 +         let stakedAmount = $t02499825082._2
572 +         let vpEffectiveHeight = $t02499825082._3
476 573          let swapParamsSTRUCT = asSwapParamsSTRUCT(reentrantInvoke(neutrinoContract, "swapParamsByUserSYSREADONLY", [userAddressStr, 0], nil))
477 574          let swapLimitSpentInUsdn = swapParamsSTRUCT._2
478 575          let blcks2LmtReset = swapParamsSTRUCT._3
484 581                      then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(stakedAmount)))
485 582                      else {
486 583                          let stakedAmountNEW = (stakedAmount - amount)
487 -                         let $t01993520093 = StatsResult(-(amount), if ((amount == stakedAmount))
584 +                         let $t02572025878 = StatsResult(-(amount), if ((amount == stakedAmount))
488 585                              then -1
489 586                              else 0, if ((amount == stakedAmount))
490 587                              then -1
491 588                              else 0)
492 -                         let statsEntries = $t01993520093._1
493 -                         let totalStaked = $t01993520093._2
494 -                         let totalStakedNew = $t01993520093._3
495 -                         ((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeight)] ++ RewardEntries(false, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeight)) ++ statsEntries)
589 +                         let statsEntries = $t02572025878._1
590 +                         let totalStaked = $t02572025878._2
591 +                         let totalStakedNew = $t02572025878._3
592 +                         (((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeight)] ++ RewardEntries(false, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeight)) ++ statsEntries) ++ onUnstake(userAddressStr, amount)._1)
496 593                          }
497 594          }
498 595  
532 629                                      else StringEntry(rewardPerNsbtSumNewKEY, sumLastStr)))
533 630                                  }
534 631  
535 -                             (({
632 +                             ((({
536 633                                  let $l = supportedAssetsList
537 634                                  let $s = size($l)
538 635                                  let $acc0 = nil
545 642                                      else throw("List size exceeds 9")
546 643  
547 644                                  $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)
548 -                                 } :+ IntegerEntry(depositNumLastKEY, depositNumNew)) ++ DepositsTotalsEntries(amount, pmtAssetIdStr))
645 +                                 } :+ IntegerEntry(depositNumLastKEY, depositNumNew)) ++ DepositsTotalsEntries(amount, pmtAssetIdStr)) ++ updateTotals())
549 646                              }
550 647                      }
551 648          }
583 680              }
584 681          else {
585 682              let userAddress = addressFromStringValue(userAddressStr)
586 -             let $t02271722822 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
587 -             let isNewUser = $t02271722822._1
588 -             let stakedAmount = $t02271722822._2
589 -             let stakingStart = $t02271722822._3
683 +             let $t02860028705 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
684 +             let isNewUser = $t02860028705._1
685 +             let stakedAmount = $t02860028705._2
686 +             let stakingStart = $t02860028705._3
590 687              let stakedAmountX = toBigInt(stakedAmount)
591 688              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
592 689              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
593 690              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
594 691              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
595 -                 let $t02316823306 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
596 -                 let rewardTotal = $t02316823306._1
597 -                 let cached = $t02316823306._2
598 -                 let dynamic = $t02316823306._3
599 -                 let rewardCachedPartKEY = $t02316823306._4
692 +                 let $t02905129189 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
693 +                 let rewardTotal = $t02905129189._1
694 +                 let cached = $t02905129189._2
695 +                 let dynamic = $t02905129189._3
696 +                 let rewardCachedPartKEY = $t02905129189._4
600 697                  let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
601 698                  ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
602 699                  }
620 717  
621 718  
622 719  @Callable(i)
720 + func updateVotingPower (userAddressStr) = if (!(isDefined(addressFromString(userAddressStr))))
721 +     then throw("Invalid user address")
722 +     else {
723 +         let r = onStake(userAddressStr, 0)
724 +         $Tuple2(r._1, [surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
725 +         }
726 + 
727 + 
728 + 
729 + @Callable(i)
623 730  func surfStakingSYSREADONLY (userAddressStrOrEmpty,surfDiff) = {
624 731      let surfTotal = getIntOrElse(keyLockParamTotalAmount(), 0)
625 732      let gnsbtFromSurfTotal = surfToGnsbt(surfTotal)
733 +     let r = if ((surfDiff >= 0))
734 +         then onStake(userAddressStrOrEmpty, surfDiff)
735 +         else onUnstake(userAddressStrOrEmpty, -(surfDiff))
626 736      if ((userAddressStrOrEmpty == ""))
627 -         then $Tuple2(nil, [0, surfTotal, 0, gnsbtFromSurfTotal, 0, height, height])
737 +         then $Tuple2(nil, [0, surfTotal, 0, gnsbtFromSurfTotal, height, height, surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
628 738          else {
629 739              let userAddress = toAddressOrFail(userAddressStrOrEmpty)
630 -             let mergedData = mergeStake(userAddress, surfDiff)
631 -             let isNewUser = mergedData._1
740 +             let mergedData = mergeStake(userAddress, surfDiff, r._6, r._7)
632 741              let stakedAmount = mergedData._2
633 742              let vpEffectiveHeight = mergedData._3
634 743              let stakedAmountNEW = mergedData._4
635 744              let vpEffectiveHeightNEW = mergedData._5
636 745              let surfUser = stakedAmount
637 746              let gnsbtFromSurfUser = surfToGnsbt(surfUser)
638 -             $Tuple2(nil, [surfUser, surfTotal, gnsbtFromSurfUser, gnsbtFromSurfTotal, vpEffectiveHeight, vpEffectiveHeightNEW])
747 +             $Tuple2(nil, [surfUser, surfTotal, gnsbtFromSurfUser, gnsbtFromSurfTotal, vpEffectiveHeight, vpEffectiveHeightNEW, surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
639 748              }
640 749      }
641 750  
649 758  @Callable(i)
650 759  func configSYSREADONLY () = {
651 760      let minLockAmt = getIntegerValue(keyMinLockAmount())
652 -     let surfVotingPowerRestrictivePeriod = (1440 * 14)
761 +     let surfVotingPowerRestrictivePeriod = DEFAULTPERIOD
653 762      let brToStartSurfTransformation = 1150000
654 763      $Tuple2(nil, [minLockAmt, (gnsbtFromSurfCoeff * MULT6), surfVotingPowerRestrictivePeriod, brToStartSurfTransformation])
655 764      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let revisionNum = "6a94b841b387e5d4bd8be8f8ed5f80057ef86186"
4 + let revisionNum = "c556dd7e5f6e83db072aec698b7b12b2b942a395"
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 DEFAULTPERIOD = (1440 * 14)
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 IdxControlCfgSurfStakingDapp = 10
45 47  
46 48  let IdxControlCfgGnsbtControllerDapp = 11
47 49  
50 + let IdxControlCfgRestV2Dapp = 12
51 + 
52 + let IdxControlCfgGovernanceDapp = 13
53 + 
48 54  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
49 55  
50 56  
51 57  func keyControlAddress () = "%s%s__config__controlAddress"
52 58  
53 59  
54 60  func keyControlCfg () = "%s__controlConfig"
55 61  
56 62  
57 63  func keyGnsbtFromSurfCoeff () = "%s%s__cfg__gnsbtFromSurfCoeff"
58 64  
59 65  
60 - func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
66 + func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
61 67  
62 68  
63 69  func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
64 70  
65 71  
66 72  let controlContract = addressFromStringValue(valueOrElse(getString(this, keyControlAddress()), "3P5Bfd58PPfNvBM2Hy8QfbcDqMeNtzg7KfP"))
67 73  
68 74  let controlCfg = readControlCfgOrFail(controlContract)
69 75  
70 76  let mathContract = getContractAddressOrFail(controlCfg, IdxControlCfgMathDapp)
71 77  
72 78  let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
73 79  
74 80  let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
81 + 
82 + let govContract = getContractAddressOrFail(controlCfg, IdxControlCfgGovernanceDapp)
75 83  
76 84  let gnsbtFromSurfCoeff = valueOrElse(getInteger(this, keyGnsbtFromSurfCoeff()), 300)
77 85  
78 86  func keyBondAsset () = "bond_asset_id"
79 87  
80 88  
81 89  func keyAuctionContractAddress () = "auction_contract"
82 90  
83 91  
84 92  func keyMinLockAmount () = "%s__minLockAmount"
85 93  
86 94  
87 95  func keyStakedAssetId () = "%s__stakedAssetId"
88 96  
89 97  
90 98  func keyLockParamUserAmount (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "amount"], separator)
91 99  
92 100  
93 101  func keyLockParamStartBlock (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "start"], separator)
94 102  
95 103  
96 104  func keyLockParamVotingPowerEffectiveHeight (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "vpEffectiveHeight"], separator)
97 105  
98 106  
99 107  func keyHistoryRecord (type,userAddress,txId) = makeString(["%s%s%s%s", "history", type, toString(userAddress), toBase58String(txId)], separator)
100 108  
101 109  
102 110  func keyLockParamTotalAmount () = makeString(["%s%s", "stats", "activeTotalLocked"], separator)
103 111  
104 112  
105 113  func keyStatsLocksCount () = makeString(["%s%s", "stats", "locksCount"], separator)
106 114  
107 115  
108 116  func keyStatsUsersCount () = makeString(["%s%s", "stats", "activeUsersCount"], separator)
109 117  
110 118  
111 119  func keyStatsDepositAmtByDay (timestamp) = makeString(["%s%s%d", "stats", "depositAmtByDay", toString(timestamp)], separator)
112 120  
113 121  
114 122  func keyStatsDepositAmtTotals () = makeString(["%s%s%d", "stats", "depositAmtTotals"], separator)
115 123  
116 124  
117 - func keyNextPeriod () = "%s__nextPeriod"
118 - 
119 - 
120 125  func keySupportedRewardAssets () = "supportedRewardAssets"
121 126  
122 127  
123 128  func keyDepositNumLast () = makeString(["%s%s%s", "dep", "lastNum"], separator)
124 129  
125 130  
126 131  func keyUserRewardFromDepositNum (userAddress) = makeString(["%s%s%s", "userRwdFromDepNum", userAddress], separator)
127 132  
128 133  
129 134  func keyRewardPerNsbtSumAt (depositNum,tkn) = makeString(["%s%d", "rwdPerNsbtSumByDepNum", toString(depositNum), tkn], separator)
130 135  
131 136  
132 137  func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
133 138  
134 139  
135 140  func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
136 141  
137 142  
138 143  func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
144 + 
145 + 
146 + func keyVpPeriodDuration () = makeString(["%s%s", "vp", "periodDuration"], separator)
147 + 
148 + 
149 + func keyLastTotalsPeriodProcessed () = makeString(["%s%s", "vp", "lastTotalsPeriodProcessed"], separator)
150 + 
151 + 
152 + func keyLastUserPeriodProcessed (userAddress) = makeString(["%s%s%s", "vp", "lastUserPeriodProcessed", userAddress], separator)
153 + 
154 + 
155 + func keyTotalMature () = makeString(["%s%s", "vp", "totalMature"], separator)
156 + 
157 + 
158 + func keyTotalTeen () = makeString(["%s%s", "vp", "totalTeen"], separator)
159 + 
160 + 
161 + func keyTotalKid () = makeString(["%s%s", "vp", "totalKid"], separator)
162 + 
163 + 
164 + func keyUserMature (userAddress) = makeString(["%s%s%s", "vp", "userMature", userAddress], separator)
165 + 
166 + 
167 + func keyUserTeen (userAddress) = makeString(["%s%s%s", "vp", "userTeen", userAddress], separator)
168 + 
169 + 
170 + func keyUserKid (userAddress) = makeString(["%s%s%s", "vp", "userKid", userAddress], separator)
139 171  
140 172  
141 173  func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
142 174  
143 175  
144 176  func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
145 177  
146 178  
147 179  func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
148 180  
149 181  
150 182  func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
151 183  
152 184  
153 185  func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
154 186  
155 187  
156 188  func toAddressOrFail (addressStr) = valueOrErrorMessage(addressFromString(addressStr), ("couldn't parse passed addressStr=" + addressStr))
157 189  
158 190  
159 191  func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
160 192      then unit
161 193      else fromBase58String(assetStr)
162 194  
163 195  
164 196  func asInt (val) = match val {
165 197      case valInt: Int => 
166 198          valInt
167 199      case _ => 
168 200          throw("fail to cast into Int")
169 201  }
170 202  
171 203  
172 204  func asSwapParamsSTRUCT (v) = match v {
173 205      case struct: (Int, Int, Int, Int, Int, Int, Int) => 
174 206          struct
175 207      case _ => 
176 208          throw("fail to cast into Int")
177 209  }
178 210  
179 211  
180 212  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)
181 213  
182 214  
183 215  func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
184 216  
185 217  
186 218  func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
187 219  
188 220  
189 221  func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
190 222  
191 223  
192 224  func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
193 225      let locksCount = getIntOrZero(keyStatsLocksCount())
194 226      let usersCount = getIntOrZero(keyStatsUsersCount())
195 227      let totalAmount = getIntOrZero(keyLockParamTotalAmount())
196 228      let totalAmountNew = (totalAmount + totalLockedInc)
197 229      $Tuple3([IntegerEntry(keyStatsLocksCount(), (locksCount + lockCountInc)), IntegerEntry(keyStatsUsersCount(), (usersCount + usersCountInc)), IntegerEntry(keyLockParamTotalAmount(), totalAmountNew)], totalAmount, totalAmountNew)
198 230      }
199 231  
200 232  
201 233  func LockParamsEntry (userAddress,amount,votingPowerEffectiveHeight) = [IntegerEntry(keyLockParamUserAmount(userAddress), amount), IntegerEntry(keyLockParamStartBlock(userAddress), votingPowerEffectiveHeight)]
202 234  
203 235  
204 236  func getParamsOrFail () = $Tuple2(fromBase58String(getStringOrFail(this, keyStakedAssetId())), getIntOrFail(keyMinLockAmount()))
205 237  
206 238  
207 239  func isActiveUser (userAddress) = (getIntOrElse(keyLockParamUserAmount(userAddress), 0) > 0)
208 240  
209 241  
210 242  func getUserParamsOrUnit (userAddress) = if (isActiveUser(userAddress))
211 243      then $Tuple3(false, getIntOrFail(keyLockParamUserAmount(userAddress)), getIntOrFail(keyLockParamStartBlock(userAddress)))
212 244      else unit
213 245  
214 246  
215 247  func getUserParamsOrFail (userAddress) = valueOrErrorMessage(getUserParamsOrUnit(userAddress), (("User " + toString(userAddress)) + " is not defined"))
216 248  
217 249  
218 250  let supportedAssetsStr = getStrOrElse(keySupportedRewardAssets(), "")
219 251  
220 252  let supportedAssetsList = split(supportedAssetsStr, "_")
221 253  
222 254  func calcReward (userAddress,assetId,stakedAmountX,depositNumUser,depositNumLast) = {
223 255      let rewardPerNsbtSumLastKEY = keyRewardPerNsbtSumAt(depositNumLast, assetId)
224 256      let sumLastX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, assetId), "0"))
225 257      let sumUserX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumUser, assetId), "0"))
226 258      let rewardDynamicPart = toInt(fraction((sumLastX18 - sumUserX18), stakedAmountX, MULTX18))
227 259      let rewardCachedPartKEY = keyReward(userAddress, assetId)
228 260      let rewardCachedPart = getIntOrElse(rewardCachedPartKEY, 0)
229 261      $Tuple4((rewardCachedPart + rewardDynamicPart), rewardCachedPart, rewardDynamicPart, rewardCachedPartKEY)
230 262      }
231 263  
232 264  
233 265  func toStartOfDay (timestamp) = ((timestamp / DAYMILLIS) * DAYMILLIS)
234 266  
235 267  
236 268  func findElementPosition (src,element,sep) = {
237 269      let elementStart = valueOrErrorMessage(indexOf(src, element), ((("there is no substring " + element) + " in ") + src))
238 270      if ((elementStart == 0))
239 271          then 0
240 272          else {
241 273              let left = take(src, elementStart)
242 274              (size(split(left, sep)) - 1)
243 275              }
244 276      }
245 277  
246 278  
247 279  let DepositTotalsPREFIX = "%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d"
248 280  
249 281  func updateDepositTotals (currVal,idxToUpdate,deltaAmt) = {
250 282      let currArr = split(currVal, SEP)
251 283      func updDepTotByIdx (idx) =     if ((idx != idxToUpdate))
252 284          then currArr[idx]
253 285          else toString((parseIntValue(currArr[idx]) + deltaAmt))
254 286  
255 287      makeString([DepositTotalsPREFIX, updDepTotByIdx(1), updDepTotByIdx(2), updDepTotByIdx(3), updDepTotByIdx(4), updDepTotByIdx(5), updDepTotByIdx(6), updDepTotByIdx(7), updDepTotByIdx(8), updDepTotByIdx(9), updDepTotByIdx(10), updDepTotByIdx(11), updDepTotByIdx(12), updDepTotByIdx(13), updDepTotByIdx(14), updDepTotByIdx(15), updDepTotByIdx(16), updDepTotByIdx(17), updDepTotByIdx(18)], SEP)
256 288      }
257 289  
258 290  
259 291  func DepositsTotalsEntries (depositAmount,assetIdStr) = {
260 292      let startOfDay = toStartOfDay(lastBlock.timestamp)
261 293      let byDayKEY = keyStatsDepositAmtByDay(startOfDay)
262 294      let totalsKEY = keyStatsDepositAmtTotals()
263 295      let position = findElementPosition(supportedAssetsStr, assetIdStr, "_")
264 296      let defaultDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
265 297      let currTotalsDATA = valueOrElse(getString(this, totalsKEY), defaultDATA)
266 298      let newTotalsDATA = updateDepositTotals(currTotalsDATA, (position + 1), depositAmount)
267 299  [StringEntry(totalsKEY, newTotalsDATA), StringEntry(byDayKEY, newTotalsDATA)]
268 300      }
269 301  
270 302  
271 303  func RewardEntries (isNewUser,userAddress,stakedAmount) = {
272 304      let stakedAmountX = toBigInt(stakedAmount)
273 305      let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
274 306      let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
275 307      let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
276 308      func forEachAssetCacheUserReward (accum,asset) =     {
277 -         let $t01112111256 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
278 -         let rewardTotal = $t01112111256._1
279 -         let cached = $t01112111256._2
280 -         let dynamic = $t01112111256._3
281 -         let rewardCachedPartKEY = $t01112111256._4
309 +         let $t01215112286 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
310 +         let rewardTotal = $t01215112286._1
311 +         let cached = $t01215112286._2
312 +         let dynamic = $t01215112286._3
313 +         let rewardCachedPartKEY = $t01215112286._4
282 314          (accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
283 315          }
284 316  
285 317      if (if ((depositNumLast == -1))
286 318          then (depositNumUser == -1)
287 319          else false)
288 320          then nil
289 321          else if (if ((depositNumLast == -1))
290 322              then (depositNumUser > -1)
291 323              else false)
292 324              then throw("invalid depositNumLast and depositNumUser state")
293 325              else if (if ((depositNumLast > -1))
294 326                  then (depositNumUser >= -1)
295 327                  else false)
296 328                  then if (isNewUser)
297 329                      then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
298 330                      else ({
299 331                          let $l = supportedAssetsList
300 332                          let $s = size($l)
301 333                          let $acc0 = nil
302 334                          func $f0_1 ($a,$i) =                         if (($i >= $s))
303 335                              then $a
304 336                              else forEachAssetCacheUserReward($a, $l[$i])
305 337  
306 338                          func $f0_2 ($a,$i) =                         if (($i >= $s))
307 339                              then $a
308 340                              else throw("List size exceeds 9")
309 341  
310 342                          $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)
311 343                          } :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
312 344                  else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
313 345      }
314 346  
315 347  
316 348  func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
317 349      let notDistributedRewardKEY = keyNotDistributedReward(tkn)
318 350      let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
319 351  [IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))]
320 352      }
321 353  
322 354  
323 355  func surfToGnsbt (surfAmt) = (surfAmt / gnsbtFromSurfCoeff)
324 356  
325 357  
326 - func mergeVotingPowerEffectiveHeight (quarantinePeriod,vpEffectiveHeight,stakedAmt,stakedAmtNEW) = {
327 -     let remainingToWait = (vpEffectiveHeight - height)
328 -     if ((0 >= remainingToWait))
329 -         then (height + quarantinePeriod)
330 -         else {
331 -             let alreadyWaited = (quarantinePeriod - remainingToWait)
332 -             let kX8 = if ((stakedAmtNEW != 0))
333 -                 then fraction(stakedAmt, MULT8, stakedAmtNEW)
334 -                 else vpEffectiveHeight
335 -             ((quarantinePeriod + height) - fraction(alreadyWaited, kX8, MULT8))
336 -             }
358 + func mergeStake (userAddress,amountToAdd,userTeen,userKid) = {
359 +     let $t01520915319 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
360 +     let isNewUser = $t01520915319._1
361 +     let stakedAmount = $t01520915319._2
362 +     let vpEffectiveHeight = $t01520915319._3
363 +     let stakedAmountNEW = if (isNewUser)
364 +         then amountToAdd
365 +         else (amountToAdd + stakedAmount)
366 +     let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
367 +     let period = (height / W2)
368 +     let vpEffectivePeriodNEW = if ((userKid > 0))
369 +         then (period + 2)
370 +         else if ((userTeen > 0))
371 +             then (period + 1)
372 +             else period
373 +     $Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, (vpEffectivePeriodNEW * W2))
337 374      }
338 375  
339 376  
340 - func mergeStake (userAddress,amountToAdd) = {
341 -     let $t01490815018 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
342 -     let isNewUser = $t01490815018._1
343 -     let stakedAmount = $t01490815018._2
344 -     let vpEffectiveHeight = $t01490815018._3
345 -     let stakedAmountNEW = if (isNewUser)
346 -         then amountToAdd
347 -         else (amountToAdd + stakedAmount)
348 -     let quarantinePeriod = (1440 * 14)
349 -     let vpEffectiveHeightNEW = if (isNewUser)
350 -         then (quarantinePeriod + height)
351 -         else mergeVotingPowerEffectiveHeight(quarantinePeriod, vpEffectiveHeight, stakedAmount, stakedAmountNEW)
352 -     $Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)
377 + func updateTotals () = {
378 +     let period = (height / getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD))
379 +     if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
380 +         then {
381 +             let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
382 + [IntegerEntry(keyTotalMature(), (totalMature + getIntOrZero(keyTotalTeen()))), IntegerEntry(keyTotalTeen(), getIntOrZero(keyTotalKid())), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)]
383 +             }
384 +         else nil
353 385      }
354 386  
355 387  
388 + func onStake (userAddressStr,amountToAdd) = if ((0 > amountToAdd))
389 +     then throw("amountToAdd should be >= 0")
390 +     else {
391 +         let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
392 +         let period = (height / W2)
393 +         let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
394 +         let totalTeen = getIntOrZero(keyTotalTeen())
395 +         let totalKid = getIntOrZero(keyTotalKid())
396 +         let userMature = if ((userAddressStr == ""))
397 +             then 0
398 +             else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
399 +         let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
400 +         let userKid = getIntOrZero(keyUserKid(userAddressStr))
401 +         let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
402 +             then $Tuple7((totalMature + userTeen), (totalTeen + (userKid - userTeen)), (totalKid - userKid), (userMature + userTeen), userKid, 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
403 +             else $Tuple7(totalMature, totalTeen, totalKid, userMature, userTeen, userKid, nil)
404 +         let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
405 +             then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
406 +             else $Tuple4(nil, totalMature, totalTeen, totalKid)
407 +         let newKid = fraction(amountToAdd, (height % W2), W2)
408 +         let newTeen = (amountToAdd - newKid)
409 +         $Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), (tmp._5 + newTeen))) :+ IntegerEntry(keyUserKid(userAddressStr), (tmp._6 + newKid))) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, (tmp._5 + newTeen), (tmp._6 + newKid))
410 +         }
411 + 
412 + 
413 + let IdxNewDiff = 0
414 + 
415 + let IdxNewGnsbt = 1
416 + 
417 + func userDecrease (gnsbt,diff) = if ((diff >= gnsbt))
418 +     then [(diff - gnsbt), 0]
419 +     else [0, (gnsbt - diff)]
420 + 
421 + 
422 + func onUnstake (userAddressStr,amountToRemove) = if ((0 >= amountToRemove))
423 +     then throw("amountToRemove should be > 0")
424 +     else {
425 +         let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
426 +         let period = (height / W2)
427 +         let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
428 +         let totalTeen = getIntOrZero(keyTotalTeen())
429 +         let totalKid = getIntOrZero(keyTotalKid())
430 +         let userMature = if ((userAddressStr == ""))
431 +             then 0
432 +             else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
433 +         let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
434 +         let userKid = getIntOrZero(keyUserKid(userAddressStr))
435 +         let um = userDecrease(userMature, amountToRemove)
436 +         let ut = userDecrease(userTeen, um[IdxNewDiff])
437 +         let uk = userDecrease(userKid, ut[IdxNewDiff])
438 +         if ((uk[IdxNewDiff] != 0))
439 +             then throw("Should not happen")
440 +             else {
441 +                 let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
442 +                     then $Tuple7((totalMature + ut[IdxNewGnsbt]), (totalTeen + (uk[IdxNewGnsbt] - ut[IdxNewGnsbt])), (totalKid - uk[IdxNewGnsbt]), (um[IdxNewGnsbt] + ut[IdxNewGnsbt]), uk[IdxNewGnsbt], 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
443 +                     else $Tuple7(totalMature, totalTeen, totalKid, um[IdxNewGnsbt], ut[IdxNewGnsbt], uk[IdxNewGnsbt], nil)
444 +                 let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
445 +                     then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
446 +                     else $Tuple4(nil, totalMature, totalTeen, totalKid)
447 +                 $Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), tmp._5)) :+ IntegerEntry(keyUserKid(userAddressStr), tmp._6)) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, tmp._5, tmp._6)
448 +                 }
449 +         }
450 + 
451 + 
356 452  func commonStake (userAddress,i) = {
357 -     let $t01550415558 = getParamsOrFail()
358 -     let stakedAssetId = $t01550415558._1
359 -     let minLockAmount = $t01550415558._2
453 +     let $t02120621260 = getParamsOrFail()
454 +     let stakedAssetId = $t02120621260._1
455 +     let minLockAmount = $t02120621260._2
360 456      if ((size(i.payments) != 1))
361 457          then throw("Invalid payments size")
362 458          else {
363 459              let payment = i.payments[0]
364 460              let amount = payment.amount
365 461              let invalidAssetMessage = (("Invalid asset. " + toBase58String(stakedAssetId)) + " is expected")
366 462              let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
367 463              if ((assetId != stakedAssetId))
368 464                  then throw(invalidAssetMessage)
369 465                  else {
370 466                      let userAddressStr = toString(userAddress)
371 -                     let mergedData = mergeStake(userAddress, amount)
467 +                     let r = onStake(userAddressStr, amount)
468 +                     let mergedData = mergeStake(userAddress, amount, r._6, r._7)
372 469                      let isNewUser = mergedData._1
373 470                      let stakedAmount = mergedData._2
374 471                      let vpEffectiveHeight = mergedData._3
375 472                      let stakedAmountNEW = mergedData._4
376 473                      let vpEffectiveHeightNEW = mergedData._5
377 474                      if ((minLockAmount > stakedAmountNEW))
378 475                          then throw(("Min lock amount is " + toString(minLockAmount)))
379 476                          else {
380 -                             let $t01635716459 = StatsResult(amount, 1, if (isNewUser)
477 +                             let $t02211422216 = StatsResult(amount, 1, if (isNewUser)
381 478                                  then 1
382 479                                  else 0)
383 -                             let statsEntries = $t01635716459._1
384 -                             let totalStaked = $t01635716459._2
385 -                             let totalStakedNew = $t01635716459._3
386 -                             ((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries)
480 +                             let statsEntries = $t02211422216._1
481 +                             let totalStaked = $t02211422216._2
482 +                             let totalStakedNew = $t02211422216._3
483 +                             (((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries) ++ r._1)
387 484                              }
388 485                      }
389 486              }
390 487      }
391 488  
392 489  
393 490  func commonClaim (userAddress,i) = {
394 491      let userAddressStr = toString(userAddress)
395 492      if ((size(i.payments) > 0))
396 493          then throw("payments are not accepted")
397 494          else {
398 -             let $t01693817043 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
399 -             let isNewUser = $t01693817043._1
400 -             let stakedAmount = $t01693817043._2
401 -             let stakingStart = $t01693817043._3
495 +             let $t02272322828 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
496 +             let isNewUser = $t02272322828._1
497 +             let stakedAmount = $t02272322828._2
498 +             let stakingStart = $t02272322828._3
402 499              let stakedAmountX = toBigInt(stakedAmount)
403 500              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
404 501              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
405 502              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
406 503              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
407 -                 let $t01741417552 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
408 -                 let rewardTotal = $t01741417552._1
409 -                 let cached = $t01741417552._2
410 -                 let dynamic = $t01741417552._3
411 -                 let rewardCachedPartKEY = $t01741417552._4
504 +                 let $t02319923337 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
505 +                 let rewardTotal = $t02319923337._1
506 +                 let cached = $t02319923337._2
507 +                 let dynamic = $t02319923337._3
508 +                 let rewardCachedPartKEY = $t02319923337._4
412 509                  let claimedKEY = keyClaimed(userAddressStr, asset)
413 -                 let $t01761217649 = accum
414 -                 let data = $t01761217649._1
415 -                 let claimedAmtByAsset = $t01761217649._2
510 +                 let $t02339723434 = accum
511 +                 let data = $t02339723434._1
512 +                 let claimedAmtByAsset = $t02339723434._2
416 513                  let newPart = makeString([asset, toString(rewardTotal)], ":")
417 514                  let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
418 515                  if ((0 >= rewardTotal))
419 516                      then $Tuple2(data, claimedAmtByAssetNew)
420 517                      else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
421 518                  }
422 519  
423 -             let $t01810918222 = {
520 +             let $t02389424007 = {
424 521                  let $l = supportedAssetsList
425 522                  let $s = size($l)
426 523                  let $acc0 = $Tuple2(nil, "")
427 524                  func $f0_1 ($a,$i) =                 if (($i >= $s))
428 525                      then $a
429 526                      else forEachAssetCalcUnclaimedReward($a, $l[$i])
430 527  
431 528                  func $f0_2 ($a,$i) =                 if (($i >= $s))
432 529                      then $a
433 530                      else throw("List size exceeds 9")
434 531  
435 532                  $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)
436 533                  }
437 -             let transfers = $t01810918222._1
438 -             let claimedAmtByAssetResult = $t01810918222._2
534 +             let transfers = $t02389424007._1
535 +             let claimedAmtByAssetResult = $t02389424007._2
439 536              if ((0 >= size(transfers)))
440 537                  then $Tuple2(nil, 0)
441 538                  else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))
442 539              }
443 540      }
444 541  
445 542  
446 543  @Callable(i)
447 544  func constructor (minLockAmount,supportedRewardAssets,stakedAssetId) = if ((i.caller != this))
448 545      then throw("Permission denied")
449 546      else [IntegerEntry(keyMinLockAmount(), minLockAmount), StringEntry(keySupportedRewardAssets(), supportedRewardAssets), StringEntry(keyStakedAssetId(), stakedAssetId)]
450 547  
451 548  
452 549  
453 550  @Callable(i)
454 551  func stake () = commonStake(i.caller, i)
455 552  
456 553  
457 554  
458 555  @Callable(i)
459 556  func stakeByOriginCaller () = commonStake(i.originCaller, i)
460 557  
461 558  
462 559  
463 560  @Callable(i)
464 561  func unstake (amount) = if ((size(i.payments) != 0))
465 562      then throw("unstake doesn't require any payment")
466 563      else {
467 564          let userAddress = i.caller
468 565          let userAddressStr = toString(userAddress)
469 -         let $t01915619210 = getParamsOrFail()
470 -         let stakedAssetId = $t01915619210._1
471 -         let minLockAmount = $t01915619210._2
472 -         let $t01921319297 = getUserParamsOrFail(userAddress)
473 -         let isNewUser = $t01921319297._1
474 -         let stakedAmount = $t01921319297._2
475 -         let vpEffectiveHeight = $t01921319297._3
566 +         let $t02494124995 = getParamsOrFail()
567 +         let stakedAssetId = $t02494124995._1
568 +         let minLockAmount = $t02494124995._2
569 +         let $t02499825082 = getUserParamsOrFail(userAddress)
570 +         let isNewUser = $t02499825082._1
571 +         let stakedAmount = $t02499825082._2
572 +         let vpEffectiveHeight = $t02499825082._3
476 573          let swapParamsSTRUCT = asSwapParamsSTRUCT(reentrantInvoke(neutrinoContract, "swapParamsByUserSYSREADONLY", [userAddressStr, 0], nil))
477 574          let swapLimitSpentInUsdn = swapParamsSTRUCT._2
478 575          let blcks2LmtReset = swapParamsSTRUCT._3
479 576          if ((swapLimitSpentInUsdn > 0))
480 577              then throw((("You have already made a swap operation. Wait " + toString((height + blcks2LmtReset))) + " height to unstake"))
481 578              else if ((0 >= stakedAmount))
482 579                  then throw("Nothing to unstake")
483 580                  else if ((amount > stakedAmount))
484 581                      then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(stakedAmount)))
485 582                      else {
486 583                          let stakedAmountNEW = (stakedAmount - amount)
487 -                         let $t01993520093 = StatsResult(-(amount), if ((amount == stakedAmount))
584 +                         let $t02572025878 = StatsResult(-(amount), if ((amount == stakedAmount))
488 585                              then -1
489 586                              else 0, if ((amount == stakedAmount))
490 587                              then -1
491 588                              else 0)
492 -                         let statsEntries = $t01993520093._1
493 -                         let totalStaked = $t01993520093._2
494 -                         let totalStakedNew = $t01993520093._3
495 -                         ((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeight)] ++ RewardEntries(false, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeight)) ++ statsEntries)
589 +                         let statsEntries = $t02572025878._1
590 +                         let totalStaked = $t02572025878._2
591 +                         let totalStakedNew = $t02572025878._3
592 +                         (((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeight)] ++ RewardEntries(false, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeight)) ++ statsEntries) ++ onUnstake(userAddressStr, amount)._1)
496 593                          }
497 594          }
498 595  
499 596  
500 597  
501 598  @Callable(i)
502 599  func deposit () = if ((size(i.payments) != 1))
503 600      then throw("exact 1 payment is allowed only")
504 601      else {
505 602          let pmt = i.payments[0]
506 603          let amount = pmt.amount
507 604          let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
508 605          let pmtAssetIdStr = toBase58String(pmtAssetId)
509 606          let pmtMultX = if ((pmtAssetId == WAVESID))
510 607              then MULTX8
511 608              else MULTX6
512 609          let amountX = toBigInt(amount)
513 610          let totalStaked = getIntOrElse(keyLockParamTotalAmount(), 0)
514 611          let totalStakedX = toBigInt(totalStaked)
515 612          if ((0 > totalStaked))
516 613              then throw("TODO: case is not supported")
517 614              else if ((totalStaked == 0))
518 615                  then IncrementNotDistributedRewardEntry(pmtAssetIdStr, amount)
519 616                  else {
520 617                      let rewardPerNsbtX18 = fraction(amountX, MULTX18, totalStakedX)
521 618                      let depositNumLastKEY = keyDepositNumLast()
522 619                      let depositNumLast = getIntOrElse(depositNumLastKEY, -1)
523 620                      let depositNumNew = (depositNumLast + 1)
524 621                      if (!(contains(supportedAssetsStr, pmtAssetIdStr)))
525 622                          then throw(((supportedAssetsStr + " doesn't contain ") + pmtAssetIdStr))
526 623                          else {
527 624                              func refreshRewardPerNsbtSUM (accum,nextAsset) =                             {
528 625                                  let rewardPerNsbtSumNewKEY = keyRewardPerNsbtSumAt(depositNumNew, nextAsset)
529 626                                  let sumLastStr = getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, nextAsset), "0")
530 627                                  (accum :+ (if ((nextAsset == pmtAssetIdStr))
531 628                                      then StringEntry(rewardPerNsbtSumNewKEY, toString((parseBigIntValue(sumLastStr) + rewardPerNsbtX18)))
532 629                                      else StringEntry(rewardPerNsbtSumNewKEY, sumLastStr)))
533 630                                  }
534 631  
535 -                             (({
632 +                             ((({
536 633                                  let $l = supportedAssetsList
537 634                                  let $s = size($l)
538 635                                  let $acc0 = nil
539 636                                  func $f0_1 ($a,$i) =                                 if (($i >= $s))
540 637                                      then $a
541 638                                      else refreshRewardPerNsbtSUM($a, $l[$i])
542 639  
543 640                                  func $f0_2 ($a,$i) =                                 if (($i >= $s))
544 641                                      then $a
545 642                                      else throw("List size exceeds 9")
546 643  
547 644                                  $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)
548 -                                 } :+ IntegerEntry(depositNumLastKEY, depositNumNew)) ++ DepositsTotalsEntries(amount, pmtAssetIdStr))
645 +                                 } :+ IntegerEntry(depositNumLastKEY, depositNumNew)) ++ DepositsTotalsEntries(amount, pmtAssetIdStr)) ++ updateTotals())
549 646                              }
550 647                      }
551 648          }
552 649  
553 650  
554 651  
555 652  @Callable(i)
556 653  func claimRewards () = commonClaim(i.caller, i)
557 654  
558 655  
559 656  
560 657  @Callable(i)
561 658  func claimRewardsByOriginCaller () = commonClaim(i.originCaller, i)
562 659  
563 660  
564 661  
565 662  @Callable(i)
566 663  func unclaimedRewardsREADONLY (userAddressStr) = {
567 664      func forEachAssetZeroReward (accum,asset) =     ((accum + makeString([asset, "0", "0"], ":")) + "_")
568 665  
569 666      let unclaimedRewardStr = if ((userAddressStr == ""))
570 667          then {
571 668              let $l = supportedAssetsList
572 669              let $s = size($l)
573 670              let $acc0 = ""
574 671              func $f0_1 ($a,$i) =             if (($i >= $s))
575 672                  then $a
576 673                  else forEachAssetZeroReward($a, $l[$i])
577 674  
578 675              func $f0_2 ($a,$i) =             if (($i >= $s))
579 676                  then $a
580 677                  else throw("List size exceeds 9")
581 678  
582 679              $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)
583 680              }
584 681          else {
585 682              let userAddress = addressFromStringValue(userAddressStr)
586 -             let $t02271722822 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
587 -             let isNewUser = $t02271722822._1
588 -             let stakedAmount = $t02271722822._2
589 -             let stakingStart = $t02271722822._3
683 +             let $t02860028705 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
684 +             let isNewUser = $t02860028705._1
685 +             let stakedAmount = $t02860028705._2
686 +             let stakingStart = $t02860028705._3
590 687              let stakedAmountX = toBigInt(stakedAmount)
591 688              let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
592 689              let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
593 690              let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
594 691              func forEachAssetCalcUnclaimedReward (accum,asset) =             {
595 -                 let $t02316823306 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
596 -                 let rewardTotal = $t02316823306._1
597 -                 let cached = $t02316823306._2
598 -                 let dynamic = $t02316823306._3
599 -                 let rewardCachedPartKEY = $t02316823306._4
692 +                 let $t02905129189 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
693 +                 let rewardTotal = $t02905129189._1
694 +                 let cached = $t02905129189._2
695 +                 let dynamic = $t02905129189._3
696 +                 let rewardCachedPartKEY = $t02905129189._4
600 697                  let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
601 698                  ((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
602 699                  }
603 700  
604 701              let $l = supportedAssetsList
605 702              let $s = size($l)
606 703              let $acc0 = ""
607 704              func $f0_1 ($a,$i) =             if (($i >= $s))
608 705                  then $a
609 706                  else forEachAssetCalcUnclaimedReward($a, $l[$i])
610 707  
611 708              func $f0_2 ($a,$i) =             if (($i >= $s))
612 709                  then $a
613 710                  else throw("List size exceeds 9")
614 711  
615 712              $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)
616 713              }
617 714      $Tuple2(nil, dropRight(unclaimedRewardStr, 1))
618 715      }
619 716  
620 717  
621 718  
622 719  @Callable(i)
720 + func updateVotingPower (userAddressStr) = if (!(isDefined(addressFromString(userAddressStr))))
721 +     then throw("Invalid user address")
722 +     else {
723 +         let r = onStake(userAddressStr, 0)
724 +         $Tuple2(r._1, [surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
725 +         }
726 + 
727 + 
728 + 
729 + @Callable(i)
623 730  func surfStakingSYSREADONLY (userAddressStrOrEmpty,surfDiff) = {
624 731      let surfTotal = getIntOrElse(keyLockParamTotalAmount(), 0)
625 732      let gnsbtFromSurfTotal = surfToGnsbt(surfTotal)
733 +     let r = if ((surfDiff >= 0))
734 +         then onStake(userAddressStrOrEmpty, surfDiff)
735 +         else onUnstake(userAddressStrOrEmpty, -(surfDiff))
626 736      if ((userAddressStrOrEmpty == ""))
627 -         then $Tuple2(nil, [0, surfTotal, 0, gnsbtFromSurfTotal, 0, height, height])
737 +         then $Tuple2(nil, [0, surfTotal, 0, gnsbtFromSurfTotal, height, height, surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
628 738          else {
629 739              let userAddress = toAddressOrFail(userAddressStrOrEmpty)
630 -             let mergedData = mergeStake(userAddress, surfDiff)
631 -             let isNewUser = mergedData._1
740 +             let mergedData = mergeStake(userAddress, surfDiff, r._6, r._7)
632 741              let stakedAmount = mergedData._2
633 742              let vpEffectiveHeight = mergedData._3
634 743              let stakedAmountNEW = mergedData._4
635 744              let vpEffectiveHeightNEW = mergedData._5
636 745              let surfUser = stakedAmount
637 746              let gnsbtFromSurfUser = surfToGnsbt(surfUser)
638 -             $Tuple2(nil, [surfUser, surfTotal, gnsbtFromSurfUser, gnsbtFromSurfTotal, vpEffectiveHeight, vpEffectiveHeightNEW])
747 +             $Tuple2(nil, [surfUser, surfTotal, gnsbtFromSurfUser, gnsbtFromSurfTotal, vpEffectiveHeight, vpEffectiveHeightNEW, surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
639 748              }
640 749      }
641 750  
642 751  
643 752  
644 753  @Callable(i)
645 754  func gnsbtFromSurfSYSREADONLY (surfAmt) = $Tuple2(nil, surfToGnsbt(surfAmt))
646 755  
647 756  
648 757  
649 758  @Callable(i)
650 759  func configSYSREADONLY () = {
651 760      let minLockAmt = getIntegerValue(keyMinLockAmount())
652 -     let surfVotingPowerRestrictivePeriod = (1440 * 14)
761 +     let surfVotingPowerRestrictivePeriod = DEFAULTPERIOD
653 762      let brToStartSurfTransformation = 1150000
654 763      $Tuple2(nil, [minLockAmt, (gnsbtFromSurfCoeff * MULT6), surfVotingPowerRestrictivePeriod, brToStartSurfTransformation])
655 764      }
656 765  
657 766

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

22	22		let WAVESID = fromBase58String(WAVESIDSTR)
23	23
24	24		let DAYMILLIS = 86400000
	25	+
	26	+	let DEFAULTPERIOD = (1440 * 14)
25	27
26	28		let IdxControlCfgNeutrinoDapp = 1
27	29

45	47
46	48		let IdxControlCfgGnsbtControllerDapp = 11
47	49
	50	+	let IdxControlCfgRestV2Dapp = 12
	51	+
	52	+	let IdxControlCfgGovernanceDapp = 13
	53	+
48	54		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
49	55
50	56

57	63		func keyGnsbtFromSurfCoeff () = "%s%s__cfg__gnsbtFromSurfCoeff"
58	64
59	65
60		-	func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
	66	+	func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
61	67
62	68
63	69		func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))

72	78		let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
73	79
74	80		let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
	81	+
	82	+	let govContract = getContractAddressOrFail(controlCfg, IdxControlCfgGovernanceDapp)
75	83
76	84		let gnsbtFromSurfCoeff = valueOrElse(getInteger(this, keyGnsbtFromSurfCoeff()), 300)
77	85

114	122		func keyStatsDepositAmtTotals () = makeString(["%s%s%d", "stats", "depositAmtTotals"], separator)
115	123
116	124
117		-	func keyNextPeriod () = "%s__nextPeriod"
118		-
119		-
120	125		func keySupportedRewardAssets () = "supportedRewardAssets"
121	126
122	127

136	141
137	142
138	143		func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
	144	+
	145	+
	146	+	func keyVpPeriodDuration () = makeString(["%s%s", "vp", "periodDuration"], separator)
	147	+
	148	+
	149	+	func keyLastTotalsPeriodProcessed () = makeString(["%s%s", "vp", "lastTotalsPeriodProcessed"], separator)
	150	+
	151	+
	152	+	func keyLastUserPeriodProcessed (userAddress) = makeString(["%s%s%s", "vp", "lastUserPeriodProcessed", userAddress], separator)
	153	+
	154	+
	155	+	func keyTotalMature () = makeString(["%s%s", "vp", "totalMature"], separator)
	156	+
	157	+
	158	+	func keyTotalTeen () = makeString(["%s%s", "vp", "totalTeen"], separator)
	159	+
	160	+
	161	+	func keyTotalKid () = makeString(["%s%s", "vp", "totalKid"], separator)
	162	+
	163	+
	164	+	func keyUserMature (userAddress) = makeString(["%s%s%s", "vp", "userMature", userAddress], separator)
	165	+
	166	+
	167	+	func keyUserTeen (userAddress) = makeString(["%s%s%s", "vp", "userTeen", userAddress], separator)
	168	+
	169	+
	170	+	func keyUserKid (userAddress) = makeString(["%s%s%s", "vp", "userKid", userAddress], separator)
139	171
140	172
141	173		func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)

274	306		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
275	307		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
276	308		func forEachAssetCacheUserReward (accum,asset) = {
277		-	let $~~t01112111256~~ = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
278		-	let rewardTotal = $~~t01112111256~~._1
279		-	let cached = $~~t01112111256~~._2
280		-	let dynamic = $~~t01112111256~~._3
281		-	let rewardCachedPartKEY = $~~t01112111256~~._4
	309	+	let $t01215112286 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
	310	+	let rewardTotal = $t01215112286._1
	311	+	let cached = $t01215112286._2
	312	+	let dynamic = $t01215112286._3
	313	+	let rewardCachedPartKEY = $t01215112286._4
282	314		(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
283	315		}
284	316

323	355		func surfToGnsbt (surfAmt) = (surfAmt / gnsbtFromSurfCoeff)
324	356
325	357
326		-	func mergeVotingPowerEffectiveHeight (quarantinePeriod,vpEffectiveHeight,stakedAmt,stakedAmtNEW) = {
327		-	let remainingToWait = (vpEffectiveHeight - height)
328		-	if ((0 >= remainingToWait))
329		-	then (height + quarantinePeriod)
330		-	else {
331		-	let alreadyWaited = (quarantinePeriod - remainingToWait)
332		-	let kX8 = if ((stakedAmtNEW != 0))
333		-	then fraction(stakedAmt, MULT8, stakedAmtNEW)
334		-	else vpEffectiveHeight
335		-	((quarantinePeriod + height) - fraction(alreadyWaited, kX8, MULT8))
336		-	}
	358	+	func mergeStake (userAddress,amountToAdd,userTeen,userKid) = {
	359	+	let $t01520915319 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	360	+	let isNewUser = $t01520915319._1
	361	+	let stakedAmount = $t01520915319._2
	362	+	let vpEffectiveHeight = $t01520915319._3
	363	+	let stakedAmountNEW = if (isNewUser)
	364	+	then amountToAdd
	365	+	else (amountToAdd + stakedAmount)
	366	+	let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
	367	+	let period = (height / W2)
	368	+	let vpEffectivePeriodNEW = if ((userKid > 0))
	369	+	then (period + 2)
	370	+	else if ((userTeen > 0))
	371	+	then (period + 1)
	372	+	else period
	373	+	$Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, (vpEffectivePeriodNEW * W2))
337	374		}
338	375
339	376
340		-	func mergeStake (userAddress,amountToAdd) = {
341		-	let $t01490815018 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
342		-	let isNewUser = $t01490815018._1
343		-	let stakedAmount = $t01490815018._2
344		-	let vpEffectiveHeight = $t01490815018._3
345		-	let stakedAmountNEW = if (isNewUser)
346		-	then amountToAdd
347		-	else (amountToAdd + stakedAmount)
348		-	let quarantinePeriod = (1440 * 14)
349		-	let vpEffectiveHeightNEW = if (isNewUser)
350		-	then (quarantinePeriod + height)
351		-	else mergeVotingPowerEffectiveHeight(quarantinePeriod, vpEffectiveHeight, stakedAmount, stakedAmountNEW)
352		-	$Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)
	377	+	func updateTotals () = {
	378	+	let period = (height / getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD))
	379	+	if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
	380	+	then {
	381	+	let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
	382	+	[IntegerEntry(keyTotalMature(), (totalMature + getIntOrZero(keyTotalTeen()))), IntegerEntry(keyTotalTeen(), getIntOrZero(keyTotalKid())), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)]
	383	+	}
	384	+	else nil
353	385		}
354	386
355	387
	388	+	func onStake (userAddressStr,amountToAdd) = if ((0 > amountToAdd))
	389	+	then throw("amountToAdd should be >= 0")
	390	+	else {
	391	+	let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
	392	+	let period = (height / W2)
	393	+	let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
	394	+	let totalTeen = getIntOrZero(keyTotalTeen())
	395	+	let totalKid = getIntOrZero(keyTotalKid())
	396	+	let userMature = if ((userAddressStr == ""))
	397	+	then 0
	398	+	else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
	399	+	let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
	400	+	let userKid = getIntOrZero(keyUserKid(userAddressStr))
	401	+	let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
	402	+	then $Tuple7((totalMature + userTeen), (totalTeen + (userKid - userTeen)), (totalKid - userKid), (userMature + userTeen), userKid, 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
	403	+	else $Tuple7(totalMature, totalTeen, totalKid, userMature, userTeen, userKid, nil)
	404	+	let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
	405	+	then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
	406	+	else $Tuple4(nil, totalMature, totalTeen, totalKid)
	407	+	let newKid = fraction(amountToAdd, (height % W2), W2)
	408	+	let newTeen = (amountToAdd - newKid)
	409	+	$Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), (tmp._5 + newTeen))) :+ IntegerEntry(keyUserKid(userAddressStr), (tmp._6 + newKid))) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, (tmp._5 + newTeen), (tmp._6 + newKid))
	410	+	}
	411	+
	412	+
	413	+	let IdxNewDiff = 0
	414	+
	415	+	let IdxNewGnsbt = 1
	416	+
	417	+	func userDecrease (gnsbt,diff) = if ((diff >= gnsbt))
	418	+	then [(diff - gnsbt), 0]
	419	+	else [0, (gnsbt - diff)]
	420	+
	421	+
	422	+	func onUnstake (userAddressStr,amountToRemove) = if ((0 >= amountToRemove))
	423	+	then throw("amountToRemove should be > 0")
	424	+	else {
	425	+	let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
	426	+	let period = (height / W2)
	427	+	let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
	428	+	let totalTeen = getIntOrZero(keyTotalTeen())
	429	+	let totalKid = getIntOrZero(keyTotalKid())
	430	+	let userMature = if ((userAddressStr == ""))
	431	+	then 0
	432	+	else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
	433	+	let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
	434	+	let userKid = getIntOrZero(keyUserKid(userAddressStr))
	435	+	let um = userDecrease(userMature, amountToRemove)
	436	+	let ut = userDecrease(userTeen, um[IdxNewDiff])
	437	+	let uk = userDecrease(userKid, ut[IdxNewDiff])
	438	+	if ((uk[IdxNewDiff] != 0))
	439	+	then throw("Should not happen")
	440	+	else {
	441	+	let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
	442	+	then $Tuple7((totalMature + ut[IdxNewGnsbt]), (totalTeen + (uk[IdxNewGnsbt] - ut[IdxNewGnsbt])), (totalKid - uk[IdxNewGnsbt]), (um[IdxNewGnsbt] + ut[IdxNewGnsbt]), uk[IdxNewGnsbt], 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
	443	+	else $Tuple7(totalMature, totalTeen, totalKid, um[IdxNewGnsbt], ut[IdxNewGnsbt], uk[IdxNewGnsbt], nil)
	444	+	let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
	445	+	then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
	446	+	else $Tuple4(nil, totalMature, totalTeen, totalKid)
	447	+	$Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), tmp._5)) :+ IntegerEntry(keyUserKid(userAddressStr), tmp._6)) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, tmp._5, tmp._6)
	448	+	}
	449	+	}
	450	+
	451	+
356	452		func commonStake (userAddress,i) = {
357		-	let $~~t01550415558~~ = getParamsOrFail()
358		-	let stakedAssetId = $~~t01550415558~~._1
359		-	let minLockAmount = $~~t01550415558~~._2
	453	+	let $t02120621260 = getParamsOrFail()
	454	+	let stakedAssetId = $t02120621260._1
	455	+	let minLockAmount = $t02120621260._2
360	456		if ((size(i.payments) != 1))
361	457		then throw("Invalid payments size")
362	458		else {

368	464		then throw(invalidAssetMessage)
369	465		else {
370	466		let userAddressStr = toString(userAddress)
371		-	let mergedData = mergeStake(userAddress, amount)
	467	+	let r = onStake(userAddressStr, amount)
	468	+	let mergedData = mergeStake(userAddress, amount, r._6, r._7)
372	469		let isNewUser = mergedData._1
373	470		let stakedAmount = mergedData._2
374	471		let vpEffectiveHeight = mergedData._3

377	474		if ((minLockAmount > stakedAmountNEW))
378	475		then throw(("Min lock amount is " + toString(minLockAmount)))
379	476		else {
380		-	let $~~t01635716459~~ = StatsResult(amount, 1, if (isNewUser)
	477	+	let $t02211422216 = StatsResult(amount, 1, if (isNewUser)
381	478		then 1
382	479		else 0)
383		-	let statsEntries = $~~t01635716459~~._1
384		-	let totalStaked = $~~t01635716459~~._2
385		-	let totalStakedNew = $~~t01635716459~~._3
386		-	((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries)
	480	+	let statsEntries = $t02211422216._1
	481	+	let totalStaked = $t02211422216._2
	482	+	let totalStakedNew = $t02211422216._3
	483	+	(((([HistoryRecordEntry("stake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)] ++ RewardEntries(isNewUser, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeightNEW)) ++ statsEntries) ++ r._1)
387	484		}
388	485		}
389	486		}

395	492		if ((size(i.payments) > 0))
396	493		then throw("payments are not accepted")
397	494		else {
398		-	let $~~t01693817043~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
399		-	let isNewUser = $~~t01693817043~~._1
400		-	let stakedAmount = $~~t01693817043~~._2
401		-	let stakingStart = $~~t01693817043~~._3
	495	+	let $t02272322828 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	496	+	let isNewUser = $t02272322828._1
	497	+	let stakedAmount = $t02272322828._2
	498	+	let stakingStart = $t02272322828._3
402	499		let stakedAmountX = toBigInt(stakedAmount)
403	500		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
404	501		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
405	502		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
406	503		func forEachAssetCalcUnclaimedReward (accum,asset) = {
407		-	let $~~t01741417552~~ = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
408		-	let rewardTotal = $~~t01741417552~~._1
409		-	let cached = $~~t01741417552~~._2
410		-	let dynamic = $~~t01741417552~~._3
411		-	let rewardCachedPartKEY = $~~t01741417552~~._4
	504	+	let $t02319923337 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	505	+	let rewardTotal = $t02319923337._1
	506	+	let cached = $t02319923337._2
	507	+	let dynamic = $t02319923337._3
	508	+	let rewardCachedPartKEY = $t02319923337._4
412	509		let claimedKEY = keyClaimed(userAddressStr, asset)
413		-	let $~~t01761217649~~ = accum
414		-	let data = $~~t01761217649~~._1
415		-	let claimedAmtByAsset = $~~t01761217649~~._2
	510	+	let $t02339723434 = accum
	511	+	let data = $t02339723434._1
	512	+	let claimedAmtByAsset = $t02339723434._2
416	513		let newPart = makeString([asset, toString(rewardTotal)], ":")
417	514		let claimedAmtByAssetNew = makeString([claimedAmtByAsset, newPart], "_")
418	515		if ((0 >= rewardTotal))

420	517		else $Tuple2((((data :+ ScriptTransfer(userAddress, rewardTotal, toAssetVect(asset))) :+ IntegerEntry(claimedKEY, (valueOrElse(getInteger(claimedKEY), 0) + rewardTotal))) :+ IntegerEntry(rewardCachedPartKEY, 0)), claimedAmtByAssetNew)
421	518		}
422	519
423		-	let $~~t01810918222~~ = {
	520	+	let $t02389424007 = {
424	521		let $l = supportedAssetsList
425	522		let $s = size($l)
426	523		let $acc0 = $Tuple2(nil, "")

434	531
435	532		$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)
436	533		}
437		-	let transfers = $~~t01810918222~~._1
438		-	let claimedAmtByAssetResult = $~~t01810918222~~._2
	534	+	let transfers = $t02389424007._1
	535	+	let claimedAmtByAssetResult = $t02389424007._2
439	536		if ((0 >= size(transfers)))
440	537		then $Tuple2(nil, 0)
441	538		else $Tuple2(((transfers :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)) :+ ClaimHistoryEntry(userAddress, i.transactionId, drop(claimedAmtByAssetResult, 1))), size(transfers))

466	563		else {
467	564		let userAddress = i.caller
468	565		let userAddressStr = toString(userAddress)
469		-	let $~~t01915619210~~ = getParamsOrFail()
470		-	let stakedAssetId = $~~t01915619210~~._1
471		-	let minLockAmount = $~~t01915619210~~._2
472		-	let $~~t01921319297~~ = getUserParamsOrFail(userAddress)
473		-	let isNewUser = $~~t01921319297~~._1
474		-	let stakedAmount = $~~t01921319297~~._2
475		-	let vpEffectiveHeight = $~~t01921319297~~._3
	566	+	let $t02494124995 = getParamsOrFail()
	567	+	let stakedAssetId = $t02494124995._1
	568	+	let minLockAmount = $t02494124995._2
	569	+	let $t02499825082 = getUserParamsOrFail(userAddress)
	570	+	let isNewUser = $t02499825082._1
	571	+	let stakedAmount = $t02499825082._2
	572	+	let vpEffectiveHeight = $t02499825082._3
476	573		let swapParamsSTRUCT = asSwapParamsSTRUCT(reentrantInvoke(neutrinoContract, "swapParamsByUserSYSREADONLY", [userAddressStr, 0], nil))
477	574		let swapLimitSpentInUsdn = swapParamsSTRUCT._2
478	575		let blcks2LmtReset = swapParamsSTRUCT._3

484	581		then throw(((("Requested " + toString(amount)) + ", but staked only ") + toString(stakedAmount)))
485	582		else {
486	583		let stakedAmountNEW = (stakedAmount - amount)
487		-	let $~~t01993520093~~ = StatsResult(-(amount), if ((amount == stakedAmount))
	584	+	let $t02572025878 = StatsResult(-(amount), if ((amount == stakedAmount))
488	585		then -1
489	586		else 0, if ((amount == stakedAmount))
490	587		then -1
491	588		else 0)
492		-	let statsEntries = $~~t01993520093~~._1
493		-	let totalStaked = $~~t01993520093~~._2
494		-	let totalStakedNew = $~~t01993520093~~._3
495		-	((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeight)] ++ RewardEntries(false, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeight)) ++ statsEntries)
	589	+	let statsEntries = $t02572025878._1
	590	+	let totalStaked = $t02572025878._2
	591	+	let totalStakedNew = $t02572025878._3
	592	+	(((([ScriptTransfer(userAddress, amount, stakedAssetId), HistoryRecordEntry("unstake", userAddress, i.transactionId, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeight)] ++ RewardEntries(false, userAddressStr, stakedAmount)) ++ LockParamsEntry(userAddress, stakedAmountNEW, vpEffectiveHeight)) ++ statsEntries) ++ onUnstake(userAddressStr, amount)._1)
496	593		}
497	594		}
498	595

532	629		else StringEntry(rewardPerNsbtSumNewKEY, sumLastStr)))
533	630		}
534	631
535		-	(({
	632	+	((({
536	633		let $l = supportedAssetsList
537	634		let $s = size($l)
538	635		let $acc0 = nil

545	642		else throw("List size exceeds 9")
546	643
547	644		$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)
548		-	} :+ IntegerEntry(depositNumLastKEY, depositNumNew)) ++ DepositsTotalsEntries(amount, pmtAssetIdStr))
	645	+	} :+ IntegerEntry(depositNumLastKEY, depositNumNew)) ++ DepositsTotalsEntries(amount, pmtAssetIdStr)) ++ updateTotals())
549	646		}
550	647		}
551	648		}

583	680		}
584	681		else {
585	682		let userAddress = addressFromStringValue(userAddressStr)
586		-	let $~~t02271722822~~ = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
587		-	let isNewUser = $~~t02271722822~~._1
588		-	let stakedAmount = $~~t02271722822~~._2
589		-	let stakingStart = $~~t02271722822~~._3
	683	+	let $t02860028705 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	684	+	let isNewUser = $t02860028705._1
	685	+	let stakedAmount = $t02860028705._2
	686	+	let stakingStart = $t02860028705._3
590	687		let stakedAmountX = toBigInt(stakedAmount)
591	688		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddressStr)
592	689		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
593	690		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
594	691		func forEachAssetCalcUnclaimedReward (accum,asset) = {
595		-	let $~~t02316823306~~ = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
596		-	let rewardTotal = $~~t02316823306~~._1
597		-	let cached = $~~t02316823306~~._2
598		-	let dynamic = $~~t02316823306~~._3
599		-	let rewardCachedPartKEY = $~~t02316823306~~._4
	692	+	let $t02905129189 = calcReward(userAddressStr, asset, stakedAmountX, depositNumUser, depositNumLast)
	693	+	let rewardTotal = $t02905129189._1
	694	+	let cached = $t02905129189._2
	695	+	let dynamic = $t02905129189._3
	696	+	let rewardCachedPartKEY = $t02905129189._4
600	697		let claimed = valueOrElse(getInteger(keyClaimed(userAddressStr, asset)), 0)
601	698		((accum + makeString([asset, toString(rewardTotal), toString(claimed)], ":")) + "_")
602	699		}

620	717
621	718
622	719		@Callable(i)
	720	+	func updateVotingPower (userAddressStr) = if (!(isDefined(addressFromString(userAddressStr))))
	721	+	then throw("Invalid user address")
	722	+	else {
	723	+	let r = onStake(userAddressStr, 0)
	724	+	$Tuple2(r._1, [surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
	725	+	}
	726	+
	727	+
	728	+
	729	+	@Callable(i)
623	730		func surfStakingSYSREADONLY (userAddressStrOrEmpty,surfDiff) = {
624	731		let surfTotal = getIntOrElse(keyLockParamTotalAmount(), 0)
625	732		let gnsbtFromSurfTotal = surfToGnsbt(surfTotal)
	733	+	let r = if ((surfDiff >= 0))
	734	+	then onStake(userAddressStrOrEmpty, surfDiff)
	735	+	else onUnstake(userAddressStrOrEmpty, -(surfDiff))
626	736		if ((userAddressStrOrEmpty == ""))
627		-	then $Tuple2(nil, [0, surfTotal, 0, gnsbtFromSurfTotal, 0, height, ~~height~~])
	737	+	then $Tuple2(nil, [0, surfTotal, 0, gnsbtFromSurfTotal, height, height, surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
628	738		else {
629	739		let userAddress = toAddressOrFail(userAddressStrOrEmpty)
630		-	let mergedData = mergeStake(userAddress, surfDiff)
631		-	let isNewUser = mergedData._1
	740	+	let mergedData = mergeStake(userAddress, surfDiff, r._6, r._7)
632	741		let stakedAmount = mergedData._2
633	742		let vpEffectiveHeight = mergedData._3
634	743		let stakedAmountNEW = mergedData._4
635	744		let vpEffectiveHeightNEW = mergedData._5
636	745		let surfUser = stakedAmount
637	746		let gnsbtFromSurfUser = surfToGnsbt(surfUser)
638		-	$Tuple2(nil, [surfUser, surfTotal, gnsbtFromSurfUser, gnsbtFromSurfTotal, vpEffectiveHeight, vpEffectiveHeightNEW])
	747	+	$Tuple2(nil, [surfUser, surfTotal, gnsbtFromSurfUser, gnsbtFromSurfTotal, vpEffectiveHeight, vpEffectiveHeightNEW, surfToGnsbt(r._2), surfToGnsbt(r._3), surfToGnsbt(r._4), surfToGnsbt(r._5), surfToGnsbt(r._6), surfToGnsbt(r._7)])
639	748		}
640	749		}
641	750

649	758		@Callable(i)
650	759		func configSYSREADONLY () = {
651	760		let minLockAmt = getIntegerValue(keyMinLockAmount())
652		-	let surfVotingPowerRestrictivePeriod = ~~(1440 * 14)~~
	761	+	let surfVotingPowerRestrictivePeriod = DEFAULTPERIOD
653	762		let brToStartSurfTransformation = 1150000
654	763		$Tuple2(nil, [minLockAmt, (gnsbtFromSurfCoeff * MULT6), surfVotingPowerRestrictivePeriod, brToStartSurfTransformation])
655	764		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let revisionNum = "~~6a94b841b387e5d4bd8be8f8ed5f80057ef86186~~"
	4	+	let revisionNum = "c556dd7e5f6e83db072aec698b7b12b2b942a395"
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 DEFAULTPERIOD = (1440 * 14)
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 IdxControlCfgSurfStakingDapp = 10
45	47
46	48		let IdxControlCfgGnsbtControllerDapp = 11
47	49
	50	+	let IdxControlCfgRestV2Dapp = 12
	51	+
	52	+	let IdxControlCfgGovernanceDapp = 13
	53	+
48	54		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
49	55
50	56
51	57		func keyControlAddress () = "%s%s__config__controlAddress"
52	58
53	59
54	60		func keyControlCfg () = "%s__controlConfig"
55	61
56	62
57	63		func keyGnsbtFromSurfCoeff () = "%s%s__cfg__gnsbtFromSurfCoeff"
58	64
59	65
60		-	func readControlCfgOrFail (control) = split(getStringOrFail(control, keyControlCfg()), SEP)
	66	+	func readControlCfgOrFail (control) = split_4C(getStringOrFail(control, keyControlCfg()), SEP)
61	67
62	68
63	69		func getContractAddressOrFail (controlCfg,idx) = valueOrErrorMessage(addressFromString(controlCfg[idx]), ("Control cfg doesn't contain address at index " + toString(idx)))
64	70
65	71
66	72		let controlContract = addressFromStringValue(valueOrElse(getString(this, keyControlAddress()), "3P5Bfd58PPfNvBM2Hy8QfbcDqMeNtzg7KfP"))
67	73
68	74		let controlCfg = readControlCfgOrFail(controlContract)
69	75
70	76		let mathContract = getContractAddressOrFail(controlCfg, IdxControlCfgMathDapp)
71	77
72	78		let neutrinoContract = getContractAddressOrFail(controlCfg, IdxControlCfgNeutrinoDapp)
73	79
74	80		let auctionContract = getContractAddressOrFail(controlCfg, IdxControlCfgAuctionDapp)
	81	+
	82	+	let govContract = getContractAddressOrFail(controlCfg, IdxControlCfgGovernanceDapp)
75	83
76	84		let gnsbtFromSurfCoeff = valueOrElse(getInteger(this, keyGnsbtFromSurfCoeff()), 300)
77	85
78	86		func keyBondAsset () = "bond_asset_id"
79	87
80	88
81	89		func keyAuctionContractAddress () = "auction_contract"
82	90
83	91
84	92		func keyMinLockAmount () = "%s__minLockAmount"
85	93
86	94
87	95		func keyStakedAssetId () = "%s__stakedAssetId"
88	96
89	97
90	98		func keyLockParamUserAmount (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "amount"], separator)
91	99
92	100
93	101		func keyLockParamStartBlock (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "start"], separator)
94	102
95	103
96	104		func keyLockParamVotingPowerEffectiveHeight (userAddress) = makeString(["%s%s%s", "paramByUser", toString(userAddress), "vpEffectiveHeight"], separator)
97	105
98	106
99	107		func keyHistoryRecord (type,userAddress,txId) = makeString(["%s%s%s%s", "history", type, toString(userAddress), toBase58String(txId)], separator)
100	108
101	109
102	110		func keyLockParamTotalAmount () = makeString(["%s%s", "stats", "activeTotalLocked"], separator)
103	111
104	112
105	113		func keyStatsLocksCount () = makeString(["%s%s", "stats", "locksCount"], separator)
106	114
107	115
108	116		func keyStatsUsersCount () = makeString(["%s%s", "stats", "activeUsersCount"], separator)
109	117
110	118
111	119		func keyStatsDepositAmtByDay (timestamp) = makeString(["%s%s%d", "stats", "depositAmtByDay", toString(timestamp)], separator)
112	120
113	121
114	122		func keyStatsDepositAmtTotals () = makeString(["%s%s%d", "stats", "depositAmtTotals"], separator)
115	123
116	124
117		-	func keyNextPeriod () = "%s__nextPeriod"
118		-
119		-
120	125		func keySupportedRewardAssets () = "supportedRewardAssets"
121	126
122	127
123	128		func keyDepositNumLast () = makeString(["%s%s%s", "dep", "lastNum"], separator)
124	129
125	130
126	131		func keyUserRewardFromDepositNum (userAddress) = makeString(["%s%s%s", "userRwdFromDepNum", userAddress], separator)
127	132
128	133
129	134		func keyRewardPerNsbtSumAt (depositNum,tkn) = makeString(["%s%d", "rwdPerNsbtSumByDepNum", toString(depositNum), tkn], separator)
130	135
131	136
132	137		func keyReward (userAddress,tkn) = makeString(["%s%s%s", "rwd", userAddress, tkn], separator)
133	138
134	139
135	140		func keyClaimed (userAddress,tkn) = makeString(["%s%s%s", "clm", userAddress, tkn], separator)
136	141
137	142
138	143		func keyNotDistributedReward (tkn) = makeString(["%s%s", "notDistributed", tkn], separator)
	144	+
	145	+
	146	+	func keyVpPeriodDuration () = makeString(["%s%s", "vp", "periodDuration"], separator)
	147	+
	148	+
	149	+	func keyLastTotalsPeriodProcessed () = makeString(["%s%s", "vp", "lastTotalsPeriodProcessed"], separator)
	150	+
	151	+
	152	+	func keyLastUserPeriodProcessed (userAddress) = makeString(["%s%s%s", "vp", "lastUserPeriodProcessed", userAddress], separator)
	153	+
	154	+
	155	+	func keyTotalMature () = makeString(["%s%s", "vp", "totalMature"], separator)
	156	+
	157	+
	158	+	func keyTotalTeen () = makeString(["%s%s", "vp", "totalTeen"], separator)
	159	+
	160	+
	161	+	func keyTotalKid () = makeString(["%s%s", "vp", "totalKid"], separator)
	162	+
	163	+
	164	+	func keyUserMature (userAddress) = makeString(["%s%s%s", "vp", "userMature", userAddress], separator)
	165	+
	166	+
	167	+	func keyUserTeen (userAddress) = makeString(["%s%s%s", "vp", "userTeen", userAddress], separator)
	168	+
	169	+
	170	+	func keyUserKid (userAddress) = makeString(["%s%s%s", "vp", "userKid", userAddress], separator)
139	171
140	172
141	173		func toX18 (origVal,origMult) = fraction(toBigInt(origVal), MULTX18, origMult)
142	174
143	175
144	176		func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
145	177
146	178
147	179		func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
148	180
149	181
150	182		func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
151	183
152	184
153	185		func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
154	186
155	187
156	188		func toAddressOrFail (addressStr) = valueOrErrorMessage(addressFromString(addressStr), ("couldn't parse passed addressStr=" + addressStr))
157	189
158	190
159	191		func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
160	192		then unit
161	193		else fromBase58String(assetStr)
162	194
163	195
164	196		func asInt (val) = match val {
165	197		case valInt: Int =>
166	198		valInt
167	199		case _ =>
168	200		throw("fail to cast into Int")
169	201		}
170	202
171	203
172	204		func asSwapParamsSTRUCT (v) = match v {
173	205		case struct: (Int, Int, Int, Int, Int, Int, Int) =>
174	206		struct
175	207		case _ =>
176	208		throw("fail to cast into Int")
177	209		}
178	210
179	211
180	212		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)
181	213
182	214
183	215		func formatClaimHistoryRecord (user,claimedRewards) = makeString(["%s%d%d%s", user, toString(lastBlock.height), toString(lastBlock.timestamp), claimedRewards], separator)
184	216
185	217
186	218		func HistoryRecordEntry (type,userAddress,txId,oldAmount,oldStart,newAmount,newStart) = StringEntry(keyHistoryRecord(type, userAddress, txId), formatHistoryRecord(oldAmount, oldStart, newAmount, newStart))
187	219
188	220
189	221		func ClaimHistoryEntry (userAddress,txId,claimedRewards) = StringEntry(keyHistoryRecord("claim", userAddress, txId), formatClaimHistoryRecord(toString(userAddress), claimedRewards))
190	222
191	223
192	224		func StatsResult (totalLockedInc,lockCountInc,usersCountInc) = {
193	225		let locksCount = getIntOrZero(keyStatsLocksCount())
194	226		let usersCount = getIntOrZero(keyStatsUsersCount())
195	227		let totalAmount = getIntOrZero(keyLockParamTotalAmount())
196	228		let totalAmountNew = (totalAmount + totalLockedInc)
197	229		$Tuple3([IntegerEntry(keyStatsLocksCount(), (locksCount + lockCountInc)), IntegerEntry(keyStatsUsersCount(), (usersCount + usersCountInc)), IntegerEntry(keyLockParamTotalAmount(), totalAmountNew)], totalAmount, totalAmountNew)
198	230		}
199	231
200	232
201	233		func LockParamsEntry (userAddress,amount,votingPowerEffectiveHeight) = [IntegerEntry(keyLockParamUserAmount(userAddress), amount), IntegerEntry(keyLockParamStartBlock(userAddress), votingPowerEffectiveHeight)]
202	234
203	235
204	236		func getParamsOrFail () = $Tuple2(fromBase58String(getStringOrFail(this, keyStakedAssetId())), getIntOrFail(keyMinLockAmount()))
205	237
206	238
207	239		func isActiveUser (userAddress) = (getIntOrElse(keyLockParamUserAmount(userAddress), 0) > 0)
208	240
209	241
210	242		func getUserParamsOrUnit (userAddress) = if (isActiveUser(userAddress))
211	243		then $Tuple3(false, getIntOrFail(keyLockParamUserAmount(userAddress)), getIntOrFail(keyLockParamStartBlock(userAddress)))
212	244		else unit
213	245
214	246
215	247		func getUserParamsOrFail (userAddress) = valueOrErrorMessage(getUserParamsOrUnit(userAddress), (("User " + toString(userAddress)) + " is not defined"))
216	248
217	249
218	250		let supportedAssetsStr = getStrOrElse(keySupportedRewardAssets(), "")
219	251
220	252		let supportedAssetsList = split(supportedAssetsStr, "_")
221	253
222	254		func calcReward (userAddress,assetId,stakedAmountX,depositNumUser,depositNumLast) = {
223	255		let rewardPerNsbtSumLastKEY = keyRewardPerNsbtSumAt(depositNumLast, assetId)
224	256		let sumLastX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumLast, assetId), "0"))
225	257		let sumUserX18 = parseBigIntValue(getStrOrElse(keyRewardPerNsbtSumAt(depositNumUser, assetId), "0"))
226	258		let rewardDynamicPart = toInt(fraction((sumLastX18 - sumUserX18), stakedAmountX, MULTX18))
227	259		let rewardCachedPartKEY = keyReward(userAddress, assetId)
228	260		let rewardCachedPart = getIntOrElse(rewardCachedPartKEY, 0)
229	261		$Tuple4((rewardCachedPart + rewardDynamicPart), rewardCachedPart, rewardDynamicPart, rewardCachedPartKEY)
230	262		}
231	263
232	264
233	265		func toStartOfDay (timestamp) = ((timestamp / DAYMILLIS) * DAYMILLIS)
234	266
235	267
236	268		func findElementPosition (src,element,sep) = {
237	269		let elementStart = valueOrErrorMessage(indexOf(src, element), ((("there is no substring " + element) + " in ") + src))
238	270		if ((elementStart == 0))
239	271		then 0
240	272		else {
241	273		let left = take(src, elementStart)
242	274		(size(split(left, sep)) - 1)
243	275		}
244	276		}
245	277
246	278
247	279		let DepositTotalsPREFIX = "%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d"
248	280
249	281		func updateDepositTotals (currVal,idxToUpdate,deltaAmt) = {
250	282		let currArr = split(currVal, SEP)
251	283		func updDepTotByIdx (idx) = if ((idx != idxToUpdate))
252	284		then currArr[idx]
253	285		else toString((parseIntValue(currArr[idx]) + deltaAmt))
254	286
255	287		makeString([DepositTotalsPREFIX, updDepTotByIdx(1), updDepTotByIdx(2), updDepTotByIdx(3), updDepTotByIdx(4), updDepTotByIdx(5), updDepTotByIdx(6), updDepTotByIdx(7), updDepTotByIdx(8), updDepTotByIdx(9), updDepTotByIdx(10), updDepTotByIdx(11), updDepTotByIdx(12), updDepTotByIdx(13), updDepTotByIdx(14), updDepTotByIdx(15), updDepTotByIdx(16), updDepTotByIdx(17), updDepTotByIdx(18)], SEP)
256	288		}
257	289
258	290
259	291		func DepositsTotalsEntries (depositAmount,assetIdStr) = {
260	292		let startOfDay = toStartOfDay(lastBlock.timestamp)
261	293		let byDayKEY = keyStatsDepositAmtByDay(startOfDay)
262	294		let totalsKEY = keyStatsDepositAmtTotals()
263	295		let position = findElementPosition(supportedAssetsStr, assetIdStr, "_")
264	296		let defaultDATA = (DepositTotalsPREFIX + "__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0__0")
265	297		let currTotalsDATA = valueOrElse(getString(this, totalsKEY), defaultDATA)
266	298		let newTotalsDATA = updateDepositTotals(currTotalsDATA, (position + 1), depositAmount)
267	299		[StringEntry(totalsKEY, newTotalsDATA), StringEntry(byDayKEY, newTotalsDATA)]
268	300		}
269	301
270	302
271	303		func RewardEntries (isNewUser,userAddress,stakedAmount) = {
272	304		let stakedAmountX = toBigInt(stakedAmount)
273	305		let userRewardFromDepositNumKEY = keyUserRewardFromDepositNum(userAddress)
274	306		let depositNumUser = getIntOrElse(userRewardFromDepositNumKEY, -1)
275	307		let depositNumLast = getIntOrElse(keyDepositNumLast(), -1)
276	308		func forEachAssetCacheUserReward (accum,asset) = {
277		-	let $~~t01112111256~~ = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
278		-	let rewardTotal = $~~t01112111256~~._1
279		-	let cached = $~~t01112111256~~._2
280		-	let dynamic = $~~t01112111256~~._3
281		-	let rewardCachedPartKEY = $~~t01112111256~~._4
	309	+	let $t01215112286 = calcReward(userAddress, asset, stakedAmountX, depositNumUser, depositNumLast)
	310	+	let rewardTotal = $t01215112286._1
	311	+	let cached = $t01215112286._2
	312	+	let dynamic = $t01215112286._3
	313	+	let rewardCachedPartKEY = $t01215112286._4
282	314		(accum :+ IntegerEntry(rewardCachedPartKEY, rewardTotal))
283	315		}
284	316
285	317		if (if ((depositNumLast == -1))
286	318		then (depositNumUser == -1)
287	319		else false)
288	320		then nil
289	321		else if (if ((depositNumLast == -1))
290	322		then (depositNumUser > -1)
291	323		else false)
292	324		then throw("invalid depositNumLast and depositNumUser state")
293	325		else if (if ((depositNumLast > -1))
294	326		then (depositNumUser >= -1)
295	327		else false)
296	328		then if (isNewUser)
297	329		then [IntegerEntry(userRewardFromDepositNumKEY, depositNumLast)]
298	330		else ({
299	331		let $l = supportedAssetsList
300	332		let $s = size($l)
301	333		let $acc0 = nil
302	334		func $f0_1 ($a,$i) = if (($i >= $s))
303	335		then $a
304	336		else forEachAssetCacheUserReward($a, $l[$i])
305	337
306	338		func $f0_2 ($a,$i) = if (($i >= $s))
307	339		then $a
308	340		else throw("List size exceeds 9")
309	341
310	342		$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)
311	343		} :+ IntegerEntry(userRewardFromDepositNumKEY, depositNumLast))
312	344		else throw(((("uncovered condition: depositNumLast=" + toString(depositNumLast)) + " depositNumUser=") + toString(depositNumUser)))
313	345		}
314	346
315	347
316	348		func IncrementNotDistributedRewardEntry (tkn,amountInc) = {
317	349		let notDistributedRewardKEY = keyNotDistributedReward(tkn)
318	350		let notDistributedReward = getIntOrElse(notDistributedRewardKEY, 0)
319	351		[IntegerEntry(notDistributedRewardKEY, (notDistributedReward + amountInc))]
320	352		}
321	353
322	354
323	355		func surfToGnsbt (surfAmt) = (surfAmt / gnsbtFromSurfCoeff)
324	356
325	357
326		-	func mergeVotingPowerEffectiveHeight (quarantinePeriod,vpEffectiveHeight,stakedAmt,stakedAmtNEW) = {
327		-	let remainingToWait = (vpEffectiveHeight - height)
328		-	if ((0 >= remainingToWait))
329		-	then (height + quarantinePeriod)
330		-	else {
331		-	let alreadyWaited = (quarantinePeriod - remainingToWait)
332		-	let kX8 = if ((stakedAmtNEW != 0))
333		-	then fraction(stakedAmt, MULT8, stakedAmtNEW)
334		-	else vpEffectiveHeight
335		-	((quarantinePeriod + height) - fraction(alreadyWaited, kX8, MULT8))
336		-	}
	358	+	func mergeStake (userAddress,amountToAdd,userTeen,userKid) = {
	359	+	let $t01520915319 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
	360	+	let isNewUser = $t01520915319._1
	361	+	let stakedAmount = $t01520915319._2
	362	+	let vpEffectiveHeight = $t01520915319._3
	363	+	let stakedAmountNEW = if (isNewUser)
	364	+	then amountToAdd
	365	+	else (amountToAdd + stakedAmount)
	366	+	let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
	367	+	let period = (height / W2)
	368	+	let vpEffectivePeriodNEW = if ((userKid > 0))
	369	+	then (period + 2)
	370	+	else if ((userTeen > 0))
	371	+	then (period + 1)
	372	+	else period
	373	+	$Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, (vpEffectivePeriodNEW * W2))
337	374		}
338	375
339	376
340		-	func mergeStake (userAddress,amountToAdd) = {
341		-	let $t01490815018 = valueOrElse(getUserParamsOrUnit(userAddress), $Tuple3(true, 0, 0))
342		-	let isNewUser = $t01490815018._1
343		-	let stakedAmount = $t01490815018._2
344		-	let vpEffectiveHeight = $t01490815018._3
345		-	let stakedAmountNEW = if (isNewUser)
346		-	then amountToAdd
347		-	else (amountToAdd + stakedAmount)
348		-	let quarantinePeriod = (1440 * 14)
349		-	let vpEffectiveHeightNEW = if (isNewUser)
350		-	then (quarantinePeriod + height)
351		-	else mergeVotingPowerEffectiveHeight(quarantinePeriod, vpEffectiveHeight, stakedAmount, stakedAmountNEW)
352		-	$Tuple5(isNewUser, stakedAmount, vpEffectiveHeight, stakedAmountNEW, vpEffectiveHeightNEW)
	377	+	func updateTotals () = {
	378	+	let period = (height / getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD))
	379	+	if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
	380	+	then {
	381	+	let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
	382	+	[IntegerEntry(keyTotalMature(), (totalMature + getIntOrZero(keyTotalTeen()))), IntegerEntry(keyTotalTeen(), getIntOrZero(keyTotalKid())), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)]
	383	+	}
	384	+	else nil
353	385		}
354	386
355	387
	388	+	func onStake (userAddressStr,amountToAdd) = if ((0 > amountToAdd))
	389	+	then throw("amountToAdd should be >= 0")
	390	+	else {
	391	+	let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
	392	+	let period = (height / W2)
	393	+	let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
	394	+	let totalTeen = getIntOrZero(keyTotalTeen())
	395	+	let totalKid = getIntOrZero(keyTotalKid())
	396	+	let userMature = if ((userAddressStr == ""))
	397	+	then 0
	398	+	else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
	399	+	let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
	400	+	let userKid = getIntOrZero(keyUserKid(userAddressStr))
	401	+	let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
	402	+	then $Tuple7((totalMature + userTeen), (totalTeen + (userKid - userTeen)), (totalKid - userKid), (userMature + userTeen), userKid, 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
	403	+	else $Tuple7(totalMature, totalTeen, totalKid, userMature, userTeen, userKid, nil)
	404	+	let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
	405	+	then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
	406	+	else $Tuple4(nil, totalMature, totalTeen, totalKid)
	407	+	let newKid = fraction(amountToAdd, (height % W2), W2)
	408	+	let newTeen = (amountToAdd - newKid)
	409	+	$Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), (tmp._5 + newTeen))) :+ IntegerEntry(keyUserKid(userAddressStr), (tmp._6 + newKid))) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, (tmp._5 + newTeen), (tmp._6 + newKid))
	410	+	}
	411	+
	412	+
	413	+	let IdxNewDiff = 0
	414	+
	415	+	let IdxNewGnsbt = 1
	416	+
	417	+	func userDecrease (gnsbt,diff) = if ((diff >= gnsbt))
	418	+	then [(diff - gnsbt), 0]
	419	+	else [0, (gnsbt - diff)]
	420	+
	421	+
	422	+	func onUnstake (userAddressStr,amountToRemove) = if ((0 >= amountToRemove))
	423	+	then throw("amountToRemove should be > 0")
	424	+	else {
	425	+	let W2 = getIntOrElse(keyVpPeriodDuration(), DEFAULTPERIOD)
	426	+	let period = (height / W2)
	427	+	let totalMature = valueOrElse(getInteger(keyTotalMature()), getIntOrZero(keyLockParamTotalAmount()))
	428	+	let totalTeen = getIntOrZero(keyTotalTeen())
	429	+	let totalKid = getIntOrZero(keyTotalKid())
	430	+	let userMature = if ((userAddressStr == ""))
	431	+	then 0
	432	+	else valueOrElse(getInteger(keyUserMature(userAddressStr)), getIntOrZero(keyLockParamUserAmount(addressFromStringValue(userAddressStr))))
	433	+	let userTeen = getIntOrZero(keyUserTeen(userAddressStr))
	434	+	let userKid = getIntOrZero(keyUserKid(userAddressStr))
	435	+	let um = userDecrease(userMature, amountToRemove)
	436	+	let ut = userDecrease(userTeen, um[IdxNewDiff])
	437	+	let uk = userDecrease(userKid, ut[IdxNewDiff])
	438	+	if ((uk[IdxNewDiff] != 0))
	439	+	then throw("Should not happen")
	440	+	else {
	441	+	let tmp = if ((period > getIntOrZero(keyLastUserPeriodProcessed(userAddressStr))))
	442	+	then $Tuple7((totalMature + ut[IdxNewGnsbt]), (totalTeen + (uk[IdxNewGnsbt] - ut[IdxNewGnsbt])), (totalKid - uk[IdxNewGnsbt]), (um[IdxNewGnsbt] + ut[IdxNewGnsbt]), uk[IdxNewGnsbt], 0, [IntegerEntry(keyLastUserPeriodProcessed(userAddressStr), period)])
	443	+	else $Tuple7(totalMature, totalTeen, totalKid, um[IdxNewGnsbt], ut[IdxNewGnsbt], uk[IdxNewGnsbt], nil)
	444	+	let totals = if ((period > getIntOrZero(keyLastTotalsPeriodProcessed())))
	445	+	then $Tuple4([IntegerEntry(keyTotalMature(), (tmp._1 + tmp._2)), IntegerEntry(keyTotalTeen(), tmp._3), IntegerEntry(keyTotalKid(), 0), IntegerEntry(keyLastTotalsPeriodProcessed(), period)], (tmp._1 + tmp._2), tmp._3, 0)
	446	+	else $Tuple4(nil, totalMature, totalTeen, totalKid)
	447	+	$Tuple7(((((totals._1 :+ IntegerEntry(keyUserMature(userAddressStr), tmp._4)) :+ IntegerEntry(keyUserTeen(userAddressStr), tmp._5)) :+ IntegerEntry(keyUserKid(userAddressStr), tmp._6)) ++ tmp._7), totals._2, totals._3, totals._4, tmp._4, tmp._5, tmp._6)
	448	+	}
	449	+	}
	450	+
	451	+
356	452		func commonStake (userAddress,i) = {
357		-	let $~~t01550415558~~ = getParamsOrFail()
358		-	let stakedAssetId = $~~t01550415558~~._1
359		-	let minLockAmount = $~~t01550415558~~._2
	453	+	let $t02120621260 = getParamsOrFail()
	454	+	let stakedAssetId = $t02120621260._1
	455	+	let minLockAmount = $t02120621260._2
360	456		if ((size(i.payments) != 1))
361	457		then throw("Invalid payments size")
362	458		else {
363	459		let payment = i.payments[0]
364	460		let amount = payment.amount
365	461		let invalidAssetMessage = (("Invalid asset. " + toBase58String(stakedAssetId)) + " is expected")
366	462		let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
367	463		if ((assetId != stakedAssetId))

github/deemru/w8io/3ef1775 
108.45 ms ◑