tx · GSTt7Z228WrMXnJgjAsmhPN3H9DTj2vrnW34G31kWnj5

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.10300000 Waves

2023.09.22 21:26 [2766947] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GSTt7Z228WrMXnJgjAsmhPN3H9DTj2vrnW34G31kWnj5",
    "fee": 10300000,
    "feeAssetId": null,
    "timestamp": 1695407246378,
    "version": 2,
    "chainId": 84,
    "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm",
    "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX",
    "proofs": [
        "3PboT87FfUaFGMfipuvY9d93DUdsc7GFtD2BhwHhtYWabHkdQo164XidQUHp3pAJhfFPYCp657nWUSCYm8DwCdRn"
    ],
    "script": "base64:BgLbAQgCEgMKAQgSAwoBBBIAEgMKAQgSABIDCgEIEgQKAgEIEgQKAgEIEgQKAgICEgUKAwEBARIAEgQKAggIEgASAwoBCBIAEgQKAgICEgASAwoBCBIECgIICBIDCgEYEgQKAggIEgQKAggIEgMKAQgSAwoBGBIDCgEIEgUKAwgICBIECgIICBIHCgUBAQEBARIDCgEBEgUKAwEBCBIDCgEIEgMKAQgSABIECgIIARIECgIIARIDCgEIEgQKAggIEgMKAQgSABIDCgEIEgMKAQgSBAoCAgISBAoCAgISAJMCAAlEQVlNSUxMSVMAgLiZKQEUa2V5TGFzdEFyYlRpbWVCeVVzZXIBBGFkZHIJAKwCAgIQbGFzdEFyYlRpbWVVc2VyXwUEYWRkcgAGU0NBTEU4AIDC1y8ADHhwTGV2ZWxTY2FsZQCAGQAPeHBMZXZlbFJlY2lwUG93AKAfABJudW1Qb2ludHNPbkxldmVsVXAAAwAOcm9iYmVyeUNvc3RNaW4AgMLXLwAUcm9iYmVyeUNvb2xkb3duQ29lZmYAkAMADHJlcXVpcmVtZW50cwkAzAgCAghTdHJlbmd0aAkAzAgCAghBY2N1cmFjeQkAzAgCAglJbnRlbGxlY3QJAMwIAgIJRW5kdXJhbmNlCQDMCAICCURleHRlcml0eQkAzAgCAgVMZXZlbAkAzAgCAgZIZWFsdGgFA25pbAAMY2hhclN0cmVuZ3RoAAAADGNoYXJBY2N1cmFjeQABAA1jaGFySW50ZWxsZWN0AAIADWNoYXJFbmR1cmFuY2UAAwANY2hhckRleHRlcml0eQAEAAtzZWdCYWNrcGFjawAAAAtOVU1TRUdNRU5UUwAGAApOVU1NQUlOQVVYAAIACE1BWFNMT1RTAAIADU1BWFBST0RJTlNMT1QAHgAQbGFuZFJvYkNvb2xkb3ducwkAzAgCAAAJAMwIAgDAzyQJAMwIAgCg9zYJAMwIAgCA3MwUCQDMCAIAgK6mCgUDbmlsAA5NSU5fUkVTX1RPX1JPQgCA2sQJAAxyb2JJZHhMb2NrZWQAAQALZHVja0lkeEZyZWUAAAAQZHVja0lkeFByZXBhcmluZwABAQ1rZXlEdWNrSGVhbHRoAQtkdWNrQXNzZXRJZAkArAICAgtkdWNrSGVhbHRoXwULZHVja0Fzc2V0SWQBDGtleUR1Y2tDaGFycwELZHVja0Fzc2V0SWQJAKwCAgIKZHVja0NoYXJzXwULZHVja0Fzc2V0SWQBCWtleUR1Y2tYUAELZHVja0Fzc2V0SWQJAKwCAgIHZHVja1hQXwULZHVja0Fzc2V0SWQBDGtleUR1Y2tMZXZlbAELZHVja0Fzc2V0SWQJAKwCAgIKZHVja0xldmVsXwULZHVja0Fzc2V0SWQBEWtleUR1Y2tGcmVlUG9pbnRzAQtkdWNrQXNzZXRJZAkArAICAg9kdWNrRnJlZVBvaW50c18FC2R1Y2tBc3NldElkARBrZXlEdWNrRXF1aXBtZW50AQtkdWNrQXNzZXRJZAkArAICAg5kdWNrRXF1aXBtZW50XwULZHVja0Fzc2V0SWQBCWtleVVzZXJYUAEEYWRkcgkArAICAgd1c2VyWFBfBQRhZGRyAQxrZXlVc2VyTGV2ZWwBBGFkZHIJAKwCAgIKdXNlckxldmVsXwUEYWRkcgERa2V5VXNlckZyZWVQb2ludHMBBGFkZHIJAKwCAgIPdXNlckZyZWVQb2ludHNfBQRhZGRyAQ5rZXlTYXZlZEhlYWx0aAELZHVja0Fzc2V0SWQJAKwCAgIMc2F2ZWRIZWFsdGhfBQtkdWNrQXNzZXRJZAEQa2V5U2F2ZWRMb2NhdGlvbgELZHVja0Fzc2V0SWQJAKwCAgIOc2F2ZWRMb2NhdGlvbl8FC2R1Y2tBc3NldElkAQxrZXlEdWNrQnVmZnMBC2R1Y2tBc3NldElkCQCsAgICCmR1Y2tCdWZmc18FC2R1Y2tBc3NldElkARhrZXlMYXN0Um9iYmVyeVRpbWVCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICEGxhc3RSb2JiZXJ5VGltZV8FC2R1Y2tBc3NldElkARhrZXlMYXN0Um9iYmVyeUNvc3RCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICEGxhc3RSb2JiZXJ5Q29zdF8FC2R1Y2tBc3NldElkARNrZXlMYW5kUm9iYmVyeVN0YXRlAQtsYW5kQXNzZXRJZAkArAICAhFsYW5kUm9iYmVyeVN0YXRlXwULbGFuZEFzc2V0SWQBEmtleUxhbmRDb29sZG93bkVUQQELbGFuZEFzc2V0SWQJAKwCAgIQbGFuZENvb2xkb3duRVRBXwULbGFuZEFzc2V0SWQBE2tleUR1Y2tSb2JiZXJ5U3RhdGUBC2R1Y2tBc3NldElkCQCsAgICEWR1Y2tSb2JiZXJ5U3RhdGVfBQtkdWNrQXNzZXRJZAETa2V5TG9ja2VkTGFuZEJ5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIRbG9ja2VkTGFuZEJ5RHVja18FC2R1Y2tBc3NldElkARZrZXlEZWxpdmVyeURlbGF5QnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAhRkZWxpdmVyeURlbGF5QnlEdWNrXwULZHVja0Fzc2V0SWQAB3hwQ2xhaW0AkE4AD3hwU3VjY2Vzc0ZsaWdodACQTgAMeHBGYWlsRmxpZ2h0ANAPAAh4cENhbGxFUwCgjQYADHhwQ3VzdG9tTmFtZQDAhD0ACnhwTmV3U0xhbmQAwJaxAgAOeHBVcGdyYWRlSW5mcmEAkE4AB3hwTWVyZ2UAwIQ9AAl4cE9uYm9hcmQAwIQ9AAZ4cEhlYWwAkE4BCWxldmVsQnlYUAECeHAJAGsDBQx4cExldmVsU2NhbGUJAGwGBQJ4cAAEBQ94cExldmVsUmVjaXBQb3cABAAEBQRET1dOBQZTQ0FMRTgBCW1heEhlYWx0aAEFbGV2ZWwJAGQCAGQFBWxldmVsAQdsZXZlbFVwAgljdXJyTGV2ZWwFbmV3WFAECG5ld0xldmVsCQEJbGV2ZWxCeVhQAQUFbmV3WFAJAMwIAgUIbmV3TGV2ZWwJAMwIAgkAaAIFEm51bVBvaW50c09uTGV2ZWxVcAkAZQIFCG5ld0xldmVsBQljdXJyTGV2ZWwFA25pbAEMZ2V0RHVja1N0YXRzBA9zdGFraW5nQ29udHJhY3QLZHVja0Fzc2V0SWQKYnVmZkVmZmVjdApmb3JjZUJ1ZmZzBAVjaGFycwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBDGtleUR1Y2tDaGFycwEFC2R1Y2tBc3NldElkAgkwXzBfMF8wXzACAV8EA2x2bAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAZoZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkCQEJbWF4SGVhbHRoAQUDbHZsBApzdGF0ZUJ1ZmZzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEMa2V5RHVja0J1ZmZzAQULZHVja0Fzc2V0SWQCCTBfMF8wXzBfMAIBXwkAzggCCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhclN0cmVuZ3RoCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhckFjY3VyYWN5CQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckludGVsbGVjdAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJFbmR1cmFuY2UJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQ1jaGFyRGV4dGVyaXR5CQDMCAIFA2x2bAkAzAgCBQZoZWFsdGgFA25pbAMFCmZvcmNlQnVmZnMJAMwIAgUKYnVmZkVmZmVjdAkAzAgCBQpidWZmRWZmZWN0CQDMCAIFCmJ1ZmZFZmZlY3QJAMwIAgUKYnVmZkVmZmVjdAkAzAgCBQpidWZmRWZmZWN0BQNuaWwJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnN0YXRlQnVmZnMFDGNoYXJTdHJlbmd0aAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKc3RhdGVCdWZmcwUMY2hhckFjY3VyYWN5CQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpzdGF0ZUJ1ZmZzBQ1jaGFySW50ZWxsZWN0CQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpzdGF0ZUJ1ZmZzBQ1jaGFyRW5kdXJhbmNlCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpzdGF0ZUJ1ZmZzBQ1jaGFyRGV4dGVyaXR5BQNuaWwBDmdldFJvYmJlcnlEYXRhAg9zdGFraW5nQ29udHJhY3QLZHVja0Fzc2V0SWQEC2xhc3RSb2JDb3N0CQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBGGtleUxhc3RSb2JiZXJ5Q29zdEJ5RHVjawEFC2R1Y2tBc3NldElkAAAEC2xhc3RSb2JUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBGGtleUxhc3RSb2JiZXJ5VGltZUJ5RHVjawEFC2R1Y2tBc3NldElkAAAEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEB3JvYkNvc3QJAJYDAQkAzAgCBQ5yb2JiZXJ5Q29zdE1pbgkAzAgCCQBlAgULbGFzdFJvYkNvc3QJAGgCBRRyb2JiZXJ5Q29vbGRvd25Db2VmZgkAZQIFA25vdwULbGFzdFJvYlRpbWUFA25pbAQJZHVja1N0YXRlCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBE2tleUR1Y2tSb2JiZXJ5U3RhdGUBBQtkdWNrQXNzZXRJZAAABApsb2NrZWRMYW5kCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBE2tleUxvY2tlZExhbmRCeUR1Y2sBBQtkdWNrQXNzZXRJZAIABAdsYW5kRVRBCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBEmtleUxhbmRDb29sZG93bkVUQQEFCmxvY2tlZExhbmQAAAkAlwoFBQdyb2JDb3N0BQtsYXN0Um9iVGltZQUJZHVja1N0YXRlBQpsb2NrZWRMYW5kBQdsYW5kRVRBAApMQU5EUFJFRklYAgRMQU5EAApEVUNLUFJFRklYAgREVUNLAApBUlRQUkVTQUxFAgdQUkVTQUxFAAZOVU1SRVMABgAYTUFYX0xBTkRTX1NUQUtFRF9CWV9VU0VSABkAD0RBSUxZUkVTQllQSUVDRQCA+NIBAAxXSE1VTFRJUExJRVIAgMivoCUAD0RFRkFVTFRMT0NBVElPTgIPQWZyaWNhX0ZfQWZyaWNhABBSRVNPVVJDRVBSSUNFTUlOANW1AgAKRVNTRUxMQ09FRgAKABVNSU5fVVNEVF9GRUVfREVMSVZFUlkA0IYDAAlwcm9kVHlwZXMJAMwIAgIQRmlyc3QgQWlkIEtpdCBMMQkAzAgCAhBGaXJzdCBBaWQgS2l0IEwyCQDMCAICEEZpcnN0IEFpZCBLaXQgTDMJAMwIAgILQmFja3BhY2sgTDEJAMwIAgILQmFja3BhY2sgTDIJAMwIAgILQmFja3BhY2sgTDMJAMwIAgIORm9vZCBSYXRpb24gTDEJAMwIAgIORm9vZCBSYXRpb24gTDIJAMwIAgIORm9vZCBSYXRpb24gTDMJAMwIAgILSmV0IFBhY2sgTDEJAMwIAgILSmV0IFBhY2sgTDIJAMwIAgILSmV0IFBhY2sgTDMJAMwIAgIJU2hpZWxkIEwxCQDMCAICCVNoaWVsZCBMMgkAzAgCAglTaGllbGQgTDMJAMwIAgIHTWluZSBMMQkAzAgCAgdNaW5lIEwyCQDMCAICB01pbmUgTDMJAMwIAgIHVHJhcCBMMQkAzAgCAgdUcmFwIEwyCQDMCAICB1RyYXAgTDMFA25pbAAKY29udGluZW50cwkAzAgCAghBbWVyaWNhcwkAzAgCAgZFdXJvcGUJAMwIAgIEQXNpYQkAzAgCAgZBZnJpY2EJAMwIAgIHT2NlYW5pYQUDbmlsAAlDT0VGRjJNQVQAgK3iBAAQZm9ydEFsbG93ZWRQcm9kcwkAzAgCAA8JAMwIAgAQCQDMCAIAEQkAzAgCABIJAMwIAgATCQDMCAIAFAUDbmlsABBwcm9kdWN0aW9uTWF0cml4CQDMCAICJThfOF84XzE3XzE3XzQyXzEyXzBfMzBfMCwwLDAsMCwwLDAsMF8JAMwIAgIlOF84XzhfMTdfMTdfNDJfMjRfMF82MF8wLDAsNSwyLDAsMCwwXwkAzAgCAic4XzhfOF8xN18xN180Ml8zNl8wXzEyMF8wLDAsMTAsNCwwLDAsMF8JAMwIAgIpOF8xOV8xOV84XzI3XzE5XzI2XzFfMjBfMCwwLDAsMCwwLDAsMF8wMDEJAMwIAgIpOF8xOV8xOV84XzI3XzE5XzUyXzFfNDBfMCwwLDAsMCwwLDAsMF8wMDEJAMwIAgIpOF8xOV8xOV84XzI3XzE5Xzc4XzFfODBfMCwwLDAsMCwwLDAsMF8wMDEJAMwIAgIlOF84XzhfOF84XzYwXzEzXzJfMl8wLDAsMCwwLDAsMCwwXzAxMQkAzAgCAiU4XzhfOF84XzhfNjBfMjZfMl80XzAsMCwwLDAsMCwwLDBfMDExCQDMCAICJThfOF84XzhfOF82MF8zOV8yXzhfMCwwLDAsMCwwLDAsMF8wMTEJAMwIAgIpMzBfMzBfM18xN18xN18zXzMwXzNfMzBfMCwwLDAsMCwwLDAsMF8xMTEJAMwIAgIpMzBfMzBfM18xN18xN18zXzYwXzNfNTBfMCwwLDAsMCwwLDAsMF8xMTEJAMwIAgIpMzBfMzBfM18xN18xN18zXzkwXzNfNzBfMCwwLDAsMCwwLDAsMF8xMTEJAMwIAgIrMThfMThfMTBfMThfMThfMThfMTFfNF8xMF8wLDAsMCwwLDAsMCwwXzIwMQkAzAgCAisxOF8xOF8xMF8xOF8xOF8xOF8yMl80XzIwXzAsMCwwLDAsMCwwLDBfMjAxCQDMCAICKzE4XzE4XzEwXzE4XzE4XzE4XzMzXzRfMzBfMCwwLDAsMCwwLDAsMF8yMDEJAMwIAgIqNF8xM18yMl80XzM1XzIyXzIzXzBfNTAsMSwwXzAsMCwwLDAsMCwwLDBfCQDMCAICKjRfMTNfMjJfNF8zNV8yMl80Nl8wXzUwLDEsMV8wLDIsNSwwLDAsMCwwXwkAzAgCAis0XzEzXzIyXzRfMzVfMjJfNjlfMF81MCwyLDFfMCw1LDEwLDAsMCwwLDBfCQDMCAICKjVfMjVfNDBfNV8xMF8xNV8yMF8xXzMwLDEsMV8wLDAsMCwwLDAsMCwwXwkAzAgCAio1XzI1XzQwXzVfMTBfMTVfNDBfMV8zMCwxLDJfMiwxLDMsMCwwLDAsMF8JAMwIAgIqNV8yNV80MF81XzEwXzE1XzYwXzFfMzAsMSwzXzUsMiw4LDAsMCwwLDBfBQNuaWwACXJJZHhDb2VmZgAGAApySWR4RWZmZWN0AAgAEHJJZHhSZXF1aXJlbWVudHMACQAJcklkeFNsb3RzAAoADlBST0RVQ1RQS0dTSVpFAAoAC3doSWR4TGV2ZWxzAAAACHdoSWR4UmVzAAEACHdoSWR4TWF0AAIACXdoSWR4UHJvZAADAAl3aElkeExPRlQABAAJdm9sTG9ja2VkAAAAC3ZvbE9jY3VwaWVkAAEAB3ZvbEZyZWUAAgAIdm9sVG90YWwAAwAKYnBJZHhMZXZlbAAAAAhicElkeFJlcwABAAhicElkeE1hdAACAAlicElkeFByb2QAAwAPbG9jSWR4Q29udGluZW50AAAACmxvY0lkeFR5cGUAAQAIbG9jSWR4SWQAAgEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICA25vXwUHYXNzZXRJZAEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBB2Fzc2V0SWQJAKwCAgIFbGNuYV8FB2Fzc2V0SWQBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgIDc3RfBQdhc3NldElkASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIEdHlwZQdhc3NldElkCQC5CQIJAMwIAgIDbGFzCQDMCAIFBHR5cGUJAMwIAgUHYXNzZXRJZAUDbmlsAgFfASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwduZnRUeXBlB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIGc3R0YW9fBQduZnRUeXBlAgFfBQdhc3NldElkAgFfBQlvd25lckFkZHIBEmtleVdhcmVob3VzZUJ5TGFuZAELbGFuZEFzc2V0SWQJAKwCAgIDd2hfBQtsYW5kQXNzZXRJZAEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAgtpbmZyYUxldmVsXwUHYXNzZXRJZAEXa2V5Rm9ydGlmaWNhdGlvbnNCeUxhbmQBC2xhbmRBc3NldElkCQCsAgICD2ZvcnRpZmljYXRpb25zXwULbGFuZEFzc2V0SWQBGmtleUR1Y2tBc3NldElkVG9DdXN0b21OYW1lAQdhc3NldElkCQCsAgICGGR1Y2tDdXN0b21OYW1lQnlBc3NldElkXwUHYXNzZXRJZAEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEEYWRkcgkArAICAhhhY2NvdW50Q3VzdG9tTmFtZUJ5QWRkcl8FBGFkZHIBD2tleUFkZHJlc3NSZWZCeQEEYWRkcgkArAICAglhY2NSZWZCeV8FBGFkZHIBHGtleU9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2sBC2R1Y2tBc3NldElkCQCsAgICGm9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2tfBQtkdWNrQXNzZXRJZAEca2V5T25ib2FyZEFydER1Y2tBY3RpdmF0ZWRCeQEEYWRkcgkArAICAhpvbmJvYXJkQXJ0QWN0aXZhdGVkRHVja0J5XwUEYWRkcgETa2V5QWRkcmVzc1JlZmVycmFscwEEYWRkcgkArAICAg1hY2NSZWZlcnJhbHNfBQRhZGRyARBrZXlEdWNrSWRUb093bmVyAQdhc3NldElkCQCsAgICCmR1Y2tPd25lcl8FB2Fzc2V0SWQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBEWtleUJhY2twYWNrQnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAgliYWNrUGFja18FC2R1Y2tBc3NldElkAQ9rZXlEdWNrTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDWR1Y2tMb2NhdGlvbl8FC2R1Y2tBc3NldElkARVrZXlVc2VyR3dsUmVsZWFzZVRpbWUBCHVzZXJBZGRyCQCsAgICGiVzJXNfX3VzZXJHd2xSZWxlYXNlVGltZV9fBQh1c2VyQWRkcgEOa2V5RXNXYXJlaG91c2UAAhplbWVyZ2VuY3lXYXJlaG91c2VQcm9kdWN0cwAPZGVsaXZlcnlGdW5kS2V5AgxkZWxpdmVyeUZ1bmQAEWRlbGl2ZXJ5TG9ja2VkS2V5Ag5kZWxpdmVyeUxvY2tlZAANbGFzdFRvdXJJZEtleQIOJXNfX2xhc3RUb3VySWQBFWtleVRvdXJTdGF0aWNEYXRhQnlJZAEDdElkCQCsAgICFiVzJWRfX3RvdXJTdGF0aWNEYXRhX18JAKQDAQUDdElkARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQN0SWQJAKwCAgIXJXMlZF9fdG91ckR5bmFtaWNEYXRhX18JAKQDAQUDdElkARprZXlCZXN0UmVzdWx0QnlUb3VyQW5kRHVjawIDdElkC2R1Y2tBc3NldElkCQC5CQIJAMwIAgIfJXMlZCVzX19iZXN0UmVzdWx0QnlUb3VyQW5kRHVjawkAzAgCCQCkAwEFA3RJZAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAgJfXwAJaWR4U3RhdGljAAAACmlkeER5bmFtaWMAAQAKdFN0YXRpY0VuZAAGAA50RHluYW1pY1N0YXR1cwABAQtnZXRUb3VyRGF0YQIMdG91ckNvbnRyYWN0A3RJZAQGc3RhdGljCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBBQN0SWQJAKwCAgkArAICAhlFcnJvciByZWFkaW5nIHRvdXJuYW1lbnQgCQCkAwEFA3RJZAIFIGRhdGECAl9fBAdkeW5hbWljCQC8CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQN0SWQCBSBkYXRhAgJfXwkAzAgCBQZzdGF0aWMJAMwIAgUHZHluYW1pYwUDbmlsAQ5pc0luVG91cm5hbWVudAIMdG91ckNvbnRyYWN0CGxvY2F0aW9uBAZsYXN0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUMdG91ckNvbnRyYWN0BQ1sYXN0VG91cklkS2V5AAAEA2xvYwkAtQkCBQhsb2NhdGlvbgIBXwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFDHRvdXJDb250cmFjdAUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwMDAwkAAAIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFUCQAAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2xvYwUPbG9jSWR4Q29udGluZW50BQZsYXN0SWQHCQAAAgkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwIKSU5QUk9HUkVTUwcJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQNub3cHARJnZXRSZWNpcGVNYXRlcmlhbHMBBnJlY2lwZQkAaAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZyZWNpcGUFCXJJZHhDb2VmZgUJQ09FRkYyTUFUABZLU19TRVBBUkFURV9QVUJMSUNfS0VZBwAYS1NfQUxMT1dfQklHX0lORlJBX01FUkdFBwARS1NfQUxMT1dfREVMSVZFUlkGAAVjaGFpbgkAyQECCQDKAQIIBQR0aGlzBWJ5dGVzAAEAAQALdXNkdEFzc2V0SWQEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDABIITaerIIAz9O0bvKju6Lk7zJgt0LXfoHlqjUI/moD/+5AwkAAAIBAVQFByRtYXRjaDABIFWx2J9yh4Lv5eNbjawFq2XemkOhLxa7BfMat4el8cUYCQACAQINVW5rbm93biBjaGFpbgAVZGVmYXVsdFJlc3RBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUFFDdXZGYnZoNExrUFVucm5VMXozam5iQTFwOW0zV05odgMJAAACAQFUBQckbWF0Y2gwAiMzTXVta0dHenRDS0FYcFdEcXhrZGRvZnFYU1VicVFrdlNKeQkAAgECDVVua25vd24gY2hhaW4AEUluZnJhVXBncmFkZUNvc3RTBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAIDIr6AlAwkAAAIBAVQFByRtYXRjaDAAgMLXLwkAAgECDVVua25vd24gY2hhaW4ADmFyYml0cmFnZURlbGF5BAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAIC4mSkDCQAAAgEBVAUHJG1hdGNoMADg1AMJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8ABVNTSVpFABkABU1TSVpFAGQABUxTSVpFAOEBAAZYTFNJWkUAkAMAB1hYTFNJWkUA8QQABUlURVI2CQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwBD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACABRJZHhDZmdHb3Zlcm5hbmNlRGFwcAADAA1JZHhDZmdXbGdEYXBwAAQAFElkeENmZ1RvdXJuYW1lbnREYXBwAAcAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALZ292Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRRJZHhDZmdHb3Zlcm5hbmNlRGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwABJ0b3VybmFtZW50Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRRJZHhDZmdUb3VybmFtZW50RGFwcAANYWNyZXNDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFD0lkeENmZ0FjcmVzRGFwcAAKcmVjTGFuZE51bQAAAAtyZWNMYW5kU2l6ZQABAAtyZWNUZXJyYWlucwACAAxyZWNDb250aW5lbnQAAwANd2xnQXNzZXRJZEtleQILd2xnX2Fzc2V0SWQACndsZ0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQt3bGdDb250cmFjdAUNd2xnQXNzZXRJZEtleQIYV0xHT0xEIGlzIG5vdCBpc3N1ZWQgeWV0AA9hY3Jlc0Fzc2V0SWRLZXkCDGFjcmVzQXNzZXRJZAAMYWNyZXNBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJwIAgUNYWNyZXNDb250cmFjdAUPYWNyZXNBc3NldElkS2V5AhdBQ1JFUyBpcyBub3QgaXNzdWVkIHlldAALcmFuZG9tRGVsYXkAAgEJa2V5Q29tbWl0AQdhZGRyZXNzCQCsAgICE2ZpbmlzaEJsb2NrRm9yQWRkcl8FB2FkZHJlc3MBEWtleVJlc1Byb3BvcnRpb25zAAITcmVzVHlwZXNQcm9wb3J0aW9ucwEWa2V5UmVzVHlwZXNCeUNvbnRpbmVudAEJY29udGluZW50CQCsAgICFHJlc1R5cGVzQnlDb250aW5lbnRfBQljb250aW5lbnQBFWtleVN0YWtlZExhbmRzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICE3N0YWtlZExhbmRzQnlPd25lcl8FCW93bmVyQWRkcgEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICFHN0YWtlZFBpZWNlc0J5T3duZXJfBQlvd25lckFkZHIBCGFzU3RyaW5nAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQlhc0Jvb2xlYW4BAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBcwUHJG1hdGNoMAUBcwkAAgECGWZhaWwgdG8gY2FzdCBpbnRvIEJvb2xlYW4BD251bVBpZWNlc0J5U2l6ZQEIbGFuZFNpemUEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAFBVNTSVpFAwkAAAICAU0FByRtYXRjaDAFBU1TSVpFAwkAAAICAUwFByRtYXRjaDAFBUxTSVpFAwkAAAICAlhMBQckbWF0Y2gwBQZYTFNJWkUDCQAAAgIDWFhMBQckbWF0Y2gwBQdYWExTSVpFCQACAQIRVW5rbm93biBsYW5kIHNpemUBB2lzRGlnaXQBAXMJAQlpc0RlZmluZWQBCQC2CQEFAXMBCmtleUJsb2NrZWQAAhBjb250cmFjdHNCbG9ja2VkARFrZXlMYXN0VHhJZEJ5VXNlcgEEYWRkcgkArAICAg9sYXN0VHhJZEJ5VXNlcl8FBGFkZHIBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0AQ9nZXRSYW5kb21OdW1iZXIDCG1heFZhbHVlDGZpbmlzaEhlaWdodAphdXhFbnRyb3B5BA9yYW5kb21TZWVkQmxvY2sJAQV2YWx1ZQEJAO0HAQUMZmluaXNoSGVpZ2h0BApyYW5kb21IYXNoCQD3AwEJAMsBAgkBBXZhbHVlAQgFD3JhbmRvbVNlZWRCbG9jawN2cmYFCmF1eEVudHJvcHkJAGoCCQCxCQEFCnJhbmRvbUhhc2gFCG1heFZhbHVlAA1pbmN1YmF0b3JBZGRyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUEVrdFZ1eDJSaGNoU042M0RzRG80YjRtejRRcXpLU2VEdgMJAAACAQFUBQckbWF0Y2gwBQR0aGlzCQACAQINVW5rbm93biBjaGFpbgALYnJlZWRlckFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQRFZ1VTQ1SDdFaDVkbXROYm5STlJTdEd3VUxBN05ZNkhiAwkAAAIBAVQFByRtYXRjaDAFBHRoaXMJAAIBAg1Vbmtub3duIGNoYWluAANwdWIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDADBRZLU19TRVBBUkFURV9QVUJMSUNfS0VZASCrF1ePFWfjWVRBsNZy62abxKPTZl7VmYZQ35g3H7IJCAEgT1PiGj9UqNadUk4THUYnVb2zU/Mse8lUVLD/Q8G0FCgDCQAAAgEBVAUHJG1hdGNoMAEgT1PiGj9UqNadUk4THUYnVb2zU/Mse8lUVLD/Q8G0FCgJAAIBAg1Vbmtub3duIGNoYWluAAxFTVBUWV9QUk9ENTABkAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABFGSVZFTUlOVVRFU01JTExJUwDgpxIAElRFTl9NSU5VVEVTX01JTExJUwDAzyQADFJFTkFNSU5HQ09TVADAlrECAApNQVhOQU1FTEVOADIAFUluZnJhVXBncmFkZUNvc3RTVXNkdACAreIEAAxFWFBNQVRFUklBTFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAApt2C7asHAwkAAAIBAVQFByRtYXRjaDAAqqeBswkJAAIBAg1Vbmtub3duIGNoYWluAAdFWFBVU0RUBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAIDlmncDCQAAAgEBVAUHJG1hdGNoMACA5Zp3CQACAQINVW5rbm93biBjaGFpbgAMU19DT1NUX0FDUkVTAIDyi6gJAAVGSVZFWAkAtgIBAAUAB1RXRU5UWVgJALYCAQAUAAhUV0VOVFkyWAkAtgIBCQBoAgAUABQACFRXRU5UWTNYCQC2AgEJAGgCCQBoAgAUABQAFAAIVFdFTlRZNFgJALYCAQkAaAIJAGgCCQBoAgAUABQAFAAUAAhUV0VOVFk1WAkAtgIBCQBoAgkAaAIJAGgCCQBoAgAUABQAFAAUABQAD1BSRVNBTEVOVU1MQU5EUwD0AwESa2V5TmV4dEZyZWVMYW5kTnVtAAILbmV4dExhbmROdW0BGmtleUxhbmRDdXN0b21OYW1lVG9Bc3NldElkAQRuYW1lCQCsAgICBGxjbl8FBG5hbWUBEGtleUxhbmRUb0Fzc2V0SWQBB2xhbmROdW0JAKwCAgIDbGFfBQdsYW5kTnVtAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICAgVpbGFvXwUHYXNzZXRJZAIBXwUJb3duZXJBZGRyARFrZXlMYW5kTnVtVG9Pd25lcgEHbGFuZE51bQkArAICAgNsb18FB2xhbmROdW0BGmtleUR1Y2tDdXN0b21OYW1lVG9Bc3NldElkAQRuYW1lCQCsAgICEWR1Y2tCeUN1c3RvbU5hbWVfBQRuYW1lARZrZXlDdXN0b21OYW1lVG9BZGRyZXNzAQRuYW1lCQCsAgICFGFjY291bnRCeUN1c3RvbU5hbWVfBQRuYW1lAQlrZXlPbGRpZXMAAgpvbGRpZXNMaXN0AAtjbGFpbU1vZGVXaAAAAA1jbGFpbU1vZGVEdWNrAAEAE2NsYWltTW9kZVdoVGhlbkR1Y2sAAgAIZmxIZWFsdGgAAAALZmxUaW1lc3RhbXAABQAHZmxCb251cwAGAAtmbFByb2RzVXNlZAAHAQduZnROYW1lAgdsYW5kTnVtCGxhbmRTaXplCQCsAgIJAKwCAgUKTEFORFBSRUZJWAUHbGFuZE51bQUIbGFuZFNpemUBCHRvVm9sdW1lAgZhbW91bnQHcGtnU2l6ZQQEcGtncwMJAGcCBQZhbW91bnQAAAkAaQIJAGUCCQBkAgUGYW1vdW50BQdwa2dTaXplAAEFB3BrZ1NpemUJAQEtAQkAaQIJAGUCCQBkAgkBAS0BBQZhbW91bnQFB3BrZ1NpemUAAQUHcGtnU2l6ZQkAaAIFBHBrZ3MFBU1VTFQ4ARNkaXN0cmlidXRlQnlXZWlnaHRzAgV0b3RhbAd3ZWlnaHRzBANzdW0JAGQCCQBkAgkAZAIJAGQCCQBkAgkAkQMCBQd3ZWlnaHRzAAAJAJEDAgUHd2VpZ2h0cwABCQCRAwIFB3dlaWdodHMAAgkAkQMCBQd3ZWlnaHRzAAMJAJEDAgUHd2VpZ2h0cwAECQCRAwIFB3dlaWdodHMABQMJAGcCAAAFA3N1bQkAAgECEFplcm8gd2VpZ2h0cyBzdW0EBW5vcm02CQBrAwUFdG90YWwFBU1VTFQ2BQNzdW0KAQpub3JtYWxpemVyAgNhY2MEZWxlbQkAzQgCBQNhY2MJAGsDBQRlbGVtBQVub3JtNgUFTVVMVDYKAAIkbAUHd2VpZ2h0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKbm9ybWFsaXplcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgESZ2V0TmVlZGVkTWF0ZXJpYWxzAQV0b3RhbAQFcHJvcHMJALUJAgkBBXZhbHVlAQkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgFfAwkBAiE9AgkAkAMBBQVwcm9wcwUGTlVNUkVTCQACAQIWV3JvbmcgcHJvcG9ydGlvbnMgZGF0YQQBcgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAwkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABQUDbmlsCQETZGlzdHJpYnV0ZUJ5V2VpZ2h0cwIFBXRvdGFsBQFyARFzdWJ0cmFjdE1hdGVyaWFscwMMc2hvdWxkVXNlTWF0A2hhcwl0b3RhbE5lZWQEBG5lZWQJARJnZXROZWVkZWRNYXRlcmlhbHMBBQl0b3RhbE5lZWQKAQpzdWJ0cmFjdG9yAgNhY2MDaWR4BAZyZXN1bHQJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDaGFzBQNpZHgJAJEDAgUEbmVlZAUDaWR4AwkAZgIAAAUGcmVzdWx0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICGE5vdCBlbm91Z2ggbWF0ZXJpYWwgaWR4PQkApAMBBQNpZHgCCywgeW91IGhhdmUgCQCRAwIFA2hhcwUDaWR4AgssIGJ1dCBuZWVkIAkApAMBCQCRAwIFBG5lZWQFA2lkeAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0AwUMc2hvdWxkVXNlTWF0CgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpzdWJ0cmFjdG9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBQNoYXMBEXN1YnRyYWN0RXF1aXBtZW50AgVvbGRFcQVwVXNlZAMJAAACBQVwVXNlZAIACQCUCgIFBW9sZEVxBwoBB3N1YlVzZWQCA2FjYwZpZHhBbXQEBXBhcnRzCQC1CQIFBmlkeEFtdAIBLAMJAQIhPQIJAJADAQUFcGFydHMAAgkAAgECKEluY29ycmVjdCBmb3JtYXQsIHNob3VsZCBiZSBpbmRleCxhbW91bnQEA2lkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAADAwkAZgIAAAUDaWR4BgkAZwIFA2lkeAkAkAMBBRBwcm9kdWN0aW9uTWF0cml4CQACAQITVW5rbm93biBwcm9kdWN0IGlkeAQDYW10CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQQHZXFQYXJ0cwkAtQkCCAUDYWNjAl8xCQCsAgIJAJEDAgUFcGFydHMAAAIBOgMJAQIhPQIJAJADAQUHZXFQYXJ0cwACCQACAQkArAICCQCsAgICD1lvdSBkb24ndCBoYXZlIAkAkQMCBQlwcm9kVHlwZXMFA2lkeAIJIGVxdWlwcGVkBAN0bXAJAJEDAgUHZXFQYXJ0cwABBAZudW1MZW4DCQEHaXNEaWdpdAEJAK8CAgkAsAICBQN0bXAAAQABAAIAAQQEY3VycgkBDXBhcnNlSW50VmFsdWUBCQCvAgIFA3RtcAUGbnVtTGVuBAR0YWlsCQCwAgIFA3RtcAUGbnVtTGVuBAZuZXdBbXQDCQBnAgUEY3VycgUDYW10CQBlAgUEY3VycgUDYW10CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICDVlvdSBlcXVpcHBlZCAJAKQDAQUEY3VycgIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFA2lkeAITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQNhbXQJAJQKAgkArAICCQCsAgIJAKwCAgkArAICCQCRAwIFB2VxUGFydHMAAAkAkQMCBQVwYXJ0cwAAAgE6CQCkAwEFBm5ld0FtdAUEdGFpbAMIBQNhY2MCXzIGAwMJAGcCBQNpZHgABgkAZwIACAUDaWR4BwkAAAIFBm5ld0FtdAAABwoAAiRsCQC1CQIFBXBVc2VkAgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQVvbGRFcQcKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3N1YlVzZWQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBDnByb2RTdHJUb0J5dGVzAQdwcm9kU3RyBAVwTGlzdAMJAAACBQdwcm9kU3RyAgAFA25pbAkAvAkCBQdwcm9kU3RyAgFfCgEEdG9CVgIDYWNjBnJlY2lwZQQBagkAaQIJAMgBAQUDYWNjAAgEBGN1cnIDCQBmAgkAkAMBBQVwTGlzdAUBagkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBMaXN0BQFqAAAJAMsBAgUDYWNjCQCaAwEFBGN1cnIKAAIkbAUQcHJvZHVjdGlvbk1hdHJpeAoAAiRzCQCQAwEFAiRsCgAFJGFjYzABAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEdG9CVgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyAQ5ieXRlc1RvUHJvZFN0cgECYnYKAQZmcm9tQlYCA2FjYwZyZWNpcGUEAWoJAJADAQUDYWNjBAFiCQDJAQIJAMoBAgUCYnYJAGgCAAgFAWoACAkAzQgCBQNhY2MJAKQDAQkAsQkBBQFiCQC6CQIKAAIkbAUQcHJvZHVjdGlvbk1hdHJpeAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGZnJvbUJWAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADICAV8BFWNoZWNrU3RhdFJlcXVpcmVtZW50cwIJZHVja1N0YXRzBHJlcXMKAQVjaGVjawIDYWNjAWoEBGJ1ZmYDCQBmAgkAkAMBBQlkdWNrU3RhdHMJAGQCAAcFAWoJAJEDAgUJZHVja1N0YXRzCQBkAgAHBQFqAAADCQBmAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBHJlcXMFAWoJAGQCCQCRAwIFCWR1Y2tTdGF0cwUBagUEYnVmZgkAAgEJAKwCAgIbUmVxdWlyZW1lbnQgbm90IHNhdGlzZmllZDogCQCRAwIFDHJlcXVpcmVtZW50cwUBagYKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAHCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVjaGVjawIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAQpwbGFjZVByb2RCBgZpZHhDbnQFcExpc3QKaXNQb3NpdGl2ZQlkdWNrU3RhdHMIb2NjdXBpZWQEZnJlZQQFcGFydHMJALUJAgUGaWR4Q250AgE6AwkBAiE9AgkAkAMBBQVwYXJ0cwACCQACAQIoSW5jb3JyZWN0IGZvcm1hdCwgc2hvdWxkIGJlIGluZGV4OmFtb3VudAMDCQEBIQEFCmlzUG9zaXRpdmUJAQIhPQIJALECAQkAkQMCBQVwYXJ0cwAAAAIHCQACAQIrUHJvZHVjdCBpZHggc2hvdWxkIGJlIDIgZGlnaXRzLCB6ZXJvIHBhZGRlZAQKcHJvZHVjdElkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAAEBWNvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFEGZvcnRBbGxvd2VkUHJvZHMFCnByb2R1Y3RJZHgJAAIBCQCsAgIJAKwCAgIJUHJvZHVjdCAnCQCRAwIFCXByb2RUeXBlcwUKcHJvZHVjdElkeAIhJyBjYW5ub3QgYmUgdXNlZCBmb3IgbGFuZCBkZWZlbnNlAwkAZgIAAAUFY291bnQJAAIBAhdDb3VudCBjYW4ndCBiZSBuZWdhdGl2ZQMJAGYCBQVjb3VudAUNTUFYUFJPRElOU0xPVAkAAgEJAKwCAgkArAICCQCsAgICFENhbid0IHB1dCBtb3JlIHRoYW4gCQCkAwEFDU1BWFBST0RJTlNMT1QCBCBvZiAJAJEDAgUJcHJvZFR5cGVzBQpwcm9kdWN0SWR4AwkAAAIFBWNvdW50AAAJAJUKAwUFcExpc3QFCG9jY3VwaWVkBQRmcmVlBARoZWFkCQDJAQIFBXBMaXN0CQBoAgAIBQpwcm9kdWN0SWR4BARjdXJyCQCxCQEJAMkBAgkAygECBQVwTGlzdAkAaAIACAUKcHJvZHVjdElkeAAIBAR0YWlsCQDKAQIFBXBMaXN0CQBoAgAICQBkAgUKcHJvZHVjdElkeAABBAZyZWNpcGUJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4BQpwcm9kdWN0SWR4AgFfAwMJAQEhAQUKaXNQb3NpdGl2ZQkAZgIFBWNvdW50BQRjdXJyBwkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAglZb3UgaGF2ZSAJAKQDAQUEY3VycgIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFCnByb2R1Y3RJZHgCEywgYnV0IHRyaWVkIHRvIHVzZSAJAKQDAQUFY291bnQEBm5ld0FtdAMDCQEBIQEFCmlzUG9zaXRpdmUJARVjaGVja1N0YXRSZXF1aXJlbWVudHMCBQlkdWNrU3RhdHMJALUJAgkAkQMCBQZyZWNpcGUFEHJJZHhSZXF1aXJlbWVudHMCASwHCQBlAgUEY3VycgUFY291bnQJAGQCBQRjdXJyBQVjb3VudAQIZGVsdGFWb2wJAGUCCQEIdG9Wb2x1bWUCBQZuZXdBbXQFDlBST0RVQ1RQS0dTSVpFCQEIdG9Wb2x1bWUCBQRjdXJyBQ5QUk9EVUNUUEtHU0laRQkAlQoDCQDLAQIJAMsBAgUEaGVhZAkAmgMBBQZuZXdBbXQFBHRhaWwJAGQCBQhvY2N1cGllZAUIZGVsdGFWb2wJAGUCBQRmcmVlBQhkZWx0YVZvbAEIYWRkUHJvZEIHBmlkeENudAVwTGlzdAppc1Bvc2l0aXZlB3NlZ21lbnQHbWFpbkF1eARzbG90CWR1Y2tTdGF0cwQFcGFydHMJALUJAgUGaWR4Q250AgE6AwkBAiE9AgkAkAMBBQVwYXJ0cwACCQACAQIoSW5jb3JyZWN0IGZvcm1hdCwgc2hvdWxkIGJlIGluZGV4OmFtb3VudAMDCQEBIQEFCmlzUG9zaXRpdmUJAQIhPQIJALECAQkAkQMCBQVwYXJ0cwAAAAIHCQACAQIrUHJvZHVjdCBpZHggc2hvdWxkIGJlIDIgZGlnaXRzLCB6ZXJvIHBhZGRlZAQKcHJvZHVjdElkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAAEBWNvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQMDCQBmAgAABQpwcm9kdWN0SWR4BgkAZwIFCnByb2R1Y3RJZHgJAJADAQUQcHJvZHVjdGlvbk1hdHJpeAkAAgECE1Vua25vd24gcHJvZHVjdCBpZHgDCQBmAgAABQVjb3VudAkAAgECF0NvdW50IGNhbid0IGJlIG5lZ2F0aXZlAwkAZgIFBWNvdW50BQ1NQVhQUk9ESU5TTE9UCQACAQkArAICCQCsAgIJAKwCAgIUQ2FuJ3QgcHV0IG1vcmUgdGhhbiAJAKQDAQUNTUFYUFJPRElOU0xPVAIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFCnByb2R1Y3RJZHgDCQAAAgUFY291bnQAAAkAlAoCBQVwTGlzdAcEBGhlYWQJAMkBAgUFcExpc3QJAGgCAAgFCnByb2R1Y3RJZHgEBGN1cnIJALEJAQkAyQECCQDKAQIFBXBMaXN0CQBoAgAIBQpwcm9kdWN0SWR4AAgEBHRhaWwJAMoBAgUFcExpc3QJAGgCAAgJAGQCBQpwcm9kdWN0SWR4AAEEBnJlY2lwZQkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgFCnByb2R1Y3RJZHgCAV8DAwkBASEBBQppc1Bvc2l0aXZlCQBmAgUFY291bnQFBGN1cnIHCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICCVlvdSBoYXZlIAkApAMBBQRjdXJyAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUKcHJvZHVjdElkeAITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQVjb3VudAQJaXNCaWdJdGVtAwMJAQEhAQUKaXNQb3NpdGl2ZQkBFWNoZWNrU3RhdFJlcXVpcmVtZW50cwIFCWR1Y2tTdGF0cwkAtQkCCQCRAwIFBnJlY2lwZQUQcklkeFJlcXVpcmVtZW50cwIBLAcEBmNvbXBhdAkAkQMCBQZyZWNpcGUFCXJJZHhTbG90cwMJAAACBQZjb21wYXQCAAkAAgECF0l0ZW0gY2Fubm90IGJlIGVxdWlwcGVkBAFjCQENcGFyc2VJbnRWYWx1ZQEFBmNvbXBhdAQEY1NlZwkAaQIFAWMAZAMJAQIhPQIFB3NlZ21lbnQFBGNTZWcJAAIBAhRTZWdtZW50IGluY29tcGF0aWJsZQQIY01haW5BdXgJAGkCCQBqAgUBYwBkAAoDCQECIT0CBQdtYWluQXV4BQhjTWFpbkF1eAkAAgECEVNsb3QgaW5jb21wYXRpYmxlBAljTnVtU2xvdHMJAGoCBQFjAAoDAwkBAiE9AgUEc2xvdAAACQBmAgUJY051bVNsb3RzAAEHCQACAQIeQmlnIGl0ZW1zIHNob3VsZCBvY2N1cHkgc2xvdCAwCQBmAgUJY051bVNsb3RzAAEHCQCUCgIJAMsBAgkAywECBQRoZWFkCQCaAwEJAGQCBQRjdXJyAwUKaXNQb3NpdGl2ZQUFY291bnQJAQEtAQUFY291bnQFBHRhaWwFCWlzQmlnSXRlbQELc2xvdHNHcm91cEIGAWcEYnBJbgppc1Bvc2l0aXZlB3NlZ21lbnQHbWFpbkF1eAVzdGF0cwMJAQIhPQIFAWcCAAQFc2xvdHMJALUJAgUBZwIBLAMJAGYCCQCQAwEFBXNsb3RzBQhNQVhTTE9UUwkAAgECEldyb25nIHNsb3RzIGZvcm1hdAQCczAJAJEDAgUFc2xvdHMAAAQCczEDCQBmAgkAkAMBBQVzbG90cwABCQCRAwIFBXNsb3RzAAECAAMDCQAAAgUCczACAAkAAAIFAnMxAgAHBQRicEluBAV0bXBTMAMJAQIhPQIFAnMwAgAJAQhhZGRQcm9kQgcFAnMwBQRicEluBQppc1Bvc2l0aXZlBQdzZWdtZW50BQdtYWluQXV4AAAFBXN0YXRzCQCUCgIFBGJwSW4HAwkBAiE9AgUCczECAAMIBQV0bXBTMAJfMgkAAgECHkJpZyBpdGVtIGFscmVhZHkgb2NjdXBpZXMgc2xvdAgJAQhhZGRQcm9kQgcFAnMxCAUFdG1wUzACXzEFCmlzUG9zaXRpdmUFB3NlZ21lbnQFB21haW5BdXgAAQUFc3RhdHMCXzEIBQV0bXBTMAJfMQUEYnBJbgEGZHJlc3NCBAdzZWdMaXN0BnBCeXRlcwppc1Bvc2l0aXZlBXN0YXRzCgEHc2VnbWVudAIDYWNjA3NlZwQBaggFA2FjYwJfMQQHbWFpbkF1eAkAtQkCBQNzZWcCATsDCQECIT0CCQCQAwEFB21haW5BdXgFCk5VTU1BSU5BVVgJAAIBAhRXcm9uZyBzZWdtZW50IGZvcm1hdAQBbQkAkQMCBQdtYWluQXV4AAAEAWEJAJEDAgUHbWFpbkF1eAABAwMJAAACBQFtAgAJAAACBQFhAgAHCQCUCgIJAGQCBQFqAAEIBQNhY2MCXzIEBHRtcE0JAQtzbG90c0dyb3VwQgYFAW0IBQNhY2MCXzIFCmlzUG9zaXRpdmUFAWoAAAUFc3RhdHMJAJQKAgkAZAIFAWoAAQkBC3Nsb3RzR3JvdXBCBgUBYQUEdG1wTQUKaXNQb3NpdGl2ZQUBagABBQVzdGF0cwgKAAIkbAUHc2VnTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAABQZwQnl0ZXMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3NlZ21lbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYCXzIBBWZvcnRCBgdzZWdMaXN0BnBCeXRlcwhvY2N1cGllZARmcmVlCmlzUG9zaXRpdmUJZHVja1N0YXRzAwkAZgIAAwkAkAMBBQdzZWdMaXN0CQACAQIxQXQgbGVhc3QgZHVjaywgbWluZXMgYW5kIHRyYXBzIHBhcnRzIGFyZSByZXF1aXJlZAoBB3NlZ21lbnQCA2FjYwNzZWcEAWoIBQNhY2MCXzEDCQAAAgUBagAACQCWCgQJAGQCBQFqAAEIBQNhY2MCXzIIBQNhY2MCXzMIBQNhY2MCXzQEAXAJAQpwbGFjZVByb2RCBgUDc2VnCAUDYWNjAl8yBQppc1Bvc2l0aXZlBQlkdWNrU3RhdHMIBQNhY2MCXzMIBQNhY2MCXzQJAJYKBAkAZAIFAWoAAQgFAXACXzEIBQFwAl8yCAUBcAJfMwQBdAoAAiRsBQdzZWdMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAFBnBCeXRlcwUIb2NjdXBpZWQFBGZyZWUKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3NlZ21lbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAJUKAwgFAXQCXzIIBQF0Al8zCAUBdAJfNAEXY2FuV2VhckN1cnJlbnRFcXVpcG1lbnQBC2R1Y2tBc3NldElkBAVlcUtleQkBEGtleUR1Y2tFcXVpcG1lbnQBBQtkdWNrQXNzZXRJZAQGY3VyckVxCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFZXFLZXkCFyw7LF8sOyxfLDssXyw7LF8sOyxfLDssAgFfBAl0ZW1wUHJvZEIJAQZkcmVzc0IEBQZjdXJyRXEFDEVNUFRZX1BST0Q1MAYFA25pbAQIc2VnQnBBdXgJAJEDAgkAtQkCCQCRAwIFBmN1cnJFcQULc2VnQmFja3BhY2sCATsAAQQKYnVmZkVmZmVjdAMJAAACBQhzZWdCcEF1eAIAAAAEBGF1eDAJAJEDAgkAtQkCBQhzZWdCcEF1eAIBLAAAAwkAAAIFBGF1eDACAAAABAZpZHhDbnQJALUJAgUEYXV4MAIBOgQDaWR4CQCRAwIFBmlkeENudAAABANjbnQJAJEDAgUGaWR4Q250AAEDAwMDAwkAAAIFA2lkeAICMDYGCQAAAgUDaWR4AgIwNwYJAAACBQNpZHgCAjA4CQECIT0CBQNjbnQCAAcJAGYCCQENcGFyc2VJbnRWYWx1ZQEFA2NudAAABwkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4CQENcGFyc2VJbnRWYWx1ZQEFA2lkeAIBXwUKcklkeEVmZmVjdAAABAVzdGF0cwkBDGdldER1Y2tTdGF0cwQFBHRoaXMFC2R1Y2tBc3NldElkBQpidWZmRWZmZWN0BgQIbmV3UHJvZEIJAQZkcmVzc0IEBQZjdXJyRXEFCXRlbXBQcm9kQgcFBXN0YXRzCQAAAgUIbmV3UHJvZEIFCG5ld1Byb2RCARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAhwcm9wTGlzdA10ZXJyYWluQ291bnRzDWxhbmRTaXplSW5kZXgEc2lnbgMJAQIhPQIJAJADAQUIcHJvcExpc3QFBk5VTVJFUwkAAgECFldyb25nIHByb3BvcnRpb25zIGRhdGEKAQd1cGRhdGVyAgNhY2MBaQQGcmVzdWx0CQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb3BMaXN0BQFpCQBoAgkAaAIFBHNpZ24JAJEDAgUNdGVycmFpbkNvdW50cwUBaQUNbGFuZFNpemVJbmRleAMJAGYCAAAFBnJlc3VsdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIWUGFuaWMhIFBpZWNlcyBvZiB0eXBlPQkApAMBBQFpAgcsIHNpZ249CQCkAwEFBHNpZ24CEywgdGVycmFpbkNvdW50c1tpXT0JAKQDAQkAkQMCBQ10ZXJyYWluQ291bnRzBQFpAhAsIGxhbmRTaXplSW5kZXg9CQCkAwEFDWxhbmRTaXplSW5kZXgJAM0IAgUDYWNjCQCkAwEFBnJlc3VsdAoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHdXBkYXRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgERdXBkYXRlUHJvcG9ydGlvbnMDDXRlcnJhaW5Db3VudHMNbGFuZFNpemVJbmRleARzaWduBAhwcm9wTGlzdAkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEJARFrZXlSZXNQcm9wb3J0aW9ucwACCzBfMF8wXzBfMF8wAgFfCQC5CQIJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAUIcHJvcExpc3QFDXRlcnJhaW5Db3VudHMFDWxhbmRTaXplSW5kZXgFBHNpZ24CAV8BDWNvdW50VGVycmFpbnMBCHRlcnJhaW5zCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUEAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFCAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQwABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUQAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFFAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRgABBQNuaWwBBmFkZFJlcwUKY3VycmVudFJlcw10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4F2RhaWx5QnlQaWVjZVdpdGhCb251c2VzCgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMFCURBWU1JTExJUwkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4CQDNCAIFA2FjYwkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmN1cnJlbnRSZXMFAWkFCXJlc09mVHlwZQQBcgoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEJdmlydENsYWltBA10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4F2RhaWx5QnlQaWVjZVdpdGhCb251c2VzCgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMFCURBWU1JTExJUwkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4CQCUCgIJAM0IAggFA2FjYwJfMQUJcmVzT2ZUeXBlCQBkAggFA2FjYwJfMgUJcmVzT2ZUeXBlCgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYBDWRpc3RyaWJ1dGVSZXMEDGN1cnJlbnRXaFJlcw5jdXJyZW50UGFja1JlcwpyZXNUb0NsYWltC3doU3BhY2VMZWZ0BA5yZXNMaXN0VG9DbGFpbQgFCnJlc1RvQ2xhaW0CXzEEDHJlc0FtVG9DbGFpbQgFCnJlc1RvQ2xhaW0CXzIDCQAAAgUMcmVzQW1Ub0NsYWltAAAJAJQKAgkAuQkCBQxjdXJyZW50V2hSZXMCAV8JALkJAgUOY3VycmVudFBhY2tSZXMCAV8DCQBnAgULd2hTcGFjZUxlZnQFDHJlc0FtVG9DbGFpbQoBCGFkZExpc3RzAgNhY2MBaQkAzQgCBQNhY2MJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxjdXJyZW50V2hSZXMFAWkJAJEDAgUOcmVzTGlzdFRvQ2xhaW0FAWkEAXIKAAIkbAUFSVRFUjYKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGFkZExpc3RzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQCUCgIJALkJAgUBcgIBXwkAuQkCBQ5jdXJyZW50UGFja1JlcwIBXwoBDGFkZFBhcnRMaXN0cwIDYWNjAWkEBndoUGFydAkAawMJAJEDAgUOcmVzTGlzdFRvQ2xhaW0FAWkFC3doU3BhY2VMZWZ0BQxyZXNBbVRvQ2xhaW0JAJQKAgkAzQgCCAUDYWNjAl8xCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUMY3VycmVudFdoUmVzBQFpBQZ3aFBhcnQJAM0IAggFA2FjYwJfMgkApAMBCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ5jdXJyZW50UGFja1JlcwUBaQkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQUGd2hQYXJ0BAFyCgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYWRkUGFydExpc3RzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQCUCgIJALkJAggFAXICXzECAV8JALkJAggFAXICXzICAV8BA2FicwEBeAMJAMACAgUBeAkAtgIBAAAFAXgJAL4CAQUBeAAEZnJlcQkAzAgCCQDMCAIABgkAzAgCAAkJAMwIAgAOCQDMCAIADwkAzAgCABAFA25pbAkAzAgCCQDMCAIABQkAzAgCAAgJAMwIAgANCQDMCAIADgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAQJAMwIAgAJCQDMCAIACgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAYJAMwIAgAHCQDMCAIADwkAzAgCABMFA25pbAkAzAgCCQDMCAIABAkAzAgCAAcJAMwIAgAICQDMCAIADQkAzAgCABIFA25pbAUDbmlsAQdnZW5DaGFyAgFuBWZyZXFzBANyZW0JAKADAQkAuwICBQFuBQdUV0VOVFlYBAZsZXR0ZXIDCQBmAgkAkQMCBQVmcmVxcwAABQNyZW0CAUEDCQBmAgkAkQMCBQVmcmVxcwABBQNyZW0CAUIDCQBmAgkAkQMCBQVmcmVxcwACBQNyZW0CAUMDCQBmAgkAkQMCBQVmcmVxcwADBQNyZW0CAUQDCQBmAgkAkQMCBQVmcmVxcwAEBQNyZW0CAUUCAUYFBmxldHRlcgELZ2VuVGVycmFpbnMCBHNlZWQMY29udGluZW50SWR4BAFmCQCRAwIFBGZyZXEFDGNvbnRpbmVudElkeAoBEHRlcnJhaW5HZW5lcmF0b3ICA2FjYwRlbGVtCQCUCgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCAUDYWNjAl8xCQEHZ2VuQ2hhcgIIBQNhY2MCXzIFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQdUV0VOVFlYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZMlgFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFkzWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTRYBQFmCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTVYBAF0CgACJGwJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAgAJALoCAgUEc2VlZAUFRklWRVgKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEHRlcnJhaW5HZW5lcmF0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCAUBdAJfMQAGUEVSTTI1CQDMCAIABwkAzAgCAAIJAMwIAgAPCQDMCAIAEwkAzAgCAAgJAMwIAgAYCQDMCAIAAQkAzAgCABUJAMwIAgAQCQDMCAIABQkAzAgCAAAJAMwIAgAWCQDMCAIAFAkAzAgCABcJAMwIAgALCQDMCAIABAkAzAgCABIJAMwIAgAMCQDMCAIABgkAzAgCAAoJAMwIAgADCQDMCAIAEQkAzAgCAA0JAMwIAgAJCQDMCAIADgUDbmlsAAZUQ0hBUlMJAMwIAgIBQQkAzAgCAgFCCQDMCAICAUMJAMwIAgIBRAkAzAgCAgFFCQDMCAICAUYFA25pbAETZ2VuVGVycmFpbnNGb3JNZXJnZQILc3VtVGVycmFpbnMNbGFuZFNpemVJbmRleAoBBXN0ZXAxAgNhY2MBcwQBaggFA2FjYwJfMgQCZWwJAQ1wYXJzZUludFZhbHVlAQUBcwQBeAMJAAACBQJlbAAAAAADCQBnAgUCZWwJAGgCAAQFDWxhbmRTaXplSW5kZXgJAGkCBQJlbAUNbGFuZFNpemVJbmRleAMJAGYCBQJlbAkAaAIAAwUNbGFuZFNpemVJbmRleAADCQBkAgkAaQIJAGUCBQJlbAABBQ1sYW5kU2l6ZUluZGV4AAEJAJUKAwkAzQgCCAUDYWNjAl8xBQF4CQBkAggFA2FjYwJfMgABCQBkAggFA2FjYwJfMwUBeAQBdAoAAiRsBQtzdW1UZXJyYWlucwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwUDbmlsAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFc3RlcDECBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYEA2FycggFAXQCXzEEBm1heElkeAkBBXZhbHVlAQkAzwgCBQNhcnIJAJYDAQUDYXJyBAVkZWx0YQkAZQIIBQF0Al8zABkKAQZzdWJiZXICA2FjYwNpZHgEA3ZhbAMJAAACBQNpZHgFBm1heElkeAkAZQIJAJEDAgUDYXJyBQNpZHgFBWRlbHRhCQCRAwIFA2FycgUDaWR4BAZ6ZXJvZXMDCQAAAgUDdmFsAAAFA25pbAkAtQkCCQCwAgIJAKQDAQkAbAYACgAABQN2YWwAAAAABQRET1dOAAECAAQBYwkAkQMCBQZUQ0hBUlMFA2lkeAoBB2xpc3RHZW4CAmFjB2lnbm9yZWQJAM0IAgUCYWMFAWMEAXoKAAIkbAUGemVyb2VzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdsaXN0R2VuAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyNQkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZCQDOCAIFA2FjYwUBegQBcgoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGc3ViYmVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCgEGcGVybXV0AgNhY2MBagkArAICBQNhY2MJAJEDAgUBcgUBagoAAiRsBQZQRVJNMjUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBnBlcm11dAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMjUJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQELZ2V0QmFja3BhY2sBBWJwS2V5BAFwCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6AgE6CQDMCAIJAKQDAQkBC3ZhbHVlT3JFbHNlAgkAtgkBCQCRAwIFAXAFCmJwSWR4TGV2ZWwAAAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCGJwSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUBcAUIYnBJZHhSZXMCCzBfMF8wXzBfMF8wCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQFwBQlicElkeFByb2QFA25pbAEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCXZvbFByZWZpeAQFcGFydHMJALUJAgUJdm9sUHJlZml4AgFfCQBoAgkAaAIFDFdITVVMVElQTElFUgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAAARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEJY3VycmVudFdoBAVnb29kcwkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAoBCXN1bVJlc01hdAIDYWNjBGl0ZW0JAGQCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQoBB3N1bVByb2QCA2FjYwRpdGVtBANpZHgIBQNhY2MCXzEEBHBrZ3MJAGkCCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQUOUFJPRFVDVFBLR1NJWkUAAQUOUFJPRFVDVFBLR1NJWkUJAJQKAgkAZAIFA2lkeAABCQBkAggFA2FjYwJfMgkAaAIFBHBrZ3MFBU1VTFQ4BAh3aFJlc1ZvbAoAAiRsCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc3VtUmVzTWF0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAh3aE1hdFZvbAoAAiRsCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc3VtUmVzTWF0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp3aEdvb2RzVm9sAwkAAAIFBWdvb2RzAgAAAAgKAAIkbAkAvAkCBQVnb29kcwIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAAAAAKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3N1bVByb2QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgJfMgkAZAIJAGQCBQh3aFJlc1ZvbAUId2hNYXRWb2wFCndoR29vZHNWb2wBDGdldFdhcmVob3VzZQMFd2hLZXkJbGFuZEluZGV4CmluZnJhTGV2ZWwECXZvbFByZWZpeAkArAICCQCsAgIJAKQDAQUJbGFuZEluZGV4AgFfCQCkAwEFCmluZnJhTGV2ZWwEB3doVG90YWwJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEFCXZvbFByZWZpeAQFd2hTdHIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFd2hLZXkJAKwCAgUJdm9sUHJlZml4Ahs6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6OjAEAndoCQC8CQIFBXdoU3RyAgE6BAp3aE9jY3VwaWVkCQEXZ2V0V2FyZWhvdXNlT2NjdXBpZWRWb2wBBQJ3aAQGd2hMb2Z0AwkAZgIABQkAkAMBBQJ3aAkAuQkCCQDMCAICATAJAMwIAgkApAMBBQp3aE9jY3VwaWVkCQDMCAIJAKQDAQkAZQIFB3doVG90YWwFCndoT2NjdXBpZWQJAMwIAgkApAMBBQd3aFRvdGFsBQNuaWwCAV8EBGxvZnQJALUJAgkAkQMCBQJ3aAUJd2hJZHhMT0ZUAgFfBAh3aExvY2tlZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFCXZvbExvY2tlZAQDb2NjAwkAZgIJAJADAQUEbG9mdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQFCndoT2NjdXBpZWQJALkJAgkAzAgCCQCkAwEFCHdoTG9ja2VkCQDMCAIJAKQDAQUDb2NjCQDMCAIJAKQDAQkAZQIJAGUCBQd3aFRvdGFsBQh3aExvY2tlZAUDb2NjCQDMCAIJAKQDAQUHd2hUb3RhbAUDbmlsAgFfCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUCd2gFCHdoSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUCd2gFCHdoSWR4UmVzAgswXzBfMF8wXzBfMAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAndoBQh3aElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAndoBQh3aElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQJ3aAUJd2hJZHhQcm9kCQDMCAIFBndoTG9mdAUDbmlsARVnZXRXYXJlaG91c2VTcGFjZUxlZnQBCWN1cnJlbnRXaAQLb2NjdXBpZWRWb2wJARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFCWN1cnJlbnRXaAQPY3VycldoTG9ja2VkVm9sCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhMT0ZUAgFfBQl2b2xMb2NrZWQJAGUCCQBlAgkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQljdXJyZW50V2gFC3doSWR4TGV2ZWxzBQtvY2N1cGllZFZvbAUPY3VycldoTG9ja2VkVm9sAQltb3ZlU3R1ZmYDCmNhcmdvUGFydHMJY3VycmVudFdoC2N1cnJlbnRQYWNrAwkBAiE9AgkAkAMBBQpjYXJnb1BhcnRzAAMJAAIBAjRjYXJnb0xpc3RTdHIgc2hvdWxkIGNvbnRhaW4gZXhhY3RseSAyICc6JyBzZXBhcmF0b3JzBAhyZXNQYXJ0cwkAtQkCCQCRAwIFCmNhcmdvUGFydHMAAAIBXwQIbWF0UGFydHMJALUJAgkAkQMCBQpjYXJnb1BhcnRzAAECAV8ECXByb2RQYXJ0cwMJAAACCQCRAwIFCmNhcmdvUGFydHMAAgIABQNuaWwJALwJAgkAkQMCBQpjYXJnb1BhcnRzAAICAV8DCQECIT0CCQCQAwEFCHJlc1BhcnRzBQZOVU1SRVMJAAIBAiBBbGwgNiByZXNvdXJjZXMgc2hvdWxkIGJlIHBhc3NlZAMJAQIhPQIJAJADAQUIbWF0UGFydHMFBk5VTVJFUwkAAgECIEFsbCA2IG1hdGVyaWFscyBzaG91bGQgYmUgcGFzc2VkBAt3aFNwYWNlTGVmdAkBFWdldFdhcmVob3VzZVNwYWNlTGVmdAEFCWN1cnJlbnRXaAQJY3VycldoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQJY3VycldoTWF0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwQKY3VycldoUHJvZAMJAAACCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgAFA25pbAkAvAkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgFfBA5jdXJyZW50UGFja1JlcwkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQOY3VycmVudFBhY2tNYXQJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8ED2N1cnJlbnRQYWNrUHJvZAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwoBA212UgIDYWNjBGl0ZW0EAWkIBQNhY2MCXzEEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3docgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWN1cnJXaFJlcwUBaQQDYnByCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOY3VycmVudFBhY2tSZXMFAWkDCQAAAgUCYW0AAAkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAJEDAgUJY3VycldoUmVzBQFpCQDNCAIIBQNhY2MCXzMJAJEDAgUOY3VycmVudFBhY2tSZXMFAWkIBQNhY2MCXzQDCQBmAgUCYW0AAAMJAGYCBQJhbQUDYnByCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgBQRpdGVtAhkgZnJvbSBiYWNrcGFjaywgYnV0IG9ubHkgCQCkAwEFA2JwcgIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docgUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnByBQJhbQkAZAIIBQNhY2MCXzQFAmFtAwkAZgIJAQEtAQUCYW0FA3docgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFAmFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aHICCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHIFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcgUCYW0JAGQCCAUDYWNjAl80BQJhbQQBcgoAAiRsBQhyZXNQYXJ0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAABQNuaWwFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdlICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYKAQNtdk0CA2FjYwRpdGVtBAFpCAUDYWNjAl8xBAJhbQkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAN3aG0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQljdXJyV2hNYXQFAWkEA2JwbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmN1cnJlbnRQYWNrTWF0BQFpAwkAAAIFAmFtAAAJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCRAwIFCWN1cnJXaE1hdAUBaQkAzQgCCAUDYWNjAl8zCQCRAwIFDmN1cnJlbnRQYWNrTWF0BQFpCAUDYWNjAl80AwkAZgIFAmFtAAADCQBmAgUCYW0FA2JwbQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAUEaXRlbQIZIGZyb20gYmFja3BhY2ssIGJ1dCBvbmx5IAkApAMBBQNicG0CCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aG0FAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwbQUCYW0JAGQCCAUDYWNjAl80BQJhbQMJAGYCCQEBLQEFAmFtBQN3aG0JAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQkBAS0BBQJhbQIaIGZyb20gd2FyZWhvdXNlLCBidXQgb25seSAJAKQDAQUDd2htAgogYXZhaWxhYmxlCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2htBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicG0FAmFtCQBkAggFA2FjYwJfNAUCYW0EAW0KAAIkbAUIbWF0UGFydHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAUDbmlsBQNuaWwIBQFyAl80CgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdk0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYKAQNtdlACA2FjYwRpdGVtBAFpCAUDYWNjAl8xBAJhbQkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAN3aHADCQBmAgkAkAMBBQpjdXJyV2hQcm9kBQFpCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKY3VycldoUHJvZAUBaQAABANicHADCQBmAgkAkAMBBQ9jdXJyZW50UGFja1Byb2QFAWkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ9jdXJyZW50UGFja1Byb2QFAWkAAAMJAAACBQJhbQAACQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBBQN3aHAJAM0IAggFA2FjYwJfMwkApAMBBQNicHAIBQNhY2MCXzQDCQBmAgUCYW0AAAMJAGYCBQJhbQUDYnBwCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgBQRpdGVtAhkgZnJvbSBiYWNrcGFjaywgYnV0IG9ubHkgCQCkAwEFA2JwcAIKIGF2YWlsYWJsZQQIZGVsdGFWb2wJAGUCCQEIdG9Wb2x1bWUCCQBkAgUDd2hwBQJhbQUOUFJPRFVDVFBLR1NJWkUJAQh0b1ZvbHVtZQIFA3docAUOUFJPRFVDVFBLR1NJWkUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHAFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcAUCYW0JAGQCCAUDYWNjAl80BQhkZWx0YVZvbAMJAGYCCQEBLQEFAmFtBQN3aHAJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQkBAS0BBQJhbQIaIGZyb20gd2FyZWhvdXNlLCBidXQgb25seSAJAKQDAQUDd2hwAgogYXZhaWxhYmxlBAhkZWx0YVZvbAkAZQIJAQh0b1ZvbHVtZQIJAGQCBQN3aHAFAmFtBQ5QUk9EVUNUUEtHU0laRQkBCHRvVm9sdW1lAgUDd2hwBQ5QUk9EVUNUUEtHU0laRQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docAUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnBwBQJhbQkAZAIIBQNhY2MCXzQFCGRlbHRhVm9sBAFwAwkBAiE9AgkAkAMBBQlwcm9kUGFydHMAAAoAAiRsBQlwcm9kUGFydHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAUDbmlsBQNuaWwIBQFtAl80CgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdlACBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgkAlgoEAAAFCmN1cnJXaFByb2QFD2N1cnJlbnRQYWNrUHJvZAgFAW0CXzQECHZvbFNhbGRvCAUBcAJfNAMJAGYCBQh2b2xTYWxkbwULd2hTcGFjZUxlZnQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICFUF0dGVtcHQgdG8gcHV0IHRvdGFsIAkApAMBBQh2b2xTYWxkbwIRIHN0dWZmLCBidXQgb25seSAJAKQDAQULd2hTcGFjZUxlZnQCFSB3YXJlaG91c2Ugc3BhY2UgbGVmdAkAmQoHCQC5CQIIBQFyAl8yAgFfCQC5CQIIBQFtAl8yAgFfCQC6CQIIBQFwAl8yAgFfCQC5CQIIBQFyAl8zAgFfCQC5CQIIBQFtAl8zAgFfCQC6CQIIBQFwAl8zAgFfBQh2b2xTYWxkbwESZXhwZWRpdGlvbkludGVybmFsAgZjYWxsZXIEdHhJZAQIdXNlckFkZHIJAKUIAQUGY2FsbGVyBAZiaWdOdW0JAQNhYnMBCQCeAwEFBHR4SWQEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQHbGFuZE51bQkApAMBBQdmcmVlTnVtBAxjb250aW5lbnRJZHgJAKADAQkAuwICBQZiaWdOdW0FBUZJVkVYBAh0ZXJyYWlucwkBC2dlblRlcnJhaW5zAgUGYmlnTnVtBQxjb250aW5lbnRJZHgECWNvbnRpbmVudAkAkQMCBQpjb250aW5lbnRzBQxjb250aW5lbnRJZHgEBWlzc3VlCQDCCAUJAQduZnROYW1lAgUHbGFuZE51bQIBUwkAuQkCCQDMCAIFB2xhbmROdW0JAMwIAgIBUwkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBAJpZAkA2AQBBQdhc3NldElkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUHZnJlZU51bQABCQDMCAIFBWlzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlMYW5kVG9Bc3NldElkAQUHbGFuZE51bQUCaWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFAmlkBQh1c2VyQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQh1c2VyQWRkcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQJpZAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgUCaWQFCHVzZXJBZGRyAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGY2FsbGVyAAEFB2Fzc2V0SWQFA25pbAkAlAoCBQJpZAUJY29udGluZW50AQxmbGlnaHRDb21tb24DCHVzZXJBZGRyB21lc3NhZ2UDc2lnAwkBASEBCQDEEwMFB21lc3NhZ2UFA3NpZwUDcHViCQACAQIYc2lnbmF0dXJlIGRvZXMgbm90IG1hdGNoBAVwYXJ0cwkAvAkCCQCwCQEFB21lc3NhZ2UCATsECWZsaWdodExvZwkAvAkCCQCRAwIFBXBhcnRzAAACAXwEAmhwCQC1CQIJAJEDAgUJZmxpZ2h0TG9nBQhmbEhlYWx0aAIBXwQFY3VySFAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJocAAABAVuZXdIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAEEC25ld0xvY1R4VmVyCQC1CQIJAJEDAgUFcGFydHMAAQIBOgQLbmV3TG9jYXRpb24JAJEDAgULbmV3TG9jVHhWZXIAAAQEdGltZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWZsaWdodExvZwULZmxUaW1lc3RhbXADAwkAZgIFBHRpbWUJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAURRklWRU1JTlVURVNNSUxMSVMGCQBmAgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwUEdGltZQkAAgEJAKwCAgkArAICCQCsAgICHHNpZ25hdHVyZSBvdXRkYXRlZDogbG9nVGltZT0JAKQDAQUEdGltZQIJLCBiY1RpbWU9CQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAl0eEZyb21Nc2cJAJEDAgULbmV3TG9jVHhWZXIAAQQGbGFzdFR4CQELdmFsdWVPckVsc2UCCQCiCAEJARFrZXlMYXN0VHhJZEJ5VXNlcgEFCHVzZXJBZGRyAgADCQECIT0CBQZsYXN0VHgFCXR4RnJvbU1zZwkAAgEJAKwCAgkArAICCQCsAgICHlR4IGlkcyBkb24ndCBtYXRjaCEgSW4gc3RhdGU6IAUGbGFzdFR4AgosIGluIG1zZzogBQl0eEZyb21Nc2cEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUIdXNlckFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAxvbGRGcm9tU3RhdGUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAMJAQIhPQIFDG9sZEZyb21TdGF0ZQUFY3VySFAJAAIBCQCsAgIJAKwCAgkArAICAgpvbGRIZWFsdGg9CQCkAwEFDG9sZEZyb21TdGF0ZQIvIGZyb20gc3RhdGUgZG9lcyBub3QgbWF0Y2ggb25lIGZyb20gZmxpZ2h0IGxvZz0JAKQDAQUFY3VySFADCQBnAgAABQVjdXJIUAkAAgECHllvdSBjYW4ndCBmbHkgd2l0aCB6ZXJvIGhlYWx0aAMJAQEhAQkBF2NhbldlYXJDdXJyZW50RXF1aXBtZW50AQULZHVja0Fzc2V0SWQJAAIBAhZFcXVpcG1lbnQgaW5jb21wYXRpYmxlBAVib251cwMJAGYCCQCQAwEFCWZsaWdodExvZwUHZmxCb251cwkAkQMCBQlmbGlnaHRMb2cFB2ZsQm9udXMCAAQIcHJvZFVzZWQDCQBmAgkAkAMBBQlmbGlnaHRMb2cFC2ZsUHJvZHNVc2VkCQCRAwIFCWZsaWdodExvZwULZmxQcm9kc1VzZWQCAAQKc2VudEFtb3VudAMDCQBmAgUFbmV3SFAAAAkAAAIFBWJvbnVzAgEkBwkBBWFzSW50AQkA/AcEBQxyZXN0Q29udHJhY3QCDXNlbmRVc2R0UHJpemUJAMwIAgUIdXNlckFkZHIFA25pbAUDbmlsAAAJAJcKBQUFbmV3SFAFC2R1Y2tBc3NldElkBQpzZW50QW1vdW50BQtuZXdMb2NhdGlvbgUIcHJvZFVzZWQBDGFwcGx5Qm9udXNlcwILbGFuZEFzc2V0SWQGcGllY2VzBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQJYXJ0UGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEJASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkAAAEBGFkZDYJAGkCBQppbmZyYUxldmVsAAYEBGFkZDcJAGkCBQppbmZyYUxldmVsAAcJAGQCCQBkAgUPREFJTFlSRVNCWVBJRUNFCQBrAwUPREFJTFlSRVNCWVBJRUNFCQBkAgkAZAIFCmluZnJhTGV2ZWwFBGFkZDYJAGgCAAIFBGFkZDcABQkAawMFD0RBSUxZUkVTQllQSUVDRQUJYXJ0UGllY2VzCQBoAgUGcGllY2VzAAUBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwRhZGRyCWNsYWltTW9kZQ1sYW5kQXNzZXRJZEluBA0kdDAzMzc4NDM0MzIzAwkAAAIFCWNsYWltTW9kZQULY2xhaW1Nb2RlV2gJAJQKAgUNbGFuZEFzc2V0SWRJbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAgAEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAkAlAoCCQCRAwIFA2xvYwUIbG9jSWR4SWQFC2R1Y2tBc3NldElkBAtsYW5kQXNzZXRJZAgFDSR0MDMzNzg0MzQzMjMCXzEEBmR1Y2tJZAgFDSR0MDMzNzg0MzQzMjMCXzIEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQECXNhdmVkVGltZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFB3RpbWVLZXkJAKwCAgkArAICAgVMYW5kIAgFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8JAJYKBAUGZHVja0lkBQtsYW5kQXNzZXRJZAUBZAUJc2F2ZWRUaW1lARBjbGFpbVJlc0ludGVybmFsBARhZGRyBmFtb3VudAljbGFpbU1vZGUNbGFuZEFzc2V0SWRJbgMJAGYCAAAFBmFtb3VudAkAAgECD05lZ2F0aXZlIGFtb3VudAQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUJY2xhaW1Nb2RlBQ1sYW5kQXNzZXRJZEluBAhsYW5kU2l6ZQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCCAUBYwJfMwULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCAUBYwJfNAMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEIBQFjAl80AgwsIGN1cnJlbnQgPSAJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBBZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQEMYXBwbHlCb251c2VzAggFAWMCXzIFBnBpZWNlcwQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBQZwaWVjZXMFCURBWU1JTExJUwMJAGYCBQZhbW91bnQFCGF2YWlsUmVzCQACAQkArAICCQCsAgIJAKwCAgIiTm90IGVub3VnaCByZXNvdXJjZXMsIGF2YWlsYWJsZSA9IAkApAMBBQhhdmFpbFJlcwIOLCByZXF1ZXN0ZWQgPSAJAKQDAQUGYW1vdW50BAxuZXdEZWx0YVRpbWUJAGsDCQBlAgUIYXZhaWxSZXMFBmFtb3VudAUJREFZTUlMTElTCQBoAgUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQUGcGllY2VzBAxuZXdUaW1lc3RhbXAJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUMbmV3RGVsdGFUaW1lBAlsYW5kSW5kZXgJAGkCBQZwaWVjZXMFBVNTSVpFBApyZXNUb0NsYWltCQEJdmlydENsYWltBAUNdGVycmFpbkNvdW50cwkAZQIFCWRlbHRhVGltZQUMbmV3RGVsdGFUaW1lBQlsYW5kSW5kZXgFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQgFAWMCXzIECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBCAUBYwJfMgAABAljdXJyZW50V2gJAQxnZXRXYXJlaG91c2UDBQV3aEtleQUJbGFuZEluZGV4BQppbmZyYUxldmVsBARsb2Z0CQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8EC3doU3BhY2VMZWZ0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQMDCQAAAgUJY2xhaW1Nb2RlBQtjbGFpbU1vZGVXaAkAZgIFBmFtb3VudAULd2hTcGFjZUxlZnQHCQACAQkArAICCQCsAgICBU9ubHkgCQCkAwEFC3doU3BhY2VMZWZ0Ahggc3BhY2UgbGVmdCBpbiB3YXJlaG91c2UEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBYwJfMQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BA5jdXJyZW50UGFja1JlcwkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQMY3VycmVudFdoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQNJHQwMzY2OTczNzU2OAMJAAACBQljbGFpbU1vZGUFC2NsYWltTW9kZVdoCQCWCgQJAQZhZGRSZXMFBQxjdXJyZW50V2hSZXMFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQUJbGFuZEluZGV4BRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQt2b2xPY2N1cGllZAgFCnJlc1RvQ2xhaW0CXzIJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQgFCnJlc1RvQ2xhaW0CXzIDCQAAAgUJY2xhaW1Nb2RlBQ1jbGFpbU1vZGVEdWNrCQCWCgQJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwkBBmFkZFJlcwUFDmN1cnJlbnRQYWNrUmVzBQ10ZXJyYWluQ291bnRzCQBlAgUJZGVsdGFUaW1lBQxuZXdEZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQQFZGlzdHIJAQ1kaXN0cmlidXRlUmVzBAUMY3VycmVudFdoUmVzBQ5jdXJyZW50UGFja1JlcwUKcmVzVG9DbGFpbQULd2hTcGFjZUxlZnQEBHdoQW0JAJcDAQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQkAzAgCCAUKcmVzVG9DbGFpbQJfMgUDbmlsCQCWCgQIBQVkaXN0cgJfMQgFBWRpc3RyAl8yCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkBQR3aEFtCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUFBHdoQW0EBXdoUmVzCAUNJHQwMzY2OTczNzU2OAJfMQQFYnBSZXMIBQ0kdDAzNjY5NzM3NTY4Al8yBAVsb2Z0TwgFDSR0MDM2Njk3Mzc1NjgCXzMEBWxvZnRGCAUNJHQwMzY2OTczNzU2OAJfNAkAlwoFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEIBQFjAl8yBQxuZXdUaW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKTEFORFBSRUZJWAgFAWMCXzIFBGFkZHIFDG5ld1RpbWVzdGFtcAUDbmlsBQVicEtleQkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIFBWJwUmVzCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsBQV3aEtleQkAzAgCCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMJAMwIAgUFd2hSZXMJAMwIAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0CQDMCAIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QJAMwIAgkAuQkCCQDMCAIJAJEDAgUEbG9mdAUJdm9sTG9ja2VkCQDMCAIJAKQDAQUFbG9mdE8JAMwIAgkApAMBBQVsb2Z0RgkAzAgCCQCRAwIFBGxvZnQFCHZvbFRvdGFsBQNuaWwCAV8FA25pbAEIY2xhaW1BbGwEBGFkZHILbGFuZEFzc2V0SWQGcGllY2VzCWNsYWltTW9kZQQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQEFdmFsdWUBCQCfCAEFB3RpbWVLZXkECGF2YWlsUmVzCQBoAgkAawMJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUJc2F2ZWRUaW1lCQEMYXBwbHlCb251c2VzAgULbGFuZEFzc2V0SWQFBnBpZWNlcwUJREFZTUlMTElTBQZwaWVjZXMJARBjbGFpbVJlc0ludGVybmFsBAUEYWRkcgUIYXZhaWxSZXMFCWNsYWltTW9kZQULbGFuZEFzc2V0SWQBDXVwSW5mcmFDb21tb24EDHNob3VsZFVzZU1hdAZjYWxsZXINcGF5bWVudEFtb3VudAtsYW5kQXNzZXRJZAQEYWRkcgkApQgBBQZjYWxsZXIEAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFE2NsYWltTW9kZVdoVGhlbkR1Y2sFC2xhbmRBc3NldElkBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQIaW5mcmFLZXkJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQgFAWMCXzIECGN1ckxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEFCGluZnJhS2V5AAADAwkBASEBBRhLU19BTExPV19CSUdfSU5GUkFfTUVSR0UJAGcCBQhjdXJMZXZlbAADBwkAAgECJkN1cnJlbnRseSBtYXggaW5mcmFzdHJ1Y3R1cmUgbGV2ZWwgPSAzBAhtYXhJbmZyYQkAZAIJAGkCCQEEc3FydAQFBnBpZWNlcwAAAAAFBERPV04ABQACBAhuZXdMZXZlbAkAZAIFCGN1ckxldmVsAAEDAwUYS1NfQUxMT1dfQklHX0lORlJBX01FUkdFCQBmAgUIbmV3TGV2ZWwFCG1heEluZnJhBwkAAgEJAKwCAgIlQ3VycmVudGx5IG1heCBpbmZyYXN0cnVjdHVyZSBsZXZlbCA9IAkApAMBBQhtYXhJbmZyYQQEY29zdAkAawMFFUluZnJhVXBncmFkZUNvc3RTVXNkdAkAaAIFBnBpZWNlcwUIbmV3TGV2ZWwFBVNTSVpFAwMJAQEhAQUMc2hvdWxkVXNlTWF0CQECIT0CBQ1wYXltZW50QW1vdW50BQRjb3N0BwkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFBGNvc3QEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBYwJfMQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVtTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQHbWF0VXNlZAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUEBm5ld01hdAkAuQkCCQERc3VidHJhY3RNYXRlcmlhbHMDBQxzaG91bGRVc2VNYXQFBW1MaXN0BQdtYXRVc2VkAgFfBAtjbGFpbVJlc3VsdAkBCGNsYWltQWxsBAUEYWRkcggFAWMCXzIFBnBpZWNlcwUTY2xhaW1Nb2RlV2hUaGVuRHVjawQGd2hEYXRhCAULY2xhaW1SZXN1bHQCXzUEBm9sZFZvbAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQZ3aERhdGEFC3doSWR4TGV2ZWxzBApuZXdWb2xEYXRhCQC5CQIJAMwIAgkAkQMCCQC1CQIJAJEDAgUGd2hEYXRhBQt3aElkeExldmVscwIBXwAACQDMCAIJAKQDAQUIbmV3TGV2ZWwFA25pbAIBXwQGbmV3Vm9sCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBBQpuZXdWb2xEYXRhBARsb2Z0CQC1CQIJAJEDAgUGd2hEYXRhBQl3aElkeExPRlQCAV8ECm5ld0xvZnRTdHIJALkJAgkAzAgCCQCRAwIFBGxvZnQFCXZvbExvY2tlZAkAzAgCCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCQDMCAIJAKQDAQkAZQIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQUGbmV3Vm9sBQZvbGRWb2wJAMwIAgkApAMBBQZuZXdWb2wFA25pbAIBXwkAlQoDCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCGluZnJhS2V5BQhuZXdMZXZlbAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIIBQFjAl8yBQRhZGRyBQhuZXdMZXZlbAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCCAULY2xhaW1SZXN1bHQCXzMFCGJwSWR4UmVzCQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzQJALkJAgkAzAgCBQpuZXdWb2xEYXRhCQDMCAIJAJEDAgUGd2hEYXRhBQh3aElkeFJlcwkAzAgCCQCRAwIFBndoRGF0YQUId2hJZHhNYXQJAMwIAgkAkQMCBQZ3aERhdGEFCXdoSWR4UHJvZAkAzAgCBQpuZXdMb2Z0U3RyBQNuaWwCAToFA25pbAgFC2NsYWltUmVzdWx0Al8xBQhuZXdMZXZlbAUHbWF0VXNlZAEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCC2R1Y2tBc3NldElkB2RlbHRhWFAEBmx2bEtleQkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkBAV4cEtleQkBCWtleUR1Y2tYUAEFC2R1Y2tBc3NldElkBAJ4cAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFBXhwS2V5AAAEBW5ld1hQCQBkAgUCeHAFB2RlbHRhWFAECWx2bFBvaW50cwkBB2xldmVsVXACCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUGbHZsS2V5AAAFBW5ld1hQBAlrZXlQb2ludHMJARFrZXlEdWNrRnJlZVBvaW50cwEFC2R1Y2tBc3NldElkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFBmx2bEtleQkAkQMCBQlsdmxQb2ludHMAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUFeHBLZXkFBW5ld1hQCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlQb2ludHMJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleVBvaW50cwAACQCRAwIFCWx2bFBvaW50cwABBQNuaWwFBW5ld1hQARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgRhZGRyB2RlbHRhWFAEBmx2bEtleQkBDGtleVVzZXJMZXZlbAEFBGFkZHIEBXhwS2V5CQEJa2V5VXNlclhQAQUEYWRkcgQCeHAJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQV4cEtleQAABAVuZXdYUAkAZAIFAnhwBQdkZWx0YVhQBAlsdmxQb2ludHMJAQdsZXZlbFVwAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFBmx2bEtleQAABQVuZXdYUAQJa2V5UG9pbnRzCQERa2V5VXNlckZyZWVQb2ludHMBBQRhZGRyCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFBmx2bEtleQkAkQMCBQlsdmxQb2ludHMAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUFeHBLZXkFBW5ld1hQCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlQb2ludHMJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleVBvaW50cwAACQCRAwIFCWx2bFBvaW50cwABBQNuaWwFBW5ld1hQARJhY3RpdmF0ZU9uYm9hcmRBcnQBBGFkZHIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQIcmVmQnlLZXkJAQ9rZXlBZGRyZXNzUmVmQnkBBQRhZGRyBAVyZWZCeQkAoggBBQhyZWZCeUtleQMJAQEhAQkBCWlzRGVmaW5lZAEFBXJlZkJ5CQACAQIpWW91IGFyZSBub3QgZWxpZ2libGUgZm9yIE9OQk9BUkQgYXJ0aWZhY3QEBmFydEtleQkBHGtleU9uYm9hcmRBcnREdWNrQWN0aXZhdGVkQnkBBQRhZGRyBAdhcnREdWNrCQCiCAEFBmFydEtleQMJAQlpc0RlZmluZWQBBQdhcnREdWNrCQACAQkArAICAi9Zb3UgYWxyZWFkeSB1c2VkIHlvdXIgT05CT0FSRCBhcnRpZmFjdCBvbiBkdWNrIAkBBXZhbHVlAQUHYXJ0RHVjawQQZHVja0FjdGl2YXRvcktleQkBHGtleU9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2sBBQtkdWNrQXNzZXRJZAQNZHVja0FjdGl2YXRvcgkAoggBBRBkdWNrQWN0aXZhdG9yS2V5AwkBCWlzRGVmaW5lZAEFDWR1Y2tBY3RpdmF0b3IJAAIBCQCsAgIJAKwCAgkArAICAglUaGUgZHVjayAFC2R1Y2tBc3NldElkAjQgYWxyZWFkeSBnb3QgcG9pbnRzIGZyb20gT05CT0FSRCBhcnRpZmFjdCBmcm9tIHVzZXIgCQEFdmFsdWUBBQ1kdWNrQWN0aXZhdG9yCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUGYXJ0S2V5BQtkdWNrQXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCBRBkdWNrQWN0aXZhdG9yS2V5BQRhZGRyBQNuaWwICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAUJeHBPbmJvYXJkAl8xARJhY3RpdmF0ZVByZXNhbGVBcnQCBGFkZHINbGFuZEFzc2V0SWRJbgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUTY2xhaW1Nb2RlV2hUaGVuRHVjawUNbGFuZEFzc2V0SWRJbgQLbGFuZEFzc2V0SWQIBQFjAl8yBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQNYWN0aXZhdGlvbktleQkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQDCQBmAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ1hY3RpdmF0aW9uS2V5AAAAAAkAAgECJVByZXNhbGUgYXJ0aWZhY3QgaXMgYWxyZWFkeSBhY3RpdmF0ZWQDCQBmAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIIBQFjAl8zBQpyZWNMYW5kTnVtBQ9QUkVTQUxFTlVNTEFORFMJAAIBCQCsAgIJAKwCAgkArAICBQpMQU5EUFJFRklYAgEgBQtsYW5kQXNzZXRJZAIlIGlzIG5vdCBlbGlnaWJsZSBmb3IgcHJlc2FsZSBhcnRpZmFjdAQLY2xhaW1SZXN1bHQJAQhjbGFpbUFsbAQFBGFkZHIFC2xhbmRBc3NldElkBQZwaWVjZXMFE2NsYWltTW9kZVdoVGhlbkR1Y2sJAM0IAgkAzQgCCQDNCAIIBQtjbGFpbVJlc3VsdAJfMQkBDEludGVnZXJFbnRyeQIFDWFjdGl2YXRpb25LZXkFBnBpZWNlcwkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al80CQC5CQIIBQtjbGFpbVJlc3VsdAJfNQIBOgEPY2hlY2tUb3VybmFtZW50AQtkdWNrQXNzZXRJZAQGbGFzdElkCQELdmFsdWVPckVsc2UCCQCaCAIFEnRvdXJuYW1lbnRDb250cmFjdAUNbGFzdFRvdXJJZEtleQAABAtjdXJMb2NhdGlvbgkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUSdG91cm5hbWVudENvbnRyYWN0BQZsYXN0SWQEBnN0YXRpYwkAkQMCBQV0RGF0YQUJaWR4U3RhdGljBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljAwkBAiE9AgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBVAcDAwMJAAACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyTG9jYXRpb24FD2xvY0lkeENvbnRpbmVudAUGbGFzdElkCQAAAgkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwIKSU5QUk9HUkVTUwcJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQNub3cHCQACAQIqWW91ciBkdWNrIGlzIHRha2luZyBwYXJ0IGluIHRoZSB0b3VybmFtZW50CQEJYXNCb29sZWFuAQkA/AcEBQR0aGlzAhZleGl0VG91cm5hbWVudEludGVybmFsCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwFA25pbAENY2hlY2tEZWxpdmVyeQELZHVja0Fzc2V0SWQEC2N1ckxvY2F0aW9uCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04CAV8EA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXADCQECIT0CCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlAgFEBwQJc3RhcnRUaW1lCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyTG9jYXRpb24FD2xvY0lkeENvbnRpbmVudAQIZGlzdGFuY2UJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtjdXJMb2NhdGlvbgUIbG9jSWR4SWQDAwkAZgIFA25vdwkAZAIFCXN0YXJ0VGltZQUSVEVOX01JTlVURVNfTUlMTElTCQBmAgADBQhkaXN0YW5jZQcJAAIBAiBZb3VyIGR1Y2sgaXMgb24gZGVsaXZlcnkgbWlzc2lvbgkBCWFzQm9vbGVhbgEJAPwHBAUEdGhpcwIUZXhpdERlbGl2ZXJ5SW50ZXJuYWwJAMwIAgULZHVja0Fzc2V0SWQFA25pbAUDbmlsAQ1tZXJnZUludGVybmFsBgtuZXdMYW5kU2l6ZQhuZXdMZXZlbAdmb3JtdWxhBGFkZHIMbGFuZEFzc2V0SWRzB25lZWRNYXQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECHW1lcmdlSW50ZXJuYWxfY2hlY2tUb3VybmFtZW50AwkBDWNoZWNrRGVsaXZlcnkBBQtkdWNrQXNzZXRJZAkAAgECG21lcmdlSW50ZXJuYWxfY2hlY2tEZWxpdmVyeQoBCmNoZWNrTWVyZ2UCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAljb250aW5lbnQJAJEDAgUBZAUMcmVjQ29udGluZW50AwMJAQIhPQIIBQNhY2MCXzMCAAkBAiE9AggFA2FjYwJfMwUJY29udGluZW50BwkAAgECLkxhbmRzIHNob3VsZCBiZSBvbiB0aGUgc2FtZSBjb250aW5lbnQgdG8gbWVyZ2UECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBAdzaXplc0luCAUDYWNjAl8xBAFpCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALMJAgUHc2l6ZXNJbgUIbGFuZFNpemUCJ1lvdSBoYXZlbid0IHBhc3NlZCBhbGwgdGhlIGxhbmRzIG5lZWRlZAQIc2l6ZXNPdXQJAKwCAgkArwICBQdzaXplc0luBQFpCQCwAgIFB3NpemVzSW4JAGQCBQFpAAEEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBARhcnRzCQBkAggFA2FjYwJfMgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQIcmVxTGV2ZWwEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAAAwMJAAACAgFNBQckbWF0Y2gwAAQDCQAAAgIBTAUHJG1hdGNoMAAFAwkAAAICAlhMBQckbWF0Y2gwAAYJAAIBAhpPbmx5IFMsIE0sIEwsIFhMIGNhbiBtZXJnZQMJAQIhPQIFCmluZnJhTGV2ZWwFCHJlcUxldmVsCQACAQIiQWxsIGxhbmRzIHNob3VsZCBiZSBtYXhlZCB0byBtZXJnZQQHbGFuZE51bQkAkQMCBQFkBQpyZWNMYW5kTnVtBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUDCQBmAgAABQlkZWx0YVRpbWUJAAIBCQCsAgIJAKwCAgkArAICAiZTYXZlZCB0aW1lc3RhbXAgaXMgaW4gZnV0dXJlLCBzYXZlZCA9IAkApAMBBQlzYXZlZFRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUEBWJwUmVzCQEGYWRkUmVzBQkAtQkCCAUDYWNjAl80AgFfBQ10ZXJyYWluQ291bnRzBQlkZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFcHJvcHMJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAgFA2FjYwJfNgUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wEEBmNQcm9wcwkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwECAUDYWNjA18xMAUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wEEC3N1bVRlcnJhaW5zCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQIBQNhY2MCXzkFDXRlcnJhaW5Db3VudHMFCWxhbmRJbmRleAABBAVsYW5kcwgFA2FjYwJfNwQDaWR4CQDPCAIFBWxhbmRzBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEFA2lkeAkAAgEJAKwCAgIgWW91ciBzdGFrZWQgbGFuZHMgZG9uJ3QgY29udGFpbiAFC2xhbmRBc3NldElkBAljdXN0b21LZXkJARprZXlMYW5kQXNzZXRJZFRvQ3VzdG9tTmFtZQEFC2xhbmRBc3NldElkBApjdXN0b21OYW1lCQELdmFsdWVPckVsc2UCCQCiCAEFCWN1c3RvbUtleQIACQCcCgoFCHNpemVzT3V0BQRhcnRzBQljb250aW5lbnQFBWJwUmVzCQDOCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUDYWNjAl81CQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0JAQtEZWxldGVFbnRyeQEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQkBC0RlbGV0ZUVudHJ5AQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBBQljdXN0b21LZXkJAQRCdXJuAgkA2QQBBQtsYW5kQXNzZXRJZAABAwkBAiE9AgUKY3VzdG9tTmFtZQIACQDMCAIJAQtEZWxldGVFbnRyeQEJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUFA25pbAUDbmlsBQVwcm9wcwkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4CQBkAggFA2FjYwJfOAUGcGllY2VzBQtzdW1UZXJyYWlucwUGY1Byb3BzBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQIcHJvcExpc3QJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAIBXwQIbGFuZHNLZXkJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQRhZGRyBAhsYW5kc1N0cgkAoggBBQhsYW5kc0tleQQHbGFuZHNJbgMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsBAVjb250MAkAkQMCCQC1CQIICQEFdmFsdWUBCQDsBwEJANkEAQkAkQMCBQxsYW5kQXNzZXRJZHMAAAtkZXNjcmlwdGlvbgIBXwUMcmVjQ29udGluZW50BAljb250UHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEWa2V5UmVzVHlwZXNCeUNvbnRpbmVudAEFBWNvbnQwAgswXzBfMF8wXzBfMAIBXwQBcgoAAiRsBQxsYW5kQXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCcCgoFB2Zvcm11bGEAAAIACQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwUDbmlsBQhwcm9wTGlzdAUHbGFuZHNJbgAACQC1CQICCzBfMF8wXzBfMF8wAgFfBQljb250UHJvcHMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCmNoZWNrTWVyZ2UCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBAljb250aW5lbnQIBQFyAl8zBAxjb250aW5lbnRJZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAzwgCBQpjb250aW5lbnRzBQljb250aW5lbnQJAKwCAgITVW5rbm93biBjb250aW5lbnQ6IAUJY29udGluZW50BAh0ZXJyYWlucwkBE2dlblRlcnJhaW5zRm9yTWVyZ2UCCAUBcgJfOQkAaQIJAQ9udW1QaWVjZXNCeVNpemUBBQtuZXdMYW5kU2l6ZQUFU1NJWkUEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQKbmV3TGFuZE51bQkApAMBBQdmcmVlTnVtBAVpc3N1ZQkAwggFCQEHbmZ0TmFtZQIFCm5ld0xhbmROdW0FC25ld0xhbmRTaXplCQC5CQIJAMwIAgUKbmV3TGFuZE51bQkAzAgCBQtuZXdMYW5kU2l6ZQkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBA5uZXdMYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwkAZgIFB25lZWRNYXQAAAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwUHbmVlZE1hdAIBXwQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAkAlAoCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUBcgJfNQMJAGYCCQCQAwEIBQFyAl83AAAJAQtTdHJpbmdFbnRyeQIFCGxhbmRzS2V5CQC7CQIIBQFyAl83AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQMJAGYCCAUBcgJfOAUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMIBQFyAl84CQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEFBWlzc3VlCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFCm5ld0xhbmROdW0FDm5ld0xhbmRBc3NldElkCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUObmV3TGFuZEFzc2V0SWQFBGFkZHIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFCm5ld0xhbmROdW0FBGFkZHIJAQxJbnRlZ2VyRW50cnkCCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQ5uZXdMYW5kQXNzZXRJZAgFAXICXzIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFDm5ld0xhbmRBc3NldElkBQhuZXdMZXZlbAkBDEludGVnZXJFbnRyeQIJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQ5uZXdMYW5kQXNzZXRJZAUEYWRkcgUIbmV3TGV2ZWwJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCAUBcgJfNAkAzAgCBQZuZXdNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToJAQtTdHJpbmdFbnRyeQIJARFrZXlSZXNQcm9wb3J0aW9ucwAJALkJAggFAXICXzYCAV8JAQtTdHJpbmdFbnRyeQIJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQUJY29udGluZW50CQC5CQIIBQFyA18xMAIBXwkBC1N0cmluZ0VudHJ5AgkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkCQC5CQIJAMwIAgUJY29udGluZW50CQDMCAICAUwJAMwIAgUObmV3TGFuZEFzc2V0SWQFA25pbAIBXwkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUEYWRkcgABBQdhc3NldElkBQ5uZXdMYW5kQXNzZXRJZAEDczJtAgRhZGRyDGxhbmRBc3NldElkcwkBDW1lcmdlSW50ZXJuYWwGAgFNAAMCBFNTU1MFBGFkZHIFDGxhbmRBc3NldElkcwAAAQNtMmwCBGFkZHIMbGFuZEFzc2V0SWRzCQENbWVyZ2VJbnRlcm5hbAYCAUwABAIDU01NBQRhZGRyBQxsYW5kQXNzZXRJZHMJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwAEAQRsMnhsAgRhZGRyDGxhbmRBc3NldElkcwkBDW1lcmdlSW50ZXJuYWwGAgJYTAAFAgVTU1NNTAUEYWRkcgUMbGFuZEFzc2V0SWRzCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMALwEGeGwyeHhsAgRhZGRyDGxhbmRBc3NldElkcwkBDW1lcmdlSW50ZXJuYWwGAgNYWEwABgIDTFhMBQRhZGRyBQxsYW5kQXNzZXRJZHMJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwA2AQttZXJnZUNvbW1vbgIEYWRkcgxsYW5kQXNzZXRJZHMEByRtYXRjaDAJAJADAQUMbGFuZEFzc2V0SWRzAwkAAAIABAUHJG1hdGNoMAkBA3MybQIFBGFkZHIFDGxhbmRBc3NldElkcwMJAAACAAMFByRtYXRjaDAJAQNtMmwCBQRhZGRyBQxsYW5kQXNzZXRJZHMDCQAAAgAFBQckbWF0Y2gwCQEEbDJ4bAIFBGFkZHIFDGxhbmRBc3NldElkcwMJAAACAAIFByRtYXRjaDAJAQZ4bDJ4eGwCBQRhZGRyBQxsYW5kQXNzZXRJZHMJAAIBAg1Vbmtub3duIG1lcmdlAQZwcm9sb2cBAWkDAwkBAiE9AggFAWkMb3JpZ2luQ2FsbGVyBQxyZXN0Q29udHJhY3QJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBCmtleUJsb2NrZWQABwcJAAIBAh9Db250cmFjdHMgYXJlIHVuZGVyIG1haW50ZW5hbmNlCQELU3RyaW5nRW50cnkCCQERa2V5TGFzdFR4SWRCeVVzZXIBCQClCAEIBQFpDG9yaWdpbkNhbGxlcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkLAFpAQ1jb25zdHJ1Y3RvclYxAQhyZXN0QWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlSZXN0QWRkcmVzcwAFCHJlc3RBZGRyBQNuaWwBaQEKc2V0QmxvY2tlZAEJaXNCbG9ja2VkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQprZXlCbG9ja2VkAAUJaXNCbG9ja2VkBQNuaWwBaQEJc3Rha2VMYW5kAAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AggFA3BtdAZhbW91bnQAAQkAAgEJAKwCAgkArAICAgRORlQgBQpMQU5EUFJFRklYAiQgdG9rZW4gc2hvdWxkIGJlIGF0dGFjaGVkIGFzIHBheW1lbnQEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQR0aGlzCQACAQIXVW5rbm93biBpc3N1ZXIgb2YgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpMQU5EUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKTEFORFBSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQEC2xhbmROdW1TaXplCQCwAgIIBQVhc3NldARuYW1lAAQEB2xhbmROdW0DCQEIY29udGFpbnMCBQtsYW5kTnVtU2l6ZQIDWFhMCQCzAgIFC2xhbmROdW1TaXplAAMDCQEIY29udGFpbnMCBQtsYW5kTnVtU2l6ZQICWEwJALMCAgULbGFuZE51bVNpemUAAgkAswICBQtsYW5kTnVtU2l6ZQABAwkBASEBCQEJaXNEZWZpbmVkAQkAtgkBBQdsYW5kTnVtCQACAQkArAICAh5DYW5ub3QgcGFyc2UgbGFuZCBudW1iZXIgZnJvbSAIBQVhc3NldARuYW1lBAtsYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIFAWQFC3JlY1RlcnJhaW5zBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBAlsYW5kSW5kZXgJAGkCBQZwaWVjZXMFBVNTSVpFBAVwcm9wcwkBEXVwZGF0ZVByb3BvcnRpb25zAwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AAEEDHJlc0J5Q29udEtleQkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBCQCRAwIFAWQFDHJlY0NvbnRpbmVudAQJY29udFByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUMcmVzQnlDb250S2V5AgswXzBfMF8wXzBfMAIBXwQQdXBkYXRlZENvbnRQcm9wcwkAuQkCCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQFCWNvbnRQcm9wcwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AAECAV8ECGxhbmRzS2V5CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUHYWRkcmVzcwQIbGFuZHNTdHIJAKIIAQUIbGFuZHNLZXkEBWxhbmRzAwkBCWlzRGVmaW5lZAEFCGxhbmRzU3RyCQC9CQIJAQV2YWx1ZQEFCGxhbmRzU3RyAgFfBQNuaWwDCQEPY29udGFpbnNFbGVtZW50AgUFbGFuZHMFC2xhbmRBc3NldElkCQACAQkArAICAiJZb3VyIHN0YWtlZCBsYW5kcyBhbHJlYWR5IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAMJAGcCCQCQAwEFBWxhbmRzBRhNQVhfTEFORFNfU1RBS0VEX0JZX1VTRVIJAAIBCQCsAgIJAKwCAgIZWW91ciBhbHJlYWR5IHN0YWtlZCBtYXggKAkApAMBBRhNQVhfTEFORFNfU1RBS0VEX0JZX1VTRVICBykgbGFuZHMECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAlwaWVjZXNLZXkJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwQJb2xkUGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEFCXBpZWNlc0tleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkAzQgCBQVsYW5kcwULbGFuZEFzc2V0SWQCAV8JAMwIAgkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQkAZAIFCW9sZFBpZWNlcwUGcGllY2VzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQdhZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgULbGFuZEFzc2V0SWQFB2FkZHJlc3MFCmluZnJhTGV2ZWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMJAMwIAgkBC1N0cmluZ0VudHJ5AgUMcmVzQnlDb250S2V5BRB1cGRhdGVkQ29udFByb3BzCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsBQl3bGdSZXN1bHQBaQELdW5zdGFrZUxhbmQBDWxhbmRBc3NldElkSW4EDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQZjYWxsZXIEAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFDWNsYWltTW9kZUR1Y2sFDWxhbmRBc3NldElkSW4EC2xhbmRBc3NldElkCAUBYwJfMgQBZAgFAWMCXzMECGxhbmRzS2V5CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUEYWRkcgQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIFAWQFC3JlY1RlcnJhaW5zBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBAlsYW5kSW5kZXgJAGkCBQZwaWVjZXMFBVNTSVpFBAVwcm9wcwkBEXVwZGF0ZVByb3BvcnRpb25zAwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wEEDHJlc0J5Q29udEtleQkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBCQCRAwIFAWQFDHJlY0NvbnRpbmVudAQJY29udFByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUMcmVzQnlDb250S2V5AgswXzBfMF8wXzBfMAIBXwQQdXBkYXRlZENvbnRQcm9wcwkAuQkCCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQFCWNvbnRQcm9wcwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wECAV8EC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyBQtsYW5kQXNzZXRJZAUGcGllY2VzBQ1jbGFpbU1vZGVEdWNrBAVsYW5kcwkAvQkCCQELdmFsdWVPckVsc2UCCQCiCAEFCGxhbmRzS2V5AgACAV8EA2lkeAkAzwgCBQVsYW5kcwULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQNpZHgJAAIBCQCsAgICIFlvdXIgc3Rha2VkIGxhbmRzIGRvbid0IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQOZ292UmVsZWFzZVRpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgULZ292Q29udHJhY3QJARVrZXlVc2VyR3dsUmVsZWFzZVRpbWUBBQRhZGRyAAADCQBnAgUOZ292UmVsZWFzZVRpbWUFA25vdwkAAgEJAKwCAgI5WW91ciBnV0wgYXJlIHRha2luZyBwYXJ0IGluIHZvdGluZywgY2Fubm90IHVuc3Rha2UgdW50aWwgCQCkAwEFDmdvdlJlbGVhc2VUaW1lBA5hcmJSZWxlYXNlVGltZQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgULd2xnQ29udHJhY3QJARRrZXlMYXN0QXJiVGltZUJ5VXNlcgEFBGFkZHIAAAUOYXJiaXRyYWdlRGVsYXkDCQBmAgUOYXJiUmVsZWFzZVRpbWUFA25vdwkAAgEJAKwCAgI/WW91ciBzdGFrZWQgbGFuZHMgdG9vayBwYXJ0IGluIGFyYml0cmFnZSwgY2Fubm90IHVuc3Rha2UgdW50aWwgCQCkAwEFDmFyYlJlbGVhc2VUaW1lBAlwaWVjZXNLZXkJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUEYWRkcgQMc3Rha2VkUGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEFCXBpZWNlc0tleQAABAluZXdQaWVjZXMDCQBmAgUGcGllY2VzBQxzdGFrZWRQaWVjZXMAAAkAZQIFDHN0YWtlZFBpZWNlcwUGcGllY2VzBAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQRhZGRyBQNuaWwFA25pbAkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABCQDZBAEFC2xhbmRBc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUEYWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5UmVzUHJvcG9ydGlvbnMABQVwcm9wcwkAzAgCCQELU3RyaW5nRW50cnkCBQxyZXNCeUNvbnRLZXkFEHVwZGF0ZWRDb250UHJvcHMJAMwIAgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkAzAgCAwkAZgIJAJADAQUFbGFuZHMAAQkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkAzAgCCQEMSW50ZWdlckVudHJ5AgUJcGllY2VzS2V5BQluZXdQaWVjZXMJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwFCXdsZ1Jlc3VsdAFpAQlzdGFrZUR1Y2sABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEB2Fzc2V0SWQJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCAUDcG10BmFtb3VudAABCQACAQkArAICCQCsAgICBE5GVCAFCkRVQ0tQUkVGSVgCJCB0b2tlbiBzaG91bGQgYmUgYXR0YWNoZWQgYXMgcGF5bWVudAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAMDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQ1pbmN1YmF0b3JBZGRyCQECIT0CCAUFYXNzZXQGaXNzdWVyBQticmVlZGVyQWRkcgcJAAIBCQCsAgIJAKwCAgISVW5rbm93biBpc3N1ZXIgb2YgBQpEVUNLUFJFRklYAgYgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpEVUNLUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKRFVDS1BSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQECmFzc2V0SWRTdHIJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQphc3NldElkU3RyAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkAwkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgIdWW91IGFscmVhZHkgc3Rha2VkIG9uZSBkdWNrOiAIBQVhc3NldARuYW1lBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyBAhsb2NhdGlvbgkAoggBBQZsb2NLZXkEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQphc3NldElkU3RyBAhiYWNrcGFjawkAoggBBQVicEtleQQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFCmFzc2V0SWRTdHIEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQUKYXNzZXRJZFN0cgAABAljdXJIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQphc3NldElkU3RyBQNuaWwDCQEJaXNEZWZpbmVkAQUIbG9jYXRpb24FA25pbAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBQNuaWwDCQEJaXNEZWZpbmVkAQUIYmFja3BhY2sFA25pbAkAzQgCCQDNCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6BQNuaWwJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFCWN1ckhlYWx0aAUMcHJvbG9nQWN0aW9uAWkBC3Vuc3Rha2VEdWNrAQphc3NldElkU3RyBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB2Fzc2V0SWQJANkEAQUKYXNzZXRJZFN0cgQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUKYXNzZXRJZFN0cgMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQDCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAAIBCQCsAgIJAKwCAgIJVGhlIGR1Y2sgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBEGtleUR1Y2tJZFRvT3duZXIBBQphc3NldElkU3RyCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQdhZGRyZXNzCQACAQIXU3Rha2VkIE5GVCBpcyBub3QgeW91cnMDCQEPY2hlY2tUb3VybmFtZW50AQUKYXNzZXRJZFN0cgkAAgECG3Vuc3Rha2VEdWNrX2NoZWNrVG91cm5hbWVudAMJAQ1jaGVja0RlbGl2ZXJ5AQUKYXNzZXRJZFN0cgkAAgECGXVuc3Rha2VEdWNrX2NoZWNrRGVsaXZlcnkECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQphc3NldElkU3RyBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFCmFzc2V0SWRTdHIAAAQGaGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFADCQBmAgUFbWF4SFAFBmhlYWx0aAkAAgEJAKwCAgkArAICAhlQbGVhc2UgaGVhbCB5b3VyIGR1Y2sgdG8gCQCkAwEFBW1heEhQAhNocCBiZWZvcmUgdW5zdGFraW5nCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEFB3RpbWVLZXkJAMwIAgkBC0RlbGV0ZUVudHJ5AQUJa2V5SGVhbHRoCQDMCAIJAQtEZWxldGVFbnRyeQEJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgkAzAgCCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkRVQ0tQUkVGSVgFCmFzc2V0SWRTdHIFB2FkZHJlc3MJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAFpAQhjbGFpbVJlcwIGYW1vdW50DmxhbmRBc3NldElkU3RyBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAZyZXN1bHQJARBjbGFpbVJlc0ludGVybmFsBAUEYWRkcgUGYW1vdW50BQ1jbGFpbU1vZGVEdWNrBQ5sYW5kQXNzZXRJZFN0cgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkCQCUCgIJAM0IAgkAzQgCCQDNCAIJAM4IAggFBnJlc3VsdAJfMQgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkCQBrAwUHeHBDbGFpbQUGYW1vdW50BQVNVUxUOAJfMQkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfMgkAuQkCCAUGcmVzdWx0Al8zAgE6CQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al80CQC5CQIIBQZyZXN1bHQCXzUCAToFDHByb2xvZ0FjdGlvbgkAkQMCCAUGcmVzdWx0Al8zBQhicElkeFJlcwFpAQxjbGFpbVJlc1RvV0gCBmFtb3VudA5sYW5kQXNzZXRJZFN0cgQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQGcmVzdWx0CQEQY2xhaW1SZXNJbnRlcm5hbAQFBGFkZHIFBmFtb3VudAULY2xhaW1Nb2RlV2gFDmxhbmRBc3NldElkU3RyCQCUCgIJAM0IAgkAzQgCCQDNCAIJAM4IAggFBnJlc3VsdAJfMQgJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgkAawMFB3hwQ2xhaW0FBmFtb3VudAUFTVVMVDgCXzEJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzIJALkJAggFBnJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfNAkAuQkCCAUGcmVzdWx0Al81AgE6BQxwcm9sb2dBY3Rpb24JAJEDAggFBnJlc3VsdAJfNQUId2hJZHhSZXMBaQEGZmxpZ2h0AgdtZXNzYWdlA3NpZwQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAh1c2VyQWRkcgkApQgBCAUBaQZjYWxsZXIEAWYJAQxmbGlnaHRDb21tb24DBQh1c2VyQWRkcgUHbWVzc2FnZQUDc2lnBAVuZXdIUAgFAWYCXzEEC2R1Y2tBc3NldElkCAUBZgJfMgQGbG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCiCAEFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBAtuZXdMb2NhdGlvbggFAWYCXzQDCQAAAgULbmV3TG9jYXRpb24FC2N1ckxvY2F0aW9uCQACAQIiWW91IGNhbid0IGZseSB0byB0aGUgc2FtZSBsb2NhdGlvbgQGbmV3TG9jCQC1CQIFC25ld0xvY2F0aW9uAgFfBAZpc1RvdXIJAAACCQCRAwIFBm5ld0xvYwUKbG9jSWR4VHlwZQIBVAQFZXFLZXkJARBrZXlEdWNrRXF1aXBtZW50AQULZHVja0Fzc2V0SWQECWN1cnJlbnRFcQkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywEDSR0MDY2ODEzNjY5MTAJARFzdWJ0cmFjdEVxdWlwbWVudAIFCWN1cnJlbnRFcQgFAWYCXzUEBW5ld0VxCAUNJHQwNjY4MTM2NjkxMAJfMQQPc2hvdWxkWmVyb0J1ZmZzCAUNJHQwNjY4MTM2NjkxMAJfMgQJbG9jVG9TYXZlAwkBASEBCQEOaXNJblRvdXJuYW1lbnQCBRJ0b3VybmFtZW50Q29udHJhY3QFC2N1ckxvY2F0aW9uAwUGaXNUb3VyCQACAQkArAICCQCsAgIJAKwCAgIWQ2hlYXQgYXR0ZW1wdDogb2xkTG9jPQULY3VyTG9jYXRpb24CCSwgbmV3TG9jPQULbmV3TG9jYXRpb24DCQBmAgUFbmV3SFAAAAULbmV3TG9jYXRpb24FC2N1ckxvY2F0aW9uAwkBASEBCQEOaXNJblRvdXJuYW1lbnQCBRJ0b3VybmFtZW50Q29udHJhY3QFC25ld0xvY2F0aW9uCQACAQIqWW91ciBkdWNrIGlzIHRha2luZyBwYXJ0IGluIHRoZSB0b3VybmFtZW50BAVzY29yZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBm5ld0xvYwUIbG9jSWR4SWQEBmN1ckxvYwkAtQkCBQtjdXJMb2NhdGlvbgIBXwQGbGFzdElkCQELdmFsdWVPckVsc2UCCQCaCAIFEnRvdXJuYW1lbnRDb250cmFjdAUNbGFzdFRvdXJJZEtleQAAAwkBAiE9AgUFc2NvcmUJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGY3VyTG9jBQhsb2NJZHhJZAABCQACAQkArAICCQCsAgIJAKwCAgIWQ2hlYXQgYXR0ZW1wdDogb2xkTG9jPQULY3VyTG9jYXRpb24CCSwgbmV3TG9jPQULbmV3TG9jYXRpb24DCQBmAgUFbmV3SFAAAAQJbG9jYWxCZXN0CQELdmFsdWVPckVsc2UCCQCaCAIFEnRvdXJuYW1lbnRDb250cmFjdAkBGmtleUJlc3RSZXN1bHRCeVRvdXJBbmREdWNrAgUGbGFzdElkBQtkdWNrQXNzZXRJZAAABAh1cGRMb2NhbAMJAGYCBQVzY29yZQUJbG9jYWxCZXN0CQD8BwQFEnRvdXJuYW1lbnRDb250cmFjdAIOc2F2ZUR1Y2tSZXN1bHQJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgUFc2NvcmUFA25pbAUDbmlsBQR1bml0AwkAAAIFCHVwZExvY2FsBQh1cGRMb2NhbAULbmV3TG9jYXRpb24JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4FC2N1ckxvY2F0aW9uCQCUCgIJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQZsb2NLZXkFCWxvY1RvU2F2ZQkAzAgCCQELU3RyaW5nRW50cnkCBQVlcUtleQUFbmV3RXEJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQFBW5ld0hQCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAwUPc2hvdWxkWmVyb0J1ZmZzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQxrZXlEdWNrQnVmZnMBBQtkdWNrQXNzZXRJZAIJMF8wXzBfMF8wBQNuaWwJAM4IAgUDbmlsCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQDCQBmAgUFbmV3SFAAAAUPeHBTdWNjZXNzRmxpZ2h0BQx4cEZhaWxGbGlnaHQCXzEIBQFmAl8zAWkBBGhlYWwDCnF1YW50aXR5TDEKcXVhbnRpdHlMMgpxdWFudGl0eUwzBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwMDCQBmAgAABQpxdWFudGl0eUwxBgkAZgIAAAUKcXVhbnRpdHlMMgYJAGYCAAAFCnF1YW50aXR5TDMJAAIBAhtRdWFudGl0eSBjYW5ub3QgYmUgbmVnYXRpdmUEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAhRoZWFsX2NoZWNrVG91cm5hbWVudAMJAQ1jaGVja0RlbGl2ZXJ5AQULZHVja0Fzc2V0SWQJAAIBAhJoZWFsX2NoZWNrRGVsaXZlcnkEA3F0cwkAzAgCBQpxdWFudGl0eUwxCQDMCAIFCnF1YW50aXR5TDIJAMwIAgUKcXVhbnRpdHlMMwUDbmlsBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQAAAQJb2xkSGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFADCQBnAgUJb2xkSGVhbHRoBQVtYXhIUAkAAgEJAKwCAgkArAICAg9IUCBzaG91bGQgYmUgPCAJAKQDAQUFbWF4SFACCCB0byBoZWFsBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQIcHJvZExpc3QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAvAkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8KAQtpdGVyYXRlUHJvZAIDYWNjBnJlY2lwZQQBbggFA2FjYwJfMgQBeAMJAGYCCQCQAwEFCHByb2RMaXN0BQFuCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QFAW4AAAMJAGYCAAMFAW4EAXEJAJEDAgUDcXRzBQFuAwkAZgIFAXEFAXgJAAIBCQCsAgIJAKwCAgkArAICAg5Zb3UgaGF2ZSBvbmx5IAkApAMBBQF4AgQgb2YgCQCRAwIFCXByb2RUeXBlcwUBbgkAlQoDCQDNCAIIBQNhY2MCXzEJAKQDAQkAZQIFAXgFAXEJAGQCBQFuAAEJAGQCCAUDYWNjAl8zCQBoAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgUGcmVjaXBlAgFfBQpySWR4RWZmZWN0BQFxCQCVCgMJAM0IAggFA2FjYwJfMQkApAMBBQF4CQBkAgUBbgABCAUDYWNjAl8zBAZyZXN1bHQKAAIkbAUQcHJvZHVjdGlvbk1hdHJpeAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwUDbmlsAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELaXRlcmF0ZVByb2QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgQJbmV3SGVhbHRoCQCXAwEJAMwIAgUFbWF4SFAJAMwIAgkAZAIFCW9sZEhlYWx0aAgFBnJlc3VsdAJfMwUDbmlsCQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQluZXdIZWFsdGgJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIJALkJAggFBnJlc3VsdAJfMQIBXwUDbmlsAgE6CQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQJAGgCBQZ4cEhlYWwJAGQCCQBkAgUKcXVhbnRpdHlMMQUKcXVhbnRpdHlMMgUKcXVhbnRpdHlMMwJfMQUJbmV3SGVhbHRoAWkBBmhlYWxFUwAEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECFmhlYWxFU19jaGVja1RvdXJuYW1lbnQDCQENY2hlY2tEZWxpdmVyeQEFC2R1Y2tBc3NldElkCQACAQIUaGVhbEVTX2NoZWNrRGVsaXZlcnkECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAMJAGYCBQlvbGRIZWFsdGgAAAkAAgECKEhQIHNob3VsZCBiZSAwIHRvIGNhbGwgRW1lcmdlbmN5IFNlcnZpY2UEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAhwcm9kTGlzdAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwQNbWVkS2l0QW1vdW50MQMJAGYCCQCQAwEFCHByb2RMaXN0AAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAAAAAAEDW1lZEtpdEFtb3VudDIDCQBmAgkAkAMBBQhwcm9kTGlzdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QAAQAABA1tZWRLaXRBbW91bnQzAwkAZgIJAJADAQUIcHJvZExpc3QAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0AAIAAAMDAwkAZgIFDW1lZEtpdEFtb3VudDEAAAYJAGYCBQ1tZWRLaXRBbW91bnQyAAAGCQBmAgUNbWVkS2l0QW1vdW50MwAACQACAQIfWW91IGhhdmUgdG8gdXNlIG93biBNZWRpY2FsIEtpdAQIZXhpc3RTdHIJAJ0IAgUPZWNvbm9teUNvbnRyYWN0CQEOa2V5RXNXYXJlaG91c2UABAxleGlzdEFtb3VudHMDCQEJaXNEZWZpbmVkAQUIZXhpc3RTdHIJALwJAgkBBXZhbHVlAQUIZXhpc3RTdHICAV8FA25pbAQLZXhpc3RBbW91bnQDCQBmAgkAkAMBBQxleGlzdEFtb3VudHMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDGV4aXN0QW1vdW50cwAAAAADCQBnAgAABQtleGlzdEFtb3VudAkAAgECOVRoZXJlIGFyZSBubyBNZWRpY2FsIEtpdHMgTDEgYXQgRW1lcmdlbmN5IFNlcnZpY2Ugc3RvcmFnZQQJbmV3SGVhbHRoCQBkAgUJb2xkSGVhbHRoCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgAAAIBXwUKcklkeEVmZmVjdAQFbmV3RVMJALkJAgkAzAgCCQCkAwEJAGUCBQtleGlzdEFtb3VudAABCQDRCAIFDGV4aXN0QW1vdW50cwAAAgFfBAZyZWNpcGUJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4AAACAV8ECHRvdGFsTWF0CQESZ2V0UmVjaXBlTWF0ZXJpYWxzAQUGcmVjaXBlBAlzZWxsUHJpY2UJAGsDCQBoAgUIdG90YWxNYXQFCkVTU0VMTENPRUYFEFJFU09VUkNFUFJJQ0VNSU4JAGgCBQVNVUxUOAUOUFJPRFVDVFBLR1NJWkUDCQECIT0CCAUDcG10BmFtb3VudAUJc2VsbFByaWNlCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUJc2VsbFByaWNlBAZyZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPZWNvbm9teUNvbnRyYWN0Ag91cGRhdGVFc1N0b3JhZ2UJAMwIAgUFbmV3RVMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgULdXNkdEFzc2V0SWQFCXNlbGxQcmljZQUDbmlsCQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQluZXdIZWFsdGgJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAUIeHBDYWxsRVMCXzEFBnJlc3VsdAFpAQ51cGRhdGVCYWNrcGFjawILZHVja0Fzc2V0SWQHbmV3UGFjawMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAUHbmV3UGFjawUDbmlsBQduZXdQYWNrAWkBD2NvbW1pdEZvclJhbmRvbQAEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkEC2ZpbmlzaEJsb2NrCQBkAgUGaGVpZ2h0BQtyYW5kb21EZWxheQQEYWRkcgkApQgBCAUBaQZjYWxsZXIJAJQKAgkAzQgCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEJa2V5Q29tbWl0AQUEYWRkcgULZmluaXNoQmxvY2sFA25pbAUMcHJvbG9nQWN0aW9uBQtmaW5pc2hCbG9jawFpAQphd2FyZFNMYW5kAQdhZGRyZXNzAwkBAiE9AggFAWkGY2FsbGVyBRJ0b3VybmFtZW50Q29udHJhY3QJAAIBAg1BY2Nlc3MgZGVuaWVkAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBnJlc3VsdAkBEmV4cGVkaXRpb25JbnRlcm5hbAIJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MIBQFpDXRyYW5zYWN0aW9uSWQJAJQKAggFBnJlc3VsdAJfMQgIBQZyZXN1bHQCXzICXzEBaQEIYnV5U0xhbmQABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEDCQECIT0CCAUDcG10BmFtb3VudAUHRVhQVVNEVAkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFB0VYUFVTRFQEBnJlc3VsdAkBEmV4cGVkaXRpb25JbnRlcm5hbAIIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAQLYWNyZXNSZXN1bHQJAQVhc0ludAEJAPwHBAUNYWNyZXNDb250cmFjdAIJYnVybkFjcmVzCQDMCAIFDFNfQ09TVF9BQ1JFUwUDbmlsBQNuaWwJAJQKAgkAzQgCCQDOCAIJAM0IAggFBnJlc3VsdAJfMQkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0CAUDcG10BmFtb3VudAULdXNkdEFzc2V0SWQICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQp4cE5ld1NMYW5kAl8xBQxwcm9sb2dBY3Rpb24JAJQKAggIBQZyZXN1bHQCXzICXzEFC2FjcmVzUmVzdWx0AWkBCmV4cGVkaXRpb24CB21lc3NhZ2UDc2lnBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQECHVzZXJBZGRyCQClCAEIBQFpBmNhbGxlcgQBZgkBDGZsaWdodENvbW1vbgMFCHVzZXJBZGRyBQdtZXNzYWdlBQNzaWcEC2R1Y2tBc3NldElkCAUBZgJfMgQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQFbUxpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8EBm5ld01hdAkAuQkCCQERc3VidHJhY3RNYXRlcmlhbHMDBgUFbUxpc3QFDEVYUE1BVEVSSUFMUwIBXwQFZXFLZXkJARBrZXlEdWNrRXF1aXBtZW50AQULZHVja0Fzc2V0SWQECWN1cnJlbnRFcQkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywEDSR0MDc1ODM4NzU5MzUJARFzdWJ0cmFjdEVxdWlwbWVudAIFCWN1cnJlbnRFcQgFAWYCXzUEBW5ld0VxCAUNJHQwNzU4Mzg3NTkzNQJfMQQPc2hvdWxkWmVyb0J1ZmZzCAUNJHQwNzU4Mzg3NTkzNQJfMgQBZQkBEmV4cGVkaXRpb25JbnRlcm5hbAIIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAQCaWQICAUBZQJfMgJfMQQGcmVzdWx0AwkAZwIAAAgFAWYCXzEJAJUKAwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoAAAJAMwIAgkBC1N0cmluZ0VudHJ5AgUFZXFLZXkFBW5ld0VxBQNuaWwCAAAACQCVCgMJAM4IAggFAWUCXzEDBQ9zaG91bGRaZXJvQnVmZnMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDGtleUR1Y2tCdWZmcwEFC2R1Y2tBc3NldElkAgkwXzBfMF8wXzAFA25pbAkAzQgCCQDNCAIJAM0IAgkAzQgCBQNuaWwJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIICAUBZQJfMgJfMgkAzAgCAgFMCQDMCAIFAmlkBQNuaWwCAV8JAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgIBQFmAl8xCQELU3RyaW5nRW50cnkCBQVlcUtleQUFbmV3RXEJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCBQZuZXdNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToFAmlkCAUBZgJfMwMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECGmV4cGVkaXRpb25fY2hlY2tUb3VybmFtZW50AwkBDWNoZWNrRGVsaXZlcnkBBQtkdWNrQXNzZXRJZAkAAgECGGV4cGVkaXRpb25fY2hlY2tEZWxpdmVyeQQLYWNyZXNSZXN1bHQJAQVhc0ludAEJAPwHBAUNYWNyZXNDb250cmFjdAIJYnVybkFjcmVzCQDMCAIFDFNfQ09TVF9BQ1JFUwUDbmlsBQNuaWwJAJQKAgkAzQgCCQDOCAIIBQZyZXN1bHQCXzEICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAUKeHBOZXdTTGFuZAJfMQUMcHJvbG9nQWN0aW9uCQCVCgMIBQZyZXN1bHQCXzIIBQZyZXN1bHQCXzMFC2FjcmVzUmVzdWx0AWkBEGJ1eVNMYW5kRm9yQWNyZXMABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQxhY3Jlc0Fzc2V0SWQJAAIBAhRBQ1JFUyBwYXltZW50cyBvbmx5IQMJAQIhPQIFA2FtdAUMU19DT1NUX0FDUkVTCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUMU19DT1NUX0FDUkVTBAZyZXN1bHQJARJleHBlZGl0aW9uSW50ZXJuYWwCCAUBaQZjYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQEC2FjcmVzUmVzdWx0CQEFYXNJbnQBCQD8BwQFDWFjcmVzQ29udHJhY3QCCWJ1cm5BY3JlcwkAzAgCBQxTX0NPU1RfQUNSRVMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUMYWNyZXNBc3NldElkBQNhbXQFA25pbAkAlAoCCQDNCAIJAM4IAgkAzQgCCAUGcmVzdWx0Al8xCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAgJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgkApQgBCAUBaQZjYWxsZXIFCnhwTmV3U0xhbmQCXzEFDHByb2xvZ0FjdGlvbgkAlAoCCAgFBnJlc3VsdAJfMgJfMQULYWNyZXNSZXN1bHQBaQEMdXBncmFkZUluZnJhAQtsYW5kQXNzZXRJZAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAZyZXN1bHQJAQ11cEluZnJhQ29tbW9uBAYIBQFpBmNhbGxlcgAABQtsYW5kQXNzZXRJZAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAkAlAoCCQDOCAIJAM0IAggFBnJlc3VsdAJfMQUMcHJvbG9nQWN0aW9uCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQJAGsDBQ54cFVwZ3JhZGVJbmZyYQgFBnJlc3VsdAJfMwUFTVVMVDgCXzEIBQZyZXN1bHQCXzIBaQEQYWN0aXZhdGVBcnRpZmFjdAIHYXJ0TmFtZQ5sYW5kQXNzZXRJZE9wdAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpBmNhbGxlcgQGcmVzdWx0BAckbWF0Y2gwBQdhcnROYW1lAwkAAAICB1BSRVNBTEUFByRtYXRjaDAJARJhY3RpdmF0ZVByZXNhbGVBcnQCBQRhZGRyBQ5sYW5kQXNzZXRJZE9wdAMJAAACAgdPTkJPQVJEBQckbWF0Y2gwCQESYWN0aXZhdGVPbmJvYXJkQXJ0AQUEYWRkcgkAAgECEFVua25vd24gYXJ0aWZhY3QJAM0IAgUGcmVzdWx0BQxwcm9sb2dBY3Rpb24BaQEKbWVyZ2VMYW5kcwEMbGFuZEFzc2V0SWRzBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBnJlc3VsdAkBC21lcmdlQ29tbW9uAgkApQgBCAUBaQZjYWxsZXIFDGxhbmRBc3NldElkcwkAlAoCCQDOCAIJAM0IAggFBnJlc3VsdAJfMQUMcHJvbG9nQWN0aW9uCAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCCQClCAEIBQFpBmNhbGxlcgUHeHBNZXJnZQJfMQgFBnJlc3VsdAJfMgFpAQ1jYXJnb0V4Y2hhbmdlAgxjYXJnb0xpc3RTdHILbGFuZEFzc2V0SWQEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQKY2FyZ29QYXJ0cwkAvAkCBQxjYXJnb0xpc3RTdHICAToEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUFBVNTSVpFBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgQDbG9jCQC1CQIJAQV2YWx1ZQEFC2N1ckxvY2F0aW9uAgFfAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUwJAAIBCQCsAgIJAKwCAgIWRHVjayBsb2NhdGlvbiB0eXBlIGlzIAkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCESwgYnV0IHNob3VsZCBiZSBMAwkBAiE9AgkAkQMCBQNsb2MFCGxvY0lkeElkBQtsYW5kQXNzZXRJZAkAAgEJAKwCAgIbRHVjayBzaG91bGQgYmUgb24gdGhlIGxhbmQgBQtsYW5kQXNzZXRJZAQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAQJY3VycmVudFdoCQEMZ2V0V2FyZWhvdXNlAwUFd2hLZXkFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBnJlc3VsdAkBCW1vdmVTdHVmZgMFCmNhcmdvUGFydHMFCWN1cnJlbnRXaAULY3VycmVudFBhY2sEBGxvZnQJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAIBXwQFbG9mdE8JAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQIBQZyZXN1bHQCXzcEBWxvZnRGCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUIBQZyZXN1bHQCXzcJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIIBQZyZXN1bHQCXzQJAMwIAggFBnJlc3VsdAJfNQkAzAgCCAUGcmVzdWx0Al82BQNuaWwCAToJAMwIAgkBC1N0cmluZ0VudHJ5AgUFd2hLZXkJALoJAgkAzAgCCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMJAMwIAggFBnJlc3VsdAJfMQkAzAgCCAUGcmVzdWx0Al8yCQDMCAIIBQZyZXN1bHQCXzMJAMwIAgkAuQkCCQDMCAIJAJEDAgUEbG9mdAUJdm9sTG9ja2VkCQDMCAIJAKQDAQUFbG9mdE8JAMwIAgkApAMBBQVsb2Z0RgkAzAgCCQCRAwIFBGxvZnQFCHZvbFRvdGFsBQNuaWwCAV8FA25pbAIBOgkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAFpAQ1zYXZlV2FyZWhvdXNlAgV3aFN0cgtsYW5kQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAQCd2gJALwJAgUFd2hTdHICAToDCQECIT0CCQCQAwEFAndoAAUJAAIBAjB3YXJlaG91c2Ugc3RyaW5nIHNob3VsZCBjb250YWluIDQgJzonIHNlcGFyYXRvcnMEBWxvZnRMCQCRAwIJALUJAgkAkQMCBQJ3aAUJd2hJZHhMT0ZUAgFfBQl2b2xMb2NrZWQEBWxvZnRPCQEXZ2V0V2FyZWhvdXNlT2NjdXBpZWRWb2wBBQJ3aAQFbG9mdFQJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEJAJEDAgUCd2gFC3doSWR4TGV2ZWxzBAVsb2Z0RgkAZQIJAGUCBQVsb2Z0VAkBDXBhcnNlSW50VmFsdWUBBQVsb2Z0TAUFbG9mdE8ECG5ld1doU3RyCQC6CQIJAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgkAkQMCBQJ3aAUId2hJZHhSZXMJAMwIAgkAkQMCBQJ3aAUId2hJZHhNYXQJAMwIAgkAkQMCBQJ3aAUJd2hJZHhQcm9kCQDMCAIJALkJAgkAzAgCBQVsb2Z0TAkAzAgCCQCkAwEFBWxvZnRPCQDMCAIJAKQDAQUFbG9mdEYJAMwIAgkApAMBBQVsb2Z0VAUDbmlsAgFfBQNuaWwCAToJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQV3aEtleQUIbmV3V2hTdHIFA25pbAUIbmV3V2hTdHIBaQESZml4V2FyZWhvdXNlRm9ybWF0AQtsYW5kQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUMcmVzdENvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQJbGFuZEluZGV4CQBpAgkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplBQVTU0laRQQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAEAndoCQEMZ2V0V2FyZWhvdXNlAwUFd2hLZXkFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAQFbG9mdEwJAQVhc0ludAEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhpyZWNhbGNMb2NrZWRWb2x1bWVSRUFET05MWQkAzAgCBQtsYW5kQXNzZXRJZAkAzAgCBQJ3aAUDbmlsBQNuaWwEBWxvZnRPCQEXZ2V0V2FyZWhvdXNlT2NjdXBpZWRWb2wBBQJ3aAQFbG9mdFQJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEJAJEDAgUCd2gFC3doSWR4TGV2ZWxzBAVsb2Z0RgkAZQIJAGUCBQVsb2Z0VAUFbG9mdEwFBWxvZnRPBAhuZXdXaFN0cgkAugkCCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIJAJEDAgUCd2gFCHdoSWR4UmVzCQDMCAIJAJEDAgUCd2gFCHdoSWR4TWF0CQDMCAIJAJEDAgUCd2gFCXdoSWR4UHJvZAkAzAgCCQC5CQIJAMwIAgkApAMBBQVsb2Z0TAkAzAgCCQCkAwEFBWxvZnRPCQDMCAIJAKQDAQUFbG9mdEYJAMwIAgkApAMBBQVsb2Z0VAUDbmlsAgFfBQNuaWwCAToJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQV3aEtleQUIbmV3V2hTdHIFA25pbAUIbmV3V2hTdHIBaQEXZml4Q29udGluZW50UHJvcG9ydGlvbnMBDGxhbmRBc3NldElkcwMJAQIhPQIIBQFpBmNhbGxlcgUMcmVzdENvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAoBCGdldFByb3BzAgNhY2MEY29udAkAzQgCBQNhY2MJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBBQRjb250AgswXzBfMF8wXzBfMAQBcAoAAiRsBQpjb250aW5lbnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhnZXRQcm9wcwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUKAQlwcm9jZXNzb3ICA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8ECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBQVTU0laRQQEY29udAkAkQMCBQFkBQxyZWNDb250aW5lbnQEDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCBQFkBQtyZWNUZXJyYWlucwQMY29udGluZW50SWR4CQEFdmFsdWUBCQDPCAIFCmNvbnRpbmVudHMFBGNvbnQECWNvbnRQcm9wcwkAtQkCCQCRAwIFA2FjYwUMY29udGluZW50SWR4AgFfBAd1cGRhdGVkCQC5CQIJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAUJY29udFByb3BzBQ10ZXJyYWluQ291bnRzBQlsYW5kSW5kZXgAAQIBXwQHJG1hdGNoMAUEY29udAMJAAACAghBbWVyaWNhcwUHJG1hdGNoMAkAzAgCBQd1cGRhdGVkCQDMCAIJAJEDAgUDYWNjAAEJAMwIAgkAkQMCBQNhY2MAAgkAzAgCCQCRAwIFA2FjYwADCQDMCAIJAJEDAgUDYWNjAAQFA25pbAMJAAACAgZFdXJvcGUFByRtYXRjaDAJAMwIAgkAkQMCBQNhY2MAAAkAzAgCBQd1cGRhdGVkCQDMCAIJAJEDAgUDYWNjAAIJAMwIAgkAkQMCBQNhY2MAAwkAzAgCCQCRAwIFA2FjYwAEBQNuaWwDCQAAAgIEQXNpYQUHJG1hdGNoMAkAzAgCCQCRAwIFA2FjYwAACQDMCAIJAJEDAgUDYWNjAAEJAMwIAgUHdXBkYXRlZAkAzAgCCQCRAwIFA2FjYwADCQDMCAIJAJEDAgUDYWNjAAQFA25pbAMJAAACAgZBZnJpY2EFByRtYXRjaDAJAMwIAgkAkQMCBQNhY2MAAAkAzAgCCQCRAwIFA2FjYwABCQDMCAIJAJEDAgUDYWNjAAIJAMwIAgUHdXBkYXRlZAkAzAgCCQCRAwIFA2FjYwAEBQNuaWwDCQAAAgIHT2NlYW5pYQUHJG1hdGNoMAkAzAgCCQCRAwIFA2FjYwAACQDMCAIJAJEDAgUDYWNjAAEJAMwIAgkAkQMCBQNhY2MAAgkAzAgCCQCRAwIFA2FjYwADCQDMCAIFB3VwZGF0ZWQFA25pbAkAAgECD3dyb25nIGNvbnRpbmVudAQBcgoAAiRsBQxsYW5kQXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQFwCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlwcm9jZXNzb3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBAghBbWVyaWNhcwkAkQMCBQFyAAAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBAgZFdXJvcGUJAJEDAgUBcgABCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQIEQXNpYQkAkQMCBQFyAAIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBAgZBZnJpY2EJAJEDAgUBcgADCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQIHT2NlYW5pYQkAkQMCBQFyAAQFA25pbAAAAWkBD2ZpeFN0YWtlZFBpZWNlcwEHYWRkcmVzcwMJAQIhPQIIBQFpBmNhbGxlcgUMcmVzdENvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQMc3Rha2VkUGllY2VzAwkAAAIFB2FkZHJlc3MCAAAABAhsYW5kc1N0cgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQdhZGRyZXNzBAVsYW5kcwMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsCgEHb25lTGFuZAIDYWNjC2xhbmRBc3NldElkBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAhsYW5kU2l6ZQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUJAGQCBQNhY2MJAQ9udW1QaWVjZXNCeVNpemUBBQhsYW5kU2l6ZQoAAiRsBQVsYW5kcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHb25lTGFuZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBQdhZGRyZXNzBQxzdGFrZWRQaWVjZXMFA25pbAUMc3Rha2VkUGllY2VzAWkBDXNldEN1c3RvbU5hbWUDB2Fzc2V0SWQKY3VzdG9tTmFtZQR0eXBlBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEDCQECIT0CCAUDcG10BmFtb3VudAUMUkVOQU1JTkdDT1NUCQACAQkArAICAhJQYXltZW50IHNob3VsZCBiZSAJAKQDAQUMUkVOQU1JTkdDT1NUAwkBCGNvbnRhaW5zAgUKY3VzdG9tTmFtZQICX18JAAIBCQCsAgICHk5hbWUgc2hvdWxkIG5vdCBjb250YWluICdfXyc6IAUKY3VzdG9tTmFtZQMJAGYCCQCxAgEFCmN1c3RvbU5hbWUFCk1BWE5BTUVMRU4JAAIBCQCsAgICGU5hbWUgdG9vIGxvbmcsIG1heExlbmd0aD0JAKQDAQUKTUFYTkFNRUxFTgQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEB2FjdGlvbnMEByRtYXRjaDAFBHR5cGUDCQAAAgIHQUNDT1VOVAUHJG1hdGNoMAQKcmV2ZXJzZUtleQkBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBBQpjdXN0b21OYW1lBAluYW1lT3duZXIJAKIIAQUKcmV2ZXJzZUtleQMJAQlpc0RlZmluZWQBBQluYW1lT3duZXIJAAIBCQCsAgICGU5hbWUgYWxyZWFkeSByZWdpc3RlcmVkOiAFCmN1c3RvbU5hbWUEDWFkZHJUb05hbWVLZXkJARZrZXlBZGRyZXNzVG9DdXN0b21OYW1lAQUEYWRkcgQHb2xkTmFtZQkAoggBBQ1hZGRyVG9OYW1lS2V5BAdmcmVlT2xkAwkBCWlzRGVmaW5lZAEFB29sZE5hbWUJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUNYWRkclRvTmFtZUtleQUKY3VzdG9tTmFtZQkBC1N0cmluZ0VudHJ5AgUKcmV2ZXJzZUtleQUEYWRkcggJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgUMeHBDdXN0b21OYW1lAl8xAwkAAAICBExBTkQFByRtYXRjaDAEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQdhc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMECnJldmVyc2VLZXkJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQOYXNzZXRUb05hbWVLZXkJARprZXlMYW5kQXNzZXRJZFRvQ3VzdG9tTmFtZQEFB2Fzc2V0SWQEB29sZE5hbWUJAKIIAQUOYXNzZXRUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUOYXNzZXRUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFB2Fzc2V0SWQICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIFBGFkZHIFDHhwQ3VzdG9tTmFtZQJfMQMJAAACAgREVUNLBQckbWF0Y2gwBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUHYXNzZXRJZAMDCQEBIQEJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkGCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHIJAAIBCQCsAgIIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkRVQ0tQUkVGSVgCDSBpcyBub3QgeW91cnMECnJldmVyc2VLZXkJARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQOYXNzZXRUb05hbWVLZXkJARprZXlEdWNrQXNzZXRJZFRvQ3VzdG9tTmFtZQEFB2Fzc2V0SWQEB29sZE5hbWUJAKIIAQUOYXNzZXRUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5RHVja0N1c3RvbU5hbWVUb0Fzc2V0SWQBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUOYXNzZXRUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFB2Fzc2V0SWQICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQdhc3NldElkBQx4cEN1c3RvbU5hbWUCXzEJAAIBAhNVbmtub3duIGVudGl0eSB0eXBlCQCUCgIJAM0IAgkAzQgCBQdhY3Rpb25zCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAUMcHJvbG9nQWN0aW9uAAABaQEMc2V0UmVmZXJyYWxzAglvbGRQbGF5ZXIJbmV3UGxheWVyAwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQNwdWIJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkAwkBASEBCQEJaXNEZWZpbmVkAQkApggBBQlvbGRQbGF5ZXIJAAIBCQCsAgICEUludmFsaWQgYWRkcmVzczogBQlvbGRQbGF5ZXIDCQEBIQEJAQlpc0RlZmluZWQBCQCmCAEFCW5ld1BsYXllcgkAAgEJAKwCAgIRSW52YWxpZCBhZGRyZXNzOiAFCW5ld1BsYXllcgQHb2xkc0tleQkBCWtleU9sZGllcwAEBG9sZHMJAKIIAQUHb2xkc0tleQQGb2xkaWVzAwkBCWlzRGVmaW5lZAEFBG9sZHMJALwJAgkBBXZhbHVlAQUEb2xkcwIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBm9sZGllcwUJbmV3UGxheWVyCQACAQkArAICBQluZXdQbGF5ZXICJiBpcyBub3QgbmV3YmllIChhbHJlYWR5IGhhcyByZWZlcnJhbHMpBAhyZWZCeUtleQkBD2tleUFkZHJlc3NSZWZCeQEFCW5ld1BsYXllcgQFcmVmQnkJAKIIAQUIcmVmQnlLZXkDAwkBCWlzRGVmaW5lZAEFBXJlZkJ5CQEJaXNEZWZpbmVkAQkApggBCQEFdmFsdWUBBQVyZWZCeQcJAAIBCQCsAgIJAKwCAgUJbmV3UGxheWVyAhQgYWxyZWFkeSBoYXMgcmVmQnk6IAkBBXZhbHVlAQUFcmVmQnkEB3JlZnNLZXkJARNrZXlBZGRyZXNzUmVmZXJyYWxzAQUJb2xkUGxheWVyBARyZWZzCQCiCAEFB3JlZnNLZXkECXJlZnNBcnJheQMJAQlpc0RlZmluZWQBBQRyZWZzCQC8CQIJAQV2YWx1ZQEFBHJlZnMCAV8FA25pbAMJAQ9jb250YWluc0VsZW1lbnQCBQlyZWZzQXJyYXkFCW5ld1BsYXllcgkAAgEJAKwCAgkArAICCQCsAgIFCW9sZFBsYXllcgISIGFscmVhZHkgY29udGFpbnMgBQluZXdQbGF5ZXICESB3aXRoaW4gcmVmZXJyYWxzBAduZXdSZWZzCQC6CQIJAM0IAgUJcmVmc0FycmF5BQluZXdQbGF5ZXICAV8EB25ld09sZHMDCQEPY29udGFpbnNFbGVtZW50AgUGb2xkaWVzBQlvbGRQbGF5ZXIJAQV2YWx1ZQEFBG9sZHMJALoJAgkAzQgCBQZvbGRpZXMFCW9sZFBsYXllcgIBXwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFCHJlZkJ5S2V5BQlvbGRQbGF5ZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgUHcmVmc0tleQUHbmV3UmVmcwkAzAgCCQELU3RyaW5nRW50cnkCBQdvbGRzS2V5BQduZXdPbGRzCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAAABaQEQZGlzdHJpYnV0ZVBvaW50cwUIc3RyZW5ndGgIYWNjdXJhY3kJaW50ZWxsZWN0CWVuZHVyYW5jZQlkZXh0ZXJpdHkEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQKZnJlZUtleUFjYwkBEWtleVVzZXJGcmVlUG9pbnRzAQUEYWRkcgQNZnJlZVBvaW50c0FjYwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFCmZyZWVLZXlBY2MAAAQLZnJlZUtleUR1Y2sJARFrZXlEdWNrRnJlZVBvaW50cwEFC2R1Y2tBc3NldElkBA5mcmVlUG9pbnRzRHVjawkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFC2ZyZWVLZXlEdWNrAAAEB3N1bUZyZWUJAGQCBQ1mcmVlUG9pbnRzQWNjBQ5mcmVlUG9pbnRzRHVjawQPc3VtVG9EaXN0cmlidXRlCQBkAgkAZAIJAGQCCQBkAgUIc3RyZW5ndGgFCGFjY3VyYWN5BQlpbnRlbGxlY3QFCWVuZHVyYW5jZQUJZGV4dGVyaXR5AwkAZgIFD3N1bVRvRGlzdHJpYnV0ZQUHc3VtRnJlZQkAAgEJAKwCAgkArAICAg9UaGVyZSBhcmUgb25seSAJAKQDAQUHc3VtRnJlZQIaIGZyZWUgcG9pbnRzIHRvIGRpc3RyaWJ1dGUECGNoYXJzS2V5CQEMa2V5RHVja0NoYXJzAQULZHVja0Fzc2V0SWQEBWNoYXJzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0BQhjaGFyc0tleQIJMF8wXzBfMF8wAgFfBAZuZXdBY2MJAGUCBQ1mcmVlUG9pbnRzQWNjBQ9zdW1Ub0Rpc3RyaWJ1dGUJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUKZnJlZUtleUFjYwMJAGYCAAAFBm5ld0FjYwAABQZuZXdBY2MJAMwIAgkBDEludGVnZXJFbnRyeQIFC2ZyZWVLZXlEdWNrAwkAZgIAAAUGbmV3QWNjCQBkAgUOZnJlZVBvaW50c0R1Y2sFBm5ld0FjYwUOZnJlZVBvaW50c0R1Y2sJAMwIAgkBC1N0cmluZ0VudHJ5AgUIY2hhcnNLZXkJALkJAgkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDGNoYXJTdHJlbmd0aAUIc3RyZW5ndGgJAMwIAgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQxjaGFyQWNjdXJhY3kFCGFjY3VyYWN5CQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckludGVsbGVjdAUJaW50ZWxsZWN0CQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckVuZHVyYW5jZQUJZW5kdXJhbmNlCQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckRleHRlcml0eQUJZGV4dGVyaXR5BQNuaWwCAV8JAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwAAAFpARxzcGxpdEJ5R2xvYmFsV2VpZ2h0c1JFQURPTkxZAQZhbW91bnQJAJQKAgUDbmlsCQESZ2V0TmVlZGVkTWF0ZXJpYWxzAQUGYW1vdW50AWkBJHNwbGl0QnlHbG9iYWxBbmRMb2NhbFdlaWdodHNSRUFET05MWQMJbWF0QW1vdW50CXJlc0Ftb3VudAh0ZXJyYWlucwQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBBQh0ZXJyYWlucwkAlAoCBQNuaWwJAJQKAgkBEmdldE5lZWRlZE1hdGVyaWFscwEFCW1hdEFtb3VudAkBE2Rpc3RyaWJ1dGVCeVdlaWdodHMCBQlyZXNBbW91bnQFDXRlcnJhaW5Db3VudHMBaQETZ2V0QmFja3BhY2tSRUFET05MWQELZHVja0Fzc2V0SWQJAJQKAgUDbmlsCQC5CQIJAQtnZXRCYWNrcGFjawEJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkAgE6AWkBFGdldFdhcmVob3VzZVJFQURPTkxZAQtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQJbGFuZEluZGV4CQBpAgkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplBQVTU0laRQQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAJAJQKAgUDbmlsCQC6CQIJAQxnZXRXYXJlaG91c2UDCQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAIBOgFpAQpzYXZlTGFzdFR4AAQGY2FsbGVyCAUBaQZjYWxsZXIDCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFD2Vjb25vbXlDb250cmFjdAkAzAgCBRJ0b3VybmFtZW50Q29udHJhY3QJAMwIAgUNYWNyZXNDb250cmFjdAUDbmlsBQZjYWxsZXIJAAIBAg1BY2Nlc3MgZGVuaWVkCQCUCgIJAMwIAgkBBnByb2xvZwEFAWkFA25pbAAqAWkBD3VwZGF0ZUR1Y2tTdGF0cwILZHVja0Fzc2V0SWQHZGVsdGFYUAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQFB2RlbHRhWFABaQEOdXBkYXRlQWNjU3RhdHMCBGFkZHIHZGVsdGFYUAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBQRhZGRyBQdkZWx0YVhQAWkBCWVxdWlwRHVjawEJZXF1aXBtZW50BAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAhllcXVpcER1Y2tfY2hlY2tUb3VybmFtZW50AwkBDWNoZWNrRGVsaXZlcnkBBQtkdWNrQXNzZXRJZAkAAgECF2VxdWlwRHVja19jaGVja0RlbGl2ZXJ5BAVlcUtleQkBEGtleUR1Y2tFcXVpcG1lbnQBBQtkdWNrQXNzZXRJZAQLY3VycmVudFNlZ3MJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywCAV8EBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVuZXdFcQkAtQkCBQllcXVpcG1lbnQCAV8DCQECIT0CCQCQAwEFBW5ld0VxBQtOVU1TRUdNRU5UUwkAAgECFldyb25nIGVxdWlwbWVudCBzdHJpbmcECXRlbXBQcm9kQgkBBmRyZXNzQgQFC2N1cnJlbnRTZWdzCQEOcHJvZFN0clRvQnl0ZXMBCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QGBQNuaWwECHNlZ0JwQXV4CQCRAwIJALUJAgkAkQMCBQVuZXdFcQULc2VnQmFja3BhY2sCATsAAQQKYnVmZkVmZmVjdAMJAAACBQhzZWdCcEF1eAIAAAAEBGF1eDAJAJEDAgkAtQkCBQhzZWdCcEF1eAIBLAAAAwkAAAIFBGF1eDACAAAABAZpZHhDbnQJALUJAgUEYXV4MAIBOgQDaWR4CQCRAwIFBmlkeENudAAABANjbnQJAJEDAgUGaWR4Q250AAEDAwMDAwkAAAIFA2lkeAICMDYGCQAAAgUDaWR4AgIwNwYJAAACBQNpZHgCAjA4CQECIT0CBQNjbnQCAAcJAGYCCQENcGFyc2VJbnRWYWx1ZQEFA2NudAAABwkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4CQENcGFyc2VJbnRWYWx1ZQEFA2lkeAIBXwUKcklkeEVmZmVjdAAABAVzdGF0cwkBDGdldER1Y2tTdGF0cwQFBHRoaXMFC2R1Y2tBc3NldElkBQpidWZmRWZmZWN0BgQIbmV3UHJvZEIJAQZkcmVzc0IEBQVuZXdFcQUJdGVtcFByb2RCBwUFc3RhdHMECm5ld1Byb2RTdHIJAQ5ieXRlc1RvUHJvZFN0cgEFCG5ld1Byb2RCCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFZXFLZXkFCWVxdWlwbWVudAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAugkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgUKbmV3UHJvZFN0cgUDbmlsAgE6CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQxrZXlEdWNrQnVmZnMBBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIJAKQDAQkAkQMCBQVzdGF0cwAHCQDMCAIJAKQDAQkAkQMCBQVzdGF0cwAICQDMCAIJAKQDAQkAkQMCBQVzdGF0cwAJCQDMCAIJAKQDAQkAkQMCBQVzdGF0cwAKCQDMCAIJAKQDAQkAkQMCBQVzdGF0cwALBQNuaWwCAV8JAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwAAAFpAQ9mb3J0aWZpY2F0ZUxhbmQCC2xhbmRBc3NldElkBHBsYW4EDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEC2R1Y2tBc3NldElkCQELdmFsdWVPckVsc2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICAAQJZHVja1N0YXRzCQEMZ2V0RHVja1N0YXRzBAUEdGhpcwULZHVja0Fzc2V0SWQAAAcEB2ZvcnRLZXkJARdrZXlGb3J0aWZpY2F0aW9uc0J5TGFuZAEFC2xhbmRBc3NldElkBAxjdXJyZW50Rm9ydHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQdmb3J0S2V5Agw6MF8xNTowXzE4OjACAV8EBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQUFU1NJWkUECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAV3aEtleQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBAJ3aAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEB2N1ckxvZnQJALUJAgkAkQMCBQJ3aAUJd2hJZHhMT0ZUAgFfBARjdXJPCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHY3VyTG9mdAULdm9sT2NjdXBpZWQEBGN1ckYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdjdXJMb2Z0BQd2b2xGcmVlBAhuZXdGb3J0cwkAtQkCBQRwbGFuAgFfBA0kdDA5Nzk5Mzk4MTA4CQEFZm9ydEIGBQxjdXJyZW50Rm9ydHMJAQ5wcm9kU3RyVG9CeXRlcwEJAJEDAgUCd2gFCXdoSWR4UHJvZAUEY3VyTwUEY3VyRgYFA25pbAQJdGVtcFByb2RCCAUNJHQwOTc5OTM5ODEwOAJfMQQFdGVtcE8IBQ0kdDA5Nzk5Mzk4MTA4Al8yBAV0ZW1wRggFDSR0MDk3OTkzOTgxMDgCXzMEDSR0MDk4MTExOTgyMDcJAQVmb3J0QgYFCG5ld0ZvcnRzBQl0ZW1wUHJvZEIFBXRlbXBPBQV0ZW1wRgcFCWR1Y2tTdGF0cwQIbmV3UHJvZEIIBQ0kdDA5ODExMTk4MjA3Al8xBARuZXdPCAUNJHQwOTgxMTE5ODIwNwJfMgQEbmV3RggFDSR0MDk4MTExOTgyMDcCXzMECm5ld1Byb2RTdHIJAQ5ieXRlc1RvUHJvZFN0cgEFCG5ld1Byb2RCBApuZXdMb2Z0U3RyCQC5CQIJAMwIAgkAkQMCBQdjdXJMb2Z0BQl2b2xMb2NrZWQJAMwIAgkApAMBBQRuZXdPCQDMCAIJAKQDAQUEbmV3RgkAzAgCCQCRAwIFB2N1ckxvZnQFCHZvbFRvdGFsBQNuaWwCAV8JAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQdmb3J0S2V5BQRwbGFuCQDMCAIJAQtTdHJpbmdFbnRyeQIFBXdoS2V5CQC6CQIJAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgkAkQMCBQJ3aAUId2hJZHhSZXMJAMwIAgkAkQMCBQJ3aAUId2hJZHhNYXQJAMwIAgUKbmV3UHJvZFN0cgkAzAgCBQpuZXdMb2Z0U3RyBQNuaWwCAToJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwAAAFpARNpbml0RHVja1RvdXJBdHRlbXB0AQtkdWNrQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUSdG91cm5hbWVudENvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkAAAECWN1ckhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQBAljdXJMb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUJY3VyTG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04EBmxhc3RJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRJ0b3VybmFtZW50Q29udHJhY3QFDWxhc3RUb3VySWRLZXkAAAQMdG91ckxvY2F0aW9uCQCsAgIJAKQDAQUGbGFzdElkAgRfVF8wCQCUCgIJAMwIAgUMcHJvbG9nQWN0aW9uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEOa2V5U2F2ZWRIZWFsdGgBBQtkdWNrQXNzZXRJZAUJY3VySGVhbHRoCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFBW1heEhQCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlTYXZlZExvY2F0aW9uAQULZHVja0Fzc2V0SWQFC2N1ckxvY2F0aW9uCQDMCAIJAQtTdHJpbmdFbnRyeQIFCWN1ckxvY0tleQUMdG91ckxvY2F0aW9uBQNuaWwFDHRvdXJMb2NhdGlvbgFpAQxicmVha0F0dGVtcHQABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAljdXJMb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUJY3VyTG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04DCQECIT0CCQCRAwIJALUJAgULY3VyTG9jYXRpb24CAV8FCmxvY0lkeFR5cGUCAVQJAAIBAiJZb3VyIGR1Y2sgaXMgbm90IGluIHRoZSB0b3VybmFtZW50BAtzYXZlZEhlYWx0aAkBEUBleHRyTmF0aXZlKDEwNTUpAQkBDmtleVNhdmVkSGVhbHRoAQULZHVja0Fzc2V0SWQEDXNhdmVkTG9jYXRpb24JARFAZXh0ck5hdGl2ZSgxMDU4KQEJARBrZXlTYXZlZExvY2F0aW9uAQULZHVja0Fzc2V0SWQJAJQKAgkAzAgCBQxwcm9sb2dBY3Rpb24JAMwIAgkBDEludGVnZXJFbnRyeQIJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQFC3NhdmVkSGVhbHRoCQDMCAIJAQtTdHJpbmdFbnRyeQIFCWN1ckxvY0tleQUNc2F2ZWRMb2NhdGlvbgUDbmlsBQtjdXJMb2NhdGlvbgFpARZleGl0VG91cm5hbWVudEludGVybmFsAQtkdWNrQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECDUFjY2VzcyBkZW5pZWQEC3NhdmVkSGVhbHRoCQERQGV4dHJOYXRpdmUoMTA1NSkBCQEOa2V5U2F2ZWRIZWFsdGgBBQtkdWNrQXNzZXRJZAQNc2F2ZWRMb2NhdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQkBEGtleVNhdmVkTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBQtzYXZlZEhlYWx0aAkAzAgCCQELU3RyaW5nRW50cnkCCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFDXNhdmVkTG9jYXRpb24FA25pbAcBaQEUZXhpdERlbGl2ZXJ5SW50ZXJuYWwBC2R1Y2tBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQINQWNjZXNzIGRlbmllZAQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgIBXwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJc3RhcnRUaW1lCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyTG9jYXRpb24FD2xvY0lkeENvbnRpbmVudAQIZGlzdGFuY2UJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtjdXJMb2NhdGlvbgUIbG9jSWR4SWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBEGtleUR1Y2tJZFRvT3duZXIBBQtkdWNrQXNzZXRJZAIUTkZUIGR1Y2sgaXMgb3JwaGFuZWQECWhlYWx0aEtleQkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQJY3VySGVhbHRoCQERQGV4dHJOYXRpdmUoMTA1NSkBBQloZWFsdGhLZXkEDm91dGNvbWVBY3Rpb25zAwkAZwIFCGRpc3RhbmNlAAMEBnJld2FyZAkA/AcEBQ9lY29ub215Q29udHJhY3QCEnNlbmREZWxpdmVyeVJld2FyZAkAzAgCBQVvd25lcgUDbmlsBQNuaWwDCQAAAgUGcmV3YXJkBQZyZXdhcmQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQLbG9ja2VkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPZWNvbm9teUNvbnRyYWN0BRFkZWxpdmVyeUxvY2tlZEtleQAABAZ1bmxvY2sJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhR1cGRhdGVEZWxpdmVyeUxvY2tlZAkAzAgCCQBlAgULbG9ja2VkVG90YWwFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQUDbmlsBQNuaWwDCQAAAgUGdW5sb2NrBQZ1bmxvY2sDCQBnAgAABQljdXJIZWFsdGgFA25pbAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleURlbGl2ZXJ5RGVsYXlCeUR1Y2sBBQtkdWNrQXNzZXRJZAkAZAIFCXN0YXJ0VGltZQUJREFZTUlMTElTBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EC3NhdmVkSGVhbHRoCQERQGV4dHJOYXRpdmUoMTA1NSkBCQEOa2V5U2F2ZWRIZWFsdGgBBQtkdWNrQXNzZXRJZAQNc2F2ZWRMb2NhdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQkBEGtleVNhdmVkTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAlAoCCQDNCAIJAM0IAgUOb3V0Y29tZUFjdGlvbnMJAQxJbnRlZ2VyRW50cnkCBQloZWFsdGhLZXkFC3NhdmVkSGVhbHRoCQELU3RyaW5nRW50cnkCCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFDXNhdmVkTG9jYXRpb24HAWkBDnByZXBhcmVSb2JiZXJ5AgdtZXNzYWdlA3NpZwQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQEhAQkAxBMDBQdtZXNzYWdlBQNzaWcFA3B1YgkAAgECGHNpZ25hdHVyZSBkb2VzIG5vdCBtYXRjaAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABAZ3bGdBbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUKd2xnQXNzZXRJZAkAAgECFVdMR09MRCBwYXltZW50cyBvbmx5IQQFcGFydHMJALUJAgkAsAkBBQdtZXNzYWdlAgF8AwkBAiE9AgkAkAMBBQVwYXJ0cwACCQACAQIUV3JvbmcgbWVzc2FnZSBmb3JtYXQEC2R1Y2tBc3NldElkCQCRAwIFBXBhcnRzAAAEB3JvYkNvc3QICQEOZ2V0Um9iYmVyeURhdGECBQR0aGlzBQtkdWNrQXNzZXRJZAJfMQMJAGYCBQdyb2JDb3N0BQZ3bGdBbXQJAAIBCQCsAgIJAKwCAgkArAICAghQYXltZW50IAkApAMBBQZ3bGdBbXQCDCA8IHJlcXVpcmVkIAkApAMBBQdyb2JDb3N0BApjYW5kaWRhdGVzCQC1CQIJAJEDAgUFcGFydHMAAQIBXwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJZHVja1N0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEJARNrZXlEdWNrUm9iYmVyeVN0YXRlAQULZHVja0Fzc2V0SWQAAAQKbG9ja2VkTGFuZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQETa2V5TG9ja2VkTGFuZEJ5RHVjawEFC2R1Y2tBc3NldElkAgAEB2xhbmRFVEEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleUxhbmRDb29sZG93bkVUQQEFCmxvY2tlZExhbmQAAAMDCQECIT0CBQlkdWNrU3RhdGUFC2R1Y2tJZHhGcmVlCQBmAgUHbGFuZEVUQQUDbm93BwkAAgEJAKwCAgInWW91IGFscmVhZHkgc3RhcnRlZCByb2JiaW5nLCB3YWl0IHRpbGwgCQCkAwEFB2xhbmRFVEEKAQdjaGVja2VyAgNhY2MLbGFuZEFzc2V0SWQEBXN0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEJARNrZXlMYW5kUm9iYmVyeVN0YXRlAQULbGFuZEFzc2V0SWQAAAQLY29vbGRvd25FVEEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleUxhbmRDb29sZG93bkVUQQEFC2xhbmRBc3NldElkAAADCQBmAgUFc3RhdGUJAJADAQUQbGFuZFJvYkNvb2xkb3ducwkAAgECDUludmFsaWQgc3RhdGUDCQBmAgUDbm93BQtjb29sZG93bkVUQQQKc3Rha2VkVGltZQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAADCQBnAgAABQpzdGFrZWRUaW1lBQNhY2MEAWEJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQBZAkAtQkCCAUBYQtkZXNjcmlwdGlvbgIBXwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQMcHJvZHVjdGl2aXR5CQEMYXBwbHlCb251c2VzAgULbGFuZEFzc2V0SWQFBnBpZWNlcwQJZGVsdGFUaW1lCQBlAgUDbm93BQpzdGFrZWRUaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFDHByb2R1Y3Rpdml0eQUGcGllY2VzBQlEQVlNSUxMSVMDCQBmAgUOTUlOX1JFU19UT19ST0IFCGF2YWlsUmVzBQNhY2MJAM0IAgUDYWNjBQtsYW5kQXNzZXRJZAUDYWNjBAhmaWx0ZXJlZAoAAiRsBQpjYW5kaWRhdGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjaGVja2VyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkAAAIJAJADAQUIZmlsdGVyZWQAAAkAAgECGU5vIGNhbmRpZGF0ZXMgZm9yIHJvYmJlcnkEBnJuZElkeAkBD2dldFJhbmRvbU51bWJlcgMJAJADAQUIZmlsdGVyZWQFBmhlaWdodAkAywECBQNzaWcIBQFpDXRyYW5zYWN0aW9uSWQEC2xhbmRBc3NldElkCQCRAwIFCGZpbHRlcmVkBQZybmRJZHgJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBE2tleUxhbmRSb2JiZXJ5U3RhdGUBBQtsYW5kQXNzZXRJZAUMcm9iSWR4TG9ja2VkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5TGFuZENvb2xkb3duRVRBAQULbGFuZEFzc2V0SWQJAGQCBQNub3cJAJEDAgUQbGFuZFJvYkNvb2xkb3ducwUMcm9iSWR4TG9ja2VkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQETa2V5RHVja1JvYmJlcnlTdGF0ZQEFC2R1Y2tBc3NldElkBRBkdWNrSWR4UHJlcGFyaW5nCQDMCAIJAQtTdHJpbmdFbnRyeQIJARNrZXlMb2NrZWRMYW5kQnlEdWNrAQULZHVja0Fzc2V0SWQFC2xhbmRBc3NldElkCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsBQtsYW5kQXNzZXRJZAFpAQdyb2JMYW5kAgdtZXNzYWdlA3NpZwQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQEhAQkAxBMDBQdtZXNzYWdlBQNzaWcFA3B1YgkAAgECGHNpZ25hdHVyZSBkb2VzIG5vdCBtYXRjaAQIdXNlckFkZHIJAKUIAQgFAWkGY2FsbGVyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFCHVzZXJBZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQCUCgIJAMwIAgUMcHJvbG9nQWN0aW9uCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEYa2V5TGFzdFJvYmJlcnlUaW1lQnlEdWNrAQULZHVja0Fzc2V0SWQFA25vdwUDbmlsAAABaQEOYWNjZXB0RGVsaXZlcnkAAwkBASEBBRFLU19BTExPV19ERUxJVkVSWQkAAgECH0RlbGl2ZXJ5IGZlYXR1cmUgaXMgdHVybmVkIG9mZiEEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkECHVzZXJBZGRyCQClCAEIBQFpBmNhbGxlcgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQh1c2VyQWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJZnVuZFRvdGFsCQELdmFsdWVPckVsc2UCCQCaCAIFD2Vjb25vbXlDb250cmFjdAUPZGVsaXZlcnlGdW5kS2V5AAAEC2xvY2tlZFRvdGFsCQELdmFsdWVPckVsc2UCCQCaCAIFD2Vjb25vbXlDb250cmFjdAURZGVsaXZlcnlMb2NrZWRLZXkAAAMJAGYCBRVNSU5fVVNEVF9GRUVfREVMSVZFUlkJAGUCBQlmdW5kVG90YWwFC2xvY2tlZFRvdGFsCQACAQkArAICCQCsAgIJAKwCAgIgRGVsaXZlcnkgaXMgbm90IGF2YWlsYWJsZSwgZnVuZD0JAQpmaXhlZFBvaW50AgUJZnVuZFRvdGFsAAYCCSwgbG9ja2VkPQkBCmZpeGVkUG9pbnQCBQtsb2NrZWRUb3RhbAAGBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAhkZWxheUVUQQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5RGVsaXZlcnlEZWxheUJ5RHVjawEFC2R1Y2tBc3NldElkAAADCQBmAgUIZGVsYXlFVEEFA25vdwkAAgEJAKwCAgIqRGVsaXZlcnkgaXMgZm9yYmlkZGVuIGZvciB5b3VyIGR1Y2sgdW50aWwgCQCkAwEFCGRlbGF5RVRBAwkBD2NoZWNrVG91cm5hbWVudAEFC2R1Y2tBc3NldElkCQACAQIeYWNjZXB0RGVsaXZlcnlfY2hlY2tUb3VybmFtZW50AwkBDWNoZWNrRGVsaXZlcnkBBQtkdWNrQXNzZXRJZAkAAgECHGFjY2VwdERlbGl2ZXJ5X2NoZWNrRGVsaXZlcnkEDm5ld0xvY2tlZFRvdGFsCQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIUdXBkYXRlRGVsaXZlcnlMb2NrZWQJAMwIAgkAZAIFC2xvY2tlZFRvdGFsBRVNSU5fVVNEVF9GRUVfREVMSVZFUlkFA25pbAUDbmlsBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQAAAQJY3VySGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFAECWN1ckxvY0tleQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBBQljdXJMb2NLZXkFD0RFRkFVTFRMT0NBVElPTgQQZGVsaXZlcnlMb2NhdGlvbgkArAICCQCkAwEFA25vdwIEX0RfMAkAlAoCCQDMCAIFDHByb2xvZ0FjdGlvbgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDmtleVNhdmVkSGVhbHRoAQULZHVja0Fzc2V0SWQFCWN1ckhlYWx0aAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQVtYXhIUAkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5U2F2ZWRMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQtjdXJMb2NhdGlvbgkAzAgCCQELU3RyaW5nRW50cnkCBQljdXJMb2NLZXkFEGRlbGl2ZXJ5TG9jYXRpb24FA25pbAkAlAoCBRBkZWxpdmVyeUxvY2F0aW9uBQ5uZXdMb2NrZWRUb3RhbADfahVG",
    "height": 2766947,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: HtbEAwFirdhETNzJKDa2ujMfb3udqtbRryyuY5Pv1bzR
Next: 7j34EtuKEvVTLxQkXEdxVXzBS6knWJGGToPdzcTbUEZ3

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let DAYMILLIS = 86400000
5
+
4
6
 
func keyLastArbTimeByUser (addr) = ("lastArbTimeUser_" + addr)
5
7
 
6
8
 
100
102
 
101
103
 
102
104
 
func keyLockedLandByDuck (duckAssetId) = ("lockedLandByDuck_" + duckAssetId)
105
+
106
+
107
+
func keyDeliveryDelayByDuck (duckAssetId) = ("deliveryDelayByDuck_" + duckAssetId)
103
108
 
104
109
 
105
110
 
let xpClaim = 10000
169
174
 
170
175
 
let DAILYRESBYPIECE = 3456000
171
176
 
172
-
let DAYMILLIS = 86400000
173
-
174
177
 
let WHMULTIPLIER = 10000000000
175
178
 
176
179
 
let DEFAULTLOCATION = "Africa_F_Africa"
294
297
 
295
298
 
296
299
 
let deliveryFundKey = "deliveryFund"
300
+
301
+
let deliveryLockedKey = "deliveryLocked"
297
302
 
298
303
 
let lastTourIdKey = "%s__lastTourId"
299
304
 
528
533
 
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
529
534
 
530
535
 
536
+
func fixedPoint (val,decimals) = {
537
+
    let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
538
+
    let lowPart = toString((val % tenPow))
539
+
    let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
540
+
    (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
541
+
    }
542
+
543
+
531
544
 
func getRandomNumber (maxValue,finishHeight,auxEntropy) = {
532
545
 
    let randomSeedBlock = value(blockInfoByHeight(finishHeight))
533
546
 
    let randomHash = sha256((value(randomSeedBlock.vrf) + auxEntropy))
567
580
 
let EMPTY_PROD50 = base64'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=='
568
581
 
569
582
 
let FIVEMINUTESMILLIS = 300000
583
+
584
+
let TEN_MINUTES_MILLIS = 600000
570
585
 
571
586
 
let RENAMINGCOST = 5000000
572
587
 
1670
1685
 
1671
1686
 
1672
1687
 
func checkClaimConditions (addr,claimMode,landAssetIdIn) = {
1673
-
    let $t03373834277 = if ((claimMode == claimModeWh))
1688
+
    let $t03378434323 = if ((claimMode == claimModeWh))
1674
1689
 
        then $Tuple2(landAssetIdIn, valueOrElse(getString(keyStakedDuckByOwner(addr)), ""))
1675
1690
 
        else {
1676
1691
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1680
1695
 
                then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
1681
1696
 
                else $Tuple2(loc[locIdxId], duckAssetId)
1682
1697
 
            }
1683
-
    let landAssetId = $t03373834277._1
1684
-
    let duckId = $t03373834277._2
1698
+
    let landAssetId = $t03378434323._1
1699
+
    let duckId = $t03378434323._2
1685
1700
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
1686
1701
 
    let timeKey = keyStakedTimeByAssetId(landAssetId)
1687
1702
 
    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("Land " + asset.name) + " is not staked"))
1729
1744
 
                                let currentPack = getBackpack(bpKey)
1730
1745
 
                                let currentPackRes = split(currentPack[bpIdxRes], "_")
1731
1746
 
                                let currentWhRes = split(currentWh[whIdxRes], "_")
1732
-
                                let $t03665137522 = if ((claimMode == claimModeWh))
1747
+
                                let $t03669737568 = if ((claimMode == claimModeWh))
1733
1748
 
                                    then $Tuple4(addRes(currentWhRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), currentPack[bpIdxRes], (parseIntValue(loft[volOccupied]) + resToClaim._2), (parseIntValue(loft[volFree]) - resToClaim._2))
1734
1749
 
                                    else if ((claimMode == claimModeDuck))
1735
1750
 
                                        then $Tuple4(currentWh[whIdxRes], addRes(currentPackRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), parseIntValue(loft[volOccupied]), parseIntValue(loft[volFree]))
1738
1753
 
                                            let whAm = min([parseIntValue(loft[volFree]), resToClaim._2])
1739
1754
 
                                            $Tuple4(distr._1, distr._2, (parseIntValue(loft[volOccupied]) + whAm), (parseIntValue(loft[volFree]) - whAm))
1740
1755
 
                                            }
1741
-
                                let whRes = $t03665137522._1
1742
-
                                let bpRes = $t03665137522._2
1743
-
                                let loftO = $t03665137522._3
1744
-
                                let loftF = $t03665137522._4
1756
+
                                let whRes = $t03669737568._1
1757
+
                                let bpRes = $t03669737568._2
1758
+
                                let loftO = $t03669737568._3
1759
+
                                let loftF = $t03669737568._4
1745
1760
 
                                $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]], "_")])
1746
1761
 
                                }
1747
1762
 
                        }
1879
1894
 
    }
1880
1895
 
1881
1896
 
1897
+
func checkDelivery (duckAssetId) = {
1898
+
    let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1899
+
    let now = lastBlock.timestamp
1900
+
    if ((curLocation[locIdxType] != "D"))
1901
+
        then false
1902
+
        else {
1903
+
            let startTime = parseIntValue(curLocation[locIdxContinent])
1904
+
            let distance = parseIntValue(curLocation[locIdxId])
1905
+
            if (if ((now > (startTime + TEN_MINUTES_MILLIS)))
1906
+
                then (3 > distance)
1907
+
                else false)
1908
+
                then throw("Your duck is on delivery mission")
1909
+
                else asBoolean(invoke(this, "exitDeliveryInternal", [duckAssetId], nil))
1910
+
            }
1911
+
    }
1912
+
1913
+
1882
1914
 
func mergeInternal (newLandSize,newLevel,formula,addr,landAssetIds,needMat) = {
1883
1915
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1884
1916
 
    if (checkTournament(duckAssetId))
1885
1917
 
        then throw("mergeInternal_checkTournament")
1886
-
        else {
1887
-
            func checkMerge (acc,landAssetId) =             {
1888
-
                let asset = value(assetInfo(fromBase58String(landAssetId)))
1889
-
                let timeKey = keyStakedTimeByAssetId(landAssetId)
1890
-
                let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
1891
-
                let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1892
-
                if ((owner != addr))
1893
-
                    then throw((LANDPREFIX + " is not yours"))
1894
-
                    else {
1895
-
                        let d = split(asset.description, "_")
1896
-
                        let continent = d[recContinent]
1897
-
                        if (if ((acc._3 != ""))
1898
-
                            then (acc._3 != continent)
1899
-
                            else false)
1900
-
                            then throw("Lands should be on the same continent to merge")
1901
-
                            else {
1902
-
                                let landSize = d[recLandSize]
1903
-
                                let sizesIn = acc._1
1904
-
                                let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
1905
-
                                let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
1906
-
                                let pieces = numPiecesBySize(landSize)
1907
-
                                let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
1908
-
                                let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1909
-
                                let reqLevel =                                 match landSize {
1910
-
                                    case _ => 
1911
-
                                        if (("S" == $match0))
1912
-
                                            then 3
1913
-
                                            else if (("M" == $match0))
1914
-
                                                then 4
1915
-
                                                else if (("L" == $match0))
1916
-
                                                    then 5
1917
-
                                                    else if (("XL" == $match0))
1918
-
                                                        then 6
1919
-
                                                        else throw("Only S, M, L, XL can merge")
1920
-
                                }
1921
-
                                if ((infraLevel != reqLevel))
1922
-
                                    then throw("All lands should be maxed to merge")
1923
-
                                    else {
1924
-
                                        let landNum = d[recLandNum]
1925
-
                                        let terrainCounts = countTerrains(d[recTerrains])
1926
-
                                        let deltaTime = (lastBlock.timestamp - savedTime)
1927
-
                                        if ((0 > deltaTime))
1928
-
                                            then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
1929
-
                                            else {
1930
-
                                                let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
1931
-
                                                let landIndex = (pieces / SSIZE)
1932
-
                                                let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
1933
-
                                                let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
1934
-
                                                let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
1935
-
                                                let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
1936
-
                                                let lands = acc._7
1937
-
                                                let idx = indexOf(lands, landAssetId)
1938
-
                                                if (!(isDefined(idx)))
1939
-
                                                    then throw(("Your staked lands don't contain " + landAssetId))
1940
-
                                                    else {
1941
-
                                                        let customKey = keyLandAssetIdToCustomName(landAssetId)
1942
-
                                                        let customName = valueOrElse(getString(customKey), "")
1943
-
                                                        $Tuple10(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(keyLandNumToOwner(landNum))) :+ DeleteEntry(keyWarehouseByLand(landAssetId))) :+ DeleteEntry(customKey)) :+ Burn(fromBase58String(landAssetId), 1)) ++ (if ((customName != ""))
1944
-
                                                            then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
1945
-
                                                            else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
1946
-
                                                        }
1947
-
                                                }
1948
-
                                        }
1949
-
                                }
1950
-
                        }
1918
+
        else if (checkDelivery(duckAssetId))
1919
+
            then throw("mergeInternal_checkDelivery")
1920
+
            else {
1921
+
                func checkMerge (acc,landAssetId) =                 {
1922
+
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
1923
+
                    let timeKey = keyStakedTimeByAssetId(landAssetId)
1924
+
                    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
1925
+
                    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1926
+
                    if ((owner != addr))
1927
+
                        then throw((LANDPREFIX + " is not yours"))
1928
+
                        else {
1929
+
                            let d = split(asset.description, "_")
1930
+
                            let continent = d[recContinent]
1931
+
                            if (if ((acc._3 != ""))
1932
+
                                then (acc._3 != continent)
1933
+
                                else false)
1934
+
                                then throw("Lands should be on the same continent to merge")
1935
+
                                else {
1936
+
                                    let landSize = d[recLandSize]
1937
+
                                    let sizesIn = acc._1
1938
+
                                    let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
1939
+
                                    let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
1940
+
                                    let pieces = numPiecesBySize(landSize)
1941
+
                                    let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
1942
+
                                    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1943
+
                                    let reqLevel =                                     match landSize {
1944
+
                                        case _ => 
1945
+
                                            if (("S" == $match0))
1946
+
                                                then 3
1947
+
                                                else if (("M" == $match0))
1948
+
                                                    then 4
1949
+
                                                    else if (("L" == $match0))
1950
+
                                                        then 5
1951
+
                                                        else if (("XL" == $match0))
1952
+
                                                            then 6
1953
+
                                                            else throw("Only S, M, L, XL can merge")
1954
+
                                    }
1955
+
                                    if ((infraLevel != reqLevel))
1956
+
                                        then throw("All lands should be maxed to merge")
1957
+
                                        else {
1958
+
                                            let landNum = d[recLandNum]
1959
+
                                            let terrainCounts = countTerrains(d[recTerrains])
1960
+
                                            let deltaTime = (lastBlock.timestamp - savedTime)
1961
+
                                            if ((0 > deltaTime))
1962
+
                                                then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
1963
+
                                                else {
1964
+
                                                    let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
1965
+
                                                    let landIndex = (pieces / SSIZE)
1966
+
                                                    let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
1967
+
                                                    let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
1968
+
                                                    let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
1969
+
                                                    let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
1970
+
                                                    let lands = acc._7
1971
+
                                                    let idx = indexOf(lands, landAssetId)
1972
+
                                                    if (!(isDefined(idx)))
1973
+
                                                        then throw(("Your staked lands don't contain " + landAssetId))
1974
+
                                                        else {
1975
+
                                                            let customKey = keyLandAssetIdToCustomName(landAssetId)
1976
+
                                                            let customName = valueOrElse(getString(customKey), "")
1977
+
                                                            $Tuple10(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(keyLandNumToOwner(landNum))) :+ DeleteEntry(keyWarehouseByLand(landAssetId))) :+ DeleteEntry(customKey)) :+ Burn(fromBase58String(landAssetId), 1)) ++ (if ((customName != ""))
1978
+
                                                                then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
1979
+
                                                                else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
1980
+
                                                            }
1981
+
                                                    }
1982
+
                                            }
1983
+
                                    }
1984
+
                            }
1985
+
                    }
1986
+
1987
+
                let bpKey = keyBackpackByDuck(duckAssetId)
1988
+
                let currentPack = getBackpack(bpKey)
1989
+
                let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
1990
+
                let landsKey = keyStakedLandsByOwner(addr)
1991
+
                let landsStr = getString(landsKey)
1992
+
                let landsIn = if (isDefined(landsStr))
1993
+
                    then split_51C(value(landsStr), "_")
1994
+
                    else nil
1995
+
                let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
1996
+
                let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
1997
+
                let r = {
1998
+
                    let $l = landAssetIds
1999
+
                    let $s = size($l)
2000
+
                    let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
2001
+
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
2002
+
                        then $a
2003
+
                        else checkMerge($a, $l[$i])
2004
+
2005
+
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
2006
+
                        then $a
2007
+
                        else throw("List size exceeds 5")
2008
+
2009
+
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
2010
+
                    }
2011
+
                let continent = r._3
2012
+
                let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
2013
+
                let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
2014
+
                let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
2015
+
                let newLandNum = toString(freeNum)
2016
+
                let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
2017
+
                let assetId = calculateAssetId(issue)
2018
+
                let newLandAssetId = toBase58String(assetId)
2019
+
                let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
2020
+
                let piecesKey = keyStakedPiecesByOwner(addr)
2021
+
                let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
2022
+
                $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
2023
+
                    then StringEntry(landsKey, makeString_11C(r._7, "_"))
2024
+
                    else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
2025
+
                    then 0
2026
+
                    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(keyInfraLevelByAssetId(newLandAssetId), newLevel)) :+ IntegerEntry(keyInfraLevelByAssetIdAndOwner(newLandAssetId, addr), newLevel)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], r._4, newMat, currentPack[bpIdxProd]], ":"))) :+ StringEntry(keyResProportions(), makeString(r._6, "_"))) :+ StringEntry(keyResTypesByContinent(continent), makeString(r._10, "_"))) :+ StringEntry(keyDuckLocation(duckAssetId), makeString([continent, "L", newLandAssetId], "_"))) :+ ScriptTransfer(addressFromStringValue(addr), 1, assetId)), newLandAssetId)
1951
2027
 
                }
1952
-
1953
-
            let bpKey = keyBackpackByDuck(duckAssetId)
1954
-
            let currentPack = getBackpack(bpKey)
1955
-
            let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
1956
-
            let landsKey = keyStakedLandsByOwner(addr)
1957
-
            let landsStr = getString(landsKey)
1958
-
            let landsIn = if (isDefined(landsStr))
1959
-
                then split_51C(value(landsStr), "_")
1960
-
                else nil
1961
-
            let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
1962
-
            let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
1963
-
            let r = {
1964
-
                let $l = landAssetIds
1965
-
                let $s = size($l)
1966
-
                let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
1967
-
                func $f0_1 ($a,$i) =                 if (($i >= $s))
1968
-
                    then $a
1969
-
                    else checkMerge($a, $l[$i])
1970
-
1971
-
                func $f0_2 ($a,$i) =                 if (($i >= $s))
1972
-
                    then $a
1973
-
                    else throw("List size exceeds 5")
1974
-
1975
-
                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
1976
-
                }
1977
-
            let continent = r._3
1978
-
            let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
1979
-
            let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
1980
-
            let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
1981
-
            let newLandNum = toString(freeNum)
1982
-
            let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
1983
-
            let assetId = calculateAssetId(issue)
1984
-
            let newLandAssetId = toBase58String(assetId)
1985
-
            let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
1986
-
            let piecesKey = keyStakedPiecesByOwner(addr)
1987
-
            let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
1988
-
            $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
1989
-
                then StringEntry(landsKey, makeString_11C(r._7, "_"))
1990
-
                else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
1991
-
                then 0
1992
-
                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(keyInfraLevelByAssetId(newLandAssetId), newLevel)) :+ IntegerEntry(keyInfraLevelByAssetIdAndOwner(newLandAssetId, addr), newLevel)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], r._4, newMat, currentPack[bpIdxProd]], ":"))) :+ StringEntry(keyResProportions(), makeString(r._6, "_"))) :+ StringEntry(keyResTypesByContinent(continent), makeString(r._10, "_"))) :+ StringEntry(keyDuckLocation(duckAssetId), makeString([continent, "L", newLandAssetId], "_"))) :+ ScriptTransfer(addressFromStringValue(addr), 1, assetId)), newLandAssetId)
1993
-
            }
1994
2028
 
    }
1995
2029
 
1996
2030
 
2182
2216
 
                                    then throw((("NFT " + asset.name) + " is already staked"))
2183
2217
 
                                    else if (isDefined(getString(keyStakedDuckByOwner(address))))
2184
2218
 
                                        then throw(("You already staked one duck: " + asset.name))
2185
-
                                        else if (checkTournament(assetIdStr))
2186
-
                                            then throw("stakeDuck_checkTournament")
2187
-
                                            else {
2188
-
                                                let locKey = keyDuckLocation(assetIdStr)
2189
-
                                                let location = getString(locKey)
2190
-
                                                let bpKey = keyBackpackByDuck(assetIdStr)
2191
-
                                                let backpack = getString(bpKey)
2192
-
                                                let keyHealth = keyDuckHealth(assetIdStr)
2193
-
                                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2194
-
                                                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
2195
-
                                                ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
2219
+
                                        else {
2220
+
                                            let locKey = keyDuckLocation(assetIdStr)
2221
+
                                            let location = getString(locKey)
2222
+
                                            let bpKey = keyBackpackByDuck(assetIdStr)
2223
+
                                            let backpack = getString(bpKey)
2224
+
                                            let keyHealth = keyDuckHealth(assetIdStr)
2225
+
                                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2226
+
                                            let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
2227
+
                                            ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
2228
+
                                                then nil
2229
+
                                                else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(backpack))
2196
2230
 
                                                    then nil
2197
-
                                                    else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(backpack))
2198
-
                                                        then nil
2199
-
                                                        else (([StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(keyHealth, curHealth)) :+ prologAction)))))
2200
-
                                                }
2231
+
                                                    else (([StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(keyHealth, curHealth)) :+ prologAction)))))
2232
+
                                            }
2201
2233
 
                                }
2202
2234
 
                    }
2203
2235
 
            }
2225
2257
 
                            then throw("Staked NFT is not yours")
2226
2258
 
                            else if (checkTournament(assetIdStr))
2227
2259
 
                                then throw("unstakeDuck_checkTournament")
2228
-
                                else {
2229
-
                                    let keyHealth = keyDuckHealth(assetIdStr)
2230
-
                                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2231
-
                                    let health = valueOrElse(getInteger(keyHealth), maxHP)
2232
-
                                    if ((maxHP > health))
2233
-
                                        then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2234
-
                                        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]
2235
-
                                    }
2260
+
                                else if (checkDelivery(assetIdStr))
2261
+
                                    then throw("unstakeDuck_checkDelivery")
2262
+
                                    else {
2263
+
                                        let keyHealth = keyDuckHealth(assetIdStr)
2264
+
                                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2265
+
                                        let health = valueOrElse(getInteger(keyHealth), maxHP)
2266
+
                                        if ((maxHP > health))
2267
+
                                            then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2268
+
                                            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]
2269
+
                                        }
2236
2270
 
                        }
2237
2271
 
            }
2238
2272
 
    }
2288
2322
 
                    let isTour = (newLoc[locIdxType] == "T")
2289
2323
 
                    let eqKey = keyDuckEquipment(duckAssetId)
2290
2324
 
                    let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2291
-
                    let $t06601366110 = subtractEquipment(currentEq, f._5)
2292
-
                    let newEq = $t06601366110._1
2293
-
                    let shouldZeroBuffs = $t06601366110._2
2325
+
                    let $t06681366910 = subtractEquipment(currentEq, f._5)
2326
+
                    let newEq = $t06681366910._1
2327
+
                    let shouldZeroBuffs = $t06681366910._2
2294
2328
 
                    let locToSave = if (!(isInTournament(tournamentContract, curLocation)))
2295
2329
 
                        then if (isTour)
2296
2330
 
                            then throw(((("Cheat attempt: oldLoc=" + curLocation) + ", newLoc=") + newLocation))
2341
2375
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2342
2376
 
            if (checkTournament(duckAssetId))
2343
2377
 
                then throw("heal_checkTournament")
2344
-
                else {
2345
-
                    let qts = [quantityL1, quantityL2, quantityL3]
2346
-
                    let keyHealth = keyDuckHealth(duckAssetId)
2347
-
                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2348
-
                    let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2349
-
                    if ((oldHealth >= maxHP))
2350
-
                        then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2351
-
                        else {
2352
-
                            let bpKey = keyBackpackByDuck(duckAssetId)
2353
-
                            let currentPack = getBackpack(bpKey)
2354
-
                            let prodList = if ((currentPack[bpIdxProd] == ""))
2355
-
                                then nil
2356
-
                                else split_4C(currentPack[bpIdxProd], "_")
2357
-
                            func iterateProd (acc,recipe) =                             {
2358
-
                                let n = acc._2
2359
-
                                let x = if ((size(prodList) > n))
2360
-
                                    then parseIntValue(prodList[n])
2361
-
                                    else 0
2362
-
                                if ((3 > n))
2363
-
                                    then {
2364
-
                                        let q = qts[n]
2365
-
                                        if ((q > x))
2366
-
                                            then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2367
-
                                            else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2368
-
                                        }
2369
-
                                    else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2378
+
                else if (checkDelivery(duckAssetId))
2379
+
                    then throw("heal_checkDelivery")
2380
+
                    else {
2381
+
                        let qts = [quantityL1, quantityL2, quantityL3]
2382
+
                        let keyHealth = keyDuckHealth(duckAssetId)
2383
+
                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2384
+
                        let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2385
+
                        if ((oldHealth >= maxHP))
2386
+
                            then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2387
+
                            else {
2388
+
                                let bpKey = keyBackpackByDuck(duckAssetId)
2389
+
                                let currentPack = getBackpack(bpKey)
2390
+
                                let prodList = if ((currentPack[bpIdxProd] == ""))
2391
+
                                    then nil
2392
+
                                    else split_4C(currentPack[bpIdxProd], "_")
2393
+
                                func iterateProd (acc,recipe) =                                 {
2394
+
                                    let n = acc._2
2395
+
                                    let x = if ((size(prodList) > n))
2396
+
                                        then parseIntValue(prodList[n])
2397
+
                                        else 0
2398
+
                                    if ((3 > n))
2399
+
                                        then {
2400
+
                                            let q = qts[n]
2401
+
                                            if ((q > x))
2402
+
                                                then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2403
+
                                                else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2404
+
                                            }
2405
+
                                        else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2406
+
                                    }
2407
+
2408
+
                                let result = {
2409
+
                                    let $l = productionMatrix
2410
+
                                    let $s = size($l)
2411
+
                                    let $acc0 = $Tuple3(nil, 0, 0)
2412
+
                                    func $f0_1 ($a,$i) =                                     if (($i >= $s))
2413
+
                                        then $a
2414
+
                                        else iterateProd($a, $l[$i])
2415
+
2416
+
                                    func $f0_2 ($a,$i) =                                     if (($i >= $s))
2417
+
                                        then $a
2418
+
                                        else throw("List size exceeds 50")
2419
+
2420
+
                                    $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)
2421
+
                                    }
2422
+
                                let newHealth = min([maxHP, (oldHealth + result._3)])
2423
+
                                $Tuple2(([IntegerEntry(keyHealth, newHealth), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(result._1, "_")], ":")), prologAction] ++ updateDuckStatsInternal(duckAssetId, (xpHeal * ((quantityL1 + quantityL2) + quantityL3)))._1), newHealth)
2370
2424
 
                                }
2371
-
2372
-
                            let result = {
2373
-
                                let $l = productionMatrix
2374
-
                                let $s = size($l)
2375
-
                                let $acc0 = $Tuple3(nil, 0, 0)
2376
-
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
2377
-
                                    then $a
2378
-
                                    else iterateProd($a, $l[$i])
2379
-
2380
-
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
2381
-
                                    then $a
2382
-
                                    else throw("List size exceeds 50")
2383
-
2384
-
                                $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)
2385
-
                                }
2386
-
                            let newHealth = min([maxHP, (oldHealth + result._3)])
2387
-
                            $Tuple2(([IntegerEntry(keyHealth, newHealth), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(result._1, "_")], ":")), prologAction] ++ updateDuckStatsInternal(duckAssetId, (xpHeal * ((quantityL1 + quantityL2) + quantityL3)))._1), newHealth)
2388
-
                            }
2389
-
                    }
2425
+
                        }
2390
2426
 
            }
2391
2427
 
    }
2392
2428
 
2405
2441
 
                    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2406
2442
 
                    if (checkTournament(duckAssetId))
2407
2443
 
                        then throw("healES_checkTournament")
2408
-
                        else {
2409
-
                            let keyHealth = keyDuckHealth(duckAssetId)
2410
-
                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2411
-
                            let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2412
-
                            if ((oldHealth > 0))
2413
-
                                then throw("HP should be 0 to call Emergency Service")
2414
-
                                else {
2415
-
                                    let bpKey = keyBackpackByDuck(duckAssetId)
2416
-
                                    let currentPack = getBackpack(bpKey)
2417
-
                                    let prodList = if ((currentPack[bpIdxProd] == ""))
2418
-
                                        then nil
2419
-
                                        else split_4C(currentPack[bpIdxProd], "_")
2420
-
                                    let medKitAmount1 = if ((size(prodList) > 0))
2421
-
                                        then parseIntValue(prodList[0])
2422
-
                                        else 0
2423
-
                                    let medKitAmount2 = if ((size(prodList) > 1))
2424
-
                                        then parseIntValue(prodList[1])
2425
-
                                        else 0
2426
-
                                    let medKitAmount3 = if ((size(prodList) > 2))
2427
-
                                        then parseIntValue(prodList[2])
2428
-
                                        else 0
2429
-
                                    if (if (if ((medKitAmount1 > 0))
2430
-
                                        then true
2431
-
                                        else (medKitAmount2 > 0))
2432
-
                                        then true
2433
-
                                        else (medKitAmount3 > 0))
2434
-
                                        then throw("You have to use own Medical Kit")
2435
-
                                        else {
2436
-
                                            let existStr = getString(economyContract, keyEsWarehouse())
2437
-
                                            let existAmounts = if (isDefined(existStr))
2438
-
                                                then split_4C(value(existStr), "_")
2439
-
                                                else nil
2440
-
                                            let existAmount = if ((size(existAmounts) > 0))
2441
-
                                                then parseIntValue(existAmounts[0])
2442
-
                                                else 0
2443
-
                                            if ((0 >= existAmount))
2444
-
                                                then throw("There are no Medical Kits L1 at Emergency Service storage")
2445
-
                                                else {
2446
-
                                                    let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2447
-
                                                    let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2448
-
                                                    let recipe = split(productionMatrix[0], "_")
2449
-
                                                    let totalMat = getRecipeMaterials(recipe)
2450
-
                                                    let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2451
-
                                                    if ((pmt.amount != sellPrice))
2452
-
                                                        then throw(("Payment attached should be " + toString(sellPrice)))
2453
-
                                                        else {
2454
-
                                                            let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2455
-
                                                            $Tuple2(([IntegerEntry(keyHealth, newHealth), prologAction] ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2456
-
                                                            }
2457
-
                                                    }
2458
-
                                            }
2459
-
                                    }
2460
-
                            }
2444
+
                        else if (checkDelivery(duckAssetId))
2445
+
                            then throw("healES_checkDelivery")
2446
+
                            else {
2447
+
                                let keyHealth = keyDuckHealth(duckAssetId)
2448
+
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2449
+
                                let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2450
+
                                if ((oldHealth > 0))
2451
+
                                    then throw("HP should be 0 to call Emergency Service")
2452
+
                                    else {
2453
+
                                        let bpKey = keyBackpackByDuck(duckAssetId)
2454
+
                                        let currentPack = getBackpack(bpKey)
2455
+
                                        let prodList = if ((currentPack[bpIdxProd] == ""))
2456
+
                                            then nil
2457
+
                                            else split_4C(currentPack[bpIdxProd], "_")
2458
+
                                        let medKitAmount1 = if ((size(prodList) > 0))
2459
+
                                            then parseIntValue(prodList[0])
2460
+
                                            else 0
2461
+
                                        let medKitAmount2 = if ((size(prodList) > 1))
2462
+
                                            then parseIntValue(prodList[1])
2463
+
                                            else 0
2464
+
                                        let medKitAmount3 = if ((size(prodList) > 2))
2465
+
                                            then parseIntValue(prodList[2])
2466
+
                                            else 0
2467
+
                                        if (if (if ((medKitAmount1 > 0))
2468
+
                                            then true
2469
+
                                            else (medKitAmount2 > 0))
2470
+
                                            then true
2471
+
                                            else (medKitAmount3 > 0))
2472
+
                                            then throw("You have to use own Medical Kit")
2473
+
                                            else {
2474
+
                                                let existStr = getString(economyContract, keyEsWarehouse())
2475
+
                                                let existAmounts = if (isDefined(existStr))
2476
+
                                                    then split_4C(value(existStr), "_")
2477
+
                                                    else nil
2478
+
                                                let existAmount = if ((size(existAmounts) > 0))
2479
+
                                                    then parseIntValue(existAmounts[0])
2480
+
                                                    else 0
2481
+
                                                if ((0 >= existAmount))
2482
+
                                                    then throw("There are no Medical Kits L1 at Emergency Service storage")
2483
+
                                                    else {
2484
+
                                                        let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2485
+
                                                        let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2486
+
                                                        let recipe = split(productionMatrix[0], "_")
2487
+
                                                        let totalMat = getRecipeMaterials(recipe)
2488
+
                                                        let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2489
+
                                                        if ((pmt.amount != sellPrice))
2490
+
                                                            then throw(("Payment attached should be " + toString(sellPrice)))
2491
+
                                                            else {
2492
+
                                                                let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2493
+
                                                                $Tuple2(([IntegerEntry(keyHealth, newHealth), prologAction] ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2494
+
                                                                }
2495
+
                                                        }
2496
+
                                                }
2497
+
                                        }
2498
+
                                }
2461
2499
 
                    }
2462
2500
 
            }
2463
2501
 
    }
2530
2568
 
            let newMat = makeString(subtractMaterials(true, mList, EXPMATERIALS), "_")
2531
2569
 
            let eqKey = keyDuckEquipment(duckAssetId)
2532
2570
 
            let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2533
-
            let $t07486774964 = subtractEquipment(currentEq, f._5)
2534
-
            let newEq = $t07486774964._1
2535
-
            let shouldZeroBuffs = $t07486774964._2
2571
+
            let $t07583875935 = subtractEquipment(currentEq, f._5)
2572
+
            let newEq = $t07583875935._1
2573
+
            let shouldZeroBuffs = $t07583875935._2
2536
2574
 
            let e = expeditionInternal(i.caller, i.transactionId)
2537
2575
 
            let id = e._2._1
2538
2576
 
            let result = if ((0 >= f._1))
2542
2580
 
                    else ((((nil :+ StringEntry(keyDuckLocation(duckAssetId), makeString([e._2._2, "L", id], "_"))) :+ IntegerEntry(keyHealth, f._1)) :+ StringEntry(eqKey, newEq)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], newMat, currentPack[bpIdxProd]], ":"))))), id, f._3)
2543
2581
 
            if (checkTournament(duckAssetId))
2544
2582
 
                then throw("expedition_checkTournament")
2545
-
                else {
2546
-
                    let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2547
-
                    $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) :+ prologAction), $Tuple3(result._2, result._3, acresResult))
2548
-
                    }
2583
+
                else if (checkDelivery(duckAssetId))
2584
+
                    then throw("expedition_checkDelivery")
2585
+
                    else {
2586
+
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2587
+
                        $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) :+ prologAction), $Tuple3(result._2, result._3, acresResult))
2588
+
                        }
2549
2589
 
            }
2550
2590
 
    }
2551
2591
 
3043
3083
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
3044
3084
 
            if (checkTournament(duckAssetId))
3045
3085
 
                then throw("equipDuck_checkTournament")
3046
-
                else {
3047
-
                    let eqKey = keyDuckEquipment(duckAssetId)
3048
-
                    let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3049
-
                    let bpKey = keyBackpackByDuck(duckAssetId)
3050
-
                    let currentPack = getBackpack(bpKey)
3051
-
                    let newEq = split(equipment, "_")
3052
-
                    if ((size(newEq) != NUMSEGMENTS))
3053
-
                        then throw("Wrong equipment string")
3054
-
                        else {
3055
-
                            let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3056
-
                            let segBpAux = split(newEq[segBackpack], ";")[1]
3057
-
                            let buffEffect = if ((segBpAux == ""))
3058
-
                                then 0
3059
-
                                else {
3060
-
                                    let aux0 = split(segBpAux, ",")[0]
3061
-
                                    if ((aux0 == ""))
3062
-
                                        then 0
3063
-
                                        else {
3064
-
                                            let idxCnt = split(aux0, ":")
3065
-
                                            let idx = idxCnt[0]
3066
-
                                            let cnt = idxCnt[1]
3067
-
                                            if (if (if (if (if ((idx == "06"))
3068
-
                                                then true
3069
-
                                                else (idx == "07"))
3070
-
                                                then true
3071
-
                                                else (idx == "08"))
3072
-
                                                then (cnt != "")
3073
-
                                                else false)
3074
-
                                                then (parseIntValue(cnt) > 0)
3075
-
                                                else false)
3076
-
                                                then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3077
-
                                                else 0
3078
-
                                            }
3079
-
                                    }
3080
-
                            let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3081
-
                            let newProdB = dressB(newEq, tempProdB, false, stats)
3082
-
                            let newProdStr = bytesToProdStr(newProdB)
3083
-
                            $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProdStr], ":")), StringEntry(keyDuckBuffs(duckAssetId), makeString([toString(stats[7]), toString(stats[8]), toString(stats[9]), toString(stats[10]), toString(stats[11])], "_")), prologAction], 0)
3084
-
                            }
3085
-
                    }
3086
+
                else if (checkDelivery(duckAssetId))
3087
+
                    then throw("equipDuck_checkDelivery")
3088
+
                    else {
3089
+
                        let eqKey = keyDuckEquipment(duckAssetId)
3090
+
                        let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3091
+
                        let bpKey = keyBackpackByDuck(duckAssetId)
3092
+
                        let currentPack = getBackpack(bpKey)
3093
+
                        let newEq = split(equipment, "_")
3094
+
                        if ((size(newEq) != NUMSEGMENTS))
3095
+
                            then throw("Wrong equipment string")
3096
+
                            else {
3097
+
                                let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3098
+
                                let segBpAux = split(newEq[segBackpack], ";")[1]
3099
+
                                let buffEffect = if ((segBpAux == ""))
3100
+
                                    then 0
3101
+
                                    else {
3102
+
                                        let aux0 = split(segBpAux, ",")[0]
3103
+
                                        if ((aux0 == ""))
3104
+
                                            then 0
3105
+
                                            else {
3106
+
                                                let idxCnt = split(aux0, ":")
3107
+
                                                let idx = idxCnt[0]
3108
+
                                                let cnt = idxCnt[1]
3109
+
                                                if (if (if (if (if ((idx == "06"))
3110
+
                                                    then true
3111
+
                                                    else (idx == "07"))
3112
+
                                                    then true
3113
+
                                                    else (idx == "08"))
3114
+
                                                    then (cnt != "")
3115
+
                                                    else false)
3116
+
                                                    then (parseIntValue(cnt) > 0)
3117
+
                                                    else false)
3118
+
                                                    then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3119
+
                                                    else 0
3120
+
                                                }
3121
+
                                        }
3122
+
                                let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3123
+
                                let newProdB = dressB(newEq, tempProdB, false, stats)
3124
+
                                let newProdStr = bytesToProdStr(newProdB)
3125
+
                                $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProdStr], ":")), StringEntry(keyDuckBuffs(duckAssetId), makeString([toString(stats[7]), toString(stats[8]), toString(stats[9]), toString(stats[10]), toString(stats[11])], "_")), prologAction], 0)
3126
+
                                }
3127
+
                        }
3086
3128
 
            }
3087
3129
 
    }
3088
3130
 
3108
3150
 
            let curO = parseIntValue(curLoft[volOccupied])
3109
3151
 
            let curF = parseIntValue(curLoft[volFree])
3110
3152
 
            let newForts = split(plan, "_")
3111
-
            let $t09686796982 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3112
-
            let tempProdB = $t09686796982._1
3113
-
            let tempO = $t09686796982._2
3114
-
            let tempF = $t09686796982._3
3115
-
            let $t09698597081 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3116
-
            let newProdB = $t09698597081._1
3117
-
            let newO = $t09698597081._2
3118
-
            let newF = $t09698597081._3
3153
+
            let $t09799398108 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3154
+
            let tempProdB = $t09799398108._1
3155
+
            let tempO = $t09799398108._2
3156
+
            let tempF = $t09799398108._3
3157
+
            let $t09811198207 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3158
+
            let newProdB = $t09811198207._1
3159
+
            let newO = $t09811198207._2
3160
+
            let newF = $t09811198207._3
3119
3161
 
            let newProdStr = bytesToProdStr(newProdB)
3120
3162
 
            let newLoftStr = makeString([curLoft[volLocked], toString(newO), toString(newF), curLoft[volTotal]], "_")
3121
3163
 
            $Tuple2([StringEntry(fortKey, plan), StringEntry(whKey, makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], newProdStr, newLoftStr], ":")), prologAction], 0)
3165
3207
 
        let savedHealth = getIntegerValue(keySavedHealth(duckAssetId))
3166
3208
 
        let savedLocation = getStringValue(keySavedLocation(duckAssetId))
3167
3209
 
        $Tuple2([IntegerEntry(keyDuckHealth(duckAssetId), savedHealth), StringEntry(keyDuckLocation(duckAssetId), savedLocation)], false)
3210
+
        }
3211
+
3212
+
3213
+
3214
+
@Callable(i)
3215
+
func exitDeliveryInternal (duckAssetId) = if ((i.caller != this))
3216
+
    then throw("Access denied")
3217
+
    else {
3218
+
        let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
3219
+
        let now = lastBlock.timestamp
3220
+
        let startTime = parseIntValue(curLocation[locIdxContinent])
3221
+
        let distance = parseIntValue(curLocation[locIdxId])
3222
+
        let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(duckAssetId)), "NFT duck is orphaned")
3223
+
        let healthKey = keyDuckHealth(duckAssetId)
3224
+
        let curHealth = getIntegerValue(healthKey)
3225
+
        let outcomeActions = if ((distance >= 3))
3226
+
            then {
3227
+
                let reward = invoke(economyContract, "sendDeliveryReward", [owner], nil)
3228
+
                if ((reward == reward))
3229
+
                    then nil
3230
+
                    else throw("Strict value is not equal to itself.")
3231
+
                }
3232
+
            else {
3233
+
                let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
3234
+
                let unlock = invoke(economyContract, "updateDeliveryLocked", [(lockedTotal - MIN_USDT_FEE_DELIVERY)], nil)
3235
+
                if ((unlock == unlock))
3236
+
                    then if ((0 >= curHealth))
3237
+
                        then nil
3238
+
                        else [IntegerEntry(keyDeliveryDelayByDuck(duckAssetId), (startTime + DAYMILLIS))]
3239
+
                    else throw("Strict value is not equal to itself.")
3240
+
                }
3241
+
        let savedHealth = getIntegerValue(keySavedHealth(duckAssetId))
3242
+
        let savedLocation = getStringValue(keySavedLocation(duckAssetId))
3243
+
        $Tuple2(((outcomeActions :+ IntegerEntry(healthKey, savedHealth)) :+ StringEntry(keyDuckLocation(duckAssetId), savedLocation)), false)
3168
3244
 
        }
3169
3245
 
3170
3246
 
3281
3357
 
        let userAddr = toString(i.caller)
3282
3358
 
        let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
3283
3359
 
        let fundTotal = valueOrElse(getInteger(economyContract, deliveryFundKey), 0)
3284
-
        if ((MIN_USDT_FEE_DELIVERY > fundTotal))
3285
-
            then throw(("Delivery is not available, fund=" + toString(fundTotal)))
3360
+
        let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
3361
+
        if ((MIN_USDT_FEE_DELIVERY > (fundTotal - lockedTotal)))
3362
+
            then throw(((("Delivery is not available, fund=" + fixedPoint(fundTotal, 6)) + ", locked=") + fixedPoint(lockedTotal, 6)))
3286
3363
 
            else {
3287
-
                let keyHealth = keyDuckHealth(duckAssetId)
3288
-
                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
3289
-
                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
3290
-
                let curLocKey = keyDuckLocation(duckAssetId)
3291
-
                let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3292
3364
 
                let now = lastBlock.timestamp
3293
-
                let deliveryLocation = (toString(now) + "_D_0")
3294
-
                $Tuple2([prologAction, IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, deliveryLocation)], deliveryLocation)
3365
+
                let delayETA = valueOrElse(getInteger(keyDeliveryDelayByDuck(duckAssetId)), 0)
3366
+
                if ((delayETA > now))
3367
+
                    then throw(("Delivery is forbidden for your duck until " + toString(delayETA)))
3368
+
                    else if (checkTournament(duckAssetId))
3369
+
                        then throw("acceptDelivery_checkTournament")
3370
+
                        else if (checkDelivery(duckAssetId))
3371
+
                            then throw("acceptDelivery_checkDelivery")
3372
+
                            else {
3373
+
                                let newLockedTotal = asInt(invoke(economyContract, "updateDeliveryLocked", [(lockedTotal + MIN_USDT_FEE_DELIVERY)], nil))
3374
+
                                let keyHealth = keyDuckHealth(duckAssetId)
3375
+
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
3376
+
                                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
3377
+
                                let curLocKey = keyDuckLocation(duckAssetId)
3378
+
                                let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3379
+
                                let deliveryLocation = (toString(now) + "_D_0")
3380
+
                                $Tuple2([prologAction, IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, deliveryLocation)], $Tuple2(deliveryLocation, newLockedTotal))
3381
+
                                }
3295
3382
 
                }
3296
3383
 
        }
3297
3384
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let DAYMILLIS = 86400000
5
+
4
6
 
func keyLastArbTimeByUser (addr) = ("lastArbTimeUser_" + addr)
5
7
 
6
8
 
7
9
 
let SCALE8 = 100000000
8
10
 
9
11
 
let xpLevelScale = 3200
10
12
 
11
13
 
let xpLevelRecipPow = 4000
12
14
 
13
15
 
let numPointsOnLevelUp = 3
14
16
 
15
17
 
let robberyCostMin = 100000000
16
18
 
17
19
 
let robberyCooldownCoeff = 400
18
20
 
19
21
 
let requirements = ["Strength", "Accuracy", "Intellect", "Endurance", "Dexterity", "Level", "Health"]
20
22
 
21
23
 
let charStrength = 0
22
24
 
23
25
 
let charAccuracy = 1
24
26
 
25
27
 
let charIntellect = 2
26
28
 
27
29
 
let charEndurance = 3
28
30
 
29
31
 
let charDexterity = 4
30
32
 
31
33
 
let segBackpack = 0
32
34
 
33
35
 
let NUMSEGMENTS = 6
34
36
 
35
37
 
let NUMMAINAUX = 2
36
38
 
37
39
 
let MAXSLOTS = 2
38
40
 
39
41
 
let MAXPRODINSLOT = 30
40
42
 
41
43
 
let landRobCooldowns = [0, 600000, 900000, 43200000, 21600000]
42
44
 
43
45
 
let MIN_RES_TO_ROB = 20000000
44
46
 
45
47
 
let robIdxLocked = 1
46
48
 
47
49
 
let duckIdxFree = 0
48
50
 
49
51
 
let duckIdxPreparing = 1
50
52
 
51
53
 
func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
52
54
 
53
55
 
54
56
 
func keyDuckChars (duckAssetId) = ("duckChars_" + duckAssetId)
55
57
 
56
58
 
57
59
 
func keyDuckXP (duckAssetId) = ("duckXP_" + duckAssetId)
58
60
 
59
61
 
60
62
 
func keyDuckLevel (duckAssetId) = ("duckLevel_" + duckAssetId)
61
63
 
62
64
 
63
65
 
func keyDuckFreePoints (duckAssetId) = ("duckFreePoints_" + duckAssetId)
64
66
 
65
67
 
66
68
 
func keyDuckEquipment (duckAssetId) = ("duckEquipment_" + duckAssetId)
67
69
 
68
70
 
69
71
 
func keyUserXP (addr) = ("userXP_" + addr)
70
72
 
71
73
 
72
74
 
func keyUserLevel (addr) = ("userLevel_" + addr)
73
75
 
74
76
 
75
77
 
func keyUserFreePoints (addr) = ("userFreePoints_" + addr)
76
78
 
77
79
 
78
80
 
func keySavedHealth (duckAssetId) = ("savedHealth_" + duckAssetId)
79
81
 
80
82
 
81
83
 
func keySavedLocation (duckAssetId) = ("savedLocation_" + duckAssetId)
82
84
 
83
85
 
84
86
 
func keyDuckBuffs (duckAssetId) = ("duckBuffs_" + duckAssetId)
85
87
 
86
88
 
87
89
 
func keyLastRobberyTimeByDuck (duckAssetId) = ("lastRobberyTime_" + duckAssetId)
88
90
 
89
91
 
90
92
 
func keyLastRobberyCostByDuck (duckAssetId) = ("lastRobberyCost_" + duckAssetId)
91
93
 
92
94
 
93
95
 
func keyLandRobberyState (landAssetId) = ("landRobberyState_" + landAssetId)
94
96
 
95
97
 
96
98
 
func keyLandCooldownETA (landAssetId) = ("landCooldownETA_" + landAssetId)
97
99
 
98
100
 
99
101
 
func keyDuckRobberyState (duckAssetId) = ("duckRobberyState_" + duckAssetId)
100
102
 
101
103
 
102
104
 
func keyLockedLandByDuck (duckAssetId) = ("lockedLandByDuck_" + duckAssetId)
105
+
106
+
107
+
func keyDeliveryDelayByDuck (duckAssetId) = ("deliveryDelayByDuck_" + duckAssetId)
103
108
 
104
109
 
105
110
 
let xpClaim = 10000
106
111
 
107
112
 
let xpSuccessFlight = 10000
108
113
 
109
114
 
let xpFailFlight = 2000
110
115
 
111
116
 
let xpCallES = 100000
112
117
 
113
118
 
let xpCustomName = 1000000
114
119
 
115
120
 
let xpNewSLand = 5000000
116
121
 
117
122
 
let xpUpgradeInfra = 10000
118
123
 
119
124
 
let xpMerge = 1000000
120
125
 
121
126
 
let xpOnboard = 1000000
122
127
 
123
128
 
let xpHeal = 10000
124
129
 
125
130
 
func levelByXP (xp) = fraction(xpLevelScale, pow(xp, 4, xpLevelRecipPow, 4, 4, DOWN), SCALE8)
126
131
 
127
132
 
128
133
 
func maxHealth (level) = (100 + level)
129
134
 
130
135
 
131
136
 
func levelUp (currLevel,newXP) = {
132
137
 
    let newLevel = levelByXP(newXP)
133
138
 
[newLevel, (numPointsOnLevelUp * (newLevel - currLevel))]
134
139
 
    }
135
140
 
136
141
 
137
142
 
func getDuckStats (stakingContract,duckAssetId,buffEffect,forceBuffs) = {
138
143
 
    let chars = split(valueOrElse(getString(stakingContract, keyDuckChars(duckAssetId)), "0_0_0_0_0"), "_")
139
144
 
    let lvl = valueOrElse(getInteger(stakingContract, keyDuckLevel(duckAssetId)), 0)
140
145
 
    let health = valueOrElse(getInteger(stakingContract, keyDuckHealth(duckAssetId)), maxHealth(lvl))
141
146
 
    let stateBuffs = split(valueOrElse(getString(stakingContract, keyDuckBuffs(duckAssetId)), "0_0_0_0_0"), "_")
142
147
 
    ([parseIntValue(chars[charStrength]), parseIntValue(chars[charAccuracy]), parseIntValue(chars[charIntellect]), parseIntValue(chars[charEndurance]), parseIntValue(chars[charDexterity]), lvl, health] ++ (if (forceBuffs)
143
148
 
        then [buffEffect, buffEffect, buffEffect, buffEffect, buffEffect]
144
149
 
        else [parseIntValue(stateBuffs[charStrength]), parseIntValue(stateBuffs[charAccuracy]), parseIntValue(stateBuffs[charIntellect]), parseIntValue(stateBuffs[charEndurance]), parseIntValue(stateBuffs[charDexterity])]))
145
150
 
    }
146
151
 
147
152
 
148
153
 
func getRobberyData (stakingContract,duckAssetId) = {
149
154
 
    let lastRobCost = valueOrElse(getInteger(stakingContract, keyLastRobberyCostByDuck(duckAssetId)), 0)
150
155
 
    let lastRobTime = valueOrElse(getInteger(stakingContract, keyLastRobberyTimeByDuck(duckAssetId)), 0)
151
156
 
    let now = lastBlock.timestamp
152
157
 
    let robCost = max([robberyCostMin, (lastRobCost - (robberyCooldownCoeff * (now - lastRobTime)))])
153
158
 
    let duckState = valueOrElse(getInteger(stakingContract, keyDuckRobberyState(duckAssetId)), 0)
154
159
 
    let lockedLand = valueOrElse(getString(stakingContract, keyLockedLandByDuck(duckAssetId)), "")
155
160
 
    let landETA = valueOrElse(getInteger(stakingContract, keyLandCooldownETA(lockedLand)), 0)
156
161
 
    $Tuple5(robCost, lastRobTime, duckState, lockedLand, landETA)
157
162
 
    }
158
163
 
159
164
 
160
165
 
let LANDPREFIX = "LAND"
161
166
 
162
167
 
let DUCKPREFIX = "DUCK"
163
168
 
164
169
 
let ARTPRESALE = "PRESALE"
165
170
 
166
171
 
let NUMRES = 6
167
172
 
168
173
 
let MAX_LANDS_STAKED_BY_USER = 25
169
174
 
170
175
 
let DAILYRESBYPIECE = 3456000
171
176
 
172
-
let DAYMILLIS = 86400000
173
-
174
177
 
let WHMULTIPLIER = 10000000000
175
178
 
176
179
 
let DEFAULTLOCATION = "Africa_F_Africa"
177
180
 
178
181
 
let RESOURCEPRICEMIN = 39637
179
182
 
180
183
 
let ESSELLCOEF = 10
181
184
 
182
185
 
let MIN_USDT_FEE_DELIVERY = 50000
183
186
 
184
187
 
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", "Mine L1", "Mine L2", "Mine L3", "Trap L1", "Trap L2", "Trap L3"]
185
188
 
186
189
 
let continents = ["Americas", "Europe", "Asia", "Africa", "Oceania"]
187
190
 
188
191
 
let COEFF2MAT = 10000000
189
192
 
190
193
 
let fortAllowedProds = [15, 16, 17, 18, 19, 20]
191
194
 
192
195
 
let productionMatrix = ["8_8_8_17_17_42_12_0_30_0,0,0,0,0,0,0_", "8_8_8_17_17_42_24_0_60_0,0,5,2,0,0,0_", "8_8_8_17_17_42_36_0_120_0,0,10,4,0,0,0_", "8_19_19_8_27_19_26_1_20_0,0,0,0,0,0,0_001", "8_19_19_8_27_19_52_1_40_0,0,0,0,0,0,0_001", "8_19_19_8_27_19_78_1_80_0,0,0,0,0,0,0_001", "8_8_8_8_8_60_13_2_2_0,0,0,0,0,0,0_011", "8_8_8_8_8_60_26_2_4_0,0,0,0,0,0,0_011", "8_8_8_8_8_60_39_2_8_0,0,0,0,0,0,0_011", "30_30_3_17_17_3_30_3_30_0,0,0,0,0,0,0_111", "30_30_3_17_17_3_60_3_50_0,0,0,0,0,0,0_111", "30_30_3_17_17_3_90_3_70_0,0,0,0,0,0,0_111", "18_18_10_18_18_18_11_4_10_0,0,0,0,0,0,0_201", "18_18_10_18_18_18_22_4_20_0,0,0,0,0,0,0_201", "18_18_10_18_18_18_33_4_30_0,0,0,0,0,0,0_201", "4_13_22_4_35_22_23_0_50,1,0_0,0,0,0,0,0,0_", "4_13_22_4_35_22_46_0_50,1,1_0,2,5,0,0,0,0_", "4_13_22_4_35_22_69_0_50,2,1_0,5,10,0,0,0,0_", "5_25_40_5_10_15_20_1_30,1,1_0,0,0,0,0,0,0_", "5_25_40_5_10_15_40_1_30,1,2_2,1,3,0,0,0,0_", "5_25_40_5_10_15_60_1_30,1,3_5,2,8,0,0,0,0_"]
193
196
 
194
197
 
let rIdxCoeff = 6
195
198
 
196
199
 
let rIdxEffect = 8
197
200
 
198
201
 
let rIdxRequirements = 9
199
202
 
200
203
 
let rIdxSlots = 10
201
204
 
202
205
 
let PRODUCTPKGSIZE = 10
203
206
 
204
207
 
let whIdxLevels = 0
205
208
 
206
209
 
let whIdxRes = 1
207
210
 
208
211
 
let whIdxMat = 2
209
212
 
210
213
 
let whIdxProd = 3
211
214
 
212
215
 
let whIdxLOFT = 4
213
216
 
214
217
 
let volLocked = 0
215
218
 
216
219
 
let volOccupied = 1
217
220
 
218
221
 
let volFree = 2
219
222
 
220
223
 
let volTotal = 3
221
224
 
222
225
 
let bpIdxLevel = 0
223
226
 
224
227
 
let bpIdxRes = 1
225
228
 
226
229
 
let bpIdxMat = 2
227
230
 
228
231
 
let bpIdxProd = 3
229
232
 
230
233
 
let locIdxContinent = 0
231
234
 
232
235
 
let locIdxType = 1
233
236
 
234
237
 
let locIdxId = 2
235
238
 
236
239
 
func keyLandAssetIdToOwner (assetId) = ("no_" + assetId)
237
240
 
238
241
 
239
242
 
func keyLandAssetIdToCustomName (assetId) = ("lcna_" + assetId)
240
243
 
241
244
 
242
245
 
func keyStakedTimeByAssetId (assetId) = ("st_" + assetId)
243
246
 
244
247
 
245
248
 
func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["las", type, assetId], "_")
246
249
 
247
250
 
248
251
 
func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("sttao_" + nftType) + "_") + assetId) + "_") + ownerAddr)
249
252
 
250
253
 
251
254
 
func keyWarehouseByLand (landAssetId) = ("wh_" + landAssetId)
252
255
 
253
256
 
254
257
 
func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
255
258
 
256
259
 
257
260
 
func keyFortificationsByLand (landAssetId) = ("fortifications_" + landAssetId)
258
261
 
259
262
 
260
263
 
func keyDuckAssetIdToCustomName (assetId) = ("duckCustomNameByAssetId_" + assetId)
261
264
 
262
265
 
263
266
 
func keyAddressToCustomName (addr) = ("accountCustomNameByAddr_" + addr)
264
267
 
265
268
 
266
269
 
func keyAddressRefBy (addr) = ("accRefBy_" + addr)
267
270
 
268
271
 
269
272
 
func keyOnboardArtActivatedOnDuck (duckAssetId) = ("onboardArtActivatedOnDuck_" + duckAssetId)
270
273
 
271
274
 
272
275
 
func keyOnboardArtDuckActivatedBy (addr) = ("onboardArtActivatedDuckBy_" + addr)
273
276
 
274
277
 
275
278
 
func keyAddressReferrals (addr) = ("accReferrals_" + addr)
276
279
 
277
280
 
278
281
 
func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
279
282
 
280
283
 
281
284
 
func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
282
285
 
283
286
 
284
287
 
func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
285
288
 
286
289
 
287
290
 
func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
288
291
 
289
292
 
290
293
 
func keyUserGwlReleaseTime (userAddr) = ("%s%s__userGwlReleaseTime__" + userAddr)
291
294
 
292
295
 
293
296
 
func keyEsWarehouse () = "emergencyWarehouseProducts"
294
297
 
295
298
 
296
299
 
let deliveryFundKey = "deliveryFund"
300
+
301
+
let deliveryLockedKey = "deliveryLocked"
297
302
 
298
303
 
let lastTourIdKey = "%s__lastTourId"
299
304
 
300
305
 
func keyTourStaticDataById (tId) = ("%s%d__tourStaticData__" + toString(tId))
301
306
 
302
307
 
303
308
 
func keyTourDynamicDataById (tId) = ("%s%d__tourDynamicData__" + toString(tId))
304
309
 
305
310
 
306
311
 
func keyBestResultByTourAndDuck (tId,duckAssetId) = makeString(["%s%d%s__bestResultByTourAndDuck", toString(tId), duckAssetId], "__")
307
312
 
308
313
 
309
314
 
let idxStatic = 0
310
315
 
311
316
 
let idxDynamic = 1
312
317
 
313
318
 
let tStaticEnd = 6
314
319
 
315
320
 
let tDynamicStatus = 1
316
321
 
317
322
 
func getTourData (tourContract,tId) = {
318
323
 
    let static = split(valueOrErrorMessage(getString(tourContract, keyTourStaticDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
319
324
 
    let dynamic = split_4C(valueOrErrorMessage(getString(tourContract, keyTourDynamicDataById(tId)), (("Error reading tournament " + toString(tId)) + " data")), "__")
320
325
 
[static, dynamic]
321
326
 
    }
322
327
 
323
328
 
324
329
 
func isInTournament (tourContract,location) = {
325
330
 
    let lastId = valueOrElse(getInteger(tourContract, lastTourIdKey), 0)
326
331
 
    let loc = split(location, "_")
327
332
 
    let now = lastBlock.timestamp
328
333
 
    let tData = getTourData(tourContract, lastId)
329
334
 
    let static = tData[idxStatic]
330
335
 
    let dynamic = tData[idxDynamic]
331
336
 
    if (if (if ((loc[locIdxType] == "T"))
332
337
 
        then (parseIntValue(loc[locIdxContinent]) == lastId)
333
338
 
        else false)
334
339
 
        then (dynamic[tDynamicStatus] == "INPROGRESS")
335
340
 
        else false)
336
341
 
        then (parseIntValue(static[tStaticEnd]) > now)
337
342
 
        else false
338
343
 
    }
339
344
 
340
345
 
341
346
 
func getRecipeMaterials (recipe) = (parseIntValue(recipe[rIdxCoeff]) * COEFF2MAT)
342
347
 
343
348
 
344
349
 
let KS_SEPARATE_PUBLIC_KEY = false
345
350
 
346
351
 
let KS_ALLOW_BIG_INFRA_MERGE = false
347
352
 
348
353
 
let KS_ALLOW_DELIVERY = true
349
354
 
350
355
 
let chain = take(drop(this.bytes, 1), 1)
351
356
 
352
357
 
let usdtAssetId = match chain {
353
358
 
    case _ => 
354
359
 
        if ((base58'2W' == $match0))
355
360
 
            then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
356
361
 
            else if ((base58'2T' == $match0))
357
362
 
                then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
358
363
 
                else throw("Unknown chain")
359
364
 
}
360
365
 
361
366
 
let defaultRestAddressStr = match chain {
362
367
 
    case _ => 
363
368
 
        if ((base58'2W' == $match0))
364
369
 
            then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
365
370
 
            else if ((base58'2T' == $match0))
366
371
 
                then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
367
372
 
                else throw("Unknown chain")
368
373
 
}
369
374
 
370
375
 
let InfraUpgradeCostS = match chain {
371
376
 
    case _ => 
372
377
 
        if ((base58'2W' == $match0))
373
378
 
            then 10000000000
374
379
 
            else if ((base58'2T' == $match0))
375
380
 
                then 100000000
376
381
 
                else throw("Unknown chain")
377
382
 
}
378
383
 
379
384
 
let arbitrageDelay = match chain {
380
385
 
    case _ => 
381
386
 
        if ((base58'2W' == $match0))
382
387
 
            then 86400000
383
388
 
            else if ((base58'2T' == $match0))
384
389
 
                then 60000
385
390
 
                else throw("Unknown chain")
386
391
 
}
387
392
 
388
393
 
let SEP = "__"
389
394
 
390
395
 
let MULT6 = 1000000
391
396
 
392
397
 
let MULT8 = 100000000
393
398
 
394
399
 
let SSIZE = 25
395
400
 
396
401
 
let MSIZE = 100
397
402
 
398
403
 
let LSIZE = 225
399
404
 
400
405
 
let XLSIZE = 400
401
406
 
402
407
 
let XXLSIZE = 625
403
408
 
404
409
 
let ITER6 = [0, 1, 2, 3, 4, 5]
405
410
 
406
411
 
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
407
412
 
408
413
 
409
414
 
let IdxCfgStakingDapp = 1
410
415
 
411
416
 
let IdxCfgEconomyDapp = 2
412
417
 
413
418
 
let IdxCfgGovernanceDapp = 3
414
419
 
415
420
 
let IdxCfgWlgDapp = 4
416
421
 
417
422
 
let IdxCfgTournamentDapp = 7
418
423
 
419
424
 
let IdxCfgAcresDapp = 8
420
425
 
421
426
 
func keyRestCfg () = "%s__restConfig"
422
427
 
423
428
 
424
429
 
func keyRestAddress () = "%s__restAddr"
425
430
 
426
431
 
427
432
 
func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
428
433
 
429
434
 
430
435
 
func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
431
436
 
432
437
 
433
438
 
let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
434
439
 
435
440
 
let restCfg = readRestCfgOrFail(restContract)
436
441
 
437
442
 
let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
438
443
 
439
444
 
let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
440
445
 
441
446
 
let govContract = getContractAddressOrFail(restCfg, IdxCfgGovernanceDapp)
442
447
 
443
448
 
let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
444
449
 
445
450
 
let tournamentContract = getContractAddressOrFail(restCfg, IdxCfgTournamentDapp)
446
451
 
447
452
 
let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
448
453
 
449
454
 
let recLandNum = 0
450
455
 
451
456
 
let recLandSize = 1
452
457
 
453
458
 
let recTerrains = 2
454
459
 
455
460
 
let recContinent = 3
456
461
 
457
462
 
let wlgAssetIdKey = "wlg_assetId"
458
463
 
459
464
 
let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
460
465
 
461
466
 
let acresAssetIdKey = "acresAssetId"
462
467
 
463
468
 
let acresAssetId = valueOrErrorMessage(getBinary(acresContract, acresAssetIdKey), "ACRES is not issued yet")
464
469
 
465
470
 
let randomDelay = 2
466
471
 
467
472
 
func keyCommit (address) = ("finishBlockForAddr_" + address)
468
473
 
469
474
 
470
475
 
func keyResProportions () = "resTypesProportions"
471
476
 
472
477
 
473
478
 
func keyResTypesByContinent (continent) = ("resTypesByContinent_" + continent)
474
479
 
475
480
 
476
481
 
func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
477
482
 
478
483
 
479
484
 
func keyStakedPiecesByOwner (ownerAddr) = ("stakedPiecesByOwner_" + ownerAddr)
480
485
 
481
486
 
482
487
 
func asString (v) = match v {
483
488
 
    case s: String => 
484
489
 
        s
485
490
 
    case _ => 
486
491
 
        throw("fail to cast into String")
487
492
 
}
488
493
 
489
494
 
490
495
 
func asInt (v) = match v {
491
496
 
    case n: Int => 
492
497
 
        n
493
498
 
    case _ => 
494
499
 
        throw("fail to cast into Int")
495
500
 
}
496
501
 
497
502
 
498
503
 
func asBoolean (v) = match v {
499
504
 
    case s: Boolean => 
500
505
 
        s
501
506
 
    case _ => 
502
507
 
        throw("fail to cast into Boolean")
503
508
 
}
504
509
 
505
510
 
506
511
 
func numPiecesBySize (landSize) = match landSize {
507
512
 
    case _ => 
508
513
 
        if (("S" == $match0))
509
514
 
            then SSIZE
510
515
 
            else if (("M" == $match0))
511
516
 
                then MSIZE
512
517
 
                else if (("L" == $match0))
513
518
 
                    then LSIZE
514
519
 
                    else if (("XL" == $match0))
515
520
 
                        then XLSIZE
516
521
 
                        else if (("XXL" == $match0))
517
522
 
                            then XXLSIZE
518
523
 
                            else throw("Unknown land size")
519
524
 
}
520
525
 
521
526
 
522
527
 
func isDigit (s) = isDefined(parseInt(s))
523
528
 
524
529
 
525
530
 
func keyBlocked () = "contractsBlocked"
526
531
 
527
532
 
528
533
 
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
529
534
 
530
535
 
536
+
func fixedPoint (val,decimals) = {
537
+
    let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
538
+
    let lowPart = toString((val % tenPow))
539
+
    let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
540
+
    (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
541
+
    }
542
+
543
+
531
544
 
func getRandomNumber (maxValue,finishHeight,auxEntropy) = {
532
545
 
    let randomSeedBlock = value(blockInfoByHeight(finishHeight))
533
546
 
    let randomHash = sha256((value(randomSeedBlock.vrf) + auxEntropy))
534
547
 
    (toInt(randomHash) % maxValue)
535
548
 
    }
536
549
 
537
550
 
538
551
 
let incubatorAddr = match chain {
539
552
 
    case _ => 
540
553
 
        if ((base58'2W' == $match0))
541
554
 
            then addressFromStringValue("3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv")
542
555
 
            else if ((base58'2T' == $match0))
543
556
 
                then this
544
557
 
                else throw("Unknown chain")
545
558
 
}
546
559
 
547
560
 
let breederAddr = match chain {
548
561
 
    case _ => 
549
562
 
        if ((base58'2W' == $match0))
550
563
 
            then addressFromStringValue("3PDVuU45H7Eh5dmtNbnRNRStGwULA7NY6Hb")
551
564
 
            else if ((base58'2T' == $match0))
552
565
 
                then this
553
566
 
                else throw("Unknown chain")
554
567
 
}
555
568
 
556
569
 
let pub = match chain {
557
570
 
    case _ => 
558
571
 
        if ((base58'2W' == $match0))
559
572
 
            then if (KS_SEPARATE_PUBLIC_KEY)
560
573
 
                then base58'CWsMtTZC5BjjoL4Q1ayW4Wwb1ehGACQB6DrKyPgotKfm'
561
574
 
                else base58'6LfPuKJjLgekmncBhMg2LZyMTNVzZBccXR28ySXm9uXD'
562
575
 
            else if ((base58'2T' == $match0))
563
576
 
                then base58'6LfPuKJjLgekmncBhMg2LZyMTNVzZBccXR28ySXm9uXD'
564
577
 
                else throw("Unknown chain")
565
578
 
}
566
579
 
567
580
 
let EMPTY_PROD50 = base64'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=='
568
581
 
569
582
 
let FIVEMINUTESMILLIS = 300000
583
+
584
+
let TEN_MINUTES_MILLIS = 600000
570
585
 
571
586
 
let RENAMINGCOST = 5000000
572
587
 
573
588
 
let MAXNAMELEN = 50
574
589
 
575
590
 
let InfraUpgradeCostSUsdt = 10000000
576
591
 
577
592
 
let EXPMATERIALS = match chain {
578
593
 
    case _ => 
579
594
 
        if ((base58'2W' == $match0))
580
595
 
            then 252289527462
581
596
 
            else if ((base58'2T' == $match0))
582
597
 
                then 2522895274
583
598
 
                else throw("Unknown chain")
584
599
 
}
585
600
 
586
601
 
let EXPUSDT = match chain {
587
602
 
    case _ => 
588
603
 
        if ((base58'2W' == $match0))
589
604
 
            then 250000000
590
605
 
            else if ((base58'2T' == $match0))
591
606
 
                then 250000000
592
607
 
                else throw("Unknown chain")
593
608
 
}
594
609
 
595
610
 
let S_COST_ACRES = 2500000000
596
611
 
597
612
 
let FIVEX = toBigInt(5)
598
613
 
599
614
 
let TWENTYX = toBigInt(20)
600
615
 
601
616
 
let TWENTY2X = toBigInt((20 * 20))
602
617
 
603
618
 
let TWENTY3X = toBigInt(((20 * 20) * 20))
604
619
 
605
620
 
let TWENTY4X = toBigInt((((20 * 20) * 20) * 20))
606
621
 
607
622
 
let TWENTY5X = toBigInt(((((20 * 20) * 20) * 20) * 20))
608
623
 
609
624
 
let PRESALENUMLANDS = 500
610
625
 
611
626
 
func keyNextFreeLandNum () = "nextLandNum"
612
627
 
613
628
 
614
629
 
func keyLandCustomNameToAssetId (name) = ("lcn_" + name)
615
630
 
616
631
 
617
632
 
func keyLandToAssetId (landNum) = ("la_" + landNum)
618
633
 
619
634
 
620
635
 
func keyInfraLevelByAssetIdAndOwner (assetId,ownerAddr) = ((("ilao_" + assetId) + "_") + ownerAddr)
621
636
 
622
637
 
623
638
 
func keyLandNumToOwner (landNum) = ("lo_" + landNum)
624
639
 
625
640
 
626
641
 
func keyDuckCustomNameToAssetId (name) = ("duckByCustomName_" + name)
627
642
 
628
643
 
629
644
 
func keyCustomNameToAddress (name) = ("accountByCustomName_" + name)
630
645
 
631
646
 
632
647
 
func keyOldies () = "oldiesList"
633
648
 
634
649
 
635
650
 
let claimModeWh = 0
636
651
 
637
652
 
let claimModeDuck = 1
638
653
 
639
654
 
let claimModeWhThenDuck = 2
640
655
 
641
656
 
let flHealth = 0
642
657
 
643
658
 
let flTimestamp = 5
644
659
 
645
660
 
let flBonus = 6
646
661
 
647
662
 
let flProdsUsed = 7
648
663
 
649
664
 
func nftName (landNum,landSize) = ((LANDPREFIX + landNum) + landSize)
650
665
 
651
666
 
652
667
 
func toVolume (amount,pkgSize) = {
653
668
 
    let pkgs = if ((amount >= 0))
654
669
 
        then (((amount + pkgSize) - 1) / pkgSize)
655
670
 
        else -((((-(amount) + pkgSize) - 1) / pkgSize))
656
671
 
    (pkgs * MULT8)
657
672
 
    }
658
673
 
659
674
 
660
675
 
func distributeByWeights (total,weights) = {
661
676
 
    let sum = (((((weights[0] + weights[1]) + weights[2]) + weights[3]) + weights[4]) + weights[5])
662
677
 
    if ((0 >= sum))
663
678
 
        then throw("Zero weights sum")
664
679
 
        else {
665
680
 
            let norm6 = fraction(total, MULT6, sum)
666
681
 
            func normalizer (acc,elem) =             (acc :+ fraction(elem, norm6, MULT6))
667
682
 
668
683
 
            let $l = weights
669
684
 
            let $s = size($l)
670
685
 
            let $acc0 = nil
671
686
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
672
687
 
                then $a
673
688
 
                else normalizer($a, $l[$i])
674
689
 
675
690
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
676
691
 
                then $a
677
692
 
                else throw("List size exceeds 6")
678
693
 
679
694
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
680
695
 
            }
681
696
 
    }
682
697
 
683
698
 
684
699
 
func getNeededMaterials (total) = {
685
700
 
    let props = split(value(getString(keyResProportions())), "_")
686
701
 
    if ((size(props) != NUMRES))
687
702
 
        then throw("Wrong proportions data")
688
703
 
        else {
689
704
 
            let r = [parseIntValue(props[0]), parseIntValue(props[1]), parseIntValue(props[2]), parseIntValue(props[3]), parseIntValue(props[4]), parseIntValue(props[5])]
690
705
 
            distributeByWeights(total, r)
691
706
 
            }
692
707
 
    }
693
708
 
694
709
 
695
710
 
func subtractMaterials (shouldUseMat,has,totalNeed) = {
696
711
 
    let need = getNeededMaterials(totalNeed)
697
712
 
    func subtractor (acc,idx) =     {
698
713
 
        let result = (parseIntValue(has[idx]) - need[idx])
699
714
 
        if ((0 > result))
700
715
 
            then throw(((((("Not enough material idx=" + toString(idx)) + ", you have ") + has[idx]) + ", but need ") + toString(need[idx])))
701
716
 
            else (acc :+ toString(result))
702
717
 
        }
703
718
 
704
719
 
    if (shouldUseMat)
705
720
 
        then {
706
721
 
            let $l = ITER6
707
722
 
            let $s = size($l)
708
723
 
            let $acc0 = nil
709
724
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
710
725
 
                then $a
711
726
 
                else subtractor($a, $l[$i])
712
727
 
713
728
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
714
729
 
                then $a
715
730
 
                else throw("List size exceeds 6")
716
731
 
717
732
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
718
733
 
            }
719
734
 
        else has
720
735
 
    }
721
736
 
722
737
 
723
738
 
func subtractEquipment (oldEq,pUsed) = if ((pUsed == ""))
724
739
 
    then $Tuple2(oldEq, false)
725
740
 
    else {
726
741
 
        func subUsed (acc,idxAmt) =         {
727
742
 
            let parts = split(idxAmt, ",")
728
743
 
            if ((size(parts) != 2))
729
744
 
                then throw("Incorrect format, should be index,amount")
730
745
 
                else {
731
746
 
                    let idx = parseIntValue(parts[0])
732
747
 
                    if (if ((0 > idx))
733
748
 
                        then true
734
749
 
                        else (idx >= size(productionMatrix)))
735
750
 
                        then throw("Unknown product idx")
736
751
 
                        else {
737
752
 
                            let amt = parseIntValue(parts[1])
738
753
 
                            let eqParts = split(acc._1, (parts[0] + ":"))
739
754
 
                            if ((size(eqParts) != 2))
740
755
 
                                then throw((("You don't have " + prodTypes[idx]) + " equipped"))
741
756
 
                                else {
742
757
 
                                    let tmp = eqParts[1]
743
758
 
                                    let numLen = if (isDigit(take(drop(tmp, 1), 1)))
744
759
 
                                        then 2
745
760
 
                                        else 1
746
761
 
                                    let curr = parseIntValue(take(tmp, numLen))
747
762
 
                                    let tail = drop(tmp, numLen)
748
763
 
                                    let newAmt = if ((curr >= amt))
749
764
 
                                        then (curr - amt)
750
765
 
                                        else throw(((((("You equipped " + toString(curr)) + " of ") + prodTypes[idx]) + ", but tried to use ") + toString(amt)))
751
766
 
                                    $Tuple2(((((eqParts[0] + parts[0]) + ":") + toString(newAmt)) + tail), if (acc._2)
752
767
 
                                        then true
753
768
 
                                        else if (if ((idx >= 6))
754
769
 
                                            then (8 >= idx)
755
770
 
                                            else false)
756
771
 
                                            then (newAmt == 0)
757
772
 
                                            else false)
758
773
 
                                    }
759
774
 
                            }
760
775
 
                    }
761
776
 
            }
762
777
 
763
778
 
        let $l = split(pUsed, "_")
764
779
 
        let $s = size($l)
765
780
 
        let $acc0 = $Tuple2(oldEq, false)
766
781
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
767
782
 
            then $a
768
783
 
            else subUsed($a, $l[$i])
769
784
 
770
785
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
771
786
 
            then $a
772
787
 
            else throw("List size exceeds 10")
773
788
 
774
789
 
        $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)
775
790
 
        }
776
791
 
777
792
 
778
793
 
func prodStrToBytes (prodStr) = {
779
794
 
    let pList = if ((prodStr == ""))
780
795
 
        then nil
781
796
 
        else split_4C(prodStr, "_")
782
797
 
    func toBV (acc,recipe) =     {
783
798
 
        let j = (size(acc) / 8)
784
799
 
        let curr = if ((size(pList) > j))
785
800
 
            then parseIntValue(pList[j])
786
801
 
            else 0
787
802
 
        (acc + toBytes(curr))
788
803
 
        }
789
804
 
790
805
 
    let $l = productionMatrix
791
806
 
    let $s = size($l)
792
807
 
    let $acc0 = base58''
793
808
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
794
809
 
        then $a
795
810
 
        else toBV($a, $l[$i])
796
811
 
797
812
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
798
813
 
        then $a
799
814
 
        else throw("List size exceeds 50")
800
815
 
801
816
 
    $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)
802
817
 
    }
803
818
 
804
819
 
805
820
 
func bytesToProdStr (bv) = {
806
821
 
    func fromBV (acc,recipe) =     {
807
822
 
        let j = size(acc)
808
823
 
        let b = take(drop(bv, (8 * j)), 8)
809
824
 
        (acc :+ toString(toInt(b)))
810
825
 
        }
811
826
 
812
827
 
    makeString_2C({
813
828
 
        let $l = productionMatrix
814
829
 
        let $s = size($l)
815
830
 
        let $acc0 = nil
816
831
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
817
832
 
            then $a
818
833
 
            else fromBV($a, $l[$i])
819
834
 
820
835
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
821
836
 
            then $a
822
837
 
            else throw("List size exceeds 50")
823
838
 
824
839
 
        $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)
825
840
 
        }, "_")
826
841
 
    }
827
842
 
828
843
 
829
844
 
func checkStatRequirements (duckStats,reqs) = {
830
845
 
    func check (acc,j) =     {
831
846
 
        let buff = if ((size(duckStats) > (7 + j)))
832
847
 
            then duckStats[(7 + j)]
833
848
 
            else 0
834
849
 
        if ((parseIntValue(reqs[j]) > (duckStats[j] + buff)))
835
850
 
            then throw(("Requirement not satisfied: " + requirements[j]))
836
851
 
            else true
837
852
 
        }
838
853
 
839
854
 
    let $l = [0, 1, 2, 3, 4, 5, 6]
840
855
 
    let $s = size($l)
841
856
 
    let $acc0 = false
842
857
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
843
858
 
        then $a
844
859
 
        else check($a, $l[$i])
845
860
 
846
861
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
847
862
 
        then $a
848
863
 
        else throw("List size exceeds 7")
849
864
 
850
865
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
851
866
 
    }
852
867
 
853
868
 
854
869
 
func placeProdB (idxCnt,pList,isPositive,duckStats,occupied,free) = {
855
870
 
    let parts = split(idxCnt, ":")
856
871
 
    if ((size(parts) != 2))
857
872
 
        then throw("Incorrect format, should be index:amount")
858
873
 
        else if (if (!(isPositive))
859
874
 
            then (size(parts[0]) != 2)
860
875
 
            else false)
861
876
 
            then throw("Product idx should be 2 digits, zero padded")
862
877
 
            else {
863
878
 
                let productIdx = parseIntValue(parts[0])
864
879
 
                let count = parseIntValue(parts[1])
865
880
 
                if (!(containsElement(fortAllowedProds, productIdx)))
866
881
 
                    then throw((("Product '" + prodTypes[productIdx]) + "' cannot be used for land defense"))
867
882
 
                    else if ((0 > count))
868
883
 
                        then throw("Count can't be negative")
869
884
 
                        else if ((count > MAXPRODINSLOT))
870
885
 
                            then throw(((("Can't put more than " + toString(MAXPRODINSLOT)) + " of ") + prodTypes[productIdx]))
871
886
 
                            else if ((count == 0))
872
887
 
                                then $Tuple3(pList, occupied, free)
873
888
 
                                else {
874
889
 
                                    let head = take(pList, (8 * productIdx))
875
890
 
                                    let curr = toInt(take(drop(pList, (8 * productIdx)), 8))
876
891
 
                                    let tail = drop(pList, (8 * (productIdx + 1)))
877
892
 
                                    let recipe = split(productionMatrix[productIdx], "_")
878
893
 
                                    if (if (!(isPositive))
879
894
 
                                        then (count > curr)
880
895
 
                                        else false)
881
896
 
                                        then throw(((((("You have " + toString(curr)) + " of ") + prodTypes[productIdx]) + ", but tried to use ") + toString(count)))
882
897
 
                                        else {
883
898
 
                                            let newAmt = if (if (!(isPositive))
884
899
 
                                                then checkStatRequirements(duckStats, split(recipe[rIdxRequirements], ","))
885
900
 
                                                else false)
886
901
 
                                                then (curr - count)
887
902
 
                                                else (curr + count)
888
903
 
                                            let deltaVol = (toVolume(newAmt, PRODUCTPKGSIZE) - toVolume(curr, PRODUCTPKGSIZE))
889
904
 
                                            $Tuple3(((head + toBytes(newAmt)) + tail), (occupied + deltaVol), (free - deltaVol))
890
905
 
                                            }
891
906
 
                                    }
892
907
 
                }
893
908
 
    }
894
909
 
895
910
 
896
911
 
func addProdB (idxCnt,pList,isPositive,segment,mainAux,slot,duckStats) = {
897
912
 
    let parts = split(idxCnt, ":")
898
913
 
    if ((size(parts) != 2))
899
914
 
        then throw("Incorrect format, should be index:amount")
900
915
 
        else if (if (!(isPositive))
901
916
 
            then (size(parts[0]) != 2)
902
917
 
            else false)
903
918
 
            then throw("Product idx should be 2 digits, zero padded")
904
919
 
            else {
905
920
 
                let productIdx = parseIntValue(parts[0])
906
921
 
                let count = parseIntValue(parts[1])
907
922
 
                if (if ((0 > productIdx))
908
923
 
                    then true
909
924
 
                    else (productIdx >= size(productionMatrix)))
910
925
 
                    then throw("Unknown product idx")
911
926
 
                    else if ((0 > count))
912
927
 
                        then throw("Count can't be negative")
913
928
 
                        else if ((count > MAXPRODINSLOT))
914
929
 
                            then throw(((("Can't put more than " + toString(MAXPRODINSLOT)) + " of ") + prodTypes[productIdx]))
915
930
 
                            else if ((count == 0))
916
931
 
                                then $Tuple2(pList, false)
917
932
 
                                else {
918
933
 
                                    let head = take(pList, (8 * productIdx))
919
934
 
                                    let curr = toInt(take(drop(pList, (8 * productIdx)), 8))
920
935
 
                                    let tail = drop(pList, (8 * (productIdx + 1)))
921
936
 
                                    let recipe = split(productionMatrix[productIdx], "_")
922
937
 
                                    if (if (!(isPositive))
923
938
 
                                        then (count > curr)
924
939
 
                                        else false)
925
940
 
                                        then throw(((((("You have " + toString(curr)) + " of ") + prodTypes[productIdx]) + ", but tried to use ") + toString(count)))
926
941
 
                                        else {
927
942
 
                                            let isBigItem = if (if (!(isPositive))
928
943
 
                                                then checkStatRequirements(duckStats, split(recipe[rIdxRequirements], ","))
929
944
 
                                                else false)
930
945
 
                                                then {
931
946
 
                                                    let compat = recipe[rIdxSlots]
932
947
 
                                                    if ((compat == ""))
933
948
 
                                                        then throw("Item cannot be equipped")
934
949
 
                                                        else {
935
950
 
                                                            let c = parseIntValue(compat)
936
951
 
                                                            let cSeg = (c / 100)
937
952
 
                                                            if ((segment != cSeg))
938
953
 
                                                                then throw("Segment incompatible")
939
954
 
                                                                else {
940
955
 
                                                                    let cMainAux = ((c % 100) / 10)
941
956
 
                                                                    if ((mainAux != cMainAux))
942
957
 
                                                                        then throw("Slot incompatible")
943
958
 
                                                                        else {
944
959
 
                                                                            let cNumSlots = (c % 10)
945
960
 
                                                                            if (if ((slot != 0))
946
961
 
                                                                                then (cNumSlots > 1)
947
962
 
                                                                                else false)
948
963
 
                                                                                then throw("Big items should occupy slot 0")
949
964
 
                                                                                else (cNumSlots > 1)
950
965
 
                                                                            }
951
966
 
                                                                    }
952
967
 
                                                            }
953
968
 
                                                    }
954
969
 
                                                else false
955
970
 
                                            $Tuple2(((head + toBytes((curr + (if (isPositive)
956
971
 
                                                then count
957
972
 
                                                else -(count))))) + tail), isBigItem)
958
973
 
                                            }
959
974
 
                                    }
960
975
 
                }
961
976
 
    }
962
977
 
963
978
 
964
979
 
func slotsGroupB (g,bpIn,isPositive,segment,mainAux,stats) = if ((g != ""))
965
980
 
    then {
966
981
 
        let slots = split(g, ",")
967
982
 
        if ((size(slots) > MAXSLOTS))
968
983
 
            then throw("Wrong slots format")
969
984
 
            else {
970
985
 
                let s0 = slots[0]
971
986
 
                let s1 = if ((size(slots) > 1))
972
987
 
                    then slots[1]
973
988
 
                    else ""
974
989
 
                if (if ((s0 == ""))
975
990
 
                    then (s1 == "")
976
991
 
                    else false)
977
992
 
                    then bpIn
978
993
 
                    else {
979
994
 
                        let tmpS0 = if ((s0 != ""))
980
995
 
                            then addProdB(s0, bpIn, isPositive, segment, mainAux, 0, stats)
981
996
 
                            else $Tuple2(bpIn, false)
982
997
 
                        if ((s1 != ""))
983
998
 
                            then if (tmpS0._2)
984
999
 
                                then throw("Big item already occupies slot")
985
1000
 
                                else addProdB(s1, tmpS0._1, isPositive, segment, mainAux, 1, stats)._1
986
1001
 
                            else tmpS0._1
987
1002
 
                        }
988
1003
 
                }
989
1004
 
        }
990
1005
 
    else bpIn
991
1006
 
992
1007
 
993
1008
 
func dressB (segList,pBytes,isPositive,stats) = {
994
1009
 
    func segment (acc,seg) =     {
995
1010
 
        let j = acc._1
996
1011
 
        let mainAux = split(seg, ";")
997
1012
 
        if ((size(mainAux) != NUMMAINAUX))
998
1013
 
            then throw("Wrong segment format")
999
1014
 
            else {
1000
1015
 
                let m = mainAux[0]
1001
1016
 
                let a = mainAux[1]
1002
1017
 
                if (if ((m == ""))
1003
1018
 
                    then (a == "")
1004
1019
 
                    else false)
1005
1020
 
                    then $Tuple2((j + 1), acc._2)
1006
1021
 
                    else {
1007
1022
 
                        let tmpM = slotsGroupB(m, acc._2, isPositive, j, 0, stats)
1008
1023
 
                        $Tuple2((j + 1), slotsGroupB(a, tmpM, isPositive, j, 1, stats))
1009
1024
 
                        }
1010
1025
 
                }
1011
1026
 
        }
1012
1027
 
1013
1028
 
(    let $l = segList
1014
1029
 
    let $s = size($l)
1015
1030
 
    let $acc0 = $Tuple2(0, pBytes)
1016
1031
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
1017
1032
 
        then $a
1018
1033
 
        else segment($a, $l[$i])
1019
1034
 
1020
1035
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
1021
1036
 
        then $a
1022
1037
 
        else throw("List size exceeds 6")
1023
1038
 
1024
1039
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6))._2
1025
1040
 
    }
1026
1041
 
1027
1042
 
1028
1043
 
func fortB (segList,pBytes,occupied,free,isPositive,duckStats) = if ((3 > size(segList)))
1029
1044
 
    then throw("At least duck, mines and traps parts are required")
1030
1045
 
    else {
1031
1046
 
        func segment (acc,seg) =         {
1032
1047
 
            let j = acc._1
1033
1048
 
            if ((j == 0))
1034
1049
 
                then $Tuple4((j + 1), acc._2, acc._3, acc._4)
1035
1050
 
                else {
1036
1051
 
                    let p = placeProdB(seg, acc._2, isPositive, duckStats, acc._3, acc._4)
1037
1052
 
                    $Tuple4((j + 1), p._1, p._2, p._3)
1038
1053
 
                    }
1039
1054
 
            }
1040
1055
 
1041
1056
 
        let t = {
1042
1057
 
            let $l = segList
1043
1058
 
            let $s = size($l)
1044
1059
 
            let $acc0 = $Tuple4(0, pBytes, occupied, free)
1045
1060
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
1046
1061
 
                then $a
1047
1062
 
                else segment($a, $l[$i])
1048
1063
 
1049
1064
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
1050
1065
 
                then $a
1051
1066
 
                else throw("List size exceeds 10")
1052
1067
 
1053
1068
 
            $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)
1054
1069
 
            }
1055
1070
 
        $Tuple3(t._2, t._3, t._4)
1056
1071
 
        }
1057
1072
 
1058
1073
 
1059
1074
 
func canWearCurrentEquipment (duckAssetId) = {
1060
1075
 
    let eqKey = keyDuckEquipment(duckAssetId)
1061
1076
 
    let currEq = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
1062
1077
 
    let tempProdB = dressB(currEq, EMPTY_PROD50, true, nil)
1063
1078
 
    let segBpAux = split(currEq[segBackpack], ";")[1]
1064
1079
 
    let buffEffect = if ((segBpAux == ""))
1065
1080
 
        then 0
1066
1081
 
        else {
1067
1082
 
            let aux0 = split(segBpAux, ",")[0]
1068
1083
 
            if ((aux0 == ""))
1069
1084
 
                then 0
1070
1085
 
                else {
1071
1086
 
                    let idxCnt = split(aux0, ":")
1072
1087
 
                    let idx = idxCnt[0]
1073
1088
 
                    let cnt = idxCnt[1]
1074
1089
 
                    if (if (if (if (if ((idx == "06"))
1075
1090
 
                        then true
1076
1091
 
                        else (idx == "07"))
1077
1092
 
                        then true
1078
1093
 
                        else (idx == "08"))
1079
1094
 
                        then (cnt != "")
1080
1095
 
                        else false)
1081
1096
 
                        then (parseIntValue(cnt) > 0)
1082
1097
 
                        else false)
1083
1098
 
                        then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
1084
1099
 
                        else 0
1085
1100
 
                    }
1086
1101
 
            }
1087
1102
 
    let stats = getDuckStats(this, duckAssetId, buffEffect, true)
1088
1103
 
    let newProdB = dressB(currEq, tempProdB, false, stats)
1089
1104
 
    (newProdB == newProdB)
1090
1105
 
    }
1091
1106
 
1092
1107
 
1093
1108
 
func updateProportionsInternal (propList,terrainCounts,landSizeIndex,sign) = if ((size(propList) != NUMRES))
1094
1109
 
    then throw("Wrong proportions data")
1095
1110
 
    else {
1096
1111
 
        func updater (acc,i) =         {
1097
1112
 
            let result = (parseIntValue(propList[i]) + ((sign * terrainCounts[i]) * landSizeIndex))
1098
1113
 
            if ((0 > result))
1099
1114
 
                then throw(((((((("Panic! Pieces of type=" + toString(i)) + ", sign=") + toString(sign)) + ", terrainCounts[i]=") + toString(terrainCounts[i])) + ", landSizeIndex=") + toString(landSizeIndex)))
1100
1115
 
                else (acc :+ toString(result))
1101
1116
 
            }
1102
1117
 
1103
1118
 
        let $l = ITER6
1104
1119
 
        let $s = size($l)
1105
1120
 
        let $acc0 = nil
1106
1121
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
1107
1122
 
            then $a
1108
1123
 
            else updater($a, $l[$i])
1109
1124
 
1110
1125
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
1111
1126
 
            then $a
1112
1127
 
            else throw("List size exceeds 6")
1113
1128
 
1114
1129
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1115
1130
 
        }
1116
1131
 
1117
1132
 
1118
1133
 
func updateProportions (terrainCounts,landSizeIndex,sign) = {
1119
1134
 
    let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
1120
1135
 
    makeString(updateProportionsInternal(propList, terrainCounts, landSizeIndex, sign), "_")
1121
1136
 
    }
1122
1137
 
1123
1138
 
1124
1139
 
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)]
1125
1140
 
1126
1141
 
1127
1142
 
func addRes (currentRes,terrainCounts,deltaTime,landSizeIndex,dailyByPieceWithBonuses) = {
1128
1143
 
    func adder (acc,i) =     {
1129
1144
 
        let resOfType = ((fraction(deltaTime, dailyByPieceWithBonuses, DAYMILLIS) * terrainCounts[i]) * landSizeIndex)
1130
1145
 
        (acc :+ toString((parseIntValue(currentRes[i]) + resOfType)))
1131
1146
 
        }
1132
1147
 
1133
1148
 
    let r = {
1134
1149
 
        let $l = ITER6
1135
1150
 
        let $s = size($l)
1136
1151
 
        let $acc0 = nil
1137
1152
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
1138
1153
 
            then $a
1139
1154
 
            else adder($a, $l[$i])
1140
1155
 
1141
1156
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
1142
1157
 
            then $a
1143
1158
 
            else throw("List size exceeds 6")
1144
1159
 
1145
1160
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1146
1161
 
        }
1147
1162
 
    makeString(r, "_")
1148
1163
 
    }
1149
1164
 
1150
1165
 
1151
1166
 
func virtClaim (terrainCounts,deltaTime,landSizeIndex,dailyByPieceWithBonuses) = {
1152
1167
 
    func adder (acc,i) =     {
1153
1168
 
        let resOfType = ((fraction(deltaTime, dailyByPieceWithBonuses, DAYMILLIS) * terrainCounts[i]) * landSizeIndex)
1154
1169
 
        $Tuple2((acc._1 :+ resOfType), (acc._2 + resOfType))
1155
1170
 
        }
1156
1171
 
1157
1172
 
    let $l = ITER6
1158
1173
 
    let $s = size($l)
1159
1174
 
    let $acc0 = $Tuple2(nil, 0)
1160
1175
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
1161
1176
 
        then $a
1162
1177
 
        else adder($a, $l[$i])
1163
1178
 
1164
1179
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
1165
1180
 
        then $a
1166
1181
 
        else throw("List size exceeds 6")
1167
1182
 
1168
1183
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1169
1184
 
    }
1170
1185
 
1171
1186
 
1172
1187
 
func distributeRes (currentWhRes,currentPackRes,resToClaim,whSpaceLeft) = {
1173
1188
 
    let resListToClaim = resToClaim._1
1174
1189
 
    let resAmToClaim = resToClaim._2
1175
1190
 
    if ((resAmToClaim == 0))
1176
1191
 
        then $Tuple2(makeString(currentWhRes, "_"), makeString(currentPackRes, "_"))
1177
1192
 
        else if ((whSpaceLeft >= resAmToClaim))
1178
1193
 
            then {
1179
1194
 
                func addLists (acc,i) =                 (acc :+ toString((parseIntValue(currentWhRes[i]) + resListToClaim[i])))
1180
1195
 
1181
1196
 
                let r = {
1182
1197
 
                    let $l = ITER6
1183
1198
 
                    let $s = size($l)
1184
1199
 
                    let $acc0 = nil
1185
1200
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
1186
1201
 
                        then $a
1187
1202
 
                        else addLists($a, $l[$i])
1188
1203
 
1189
1204
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
1190
1205
 
                        then $a
1191
1206
 
                        else throw("List size exceeds 6")
1192
1207
 
1193
1208
 
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1194
1209
 
                    }
1195
1210
 
                $Tuple2(makeString(r, "_"), makeString(currentPackRes, "_"))
1196
1211
 
                }
1197
1212
 
            else {
1198
1213
 
                func addPartLists (acc,i) =                 {
1199
1214
 
                    let whPart = fraction(resListToClaim[i], whSpaceLeft, resAmToClaim)
1200
1215
 
                    $Tuple2((acc._1 :+ toString((parseIntValue(currentWhRes[i]) + whPart))), (acc._2 :+ toString(((parseIntValue(currentPackRes[i]) + resListToClaim[i]) - whPart))))
1201
1216
 
                    }
1202
1217
 
1203
1218
 
                let r = {
1204
1219
 
                    let $l = ITER6
1205
1220
 
                    let $s = size($l)
1206
1221
 
                    let $acc0 = $Tuple2(nil, nil)
1207
1222
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
1208
1223
 
                        then $a
1209
1224
 
                        else addPartLists($a, $l[$i])
1210
1225
 
1211
1226
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
1212
1227
 
                        then $a
1213
1228
 
                        else throw("List size exceeds 6")
1214
1229
 
1215
1230
 
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1216
1231
 
                    }
1217
1232
 
                $Tuple2(makeString(r._1, "_"), makeString(r._2, "_"))
1218
1233
 
                }
1219
1234
 
    }
1220
1235
 
1221
1236
 
1222
1237
 
func abs (x) = if ((x >= toBigInt(0)))
1223
1238
 
    then x
1224
1239
 
    else -(x)
1225
1240
 
1226
1241
 
1227
1242
 
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]]
1228
1243
 
1229
1244
 
func genChar (n,freqs) = {
1230
1245
 
    let rem = toInt((n % TWENTYX))
1231
1246
 
    let letter = if ((freqs[0] > rem))
1232
1247
 
        then "A"
1233
1248
 
        else if ((freqs[1] > rem))
1234
1249
 
            then "B"
1235
1250
 
            else if ((freqs[2] > rem))
1236
1251
 
                then "C"
1237
1252
 
                else if ((freqs[3] > rem))
1238
1253
 
                    then "D"
1239
1254
 
                    else if ((freqs[4] > rem))
1240
1255
 
                        then "E"
1241
1256
 
                        else "F"
1242
1257
 
    letter
1243
1258
 
    }
1244
1259
 
1245
1260
 
1246
1261
 
func genTerrains (seed,continentIdx) = {
1247
1262
 
    let f = freq[continentIdx]
1248
1263
 
    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))
1249
1264
 
1250
1265
 
    let t = {
1251
1266
 
        let $l = [1, 2, 3, 4, 5]
1252
1267
 
        let $s = size($l)
1253
1268
 
        let $acc0 = $Tuple2("", (seed / FIVEX))
1254
1269
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
1255
1270
 
            then $a
1256
1271
 
            else terrainGenerator($a, $l[$i])
1257
1272
 
1258
1273
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
1259
1274
 
            then $a
1260
1275
 
            else throw("List size exceeds 5")
1261
1276
 
1262
1277
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
1263
1278
 
        }
1264
1279
 
    t._1
1265
1280
 
    }
1266
1281
 
1267
1282
 
1268
1283
 
let PERM25 = [7, 2, 15, 19, 8, 24, 1, 21, 16, 5, 0, 22, 20, 23, 11, 4, 18, 12, 6, 10, 3, 17, 13, 9, 14]
1269
1284
 
1270
1285
 
let TCHARS = ["A", "B", "C", "D", "E", "F"]
1271
1286
 
1272
1287
 
func genTerrainsForMerge (sumTerrains,landSizeIndex) = {
1273
1288
 
    func step1 (acc,s) =     {
1274
1289
 
        let j = acc._2
1275
1290
 
        let el = parseIntValue(s)
1276
1291
 
        let x = if ((el == 0))
1277
1292
 
            then 0
1278
1293
 
            else if ((el >= (4 * landSizeIndex)))
1279
1294
 
                then (el / landSizeIndex)
1280
1295
 
                else if ((el > (3 * landSizeIndex)))
1281
1296
 
                    then 3
1282
1297
 
                    else (((el - 1) / landSizeIndex) + 1)
1283
1298
 
        $Tuple3((acc._1 :+ x), (acc._2 + 1), (acc._3 + x))
1284
1299
 
        }
1285
1300
 
1286
1301
 
    let t = {
1287
1302
 
        let $l = sumTerrains
1288
1303
 
        let $s = size($l)
1289
1304
 
        let $acc0 = $Tuple3(nil, 0, 0)
1290
1305
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
1291
1306
 
            then $a
1292
1307
 
            else step1($a, $l[$i])
1293
1308
 
1294
1309
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
1295
1310
 
            then $a
1296
1311
 
            else throw("List size exceeds 6")
1297
1312
 
1298
1313
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1299
1314
 
        }
1300
1315
 
    let arr = t._1
1301
1316
 
    let maxIdx = value(indexOf(arr, max(arr)))
1302
1317
 
    let delta = (t._3 - 25)
1303
1318
 
    func subber (acc,idx) =     {
1304
1319
 
        let val = if ((idx == maxIdx))
1305
1320
 
            then (arr[idx] - delta)
1306
1321
 
            else arr[idx]
1307
1322
 
        let zeroes = if ((val == 0))
1308
1323
 
            then nil
1309
1324
 
            else split(drop(toString(pow(10, 0, val, 0, 0, DOWN)), 1), "")
1310
1325
 
        let c = TCHARS[idx]
1311
1326
 
        func listGen (ac,ignored) =         (ac :+ c)
1312
1327
 
1313
1328
 
        let z = {
1314
1329
 
            let $l = zeroes
1315
1330
 
            let $s = size($l)
1316
1331
 
            let $acc0 = nil
1317
1332
 
            func $f1_1 ($a,$i) =             if (($i >= $s))
1318
1333
 
                then $a
1319
1334
 
                else listGen($a, $l[$i])
1320
1335
 
1321
1336
 
            func $f1_2 ($a,$i) =             if (($i >= $s))
1322
1337
 
                then $a
1323
1338
 
                else throw("List size exceeds 25")
1324
1339
 
1325
1340
 
            $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($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)
1326
1341
 
            }
1327
1342
 
        (acc ++ z)
1328
1343
 
        }
1329
1344
 
1330
1345
 
    let r = {
1331
1346
 
        let $l = ITER6
1332
1347
 
        let $s = size($l)
1333
1348
 
        let $acc0 = nil
1334
1349
 
        func $f1_1 ($a,$i) =         if (($i >= $s))
1335
1350
 
            then $a
1336
1351
 
            else subber($a, $l[$i])
1337
1352
 
1338
1353
 
        func $f1_2 ($a,$i) =         if (($i >= $s))
1339
1354
 
            then $a
1340
1355
 
            else throw("List size exceeds 6")
1341
1356
 
1342
1357
 
        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1343
1358
 
        }
1344
1359
 
    func permut (acc,j) =     (acc + r[j])
1345
1360
 
1346
1361
 
    let $l = PERM25
1347
1362
 
    let $s = size($l)
1348
1363
 
    let $acc0 = ""
1349
1364
 
    func $f2_1 ($a,$i) =     if (($i >= $s))
1350
1365
 
        then $a
1351
1366
 
        else permut($a, $l[$i])
1352
1367
 
1353
1368
 
    func $f2_2 ($a,$i) =     if (($i >= $s))
1354
1369
 
        then $a
1355
1370
 
        else throw("List size exceeds 25")
1356
1371
 
1357
1372
 
    $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($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)
1358
1373
 
    }
1359
1374
 
1360
1375
 
1361
1376
 
func getBackpack (bpKey) = {
1362
1377
 
    let p = split(valueOrElse(getString(bpKey), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
1363
1378
 
[toString(valueOrElse(parseInt(p[bpIdxLevel]), 0)), if ((size(split(p[bpIdxRes], "_")) == NUMRES))
1364
1379
 
        then p[bpIdxRes]
1365
1380
 
        else "0_0_0_0_0_0", if ((size(split(p[bpIdxMat], "_")) == NUMRES))
1366
1381
 
        then p[bpIdxMat]
1367
1382
 
        else "0_0_0_0_0_0", p[bpIdxProd]]
1368
1383
 
    }
1369
1384
 
1370
1385
 
1371
1386
 
func getWarehouseTotalVolume (volPrefix) = {
1372
1387
 
    let parts = split(volPrefix, "_")
1373
1388
 
    ((WHMULTIPLIER * (parseIntValue(parts[1]) + 1)) * parseIntValue(parts[0]))
1374
1389
 
    }
1375
1390
 
1376
1391
 
1377
1392
 
func getWarehouseOccupiedVol (currentWh) = {
1378
1393
 
    let goods = currentWh[whIdxProd]
1379
1394
 
    func sumResMat (acc,item) =     (acc + parseIntValue(item))
1380
1395
 
1381
1396
 
    func sumProd (acc,item) =     {
1382
1397
 
        let idx = acc._1
1383
1398
 
        let pkgs = (((parseIntValue(item) + PRODUCTPKGSIZE) - 1) / PRODUCTPKGSIZE)
1384
1399
 
        $Tuple2((idx + 1), (acc._2 + (pkgs * MULT8)))
1385
1400
 
        }
1386
1401
 
1387
1402
 
    let whResVol = {
1388
1403
 
        let $l = split(currentWh[whIdxRes], "_")
1389
1404
 
        let $s = size($l)
1390
1405
 
        let $acc0 = 0
1391
1406
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
1392
1407
 
            then $a
1393
1408
 
            else sumResMat($a, $l[$i])
1394
1409
 
1395
1410
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
1396
1411
 
            then $a
1397
1412
 
            else throw("List size exceeds 6")
1398
1413
 
1399
1414
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1400
1415
 
        }
1401
1416
 
    let whMatVol = {
1402
1417
 
        let $l = split(currentWh[whIdxMat], "_")
1403
1418
 
        let $s = size($l)
1404
1419
 
        let $acc0 = 0
1405
1420
 
        func $f1_1 ($a,$i) =         if (($i >= $s))
1406
1421
 
            then $a
1407
1422
 
            else sumResMat($a, $l[$i])
1408
1423
 
1409
1424
 
        func $f1_2 ($a,$i) =         if (($i >= $s))
1410
1425
 
            then $a
1411
1426
 
            else throw("List size exceeds 6")
1412
1427
 
1413
1428
 
        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1414
1429
 
        }
1415
1430
 
    let whGoodsVol = if ((goods == ""))
1416
1431
 
        then 0
1417
1432
 
        else (        let $l = split_4C(goods, "_")
1418
1433
 
        let $s = size($l)
1419
1434
 
        let $acc0 = $Tuple2(0, 0)
1420
1435
 
        func $f2_1 ($a,$i) =         if (($i >= $s))
1421
1436
 
            then $a
1422
1437
 
            else sumProd($a, $l[$i])
1423
1438
 
1424
1439
 
        func $f2_2 ($a,$i) =         if (($i >= $s))
1425
1440
 
            then $a
1426
1441
 
            else throw("List size exceeds 50")
1427
1442
 
1428
1443
 
        $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
1429
1444
 
    ((whResVol + whMatVol) + whGoodsVol)
1430
1445
 
    }
1431
1446
 
1432
1447
 
1433
1448
 
func getWarehouse (whKey,landIndex,infraLevel) = {
1434
1449
 
    let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
1435
1450
 
    let whTotal = getWarehouseTotalVolume(volPrefix)
1436
1451
 
    let whStr = valueOrElse(getString(whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0::0"))
1437
1452
 
    let wh = split_4C(whStr, ":")
1438
1453
 
    let whOccupied = getWarehouseOccupiedVol(wh)
1439
1454
 
    let whLoft = if ((5 > size(wh)))
1440
1455
 
        then makeString(["0", toString(whOccupied), toString((whTotal - whOccupied)), toString(whTotal)], "_")
1441
1456
 
        else {
1442
1457
 
            let loft = split(wh[whIdxLOFT], "_")
1443
1458
 
            let whLocked = parseIntValue(loft[volLocked])
1444
1459
 
            let occ = if ((size(loft) > 1))
1445
1460
 
                then parseIntValue(loft[volOccupied])
1446
1461
 
                else whOccupied
1447
1462
 
            makeString([toString(whLocked), toString(occ), toString(((whTotal - whLocked) - occ)), toString(whTotal)], "_")
1448
1463
 
            }
1449
1464
 
[wh[whIdxLevels], if ((size(split(wh[whIdxRes], "_")) == NUMRES))
1450
1465
 
        then wh[whIdxRes]
1451
1466
 
        else "0_0_0_0_0_0", if ((size(split(wh[whIdxMat], "_")) == NUMRES))
1452
1467
 
        then wh[whIdxMat]
1453
1468
 
        else "0_0_0_0_0_0", wh[whIdxProd], whLoft]
1454
1469
 
    }
1455
1470
 
1456
1471
 
1457
1472
 
func getWarehouseSpaceLeft (currentWh) = {
1458
1473
 
    let occupiedVol = getWarehouseOccupiedVol(currentWh)
1459
1474
 
    let currWhLockedVol = parseIntValue(split(currentWh[whIdxLOFT], "_")[volLocked])
1460
1475
 
    ((getWarehouseTotalVolume(currentWh[whIdxLevels]) - occupiedVol) - currWhLockedVol)
1461
1476
 
    }
1462
1477
 
1463
1478
 
1464
1479
 
func moveStuff (cargoParts,currentWh,currentPack) = if ((size(cargoParts) != 3))
1465
1480
 
    then throw("cargoListStr should contain exactly 2 ':' separators")
1466
1481
 
    else {
1467
1482
 
        let resParts = split(cargoParts[0], "_")
1468
1483
 
        let matParts = split(cargoParts[1], "_")
1469
1484
 
        let prodParts = if ((cargoParts[2] == ""))
1470
1485
 
            then nil
1471
1486
 
            else split_4C(cargoParts[2], "_")
1472
1487
 
        if ((size(resParts) != NUMRES))
1473
1488
 
            then throw("All 6 resources should be passed")
1474
1489
 
            else if ((size(matParts) != NUMRES))
1475
1490
 
                then throw("All 6 materials should be passed")
1476
1491
 
                else {
1477
1492
 
                    let whSpaceLeft = getWarehouseSpaceLeft(currentWh)
1478
1493
 
                    let currWhRes = split(currentWh[whIdxRes], "_")
1479
1494
 
                    let currWhMat = split(currentWh[whIdxMat], "_")
1480
1495
 
                    let currWhProd = if ((currentWh[whIdxProd] == ""))
1481
1496
 
                        then nil
1482
1497
 
                        else split_4C(currentWh[whIdxProd], "_")
1483
1498
 
                    let currentPackRes = split(currentPack[bpIdxRes], "_")
1484
1499
 
                    let currentPackMat = split(currentPack[bpIdxMat], "_")
1485
1500
 
                    let currentPackProd = if ((currentPack[bpIdxProd] == ""))
1486
1501
 
                        then nil
1487
1502
 
                        else split_4C(currentPack[bpIdxProd], "_")
1488
1503
 
                    func mvR (acc,item) =                     {
1489
1504
 
                        let i = acc._1
1490
1505
 
                        let am = parseIntValue(item)
1491
1506
 
                        let whr = parseIntValue(currWhRes[i])
1492
1507
 
                        let bpr = parseIntValue(currentPackRes[i])
1493
1508
 
                        if ((am == 0))
1494
1509
 
                            then $Tuple4((i + 1), (acc._2 :+ currWhRes[i]), (acc._3 :+ currentPackRes[i]), acc._4)
1495
1510
 
                            else if ((am > 0))
1496
1511
 
                                then if ((am > bpr))
1497
1512
 
                                    then throw((((("Attempt to take " + item) + " from backpack, but only ") + toString(bpr)) + " available"))
1498
1513
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whr + am))), (acc._3 :+ toString((bpr - am))), (acc._4 + am))
1499
1514
 
                                else if ((-(am) > whr))
1500
1515
 
                                    then throw((((("Attempt to take " + toString(-(am))) + " from warehouse, but only ") + toString(whr)) + " available"))
1501
1516
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whr + am))), (acc._3 :+ toString((bpr - am))), (acc._4 + am))
1502
1517
 
                        }
1503
1518
 
1504
1519
 
                    let r = {
1505
1520
 
                        let $l = resParts
1506
1521
 
                        let $s = size($l)
1507
1522
 
                        let $acc0 = $Tuple4(0, nil, nil, 0)
1508
1523
 
                        func $f0_1 ($a,$i) =                         if (($i >= $s))
1509
1524
 
                            then $a
1510
1525
 
                            else mvR($a, $l[$i])
1511
1526
 
1512
1527
 
                        func $f0_2 ($a,$i) =                         if (($i >= $s))
1513
1528
 
                            then $a
1514
1529
 
                            else throw("List size exceeds 6")
1515
1530
 
1516
1531
 
                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1517
1532
 
                        }
1518
1533
 
                    func mvM (acc,item) =                     {
1519
1534
 
                        let i = acc._1
1520
1535
 
                        let am = parseIntValue(item)
1521
1536
 
                        let whm = parseIntValue(currWhMat[i])
1522
1537
 
                        let bpm = parseIntValue(currentPackMat[i])
1523
1538
 
                        if ((am == 0))
1524
1539
 
                            then $Tuple4((i + 1), (acc._2 :+ currWhMat[i]), (acc._3 :+ currentPackMat[i]), acc._4)
1525
1540
 
                            else if ((am > 0))
1526
1541
 
                                then if ((am > bpm))
1527
1542
 
                                    then throw((((("Attempt to take " + item) + " from backpack, but only ") + toString(bpm)) + " available"))
1528
1543
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whm + am))), (acc._3 :+ toString((bpm - am))), (acc._4 + am))
1529
1544
 
                                else if ((-(am) > whm))
1530
1545
 
                                    then throw((((("Attempt to take " + toString(-(am))) + " from warehouse, but only ") + toString(whm)) + " available"))
1531
1546
 
                                    else $Tuple4((i + 1), (acc._2 :+ toString((whm + am))), (acc._3 :+ toString((bpm - am))), (acc._4 + am))
1532
1547
 
                        }
1533
1548
 
1534
1549
 
                    let m = {
1535
1550
 
                        let $l = matParts
1536
1551
 
                        let $s = size($l)
1537
1552
 
                        let $acc0 = $Tuple4(0, nil, nil, r._4)
1538
1553
 
                        func $f1_1 ($a,$i) =                         if (($i >= $s))
1539
1554
 
                            then $a
1540
1555
 
                            else mvM($a, $l[$i])
1541
1556
 
1542
1557
 
                        func $f1_2 ($a,$i) =                         if (($i >= $s))
1543
1558
 
                            then $a
1544
1559
 
                            else throw("List size exceeds 6")
1545
1560
 
1546
1561
 
                        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1547
1562
 
                        }
1548
1563
 
                    func mvP (acc,item) =                     {
1549
1564
 
                        let i = acc._1
1550
1565
 
                        let am = parseIntValue(item)
1551
1566
 
                        let whp = if ((size(currWhProd) > i))
1552
1567
 
                            then parseIntValue(currWhProd[i])
1553
1568
 
                            else 0
1554
1569
 
                        let bpp = if ((size(currentPackProd) > i))
1555
1570
 
                            then parseIntValue(currentPackProd[i])
1556
1571
 
                            else 0
1557
1572
 
                        if ((am == 0))
1558
1573
 
                            then $Tuple4((i + 1), (acc._2 :+ toString(whp)), (acc._3 :+ toString(bpp)), acc._4)
1559
1574
 
                            else if ((am > 0))
1560
1575
 
                                then if ((am > bpp))
1561
1576
 
                                    then throw((((("Attempt to take " + item) + " from backpack, but only ") + toString(bpp)) + " available"))
1562
1577
 
                                    else {
1563
1578
 
                                        let deltaVol = (toVolume((whp + am), PRODUCTPKGSIZE) - toVolume(whp, PRODUCTPKGSIZE))
1564
1579
 
                                        $Tuple4((i + 1), (acc._2 :+ toString((whp + am))), (acc._3 :+ toString((bpp - am))), (acc._4 + deltaVol))
1565
1580
 
                                        }
1566
1581
 
                                else if ((-(am) > whp))
1567
1582
 
                                    then throw((((("Attempt to take " + toString(-(am))) + " from warehouse, but only ") + toString(whp)) + " available"))
1568
1583
 
                                    else {
1569
1584
 
                                        let deltaVol = (toVolume((whp + am), PRODUCTPKGSIZE) - toVolume(whp, PRODUCTPKGSIZE))
1570
1585
 
                                        $Tuple4((i + 1), (acc._2 :+ toString((whp + am))), (acc._3 :+ toString((bpp - am))), (acc._4 + deltaVol))
1571
1586
 
                                        }
1572
1587
 
                        }
1573
1588
 
1574
1589
 
                    let p = if ((size(prodParts) != 0))
1575
1590
 
                        then {
1576
1591
 
                            let $l = prodParts
1577
1592
 
                            let $s = size($l)
1578
1593
 
                            let $acc0 = $Tuple4(0, nil, nil, m._4)
1579
1594
 
                            func $f2_1 ($a,$i) =                             if (($i >= $s))
1580
1595
 
                                then $a
1581
1596
 
                                else mvP($a, $l[$i])
1582
1597
 
1583
1598
 
                            func $f2_2 ($a,$i) =                             if (($i >= $s))
1584
1599
 
                                then $a
1585
1600
 
                                else throw("List size exceeds 50")
1586
1601
 
1587
1602
 
                            $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)
1588
1603
 
                            }
1589
1604
 
                        else $Tuple4(0, currWhProd, currentPackProd, m._4)
1590
1605
 
                    let volSaldo = p._4
1591
1606
 
                    if ((volSaldo > whSpaceLeft))
1592
1607
 
                        then throw((((("Attempt to put total " + toString(volSaldo)) + " stuff, but only ") + toString(whSpaceLeft)) + " warehouse space left"))
1593
1608
 
                        else $Tuple7(makeString(r._2, "_"), makeString(m._2, "_"), makeString_2C(p._2, "_"), makeString(r._3, "_"), makeString(m._3, "_"), makeString_2C(p._3, "_"), volSaldo)
1594
1609
 
                    }
1595
1610
 
        }
1596
1611
 
1597
1612
 
1598
1613
 
func expeditionInternal (caller,txId) = {
1599
1614
 
    let userAddr = toString(caller)
1600
1615
 
    let bigNum = abs(toBigInt(txId))
1601
1616
 
    let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
1602
1617
 
    let landNum = toString(freeNum)
1603
1618
 
    let continentIdx = toInt((bigNum % FIVEX))
1604
1619
 
    let terrains = genTerrains(bigNum, continentIdx)
1605
1620
 
    let continent = continents[continentIdx]
1606
1621
 
    let issue = Issue(nftName(landNum, "S"), makeString([landNum, "S", terrains, continent], "_"), 1, 0, false)
1607
1622
 
    let assetId = calculateAssetId(issue)
1608
1623
 
    let id = toBase58String(assetId)
1609
1624
 
    $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))
1610
1625
 
    }
1611
1626
 
1612
1627
 
1613
1628
 
func flightCommon (userAddr,message,sig) = if (!(sigVerify_8Kb(message, sig, pub)))
1614
1629
 
    then throw("signature does not match")
1615
1630
 
    else {
1616
1631
 
        let parts = split_4C(toUtf8String(message), ";")
1617
1632
 
        let flightLog = split_4C(parts[0], "|")
1618
1633
 
        let hp = split(flightLog[flHealth], "_")
1619
1634
 
        let curHP = parseIntValue(hp[0])
1620
1635
 
        let newHP = parseIntValue(hp[1])
1621
1636
 
        let newLocTxVer = split(parts[1], ":")
1622
1637
 
        let newLocation = newLocTxVer[0]
1623
1638
 
        let time = parseIntValue(flightLog[flTimestamp])
1624
1639
 
        if (if ((time > (lastBlock.timestamp + FIVEMINUTESMILLIS)))
1625
1640
 
            then true
1626
1641
 
            else ((lastBlock.timestamp - FIVEMINUTESMILLIS) > time))
1627
1642
 
            then throw(((("signature outdated: logTime=" + toString(time)) + ", bcTime=") + toString(lastBlock.timestamp)))
1628
1643
 
            else {
1629
1644
 
                let txFromMsg = newLocTxVer[1]
1630
1645
 
                let lastTx = valueOrElse(getString(keyLastTxIdByUser(userAddr)), "")
1631
1646
 
                if ((lastTx != txFromMsg))
1632
1647
 
                    then throw(((("Tx ids don't match! In state: " + lastTx) + ", in msg: ") + txFromMsg))
1633
1648
 
                    else {
1634
1649
 
                        let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
1635
1650
 
                        let keyHealth = keyDuckHealth(duckAssetId)
1636
1651
 
                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
1637
1652
 
                        let oldFromState = valueOrElse(getInteger(keyHealth), maxHP)
1638
1653
 
                        if ((oldFromState != curHP))
1639
1654
 
                            then throw(((("oldHealth=" + toString(oldFromState)) + " from state does not match one from flight log=") + toString(curHP)))
1640
1655
 
                            else if ((0 >= curHP))
1641
1656
 
                                then throw("You can't fly with zero health")
1642
1657
 
                                else if (!(canWearCurrentEquipment(duckAssetId)))
1643
1658
 
                                    then throw("Equipment incompatible")
1644
1659
 
                                    else {
1645
1660
 
                                        let bonus = if ((size(flightLog) > flBonus))
1646
1661
 
                                            then flightLog[flBonus]
1647
1662
 
                                            else ""
1648
1663
 
                                        let prodUsed = if ((size(flightLog) > flProdsUsed))
1649
1664
 
                                            then flightLog[flProdsUsed]
1650
1665
 
                                            else ""
1651
1666
 
                                        let sentAmount = if (if ((newHP > 0))
1652
1667
 
                                            then (bonus == "$")
1653
1668
 
                                            else false)
1654
1669
 
                                            then asInt(invoke(restContract, "sendUsdtPrize", [userAddr], nil))
1655
1670
 
                                            else 0
1656
1671
 
                                        $Tuple5(newHP, duckAssetId, sentAmount, newLocation, prodUsed)
1657
1672
 
                                        }
1658
1673
 
                        }
1659
1674
 
                }
1660
1675
 
        }
1661
1676
 
1662
1677
 
1663
1678
 
func applyBonuses (landAssetId,pieces) = {
1664
1679
 
    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1665
1680
 
    let artPieces = valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0)
1666
1681
 
    let add6 = (infraLevel / 6)
1667
1682
 
    let add7 = (infraLevel / 7)
1668
1683
 
    ((DAILYRESBYPIECE + fraction(DAILYRESBYPIECE, ((infraLevel + add6) + (2 * add7)), 5)) + fraction(DAILYRESBYPIECE, artPieces, (pieces * 5)))
1669
1684
 
    }
1670
1685
 
1671
1686
 
1672
1687
 
func checkClaimConditions (addr,claimMode,landAssetIdIn) = {
1673
-
    let $t03373834277 = if ((claimMode == claimModeWh))
1688
+
    let $t03378434323 = if ((claimMode == claimModeWh))
1674
1689
 
        then $Tuple2(landAssetIdIn, valueOrElse(getString(keyStakedDuckByOwner(addr)), ""))
1675
1690
 
        else {
1676
1691
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1677
1692
 
            let curLocation = valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION)
1678
1693
 
            let loc = split(value(curLocation), "_")
1679
1694
 
            if ((loc[locIdxType] != "L"))
1680
1695
 
                then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
1681
1696
 
                else $Tuple2(loc[locIdxId], duckAssetId)
1682
1697
 
            }
1683
-
    let landAssetId = $t03373834277._1
1684
-
    let duckId = $t03373834277._2
1698
+
    let landAssetId = $t03378434323._1
1699
+
    let duckId = $t03378434323._2
1685
1700
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
1686
1701
 
    let timeKey = keyStakedTimeByAssetId(landAssetId)
1687
1702
 
    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("Land " + asset.name) + " is not staked"))
1688
1703
 
    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1689
1704
 
    if ((owner != addr))
1690
1705
 
        then throw((LANDPREFIX + " is not yours"))
1691
1706
 
        else {
1692
1707
 
            let d = split(asset.description, "_")
1693
1708
 
            $Tuple4(duckId, landAssetId, d, savedTime)
1694
1709
 
            }
1695
1710
 
    }
1696
1711
 
1697
1712
 
1698
1713
 
func claimResInternal (addr,amount,claimMode,landAssetIdIn) = if ((0 > amount))
1699
1714
 
    then throw("Negative amount")
1700
1715
 
    else {
1701
1716
 
        let c = checkClaimConditions(addr, claimMode, landAssetIdIn)
1702
1717
 
        let landSize = c._3[recLandSize]
1703
1718
 
        let terrainCounts = countTerrains(c._3[recTerrains])
1704
1719
 
        let deltaTime = (lastBlock.timestamp - c._4)
1705
1720
 
        if ((0 > deltaTime))
1706
1721
 
            then throw(((("Saved timestamp is in future, saved = " + toString(c._4)) + ", current = ") + toString(lastBlock.timestamp)))
1707
1722
 
            else {
1708
1723
 
                let pieces = numPiecesBySize(landSize)
1709
1724
 
                let dailyProductionByPiece = applyBonuses(c._2, pieces)
1710
1725
 
                let availRes = fraction(deltaTime, (dailyProductionByPiece * pieces), DAYMILLIS)
1711
1726
 
                if ((amount > availRes))
1712
1727
 
                    then throw(((("Not enough resources, available = " + toString(availRes)) + ", requested = ") + toString(amount)))
1713
1728
 
                    else {
1714
1729
 
                        let newDeltaTime = fraction((availRes - amount), DAYMILLIS, (dailyProductionByPiece * pieces))
1715
1730
 
                        let newTimestamp = (lastBlock.timestamp - newDeltaTime)
1716
1731
 
                        let landIndex = (pieces / SSIZE)
1717
1732
 
                        let resToClaim = virtClaim(terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece)
1718
1733
 
                        let whKey = keyWarehouseByLand(c._2)
1719
1734
 
                        let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(c._2)), 0)
1720
1735
 
                        let currentWh = getWarehouse(whKey, landIndex, infraLevel)
1721
1736
 
                        let loft = split(currentWh[whIdxLOFT], "_")
1722
1737
 
                        let whSpaceLeft = parseIntValue(loft[volFree])
1723
1738
 
                        if (if ((claimMode == claimModeWh))
1724
1739
 
                            then (amount > whSpaceLeft)
1725
1740
 
                            else false)
1726
1741
 
                            then throw((("Only " + toString(whSpaceLeft)) + " space left in warehouse"))
1727
1742
 
                            else {
1728
1743
 
                                let bpKey = keyBackpackByDuck(c._1)
1729
1744
 
                                let currentPack = getBackpack(bpKey)
1730
1745
 
                                let currentPackRes = split(currentPack[bpIdxRes], "_")
1731
1746
 
                                let currentWhRes = split(currentWh[whIdxRes], "_")
1732
-
                                let $t03665137522 = if ((claimMode == claimModeWh))
1747
+
                                let $t03669737568 = if ((claimMode == claimModeWh))
1733
1748
 
                                    then $Tuple4(addRes(currentWhRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), currentPack[bpIdxRes], (parseIntValue(loft[volOccupied]) + resToClaim._2), (parseIntValue(loft[volFree]) - resToClaim._2))
1734
1749
 
                                    else if ((claimMode == claimModeDuck))
1735
1750
 
                                        then $Tuple4(currentWh[whIdxRes], addRes(currentPackRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), parseIntValue(loft[volOccupied]), parseIntValue(loft[volFree]))
1736
1751
 
                                        else {
1737
1752
 
                                            let distr = distributeRes(currentWhRes, currentPackRes, resToClaim, whSpaceLeft)
1738
1753
 
                                            let whAm = min([parseIntValue(loft[volFree]), resToClaim._2])
1739
1754
 
                                            $Tuple4(distr._1, distr._2, (parseIntValue(loft[volOccupied]) + whAm), (parseIntValue(loft[volFree]) - whAm))
1740
1755
 
                                            }
1741
-
                                let whRes = $t03665137522._1
1742
-
                                let bpRes = $t03665137522._2
1743
-
                                let loftO = $t03665137522._3
1744
-
                                let loftF = $t03665137522._4
1756
+
                                let whRes = $t03669737568._1
1757
+
                                let bpRes = $t03669737568._2
1758
+
                                let loftO = $t03669737568._3
1759
+
                                let loftF = $t03669737568._4
1745
1760
 
                                $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]], "_")])
1746
1761
 
                                }
1747
1762
 
                        }
1748
1763
 
                }
1749
1764
 
        }
1750
1765
 
1751
1766
 
1752
1767
 
func claimAll (addr,landAssetId,pieces,claimMode) = {
1753
1768
 
    let timeKey = keyStakedTimeByAssetId(landAssetId)
1754
1769
 
    let savedTime = value(getInteger(timeKey))
1755
1770
 
    let availRes = (fraction((lastBlock.timestamp - savedTime), applyBonuses(landAssetId, pieces), DAYMILLIS) * pieces)
1756
1771
 
    claimResInternal(addr, availRes, claimMode, landAssetId)
1757
1772
 
    }
1758
1773
 
1759
1774
 
1760
1775
 
func upInfraCommon (shouldUseMat,caller,paymentAmount,landAssetId) = {
1761
1776
 
    let addr = toString(caller)
1762
1777
 
    let c = checkClaimConditions(addr, claimModeWhThenDuck, landAssetId)
1763
1778
 
    let pieces = numPiecesBySize(c._3[recLandSize])
1764
1779
 
    let infraKey = keyInfraLevelByAssetId(c._2)
1765
1780
 
    let curLevel = valueOrElse(getInteger(infraKey), 0)
1766
1781
 
    if (if (!(KS_ALLOW_BIG_INFRA_MERGE))
1767
1782
 
        then (curLevel >= 3)
1768
1783
 
        else false)
1769
1784
 
        then throw("Currently max infrastructure level = 3")
1770
1785
 
        else {
1771
1786
 
            let maxInfra = ((sqrt(pieces, 0, 0, DOWN) / 5) + 2)
1772
1787
 
            let newLevel = (curLevel + 1)
1773
1788
 
            if (if (KS_ALLOW_BIG_INFRA_MERGE)
1774
1789
 
                then (newLevel > maxInfra)
1775
1790
 
                else false)
1776
1791
 
                then throw(("Currently max infrastructure level = " + toString(maxInfra)))
1777
1792
 
                else {
1778
1793
 
                    let cost = fraction(InfraUpgradeCostSUsdt, (pieces * newLevel), SSIZE)
1779
1794
 
                    if (if (!(shouldUseMat))
1780
1795
 
                        then (paymentAmount != cost)
1781
1796
 
                        else false)
1782
1797
 
                        then throw(("Payment attached should be " + toString(cost)))
1783
1798
 
                        else {
1784
1799
 
                            let bpKey = keyBackpackByDuck(c._1)
1785
1800
 
                            let currentPack = getBackpack(bpKey)
1786
1801
 
                            let mList = split(currentPack[bpIdxMat], "_")
1787
1802
 
                            let matUsed = fraction(InfraUpgradeCostS, (pieces * newLevel), SSIZE)
1788
1803
 
                            let newMat = makeString(subtractMaterials(shouldUseMat, mList, matUsed), "_")
1789
1804
 
                            let claimResult = claimAll(addr, c._2, pieces, claimModeWhThenDuck)
1790
1805
 
                            let whData = claimResult._5
1791
1806
 
                            let oldVol = getWarehouseTotalVolume(whData[whIdxLevels])
1792
1807
 
                            let newVolData = makeString([split(whData[whIdxLevels], "_")[0], toString(newLevel)], "_")
1793
1808
 
                            let newVol = getWarehouseTotalVolume(newVolData)
1794
1809
 
                            let loft = split(whData[whIdxLOFT], "_")
1795
1810
 
                            let newLoftStr = makeString([loft[volLocked], loft[volOccupied], toString(((parseIntValue(loft[volFree]) + newVol) - oldVol)), toString(newVol)], "_")
1796
1811
 
                            $Tuple3(([IntegerEntry(infraKey, newLevel), IntegerEntry(keyInfraLevelByAssetIdAndOwner(c._2, addr), newLevel), StringEntry(bpKey, makeString([currentPack[bpIdxLevel], claimResult._3[bpIdxRes], newMat, currentPack[bpIdxProd]], ":")), StringEntry(claimResult._4, makeString([newVolData, whData[whIdxRes], whData[whIdxMat], whData[whIdxProd], newLoftStr], ":"))] ++ claimResult._1), newLevel, matUsed)
1797
1812
 
                            }
1798
1813
 
                    }
1799
1814
 
            }
1800
1815
 
    }
1801
1816
 
1802
1817
 
1803
1818
 
func updateDuckStatsInternal (duckAssetId,deltaXP) = {
1804
1819
 
    let lvlKey = keyDuckLevel(duckAssetId)
1805
1820
 
    let xpKey = keyDuckXP(duckAssetId)
1806
1821
 
    let xp = valueOrElse(getInteger(stakingContract, xpKey), 0)
1807
1822
 
    let newXP = (xp + deltaXP)
1808
1823
 
    let lvlPoints = levelUp(valueOrElse(getInteger(stakingContract, lvlKey), 0), newXP)
1809
1824
 
    let keyPoints = keyDuckFreePoints(duckAssetId)
1810
1825
 
    $Tuple2([IntegerEntry(lvlKey, lvlPoints[0]), IntegerEntry(xpKey, newXP), IntegerEntry(keyPoints, (valueOrElse(getInteger(keyPoints), 0) + lvlPoints[1]))], newXP)
1811
1826
 
    }
1812
1827
 
1813
1828
 
1814
1829
 
func updateAccStatsInternal (addr,deltaXP) = {
1815
1830
 
    let lvlKey = keyUserLevel(addr)
1816
1831
 
    let xpKey = keyUserXP(addr)
1817
1832
 
    let xp = valueOrElse(getInteger(stakingContract, xpKey), 0)
1818
1833
 
    let newXP = (xp + deltaXP)
1819
1834
 
    let lvlPoints = levelUp(valueOrElse(getInteger(stakingContract, lvlKey), 0), newXP)
1820
1835
 
    let keyPoints = keyUserFreePoints(addr)
1821
1836
 
    $Tuple2([IntegerEntry(lvlKey, lvlPoints[0]), IntegerEntry(xpKey, newXP), IntegerEntry(keyPoints, (valueOrElse(getInteger(keyPoints), 0) + lvlPoints[1]))], newXP)
1822
1837
 
    }
1823
1838
 
1824
1839
 
1825
1840
 
func activateOnboardArt (addr) = {
1826
1841
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1827
1842
 
    let refByKey = keyAddressRefBy(addr)
1828
1843
 
    let refBy = getString(refByKey)
1829
1844
 
    if (!(isDefined(refBy)))
1830
1845
 
        then throw("You are not eligible for ONBOARD artifact")
1831
1846
 
        else {
1832
1847
 
            let artKey = keyOnboardArtDuckActivatedBy(addr)
1833
1848
 
            let artDuck = getString(artKey)
1834
1849
 
            if (isDefined(artDuck))
1835
1850
 
                then throw(("You already used your ONBOARD artifact on duck " + value(artDuck)))
1836
1851
 
                else {
1837
1852
 
                    let duckActivatorKey = keyOnboardArtActivatedOnDuck(duckAssetId)
1838
1853
 
                    let duckActivator = getString(duckActivatorKey)
1839
1854
 
                    if (isDefined(duckActivator))
1840
1855
 
                        then throw(((("The duck " + duckAssetId) + " already got points from ONBOARD artifact from user ") + value(duckActivator)))
1841
1856
 
                        else ([StringEntry(artKey, duckAssetId), StringEntry(duckActivatorKey, addr)] ++ updateDuckStatsInternal(duckAssetId, xpOnboard)._1)
1842
1857
 
                    }
1843
1858
 
            }
1844
1859
 
    }
1845
1860
 
1846
1861
 
1847
1862
 
func activatePresaleArt (addr,landAssetIdIn) = {
1848
1863
 
    let c = checkClaimConditions(addr, claimModeWhThenDuck, landAssetIdIn)
1849
1864
 
    let landAssetId = c._2
1850
1865
 
    let pieces = numPiecesBySize(c._3[recLandSize])
1851
1866
 
    let activationKey = keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)
1852
1867
 
    if ((valueOrElse(getInteger(activationKey), 0) > 0))
1853
1868
 
        then throw("Presale artifact is already activated")
1854
1869
 
        else if ((parseIntValue(c._3[recLandNum]) > PRESALENUMLANDS))
1855
1870
 
            then throw((((LANDPREFIX + " ") + landAssetId) + " is not eligible for presale artifact"))
1856
1871
 
            else {
1857
1872
 
                let claimResult = claimAll(addr, landAssetId, pieces, claimModeWhThenDuck)
1858
1873
 
                (((claimResult._1 :+ IntegerEntry(activationKey, pieces)) :+ StringEntry(claimResult._2, makeString(claimResult._3, ":"))) :+ StringEntry(claimResult._4, makeString(claimResult._5, ":")))
1859
1874
 
                }
1860
1875
 
    }
1861
1876
 
1862
1877
 
1863
1878
 
func checkTournament (duckAssetId) = {
1864
1879
 
    let lastId = valueOrElse(getInteger(tournamentContract, lastTourIdKey), 0)
1865
1880
 
    let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1866
1881
 
    let now = lastBlock.timestamp
1867
1882
 
    let tData = getTourData(tournamentContract, lastId)
1868
1883
 
    let static = tData[idxStatic]
1869
1884
 
    let dynamic = tData[idxDynamic]
1870
1885
 
    if ((curLocation[locIdxType] != "T"))
1871
1886
 
        then false
1872
1887
 
        else if (if (if ((parseIntValue(curLocation[locIdxContinent]) == lastId))
1873
1888
 
            then (dynamic[tDynamicStatus] == "INPROGRESS")
1874
1889
 
            else false)
1875
1890
 
            then (parseIntValue(static[tStaticEnd]) > now)
1876
1891
 
            else false)
1877
1892
 
            then throw("Your duck is taking part in the tournament")
1878
1893
 
            else asBoolean(invoke(this, "exitTournamentInternal", [duckAssetId], nil))
1879
1894
 
    }
1880
1895
 
1881
1896
 
1897
+
func checkDelivery (duckAssetId) = {
1898
+
    let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1899
+
    let now = lastBlock.timestamp
1900
+
    if ((curLocation[locIdxType] != "D"))
1901
+
        then false
1902
+
        else {
1903
+
            let startTime = parseIntValue(curLocation[locIdxContinent])
1904
+
            let distance = parseIntValue(curLocation[locIdxId])
1905
+
            if (if ((now > (startTime + TEN_MINUTES_MILLIS)))
1906
+
                then (3 > distance)
1907
+
                else false)
1908
+
                then throw("Your duck is on delivery mission")
1909
+
                else asBoolean(invoke(this, "exitDeliveryInternal", [duckAssetId], nil))
1910
+
            }
1911
+
    }
1912
+
1913
+
1882
1914
 
func mergeInternal (newLandSize,newLevel,formula,addr,landAssetIds,needMat) = {
1883
1915
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1884
1916
 
    if (checkTournament(duckAssetId))
1885
1917
 
        then throw("mergeInternal_checkTournament")
1886
-
        else {
1887
-
            func checkMerge (acc,landAssetId) =             {
1888
-
                let asset = value(assetInfo(fromBase58String(landAssetId)))
1889
-
                let timeKey = keyStakedTimeByAssetId(landAssetId)
1890
-
                let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
1891
-
                let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1892
-
                if ((owner != addr))
1893
-
                    then throw((LANDPREFIX + " is not yours"))
1894
-
                    else {
1895
-
                        let d = split(asset.description, "_")
1896
-
                        let continent = d[recContinent]
1897
-
                        if (if ((acc._3 != ""))
1898
-
                            then (acc._3 != continent)
1899
-
                            else false)
1900
-
                            then throw("Lands should be on the same continent to merge")
1901
-
                            else {
1902
-
                                let landSize = d[recLandSize]
1903
-
                                let sizesIn = acc._1
1904
-
                                let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
1905
-
                                let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
1906
-
                                let pieces = numPiecesBySize(landSize)
1907
-
                                let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
1908
-
                                let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1909
-
                                let reqLevel =                                 match landSize {
1910
-
                                    case _ => 
1911
-
                                        if (("S" == $match0))
1912
-
                                            then 3
1913
-
                                            else if (("M" == $match0))
1914
-
                                                then 4
1915
-
                                                else if (("L" == $match0))
1916
-
                                                    then 5
1917
-
                                                    else if (("XL" == $match0))
1918
-
                                                        then 6
1919
-
                                                        else throw("Only S, M, L, XL can merge")
1920
-
                                }
1921
-
                                if ((infraLevel != reqLevel))
1922
-
                                    then throw("All lands should be maxed to merge")
1923
-
                                    else {
1924
-
                                        let landNum = d[recLandNum]
1925
-
                                        let terrainCounts = countTerrains(d[recTerrains])
1926
-
                                        let deltaTime = (lastBlock.timestamp - savedTime)
1927
-
                                        if ((0 > deltaTime))
1928
-
                                            then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
1929
-
                                            else {
1930
-
                                                let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
1931
-
                                                let landIndex = (pieces / SSIZE)
1932
-
                                                let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
1933
-
                                                let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
1934
-
                                                let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
1935
-
                                                let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
1936
-
                                                let lands = acc._7
1937
-
                                                let idx = indexOf(lands, landAssetId)
1938
-
                                                if (!(isDefined(idx)))
1939
-
                                                    then throw(("Your staked lands don't contain " + landAssetId))
1940
-
                                                    else {
1941
-
                                                        let customKey = keyLandAssetIdToCustomName(landAssetId)
1942
-
                                                        let customName = valueOrElse(getString(customKey), "")
1943
-
                                                        $Tuple10(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(keyLandNumToOwner(landNum))) :+ DeleteEntry(keyWarehouseByLand(landAssetId))) :+ DeleteEntry(customKey)) :+ Burn(fromBase58String(landAssetId), 1)) ++ (if ((customName != ""))
1944
-
                                                            then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
1945
-
                                                            else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
1946
-
                                                        }
1947
-
                                                }
1948
-
                                        }
1949
-
                                }
1950
-
                        }
1918
+
        else if (checkDelivery(duckAssetId))
1919
+
            then throw("mergeInternal_checkDelivery")
1920
+
            else {
1921
+
                func checkMerge (acc,landAssetId) =                 {
1922
+
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
1923
+
                    let timeKey = keyStakedTimeByAssetId(landAssetId)
1924
+
                    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
1925
+
                    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1926
+
                    if ((owner != addr))
1927
+
                        then throw((LANDPREFIX + " is not yours"))
1928
+
                        else {
1929
+
                            let d = split(asset.description, "_")
1930
+
                            let continent = d[recContinent]
1931
+
                            if (if ((acc._3 != ""))
1932
+
                                then (acc._3 != continent)
1933
+
                                else false)
1934
+
                                then throw("Lands should be on the same continent to merge")
1935
+
                                else {
1936
+
                                    let landSize = d[recLandSize]
1937
+
                                    let sizesIn = acc._1
1938
+
                                    let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
1939
+
                                    let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
1940
+
                                    let pieces = numPiecesBySize(landSize)
1941
+
                                    let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
1942
+
                                    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1943
+
                                    let reqLevel =                                     match landSize {
1944
+
                                        case _ => 
1945
+
                                            if (("S" == $match0))
1946
+
                                                then 3
1947
+
                                                else if (("M" == $match0))
1948
+
                                                    then 4
1949
+
                                                    else if (("L" == $match0))
1950
+
                                                        then 5
1951
+
                                                        else if (("XL" == $match0))
1952
+
                                                            then 6
1953
+
                                                            else throw("Only S, M, L, XL can merge")
1954
+
                                    }
1955
+
                                    if ((infraLevel != reqLevel))
1956
+
                                        then throw("All lands should be maxed to merge")
1957
+
                                        else {
1958
+
                                            let landNum = d[recLandNum]
1959
+
                                            let terrainCounts = countTerrains(d[recTerrains])
1960
+
                                            let deltaTime = (lastBlock.timestamp - savedTime)
1961
+
                                            if ((0 > deltaTime))
1962
+
                                                then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
1963
+
                                                else {
1964
+
                                                    let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
1965
+
                                                    let landIndex = (pieces / SSIZE)
1966
+
                                                    let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
1967
+
                                                    let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
1968
+
                                                    let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
1969
+
                                                    let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
1970
+
                                                    let lands = acc._7
1971
+
                                                    let idx = indexOf(lands, landAssetId)
1972
+
                                                    if (!(isDefined(idx)))
1973
+
                                                        then throw(("Your staked lands don't contain " + landAssetId))
1974
+
                                                        else {
1975
+
                                                            let customKey = keyLandAssetIdToCustomName(landAssetId)
1976
+
                                                            let customName = valueOrElse(getString(customKey), "")
1977
+
                                                            $Tuple10(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(keyLandNumToOwner(landNum))) :+ DeleteEntry(keyWarehouseByLand(landAssetId))) :+ DeleteEntry(customKey)) :+ Burn(fromBase58String(landAssetId), 1)) ++ (if ((customName != ""))
1978
+
                                                                then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
1979
+
                                                                else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
1980
+
                                                            }
1981
+
                                                    }
1982
+
                                            }
1983
+
                                    }
1984
+
                            }
1985
+
                    }
1986
+
1987
+
                let bpKey = keyBackpackByDuck(duckAssetId)
1988
+
                let currentPack = getBackpack(bpKey)
1989
+
                let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
1990
+
                let landsKey = keyStakedLandsByOwner(addr)
1991
+
                let landsStr = getString(landsKey)
1992
+
                let landsIn = if (isDefined(landsStr))
1993
+
                    then split_51C(value(landsStr), "_")
1994
+
                    else nil
1995
+
                let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
1996
+
                let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
1997
+
                let r = {
1998
+
                    let $l = landAssetIds
1999
+
                    let $s = size($l)
2000
+
                    let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
2001
+
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
2002
+
                        then $a
2003
+
                        else checkMerge($a, $l[$i])
2004
+
2005
+
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
2006
+
                        then $a
2007
+
                        else throw("List size exceeds 5")
2008
+
2009
+
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
2010
+
                    }
2011
+
                let continent = r._3
2012
+
                let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
2013
+
                let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
2014
+
                let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
2015
+
                let newLandNum = toString(freeNum)
2016
+
                let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
2017
+
                let assetId = calculateAssetId(issue)
2018
+
                let newLandAssetId = toBase58String(assetId)
2019
+
                let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
2020
+
                let piecesKey = keyStakedPiecesByOwner(addr)
2021
+
                let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
2022
+
                $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
2023
+
                    then StringEntry(landsKey, makeString_11C(r._7, "_"))
2024
+
                    else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
2025
+
                    then 0
2026
+
                    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(keyInfraLevelByAssetId(newLandAssetId), newLevel)) :+ IntegerEntry(keyInfraLevelByAssetIdAndOwner(newLandAssetId, addr), newLevel)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], r._4, newMat, currentPack[bpIdxProd]], ":"))) :+ StringEntry(keyResProportions(), makeString(r._6, "_"))) :+ StringEntry(keyResTypesByContinent(continent), makeString(r._10, "_"))) :+ StringEntry(keyDuckLocation(duckAssetId), makeString([continent, "L", newLandAssetId], "_"))) :+ ScriptTransfer(addressFromStringValue(addr), 1, assetId)), newLandAssetId)
1951
2027
 
                }
1952
-
1953
-
            let bpKey = keyBackpackByDuck(duckAssetId)
1954
-
            let currentPack = getBackpack(bpKey)
1955
-
            let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
1956
-
            let landsKey = keyStakedLandsByOwner(addr)
1957
-
            let landsStr = getString(landsKey)
1958
-
            let landsIn = if (isDefined(landsStr))
1959
-
                then split_51C(value(landsStr), "_")
1960
-
                else nil
1961
-
            let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
1962
-
            let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
1963
-
            let r = {
1964
-
                let $l = landAssetIds
1965
-
                let $s = size($l)
1966
-
                let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
1967
-
                func $f0_1 ($a,$i) =                 if (($i >= $s))
1968
-
                    then $a
1969
-
                    else checkMerge($a, $l[$i])
1970
-
1971
-
                func $f0_2 ($a,$i) =                 if (($i >= $s))
1972
-
                    then $a
1973
-
                    else throw("List size exceeds 5")
1974
-
1975
-
                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
1976
-
                }
1977
-
            let continent = r._3
1978
-
            let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
1979
-
            let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
1980
-
            let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
1981
-
            let newLandNum = toString(freeNum)
1982
-
            let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
1983
-
            let assetId = calculateAssetId(issue)
1984
-
            let newLandAssetId = toBase58String(assetId)
1985
-
            let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
1986
-
            let piecesKey = keyStakedPiecesByOwner(addr)
1987
-
            let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
1988
-
            $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
1989
-
                then StringEntry(landsKey, makeString_11C(r._7, "_"))
1990
-
                else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
1991
-
                then 0
1992
-
                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(keyInfraLevelByAssetId(newLandAssetId), newLevel)) :+ IntegerEntry(keyInfraLevelByAssetIdAndOwner(newLandAssetId, addr), newLevel)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], r._4, newMat, currentPack[bpIdxProd]], ":"))) :+ StringEntry(keyResProportions(), makeString(r._6, "_"))) :+ StringEntry(keyResTypesByContinent(continent), makeString(r._10, "_"))) :+ StringEntry(keyDuckLocation(duckAssetId), makeString([continent, "L", newLandAssetId], "_"))) :+ ScriptTransfer(addressFromStringValue(addr), 1, assetId)), newLandAssetId)
1993
-
            }
1994
2028
 
    }
1995
2029
 
1996
2030
 
1997
2031
 
func s2m (addr,landAssetIds) = mergeInternal("M", 3, "SSSS", addr, landAssetIds, 0)
1998
2032
 
1999
2033
 
2000
2034
 
func m2l (addr,landAssetIds) = mergeInternal("L", 4, "SMM", addr, landAssetIds, (InfraUpgradeCostS * 4))
2001
2035
 
2002
2036
 
2003
2037
 
func l2xl (addr,landAssetIds) = mergeInternal("XL", 5, "SSSML", addr, landAssetIds, (InfraUpgradeCostS * 47))
2004
2038
 
2005
2039
 
2006
2040
 
func xl2xxl (addr,landAssetIds) = mergeInternal("XXL", 6, "LXL", addr, landAssetIds, (InfraUpgradeCostS * 54))
2007
2041
 
2008
2042
 
2009
2043
 
func mergeCommon (addr,landAssetIds) = match size(landAssetIds) {
2010
2044
 
    case _ => 
2011
2045
 
        if ((4 == $match0))
2012
2046
 
            then s2m(addr, landAssetIds)
2013
2047
 
            else if ((3 == $match0))
2014
2048
 
                then m2l(addr, landAssetIds)
2015
2049
 
                else if ((5 == $match0))
2016
2050
 
                    then l2xl(addr, landAssetIds)
2017
2051
 
                    else if ((2 == $match0))
2018
2052
 
                        then xl2xxl(addr, landAssetIds)
2019
2053
 
                        else throw("Unknown merge")
2020
2054
 
}
2021
2055
 
2022
2056
 
2023
2057
 
func prolog (i) = if (if ((i.originCaller != restContract))
2024
2058
 
    then valueOrElse(getBoolean(keyBlocked()), false)
2025
2059
 
    else false)
2026
2060
 
    then throw("Contracts are under maintenance")
2027
2061
 
    else StringEntry(keyLastTxIdByUser(toString(i.originCaller)), toBase58String(i.transactionId))
2028
2062
 
2029
2063
 
2030
2064
 
@Callable(i)
2031
2065
 
func constructorV1 (restAddr) = if ((i.caller != this))
2032
2066
 
    then throw("Permission denied")
2033
2067
 
    else [StringEntry(keyRestAddress(), restAddr)]
2034
2068
 
2035
2069
 
2036
2070
 
2037
2071
 
@Callable(i)
2038
2072
 
func setBlocked (isBlocked) = if ((i.caller != this))
2039
2073
 
    then throw("permission denied")
2040
2074
 
    else [BooleanEntry(keyBlocked(), isBlocked)]
2041
2075
 
2042
2076
 
2043
2077
 
2044
2078
 
@Callable(i)
2045
2079
 
func stakeLand () = {
2046
2080
 
    let prologAction = prolog(i)
2047
2081
 
    if ((size(i.payments) != 1))
2048
2082
 
        then throw("Exactly one payment required")
2049
2083
 
        else {
2050
2084
 
            let pmt = value(i.payments[0])
2051
2085
 
            let assetId = value(pmt.assetId)
2052
2086
 
            let address = toString(i.caller)
2053
2087
 
            if ((pmt.amount != 1))
2054
2088
 
                then throw((("NFT " + LANDPREFIX) + " token should be attached as payment"))
2055
2089
 
                else {
2056
2090
 
                    let asset = value(assetInfo(assetId))
2057
2091
 
                    if ((asset.issuer != this))
2058
2092
 
                        then throw("Unknown issuer of token")
2059
2093
 
                        else if (!(contains(asset.name, LANDPREFIX)))
2060
2094
 
                            then throw((("Only NFT " + LANDPREFIX) + " tokens are accepted"))
2061
2095
 
                            else {
2062
2096
 
                                let landNumSize = drop(asset.name, 4)
2063
2097
 
                                let landNum = if (contains(landNumSize, "XXL"))
2064
2098
 
                                    then dropRight(landNumSize, 3)
2065
2099
 
                                    else if (contains(landNumSize, "XL"))
2066
2100
 
                                        then dropRight(landNumSize, 2)
2067
2101
 
                                        else dropRight(landNumSize, 1)
2068
2102
 
                                if (!(isDefined(parseInt(landNum))))
2069
2103
 
                                    then throw(("Cannot parse land number from " + asset.name))
2070
2104
 
                                    else {
2071
2105
 
                                        let landAssetId = toBase58String(assetId)
2072
2106
 
                                        let timeKey = keyStakedTimeByAssetId(landAssetId)
2073
2107
 
                                        if (isDefined(getInteger(timeKey)))
2074
2108
 
                                            then throw((("NFT " + asset.name) + " is already staked"))
2075
2109
 
                                            else {
2076
2110
 
                                                let d = split(asset.description, "_")
2077
2111
 
                                                let terrainCounts = countTerrains(d[recTerrains])
2078
2112
 
                                                let pieces = numPiecesBySize(d[recLandSize])
2079
2113
 
                                                let landIndex = (pieces / SSIZE)
2080
2114
 
                                                let props = updateProportions(terrainCounts, landIndex, 1)
2081
2115
 
                                                let resByContKey = keyResTypesByContinent(d[recContinent])
2082
2116
 
                                                let contProps = split(valueOrElse(getString(resByContKey), "0_0_0_0_0_0"), "_")
2083
2117
 
                                                let updatedContProps = makeString(updateProportionsInternal(contProps, terrainCounts, landIndex, 1), "_")
2084
2118
 
                                                let landsKey = keyStakedLandsByOwner(address)
2085
2119
 
                                                let landsStr = getString(landsKey)
2086
2120
 
                                                let lands = if (isDefined(landsStr))
2087
2121
 
                                                    then split_51C(value(landsStr), "_")
2088
2122
 
                                                    else nil
2089
2123
 
                                                if (containsElement(lands, landAssetId))
2090
2124
 
                                                    then throw(("Your staked lands already contain " + landAssetId))
2091
2125
 
                                                    else if ((size(lands) >= MAX_LANDS_STAKED_BY_USER))
2092
2126
 
                                                        then throw((("Your already staked max (" + toString(MAX_LANDS_STAKED_BY_USER)) + ") lands"))
2093
2127
 
                                                        else {
2094
2128
 
                                                            let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2095
2129
 
                                                            let piecesKey = keyStakedPiecesByOwner(address)
2096
2130
 
                                                            let oldPieces = valueOrElse(getInteger(piecesKey), 0)
2097
2131
 
                                                            let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
2098
2132
 
                                                            $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, address), lastBlock.timestamp), StringEntry(landsKey, makeString_11C((lands :+ landAssetId), "_")), IntegerEntry(piecesKey, (oldPieces + pieces)), StringEntry(keyLandAssetIdToOwner(landAssetId), address), StringEntry(keyLandNumToOwner(landNum), address), IntegerEntry(keyInfraLevelByAssetIdAndOwner(landAssetId, address), infraLevel), StringEntry(keyResProportions(), props), StringEntry(resByContKey, updatedContProps), prologAction], wlgResult)
2099
2133
 
                                                            }
2100
2134
 
                                                }
2101
2135
 
                                        }
2102
2136
 
                                }
2103
2137
 
                    }
2104
2138
 
            }
2105
2139
 
    }
2106
2140
 
2107
2141
 
2108
2142
 
2109
2143
 
@Callable(i)
2110
2144
 
func unstakeLand (landAssetIdIn) = {
2111
2145
 
    let prologAction = prolog(i)
2112
2146
 
    if ((size(i.payments) != 0))
2113
2147
 
        then throw("No payments required")
2114
2148
 
        else {
2115
2149
 
            let addr = toString(i.caller)
2116
2150
 
            let c = checkClaimConditions(addr, claimModeDuck, landAssetIdIn)
2117
2151
 
            let landAssetId = c._2
2118
2152
 
            let d = c._3
2119
2153
 
            let landsKey = keyStakedLandsByOwner(addr)
2120
2154
 
            let terrainCounts = countTerrains(d[recTerrains])
2121
2155
 
            let pieces = numPiecesBySize(d[recLandSize])
2122
2156
 
            let landIndex = (pieces / SSIZE)
2123
2157
 
            let props = updateProportions(terrainCounts, landIndex, -1)
2124
2158
 
            let resByContKey = keyResTypesByContinent(d[recContinent])
2125
2159
 
            let contProps = split(valueOrElse(getString(resByContKey), "0_0_0_0_0_0"), "_")
2126
2160
 
            let updatedContProps = makeString(updateProportionsInternal(contProps, terrainCounts, landIndex, -1), "_")
2127
2161
 
            let claimResult = claimAll(addr, landAssetId, pieces, claimModeDuck)
2128
2162
 
            let lands = split_51C(valueOrElse(getString(landsKey), ""), "_")
2129
2163
 
            let idx = indexOf(lands, landAssetId)
2130
2164
 
            if (!(isDefined(idx)))
2131
2165
 
                then throw(("Your staked lands don't contain " + landAssetId))
2132
2166
 
                else {
2133
2167
 
                    let now = lastBlock.timestamp
2134
2168
 
                    let govReleaseTime = valueOrElse(getInteger(govContract, keyUserGwlReleaseTime(addr)), 0)
2135
2169
 
                    if ((govReleaseTime >= now))
2136
2170
 
                        then throw(("Your gWL are taking part in voting, cannot unstake until " + toString(govReleaseTime)))
2137
2171
 
                        else {
2138
2172
 
                            let arbReleaseTime = (valueOrElse(getInteger(wlgContract, keyLastArbTimeByUser(addr)), 0) + arbitrageDelay)
2139
2173
 
                            if ((arbReleaseTime > now))
2140
2174
 
                                then throw(("Your staked lands took part in arbitrage, cannot unstake until " + toString(arbReleaseTime)))
2141
2175
 
                                else {
2142
2176
 
                                    let piecesKey = keyStakedPiecesByOwner(addr)
2143
2177
 
                                    let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
2144
2178
 
                                    let newPieces = if ((pieces > stakedPieces))
2145
2179
 
                                        then 0
2146
2180
 
                                        else (stakedPieces - pieces)
2147
2181
 
                                    let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [addr], nil)
2148
2182
 
                                    $Tuple2([ScriptTransfer(i.caller, 1, fromBase58String(landAssetId)), DeleteEntry(keyStakedTimeByAssetId(landAssetId)), DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, addr)), StringEntry(keyResProportions(), props), StringEntry(resByContKey, updatedContProps), StringEntry(claimResult._2, makeString(claimResult._3, ":")), if ((size(lands) > 1))
2149
2183
 
                                        then StringEntry(landsKey, makeString_11C(removeByIndex(lands, value(idx)), "_"))
2150
2184
 
                                        else DeleteEntry(landsKey), IntegerEntry(piecesKey, newPieces), prologAction], wlgResult)
2151
2185
 
                                    }
2152
2186
 
                            }
2153
2187
 
                    }
2154
2188
 
            }
2155
2189
 
    }
2156
2190
 
2157
2191
 
2158
2192
 
2159
2193
 
@Callable(i)
2160
2194
 
func stakeDuck () = {
2161
2195
 
    let prologAction = prolog(i)
2162
2196
 
    if ((size(i.payments) != 1))
2163
2197
 
        then throw("Exactly one payment required")
2164
2198
 
        else {
2165
2199
 
            let pmt = value(i.payments[0])
2166
2200
 
            let assetId = value(pmt.assetId)
2167
2201
 
            let address = toString(i.caller)
2168
2202
 
            if ((pmt.amount != 1))
2169
2203
 
                then throw((("NFT " + DUCKPREFIX) + " token should be attached as payment"))
2170
2204
 
                else {
2171
2205
 
                    let asset = value(assetInfo(assetId))
2172
2206
 
                    if (if ((asset.issuer != incubatorAddr))
2173
2207
 
                        then (asset.issuer != breederAddr)
2174
2208
 
                        else false)
2175
2209
 
                        then throw((("Unknown issuer of " + DUCKPREFIX) + " token"))
2176
2210
 
                        else if (!(contains(asset.name, DUCKPREFIX)))
2177
2211
 
                            then throw((("Only NFT " + DUCKPREFIX) + " tokens are accepted"))
2178
2212
 
                            else {
2179
2213
 
                                let assetIdStr = toBase58String(assetId)
2180
2214
 
                                let timeKey = keyStakedTimeByAssetId(assetIdStr)
2181
2215
 
                                if (isDefined(getInteger(timeKey)))
2182
2216
 
                                    then throw((("NFT " + asset.name) + " is already staked"))
2183
2217
 
                                    else if (isDefined(getString(keyStakedDuckByOwner(address))))
2184
2218
 
                                        then throw(("You already staked one duck: " + asset.name))
2185
-
                                        else if (checkTournament(assetIdStr))
2186
-
                                            then throw("stakeDuck_checkTournament")
2187
-
                                            else {
2188
-
                                                let locKey = keyDuckLocation(assetIdStr)
2189
-
                                                let location = getString(locKey)
2190
-
                                                let bpKey = keyBackpackByDuck(assetIdStr)
2191
-
                                                let backpack = getString(bpKey)
2192
-
                                                let keyHealth = keyDuckHealth(assetIdStr)
2193
-
                                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2194
-
                                                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
2195
-
                                                ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
2219
+
                                        else {
2220
+
                                            let locKey = keyDuckLocation(assetIdStr)
2221
+
                                            let location = getString(locKey)
2222
+
                                            let bpKey = keyBackpackByDuck(assetIdStr)
2223
+
                                            let backpack = getString(bpKey)
2224
+
                                            let keyHealth = keyDuckHealth(assetIdStr)
2225
+
                                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2226
+
                                            let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
2227
+
                                            ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
2228
+
                                                then nil
2229
+
                                                else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(backpack))
2196
2230
 
                                                    then nil
2197
-
                                                    else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(backpack))
2198
-
                                                        then nil
2199
-
                                                        else (([StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(keyHealth, curHealth)) :+ prologAction)))))
2200
-
                                                }
2231
+
                                                    else (([StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(keyHealth, curHealth)) :+ prologAction)))))
2232
+
                                            }
2201
2233
 
                                }
2202
2234
 
                    }
2203
2235
 
            }
2204
2236
 
    }
2205
2237
 
2206
2238
 
2207
2239
 
2208
2240
 
@Callable(i)
2209
2241
 
func unstakeDuck (assetIdStr) = {
2210
2242
 
    let prologAction = prolog(i)
2211
2243
 
    if ((size(i.payments) != 0))
2212
2244
 
        then throw("No payments required")
2213
2245
 
        else {
2214
2246
 
            let assetId = fromBase58String(assetIdStr)
2215
2247
 
            let address = toString(i.caller)
2216
2248
 
            let asset = value(assetInfo(assetId))
2217
2249
 
            let timeKey = keyStakedTimeByAssetId(assetIdStr)
2218
2250
 
            if (!(isDefined(getInteger(timeKey))))
2219
2251
 
                then throw((("NFT " + asset.name) + " is not staked"))
2220
2252
 
                else if (!(isDefined(getString(keyStakedDuckByOwner(address)))))
2221
2253
 
                    then throw((("The duck " + asset.name) + " is not staked"))
2222
2254
 
                    else {
2223
2255
 
                        let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(assetIdStr)), (("NFT " + asset.name) + " is orphaned"))
2224
2256
 
                        if ((owner != address))
2225
2257
 
                            then throw("Staked NFT is not yours")
2226
2258
 
                            else if (checkTournament(assetIdStr))
2227
2259
 
                                then throw("unstakeDuck_checkTournament")
2228
-
                                else {
2229
-
                                    let keyHealth = keyDuckHealth(assetIdStr)
2230
-
                                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2231
-
                                    let health = valueOrElse(getInteger(keyHealth), maxHP)
2232
-
                                    if ((maxHP > health))
2233
-
                                        then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2234
-
                                        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]
2235
-
                                    }
2260
+
                                else if (checkDelivery(assetIdStr))
2261
+
                                    then throw("unstakeDuck_checkDelivery")
2262
+
                                    else {
2263
+
                                        let keyHealth = keyDuckHealth(assetIdStr)
2264
+
                                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2265
+
                                        let health = valueOrElse(getInteger(keyHealth), maxHP)
2266
+
                                        if ((maxHP > health))
2267
+
                                            then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2268
+
                                            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]
2269
+
                                        }
2236
2270
 
                        }
2237
2271
 
            }
2238
2272
 
    }
2239
2273
 
2240
2274
 
2241
2275
 
2242
2276
 
@Callable(i)
2243
2277
 
func claimRes (amount,landAssetIdStr) = {
2244
2278
 
    let prologAction = prolog(i)
2245
2279
 
    if ((size(i.payments) != 0))
2246
2280
 
        then throw("No payments required")
2247
2281
 
        else {
2248
2282
 
            let addr = toString(i.originCaller)
2249
2283
 
            let result = claimResInternal(addr, amount, claimModeDuck, landAssetIdStr)
2250
2284
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2251
2285
 
            $Tuple2(((((result._1 ++ updateDuckStatsInternal(duckAssetId, fraction(xpClaim, amount, MULT8))._1) :+ StringEntry(result._2, makeString(result._3, ":"))) :+ StringEntry(result._4, makeString(result._5, ":"))) :+ prologAction), result._3[bpIdxRes])
2252
2286
 
            }
2253
2287
 
    }
2254
2288
 
2255
2289
 
2256
2290
 
2257
2291
 
@Callable(i)
2258
2292
 
func claimResToWH (amount,landAssetIdStr) = {
2259
2293
 
    let prologAction = prolog(i)
2260
2294
 
    if ((size(i.payments) != 0))
2261
2295
 
        then throw("No payments required")
2262
2296
 
        else {
2263
2297
 
            let addr = toString(i.originCaller)
2264
2298
 
            let result = claimResInternal(addr, amount, claimModeWh, landAssetIdStr)
2265
2299
 
            $Tuple2(((((result._1 ++ updateAccStatsInternal(addr, fraction(xpClaim, amount, MULT8))._1) :+ StringEntry(result._2, makeString(result._3, ":"))) :+ StringEntry(result._4, makeString(result._5, ":"))) :+ prologAction), result._5[whIdxRes])
2266
2300
 
            }
2267
2301
 
    }
2268
2302
 
2269
2303
 
2270
2304
 
2271
2305
 
@Callable(i)
2272
2306
 
func flight (message,sig) = {
2273
2307
 
    let prologAction = prolog(i)
2274
2308
 
    if ((size(i.payments) != 0))
2275
2309
 
        then throw("No payments required")
2276
2310
 
        else {
2277
2311
 
            let userAddr = toString(i.caller)
2278
2312
 
            let f = flightCommon(userAddr, message, sig)
2279
2313
 
            let newHP = f._1
2280
2314
 
            let duckAssetId = f._2
2281
2315
 
            let locKey = keyDuckLocation(duckAssetId)
2282
2316
 
            let curLocation = valueOrElse(getString(locKey), DEFAULTLOCATION)
2283
2317
 
            let newLocation = f._4
2284
2318
 
            if ((newLocation == curLocation))
2285
2319
 
                then throw("You can't fly to the same location")
2286
2320
 
                else {
2287
2321
 
                    let newLoc = split(newLocation, "_")
2288
2322
 
                    let isTour = (newLoc[locIdxType] == "T")
2289
2323
 
                    let eqKey = keyDuckEquipment(duckAssetId)
2290
2324
 
                    let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2291
-
                    let $t06601366110 = subtractEquipment(currentEq, f._5)
2292
-
                    let newEq = $t06601366110._1
2293
-
                    let shouldZeroBuffs = $t06601366110._2
2325
+
                    let $t06681366910 = subtractEquipment(currentEq, f._5)
2326
+
                    let newEq = $t06681366910._1
2327
+
                    let shouldZeroBuffs = $t06681366910._2
2294
2328
 
                    let locToSave = if (!(isInTournament(tournamentContract, curLocation)))
2295
2329
 
                        then if (isTour)
2296
2330
 
                            then throw(((("Cheat attempt: oldLoc=" + curLocation) + ", newLoc=") + newLocation))
2297
2331
 
                            else if ((newHP > 0))
2298
2332
 
                                then newLocation
2299
2333
 
                                else curLocation
2300
2334
 
                        else if (!(isInTournament(tournamentContract, newLocation)))
2301
2335
 
                            then throw("Your duck is taking part in the tournament")
2302
2336
 
                            else {
2303
2337
 
                                let score = parseIntValue(newLoc[locIdxId])
2304
2338
 
                                let curLoc = split(curLocation, "_")
2305
2339
 
                                let lastId = valueOrElse(getInteger(tournamentContract, lastTourIdKey), 0)
2306
2340
 
                                if ((score != (parseIntValue(curLoc[locIdxId]) + 1)))
2307
2341
 
                                    then throw(((("Cheat attempt: oldLoc=" + curLocation) + ", newLoc=") + newLocation))
2308
2342
 
                                    else if ((newHP > 0))
2309
2343
 
                                        then {
2310
2344
 
                                            let localBest = valueOrElse(getInteger(tournamentContract, keyBestResultByTourAndDuck(lastId, duckAssetId)), 0)
2311
2345
 
                                            let updLocal = if ((score > localBest))
2312
2346
 
                                                then invoke(tournamentContract, "saveDuckResult", [duckAssetId, score], nil)
2313
2347
 
                                                else unit
2314
2348
 
                                            if ((updLocal == updLocal))
2315
2349
 
                                                then newLocation
2316
2350
 
                                                else throw("Strict value is not equal to itself.")
2317
2351
 
                                            }
2318
2352
 
                                        else curLocation
2319
2353
 
                                }
2320
2354
 
                    $Tuple2(([StringEntry(locKey, locToSave), StringEntry(eqKey, newEq), IntegerEntry(keyDuckHealth(duckAssetId), newHP), prologAction] ++ (if (shouldZeroBuffs)
2321
2355
 
                        then [StringEntry(keyDuckBuffs(duckAssetId), "0_0_0_0_0")]
2322
2356
 
                        else (nil ++ updateDuckStatsInternal(duckAssetId, if ((newHP > 0))
2323
2357
 
                            then xpSuccessFlight
2324
2358
 
                            else xpFailFlight)._1))), f._3)
2325
2359
 
                    }
2326
2360
 
            }
2327
2361
 
    }
2328
2362
 
2329
2363
 
2330
2364
 
2331
2365
 
@Callable(i)
2332
2366
 
func heal (quantityL1,quantityL2,quantityL3) = {
2333
2367
 
    let prologAction = prolog(i)
2334
2368
 
    if (if (if ((0 > quantityL1))
2335
2369
 
        then true
2336
2370
 
        else (0 > quantityL2))
2337
2371
 
        then true
2338
2372
 
        else (0 > quantityL3))
2339
2373
 
        then throw("Quantity cannot be negative")
2340
2374
 
        else {
2341
2375
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2342
2376
 
            if (checkTournament(duckAssetId))
2343
2377
 
                then throw("heal_checkTournament")
2344
-
                else {
2345
-
                    let qts = [quantityL1, quantityL2, quantityL3]
2346
-
                    let keyHealth = keyDuckHealth(duckAssetId)
2347
-
                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2348
-
                    let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2349
-
                    if ((oldHealth >= maxHP))
2350
-
                        then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2351
-
                        else {
2352
-
                            let bpKey = keyBackpackByDuck(duckAssetId)
2353
-
                            let currentPack = getBackpack(bpKey)
2354
-
                            let prodList = if ((currentPack[bpIdxProd] == ""))
2355
-
                                then nil
2356
-
                                else split_4C(currentPack[bpIdxProd], "_")
2357
-
                            func iterateProd (acc,recipe) =                             {
2358
-
                                let n = acc._2
2359
-
                                let x = if ((size(prodList) > n))
2360
-
                                    then parseIntValue(prodList[n])
2361
-
                                    else 0
2362
-
                                if ((3 > n))
2363
-
                                    then {
2364
-
                                        let q = qts[n]
2365
-
                                        if ((q > x))
2366
-
                                            then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2367
-
                                            else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2368
-
                                        }
2369
-
                                    else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2378
+
                else if (checkDelivery(duckAssetId))
2379
+
                    then throw("heal_checkDelivery")
2380
+
                    else {
2381
+
                        let qts = [quantityL1, quantityL2, quantityL3]
2382
+
                        let keyHealth = keyDuckHealth(duckAssetId)
2383
+
                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2384
+
                        let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2385
+
                        if ((oldHealth >= maxHP))
2386
+
                            then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2387
+
                            else {
2388
+
                                let bpKey = keyBackpackByDuck(duckAssetId)
2389
+
                                let currentPack = getBackpack(bpKey)
2390
+
                                let prodList = if ((currentPack[bpIdxProd] == ""))
2391
+
                                    then nil
2392
+
                                    else split_4C(currentPack[bpIdxProd], "_")
2393
+
                                func iterateProd (acc,recipe) =                                 {
2394
+
                                    let n = acc._2
2395
+
                                    let x = if ((size(prodList) > n))
2396
+
                                        then parseIntValue(prodList[n])
2397
+
                                        else 0
2398
+
                                    if ((3 > n))
2399
+
                                        then {
2400
+
                                            let q = qts[n]
2401
+
                                            if ((q > x))
2402
+
                                                then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2403
+
                                                else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2404
+
                                            }
2405
+
                                        else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2406
+
                                    }
2407
+
2408
+
                                let result = {
2409
+
                                    let $l = productionMatrix
2410
+
                                    let $s = size($l)
2411
+
                                    let $acc0 = $Tuple3(nil, 0, 0)
2412
+
                                    func $f0_1 ($a,$i) =                                     if (($i >= $s))
2413
+
                                        then $a
2414
+
                                        else iterateProd($a, $l[$i])
2415
+
2416
+
                                    func $f0_2 ($a,$i) =                                     if (($i >= $s))
2417
+
                                        then $a
2418
+
                                        else throw("List size exceeds 50")
2419
+
2420
+
                                    $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)
2421
+
                                    }
2422
+
                                let newHealth = min([maxHP, (oldHealth + result._3)])
2423
+
                                $Tuple2(([IntegerEntry(keyHealth, newHealth), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(result._1, "_")], ":")), prologAction] ++ updateDuckStatsInternal(duckAssetId, (xpHeal * ((quantityL1 + quantityL2) + quantityL3)))._1), newHealth)
2370
2424
 
                                }
2371
-
2372
-
                            let result = {
2373
-
                                let $l = productionMatrix
2374
-
                                let $s = size($l)
2375
-
                                let $acc0 = $Tuple3(nil, 0, 0)
2376
-
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
2377
-
                                    then $a
2378
-
                                    else iterateProd($a, $l[$i])
2379
-
2380
-
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
2381
-
                                    then $a
2382
-
                                    else throw("List size exceeds 50")
2383
-
2384
-
                                $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)
2385
-
                                }
2386
-
                            let newHealth = min([maxHP, (oldHealth + result._3)])
2387
-
                            $Tuple2(([IntegerEntry(keyHealth, newHealth), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(result._1, "_")], ":")), prologAction] ++ updateDuckStatsInternal(duckAssetId, (xpHeal * ((quantityL1 + quantityL2) + quantityL3)))._1), newHealth)
2388
-
                            }
2389
-
                    }
2425
+
                        }
2390
2426
 
            }
2391
2427
 
    }
2392
2428
 
2393
2429
 
2394
2430
 
2395
2431
 
@Callable(i)
2396
2432
 
func healES () = {
2397
2433
 
    let prologAction = prolog(i)
2398
2434
 
    if ((size(i.payments) != 1))
2399
2435
 
        then throw("Exactly one payment required")
2400
2436
 
        else {
2401
2437
 
            let pmt = value(i.payments[0])
2402
2438
 
            if ((pmt.assetId != usdtAssetId))
2403
2439
 
                then throw("Allowed USDT payment only!")
2404
2440
 
                else {
2405
2441
 
                    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2406
2442
 
                    if (checkTournament(duckAssetId))
2407
2443
 
                        then throw("healES_checkTournament")
2408
-
                        else {
2409
-
                            let keyHealth = keyDuckHealth(duckAssetId)
2410
-
                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2411
-
                            let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2412
-
                            if ((oldHealth > 0))
2413
-
                                then throw("HP should be 0 to call Emergency Service")
2414
-
                                else {
2415
-
                                    let bpKey = keyBackpackByDuck(duckAssetId)
2416
-
                                    let currentPack = getBackpack(bpKey)
2417
-
                                    let prodList = if ((currentPack[bpIdxProd] == ""))
2418
-
                                        then nil
2419
-
                                        else split_4C(currentPack[bpIdxProd], "_")
2420
-
                                    let medKitAmount1 = if ((size(prodList) > 0))
2421
-
                                        then parseIntValue(prodList[0])
2422
-
                                        else 0
2423
-
                                    let medKitAmount2 = if ((size(prodList) > 1))
2424
-
                                        then parseIntValue(prodList[1])
2425
-
                                        else 0
2426
-
                                    let medKitAmount3 = if ((size(prodList) > 2))
2427
-
                                        then parseIntValue(prodList[2])
2428
-
                                        else 0
2429
-
                                    if (if (if ((medKitAmount1 > 0))
2430
-
                                        then true
2431
-
                                        else (medKitAmount2 > 0))
2432
-
                                        then true
2433
-
                                        else (medKitAmount3 > 0))
2434
-
                                        then throw("You have to use own Medical Kit")
2435
-
                                        else {
2436
-
                                            let existStr = getString(economyContract, keyEsWarehouse())
2437
-
                                            let existAmounts = if (isDefined(existStr))
2438
-
                                                then split_4C(value(existStr), "_")
2439
-
                                                else nil
2440
-
                                            let existAmount = if ((size(existAmounts) > 0))
2441
-
                                                then parseIntValue(existAmounts[0])
2442
-
                                                else 0
2443
-
                                            if ((0 >= existAmount))
2444
-
                                                then throw("There are no Medical Kits L1 at Emergency Service storage")
2445
-
                                                else {
2446
-
                                                    let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2447
-
                                                    let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2448
-
                                                    let recipe = split(productionMatrix[0], "_")
2449
-
                                                    let totalMat = getRecipeMaterials(recipe)
2450
-
                                                    let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2451
-
                                                    if ((pmt.amount != sellPrice))
2452
-
                                                        then throw(("Payment attached should be " + toString(sellPrice)))
2453
-
                                                        else {
2454
-
                                                            let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2455
-
                                                            $Tuple2(([IntegerEntry(keyHealth, newHealth), prologAction] ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2456
-
                                                            }
2457
-
                                                    }
2458
-
                                            }
2459
-
                                    }
2460
-
                            }
2444
+
                        else if (checkDelivery(duckAssetId))
2445
+
                            then throw("healES_checkDelivery")
2446
+
                            else {
2447
+
                                let keyHealth = keyDuckHealth(duckAssetId)
2448
+
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2449
+
                                let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2450
+
                                if ((oldHealth > 0))
2451
+
                                    then throw("HP should be 0 to call Emergency Service")
2452
+
                                    else {
2453
+
                                        let bpKey = keyBackpackByDuck(duckAssetId)
2454
+
                                        let currentPack = getBackpack(bpKey)
2455
+
                                        let prodList = if ((currentPack[bpIdxProd] == ""))
2456
+
                                            then nil
2457
+
                                            else split_4C(currentPack[bpIdxProd], "_")
2458
+
                                        let medKitAmount1 = if ((size(prodList) > 0))
2459
+
                                            then parseIntValue(prodList[0])
2460
+
                                            else 0
2461
+
                                        let medKitAmount2 = if ((size(prodList) > 1))
2462
+
                                            then parseIntValue(prodList[1])
2463
+
                                            else 0
2464
+
                                        let medKitAmount3 = if ((size(prodList) > 2))
2465
+
                                            then parseIntValue(prodList[2])
2466
+
                                            else 0
2467
+
                                        if (if (if ((medKitAmount1 > 0))
2468
+
                                            then true
2469
+
                                            else (medKitAmount2 > 0))
2470
+
                                            then true
2471
+
                                            else (medKitAmount3 > 0))
2472
+
                                            then throw("You have to use own Medical Kit")
2473
+
                                            else {
2474
+
                                                let existStr = getString(economyContract, keyEsWarehouse())
2475
+
                                                let existAmounts = if (isDefined(existStr))
2476
+
                                                    then split_4C(value(existStr), "_")
2477
+
                                                    else nil
2478
+
                                                let existAmount = if ((size(existAmounts) > 0))
2479
+
                                                    then parseIntValue(existAmounts[0])
2480
+
                                                    else 0
2481
+
                                                if ((0 >= existAmount))
2482
+
                                                    then throw("There are no Medical Kits L1 at Emergency Service storage")
2483
+
                                                    else {
2484
+
                                                        let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2485
+
                                                        let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2486
+
                                                        let recipe = split(productionMatrix[0], "_")
2487
+
                                                        let totalMat = getRecipeMaterials(recipe)
2488
+
                                                        let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2489
+
                                                        if ((pmt.amount != sellPrice))
2490
+
                                                            then throw(("Payment attached should be " + toString(sellPrice)))
2491
+
                                                            else {
2492
+
                                                                let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2493
+
                                                                $Tuple2(([IntegerEntry(keyHealth, newHealth), prologAction] ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2494
+
                                                                }
2495
+
                                                        }
2496
+
                                                }
2497
+
                                        }
2498
+
                                }
2461
2499
 
                    }
2462
2500
 
            }
2463
2501
 
    }
2464
2502
 
2465
2503
 
2466
2504
 
2467
2505
 
@Callable(i)
2468
2506
 
func updateBackpack (duckAssetId,newPack) = if ((i.caller != economyContract))
2469
2507
 
    then throw("permission denied")
2470
2508
 
    else $Tuple2([StringEntry(keyBackpackByDuck(duckAssetId), newPack)], newPack)
2471
2509
 
2472
2510
 
2473
2511
 
2474
2512
 
@Callable(i)
2475
2513
 
func commitForRandom () = {
2476
2514
 
    let prologAction = prolog(i)
2477
2515
 
    let finishBlock = (height + randomDelay)
2478
2516
 
    let addr = toString(i.caller)
2479
2517
 
    $Tuple2(([IntegerEntry(keyCommit(addr), finishBlock)] :+ prologAction), finishBlock)
2480
2518
 
    }
2481
2519
 
2482
2520
 
2483
2521
 
2484
2522
 
@Callable(i)
2485
2523
 
func awardSLand (address) = if ((i.caller != tournamentContract))
2486
2524
 
    then throw("Access denied")
2487
2525
 
    else if ((size(i.payments) != 0))
2488
2526
 
        then throw("No payments required")
2489
2527
 
        else {
2490
2528
 
            let result = expeditionInternal(addressFromStringValue(address), i.transactionId)
2491
2529
 
            $Tuple2(result._1, result._2._1)
2492
2530
 
            }
2493
2531
 
2494
2532
 
2495
2533
 
2496
2534
 
@Callable(i)
2497
2535
 
func buySLand () = {
2498
2536
 
    let prologAction = prolog(i)
2499
2537
 
    if ((size(i.payments) != 1))
2500
2538
 
        then throw("Exactly one payment required")
2501
2539
 
        else {
2502
2540
 
            let pmt = value(i.payments[0])
2503
2541
 
            if ((pmt.assetId != usdtAssetId))
2504
2542
 
                then throw("Allowed USDT payment only!")
2505
2543
 
                else if ((pmt.amount != EXPUSDT))
2506
2544
 
                    then throw(("Payment attached should be " + toString(EXPUSDT)))
2507
2545
 
                    else {
2508
2546
 
                        let result = expeditionInternal(i.caller, i.transactionId)
2509
2547
 
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2510
2548
 
                        $Tuple2((((result._1 :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) ++ updateAccStatsInternal(toString(i.caller), xpNewSLand)._1) :+ prologAction), $Tuple2(result._2._1, acresResult))
2511
2549
 
                        }
2512
2550
 
            }
2513
2551
 
    }
2514
2552
 
2515
2553
 
2516
2554
 
2517
2555
 
@Callable(i)
2518
2556
 
func expedition (message,sig) = {
2519
2557
 
    let prologAction = prolog(i)
2520
2558
 
    if ((size(i.payments) != 0))
2521
2559
 
        then throw("No payments required")
2522
2560
 
        else {
2523
2561
 
            let userAddr = toString(i.caller)
2524
2562
 
            let f = flightCommon(userAddr, message, sig)
2525
2563
 
            let duckAssetId = f._2
2526
2564
 
            let keyHealth = keyDuckHealth(duckAssetId)
2527
2565
 
            let bpKey = keyBackpackByDuck(duckAssetId)
2528
2566
 
            let currentPack = getBackpack(bpKey)
2529
2567
 
            let mList = split(currentPack[bpIdxMat], "_")
2530
2568
 
            let newMat = makeString(subtractMaterials(true, mList, EXPMATERIALS), "_")
2531
2569
 
            let eqKey = keyDuckEquipment(duckAssetId)
2532
2570
 
            let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2533
-
            let $t07486774964 = subtractEquipment(currentEq, f._5)
2534
-
            let newEq = $t07486774964._1
2535
-
            let shouldZeroBuffs = $t07486774964._2
2571
+
            let $t07583875935 = subtractEquipment(currentEq, f._5)
2572
+
            let newEq = $t07583875935._1
2573
+
            let shouldZeroBuffs = $t07583875935._2
2536
2574
 
            let e = expeditionInternal(i.caller, i.transactionId)
2537
2575
 
            let id = e._2._1
2538
2576
 
            let result = if ((0 >= f._1))
2539
2577
 
                then $Tuple3([IntegerEntry(keyHealth, 0), StringEntry(eqKey, newEq)], "", 0)
2540
2578
 
                else $Tuple3((e._1 ++ (if (shouldZeroBuffs)
2541
2579
 
                    then [StringEntry(keyDuckBuffs(duckAssetId), "0_0_0_0_0")]
2542
2580
 
                    else ((((nil :+ StringEntry(keyDuckLocation(duckAssetId), makeString([e._2._2, "L", id], "_"))) :+ IntegerEntry(keyHealth, f._1)) :+ StringEntry(eqKey, newEq)) :+ StringEntry(bpKey, makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], newMat, currentPack[bpIdxProd]], ":"))))), id, f._3)
2543
2581
 
            if (checkTournament(duckAssetId))
2544
2582
 
                then throw("expedition_checkTournament")
2545
-
                else {
2546
-
                    let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2547
-
                    $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) :+ prologAction), $Tuple3(result._2, result._3, acresResult))
2548
-
                    }
2583
+
                else if (checkDelivery(duckAssetId))
2584
+
                    then throw("expedition_checkDelivery")
2585
+
                    else {
2586
+
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2587
+
                        $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) :+ prologAction), $Tuple3(result._2, result._3, acresResult))
2588
+
                        }
2549
2589
 
            }
2550
2590
 
    }
2551
2591
 
2552
2592
 
2553
2593
 
2554
2594
 
@Callable(i)
2555
2595
 
func buySLandForAcres () = {
2556
2596
 
    let prologAction = prolog(i)
2557
2597
 
    if ((size(i.payments) != 1))
2558
2598
 
        then throw("exactly 1 payment must be attached")
2559
2599
 
        else {
2560
2600
 
            let pmt = i.payments[0]
2561
2601
 
            let amt = pmt.amount
2562
2602
 
            if (if (!(isDefined(pmt.assetId)))
2563
2603
 
                then true
2564
2604
 
                else (value(pmt.assetId) != acresAssetId))
2565
2605
 
                then throw("ACRES payments only!")
2566
2606
 
                else if ((amt != S_COST_ACRES))
2567
2607
 
                    then throw(("Payment attached should be " + toString(S_COST_ACRES)))
2568
2608
 
                    else {
2569
2609
 
                        let result = expeditionInternal(i.caller, i.transactionId)
2570
2610
 
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], [AttachedPayment(acresAssetId, amt)]))
2571
2611
 
                        $Tuple2((((result._1 :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) ++ updateAccStatsInternal(toString(i.caller), xpNewSLand)._1) :+ prologAction), $Tuple2(result._2._1, acresResult))
2572
2612
 
                        }
2573
2613
 
            }
2574
2614
 
    }
2575
2615
 
2576
2616
 
2577
2617
 
2578
2618
 
@Callable(i)
2579
2619
 
func upgradeInfra (landAssetId) = {
2580
2620
 
    let prologAction = prolog(i)
2581
2621
 
    if ((size(i.payments) != 0))
2582
2622
 
        then throw("No payments required")
2583
2623
 
        else {
2584
2624
 
            let result = upInfraCommon(true, i.caller, 0, landAssetId)
2585
2625
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2586
2626
 
            $Tuple2(((result._1 :+ prologAction) ++ updateDuckStatsInternal(duckAssetId, fraction(xpUpgradeInfra, result._3, MULT8))._1), result._2)
2587
2627
 
            }
2588
2628
 
    }
2589
2629
 
2590
2630
 
2591
2631
 
2592
2632
 
@Callable(i)
2593
2633
 
func activateArtifact (artName,landAssetIdOpt) = {
2594
2634
 
    let prologAction = prolog(i)
2595
2635
 
    if ((size(i.payments) != 0))
2596
2636
 
        then throw("No payments required")
2597
2637
 
        else {
2598
2638
 
            let addr = toString(i.caller)
2599
2639
 
            let result =             match artName {
2600
2640
 
                case _ => 
2601
2641
 
                    if (("PRESALE" == $match0))
2602
2642
 
                        then activatePresaleArt(addr, landAssetIdOpt)
2603
2643
 
                        else if (("ONBOARD" == $match0))
2604
2644
 
                            then activateOnboardArt(addr)
2605
2645
 
                            else throw("Unknown artifact")
2606
2646
 
            }
2607
2647
 
            (result :+ prologAction)
2608
2648
 
            }
2609
2649
 
    }
2610
2650
 
2611
2651
 
2612
2652
 
2613
2653
 
@Callable(i)
2614
2654
 
func mergeLands (landAssetIds) = {
2615
2655
 
    let prologAction = prolog(i)
2616
2656
 
    if ((size(i.payments) != 0))
2617
2657
 
        then throw("No payments required")
2618
2658
 
        else {
2619
2659
 
            let result = mergeCommon(toString(i.caller), landAssetIds)
2620
2660
 
            $Tuple2(((result._1 :+ prologAction) ++ updateAccStatsInternal(toString(i.caller), xpMerge)._1), result._2)
2621
2661
 
            }
2622
2662
 
    }
2623
2663
 
2624
2664
 
2625
2665
 
2626
2666
 
@Callable(i)
2627
2667
 
func cargoExchange (cargoListStr,landAssetId) = {
2628
2668
 
    let prologAction = prolog(i)
2629
2669
 
    if ((size(i.payments) != 0))
2630
2670
 
        then throw("No payments required")
2631
2671
 
        else {
2632
2672
 
            let cargoParts = split_4C(cargoListStr, ":")
2633
2673
 
            let addr = toString(i.originCaller)
2634
2674
 
            let asset = value(assetInfo(fromBase58String(landAssetId)))
2635
2675
 
            let timeKey = keyStakedTimeByAssetId(landAssetId)
2636
2676
 
            if (!(isDefined(getInteger(timeKey))))
2637
2677
 
                then throw((asset.name + " is not staked"))
2638
2678
 
                else {
2639
2679
 
                    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
2640
2680
 
                    if ((owner != addr))
2641
2681
 
                        then throw((LANDPREFIX + " is not yours"))
2642
2682
 
                        else {
2643
2683
 
                            let landIndex = (numPiecesBySize(split(asset.description, "_")[recLandSize]) / SSIZE)
2644
2684
 
                            let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2645
2685
 
                            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2646
2686
 
                            let curLocation = valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION)
2647
2687
 
                            let loc = split(value(curLocation), "_")
2648
2688
 
                            if ((loc[locIdxType] != "L"))
2649
2689
 
                                then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
2650
2690
 
                                else if ((loc[locIdxId] != landAssetId))
2651
2691
 
                                    then throw(("Duck should be on the land " + landAssetId))
2652
2692
 
                                    else {
2653
2693
 
                                        let whKey = keyWarehouseByLand(landAssetId)
2654
2694
 
                                        let currentWh = getWarehouse(whKey, landIndex, infraLevel)
2655
2695
 
                                        let bpKey = keyBackpackByDuck(duckAssetId)
2656
2696
 
                                        let currentPack = getBackpack(bpKey)
2657
2697
 
                                        let result = moveStuff(cargoParts, currentWh, currentPack)
2658
2698
 
                                        let loft = split(currentWh[whIdxLOFT], "_")
2659
2699
 
                                        let loftO = (parseIntValue(loft[volOccupied]) + result._7)
2660
2700
 
                                        let loftF = (parseIntValue(loft[volFree]) - result._7)
2661
2701
 
[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]
2662
2702
 
                                        }
2663
2703
 
                            }
2664
2704
 
                    }
2665
2705
 
            }
2666
2706
 
    }
2667
2707
 
2668
2708
 
2669
2709
 
2670
2710
 
@Callable(i)
2671
2711
 
func saveWarehouse (whStr,landAssetId) = if ((i.caller != economyContract))
2672
2712
 
    then throw("Access denied")
2673
2713
 
    else {
2674
2714
 
        let whKey = keyWarehouseByLand(landAssetId)
2675
2715
 
        let wh = split_4C(whStr, ":")
2676
2716
 
        if ((size(wh) != 5))
2677
2717
 
            then throw("warehouse string should contain 4 ':' separators")
2678
2718
 
            else {
2679
2719
 
                let loftL = split(wh[whIdxLOFT], "_")[volLocked]
2680
2720
 
                let loftO = getWarehouseOccupiedVol(wh)
2681
2721
 
                let loftT = getWarehouseTotalVolume(wh[whIdxLevels])
2682
2722
 
                let loftF = ((loftT - parseIntValue(loftL)) - loftO)
2683
2723
 
                let newWhStr = makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], wh[whIdxProd], makeString([loftL, toString(loftO), toString(loftF), toString(loftT)], "_")], ":")
2684
2724
 
                $Tuple2([StringEntry(whKey, newWhStr)], newWhStr)
2685
2725
 
                }
2686
2726
 
        }
2687
2727
 
2688
2728
 
2689
2729
 
2690
2730
 
@Callable(i)
2691
2731
 
func fixWarehouseFormat (landAssetId) = if ((i.caller != restContract))
2692
2732
 
    then throw("Access denied")
2693
2733
 
    else {
2694
2734
 
        let whKey = keyWarehouseByLand(landAssetId)
2695
2735
 
        let asset = value(assetInfo(fromBase58String(landAssetId)))
2696
2736
 
        let landIndex = (numPiecesBySize(split(asset.description, "_")[recLandSize]) / SSIZE)
2697
2737
 
        let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2698
2738
 
        let wh = getWarehouse(whKey, landIndex, infraLevel)
2699
2739
 
        let loftL = asInt(invoke(economyContract, "recalcLockedVolumeREADONLY", [landAssetId, wh], nil))
2700
2740
 
        let loftO = getWarehouseOccupiedVol(wh)
2701
2741
 
        let loftT = getWarehouseTotalVolume(wh[whIdxLevels])
2702
2742
 
        let loftF = ((loftT - loftL) - loftO)
2703
2743
 
        let newWhStr = makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], wh[whIdxProd], makeString([toString(loftL), toString(loftO), toString(loftF), toString(loftT)], "_")], ":")
2704
2744
 
        $Tuple2([StringEntry(whKey, newWhStr)], newWhStr)
2705
2745
 
        }
2706
2746
 
2707
2747
 
2708
2748
 
2709
2749
 
@Callable(i)
2710
2750
 
func fixContinentProportions (landAssetIds) = if ((i.caller != restContract))
2711
2751
 
    then throw("Access denied")
2712
2752
 
    else {
2713
2753
 
        func getProps (acc,cont) =         (acc :+ valueOrElse(getString(keyResTypesByContinent(cont)), "0_0_0_0_0_0"))
2714
2754
 
2715
2755
 
        let p = {
2716
2756
 
            let $l = continents
2717
2757
 
            let $s = size($l)
2718
2758
 
            let $acc0 = nil
2719
2759
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
2720
2760
 
                then $a
2721
2761
 
                else getProps($a, $l[$i])
2722
2762
 
2723
2763
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
2724
2764
 
                then $a
2725
2765
 
                else throw("List size exceeds 5")
2726
2766
 
2727
2767
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
2728
2768
 
            }
2729
2769
 
        func processor (acc,landAssetId) =         {
2730
2770
 
            let asset = value(assetInfo(fromBase58String(landAssetId)))
2731
2771
 
            let d = split(asset.description, "_")
2732
2772
 
            let landIndex = (numPiecesBySize(d[recLandSize]) / SSIZE)
2733
2773
 
            let cont = d[recContinent]
2734
2774
 
            let terrainCounts = countTerrains(d[recTerrains])
2735
2775
 
            let continentIdx = value(indexOf(continents, cont))
2736
2776
 
            let contProps = split(acc[continentIdx], "_")
2737
2777
 
            let updated = makeString(updateProportionsInternal(contProps, terrainCounts, landIndex, 1), "_")
2738
2778
 
            match cont {
2739
2779
 
                case _ => 
2740
2780
 
                    if (("Americas" == $match0))
2741
2781
 
                        then [updated, acc[1], acc[2], acc[3], acc[4]]
2742
2782
 
                        else if (("Europe" == $match0))
2743
2783
 
                            then [acc[0], updated, acc[2], acc[3], acc[4]]
2744
2784
 
                            else if (("Asia" == $match0))
2745
2785
 
                                then [acc[0], acc[1], updated, acc[3], acc[4]]
2746
2786
 
                                else if (("Africa" == $match0))
2747
2787
 
                                    then [acc[0], acc[1], acc[2], updated, acc[4]]
2748
2788
 
                                    else if (("Oceania" == $match0))
2749
2789
 
                                        then [acc[0], acc[1], acc[2], acc[3], updated]
2750
2790
 
                                        else throw("wrong continent")
2751
2791
 
            }
2752
2792
 
            }
2753
2793
 
2754
2794
 
        let r = {
2755
2795
 
            let $l = landAssetIds
2756
2796
 
            let $s = size($l)
2757
2797
 
            let $acc0 = p
2758
2798
 
            func $f1_1 ($a,$i) =             if (($i >= $s))
2759
2799
 
                then $a
2760
2800
 
                else processor($a, $l[$i])
2761
2801
 
2762
2802
 
            func $f1_2 ($a,$i) =             if (($i >= $s))
2763
2803
 
                then $a
2764
2804
 
                else throw("List size exceeds 100")
2765
2805
 
2766
2806
 
            $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)
2767
2807
 
            }
2768
2808
 
        $Tuple2([StringEntry(keyResTypesByContinent("Americas"), r[0]), StringEntry(keyResTypesByContinent("Europe"), r[1]), StringEntry(keyResTypesByContinent("Asia"), r[2]), StringEntry(keyResTypesByContinent("Africa"), r[3]), StringEntry(keyResTypesByContinent("Oceania"), r[4])], 0)
2769
2809
 
        }
2770
2810
 
2771
2811
 
2772
2812
 
2773
2813
 
@Callable(i)
2774
2814
 
func fixStakedPieces (address) = if ((i.caller != restContract))
2775
2815
 
    then throw("Access denied")
2776
2816
 
    else {
2777
2817
 
        let stakedPieces = if ((address == ""))
2778
2818
 
            then 0
2779
2819
 
            else {
2780
2820
 
                let landsStr = getString(stakingContract, keyStakedLandsByOwner(address))
2781
2821
 
                let lands = if (isDefined(landsStr))
2782
2822
 
                    then split_51C(value(landsStr), "_")
2783
2823
 
                    else nil
2784
2824
 
                func oneLand (acc,landAssetId) =                 {
2785
2825
 
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
2786
2826
 
                    let landSize = split(asset.description, "_")[recLandSize]
2787
2827
 
                    (acc + numPiecesBySize(landSize))
2788
2828
 
                    }
2789
2829
 
2790
2830
 
                let $l = lands
2791
2831
 
                let $s = size($l)
2792
2832
 
                let $acc0 = 0
2793
2833
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
2794
2834
 
                    then $a
2795
2835
 
                    else oneLand($a, $l[$i])
2796
2836
 
2797
2837
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
2798
2838
 
                    then $a
2799
2839
 
                    else throw("List size exceeds 100")
2800
2840
 
2801
2841
 
                $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)
2802
2842
 
                }
2803
2843
 
        $Tuple2([IntegerEntry(keyStakedPiecesByOwner(address), stakedPieces)], stakedPieces)
2804
2844
 
        }
2805
2845
 
2806
2846
 
2807
2847
 
2808
2848
 
@Callable(i)
2809
2849
 
func setCustomName (assetId,customName,type) = {
2810
2850
 
    let prologAction = prolog(i)
2811
2851
 
    if ((size(i.payments) != 1))
2812
2852
 
        then throw("Exactly one payment required")
2813
2853
 
        else {
2814
2854
 
            let pmt = value(i.payments[0])
2815
2855
 
            if ((pmt.assetId != usdtAssetId))
2816
2856
 
                then throw("Allowed USDT payment only!")
2817
2857
 
                else if ((pmt.amount != RENAMINGCOST))
2818
2858
 
                    then throw(("Payment should be " + toString(RENAMINGCOST)))
2819
2859
 
                    else if (contains(customName, "__"))
2820
2860
 
                        then throw(("Name should not contain '__': " + customName))
2821
2861
 
                        else if ((size(customName) > MAXNAMELEN))
2822
2862
 
                            then throw(("Name too long, maxLength=" + toString(MAXNAMELEN)))
2823
2863
 
                            else {
2824
2864
 
                                let addr = toString(i.originCaller)
2825
2865
 
                                let actions =                                 match type {
2826
2866
 
                                    case _ => 
2827
2867
 
                                        if (("ACCOUNT" == $match0))
2828
2868
 
                                            then {
2829
2869
 
                                                let reverseKey = keyCustomNameToAddress(customName)
2830
2870
 
                                                let nameOwner = getString(reverseKey)
2831
2871
 
                                                if (isDefined(nameOwner))
2832
2872
 
                                                    then throw(("Name already registered: " + customName))
2833
2873
 
                                                    else {
2834
2874
 
                                                        let addrToNameKey = keyAddressToCustomName(addr)
2835
2875
 
                                                        let oldName = getString(addrToNameKey)
2836
2876
 
                                                        let freeOld = if (isDefined(oldName))
2837
2877
 
                                                            then [DeleteEntry(keyCustomNameToAddress(value(oldName)))]
2838
2878
 
                                                            else nil
2839
2879
 
                                                        (((freeOld :+ StringEntry(addrToNameKey, customName)) :+ StringEntry(reverseKey, addr)) ++ updateAccStatsInternal(addr, xpCustomName)._1)
2840
2880
 
                                                        }
2841
2881
 
                                                }
2842
2882
 
                                            else if (("LAND" == $match0))
2843
2883
 
                                                then {
2844
2884
 
                                                    let asset = value(assetInfo(fromBase58String(assetId)))
2845
2885
 
                                                    let timeKey = keyStakedTimeByAssetId(assetId)
2846
2886
 
                                                    if (!(isDefined(getInteger(timeKey))))
2847
2887
 
                                                        then throw((asset.name + " is not staked"))
2848
2888
 
                                                        else {
2849
2889
 
                                                            let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(assetId)), (("NFT " + asset.name) + " is orphaned"))
2850
2890
 
                                                            if ((owner != addr))
2851
2891
 
                                                                then throw((LANDPREFIX + " is not yours"))
2852
2892
 
                                                                else {
2853
2893
 
                                                                    let reverseKey = keyLandCustomNameToAssetId(customName)
2854
2894
 
                                                                    let nameOwner = getString(reverseKey)
2855
2895
 
                                                                    if (isDefined(nameOwner))
2856
2896
 
                                                                        then throw(("Name already registered: " + customName))
2857
2897
 
                                                                        else {
2858
2898
 
                                                                            let assetToNameKey = keyLandAssetIdToCustomName(assetId)
2859
2899
 
                                                                            let oldName = getString(assetToNameKey)
2860
2900
 
                                                                            let freeOld = if (isDefined(oldName))
2861
2901
 
                                                                                then [DeleteEntry(keyLandCustomNameToAssetId(value(oldName)))]
2862
2902
 
                                                                                else nil
2863
2903
 
                                                                            (((freeOld :+ StringEntry(assetToNameKey, customName)) :+ StringEntry(reverseKey, assetId)) ++ updateAccStatsInternal(addr, xpCustomName)._1)
2864
2904
 
                                                                            }
2865
2905
 
                                                                    }
2866
2906
 
                                                            }
2867
2907
 
                                                    }
2868
2908
 
                                                else if (("DUCK" == $match0))
2869
2909
 
                                                    then {
2870
2910
 
                                                        let asset = value(assetInfo(fromBase58String(assetId)))
2871
2911
 
                                                        let timeKey = keyStakedTimeByAssetId(assetId)
2872
2912
 
                                                        if (if (!(isDefined(getInteger(timeKey))))
2873
2913
 
                                                            then true
2874
2914
 
                                                            else !(isDefined(getString(keyStakedDuckByOwner(addr)))))
2875
2915
 
                                                            then throw((asset.name + " is not staked"))
2876
2916
 
                                                            else {
2877
2917
 
                                                                let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(assetId)), (("NFT " + asset.name) + " is orphaned"))
2878
2918
 
                                                                if ((owner != addr))
2879
2919
 
                                                                    then throw((DUCKPREFIX + " is not yours"))
2880
2920
 
                                                                    else {
2881
2921
 
                                                                        let reverseKey = keyDuckCustomNameToAssetId(customName)
2882
2922
 
                                                                        let nameOwner = getString(reverseKey)
2883
2923
 
                                                                        if (isDefined(nameOwner))
2884
2924
 
                                                                            then throw(("Name already registered: " + customName))
2885
2925
 
                                                                            else {
2886
2926
 
                                                                                let assetToNameKey = keyDuckAssetIdToCustomName(assetId)
2887
2927
 
                                                                                let oldName = getString(assetToNameKey)
2888
2928
 
                                                                                let freeOld = if (isDefined(oldName))
2889
2929
 
                                                                                    then [DeleteEntry(keyDuckCustomNameToAssetId(value(oldName)))]
2890
2930
 
                                                                                    else nil
2891
2931
 
                                                                                (((freeOld :+ StringEntry(assetToNameKey, customName)) :+ StringEntry(reverseKey, assetId)) ++ updateDuckStatsInternal(assetId, xpCustomName)._1)
2892
2932
 
                                                                                }
2893
2933
 
                                                                        }
2894
2934
 
                                                                }
2895
2935
 
                                                        }
2896
2936
 
                                                    else throw("Unknown entity type")
2897
2937
 
                                }
2898
2938
 
                                $Tuple2(((actions :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) :+ prologAction), 0)
2899
2939
 
                                }
2900
2940
 
            }
2901
2941
 
    }
2902
2942
 
2903
2943
 
2904
2944
 
2905
2945
 
@Callable(i)
2906
2946
 
func setReferrals (oldPlayer,newPlayer) = if ((i.callerPublicKey != pub))
2907
2947
 
    then throw("Permission denied")
2908
2948
 
    else {
2909
2949
 
        let prologAction = prolog(i)
2910
2950
 
        if ((size(i.payments) != 0))
2911
2951
 
            then throw("No payments required")
2912
2952
 
            else if (!(isDefined(addressFromString(oldPlayer))))
2913
2953
 
                then throw(("Invalid address: " + oldPlayer))
2914
2954
 
                else if (!(isDefined(addressFromString(newPlayer))))
2915
2955
 
                    then throw(("Invalid address: " + newPlayer))
2916
2956
 
                    else {
2917
2957
 
                        let oldsKey = keyOldies()
2918
2958
 
                        let olds = getString(oldsKey)
2919
2959
 
                        let oldies = if (isDefined(olds))
2920
2960
 
                            then split_4C(value(olds), "_")
2921
2961
 
                            else nil
2922
2962
 
                        if (containsElement(oldies, newPlayer))
2923
2963
 
                            then throw((newPlayer + " is not newbie (already has referrals)"))
2924
2964
 
                            else {
2925
2965
 
                                let refByKey = keyAddressRefBy(newPlayer)
2926
2966
 
                                let refBy = getString(refByKey)
2927
2967
 
                                if (if (isDefined(refBy))
2928
2968
 
                                    then isDefined(addressFromString(value(refBy)))
2929
2969
 
                                    else false)
2930
2970
 
                                    then throw(((newPlayer + " already has refBy: ") + value(refBy)))
2931
2971
 
                                    else {
2932
2972
 
                                        let refsKey = keyAddressReferrals(oldPlayer)
2933
2973
 
                                        let refs = getString(refsKey)
2934
2974
 
                                        let refsArray = if (isDefined(refs))
2935
2975
 
                                            then split_4C(value(refs), "_")
2936
2976
 
                                            else nil
2937
2977
 
                                        if (containsElement(refsArray, newPlayer))
2938
2978
 
                                            then throw((((oldPlayer + " already contains ") + newPlayer) + " within referrals"))
2939
2979
 
                                            else {
2940
2980
 
                                                let newRefs = makeString_2C((refsArray :+ newPlayer), "_")
2941
2981
 
                                                let newOlds = if (containsElement(oldies, oldPlayer))
2942
2982
 
                                                    then value(olds)
2943
2983
 
                                                    else makeString_2C((oldies :+ oldPlayer), "_")
2944
2984
 
                                                $Tuple2([StringEntry(refByKey, oldPlayer), StringEntry(refsKey, newRefs), StringEntry(oldsKey, newOlds), prologAction], 0)
2945
2985
 
                                                }
2946
2986
 
                                        }
2947
2987
 
                                }
2948
2988
 
                        }
2949
2989
 
        }
2950
2990
 
2951
2991
 
2952
2992
 
2953
2993
 
@Callable(i)
2954
2994
 
func distributePoints (strength,accuracy,intellect,endurance,dexterity) = {
2955
2995
 
    let prologAction = prolog(i)
2956
2996
 
    if ((size(i.payments) != 0))
2957
2997
 
        then throw("No payments required")
2958
2998
 
        else {
2959
2999
 
            let addr = toString(i.originCaller)
2960
3000
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2961
3001
 
            let freeKeyAcc = keyUserFreePoints(addr)
2962
3002
 
            let freePointsAcc = valueOrElse(getInteger(stakingContract, freeKeyAcc), 0)
2963
3003
 
            let freeKeyDuck = keyDuckFreePoints(duckAssetId)
2964
3004
 
            let freePointsDuck = valueOrElse(getInteger(stakingContract, freeKeyDuck), 0)
2965
3005
 
            let sumFree = (freePointsAcc + freePointsDuck)
2966
3006
 
            let sumToDistribute = ((((strength + accuracy) + intellect) + endurance) + dexterity)
2967
3007
 
            if ((sumToDistribute > sumFree))
2968
3008
 
                then throw((("There are only " + toString(sumFree)) + " free points to distribute"))
2969
3009
 
                else {
2970
3010
 
                    let charsKey = keyDuckChars(duckAssetId)
2971
3011
 
                    let chars = split(valueOrElse(getString(stakingContract, charsKey), "0_0_0_0_0"), "_")
2972
3012
 
                    let newAcc = (freePointsAcc - sumToDistribute)
2973
3013
 
                    $Tuple2([IntegerEntry(freeKeyAcc, if ((0 > newAcc))
2974
3014
 
                        then 0
2975
3015
 
                        else newAcc), IntegerEntry(freeKeyDuck, if ((0 > newAcc))
2976
3016
 
                        then (freePointsDuck + newAcc)
2977
3017
 
                        else freePointsDuck), StringEntry(charsKey, makeString([toString((parseIntValue(chars[charStrength]) + strength)), toString((parseIntValue(chars[charAccuracy]) + accuracy)), toString((parseIntValue(chars[charIntellect]) + intellect)), toString((parseIntValue(chars[charEndurance]) + endurance)), toString((parseIntValue(chars[charDexterity]) + dexterity))], "_")), prologAction], 0)
2978
3018
 
                    }
2979
3019
 
            }
2980
3020
 
    }
2981
3021
 
2982
3022
 
2983
3023
 
2984
3024
 
@Callable(i)
2985
3025
 
func splitByGlobalWeightsREADONLY (amount) = $Tuple2(nil, getNeededMaterials(amount))
2986
3026
 
2987
3027
 
2988
3028
 
2989
3029
 
@Callable(i)
2990
3030
 
func splitByGlobalAndLocalWeightsREADONLY (matAmount,resAmount,terrains) = {
2991
3031
 
    let terrainCounts = countTerrains(terrains)
2992
3032
 
    $Tuple2(nil, $Tuple2(getNeededMaterials(matAmount), distributeByWeights(resAmount, terrainCounts)))
2993
3033
 
    }
2994
3034
 
2995
3035
 
2996
3036
 
2997
3037
 
@Callable(i)
2998
3038
 
func getBackpackREADONLY (duckAssetId) = $Tuple2(nil, makeString(getBackpack(keyBackpackByDuck(duckAssetId)), ":"))
2999
3039
 
3000
3040
 
3001
3041
 
3002
3042
 
@Callable(i)
3003
3043
 
func getWarehouseREADONLY (landAssetId) = {
3004
3044
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
3005
3045
 
    let landIndex = (numPiecesBySize(split(asset.description, "_")[recLandSize]) / SSIZE)
3006
3046
 
    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
3007
3047
 
    $Tuple2(nil, makeString_2C(getWarehouse(keyWarehouseByLand(landAssetId), landIndex, infraLevel), ":"))
3008
3048
 
    }
3009
3049
 
3010
3050
 
3011
3051
 
3012
3052
 
@Callable(i)
3013
3053
 
func saveLastTx () = {
3014
3054
 
    let caller = i.caller
3015
3055
 
    if (!(containsElement([wlgContract, economyContract, tournamentContract, acresContract], caller)))
3016
3056
 
        then throw("Access denied")
3017
3057
 
        else $Tuple2([prolog(i)], 42)
3018
3058
 
    }
3019
3059
 
3020
3060
 
3021
3061
 
3022
3062
 
@Callable(i)
3023
3063
 
func updateDuckStats (duckAssetId,deltaXP) = if ((i.caller != economyContract))
3024
3064
 
    then throw("Access denied")
3025
3065
 
    else updateDuckStatsInternal(duckAssetId, deltaXP)
3026
3066
 
3027
3067
 
3028
3068
 
3029
3069
 
@Callable(i)
3030
3070
 
func updateAccStats (addr,deltaXP) = if ((i.caller != economyContract))
3031
3071
 
    then throw("Access denied")
3032
3072
 
    else updateAccStatsInternal(addr, deltaXP)
3033
3073
 
3034
3074
 
3035
3075
 
3036
3076
 
@Callable(i)
3037
3077
 
func equipDuck (equipment) = {
3038
3078
 
    let prologAction = prolog(i)
3039
3079
 
    if ((size(i.payments) != 0))
3040
3080
 
        then throw("No payments required")
3041
3081
 
        else {
3042
3082
 
            let addr = toString(i.originCaller)
3043
3083
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
3044
3084
 
            if (checkTournament(duckAssetId))
3045
3085
 
                then throw("equipDuck_checkTournament")
3046
-
                else {
3047
-
                    let eqKey = keyDuckEquipment(duckAssetId)
3048
-
                    let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3049
-
                    let bpKey = keyBackpackByDuck(duckAssetId)
3050
-
                    let currentPack = getBackpack(bpKey)
3051
-
                    let newEq = split(equipment, "_")
3052
-
                    if ((size(newEq) != NUMSEGMENTS))
3053
-
                        then throw("Wrong equipment string")
3054
-
                        else {
3055
-
                            let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3056
-
                            let segBpAux = split(newEq[segBackpack], ";")[1]
3057
-
                            let buffEffect = if ((segBpAux == ""))
3058
-
                                then 0
3059
-
                                else {
3060
-
                                    let aux0 = split(segBpAux, ",")[0]
3061
-
                                    if ((aux0 == ""))
3062
-
                                        then 0
3063
-
                                        else {
3064
-
                                            let idxCnt = split(aux0, ":")
3065
-
                                            let idx = idxCnt[0]
3066
-
                                            let cnt = idxCnt[1]
3067
-
                                            if (if (if (if (if ((idx == "06"))
3068
-
                                                then true
3069
-
                                                else (idx == "07"))
3070
-
                                                then true
3071
-
                                                else (idx == "08"))
3072
-
                                                then (cnt != "")
3073
-
                                                else false)
3074
-
                                                then (parseIntValue(cnt) > 0)
3075
-
                                                else false)
3076
-
                                                then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3077
-
                                                else 0
3078
-
                                            }
3079
-
                                    }
3080
-
                            let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3081
-
                            let newProdB = dressB(newEq, tempProdB, false, stats)
3082
-
                            let newProdStr = bytesToProdStr(newProdB)
3083
-
                            $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProdStr], ":")), StringEntry(keyDuckBuffs(duckAssetId), makeString([toString(stats[7]), toString(stats[8]), toString(stats[9]), toString(stats[10]), toString(stats[11])], "_")), prologAction], 0)
3084
-
                            }
3085
-
                    }
3086
+
                else if (checkDelivery(duckAssetId))
3087
+
                    then throw("equipDuck_checkDelivery")
3088
+
                    else {
3089
+
                        let eqKey = keyDuckEquipment(duckAssetId)
3090
+
                        let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3091
+
                        let bpKey = keyBackpackByDuck(duckAssetId)
3092
+
                        let currentPack = getBackpack(bpKey)
3093
+
                        let newEq = split(equipment, "_")
3094
+
                        if ((size(newEq) != NUMSEGMENTS))
3095
+
                            then throw("Wrong equipment string")
3096
+
                            else {
3097
+
                                let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3098
+
                                let segBpAux = split(newEq[segBackpack], ";")[1]
3099
+
                                let buffEffect = if ((segBpAux == ""))
3100
+
                                    then 0
3101
+
                                    else {
3102
+
                                        let aux0 = split(segBpAux, ",")[0]
3103
+
                                        if ((aux0 == ""))
3104
+
                                            then 0
3105
+
                                            else {
3106
+
                                                let idxCnt = split(aux0, ":")
3107
+
                                                let idx = idxCnt[0]
3108
+
                                                let cnt = idxCnt[1]
3109
+
                                                if (if (if (if (if ((idx == "06"))
3110
+
                                                    then true
3111
+
                                                    else (idx == "07"))
3112
+
                                                    then true
3113
+
                                                    else (idx == "08"))
3114
+
                                                    then (cnt != "")
3115
+
                                                    else false)
3116
+
                                                    then (parseIntValue(cnt) > 0)
3117
+
                                                    else false)
3118
+
                                                    then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3119
+
                                                    else 0
3120
+
                                                }
3121
+
                                        }
3122
+
                                let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3123
+
                                let newProdB = dressB(newEq, tempProdB, false, stats)
3124
+
                                let newProdStr = bytesToProdStr(newProdB)
3125
+
                                $Tuple2([StringEntry(eqKey, equipment), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], newProdStr], ":")), StringEntry(keyDuckBuffs(duckAssetId), makeString([toString(stats[7]), toString(stats[8]), toString(stats[9]), toString(stats[10]), toString(stats[11])], "_")), prologAction], 0)
3126
+
                                }
3127
+
                        }
3086
3128
 
            }
3087
3129
 
    }
3088
3130
 
3089
3131
 
3090
3132
 
3091
3133
 
@Callable(i)
3092
3134
 
func fortificateLand (landAssetId,plan) = {
3093
3135
 
    let prologAction = prolog(i)
3094
3136
 
    if ((size(i.payments) != 0))
3095
3137
 
        then throw("No payments required")
3096
3138
 
        else {
3097
3139
 
            let addr = toString(i.originCaller)
3098
3140
 
            let duckAssetId = valueOrElse(getString(keyStakedDuckByOwner(addr)), "")
3099
3141
 
            let duckStats = getDuckStats(this, duckAssetId, 0, false)
3100
3142
 
            let fortKey = keyFortificationsByLand(landAssetId)
3101
3143
 
            let currentForts = split(valueOrElse(getString(fortKey), ":0_15:0_18:0"), "_")
3102
3144
 
            let asset = value(assetInfo(fromBase58String(landAssetId)))
3103
3145
 
            let landIndex = (numPiecesBySize(split(asset.description, "_")[recLandSize]) / SSIZE)
3104
3146
 
            let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
3105
3147
 
            let whKey = keyWarehouseByLand(landAssetId)
3106
3148
 
            let wh = getWarehouse(whKey, landIndex, infraLevel)
3107
3149
 
            let curLoft = split(wh[whIdxLOFT], "_")
3108
3150
 
            let curO = parseIntValue(curLoft[volOccupied])
3109
3151
 
            let curF = parseIntValue(curLoft[volFree])
3110
3152
 
            let newForts = split(plan, "_")
3111
-
            let $t09686796982 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3112
-
            let tempProdB = $t09686796982._1
3113
-
            let tempO = $t09686796982._2
3114
-
            let tempF = $t09686796982._3
3115
-
            let $t09698597081 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3116
-
            let newProdB = $t09698597081._1
3117
-
            let newO = $t09698597081._2
3118
-
            let newF = $t09698597081._3
3153
+
            let $t09799398108 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3154
+
            let tempProdB = $t09799398108._1
3155
+
            let tempO = $t09799398108._2
3156
+
            let tempF = $t09799398108._3
3157
+
            let $t09811198207 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3158
+
            let newProdB = $t09811198207._1
3159
+
            let newO = $t09811198207._2
3160
+
            let newF = $t09811198207._3
3119
3161
 
            let newProdStr = bytesToProdStr(newProdB)
3120
3162
 
            let newLoftStr = makeString([curLoft[volLocked], toString(newO), toString(newF), curLoft[volTotal]], "_")
3121
3163
 
            $Tuple2([StringEntry(fortKey, plan), StringEntry(whKey, makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], newProdStr, newLoftStr], ":")), prologAction], 0)
3122
3164
 
            }
3123
3165
 
    }
3124
3166
 
3125
3167
 
3126
3168
 
3127
3169
 
@Callable(i)
3128
3170
 
func initDuckTourAttempt (duckAssetId) = if ((i.caller != tournamentContract))
3129
3171
 
    then throw("Access denied")
3130
3172
 
    else {
3131
3173
 
        let prologAction = prolog(i)
3132
3174
 
        let keyHealth = keyDuckHealth(duckAssetId)
3133
3175
 
        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
3134
3176
 
        let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
3135
3177
 
        let curLocKey = keyDuckLocation(duckAssetId)
3136
3178
 
        let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3137
3179
 
        let lastId = valueOrElse(getInteger(tournamentContract, lastTourIdKey), 0)
3138
3180
 
        let tourLocation = (toString(lastId) + "_T_0")
3139
3181
 
        $Tuple2([prologAction, IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, tourLocation)], tourLocation)
3140
3182
 
        }
3141
3183
 
3142
3184
 
3143
3185
 
3144
3186
 
@Callable(i)
3145
3187
 
func breakAttempt () = {
3146
3188
 
    let prologAction = prolog(i)
3147
3189
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
3148
3190
 
    let curLocKey = keyDuckLocation(duckAssetId)
3149
3191
 
    let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3150
3192
 
    if ((split(curLocation, "_")[locIdxType] != "T"))
3151
3193
 
        then throw("Your duck is not in the tournament")
3152
3194
 
        else {
3153
3195
 
            let savedHealth = getIntegerValue(keySavedHealth(duckAssetId))
3154
3196
 
            let savedLocation = getStringValue(keySavedLocation(duckAssetId))
3155
3197
 
            $Tuple2([prologAction, IntegerEntry(keyDuckHealth(duckAssetId), savedHealth), StringEntry(curLocKey, savedLocation)], curLocation)
3156
3198
 
            }
3157
3199
 
    }
3158
3200
 
3159
3201
 
3160
3202
 
3161
3203
 
@Callable(i)
3162
3204
 
func exitTournamentInternal (duckAssetId) = if ((i.caller != this))
3163
3205
 
    then throw("Access denied")
3164
3206
 
    else {
3165
3207
 
        let savedHealth = getIntegerValue(keySavedHealth(duckAssetId))
3166
3208
 
        let savedLocation = getStringValue(keySavedLocation(duckAssetId))
3167
3209
 
        $Tuple2([IntegerEntry(keyDuckHealth(duckAssetId), savedHealth), StringEntry(keyDuckLocation(duckAssetId), savedLocation)], false)
3210
+
        }
3211
+
3212
+
3213
+
3214
+
@Callable(i)
3215
+
func exitDeliveryInternal (duckAssetId) = if ((i.caller != this))
3216
+
    then throw("Access denied")
3217
+
    else {
3218
+
        let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
3219
+
        let now = lastBlock.timestamp
3220
+
        let startTime = parseIntValue(curLocation[locIdxContinent])
3221
+
        let distance = parseIntValue(curLocation[locIdxId])
3222
+
        let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(duckAssetId)), "NFT duck is orphaned")
3223
+
        let healthKey = keyDuckHealth(duckAssetId)
3224
+
        let curHealth = getIntegerValue(healthKey)
3225
+
        let outcomeActions = if ((distance >= 3))
3226
+
            then {
3227
+
                let reward = invoke(economyContract, "sendDeliveryReward", [owner], nil)
3228
+
                if ((reward == reward))
3229
+
                    then nil
3230
+
                    else throw("Strict value is not equal to itself.")
3231
+
                }
3232
+
            else {
3233
+
                let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
3234
+
                let unlock = invoke(economyContract, "updateDeliveryLocked", [(lockedTotal - MIN_USDT_FEE_DELIVERY)], nil)
3235
+
                if ((unlock == unlock))
3236
+
                    then if ((0 >= curHealth))
3237
+
                        then nil
3238
+
                        else [IntegerEntry(keyDeliveryDelayByDuck(duckAssetId), (startTime + DAYMILLIS))]
3239
+
                    else throw("Strict value is not equal to itself.")
3240
+
                }
3241
+
        let savedHealth = getIntegerValue(keySavedHealth(duckAssetId))
3242
+
        let savedLocation = getStringValue(keySavedLocation(duckAssetId))
3243
+
        $Tuple2(((outcomeActions :+ IntegerEntry(healthKey, savedHealth)) :+ StringEntry(keyDuckLocation(duckAssetId), savedLocation)), false)
3168
3244
 
        }
3169
3245
 
3170
3246
 
3171
3247
 
3172
3248
 
@Callable(i)
3173
3249
 
func prepareRobbery (message,sig) = {
3174
3250
 
    let prologAction = prolog(i)
3175
3251
 
    if (!(sigVerify_8Kb(message, sig, pub)))
3176
3252
 
        then throw("signature does not match")
3177
3253
 
        else if ((size(i.payments) != 1))
3178
3254
 
            then throw("exactly 1 payment must be attached")
3179
3255
 
            else {
3180
3256
 
                let pmt = i.payments[0]
3181
3257
 
                let wlgAmt = pmt.amount
3182
3258
 
                if (if (!(isDefined(pmt.assetId)))
3183
3259
 
                    then true
3184
3260
 
                    else (value(pmt.assetId) != wlgAssetId))
3185
3261
 
                    then throw("WLGOLD payments only!")
3186
3262
 
                    else {
3187
3263
 
                        let parts = split(toUtf8String(message), "|")
3188
3264
 
                        if ((size(parts) != 2))
3189
3265
 
                            then throw("Wrong message format")
3190
3266
 
                            else {
3191
3267
 
                                let duckAssetId = parts[0]
3192
3268
 
                                let robCost = getRobberyData(this, duckAssetId)._1
3193
3269
 
                                if ((robCost > wlgAmt))
3194
3270
 
                                    then throw(((("Payment " + toString(wlgAmt)) + " < required ") + toString(robCost)))
3195
3271
 
                                    else {
3196
3272
 
                                        let candidates = split(parts[1], "_")
3197
3273
 
                                        let now = lastBlock.timestamp
3198
3274
 
                                        let duckState = valueOrElse(getInteger(keyDuckRobberyState(duckAssetId)), 0)
3199
3275
 
                                        let lockedLand = valueOrElse(getString(keyLockedLandByDuck(duckAssetId)), "")
3200
3276
 
                                        let landETA = valueOrElse(getInteger(keyLandCooldownETA(lockedLand)), 0)
3201
3277
 
                                        if (if ((duckState != duckIdxFree))
3202
3278
 
                                            then (landETA > now)
3203
3279
 
                                            else false)
3204
3280
 
                                            then throw(("You already started robbing, wait till " + toString(landETA)))
3205
3281
 
                                            else {
3206
3282
 
                                                func checker (acc,landAssetId) =                                                 {
3207
3283
 
                                                    let state = valueOrElse(getInteger(keyLandRobberyState(landAssetId)), 0)
3208
3284
 
                                                    let cooldownETA = valueOrElse(getInteger(keyLandCooldownETA(landAssetId)), 0)
3209
3285
 
                                                    if ((state > size(landRobCooldowns)))
3210
3286
 
                                                        then throw("Invalid state")
3211
3287
 
                                                        else if ((now > cooldownETA))
3212
3288
 
                                                            then {
3213
3289
 
                                                                let stakedTime = valueOrElse(getInteger(keyStakedTimeByAssetId(landAssetId)), 0)
3214
3290
 
                                                                if ((0 >= stakedTime))
3215
3291
 
                                                                    then acc
3216
3292
 
                                                                    else {
3217
3293
 
                                                                        let a = value(assetInfo(fromBase58String(landAssetId)))
3218
3294
 
                                                                        let d = split(a.description, "_")
3219
3295
 
                                                                        let pieces = numPiecesBySize(d[recLandSize])
3220
3296
 
                                                                        let productivity = applyBonuses(landAssetId, pieces)
3221
3297
 
                                                                        let deltaTime = (now - stakedTime)
3222
3298
 
                                                                        let availRes = fraction(deltaTime, (productivity * pieces), DAYMILLIS)
3223
3299
 
                                                                        if ((MIN_RES_TO_ROB > availRes))
3224
3300
 
                                                                            then acc
3225
3301
 
                                                                            else (acc :+ landAssetId)
3226
3302
 
                                                                        }
3227
3303
 
                                                                }
3228
3304
 
                                                            else acc
3229
3305
 
                                                    }
3230
3306
 
3231
3307
 
                                                let filtered = {
3232
3308
 
                                                    let $l = candidates
3233
3309
 
                                                    let $s = size($l)
3234
3310
 
                                                    let $acc0 = nil
3235
3311
 
                                                    func $f0_1 ($a,$i) =                                                     if (($i >= $s))
3236
3312
 
                                                        then $a
3237
3313
 
                                                        else checker($a, $l[$i])
3238
3314
 
3239
3315
 
                                                    func $f0_2 ($a,$i) =                                                     if (($i >= $s))
3240
3316
 
                                                        then $a
3241
3317
 
                                                        else throw("List size exceeds 10")
3242
3318
 
3243
3319
 
                                                    $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)
3244
3320
 
                                                    }
3245
3321
 
                                                if ((size(filtered) == 0))
3246
3322
 
                                                    then throw("No candidates for robbery")
3247
3323
 
                                                    else {
3248
3324
 
                                                        let rndIdx = getRandomNumber(size(filtered), height, (sig + i.transactionId))
3249
3325
 
                                                        let landAssetId = filtered[rndIdx]
3250
3326
 
                                                        $Tuple2([IntegerEntry(keyLandRobberyState(landAssetId), robIdxLocked), IntegerEntry(keyLandCooldownETA(landAssetId), (now + landRobCooldowns[robIdxLocked])), IntegerEntry(keyDuckRobberyState(duckAssetId), duckIdxPreparing), StringEntry(keyLockedLandByDuck(duckAssetId), landAssetId), prologAction], landAssetId)
3251
3327
 
                                                        }
3252
3328
 
                                                }
3253
3329
 
                                        }
3254
3330
 
                                }
3255
3331
 
                        }
3256
3332
 
                }
3257
3333
 
    }
3258
3334
 
3259
3335
 
3260
3336
 
3261
3337
 
@Callable(i)
3262
3338
 
func robLand (message,sig) = {
3263
3339
 
    let prologAction = prolog(i)
3264
3340
 
    if (!(sigVerify_8Kb(message, sig, pub)))
3265
3341
 
        then throw("signature does not match")
3266
3342
 
        else {
3267
3343
 
            let userAddr = toString(i.caller)
3268
3344
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
3269
3345
 
            let now = lastBlock.timestamp
3270
3346
 
            $Tuple2([prologAction, IntegerEntry(keyLastRobberyTimeByDuck(duckAssetId), now)], 0)
3271
3347
 
            }
3272
3348
 
    }
3273
3349
 
3274
3350
 
3275
3351
 
3276
3352
 
@Callable(i)
3277
3353
 
func acceptDelivery () = if (!(KS_ALLOW_DELIVERY))
3278
3354
 
    then throw("Delivery feature is turned off!")
3279
3355
 
    else {
3280
3356
 
        let prologAction = prolog(i)
3281
3357
 
        let userAddr = toString(i.caller)
3282
3358
 
        let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
3283
3359
 
        let fundTotal = valueOrElse(getInteger(economyContract, deliveryFundKey), 0)
3284
-
        if ((MIN_USDT_FEE_DELIVERY > fundTotal))
3285
-
            then throw(("Delivery is not available, fund=" + toString(fundTotal)))
3360
+
        let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
3361
+
        if ((MIN_USDT_FEE_DELIVERY > (fundTotal - lockedTotal)))
3362
+
            then throw(((("Delivery is not available, fund=" + fixedPoint(fundTotal, 6)) + ", locked=") + fixedPoint(lockedTotal, 6)))
3286
3363
 
            else {
3287
-
                let keyHealth = keyDuckHealth(duckAssetId)
3288
-
                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
3289
-
                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
3290
-
                let curLocKey = keyDuckLocation(duckAssetId)
3291
-
                let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3292
3364
 
                let now = lastBlock.timestamp
3293
-
                let deliveryLocation = (toString(now) + "_D_0")
3294
-
                $Tuple2([prologAction, IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, deliveryLocation)], deliveryLocation)
3365
+
                let delayETA = valueOrElse(getInteger(keyDeliveryDelayByDuck(duckAssetId)), 0)
3366
+
                if ((delayETA > now))
3367
+
                    then throw(("Delivery is forbidden for your duck until " + toString(delayETA)))
3368
+
                    else if (checkTournament(duckAssetId))
3369
+
                        then throw("acceptDelivery_checkTournament")
3370
+
                        else if (checkDelivery(duckAssetId))
3371
+
                            then throw("acceptDelivery_checkDelivery")
3372
+
                            else {
3373
+
                                let newLockedTotal = asInt(invoke(economyContract, "updateDeliveryLocked", [(lockedTotal + MIN_USDT_FEE_DELIVERY)], nil))
3374
+
                                let keyHealth = keyDuckHealth(duckAssetId)
3375
+
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
3376
+
                                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
3377
+
                                let curLocKey = keyDuckLocation(duckAssetId)
3378
+
                                let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3379
+
                                let deliveryLocation = (toString(now) + "_D_0")
3380
+
                                $Tuple2([prologAction, IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, deliveryLocation)], $Tuple2(deliveryLocation, newLockedTotal))
3381
+
                                }
3295
3382
 
                }
3296
3383
 
        }
3297
3384
 
3298
3385