tx · YvQJrPYtMyFqBjPKuqW5JZoANeDdTNmshLh4BUZwabG

3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1:  -0.10600000 Waves

2023.10.04 19:11 [3849937] smart account 3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "YvQJrPYtMyFqBjPKuqW5JZoANeDdTNmshLh4BUZwabG",
    "fee": 10600000,
    "feeAssetId": null,
    "timestamp": 1696435873428,
    "version": 2,
    "chainId": 87,
    "sender": "3PLncXtS1U83D6cQbFD3H8rBHPLgzxSFKZ1",
    "senderPublicKey": "BtDpFhgHQKHFVqYTMLReuZzqy94CRPSRkrYcSEVyjt4q",
    "proofs": [
        "qrmKiHXRBqnWHP2fVsauYCHDMznwxEuF1Zqr6vTgM2cZ4yJJ96WSmxRyqmZT5HhySmYNeNenuekNhDXf5d5Aned"
    ],
    "script": "base64:BgLhAQgCEgMKAQgSBAoCCAESAwoBBBIAEgMKAQgSABIDCgEIEgQKAgEIEgQKAgEIEgQKAgICEgUKAwEBARIAEgQKAggIEgASABIECgICAhIAEgMKAQgSBAoCCAgSAwoBGBIECgIICBIECgIICBIDCgEIEgMKARgSAwoBCBIFCgMICAgSBAoCCAgSBwoFAQEBAQESAwoBARIFCgMBAQgSAwoBCBIDCgEIEgASBAoCCAESBAoCCAESAwoBCBIECgIICBIDCgEIEgASAwoBCBIDCgEIEgMKAQgSBAoCAgISBAoCAgISAJoCAAlEQVlNSUxMSVMAgLiZKQEUa2V5TGFzdEFyYlRpbWVCeVVzZXIBBGFkZHIJAKwCAgIQbGFzdEFyYlRpbWVVc2VyXwUEYWRkcgAGU0NBTEU4AIDC1y8ADHhwTGV2ZWxTY2FsZQCAGQAPeHBMZXZlbFJlY2lwUG93AKAfABJudW1Qb2ludHNPbkxldmVsVXAAAwAOcm9iYmVyeUNvc3RNaW4AgMLXLwAUcm9iYmVyeUNvb2xkb3duQ29lZmYAkAMADHJlcXVpcmVtZW50cwkAzAgCAghTdHJlbmd0aAkAzAgCAghBY2N1cmFjeQkAzAgCAglJbnRlbGxlY3QJAMwIAgIJRW5kdXJhbmNlCQDMCAICCURleHRlcml0eQkAzAgCAgVMZXZlbAkAzAgCAgZIZWFsdGgFA25pbAAMY2hhclN0cmVuZ3RoAAAADGNoYXJBY2N1cmFjeQABAA1jaGFySW50ZWxsZWN0AAIADWNoYXJFbmR1cmFuY2UAAwANY2hhckRleHRlcml0eQAEAAtzZWdCYWNrcGFjawAAAAtOVU1TRUdNRU5UUwAGAApOVU1NQUlOQVVYAAIACE1BWFNMT1RTAAIADU1BWFBST0RJTlNMT1QAHgAQbGFuZFJvYkNvb2xkb3ducwkAzAgCAAAJAMwIAgDAzyQJAMwIAgCg9zYJAMwIAgCA3MwUCQDMCAIAgK6mCgUDbmlsAA5NSU5fUkVTX1RPX1JPQgCA2sQJAAxyb2JJZHhMb2NrZWQAAQALZHVja0lkeEZyZWUAAAAQZHVja0lkeFByZXBhcmluZwABAQ1rZXlEdWNrSGVhbHRoAQtkdWNrQXNzZXRJZAkArAICAgtkdWNrSGVhbHRoXwULZHVja0Fzc2V0SWQBDGtleUR1Y2tDaGFycwELZHVja0Fzc2V0SWQJAKwCAgIKZHVja0NoYXJzXwULZHVja0Fzc2V0SWQBCWtleUR1Y2tYUAELZHVja0Fzc2V0SWQJAKwCAgIHZHVja1hQXwULZHVja0Fzc2V0SWQBDGtleUR1Y2tMZXZlbAELZHVja0Fzc2V0SWQJAKwCAgIKZHVja0xldmVsXwULZHVja0Fzc2V0SWQBEWtleUR1Y2tGcmVlUG9pbnRzAQtkdWNrQXNzZXRJZAkArAICAg9kdWNrRnJlZVBvaW50c18FC2R1Y2tBc3NldElkARBrZXlEdWNrRXF1aXBtZW50AQtkdWNrQXNzZXRJZAkArAICAg5kdWNrRXF1aXBtZW50XwULZHVja0Fzc2V0SWQBCWtleVVzZXJYUAEEYWRkcgkArAICAgd1c2VyWFBfBQRhZGRyAQxrZXlVc2VyTGV2ZWwBBGFkZHIJAKwCAgIKdXNlckxldmVsXwUEYWRkcgERa2V5VXNlckZyZWVQb2ludHMBBGFkZHIJAKwCAgIPdXNlckZyZWVQb2ludHNfBQRhZGRyAQ5rZXlTYXZlZEhlYWx0aAELZHVja0Fzc2V0SWQJAKwCAgIMc2F2ZWRIZWFsdGhfBQtkdWNrQXNzZXRJZAEQa2V5U2F2ZWRMb2NhdGlvbgELZHVja0Fzc2V0SWQJAKwCAgIOc2F2ZWRMb2NhdGlvbl8FC2R1Y2tBc3NldElkAQxrZXlEdWNrQnVmZnMBC2R1Y2tBc3NldElkCQCsAgICCmR1Y2tCdWZmc18FC2R1Y2tBc3NldElkARhrZXlMYXN0Um9iYmVyeVRpbWVCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICEGxhc3RSb2JiZXJ5VGltZV8FC2R1Y2tBc3NldElkARhrZXlMYXN0Um9iYmVyeUNvc3RCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICEGxhc3RSb2JiZXJ5Q29zdF8FC2R1Y2tBc3NldElkARNrZXlMYW5kUm9iYmVyeVN0YXRlAQtsYW5kQXNzZXRJZAkArAICAhFsYW5kUm9iYmVyeVN0YXRlXwULbGFuZEFzc2V0SWQBEmtleUxhbmRDb29sZG93bkVUQQELbGFuZEFzc2V0SWQJAKwCAgIQbGFuZENvb2xkb3duRVRBXwULbGFuZEFzc2V0SWQBE2tleUR1Y2tSb2JiZXJ5U3RhdGUBC2R1Y2tBc3NldElkCQCsAgICEWR1Y2tSb2JiZXJ5U3RhdGVfBQtkdWNrQXNzZXRJZAETa2V5TG9ja2VkTGFuZEJ5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIRbG9ja2VkTGFuZEJ5RHVja18FC2R1Y2tBc3NldElkARZrZXlEZWxpdmVyeURlbGF5QnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAhRkZWxpdmVyeURlbGF5QnlEdWNrXwULZHVja0Fzc2V0SWQAB3hwQ2xhaW0AkE4AD3hwU3VjY2Vzc0ZsaWdodACQTgAMeHBGYWlsRmxpZ2h0ANAPAAh4cENhbGxFUwCgjQYADHhwQ3VzdG9tTmFtZQDAhD0ACnhwTmV3U0xhbmQAwJaxAgAOeHBVcGdyYWRlSW5mcmEAkE4AB3hwTWVyZ2UAwIQ9AAl4cE9uYm9hcmQAwIQ9AAZ4cEhlYWwAkE4BCWxldmVsQnlYUAECeHAJAGsDBQx4cExldmVsU2NhbGUJAGwGBQJ4cAAEBQ94cExldmVsUmVjaXBQb3cABAAEBQRET1dOBQZTQ0FMRTgBCW1heEhlYWx0aAEFbGV2ZWwJAGQCAGQFBWxldmVsAQdsZXZlbFVwAgljdXJyTGV2ZWwFbmV3WFAECG5ld0xldmVsCQEJbGV2ZWxCeVhQAQUFbmV3WFAJAMwIAgUIbmV3TGV2ZWwJAMwIAgkAaAIFEm51bVBvaW50c09uTGV2ZWxVcAkAZQIFCG5ld0xldmVsBQljdXJyTGV2ZWwFA25pbAEMZ2V0RHVja1N0YXRzBA9zdGFraW5nQ29udHJhY3QLZHVja0Fzc2V0SWQKYnVmZkVmZmVjdApmb3JjZUJ1ZmZzBAVjaGFycwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBDGtleUR1Y2tDaGFycwEFC2R1Y2tBc3NldElkAgkwXzBfMF8wXzACAV8EA2x2bAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAZoZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkCQEJbWF4SGVhbHRoAQUDbHZsBApzdGF0ZUJ1ZmZzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEMa2V5RHVja0J1ZmZzAQULZHVja0Fzc2V0SWQCCTBfMF8wXzBfMAIBXwkAzggCCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhclN0cmVuZ3RoCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhckFjY3VyYWN5CQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckludGVsbGVjdAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJFbmR1cmFuY2UJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQ1jaGFyRGV4dGVyaXR5CQDMCAIFA2x2bAkAzAgCBQZoZWFsdGgFA25pbAMFCmZvcmNlQnVmZnMJAMwIAgUKYnVmZkVmZmVjdAkAzAgCBQpidWZmRWZmZWN0CQDMCAIFCmJ1ZmZFZmZlY3QJAMwIAgUKYnVmZkVmZmVjdAkAzAgCBQpidWZmRWZmZWN0BQNuaWwJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnN0YXRlQnVmZnMFDGNoYXJTdHJlbmd0aAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKc3RhdGVCdWZmcwUMY2hhckFjY3VyYWN5CQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpzdGF0ZUJ1ZmZzBQ1jaGFySW50ZWxsZWN0CQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpzdGF0ZUJ1ZmZzBQ1jaGFyRW5kdXJhbmNlCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpzdGF0ZUJ1ZmZzBQ1jaGFyRGV4dGVyaXR5BQNuaWwBDmdldFJvYmJlcnlEYXRhAg9zdGFraW5nQ29udHJhY3QLZHVja0Fzc2V0SWQEC2xhc3RSb2JDb3N0CQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBGGtleUxhc3RSb2JiZXJ5Q29zdEJ5RHVjawEFC2R1Y2tBc3NldElkAAAEC2xhc3RSb2JUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBGGtleUxhc3RSb2JiZXJ5VGltZUJ5RHVjawEFC2R1Y2tBc3NldElkAAAEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEB3JvYkNvc3QJAJYDAQkAzAgCBQ5yb2JiZXJ5Q29zdE1pbgkAzAgCCQBlAgULbGFzdFJvYkNvc3QJAGgCBRRyb2JiZXJ5Q29vbGRvd25Db2VmZgkAZQIFA25vdwULbGFzdFJvYlRpbWUFA25pbAQJZHVja1N0YXRlCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBE2tleUR1Y2tSb2JiZXJ5U3RhdGUBBQtkdWNrQXNzZXRJZAAABApsb2NrZWRMYW5kCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBE2tleUxvY2tlZExhbmRCeUR1Y2sBBQtkdWNrQXNzZXRJZAIABAdsYW5kRVRBCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBEmtleUxhbmRDb29sZG93bkVUQQEFCmxvY2tlZExhbmQAAAkAlwoFBQdyb2JDb3N0BQtsYXN0Um9iVGltZQUJZHVja1N0YXRlBQpsb2NrZWRMYW5kBQdsYW5kRVRBAApMQU5EUFJFRklYAgRMQU5EAApEVUNLUFJFRklYAgREVUNLAApBUlRQUkVTQUxFAgdQUkVTQUxFAAZOVU1SRVMABgAYTUFYX0xBTkRTX1NUQUtFRF9CWV9VU0VSABkAD0RBSUxZUkVTQllQSUVDRQCA+NIBAAxXSE1VTFRJUExJRVIAgMivoCUAD0RFRkFVTFRMT0NBVElPTgIPQWZyaWNhX0ZfQWZyaWNhABBSRVNPVVJDRVBSSUNFTUlOANW1AgAKRVNTRUxMQ09FRgAKABVNSU5fVVNEVF9GRUVfREVMSVZFUlkA0IYDABJURU5fTUlOVVRFU19NSUxMSVMAwM8kAAlwcm9kVHlwZXMJAMwIAgIQRmlyc3QgQWlkIEtpdCBMMQkAzAgCAhBGaXJzdCBBaWQgS2l0IEwyCQDMCAICEEZpcnN0IEFpZCBLaXQgTDMJAMwIAgILQmFja3BhY2sgTDEJAMwIAgILQmFja3BhY2sgTDIJAMwIAgILQmFja3BhY2sgTDMJAMwIAgIORm9vZCBSYXRpb24gTDEJAMwIAgIORm9vZCBSYXRpb24gTDIJAMwIAgIORm9vZCBSYXRpb24gTDMJAMwIAgILSmV0IFBhY2sgTDEJAMwIAgILSmV0IFBhY2sgTDIJAMwIAgILSmV0IFBhY2sgTDMJAMwIAgIJU2hpZWxkIEwxCQDMCAICCVNoaWVsZCBMMgkAzAgCAglTaGllbGQgTDMJAMwIAgIHTWluZSBMMQkAzAgCAgdNaW5lIEwyCQDMCAICB01pbmUgTDMJAMwIAgIHVHJhcCBMMQkAzAgCAgdUcmFwIEwyCQDMCAICB1RyYXAgTDMFA25pbAAKY29udGluZW50cwkAzAgCAghBbWVyaWNhcwkAzAgCAgZFdXJvcGUJAMwIAgIEQXNpYQkAzAgCAgZBZnJpY2EJAMwIAgIHT2NlYW5pYQUDbmlsAAlDT0VGRjJNQVQAgK3iBAAQZm9ydEFsbG93ZWRQcm9kcwkAzAgCAA8JAMwIAgAQCQDMCAIAEQkAzAgCABIJAMwIAgATCQDMCAIAFAUDbmlsABBwcm9kdWN0aW9uTWF0cml4CQDMCAICJThfOF84XzE3XzE3XzQyXzEyXzBfMzBfMCwwLDAsMCwwLDAsMF8JAMwIAgIlOF84XzhfMTdfMTdfNDJfMjRfMF82MF8wLDAsNSwyLDAsMCwwXwkAzAgCAic4XzhfOF8xN18xN180Ml8zNl8wXzEyMF8wLDAsMTAsNCwwLDAsMF8JAMwIAgIpOF8xOV8xOV84XzI3XzE5XzI2XzFfMjBfMCwwLDAsMCwwLDAsMF8wMDEJAMwIAgIpOF8xOV8xOV84XzI3XzE5XzUyXzFfNDBfMCwwLDAsMCwwLDAsMF8wMDEJAMwIAgIpOF8xOV8xOV84XzI3XzE5Xzc4XzFfODBfMCwwLDAsMCwwLDAsMF8wMDEJAMwIAgIlOF84XzhfOF84XzYwXzEzXzJfMl8wLDAsMCwwLDAsMCwwXzAxMQkAzAgCAiU4XzhfOF84XzhfNjBfMjZfMl80XzAsMCwwLDAsMCwwLDBfMDExCQDMCAICJThfOF84XzhfOF82MF8zOV8yXzhfMCwwLDAsMCwwLDAsMF8wMTEJAMwIAgIpMzBfMzBfM18xN18xN18zXzMwXzNfMzBfMCwwLDAsMCwwLDAsMF8xMTEJAMwIAgIpMzBfMzBfM18xN18xN18zXzYwXzNfNTBfMCwwLDAsMCwwLDAsMF8xMTEJAMwIAgIpMzBfMzBfM18xN18xN18zXzkwXzNfNzBfMCwwLDAsMCwwLDAsMF8xMTEJAMwIAgIrMThfMThfMTBfMThfMThfMThfMTFfNF8xMF8wLDAsMCwwLDAsMCwwXzIwMQkAzAgCAisxOF8xOF8xMF8xOF8xOF8xOF8yMl80XzIwXzAsMCwwLDAsMCwwLDBfMjAxCQDMCAICKzE4XzE4XzEwXzE4XzE4XzE4XzMzXzRfMzBfMCwwLDAsMCwwLDAsMF8yMDEJAMwIAgIqNF8xM18yMl80XzM1XzIyXzIzXzBfNTAsMSwwXzAsMCwwLDAsMCwwLDBfCQDMCAICKjRfMTNfMjJfNF8zNV8yMl80Nl8wXzUwLDEsMV8wLDIsNSwwLDAsMCwwXwkAzAgCAis0XzEzXzIyXzRfMzVfMjJfNjlfMF81MCwyLDFfMCw1LDEwLDAsMCwwLDBfCQDMCAICKjVfMjVfNDBfNV8xMF8xNV8yMF8xXzMwLDEsMV8wLDAsMCwwLDAsMCwwXwkAzAgCAio1XzI1XzQwXzVfMTBfMTVfNDBfMV8zMCwxLDJfMiwxLDMsMCwwLDAsMF8JAMwIAgIqNV8yNV80MF81XzEwXzE1XzYwXzFfMzAsMSwzXzUsMiw4LDAsMCwwLDBfBQNuaWwACXJJZHhDb2VmZgAGAApySWR4RWZmZWN0AAgAEHJJZHhSZXF1aXJlbWVudHMACQAJcklkeFNsb3RzAAoADlBST0RVQ1RQS0dTSVpFAAoAC3doSWR4TGV2ZWxzAAAACHdoSWR4UmVzAAEACHdoSWR4TWF0AAIACXdoSWR4UHJvZAADAAl3aElkeExPRlQABAAJdm9sTG9ja2VkAAAAC3ZvbE9jY3VwaWVkAAEAB3ZvbEZyZWUAAgAIdm9sVG90YWwAAwAKYnBJZHhMZXZlbAAAAAhicElkeFJlcwABAAhicElkeE1hdAACAAlicElkeFByb2QAAwAPbG9jSWR4Q29udGluZW50AAAACmxvY0lkeFR5cGUAAQAIbG9jSWR4SWQAAgEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICA25vXwUHYXNzZXRJZAEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBB2Fzc2V0SWQJAKwCAgIFbGNuYV8FB2Fzc2V0SWQBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgIDc3RfBQdhc3NldElkASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIEdHlwZQdhc3NldElkCQC5CQIJAMwIAgIDbGFzCQDMCAIFBHR5cGUJAMwIAgUHYXNzZXRJZAUDbmlsAgFfASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwduZnRUeXBlB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIGc3R0YW9fBQduZnRUeXBlAgFfBQdhc3NldElkAgFfBQlvd25lckFkZHIBEmtleVdhcmVob3VzZUJ5TGFuZAELbGFuZEFzc2V0SWQJAKwCAgIDd2hfBQtsYW5kQXNzZXRJZAEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAgtpbmZyYUxldmVsXwUHYXNzZXRJZAEXa2V5Rm9ydGlmaWNhdGlvbnNCeUxhbmQBC2xhbmRBc3NldElkCQCsAgICD2ZvcnRpZmljYXRpb25zXwULbGFuZEFzc2V0SWQBGmtleUR1Y2tBc3NldElkVG9DdXN0b21OYW1lAQdhc3NldElkCQCsAgICGGR1Y2tDdXN0b21OYW1lQnlBc3NldElkXwUHYXNzZXRJZAEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEEYWRkcgkArAICAhhhY2NvdW50Q3VzdG9tTmFtZUJ5QWRkcl8FBGFkZHIBD2tleUFkZHJlc3NSZWZCeQEEYWRkcgkArAICAglhY2NSZWZCeV8FBGFkZHIBHGtleU9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2sBC2R1Y2tBc3NldElkCQCsAgICGm9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2tfBQtkdWNrQXNzZXRJZAEca2V5T25ib2FyZEFydER1Y2tBY3RpdmF0ZWRCeQEEYWRkcgkArAICAhpvbmJvYXJkQXJ0QWN0aXZhdGVkRHVja0J5XwUEYWRkcgETa2V5QWRkcmVzc1JlZmVycmFscwEEYWRkcgkArAICAg1hY2NSZWZlcnJhbHNfBQRhZGRyARBrZXlEdWNrSWRUb093bmVyAQdhc3NldElkCQCsAgICCmR1Y2tPd25lcl8FB2Fzc2V0SWQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBEWtleUJhY2twYWNrQnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAgliYWNrUGFja18FC2R1Y2tBc3NldElkAQ9rZXlEdWNrTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDWR1Y2tMb2NhdGlvbl8FC2R1Y2tBc3NldElkARVrZXlVc2VyR3dsUmVsZWFzZVRpbWUBCHVzZXJBZGRyCQCsAgICGiVzJXNfX3VzZXJHd2xSZWxlYXNlVGltZV9fBQh1c2VyQWRkcgEOa2V5RXNXYXJlaG91c2UAAhplbWVyZ2VuY3lXYXJlaG91c2VQcm9kdWN0cwAPZGVsaXZlcnlGdW5kS2V5AgxkZWxpdmVyeUZ1bmQAEWRlbGl2ZXJ5TG9ja2VkS2V5Ag5kZWxpdmVyeUxvY2tlZAANbGFzdFRvdXJJZEtleQIOJXNfX2xhc3RUb3VySWQBFWtleVRvdXJTdGF0aWNEYXRhQnlJZAEDdElkCQCsAgICFiVzJWRfX3RvdXJTdGF0aWNEYXRhX18JAKQDAQUDdElkARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQN0SWQJAKwCAgIXJXMlZF9fdG91ckR5bmFtaWNEYXRhX18JAKQDAQUDdElkARprZXlCZXN0UmVzdWx0QnlUb3VyQW5kRHVjawIDdElkC2R1Y2tBc3NldElkCQC5CQIJAMwIAgIfJXMlZCVzX19iZXN0UmVzdWx0QnlUb3VyQW5kRHVjawkAzAgCCQCkAwEFA3RJZAkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsAgJfXwAJaWR4U3RhdGljAAAACmlkeER5bmFtaWMAAQAKdFN0YXRpY0VuZAAGAA50RHluYW1pY1N0YXR1cwABAQtnZXRUb3VyRGF0YQIMdG91ckNvbnRyYWN0A3RJZAQGc3RhdGljCQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBBQN0SWQJAKwCAgkArAICAhlFcnJvciByZWFkaW5nIHRvdXJuYW1lbnQgCQCkAwEFA3RJZAIFIGRhdGECAl9fBAdkeW5hbWljCQC8CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQx0b3VyQ29udHJhY3QJARZrZXlUb3VyRHluYW1pY0RhdGFCeUlkAQUDdElkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQN0SWQCBSBkYXRhAgJfXwkAzAgCBQZzdGF0aWMJAMwIAgUHZHluYW1pYwUDbmlsAQ5pc0luVG91cm5hbWVudAIMdG91ckNvbnRyYWN0CGxvY2F0aW9uBAZsYXN0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUMdG91ckNvbnRyYWN0BQ1sYXN0VG91cklkS2V5AAAEA2xvYwkAtQkCBQhsb2NhdGlvbgIBXwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQFdERhdGEJAQtnZXRUb3VyRGF0YQIFDHRvdXJDb250cmFjdAUGbGFzdElkBAZzdGF0aWMJAJEDAgUFdERhdGEFCWlkeFN0YXRpYwQHZHluYW1pYwkAkQMCBQV0RGF0YQUKaWR4RHluYW1pYwMDAwkAAAIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFUCQAAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2xvYwUPbG9jSWR4Q29udGluZW50BQZsYXN0SWQHCQAAAgkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwIKSU5QUk9HUkVTUwcJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQNub3cHAQxpc0luRGVsaXZlcnkBCGxvY2F0aW9uBANsb2MJALUJAgUIbG9jYXRpb24CAV8EA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAECXN0YXJ0VGltZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2xvYwUPbG9jSWR4Q29udGluZW50BAhkaXN0YW5jZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2xvYwUIbG9jSWR4SWQDAwkAAAIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFECQBmAgUDbm93CQBkAgUJc3RhcnRUaW1lBRJURU5fTUlOVVRFU19NSUxMSVMHCQBnAgADBQhkaXN0YW5jZQcBD2lzVXN1YWxMb2NhdGlvbgEIbG9jYXRpb24EB2xvY1R5cGUJAJEDAgkAtQkCBQhsb2NhdGlvbgIBXwUKbG9jSWR4VHlwZQMJAQIhPQIFB2xvY1R5cGUCAVQJAQIhPQIFB2xvY1R5cGUCAUQHAQxub3RPbk1pc3Npb24CDHRvdXJDb250cmFjdAhsb2NhdGlvbgQGbGFzdElkCQELdmFsdWVPckVsc2UCCQCaCAIFDHRvdXJDb250cmFjdAUNbGFzdFRvdXJJZEtleQAABANsb2MJALUJAgUIbG9jYXRpb24CAV8EA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBXREYXRhCQELZ2V0VG91ckRhdGECBQx0b3VyQ29udHJhY3QFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMEB2xvY1R5cGUJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAwMJAQIhPQIFB2xvY1R5cGUCAVQJAQIhPQIFB2xvY1R5cGUCAUQHBgkBASEBAwMDCQAAAgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAVQJAAACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDbG9jBQ9sb2NJZHhDb250aW5lbnQFBmxhc3RJZAcJAAACCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzAgpJTlBST0dSRVNTBwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQFA25vdwcBEmdldFJlY2lwZU1hdGVyaWFscwEGcmVjaXBlCQBoAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnJlY2lwZQUJcklkeENvZWZmBQlDT0VGRjJNQVQBDGNoZWF0QXR0ZW1wdAIGb2xkTG9jBm5ld0xvYwkAAgEJAKwCAgkArAICCQCsAgICFkNoZWF0IGF0dGVtcHQ6IG9sZExvYz0FBm9sZExvYwIJLCBuZXdMb2M9BQZuZXdMb2MAFktTX1NFUEFSQVRFX1BVQkxJQ19LRVkHABhLU19BTExPV19CSUdfSU5GUkFfTUVSR0UHABFLU19BTExPV19ERUxJVkVSWQcABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgARSW5mcmFVcGdyYWRlQ29zdFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgMivoCUDCQAAAgEBVAUHJG1hdGNoMACAwtcvCQACAQINVW5rbm93biBjaGFpbgAOYXJiaXRyYWdlRGVsYXkEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgLiZKQMJAAACAQFUBQckbWF0Y2gwAODUAwkAAgECDVVua25vd24gY2hhaW4AA1NFUAICX18ABU1VTFQ2AMCEPQAFTVVMVDgAgMLXLwAFU1NJWkUAGQAFTVNJWkUAZAAFTFNJWkUA4QEABlhMU0laRQCQAwAHWFhMU0laRQDxBAAFSVRFUjYJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAEPZ2V0U3RyaW5nT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgAAEUlkeENmZ1N0YWtpbmdEYXBwAAEAEUlkeENmZ0Vjb25vbXlEYXBwAAIAFElkeENmZ0dvdmVybmFuY2VEYXBwAAMADUlkeENmZ1dsZ0RhcHAABAAUSWR4Q2ZnVG91cm5hbWVudERhcHAABwAPSWR4Q2ZnQWNyZXNEYXBwAAgBCmtleVJlc3RDZmcAAg4lc19fcmVzdENvbmZpZwEOa2V5UmVzdEFkZHJlc3MAAgwlc19fcmVzdEFkZHIBEXJlYWRSZXN0Q2ZnT3JGYWlsAQRyZXN0CQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQRyZXN0CQEKa2V5UmVzdENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgdyZXN0Q2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHcmVzdENmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADHJlc3RDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEOa2V5UmVzdEFkZHJlc3MABRVkZWZhdWx0UmVzdEFkZHJlc3NTdHIAB3Jlc3RDZmcJARFyZWFkUmVzdENmZ09yRmFpbAEFDHJlc3RDb250cmFjdAAPc3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnU3Rha2luZ0RhcHAAD2Vjb25vbXlDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ0Vjb25vbXlEYXBwAAtnb3ZDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFFElkeENmZ0dvdmVybmFuY2VEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFDUlkeENmZ1dsZ0RhcHAAEnRvdXJuYW1lbnRDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFFElkeENmZ1RvdXJuYW1lbnREYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwAApyZWNMYW5kTnVtAAAAC3JlY0xhbmRTaXplAAEAC3JlY1RlcnJhaW5zAAIADHJlY0NvbnRpbmVudAADAA13bGdBc3NldElkS2V5Agt3bGdfYXNzZXRJZAAKd2xnQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFC3dsZ0NvbnRyYWN0BQ13bGdBc3NldElkS2V5AhhXTEdPTEQgaXMgbm90IGlzc3VlZCB5ZXQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0AAtyYW5kb21EZWxheQACAQlrZXlDb21taXQBB2FkZHJlc3MJAKwCAgITZmluaXNoQmxvY2tGb3JBZGRyXwUHYWRkcmVzcwERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQljb250aW5lbnQJAKwCAgIUcmVzVHlwZXNCeUNvbnRpbmVudF8FCWNvbnRpbmVudAEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQlvd25lckFkZHIJAKwCAgITc3Rha2VkTGFuZHNCeU93bmVyXwUJb3duZXJBZGRyARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEIYXNTdHJpbmcBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAW4FByRtYXRjaDAFAW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCWFzQm9vbGVhbgEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFzBQckbWF0Y2gwBQFzCQACAQIZZmFpbCB0byBjYXN0IGludG8gQm9vbGVhbgEQYXNTdHJpbmdJbnRUdXBsZQEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAINKFN0cmluZywgSW50KQQCdDIFByRtYXRjaDAFAnQyCQACAQIfZmFpbCB0byBjYXN0IGludG8gKFN0cmluZywgSW50KQEPbnVtUGllY2VzQnlTaXplAQhsYW5kU2l6ZQQHJG1hdGNoMAUIbGFuZFNpemUDCQAAAgIBUwUHJG1hdGNoMAUFU1NJWkUDCQAAAgIBTQUHJG1hdGNoMAUFTVNJWkUDCQAAAgIBTAUHJG1hdGNoMAUFTFNJWkUDCQAAAgICWEwFByRtYXRjaDAFBlhMU0laRQMJAAACAgNYWEwFByRtYXRjaDAFB1hYTFNJWkUJAAIBAhFVbmtub3duIGxhbmQgc2l6ZQEHaXNEaWdpdAEBcwkBCWlzRGVmaW5lZAEJALYJAQUBcwEKa2V5QmxvY2tlZAACEGNvbnRyYWN0c0Jsb2NrZWQBEWtleUxhc3RUeElkQnlVc2VyAQRhZGRyCQCsAgICD2xhc3RUeElkQnlVc2VyXwUEYWRkcgEKZml4ZWRQb2ludAIDdmFsCGRlY2ltYWxzBAZ0ZW5Qb3cJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQRET1dOBAdsb3dQYXJ0CQCkAwEJAGoCBQN2YWwFBnRlblBvdwQGemVyb2VzCQCwAgIJAKQDAQUGdGVuUG93CQBkAgABCQCxAgEFB2xvd1BhcnQJAKwCAgkArAICCQCsAgIJAKQDAQkAaQIFA3ZhbAUGdGVuUG93AgEuBQZ6ZXJvZXMFB2xvd1BhcnQBD2dldFJhbmRvbU51bWJlcgMIbWF4VmFsdWUMZmluaXNoSGVpZ2h0CmF1eEVudHJvcHkED3JhbmRvbVNlZWRCbG9jawkBBXZhbHVlAQkA7QcBBQxmaW5pc2hIZWlnaHQECnJhbmRvbUhhc2gJAPcDAQkAywECCQEFdmFsdWUBCAUPcmFuZG9tU2VlZEJsb2NrA3ZyZgUKYXV4RW50cm9weQkAagIJALEJAQUKcmFuZG9tSGFzaAUIbWF4VmFsdWUADWluY3ViYXRvckFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQRWt0VnV4MlJoY2hTTjYzRHNEbzRiNG16NFFxektTZUR2AwkAAAIBAVQFByRtYXRjaDAFBHRoaXMJAAIBAg1Vbmtub3duIGNoYWluAAticmVlZGVyQWRkcgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1BEVnVVNDVIN0VoNWRtdE5iblJOUlN0R3dVTEE3Tlk2SGIDCQAAAgEBVAUHJG1hdGNoMAUEdGhpcwkAAgECDVVua25vd24gY2hhaW4AA3B1YgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAMFFktTX1NFUEFSQVRFX1BVQkxJQ19LRVkBIKsXV48VZ+NZVEGw1nLrZpvEo9NmXtWZhlDfmDcfsgkIASBPU+IaP1So1p1SThMdRidVvbNT8yx7yVRUsP9DwbQUKAMJAAACAQFUBQckbWF0Y2gwASBPU+IaP1So1p1SThMdRidVvbNT8yx7yVRUsP9DwbQUKAkAAgECDVVua25vd24gY2hhaW4ADEVNUFRZX1BST0Q1MAGQAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUZJVkVNSU5VVEVTTUlMTElTAOCnEgAMUkVOQU1JTkdDT1NUAMCWsQIACk1BWE5BTUVMRU4AMgAVSW5mcmFVcGdyYWRlQ29zdFNVc2R0AICt4gQADEVYUE1BVEVSSUFMUwQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMACm3YLtqwcDCQAAAgEBVAUHJG1hdGNoMACqp4GzCQkAAgECDVVua25vd24gY2hhaW4AB0VYUFVTRFQEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgOWadwMJAAACAQFUBQckbWF0Y2gwAIDlmncJAAIBAg1Vbmtub3duIGNoYWluAAxTX0NPU1RfQUNSRVMAgPKLqAkABUZJVkVYCQC2AgEABQAHVFdFTlRZWAkAtgIBABQACFRXRU5UWTJYCQC2AgEJAGgCABQAFAAIVFdFTlRZM1gJALYCAQkAaAIJAGgCABQAFAAUAAhUV0VOVFk0WAkAtgIBCQBoAgkAaAIJAGgCABQAFAAUABQACFRXRU5UWTVYCQC2AgEJAGgCCQBoAgkAaAIJAGgCABQAFAAUABQAFAAPUFJFU0FMRU5VTUxBTkRTAPQDARJrZXlOZXh0RnJlZUxhbmROdW0AAgtuZXh0TGFuZE51bQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBBG5hbWUJAKwCAgIEbGNuXwUEbmFtZQEQa2V5TGFuZFRvQXNzZXRJZAEHbGFuZE51bQkArAICAgNsYV8FB2xhbmROdW0BHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIHYXNzZXRJZAlvd25lckFkZHIJAKwCAgkArAICCQCsAgICBWlsYW9fBQdhc3NldElkAgFfBQlvd25lckFkZHIBEWtleUxhbmROdW1Ub093bmVyAQdsYW5kTnVtCQCsAgICA2xvXwUHbGFuZE51bQEaa2V5RHVja0N1c3RvbU5hbWVUb0Fzc2V0SWQBBG5hbWUJAKwCAgIRZHVja0J5Q3VzdG9tTmFtZV8FBG5hbWUBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBBG5hbWUJAKwCAgIUYWNjb3VudEJ5Q3VzdG9tTmFtZV8FBG5hbWUBCWtleU9sZGllcwACCm9sZGllc0xpc3QAC2NsYWltTW9kZVdoAAAADWNsYWltTW9kZUR1Y2sAAQATY2xhaW1Nb2RlV2hUaGVuRHVjawACAAhmbEhlYWx0aAAAAAtmbFRpbWVzdGFtcAAFAAdmbEJvbnVzAAYAC2ZsUHJvZHNVc2VkAAcBB25mdE5hbWUCB2xhbmROdW0IbGFuZFNpemUJAKwCAgkArAICBQpMQU5EUFJFRklYBQdsYW5kTnVtBQhsYW5kU2l6ZQEIdG9Wb2x1bWUCBmFtb3VudAdwa2dTaXplBARwa2dzAwkAZwIFBmFtb3VudAAACQBpAgkAZQIJAGQCBQZhbW91bnQFB3BrZ1NpemUAAQUHcGtnU2l6ZQkBAS0BCQBpAgkAZQIJAGQCCQEBLQEFBmFtb3VudAUHcGtnU2l6ZQABBQdwa2dTaXplCQBoAgUEcGtncwUFTVVMVDgBE2Rpc3RyaWJ1dGVCeVdlaWdodHMCBXRvdGFsB3dlaWdodHMEA3N1bQkAZAIJAGQCCQBkAgkAZAIJAGQCCQCRAwIFB3dlaWdodHMAAAkAkQMCBQd3ZWlnaHRzAAEJAJEDAgUHd2VpZ2h0cwACCQCRAwIFB3dlaWdodHMAAwkAkQMCBQd3ZWlnaHRzAAQJAJEDAgUHd2VpZ2h0cwAFAwkAZwIAAAUDc3VtCQACAQIQWmVybyB3ZWlnaHRzIHN1bQQFbm9ybTYJAGsDBQV0b3RhbAUFTVVMVDYFA3N1bQoBCm5vcm1hbGl6ZXICA2FjYwRlbGVtCQDNCAIFA2FjYwkAawMFBGVsZW0FBW5vcm02BQVNVUxUNgoAAiRsBQd3ZWlnaHRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpub3JtYWxpemVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGARJnZXROZWVkZWRNYXRlcmlhbHMBBXRvdGFsBAVwcm9wcwkAtQkCCQEFdmFsdWUBCQCiCAEJARFrZXlSZXNQcm9wb3J0aW9ucwACAV8DCQECIT0CCQCQAwEFBXByb3BzBQZOVU1SRVMJAAIBAhZXcm9uZyBwcm9wb3J0aW9ucyBkYXRhBAFyCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwAACQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwABCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwACCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwADCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwAECQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwAFBQNuaWwJARNkaXN0cmlidXRlQnlXZWlnaHRzAgUFdG90YWwFAXIBEXN1YnRyYWN0TWF0ZXJpYWxzAwxzaG91bGRVc2VNYXQDaGFzCXRvdGFsTmVlZAQEbmVlZAkBEmdldE5lZWRlZE1hdGVyaWFscwEFCXRvdGFsTmVlZAoBCnN1YnRyYWN0b3ICA2FjYwNpZHgEBnJlc3VsdAkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNoYXMFA2lkeAkAkQMCBQRuZWVkBQNpZHgDCQBmAgAABQZyZXN1bHQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIYTm90IGVub3VnaCBtYXRlcmlhbCBpZHg9CQCkAwEFA2lkeAILLCB5b3UgaGF2ZSAJAJEDAgUDaGFzBQNpZHgCCywgYnV0IG5lZWQgCQCkAwEJAJEDAgUEbmVlZAUDaWR4CQDNCAIFA2FjYwkApAMBBQZyZXN1bHQDBQxzaG91bGRVc2VNYXQKAAIkbAUFSVRFUjYKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnN1YnRyYWN0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYFA2hhcwERc3VidHJhY3RFcXVpcG1lbnQCBW9sZEVxBXBVc2VkAwkAAAIFBXBVc2VkAgAJAJQKAgUFb2xkRXEHCgEHc3ViVXNlZAIDYWNjBmlkeEFtdAQFcGFydHMJALUJAgUGaWR4QW10AgEsAwkBAiE9AgkAkAMBBQVwYXJ0cwACCQACAQIoSW5jb3JyZWN0IGZvcm1hdCwgc2hvdWxkIGJlIGluZGV4LGFtb3VudAQDaWR4CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAAMDCQBmAgAABQNpZHgGCQBnAgUDaWR4CQCQAwEFEHByb2R1Y3Rpb25NYXRyaXgJAAIBAhNVbmtub3duIHByb2R1Y3QgaWR4BANhbXQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABBAdlcVBhcnRzCQC1CQIIBQNhY2MCXzEJAKwCAgkAkQMCBQVwYXJ0cwAAAgE6AwkBAiE9AgkAkAMBBQdlcVBhcnRzAAIJAAIBCQCsAgIJAKwCAgIPWW91IGRvbid0IGhhdmUgCQCRAwIFCXByb2RUeXBlcwUDaWR4AgkgZXF1aXBwZWQEA3RtcAkAkQMCBQdlcVBhcnRzAAEEBm51bUxlbgMJAQdpc0RpZ2l0AQkArwICCQCwAgIFA3RtcAABAAEAAgABBARjdXJyCQENcGFyc2VJbnRWYWx1ZQEJAK8CAgUDdG1wBQZudW1MZW4EBHRhaWwJALACAgUDdG1wBQZudW1MZW4EBm5ld0FtdAMJAGcCBQRjdXJyBQNhbXQJAGUCBQRjdXJyBQNhbXQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgINWW91IGVxdWlwcGVkIAkApAMBBQRjdXJyAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUDaWR4AhMsIGJ1dCB0cmllZCB0byB1c2UgCQCkAwEFA2FtdAkAlAoCCQCsAgIJAKwCAgkArAICCQCsAgIJAJEDAgUHZXFQYXJ0cwAACQCRAwIFBXBhcnRzAAACAToJAKQDAQUGbmV3QW10BQR0YWlsAwgFA2FjYwJfMgYDAwkAZwIFA2lkeAAGCQBnAgAIBQNpZHgHCQAAAgUGbmV3QW10AAAHCgACJGwJALUJAgUFcFVzZWQCAV8KAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFBW9sZEVxBwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHc3ViVXNlZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgEOcHJvZFN0clRvQnl0ZXMBB3Byb2RTdHIEBXBMaXN0AwkAAAIFB3Byb2RTdHICAAUDbmlsCQC8CQIFB3Byb2RTdHICAV8KAQR0b0JWAgNhY2MGcmVjaXBlBAFqCQBpAgkAyAEBBQNhY2MACAQEY3VycgMJAGYCCQCQAwEFBXBMaXN0BQFqCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcExpc3QFAWoAAAkAywECBQNhY2MJAJoDAQUEY3VycgoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAEACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQR0b0JWAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIBDmJ5dGVzVG9Qcm9kU3RyAQJidgoBBmZyb21CVgIDYWNjBnJlY2lwZQQBagkAkAMBBQNhY2MEAWIJAMkBAgkAygECBQJidgkAaAIACAUBagAICQDNCAIFA2FjYwkApAMBCQCxCQEFAWIJALoJAgoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQZmcm9tQlYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgIBXwEVY2hlY2tTdGF0UmVxdWlyZW1lbnRzAglkdWNrU3RhdHMEcmVxcwoBBWNoZWNrAgNhY2MBagQEYnVmZgMJAGYCCQCQAwEFCWR1Y2tTdGF0cwkAZAIABwUBagkAkQMCBQlkdWNrU3RhdHMJAGQCAAcFAWoAAAMJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEcmVxcwUBagkAZAIJAJEDAgUJZHVja1N0YXRzBQFqBQRidWZmCQACAQkArAICAhtSZXF1aXJlbWVudCBub3Qgc2F0aXNmaWVkOiAJAJEDAgUMcmVxdWlyZW1lbnRzBQFqBgoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAcKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWNoZWNrAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA3CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcBCnBsYWNlUHJvZEIGBmlkeENudAVwTGlzdAppc1Bvc2l0aXZlCWR1Y2tTdGF0cwhvY2N1cGllZARmcmVlBAVwYXJ0cwkAtQkCBQZpZHhDbnQCAToDCQECIT0CCQCQAwEFBXBhcnRzAAIJAAIBAihJbmNvcnJlY3QgZm9ybWF0LCBzaG91bGQgYmUgaW5kZXg6YW1vdW50AwMJAQEhAQUKaXNQb3NpdGl2ZQkBAiE9AgkAsQIBCQCRAwIFBXBhcnRzAAAAAgcJAAIBAitQcm9kdWN0IGlkeCBzaG91bGQgYmUgMiBkaWdpdHMsIHplcm8gcGFkZGVkBApwcm9kdWN0SWR4CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAAQFY291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUQZm9ydEFsbG93ZWRQcm9kcwUKcHJvZHVjdElkeAkAAgEJAKwCAgkArAICAglQcm9kdWN0ICcJAJEDAgUJcHJvZFR5cGVzBQpwcm9kdWN0SWR4AiEnIGNhbm5vdCBiZSB1c2VkIGZvciBsYW5kIGRlZmVuc2UDCQBmAgAABQVjb3VudAkAAgECF0NvdW50IGNhbid0IGJlIG5lZ2F0aXZlAwkAZgIFBWNvdW50BQ1NQVhQUk9ESU5TTE9UCQACAQkArAICCQCsAgIJAKwCAgIUQ2FuJ3QgcHV0IG1vcmUgdGhhbiAJAKQDAQUNTUFYUFJPRElOU0xPVAIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFCnByb2R1Y3RJZHgDCQAAAgUFY291bnQAAAkAlQoDBQVwTGlzdAUIb2NjdXBpZWQFBGZyZWUEBGhlYWQJAMkBAgUFcExpc3QJAGgCAAgFCnByb2R1Y3RJZHgEBGN1cnIJALEJAQkAyQECCQDKAQIFBXBMaXN0CQBoAgAIBQpwcm9kdWN0SWR4AAgEBHRhaWwJAMoBAgUFcExpc3QJAGgCAAgJAGQCBQpwcm9kdWN0SWR4AAEEBnJlY2lwZQkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgFCnByb2R1Y3RJZHgCAV8DAwkBASEBBQppc1Bvc2l0aXZlCQBmAgUFY291bnQFBGN1cnIHCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICCVlvdSBoYXZlIAkApAMBBQRjdXJyAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUKcHJvZHVjdElkeAITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQVjb3VudAQGbmV3QW10AwMJAQEhAQUKaXNQb3NpdGl2ZQkBFWNoZWNrU3RhdFJlcXVpcmVtZW50cwIFCWR1Y2tTdGF0cwkAtQkCCQCRAwIFBnJlY2lwZQUQcklkeFJlcXVpcmVtZW50cwIBLAcJAGUCBQRjdXJyBQVjb3VudAkAZAIFBGN1cnIFBWNvdW50BAhkZWx0YVZvbAkAZQIJAQh0b1ZvbHVtZQIFBm5ld0FtdAUOUFJPRFVDVFBLR1NJWkUJAQh0b1ZvbHVtZQIFBGN1cnIFDlBST0RVQ1RQS0dTSVpFCQCVCgMJAMsBAgkAywECBQRoZWFkCQCaAwEFBm5ld0FtdAUEdGFpbAkAZAIFCG9jY3VwaWVkBQhkZWx0YVZvbAkAZQIFBGZyZWUFCGRlbHRhVm9sAQhhZGRQcm9kQgcGaWR4Q250BXBMaXN0CmlzUG9zaXRpdmUHc2VnbWVudAdtYWluQXV4BHNsb3QJZHVja1N0YXRzBAVwYXJ0cwkAtQkCBQZpZHhDbnQCAToDCQECIT0CCQCQAwEFBXBhcnRzAAIJAAIBAihJbmNvcnJlY3QgZm9ybWF0LCBzaG91bGQgYmUgaW5kZXg6YW1vdW50AwMJAQEhAQUKaXNQb3NpdGl2ZQkBAiE9AgkAsQIBCQCRAwIFBXBhcnRzAAAAAgcJAAIBAitQcm9kdWN0IGlkeCBzaG91bGQgYmUgMiBkaWdpdHMsIHplcm8gcGFkZGVkBApwcm9kdWN0SWR4CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAAQFY291bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAwMJAGYCAAAFCnByb2R1Y3RJZHgGCQBnAgUKcHJvZHVjdElkeAkAkAMBBRBwcm9kdWN0aW9uTWF0cml4CQACAQITVW5rbm93biBwcm9kdWN0IGlkeAMJAGYCAAAFBWNvdW50CQACAQIXQ291bnQgY2FuJ3QgYmUgbmVnYXRpdmUDCQBmAgUFY291bnQFDU1BWFBST0RJTlNMT1QJAAIBCQCsAgIJAKwCAgkArAICAhRDYW4ndCBwdXQgbW9yZSB0aGFuIAkApAMBBQ1NQVhQUk9ESU5TTE9UAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUKcHJvZHVjdElkeAMJAAACBQVjb3VudAAACQCUCgIFBXBMaXN0BwQEaGVhZAkAyQECBQVwTGlzdAkAaAIACAUKcHJvZHVjdElkeAQEY3VycgkAsQkBCQDJAQIJAMoBAgUFcExpc3QJAGgCAAgFCnByb2R1Y3RJZHgACAQEdGFpbAkAygECBQVwTGlzdAkAaAIACAkAZAIFCnByb2R1Y3RJZHgAAQQGcmVjaXBlCQC1CQIJAJEDAgUQcHJvZHVjdGlvbk1hdHJpeAUKcHJvZHVjdElkeAIBXwMDCQEBIQEFCmlzUG9zaXRpdmUJAGYCBQVjb3VudAUEY3VycgcJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIJWW91IGhhdmUgCQCkAwEFBGN1cnICBCBvZiAJAJEDAgUJcHJvZFR5cGVzBQpwcm9kdWN0SWR4AhMsIGJ1dCB0cmllZCB0byB1c2UgCQCkAwEFBWNvdW50BAlpc0JpZ0l0ZW0DAwkBASEBBQppc1Bvc2l0aXZlCQEVY2hlY2tTdGF0UmVxdWlyZW1lbnRzAgUJZHVja1N0YXRzCQC1CQIJAJEDAgUGcmVjaXBlBRBySWR4UmVxdWlyZW1lbnRzAgEsBwQGY29tcGF0CQCRAwIFBnJlY2lwZQUJcklkeFNsb3RzAwkAAAIFBmNvbXBhdAIACQACAQIXSXRlbSBjYW5ub3QgYmUgZXF1aXBwZWQEAWMJAQ1wYXJzZUludFZhbHVlAQUGY29tcGF0BARjU2VnCQBpAgUBYwBkAwkBAiE9AgUHc2VnbWVudAUEY1NlZwkAAgECFFNlZ21lbnQgaW5jb21wYXRpYmxlBAhjTWFpbkF1eAkAaQIJAGoCBQFjAGQACgMJAQIhPQIFB21haW5BdXgFCGNNYWluQXV4CQACAQIRU2xvdCBpbmNvbXBhdGlibGUECWNOdW1TbG90cwkAagIFAWMACgMDCQECIT0CBQRzbG90AAAJAGYCBQljTnVtU2xvdHMAAQcJAAIBAh5CaWcgaXRlbXMgc2hvdWxkIG9jY3VweSBzbG90IDAJAGYCBQljTnVtU2xvdHMAAQcJAJQKAgkAywECCQDLAQIFBGhlYWQJAJoDAQkAZAIFBGN1cnIDBQppc1Bvc2l0aXZlBQVjb3VudAkBAS0BBQVjb3VudAUEdGFpbAUJaXNCaWdJdGVtAQtzbG90c0dyb3VwQgYBZwRicEluCmlzUG9zaXRpdmUHc2VnbWVudAdtYWluQXV4BXN0YXRzAwkBAiE9AgUBZwIABAVzbG90cwkAtQkCBQFnAgEsAwkAZgIJAJADAQUFc2xvdHMFCE1BWFNMT1RTCQACAQISV3Jvbmcgc2xvdHMgZm9ybWF0BAJzMAkAkQMCBQVzbG90cwAABAJzMQMJAGYCCQCQAwEFBXNsb3RzAAEJAJEDAgUFc2xvdHMAAQIAAwMJAAACBQJzMAIACQAAAgUCczECAAcFBGJwSW4EBXRtcFMwAwkBAiE9AgUCczACAAkBCGFkZFByb2RCBwUCczAFBGJwSW4FCmlzUG9zaXRpdmUFB3NlZ21lbnQFB21haW5BdXgAAAUFc3RhdHMJAJQKAgUEYnBJbgcDCQECIT0CBQJzMQIAAwgFBXRtcFMwAl8yCQACAQIeQmlnIGl0ZW0gYWxyZWFkeSBvY2N1cGllcyBzbG90CAkBCGFkZFByb2RCBwUCczEIBQV0bXBTMAJfMQUKaXNQb3NpdGl2ZQUHc2VnbWVudAUHbWFpbkF1eAABBQVzdGF0cwJfMQgFBXRtcFMwAl8xBQRicEluAQZkcmVzc0IEB3NlZ0xpc3QGcEJ5dGVzCmlzUG9zaXRpdmUFc3RhdHMKAQdzZWdtZW50AgNhY2MDc2VnBAFqCAUDYWNjAl8xBAdtYWluQXV4CQC1CQIFA3NlZwIBOwMJAQIhPQIJAJADAQUHbWFpbkF1eAUKTlVNTUFJTkFVWAkAAgECFFdyb25nIHNlZ21lbnQgZm9ybWF0BAFtCQCRAwIFB21haW5BdXgAAAQBYQkAkQMCBQdtYWluQXV4AAEDAwkAAAIFAW0CAAkAAAIFAWECAAcJAJQKAgkAZAIFAWoAAQgFA2FjYwJfMgQEdG1wTQkBC3Nsb3RzR3JvdXBCBgUBbQgFA2FjYwJfMgUKaXNQb3NpdGl2ZQUBagAABQVzdGF0cwkAlAoCCQBkAgUBagABCQELc2xvdHNHcm91cEIGBQFhBQR0bXBNBQppc1Bvc2l0aXZlBQFqAAEFBXN0YXRzCAoAAiRsBQdzZWdMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAFBnBCeXRlcwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHc2VnbWVudAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgJfMgEFZm9ydEIGB3NlZ0xpc3QGcEJ5dGVzCG9jY3VwaWVkBGZyZWUKaXNQb3NpdGl2ZQlkdWNrU3RhdHMDCQBmAgADCQCQAwEFB3NlZ0xpc3QJAAIBAjFBdCBsZWFzdCBkdWNrLCBtaW5lcyBhbmQgdHJhcHMgcGFydHMgYXJlIHJlcXVpcmVkCgEHc2VnbWVudAIDYWNjA3NlZwQBaggFA2FjYwJfMQMJAAACBQFqAAAJAJYKBAkAZAIFAWoAAQgFA2FjYwJfMggFA2FjYwJfMwgFA2FjYwJfNAQBcAkBCnBsYWNlUHJvZEIGBQNzZWcIBQNhY2MCXzIFCmlzUG9zaXRpdmUFCWR1Y2tTdGF0cwgFA2FjYwJfMwgFA2FjYwJfNAkAlgoECQBkAgUBagABCAUBcAJfMQgFAXACXzIIBQFwAl8zBAF0CgACJGwFB3NlZ0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAUGcEJ5dGVzBQhvY2N1cGllZAUEZnJlZQoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHc2VnbWVudAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgkAlQoDCAUBdAJfMggFAXQCXzMIBQF0Al80ARdjYW5XZWFyQ3VycmVudEVxdWlwbWVudAELZHVja0Fzc2V0SWQEBWVxS2V5CQEQa2V5RHVja0VxdWlwbWVudAEFC2R1Y2tBc3NldElkBAZjdXJyRXEJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywCAV8ECXRlbXBQcm9kQgkBBmRyZXNzQgQFBmN1cnJFcQUMRU1QVFlfUFJPRDUwBgUDbmlsBAhzZWdCcEF1eAkAkQMCCQC1CQIJAJEDAgUGY3VyckVxBQtzZWdCYWNrcGFjawIBOwABBApidWZmRWZmZWN0AwkAAAIFCHNlZ0JwQXV4AgAAAAQEYXV4MAkAkQMCCQC1CQIFCHNlZ0JwQXV4AgEsAAADCQAAAgUEYXV4MAIAAAAEBmlkeENudAkAtQkCBQRhdXgwAgE6BANpZHgJAJEDAgUGaWR4Q250AAAEA2NudAkAkQMCBQZpZHhDbnQAAQMDAwMDCQAAAgUDaWR4AgIwNgYJAAACBQNpZHgCAjA3BgkAAAIFA2lkeAICMDgJAQIhPQIFA2NudAIABwkAZgIJAQ1wYXJzZUludFZhbHVlAQUDY250AAAHCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgJAQ1wYXJzZUludFZhbHVlAQUDaWR4AgFfBQpySWR4RWZmZWN0AAAEBXN0YXRzCQEMZ2V0RHVja1N0YXRzBAUEdGhpcwULZHVja0Fzc2V0SWQFCmJ1ZmZFZmZlY3QGBAhuZXdQcm9kQgkBBmRyZXNzQgQFBmN1cnJFcQUJdGVtcFByb2RCBwUFc3RhdHMJAAACBQhuZXdQcm9kQgUIbmV3UHJvZEIBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwECHByb3BMaXN0DXRlcnJhaW5Db3VudHMNbGFuZFNpemVJbmRleARzaWduAwkBAiE9AgkAkAMBBQhwcm9wTGlzdAUGTlVNUkVTCQACAQIWV3JvbmcgcHJvcG9ydGlvbnMgZGF0YQoBB3VwZGF0ZXICA2FjYwFpBAZyZXN1bHQJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvcExpc3QFAWkJAGgCCQBoAgUEc2lnbgkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4AwkAZgIAAAUGcmVzdWx0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhZQYW5pYyEgUGllY2VzIG9mIHR5cGU9CQCkAwEFAWkCBywgc2lnbj0JAKQDAQUEc2lnbgITLCB0ZXJyYWluQ291bnRzW2ldPQkApAMBCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkCECwgbGFuZFNpemVJbmRleD0JAKQDAQUNbGFuZFNpemVJbmRleAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0CgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQd1cGRhdGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGARF1cGRhdGVQcm9wb3J0aW9ucwMNdGVycmFpbkNvdW50cw1sYW5kU2l6ZUluZGV4BHNpZ24ECHByb3BMaXN0CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBEWtleVJlc1Byb3BvcnRpb25zAAILMF8wXzBfMF8wXzACAV8JALkJAgkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwEBQhwcm9wTGlzdAUNdGVycmFpbkNvdW50cwUNbGFuZFNpemVJbmRleAUEc2lnbgIBXwENY291bnRUZXJyYWlucwEIdGVycmFpbnMJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQQABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUIAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFDAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRAABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUUAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFGAAEFA25pbAEGYWRkUmVzBQpjdXJyZW50UmVzDXRlcnJhaW5Db3VudHMJZGVsdGFUaW1lDWxhbmRTaXplSW5kZXgXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMKAQVhZGRlcgIDYWNjAWkECXJlc09mVHlwZQkAaAIJAGgCCQBrAwUJZGVsdGFUaW1lBRdkYWlseUJ5UGllY2VXaXRoQm9udXNlcwUJREFZTUlMTElTCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgJAM0IAgUDYWNjCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKY3VycmVudFJlcwUBaQUJcmVzT2ZUeXBlBAFyCgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgkAuQkCBQFyAgFfAQl2aXJ0Q2xhaW0EDXRlcnJhaW5Db3VudHMJZGVsdGFUaW1lDWxhbmRTaXplSW5kZXgXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMKAQVhZGRlcgIDYWNjAWkECXJlc09mVHlwZQkAaAIJAGgCCQBrAwUJZGVsdGFUaW1lBRdkYWlseUJ5UGllY2VXaXRoQm9udXNlcwUJREFZTUlMTElTCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgJAJQKAgkAzQgCCAUDYWNjAl8xBQlyZXNPZlR5cGUJAGQCCAUDYWNjAl8yBQlyZXNPZlR5cGUKAAIkbAUFSVRFUjYKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgENZGlzdHJpYnV0ZVJlcwQMY3VycmVudFdoUmVzDmN1cnJlbnRQYWNrUmVzCnJlc1RvQ2xhaW0Ld2hTcGFjZUxlZnQEDnJlc0xpc3RUb0NsYWltCAUKcmVzVG9DbGFpbQJfMQQMcmVzQW1Ub0NsYWltCAUKcmVzVG9DbGFpbQJfMgMJAAACBQxyZXNBbVRvQ2xhaW0AAAkAlAoCCQC5CQIFDGN1cnJlbnRXaFJlcwIBXwkAuQkCBQ5jdXJyZW50UGFja1JlcwIBXwMJAGcCBQt3aFNwYWNlTGVmdAUMcmVzQW1Ub0NsYWltCgEIYWRkTGlzdHMCA2FjYwFpCQDNCAIFA2FjYwkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDGN1cnJlbnRXaFJlcwUBaQkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQQBcgoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIYWRkTGlzdHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJAJQKAgkAuQkCBQFyAgFfCQC5CQIFDmN1cnJlbnRQYWNrUmVzAgFfCgEMYWRkUGFydExpc3RzAgNhY2MBaQQGd2hQYXJ0CQBrAwkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQULd2hTcGFjZUxlZnQFDHJlc0FtVG9DbGFpbQkAlAoCCQDNCAIIBQNhY2MCXzEJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxjdXJyZW50V2hSZXMFAWkFBndoUGFydAkAzQgCCAUDYWNjAl8yCQCkAwEJAGUCCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmN1cnJlbnRQYWNrUmVzBQFpCQCRAwIFDnJlc0xpc3RUb0NsYWltBQFpBQZ3aFBhcnQEAXIKAAIkbAUFSVRFUjYKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQxhZGRQYXJ0TGlzdHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJAJQKAgkAuQkCCAUBcgJfMQIBXwkAuQkCCAUBcgJfMgIBXwEDYWJzAQF4AwkAwAICBQF4CQC2AgEAAAUBeAkAvgIBBQF4AARmcmVxCQDMCAIJAMwIAgAGCQDMCAIACQkAzAgCAA4JAMwIAgAPCQDMCAIAEAUDbmlsCQDMCAIJAMwIAgAFCQDMCAIACAkAzAgCAA0JAMwIAgAOCQDMCAIADwUDbmlsCQDMCAIJAMwIAgABCQDMCAIABAkAzAgCAAkJAMwIAgAKCQDMCAIADwUDbmlsCQDMCAIJAMwIAgABCQDMCAIABgkAzAgCAAcJAMwIAgAPCQDMCAIAEwUDbmlsCQDMCAIJAMwIAgAECQDMCAIABwkAzAgCAAgJAMwIAgANCQDMCAIAEgUDbmlsBQNuaWwBB2dlbkNoYXICAW4FZnJlcXMEA3JlbQkAoAMBCQC7AgIFAW4FB1RXRU5UWVgEBmxldHRlcgMJAGYCCQCRAwIFBWZyZXFzAAAFA3JlbQIBQQMJAGYCCQCRAwIFBWZyZXFzAAEFA3JlbQIBQgMJAGYCCQCRAwIFBWZyZXFzAAIFA3JlbQIBQwMJAGYCCQCRAwIFBWZyZXFzAAMFA3JlbQIBRAMJAGYCCQCRAwIFBWZyZXFzAAQFA3JlbQIBRQIBRgUGbGV0dGVyAQtnZW5UZXJyYWlucwIEc2VlZAxjb250aW5lbnRJZHgEAWYJAJEDAgUEZnJlcQUMY29udGluZW50SWR4CgEQdGVycmFpbkdlbmVyYXRvcgIDYWNjBGVsZW0JAJQKAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIIBQNhY2MCXzEJAQdnZW5DaGFyAggFA2FjYwJfMgUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFB1RXRU5UWVgFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFkyWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTNYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZNFgFAWYJALoCAggFA2FjYwJfMgUIVFdFTlRZNVgEAXQKAAIkbAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgICAAkAugICBQRzZWVkBQVGSVZFWAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEQdGVycmFpbkdlbmVyYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUIBQF0Al8xAAZQRVJNMjUJAMwIAgAHCQDMCAIAAgkAzAgCAA8JAMwIAgATCQDMCAIACAkAzAgCABgJAMwIAgABCQDMCAIAFQkAzAgCABAJAMwIAgAFCQDMCAIAAAkAzAgCABYJAMwIAgAUCQDMCAIAFwkAzAgCAAsJAMwIAgAECQDMCAIAEgkAzAgCAAwJAMwIAgAGCQDMCAIACgkAzAgCAAMJAMwIAgARCQDMCAIADQkAzAgCAAkJAMwIAgAOBQNuaWwABlRDSEFSUwkAzAgCAgFBCQDMCAICAUIJAMwIAgIBQwkAzAgCAgFECQDMCAICAUUJAMwIAgIBRgUDbmlsARNnZW5UZXJyYWluc0Zvck1lcmdlAgtzdW1UZXJyYWlucw1sYW5kU2l6ZUluZGV4CgEFc3RlcDECA2FjYwFzBAFqCAUDYWNjAl8yBAJlbAkBDXBhcnNlSW50VmFsdWUBBQFzBAF4AwkAAAIFAmVsAAAAAAMJAGcCBQJlbAkAaAIABAUNbGFuZFNpemVJbmRleAkAaQIFAmVsBQ1sYW5kU2l6ZUluZGV4AwkAZgIFAmVsCQBoAgADBQ1sYW5kU2l6ZUluZGV4AAMJAGQCCQBpAgkAZQIFAmVsAAEFDWxhbmRTaXplSW5kZXgAAQkAlQoDCQDNCAIIBQNhY2MCXzEFAXgJAGQCCAUDYWNjAl8yAAEJAGQCCAUDYWNjAl8zBQF4BAF0CgACJGwFC3N1bVRlcnJhaW5zCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVzdGVwMQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQDYXJyCAUBdAJfMQQGbWF4SWR4CQEFdmFsdWUBCQDPCAIFA2FycgkAlgMBBQNhcnIEBWRlbHRhCQBlAggFAXQCXzMAGQoBBnN1YmJlcgIDYWNjA2lkeAQDdmFsAwkAAAIFA2lkeAUGbWF4SWR4CQBlAgkAkQMCBQNhcnIFA2lkeAUFZGVsdGEJAJEDAgUDYXJyBQNpZHgEBnplcm9lcwMJAAACBQN2YWwAAAUDbmlsCQC1CQIJALACAgkApAMBCQBsBgAKAAAFA3ZhbAAAAAAFBERPV04AAQIABAFjCQCRAwIFBlRDSEFSUwUDaWR4CgEHbGlzdEdlbgICYWMHaWdub3JlZAkAzQgCBQJhYwUBYwQBegoAAiRsBQZ6ZXJvZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2xpc3RHZW4CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDI1CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkJAM4IAgUDYWNjBQF6BAFyCgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQZzdWJiZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYKAQZwZXJtdXQCA2FjYwFqCQCsAgIFA2FjYwkAkQMCBQFyBQFqCgACJGwFBlBFUk0yNQoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGcGVybXV0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyNQkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZAQtnZXRCYWNrcGFjawEFYnBLZXkEAXAJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQVicEtleQIaMDowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoCAToJAMwIAgkApAMBCQELdmFsdWVPckVsc2UCCQC2CQEJAJEDAgUBcAUKYnBJZHhMZXZlbAAACQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhSZXMCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeFJlcwILMF8wXzBfMF8wXzAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQhicElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAXAFCGJwSWR4TWF0AgswXzBfMF8wXzBfMAkAzAgCCQCRAwIFAXAFCWJwSWR4UHJvZAUDbmlsARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEJdm9sUHJlZml4BAVwYXJ0cwkAtQkCBQl2b2xQcmVmaXgCAV8JAGgCCQBoAgUMV0hNVUxUSVBMSUVSCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAEAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAABF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQljdXJyZW50V2gEBWdvb2RzCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kCgEJc3VtUmVzTWF0AgNhY2MEaXRlbQkAZAIFA2FjYwkBDXBhcnNlSW50VmFsdWUBBQRpdGVtCgEHc3VtUHJvZAIDYWNjBGl0ZW0EA2lkeAgFA2FjYwJfMQQEcGtncwkAaQIJAGUCCQBkAgkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBQ5QUk9EVUNUUEtHU0laRQABBQ5QUk9EVUNUUEtHU0laRQkAlAoCCQBkAgUDaWR4AAEJAGQCCAUDYWNjAl8yCQBoAgUEcGtncwUFTVVMVDgECHdoUmVzVm9sCgACJGwJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlzdW1SZXNNYXQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYECHdoTWF0Vm9sCgACJGwJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0AgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlzdW1SZXNNYXQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYECndoR29vZHNWb2wDCQAAAgUFZ29vZHMCAAAACAoAAiRsCQC8CQIFBWdvb2RzAgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAAAAoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHc3VtUHJvZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyAl8yCQBkAgkAZAIFCHdoUmVzVm9sBQh3aE1hdFZvbAUKd2hHb29kc1ZvbAEMZ2V0V2FyZWhvdXNlAwV3aEtleQlsYW5kSW5kZXgKaW5mcmFMZXZlbAQJdm9sUHJlZml4CQCsAgIJAKwCAgkApAMBBQlsYW5kSW5kZXgCAV8JAKQDAQUKaW5mcmFMZXZlbAQHd2hUb3RhbAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQUJdm9sUHJlZml4BAV3aFN0cgkBC3ZhbHVlT3JFbHNlAgkAoggBBQV3aEtleQkArAICBQl2b2xQcmVmaXgCGzowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDo6MAQCd2gJALwJAgUFd2hTdHICAToECndoT2NjdXBpZWQJARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFAndoBAZ3aExvZnQDCQBmAgAFCQCQAwEFAndoCQC5CQIJAMwIAgIBMAkAzAgCCQCkAwEFCndoT2NjdXBpZWQJAMwIAgkApAMBCQBlAgUHd2hUb3RhbAUKd2hPY2N1cGllZAkAzAgCCQCkAwEFB3doVG90YWwFA25pbAIBXwQEbG9mdAkAtQkCCQCRAwIFAndoBQl3aElkeExPRlQCAV8ECHdoTG9ja2VkCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUJdm9sTG9ja2VkBANvY2MDCQBmAgkAkAMBBQRsb2Z0AAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQt2b2xPY2N1cGllZAUKd2hPY2N1cGllZAkAuQkCCQDMCAIJAKQDAQUId2hMb2NrZWQJAMwIAgkApAMBBQNvY2MJAMwIAgkApAMBCQBlAgkAZQIFB3doVG90YWwFCHdoTG9ja2VkBQNvY2MJAMwIAgkApAMBBQd3aFRvdGFsBQNuaWwCAV8JAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQJ3aAUId2hJZHhSZXMCAV8FBk5VTVJFUwkAkQMCBQJ3aAUId2hJZHhSZXMCCzBfMF8wXzBfMF8wCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUCd2gFCHdoSWR4TWF0AgFfBQZOVU1SRVMJAJEDAgUCd2gFCHdoSWR4TWF0AgswXzBfMF8wXzBfMAkAzAgCCQCRAwIFAndoBQl3aElkeFByb2QJAMwIAgUGd2hMb2Z0BQNuaWwBFWdldFdhcmVob3VzZVNwYWNlTGVmdAEJY3VycmVudFdoBAtvY2N1cGllZFZvbAkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUJY3VycmVudFdoBA9jdXJyV2hMb2NrZWRWb2wJAQ1wYXJzZUludFZhbHVlAQkAkQMCCQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8FCXZvbExvY2tlZAkAZQIJAGUCCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMFC29jY3VwaWVkVm9sBQ9jdXJyV2hMb2NrZWRWb2wBCW1vdmVTdHVmZgMKY2FyZ29QYXJ0cwljdXJyZW50V2gLY3VycmVudFBhY2sDCQECIT0CCQCQAwEFCmNhcmdvUGFydHMAAwkAAgECNGNhcmdvTGlzdFN0ciBzaG91bGQgY29udGFpbiBleGFjdGx5IDIgJzonIHNlcGFyYXRvcnMECHJlc1BhcnRzCQC1CQIJAJEDAgUKY2FyZ29QYXJ0cwAAAgFfBAhtYXRQYXJ0cwkAtQkCCQCRAwIFCmNhcmdvUGFydHMAAQIBXwQJcHJvZFBhcnRzAwkAAAIJAJEDAgUKY2FyZ29QYXJ0cwACAgAFA25pbAkAvAkCCQCRAwIFCmNhcmdvUGFydHMAAgIBXwMJAQIhPQIJAJADAQUIcmVzUGFydHMFBk5VTVJFUwkAAgECIEFsbCA2IHJlc291cmNlcyBzaG91bGQgYmUgcGFzc2VkAwkBAiE9AgkAkAMBBQhtYXRQYXJ0cwUGTlVNUkVTCQACAQIgQWxsIDYgbWF0ZXJpYWxzIHNob3VsZCBiZSBwYXNzZWQEC3doU3BhY2VMZWZ0CQEVZ2V0V2FyZWhvdXNlU3BhY2VMZWZ0AQUJY3VycmVudFdoBAljdXJyV2hSZXMJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfBAljdXJyV2hNYXQJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0AgFfBApjdXJyV2hQcm9kAwkAAAIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAV8EDmN1cnJlbnRQYWNrUmVzCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBA5jdXJyZW50UGFja01hdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQPY3VycmVudFBhY2tQcm9kAwkAAAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIABQNuaWwJALwJAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgFfCgEDbXZSAgNhY2MEaXRlbQQBaQgFA2FjYwJfMQQCYW0JAQ1wYXJzZUludFZhbHVlAQUEaXRlbQQDd2hyCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJY3VycldoUmVzBQFpBANicHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ5jdXJyZW50UGFja1JlcwUBaQMJAAACBQJhbQAACQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkAkQMCBQljdXJyV2hSZXMFAWkJAM0IAggFA2FjYwJfMwkAkQMCBQ5jdXJyZW50UGFja1JlcwUBaQgFA2FjYwJfNAMJAGYCBQJhbQAAAwkAZgIFAmFtBQNicHIJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAFBGl0ZW0CGSBmcm9tIGJhY2twYWNrLCBidXQgb25seSAJAKQDAQUDYnByAgogYXZhaWxhYmxlCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2hyBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicHIFAmFtCQBkAggFA2FjYwJfNAUCYW0DCQBmAgkBAS0BBQJhbQUDd2hyCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgCQCkAwEJAQEtAQUCYW0CGiBmcm9tIHdhcmVob3VzZSwgYnV0IG9ubHkgCQCkAwEFA3docgIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docgUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnByBQJhbQkAZAIIBQNhY2MCXzQFAmFtBAFyCgACJGwFCHJlc1BhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAFA25pbAUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA212UgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgoBA212TQIDYWNjBGl0ZW0EAWkIBQNhY2MCXzEEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3dobQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWN1cnJXaE1hdAUBaQQDYnBtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOY3VycmVudFBhY2tNYXQFAWkDCQAAAgUCYW0AAAkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAJEDAgUJY3VycldoTWF0BQFpCQDNCAIIBQNhY2MCXzMJAJEDAgUOY3VycmVudFBhY2tNYXQFAWkIBQNhY2MCXzQDCQBmAgUCYW0AAAMJAGYCBQJhbQUDYnBtCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgBQRpdGVtAhkgZnJvbSBiYWNrcGFjaywgYnV0IG9ubHkgCQCkAwEFA2JwbQIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3dobQUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnBtBQJhbQkAZAIIBQNhY2MCXzQFAmFtAwkAZgIJAQEtAQUCYW0FA3dobQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFAmFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aG0CCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aG0FAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwbQUCYW0JAGQCCAUDYWNjAl80BQJhbQQBbQoAAiRsBQhtYXRQYXJ0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAABQNuaWwFA25pbAgFAXICXzQKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA212TQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgoBA212UAIDYWNjBGl0ZW0EAWkIBQNhY2MCXzEEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3docAMJAGYCCQCQAwEFCmN1cnJXaFByb2QFAWkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpjdXJyV2hQcm9kBQFpAAAEA2JwcAMJAGYCCQCQAwEFD2N1cnJlbnRQYWNrUHJvZAUBaQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFD2N1cnJlbnRQYWNrUHJvZAUBaQAAAwkAAAIFAmFtAAAJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEFA3docAkAzQgCCAUDYWNjAl8zCQCkAwEFA2JwcAgFA2FjYwJfNAMJAGYCBQJhbQAAAwkAZgIFAmFtBQNicHAJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAFBGl0ZW0CGSBmcm9tIGJhY2twYWNrLCBidXQgb25seSAJAKQDAQUDYnBwAgogYXZhaWxhYmxlBAhkZWx0YVZvbAkAZQIJAQh0b1ZvbHVtZQIJAGQCBQN3aHAFAmFtBQ5QUk9EVUNUUEtHU0laRQkBCHRvVm9sdW1lAgUDd2hwBQ5QUk9EVUNUUEtHU0laRQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docAUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnBwBQJhbQkAZAIIBQNhY2MCXzQFCGRlbHRhVm9sAwkAZgIJAQEtAQUCYW0FA3docAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFAmFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aHACCiBhdmFpbGFibGUECGRlbHRhVm9sCQBlAgkBCHRvVm9sdW1lAgkAZAIFA3docAUCYW0FDlBST0RVQ1RQS0dTSVpFCQEIdG9Wb2x1bWUCBQN3aHAFDlBST0RVQ1RQS0dTSVpFCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2hwBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicHAFAmFtCQBkAggFA2FjYwJfNAUIZGVsdGFWb2wEAXADCQECIT0CCQCQAwEFCXByb2RQYXJ0cwAACgACJGwFCXByb2RQYXJ0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAABQNuaWwFA25pbAgFAW0CXzQKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA212UAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyCQCWCgQAAAUKY3VycldoUHJvZAUPY3VycmVudFBhY2tQcm9kCAUBbQJfNAQIdm9sU2FsZG8IBQFwAl80AwkAZgIFCHZvbFNhbGRvBQt3aFNwYWNlTGVmdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIVQXR0ZW1wdCB0byBwdXQgdG90YWwgCQCkAwEFCHZvbFNhbGRvAhEgc3R1ZmYsIGJ1dCBvbmx5IAkApAMBBQt3aFNwYWNlTGVmdAIVIHdhcmVob3VzZSBzcGFjZSBsZWZ0CQCZCgcJALkJAggFAXICXzICAV8JALkJAggFAW0CXzICAV8JALoJAggFAXACXzICAV8JALkJAggFAXICXzMCAV8JALkJAggFAW0CXzMCAV8JALoJAggFAXACXzMCAV8FCHZvbFNhbGRvARJleHBlZGl0aW9uSW50ZXJuYWwCBmNhbGxlcgR0eElkBAh1c2VyQWRkcgkApQgBBQZjYWxsZXIEBmJpZ051bQkBA2FicwEJAJ4DAQUEdHhJZAQHZnJlZU51bQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQESa2V5TmV4dEZyZWVMYW5kTnVtAAkAZAIFD1BSRVNBTEVOVU1MQU5EUwABBAdsYW5kTnVtCQCkAwEFB2ZyZWVOdW0EDGNvbnRpbmVudElkeAkAoAMBCQC7AgIFBmJpZ051bQUFRklWRVgECHRlcnJhaW5zCQELZ2VuVGVycmFpbnMCBQZiaWdOdW0FDGNvbnRpbmVudElkeAQJY29udGluZW50CQCRAwIFCmNvbnRpbmVudHMFDGNvbnRpbmVudElkeAQFaXNzdWUJAMIIBQkBB25mdE5hbWUCBQdsYW5kTnVtAgFTCQC5CQIJAMwIAgUHbGFuZE51bQkAzAgCAgFTCQDMCAIFCHRlcnJhaW5zCQDMCAIFCWNvbnRpbmVudAUDbmlsAgFfAAEAAAcEB2Fzc2V0SWQJALgIAQUFaXNzdWUEAmlkCQDYBAEFB2Fzc2V0SWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEJAMwIAgUFaXNzdWUJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEGtleUxhbmRUb0Fzc2V0SWQBBQdsYW5kTnVtBQJpZAkAzAgCCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUCaWQFCHVzZXJBZGRyCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFB2xhbmROdW0FCHVzZXJBZGRyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFAmlkAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQJpZAUIdXNlckFkZHIAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZjYWxsZXIAAQUHYXNzZXRJZAUDbmlsCQCUCgIFAmlkBQljb250aW5lbnQBDGZsaWdodENvbW1vbgMIdXNlckFkZHIHbWVzc2FnZQNzaWcDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gEBXBhcnRzCQC8CQIJALAJAQUHbWVzc2FnZQIBOwQJZmxpZ2h0TG9nCQC8CQIJAJEDAgUFcGFydHMAAAIBfAQCaHAJALUJAgkAkQMCBQlmbGlnaHRMb2cFCGZsSGVhbHRoAgFfBAVjdXJIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAAEBW5ld0hQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCaHAAAQQLbmV3TG9jVHhWZXIJALUJAgkAkQMCBQVwYXJ0cwABAgE6BAtuZXdMb2NhdGlvbgkAkQMCBQtuZXdMb2NUeFZlcgAABAR0aW1lCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJZmxpZ2h0TG9nBQtmbFRpbWVzdGFtcAMDCQBmAgUEdGltZQkAZAIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwYJAGYCCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFEUZJVkVNSU5VVEVTTUlMTElTBQR0aW1lCQACAQkArAICCQCsAgIJAKwCAgIcc2lnbmF0dXJlIG91dGRhdGVkOiBsb2dUaW1lPQkApAMBBQR0aW1lAgksIGJjVGltZT0JAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAECXR4RnJvbU1zZwkAkQMCBQtuZXdMb2NUeFZlcgABBAZsYXN0VHgJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBEWtleUxhc3RUeElkQnlVc2VyAQUIdXNlckFkZHICAAMJAQIhPQIFBmxhc3RUeAUJdHhGcm9tTXNnCQACAQkArAICCQCsAgIJAKwCAgIeVHggaWRzIGRvbid0IG1hdGNoISBJbiBzdGF0ZTogBQZsYXN0VHgCCiwgaW4gbXNnOiAFCXR4RnJvbU1zZwQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQh1c2VyQWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkAAAEDG9sZEZyb21TdGF0ZQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQAwkBAiE9AgUMb2xkRnJvbVN0YXRlBQVjdXJIUAkAAgEJAKwCAgkArAICCQCsAgICCm9sZEhlYWx0aD0JAKQDAQUMb2xkRnJvbVN0YXRlAi8gZnJvbSBzdGF0ZSBkb2VzIG5vdCBtYXRjaCBvbmUgZnJvbSBmbGlnaHQgbG9nPQkApAMBBQVjdXJIUAMJAGcCAAAFBWN1ckhQCQACAQIeWW91IGNhbid0IGZseSB3aXRoIHplcm8gaGVhbHRoAwkBASEBCQEXY2FuV2VhckN1cnJlbnRFcXVpcG1lbnQBBQtkdWNrQXNzZXRJZAkAAgECFkVxdWlwbWVudCBpbmNvbXBhdGlibGUEBWJvbnVzAwkAZgIJAJADAQUJZmxpZ2h0TG9nBQdmbEJvbnVzCQCRAwIFCWZsaWdodExvZwUHZmxCb251cwIABAhwcm9kVXNlZAMJAGYCCQCQAwEFCWZsaWdodExvZwULZmxQcm9kc1VzZWQJAJEDAgUJZmxpZ2h0TG9nBQtmbFByb2RzVXNlZAIABApzZW50QW1vdW50AwMJAGYCBQVuZXdIUAAACQAAAgUFYm9udXMCASQHCQEFYXNJbnQBCQD8BwQFDHJlc3RDb250cmFjdAINc2VuZFVzZHRQcml6ZQkAzAgCBQh1c2VyQWRkcgUDbmlsBQNuaWwAAAkAlwoFBQVuZXdIUAULZHVja0Fzc2V0SWQFCnNlbnRBbW91bnQFC25ld0xvY2F0aW9uBQhwcm9kVXNlZAEMYXBwbHlCb251c2VzAgtsYW5kQXNzZXRJZAZwaWVjZXMECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAlhcnRQaWVjZXMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQAAAQEYWRkNgkAaQIFCmluZnJhTGV2ZWwABgQEYWRkNwkAaQIFCmluZnJhTGV2ZWwABwkAZAIJAGQCBQ9EQUlMWVJFU0JZUElFQ0UJAGsDBQ9EQUlMWVJFU0JZUElFQ0UJAGQCCQBkAgUKaW5mcmFMZXZlbAUEYWRkNgkAaAIAAgUEYWRkNwAFCQBrAwUPREFJTFlSRVNCWVBJRUNFBQlhcnRQaWVjZXMJAGgCBQZwaWVjZXMABQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBGFkZHIJY2xhaW1Nb2RlDWxhbmRBc3NldElkSW4EDSR0MDMzNzM4MzQyNzcDCQAAAgUJY2xhaW1Nb2RlBQtjbGFpbU1vZGVXaAkAlAoCBQ1sYW5kQXNzZXRJZEluCQELdmFsdWVPckVsc2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICAAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgQDbG9jCQC1CQIJAQV2YWx1ZQEFC2N1ckxvY2F0aW9uAgFfAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUwJAAIBCQCsAgIJAKwCAgIWRHVjayBsb2NhdGlvbiB0eXBlIGlzIAkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCESwgYnV0IHNob3VsZCBiZSBMCQCUCgIJAJEDAgUDbG9jBQhsb2NJZHhJZAULZHVja0Fzc2V0SWQEC2xhbmRBc3NldElkCAUNJHQwMzM3MzgzNDI3NwJfMQQGZHVja0lkCAUNJHQwMzM3MzgzNDI3NwJfMgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBUxhbmQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwkAlgoEBQZkdWNrSWQFC2xhbmRBc3NldElkBQFkBQlzYXZlZFRpbWUBEGNsYWltUmVzSW50ZXJuYWwEBGFkZHIGYW1vdW50CWNsYWltTW9kZQ1sYW5kQXNzZXRJZEluAwkAZgIAAAUGYW1vdW50CQACAQIPTmVnYXRpdmUgYW1vdW50BAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBQRhZGRyBQljbGFpbU1vZGUFDWxhbmRBc3NldElkSW4ECGxhbmRTaXplCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIIBQFjAl8zBQtyZWNUZXJyYWlucwQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAIBQFjAl80AwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQgFAWMCXzQCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUEFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAQxhcHBseUJvbnVzZXMCCAUBYwJfMgUGcGllY2VzBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UFBnBpZWNlcwUJREFZTUlMTElTAwkAZgIFBmFtb3VudAUIYXZhaWxSZXMJAAIBCQCsAgIJAKwCAgkArAICAiJOb3QgZW5vdWdoIHJlc291cmNlcywgYXZhaWxhYmxlID0gCQCkAwEFCGF2YWlsUmVzAg4sIHJlcXVlc3RlZCA9IAkApAMBBQZhbW91bnQEDG5ld0RlbHRhVGltZQkAawMJAGUCBQhhdmFpbFJlcwUGYW1vdW50BQlEQVlNSUxMSVMJAGgCBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBQZwaWVjZXMEDG5ld1RpbWVzdGFtcAkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQxuZXdEZWx0YVRpbWUECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUECnJlc1RvQ2xhaW0JAQl2aXJ0Q2xhaW0EBQ10ZXJyYWluQ291bnRzCQBlAgUJZGVsdGFUaW1lBQxuZXdEZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBCAUBYwJfMgQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEIBQFjAl8yAAAECWN1cnJlbnRXaAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEBGxvZnQJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAIBXwQLd2hTcGFjZUxlZnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlAwMJAAACBQljbGFpbU1vZGUFC2NsYWltTW9kZVdoCQBmAgUGYW1vdW50BQt3aFNwYWNlTGVmdAcJAAIBCQCsAgIJAKwCAgIFT25seSAJAKQDAQULd2hTcGFjZUxlZnQCGCBzcGFjZSBsZWZ0IGluIHdhcmVob3VzZQQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEIBQFjAl8xBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEDmN1cnJlbnRQYWNrUmVzCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAxjdXJyZW50V2hSZXMJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfBA0kdDAzNjY1MTM3NTIyAwkAAAIFCWNsYWltTW9kZQULY2xhaW1Nb2RlV2gJAJYKBAkBBmFkZFJlcwUFDGN1cnJlbnRXaFJlcwUNdGVycmFpbkNvdW50cwkAZQIFCWRlbHRhVGltZQUMbmV3RGVsdGFUaW1lBQlsYW5kSW5kZXgFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCAUKcmVzVG9DbGFpbQJfMgkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCAUKcmVzVG9DbGFpbQJfMgMJAAACBQljbGFpbU1vZGUFDWNsYWltTW9kZUR1Y2sJAJYKBAkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzCQEGYWRkUmVzBQUOY3VycmVudFBhY2tSZXMFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQUJbGFuZEluZGV4BRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlBAVkaXN0cgkBDWRpc3RyaWJ1dGVSZXMEBQxjdXJyZW50V2hSZXMFDmN1cnJlbnRQYWNrUmVzBQpyZXNUb0NsYWltBQt3aFNwYWNlTGVmdAQEd2hBbQkAlwMBCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCQDMCAIIBQpyZXNUb0NsYWltAl8yBQNuaWwJAJYKBAgFBWRpc3RyAl8xCAUFZGlzdHICXzIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQFBHdoQW0JAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQUEd2hBbQQFd2hSZXMIBQ0kdDAzNjY1MTM3NTIyAl8xBAVicFJlcwgFDSR0MDM2NjUxMzc1MjICXzIEBWxvZnRPCAUNJHQwMzY2NTEzNzUyMgJfMwQFbG9mdEYIBQ0kdDAzNjY1MTM3NTIyAl80CQCXCgUJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQgFAWMCXzIFDG5ld1RpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYCAUBYwJfMgUEYWRkcgUMbmV3VGltZXN0YW1wBQNuaWwFBWJwS2V5CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgUFYnBSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwFBXdoS2V5CQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCBQV3aFJlcwkAzAgCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQJAMwIAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAkAzAgCCQC5CQIJAMwIAgkAkQMCBQRsb2Z0BQl2b2xMb2NrZWQJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAJEDAgUEbG9mdAUIdm9sVG90YWwFA25pbAIBXwUDbmlsAQhjbGFpbUFsbAQEYWRkcgtsYW5kQXNzZXRJZAZwaWVjZXMJY2xhaW1Nb2RlBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkBAlzYXZlZFRpbWUJAQV2YWx1ZQEJAJ8IAQUHdGltZUtleQQIYXZhaWxSZXMJAGgCCQBrAwkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUJAQxhcHBseUJvbnVzZXMCBQtsYW5kQXNzZXRJZAUGcGllY2VzBQlEQVlNSUxMSVMFBnBpZWNlcwkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQhhdmFpbFJlcwUJY2xhaW1Nb2RlBQtsYW5kQXNzZXRJZAENdXBJbmZyYUNvbW1vbgQMc2hvdWxkVXNlTWF0BmNhbGxlcg1wYXltZW50QW1vdW50C2xhbmRBc3NldElkBARhZGRyCQClCAEFBmNhbGxlcgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUTY2xhaW1Nb2RlV2hUaGVuRHVjawULbGFuZEFzc2V0SWQEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAggFAWMCXzMFC3JlY0xhbmRTaXplBAhpbmZyYUtleQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBCAUBYwJfMgQIY3VyTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUIaW5mcmFLZXkAAAMDCQEBIQEFGEtTX0FMTE9XX0JJR19JTkZSQV9NRVJHRQkAZwIFCGN1ckxldmVsAAMHCQACAQImQ3VycmVudGx5IG1heCBpbmZyYXN0cnVjdHVyZSBsZXZlbCA9IDMECG1heEluZnJhCQBkAgkAaQIJAQRzcXJ0BAUGcGllY2VzAAAAAAUERE9XTgAFAAIECG5ld0xldmVsCQBkAgUIY3VyTGV2ZWwAAQMDBRhLU19BTExPV19CSUdfSU5GUkFfTUVSR0UJAGYCBQhuZXdMZXZlbAUIbWF4SW5mcmEHCQACAQkArAICAiVDdXJyZW50bHkgbWF4IGluZnJhc3RydWN0dXJlIGxldmVsID0gCQCkAwEFCG1heEluZnJhBARjb3N0CQBrAwUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0CQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUDAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEIBQFjAl8xBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAdtYXRVc2VkCQBrAwURSW5mcmFVcGdyYWRlQ29zdFMJAGgCBQZwaWVjZXMFCG5ld0xldmVsBQVTU0laRQQGbmV3TWF0CQC5CQIJARFzdWJ0cmFjdE1hdGVyaWFscwMFDHNob3VsZFVzZU1hdAUFbUxpc3QFB21hdFVzZWQCAV8EC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyCAUBYwJfMgUGcGllY2VzBRNjbGFpbU1vZGVXaFRoZW5EdWNrBAZ3aERhdGEIBQtjbGFpbVJlc3VsdAJfNQQGb2xkVm9sCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFBndoRGF0YQULd2hJZHhMZXZlbHMECm5ld1ZvbERhdGEJALkJAgkAzAgCCQCRAwIJALUJAgkAkQMCBQZ3aERhdGEFC3doSWR4TGV2ZWxzAgFfAAAJAMwIAgkApAMBBQhuZXdMZXZlbAUDbmlsAgFfBAZuZXdWb2wJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEFCm5ld1ZvbERhdGEEBGxvZnQJALUJAgkAkQMCBQZ3aERhdGEFCXdoSWR4TE9GVAIBXwQKbmV3TG9mdFN0cgkAuQkCCQDMCAIJAJEDAgUEbG9mdAUJdm9sTG9ja2VkCQDMCAIJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQJAMwIAgkApAMBCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlBQZuZXdWb2wFBm9sZFZvbAkAzAgCCQCkAwEFBm5ld1ZvbAUDbmlsAgFfCQCVCgMJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIaW5mcmFLZXkFCG5ld0xldmVsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAggFAWMCXzIFBGFkZHIFCG5ld0xldmVsCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIIBQtjbGFpbVJlc3VsdAJfMwUIYnBJZHhSZXMJAMwIAgUGbmV3TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6CQDMCAIJAQtTdHJpbmdFbnRyeQIIBQtjbGFpbVJlc3VsdAJfNAkAuQkCCQDMCAIFCm5ld1ZvbERhdGEJAMwIAgkAkQMCBQZ3aERhdGEFCHdoSWR4UmVzCQDMCAIJAJEDAgUGd2hEYXRhBQh3aElkeE1hdAkAzAgCCQCRAwIFBndoRGF0YQUJd2hJZHhQcm9kCQDMCAIFCm5ld0xvZnRTdHIFA25pbAIBOgUDbmlsCAULY2xhaW1SZXN1bHQCXzEFCG5ld0xldmVsBQdtYXRVc2VkARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAILZHVja0Fzc2V0SWQHZGVsdGFYUAQGbHZsS2V5CQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQEBXhwS2V5CQEJa2V5RHVja1hQAQULZHVja0Fzc2V0SWQEAnhwCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUFeHBLZXkAAAQFbmV3WFAJAGQCBQJ4cAUHZGVsdGFYUAQJbHZsUG9pbnRzCQEHbGV2ZWxVcAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQZsdmxLZXkAAAUFbmV3WFAECWtleVBvaW50cwkBEWtleUR1Y2tGcmVlUG9pbnRzAQULZHVja0Fzc2V0SWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUGbHZsS2V5CQCRAwIFCWx2bFBvaW50cwAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBQV4cEtleQUFbmV3WFAJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleVBvaW50cwkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5UG9pbnRzAAAJAJEDAgUJbHZsUG9pbnRzAAEFA25pbAUFbmV3WFABFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBGFkZHIHZGVsdGFYUAQGbHZsS2V5CQEMa2V5VXNlckxldmVsAQUEYWRkcgQFeHBLZXkJAQlrZXlVc2VyWFABBQRhZGRyBAJ4cAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFBXhwS2V5AAAEBW5ld1hQCQBkAgUCeHAFB2RlbHRhWFAECWx2bFBvaW50cwkBB2xldmVsVXACCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUGbHZsS2V5AAAFBW5ld1hQBAlrZXlQb2ludHMJARFrZXlVc2VyRnJlZVBvaW50cwEFBGFkZHIJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUGbHZsS2V5CQCRAwIFCWx2bFBvaW50cwAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBQV4cEtleQUFbmV3WFAJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleVBvaW50cwkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5UG9pbnRzAAAJAJEDAgUJbHZsUG9pbnRzAAEFA25pbAUFbmV3WFABEmFjdGl2YXRlT25ib2FyZEFydAEEYWRkcgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAhyZWZCeUtleQkBD2tleUFkZHJlc3NSZWZCeQEFBGFkZHIEBXJlZkJ5CQCiCAEFCHJlZkJ5S2V5AwkBASEBCQEJaXNEZWZpbmVkAQUFcmVmQnkJAAIBAilZb3UgYXJlIG5vdCBlbGlnaWJsZSBmb3IgT05CT0FSRCBhcnRpZmFjdAQGYXJ0S2V5CQEca2V5T25ib2FyZEFydER1Y2tBY3RpdmF0ZWRCeQEFBGFkZHIEB2FydER1Y2sJAKIIAQUGYXJ0S2V5AwkBCWlzRGVmaW5lZAEFB2FydER1Y2sJAAIBCQCsAgICL1lvdSBhbHJlYWR5IHVzZWQgeW91ciBPTkJPQVJEIGFydGlmYWN0IG9uIGR1Y2sgCQEFdmFsdWUBBQdhcnREdWNrBBBkdWNrQWN0aXZhdG9yS2V5CQEca2V5T25ib2FyZEFydEFjdGl2YXRlZE9uRHVjawEFC2R1Y2tBc3NldElkBA1kdWNrQWN0aXZhdG9yCQCiCAEFEGR1Y2tBY3RpdmF0b3JLZXkDCQEJaXNEZWZpbmVkAQUNZHVja0FjdGl2YXRvcgkAAgEJAKwCAgkArAICCQCsAgICCVRoZSBkdWNrIAULZHVja0Fzc2V0SWQCNCBhbHJlYWR5IGdvdCBwb2ludHMgZnJvbSBPTkJPQVJEIGFydGlmYWN0IGZyb20gdXNlciAJAQV2YWx1ZQEFDWR1Y2tBY3RpdmF0b3IJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQZhcnRLZXkFC2R1Y2tBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIFEGR1Y2tBY3RpdmF0b3JLZXkFBGFkZHIFA25pbAgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkBQl4cE9uYm9hcmQCXzEBEmFjdGl2YXRlUHJlc2FsZUFydAIEYWRkcg1sYW5kQXNzZXRJZEluBAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBQRhZGRyBRNjbGFpbU1vZGVXaFRoZW5EdWNrBQ1sYW5kQXNzZXRJZEluBAtsYW5kQXNzZXRJZAgFAWMCXzIEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAggFAWMCXzMFC3JlY0xhbmRTaXplBA1hY3RpdmF0aW9uS2V5CQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAMJAGYCCQELdmFsdWVPckVsc2UCCQCfCAEFDWFjdGl2YXRpb25LZXkAAAAACQACAQIlUHJlc2FsZSBhcnRpZmFjdCBpcyBhbHJlYWR5IGFjdGl2YXRlZAMJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAggFAWMCXzMFCnJlY0xhbmROdW0FD1BSRVNBTEVOVU1MQU5EUwkAAgEJAKwCAgkArAICCQCsAgIFCkxBTkRQUkVGSVgCASAFC2xhbmRBc3NldElkAiUgaXMgbm90IGVsaWdpYmxlIGZvciBwcmVzYWxlIGFydGlmYWN0BAtjbGFpbVJlc3VsdAkBCGNsYWltQWxsBAUEYWRkcgULbGFuZEFzc2V0SWQFBnBpZWNlcwUTY2xhaW1Nb2RlV2hUaGVuRHVjawkAzQgCCQDNCAIJAM0IAggFC2NsYWltUmVzdWx0Al8xCQEMSW50ZWdlckVudHJ5AgUNYWN0aXZhdGlvbktleQUGcGllY2VzCQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzIJALkJAggFC2NsYWltUmVzdWx0Al8zAgE6CQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzQJALkJAggFC2NsYWltUmVzdWx0Al81AgE6AQ9jaGVja1RvdXJuYW1lbnQBC2R1Y2tBc3NldElkBAZsYXN0SWQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUSdG91cm5hbWVudENvbnRyYWN0BQ1sYXN0VG91cklkS2V5AAAEC2N1ckxvY2F0aW9uCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04CAV8EA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBXREYXRhCQELZ2V0VG91ckRhdGECBRJ0b3VybmFtZW50Q29udHJhY3QFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMDCQECIT0CCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlAgFUBwMDAwkAAAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtjdXJMb2NhdGlvbgUPbG9jSWR4Q29udGluZW50BQZsYXN0SWQJAAACCQCRAwIFB2R5bmFtaWMFDnREeW5hbWljU3RhdHVzAgpJTlBST0dSRVNTBwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZzdGF0aWMFCnRTdGF0aWNFbmQFA25vdwcJAAIBAipZb3VyIGR1Y2sgaXMgdGFraW5nIHBhcnQgaW4gdGhlIHRvdXJuYW1lbnQJAQlhc0Jvb2xlYW4BCQD8BwQFBHRoaXMCFmV4aXRUb3VybmFtZW50SW50ZXJuYWwJAMwIAgULZHVja0Fzc2V0SWQFA25pbAUDbmlsAQ1jaGVja0RlbGl2ZXJ5AQtkdWNrQXNzZXRJZAMJAQEhAQURS1NfQUxMT1dfREVMSVZFUlkHBAtjdXJMb2NhdGlvbgkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwkBAiE9AgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBRAcECXN0YXJ0VGltZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFC2N1ckxvY2F0aW9uBQ9sb2NJZHhDb250aW5lbnQECGRpc3RhbmNlCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyTG9jYXRpb24FCGxvY0lkeElkAwMJAGYCBQNub3cJAGQCBQlzdGFydFRpbWUFElRFTl9NSU5VVEVTX01JTExJUwkAZgIAAwUIZGlzdGFuY2UHCQACAQIgWW91ciBkdWNrIGlzIG9uIGRlbGl2ZXJ5IG1pc3Npb24JAQlhc0Jvb2xlYW4BCQD8BwQFBHRoaXMCFGV4aXREZWxpdmVyeUludGVybmFsCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwFA25pbAESZXhpdERlbGl2ZXJ5Q29tbW9uAQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgIBXwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJc3RhcnRUaW1lCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyTG9jYXRpb24FD2xvY0lkeENvbnRpbmVudAQIZGlzdGFuY2UJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtjdXJMb2NhdGlvbgUIbG9jSWR4SWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBEGtleUR1Y2tJZFRvT3duZXIBBQtkdWNrQXNzZXRJZAIUTkZUIGR1Y2sgaXMgb3JwaGFuZWQECWhlYWx0aEtleQkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQJY3VySGVhbHRoCQERQGV4dHJOYXRpdmUoMTA1NSkBBQloZWFsdGhLZXkEDm91dGNvbWVBY3Rpb25zAwkAZwIFCGRpc3RhbmNlAAMEBnJld2FyZAkA/AcEBQ9lY29ub215Q29udHJhY3QCEnNlbmREZWxpdmVyeVJld2FyZAkAzAgCBQVvd25lcgUDbmlsBQNuaWwDCQAAAgUGcmV3YXJkBQZyZXdhcmQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAGYCBQNub3cJAGQCBQlzdGFydFRpbWUFElRFTl9NSU5VVEVTX01JTExJUwkAAgECJllvdXIgZHVjayBpcyBzdGlsbCBvbiBkZWxpdmVyeSBtaXNzaW9uBAtsb2NrZWRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9lY29ub215Q29udHJhY3QFEWRlbGl2ZXJ5TG9ja2VkS2V5AAAEBnVubG9jawkA/AcEBQ9lY29ub215Q29udHJhY3QCFHVwZGF0ZURlbGl2ZXJ5TG9ja2VkCQDMCAIJAGUCBQtsb2NrZWRUb3RhbAUVTUlOX1VTRFRfRkVFX0RFTElWRVJZBQNuaWwFA25pbAMJAAACBQZ1bmxvY2sFBnVubG9jawMJAGcCAAAFCWN1ckhlYWx0aAUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5RGVsaXZlcnlEZWxheUJ5RHVjawEFC2R1Y2tBc3NldElkCQBkAgUJc3RhcnRUaW1lBQlEQVlNSUxMSVMFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQLc2F2ZWRIZWFsdGgJARFAZXh0ck5hdGl2ZSgxMDU1KQEJAQ5rZXlTYXZlZEhlYWx0aAEFC2R1Y2tBc3NldElkBA1zYXZlZExvY2F0aW9uCQERQGV4dHJOYXRpdmUoMTA1OCkBCQEQa2V5U2F2ZWRMb2NhdGlvbgEFC2R1Y2tBc3NldElkCQCWCgQFDm91dGNvbWVBY3Rpb25zCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQloZWFsdGhLZXkFC3NhdmVkSGVhbHRoCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUNc2F2ZWRMb2NhdGlvbgUDbmlsBQ1zYXZlZExvY2F0aW9uBQtzYXZlZEhlYWx0aAENbWVyZ2VJbnRlcm5hbAYLbmV3TGFuZFNpemUIbmV3TGV2ZWwHZm9ybXVsYQRhZGRyDGxhbmRBc3NldElkcwduZWVkTWF0BAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAh1tZXJnZUludGVybmFsX2NoZWNrVG91cm5hbWVudAMJAQ1jaGVja0RlbGl2ZXJ5AQULZHVja0Fzc2V0SWQJAAIBAhttZXJnZUludGVybmFsX2NoZWNrRGVsaXZlcnkKAQpjaGVja01lcmdlAgNhY2MLbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQECXNhdmVkVGltZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFB3RpbWVLZXkJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwQJY29udGluZW50CQCRAwIFAWQFDHJlY0NvbnRpbmVudAMDCQECIT0CCAUDYWNjAl8zAgAJAQIhPQIIBQNhY2MCXzMFCWNvbnRpbmVudAcJAAIBAi5MYW5kcyBzaG91bGQgYmUgb24gdGhlIHNhbWUgY29udGluZW50IHRvIG1lcmdlBAhsYW5kU2l6ZQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQHc2l6ZXNJbggFA2FjYwJfMQQBaQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCzCQIFB3NpemVzSW4FCGxhbmRTaXplAidZb3UgaGF2ZW4ndCBwYXNzZWQgYWxsIHRoZSBsYW5kcyBuZWVkZWQECHNpemVzT3V0CQCsAgIJAK8CAgUHc2l6ZXNJbgUBaQkAsAICBQdzaXplc0luCQBkAgUBaQABBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBBQhsYW5kU2l6ZQQEYXJ0cwkAZAIIBQNhY2MCXzIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQAAAQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAECHJlcUxldmVsBAckbWF0Y2gwBQhsYW5kU2l6ZQMJAAACAgFTBQckbWF0Y2gwAAMDCQAAAgIBTQUHJG1hdGNoMAAEAwkAAAICAUwFByRtYXRjaDAABQMJAAACAgJYTAUHJG1hdGNoMAAGCQACAQIaT25seSBTLCBNLCBMLCBYTCBjYW4gbWVyZ2UDCQECIT0CBQppbmZyYUxldmVsBQhyZXFMZXZlbAkAAgECIkFsbCBsYW5kcyBzaG91bGQgYmUgbWF4ZWQgdG8gbWVyZ2UEB2xhbmROdW0JAJEDAgUBZAUKcmVjTGFuZE51bQQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIFAWQFC3JlY1RlcnJhaW5zBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUJc2F2ZWRUaW1lAwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQUJc2F2ZWRUaW1lAgwsIGN1cnJlbnQgPSAJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAEFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAQxhcHBseUJvbnVzZXMCBQtsYW5kQXNzZXRJZAUGcGllY2VzBAlsYW5kSW5kZXgJAGkCBQZwaWVjZXMFBVNTSVpFBAVicFJlcwkBBmFkZFJlcwUJALUJAggFA2FjYwJfNAIBXwUNdGVycmFpbkNvdW50cwUJZGVsdGFUaW1lBQlsYW5kSW5kZXgFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UEBXByb3BzCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQIBQNhY2MCXzYFDXRlcnJhaW5Db3VudHMFCWxhbmRJbmRleAD///////////8BBAZjUHJvcHMJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAgFA2FjYwNfMTAFDXRlcnJhaW5Db3VudHMFCWxhbmRJbmRleAD///////////8BBAtzdW1UZXJyYWlucwkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwECAUDYWNjAl85BQ10ZXJyYWluQ291bnRzBQlsYW5kSW5kZXgAAQQFbGFuZHMIBQNhY2MCXzcEA2lkeAkAzwgCBQVsYW5kcwULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQNpZHgJAAIBCQCsAgICIFlvdXIgc3Rha2VkIGxhbmRzIGRvbid0IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAQJY3VzdG9tS2V5CQEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBBQtsYW5kQXNzZXRJZAQKY3VzdG9tTmFtZQkBC3ZhbHVlT3JFbHNlAgkAoggBBQljdXN0b21LZXkCAAkAnAoKBQhzaXplc091dAUEYXJ0cwUJY29udGluZW50BQVicFJlcwkAzggCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAggFA2FjYwJfNQkBC0RlbGV0ZUVudHJ5AQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBEGtleUxhbmRUb0Fzc2V0SWQBBQdsYW5kTnVtCQELRGVsZXRlRW50cnkBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAQtEZWxldGVFbnRyeQEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQJAQtEZWxldGVFbnRyeQEJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQJAQtEZWxldGVFbnRyeQEJARFrZXlMYW5kTnVtVG9Pd25lcgEFB2xhbmROdW0JAQtEZWxldGVFbnRyeQEJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQUJY3VzdG9tS2V5CQEEQnVybgIJANkEAQULbGFuZEFzc2V0SWQAAQMJAQIhPQIFCmN1c3RvbU5hbWUCAAkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBBQpjdXN0b21OYW1lBQNuaWwFA25pbAUFcHJvcHMJANEIAgUFbGFuZHMJAQV2YWx1ZQEFA2lkeAkAZAIIBQNhY2MCXzgFBnBpZWNlcwULc3VtVGVycmFpbnMFBmNQcm9wcwQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkECHByb3BMaXN0CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBEWtleVJlc1Byb3BvcnRpb25zAAILMF8wXzBfMF8wXzACAV8ECGxhbmRzS2V5CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUEYWRkcgQIbGFuZHNTdHIJAKIIAQUIbGFuZHNLZXkEB2xhbmRzSW4DCQEJaXNEZWZpbmVkAQUIbGFuZHNTdHIJAL0JAgkBBXZhbHVlAQUIbGFuZHNTdHICAV8FA25pbAQFY29udDAJAJEDAgkAtQkCCAkBBXZhbHVlAQkA7AcBCQDZBAEJAJEDAgUMbGFuZEFzc2V0SWRzAAALZGVzY3JpcHRpb24CAV8FDHJlY0NvbnRpbmVudAQJY29udFByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBBQVjb250MAILMF8wXzBfMF8wXzACAV8EAXIKAAIkbAUMbGFuZEFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAnAoKBQdmb3JtdWxhAAACAAkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMFA25pbAUIcHJvcExpc3QFB2xhbmRzSW4AAAkAtQkCAgswXzBfMF8wXzBfMAIBXwUJY29udFByb3BzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpjaGVja01lcmdlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQQJY29udGluZW50CAUBcgJfMwQMY29udGluZW50SWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAM8IAgUKY29udGluZW50cwUJY29udGluZW50CQCsAgICE1Vua25vd24gY29udGluZW50OiAFCWNvbnRpbmVudAQIdGVycmFpbnMJARNnZW5UZXJyYWluc0Zvck1lcmdlAggFAXICXzkJAGkCCQEPbnVtUGllY2VzQnlTaXplAQULbmV3TGFuZFNpemUFBVNTSVpFBAdmcmVlTnVtCQELdmFsdWVPckVsc2UCCQCfCAEJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUPUFJFU0FMRU5VTUxBTkRTAAEECm5ld0xhbmROdW0JAKQDAQUHZnJlZU51bQQFaXNzdWUJAMIIBQkBB25mdE5hbWUCBQpuZXdMYW5kTnVtBQtuZXdMYW5kU2l6ZQkAuQkCCQDMCAIFCm5ld0xhbmROdW0JAMwIAgULbmV3TGFuZFNpemUJAMwIAgUIdGVycmFpbnMJAMwIAgUJY29udGluZW50BQNuaWwCAV8AAQAABwQHYXNzZXRJZAkAuAgBBQVpc3N1ZQQObmV3TGFuZEFzc2V0SWQJANgEAQUHYXNzZXRJZAQGbmV3TWF0CQC5CQIJARFzdWJ0cmFjdE1hdGVyaWFscwMJAGYCBQduZWVkTWF0AAAJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8FB25lZWRNYXQCAV8ECXBpZWNlc0tleQkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBQRhZGRyBAxzdGFrZWRQaWVjZXMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJcGllY2VzS2V5AAAJAJQKAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAggFAXICXzUDCQBmAgkAkAMBCAUBcgJfNwAACQELU3RyaW5nRW50cnkCBQhsYW5kc0tleQkAuwkCCAUBcgJfNwIBXwkBC0RlbGV0ZUVudHJ5AQUIbGFuZHNLZXkJAQxJbnRlZ2VyRW50cnkCBQlwaWVjZXNLZXkDCQBmAggFAXICXzgFDHN0YWtlZFBpZWNlcwAACQBlAgUMc3Rha2VkUGllY2VzCAUBcgJfOAkBDEludGVnZXJFbnRyeQIJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUHZnJlZU51bQABBQVpc3N1ZQkBC1N0cmluZ0VudHJ5AgkBEGtleUxhbmRUb0Fzc2V0SWQBBQpuZXdMYW5kTnVtBQ5uZXdMYW5kQXNzZXRJZAkBC1N0cmluZ0VudHJ5AgkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFDm5ld0xhbmRBc3NldElkBQRhZGRyCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQpuZXdMYW5kTnVtBQRhZGRyCQEMSW50ZWdlckVudHJ5AgkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQUObmV3TGFuZEFzc2V0SWQIBQFyAl8yCQEMSW50ZWdlckVudHJ5AgkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQ5uZXdMYW5kQXNzZXRJZAUIbmV3TGV2ZWwJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgUObmV3TGFuZEFzc2V0SWQFBGFkZHIFCG5ld0xldmVsCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAggFAXICXzQJAMwIAgUGbmV3TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6CQELU3RyaW5nRW50cnkCCQERa2V5UmVzUHJvcG9ydGlvbnMACQC5CQIIBQFyAl82AgFfCQELU3RyaW5nRW50cnkCCQEWa2V5UmVzVHlwZXNCeUNvbnRpbmVudAEFCWNvbnRpbmVudAkAuQkCCAUBcgNfMTACAV8JAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIFCWNvbnRpbmVudAkAzAgCAgFMCQDMCAIFDm5ld0xhbmRBc3NldElkBQNuaWwCAV8JAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGFkZHIAAQUHYXNzZXRJZAUObmV3TGFuZEFzc2V0SWQBA3MybQIEYWRkcgxsYW5kQXNzZXRJZHMJAQ1tZXJnZUludGVybmFsBgIBTQADAgRTU1NTBQRhZGRyBQxsYW5kQXNzZXRJZHMAAAEDbTJsAgRhZGRyDGxhbmRBc3NldElkcwkBDW1lcmdlSW50ZXJuYWwGAgFMAAQCA1NNTQUEYWRkcgUMbGFuZEFzc2V0SWRzCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMABAEEbDJ4bAIEYWRkcgxsYW5kQXNzZXRJZHMJAQ1tZXJnZUludGVybmFsBgICWEwABQIFU1NTTUwFBGFkZHIFDGxhbmRBc3NldElkcwkAaAIFEUluZnJhVXBncmFkZUNvc3RTAC8BBnhsMnh4bAIEYWRkcgxsYW5kQXNzZXRJZHMJAQ1tZXJnZUludGVybmFsBgIDWFhMAAYCA0xYTAUEYWRkcgUMbGFuZEFzc2V0SWRzCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMANgELbWVyZ2VDb21tb24CBGFkZHIMbGFuZEFzc2V0SWRzBAckbWF0Y2gwCQCQAwEFDGxhbmRBc3NldElkcwMJAAACAAQFByRtYXRjaDAJAQNzMm0CBQRhZGRyBQxsYW5kQXNzZXRJZHMDCQAAAgADBQckbWF0Y2gwCQEDbTJsAgUEYWRkcgUMbGFuZEFzc2V0SWRzAwkAAAIABQUHJG1hdGNoMAkBBGwyeGwCBQRhZGRyBQxsYW5kQXNzZXRJZHMDCQAAAgACBQckbWF0Y2gwCQEGeGwyeHhsAgUEYWRkcgUMbGFuZEFzc2V0SWRzCQACAQINVW5rbm93biBtZXJnZQEGcHJvbG9nAQFpAwMJAQIhPQIIBQFpDG9yaWdpbkNhbGxlcgUMcmVzdENvbnRyYWN0CQELdmFsdWVPckVsc2UCCQCgCAEJAQprZXlCbG9ja2VkAAcHCQACAQIfQ29udHJhY3RzIGFyZSB1bmRlciBtYWludGVuYW5jZQQIdXNlckFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBARkdWNrCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFCHVzZXJBZGRyCQDNCAIDAwURS1NfQUxMT1dfREVMSVZFUlkJAQlpc0RlZmluZWQBBQRkdWNrBwQLZHVja0Fzc2V0SWQJAQV2YWx1ZQEFBGR1Y2sEBmxvY0tleQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBANsb2MJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQZsb2NLZXkFD0RFRkFVTFRMT0NBVElPTgIBXwQJc3RhcnRUaW1lCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDbG9jBQ9sb2NJZHhDb250aW5lbnQDAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUQGCQBmAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAGQCBQlzdGFydFRpbWUFElRFTl9NSU5VVEVTX01JTExJUwUDbmlsBAloZWFsdGhLZXkJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQDCQBnAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2xvYwUIbG9jSWR4SWQAAwQGcmV3YXJkCQD8BwQFD2Vjb25vbXlDb250cmFjdAISc2VuZERlbGl2ZXJ5UmV3YXJkCQDMCAIFCHVzZXJBZGRyBQNuaWwFA25pbAMJAAACBQZyZXdhcmQFBnJld2FyZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDNCAIJAM0IAgQLbG9ja2VkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPZWNvbm9teUNvbnRyYWN0BRFkZWxpdmVyeUxvY2tlZEtleQAABAZ1bmxvY2sJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhR1cGRhdGVEZWxpdmVyeUxvY2tlZAkAzAgCCQBlAgULbG9ja2VkVG90YWwFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQUDbmlsBQNuaWwDCQAAAgUGdW5sb2NrBQZ1bmxvY2sDCQBnAgAACQERQGV4dHJOYXRpdmUoMTA1NSkBBQloZWFsdGhLZXkFA25pbAQKcHVuaXNobWVudAkA/AcEBQR0aGlzAgtzYXZlSW50ZWdlcgkAzAgCCQEWa2V5RGVsaXZlcnlEZWxheUJ5RHVjawEFC2R1Y2tBc3NldElkCQDMCAIJAGQCBQlzdGFydFRpbWUFCURBWU1JTExJUwUDbmlsBQNuaWwDCQAAAgUKcHVuaXNobWVudAUKcHVuaXNobWVudAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQEMSW50ZWdlckVudHJ5AgUJaGVhbHRoS2V5CQERQGV4dHJOYXRpdmUoMTA1NSkBCQEOa2V5U2F2ZWRIZWFsdGgBBQtkdWNrQXNzZXRJZAkBC1N0cmluZ0VudHJ5AgUGbG9jS2V5CQERQGV4dHJOYXRpdmUoMTA1OCkBCQEQa2V5U2F2ZWRMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQNuaWwJAQtTdHJpbmdFbnRyeQIJARFrZXlMYXN0VHhJZEJ5VXNlcgEFCHVzZXJBZGRyCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQBDHByb2xvZ0ZsaWdodAEBaQMDCQECIT0CCAUBaQxvcmlnaW5DYWxsZXIFDHJlc3RDb250cmFjdAkBC3ZhbHVlT3JFbHNlAgkAoAgBCQEKa2V5QmxvY2tlZAAHBwkAAgECH0NvbnRyYWN0cyBhcmUgdW5kZXIgbWFpbnRlbmFuY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhc3RUeElkQnlVc2VyAQkApQgBCAUBaQxvcmlnaW5DYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAUDbmlsLQFpAQ1jb25zdHJ1Y3RvclYxAQhyZXN0QWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlSZXN0QWRkcmVzcwAFCHJlc3RBZGRyBQNuaWwBaQELc2F2ZUludGVnZXICA2tleQZhbW91bnQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAiBzYXZlSW50ZWdlciBpcyBub3QgcHVibGljIG1ldGhvZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUDa2V5BQZhbW91bnQFA25pbAFpAQpzZXRCbG9ja2VkAQlpc0Jsb2NrZWQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBCmtleUJsb2NrZWQABQlpc0Jsb2NrZWQFA25pbAFpAQlzdGFrZUxhbmQABA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AggFA3BtdAZhbW91bnQAAQkAAgEJAKwCAgkArAICAgRORlQgBQpMQU5EUFJFRklYAiQgdG9rZW4gc2hvdWxkIGJlIGF0dGFjaGVkIGFzIHBheW1lbnQEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQR0aGlzCQACAQIXVW5rbm93biBpc3N1ZXIgb2YgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpMQU5EUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKTEFORFBSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQEC2xhbmROdW1TaXplCQCwAgIIBQVhc3NldARuYW1lAAQEB2xhbmROdW0DCQEIY29udGFpbnMCBQtsYW5kTnVtU2l6ZQIDWFhMCQCzAgIFC2xhbmROdW1TaXplAAMDCQEIY29udGFpbnMCBQtsYW5kTnVtU2l6ZQICWEwJALMCAgULbGFuZE51bVNpemUAAgkAswICBQtsYW5kTnVtU2l6ZQABAwkBASEBCQEJaXNEZWZpbmVkAQkAtgkBBQdsYW5kTnVtCQACAQkArAICAh5DYW5ub3QgcGFyc2UgbGFuZCBudW1iZXIgZnJvbSAIBQVhc3NldARuYW1lBAtsYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIFAWQFC3JlY1RlcnJhaW5zBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBAlsYW5kSW5kZXgJAGkCBQZwaWVjZXMFBVNTSVpFBAVwcm9wcwkBEXVwZGF0ZVByb3BvcnRpb25zAwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AAEEDHJlc0J5Q29udEtleQkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBCQCRAwIFAWQFDHJlY0NvbnRpbmVudAQJY29udFByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUMcmVzQnlDb250S2V5AgswXzBfMF8wXzBfMAIBXwQQdXBkYXRlZENvbnRQcm9wcwkAuQkCCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQFCWNvbnRQcm9wcwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AAECAV8ECGxhbmRzS2V5CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUHYWRkcmVzcwQIbGFuZHNTdHIJAKIIAQUIbGFuZHNLZXkEBWxhbmRzAwkBCWlzRGVmaW5lZAEFCGxhbmRzU3RyCQC9CQIJAQV2YWx1ZQEFCGxhbmRzU3RyAgFfBQNuaWwDCQEPY29udGFpbnNFbGVtZW50AgUFbGFuZHMFC2xhbmRBc3NldElkCQACAQkArAICAiJZb3VyIHN0YWtlZCBsYW5kcyBhbHJlYWR5IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAMJAGcCCQCQAwEFBWxhbmRzBRhNQVhfTEFORFNfU1RBS0VEX0JZX1VTRVIJAAIBCQCsAgIJAKwCAgIZWW91ciBhbHJlYWR5IHN0YWtlZCBtYXggKAkApAMBBRhNQVhfTEFORFNfU1RBS0VEX0JZX1VTRVICBykgbGFuZHMECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAlwaWVjZXNLZXkJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwQJb2xkUGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEFCXBpZWNlc0tleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQdhZGRyZXNzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQELU3RyaW5nRW50cnkCBQhsYW5kc0tleQkAuwkCCQDNCAIFBWxhbmRzBQtsYW5kQXNzZXRJZAIBXwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJcGllY2VzS2V5CQBkAgUJb2xkUGllY2VzBQZwaWVjZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFB2xhbmROdW0FB2FkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwUKaW5mcmFMZXZlbAkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5UmVzUHJvcG9ydGlvbnMABQVwcm9wcwkAzAgCCQELU3RyaW5nRW50cnkCBQxyZXNCeUNvbnRLZXkFEHVwZGF0ZWRDb250UHJvcHMFA25pbAUNcHJvbG9nQWN0aW9ucwUJd2xnUmVzdWx0AWkBC3Vuc3Rha2VMYW5kAQ1sYW5kQXNzZXRJZEluBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpBmNhbGxlcgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUNY2xhaW1Nb2RlRHVjawUNbGFuZEFzc2V0SWRJbgQLbGFuZEFzc2V0SWQIBQFjAl8yBAFkCAUBYwJfMwQIbGFuZHNLZXkJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQRhZGRyBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgUBZAULcmVjTGFuZFNpemUECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUEBXByb3BzCQERdXBkYXRlUHJvcG9ydGlvbnMDBQ10ZXJyYWluQ291bnRzBQlsYW5kSW5kZXgA////////////AQQMcmVzQnlDb250S2V5CQEWa2V5UmVzVHlwZXNCeUNvbnRpbmVudAEJAJEDAgUBZAUMcmVjQ29udGluZW50BAljb250UHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQxyZXNCeUNvbnRLZXkCCzBfMF8wXzBfMF8wAgFfBBB1cGRhdGVkQ29udFByb3BzCQC5CQIJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAUJY29udFByb3BzBQ10ZXJyYWluQ291bnRzBQlsYW5kSW5kZXgA////////////AQIBXwQLY2xhaW1SZXN1bHQJAQhjbGFpbUFsbAQFBGFkZHIFC2xhbmRBc3NldElkBQZwaWVjZXMFDWNsYWltTW9kZUR1Y2sEBWxhbmRzCQC9CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUIbGFuZHNLZXkCAAIBXwQDaWR4CQDPCAIFBWxhbmRzBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEFA2lkeAkAAgEJAKwCAgIgWW91ciBzdGFrZWQgbGFuZHMgZG9uJ3QgY29udGFpbiAFC2xhbmRBc3NldElkBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBA5nb3ZSZWxlYXNlVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQtnb3ZDb250cmFjdAkBFWtleVVzZXJHd2xSZWxlYXNlVGltZQEFBGFkZHIAAAMJAGcCBQ5nb3ZSZWxlYXNlVGltZQUDbm93CQACAQkArAICAjlZb3VyIGdXTCBhcmUgdGFraW5nIHBhcnQgaW4gdm90aW5nLCBjYW5ub3QgdW5zdGFrZSB1bnRpbCAJAKQDAQUOZ292UmVsZWFzZVRpbWUEDmFyYlJlbGVhc2VUaW1lCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQt3bGdDb250cmFjdAkBFGtleUxhc3RBcmJUaW1lQnlVc2VyAQUEYWRkcgAABQ5hcmJpdHJhZ2VEZWxheQMJAGYCBQ5hcmJSZWxlYXNlVGltZQUDbm93CQACAQkArAICAj9Zb3VyIHN0YWtlZCBsYW5kcyB0b29rIHBhcnQgaW4gYXJiaXRyYWdlLCBjYW5ub3QgdW5zdGFrZSB1bnRpbCAJAKQDAQUOYXJiUmVsZWFzZVRpbWUECXBpZWNlc0tleQkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBQRhZGRyBAxzdGFrZWRQaWVjZXMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJcGllY2VzS2V5AAAECW5ld1BpZWNlcwMJAGYCBQZwaWVjZXMFDHN0YWtlZFBpZWNlcwAACQBlAgUMc3Rha2VkUGllY2VzBQZwaWVjZXMECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFBGFkZHIFA25pbAUDbmlsCQCUCgIJAM4IAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQkA2QQBBQtsYW5kQXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKTEFORFBSRUZJWAULbGFuZEFzc2V0SWQFBGFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMJAMwIAgkBC1N0cmluZ0VudHJ5AgUMcmVzQnlDb250S2V5BRB1cGRhdGVkQ29udFByb3BzCQDMCAIJAQtTdHJpbmdFbnRyeQIIBQtjbGFpbVJlc3VsdAJfMgkAuQkCCAULY2xhaW1SZXN1bHQCXzMCAToJAMwIAgMJAGYCCQCQAwEFBWxhbmRzAAEJAQtTdHJpbmdFbnRyeQIFCGxhbmRzS2V5CQC7CQIJANEIAgUFbGFuZHMJAQV2YWx1ZQEFA2lkeAIBXwkBC0RlbGV0ZUVudHJ5AQUIbGFuZHNLZXkJAMwIAgkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQUJbmV3UGllY2VzBQNuaWwFDXByb2xvZ0FjdGlvbnMFCXdsZ1Jlc3VsdAFpAQlzdGFrZUR1Y2sABA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AggFA3BtdAZhbW91bnQAAQkAAgEJAKwCAgkArAICAgRORlQgBQpEVUNLUFJFRklYAiQgdG9rZW4gc2hvdWxkIGJlIGF0dGFjaGVkIGFzIHBheW1lbnQEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUNaW5jdWJhdG9yQWRkcgkBAiE9AggFBWFzc2V0Bmlzc3VlcgULYnJlZWRlckFkZHIHCQACAQkArAICCQCsAgICElVua25vd24gaXNzdWVyIG9mIAUKRFVDS1BSRUZJWAIGIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKRFVDS1BSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkRVQ0tQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAphc3NldElkU3RyCQDYBAEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUKYXNzZXRJZFN0cgMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAMJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAAIBCQCsAgICHVlvdSBhbHJlYWR5IHN0YWtlZCBvbmUgZHVjazogCAUFYXNzZXQEbmFtZQQGbG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQUKYXNzZXRJZFN0cgQIbG9jYXRpb24JAKIIAQUGbG9jS2V5BAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQUKYXNzZXRJZFN0cgQIYmFja3BhY2sJAKIIAQUFYnBLZXkECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQphc3NldElkU3RyBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFCmFzc2V0SWRTdHIAAAQJY3VySGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFAJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUHdGltZUtleQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKRFVDS1BSRUZJWAkA2AQBBQdhc3NldElkBQdhZGRyZXNzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5RHVja0lkVG9Pd25lcgEFCmFzc2V0SWRTdHIFB2FkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwUKYXNzZXRJZFN0cgUDbmlsAwkBCWlzRGVmaW5lZAEFCGxvY2F0aW9uBQNuaWwJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQZsb2NLZXkFD0RFRkFVTFRMT0NBVElPTgUDbmlsAwkBCWlzRGVmaW5lZAEFCGJhY2twYWNrBQNuaWwJAM4IAgkAzQgCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5AhowOjBfMF8wXzBfMF8wOjBfMF8wXzBfMF8wOgUDbmlsCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQljdXJIZWFsdGgFDXByb2xvZ0FjdGlvbnMBaQELdW5zdGFrZUR1Y2sBCmFzc2V0SWRTdHIEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB2Fzc2V0SWQJANkEAQUKYXNzZXRJZFN0cgQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUKYXNzZXRJZFN0cgMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQDCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAAIBCQCsAgIJAKwCAgIJVGhlIGR1Y2sgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBEGtleUR1Y2tJZFRvT3duZXIBBQphc3NldElkU3RyCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQdhZGRyZXNzCQACAQIXU3Rha2VkIE5GVCBpcyBub3QgeW91cnMDCQEPY2hlY2tUb3VybmFtZW50AQUKYXNzZXRJZFN0cgkAAgECG3Vuc3Rha2VEdWNrX2NoZWNrVG91cm5hbWVudAMJAQ1jaGVja0RlbGl2ZXJ5AQUKYXNzZXRJZFN0cgkAAgECGXVuc3Rha2VEdWNrX2NoZWNrRGVsaXZlcnkECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQphc3NldElkU3RyBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFCmFzc2V0SWRTdHIAAAQGaGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFADCQBmAgUFbWF4SFAFBmhlYWx0aAkAAgEJAKwCAgkArAICAhlQbGVhc2UgaGVhbCB5b3VyIGR1Y2sgdG8gCQCkAwEFBW1heEhQAhNocCBiZWZvcmUgdW5zdGFraW5nCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQUHdGltZUtleQkAzAgCCQELRGVsZXRlRW50cnkBBQlrZXlIZWFsdGgJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBD2tleUR1Y2tMb2NhdGlvbgEFCmFzc2V0SWRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBEGtleUR1Y2tJZFRvT3duZXIBBQphc3NldElkU3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKRFVDS1BSRUZJWAUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELRGVsZXRlRW50cnkBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQNuaWwFDXByb2xvZ0FjdGlvbnMBaQEIY2xhaW1SZXMCBmFtb3VudA5sYW5kQXNzZXRJZFN0cgQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBnJlc3VsdAkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQZhbW91bnQFDWNsYWltTW9kZUR1Y2sFDmxhbmRBc3NldElkU3RyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQJAJQKAgkAzggCCQDNCAIJAM0IAgkAzggCCAUGcmVzdWx0Al8xCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQJAGsDBQd4cENsYWltBQZhbW91bnQFBU1VTFQ4Al8xCQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al8yCQC5CQIIBQZyZXN1bHQCXzMCAToJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzQJALkJAggFBnJlc3VsdAJfNQIBOgUNcHJvbG9nQWN0aW9ucwkAkQMCCAUGcmVzdWx0Al8zBQhicElkeFJlcwFpAQxjbGFpbVJlc1RvV0gCBmFtb3VudA5sYW5kQXNzZXRJZFN0cgQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBnJlc3VsdAkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQZhbW91bnQFC2NsYWltTW9kZVdoBQ5sYW5kQXNzZXRJZFN0cgkAlAoCCQDOCAIJAM0IAgkAzQgCCQDOCAIIBQZyZXN1bHQCXzEICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIFBGFkZHIJAGsDBQd4cENsYWltBQZhbW91bnQFBU1VTFQ4Al8xCQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al8yCQC5CQIIBQZyZXN1bHQCXzMCAToJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzQJALkJAggFBnJlc3VsdAJfNQIBOgUNcHJvbG9nQWN0aW9ucwkAkQMCCAUGcmVzdWx0Al81BQh3aElkeFJlcwFpAQZmbGlnaHQCB21lc3NhZ2UDc2lnBA1wcm9sb2dBY3Rpb25zCQEMcHJvbG9nRmxpZ2h0AQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAh1c2VyQWRkcgkApQgBCAUBaQZjYWxsZXIEAWYJAQxmbGlnaHRDb21tb24DBQh1c2VyQWRkcgUHbWVzc2FnZQUDc2lnBAVuZXdIUAgFAWYCXzEEC2R1Y2tBc3NldElkCAUBZgJfMgQGbG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCiCAEFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBAtuZXdMb2NhdGlvbggFAWYCXzQDCQAAAgULbmV3TG9jYXRpb24FC2N1ckxvY2F0aW9uCQACAQIiWW91IGNhbid0IGZseSB0byB0aGUgc2FtZSBsb2NhdGlvbgQGbmV3TG9jCQC1CQIFC25ld0xvY2F0aW9uAgFfBAZpc1RvdXIJAAACCQCRAwIFBm5ld0xvYwUKbG9jSWR4VHlwZQIBVAQHaXNEZWxpdgkAAAIJAJEDAgUGbmV3TG9jBQpsb2NJZHhUeXBlAgFEBAVlcUtleQkBEGtleUR1Y2tFcXVpcG1lbnQBBQtkdWNrQXNzZXRJZAQJY3VycmVudEVxCQELdmFsdWVPckVsc2UCCQCiCAEFBWVxS2V5AhcsOyxfLDssXyw7LF8sOyxfLDssXyw7LAQNJHQwNzAyMTI3MDMwOQkBEXN1YnRyYWN0RXF1aXBtZW50AgUJY3VycmVudEVxCAUBZgJfNQQFbmV3RXEIBQ0kdDA3MDIxMjcwMzA5Al8xBA9zaG91bGRaZXJvQnVmZnMIBQ0kdDA3MDIxMjcwMzA5Al8yBA0kdDA3MDMxMjczMzUxAwkBDG5vdE9uTWlzc2lvbgIFEnRvdXJuYW1lbnRDb250cmFjdAULY3VyTG9jYXRpb24DCQEBIQEJAQ9pc1VzdWFsTG9jYXRpb24BBQtuZXdMb2NhdGlvbgkBDGNoZWF0QXR0ZW1wdAIFC2N1ckxvY2F0aW9uBQtuZXdMb2NhdGlvbgMJAGYCBQVuZXdIUAAACQCUCgIFC25ld0xvY2F0aW9uBQVuZXdIUAkAlAoCBQtjdXJMb2NhdGlvbgAAAwkBDmlzSW5Ub3VybmFtZW50AgUSdG91cm5hbWVudENvbnRyYWN0BQtjdXJMb2NhdGlvbgMJAQEhAQkBDmlzSW5Ub3VybmFtZW50AgUSdG91cm5hbWVudENvbnRyYWN0BQtuZXdMb2NhdGlvbgkAAgECKllvdXIgZHVjayBpcyB0YWtpbmcgcGFydCBpbiB0aGUgdG91cm5hbWVudAQFc2NvcmUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZuZXdMb2MFCGxvY0lkeElkBAZjdXJMb2MJALUJAgULY3VyTG9jYXRpb24CAV8EBmxhc3RJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRJ0b3VybmFtZW50Q29udHJhY3QFDWxhc3RUb3VySWRLZXkAAAMJAQIhPQIFBXNjb3JlCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBmN1ckxvYwUIbG9jSWR4SWQAAQkBDGNoZWF0QXR0ZW1wdAIFC2N1ckxvY2F0aW9uBQtuZXdMb2NhdGlvbgMJAGYCBQVuZXdIUAAABAlsb2NhbEJlc3QJAQt2YWx1ZU9yRWxzZQIJAJoIAgUSdG91cm5hbWVudENvbnRyYWN0CQEaa2V5QmVzdFJlc3VsdEJ5VG91ckFuZER1Y2sCBQZsYXN0SWQFC2R1Y2tBc3NldElkAAAECHVwZExvY2FsAwkAZgIFBXNjb3JlBQlsb2NhbEJlc3QJAPwHBAUSdG91cm5hbWVudENvbnRyYWN0Ag5zYXZlRHVja1Jlc3VsdAkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQVzY29yZQUDbmlsBQNuaWwFBHVuaXQDCQAAAgUIdXBkTG9jYWwFCHVwZExvY2FsCQCUCgIFC25ld0xvY2F0aW9uBQVuZXdIUAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlAoCBQtjdXJMb2NhdGlvbgAAAwkBASEBCQEMaXNJbkRlbGl2ZXJ5AQULY3VyTG9jYXRpb24ECWxvY0hlYWx0aAkBEGFzU3RyaW5nSW50VHVwbGUBCQD8BwQFBHRoaXMCEGF1dG9FeGl0RGVsaXZlcnkJAMwIAgULZHVja0Fzc2V0SWQFA25pbAUDbmlsAwkAAAIFCWxvY0hlYWx0aAUJbG9jSGVhbHRoAwUHaXNEZWxpdgUJbG9jSGVhbHRoAwkAZgIFBW5ld0hQAAAJAJQKAgULbmV3TG9jYXRpb24FBW5ld0hQCQCUCgIIBQlsb2NIZWFsdGgCXzEAAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAQEhAQUHaXNEZWxpdgkAAgECJFlvdXIgZHVjayBpcyB0YWtpbmcgcGFydCBpbiBkZWxpdmVyeQMJAQEhAQkBDGlzSW5EZWxpdmVyeQEFC25ld0xvY2F0aW9uCQEMY2hlYXRBdHRlbXB0AgULY3VyTG9jYXRpb24FC25ld0xvY2F0aW9uBAVzY29yZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBm5ld0xvYwUIbG9jSWR4SWQEBmN1ckxvYwkAtQkCBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIFBXNjb3JlCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBmN1ckxvYwUIbG9jSWR4SWQAAQkBDGNoZWF0QXR0ZW1wdAIFC2N1ckxvY2F0aW9uBQtuZXdMb2NhdGlvbgMDCQBmAgUFbmV3SFAAAAkAZgIAAwUFc2NvcmUHCQCUCgIFC25ld0xvY2F0aW9uBQVuZXdIUAQJbG9jSGVhbHRoCQEQYXNTdHJpbmdJbnRUdXBsZQEJAPwHBAUEdGhpcwIQYXV0b0V4aXREZWxpdmVyeQkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsBQNuaWwDCQAAAgUJbG9jSGVhbHRoBQlsb2NIZWFsdGgFCWxvY0hlYWx0aAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQJbG9jVG9TYXZlCAUNJHQwNzAzMTI3MzM1MQJfMQQIaHBUb1NhdmUIBQ0kdDA3MDMxMjczMzUxAl8yCQCUCgIJAM4IAgkAzggCCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUGbG9jS2V5BQlsb2NUb1NhdmUJAMwIAgkBC1N0cmluZ0VudHJ5AgUFZXFLZXkFBW5ld0VxCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBQVuZXdIUAUDbmlsBQ1wcm9sb2dBY3Rpb25zAwUPc2hvdWxkWmVyb0J1ZmZzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQxrZXlEdWNrQnVmZnMBBQtkdWNrQXNzZXRJZAIJMF8wXzBfMF8wBQNuaWwFA25pbAgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkAwkAZgIFBW5ld0hQAAAFD3hwU3VjY2Vzc0ZsaWdodAUMeHBGYWlsRmxpZ2h0Al8xCAUBZgJfMwFpAQRoZWFsAwpxdWFudGl0eUwxCnF1YW50aXR5TDIKcXVhbnRpdHlMMwQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDAwMJAGYCAAAFCnF1YW50aXR5TDEGCQBmAgAABQpxdWFudGl0eUwyBgkAZgIAAAUKcXVhbnRpdHlMMwkAAgECG1F1YW50aXR5IGNhbm5vdCBiZSBuZWdhdGl2ZQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECFGhlYWxfY2hlY2tUb3VybmFtZW50AwkBDWNoZWNrRGVsaXZlcnkBBQtkdWNrQXNzZXRJZAkAAgECEmhlYWxfY2hlY2tEZWxpdmVyeQQDcXRzCQDMCAIFCnF1YW50aXR5TDEJAMwIAgUKcXVhbnRpdHlMMgkAzAgCBQpxdWFudGl0eUwzBQNuaWwECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAMJAGcCBQlvbGRIZWFsdGgFBW1heEhQCQACAQkArAICCQCsAgICD0hQIHNob3VsZCBiZSA8IAkApAMBBQVtYXhIUAIIIHRvIGhlYWwEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAhwcm9kTGlzdAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwoBC2l0ZXJhdGVQcm9kAgNhY2MGcmVjaXBlBAFuCAUDYWNjAl8yBAF4AwkAZgIJAJADAQUIcHJvZExpc3QFAW4JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAUBbgAAAwkAZgIAAwUBbgQBcQkAkQMCBQNxdHMFAW4DCQBmAgUBcQUBeAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQCkAwEFAXgCBCBvZiAJAJEDAgUJcHJvZFR5cGVzBQFuCQCVCgMJAM0IAggFA2FjYwJfMQkApAMBCQBlAgUBeAUBcQkAZAIFAW4AAQkAZAIIBQNhY2MCXzMJAGgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCBQZyZWNpcGUCAV8FCnJJZHhFZmZlY3QFAXEJAJUKAwkAzQgCCAUDYWNjAl8xCQCkAwEFAXgJAGQCBQFuAAEIBQNhY2MCXzMEBnJlc3VsdAoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQtpdGVyYXRlUHJvZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyBAluZXdIZWFsdGgJAJcDAQkAzAgCBQVtYXhIUAkAzAgCCQBkAgUJb2xkSGVhbHRoCAUGcmVzdWx0Al8zBQNuaWwJAJQKAgkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUJbmV3SGVhbHRoCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCCQC5CQIIBQZyZXN1bHQCXzECAV8FA25pbAIBOgUDbmlsBQ1wcm9sb2dBY3Rpb25zCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQJAGgCBQZ4cEhlYWwJAGQCCQBkAgUKcXVhbnRpdHlMMQUKcXVhbnRpdHlMMgUKcXVhbnRpdHlMMwJfMQUJbmV3SGVhbHRoAWkBBmhlYWxFUwAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAhZoZWFsRVNfY2hlY2tUb3VybmFtZW50AwkBDWNoZWNrRGVsaXZlcnkBBQtkdWNrQXNzZXRJZAkAAgECFGhlYWxFU19jaGVja0RlbGl2ZXJ5BAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQAAAQJb2xkSGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFADCQBmAgUJb2xkSGVhbHRoAAAJAAIBAihIUCBzaG91bGQgYmUgMCB0byBjYWxsIEVtZXJnZW5jeSBTZXJ2aWNlBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQIcHJvZExpc3QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAvAkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8EDW1lZEtpdEFtb3VudDEDCQBmAgkAkAMBBQhwcm9kTGlzdAAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QAAAAABA1tZWRLaXRBbW91bnQyAwkAZgIJAJADAQUIcHJvZExpc3QAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0AAEAAAQNbWVkS2l0QW1vdW50MwMJAGYCCQCQAwEFCHByb2RMaXN0AAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAACAAADAwMJAGYCBQ1tZWRLaXRBbW91bnQxAAAGCQBmAgUNbWVkS2l0QW1vdW50MgAABgkAZgIFDW1lZEtpdEFtb3VudDMAAAkAAgECH1lvdSBoYXZlIHRvIHVzZSBvd24gTWVkaWNhbCBLaXQECGV4aXN0U3RyCQCdCAIFD2Vjb25vbXlDb250cmFjdAkBDmtleUVzV2FyZWhvdXNlAAQMZXhpc3RBbW91bnRzAwkBCWlzRGVmaW5lZAEFCGV4aXN0U3RyCQC8CQIJAQV2YWx1ZQEFCGV4aXN0U3RyAgFfBQNuaWwEC2V4aXN0QW1vdW50AwkAZgIJAJADAQUMZXhpc3RBbW91bnRzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxleGlzdEFtb3VudHMAAAAAAwkAZwIAAAULZXhpc3RBbW91bnQJAAIBAjlUaGVyZSBhcmUgbm8gTWVkaWNhbCBLaXRzIEwxIGF0IEVtZXJnZW5jeSBTZXJ2aWNlIHN0b3JhZ2UECW5ld0hlYWx0aAkAZAIFCW9sZEhlYWx0aAkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4AAACAV8FCnJJZHhFZmZlY3QEBW5ld0VTCQC5CQIJAMwIAgkApAMBCQBlAgULZXhpc3RBbW91bnQAAQkA0QgCBQxleGlzdEFtb3VudHMAAAIBXwQGcmVjaXBlCQC1CQIJAJEDAgUQcHJvZHVjdGlvbk1hdHJpeAAAAgFfBAh0b3RhbE1hdAkBEmdldFJlY2lwZU1hdGVyaWFscwEFBnJlY2lwZQQJc2VsbFByaWNlCQBrAwkAaAIFCHRvdGFsTWF0BQpFU1NFTExDT0VGBRBSRVNPVVJDRVBSSUNFTUlOCQBoAgUFTVVMVDgFDlBST0RVQ1RQS0dTSVpFAwkBAiE9AggFA3BtdAZhbW91bnQFCXNlbGxQcmljZQkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFCXNlbGxQcmljZQQGcmVzdWx0CQEIYXNTdHJpbmcBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIPdXBkYXRlRXNTdG9yYWdlCQDMCAIFBW5ld0VTBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFC3VzZHRBc3NldElkBQlzZWxsUHJpY2UFA25pbAkAlAoCCQDOCAIJAM0IAgUNcHJvbG9nQWN0aW9ucwkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUJbmV3SGVhbHRoCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQFCHhwQ2FsbEVTAl8xBQZyZXN1bHQBaQEOdXBkYXRlQmFja3BhY2sCC2R1Y2tBc3NldElkB25ld1BhY2sDCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECEXBlcm1pc3Npb24gZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQFB25ld1BhY2sFA25pbAUHbmV3UGFjawFpAQ9jb21taXRGb3JSYW5kb20ABA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQQLZmluaXNoQmxvY2sJAGQCBQZoZWlnaHQFC3JhbmRvbURlbGF5BARhZGRyCQClCAEIBQFpBmNhbGxlcgkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQlrZXlDb21taXQBBQRhZGRyBQtmaW5pc2hCbG9jawUDbmlsBQ1wcm9sb2dBY3Rpb25zBQtmaW5pc2hCbG9jawFpAQhidXlTTGFuZAAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEDCQECIT0CCAUDcG10BmFtb3VudAUHRVhQVVNEVAkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFB0VYUFVTRFQEBnJlc3VsdAkBEmV4cGVkaXRpb25JbnRlcm5hbAIIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAQLYWNyZXNSZXN1bHQJAQVhc0ludAEJAPwHBAUNYWNyZXNDb250cmFjdAIJYnVybkFjcmVzCQDMCAIFDFNfQ09TVF9BQ1JFUwUDbmlsBQNuaWwJAJQKAgkAzggCCQDOCAIJAM0IAggFBnJlc3VsdAJfMQkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0CAUDcG10BmFtb3VudAULdXNkdEFzc2V0SWQICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQp4cE5ld1NMYW5kAl8xBQ1wcm9sb2dBY3Rpb25zCQCUCgIICAUGcmVzdWx0Al8yAl8xBQthY3Jlc1Jlc3VsdAFpAQpleHBlZGl0aW9uAgdtZXNzYWdlA3NpZwQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQIdXNlckFkZHIJAKUIAQgFAWkGY2FsbGVyBAFmCQEMZmxpZ2h0Q29tbW9uAwUIdXNlckFkZHIFB21lc3NhZ2UFA3NpZwQLZHVja0Fzc2V0SWQIBQFmAl8yBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVtTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQGbmV3TWF0CQC5CQIJARFzdWJ0cmFjdE1hdGVyaWFscwMGBQVtTGlzdAUMRVhQTUFURVJJQUxTAgFfBAVlcUtleQkBEGtleUR1Y2tFcXVpcG1lbnQBBQtkdWNrQXNzZXRJZAQJY3VycmVudEVxCQELdmFsdWVPckVsc2UCCQCiCAEFBWVxS2V5AhcsOyxfLDssXyw7LF8sOyxfLDssXyw7LAQNJHQwODA3ODg4MDg4NQkBEXN1YnRyYWN0RXF1aXBtZW50AgUJY3VycmVudEVxCAUBZgJfNQQFbmV3RXEIBQ0kdDA4MDc4ODgwODg1Al8xBA9zaG91bGRaZXJvQnVmZnMIBQ0kdDA4MDc4ODgwODg1Al8yBAFlCQESZXhwZWRpdGlvbkludGVybmFsAggFAWkGY2FsbGVyCAUBaQ10cmFuc2FjdGlvbklkBAJpZAgIBQFlAl8yAl8xBAZyZXN1bHQDCQBnAgAACAUBZgJfMQkAlQoDCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgAAAkAzAgCCQELU3RyaW5nRW50cnkCBQVlcUtleQUFbmV3RXEFA25pbAIAAAAJAJUKAwkAzggCCAUBZQJfMQMFD3Nob3VsZFplcm9CdWZmcwkAzAgCCQELU3RyaW5nRW50cnkCCQEMa2V5RHVja0J1ZmZzAQULZHVja0Fzc2V0SWQCCTBfMF8wXzBfMAUDbmlsCQDNCAIJAM0IAgkAzQgCCQDNCAIFA25pbAkBC1N0cmluZ0VudHJ5AgkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkCQC5CQIJAMwIAggIBQFlAl8yAl8yCQDMCAICAUwJAMwIAgUCaWQFA25pbAIBXwkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAgFAWYCXzEJAQtTdHJpbmdFbnRyeQIFBWVxS2V5BQVuZXdFcQkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgUCaWQIBQFmAl8zAwkBD2NoZWNrVG91cm5hbWVudAEFC2R1Y2tBc3NldElkCQACAQIaZXhwZWRpdGlvbl9jaGVja1RvdXJuYW1lbnQDCQENY2hlY2tEZWxpdmVyeQEFC2R1Y2tBc3NldElkCQACAQIYZXhwZWRpdGlvbl9jaGVja0RlbGl2ZXJ5BAthY3Jlc1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ1hY3Jlc0NvbnRyYWN0AglidXJuQWNyZXMJAMwIAgUMU19DT1NUX0FDUkVTBQNuaWwFA25pbAkAlAoCCQDOCAIJAM4IAggFBnJlc3VsdAJfMQgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkBQp4cE5ld1NMYW5kAl8xBQ1wcm9sb2dBY3Rpb25zCQCVCgMIBQZyZXN1bHQCXzIIBQZyZXN1bHQCXzMFC2FjcmVzUmVzdWx0AWkBEGJ1eVNMYW5kRm9yQWNyZXMABA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEDCQECIT0CBQNhbXQFDFNfQ09TVF9BQ1JFUwkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFDFNfQ09TVF9BQ1JFUwQGcmVzdWx0CQESZXhwZWRpdGlvbkludGVybmFsAggFAWkGY2FsbGVyCAUBaQ10cmFuc2FjdGlvbklkBAthY3Jlc1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ1hY3Jlc0NvbnRyYWN0AglidXJuQWNyZXMJAMwIAgUMU19DT1NUX0FDUkVTBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFDGFjcmVzQXNzZXRJZAUDYW10BQNuaWwJAJQKAgkAzggCCQDOCAIIBQZyZXN1bHQCXzEICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQp4cE5ld1NMYW5kAl8xBQ1wcm9sb2dBY3Rpb25zCQCUCgIICAUGcmVzdWx0Al8yAl8xBQthY3Jlc1Jlc3VsdAFpAQx1cGdyYWRlSW5mcmEBC2xhbmRBc3NldElkBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAZyZXN1bHQJAQ11cEluZnJhQ29tbW9uBAYIBQFpBmNhbGxlcgAABQtsYW5kQXNzZXRJZAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAkAlAoCCQDOCAIJAM4IAggFBnJlc3VsdAJfMQUNcHJvbG9nQWN0aW9ucwgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkCQBrAwUOeHBVcGdyYWRlSW5mcmEIBQZyZXN1bHQCXzMFBU1VTFQ4Al8xCAUGcmVzdWx0Al8yAWkBEGFjdGl2YXRlQXJ0aWZhY3QCB2FydE5hbWUObGFuZEFzc2V0SWRPcHQEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAZyZXN1bHQEByRtYXRjaDAFB2FydE5hbWUDCQAAAgIHUFJFU0FMRQUHJG1hdGNoMAkBEmFjdGl2YXRlUHJlc2FsZUFydAIFBGFkZHIFDmxhbmRBc3NldElkT3B0AwkAAAICB09OQk9BUkQFByRtYXRjaDAJARJhY3RpdmF0ZU9uYm9hcmRBcnQBBQRhZGRyCQACAQIQVW5rbm93biBhcnRpZmFjdAkAzggCBQZyZXN1bHQFDXByb2xvZ0FjdGlvbnMBaQEKbWVyZ2VMYW5kcwEMbGFuZEFzc2V0SWRzBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAZyZXN1bHQJAQttZXJnZUNvbW1vbgIJAKUIAQgFAWkGY2FsbGVyBQxsYW5kQXNzZXRJZHMJAJQKAgkAzggCCQDOCAIIBQZyZXN1bHQCXzEFDXByb2xvZ0FjdGlvbnMICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQd4cE1lcmdlAl8xCAUGcmVzdWx0Al8yAWkBDWNhcmdvRXhjaGFuZ2UCDGNhcmdvTGlzdFN0cgtsYW5kQXNzZXRJZAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQKY2FyZ29QYXJ0cwkAvAkCBQxjYXJnb0xpc3RTdHICAToEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUFBVNTSVpFBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgQDbG9jCQC1CQIJAQV2YWx1ZQEFC2N1ckxvY2F0aW9uAgFfAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUwJAAIBCQCsAgIJAKwCAgIWRHVjayBsb2NhdGlvbiB0eXBlIGlzIAkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCESwgYnV0IHNob3VsZCBiZSBMAwkBAiE9AgkAkQMCBQNsb2MFCGxvY0lkeElkBQtsYW5kQXNzZXRJZAkAAgEJAKwCAgIbRHVjayBzaG91bGQgYmUgb24gdGhlIGxhbmQgBQtsYW5kQXNzZXRJZAQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAQJY3VycmVudFdoCQEMZ2V0V2FyZWhvdXNlAwUFd2hLZXkFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBnJlc3VsdAkBCW1vdmVTdHVmZgMFCmNhcmdvUGFydHMFCWN1cnJlbnRXaAULY3VycmVudFBhY2sEBGxvZnQJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAIBXwQFbG9mdE8JAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQIBQZyZXN1bHQCXzcEBWxvZnRGCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUIBQZyZXN1bHQCXzcJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAugkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAggFBnJlc3VsdAJfNAkAzAgCCAUGcmVzdWx0Al81CQDMCAIIBQZyZXN1bHQCXzYFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCBQV3aEtleQkAugkCCQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCCAUGcmVzdWx0Al8xCQDMCAIIBQZyZXN1bHQCXzIJAMwIAggFBnJlc3VsdAJfMwkAzAgCCQC5CQIJAMwIAgkAkQMCBQRsb2Z0BQl2b2xMb2NrZWQJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAJEDAgUEbG9mdAUIdm9sVG90YWwFA25pbAIBXwUDbmlsAgE6BQNuaWwFDXByb2xvZ0FjdGlvbnMBaQENc2F2ZVdhcmVob3VzZQIFd2hTdHILbGFuZEFzc2V0SWQDCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQEAndoCQC8CQIFBXdoU3RyAgE6AwkBAiE9AgkAkAMBBQJ3aAAFCQACAQIwd2FyZWhvdXNlIHN0cmluZyBzaG91bGQgY29udGFpbiA0ICc6JyBzZXBhcmF0b3JzBAVsb2Z0TAkAkQMCCQC1CQIJAJEDAgUCd2gFCXdoSWR4TE9GVAIBXwUJdm9sTG9ja2VkBAVsb2Z0TwkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUCd2gEBWxvZnRUCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFAndoBQt3aElkeExldmVscwQFbG9mdEYJAGUCCQBlAgUFbG9mdFQJAQ1wYXJzZUludFZhbHVlAQUFbG9mdEwFBWxvZnRPBAhuZXdXaFN0cgkAugkCCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIJAJEDAgUCd2gFCHdoSWR4UmVzCQDMCAIJAJEDAgUCd2gFCHdoSWR4TWF0CQDMCAIJAJEDAgUCd2gFCXdoSWR4UHJvZAkAzAgCCQC5CQIJAMwIAgUFbG9mdEwJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAKQDAQUFbG9mdFQFA25pbAIBXwUDbmlsAgE6CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFd2hLZXkFCG5ld1doU3RyBQNuaWwFCG5ld1doU3RyAWkBEmZpeFdhcmVob3VzZUZvcm1hdAELbGFuZEFzc2V0SWQDCQECIT0CCAUBaQZjYWxsZXIFDHJlc3RDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQUFU1NJWkUECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAJ3aAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEBWxvZnRMCQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIacmVjYWxjTG9ja2VkVm9sdW1lUkVBRE9OTFkJAMwIAgULbGFuZEFzc2V0SWQJAMwIAgUCd2gFA25pbAUDbmlsBAVsb2Z0TwkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUCd2gEBWxvZnRUCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFAndoBQt3aElkeExldmVscwQFbG9mdEYJAGUCCQBlAgUFbG9mdFQFBWxvZnRMBQVsb2Z0TwQIbmV3V2hTdHIJALoJAgkAzAgCCQCRAwIFAndoBQt3aElkeExldmVscwkAzAgCCQCRAwIFAndoBQh3aElkeFJlcwkAzAgCCQCRAwIFAndoBQh3aElkeE1hdAkAzAgCCQCRAwIFAndoBQl3aElkeFByb2QJAMwIAgkAuQkCCQDMCAIJAKQDAQUFbG9mdEwJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAKQDAQUFbG9mdFQFA25pbAIBXwUDbmlsAgE6CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFd2hLZXkFCG5ld1doU3RyBQNuaWwFCG5ld1doU3RyAWkBF2ZpeENvbnRpbmVudFByb3BvcnRpb25zAQxsYW5kQXNzZXRJZHMDCQECIT0CCAUBaQZjYWxsZXIFDHJlc3RDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQKAQhnZXRQcm9wcwIDYWNjBGNvbnQJAM0IAgUDYWNjCQELdmFsdWVPckVsc2UCCQCiCAEJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQUEY29udAILMF8wXzBfMF8wXzAEAXAKAAIkbAUKY29udGluZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIZ2V0UHJvcHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCgEJcHJvY2Vzc29yAgNhY2MLbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQUFU1NJWkUEBGNvbnQJAJEDAgUBZAUMcmVjQ29udGluZW50BA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMEDGNvbnRpbmVudElkeAkBBXZhbHVlAQkAzwgCBQpjb250aW5lbnRzBQRjb250BAljb250UHJvcHMJALUJAgkAkQMCBQNhY2MFDGNvbnRpbmVudElkeAIBXwQHdXBkYXRlZAkAuQkCCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQFCWNvbnRQcm9wcwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AAECAV8EByRtYXRjaDAFBGNvbnQDCQAAAgIIQW1lcmljYXMFByRtYXRjaDAJAMwIAgUHdXBkYXRlZAkAzAgCCQCRAwIFA2FjYwABCQDMCAIJAJEDAgUDYWNjAAIJAMwIAgkAkQMCBQNhY2MAAwkAzAgCCQCRAwIFA2FjYwAEBQNuaWwDCQAAAgIGRXVyb3BlBQckbWF0Y2gwCQDMCAIJAJEDAgUDYWNjAAAJAMwIAgUHdXBkYXRlZAkAzAgCCQCRAwIFA2FjYwACCQDMCAIJAJEDAgUDYWNjAAMJAMwIAgkAkQMCBQNhY2MABAUDbmlsAwkAAAICBEFzaWEFByRtYXRjaDAJAMwIAgkAkQMCBQNhY2MAAAkAzAgCCQCRAwIFA2FjYwABCQDMCAIFB3VwZGF0ZWQJAMwIAgkAkQMCBQNhY2MAAwkAzAgCCQCRAwIFA2FjYwAEBQNuaWwDCQAAAgIGQWZyaWNhBQckbWF0Y2gwCQDMCAIJAJEDAgUDYWNjAAAJAMwIAgkAkQMCBQNhY2MAAQkAzAgCCQCRAwIFA2FjYwACCQDMCAIFB3VwZGF0ZWQJAMwIAgkAkQMCBQNhY2MABAUDbmlsAwkAAAICB09jZWFuaWEFByRtYXRjaDAJAMwIAgkAkQMCBQNhY2MAAAkAzAgCCQCRAwIFA2FjYwABCQDMCAIJAJEDAgUDYWNjAAIJAMwIAgkAkQMCBQNhY2MAAwkAzAgCBQd1cGRhdGVkBQNuaWwJAAIBAg93cm9uZyBjb250aW5lbnQEAXIKAAIkbAUMbGFuZEFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUBcAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJcHJvY2Vzc29yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQIIQW1lcmljYXMJAJEDAgUBcgAACQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQIGRXVyb3BlCQCRAwIFAXIAAQkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5UmVzVHlwZXNCeUNvbnRpbmVudAECBEFzaWEJAJEDAgUBcgACCQDMCAIJAQtTdHJpbmdFbnRyeQIJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQIGQWZyaWNhCQCRAwIFAXIAAwkAzAgCCQELU3RyaW5nRW50cnkCCQEWa2V5UmVzVHlwZXNCeUNvbnRpbmVudAECB09jZWFuaWEJAJEDAgUBcgAEBQNuaWwAAAFpAQ9maXhTdGFrZWRQaWVjZXMBB2FkZHJlc3MDCQECIT0CCAUBaQZjYWxsZXIFDHJlc3RDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEDHN0YWtlZFBpZWNlcwMJAAACBQdhZGRyZXNzAgAAAAQIbGFuZHNTdHIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUHYWRkcmVzcwQFbGFuZHMDCQEJaXNEZWZpbmVkAQUIbGFuZHNTdHIJAL0JAgkBBXZhbHVlAQUIbGFuZHNTdHICAV8FA25pbAoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQIbGFuZFNpemUJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplCQBkAgUDYWNjCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUKAAIkbAUFbGFuZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB29uZUxhbmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwUMc3Rha2VkUGllY2VzBQNuaWwFDHN0YWtlZFBpZWNlcwFpAQ1zZXRDdXN0b21OYW1lAwdhc3NldElkCmN1c3RvbU5hbWUEdHlwZQQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQMJAQIhPQIIBQNwbXQGYW1vdW50BQxSRU5BTUlOR0NPU1QJAAIBCQCsAgICElBheW1lbnQgc2hvdWxkIGJlIAkApAMBBQxSRU5BTUlOR0NPU1QDCQEIY29udGFpbnMCBQpjdXN0b21OYW1lAgJfXwkAAgEJAKwCAgIeTmFtZSBzaG91bGQgbm90IGNvbnRhaW4gJ19fJzogBQpjdXN0b21OYW1lAwkAZgIJALECAQUKY3VzdG9tTmFtZQUKTUFYTkFNRUxFTgkAAgEJAKwCAgIZTmFtZSB0b28gbG9uZywgbWF4TGVuZ3RoPQkApAMBBQpNQVhOQU1FTEVOBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQHYWN0aW9ucwQHJG1hdGNoMAUEdHlwZQMJAAACAgdBQ0NPVU5UBQckbWF0Y2gwBApyZXZlcnNlS2V5CQEWa2V5Q3VzdG9tTmFtZVRvQWRkcmVzcwEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQNYWRkclRvTmFtZUtleQkBFmtleUFkZHJlc3NUb0N1c3RvbU5hbWUBBQRhZGRyBAdvbGROYW1lCQCiCAEFDWFkZHJUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEWa2V5Q3VzdG9tTmFtZVRvQWRkcmVzcwEJAQV2YWx1ZQEFB29sZE5hbWUFA25pbAUDbmlsCQDOCAIJAM0IAgkAzQgCBQdmcmVlT2xkCQELU3RyaW5nRW50cnkCBQ1hZGRyVG9OYW1lS2V5BQpjdXN0b21OYW1lCQELU3RyaW5nRW50cnkCBQpyZXZlcnNlS2V5BQRhZGRyCAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBQRhZGRyBQx4cEN1c3RvbU5hbWUCXzEDCQAAAgIETEFORAUHJG1hdGNoMAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQdhc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFB2Fzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQKcmV2ZXJzZUtleQkBGmtleUxhbmRDdXN0b21OYW1lVG9Bc3NldElkAQUKY3VzdG9tTmFtZQQJbmFtZU93bmVyCQCiCAEFCnJldmVyc2VLZXkDCQEJaXNEZWZpbmVkAQUJbmFtZU93bmVyCQACAQkArAICAhlOYW1lIGFscmVhZHkgcmVnaXN0ZXJlZDogBQpjdXN0b21OYW1lBA5hc3NldFRvTmFtZUtleQkBGmtleUxhbmRBc3NldElkVG9DdXN0b21OYW1lAQUHYXNzZXRJZAQHb2xkTmFtZQkAoggBBQ5hc3NldFRvTmFtZUtleQQHZnJlZU9sZAMJAQlpc0RlZmluZWQBBQdvbGROYW1lCQDMCAIJAQtEZWxldGVFbnRyeQEJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEJAQV2YWx1ZQEFB29sZE5hbWUFA25pbAUDbmlsCQDOCAIJAM0IAgkAzQgCBQdmcmVlT2xkCQELU3RyaW5nRW50cnkCBQ5hc3NldFRvTmFtZUtleQUKY3VzdG9tTmFtZQkBC1N0cmluZ0VudHJ5AgUKcmV2ZXJzZUtleQUHYXNzZXRJZAgJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgUMeHBDdXN0b21OYW1lAl8xAwkAAAICBERVQ0sFByRtYXRjaDAEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQdhc3NldElkAwMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQYJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgkAAgEJAKwCAggFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARBrZXlEdWNrSWRUb093bmVyAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKRFVDS1BSRUZJWAINIGlzIG5vdCB5b3VycwQKcmV2ZXJzZUtleQkBGmtleUR1Y2tDdXN0b21OYW1lVG9Bc3NldElkAQUKY3VzdG9tTmFtZQQJbmFtZU93bmVyCQCiCAEFCnJldmVyc2VLZXkDCQEJaXNEZWZpbmVkAQUJbmFtZU93bmVyCQACAQkArAICAhlOYW1lIGFscmVhZHkgcmVnaXN0ZXJlZDogBQpjdXN0b21OYW1lBA5hc3NldFRvTmFtZUtleQkBGmtleUR1Y2tBc3NldElkVG9DdXN0b21OYW1lAQUHYXNzZXRJZAQHb2xkTmFtZQkAoggBBQ5hc3NldFRvTmFtZUtleQQHZnJlZU9sZAMJAQlpc0RlZmluZWQBBQdvbGROYW1lCQDMCAIJAQtEZWxldGVFbnRyeQEJARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEJAQV2YWx1ZQEFB29sZE5hbWUFA25pbAUDbmlsCQDOCAIJAM0IAgkAzQgCBQdmcmVlT2xkCQELU3RyaW5nRW50cnkCBQ5hc3NldFRvTmFtZUtleQUKY3VzdG9tTmFtZQkBC1N0cmluZ0VudHJ5AgUKcmV2ZXJzZUtleQUHYXNzZXRJZAgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFB2Fzc2V0SWQFDHhwQ3VzdG9tTmFtZQJfMQkAAgECE1Vua25vd24gZW50aXR5IHR5cGUJAJQKAgkAzggCCQDNCAIFB2FjdGlvbnMJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAgFA3BtdAZhbW91bnQFC3VzZHRBc3NldElkBQ1wcm9sb2dBY3Rpb25zAAABaQEMc2V0UmVmZXJyYWxzAglvbGRQbGF5ZXIJbmV3UGxheWVyAwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQNwdWIJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAMJAQEhAQkBCWlzRGVmaW5lZAEJAKYIAQUJb2xkUGxheWVyCQACAQkArAICAhFJbnZhbGlkIGFkZHJlc3M6IAUJb2xkUGxheWVyAwkBASEBCQEJaXNEZWZpbmVkAQkApggBBQluZXdQbGF5ZXIJAAIBCQCsAgICEUludmFsaWQgYWRkcmVzczogBQluZXdQbGF5ZXIEB29sZHNLZXkJAQlrZXlPbGRpZXMABARvbGRzCQCiCAEFB29sZHNLZXkEBm9sZGllcwMJAQlpc0RlZmluZWQBBQRvbGRzCQC8CQIJAQV2YWx1ZQEFBG9sZHMCAV8FA25pbAMJAQ9jb250YWluc0VsZW1lbnQCBQZvbGRpZXMFCW5ld1BsYXllcgkAAgEJAKwCAgUJbmV3UGxheWVyAiYgaXMgbm90IG5ld2JpZSAoYWxyZWFkeSBoYXMgcmVmZXJyYWxzKQQIcmVmQnlLZXkJAQ9rZXlBZGRyZXNzUmVmQnkBBQluZXdQbGF5ZXIEBXJlZkJ5CQCiCAEFCHJlZkJ5S2V5AwMJAQlpc0RlZmluZWQBBQVyZWZCeQkBCWlzRGVmaW5lZAEJAKYIAQkBBXZhbHVlAQUFcmVmQnkHCQACAQkArAICCQCsAgIFCW5ld1BsYXllcgIUIGFscmVhZHkgaGFzIHJlZkJ5OiAJAQV2YWx1ZQEFBXJlZkJ5BAdyZWZzS2V5CQETa2V5QWRkcmVzc1JlZmVycmFscwEFCW9sZFBsYXllcgQEcmVmcwkAoggBBQdyZWZzS2V5BAlyZWZzQXJyYXkDCQEJaXNEZWZpbmVkAQUEcmVmcwkAvAkCCQEFdmFsdWUBBQRyZWZzAgFfBQNuaWwDCQEPY29udGFpbnNFbGVtZW50AgUJcmVmc0FycmF5BQluZXdQbGF5ZXIJAAIBCQCsAgIJAKwCAgkArAICBQlvbGRQbGF5ZXICEiBhbHJlYWR5IGNvbnRhaW5zIAUJbmV3UGxheWVyAhEgd2l0aGluIHJlZmVycmFscwQHbmV3UmVmcwkAugkCCQDNCAIFCXJlZnNBcnJheQUJbmV3UGxheWVyAgFfBAduZXdPbGRzAwkBD2NvbnRhaW5zRWxlbWVudAIFBm9sZGllcwUJb2xkUGxheWVyCQEFdmFsdWUBBQRvbGRzCQC6CQIJAM0IAgUGb2xkaWVzBQlvbGRQbGF5ZXICAV8JAJQKAgkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFCHJlZkJ5S2V5BQlvbGRQbGF5ZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgUHcmVmc0tleQUHbmV3UmVmcwkAzAgCCQELU3RyaW5nRW50cnkCBQdvbGRzS2V5BQduZXdPbGRzBQNuaWwFDXByb2xvZ0FjdGlvbnMAAAFpARBkaXN0cmlidXRlUG9pbnRzBQhzdHJlbmd0aAhhY2N1cmFjeQlpbnRlbGxlY3QJZW5kdXJhbmNlCWRleHRlcml0eQQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQKZnJlZUtleUFjYwkBEWtleVVzZXJGcmVlUG9pbnRzAQUEYWRkcgQNZnJlZVBvaW50c0FjYwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFCmZyZWVLZXlBY2MAAAQLZnJlZUtleUR1Y2sJARFrZXlEdWNrRnJlZVBvaW50cwEFC2R1Y2tBc3NldElkBA5mcmVlUG9pbnRzRHVjawkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QFC2ZyZWVLZXlEdWNrAAAEB3N1bUZyZWUJAGQCBQ1mcmVlUG9pbnRzQWNjBQ5mcmVlUG9pbnRzRHVjawQPc3VtVG9EaXN0cmlidXRlCQBkAgkAZAIJAGQCCQBkAgUIc3RyZW5ndGgFCGFjY3VyYWN5BQlpbnRlbGxlY3QFCWVuZHVyYW5jZQUJZGV4dGVyaXR5AwkAZgIFD3N1bVRvRGlzdHJpYnV0ZQUHc3VtRnJlZQkAAgEJAKwCAgkArAICAg9UaGVyZSBhcmUgb25seSAJAKQDAQUHc3VtRnJlZQIaIGZyZWUgcG9pbnRzIHRvIGRpc3RyaWJ1dGUECGNoYXJzS2V5CQEMa2V5RHVja0NoYXJzAQULZHVja0Fzc2V0SWQEBWNoYXJzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0BQhjaGFyc0tleQIJMF8wXzBfMF8wAgFfBAZuZXdBY2MJAGUCBQ1mcmVlUG9pbnRzQWNjBQ9zdW1Ub0Rpc3RyaWJ1dGUJAJQKAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQpmcmVlS2V5QWNjAwkAZgIAAAUGbmV3QWNjAAAFBm5ld0FjYwkAzAgCCQEMSW50ZWdlckVudHJ5AgULZnJlZUtleUR1Y2sDCQBmAgAABQZuZXdBY2MJAGQCBQ5mcmVlUG9pbnRzRHVjawUGbmV3QWNjBQ5mcmVlUG9pbnRzRHVjawkAzAgCCQELU3RyaW5nRW50cnkCBQhjaGFyc0tleQkAuQkCCQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhclN0cmVuZ3RoBQhzdHJlbmd0aAkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDGNoYXJBY2N1cmFjeQUIYWNjdXJhY3kJAMwIAgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQ1jaGFySW50ZWxsZWN0BQlpbnRlbGxlY3QJAMwIAgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQ1jaGFyRW5kdXJhbmNlBQllbmR1cmFuY2UJAMwIAgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQ1jaGFyRGV4dGVyaXR5BQlkZXh0ZXJpdHkFA25pbAIBXwUDbmlsBQ1wcm9sb2dBY3Rpb25zAAABaQEcc3BsaXRCeUdsb2JhbFdlaWdodHNSRUFET05MWQEGYW1vdW50CQCUCgIFA25pbAkBEmdldE5lZWRlZE1hdGVyaWFscwEFBmFtb3VudAFpASRzcGxpdEJ5R2xvYmFsQW5kTG9jYWxXZWlnaHRzUkVBRE9OTFkDCW1hdEFtb3VudAlyZXNBbW91bnQIdGVycmFpbnMEDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQUIdGVycmFpbnMJAJQKAgUDbmlsCQCUCgIJARJnZXROZWVkZWRNYXRlcmlhbHMBBQltYXRBbW91bnQJARNkaXN0cmlidXRlQnlXZWlnaHRzAgUJcmVzQW1vdW50BQ10ZXJyYWluQ291bnRzAWkBE2dldEJhY2twYWNrUkVBRE9OTFkBC2R1Y2tBc3NldElkCQCUCgIFA25pbAkAuQkCCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAIBOgFpARRnZXRXYXJlaG91c2VSRUFET05MWQELbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQUFU1NJWkUECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAACQCUCgIFA25pbAkAugkCCQEMZ2V0V2FyZWhvdXNlAwkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwCAToBaQEKc2F2ZUxhc3RUeAAEBmNhbGxlcggFAWkGY2FsbGVyAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgkAzAgCBQt3bGdDb250cmFjdAkAzAgCBQ9lY29ub215Q29udHJhY3QJAMwIAgUSdG91cm5hbWVudENvbnRyYWN0CQDMCAIFDWFjcmVzQ29udHJhY3QFA25pbAUGY2FsbGVyCQACAQINQWNjZXNzIGRlbmllZAkAlAoCCQEGcHJvbG9nAQUBaQAqAWkBD3VwZGF0ZUR1Y2tTdGF0cwILZHVja0Fzc2V0SWQHZGVsdGFYUAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQFB2RlbHRhWFABaQEOdXBkYXRlQWNjU3RhdHMCBGFkZHIHZGVsdGFYUAMDCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkBAiE9AggFAWkGY2FsbGVyBQ1hY3Jlc0NvbnRyYWN0BwkAAgECDUFjY2VzcyBkZW5pZWQJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgUHZGVsdGFYUAFpAQllcXVpcER1Y2sBCWVxdWlwbWVudAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECGWVxdWlwRHVja19jaGVja1RvdXJuYW1lbnQDCQENY2hlY2tEZWxpdmVyeQEFC2R1Y2tBc3NldElkCQACAQIXZXF1aXBEdWNrX2NoZWNrRGVsaXZlcnkEBWVxS2V5CQEQa2V5RHVja0VxdWlwbWVudAEFC2R1Y2tBc3NldElkBAtjdXJyZW50U2VncwkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEFBWVxS2V5AhcsOyxfLDssXyw7LF8sOyxfLDssXyw7LAIBXwQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW5ld0VxCQC1CQIFCWVxdWlwbWVudAIBXwMJAQIhPQIJAJADAQUFbmV3RXEFC05VTVNFR01FTlRTCQACAQIWV3JvbmcgZXF1aXBtZW50IHN0cmluZwQJdGVtcFByb2RCCQEGZHJlc3NCBAULY3VycmVudFNlZ3MJAQ5wcm9kU3RyVG9CeXRlcwEJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAYFA25pbAQIc2VnQnBBdXgJAJEDAgkAtQkCCQCRAwIFBW5ld0VxBQtzZWdCYWNrcGFjawIBOwABBApidWZmRWZmZWN0AwkAAAIFCHNlZ0JwQXV4AgAAAAQEYXV4MAkAkQMCCQC1CQIFCHNlZ0JwQXV4AgEsAAADCQAAAgUEYXV4MAIAAAAEBmlkeENudAkAtQkCBQRhdXgwAgE6BANpZHgJAJEDAgUGaWR4Q250AAAEA2NudAkAkQMCBQZpZHhDbnQAAQMDAwMDCQAAAgUDaWR4AgIwNgYJAAACBQNpZHgCAjA3BgkAAAIFA2lkeAICMDgJAQIhPQIFA2NudAIABwkAZgIJAQ1wYXJzZUludFZhbHVlAQUDY250AAAHCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgJAQ1wYXJzZUludFZhbHVlAQUDaWR4AgFfBQpySWR4RWZmZWN0AAAEBXN0YXRzCQEMZ2V0RHVja1N0YXRzBAUEdGhpcwULZHVja0Fzc2V0SWQFCmJ1ZmZFZmZlY3QGBAhuZXdQcm9kQgkBBmRyZXNzQgQFBW5ld0VxBQl0ZW1wUHJvZEIHBQVzdGF0cwQKbmV3UHJvZFN0cgkBDmJ5dGVzVG9Qcm9kU3RyAQUIbmV3UHJvZEIJAJQKAgkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWVxS2V5BQllcXVpcG1lbnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIFCm5ld1Byb2RTdHIFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCCQEMa2V5RHVja0J1ZmZzAQULZHVja0Fzc2V0SWQJALkJAgkAzAgCCQCkAwEJAJEDAgUFc3RhdHMABwkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACAkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACQkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACgkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACwUDbmlsAgFfBQNuaWwFDXByb2xvZ0FjdGlvbnMAAAFpAQ9mb3J0aWZpY2F0ZUxhbmQCC2xhbmRBc3NldElkBHBsYW4EDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAtkdWNrQXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAgAECWR1Y2tTdGF0cwkBDGdldER1Y2tTdGF0cwQFBHRoaXMFC2R1Y2tBc3NldElkAAAHBAdmb3J0S2V5CQEXa2V5Rm9ydGlmaWNhdGlvbnNCeUxhbmQBBQtsYW5kQXNzZXRJZAQMY3VycmVudEZvcnRzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUHZm9ydEtleQIMOjBfMTU6MF8xODowAgFfBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUFBVNTSVpFBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAQCd2gJAQxnZXRXYXJlaG91c2UDBQV3aEtleQUJbGFuZEluZGV4BQppbmZyYUxldmVsBAdjdXJMb2Z0CQC1CQIJAJEDAgUCd2gFCXdoSWR4TE9GVAIBXwQEY3VyTwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2N1ckxvZnQFC3ZvbE9jY3VwaWVkBARjdXJGCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHY3VyTG9mdAUHdm9sRnJlZQQIbmV3Rm9ydHMJALUJAgUEcGxhbgIBXwQPJHQwMTAyOTk0MTAzMTA5CQEFZm9ydEIGBQxjdXJyZW50Rm9ydHMJAQ5wcm9kU3RyVG9CeXRlcwEJAJEDAgUCd2gFCXdoSWR4UHJvZAUEY3VyTwUEY3VyRgYFA25pbAQJdGVtcFByb2RCCAUPJHQwMTAyOTk0MTAzMTA5Al8xBAV0ZW1wTwgFDyR0MDEwMjk5NDEwMzEwOQJfMgQFdGVtcEYIBQ8kdDAxMDI5OTQxMDMxMDkCXzMEDyR0MDEwMzExMjEwMzIwOAkBBWZvcnRCBgUIbmV3Rm9ydHMFCXRlbXBQcm9kQgUFdGVtcE8FBXRlbXBGBwUJZHVja1N0YXRzBAhuZXdQcm9kQggFDyR0MDEwMzExMjEwMzIwOAJfMQQEbmV3TwgFDyR0MDEwMzExMjEwMzIwOAJfMgQEbmV3RggFDyR0MDEwMzExMjEwMzIwOAJfMwQKbmV3UHJvZFN0cgkBDmJ5dGVzVG9Qcm9kU3RyAQUIbmV3UHJvZEIECm5ld0xvZnRTdHIJALkJAgkAzAgCCQCRAwIFB2N1ckxvZnQFCXZvbExvY2tlZAkAzAgCCQCkAwEFBG5ld08JAMwIAgkApAMBBQRuZXdGCQDMCAIJAJEDAgUHY3VyTG9mdAUIdm9sVG90YWwFA25pbAIBXwkAlAoCCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUHZm9ydEtleQUEcGxhbgkAzAgCCQELU3RyaW5nRW50cnkCBQV3aEtleQkAugkCCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIJAJEDAgUCd2gFCHdoSWR4UmVzCQDMCAIJAJEDAgUCd2gFCHdoSWR4TWF0CQDMCAIFCm5ld1Byb2RTdHIJAMwIAgUKbmV3TG9mdFN0cgUDbmlsAgE6BQNuaWwFDXByb2xvZ0FjdGlvbnMAAAFpARNpbml0RHVja1RvdXJBdHRlbXB0AQtkdWNrQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUSdG91cm5hbWVudENvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkAAAECWN1ckhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQBAljdXJMb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUJY3VyTG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04EBmxhc3RJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRJ0b3VybmFtZW50Q29udHJhY3QFDWxhc3RUb3VySWRLZXkAAAQMdG91ckxvY2F0aW9uCQCsAgIJAKQDAQUGbGFzdElkAgRfVF8wCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ5rZXlTYXZlZEhlYWx0aAEFC2R1Y2tBc3NldElkBQljdXJIZWFsdGgJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUFbWF4SFAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEGtleVNhdmVkTG9jYXRpb24BBQtkdWNrQXNzZXRJZAULY3VyTG9jYXRpb24JAMwIAgkBC1N0cmluZ0VudHJ5AgUJY3VyTG9jS2V5BQx0b3VyTG9jYXRpb24FA25pbAUMdG91ckxvY2F0aW9uAWkBDGJyZWFrQXR0ZW1wdAAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAljdXJMb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUJY3VyTG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04DCQECIT0CCQCRAwIJALUJAgULY3VyTG9jYXRpb24CAV8FCmxvY0lkeFR5cGUCAVQJAAIBAiJZb3VyIGR1Y2sgaXMgbm90IGluIHRoZSB0b3VybmFtZW50BAtzYXZlZEhlYWx0aAkBEUBleHRyTmF0aXZlKDEwNTUpAQkBDmtleVNhdmVkSGVhbHRoAQULZHVja0Fzc2V0SWQEDXNhdmVkTG9jYXRpb24JARFAZXh0ck5hdGl2ZSgxMDU4KQEJARBrZXlTYXZlZExvY2F0aW9uAQULZHVja0Fzc2V0SWQJAJQKAgkAzQgCCQDNCAIFDXByb2xvZ0FjdGlvbnMJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBQtzYXZlZEhlYWx0aAkBC1N0cmluZ0VudHJ5AgUJY3VyTG9jS2V5BQ1zYXZlZExvY2F0aW9uBQtjdXJMb2NhdGlvbgFpARZleGl0VG91cm5hbWVudEludGVybmFsAQtkdWNrQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECDUFjY2VzcyBkZW5pZWQEC3NhdmVkSGVhbHRoCQERQGV4dHJOYXRpdmUoMTA1NSkBCQEOa2V5U2F2ZWRIZWFsdGgBBQtkdWNrQXNzZXRJZAQNc2F2ZWRMb2NhdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQkBEGtleVNhdmVkTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBQtzYXZlZEhlYWx0aAkAzAgCCQELU3RyaW5nRW50cnkCCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFDXNhdmVkTG9jYXRpb24FA25pbAcBaQEUZXhpdERlbGl2ZXJ5SW50ZXJuYWwBC2R1Y2tBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQINQWNjZXNzIGRlbmllZAQBZQkBEmV4aXREZWxpdmVyeUNvbW1vbgEFC2R1Y2tBc3NldElkCQCUCgIJAM4IAggFAWUCXzEIBQFlAl8yBwFpARBhdXRvRXhpdERlbGl2ZXJ5AQtkdWNrQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECDUFjY2VzcyBkZW5pZWQEAWUJARJleGl0RGVsaXZlcnlDb21tb24BBQtkdWNrQXNzZXRJZAkAlAoCCAUBZQJfMQkAlAoCCAUBZQJfMwgFAWUCXzQBaQEOcHJlcGFyZVJvYmJlcnkCB21lc3NhZ2UDc2lnBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQEhAQkAxBMDBQdtZXNzYWdlBQNzaWcFA3B1YgkAAgECGHNpZ25hdHVyZSBkb2VzIG5vdCBtYXRjaAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABAZ3bGdBbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUKd2xnQXNzZXRJZAkAAgECFVdMR09MRCBwYXltZW50cyBvbmx5IQQFcGFydHMJALUJAgkAsAkBBQdtZXNzYWdlAgF8AwkBAiE9AgkAkAMBBQVwYXJ0cwACCQACAQIUV3JvbmcgbWVzc2FnZSBmb3JtYXQEC2R1Y2tBc3NldElkCQCRAwIFBXBhcnRzAAADCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAh5wcmVwYXJlUm9iYmVyeV9jaGVja1RvdXJuYW1lbnQDCQENY2hlY2tEZWxpdmVyeQEFC2R1Y2tBc3NldElkCQACAQIccHJlcGFyZVJvYmJlcnlfY2hlY2tEZWxpdmVyeQQHcm9iQ29zdAgJAQ5nZXRSb2JiZXJ5RGF0YQIFBHRoaXMFC2R1Y2tBc3NldElkAl8xAwkAZgIFB3JvYkNvc3QFBndsZ0FtdAkAAgEJAKwCAgkArAICCQCsAgICCFBheW1lbnQgCQCkAwEFBndsZ0FtdAIMIDwgcmVxdWlyZWQgCQCkAwEFB3JvYkNvc3QECmNhbmRpZGF0ZXMJALUJAgkAkQMCBQVwYXJ0cwABAgFfBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAlkdWNrU3RhdGUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBE2tleUR1Y2tSb2JiZXJ5U3RhdGUBBQtkdWNrQXNzZXRJZAAABApsb2NrZWRMYW5kCQELdmFsdWVPckVsc2UCCQCiCAEJARNrZXlMb2NrZWRMYW5kQnlEdWNrAQULZHVja0Fzc2V0SWQCAAQHbGFuZEVUQQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQESa2V5TGFuZENvb2xkb3duRVRBAQUKbG9ja2VkTGFuZAAAAwMJAQIhPQIFCWR1Y2tTdGF0ZQULZHVja0lkeEZyZWUJAGYCBQdsYW5kRVRBBQNub3cHCQACAQkArAICAidZb3UgYWxyZWFkeSBzdGFydGVkIHJvYmJpbmcsIHdhaXQgdGlsbCAJAKQDAQUHbGFuZEVUQQoBB2NoZWNrZXICA2FjYwtsYW5kQXNzZXRJZAQFc3RhdGUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBE2tleUxhbmRSb2JiZXJ5U3RhdGUBBQtsYW5kQXNzZXRJZAAABAtjb29sZG93bkVUQQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQESa2V5TGFuZENvb2xkb3duRVRBAQULbGFuZEFzc2V0SWQAAAMJAGYCBQVzdGF0ZQkAkAMBBRBsYW5kUm9iQ29vbGRvd25zCQACAQINSW52YWxpZCBzdGF0ZQMJAGYCBQNub3cFC2Nvb2xkb3duRVRBBApzdGFrZWRUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAMJAGcCAAAFCnN0YWtlZFRpbWUFA2FjYwQBYQkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAFkCQC1CQIIBQFhC2Rlc2NyaXB0aW9uAgFfBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBAxwcm9kdWN0aXZpdHkJAQxhcHBseUJvbnVzZXMCBQtsYW5kQXNzZXRJZAUGcGllY2VzBAlkZWx0YVRpbWUJAGUCBQNub3cFCnN0YWtlZFRpbWUECGF2YWlsUmVzCQBrAwUJZGVsdGFUaW1lCQBoAgUMcHJvZHVjdGl2aXR5BQZwaWVjZXMFCURBWU1JTExJUwMJAGYCBQ5NSU5fUkVTX1RPX1JPQgUIYXZhaWxSZXMFA2FjYwkAzQgCBQNhY2MFC2xhbmRBc3NldElkBQNhY2MECGZpbHRlcmVkCgACJGwFCmNhbmRpZGF0ZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB2NoZWNrZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgkAkAMBBQhmaWx0ZXJlZAAACQACAQIZTm8gY2FuZGlkYXRlcyBmb3Igcm9iYmVyeQQGcm5kSWR4CQEPZ2V0UmFuZG9tTnVtYmVyAwkAkAMBBQhmaWx0ZXJlZAUGaGVpZ2h0CQDLAQIFA3NpZwgFAWkNdHJhbnNhY3Rpb25JZAQLbGFuZEFzc2V0SWQJAJEDAgUIZmlsdGVyZWQFBnJuZElkeAkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIJARNrZXlMYW5kUm9iYmVyeVN0YXRlAQULbGFuZEFzc2V0SWQFDHJvYklkeExvY2tlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleUxhbmRDb29sZG93bkVUQQEFC2xhbmRBc3NldElkCQBkAgUDbm93CQCRAwIFEGxhbmRSb2JDb29sZG93bnMFDHJvYklkeExvY2tlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBE2tleUR1Y2tSb2JiZXJ5U3RhdGUBBQtkdWNrQXNzZXRJZAUQZHVja0lkeFByZXBhcmluZwkAzAgCCQELU3RyaW5nRW50cnkCCQETa2V5TG9ja2VkTGFuZEJ5RHVjawEFC2R1Y2tBc3NldElkBQtsYW5kQXNzZXRJZAUDbmlsBQ1wcm9sb2dBY3Rpb25zBQtsYW5kQXNzZXRJZAFpAQdyb2JMYW5kAgdtZXNzYWdlA3NpZwQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gECHVzZXJBZGRyCQClCAEIBQFpBmNhbGxlcgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQh1c2VyQWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAlAoCCQDNCAIFDXByb2xvZ0FjdGlvbnMJAQxJbnRlZ2VyRW50cnkCCQEYa2V5TGFzdFJvYmJlcnlUaW1lQnlEdWNrAQULZHVja0Fzc2V0SWQFA25vdwAAAWkBDmFjY2VwdERlbGl2ZXJ5AAMJAQEhAQURS1NfQUxMT1dfREVMSVZFUlkJAAIBAh9EZWxpdmVyeSBmZWF0dXJlIGlzIHR1cm5lZCBvZmYhBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQQIdXNlckFkZHIJAKUIAQgFAWkGY2FsbGVyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFCHVzZXJBZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAlmdW5kVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPZWNvbm9teUNvbnRyYWN0BQ9kZWxpdmVyeUZ1bmRLZXkAAAQLbG9ja2VkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPZWNvbm9teUNvbnRyYWN0BRFkZWxpdmVyeUxvY2tlZEtleQAAAwkAZgIFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQkAZQIFCWZ1bmRUb3RhbAULbG9ja2VkVG90YWwJAAIBCQCsAgIJAKwCAgkArAICAiBEZWxpdmVyeSBpcyBub3QgYXZhaWxhYmxlLCBmdW5kPQkBCmZpeGVkUG9pbnQCBQlmdW5kVG90YWwABgIJLCBsb2NrZWQ9CQEKZml4ZWRQb2ludAIFC2xvY2tlZFRvdGFsAAYEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAECGRlbGF5RVRBCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlEZWxpdmVyeURlbGF5QnlEdWNrAQULZHVja0Fzc2V0SWQAAAMJAGYCBQhkZWxheUVUQQUDbm93CQACAQkArAICAipEZWxpdmVyeSBpcyBmb3JiaWRkZW4gZm9yIHlvdXIgZHVjayB1bnRpbCAJAKQDAQUIZGVsYXlFVEEDCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAh5hY2NlcHREZWxpdmVyeV9jaGVja1RvdXJuYW1lbnQDCQENY2hlY2tEZWxpdmVyeQEFC2R1Y2tBc3NldElkCQACAQIcYWNjZXB0RGVsaXZlcnlfY2hlY2tEZWxpdmVyeQQObmV3TG9ja2VkVG90YWwJAQVhc0ludAEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhR1cGRhdGVEZWxpdmVyeUxvY2tlZAkAzAgCCQBkAgULbG9ja2VkVG90YWwFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQUDbmlsBQNuaWwECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAljdXJIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAQJY3VyTG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCiCAEFCWN1ckxvY0tleQUPREVGQVVMVExPQ0FUSU9OBBBkZWxpdmVyeUxvY2F0aW9uCQCsAgIJAKQDAQUDbm93AgRfRF8wCQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDmtleVNhdmVkSGVhbHRoAQULZHVja0Fzc2V0SWQFCWN1ckhlYWx0aAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQVtYXhIUAkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5U2F2ZWRMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQtjdXJMb2NhdGlvbgkAzAgCCQELU3RyaW5nRW50cnkCBQljdXJMb2NLZXkFEGRlbGl2ZXJ5TG9jYXRpb24FA25pbAUNcHJvbG9nQWN0aW9ucwkAlAoCBRBkZWxpdmVyeUxvY2F0aW9uBQ5uZXdMb2NrZWRUb3RhbAA2To/T",
    "height": 3849937,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6RNhPfQmufLWVgs3EMjAg5xHFruSmrQYTLAjqVVRHF58
Next: HvHzbpAFiGU3ucRJxSUQT7L3sZh2S7bLT63iDdkekPuy

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"
179
182
 
180
183
 
let ESSELLCOEF = 10
181
184
 
185
+
let MIN_USDT_FEE_DELIVERY = 50000
186
+
187
+
let TEN_MINUTES_MILLIS = 600000
188
+
182
189
 
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"]
183
190
 
184
191
 
let continents = ["Americas", "Europe", "Asia", "Africa", "Oceania"]
290
297
 
291
298
 
func keyEsWarehouse () = "emergencyWarehouseProducts"
292
299
 
300
+
301
+
let deliveryFundKey = "deliveryFund"
302
+
303
+
let deliveryLockedKey = "deliveryLocked"
293
304
 
294
305
 
let lastTourIdKey = "%s__lastTourId"
295
306
 
334
345
 
    }
335
346
 
336
347
 
348
+
func isInDelivery (location) = {
349
+
    let loc = split(location, "_")
350
+
    let now = lastBlock.timestamp
351
+
    let startTime = parseIntValue(loc[locIdxContinent])
352
+
    let distance = parseIntValue(loc[locIdxId])
353
+
    if (if ((loc[locIdxType] == "D"))
354
+
        then (now > (startTime + TEN_MINUTES_MILLIS))
355
+
        else false)
356
+
        then (3 >= distance)
357
+
        else false
358
+
    }
359
+
360
+
361
+
func isUsualLocation (location) = {
362
+
    let locType = split(location, "_")[locIdxType]
363
+
    if ((locType != "T"))
364
+
        then (locType != "D")
365
+
        else false
366
+
    }
367
+
368
+
369
+
func notOnMission (tourContract,location) = {
370
+
    let lastId = valueOrElse(getInteger(tourContract, lastTourIdKey), 0)
371
+
    let loc = split(location, "_")
372
+
    let now = lastBlock.timestamp
373
+
    let tData = getTourData(tourContract, lastId)
374
+
    let static = tData[idxStatic]
375
+
    let dynamic = tData[idxDynamic]
376
+
    let locType = loc[locIdxType]
377
+
    if (if ((locType != "T"))
378
+
        then (locType != "D")
379
+
        else false)
380
+
        then true
381
+
        else !(if (if (if ((loc[locIdxType] == "T"))
382
+
            then (parseIntValue(loc[locIdxContinent]) == lastId)
383
+
            else false)
384
+
            then (dynamic[tDynamicStatus] == "INPROGRESS")
385
+
            else false)
386
+
            then (parseIntValue(static[tStaticEnd]) > now)
387
+
            else false)
388
+
    }
389
+
390
+
337
391
 
func getRecipeMaterials (recipe) = (parseIntValue(recipe[rIdxCoeff]) * COEFF2MAT)
338
392
 
339
393
 
394
+
func cheatAttempt (oldLoc,newLoc) = throw(((("Cheat attempt: oldLoc=" + oldLoc) + ", newLoc=") + newLoc))
395
+
396
+
340
397
 
let KS_SEPARATE_PUBLIC_KEY = false
341
398
 
342
399
 
let KS_ALLOW_BIG_INFRA_MERGE = false
400
+
401
+
let KS_ALLOW_DELIVERY = false
343
402
 
344
403
 
let chain = take(drop(this.bytes, 1), 1)
345
404
 
410
469
 
411
470
 
let IdxCfgTournamentDapp = 7
412
471
 
472
+
let IdxCfgAcresDapp = 8
473
+
413
474
 
func keyRestCfg () = "%s__restConfig"
414
475
 
415
476
 
436
497
 
437
498
 
let tournamentContract = getContractAddressOrFail(restCfg, IdxCfgTournamentDapp)
438
499
 
500
+
let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
501
+
439
502
 
let recLandNum = 0
440
503
 
441
504
 
let recLandSize = 1
446
509
 
447
510
 
let wlgAssetIdKey = "wlg_assetId"
448
511
 
449
-
let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "Not initialized yet")
512
+
let wlgAssetId = valueOrErrorMessage(getBinary(wlgContract, wlgAssetIdKey), "WLGOLD is not issued yet")
513
+
514
+
let acresAssetIdKey = "acresAssetId"
515
+
516
+
let acresAssetId = valueOrErrorMessage(getBinary(acresContract, acresAssetIdKey), "ACRES is not issued yet")
450
517
 
451
518
 
let randomDelay = 2
452
519
 
486
553
 
        s
487
554
 
    case _ => 
488
555
 
        throw("fail to cast into Boolean")
556
+
}
557
+
558
+
559
+
func asStringIntTuple (val) = match val {
560
+
    case t2: (String, Int) => 
561
+
        t2
562
+
    case _ => 
563
+
        throw("fail to cast into (String, Int)")
489
564
 
}
490
565
 
491
566
 
514
589
 
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
515
590
 
516
591
 
592
+
func fixedPoint (val,decimals) = {
593
+
    let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
594
+
    let lowPart = toString((val % tenPow))
595
+
    let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
596
+
    (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
597
+
    }
598
+
599
+
517
600
 
func getRandomNumber (maxValue,finishHeight,auxEntropy) = {
518
601
 
    let randomSeedBlock = value(blockInfoByHeight(finishHeight))
519
602
 
    let randomHash = sha256((value(randomSeedBlock.vrf) + auxEntropy))
577
660
 
                then 250000000
578
661
 
                else throw("Unknown chain")
579
662
 
}
663
+
664
+
let S_COST_ACRES = 2500000000
580
665
 
581
666
 
let FIVEX = toBigInt(5)
582
667
 
1654
1739
 
1655
1740
 
1656
1741
 
func checkClaimConditions (addr,claimMode,landAssetIdIn) = {
1657
-
    let $t03370634245 = if ((claimMode == claimModeWh))
1742
+
    let $t03373834277 = if ((claimMode == claimModeWh))
1658
1743
 
        then $Tuple2(landAssetIdIn, valueOrElse(getString(keyStakedDuckByOwner(addr)), ""))
1659
1744
 
        else {
1660
1745
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1664
1749
 
                then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
1665
1750
 
                else $Tuple2(loc[locIdxId], duckAssetId)
1666
1751
 
            }
1667
-
    let landAssetId = $t03370634245._1
1668
-
    let duckId = $t03370634245._2
1752
+
    let landAssetId = $t03373834277._1
1753
+
    let duckId = $t03373834277._2
1669
1754
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
1670
1755
 
    let timeKey = keyStakedTimeByAssetId(landAssetId)
1671
1756
 
    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("Land " + asset.name) + " is not staked"))
1713
1798
 
                                let currentPack = getBackpack(bpKey)
1714
1799
 
                                let currentPackRes = split(currentPack[bpIdxRes], "_")
1715
1800
 
                                let currentWhRes = split(currentWh[whIdxRes], "_")
1716
-
                                let $t03661937490 = if ((claimMode == claimModeWh))
1801
+
                                let $t03665137522 = if ((claimMode == claimModeWh))
1717
1802
 
                                    then $Tuple4(addRes(currentWhRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), currentPack[bpIdxRes], (parseIntValue(loft[volOccupied]) + resToClaim._2), (parseIntValue(loft[volFree]) - resToClaim._2))
1718
1803
 
                                    else if ((claimMode == claimModeDuck))
1719
1804
 
                                        then $Tuple4(currentWh[whIdxRes], addRes(currentPackRes, terrainCounts, (deltaTime - newDeltaTime), landIndex, dailyProductionByPiece), parseIntValue(loft[volOccupied]), parseIntValue(loft[volFree]))
1722
1807
 
                                            let whAm = min([parseIntValue(loft[volFree]), resToClaim._2])
1723
1808
 
                                            $Tuple4(distr._1, distr._2, (parseIntValue(loft[volOccupied]) + whAm), (parseIntValue(loft[volFree]) - whAm))
1724
1809
 
                                            }
1725
-
                                let whRes = $t03661937490._1
1726
-
                                let bpRes = $t03661937490._2
1727
-
                                let loftO = $t03661937490._3
1728
-
                                let loftF = $t03661937490._4
1810
+
                                let whRes = $t03665137522._1
1811
+
                                let bpRes = $t03665137522._2
1812
+
                                let loftO = $t03665137522._3
1813
+
                                let loftF = $t03665137522._4
1729
1814
 
                                $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]], "_")])
1730
1815
 
                                }
1731
1816
 
                        }
1863
1948
 
    }
1864
1949
 
1865
1950
 
1951
+
func checkDelivery (duckAssetId) = if (!(KS_ALLOW_DELIVERY))
1952
+
    then false
1953
+
    else {
1954
+
        let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1955
+
        let now = lastBlock.timestamp
1956
+
        if ((curLocation[locIdxType] != "D"))
1957
+
            then false
1958
+
            else {
1959
+
                let startTime = parseIntValue(curLocation[locIdxContinent])
1960
+
                let distance = parseIntValue(curLocation[locIdxId])
1961
+
                if (if ((now > (startTime + TEN_MINUTES_MILLIS)))
1962
+
                    then (3 > distance)
1963
+
                    else false)
1964
+
                    then throw("Your duck is on delivery mission")
1965
+
                    else asBoolean(invoke(this, "exitDeliveryInternal", [duckAssetId], nil))
1966
+
                }
1967
+
        }
1968
+
1969
+
1970
+
func exitDeliveryCommon (duckAssetId) = {
1971
+
    let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1972
+
    let now = lastBlock.timestamp
1973
+
    let startTime = parseIntValue(curLocation[locIdxContinent])
1974
+
    let distance = parseIntValue(curLocation[locIdxId])
1975
+
    let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(duckAssetId)), "NFT duck is orphaned")
1976
+
    let healthKey = keyDuckHealth(duckAssetId)
1977
+
    let curHealth = getIntegerValue(healthKey)
1978
+
    let outcomeActions = if ((distance >= 3))
1979
+
        then {
1980
+
            let reward = invoke(economyContract, "sendDeliveryReward", [owner], nil)
1981
+
            if ((reward == reward))
1982
+
                then nil
1983
+
                else throw("Strict value is not equal to itself.")
1984
+
            }
1985
+
        else if ((now > (startTime + TEN_MINUTES_MILLIS)))
1986
+
            then throw("Your duck is still on delivery mission")
1987
+
            else {
1988
+
                let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
1989
+
                let unlock = invoke(economyContract, "updateDeliveryLocked", [(lockedTotal - MIN_USDT_FEE_DELIVERY)], nil)
1990
+
                if ((unlock == unlock))
1991
+
                    then if ((0 >= curHealth))
1992
+
                        then nil
1993
+
                        else [IntegerEntry(keyDeliveryDelayByDuck(duckAssetId), (startTime + DAYMILLIS))]
1994
+
                    else throw("Strict value is not equal to itself.")
1995
+
                }
1996
+
    let savedHealth = getIntegerValue(keySavedHealth(duckAssetId))
1997
+
    let savedLocation = getStringValue(keySavedLocation(duckAssetId))
1998
+
    $Tuple4(outcomeActions, [IntegerEntry(healthKey, savedHealth), StringEntry(keyDuckLocation(duckAssetId), savedLocation)], savedLocation, savedHealth)
1999
+
    }
2000
+
2001
+
1866
2002
 
func mergeInternal (newLandSize,newLevel,formula,addr,landAssetIds,needMat) = {
1867
2003
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
1868
2004
 
    if (checkTournament(duckAssetId))
1869
2005
 
        then throw("mergeInternal_checkTournament")
1870
-
        else {
1871
-
            func checkMerge (acc,landAssetId) =             {
1872
-
                let asset = value(assetInfo(fromBase58String(landAssetId)))
1873
-
                let timeKey = keyStakedTimeByAssetId(landAssetId)
1874
-
                let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
1875
-
                let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1876
-
                if ((owner != addr))
1877
-
                    then throw((LANDPREFIX + " is not yours"))
1878
-
                    else {
1879
-
                        let d = split(asset.description, "_")
1880
-
                        let continent = d[recContinent]
1881
-
                        if (if ((acc._3 != ""))
1882
-
                            then (acc._3 != continent)
1883
-
                            else false)
1884
-
                            then throw("Lands should be on the same continent to merge")
1885
-
                            else {
1886
-
                                let landSize = d[recLandSize]
1887
-
                                let sizesIn = acc._1
1888
-
                                let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
1889
-
                                let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
1890
-
                                let pieces = numPiecesBySize(landSize)
1891
-
                                let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
1892
-
                                let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1893
-
                                let reqLevel =                                 match landSize {
1894
-
                                    case _ => 
1895
-
                                        if (("S" == $match0))
1896
-
                                            then 3
1897
-
                                            else if (("M" == $match0))
1898
-
                                                then 4
1899
-
                                                else if (("L" == $match0))
1900
-
                                                    then 5
1901
-
                                                    else if (("XL" == $match0))
1902
-
                                                        then 6
1903
-
                                                        else throw("Only S, M, L, XL can merge")
1904
-
                                }
1905
-
                                if ((infraLevel != reqLevel))
1906
-
                                    then throw("All lands should be maxed to merge")
1907
-
                                    else {
1908
-
                                        let landNum = d[recLandNum]
1909
-
                                        let terrainCounts = countTerrains(d[recTerrains])
1910
-
                                        let deltaTime = (lastBlock.timestamp - savedTime)
1911
-
                                        if ((0 > deltaTime))
1912
-
                                            then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
1913
-
                                            else {
1914
-
                                                let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
1915
-
                                                let landIndex = (pieces / SSIZE)
1916
-
                                                let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
1917
-
                                                let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
1918
-
                                                let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
1919
-
                                                let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
1920
-
                                                let lands = acc._7
1921
-
                                                let idx = indexOf(lands, landAssetId)
1922
-
                                                if (!(isDefined(idx)))
1923
-
                                                    then throw(("Your staked lands don't contain " + landAssetId))
1924
-
                                                    else {
1925
-
                                                        let customKey = keyLandAssetIdToCustomName(landAssetId)
1926
-
                                                        let customName = valueOrElse(getString(customKey), "")
1927
-
                                                        $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 != ""))
1928
-
                                                            then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
1929
-
                                                            else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
1930
-
                                                        }
1931
-
                                                }
1932
-
                                        }
1933
-
                                }
1934
-
                        }
2006
+
        else if (checkDelivery(duckAssetId))
2007
+
            then throw("mergeInternal_checkDelivery")
2008
+
            else {
2009
+
                func checkMerge (acc,landAssetId) =                 {
2010
+
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
2011
+
                    let timeKey = keyStakedTimeByAssetId(landAssetId)
2012
+
                    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
2013
+
                    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
2014
+
                    if ((owner != addr))
2015
+
                        then throw((LANDPREFIX + " is not yours"))
2016
+
                        else {
2017
+
                            let d = split(asset.description, "_")
2018
+
                            let continent = d[recContinent]
2019
+
                            if (if ((acc._3 != ""))
2020
+
                                then (acc._3 != continent)
2021
+
                                else false)
2022
+
                                then throw("Lands should be on the same continent to merge")
2023
+
                                else {
2024
+
                                    let landSize = d[recLandSize]
2025
+
                                    let sizesIn = acc._1
2026
+
                                    let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
2027
+
                                    let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
2028
+
                                    let pieces = numPiecesBySize(landSize)
2029
+
                                    let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
2030
+
                                    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2031
+
                                    let reqLevel =                                     match landSize {
2032
+
                                        case _ => 
2033
+
                                            if (("S" == $match0))
2034
+
                                                then 3
2035
+
                                                else if (("M" == $match0))
2036
+
                                                    then 4
2037
+
                                                    else if (("L" == $match0))
2038
+
                                                        then 5
2039
+
                                                        else if (("XL" == $match0))
2040
+
                                                            then 6
2041
+
                                                            else throw("Only S, M, L, XL can merge")
2042
+
                                    }
2043
+
                                    if ((infraLevel != reqLevel))
2044
+
                                        then throw("All lands should be maxed to merge")
2045
+
                                        else {
2046
+
                                            let landNum = d[recLandNum]
2047
+
                                            let terrainCounts = countTerrains(d[recTerrains])
2048
+
                                            let deltaTime = (lastBlock.timestamp - savedTime)
2049
+
                                            if ((0 > deltaTime))
2050
+
                                                then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
2051
+
                                                else {
2052
+
                                                    let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
2053
+
                                                    let landIndex = (pieces / SSIZE)
2054
+
                                                    let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
2055
+
                                                    let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
2056
+
                                                    let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
2057
+
                                                    let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
2058
+
                                                    let lands = acc._7
2059
+
                                                    let idx = indexOf(lands, landAssetId)
2060
+
                                                    if (!(isDefined(idx)))
2061
+
                                                        then throw(("Your staked lands don't contain " + landAssetId))
2062
+
                                                        else {
2063
+
                                                            let customKey = keyLandAssetIdToCustomName(landAssetId)
2064
+
                                                            let customName = valueOrElse(getString(customKey), "")
2065
+
                                                            $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 != ""))
2066
+
                                                                then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
2067
+
                                                                else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
2068
+
                                                            }
2069
+
                                                    }
2070
+
                                            }
2071
+
                                    }
2072
+
                            }
2073
+
                    }
2074
+
2075
+
                let bpKey = keyBackpackByDuck(duckAssetId)
2076
+
                let currentPack = getBackpack(bpKey)
2077
+
                let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
2078
+
                let landsKey = keyStakedLandsByOwner(addr)
2079
+
                let landsStr = getString(landsKey)
2080
+
                let landsIn = if (isDefined(landsStr))
2081
+
                    then split_51C(value(landsStr), "_")
2082
+
                    else nil
2083
+
                let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
2084
+
                let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
2085
+
                let r = {
2086
+
                    let $l = landAssetIds
2087
+
                    let $s = size($l)
2088
+
                    let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
2089
+
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
2090
+
                        then $a
2091
+
                        else checkMerge($a, $l[$i])
2092
+
2093
+
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
2094
+
                        then $a
2095
+
                        else throw("List size exceeds 5")
2096
+
2097
+
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
2098
+
                    }
2099
+
                let continent = r._3
2100
+
                let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
2101
+
                let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
2102
+
                let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
2103
+
                let newLandNum = toString(freeNum)
2104
+
                let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
2105
+
                let assetId = calculateAssetId(issue)
2106
+
                let newLandAssetId = toBase58String(assetId)
2107
+
                let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
2108
+
                let piecesKey = keyStakedPiecesByOwner(addr)
2109
+
                let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
2110
+
                $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
2111
+
                    then StringEntry(landsKey, makeString_11C(r._7, "_"))
2112
+
                    else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
2113
+
                    then 0
2114
+
                    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)
1935
2115
 
                }
1936
-
1937
-
            let bpKey = keyBackpackByDuck(duckAssetId)
1938
-
            let currentPack = getBackpack(bpKey)
1939
-
            let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
1940
-
            let landsKey = keyStakedLandsByOwner(addr)
1941
-
            let landsStr = getString(landsKey)
1942
-
            let landsIn = if (isDefined(landsStr))
1943
-
                then split_51C(value(landsStr), "_")
1944
-
                else nil
1945
-
            let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
1946
-
            let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
1947
-
            let r = {
1948
-
                let $l = landAssetIds
1949
-
                let $s = size($l)
1950
-
                let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
1951
-
                func $f0_1 ($a,$i) =                 if (($i >= $s))
1952
-
                    then $a
1953
-
                    else checkMerge($a, $l[$i])
1954
-
1955
-
                func $f0_2 ($a,$i) =                 if (($i >= $s))
1956
-
                    then $a
1957
-
                    else throw("List size exceeds 5")
1958
-
1959
-
                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
1960
-
                }
1961
-
            let continent = r._3
1962
-
            let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
1963
-
            let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
1964
-
            let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
1965
-
            let newLandNum = toString(freeNum)
1966
-
            let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
1967
-
            let assetId = calculateAssetId(issue)
1968
-
            let newLandAssetId = toBase58String(assetId)
1969
-
            let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
1970
-
            let piecesKey = keyStakedPiecesByOwner(addr)
1971
-
            let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
1972
-
            $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
1973
-
                then StringEntry(landsKey, makeString_11C(r._7, "_"))
1974
-
                else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
1975
-
                then 0
1976
-
                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)
1977
-
            }
1978
2116
 
    }
1979
2117
 
1980
2118
 
2008
2146
 
    then valueOrElse(getBoolean(keyBlocked()), false)
2009
2147
 
    else false)
2010
2148
 
    then throw("Contracts are under maintenance")
2011
-
    else StringEntry(keyLastTxIdByUser(toString(i.originCaller)), toBase58String(i.transactionId))
2149
+
    else {
2150
+
        let userAddr = toString(i.originCaller)
2151
+
        let duck = getString(keyStakedDuckByOwner(userAddr))
2152
+
        ((if (if (KS_ALLOW_DELIVERY)
2153
+
            then isDefined(duck)
2154
+
            else false)
2155
+
            then {
2156
+
                let duckAssetId = value(duck)
2157
+
                let locKey = keyDuckLocation(duckAssetId)
2158
+
                let loc = split(valueOrElse(getString(locKey), DEFAULTLOCATION), "_")
2159
+
                let startTime = parseIntValue(loc[locIdxContinent])
2160
+
                if (if ((loc[locIdxType] != "D"))
2161
+
                    then true
2162
+
                    else (lastBlock.timestamp > (startTime + TEN_MINUTES_MILLIS)))
2163
+
                    then nil
2164
+
                    else {
2165
+
                        let healthKey = keyDuckHealth(duckAssetId)
2166
+
                        if ((parseIntValue(loc[locIdxId]) >= 3))
2167
+
                            then {
2168
+
                                let reward = invoke(economyContract, "sendDeliveryReward", [userAddr], nil)
2169
+
                                if ((reward == reward))
2170
+
                                    then nil
2171
+
                                    else throw("Strict value is not equal to itself.")
2172
+
                                }
2173
+
                            else (({
2174
+
                                let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
2175
+
                                let unlock = invoke(economyContract, "updateDeliveryLocked", [(lockedTotal - MIN_USDT_FEE_DELIVERY)], nil)
2176
+
                                if ((unlock == unlock))
2177
+
                                    then if ((0 >= getIntegerValue(healthKey)))
2178
+
                                        then nil
2179
+
                                        else {
2180
+
                                            let punishment = invoke(this, "saveInteger", [keyDeliveryDelayByDuck(duckAssetId), (startTime + DAYMILLIS)], nil)
2181
+
                                            if ((punishment == punishment))
2182
+
                                                then nil
2183
+
                                                else throw("Strict value is not equal to itself.")
2184
+
                                            }
2185
+
                                    else throw("Strict value is not equal to itself.")
2186
+
                                } :+ IntegerEntry(healthKey, getIntegerValue(keySavedHealth(duckAssetId)))) :+ StringEntry(locKey, getStringValue(keySavedLocation(duckAssetId))))
2187
+
                        }
2188
+
                }
2189
+
            else nil) :+ StringEntry(keyLastTxIdByUser(userAddr), toBase58String(i.transactionId)))
2190
+
        }
2191
+
2192
+
2193
+
func prologFlight (i) = if (if ((i.originCaller != restContract))
2194
+
    then valueOrElse(getBoolean(keyBlocked()), false)
2195
+
    else false)
2196
+
    then throw("Contracts are under maintenance")
2197
+
    else [StringEntry(keyLastTxIdByUser(toString(i.originCaller)), toBase58String(i.transactionId))]
2012
2198
 
2013
2199
 
2014
2200
 
@Callable(i)
2019
2205
 
2020
2206
 
2021
2207
 
@Callable(i)
2208
+
func saveInteger (key,amount) = if ((i.caller != this))
2209
+
    then throw("saveInteger is not public method")
2210
+
    else [IntegerEntry(key, amount)]
2211
+
2212
+
2213
+
2214
+
@Callable(i)
2022
2215
 
func setBlocked (isBlocked) = if ((i.caller != this))
2023
2216
 
    then throw("permission denied")
2024
2217
 
    else [BooleanEntry(keyBlocked(), isBlocked)]
2027
2220
 
2028
2221
 
@Callable(i)
2029
2222
 
func stakeLand () = {
2030
-
    let prologAction = prolog(i)
2223
+
    let prologActions = prolog(i)
2031
2224
 
    if ((size(i.payments) != 1))
2032
2225
 
        then throw("Exactly one payment required")
2033
2226
 
        else {
2079
2272
 
                                                            let piecesKey = keyStakedPiecesByOwner(address)
2080
2273
 
                                                            let oldPieces = valueOrElse(getInteger(piecesKey), 0)
2081
2274
 
                                                            let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
2082
-
                                                            $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)
2275
+
                                                            $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)] ++ prologActions), wlgResult)
2083
2276
 
                                                            }
2084
2277
 
                                                }
2085
2278
 
                                        }
2092
2285
 
2093
2286
 
@Callable(i)
2094
2287
 
func unstakeLand (landAssetIdIn) = {
2095
-
    let prologAction = prolog(i)
2288
+
    let prologActions = prolog(i)
2096
2289
 
    if ((size(i.payments) != 0))
2097
2290
 
        then throw("No payments required")
2098
2291
 
        else {
2129
2322
 
                                        then 0
2130
2323
 
                                        else (stakedPieces - pieces)
2131
2324
 
                                    let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [addr], nil)
2132
-
                                    $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))
2325
+
                                    $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))
2133
2326
 
                                        then StringEntry(landsKey, makeString_11C(removeByIndex(lands, value(idx)), "_"))
2134
-
                                        else DeleteEntry(landsKey), IntegerEntry(piecesKey, newPieces), prologAction], wlgResult)
2327
+
                                        else DeleteEntry(landsKey), IntegerEntry(piecesKey, newPieces)] ++ prologActions), wlgResult)
2135
2328
 
                                    }
2136
2329
 
                            }
2137
2330
 
                    }
2142
2335
 
2143
2336
 
@Callable(i)
2144
2337
 
func stakeDuck () = {
2145
-
    let prologAction = prolog(i)
2338
+
    let prologActions = prolog(i)
2146
2339
 
    if ((size(i.payments) != 1))
2147
2340
 
        then throw("Exactly one payment required")
2148
2341
 
        else {
2166
2359
 
                                    then throw((("NFT " + asset.name) + " is already staked"))
2167
2360
 
                                    else if (isDefined(getString(keyStakedDuckByOwner(address))))
2168
2361
 
                                        then throw(("You already staked one duck: " + asset.name))
2169
-
                                        else if (checkTournament(assetIdStr))
2170
-
                                            then throw("stakeDuck_checkTournament")
2171
-
                                            else {
2172
-
                                                let locKey = keyDuckLocation(assetIdStr)
2173
-
                                                let location = getString(locKey)
2174
-
                                                let bpKey = keyBackpackByDuck(assetIdStr)
2175
-
                                                let backpack = getString(bpKey)
2176
-
                                                let keyHealth = keyDuckHealth(assetIdStr)
2177
-
                                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2178
-
                                                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
2179
-
                                                ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
2362
+
                                        else {
2363
+
                                            let locKey = keyDuckLocation(assetIdStr)
2364
+
                                            let location = getString(locKey)
2365
+
                                            let bpKey = keyBackpackByDuck(assetIdStr)
2366
+
                                            let backpack = getString(bpKey)
2367
+
                                            let keyHealth = keyDuckHealth(assetIdStr)
2368
+
                                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2369
+
                                            let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
2370
+
                                            ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
2371
+
                                                then nil
2372
+
                                                else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(backpack))
2180
2373
 
                                                    then nil
2181
-
                                                    else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(backpack))
2182
-
                                                        then nil
2183
-
                                                        else (([StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(keyHealth, curHealth)) :+ prologAction)))))
2184
-
                                                }
2374
+
                                                    else (([StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(keyHealth, curHealth)) ++ prologActions)))))
2375
+
                                            }
2185
2376
 
                                }
2186
2377
 
                    }
2187
2378
 
            }
2191
2382
 
2192
2383
 
@Callable(i)
2193
2384
 
func unstakeDuck (assetIdStr) = {
2194
-
    let prologAction = prolog(i)
2385
+
    let prologActions = prolog(i)
2195
2386
 
    if ((size(i.payments) != 0))
2196
2387
 
        then throw("No payments required")
2197
2388
 
        else {
2209
2400
 
                            then throw("Staked NFT is not yours")
2210
2401
 
                            else if (checkTournament(assetIdStr))
2211
2402
 
                                then throw("unstakeDuck_checkTournament")
2212
-
                                else {
2213
-
                                    let keyHealth = keyDuckHealth(assetIdStr)
2214
-
                                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2215
-
                                    let health = valueOrElse(getInteger(keyHealth), maxHP)
2216
-
                                    if ((maxHP > health))
2217
-
                                        then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2218
-
                                        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]
2219
-
                                    }
2403
+
                                else if (checkDelivery(assetIdStr))
2404
+
                                    then throw("unstakeDuck_checkDelivery")
2405
+
                                    else {
2406
+
                                        let keyHealth = keyDuckHealth(assetIdStr)
2407
+
                                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2408
+
                                        let health = valueOrElse(getInteger(keyHealth), maxHP)
2409
+
                                        if ((maxHP > health))
2410
+
                                            then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2411
+
                                            else ([ScriptTransfer(i.caller, 1, assetId), DeleteEntry(timeKey), DeleteEntry(keyHealth), DeleteEntry(keyDuckLocation(assetIdStr)), DeleteEntry(keyDuckIdToOwner(assetIdStr)), DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, assetIdStr, address)), DeleteEntry(keyStakedDuckByOwner(address))] ++ prologActions)
2412
+
                                        }
2220
2413
 
                        }
2221
2414
 
            }
2222
2415
 
    }
2225
2418
 
2226
2419
 
@Callable(i)
2227
2420
 
func claimRes (amount,landAssetIdStr) = {
2228
-
    let prologAction = prolog(i)
2421
+
    let prologActions = prolog(i)
2229
2422
 
    if ((size(i.payments) != 0))
2230
2423
 
        then throw("No payments required")
2231
2424
 
        else {
2232
2425
 
            let addr = toString(i.originCaller)
2233
2426
 
            let result = claimResInternal(addr, amount, claimModeDuck, landAssetIdStr)
2234
2427
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2235
-
            $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])
2428
+
            $Tuple2(((((result._1 ++ updateDuckStatsInternal(duckAssetId, fraction(xpClaim, amount, MULT8))._1) :+ StringEntry(result._2, makeString(result._3, ":"))) :+ StringEntry(result._4, makeString(result._5, ":"))) ++ prologActions), result._3[bpIdxRes])
2236
2429
 
            }
2237
2430
 
    }
2238
2431
 
2240
2433
 
2241
2434
 
@Callable(i)
2242
2435
 
func claimResToWH (amount,landAssetIdStr) = {
2243
-
    let prologAction = prolog(i)
2436
+
    let prologActions = prolog(i)
2244
2437
 
    if ((size(i.payments) != 0))
2245
2438
 
        then throw("No payments required")
2246
2439
 
        else {
2247
2440
 
            let addr = toString(i.originCaller)
2248
2441
 
            let result = claimResInternal(addr, amount, claimModeWh, landAssetIdStr)
2249
-
            $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])
2442
+
            $Tuple2(((((result._1 ++ updateAccStatsInternal(addr, fraction(xpClaim, amount, MULT8))._1) :+ StringEntry(result._2, makeString(result._3, ":"))) :+ StringEntry(result._4, makeString(result._5, ":"))) ++ prologActions), result._5[whIdxRes])
2250
2443
 
            }
2251
2444
 
    }
2252
2445
 
2254
2447
 
2255
2448
 
@Callable(i)
2256
2449
 
func flight (message,sig) = {
2257
-
    let prologAction = prolog(i)
2450
+
    let prologActions = prologFlight(i)
2258
2451
 
    if ((size(i.payments) != 0))
2259
2452
 
        then throw("No payments required")
2260
2453
 
        else {
2270
2463
 
                else {
2271
2464
 
                    let newLoc = split(newLocation, "_")
2272
2465
 
                    let isTour = (newLoc[locIdxType] == "T")
2466
+
                    let isDeliv = (newLoc[locIdxType] == "D")
2273
2467
 
                    let eqKey = keyDuckEquipment(duckAssetId)
2274
2468
 
                    let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2275
-
                    let $t06598166078 = subtractEquipment(currentEq, f._5)
2276
-
                    let newEq = $t06598166078._1
2277
-
                    let shouldZeroBuffs = $t06598166078._2
2278
-
                    let locToSave = if (!(isInTournament(tournamentContract, curLocation)))
2279
-
                        then if (isTour)
2280
-
                            then throw(((("Cheat attempt: oldLoc=" + curLocation) + ", newLoc=") + newLocation))
2469
+
                    let $t07021270309 = subtractEquipment(currentEq, f._5)
2470
+
                    let newEq = $t07021270309._1
2471
+
                    let shouldZeroBuffs = $t07021270309._2
2472
+
                    let $t07031273351 = if (notOnMission(tournamentContract, curLocation))
2473
+
                        then if (!(isUsualLocation(newLocation)))
2474
+
                            then cheatAttempt(curLocation, newLocation)
2281
2475
 
                            else if ((newHP > 0))
2282
-
                                then newLocation
2283
-
                                else curLocation
2284
-
                        else if (!(isInTournament(tournamentContract, newLocation)))
2285
-
                            then throw("Your duck is taking part in the tournament")
2286
-
                            else {
2287
-
                                let score = parseIntValue(newLoc[locIdxId])
2288
-
                                let curLoc = split(curLocation, "_")
2289
-
                                let lastId = valueOrElse(getInteger(tournamentContract, lastTourIdKey), 0)
2290
-
                                if ((score != (parseIntValue(curLoc[locIdxId]) + 1)))
2291
-
                                    then throw(((("Cheat attempt: oldLoc=" + curLocation) + ", newLoc=") + newLocation))
2292
-
                                    else if ((newHP > 0))
2293
-
                                        then {
2294
-
                                            let localBest = valueOrElse(getInteger(tournamentContract, keyBestResultByTourAndDuck(lastId, duckAssetId)), 0)
2295
-
                                            let updLocal = if ((score > localBest))
2296
-
                                                then invoke(tournamentContract, "saveDuckResult", [duckAssetId, score], nil)
2297
-
                                                else unit
2298
-
                                            if ((updLocal == updLocal))
2299
-
                                                then newLocation
2300
-
                                                else throw("Strict value is not equal to itself.")
2476
+
                                then $Tuple2(newLocation, newHP)
2477
+
                                else $Tuple2(curLocation, 0)
2478
+
                        else if (isInTournament(tournamentContract, curLocation))
2479
+
                            then if (!(isInTournament(tournamentContract, newLocation)))
2480
+
                                then throw("Your duck is taking part in the tournament")
2481
+
                                else {
2482
+
                                    let score = parseIntValue(newLoc[locIdxId])
2483
+
                                    let curLoc = split(curLocation, "_")
2484
+
                                    let lastId = valueOrElse(getInteger(tournamentContract, lastTourIdKey), 0)
2485
+
                                    if ((score != (parseIntValue(curLoc[locIdxId]) + 1)))
2486
+
                                        then cheatAttempt(curLocation, newLocation)
2487
+
                                        else if ((newHP > 0))
2488
+
                                            then {
2489
+
                                                let localBest = valueOrElse(getInteger(tournamentContract, keyBestResultByTourAndDuck(lastId, duckAssetId)), 0)
2490
+
                                                let updLocal = if ((score > localBest))
2491
+
                                                    then invoke(tournamentContract, "saveDuckResult", [duckAssetId, score], nil)
2492
+
                                                    else unit
2493
+
                                                if ((updLocal == updLocal))
2494
+
                                                    then $Tuple2(newLocation, newHP)
2495
+
                                                    else throw("Strict value is not equal to itself.")
2496
+
                                                }
2497
+
                                            else $Tuple2(curLocation, 0)
2498
+
                                    }
2499
+
                            else if (!(isInDelivery(curLocation)))
2500
+
                                then {
2501
+
                                    let locHealth = asStringIntTuple(invoke(this, "autoExitDelivery", [duckAssetId], nil))
2502
+
                                    if ((locHealth == locHealth))
2503
+
                                        then if (isDeliv)
2504
+
                                            then locHealth
2505
+
                                            else if ((newHP > 0))
2506
+
                                                then $Tuple2(newLocation, newHP)
2507
+
                                                else $Tuple2(locHealth._1, 0)
2508
+
                                        else throw("Strict value is not equal to itself.")
2509
+
                                    }
2510
+
                                else if (!(isDeliv))
2511
+
                                    then throw("Your duck is taking part in delivery")
2512
+
                                    else if (!(isInDelivery(newLocation)))
2513
+
                                        then cheatAttempt(curLocation, newLocation)
2514
+
                                        else {
2515
+
                                            let score = parseIntValue(newLoc[locIdxId])
2516
+
                                            let curLoc = split(curLocation, "_")
2517
+
                                            if ((score != (parseIntValue(curLoc[locIdxId]) + 1)))
2518
+
                                                then cheatAttempt(curLocation, newLocation)
2519
+
                                                else if (if ((newHP > 0))
2520
+
                                                    then (3 > score)
2521
+
                                                    else false)
2522
+
                                                    then $Tuple2(newLocation, newHP)
2523
+
                                                    else {
2524
+
                                                        let locHealth = asStringIntTuple(invoke(this, "autoExitDelivery", [duckAssetId], nil))
2525
+
                                                        if ((locHealth == locHealth))
2526
+
                                                            then locHealth
2527
+
                                                            else throw("Strict value is not equal to itself.")
2528
+
                                                        }
2301
2529
 
                                            }
2302
-
                                        else curLocation
2303
-
                                }
2304
-
                    $Tuple2(([StringEntry(locKey, locToSave), StringEntry(eqKey, newEq), IntegerEntry(keyDuckHealth(duckAssetId), newHP), prologAction] ++ (if (shouldZeroBuffs)
2530
+
                    let locToSave = $t07031273351._1
2531
+
                    let hpToSave = $t07031273351._2
2532
+
                    $Tuple2(((([StringEntry(locKey, locToSave), StringEntry(eqKey, newEq), IntegerEntry(keyDuckHealth(duckAssetId), newHP)] ++ prologActions) ++ (if (shouldZeroBuffs)
2305
2533
 
                        then [StringEntry(keyDuckBuffs(duckAssetId), "0_0_0_0_0")]
2306
-
                        else (nil ++ updateDuckStatsInternal(duckAssetId, if ((newHP > 0))
2307
-
                            then xpSuccessFlight
2308
-
                            else xpFailFlight)._1))), f._3)
2534
+
                        else nil)) ++ updateDuckStatsInternal(duckAssetId, if ((newHP > 0))
2535
+
                        then xpSuccessFlight
2536
+
                        else xpFailFlight)._1), f._3)
2309
2537
 
                    }
2310
2538
 
            }
2311
2539
 
    }
2314
2542
 
2315
2543
 
@Callable(i)
2316
2544
 
func heal (quantityL1,quantityL2,quantityL3) = {
2317
-
    let prologAction = prolog(i)
2545
+
    let prologActions = prolog(i)
2318
2546
 
    if (if (if ((0 > quantityL1))
2319
2547
 
        then true
2320
2548
 
        else (0 > quantityL2))
2325
2553
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2326
2554
 
            if (checkTournament(duckAssetId))
2327
2555
 
                then throw("heal_checkTournament")
2328
-
                else {
2329
-
                    let qts = [quantityL1, quantityL2, quantityL3]
2330
-
                    let keyHealth = keyDuckHealth(duckAssetId)
2331
-
                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2332
-
                    let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2333
-
                    if ((oldHealth >= maxHP))
2334
-
                        then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2335
-
                        else {
2336
-
                            let bpKey = keyBackpackByDuck(duckAssetId)
2337
-
                            let currentPack = getBackpack(bpKey)
2338
-
                            let prodList = if ((currentPack[bpIdxProd] == ""))
2339
-
                                then nil
2340
-
                                else split_4C(currentPack[bpIdxProd], "_")
2341
-
                            func iterateProd (acc,recipe) =                             {
2342
-
                                let n = acc._2
2343
-
                                let x = if ((size(prodList) > n))
2344
-
                                    then parseIntValue(prodList[n])
2345
-
                                    else 0
2346
-
                                if ((3 > n))
2347
-
                                    then {
2348
-
                                        let q = qts[n]
2349
-
                                        if ((q > x))
2350
-
                                            then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2351
-
                                            else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2352
-
                                        }
2353
-
                                    else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2556
+
                else if (checkDelivery(duckAssetId))
2557
+
                    then throw("heal_checkDelivery")
2558
+
                    else {
2559
+
                        let qts = [quantityL1, quantityL2, quantityL3]
2560
+
                        let keyHealth = keyDuckHealth(duckAssetId)
2561
+
                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2562
+
                        let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2563
+
                        if ((oldHealth >= maxHP))
2564
+
                            then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2565
+
                            else {
2566
+
                                let bpKey = keyBackpackByDuck(duckAssetId)
2567
+
                                let currentPack = getBackpack(bpKey)
2568
+
                                let prodList = if ((currentPack[bpIdxProd] == ""))
2569
+
                                    then nil
2570
+
                                    else split_4C(currentPack[bpIdxProd], "_")
2571
+
                                func iterateProd (acc,recipe) =                                 {
2572
+
                                    let n = acc._2
2573
+
                                    let x = if ((size(prodList) > n))
2574
+
                                        then parseIntValue(prodList[n])
2575
+
                                        else 0
2576
+
                                    if ((3 > n))
2577
+
                                        then {
2578
+
                                            let q = qts[n]
2579
+
                                            if ((q > x))
2580
+
                                                then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2581
+
                                                else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2582
+
                                            }
2583
+
                                        else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2584
+
                                    }
2585
+
2586
+
                                let result = {
2587
+
                                    let $l = productionMatrix
2588
+
                                    let $s = size($l)
2589
+
                                    let $acc0 = $Tuple3(nil, 0, 0)
2590
+
                                    func $f0_1 ($a,$i) =                                     if (($i >= $s))
2591
+
                                        then $a
2592
+
                                        else iterateProd($a, $l[$i])
2593
+
2594
+
                                    func $f0_2 ($a,$i) =                                     if (($i >= $s))
2595
+
                                        then $a
2596
+
                                        else throw("List size exceeds 50")
2597
+
2598
+
                                    $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)
2599
+
                                    }
2600
+
                                let newHealth = min([maxHP, (oldHealth + result._3)])
2601
+
                                $Tuple2((([IntegerEntry(keyHealth, newHealth), StringEntry(bpKey, makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString(result._1, "_")], ":"))] ++ prologActions) ++ updateDuckStatsInternal(duckAssetId, (xpHeal * ((quantityL1 + quantityL2) + quantityL3)))._1), newHealth)
2354
2602
 
                                }
2355
-
2356
-
                            let result = {
2357
-
                                let $l = productionMatrix
2358
-
                                let $s = size($l)
2359
-
                                let $acc0 = $Tuple3(nil, 0, 0)
2360
-
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
2361
-
                                    then $a
2362
-
                                    else iterateProd($a, $l[$i])
2363
-
2364
-
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
2365
-
                                    then $a
2366
-
                                    else throw("List size exceeds 50")
2367
-
2368
-
                                $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)
2369
-
                                }
2370
-
                            let newHealth = min([maxHP, (oldHealth + result._3)])
2371
-
                            $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)
2372
-
                            }
2373
-
                    }
2603
+
                        }
2374
2604
 
            }
2375
2605
 
    }
2376
2606
 
2378
2608
 
2379
2609
 
@Callable(i)
2380
2610
 
func healES () = {
2381
-
    let prologAction = prolog(i)
2611
+
    let prologActions = prolog(i)
2382
2612
 
    if ((size(i.payments) != 1))
2383
2613
 
        then throw("Exactly one payment required")
2384
2614
 
        else {
2389
2619
 
                    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2390
2620
 
                    if (checkTournament(duckAssetId))
2391
2621
 
                        then throw("healES_checkTournament")
2392
-
                        else {
2393
-
                            let keyHealth = keyDuckHealth(duckAssetId)
2394
-
                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2395
-
                            let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2396
-
                            if ((oldHealth > 0))
2397
-
                                then throw("HP should be 0 to call Emergency Service")
2398
-
                                else {
2399
-
                                    let bpKey = keyBackpackByDuck(duckAssetId)
2400
-
                                    let currentPack = getBackpack(bpKey)
2401
-
                                    let prodList = if ((currentPack[bpIdxProd] == ""))
2402
-
                                        then nil
2403
-
                                        else split_4C(currentPack[bpIdxProd], "_")
2404
-
                                    let medKitAmount1 = if ((size(prodList) > 0))
2405
-
                                        then parseIntValue(prodList[0])
2406
-
                                        else 0
2407
-
                                    let medKitAmount2 = if ((size(prodList) > 1))
2408
-
                                        then parseIntValue(prodList[1])
2409
-
                                        else 0
2410
-
                                    let medKitAmount3 = if ((size(prodList) > 2))
2411
-
                                        then parseIntValue(prodList[2])
2412
-
                                        else 0
2413
-
                                    if (if (if ((medKitAmount1 > 0))
2414
-
                                        then true
2415
-
                                        else (medKitAmount2 > 0))
2416
-
                                        then true
2417
-
                                        else (medKitAmount3 > 0))
2418
-
                                        then throw("You have to use own Medical Kit")
2419
-
                                        else {
2420
-
                                            let existStr = getString(economyContract, keyEsWarehouse())
2421
-
                                            let existAmounts = if (isDefined(existStr))
2422
-
                                                then split_4C(value(existStr), "_")
2423
-
                                                else nil
2424
-
                                            let existAmount = if ((size(existAmounts) > 0))
2425
-
                                                then parseIntValue(existAmounts[0])
2426
-
                                                else 0
2427
-
                                            if ((0 >= existAmount))
2428
-
                                                then throw("There are no Medical Kits L1 at Emergency Service storage")
2429
-
                                                else {
2430
-
                                                    let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2431
-
                                                    let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2432
-
                                                    let recipe = split(productionMatrix[0], "_")
2433
-
                                                    let totalMat = getRecipeMaterials(recipe)
2434
-
                                                    let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2435
-
                                                    if ((pmt.amount != sellPrice))
2436
-
                                                        then throw(("Payment attached should be " + toString(sellPrice)))
2437
-
                                                        else {
2438
-
                                                            let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2439
-
                                                            $Tuple2(([IntegerEntry(keyHealth, newHealth), prologAction] ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2440
-
                                                            }
2441
-
                                                    }
2442
-
                                            }
2443
-
                                    }
2444
-
                            }
2622
+
                        else if (checkDelivery(duckAssetId))
2623
+
                            then throw("healES_checkDelivery")
2624
+
                            else {
2625
+
                                let keyHealth = keyDuckHealth(duckAssetId)
2626
+
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2627
+
                                let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2628
+
                                if ((oldHealth > 0))
2629
+
                                    then throw("HP should be 0 to call Emergency Service")
2630
+
                                    else {
2631
+
                                        let bpKey = keyBackpackByDuck(duckAssetId)
2632
+
                                        let currentPack = getBackpack(bpKey)
2633
+
                                        let prodList = if ((currentPack[bpIdxProd] == ""))
2634
+
                                            then nil
2635
+
                                            else split_4C(currentPack[bpIdxProd], "_")
2636
+
                                        let medKitAmount1 = if ((size(prodList) > 0))
2637
+
                                            then parseIntValue(prodList[0])
2638
+
                                            else 0
2639
+
                                        let medKitAmount2 = if ((size(prodList) > 1))
2640
+
                                            then parseIntValue(prodList[1])
2641
+
                                            else 0
2642
+
                                        let medKitAmount3 = if ((size(prodList) > 2))
2643
+
                                            then parseIntValue(prodList[2])
2644
+
                                            else 0
2645
+
                                        if (if (if ((medKitAmount1 > 0))
2646
+
                                            then true
2647
+
                                            else (medKitAmount2 > 0))
2648
+
                                            then true
2649
+
                                            else (medKitAmount3 > 0))
2650
+
                                            then throw("You have to use own Medical Kit")
2651
+
                                            else {
2652
+
                                                let existStr = getString(economyContract, keyEsWarehouse())
2653
+
                                                let existAmounts = if (isDefined(existStr))
2654
+
                                                    then split_4C(value(existStr), "_")
2655
+
                                                    else nil
2656
+
                                                let existAmount = if ((size(existAmounts) > 0))
2657
+
                                                    then parseIntValue(existAmounts[0])
2658
+
                                                    else 0
2659
+
                                                if ((0 >= existAmount))
2660
+
                                                    then throw("There are no Medical Kits L1 at Emergency Service storage")
2661
+
                                                    else {
2662
+
                                                        let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2663
+
                                                        let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2664
+
                                                        let recipe = split(productionMatrix[0], "_")
2665
+
                                                        let totalMat = getRecipeMaterials(recipe)
2666
+
                                                        let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2667
+
                                                        if ((pmt.amount != sellPrice))
2668
+
                                                            then throw(("Payment attached should be " + toString(sellPrice)))
2669
+
                                                            else {
2670
+
                                                                let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2671
+
                                                                $Tuple2(((prologActions :+ IntegerEntry(keyHealth, newHealth)) ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2672
+
                                                                }
2673
+
                                                        }
2674
+
                                                }
2675
+
                                        }
2676
+
                                }
2445
2677
 
                    }
2446
2678
 
            }
2447
2679
 
    }
2457
2689
 
2458
2690
 
@Callable(i)
2459
2691
 
func commitForRandom () = {
2460
-
    let prologAction = prolog(i)
2692
+
    let prologActions = prolog(i)
2461
2693
 
    let finishBlock = (height + randomDelay)
2462
2694
 
    let addr = toString(i.caller)
2463
-
    $Tuple2(([IntegerEntry(keyCommit(addr), finishBlock)] :+ prologAction), finishBlock)
2464
-
    }
2465
-
2466
-
2467
-
2468
-
@Callable(i)
2469
-
func awardSLand (address) = if ((i.caller != tournamentContract))
2470
-
    then throw("Access denied")
2471
-
    else if ((size(i.payments) != 0))
2472
-
        then throw("No payments required")
2473
-
        else {
2474
-
            let result = expeditionInternal(addressFromStringValue(address), i.transactionId)
2475
-
            $Tuple2(result._1, result._2._1)
2476
-
            }
2695
+
    $Tuple2(([IntegerEntry(keyCommit(addr), finishBlock)] ++ prologActions), finishBlock)
2696
+
    }
2477
2697
 
2478
2698
 
2479
2699
 
2480
2700
 
@Callable(i)
2481
2701
 
func buySLand () = {
2482
-
    let prologAction = prolog(i)
2702
+
    let prologActions = prolog(i)
2483
2703
 
    if ((size(i.payments) != 1))
2484
2704
 
        then throw("Exactly one payment required")
2485
2705
 
        else {
2490
2710
 
                    then throw(("Payment attached should be " + toString(EXPUSDT)))
2491
2711
 
                    else {
2492
2712
 
                        let result = expeditionInternal(i.caller, i.transactionId)
2493
-
                        $Tuple2((((result._1 :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) ++ updateAccStatsInternal(toString(i.caller), xpNewSLand)._1) :+ prologAction), result._2._1)
2713
+
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2714
+
                        $Tuple2((((result._1 :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) ++ updateAccStatsInternal(toString(i.caller), xpNewSLand)._1) ++ prologActions), $Tuple2(result._2._1, acresResult))
2494
2715
 
                        }
2495
2716
 
            }
2496
2717
 
    }
2499
2720
 
2500
2721
 
@Callable(i)
2501
2722
 
func expedition (message,sig) = {
2502
-
    let prologAction = prolog(i)
2723
+
    let prologActions = prolog(i)
2503
2724
 
    if ((size(i.payments) != 0))
2504
2725
 
        then throw("No payments required")
2505
2726
 
        else {
2513
2734
 
            let newMat = makeString(subtractMaterials(true, mList, EXPMATERIALS), "_")
2514
2735
 
            let eqKey = keyDuckEquipment(duckAssetId)
2515
2736
 
            let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2516
-
            let $t07473874835 = subtractEquipment(currentEq, f._5)
2517
-
            let newEq = $t07473874835._1
2518
-
            let shouldZeroBuffs = $t07473874835._2
2737
+
            let $t08078880885 = subtractEquipment(currentEq, f._5)
2738
+
            let newEq = $t08078880885._1
2739
+
            let shouldZeroBuffs = $t08078880885._2
2519
2740
 
            let e = expeditionInternal(i.caller, i.transactionId)
2520
2741
 
            let id = e._2._1
2521
2742
 
            let result = if ((0 >= f._1))
2525
2746
 
                    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)
2526
2747
 
            if (checkTournament(duckAssetId))
2527
2748
 
                then throw("expedition_checkTournament")
2528
-
                else $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) :+ prologAction), $Tuple2(result._2, result._3))
2749
+
                else if (checkDelivery(duckAssetId))
2750
+
                    then throw("expedition_checkDelivery")
2751
+
                    else {
2752
+
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2753
+
                        $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) ++ prologActions), $Tuple3(result._2, result._3, acresResult))
2754
+
                        }
2755
+
            }
2756
+
    }
2757
+
2758
+
2759
+
2760
+
@Callable(i)
2761
+
func buySLandForAcres () = {
2762
+
    let prologActions = prolog(i)
2763
+
    if ((size(i.payments) != 1))
2764
+
        then throw("exactly 1 payment must be attached")
2765
+
        else {
2766
+
            let pmt = i.payments[0]
2767
+
            let amt = pmt.amount
2768
+
            if (if (!(isDefined(pmt.assetId)))
2769
+
                then true
2770
+
                else (value(pmt.assetId) != acresAssetId))
2771
+
                then throw("ACRES payments only!")
2772
+
                else if ((amt != S_COST_ACRES))
2773
+
                    then throw(("Payment attached should be " + toString(S_COST_ACRES)))
2774
+
                    else {
2775
+
                        let result = expeditionInternal(i.caller, i.transactionId)
2776
+
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], [AttachedPayment(acresAssetId, amt)]))
2777
+
                        $Tuple2(((result._1 ++ updateAccStatsInternal(toString(i.caller), xpNewSLand)._1) ++ prologActions), $Tuple2(result._2._1, acresResult))
2778
+
                        }
2529
2779
 
            }
2530
2780
 
    }
2531
2781
 
2533
2783
 
2534
2784
 
@Callable(i)
2535
2785
 
func upgradeInfra (landAssetId) = {
2536
-
    let prologAction = prolog(i)
2786
+
    let prologActions = prolog(i)
2537
2787
 
    if ((size(i.payments) != 0))
2538
2788
 
        then throw("No payments required")
2539
2789
 
        else {
2540
2790
 
            let result = upInfraCommon(true, i.caller, 0, landAssetId)
2541
2791
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2542
-
            $Tuple2(((result._1 :+ prologAction) ++ updateDuckStatsInternal(duckAssetId, fraction(xpUpgradeInfra, result._3, MULT8))._1), result._2)
2792
+
            $Tuple2(((result._1 ++ prologActions) ++ updateDuckStatsInternal(duckAssetId, fraction(xpUpgradeInfra, result._3, MULT8))._1), result._2)
2543
2793
 
            }
2544
2794
 
    }
2545
2795
 
2547
2797
 
2548
2798
 
@Callable(i)
2549
2799
 
func activateArtifact (artName,landAssetIdOpt) = {
2550
-
    let prologAction = prolog(i)
2800
+
    let prologActions = prolog(i)
2551
2801
 
    if ((size(i.payments) != 0))
2552
2802
 
        then throw("No payments required")
2553
2803
 
        else {
2560
2810
 
                            then activateOnboardArt(addr)
2561
2811
 
                            else throw("Unknown artifact")
2562
2812
 
            }
2563
-
            (result :+ prologAction)
2813
+
            (result ++ prologActions)
2564
2814
 
            }
2565
2815
 
    }
2566
2816
 
2568
2818
 
2569
2819
 
@Callable(i)
2570
2820
 
func mergeLands (landAssetIds) = {
2571
-
    let prologAction = prolog(i)
2821
+
    let prologActions = prolog(i)
2572
2822
 
    if ((size(i.payments) != 0))
2573
2823
 
        then throw("No payments required")
2574
2824
 
        else {
2575
2825
 
            let result = mergeCommon(toString(i.caller), landAssetIds)
2576
-
            $Tuple2(((result._1 :+ prologAction) ++ updateAccStatsInternal(toString(i.caller), xpMerge)._1), result._2)
2826
+
            $Tuple2(((result._1 ++ prologActions) ++ updateAccStatsInternal(toString(i.caller), xpMerge)._1), result._2)
2577
2827
 
            }
2578
2828
 
    }
2579
2829
 
2581
2831
 
2582
2832
 
@Callable(i)
2583
2833
 
func cargoExchange (cargoListStr,landAssetId) = {
2584
-
    let prologAction = prolog(i)
2834
+
    let prologActions = prolog(i)
2585
2835
 
    if ((size(i.payments) != 0))
2586
2836
 
        then throw("No payments required")
2587
2837
 
        else {
2614
2864
 
                                        let loft = split(currentWh[whIdxLOFT], "_")
2615
2865
 
                                        let loftO = (parseIntValue(loft[volOccupied]) + result._7)
2616
2866
 
                                        let loftF = (parseIntValue(loft[volFree]) - result._7)
2617
-
[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]
2867
+
                                        ([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]], "_")], ":"))] ++ prologActions)
2618
2868
 
                                        }
2619
2869
 
                            }
2620
2870
 
                    }
2763
3013
 
2764
3014
 
@Callable(i)
2765
3015
 
func setCustomName (assetId,customName,type) = {
2766
-
    let prologAction = prolog(i)
3016
+
    let prologActions = prolog(i)
2767
3017
 
    if ((size(i.payments) != 1))
2768
3018
 
        then throw("Exactly one payment required")
2769
3019
 
        else {
2851
3101
 
                                                        }
2852
3102
 
                                                    else throw("Unknown entity type")
2853
3103
 
                                }
2854
-
                                $Tuple2(((actions :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) :+ prologAction), 0)
3104
+
                                $Tuple2(((actions :+ ScriptTransfer(economyContract, pmt.amount, usdtAssetId)) ++ prologActions), 0)
2855
3105
 
                                }
2856
3106
 
            }
2857
3107
 
    }
2862
3112
 
func setReferrals (oldPlayer,newPlayer) = if ((i.callerPublicKey != pub))
2863
3113
 
    then throw("Permission denied")
2864
3114
 
    else {
2865
-
        let prologAction = prolog(i)
3115
+
        let prologActions = prolog(i)
2866
3116
 
        if ((size(i.payments) != 0))
2867
3117
 
            then throw("No payments required")
2868
3118
 
            else if (!(isDefined(addressFromString(oldPlayer))))
2897
3147
 
                                                let newOlds = if (containsElement(oldies, oldPlayer))
2898
3148
 
                                                    then value(olds)
2899
3149
 
                                                    else makeString_2C((oldies :+ oldPlayer), "_")
2900
-
                                                $Tuple2([StringEntry(refByKey, oldPlayer), StringEntry(refsKey, newRefs), StringEntry(oldsKey, newOlds), prologAction], 0)
3150
+
                                                $Tuple2(([StringEntry(refByKey, oldPlayer), StringEntry(refsKey, newRefs), StringEntry(oldsKey, newOlds)] ++ prologActions), 0)
2901
3151
 
                                                }
2902
3152
 
                                        }
2903
3153
 
                                }
2908
3158
 
2909
3159
 
@Callable(i)
2910
3160
 
func distributePoints (strength,accuracy,intellect,endurance,dexterity) = {
2911
-
    let prologAction = prolog(i)
3161
+
    let prologActions = prolog(i)
2912
3162
 
    if ((size(i.payments) != 0))
2913
3163
 
        then throw("No payments required")
2914
3164
 
        else {
2926
3176
 
                    let charsKey = keyDuckChars(duckAssetId)
2927
3177
 
                    let chars = split(valueOrElse(getString(stakingContract, charsKey), "0_0_0_0_0"), "_")
2928
3178
 
                    let newAcc = (freePointsAcc - sumToDistribute)
2929
-
                    $Tuple2([IntegerEntry(freeKeyAcc, if ((0 > newAcc))
3179
+
                    $Tuple2(([IntegerEntry(freeKeyAcc, if ((0 > newAcc))
2930
3180
 
                        then 0
2931
3181
 
                        else newAcc), IntegerEntry(freeKeyDuck, if ((0 > newAcc))
2932
3182
 
                        then (freePointsDuck + newAcc)
2933
-
                        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)
3183
+
                        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))], "_"))] ++ prologActions), 0)
2934
3184
 
                    }
2935
3185
 
            }
2936
3186
 
    }
2968
3218
 
@Callable(i)
2969
3219
 
func saveLastTx () = {
2970
3220
 
    let caller = i.caller
2971
-
    if (if (if ((caller != wlgContract))
2972
-
        then (caller != economyContract)
2973
-
        else false)
2974
-
        then (caller != tournamentContract)
2975
-
        else false)
3221
+
    if (!(containsElement([wlgContract, economyContract, tournamentContract, acresContract], caller)))
2976
3222
 
        then throw("Access denied")
2977
-
        else $Tuple2([prolog(i)], 42)
3223
+
        else $Tuple2(prolog(i), 42)
2978
3224
 
    }
2979
3225
 
2980
3226
 
2987
3233
 
2988
3234
 
2989
3235
 
@Callable(i)
2990
-
func updateAccStats (addr,deltaXP) = if ((i.caller != economyContract))
3236
+
func updateAccStats (addr,deltaXP) = if (if ((i.caller != economyContract))
3237
+
    then (i.caller != acresContract)
3238
+
    else false)
2991
3239
 
    then throw("Access denied")
2992
3240
 
    else updateAccStatsInternal(addr, deltaXP)
2993
3241
 
2995
3243
 
2996
3244
 
@Callable(i)
2997
3245
 
func equipDuck (equipment) = {
2998
-
    let prologAction = prolog(i)
3246
+
    let prologActions = prolog(i)
2999
3247
 
    if ((size(i.payments) != 0))
3000
3248
 
        then throw("No payments required")
3001
3249
 
        else {
3003
3251
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
3004
3252
 
            if (checkTournament(duckAssetId))
3005
3253
 
                then throw("equipDuck_checkTournament")
3006
-
                else {
3007
-
                    let eqKey = keyDuckEquipment(duckAssetId)
3008
-
                    let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3009
-
                    let bpKey = keyBackpackByDuck(duckAssetId)
3010
-
                    let currentPack = getBackpack(bpKey)
3011
-
                    let newEq = split(equipment, "_")
3012
-
                    if ((size(newEq) != NUMSEGMENTS))
3013
-
                        then throw("Wrong equipment string")
3014
-
                        else {
3015
-
                            let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3016
-
                            let segBpAux = split(newEq[segBackpack], ";")[1]
3017
-
                            let buffEffect = if ((segBpAux == ""))
3018
-
                                then 0
3019
-
                                else {
3020
-
                                    let aux0 = split(segBpAux, ",")[0]
3021
-
                                    if ((aux0 == ""))
3022
-
                                        then 0
3023
-
                                        else {
3024
-
                                            let idxCnt = split(aux0, ":")
3025
-
                                            let idx = idxCnt[0]
3026
-
                                            let cnt = idxCnt[1]
3027
-
                                            if (if (if (if (if ((idx == "06"))
3028
-
                                                then true
3029
-
                                                else (idx == "07"))
3030
-
                                                then true
3031
-
                                                else (idx == "08"))
3032
-
                                                then (cnt != "")
3033
-
                                                else false)
3034
-
                                                then (parseIntValue(cnt) > 0)
3035
-
                                                else false)
3036
-
                                                then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3037
-
                                                else 0
3038
-
                                            }
3039
-
                                    }
3040
-
                            let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3041
-
                            let newProdB = dressB(newEq, tempProdB, false, stats)
3042
-
                            let newProdStr = bytesToProdStr(newProdB)
3043
-
                            $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)
3044
-
                            }
3045
-
                    }
3254
+
                else if (checkDelivery(duckAssetId))
3255
+
                    then throw("equipDuck_checkDelivery")
3256
+
                    else {
3257
+
                        let eqKey = keyDuckEquipment(duckAssetId)
3258
+
                        let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3259
+
                        let bpKey = keyBackpackByDuck(duckAssetId)
3260
+
                        let currentPack = getBackpack(bpKey)
3261
+
                        let newEq = split(equipment, "_")
3262
+
                        if ((size(newEq) != NUMSEGMENTS))
3263
+
                            then throw("Wrong equipment string")
3264
+
                            else {
3265
+
                                let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3266
+
                                let segBpAux = split(newEq[segBackpack], ";")[1]
3267
+
                                let buffEffect = if ((segBpAux == ""))
3268
+
                                    then 0
3269
+
                                    else {
3270
+
                                        let aux0 = split(segBpAux, ",")[0]
3271
+
                                        if ((aux0 == ""))
3272
+
                                            then 0
3273
+
                                            else {
3274
+
                                                let idxCnt = split(aux0, ":")
3275
+
                                                let idx = idxCnt[0]
3276
+
                                                let cnt = idxCnt[1]
3277
+
                                                if (if (if (if (if ((idx == "06"))
3278
+
                                                    then true
3279
+
                                                    else (idx == "07"))
3280
+
                                                    then true
3281
+
                                                    else (idx == "08"))
3282
+
                                                    then (cnt != "")
3283
+
                                                    else false)
3284
+
                                                    then (parseIntValue(cnt) > 0)
3285
+
                                                    else false)
3286
+
                                                    then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3287
+
                                                    else 0
3288
+
                                                }
3289
+
                                        }
3290
+
                                let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3291
+
                                let newProdB = dressB(newEq, tempProdB, false, stats)
3292
+
                                let newProdStr = bytesToProdStr(newProdB)
3293
+
                                $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])], "_"))] ++ prologActions), 0)
3294
+
                                }
3295
+
                        }
3046
3296
 
            }
3047
3297
 
    }
3048
3298
 
3050
3300
 
3051
3301
 
@Callable(i)
3052
3302
 
func fortificateLand (landAssetId,plan) = {
3053
-
    let prologAction = prolog(i)
3303
+
    let prologActions = prolog(i)
3054
3304
 
    if ((size(i.payments) != 0))
3055
3305
 
        then throw("No payments required")
3056
3306
 
        else {
3068
3318
 
            let curO = parseIntValue(curLoft[volOccupied])
3069
3319
 
            let curF = parseIntValue(curLoft[volFree])
3070
3320
 
            let newForts = split(plan, "_")
3071
-
            let $t09585095965 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3072
-
            let tempProdB = $t09585095965._1
3073
-
            let tempO = $t09585095965._2
3074
-
            let tempF = $t09585095965._3
3075
-
            let $t09596896064 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3076
-
            let newProdB = $t09596896064._1
3077
-
            let newO = $t09596896064._2
3078
-
            let newF = $t09596896064._3
3321
+
            let $t0102994103109 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3322
+
            let tempProdB = $t0102994103109._1
3323
+
            let tempO = $t0102994103109._2
3324
+
            let tempF = $t0102994103109._3
3325
+
            let $t0103112103208 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3326
+
            let newProdB = $t0103112103208._1
3327
+
            let newO = $t0103112103208._2
3328
+
            let newF = $t0103112103208._3
3079
3329
 
            let newProdStr = bytesToProdStr(newProdB)
3080
3330
 
            let newLoftStr = makeString([curLoft[volLocked], toString(newO), toString(newF), curLoft[volTotal]], "_")
3081
-
            $Tuple2([StringEntry(fortKey, plan), StringEntry(whKey, makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], newProdStr, newLoftStr], ":")), prologAction], 0)
3331
+
            $Tuple2(([StringEntry(fortKey, plan), StringEntry(whKey, makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], newProdStr, newLoftStr], ":"))] ++ prologActions), 0)
3082
3332
 
            }
3083
3333
 
    }
3084
3334
 
3088
3338
 
func initDuckTourAttempt (duckAssetId) = if ((i.caller != tournamentContract))
3089
3339
 
    then throw("Access denied")
3090
3340
 
    else {
3091
-
        let prologAction = prolog(i)
3092
3341
 
        let keyHealth = keyDuckHealth(duckAssetId)
3093
3342
 
        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
3094
3343
 
        let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
3096
3345
 
        let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3097
3346
 
        let lastId = valueOrElse(getInteger(tournamentContract, lastTourIdKey), 0)
3098
3347
 
        let tourLocation = (toString(lastId) + "_T_0")
3099
-
        $Tuple2([prologAction, IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, tourLocation)], tourLocation)
3348
+
        $Tuple2([IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, tourLocation)], tourLocation)
3100
3349
 
        }
3101
3350
 
3102
3351
 
3103
3352
 
3104
3353
 
@Callable(i)
3105
3354
 
func breakAttempt () = {
3106
-
    let prologAction = prolog(i)
3355
+
    let prologActions = prolog(i)
3107
3356
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
3108
3357
 
    let curLocKey = keyDuckLocation(duckAssetId)
3109
3358
 
    let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3112
3361
 
        else {
3113
3362
 
            let savedHealth = getIntegerValue(keySavedHealth(duckAssetId))
3114
3363
 
            let savedLocation = getStringValue(keySavedLocation(duckAssetId))
3115
-
            $Tuple2([prologAction, IntegerEntry(keyDuckHealth(duckAssetId), savedHealth), StringEntry(curLocKey, savedLocation)], curLocation)
3364
+
            $Tuple2(((prologActions :+ IntegerEntry(keyDuckHealth(duckAssetId), savedHealth)) :+ StringEntry(curLocKey, savedLocation)), curLocation)
3116
3365
 
            }
3117
3366
 
    }
3118
3367
 
3130
3379
 
3131
3380
 
3132
3381
 
@Callable(i)
3382
+
func exitDeliveryInternal (duckAssetId) = if ((i.caller != this))
3383
+
    then throw("Access denied")
3384
+
    else {
3385
+
        let e = exitDeliveryCommon(duckAssetId)
3386
+
        $Tuple2((e._1 ++ e._2), false)
3387
+
        }
3388
+
3389
+
3390
+
3391
+
@Callable(i)
3392
+
func autoExitDelivery (duckAssetId) = if ((i.caller != this))
3393
+
    then throw("Access denied")
3394
+
    else {
3395
+
        let e = exitDeliveryCommon(duckAssetId)
3396
+
        $Tuple2(e._1, $Tuple2(e._3, e._4))
3397
+
        }
3398
+
3399
+
3400
+
3401
+
@Callable(i)
3133
3402
 
func prepareRobbery (message,sig) = {
3134
-
    let prologAction = prolog(i)
3403
+
    let prologActions = prolog(i)
3135
3404
 
    if (!(sigVerify_8Kb(message, sig, pub)))
3136
3405
 
        then throw("signature does not match")
3137
3406
 
        else if ((size(i.payments) != 1))
3149
3418
 
                            then throw("Wrong message format")
3150
3419
 
                            else {
3151
3420
 
                                let duckAssetId = parts[0]
3152
-
                                let robCost = getRobberyData(this, duckAssetId)._1
3153
-
                                if ((robCost > wlgAmt))
3154
-
                                    then throw(((("Payment " + toString(wlgAmt)) + " < required ") + toString(robCost)))
3155
-
                                    else {
3156
-
                                        let candidates = split(parts[1], "_")
3157
-
                                        let now = lastBlock.timestamp
3158
-
                                        let duckState = valueOrElse(getInteger(keyDuckRobberyState(duckAssetId)), 0)
3159
-
                                        let lockedLand = valueOrElse(getString(keyLockedLandByDuck(duckAssetId)), "")
3160
-
                                        let landETA = valueOrElse(getInteger(keyLandCooldownETA(lockedLand)), 0)
3161
-
                                        if (if ((duckState != duckIdxFree))
3162
-
                                            then (landETA > now)
3163
-
                                            else false)
3164
-
                                            then throw(("You already started robbing, wait till " + toString(landETA)))
3165
-
                                            else {
3166
-
                                                func checker (acc,landAssetId) =                                                 {
3167
-
                                                    let state = valueOrElse(getInteger(keyLandRobberyState(landAssetId)), 0)
3168
-
                                                    let cooldownETA = valueOrElse(getInteger(keyLandCooldownETA(landAssetId)), 0)
3169
-
                                                    if ((state > size(landRobCooldowns)))
3170
-
                                                        then throw("Invalid state")
3171
-
                                                        else if ((now > cooldownETA))
3172
-
                                                            then {
3173
-
                                                                let stakedTime = valueOrElse(getInteger(keyStakedTimeByAssetId(landAssetId)), 0)
3174
-
                                                                if ((0 >= stakedTime))
3175
-
                                                                    then acc
3176
-
                                                                    else {
3177
-
                                                                        let a = value(assetInfo(fromBase58String(landAssetId)))
3178
-
                                                                        let d = split(a.description, "_")
3179
-
                                                                        let pieces = numPiecesBySize(d[recLandSize])
3180
-
                                                                        let productivity = applyBonuses(landAssetId, pieces)
3181
-
                                                                        let deltaTime = (now - stakedTime)
3182
-
                                                                        let availRes = fraction(deltaTime, (productivity * pieces), DAYMILLIS)
3183
-
                                                                        if ((MIN_RES_TO_ROB > availRes))
3184
-
                                                                            then acc
3185
-
                                                                            else (acc :+ landAssetId)
3186
-
                                                                        }
3421
+
                                if (checkTournament(duckAssetId))
3422
+
                                    then throw("prepareRobbery_checkTournament")
3423
+
                                    else if (checkDelivery(duckAssetId))
3424
+
                                        then throw("prepareRobbery_checkDelivery")
3425
+
                                        else {
3426
+
                                            let robCost = getRobberyData(this, duckAssetId)._1
3427
+
                                            if ((robCost > wlgAmt))
3428
+
                                                then throw(((("Payment " + toString(wlgAmt)) + " < required ") + toString(robCost)))
3429
+
                                                else {
3430
+
                                                    let candidates = split(parts[1], "_")
3431
+
                                                    let now = lastBlock.timestamp
3432
+
                                                    let duckState = valueOrElse(getInteger(keyDuckRobberyState(duckAssetId)), 0)
3433
+
                                                    let lockedLand = valueOrElse(getString(keyLockedLandByDuck(duckAssetId)), "")
3434
+
                                                    let landETA = valueOrElse(getInteger(keyLandCooldownETA(lockedLand)), 0)
3435
+
                                                    if (if ((duckState != duckIdxFree))
3436
+
                                                        then (landETA > now)
3437
+
                                                        else false)
3438
+
                                                        then throw(("You already started robbing, wait till " + toString(landETA)))
3439
+
                                                        else {
3440
+
                                                            func checker (acc,landAssetId) =                                                             {
3441
+
                                                                let state = valueOrElse(getInteger(keyLandRobberyState(landAssetId)), 0)
3442
+
                                                                let cooldownETA = valueOrElse(getInteger(keyLandCooldownETA(landAssetId)), 0)
3443
+
                                                                if ((state > size(landRobCooldowns)))
3444
+
                                                                    then throw("Invalid state")
3445
+
                                                                    else if ((now > cooldownETA))
3446
+
                                                                        then {
3447
+
                                                                            let stakedTime = valueOrElse(getInteger(keyStakedTimeByAssetId(landAssetId)), 0)
3448
+
                                                                            if ((0 >= stakedTime))
3449
+
                                                                                then acc
3450
+
                                                                                else {
3451
+
                                                                                    let a = value(assetInfo(fromBase58String(landAssetId)))
3452
+
                                                                                    let d = split(a.description, "_")
3453
+
                                                                                    let pieces = numPiecesBySize(d[recLandSize])
3454
+
                                                                                    let productivity = applyBonuses(landAssetId, pieces)
3455
+
                                                                                    let deltaTime = (now - stakedTime)
3456
+
                                                                                    let availRes = fraction(deltaTime, (productivity * pieces), DAYMILLIS)
3457
+
                                                                                    if ((MIN_RES_TO_ROB > availRes))
3458
+
                                                                                        then acc
3459
+
                                                                                        else (acc :+ landAssetId)
3460
+
                                                                                    }
3461
+
                                                                            }
3462
+
                                                                        else acc
3187
3463
 
                                                                }
3188
-
                                                            else acc
3464
+
3465
+
                                                            let filtered = {
3466
+
                                                                let $l = candidates
3467
+
                                                                let $s = size($l)
3468
+
                                                                let $acc0 = nil
3469
+
                                                                func $f0_1 ($a,$i) =                                                                 if (($i >= $s))
3470
+
                                                                    then $a
3471
+
                                                                    else checker($a, $l[$i])
3472
+
3473
+
                                                                func $f0_2 ($a,$i) =                                                                 if (($i >= $s))
3474
+
                                                                    then $a
3475
+
                                                                    else throw("List size exceeds 10")
3476
+
3477
+
                                                                $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)
3478
+
                                                                }
3479
+
                                                            if ((size(filtered) == 0))
3480
+
                                                                then throw("No candidates for robbery")
3481
+
                                                                else {
3482
+
                                                                    let rndIdx = getRandomNumber(size(filtered), height, (sig + i.transactionId))
3483
+
                                                                    let landAssetId = filtered[rndIdx]
3484
+
                                                                    $Tuple2(([IntegerEntry(keyLandRobberyState(landAssetId), robIdxLocked), IntegerEntry(keyLandCooldownETA(landAssetId), (now + landRobCooldowns[robIdxLocked])), IntegerEntry(keyDuckRobberyState(duckAssetId), duckIdxPreparing), StringEntry(keyLockedLandByDuck(duckAssetId), landAssetId)] ++ prologActions), landAssetId)
3485
+
                                                                    }
3486
+
                                                            }
3189
3487
 
                                                    }
3190
-
3191
-
                                                let filtered = {
3192
-
                                                    let $l = candidates
3193
-
                                                    let $s = size($l)
3194
-
                                                    let $acc0 = nil
3195
-
                                                    func $f0_1 ($a,$i) =                                                     if (($i >= $s))
3196
-
                                                        then $a
3197
-
                                                        else checker($a, $l[$i])
3198
-
3199
-
                                                    func $f0_2 ($a,$i) =                                                     if (($i >= $s))
3200
-
                                                        then $a
3201
-
                                                        else throw("List size exceeds 10")
3202
-
3203
-
                                                    $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)
3204
-
                                                    }
3205
-
                                                if ((size(filtered) == 0))
3206
-
                                                    then throw("No candidates for robbery")
3207
-
                                                    else {
3208
-
                                                        let rndIdx = getRandomNumber(size(filtered), height, (sig + i.transactionId))
3209
-
                                                        let landAssetId = filtered[rndIdx]
3210
-
                                                        $Tuple2([IntegerEntry(keyLandRobberyState(landAssetId), robIdxLocked), IntegerEntry(keyLandCooldownETA(landAssetId), (now + landRobCooldowns[robIdxLocked])), IntegerEntry(keyDuckRobberyState(duckAssetId), duckIdxPreparing), StringEntry(keyLockedLandByDuck(duckAssetId), landAssetId), prologAction], landAssetId)
3211
-
                                                        }
3212
-
                                                }
3213
-
                                        }
3488
+
                                            }
3214
3489
 
                                }
3215
3490
 
                        }
3216
3491
 
                }
3220
3495
 
3221
3496
 
@Callable(i)
3222
3497
 
func robLand (message,sig) = {
3223
-
    let prologAction = prolog(i)
3498
+
    let prologActions = prolog(i)
3224
3499
 
    if (!(sigVerify_8Kb(message, sig, pub)))
3225
3500
 
        then throw("signature does not match")
3226
-
        else $Tuple2([prologAction], 0)
3227
-
    }
3501
+
        else {
3502
+
            let userAddr = toString(i.caller)
3503
+
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
3504
+
            let now = lastBlock.timestamp
3505
+
            $Tuple2((prologActions :+ IntegerEntry(keyLastRobberyTimeByDuck(duckAssetId), now)), 0)
3506
+
            }
3507
+
    }
3508
+
3509
+
3510
+
3511
+
@Callable(i)
3512
+
func acceptDelivery () = if (!(KS_ALLOW_DELIVERY))
3513
+
    then throw("Delivery feature is turned off!")
3514
+
    else {
3515
+
        let prologActions = prolog(i)
3516
+
        let userAddr = toString(i.caller)
3517
+
        let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
3518
+
        let fundTotal = valueOrElse(getInteger(economyContract, deliveryFundKey), 0)
3519
+
        let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
3520
+
        if ((MIN_USDT_FEE_DELIVERY > (fundTotal - lockedTotal)))
3521
+
            then throw(((("Delivery is not available, fund=" + fixedPoint(fundTotal, 6)) + ", locked=") + fixedPoint(lockedTotal, 6)))
3522
+
            else {
3523
+
                let now = lastBlock.timestamp
3524
+
                let delayETA = valueOrElse(getInteger(keyDeliveryDelayByDuck(duckAssetId)), 0)
3525
+
                if ((delayETA > now))
3526
+
                    then throw(("Delivery is forbidden for your duck until " + toString(delayETA)))
3527
+
                    else if (checkTournament(duckAssetId))
3528
+
                        then throw("acceptDelivery_checkTournament")
3529
+
                        else if (checkDelivery(duckAssetId))
3530
+
                            then throw("acceptDelivery_checkDelivery")
3531
+
                            else {
3532
+
                                let newLockedTotal = asInt(invoke(economyContract, "updateDeliveryLocked", [(lockedTotal + MIN_USDT_FEE_DELIVERY)], nil))
3533
+
                                let keyHealth = keyDuckHealth(duckAssetId)
3534
+
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
3535
+
                                let curHealth = valueOrElse(getInteger(keyHealth), maxHP)
3536
+
                                let curLocKey = keyDuckLocation(duckAssetId)
3537
+
                                let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3538
+
                                let deliveryLocation = (toString(now) + "_D_0")
3539
+
                                $Tuple2(([IntegerEntry(keySavedHealth(duckAssetId), curHealth), IntegerEntry(keyHealth, maxHP), StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, deliveryLocation)] ++ prologActions), $Tuple2(deliveryLocation, newLockedTotal))
3540
+
                                }
3541
+
                }
3542
+
        }
3228
3543
 
3229
3544
 

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