tx · BPmq2smDgemLBYyCjRFMiS7BBakxr9roAduCoumrGnuV

3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh:  -0.02900000 Waves

2024.11.29 20:45 [3393033] smart account 3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BPmq2smDgemLBYyCjRFMiS7BBakxr9roAduCoumrGnuV",
    "fee": 2900000,
    "feeAssetId": null,
    "timestamp": 1732902395381,
    "version": 2,
    "chainId": 84,
    "sender": "3NBPx1Fciu3JQNEGZ21jSnTdutLNGGBUSXh",
    "senderPublicKey": "3QtfC1XbLZXdeawMDeSERy9vvjUmj1XYd2GFmrvx7pWQ",
    "proofs": [
        "5Fk6QeqYVWkSG2WBCoqffWED3hPnbEwDXnrrKVaTY6kFyn97UxT1ekvL8rKQLJ1rVaXmQkeQ1AKNg43AbFrWx1iy"
    ],
    "script": "base64:BgJHCAISABIECgIICBIDCgEEEgMKAQESABIAEgMKAQESABIECgIIARIAEgMKAQgSAwoBCBIECgIIARIDCgEIEgASAwoBCBIAEgB2AANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ3AICt4gQABU1VTFQ4AIDC1y8ACkRBWV9NSUxMSVMAgLiZKQAVVVNEVDJBQ1JFU19NVUxUSVBMSUVSAAoAE09ORV9QRVJDRU5UX0RJVklTT1IAZAAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC1dFRUtfQkxPQ0tTBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAOBOAwkAAAIBAVQFByRtYXRjaDAAtAEJAAIBAg1Vbmtub3duIGNoYWluAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABZkZWZhdWx0UmVzdDJBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUEZ3WXRhOGJpRXozMXpwZUZlNURKSzh3RTV0clNwUVZGOAMJAAACAQFUBQckbWF0Y2gwAiMzTjdVdVlhcjYyNjRQNThGQmhWV0tQUUFoNFl1YTJoZ25ndgkAAgECDVVua25vd24gY2hhaW4ADmFyYml0cmFnZURlbGF5BAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwBQpEQVlfTUlMTElTAwkAAAIBAVQFByRtYXRjaDAA4NQDCQACAQINVW5rbm93biBjaGFpbgAVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUExuY1h0UzFVODNENmNRYkZEM0g4ckJIUExnenhTRktaMQMJAAACAQFUBQckbWF0Y2gwAiMzTkRDeUJHNXE4NUp1YVJpaWdVZUV0YWlueWpDUVQzWHBabQkAAgECDVVua25vd24gY2hhaW4BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABBJZHhDZmdBY3JlczJEYXBwAAEADUlkeENmZ1dsZ0RhcHAAAgAUSWR4Q2ZnSW52ZXN0RnVuZERhcHAABQEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ9rZXlSZXN0MkFkZHJlc3MAAg0lc19fcmVzdDJBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIIcmVzdDJDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQhyZXN0MkNmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADXJlc3QyQ29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBD2tleVJlc3QyQWRkcmVzcwAFFmRlZmF1bHRSZXN0MkFkZHJlc3NTdHIACHJlc3QyQ2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQ1yZXN0MkNvbnRyYWN0AA5hY3JlczJDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBRBJZHhDZmdBY3JlczJEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFCHJlc3QyQ2ZnBQ1JZHhDZmdXbGdEYXBwABJpbnZlc3RGdW5kQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQhyZXN0MkNmZwUUSWR4Q2ZnSW52ZXN0RnVuZERhcHAAE29sZEFjcmVzQ29udHJhY3RLZXkCEG9sZEFjcmVzQ29udHJhY3QBCmtleUJsb2NrZWQAAhBjb250cmFjdHNCbG9ja2VkARVrZXlMYXN0V2Vla1R4SWRCeVVzZXIBBGFkZHIJAKwCAgITbGFzdFdlZWtUeElkQnlVc2VyXwUEYWRkcgEUa2V5Q3VyV2Vla1R4SWRCeVVzZXIBBGFkZHIJAKwCAgISY3VyV2Vla1R4SWRCeVVzZXJfBQRhZGRyAA13bGdBc3NldElkS2V5Agt3bGdfYXNzZXRJZAAKd2xnQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFC3dsZ0NvbnRyYWN0BQ13bGdBc3NldElkS2V5AhhXTEdPTEQgaXMgbm90IGlzc3VlZCB5ZXQAFGFjcmVzSXNzdWVkQW1vdW50S2V5AhFhY3Jlc0lzc3VlZEFtb3VudAAPYWNyZXNBc3NldElkS2V5AgxhY3Jlc0Fzc2V0SWQADGFjcmVzQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFDmFjcmVzMkNvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQlvd25lckFkZHIJAKwCAgITc3Rha2VkTGFuZHNCeU93bmVyXwUJb3duZXJBZGRyARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyAR5rZXlTdGFrZWRUaW1lQnlBc3NldElkQW5kT3duZXICB2Fzc2V0SWQEYWRkcgkArAICCQCsAgIJAKwCAgIDc3RfBQdhc3NldElkAgFfBQRhZGRyARRrZXlTdGFrZWRORlRzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZE5GVHNCeU93bmVyXwUJb3duZXJBZGRyAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAW4FByRtYXRjaDAFAW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBDGFzVHVwbGU1SW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIZKEludCwgSW50LCBJbnQsIEludCwgSW50KQQBdAUHJG1hdGNoMAUBdAkAAgECK2ZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCwgSW50LCBJbnQsIEludCkBDGFzVHVwbGU0SW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIUKEludCwgSW50LCBJbnQsIEludCkEAXQFByRtYXRjaDAFAXQJAAIBAiZmYWlsIHRvIGNhc3QgaW50byAoSW50LCBJbnQsIEludCwgSW50KQEMYXNUdXBsZTNJbnRzAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAg8oSW50LCBJbnQsIEludCkEAXQFByRtYXRjaDAFAXQJAAIBAiFmYWlsIHRvIGNhc3QgaW50byAoSW50LCBJbnQsIEludCkBDGFzVHVwbGUySW50cwEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQBdAUHJG1hdGNoMAUBdAkAAgECHGZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCkBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0AANNNl8AwIQ9AANNOF8AgMLXLwAPd2xnSXNzdWVkQW10S2V5AhB3bGdfaXNzdWVkQW1vdW50AA56Yklzc3VlZEFtdEtleQISemJpbGxfaXNzdWVkQW1vdW50ARdrZXlBY3Jlc1N0YWtlZEFtdEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcl8FBGFkZHIBFWtleUZhcm1pbmdQb3dlckJ5VXNlcgEEYWRkcgkArAICAhNmYXJtaW5nUG93ZXJCeVVzZXJfBQRhZGRyABJhY3Jlc1N0YWtkVG90YWxLZXkCFmFjcmVzU3Rha2VkQW1vdW50VG90YWwAFHRvdGFsRmFybWluZ1Bvd2VyS2V5AhF0b3RhbEZhcm1pbmdQb3dlcgALTUFYX1dMX05GVFMAAwAMTUFYX0FSS19ORlRTAAEADUFSS19ORlRfQk9OVVMAiCcAF01BWF9ORlRTX1NUQUtFRF9CWV9VU0VSAAQAEWtleU5mdFRvdGFsSXNzdWVkAg5uZnRUb3RhbElzc3VlZAARa2V5TmZ0VG90YWxCdXJuZWQCDm5mdFRvdGFsQnVybmVkABNrZXlXbE5mdFRvdGFsU3Rha2VkAhBXbE5mdFRvdGFsU3Rha2VkABRrZXlBcmtOZnRUb3RhbFN0YWtlZAIRQXJrTmZ0VG90YWxTdGFrZWQBFWtleU5mdE51bWJlckJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAhNuZnROdW1iZXJCeUFzc2V0SWRfBQdhc3NldElkARJrZXlVc2VyV2xOZnROdW1iZXIBBGFkZHIJAKwCAgIQdXNlcldsTmZ0TnVtYmVyXwUEYWRkcgETa2V5VXNlckFya05mdE51bWJlcgEEYWRkcgkArAICAhF1c2VyQXJrTmZ0TnVtYmVyXwUEYWRkcgEQa2V5VXNlckZ1bGxCb251cwEEYWRkcgkArAICAg51c2VyRnVsbEJvbnVzXwUEYWRkcgAKbGV2ZWxBY3JlcwkAzAgCAAAJAMwIAgAKCQDMCAIAFAkAzAgCACgJAMwIAgBQCQDMCAIAlgEJAMwIAgD6AQkAzAgCAJADCQDMCAIAvAUJAMwIAgDoBwUDbmlsAQ9nZXRMZXZlbEJ5QWNyZXMBBWFjcmVzBANhY3IJAGkCCQBkAgUFYWNyZXMA/8HXLwUDTThfCgEHY2hlY2tlcgIDYWNjBGl0ZW0DCQBnAgUEaXRlbQUDYWNyBQNhY2MJAGQCBQNhY2MAAQoAAiRsBQpsZXZlbEFjcmVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjaGVja2VyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARZnZXRGYXJtaW5nUG93ZXJCeUFjcmVzAQVhY3JlcwkAaAIJAGgCBQVhY3JlcwAUCQBkAgkBD2dldExldmVsQnlBY3JlcwEFBWFjcmVzAAQBHmdldEZhcm1pbmdQb3dlckJ5QWNyZXNBbmRCb251cwIFYWNyZXMGYm9udXM2BApub3RCb251c2VkCQEWZ2V0RmFybWluZ1Bvd2VyQnlBY3JlcwEFBWFjcmVzCQCUCgIJAGsDBQpub3RCb251c2VkCQBkAgUDTTZfBQZib251czYFA002XwUKbm90Qm9udXNlZAALdGVhbUFkZHJLZXkCCHRlYW1BZGRyARlrZXlMYXN0V2xnVHJhZGVUaW1lQnlVc2VyAQRhZGRyCQCsAgICEGxhc3RBcmJUaW1lVXNlcl8FBGFkZHIAFGtleUxhc3RBY3Jlc1NlbGxUaW1lAhFsYXN0QWNyZXNTZWxsVGltZQAQa2V5TGFzdExpbWl0TGVmdAINbGFzdExpbWl0TGVmdAAFbmFtZXMJAMwIAgILR29sZCBzaG92ZWwJAMwIAgIHUGlja2F4ZQUDbmlsAAxkZXNjcmlwdGlvbnMJAMwIAgIWUmV3YXJkIGZvciBlYXJseSBiaXJkcwkAzAgCAhNJbmNyZWFzZXMgRmFybVBvd2VyBQNuaWwADmlkeERlc2NyU2hvdmVsAAAAD2lkeERlc2NyUGlja2F4ZQABABByYXJpdHlUaHJlc2hvbGRzCQDMCAIABQkAzAgCAAoJAMwIAgAUBQNuaWwADWlkeFRocmVzaG9sZEMAAAANaWR4VGhyZXNob2xkVQABAA1pZHhUaHJlc2hvbGRMAAIABW5hbWV6CQDMCAICBlNIT1ZFTAkAzAgCAgdQSUNLQVhFBQNuaWwADWlkeE5hbWVTaG92ZWwAAAAOaWR4TmFtZVBpY2theGUAAQALY29udGVudEtleXoJAMwIAgIPY29udGVudFBpY2theGVDCQDMCAICD2NvbnRlbnRQaWNrYXhlVQkAzAgCAg9jb250ZW50UGlja2F4ZUwJAMwIAgIPY29udGVudFBpY2theGVFCQDMCAICDmNvbnRlbnRTaG92ZWxQBQNuaWwAB2lkeEtleUMAAAAHaWR4S2V5UAAEAAtyYXJpdHlOYW1lcwkAzAgCAgZDb21tb24JAMwIAgIIVW5jb21tb24JAMwIAgIJTGVnZW5kYXJ5CQDMCAICBEVwaWMJAMwIAgIFUHJvbW8FA25pbAAKaWR4UmFyaXR5QwAAAAppZHhSYXJpdHlVAAEACmlkeFJhcml0eUwAAgAKaWR4UmFyaXR5RQADAAppZHhSYXJpdHlQAAQAC2NvbGxlY3Rpb256CQDMCAICDURpZ2dpbmcgdG9vbHMFA25pbAAKaWR4Q29sbERpZwAAAApib251c1R5cGV6CQDMCAICCUZhcm1Qb3dlcgUDbmlsAA5pZHhCb251c1R5cGVGcAAAAQZwcm9sb2cBAWkDAwkBAiE9AggFAWkMb3JpZ2luQ2FsbGVyBQ1yZXN0MkNvbnRyYWN0CQELdmFsdWVPckVsc2UCCQCgCAEJAQprZXlCbG9ja2VkAAcHCQACAQIfQ29udHJhY3RzIGFyZSB1bmRlciBtYWludGVuYW5jZQQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBHdlZWsJAGkCBQZoZWlnaHQFC1dFRUtfQkxPQ0tTBAtsYXN0V2Vla0tleQkBFWtleUxhc3RXZWVrVHhJZEJ5VXNlcgEFBGFkZHIEEmxhc3RXZWVrVHhJZEJ5VXNlcgkAoggBBQtsYXN0V2Vla0tleQQEdHhJZAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBAN3dHgJAKwCAgkArAICCQCkAwEFBHdlZWsCAV8FBHR4SWQECmN1cldlZWtLZXkJARRrZXlDdXJXZWVrVHhJZEJ5VXNlcgEFBGFkZHIDCQEJaXNEZWZpbmVkAQUSbGFzdFdlZWtUeElkQnlVc2VyBApsYXN0V2Vla1R4CQC1CQIJAQV2YWx1ZQEFEmxhc3RXZWVrVHhJZEJ5VXNlcgIBXwMJAAACCQCRAwIFCmxhc3RXZWVrVHgAAAkApAMBBQR3ZWVrCQDMCAIJAQtTdHJpbmdFbnRyeQIFC2xhc3RXZWVrS2V5BQN3dHgJAMwIAgkBC1N0cmluZ0VudHJ5AgUKY3VyV2Vla0tleQUDd3R4BQNuaWwDCQAAAgkAkQMCBQpsYXN0V2Vla1R4AAAJAKQDAQkAZQIFBHdlZWsAAQkAzAgCCQELU3RyaW5nRW50cnkCBQpjdXJXZWVrS2V5BQN3dHgFA25pbAQRY3VyV2Vla1R4SWRCeVVzZXIJARFAZXh0ck5hdGl2ZSgxMDU4KQEFCmN1cldlZWtLZXkECWN1cldlZWtUeAkAtQkCBRFjdXJXZWVrVHhJZEJ5VXNlcgIBXwMJAAACCQCRAwIFCWN1cldlZWtUeAAACQCkAwEFBHdlZWsJAMwIAgkBC1N0cmluZ0VudHJ5AgUKY3VyV2Vla0tleQUDd3R4BQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgULbGFzdFdlZWtLZXkFEWN1cldlZWtUeElkQnlVc2VyCQDMCAIJAQtTdHJpbmdFbnRyeQIFCmN1cldlZWtLZXkFA3d0eAUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIFC2xhc3RXZWVrS2V5BQN3dHgJAMwIAgkBC1N0cmluZ0VudHJ5AgUKY3VyV2Vla0tleQUDd3R4BQNuaWwBFGNyZWF0ZU5mdERlc2NyQ3VzdG9tCAdjb250S2V5CW5mdFNlcmlhbApjb2xsZWN0aW9uBG5hbWUFZGVzY3IGcmFyaXR5BWJvbnVzCWJvbnVzVHlwZQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIieyJ1cmwiOiAiaHR0cHM6Ly93YXZlc2xhbmRzLmNvbSIsIAIPImNvbnRlbnRLZXkiOiAiBQdjb250S2V5AgMiLCACCiJudW1iZXIiOiAJAKQDAQUJbmZ0U2VyaWFsAgIsIAIPImNvbGxlY3Rpb24iOiAiBQpjb2xsZWN0aW9uAgMiLCACCSJuYW1lIjogIgUEbmFtZQIDIiwgAhAiZGVzY3JpcHRpb24iOiAiBQVkZXNjcgIDIiwgAgkicmFyZSI6ICIFBnJhcml0eQIDIiwgAgkiYm9udXMiOiAJAKQDAQUFYm9udXMCAiwgAg4iYm9udXNUeXBlIjogIgUJYm9udXNUeXBlAgIifQEOaXNzdWVOZnRDdXN0b20IB25hbWVJZHgKY29udEtleUlkeAdjb2xsSWR4CXJhcml0eUlkeAlib251c1BlcmMIZGVzY3JJZHgMYm9udXNUeXBlSWR4BGFkZHIECW5mdFNlcmlhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRFrZXlOZnRUb3RhbElzc3VlZAAABAZyYXJpdHkJAJEDAgULcmFyaXR5TmFtZXMFCXJhcml0eUlkeAQEbmFtZQkArAICCQCsAgIJAKwCAgkAkQMCBQVuYW1legUHbmFtZUlkeAIBLQkArwICBQZyYXJpdHkAAQkApAMBBQlib251c1BlcmMEBWlzc3VlCQDCCAUFBG5hbWUJARRjcmVhdGVOZnREZXNjckN1c3RvbQgJAJEDAgULY29udGVudEtleXoFCmNvbnRLZXlJZHgFCW5mdFNlcmlhbAkAkQMCBQtjb2xsZWN0aW9uegUHY29sbElkeAkAkQMCBQVuYW1lcwUHbmFtZUlkeAkAkQMCBQxkZXNjcmlwdGlvbnMFCGRlc2NySWR4CQCRAwIFC3Jhcml0eU5hbWVzBQlyYXJpdHlJZHgFCWJvbnVzUGVyYwkAkQMCBQpib251c1R5cGV6BQxib251c1R5cGVJZHgAAQAABwQKbmZ0QXNzZXRJZAkAuAgBBQVpc3N1ZQkAlAoCCQDMCAIFBWlzc3VlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRFrZXlOZnRUb3RhbElzc3VlZAkAZAIFCW5mdFNlcmlhbAABCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEVa2V5TmZ0TnVtYmVyQnlBc3NldElkAQkA2AQBBQpuZnRBc3NldElkBQluZnRTZXJpYWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUEYWRkcgABBQpuZnRBc3NldElkBQNuaWwFCm5mdEFzc2V0SWQBGXN0YWtlVW5zdGFrZUFjcmVzSW50ZXJuYWwDA2FtdAdhZGRyZXNzCmJvbnVzRGVsdGEDAwkAAAIFA2FtdAAACQAAAgUKYm9udXNEZWx0YQAABwkAAgECDU5vdGhpbmcgdG8gZG8ECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsAwkAAAIFCXdsZ1Jlc3VsdAUJd2xnUmVzdWx0BANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEXa2V5QWNyZXNTdGFrZWRBbXRCeVVzZXIBBQdhZGRyZXNzBA5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAMDCQBmAgAABQNhbXQJAGYCAAAJAGQCBQ5vbGRBY3Jlc0Ftb3VudAUDYW10BwkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQEKZml4ZWRQb2ludAIFDm9sZEFjcmVzQW1vdW50AAgCICBBQ1JFUyBzdGFrZWQsIHRyaWVkIHRvIHVuc3Rha2UgCQEKZml4ZWRQb2ludAIJAQEtAQUDYW10AAgEDm5ld0FjcmVzQW1vdW50CQBkAgUOb2xkQWNyZXNBbW91bnQFA2FtdAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUSYWNyZXNTdGFrZFRvdGFsS2V5AAAECXVzZXJGcEtleQkBFWtleUZhcm1pbmdQb3dlckJ5VXNlcgEFB2FkZHJlc3MEBW9sZEZwCQELdmFsdWVPckVsc2UCCQCfCAEFCXVzZXJGcEtleQAABAhib251c0tleQkBEGtleVVzZXJGdWxsQm9udXMBBQdhZGRyZXNzBAhvbGRCb251cwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ5hY3JlczJDb250cmFjdAUIYm9udXNLZXkAAAMDCQBmAgAABQpib251c0RlbHRhCQBmAgAACQBkAgUIb2xkQm9udXMFCmJvbnVzRGVsdGEHCQACAQkArAICCQCsAgIJAKwCAgkArAICAg5Zb3UgaGF2ZSBvbmx5IAkBCmZpeGVkUG9pbnQCBQhvbGRCb251cwAEAh4lIGJvbnVzLCBhbmQgdHJpZWQgdG8gdW5zdGFrZSAJAQpmaXhlZFBvaW50AgkBAS0BBQpib251c0RlbHRhAAQCASUECyR0MDY4Mzg2OTM3CQEeZ2V0RmFybWluZ1Bvd2VyQnlBY3Jlc0FuZEJvbnVzAgUObmV3QWNyZXNBbW91bnQJAGQCBQhvbGRCb251cwUKYm9udXNEZWx0YQQMbmV3Qm9udXNlZEZwCAULJHQwNjgzODY5MzcCXzEEB2lnbm9yZWQIBQskdDA2ODM4NjkzNwJfMgQKb2xkVG90YWxGcAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRR0b3RhbEZhcm1pbmdQb3dlcktleQAABAxhY3Jlc0FjdGlvbnMDCQAAAgUDYW10AAAFA25pbAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5BQ5uZXdBY3Jlc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSYWNyZXNTdGFrZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFA2FtdAUDbmlsCQCUCgIJAM0IAgkAzQgCCQDNCAIJAM0IAgUMYWNyZXNBY3Rpb25zCQEMSW50ZWdlckVudHJ5AgUHdGltZUtleQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAQxJbnRlZ2VyRW50cnkCBQl1c2VyRnBLZXkFDG5ld0JvbnVzZWRGcAkBDEludGVnZXJFbnRyeQIFFHRvdGFsRmFybWluZ1Bvd2VyS2V5CQBlAgkAZAIFCm9sZFRvdGFsRnAFDG5ld0JvbnVzZWRGcAUFb2xkRnAJAQxJbnRlZ2VyRW50cnkCBQhib251c0tleQkAZAIFCG9sZEJvbnVzBQpib251c0RlbHRhBQl3bGdSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BC2dldFdsZ1ByaWNlARV1c2R0QmFsYW5jZUNvcnJlY3Rpb24EDGlzc3VlZEFtb3VudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFC3dsZ0NvbnRyYWN0BQ93bGdJc3N1ZWRBbXRLZXkCGFdMR09MRCBpcyBub3QgaXNzdWVkIHlldAQGd2xnVXNkCQDwBwIFC3dsZ0NvbnRyYWN0BQt1c2R0QXNzZXRJZAQJYWNyZXMyVXNkCQBlAgkA8AcCBQ5hY3JlczJDb250cmFjdAULdXNkdEFzc2V0SWQFFXVzZHRCYWxhbmNlQ29ycmVjdGlvbgQPaW52ZXN0RnVuZFRvdGFsCQBkAgkA8AcCBRJpbnZlc3RGdW5kQ29udHJhY3QFC3VzZHRBc3NldElkCQELdmFsdWVPckVsc2UCCQCaCAIFEmludmVzdEZ1bmRDb250cmFjdAUOemJJc3N1ZWRBbXRLZXkAAAQNdG90YWxGdW5kc1VzZAkAZAIJAGQCBQlhY3JlczJVc2QFBndsZ1VzZAUPaW52ZXN0RnVuZFRvdGFsCQBrAwUNdG90YWxGdW5kc1VzZAUFTVVMVDgFDGlzc3VlZEFtb3VudAERZ2V0U3dhcExpbWl0QWNyZXMABAZ3bGdVc2QJAPAHAgULd2xnQ29udHJhY3QFC3VzZHRBc3NldElkBAlhY3JlczJVc2QJAPAHAgUEdGhpcwULdXNkdEFzc2V0SWQED2ludmVzdEZ1bmRUb3RhbAkAZAIJAPAHAgUSaW52ZXN0RnVuZENvbnRyYWN0BQt1c2R0QXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRJpbnZlc3RGdW5kQ29udHJhY3QFDnpiSXNzdWVkQW10S2V5AAAEDGRlZmF1bHRMaW1pdAkAaQIJAGQCCQBkAgUJYWNyZXMyVXNkBQZ3bGdVc2QFD2ludmVzdEZ1bmRUb3RhbAUTT05FX1BFUkNFTlRfRElWSVNPUgQNbGFzdExpbWl0TGVmdAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRBrZXlMYXN0TGltaXRMZWZ0BQxkZWZhdWx0TGltaXQECGxhc3RUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFFGtleUxhc3RBY3Jlc1NlbGxUaW1lAAAEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEDGN1cnJlbnRMaW1pdAkAZAIFDWxhc3RMaW1pdExlZnQJAGsDBQxkZWZhdWx0TGltaXQJAGUCBQNub3cFCGxhc3RUaW1lBQpEQVlfTUlMTElTBA1saW1pdExlZnRVc2R0CQCXAwEJAMwIAgUMY3VycmVudExpbWl0CQDMCAIFDGRlZmF1bHRMaW1pdAUDbmlsCQCUCgIJAQxJbnRlZ2VyRW50cnkCBRRrZXlMYXN0QWNyZXNTZWxsVGltZQUDbm93BQ1saW1pdExlZnRVc2R0AAlhcmtPcmFjbGUJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQSmdaNkFLMVdWQ3BkQ21FWnBlc0htYUt2clFEZFhHNW9nAAlpbmN1YmF0b3IJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUJYXJrT3JhY2xlAhdzdGF0aWNfaW5jdWJhdG9yQWRkcmVzcwIAAAdicmVlZGVyCQELdmFsdWVPckVsc2UCCQCdCAIFCWFya09yYWNsZQIVc3RhdGljX2JyZWVkZXJBZGRyZXNzAgAAD3R1cnRsZUluY3ViYXRvcgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQlhcmtPcmFjbGUCHXN0YXRpY190dXJ0bGVJbmN1YmF0b3JBZGRyZXNzAgAADXR1cnRsZUJyZWVkZXIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUJYXJrT3JhY2xlAhtzdGF0aWNfdHVydGxlQnJlZWRlckFkZHJlc3MCAAAPY2FuaW5lSW5jdWJhdG9yCQELdmFsdWVPckVsc2UCCQCdCAIFCWFya09yYWNsZQIdc3RhdGljX2NhbmluZUluY3ViYXRvckFkZHJlc3MCAAANY2FuaW5lQnJlZWRlcgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQlhcmtPcmFjbGUCG3N0YXRpY19jYW5pbmVCcmVlZGVyQWRkcmVzcwIAAA9mZWxpbmVJbmN1YmF0b3IJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUJYXJrT3JhY2xlAh1zdGF0aWNfZmVsaW5lSW5jdWJhdG9yQWRkcmVzcwIAAA1mZWxpbmVCcmVlZGVyCQELdmFsdWVPckVsc2UCCQCdCAIFCWFya09yYWNsZQIbc3RhdGljX2ZlbGluZUJyZWVkZXJBZGRyZXNzAgAADW11dGFudEJyZWVkZXIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUJYXJrT3JhY2xlAh1zdGF0aWNfbXV0YW50SW5jdWJhdG9yQWRkcmVzcwIAAQ9pc0Fya2ltYWxJc3N1ZWQBA25mbwQGaXNzdWVyCQClCAEIBQNuZm8GaXNzdWVyAwMDAwMDAwMDAwkAAAIFBWNoYWluAQFUCQAAAgUGaXNzdWVyBRVvbGRTdGFraW5nQ29udHJhY3RTdHIHBgkAAAIFBmlzc3VlcgUJaW5jdWJhdG9yBgkAAAIFBmlzc3VlcgUHYnJlZWRlcgYJAAACBQZpc3N1ZXIFD3R1cnRsZUluY3ViYXRvcgYJAAACBQZpc3N1ZXIFDXR1cnRsZUJyZWVkZXIGCQAAAgUGaXNzdWVyBQ9jYW5pbmVJbmN1YmF0b3IGCQAAAgUGaXNzdWVyBQ1jYW5pbmVCcmVlZGVyBgkAAAIFBmlzc3VlcgUPZmVsaW5lSW5jdWJhdG9yBgkAAAIFBmlzc3VlcgUNZmVsaW5lQnJlZWRlcggFA25mbwRuYW1lAwkAAAIFBmlzc3VlcgUNbXV0YW50QnJlZWRlcggFA25mbwtkZXNjcmlwdGlvbgIAARJib251c0J5RGVzY3JpcHRpb24BBWRlc2NyAwkBASEBCQEIY29udGFpbnMCBQVkZXNjcgIYImJvbnVzVHlwZSI6ICJGYXJtUG93ZXIiCQACAQkArAICAhZORlQgaXMgbm90IHN1cHBvcnRlZDogBQVkZXNjcgQIYm9udXNTdHIJAJEDAgkAvAkCCQCRAwIJALwJAgUFZGVzY3ICCCJib251cyI6AAECASwAAAkBDXBhcnNlSW50VmFsdWUBCQCwAgIFCGJvbnVzU3RyCQBkAgkBC3ZhbHVlT3JFbHNlAgkAtwkCBQhib251c1N0cgIBIAD///////////8BAAEBFnJhcml0eUlkeEJ5RGVzY3JpcHJpb24BBWRlc2NyAwkBASEBCQEIY29udGFpbnMCBQVkZXNjcgIGInJhcmUiCQACAQkArAICAhZORlQgaXMgbm90IHN1cHBvcnRlZDogBQVkZXNjcgQJcmFyaXR5U3RyCQCRAwIJALwJAgkAkQMCCQC8CQIJAJEDAgkAvAkCBQVkZXNjcgIGInJhcmUiAAECASwAAAIBIgABCQEFdmFsdWUBCQDPCAIFC3Jhcml0eU5hbWVzBQlyYXJpdHlTdHIBEHN0YWtlTmZ0SW50ZXJuYWwGBGFkZHIKYXNzZXRJZFN0cgZib251czYKdXNlck51bUtleQt0b3RhbE51bUtleQVsaW1pdAQJbmZ0TnVtYmVyCQELdmFsdWVPckVsc2UCCQCfCAEFCnVzZXJOdW1LZXkAAAMJAGcCBQluZnROdW1iZXIFBWxpbWl0CQACAQkArAICCQCsAgICEllvdSBjYW4gc3Rha2UgbWF4IAkApAMBBQVsaW1pdAINIG9mIHN1Y2ggTkZUcwQNJHQwMTE3NTcxMTgzMwkBGXN0YWtlVW5zdGFrZUFjcmVzSW50ZXJuYWwDAAAFBGFkZHIFBmJvbnVzNgQHYWN0aW9ucwgFDSR0MDExNzU3MTE4MzMCXzEEEHdsZ0NsYWltZWRBbW91bnQIBQ0kdDAxMTc1NzExODMzAl8yCQCUCgIJAM0IAgkAzQgCCQDNCAIFB2FjdGlvbnMJAQxJbnRlZ2VyRW50cnkCBQp1c2VyTnVtS2V5CQBkAgUJbmZ0TnVtYmVyAAEJAQxJbnRlZ2VyRW50cnkCBQt0b3RhbE51bUtleQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQULdG90YWxOdW1LZXkAAAABCQEMSW50ZWdlckVudHJ5AgkBHmtleVN0YWtlZFRpbWVCeUFzc2V0SWRBbmRPd25lcgIFCmFzc2V0SWRTdHIFBGFkZHIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRB3bGdDbGFpbWVkQW1vdW50EgFpAQpzYXZlTGFzdFR4AAMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIJAMwIAgULd2xnQ29udHJhY3QFA25pbAgFAWkGY2FsbGVyCQACAQINQWNjZXNzIGRlbmllZAkAlAoCCQEGcHJvbG9nAQUBaQAqAWkBDWNvbnN0cnVjdG9yVjECCXJlc3QyQWRkcg5vbGRBY3JDb250cmFjdAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkBA5vbGRBY3JDb250QWRkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQUOb2xkQWNyQ29udHJhY3QJAMwIAgkBDEludGVnZXJFbnRyeQIFFGFjcmVzSXNzdWVkQW1vdW50S2V5CQERQGV4dHJOYXRpdmUoMTA1MCkCBQ5vbGRBY3JDb250QWRkcgUUYWNyZXNJc3N1ZWRBbW91bnRLZXkJAMwIAgkBC0JpbmFyeUVudHJ5AgUPYWNyZXNBc3NldElkS2V5CQERQGV4dHJOYXRpdmUoMTA1MikCBQ5vbGRBY3JDb250QWRkcgUPYWNyZXNBc3NldElkS2V5CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ9rZXlSZXN0MkFkZHJlc3MABQlyZXN0MkFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgUTb2xkQWNyZXNDb250cmFjdEtleQUOb2xkQWNyQ29udHJhY3QFA25pbAFpAQpzZXRCbG9ja2VkAQlpc0Jsb2NrZWQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBCmtleUJsb2NrZWQABQlpc0Jsb2NrZWQFA25pbAFpAQx1bnN0YWtlQWNyZXMBBmFtb3VudAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQBnAgAABQZhbW91bnQJAAIBAhlBbW91bnQgc2hvdWxkIGJlIHBvc2l0aXZlBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBA5hcmJSZWxlYXNlVGltZQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgULd2xnQ29udHJhY3QJARlrZXlMYXN0V2xnVHJhZGVUaW1lQnlVc2VyAQUHYWRkcmVzcwAABQ5hcmJpdHJhZ2VEZWxheQMJAGYCBQ5hcmJSZWxlYXNlVGltZQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAAIBCQCsAgICLVlvdSB0cmFkZWQgc29tZSBXTEdPTEQsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQ5hcmJSZWxlYXNlVGltZQQNJHQwMTM0MDcxMzQ4NwkBGXN0YWtlVW5zdGFrZUFjcmVzSW50ZXJuYWwDCQEBLQEFBmFtb3VudAUHYWRkcmVzcwAABAdhY3Rpb25zCAUNJHQwMTM0MDcxMzQ4NwJfMQQQd2xnQ2xhaW1lZEFtb3VudAgFDSR0MDEzNDA3MTM0ODcCXzIJAJQKAgkAzggCCQDNCAIFB2FjdGlvbnMJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUGYW1vdW50BQxhY3Jlc0Fzc2V0SWQFDXByb2xvZ0FjdGlvbnMFEHdsZ0NsYWltZWRBbW91bnQBaQEKc3Rha2VBY3JlcwAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEEDSR0MDEzOTM4MTQwMTQJARlzdGFrZVVuc3Rha2VBY3Jlc0ludGVybmFsAwUDYW10BQdhZGRyZXNzAAAEB2FjdGlvbnMIBQ0kdDAxMzkzODE0MDE0Al8xBBB3bGdDbGFpbWVkQW1vdW50CAUNJHQwMTM5MzgxNDAxNAJfMgkAlAoCCQDOCAIFB2FjdGlvbnMFDXByb2xvZ0FjdGlvbnMFEHdsZ0NsYWltZWRBbW91bnQBaQEIYnV5QWNyZXMABA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABAp1c2R0QW1vdW50CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQMJAGYCBQVNVUxUNgUKdXNkdEFtb3VudAkAAgEJAKwCAgkArAICAhZNaW4gcGF5bWVudCBzaG91bGQgYmUgCQEKZml4ZWRQb2ludAIFBU1VTFQ2AAYCBSBVU0RUBAthY3Jlc0Ftb3VudAkAaAIFCnVzZHRBbW91bnQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgQJd2xnQW1vdW50CQBrAwUKdXNkdEFtb3VudAUFTVVMVDgJAQtnZXRXbGdQcmljZQEFCnVzZHRBbW91bnQED29sZEFjcmVzQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUTb2xkQWNyZXNDb250cmFjdEtleQQDcmVxCQD8BwQFD29sZEFjcmVzQWRkcmVzcwIUcmVxdWVzdEFjcmVzQ2FsbGJhY2sJAMwIAgULYWNyZXNBbW91bnQFA25pbAUDbmlsAwkAAAIFA3JlcQUDcmVxBAl3bGdSZW1haW4JAQVhc0ludAEJAPwHBAULd2xnQ29udHJhY3QCCmJ1cm5XbGdvbGQJAMwIAgUJd2xnQW1vdW50BQNuaWwFA25pbAkAlAoCCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQthY3Jlc0Ftb3VudAUMYWNyZXNBc3NldElkBQNuaWwFDXByb2xvZ0FjdGlvbnMFCXdsZ1JlbWFpbgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARBidXlBY3Jlc1JFQURPTkxZAQp1c2R0QW1vdW50BAthY3Jlc0Ftb3VudAkAaAIFCnVzZHRBbW91bnQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgQJd2xnVG9CdXJuCQBrAwUKdXNkdEFtb3VudAUFTVVMVDgJAQtnZXRXbGdQcmljZQEFCnVzZHRBbW91bnQJAJQKAgUDbmlsCQDMCAIFC2FjcmVzQW1vdW50CQDMCAIFBU1VTFQ2CQDMCAIFC2FjcmVzQW1vdW50CQDMCAIFCXdsZ1RvQnVybgUDbmlsAWkBCXNlbGxBY3JlcwAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEC2FjcmVzQW1vdW50CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFDGFjcmVzQXNzZXRJZAkAAgECFEFDUkVTIHBheW1lbnRzIG9ubHkhAwkAZgIFBU1VTFQ3BQthY3Jlc0Ftb3VudAkAAgEJAKwCAgkArAICAhZNaW4gcGF5bWVudCBzaG91bGQgYmUgCQEKZml4ZWRQb2ludAIFBU1VTFQ3AAgCBiBBQ1JFUwQEYWRkcgkApQgBCAUBaQZjYWxsZXIEDSR0MDE1ODcxMTU5MTkJARFnZXRTd2FwTGltaXRBY3JlcwAEC2xpbWl0QWN0aW9uCAUNJHQwMTU4NzExNTkxOQJfMQQHbWF4VXNkdAgFDSR0MDE1ODcxMTU5MTkCXzIECG1heEFjcmVzCQBoAgUHbWF4VXNkdAUVVVNEVDJBQ1JFU19NVUxUSVBMSUVSAwkAZgIFC2FjcmVzQW1vdW50BQhtYXhBY3JlcwkAAgEJAKwCAgkArAICAhFZb3UgY2FuIHNlbGwgbWF4IAkBCmZpeGVkUG9pbnQCBQhtYXhBY3JlcwAIAgYgQUNSRVMECnVzZHRBbW91bnQJAGkCCQBpAgULYWNyZXNBbW91bnQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgACCQCUCgIJAM4IAgkAzAgCBQtsaW1pdEFjdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgUQa2V5TGFzdExpbWl0TGVmdAkAZQIFB21heFVzZHQFCnVzZHRBbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQp1c2R0QW1vdW50BQt1c2R0QXNzZXRJZAUDbmlsBQ1wcm9sb2dBY3Rpb25zBQp1c2R0QW1vdW50AWkBEXNlbGxBY3Jlc1JFQURPTkxZAgdhZGRyZXNzC2FjcmVzQW1vdW50BA0kdDAxNjQxNTE2NDYzCQERZ2V0U3dhcExpbWl0QWNyZXMABAtsaW1pdEFjdGlvbggFDSR0MDE2NDE1MTY0NjMCXzEEB21heFVzZHQIBQ0kdDAxNjQxNTE2NDYzAl8yBAp1c2R0QW1vdW50CQBpAgkAaQIFC2FjcmVzQW1vdW50BRVVU0RUMkFDUkVTX01VTFRJUExJRVIAAgkAlAoCBQNuaWwJAMwIAgUKdXNkdEFtb3VudAkAzAgCBQVNVUxUNwkAzAgCCQBoAgUHbWF4VXNkdAUVVVNEVDJBQ1JFU19NVUxUSVBMSUVSCQDMCAIAAAUDbmlsAWkBEGNvbnZlcnRPbGRTdGFrZXMAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIUVGVtcG9yYXJpbHkgZGlzYWJsZWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQED29sZEFjcmVzQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUTb2xkQWNyZXNDb250cmFjdEtleQQGYW1vdW50CQELdmFsdWVPckVsc2UCCQCaCAIFD29sZEFjcmVzQWRkcmVzcwkBF2tleUFjcmVzU3Rha2VkQW10QnlVc2VyAQUHYWRkcmVzcwAABAlnb3RBY3JlczADCQBmAgUGYW1vdW50AAAJAQxhc1R1cGxlMkludHMBCQD8BwQFD29sZEFjcmVzQWRkcmVzcwIUdW5zdGFrZUFjcmVzQ2FsbGJhY2sJAMwIAgUGYW1vdW50CQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsCQCUCgIAAAAABBFvbGRTdGFraW5nQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQUVb2xkU3Rha2luZ0NvbnRyYWN0U3RyBAhsYW5kc1N0cgkAnQgCBRFvbGRTdGFraW5nQWRkcmVzcwkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFB2FkZHJlc3MEC2xhbmRzUmVzdWx0AwkBCWlzRGVmaW5lZAEFCGxhbmRzU3RyBAVsYW5kcwkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAMJAAACBQtsYW5kQXNzZXRJZAIACQACAQIXbGFuZEFzc2V0SWQgaXMgcmVxdWlyZWQEAXIJAQxhc1R1cGxlNUludHMBCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhN1bnN0YWtlTGFuZENhbGxiYWNrCQDMCAIFC2xhbmRBc3NldElkCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsCQCWCgQJAGQCCAUDYWNjAl8xCAUBcgJfMQkAZAIIBQNhY2MCXzIIBQFyAl8yCQBkAggFA2FjYwJfMwgFAXICXzMJAGQCCAUDYWNjAl80CAUBcgJfNAQCcnIKAAIkbAUFbGFuZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAAAAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHb25lTGFuZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQECGZpbmFsaXplCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhx1bnN0YWtlTGFuZHNGaW5hbGl6ZUNhbGxiYWNrCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsAwkAAAIFCGZpbmFsaXplBQhmaW5hbGl6ZQQDcmVxCQD8BwQFD29sZEFjcmVzQWRkcmVzcwIUcmVxdWVzdEFjcmVzQ2FsbGJhY2sJAMwIAgkAZAIJAGQCCQBkAggFAnJyAl8xCAUCcnICXzIIBQJycgJfMwgFAnJyAl80BQNuaWwFA25pbAMJAAACBQNyZXEFA3JlcQQNJHQwMTgzMzIxODQ3MAkBDmlzc3VlTmZ0Q3VzdG9tCAUNaWR4TmFtZVNob3ZlbAUHaWR4S2V5UAUKaWR4Q29sbERpZwUKaWR4UmFyaXR5UAADBQ5pZHhEZXNjclNob3ZlbAUOaWR4Qm9udXNUeXBlRnAIBQFpBmNhbGxlcgQKbmZ0QWN0aW9ucwgFDSR0MDE4MzMyMTg0NzACXzEECm5mdEFzc2V0SWQIBQ0kdDAxODMzMjE4NDcwAl8yCQCXCgUIBQJycgJfMQgFAnJyAl8yCAUCcnICXzMIBQJycgJfNAUKbmZ0QWN0aW9ucwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlwoFAAAAAAAAAAAFA25pbAQLZHVja0Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgURb2xkU3Rha2luZ0FkZHJlc3MJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MCAAQKZHVja1Jlc3VsdAMJAQIhPQIFC2R1Y2tBc3NldElkAgAJAQxhc1R1cGxlM0ludHMBCQD8BwQFEW9sZFN0YWtpbmdBZGRyZXNzAhN1bnN0YWtlRHVja0NhbGxiYWNrCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsCQCVCgMAAAAAAAAEAXgJARlzdGFrZVVuc3Rha2VBY3Jlc0ludGVybmFsAwkAZAIJAGQCCQBkAgkAZAIJAGQCCQBkAgkAZAIIBQlnb3RBY3JlczACXzEIBQtsYW5kc1Jlc3VsdAJfMQgFC2xhbmRzUmVzdWx0Al8yCAULbGFuZHNSZXN1bHQCXzMIBQtsYW5kc1Jlc3VsdAJfNAgFCmR1Y2tSZXN1bHQCXzEIBQpkdWNrUmVzdWx0Al8yCAUKZHVja1Jlc3VsdAJfMwUHYWRkcmVzcwAACQCUCgIJAM4IAggFC2xhbmRzUmVzdWx0Al81CAUBeAJfMQgFAXgCXzIBaQEUdW5zdGFrZUxhbmRzUkVBRE9OTFkBB2FkZHJlc3MEEW9sZFN0YWtpbmdBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBRVvbGRTdGFraW5nQ29udHJhY3RTdHIECGxhbmRzU3RyCQCdCAIFEW9sZFN0YWtpbmdBZGRyZXNzCQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUHYWRkcmVzcwQLbGFuZHNSZXN1bHQDCQEJaXNEZWZpbmVkAQUIbGFuZHNTdHIEBWxhbmRzCQC9CQIJAQV2YWx1ZQEFCGxhbmRzU3RyAgFfCgEHb25lTGFuZAIDYWNjC2xhbmRBc3NldElkAwkAAAIFC2xhbmRBc3NldElkAgAJAAIBAhdsYW5kQXNzZXRJZCBpcyByZXF1aXJlZAQBcgkBDGFzVHVwbGU0SW50cwEJAPwHBAURb2xkU3Rha2luZ0FkZHJlc3MCE3Vuc3Rha2VMYW5kUkVBRE9OTFkJAMwIAgULbGFuZEFzc2V0SWQJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwJAJYKBAkAZAIIBQNhY2MCXzEIBQFyAl8xCQBkAggFA2FjYwJfMggFAXICXzIJAGQCCAUDYWNjAl8zCAUBcgJfMwkAZAIIBQNhY2MCXzQIBQFyAl80CgACJGwFBWxhbmRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAAAAAAAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB29uZUxhbmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQCWCgQAAAAAAAAAAAkAlAoCBQNuaWwFC2xhbmRzUmVzdWx0AWkBEnN0YWtlQWNyZXNDYWxsYmFjawEEYWRkcgMJAQIhPQIIBQFpBmNhbGxlcgkBEUBleHRyTmF0aXZlKDEwNjIpAQUVb2xkU3Rha2luZ0NvbnRyYWN0U3RyCQACAQIRUGVybWlzc2lvbiBkZW5pZWQJARlzdGFrZVVuc3Rha2VBY3Jlc0ludGVybmFsAwgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFBGFkZHIAAAFpARpzaW11bGF0ZVN0YWtlQWNyZXNSRUFET05MWQIHYWRkcmVzcwthZGRlZEFtb3VudAQJYW1vdW50S2V5CQEXa2V5QWNyZXNTdGFrZWRBbXRCeVVzZXIBBQdhZGRyZXNzBA5uZXdBY3Jlc0Ftb3VudAkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAFC2FkZGVkQW1vdW50BAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRJhY3Jlc1N0YWtkVG90YWxLZXkAAAQJdXNlckZwS2V5CQEVa2V5RmFybWluZ1Bvd2VyQnlVc2VyAQUHYWRkcmVzcwQFb2xkRnAJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJdXNlckZwS2V5AAAECXVzZXJCb251cwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ5hY3JlczJDb250cmFjdAkBEGtleVVzZXJGdWxsQm9udXMBBQdhZGRyZXNzAAAEDSR0MDIwNjM1MjA3MjIJAR5nZXRGYXJtaW5nUG93ZXJCeUFjcmVzQW5kQm9udXMCBQ5uZXdBY3Jlc0Ftb3VudAUJdXNlckJvbnVzBAxuZXdCb251c2VkRnAIBQ0kdDAyMDYzNTIwNzIyAl8xBAdpZ25vcmVkCAUNJHQwMjA2MzUyMDcyMgJfMgQKb2xkVG90YWxGcAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRR0b3RhbEZhcm1pbmdQb3dlcktleQAABApuZXdUb3RhbEZwCQBlAgkAZAIFCm9sZFRvdGFsRnAFDG5ld0JvbnVzZWRGcAUFb2xkRnAJAJQKAgUDbmlsCQDMCAIFBW9sZEZwCQDMCAIFDG5ld0JvbnVzZWRGcAkAzAgCBQpvbGRUb3RhbEZwCQDMCAIFCm5ld1RvdGFsRnAFA25pbAFpAQtpc3N1ZVBpY2tDMQEKZm9yQWRkcmVzcwMJAQIhPQIIBQFpBmNhbGxlcgULd2xnQ29udHJhY3QJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkBDmlzc3VlTmZ0Q3VzdG9tCAUOaWR4TmFtZVBpY2theGUFB2lkeEtleUMFCmlkeENvbGxEaWcFCmlkeFJhcml0eUMAAQUPaWR4RGVzY3JQaWNrYXhlBQ5pZHhCb251c1R5cGVGcAkBEUBleHRyTmF0aXZlKDEwNjIpAQUKZm9yQWRkcmVzcwFpAQhzdGFrZU5GVAAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10BmFtb3VudAABCQACAQInTkZUIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAdhc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQECmFzc2V0SWRTdHIJANgEAQUHYXNzZXRJZAQEYWRkcgkApQgBCAUBaQZjYWxsZXIEB25mdHNLZXkJARRrZXlTdGFrZWRORlRzQnlPd25lcgEFBGFkZHIEB25mdHNTdHIJAKIIAQUHbmZ0c0tleQQEbmZ0cwMJAQlpc0RlZmluZWQBBQduZnRzU3RyCQC8CQIJAQV2YWx1ZQEFB25mdHNTdHICAV8FA25pbAMJAQ9jb250YWluc0VsZW1lbnQCBQRuZnRzBQphc3NldElkU3RyCQACAQkArAICAiFZb3VyIHN0YWtlZCBORlRzIGFscmVhZHkgY29udGFpbiAFCmFzc2V0SWRTdHIDCQBnAgkAkAMBBQRuZnRzBRdNQVhfTkZUU19TVEFLRURfQllfVVNFUgkAAgEJAKwCAgkArAICAhlZb3VyIGFscmVhZHkgc3Rha2VkIG1heCAoCQCkAwEFF01BWF9ORlRTX1NUQUtFRF9CWV9VU0VSAgYpIE5GVHMECmxpc3RBY3Rpb24JAQtTdHJpbmdFbnRyeQIFB25mdHNLZXkJALoJAgkAzQgCBQRuZnRzBQphc3NldElkU3RyAgFfAwkAAAIIBQVhc3NldAZpc3N1ZXIFBHRoaXMEDSR0MDIyMTMxMjIzMjEJARBzdGFrZU5mdEludGVybmFsBgUEYWRkcgUKYXNzZXRJZFN0cgkAaAIJARJib251c0J5RGVzY3JpcHRpb24BCQEFdmFsdWUBCAUFYXNzZXQLZGVzY3JpcHRpb24AkE4JARJrZXlVc2VyV2xOZnROdW1iZXIBBQRhZGRyBRNrZXlXbE5mdFRvdGFsU3Rha2VkBQtNQVhfV0xfTkZUUwQHYWN0aW9ucwgFDSR0MDIyMTMxMjIzMjECXzEEEHdsZ0NsYWltZWRBbW91bnQIBQ0kdDAyMjEzMTIyMzIxAl8yCQCUCgIJAM0IAgkAzggCBQ1wcm9sb2dBY3Rpb25zBQdhY3Rpb25zBQpsaXN0QWN0aW9uBRB3bGdDbGFpbWVkQW1vdW50AwkAAAIJAQ9pc0Fya2ltYWxJc3N1ZWQBBQVhc3NldAIACQACAQI0T25seSBXYXZlc0xhbmRzIGFuZCBBcmtpbWFscyBORlQgdG9rZW5zIGFyZSBhY2NlcHRlZAQNJHQwMjI1MDIyMjY1MwkBEHN0YWtlTmZ0SW50ZXJuYWwGBQRhZGRyBQphc3NldElkU3RyBQ1BUktfTkZUX0JPTlVTCQETa2V5VXNlckFya05mdE51bWJlcgEFBGFkZHIFFGtleUFya05mdFRvdGFsU3Rha2VkBQxNQVhfQVJLX05GVFMEB2FjdGlvbnMIBQ0kdDAyMjUwMjIyNjUzAl8xBBB3bGdDbGFpbWVkQW1vdW50CAUNJHQwMjI1MDIyMjY1MwJfMgkAlAoCCQDNCAIJAM4IAgUNcHJvbG9nQWN0aW9ucwUHYWN0aW9ucwUKbGlzdEFjdGlvbgUQd2xnQ2xhaW1lZEFtb3VudAFpAQp1bnN0YWtlTkZUAQphc3NldElkU3RyBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAdhc3NldElkCQDZBAEFCmFzc2V0SWRTdHIEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkBAd0aW1lS2V5CQEea2V5U3Rha2VkVGltZUJ5QXNzZXRJZEFuZE93bmVyAgUKYXNzZXRJZFN0cgUEYWRkcgMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIVIGlzIG5vdCBzdGFrZWQgYnkgeW91BAduZnRzS2V5CQEUa2V5U3Rha2VkTkZUc0J5T3duZXIBBQRhZGRyBARuZnRzCQC8CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUHbmZ0c0tleQIAAgFfBANpZHgJAM8IAgUEbmZ0cwUKYXNzZXRJZFN0cgMJAQEhAQkBCWlzRGVmaW5lZAEFA2lkeAkAAgEJAKwCAgIfWW91ciBzdGFrZWQgTkZUcyBkb24ndCBjb250YWluIAUKYXNzZXRJZFN0cgQKbGlzdEFjdGlvbgMJAGYCCQCQAwEFBG5mdHMAAQkBC1N0cmluZ0VudHJ5AgUHbmZ0c0tleQkAugkCCQDRCAIFBG5mdHMJAQV2YWx1ZQEFA2lkeAIBXwkBC0RlbGV0ZUVudHJ5AQUHbmZ0c0tleQQEaXNXTAkAAAIIBQVhc3NldAZpc3N1ZXIFBHRoaXMDBQRpc1dMBAt3bE5mdE51bWJlcgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQESa2V5VXNlcldsTmZ0TnVtYmVyAQUEYWRkcgAABAhib251c1ZhbAkAaAIJARJib251c0J5RGVzY3JpcHRpb24BCQEFdmFsdWUBCAUFYXNzZXQLZGVzY3JpcHRpb24AkE4EDSR0MDIzODE4MjM4OTcJARlzdGFrZVVuc3Rha2VBY3Jlc0ludGVybmFsAwAABQRhZGRyCQEBLQEFCGJvbnVzVmFsBAdhY3Rpb25zCAUNJHQwMjM4MTgyMzg5NwJfMQQQd2xnQ2xhaW1lZEFtb3VudAgFDSR0MDIzODE4MjM4OTcCXzIJAJQKAgkAzggCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgUHYWN0aW9ucwUKbGlzdEFjdGlvbgkBDEludGVnZXJFbnRyeQIJARJrZXlVc2VyV2xOZnROdW1iZXIBBQRhZGRyCQBlAgULd2xOZnROdW1iZXIAAQkBDEludGVnZXJFbnRyeQIFE2tleVdsTmZ0VG90YWxTdGFrZWQJAJYDAQkAzAgCAAAJAMwIAgkAZQIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTa2V5V2xOZnRUb3RhbFN0YWtlZAAAAAEFA25pbAkBC0RlbGV0ZUVudHJ5AQkBHmtleVN0YWtlZFRpbWVCeUFzc2V0SWRBbmRPd25lcgIJANgEAQUHYXNzZXRJZAUEYWRkcgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQFDXByb2xvZ0FjdGlvbnMFEHdsZ0NsYWltZWRBbW91bnQEC2Fya2ltYWxOYW1lCQEPaXNBcmtpbWFsSXNzdWVkAQUFYXNzZXQDCQAAAgULYXJraW1hbE5hbWUCAAkAAgECNE9ubHkgV2F2ZXNMYW5kcyBhbmQgQXJraW1hbHMgTkZUIHRva2VucyBhcmUgYWNjZXB0ZWQEDGFya05mdE51bWJlcgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQETa2V5VXNlckFya05mdE51bWJlcgEFBGFkZHIAAAQNJHQwMjQ1NTcyNDY0MQkBGXN0YWtlVW5zdGFrZUFjcmVzSW50ZXJuYWwDAAAFBGFkZHIJAQEtAQUNQVJLX05GVF9CT05VUwQHYWN0aW9ucwgFDSR0MDI0NTU3MjQ2NDECXzEEEHdsZ0NsYWltZWRBbW91bnQIBQ0kdDAyNDU1NzI0NjQxAl8yCQCUCgIJAM4IAgkAzQgCCQDNCAIJAM0IAgkAzQgCBQdhY3Rpb25zBQpsaXN0QWN0aW9uCQEMSW50ZWdlckVudHJ5AgkBE2tleVVzZXJBcmtOZnROdW1iZXIBBQRhZGRyCQBlAgUMYXJrTmZ0TnVtYmVyAAEJAQtEZWxldGVFbnRyeQEJAR5rZXlTdGFrZWRUaW1lQnlBc3NldElkQW5kT3duZXICCQDYBAEFB2Fzc2V0SWQFBGFkZHIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkBQ1wcm9sb2dBY3Rpb25zBRB3bGdDbGFpbWVkQW1vdW50AWkBDGV4Y2hhbmdlTkZUcwAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkAZgIAAwkAkAMBCAUBaQhwYXltZW50cwkAAgECKU1pbiBvbmUgV0xHT0xEIGFuZCAyIE5GVCBwYXltZW50cyBhbGxvd2VkAwkAZgIJAJADAQgFAWkIcGF5bWVudHMABgkAAgECKU1heCBvbmUgV0xHT0xEIGFuZCA1IE5GVCBwYXltZW50cyBhbGxvd2VkBARhZGRyCQClCAEIBQFpBmNhbGxlcgoBBWFkZFVwAgNhY2MDcG10BAdhc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQNwbXQHYXNzZXRJZAIaV0FWRVMgcGF5bWVudHMgbm90IGFsbG93ZWQDCQAAAgUHYXNzZXRJZAUKd2xnQXNzZXRJZAkAlQoDCQBkAggFA2FjYwJfMQgFA3BtdAZhbW91bnQIBQNhY2MCXzIIBQNhY2MCXzMEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQR0aGlzCQACAQIbT25seSBXTC1pc3N1ZWQgTkZUcyBhbGxvd2VkBAhyYXJpdHlJeAkBFnJhcml0eUlkeEJ5RGVzY3JpcHJpb24BCQEFdmFsdWUBCAUFYXNzZXQLZGVzY3JpcHRpb24DAwkAZgIIBQNhY2MCXzQAAAkBAiE9AgUIcmFyaXR5SXgIBQNhY2MCXzQHCQACAQItWW91IGNhbiBleGNoYW5nZSBvbmx5IE5GVHMgb2YgdGhlIHNhbWUgcmFyaXR5BAlib251c1BlcmMJARJib251c0J5RGVzY3JpcHRpb24BCQEFdmFsdWUBCAUFYXNzZXQLZGVzY3JpcHRpb24JAJYKBAgFA2FjYwJfMQkAZAIIBQNhY2MCXzIFCWJvbnVzUGVyYwkAzQgCCAUDYWNjAl8zCQEEQnVybgIFB2Fzc2V0SWQAAQUIcmFyaXR5SXgEDSR0MDI2MDIyMjYyMzcKAAIkbAgFAWkIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAAABQNuaWwA////////////AQoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkVXACBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYEBndsZ0ZlZQgFDSR0MDI2MDIyMjYyMzcCXzEECnRvdGFsQm9udXMIBQ0kdDAyNjAyMjI2MjM3Al8yBAtidXJuQWN0aW9ucwgFDSR0MDI2MDIyMjYyMzcCXzMECXJhcml0eUlkeAgFDSR0MDI2MDIyMjYyMzcCXzQEDG5ld1Jhcml0eUlkeAMJAAACBQlyYXJpdHlJZHgFCmlkeFJhcml0eUMDCQBmAgkAkQMCBRByYXJpdHlUaHJlc2hvbGRzBQ1pZHhUaHJlc2hvbGRDBQp0b3RhbEJvbnVzBQppZHhSYXJpdHlDAwkAZgIJAJEDAgUQcmFyaXR5VGhyZXNob2xkcwUNaWR4VGhyZXNob2xkVQUKdG90YWxCb251cwUKaWR4UmFyaXR5VQkAAgEJAKwCAgkArAICAjpZb3UgY2FuIGFkdmFuY2Ugb25seSBvbmUgbGV2ZWwgb2YgcmFyaXR5LCBtYXggdG90YWwgYm9udXMgCQCkAwEJAJEDAgUQcmFyaXR5VGhyZXNob2xkcwUNaWR4VGhyZXNob2xkVQIBJQMJAAACBQlyYXJpdHlJZHgFCmlkeFJhcml0eVUDCQBmAgkAkQMCBRByYXJpdHlUaHJlc2hvbGRzBQ1pZHhUaHJlc2hvbGRVBQp0b3RhbEJvbnVzBQppZHhSYXJpdHlVAwkAZgIJAJEDAgUQcmFyaXR5VGhyZXNob2xkcwUNaWR4VGhyZXNob2xkTAUKdG90YWxCb251cwUKaWR4UmFyaXR5TAkAAgEJAKwCAgkArAICAjpZb3UgY2FuIGFkdmFuY2Ugb25seSBvbmUgbGV2ZWwgb2YgcmFyaXR5LCBtYXggdG90YWwgYm9udXMgCQCkAwEJAJEDAgUQcmFyaXR5VGhyZXNob2xkcwUNaWR4VGhyZXNob2xkTAIBJQMJAAACBQlyYXJpdHlJZHgFCmlkeFJhcml0eUwDCQBmAgkAkQMCBRByYXJpdHlUaHJlc2hvbGRzBQ1pZHhUaHJlc2hvbGRMBQp0b3RhbEJvbnVzBQppZHhSYXJpdHlMBQppZHhSYXJpdHlFAwkAAAIFCXJhcml0eUlkeAUKaWR4UmFyaXR5RQUKaWR4UmFyaXR5RQMJAAACBQlyYXJpdHlJZHgFCmlkeFJhcml0eVAJAAIBAiZZb3UgY2FuJ3QgZXhjaGFuZ2UgTkZUcyBvZiB0aGlzIHJhcml0eQkAAgECDlVua25vd24gcmFyaXR5BAltaW5XbGdGZWUJAGsDBQp0b3RhbEJvbnVzAGQJAQtnZXRXbGdQcmljZQEAAAQGY2hhbmdlCQBlAgUGd2xnRmVlBQltaW5XbGdGZWUEB2ZvclRlYW0JAGkCBQltaW5XbGdGZWUAAgQJd2xnUmVtYWluCQEFYXNJbnQBCQD8BwQFC3dsZ0NvbnRyYWN0AgpidXJuV2xnb2xkCQDMCAIJAGUCBQltaW5XbGdGZWUFB2ZvclRlYW0FA25pbAUDbmlsAwkAZgIAAAUGY2hhbmdlCQACAQkArAICCQCsAgICE1lvdSBuZWVkIHRvIGF0dGFjaCAJAQpmaXhlZFBvaW50AgUJbWluV2xnRmVlAAgCDiBXTEdPTEQgYXMgZmVlBA1jaGFuZ2VBY3Rpb25zAwkAZgIFBmNoYW5nZQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUGY2hhbmdlBQp3bGdBc3NldElkBQNuaWwFA25pbAQNJHQwMjc3NzEyNzkzMgkBDmlzc3VlTmZ0Q3VzdG9tCAUOaWR4TmFtZVBpY2theGUFDG5ld1Jhcml0eUlkeAUKaWR4Q29sbERpZwUMbmV3UmFyaXR5SWR4BQp0b3RhbEJvbnVzBQ9pZHhEZXNjclBpY2theGUFDmlkeEJvbnVzVHlwZUZwCAUBaQZjYWxsZXIED2lzc3VlTmZ0QWN0aW9ucwgFDSR0MDI3NzcxMjc5MzICXzEECm5mdEFzc2V0SWQIBQ0kdDAyNzc3MTI3OTMyAl8yBAZidXJuZWQJAJADAQULYnVybkFjdGlvbnMEEmJ1cm5Db3VudGVyQWN0aW9ucwMJAAACBQZidXJuZWQAAAUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRFrZXlOZnRUb3RhbEJ1cm5lZAkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQURa2V5TmZ0VG90YWxCdXJuZWQAAAUGYnVybmVkBQNuaWwJAJQKAgkAzQgCCQDOCAIJAM4IAgkAzggCCQDOCAIFD2lzc3VlTmZ0QWN0aW9ucwULYnVybkFjdGlvbnMFEmJ1cm5Db3VudGVyQWN0aW9ucwUNcHJvbG9nQWN0aW9ucwUNY2hhbmdlQWN0aW9ucwkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTMpAgULd2xnQ29udHJhY3QFC3RlYW1BZGRyS2V5BQdmb3JUZWFtBQp3bGdBc3NldElkCQCUCgIFCm5mdEFzc2V0SWQFCXdsZ1JlbWFpbgFpAQxvcGVuTmZ0Q2hlc3QAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQJAJQKAgUDbmlsAAAAzSKPCg==",
    "height": 3393033,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BmBgAqaGJ7Qbyxex4qya2KRicGSDoRUa3snWTH9ht4NK
Next: GTrSpgmsDcgs3Yz7WkLKXEyUAZtnguqUei7puENiVaj4

Diff: 

OldNewDifferences
886886 
887887 
888888 @Callable(i)
889-func exchangeNFTs () = if ((i.caller != this))
890-    then throw("Temporarily disabled")
891-    else {
892-        let prologActions = prolog(i)
893-        if ((3 > size(i.payments)))
894-            then throw("Min one WLGOLD and 2 NFT payments allowed")
895-            else if ((size(i.payments) > 6))
896-                then throw("Max one WLGOLD and 5 NFT payments allowed")
897-                else {
898-                    let addr = toString(i.caller)
899-                    func addUp (acc,pmt) =                     {
900-                        let assetId = valueOrErrorMessage(pmt.assetId, "WAVES payments not allowed")
901-                        if ((assetId == wlgAssetId))
902-                            then $Tuple3((acc._1 + pmt.amount), acc._2, acc._3)
903-                            else {
904-                                let asset = value(assetInfo(assetId))
905-                                if ((asset.issuer != this))
906-                                    then throw("Only WL-issued NFTs allowed")
907-                                    else {
908-                                        let rarityIx = rarityIdxByDescriprion(value(asset.description))
909-                                        if (if ((acc._4 > 0))
910-                                            then (rarityIx != acc._4)
911-                                            else false)
912-                                            then throw("You can exchange only NFTs of the same rarity")
913-                                            else {
914-                                                let bonusPerc = bonusByDescription(value(asset.description))
915-                                                $Tuple4(acc._1, (acc._2 + bonusPerc), (acc._3 :+ Burn(assetId, 1)), rarityIx)
916-                                                }
917-                                        }
918-                                }
919-                        }
920-
921-                    let $t02616926384 = {
922-                        let $l = i.payments
923-                        let $s = size($l)
924-                        let $acc0 = $Tuple4(0, 0, nil, -1)
925-                        func $f0_1 ($a,$i) =                         if (($i >= $s))
926-                            then $a
927-                            else addUp($a, $l[$i])
928-
929-                        func $f0_2 ($a,$i) =                         if (($i >= $s))
930-                            then $a
931-                            else throw("List size exceeds 6")
932-
933-                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
934-                        }
935-                    let wlgFee = $t02616926384._1
936-                    let totalBonus = $t02616926384._2
937-                    let burnActions = $t02616926384._3
938-                    let rarityIdx = $t02616926384._4
939-                    let newRarityIdx = if ((rarityIdx == idxRarityC))
940-                        then if ((rarityThresholds[idxThresholdC] > totalBonus))
941-                            then idxRarityC
942-                            else if ((rarityThresholds[idxThresholdU] > totalBonus))
943-                                then idxRarityU
944-                                else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdU])) + "%"))
945-                        else if ((rarityIdx == idxRarityU))
946-                            then if ((rarityThresholds[idxThresholdU] > totalBonus))
947-                                then idxRarityU
948-                                else if ((rarityThresholds[idxThresholdL] > totalBonus))
949-                                    then idxRarityL
950-                                    else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdL])) + "%"))
951-                            else if ((rarityIdx == idxRarityL))
952-                                then if ((rarityThresholds[idxThresholdL] > totalBonus))
953-                                    then idxRarityL
954-                                    else idxRarityE
955-                                else if ((rarityIdx == idxRarityE))
956-                                    then idxRarityE
957-                                    else if ((rarityIdx == idxRarityP))
958-                                        then throw("You can't exchange NFTs of this rarity")
959-                                        else throw("Unknown rarity")
960-                    let minWlgFee = fraction(totalBonus, 100, getWlgPrice(0))
961-                    let change = (wlgFee - minWlgFee)
962-                    let forTeam = (minWlgFee / 2)
963-                    let wlgRemain = asInt(invoke(wlgContract, "burnWlgold", [(minWlgFee - forTeam)], nil))
964-                    if ((0 > change))
965-                        then throw((("You need to attach " + fixedPoint(minWlgFee, 8)) + " WLGOLD as fee"))
889+func exchangeNFTs () = {
890+    let prologActions = prolog(i)
891+    if ((3 > size(i.payments)))
892+        then throw("Min one WLGOLD and 2 NFT payments allowed")
893+        else if ((size(i.payments) > 6))
894+            then throw("Max one WLGOLD and 5 NFT payments allowed")
895+            else {
896+                let addr = toString(i.caller)
897+                func addUp (acc,pmt) =                 {
898+                    let assetId = valueOrErrorMessage(pmt.assetId, "WAVES payments not allowed")
899+                    if ((assetId == wlgAssetId))
900+                        then $Tuple3((acc._1 + pmt.amount), acc._2, acc._3)
966901                         else {
967-                            let changeActions = if ((change > 0))
968-                                then [ScriptTransfer(i.caller, change, wlgAssetId)]
969-                                else nil
970-                            let $t02791828079 = issueNftCustom(idxNamePickaxe, newRarityIdx, idxCollDig, newRarityIdx, totalBonus, idxDescrPickaxe, idxBonusTypeFp, i.caller)
971-                            let issueNftActions = $t02791828079._1
972-                            let nftAssetId = $t02791828079._2
973-                            let burned = size(burnActions)
974-                            let burnCounterActions = if ((burned == 0))
975-                                then nil
976-                                else [IntegerEntry(keyNftTotalBurned, (valueOrElse(getInteger(keyNftTotalBurned), 0) + burned))]
977-                            $Tuple2((((((issueNftActions ++ burnActions) ++ burnCounterActions) ++ prologActions) ++ changeActions) :+ ScriptTransfer(addressFromStringValue(getStringValue(wlgContract, teamAddrKey)), forTeam, wlgAssetId)), $Tuple2(nftAssetId, wlgRemain))
902+                            let asset = value(assetInfo(assetId))
903+                            if ((asset.issuer != this))
904+                                then throw("Only WL-issued NFTs allowed")
905+                                else {
906+                                    let rarityIx = rarityIdxByDescriprion(value(asset.description))
907+                                    if (if ((acc._4 > 0))
908+                                        then (rarityIx != acc._4)
909+                                        else false)
910+                                        then throw("You can exchange only NFTs of the same rarity")
911+                                        else {
912+                                            let bonusPerc = bonusByDescription(value(asset.description))
913+                                            $Tuple4(acc._1, (acc._2 + bonusPerc), (acc._3 :+ Burn(assetId, 1)), rarityIx)
914+                                            }
915+                                    }
978916                             }
979917                     }
980-        }
918+
919+                let $t02602226237 = {
920+                    let $l = i.payments
921+                    let $s = size($l)
922+                    let $acc0 = $Tuple4(0, 0, nil, -1)
923+                    func $f0_1 ($a,$i) =                     if (($i >= $s))
924+                        then $a
925+                        else addUp($a, $l[$i])
926+
927+                    func $f0_2 ($a,$i) =                     if (($i >= $s))
928+                        then $a
929+                        else throw("List size exceeds 6")
930+
931+                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
932+                    }
933+                let wlgFee = $t02602226237._1
934+                let totalBonus = $t02602226237._2
935+                let burnActions = $t02602226237._3
936+                let rarityIdx = $t02602226237._4
937+                let newRarityIdx = if ((rarityIdx == idxRarityC))
938+                    then if ((rarityThresholds[idxThresholdC] > totalBonus))
939+                        then idxRarityC
940+                        else if ((rarityThresholds[idxThresholdU] > totalBonus))
941+                            then idxRarityU
942+                            else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdU])) + "%"))
943+                    else if ((rarityIdx == idxRarityU))
944+                        then if ((rarityThresholds[idxThresholdU] > totalBonus))
945+                            then idxRarityU
946+                            else if ((rarityThresholds[idxThresholdL] > totalBonus))
947+                                then idxRarityL
948+                                else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdL])) + "%"))
949+                        else if ((rarityIdx == idxRarityL))
950+                            then if ((rarityThresholds[idxThresholdL] > totalBonus))
951+                                then idxRarityL
952+                                else idxRarityE
953+                            else if ((rarityIdx == idxRarityE))
954+                                then idxRarityE
955+                                else if ((rarityIdx == idxRarityP))
956+                                    then throw("You can't exchange NFTs of this rarity")
957+                                    else throw("Unknown rarity")
958+                let minWlgFee = fraction(totalBonus, 100, getWlgPrice(0))
959+                let change = (wlgFee - minWlgFee)
960+                let forTeam = (minWlgFee / 2)
961+                let wlgRemain = asInt(invoke(wlgContract, "burnWlgold", [(minWlgFee - forTeam)], nil))
962+                if ((0 > change))
963+                    then throw((("You need to attach " + fixedPoint(minWlgFee, 8)) + " WLGOLD as fee"))
964+                    else {
965+                        let changeActions = if ((change > 0))
966+                            then [ScriptTransfer(i.caller, change, wlgAssetId)]
967+                            else nil
968+                        let $t02777127932 = issueNftCustom(idxNamePickaxe, newRarityIdx, idxCollDig, newRarityIdx, totalBonus, idxDescrPickaxe, idxBonusTypeFp, i.caller)
969+                        let issueNftActions = $t02777127932._1
970+                        let nftAssetId = $t02777127932._2
971+                        let burned = size(burnActions)
972+                        let burnCounterActions = if ((burned == 0))
973+                            then nil
974+                            else [IntegerEntry(keyNftTotalBurned, (valueOrElse(getInteger(keyNftTotalBurned), 0) + burned))]
975+                        $Tuple2((((((issueNftActions ++ burnActions) ++ burnCounterActions) ++ prologActions) ++ changeActions) :+ ScriptTransfer(addressFromStringValue(getStringValue(wlgContract, teamAddrKey)), forTeam, wlgAssetId)), $Tuple2(nftAssetId, wlgRemain))
976+                        }
977+                }
978+    }
981979 
982980 
983981 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SEP = "__"
55 
66 let MULT6 = 1000000
77 
88 let MULT7 = 10000000
99 
1010 let MULT8 = 100000000
1111 
1212 let DAY_MILLIS = 86400000
1313 
1414 let USDT2ACRES_MULTIPLIER = 10
1515 
1616 let ONE_PERCENT_DIVISOR = 100
1717 
1818 let chain = take(drop(this.bytes, 1), 1)
1919 
2020 let WEEK_BLOCKS = match chain {
2121     case _ => 
2222         if ((base58'2W' == $match0))
2323             then 10080
2424             else if ((base58'2T' == $match0))
2525                 then 180
2626                 else throw("Unknown chain")
2727 }
2828 
2929 let usdtAssetId = match chain {
3030     case _ => 
3131         if ((base58'2W' == $match0))
3232             then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
3333             else if ((base58'2T' == $match0))
3434                 then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
3535                 else throw("Unknown chain")
3636 }
3737 
3838 let defaultRest2AddressStr = match chain {
3939     case _ => 
4040         if ((base58'2W' == $match0))
4141             then "3PFwYta8biEz31zpeFe5DJK8wE5trSpQVF8"
4242             else if ((base58'2T' == $match0))
4343                 then "3N7UuYar6264P58FBhVWKPQAh4Yua2hgngv"
4444                 else throw("Unknown chain")
4545 }
4646 
4747 let arbitrageDelay = match chain {
4848     case _ => 
4949         if ((base58'2W' == $match0))
5050             then DAY_MILLIS
5151             else if ((base58'2T' == $match0))
5252                 then 60000
5353                 else throw("Unknown chain")
5454 }
5555 
5656 let oldStakingContractStr = match chain {
5757     case _ => 
5858         if ((base58'2W' == $match0))
5959             then "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1"
6060             else if ((base58'2T' == $match0))
6161                 then "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm"
6262                 else throw("Unknown chain")
6363 }
6464 
6565 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
6666 
6767 
6868 let IdxCfgAcres2Dapp = 1
6969 
7070 let IdxCfgWlgDapp = 2
7171 
7272 let IdxCfgInvestFundDapp = 5
7373 
7474 func keyRestCfg () = "%s__restConfig"
7575 
7676 
7777 func keyRest2Address () = "%s__rest2Addr"
7878 
7979 
8080 func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
8181 
8282 
8383 func getContractAddressOrFail (rest2Cfg,idx) = valueOrErrorMessage(addressFromString(rest2Cfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
8484 
8585 
8686 let rest2Contract = addressFromStringValue(valueOrElse(getString(this, keyRest2Address()), defaultRest2AddressStr))
8787 
8888 let rest2Cfg = readRestCfgOrFail(rest2Contract)
8989 
9090 let acres2Contract = getContractAddressOrFail(rest2Cfg, IdxCfgAcres2Dapp)
9191 
9292 let wlgContract = getContractAddressOrFail(rest2Cfg, IdxCfgWlgDapp)
9393 
9494 let investFundContract = getContractAddressOrFail(rest2Cfg, IdxCfgInvestFundDapp)
9595 
9696 let oldAcresContractKey = "oldAcresContract"
9797 
9898 func keyBlocked () = "contractsBlocked"
9999 
100100 
101101 func keyLastWeekTxIdByUser (addr) = ("lastWeekTxIdByUser_" + addr)
102102 
103103 
104104 func keyCurWeekTxIdByUser (addr) = ("curWeekTxIdByUser_" + addr)
105105 
106106 
107107 let wlgAssetIdKey = "wlg_assetId"
108108 
109109 let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
110110 
111111 let acresIssuedAmountKey = "acresIssuedAmount"
112112 
113113 let acresAssetIdKey = "acresAssetId"
114114 
115115 let acresAssetId = valueOrErrorMessage(getBinary(acres2Contract, acresAssetIdKey), "ACRES is not issued yet")
116116 
117117 func keyAcresStakedTimeByUser (addr) = ("acresStakedTimeByUser_" + addr)
118118 
119119 
120120 func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
121121 
122122 
123123 func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
124124 
125125 
126126 func keyStakedTimeByAssetIdAndOwner (assetId,addr) = ((("st_" + assetId) + "_") + addr)
127127 
128128 
129129 func keyStakedNFTsByOwner (ownerAddr) = ("stakedNFTsByOwner_" + ownerAddr)
130130 
131131 
132132 func asInt (v) = match v {
133133     case n: Int => 
134134         n
135135     case _ => 
136136         throw("fail to cast into Int")
137137 }
138138 
139139 
140140 func asTuple5Ints (val) = match val {
141141     case t: (Int, Int, Int, Int, Int) => 
142142         t
143143     case _ => 
144144         throw("fail to cast into (Int, Int, Int, Int, Int)")
145145 }
146146 
147147 
148148 func asTuple4Ints (val) = match val {
149149     case t: (Int, Int, Int, Int) => 
150150         t
151151     case _ => 
152152         throw("fail to cast into (Int, Int, Int, Int)")
153153 }
154154 
155155 
156156 func asTuple3Ints (val) = match val {
157157     case t: (Int, Int, Int) => 
158158         t
159159     case _ => 
160160         throw("fail to cast into (Int, Int, Int)")
161161 }
162162 
163163 
164164 func asTuple2Ints (val) = match val {
165165     case t: (Int, Int) => 
166166         t
167167     case _ => 
168168         throw("fail to cast into (Int, Int)")
169169 }
170170 
171171 
172172 func fixedPoint (val,decimals) = {
173173     let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
174174     let lowPart = toString((val % tenPow))
175175     let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
176176     (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
177177     }
178178 
179179 
180180 let M6_ = 1000000
181181 
182182 let M8_ = 100000000
183183 
184184 let wlgIssuedAmtKey = "wlg_issuedAmount"
185185 
186186 let zbIssuedAmtKey = "zbill_issuedAmount"
187187 
188188 func keyAcresStakedAmtByUser (addr) = ("acresStakedAmountByUser_" + addr)
189189 
190190 
191191 func keyFarmingPowerByUser (addr) = ("farmingPowerByUser_" + addr)
192192 
193193 
194194 let acresStakdTotalKey = "acresStakedAmountTotal"
195195 
196196 let totalFarmingPowerKey = "totalFarmingPower"
197197 
198198 let MAX_WL_NFTS = 3
199199 
200200 let MAX_ARK_NFTS = 1
201201 
202202 let ARK_NFT_BONUS = 5000
203203 
204204 let MAX_NFTS_STAKED_BY_USER = 4
205205 
206206 let keyNftTotalIssued = "nftTotalIssued"
207207 
208208 let keyNftTotalBurned = "nftTotalBurned"
209209 
210210 let keyWlNftTotalStaked = "WlNftTotalStaked"
211211 
212212 let keyArkNftTotalStaked = "ArkNftTotalStaked"
213213 
214214 func keyNftNumberByAssetId (assetId) = ("nftNumberByAssetId_" + assetId)
215215 
216216 
217217 func keyUserWlNftNumber (addr) = ("userWlNftNumber_" + addr)
218218 
219219 
220220 func keyUserArkNftNumber (addr) = ("userArkNftNumber_" + addr)
221221 
222222 
223223 func keyUserFullBonus (addr) = ("userFullBonus_" + addr)
224224 
225225 
226226 let levelAcres = [0, 10, 20, 40, 80, 150, 250, 400, 700, 1000]
227227 
228228 func getLevelByAcres (acres) = {
229229     let acr = ((acres + 99999999) / M8_)
230230     func checker (acc,item) =     if ((item >= acr))
231231         then acc
232232         else (acc + 1)
233233 
234234     let $l = levelAcres
235235     let $s = size($l)
236236     let $acc0 = 0
237237     func $f0_1 ($a,$i) =     if (($i >= $s))
238238         then $a
239239         else checker($a, $l[$i])
240240 
241241     func $f0_2 ($a,$i) =     if (($i >= $s))
242242         then $a
243243         else throw("List size exceeds 10")
244244 
245245     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
246246     }
247247 
248248 
249249 func getFarmingPowerByAcres (acres) = ((acres * 20) * (getLevelByAcres(acres) + 4))
250250 
251251 
252252 func getFarmingPowerByAcresAndBonus (acres,bonus6) = {
253253     let notBonused = getFarmingPowerByAcres(acres)
254254     $Tuple2(fraction(notBonused, (M6_ + bonus6), M6_), notBonused)
255255     }
256256 
257257 
258258 let teamAddrKey = "teamAddr"
259259 
260260 func keyLastWlgTradeTimeByUser (addr) = ("lastArbTimeUser_" + addr)
261261 
262262 
263263 let keyLastAcresSellTime = "lastAcresSellTime"
264264 
265265 let keyLastLimitLeft = "lastLimitLeft"
266266 
267267 let names = ["Gold shovel", "Pickaxe"]
268268 
269269 let descriptions = ["Reward for early birds", "Increases FarmPower"]
270270 
271271 let idxDescrShovel = 0
272272 
273273 let idxDescrPickaxe = 1
274274 
275275 let rarityThresholds = [5, 10, 20]
276276 
277277 let idxThresholdC = 0
278278 
279279 let idxThresholdU = 1
280280 
281281 let idxThresholdL = 2
282282 
283283 let namez = ["SHOVEL", "PICKAXE"]
284284 
285285 let idxNameShovel = 0
286286 
287287 let idxNamePickaxe = 1
288288 
289289 let contentKeyz = ["contentPickaxeC", "contentPickaxeU", "contentPickaxeL", "contentPickaxeE", "contentShovelP"]
290290 
291291 let idxKeyC = 0
292292 
293293 let idxKeyP = 4
294294 
295295 let rarityNames = ["Common", "Uncommon", "Legendary", "Epic", "Promo"]
296296 
297297 let idxRarityC = 0
298298 
299299 let idxRarityU = 1
300300 
301301 let idxRarityL = 2
302302 
303303 let idxRarityE = 3
304304 
305305 let idxRarityP = 4
306306 
307307 let collectionz = ["Digging tools"]
308308 
309309 let idxCollDig = 0
310310 
311311 let bonusTypez = ["FarmPower"]
312312 
313313 let idxBonusTypeFp = 0
314314 
315315 func prolog (i) = if (if ((i.originCaller != rest2Contract))
316316     then valueOrElse(getBoolean(keyBlocked()), false)
317317     else false)
318318     then throw("Contracts are under maintenance")
319319     else {
320320         let addr = toString(i.originCaller)
321321         let week = (height / WEEK_BLOCKS)
322322         let lastWeekKey = keyLastWeekTxIdByUser(addr)
323323         let lastWeekTxIdByUser = getString(lastWeekKey)
324324         let txId = toBase58String(i.transactionId)
325325         let wtx = ((toString(week) + "_") + txId)
326326         let curWeekKey = keyCurWeekTxIdByUser(addr)
327327         if (isDefined(lastWeekTxIdByUser))
328328             then {
329329                 let lastWeekTx = split(value(lastWeekTxIdByUser), "_")
330330                 if ((lastWeekTx[0] == toString(week)))
331331                     then [StringEntry(lastWeekKey, wtx), StringEntry(curWeekKey, wtx)]
332332                     else if ((lastWeekTx[0] == toString((week - 1))))
333333                         then [StringEntry(curWeekKey, wtx)]
334334                         else {
335335                             let curWeekTxIdByUser = getStringValue(curWeekKey)
336336                             let curWeekTx = split(curWeekTxIdByUser, "_")
337337                             if ((curWeekTx[0] == toString(week)))
338338                                 then [StringEntry(curWeekKey, wtx)]
339339                                 else [StringEntry(lastWeekKey, curWeekTxIdByUser), StringEntry(curWeekKey, wtx)]
340340                             }
341341                 }
342342             else [StringEntry(lastWeekKey, wtx), StringEntry(curWeekKey, wtx)]
343343         }
344344 
345345 
346346 func createNftDescrCustom (contKey,nftSerial,collection,name,descr,rarity,bonus,bonusType) = (((((((((((((((((((((((("{\"url\": \"https://waveslands.com\", " + "\"contentKey\": \"") + contKey) + "\", ") + "\"number\": ") + toString(nftSerial)) + ", ") + "\"collection\": \"") + collection) + "\", ") + "\"name\": \"") + name) + "\", ") + "\"description\": \"") + descr) + "\", ") + "\"rare\": \"") + rarity) + "\", ") + "\"bonus\": ") + toString(bonus)) + ", ") + "\"bonusType\": \"") + bonusType) + "\"}")
347347 
348348 
349349 func issueNftCustom (nameIdx,contKeyIdx,collIdx,rarityIdx,bonusPerc,descrIdx,bonusTypeIdx,addr) = {
350350     let nftSerial = valueOrElse(getInteger(keyNftTotalIssued), 0)
351351     let rarity = rarityNames[rarityIdx]
352352     let name = (((namez[nameIdx] + "-") + take(rarity, 1)) + toString(bonusPerc))
353353     let issue = Issue(name, createNftDescrCustom(contentKeyz[contKeyIdx], nftSerial, collectionz[collIdx], names[nameIdx], descriptions[descrIdx], rarityNames[rarityIdx], bonusPerc, bonusTypez[bonusTypeIdx]), 1, 0, false)
354354     let nftAssetId = calculateAssetId(issue)
355355     $Tuple2([issue, IntegerEntry(keyNftTotalIssued, (nftSerial + 1)), IntegerEntry(keyNftNumberByAssetId(toBase58String(nftAssetId)), nftSerial), ScriptTransfer(addr, 1, nftAssetId)], nftAssetId)
356356     }
357357 
358358 
359359 func stakeUnstakeAcresInternal (amt,address,bonusDelta) = if (if ((amt == 0))
360360     then (bonusDelta == 0)
361361     else false)
362362     then throw("Nothing to do")
363363     else {
364364         let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
365365         if ((wlgResult == wlgResult))
366366             then {
367367                 let now = lastBlock.timestamp
368368                 let timeKey = keyAcresStakedTimeByUser(address)
369369                 let amountKey = keyAcresStakedAmtByUser(address)
370370                 let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
371371                 if (if ((0 > amt))
372372                     then (0 > (oldAcresAmount + amt))
373373                     else false)
374374                     then throw(((("You have only " + fixedPoint(oldAcresAmount, 8)) + " ACRES staked, tried to unstake ") + fixedPoint(-(amt), 8)))
375375                     else {
376376                         let newAcresAmount = (oldAcresAmount + amt)
377377                         let oldTotal = valueOrElse(getInteger(acresStakdTotalKey), 0)
378378                         let userFpKey = keyFarmingPowerByUser(address)
379379                         let oldFp = valueOrElse(getInteger(userFpKey), 0)
380380                         let bonusKey = keyUserFullBonus(address)
381381                         let oldBonus = valueOrElse(getInteger(acres2Contract, bonusKey), 0)
382382                         if (if ((0 > bonusDelta))
383383                             then (0 > (oldBonus + bonusDelta))
384384                             else false)
385385                             then throw((((("You have only " + fixedPoint(oldBonus, 4)) + "% bonus, and tried to unstake ") + fixedPoint(-(bonusDelta), 4)) + "%"))
386386                             else {
387387                                 let $t068386937 = getFarmingPowerByAcresAndBonus(newAcresAmount, (oldBonus + bonusDelta))
388388                                 let newBonusedFp = $t068386937._1
389389                                 let ignored = $t068386937._2
390390                                 let oldTotalFp = valueOrElse(getInteger(totalFarmingPowerKey), 0)
391391                                 let acresActions = if ((amt == 0))
392392                                     then nil
393393                                     else [IntegerEntry(amountKey, newAcresAmount), IntegerEntry(acresStakdTotalKey, (oldTotal + amt))]
394394                                 $Tuple2(((((acresActions :+ IntegerEntry(timeKey, lastBlock.timestamp)) :+ IntegerEntry(userFpKey, newBonusedFp)) :+ IntegerEntry(totalFarmingPowerKey, ((oldTotalFp + newBonusedFp) - oldFp))) :+ IntegerEntry(bonusKey, (oldBonus + bonusDelta))), wlgResult)
395395                                 }
396396                         }
397397                 }
398398             else throw("Strict value is not equal to itself.")
399399         }
400400 
401401 
402402 func getWlgPrice (usdtBalanceCorrection) = {
403403     let issuedAmount = valueOrErrorMessage(getInteger(wlgContract, wlgIssuedAmtKey), "WLGOLD is not issued yet")
404404     let wlgUsd = assetBalance(wlgContract, usdtAssetId)
405405     let acres2Usd = (assetBalance(acres2Contract, usdtAssetId) - usdtBalanceCorrection)
406406     let investFundTotal = (assetBalance(investFundContract, usdtAssetId) + valueOrElse(getInteger(investFundContract, zbIssuedAmtKey), 0))
407407     let totalFundsUsd = ((acres2Usd + wlgUsd) + investFundTotal)
408408     fraction(totalFundsUsd, MULT8, issuedAmount)
409409     }
410410 
411411 
412412 func getSwapLimitAcres () = {
413413     let wlgUsd = assetBalance(wlgContract, usdtAssetId)
414414     let acres2Usd = assetBalance(this, usdtAssetId)
415415     let investFundTotal = (assetBalance(investFundContract, usdtAssetId) + valueOrElse(getInteger(investFundContract, zbIssuedAmtKey), 0))
416416     let defaultLimit = (((acres2Usd + wlgUsd) + investFundTotal) / ONE_PERCENT_DIVISOR)
417417     let lastLimitLeft = valueOrElse(getInteger(keyLastLimitLeft), defaultLimit)
418418     let lastTime = valueOrElse(getInteger(keyLastAcresSellTime), 0)
419419     let now = lastBlock.timestamp
420420     let currentLimit = (lastLimitLeft + fraction(defaultLimit, (now - lastTime), DAY_MILLIS))
421421     let limitLeftUsdt = min([currentLimit, defaultLimit])
422422     $Tuple2(IntegerEntry(keyLastAcresSellTime, now), limitLeftUsdt)
423423     }
424424 
425425 
426426 let arkOracle = addressFromStringValue("3PJgZ6AK1WVCpdCmEZpesHmaKvrQDdXG5og")
427427 
428428 let incubator = valueOrElse(getString(arkOracle, "static_incubatorAddress"), "")
429429 
430430 let breeder = valueOrElse(getString(arkOracle, "static_breederAddress"), "")
431431 
432432 let turtleIncubator = valueOrElse(getString(arkOracle, "static_turtleIncubatorAddress"), "")
433433 
434434 let turtleBreeder = valueOrElse(getString(arkOracle, "static_turtleBreederAddress"), "")
435435 
436436 let canineIncubator = valueOrElse(getString(arkOracle, "static_canineIncubatorAddress"), "")
437437 
438438 let canineBreeder = valueOrElse(getString(arkOracle, "static_canineBreederAddress"), "")
439439 
440440 let felineIncubator = valueOrElse(getString(arkOracle, "static_felineIncubatorAddress"), "")
441441 
442442 let felineBreeder = valueOrElse(getString(arkOracle, "static_felineBreederAddress"), "")
443443 
444444 let mutantBreeder = valueOrElse(getString(arkOracle, "static_mutantIncubatorAddress"), "")
445445 
446446 func isArkimalIssued (nfo) = {
447447     let issuer = toString(nfo.issuer)
448448     if (if (if (if (if (if (if (if (if (if ((chain == base58'2T'))
449449         then (issuer == oldStakingContractStr)
450450         else false)
451451         then true
452452         else (issuer == incubator))
453453         then true
454454         else (issuer == breeder))
455455         then true
456456         else (issuer == turtleIncubator))
457457         then true
458458         else (issuer == turtleBreeder))
459459         then true
460460         else (issuer == canineIncubator))
461461         then true
462462         else (issuer == canineBreeder))
463463         then true
464464         else (issuer == felineIncubator))
465465         then true
466466         else (issuer == felineBreeder))
467467         then nfo.name
468468         else if ((issuer == mutantBreeder))
469469             then nfo.description
470470             else ""
471471     }
472472 
473473 
474474 func bonusByDescription (descr) = if (!(contains(descr, "\"bonusType\": \"FarmPower\"")))
475475     then throw(("NFT is not supported: " + descr))
476476     else {
477477         let bonusStr = split_4C(split_4C(descr, "\"bonus\":")[1], ",")[0]
478478         parseIntValue(drop(bonusStr, (valueOrElse(lastIndexOf(bonusStr, " "), -1) + 1)))
479479         }
480480 
481481 
482482 func rarityIdxByDescriprion (descr) = if (!(contains(descr, "\"rare\"")))
483483     then throw(("NFT is not supported: " + descr))
484484     else {
485485         let rarityStr = split_4C(split_4C(split_4C(descr, "\"rare\"")[1], ",")[0], "\"")[1]
486486         value(indexOf(rarityNames, rarityStr))
487487         }
488488 
489489 
490490 func stakeNftInternal (addr,assetIdStr,bonus6,userNumKey,totalNumKey,limit) = {
491491     let nftNumber = valueOrElse(getInteger(userNumKey), 0)
492492     if ((nftNumber >= limit))
493493         then throw((("You can stake max " + toString(limit)) + " of such NFTs"))
494494         else {
495495             let $t01175711833 = stakeUnstakeAcresInternal(0, addr, bonus6)
496496             let actions = $t01175711833._1
497497             let wlgClaimedAmount = $t01175711833._2
498498             $Tuple2((((actions :+ IntegerEntry(userNumKey, (nftNumber + 1))) :+ IntegerEntry(totalNumKey, (valueOrElse(getInteger(totalNumKey), 0) + 1))) :+ IntegerEntry(keyStakedTimeByAssetIdAndOwner(assetIdStr, addr), lastBlock.timestamp)), wlgClaimedAmount)
499499             }
500500     }
501501 
502502 
503503 @Callable(i)
504504 func saveLastTx () = if (!(containsElement([wlgContract], i.caller)))
505505     then throw("Access denied")
506506     else $Tuple2(prolog(i), 42)
507507 
508508 
509509 
510510 @Callable(i)
511511 func constructorV1 (rest2Addr,oldAcrContract) = if ((i.caller != this))
512512     then throw("Permission denied")
513513     else {
514514         let oldAcrContAddr = addressFromStringValue(oldAcrContract)
515515 [IntegerEntry(acresIssuedAmountKey, getIntegerValue(oldAcrContAddr, acresIssuedAmountKey)), BinaryEntry(acresAssetIdKey, getBinaryValue(oldAcrContAddr, acresAssetIdKey)), StringEntry(keyRest2Address(), rest2Addr), StringEntry(oldAcresContractKey, oldAcrContract)]
516516         }
517517 
518518 
519519 
520520 @Callable(i)
521521 func setBlocked (isBlocked) = if ((i.caller != this))
522522     then throw("permission denied")
523523     else [BooleanEntry(keyBlocked(), isBlocked)]
524524 
525525 
526526 
527527 @Callable(i)
528528 func unstakeAcres (amount) = {
529529     let prologActions = prolog(i)
530530     if ((0 >= amount))
531531         then throw("Amount should be positive")
532532         else {
533533             let address = toString(i.caller)
534534             if ((size(i.payments) != 0))
535535                 then throw("No payments required")
536536                 else {
537537                     let arbReleaseTime = (valueOrElse(getInteger(wlgContract, keyLastWlgTradeTimeByUser(address)), 0) + arbitrageDelay)
538538                     if ((arbReleaseTime > lastBlock.timestamp))
539539                         then throw(("You traded some WLGOLD, cannot unstake until " + toString(arbReleaseTime)))
540540                         else {
541541                             let $t01340713487 = stakeUnstakeAcresInternal(-(amount), address, 0)
542542                             let actions = $t01340713487._1
543543                             let wlgClaimedAmount = $t01340713487._2
544544                             $Tuple2(((actions :+ ScriptTransfer(i.caller, amount, acresAssetId)) ++ prologActions), wlgClaimedAmount)
545545                             }
546546                     }
547547             }
548548     }
549549 
550550 
551551 
552552 @Callable(i)
553553 func stakeAcres () = {
554554     let prologActions = prolog(i)
555555     let address = toString(i.caller)
556556     if ((size(i.payments) != 1))
557557         then throw("exactly 1 payment must be attached")
558558         else {
559559             let pmt = i.payments[0]
560560             let amt = pmt.amount
561561             if (if (!(isDefined(pmt.assetId)))
562562                 then true
563563                 else (value(pmt.assetId) != acresAssetId))
564564                 then throw("ACRES payments only!")
565565                 else {
566566                     let $t01393814014 = stakeUnstakeAcresInternal(amt, address, 0)
567567                     let actions = $t01393814014._1
568568                     let wlgClaimedAmount = $t01393814014._2
569569                     $Tuple2((actions ++ prologActions), wlgClaimedAmount)
570570                     }
571571             }
572572     }
573573 
574574 
575575 
576576 @Callable(i)
577577 func buyAcres () = {
578578     let prologActions = prolog(i)
579579     if ((size(i.payments) != 1))
580580         then throw("exactly 1 payment must be attached")
581581         else {
582582             let pmt = i.payments[0]
583583             let usdtAmount = pmt.amount
584584             if (if (!(isDefined(pmt.assetId)))
585585                 then true
586586                 else (value(pmt.assetId) != usdtAssetId))
587587                 then throw("USDT payments only!")
588588                 else if ((MULT6 > usdtAmount))
589589                     then throw((("Min payment should be " + fixedPoint(MULT6, 6)) + " USDT"))
590590                     else {
591591                         let acresAmount = (usdtAmount * USDT2ACRES_MULTIPLIER)
592592                         let wlgAmount = fraction(usdtAmount, MULT8, getWlgPrice(usdtAmount))
593593                         let oldAcresAddress = addressFromStringValue(getStringValue(oldAcresContractKey))
594594                         let req = invoke(oldAcresAddress, "requestAcresCallback", [acresAmount], nil)
595595                         if ((req == req))
596596                             then {
597597                                 let wlgRemain = asInt(invoke(wlgContract, "burnWlgold", [wlgAmount], nil))
598598                                 $Tuple2(([ScriptTransfer(i.caller, acresAmount, acresAssetId)] ++ prologActions), wlgRemain)
599599                                 }
600600                             else throw("Strict value is not equal to itself.")
601601                         }
602602             }
603603     }
604604 
605605 
606606 
607607 @Callable(i)
608608 func buyAcresREADONLY (usdtAmount) = {
609609     let acresAmount = (usdtAmount * USDT2ACRES_MULTIPLIER)
610610     let wlgToBurn = fraction(usdtAmount, MULT8, getWlgPrice(usdtAmount))
611611     $Tuple2(nil, [acresAmount, MULT6, acresAmount, wlgToBurn])
612612     }
613613 
614614 
615615 
616616 @Callable(i)
617617 func sellAcres () = {
618618     let prologActions = prolog(i)
619619     if ((size(i.payments) != 1))
620620         then throw("exactly 1 payment must be attached")
621621         else {
622622             let pmt = i.payments[0]
623623             let acresAmount = pmt.amount
624624             if (if (!(isDefined(pmt.assetId)))
625625                 then true
626626                 else (value(pmt.assetId) != acresAssetId))
627627                 then throw("ACRES payments only!")
628628                 else if ((MULT7 > acresAmount))
629629                     then throw((("Min payment should be " + fixedPoint(MULT7, 8)) + " ACRES"))
630630                     else {
631631                         let addr = toString(i.caller)
632632                         let $t01587115919 = getSwapLimitAcres()
633633                         let limitAction = $t01587115919._1
634634                         let maxUsdt = $t01587115919._2
635635                         let maxAcres = (maxUsdt * USDT2ACRES_MULTIPLIER)
636636                         if ((acresAmount > maxAcres))
637637                             then throw((("You can sell max " + fixedPoint(maxAcres, 8)) + " ACRES"))
638638                             else {
639639                                 let usdtAmount = ((acresAmount / USDT2ACRES_MULTIPLIER) / 2)
640640                                 $Tuple2(([limitAction, IntegerEntry(keyLastLimitLeft, (maxUsdt - usdtAmount)), ScriptTransfer(i.caller, usdtAmount, usdtAssetId)] ++ prologActions), usdtAmount)
641641                                 }
642642                         }
643643             }
644644     }
645645 
646646 
647647 
648648 @Callable(i)
649649 func sellAcresREADONLY (address,acresAmount) = {
650650     let $t01641516463 = getSwapLimitAcres()
651651     let limitAction = $t01641516463._1
652652     let maxUsdt = $t01641516463._2
653653     let usdtAmount = ((acresAmount / USDT2ACRES_MULTIPLIER) / 2)
654654     $Tuple2(nil, [usdtAmount, MULT7, (maxUsdt * USDT2ACRES_MULTIPLIER), 0])
655655     }
656656 
657657 
658658 
659659 @Callable(i)
660660 func convertOldStakes () = if ((i.caller != this))
661661     then throw("Temporarily disabled")
662662     else {
663663         let address = toString(i.caller)
664664         if ((size(i.payments) != 0))
665665             then throw("No payments required")
666666             else {
667667                 let oldAcresAddress = addressFromStringValue(getStringValue(oldAcresContractKey))
668668                 let amount = valueOrElse(getInteger(oldAcresAddress, keyAcresStakedAmtByUser(address)), 0)
669669                 let gotAcres0 = if ((amount > 0))
670670                     then asTuple2Ints(invoke(oldAcresAddress, "unstakeAcresCallback", [amount, address], nil))
671671                     else $Tuple2(0, 0)
672672                 let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
673673                 let landsStr = getString(oldStakingAddress, keyStakedLandsByOwner(address))
674674                 let landsResult = if (isDefined(landsStr))
675675                     then {
676676                         let lands = split_51C(value(landsStr), "_")
677677                         func oneLand (acc,landAssetId) =                         if ((landAssetId == ""))
678678                             then throw("landAssetId is required")
679679                             else {
680680                                 let r = asTuple5Ints(invoke(oldStakingAddress, "unstakeLandCallback", [landAssetId, address], nil))
681681                                 $Tuple4((acc._1 + r._1), (acc._2 + r._2), (acc._3 + r._3), (acc._4 + r._4))
682682                                 }
683683 
684684                         let rr = {
685685                             let $l = lands
686686                             let $s = size($l)
687687                             let $acc0 = $Tuple4(0, 0, 0, 0)
688688                             func $f0_1 ($a,$i) =                             if (($i >= $s))
689689                                 then $a
690690                                 else oneLand($a, $l[$i])
691691 
692692                             func $f0_2 ($a,$i) =                             if (($i >= $s))
693693                                 then $a
694694                                 else throw("List size exceeds 100")
695695 
696696                             $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
697697                             }
698698                         let finalize = invoke(oldStakingAddress, "unstakeLandsFinalizeCallback", [address], nil)
699699                         if ((finalize == finalize))
700700                             then {
701701                                 let req = invoke(oldAcresAddress, "requestAcresCallback", [(((rr._1 + rr._2) + rr._3) + rr._4)], nil)
702702                                 if ((req == req))
703703                                     then {
704704                                         let $t01833218470 = issueNftCustom(idxNameShovel, idxKeyP, idxCollDig, idxRarityP, 3, idxDescrShovel, idxBonusTypeFp, i.caller)
705705                                         let nftActions = $t01833218470._1
706706                                         let nftAssetId = $t01833218470._2
707707                                         $Tuple5(rr._1, rr._2, rr._3, rr._4, nftActions)
708708                                         }
709709                                     else throw("Strict value is not equal to itself.")
710710                                 }
711711                             else throw("Strict value is not equal to itself.")
712712                         }
713713                     else $Tuple5(0, 0, 0, 0, nil)
714714                 let duckAssetId = valueOrElse(getString(oldStakingAddress, keyStakedDuckByOwner(address)), "")
715715                 let duckResult = if ((duckAssetId != ""))
716716                     then asTuple3Ints(invoke(oldStakingAddress, "unstakeDuckCallback", [duckAssetId, address], nil))
717717                     else $Tuple3(0, 0, 0)
718718                 let x = stakeUnstakeAcresInternal((((((((gotAcres0._1 + landsResult._1) + landsResult._2) + landsResult._3) + landsResult._4) + duckResult._1) + duckResult._2) + duckResult._3), address, 0)
719719                 $Tuple2((landsResult._5 ++ x._1), x._2)
720720                 }
721721         }
722722 
723723 
724724 
725725 @Callable(i)
726726 func unstakeLandsREADONLY (address) = {
727727     let oldStakingAddress = addressFromStringValue(oldStakingContractStr)
728728     let landsStr = getString(oldStakingAddress, keyStakedLandsByOwner(address))
729729     let landsResult = if (isDefined(landsStr))
730730         then {
731731             let lands = split_51C(value(landsStr), "_")
732732             func oneLand (acc,landAssetId) =             if ((landAssetId == ""))
733733                 then throw("landAssetId is required")
734734                 else {
735735                     let r = asTuple4Ints(invoke(oldStakingAddress, "unstakeLandREADONLY", [landAssetId, address], nil))
736736                     $Tuple4((acc._1 + r._1), (acc._2 + r._2), (acc._3 + r._3), (acc._4 + r._4))
737737                     }
738738 
739739             let $l = lands
740740             let $s = size($l)
741741             let $acc0 = $Tuple4(0, 0, 0, 0)
742742             func $f0_1 ($a,$i) =             if (($i >= $s))
743743                 then $a
744744                 else oneLand($a, $l[$i])
745745 
746746             func $f0_2 ($a,$i) =             if (($i >= $s))
747747                 then $a
748748                 else throw("List size exceeds 100")
749749 
750750             $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
751751             }
752752         else $Tuple4(0, 0, 0, 0)
753753     $Tuple2(nil, landsResult)
754754     }
755755 
756756 
757757 
758758 @Callable(i)
759759 func stakeAcresCallback (addr) = if ((i.caller != addressFromStringValue(oldStakingContractStr)))
760760     then throw("Permission denied")
761761     else stakeUnstakeAcresInternal(i.payments[0].amount, addr, 0)
762762 
763763 
764764 
765765 @Callable(i)
766766 func simulateStakeAcresREADONLY (address,addedAmount) = {
767767     let amountKey = keyAcresStakedAmtByUser(address)
768768     let newAcresAmount = (valueOrElse(getInteger(amountKey), 0) + addedAmount)
769769     let oldTotal = valueOrElse(getInteger(acresStakdTotalKey), 0)
770770     let userFpKey = keyFarmingPowerByUser(address)
771771     let oldFp = valueOrElse(getInteger(userFpKey), 0)
772772     let userBonus = valueOrElse(getInteger(acres2Contract, keyUserFullBonus(address)), 0)
773773     let $t02063520722 = getFarmingPowerByAcresAndBonus(newAcresAmount, userBonus)
774774     let newBonusedFp = $t02063520722._1
775775     let ignored = $t02063520722._2
776776     let oldTotalFp = valueOrElse(getInteger(totalFarmingPowerKey), 0)
777777     let newTotalFp = ((oldTotalFp + newBonusedFp) - oldFp)
778778     $Tuple2(nil, [oldFp, newBonusedFp, oldTotalFp, newTotalFp])
779779     }
780780 
781781 
782782 
783783 @Callable(i)
784784 func issuePickC1 (forAddress) = if ((i.caller != wlgContract))
785785     then throw("Permission denied")
786786     else issueNftCustom(idxNamePickaxe, idxKeyC, idxCollDig, idxRarityC, 1, idxDescrPickaxe, idxBonusTypeFp, addressFromStringValue(forAddress))
787787 
788788 
789789 
790790 @Callable(i)
791791 func stakeNFT () = {
792792     let prologActions = prolog(i)
793793     if ((size(i.payments) != 1))
794794         then throw("Exactly one payment required")
795795         else {
796796             let pmt = value(i.payments[0])
797797             if ((pmt.amount != 1))
798798                 then throw("NFT token should be attached as payment")
799799                 else {
800800                     let assetId = value(pmt.assetId)
801801                     let asset = value(assetInfo(assetId))
802802                     let assetIdStr = toBase58String(assetId)
803803                     let addr = toString(i.caller)
804804                     let nftsKey = keyStakedNFTsByOwner(addr)
805805                     let nftsStr = getString(nftsKey)
806806                     let nfts = if (isDefined(nftsStr))
807807                         then split_4C(value(nftsStr), "_")
808808                         else nil
809809                     if (containsElement(nfts, assetIdStr))
810810                         then throw(("Your staked NFTs already contain " + assetIdStr))
811811                         else if ((size(nfts) >= MAX_NFTS_STAKED_BY_USER))
812812                             then throw((("Your already staked max (" + toString(MAX_NFTS_STAKED_BY_USER)) + ") NFTs"))
813813                             else {
814814                                 let listAction = StringEntry(nftsKey, makeString_2C((nfts :+ assetIdStr), "_"))
815815                                 if ((asset.issuer == this))
816816                                     then {
817817                                         let $t02213122321 = stakeNftInternal(addr, assetIdStr, (bonusByDescription(value(asset.description)) * 10000), keyUserWlNftNumber(addr), keyWlNftTotalStaked, MAX_WL_NFTS)
818818                                         let actions = $t02213122321._1
819819                                         let wlgClaimedAmount = $t02213122321._2
820820                                         $Tuple2(((prologActions ++ actions) :+ listAction), wlgClaimedAmount)
821821                                         }
822822                                     else if ((isArkimalIssued(asset) == ""))
823823                                         then throw("Only WavesLands and Arkimals NFT tokens are accepted")
824824                                         else {
825825                                             let $t02250222653 = stakeNftInternal(addr, assetIdStr, ARK_NFT_BONUS, keyUserArkNftNumber(addr), keyArkNftTotalStaked, MAX_ARK_NFTS)
826826                                             let actions = $t02250222653._1
827827                                             let wlgClaimedAmount = $t02250222653._2
828828                                             $Tuple2(((prologActions ++ actions) :+ listAction), wlgClaimedAmount)
829829                                             }
830830                                 }
831831                     }
832832             }
833833     }
834834 
835835 
836836 
837837 @Callable(i)
838838 func unstakeNFT (assetIdStr) = {
839839     let prologActions = prolog(i)
840840     if ((size(i.payments) != 0))
841841         then throw("No payments required")
842842         else {
843843             let assetId = fromBase58String(assetIdStr)
844844             let addr = toString(i.caller)
845845             let asset = value(assetInfo(assetId))
846846             let timeKey = keyStakedTimeByAssetIdAndOwner(assetIdStr, addr)
847847             if (!(isDefined(getInteger(timeKey))))
848848                 then throw((("NFT " + asset.name) + " is not staked by you"))
849849                 else {
850850                     let nftsKey = keyStakedNFTsByOwner(addr)
851851                     let nfts = split_4C(valueOrElse(getString(nftsKey), ""), "_")
852852                     let idx = indexOf(nfts, assetIdStr)
853853                     if (!(isDefined(idx)))
854854                         then throw(("Your staked NFTs don't contain " + assetIdStr))
855855                         else {
856856                             let listAction = if ((size(nfts) > 1))
857857                                 then StringEntry(nftsKey, makeString_2C(removeByIndex(nfts, value(idx)), "_"))
858858                                 else DeleteEntry(nftsKey)
859859                             let isWL = (asset.issuer == this)
860860                             if (isWL)
861861                                 then {
862862                                     let wlNftNumber = valueOrElse(getInteger(keyUserWlNftNumber(addr)), 0)
863863                                     let bonusVal = (bonusByDescription(value(asset.description)) * 10000)
864864                                     let $t02381823897 = stakeUnstakeAcresInternal(0, addr, -(bonusVal))
865865                                     let actions = $t02381823897._1
866866                                     let wlgClaimedAmount = $t02381823897._2
867867                                     $Tuple2(((((((actions :+ listAction) :+ IntegerEntry(keyUserWlNftNumber(addr), (wlNftNumber - 1))) :+ IntegerEntry(keyWlNftTotalStaked, max([0, (valueOrElse(getInteger(keyWlNftTotalStaked), 0) - 1)]))) :+ DeleteEntry(keyStakedTimeByAssetIdAndOwner(toBase58String(assetId), addr))) :+ ScriptTransfer(i.caller, 1, assetId)) ++ prologActions), wlgClaimedAmount)
868868                                     }
869869                                 else {
870870                                     let arkimalName = isArkimalIssued(asset)
871871                                     if ((arkimalName == ""))
872872                                         then throw("Only WavesLands and Arkimals NFT tokens are accepted")
873873                                         else {
874874                                             let arkNftNumber = valueOrElse(getInteger(keyUserArkNftNumber(addr)), 0)
875875                                             let $t02455724641 = stakeUnstakeAcresInternal(0, addr, -(ARK_NFT_BONUS))
876876                                             let actions = $t02455724641._1
877877                                             let wlgClaimedAmount = $t02455724641._2
878878                                             $Tuple2((((((actions :+ listAction) :+ IntegerEntry(keyUserArkNftNumber(addr), (arkNftNumber - 1))) :+ DeleteEntry(keyStakedTimeByAssetIdAndOwner(toBase58String(assetId), addr))) :+ ScriptTransfer(i.caller, 1, assetId)) ++ prologActions), wlgClaimedAmount)
879879                                             }
880880                                     }
881881                             }
882882                     }
883883             }
884884     }
885885 
886886 
887887 
888888 @Callable(i)
889-func exchangeNFTs () = if ((i.caller != this))
890-    then throw("Temporarily disabled")
891-    else {
892-        let prologActions = prolog(i)
893-        if ((3 > size(i.payments)))
894-            then throw("Min one WLGOLD and 2 NFT payments allowed")
895-            else if ((size(i.payments) > 6))
896-                then throw("Max one WLGOLD and 5 NFT payments allowed")
897-                else {
898-                    let addr = toString(i.caller)
899-                    func addUp (acc,pmt) =                     {
900-                        let assetId = valueOrErrorMessage(pmt.assetId, "WAVES payments not allowed")
901-                        if ((assetId == wlgAssetId))
902-                            then $Tuple3((acc._1 + pmt.amount), acc._2, acc._3)
903-                            else {
904-                                let asset = value(assetInfo(assetId))
905-                                if ((asset.issuer != this))
906-                                    then throw("Only WL-issued NFTs allowed")
907-                                    else {
908-                                        let rarityIx = rarityIdxByDescriprion(value(asset.description))
909-                                        if (if ((acc._4 > 0))
910-                                            then (rarityIx != acc._4)
911-                                            else false)
912-                                            then throw("You can exchange only NFTs of the same rarity")
913-                                            else {
914-                                                let bonusPerc = bonusByDescription(value(asset.description))
915-                                                $Tuple4(acc._1, (acc._2 + bonusPerc), (acc._3 :+ Burn(assetId, 1)), rarityIx)
916-                                                }
917-                                        }
918-                                }
919-                        }
920-
921-                    let $t02616926384 = {
922-                        let $l = i.payments
923-                        let $s = size($l)
924-                        let $acc0 = $Tuple4(0, 0, nil, -1)
925-                        func $f0_1 ($a,$i) =                         if (($i >= $s))
926-                            then $a
927-                            else addUp($a, $l[$i])
928-
929-                        func $f0_2 ($a,$i) =                         if (($i >= $s))
930-                            then $a
931-                            else throw("List size exceeds 6")
932-
933-                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
934-                        }
935-                    let wlgFee = $t02616926384._1
936-                    let totalBonus = $t02616926384._2
937-                    let burnActions = $t02616926384._3
938-                    let rarityIdx = $t02616926384._4
939-                    let newRarityIdx = if ((rarityIdx == idxRarityC))
940-                        then if ((rarityThresholds[idxThresholdC] > totalBonus))
941-                            then idxRarityC
942-                            else if ((rarityThresholds[idxThresholdU] > totalBonus))
943-                                then idxRarityU
944-                                else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdU])) + "%"))
945-                        else if ((rarityIdx == idxRarityU))
946-                            then if ((rarityThresholds[idxThresholdU] > totalBonus))
947-                                then idxRarityU
948-                                else if ((rarityThresholds[idxThresholdL] > totalBonus))
949-                                    then idxRarityL
950-                                    else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdL])) + "%"))
951-                            else if ((rarityIdx == idxRarityL))
952-                                then if ((rarityThresholds[idxThresholdL] > totalBonus))
953-                                    then idxRarityL
954-                                    else idxRarityE
955-                                else if ((rarityIdx == idxRarityE))
956-                                    then idxRarityE
957-                                    else if ((rarityIdx == idxRarityP))
958-                                        then throw("You can't exchange NFTs of this rarity")
959-                                        else throw("Unknown rarity")
960-                    let minWlgFee = fraction(totalBonus, 100, getWlgPrice(0))
961-                    let change = (wlgFee - minWlgFee)
962-                    let forTeam = (minWlgFee / 2)
963-                    let wlgRemain = asInt(invoke(wlgContract, "burnWlgold", [(minWlgFee - forTeam)], nil))
964-                    if ((0 > change))
965-                        then throw((("You need to attach " + fixedPoint(minWlgFee, 8)) + " WLGOLD as fee"))
889+func exchangeNFTs () = {
890+    let prologActions = prolog(i)
891+    if ((3 > size(i.payments)))
892+        then throw("Min one WLGOLD and 2 NFT payments allowed")
893+        else if ((size(i.payments) > 6))
894+            then throw("Max one WLGOLD and 5 NFT payments allowed")
895+            else {
896+                let addr = toString(i.caller)
897+                func addUp (acc,pmt) =                 {
898+                    let assetId = valueOrErrorMessage(pmt.assetId, "WAVES payments not allowed")
899+                    if ((assetId == wlgAssetId))
900+                        then $Tuple3((acc._1 + pmt.amount), acc._2, acc._3)
966901                         else {
967-                            let changeActions = if ((change > 0))
968-                                then [ScriptTransfer(i.caller, change, wlgAssetId)]
969-                                else nil
970-                            let $t02791828079 = issueNftCustom(idxNamePickaxe, newRarityIdx, idxCollDig, newRarityIdx, totalBonus, idxDescrPickaxe, idxBonusTypeFp, i.caller)
971-                            let issueNftActions = $t02791828079._1
972-                            let nftAssetId = $t02791828079._2
973-                            let burned = size(burnActions)
974-                            let burnCounterActions = if ((burned == 0))
975-                                then nil
976-                                else [IntegerEntry(keyNftTotalBurned, (valueOrElse(getInteger(keyNftTotalBurned), 0) + burned))]
977-                            $Tuple2((((((issueNftActions ++ burnActions) ++ burnCounterActions) ++ prologActions) ++ changeActions) :+ ScriptTransfer(addressFromStringValue(getStringValue(wlgContract, teamAddrKey)), forTeam, wlgAssetId)), $Tuple2(nftAssetId, wlgRemain))
902+                            let asset = value(assetInfo(assetId))
903+                            if ((asset.issuer != this))
904+                                then throw("Only WL-issued NFTs allowed")
905+                                else {
906+                                    let rarityIx = rarityIdxByDescriprion(value(asset.description))
907+                                    if (if ((acc._4 > 0))
908+                                        then (rarityIx != acc._4)
909+                                        else false)
910+                                        then throw("You can exchange only NFTs of the same rarity")
911+                                        else {
912+                                            let bonusPerc = bonusByDescription(value(asset.description))
913+                                            $Tuple4(acc._1, (acc._2 + bonusPerc), (acc._3 :+ Burn(assetId, 1)), rarityIx)
914+                                            }
915+                                    }
978916                             }
979917                     }
980-        }
918+
919+                let $t02602226237 = {
920+                    let $l = i.payments
921+                    let $s = size($l)
922+                    let $acc0 = $Tuple4(0, 0, nil, -1)
923+                    func $f0_1 ($a,$i) =                     if (($i >= $s))
924+                        then $a
925+                        else addUp($a, $l[$i])
926+
927+                    func $f0_2 ($a,$i) =                     if (($i >= $s))
928+                        then $a
929+                        else throw("List size exceeds 6")
930+
931+                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
932+                    }
933+                let wlgFee = $t02602226237._1
934+                let totalBonus = $t02602226237._2
935+                let burnActions = $t02602226237._3
936+                let rarityIdx = $t02602226237._4
937+                let newRarityIdx = if ((rarityIdx == idxRarityC))
938+                    then if ((rarityThresholds[idxThresholdC] > totalBonus))
939+                        then idxRarityC
940+                        else if ((rarityThresholds[idxThresholdU] > totalBonus))
941+                            then idxRarityU
942+                            else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdU])) + "%"))
943+                    else if ((rarityIdx == idxRarityU))
944+                        then if ((rarityThresholds[idxThresholdU] > totalBonus))
945+                            then idxRarityU
946+                            else if ((rarityThresholds[idxThresholdL] > totalBonus))
947+                                then idxRarityL
948+                                else throw((("You can advance only one level of rarity, max total bonus " + toString(rarityThresholds[idxThresholdL])) + "%"))
949+                        else if ((rarityIdx == idxRarityL))
950+                            then if ((rarityThresholds[idxThresholdL] > totalBonus))
951+                                then idxRarityL
952+                                else idxRarityE
953+                            else if ((rarityIdx == idxRarityE))
954+                                then idxRarityE
955+                                else if ((rarityIdx == idxRarityP))
956+                                    then throw("You can't exchange NFTs of this rarity")
957+                                    else throw("Unknown rarity")
958+                let minWlgFee = fraction(totalBonus, 100, getWlgPrice(0))
959+                let change = (wlgFee - minWlgFee)
960+                let forTeam = (minWlgFee / 2)
961+                let wlgRemain = asInt(invoke(wlgContract, "burnWlgold", [(minWlgFee - forTeam)], nil))
962+                if ((0 > change))
963+                    then throw((("You need to attach " + fixedPoint(minWlgFee, 8)) + " WLGOLD as fee"))
964+                    else {
965+                        let changeActions = if ((change > 0))
966+                            then [ScriptTransfer(i.caller, change, wlgAssetId)]
967+                            else nil
968+                        let $t02777127932 = issueNftCustom(idxNamePickaxe, newRarityIdx, idxCollDig, newRarityIdx, totalBonus, idxDescrPickaxe, idxBonusTypeFp, i.caller)
969+                        let issueNftActions = $t02777127932._1
970+                        let nftAssetId = $t02777127932._2
971+                        let burned = size(burnActions)
972+                        let burnCounterActions = if ((burned == 0))
973+                            then nil
974+                            else [IntegerEntry(keyNftTotalBurned, (valueOrElse(getInteger(keyNftTotalBurned), 0) + burned))]
975+                        $Tuple2((((((issueNftActions ++ burnActions) ++ burnCounterActions) ++ prologActions) ++ changeActions) :+ ScriptTransfer(addressFromStringValue(getStringValue(wlgContract, teamAddrKey)), forTeam, wlgAssetId)), $Tuple2(nftAssetId, wlgRemain))
976+                        }
977+                }
978+    }
981979 
982980 
983981 
984982 @Callable(i)
985983 func openNftChest () = if ((i.caller != this))
986984     then throw("Permission denied")
987985     else $Tuple2(nil, 0)
988986 
989987 
github/deemru/w8io/026f985 
79.87 ms ◑