tx · AvcsySzhYmHuF2C9zKs3pA79hSTp6TY4GpQPiGXMvuSb

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.09900000 Waves

2023.11.23 20:24 [2856325] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AvcsySzhYmHuF2C9zKs3pA79hSTp6TY4GpQPiGXMvuSb",
    "fee": 9900000,
    "feeAssetId": null,
    "timestamp": 1700760270849,
    "version": 2,
    "chainId": 84,
    "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm",
    "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX",
    "proofs": [
        "ovHsXcVkdnqXYud999X2vtXkZvrmKcg3UP6jSeZckPPmh8Z1UaamnTzqi6v3NVHqk5o4D7iURWb8AdpSCudr1iJ"
    ],
    "script": "base64:BgLUAQgCEgMKAQgSBAoCCAESAwoBBBIAEgMKAQgSABIDCgEIEgQKAgEIEgQKAgEIEgQKAgICEgUKAwEBARIAEgQKAggIEgASAwoBARIAEgQKAgICEgASAwoBCBIECgIICBIDCgEYEgQKAggIEgQKAggIEgUKAwgICBIECgIICBIHCgUBAQEBARIDCgEBEgUKAwEBCBIDCgEIEgMKAQgSABIECgIIARIECgIIARIDCgEIEgQKAggIEgMKAQgSABIAEgMKAQgSAwoBCBIECgICAhIECgICAhIAnAIACURBWU1JTExJUwCAuJkpARRrZXlMYXN0QXJiVGltZUJ5VXNlcgEEYWRkcgkArAICAhBsYXN0QXJiVGltZVVzZXJfBQRhZGRyARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcl8FBGFkZHIABlNDQUxFOACAwtcvAAx4cExldmVsU2NhbGUAgBkAD3hwTGV2ZWxSZWNpcFBvdwCgHwASbnVtUG9pbnRzT25MZXZlbFVwAAMADnJvYmJlcnlDb3N0TWluAIDC1y8AFHJvYmJlcnlDb29sZG93bkNvZWZmAJADAAxyZXF1aXJlbWVudHMJAMwIAgIIU3RyZW5ndGgJAMwIAgIIQWNjdXJhY3kJAMwIAgIJSW50ZWxsZWN0CQDMCAICCUVuZHVyYW5jZQkAzAgCAglEZXh0ZXJpdHkJAMwIAgIFTGV2ZWwJAMwIAgIGSGVhbHRoBQNuaWwADGNoYXJTdHJlbmd0aAAAAAxjaGFyQWNjdXJhY3kAAQANY2hhckludGVsbGVjdAACAA1jaGFyRW5kdXJhbmNlAAMADWNoYXJEZXh0ZXJpdHkABAALc2VnQmFja3BhY2sAAAALTlVNU0VHTUVOVFMABgAKTlVNTUFJTkFVWAACAAhNQVhTTE9UUwACAA1NQVhQUk9ESU5TTE9UAB4AEGxhbmRSb2JDb29sZG93bnMJAMwIAgAACQDMCAIAwM8kCQDMCAIAoPc2CQDMCAIAgNzMFAkAzAgCAICupgoFA25pbAAOTUlOX1JFU19UT19ST0IAgNrECQAMcm9iSWR4TG9ja2VkAAEAC2R1Y2tJZHhGcmVlAAAAEGR1Y2tJZHhQcmVwYXJpbmcAAQENa2V5RHVja0hlYWx0aAELZHVja0Fzc2V0SWQJAKwCAgILZHVja0hlYWx0aF8FC2R1Y2tBc3NldElkAQxrZXlEdWNrQ2hhcnMBC2R1Y2tBc3NldElkCQCsAgICCmR1Y2tDaGFyc18FC2R1Y2tBc3NldElkAQlrZXlEdWNrWFABC2R1Y2tBc3NldElkCQCsAgICB2R1Y2tYUF8FC2R1Y2tBc3NldElkAQxrZXlEdWNrTGV2ZWwBC2R1Y2tBc3NldElkCQCsAgICCmR1Y2tMZXZlbF8FC2R1Y2tBc3NldElkARFrZXlEdWNrRnJlZVBvaW50cwELZHVja0Fzc2V0SWQJAKwCAgIPZHVja0ZyZWVQb2ludHNfBQtkdWNrQXNzZXRJZAEQa2V5RHVja0VxdWlwbWVudAELZHVja0Fzc2V0SWQJAKwCAgIOZHVja0VxdWlwbWVudF8FC2R1Y2tBc3NldElkAQlrZXlVc2VyWFABBGFkZHIJAKwCAgIHdXNlclhQXwUEYWRkcgEMa2V5VXNlckxldmVsAQRhZGRyCQCsAgICCnVzZXJMZXZlbF8FBGFkZHIBEWtleVVzZXJGcmVlUG9pbnRzAQRhZGRyCQCsAgICD3VzZXJGcmVlUG9pbnRzXwUEYWRkcgEOa2V5U2F2ZWRIZWFsdGgBC2R1Y2tBc3NldElkCQCsAgICDHNhdmVkSGVhbHRoXwULZHVja0Fzc2V0SWQBEGtleVNhdmVkTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDnNhdmVkTG9jYXRpb25fBQtkdWNrQXNzZXRJZAEMa2V5RHVja0J1ZmZzAQtkdWNrQXNzZXRJZAkArAICAgpkdWNrQnVmZnNfBQtkdWNrQXNzZXRJZAEYa2V5TGFzdFJvYmJlcnlUaW1lQnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAhBsYXN0Um9iYmVyeVRpbWVfBQtkdWNrQXNzZXRJZAEYa2V5TGFzdFJvYmJlcnlDb3N0QnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAhBsYXN0Um9iYmVyeUNvc3RfBQtkdWNrQXNzZXRJZAETa2V5TGFuZFJvYmJlcnlTdGF0ZQELbGFuZEFzc2V0SWQJAKwCAgIRbGFuZFJvYmJlcnlTdGF0ZV8FC2xhbmRBc3NldElkARJrZXlMYW5kQ29vbGRvd25FVEEBC2xhbmRBc3NldElkCQCsAgICEGxhbmRDb29sZG93bkVUQV8FC2xhbmRBc3NldElkARNrZXlEdWNrUm9iYmVyeVN0YXRlAQtkdWNrQXNzZXRJZAkArAICAhFkdWNrUm9iYmVyeVN0YXRlXwULZHVja0Fzc2V0SWQBE2tleUxvY2tlZExhbmRCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICEWxvY2tlZExhbmRCeUR1Y2tfBQtkdWNrQXNzZXRJZAEUa2V5VXNlckRlbGl2ZXJ5Q291bnQBBGFkZHIJAKwCAgISdXNlckRlbGl2ZXJ5Q291bnRfBQRhZGRyARZrZXlVc2VyTGFzdERlbGl2ZXJ5RGF5AQRhZGRyCQCsAgICFHVzZXJMYXN0RGVsaXZlcnlEYXlfBQRhZGRyAAd4cENsYWltAJBOAA94cFN1Y2Nlc3NGbGlnaHQAkE4ADHhwRmFpbEZsaWdodADQDwAIeHBDYWxsRVMAoI0GAAx4cEN1c3RvbU5hbWUAwIQ9AAp4cE5ld1NMYW5kAMCWsQIADnhwVXBncmFkZUluZnJhAJBOAAd4cE1lcmdlAMCEPQAJeHBPbmJvYXJkAMCEPQAGeHBIZWFsAJBOAQlsZXZlbEJ5WFABAnhwCQBrAwUMeHBMZXZlbFNjYWxlCQBsBgUCeHAABAUPeHBMZXZlbFJlY2lwUG93AAQABAUERE9XTgUGU0NBTEU4AQltYXhIZWFsdGgBBWxldmVsCQBkAgBkBQVsZXZlbAEHbGV2ZWxVcAIJY3VyckxldmVsBW5ld1hQBAhuZXdMZXZlbAkBCWxldmVsQnlYUAEFBW5ld1hQCQDMCAIFCG5ld0xldmVsCQDMCAIJAGgCBRJudW1Qb2ludHNPbkxldmVsVXAJAGUCBQhuZXdMZXZlbAUJY3VyckxldmVsBQNuaWwBDGdldER1Y2tTdGF0cwQPc3Rha2luZ0NvbnRyYWN0C2R1Y2tBc3NldElkCmJ1ZmZFZmZlY3QKZm9yY2VCdWZmcwQFY2hhcnMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQxrZXlEdWNrQ2hhcnMBBQtkdWNrQXNzZXRJZAIJMF8wXzBfMF8wAgFfBANsdmwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQAAAQGaGVhbHRoCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAkBCW1heEhlYWx0aAEFA2x2bAQKc3RhdGVCdWZmcwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBDGtleUR1Y2tCdWZmcwEFC2R1Y2tBc3NldElkAgkwXzBfMF8wXzACAV8JAM4IAgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDGNoYXJTdHJlbmd0aAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDGNoYXJBY2N1cmFjeQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJJbnRlbGxlY3QJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQ1jaGFyRW5kdXJhbmNlCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckRleHRlcml0eQkAzAgCBQNsdmwJAMwIAgUGaGVhbHRoBQNuaWwDBQpmb3JjZUJ1ZmZzCQDMCAIFCmJ1ZmZFZmZlY3QJAMwIAgUKYnVmZkVmZmVjdAkAzAgCBQpidWZmRWZmZWN0CQDMCAIFCmJ1ZmZFZmZlY3QJAMwIAgUKYnVmZkVmZmVjdAUDbmlsCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpzdGF0ZUJ1ZmZzBQxjaGFyU3RyZW5ndGgJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnN0YXRlQnVmZnMFDGNoYXJBY2N1cmFjeQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKc3RhdGVCdWZmcwUNY2hhckludGVsbGVjdAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKc3RhdGVCdWZmcwUNY2hhckVuZHVyYW5jZQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKc3RhdGVCdWZmcwUNY2hhckRleHRlcml0eQUDbmlsAQ5nZXRSb2JiZXJ5RGF0YQIPc3Rha2luZ0NvbnRyYWN0C2R1Y2tBc3NldElkBAtsYXN0Um9iQ29zdAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARhrZXlMYXN0Um9iYmVyeUNvc3RCeUR1Y2sBBQtkdWNrQXNzZXRJZAAABAtsYXN0Um9iVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARhrZXlMYXN0Um9iYmVyeVRpbWVCeUR1Y2sBBQtkdWNrQXNzZXRJZAAABANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAdyb2JDb3N0CQCWAwEJAMwIAgUOcm9iYmVyeUNvc3RNaW4JAMwIAgkAZQIFC2xhc3RSb2JDb3N0CQBoAgUUcm9iYmVyeUNvb2xkb3duQ29lZmYJAGUCBQNub3cFC2xhc3RSb2JUaW1lBQNuaWwECWR1Y2tTdGF0ZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARNrZXlEdWNrUm9iYmVyeVN0YXRlAQULZHVja0Fzc2V0SWQAAAQKbG9ja2VkTGFuZAkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARNrZXlMb2NrZWRMYW5kQnlEdWNrAQULZHVja0Fzc2V0SWQCAAQHbGFuZEVUQQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARJrZXlMYW5kQ29vbGRvd25FVEEBBQpsb2NrZWRMYW5kAAAJAJcKBQUHcm9iQ29zdAULbGFzdFJvYlRpbWUFCWR1Y2tTdGF0ZQUKbG9ja2VkTGFuZAUHbGFuZEVUQQAKTEFORFBSRUZJWAIETEFORAAKRFVDS1BSRUZJWAIERFVDSwALUk9CT19QUkVGSVgCBFJPQk8ACkFSVFBSRVNBTEUCB1BSRVNBTEUABk5VTVJFUwAGABhNQVhfTEFORFNfU1RBS0VEX0JZX1VTRVIAGQAPREFJTFlSRVNCWVBJRUNFAID40gEADFdITVVMVElQTElFUgCAyK+gJQAPREVGQVVMVExPQ0FUSU9OAg9BZnJpY2FfRl9BZnJpY2EAEFJFU09VUkNFUFJJQ0VNSU4A1bUCAApFU1NFTExDT0VGAAoAFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQDQhgMAF0FMTE9XRURfRlJFRV9ERUxJVkVSSUVTAAEAGkFDUkVTX0ZPUl9ERUxJVkVSWV9BVFRFTVBUAIDh6xcACXByb2RUeXBlcwkAzAgCAhBGaXJzdCBBaWQgS2l0IEwxCQDMCAICEEZpcnN0IEFpZCBLaXQgTDIJAMwIAgIQRmlyc3QgQWlkIEtpdCBMMwkAzAgCAgtCYWNrcGFjayBMMQkAzAgCAgtCYWNrcGFjayBMMgkAzAgCAgtCYWNrcGFjayBMMwkAzAgCAg5Gb29kIFJhdGlvbiBMMQkAzAgCAg5Gb29kIFJhdGlvbiBMMgkAzAgCAg5Gb29kIFJhdGlvbiBMMwkAzAgCAgtKZXQgUGFjayBMMQkAzAgCAgtKZXQgUGFjayBMMgkAzAgCAgtKZXQgUGFjayBMMwkAzAgCAglTaGllbGQgTDEJAMwIAgIJU2hpZWxkIEwyCQDMCAICCVNoaWVsZCBMMwkAzAgCAgdNaW5lIEwxCQDMCAICB01pbmUgTDIJAMwIAgIHTWluZSBMMwkAzAgCAgdUcmFwIEwxCQDMCAICB1RyYXAgTDIJAMwIAgIHVHJhcCBMMwkAzAgCAgtCb29tLURvZyBMMQkAzAgCAgtCb29tLURvZyBMMgkAzAgCAgtCb29tLURvZyBMMwUDbmlsAApjb250aW5lbnRzCQDMCAICCEFtZXJpY2FzCQDMCAICBkV1cm9wZQkAzAgCAgRBc2lhCQDMCAICBkFmcmljYQkAzAgCAgdPY2VhbmlhBQNuaWwACUNPRUZGMk1BVACAreIEABBmb3J0QWxsb3dlZFByb2RzCQDMCAIADwkAzAgCABAJAMwIAgARCQDMCAIAEgkAzAgCABMJAMwIAgAUCQDMCAIAFQkAzAgCABYJAMwIAgAXBQNuaWwAEHByb2R1Y3Rpb25NYXRyaXgJAMwIAgIlOF84XzhfMTdfMTdfNDJfMTJfMF8zMF8wLDAsMCwwLDAsMCwwXwkAzAgCAiU4XzhfOF8xN18xN180Ml8yNF8wXzYwXzAsMCw1LDIsMCwwLDBfCQDMCAICJzhfOF84XzE3XzE3XzQyXzM2XzBfMTIwXzAsMCwxMCw0LDAsMCwwXwkAzAgCAik4XzE5XzE5XzhfMjdfMTlfMjZfMV8yMF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAik4XzE5XzE5XzhfMjdfMTlfNTJfMV80MF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAik4XzE5XzE5XzhfMjdfMTlfNzhfMV84MF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAiU4XzhfOF84XzhfNjBfMTNfMl8yXzAsMCwwLDAsMCwwLDBfMDExCQDMCAICJThfOF84XzhfOF82MF8yNl8yXzRfMCwwLDAsMCwwLDAsMF8wMTEJAMwIAgIlOF84XzhfOF84XzYwXzM5XzJfOF8wLDAsMCwwLDAsMCwwXzAxMQkAzAgCAikzMF8zMF8zXzE3XzE3XzNfMzBfM18zMF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAikzMF8zMF8zXzE3XzE3XzNfNjBfM181MF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAikzMF8zMF8zXzE3XzE3XzNfOTBfM183MF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAisxOF8xOF8xMF8xOF8xOF8xOF8xMV80XzEwXzAsMCwwLDAsMCwwLDBfMjAxCQDMCAICKzE4XzE4XzEwXzE4XzE4XzE4XzIyXzRfMjBfMCwwLDAsMCwwLDAsMF8yMDEJAMwIAgIrMThfMThfMTBfMThfMThfMThfMzNfNF8zMF8wLDAsMCwwLDAsMCwwXzIwMQkAzAgCAio0XzEzXzIyXzRfMzVfMjJfMjNfMF81MCwxLDBfMCwwLDAsMCwwLDAsMF8JAMwIAgIqNF8xM18yMl80XzM1XzIyXzQ2XzBfNTAsMSwxXzAsMiw1LDAsMCwwLDBfCQDMCAICKzRfMTNfMjJfNF8zNV8yMl82OV8wXzUwLDIsMV8wLDUsMTAsMCwwLDAsMF8JAMwIAgIqNV8yNV80MF81XzEwXzE1XzIwXzFfMzAsMSwxXzAsMCwwLDAsMCwwLDBfCQDMCAICKjVfMjVfNDBfNV8xMF8xNV80MF8xXzMwLDEsMl8yLDEsMywwLDAsMCwwXwkAzAgCAio1XzI1XzQwXzVfMTBfMTVfNjBfMV8zMCwxLDNfNSwyLDgsMCwwLDAsMF8JAMwIAgInMjNfMjNfNV8yMF8yM182XzM1XzJfMTAwXzAsMCwwLDAsMCwwLDBfCQDMCAICJzIzXzIzXzVfMjBfMjNfNl83MF8yXzE1MF8wLDAsMCwwLDAsMCwwXwkAzAgCAigyM18yM181XzIwXzIzXzZfMTA1XzJfMjAwXzAsMCwwLDAsMCwwLDBfBQNuaWwACXJJZHhDb2VmZgAGAApySWR4RWZmZWN0AAgAEHJJZHhSZXF1aXJlbWVudHMACQAJcklkeFNsb3RzAAoADlBST0RVQ1RQS0dTSVpFAAoAC3doSWR4TGV2ZWxzAAAACHdoSWR4UmVzAAEACHdoSWR4TWF0AAIACXdoSWR4UHJvZAADAAl3aElkeExPRlQABAAJdm9sTG9ja2VkAAAAC3ZvbE9jY3VwaWVkAAEAB3ZvbEZyZWUAAgAIdm9sVG90YWwAAwAKYnBJZHhMZXZlbAAAAAhicElkeFJlcwABAAhicElkeE1hdAACAAlicElkeFByb2QAAwAPbG9jSWR4Q29udGluZW50AAAACmxvY0lkeFR5cGUAAQAIbG9jSWR4SWQAAgEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICA25vXwUHYXNzZXRJZAEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBB2Fzc2V0SWQJAKwCAgIFbGNuYV8FB2Fzc2V0SWQBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgIDc3RfBQdhc3NldElkASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIEdHlwZQdhc3NldElkCQC5CQIJAMwIAgIDbGFzCQDMCAIFBHR5cGUJAMwIAgUHYXNzZXRJZAUDbmlsAgFfASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwduZnRUeXBlB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIGc3R0YW9fBQduZnRUeXBlAgFfBQdhc3NldElkAgFfBQlvd25lckFkZHIBEmtleVdhcmVob3VzZUJ5TGFuZAELbGFuZEFzc2V0SWQJAKwCAgIDd2hfBQtsYW5kQXNzZXRJZAEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAgtpbmZyYUxldmVsXwUHYXNzZXRJZAEXa2V5Rm9ydGlmaWNhdGlvbnNCeUxhbmQBC2xhbmRBc3NldElkCQCsAgICD2ZvcnRpZmljYXRpb25zXwULbGFuZEFzc2V0SWQBGmtleUR1Y2tBc3NldElkVG9DdXN0b21OYW1lAQdhc3NldElkCQCsAgICGGR1Y2tDdXN0b21OYW1lQnlBc3NldElkXwUHYXNzZXRJZAEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEEYWRkcgkArAICAhhhY2NvdW50Q3VzdG9tTmFtZUJ5QWRkcl8FBGFkZHIBD2tleUFkZHJlc3NSZWZCeQEEYWRkcgkArAICAglhY2NSZWZCeV8FBGFkZHIBHGtleU9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2sBC2R1Y2tBc3NldElkCQCsAgICGm9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2tfBQtkdWNrQXNzZXRJZAEca2V5T25ib2FyZEFydER1Y2tBY3RpdmF0ZWRCeQEEYWRkcgkArAICAhpvbmJvYXJkQXJ0QWN0aXZhdGVkRHVja0J5XwUEYWRkcgETa2V5QWRkcmVzc1JlZmVycmFscwEEYWRkcgkArAICAg1hY2NSZWZlcnJhbHNfBQRhZGRyARBrZXlEdWNrSWRUb093bmVyAQdhc3NldElkCQCsAgICCmR1Y2tPd25lcl8FB2Fzc2V0SWQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBEWtleUJhY2twYWNrQnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAgliYWNrUGFja18FC2R1Y2tBc3NldElkAQ9rZXlEdWNrTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDWR1Y2tMb2NhdGlvbl8FC2R1Y2tBc3NldElkARVrZXlVc2VyR3dsUmVsZWFzZVRpbWUBCHVzZXJBZGRyCQCsAgICGiVzJXNfX3VzZXJHd2xSZWxlYXNlVGltZV9fBQh1c2VyQWRkcgEOa2V5RXNXYXJlaG91c2UAAhplbWVyZ2VuY3lXYXJlaG91c2VQcm9kdWN0cwAPZGVsaXZlcnlGdW5kS2V5AgxkZWxpdmVyeUZ1bmQADWxhc3RUb3VySWRLZXkCDiVzX19sYXN0VG91cklkARVrZXlUb3VyU3RhdGljRGF0YUJ5SWQBA3RJZAkArAICAhYlcyVkX190b3VyU3RhdGljRGF0YV9fCQCkAwEFA3RJZAEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEDdElkCQCsAgICFyVzJWRfX3RvdXJEeW5hbWljRGF0YV9fCQCkAwEFA3RJZAEaa2V5QmVzdFJlc3VsdEJ5VG91ckFuZER1Y2sCA3RJZAtkdWNrQXNzZXRJZAkAuQkCCQDMCAICHyVzJWQlc19fYmVzdFJlc3VsdEJ5VG91ckFuZER1Y2sJAMwIAgkApAMBBQN0SWQJAMwIAgULZHVja0Fzc2V0SWQFA25pbAICX18ACWlkeFN0YXRpYwAAAAppZHhEeW5hbWljAAEACnRTdGF0aWNFbmQABgAOdER5bmFtaWNTdGF0dXMAAQELZ2V0VG91ckRhdGECDHRvdXJDb250cmFjdAN0SWQEBnN0YXRpYwkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUMdG91ckNvbnRyYWN0CQEVa2V5VG91clN0YXRpY0RhdGFCeUlkAQUDdElkCQCsAgIJAKwCAgIZRXJyb3IgcmVhZGluZyB0b3VybmFtZW50IAkApAMBBQN0SWQCBSBkYXRhAgJfXwQHZHluYW1pYwkAvAkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUMdG91ckNvbnRyYWN0CQEWa2V5VG91ckR5bmFtaWNEYXRhQnlJZAEFA3RJZAkArAICCQCsAgICGUVycm9yIHJlYWRpbmcgdG91cm5hbWVudCAJAKQDAQUDdElkAgUgZGF0YQICX18JAMwIAgUGc3RhdGljCQDMCAIFB2R5bmFtaWMFA25pbAEOaXNJblRvdXJuYW1lbnQCDHRvdXJDb250cmFjdAhsb2NhdGlvbgQGbGFzdElkCQELdmFsdWVPckVsc2UCCQCaCAIFDHRvdXJDb250cmFjdAUNbGFzdFRvdXJJZEtleQAABANsb2MJALUJAgUIbG9jYXRpb24CAV8EA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBXREYXRhCQELZ2V0VG91ckRhdGECBQx0b3VyQ29udHJhY3QFBmxhc3RJZAQGc3RhdGljCQCRAwIFBXREYXRhBQlpZHhTdGF0aWMEB2R5bmFtaWMJAJEDAgUFdERhdGEFCmlkeER5bmFtaWMDAwMJAAACCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQIBVAkAAAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNsb2MFD2xvY0lkeENvbnRpbmVudAUGbGFzdElkBwkAAAIJAJEDAgUHZHluYW1pYwUOdER5bmFtaWNTdGF0dXMCCklOUFJPR1JFU1MHCQBmAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnN0YXRpYwUKdFN0YXRpY0VuZAUDbm93BwEJb25NaXNzaW9uAgx0b3VyQ29udHJhY3QIbG9jYXRpb24EBmxhc3RJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBQx0b3VyQ29udHJhY3QFDWxhc3RUb3VySWRLZXkAAAQDbG9jCQC1CQIFCGxvY2F0aW9uAgFfBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUMdG91ckNvbnRyYWN0BQZsYXN0SWQEBnN0YXRpYwkAkQMCBQV0RGF0YQUJaWR4U3RhdGljBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljBAdsb2NUeXBlCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQMDAwkAAAIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFUCQAAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2xvYwUPbG9jSWR4Q29udGluZW50BQZsYXN0SWQHCQAAAgkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwIKSU5QUk9HUkVTUwcJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQNub3cHARJnZXRSZWNpcGVNYXRlcmlhbHMBBnJlY2lwZQkAaAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZyZWNpcGUFCXJJZHhDb2VmZgUJQ09FRkYyTUFUAQxjaGVhdEF0dGVtcHQDBm9sZExvYwZuZXdMb2MJY2hlYXRDYXNlCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICFkNoZWF0IGF0dGVtcHQ6IG9sZExvYz0FBm9sZExvYwIJLCBuZXdMb2M9BQZuZXdMb2MCBywgY2FzZT0JAKQDAQUJY2hlYXRDYXNlABZLU19TRVBBUkFURV9QVUJMSUNfS0VZBwAYS1NfQUxMT1dfQklHX0lORlJBX01FUkdFBwATS1NfQUxMT1dfUk9CT19EVUNLUwcACkRBWV9NSUxMSVMAgLiZKQAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAA3B1YgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAMFFktTX1NFUEFSQVRFX1BVQkxJQ19LRVkBIKsXV48VZ+NZVEGw1nLrZpvEo9NmXtWZhlDfmDcfsgkIASBPU+IaP1So1p1SThMdRidVvbNT8yx7yVRUsP9DwbQUKAMJAAACAQFUBQckbWF0Y2gwASBPU+IaP1So1p1SThMdRidVvbNT8yx7yVRUsP9DwbQUKAkAAgECDVVua25vd24gY2hhaW4AC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluABFJbmZyYVVwZ3JhZGVDb3N0UwQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMACAyK+gJQMJAAACAQFUBQckbWF0Y2gwAIDC1y8JAAIBAg1Vbmtub3duIGNoYWluAA5hcmJpdHJhZ2VEZWxheQQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAUKREFZX01JTExJUwMJAAACAQFUBQckbWF0Y2gwAODUAwkAAgECDVVua25vd24gY2hhaW4AA1NFUAICX18ABU1VTFQ2AMCEPQAFTVVMVDgAgMLXLwAFU1NJWkUAGQAFTVNJWkUAZAAFTFNJWkUA4QEABlhMU0laRQCQAwAHWFhMU0laRQDxBAAFSVRFUjYJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAEPZ2V0U3RyaW5nT3JGYWlsAgdhZGRyZXNzA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFB2FkZHJlc3MFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQdhZGRyZXNzCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDyBpcyBub3QgZGVmaW5lZAUDbmlsAgAAEUlkeENmZ1N0YWtpbmdEYXBwAAEAEUlkeENmZ0Vjb25vbXlEYXBwAAIAFElkeENmZ0dvdmVybmFuY2VEYXBwAAMADUlkeENmZ1dsZ0RhcHAABAAUSWR4Q2ZnVG91cm5hbWVudERhcHAABwAPSWR4Q2ZnQWNyZXNEYXBwAAgBCmtleVJlc3RDZmcAAg4lc19fcmVzdENvbmZpZwEOa2V5UmVzdEFkZHJlc3MAAgwlc19fcmVzdEFkZHIBEXJlYWRSZXN0Q2ZnT3JGYWlsAQRyZXN0CQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQRyZXN0CQEKa2V5UmVzdENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgdyZXN0Q2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHcmVzdENmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADHJlc3RDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEOa2V5UmVzdEFkZHJlc3MABRVkZWZhdWx0UmVzdEFkZHJlc3NTdHIAB3Jlc3RDZmcJARFyZWFkUmVzdENmZ09yRmFpbAEFDHJlc3RDb250cmFjdAAPc3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnU3Rha2luZ0RhcHAAD2Vjb25vbXlDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ0Vjb25vbXlEYXBwAAtnb3ZDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFFElkeENmZ0dvdmVybmFuY2VEYXBwAAt3bGdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFDUlkeENmZ1dsZ0RhcHAAEnRvdXJuYW1lbnRDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFFElkeENmZ1RvdXJuYW1lbnREYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwAApyZWNMYW5kTnVtAAAAC3JlY0xhbmRTaXplAAEAC3JlY1RlcnJhaW5zAAIADHJlY0NvbnRpbmVudAADAA13bGdBc3NldElkS2V5Agt3bGdfYXNzZXRJZAAKd2xnQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFC3dsZ0NvbnRyYWN0BQ13bGdBc3NldElkS2V5AhhXTEdPTEQgaXMgbm90IGlzc3VlZCB5ZXQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0AAtyYW5kb21EZWxheQACAQlrZXlDb21taXQBB2FkZHJlc3MJAKwCAgITZmluaXNoQmxvY2tGb3JBZGRyXwUHYWRkcmVzcwERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQljb250aW5lbnQJAKwCAgIUcmVzVHlwZXNCeUNvbnRpbmVudF8FCWNvbnRpbmVudAEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQlvd25lckFkZHIJAKwCAgITc3Rha2VkTGFuZHNCeU93bmVyXwUJb3duZXJBZGRyARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEIYXNTdHJpbmcBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAW4FByRtYXRjaDAFAW4JAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBCWFzQW55TGlzdAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAglMaXN0W0FueV0EAWwFByRtYXRjaDAFAWwJAAIBAhtmYWlsIHRvIGNhc3QgaW50byBMaXN0W0FueV0BCWFzQm9vbGVhbgEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFzBQckbWF0Y2gwBQFzCQACAQIZZmFpbCB0byBjYXN0IGludG8gQm9vbGVhbgEPbnVtUGllY2VzQnlTaXplAQhsYW5kU2l6ZQQHJG1hdGNoMAUIbGFuZFNpemUDCQAAAgIBUwUHJG1hdGNoMAUFU1NJWkUDCQAAAgIBTQUHJG1hdGNoMAUFTVNJWkUDCQAAAgIBTAUHJG1hdGNoMAUFTFNJWkUDCQAAAgICWEwFByRtYXRjaDAFBlhMU0laRQMJAAACAgNYWEwFByRtYXRjaDAFB1hYTFNJWkUJAAIBAhFVbmtub3duIGxhbmQgc2l6ZQEHaXNEaWdpdAEBcwkBCWlzRGVmaW5lZAEJALYJAQUBcwEKa2V5QmxvY2tlZAACEGNvbnRyYWN0c0Jsb2NrZWQBEWtleUxhc3RUeElkQnlVc2VyAQRhZGRyCQCsAgICD2xhc3RUeElkQnlVc2VyXwUEYWRkcgEKZml4ZWRQb2ludAIDdmFsCGRlY2ltYWxzBAZ0ZW5Qb3cJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQRET1dOBAdsb3dQYXJ0CQCkAwEJAGoCBQN2YWwFBnRlblBvdwQGemVyb2VzCQCwAgIJAKQDAQUGdGVuUG93CQBkAgABCQCxAgEFB2xvd1BhcnQJAKwCAgkArAICCQCsAgIJAKQDAQkAaQIFA3ZhbAUGdGVuUG93AgEuBQZ6ZXJvZXMFB2xvd1BhcnQBD2dldFJhbmRvbU51bWJlcgMIbWF4VmFsdWUEc2FsdAdlbnRyb3B5AwkAZwIAAAUIbWF4VmFsdWUJAAIBAhZtYXhWYWx1ZSBzaG91bGQgYmUgPiAwBApyYW5kb21IYXNoCQD3AwEJAMsBAgUEc2FsdAUHZW50cm9weQkAagIJALEJAQUKcmFuZG9tSGFzaAUIbWF4VmFsdWUADWluY3ViYXRvckFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQRWt0VnV4MlJoY2hTTjYzRHNEbzRiNG16NFFxektTZUR2AwkAAAIBAVQFByRtYXRjaDAFBHRoaXMJAAIBAg1Vbmtub3duIGNoYWluAAticmVlZGVyQWRkcgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1BEVnVVNDVIN0VoNWRtdE5iblJOUlN0R3dVTEE3Tlk2SGIDCQAAAgEBVAUHJG1hdGNoMAUEdGhpcwkAAgECDVVua25vd24gY2hhaW4ADEVNUFRZX1BST0Q1MAGQAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUZJVkVNSU5VVEVTTUlMTElTAOCnEgAMUkVOQU1JTkdDT1NUAMCWsQIACk1BWE5BTUVMRU4AMgAVSW5mcmFVcGdyYWRlQ29zdFNVc2R0AICt4gQADEVYUE1BVEVSSUFMUwQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMACm3YLtqwcDCQAAAgEBVAUHJG1hdGNoMACqp4GzCQkAAgECDVVua25vd24gY2hhaW4AB0VYUFVTRFQEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgOWadwMJAAACAQFUBQckbWF0Y2gwAIDlmncJAAIBAg1Vbmtub3duIGNoYWluAA5ST0JPX0RVQ0tfVVNEVACgjQYADFNfQ09TVF9BQ1JFUwCA8ouoCQAFRklWRVgJALYCAQAFAAdUV0VOVFlYCQC2AgEAFAAIVFdFTlRZMlgJALYCAQkAaAIAFAAUAAhUV0VOVFkzWAkAtgIBCQBoAgkAaAIAFAAUABQACFRXRU5UWTRYCQC2AgEJAGgCCQBoAgkAaAIAFAAUABQAFAAIVFdFTlRZNVgJALYCAQkAaAIJAGgCCQBoAgkAaAIAFAAUABQAFAAUAA9QUkVTQUxFTlVNTEFORFMA9AMBEmtleU5leHRGcmVlTGFuZE51bQACC25leHRMYW5kTnVtARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEEbmFtZQkArAICAgRsY25fBQRuYW1lARBrZXlMYW5kVG9Bc3NldElkAQdsYW5kTnVtCQCsAgICA2xhXwUHbGFuZE51bQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgdhc3NldElkCW93bmVyQWRkcgkArAICCQCsAgIJAKwCAgIFaWxhb18FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgERa2V5TGFuZE51bVRvT3duZXIBB2xhbmROdW0JAKwCAgIDbG9fBQdsYW5kTnVtARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEEbmFtZQkArAICAhFkdWNrQnlDdXN0b21OYW1lXwUEbmFtZQEWa2V5Q3VzdG9tTmFtZVRvQWRkcmVzcwEEbmFtZQkArAICAhRhY2NvdW50QnlDdXN0b21OYW1lXwUEbmFtZQEJa2V5T2xkaWVzAAIKb2xkaWVzTGlzdAEPa2V5TmV4dFJvYm9EdWNrAAIMbmV4dFJvYm9EdWNrAAtjbGFpbU1vZGVXaAAAAA1jbGFpbU1vZGVEdWNrAAEAE2NsYWltTW9kZVdoVGhlbkR1Y2sAAgAIZmxIZWFsdGgAAAALZmxUaW1lc3RhbXAABQAHZmxCb251cwAGAAtmbFByb2RzVXNlZAAHAQduZnROYW1lAgdsYW5kTnVtCGxhbmRTaXplCQCsAgIJAKwCAgUKTEFORFBSRUZJWAUHbGFuZE51bQUIbGFuZFNpemUBCHRvVm9sdW1lAgZhbW91bnQHcGtnU2l6ZQQEcGtncwMJAGcCBQZhbW91bnQAAAkAaQIJAGUCCQBkAgUGYW1vdW50BQdwa2dTaXplAAEFB3BrZ1NpemUJAQEtAQkAaQIJAGUCCQBkAgkBAS0BBQZhbW91bnQFB3BrZ1NpemUAAQUHcGtnU2l6ZQkAaAIFBHBrZ3MFBU1VTFQ4ARNkaXN0cmlidXRlQnlXZWlnaHRzAgV0b3RhbAd3ZWlnaHRzBANzdW0JAGQCCQBkAgkAZAIJAGQCCQBkAgkAkQMCBQd3ZWlnaHRzAAAJAJEDAgUHd2VpZ2h0cwABCQCRAwIFB3dlaWdodHMAAgkAkQMCBQd3ZWlnaHRzAAMJAJEDAgUHd2VpZ2h0cwAECQCRAwIFB3dlaWdodHMABQMJAGcCAAAFA3N1bQkAAgECEFplcm8gd2VpZ2h0cyBzdW0EBW5vcm02CQBrAwUFdG90YWwFBU1VTFQ2BQNzdW0KAQpub3JtYWxpemVyAgNhY2MEZWxlbQkAzQgCBQNhY2MJAGsDBQRlbGVtBQVub3JtNgUFTVVMVDYKAAIkbAUHd2VpZ2h0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKbm9ybWFsaXplcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgESZ2V0TmVlZGVkTWF0ZXJpYWxzAQV0b3RhbAQFcHJvcHMJALUJAgkBBXZhbHVlAQkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgFfAwkBAiE9AgkAkAMBBQVwcm9wcwUGTlVNUkVTCQACAQIWV3JvbmcgcHJvcG9ydGlvbnMgZGF0YQQBcgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAwkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABQUDbmlsCQETZGlzdHJpYnV0ZUJ5V2VpZ2h0cwIFBXRvdGFsBQFyARFzdWJ0cmFjdE1hdGVyaWFscwMMc2hvdWxkVXNlTWF0A2hhcwl0b3RhbE5lZWQEBG5lZWQJARJnZXROZWVkZWRNYXRlcmlhbHMBBQl0b3RhbE5lZWQKAQpzdWJ0cmFjdG9yAgNhY2MDaWR4BAZyZXN1bHQJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDaGFzBQNpZHgJAJEDAgUEbmVlZAUDaWR4AwkAZgIAAAUGcmVzdWx0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICGE5vdCBlbm91Z2ggbWF0ZXJpYWwgaWR4PQkApAMBBQNpZHgCCywgeW91IGhhdmUgCQCRAwIFA2hhcwUDaWR4AgssIGJ1dCBuZWVkIAkApAMBCQCRAwIFBG5lZWQFA2lkeAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0AwUMc2hvdWxkVXNlTWF0CgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpzdWJ0cmFjdG9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBQNoYXMBEXN1YnRyYWN0RXF1aXBtZW50AgVvbGRFcQVwVXNlZAMJAAACBQVwVXNlZAIACQCUCgIFBW9sZEVxBwoBB3N1YlVzZWQCA2FjYwZpZHhBbXQEBXBhcnRzCQC1CQIFBmlkeEFtdAIBLAMJAQIhPQIJAJADAQUFcGFydHMAAgkAAgECKEluY29ycmVjdCBmb3JtYXQsIHNob3VsZCBiZSBpbmRleCxhbW91bnQEA2lkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAADAwkAZgIAAAUDaWR4BgkAZwIFA2lkeAkAkAMBBRBwcm9kdWN0aW9uTWF0cml4CQACAQITVW5rbm93biBwcm9kdWN0IGlkeAQDYW10CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQQHZXFQYXJ0cwkAtQkCCAUDYWNjAl8xCQCsAgIJAJEDAgUFcGFydHMAAAIBOgMJAQIhPQIJAJADAQUHZXFQYXJ0cwACCQACAQkArAICCQCsAgICD1lvdSBkb24ndCBoYXZlIAkAkQMCBQlwcm9kVHlwZXMFA2lkeAIJIGVxdWlwcGVkBAN0bXAJAJEDAgUHZXFQYXJ0cwABBAZudW1MZW4DCQEHaXNEaWdpdAEJAK8CAgkAsAICBQN0bXAAAQABAAIAAQQEY3VycgkBDXBhcnNlSW50VmFsdWUBCQCvAgIFA3RtcAUGbnVtTGVuBAR0YWlsCQCwAgIFA3RtcAUGbnVtTGVuBAZuZXdBbXQDCQBnAgUEY3VycgUDYW10CQBlAgUEY3VycgUDYW10CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICDVlvdSBlcXVpcHBlZCAJAKQDAQUEY3VycgIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFA2lkeAITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQNhbXQJAJQKAgkArAICCQCsAgIJAKwCAgkArAICCQCRAwIFB2VxUGFydHMAAAkAkQMCBQVwYXJ0cwAAAgE6CQCkAwEFBm5ld0FtdAUEdGFpbAMIBQNhY2MCXzIGAwMJAGcCBQNpZHgABgkAZwIACAUDaWR4BwkAAAIFBm5ld0FtdAAABwoAAiRsCQC1CQIFBXBVc2VkAgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQVvbGRFcQcKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3N1YlVzZWQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBDnByb2RTdHJUb0J5dGVzAQdwcm9kU3RyBAVwTGlzdAMJAAACBQdwcm9kU3RyAgAFA25pbAkAvAkCBQdwcm9kU3RyAgFfCgEEdG9CVgIDYWNjBnJlY2lwZQQBagkAaQIJAMgBAQUDYWNjAAgEBGN1cnIDCQBmAgkAkAMBBQVwTGlzdAUBagkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBMaXN0BQFqAAAJAMsBAgUDYWNjCQCaAwEFBGN1cnIKAAIkbAUQcHJvZHVjdGlvbk1hdHJpeAoAAiRzCQCQAwEFAiRsCgAFJGFjYzABAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEdG9CVgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyAQ5ieXRlc1RvUHJvZFN0cgECYnYKAQZmcm9tQlYCA2FjYwZyZWNpcGUEAWoJAJADAQUDYWNjBAFiCQDJAQIJAMoBAgUCYnYJAGgCAAgFAWoACAkAzQgCBQNhY2MJAKQDAQkAsQkBBQFiCQC6CQIKAAIkbAUQcHJvZHVjdGlvbk1hdHJpeAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGZnJvbUJWAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADICAV8BFWNoZWNrU3RhdFJlcXVpcmVtZW50cwIJZHVja1N0YXRzBHJlcXMKAQVjaGVjawIDYWNjAWoEBGJ1ZmYDCQBmAgkAkAMBBQlkdWNrU3RhdHMJAGQCAAcFAWoJAJEDAgUJZHVja1N0YXRzCQBkAgAHBQFqAAADCQBmAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBHJlcXMFAWoJAGQCCQCRAwIFCWR1Y2tTdGF0cwUBagUEYnVmZgkAAgEJAKwCAgIbUmVxdWlyZW1lbnQgbm90IHNhdGlzZmllZDogCQCRAwIFDHJlcXVpcmVtZW50cwUBagYKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAHCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVjaGVjawIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAQpwbGFjZVByb2RCBgZpZHhDbnQFcExpc3QKaXNQb3NpdGl2ZQlkdWNrU3RhdHMIb2NjdXBpZWQEZnJlZQQFcGFydHMJALUJAgUGaWR4Q250AgE6AwkBAiE9AgkAkAMBBQVwYXJ0cwACCQACAQIoSW5jb3JyZWN0IGZvcm1hdCwgc2hvdWxkIGJlIGluZGV4OmFtb3VudAMDCQEBIQEFCmlzUG9zaXRpdmUJAQIhPQIJALECAQkAkQMCBQVwYXJ0cwAAAAIHCQACAQIrUHJvZHVjdCBpZHggc2hvdWxkIGJlIDIgZGlnaXRzLCB6ZXJvIHBhZGRlZAQKcHJvZHVjdElkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAAEBWNvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFEGZvcnRBbGxvd2VkUHJvZHMFCnByb2R1Y3RJZHgJAAIBCQCsAgIJAKwCAgIJUHJvZHVjdCAnCQCRAwIFCXByb2RUeXBlcwUKcHJvZHVjdElkeAIhJyBjYW5ub3QgYmUgdXNlZCBmb3IgbGFuZCBkZWZlbnNlAwkAZgIAAAUFY291bnQJAAIBAhdDb3VudCBjYW4ndCBiZSBuZWdhdGl2ZQMJAGYCBQVjb3VudAUNTUFYUFJPRElOU0xPVAkAAgEJAKwCAgkArAICCQCsAgICFENhbid0IHB1dCBtb3JlIHRoYW4gCQCkAwEFDU1BWFBST0RJTlNMT1QCBCBvZiAJAJEDAgUJcHJvZFR5cGVzBQpwcm9kdWN0SWR4AwkAAAIFBWNvdW50AAAJAJUKAwUFcExpc3QFCG9jY3VwaWVkBQRmcmVlBARoZWFkCQDJAQIFBXBMaXN0CQBoAgAIBQpwcm9kdWN0SWR4BARjdXJyCQCxCQEJAMkBAgkAygECBQVwTGlzdAkAaAIACAUKcHJvZHVjdElkeAAIBAR0YWlsCQDKAQIFBXBMaXN0CQBoAgAICQBkAgUKcHJvZHVjdElkeAABBAZyZWNpcGUJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4BQpwcm9kdWN0SWR4AgFfAwMJAQEhAQUKaXNQb3NpdGl2ZQkAZgIFBWNvdW50BQRjdXJyBwkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAglZb3UgaGF2ZSAJAKQDAQUEY3VycgIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFCnByb2R1Y3RJZHgCEywgYnV0IHRyaWVkIHRvIHVzZSAJAKQDAQUFY291bnQEBm5ld0FtdAMDCQEBIQEFCmlzUG9zaXRpdmUJARVjaGVja1N0YXRSZXF1aXJlbWVudHMCBQlkdWNrU3RhdHMJALUJAgkAkQMCBQZyZWNpcGUFEHJJZHhSZXF1aXJlbWVudHMCASwHCQBlAgUEY3VycgUFY291bnQJAGQCBQRjdXJyBQVjb3VudAQIZGVsdGFWb2wJAGUCCQEIdG9Wb2x1bWUCBQZuZXdBbXQFDlBST0RVQ1RQS0dTSVpFCQEIdG9Wb2x1bWUCBQRjdXJyBQ5QUk9EVUNUUEtHU0laRQkAlQoDCQDLAQIJAMsBAgUEaGVhZAkAmgMBBQZuZXdBbXQFBHRhaWwJAGQCBQhvY2N1cGllZAUIZGVsdGFWb2wJAGUCBQRmcmVlBQhkZWx0YVZvbAEIYWRkUHJvZEIHBmlkeENudAVwTGlzdAppc1Bvc2l0aXZlB3NlZ21lbnQHbWFpbkF1eARzbG90CWR1Y2tTdGF0cwQFcGFydHMJALUJAgUGaWR4Q250AgE6AwkBAiE9AgkAkAMBBQVwYXJ0cwACCQACAQIoSW5jb3JyZWN0IGZvcm1hdCwgc2hvdWxkIGJlIGluZGV4OmFtb3VudAMDCQEBIQEFCmlzUG9zaXRpdmUJAQIhPQIJALECAQkAkQMCBQVwYXJ0cwAAAAIHCQACAQIrUHJvZHVjdCBpZHggc2hvdWxkIGJlIDIgZGlnaXRzLCB6ZXJvIHBhZGRlZAQKcHJvZHVjdElkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAAEBWNvdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQMDCQBmAgAABQpwcm9kdWN0SWR4BgkAZwIFCnByb2R1Y3RJZHgJAJADAQUQcHJvZHVjdGlvbk1hdHJpeAkAAgECE1Vua25vd24gcHJvZHVjdCBpZHgDCQBmAgAABQVjb3VudAkAAgECF0NvdW50IGNhbid0IGJlIG5lZ2F0aXZlAwkAZgIFBWNvdW50BQ1NQVhQUk9ESU5TTE9UCQACAQkArAICCQCsAgIJAKwCAgIUQ2FuJ3QgcHV0IG1vcmUgdGhhbiAJAKQDAQUNTUFYUFJPRElOU0xPVAIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFCnByb2R1Y3RJZHgDCQAAAgUFY291bnQAAAkAlAoCBQVwTGlzdAcEBGhlYWQJAMkBAgUFcExpc3QJAGgCAAgFCnByb2R1Y3RJZHgEBGN1cnIJALEJAQkAyQECCQDKAQIFBXBMaXN0CQBoAgAIBQpwcm9kdWN0SWR4AAgEBHRhaWwJAMoBAgUFcExpc3QJAGgCAAgJAGQCBQpwcm9kdWN0SWR4AAEEBnJlY2lwZQkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgFCnByb2R1Y3RJZHgCAV8DAwkBASEBBQppc1Bvc2l0aXZlCQBmAgUFY291bnQFBGN1cnIHCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICCVlvdSBoYXZlIAkApAMBBQRjdXJyAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUKcHJvZHVjdElkeAITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQVjb3VudAQJaXNCaWdJdGVtAwMJAQEhAQUKaXNQb3NpdGl2ZQkBFWNoZWNrU3RhdFJlcXVpcmVtZW50cwIFCWR1Y2tTdGF0cwkAtQkCCQCRAwIFBnJlY2lwZQUQcklkeFJlcXVpcmVtZW50cwIBLAcEBmNvbXBhdAkAkQMCBQZyZWNpcGUFCXJJZHhTbG90cwMJAAACBQZjb21wYXQCAAkAAgECF0l0ZW0gY2Fubm90IGJlIGVxdWlwcGVkBAFjCQENcGFyc2VJbnRWYWx1ZQEFBmNvbXBhdAQEY1NlZwkAaQIFAWMAZAMJAQIhPQIFB3NlZ21lbnQFBGNTZWcJAAIBAhRTZWdtZW50IGluY29tcGF0aWJsZQQIY01haW5BdXgJAGkCCQBqAgUBYwBkAAoDCQECIT0CBQdtYWluQXV4BQhjTWFpbkF1eAkAAgECEVNsb3QgaW5jb21wYXRpYmxlBAljTnVtU2xvdHMJAGoCBQFjAAoDAwkBAiE9AgUEc2xvdAAACQBmAgUJY051bVNsb3RzAAEHCQACAQIeQmlnIGl0ZW1zIHNob3VsZCBvY2N1cHkgc2xvdCAwCQBmAgUJY051bVNsb3RzAAEHCQCUCgIJAMsBAgkAywECBQRoZWFkCQCaAwEJAGQCBQRjdXJyAwUKaXNQb3NpdGl2ZQUFY291bnQJAQEtAQUFY291bnQFBHRhaWwFCWlzQmlnSXRlbQELc2xvdHNHcm91cEIGAWcEYnBJbgppc1Bvc2l0aXZlB3NlZ21lbnQHbWFpbkF1eAVzdGF0cwMJAQIhPQIFAWcCAAQFc2xvdHMJALUJAgUBZwIBLAMJAGYCCQCQAwEFBXNsb3RzBQhNQVhTTE9UUwkAAgECEldyb25nIHNsb3RzIGZvcm1hdAQCczAJAJEDAgUFc2xvdHMAAAQCczEDCQBmAgkAkAMBBQVzbG90cwABCQCRAwIFBXNsb3RzAAECAAMDCQAAAgUCczACAAkAAAIFAnMxAgAHBQRicEluBAV0bXBTMAMJAQIhPQIFAnMwAgAJAQhhZGRQcm9kQgcFAnMwBQRicEluBQppc1Bvc2l0aXZlBQdzZWdtZW50BQdtYWluQXV4AAAFBXN0YXRzCQCUCgIFBGJwSW4HAwkBAiE9AgUCczECAAMIBQV0bXBTMAJfMgkAAgECHkJpZyBpdGVtIGFscmVhZHkgb2NjdXBpZXMgc2xvdAgJAQhhZGRQcm9kQgcFAnMxCAUFdG1wUzACXzEFCmlzUG9zaXRpdmUFB3NlZ21lbnQFB21haW5BdXgAAQUFc3RhdHMCXzEIBQV0bXBTMAJfMQUEYnBJbgEGZHJlc3NCBAdzZWdMaXN0BnBCeXRlcwppc1Bvc2l0aXZlBXN0YXRzCgEHc2VnbWVudAIDYWNjA3NlZwQBaggFA2FjYwJfMQQHbWFpbkF1eAkAtQkCBQNzZWcCATsDCQECIT0CCQCQAwEFB21haW5BdXgFCk5VTU1BSU5BVVgJAAIBAhRXcm9uZyBzZWdtZW50IGZvcm1hdAQBbQkAkQMCBQdtYWluQXV4AAAEAWEJAJEDAgUHbWFpbkF1eAABAwMJAAACBQFtAgAJAAACBQFhAgAHCQCUCgIJAGQCBQFqAAEIBQNhY2MCXzIEBHRtcE0JAQtzbG90c0dyb3VwQgYFAW0IBQNhY2MCXzIFCmlzUG9zaXRpdmUFAWoAAAUFc3RhdHMJAJQKAgkAZAIFAWoAAQkBC3Nsb3RzR3JvdXBCBgUBYQUEdG1wTQUKaXNQb3NpdGl2ZQUBagABBQVzdGF0cwgKAAIkbAUHc2VnTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAABQZwQnl0ZXMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3NlZ21lbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYCXzIBBWZvcnRCBgdzZWdMaXN0BnBCeXRlcwhvY2N1cGllZARmcmVlCmlzUG9zaXRpdmUJZHVja1N0YXRzAwkAZgIAAwkAkAMBBQdzZWdMaXN0CQACAQIxQXQgbGVhc3QgZHVjaywgbWluZXMgYW5kIHRyYXBzIHBhcnRzIGFyZSByZXF1aXJlZAoBB3NlZ21lbnQCA2FjYwNzZWcEAWoIBQNhY2MCXzEDCQAAAgUBagAACQCWCgQJAGQCBQFqAAEIBQNhY2MCXzIIBQNhY2MCXzMIBQNhY2MCXzQEAXAJAQpwbGFjZVByb2RCBgUDc2VnCAUDYWNjAl8yBQppc1Bvc2l0aXZlBQlkdWNrU3RhdHMIBQNhY2MCXzMIBQNhY2MCXzQJAJYKBAkAZAIFAWoAAQgFAXACXzEIBQFwAl8yCAUBcAJfMwQBdAoAAiRsBQdzZWdMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAFBnBCeXRlcwUIb2NjdXBpZWQFBGZyZWUKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3NlZ21lbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAJUKAwgFAXQCXzIIBQF0Al8zCAUBdAJfNAEXY2FuV2VhckN1cnJlbnRFcXVpcG1lbnQBC2R1Y2tBc3NldElkBAVlcUtleQkBEGtleUR1Y2tFcXVpcG1lbnQBBQtkdWNrQXNzZXRJZAQGY3VyckVxCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFZXFLZXkCFyw7LF8sOyxfLDssXyw7LF8sOyxfLDssAgFfBAl0ZW1wUHJvZEIJAQZkcmVzc0IEBQZjdXJyRXEFDEVNUFRZX1BST0Q1MAYFA25pbAQIc2VnQnBBdXgJAJEDAgkAtQkCCQCRAwIFBmN1cnJFcQULc2VnQmFja3BhY2sCATsAAQQKYnVmZkVmZmVjdAMJAAACBQhzZWdCcEF1eAIAAAAEBGF1eDAJAJEDAgkAtQkCBQhzZWdCcEF1eAIBLAAAAwkAAAIFBGF1eDACAAAABAZpZHhDbnQJALUJAgUEYXV4MAIBOgQDaWR4CQCRAwIFBmlkeENudAAABANjbnQJAJEDAgUGaWR4Q250AAEDAwMDAwkAAAIFA2lkeAICMDYGCQAAAgUDaWR4AgIwNwYJAAACBQNpZHgCAjA4CQECIT0CBQNjbnQCAAcJAGYCCQENcGFyc2VJbnRWYWx1ZQEFA2NudAAABwkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4CQENcGFyc2VJbnRWYWx1ZQEFA2lkeAIBXwUKcklkeEVmZmVjdAAABAVzdGF0cwkBDGdldER1Y2tTdGF0cwQFBHRoaXMFC2R1Y2tBc3NldElkBQpidWZmRWZmZWN0BgQIbmV3UHJvZEIJAQZkcmVzc0IEBQZjdXJyRXEFCXRlbXBQcm9kQgcFBXN0YXRzCQAAAgUIbmV3UHJvZEIFCG5ld1Byb2RCARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAhwcm9wTGlzdA10ZXJyYWluQ291bnRzDWxhbmRTaXplSW5kZXgEc2lnbgMJAQIhPQIJAJADAQUIcHJvcExpc3QFBk5VTVJFUwkAAgECFldyb25nIHByb3BvcnRpb25zIGRhdGEKAQd1cGRhdGVyAgNhY2MBaQQGcmVzdWx0CQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb3BMaXN0BQFpCQBoAgkAaAIFBHNpZ24JAJEDAgUNdGVycmFpbkNvdW50cwUBaQUNbGFuZFNpemVJbmRleAMJAGYCAAAFBnJlc3VsdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIWUGFuaWMhIFBpZWNlcyBvZiB0eXBlPQkApAMBBQFpAgcsIHNpZ249CQCkAwEFBHNpZ24CEywgdGVycmFpbkNvdW50c1tpXT0JAKQDAQkAkQMCBQ10ZXJyYWluQ291bnRzBQFpAhAsIGxhbmRTaXplSW5kZXg9CQCkAwEFDWxhbmRTaXplSW5kZXgJAM0IAgUDYWNjCQCkAwEFBnJlc3VsdAoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHdXBkYXRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgERdXBkYXRlUHJvcG9ydGlvbnMDDXRlcnJhaW5Db3VudHMNbGFuZFNpemVJbmRleARzaWduBAhwcm9wTGlzdAkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEJARFrZXlSZXNQcm9wb3J0aW9ucwACCzBfMF8wXzBfMF8wAgFfCQC5CQIJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAUIcHJvcExpc3QFDXRlcnJhaW5Db3VudHMFDWxhbmRTaXplSW5kZXgFBHNpZ24CAV8BDWNvdW50VGVycmFpbnMBCHRlcnJhaW5zCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUEAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFCAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQwABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUQAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFFAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRgABBQNuaWwBBmFkZFJlcwUKY3VycmVudFJlcw10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4F2RhaWx5QnlQaWVjZVdpdGhCb251c2VzCgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMFCURBWU1JTExJUwkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4CQDNCAIFA2FjYwkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmN1cnJlbnRSZXMFAWkFCXJlc09mVHlwZQQBcgoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEJdmlydENsYWltBA10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4F2RhaWx5QnlQaWVjZVdpdGhCb251c2VzCgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMFCURBWU1JTExJUwkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4CQCUCgIJAM0IAggFA2FjYwJfMQUJcmVzT2ZUeXBlCQBkAggFA2FjYwJfMgUJcmVzT2ZUeXBlCgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYBDWRpc3RyaWJ1dGVSZXMEDGN1cnJlbnRXaFJlcw5jdXJyZW50UGFja1JlcwpyZXNUb0NsYWltC3doU3BhY2VMZWZ0BA5yZXNMaXN0VG9DbGFpbQgFCnJlc1RvQ2xhaW0CXzEEDHJlc0FtVG9DbGFpbQgFCnJlc1RvQ2xhaW0CXzIDCQAAAgUMcmVzQW1Ub0NsYWltAAAJAJQKAgkAuQkCBQxjdXJyZW50V2hSZXMCAV8JALkJAgUOY3VycmVudFBhY2tSZXMCAV8DCQBnAgULd2hTcGFjZUxlZnQFDHJlc0FtVG9DbGFpbQoBCGFkZExpc3RzAgNhY2MBaQkAzQgCBQNhY2MJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxjdXJyZW50V2hSZXMFAWkJAJEDAgUOcmVzTGlzdFRvQ2xhaW0FAWkEAXIKAAIkbAUFSVRFUjYKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCGFkZExpc3RzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQCUCgIJALkJAgUBcgIBXwkAuQkCBQ5jdXJyZW50UGFja1JlcwIBXwoBDGFkZFBhcnRMaXN0cwIDYWNjAWkEBndoUGFydAkAawMJAJEDAgUOcmVzTGlzdFRvQ2xhaW0FAWkFC3doU3BhY2VMZWZ0BQxyZXNBbVRvQ2xhaW0JAJQKAgkAzQgCCAUDYWNjAl8xCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUMY3VycmVudFdoUmVzBQFpBQZ3aFBhcnQJAM0IAggFA2FjYwJfMgkApAMBCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ5jdXJyZW50UGFja1JlcwUBaQkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQUGd2hQYXJ0BAFyCgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYWRkUGFydExpc3RzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQCUCgIJALkJAggFAXICXzECAV8JALkJAggFAXICXzICAV8BA2FicwEBeAMJAMACAgUBeAkAtgIBAAAFAXgJAL4CAQUBeAAEZnJlcQkAzAgCCQDMCAIABgkAzAgCAAkJAMwIAgAOCQDMCAIADwkAzAgCABAFA25pbAkAzAgCCQDMCAIABQkAzAgCAAgJAMwIAgANCQDMCAIADgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAQJAMwIAgAJCQDMCAIACgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAYJAMwIAgAHCQDMCAIADwkAzAgCABMFA25pbAkAzAgCCQDMCAIABAkAzAgCAAcJAMwIAgAICQDMCAIADQkAzAgCABIFA25pbAUDbmlsAQdnZW5DaGFyAgFuBWZyZXFzBANyZW0JAKADAQkAuwICBQFuBQdUV0VOVFlYBAZsZXR0ZXIDCQBmAgkAkQMCBQVmcmVxcwAABQNyZW0CAUEDCQBmAgkAkQMCBQVmcmVxcwABBQNyZW0CAUIDCQBmAgkAkQMCBQVmcmVxcwACBQNyZW0CAUMDCQBmAgkAkQMCBQVmcmVxcwADBQNyZW0CAUQDCQBmAgkAkQMCBQVmcmVxcwAEBQNyZW0CAUUCAUYFBmxldHRlcgELZ2VuVGVycmFpbnMCBHNlZWQMY29udGluZW50SWR4BAFmCQCRAwIFBGZyZXEFDGNvbnRpbmVudElkeAoBEHRlcnJhaW5HZW5lcmF0b3ICA2FjYwRlbGVtCQCUCgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCAUDYWNjAl8xCQEHZ2VuQ2hhcgIIBQNhY2MCXzIFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQdUV0VOVFlYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZMlgFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFkzWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTRYBQFmCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTVYBAF0CgACJGwJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAgAJALoCAgUEc2VlZAUFRklWRVgKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEHRlcnJhaW5HZW5lcmF0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCAUBdAJfMQAGUEVSTTI1CQDMCAIABwkAzAgCAAIJAMwIAgAPCQDMCAIAEwkAzAgCAAgJAMwIAgAYCQDMCAIAAQkAzAgCABUJAMwIAgAQCQDMCAIABQkAzAgCAAAJAMwIAgAWCQDMCAIAFAkAzAgCABcJAMwIAgALCQDMCAIABAkAzAgCABIJAMwIAgAMCQDMCAIABgkAzAgCAAoJAMwIAgADCQDMCAIAEQkAzAgCAA0JAMwIAgAJCQDMCAIADgUDbmlsAAZUQ0hBUlMJAMwIAgIBQQkAzAgCAgFCCQDMCAICAUMJAMwIAgIBRAkAzAgCAgFFCQDMCAICAUYFA25pbAETZ2VuVGVycmFpbnNGb3JNZXJnZQILc3VtVGVycmFpbnMNbGFuZFNpemVJbmRleAoBBXN0ZXAxAgNhY2MBcwQBaggFA2FjYwJfMgQCZWwJAQ1wYXJzZUludFZhbHVlAQUBcwQBeAMJAAACBQJlbAAAAAADCQBnAgUCZWwJAGgCAAQFDWxhbmRTaXplSW5kZXgJAGkCBQJlbAUNbGFuZFNpemVJbmRleAMJAGYCBQJlbAkAaAIAAwUNbGFuZFNpemVJbmRleAADCQBkAgkAaQIJAGUCBQJlbAABBQ1sYW5kU2l6ZUluZGV4AAEJAJUKAwkAzQgCCAUDYWNjAl8xBQF4CQBkAggFA2FjYwJfMgABCQBkAggFA2FjYwJfMwUBeAQBdAoAAiRsBQtzdW1UZXJyYWlucwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwUDbmlsAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFc3RlcDECBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYEA2FycggFAXQCXzEEBm1heElkeAkBBXZhbHVlAQkAzwgCBQNhcnIJAJYDAQUDYXJyBAVkZWx0YQkAZQIIBQF0Al8zABkKAQZzdWJiZXICA2FjYwNpZHgEA3ZhbAMJAAACBQNpZHgFBm1heElkeAkAZQIJAJEDAgUDYXJyBQNpZHgFBWRlbHRhCQCRAwIFA2FycgUDaWR4BAZ6ZXJvZXMDCQAAAgUDdmFsAAAFA25pbAkAtQkCCQCwAgIJAKQDAQkAbAYACgAABQN2YWwAAAAABQRET1dOAAECAAQBYwkAkQMCBQZUQ0hBUlMFA2lkeAoBB2xpc3RHZW4CAmFjB2lnbm9yZWQJAM0IAgUCYWMFAWMEAXoKAAIkbAUGemVyb2VzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdsaXN0R2VuAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyNQkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZCQDOCAIFA2FjYwUBegQBcgoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGc3ViYmVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCgEGcGVybXV0AgNhY2MBagkArAICBQNhY2MJAJEDAgUBcgUBagoAAiRsBQZQRVJNMjUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgAKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBnBlcm11dAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMjUJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQELZ2V0QmFja3BhY2sBBWJwS2V5BAFwCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6AgE6CQDMCAIJAKQDAQkBC3ZhbHVlT3JFbHNlAgkAtgkBCQCRAwIFAXAFCmJwSWR4TGV2ZWwAAAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCGJwSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUBcAUIYnBJZHhSZXMCCzBfMF8wXzBfMF8wCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQFwBQlicElkeFByb2QFA25pbAEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCXZvbFByZWZpeAQFcGFydHMJALUJAgUJdm9sUHJlZml4AgFfCQBoAgkAaAIFDFdITVVMVElQTElFUgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAAARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEJY3VycmVudFdoBAVnb29kcwkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAoBCXN1bVJlc01hdAIDYWNjBGl0ZW0JAGQCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQoBB3N1bVByb2QCA2FjYwRpdGVtBANpZHgIBQNhY2MCXzEEBHBrZ3MJAGkCCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQUOUFJPRFVDVFBLR1NJWkUAAQUOUFJPRFVDVFBLR1NJWkUJAJQKAgkAZAIFA2lkeAABCQBkAggFA2FjYwJfMgkAaAIFBHBrZ3MFBU1VTFQ4BAh3aFJlc1ZvbAoAAiRsCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc3VtUmVzTWF0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAh3aE1hdFZvbAoAAiRsCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc3VtUmVzTWF0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp3aEdvb2RzVm9sAwkAAAIFBWdvb2RzAgAAAAgKAAIkbAkAvAkCBQVnb29kcwIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAAAAAKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3N1bVByb2QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgJfMgkAZAIJAGQCBQh3aFJlc1ZvbAUId2hNYXRWb2wFCndoR29vZHNWb2wBDGdldFdhcmVob3VzZQMFd2hLZXkJbGFuZEluZGV4CmluZnJhTGV2ZWwECXZvbFByZWZpeAkArAICCQCsAgIJAKQDAQUJbGFuZEluZGV4AgFfCQCkAwEFCmluZnJhTGV2ZWwEB3doVG90YWwJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEFCXZvbFByZWZpeAQFd2hTdHIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFd2hLZXkJAKwCAgUJdm9sUHJlZml4Ahs6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6OjAEAndoCQC8CQIFBXdoU3RyAgE6BAp3aE9jY3VwaWVkCQEXZ2V0V2FyZWhvdXNlT2NjdXBpZWRWb2wBBQJ3aAQGd2hMb2Z0AwkAZgIABQkAkAMBBQJ3aAkAuQkCCQDMCAICATAJAMwIAgkApAMBBQp3aE9jY3VwaWVkCQDMCAIJAKQDAQkAZQIFB3doVG90YWwFCndoT2NjdXBpZWQJAMwIAgkApAMBBQd3aFRvdGFsBQNuaWwCAV8EBGxvZnQJALUJAgkAkQMCBQJ3aAUJd2hJZHhMT0ZUAgFfBAh3aExvY2tlZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFCXZvbExvY2tlZAQDb2NjAwkAZgIJAJADAQUEbG9mdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQFCndoT2NjdXBpZWQJALkJAgkAzAgCCQCkAwEFCHdoTG9ja2VkCQDMCAIJAKQDAQUDb2NjCQDMCAIJAKQDAQkAZQIJAGUCBQd3aFRvdGFsBQh3aExvY2tlZAUDb2NjCQDMCAIJAKQDAQUHd2hUb3RhbAUDbmlsAgFfCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUCd2gFCHdoSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUCd2gFCHdoSWR4UmVzAgswXzBfMF8wXzBfMAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAndoBQh3aElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAndoBQh3aElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQJ3aAUJd2hJZHhQcm9kCQDMCAIFBndoTG9mdAUDbmlsARVnZXRXYXJlaG91c2VTcGFjZUxlZnQBCWN1cnJlbnRXaAQLb2NjdXBpZWRWb2wJARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFCWN1cnJlbnRXaAQPY3VycldoTG9ja2VkVm9sCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhMT0ZUAgFfBQl2b2xMb2NrZWQJAGUCCQBlAgkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQljdXJyZW50V2gFC3doSWR4TGV2ZWxzBQtvY2N1cGllZFZvbAUPY3VycldoTG9ja2VkVm9sAQltb3ZlU3R1ZmYDCmNhcmdvUGFydHMJY3VycmVudFdoC2N1cnJlbnRQYWNrAwkBAiE9AgkAkAMBBQpjYXJnb1BhcnRzAAMJAAIBAjRjYXJnb0xpc3RTdHIgc2hvdWxkIGNvbnRhaW4gZXhhY3RseSAyICc6JyBzZXBhcmF0b3JzBAhyZXNQYXJ0cwkAtQkCCQCRAwIFCmNhcmdvUGFydHMAAAIBXwQIbWF0UGFydHMJALUJAgkAkQMCBQpjYXJnb1BhcnRzAAECAV8ECXByb2RQYXJ0cwMJAAACCQCRAwIFCmNhcmdvUGFydHMAAgIABQNuaWwJALwJAgkAkQMCBQpjYXJnb1BhcnRzAAICAV8DCQECIT0CCQCQAwEFCHJlc1BhcnRzBQZOVU1SRVMJAAIBAiBBbGwgNiByZXNvdXJjZXMgc2hvdWxkIGJlIHBhc3NlZAMJAQIhPQIJAJADAQUIbWF0UGFydHMFBk5VTVJFUwkAAgECIEFsbCA2IG1hdGVyaWFscyBzaG91bGQgYmUgcGFzc2VkBAt3aFNwYWNlTGVmdAkBFWdldFdhcmVob3VzZVNwYWNlTGVmdAEFCWN1cnJlbnRXaAQJY3VycldoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQJY3VycldoTWF0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwQKY3VycldoUHJvZAMJAAACCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgAFA25pbAkAvAkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgFfBA5jdXJyZW50UGFja1JlcwkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQOY3VycmVudFBhY2tNYXQJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8ED2N1cnJlbnRQYWNrUHJvZAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwoBA212UgIDYWNjBGl0ZW0EAWkIBQNhY2MCXzEEAmFtCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0EA3docgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWN1cnJXaFJlcwUBaQQDYnByCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOY3VycmVudFBhY2tSZXMFAWkDCQAAAgUCYW0AAAkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAJEDAgUJY3VycldoUmVzBQFpCQDNCAIIBQNhY2MCXzMJAJEDAgUOY3VycmVudFBhY2tSZXMFAWkIBQNhY2MCXzQDCQBmAgUCYW0AAAMJAGYCBQJhbQUDYnByCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgBQRpdGVtAhkgZnJvbSBiYWNrcGFjaywgYnV0IG9ubHkgCQCkAwEFA2JwcgIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docgUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnByBQJhbQkAZAIIBQNhY2MCXzQFAmFtAwkAZgIJAQEtAQUCYW0FA3docgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFAmFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aHICCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHIFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcgUCYW0JAGQCCAUDYWNjAl80BQJhbQQBcgoAAiRsBQhyZXNQYXJ0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAAABQNuaWwFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdlICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYKAQNtdk0CA2FjYwRpdGVtBAFpCAUDYWNjAl8xBAJhbQkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAN3aG0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQljdXJyV2hNYXQFAWkEA2JwbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmN1cnJlbnRQYWNrTWF0BQFpAwkAAAIFAmFtAAAJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCRAwIFCWN1cnJXaE1hdAUBaQkAzQgCCAUDYWNjAl8zCQCRAwIFDmN1cnJlbnRQYWNrTWF0BQFpCAUDYWNjAl80AwkAZgIFAmFtAAADCQBmAgUCYW0FA2JwbQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAUEaXRlbQIZIGZyb20gYmFja3BhY2ssIGJ1dCBvbmx5IAkApAMBBQNicG0CCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aG0FAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwbQUCYW0JAGQCCAUDYWNjAl80BQJhbQMJAGYCCQEBLQEFAmFtBQN3aG0JAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQkBAS0BBQJhbQIaIGZyb20gd2FyZWhvdXNlLCBidXQgb25seSAJAKQDAQUDd2htAgogYXZhaWxhYmxlCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2htBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicG0FAmFtCQBkAggFA2FjYwJfNAUCYW0EAW0KAAIkbAUIbWF0UGFydHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAUDbmlsBQNuaWwIBQFyAl80CgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdk0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYKAQNtdlACA2FjYwRpdGVtBAFpCAUDYWNjAl8xBAJhbQkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAN3aHADCQBmAgkAkAMBBQpjdXJyV2hQcm9kBQFpCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKY3VycldoUHJvZAUBaQAABANicHADCQBmAgkAkAMBBQ9jdXJyZW50UGFja1Byb2QFAWkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ9jdXJyZW50UGFja1Byb2QFAWkAAAMJAAACBQJhbQAACQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBBQN3aHAJAM0IAggFA2FjYwJfMwkApAMBBQNicHAIBQNhY2MCXzQDCQBmAgUCYW0AAAMJAGYCBQJhbQUDYnBwCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgBQRpdGVtAhkgZnJvbSBiYWNrcGFjaywgYnV0IG9ubHkgCQCkAwEFA2JwcAIKIGF2YWlsYWJsZQQIZGVsdGFWb2wJAGUCCQEIdG9Wb2x1bWUCCQBkAgUDd2hwBQJhbQUOUFJPRFVDVFBLR1NJWkUJAQh0b1ZvbHVtZQIFA3docAUOUFJPRFVDVFBLR1NJWkUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHAFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcAUCYW0JAGQCCAUDYWNjAl80BQhkZWx0YVZvbAMJAGYCCQEBLQEFAmFtBQN3aHAJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQkBAS0BBQJhbQIaIGZyb20gd2FyZWhvdXNlLCBidXQgb25seSAJAKQDAQUDd2hwAgogYXZhaWxhYmxlBAhkZWx0YVZvbAkAZQIJAQh0b1ZvbHVtZQIJAGQCBQN3aHAFAmFtBQ5QUk9EVUNUUEtHU0laRQkBCHRvVm9sdW1lAgUDd2hwBQ5QUk9EVUNUUEtHU0laRQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docAUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnBwBQJhbQkAZAIIBQNhY2MCXzQFCGRlbHRhVm9sBAFwAwkBAiE9AgkAkAMBBQlwcm9kUGFydHMAAAoAAiRsBQlwcm9kUGFydHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAUDbmlsBQNuaWwIBQFtAl80CgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNtdlACBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgkAlgoEAAAFCmN1cnJXaFByb2QFD2N1cnJlbnRQYWNrUHJvZAgFAW0CXzQECHZvbFNhbGRvCAUBcAJfNAMJAGYCBQh2b2xTYWxkbwULd2hTcGFjZUxlZnQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICFUF0dGVtcHQgdG8gcHV0IHRvdGFsIAkApAMBBQh2b2xTYWxkbwIRIHN0dWZmLCBidXQgb25seSAJAKQDAQULd2hTcGFjZUxlZnQCFSB3YXJlaG91c2Ugc3BhY2UgbGVmdAkAmQoHCQC5CQIIBQFyAl8yAgFfCQC5CQIIBQFtAl8yAgFfCQC6CQIIBQFwAl8yAgFfCQC5CQIIBQFyAl8zAgFfCQC5CQIIBQFtAl8zAgFfCQC6CQIIBQFwAl8zAgFfBQh2b2xTYWxkbwESZXhwZWRpdGlvbkludGVybmFsAgZjYWxsZXIEdHhJZAQIdXNlckFkZHIJAKUIAQUGY2FsbGVyBAZiaWdOdW0JAQNhYnMBCQCeAwEFBHR4SWQEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQHbGFuZE51bQkApAMBBQdmcmVlTnVtBAxjb250aW5lbnRJZHgJAKADAQkAuwICBQZiaWdOdW0FBUZJVkVYBAh0ZXJyYWlucwkBC2dlblRlcnJhaW5zAgUGYmlnTnVtBQxjb250aW5lbnRJZHgECWNvbnRpbmVudAkAkQMCBQpjb250aW5lbnRzBQxjb250aW5lbnRJZHgEBWlzc3VlCQDCCAUJAQduZnROYW1lAgUHbGFuZE51bQIBUwkAuQkCCQDMCAIFB2xhbmROdW0JAMwIAgIBUwkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBAJpZAkA2AQBBQdhc3NldElkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUHZnJlZU51bQABCQDMCAIFBWlzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlMYW5kVG9Bc3NldElkAQUHbGFuZE51bQUCaWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFAmlkBQh1c2VyQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQh1c2VyQWRkcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQJpZAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgUCaWQFCHVzZXJBZGRyAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGY2FsbGVyAAEFB2Fzc2V0SWQFA25pbAkAlAoCBQJpZAUJY29udGluZW50AQxmbGlnaHRDb21tb24DCHVzZXJBZGRyB21lc3NhZ2UDc2lnAwkBASEBCQDEEwMFB21lc3NhZ2UFA3NpZwUDcHViCQACAQIYc2lnbmF0dXJlIGRvZXMgbm90IG1hdGNoBAVwYXJ0cwkAvAkCCQCwCQEFB21lc3NhZ2UCATsECWZsaWdodExvZwkAvAkCCQCRAwIFBXBhcnRzAAACAXwEAmhwCQC1CQIJAJEDAgUJZmxpZ2h0TG9nBQhmbEhlYWx0aAIBXwQFY3VySFAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJocAAABAVuZXdIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAEEC25ld0xvY1R4VmVyCQC1CQIJAJEDAgUFcGFydHMAAQIBOgQLbmV3TG9jYXRpb24JAJEDAgULbmV3TG9jVHhWZXIAAAQEdGltZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWZsaWdodExvZwULZmxUaW1lc3RhbXADAwkAZgIFBHRpbWUJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAURRklWRU1JTlVURVNNSUxMSVMGCQBmAgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwUEdGltZQkAAgEJAKwCAgkArAICCQCsAgICHHNpZ25hdHVyZSBvdXRkYXRlZDogbG9nVGltZT0JAKQDAQUEdGltZQIJLCBiY1RpbWU9CQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAl0eEZyb21Nc2cJAJEDAgULbmV3TG9jVHhWZXIAAQQGbGFzdFR4CQELdmFsdWVPckVsc2UCCQCiCAEJARFrZXlMYXN0VHhJZEJ5VXNlcgEFCHVzZXJBZGRyAgADCQECIT0CBQZsYXN0VHgFCXR4RnJvbU1zZwkAAgEJAKwCAgkArAICCQCsAgICHlR4IGlkcyBkb24ndCBtYXRjaCEgSW4gc3RhdGU6IAUGbGFzdFR4AgosIGluIG1zZzogBQl0eEZyb21Nc2cEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUIdXNlckFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAxvbGRGcm9tU3RhdGUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAMJAQIhPQIFDG9sZEZyb21TdGF0ZQUFY3VySFAJAAIBCQCsAgIJAKwCAgkArAICAgpvbGRIZWFsdGg9CQCkAwEFDG9sZEZyb21TdGF0ZQIvIGZyb20gc3RhdGUgZG9lcyBub3QgbWF0Y2ggb25lIGZyb20gZmxpZ2h0IGxvZz0JAKQDAQUFY3VySFADCQBnAgAABQVjdXJIUAkAAgECHllvdSBjYW4ndCBmbHkgd2l0aCB6ZXJvIGhlYWx0aAMJAQEhAQkBF2NhbldlYXJDdXJyZW50RXF1aXBtZW50AQULZHVja0Fzc2V0SWQJAAIBAhZFcXVpcG1lbnQgaW5jb21wYXRpYmxlBAVib251cwMJAGYCCQCQAwEFCWZsaWdodExvZwUHZmxCb251cwkAkQMCBQlmbGlnaHRMb2cFB2ZsQm9udXMCAAQIcHJvZFVzZWQDCQBmAgkAkAMBBQlmbGlnaHRMb2cFC2ZsUHJvZHNVc2VkCQCRAwIFCWZsaWdodExvZwULZmxQcm9kc1VzZWQCAAQKc2VudEFtb3VudAMDCQBmAgUFbmV3SFAAAAkAAAIFBWJvbnVzAgEkBwkBBWFzSW50AQkA/AcEBQxyZXN0Q29udHJhY3QCDXNlbmRVc2R0UHJpemUJAMwIAgUIdXNlckFkZHIFA25pbAUDbmlsAAAJAJcKBQUFbmV3SFAFC2R1Y2tBc3NldElkBQpzZW50QW1vdW50BQtuZXdMb2NhdGlvbgUIcHJvZFVzZWQBDGFwcGx5Qm9udXNlcwILbGFuZEFzc2V0SWQGcGllY2VzBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQJYXJ0UGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEJASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkAAAEBGFkZDYJAGkCBQppbmZyYUxldmVsAAYEBGFkZDcJAGkCBQppbmZyYUxldmVsAAcJAGQCCQBkAgUPREFJTFlSRVNCWVBJRUNFCQBrAwUPREFJTFlSRVNCWVBJRUNFCQBkAgkAZAIFCmluZnJhTGV2ZWwFBGFkZDYJAGgCAAIFBGFkZDcABQkAawMFD0RBSUxZUkVTQllQSUVDRQUJYXJ0UGllY2VzCQBoAgUGcGllY2VzAAUBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwRhZGRyCWNsYWltTW9kZQ1sYW5kQXNzZXRJZEluBA0kdDAzMzM0MzMzODgyAwkAAAIFCWNsYWltTW9kZQULY2xhaW1Nb2RlV2gJAJQKAgUNbGFuZEFzc2V0SWRJbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAgAEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAkAlAoCCQCRAwIFA2xvYwUIbG9jSWR4SWQFC2R1Y2tBc3NldElkBAtsYW5kQXNzZXRJZAgFDSR0MDMzMzQzMzM4ODICXzEEBmR1Y2tJZAgFDSR0MDMzMzQzMzM4ODICXzIEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQECXNhdmVkVGltZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFB3RpbWVLZXkJAKwCAgkArAICAgVMYW5kIAgFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8JAJYKBAUGZHVja0lkBQtsYW5kQXNzZXRJZAUBZAUJc2F2ZWRUaW1lARBjbGFpbVJlc0ludGVybmFsBARhZGRyBmFtb3VudAljbGFpbU1vZGUNbGFuZEFzc2V0SWRJbgMJAGYCAAAFBmFtb3VudAkAAgECD05lZ2F0aXZlIGFtb3VudAQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUJY2xhaW1Nb2RlBQ1sYW5kQXNzZXRJZEluBAhsYW5kU2l6ZQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCCAUBYwJfMwULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCAUBYwJfNAMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEIBQFjAl80AgwsIGN1cnJlbnQgPSAJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBBZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQEMYXBwbHlCb251c2VzAggFAWMCXzIFBnBpZWNlcwQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBQZwaWVjZXMFCURBWU1JTExJUwMJAGYCBQZhbW91bnQFCGF2YWlsUmVzCQACAQkArAICCQCsAgIJAKwCAgIiTm90IGVub3VnaCByZXNvdXJjZXMsIGF2YWlsYWJsZSA9IAkApAMBBQhhdmFpbFJlcwIOLCByZXF1ZXN0ZWQgPSAJAKQDAQUGYW1vdW50BAxuZXdEZWx0YVRpbWUJAGsDCQBlAgUIYXZhaWxSZXMFBmFtb3VudAUJREFZTUlMTElTCQBoAgUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQUGcGllY2VzBAxuZXdUaW1lc3RhbXAJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUMbmV3RGVsdGFUaW1lBAlsYW5kSW5kZXgJAGkCBQZwaWVjZXMFBVNTSVpFBApyZXNUb0NsYWltCQEJdmlydENsYWltBAUNdGVycmFpbkNvdW50cwkAZQIFCWRlbHRhVGltZQUMbmV3RGVsdGFUaW1lBQlsYW5kSW5kZXgFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQgFAWMCXzIECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBCAUBYwJfMgAABAljdXJyZW50V2gJAQxnZXRXYXJlaG91c2UDBQV3aEtleQUJbGFuZEluZGV4BQppbmZyYUxldmVsBARsb2Z0CQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8EC3doU3BhY2VMZWZ0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQMDCQAAAgUJY2xhaW1Nb2RlBQtjbGFpbU1vZGVXaAkAZgIFBmFtb3VudAULd2hTcGFjZUxlZnQHCQACAQkArAICCQCsAgICBU9ubHkgCQCkAwEFC3doU3BhY2VMZWZ0Ahggc3BhY2UgbGVmdCBpbiB3YXJlaG91c2UEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBYwJfMQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BA5jdXJyZW50UGFja1JlcwkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQMY3VycmVudFdoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQNJHQwMzYyNTYzNzEyNwMJAAACBQljbGFpbU1vZGUFC2NsYWltTW9kZVdoCQCWCgQJAQZhZGRSZXMFBQxjdXJyZW50V2hSZXMFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQUJbGFuZEluZGV4BRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQt2b2xPY2N1cGllZAgFCnJlc1RvQ2xhaW0CXzIJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQgFCnJlc1RvQ2xhaW0CXzIDCQAAAgUJY2xhaW1Nb2RlBQ1jbGFpbU1vZGVEdWNrCQCWCgQJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwkBBmFkZFJlcwUFDmN1cnJlbnRQYWNrUmVzBQ10ZXJyYWluQ291bnRzCQBlAgUJZGVsdGFUaW1lBQxuZXdEZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQQFZGlzdHIJAQ1kaXN0cmlidXRlUmVzBAUMY3VycmVudFdoUmVzBQ5jdXJyZW50UGFja1JlcwUKcmVzVG9DbGFpbQULd2hTcGFjZUxlZnQEBHdoQW0JAJcDAQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQkAzAgCCAUKcmVzVG9DbGFpbQJfMgUDbmlsCQCWCgQIBQVkaXN0cgJfMQgFBWRpc3RyAl8yCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkBQR3aEFtCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUFBHdoQW0EBXdoUmVzCAUNJHQwMzYyNTYzNzEyNwJfMQQFYnBSZXMIBQ0kdDAzNjI1NjM3MTI3Al8yBAVsb2Z0TwgFDSR0MDM2MjU2MzcxMjcCXzMEBWxvZnRGCAUNJHQwMzYyNTYzNzEyNwJfNAkAlwoFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEIBQFjAl8yBQxuZXdUaW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKTEFORFBSRUZJWAgFAWMCXzIFBGFkZHIFDG5ld1RpbWVzdGFtcAUDbmlsBQVicEtleQkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIFBWJwUmVzCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsBQV3aEtleQkAzAgCCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMJAMwIAgUFd2hSZXMJAMwIAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0CQDMCAIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QJAMwIAgkAuQkCCQDMCAIJAJEDAgUEbG9mdAUJdm9sTG9ja2VkCQDMCAIJAKQDAQUFbG9mdE8JAMwIAgkApAMBBQVsb2Z0RgkAzAgCCQCRAwIFBGxvZnQFCHZvbFRvdGFsBQNuaWwCAV8FA25pbAEIY2xhaW1BbGwEBGFkZHILbGFuZEFzc2V0SWQGcGllY2VzCWNsYWltTW9kZQQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQEFdmFsdWUBCQCfCAEFB3RpbWVLZXkECGF2YWlsUmVzCQBoAgkAawMJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUJc2F2ZWRUaW1lCQEMYXBwbHlCb251c2VzAgULbGFuZEFzc2V0SWQFBnBpZWNlcwUJREFZTUlMTElTBQZwaWVjZXMJARBjbGFpbVJlc0ludGVybmFsBAUEYWRkcgUIYXZhaWxSZXMFCWNsYWltTW9kZQULbGFuZEFzc2V0SWQBDXVwSW5mcmFDb21tb24EDHNob3VsZFVzZU1hdAZjYWxsZXINcGF5bWVudEFtb3VudAtsYW5kQXNzZXRJZAQEYWRkcgkApQgBBQZjYWxsZXIEAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFE2NsYWltTW9kZVdoVGhlbkR1Y2sFC2xhbmRBc3NldElkBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQIaW5mcmFLZXkJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQgFAWMCXzIECGN1ckxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEFCGluZnJhS2V5AAADAwkBASEBBRhLU19BTExPV19CSUdfSU5GUkFfTUVSR0UJAGcCBQhjdXJMZXZlbAADBwkAAgECJkN1cnJlbnRseSBtYXggaW5mcmFzdHJ1Y3R1cmUgbGV2ZWwgPSAzBAhtYXhJbmZyYQkAZAIJAGkCCQEEc3FydAQFBnBpZWNlcwAAAAAFBERPV04ABQACBAhuZXdMZXZlbAkAZAIFCGN1ckxldmVsAAEDAwUYS1NfQUxMT1dfQklHX0lORlJBX01FUkdFCQBmAgUIbmV3TGV2ZWwFCG1heEluZnJhBwkAAgEJAKwCAgIlQ3VycmVudGx5IG1heCBpbmZyYXN0cnVjdHVyZSBsZXZlbCA9IAkApAMBBQhtYXhJbmZyYQQEY29zdAkAawMFFUluZnJhVXBncmFkZUNvc3RTVXNkdAkAaAIFBnBpZWNlcwUIbmV3TGV2ZWwFBVNTSVpFAwMJAQEhAQUMc2hvdWxkVXNlTWF0CQECIT0CBQ1wYXltZW50QW1vdW50BQRjb3N0BwkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFBGNvc3QEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBYwJfMQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVtTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQHbWF0VXNlZAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUEBm5ld01hdAkAuQkCCQERc3VidHJhY3RNYXRlcmlhbHMDBQxzaG91bGRVc2VNYXQFBW1MaXN0BQdtYXRVc2VkAgFfBAtjbGFpbVJlc3VsdAkBCGNsYWltQWxsBAUEYWRkcggFAWMCXzIFBnBpZWNlcwUTY2xhaW1Nb2RlV2hUaGVuRHVjawQGd2hEYXRhCAULY2xhaW1SZXN1bHQCXzUEBm9sZFZvbAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQZ3aERhdGEFC3doSWR4TGV2ZWxzBApuZXdWb2xEYXRhCQC5CQIJAMwIAgkAkQMCCQC1CQIJAJEDAgUGd2hEYXRhBQt3aElkeExldmVscwIBXwAACQDMCAIJAKQDAQUIbmV3TGV2ZWwFA25pbAIBXwQGbmV3Vm9sCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBBQpuZXdWb2xEYXRhBARsb2Z0CQC1CQIJAJEDAgUGd2hEYXRhBQl3aElkeExPRlQCAV8ECm5ld0xvZnRTdHIJALkJAgkAzAgCCQCRAwIFBGxvZnQFCXZvbExvY2tlZAkAzAgCCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCQDMCAIJAKQDAQkAZQIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQUGbmV3Vm9sBQZvbGRWb2wJAMwIAgkApAMBBQZuZXdWb2wFA25pbAIBXwkAlQoDCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCGluZnJhS2V5BQhuZXdMZXZlbAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIIBQFjAl8yBQRhZGRyBQhuZXdMZXZlbAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCCAULY2xhaW1SZXN1bHQCXzMFCGJwSWR4UmVzCQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzQJALkJAgkAzAgCBQpuZXdWb2xEYXRhCQDMCAIJAJEDAgUGd2hEYXRhBQh3aElkeFJlcwkAzAgCCQCRAwIFBndoRGF0YQUId2hJZHhNYXQJAMwIAgkAkQMCBQZ3aERhdGEFCXdoSWR4UHJvZAkAzAgCBQpuZXdMb2Z0U3RyBQNuaWwCAToFA25pbAgFC2NsYWltUmVzdWx0Al8xBQhuZXdMZXZlbAUHbWF0VXNlZAETdXBkYXRlU3RhdHNJbnRlcm5hbAQGbHZsS2V5BXhwS2V5CXBvaW50c0tleQdkZWx0YVhQBAJ4cAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQV4cEtleQAABAVuZXdYUAkAZAIFAnhwBQdkZWx0YVhQBAlsdmxQb2ludHMJAQdsZXZlbFVwAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQZsdmxLZXkAAAUFbmV3WFAJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUGbHZsS2V5CQCRAwIFCWx2bFBvaW50cwAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBQV4cEtleQUFbmV3WFAJAMwIAgkBDEludGVnZXJFbnRyeQIFCXBvaW50c0tleQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJcG9pbnRzS2V5AAAJAJEDAgUJbHZsUG9pbnRzAAEFA25pbAUFbmV3WFABF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgtkdWNrQXNzZXRJZAdkZWx0YVhQBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2R1Y2tBc3NldElkBARhZGRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBEGtleUR1Y2tJZFRvT3duZXIBBQtkdWNrQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDAwMFE0tTX0FMTE9XX1JPQk9fRFVDS1MJAAACCAUFYXNzZXQGaXNzdWVyBQR0aGlzBwkBCGNvbnRhaW5zAggFBWFzc2V0BG5hbWUFC1JPQk9fUFJFRklYBwkBE3VwZGF0ZVN0YXRzSW50ZXJuYWwECQEMa2V5VXNlckxldmVsAQUEYWRkcgkBCWtleVVzZXJYUAEFBGFkZHIJARFrZXlVc2VyRnJlZVBvaW50cwEFBGFkZHIFB2RlbHRhWFAJARN1cGRhdGVTdGF0c0ludGVybmFsBAkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkCQEJa2V5RHVja1hQAQULZHVja0Fzc2V0SWQJARFrZXlEdWNrRnJlZVBvaW50cwEFC2R1Y2tBc3NldElkBQdkZWx0YVhQARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgRhZGRyB2RlbHRhWFAJARN1cGRhdGVTdGF0c0ludGVybmFsBAkBDGtleVVzZXJMZXZlbAEFBGFkZHIJAQlrZXlVc2VyWFABBQRhZGRyCQERa2V5VXNlckZyZWVQb2ludHMBBQRhZGRyBQdkZWx0YVhQARJhY3RpdmF0ZU9uYm9hcmRBcnQBBGFkZHIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQIcmVmQnlLZXkJAQ9rZXlBZGRyZXNzUmVmQnkBBQRhZGRyBAVyZWZCeQkAoggBBQhyZWZCeUtleQMJAQEhAQkBCWlzRGVmaW5lZAEFBXJlZkJ5CQACAQIpWW91IGFyZSBub3QgZWxpZ2libGUgZm9yIE9OQk9BUkQgYXJ0aWZhY3QEBmFydEtleQkBHGtleU9uYm9hcmRBcnREdWNrQWN0aXZhdGVkQnkBBQRhZGRyBAdhcnREdWNrCQCiCAEFBmFydEtleQMJAQlpc0RlZmluZWQBBQdhcnREdWNrCQACAQkArAICAi9Zb3UgYWxyZWFkeSB1c2VkIHlvdXIgT05CT0FSRCBhcnRpZmFjdCBvbiBkdWNrIAkBBXZhbHVlAQUHYXJ0RHVjawQQZHVja0FjdGl2YXRvcktleQkBHGtleU9uYm9hcmRBcnRBY3RpdmF0ZWRPbkR1Y2sBBQtkdWNrQXNzZXRJZAQNZHVja0FjdGl2YXRvcgkAoggBBRBkdWNrQWN0aXZhdG9yS2V5AwkBCWlzRGVmaW5lZAEFDWR1Y2tBY3RpdmF0b3IJAAIBCQCsAgIJAKwCAgkArAICAglUaGUgZHVjayAFC2R1Y2tBc3NldElkAjQgYWxyZWFkeSBnb3QgcG9pbnRzIGZyb20gT05CT0FSRCBhcnRpZmFjdCBmcm9tIHVzZXIgCQEFdmFsdWUBBQ1kdWNrQWN0aXZhdG9yCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUGYXJ0S2V5BQtkdWNrQXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCBRBkdWNrQWN0aXZhdG9yS2V5BQRhZGRyBQNuaWwICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAUJeHBPbmJvYXJkAl8xARJhY3RpdmF0ZVByZXNhbGVBcnQCBGFkZHINbGFuZEFzc2V0SWRJbgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUTY2xhaW1Nb2RlV2hUaGVuRHVjawUNbGFuZEFzc2V0SWRJbgQLbGFuZEFzc2V0SWQIBQFjAl8yBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQNYWN0aXZhdGlvbktleQkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQDCQBmAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ1hY3RpdmF0aW9uS2V5AAAAAAkAAgECJVByZXNhbGUgYXJ0aWZhY3QgaXMgYWxyZWFkeSBhY3RpdmF0ZWQDCQBmAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIIBQFjAl8zBQpyZWNMYW5kTnVtBQ9QUkVTQUxFTlVNTEFORFMJAAIBCQCsAgIJAKwCAgkArAICBQpMQU5EUFJFRklYAgEgBQtsYW5kQXNzZXRJZAIlIGlzIG5vdCBlbGlnaWJsZSBmb3IgcHJlc2FsZSBhcnRpZmFjdAQLY2xhaW1SZXN1bHQJAQhjbGFpbUFsbAQFBGFkZHIFC2xhbmRBc3NldElkBQZwaWVjZXMFE2NsYWltTW9kZVdoVGhlbkR1Y2sJAM0IAgkAzQgCCQDNCAIIBQtjbGFpbVJlc3VsdAJfMQkBDEludGVnZXJFbnRyeQIFDWFjdGl2YXRpb25LZXkFBnBpZWNlcwkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al80CQC5CQIIBQtjbGFpbVJlc3VsdAJfNQIBOgEPY2hlY2tUb3VybmFtZW50AQtkdWNrQXNzZXRJZAQGbGFzdElkCQELdmFsdWVPckVsc2UCCQCaCAIFEnRvdXJuYW1lbnRDb250cmFjdAUNbGFzdFRvdXJJZEtleQAABAtjdXJMb2NhdGlvbgkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAV0RGF0YQkBC2dldFRvdXJEYXRhAgUSdG91cm5hbWVudENvbnRyYWN0BQZsYXN0SWQEBnN0YXRpYwkAkQMCBQV0RGF0YQUJaWR4U3RhdGljBAdkeW5hbWljCQCRAwIFBXREYXRhBQppZHhEeW5hbWljAwkBAiE9AgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBVAcDAwMJAAACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyTG9jYXRpb24FD2xvY0lkeENvbnRpbmVudAUGbGFzdElkCQAAAgkAkQMCBQdkeW5hbWljBQ50RHluYW1pY1N0YXR1cwIKSU5QUk9HUkVTUwcJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGc3RhdGljBQp0U3RhdGljRW5kBQNub3cHCQACAQIqWW91ciBkdWNrIGlzIHRha2luZyBwYXJ0IGluIHRoZSB0b3VybmFtZW50CQEJYXNCb29sZWFuAQkA/AcEBQR0aGlzAhZleGl0VG91cm5hbWVudEludGVybmFsCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwFA25pbAENbWVyZ2VJbnRlcm5hbAYLbmV3TGFuZFNpemUIbmV3TGV2ZWwHZm9ybXVsYQRhZGRyDGxhbmRBc3NldElkcwduZWVkTWF0BAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAh1tZXJnZUludGVybmFsX2NoZWNrVG91cm5hbWVudAoBCmNoZWNrTWVyZ2UCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAljb250aW5lbnQJAJEDAgUBZAUMcmVjQ29udGluZW50AwMJAQIhPQIIBQNhY2MCXzMCAAkBAiE9AggFA2FjYwJfMwUJY29udGluZW50BwkAAgECLkxhbmRzIHNob3VsZCBiZSBvbiB0aGUgc2FtZSBjb250aW5lbnQgdG8gbWVyZ2UECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBAdzaXplc0luCAUDYWNjAl8xBAFpCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALMJAgUHc2l6ZXNJbgUIbGFuZFNpemUCJ1lvdSBoYXZlbid0IHBhc3NlZCBhbGwgdGhlIGxhbmRzIG5lZWRlZAQIc2l6ZXNPdXQJAKwCAgkArwICBQdzaXplc0luBQFpCQCwAgIFB3NpemVzSW4JAGQCBQFpAAEEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBARhcnRzCQBkAggFA2FjYwJfMgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQIcmVxTGV2ZWwEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAAAwMJAAACAgFNBQckbWF0Y2gwAAQDCQAAAgIBTAUHJG1hdGNoMAAFAwkAAAICAlhMBQckbWF0Y2gwAAYJAAIBAhpPbmx5IFMsIE0sIEwsIFhMIGNhbiBtZXJnZQMJAQIhPQIFCmluZnJhTGV2ZWwFCHJlcUxldmVsCQACAQIiQWxsIGxhbmRzIHNob3VsZCBiZSBtYXhlZCB0byBtZXJnZQQHbGFuZE51bQkAkQMCBQFkBQpyZWNMYW5kTnVtBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUDCQBmAgAABQlkZWx0YVRpbWUJAAIBCQCsAgIJAKwCAgkArAICAiZTYXZlZCB0aW1lc3RhbXAgaXMgaW4gZnV0dXJlLCBzYXZlZCA9IAkApAMBBQlzYXZlZFRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUEBWJwUmVzCQEGYWRkUmVzBQkAtQkCCAUDYWNjAl80AgFfBQ10ZXJyYWluQ291bnRzBQlkZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFcHJvcHMJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAgFA2FjYwJfNgUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wEEBmNQcm9wcwkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwECAUDYWNjA18xMAUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wEEC3N1bVRlcnJhaW5zCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQIBQNhY2MCXzkFDXRlcnJhaW5Db3VudHMFCWxhbmRJbmRleAABBAVsYW5kcwgFA2FjYwJfNwQDaWR4CQDPCAIFBWxhbmRzBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEFA2lkeAkAAgEJAKwCAgIgWW91ciBzdGFrZWQgbGFuZHMgZG9uJ3QgY29udGFpbiAFC2xhbmRBc3NldElkBAljdXN0b21LZXkJARprZXlMYW5kQXNzZXRJZFRvQ3VzdG9tTmFtZQEFC2xhbmRBc3NldElkBApjdXN0b21OYW1lCQELdmFsdWVPckVsc2UCCQCiCAEFCWN1c3RvbUtleQIACQCcCgoFCHNpemVzT3V0BQRhcnRzBQljb250aW5lbnQFBWJwUmVzCQDOCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUDYWNjAl81CQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0JAQtEZWxldGVFbnRyeQEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQkBC0RlbGV0ZUVudHJ5AQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBBQljdXN0b21LZXkJAQRCdXJuAgkA2QQBBQtsYW5kQXNzZXRJZAABAwkBAiE9AgUKY3VzdG9tTmFtZQIACQDMCAIJAQtEZWxldGVFbnRyeQEJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUFA25pbAUDbmlsBQVwcm9wcwkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4CQBkAggFA2FjYwJfOAUGcGllY2VzBQtzdW1UZXJyYWlucwUGY1Byb3BzBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQIcHJvcExpc3QJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAIBXwQIbGFuZHNLZXkJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQRhZGRyBAhsYW5kc1N0cgkAoggBBQhsYW5kc0tleQQHbGFuZHNJbgMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsBAVjb250MAkAkQMCCQC1CQIICQEFdmFsdWUBCQDsBwEJANkEAQkAkQMCBQxsYW5kQXNzZXRJZHMAAAtkZXNjcmlwdGlvbgIBXwUMcmVjQ29udGluZW50BAljb250UHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEWa2V5UmVzVHlwZXNCeUNvbnRpbmVudAEFBWNvbnQwAgswXzBfMF8wXzBfMAIBXwQBcgoAAiRsBQxsYW5kQXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCcCgoFB2Zvcm11bGEAAAIACQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwUDbmlsBQhwcm9wTGlzdAUHbGFuZHNJbgAACQC1CQICCzBfMF8wXzBfMF8wAgFfBQljb250UHJvcHMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCmNoZWNrTWVyZ2UCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBAljb250aW5lbnQIBQFyAl8zBAxjb250aW5lbnRJZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAzwgCBQpjb250aW5lbnRzBQljb250aW5lbnQJAKwCAgITVW5rbm93biBjb250aW5lbnQ6IAUJY29udGluZW50BAh0ZXJyYWlucwkBE2dlblRlcnJhaW5zRm9yTWVyZ2UCCAUBcgJfOQkAaQIJAQ9udW1QaWVjZXNCeVNpemUBBQtuZXdMYW5kU2l6ZQUFU1NJWkUEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQKbmV3TGFuZE51bQkApAMBBQdmcmVlTnVtBAVpc3N1ZQkAwggFCQEHbmZ0TmFtZQIFCm5ld0xhbmROdW0FC25ld0xhbmRTaXplCQC5CQIJAMwIAgUKbmV3TGFuZE51bQkAzAgCBQtuZXdMYW5kU2l6ZQkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBA5uZXdMYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwkAZgIFB25lZWRNYXQAAAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwUHbmVlZE1hdAIBXwQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAkAlAoCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUBcgJfNQMJAGYCCQCQAwEIBQFyAl83AAAJAQtTdHJpbmdFbnRyeQIFCGxhbmRzS2V5CQC7CQIIBQFyAl83AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQMJAGYCCAUBcgJfOAUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMIBQFyAl84CQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEFBWlzc3VlCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFCm5ld0xhbmROdW0FDm5ld0xhbmRBc3NldElkCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUObmV3TGFuZEFzc2V0SWQFBGFkZHIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFCm5ld0xhbmROdW0FBGFkZHIJAQxJbnRlZ2VyRW50cnkCCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQ5uZXdMYW5kQXNzZXRJZAgFAXICXzIJAQxJbnRlZ2VyRW50cnkCCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFDm5ld0xhbmRBc3NldElkBQhuZXdMZXZlbAkBDEludGVnZXJFbnRyeQIJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQ5uZXdMYW5kQXNzZXRJZAUEYWRkcgUIbmV3TGV2ZWwJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCAUBcgJfNAkAzAgCBQZuZXdNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToJAQtTdHJpbmdFbnRyeQIJARFrZXlSZXNQcm9wb3J0aW9ucwAJALkJAggFAXICXzYCAV8JAQtTdHJpbmdFbnRyeQIJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQUJY29udGluZW50CQC5CQIIBQFyA18xMAIBXwkBC1N0cmluZ0VudHJ5AgkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkCQC5CQIJAMwIAgUJY29udGluZW50CQDMCAICAUwJAMwIAgUObmV3TGFuZEFzc2V0SWQFA25pbAIBXwkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUEYWRkcgABBQdhc3NldElkBQ5uZXdMYW5kQXNzZXRJZAEDczJtAgRhZGRyDGxhbmRBc3NldElkcwkBDW1lcmdlSW50ZXJuYWwGAgFNAAMCBFNTU1MFBGFkZHIFDGxhbmRBc3NldElkcwAAAQNtMmwCBGFkZHIMbGFuZEFzc2V0SWRzCQENbWVyZ2VJbnRlcm5hbAYCAUwABAIDU01NBQRhZGRyBQxsYW5kQXNzZXRJZHMJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwAEAQRsMnhsAgRhZGRyDGxhbmRBc3NldElkcwkBDW1lcmdlSW50ZXJuYWwGAgJYTAAFAgVTU1NNTAUEYWRkcgUMbGFuZEFzc2V0SWRzCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMALwEGeGwyeHhsAgRhZGRyDGxhbmRBc3NldElkcwkBDW1lcmdlSW50ZXJuYWwGAgNYWEwABgIDTFhMBQRhZGRyBQxsYW5kQXNzZXRJZHMJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwA2AQttZXJnZUNvbW1vbgIEYWRkcgxsYW5kQXNzZXRJZHMEByRtYXRjaDAJAJADAQUMbGFuZEFzc2V0SWRzAwkAAAIABAUHJG1hdGNoMAkBA3MybQIFBGFkZHIFDGxhbmRBc3NldElkcwMJAAACAAMFByRtYXRjaDAJAQNtMmwCBQRhZGRyBQxsYW5kQXNzZXRJZHMDCQAAAgAFBQckbWF0Y2gwCQEEbDJ4bAIFBGFkZHIFDGxhbmRBc3NldElkcwMJAAACAAIFByRtYXRjaDAJAQZ4bDJ4eGwCBQRhZGRyBQxsYW5kQXNzZXRJZHMJAAIBAg1Vbmtub3duIG1lcmdlAQZwcm9sb2cBAWkDAwkBAiE9AggFAWkMb3JpZ2luQ2FsbGVyBQxyZXN0Q29udHJhY3QJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBCmtleUJsb2NrZWQABwcJAAIBAh9Db250cmFjdHMgYXJlIHVuZGVyIG1haW50ZW5hbmNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYXN0VHhJZEJ5VXNlcgEJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQFA25pbCsBaQENY29uc3RydWN0b3JWMQEIcmVzdEFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBC3NhdmVJbnRlZ2VyAgNrZXkGYW1vdW50AwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIgc2F2ZUludGVnZXIgaXMgbm90IHB1YmxpYyBtZXRob2QJAMwIAgkBDEludGVnZXJFbnRyeQIFA2tleQUGYW1vdW50BQNuaWwBaQEKc2V0QmxvY2tlZAEJaXNCbG9ja2VkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQprZXlCbG9ja2VkAAUJaXNCbG9ja2VkBQNuaWwBaQEJc3Rha2VMYW5kAAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKTEFORFBSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUEdGhpcwkAAgECF1Vua25vd24gaXNzdWVyIG9mIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKTEFORFBSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkxBTkRQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAtsYW5kTnVtU2l6ZQkAsAICCAUFYXNzZXQEbmFtZQAEBAdsYW5kTnVtAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCA1hYTAkAswICBQtsYW5kTnVtU2l6ZQADAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCAlhMCQCzAgIFC2xhbmROdW1TaXplAAIJALMCAgULbGFuZE51bVNpemUAAQMJAQEhAQkBCWlzRGVmaW5lZAEJALYJAQUHbGFuZE51bQkAAgEJAKwCAgIeQ2Fubm90IHBhcnNlIGxhbmQgbnVtYmVyIGZyb20gCAUFYXNzZXQEbmFtZQQLbGFuZEFzc2V0SWQJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8EDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCBQFkBQtyZWNUZXJyYWlucwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQJbGFuZEluZGV4CQBpAgUGcGllY2VzBQVTU0laRQQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMFCWxhbmRJbmRleAABBAxyZXNCeUNvbnRLZXkJARZrZXlSZXNUeXBlc0J5Q29udGluZW50AQkAkQMCBQFkBQxyZWNDb250aW5lbnQECWNvbnRQcm9wcwkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEFDHJlc0J5Q29udEtleQILMF8wXzBfMF8wXzACAV8EEHVwZGF0ZWRDb250UHJvcHMJALkJAgkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwEBQljb250UHJvcHMFDXRlcnJhaW5Db3VudHMFCWxhbmRJbmRleAABAgFfBAhsYW5kc0tleQkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFB2FkZHJlc3MECGxhbmRzU3RyCQCiCAEFCGxhbmRzS2V5BAVsYW5kcwMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBWxhbmRzBQtsYW5kQXNzZXRJZAkAAgEJAKwCAgIiWW91ciBzdGFrZWQgbGFuZHMgYWxyZWFkeSBjb250YWluIAULbGFuZEFzc2V0SWQDCQBnAgkAkAMBBQVsYW5kcwUYTUFYX0xBTkRTX1NUQUtFRF9CWV9VU0VSCQACAQkArAICCQCsAgICGVlvdXIgYWxyZWFkeSBzdGFrZWQgbWF4ICgJAKQDAQUYTUFYX0xBTkRTX1NUQUtFRF9CWV9VU0VSAgcpIGxhbmRzBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFB2FkZHJlc3MECW9sZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAQJd2xnUmVzdWx0CQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwJAJQKAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkAzQgCBQVsYW5kcwULbGFuZEFzc2V0SWQCAV8JAMwIAgkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQkAZAIFCW9sZFBpZWNlcwUGcGllY2VzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQdhZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgULbGFuZEFzc2V0SWQFB2FkZHJlc3MFCmluZnJhTGV2ZWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMJAMwIAgkBC1N0cmluZ0VudHJ5AgUMcmVzQnlDb250S2V5BRB1cGRhdGVkQ29udFByb3BzBQNuaWwFDXByb2xvZ0FjdGlvbnMFCXdsZ1Jlc3VsdAFpAQt1bnN0YWtlTGFuZAENbGFuZEFzc2V0SWRJbgQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQZjYWxsZXIEAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFDWNsYWltTW9kZUR1Y2sFDWxhbmRBc3NldElkSW4EC2xhbmRBc3NldElkCAUBYwJfMgQBZAgFAWMCXzMECGxhbmRzS2V5CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUEYWRkcgQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIFAWQFC3JlY1RlcnJhaW5zBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBAlsYW5kSW5kZXgJAGkCBQZwaWVjZXMFBVNTSVpFBAVwcm9wcwkBEXVwZGF0ZVByb3BvcnRpb25zAwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wEEDHJlc0J5Q29udEtleQkBFmtleVJlc1R5cGVzQnlDb250aW5lbnQBCQCRAwIFAWQFDHJlY0NvbnRpbmVudAQJY29udFByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUMcmVzQnlDb250S2V5AgswXzBfMF8wXzBfMAIBXwQQdXBkYXRlZENvbnRQcm9wcwkAuQkCCQEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQFCWNvbnRQcm9wcwUNdGVycmFpbkNvdW50cwUJbGFuZEluZGV4AP///////////wECAV8EC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyBQtsYW5kQXNzZXRJZAUGcGllY2VzBQ1jbGFpbU1vZGVEdWNrBAVsYW5kcwkAvQkCCQELdmFsdWVPckVsc2UCCQCiCAEFCGxhbmRzS2V5AgACAV8EA2lkeAkAzwgCBQVsYW5kcwULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQNpZHgJAAIBCQCsAgICIFlvdXIgc3Rha2VkIGxhbmRzIGRvbid0IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQOZ292UmVsZWFzZVRpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgULZ292Q29udHJhY3QJARVrZXlVc2VyR3dsUmVsZWFzZVRpbWUBBQRhZGRyAAADCQBnAgUOZ292UmVsZWFzZVRpbWUFA25vdwkAAgEJAKwCAgI5WW91ciBnV0wgYXJlIHRha2luZyBwYXJ0IGluIHZvdGluZywgY2Fubm90IHVuc3Rha2UgdW50aWwgCQCkAwEFDmdvdlJlbGVhc2VUaW1lBA5hcmJSZWxlYXNlVGltZQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgULd2xnQ29udHJhY3QJARRrZXlMYXN0QXJiVGltZUJ5VXNlcgEFBGFkZHIAAAUOYXJiaXRyYWdlRGVsYXkDCQBmAgUOYXJiUmVsZWFzZVRpbWUFA25vdwkAAgEJAKwCAgI/WW91ciBzdGFrZWQgbGFuZHMgdG9vayBwYXJ0IGluIGFyYml0cmFnZSwgY2Fubm90IHVuc3Rha2UgdW50aWwgCQCkAwEFDmFyYlJlbGVhc2VUaW1lBAlwaWVjZXNLZXkJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUEYWRkcgQMc3Rha2VkUGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEFCXBpZWNlc0tleQAABAluZXdQaWVjZXMDCQBmAgUGcGllY2VzBQxzdGFrZWRQaWVjZXMAAAkAZQIFDHN0YWtlZFBpZWNlcwUGcGllY2VzBAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQRhZGRyBQNuaWwFA25pbAkAlAoCCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJANkEAQULbGFuZEFzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQRhZGRyCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlSZXNQcm9wb3J0aW9ucwAFBXByb3BzCQDMCAIJAQtTdHJpbmdFbnRyeQIFDHJlc0J5Q29udEtleQUQdXBkYXRlZENvbnRQcm9wcwkAzAgCCQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzIJALkJAggFC2NsYWltUmVzdWx0Al8zAgE6CQDMCAIDCQBmAgkAkAMBBQVsYW5kcwABCQELU3RyaW5nRW50cnkCBQhsYW5kc0tleQkAuwkCCQDRCAIFBWxhbmRzCQEFdmFsdWUBBQNpZHgCAV8JAQtEZWxldGVFbnRyeQEFCGxhbmRzS2V5CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlwaWVjZXNLZXkFCW5ld1BpZWNlcwUDbmlsBQ1wcm9sb2dBY3Rpb25zBQl3bGdSZXN1bHQBaQEJc3Rha2VEdWNrAAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKRFVDS1BSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkBAZpc1JvYm8DAwUTS1NfQUxMT1dfUk9CT19EVUNLUwkAAAIIBQVhc3NldAZpc3N1ZXIFBHRoaXMHCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQULUk9CT19QUkVGSVgHAwMDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQ1pbmN1YmF0b3JBZGRyCQECIT0CCAUFYXNzZXQGaXNzdWVyBQticmVlZGVyQWRkcgcJAQEhAQUGaXNSb2JvBwkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgISVW5rbm93biBpc3N1ZXIgb2YgBQpEVUNLUFJFRklYAgQgb3IgBQtST0JPX1BSRUZJWAIGIHRva2VuAwMJAQEhAQkBCGNvbnRhaW5zAggFBWFzc2V0BG5hbWUFCkRVQ0tQUkVGSVgJAQEhAQUGaXNSb2JvBwkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIJT25seSBORlQgBQpEVUNLUFJFRklYAgQgb3IgBQtST0JPX1BSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQECmFzc2V0SWRTdHIJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQphc3NldElkU3RyAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkAwkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgIdWW91IGFscmVhZHkgc3Rha2VkIG9uZSBkdWNrOiAIBQVhc3NldARuYW1lBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyBAhsb2NhdGlvbgkAoggBBQZsb2NLZXkEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQphc3NldElkU3RyBAhiYWNrcGFjawkAoggBBQVicEtleQQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFCmFzc2V0SWRTdHIEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQUKYXNzZXRJZFN0cgAABAljdXJIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQphc3NldElkU3RyBQNuaWwDCQEJaXNEZWZpbmVkAQUIbG9jYXRpb24FA25pbAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBQNuaWwDCQEJaXNEZWZpbmVkAQUIYmFja3BhY2sFA25pbAkAzggCCQDNCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6BQNuaWwJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFCWN1ckhlYWx0aAUNcHJvbG9nQWN0aW9ucwFpAQt1bnN0YWtlRHVjawEKYXNzZXRJZFN0cgQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHYXNzZXRJZAkA2QQBBQphc3NldElkU3RyBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQphc3NldElkU3RyAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAMJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgkArAICAglUaGUgZHVjayAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEFCmFzc2V0SWRTdHIJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFB2FkZHJlc3MJAAIBAhdTdGFrZWQgTkZUIGlzIG5vdCB5b3VycwMJAQ9jaGVja1RvdXJuYW1lbnQBBQphc3NldElkU3RyCQACAQIbdW5zdGFrZUR1Y2tfY2hlY2tUb3VybmFtZW50BAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQUKYXNzZXRJZFN0cgQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQphc3NldElkU3RyAAAEBmhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQAwkAZgIFBW1heEhQBQZoZWFsdGgJAAIBCQCsAgIJAKwCAgIZUGxlYXNlIGhlYWwgeW91ciBkdWNrIHRvIAkApAMBBQVtYXhIUAITaHAgYmVmb3JlIHVuc3Rha2luZwkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEFB3RpbWVLZXkJAMwIAgkBC0RlbGV0ZUVudHJ5AQUJa2V5SGVhbHRoCQDMCAIJAQtEZWxldGVFbnRyeQEJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgkAzAgCCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkRVQ0tQUkVGSVgFCmFzc2V0SWRTdHIFB2FkZHJlc3MJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwUDbmlsBQ1wcm9sb2dBY3Rpb25zAWkBCGNsYWltUmVzAgZhbW91bnQObGFuZEFzc2V0SWRTdHIEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAZyZXN1bHQJARBjbGFpbVJlc0ludGVybmFsBAUEYWRkcgUGYW1vdW50BQ1jbGFpbU1vZGVEdWNrBQ5sYW5kQXNzZXRJZFN0cgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkCQCUCgIJAM4IAgkAzQgCCQDNCAIJAM4IAggFBnJlc3VsdAJfMQgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkCQBrAwUHeHBDbGFpbQUGYW1vdW50BQVNVUxUOAJfMQkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfMgkAuQkCCAUGcmVzdWx0Al8zAgE6CQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al80CQC5CQIIBQZyZXN1bHQCXzUCAToFDXByb2xvZ0FjdGlvbnMJAJEDAggFBnJlc3VsdAJfMwUIYnBJZHhSZXMBaQEMY2xhaW1SZXNUb1dIAgZhbW91bnQObGFuZEFzc2V0SWRTdHIEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAZyZXN1bHQJARBjbGFpbVJlc0ludGVybmFsBAUEYWRkcgUGYW1vdW50BQtjbGFpbU1vZGVXaAUObGFuZEFzc2V0SWRTdHIJAJQKAgkAzggCCQDNCAIJAM0IAgkAzggCCAUGcmVzdWx0Al8xCAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBQRhZGRyCQBrAwUHeHBDbGFpbQUGYW1vdW50BQVNVUxUOAJfMQkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfMgkAuQkCCAUGcmVzdWx0Al8zAgE6CQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al80CQC5CQIIBQZyZXN1bHQCXzUCAToFDXByb2xvZ0FjdGlvbnMJAJEDAggFBnJlc3VsdAJfNQUId2hJZHhSZXMBaQEGZmxpZ2h0AgdtZXNzYWdlA3NpZwQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQIdXNlckFkZHIJAKUIAQgFAWkGY2FsbGVyBAFmCQEMZmxpZ2h0Q29tbW9uAwUIdXNlckFkZHIFB21lc3NhZ2UFA3NpZwQFbmV3SFAIBQFmAl8xBAtkdWNrQXNzZXRJZAgFAWYCXzIEBmxvY0tleQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBBQZsb2NLZXkFD0RFRkFVTFRMT0NBVElPTgQLbmV3TG9jYXRpb24IBQFmAl80AwkAAAIFC25ld0xvY2F0aW9uBQtjdXJMb2NhdGlvbgkAAgECIllvdSBjYW4ndCBmbHkgdG8gdGhlIHNhbWUgbG9jYXRpb24EBm5ld0xvYwkAtQkCBQtuZXdMb2NhdGlvbgIBXwQGaXNUb3VyCQAAAgkAkQMCBQZuZXdMb2MFCmxvY0lkeFR5cGUCAVQEB2lzRGVsaXYJAAACCQCRAwIFBm5ld0xvYwUKbG9jSWR4VHlwZQIBRAQFZXFLZXkJARBrZXlEdWNrRXF1aXBtZW50AQULZHVja0Fzc2V0SWQECWN1cnJlbnRFcQkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywEDSR0MDY2MDM1NjYxMzIJARFzdWJ0cmFjdEVxdWlwbWVudAIFCWN1cnJlbnRFcQgFAWYCXzUEBW5ld0VxCAUNJHQwNjYwMzU2NjEzMgJfMQQPc2hvdWxkWmVyb0J1ZmZzCAUNJHQwNjYwMzU2NjEzMgJfMgQNJHQwNjYxMzU2Nzk2NwMJAQEhAQkBCW9uTWlzc2lvbgIFEnRvdXJuYW1lbnRDb250cmFjdAULY3VyTG9jYXRpb24DBQZpc1RvdXIJAQxjaGVhdEF0dGVtcHQDBQtjdXJMb2NhdGlvbgULbmV3TG9jYXRpb24ABQMJAQEhAQUHaXNEZWxpdgMJAGYCBQVuZXdIUAAACQCUCgIFC25ld0xvY2F0aW9uBQVuZXdIUAkAlAoCBQtjdXJMb2NhdGlvbgAAAwkAZgIFBW5ld0hQAAAEAXMJAPwHBAUEdGhpcwIPcHJvY2Vzc0RlbGl2ZXJ5CQDMCAIFC2R1Y2tBc3NldElkBQNuaWwFA25pbAMJAAACBQFzBQFzCQCUCgIFC2N1ckxvY2F0aW9uBQVuZXdIUAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlAoCBQtjdXJMb2NhdGlvbgAAAwkBDmlzSW5Ub3VybmFtZW50AgUSdG91cm5hbWVudENvbnRyYWN0BQtjdXJMb2NhdGlvbgMJAQEhAQkBDmlzSW5Ub3VybmFtZW50AgUSdG91cm5hbWVudENvbnRyYWN0BQtuZXdMb2NhdGlvbgkAAgECKllvdXIgZHVjayBpcyB0YWtpbmcgcGFydCBpbiB0aGUgdG91cm5hbWVudAQFc2NvcmUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZuZXdMb2MFCGxvY0lkeElkBAZjdXJMb2MJALUJAgULY3VyTG9jYXRpb24CAV8EBmxhc3RJZAkBC3ZhbHVlT3JFbHNlAgkAmggCBRJ0b3VybmFtZW50Q29udHJhY3QFDWxhc3RUb3VySWRLZXkAAAMJAQIhPQIFBXNjb3JlCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBmN1ckxvYwUIbG9jSWR4SWQAAQkBDGNoZWF0QXR0ZW1wdAMFC2N1ckxvY2F0aW9uBQtuZXdMb2NhdGlvbgAHAwkAZgIFBW5ld0hQAAAECWxvY2FsQmVzdAkBC3ZhbHVlT3JFbHNlAgkAmggCBRJ0b3VybmFtZW50Q29udHJhY3QJARprZXlCZXN0UmVzdWx0QnlUb3VyQW5kRHVjawIFBmxhc3RJZAULZHVja0Fzc2V0SWQAAAQIdXBkTG9jYWwDCQBmAgUFc2NvcmUFCWxvY2FsQmVzdAkA/AcEBRJ0b3VybmFtZW50Q29udHJhY3QCDnNhdmVEdWNrUmVzdWx0CQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFBXNjb3JlBQNuaWwFA25pbAUEdW5pdAMJAAACBQh1cGRMb2NhbAUIdXBkTG9jYWwJAJQKAgULbmV3TG9jYXRpb24FBW5ld0hQCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQCUCgIFC2N1ckxvY2F0aW9uAAAJAAIBCQCsAgICFFVua25vd24gY3VyTG9jYXRpb246BQtjdXJMb2NhdGlvbgQJbG9jVG9TYXZlCAUNJHQwNjYxMzU2Nzk2NwJfMQQIaHBUb1NhdmUIBQ0kdDA2NjEzNTY3OTY3Al8yCQCUCgIJAM4IAgkAzggCCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUGbG9jS2V5BQlsb2NUb1NhdmUJAMwIAgkBC1N0cmluZ0VudHJ5AgUFZXFLZXkFBW5ld0VxCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBQhocFRvU2F2ZQUDbmlsBQ1wcm9sb2dBY3Rpb25zAwUPc2hvdWxkWmVyb0J1ZmZzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQxrZXlEdWNrQnVmZnMBBQtkdWNrQXNzZXRJZAIJMF8wXzBfMF8wBQNuaWwFA25pbAgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkAwkAZgIFBW5ld0hQAAAFD3hwU3VjY2Vzc0ZsaWdodAUMeHBGYWlsRmxpZ2h0Al8xCAUBZgJfMwFpAQRoZWFsAwpxdWFudGl0eUwxCnF1YW50aXR5TDIKcXVhbnRpdHlMMwQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDAwMJAGYCAAAFCnF1YW50aXR5TDEGCQBmAgAABQpxdWFudGl0eUwyBgkAZgIAAAUKcXVhbnRpdHlMMwkAAgECG1F1YW50aXR5IGNhbm5vdCBiZSBuZWdhdGl2ZQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECFGhlYWxfY2hlY2tUb3VybmFtZW50BANxdHMJAMwIAgUKcXVhbnRpdHlMMQkAzAgCBQpxdWFudGl0eUwyCQDMCAIFCnF1YW50aXR5TDMFA25pbAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVtYXhIUAkBCW1heEhlYWx0aAEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGtleUR1Y2tMZXZlbAEFC2R1Y2tBc3NldElkAAAECW9sZEhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQAwkAZwIFCW9sZEhlYWx0aAUFbWF4SFAJAAIBCQCsAgIJAKwCAgIPSFAgc2hvdWxkIGJlIDwgCQCkAwEFBW1heEhQAgggdG8gaGVhbAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkECHByb2RMaXN0AwkAAAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIABQNuaWwJALwJAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgFfCgELaXRlcmF0ZVByb2QCA2FjYwZyZWNpcGUEAW4IBQNhY2MCXzIEAXgDCQBmAgkAkAMBBQhwcm9kTGlzdAUBbgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0BQFuAAADCQBmAgADBQFuBAFxCQCRAwIFA3F0cwUBbgMJAGYCBQFxBQF4CQACAQkArAICCQCsAgIJAKwCAgIOWW91IGhhdmUgb25seSAJAKQDAQUBeAIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFAW4JAJUKAwkAzQgCCAUDYWNjAl8xCQCkAwEJAGUCBQF4BQFxCQBkAgUBbgABCQBkAggFA2FjYwJfMwkAaAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCCQC1CQIFBnJlY2lwZQIBXwUKcklkeEVmZmVjdAUBcQkAlQoDCQDNCAIIBQNhY2MCXzEJAKQDAQUBeAkAZAIFAW4AAQgFA2FjYwJfMwQGcmVzdWx0CgACJGwFEHByb2R1Y3Rpb25NYXRyaXgKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCVCgMFA25pbAAAAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBC2l0ZXJhdGVQcm9kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIECW5ld0hlYWx0aAkAlwMBCQDMCAIFBW1heEhQCQDMCAIJAGQCBQlvbGRIZWFsdGgIBQZyZXN1bHQCXzMFA25pbAkAlAoCCQDOCAIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQluZXdIZWFsdGgJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIJALkJAggFBnJlc3VsdAJfMQIBXwUDbmlsAgE6BQNuaWwFDXByb2xvZ0FjdGlvbnMICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAkAaAIFBnhwSGVhbAkAZAIJAGQCBQpxdWFudGl0eUwxBQpxdWFudGl0eUwyBQpxdWFudGl0eUwzAl8xBQluZXdIZWFsdGgBaQEGaGVhbEVTAAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECFmhlYWxFU19jaGVja1RvdXJuYW1lbnQECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAMJAGYCBQlvbGRIZWFsdGgAAAkAAgECKEhQIHNob3VsZCBiZSAwIHRvIGNhbGwgRW1lcmdlbmN5IFNlcnZpY2UEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAhwcm9kTGlzdAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwQNbWVkS2l0QW1vdW50MQMJAGYCCQCQAwEFCHByb2RMaXN0AAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAAAAAAEDW1lZEtpdEFtb3VudDIDCQBmAgkAkAMBBQhwcm9kTGlzdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QAAQAABA1tZWRLaXRBbW91bnQzAwkAZgIJAJADAQUIcHJvZExpc3QAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0AAIAAAMDAwkAZgIFDW1lZEtpdEFtb3VudDEAAAYJAGYCBQ1tZWRLaXRBbW91bnQyAAAGCQBmAgUNbWVkS2l0QW1vdW50MwAACQACAQIfWW91IGhhdmUgdG8gdXNlIG93biBNZWRpY2FsIEtpdAQIZXhpc3RTdHIJAJ0IAgUPZWNvbm9teUNvbnRyYWN0CQEOa2V5RXNXYXJlaG91c2UABAxleGlzdEFtb3VudHMDCQEJaXNEZWZpbmVkAQUIZXhpc3RTdHIJALwJAgkBBXZhbHVlAQUIZXhpc3RTdHICAV8FA25pbAQLZXhpc3RBbW91bnQDCQBmAgkAkAMBBQxleGlzdEFtb3VudHMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDGV4aXN0QW1vdW50cwAAAAADCQBnAgAABQtleGlzdEFtb3VudAkAAgECOVRoZXJlIGFyZSBubyBNZWRpY2FsIEtpdHMgTDEgYXQgRW1lcmdlbmN5IFNlcnZpY2Ugc3RvcmFnZQQJbmV3SGVhbHRoCQBkAgUJb2xkSGVhbHRoCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgAAAIBXwUKcklkeEVmZmVjdAQFbmV3RVMJALkJAgkAzAgCCQCkAwEJAGUCBQtleGlzdEFtb3VudAABCQDRCAIFDGV4aXN0QW1vdW50cwAAAgFfBAZyZWNpcGUJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4AAACAV8ECHRvdGFsTWF0CQESZ2V0UmVjaXBlTWF0ZXJpYWxzAQUGcmVjaXBlBAlzZWxsUHJpY2UJAGsDCQBoAgUIdG90YWxNYXQFCkVTU0VMTENPRUYFEFJFU09VUkNFUFJJQ0VNSU4JAGgCBQVNVUxUOAUOUFJPRFVDVFBLR1NJWkUDCQECIT0CCAUDcG10BmFtb3VudAUJc2VsbFByaWNlCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUJc2VsbFByaWNlBAZyZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPZWNvbm9teUNvbnRyYWN0Ag91cGRhdGVFc1N0b3JhZ2UJAMwIAgUFbmV3RVMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgULdXNkdEFzc2V0SWQFCXNlbGxQcmljZQUDbmlsCQCUCgIJAM4IAgkAzQgCBQ1wcm9sb2dBY3Rpb25zCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQluZXdIZWFsdGgICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAUIeHBDYWxsRVMCXzEFBnJlc3VsdAFpAQ51cGRhdGVCYWNrcGFjawILZHVja0Fzc2V0SWQHbmV3UGFjawMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAUHbmV3UGFjawUDbmlsBQduZXdQYWNrAWkBD2NvbW1pdEZvclJhbmRvbQAEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpBAtmaW5pc2hCbG9jawkAZAIFBmhlaWdodAULcmFuZG9tRGVsYXkEBGFkZHIJAKUIAQgFAWkGY2FsbGVyCQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBCWtleUNvbW1pdAEFBGFkZHIFC2ZpbmlzaEJsb2NrBQNuaWwFDXByb2xvZ0FjdGlvbnMFC2ZpbmlzaEJsb2NrAWkBDHJldmVhbFJhbmRvbQEIbWF4VmFsdWUEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpBARhZGRyCQClCAEIBQFpBmNhbGxlcgQJZmluaXNoS2V5CQEJa2V5Q29tbWl0AQUEYWRkcgQLZmluaXNoQmxvY2sJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnwgBBQlmaW5pc2hLZXkCJFlvdSBoYXZlIHRvIGNvbW1pdEZvclJhbmRvbSgpIGZpcnN0IQMJAGYCBQtmaW5pc2hCbG9jawUGaGVpZ2h0CQACAQkArAICAjRSYW5kb20gbnVtYmVyIGlzIG5vdCByZWFkeSB5ZXQsIHdhaXQgdW50aWwgaGVpZ2h0ID0gCQCkAwEFC2ZpbmlzaEJsb2NrBAdlbnRyb3B5CQEFdmFsdWUBCAkBBXZhbHVlAQkA7QcBBQtmaW5pc2hCbG9jawN2cmYEBHNhbHQJAJsDAQkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5TGFzdFR4SWRCeVVzZXIBBQRhZGRyAgAEBHJhbmQJAQ9nZXRSYW5kb21OdW1iZXIDBQhtYXhWYWx1ZQUEc2FsdAUHZW50cm9weQkAlAoCCQDOCAIJAMwIAgkBC0RlbGV0ZUVudHJ5AQUJZmluaXNoS2V5BQNuaWwFDXByb2xvZ0FjdGlvbnMFBHJhbmQBaQEIYnV5U0xhbmQABA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAAwkBAiE9AggFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECGkFsbG93ZWQgVVNEVCBwYXltZW50IG9ubHkhAwkBAiE9AggFA3BtdAZhbW91bnQFB0VYUFVTRFQJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQdFWFBVU0RUBAZyZXN1bHQJARJleHBlZGl0aW9uSW50ZXJuYWwCCAUBaQZjYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQEC2FjcmVzUmVzdWx0CQEFYXNJbnQBCQD8BwQFDWFjcmVzQ29udHJhY3QCCWJ1cm5BY3JlcwkAzAgCBQxTX0NPU1RfQUNSRVMFA25pbAUDbmlsCQCUCgIJAM4IAgkAzggCCQDNCAIIBQZyZXN1bHQCXzEJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAgFA3BtdAZhbW91bnQFC3VzZHRBc3NldElkCAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCCQClCAEIBQFpBmNhbGxlcgUKeHBOZXdTTGFuZAJfMQUNcHJvbG9nQWN0aW9ucwkAlAoCCAgFBnJlc3VsdAJfMgJfMQULYWNyZXNSZXN1bHQBaQEKZXhwZWRpdGlvbgIHbWVzc2FnZQNzaWcEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQECHVzZXJBZGRyCQClCAEIBQFpBmNhbGxlcgQBZgkBDGZsaWdodENvbW1vbgMFCHVzZXJBZGRyBQdtZXNzYWdlBQNzaWcEC2R1Y2tBc3NldElkCAUBZgJfMgQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQFbUxpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8EBm5ld01hdAkAuQkCCQERc3VidHJhY3RNYXRlcmlhbHMDBgUFbUxpc3QFDEVYUE1BVEVSSUFMUwIBXwQFZXFLZXkJARBrZXlEdWNrRXF1aXBtZW50AQULZHVja0Fzc2V0SWQECWN1cnJlbnRFcQkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywEDSR0MDc1ODg3NzU5ODQJARFzdWJ0cmFjdEVxdWlwbWVudAIFCWN1cnJlbnRFcQgFAWYCXzUEBW5ld0VxCAUNJHQwNzU4ODc3NTk4NAJfMQQPc2hvdWxkWmVyb0J1ZmZzCAUNJHQwNzU4ODc3NTk4NAJfMgQBZQkBEmV4cGVkaXRpb25JbnRlcm5hbAIIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAQCaWQICAUBZQJfMgJfMQQGcmVzdWx0AwkAZwIAAAgFAWYCXzEJAJUKAwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoAAAJAMwIAgkBC1N0cmluZ0VudHJ5AgUFZXFLZXkFBW5ld0VxBQNuaWwCAAAACQCVCgMJAM4IAggFAWUCXzEDBQ9zaG91bGRaZXJvQnVmZnMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDGtleUR1Y2tCdWZmcwEFC2R1Y2tBc3NldElkAgkwXzBfMF8wXzAFA25pbAkAzQgCCQDNCAIJAM0IAgkAzQgCBQNuaWwJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIICAUBZQJfMgJfMgkAzAgCAgFMCQDMCAIFAmlkBQNuaWwCAV8JAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgIBQFmAl8xCQELU3RyaW5nRW50cnkCBQVlcUtleQUFbmV3RXEJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCBQZuZXdNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToFAmlkCAUBZgJfMwMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECGmV4cGVkaXRpb25fY2hlY2tUb3VybmFtZW50BAthY3Jlc1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ1hY3Jlc0NvbnRyYWN0AglidXJuQWNyZXMJAMwIAgUMU19DT1NUX0FDUkVTBQNuaWwFA25pbAkAlAoCCQDOCAIJAM4IAggFBnJlc3VsdAJfMQgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkBQp4cE5ld1NMYW5kAl8xBQ1wcm9sb2dBY3Rpb25zCQCVCgMIBQZyZXN1bHQCXzIIBQZyZXN1bHQCXzMFC2FjcmVzUmVzdWx0AWkBEGJ1eVNMYW5kRm9yQWNyZXMABA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEDCQECIT0CBQNhbXQFDFNfQ09TVF9BQ1JFUwkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFDFNfQ09TVF9BQ1JFUwQGcmVzdWx0CQESZXhwZWRpdGlvbkludGVybmFsAggFAWkGY2FsbGVyCAUBaQ10cmFuc2FjdGlvbklkBAthY3Jlc1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ1hY3Jlc0NvbnRyYWN0AglidXJuQWNyZXMJAMwIAgUMU19DT1NUX0FDUkVTBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFDGFjcmVzQXNzZXRJZAUDYW10BQNuaWwJAJQKAgkAzggCCQDOCAIIBQZyZXN1bHQCXzEICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQp4cE5ld1NMYW5kAl8xBQ1wcm9sb2dBY3Rpb25zCQCUCgIICAUGcmVzdWx0Al8yAl8xBQthY3Jlc1Jlc3VsdAFpAQx1cGdyYWRlSW5mcmEBC2xhbmRBc3NldElkBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAZyZXN1bHQJAQ11cEluZnJhQ29tbW9uBAYIBQFpBmNhbGxlcgAABQtsYW5kQXNzZXRJZAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAkAlAoCCQDOCAIJAM4IAggFBnJlc3VsdAJfMQUNcHJvbG9nQWN0aW9ucwgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkCQBrAwUOeHBVcGdyYWRlSW5mcmEIBQZyZXN1bHQCXzMFBU1VTFQ4Al8xCAUGcmVzdWx0Al8yAWkBEGFjdGl2YXRlQXJ0aWZhY3QCB2FydE5hbWUObGFuZEFzc2V0SWRPcHQEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAZyZXN1bHQEByRtYXRjaDAFB2FydE5hbWUDCQAAAgIHUFJFU0FMRQUHJG1hdGNoMAkBEmFjdGl2YXRlUHJlc2FsZUFydAIFBGFkZHIFDmxhbmRBc3NldElkT3B0AwkAAAICB09OQk9BUkQFByRtYXRjaDAJARJhY3RpdmF0ZU9uYm9hcmRBcnQBBQRhZGRyCQACAQIQVW5rbm93biBhcnRpZmFjdAkAzggCBQZyZXN1bHQFDXByb2xvZ0FjdGlvbnMBaQEKbWVyZ2VMYW5kcwEMbGFuZEFzc2V0SWRzBA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAZyZXN1bHQJAQttZXJnZUNvbW1vbgIJAKUIAQgFAWkGY2FsbGVyBQxsYW5kQXNzZXRJZHMJAJQKAgkAzggCCQDOCAIIBQZyZXN1bHQCXzEFDXByb2xvZ0FjdGlvbnMICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQd4cE1lcmdlAl8xCAUGcmVzdWx0Al8yAWkBDWNhcmdvRXhjaGFuZ2UCDGNhcmdvTGlzdFN0cgtsYW5kQXNzZXRJZAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQKY2FyZ29QYXJ0cwkAvAkCBQxjYXJnb0xpc3RTdHICAToEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUFBVNTSVpFBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgQDbG9jCQC1CQIJAQV2YWx1ZQEFC2N1ckxvY2F0aW9uAgFfAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUwJAAIBCQCsAgIJAKwCAgIWRHVjayBsb2NhdGlvbiB0eXBlIGlzIAkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCESwgYnV0IHNob3VsZCBiZSBMAwkBAiE9AgkAkQMCBQNsb2MFCGxvY0lkeElkBQtsYW5kQXNzZXRJZAkAAgEJAKwCAgIbRHVjayBzaG91bGQgYmUgb24gdGhlIGxhbmQgBQtsYW5kQXNzZXRJZAQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAQJY3VycmVudFdoCQEMZ2V0V2FyZWhvdXNlAwUFd2hLZXkFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBnJlc3VsdAkBCW1vdmVTdHVmZgMFCmNhcmdvUGFydHMFCWN1cnJlbnRXaAULY3VycmVudFBhY2sEBGxvZnQJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAIBXwQFbG9mdE8JAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQIBQZyZXN1bHQCXzcEBWxvZnRGCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFB3ZvbEZyZWUIBQZyZXN1bHQCXzcJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAugkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAggFBnJlc3VsdAJfNAkAzAgCCAUGcmVzdWx0Al81CQDMCAIIBQZyZXN1bHQCXzYFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCBQV3aEtleQkAugkCCQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCCAUGcmVzdWx0Al8xCQDMCAIIBQZyZXN1bHQCXzIJAMwIAggFBnJlc3VsdAJfMwkAzAgCCQC5CQIJAMwIAgkAkQMCBQRsb2Z0BQl2b2xMb2NrZWQJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAJEDAgUEbG9mdAUIdm9sVG90YWwFA25pbAIBXwUDbmlsAgE6BQNuaWwFDXByb2xvZ0FjdGlvbnMBaQENc2F2ZVdhcmVob3VzZQIFd2hTdHILbGFuZEFzc2V0SWQDCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEBXdoS2V5CQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQEAndoCQC8CQIFBXdoU3RyAgE6AwkBAiE9AgkAkAMBBQJ3aAAFCQACAQIwd2FyZWhvdXNlIHN0cmluZyBzaG91bGQgY29udGFpbiA0ICc6JyBzZXBhcmF0b3JzBAVsb2Z0TAkAkQMCCQC1CQIJAJEDAgUCd2gFCXdoSWR4TE9GVAIBXwUJdm9sTG9ja2VkBAVsb2Z0TwkBF2dldFdhcmVob3VzZU9jY3VwaWVkVm9sAQUCd2gEBWxvZnRUCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCQCRAwIFAndoBQt3aElkeExldmVscwQFbG9mdEYJAGUCCQBlAgUFbG9mdFQJAQ1wYXJzZUludFZhbHVlAQUFbG9mdEwFBWxvZnRPAwkAZgIAAAUFbG9mdEYJAAIBAjBPcGVyYXRpb24gbGVhZHMgdG8gbmVnYXRpdmUgZnJlZSB3YXJlaG91c2Ugc3BhY2UECG5ld1doU3RyCQC6CQIJAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgkAkQMCBQJ3aAUId2hJZHhSZXMJAMwIAgkAkQMCBQJ3aAUId2hJZHhNYXQJAMwIAgkAkQMCBQJ3aAUJd2hJZHhQcm9kCQDMCAIJALkJAgkAzAgCBQVsb2Z0TAkAzAgCCQCkAwEFBWxvZnRPCQDMCAIJAKQDAQUFbG9mdEYJAMwIAgkApAMBBQVsb2Z0VAUDbmlsAgFfBQNuaWwCAToJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQV3aEtleQUIbmV3V2hTdHIFA25pbAUIbmV3V2hTdHIBaQENc2V0Q3VzdG9tTmFtZQMHYXNzZXRJZApjdXN0b21OYW1lBHR5cGUEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEDCQECIT0CCAUDcG10BmFtb3VudAUMUkVOQU1JTkdDT1NUCQACAQkArAICAhJQYXltZW50IHNob3VsZCBiZSAJAKQDAQUMUkVOQU1JTkdDT1NUAwkBCGNvbnRhaW5zAgUKY3VzdG9tTmFtZQICX18JAAIBCQCsAgICHk5hbWUgc2hvdWxkIG5vdCBjb250YWluICdfXyc6IAUKY3VzdG9tTmFtZQMJAGYCCQCxAgEFCmN1c3RvbU5hbWUFCk1BWE5BTUVMRU4JAAIBCQCsAgICGU5hbWUgdG9vIGxvbmcsIG1heExlbmd0aD0JAKQDAQUKTUFYTkFNRUxFTgQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEB2FjdGlvbnMEByRtYXRjaDAFBHR5cGUDCQAAAgIHQUNDT1VOVAUHJG1hdGNoMAQKcmV2ZXJzZUtleQkBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBBQpjdXN0b21OYW1lBAluYW1lT3duZXIJAKIIAQUKcmV2ZXJzZUtleQMJAQlpc0RlZmluZWQBBQluYW1lT3duZXIJAAIBCQCsAgICGU5hbWUgYWxyZWFkeSByZWdpc3RlcmVkOiAFCmN1c3RvbU5hbWUEDWFkZHJUb05hbWVLZXkJARZrZXlBZGRyZXNzVG9DdXN0b21OYW1lAQUEYWRkcgQHb2xkTmFtZQkAoggBBQ1hZGRyVG9OYW1lS2V5BAdmcmVlT2xkAwkBCWlzRGVmaW5lZAEFB29sZE5hbWUJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBFmtleUN1c3RvbU5hbWVUb0FkZHJlc3MBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUNYWRkclRvTmFtZUtleQUKY3VzdG9tTmFtZQkBC1N0cmluZ0VudHJ5AgUKcmV2ZXJzZUtleQUEYWRkcggJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgUMeHBDdXN0b21OYW1lAl8xAwkAAAICBExBTkQFByRtYXRjaDAEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQdhc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMECnJldmVyc2VLZXkJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQOYXNzZXRUb05hbWVLZXkJARprZXlMYW5kQXNzZXRJZFRvQ3VzdG9tTmFtZQEFB2Fzc2V0SWQEB29sZE5hbWUJAKIIAQUOYXNzZXRUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUOYXNzZXRUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFB2Fzc2V0SWQICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIFBGFkZHIFDHhwQ3VzdG9tTmFtZQJfMQMJAAACAgREVUNLBQckbWF0Y2gwBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUHYXNzZXRJZAMDCQEBIQEJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkGCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHIJAAIBCQCsAgIIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkRVQ0tQUkVGSVgCDSBpcyBub3QgeW91cnMECnJldmVyc2VLZXkJARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUECW5hbWVPd25lcgkAoggBBQpyZXZlcnNlS2V5AwkBCWlzRGVmaW5lZAEFCW5hbWVPd25lcgkAAgEJAKwCAgIZTmFtZSBhbHJlYWR5IHJlZ2lzdGVyZWQ6IAUKY3VzdG9tTmFtZQQOYXNzZXRUb05hbWVLZXkJARprZXlEdWNrQXNzZXRJZFRvQ3VzdG9tTmFtZQEFB2Fzc2V0SWQEB29sZE5hbWUJAKIIAQUOYXNzZXRUb05hbWVLZXkEB2ZyZWVPbGQDCQEJaXNEZWZpbmVkAQUHb2xkTmFtZQkAzAgCCQELRGVsZXRlRW50cnkBCQEaa2V5RHVja0N1c3RvbU5hbWVUb0Fzc2V0SWQBCQEFdmFsdWUBBQdvbGROYW1lBQNuaWwFA25pbAkAzggCCQDNCAIJAM0IAgUHZnJlZU9sZAkBC1N0cmluZ0VudHJ5AgUOYXNzZXRUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFB2Fzc2V0SWQICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQdhc3NldElkBQx4cEN1c3RvbU5hbWUCXzEJAAIBAhNVbmtub3duIGVudGl0eSB0eXBlCQCUCgIJAM4IAgkAzQgCBQdhY3Rpb25zCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAUNcHJvbG9nQWN0aW9ucwAAAWkBDHNldFJlZmVycmFscwIJb2xkUGxheWVyCW5ld1BsYXllcgMJAQIhPQIIBQFpD2NhbGxlclB1YmxpY0tleQUDcHViCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQDCQEBIQEJAQlpc0RlZmluZWQBCQCmCAEFCW9sZFBsYXllcgkAAgEJAKwCAgIRSW52YWxpZCBhZGRyZXNzOiAFCW9sZFBsYXllcgQKbmV3YmllQWRkcgkApggBBQluZXdQbGF5ZXIDCQEBIQEJAQlpc0RlZmluZWQBBQpuZXdiaWVBZGRyCQACAQkArAICAhFJbnZhbGlkIGFkZHJlc3M6IAUJbmV3UGxheWVyBAlvbGRMYXN0VHgJAKIIAQkBEWtleUxhc3RUeElkQnlVc2VyAQUJb2xkUGxheWVyAwkBASEBCQEJaXNEZWZpbmVkAQUJb2xkTGFzdFR4CQACAQIib2xkUGxheWVyIGRpZG4ndCBkbyBhbnkgdHggaW4gZ2FtZQMJAGcCAAAICQDvBwEJAQV2YWx1ZQEFCm5ld2JpZUFkZHIJYXZhaWxhYmxlCQACAQIWbmV3UGxheWVyIGhhcyBubyBXQVZFUwQHb2xkc0tleQkBCWtleU9sZGllcwAEBG9sZHMJAKIIAQUHb2xkc0tleQQGb2xkaWVzAwkBCWlzRGVmaW5lZAEFBG9sZHMJALwJAgkBBXZhbHVlAQUEb2xkcwIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBm9sZGllcwUJbmV3UGxheWVyCQACAQkArAICBQluZXdQbGF5ZXICJiBpcyBub3QgbmV3YmllIChhbHJlYWR5IGhhcyByZWZlcnJhbHMpBAhyZWZCeUtleQkBD2tleUFkZHJlc3NSZWZCeQEFCW5ld1BsYXllcgQFcmVmQnkJAKIIAQUIcmVmQnlLZXkDAwkBCWlzRGVmaW5lZAEFBXJlZkJ5CQEJaXNEZWZpbmVkAQkApggBCQEFdmFsdWUBBQVyZWZCeQcJAAIBCQCsAgIJAKwCAgUJbmV3UGxheWVyAhQgYWxyZWFkeSBoYXMgcmVmQnk6IAkBBXZhbHVlAQUFcmVmQnkEB3JlZnNLZXkJARNrZXlBZGRyZXNzUmVmZXJyYWxzAQUJb2xkUGxheWVyBARyZWZzCQCiCAEFB3JlZnNLZXkECXJlZnNBcnJheQMJAQlpc0RlZmluZWQBBQRyZWZzCQC8CQIJAQV2YWx1ZQEFBHJlZnMCAV8FA25pbAMJAQ9jb250YWluc0VsZW1lbnQCBQlyZWZzQXJyYXkFCW5ld1BsYXllcgkAAgEJAKwCAgkArAICCQCsAgIFCW9sZFBsYXllcgISIGFscmVhZHkgY29udGFpbnMgBQluZXdQbGF5ZXICESB3aXRoaW4gcmVmZXJyYWxzBAduZXdSZWZzCQC6CQIJAM0IAgUJcmVmc0FycmF5BQluZXdQbGF5ZXICAV8EB25ld09sZHMDCQEPY29udGFpbnNFbGVtZW50AgUGb2xkaWVzBQlvbGRQbGF5ZXIJAQV2YWx1ZQEFBG9sZHMJALoJAgkAzQgCBQZvbGRpZXMFCW9sZFBsYXllcgIBXwkAlAoCCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUIcmVmQnlLZXkFCW9sZFBsYXllcgkAzAgCCQELU3RyaW5nRW50cnkCBQdyZWZzS2V5BQduZXdSZWZzCQDMCAIJAQtTdHJpbmdFbnRyeQIFB29sZHNLZXkFB25ld09sZHMFA25pbAUNcHJvbG9nQWN0aW9ucwAAAWkBEGRpc3RyaWJ1dGVQb2ludHMFCHN0cmVuZ3RoCGFjY3VyYWN5CWludGVsbGVjdAllbmR1cmFuY2UJZGV4dGVyaXR5BA1wcm9sb2dBY3Rpb25zCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQLdmlydFdsZ0RhdGEJAQlhc0FueUxpc3QBCQD8BwQFC3dsZ0NvbnRyYWN0AhJjaGVja1dsZ1hwUkVBRE9OTFkJAMwIAgUEYWRkcgUDbmlsBQNuaWwEDXZpcnRXbGdQb2ludHMJAQVhc0ludAEJAJEDAgULdmlydFdsZ0RhdGEAAQQNJHQwOTE3OTY5MjE4NgMJAGcCAAAFDXZpcnRXbGdQb2ludHMJAJQKAgAABQNuaWwEB2RlbHRhWFAJAQVhc0ludAEJAPwHBAULd2xnQ29udHJhY3QCCXRha2VXbGdYcAkAzAgCBQRhZGRyBQNuaWwFA25pbAMJAAACBQdkZWx0YVhQBQdkZWx0YVhQCQCUCgIFDXZpcnRXbGdQb2ludHMJAMwIAgkBDEludGVnZXJFbnRyeQIJAQxrZXlVc2VyTGV2ZWwBBQRhZGRyCQEFYXNJbnQBCQCRAwIFC3ZpcnRXbGdEYXRhAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQlrZXlVc2VyWFABBQRhZGRyCQEFYXNJbnQBCQCRAwIFC3ZpcnRXbGdEYXRhAAIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQJd2xnUG9pbnRzCAUNJHQwOTE3OTY5MjE4NgJfMQQKd2xnQWN0aW9ucwgFDSR0MDkxNzk2OTIxODYCXzIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQKZnJlZUtleUFjYwkBEWtleVVzZXJGcmVlUG9pbnRzAQUEYWRkcgQNZnJlZVBvaW50c0FjYwkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUKZnJlZUtleUFjYwAABQl3bGdQb2ludHMEC2ZyZWVLZXlEdWNrCQERa2V5RHVja0ZyZWVQb2ludHMBBQtkdWNrQXNzZXRJZAQOZnJlZVBvaW50c0R1Y2sJAQt2YWx1ZU9yRWxzZQIJAJ8IAQULZnJlZUtleUR1Y2sAAAQHc3VtRnJlZQkAZAIFDWZyZWVQb2ludHNBY2MFDmZyZWVQb2ludHNEdWNrBA9zdW1Ub0Rpc3RyaWJ1dGUJAGQCCQBkAgkAZAIJAGQCBQhzdHJlbmd0aAUIYWNjdXJhY3kFCWludGVsbGVjdAUJZW5kdXJhbmNlBQlkZXh0ZXJpdHkDCQBmAgUPc3VtVG9EaXN0cmlidXRlBQdzdW1GcmVlCQACAQkArAICCQCsAgICD1RoZXJlIGFyZSBvbmx5IAkApAMBBQdzdW1GcmVlAhogZnJlZSBwb2ludHMgdG8gZGlzdHJpYnV0ZQQIY2hhcnNLZXkJAQxrZXlEdWNrQ2hhcnMBBQtkdWNrQXNzZXRJZAQFY2hhcnMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQhjaGFyc0tleQIJMF8wXzBfMF8wAgFfBAZuZXdBY2MJAGUCBQ1mcmVlUG9pbnRzQWNjBQ9zdW1Ub0Rpc3RyaWJ1dGUJAJQKAgkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCmZyZWVLZXlBY2MDCQBmAgAABQZuZXdBY2MAAAUGbmV3QWNjCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQtmcmVlS2V5RHVjawMJAGYCAAAFBm5ld0FjYwkAZAIFDmZyZWVQb2ludHNEdWNrBQZuZXdBY2MFDmZyZWVQb2ludHNEdWNrCQDMCAIJAQtTdHJpbmdFbnRyeQIFCGNoYXJzS2V5CQC5CQIJAMwIAgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQxjaGFyU3RyZW5ndGgFCHN0cmVuZ3RoCQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhckFjY3VyYWN5BQhhY2N1cmFjeQkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJJbnRlbGxlY3QFCWludGVsbGVjdAkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJFbmR1cmFuY2UFCWVuZHVyYW5jZQkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJEZXh0ZXJpdHkFCWRleHRlcml0eQUDbmlsAgFfBQNuaWwFDXByb2xvZ0FjdGlvbnMFCndsZ0FjdGlvbnMAAAFpARxzcGxpdEJ5R2xvYmFsV2VpZ2h0c1JFQURPTkxZAQZhbW91bnQJAJQKAgUDbmlsCQESZ2V0TmVlZGVkTWF0ZXJpYWxzAQUGYW1vdW50AWkBJHNwbGl0QnlHbG9iYWxBbmRMb2NhbFdlaWdodHNSRUFET05MWQMJbWF0QW1vdW50CXJlc0Ftb3VudAh0ZXJyYWlucwQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBBQh0ZXJyYWlucwkAlAoCBQNuaWwJAJQKAgkBEmdldE5lZWRlZE1hdGVyaWFscwEFCW1hdEFtb3VudAkBE2Rpc3RyaWJ1dGVCeVdlaWdodHMCBQlyZXNBbW91bnQFDXRlcnJhaW5Db3VudHMBaQETZ2V0QmFja3BhY2tSRUFET05MWQELZHVja0Fzc2V0SWQJAJQKAgUDbmlsCQC5CQIJAQtnZXRCYWNrcGFjawEJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkAgE6AWkBFGdldFdhcmVob3VzZVJFQURPTkxZAQtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQJbGFuZEluZGV4CQBpAgkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplBQVTU0laRQQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAJAJQKAgUDbmlsCQC6CQIJAQxnZXRXYXJlaG91c2UDCQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQFCWxhbmRJbmRleAUKaW5mcmFMZXZlbAIBOgFpAQpzYXZlTGFzdFR4AAMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIJAMwIAgULd2xnQ29udHJhY3QJAMwIAgUPZWNvbm9teUNvbnRyYWN0CQDMCAIFEnRvdXJuYW1lbnRDb250cmFjdAkAzAgCBQ1hY3Jlc0NvbnRyYWN0BQNuaWwIBQFpBmNhbGxlcgkAAgECDUFjY2VzcyBkZW5pZWQJAJQKAgkBBnByb2xvZwEFAWkAKgFpAQ91cGRhdGVEdWNrU3RhdHMCC2R1Y2tBc3NldElkB2RlbHRhWFADCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkBQdkZWx0YVhQAWkBDnVwZGF0ZUFjY1N0YXRzAgRhZGRyB2RlbHRhWFADCQEBIQEJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFC3dsZ0NvbnRyYWN0CQDMCAIFD2Vjb25vbXlDb250cmFjdAkAzAgCBQ1hY3Jlc0NvbnRyYWN0BQNuaWwIBQFpBmNhbGxlcgkAAgECDUFjY2VzcyBkZW5pZWQJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgUHZGVsdGFYUAFpAQllcXVpcER1Y2sBCWVxdWlwbWVudAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQ9jaGVja1RvdXJuYW1lbnQBBQtkdWNrQXNzZXRJZAkAAgECGWVxdWlwRHVja19jaGVja1RvdXJuYW1lbnQEBWVxS2V5CQEQa2V5RHVja0VxdWlwbWVudAEFC2R1Y2tBc3NldElkBAtjdXJyZW50U2VncwkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEFBWVxS2V5AhcsOyxfLDssXyw7LF8sOyxfLDssXyw7LAIBXwQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW5ld0VxCQC1CQIFCWVxdWlwbWVudAIBXwMJAQIhPQIJAJADAQUFbmV3RXEFC05VTVNFR01FTlRTCQACAQIWV3JvbmcgZXF1aXBtZW50IHN0cmluZwQJdGVtcFByb2RCCQEGZHJlc3NCBAULY3VycmVudFNlZ3MJAQ5wcm9kU3RyVG9CeXRlcwEJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAYFA25pbAQIc2VnQnBBdXgJAJEDAgkAtQkCCQCRAwIFBW5ld0VxBQtzZWdCYWNrcGFjawIBOwABBApidWZmRWZmZWN0AwkAAAIFCHNlZ0JwQXV4AgAAAAQEYXV4MAkAkQMCCQC1CQIFCHNlZ0JwQXV4AgEsAAADCQAAAgUEYXV4MAIAAAAEBmlkeENudAkAtQkCBQRhdXgwAgE6BANpZHgJAJEDAgUGaWR4Q250AAAEA2NudAkAkQMCBQZpZHhDbnQAAQMDAwMDCQAAAgUDaWR4AgIwNgYJAAACBQNpZHgCAjA3BgkAAAIFA2lkeAICMDgJAQIhPQIFA2NudAIABwkAZgIJAQ1wYXJzZUludFZhbHVlAQUDY250AAAHCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgJAQ1wYXJzZUludFZhbHVlAQUDaWR4AgFfBQpySWR4RWZmZWN0AAAEBXN0YXRzCQEMZ2V0RHVja1N0YXRzBAUEdGhpcwULZHVja0Fzc2V0SWQFCmJ1ZmZFZmZlY3QGBAhuZXdQcm9kQgkBBmRyZXNzQgQFBW5ld0VxBQl0ZW1wUHJvZEIHBQVzdGF0cwQKbmV3UHJvZFN0cgkBDmJ5dGVzVG9Qcm9kU3RyAQUIbmV3UHJvZEIJAJQKAgkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWVxS2V5BQllcXVpcG1lbnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIFCm5ld1Byb2RTdHIFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCCQEMa2V5RHVja0J1ZmZzAQULZHVja0Fzc2V0SWQJALkJAgkAzAgCCQCkAwEJAJEDAgUFc3RhdHMABwkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACAkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACQkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACgkAzAgCCQCkAwEJAJEDAgUFc3RhdHMACwUDbmlsAgFfBQNuaWwFDXByb2xvZ0FjdGlvbnMAAAFpAQ9mb3J0aWZpY2F0ZUxhbmQCC2xhbmRBc3NldElkBHBsYW4EDXByb2xvZ0FjdGlvbnMJAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAtkdWNrQXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAgAECWR1Y2tTdGF0cwkBDGdldER1Y2tTdGF0cwQFBHRoaXMFC2R1Y2tBc3NldElkAAAHBAdmb3J0S2V5CQEXa2V5Rm9ydGlmaWNhdGlvbnNCeUxhbmQBBQtsYW5kQXNzZXRJZAQMY3VycmVudEZvcnRzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUHZm9ydEtleQIMOjBfMTU6MF8xODowAgFfBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUFBVNTSVpFBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAQCd2gJAQxnZXRXYXJlaG91c2UDBQV3aEtleQUJbGFuZEluZGV4BQppbmZyYUxldmVsBAdjdXJMb2Z0CQC1CQIJAJEDAgUCd2gFCXdoSWR4TE9GVAIBXwQEY3VyTwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB2N1ckxvZnQFC3ZvbE9jY3VwaWVkBARjdXJGCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHY3VyTG9mdAUHdm9sRnJlZQQIbmV3Rm9ydHMJALUJAgUEcGxhbgIBXwQNJHQwOTg5NDc5OTA2MgkBBWZvcnRCBgUMY3VycmVudEZvcnRzCQEOcHJvZFN0clRvQnl0ZXMBCQCRAwIFAndoBQl3aElkeFByb2QFBGN1ck8FBGN1ckYGBQNuaWwECXRlbXBQcm9kQggFDSR0MDk4OTQ3OTkwNjICXzEEBXRlbXBPCAUNJHQwOTg5NDc5OTA2MgJfMgQFdGVtcEYIBQ0kdDA5ODk0Nzk5MDYyAl8zBA0kdDA5OTA2NTk5MTYxCQEFZm9ydEIGBQhuZXdGb3J0cwUJdGVtcFByb2RCBQV0ZW1wTwUFdGVtcEYHBQlkdWNrU3RhdHMECG5ld1Byb2RCCAUNJHQwOTkwNjU5OTE2MQJfMQQEbmV3TwgFDSR0MDk5MDY1OTkxNjECXzIEBG5ld0YIBQ0kdDA5OTA2NTk5MTYxAl8zBApuZXdQcm9kU3RyCQEOYnl0ZXNUb1Byb2RTdHIBBQhuZXdQcm9kQgQKbmV3TG9mdFN0cgkAuQkCCQDMCAIJAJEDAgUHY3VyTG9mdAUJdm9sTG9ja2VkCQDMCAIJAKQDAQUEbmV3TwkAzAgCCQCkAwEFBG5ld0YJAMwIAgkAkQMCBQdjdXJMb2Z0BQh2b2xUb3RhbAUDbmlsAgFfCQCUCgIJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQdmb3J0S2V5BQRwbGFuCQDMCAIJAQtTdHJpbmdFbnRyeQIFBXdoS2V5CQC6CQIJAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgkAkQMCBQJ3aAUId2hJZHhSZXMJAMwIAgkAkQMCBQJ3aAUId2hJZHhNYXQJAMwIAgUKbmV3UHJvZFN0cgkAzAgCBQpuZXdMb2Z0U3RyBQNuaWwCAToFA25pbAUNcHJvbG9nQWN0aW9ucwAAAWkBE2luaXREdWNrVG91ckF0dGVtcHQBC2R1Y2tBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBRJ0b3VybmFtZW50Q29udHJhY3QJAAIBAg1BY2Nlc3MgZGVuaWVkBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQAAAQJY3VySGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFAECWN1ckxvY0tleQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBBQljdXJMb2NLZXkFD0RFRkFVTFRMT0NBVElPTgQGbGFzdElkCQELdmFsdWVPckVsc2UCCQCaCAIFEnRvdXJuYW1lbnRDb250cmFjdAUNbGFzdFRvdXJJZEtleQAABAx0b3VyTG9jYXRpb24JAKwCAgkApAMBBQZsYXN0SWQCBF9UXzAJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDmtleVNhdmVkSGVhbHRoAQULZHVja0Fzc2V0SWQFCWN1ckhlYWx0aAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQVtYXhIUAkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5U2F2ZWRMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQtjdXJMb2NhdGlvbgkAzAgCCQELU3RyaW5nRW50cnkCBQljdXJMb2NLZXkFDHRvdXJMb2NhdGlvbgUDbmlsBQx0b3VyTG9jYXRpb24BaQEMYnJlYWtBdHRlbXB0AAQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECWN1ckxvY0tleQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBBQljdXJMb2NLZXkFD0RFRkFVTFRMT0NBVElPTgMJAQIhPQIJAJEDAgkAtQkCBQtjdXJMb2NhdGlvbgIBXwUKbG9jSWR4VHlwZQIBVAkAAgECIllvdXIgZHVjayBpcyBub3QgaW4gdGhlIHRvdXJuYW1lbnQEC3NhdmVkSGVhbHRoCQERQGV4dHJOYXRpdmUoMTA1NSkBCQEOa2V5U2F2ZWRIZWFsdGgBBQtkdWNrQXNzZXRJZAQNc2F2ZWRMb2NhdGlvbgkBEUBleHRyTmF0aXZlKDEwNTgpAQkBEGtleVNhdmVkTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAlAoCCQDNCAIJAM0IAgUNcHJvbG9nQWN0aW9ucwkBDEludGVnZXJFbnRyeQIJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQFC3NhdmVkSGVhbHRoCQELU3RyaW5nRW50cnkCBQljdXJMb2NLZXkFDXNhdmVkTG9jYXRpb24FC2N1ckxvY2F0aW9uAWkBFGJyZWFrQXR0ZW1wdENhbGxiYWNrAAMJAQIhPQIIBQFpBmNhbGxlcgUSdG91cm5hbWVudENvbnRyYWN0CQACAQINQWNjZXNzIGRlbmllZAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpDG9yaWdpbkNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkCQERQGV4dHJOYXRpdmUoMTA1NSkBCQEOa2V5U2F2ZWRIZWFsdGgBBQtkdWNrQXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQJARFAZXh0ck5hdGl2ZSgxMDU4KQEJARBrZXlTYXZlZExvY2F0aW9uAQULZHVja0Fzc2V0SWQFA25pbAIUYnJlYWtBdHRlbXB0Q2FsbGJhY2sBaQEWZXhpdFRvdXJuYW1lbnRJbnRlcm5hbAELZHVja0Fzc2V0SWQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAg1BY2Nlc3MgZGVuaWVkBAtzYXZlZEhlYWx0aAkBEUBleHRyTmF0aXZlKDEwNTUpAQkBDmtleVNhdmVkSGVhbHRoAQULZHVja0Fzc2V0SWQEDXNhdmVkTG9jYXRpb24JARFAZXh0ck5hdGl2ZSgxMDU4KQEJARBrZXlTYXZlZExvY2F0aW9uAQULZHVja0Fzc2V0SWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAULc2F2ZWRIZWFsdGgJAMwIAgkBC1N0cmluZ0VudHJ5AgkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ1zYXZlZExvY2F0aW9uBQNuaWwHAWkBD3Byb2Nlc3NEZWxpdmVyeQELZHVja0Fzc2V0SWQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAg1BY2Nlc3MgZGVuaWVkBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQJZnVuZFRvdGFsCQELdmFsdWVPckVsc2UCCQCaCAIFD2Vjb25vbXlDb250cmFjdAUPZGVsaXZlcnlGdW5kS2V5AAADCQBmAgUVTUlOX1VTRFRfRkVFX0RFTElWRVJZBQlmdW5kVG90YWwJAAIBCQCsAgICIERlbGl2ZXJ5IGlzIG5vdCBhdmFpbGFibGUsIGZ1bmQ9CQEKZml4ZWRQb2ludAIFCWZ1bmRUb3RhbAAGBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAhjb3VudEtleQkBFGtleVVzZXJEZWxpdmVyeUNvdW50AQUEYWRkcgQFY291bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUIY291bnRLZXkAAAQHbGFzdERheQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5VXNlckxhc3REZWxpdmVyeURheQEFBGFkZHIAAAQFdG9kYXkJAGkCBQNub3cFCURBWU1JTExJUwQFYWNyZXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUNYWNyZXNDb250cmFjdAkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUEYWRkcgAABBFhbGxvd2VkRGVsaXZlcmllcwkAZAIFF0FMTE9XRURfRlJFRV9ERUxJVkVSSUVTCQBpAgUFYWNyZXMFGkFDUkVTX0ZPUl9ERUxJVkVSWV9BVFRFTVBUAwMJAGcCBQVjb3VudAURYWxsb3dlZERlbGl2ZXJpZXMJAAACBQdsYXN0RGF5BQV0b2RheQcJAAIBCQCsAgIJAKwCAgIRWW91IGFscmVhZHkgdXNlZCAJAKQDAQURYWxsb3dlZERlbGl2ZXJpZXMCHCBkZWxpdmVyeSBhdHRlbXB0cyBmb3IgdG9kYXkEBnJld2FyZAkA/AcEBQ9lY29ub215Q29udHJhY3QCEnNlbmREZWxpdmVyeVJld2FyZAkAzAgCBQRhZGRyBQNuaWwFA25pbAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQhjb3VudEtleQkAZAIFBWNvdW50AAEJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlVc2VyTGFzdERlbGl2ZXJ5RGF5AQUEYWRkcgUFdG9kYXkFA25pbAUGcmV3YXJkAWkBDnByZXBhcmVSb2JiZXJ5AgdtZXNzYWdlA3NpZwQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQGd2xnQW10CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFCndsZ0Fzc2V0SWQJAAIBAhVXTEdPTEQgcGF5bWVudHMgb25seSEEBXBhcnRzCQC1CQIJALAJAQUHbWVzc2FnZQIBfAMJAGYCAAIJAJADAQUFcGFydHMJAAIBAhRXcm9uZyBtZXNzYWdlIGZvcm1hdAQJdHhGcm9tTXNnAwkAZwIJAJADAQUFcGFydHMAAgkAkQMCBQVwYXJ0cwACAgAECHVzZXJBZGRyCQClCAEIBQFpBmNhbGxlcgQGbGFzdFR4CQELdmFsdWVPckVsc2UCCQCiCAEJARFrZXlMYXN0VHhJZEJ5VXNlcgEFCHVzZXJBZGRyAgADCQECIT0CBQZsYXN0VHgFCXR4RnJvbU1zZwkAAgEJAKwCAgkArAICCQCsAgICHlR4IGlkcyBkb24ndCBtYXRjaCEgSW4gc3RhdGU6IAUGbGFzdFR4AgosIGluIG1zZzogBQl0eEZyb21Nc2cEC2R1Y2tBc3NldElkCQCRAwIFBXBhcnRzAAADCQEPY2hlY2tUb3VybmFtZW50AQULZHVja0Fzc2V0SWQJAAIBAh5wcmVwYXJlUm9iYmVyeV9jaGVja1RvdXJuYW1lbnQEB3JvYkNvc3QICQEOZ2V0Um9iYmVyeURhdGECBQR0aGlzBQtkdWNrQXNzZXRJZAJfMQMJAGYCBQdyb2JDb3N0BQZ3bGdBbXQJAAIBCQCsAgIJAKwCAgkArAICAghQYXltZW50IAkApAMBBQZ3bGdBbXQCDCA8IHJlcXVpcmVkIAkApAMBBQdyb2JDb3N0BApjYW5kaWRhdGVzCQC1CQIJAJEDAgUFcGFydHMAAQIBXwQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJZHVja1N0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEJARNrZXlEdWNrUm9iYmVyeVN0YXRlAQULZHVja0Fzc2V0SWQAAAQKbG9ja2VkTGFuZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQETa2V5TG9ja2VkTGFuZEJ5RHVjawEFC2R1Y2tBc3NldElkAgAEB2xhbmRFVEEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleUxhbmRDb29sZG93bkVUQQEFCmxvY2tlZExhbmQAAAMDCQECIT0CBQlkdWNrU3RhdGUFC2R1Y2tJZHhGcmVlCQBmAgUHbGFuZEVUQQUDbm93BwkAAgEJAKwCAgInWW91IGFscmVhZHkgc3RhcnRlZCByb2JiaW5nLCB3YWl0IHRpbGwgCQCkAwEFB2xhbmRFVEEKAQdjaGVja2VyAgNhY2MLbGFuZEFzc2V0SWQEBXN0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEJARNrZXlMYW5kUm9iYmVyeVN0YXRlAQULbGFuZEFzc2V0SWQAAAQLY29vbGRvd25FVEEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleUxhbmRDb29sZG93bkVUQQEFC2xhbmRBc3NldElkAAADCQBmAgUFc3RhdGUJAJADAQUQbGFuZFJvYkNvb2xkb3ducwkAAgECDUludmFsaWQgc3RhdGUDCQBmAgUDbm93BQtjb29sZG93bkVUQQQKc3Rha2VkVGltZQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAADCQBnAgAABQpzdGFrZWRUaW1lBQNhY2MEAWEJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQBZAkAtQkCCAUBYQtkZXNjcmlwdGlvbgIBXwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQMcHJvZHVjdGl2aXR5CQEMYXBwbHlCb251c2VzAgULbGFuZEFzc2V0SWQFBnBpZWNlcwQJZGVsdGFUaW1lCQBlAgUDbm93BQpzdGFrZWRUaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFDHByb2R1Y3Rpdml0eQUGcGllY2VzBQlEQVlNSUxMSVMDCQBmAgUOTUlOX1JFU19UT19ST0IFCGF2YWlsUmVzBQNhY2MJAM0IAgUDYWNjBQtsYW5kQXNzZXRJZAUDYWNjBAhmaWx0ZXJlZAoAAiRsBQpjYW5kaWRhdGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdjaGVja2VyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkAAAIJAJADAQUIZmlsdGVyZWQAAAkAAgECGU5vIGNhbmRpZGF0ZXMgZm9yIHJvYmJlcnkEBnJuZElkeAkBD2dldFJhbmRvbU51bWJlcgMJAJADAQUIZmlsdGVyZWQFB21lc3NhZ2UFA3NpZwQLbGFuZEFzc2V0SWQJAJEDAgUIZmlsdGVyZWQFBnJuZElkeAkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIJARNrZXlMYW5kUm9iYmVyeVN0YXRlAQULbGFuZEFzc2V0SWQFDHJvYklkeExvY2tlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleUxhbmRDb29sZG93bkVUQQEFC2xhbmRBc3NldElkCQBkAgUDbm93CQCRAwIFEGxhbmRSb2JDb29sZG93bnMFDHJvYklkeExvY2tlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBE2tleUR1Y2tSb2JiZXJ5U3RhdGUBBQtkdWNrQXNzZXRJZAUQZHVja0lkeFByZXBhcmluZwkAzAgCCQELU3RyaW5nRW50cnkCCQETa2V5TG9ja2VkTGFuZEJ5RHVjawEFC2R1Y2tBc3NldElkBQtsYW5kQXNzZXRJZAUDbmlsBQ1wcm9sb2dBY3Rpb25zBQtsYW5kQXNzZXRJZAFpAQdyb2JMYW5kAgdtZXNzYWdlA3NpZwQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gECHVzZXJBZGRyCQClCAEIBQFpBmNhbGxlcgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQh1c2VyQWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAlAoCCQDNCAIFDXByb2xvZ0FjdGlvbnMJAQxJbnRlZ2VyRW50cnkCCQEYa2V5TGFzdFJvYmJlcnlUaW1lQnlEdWNrAQULZHVja0Fzc2V0SWQFA25vdwAAAWkBC2J1eVJvYm9EdWNrAAMJAQEhAQUTS1NfQUxMT1dfUk9CT19EVUNLUwkAAgECFUZlYXR1cmUgaXMgdHVybmVkIG9mZgQNcHJvbG9nQWN0aW9ucwkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRFQgcGF5bWVudCBvbmx5IQMJAQIhPQIIBQNwbXQGYW1vdW50BQ5ST0JPX0RVQ0tfVVNEVAkAAgEJAKwCAgkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAQpmaXhlZFBvaW50AgUOUk9CT19EVUNLX1VTRFQABgIFIFVTRFQEB25leHROdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBD2tleU5leHRSb2JvRHVjawAAAAQFYnl0ZXoJAJoDAQUHbmV4dE51bQQEbmFtZQkArAICCQCsAgIFC1JPQk9fUFJFRklYAgEtCQCyAgIJANwEAQUFYnl0ZXoACAQFY29sb3IJALICAgkA3AQBCQDUFgEFBWJ5dGV6AAYEBWlzc3VlCQDCCAUFBG5hbWUJAKwCAgI3Um9ibyBEdWNrIE5GVCBmb3IgV2F2ZXNMYW5kcyBnYW1lLCBiYWNrZ3JvdW5kIGNvbG9yID0gIwUFY29sb3IAAQAABwQHYXNzZXRJZAkAuAgBBQVpc3N1ZQkAlAoCCQDNCAIJAM0IAgkAzQgCCQDNCAIFDXByb2xvZ0FjdGlvbnMJAQxJbnRlZ2VyRW50cnkCCQEPa2V5TmV4dFJvYm9EdWNrAAkAZAIFB25leHROdW0AAQUFaXNzdWUJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpDG9yaWdpbkNhbGxlcgABBQdhc3NldElkCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAkAlAoCCQDYBAEFB2Fzc2V0SWQFBWNvbG9yAIPaCeo=",
    "height": 2856325,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6tWZBaKfp3Tk73vDQbYUBTXFsSwmGArxTrLke1uqc7xf
Next: 824xxgQAk3VUU8QcSWzZ1DQ9s1cDp4QyFrhxF2HaGxpr

Diff: 
Old
New
Differences
105
105
 
106
106
 
107
107
 
func keyLockedLandByDuck (duckAssetId) = ("lockedLandByDuck_" + duckAssetId)
108
-
109
-
110
-
func keyDeliveryDelayByDuck (duckAssetId) = ("deliveryDelayByDuck_" + duckAssetId)
111
108
 
112
109
 
113
110
 
func keyUserDeliveryCount (addr) = ("userDeliveryCount_" + addr)
195
192
 
196
193
 
let MIN_USDT_FEE_DELIVERY = 50000
197
194
 
198
-
let TEN_MINUTES_MILLIS = 600000
199
-
200
195
 
let ALLOWED_FREE_DELIVERIES = 1
201
196
 
202
197
 
let ACRES_FOR_DELIVERY_ATTEMPT = 50000000
314
309
 
315
310
 
316
311
 
let deliveryFundKey = "deliveryFund"
317
-
318
-
let deliveryLockedKey = "deliveryLocked"
319
312
 
320
313
 
let lastTourIdKey = "%s__lastTourId"
321
314
 
360
353
 
    }
361
354
 
362
355
 
363
-
func isInDelivery (location) = {
364
-
    let loc = split(location, "_")
365
-
    let now = lastBlock.timestamp
366
-
    let startTime = parseIntValue(loc[locIdxContinent])
367
-
    let distance = parseIntValue(loc[locIdxId])
368
-
    if (if ((loc[locIdxType] == "D"))
369
-
        then ((startTime + TEN_MINUTES_MILLIS) > now)
370
-
        else false)
371
-
        then (3 >= distance)
372
-
        else false
373
-
    }
374
-
375
-
376
-
func isUsualLocation (location) = {
377
-
    let locType = split(location, "_")[locIdxType]
378
-
    if ((locType != "T"))
379
-
        then (locType != "D")
380
-
        else false
381
-
    }
382
-
383
-
384
356
 
func onMission (tourContract,location) = {
385
357
 
    let lastId = valueOrElse(getInteger(tourContract, lastTourIdKey), 0)
386
358
 
    let loc = split(location, "_")
389
361
 
    let static = tData[idxStatic]
390
362
 
    let dynamic = tData[idxDynamic]
391
363
 
    let locType = loc[locIdxType]
392
-
    if ((locType == "D"))
393
-
        then true
394
-
        else if (if (if ((loc[locIdxType] == "T"))
395
-
            then (parseIntValue(loc[locIdxContinent]) == lastId)
396
-
            else false)
397
-
            then (dynamic[tDynamicStatus] == "INPROGRESS")
398
-
            else false)
399
-
            then (parseIntValue(static[tStaticEnd]) > now)
400
-
            else false
364
+
    if (if (if ((loc[locIdxType] == "T"))
365
+
        then (parseIntValue(loc[locIdxContinent]) == lastId)
366
+
        else false)
367
+
        then (dynamic[tDynamicStatus] == "INPROGRESS")
368
+
        else false)
369
+
        then (parseIntValue(static[tStaticEnd]) > now)
370
+
        else false
401
371
 
    }
402
372
 
403
373
 
461
431
 
            then DAY_MILLIS
462
432
 
            else if ((base58'2T' == $match0))
463
433
 
                then 60000
464
-
                else throw("Unknown chain")
465
-
}
466
-
467
-
let DELIVERY_PUNISHMENT = match chain {
468
-
    case _ => 
469
-
        if ((base58'2W' == $match0))
470
-
            then 10800000
471
-
            else if ((base58'2T' == $match0))
472
-
                then 900000
473
434
 
                else throw("Unknown chain")
474
435
 
}
475
436
 
632
593
 
    }
633
594
 
634
595
 
635
-
func getRandomNumber (maxValue,salt,entropy) = {
636
-
    let randomHash = sha256((salt + entropy))
637
-
    (toInt(randomHash) % maxValue)
638
-
    }
596
+
func getRandomNumber (maxValue,salt,entropy) = if ((0 >= maxValue))
597
+
    then throw("maxValue should be > 0")
598
+
    else {
599
+
        let randomHash = sha256((salt + entropy))
600
+
        (toInt(randomHash) % maxValue)
601
+
        }
639
602
 
640
603
 
641
604
 
let incubatorAddr = match chain {
1978
1941
 
    }
1979
1942
 
1980
1943
 
1981
-
func checkDelivery (duckAssetId) = {
1982
-
    let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1983
-
    let now = lastBlock.timestamp
1984
-
    if ((curLocation[locIdxType] != "D"))
1985
-
        then false
1986
-
        else {
1987
-
            let startTime = parseIntValue(curLocation[locIdxContinent])
1988
-
            let distance = parseIntValue(curLocation[locIdxId])
1989
-
            if (if (((startTime + TEN_MINUTES_MILLIS) > now))
1990
-
                then (1 > distance)
1991
-
                else false)
1992
-
                then throw("Your duck is on delivery mission")
1993
-
                else asBoolean(invoke(this, "exitDeliveryInternal", [duckAssetId], nil))
1994
-
            }
1995
-
    }
1996
-
1997
-
1998
-
func exitDeliveryCommon (duckAssetId,check,newHP,score) = {
1999
-
    let curLocation = split(valueOrElse(getString(keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
2000
-
    let now = lastBlock.timestamp
2001
-
    let startTime = parseIntValue(curLocation[locIdxContinent])
2002
-
    let distance = parseIntValue(curLocation[locIdxId])
2003
-
    let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(duckAssetId)), "NFT duck is orphaned")
2004
-
    let healthKey = keyDuckHealth(duckAssetId)
2005
-
    let curHealth = getIntegerValue(healthKey)
2006
-
    let outcomeActions = if (if ((distance > 0))
2007
-
        then true
2008
-
        else if (if (check)
2009
-
            then (score > 0)
2010
-
            else false)
2011
-
            then (newHP > 0)
2012
-
            else false)
2013
-
        then {
2014
-
            let reward = invoke(economyContract, "sendDeliveryReward", [owner], nil)
2015
-
            if ((reward == reward))
2016
-
                then {
2017
-
                    let countKey = keyUserDeliveryCount(owner)
2018
-
[IntegerEntry(countKey, (valueOrElse(getInteger(countKey), 0) + 1)), IntegerEntry(keyUserLastDeliveryDay(owner), (startTime / DAYMILLIS))]
2019
-
                    }
2020
-
                else throw("Strict value is not equal to itself.")
2021
-
            }
2022
-
        else if (if (if (check)
2023
-
            then (newHP > 0)
2024
-
            else false)
2025
-
            then ((startTime + TEN_MINUTES_MILLIS) > now)
2026
-
            else false)
2027
-
            then throw("Your duck is still on delivery mission")
2028
-
            else {
2029
-
                let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
2030
-
                let unlock = invoke(economyContract, "updateDeliveryLocked", [(lockedTotal - MIN_USDT_FEE_DELIVERY)], nil)
2031
-
                if ((unlock == unlock))
2032
-
                    then if (if (if (check)
2033
-
                        then (0 >= newHP)
2034
-
                        else false)
2035
-
                        then true
2036
-
                        else (0 >= curHealth))
2037
-
                        then nil
2038
-
                        else [IntegerEntry(keyDeliveryDelayByDuck(duckAssetId), (startTime + DELIVERY_PUNISHMENT))]
2039
-
                    else throw("Strict value is not equal to itself.")
2040
-
                }
2041
-
    let savedLocation = getStringValue(keySavedLocation(duckAssetId))
2042
-
    $Tuple3(outcomeActions, [StringEntry(keyDuckLocation(duckAssetId), savedLocation)], savedLocation)
2043
-
    }
2044
-
2045
-
2046
1944
 
func mergeInternal (newLandSize,newLevel,formula,addr,landAssetIds,needMat) = {
2047
1945
 
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
2048
1946
 
    if (checkTournament(duckAssetId))
2049
1947
 
        then throw("mergeInternal_checkTournament")
2050
-
        else if (checkDelivery(duckAssetId))
2051
-
            then throw("mergeInternal_checkDelivery")
2052
-
            else {
2053
-
                func checkMerge (acc,landAssetId) =                 {
2054
-
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
2055
-
                    let timeKey = keyStakedTimeByAssetId(landAssetId)
2056
-
                    let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
2057
-
                    let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
2058
-
                    if ((owner != addr))
2059
-
                        then throw((LANDPREFIX + " is not yours"))
2060
-
                        else {
2061
-
                            let d = split(asset.description, "_")
2062
-
                            let continent = d[recContinent]
2063
-
                            if (if ((acc._3 != ""))
2064
-
                                then (acc._3 != continent)
2065
-
                                else false)
2066
-
                                then throw("Lands should be on the same continent to merge")
2067
-
                                else {
2068
-
                                    let landSize = d[recLandSize]
2069
-
                                    let sizesIn = acc._1
2070
-
                                    let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
2071
-
                                    let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
2072
-
                                    let pieces = numPiecesBySize(landSize)
2073
-
                                    let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
2074
-
                                    let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
2075
-
                                    let reqLevel =                                     match landSize {
2076
-
                                        case _ => 
2077
-
                                            if (("S" == $match0))
2078
-
                                                then 3
2079
-
                                                else if (("M" == $match0))
2080
-
                                                    then 4
2081
-
                                                    else if (("L" == $match0))
2082
-
                                                        then 5
2083
-
                                                        else if (("XL" == $match0))
2084
-
                                                            then 6
2085
-
                                                            else throw("Only S, M, L, XL can merge")
2086
-
                                    }
2087
-
                                    if ((infraLevel != reqLevel))
2088
-
                                        then throw("All lands should be maxed to merge")
2089
-
                                        else {
2090
-
                                            let landNum = d[recLandNum]
2091
-
                                            let terrainCounts = countTerrains(d[recTerrains])
2092
-
                                            let deltaTime = (lastBlock.timestamp - savedTime)
2093
-
                                            if ((0 > deltaTime))
2094
-
                                                then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
2095
-
                                                else {
2096
-
                                                    let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
2097
-
                                                    let landIndex = (pieces / SSIZE)
2098
-
                                                    let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
2099
-
                                                    let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
2100
-
                                                    let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
2101
-
                                                    let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
2102
-
                                                    let lands = acc._7
2103
-
                                                    let idx = indexOf(lands, landAssetId)
2104
-
                                                    if (!(isDefined(idx)))
2105
-
                                                        then throw(("Your staked lands don't contain " + landAssetId))
2106
-
                                                        else {
2107
-
                                                            let customKey = keyLandAssetIdToCustomName(landAssetId)
2108
-
                                                            let customName = valueOrElse(getString(customKey), "")
2109
-
                                                            $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 != ""))
2110
-
                                                                then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
2111
-
                                                                else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
2112
-
                                                            }
2113
-
                                                    }
2114
-
                                            }
2115
-
                                    }
2116
-
                            }
2117
-
                    }
2118
-
2119
-
                let bpKey = keyBackpackByDuck(duckAssetId)
2120
-
                let currentPack = getBackpack(bpKey)
2121
-
                let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
2122
-
                let landsKey = keyStakedLandsByOwner(addr)
2123
-
                let landsStr = getString(landsKey)
2124
-
                let landsIn = if (isDefined(landsStr))
2125
-
                    then split_51C(value(landsStr), "_")
2126
-
                    else nil
2127
-
                let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
2128
-
                let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
2129
-
                let r = {
2130
-
                    let $l = landAssetIds
2131
-
                    let $s = size($l)
2132
-
                    let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
2133
-
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
2134
-
                        then $a
2135
-
                        else checkMerge($a, $l[$i])
2136
-
2137
-
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
2138
-
                        then $a
2139
-
                        else throw("List size exceeds 5")
2140
-
2141
-
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
2142
-
                    }
2143
-
                let continent = r._3
2144
-
                let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
2145
-
                let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
2146
-
                let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
2147
-
                let newLandNum = toString(freeNum)
2148
-
                let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
2149
-
                let assetId = calculateAssetId(issue)
2150
-
                let newLandAssetId = toBase58String(assetId)
2151
-
                let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
2152
-
                let piecesKey = keyStakedPiecesByOwner(addr)
2153
-
                let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
2154
-
                $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
2155
-
                    then StringEntry(landsKey, makeString_11C(r._7, "_"))
2156
-
                    else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
2157
-
                    then 0
2158
-
                    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)
1948
+
        else {
1949
+
            func checkMerge (acc,landAssetId) =             {
1950
+
                let asset = value(assetInfo(fromBase58String(landAssetId)))
1951
+
                let timeKey = keyStakedTimeByAssetId(landAssetId)
1952
+
                let savedTime = valueOrErrorMessage(getInteger(timeKey), (("NFT " + asset.name) + " is not staked"))
1953
+
                let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1954
+
                if ((owner != addr))
1955
+
                    then throw((LANDPREFIX + " is not yours"))
1956
+
                    else {
1957
+
                        let d = split(asset.description, "_")
1958
+
                        let continent = d[recContinent]
1959
+
                        if (if ((acc._3 != ""))
1960
+
                            then (acc._3 != continent)
1961
+
                            else false)
1962
+
                            then throw("Lands should be on the same continent to merge")
1963
+
                            else {
1964
+
                                let landSize = d[recLandSize]
1965
+
                                let sizesIn = acc._1
1966
+
                                let i = valueOrErrorMessage(indexOf(sizesIn, landSize), "You haven't passed all the lands needed")
1967
+
                                let sizesOut = (take(sizesIn, i) + drop(sizesIn, (i + 1)))
1968
+
                                let pieces = numPiecesBySize(landSize)
1969
+
                                let arts = (acc._2 + valueOrElse(getInteger(keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0))
1970
+
                                let infraLevel = valueOrElse(getInteger(keyInfraLevelByAssetId(landAssetId)), 0)
1971
+
                                let reqLevel =                                 match landSize {
1972
+
                                    case _ => 
1973
+
                                        if (("S" == $match0))
1974
+
                                            then 3
1975
+
                                            else if (("M" == $match0))
1976
+
                                                then 4
1977
+
                                                else if (("L" == $match0))
1978
+
                                                    then 5
1979
+
                                                    else if (("XL" == $match0))
1980
+
                                                        then 6
1981
+
                                                        else throw("Only S, M, L, XL can merge")
1982
+
                                }
1983
+
                                if ((infraLevel != reqLevel))
1984
+
                                    then throw("All lands should be maxed to merge")
1985
+
                                    else {
1986
+
                                        let landNum = d[recLandNum]
1987
+
                                        let terrainCounts = countTerrains(d[recTerrains])
1988
+
                                        let deltaTime = (lastBlock.timestamp - savedTime)
1989
+
                                        if ((0 > deltaTime))
1990
+
                                            then throw(((("Saved timestamp is in future, saved = " + toString(savedTime)) + ", current = ") + toString(lastBlock.timestamp)))
1991
+
                                            else {
1992
+
                                                let dailyProductionByPiece = applyBonuses(landAssetId, pieces)
1993
+
                                                let landIndex = (pieces / SSIZE)
1994
+
                                                let bpRes = addRes(split(acc._4, "_"), terrainCounts, deltaTime, landIndex, dailyProductionByPiece)
1995
+
                                                let props = updateProportionsInternal(acc._6, terrainCounts, landIndex, -1)
1996
+
                                                let cProps = updateProportionsInternal(acc._10, terrainCounts, landIndex, -1)
1997
+
                                                let sumTerrains = updateProportionsInternal(acc._9, terrainCounts, landIndex, 1)
1998
+
                                                let lands = acc._7
1999
+
                                                let idx = indexOf(lands, landAssetId)
2000
+
                                                if (!(isDefined(idx)))
2001
+
                                                    then throw(("Your staked lands don't contain " + landAssetId))
2002
+
                                                    else {
2003
+
                                                        let customKey = keyLandAssetIdToCustomName(landAssetId)
2004
+
                                                        let customName = valueOrElse(getString(customKey), "")
2005
+
                                                        $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 != ""))
2006
+
                                                            then [DeleteEntry(keyLandCustomNameToAssetId(customName))]
2007
+
                                                            else nil)), props, removeByIndex(lands, value(idx)), (acc._8 + pieces), sumTerrains, cProps)
2008
+
                                                        }
2009
+
                                                }
2010
+
                                        }
2011
+
                                }
2012
+
                        }
2159
2013
 
                }
2014
+
2015
+
            let bpKey = keyBackpackByDuck(duckAssetId)
2016
+
            let currentPack = getBackpack(bpKey)
2017
+
            let propList = split(valueOrElse(getString(keyResProportions()), "0_0_0_0_0_0"), "_")
2018
+
            let landsKey = keyStakedLandsByOwner(addr)
2019
+
            let landsStr = getString(landsKey)
2020
+
            let landsIn = if (isDefined(landsStr))
2021
+
                then split_51C(value(landsStr), "_")
2022
+
                else nil
2023
+
            let cont0 = split(value(assetInfo(fromBase58String(landAssetIds[0]))).description, "_")[recContinent]
2024
+
            let contProps = split(valueOrElse(getString(keyResTypesByContinent(cont0)), "0_0_0_0_0_0"), "_")
2025
+
            let r = {
2026
+
                let $l = landAssetIds
2027
+
                let $s = size($l)
2028
+
                let $acc0 = $Tuple10(formula, 0, "", currentPack[bpIdxRes], nil, propList, landsIn, 0, split("0_0_0_0_0_0", "_"), contProps)
2029
+
                func $f0_1 ($a,$i) =                 if (($i >= $s))
2030
+
                    then $a
2031
+
                    else checkMerge($a, $l[$i])
2032
+
2033
+
                func $f0_2 ($a,$i) =                 if (($i >= $s))
2034
+
                    then $a
2035
+
                    else throw("List size exceeds 5")
2036
+
2037
+
                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
2038
+
                }
2039
+
            let continent = r._3
2040
+
            let continentIdx = valueOrErrorMessage(indexOf(continents, continent), ("Unknown continent: " + continent))
2041
+
            let terrains = genTerrainsForMerge(r._9, (numPiecesBySize(newLandSize) / SSIZE))
2042
+
            let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), (PRESALENUMLANDS + 1))
2043
+
            let newLandNum = toString(freeNum)
2044
+
            let issue = Issue(nftName(newLandNum, newLandSize), makeString([newLandNum, newLandSize, terrains, continent], "_"), 1, 0, false)
2045
+
            let assetId = calculateAssetId(issue)
2046
+
            let newLandAssetId = toBase58String(assetId)
2047
+
            let newMat = makeString(subtractMaterials((needMat > 0), split(currentPack[bpIdxMat], "_"), needMat), "_")
2048
+
            let piecesKey = keyStakedPiecesByOwner(addr)
2049
+
            let stakedPieces = valueOrElse(getInteger(piecesKey), 0)
2050
+
            $Tuple2((((((((((((((((r._5 :+ (if ((size(r._7) > 0))
2051
+
                then StringEntry(landsKey, makeString_11C(r._7, "_"))
2052
+
                else DeleteEntry(landsKey))) :+ IntegerEntry(piecesKey, if ((r._8 > stakedPieces))
2053
+
                then 0
2054
+
                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)
2055
+
            }
2160
2056
 
    }
2161
2057
 
2162
2058
 
2186
2082
 
}
2187
2083
 
2188
2084
 
2189
-
func checkOutdatedDelivery (userAddr) = {
2190
-
    let duck = getString(keyStakedDuckByOwner(userAddr))
2191
-
    if (isDefined(duck))
2192
-
        then {
2193
-
            let duckAssetId = value(duck)
2194
-
            let locKey = keyDuckLocation(duckAssetId)
2195
-
            let loc = split(valueOrElse(getString(locKey), DEFAULTLOCATION), "_")
2196
-
            let startTime = parseIntValue(loc[locIdxContinent])
2197
-
            if (if ((loc[locIdxType] != "D"))
2198
-
                then true
2199
-
                else ((startTime + TEN_MINUTES_MILLIS) > lastBlock.timestamp))
2200
-
                then nil
2201
-
                else {
2202
-
                    let healthKey = keyDuckHealth(duckAssetId)
2203
-
                    if ((parseIntValue(loc[locIdxId]) > 0))
2204
-
                        then {
2205
-
                            let reward = invoke(economyContract, "sendDeliveryReward", [userAddr], nil)
2206
-
                            if ((reward == reward))
2207
-
                                then nil
2208
-
                                else throw("Strict value is not equal to itself.")
2209
-
                            }
2210
-
                        else ({
2211
-
                            let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
2212
-
                            let unlock = invoke(economyContract, "updateDeliveryLocked", [(lockedTotal - MIN_USDT_FEE_DELIVERY)], nil)
2213
-
                            if ((unlock == unlock))
2214
-
                                then if ((0 >= getIntegerValue(healthKey)))
2215
-
                                    then nil
2216
-
                                    else {
2217
-
                                        let punishment = invoke(this, "saveInteger", [keyDeliveryDelayByDuck(duckAssetId), (startTime + DELIVERY_PUNISHMENT)], nil)
2218
-
                                        if ((punishment == punishment))
2219
-
                                            then nil
2220
-
                                            else throw("Strict value is not equal to itself.")
2221
-
                                        }
2222
-
                                else throw("Strict value is not equal to itself.")
2223
-
                            } :+ StringEntry(locKey, getStringValue(keySavedLocation(duckAssetId))))
2224
-
                    }
2225
-
            }
2226
-
        else nil
2227
-
    }
2228
-
2229
-
2230
2085
 
func prolog (i) = if (if ((i.originCaller != restContract))
2231
-
    then valueOrElse(getBoolean(keyBlocked()), false)
2232
-
    else false)
2233
-
    then throw("Contracts are under maintenance")
2234
-
    else {
2235
-
        let userAddr = toString(i.originCaller)
2236
-
        (checkOutdatedDelivery(userAddr) :+ StringEntry(keyLastTxIdByUser(userAddr), toBase58String(i.transactionId)))
2237
-
        }
2238
-
2239
-
2240
-
func prologFlight (i) = if (if ((i.originCaller != restContract))
2241
2086
 
    then valueOrElse(getBoolean(keyBlocked()), false)
2242
2087
 
    else false)
2243
2088
 
    then throw("Contracts are under maintenance")
2456
2301
 
                            then throw("Staked NFT is not yours")
2457
2302
 
                            else if (checkTournament(assetIdStr))
2458
2303
 
                                then throw("unstakeDuck_checkTournament")
2459
-
                                else if (checkDelivery(assetIdStr))
2460
-
                                    then throw("unstakeDuck_checkDelivery")
2461
-
                                    else {
2462
-
                                        let keyHealth = keyDuckHealth(assetIdStr)
2463
-
                                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2464
-
                                        let health = valueOrElse(getInteger(keyHealth), maxHP)
2465
-
                                        if ((maxHP > health))
2466
-
                                            then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2467
-
                                            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)
2468
-
                                        }
2304
+
                                else {
2305
+
                                    let keyHealth = keyDuckHealth(assetIdStr)
2306
+
                                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(assetIdStr)), 0))
2307
+
                                    let health = valueOrElse(getInteger(keyHealth), maxHP)
2308
+
                                    if ((maxHP > health))
2309
+
                                        then throw((("Please heal your duck to " + toString(maxHP)) + "hp before unstaking"))
2310
+
                                        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)
2311
+
                                    }
2469
2312
 
                        }
2470
2313
 
            }
2471
2314
 
    }
2503
2346
 
2504
2347
 
@Callable(i)
2505
2348
 
func flight (message,sig) = {
2506
-
    let prologActions = prologFlight(i)
2349
+
    let prologActions = prolog(i)
2507
2350
 
    if ((size(i.payments) != 0))
2508
2351
 
        then throw("No payments required")
2509
2352
 
        else {
2522
2365
 
                    let isDeliv = (newLoc[locIdxType] == "D")
2523
2366
 
                    let eqKey = keyDuckEquipment(duckAssetId)
2524
2367
 
                    let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2525
-
                    let $t07023070327 = subtractEquipment(currentEq, f._5)
2526
-
                    let newEq = $t07023070327._1
2527
-
                    let shouldZeroBuffs = $t07023070327._2
2528
-
                    let $t07033073442 = if (!(onMission(tournamentContract, curLocation)))
2529
-
                        then if (!(isUsualLocation(newLocation)))
2368
+
                    let $t06603566132 = subtractEquipment(currentEq, f._5)
2369
+
                    let newEq = $t06603566132._1
2370
+
                    let shouldZeroBuffs = $t06603566132._2
2371
+
                    let $t06613567967 = if (!(onMission(tournamentContract, curLocation)))
2372
+
                        then if (isTour)
2530
2373
 
                            then cheatAttempt(curLocation, newLocation, 5)
2531
-
                            else if ((newHP > 0))
2532
-
                                then $Tuple2(newLocation, newHP)
2533
-
                                else $Tuple2(curLocation, 0)
2374
+
                            else if (!(isDeliv))
2375
+
                                then if ((newHP > 0))
2376
+
                                    then $Tuple2(newLocation, newHP)
2377
+
                                    else $Tuple2(curLocation, 0)
2378
+
                                else if ((newHP > 0))
2379
+
                                    then {
2380
+
                                        let s = invoke(this, "processDelivery", [duckAssetId], nil)
2381
+
                                        if ((s == s))
2382
+
                                            then $Tuple2(curLocation, newHP)
2383
+
                                            else throw("Strict value is not equal to itself.")
2384
+
                                        }
2385
+
                                    else $Tuple2(curLocation, 0)
2534
2386
 
                        else if (isInTournament(tournamentContract, curLocation))
2535
2387
 
                            then if (!(isInTournament(tournamentContract, newLocation)))
2536
2388
 
                                then throw("Your duck is taking part in the tournament")
2552
2404
 
                                                }
2553
2405
 
                                            else $Tuple2(curLocation, 0)
2554
2406
 
                                    }
2555
-
                            else if (!(isInDelivery(curLocation)))
2556
-
                                then {
2557
-
                                    let savedLoc = asString(invoke(this, "autoExitDelivery", [duckAssetId, newHP, if (isDeliv)
2558
-
                                        then "10"
2559
-
                                        else "11", 0], nil))
2560
-
                                    if ((savedLoc == savedLoc))
2561
-
                                        then if (isDeliv)
2562
-
                                            then $Tuple2(savedLoc, newHP)
2563
-
                                            else if ((newHP > 0))
2564
-
                                                then $Tuple2(newLocation, newHP)
2565
-
                                                else $Tuple2(savedLoc, 0)
2566
-
                                        else throw("Strict value is not equal to itself.")
2567
-
                                    }
2568
-
                                else if (!(isDeliv))
2569
-
                                    then throw("Your duck is taking part in delivery")
2570
-
                                    else if (!(isInDelivery(newLocation)))
2571
-
                                        then cheatAttempt(curLocation, newLocation, 13)
2572
-
                                        else {
2573
-
                                            let score = parseIntValue(newLoc[locIdxId])
2574
-
                                            let curLoc = split(curLocation, "_")
2575
-
                                            if ((score != (parseIntValue(curLoc[locIdxId]) + 1)))
2576
-
                                                then cheatAttempt(curLocation, newLocation, 14)
2577
-
                                                else if (if ((newHP > 0))
2578
-
                                                    then (1 > score)
2579
-
                                                    else false)
2580
-
                                                    then $Tuple2(newLocation, newHP)
2581
-
                                                    else {
2582
-
                                                        let savedLoc = asString(invoke(this, "autoExitDelivery", [duckAssetId, newHP, "15-17", score], nil))
2583
-
                                                        if ((savedLoc == savedLoc))
2584
-
                                                            then $Tuple2(savedLoc, newHP)
2585
-
                                                            else throw("Strict value is not equal to itself.")
2586
-
                                                        }
2587
-
                                            }
2588
-
                    let locToSave = $t07033073442._1
2589
-
                    let hpToSave = $t07033073442._2
2407
+
                            else throw(("Unknown curLocation:" + curLocation))
2408
+
                    let locToSave = $t06613567967._1
2409
+
                    let hpToSave = $t06613567967._2
2590
2410
 
                    $Tuple2(((([StringEntry(locKey, locToSave), StringEntry(eqKey, newEq), IntegerEntry(keyDuckHealth(duckAssetId), hpToSave)] ++ prologActions) ++ (if (shouldZeroBuffs)
2591
2411
 
                        then [StringEntry(keyDuckBuffs(duckAssetId), "0_0_0_0_0")]
2592
2412
 
                        else nil)) ++ updateDuckStatsInternal(duckAssetId, if ((newHP > 0))
2611
2431
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2612
2432
 
            if (checkTournament(duckAssetId))
2613
2433
 
                then throw("heal_checkTournament")
2614
-
                else if (checkDelivery(duckAssetId))
2615
-
                    then throw("heal_checkDelivery")
2616
-
                    else {
2617
-
                        let qts = [quantityL1, quantityL2, quantityL3]
2618
-
                        let keyHealth = keyDuckHealth(duckAssetId)
2619
-
                        let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2620
-
                        let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2621
-
                        if ((oldHealth >= maxHP))
2622
-
                            then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2623
-
                            else {
2624
-
                                let bpKey = keyBackpackByDuck(duckAssetId)
2625
-
                                let currentPack = getBackpack(bpKey)
2626
-
                                let prodList = if ((currentPack[bpIdxProd] == ""))
2627
-
                                    then nil
2628
-
                                    else split_4C(currentPack[bpIdxProd], "_")
2629
-
                                func iterateProd (acc,recipe) =                                 {
2630
-
                                    let n = acc._2
2631
-
                                    let x = if ((size(prodList) > n))
2632
-
                                        then parseIntValue(prodList[n])
2633
-
                                        else 0
2634
-
                                    if ((3 > n))
2635
-
                                        then {
2636
-
                                            let q = qts[n]
2637
-
                                            if ((q > x))
2638
-
                                                then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2639
-
                                                else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2640
-
                                            }
2641
-
                                        else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2642
-
                                    }
2643
-
2644
-
                                let result = {
2645
-
                                    let $l = productionMatrix
2646
-
                                    let $s = size($l)
2647
-
                                    let $acc0 = $Tuple3(nil, 0, 0)
2648
-
                                    func $f0_1 ($a,$i) =                                     if (($i >= $s))
2649
-
                                        then $a
2650
-
                                        else iterateProd($a, $l[$i])
2651
-
2652
-
                                    func $f0_2 ($a,$i) =                                     if (($i >= $s))
2653
-
                                        then $a
2654
-
                                        else throw("List size exceeds 50")
2655
-
2656
-
                                    $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)
2657
-
                                    }
2658
-
                                let newHealth = min([maxHP, (oldHealth + result._3)])
2659
-
                                $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)
2434
+
                else {
2435
+
                    let qts = [quantityL1, quantityL2, quantityL3]
2436
+
                    let keyHealth = keyDuckHealth(duckAssetId)
2437
+
                    let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2438
+
                    let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2439
+
                    if ((oldHealth >= maxHP))
2440
+
                        then throw((("HP should be < " + toString(maxHP)) + " to heal"))
2441
+
                        else {
2442
+
                            let bpKey = keyBackpackByDuck(duckAssetId)
2443
+
                            let currentPack = getBackpack(bpKey)
2444
+
                            let prodList = if ((currentPack[bpIdxProd] == ""))
2445
+
                                then nil
2446
+
                                else split_4C(currentPack[bpIdxProd], "_")
2447
+
                            func iterateProd (acc,recipe) =                             {
2448
+
                                let n = acc._2
2449
+
                                let x = if ((size(prodList) > n))
2450
+
                                    then parseIntValue(prodList[n])
2451
+
                                    else 0
2452
+
                                if ((3 > n))
2453
+
                                    then {
2454
+
                                        let q = qts[n]
2455
+
                                        if ((q > x))
2456
+
                                            then throw(((("You have only " + toString(x)) + " of ") + prodTypes[n]))
2457
+
                                            else $Tuple3((acc._1 :+ toString((x - q))), (n + 1), (acc._3 + (parseIntValue(split(recipe, "_")[rIdxEffect]) * q)))
2458
+
                                        }
2459
+
                                    else $Tuple3((acc._1 :+ toString(x)), (n + 1), acc._3)
2660
2460
 
                                }
2661
-
                        }
2461
+
2462
+
                            let result = {
2463
+
                                let $l = productionMatrix
2464
+
                                let $s = size($l)
2465
+
                                let $acc0 = $Tuple3(nil, 0, 0)
2466
+
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
2467
+
                                    then $a
2468
+
                                    else iterateProd($a, $l[$i])
2469
+
2470
+
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
2471
+
                                    then $a
2472
+
                                    else throw("List size exceeds 50")
2473
+
2474
+
                                $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)
2475
+
                                }
2476
+
                            let newHealth = min([maxHP, (oldHealth + result._3)])
2477
+
                            $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)
2478
+
                            }
2479
+
                    }
2662
2480
 
            }
2663
2481
 
    }
2664
2482
 
2677
2495
 
                    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
2678
2496
 
                    if (checkTournament(duckAssetId))
2679
2497
 
                        then throw("healES_checkTournament")
2680
-
                        else if (checkDelivery(duckAssetId))
2681
-
                            then throw("healES_checkDelivery")
2682
-
                            else {
2683
-
                                let keyHealth = keyDuckHealth(duckAssetId)
2684
-
                                let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2685
-
                                let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2686
-
                                if ((oldHealth > 0))
2687
-
                                    then throw("HP should be 0 to call Emergency Service")
2688
-
                                    else {
2689
-
                                        let bpKey = keyBackpackByDuck(duckAssetId)
2690
-
                                        let currentPack = getBackpack(bpKey)
2691
-
                                        let prodList = if ((currentPack[bpIdxProd] == ""))
2692
-
                                            then nil
2693
-
                                            else split_4C(currentPack[bpIdxProd], "_")
2694
-
                                        let medKitAmount1 = if ((size(prodList) > 0))
2695
-
                                            then parseIntValue(prodList[0])
2696
-
                                            else 0
2697
-
                                        let medKitAmount2 = if ((size(prodList) > 1))
2698
-
                                            then parseIntValue(prodList[1])
2699
-
                                            else 0
2700
-
                                        let medKitAmount3 = if ((size(prodList) > 2))
2701
-
                                            then parseIntValue(prodList[2])
2702
-
                                            else 0
2703
-
                                        if (if (if ((medKitAmount1 > 0))
2704
-
                                            then true
2705
-
                                            else (medKitAmount2 > 0))
2706
-
                                            then true
2707
-
                                            else (medKitAmount3 > 0))
2708
-
                                            then throw("You have to use own Medical Kit")
2709
-
                                            else {
2710
-
                                                let existStr = getString(economyContract, keyEsWarehouse())
2711
-
                                                let existAmounts = if (isDefined(existStr))
2712
-
                                                    then split_4C(value(existStr), "_")
2713
-
                                                    else nil
2714
-
                                                let existAmount = if ((size(existAmounts) > 0))
2715
-
                                                    then parseIntValue(existAmounts[0])
2716
-
                                                    else 0
2717
-
                                                if ((0 >= existAmount))
2718
-
                                                    then throw("There are no Medical Kits L1 at Emergency Service storage")
2719
-
                                                    else {
2720
-
                                                        let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2721
-
                                                        let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2722
-
                                                        let recipe = split(productionMatrix[0], "_")
2723
-
                                                        let totalMat = getRecipeMaterials(recipe)
2724
-
                                                        let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2725
-
                                                        if ((pmt.amount != sellPrice))
2726
-
                                                            then throw(("Payment attached should be " + toString(sellPrice)))
2727
-
                                                            else {
2728
-
                                                                let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2729
-
                                                                $Tuple2(((prologActions :+ IntegerEntry(keyHealth, newHealth)) ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2730
-
                                                                }
2731
-
                                                        }
2732
-
                                                }
2733
-
                                        }
2734
-
                                }
2498
+
                        else {
2499
+
                            let keyHealth = keyDuckHealth(duckAssetId)
2500
+
                            let maxHP = maxHealth(valueOrElse(getInteger(keyDuckLevel(duckAssetId)), 0))
2501
+
                            let oldHealth = valueOrElse(getInteger(keyHealth), maxHP)
2502
+
                            if ((oldHealth > 0))
2503
+
                                then throw("HP should be 0 to call Emergency Service")
2504
+
                                else {
2505
+
                                    let bpKey = keyBackpackByDuck(duckAssetId)
2506
+
                                    let currentPack = getBackpack(bpKey)
2507
+
                                    let prodList = if ((currentPack[bpIdxProd] == ""))
2508
+
                                        then nil
2509
+
                                        else split_4C(currentPack[bpIdxProd], "_")
2510
+
                                    let medKitAmount1 = if ((size(prodList) > 0))
2511
+
                                        then parseIntValue(prodList[0])
2512
+
                                        else 0
2513
+
                                    let medKitAmount2 = if ((size(prodList) > 1))
2514
+
                                        then parseIntValue(prodList[1])
2515
+
                                        else 0
2516
+
                                    let medKitAmount3 = if ((size(prodList) > 2))
2517
+
                                        then parseIntValue(prodList[2])
2518
+
                                        else 0
2519
+
                                    if (if (if ((medKitAmount1 > 0))
2520
+
                                        then true
2521
+
                                        else (medKitAmount2 > 0))
2522
+
                                        then true
2523
+
                                        else (medKitAmount3 > 0))
2524
+
                                        then throw("You have to use own Medical Kit")
2525
+
                                        else {
2526
+
                                            let existStr = getString(economyContract, keyEsWarehouse())
2527
+
                                            let existAmounts = if (isDefined(existStr))
2528
+
                                                then split_4C(value(existStr), "_")
2529
+
                                                else nil
2530
+
                                            let existAmount = if ((size(existAmounts) > 0))
2531
+
                                                then parseIntValue(existAmounts[0])
2532
+
                                                else 0
2533
+
                                            if ((0 >= existAmount))
2534
+
                                                then throw("There are no Medical Kits L1 at Emergency Service storage")
2535
+
                                                else {
2536
+
                                                    let newHealth = (oldHealth + parseIntValue(split(productionMatrix[0], "_")[rIdxEffect]))
2537
+
                                                    let newES = makeString([toString((existAmount - 1)), removeByIndex(existAmounts, 0)], "_")
2538
+
                                                    let recipe = split(productionMatrix[0], "_")
2539
+
                                                    let totalMat = getRecipeMaterials(recipe)
2540
+
                                                    let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
2541
+
                                                    if ((pmt.amount != sellPrice))
2542
+
                                                        then throw(("Payment attached should be " + toString(sellPrice)))
2543
+
                                                        else {
2544
+
                                                            let result = asString(invoke(economyContract, "updateEsStorage", [newES], [AttachedPayment(usdtAssetId, sellPrice)]))
2545
+
                                                            $Tuple2(((prologActions :+ IntegerEntry(keyHealth, newHealth)) ++ updateDuckStatsInternal(duckAssetId, xpCallES)._1), result)
2546
+
                                                            }
2547
+
                                                    }
2548
+
                                            }
2549
+
                                    }
2550
+
                            }
2735
2551
 
                    }
2736
2552
 
            }
2737
2553
 
    }
2751
2567
 
    let finishBlock = (height + randomDelay)
2752
2568
 
    let addr = toString(i.caller)
2753
2569
 
    $Tuple2(([IntegerEntry(keyCommit(addr), finishBlock)] ++ prologActions), finishBlock)
2570
+
    }
2571
+
2572
+
2573
+
2574
+
@Callable(i)
2575
+
func revealRandom (maxValue) = {
2576
+
    let prologActions = prolog(i)
2577
+
    let addr = toString(i.caller)
2578
+
    let finishKey = keyCommit(addr)
2579
+
    let finishBlock = valueOrErrorMessage(getInteger(finishKey), "You have to commitForRandom() first!")
2580
+
    if ((finishBlock > height))
2581
+
        then throw(("Random number is not ready yet, wait until height = " + toString(finishBlock)))
2582
+
        else {
2583
+
            let entropy = value(value(blockInfoByHeight(finishBlock)).vrf)
2584
+
            let salt = toBytes(valueOrElse(getString(keyLastTxIdByUser(addr)), ""))
2585
+
            let rand = getRandomNumber(maxValue, salt, entropy)
2586
+
            $Tuple2(([DeleteEntry(finishKey)] ++ prologActions), rand)
2587
+
            }
2754
2588
 
    }
2755
2589
 
2756
2590
 
2792
2626
 
            let newMat = makeString(subtractMaterials(true, mList, EXPMATERIALS), "_")
2793
2627
 
            let eqKey = keyDuckEquipment(duckAssetId)
2794
2628
 
            let currentEq = valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,")
2795
-
            let $t08088280979 = subtractEquipment(currentEq, f._5)
2796
-
            let newEq = $t08088280979._1
2797
-
            let shouldZeroBuffs = $t08088280979._2
2629
+
            let $t07588775984 = subtractEquipment(currentEq, f._5)
2630
+
            let newEq = $t07588775984._1
2631
+
            let shouldZeroBuffs = $t07588775984._2
2798
2632
 
            let e = expeditionInternal(i.caller, i.transactionId)
2799
2633
 
            let id = e._2._1
2800
2634
 
            let result = if ((0 >= f._1))
2804
2638
 
                    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)
2805
2639
 
            if (checkTournament(duckAssetId))
2806
2640
 
                then throw("expedition_checkTournament")
2807
-
                else if (checkDelivery(duckAssetId))
2808
-
                    then throw("expedition_checkDelivery")
2809
-
                    else {
2810
-
                        let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2811
-
                        $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) ++ prologActions), $Tuple3(result._2, result._3, acresResult))
2812
-
                        }
2641
+
                else {
2642
+
                    let acresResult = asInt(invoke(acresContract, "burnAcres", [S_COST_ACRES], nil))
2643
+
                    $Tuple2(((result._1 ++ updateDuckStatsInternal(duckAssetId, xpNewSLand)._1) ++ prologActions), $Tuple3(result._2, result._3, acresResult))
2644
+
                    }
2813
2645
 
            }
2814
2646
 
    }
2815
2647
 
3119
2951
 
            let addr = toString(i.originCaller)
3120
2952
 
            let virtWlgData = asAnyList(invoke(wlgContract, "checkWlgXpREADONLY", [addr], nil))
3121
2953
 
            let virtWlgPoints = asInt(virtWlgData[1])
3122
-
            let $t09686997259 = if ((0 >= virtWlgPoints))
2954
+
            let $t09179692186 = if ((0 >= virtWlgPoints))
3123
2955
 
                then $Tuple2(0, nil)
3124
2956
 
                else {
3125
2957
 
                    let deltaXP = asInt(invoke(wlgContract, "takeWlgXp", [addr], nil))
3127
2959
 
                        then $Tuple2(virtWlgPoints, [IntegerEntry(keyUserLevel(addr), asInt(virtWlgData[0])), IntegerEntry(keyUserXP(addr), asInt(virtWlgData[2]))])
3128
2960
 
                        else throw("Strict value is not equal to itself.")
3129
2961
 
                    }
3130
-
            let wlgPoints = $t09686997259._1
3131
-
            let wlgActions = $t09686997259._2
2962
+
            let wlgPoints = $t09179692186._1
2963
+
            let wlgActions = $t09179692186._2
3132
2964
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
3133
2965
 
            let freeKeyAcc = keyUserFreePoints(addr)
3134
2966
 
            let freePointsAcc = (valueOrElse(getInteger(freeKeyAcc), 0) + wlgPoints)
3212
3044
 
            let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(addr)), "You don't have a duck staked")
3213
3045
 
            if (checkTournament(duckAssetId))
3214
3046
 
                then throw("equipDuck_checkTournament")
3215
-
                else if (checkDelivery(duckAssetId))
3216
-
                    then throw("equipDuck_checkDelivery")
3217
-
                    else {
3218
-
                        let eqKey = keyDuckEquipment(duckAssetId)
3219
-
                        let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3220
-
                        let bpKey = keyBackpackByDuck(duckAssetId)
3221
-
                        let currentPack = getBackpack(bpKey)
3222
-
                        let newEq = split(equipment, "_")
3223
-
                        if ((size(newEq) != NUMSEGMENTS))
3224
-
                            then throw("Wrong equipment string")
3225
-
                            else {
3226
-
                                let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3227
-
                                let segBpAux = split(newEq[segBackpack], ";")[1]
3228
-
                                let buffEffect = if ((segBpAux == ""))
3229
-
                                    then 0
3230
-
                                    else {
3231
-
                                        let aux0 = split(segBpAux, ",")[0]
3232
-
                                        if ((aux0 == ""))
3233
-
                                            then 0
3234
-
                                            else {
3235
-
                                                let idxCnt = split(aux0, ":")
3236
-
                                                let idx = idxCnt[0]
3237
-
                                                let cnt = idxCnt[1]
3238
-
                                                if (if (if (if (if ((idx == "06"))
3239
-
                                                    then true
3240
-
                                                    else (idx == "07"))
3241
-
                                                    then true
3242
-
                                                    else (idx == "08"))
3243
-
                                                    then (cnt != "")
3244
-
                                                    else false)
3245
-
                                                    then (parseIntValue(cnt) > 0)
3246
-
                                                    else false)
3247
-
                                                    then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3248
-
                                                    else 0
3249
-
                                                }
3250
-
                                        }
3251
-
                                let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3252
-
                                let newProdB = dressB(newEq, tempProdB, false, stats)
3253
-
                                let newProdStr = bytesToProdStr(newProdB)
3254
-
                                $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)
3255
-
                                }
3256
-
                        }
3047
+
                else {
3048
+
                    let eqKey = keyDuckEquipment(duckAssetId)
3049
+
                    let currentSegs = split(valueOrElse(getString(eqKey), ",;,_,;,_,;,_,;,_,;,_,;,"), "_")
3050
+
                    let bpKey = keyBackpackByDuck(duckAssetId)
3051
+
                    let currentPack = getBackpack(bpKey)
3052
+
                    let newEq = split(equipment, "_")
3053
+
                    if ((size(newEq) != NUMSEGMENTS))
3054
+
                        then throw("Wrong equipment string")
3055
+
                        else {
3056
+
                            let tempProdB = dressB(currentSegs, prodStrToBytes(currentPack[bpIdxProd]), true, nil)
3057
+
                            let segBpAux = split(newEq[segBackpack], ";")[1]
3058
+
                            let buffEffect = if ((segBpAux == ""))
3059
+
                                then 0
3060
+
                                else {
3061
+
                                    let aux0 = split(segBpAux, ",")[0]
3062
+
                                    if ((aux0 == ""))
3063
+
                                        then 0
3064
+
                                        else {
3065
+
                                            let idxCnt = split(aux0, ":")
3066
+
                                            let idx = idxCnt[0]
3067
+
                                            let cnt = idxCnt[1]
3068
+
                                            if (if (if (if (if ((idx == "06"))
3069
+
                                                then true
3070
+
                                                else (idx == "07"))
3071
+
                                                then true
3072
+
                                                else (idx == "08"))
3073
+
                                                then (cnt != "")
3074
+
                                                else false)
3075
+
                                                then (parseIntValue(cnt) > 0)
3076
+
                                                else false)
3077
+
                                                then parseIntValue(split(productionMatrix[parseIntValue(idx)], "_")[rIdxEffect])
3078
+
                                                else 0
3079
+
                                            }
3080
+
                                    }
3081
+
                            let stats = getDuckStats(this, duckAssetId, buffEffect, true)
3082
+
                            let newProdB = dressB(newEq, tempProdB, false, stats)
3083
+
                            let newProdStr = bytesToProdStr(newProdB)
3084
+
                            $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)
3085
+
                            }
3086
+
                    }
3257
3087
 
            }
3258
3088
 
    }
3259
3089
 
3279
3109
 
            let curO = parseIntValue(curLoft[volOccupied])
3280
3110
 
            let curF = parseIntValue(curLoft[volFree])
3281
3111
 
            let newForts = split(plan, "_")
3282
-
            let $t0104097104212 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3283
-
            let tempProdB = $t0104097104212._1
3284
-
            let tempO = $t0104097104212._2
3285
-
            let tempF = $t0104097104212._3
3286
-
            let $t0104215104311 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3287
-
            let newProdB = $t0104215104311._1
3288
-
            let newO = $t0104215104311._2
3289
-
            let newF = $t0104215104311._3
3112
+
            let $t09894799062 = fortB(currentForts, prodStrToBytes(wh[whIdxProd]), curO, curF, true, nil)
3113
+
            let tempProdB = $t09894799062._1
3114
+
            let tempO = $t09894799062._2
3115
+
            let tempF = $t09894799062._3
3116
+
            let $t09906599161 = fortB(newForts, tempProdB, tempO, tempF, false, duckStats)
3117
+
            let newProdB = $t09906599161._1
3118
+
            let newO = $t09906599161._2
3119
+
            let newF = $t09906599161._3
3290
3120
 
            let newProdStr = bytesToProdStr(newProdB)
3291
3121
 
            let newLoftStr = makeString([curLoft[volLocked], toString(newO), toString(newF), curLoft[volTotal]], "_")
3292
3122
 
            $Tuple2(([StringEntry(fortKey, plan), StringEntry(whKey, makeString_2C([wh[whIdxLevels], wh[whIdxRes], wh[whIdxMat], newProdStr, newLoftStr], ":"))] ++ prologActions), 0)
3350
3180
 
3351
3181
 
3352
3182
 
@Callable(i)
3353
-
func exitDeliveryInternal (duckAssetId) = if ((i.caller != this))
3183
+
func processDelivery (duckAssetId) = if ((i.caller != this))
3354
3184
 
    then throw("Access denied")
3355
3185
 
    else {
3356
-
        let e = exitDeliveryCommon(duckAssetId, false, 0, 0)
3357
-
        $Tuple2((e._1 ++ e._2), false)
3186
+
        let addr = toString(i.originCaller)
3187
+
        let fundTotal = valueOrElse(getInteger(economyContract, deliveryFundKey), 0)
3188
+
        if ((MIN_USDT_FEE_DELIVERY > fundTotal))
3189
+
            then throw(("Delivery is not available, fund=" + fixedPoint(fundTotal, 6)))
3190
+
            else {
3191
+
                let now = lastBlock.timestamp
3192
+
                let countKey = keyUserDeliveryCount(addr)
3193
+
                let count = valueOrElse(getInteger(countKey), 0)
3194
+
                let lastDay = valueOrElse(getInteger(keyUserLastDeliveryDay(addr)), 0)
3195
+
                let today = (now / DAYMILLIS)
3196
+
                let acres = valueOrElse(getInteger(acresContract, keyAcresStakedAmountByUser(addr)), 0)
3197
+
                let allowedDeliveries = (ALLOWED_FREE_DELIVERIES + (acres / ACRES_FOR_DELIVERY_ATTEMPT))
3198
+
                if (if ((count >= allowedDeliveries))
3199
+
                    then (lastDay == today)
3200
+
                    else false)
3201
+
                    then throw((("You already used " + toString(allowedDeliveries)) + " delivery attempts for today"))
3202
+
                    else {
3203
+
                        let reward = invoke(economyContract, "sendDeliveryReward", [addr], nil)
3204
+
                        $Tuple2([IntegerEntry(countKey, (count + 1)), IntegerEntry(keyUserLastDeliveryDay(addr), today)], reward)
3205
+
                        }
3206
+
                }
3358
3207
 
        }
3359
-
3360
-
3361
-
3362
-
@Callable(i)
3363
-
func autoExitDelivery (duckAssetId,newHP,reason,score) = if ((i.caller != this))
3364
-
    then throw("Access denied")
3365
-
    else {
3366
-
        let e = exitDeliveryCommon(duckAssetId, true, newHP, score)
3367
-
        $Tuple2(e._1, e._3)
3368
-
        }
3369
-
3370
-
3371
-
3372
-
@Callable(i)
3373
-
func breakDelivery () = $Tuple2(prolog(i), "breakDelivery")
3374
3208
 
3375
3209
 
3376
3210
 
3404
3238
 
                                        let duckAssetId = parts[0]
3405
3239
 
                                        if (checkTournament(duckAssetId))
3406
3240
 
                                            then throw("prepareRobbery_checkTournament")
3407
-
                                            else if (checkDelivery(duckAssetId))
3408
-
                                                then throw("prepareRobbery_checkDelivery")
3409
-
                                                else {
3410
-
                                                    let robCost = getRobberyData(this, duckAssetId)._1
3411
-
                                                    if ((robCost > wlgAmt))
3412
-
                                                        then throw(((("Payment " + toString(wlgAmt)) + " < required ") + toString(robCost)))
3413
-
                                                        else {
3414
-
                                                            let candidates = split(parts[1], "_")
3415
-
                                                            let now = lastBlock.timestamp
3416
-
                                                            let duckState = valueOrElse(getInteger(keyDuckRobberyState(duckAssetId)), 0)
3417
-
                                                            let lockedLand = valueOrElse(getString(keyLockedLandByDuck(duckAssetId)), "")
3418
-
                                                            let landETA = valueOrElse(getInteger(keyLandCooldownETA(lockedLand)), 0)
3419
-
                                                            if (if ((duckState != duckIdxFree))
3420
-
                                                                then (landETA > now)
3421
-
                                                                else false)
3422
-
                                                                then throw(("You already started robbing, wait till " + toString(landETA)))
3423
-
                                                                else {
3424
-
                                                                    func checker (acc,landAssetId) =                                                                     {
3425
-
                                                                        let state = valueOrElse(getInteger(keyLandRobberyState(landAssetId)), 0)
3426
-
                                                                        let cooldownETA = valueOrElse(getInteger(keyLandCooldownETA(landAssetId)), 0)
3427
-
                                                                        if ((state > size(landRobCooldowns)))
3428
-
                                                                            then throw("Invalid state")
3429
-
                                                                            else if ((now > cooldownETA))
3430
-
                                                                                then {
3431
-
                                                                                    let stakedTime = valueOrElse(getInteger(keyStakedTimeByAssetId(landAssetId)), 0)
3432
-
                                                                                    if ((0 >= stakedTime))
3433
-
                                                                                        then acc
3434
-
                                                                                        else {
3435
-
                                                                                            let a = value(assetInfo(fromBase58String(landAssetId)))
3436
-
                                                                                            let d = split(a.description, "_")
3437
-
                                                                                            let pieces = numPiecesBySize(d[recLandSize])
3438
-
                                                                                            let productivity = applyBonuses(landAssetId, pieces)
3439
-
                                                                                            let deltaTime = (now - stakedTime)
3440
-
                                                                                            let availRes = fraction(deltaTime, (productivity * pieces), DAYMILLIS)
3441
-
                                                                                            if ((MIN_RES_TO_ROB > availRes))
3442
-
                                                                                                then acc
3443
-
                                                                                                else (acc :+ landAssetId)
3444
-
                                                                                            }
3445
-
                                                                                    }
3446
-
                                                                                else acc
3241
+
                                            else {
3242
+
                                                let robCost = getRobberyData(this, duckAssetId)._1
3243
+
                                                if ((robCost > wlgAmt))
3244
+
                                                    then throw(((("Payment " + toString(wlgAmt)) + " < required ") + toString(robCost)))
3245
+
                                                    else {
3246
+
                                                        let candidates = split(parts[1], "_")
3247
+
                                                        let now = lastBlock.timestamp
3248
+
                                                        let duckState = valueOrElse(getInteger(keyDuckRobberyState(duckAssetId)), 0)
3249
+
                                                        let lockedLand = valueOrElse(getString(keyLockedLandByDuck(duckAssetId)), "")
3250
+
                                                        let landETA = valueOrElse(getInteger(keyLandCooldownETA(lockedLand)), 0)
3251
+
                                                        if (if ((duckState != duckIdxFree))
3252
+
                                                            then (landETA > now)
3253
+
                                                            else false)
3254
+
                                                            then throw(("You already started robbing, wait till " + toString(landETA)))
3255
+
                                                            else {
3256
+
                                                                func checker (acc,landAssetId) =                                                                 {
3257
+
                                                                    let state = valueOrElse(getInteger(keyLandRobberyState(landAssetId)), 0)
3258
+
                                                                    let cooldownETA = valueOrElse(getInteger(keyLandCooldownETA(landAssetId)), 0)
3259
+
                                                                    if ((state > size(landRobCooldowns)))
3260
+
                                                                        then throw("Invalid state")
3261
+
                                                                        else if ((now > cooldownETA))
3262
+
                                                                            then {
3263
+
                                                                                let stakedTime = valueOrElse(getInteger(keyStakedTimeByAssetId(landAssetId)), 0)
3264
+
                                                                                if ((0 >= stakedTime))
3265
+
                                                                                    then acc
3266
+
                                                                                    else {
3267
+
                                                                                        let a = value(assetInfo(fromBase58String(landAssetId)))
3268
+
                                                                                        let d = split(a.description, "_")
3269
+
                                                                                        let pieces = numPiecesBySize(d[recLandSize])
3270
+
                                                                                        let productivity = applyBonuses(landAssetId, pieces)
3271
+
                                                                                        let deltaTime = (now - stakedTime)
3272
+
                                                                                        let availRes = fraction(deltaTime, (productivity * pieces), DAYMILLIS)
3273
+
                                                                                        if ((MIN_RES_TO_ROB > availRes))
3274
+
                                                                                            then acc
3275
+
                                                                                            else (acc :+ landAssetId)
3276
+
                                                                                        }
3277
+
                                                                                }
3278
+
                                                                            else acc
3279
+
                                                                    }
3280
+
3281
+
                                                                let filtered = {
3282
+
                                                                    let $l = candidates
3283
+
                                                                    let $s = size($l)
3284
+
                                                                    let $acc0 = nil
3285
+
                                                                    func $f0_1 ($a,$i) =                                                                     if (($i >= $s))
3286
+
                                                                        then $a
3287
+
                                                                        else checker($a, $l[$i])
3288
+
3289
+
                                                                    func $f0_2 ($a,$i) =                                                                     if (($i >= $s))
3290
+
                                                                        then $a
3291
+
                                                                        else throw("List size exceeds 10")
3292
+
3293
+
                                                                    $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)
3294
+
                                                                    }
3295
+
                                                                if ((size(filtered) == 0))
3296
+
                                                                    then throw("No candidates for robbery")
3297
+
                                                                    else {
3298
+
                                                                        let rndIdx = getRandomNumber(size(filtered), message, sig)
3299
+
                                                                        let landAssetId = filtered[rndIdx]
3300
+
                                                                        $Tuple2(([IntegerEntry(keyLandRobberyState(landAssetId), robIdxLocked), IntegerEntry(keyLandCooldownETA(landAssetId), (now + landRobCooldowns[robIdxLocked])), IntegerEntry(keyDuckRobberyState(duckAssetId), duckIdxPreparing), StringEntry(keyLockedLandByDuck(duckAssetId), landAssetId)] ++ prologActions), landAssetId)
3447
3301
 
                                                                        }
3448
-
3449
-
                                                                    let filtered = {
3450
-
                                                                        let $l = candidates
3451
-
                                                                        let $s = size($l)
3452
-
                                                                        let $acc0 = nil
3453
-
                                                                        func $f0_1 ($a,$i) =                                                                         if (($i >= $s))
3454
-
                                                                            then $a
3455
-
                                                                            else checker($a, $l[$i])
3456
-
3457
-
                                                                        func $f0_2 ($a,$i) =                                                                         if (($i >= $s))
3458
-
                                                                            then $a
3459
-
                                                                            else throw("List size exceeds 10")
3460
-
3461
-
                                                                        $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)
3462
-
                                                                        }
3463
-
                                                                    if ((size(filtered) == 0))
3464
-
                                                                        then throw("No candidates for robbery")
3465
-
                                                                        else {
3466
-
                                                                            let rndIdx = getRandomNumber(size(filtered), message, sig)
3467
-
                                                                            let landAssetId = filtered[rndIdx]
3468
-
                                                                            $Tuple2(([IntegerEntry(keyLandRobberyState(landAssetId), robIdxLocked), IntegerEntry(keyLandCooldownETA(landAssetId), (now + landRobCooldowns[robIdxLocked])), IntegerEntry(keyDuckRobberyState(duckAssetId), duckIdxPreparing), StringEntry(keyLockedLandByDuck(duckAssetId), landAssetId)] ++ prologActions), landAssetId)
3469
-
                                                                            }
3470
-
                                                                    }
3471
-
                                                            }
3472
-
                                                    }
3302
+
                                                                }
3303
+
                                                        }
3304
+
                                                }
3473
3305
 
                                        }
3474
3306
 
                                }
3475
3307
 
                        }
3490
3322
 
            $Tuple2((prologActions :+ IntegerEntry(keyLastRobberyTimeByDuck(duckAssetId), now)), 0)
3491
3323
 
            }
3492
3324
 
    }
3493
-
3494
-
3495
-
3496
-
@Callable(i)
3497
-
func acceptDelivery () = {
3498
-
    let prologActions = prolog(i)
3499
-
    let userAddr = toString(i.caller)
3500
-
    let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
3501
-
    let fundTotal = valueOrElse(getInteger(economyContract, deliveryFundKey), 0)
3502
-
    let lockedTotal = valueOrElse(getInteger(economyContract, deliveryLockedKey), 0)
3503
-
    if ((MIN_USDT_FEE_DELIVERY > (fundTotal - lockedTotal)))
3504
-
        then throw(((("Delivery is not available, fund=" + fixedPoint(fundTotal, 6)) + ", locked=") + fixedPoint(lockedTotal, 6)))
3505
-
        else {
3506
-
            let now = lastBlock.timestamp
3507
-
            let delayETA = valueOrElse(getInteger(keyDeliveryDelayByDuck(duckAssetId)), 0)
3508
-
            if ((delayETA > now))
3509
-
                then throw(("Delivery is forbidden for your duck until " + toString(delayETA)))
3510
-
                else {
3511
-
                    let health = getIntegerValue(keyDuckHealth(duckAssetId))
3512
-
                    if ((0 >= health))
3513
-
                        then throw("You cannot accept delivery with zero health")
3514
-
                        else {
3515
-
                            let countKey = keyUserDeliveryCount(userAddr)
3516
-
                            let count = valueOrElse(getInteger(countKey), 0)
3517
-
                            let lastDay = valueOrElse(getInteger(keyUserLastDeliveryDay(userAddr)), 0)
3518
-
                            let today = (now / DAYMILLIS)
3519
-
                            let acres = valueOrElse(getInteger(acresContract, keyAcresStakedAmountByUser(userAddr)), 0)
3520
-
                            let allowedDeliveries = (ALLOWED_FREE_DELIVERIES + (acres / ACRES_FOR_DELIVERY_ATTEMPT))
3521
-
                            if (if ((count >= allowedDeliveries))
3522
-
                                then (lastDay == today)
3523
-
                                else false)
3524
-
                                then throw((("You already used " + toString(allowedDeliveries)) + " delivery attempts for today"))
3525
-
                                else if (checkTournament(duckAssetId))
3526
-
                                    then throw("acceptDelivery_checkTournament")
3527
-
                                    else if (checkDelivery(duckAssetId))
3528
-
                                        then throw("acceptDelivery_checkDelivery")
3529
-
                                        else {
3530
-
                                            let newLockedTotal = asInt(invoke(economyContract, "updateDeliveryLocked", [(lockedTotal + MIN_USDT_FEE_DELIVERY)], nil))
3531
-
                                            let curLocKey = keyDuckLocation(duckAssetId)
3532
-
                                            let curLocation = valueOrElse(getString(curLocKey), DEFAULTLOCATION)
3533
-
                                            let deliveryLocation = (toString(now) + "_D_0")
3534
-
                                            $Tuple2(([StringEntry(keySavedLocation(duckAssetId), curLocation), StringEntry(curLocKey, deliveryLocation), IntegerEntry(countKey, if ((lastDay != today))
3535
-
                                                then 0
3536
-
                                                else count)] ++ prologActions), $Tuple2(deliveryLocation, newLockedTotal))
3537
-
                                            }
3538
-
                            }
3539
-
                    }
3540
-
            }
3541
-
    }
3542
-
3543
-
3544
-
3545
-
@Callable(i)
3546
-
func checkDeliveryCallback (duckAssetId) = if ((i.caller != tournamentContract))
3547
-
    then throw("Access denied")
3548
-
    else $Tuple2(nil, checkDelivery(duckAssetId))
3549
3325
 
3550
3326
 
3551
3327
 

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