tx · Yn7jTiNBWNi5G94z6SCngKNKXUP3d8VDT8A3VAf1UXs

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.06700000 Waves

2023.06.20 21:04 [2631298] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Yn7jTiNBWNi5G94z6SCngKNKXUP3d8VDT8A3VAf1UXs",
    "fee": 6700000,
    "feeAssetId": null,
    "timestamp": 1687284353244,
    "version": 2,
    "chainId": 84,
    "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm",
    "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX",
    "proofs": [
        "2biwtMw6P5csAgtS8i4bvRDkRDgUPCS94CFL4TJC9GQA1ooFyfNLXb1XnvBAepXaCxS4GXfVYLFD81LBKN9AeiH8"
    ],
    "script": "base64:BgKYAQgCEgMKAQgSAwoBBBIAEgMKAQgSABIDCgEIEgQKAgEIEgQKAgEIEgQKAgICEgUKAwEBARIAEgQKAggIEgASBAoCAgISAwoBCBIDCgEIEgQKAggIEgMKARgSAwoBGBIECgIICBIECgIICBIDCgEIEgMKAQgSBQoDCAgIEgQKAggIEgMKAQESBQoDAQEIEgMKAQgSAwoBCBIAwAEABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgARSW5mcmFVcGdyYWRlQ29zdFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgMivoCUDCQAAAgEBVAUHJG1hdGNoMACAwtcvCQACAQINVW5rbm93biBjaGFpbgADU0VQAgJfXwAFTVVMVDYAwIQ9AAVNVUxUNwCAreIEAAVNVUxUOACAwtcvAAZNVUxUMTAAgMivoCUACkxBTkRQUkVGSVgCBExBTkQACkRVQ0tQUkVGSVgCBERVQ0sACkFSVFBSRVNBTEUCB1BSRVNBTEUABk5VTVJFUwAGAAVTU0laRQAZAAVNU0laRQBkAAVMU0laRQDhAQAGWExTSVpFAJADAAdYWExTSVpFAPEEAA9EQUlMWVJFU0JZUElFQ0UAgPjSAQAJREFZTUlMTElTAIC4mSkADFdITVVMVElQTElFUgCAyK+gJQAPREVGQVVMVExPQ0FUSU9OAg9BZnJpY2FfRl9BZnJpY2EAEFJFU09VUkNFUFJJQ0VNSU4A1bUCAA1FU01BWFBBQ0tBR0VTAAMACUVTQlVZQ09FRgAEAApFU1NFTExDT0VGAAoABU1BWEhQAGQACHJlc1R5cGVzCQDMCAICA09pbAkAzAgCAgNPcmUJAMwIAgIEV29vZAkAzAgCAgRTYW5kCQDMCAICBENsYXkJAMwIAgIHT3JnYW5pYwUDbmlsAAhtYXRUeXBlcwkAzAgCAgRGdWVsCQDMCAICBU1ldGFsCQDMCAICBVBsYW5rCQDMCAICBUdsYXNzCQDMCAICB1BsYXN0aWMJAMwIAgIHUHJvdGVpbgUDbmlsAAlwcm9kVHlwZXMJAMwIAgIQRmlyc3QgQWlkIEtpdCBMMQkAzAgCAhBGaXJzdCBBaWQgS2l0IEwyCQDMCAICEEZpcnN0IEFpZCBLaXQgTDMJAMwIAgILQmFja3BhY2sgTDEJAMwIAgILQmFja3BhY2sgTDIJAMwIAgILQmFja3BhY2sgTDMJAMwIAgIORm9vZCBSYXRpb24gTDEJAMwIAgIORm9vZCBSYXRpb24gTDIJAMwIAgIORm9vZCBSYXRpb24gTDMJAMwIAgILSmV0IFBhY2sgTDEJAMwIAgILSmV0IFBhY2sgTDIJAMwIAgILSmV0IFBhY2sgTDMJAMwIAgIJU2hpZWxkIEwxCQDMCAICCVNoaWVsZCBMMgkAzAgCAglTaGllbGQgTDMFA25pbAAKY29udGluZW50cwkAzAgCAghBbWVyaWNhcwkAzAgCAgZFdXJvcGUJAMwIAgIEQXNpYQkAzAgCAgZBZnJpY2EJAMwIAgIHT2NlYW5pYQUDbmlsABBwcm9kdWN0aW9uTWF0cml4CQDMCAICEjFfMV8xXzJfMl81XzFfMTBfMAkAzAgCAhMyXzJfMl80XzRfMTBfMV8xMF8wCQDMCAICEzNfM18zXzZfNl8xNV8xXzEwXzAJAMwIAgITMl81XzVfMl83XzVfMl8xMDBfMQkAzAgCAhc0XzEwXzEwXzRfMTRfMTBfMl8xMDBfMQkAzAgCAhc2XzE1XzE1XzZfMjFfMTVfMl8xMDBfMQkAzAgCAhIxXzFfMV8xXzFfOF8xXzEwXzIJAMwIAgITMl8yXzJfMl8yXzE2XzFfMTBfMgkAzAgCAhMzXzNfM18zXzNfMjRfMV8xMF8yCQDMCAICEzlfOV8xXzVfNV8xXzVfMTAwXzMJAMwIAgIXMThfMThfMl8xMF8xMF8yXzVfMTAwXzMJAMwIAgIXMjdfMjdfM18xNV8xNV8zXzVfMTAwXzMJAMwIAgISMl8yXzFfMl8yXzJfMV8xMF80CQDMCAICEjRfNF8yXzRfNF80XzFfMTBfNAkAzAgCAhI2XzZfM182XzZfNl8xXzEwXzQFA25pbAAPY29udElkeEFtZXJpY2FzAAAADWNvbnRJZHhFdXJvcGUAAQALY29udElkeEFzaWEAAgANY29udElkeEFmcmljYQADAA5jb250SWR4T2NlYW5pYQAEAA1yZWNpcGVJZHhGdWVsAAAADnJlY2lwZUlkeE1ldGFsAAEADnJlY2lwZUlkeFBsYW5rAAIADnJlY2lwZUlkeEdsYXNzAAMAEHJlY2lwZUlkeFBsYXN0aWMABAAQcmVjaXBlSWR4UHJvdGVpbgAFAA9yZWNpcGVJZHhXZWlnaHQABgARcmVjaXBlSWR4UGFja3NpemUABwAScmVjaXBlSWR4Q29udGluZW50AAgACnJlY0xhbmROdW0AAAALcmVjTGFuZFNpemUAAQALcmVjVGVycmFpbnMAAgAMcmVjQ29udGluZW50AAMAC3doSWR4TGV2ZWxzAAAACHdoSWR4UmVzAAEACHdoSWR4TWF0AAIACXdoSWR4UHJvZAADAAl3aElkeExPRlQABAAJdm9sTG9ja2VkAAAAC3ZvbE9jY3VwaWVkAAEAB3ZvbEZyZWUAAgAIdm9sVG90YWwAAwAKYnBJZHhMZXZlbAAAAAhicElkeFJlcwABAAhicElkeE1hdAACAAlicElkeFByb2QAAwEKZ2V0UGtnU2l6ZQEHcHJvZElkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4BQdwcm9kSWR4AgFfBRFyZWNpcGVJZHhQYWNrc2l6ZQEPZ2V0U3RyaW5nT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgABDGdldEludE9yRWxzZQIDa2V5CmRlZmF1bHRWYWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUDa2V5BQpkZWZhdWx0VmFsABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACABRJZHhDZmdHb3Zlcm5hbmNlRGFwcAADAA1JZHhDZmdXbGdEYXBwAAQBCmtleVJlc3RDZmcAAg4lc19fcmVzdENvbmZpZwEOa2V5UmVzdEFkZHJlc3MAAgwlc19fcmVzdEFkZHIBEXJlYWRSZXN0Q2ZnT3JGYWlsAQRyZXN0CQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQRyZXN0CQEKa2V5UmVzdENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgdyZXN0Q2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHcmVzdENmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADHJlc3RDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEOa2V5UmVzdEFkZHJlc3MABRVkZWZhdWx0UmVzdEFkZHJlc3NTdHIAB3Jlc3RDZmcJARFyZWFkUmVzdENmZ09yRmFpbAEFDHJlc3RDb250cmFjdAAPc3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnU3Rha2luZ0RhcHAAD2Vjb25vbXlDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ0Vjb25vbXlEYXBwAAtnb3ZDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFFElkeENmZ0dvdmVybmFuY2VEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFDUlkeENmZ1dsZ0RhcHABEWtleUxhc3RUeElkQnlVc2VyAQRhZGRyCQCsAgICD2xhc3RUeElkQnlVc2VyXwUEYWRkcgEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICCW5mdE93bmVyXwUHYXNzZXRJZAEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBB2Fzc2V0SWQJAKwCAgIYbGFuZEN1c3RvbU5hbWVCeUFzc2V0SWRfBQdhc3NldElkARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQdhc3NldElkCQCsAgICC3N0YWtlZFRpbWVfBQdhc3NldElkARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQdhc3NldElkCQCsAgICC2luZnJhTGV2ZWxfBQdhc3NldElkASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIEdHlwZQdhc3NldElkCQC5CQIJAMwIAgINbGFuZEFydFN0YXR1cwkAzAgCBQR0eXBlCQDMCAIFB2Fzc2V0SWQFA25pbAIBXwEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMHbmZ0VHlwZQdhc3NldElkCW93bmVyQWRkcgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICIHN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXJfBQduZnRUeXBlAgFfBQdhc3NldElkAgFfBQlvd25lckFkZHIBEmtleVdhcmVob3VzZUJ5TGFuZAELbGFuZEFzc2V0SWQJAKwCAgIKd2FyZUhvdXNlXwULbGFuZEFzc2V0SWQBFWtleVN0YWtlZExhbmRzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICE3N0YWtlZExhbmRzQnlPd25lcl8FCW93bmVyQWRkcgEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICFHN0YWtlZFBpZWNlc0J5T3duZXJfBQlvd25lckFkZHIBGmtleUR1Y2tBc3NldElkVG9DdXN0b21OYW1lAQdhc3NldElkCQCsAgICGGR1Y2tDdXN0b21OYW1lQnlBc3NldElkXwUHYXNzZXRJZAEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEEYWRkcgkArAICAhhhY2NvdW50Q3VzdG9tTmFtZUJ5QWRkcl8FBGFkZHIBD2tleUFkZHJlc3NSZWZCeQEEYWRkcgkArAICAglhY2NSZWZCeV8FBGFkZHIBE2tleUFkZHJlc3NSZWZlcnJhbHMBBGFkZHIJAKwCAgINYWNjUmVmZXJyYWxzXwUEYWRkcgEQa2V5RHVja0lkVG9Pd25lcgEHYXNzZXRJZAkArAICAgpkdWNrT3duZXJfBQdhc3NldElkARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyARFrZXlCYWNrcGFja0J5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIJYmFja1BhY2tfBQtkdWNrQXNzZXRJZAEPa2V5RHVja0xvY2F0aW9uAQtkdWNrQXNzZXRJZAkArAICAg1kdWNrTG9jYXRpb25fBQtkdWNrQXNzZXRJZAENa2V5RHVja0hlYWx0aAELZHVja0Fzc2V0SWQJAKwCAgILZHVja0hlYWx0aF8FC2R1Y2tBc3NldElkARFrZXlSZXNQcm9wb3J0aW9ucwACE3Jlc1R5cGVzUHJvcG9ydGlvbnMBCmtleUJsb2NrZWQAAhBjb250cmFjdHNCbG9ja2VkARVrZXlVc2VyR3dsUmVsZWFzZVRpbWUBCHVzZXJBZGRyCQCsAgICGiVzJXNfX3VzZXJHd2xSZWxlYXNlVGltZV9fBQh1c2VyQWRkcgEOa2V5T3JkZXJCeUxhbmQBC2xhbmRBc3NldElkCQCsAgICCmxhbmRPcmRlcl8FC2xhbmRBc3NldElkAQ5rZXlFc1dhcmVob3VzZQACGmVtZXJnZW5jeVdhcmVob3VzZVByb2R1Y3RzAA9sb2NJZHhDb250aW5lbnQAAAAKbG9jSWR4VHlwZQABAAhsb2NJZHhJZAACAQhhc1N0cmluZwEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMJAAIBAhhmYWlsIHRvIGNhc3QgaW50byBTdHJpbmcBBWFzSW50AQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACA0ludAQBbgUHJG1hdGNoMAUBbgkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEJYXNBbnlMaXN0AQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACCUxpc3RbQW55XQQBbAUHJG1hdGNoMAUBbAkAAgECG2ZhaWwgdG8gY2FzdCBpbnRvIExpc3RbQW55XQEJYXNCb29sZWFuAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAXMFByRtYXRjaDAFAXMJAAIBAhlmYWlsIHRvIGNhc3QgaW50byBCb29sZWFuAQ9udW1QaWVjZXNCeVNpemUBCGxhbmRTaXplBAckbWF0Y2gwBQhsYW5kU2l6ZQMJAAACAgFTBQckbWF0Y2gwBQVTU0laRQMJAAACAgFNBQckbWF0Y2gwBQVNU0laRQMJAAACAgFMBQckbWF0Y2gwBQVMU0laRQMJAAACAgJYTAUHJG1hdGNoMAUGWExTSVpFAwkAAAICA1hYTAUHJG1hdGNoMAUHWFhMU0laRQkAAgECEVVua25vd24gbGFuZCBzaXplAAtJZHhFZmZUb3RhbAAAAApJZHhFZmZVc2VyAAEBDmdldFZvdGluZ1Bvd2VyARJ1c2VyQWRkclN0ck9yRW1wdHkEBXByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAIBXwoBBWFkZGVyAgNhY2MEaXRlbQkAZAIFA2FjYwkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAp0b3RhbFBvd2VyCgACJGwFBXByb3BzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQKdXNlcnNQb3dlcgMJAAACBRJ1c2VyQWRkclN0ck9yRW1wdHkCAAAABAhsYW5kc1N0cgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBRJ1c2VyQWRkclN0ck9yRW1wdHkEBWxhbmRzAwkBCWlzRGVmaW5lZAEFCGxhbmRzU3RyCQC9CQIJAQV2YWx1ZQEFCGxhbmRzU3RyAgFfBQNuaWwKAQdvbmVMYW5kAgNhY2MLbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQECGxhbmRTaXplCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQkAZAIFA2FjYwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplCgACJGwFBWxhbmRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdvbmVMYW5kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAkAzAgCBQp0b3RhbFBvd2VyCQDMCAIFCnVzZXJzUG93ZXIFA25pbAESZ2V0UmVjaXBlTWF0ZXJpYWxzAQZyZWNpcGUKAQZhZGRNYXQCAmFjAWoJAGQCBQJhYwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnJlY2lwZQUBagoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmFkZE1hdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgANaW5jdWJhdG9yQWRkcgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1BFa3RWdXgyUmhjaFNONjNEc0RvNGI0bXo0UXF6S1NlRHYDCQAAAgEBVAUHJG1hdGNoMAUEdGhpcwkAAgECDVVua25vd24gY2hhaW4AC2JyZWVkZXJBZGRyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUERWdVU0NUg3RWg1ZG10TmJuUk5SU3RHd1VMQTdOWTZIYgMJAAACAQFUBQckbWF0Y2gwBQR0aGlzCQACAQINVW5rbm93biBjaGFpbgADcHViASBPU+IaP1So1p1SThMdRidVvbNT8yx7yVRUsP9DwbQUKAAIbWVkS2l0SHAJAMwIAgAeCQDMCAIAPAkAzAgCAHgFA25pbAARRklWRU1JTlVURVNNSUxMSVMA4KcSAAxSRU5BTUlOR0NPU1QAwJaxAgAKTUFYTkFNRUxFTgAyABVJbmZyYVVwZ3JhZGVDb3N0U1VzZHQAgK3iBAAMRVhQTUFURVJJQUxTBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAKbdgu2rBwMJAAACAQFUBQckbWF0Y2gwAKqngbMJCQACAQINVW5rbm93biBjaGFpbgAHRVhQVVNEVAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMACA5Zp3AwkAAAIBAVQFByRtYXRjaDAAgOWadwkAAgECDVVua25vd24gY2hhaW4ABUZJVkVYCQC2AgEABQAHVFdFTlRZWAkAtgIBABQACFRXRU5UWTJYCQC2AgEJAGgCABQAFAAIVFdFTlRZM1gJALYCAQkAaAIJAGgCABQAFAAUAAhUV0VOVFk0WAkAtgIBCQBoAgkAaAIJAGgCABQAFAAUABQACFRXRU5UWTVYCQC2AgEJAGgCCQBoAgkAaAIJAGgCABQAFAAUABQAFAAPUFJFU0FMRU5VTUxBTkRTAPQDARJrZXlOZXh0RnJlZUxhbmROdW0AAgtuZXh0TGFuZE51bQEQa2V5TGFuZFRvQXNzZXRJZAEHbGFuZE51bQkArAICAgxsYW5kVG9Bc3NldF8FB2xhbmROdW0BGmtleUxhbmRDdXN0b21OYW1lVG9Bc3NldElkAQRuYW1lCQCsAgICEWxhbmRCeUN1c3RvbU5hbWVfBQRuYW1lAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICAhxpbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXJfBQdhc3NldElkAgFfBQlvd25lckFkZHIBJWtleUxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIDBHR5cGUHYXNzZXRJZAlvd25lckFkZHIJALkJAgkAzAgCAiJsYW5kQXJ0U3RhdHVzQnlUeXBlQXNzZXRJZEFuZE93bmVyCQDMCAIFBHR5cGUJAMwIAgUHYXNzZXRJZAkAzAgCBQlvd25lckFkZHIFA25pbAIBXwERa2V5TGFuZE51bVRvT3duZXIBB2xhbmROdW0JAKwCAgIKbGFuZE93bmVyXwUHbGFuZE51bQEaa2V5RHVja0N1c3RvbU5hbWVUb0Fzc2V0SWQBBG5hbWUJAKwCAgIRZHVja0J5Q3VzdG9tTmFtZV8FBG5hbWUBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBBG5hbWUJAKwCAgIUYWNjb3VudEJ5Q3VzdG9tTmFtZV8FBG5hbWUBCWtleU9sZGllcwACCm9sZGllc0xpc3QAC2NsYWltTW9kZVdoAAAADWNsYWltTW9kZUR1Y2sAAQATY2xhaW1Nb2RlV2hUaGVuRHVjawACAAhmbEhlYWx0aAAAAAlmbE1pc3Npb24AAQALZmxPYnN0YWNsZXMAAgAHZmxXaW5kcwADAAZmbFBhdGgABAALZmxUaW1lc3RhbXAABQAHZmxCb251cwAGAAtmbFByb2RzVXNlZAAHAQduZnROYW1lAgdsYW5kTnVtCGxhbmRTaXplCQCsAgIJAKwCAgUKTEFORFBSRUZJWAUHbGFuZE51bQUIbGFuZFNpemUBE2Rpc3RyaWJ1dGVCeVdlaWdodHMCBXRvdGFsB3dlaWdodHMEA3N1bQkAZAIJAGQCCQBkAgkAZAIJAGQCCQCRAwIFB3dlaWdodHMAAAkAkQMCBQd3ZWlnaHRzAAEJAJEDAgUHd2VpZ2h0cwACCQCRAwIFB3dlaWdodHMAAwkAkQMCBQd3ZWlnaHRzAAQJAJEDAgUHd2VpZ2h0cwAFAwkAZwIAAAUDc3VtCQACAQIQWmVybyB3ZWlnaHRzIHN1bQQFbm9ybTYJAGsDBQV0b3RhbAUFTVVMVDYFA3N1bQoBCm5vcm1hbGl6ZXICA2FjYwRlbGVtCQDNCAIFA2FjYwkAawMFBGVsZW0FBW5vcm02BQVNVUxUNgoAAiRsBQd3ZWlnaHRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpub3JtYWxpemVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGARJnZXROZWVkZWRNYXRlcmlhbHMBBXRvdGFsBAVwcm9wcwkAtQkCCQEFdmFsdWUBCQCiCAEJARFrZXlSZXNQcm9wb3J0aW9ucwACAV8DCQECIT0CCQCQAwEFBXByb3BzBQZOVU1SRVMJAAIBAhZXcm9uZyBwcm9wb3J0aW9ucyBkYXRhBAFyCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwAACQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwABCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwACCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwADCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwAECQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwAFBQNuaWwJARNkaXN0cmlidXRlQnlXZWlnaHRzAgUFdG90YWwFAXIBEXN1YnRyYWN0TWF0ZXJpYWxzAwxzaG91bGRVc2VNYXQDaGFzCXRvdGFsTmVlZAQEbmVlZAkBEmdldE5lZWRlZE1hdGVyaWFscwEFCXRvdGFsTmVlZAoBCnN1YnRyYWN0b3ICA2FjYwNpZHgEBnJlc3VsdAkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNoYXMFA2lkeAkAkQMCBQRuZWVkBQNpZHgDCQBmAgAABQZyZXN1bHQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIYTm90IGVub3VnaCBtYXRlcmlhbCBpZHg9CQCkAwEFA2lkeAILLCB5b3UgaGF2ZSAJAJEDAgUDaGFzBQNpZHgCCywgYnV0IG5lZWQgCQCkAwEJAJEDAgUEbmVlZAUDaWR4CQDNCAIFA2FjYwkApAMBBQZyZXN1bHQDBQxzaG91bGRVc2VNYXQKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpzdWJ0cmFjdG9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBQNoYXMBEHN1YnRyYWN0UHJvZHVjdHMCBHBIYXMFcFVzZWQDCQAAAgUFcFVzZWQCAAUEcEhhcwQFcExpc3QDCQAAAgUEcEhhcwIABQNuaWwJALUJAgUEcEhhcwIBXwoBBHN1YlACA2FjYwRpdGVtBAFqCAUDYWNjAl8xCgEJY2hlY2tVc2VkAgJhYwZpZHhBbXQEBXBhcnRzCQC1CQIFBmlkeEFtdAIBLAMJAQIhPQIJAJADAQUFcGFydHMAAgkAAgECKEluY29ycmVjdCBmb3JtYXQsIHNob3VsZCBiZSBpbmRleCxhbW91bnQEA2lkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAADAwkAZgIAAAUDaWR4BgkAZwIFA2lkeAkAkAMBBRBwcm9kdWN0aW9uTWF0cml4CQACAQITVW5rbm93biBwcm9kdWN0IGlkeAMJAQIhPQIFA2lkeAUBagUCYWMEA2FtdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAEDCQBnAgAABQNhbXQJAAIBAhpQYXNzIG9ubHkgcG9zaXRpdmUgYW1vdW50cwkAZAIFAmFjBQNhbXQEAWEKAAIkbAkAtQkCBQVwVXNlZAIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJY2hlY2tVc2VkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBARjdXJyAwkAZgIJAJADAQUFcExpc3QFAWoJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwTGlzdAUBagAABAZuZXdBbXQDCQBmAgUBYQUEY3VycgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAglZb3UgaGF2ZSAJAKQDAQUEY3VycgIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFAWoCEywgYnV0IHRyaWVkIHRvIHVzZSAJAKQDAQUBYQkAZQIFBGN1cnIFAWEJAJQKAgkAZAIFAWoAAQkAzQgCCAUDYWNjAl8yCQCkAwEFBm5ld0FtdAQHbmV3UHJvZAoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEc3ViUAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyCQC5CQIIBQduZXdQcm9kAl8yAgFfARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAhwcm9wTGlzdA10ZXJyYWluQ291bnRzDWxhbmRTaXplSW5kZXgEc2lnbgMJAQIhPQIJAJADAQUIcHJvcExpc3QFBk5VTVJFUwkAAgECFldyb25nIHByb3BvcnRpb25zIGRhdGEKAQd1cGRhdGVyAgNhY2MBaQQGcmVzdWx0CQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb3BMaXN0BQFpCQBoAgkAaAIFBHNpZ24JAJEDAgUNdGVycmFpbkNvdW50cwUBaQUNbGFuZFNpemVJbmRleAMJAGYCAAAFBnJlc3VsdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIWUGFuaWMhIFBpZWNlcyBvZiB0eXBlPQkApAMBBQFpAgcsIHNpZ249CQCkAwEFBHNpZ24CFCwgIHRlcnJhaW5Db3VudHNbaV09CQCkAwEJAJEDAgUNdGVycmFpbkNvdW50cwUBaQIQLCBsYW5kU2l6ZUluZGV4PQkApAMBBQ1sYW5kU2l6ZUluZGV4CQDNCAIFA2FjYwkApAMBBQZyZXN1bHQEAXIKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQd1cGRhdGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQC5CQIFAXICAV8BEXVwZGF0ZVByb3BvcnRpb25zAw10ZXJyYWluQ291bnRzDWxhbmRTaXplSW5kZXgEc2lnbgQIcHJvcExpc3QJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAIBXwkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwEBQhwcm9wTGlzdAUNdGVycmFpbkNvdW50cwUNbGFuZFNpemVJbmRleAUEc2lnbgENY291bnRUZXJyYWlucwEIdGVycmFpbnMJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQQABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUIAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFDAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRAABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUUAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFGAAEFA25pbAEGYWRkUmVzBQpjdXJyZW50UmVzDXRlcnJhaW5Db3VudHMJZGVsdGFUaW1lDWxhbmRTaXplSW5kZXgXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMKAQVhZGRlcgIDYWNjAWkECXJlc09mVHlwZQkAaAIJAGgCCQBrAwUJZGVsdGFUaW1lBRdkYWlseUJ5UGllY2VXaXRoQm9udXNlcwUJREFZTUlMTElTCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgJAM0IAgUDYWNjCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKY3VycmVudFJlcwUBaQUJcmVzT2ZUeXBlBAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEJdmlydENsYWltBA10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4F2RhaWx5QnlQaWVjZVdpdGhCb251c2VzCgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMFCURBWU1JTExJUwkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4CQCUCgIJAM0IAggFA2FjYwJfMQUJcmVzT2ZUeXBlCQBkAggFA2FjYwJfMgUJcmVzT2ZUeXBlCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAQ1kaXN0cmlidXRlUmVzBAxjdXJyZW50V2hSZXMOY3VycmVudFBhY2tSZXMKcmVzVG9DbGFpbQt3aFNwYWNlTGVmdAQOcmVzTGlzdFRvQ2xhaW0IBQpyZXNUb0NsYWltAl8xBAxyZXNBbVRvQ2xhaW0IBQpyZXNUb0NsYWltAl8yAwkAAAIFDHJlc0FtVG9DbGFpbQAACQCUCgIJALkJAgUMY3VycmVudFdoUmVzAgFfCQC5CQIFDmN1cnJlbnRQYWNrUmVzAgFfAwkAZwIFC3doU3BhY2VMZWZ0BQxyZXNBbVRvQ2xhaW0KAQhhZGRMaXN0cwIDYWNjAWkJAM0IAgUDYWNjCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUMY3VycmVudFdoUmVzBQFpCQCRAwIFDnJlc0xpc3RUb0NsYWltBQFpBAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIYWRkTGlzdHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJAJQKAgkAuQkCBQFyAgFfCQC5CQIFDmN1cnJlbnRQYWNrUmVzAgFfCgEMYWRkUGFydExpc3RzAgNhY2MBaQQGd2hQYXJ0CQBrAwkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQULd2hTcGFjZUxlZnQFDHJlc0FtVG9DbGFpbQkAlAoCCQDNCAIIBQNhY2MCXzEJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxjdXJyZW50V2hSZXMFAWkFBndoUGFydAkAzQgCCAUDYWNjAl8yCQCkAwEJAGUCCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmN1cnJlbnRQYWNrUmVzBQFpCQCRAwIFDnJlc0xpc3RUb0NsYWltBQFpBQZ3aFBhcnQEAXIKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYWRkUGFydExpc3RzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQCUCgIJALkJAggFAXICXzECAV8JALkJAggFAXICXzICAV8BA2FicwEBeAMJAMACAgUBeAkAtgIBAAAFAXgJAL4CAQUBeAAEZnJlcQkAzAgCCQDMCAIABgkAzAgCAAkJAMwIAgAOCQDMCAIADwkAzAgCABAFA25pbAkAzAgCCQDMCAIABQkAzAgCAAgJAMwIAgANCQDMCAIADgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAQJAMwIAgAJCQDMCAIACgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAYJAMwIAgAHCQDMCAIADwkAzAgCABMFA25pbAkAzAgCCQDMCAIABAkAzAgCAAcJAMwIAgAICQDMCAIADQkAzAgCABIFA25pbAUDbmlsAQdnZW5DaGFyAgFuBWZyZXFzBANyZW0JAKADAQkAuwICBQFuBQdUV0VOVFlYBAZsZXR0ZXIDCQBmAgkAkQMCBQVmcmVxcwAABQNyZW0CAUEDCQBmAgkAkQMCBQVmcmVxcwABBQNyZW0CAUIDCQBmAgkAkQMCBQVmcmVxcwACBQNyZW0CAUMDCQBmAgkAkQMCBQVmcmVxcwADBQNyZW0CAUQDCQBmAgkAkQMCBQVmcmVxcwAEBQNyZW0CAUUCAUYFBmxldHRlcgELZ2VuVGVycmFpbnMCBHNlZWQMY29udGluZW50SWR4BAFmCQCRAwIFBGZyZXEFDGNvbnRpbmVudElkeAoBEHRlcnJhaW5HZW5lcmF0b3ICA2FjYwRlbGVtCQCUCgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCAUDYWNjAl8xCQEHZ2VuQ2hhcgIIBQNhY2MCXzIFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQdUV0VOVFlYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZMlgFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFkzWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTRYBQFmCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTVYBAF0CgACJGwJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAgAJALoCAgUEc2VlZAUFRklWRVgKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEHRlcnJhaW5HZW5lcmF0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCAUBdAJfMQELZ2V0QmFja3BhY2sBBWJwS2V5BAFwCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6AgE6CQDMCAIJAKQDAQkBC3ZhbHVlT3JFbHNlAgkAtgkBCQCRAwIFAXAFCmJwSWR4TGV2ZWwAAAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCGJwSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUBcAUIYnBJZHhSZXMCCzBfMF8wXzBfMF8wCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQFwBQlicElkeFByb2QFA25pbAEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCXZvbFByZWZpeAQFcGFydHMJALUJAgUJdm9sUHJlZml4AgFfCQBoAgkAaAIFDFdITVVMVElQTElFUgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAAARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEJY3VycmVudFdoBAVnb29kcwkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAoBCXN1bVJlc01hdAIDYWNjBGl0ZW0JAGQCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQoBB3N1bVByb2QCA2FjYwRpdGVtBANpZHgIBQNhY2MCXzEEB3BrZ1NpemUJAQpnZXRQa2dTaXplAQUDaWR4BARwa2dzCQBpAgkAZQIJAGQCCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0FB3BrZ1NpemUAAQUHcGtnU2l6ZQkAlAoCCQBkAgUDaWR4AAEJAGQCCAUDYWNjAl8yCQBoAgUEcGtncwUFTVVMVDgECHdoUmVzVm9sCgACJGwJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlzdW1SZXNNYXQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYECHdoTWF0Vm9sCgACJGwJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0AgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlzdW1SZXNNYXQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYECndoR29vZHNWb2wDCQAAAgUFZ29vZHMCAAAACAoAAiRsCQC8CQIFBWdvb2RzAgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAAAAoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHc3VtUHJvZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyAl8yCQBkAgkAZAIFCHdoUmVzVm9sBQh3aE1hdFZvbAUKd2hHb29kc1ZvbAEMZ2V0V2FyZWhvdXNlAwV3aEtleQlsYW5kSW5kZXgKaW5mcmFMZXZlbAQJdm9sUHJlZml4CQCsAgIJAKwCAgkApAMBBQlsYW5kSW5kZXgCAV8JAKQDAQUKaW5mcmFMZXZlbAQHd2hUb3RhbAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQUJdm9sUHJlZml4BAV3aFN0cgkBC3ZhbHVlT3JFbHNlAgkAoggBBQV3aEtleQkArAICBQl2b2xQcmVmaXgCGzowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDo6MAQCd2gJALwJAgUFd2hTdHICAToECndoT2NjdXBpZWQJARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFAndoBAZ3aExvZnQDCQBmAgAFCQCQAwEFAndoCQC5CQIJAMwIAgIBMAkAzAgCCQCkAwEFCndoT2NjdXBpZWQJAMwIAgkApAMBCQBlAgUHd2hUb3RhbAUKd2hPY2N1cGllZAkAzAgCCQCkAwEFB3doVG90YWwFA25pbAIBXwQEbG9mdAkAtQkCCQCRAwIFAndoBQl3aElkeExPRlQCAV8ECHdoTG9ja2VkCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUJdm9sTG9ja2VkBANvY2MDCQBmAgkAkAMBBQRsb2Z0AAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQt2b2xPY2N1cGllZAUKd2hPY2N1cGllZAkAuQkCCQDMCAIJAKQDAQUId2hMb2NrZWQJAMwIAgkApAMBBQNvY2MJAMwIAgkApAMBCQBlAgkAZQIFB3doVG90YWwFCHdoTG9ja2VkBQNvY2MJAMwIAgkApAMBBQd3aFRvdGFsBQNuaWwCAV8JAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQJ3aAUId2hJZHhSZXMCAV8FBk5VTVJFUwkAkQMCBQJ3aAUId2hJZHhSZXMCCzBfMF8wXzBfMF8wCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUCd2gFCHdoSWR4TWF0AgFfBQZOVU1SRVMJAJEDAgUCd2gFCHdoSWR4TWF0AgswXzBfMF8wXzBfMAkAzAgCCQCRAwIFAndoBQl3aElkeFByb2QJAMwIAgUGd2hMb2Z0BQNuaWwBFWdldFdhcmVob3VzZVNwYWNlTGVmdAEJY3VycmVudFdoBAtvY2N1cGllZFZvbAkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUJY3VycmVudFdoBA9jdXJyV2hMb2NrZWRWb2wJAQ1wYXJzZUludFZhbHVlAQkAkQMCCQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8FCXZvbExvY2tlZAkAZQIJAGUCCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMFC29jY3VwaWVkVm9sBQ9jdXJyV2hMb2NrZWRWb2wBCHRvVm9sdW1lAgZhbW91bnQHcGtnU2l6ZQQEcGtncwMJAGcCBQZhbW91bnQAAAkAaQIJAGUCCQBkAgUGYW1vdW50BQdwa2dTaXplAAEFB3BrZ1NpemUJAQEtAQkAaQIJAGUCCQBkAgkBAS0BBQZhbW91bnQFB3BrZ1NpemUAAQUHcGtnU2l6ZQkAaAIFBHBrZ3MFBU1VTFQ4AQltb3ZlU3R1ZmYDCmNhcmdvUGFydHMJY3VycmVudFdoC2N1cnJlbnRQYWNrAwkBAiE9AgkAkAMBBQpjYXJnb1BhcnRzAAMJAAIBAjRjYXJnb0xpc3RTdHIgc2hvdWxkIGNvbnRhaW4gZXhhY3RseSAyICc6JyBzZXBhcmF0b3JzBAhyZXNQYXJ0cwkAtQkCCQCRAwIFCmNhcmdvUGFydHMAAAIBXwQIbWF0UGFydHMJALUJAgkAkQMCBQpjYXJnb1BhcnRzAAECAV8ECXByb2RQYXJ0cwMJAAACCQCRAwIFCmNhcmdvUGFydHMAAgIABQNuaWwJALUJAgkAkQMCBQpjYXJnb1BhcnRzAAICAV8DCQECIT0CCQCQAwEFCHJlc1BhcnRzBQZOVU1SRVMJAAIBAiBBbGwgNiByZXNvdXJjZXMgc2hvdWxkIGJlIHBhc3NlZAMJAQIhPQIJAJADAQUIbWF0UGFydHMFBk5VTVJFUwkAAgECIEFsbCA2IG1hdGVyaWFscyBzaG91bGQgYmUgcGFzc2VkBAt3aFNwYWNlTGVmdAkBFWdldFdhcmVob3VzZVNwYWNlTGVmdAEFCWN1cnJlbnRXaAQJY3VycldoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQJY3VycldoTWF0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwQKY3VycldoUHJvZAMJAAACCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgFfBA5jdXJyZW50UGFja1JlcwkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQOY3VycmVudFBhY2tNYXQJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8ED2N1cnJlbnRQYWNrUHJvZAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwoBA212UgIDYWNjBGl0ZW0EAWkIBQNhY2MCXzEEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3docgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWN1cnJXaFJlcwUBaQQDYnByCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOY3VycmVudFBhY2tSZXMFAWkDCQAAAgUCYW0AAAkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAJEDAgUJY3VycldoUmVzBQFpCQDNCAIIBQNhY2MCXzMJAJEDAgUOY3VycmVudFBhY2tSZXMFAWkIBQNhY2MCXzQDCQBmAgUCYW0AAAMJAGYCBQJhbQUDYnByCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgBQRpdGVtAhkgZnJvbSBiYWNrcGFjaywgYnV0IG9ubHkgCQCkAwEFA2JwcgIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docgUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnByBQJhbQkAZAIIBQNhY2MCXzQFAmFtAwkAZgIJAQEtAQUCYW0FA3docgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFAmFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aHICCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHIFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcgUCYW0JAGQCCAUDYWNjAl80BQJhbQQBcgoAAiRsBQhyZXNQYXJ0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAABQNuaWwFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdlICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYKAQNtdk0CA2FjYwRpdGVtBAFpCAUDYWNjAl8xBAJhbQkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAN3aG0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQljdXJyV2hNYXQFAWkEA2JwbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmN1cnJlbnRQYWNrTWF0BQFpAwkAAAIFAmFtAAAJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCRAwIFCWN1cnJXaE1hdAUBaQkAzQgCCAUDYWNjAl8zCQCRAwIFDmN1cnJlbnRQYWNrTWF0BQFpCAUDYWNjAl80AwkAZgIFAmFtAAADCQBmAgUCYW0FA2JwbQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAUEaXRlbQIZIGZyb20gYmFja3BhY2ssIGJ1dCBvbmx5IAkApAMBBQNicG0CCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aG0FAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwbQUCYW0JAGQCCAUDYWNjAl80BQJhbQMJAGYCCQEBLQEFAmFtBQN3aG0JAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQkBAS0BBQJhbQIaIGZyb20gd2FyZWhvdXNlLCBidXQgb25seSAJAKQDAQUDd2htAgogYXZhaWxhYmxlCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2htBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicG0FAmFtCQBkAggFA2FjYwJfNAUCYW0EAW0KAAIkbAUIbWF0UGFydHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAUDbmlsBQNuaWwIBQFyAl80CgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdk0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYKAQNtdlACA2FjYwRpdGVtBAFpCAUDYWNjAl8xBAdwa2dTaXplCQEKZ2V0UGtnU2l6ZQEFAWkEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3docAMJAGYCCQCQAwEFCmN1cnJXaFByb2QFAWkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpjdXJyV2hQcm9kBQFpAAAEA2JwcAMJAGYCCQCQAwEFD2N1cnJlbnRQYWNrUHJvZAUBaQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFD2N1cnJlbnRQYWNrUHJvZAUBaQAAAwkAAAIFAmFtAAAJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEFA3docAkAzQgCCAUDYWNjAl8zCQCkAwEFA2JwcAgFA2FjYwJfNAMJAGYCBQJhbQAAAwkAZgIFAmFtBQNicHAJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAFBGl0ZW0CGSBmcm9tIGJhY2twYWNrLCBidXQgb25seSAJAKQDAQUDYnBwAgogYXZhaWxhYmxlBAhkZWx0YVZvbAkAZQIJAQh0b1ZvbHVtZQIJAGQCBQN3aHAFAmFtBQdwa2dTaXplCQEIdG9Wb2x1bWUCBQN3aHAFB3BrZ1NpemUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHAFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcAUCYW0JAGQCCAUDYWNjAl80BQhkZWx0YVZvbAMJAGYCCQEBLQEFAmFtBQN3aHAJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQkBAS0BBQJhbQIaIGZyb20gd2FyZWhvdXNlLCBidXQgb25seSAJAKQDAQUDd2hwAgogYXZhaWxhYmxlBAhkZWx0YVZvbAkAZQIJAQh0b1ZvbHVtZQIJAGQCBQN3aHAFAmFtBQdwa2dTaXplCQEIdG9Wb2x1bWUCBQN3aHAFB3BrZ1NpemUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHAFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcAUCYW0JAGQCCAUDYWNjAl80BQhkZWx0YVZvbAQBcAMJAQIhPQIJAJADAQUJcHJvZFBhcnRzAAAKAAIkbAUJcHJvZFBhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAFA25pbAUDbmlsCAUBbQJfNAoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDbXZQAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIJAJYKBAAABQpjdXJyV2hQcm9kBQ9jdXJyZW50UGFja1Byb2QIBQFtAl80BAh2b2xTYWxkbwgFAXACXzQDCQBmAgUIdm9sU2FsZG8FC3doU3BhY2VMZWZ0CQACAQkArAICCQCsAgIJAKwCAgkArAICAhVBdHRlbXB0IHRvIHB1dCB0b3RhbCAJAKQDAQUIdm9sU2FsZG8CESBzdHVmZiwgYnV0IG9ubHkgCQCkAwEFC3doU3BhY2VMZWZ0AhUgd2FyZWhvdXNlIHNwYWNlIGxlZnQJAJkKBwkAuQkCCAUBcgJfMgIBXwkAuQkCCAUBbQJfMgIBXwkAuQkCCAUBcAJfMgIBXwkAuQkCCAUBcgJfMwIBXwkAuQkCCAUBbQJfMwIBXwkAuQkCCAUBcAJfMwIBXwUIdm9sU2FsZG8BEmV4cGVkaXRpb25JbnRlcm5hbAIGY2FsbGVyBHR4SWQECHVzZXJBZGRyCQClCAEFBmNhbGxlcgQGYmlnTnVtCQEDYWJzAQkAngMBBQR0eElkBAdmcmVlTnVtCQELdmFsdWVPckVsc2UCCQCfCAEJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUPUFJFU0FMRU5VTUxBTkRTAAEEB2xhbmROdW0JAKQDAQUHZnJlZU51bQQMY29udGluZW50SWR4CQCgAwEJALsCAgUGYmlnTnVtBQVGSVZFWAQIdGVycmFpbnMJAQtnZW5UZXJyYWlucwIFBmJpZ051bQUMY29udGluZW50SWR4BAljb250aW5lbnQJAJEDAgUKY29udGluZW50cwUMY29udGluZW50SWR4BAVpc3N1ZQkAwggFCQEHbmZ0TmFtZQIFB2xhbmROdW0CAVMJALkJAgkAzAgCBQdsYW5kTnVtCQDMCAICAVMJAMwIAgUIdGVycmFpbnMJAMwIAgUJY29udGluZW50BQNuaWwCAV8AAQAABwQHYXNzZXRJZAkAuAgBBQVpc3N1ZQQCaWQJANgEAQUHYXNzZXRJZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5TmV4dEZyZWVMYW5kTnVtAAkAZAIFB2ZyZWVOdW0AAQkAzAgCBQVpc3N1ZQkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0FAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQJpZAUIdXNlckFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQUIdXNlckFkZHIJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQUCaWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFAmlkBQh1c2VyQWRkcgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgABBQdhc3NldElkBQNuaWwJAJQKAgUCaWQFCWNvbnRpbmVudAEMZmxpZ2h0Q29tbW9uAwh1c2VyQWRkcgdtZXNzYWdlA3NpZwMJAQEhAQkAxBMDBQdtZXNzYWdlBQNzaWcFA3B1YgkAAgECGHNpZ25hdHVyZSBkb2VzIG5vdCBtYXRjaAQFcGFydHMJALUJAgkAsAkBBQdtZXNzYWdlAgE7BAlmbGlnaHRMb2cJALUJAgkAkQMCBQVwYXJ0cwAAAgF8BAJocAkAtQkCCQCRAwIFCWZsaWdodExvZwUIZmxIZWFsdGgCAV8EBWN1ckhQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCaHAAAAQFbmV3SFAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJocAABBAtuZXdMb2NUeFZlcgkAtQkCCQCRAwIFBXBhcnRzAAECAToEC25ld0xvY2F0aW9uCQCRAwIFC25ld0xvY1R4VmVyAAAEBHRpbWUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlmbGlnaHRMb2cFC2ZsVGltZXN0YW1wAwMJAGYCBQR0aW1lCQBkAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFEUZJVkVNSU5VVEVTTUlMTElTBgkAZgIJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAURRklWRU1JTlVURVNNSUxMSVMFBHRpbWUJAAIBCQCsAgIJAKwCAgkArAICAhxzaWduYXR1cmUgb3V0ZGF0ZWQ6IGxvZ1RpbWU9CQCkAwEFBHRpbWUCCSwgYmNUaW1lPQkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJdHhGcm9tTXNnCQCRAwIFC25ld0xvY1R4VmVyAAEEBmxhc3RUeAkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5TGFzdFR4SWRCeVVzZXIBBQh1c2VyQWRkcgIAAwkBAiE9AgUGbGFzdFR4BQl0eEZyb21Nc2cJAAIBCQCsAgIJAKwCAgkArAICAh5UeCBpZHMgZG9uJ3QgbWF0Y2ghIEluIHN0YXRlOiAFBmxhc3RUeAIKLCBpbiBtc2c6IAUJdHhGcm9tTXNnBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFCHVzZXJBZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEDG9sZEZyb21TdGF0ZQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgAZAMJAQIhPQIFDG9sZEZyb21TdGF0ZQUFY3VySFAJAAIBCQCsAgIJAKwCAgkArAICAgpvbGRIZWFsdGg9CQCkAwEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoAGQCLyBmcm9tIHN0YXRlIGRvZXMgbm90IG1hdGNoIG9uZSBmcm9tIGZsaWdodCBsb2c9CQCkAwEFBWN1ckhQAwkAZwIAAAUFY3VySFAJAAIBAh5Zb3UgY2FuJ3QgZmx5IHdpdGggemVybyBoZWFsdGgEBWJvbnVzAwkAZgIJAJADAQUJZmxpZ2h0TG9nBQdmbEJvbnVzCQCRAwIFCWZsaWdodExvZwUHZmxCb251cwIABAhwcm9kVXNlZAMJAGYCCQCQAwEFCWZsaWdodExvZwULZmxQcm9kc1VzZWQJAJEDAgUJZmxpZ2h0TG9nBQtmbFByb2RzVXNlZAIABApzZW50QW1vdW50AwMJAGYCBQVuZXdIUAAACQAAAgUFYm9udXMCASQHCQEFYXNJbnQBCQD8BwQFDHJlc3RDb250cmFjdAINc2VuZFVzZHRQcml6ZQkAzAgCBQh1c2VyQWRkcgUDbmlsBQNuaWwAAAkAlwoFBQVuZXdIUAULZHVja0Fzc2V0SWQFCnNlbnRBbW91bnQFC25ld0xvY2F0aW9uBQhwcm9kVXNlZAEQZXhwZWRpdGlvbkNvbW1vbgQGY2FsbGVyBHR4SWQHbWVzc2FnZQNzaWcECHVzZXJBZGRyCQClCAEFBmNhbGxlcgQBZgkBDGZsaWdodENvbW1vbgMFCHVzZXJBZGRyBQdtZXNzYWdlBQNzaWcECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBCAUBZgJfMgQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEIBQFmAl8yBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwYFBW1MaXN0BQxFWFBNQVRFUklBTFMCAV8EB25ld1Byb2QJARBzdWJ0cmFjdFByb2R1Y3RzAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kCAUBZgJfNQMJAGcCAAAIBQFmAl8xCQCVCgMJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAAACQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCBQduZXdQcm9kBQNuaWwCAToFA25pbAIAAAAEAWUJARJleHBlZGl0aW9uSW50ZXJuYWwCBQZjYWxsZXIFBHR4SWQEAmlkCAgFAWUCXzICXzEJAJUKAwkAzQgCCQDNCAIJAM0IAggFAWUCXzEJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BCAUBZgJfMgkAuQkCCQDMCAIICAUBZQJfMgJfMgkAzAgCAgFMCQDMCAIFAmlkBQNuaWwCAV8JAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgIBQFmAl8xCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgUGbmV3TWF0CQDMCAIFB25ld1Byb2QFA25pbAIBOgUCaWQIBQFmAl8zAQxhcHBseUJvbnVzZXMCC2xhbmRBc3NldElkBnBpZWNlcwQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAECWFydFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABARhZGQ2CQBpAgUKaW5mcmFMZXZlbAAGBARhZGQ3CQBpAgUKaW5mcmFMZXZlbAAHCQBkAgkAZAIFD0RBSUxZUkVTQllQSUVDRQkAawMFD0RBSUxZUkVTQllQSUVDRQkAZAIJAGQCBQppbmZyYUxldmVsBQRhZGQ2CQBoAgACBQRhZGQ3AAUJAGsDBQ9EQUlMWVJFU0JZUElFQ0UFCWFydFBpZWNlcwkAaAIFBnBpZWNlcwAFARRjaGVja0NsYWltQ29uZGl0aW9ucwMEYWRkcgljbGFpbU1vZGUNbGFuZEFzc2V0SWRJbgQNJHQwMjQ0MjIyNDk2MQMJAAACBQljbGFpbU1vZGUFC2NsYWltTW9kZVdoCQCUCgIFDWxhbmRBc3NldElkSW4JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIABAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCiCAEJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OBANsb2MJALUJAgkBBXZhbHVlAQULY3VyTG9jYXRpb24CAV8DCQECIT0CCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQIBTAkAAgEJAKwCAgkArAICAhZEdWNrIGxvY2F0aW9uIHR5cGUgaXMgCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQIRLCBidXQgc2hvdWxkIGJlIEwJAJQKAgkAkQMCBQNsb2MFCGxvY0lkeElkBQtkdWNrQXNzZXRJZAQLbGFuZEFzc2V0SWQIBQ0kdDAyNDQyMjI0OTYxAl8xBAZkdWNrSWQIBQ0kdDAyNDQyMjI0OTYxAl8yBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkBAlzYXZlZFRpbWUJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnwgBBQd0aW1lS2V5CQCsAgIJAKwCAgIFTGFuZCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfCQCWCgQFBmR1Y2tJZAULbGFuZEFzc2V0SWQFAWQFCXNhdmVkVGltZQEQY2xhaW1SZXNJbnRlcm5hbAQEYWRkcgZhbW91bnQJY2xhaW1Nb2RlDWxhbmRBc3NldElkSW4DCQBmAgAABQZhbW91bnQJAAIBAg9OZWdhdGl2ZSBhbW91bnQEAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFCWNsYWltTW9kZQUNbGFuZEFzc2V0SWRJbgQIbGFuZFNpemUJAJEDAggFAWMCXzMFC3JlY0xhbmRTaXplBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAggFAWMCXzMFC3JlY1RlcnJhaW5zBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAgFAWMCXzQDCQBmAgAABQlkZWx0YVRpbWUJAAIBCQCsAgIJAKwCAgkArAICAiZTYXZlZCB0aW1lc3RhbXAgaXMgaW4gZnV0dXJlLCBzYXZlZCA9IAkApAMBCAUBYwJfNAIMLCBjdXJyZW50ID0gCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBBQhsYW5kU2l6ZQQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwIIBQFjAl8yBQZwaWVjZXMECGF2YWlsUmVzCQBrAwUJZGVsdGFUaW1lCQBoAgUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQUGcGllY2VzBQlEQVlNSUxMSVMDCQBmAgUGYW1vdW50BQhhdmFpbFJlcwkAAgEJAKwCAgkArAICCQCsAgICIk5vdCBlbm91Z2ggcmVzb3VyY2VzLCBhdmFpbGFibGUgPSAJAKQDAQUIYXZhaWxSZXMCDiwgcmVxdWVzdGVkID0gCQCkAwEFBmFtb3VudAQMbmV3RGVsdGFUaW1lCQBrAwkAZQIFCGF2YWlsUmVzBQZhbW91bnQFCURBWU1JTExJUwkAaAIFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UFBnBpZWNlcwQMbmV3VGltZXN0YW1wCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFDG5ld0RlbHRhVGltZQQJbGFuZEluZGV4CQBpAgUGcGllY2VzBQVTU0laRQQKcmVzVG9DbGFpbQkBCXZpcnRDbGFpbQQFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQUJbGFuZEluZGV4BRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBAV3aEtleQkBEmtleVdhcmVob3VzZUJ5TGFuZAEIBQFjAl8yBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQgFAWMCXzIAAAQJY3VycmVudFdoCQEMZ2V0V2FyZWhvdXNlAwUFd2hLZXkFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAQEbG9mdAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhMT0ZUAgFfBAt3aFNwYWNlTGVmdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUDAwkAAAIFCWNsYWltTW9kZQULY2xhaW1Nb2RlV2gJAGYCBQZhbW91bnQFC3doU3BhY2VMZWZ0BwkAAgEJAKwCAgkArAICAgVPbmx5IAkApAMBBQt3aFNwYWNlTGVmdAIYIHNwYWNlIGxlZnQgaW4gd2FyZWhvdXNlBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQgFAWMCXzEEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQOY3VycmVudFBhY2tSZXMJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMCAV8EDGN1cnJlbnRXaFJlcwkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhSZXMCAV8EDSR0MDI3MzM1MjgyMDYDCQAAAgUJY2xhaW1Nb2RlBQtjbGFpbU1vZGVXaAkAlgoECQEGYWRkUmVzBQUMY3VycmVudFdoUmVzBQ10ZXJyYWluQ291bnRzCQBlAgUJZGVsdGFUaW1lBQxuZXdEZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQIBQpyZXNUb0NsYWltAl8yCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUIBQpyZXNUb0NsYWltAl8yAwkAAAIFCWNsYWltTW9kZQUNY2xhaW1Nb2RlRHVjawkAlgoECQCRAwIFCWN1cnJlbnRXaAUId2hJZHhSZXMJAQZhZGRSZXMFBQ5jdXJyZW50UGFja1JlcwUNdGVycmFpbkNvdW50cwkAZQIFCWRlbHRhVGltZQUMbmV3RGVsdGFUaW1lBQlsYW5kSW5kZXgFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQt2b2xPY2N1cGllZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUEBWRpc3RyCQENZGlzdHJpYnV0ZVJlcwQFDGN1cnJlbnRXaFJlcwUOY3VycmVudFBhY2tSZXMFCnJlc1RvQ2xhaW0FC3doU3BhY2VMZWZ0BAR3aEFtCQCXAwEJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUJAMwIAggFCnJlc1RvQ2xhaW0CXzIFA25pbAkAlgoECAUFZGlzdHICXzEIBQVkaXN0cgJfMgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQt2b2xPY2N1cGllZAUEd2hBbQkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlBQR3aEFtBAV3aFJlcwgFDSR0MDI3MzM1MjgyMDYCXzEEBWJwUmVzCAUNJHQwMjczMzUyODIwNgJfMgQFbG9mdE8IBQ0kdDAyNzMzNTI4MjA2Al8zBAVsb2Z0RggFDSR0MDI3MzM1MjgyMDYCXzQJAJcKBQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBCAUBYwJfMgUMbmV3VGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgIBQFjAl8yBQRhZGRyBQxuZXdUaW1lc3RhbXAFA25pbAUFYnBLZXkJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCBQVicFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAUFd2hLZXkJAMwIAgkAkQMCBQljdXJyZW50V2gFC3doSWR4TGV2ZWxzCQDMCAIFBXdoUmVzCQDMCAIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAkAzAgCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kCQDMCAIJALkJAgkAzAgCCQCRAwIFBGxvZnQFCXZvbExvY2tlZAkAzAgCCQCkAwEFBWxvZnRPCQDMCAIJAKQDAQUFbG9mdEYJAMwIAgkAkQMCBQRsb2Z0BQh2b2xUb3RhbAUDbmlsAgFfBQNuaWwBCGNsYWltQWxsBARhZGRyC2xhbmRBc3NldElkBnBpZWNlcwljbGFpbU1vZGUEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQECXNhdmVkVGltZQkBBXZhbHVlAQkAnwgBBQd0aW1lS2V5BAhhdmFpbFJlcwkAaAIJAGsDCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFCXNhdmVkVGltZQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMFCURBWU1JTExJUwUGcGllY2VzCQEQY2xhaW1SZXNJbnRlcm5hbAQFBGFkZHIFCGF2YWlsUmVzBQljbGFpbU1vZGUFC2xhbmRBc3NldElkAQ11cEluZnJhQ29tbW9uBAxzaG91bGRVc2VNYXQGY2FsbGVyDXBheW1lbnRBbW91bnQLbGFuZEFzc2V0SWQEBGFkZHIJAKUIAQUGY2FsbGVyBAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBQRhZGRyBRNjbGFpbU1vZGVXaFRoZW5EdWNrBQtsYW5kQXNzZXRJZAQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUECGluZnJhS2V5CQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEIBQFjAl8yBAhjdXJMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQhpbmZyYUtleQAAAwkAZwIFCGN1ckxldmVsAAMJAAIBAiZDdXJyZW50bHkgbWF4IGluZnJhc3RydWN0dXJlIGxldmVsID0gMwQIbmV3TGV2ZWwJAGQCBQhjdXJMZXZlbAABBARjb3N0CQBrAwUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0CQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUDAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEIBQFjAl8xBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwUMc2hvdWxkVXNlTWF0BQVtTGlzdAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUCAV8EC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyCAUBYwJfMgUGcGllY2VzBRNjbGFpbU1vZGVXaFRoZW5EdWNrBAZ3aERhdGEIBQtjbGFpbVJlc3VsdAJfNQQGb2xkVm9sCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFBndoRGF0YQULd2hJZHhMZXZlbHMECm5ld1ZvbERhdGEJALkJAgkAzAgCCQCRAwIJALUJAgkAkQMCBQZ3aERhdGEFC3doSWR4TGV2ZWxzAgFfAAAJAMwIAgkApAMBBQhuZXdMZXZlbAUDbmlsAgFfBAZuZXdWb2wJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEFCm5ld1ZvbERhdGEEBGxvZnQJALUJAgkAkQMCBQZ3aERhdGEFCXdoSWR4TE9GVAIBXwQKbmV3TG9mdFN0cgkAuQkCCQDMCAIJAJEDAgUEbG9mdAUJdm9sTG9ja2VkCQDMCAIJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQJAMwIAgkApAMBCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlBQZuZXdWb2wFBm9sZFZvbAkAzAgCCQCkAwEFBm5ld1ZvbAUDbmlsAgFfCQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIaW5mcmFLZXkFCG5ld0xldmVsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAggFAWMCXzIFBGFkZHIFCG5ld0xldmVsCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIIBQtjbGFpbVJlc3VsdAJfMwUIYnBJZHhSZXMJAMwIAgUGbmV3TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6CQDMCAIJAQtTdHJpbmdFbnRyeQIIBQtjbGFpbVJlc3VsdAJfNAkAuQkCCQDMCAIFCm5ld1ZvbERhdGEJAMwIAgkAkQMCBQZ3aERhdGEFCHdoSWR4UmVzCQDMCAIJAJEDAgUGd2hEYXRhBQh3aElkeE1hdAkAzAgCCQCRAwIFBndoRGF0YQUJd2hJZHhQcm9kCQDMCAIFCm5ld0xvZnRTdHIFA25pbAIBOgUDbmlsCAULY2xhaW1SZXN1bHQCXzEFCG5ld0xldmVsARJhY3RpdmF0ZU9uYm9hcmRBcnQBBGFkZHIAAAESYWN0aXZhdGVQcmVzYWxlQXJ0AgRhZGRyDWxhbmRBc3NldElkSW4EAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFE2NsYWltTW9kZVdoVGhlbkR1Y2sFDWxhbmRBc3NldElkSW4EC2xhbmRBc3NldElkCAUBYwJfMgQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEDWFjdGl2YXRpb25LZXkJASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkAwkAZgIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUNYWN0aXZhdGlvbktleQAAAAAJAAIBAiVQcmVzYWxlIGFydGlmYWN0IGlzIGFscmVhZHkgYWN0aXZhdGVkAwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCCAUBYwJfMwUKcmVjTGFuZE51bQUPUFJFU0FMRU5VTUxBTkRTCQACAQkArAICCQCsAgIJAKwCAgUKTEFORFBSRUZJWAIBIAULbGFuZEFzc2V0SWQCJSBpcyBub3QgZWxpZ2libGUgZm9yIHByZXNhbGUgYXJ0aWZhY3QEC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyBQtsYW5kQXNzZXRJZAUGcGllY2VzBRNjbGFpbU1vZGVXaFRoZW5EdWNrCQDNCAIJAM0IAgkAzQgCCQDNCAIIBQtjbGFpbVJlc3VsdAJfMQkBDEludGVnZXJFbnRyeQIFDWFjdGl2YXRpb25LZXkFBnBpZWNlcwkBDEludGVnZXJFbnRyeQIJASVrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQFBGFkZHIFBnBpZWNlcwkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al80CQC5CQIIBQtjbGFpbVJlc3VsdAJfNQIBOgENbWVyZ2VJbnRlcm5hbAcLbmV3TGFuZFNpemUIbmV3TGV2ZWwHZm9ybXVsYQRhZGRyDGxhbmRBc3NldElkcwR0eElkB25lZWRNYXQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAoBCmNoZWNrTWVyZ2UCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAljb250aW5lbnQJAJEDAgUBZAUMcmVjQ29udGluZW50AwMJAQIhPQIIBQNhY2MCXzMCAAkBAiE9AggFA2FjYwJfMwUJY29udGluZW50BwkAAgECLkxhbmRzIHNob3VsZCBiZSBvbiB0aGUgc2FtZSBjb250aW5lbnQgdG8gbWVyZ2UECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBAdzaXplc0luCAUDYWNjAl8xBAFpCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALMJAgUHc2l6ZXNJbgUIbGFuZFNpemUCJ1lvdSBoYXZlbid0IHBhc3NlZCBhbGwgdGhlIGxhbmRzIG5lZWRlZAQIc2l6ZXNPdXQJAKwCAgkArwICBQdzaXplc0luBQFpCQCwAgIFB3NpemVzSW4JAGQCBQFpAAEEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBARhcnRzCQBkAggFA2FjYwJfMgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQIcmVxTGV2ZWwEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAAAwMJAAACAgFNBQckbWF0Y2gwAAQDCQAAAgIBTAUHJG1hdGNoMAAFAwkAAAICAlhMBQckbWF0Y2gwAAYJAAIBAhpPbmx5IFMsIE0sIEwsIFhMIGNhbiBtZXJnZQMJAQIhPQIFCmluZnJhTGV2ZWwFCHJlcUxldmVsCQACAQIiQWxsIGxhbmRzIHNob3VsZCBiZSBtYXhlZCB0byBtZXJnZQQHbGFuZE51bQkAkQMCBQFkBQpyZWNMYW5kTnVtBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUDCQBmAgAABQlkZWx0YVRpbWUJAAIBCQCsAgIJAKwCAgkArAICAiZTYXZlZCB0aW1lc3RhbXAgaXMgaW4gZnV0dXJlLCBzYXZlZCA9IAkApAMBBQlzYXZlZFRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUEBWJwUmVzCQEGYWRkUmVzBQkAtQkCCAUDYWNjAl80AgFfBQ10ZXJyYWluQ291bnRzBQlkZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFcHJvcHMJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAkAtQkCCAUDYWNjAl82AgFfBQ10ZXJyYWluQ291bnRzBQlsYW5kSW5kZXgA////////////AQQFbGFuZHMIBQNhY2MCXzcEA2lkeAkAzwgCBQVsYW5kcwULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQNpZHgJAAIBCQCsAgICIFlvdXIgc3Rha2VkIGxhbmRzIGRvbid0IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAQJY3VzdG9tS2V5CQEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBBQtsYW5kQXNzZXRJZAQKY3VzdG9tTmFtZQkBC3ZhbHVlT3JFbHNlAgkAoggBBQljdXN0b21LZXkCAAkAmgoIBQhzaXplc091dAUEYXJ0cwUJY29udGluZW50BQVicFJlcwkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUDYWNjAl81CQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0JAQtEZWxldGVFbnRyeQEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBJWtleUxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIDBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQkBC0RlbGV0ZUVudHJ5AQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBBQljdXN0b21LZXkJAQtEZWxldGVFbnRyeQEJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUJAQRCdXJuAgkA2QQBBQtsYW5kQXNzZXRJZAABBQVwcm9wcwkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4CQBkAggFA2FjYwJfOAUGcGllY2VzBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQHcHJvcFN0cgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAQIbGFuZHNLZXkJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQRhZGRyBAhsYW5kc1N0cgkAoggBBQhsYW5kc0tleQQHbGFuZHNJbgMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsBAFyCgACJGwFDGxhbmRBc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJoKCAUHZm9ybXVsYQAAAgAJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzBQNuaWwFB3Byb3BTdHIFB2xhbmRzSW4AAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKY2hlY2tNZXJnZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUECWNvbnRpbmVudAgFAXICXzMEDGNvbnRpbmVudElkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCmNvbnRpbmVudHMFCWNvbnRpbmVudAkArAICAhNVbmtub3duIGNvbnRpbmVudDogBQljb250aW5lbnQECHRlcnJhaW5zCQELZ2VuVGVycmFpbnMCCQEDYWJzAQkAngMBBQR0eElkBQxjb250aW5lbnRJZHgEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQKbmV3TGFuZE51bQkApAMBBQdmcmVlTnVtBAVpc3N1ZQkAwggFCQEHbmZ0TmFtZQIFCm5ld0xhbmROdW0FC25ld0xhbmRTaXplCQC5CQIJAMwIAgUKbmV3TGFuZE51bQkAzAgCBQtuZXdMYW5kU2l6ZQkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBA5uZXdMYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwkAZgIFB25lZWRNYXQAAAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwUHbmVlZE1hdAIBXwQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAkAlAoCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUBcgJfNQMJAGYCCQCQAwEIBQFyAl83AAAJAQtTdHJpbmdFbnRyeQIFCGxhbmRzS2V5CQC7CQIIBQFyAl83AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQMJAGYCCAUBcgJfOAUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMIBQFyAl84CQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEFBWlzc3VlCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFCm5ld0xhbmROdW0FDm5ld0xhbmRBc3NldElkCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUObmV3TGFuZEFzc2V0SWQFBGFkZHIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFCm5ld0xhbmROdW0FBGFkZHIJAQxJbnRlZ2VyRW50cnkCCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQ5uZXdMYW5kQXNzZXRJZAgFAXICXzIJAQxJbnRlZ2VyRW50cnkCCQEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkFSVFBSRVNBTEUFDm5ld0xhbmRBc3NldElkBQRhZGRyCAUBcgJfMgkBDEludGVnZXJFbnRyeQIJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQUObmV3TGFuZEFzc2V0SWQFCG5ld0xldmVsCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFDm5ld0xhbmRBc3NldElkBQRhZGRyBQhuZXdMZXZlbAkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIIBQFyAl80CQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAgFAXICXzYJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIFCWNvbnRpbmVudAkAzAgCAgFMCQDMCAIFDm5ld0xhbmRBc3NldElkBQNuaWwCAV8JAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGFkZHIAAQUHYXNzZXRJZAUObmV3TGFuZEFzc2V0SWQBA3MybQMEYWRkcgxsYW5kQXNzZXRJZHMEdHhJZAkBDW1lcmdlSW50ZXJuYWwHAgFNAAMCBFNTU1MFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAAAAQNtMmwFBGFkZHIMbGFuZEFzc2V0SWRzBHR4SWQMc2hvdWxkVXNlTWF0DXBheW1lbnRBbW91bnQEBGNvc3QJAGgCBRVJbmZyYVVwZ3JhZGVDb3N0U1VzZHQABAMDCQEBIQEFDHNob3VsZFVzZU1hdAkBAiE9AgUNcGF5bWVudEFtb3VudAUEY29zdAcJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQRjb3N0CQENbWVyZ2VJbnRlcm5hbAcCAUwABAIDU01NBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwAEAQRsMnhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0AC8DAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgJYTAAFAgVTU1NNTAUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMALwEGeGwyeHhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0ADYDAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgNYWEwABgIDTFhMBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwA2AQttZXJnZUNvbW1vbgUMc2hvdWxkVXNlTWF0BGFkZHINcGF5bWVudEFtb3VudAxsYW5kQXNzZXRJZHMEdHhJZAQLbWVyZ2VSZXN1bHQEByRtYXRjaDAJAJADAQUMbGFuZEFzc2V0SWRzAwkAAAIABAUHJG1hdGNoMAkBA3MybQMFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAMJAAACAAMFByRtYXRjaDAJAQNtMmwFBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQFDHNob3VsZFVzZU1hdAUNcGF5bWVudEFtb3VudAMJAAACAAUFByRtYXRjaDAJAQRsMnhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQDCQAAAgACBQckbWF0Y2gwCQEGeGwyeHhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQJAAIBAg1Vbmtub3duIG1lcmdlBQttZXJnZVJlc3VsdAEGcHJvbG9nAQFpAwMJAQIhPQIIBQFpDG9yaWdpbkNhbGxlcgUMcmVzdENvbnRyYWN0CQELdmFsdWVPckVsc2UCCQCgCAEJAQprZXlCbG9ja2VkAAcHCQACAQIfQ29udHJhY3RzIGFyZSB1bmRlciBtYWludGVuYW5jZQkBC1N0cmluZ0VudHJ5AgkBEWtleUxhc3RUeElkQnlVc2VyAQkApQgBCAUBaQxvcmlnaW5DYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZB4BaQENY29uc3RydWN0b3JWMQEIcmVzdEFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBCnNldEJsb2NrZWQBCWlzQmxvY2tlZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEXBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQxCb29sZWFuRW50cnkCCQEKa2V5QmxvY2tlZAAFCWlzQmxvY2tlZAUDbmlsAWkBCXN0YWtlTGFuZAAEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKTEFORFBSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUEdGhpcwkAAgECF1Vua25vd24gaXNzdWVyIG9mIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKTEFORFBSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkxBTkRQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAtsYW5kTnVtU2l6ZQkAsAICCAUFYXNzZXQEbmFtZQAEBAdsYW5kTnVtAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCA1hYTAkAswICBQtsYW5kTnVtU2l6ZQADAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCAlhMCQCzAgIFC2xhbmROdW1TaXplAAIJALMCAgULbGFuZE51bVNpemUAAQMJAQEhAQkBCWlzRGVmaW5lZAEJALYJAQUHbGFuZE51bQkAAgEJAKwCAgIeQ2Fubm90IHBhcnNlIGxhbmQgbnVtYmVyIGZyb20gCAUFYXNzZXQEbmFtZQQLbGFuZEFzc2V0SWQJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8EDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCBQFkBQtyZWNUZXJyYWlucwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMJAGkCBQZwaWVjZXMFBVNTSVpFAAEECWFydFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAhsYW5kc0tleQkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFB2FkZHJlc3MECGxhbmRzU3RyCQCiCAEFCGxhbmRzS2V5BAVsYW5kcwMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBWxhbmRzBQtsYW5kQXNzZXRJZAkAAgEJAKwCAgIiWW91ciBzdGFrZWQgbGFuZHMgYWxyZWFkeSBjb250YWluIAULbGFuZEFzc2V0SWQECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkAzQgCBQVsYW5kcwULbGFuZEFzc2V0SWQCAV8JAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBQdhZGRyZXNzAAAFBnBpZWNlcwkAzAgCCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQFB2FkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQUHYWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBJWtleUxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIDBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwUJYXJ0UGllY2VzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgULbGFuZEFzc2V0SWQFB2FkZHJlc3MFCmluZnJhTGV2ZWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwBaQELdW5zdGFrZUxhbmQBDWxhbmRBc3NldElkSW4EDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQZjYWxsZXIEAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFDWNsYWltTW9kZUR1Y2sFDWxhbmRBc3NldElkSW4EC2xhbmRBc3NldElkCAUBYwJfMgQIbGFuZHNLZXkJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQRhZGRyBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAggFAWMCXzMFC3JlY1RlcnJhaW5zBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMJAGkCBQZwaWVjZXMFBVNTSVpFAP///////////wEEC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyBQtsYW5kQXNzZXRJZAUGcGllY2VzBQ1jbGFpbU1vZGVEdWNrBAVsYW5kcwkAvQkCCQELdmFsdWVPckVsc2UCCQCiCAEFCGxhbmRzS2V5AgACAV8EA2lkeAkAzwgCBQVsYW5kcwULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQNpZHgJAAIBCQCsAgICIFlvdXIgc3Rha2VkIGxhbmRzIGRvbid0IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAQBdAgJAQV2YWx1ZQEJAO0HAQUGaGVpZ2h0CXRpbWVzdGFtcAQLcmVsZWFzZVRpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgULZ292Q29udHJhY3QJARVrZXlVc2VyR3dsUmVsZWFzZVRpbWUBBQRhZGRyAAADCQBnAgULcmVsZWFzZVRpbWUFAXQJAAIBCQCsAgICOVlvdXIgZ1dMIGFyZSB0YWtpbmcgcGFydCBpbiB2b3RpbmcsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQtyZWxlYXNlVGltZQQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQkA2QQBBQtsYW5kQXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKTEFORFBSRUZJWAULbGFuZEFzc2V0SWQFBGFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMJAMwIAgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkAzAgCAwkAZgIJAJADAQUFbGFuZHMAAQkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkAzAgCCQEMSW50ZWdlckVudHJ5AgUJcGllY2VzS2V5AwkAZgIFBnBpZWNlcwUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMFBnBpZWNlcwkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAFpAQlzdGFrZUR1Y2sABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEB2Fzc2V0SWQJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCAUDcG10BmFtb3VudAABCQACAQkArAICCQCsAgICBE5GVCAFCkRVQ0tQUkVGSVgCJCB0b2tlbiBzaG91bGQgYmUgYXR0YWNoZWQgYXMgcGF5bWVudAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAMDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQ1pbmN1YmF0b3JBZGRyCQECIT0CCAUFYXNzZXQGaXNzdWVyBQticmVlZGVyQWRkcgcJAAIBCQCsAgIJAKwCAgISVW5rbm93biBpc3N1ZXIgb2YgBQpEVUNLUFJFRklYAgYgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpEVUNLUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKRFVDS1BSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQECmFzc2V0SWRTdHIJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQphc3NldElkU3RyAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkAwkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgIdWW91IGFscmVhZHkgc3Rha2VkIG9uZSBkdWNrOiAIBQVhc3NldARuYW1lBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyBAhsb2NhdGlvbgkAoggBBQZsb2NLZXkEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQphc3NldElkU3RyBAhiYWNrcGFjawkAoggBBQVicEtleQkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQphc3NldElkU3RyBQNuaWwDCQEJaXNEZWZpbmVkAQUIbG9jYXRpb24FA25pbAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBQNuaWwDCQEJaXNEZWZpbmVkAQUIYmFja3BhY2sFA25pbAkAzQgCCQDNCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6BQNuaWwJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFCmFzc2V0SWRTdHIAZAUMcHJvbG9nQWN0aW9uAWkBC3Vuc3Rha2VEdWNrAQphc3NldElkU3RyBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB2Fzc2V0SWQJANkEAQUKYXNzZXRJZFN0cgQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQkA2AQBBQdhc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAMJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgkArAICAglUaGUgZHVjayAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEJANgEAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUHYWRkcmVzcwkAAgECF1N0YWtlZCBORlQgaXMgbm90IHlvdXJzBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQUKYXNzZXRJZFN0cgQGaGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aABkAwkAZgIAZAUGaGVhbHRoCQACAQImUGxlYXNlIGhlYWwgeW91ciBkdWNrIGJlZm9yZSB1bnN0YWtpbmcJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQUHdGltZUtleQkAzAgCCQELRGVsZXRlRW50cnkBBQlrZXlIZWFsdGgJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBD2tleUR1Y2tMb2NhdGlvbgEFCmFzc2V0SWRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBEGtleUR1Y2tJZFRvT3duZXIBBQphc3NldElkU3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKRFVDS1BSRUZJWAUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELRGVsZXRlRW50cnkBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAWkBCGNsYWltUmVzAgZhbW91bnQObGFuZEFzc2V0SWRTdHIEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBnJlc3VsdAkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQZhbW91bnQFDWNsYWltTW9kZUR1Y2sFDmxhbmRBc3NldElkU3RyCQCUCgIJAM0IAgkAzQgCCQDNCAIIBQZyZXN1bHQCXzEJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzIJALkJAggFBnJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfNAkAuQkCCAUGcmVzdWx0Al81AgE6BQxwcm9sb2dBY3Rpb24JAJEDAggFBnJlc3VsdAJfMwUIYnBJZHhSZXMBaQEMY2xhaW1SZXNUb1dIAgZhbW91bnQObGFuZEFzc2V0SWRTdHIEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBnJlc3VsdAkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQZhbW91bnQFC2NsYWltTW9kZVdoBQ5sYW5kQXNzZXRJZFN0cgkAlAoCCQDNCAIJAM0IAgkAzQgCCAUGcmVzdWx0Al8xCQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al8yCQC5CQIIBQZyZXN1bHQCXzMCAToJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzQJALkJAggFBnJlc3VsdAJfNQIBOgUMcHJvbG9nQWN0aW9uCQCRAwIIBQZyZXN1bHQCXzUFCHdoSWR4UmVzAWkBBmZsaWdodAIHbWVzc2FnZQNzaWcEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQIdXNlckFkZHIJAKUIAQgFAWkGY2FsbGVyBAFmCQEMZmxpZ2h0Q29tbW9uAwUIdXNlckFkZHIFB21lc3NhZ2UFA3NpZwQGbG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQgFAWYCXzIEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCiCAEFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OAwkAAAIIBQFmAl80BQtjdXJMb2NhdGlvbgkAAgECIllvdSBjYW4ndCBmbHkgdG8gdGhlIHNhbWUgbG9jYXRpb24EBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBZgJfMgQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAduZXdQcm9kCQEQc3VidHJhY3RQcm9kdWN0cwIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAgFAWYCXzUJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQZsb2NLZXkDCQBmAggFAWYCXzEAAAgFAWYCXzQFC2N1ckxvY2F0aW9uCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCBQduZXdQcm9kBQNuaWwCAToJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ1rZXlEdWNrSGVhbHRoAQgFAWYCXzIIBQFmAl8xCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsCAUBZgJfMwFpAQRoZWFsAwpxdWFudGl0eUwxCnF1YW50aXR5TDIKcXVhbnRpdHlMMwQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMDAwkAZgIAAAUKcXVhbnRpdHlMMQYJAGYCAAAFCnF1YW50aXR5TDIGCQBmAgAABQpxdWFudGl0eUwzCQACAQIbUXVhbnRpdHkgY2Fubm90IGJlIG5lZ2F0aXZlBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBANxdHMJAMwIAgUKcXVhbnRpdHlMMQkAzAgCBQpxdWFudGl0eUwyCQDMCAIFCnF1YW50aXR5TDMFA25pbAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoAGQDCQBnAgUJb2xkSGVhbHRoBQVNQVhIUAkAAgEJAKwCAgkArAICAg9IUCBzaG91bGQgYmUgPCAJAKQDAQUFTUFYSFACCCB0byBoZWFsBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQIcHJvZExpc3QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8KAQtpdGVyYXRlUHJvZAIDYWNjC2lnbm9yZWRJdGVtBAFuCAUDYWNjAl8yBAF4AwkAZgIJAJADAQUIcHJvZExpc3QFAW4JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAUBbgAAAwkAZgIAAwUBbgQBcQkAkQMCBQNxdHMFAW4DCQBmAgUBcQUBeAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQCkAwEFAXgCBCBvZiAJAJEDAgUJcHJvZFR5cGVzBQFuCQCVCgMJAM0IAggFA2FjYwJfMQkApAMBCQBlAgUBeAUBcQkAZAIFAW4AAQkAZAIIBQNhY2MCXzMJAGgCCQCRAwIFCG1lZEtpdEhwBQFuBQFxCQCVCgMJAM0IAggFA2FjYwJfMQkApAMBBQF4CQBkAgUBbgABCAUDYWNjAl8zBAZyZXN1bHQKAAIkbAUQcHJvZHVjdGlvbk1hdHJpeAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwUDbmlsAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELaXRlcmF0ZVByb2QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgQJbmV3SGVhbHRoCQCXAwEJAMwIAgUFTUFYSFAJAMwIAgkAZAIFCW9sZEhlYWx0aAgFBnJlc3VsdAJfMwUDbmlsCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUJbmV3SGVhbHRoCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCCQC5CQIIBQZyZXN1bHQCXzECAV8FA25pbAIBOgkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAUJbmV3SGVhbHRoAWkBBmhlYWxFUwAEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoAGQDCQBmAgUJb2xkSGVhbHRoAAAJAAIBAihIUCBzaG91bGQgYmUgMCB0byBjYWxsIEVtZXJnZW5jeSBTZXJ2aWNlBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQIcHJvZExpc3QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8EDW1lZEtpdEFtb3VudDEDCQBmAgkAkAMBBQhwcm9kTGlzdAAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QAAAAABA1tZWRLaXRBbW91bnQyAwkAZgIJAJADAQUIcHJvZExpc3QAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0AAEAAAQNbWVkS2l0QW1vdW50MwMJAGYCCQCQAwEFCHByb2RMaXN0AAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAACAAADAwMJAGYCBQ1tZWRLaXRBbW91bnQxAAAGCQBmAgUNbWVkS2l0QW1vdW50MgAABgkAZgIFDW1lZEtpdEFtb3VudDMAAAkAAgECH1lvdSBoYXZlIHRvIHVzZSBvd24gTWVkaWNhbCBLaXQECGV4aXN0U3RyCQCdCAIFD2Vjb25vbXlDb250cmFjdAkBDmtleUVzV2FyZWhvdXNlAAQMZXhpc3RBbW91bnRzAwkBCWlzRGVmaW5lZAEFCGV4aXN0U3RyCQC1CQIJAQV2YWx1ZQEFCGV4aXN0U3RyAgFfBQNuaWwEC2V4aXN0QW1vdW50AwkAZgIJAJADAQUMZXhpc3RBbW91bnRzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxleGlzdEFtb3VudHMAAAAAAwkAZwIAAAULZXhpc3RBbW91bnQJAAIBAjlUaGVyZSBhcmUgbm8gTWVkaWNhbCBLaXRzIEwxIGF0IEVtZXJnZW5jeSBTZXJ2aWNlIHN0b3JhZ2UECW5ld0hlYWx0aAkAZAIFCW9sZEhlYWx0aAkAkQMCBQhtZWRLaXRIcAAABAVuZXdFUwkAuQkCCQDMCAIJAKQDAQkAZQIFC2V4aXN0QW1vdW50AAEJANEIAgUMZXhpc3RBbW91bnRzAAACAV8EBnJlY2lwZQkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgAAAIBXwQIdG90YWxNYXQJARJnZXRSZWNpcGVNYXRlcmlhbHMBBQZyZWNpcGUECHBhY2tTaXplCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGcmVjaXBlBRFyZWNpcGVJZHhQYWNrc2l6ZQQJc2VsbFByaWNlCQBrAwkAaAIFCHRvdGFsTWF0BQpFU1NFTExDT0VGBRBSRVNPVVJDRVBSSUNFTUlOCQBoAgAKBQhwYWNrU2l6ZQMJAQIhPQIIBQNwbXQGYW1vdW50BQlzZWxsUHJpY2UJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQlzZWxsUHJpY2UEBnJlc3VsdAkBCGFzU3RyaW5nAQkA/AcEBQ9lY29ub215Q29udHJhY3QCD3VwZGF0ZUVzU3RvcmFnZQkAzAgCBQVuZXdFUwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQt1c2R0QXNzZXRJZAUJc2VsbFByaWNlBQNuaWwJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQluZXdIZWFsdGgJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwFBnJlc3VsdAFpAQ51cGRhdGVCYWNrcGFjawILZHVja0Fzc2V0SWQHbmV3UGFjawQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAUHbmV3UGFjawkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAUHbmV3UGFjawFpAQhidXlTTGFuZAAEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQMJAQIhPQIIBQNwbXQGYW1vdW50BQdFWFBVU0RUCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUHRVhQVVNEVAQGcmVzdWx0CQESZXhwZWRpdGlvbkludGVybmFsAggFAWkGY2FsbGVyCAUBaQ10cmFuc2FjdGlvbklkCQCUCgIJAM0IAgkAzQgCCAUGcmVzdWx0Al8xCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAUMcHJvbG9nQWN0aW9uCAgFBnJlc3VsdAJfMgJfMQFpAQpleHBlZGl0aW9uAgdtZXNzYWdlA3NpZwQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAZyZXN1bHQJARBleHBlZGl0aW9uQ29tbW9uBAgFAWkGY2FsbGVyCAUBaQ10cmFuc2FjdGlvbklkBQdtZXNzYWdlBQNzaWcJAJQKAgkAzQgCCAUGcmVzdWx0Al8xBQxwcm9sb2dBY3Rpb24JAJQKAggFBnJlc3VsdAJfMggFBnJlc3VsdAJfMwFpAQx1cGdyYWRlSW5mcmEBC2xhbmRBc3NldElkBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBnJlc3VsdAkBDXVwSW5mcmFDb21tb24EBggFAWkGY2FsbGVyAAAFC2xhbmRBc3NldElkCQCUCgIJAM0IAggFBnJlc3VsdAJfMQUMcHJvbG9nQWN0aW9uCAUGcmVzdWx0Al8yAWkBEHVwZ3JhZGVJbmZyYVVzZHQBC2xhbmRBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQQGcmVzdWx0CQENdXBJbmZyYUNvbW1vbgQHCAUBaQZjYWxsZXIIBQNwbXQGYW1vdW50BQtsYW5kQXNzZXRJZAkAlAoCCQDNCAIJAM0IAggFBnJlc3VsdAJfMQkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0CAUDcG10BmFtb3VudAULdXNkdEFzc2V0SWQFDHByb2xvZ0FjdGlvbggFBnJlc3VsdAJfMgFpARBhY3RpdmF0ZUFydGlmYWN0AgdhcnROYW1lC2xhbmRBc3NldElkBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBnJlc3VsdAQHJG1hdGNoMAUHYXJ0TmFtZQMJAAACAgdQUkVTQUxFBQckbWF0Y2gwCQESYWN0aXZhdGVQcmVzYWxlQXJ0AgkApQgBCAUBaQZjYWxsZXIFC2xhbmRBc3NldElkCQACAQIQVW5rbm93biBhcnRpZmFjdAkAzQgCBQZyZXN1bHQFDHByb2xvZ0FjdGlvbgFpAQptZXJnZUxhbmRzAQxsYW5kQXNzZXRJZHMEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQGcmVzdWx0CQELbWVyZ2VDb21tb24FBgkApQgBCAUBaQZjYWxsZXIAAAUMbGFuZEFzc2V0SWRzCAUBaQ10cmFuc2FjdGlvbklkCQCUCgIJAM0IAggFBnJlc3VsdAJfMQUMcHJvbG9nQWN0aW9uCAUGcmVzdWx0Al8yAWkBDm1lcmdlTGFuZHNVc2R0AQxsYW5kQXNzZXRJZHMEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQQGcmVzdWx0CQELbWVyZ2VDb21tb24FBwkApQgBCAUBaQZjYWxsZXIIBQNwbXQGYW1vdW50BQxsYW5kQXNzZXRJZHMIBQFpDXRyYW5zYWN0aW9uSWQJAJQKAgkAzQgCCQDNCAIIBQZyZXN1bHQCXzEJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAgFA3BtdAZhbW91bnQFC3VzZHRBc3NldElkBQxwcm9sb2dBY3Rpb24IBQZyZXN1bHQCXzIBaQENY2FyZ29FeGNoYW5nZQIMY2FyZ29MaXN0U3RyC2xhbmRBc3NldElkBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQECmNhcmdvUGFydHMJALwJAgUMY2FyZ29MaXN0U3RyAgE6BARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAggFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQJbGFuZEluZGV4CQBpAgkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplBQVTU0laRQQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAMJAQIhPQIJAJEDAgUDbG9jBQhsb2NJZHhJZAULbGFuZEFzc2V0SWQJAAIBCQCsAgICG0R1Y2sgc2hvdWxkIGJlIG9uIHRoZSBsYW5kIAULbGFuZEFzc2V0SWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQECWN1cnJlbnRXaAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAZyZXN1bHQJAQltb3ZlU3R1ZmYDBQpjYXJnb1BhcnRzBQljdXJyZW50V2gFC2N1cnJlbnRQYWNrBARsb2Z0CQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8EBWxvZnRPCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCAUGcmVzdWx0Al83BAVsb2Z0RgkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCAUGcmVzdWx0Al83CQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCAUGcmVzdWx0Al80CQDMCAIIBQZyZXN1bHQCXzUJAMwIAggFBnJlc3VsdAJfNgUDbmlsAgE6CQDMCAIJAQtTdHJpbmdFbnRyeQIFBXdoS2V5CQC6CQIJAMwIAgkAkQMCBQljdXJyZW50V2gFC3doSWR4TGV2ZWxzCQDMCAIIBQZyZXN1bHQCXzEJAMwIAggFBnJlc3VsdAJfMgkAzAgCCAUGcmVzdWx0Al8zCQDMCAIJALkJAgkAzAgCCQCRAwIFBGxvZnQFCXZvbExvY2tlZAkAzAgCCQCkAwEFBWxvZnRPCQDMCAIJAKQDAQUFbG9mdEYJAMwIAgkAkQMCBQRsb2Z0BQh2b2xUb3RhbAUDbmlsAgFfBQNuaWwCAToJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwBaQENc2F2ZVdhcmVob3VzZQIFd2hTdHILbGFuZEFzc2V0SWQEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQEAndoCQC8CQIFBXdoU3RyAgE6AwkBAiE9AgkAkAMBBQJ3aAAFCQACAQIwd2FyZWhvdXNlIHN0cmluZyBzaG91bGQgY29udGFpbiA0ICc6JyBzZXBhcmF0b3JzBAVsb2Z0TAkAkQMCCQC1CQIJAJEDAgUCd2gFCXdoSWR4TE9GVAIBXwUJdm9sTG9ja2VkBAVsb2Z0TwkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUCd2gEBWxvZnRUCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFAndoBQt3aElkeExldmVscwQFbG9mdEYJAGUCCQBlAgUFbG9mdFQJAQ1wYXJzZUludFZhbHVlAQUFbG9mdEwFBWxvZnRPBAhuZXdXaFN0cgkAugkCCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIJAJEDAgUCd2gFCHdoSWR4UmVzCQDMCAIJAJEDAgUCd2gFCHdoSWR4TWF0CQDMCAIJAJEDAgUCd2gFCXdoSWR4UHJvZAkAzAgCCQC5CQIJAMwIAgUFbG9mdEwJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAKQDAQUFbG9mdFQFA25pbAIBXwUDbmlsAgE6CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFd2hLZXkFCG5ld1doU3RyCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsBQhuZXdXaFN0cgFpARJmaXhXYXJlaG91c2VGb3JtYXQBC2xhbmRBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBQxyZXN0Q29udHJhY3QJAAIBAg1BY2Nlc3MgZGVuaWVkBAV3aEtleQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUFBVNTSVpFBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQCd2gJAQxnZXRXYXJlaG91c2UDBQV3aEtleQUJbGFuZEluZGV4BQppbmZyYUxldmVsBAVsb2Z0TAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnJlY2FsY0xvY2tlZFZvbHVtZVJFQURPTkxZCQDMCAIFC2xhbmRBc3NldElkCQDMCAIFAndoBQNuaWwFA25pbAQFbG9mdE8JARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFAndoBAVsb2Z0VAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQJ3aAULd2hJZHhMZXZlbHMEBWxvZnRGCQBlAgkAZQIFBWxvZnRUBQVsb2Z0TAUFbG9mdE8ECG5ld1doU3RyCQC6CQIJAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgkAkQMCBQJ3aAUId2hJZHhSZXMJAMwIAgkAkQMCBQJ3aAUId2hJZHhNYXQJAMwIAgkAkQMCBQJ3aAUJd2hJZHhQcm9kCQDMCAIJALkJAgkAzAgCCQCkAwEFBWxvZnRMCQDMCAIJAKQDAQUFbG9mdE8JAMwIAgkApAMBBQVsb2Z0RgkAzAgCCQCkAwEFBWxvZnRUBQNuaWwCAV8FA25pbAIBOgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBXdoS2V5BQhuZXdXaFN0cgUDbmlsBQhuZXdXaFN0cgFpAQ9maXhTdGFrZWRQaWVjZXMBB2FkZHJlc3MDCQECIT0CCAUBaQZjYWxsZXIFDHJlc3RDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEDHN0YWtlZFBpZWNlcwMJAAACBQdhZGRyZXNzAgAAAAQIbGFuZHNTdHIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUHYWRkcmVzcwQFbGFuZHMDCQEJaXNEZWZpbmVkAQUIbGFuZHNTdHIJAL0JAgkBBXZhbHVlAQUIbGFuZHNTdHICAV8FA25pbAoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQIbGFuZFNpemUJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplCQBkAgUDYWNjCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUKAAIkbAUFbGFuZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB29uZUxhbmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwUMc3Rha2VkUGllY2VzBQNuaWwFDHN0YWtlZFBpZWNlcwFpAQ1zZXRDdXN0b21OYW1lAwdhc3NldElkCmN1c3RvbU5hbWUEdHlwZQQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAAwkBAiE9AggFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECGkFsbG93ZWQgVVNEVCBwYXltZW50IG9ubHkhAwkBAiE9AggFA3BtdAZhbW91bnQFDFJFTkFNSU5HQ09TVAkAAgEJAKwCAgISUGF5bWVudCBzaG91bGQgYmUgCQCkAwEFDFJFTkFNSU5HQ09TVAMJAQhjb250YWlucwIFCmN1c3RvbU5hbWUCAl9fCQACAQkArAICAh5OYW1lIHNob3VsZCBub3QgY29udGFpbiAnX18nOiAFCmN1c3RvbU5hbWUDCQBmAgkAsQIBBQpjdXN0b21OYW1lBQpNQVhOQU1FTEVOCQACAQkArAICAhlOYW1lIHRvbyBsb25nLCBtYXhMZW5ndGg9CQCkAwEFCk1BWE5BTUVMRU4EBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAdhY3Rpb25zBAckbWF0Y2gwBQR0eXBlAwkAAAICB0FDQ09VTlQFByRtYXRjaDAECnJldmVyc2VLZXkJARZrZXlDdXN0b21OYW1lVG9BZGRyZXNzAQUKY3VzdG9tTmFtZQQJbmFtZU93bmVyCQCiCAEFCnJldmVyc2VLZXkDCQEJaXNEZWZpbmVkAQUJbmFtZU93bmVyCQACAQkArAICAhlOYW1lIGFscmVhZHkgcmVnaXN0ZXJlZDogBQpjdXN0b21OYW1lBA1hZGRyVG9OYW1lS2V5CQEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEFBGFkZHIEB29sZE5hbWUJAKIIAQUNYWRkclRvTmFtZUtleQQHZnJlZU9sZAMJAQlpc0RlZmluZWQBBQdvbGROYW1lCQDMCAIJAQtEZWxldGVFbnRyeQEJARZrZXlDdXN0b21OYW1lVG9BZGRyZXNzAQkBBXZhbHVlAQUHb2xkTmFtZQUDbmlsBQNuaWwJAM0IAgkAzQgCBQdmcmVlT2xkCQELU3RyaW5nRW50cnkCBQ1hZGRyVG9OYW1lS2V5BQpjdXN0b21OYW1lCQELU3RyaW5nRW50cnkCBQpyZXZlcnNlS2V5BQRhZGRyAwkAAAICBExBTkQFByRtYXRjaDAEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQdhc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMECnJldmVyc2VLZXkJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQOYXNzZXRUb05hbWVLZXkJARprZXlMYW5kQXNzZXRJZFRvQ3VzdG9tTmFtZQEFB2Fzc2V0SWQEB29sZE5hbWUJAKIIAQUOYXNzZXRUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzQgCCQDNCAIFB2ZyZWVPbGQJAQtTdHJpbmdFbnRyeQIFDmFzc2V0VG9OYW1lS2V5BQpjdXN0b21OYW1lCQELU3RyaW5nRW50cnkCBQpyZXZlcnNlS2V5BQdhc3NldElkAwkAAAICBERVQ0sFByRtYXRjaDAEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQdhc3NldElkAwMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQYJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgkAAgEJAKwCAggFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARBrZXlEdWNrSWRUb093bmVyAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKRFVDS1BSRUZJWAINIGlzIG5vdCB5b3VycwQKcmV2ZXJzZUtleQkBGmtleUR1Y2tDdXN0b21OYW1lVG9Bc3NldElkAQUKY3VzdG9tTmFtZQQJbmFtZU93bmVyCQCiCAEFCnJldmVyc2VLZXkDCQEJaXNEZWZpbmVkAQUJbmFtZU93bmVyCQACAQkArAICAhlOYW1lIGFscmVhZHkgcmVnaXN0ZXJlZDogBQpjdXN0b21OYW1lBA5hc3NldFRvTmFtZUtleQkBGmtleUR1Y2tBc3NldElkVG9DdXN0b21OYW1lAQUHYXNzZXRJZAQHb2xkTmFtZQkAoggBBQ5hc3NldFRvTmFtZUtleQQHZnJlZU9sZAMJAQlpc0RlZmluZWQBBQdvbGROYW1lCQDMCAIJAQtEZWxldGVFbnRyeQEJARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEJAQV2YWx1ZQEFB29sZE5hbWUFA25pbAUDbmlsCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUOYXNzZXRUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFB2Fzc2V0SWQJAAIBAhNVbmtub3duIGVudGl0eSB0eXBlCQCUCgIJAM0IAgkAzQgCBQdhY3Rpb25zCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAUMcHJvbG9nQWN0aW9uAAABaQEMc2V0UmVmZXJyYWxzAglvbGRQbGF5ZXIJbmV3UGxheWVyAwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQNwdWIJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkAwkBASEBCQEJaXNEZWZpbmVkAQkApggBBQlvbGRQbGF5ZXIJAAIBCQCsAgICEUludmFsaWQgYWRkcmVzczogBQlvbGRQbGF5ZXIDCQEBIQEJAQlpc0RlZmluZWQBCQCmCAEFCW5ld1BsYXllcgkAAgEJAKwCAgIRSW52YWxpZCBhZGRyZXNzOiAFCW5ld1BsYXllcgQHb2xkc0tleQkBCWtleU9sZGllcwAEBG9sZHMJAKIIAQUHb2xkc0tleQQGb2xkaWVzAwkBCWlzRGVmaW5lZAEFBG9sZHMJALwJAgkBBXZhbHVlAQUEb2xkcwIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBm9sZGllcwUJbmV3UGxheWVyCQACAQkArAICBQluZXdQbGF5ZXICJiBpcyBub3QgbmV3YmllIChhbHJlYWR5IGhhcyByZWZlcnJhbHMpBAhyZWZCeUtleQkBD2tleUFkZHJlc3NSZWZCeQEFCW5ld1BsYXllcgQFcmVmQnkJAKIIAQUIcmVmQnlLZXkDAwkBCWlzRGVmaW5lZAEFBXJlZkJ5CQEJaXNEZWZpbmVkAQkApggBCQEFdmFsdWUBBQVyZWZCeQcJAAIBCQCsAgIJAKwCAgUJbmV3UGxheWVyAhQgYWxyZWFkeSBoYXMgcmVmQnk6IAkBBXZhbHVlAQUFcmVmQnkEB3JlZnNLZXkJARNrZXlBZGRyZXNzUmVmZXJyYWxzAQUJb2xkUGxheWVyBARyZWZzCQCiCAEFB3JlZnNLZXkECXJlZnNBcnJheQMJAQlpc0RlZmluZWQBBQRyZWZzCQC8CQIJAQV2YWx1ZQEFBHJlZnMCAV8FA25pbAMJAQ9jb250YWluc0VsZW1lbnQCBQlyZWZzQXJyYXkFCW5ld1BsYXllcgkAAgEJAKwCAgkArAICCQCsAgIFCW9sZFBsYXllcgISIGFscmVhZHkgY29udGFpbnMgBQluZXdQbGF5ZXICESB3aXRoaW4gcmVmZXJyYWxzBAduZXdSZWZzCQC6CQIJAM0IAgUJcmVmc0FycmF5BQluZXdQbGF5ZXICAV8EB25ld09sZHMDCQEPY29udGFpbnNFbGVtZW50AgUGb2xkaWVzBQlvbGRQbGF5ZXIJAQV2YWx1ZQEFBG9sZHMJALoJAgkAzQgCBQZvbGRpZXMFCW9sZFBsYXllcgIBXwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFCHJlZkJ5S2V5BQlvbGRQbGF5ZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgUHcmVmc0tleQUHbmV3UmVmcwkAzAgCCQELU3RyaW5nRW50cnkCBQdvbGRzS2V5BQduZXdPbGRzCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAAABaQEcc3BsaXRCeUdsb2JhbFdlaWdodHNSRUFET05MWQEGYW1vdW50CQCUCgIFA25pbAkBEmdldE5lZWRlZE1hdGVyaWFscwEFBmFtb3VudAFpASRzcGxpdEJ5R2xvYmFsQW5kTG9jYWxXZWlnaHRzUkVBRE9OTFkDCW1hdEFtb3VudAlyZXNBbW91bnQIdGVycmFpbnMEDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQUIdGVycmFpbnMJAJQKAgUDbmlsCQCUCgIJARJnZXROZWVkZWRNYXRlcmlhbHMBBQltYXRBbW91bnQJARNkaXN0cmlidXRlQnlXZWlnaHRzAgUJcmVzQW1vdW50BQ10ZXJyYWluQ291bnRzAWkBE2dldEJhY2twYWNrUkVBRE9OTFkBC2R1Y2tBc3NldElkCQCUCgIFA25pbAkAuQkCCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAIBOgFpARRnZXRXYXJlaG91c2VSRUFET05MWQELbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQUFU1NJWkUECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAACQCUCgIFA25pbAkAugkCCQEMZ2V0V2FyZWhvdXNlAwkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwCAToBaQEKc2F2ZUxhc3RUeAADCQECIT0CCAUBaQZjYWxsZXIFC3dsZ0NvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAkAlAoCCQDMCAIJAQZwcm9sb2cBBQFpBQNuaWwAKgDSxETy",
    "height": 2631298,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DqNMsQaMHFX6VTsFzhcgJCp7Vf9ggPeRWDEAkvV2ZQ6c
Next: D29kBp3N4g14JqRFvanaL1j4Q5p1Dcy3VdjVk1cMkr6W

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