tx · 2NcKvAgbF6WbQQedZPYNRKY17h7AK6BR5FfRVLB1Hf5K

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.07600000 Waves

2023.07.20 01:18 [2673331] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2NcKvAgbF6WbQQedZPYNRKY17h7AK6BR5FfRVLB1Hf5K",
    "fee": 7600000,
    "feeAssetId": null,
    "timestamp": 1689805094336,
    "version": 2,
    "chainId": 84,
    "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm",
    "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX",
    "proofs": [
        "J5YH5bQSfJ8nRgbS62yAEyP5ef13xd2vZ4yE6pqGoRvu9yq9KQBDrrU8hPZoJYwSFJTVx7aNQTAHn7MhbZCczZP"
    ],
    "script": "base64:BgK0AQgCEgMKAQgSAwoBBBIAEgMKAQgSABIDCgEIEgQKAgEIEgQKAgEIEgQKAgICEgUKAwEBARIAEgQKAggIEgASBAoCAgISAwoBCBIDCgEIEgQKAggIEgMKARgSAwoBGBIECgIICBIECgIICBIDCgEIEgMKAQgSBQoDCAgIEgQKAggIEgcKBQEBAQEBEgMKAQESBQoDAQEIEgMKAQgSAwoBCBIAEgQKAggBEgQKAggBEgMKAQgSAM8BARRrZXlMYXN0QXJiVGltZUJ5VXNlcgEEYWRkcgkArAICAhBsYXN0QXJiVGltZVVzZXJfBQRhZGRyAAZTQ0FMRTgAgMLXLwAMeHBMZXZlbFNjYWxlAIAZAA94cExldmVsUmVjaXBQb3cAoB8AEm51bVBvaW50c09uTGV2ZWxVcAADAAxjaGFyU3RyZW5ndGgAAAAMY2hhckFjY3VyYWN5AAEADWNoYXJJbnRlbGxlY3QAAgANY2hhckVuZHVyYW5jZQADAA1jaGFyRGV4dGVyaXR5AAQAC05VTVNFR01FTlRTAAYACk5VTU1BSU5BVVgAAgAITUFYU0xPVFMAAgEMa2V5RHVja0NoYXJzAQtkdWNrQXNzZXRJZAkArAICAgpkdWNrQ2hhcnNfBQtkdWNrQXNzZXRJZAEJa2V5RHVja1hQAQtkdWNrQXNzZXRJZAkArAICAgdkdWNrWFBfBQtkdWNrQXNzZXRJZAEMa2V5RHVja0xldmVsAQtkdWNrQXNzZXRJZAkArAICAgpkdWNrTGV2ZWxfBQtkdWNrQXNzZXRJZAERa2V5RHVja0ZyZWVQb2ludHMBC2R1Y2tBc3NldElkCQCsAgICD2R1Y2tGcmVlUG9pbnRzXwULZHVja0Fzc2V0SWQBEGtleUR1Y2tFcXVpcG1lbnQBC2R1Y2tBc3NldElkCQCsAgICDmR1Y2tFcXVpcG1lbnRfBQtkdWNrQXNzZXRJZAEJa2V5VXNlclhQAQRhZGRyCQCsAgICB3VzZXJYUF8FBGFkZHIBDGtleVVzZXJMZXZlbAEEYWRkcgkArAICAgp1c2VyTGV2ZWxfBQRhZGRyARFrZXlVc2VyRnJlZVBvaW50cwEEYWRkcgkArAICAg91c2VyRnJlZVBvaW50c18FBGFkZHIAB3hwQ2xhaW0AoI0GAA94cFN1Y2Nlc3NGbGlnaHQA0IYDAAx4cEZhaWxGbGlnaHQAkE4ACHhwQ2FsbEVTAKCNBgAMeHBDdXN0b21OYW1lAMCWsQIACnhwTmV3U0xhbmQAgOHrFwAOeHBVcGdyYWRlSW5mcmEAoI0GAAd4cE1lcmdlAICt4gQACXhwT25ib2FyZACAreIEAAZ4cEhlYWwAkE4BCWxldmVsQnlYUAECeHAJAGsDBQx4cExldmVsU2NhbGUJAGwGBQJ4cAAEBQ94cExldmVsUmVjaXBQb3cABAAEBQRET1dOBQZTQ0FMRTgBCW1heEhlYWx0aAEFbGV2ZWwJAGQCAGQFBWxldmVsAQdsZXZlbFVwAgljdXJyTGV2ZWwFbmV3WFAECG5ld0xldmVsCQEJbGV2ZWxCeVhQAQUFbmV3WFAJAMwIAgUIbmV3TGV2ZWwJAMwIAgkAaAIFEm51bVBvaW50c09uTGV2ZWxVcAkAZQIFCG5ld0xldmVsBQljdXJyTGV2ZWwFA25pbAAKTEFORFBSRUZJWAIETEFORAAKRFVDS1BSRUZJWAIERFVDSwAKQVJUUFJFU0FMRQIHUFJFU0FMRQAGTlVNUkVTAAYAD0RBSUxZUkVTQllQSUVDRQCA+NIBAAlEQVlNSUxMSVMAgLiZKQAMV0hNVUxUSVBMSUVSAIDIr6AlAA9ERUZBVUxUTE9DQVRJT04CD0FmcmljYV9GX0FmcmljYQAQUkVTT1VSQ0VQUklDRU1JTgDVtQIACkVTU0VMTENPRUYACgAJcHJvZFR5cGVzCQDMCAICEEZpcnN0IEFpZCBLaXQgTDEJAMwIAgIQRmlyc3QgQWlkIEtpdCBMMgkAzAgCAhBGaXJzdCBBaWQgS2l0IEwzCQDMCAICC0JhY2twYWNrIEwxCQDMCAICC0JhY2twYWNrIEwyCQDMCAICC0JhY2twYWNrIEwzCQDMCAICDkZvb2QgUmF0aW9uIEwxCQDMCAICDkZvb2QgUmF0aW9uIEwyCQDMCAICDkZvb2QgUmF0aW9uIEwzCQDMCAICC0pldCBQYWNrIEwxCQDMCAICC0pldCBQYWNrIEwyCQDMCAICC0pldCBQYWNrIEwzCQDMCAICCVNoaWVsZCBMMQkAzAgCAglTaGllbGQgTDIJAMwIAgIJU2hpZWxkIEwzBQNuaWwACmNvbnRpbmVudHMJAMwIAgIIQW1lcmljYXMJAMwIAgIGRXVyb3BlCQDMCAICBEFzaWEJAMwIAgIGQWZyaWNhCQDMCAICB09jZWFuaWEFA25pbAAJQ09FRkYyTUFUAICt4gQAEHByb2R1Y3Rpb25NYXRyaXgJAMwIAgIlOF84XzhfMTdfMTdfNDJfMTJfMF8zMF8wLDAsMCwwLDAsMCwwXwkAzAgCAiU4XzhfOF8xN18xN180Ml8yNF8wXzYwXzAsMCw1LDIsMCwwLDBfCQDMCAICJzhfOF84XzE3XzE3XzQyXzM2XzBfMTIwXzAsMCwxMCw0LDAsMCwwXwkAzAgCAik4XzE5XzE5XzhfMjdfMTlfMjZfMV8yMF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAik4XzE5XzE5XzhfMjdfMTlfNTJfMV80MF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAik4XzE5XzE5XzhfMjdfMTlfNzhfMV84MF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAiI4XzhfOF84XzhfNjBfMTNfMl8yXzAsMCwwLDAsMCwwLDBfCQDMCAICIjhfOF84XzhfOF82MF8yNl8yXzRfMCwwLDAsMCwwLDAsMF8JAMwIAgIiOF84XzhfOF84XzYwXzM5XzJfOF8wLDAsMCwwLDAsMCwwXwkAzAgCAikzMF8zMF8zXzE3XzE3XzNfMzBfM18zMF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAikzMF8zMF8zXzE3XzE3XzNfNjBfM181MF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAikzMF8zMF8zXzE3XzE3XzNfOTBfM183MF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAisxOF8xOF8xMF8xOF8xOF8xOF8xMV80XzMwXzAsMCwwLDAsMCwwLDBfMjAxCQDMCAICKzE4XzE4XzEwXzE4XzE4XzE4XzIyXzRfNTBfMCwwLDAsMCwwLDAsMF8yMDEJAMwIAgIrMThfMThfMTBfMThfMThfMThfMzNfNF83MF8wLDAsMCwwLDAsMCwwXzIwMQUDbmlsAAlySWR4Q29lZmYABgAJcklkeFNsb3RzAAoADlBST0RVQ1RQS0dTSVpFAAoAC3doSWR4TGV2ZWxzAAAACHdoSWR4UmVzAAEACHdoSWR4TWF0AAIACXdoSWR4UHJvZAADAAl3aElkeExPRlQABAAJdm9sTG9ja2VkAAAAC3ZvbE9jY3VwaWVkAAEAB3ZvbEZyZWUAAgAIdm9sVG90YWwAAwAKYnBJZHhMZXZlbAAAAAhicElkeFJlcwABAAhicElkeE1hdAACAAlicElkeFByb2QAAwERa2V5TGFzdFR4SWRCeVVzZXIBBGFkZHIJAKwCAgIPbGFzdFR4SWRCeVVzZXJfBQRhZGRyARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBB2Fzc2V0SWQJAKwCAgIJbmZ0T3duZXJfBQdhc3NldElkARprZXlMYW5kQXNzZXRJZFRvQ3VzdG9tTmFtZQEHYXNzZXRJZAkArAICAhhsYW5kQ3VzdG9tTmFtZUJ5QXNzZXRJZF8FB2Fzc2V0SWQBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgILc3Rha2VkVGltZV8FB2Fzc2V0SWQBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgILaW5mcmFMZXZlbF8FB2Fzc2V0SWQBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgR0eXBlB2Fzc2V0SWQJALkJAgkAzAgCAg1sYW5kQXJ0U3RhdHVzCQDMCAIFBHR5cGUJAMwIAgUHYXNzZXRJZAUDbmlsAgFfASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwduZnRUeXBlB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIgc3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcl8FB25mdFR5cGUCAV8FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgESa2V5V2FyZWhvdXNlQnlMYW5kAQtsYW5kQXNzZXRJZAkArAICAgp3YXJlSG91c2VfBQtsYW5kQXNzZXRJZAEaa2V5RHVja0Fzc2V0SWRUb0N1c3RvbU5hbWUBB2Fzc2V0SWQJAKwCAgIYZHVja0N1c3RvbU5hbWVCeUFzc2V0SWRfBQdhc3NldElkARZrZXlBZGRyZXNzVG9DdXN0b21OYW1lAQRhZGRyCQCsAgICGGFjY291bnRDdXN0b21OYW1lQnlBZGRyXwUEYWRkcgEPa2V5QWRkcmVzc1JlZkJ5AQRhZGRyCQCsAgICCWFjY1JlZkJ5XwUEYWRkcgEca2V5T25ib2FyZEFydEFjdGl2YXRlZE9uRHVjawELZHVja0Fzc2V0SWQJAKwCAgIab25ib2FyZEFydEFjdGl2YXRlZE9uRHVja18FC2R1Y2tBc3NldElkARxrZXlPbmJvYXJkQXJ0RHVja0FjdGl2YXRlZEJ5AQRhZGRyCQCsAgICGm9uYm9hcmRBcnRBY3RpdmF0ZWREdWNrQnlfBQRhZGRyARNrZXlBZGRyZXNzUmVmZXJyYWxzAQRhZGRyCQCsAgICDWFjY1JlZmVycmFsc18FBGFkZHIBEGtleUR1Y2tJZFRvT3duZXIBB2Fzc2V0SWQJAKwCAgIKZHVja093bmVyXwUHYXNzZXRJZAEUa2V5U3Rha2VkRHVja0J5T3duZXIBCW93bmVyQWRkcgkArAICAhJzdGFrZWREdWNrQnlPd25lcl8FCW93bmVyQWRkcgERa2V5QmFja3BhY2tCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICCWJhY2tQYWNrXwULZHVja0Fzc2V0SWQBD2tleUR1Y2tMb2NhdGlvbgELZHVja0Fzc2V0SWQJAKwCAgINZHVja0xvY2F0aW9uXwULZHVja0Fzc2V0SWQBDWtleUR1Y2tIZWFsdGgBC2R1Y2tBc3NldElkCQCsAgICC2R1Y2tIZWFsdGhfBQtkdWNrQXNzZXRJZAEKa2V5QmxvY2tlZAACEGNvbnRyYWN0c0Jsb2NrZWQBFWtleVVzZXJHd2xSZWxlYXNlVGltZQEIdXNlckFkZHIJAKwCAgIaJXMlc19fdXNlckd3bFJlbGVhc2VUaW1lX18FCHVzZXJBZGRyAQ5rZXlFc1dhcmVob3VzZQACGmVtZXJnZW5jeVdhcmVob3VzZVByb2R1Y3RzAApsb2NJZHhUeXBlAAEACGxvY0lkeElkAAIBEmdldFJlY2lwZU1hdGVyaWFscwEGcmVjaXBlCQBoAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnJlY2lwZQUJcklkeENvZWZmBQlDT0VGRjJNQVQAD0tTQUxMT1dYUExFVkVMUwYABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgARSW5mcmFVcGdyYWRlQ29zdFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgMivoCUDCQAAAgEBVAUHJG1hdGNoMACAwtcvCQACAQINVW5rbm93biBjaGFpbgAOYXJiaXRyYWdlRGVsYXkEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAwM8kAwkAAAIBAVQFByRtYXRjaDAA4NQDCQACAQINVW5rbm93biBjaGFpbgADU0VQAgJfXwAFTVVMVDYAwIQ9AAVNVUxUOACAwtcvAAVTU0laRQAZAAVNU0laRQBkAAVMU0laRQDhAQAGWExTSVpFAJADAAdYWExTSVpFAPEEAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQARSWR4Q2ZnRWNvbm9teURhcHAAAgAUSWR4Q2ZnR292ZXJuYW5jZURhcHAAAwANSWR4Q2ZnV2xnRGFwcAAEAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALZ292Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRRJZHhDZmdHb3Zlcm5hbmNlRGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAApyZWNMYW5kTnVtAAAAC3JlY0xhbmRTaXplAAEAC3JlY1RlcnJhaW5zAAIADHJlY0NvbnRpbmVudAADARFrZXlSZXNQcm9wb3J0aW9ucwACE3Jlc1R5cGVzUHJvcG9ydGlvbnMBFWtleVN0YWtlZExhbmRzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICE3N0YWtlZExhbmRzQnlPd25lcl8FCW93bmVyQWRkcgEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICFHN0YWtlZFBpZWNlc0J5T3duZXJfBQlvd25lckFkZHIBCGFzU3RyaW5nAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ9udW1QaWVjZXNCeVNpemUBCGxhbmRTaXplBAckbWF0Y2gwBQhsYW5kU2l6ZQMJAAACAgFTBQckbWF0Y2gwBQVTU0laRQMJAAACAgFNBQckbWF0Y2gwBQVNU0laRQMJAAACAgFMBQckbWF0Y2gwBQVMU0laRQMJAAACAgJYTAUHJG1hdGNoMAUGWExTSVpFAwkAAAICA1hYTAUHJG1hdGNoMAUHWFhMU0laRQkAAgECEVVua25vd24gbGFuZCBzaXplAA1pbmN1YmF0b3JBZGRyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUEVrdFZ1eDJSaGNoU042M0RzRG80YjRtejRRcXpLU2VEdgMJAAACAQFUBQckbWF0Y2gwBQR0aGlzCQACAQINVW5rbm93biBjaGFpbgALYnJlZWRlckFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQRFZ1VTQ1SDdFaDVkbXROYm5STlJTdEd3VUxBN05ZNkhiAwkAAAIBAVQFByRtYXRjaDAFBHRoaXMJAAIBAg1Vbmtub3duIGNoYWluAANwdWIBIE9T4ho/VKjWnVJOEx1GJ1W9s1PzLHvJVFSw/0PBtBQoAAhtZWRLaXRIcAkAzAgCAB4JAMwIAgA8CQDMCAIAeAUDbmlsABFGSVZFTUlOVVRFU01JTExJUwDgpxIADFJFTkFNSU5HQ09TVADAlrECAApNQVhOQU1FTEVOADIAFUluZnJhVXBncmFkZUNvc3RTVXNkdACAreIEAAxFWFBNQVRFUklBTFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAApt2C7asHAwkAAAIBAVQFByRtYXRjaDAAqqeBswkJAAIBAg1Vbmtub3duIGNoYWluAAdFWFBVU0RUBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAIDlmncDCQAAAgEBVAUHJG1hdGNoMACA5Zp3CQACAQINVW5rbm93biBjaGFpbgAFRklWRVgJALYCAQAFAAdUV0VOVFlYCQC2AgEAFAAIVFdFTlRZMlgJALYCAQkAaAIAFAAUAAhUV0VOVFkzWAkAtgIBCQBoAgkAaAIAFAAUABQACFRXRU5UWTRYCQC2AgEJAGgCCQBoAgkAaAIAFAAUABQAFAAIVFdFTlRZNVgJALYCAQkAaAIJAGgCCQBoAgkAaAIAFAAUABQAFAAUAA9QUkVTQUxFTlVNTEFORFMA9AMBEmtleU5leHRGcmVlTGFuZE51bQACC25leHRMYW5kTnVtARBrZXlMYW5kVG9Bc3NldElkAQdsYW5kTnVtCQCsAgICDGxhbmRUb0Fzc2V0XwUHbGFuZE51bQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBBG5hbWUJAKwCAgIRbGFuZEJ5Q3VzdG9tTmFtZV8FBG5hbWUBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIHYXNzZXRJZAlvd25lckFkZHIJAKwCAgkArAICCQCsAgICHGluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcl8FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMEdHlwZQdhc3NldElkCW93bmVyQWRkcgkAuQkCCQDMCAICImxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIJAMwIAgUEdHlwZQkAzAgCBQdhc3NldElkCQDMCAIFCW93bmVyQWRkcgUDbmlsAgFfARFrZXlMYW5kTnVtVG9Pd25lcgEHbGFuZE51bQkArAICAgpsYW5kT3duZXJfBQdsYW5kTnVtARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEEbmFtZQkArAICAhFkdWNrQnlDdXN0b21OYW1lXwUEbmFtZQEWa2V5Q3VzdG9tTmFtZVRvQWRkcmVzcwEEbmFtZQkArAICAhRhY2NvdW50QnlDdXN0b21OYW1lXwUEbmFtZQEJa2V5T2xkaWVzAAIKb2xkaWVzTGlzdAALY2xhaW1Nb2RlV2gAAAANY2xhaW1Nb2RlRHVjawABABNjbGFpbU1vZGVXaFRoZW5EdWNrAAIACGZsSGVhbHRoAAAAC2ZsVGltZXN0YW1wAAUAB2ZsQm9udXMABgALZmxQcm9kc1VzZWQABwEHbmZ0TmFtZQIHbGFuZE51bQhsYW5kU2l6ZQkArAICCQCsAgIFCkxBTkRQUkVGSVgFB2xhbmROdW0FCGxhbmRTaXplARNkaXN0cmlidXRlQnlXZWlnaHRzAgV0b3RhbAd3ZWlnaHRzBANzdW0JAGQCCQBkAgkAZAIJAGQCCQBkAgkAkQMCBQd3ZWlnaHRzAAAJAJEDAgUHd2VpZ2h0cwABCQCRAwIFB3dlaWdodHMAAgkAkQMCBQd3ZWlnaHRzAAMJAJEDAgUHd2VpZ2h0cwAECQCRAwIFB3dlaWdodHMABQMJAGcCAAAFA3N1bQkAAgECEFplcm8gd2VpZ2h0cyBzdW0EBW5vcm02CQBrAwUFdG90YWwFBU1VTFQ2BQNzdW0KAQpub3JtYWxpemVyAgNhY2MEZWxlbQkAzQgCBQNhY2MJAGsDBQRlbGVtBQVub3JtNgUFTVVMVDYKAAIkbAUHd2VpZ2h0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKbm9ybWFsaXplcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgESZ2V0TmVlZGVkTWF0ZXJpYWxzAQV0b3RhbAQFcHJvcHMJALUJAgkBBXZhbHVlAQkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgFfAwkBAiE9AgkAkAMBBQVwcm9wcwUGTlVNUkVTCQACAQIWV3JvbmcgcHJvcG9ydGlvbnMgZGF0YQQBcgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAwkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABQUDbmlsCQETZGlzdHJpYnV0ZUJ5V2VpZ2h0cwIFBXRvdGFsBQFyARFzdWJ0cmFjdE1hdGVyaWFscwMMc2hvdWxkVXNlTWF0A2hhcwl0b3RhbE5lZWQEBG5lZWQJARJnZXROZWVkZWRNYXRlcmlhbHMBBQl0b3RhbE5lZWQKAQpzdWJ0cmFjdG9yAgNhY2MDaWR4BAZyZXN1bHQJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDaGFzBQNpZHgJAJEDAgUEbmVlZAUDaWR4AwkAZgIAAAUGcmVzdWx0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICGE5vdCBlbm91Z2ggbWF0ZXJpYWwgaWR4PQkApAMBBQNpZHgCCywgeW91IGhhdmUgCQCRAwIFA2hhcwUDaWR4AgssIGJ1dCBuZWVkIAkApAMBCQCRAwIFBG5lZWQFA2lkeAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0AwUMc2hvdWxkVXNlTWF0CgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKc3VidHJhY3RvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgUDaGFzARBzdWJ0cmFjdFByb2R1Y3RzAgRwSGFzBXBVc2VkAwkAAAIFBXBVc2VkAgAFBHBIYXMEBXBMaXN0AwkAAAIFBHBIYXMCAAUDbmlsCQC1CQIFBHBIYXMCAV8KAQRzdWJQAgNhY2MEaXRlbQQBaggFA2FjYwJfMQoBCWNoZWNrVXNlZAICYWMGaWR4QW10BAVwYXJ0cwkAtQkCBQZpZHhBbXQCASwDCQECIT0CCQCQAwEFBXBhcnRzAAIJAAIBAihJbmNvcnJlY3QgZm9ybWF0LCBzaG91bGQgYmUgaW5kZXgsYW1vdW50BANpZHgJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAAAwMJAGYCAAAFA2lkeAYJAGcCBQNpZHgJAJADAQUQcHJvZHVjdGlvbk1hdHJpeAkAAgECE1Vua25vd24gcHJvZHVjdCBpZHgDCQECIT0CBQNpZHgFAWoFAmFjBANhbXQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAwkAZwIAAAUDYW10CQACAQIaUGFzcyBvbmx5IHBvc2l0aXZlIGFtb3VudHMJAGQCBQJhYwUDYW10BAFhCgACJGwJALUJAgUFcFVzZWQCAV8KAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWNoZWNrVXNlZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgQEY3VycgMJAGYCCQCQAwEFBXBMaXN0BQFqCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcExpc3QFAWoAAAQGbmV3QW10AwkAZwIFBGN1cnIFAWEJAGUCBQRjdXJyBQFhCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICCVlvdSBoYXZlIAkApAMBBQRjdXJyAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUBagITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQFhCQCUCgIJAGQCBQFqAAEJAM0IAggFA2FjYwJfMgkApAMBBQZuZXdBbXQEB25ld1Byb2QKAAIkbAUQcHJvZHVjdGlvbk1hdHJpeAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAABQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBHN1YlACBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgkAuQkCCAUHbmV3UHJvZAJfMgIBXwEOcHJvZFN0clRvQnl0ZXMBB3Byb2RTdHIEBXBMaXN0AwkAAAIFB3Byb2RTdHICAAUDbmlsCQC1CQIFB3Byb2RTdHICAV8KAQR0b0JWAgNhY2MGcmVjaXBlBAFqCQBpAgkAyAEBBQNhY2MACAQEY3VycgMJAGYCCQCQAwEFBXBMaXN0BQFqCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcExpc3QFAWoAAAkAywECBQNhY2MJAJoDAQUEY3VycgoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAEACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQR0b0JWAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIBDmJ5dGVzVG9Qcm9kU3RyAQJidgoBBmZyb21CVgIDYWNjBnJlY2lwZQQBagkAkAMBBQNhY2MEAWIJAMkBAgkAygECBQJidgkAaAIACAUBagAICQDNCAIFA2FjYwkApAMBCQCxCQEFAWIJALkJAgoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQZmcm9tQlYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgIBXwEIYWRkUHJvZEIGBmlkeENudAVwTGlzdAppc1Bvc2l0aXZlB3NlZ21lbnQHbWFpbkF1eARzbG90BAVwYXJ0cwkAtQkCBQZpZHhDbnQCAToDCQECIT0CCQCQAwEFBXBhcnRzAAIJAAIBAihJbmNvcnJlY3QgZm9ybWF0LCBzaG91bGQgYmUgaW5kZXg6YW1vdW50BApwcm9kdWN0SWR4CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAAQFY291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAwMJAGYCAAAFCnByb2R1Y3RJZHgGCQBnAgUKcHJvZHVjdElkeAkAkAMBBRBwcm9kdWN0aW9uTWF0cml4CQACAQITVW5rbm93biBwcm9kdWN0IGlkeAMJAGYCAAAFBWNvdW50CQACAQIXQ291bnQgY2FuJ3QgYmUgbmVnYXRpdmUDCQAAAgUFY291bnQAAAkAlAoCBQVwTGlzdAcEBGhlYWQJAMkBAgUFcExpc3QJAGgCAAgFCnByb2R1Y3RJZHgEBGN1cnIJALEJAQkAyQECCQDKAQIFBXBMaXN0CQBoAgAIBQpwcm9kdWN0SWR4AAgEBHRhaWwJAMoBAgUFcExpc3QJAGgCAAgJAGQCBQpwcm9kdWN0SWR4AAEDAwkBASEBBQppc1Bvc2l0aXZlCQBmAgUFY291bnQFBGN1cnIHCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICCVlvdSBoYXZlIAkApAMBBQRjdXJyAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUKcHJvZHVjdElkeAITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQVjb3VudAQJaXNCaWdJdGVtAwkBASEBBQppc1Bvc2l0aXZlBAZjb21wYXQJAJEDAgkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgFCnByb2R1Y3RJZHgCAV8FCXJJZHhTbG90cwMJAAACBQZjb21wYXQCAAkAAgECF0l0ZW0gY2Fubm90IGJlIGVxdWlwcGVkBAFjCQENcGFyc2VJbnRWYWx1ZQEFBmNvbXBhdAQEY1NlZwkAaQIFAWMAZAMJAQIhPQIFB3NlZ21lbnQFBGNTZWcJAAIBAhRTZWdtZW50IGluY29tcGF0aWJsZQQIY01haW5BdXgJAGkCCQBqAgUBYwBkAAoDCQECIT0CBQdtYWluQXV4BQhjTWFpbkF1eAkAAgECEVNsb3QgaW5jb21wYXRpYmxlBAljTnVtU2xvdHMJAGoCBQFjAAoDAwkBAiE9AgUEc2xvdAAACQBmAgUJY051bVNsb3RzAAEHCQACAQIeQmlnIGl0ZW1zIHNob3VsZCBvY2N1cHkgc2xvdCAwCQBmAgUJY051bVNsb3RzAAEHCQCUCgIJAMsBAgkAywECBQRoZWFkCQCaAwEJAGQCBQRjdXJyAwUKaXNQb3NpdGl2ZQUFY291bnQJAQEtAQUFY291bnQFBHRhaWwFCWlzQmlnSXRlbQELc2xvdHNHcm91cEIFAWcEYnBJbgppc1Bvc2l0aXZlB3NlZ21lbnQHbWFpbkF1eAMJAQIhPQIFAWcCAAQFc2xvdHMJALUJAgUBZwIBLAMJAGYCCQCQAwEFBXNsb3RzBQhNQVhTTE9UUwkAAgECEldyb25nIHNsb3RzIGZvcm1hdAQCczAJAJEDAgUFc2xvdHMAAAQCczEDCQBmAgkAkAMBBQVzbG90cwABCQCRAwIFBXNsb3RzAAECAAMDCQAAAgUCczACAAkAAAIFAnMxAgAHBQRicEluBAV0bXBTMAMJAQIhPQIFAnMwAgAJAQhhZGRQcm9kQgYFAnMwBQRicEluBQppc1Bvc2l0aXZlBQdzZWdtZW50BQdtYWluQXV4AAAJAJQKAgUEYnBJbgcDCQECIT0CBQJzMQIAAwgFBXRtcFMwAl8yCQACAQIeQmlnIGl0ZW0gYWxyZWFkeSBvY2N1cGllcyBzbG90CAkBCGFkZFByb2RCBgUCczEIBQV0bXBTMAJfMQUKaXNQb3NpdGl2ZQUHc2VnbWVudAUHbWFpbkF1eAABAl8xCAUFdG1wUzACXzEFBGJwSW4BBmRyZXNzQgMHc2VnTGlzdAZwQnl0ZXMKaXNQb3NpdGl2ZQoBB3NlZ21lbnQCA2FjYwNzZWcEAWoIBQNhY2MCXzEEB21haW5BdXgJALUJAgUDc2VnAgE7AwkBAiE9AgkAkAMBBQdtYWluQXV4BQpOVU1NQUlOQVVYCQACAQIUV3Jvbmcgc2VnbWVudCBmb3JtYXQEAW0JAJEDAgUHbWFpbkF1eAAABAFhCQCRAwIFB21haW5BdXgAAQMDCQAAAgUBbQIACQAAAgUBYQIABwkAlAoCCQBkAgUBagABCAUDYWNjAl8yBAR0bXBNCQELc2xvdHNHcm91cEIFBQFtCAUDYWNjAl8yBQppc1Bvc2l0aXZlBQFqAAAJAJQKAgkAZAIFAWoAAQkBC3Nsb3RzR3JvdXBCBQUBYQUEdG1wTQUKaXNQb3NpdGl2ZQUBagABCAoAAiRsBQdzZWdMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAFBnBCeXRlcwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHc2VnbWVudAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgJfMgEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQIcHJvcExpc3QNdGVycmFpbkNvdW50cw1sYW5kU2l6ZUluZGV4BHNpZ24DCQECIT0CCQCQAwEFCHByb3BMaXN0BQZOVU1SRVMJAAIBAhZXcm9uZyBwcm9wb3J0aW9ucyBkYXRhCgEHdXBkYXRlcgIDYWNjAWkEBnJlc3VsdAkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9wTGlzdAUBaQkAaAIJAGgCBQRzaWduCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgDCQBmAgAABQZyZXN1bHQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICFlBhbmljISBQaWVjZXMgb2YgdHlwZT0JAKQDAQUBaQIHLCBzaWduPQkApAMBBQRzaWduAhQsICB0ZXJyYWluQ291bnRzW2ldPQkApAMBCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkCECwgbGFuZFNpemVJbmRleD0JAKQDAQUNbGFuZFNpemVJbmRleAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0BAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHdXBkYXRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgkAuQkCBQFyAgFfARF1cGRhdGVQcm9wb3J0aW9ucwMNdGVycmFpbkNvdW50cw1sYW5kU2l6ZUluZGV4BHNpZ24ECHByb3BMaXN0CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBEWtleVJlc1Byb3BvcnRpb25zAAILMF8wXzBfMF8wXzACAV8JARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAUIcHJvcExpc3QFDXRlcnJhaW5Db3VudHMFDWxhbmRTaXplSW5kZXgFBHNpZ24BDWNvdW50VGVycmFpbnMBCHRlcnJhaW5zCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUEAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFCAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQwABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUQAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFFAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRgABBQNuaWwBBmFkZFJlcwUKY3VycmVudFJlcw10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4F2RhaWx5QnlQaWVjZVdpdGhCb251c2VzCgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMFCURBWU1JTExJUwkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4CQDNCAIFA2FjYwkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmN1cnJlbnRSZXMFAWkFCXJlc09mVHlwZQQBcgoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQC5CQIFAXICAV8BCXZpcnRDbGFpbQQNdGVycmFpbkNvdW50cwlkZWx0YVRpbWUNbGFuZFNpemVJbmRleBdkYWlseUJ5UGllY2VXaXRoQm9udXNlcwoBBWFkZGVyAgNhY2MBaQQJcmVzT2ZUeXBlCQBoAgkAaAIJAGsDBQlkZWx0YVRpbWUFF2RhaWx5QnlQaWVjZVdpdGhCb251c2VzBQlEQVlNSUxMSVMJAJEDAgUNdGVycmFpbkNvdW50cwUBaQUNbGFuZFNpemVJbmRleAkAlAoCCQDNCAIIBQNhY2MCXzEFCXJlc09mVHlwZQkAZAIIBQNhY2MCXzIFCXJlc09mVHlwZQoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgENZGlzdHJpYnV0ZVJlcwQMY3VycmVudFdoUmVzDmN1cnJlbnRQYWNrUmVzCnJlc1RvQ2xhaW0Ld2hTcGFjZUxlZnQEDnJlc0xpc3RUb0NsYWltCAUKcmVzVG9DbGFpbQJfMQQMcmVzQW1Ub0NsYWltCAUKcmVzVG9DbGFpbQJfMgMJAAACBQxyZXNBbVRvQ2xhaW0AAAkAlAoCCQC5CQIFDGN1cnJlbnRXaFJlcwIBXwkAuQkCBQ5jdXJyZW50UGFja1JlcwIBXwMJAGcCBQt3aFNwYWNlTGVmdAUMcmVzQW1Ub0NsYWltCgEIYWRkTGlzdHMCA2FjYwFpCQDNCAIFA2FjYwkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDGN1cnJlbnRXaFJlcwUBaQkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQQBcgoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGFkZExpc3RzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQCUCgIJALkJAgUBcgIBXwkAuQkCBQ5jdXJyZW50UGFja1JlcwIBXwoBDGFkZFBhcnRMaXN0cwIDYWNjAWkEBndoUGFydAkAawMJAJEDAgUOcmVzTGlzdFRvQ2xhaW0FAWkFC3doU3BhY2VMZWZ0BQxyZXNBbVRvQ2xhaW0JAJQKAgkAzQgCCAUDYWNjAl8xCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUMY3VycmVudFdoUmVzBQFpBQZ3aFBhcnQJAM0IAggFA2FjYwJfMgkApAMBCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ5jdXJyZW50UGFja1JlcwUBaQkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQUGd2hQYXJ0BAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDGFkZFBhcnRMaXN0cwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgkAlAoCCQC5CQIIBQFyAl8xAgFfCQC5CQIIBQFyAl8yAgFfAQNhYnMBAXgDCQDAAgIFAXgJALYCAQAABQF4CQC+AgEFAXgABGZyZXEJAMwIAgkAzAgCAAYJAMwIAgAJCQDMCAIADgkAzAgCAA8JAMwIAgAQBQNuaWwJAMwIAgkAzAgCAAUJAMwIAgAICQDMCAIADQkAzAgCAA4JAMwIAgAPBQNuaWwJAMwIAgkAzAgCAAEJAMwIAgAECQDMCAIACQkAzAgCAAoJAMwIAgAPBQNuaWwJAMwIAgkAzAgCAAEJAMwIAgAGCQDMCAIABwkAzAgCAA8JAMwIAgATBQNuaWwJAMwIAgkAzAgCAAQJAMwIAgAHCQDMCAIACAkAzAgCAA0JAMwIAgASBQNuaWwFA25pbAEHZ2VuQ2hhcgIBbgVmcmVxcwQDcmVtCQCgAwEJALsCAgUBbgUHVFdFTlRZWAQGbGV0dGVyAwkAZgIJAJEDAgUFZnJlcXMAAAUDcmVtAgFBAwkAZgIJAJEDAgUFZnJlcXMAAQUDcmVtAgFCAwkAZgIJAJEDAgUFZnJlcXMAAgUDcmVtAgFDAwkAZgIJAJEDAgUFZnJlcXMAAwUDcmVtAgFEAwkAZgIJAJEDAgUFZnJlcXMABAUDcmVtAgFFAgFGBQZsZXR0ZXIBC2dlblRlcnJhaW5zAgRzZWVkDGNvbnRpbmVudElkeAQBZgkAkQMCBQRmcmVxBQxjb250aW5lbnRJZHgKARB0ZXJyYWluR2VuZXJhdG9yAgNhY2MEZWxlbQkAlAoCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAggFA2FjYwJfMQkBB2dlbkNoYXICCAUDYWNjAl8yBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUHVFdFTlRZWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTJYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZM1gFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFk0WAUBZgkAugICCAUDYWNjAl8yBQhUV0VOVFk1WAQBdAoAAiRsCQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgIACQC6AgIFBHNlZWQFBUZJVkVYCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARB0ZXJyYWluR2VuZXJhdG9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQgFAXQCXzEBC2dldEJhY2twYWNrAQVicEtleQQBcAkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEFBWJwS2V5AhowOjBfMF8wXzBfMF8wOjBfMF8wXzBfMF8wOgIBOgkAzAgCCQCkAwEJAQt2YWx1ZU9yRWxzZQIJALYJAQkAkQMCBQFwBQpicElkeExldmVsAAAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQhicElkeFJlcwIBXwUGTlVNUkVTCQCRAwIFAXAFCGJwSWR4UmVzAgswXzBfMF8wXzBfMAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCGJwSWR4TWF0AgFfBQZOVU1SRVMJAJEDAgUBcAUIYnBJZHhNYXQCCzBfMF8wXzBfMF8wCQDMCAIJAJEDAgUBcAUJYnBJZHhQcm9kBQNuaWwBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQl2b2xQcmVmaXgEBXBhcnRzCQC1CQIFCXZvbFByZWZpeAIBXwkAaAIJAGgCBQxXSE1VTFRJUExJRVIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAAEXZ2V0V2FyZWhvdXNlT2NjdXBpZWRWb2wBCWN1cnJlbnRXaAQFZ29vZHMJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QKAQlzdW1SZXNNYXQCA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0KAQdzdW1Qcm9kAgNhY2MEaXRlbQQDaWR4CAUDYWNjAl8xBARwa2dzCQBpAgkAZQIJAGQCCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0FDlBST0RVQ1RQS0dTSVpFAAEFDlBST0RVQ1RQS0dTSVpFCQCUCgIJAGQCBQNpZHgAAQkAZAIIBQNhY2MCXzIJAGgCBQRwa2dzBQVNVUxUOAQId2hSZXNWb2wKAAIkbAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhSZXMCAV8KAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCXN1bVJlc01hdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQId2hNYXRWb2wKAAIkbAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQCAV8KAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCXN1bVJlc01hdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQKd2hHb29kc1ZvbAMJAAACBQVnb29kcwIAAAAICgACJGwJALwJAgUFZ29vZHMCAV8KAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAAACgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdzdW1Qcm9kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADICXzIJAGQCCQBkAgUId2hSZXNWb2wFCHdoTWF0Vm9sBQp3aEdvb2RzVm9sAQxnZXRXYXJlaG91c2UDBXdoS2V5CWxhbmRJbmRleAppbmZyYUxldmVsBAl2b2xQcmVmaXgJAKwCAgkArAICCQCkAwEFCWxhbmRJbmRleAIBXwkApAMBBQppbmZyYUxldmVsBAd3aFRvdGFsCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBBQl2b2xQcmVmaXgEBXdoU3RyCQELdmFsdWVPckVsc2UCCQCiCAEFBXdoS2V5CQCsAgIFCXZvbFByZWZpeAIbOjBfMF8wXzBfMF8wOjBfMF8wXzBfMF8wOjowBAJ3aAkAvAkCBQV3aFN0cgIBOgQKd2hPY2N1cGllZAkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUCd2gEBndoTG9mdAMJAGYCAAUJAJADAQUCd2gJALkJAgkAzAgCAgEwCQDMCAIJAKQDAQUKd2hPY2N1cGllZAkAzAgCCQCkAwEJAGUCBQd3aFRvdGFsBQp3aE9jY3VwaWVkCQDMCAIJAKQDAQUHd2hUb3RhbAUDbmlsAgFfBARsb2Z0CQC1CQIJAJEDAgUCd2gFCXdoSWR4TE9GVAIBXwQId2hMb2NrZWQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQl2b2xMb2NrZWQEA29jYwMJAGYCCQCQAwEFBGxvZnQAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkBQp3aE9jY3VwaWVkCQC5CQIJAMwIAgkApAMBBQh3aExvY2tlZAkAzAgCCQCkAwEFA29jYwkAzAgCCQCkAwEJAGUCCQBlAgUHd2hUb3RhbAUId2hMb2NrZWQFA29jYwkAzAgCCQCkAwEFB3doVG90YWwFA25pbAIBXwkAzAgCCQCRAwIFAndoBQt3aElkeExldmVscwkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAndoBQh3aElkeFJlcwIBXwUGTlVNUkVTCQCRAwIFAndoBQh3aElkeFJlcwILMF8wXzBfMF8wXzAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQJ3aAUId2hJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQJ3aAUId2hJZHhNYXQCCzBfMF8wXzBfMF8wCQDMCAIJAJEDAgUCd2gFCXdoSWR4UHJvZAkAzAgCBQZ3aExvZnQFA25pbAEVZ2V0V2FyZWhvdXNlU3BhY2VMZWZ0AQljdXJyZW50V2gEC29jY3VwaWVkVm9sCQEXZ2V0V2FyZWhvdXNlT2NjdXBpZWRWb2wBBQljdXJyZW50V2gED2N1cnJXaExvY2tlZFZvbAkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAIBXwUJdm9sTG9ja2VkCQBlAgkAZQIJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwULb2NjdXBpZWRWb2wFD2N1cnJXaExvY2tlZFZvbAEIdG9Wb2x1bWUCBmFtb3VudAdwa2dTaXplBARwa2dzAwkAZwIFBmFtb3VudAAACQBpAgkAZQIJAGQCBQZhbW91bnQFB3BrZ1NpemUAAQUHcGtnU2l6ZQkBAS0BCQBpAgkAZQIJAGQCCQEBLQEFBmFtb3VudAUHcGtnU2l6ZQABBQdwa2dTaXplCQBoAgUEcGtncwUFTVVMVDgBCW1vdmVTdHVmZgMKY2FyZ29QYXJ0cwljdXJyZW50V2gLY3VycmVudFBhY2sDCQECIT0CCQCQAwEFCmNhcmdvUGFydHMAAwkAAgECNGNhcmdvTGlzdFN0ciBzaG91bGQgY29udGFpbiBleGFjdGx5IDIgJzonIHNlcGFyYXRvcnMECHJlc1BhcnRzCQC1CQIJAJEDAgUKY2FyZ29QYXJ0cwAAAgFfBAhtYXRQYXJ0cwkAtQkCCQCRAwIFCmNhcmdvUGFydHMAAQIBXwQJcHJvZFBhcnRzAwkAAAIJAJEDAgUKY2FyZ29QYXJ0cwACAgAFA25pbAkAtQkCCQCRAwIFCmNhcmdvUGFydHMAAgIBXwMJAQIhPQIJAJADAQUIcmVzUGFydHMFBk5VTVJFUwkAAgECIEFsbCA2IHJlc291cmNlcyBzaG91bGQgYmUgcGFzc2VkAwkBAiE9AgkAkAMBBQhtYXRQYXJ0cwUGTlVNUkVTCQACAQIgQWxsIDYgbWF0ZXJpYWxzIHNob3VsZCBiZSBwYXNzZWQEC3doU3BhY2VMZWZ0CQEVZ2V0V2FyZWhvdXNlU3BhY2VMZWZ0AQUJY3VycmVudFdoBAljdXJyV2hSZXMJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfBAljdXJyV2hNYXQJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0AgFfBApjdXJyV2hQcm9kAwkAAAIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAAUDbmlsCQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAV8EDmN1cnJlbnRQYWNrUmVzCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBA5jdXJyZW50UGFja01hdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQPY3VycmVudFBhY2tQcm9kAwkAAAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIABQNuaWwJALUJAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgFfCgEDbXZSAgNhY2MEaXRlbQQBaQgFA2FjYwJfMQQCYW0JAQ1wYXJzZUludFZhbHVlAQUEaXRlbQQDd2hyCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJY3VycldoUmVzBQFpBANicHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ5jdXJyZW50UGFja1JlcwUBaQMJAAACBQJhbQAACQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkAkQMCBQljdXJyV2hSZXMFAWkJAM0IAggFA2FjYwJfMwkAkQMCBQ5jdXJyZW50UGFja1JlcwUBaQgFA2FjYwJfNAMJAGYCBQJhbQAAAwkAZgIFAmFtBQNicHIJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAFBGl0ZW0CGSBmcm9tIGJhY2twYWNrLCBidXQgb25seSAJAKQDAQUDYnByAgogYXZhaWxhYmxlCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2hyBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicHIFAmFtCQBkAggFA2FjYwJfNAUCYW0DCQBmAgkBAS0BBQJhbQUDd2hyCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgCQCkAwEJAQEtAQUCYW0CGiBmcm9tIHdhcmVob3VzZSwgYnV0IG9ubHkgCQCkAwEFA3docgIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docgUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnByBQJhbQkAZAIIBQNhY2MCXzQFAmFtBAFyCgACJGwFCHJlc1BhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAFA25pbAUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA212UgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgoBA212TQIDYWNjBGl0ZW0EAWkIBQNhY2MCXzEEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3dobQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWN1cnJXaE1hdAUBaQQDYnBtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOY3VycmVudFBhY2tNYXQFAWkDCQAAAgUCYW0AAAkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAJEDAgUJY3VycldoTWF0BQFpCQDNCAIIBQNhY2MCXzMJAJEDAgUOY3VycmVudFBhY2tNYXQFAWkIBQNhY2MCXzQDCQBmAgUCYW0AAAMJAGYCBQJhbQUDYnBtCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgBQRpdGVtAhkgZnJvbSBiYWNrcGFjaywgYnV0IG9ubHkgCQCkAwEFA2JwbQIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3dobQUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnBtBQJhbQkAZAIIBQNhY2MCXzQFAmFtAwkAZgIJAQEtAQUCYW0FA3dobQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFAmFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aG0CCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aG0FAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwbQUCYW0JAGQCCAUDYWNjAl80BQJhbQQBbQoAAiRsBQhtYXRQYXJ0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAABQNuaWwFA25pbAgFAXICXzQKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA212TQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgoBA212UAIDYWNjBGl0ZW0EAWkIBQNhY2MCXzEEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3docAMJAGYCCQCQAwEFCmN1cnJXaFByb2QFAWkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpjdXJyV2hQcm9kBQFpAAAEA2JwcAMJAGYCCQCQAwEFD2N1cnJlbnRQYWNrUHJvZAUBaQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFD2N1cnJlbnRQYWNrUHJvZAUBaQAAAwkAAAIFAmFtAAAJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEFA3docAkAzQgCCAUDYWNjAl8zCQCkAwEFA2JwcAgFA2FjYwJfNAMJAGYCBQJhbQAAAwkAZgIFAmFtBQNicHAJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAFBGl0ZW0CGSBmcm9tIGJhY2twYWNrLCBidXQgb25seSAJAKQDAQUDYnBwAgogYXZhaWxhYmxlBAhkZWx0YVZvbAkAZQIJAQh0b1ZvbHVtZQIJAGQCBQN3aHAFAmFtBQ5QUk9EVUNUUEtHU0laRQkBCHRvVm9sdW1lAgUDd2hwBQ5QUk9EVUNUUEtHU0laRQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docAUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnBwBQJhbQkAZAIIBQNhY2MCXzQFCGRlbHRhVm9sAwkAZgIJAQEtAQUCYW0FA3docAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFAmFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aHACCiBhdmFpbGFibGUECGRlbHRhVm9sCQBlAgkBCHRvVm9sdW1lAgkAZAIFA3docAUCYW0FDlBST0RVQ1RQS0dTSVpFCQEIdG9Wb2x1bWUCBQN3aHAFDlBST0RVQ1RQS0dTSVpFCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2hwBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicHAFAmFtCQBkAggFA2FjYwJfNAUIZGVsdGFWb2wEAXADCQECIT0CCQCQAwEFCXByb2RQYXJ0cwAACgACJGwFCXByb2RQYXJ0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAABQNuaWwFA25pbAgFAW0CXzQKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA212UAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyCQCWCgQAAAUKY3VycldoUHJvZAUPY3VycmVudFBhY2tQcm9kCAUBbQJfNAQIdm9sU2FsZG8IBQFwAl80AwkAZgIFCHZvbFNhbGRvBQt3aFNwYWNlTGVmdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIVQXR0ZW1wdCB0byBwdXQgdG90YWwgCQCkAwEFCHZvbFNhbGRvAhEgc3R1ZmYsIGJ1dCBvbmx5IAkApAMBBQt3aFNwYWNlTGVmdAIVIHdhcmVob3VzZSBzcGFjZSBsZWZ0CQCZCgcJALkJAggFAXICXzICAV8JALkJAggFAW0CXzICAV8JALkJAggFAXACXzICAV8JALkJAggFAXICXzMCAV8JALkJAggFAW0CXzMCAV8JALkJAggFAXACXzMCAV8FCHZvbFNhbGRvARJleHBlZGl0aW9uSW50ZXJuYWwCBmNhbGxlcgR0eElkBAh1c2VyQWRkcgkApQgBBQZjYWxsZXIEBmJpZ051bQkBA2FicwEJAJ4DAQUEdHhJZAQHZnJlZU51bQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQESa2V5TmV4dEZyZWVMYW5kTnVtAAkAZAIFD1BSRVNBTEVOVU1MQU5EUwABBAdsYW5kTnVtCQCkAwEFB2ZyZWVOdW0EDGNvbnRpbmVudElkeAkAoAMBCQC7AgIFBmJpZ051bQUFRklWRVgECHRlcnJhaW5zCQELZ2VuVGVycmFpbnMCBQZiaWdOdW0FDGNvbnRpbmVudElkeAQJY29udGluZW50CQCRAwIFCmNvbnRpbmVudHMFDGNvbnRpbmVudElkeAQFaXNzdWUJAMIIBQkBB25mdE5hbWUCBQdsYW5kTnVtAgFTCQC5CQIJAMwIAgUHbGFuZE51bQkAzAgCAgFTCQDMCAIFCHRlcnJhaW5zCQDMCAIFCWNvbnRpbmVudAUDbmlsAgFfAAEAAAcEB2Fzc2V0SWQJALgIAQUFaXNzdWUEAmlkCQDYBAEFB2Fzc2V0SWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEJAMwIAgUFaXNzdWUJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEGtleUxhbmRUb0Fzc2V0SWQBBQdsYW5kTnVtBQJpZAkAzAgCCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUCaWQFCHVzZXJBZGRyCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFB2xhbmROdW0FCHVzZXJBZGRyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFAmlkAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQJpZAUIdXNlckFkZHIAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZjYWxsZXIAAQUHYXNzZXRJZAUDbmlsCQCUCgIFAmlkBQljb250aW5lbnQBDGZsaWdodENvbW1vbgMIdXNlckFkZHIHbWVzc2FnZQNzaWcDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gEBXBhcnRzCQC1CQIJALAJAQUHbWVzc2FnZQIBOwQJZmxpZ2h0TG9nCQC1CQIJAJEDAgUFcGFydHMAAAIBfAQCaHAJALUJAgkAkQMCBQlmbGlnaHRMb2cFCGZsSGVhbHRoAgFfBAVjdXJIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAAEBW5ld0hQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCaHAAAQQLbmV3TG9jVHhWZXIJALUJAgkAkQMCBQVwYXJ0cwABAgE6BAtuZXdMb2NhdGlvbgkAkQMCBQtuZXdMb2NUeFZlcgAABAR0aW1lCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJZmxpZ2h0TG9nBQtmbFRpbWVzdGFtcAMDCQBmAgUEdGltZQkAZAIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwYJAGYCCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFEUZJVkVNSU5VVEVTTUlMTElTBQR0aW1lCQACAQkArAICCQCsAgIJAKwCAgIcc2lnbmF0dXJlIG91dGRhdGVkOiBsb2dUaW1lPQkApAMBBQR0aW1lAgksIGJjVGltZT0JAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAECXR4RnJvbU1zZwkAkQMCBQtuZXdMb2NUeFZlcgABBAZsYXN0VHgJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBEWtleUxhc3RUeElkQnlVc2VyAQUIdXNlckFkZHICAAMJAQIhPQIFBmxhc3RUeAUJdHhGcm9tTXNnCQACAQkArAICCQCsAgIJAKwCAgIeVHggaWRzIGRvbid0IG1hdGNoISBJbiBzdGF0ZTogBQZsYXN0VHgCCiwgaW4gbXNnOiAFCXR4RnJvbU1zZwQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQh1c2VyQWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkAAAEDG9sZEZyb21TdGF0ZQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQAwkBAiE9AgUMb2xkRnJvbVN0YXRlBQVjdXJIUAkAAgEJAKwCAgkArAICCQCsAgICCm9sZEhlYWx0aD0JAKQDAQUMb2xkRnJvbVN0YXRlAi8gZnJvbSBzdGF0ZSBkb2VzIG5vdCBtYXRjaCBvbmUgZnJvbSBmbGlnaHQgbG9nPQkApAMBBQVjdXJIUAMJAGcCAAAFBWN1ckhQCQACAQIeWW91IGNhbid0IGZseSB3aXRoIHplcm8gaGVhbHRoBAVib251cwMJAGYCCQCQAwEFCWZsaWdodExvZwUHZmxCb251cwkAkQMCBQlmbGlnaHRMb2cFB2ZsQm9udXMCAAQIcHJvZFVzZWQDCQBmAgkAkAMBBQlmbGlnaHRMb2cFC2ZsUHJvZHNVc2VkCQCRAwIFCWZsaWdodExvZwULZmxQcm9kc1VzZWQCAAQKc2VudEFtb3VudAMDCQBmAgUFbmV3SFAAAAkAAAIFBWJvbnVzAgEkBwkBBWFzSW50AQkA/AcEBQxyZXN0Q29udHJhY3QCDXNlbmRVc2R0UHJpemUJAMwIAgUIdXNlckFkZHIFA25pbAUDbmlsAAAJAJcKBQUFbmV3SFAFC2R1Y2tBc3NldElkBQpzZW50QW1vdW50BQtuZXdMb2NhdGlvbgUIcHJvZFVzZWQBEGV4cGVkaXRpb25Db21tb24EBmNhbGxlcgR0eElkB21lc3NhZ2UDc2lnBAh1c2VyQWRkcgkApQgBBQZjYWxsZXIEAWYJAQxmbGlnaHRDb21tb24DBQh1c2VyQWRkcgUHbWVzc2FnZQUDc2lnBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQgFAWYCXzIEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBZgJfMgQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVtTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQGbmV3TWF0CQC5CQIJARFzdWJ0cmFjdE1hdGVyaWFscwMGBQVtTGlzdAUMRVhQTUFURVJJQUxTAgFfBAduZXdQcm9kCQEQc3VidHJhY3RQcm9kdWN0cwIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAgFAWYCXzUDCQBnAgAACAUBZgJfMQkAlQoDCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgAAAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgUHbmV3UHJvZAUDbmlsAgE6BQNuaWwCAAAABAFlCQESZXhwZWRpdGlvbkludGVybmFsAgUGY2FsbGVyBQR0eElkBAJpZAgIBQFlAl8yAl8xCQCVCgMJAM0IAgkAzQgCCQDNCAIIBQFlAl8xCQELU3RyaW5nRW50cnkCCQEPa2V5RHVja0xvY2F0aW9uAQgFAWYCXzIJALkJAgkAzAgCCAgFAWUCXzICXzIJAMwIAgIBTAkAzAgCBQJpZAUDbmlsAgFfCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoCAUBZgJfMQkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIFBm5ld01hdAkAzAgCBQduZXdQcm9kBQNuaWwCAToFAmlkCAUBZgJfMwEMYXBwbHlCb251c2VzAgtsYW5kQXNzZXRJZAZwaWVjZXMECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAlhcnRQaWVjZXMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQAAAQEYWRkNgkAaQIFCmluZnJhTGV2ZWwABgQEYWRkNwkAaQIFCmluZnJhTGV2ZWwABwkAZAIJAGQCBQ9EQUlMWVJFU0JZUElFQ0UJAGsDBQ9EQUlMWVJFU0JZUElFQ0UJAGQCCQBkAgUKaW5mcmFMZXZlbAUEYWRkNgkAaAIAAgUEYWRkNwAFCQBrAwUPREFJTFlSRVNCWVBJRUNFBQlhcnRQaWVjZXMJAGgCBQZwaWVjZXMABQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBGFkZHIJY2xhaW1Nb2RlDWxhbmRBc3NldElkSW4EDSR0MDMxNTg4MzIxMjcDCQAAAgUJY2xhaW1Nb2RlBQtjbGFpbU1vZGVXaAkAlAoCBQ1sYW5kQXNzZXRJZEluCQELdmFsdWVPckVsc2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICAAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgQDbG9jCQC1CQIJAQV2YWx1ZQEFC2N1ckxvY2F0aW9uAgFfAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUwJAAIBCQCsAgIJAKwCAgIWRHVjayBsb2NhdGlvbiB0eXBlIGlzIAkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCESwgYnV0IHNob3VsZCBiZSBMCQCUCgIJAJEDAgUDbG9jBQhsb2NJZHhJZAULZHVja0Fzc2V0SWQEC2xhbmRBc3NldElkCAUNJHQwMzE1ODgzMjEyNwJfMQQGZHVja0lkCAUNJHQwMzE1ODgzMjEyNwJfMgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBUxhbmQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwkAlgoEBQZkdWNrSWQFC2xhbmRBc3NldElkBQFkBQlzYXZlZFRpbWUBEGNsYWltUmVzSW50ZXJuYWwEBGFkZHIGYW1vdW50CWNsYWltTW9kZQ1sYW5kQXNzZXRJZEluAwkAZgIAAAUGYW1vdW50CQACAQIPTmVnYXRpdmUgYW1vdW50BAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBQRhZGRyBQljbGFpbU1vZGUFDWxhbmRBc3NldElkSW4ECGxhbmRTaXplCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIIBQFjAl8zBQtyZWNUZXJyYWlucwQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAIBQFjAl80AwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQgFAWMCXzQCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUEFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAQxhcHBseUJvbnVzZXMCCAUBYwJfMgUGcGllY2VzBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UFBnBpZWNlcwUJREFZTUlMTElTAwkAZgIFBmFtb3VudAUIYXZhaWxSZXMJAAIBCQCsAgIJAKwCAgkArAICAiJOb3QgZW5vdWdoIHJlc291cmNlcywgYXZhaWxhYmxlID0gCQCkAwEFCGF2YWlsUmVzAg4sIHJlcXVlc3RlZCA9IAkApAMBBQZhbW91bnQEDG5ld0RlbHRhVGltZQkAawMJAGUCBQhhdmFpbFJlcwUGYW1vdW50BQlEQVlNSUxMSVMJAGgCBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBQZwaWVjZXMEDG5ld1RpbWVzdGFtcAkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQxuZXdEZWx0YVRpbWUECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUECnJlc1RvQ2xhaW0JAQl2aXJ0Q2xhaW0EBQ10ZXJyYWluQ291bnRzCQBlAgUJZGVsdGFUaW1lBQxuZXdEZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBCAUBYwJfMgQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEIBQFjAl8yAAAECWN1cnJlbnRXaAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEBGxvZnQJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAIBXwQLd2hTcGFjZUxlZnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlAwMJAAACBQljbGFpbU1vZGUFC2NsYWltTW9kZVdoCQBmAgUGYW1vdW50BQt3aFNwYWNlTGVmdAcJAAIBCQCsAgIJAKwCAgIFT25seSAJAKQDAQULd2hTcGFjZUxlZnQCGCBzcGFjZSBsZWZ0IGluIHdhcmVob3VzZQQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEIBQFjAl8xBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEDmN1cnJlbnRQYWNrUmVzCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAxjdXJyZW50V2hSZXMJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfBA0kdDAzNDUwMTM1MzcyAwkAAAIFCWNsYWltTW9kZQULY2xhaW1Nb2RlV2gJAJYKBAkBBmFkZFJlcwUFDGN1cnJlbnRXaFJlcwUNdGVycmFpbkNvdW50cwkAZQIFCWRlbHRhVGltZQUMbmV3RGVsdGFUaW1lBQlsYW5kSW5kZXgFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCAUKcmVzVG9DbGFpbQJfMgkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCAUKcmVzVG9DbGFpbQJfMgMJAAACBQljbGFpbU1vZGUFDWNsYWltTW9kZUR1Y2sJAJYKBAkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzCQEGYWRkUmVzBQUOY3VycmVudFBhY2tSZXMFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQUJbGFuZEluZGV4BRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlBAVkaXN0cgkBDWRpc3RyaWJ1dGVSZXMEBQxjdXJyZW50V2hSZXMFDmN1cnJlbnRQYWNrUmVzBQpyZXNUb0NsYWltBQt3aFNwYWNlTGVmdAQEd2hBbQkAlwMBCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCQDMCAIIBQpyZXNUb0NsYWltAl8yBQNuaWwJAJYKBAgFBWRpc3RyAl8xCAUFZGlzdHICXzIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQFBHdoQW0JAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQUEd2hBbQQFd2hSZXMIBQ0kdDAzNDUwMTM1MzcyAl8xBAVicFJlcwgFDSR0MDM0NTAxMzUzNzICXzIEBWxvZnRPCAUNJHQwMzQ1MDEzNTM3MgJfMwQFbG9mdEYIBQ0kdDAzNDUwMTM1MzcyAl80CQCXCgUJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQgFAWMCXzIFDG5ld1RpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYCAUBYwJfMgUEYWRkcgUMbmV3VGltZXN0YW1wBQNuaWwFBWJwS2V5CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgUFYnBSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwFBXdoS2V5CQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCBQV3aFJlcwkAzAgCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQJAMwIAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAkAzAgCCQC5CQIJAMwIAgkAkQMCBQRsb2Z0BQl2b2xMb2NrZWQJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAJEDAgUEbG9mdAUIdm9sVG90YWwFA25pbAIBXwUDbmlsAQhjbGFpbUFsbAQEYWRkcgtsYW5kQXNzZXRJZAZwaWVjZXMJY2xhaW1Nb2RlBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkBAlzYXZlZFRpbWUJAQV2YWx1ZQEJAJ8IAQUHdGltZUtleQQIYXZhaWxSZXMJAGgCCQBrAwkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUJAQxhcHBseUJvbnVzZXMCBQtsYW5kQXNzZXRJZAUGcGllY2VzBQlEQVlNSUxMSVMFBnBpZWNlcwkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQhhdmFpbFJlcwUJY2xhaW1Nb2RlBQtsYW5kQXNzZXRJZAENdXBJbmZyYUNvbW1vbgQMc2hvdWxkVXNlTWF0BmNhbGxlcg1wYXltZW50QW1vdW50C2xhbmRBc3NldElkBARhZGRyCQClCAEFBmNhbGxlcgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUTY2xhaW1Nb2RlV2hUaGVuRHVjawULbGFuZEFzc2V0SWQEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAggFAWMCXzMFC3JlY0xhbmRTaXplBAhpbmZyYUtleQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBCAUBYwJfMgQIY3VyTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUIaW5mcmFLZXkAAAMJAGcCBQhjdXJMZXZlbAADCQACAQImQ3VycmVudGx5IG1heCBpbmZyYXN0cnVjdHVyZSBsZXZlbCA9IDMECG5ld0xldmVsCQBkAgUIY3VyTGV2ZWwAAQQEY29zdAkAawMFFUluZnJhVXBncmFkZUNvc3RTVXNkdAkAaAIFBnBpZWNlcwUIbmV3TGV2ZWwFBVNTSVpFAwMJAQEhAQUMc2hvdWxkVXNlTWF0CQECIT0CBQ1wYXltZW50QW1vdW50BQRjb3N0BwkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFBGNvc3QEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBYwJfMQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVtTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQHbWF0VXNlZAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUEBm5ld01hdAkAuQkCCQERc3VidHJhY3RNYXRlcmlhbHMDBQxzaG91bGRVc2VNYXQFBW1MaXN0BQdtYXRVc2VkAgFfBAtjbGFpbVJlc3VsdAkBCGNsYWltQWxsBAUEYWRkcggFAWMCXzIFBnBpZWNlcwUTY2xhaW1Nb2RlV2hUaGVuRHVjawQGd2hEYXRhCAULY2xhaW1SZXN1bHQCXzUEBm9sZFZvbAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQZ3aERhdGEFC3doSWR4TGV2ZWxzBApuZXdWb2xEYXRhCQC5CQIJAMwIAgkAkQMCCQC1CQIJAJEDAgUGd2hEYXRhBQt3aElkeExldmVscwIBXwAACQDMCAIJAKQDAQUIbmV3TGV2ZWwFA25pbAIBXwQGbmV3Vm9sCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBBQpuZXdWb2xEYXRhBARsb2Z0CQC1CQIJAJEDAgUGd2hEYXRhBQl3aElkeExPRlQCAV8ECm5ld0xvZnRTdHIJALkJAgkAzAgCCQCRAwIFBGxvZnQFCXZvbExvY2tlZAkAzAgCCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCQDMCAIJAKQDAQkAZQIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQUGbmV3Vm9sBQZvbGRWb2wJAMwIAgkApAMBBQZuZXdWb2wFA25pbAIBXwkAlQoDCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCGluZnJhS2V5BQhuZXdMZXZlbAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIIBQFjAl8yBQRhZGRyBQhuZXdMZXZlbAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCCAULY2xhaW1SZXN1bHQCXzMFCGJwSWR4UmVzCQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzQJALkJAgkAzAgCBQpuZXdWb2xEYXRhCQDMCAIJAJEDAgUGd2hEYXRhBQh3aElkeFJlcwkAzAgCCQCRAwIFBndoRGF0YQUId2hJZHhNYXQJAMwIAgkAkQMCBQZ3aERhdGEFCXdoSWR4UHJvZAkAzAgCBQpuZXdMb2Z0U3RyBQNuaWwCAToFA25pbAgFC2NsYWltUmVzdWx0Al8xBQhuZXdMZXZlbAUHbWF0VXNlZAEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCC2R1Y2tBc3NldElkB2RlbHRhWFADCQEBIQEFD0tTQUxMT1dYUExFVkVMUwkAlAoCBQNuaWwAAAQGbHZsS2V5CQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQEBXhwS2V5CQEJa2V5RHVja1hQAQULZHVja0Fzc2V0SWQEAnhwCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUFeHBLZXkAAAQFbmV3WFAJAGQCBQJ4cAUHZGVsdGFYUAQJbHZsUG9pbnRzCQEHbGV2ZWxVcAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQZsdmxLZXkAAAUFbmV3WFAECWtleVBvaW50cwkBEWtleUR1Y2tGcmVlUG9pbnRzAQULZHVja0Fzc2V0SWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUGbHZsS2V5CQCRAwIFCWx2bFBvaW50cwAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBQV4cEtleQUFbmV3WFAJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleVBvaW50cwkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5UG9pbnRzAAAJAJEDAgUJbHZsUG9pbnRzAAEFA25pbAUFbmV3WFABFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBGFkZHIHZGVsdGFYUAMJAQEhAQUPS1NBTExPV1hQTEVWRUxTCQCUCgIFA25pbAAABAZsdmxLZXkJAQxrZXlVc2VyTGV2ZWwBBQRhZGRyBAV4cEtleQkBCWtleVVzZXJYUAEFBGFkZHIEAnhwCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUFeHBLZXkAAAQFbmV3WFAJAGQCBQJ4cAUHZGVsdGFYUAQJbHZsUG9pbnRzCQEHbGV2ZWxVcAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQZsdmxLZXkAAAUFbmV3WFAECWtleVBvaW50cwkBEWtleVVzZXJGcmVlUG9pbnRzAQUEYWRkcgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQZsdmxLZXkJAJEDAgUJbHZsUG9pbnRzAAAJAMwIAgkBDEludGVnZXJFbnRyeQIFBXhwS2V5BQVuZXdYUAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5UG9pbnRzCQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlQb2ludHMAAAkAkQMCBQlsdmxQb2ludHMAAQUDbmlsBQVuZXdYUAESYWN0aXZhdGVPbmJvYXJkQXJ0AQRhZGRyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECHJlZkJ5S2V5CQEPa2V5QWRkcmVzc1JlZkJ5AQUEYWRkcgQFcmVmQnkJAKIIAQUIcmVmQnlLZXkDCQEBIQEJAQlpc0RlZmluZWQBBQVyZWZCeQkAAgECKVlvdSBhcmUgbm90IGVsaWdpYmxlIGZvciBPTkJPQVJEIGFydGlmYWN0BAZhcnRLZXkJARxrZXlPbmJvYXJkQXJ0RHVja0FjdGl2YXRlZEJ5AQUEYWRkcgQHYXJ0RHVjawkAoggBBQZhcnRLZXkDCQEJaXNEZWZpbmVkAQUHYXJ0RHVjawkAAgEJAKwCAgIvWW91IGFscmVhZHkgdXNlZCB5b3VyIE9OQk9BUkQgYXJ0aWZhY3Qgb24gZHVjayAJAQV2YWx1ZQEFB2FydER1Y2sEEGR1Y2tBY3RpdmF0b3JLZXkJARxrZXlPbmJvYXJkQXJ0QWN0aXZhdGVkT25EdWNrAQULZHVja0Fzc2V0SWQEDWR1Y2tBY3RpdmF0b3IJAKIIAQUQZHVja0FjdGl2YXRvcktleQMJAQlpc0RlZmluZWQBBQ1kdWNrQWN0aXZhdG9yCQACAQkArAICCQCsAgIJAKwCAgIJVGhlIGR1Y2sgBQtkdWNrQXNzZXRJZAI0IGFscmVhZHkgZ290IHBvaW50cyBmcm9tIE9OQk9BUkQgYXJ0aWZhY3QgZnJvbSB1c2VyIAkBBXZhbHVlAQUNZHVja0FjdGl2YXRvcgkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmFydEtleQULZHVja0Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUQZHVja0FjdGl2YXRvcktleQUEYWRkcgUDbmlsCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQFCXhwT25ib2FyZAJfMQESYWN0aXZhdGVQcmVzYWxlQXJ0AgRhZGRyDWxhbmRBc3NldElkSW4EAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFE2NsYWltTW9kZVdoVGhlbkR1Y2sFDWxhbmRBc3NldElkSW4EC2xhbmRBc3NldElkCAUBYwJfMgQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEDWFjdGl2YXRpb25LZXkJASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkAwkAZgIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUNYWN0aXZhdGlvbktleQAAAAAJAAIBAiVQcmVzYWxlIGFydGlmYWN0IGlzIGFscmVhZHkgYWN0aXZhdGVkAwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCCAUBYwJfMwUKcmVjTGFuZE51bQUPUFJFU0FMRU5VTUxBTkRTCQACAQkArAICCQCsAgIJAKwCAgUKTEFORFBSRUZJWAIBIAULbGFuZEFzc2V0SWQCJSBpcyBub3QgZWxpZ2libGUgZm9yIHByZXNhbGUgYXJ0aWZhY3QEC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyBQtsYW5kQXNzZXRJZAUGcGllY2VzBRNjbGFpbU1vZGVXaFRoZW5EdWNrCQDNCAIJAM0IAgkAzQgCCQDNCAIIBQtjbGFpbVJlc3VsdAJfMQkBDEludGVnZXJFbnRyeQIFDWFjdGl2YXRpb25LZXkFBnBpZWNlcwkBDEludGVnZXJFbnRyeQIJASVrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQFBGFkZHIFBnBpZWNlcwkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al80CQC5CQIIBQtjbGFpbVJlc3VsdAJfNQIBOgENbWVyZ2VJbnRlcm5hbAcLbmV3TGFuZFNpemUIbmV3TGV2ZWwHZm9ybXVsYQRhZGRyDGxhbmRBc3NldElkcwR0eElkB25lZWRNYXQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAoBCmNoZWNrTWVyZ2UCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAljb250aW5lbnQJAJEDAgUBZAUMcmVjQ29udGluZW50AwMJAQIhPQIIBQNhY2MCXzMCAAkBAiE9AggFA2FjYwJfMwUJY29udGluZW50BwkAAgECLkxhbmRzIHNob3VsZCBiZSBvbiB0aGUgc2FtZSBjb250aW5lbnQgdG8gbWVyZ2UECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBAdzaXplc0luCAUDYWNjAl8xBAFpCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALMJAgUHc2l6ZXNJbgUIbGFuZFNpemUCJ1lvdSBoYXZlbid0IHBhc3NlZCBhbGwgdGhlIGxhbmRzIG5lZWRlZAQIc2l6ZXNPdXQJAKwCAgkArwICBQdzaXplc0luBQFpCQCwAgIFB3NpemVzSW4JAGQCBQFpAAEEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBARhcnRzCQBkAggFA2FjYwJfMgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQIcmVxTGV2ZWwEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAAAwMJAAACAgFNBQckbWF0Y2gwAAQDCQAAAgIBTAUHJG1hdGNoMAAFAwkAAAICAlhMBQckbWF0Y2gwAAYJAAIBAhpPbmx5IFMsIE0sIEwsIFhMIGNhbiBtZXJnZQMJAQIhPQIFCmluZnJhTGV2ZWwFCHJlcUxldmVsCQACAQIiQWxsIGxhbmRzIHNob3VsZCBiZSBtYXhlZCB0byBtZXJnZQQHbGFuZE51bQkAkQMCBQFkBQpyZWNMYW5kTnVtBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUDCQBmAgAABQlkZWx0YVRpbWUJAAIBCQCsAgIJAKwCAgkArAICAiZTYXZlZCB0aW1lc3RhbXAgaXMgaW4gZnV0dXJlLCBzYXZlZCA9IAkApAMBBQlzYXZlZFRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUEBWJwUmVzCQEGYWRkUmVzBQkAtQkCCAUDYWNjAl80AgFfBQ10ZXJyYWluQ291bnRzBQlkZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFcHJvcHMJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAkAtQkCCAUDYWNjAl82AgFfBQ10ZXJyYWluQ291bnRzBQlsYW5kSW5kZXgA////////////AQQFbGFuZHMIBQNhY2MCXzcEA2lkeAkAzwgCBQVsYW5kcwULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQNpZHgJAAIBCQCsAgICIFlvdXIgc3Rha2VkIGxhbmRzIGRvbid0IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAQJY3VzdG9tS2V5CQEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBBQtsYW5kQXNzZXRJZAQKY3VzdG9tTmFtZQkBC3ZhbHVlT3JFbHNlAgkAoggBBQljdXN0b21LZXkCAAkAmgoIBQhzaXplc091dAUEYXJ0cwUJY29udGluZW50BQVicFJlcwkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUDYWNjAl81CQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0JAQtEZWxldGVFbnRyeQEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBJWtleUxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIDBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQkBC0RlbGV0ZUVudHJ5AQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBBQljdXN0b21LZXkJAQtEZWxldGVFbnRyeQEJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUJAQRCdXJuAgkA2QQBBQtsYW5kQXNzZXRJZAABBQVwcm9wcwkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4CQBkAggFA2FjYwJfOAUGcGllY2VzBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQHcHJvcFN0cgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAQIbGFuZHNLZXkJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQRhZGRyBAhsYW5kc1N0cgkAoggBBQhsYW5kc0tleQQHbGFuZHNJbgMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsBAFyCgACJGwFDGxhbmRBc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJoKCAUHZm9ybXVsYQAAAgAJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzBQNuaWwFB3Byb3BTdHIFB2xhbmRzSW4AAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKY2hlY2tNZXJnZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUECWNvbnRpbmVudAgFAXICXzMEDGNvbnRpbmVudElkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCmNvbnRpbmVudHMFCWNvbnRpbmVudAkArAICAhNVbmtub3duIGNvbnRpbmVudDogBQljb250aW5lbnQECHRlcnJhaW5zCQELZ2VuVGVycmFpbnMCCQEDYWJzAQkAngMBBQR0eElkBQxjb250aW5lbnRJZHgEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQKbmV3TGFuZE51bQkApAMBBQdmcmVlTnVtBAVpc3N1ZQkAwggFCQEHbmZ0TmFtZQIFCm5ld0xhbmROdW0FC25ld0xhbmRTaXplCQC5CQIJAMwIAgUKbmV3TGFuZE51bQkAzAgCBQtuZXdMYW5kU2l6ZQkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBA5uZXdMYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwkAZgIFB25lZWRNYXQAAAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwUHbmVlZE1hdAIBXwQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAkAlAoCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUBcgJfNQMJAGYCCQCQAwEIBQFyAl83AAAJAQtTdHJpbmdFbnRyeQIFCGxhbmRzS2V5CQC7CQIIBQFyAl83AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQMJAGYCCAUBcgJfOAUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMIBQFyAl84CQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEFBWlzc3VlCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFCm5ld0xhbmROdW0FDm5ld0xhbmRBc3NldElkCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUObmV3TGFuZEFzc2V0SWQFBGFkZHIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFCm5ld0xhbmROdW0FBGFkZHIJAQxJbnRlZ2VyRW50cnkCCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQ5uZXdMYW5kQXNzZXRJZAgFAXICXzIJAQxJbnRlZ2VyRW50cnkCCQEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkFSVFBSRVNBTEUFDm5ld0xhbmRBc3NldElkBQRhZGRyCAUBcgJfMgkBDEludGVnZXJFbnRyeQIJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQUObmV3TGFuZEFzc2V0SWQFCG5ld0xldmVsCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFDm5ld0xhbmRBc3NldElkBQRhZGRyBQhuZXdMZXZlbAkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIIBQFyAl80CQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAgFAXICXzYJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIFCWNvbnRpbmVudAkAzAgCAgFMCQDMCAIFDm5ld0xhbmRBc3NldElkBQNuaWwCAV8JAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGFkZHIAAQUHYXNzZXRJZAUObmV3TGFuZEFzc2V0SWQBA3MybQMEYWRkcgxsYW5kQXNzZXRJZHMEdHhJZAkBDW1lcmdlSW50ZXJuYWwHAgFNAAMCBFNTU1MFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAAAAQNtMmwFBGFkZHIMbGFuZEFzc2V0SWRzBHR4SWQMc2hvdWxkVXNlTWF0DXBheW1lbnRBbW91bnQEBGNvc3QJAGgCBRVJbmZyYVVwZ3JhZGVDb3N0U1VzZHQABAMDCQEBIQEFDHNob3VsZFVzZU1hdAkBAiE9AgUNcGF5bWVudEFtb3VudAUEY29zdAcJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQRjb3N0CQENbWVyZ2VJbnRlcm5hbAcCAUwABAIDU01NBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwAEAQRsMnhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0AC8DAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgJYTAAFAgVTU1NNTAUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMALwEGeGwyeHhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0ADYDAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgNYWEwABgIDTFhMBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwA2AQttZXJnZUNvbW1vbgUMc2hvdWxkVXNlTWF0BGFkZHINcGF5bWVudEFtb3VudAxsYW5kQXNzZXRJZHMEdHhJZAQLbWVyZ2VSZXN1bHQEByRtYXRjaDAJAJADAQUMbGFuZEFzc2V0SWRzAwkAAAIABAUHJG1hdGNoMAkBA3MybQMFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAMJAAACAAMFByRtYXRjaDAJAQNtMmwFBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQFDHNob3VsZFVzZU1hdAUNcGF5bWVudEFtb3VudAMJAAACAAUFByRtYXRjaDAJAQRsMnhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQDCQAAAgACBQckbWF0Y2gwCQEGeGwyeHhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQJAAIBAg1Vbmtub3duIG1lcmdlBQttZXJnZVJlc3VsdAEGcHJvbG9nAQFpAwMJAQIhPQIIBQFpDG9yaWdpbkNhbGxlcgUMcmVzdENvbnRyYWN0CQELdmFsdWVPckVsc2UCCQCgCAEJAQprZXlCbG9ja2VkAAcHCQACAQIfQ29udHJhY3RzIGFyZSB1bmRlciBtYWludGVuYW5jZQkBC1N0cmluZ0VudHJ5AgkBEWtleUxhc3RUeElkQnlVc2VyAQkApQgBCAUBaQxvcmlnaW5DYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZCMBaQENY29uc3RydWN0b3JWMQEIcmVzdEFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBCnNldEJsb2NrZWQBCWlzQmxvY2tlZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEXBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQxCb29sZWFuRW50cnkCCQEKa2V5QmxvY2tlZAAFCWlzQmxvY2tlZAUDbmlsAWkBCXN0YWtlTGFuZAAEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKTEFORFBSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUEdGhpcwkAAgECF1Vua25vd24gaXNzdWVyIG9mIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKTEFORFBSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkxBTkRQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAtsYW5kTnVtU2l6ZQkAsAICCAUFYXNzZXQEbmFtZQAEBAdsYW5kTnVtAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCA1hYTAkAswICBQtsYW5kTnVtU2l6ZQADAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCAlhMCQCzAgIFC2xhbmROdW1TaXplAAIJALMCAgULbGFuZE51bVNpemUAAQMJAQEhAQkBCWlzRGVmaW5lZAEJALYJAQUHbGFuZE51bQkAAgEJAKwCAgIeQ2Fubm90IHBhcnNlIGxhbmQgbnVtYmVyIGZyb20gCAUFYXNzZXQEbmFtZQQLbGFuZEFzc2V0SWQJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8EDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCBQFkBQtyZWNUZXJyYWlucwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMJAGkCBQZwaWVjZXMFBVNTSVpFAAEECWFydFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAhsYW5kc0tleQkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFB2FkZHJlc3MECGxhbmRzU3RyCQCiCAEFCGxhbmRzS2V5BAVsYW5kcwMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBWxhbmRzBQtsYW5kQXNzZXRJZAkAAgEJAKwCAgIiWW91ciBzdGFrZWQgbGFuZHMgYWxyZWFkeSBjb250YWluIAULbGFuZEFzc2V0SWQECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAlwaWVjZXNLZXkJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwQJb2xkUGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEFCXBpZWNlc0tleQAABAl3bGdSZXN1bHQJAQVhc0ludAEJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkAzQgCBQVsYW5kcwULbGFuZEFzc2V0SWQCAV8JAMwIAgkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQkAZAIFCW9sZFBpZWNlcwUGcGllY2VzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQdhZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkBQdhZGRyZXNzBQlhcnRQaWVjZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwUKaW5mcmFMZXZlbAkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5UmVzUHJvcG9ydGlvbnMABQVwcm9wcwkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAUJd2xnUmVzdWx0AWkBC3Vuc3Rha2VMYW5kAQ1sYW5kQXNzZXRJZEluBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBQRhZGRyBQ1jbGFpbU1vZGVEdWNrBQ1sYW5kQXNzZXRJZEluBAtsYW5kQXNzZXRJZAgFAWMCXzIECGxhbmRzS2V5CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUEYWRkcgQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIIBQFjAl8zBQtyZWNUZXJyYWlucwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEBXByb3BzCQERdXBkYXRlUHJvcG9ydGlvbnMDBQ10ZXJyYWluQ291bnRzCQBpAgUGcGllY2VzBQVTU0laRQD///////////8BBAtjbGFpbVJlc3VsdAkBCGNsYWltQWxsBAUEYWRkcgULbGFuZEFzc2V0SWQFBnBpZWNlcwUNY2xhaW1Nb2RlRHVjawQFbGFuZHMJAL0JAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQhsYW5kc0tleQIAAgFfBANpZHgJAM8IAgUFbGFuZHMFC2xhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQUDaWR4CQACAQkArAICAiBZb3VyIHN0YWtlZCBsYW5kcyBkb24ndCBjb250YWluIAULbGFuZEFzc2V0SWQEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEDmdvdlJlbGVhc2VUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFC2dvdkNvbnRyYWN0CQEVa2V5VXNlckd3bFJlbGVhc2VUaW1lAQUEYWRkcgAAAwkAZwIFDmdvdlJlbGVhc2VUaW1lBQNub3cJAAIBCQCsAgICOVlvdXIgZ1dMIGFyZSB0YWtpbmcgcGFydCBpbiB2b3RpbmcsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQ5nb3ZSZWxlYXNlVGltZQQOYXJiUmVsZWFzZVRpbWUJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFC3dsZ0NvbnRyYWN0CQEUa2V5TGFzdEFyYlRpbWVCeVVzZXIBBQRhZGRyAAAFDmFyYml0cmFnZURlbGF5AwkAZgIFDmFyYlJlbGVhc2VUaW1lBQNub3cJAAIBCQCsAgICP1lvdXIgc3Rha2VkIGxhbmRzIHRvb2sgcGFydCBpbiBhcmJpdHJhZ2UsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQ5hcmJSZWxlYXNlVGltZQQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAQJbmV3UGllY2VzAwkAZgIFBnBpZWNlcwUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMFBnBpZWNlcwQJd2xnUmVzdWx0CQEFYXNJbnQBCQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUEYWRkcgUDbmlsBQNuaWwJAJQKAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQkA2QQBBQtsYW5kQXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKTEFORFBSRUZJWAULbGFuZEFzc2V0SWQFBGFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMJAMwIAgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkAzAgCAwkAZgIJAJADAQUFbGFuZHMAAQkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkAzAgCCQEMSW50ZWdlckVudHJ5AgUJcGllY2VzS2V5BQluZXdQaWVjZXMJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwFCXdsZ1Jlc3VsdAFpAQlzdGFrZUR1Y2sABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEB2Fzc2V0SWQJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCAUDcG10BmFtb3VudAABCQACAQkArAICCQCsAgICBE5GVCAFCkRVQ0tQUkVGSVgCJCB0b2tlbiBzaG91bGQgYmUgYXR0YWNoZWQgYXMgcGF5bWVudAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAMDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQ1pbmN1YmF0b3JBZGRyCQECIT0CCAUFYXNzZXQGaXNzdWVyBQticmVlZGVyQWRkcgcJAAIBCQCsAgIJAKwCAgISVW5rbm93biBpc3N1ZXIgb2YgBQpEVUNLUFJFRklYAgYgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpEVUNLUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKRFVDS1BSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQECmFzc2V0SWRTdHIJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQphc3NldElkU3RyAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkAwkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgIdWW91IGFscmVhZHkgc3Rha2VkIG9uZSBkdWNrOiAIBQVhc3NldARuYW1lBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyBAhsb2NhdGlvbgkAoggBBQZsb2NLZXkEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQphc3NldElkU3RyBAhiYWNrcGFjawkAoggBBQVicEtleQQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFCmFzc2V0SWRTdHIEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQUKYXNzZXRJZFN0cgAABAljdXJIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQphc3NldElkU3RyBQNuaWwDCQEJaXNEZWZpbmVkAQUIbG9jYXRpb24FA25pbAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBQNuaWwDCQEJaXNEZWZpbmVkAQUIYmFja3BhY2sFA25pbAkAzQgCCQDNCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6BQNuaWwJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFCWN1ckhlYWx0aAUMcHJvbG9nQWN0aW9uAWkBC3Vuc3Rha2VEdWNrAQphc3NldElkU3RyBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB2Fzc2V0SWQJANkEAQUKYXNzZXRJZFN0cgQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQkA2AQBBQdhc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAMJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgkArAICAglUaGUgZHVjayAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEJANgEAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUHYWRkcmVzcwkAAgECF1N0YWtlZCBORlQgaXMgbm90IHlvdXJzBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQUKYXNzZXRJZFN0cgQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQphc3NldElkU3RyAAAEBmhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQAwkAZgIFBW1heEhQBQZoZWFsdGgJAAIBCQCsAgIJAKwCAgIZUGxlYXNlIGhlYWwgeW91ciBkdWNrIHRvIAkApAMBBQVtYXhIUAITaHAgYmVmb3JlIHVuc3Rha2luZwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBBQd0aW1lS2V5CQDMCAIJAQtEZWxldGVFbnRyeQEFCWtleUhlYWx0aAkAzAgCCQELRGVsZXRlRW50cnkBCQEPa2V5RHVja0xvY2F0aW9uAQUKYXNzZXRJZFN0cgkAzAgCCQELRGVsZXRlRW50cnkBCQEQa2V5RHVja0lkVG9Pd25lcgEFCmFzc2V0SWRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYBQphc3NldElkU3RyBQdhZGRyZXNzCQDMCAIJAQtEZWxldGVFbnRyeQEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwBaQEIY2xhaW1SZXMCBmFtb3VudA5sYW5kQXNzZXRJZFN0cgQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQGcmVzdWx0CQEQY2xhaW1SZXNJbnRlcm5hbAQFBGFkZHIFBmFtb3VudAUNY2xhaW1Nb2RlRHVjawUObGFuZEFzc2V0SWRTdHIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAkAlAoCCQDNCAIJAM0IAgkAzQgCCQDOCAIIBQZyZXN1bHQCXzEICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAkAawMFB3hwQ2xhaW0FBmFtb3VudAUFTVVMVDgCXzEJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzIJALkJAggFBnJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfNAkAuQkCCAUGcmVzdWx0Al81AgE6BQxwcm9sb2dBY3Rpb24JAJEDAggFBnJlc3VsdAJfMwUIYnBJZHhSZXMBaQEMY2xhaW1SZXNUb1dIAgZhbW91bnQObGFuZEFzc2V0SWRTdHIEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBnJlc3VsdAkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQZhbW91bnQFC2NsYWltTW9kZVdoBQ5sYW5kQXNzZXRJZFN0cgkAlAoCCQDNCAIJAM0IAgkAzQgCCQDOCAIIBQZyZXN1bHQCXzEICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIFBGFkZHIJAGsDBQd4cENsYWltBQZhbW91bnQFBU1VTFQ4Al8xCQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al8yCQC5CQIIBQZyZXN1bHQCXzMCAToJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzQJALkJAggFBnJlc3VsdAJfNQIBOgUMcHJvbG9nQWN0aW9uCQCRAwIIBQZyZXN1bHQCXzUFCHdoSWR4UmVzAWkBBmZsaWdodAIHbWVzc2FnZQNzaWcEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQIdXNlckFkZHIJAKUIAQgFAWkGY2FsbGVyBAFmCQEMZmxpZ2h0Q29tbW9uAwUIdXNlckFkZHIFB21lc3NhZ2UFA3NpZwQLZHVja0Fzc2V0SWQIBQFmAl8yBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUGbG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04DCQAAAggFAWYCXzQFC2N1ckxvY2F0aW9uCQACAQIiWW91IGNhbid0IGZseSB0byB0aGUgc2FtZSBsb2NhdGlvbgQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEB25ld1Byb2QJARBzdWJ0cmFjdFByb2R1Y3RzAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kCAUBZgJfNQkAlAoCCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUGbG9jS2V5AwkAZgIIBQFmAl8xAAAIBQFmAl80BQtjdXJMb2NhdGlvbgkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgUHbmV3UHJvZAUDbmlsAgE6CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkCAUBZgJfMQkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkAwkAZgIIBQFmAl8xAAAFD3hwU3VjY2Vzc0ZsaWdodAUMeHBGYWlsRmxpZ2h0Al8xCAUBZgJfMwFpAQRoZWFsAwpxdWFudGl0eUwxCnF1YW50aXR5TDIKcXVhbnRpdHlMMwQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMDAwkAZgIAAAUKcXVhbnRpdHlMMQYJAGYCAAAFCnF1YW50aXR5TDIGCQBmAgAABQpxdWFudGl0eUwzCQACAQIbUXVhbnRpdHkgY2Fubm90IGJlIG5lZ2F0aXZlBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBANxdHMJAMwIAgUKcXVhbnRpdHlMMQkAzAgCBQpxdWFudGl0eUwyCQDMCAIFCnF1YW50aXR5TDMFA25pbAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkAAAECW9sZEhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQAwkAZwIFCW9sZEhlYWx0aAUFbWF4SFAJAAIBCQCsAgIJAKwCAgIPSFAgc2hvdWxkIGJlIDwgCQCkAwEFBW1heEhQAgggdG8gaGVhbAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkECHByb2RMaXN0AwkAAAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIABQNuaWwJALUJAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgFfCgELaXRlcmF0ZVByb2QCA2FjYwtpZ25vcmVkSXRlbQQBbggFA2FjYwJfMgQBeAMJAGYCCQCQAwEFCHByb2RMaXN0BQFuCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QFAW4AAAMJAGYCAAMFAW4EAXEJAJEDAgUDcXRzBQFuAwkAZgIFAXEFAXgJAAIBCQCsAgIJAKwCAgkArAICAg5Zb3UgaGF2ZSBvbmx5IAkApAMBBQF4AgQgb2YgCQCRAwIFCXByb2RUeXBlcwUBbgkAlQoDCQDNCAIIBQNhY2MCXzEJAKQDAQkAZQIFAXgFAXEJAGQCBQFuAAEJAGQCCAUDYWNjAl8zCQBoAgkAkQMCBQhtZWRLaXRIcAUBbgUBcQkAlQoDCQDNCAIIBQNhY2MCXzEJAKQDAQUBeAkAZAIFAW4AAQgFA2FjYwJfMwQGcmVzdWx0CgACJGwFEHByb2R1Y3Rpb25NYXRyaXgKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCVCgMFA25pbAAAAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC2l0ZXJhdGVQcm9kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIECW5ld0hlYWx0aAkAlwMBCQDMCAIFBW1heEhQCQDMCAIJAGQCBQlvbGRIZWFsdGgIBQZyZXN1bHQCXzMFA25pbAkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUJbmV3SGVhbHRoCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCCQC5CQIIBQZyZXN1bHQCXzECAV8FA25pbAIBOgkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkCQBoAgUGeHBIZWFsCQBkAgkAZAIFCnF1YW50aXR5TDEFCnF1YW50aXR5TDIFCnF1YW50aXR5TDMCXzEFCW5ld0hlYWx0aAFpAQZoZWFsRVMABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAMJAGYCBQlvbGRIZWFsdGgAAAkAAgECKEhQIHNob3VsZCBiZSAwIHRvIGNhbGwgRW1lcmdlbmN5IFNlcnZpY2UEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAhwcm9kTGlzdAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwQNbWVkS2l0QW1vdW50MQMJAGYCCQCQAwEFCHByb2RMaXN0AAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAAAAAAEDW1lZEtpdEFtb3VudDIDCQBmAgkAkAMBBQhwcm9kTGlzdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QAAQAABA1tZWRLaXRBbW91bnQzAwkAZgIJAJADAQUIcHJvZExpc3QAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0AAIAAAMDAwkAZgIFDW1lZEtpdEFtb3VudDEAAAYJAGYCBQ1tZWRLaXRBbW91bnQyAAAGCQBmAgUNbWVkS2l0QW1vdW50MwAACQACAQIfWW91IGhhdmUgdG8gdXNlIG93biBNZWRpY2FsIEtpdAQIZXhpc3RTdHIJAJ0IAgUPZWNvbm9teUNvbnRyYWN0CQEOa2V5RXNXYXJlaG91c2UABAxleGlzdEFtb3VudHMDCQEJaXNEZWZpbmVkAQUIZXhpc3RTdHIJALUJAgkBBXZhbHVlAQUIZXhpc3RTdHICAV8FA25pbAQLZXhpc3RBbW91bnQDCQBmAgkAkAMBBQxleGlzdEFtb3VudHMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDGV4aXN0QW1vdW50cwAAAAADCQBnAgAABQtleGlzdEFtb3VudAkAAgECOVRoZXJlIGFyZSBubyBNZWRpY2FsIEtpdHMgTDEgYXQgRW1lcmdlbmN5IFNlcnZpY2Ugc3RvcmFnZQQJbmV3SGVhbHRoCQBkAgUJb2xkSGVhbHRoCQCRAwIFCG1lZEtpdEhwAAAEBW5ld0VTCQC5CQIJAMwIAgkApAMBCQBlAgULZXhpc3RBbW91bnQAAQkA0QgCBQxleGlzdEFtb3VudHMAAAIBXwQGcmVjaXBlCQC1CQIJAJEDAgUQcHJvZHVjdGlvbk1hdHJpeAAAAgFfBAh0b3RhbE1hdAkBEmdldFJlY2lwZU1hdGVyaWFscwEFBnJlY2lwZQQJc2VsbFByaWNlCQBrAwkAaAIFCHRvdGFsTWF0BQpFU1NFTExDT0VGBRBSRVNPVVJDRVBSSUNFTUlOCQBoAgAKBQ5QUk9EVUNUUEtHU0laRQMJAQIhPQIIBQNwbXQGYW1vdW50BQlzZWxsUHJpY2UJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQlzZWxsUHJpY2UEBnJlc3VsdAkBCGFzU3RyaW5nAQkA/AcEBQ9lY29ub215Q29udHJhY3QCD3VwZGF0ZUVzU3RvcmFnZQkAzAgCBQVuZXdFUwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQt1c2R0QXNzZXRJZAUJc2VsbFByaWNlBQNuaWwJAJQKAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFCW5ld0hlYWx0aAkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkBQh4cENhbGxFUwJfMQUGcmVzdWx0AWkBDnVwZGF0ZUJhY2twYWNrAgtkdWNrQXNzZXRJZAduZXdQYWNrAwkBAiE9AggFAWkGY2FsbGVyBQ9lY29ub215Q29udHJhY3QJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBQduZXdQYWNrBQNuaWwFB25ld1BhY2sBaQEIYnV5U0xhbmQABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEDCQECIT0CCAUDcG10BmFtb3VudAUHRVhQVVNEVAkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFB0VYUFVTRFQEBnJlc3VsdAkBEmV4cGVkaXRpb25JbnRlcm5hbAIIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAkAlAoCCQDNCAIJAM4IAgkAzQgCCAUGcmVzdWx0Al8xCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAgJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgkApQgBCAUBaQZjYWxsZXIFCnhwTmV3U0xhbmQCXzEFDHByb2xvZ0FjdGlvbggIBQZyZXN1bHQCXzICXzEBaQEKZXhwZWRpdGlvbgIHbWVzc2FnZQNzaWcEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQGcmVzdWx0CQEQZXhwZWRpdGlvbkNvbW1vbgQIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAUHbWVzc2FnZQUDc2lnBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkCQCUCgIJAM0IAgkAzggCCAUGcmVzdWx0Al8xCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQFCnhwTmV3U0xhbmQCXzEFDHByb2xvZ0FjdGlvbgkAlAoCCAUGcmVzdWx0Al8yCAUGcmVzdWx0Al8zAWkBDHVwZ3JhZGVJbmZyYQELbGFuZEFzc2V0SWQEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQGcmVzdWx0CQENdXBJbmZyYUNvbW1vbgQGCAUBaQZjYWxsZXIAAAULbGFuZEFzc2V0SWQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQJAJQKAgkAzggCCQDNCAIIBQZyZXN1bHQCXzEFDHByb2xvZ0FjdGlvbggJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkCQBrAwUOeHBVcGdyYWRlSW5mcmEIBQZyZXN1bHQCXzMFBU1VTFQ4Al8xCAUGcmVzdWx0Al8yAWkBEHVwZ3JhZGVJbmZyYVVzZHQBC2xhbmRBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQQGcmVzdWx0CQENdXBJbmZyYUNvbW1vbgQHCAUBaQZjYWxsZXIIBQNwbXQGYW1vdW50BQtsYW5kQXNzZXRJZAkAlAoCCQDNCAIJAM0IAggFBnJlc3VsdAJfMQkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0CAUDcG10BmFtb3VudAULdXNkdEFzc2V0SWQFDHByb2xvZ0FjdGlvbggFBnJlc3VsdAJfMgFpARBhY3RpdmF0ZUFydGlmYWN0AgdhcnROYW1lDmxhbmRBc3NldElkT3B0BAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAZyZXN1bHQEByRtYXRjaDAFB2FydE5hbWUDCQAAAgIHUFJFU0FMRQUHJG1hdGNoMAkBEmFjdGl2YXRlUHJlc2FsZUFydAIFBGFkZHIFDmxhbmRBc3NldElkT3B0AwkAAAICB09OQk9BUkQFByRtYXRjaDAJARJhY3RpdmF0ZU9uYm9hcmRBcnQBBQRhZGRyCQACAQIQVW5rbm93biBhcnRpZmFjdAkAzQgCBQZyZXN1bHQFDHByb2xvZ0FjdGlvbgFpAQptZXJnZUxhbmRzAQxsYW5kQXNzZXRJZHMEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQGcmVzdWx0CQELbWVyZ2VDb21tb24FBgkApQgBCAUBaQZjYWxsZXIAAAUMbGFuZEFzc2V0SWRzCAUBaQ10cmFuc2FjdGlvbklkCQCUCgIJAM4IAgkAzQgCCAUGcmVzdWx0Al8xBQxwcm9sb2dBY3Rpb24ICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQd4cE1lcmdlAl8xCAUGcmVzdWx0Al8yAWkBDm1lcmdlTGFuZHNVc2R0AQxsYW5kQXNzZXRJZHMEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQQGcmVzdWx0CQELbWVyZ2VDb21tb24FBwkApQgBCAUBaQZjYWxsZXIIBQNwbXQGYW1vdW50BQxsYW5kQXNzZXRJZHMIBQFpDXRyYW5zYWN0aW9uSWQJAJQKAgkAzQgCCQDNCAIIBQZyZXN1bHQCXzEJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAgFA3BtdAZhbW91bnQFC3VzZHRBc3NldElkBQxwcm9sb2dBY3Rpb24IBQZyZXN1bHQCXzIBaQENY2FyZ29FeGNoYW5nZQIMY2FyZ29MaXN0U3RyC2xhbmRBc3NldElkBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQECmNhcmdvUGFydHMJALwJAgUMY2FyZ29MaXN0U3RyAgE6BARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAggFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQJbGFuZEluZGV4CQBpAgkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplBQVTU0laRQQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAMJAQIhPQIJAJEDAgUDbG9jBQhsb2NJZHhJZAULbGFuZEFzc2V0SWQJAAIBCQCsAgICG0R1Y2sgc2hvdWxkIGJlIG9uIHRoZSBsYW5kIAULbGFuZEFzc2V0SWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQECWN1cnJlbnRXaAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAZyZXN1bHQJAQltb3ZlU3R1ZmYDBQpjYXJnb1BhcnRzBQljdXJyZW50V2gFC2N1cnJlbnRQYWNrBARsb2Z0CQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8EBWxvZnRPCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCAUGcmVzdWx0Al83BAVsb2Z0RgkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCAUGcmVzdWx0Al83CQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCAUGcmVzdWx0Al80CQDMCAIIBQZyZXN1bHQCXzUJAMwIAggFBnJlc3VsdAJfNgUDbmlsAgE6CQDMCAIJAQtTdHJpbmdFbnRyeQIFBXdoS2V5CQC6CQIJAMwIAgkAkQMCBQljdXJyZW50V2gFC3doSWR4TGV2ZWxzCQDMCAIIBQZyZXN1bHQCXzEJAMwIAggFBnJlc3VsdAJfMgkAzAgCCAUGcmVzdWx0Al8zCQDMCAIJALkJAgkAzAgCCQCRAwIFBGxvZnQFCXZvbExvY2tlZAkAzAgCCQCkAwEFBWxvZnRPCQDMCAIJAKQDAQUFbG9mdEYJAMwIAgkAkQMCBQRsb2Z0BQh2b2xUb3RhbAUDbmlsAgFfBQNuaWwCAToJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwBaQENc2F2ZVdhcmVob3VzZQIFd2hTdHILbGFuZEFzc2V0SWQDCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQEAndoCQC8CQIFBXdoU3RyAgE6AwkBAiE9AgkAkAMBBQJ3aAAFCQACAQIwd2FyZWhvdXNlIHN0cmluZyBzaG91bGQgY29udGFpbiA0ICc6JyBzZXBhcmF0b3JzBAVsb2Z0TAkAkQMCCQC1CQIJAJEDAgUCd2gFCXdoSWR4TE9GVAIBXwUJdm9sTG9ja2VkBAVsb2Z0TwkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUCd2gEBWxvZnRUCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFAndoBQt3aElkeExldmVscwQFbG9mdEYJAGUCCQBlAgUFbG9mdFQJAQ1wYXJzZUludFZhbHVlAQUFbG9mdEwFBWxvZnRPBAhuZXdXaFN0cgkAugkCCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIJAJEDAgUCd2gFCHdoSWR4UmVzCQDMCAIJAJEDAgUCd2gFCHdoSWR4TWF0CQDMCAIJAJEDAgUCd2gFCXdoSWR4UHJvZAkAzAgCCQC5CQIJAMwIAgUFbG9mdEwJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAKQDAQUFbG9mdFQFA25pbAIBXwUDbmlsAgE6CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFd2hLZXkFCG5ld1doU3RyBQNuaWwFCG5ld1doU3RyAWkBEmZpeFdhcmVob3VzZUZvcm1hdAELbGFuZEFzc2V0SWQDCQECIT0CCAUBaQZjYWxsZXIFDHJlc3RDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQUFU1NJWkUECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAJ3aAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEBWxvZnRMCQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIacmVjYWxjTG9ja2VkVm9sdW1lUkVBRE9OTFkJAMwIAgULbGFuZEFzc2V0SWQJAMwIAgUCd2gFA25pbAUDbmlsBAVsb2Z0TwkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUCd2gEBWxvZnRUCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFAndoBQt3aElkeExldmVscwQFbG9mdEYJAGUCCQBlAgUFbG9mdFQFBWxvZnRMBQVsb2Z0TwQIbmV3V2hTdHIJALoJAgkAzAgCCQCRAwIFAndoBQt3aElkeExldmVscwkAzAgCCQCRAwIFAndoBQh3aElkeFJlcwkAzAgCCQCRAwIFAndoBQh3aElkeE1hdAkAzAgCCQCRAwIFAndoBQl3aElkeFByb2QJAMwIAgkAuQkCCQDMCAIJAKQDAQUFbG9mdEwJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAKQDAQUFbG9mdFQFA25pbAIBXwUDbmlsAgE6CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFd2hLZXkFCG5ld1doU3RyBQNuaWwFCG5ld1doU3RyAWkBD2ZpeFN0YWtlZFBpZWNlcwEHYWRkcmVzcwMJAQIhPQIIBQFpBmNhbGxlcgUMcmVzdENvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQMc3Rha2VkUGllY2VzAwkAAAIFB2FkZHJlc3MCAAAABAhsYW5kc1N0cgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQdhZGRyZXNzBAVsYW5kcwMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsCgEHb25lTGFuZAIDYWNjC2xhbmRBc3NldElkBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAhsYW5kU2l6ZQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUJAGQCBQNhY2MJAQ9udW1QaWVjZXNCeVNpemUBBQhsYW5kU2l6ZQoAAiRsBQVsYW5kcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHb25lTGFuZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBQdhZGRyZXNzBQxzdGFrZWRQaWVjZXMFA25pbAUMc3Rha2VkUGllY2VzAWkBDXNldEN1c3RvbU5hbWUDB2Fzc2V0SWQKY3VzdG9tTmFtZQR0eXBlBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEDCQECIT0CCAUDcG10BmFtb3VudAUMUkVOQU1JTkdDT1NUCQACAQkArAICAhJQYXltZW50IHNob3VsZCBiZSAJAKQDAQUMUkVOQU1JTkdDT1NUAwkBCGNvbnRhaW5zAgUKY3VzdG9tTmFtZQICX18JAAIBCQCsAgICHk5hbWUgc2hvdWxkIG5vdCBjb250YWluICdfXyc6IAUKY3VzdG9tTmFtZQMJAGYCCQCxAgEFCmN1c3RvbU5hbWUFCk1BWE5BTUVMRU4JAAIBCQCsAgICGU5hbWUgdG9vIGxvbmcsIG1heExlbmd0aD0JAKQDAQUKTUFYTkFNRUxFTgQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEB2FjdGlvbnMEByRtYXRjaDAFBHR5cGUDCQAAAgIHQUNDT1VOVAUHJG1hdGNoMAQKcmV2ZXJzZUtleQkBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBBQpjdXN0b21OYW1lBAluYW1lT3duZXIJAKIIAQUKcmV2ZXJzZUtleQMJAQlpc0RlZmluZWQBBQluYW1lT3duZXIJAAIBCQCsAgICGU5hbWUgYWxyZWFkeSByZWdpc3RlcmVkOiAFCmN1c3RvbU5hbWUEDWFkZHJUb05hbWVLZXkJARZrZXlBZGRyZXNzVG9DdXN0b21OYW1lAQUEYWRkcgQHb2xkTmFtZQkAoggBBQ1hZGRyVG9OYW1lS2V5BAdmcmVlT2xkAwkBCWlzRGVmaW5lZAEFB29sZE5hbWUJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUNYWRkclRvTmFtZUtleQUKY3VzdG9tTmFtZQkBC1N0cmluZ0VudHJ5AgUKcmV2ZXJzZUtleQUEYWRkcggJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgUMeHBDdXN0b21OYW1lAl8xAwkAAAICBExBTkQFByRtYXRjaDAEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQdhc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMECnJldmVyc2VLZXkJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQOYXNzZXRUb05hbWVLZXkJARprZXlMYW5kQXNzZXRJZFRvQ3VzdG9tTmFtZQEFB2Fzc2V0SWQEB29sZE5hbWUJAKIIAQUOYXNzZXRUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUOYXNzZXRUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFB2Fzc2V0SWQICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIFBGFkZHIFDHhwQ3VzdG9tTmFtZQJfMQMJAAACAgREVUNLBQckbWF0Y2gwBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUHYXNzZXRJZAMDCQEBIQEJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkGCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHIJAAIBCQCsAgIIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkRVQ0tQUkVGSVgCDSBpcyBub3QgeW91cnMECnJldmVyc2VLZXkJARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQOYXNzZXRUb05hbWVLZXkJARprZXlEdWNrQXNzZXRJZFRvQ3VzdG9tTmFtZQEFB2Fzc2V0SWQEB29sZE5hbWUJAKIIAQUOYXNzZXRUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5RHVja0N1c3RvbU5hbWVUb0Fzc2V0SWQBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUOYXNzZXRUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFB2Fzc2V0SWQICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQdhc3NldElkBQx4cEN1c3RvbU5hbWUCXzEJAAIBAhNVbmtub3duIGVudGl0eSB0eXBlCQCUCgIJAM0IAgkAzQgCBQdhY3Rpb25zCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAUMcHJvbG9nQWN0aW9uAAABaQEMc2V0UmVmZXJyYWxzAglvbGRQbGF5ZXIJbmV3UGxheWVyAwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQNwdWIJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkAwkBASEBCQEJaXNEZWZpbmVkAQkApggBBQlvbGRQbGF5ZXIJAAIBCQCsAgICEUludmFsaWQgYWRkcmVzczogBQlvbGRQbGF5ZXIDCQEBIQEJAQlpc0RlZmluZWQBCQCmCAEFCW5ld1BsYXllcgkAAgEJAKwCAgIRSW52YWxpZCBhZGRyZXNzOiAFCW5ld1BsYXllcgQHb2xkc0tleQkBCWtleU9sZGllcwAEBG9sZHMJAKIIAQUHb2xkc0tleQQGb2xkaWVzAwkBCWlzRGVmaW5lZAEFBG9sZHMJALwJAgkBBXZhbHVlAQUEb2xkcwIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBm9sZGllcwUJbmV3UGxheWVyCQACAQkArAICBQluZXdQbGF5ZXICJiBpcyBub3QgbmV3YmllIChhbHJlYWR5IGhhcyByZWZlcnJhbHMpBAhyZWZCeUtleQkBD2tleUFkZHJlc3NSZWZCeQEFCW5ld1BsYXllcgQFcmVmQnkJAKIIAQUIcmVmQnlLZXkDAwkBCWlzRGVmaW5lZAEFBXJlZkJ5CQEJaXNEZWZpbmVkAQkApggBCQEFdmFsdWUBBQVyZWZCeQcJAAIBCQCsAgIJAKwCAgUJbmV3UGxheWVyAhQgYWxyZWFkeSBoYXMgcmVmQnk6IAkBBXZhbHVlAQUFcmVmQnkEB3JlZnNLZXkJARNrZXlBZGRyZXNzUmVmZXJyYWxzAQUJb2xkUGxheWVyBARyZWZzCQCiCAEFB3JlZnNLZXkECXJlZnNBcnJheQMJAQlpc0RlZmluZWQBBQRyZWZzCQC8CQIJAQV2YWx1ZQEFBHJlZnMCAV8FA25pbAMJAQ9jb250YWluc0VsZW1lbnQCBQlyZWZzQXJyYXkFCW5ld1BsYXllcgkAAgEJAKwCAgkArAICCQCsAgIFCW9sZFBsYXllcgISIGFscmVhZHkgY29udGFpbnMgBQluZXdQbGF5ZXICESB3aXRoaW4gcmVmZXJyYWxzBAduZXdSZWZzCQC6CQIJAM0IAgUJcmVmc0FycmF5BQluZXdQbGF5ZXICAV8EB25ld09sZHMDCQEPY29udGFpbnNFbGVtZW50AgUGb2xkaWVzBQlvbGRQbGF5ZXIJAQV2YWx1ZQEFBG9sZHMJALoJAgkAzQgCBQZvbGRpZXMFCW9sZFBsYXllcgIBXwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFCHJlZkJ5S2V5BQlvbGRQbGF5ZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgUHcmVmc0tleQUHbmV3UmVmcwkAzAgCCQELU3RyaW5nRW50cnkCBQdvbGRzS2V5BQduZXdPbGRzCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAAABaQEQZGlzdHJpYnV0ZVBvaW50cwUIc3RyZW5ndGgIYWNjdXJhY3kJaW50ZWxsZWN0CWVuZHVyYW5jZQlkZXh0ZXJpdHkEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQKZnJlZUtleUFjYwkBEWtleVVzZXJGcmVlUG9pbnRzAQUEYWRkcgQNZnJlZVBvaW50c0FjYwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFCmZyZWVLZXlBY2MAAAQLZnJlZUtleUR1Y2sJARFrZXlEdWNrRnJlZVBvaW50cwEFC2R1Y2tBc3NldElkBA5mcmVlUG9pbnRzRHVjawkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFC2ZyZWVLZXlEdWNrAAAEB3N1bUZyZWUJAGQCBQ1mcmVlUG9pbnRzQWNjBQ5mcmVlUG9pbnRzRHVjawQPc3VtVG9EaXN0cmlidXRlCQBkAgkAZAIJAGQCCQBkAgUIc3RyZW5ndGgFCGFjY3VyYWN5BQlpbnRlbGxlY3QFCWVuZHVyYW5jZQUJZGV4dGVyaXR5AwkAZgIFD3N1bVRvRGlzdHJpYnV0ZQUHc3VtRnJlZQkAAgEJAKwCAgkArAICAg9UaGVyZSBhcmUgb25seSAJAKQDAQUHc3VtRnJlZQIaIGZyZWUgcG9pbnRzIHRvIGRpc3RyaWJ1dGUECGNoYXJzS2V5CQEMa2V5RHVja0NoYXJzAQULZHVja0Fzc2V0SWQEBWNoYXJzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0BQhjaGFyc0tleQIJMF8wXzBfMF8wAgFfBAZuZXdBY2MJAGUCBQ1mcmVlUG9pbnRzQWNjBQ9zdW1Ub0Rpc3RyaWJ1dGUJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUKZnJlZUtleUFjYwMJAGYCAAAFBm5ld0FjYwAABQZuZXdBY2MJAMwIAgkBDEludGVnZXJFbnRyeQIFC2ZyZWVLZXlEdWNrAwkAZgIAAAUGbmV3QWNjCQBkAgUOZnJlZVBvaW50c0R1Y2sFBm5ld0FjYwUOZnJlZVBvaW50c0R1Y2sJAMwIAgkBC1N0cmluZ0VudHJ5AgUIY2hhcnNLZXkJALkJAgkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDGNoYXJTdHJlbmd0aAUIc3RyZW5ndGgJAMwIAgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQxjaGFyQWNjdXJhY3kFCGFjY3VyYWN5CQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckludGVsbGVjdAUJaW50ZWxsZWN0CQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckVuZHVyYW5jZQUJZW5kdXJhbmNlCQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckRleHRlcml0eQUJZGV4dGVyaXR5BQNuaWwCAV8JAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwAAAFpARxzcGxpdEJ5R2xvYmFsV2VpZ2h0c1JFQURPTkxZAQZhbW91bnQJAJQKAgUDbmlsCQESZ2V0TmVlZGVkTWF0ZXJpYWxzAQUGYW1vdW50AWkBJHNwbGl0QnlHbG9iYWxBbmRMb2NhbFdlaWdodHNSRUFET05MWQMJbWF0QW1vdW50CXJlc0Ftb3VudAh0ZXJyYWlucwQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBBQh0ZXJyYWlucwkAlAoCBQNuaWwJAJQKAgkBEmdldE5lZWRlZE1hdGVyaWFscwEFCW1hdEFtb3VudAkBE2Rpc3RyaWJ1dGVCeVdlaWdodHMCBQlyZXNBbW91bnQFDXRlcnJhaW5Db3VudHMBaQETZ2V0QmFja3BhY2tSRUFET05MWQELZHVja0Fzc2V0SWQJAJQKAgUDbmlsCQC5CQIJAQtnZXRCYWNrcGFjawEJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkAgE6AWkBFGdldFdhcmVob3VzZVJFQURPTkxZAQtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQJbGFuZEluZGV4CQBpAgkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplBQVTU0laRQQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAJAJQKAgUDbmlsCQC6CQIJAQxnZXRXYXJlaG91c2UDCQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAIBOgFpAQpzYXZlTGFzdFR4AAMDCQECIT0CCAUBaQZjYWxsZXIFC3dsZ0NvbnRyYWN0CQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAcJAAIBAg1BY2Nlc3MgZGVuaWVkCQCUCgIJAMwIAgkBBnByb2xvZwEFAWkFA25pbAAqAWkBD3VwZGF0ZUR1Y2tTdGF0cwILZHVja0Fzc2V0SWQHZGVsdGFYUAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQFB2RlbHRhWFABaQEOdXBkYXRlQWNjU3RhdHMCBGFkZHIHZGVsdGFYUAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBQRhZGRyBQdkZWx0YVhQAWkBCWVxdWlwRHVjawEJZXF1aXBtZW50BAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQEBWVxS2V5CQEQa2V5RHVja0VxdWlwbWVudAEFC2R1Y2tBc3NldElkBAtjdXJyZW50U2VncwkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEFBWVxS2V5AhcsOyxfLDssXyw7LF8sOyxfLDssXyw7LAIBXwQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW5ld0VxCQC1CQIFCWVxdWlwbWVudAIBXwMJAQIhPQIJAJADAQUFbmV3RXEFC05VTVNFR01FTlRTCQACAQIWV3JvbmcgZXF1aXBtZW50IHN0cmluZwQGYnBQcm9kCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QECXRlbXBQcm9kQgkBBmRyZXNzQgMFC2N1cnJlbnRTZWdzCQEOcHJvZFN0clRvQnl0ZXMBBQZicFByb2QGBAhuZXdQcm9kQgkBBmRyZXNzQgMFBW5ld0VxBQl0ZW1wUHJvZEIHBApuZXdQcm9kU3RyCQEOYnl0ZXNUb1Byb2RTdHIBBQhuZXdQcm9kQgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWVxS2V5BQllcXVpcG1lbnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIFCm5ld1Byb2RTdHIFA25pbAIBOgkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAAAAWkBBHRlc3QAAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQINQWNjZXNzIGRlbmllZAQBYQkBDnByb2RTdHJUb0J5dGVzAQIABAFiCQEOYnl0ZXNUb1Byb2RTdHIBBQFhCQCUCgIFA25pbAUBYgCeIGo0",
    "height": 2673331,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EyTKrE58J62gwb1rYThaJsTaTe2KW4RFKpdV84SFua7J
Next: 7WCNFt8rezTWy1WF1PHrrtFLfSxLU2uzi7M5mhHG4QAa

Diff: 
Old
New
Differences
647
647
 
    }
648
648
 
649
649
 
650
-
func addProd (idxCnt,pList,isPositive,segment,mainAux,slot) = {
650
+
func addProdB (idxCnt,pList,isPositive,segment,mainAux,slot) = {
651
651
 
    let parts = split(idxCnt, ":")
652
652
 
    if ((size(parts) != 2))
653
653
 
        then throw("Incorrect format, should be index:amount")
663
663
 
                    else if ((count == 0))
664
664
 
                        then $Tuple2(pList, false)
665
665
 
                        else {
666
-
                            func addP (acc,item) =                             {
667
-
                                let j = acc._1
668
-
                                let curr = if ((size(pList) > j))
669
-
                                    then parseIntValue(pList[j])
670
-
                                    else 0
671
-
                                if ((productIdx != j))
672
-
                                    then $Tuple3((j + 1), (acc._2 :+ toString(curr)), acc._3)
673
-
                                    else if (if (!(isPositive))
674
-
                                        then (count > curr)
675
-
                                        else false)
676
-
                                        then throw(((((("You have " + toString(curr)) + " of ") + prodTypes[j]) + ", but tried to use ") + toString(count)))
677
-
                                        else {
678
-
                                            let isBig = if (!(isPositive))
679
-
                                                then {
680
-
                                                    let compat = split(item, "_")[rIdxSlots]
681
-
                                                    if ((compat == ""))
682
-
                                                        then throw("Item cannot be equipped")
666
+
                            let head = take(pList, (8 * productIdx))
667
+
                            let curr = toInt(take(drop(pList, (8 * productIdx)), 8))
668
+
                            let tail = drop(pList, (8 * (productIdx + 1)))
669
+
                            if (if (!(isPositive))
670
+
                                then (count > curr)
671
+
                                else false)
672
+
                                then throw(((((("You have " + toString(curr)) + " of ") + prodTypes[productIdx]) + ", but tried to use ") + toString(count)))
673
+
                                else {
674
+
                                    let isBigItem = if (!(isPositive))
675
+
                                        then {
676
+
                                            let compat = split(productionMatrix[productIdx], "_")[rIdxSlots]
677
+
                                            if ((compat == ""))
678
+
                                                then throw("Item cannot be equipped")
679
+
                                                else {
680
+
                                                    let c = parseIntValue(compat)
681
+
                                                    let cSeg = (c / 100)
682
+
                                                    if ((segment != cSeg))
683
+
                                                        then throw("Segment incompatible")
683
684
 
                                                        else {
684
-
                                                            let c = parseIntValue(compat)
685
-
                                                            let cSeg = (c / 100)
686
-
                                                            if ((segment != cSeg))
687
-
                                                                then throw("Segment incompatible")
685
+
                                                            let cMainAux = ((c % 100) / 10)
686
+
                                                            if ((mainAux != cMainAux))
687
+
                                                                then throw("Slot incompatible")
688
688
 
                                                                else {
689
-
                                                                    let cMainAux = ((c % 100) / 10)
690
-
                                                                    if ((mainAux != cMainAux))
691
-
                                                                        then throw("Slot incompatible")
692
-
                                                                        else {
693
-
                                                                            let cNumSlots = (c % 10)
694
-
                                                                            if (if ((slot != 0))
695
-
                                                                                then (cNumSlots > 1)
696
-
                                                                                else false)
697
-
                                                                                then throw("Big items should occupy slot 0")
698
-
                                                                                else (cNumSlots > 1)
699
-
                                                                            }
689
+
                                                                    let cNumSlots = (c % 10)
690
+
                                                                    if (if ((slot != 0))
691
+
                                                                        then (cNumSlots > 1)
692
+
                                                                        else false)
693
+
                                                                        then throw("Big items should occupy slot 0")
694
+
                                                                        else (cNumSlots > 1)
700
695
 
                                                                    }
701
696
 
                                                            }
702
697
 
                                                    }
703
-
                                                else false
704
-
                                            $Tuple3((j + 1), (acc._2 :+ toString((curr + (if (isPositive)
705
-
                                                then count
706
-
                                                else -(count))))), if (acc._3)
707
-
                                                then true
708
-
                                                else isBig)
709
698
 
                                            }
710
-
                                }
711
-
712
-
                            let result = {
713
-
                                let $l = productionMatrix
714
-
                                let $s = size($l)
715
-
                                let $acc0 = $Tuple3(0, nil, false)
716
-
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
717
-
                                    then $a
718
-
                                    else addP($a, $l[$i])
719
-
720
-
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
721
-
                                    then $a
722
-
                                    else throw("List size exceeds 27")
723
-
724
-
                                $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($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)
725
-
                                }
726
-
                            $Tuple2(result._2, result._3)
699
+
                                        else false
700
+
                                    $Tuple2(((head + toBytes((curr + (if (isPositive)
701
+
                                        then count
702
+
                                        else -(count))))) + tail), isBigItem)
703
+
                                    }
727
704
 
                            }
728
705
 
            }
729
706
 
    }
730
707
 
731
708
 
732
-
func slotsGroup (g,bpIn,isPositive,segment,mainAux) = if ((g != ""))
709
+
func slotsGroupB (g,bpIn,isPositive,segment,mainAux) = if ((g != ""))
733
710
 
    then {
734
711
 
        let slots = split(g, ",")
735
712
 
        if ((size(slots) > MAXSLOTS))
745
722
 
                    then bpIn
746
723
 
                    else {
747
724
 
                        let tmpS0 = if ((s0 != ""))
748
-
                            then addProd(s0, bpIn, isPositive, segment, mainAux, 0)
725
+
                            then addProdB(s0, bpIn, isPositive, segment, mainAux, 0)
749
726
 
                            else $Tuple2(bpIn, false)
750
727
 
                        if ((s1 != ""))
751
728
 
                            then if (tmpS0._2)
752
729
 
                                then throw("Big item already occupies slot")
753
-
                                else addProd(s1, tmpS0._1, isPositive, segment, mainAux, 1)._1
730
+
                                else addProdB(s1, tmpS0._1, isPositive, segment, mainAux, 1)._1
754
731
 
                            else tmpS0._1
755
732
 
                        }
756
733
 
                }
758
735
 
    else bpIn
759
736
 
760
737
 
761
-
func dress (segList,pList,isPositive) = {
738
+
func dressB (segList,pBytes,isPositive) = {
762
739
 
    func segment (acc,seg) =     {
763
740
 
        let j = acc._1
764
741
 
        let mainAux = split(seg, ";")
772
749
 
                    else false)
773
750
 
                    then $Tuple2((j + 1), acc._2)
774
751
 
                    else {
775
-
                        let tmpM = slotsGroup(m, acc._2, isPositive, j, 0)
776
-
                        $Tuple2((j + 1), slotsGroup(a, tmpM, isPositive, j, 1))
752
+
                        let tmpM = slotsGroupB(m, acc._2, isPositive, j, 0)
753
+
                        $Tuple2((j + 1), slotsGroupB(a, tmpM, isPositive, j, 1))
777
754
 
                        }
778
755
 
                }
779
756
 
        }
780
757
 
781
758
 
(    let $l = segList
782
759
 
    let $s = size($l)
783
-
    let $acc0 = $Tuple2(0, pList)
760
+
    let $acc0 = $Tuple2(0, pBytes)
784
761
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
785
762
 
        then $a
786
763
 
        else segment($a, $l[$i])
1308
1285
 
1309
1286
 
1310
1287
 
func checkClaimConditions (addr,claimMode,landAssetIdIn) = {
1311
-
    let $t02880829347 = if ((claimMode == claimModeWh))
1288
+
    let $t03158832127 = if ((claimMode == claimModeWh))
1312
1289
 
        then $Tuple2(landAssetIdIn, valueOrElse(getString(keyStakedDuckByOwner(addr)), ""))
1313
1290
 
        else {
1314
1291
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1318
1295
 
                then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
1319
1296
 
                else $Tuple2(loc[locIdxId], duckAssetId)
1320
1297
 
            }
1321
-
    let landAssetId = $t02880829347._1
1322
-
    let duckId = $t02880829347._2
1298
+
    let landAssetId = $t03158832127._1
1299
+
    let duckId = $t03158832127._2
1323
1300
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
1324
1301
 
    let timeKey = keyStakedTimeByAssetId(landAssetId)
1325
1302
 
    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("Land " + asset.name) + " is not staked"))
1367
1344
 
                                let currentPack = getBackpack(bpKey)
1368
1345
 
                                let currentPackRes = split(currentPack[bpIdxRes], "_")
1369
1346
 
                                let currentWhRes = split(currentWh[whIdxRes], "_")
1370
-
                                let $t03172132592 = if ((claimMode == claimModeWh))
1347
+
                                let $t03450135372 = if ((claimMode == claimModeWh))
1371
1348
 
                                    then $Tuple4(addRes(currentWhRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), currentPack[bpIdxRes], (parseIntValue(loft[volOccupied]) + resToClaim._2), (parseIntValue(loft[volFree]) - resToClaim._2))
1372
1349
 
                                    else if ((claimMode == claimModeDuck))
1373
1350
 
                                        then $Tuple4(currentWh[whIdxRes], addRes(currentPackRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), parseIntValue(loft[volOccupied]), parseIntValue(loft[volFree]))
1376
1353
 
                                            let whAm = min([parseIntValue(loft[volFree]), resToClaim._2])
1377
1354
 
                                            $Tuple4(distr._1, distr._2, (parseIntValue(loft[volOccupied]) + whAm), (parseIntValue(loft[volFree]) - whAm))
1378
1355
 
                                            }
1379
-
                                let whRes = $t03172132592._1
1380
-
                                let bpRes = $t03172132592._2
1381
-
                                let loftO = $t03172132592._3
1382
-
                                let loftF = $t03172132592._4
1356
+
                                let whRes = $t03450135372._1
1357
+
                                let bpRes = $t03450135372._2
1358
+
                                let loftO = $t03450135372._3
1359
+
                                let loftF = $t03450135372._4
1383
1360
 
                                $Tuple5([IntegerEntry(keyStakedTimeByAssetId(c._2), newTimestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, c._2, addr), newTimestamp)], bpKey, [currentPack[bpIdxLevel], bpRes, currentPack[bpIdxMat], currentPack[bpIdxProd]], whKey, [currentWh[whIdxLevels], whRes, currentWh[whIdxMat], currentWh[whIdxProd], makeString([loft[volLocked], toString(loftO), toString(loftF), loft[volTotal]], "_")])
1384
1361
 
                                }
1385
1362
 
                        }
2527
2504
 
                then throw("Wrong equipment string")
2528
2505
 
                else {
2529
2506
 
                    let bpProd = currentPack[bpIdxProd]
2530
-
                    let pList = if ((bpProd == ""))
2531
-
                        then nil
2532
-
                        else split(bpProd, "_")
2533
-
                    let tempProd = dress(currentSegs, pList, true)
2534
-
                    let newProd = dress(newEq, tempProd, false)
2535
-
                    $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(newProd, "_")], ":")), prologAction], 0)
2507
+
                    let tempProdB = dressB(currentSegs, prodStrToBytes(bpProd), true)
2508
+
                    let newProdB = dressB(newEq, tempProdB, false)
2509
+
                    let newProdStr = bytesToProdStr(newProdB)
2510
+
                    $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProdStr], ":")), prologAction], 0)
2536
2511
 
                    }
2537
2512
 
            }
2538
2513
 
    }
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func keyLastArbTimeByUser (addr) = ("lastArbTimeUser_" + addr)
5
5
 
6
6
 
7
7
 
let SCALE8 = 100000000
8
8
 
9
9
 
let xpLevelScale = 3200
10
10
 
11
11
 
let xpLevelRecipPow = 4000
12
12
 
13
13
 
let numPointsOnLevelUp = 3
14
14
 
15
15
 
let charStrength = 0
16
16
 
17
17
 
let charAccuracy = 1
18
18
 
19
19
 
let charIntellect = 2
20
20
 
21
21
 
let charEndurance = 3
22
22
 
23
23
 
let charDexterity = 4
24
24
 
25
25
 
let NUMSEGMENTS = 6
26
26
 
27
27
 
let NUMMAINAUX = 2
28
28
 
29
29
 
let MAXSLOTS = 2
30
30
 
31
31
 
func keyDuckChars (duckAssetId) = ("duckChars_" + duckAssetId)
32
32
 
33
33
 
34
34
 
func keyDuckXP (duckAssetId) = ("duckXP_" + duckAssetId)
35
35
 
36
36
 
37
37
 
func keyDuckLevel (duckAssetId) = ("duckLevel_" + duckAssetId)
38
38
 
39
39
 
40
40
 
func keyDuckFreePoints (duckAssetId) = ("duckFreePoints_" + duckAssetId)
41
41
 
42
42
 
43
43
 
func keyDuckEquipment (duckAssetId) = ("duckEquipment_" + duckAssetId)
44
44
 
45
45
 
46
46
 
func keyUserXP (addr) = ("userXP_" + addr)
47
47
 
48
48
 
49
49
 
func keyUserLevel (addr) = ("userLevel_" + addr)
50
50
 
51
51
 
52
52
 
func keyUserFreePoints (addr) = ("userFreePoints_" + addr)
53
53
 
54
54
 
55
55
 
let xpClaim = 100000
56
56
 
57
57
 
let xpSuccessFlight = 50000
58
58
 
59
59
 
let xpFailFlight = 10000
60
60
 
61
61
 
let xpCallES = 100000
62
62
 
63
63
 
let xpCustomName = 5000000
64
64
 
65
65
 
let xpNewSLand = 50000000
66
66
 
67
67
 
let xpUpgradeInfra = 100000
68
68
 
69
69
 
let xpMerge = 10000000
70
70
 
71
71
 
let xpOnboard = 10000000
72
72
 
73
73
 
let xpHeal = 10000
74
74
 
75
75
 
func levelByXP (xp) = fraction(xpLevelScale, pow(xp, 4, xpLevelRecipPow, 4, 4, DOWN), SCALE8)
76
76
 
77
77
 
78
78
 
func maxHealth (level) = (100 + level)
79
79
 
80
80
 
81
81
 
func levelUp (currLevel,newXP) = {
82
82
 
    let newLevel = levelByXP(newXP)
83
83
 
[newLevel, (numPointsOnLevelUp * (newLevel - currLevel))]
84
84
 
    }
85
85
 
86
86
 
87
87
 
let LANDPREFIX = "LAND"
88
88
 
89
89
 
let DUCKPREFIX = "DUCK"
90
90
 
91
91
 
let ARTPRESALE = "PRESALE"
92
92
 
93
93
 
let NUMRES = 6
94
94
 
95
95
 
let DAILYRESBYPIECE = 3456000
96
96
 
97
97
 
let DAYMILLIS = 86400000
98
98
 
99
99
 
let WHMULTIPLIER = 10000000000
100
100
 
101
101
 
let DEFAULTLOCATION = "Africa_F_Africa"
102
102
 
103
103
 
let RESOURCEPRICEMIN = 39637
104
104
 
105
105
 
let ESSELLCOEF = 10
106
106
 
107
107
 
let prodTypes = ["First Aid Kit L1", "First Aid Kit L2", "First Aid Kit L3", "Backpack L1", "Backpack L2", "Backpack L3", "Food Ration L1", "Food Ration L2", "Food Ration L3", "Jet Pack L1", "Jet Pack L2", "Jet Pack L3", "Shield L1", "Shield L2", "Shield L3"]
108
108
 
109
109
 
let continents = ["Americas", "Europe", "Asia", "Africa", "Oceania"]
110
110
 
111
111
 
let COEFF2MAT = 10000000
112
112
 
113
113
 
let productionMatrix = ["8_8_8_17_17_42_12_0_30_0,0,0,0,0,0,0_", "8_8_8_17_17_42_24_0_60_0,0,5,2,0,0,0_", "8_8_8_17_17_42_36_0_120_0,0,10,4,0,0,0_", "8_19_19_8_27_19_26_1_20_0,0,0,0,0,0,0_001", "8_19_19_8_27_19_52_1_40_0,0,0,0,0,0,0_001", "8_19_19_8_27_19_78_1_80_0,0,0,0,0,0,0_001", "8_8_8_8_8_60_13_2_2_0,0,0,0,0,0,0_", "8_8_8_8_8_60_26_2_4_0,0,0,0,0,0,0_", "8_8_8_8_8_60_39_2_8_0,0,0,0,0,0,0_", "30_30_3_17_17_3_30_3_30_0,0,0,0,0,0,0_111", "30_30_3_17_17_3_60_3_50_0,0,0,0,0,0,0_111", "30_30_3_17_17_3_90_3_70_0,0,0,0,0,0,0_111", "18_18_10_18_18_18_11_4_30_0,0,0,0,0,0,0_201", "18_18_10_18_18_18_22_4_50_0,0,0,0,0,0,0_201", "18_18_10_18_18_18_33_4_70_0,0,0,0,0,0,0_201"]
114
114
 
115
115
 
let rIdxCoeff = 6
116
116
 
117
117
 
let rIdxSlots = 10
118
118
 
119
119
 
let PRODUCTPKGSIZE = 10
120
120
 
121
121
 
let whIdxLevels = 0
122
122
 
123
123
 
let whIdxRes = 1
124
124
 
125
125
 
let whIdxMat = 2
126
126
 
127
127
 
let whIdxProd = 3
128
128
 
129
129
 
let whIdxLOFT = 4
130
130
 
131
131
 
let volLocked = 0
132
132
 
133
133
 
let volOccupied = 1
134
134
 
135
135
 
let volFree = 2
136
136
 
137
137
 
let volTotal = 3
138
138
 
139
139
 
let bpIdxLevel = 0
140
140
 
141
141
 
let bpIdxRes = 1
142
142
 
143
143
 
let bpIdxMat = 2
144
144
 
145
145
 
let bpIdxProd = 3
146
146
 
147
147
 
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
148
148
 
149
149
 
150
150
 
func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
151
151
 
152
152
 
153
153
 
func keyLandAssetIdToCustomName (assetId) = ("landCustomNameByAssetId_" + assetId)
154
154
 
155
155
 
156
156
 
func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
157
157
 
158
158
 
159
159
 
func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
160
160
 
161
161
 
162
162
 
func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["landArtStatus", type, assetId], "_")
163
163
 
164
164
 
165
165
 
func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("stakedTimeByTypeAssetIdAndOwner_" + nftType) + "_") + assetId) + "_") + ownerAddr)
166
166
 
167
167
 
168
168
 
func keyWarehouseByLand (landAssetId) = ("wareHouse_" + landAssetId)
169
169
 
170
170
 
171
171
 
func keyDuckAssetIdToCustomName (assetId) = ("duckCustomNameByAssetId_" + assetId)
172
172
 
173
173
 
174
174
 
func keyAddressToCustomName (addr) = ("accountCustomNameByAddr_" + addr)
175
175
 
176
176
 
177
177
 
func keyAddressRefBy (addr) = ("accRefBy_" + addr)
178
178
 
179
179
 
180
180
 
func keyOnboardArtActivatedOnDuck (duckAssetId) = ("onboardArtActivatedOnDuck_" + duckAssetId)
181
181
 
182
182
 
183
183
 
func keyOnboardArtDuckActivatedBy (addr) = ("onboardArtActivatedDuckBy_" + addr)
184
184
 
185
185
 
186
186
 
func keyAddressReferrals (addr) = ("accReferrals_" + addr)
187
187
 
188
188
 
189
189
 
func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
190
190
 
191
191
 
192
192
 
func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
193
193
 
194
194
 
195
195
 
func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
196
196
 
197
197
 
198
198
 
func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
199
199
 
200
200
 
201
201
 
func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
202
202
 
203
203
 
204
204
 
func keyBlocked () = "contractsBlocked"
205
205
 
206
206
 
207
207
 
func keyUserGwlReleaseTime (userAddr) = ("%s%s__userGwlReleaseTime__" + userAddr)
208
208
 
209
209
 
210
210
 
func keyEsWarehouse () = "emergencyWarehouseProducts"
211
211
 
212
212
 
213
213
 
let locIdxType = 1
214
214
 
215
215
 
let locIdxId = 2
216
216
 
217
217
 
func getRecipeMaterials (recipe) = (parseIntValue(recipe[rIdxCoeff]) * COEFF2MAT)
218
218
 
219
219
 
220
220
 
let KSALLOWXPLEVELS = true
221
221
 
222
222
 
let chain = take(drop(this.bytes, 1), 1)
223
223
 
224
224
 
let usdtAssetId = match chain {
225
225
 
    case _ => 
226
226
 
        if ((base58'2W' == $match0))
227
227
 
            then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
228
228
 
            else if ((base58'2T' == $match0))
229
229
 
                then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
230
230
 
                else throw("Unknown chain")
231
231
 
}
232
232
 
233
233
 
let defaultRestAddressStr = match chain {
234
234
 
    case _ => 
235
235
 
        if ((base58'2W' == $match0))
236
236
 
            then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
237
237
 
            else if ((base58'2T' == $match0))
238
238
 
                then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
239
239
 
                else throw("Unknown chain")
240
240
 
}
241
241
 
242
242
 
let InfraUpgradeCostS = match chain {
243
243
 
    case _ => 
244
244
 
        if ((base58'2W' == $match0))
245
245
 
            then 10000000000
246
246
 
            else if ((base58'2T' == $match0))
247
247
 
                then 100000000
248
248
 
                else throw("Unknown chain")
249
249
 
}
250
250
 
251
251
 
let arbitrageDelay = match chain {
252
252
 
    case _ => 
253
253
 
        if ((base58'2W' == $match0))
254
254
 
            then 600000
255
255
 
            else if ((base58'2T' == $match0))
256
256
 
                then 60000
257
257
 
                else throw("Unknown chain")
258
258
 
}
259
259
 
260
260
 
let SEP = "__"
261
261
 
262
262
 
let MULT6 = 1000000
263
263
 
264
264
 
let MULT8 = 100000000
265
265
 
266
266
 
let SSIZE = 25
267
267
 
268
268
 
let MSIZE = 100
269
269
 
270
270
 
let LSIZE = 225
271
271
 
272
272
 
let XLSIZE = 400
273
273
 
274
274
 
let XXLSIZE = 625
275
275
 
276
276
 
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
277
277
 
278
278
 
279
279
 
let IdxCfgStakingDapp = 1
280
280
 
281
281
 
let IdxCfgEconomyDapp = 2
282
282
 
283
283
 
let IdxCfgGovernanceDapp = 3
284
284
 
285
285
 
let IdxCfgWlgDapp = 4
286
286
 
287
287
 
func keyRestCfg () = "%s__restConfig"
288
288
 
289
289
 
290
290
 
func keyRestAddress () = "%s__restAddr"
291
291
 
292
292
 
293
293
 
func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
294
294
 
295
295
 
296
296
 
func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
297
297
 
298
298
 
299
299
 
let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
300
300
 
301
301
 
let restCfg = readRestCfgOrFail(restContract)
302
302
 
303
303
 
let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
304
304
 
305
305
 
let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
306
306
 
307
307
 
let govContract = getContractAddressOrFail(restCfg, IdxCfgGovernanceDapp)
308
308
 
309
309
 
let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
310
310
 
311
311
 
let recLandNum = 0
312
312
 
313
313
 
let recLandSize = 1
314
314
 
315
315
 
let recTerrains = 2
316
316
 
317
317
 
let recContinent = 3
318
318
 
319
319
 
func keyResProportions () = "resTypesProportions"
320
320
 
321
321
 
322
322
 
func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
323
323
 
324
324
 
325
325
 
func keyStakedPiecesByOwner (ownerAddr) = ("stakedPiecesByOwner_" + ownerAddr)
326
326
 
327
327
 
328
328
 
func asString (v) = match v {
329
329
 
    case s: String => 
330
330
 
        s
331
331
 
    case _ => 
332
332
 
        throw("fail to cast into String")
333
333
 
}
334
334
 
335
335
 
336
336
 
func asInt (v) = match v {
337
337
 
    case n: Int => 
338
338
 
        n
339
339
 
    case _ => 
340
340
 
        throw("fail to cast into Int")
341
341
 
}
342
342
 
343
343
 
344
344
 
func numPiecesBySize (landSize) = match landSize {
345
345
 
    case _ => 
346
346
 
        if (("S" == $match0))
347
347
 
            then SSIZE
348
348
 
            else if (("M" == $match0))
349
349
 
                then MSIZE
350
350
 
                else if (("L" == $match0))
351
351
 
                    then LSIZE
352
352
 
                    else if (("XL" == $match0))
353
353
 
                        then XLSIZE
354
354
 
                        else if (("XXL" == $match0))
355
355
 
                            then XXLSIZE
356
356
 
                            else throw("Unknown land size")
357
357
 
}
358
358
 
359
359
 
360
360
 
let incubatorAddr = match chain {
361
361
 
    case _ => 
362
362
 
        if ((base58'2W' == $match0))
363
363
 
            then addressFromStringValue("3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv")
364
364
 
            else if ((base58'2T' == $match0))
365
365
 
                then this
366
366
 
                else throw("Unknown chain")
367
367
 
}
368
368
 
369
369
 
let breederAddr = match chain {
370
370
 
    case _ => 
371
371
 
        if ((base58'2W' == $match0))
372
372
 
            then addressFromStringValue("3PDVuU45H7Eh5dmtNbnRNRStGwULA7NY6Hb")
373
373
 
            else if ((base58'2T' == $match0))
374
374
 
                then this
375
375
 
                else throw("Unknown chain")
376
376
 
}
377
377
 
378
378
 
let pub = base58'6LfPuKJjLgekmncBhMg2LZyMTNVzZBccXR28ySXm9uXD'
379
379
 
380
380
 
let medKitHp = [30, 60, 120]
381
381
 
382
382
 
let FIVEMINUTESMILLIS = 300000
383
383
 
384
384
 
let RENAMINGCOST = 5000000
385
385
 
386
386
 
let MAXNAMELEN = 50
387
387
 
388
388
 
let InfraUpgradeCostSUsdt = 10000000
389
389
 
390
390
 
let EXPMATERIALS = match chain {
391
391
 
    case _ => 
392
392
 
        if ((base58'2W' == $match0))
393
393
 
            then 252289527462
394
394
 
            else if ((base58'2T' == $match0))
395
395
 
                then 2522895274
396
396
 
                else throw("Unknown chain")
397
397
 
}
398
398
 
399
399
 
let EXPUSDT = match chain {
400
400
 
    case _ => 
401
401
 
        if ((base58'2W' == $match0))
402
402
 
            then 250000000
403
403
 
            else if ((base58'2T' == $match0))
404
404
 
                then 250000000
405
405
 
                else throw("Unknown chain")
406
406
 
}
407
407
 
408
408
 
let FIVEX = toBigInt(5)
409
409
 
410
410
 
let TWENTYX = toBigInt(20)
411
411
 
412
412
 
let TWENTY2X = toBigInt((20 * 20))
413
413
 
414
414
 
let TWENTY3X = toBigInt(((20 * 20) * 20))
415
415
 
416
416
 
let TWENTY4X = toBigInt((((20 * 20) * 20) * 20))
417
417
 
418
418
 
let TWENTY5X = toBigInt(((((20 * 20) * 20) * 20) * 20))
419
419
 
420
420
 
let PRESALENUMLANDS = 500
421
421
 
422
422
 
func keyNextFreeLandNum () = "nextLandNum"
423
423
 
424
424
 
425
425
 
func keyLandToAssetId (landNum) = ("landToAsset_" + landNum)
426
426
 
427
427
 
428
428
 
func keyLandCustomNameToAssetId (name) = ("landByCustomName_" + name)
429
429
 
430
430
 
431
431
 
func keyInfraLevelByAssetIdAndOwner (assetId,ownerAddr) = ((("infraLevelByAssetIdAndOwner_" + assetId) + "_") + ownerAddr)
432
432
 
433
433
 
434
434
 
func keyLandArtStatusByTypeAssetIdAndOwner (type,assetId,ownerAddr) = makeString(["landArtStatusByTypeAssetIdAndOwner", type, assetId, ownerAddr], "_")
435
435
 
436
436
 
437
437
 
func keyLandNumToOwner (landNum) = ("landOwner_" + landNum)
438
438
 
439
439
 
440
440
 
func keyDuckCustomNameToAssetId (name) = ("duckByCustomName_" + name)
441
441
 
442
442
 
443
443
 
func keyCustomNameToAddress (name) = ("accountByCustomName_" + name)
444
444
 
445
445
 
446
446
 
func keyOldies () = "oldiesList"
447
447
 
448
448
 
449
449
 
let claimModeWh = 0
450
450
 
451
451
 
let claimModeDuck = 1
452
452
 
453
453
 
let claimModeWhThenDuck = 2
454
454
 
455
455
 
let flHealth = 0
456
456
 
457
457
 
let flTimestamp = 5
458
458
 
459
459
 
let flBonus = 6
460
460
 
461
461
 
let flProdsUsed = 7
462
462
 
463
463
 
func nftName (landNum,landSize) = ((LANDPREFIX + landNum) + landSize)
464
464
 
465
465
 
466
466
 
func distributeByWeights (total,weights) = {
467
467
 
    let sum = (((((weights[0] + weights[1]) + weights[2]) + weights[3]) + weights[4]) + weights[5])
468
468
 
    if ((0 >= sum))
469
469
 
        then throw("Zero weights sum")
470
470
 
        else {
471
471
 
            let norm6 = fraction(total, MULT6, sum)
472
472
 
            func normalizer (acc,elem) =             (acc :+ fraction(elem, norm6, MULT6))
473
473
 
474
474
 
            let $l = weights
475
475
 
            let $s = size($l)
476
476
 
            let $acc0 = nil
477
477
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
478
478
 
                then $a
479
479
 
                else normalizer($a, $l[$i])
480
480
 
481
481
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
482
482
 
                then $a
483
483
 
                else throw("List size exceeds 6")
484
484
 
485
485
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
486
486
 
            }
487
487
 
    }
488
488
 
489
489
 
490
490
 
func getNeededMaterials (total) = {
491
491
 
    let props = split(value(getString(keyResProportions())), "_")
492
492
 
    if ((size(props) != NUMRES))
493
493
 
        then throw("Wrong proportions data")
494
494
 
        else {
495
495
 
            let r = [parseIntValue(props[0]), parseIntValue(props[1]), parseIntValue(props[2]), parseIntValue(props[3]), parseIntValue(props[4]), parseIntValue(props[5])]
496
496
 
            distributeByWeights(total, r)
497
497
 
            }
498
498
 
    }
499
499
 
500
500
 
501
501
 
func subtractMaterials (shouldUseMat,has,totalNeed) = {
502
502
 
    let need = getNeededMaterials(totalNeed)
503
503
 
    func subtractor (acc,idx) =     {
504
504
 
        let result = (parseIntValue(has[idx]) - need[idx])
505
505
 
        if ((0 > result))
506
506
 
            then throw(((((("Not enough material idx=" + toString(idx)) + ", you have ") + has[idx]) + ", but need ") + toString(need[idx])))
507
507
 
            else (acc :+ toString(result))
508
508
 
        }
509
509
 
510
510
 
    if (shouldUseMat)
511
511
 
        then {
512
512
 
            let $l = [0, 1, 2, 3, 4, 5]
513
513
 
            let $s = size($l)
514
514
 
            let $acc0 = nil
515
515
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
516
516
 
                then $a
517
517
 
                else subtractor($a, $l[$i])
518
518
 
519
519
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
520
520
 
                then $a
521
521
 
                else throw("List size exceeds 6")
522
522
 
523
523
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
524
524
 
            }
525
525
 
        else has
526
526
 
    }
527
527
 
528
528
 
529
529
 
func subtractProducts (pHas,pUsed) = if ((pUsed == ""))
530
530
 
    then pHas
531
531
 
    else {
532
532
 
        let pList = if ((pHas == ""))
533
533
 
            then nil
534
534
 
            else split(pHas, "_")
535
535
 
        func subP (acc,item) =         {
536
536
 
            let j = acc._1
537
537
 
            func checkUsed (ac,idxAmt) =             {
538
538
 
                let parts = split(idxAmt, ",")
539
539
 
                if ((size(parts) != 2))
540
540
 
                    then throw("Incorrect format, should be index,amount")
541
541
 
                    else {
542
542
 
                        let idx = parseIntValue(parts[0])
543
543
 
                        if (if ((0 > idx))
544
544
 
                            then true
545
545
 
                            else (idx >= size(productionMatrix)))
546
546
 
                            then throw("Unknown product idx")
547
547
 
                            else if ((idx != j))
548
548
 
                                then ac
549
549
 
                                else {
550
550
 
                                    let amt = parseIntValue(parts[1])
551
551
 
                                    if ((0 >= amt))
552
552
 
                                        then throw("Pass only positive amounts")
553
553
 
                                        else (ac + amt)
554
554
 
                                    }
555
555
 
                        }
556
556
 
                }
557
557
 
558
558
 
            let a = {
559
559
 
                let $l = split(pUsed, "_")
560
560
 
                let $s = size($l)
561
561
 
                let $acc0 = 0
562
562
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
563
563
 
                    then $a
564
564
 
                    else checkUsed($a, $l[$i])
565
565
 
566
566
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
567
567
 
                    then $a
568
568
 
                    else throw("List size exceeds 10")
569
569
 
570
570
 
                $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)
571
571
 
                }
572
572
 
            let curr = if ((size(pList) > j))
573
573
 
                then parseIntValue(pList[j])
574
574
 
                else 0
575
575
 
            let newAmt = if ((curr >= a))
576
576
 
                then (curr - a)
577
577
 
                else throw(((((("You have " + toString(curr)) + " of ") + prodTypes[j]) + ", but tried to use ") + toString(a)))
578
578
 
            $Tuple2((j + 1), (acc._2 :+ toString(newAmt)))
579
579
 
            }
580
580
 
581
581
 
        let newProd = {
582
582
 
            let $l = productionMatrix
583
583
 
            let $s = size($l)
584
584
 
            let $acc0 = $Tuple2(0, nil)
585
585
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
586
586
 
                then $a
587
587
 
                else subP($a, $l[$i])
588
588
 
589
589
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
590
590
 
                then $a
591
591
 
                else throw("List size exceeds 50")
592
592
 
593
593
 
            $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($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)
594
594
 
            }
595
595
 
        makeString(newProd._2, "_")
596
596
 
        }
597
597
 
598
598
 
599
599
 
func prodStrToBytes (prodStr) = {
600
600
 
    let pList = if ((prodStr == ""))
601
601
 
        then nil
602
602
 
        else split(prodStr, "_")
603
603
 
    func toBV (acc,recipe) =     {
604
604
 
        let j = (size(acc) / 8)
605
605
 
        let curr = if ((size(pList) > j))
606
606
 
            then parseIntValue(pList[j])
607
607
 
            else 0
608
608
 
        (acc + toBytes(curr))
609
609
 
        }
610
610
 
611
611
 
    let $l = productionMatrix
612
612
 
    let $s = size($l)
613
613
 
    let $acc0 = base58''
614
614
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
615
615
 
        then $a
616
616
 
        else toBV($a, $l[$i])
617
617
 
618
618
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
619
619
 
        then $a
620
620
 
        else throw("List size exceeds 50")
621
621
 
622
622
 
    $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($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)
623
623
 
    }
624
624
 
625
625
 
626
626
 
func bytesToProdStr (bv) = {
627
627
 
    func fromBV (acc,recipe) =     {
628
628
 
        let j = size(acc)
629
629
 
        let b = take(drop(bv, (8 * j)), 8)
630
630
 
        (acc :+ toString(toInt(b)))
631
631
 
        }
632
632
 
633
633
 
    makeString({
634
634
 
        let $l = productionMatrix
635
635
 
        let $s = size($l)
636
636
 
        let $acc0 = nil
637
637
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
638
638
 
            then $a
639
639
 
            else fromBV($a, $l[$i])
640
640
 
641
641
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
642
642
 
            then $a
643
643
 
            else throw("List size exceeds 50")
644
644
 
645
645
 
        $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($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)
646
646
 
        }, "_")
647
647
 
    }
648
648
 
649
649
 
650
-
func addProd (idxCnt,pList,isPositive,segment,mainAux,slot) = {
650
+
func addProdB (idxCnt,pList,isPositive,segment,mainAux,slot) = {
651
651
 
    let parts = split(idxCnt, ":")
652
652
 
    if ((size(parts) != 2))
653
653
 
        then throw("Incorrect format, should be index:amount")
654
654
 
        else {
655
655
 
            let productIdx = parseIntValue(parts[0])
656
656
 
            let count = parseIntValue(parts[1])
657
657
 
            if (if ((0 > productIdx))
658
658
 
                then true
659
659
 
                else (productIdx >= size(productionMatrix)))
660
660
 
                then throw("Unknown product idx")
661
661
 
                else if ((0 > count))
662
662
 
                    then throw("Count can't be negative")
663
663
 
                    else if ((count == 0))
664
664
 
                        then $Tuple2(pList, false)
665
665
 
                        else {
666
-
                            func addP (acc,item) =                             {
667
-
                                let j = acc._1
668
-
                                let curr = if ((size(pList) > j))
669
-
                                    then parseIntValue(pList[j])
670
-
                                    else 0
671
-
                                if ((productIdx != j))
672
-
                                    then $Tuple3((j + 1), (acc._2 :+ toString(curr)), acc._3)
673
-
                                    else if (if (!(isPositive))
674
-
                                        then (count > curr)
675
-
                                        else false)
676
-
                                        then throw(((((("You have " + toString(curr)) + " of ") + prodTypes[j]) + ", but tried to use ") + toString(count)))
677
-
                                        else {
678
-
                                            let isBig = if (!(isPositive))
679
-
                                                then {
680
-
                                                    let compat = split(item, "_")[rIdxSlots]
681
-
                                                    if ((compat == ""))
682
-
                                                        then throw("Item cannot be equipped")
666
+
                            let head = take(pList, (8 * productIdx))
667
+
                            let curr = toInt(take(drop(pList, (8 * productIdx)), 8))
668
+
                            let tail = drop(pList, (8 * (productIdx + 1)))
669
+
                            if (if (!(isPositive))
670
+
                                then (count > curr)
671
+
                                else false)
672
+
                                then throw(((((("You have " + toString(curr)) + " of ") + prodTypes[productIdx]) + ", but tried to use ") + toString(count)))
673
+
                                else {
674
+
                                    let isBigItem = if (!(isPositive))
675
+
                                        then {
676
+
                                            let compat = split(productionMatrix[productIdx], "_")[rIdxSlots]
677
+
                                            if ((compat == ""))
678
+
                                                then throw("Item cannot be equipped")
679
+
                                                else {
680
+
                                                    let c = parseIntValue(compat)
681
+
                                                    let cSeg = (c / 100)
682
+
                                                    if ((segment != cSeg))
683
+
                                                        then throw("Segment incompatible")
683
684
 
                                                        else {
684
-
                                                            let c = parseIntValue(compat)
685
-
                                                            let cSeg = (c / 100)
686
-
                                                            if ((segment != cSeg))
687
-
                                                                then throw("Segment incompatible")
685
+
                                                            let cMainAux = ((c % 100) / 10)
686
+
                                                            if ((mainAux != cMainAux))
687
+
                                                                then throw("Slot incompatible")
688
688
 
                                                                else {
689
-
                                                                    let cMainAux = ((c % 100) / 10)
690
-
                                                                    if ((mainAux != cMainAux))
691
-
                                                                        then throw("Slot incompatible")
692
-
                                                                        else {
693
-
                                                                            let cNumSlots = (c % 10)
694
-
                                                                            if (if ((slot != 0))
695
-
                                                                                then (cNumSlots > 1)
696
-
                                                                                else false)
697
-
                                                                                then throw("Big items should occupy slot 0")
698
-
                                                                                else (cNumSlots > 1)
699
-
                                                                            }
689
+
                                                                    let cNumSlots = (c % 10)
690
+
                                                                    if (if ((slot != 0))
691
+
                                                                        then (cNumSlots > 1)
692
+
                                                                        else false)
693
+
                                                                        then throw("Big items should occupy slot 0")
694
+
                                                                        else (cNumSlots > 1)
700
695
 
                                                                    }
701
696
 
                                                            }
702
697
 
                                                    }
703
-
                                                else false
704
-
                                            $Tuple3((j + 1), (acc._2 :+ toString((curr + (if (isPositive)
705
-
                                                then count
706
-
                                                else -(count))))), if (acc._3)
707
-
                                                then true
708
-
                                                else isBig)
709
698
 
                                            }
710
-
                                }
711
-
712
-
                            let result = {
713
-
                                let $l = productionMatrix
714
-
                                let $s = size($l)
715
-
                                let $acc0 = $Tuple3(0, nil, false)
716
-
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
717
-
                                    then $a
718
-
                                    else addP($a, $l[$i])
719
-
720
-
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
721
-
                                    then $a
722
-
                                    else throw("List size exceeds 27")
723
-
724
-
                                $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($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)
725
-
                                }
726
-
                            $Tuple2(result._2, result._3)
699
+
                                        else false
700
+
                                    $Tuple2(((head + toBytes((curr + (if (isPositive)
701
+
                                        then count
702
+
                                        else -(count))))) + tail), isBigItem)
703
+
                                    }
727
704
 
                            }
728
705
 
            }
729
706
 
    }
730
707
 
731
708
 
732
-
func slotsGroup (g,bpIn,isPositive,segment,mainAux) = if ((g != ""))
709
+
func slotsGroupB (g,bpIn,isPositive,segment,mainAux) = if ((g != ""))
733
710
 
    then {
734
711
 
        let slots = split(g, ",")
735
712
 
        if ((size(slots) > MAXSLOTS))
736
713
 
            then throw("Wrong slots format")
737
714
 
            else {
738
715
 
                let s0 = slots[0]
739
716
 
                let s1 = if ((size(slots) > 1))
740
717
 
                    then slots[1]
741
718
 
                    else ""
742
719
 
                if (if ((s0 == ""))
743
720
 
                    then (s1 == "")
744
721
 
                    else false)
745
722
 
                    then bpIn
746
723
 
                    else {
747
724
 
                        let tmpS0 = if ((s0 != ""))
748
-
                            then addProd(s0, bpIn, isPositive, segment, mainAux, 0)
725
+
                            then addProdB(s0, bpIn, isPositive, segment, mainAux, 0)
749
726
 
                            else $Tuple2(bpIn, false)
750
727
 
                        if ((s1 != ""))
751
728
 
                            then if (tmpS0._2)
752
729
 
                                then throw("Big item already occupies slot")
753
-
                                else addProd(s1, tmpS0._1, isPositive, segment, mainAux, 1)._1
730
+
                                else addProdB(s1, tmpS0._1, isPositive, segment, mainAux, 1)._1
754
731
 
                            else tmpS0._1
755
732
 
                        }
756
733
 
                }
757
734
 
        }
758
735
 
    else bpIn
759
736
 
760
737
 
761
-
func dress (segList,pList,isPositive) = {
738
+
func dressB (segList,pBytes,isPositive) = {
762
739
 
    func segment (acc,seg) =     {
763
740
 
        let j = acc._1
764
741
 
        let mainAux = split(seg, ";")
765
742
 
        if ((size(mainAux) != NUMMAINAUX))
766
743
 
            then throw("Wrong segment format")
767
744
 
            else {
768
745
 
                let m = mainAux[0]
769
746
 
                let a = mainAux[1]
770
747
 
                if (if ((m == ""))
771
748
 
                    then (a == "")
772
749
 
                    else false)
773
750
 
                    then $Tuple2((j + 1), acc._2)
774
751
 
                    else {
775
-
                        let tmpM = slotsGroup(m, acc._2, isPositive, j, 0)
776
-
                        $Tuple2((j + 1), slotsGroup(a, tmpM, isPositive, j, 1))
752
+
                        let tmpM = slotsGroupB(m, acc._2, isPositive, j, 0)
753
+
                        $Tuple2((j + 1), slotsGroupB(a, tmpM, isPositive, j, 1))
777
754
 
                        }
778
755
 
                }
779
756
 
        }
780
757
 
781
758
 
(    let $l = segList
782
759
 
    let $s = size($l)
783
-
    let $acc0 = $Tuple2(0, pList)
760
+
    let $acc0 = $Tuple2(0, pBytes)
784
761
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
785
762
 
        then $a
786
763
 
        else segment($a, $l[$i])
787
764
 
788
765
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
789
766
 
        then $a
790
767
 
        else throw("List size exceeds 6")
791
768
 
792
769
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6))._2
793
770
 
    }
794
771
 
795
772
 
796
773
 
func updateProportionsInternal (propList,terrainCounts,landSizeIndex,sign) = if ((size(propList) != NUMRES))
797
774
 
    then throw("Wrong proportions data")
798
775
 
    else {
799
776
 
        func updater (acc,i) =         {
800
777
 
            let result = (parseIntValue(propList[i]) + ((sign * terrainCounts[i]) * landSizeIndex))
801
778
 
            if ((0 > result))
802
779
 
                then throw(((((((("Panic! Pieces of type=" + toString(i)) + ", sign=") + toString(sign)) + ",  terrainCounts[i]=") + toString(terrainCounts[i])) + ", landSizeIndex=") + toString(landSizeIndex)))
803
780
 
                else (acc :+ toString(result))
804
781
 
            }
805
782
 
806
783
 
        let r = {
807
784
 
            let $l = [0, 1, 2, 3, 4, 5]
808
785
 
            let $s = size($l)
809
786
 
            let $acc0 = nil
810
787
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
811
788
 
                then $a
812
789
 
                else updater($a, $l[$i])
813
790
 
814
791
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
815
792
 
                then $a
816
793
 
                else throw("List size exceeds 6")
817
794
 
818
795
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
819
796
 
            }
820
797
 
        makeString(r, "_")
821
798
 
        }
822
799
 
823
800
 
824
801
 
func updateProportions (terrainCounts,landSizeIndex,sign) = {
825
802
 
    let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
826
803
 
    updateProportionsInternal(propList, terrainCounts, landSizeIndex, sign)
827
804
 
    }
828
805
 
829
806
 
830
807
 
func countTerrains (terrains) = [(size(split(terrains, "A")) - 1), (size(split(terrains, "B")) - 1), (size(split(terrains, "C")) - 1), (size(split(terrains, "D")) - 1), (size(split(terrains, "E")) - 1), (size(split(terrains, "F")) - 1)]
831
808
 
832
809
 
833
810
 
func addRes (currentRes,terrainCounts,deltaTime,landSizeIndex,dailyByPieceWithBonuses) = {
834
811
 
    func adder (acc,i) =     {
835
812
 
        let resOfType = ((fraction(deltaTime, dailyByPieceWithBonuses, DAYMILLIS) * terrainCounts[i]) * landSizeIndex)
836
813
 
        (acc :+ toString((parseIntValue(currentRes[i]) + resOfType)))
837
814
 
        }
838
815
 
839
816
 
    let r = {
840
817
 
        let $l = [0, 1, 2, 3, 4, 5]
841
818
 
        let $s = size($l)
842
819
 
        let $acc0 = nil
843
820
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
844
821
 
            then $a
845
822
 
            else adder($a, $l[$i])
846
823
 
847
824
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
848
825
 
            then $a
849
826
 
            else throw("List size exceeds 6")
850
827
 
851
828
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
852
829
 
        }
853
830
 
    makeString(r, "_")
854
831
 
    }
855
832
 
856
833
 
857
834
 
func virtClaim (terrainCounts,deltaTime,landSizeIndex,dailyByPieceWithBonuses) = {
858
835
 
    func adder (acc,i) =     {
859
836
 
        let resOfType = ((fraction(deltaTime, dailyByPieceWithBonuses, DAYMILLIS) * terrainCounts[i]) * landSizeIndex)
860
837
 
        $Tuple2((acc._1 :+ resOfType), (acc._2 + resOfType))
861
838
 
        }
862
839
 
863
840
 
    let $l = [0, 1, 2, 3, 4, 5]
864
841
 
    let $s = size($l)
865
842
 
    let $acc0 = $Tuple2(nil, 0)
866
843
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
867
844
 
        then $a
868
845
 
        else adder($a, $l[$i])
869
846
 
870
847
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
871
848
 
        then $a
872
849
 
        else throw("List size exceeds 6")
873
850
 
874
851
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
875
852
 
    }
876
853
 
877
854
 
878
855
 
func distributeRes (currentWhRes,currentPackRes,resToClaim,whSpaceLeft) = {
879
856
 
    let resListToClaim = resToClaim._1
880
857
 
    let resAmToClaim = resToClaim._2
881
858
 
    if ((resAmToClaim == 0))
882
859
 
        then $Tuple2(makeString(currentWhRes, "_"), makeString(currentPackRes, "_"))
883
860
 
        else if ((whSpaceLeft >= resAmToClaim))
884
861
 
            then {
885
862
 
                func addLists (acc,i) =                 (acc :+ toString((parseIntValue(currentWhRes[i]) + resListToClaim[i])))
886
863
 
887
864
 
                let r = {
888
865
 
                    let $l = [0, 1, 2, 3, 4, 5]
889
866
 
                    let $s = size($l)
890
867
 
                    let $acc0 = nil
891
868
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
892
869
 
                        then $a
893
870
 
                        else addLists($a, $l[$i])
894
871
 
895
872
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
896
873
 
                        then $a
897
874
 
                        else throw("List size exceeds 6")
898
875
 
899
876
 
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
900
877
 
                    }
901
878
 
                $Tuple2(makeString(r, "_"), makeString(currentPackRes, "_"))
902
879
 
                }
903
880
 
            else {
904
881
 
                func addPartLists (acc,i) =                 {
905
882
 
                    let whPart = fraction(resListToClaim[i], whSpaceLeft, resAmToClaim)
906
883
 
                    $Tuple2((acc._1 :+ toString((parseIntValue(currentWhRes[i]) + whPart))), (acc._2 :+ toString(((parseIntValue(currentPackRes[i]) + resListToClaim[i]) - whPart))))
907
884
 
                    }
908
885
 
909
886
 
                let r = {
910
887
 
                    let $l = [0, 1, 2, 3, 4, 5]
911
888
 
                    let $s = size($l)
912
889
 
                    let $acc0 = $Tuple2(nil, nil)
913
890
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
914
891
 
                        then $a
915
892
 
                        else addPartLists($a, $l[$i])
916
893
 
917
894
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
918
895
 
                        then $a
919
896
 
                        else throw("List size exceeds 6")
920
897
 
921
898
 
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
922
899
 
                    }
923
900
 
                $Tuple2(makeString(r._1, "_"), makeString(r._2, "_"))
924
901
 
                }
925
902
 
    }
926
903
 
927
904
 
928
905
 
func abs (x) = if ((x >= toBigInt(0)))
929
906
 
    then x
930
907
 
    else -(x)
931
908
 
932
909
 
933
910
 
let freq = [[6, 9, 14, 15, 16], [5, 8, 13, 14, 15], [1, 4, 9, 10, 15], [1, 6, 7, 15, 19], [4, 7, 8, 13, 18]]
934
911
 
935
912
 
func genChar (n,freqs) = {
936
913
 
    let rem = toInt((n % TWENTYX))
937
914
 
    let letter = if ((freqs[0] > rem))
938
915
 
        then "A"
939
916
 
        else if ((freqs[1] > rem))
940
917
 
            then "B"
941
918
 
            else if ((freqs[2] > rem))
942
919
 
                then "C"
943
920
 
                else if ((freqs[3] > rem))
944
921
 
                    then "D"
945
922
 
                    else if ((freqs[4] > rem))
946
923
 
                        then "E"
947
924
 
                        else "F"
948
925
 
    letter
949
926
 
    }
950
927
 
951
928
 
952
929
 
func genTerrains (seed,continentIdx) = {
953
930
 
    let f = freq[continentIdx]
954
931
 
    func terrainGenerator (acc,elem) =     $Tuple2((((((acc._1 + genChar(acc._2, f)) + genChar((acc._2 / TWENTYX), f)) + genChar((acc._2 / TWENTY2X), f)) + genChar((acc._2 / TWENTY3X), f)) + genChar((acc._2 / TWENTY4X), f)), (acc._2 / TWENTY5X))
955
932
 
956
933
 
    let t = {
957
934
 
        let $l = [1, 2, 3, 4, 5]
958
935
 
        let $s = size($l)
959
936
 
        let $acc0 = $Tuple2("", (seed / FIVEX))
960
937
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
961
938
 
            then $a
962
939
 
            else terrainGenerator($a, $l[$i])
963
940
 
964
941
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
965
942
 
            then $a
966
943
 
            else throw("List size exceeds 5")
967
944
 
968
945
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
969
946
 
        }
970
947
 
    t._1
971
948
 
    }
972
949
 
973
950
 
974
951
 
func getBackpack (bpKey) = {
975
952
 
    let p = split(valueOrElse(getString(bpKey), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
976
953
 
[toString(valueOrElse(parseInt(p[bpIdxLevel]), 0)), if ((size(split(p[bpIdxRes], "_")) == NUMRES))
977
954
 
        then p[bpIdxRes]
978
955
 
        else "0_0_0_0_0_0", if ((size(split(p[bpIdxMat], "_")) == NUMRES))
979
956
 
        then p[bpIdxMat]
980
957
 
        else "0_0_0_0_0_0", p[bpIdxProd]]
981
958
 
    }
982
959
 
983
960
 
984
961
 
func getWarehouseTotalVolume (volPrefix) = {
985
962
 
    let parts = split(volPrefix, "_")
986
963
 
    ((WHMULTIPLIER * (parseIntValue(parts[1]) + 1)) * parseIntValue(parts[0]))
987
964
 
    }
988
965
 
989
966
 
990
967
 
func getWarehouseOccupiedVol (currentWh) = {
991
968
 
    let goods = currentWh[whIdxProd]
992
969
 
    func sumResMat (acc,item) =     (acc + parseIntValue(item))
993
970
 
994
971
 
    func sumProd (acc,item) =     {
995
972
 
        let idx = acc._1
996
973
 
        let pkgs = (((parseIntValue(item) + PRODUCTPKGSIZE) - 1) / PRODUCTPKGSIZE)
997
974
 
        $Tuple2((idx + 1), (acc._2 + (pkgs * MULT8)))
998
975
 
        }
999
976
 
1000
977
 
    let whResVol = {
1001
978
 
        let $l = split(currentWh[whIdxRes], "_")
1002
979
 
        let $s = size($l)
1003
980
 
        let $acc0 = 0
1004
981
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
1005
982
 
            then $a
1006
983
 
            else sumResMat($a, $l[$i])
1007
984
 
1008
985
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
1009
986
 
            then $a
1010
987
 
            else throw("List size exceeds 6")
1011
988
 
1012
989
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1013
990
 
        }
1014
991
 
    let whMatVol = {
1015
992
 
        let $l = split(currentWh[whIdxMat], "_")
1016
993
 
        let $s = size($l)
1017
994
 
        let $acc0 = 0
1018
995
 
        func $f1_1 ($a,$i) =         if (($i >= $s))
1019
996
 
            then $a
1020
997
 
            else sumResMat($a, $l[$i])
1021
998
 
1022
999
 
        func $f1_2 ($a,$i) =         if (($i >= $s))
1023
1000
 
            then $a
1024
1001
 
            else throw("List size exceeds 6")
1025
1002
 
1026
1003
 
        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1027
1004
 
        }
1028
1005
 
    let whGoodsVol = if ((goods == ""))
1029
1006
 
        then 0
1030
1007
 
        else (        let $l = split_4C(goods, "_")
1031
1008
 
        let $s = size($l)
1032
1009
 
        let $acc0 = $Tuple2(0, 0)
1033
1010
 
        func $f2_1 ($a,$i) =         if (($i >= $s))
1034
1011
 
            then $a
1035
1012
 
            else sumProd($a, $l[$i])
1036
1013
 
1037
1014
 
        func $f2_2 ($a,$i) =         if (($i >= $s))
1038
1015
 
            then $a
1039
1016
 
            else throw("List size exceeds 50")
1040
1017
 
1041
1018
 
        $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_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))._2
1042
1019
 
    ((whResVol + whMatVol) + whGoodsVol)
1043
1020
 
    }
1044
1021
 
1045
1022
 
1046
1023
 
func getWarehouse (whKey,landIndex,infraLevel) = {
1047
1024
 
    let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
1048
1025
 
    let whTotal = getWarehouseTotalVolume(volPrefix)
1049
1026
 
    let whStr = valueOrElse(getString(whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0::0"))
1050
1027
 
    let wh = split_4C(whStr, ":")
1051
1028
 
    let whOccupied = getWarehouseOccupiedVol(wh)
1052
1029
 
    let whLoft = if ((5 > size(wh)))
1053
1030
 
        then makeString(["0", toString(whOccupied), toString((whTotal - whOccupied)), toString(whTotal)], "_")
1054
1031
 
        else {
1055
1032
 
            let loft = split(wh[whIdxLOFT], "_")
1056
1033
 
            let whLocked = parseIntValue(loft[volLocked])
1057
1034
 
            let occ = if ((size(loft) > 1))
1058
1035
 
                then parseIntValue(loft[volOccupied])
1059
1036
 
                else whOccupied
1060
1037
 
            makeString([toString(whLocked), toString(occ), toString(((whTotal - whLocked) - occ)), toString(whTotal)], "_")
1061
1038
 
            }
1062
1039
 
[wh[whIdxLevels], if ((size(split(wh[whIdxRes], "_")) == NUMRES))
1063
1040
 
        then wh[whIdxRes]
1064
1041
 
        else "0_0_0_0_0_0", if ((size(split(wh[whIdxMat], "_")) == NUMRES))
1065
1042
 
        then wh[whIdxMat]
1066
1043
 
        else "0_0_0_0_0_0", wh[whIdxProd], whLoft]
1067
1044
 
    }
1068
1045
 
1069
1046
 
1070
1047
 
func getWarehouseSpaceLeft (currentWh) = {
1071
1048
 
    let occupiedVol = getWarehouseOccupiedVol(currentWh)
1072
1049
 
    let currWhLockedVol = parseIntValue(split(currentWh[whIdxLOFT], "_")[volLocked])
1073
1050
 
    ((getWarehouseTotalVolume(currentWh[whIdxLevels]) - occupiedVol) - currWhLockedVol)
1074
1051
 
    }
1075
1052
 
1076
1053
 
1077
1054
 
func toVolume (amount,pkgSize) = {
1078
1055
 
    let pkgs = if ((amount >= 0))
1079
1056
 
        then (((amount + pkgSize) - 1) / pkgSize)
1080
1057
 
        else -((((-(amount) + pkgSize) - 1) / pkgSize))
1081
1058
 
    (pkgs * MULT8)
1082
1059
 
    }
1083
1060
 
1084
1061
 
1085
1062
 
func moveStuff (cargoParts,currentWh,currentPack) = if ((size(cargoParts) != 3))
1086
1063
 
    then throw("cargoListStr should contain exactly 2 ':' separators")
1087
1064
 
    else {
1088
1065
 
        let resParts = split(cargoParts[0], "_")
1089
1066
 
        let matParts = split(cargoParts[1], "_")
1090
1067
 
        let prodParts = if ((cargoParts[2] == ""))
1091
1068
 
            then nil
1092
1069
 
            else split(cargoParts[2], "_")
1093
1070
 
        if ((size(resParts) != NUMRES))
1094
1071
 
            then throw("All 6 resources should be passed")
1095
1072
 
            else if ((size(matParts) != NUMRES))
1096
1073
 
                then throw("All 6 materials should be passed")
1097
1074
 
                else {
1098
1075
 
                    let whSpaceLeft = getWarehouseSpaceLeft(currentWh)
1099
1076
 
                    let currWhRes = split(currentWh[whIdxRes], "_")
1100
1077
 
                    let currWhMat = split(currentWh[whIdxMat], "_")
1101
1078
 
                    let currWhProd = if ((currentWh[whIdxProd] == ""))
1102
1079
 
                        then nil
1103
1080
 
                        else split(currentWh[whIdxProd], "_")
1104
1081
 
                    let currentPackRes = split(currentPack[bpIdxRes], "_")
1105
1082
 
                    let currentPackMat = split(currentPack[bpIdxMat], "_")
1106
1083
 
                    let currentPackProd = if ((currentPack[bpIdxProd] == ""))
1107
1084
 
                        then nil
1108
1085
 
                        else split(currentPack[bpIdxProd], "_")
1109
1086
 
                    func mvR (acc,item) =                     {
1110
1087
 
                        let i = acc._1
1111
1088
 
                        let am = parseIntValue(item)
1112
1089
 
                        let whr = parseIntValue(currWhRes[i])
1113
1090
 
                        let bpr = parseIntValue(currentPackRes[i])
1114
1091
 
                        if ((am == 0))
1115
1092
 
                            then $Tuple4((i + 1), (acc._2 :+ currWhRes[i]), (acc._3 :+ currentPackRes[i]), acc._4)
1116
1093
 
                            else if ((am > 0))
1117
1094
 
                                then if ((am > bpr))
1118
1095
 
                                    then throw((((("Attempt to take " + item) + " from backpack, but only ") + toString(bpr)) + " available"))
1119
1096
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whr + am))), (acc._3 :+ toString((bpr - am))), (acc._4 + am))
1120
1097
 
                                else if ((-(am) > whr))
1121
1098
 
                                    then throw((((("Attempt to take " + toString(-(am))) + " from warehouse, but only ") + toString(whr)) + " available"))
1122
1099
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whr + am))), (acc._3 :+ toString((bpr - am))), (acc._4 + am))
1123
1100
 
                        }
1124
1101
 
1125
1102
 
                    let r = {
1126
1103
 
                        let $l = resParts
1127
1104
 
                        let $s = size($l)
1128
1105
 
                        let $acc0 = $Tuple4(0, nil, nil, 0)
1129
1106
 
                        func $f0_1 ($a,$i) =                         if (($i >= $s))
1130
1107
 
                            then $a
1131
1108
 
                            else mvR($a, $l[$i])
1132
1109
 
1133
1110
 
                        func $f0_2 ($a,$i) =                         if (($i >= $s))
1134
1111
 
                            then $a
1135
1112
 
                            else throw("List size exceeds 6")
1136
1113
 
1137
1114
 
                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1138
1115
 
                        }
1139
1116
 
                    func mvM (acc,item) =                     {
1140
1117
 
                        let i = acc._1
1141
1118
 
                        let am = parseIntValue(item)
1142
1119
 
                        let whm = parseIntValue(currWhMat[i])
1143
1120
 
                        let bpm = parseIntValue(currentPackMat[i])
1144
1121
 
                        if ((am == 0))
1145
1122
 
                            then $Tuple4((i + 1), (acc._2 :+ currWhMat[i]), (acc._3 :+ currentPackMat[i]), acc._4)
1146
1123
 
                            else if ((am > 0))
1147
1124
 
                                then if ((am > bpm))
1148
1125
 
                                    then throw((((("Attempt to take " + item) + " from backpack, but only ") + toString(bpm)) + " available"))
1149
1126
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whm + am))), (acc._3 :+ toString((bpm - am))), (acc._4 + am))
1150
1127
 
                                else if ((-(am) > whm))
1151
1128
 
                                    then throw((((("Attempt to take " + toString(-(am))) + " from warehouse, but only ") + toString(whm)) + " available"))
1152
1129
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whm + am))), (acc._3 :+ toString((bpm - am))), (acc._4 + am))
1153
1130
 
                        }
1154
1131
 
1155
1132
 
                    let m = {
1156
1133
 
                        let $l = matParts
1157
1134
 
                        let $s = size($l)
1158
1135
 
                        let $acc0 = $Tuple4(0, nil, nil, r._4)
1159
1136
 
                        func $f1_1 ($a,$i) =                         if (($i >= $s))
1160
1137
 
                            then $a
1161
1138
 
                            else mvM($a, $l[$i])
1162
1139
 
1163
1140
 
                        func $f1_2 ($a,$i) =                         if (($i >= $s))
1164
1141
 
                            then $a
1165
1142
 
                            else throw("List size exceeds 6")
1166
1143
 
1167
1144
 
                        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1168
1145
 
                        }
1169
1146
 
                    func mvP (acc,item) =                     {
1170
1147
 
                        let i = acc._1
1171
1148
 
                        let am = parseIntValue(item)
1172
1149
 
                        let whp = if ((size(currWhProd) > i))
1173
1150
 
                            then parseIntValue(currWhProd[i])
1174
1151
 
                            else 0
1175
1152
 
                        let bpp = if ((size(currentPackProd) > i))
1176
1153
 
                            then parseIntValue(currentPackProd[i])
1177
1154
 
                            else 0
1178
1155
 
                        if ((am == 0))
1179
1156
 
                            then $Tuple4((i + 1), (acc._2 :+ toString(whp)), (acc._3 :+ toString(bpp)), acc._4)
1180
1157
 
                            else if ((am > 0))
1181
1158
 
                                then if ((am > bpp))
1182
1159
 
                                    then throw((((("Attempt to take " + item) + " from backpack, but only ") + toString(bpp)) + " available"))
1183
1160
 
                                    else {
1184
1161
 
                                        let deltaVol = (toVolume((whp + am), PRODUCTPKGSIZE) - toVolume(whp, PRODUCTPKGSIZE))
1185
1162
 
                                        $Tuple4((i + 1), (acc._2 :+ toString((whp + am))), (acc._3 :+ toString((bpp - am))), (acc._4 + deltaVol))
1186
1163
 
                                        }
1187
1164
 
                                else if ((-(am) > whp))
1188
1165
 
                                    then throw((((("Attempt to take " + toString(-(am))) + " from warehouse, but only ") + toString(whp)) + " available"))
1189
1166
 
                                    else {
1190
1167
 
                                        let deltaVol = (toVolume((whp + am), PRODUCTPKGSIZE) - toVolume(whp, PRODUCTPKGSIZE))
1191
1168
 
                                        $Tuple4((i + 1), (acc._2 :+ toString((whp + am))), (acc._3 :+ toString((bpp - am))), (acc._4 + deltaVol))
1192
1169
 
                                        }
1193
1170
 
                        }
1194
1171
 
1195
1172
 
                    let p = if ((size(prodParts) != 0))
1196
1173
 
                        then {
1197
1174
 
                            let $l = prodParts
1198
1175
 
                            let $s = size($l)
1199
1176
 
                            let $acc0 = $Tuple4(0, nil, nil, m._4)
1200
1177
 
                            func $f2_1 ($a,$i) =                             if (($i >= $s))
1201
1178
 
                                then $a
1202
1179
 
                                else mvP($a, $l[$i])
1203
1180
 
1204
1181
 
                            func $f2_2 ($a,$i) =                             if (($i >= $s))
1205
1182
 
                                then $a
1206
1183
 
                                else throw("List size exceeds 50")
1207
1184
 
1208
1185
 
                            $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_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)
1209
1186
 
                            }
1210
1187
 
                        else $Tuple4(0, currWhProd, currentPackProd, m._4)
1211
1188
 
                    let volSaldo = p._4
1212
1189
 
                    if ((volSaldo > whSpaceLeft))
1213
1190
 
                        then throw((((("Attempt to put total " + toString(volSaldo)) + " stuff, but only ") + toString(whSpaceLeft)) + " warehouse space left"))
1214
1191
 
                        else $Tuple7(makeString(r._2, "_"), makeString(m._2, "_"), makeString(p._2, "_"), makeString(r._3, "_"), makeString(m._3, "_"), makeString(p._3, "_"), volSaldo)
1215
1192
 
                    }
1216
1193
 
        }
1217
1194
 
1218
1195
 
1219
1196
 
func expeditionInternal (caller,txId) = {
1220
1197
 
    let userAddr = toString(caller)
1221
1198
 
    let bigNum = abs(toBigInt(txId))
1222
1199
 
    let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
1223
1200
 
    let landNum = toString(freeNum)
1224
1201
 
    let continentIdx = toInt((bigNum % FIVEX))
1225
1202
 
    let terrains = genTerrains(bigNum, continentIdx)
1226
1203
 
    let continent = continents[continentIdx]
1227
1204
 
    let issue = Issue(nftName(landNum, "S"), makeString([landNum, "S", terrains, continent], "_"), 1, 0, false)
1228
1205
 
    let assetId = calculateAssetId(issue)
1229
1206
 
    let id = toBase58String(assetId)
1230
1207
 
    $Tuple2([IntegerEntry(keyNextFreeLandNum(), (freeNum + 1)), issue, StringEntry(keyLandToAssetId(landNum), id), StringEntry(keyLandAssetIdToOwner(id), userAddr), StringEntry(keyLandNumToOwner(landNum), userAddr), IntegerEntry(keyInfraLevelByAssetId(id), 0), IntegerEntry(keyInfraLevelByAssetIdAndOwner(id, userAddr), 0), ScriptTransfer(caller, 1, assetId)], $Tuple2(id, continent))
1231
1208
 
    }
1232
1209
 
1233
1210
 
1234
1211
 
func flightCommon (userAddr,message,sig) = if (!(sigVerify_8Kb(message, sig, pub)))
1235
1212
 
    then throw("signature does not match")
1236
1213
 
    else {
1237
1214
 
        let parts = split(toUtf8String(message), ";")
1238
1215
 
        let flightLog = split(parts[0], "|")
1239
1216
 
        let hp = split(flightLog[flHealth], "_")
1240
1217
 
        let curHP = parseIntValue(hp[0])
1241
1218
 
        let newHP = parseIntValue(hp[1])
1242
1219
 
        let newLocTxVer = split(parts[1], ":")
1243
1220
 
        let newLocation = newLocTxVer[0]
1244
1221
 
        let time = parseIntValue(flightLog[flTimestamp])
1245
1222
 
        if (if ((time > (lastBlock.timestamp + FIVEMINUTESMILLIS)))
1246
1223
 
            then true
1247
1224
 
            else ((lastBlock.timestamp - FIVEMINUTESMILLIS) > time))
1248
1225
 
            then throw(((("signature outdated: logTime=" + toString(time)) + ", bcTime=") + toString(lastBlock.timestamp)))
1249
1226
 
            else {
1250
1227
 
                let txFromMsg = newLocTxVer[1]
1251
1228
 
                let lastTx = valueOrElse(getString(keyLastTxIdByUser(userAddr)), "")
1252
1229
 
                if ((lastTx != txFromMsg))
1253
1230
 
                    then throw(((("Tx ids don't match! In state: " + lastTx) + ", in msg: ") + txFromMsg))
1254
1231
 
                    else {
1255
1232
 
                        let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
1256
1233
 
                        let keyHealth = keyDuckHealth(duckAssetId)
1257
1234
 
                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
1258
1235
 
                        let oldFromState = valueOrElse(getInteger(keyHealth), maxHP)
1259
1236
 
                        if ((oldFromState != curHP))
1260
1237
 
                            then throw(((("oldHealth=" + toString(oldFromState)) + " from state does not match one from flight log=") + toString(curHP)))
1261
1238
 
                            else if ((0 >= curHP))
1262
1239
 
                                then throw("You can't fly with zero health")
1263
1240
 
                                else {
1264
1241
 
                                    let bonus = if ((size(flightLog) > flBonus))
1265
1242
 
                                        then flightLog[flBonus]
1266
1243
 
                                        else ""
1267
1244
 
                                    let prodUsed = if ((size(flightLog) > flProdsUsed))
1268
1245
 
                                        then flightLog[flProdsUsed]
1269
1246
 
                                        else ""
1270
1247
 
                                    let sentAmount = if (if ((newHP > 0))
1271
1248
 
                                        then (bonus == "$")
1272
1249
 
                                        else false)
1273
1250
 
                                        then asInt(invoke(restContract, "sendUsdtPrize", [userAddr], nil))
1274
1251
 
                                        else 0
1275
1252
 
                                    $Tuple5(newHP, duckAssetId, sentAmount, newLocation, prodUsed)
1276
1253
 
                                    }
1277
1254
 
                        }
1278
1255
 
                }
1279
1256
 
        }
1280
1257
 
1281
1258
 
1282
1259
 
func expeditionCommon (caller,txId,message,sig) = {
1283
1260
 
    let userAddr = toString(caller)
1284
1261
 
    let f = flightCommon(userAddr, message, sig)
1285
1262
 
    let keyHealth = keyDuckHealth(f._2)
1286
1263
 
    let bpKey = keyBackpackByDuck(f._2)
1287
1264
 
    let currentPack = getBackpack(bpKey)
1288
1265
 
    let mList = split(currentPack[bpIdxMat], "_")
1289
1266
 
    let newMat = makeString(subtractMaterials(true, mList, EXPMATERIALS), "_")
1290
1267
 
    let newProd = subtractProducts(currentPack[bpIdxProd], f._5)
1291
1268
 
    if ((0 >= f._1))
1292
1269
 
        then $Tuple3([IntegerEntry(keyHealth, 0), StringEntry(bpKey, makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProd], ":"))], "", 0)
1293
1270
 
        else {
1294
1271
 
            let e = expeditionInternal(caller, txId)
1295
1272
 
            let id = e._2._1
1296
1273
 
            $Tuple3((((e._1 :+ StringEntry(keyDuckLocation(f._2), makeString([e._2._2, "L", id], "_"))) :+ IntegerEntry(keyHealth, f._1)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], newMat, newProd], ":"))), id, f._3)
1297
1274
 
            }
1298
1275
 
    }
1299
1276
 
1300
1277
 
1301
1278
 
func applyBonuses (landAssetId,pieces) = {
1302
1279
 
    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1303
1280
 
    let artPieces = valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0)
1304
1281
 
    let add6 = (infraLevel / 6)
1305
1282
 
    let add7 = (infraLevel / 7)
1306
1283
 
    ((DAILYRESBYPIECE + fraction(DAILYRESBYPIECE, ((infraLevel + add6) + (2 * add7)), 5)) + fraction(DAILYRESBYPIECE, artPieces, (pieces * 5)))
1307
1284
 
    }
1308
1285
 
1309
1286
 
1310
1287
 
func checkClaimConditions (addr,claimMode,landAssetIdIn) = {
1311
-
    let $t02880829347 = if ((claimMode == claimModeWh))
1288
+
    let $t03158832127 = if ((claimMode == claimModeWh))
1312
1289
 
        then $Tuple2(landAssetIdIn, valueOrElse(getString(keyStakedDuckByOwner(addr)), ""))
1313
1290
 
        else {
1314
1291
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1315
1292
 
            let curLocation = valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION)
1316
1293
 
            let loc = split(value(curLocation), "_")
1317
1294
 
            if ((loc[locIdxType] != "L"))
1318
1295
 
                then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
1319
1296
 
                else $Tuple2(loc[locIdxId], duckAssetId)
1320
1297
 
            }
1321
-
    let landAssetId = $t02880829347._1
1322
-
    let duckId = $t02880829347._2
1298
+
    let landAssetId = $t03158832127._1
1299
+
    let duckId = $t03158832127._2
1323
1300
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
1324
1301
 
    let timeKey = keyStakedTimeByAssetId(landAssetId)
1325
1302
 
    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("Land " + asset.name) + " is not staked"))
1326
1303
 
    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1327
1304
 
    if ((owner != addr))
1328
1305
 
        then throw((LANDPREFIX + " is not yours"))
1329
1306
 
        else {
1330
1307
 
            let d = split(asset.description, "_")
1331
1308
 
            $Tuple4(duckId, landAssetId, d, savedTime)
1332
1309
 
            }
1333
1310
 
    }
1334
1311
 
1335
1312
 
1336
1313
 
func claimResInternal (addr,amount,claimMode,landAssetIdIn) = if ((0 > amount))
1337
1314
 
    then throw("Negative amount")
1338
1315
 
    else {
1339
1316
 
        let c = checkClaimConditions(addr, claimMode, landAssetIdIn)
1340
1317
 
        let landSize = c._3[recLandSize]
1341
1318
 
        let terrainCounts = countTerrains(c._3[recTerrains])
1342
1319
 
        let deltaTime = (lastBlock.timestamp - c._4)
1343
1320
 
        if ((0 > deltaTime))
1344
1321
 
            then throw(((("Saved timestamp is in future, saved = " + toString(c._4)) + ", current = ") + toString(lastBlock.timestamp)))
1345
1322
 
            else {
1346
1323
 
                let pieces = numPiecesBySize(landSize)
1347
1324
 
                let dailyProductionByPiece = applyBonuses(c._2, pieces)
1348
1325
 
                let availRes = fraction(deltaTime, (dailyProductionByPiece * pieces), DAYMILLIS)
1349
1326
 
                if ((amount > availRes))
1350
1327
 
                    then throw(((("Not enough resources, available = " + toString(availRes)) + ", requested = ") + toString(amount)))
1351
1328
 
                    else {
1352
1329
 
                        let newDeltaTime = fraction((availRes - amount), DAYMILLIS, (dailyProductionByPiece * pieces))
1353
1330
 
                        let newTimestamp = (lastBlock.timestamp - newDeltaTime)
1354
1331
 
                        let landIndex = (pieces / SSIZE)
1355
1332
 
                        let resToClaim = virtClaim(terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece)
1356
1333
 
                        let whKey = keyWarehouseByLand(c._2)
1357
1334
 
                        let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(c._2)), 0)
1358
1335
 
                        let currentWh = getWarehouse(whKey, landIndex, infraLevel)
1359
1336
 
                        let loft = split(currentWh[whIdxLOFT], "_")
1360
1337
 
                        let whSpaceLeft = parseIntValue(loft[volFree])
1361
1338
 
                        if (if ((claimMode == claimModeWh))
1362
1339
 
                            then (amount > whSpaceLeft)
1363
1340
 
                            else false)
1364
1341
 
                            then throw((("Only " + toString(whSpaceLeft)) + " space left in warehouse"))
1365
1342
 
                            else {
1366
1343
 
                                let bpKey = keyBackpackByDuck(c._1)
1367
1344
 
                                let currentPack = getBackpack(bpKey)
1368
1345
 
                                let currentPackRes = split(currentPack[bpIdxRes], "_")
1369
1346
 
                                let currentWhRes = split(currentWh[whIdxRes], "_")
1370
-
                                let $t03172132592 = if ((claimMode == claimModeWh))
1347
+
                                let $t03450135372 = if ((claimMode == claimModeWh))
1371
1348
 
                                    then $Tuple4(addRes(currentWhRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), currentPack[bpIdxRes], (parseIntValue(loft[volOccupied]) + resToClaim._2), (parseIntValue(loft[volFree]) - resToClaim._2))
1372
1349
 
                                    else if ((claimMode == claimModeDuck))
1373
1350
 
                                        then $Tuple4(currentWh[whIdxRes], addRes(currentPackRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), parseIntValue(loft[volOccupied]), parseIntValue(loft[volFree]))
1374
1351
 
                                        else {
1375
1352
 
                                            let distr = distributeRes(currentWhRes, currentPackRes, resToClaim, whSpaceLeft)
1376
1353
 
                                            let whAm = min([parseIntValue(loft[volFree]), resToClaim._2])
1377
1354
 
                                            $Tuple4(distr._1, distr._2, (parseIntValue(loft[volOccupied]) + whAm), (parseIntValue(loft[volFree]) - whAm))
1378
1355
 
                                            }
1379
-
                                let whRes = $t03172132592._1
1380
-
                                let bpRes = $t03172132592._2
1381
-
                                let loftO = $t03172132592._3
1382
-
                                let loftF = $t03172132592._4
1356
+
                                let whRes = $t03450135372._1
1357
+
                                let bpRes = $t03450135372._2
1358
+
                                let loftO = $t03450135372._3
1359
+
                                let loftF = $t03450135372._4
1383
1360
 
                                $Tuple5([IntegerEntry(keyStakedTimeByAssetId(c._2), newTimestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, c._2, addr), newTimestamp)], bpKey, [currentPack[bpIdxLevel], bpRes, currentPack[bpIdxMat], currentPack[bpIdxProd]], whKey, [currentWh[whIdxLevels], whRes, currentWh[whIdxMat], currentWh[whIdxProd], makeString([loft[volLocked], toString(loftO), toString(loftF), loft[volTotal]], "_")])
1384
1361
 
                                }
1385
1362
 
                        }
1386
1363
 
                }
1387
1364
 
        }
1388
1365
 
1389
1366
 
1390
1367
 
func claimAll (addr,landAssetId,pieces,claimMode) = {
1391
1368
 
    let timeKey = keyStakedTimeByAssetId(landAssetId)
1392
1369
 
    let savedTime = value(getInteger(timeKey))
1393
1370
 
    let availRes = (fraction((lastBlock.timestamp - savedTime), applyBonuses(landAssetId, pieces), DAYMILLIS) * pieces)
1394
1371
 
    claimResInternal(addr, availRes, claimMode, landAssetId)
1395
1372
 
    }
1396
1373
 
1397
1374
 
1398
1375
 
func upInfraCommon (shouldUseMat,caller,paymentAmount,landAssetId) = {
1399
1376
 
    let addr = toString(caller)
1400
1377
 
    let c = checkClaimConditions(addr, claimModeWhThenDuck, landAssetId)
1401
1378
 
    let pieces = numPiecesBySize(c._3[recLandSize])
1402
1379
 
    let infraKey = keyInfraLevelByAssetId(c._2)
1403
1380
 
    let curLevel = valueOrElse(getInteger(infraKey), 0)
1404
1381
 
    if ((curLevel >= 3))
1405
1382
 
        then throw("Currently max infrastructure level = 3")
1406
1383
 
        else {
1407
1384
 
            let newLevel = (curLevel + 1)
1408
1385
 
            let cost = fraction(InfraUpgradeCostSUsdt, (pieces * newLevel), SSIZE)
1409
1386
 
            if (if (!(shouldUseMat))
1410
1387
 
                then (paymentAmount != cost)
1411
1388
 
                else false)
1412
1389
 
                then throw(("Payment attached should be " + toString(cost)))
1413
1390
 
                else {
1414
1391
 
                    let bpKey = keyBackpackByDuck(c._1)
1415
1392
 
                    let currentPack = getBackpack(bpKey)
1416
1393
 
                    let mList = split(currentPack[bpIdxMat], "_")
1417
1394
 
                    let matUsed = fraction(InfraUpgradeCostS, (pieces * newLevel), SSIZE)
1418
1395
 
                    let newMat = makeString(subtractMaterials(shouldUseMat, mList, matUsed), "_")
1419
1396
 
                    let claimResult = claimAll(addr, c._2, pieces, claimModeWhThenDuck)
1420
1397
 
                    let whData = claimResult._5
1421
1398
 
                    let oldVol = getWarehouseTotalVolume(whData[whIdxLevels])
1422
1399
 
                    let newVolData = makeString([split(whData[whIdxLevels], "_")[0], toString(newLevel)], "_")
1423
1400
 
                    let newVol = getWarehouseTotalVolume(newVolData)
1424
1401
 
                    let loft = split(whData[whIdxLOFT], "_")
1425
1402
 
                    let newLoftStr = makeString([loft[volLocked], loft[volOccupied], toString(((parseIntValue(loft[volFree]) + newVol) - oldVol)), toString(newVol)], "_")
1426
1403
 
                    $Tuple3(([IntegerEntry(infraKey, newLevel), IntegerEntry(keyInfraLevelByAssetIdAndOwner(c._2, addr), newLevel), StringEntry(bpKey, makeString([currentPack[bpIdxLevel], claimResult._3[bpIdxRes], newMat, currentPack[bpIdxProd]], ":")), StringEntry(claimResult._4, makeString([newVolData, whData[whIdxRes], whData[whIdxMat], whData[whIdxProd], newLoftStr], ":"))] ++ claimResult._1), newLevel, matUsed)
1427
1404
 
                    }
1428
1405
 
            }
1429
1406
 
    }
1430
1407
 
1431
1408
 
1432
1409
 
func updateDuckStatsInternal (duckAssetId,deltaXP) = if (!(KSALLOWXPLEVELS))
1433
1410
 
    then $Tuple2(nil, 0)
1434
1411
 
    else {
1435
1412
 
        let lvlKey = keyDuckLevel(duckAssetId)
1436
1413
 
        let xpKey = keyDuckXP(duckAssetId)
1437
1414
 
        let xp = valueOrElse(getInteger(stakingContract, xpKey), 0)
1438
1415
 
        let newXP = (xp + deltaXP)
1439
1416
 
        let lvlPoints = levelUp(valueOrElse(getInteger(stakingContract, lvlKey), 0), newXP)
1440
1417
 
        let keyPoints = keyDuckFreePoints(duckAssetId)
1441
1418
 
        $Tuple2([IntegerEntry(lvlKey, lvlPoints[0]), IntegerEntry(xpKey, newXP), IntegerEntry(keyPoints, (valueOrElse(getInteger(keyPoints), 0) + lvlPoints[1]))], newXP)
1442
1419
 
        }
1443
1420
 
1444
1421
 
1445
1422
 
func updateAccStatsInternal (addr,deltaXP) = if (!(KSALLOWXPLEVELS))
1446
1423
 
    then $Tuple2(nil, 0)
1447
1424
 
    else {
1448
1425
 
        let lvlKey = keyUserLevel(addr)
1449
1426
 
        let xpKey = keyUserXP(addr)
1450
1427
 
        let xp = valueOrElse(getInteger(stakingContract, xpKey), 0)
1451
1428
 
        let newXP = (xp + deltaXP)
1452
1429
 
        let lvlPoints = levelUp(valueOrElse(getInteger(stakingContract, lvlKey), 0), newXP)
1453
1430
 
        let keyPoints = keyUserFreePoints(addr)
1454
1431
 
        $Tuple2([IntegerEntry(lvlKey, lvlPoints[0]), IntegerEntry(xpKey, newXP), IntegerEntry(keyPoints, (valueOrElse(getInteger(keyPoints), 0) + lvlPoints[1]))], newXP)
1455
1432
 
        }
1456
1433
 
1457
1434
 
1458
1435
 
func activateOnboardArt (addr) = {
1459
1436
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1460
1437
 
    let refByKey = keyAddressRefBy(addr)
1461
1438
 
    let refBy = getString(refByKey)
1462
1439
 
    if (!(isDefined(refBy)))
1463
1440
 
        then throw("You are not eligible for ONBOARD artifact")
1464
1441
 
        else {
1465
1442
 
            let artKey = keyOnboardArtDuckActivatedBy(addr)
1466
1443
 
            let artDuck = getString(artKey)
1467
1444
 
            if (isDefined(artDuck))
1468
1445
 
                then throw(("You already used your ONBOARD artifact on duck " + value(artDuck)))
1469
1446
 
                else {
1470
1447
 
                    let duckActivatorKey = keyOnboardArtActivatedOnDuck(duckAssetId)
1471
1448
 
                    let duckActivator = getString(duckActivatorKey)
1472
1449
 
                    if (isDefined(duckActivator))
1473
1450
 
                        then throw(((("The duck " + duckAssetId) + " already got points from ONBOARD artifact from user ") + value(duckActivator)))
1474
1451
 
                        else ([StringEntry(artKey, duckAssetId), StringEntry(duckActivatorKey, addr)] ++ updateDuckStatsInternal(duckAssetId, xpOnboard)._1)
1475
1452
 
                    }
1476
1453
 
            }
1477
1454
 
    }
1478
1455
 
1479
1456
 
1480
1457
 
func activatePresaleArt (addr,landAssetIdIn) = {
1481
1458
 
    let c = checkClaimConditions(addr, claimModeWhThenDuck, landAssetIdIn)
1482
1459
 
    let landAssetId = c._2
1483
1460
 
    let pieces = numPiecesBySize(c._3[recLandSize])
1484
1461
 
    let activationKey = keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)
1485
1462
 
    if ((valueOrElse(getInteger(activationKey), 0) > 0))
1486
1463
 
        then throw("Presale artifact is already activated")
1487
1464
 
        else if ((parseIntValue(c._3[recLandNum]) > PRESALENUMLANDS))
1488
1465
 
            then throw((((LANDPREFIX + " ") + landAssetId) + " is not eligible for presale artifact"))
1489
1466
 
            else {
1490
1467
 
                let claimResult = claimAll(addr, landAssetId, pieces, claimModeWhThenDuck)
1491
1468
 
                ((((claimResult._1 :+ IntegerEntry(activationKey, pieces)) :+ IntegerEntry(keyLandArtStatusByTypeAssetIdAndOwner(ARTPRESALE, landAssetId, addr), pieces)) :+ StringEntry(claimResult._2, makeString(claimResult._3, ":"))) :+ StringEntry(claimResult._4, makeString(claimResult._5, ":")))
1492
1469
 
                }
1493
1470
 
    }
1494
1471
 
1495
1472
 
1496
1473
 
func mergeInternal (newLandSize,newLevel,formula,addr,landAssetIds,txId,needMat) = {
1497
1474
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1498
1475
 
    func checkMerge (acc,landAssetId) =     {
1499
1476
 
        let asset = value(assetInfo(fromBase58String(landAssetId)))
1500
1477
 
        let timeKey = keyStakedTimeByAssetId(landAssetId)
1501
1478
 
        let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
1502
1479
 
        let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1503
1480
 
        if ((owner != addr))
1504
1481
 
            then throw((LANDPREFIX + " is not yours"))
1505
1482
 
            else {
1506
1483
 
                let d = split(asset.description, "_")
1507
1484
 
                let continent = d[recContinent]
1508
1485
 
                if (if ((acc._3 != ""))
1509
1486
 
                    then (acc._3 != continent)
1510
1487
 
                    else false)
1511
1488
 
                    then throw("Lands should be on the same continent to merge")
1512
1489
 
                    else {
1513
1490
 
                        let landSize = d[recLandSize]
1514
1491
 
                        let sizesIn = acc._1
1515
1492
 
                        let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
1516
1493
 
                        let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
1517
1494
 
                        let pieces = numPiecesBySize(landSize)
1518
1495
 
                        let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
1519
1496
 
                        let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1520
1497
 
                        let reqLevel =                         match landSize {
1521
1498
 
                            case _ => 
1522
1499
 
                                if (("S" == $match0))
1523
1500
 
                                    then 3
1524
1501
 
                                    else if (("M" == $match0))
1525
1502
 
                                        then 4
1526
1503
 
                                        else if (("L" == $match0))
1527
1504
 
                                            then 5
1528
1505
 
                                            else if (("XL" == $match0))
1529
1506
 
                                                then 6
1530
1507
 
                                                else throw("Only S, M, L, XL can merge")
1531
1508
 
                        }
1532
1509
 
                        if ((infraLevel != reqLevel))
1533
1510
 
                            then throw("All lands should be maxed to merge")
1534
1511
 
                            else {
1535
1512
 
                                let landNum = d[recLandNum]
1536
1513
 
                                let terrainCounts = countTerrains(d[recTerrains])
1537
1514
 
                                let deltaTime = (lastBlock.timestamp - savedTime)
1538
1515
 
                                if ((0 > deltaTime))
1539
1516
 
                                    then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
1540
1517
 
                                    else {
1541
1518
 
                                        let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
1542
1519
 
                                        let landIndex = (pieces / SSIZE)
1543
1520
 
                                        let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
1544
1521
 
                                        let props = updateProportionsInternal(split(acc._6, "_"), terrainCounts, landIndex, -1)
1545
1522
 
                                        let lands = acc._7
1546
1523
 
                                        let idx = indexOf(lands, landAssetId)
1547
1524
 
                                        if (!(isDefined(idx)))
1548
1525
 
                                            then throw(("Your staked lands don't contain " + landAssetId))
1549
1526
 
                                            else {
1550
1527
 
                                                let customKey = keyLandAssetIdToCustomName(landAssetId)
1551
1528
 
                                                let customName = valueOrElse(getString(customKey), "")
1552
1529
 
                                                $Tuple8(sizesOut, arts, continent, bpRes, (((((((((((((acc._5 :+ DeleteEntry(keyStakedTimeByAssetId(landAssetId))) :+ DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, addr))) :+ DeleteEntry(keyLandToAssetId(landNum))) :+ DeleteEntry(keyLandAssetIdToOwner(landAssetId))) :+ DeleteEntry(keyInfraLevelByAssetId(landAssetId))) :+ DeleteEntry(keyInfraLevelByAssetIdAndOwner(landAssetId, addr))) :+ DeleteEntry(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId))) :+ DeleteEntry(keyLandArtStatusByTypeAssetIdAndOwner(ARTPRESALE, landAssetId, addr))) :+ DeleteEntry(keyLandNumToOwner(landNum))) :+ DeleteEntry(keyWarehouseByLand(landAssetId))) :+ DeleteEntry(customKey)) :+ DeleteEntry(keyLandCustomNameToAssetId(customName))) :+ Burn(fromBase58String(landAssetId), 1)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces))
1553
1530
 
                                                }
1554
1531
 
                                        }
1555
1532
 
                                }
1556
1533
 
                        }
1557
1534
 
                }
1558
1535
 
        }
1559
1536
 
1560
1537
 
    let bpKey = keyBackpackByDuck(duckAssetId)
1561
1538
 
    let currentPack = getBackpack(bpKey)
1562
1539
 
    let propStr = valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0")
1563
1540
 
    let landsKey = keyStakedLandsByOwner(addr)
1564
1541
 
    let landsStr = getString(landsKey)
1565
1542
 
    let landsIn = if (isDefined(landsStr))
1566
1543
 
        then split_51C(value(landsStr), "_")
1567
1544
 
        else nil
1568
1545
 
    let r = {
1569
1546
 
        let $l = landAssetIds
1570
1547
 
        let $s = size($l)
1571
1548
 
        let $acc0 = $Tuple8(formula, 0, "", currentPack[bpIdxRes], nil, propStr, landsIn, 0)
1572
1549
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
1573
1550
 
            then $a
1574
1551
 
            else checkMerge($a, $l[$i])
1575
1552
 
1576
1553
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
1577
1554
 
            then $a
1578
1555
 
            else throw("List size exceeds 5")
1579
1556
 
1580
1557
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
1581
1558
 
        }
1582
1559
 
    let continent = r._3
1583
1560
 
    let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
1584
1561
 
    let terrains = genTerrains(abs(toBigInt(txId)), continentIdx)
1585
1562
 
    let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
1586
1563
 
    let newLandNum = toString(freeNum)
1587
1564
 
    let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
1588
1565
 
    let assetId = calculateAssetId(issue)
1589
1566
 
    let newLandAssetId = toBase58String(assetId)
1590
1567
 
    let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
1591
1568
 
    let piecesKey = keyStakedPiecesByOwner(addr)
1592
1569
 
    let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
1593
1570
 
    $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
1594
1571
 
        then StringEntry(landsKey, makeString_11C(r._7, "_"))
1595
1572
 
        else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
1596
1573
 
        then 0
1597
1574
 
        else (stakedPieces - r._8))) :+ IntegerEntry(keyNextFreeLandNum(), (freeNum + 1))) :+ issue) :+ StringEntry(keyLandToAssetId(newLandNum), newLandAssetId)) :+ StringEntry(keyLandAssetIdToOwner(newLandAssetId), addr)) :+ StringEntry(keyLandNumToOwner(newLandNum), addr)) :+ IntegerEntry(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, newLandAssetId), r._2)) :+ IntegerEntry(keyLandArtStatusByTypeAssetIdAndOwner(ARTPRESALE, newLandAssetId, addr), r._2)) :+ IntegerEntry(keyInfraLevelByAssetId(newLandAssetId), newLevel)) :+ IntegerEntry(keyInfraLevelByAssetIdAndOwner(newLandAssetId, addr), newLevel)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], r._4, newMat, currentPack[bpIdxProd]], ":"))) :+ StringEntry(keyResProportions(), r._6)) :+ StringEntry(keyDuckLocation(duckAssetId), makeString([continent, "L", newLandAssetId], "_"))) :+ ScriptTransfer(addressFromStringValue(addr), 1, assetId)), newLandAssetId)
1598
1575
 
    }
1599
1576
 
1600
1577
 
1601
1578
 
func s2m (addr,landAssetIds,txId) = mergeInternal("M", 3, "SSSS", addr, landAssetIds, txId, 0)
1602
1579
 
1603
1580
 
1604
1581
 
func m2l (addr,landAssetIds,txId,shouldUseMat,paymentAmount) = {
1605
1582
 
    let cost = (InfraUpgradeCostSUsdt * 4)
1606
1583
 
    if (if (!(shouldUseMat))
1607
1584
 
        then (paymentAmount != cost)
1608
1585
 
        else false)
1609
1586
 
        then throw(("Payment attached should be " + toString(cost)))
1610
1587
 
        else mergeInternal("L", 4, "SMM", addr, landAssetIds, txId, (InfraUpgradeCostS * 4))
1611
1588
 
    }
1612
1589
 
1613
1590
 
1614
1591
 
func l2xl (addr,landAssetIds,txId,shouldUseMat,paymentAmount) = {
1615
1592
 
    let cost = (InfraUpgradeCostSUsdt * 47)
1616
1593
 
    if (if (!(shouldUseMat))
1617
1594
 
        then (paymentAmount != cost)
1618
1595
 
        else false)
1619
1596
 
        then throw(("Payment attached should be " + toString(cost)))
1620
1597
 
        else mergeInternal("XL", 5, "SSSML", addr, landAssetIds, txId, (InfraUpgradeCostS * 47))
1621
1598
 
    }
1622
1599
 
1623
1600
 
1624
1601
 
func xl2xxl (addr,landAssetIds,txId,shouldUseMat,paymentAmount) = {
1625
1602
 
    let cost = (InfraUpgradeCostSUsdt * 54)
1626
1603
 
    if (if (!(shouldUseMat))
1627
1604
 
        then (paymentAmount != cost)
1628
1605
 
        else false)
1629
1606
 
        then throw(("Payment attached should be " + toString(cost)))
1630
1607
 
        else mergeInternal("XXL", 6, "LXL", addr, landAssetIds, txId, (InfraUpgradeCostS * 54))
1631
1608
 
    }
1632
1609
 
1633
1610
 
1634
1611
 
func mergeCommon (shouldUseMat,addr,paymentAmount,landAssetIds,txId) = {
1635
1612
 
    let mergeResult =     match size(landAssetIds) {
1636
1613
 
        case _ => 
1637
1614
 
            if ((4 == $match0))
1638
1615
 
                then s2m(addr, landAssetIds, txId)
1639
1616
 
                else if ((3 == $match0))
1640
1617
 
                    then m2l(addr, landAssetIds, txId, shouldUseMat, paymentAmount)
1641
1618
 
                    else if ((5 == $match0))
1642
1619
 
                        then l2xl(addr, landAssetIds, txId, shouldUseMat, paymentAmount)
1643
1620
 
                        else if ((2 == $match0))
1644
1621
 
                            then xl2xxl(addr, landAssetIds, txId, shouldUseMat, paymentAmount)
1645
1622
 
                            else throw("Unknown merge")
1646
1623
 
    }
1647
1624
 
    mergeResult
1648
1625
 
    }
1649
1626
 
1650
1627
 
1651
1628
 
func prolog (i) = if (if ((i.originCaller != restContract))
1652
1629
 
    then valueOrElse(getBoolean(keyBlocked()), false)
1653
1630
 
    else false)
1654
1631
 
    then throw("Contracts are under maintenance")
1655
1632
 
    else StringEntry(keyLastTxIdByUser(toString(i.originCaller)), toBase58String(i.transactionId))
1656
1633
 
1657
1634
 
1658
1635
 
@Callable(i)
1659
1636
 
func constructorV1 (restAddr) = if ((i.caller != this))
1660
1637
 
    then throw("Permission denied")
1661
1638
 
    else [StringEntry(keyRestAddress(), restAddr)]
1662
1639
 
1663
1640
 
1664
1641
 
1665
1642
 
@Callable(i)
1666
1643
 
func setBlocked (isBlocked) = if ((i.caller != this))
1667
1644
 
    then throw("permission denied")
1668
1645
 
    else [BooleanEntry(keyBlocked(), isBlocked)]
1669
1646
 
1670
1647
 
1671
1648
 
1672
1649
 
@Callable(i)
1673
1650
 
func stakeLand () = {
1674
1651
 
    let prologAction = prolog(i)
1675
1652
 
    if ((size(i.payments) != 1))
1676
1653
 
        then throw("Exactly one payment required")
1677
1654
 
        else {
1678
1655
 
            let pmt = value(i.payments[0])
1679
1656
 
            let assetId = value(pmt.assetId)
1680
1657
 
            let address = toString(i.caller)
1681
1658
 
            if ((pmt.amount != 1))
1682
1659
 
                then throw((("NFT " + LANDPREFIX) + " token should be attached as payment"))
1683
1660
 
                else {
1684
1661
 
                    let asset = value(assetInfo(assetId))
1685
1662
 
                    if ((asset.issuer != this))
1686
1663
 
                        then throw("Unknown issuer of token")
1687
1664
 
                        else if (!(contains(asset.name, LANDPREFIX)))
1688
1665
 
                            then throw((("Only NFT " + LANDPREFIX) + " tokens are accepted"))
1689
1666
 
                            else {
1690
1667
 
                                let landNumSize = drop(asset.name, 4)
1691
1668
 
                                let landNum = if (contains(landNumSize, "XXL"))
1692
1669
 
                                    then dropRight(landNumSize, 3)
1693
1670
 
                                    else if (contains(landNumSize, "XL"))
1694
1671
 
                                        then dropRight(landNumSize, 2)
1695
1672
 
                                        else dropRight(landNumSize, 1)
1696
1673
 
                                if (!(isDefined(parseInt(landNum))))
1697
1674
 
                                    then throw(("Cannot parse land number from " + asset.name))
1698
1675
 
                                    else {
1699
1676
 
                                        let landAssetId = toBase58String(assetId)
1700
1677
 
                                        let timeKey = keyStakedTimeByAssetId(landAssetId)
1701
1678
 
                                        if (isDefined(getInteger(timeKey)))
1702
1679
 
                                            then throw((("NFT " + asset.name) + " is already staked"))
1703
1680
 
                                            else {
1704
1681
 
                                                let d = split(asset.description, "_")
1705
1682
 
                                                let terrainCounts = countTerrains(d[recTerrains])
1706
1683
 
                                                let pieces = numPiecesBySize(d[recLandSize])
1707
1684
 
                                                let props = updateProportions(terrainCounts, (pieces / SSIZE), 1)
1708
1685
 
                                                let artPieces = valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0)
1709
1686
 
                                                let landsKey = keyStakedLandsByOwner(address)
1710
1687
 
                                                let landsStr = getString(landsKey)
1711
1688
 
                                                let lands = if (isDefined(landsStr))
1712
1689
 
                                                    then split_51C(value(landsStr), "_")
1713
1690
 
                                                    else nil
1714
1691
 
                                                if (containsElement(lands, landAssetId))
1715
1692
 
                                                    then throw(("Your staked lands already contain " + landAssetId))
1716
1693
 
                                                    else {
1717
1694
 
                                                        let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1718
1695
 
                                                        let piecesKey = keyStakedPiecesByOwner(address)
1719
1696
 
                                                        let oldPieces = valueOrElse(getInteger(piecesKey), 0)
1720
1697
 
                                                        let wlgResult = asInt(invoke(wlgContract, "onStakeUnstakeLand", [address], nil))
1721
1698
 
                                                        $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, address), lastBlock.timestamp), StringEntry(landsKey, makeString_11C((lands :+ landAssetId), "_")), IntegerEntry(piecesKey, (oldPieces + pieces)), StringEntry(keyLandAssetIdToOwner(landAssetId), address), StringEntry(keyLandNumToOwner(landNum), address), IntegerEntry(keyLandArtStatusByTypeAssetIdAndOwner(ARTPRESALE, landAssetId, address), artPieces), IntegerEntry(keyInfraLevelByAssetIdAndOwner(landAssetId, address), infraLevel), StringEntry(keyResProportions(), props), prologAction], wlgResult)
1722
1699
 
                                                        }
1723
1700
 
                                                }
1724
1701
 
                                        }
1725
1702
 
                                }
1726
1703
 
                    }
1727
1704
 
            }
1728
1705
 
    }
1729
1706
 
1730
1707
 
1731
1708
 
1732
1709
 
@Callable(i)
1733
1710
 
func unstakeLand (landAssetIdIn) = {
1734
1711
 
    let prologAction = prolog(i)
1735
1712
 
    if ((size(i.payments) != 0))
1736
1713
 
        then throw("No payments required")
1737
1714
 
        else {
1738
1715
 
            let addr = toString(i.caller)
1739
1716
 
            let c = checkClaimConditions(addr, claimModeDuck, landAssetIdIn)
1740
1717
 
            let landAssetId = c._2
1741
1718
 
            let landsKey = keyStakedLandsByOwner(addr)
1742
1719
 
            let terrainCounts = countTerrains(c._3[recTerrains])
1743
1720
 
            let pieces = numPiecesBySize(c._3[recLandSize])
1744
1721
 
            let props = updateProportions(terrainCounts, (pieces / SSIZE), -1)
1745
1722
 
            let claimResult = claimAll(addr, landAssetId, pieces, claimModeDuck)
1746
1723
 
            let lands = split_51C(valueOrElse(getString(landsKey), ""), "_")
1747
1724
 
            let idx = indexOf(lands, landAssetId)
1748
1725
 
            if (!(isDefined(idx)))
1749
1726
 
                then throw(("Your staked lands don't contain " + landAssetId))
1750
1727
 
                else {
1751
1728
 
                    let now = lastBlock.timestamp
1752
1729
 
                    let govReleaseTime = valueOrElse(getInteger(govContract, keyUserGwlReleaseTime(addr)), 0)
1753
1730
 
                    if ((govReleaseTime >= now))
1754
1731
 
                        then throw(("Your gWL are taking part in voting, cannot unstake until " + toString(govReleaseTime)))
1755
1732
 
                        else {
1756
1733
 
                            let arbReleaseTime = (valueOrElse(getInteger(wlgContract, keyLastArbTimeByUser(addr)), 0) + arbitrageDelay)
1757
1734
 
                            if ((arbReleaseTime > now))
1758
1735
 
                                then throw(("Your staked lands took part in arbitrage, cannot unstake until " + toString(arbReleaseTime)))
1759
1736
 
                                else {
1760
1737
 
                                    let piecesKey = keyStakedPiecesByOwner(addr)
1761
1738
 
                                    let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
1762
1739
 
                                    let newPieces = if ((pieces > stakedPieces))
1763
1740
 
                                        then 0
1764
1741
 
                                        else (stakedPieces - pieces)
1765
1742
 
                                    let wlgResult = asInt(invoke(wlgContract, "onStakeUnstakeLand", [addr], nil))
1766
1743
 
                                    $Tuple2([ScriptTransfer(i.caller, 1, fromBase58String(landAssetId)), DeleteEntry(keyStakedTimeByAssetId(landAssetId)), DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, addr)), StringEntry(keyResProportions(), props), StringEntry(claimResult._2, makeString(claimResult._3, ":")), if ((size(lands) > 1))
1767
1744
 
                                        then StringEntry(landsKey, makeString_11C(removeByIndex(lands, value(idx)), "_"))
1768
1745
 
                                        else DeleteEntry(landsKey), IntegerEntry(piecesKey, newPieces), prologAction], wlgResult)
1769
1746
 
                                    }
1770
1747
 
                            }
1771
1748
 
                    }
1772
1749
 
            }
1773
1750
 
    }
1774
1751
 
1775
1752
 
1776
1753
 
1777
1754
 
@Callable(i)
1778
1755
 
func stakeDuck () = {
1779
1756
 
    let prologAction = prolog(i)
1780
1757
 
    if ((size(i.payments) != 1))
1781
1758
 
        then throw("Exactly one payment required")
1782
1759
 
        else {
1783
1760
 
            let pmt = value(i.payments[0])
1784
1761
 
            let assetId = value(pmt.assetId)
1785
1762
 
            let address = toString(i.caller)
1786
1763
 
            if ((pmt.amount != 1))
1787
1764
 
                then throw((("NFT " + DUCKPREFIX) + " token should be attached as payment"))
1788
1765
 
                else {
1789
1766
 
                    let asset = value(assetInfo(assetId))
1790
1767
 
                    if (if ((asset.issuer != incubatorAddr))
1791
1768
 
                        then (asset.issuer != breederAddr)
1792
1769
 
                        else false)
1793
1770
 
                        then throw((("Unknown issuer of " + DUCKPREFIX) + " token"))
1794
1771
 
                        else if (!(contains(asset.name, DUCKPREFIX)))
1795
1772
 
                            then throw((("Only NFT " + DUCKPREFIX) + " tokens are accepted"))
1796
1773
 
                            else {
1797
1774
 
                                let assetIdStr = toBase58String(assetId)
1798
1775
 
                                let timeKey = keyStakedTimeByAssetId(assetIdStr)
1799
1776
 
                                if (isDefined(getInteger(timeKey)))
1800
1777
 
                                    then throw((("NFT " + asset.name) + " is already staked"))
1801
1778
 
                                    else if (isDefined(getString(keyStakedDuckByOwner(address))))
1802
1779
 
                                        then throw(("You already staked one duck: " + asset.name))
1803
1780
 
                                        else {
1804
1781
 
                                            let locKey = keyDuckLocation(assetIdStr)
1805
1782
 
                                            let location = getString(locKey)
1806
1783
 
                                            let bpKey = keyBackpackByDuck(assetIdStr)
1807
1784
 
                                            let backpack = getString(bpKey)
1808
1785
 
                                            let keyHealth = keyDuckHealth(assetIdStr)
1809
1786
 
                                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
1810
1787
 
                                            let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
1811
1788
 
                                            ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
1812
1789
 
                                                then nil
1813
1790
 
                                                else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(backpack))
1814
1791
 
                                                    then nil
1815
1792
 
                                                    else (([StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(keyHealth, curHealth)) :+ prologAction)))))
1816
1793
 
                                            }
1817
1794
 
                                }
1818
1795
 
                    }
1819
1796
 
            }
1820
1797
 
    }
1821
1798
 
1822
1799
 
1823
1800
 
1824
1801
 
@Callable(i)
1825
1802
 
func unstakeDuck (assetIdStr) = {
1826
1803
 
    let prologAction = prolog(i)
1827
1804
 
    if ((size(i.payments) != 0))
1828
1805
 
        then throw("No payments required")
1829
1806
 
        else {
1830
1807
 
            let assetId = fromBase58String(assetIdStr)
1831
1808
 
            let address = toString(i.caller)
1832
1809
 
            let asset = value(assetInfo(assetId))
1833
1810
 
            let timeKey = keyStakedTimeByAssetId(toBase58String(assetId))
1834
1811
 
            if (!(isDefined(getInteger(timeKey))))
1835
1812
 
                then throw((("NFT " + asset.name) + " is not staked"))
1836
1813
 
                else if (!(isDefined(getString(keyStakedDuckByOwner(address)))))
1837
1814
 
                    then throw((("The duck " + asset.name) + " is not staked"))
1838
1815
 
                    else {
1839
1816
 
                        let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(toBase58String(assetId))), (("NFT " + asset.name) + " is orphaned"))
1840
1817
 
                        if ((owner != address))
1841
1818
 
                            then throw("Staked NFT is not yours")
1842
1819
 
                            else {
1843
1820
 
                                let keyHealth = keyDuckHealth(assetIdStr)
1844
1821
 
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
1845
1822
 
                                let health = valueOrElse(getInteger(keyHealth), maxHP)
1846
1823
 
                                if ((maxHP > health))
1847
1824
 
                                    then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
1848
1825
 
                                    else [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(timeKey), DeleteEntry(keyHealth), DeleteEntry(keyDuckLocation(assetIdStr)), DeleteEntry(keyDuckIdToOwner(assetIdStr)), DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, assetIdStr, address)), DeleteEntry(keyStakedDuckByOwner(address)), prologAction]
1849
1826
 
                                }
1850
1827
 
                        }
1851
1828
 
            }
1852
1829
 
    }
1853
1830
 
1854
1831
 
1855
1832
 
1856
1833
 
@Callable(i)
1857
1834
 
func claimRes (amount,landAssetIdStr) = {
1858
1835
 
    let prologAction = prolog(i)
1859
1836
 
    if ((size(i.payments) != 0))
1860
1837
 
        then throw("No payments required")
1861
1838
 
        else {
1862
1839
 
            let addr = toString(i.originCaller)
1863
1840
 
            let result = claimResInternal(addr, amount, claimModeDuck, landAssetIdStr)
1864
1841
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1865
1842
 
            $Tuple2(((((result._1 ++ updateDuckStatsInternal(duckAssetId, fraction(xpClaim, amount, MULT8))._1) :+ StringEntry(result._2, makeString(result._3, ":"))) :+ StringEntry(result._4, makeString(result._5, ":"))) :+ prologAction), result._3[bpIdxRes])
1866
1843
 
            }
1867
1844
 
    }
1868
1845
 
1869
1846
 
1870
1847
 
1871
1848
 
@Callable(i)
1872
1849
 
func claimResToWH (amount,landAssetIdStr) = {
1873
1850
 
    let prologAction = prolog(i)
1874
1851
 
    if ((size(i.payments) != 0))
1875
1852
 
        then throw("No payments required")
1876
1853
 
        else {
1877
1854
 
            let addr = toString(i.originCaller)
1878
1855
 
            let result = claimResInternal(addr, amount, claimModeWh, landAssetIdStr)
1879
1856
 
            $Tuple2(((((result._1 ++ updateAccStatsInternal(addr, fraction(xpClaim, amount, MULT8))._1) :+ StringEntry(result._2, makeString(result._3, ":"))) :+ StringEntry(result._4, makeString(result._5, ":"))) :+ prologAction), result._5[whIdxRes])
1880
1857
 
            }
1881
1858
 
    }
1882
1859
 
1883
1860
 
1884
1861
 
1885
1862
 
@Callable(i)
1886
1863
 
func flight (message,sig) = {
1887
1864
 
    let prologAction = prolog(i)
1888
1865
 
    if ((size(i.payments) != 0))
1889
1866
 
        then throw("No payments required")
1890
1867
 
        else {
1891
1868
 
            let userAddr = toString(i.caller)
1892
1869
 
            let f = flightCommon(userAddr, message, sig)
1893
1870
 
            let duckAssetId = f._2
1894
1871
 
            let locKey = keyDuckLocation(duckAssetId)
1895
1872
 
            let curLocation = valueOrElse(getString(locKey), DEFAULTLOCATION)
1896
1873
 
            if ((f._4 == curLocation))
1897
1874
 
                then throw("You can't fly to the same location")
1898
1875
 
                else {
1899
1876
 
                    let bpKey = keyBackpackByDuck(duckAssetId)
1900
1877
 
                    let currentPack = getBackpack(bpKey)
1901
1878
 
                    let newProd = subtractProducts(currentPack[bpIdxProd], f._5)
1902
1879
 
                    $Tuple2(([StringEntry(locKey, if ((f._1 > 0))
1903
1880
 
                        then f._4
1904
1881
 
                        else curLocation), StringEntry(bpKey, makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProd], ":")), IntegerEntry(keyDuckHealth(duckAssetId), f._1), prologAction] ++ updateDuckStatsInternal(duckAssetId, if ((f._1 > 0))
1905
1882
 
                        then xpSuccessFlight
1906
1883
 
                        else xpFailFlight)._1), f._3)
1907
1884
 
                    }
1908
1885
 
            }
1909
1886
 
    }
1910
1887
 
1911
1888
 
1912
1889
 
1913
1890
 
@Callable(i)
1914
1891
 
func heal (quantityL1,quantityL2,quantityL3) = {
1915
1892
 
    let prologAction = prolog(i)
1916
1893
 
    if (if (if ((0 > quantityL1))
1917
1894
 
        then true
1918
1895
 
        else (0 > quantityL2))
1919
1896
 
        then true
1920
1897
 
        else (0 > quantityL3))
1921
1898
 
        then throw("Quantity cannot be negative")
1922
1899
 
        else {
1923
1900
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1924
1901
 
            let qts = [quantityL1, quantityL2, quantityL3]
1925
1902
 
            let keyHealth = keyDuckHealth(duckAssetId)
1926
1903
 
            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
1927
1904
 
            let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
1928
1905
 
            if ((oldHealth >= maxHP))
1929
1906
 
                then throw((("HP should be < " + toString(maxHP)) + " to heal"))
1930
1907
 
                else {
1931
1908
 
                    let bpKey = keyBackpackByDuck(duckAssetId)
1932
1909
 
                    let currentPack = getBackpack(bpKey)
1933
1910
 
                    let prodList = if ((currentPack[bpIdxProd] == ""))
1934
1911
 
                        then nil
1935
1912
 
                        else split(currentPack[bpIdxProd], "_")
1936
1913
 
                    func iterateProd (acc,ignoredItem) =                     {
1937
1914
 
                        let n = acc._2
1938
1915
 
                        let x = if ((size(prodList) > n))
1939
1916
 
                            then parseIntValue(prodList[n])
1940
1917
 
                            else 0
1941
1918
 
                        if ((3 > n))
1942
1919
 
                            then {
1943
1920
 
                                let q = qts[n]
1944
1921
 
                                if ((q > x))
1945
1922
 
                                    then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
1946
1923
 
                                    else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (medKitHp[n] * q)))
1947
1924
 
                                }
1948
1925
 
                            else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
1949
1926
 
                        }
1950
1927
 
1951
1928
 
                    let result = {
1952
1929
 
                        let $l = productionMatrix
1953
1930
 
                        let $s = size($l)
1954
1931
 
                        let $acc0 = $Tuple3(nil, 0, 0)
1955
1932
 
                        func $f0_1 ($a,$i) =                         if (($i >= $s))
1956
1933
 
                            then $a
1957
1934
 
                            else iterateProd($a, $l[$i])
1958
1935
 
1959
1936
 
                        func $f0_2 ($a,$i) =                         if (($i >= $s))
1960
1937
 
                            then $a
1961
1938
 
                            else throw("List size exceeds 50")
1962
1939
 
1963
1940
 
                        $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($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)
1964
1941
 
                        }
1965
1942
 
                    let newHealth = min([maxHP, (oldHealth + result._3)])
1966
1943
 
                    $Tuple2(([IntegerEntry(keyHealth, newHealth), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(result._1, "_")], ":")), prologAction] ++ updateDuckStatsInternal(duckAssetId, (xpHeal * ((quantityL1 + quantityL2) + quantityL3)))._1), newHealth)
1967
1944
 
                    }
1968
1945
 
            }
1969
1946
 
    }
1970
1947
 
1971
1948
 
1972
1949
 
1973
1950
 
@Callable(i)
1974
1951
 
func healES () = {
1975
1952
 
    let prologAction = prolog(i)
1976
1953
 
    if ((size(i.payments) != 1))
1977
1954
 
        then throw("Exactly one payment required")
1978
1955
 
        else {
1979
1956
 
            let pmt = value(i.payments[0])
1980
1957
 
            if ((pmt.assetId != usdtAssetId))
1981
1958
 
                then throw("Allowed USDT payment only!")
1982
1959
 
                else {
1983
1960
 
                    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1984
1961
 
                    let keyHealth = keyDuckHealth(duckAssetId)
1985
1962
 
                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
1986
1963
 
                    let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
1987
1964
 
                    if ((oldHealth > 0))
1988
1965
 
                        then throw("HP should be 0 to call Emergency Service")
1989
1966
 
                        else {
1990
1967
 
                            let bpKey = keyBackpackByDuck(duckAssetId)
1991
1968
 
                            let currentPack = getBackpack(bpKey)
1992
1969
 
                            let prodList = if ((currentPack[bpIdxProd] == ""))
1993
1970
 
                                then nil
1994
1971
 
                                else split(currentPack[bpIdxProd], "_")
1995
1972
 
                            let medKitAmount1 = if ((size(prodList) > 0))
1996
1973
 
                                then parseIntValue(prodList[0])
1997
1974
 
                                else 0
1998
1975
 
                            let medKitAmount2 = if ((size(prodList) > 1))
1999
1976
 
                                then parseIntValue(prodList[1])
2000
1977
 
                                else 0
2001
1978
 
                            let medKitAmount3 = if ((size(prodList) > 2))
2002
1979
 
                                then parseIntValue(prodList[2])
2003
1980
 
                                else 0
2004
1981
 
                            if (if (if ((medKitAmount1 > 0))
2005
1982
 
                                then true
2006
1983
 
                                else (medKitAmount2 > 0))
2007
1984
 
                                then true
2008
1985
 
                                else (medKitAmount3 > 0))
2009
1986
 
                                then throw("You have to use own Medical Kit")
2010
1987
 
                                else {
2011
1988
 
                                    let existStr = getString(economyContract, keyEsWarehouse())
2012
1989
 
                                    let existAmounts = if (isDefined(existStr))
2013
1990
 
                                        then split(value(existStr), "_")
2014
1991
 
                                        else nil
2015
1992
 
                                    let existAmount = if ((size(existAmounts) > 0))
2016
1993
 
                                        then parseIntValue(existAmounts[0])
2017
1994
 
                                        else 0
2018
1995
 
                                    if ((0 >= existAmount))
2019
1996
 
                                        then throw("There are no Medical Kits L1 at Emergency Service storage")
2020
1997
 
                                        else {
2021
1998
 
                                            let newHealth = (oldHealth + medKitHp[0])
2022
1999
 
                                            let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2023
2000
 
                                            let recipe = split(productionMatrix[0], "_")
2024
2001
 
                                            let totalMat = getRecipeMaterials(recipe)
2025
2002
 
                                            let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (10 * PRODUCTPKGSIZE))
2026
2003
 
                                            if ((pmt.amount != sellPrice))
2027
2004
 
                                                then throw(("Payment attached should be " + toString(sellPrice)))
2028
2005
 
                                                else {
2029
2006
 
                                                    let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2030
2007
 
                                                    $Tuple2(([IntegerEntry(keyHealth, newHealth), prologAction] ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2031
2008
 
                                                    }
2032
2009
 
                                            }
2033
2010
 
                                    }
2034
2011
 
                            }
2035
2012
 
                    }
2036
2013
 
            }
2037
2014
 
    }
2038
2015
 
2039
2016
 
2040
2017
 
2041
2018
 
@Callable(i)
2042
2019
 
func updateBackpack (duckAssetId,newPack) = if ((i.caller != economyContract))
2043
2020
 
    then throw("permission denied")
2044
2021
 
    else $Tuple2([StringEntry(keyBackpackByDuck(duckAssetId), newPack)], newPack)
2045
2022
 
2046
2023
 
2047
2024
 
2048
2025
 
@Callable(i)
2049
2026
 
func buySLand () = {
2050
2027
 
    let prologAction = prolog(i)
2051
2028
 
    if ((size(i.payments) != 1))
2052
2029
 
        then throw("Exactly one payment required")
2053
2030
 
        else {
2054
2031
 
            let pmt = value(i.payments[0])
2055
2032
 
            if ((pmt.assetId != usdtAssetId))
2056
2033
 
                then throw("Allowed USDT payment only!")
2057
2034
 
                else if ((pmt.amount != EXPUSDT))
2058
2035
 
                    then throw(("Payment attached should be " + toString(EXPUSDT)))
2059
2036
 
                    else {
2060
2037
 
                        let result = expeditionInternal(i.caller, i.transactionId)
2061
2038
 
                        $Tuple2((((result._1 :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) ++ updateAccStatsInternal(toString(i.caller), xpNewSLand)._1) :+ prologAction), result._2._1)
2062
2039
 
                        }
2063
2040
 
            }
2064
2041
 
    }
2065
2042
 
2066
2043
 
2067
2044
 
2068
2045
 
@Callable(i)
2069
2046
 
func expedition (message,sig) = {
2070
2047
 
    let prologAction = prolog(i)
2071
2048
 
    if ((size(i.payments) != 0))
2072
2049
 
        then throw("No payments required")
2073
2050
 
        else {
2074
2051
 
            let result = expeditionCommon(i.caller, i.transactionId, message, sig)
2075
2052
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2076
2053
 
            $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) :+ prologAction), $Tuple2(result._2, result._3))
2077
2054
 
            }
2078
2055
 
    }
2079
2056
 
2080
2057
 
2081
2058
 
2082
2059
 
@Callable(i)
2083
2060
 
func upgradeInfra (landAssetId) = {
2084
2061
 
    let prologAction = prolog(i)
2085
2062
 
    if ((size(i.payments) != 0))
2086
2063
 
        then throw("No payments required")
2087
2064
 
        else {
2088
2065
 
            let result = upInfraCommon(true, i.caller, 0, landAssetId)
2089
2066
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2090
2067
 
            $Tuple2(((result._1 :+ prologAction) ++ updateDuckStatsInternal(duckAssetId, fraction(xpUpgradeInfra, result._3, MULT8))._1), result._2)
2091
2068
 
            }
2092
2069
 
    }
2093
2070
 
2094
2071
 
2095
2072
 
2096
2073
 
@Callable(i)
2097
2074
 
func upgradeInfraUsdt (landAssetId) = if ((i.caller != this))
2098
2075
 
    then throw("Permission denied")
2099
2076
 
    else {
2100
2077
 
        let prologAction = prolog(i)
2101
2078
 
        if ((size(i.payments) != 1))
2102
2079
 
            then throw("Exactly one payment required")
2103
2080
 
            else {
2104
2081
 
                let pmt = value(i.payments[0])
2105
2082
 
                if ((pmt.assetId != usdtAssetId))
2106
2083
 
                    then throw("Allowed USDT payment only!")
2107
2084
 
                    else {
2108
2085
 
                        let result = upInfraCommon(false, i.caller, pmt.amount, landAssetId)
2109
2086
 
                        $Tuple2(((result._1 :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) :+ prologAction), result._2)
2110
2087
 
                        }
2111
2088
 
                }
2112
2089
 
        }
2113
2090
 
2114
2091
 
2115
2092
 
2116
2093
 
@Callable(i)
2117
2094
 
func activateArtifact (artName,landAssetIdOpt) = {
2118
2095
 
    let prologAction = prolog(i)
2119
2096
 
    if ((size(i.payments) != 0))
2120
2097
 
        then throw("No payments required")
2121
2098
 
        else {
2122
2099
 
            let addr = toString(i.caller)
2123
2100
 
            let result =             match artName {
2124
2101
 
                case _ => 
2125
2102
 
                    if (("PRESALE" == $match0))
2126
2103
 
                        then activatePresaleArt(addr, landAssetIdOpt)
2127
2104
 
                        else if (("ONBOARD" == $match0))
2128
2105
 
                            then activateOnboardArt(addr)
2129
2106
 
                            else throw("Unknown artifact")
2130
2107
 
            }
2131
2108
 
            (result :+ prologAction)
2132
2109
 
            }
2133
2110
 
    }
2134
2111
 
2135
2112
 
2136
2113
 
2137
2114
 
@Callable(i)
2138
2115
 
func mergeLands (landAssetIds) = {
2139
2116
 
    let prologAction = prolog(i)
2140
2117
 
    if ((size(i.payments) != 0))
2141
2118
 
        then throw("No payments required")
2142
2119
 
        else {
2143
2120
 
            let result = mergeCommon(true, toString(i.caller), 0, landAssetIds, i.transactionId)
2144
2121
 
            $Tuple2(((result._1 :+ prologAction) ++ updateAccStatsInternal(toString(i.caller), xpMerge)._1), result._2)
2145
2122
 
            }
2146
2123
 
    }
2147
2124
 
2148
2125
 
2149
2126
 
2150
2127
 
@Callable(i)
2151
2128
 
func mergeLandsUsdt (landAssetIds) = {
2152
2129
 
    let prologAction = prolog(i)
2153
2130
 
    if ((size(i.payments) != 1))
2154
2131
 
        then throw("Exactly one payment required")
2155
2132
 
        else {
2156
2133
 
            let pmt = value(i.payments[0])
2157
2134
 
            if ((pmt.assetId != usdtAssetId))
2158
2135
 
                then throw("Allowed USDT payment only!")
2159
2136
 
                else {
2160
2137
 
                    let result = mergeCommon(false, toString(i.caller), pmt.amount, landAssetIds, i.transactionId)
2161
2138
 
                    $Tuple2(((result._1 :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) :+ prologAction), result._2)
2162
2139
 
                    }
2163
2140
 
            }
2164
2141
 
    }
2165
2142
 
2166
2143
 
2167
2144
 
2168
2145
 
@Callable(i)
2169
2146
 
func cargoExchange (cargoListStr,landAssetId) = {
2170
2147
 
    let prologAction = prolog(i)
2171
2148
 
    if ((size(i.payments) != 0))
2172
2149
 
        then throw("No payments required")
2173
2150
 
        else {
2174
2151
 
            let cargoParts = split_4C(cargoListStr, ":")
2175
2152
 
            let addr = toString(i.originCaller)
2176
2153
 
            let asset = value(assetInfo(fromBase58String(landAssetId)))
2177
2154
 
            let timeKey = keyStakedTimeByAssetId(landAssetId)
2178
2155
 
            if (!(isDefined(getInteger(timeKey))))
2179
2156
 
                then throw((asset.name + " is not staked"))
2180
2157
 
                else {
2181
2158
 
                    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
2182
2159
 
                    if ((owner != addr))
2183
2160
 
                        then throw((LANDPREFIX + " is not yours"))
2184
2161
 
                        else {
2185
2162
 
                            let landIndex = (numPiecesBySize(split(asset.description, "_")[recLandSize]) / SSIZE)
2186
2163
 
                            let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2187
2164
 
                            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2188
2165
 
                            let curLocation = valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION)
2189
2166
 
                            let loc = split(value(curLocation), "_")
2190
2167
 
                            if ((loc[locIdxType] != "L"))
2191
2168
 
                                then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
2192
2169
 
                                else if ((loc[locIdxId] != landAssetId))
2193
2170
 
                                    then throw(("Duck should be on the land " + landAssetId))
2194
2171
 
                                    else {
2195
2172
 
                                        let whKey = keyWarehouseByLand(landAssetId)
2196
2173
 
                                        let currentWh = getWarehouse(whKey, landIndex, infraLevel)
2197
2174
 
                                        let bpKey = keyBackpackByDuck(duckAssetId)
2198
2175
 
                                        let currentPack = getBackpack(bpKey)
2199
2176
 
                                        let result = moveStuff(cargoParts, currentWh, currentPack)
2200
2177
 
                                        let loft = split(currentWh[whIdxLOFT], "_")
2201
2178
 
                                        let loftO = (parseIntValue(loft[volOccupied]) + result._7)
2202
2179
 
                                        let loftF = (parseIntValue(loft[volFree]) - result._7)
2203
2180
 
[StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], result._4, result._5, result._6], ":")), StringEntry(whKey, makeString_2C([currentWh[whIdxLevels], result._1, result._2, result._3, makeString([loft[volLocked], toString(loftO), toString(loftF), loft[volTotal]], "_")], ":")), prologAction]
2204
2181
 
                                        }
2205
2182
 
                            }
2206
2183
 
                    }
2207
2184
 
            }
2208
2185
 
    }
2209
2186
 
2210
2187
 
2211
2188
 
2212
2189
 
@Callable(i)
2213
2190
 
func saveWarehouse (whStr,landAssetId) = if ((i.caller != economyContract))
2214
2191
 
    then throw("Access denied")
2215
2192
 
    else {
2216
2193
 
        let whKey = keyWarehouseByLand(landAssetId)
2217
2194
 
        let wh = split_4C(whStr, ":")
2218
2195
 
        if ((size(wh) != 5))
2219
2196
 
            then throw("warehouse string should contain 4 ':' separators")
2220
2197
 
            else {
2221
2198
 
                let loftL = split(wh[whIdxLOFT], "_")[volLocked]
2222
2199
 
                let loftO = getWarehouseOccupiedVol(wh)
2223
2200
 
                let loftT = getWarehouseTotalVolume(wh[whIdxLevels])
2224
2201
 
                let loftF = ((loftT - parseIntValue(loftL)) - loftO)
2225
2202
 
                let newWhStr = makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], wh[whIdxProd], makeString([loftL, toString(loftO), toString(loftF), toString(loftT)], "_")], ":")
2226
2203
 
                $Tuple2([StringEntry(whKey, newWhStr)], newWhStr)
2227
2204
 
                }
2228
2205
 
        }
2229
2206
 
2230
2207
 
2231
2208
 
2232
2209
 
@Callable(i)
2233
2210
 
func fixWarehouseFormat (landAssetId) = if ((i.caller != restContract))
2234
2211
 
    then throw("Access denied")
2235
2212
 
    else {
2236
2213
 
        let whKey = keyWarehouseByLand(landAssetId)
2237
2214
 
        let asset = value(assetInfo(fromBase58String(landAssetId)))
2238
2215
 
        let landIndex = (numPiecesBySize(split(asset.description, "_")[recLandSize]) / SSIZE)
2239
2216
 
        let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2240
2217
 
        let wh = getWarehouse(whKey, landIndex, infraLevel)
2241
2218
 
        let loftL = asInt(invoke(economyContract, "recalcLockedVolumeREADONLY", [landAssetId, wh], nil))
2242
2219
 
        let loftO = getWarehouseOccupiedVol(wh)
2243
2220
 
        let loftT = getWarehouseTotalVolume(wh[whIdxLevels])
2244
2221
 
        let loftF = ((loftT - loftL) - loftO)
2245
2222
 
        let newWhStr = makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], wh[whIdxProd], makeString([toString(loftL), toString(loftO), toString(loftF), toString(loftT)], "_")], ":")
2246
2223
 
        $Tuple2([StringEntry(whKey, newWhStr)], newWhStr)
2247
2224
 
        }
2248
2225
 
2249
2226
 
2250
2227
 
2251
2228
 
@Callable(i)
2252
2229
 
func fixStakedPieces (address) = if ((i.caller != restContract))
2253
2230
 
    then throw("Access denied")
2254
2231
 
    else {
2255
2232
 
        let stakedPieces = if ((address == ""))
2256
2233
 
            then 0
2257
2234
 
            else {
2258
2235
 
                let landsStr = getString(stakingContract, keyStakedLandsByOwner(address))
2259
2236
 
                let lands = if (isDefined(landsStr))
2260
2237
 
                    then split_51C(value(landsStr), "_")
2261
2238
 
                    else nil
2262
2239
 
                func oneLand (acc,landAssetId) =                 {
2263
2240
 
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
2264
2241
 
                    let landSize = split(asset.description, "_")[recLandSize]
2265
2242
 
                    (acc + numPiecesBySize(landSize))
2266
2243
 
                    }
2267
2244
 
2268
2245
 
                let $l = lands
2269
2246
 
                let $s = size($l)
2270
2247
 
                let $acc0 = 0
2271
2248
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
2272
2249
 
                    then $a
2273
2250
 
                    else oneLand($a, $l[$i])
2274
2251
 
2275
2252
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
2276
2253
 
                    then $a
2277
2254
 
                    else throw("List size exceeds 100")
2278
2255
 
2279
2256
 
                $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)
2280
2257
 
                }
2281
2258
 
        $Tuple2([IntegerEntry(keyStakedPiecesByOwner(address), stakedPieces)], stakedPieces)
2282
2259
 
        }
2283
2260
 
2284
2261
 
2285
2262
 
2286
2263
 
@Callable(i)
2287
2264
 
func setCustomName (assetId,customName,type) = {
2288
2265
 
    let prologAction = prolog(i)
2289
2266
 
    if ((size(i.payments) != 1))
2290
2267
 
        then throw("Exactly one payment required")
2291
2268
 
        else {
2292
2269
 
            let pmt = value(i.payments[0])
2293
2270
 
            if ((pmt.assetId != usdtAssetId))
2294
2271
 
                then throw("Allowed USDT payment only!")
2295
2272
 
                else if ((pmt.amount != RENAMINGCOST))
2296
2273
 
                    then throw(("Payment should be " + toString(RENAMINGCOST)))
2297
2274
 
                    else if (contains(customName, "__"))
2298
2275
 
                        then throw(("Name should not contain '__': " + customName))
2299
2276
 
                        else if ((size(customName) > MAXNAMELEN))
2300
2277
 
                            then throw(("Name too long, maxLength=" + toString(MAXNAMELEN)))
2301
2278
 
                            else {
2302
2279
 
                                let addr = toString(i.originCaller)
2303
2280
 
                                let actions =                                 match type {
2304
2281
 
                                    case _ => 
2305
2282
 
                                        if (("ACCOUNT" == $match0))
2306
2283
 
                                            then {
2307
2284
 
                                                let reverseKey = keyCustomNameToAddress(customName)
2308
2285
 
                                                let nameOwner = getString(reverseKey)
2309
2286
 
                                                if (isDefined(nameOwner))
2310
2287
 
                                                    then throw(("Name already registered: " + customName))
2311
2288
 
                                                    else {
2312
2289
 
                                                        let addrToNameKey = keyAddressToCustomName(addr)
2313
2290
 
                                                        let oldName = getString(addrToNameKey)
2314
2291
 
                                                        let freeOld = if (isDefined(oldName))
2315
2292
 
                                                            then [DeleteEntry(keyCustomNameToAddress(value(oldName)))]
2316
2293
 
                                                            else nil
2317
2294
 
                                                        (((freeOld :+ StringEntry(addrToNameKey, customName)) :+ StringEntry(reverseKey, addr)) ++ updateAccStatsInternal(addr, xpCustomName)._1)
2318
2295
 
                                                        }
2319
2296
 
                                                }
2320
2297
 
                                            else if (("LAND" == $match0))
2321
2298
 
                                                then {
2322
2299
 
                                                    let asset = value(assetInfo(fromBase58String(assetId)))
2323
2300
 
                                                    let timeKey = keyStakedTimeByAssetId(assetId)
2324
2301
 
                                                    if (!(isDefined(getInteger(timeKey))))
2325
2302
 
                                                        then throw((asset.name + " is not staked"))
2326
2303
 
                                                        else {
2327
2304
 
                                                            let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(assetId)), (("NFT " + asset.name) + " is orphaned"))
2328
2305
 
                                                            if ((owner != addr))
2329
2306
 
                                                                then throw((LANDPREFIX + " is not yours"))
2330
2307
 
                                                                else {
2331
2308
 
                                                                    let reverseKey = keyLandCustomNameToAssetId(customName)
2332
2309
 
                                                                    let nameOwner = getString(reverseKey)
2333
2310
 
                                                                    if (isDefined(nameOwner))
2334
2311
 
                                                                        then throw(("Name already registered: " + customName))
2335
2312
 
                                                                        else {
2336
2313
 
                                                                            let assetToNameKey = keyLandAssetIdToCustomName(assetId)
2337
2314
 
                                                                            let oldName = getString(assetToNameKey)
2338
2315
 
                                                                            let freeOld = if (isDefined(oldName))
2339
2316
 
                                                                                then [DeleteEntry(keyLandCustomNameToAssetId(value(oldName)))]
2340
2317
 
                                                                                else nil
2341
2318
 
                                                                            (((freeOld :+ StringEntry(assetToNameKey, customName)) :+ StringEntry(reverseKey, assetId)) ++ updateAccStatsInternal(addr, xpCustomName)._1)
2342
2319
 
                                                                            }
2343
2320
 
                                                                    }
2344
2321
 
                                                            }
2345
2322
 
                                                    }
2346
2323
 
                                                else if (("DUCK" == $match0))
2347
2324
 
                                                    then {
2348
2325
 
                                                        let asset = value(assetInfo(fromBase58String(assetId)))
2349
2326
 
                                                        let timeKey = keyStakedTimeByAssetId(assetId)
2350
2327
 
                                                        if (if (!(isDefined(getInteger(timeKey))))
2351
2328
 
                                                            then true
2352
2329
 
                                                            else !(isDefined(getString(keyStakedDuckByOwner(addr)))))
2353
2330
 
                                                            then throw((asset.name + " is not staked"))
2354
2331
 
                                                            else {
2355
2332
 
                                                                let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(assetId)), (("NFT " + asset.name) + " is orphaned"))
2356
2333
 
                                                                if ((owner != addr))
2357
2334
 
                                                                    then throw((DUCKPREFIX + " is not yours"))
2358
2335
 
                                                                    else {
2359
2336
 
                                                                        let reverseKey = keyDuckCustomNameToAssetId(customName)
2360
2337
 
                                                                        let nameOwner = getString(reverseKey)
2361
2338
 
                                                                        if (isDefined(nameOwner))
2362
2339
 
                                                                            then throw(("Name already registered: " + customName))
2363
2340
 
                                                                            else {
2364
2341
 
                                                                                let assetToNameKey = keyDuckAssetIdToCustomName(assetId)
2365
2342
 
                                                                                let oldName = getString(assetToNameKey)
2366
2343
 
                                                                                let freeOld = if (isDefined(oldName))
2367
2344
 
                                                                                    then [DeleteEntry(keyDuckCustomNameToAssetId(value(oldName)))]
2368
2345
 
                                                                                    else nil
2369
2346
 
                                                                                (((freeOld :+ StringEntry(assetToNameKey, customName)) :+ StringEntry(reverseKey, assetId)) ++ updateDuckStatsInternal(assetId, xpCustomName)._1)
2370
2347
 
                                                                                }
2371
2348
 
                                                                        }
2372
2349
 
                                                                }
2373
2350
 
                                                        }
2374
2351
 
                                                    else throw("Unknown entity type")
2375
2352
 
                                }
2376
2353
 
                                $Tuple2(((actions :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) :+ prologAction), 0)
2377
2354
 
                                }
2378
2355
 
            }
2379
2356
 
    }
2380
2357
 
2381
2358
 
2382
2359
 
2383
2360
 
@Callable(i)
2384
2361
 
func setReferrals (oldPlayer,newPlayer) = if ((i.callerPublicKey != pub))
2385
2362
 
    then throw("Permission denied")
2386
2363
 
    else {
2387
2364
 
        let prologAction = prolog(i)
2388
2365
 
        if ((size(i.payments) != 0))
2389
2366
 
            then throw("No payments required")
2390
2367
 
            else if (!(isDefined(addressFromString(oldPlayer))))
2391
2368
 
                then throw(("Invalid address: " + oldPlayer))
2392
2369
 
                else if (!(isDefined(addressFromString(newPlayer))))
2393
2370
 
                    then throw(("Invalid address: " + newPlayer))
2394
2371
 
                    else {
2395
2372
 
                        let oldsKey = keyOldies()
2396
2373
 
                        let olds = getString(oldsKey)
2397
2374
 
                        let oldies = if (isDefined(olds))
2398
2375
 
                            then split_4C(value(olds), "_")
2399
2376
 
                            else nil
2400
2377
 
                        if (containsElement(oldies, newPlayer))
2401
2378
 
                            then throw((newPlayer + " is not newbie (already has referrals)"))
2402
2379
 
                            else {
2403
2380
 
                                let refByKey = keyAddressRefBy(newPlayer)
2404
2381
 
                                let refBy = getString(refByKey)
2405
2382
 
                                if (if (isDefined(refBy))
2406
2383
 
                                    then isDefined(addressFromString(value(refBy)))
2407
2384
 
                                    else false)
2408
2385
 
                                    then throw(((newPlayer + " already has refBy: ") + value(refBy)))
2409
2386
 
                                    else {
2410
2387
 
                                        let refsKey = keyAddressReferrals(oldPlayer)
2411
2388
 
                                        let refs = getString(refsKey)
2412
2389
 
                                        let refsArray = if (isDefined(refs))
2413
2390
 
                                            then split_4C(value(refs), "_")
2414
2391
 
                                            else nil
2415
2392
 
                                        if (containsElement(refsArray, newPlayer))
2416
2393
 
                                            then throw((((oldPlayer + " already contains ") + newPlayer) + " within referrals"))
2417
2394
 
                                            else {
2418
2395
 
                                                let newRefs = makeString_2C((refsArray :+ newPlayer), "_")
2419
2396
 
                                                let newOlds = if (containsElement(oldies, oldPlayer))
2420
2397
 
                                                    then value(olds)
2421
2398
 
                                                    else makeString_2C((oldies :+ oldPlayer), "_")
2422
2399
 
                                                $Tuple2([StringEntry(refByKey, oldPlayer), StringEntry(refsKey, newRefs), StringEntry(oldsKey, newOlds), prologAction], 0)
2423
2400
 
                                                }
2424
2401
 
                                        }
2425
2402
 
                                }
2426
2403
 
                        }
2427
2404
 
        }
2428
2405
 
2429
2406
 
2430
2407
 
2431
2408
 
@Callable(i)
2432
2409
 
func distributePoints (strength,accuracy,intellect,endurance,dexterity) = {
2433
2410
 
    let prologAction = prolog(i)
2434
2411
 
    if ((size(i.payments) != 0))
2435
2412
 
        then throw("No payments required")
2436
2413
 
        else {
2437
2414
 
            let addr = toString(i.originCaller)
2438
2415
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2439
2416
 
            let freeKeyAcc = keyUserFreePoints(addr)
2440
2417
 
            let freePointsAcc = valueOrElse(getInteger(stakingContract, freeKeyAcc), 0)
2441
2418
 
            let freeKeyDuck = keyDuckFreePoints(duckAssetId)
2442
2419
 
            let freePointsDuck = valueOrElse(getInteger(stakingContract, freeKeyDuck), 0)
2443
2420
 
            let sumFree = (freePointsAcc + freePointsDuck)
2444
2421
 
            let sumToDistribute = ((((strength + accuracy) + intellect) + endurance) + dexterity)
2445
2422
 
            if ((sumToDistribute > sumFree))
2446
2423
 
                then throw((("There are only " + toString(sumFree)) + " free points to distribute"))
2447
2424
 
                else {
2448
2425
 
                    let charsKey = keyDuckChars(duckAssetId)
2449
2426
 
                    let chars = split(valueOrElse(getString(stakingContract, charsKey), "0_0_0_0_0"), "_")
2450
2427
 
                    let newAcc = (freePointsAcc - sumToDistribute)
2451
2428
 
                    $Tuple2([IntegerEntry(freeKeyAcc, if ((0 > newAcc))
2452
2429
 
                        then 0
2453
2430
 
                        else newAcc), IntegerEntry(freeKeyDuck, if ((0 > newAcc))
2454
2431
 
                        then (freePointsDuck + newAcc)
2455
2432
 
                        else freePointsDuck), StringEntry(charsKey, makeString([toString((parseIntValue(chars[charStrength]) + strength)), toString((parseIntValue(chars[charAccuracy]) + accuracy)), toString((parseIntValue(chars[charIntellect]) + intellect)), toString((parseIntValue(chars[charEndurance]) + endurance)), toString((parseIntValue(chars[charDexterity]) + dexterity))], "_")), prologAction], 0)
2456
2433
 
                    }
2457
2434
 
            }
2458
2435
 
    }
2459
2436
 
2460
2437
 
2461
2438
 
2462
2439
 
@Callable(i)
2463
2440
 
func splitByGlobalWeightsREADONLY (amount) = $Tuple2(nil, getNeededMaterials(amount))
2464
2441
 
2465
2442
 
2466
2443
 
2467
2444
 
@Callable(i)
2468
2445
 
func splitByGlobalAndLocalWeightsREADONLY (matAmount,resAmount,terrains) = {
2469
2446
 
    let terrainCounts = countTerrains(terrains)
2470
2447
 
    $Tuple2(nil, $Tuple2(getNeededMaterials(matAmount), distributeByWeights(resAmount, terrainCounts)))
2471
2448
 
    }
2472
2449
 
2473
2450
 
2474
2451
 
2475
2452
 
@Callable(i)
2476
2453
 
func getBackpackREADONLY (duckAssetId) = $Tuple2(nil, makeString(getBackpack(keyBackpackByDuck(duckAssetId)), ":"))
2477
2454
 
2478
2455
 
2479
2456
 
2480
2457
 
@Callable(i)
2481
2458
 
func getWarehouseREADONLY (landAssetId) = {
2482
2459
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
2483
2460
 
    let landIndex = (numPiecesBySize(split(asset.description, "_")[recLandSize]) / SSIZE)
2484
2461
 
    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2485
2462
 
    $Tuple2(nil, makeString_2C(getWarehouse(keyWarehouseByLand(landAssetId), landIndex, infraLevel), ":"))
2486
2463
 
    }
2487
2464
 
2488
2465
 
2489
2466
 
2490
2467
 
@Callable(i)
2491
2468
 
func saveLastTx () = if (if ((i.caller != wlgContract))
2492
2469
 
    then (i.caller != economyContract)
2493
2470
 
    else false)
2494
2471
 
    then throw("Access denied")
2495
2472
 
    else $Tuple2([prolog(i)], 42)
2496
2473
 
2497
2474
 
2498
2475
 
2499
2476
 
@Callable(i)
2500
2477
 
func updateDuckStats (duckAssetId,deltaXP) = if ((i.caller != economyContract))
2501
2478
 
    then throw("Access denied")
2502
2479
 
    else updateDuckStatsInternal(duckAssetId, deltaXP)
2503
2480
 
2504
2481
 
2505
2482
 
2506
2483
 
@Callable(i)
2507
2484
 
func updateAccStats (addr,deltaXP) = if ((i.caller != economyContract))
2508
2485
 
    then throw("Access denied")
2509
2486
 
    else updateAccStatsInternal(addr, deltaXP)
2510
2487
 
2511
2488
 
2512
2489
 
2513
2490
 
@Callable(i)
2514
2491
 
func equipDuck (equipment) = {
2515
2492
 
    let prologAction = prolog(i)
2516
2493
 
    if ((size(i.payments) != 0))
2517
2494
 
        then throw("No payments required")
2518
2495
 
        else {
2519
2496
 
            let addr = toString(i.originCaller)
2520
2497
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2521
2498
 
            let eqKey = keyDuckEquipment(duckAssetId)
2522
2499
 
            let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
2523
2500
 
            let bpKey = keyBackpackByDuck(duckAssetId)
2524
2501
 
            let currentPack = getBackpack(bpKey)
2525
2502
 
            let newEq = split(equipment, "_")
2526
2503
 
            if ((size(newEq) != NUMSEGMENTS))
2527
2504
 
                then throw("Wrong equipment string")
2528
2505
 
                else {
2529
2506
 
                    let bpProd = currentPack[bpIdxProd]
2530
-
                    let pList = if ((bpProd == ""))
2531
-
                        then nil
2532
-
                        else split(bpProd, "_")
2533
-
                    let tempProd = dress(currentSegs, pList, true)
2534
-
                    let newProd = dress(newEq, tempProd, false)
2535
-
                    $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(newProd, "_")], ":")), prologAction], 0)
2507
+
                    let tempProdB = dressB(currentSegs, prodStrToBytes(bpProd), true)
2508
+
                    let newProdB = dressB(newEq, tempProdB, false)
2509
+
                    let newProdStr = bytesToProdStr(newProdB)
2510
+
                    $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProdStr], ":")), prologAction], 0)
2536
2511
 
                    }
2537
2512
 
            }
2538
2513
 
    }
2539
2514
 
2540
2515
 
2541
2516
 
2542
2517
 
@Callable(i)
2543
2518
 
func test () = if ((i.caller != this))
2544
2519
 
    then throw("Access denied")
2545
2520
 
    else {
2546
2521
 
        let a = prodStrToBytes("")
2547
2522
 
        let b = bytesToProdStr(a)
2548
2523
 
        $Tuple2(nil, b)
2549
2524
 
        }
2550
2525
 
2551
2526