tx · BvMzugfkeWcn5ckPb4ECCsXaxgKn14f4nq5jyM2NmtQd

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.07600000 Waves

2023.07.23 16:47 [2678579] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BvMzugfkeWcn5ckPb4ECCsXaxgKn14f4nq5jyM2NmtQd",
    "fee": 7600000,
    "feeAssetId": null,
    "timestamp": 1690120033383,
    "version": 2,
    "chainId": 84,
    "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm",
    "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX",
    "proofs": [
        "4WHw8C5FpLBkJHKsj5Mv847wFx9BLe6EkrSQrQqFwCn4S7hCWfgsXWJwE4U6M9AZZgEpKPa3RzHngC2MEnEj5WSd"
    ],
    "script": "base64:BgKyAQgCEgMKAQgSAwoBBBIAEgMKAQgSABIDCgEIEgQKAgEIEgQKAgEIEgQKAgICEgUKAwEBARIAEgQKAggIEgASBAoCAgISAwoBCBIDCgEIEgQKAggIEgMKARgSAwoBGBIECgIICBIECgIICBIDCgEIEgMKAQgSBQoDCAgIEgQKAggIEgcKBQEBAQEBEgMKAQESBQoDAQEIEgMKAQgSAwoBCBIAEgQKAggBEgQKAggBEgMKAQjVAQEUa2V5TGFzdEFyYlRpbWVCeVVzZXIBBGFkZHIJAKwCAgIQbGFzdEFyYlRpbWVVc2VyXwUEYWRkcgAGU0NBTEU4AIDC1y8ADHhwTGV2ZWxTY2FsZQCAGQAPeHBMZXZlbFJlY2lwUG93AKAfABJudW1Qb2ludHNPbkxldmVsVXAAAwAMcmVxdWlyZW1lbnRzCQDMCAICCFN0cmVuZ3RoCQDMCAICCEFjY3VyYWN5CQDMCAICCUludGVsbGVjdAkAzAgCAglFbmR1cmFuY2UJAMwIAgIJRGV4dGVyaXR5CQDMCAICBUxldmVsCQDMCAICBkhlYWx0aAUDbmlsAAxjaGFyU3RyZW5ndGgAAAAMY2hhckFjY3VyYWN5AAEADWNoYXJJbnRlbGxlY3QAAgANY2hhckVuZHVyYW5jZQADAA1jaGFyRGV4dGVyaXR5AAQAC05VTVNFR01FTlRTAAYACk5VTU1BSU5BVVgAAgAITUFYU0xPVFMAAgANTUFYUFJPRElOU0xPVAAeAQ1rZXlEdWNrSGVhbHRoAQtkdWNrQXNzZXRJZAkArAICAgtkdWNrSGVhbHRoXwULZHVja0Fzc2V0SWQBDGtleUR1Y2tDaGFycwELZHVja0Fzc2V0SWQJAKwCAgIKZHVja0NoYXJzXwULZHVja0Fzc2V0SWQBCWtleUR1Y2tYUAELZHVja0Fzc2V0SWQJAKwCAgIHZHVja1hQXwULZHVja0Fzc2V0SWQBDGtleUR1Y2tMZXZlbAELZHVja0Fzc2V0SWQJAKwCAgIKZHVja0xldmVsXwULZHVja0Fzc2V0SWQBEWtleUR1Y2tGcmVlUG9pbnRzAQtkdWNrQXNzZXRJZAkArAICAg9kdWNrRnJlZVBvaW50c18FC2R1Y2tBc3NldElkARBrZXlEdWNrRXF1aXBtZW50AQtkdWNrQXNzZXRJZAkArAICAg5kdWNrRXF1aXBtZW50XwULZHVja0Fzc2V0SWQBCWtleVVzZXJYUAEEYWRkcgkArAICAgd1c2VyWFBfBQRhZGRyAQxrZXlVc2VyTGV2ZWwBBGFkZHIJAKwCAgIKdXNlckxldmVsXwUEYWRkcgERa2V5VXNlckZyZWVQb2ludHMBBGFkZHIJAKwCAgIPdXNlckZyZWVQb2ludHNfBQRhZGRyAAd4cENsYWltAKCNBgAPeHBTdWNjZXNzRmxpZ2h0ANCGAwAMeHBGYWlsRmxpZ2h0AJBOAAh4cENhbGxFUwCgjQYADHhwQ3VzdG9tTmFtZQDAlrECAAp4cE5ld1NMYW5kAIDh6xcADnhwVXBncmFkZUluZnJhAKCNBgAHeHBNZXJnZQCAreIEAAl4cE9uYm9hcmQAgK3iBAAGeHBIZWFsAJBOAQlsZXZlbEJ5WFABAnhwCQBrAwUMeHBMZXZlbFNjYWxlCQBsBgUCeHAABAUPeHBMZXZlbFJlY2lwUG93AAQABAUERE9XTgUGU0NBTEU4AQltYXhIZWFsdGgBBWxldmVsCQBkAgBkBQVsZXZlbAEHbGV2ZWxVcAIJY3VyckxldmVsBW5ld1hQBAhuZXdMZXZlbAkBCWxldmVsQnlYUAEFBW5ld1hQCQDMCAIFCG5ld0xldmVsCQDMCAIJAGgCBRJudW1Qb2ludHNPbkxldmVsVXAJAGUCBQhuZXdMZXZlbAUJY3VyckxldmVsBQNuaWwBDGdldER1Y2tTdGF0cwIPc3Rha2luZ0NvbnRyYWN0C2R1Y2tBc3NldElkBAVjaGFycwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBDGtleUR1Y2tDaGFycwEFC2R1Y2tBc3NldElkAgkwXzBfMF8wXzACAV8EA2x2bAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAZoZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkCQEJbWF4SGVhbHRoAQUDbHZsCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhclN0cmVuZ3RoCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhckFjY3VyYWN5CQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUNY2hhckludGVsbGVjdAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJFbmR1cmFuY2UJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQ1jaGFyRGV4dGVyaXR5CQDMCAIFA2x2bAkAzAgCBQZoZWFsdGgFA25pbAAKTEFORFBSRUZJWAIETEFORAAKRFVDS1BSRUZJWAIERFVDSwAKQVJUUFJFU0FMRQIHUFJFU0FMRQAGTlVNUkVTAAYAD0RBSUxZUkVTQllQSUVDRQCA+NIBAAlEQVlNSUxMSVMAgLiZKQAMV0hNVUxUSVBMSUVSAIDIr6AlAA9ERUZBVUxUTE9DQVRJT04CD0FmcmljYV9GX0FmcmljYQAQUkVTT1VSQ0VQUklDRU1JTgDVtQIACkVTU0VMTENPRUYACgAJcHJvZFR5cGVzCQDMCAICEEZpcnN0IEFpZCBLaXQgTDEJAMwIAgIQRmlyc3QgQWlkIEtpdCBMMgkAzAgCAhBGaXJzdCBBaWQgS2l0IEwzCQDMCAICC0JhY2twYWNrIEwxCQDMCAICC0JhY2twYWNrIEwyCQDMCAICC0JhY2twYWNrIEwzCQDMCAICDkZvb2QgUmF0aW9uIEwxCQDMCAICDkZvb2QgUmF0aW9uIEwyCQDMCAICDkZvb2QgUmF0aW9uIEwzCQDMCAICC0pldCBQYWNrIEwxCQDMCAICC0pldCBQYWNrIEwyCQDMCAICC0pldCBQYWNrIEwzCQDMCAICCVNoaWVsZCBMMQkAzAgCAglTaGllbGQgTDIJAMwIAgIJU2hpZWxkIEwzBQNuaWwACmNvbnRpbmVudHMJAMwIAgIIQW1lcmljYXMJAMwIAgIGRXVyb3BlCQDMCAICBEFzaWEJAMwIAgIGQWZyaWNhCQDMCAICB09jZWFuaWEFA25pbAAJQ09FRkYyTUFUAICt4gQAEHByb2R1Y3Rpb25NYXRyaXgJAMwIAgIlOF84XzhfMTdfMTdfNDJfMTJfMF8zMF8wLDAsMCwwLDAsMCwwXwkAzAgCAiU4XzhfOF8xN18xN180Ml8yNF8wXzYwXzAsMCw1LDIsMCwwLDBfCQDMCAICJzhfOF84XzE3XzE3XzQyXzM2XzBfMTIwXzAsMCwxMCw0LDAsMCwwXwkAzAgCAik4XzE5XzE5XzhfMjdfMTlfMjZfMV8yMF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAik4XzE5XzE5XzhfMjdfMTlfNTJfMV80MF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAik4XzE5XzE5XzhfMjdfMTlfNzhfMV84MF8wLDAsMCwwLDAsMCwwXzAwMQkAzAgCAiI4XzhfOF84XzhfNjBfMTNfMl8yXzAsMCwwLDAsMCwwLDBfCQDMCAICIjhfOF84XzhfOF82MF8yNl8yXzRfMCwwLDAsMCwwLDAsMF8JAMwIAgIiOF84XzhfOF84XzYwXzM5XzJfOF8wLDAsMCwwLDAsMCwwXwkAzAgCAikzMF8zMF8zXzE3XzE3XzNfMzBfM18zMF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAikzMF8zMF8zXzE3XzE3XzNfNjBfM181MF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAikzMF8zMF8zXzE3XzE3XzNfOTBfM183MF8wLDAsMCwwLDAsMCwwXzExMQkAzAgCAisxOF8xOF8xMF8xOF8xOF8xOF8xMV80XzMwXzAsMCwwLDAsMCwwLDBfMjAxCQDMCAICKzE4XzE4XzEwXzE4XzE4XzE4XzIyXzRfNTBfMCwwLDAsMCwwLDAsMF8yMDEJAMwIAgIrMThfMThfMTBfMThfMThfMThfMzNfNF83MF8wLDAsMCwwLDAsMCwwXzIwMQUDbmlsAAlySWR4Q29lZmYABgAQcklkeFJlcXVpcmVtZW50cwAJAAlySWR4U2xvdHMACgAOUFJPRFVDVFBLR1NJWkUACgALd2hJZHhMZXZlbHMAAAAId2hJZHhSZXMAAQAId2hJZHhNYXQAAgAJd2hJZHhQcm9kAAMACXdoSWR4TE9GVAAEAAl2b2xMb2NrZWQAAAALdm9sT2NjdXBpZWQAAQAHdm9sRnJlZQACAAh2b2xUb3RhbAADAApicElkeExldmVsAAAACGJwSWR4UmVzAAEACGJwSWR4TWF0AAIACWJwSWR4UHJvZAADARFrZXlMYXN0VHhJZEJ5VXNlcgEEYWRkcgkArAICAg9sYXN0VHhJZEJ5VXNlcl8FBGFkZHIBFWtleUxhbmRBc3NldElkVG9Pd25lcgEHYXNzZXRJZAkArAICAgluZnRPd25lcl8FB2Fzc2V0SWQBGmtleUxhbmRBc3NldElkVG9DdXN0b21OYW1lAQdhc3NldElkCQCsAgICGGxhbmRDdXN0b21OYW1lQnlBc3NldElkXwUHYXNzZXRJZAEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAgtzdGFrZWRUaW1lXwUHYXNzZXRJZAEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAgtpbmZyYUxldmVsXwUHYXNzZXRJZAEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBHR5cGUHYXNzZXRJZAkAuQkCCQDMCAICDWxhbmRBcnRTdGF0dXMJAMwIAgUEdHlwZQkAzAgCBQdhc3NldElkBQNuaWwCAV8BImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDB25mdFR5cGUHYXNzZXRJZAlvd25lckFkZHIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAiBzdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyXwUHbmZ0VHlwZQIBXwUHYXNzZXRJZAIBXwUJb3duZXJBZGRyARJrZXlXYXJlaG91c2VCeUxhbmQBC2xhbmRBc3NldElkCQCsAgICCndhcmVIb3VzZV8FC2xhbmRBc3NldElkARprZXlEdWNrQXNzZXRJZFRvQ3VzdG9tTmFtZQEHYXNzZXRJZAkArAICAhhkdWNrQ3VzdG9tTmFtZUJ5QXNzZXRJZF8FB2Fzc2V0SWQBFmtleUFkZHJlc3NUb0N1c3RvbU5hbWUBBGFkZHIJAKwCAgIYYWNjb3VudEN1c3RvbU5hbWVCeUFkZHJfBQRhZGRyAQ9rZXlBZGRyZXNzUmVmQnkBBGFkZHIJAKwCAgIJYWNjUmVmQnlfBQRhZGRyARxrZXlPbmJvYXJkQXJ0QWN0aXZhdGVkT25EdWNrAQtkdWNrQXNzZXRJZAkArAICAhpvbmJvYXJkQXJ0QWN0aXZhdGVkT25EdWNrXwULZHVja0Fzc2V0SWQBHGtleU9uYm9hcmRBcnREdWNrQWN0aXZhdGVkQnkBBGFkZHIJAKwCAgIab25ib2FyZEFydEFjdGl2YXRlZER1Y2tCeV8FBGFkZHIBE2tleUFkZHJlc3NSZWZlcnJhbHMBBGFkZHIJAKwCAgINYWNjUmVmZXJyYWxzXwUEYWRkcgEQa2V5RHVja0lkVG9Pd25lcgEHYXNzZXRJZAkArAICAgpkdWNrT3duZXJfBQdhc3NldElkARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyARFrZXlCYWNrcGFja0J5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIJYmFja1BhY2tfBQtkdWNrQXNzZXRJZAEPa2V5RHVja0xvY2F0aW9uAQtkdWNrQXNzZXRJZAkArAICAg1kdWNrTG9jYXRpb25fBQtkdWNrQXNzZXRJZAEKa2V5QmxvY2tlZAACEGNvbnRyYWN0c0Jsb2NrZWQBFWtleVVzZXJHd2xSZWxlYXNlVGltZQEIdXNlckFkZHIJAKwCAgIaJXMlc19fdXNlckd3bFJlbGVhc2VUaW1lX18FCHVzZXJBZGRyAQ5rZXlFc1dhcmVob3VzZQACGmVtZXJnZW5jeVdhcmVob3VzZVByb2R1Y3RzAApsb2NJZHhUeXBlAAEACGxvY0lkeElkAAIBEmdldFJlY2lwZU1hdGVyaWFscwEGcmVjaXBlCQBoAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnJlY2lwZQUJcklkeENvZWZmBQlDT0VGRjJNQVQAD0tTQUxMT1dYUExFVkVMUwYABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgARSW5mcmFVcGdyYWRlQ29zdFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgMivoCUDCQAAAgEBVAUHJG1hdGNoMACAwtcvCQACAQINVW5rbm93biBjaGFpbgAOYXJiaXRyYWdlRGVsYXkEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAwM8kAwkAAAIBAVQFByRtYXRjaDAA4NQDCQACAQINVW5rbm93biBjaGFpbgADU0VQAgJfXwAFTVVMVDYAwIQ9AAVNVUxUOACAwtcvAAVTU0laRQAZAAVNU0laRQBkAAVMU0laRQDhAQAGWExTSVpFAJADAAdYWExTSVpFAPEEAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQARSWR4Q2ZnRWNvbm9teURhcHAAAgAUSWR4Q2ZnR292ZXJuYW5jZURhcHAAAwANSWR4Q2ZnV2xnRGFwcAAEAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALZ292Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRRJZHhDZmdHb3Zlcm5hbmNlRGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAApyZWNMYW5kTnVtAAAAC3JlY0xhbmRTaXplAAEAC3JlY1RlcnJhaW5zAAIADHJlY0NvbnRpbmVudAADARFrZXlSZXNQcm9wb3J0aW9ucwACE3Jlc1R5cGVzUHJvcG9ydGlvbnMBFWtleVN0YWtlZExhbmRzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICE3N0YWtlZExhbmRzQnlPd25lcl8FCW93bmVyQWRkcgEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICFHN0YWtlZFBpZWNlc0J5T3duZXJfBQlvd25lckFkZHIBCGFzU3RyaW5nAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ9udW1QaWVjZXNCeVNpemUBCGxhbmRTaXplBAckbWF0Y2gwBQhsYW5kU2l6ZQMJAAACAgFTBQckbWF0Y2gwBQVTU0laRQMJAAACAgFNBQckbWF0Y2gwBQVNU0laRQMJAAACAgFMBQckbWF0Y2gwBQVMU0laRQMJAAACAgJYTAUHJG1hdGNoMAUGWExTSVpFAwkAAAICA1hYTAUHJG1hdGNoMAUHWFhMU0laRQkAAgECEVVua25vd24gbGFuZCBzaXplAQdpc0RpZ2l0AQFzCQEJaXNEZWZpbmVkAQkAtgkBBQFzAA1pbmN1YmF0b3JBZGRyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUEVrdFZ1eDJSaGNoU042M0RzRG80YjRtejRRcXpLU2VEdgMJAAACAQFUBQckbWF0Y2gwBQR0aGlzCQACAQINVW5rbm93biBjaGFpbgALYnJlZWRlckFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQRFZ1VTQ1SDdFaDVkbXROYm5STlJTdEd3VUxBN05ZNkhiAwkAAAIBAVQFByRtYXRjaDAFBHRoaXMJAAIBAg1Vbmtub3duIGNoYWluAANwdWIBIE9T4ho/VKjWnVJOEx1GJ1W9s1PzLHvJVFSw/0PBtBQoAAhtZWRLaXRIcAkAzAgCAB4JAMwIAgA8CQDMCAIAeAUDbmlsABFGSVZFTUlOVVRFU01JTExJUwDgpxIADFJFTkFNSU5HQ09TVADAlrECAApNQVhOQU1FTEVOADIAFUluZnJhVXBncmFkZUNvc3RTVXNkdACAreIEAAxFWFBNQVRFUklBTFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAApt2C7asHAwkAAAIBAVQFByRtYXRjaDAAqqeBswkJAAIBAg1Vbmtub3duIGNoYWluAAdFWFBVU0RUBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAIDlmncDCQAAAgEBVAUHJG1hdGNoMACA5Zp3CQACAQINVW5rbm93biBjaGFpbgAFRklWRVgJALYCAQAFAAdUV0VOVFlYCQC2AgEAFAAIVFdFTlRZMlgJALYCAQkAaAIAFAAUAAhUV0VOVFkzWAkAtgIBCQBoAgkAaAIAFAAUABQACFRXRU5UWTRYCQC2AgEJAGgCCQBoAgkAaAIAFAAUABQAFAAIVFdFTlRZNVgJALYCAQkAaAIJAGgCCQBoAgkAaAIAFAAUABQAFAAUAA9QUkVTQUxFTlVNTEFORFMA9AMBEmtleU5leHRGcmVlTGFuZE51bQACC25leHRMYW5kTnVtARBrZXlMYW5kVG9Bc3NldElkAQdsYW5kTnVtCQCsAgICDGxhbmRUb0Fzc2V0XwUHbGFuZE51bQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBBG5hbWUJAKwCAgIRbGFuZEJ5Q3VzdG9tTmFtZV8FBG5hbWUBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIHYXNzZXRJZAlvd25lckFkZHIJAKwCAgkArAICCQCsAgICHGluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcl8FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMEdHlwZQdhc3NldElkCW93bmVyQWRkcgkAuQkCCQDMCAICImxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIJAMwIAgUEdHlwZQkAzAgCBQdhc3NldElkCQDMCAIFCW93bmVyQWRkcgUDbmlsAgFfARFrZXlMYW5kTnVtVG9Pd25lcgEHbGFuZE51bQkArAICAgpsYW5kT3duZXJfBQdsYW5kTnVtARprZXlEdWNrQ3VzdG9tTmFtZVRvQXNzZXRJZAEEbmFtZQkArAICAhFkdWNrQnlDdXN0b21OYW1lXwUEbmFtZQEWa2V5Q3VzdG9tTmFtZVRvQWRkcmVzcwEEbmFtZQkArAICAhRhY2NvdW50QnlDdXN0b21OYW1lXwUEbmFtZQEJa2V5T2xkaWVzAAIKb2xkaWVzTGlzdAALY2xhaW1Nb2RlV2gAAAANY2xhaW1Nb2RlRHVjawABABNjbGFpbU1vZGVXaFRoZW5EdWNrAAIACGZsSGVhbHRoAAAAC2ZsVGltZXN0YW1wAAUAB2ZsQm9udXMABgALZmxQcm9kc1VzZWQABwEHbmZ0TmFtZQIHbGFuZE51bQhsYW5kU2l6ZQkArAICCQCsAgIFCkxBTkRQUkVGSVgFB2xhbmROdW0FCGxhbmRTaXplARNkaXN0cmlidXRlQnlXZWlnaHRzAgV0b3RhbAd3ZWlnaHRzBANzdW0JAGQCCQBkAgkAZAIJAGQCCQBkAgkAkQMCBQd3ZWlnaHRzAAAJAJEDAgUHd2VpZ2h0cwABCQCRAwIFB3dlaWdodHMAAgkAkQMCBQd3ZWlnaHRzAAMJAJEDAgUHd2VpZ2h0cwAECQCRAwIFB3dlaWdodHMABQMJAGcCAAAFA3N1bQkAAgECEFplcm8gd2VpZ2h0cyBzdW0EBW5vcm02CQBrAwUFdG90YWwFBU1VTFQ2BQNzdW0KAQpub3JtYWxpemVyAgNhY2MEZWxlbQkAzQgCBQNhY2MJAGsDBQRlbGVtBQVub3JtNgUFTVVMVDYKAAIkbAUHd2VpZ2h0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKbm9ybWFsaXplcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgESZ2V0TmVlZGVkTWF0ZXJpYWxzAQV0b3RhbAQFcHJvcHMJALUJAgkBBXZhbHVlAQkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgFfAwkBAiE9AgkAkAMBBQVwcm9wcwUGTlVNUkVTCQACAQIWV3JvbmcgcHJvcG9ydGlvbnMgZGF0YQQBcgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAwkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABQUDbmlsCQETZGlzdHJpYnV0ZUJ5V2VpZ2h0cwIFBXRvdGFsBQFyARFzdWJ0cmFjdE1hdGVyaWFscwMMc2hvdWxkVXNlTWF0A2hhcwl0b3RhbE5lZWQEBG5lZWQJARJnZXROZWVkZWRNYXRlcmlhbHMBBQl0b3RhbE5lZWQKAQpzdWJ0cmFjdG9yAgNhY2MDaWR4BAZyZXN1bHQJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDaGFzBQNpZHgJAJEDAgUEbmVlZAUDaWR4AwkAZgIAAAUGcmVzdWx0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICGE5vdCBlbm91Z2ggbWF0ZXJpYWwgaWR4PQkApAMBBQNpZHgCCywgeW91IGhhdmUgCQCRAwIFA2hhcwUDaWR4AgssIGJ1dCBuZWVkIAkApAMBCQCRAwIFBG5lZWQFA2lkeAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0AwUMc2hvdWxkVXNlTWF0CgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKc3VidHJhY3RvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgUDaGFzARFzdWJ0cmFjdEVxdWlwbWVudAIFb2xkRXEFcFVzZWQKAQdzdWJVc2VkAgNhY2MGaWR4QW10BAVwYXJ0cwkAtQkCBQZpZHhBbXQCASwDCQECIT0CCQCQAwEFBXBhcnRzAAIJAAIBAihJbmNvcnJlY3QgZm9ybWF0LCBzaG91bGQgYmUgaW5kZXgsYW1vdW50BANpZHgJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAAAwMJAGYCAAAFA2lkeAYJAGcCBQNpZHgJAJADAQUQcHJvZHVjdGlvbk1hdHJpeAkAAgECE1Vua25vd24gcHJvZHVjdCBpZHgEA2FtdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAEEB2VxUGFydHMJALUJAgUDYWNjCQCsAgIJAJEDAgUFcGFydHMAAAIBOgMJAQIhPQIJAJADAQUHZXFQYXJ0cwACCQACAQkArAICCQCsAgICD1lvdSBkb24ndCBoYXZlIAkAkQMCBQlwcm9kVHlwZXMFA2lkeAIJIGVxdWlwcGVkBAN0bXAJAJEDAgUHZXFQYXJ0cwABBAZudW1MZW4DCQEHaXNEaWdpdAEJAK8CAgkAsAICBQN0bXAAAQABAAIAAQQEY3VycgkBDXBhcnNlSW50VmFsdWUBCQCvAgIFA3RtcAUGbnVtTGVuBAR0YWlsCQCwAgIFA3RtcAUGbnVtTGVuBAZuZXdBbXQDCQBnAgUEY3VycgUDYW10CQBlAgUEY3VycgUDYW10CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICDVlvdSBlcXVpcHBlZCAJAKQDAQUEY3VycgIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFA2lkeAITLCBidXQgdHJpZWQgdG8gdXNlIAkApAMBBQNhbXQJAKwCAgkArAICCQCsAgIJAKwCAgkAkQMCBQdlcVBhcnRzAAAJAJEDAgUFcGFydHMAAAIBOgkApAMBBQZuZXdBbXQFBHRhaWwKAAIkbAkAtQkCBQVwVXNlZAIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFBW9sZEVxCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdzdWJVc2VkAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAQ5wcm9kU3RyVG9CeXRlcwEHcHJvZFN0cgQFcExpc3QDCQAAAgUHcHJvZFN0cgIABQNuaWwJALUJAgUHcHJvZFN0cgIBXwoBBHRvQlYCA2FjYwZyZWNpcGUEAWoJAGkCCQDIAQEFA2FjYwAIBARjdXJyAwkAZgIJAJADAQUFcExpc3QFAWoJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwTGlzdAUBagAACQDLAQIFA2FjYwkAmgMBBQRjdXJyCgACJGwFEHByb2R1Y3Rpb25NYXRyaXgKAAIkcwkAkAMBBQIkbAoABSRhY2MwAQAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBHRvQlYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgEOYnl0ZXNUb1Byb2RTdHIBAmJ2CgEGZnJvbUJWAgNhY2MGcmVjaXBlBAFqCQCQAwEFA2FjYwQBYgkAyQECCQDKAQIFAmJ2CQBoAgAIBQFqAAgJAM0IAgUDYWNjCQCkAwEJALEJAQUBYgkAuQkCCgACJGwFEHByb2R1Y3Rpb25NYXRyaXgKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmZyb21CVgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyAgFfARVjaGVja1N0YXRSZXF1aXJlbWVudHMCCWR1Y2tTdGF0cwRyZXFzCgEFY2hlY2sCA2FjYwFqAwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRyZXFzBQFqCQCRAwIFCWR1Y2tTdGF0cwUBagkAAgEJAKwCAgIbUmVxdWlyZW1lbnQgbm90IHNhdGlzZmllZDogCQCRAwIFDHJlcXVpcmVtZW50cwUBagYKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAHCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVjaGVjawIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAQhhZGRQcm9kQgcGaWR4Q250BXBMaXN0CmlzUG9zaXRpdmUHc2VnbWVudAdtYWluQXV4BHNsb3QJZHVja1N0YXRzBAVwYXJ0cwkAtQkCBQZpZHhDbnQCAToDCQECIT0CCQCQAwEFBXBhcnRzAAIJAAIBAihJbmNvcnJlY3QgZm9ybWF0LCBzaG91bGQgYmUgaW5kZXg6YW1vdW50AwkBAiE9AgkAsQIBCQCRAwIFBXBhcnRzAAAAAgkAAgECK1Byb2R1Y3QgaWR4IHNob3VsZCBiZSAyIGRpZ2l0cywgemVybyBwYWRkZWQECnByb2R1Y3RJZHgJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAABAVjb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXBhcnRzAAEDAwkAZgIAAAUKcHJvZHVjdElkeAYJAGcCBQpwcm9kdWN0SWR4CQCQAwEFEHByb2R1Y3Rpb25NYXRyaXgJAAIBAhNVbmtub3duIHByb2R1Y3QgaWR4AwkAZgIAAAUFY291bnQJAAIBAhdDb3VudCBjYW4ndCBiZSBuZWdhdGl2ZQMJAGYCBQVjb3VudAUNTUFYUFJPRElOU0xPVAkAAgEJAKwCAgkArAICCQCsAgICFENhbid0IHB1dCBtb3JlIHRoYW4gCQCkAwEFDU1BWFBST0RJTlNMT1QCBCBvZiAJAJEDAgUJcHJvZFR5cGVzBQpwcm9kdWN0SWR4AwkAAAIFBWNvdW50AAAJAJQKAgUFcExpc3QHBARoZWFkCQDJAQIFBXBMaXN0CQBoAgAIBQpwcm9kdWN0SWR4BARjdXJyCQCxCQEJAMkBAgkAygECBQVwTGlzdAkAaAIACAUKcHJvZHVjdElkeAAIBAR0YWlsCQDKAQIFBXBMaXN0CQBoAgAICQBkAgUKcHJvZHVjdElkeAABBAZyZWNpcGUJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4BQpwcm9kdWN0SWR4AgFfAwMJAQEhAQUKaXNQb3NpdGl2ZQkAZgIFBWNvdW50BQRjdXJyBwkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAglZb3UgaGF2ZSAJAKQDAQUEY3VycgIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFCnByb2R1Y3RJZHgCEywgYnV0IHRyaWVkIHRvIHVzZSAJAKQDAQUFY291bnQECWlzQmlnSXRlbQMDCQEBIQEFCmlzUG9zaXRpdmUJARVjaGVja1N0YXRSZXF1aXJlbWVudHMCBQlkdWNrU3RhdHMJALUJAgkAkQMCBQZyZWNpcGUFEHJJZHhSZXF1aXJlbWVudHMCASwHBAZjb21wYXQJAJEDAgUGcmVjaXBlBQlySWR4U2xvdHMDCQAAAgUGY29tcGF0AgAJAAIBAhdJdGVtIGNhbm5vdCBiZSBlcXVpcHBlZAQBYwkBDXBhcnNlSW50VmFsdWUBBQZjb21wYXQEBGNTZWcJAGkCBQFjAGQDCQECIT0CBQdzZWdtZW50BQRjU2VnCQACAQIUU2VnbWVudCBpbmNvbXBhdGlibGUECGNNYWluQXV4CQBpAgkAagIFAWMAZAAKAwkBAiE9AgUHbWFpbkF1eAUIY01haW5BdXgJAAIBAhFTbG90IGluY29tcGF0aWJsZQQJY051bVNsb3RzCQBqAgUBYwAKAwMJAQIhPQIFBHNsb3QAAAkAZgIFCWNOdW1TbG90cwABBwkAAgECHkJpZyBpdGVtcyBzaG91bGQgb2NjdXB5IHNsb3QgMAkAZgIFCWNOdW1TbG90cwABBwkAlAoCCQDLAQIJAMsBAgUEaGVhZAkAmgMBCQBkAgUEY3VycgMFCmlzUG9zaXRpdmUFBWNvdW50CQEBLQEFBWNvdW50BQR0YWlsBQlpc0JpZ0l0ZW0BC3Nsb3RzR3JvdXBCBgFnBGJwSW4KaXNQb3NpdGl2ZQdzZWdtZW50B21haW5BdXgEcmVxcwMJAQIhPQIFAWcCAAQFc2xvdHMJALUJAgUBZwIBLAMJAGYCCQCQAwEFBXNsb3RzBQhNQVhTTE9UUwkAAgECEldyb25nIHNsb3RzIGZvcm1hdAQCczAJAJEDAgUFc2xvdHMAAAQCczEDCQBmAgkAkAMBBQVzbG90cwABCQCRAwIFBXNsb3RzAAECAAMDCQAAAgUCczACAAkAAAIFAnMxAgAHBQRicEluBAV0bXBTMAMJAQIhPQIFAnMwAgAJAQhhZGRQcm9kQgcFAnMwBQRicEluBQppc1Bvc2l0aXZlBQdzZWdtZW50BQdtYWluQXV4AAAFBHJlcXMJAJQKAgUEYnBJbgcDCQECIT0CBQJzMQIAAwgFBXRtcFMwAl8yCQACAQIeQmlnIGl0ZW0gYWxyZWFkeSBvY2N1cGllcyBzbG90CAkBCGFkZFByb2RCBwUCczEIBQV0bXBTMAJfMQUKaXNQb3NpdGl2ZQUHc2VnbWVudAUHbWFpbkF1eAABBQRyZXFzAl8xCAUFdG1wUzACXzEFBGJwSW4BBmRyZXNzQgQHc2VnTGlzdAZwQnl0ZXMKaXNQb3NpdGl2ZQRyZXFzCgEHc2VnbWVudAIDYWNjA3NlZwQBaggFA2FjYwJfMQQHbWFpbkF1eAkAtQkCBQNzZWcCATsDCQECIT0CCQCQAwEFB21haW5BdXgFCk5VTU1BSU5BVVgJAAIBAhRXcm9uZyBzZWdtZW50IGZvcm1hdAQBbQkAkQMCBQdtYWluQXV4AAAEAWEJAJEDAgUHbWFpbkF1eAABAwMJAAACBQFtAgAJAAACBQFhAgAHCQCUCgIJAGQCBQFqAAEIBQNhY2MCXzIEBHRtcE0JAQtzbG90c0dyb3VwQgYFAW0IBQNhY2MCXzIFCmlzUG9zaXRpdmUFAWoAAAUEcmVxcwkAlAoCCQBkAgUBagABCQELc2xvdHNHcm91cEIGBQFhBQR0bXBNBQppc1Bvc2l0aXZlBQFqAAEFBHJlcXMICgACJGwFB3NlZ0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAUGcEJ5dGVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdzZWdtZW50AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAl8yARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAhwcm9wTGlzdA10ZXJyYWluQ291bnRzDWxhbmRTaXplSW5kZXgEc2lnbgMJAQIhPQIJAJADAQUIcHJvcExpc3QFBk5VTVJFUwkAAgECFldyb25nIHByb3BvcnRpb25zIGRhdGEKAQd1cGRhdGVyAgNhY2MBaQQGcmVzdWx0CQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb3BMaXN0BQFpCQBoAgkAaAIFBHNpZ24JAJEDAgUNdGVycmFpbkNvdW50cwUBaQUNbGFuZFNpemVJbmRleAMJAGYCAAAFBnJlc3VsdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIWUGFuaWMhIFBpZWNlcyBvZiB0eXBlPQkApAMBBQFpAgcsIHNpZ249CQCkAwEFBHNpZ24CFCwgIHRlcnJhaW5Db3VudHNbaV09CQCkAwEJAJEDAgUNdGVycmFpbkNvdW50cwUBaQIQLCBsYW5kU2l6ZUluZGV4PQkApAMBBQ1sYW5kU2l6ZUluZGV4CQDNCAIFA2FjYwkApAMBBQZyZXN1bHQEAXIKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQd1cGRhdGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQC5CQIFAXICAV8BEXVwZGF0ZVByb3BvcnRpb25zAw10ZXJyYWluQ291bnRzDWxhbmRTaXplSW5kZXgEc2lnbgQIcHJvcExpc3QJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAIBXwkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwEBQhwcm9wTGlzdAUNdGVycmFpbkNvdW50cwUNbGFuZFNpemVJbmRleAUEc2lnbgENY291bnRUZXJyYWlucwEIdGVycmFpbnMJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQQABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUIAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFDAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRAABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUUAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFGAAEFA25pbAEGYWRkUmVzBQpjdXJyZW50UmVzDXRlcnJhaW5Db3VudHMJZGVsdGFUaW1lDWxhbmRTaXplSW5kZXgXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMKAQVhZGRlcgIDYWNjAWkECXJlc09mVHlwZQkAaAIJAGgCCQBrAwUJZGVsdGFUaW1lBRdkYWlseUJ5UGllY2VXaXRoQm9udXNlcwUJREFZTUlMTElTCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgJAM0IAgUDYWNjCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKY3VycmVudFJlcwUBaQUJcmVzT2ZUeXBlBAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEJdmlydENsYWltBA10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4F2RhaWx5QnlQaWVjZVdpdGhCb251c2VzCgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMFCURBWU1JTExJUwkAkQMCBQ10ZXJyYWluQ291bnRzBQFpBQ1sYW5kU2l6ZUluZGV4CQCUCgIJAM0IAggFA2FjYwJfMQUJcmVzT2ZUeXBlCQBkAggFA2FjYwJfMgUJcmVzT2ZUeXBlCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAQ1kaXN0cmlidXRlUmVzBAxjdXJyZW50V2hSZXMOY3VycmVudFBhY2tSZXMKcmVzVG9DbGFpbQt3aFNwYWNlTGVmdAQOcmVzTGlzdFRvQ2xhaW0IBQpyZXNUb0NsYWltAl8xBAxyZXNBbVRvQ2xhaW0IBQpyZXNUb0NsYWltAl8yAwkAAAIFDHJlc0FtVG9DbGFpbQAACQCUCgIJALkJAgUMY3VycmVudFdoUmVzAgFfCQC5CQIFDmN1cnJlbnRQYWNrUmVzAgFfAwkAZwIFC3doU3BhY2VMZWZ0BQxyZXNBbVRvQ2xhaW0KAQhhZGRMaXN0cwIDYWNjAWkJAM0IAgUDYWNjCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUMY3VycmVudFdoUmVzBQFpCQCRAwIFDnJlc0xpc3RUb0NsYWltBQFpBAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIYWRkTGlzdHMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJAJQKAgkAuQkCBQFyAgFfCQC5CQIFDmN1cnJlbnRQYWNrUmVzAgFfCgEMYWRkUGFydExpc3RzAgNhY2MBaQQGd2hQYXJ0CQBrAwkAkQMCBQ5yZXNMaXN0VG9DbGFpbQUBaQULd2hTcGFjZUxlZnQFDHJlc0FtVG9DbGFpbQkAlAoCCQDNCAIIBQNhY2MCXzEJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxjdXJyZW50V2hSZXMFAWkFBndoUGFydAkAzQgCCAUDYWNjAl8yCQCkAwEJAGUCCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmN1cnJlbnRQYWNrUmVzBQFpCQCRAwIFDnJlc0xpc3RUb0NsYWltBQFpBQZ3aFBhcnQEAXIKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYWRkUGFydExpc3RzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQCUCgIJALkJAggFAXICXzECAV8JALkJAggFAXICXzICAV8BA2FicwEBeAMJAMACAgUBeAkAtgIBAAAFAXgJAL4CAQUBeAAEZnJlcQkAzAgCCQDMCAIABgkAzAgCAAkJAMwIAgAOCQDMCAIADwkAzAgCABAFA25pbAkAzAgCCQDMCAIABQkAzAgCAAgJAMwIAgANCQDMCAIADgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAQJAMwIAgAJCQDMCAIACgkAzAgCAA8FA25pbAkAzAgCCQDMCAIAAQkAzAgCAAYJAMwIAgAHCQDMCAIADwkAzAgCABMFA25pbAkAzAgCCQDMCAIABAkAzAgCAAcJAMwIAgAICQDMCAIADQkAzAgCABIFA25pbAUDbmlsAQdnZW5DaGFyAgFuBWZyZXFzBANyZW0JAKADAQkAuwICBQFuBQdUV0VOVFlYBAZsZXR0ZXIDCQBmAgkAkQMCBQVmcmVxcwAABQNyZW0CAUEDCQBmAgkAkQMCBQVmcmVxcwABBQNyZW0CAUIDCQBmAgkAkQMCBQVmcmVxcwACBQNyZW0CAUMDCQBmAgkAkQMCBQVmcmVxcwADBQNyZW0CAUQDCQBmAgkAkQMCBQVmcmVxcwAEBQNyZW0CAUUCAUYFBmxldHRlcgELZ2VuVGVycmFpbnMCBHNlZWQMY29udGluZW50SWR4BAFmCQCRAwIFBGZyZXEFDGNvbnRpbmVudElkeAoBEHRlcnJhaW5HZW5lcmF0b3ICA2FjYwRlbGVtCQCUCgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCAUDYWNjAl8xCQEHZ2VuQ2hhcgIIBQNhY2MCXzIFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQdUV0VOVFlYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZMlgFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFkzWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTRYBQFmCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTVYBAF0CgACJGwJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAgAJALoCAgUEc2VlZAUFRklWRVgKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEHRlcnJhaW5HZW5lcmF0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFCAUBdAJfMQELZ2V0QmFja3BhY2sBBWJwS2V5BAFwCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6AgE6CQDMCAIJAKQDAQkBC3ZhbHVlT3JFbHNlAgkAtgkBCQCRAwIFAXAFCmJwSWR4TGV2ZWwAAAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCGJwSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUBcAUIYnBJZHhSZXMCCzBfMF8wXzBfMF8wCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQFwBQlicElkeFByb2QFA25pbAEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBCXZvbFByZWZpeAQFcGFydHMJALUJAgUJdm9sUHJlZml4AgFfCQBoAgkAaAIFDFdITVVMVElQTElFUgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAAARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEJY3VycmVudFdoBAVnb29kcwkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAoBCXN1bVJlc01hdAIDYWNjBGl0ZW0JAGQCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQoBB3N1bVByb2QCA2FjYwRpdGVtBANpZHgIBQNhY2MCXzEEBHBrZ3MJAGkCCQBlAgkAZAIJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQUOUFJPRFVDVFBLR1NJWkUAAQUOUFJPRFVDVFBLR1NJWkUJAJQKAgkAZAIFA2lkeAABCQBkAggFA2FjYwJfMgkAaAIFBHBrZ3MFBU1VTFQ4BAh3aFJlc1ZvbAoAAiRsCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc3VtUmVzTWF0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAh3aE1hdFZvbAoAAiRsCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc3VtUmVzTWF0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp3aEdvb2RzVm9sAwkAAAIFBWdvb2RzAgAAAAgKAAIkbAkAvAkCBQVnb29kcwIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAAAAAKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB3N1bVByb2QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgJfMgkAZAIJAGQCBQh3aFJlc1ZvbAUId2hNYXRWb2wFCndoR29vZHNWb2wBDGdldFdhcmVob3VzZQMFd2hLZXkJbGFuZEluZGV4CmluZnJhTGV2ZWwECXZvbFByZWZpeAkArAICCQCsAgIJAKQDAQUJbGFuZEluZGV4AgFfCQCkAwEFCmluZnJhTGV2ZWwEB3doVG90YWwJARdnZXRXYXJlaG91c2VUb3RhbFZvbHVtZQEFCXZvbFByZWZpeAQFd2hTdHIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFd2hLZXkJAKwCAgUJdm9sUHJlZml4Ahs6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6OjAEAndoCQC8CQIFBXdoU3RyAgE6BAp3aE9jY3VwaWVkCQEXZ2V0V2FyZWhvdXNlT2NjdXBpZWRWb2wBBQJ3aAQGd2hMb2Z0AwkAZgIABQkAkAMBBQJ3aAkAuQkCCQDMCAICATAJAMwIAgkApAMBBQp3aE9jY3VwaWVkCQDMCAIJAKQDAQkAZQIFB3doVG90YWwFCndoT2NjdXBpZWQJAMwIAgkApAMBBQd3aFRvdGFsBQNuaWwCAV8EBGxvZnQJALUJAgkAkQMCBQJ3aAUJd2hJZHhMT0ZUAgFfBAh3aExvY2tlZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFCXZvbExvY2tlZAQDb2NjAwkAZgIJAJADAQUEbG9mdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQFCndoT2NjdXBpZWQJALkJAgkAzAgCCQCkAwEFCHdoTG9ja2VkCQDMCAIJAKQDAQUDb2NjCQDMCAIJAKQDAQkAZQIJAGUCBQd3aFRvdGFsBQh3aExvY2tlZAUDb2NjCQDMCAIJAKQDAQUHd2hUb3RhbAUDbmlsAgFfCQDMCAIJAJEDAgUCd2gFC3doSWR4TGV2ZWxzCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUCd2gFCHdoSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUCd2gFCHdoSWR4UmVzAgswXzBfMF8wXzBfMAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAndoBQh3aElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAndoBQh3aElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQJ3aAUJd2hJZHhQcm9kCQDMCAIFBndoTG9mdAUDbmlsARVnZXRXYXJlaG91c2VTcGFjZUxlZnQBCWN1cnJlbnRXaAQLb2NjdXBpZWRWb2wJARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFCWN1cnJlbnRXaAQPY3VycldoTG9ja2VkVm9sCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgkAtQkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhMT0ZUAgFfBQl2b2xMb2NrZWQJAGUCCQBlAgkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQljdXJyZW50V2gFC3doSWR4TGV2ZWxzBQtvY2N1cGllZFZvbAUPY3VycldoTG9ja2VkVm9sAQh0b1ZvbHVtZQIGYW1vdW50B3BrZ1NpemUEBHBrZ3MDCQBnAgUGYW1vdW50AAAJAGkCCQBlAgkAZAIFBmFtb3VudAUHcGtnU2l6ZQABBQdwa2dTaXplCQEBLQEJAGkCCQBlAgkAZAIJAQEtAQUGYW1vdW50BQdwa2dTaXplAAEFB3BrZ1NpemUJAGgCBQRwa2dzBQVNVUxUOAEJbW92ZVN0dWZmAwpjYXJnb1BhcnRzCWN1cnJlbnRXaAtjdXJyZW50UGFjawMJAQIhPQIJAJADAQUKY2FyZ29QYXJ0cwADCQACAQI0Y2FyZ29MaXN0U3RyIHNob3VsZCBjb250YWluIGV4YWN0bHkgMiAnOicgc2VwYXJhdG9ycwQIcmVzUGFydHMJALUJAgkAkQMCBQpjYXJnb1BhcnRzAAACAV8ECG1hdFBhcnRzCQC1CQIJAJEDAgUKY2FyZ29QYXJ0cwABAgFfBAlwcm9kUGFydHMDCQAAAgkAkQMCBQpjYXJnb1BhcnRzAAICAAUDbmlsCQC1CQIJAJEDAgUKY2FyZ29QYXJ0cwACAgFfAwkBAiE9AgkAkAMBBQhyZXNQYXJ0cwUGTlVNUkVTCQACAQIgQWxsIDYgcmVzb3VyY2VzIHNob3VsZCBiZSBwYXNzZWQDCQECIT0CCQCQAwEFCG1hdFBhcnRzBQZOVU1SRVMJAAIBAiBBbGwgNiBtYXRlcmlhbHMgc2hvdWxkIGJlIHBhc3NlZAQLd2hTcGFjZUxlZnQJARVnZXRXYXJlaG91c2VTcGFjZUxlZnQBBQljdXJyZW50V2gECWN1cnJXaFJlcwkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhSZXMCAV8ECWN1cnJXaE1hdAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQCAV8ECmN1cnJXaFByb2QDCQAAAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAIABQNuaWwJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAIBXwQOY3VycmVudFBhY2tSZXMJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMCAV8EDmN1cnJlbnRQYWNrTWF0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBA9jdXJyZW50UGFja1Byb2QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8KAQNtdlICA2FjYwRpdGVtBAFpCAUDYWNjAl8xBAJhbQkBDXBhcnNlSW50VmFsdWUBBQRpdGVtBAN3aHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQljdXJyV2hSZXMFAWkEA2JwcgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmN1cnJlbnRQYWNrUmVzBQFpAwkAAAIFAmFtAAAJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCRAwIFCWN1cnJXaFJlcwUBaQkAzQgCCAUDYWNjAl8zCQCRAwIFDmN1cnJlbnRQYWNrUmVzBQFpCAUDYWNjAl80AwkAZgIFAmFtAAADCQBmAgUCYW0FA2JwcgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAUEaXRlbQIZIGZyb20gYmFja3BhY2ssIGJ1dCBvbmx5IAkApAMBBQNicHICCiBhdmFpbGFibGUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHIFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcgUCYW0JAGQCCAUDYWNjAl80BQJhbQMJAGYCCQEBLQEFAmFtBQN3aHIJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQkBAS0BBQJhbQIaIGZyb20gd2FyZWhvdXNlLCBidXQgb25seSAJAKQDAQUDd2hyAgogYXZhaWxhYmxlCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2hyBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicHIFAmFtCQBkAggFA2FjYwJfNAUCYW0EAXIKAAIkbAUIcmVzUGFydHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCWCgQAAAUDbmlsBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDbXZSAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCgEDbXZNAgNhY2MEaXRlbQQBaQgFA2FjYwJfMQQCYW0JAQ1wYXJzZUludFZhbHVlAQUEaXRlbQQDd2htCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJY3VycldoTWF0BQFpBANicG0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ5jdXJyZW50UGFja01hdAUBaQMJAAACBQJhbQAACQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkAkQMCBQljdXJyV2hNYXQFAWkJAM0IAggFA2FjYwJfMwkAkQMCBQ5jdXJyZW50UGFja01hdAUBaQgFA2FjYwJfNAMJAGYCBQJhbQAAAwkAZgIFAmFtBQNicG0JAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAFBGl0ZW0CGSBmcm9tIGJhY2twYWNrLCBidXQgb25seSAJAKQDAQUDYnBtAgogYXZhaWxhYmxlCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2htBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicG0FAmFtCQBkAggFA2FjYwJfNAUCYW0DCQBmAgkBAS0BBQJhbQUDd2htCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgCQCkAwEJAQEtAQUCYW0CGiBmcm9tIHdhcmVob3VzZSwgYnV0IG9ubHkgCQCkAwEFA3dobQIKIGF2YWlsYWJsZQkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3dobQUCYW0JAM0IAggFA2FjYwJfMwkApAMBCQBlAgUDYnBtBQJhbQkAZAIIBQNhY2MCXzQFAmFtBAFtCgACJGwFCG1hdFBhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAFA25pbAUDbmlsCAUBcgJfNAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDbXZNAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCgEDbXZQAgNhY2MEaXRlbQQBaQgFA2FjYwJfMQQCYW0JAQ1wYXJzZUludFZhbHVlAQUEaXRlbQQDd2hwAwkAZgIJAJADAQUKY3VycldoUHJvZAUBaQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmN1cnJXaFByb2QFAWkAAAQDYnBwAwkAZgIJAJADAQUPY3VycmVudFBhY2tQcm9kBQFpCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUPY3VycmVudFBhY2tQcm9kBQFpAAADCQAAAgUCYW0AAAkAlgoECQBkAgUBaQABCQDNCAIIBQNhY2MCXzIJAKQDAQUDd2hwCQDNCAIIBQNhY2MCXzMJAKQDAQUDYnBwCAUDYWNjAl80AwkAZgIFAmFtAAADCQBmAgUCYW0FA2JwcAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAUEaXRlbQIZIGZyb20gYmFja3BhY2ssIGJ1dCBvbmx5IAkApAMBBQNicHACCiBhdmFpbGFibGUECGRlbHRhVm9sCQBlAgkBCHRvVm9sdW1lAgkAZAIFA3docAUCYW0FDlBST0RVQ1RQS0dTSVpFCQEIdG9Wb2x1bWUCBQN3aHAFDlBST0RVQ1RQS0dTSVpFCQCWCgQJAGQCBQFpAAEJAM0IAggFA2FjYwJfMgkApAMBCQBkAgUDd2hwBQJhbQkAzQgCCAUDYWNjAl8zCQCkAwEJAGUCBQNicHAFAmFtCQBkAggFA2FjYwJfNAUIZGVsdGFWb2wDCQBmAgkBAS0BBQJhbQUDd2hwCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgCQCkAwEJAQEtAQUCYW0CGiBmcm9tIHdhcmVob3VzZSwgYnV0IG9ubHkgCQCkAwEFA3docAIKIGF2YWlsYWJsZQQIZGVsdGFWb2wJAGUCCQEIdG9Wb2x1bWUCCQBkAgUDd2hwBQJhbQUOUFJPRFVDVFBLR1NJWkUJAQh0b1ZvbHVtZQIFA3docAUOUFJPRFVDVFBLR1NJWkUJAJYKBAkAZAIFAWkAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQN3aHAFAmFtCQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFA2JwcAUCYW0JAGQCCAUDYWNjAl80BQhkZWx0YVZvbAQBcAMJAQIhPQIJAJADAQUJcHJvZFBhcnRzAAAKAAIkbAUJcHJvZFBhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEAAAFA25pbAUDbmlsCAUBbQJfNAoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDbXZQAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIJAJYKBAAABQpjdXJyV2hQcm9kBQ9jdXJyZW50UGFja1Byb2QIBQFtAl80BAh2b2xTYWxkbwgFAXACXzQDCQBmAgUIdm9sU2FsZG8FC3doU3BhY2VMZWZ0CQACAQkArAICCQCsAgIJAKwCAgkArAICAhVBdHRlbXB0IHRvIHB1dCB0b3RhbCAJAKQDAQUIdm9sU2FsZG8CESBzdHVmZiwgYnV0IG9ubHkgCQCkAwEFC3doU3BhY2VMZWZ0AhUgd2FyZWhvdXNlIHNwYWNlIGxlZnQJAJkKBwkAuQkCCAUBcgJfMgIBXwkAuQkCCAUBbQJfMgIBXwkAuQkCCAUBcAJfMgIBXwkAuQkCCAUBcgJfMwIBXwkAuQkCCAUBbQJfMwIBXwkAuQkCCAUBcAJfMwIBXwUIdm9sU2FsZG8BEmV4cGVkaXRpb25JbnRlcm5hbAIGY2FsbGVyBHR4SWQECHVzZXJBZGRyCQClCAEFBmNhbGxlcgQGYmlnTnVtCQEDYWJzAQkAngMBBQR0eElkBAdmcmVlTnVtCQELdmFsdWVPckVsc2UCCQCfCAEJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUPUFJFU0FMRU5VTUxBTkRTAAEEB2xhbmROdW0JAKQDAQUHZnJlZU51bQQMY29udGluZW50SWR4CQCgAwEJALsCAgUGYmlnTnVtBQVGSVZFWAQIdGVycmFpbnMJAQtnZW5UZXJyYWlucwIFBmJpZ051bQUMY29udGluZW50SWR4BAljb250aW5lbnQJAJEDAgUKY29udGluZW50cwUMY29udGluZW50SWR4BAVpc3N1ZQkAwggFCQEHbmZ0TmFtZQIFB2xhbmROdW0CAVMJALkJAgkAzAgCBQdsYW5kTnVtCQDMCAICAVMJAMwIAgUIdGVycmFpbnMJAMwIAgUJY29udGluZW50BQNuaWwCAV8AAQAABwQHYXNzZXRJZAkAuAgBBQVpc3N1ZQQCaWQJANgEAQUHYXNzZXRJZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5TmV4dEZyZWVMYW5kTnVtAAkAZAIFB2ZyZWVOdW0AAQkAzAgCBQVpc3N1ZQkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0FAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQJpZAUIdXNlckFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQUIdXNlckFkZHIJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQUCaWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFAmlkBQh1c2VyQWRkcgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgABBQdhc3NldElkBQNuaWwJAJQKAgUCaWQFCWNvbnRpbmVudAEMZmxpZ2h0Q29tbW9uAwh1c2VyQWRkcgdtZXNzYWdlA3NpZwMJAQEhAQkAxBMDBQdtZXNzYWdlBQNzaWcFA3B1YgkAAgECGHNpZ25hdHVyZSBkb2VzIG5vdCBtYXRjaAQFcGFydHMJALUJAgkAsAkBBQdtZXNzYWdlAgE7BAlmbGlnaHRMb2cJALUJAgkAkQMCBQVwYXJ0cwAAAgF8BAJocAkAtQkCCQCRAwIFCWZsaWdodExvZwUIZmxIZWFsdGgCAV8EBWN1ckhQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCaHAAAAQFbmV3SFAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJocAABBAtuZXdMb2NUeFZlcgkAtQkCCQCRAwIFBXBhcnRzAAECAToEC25ld0xvY2F0aW9uCQCRAwIFC25ld0xvY1R4VmVyAAAEBHRpbWUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlmbGlnaHRMb2cFC2ZsVGltZXN0YW1wAwMJAGYCBQR0aW1lCQBkAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFEUZJVkVNSU5VVEVTTUlMTElTBgkAZgIJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAURRklWRU1JTlVURVNNSUxMSVMFBHRpbWUJAAIBCQCsAgIJAKwCAgkArAICAhxzaWduYXR1cmUgb3V0ZGF0ZWQ6IGxvZ1RpbWU9CQCkAwEFBHRpbWUCCSwgYmNUaW1lPQkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQJdHhGcm9tTXNnCQCRAwIFC25ld0xvY1R4VmVyAAEEBmxhc3RUeAkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5TGFzdFR4SWRCeVVzZXIBBQh1c2VyQWRkcgIAAwkBAiE9AgUGbGFzdFR4BQl0eEZyb21Nc2cJAAIBCQCsAgIJAKwCAgkArAICAh5UeCBpZHMgZG9uJ3QgbWF0Y2ghIEluIHN0YXRlOiAFBmxhc3RUeAIKLCBpbiBtc2c6IAUJdHhGcm9tTXNnBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFCHVzZXJBZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQAAAQMb2xkRnJvbVN0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFADCQECIT0CBQxvbGRGcm9tU3RhdGUFBWN1ckhQCQACAQkArAICCQCsAgIJAKwCAgIKb2xkSGVhbHRoPQkApAMBBQxvbGRGcm9tU3RhdGUCLyBmcm9tIHN0YXRlIGRvZXMgbm90IG1hdGNoIG9uZSBmcm9tIGZsaWdodCBsb2c9CQCkAwEFBWN1ckhQAwkAZwIAAAUFY3VySFAJAAIBAh5Zb3UgY2FuJ3QgZmx5IHdpdGggemVybyBoZWFsdGgEBWJvbnVzAwkAZgIJAJADAQUJZmxpZ2h0TG9nBQdmbEJvbnVzCQCRAwIFCWZsaWdodExvZwUHZmxCb251cwIABAhwcm9kVXNlZAMJAGYCCQCQAwEFCWZsaWdodExvZwULZmxQcm9kc1VzZWQJAJEDAgUJZmxpZ2h0TG9nBQtmbFByb2RzVXNlZAIABApzZW50QW1vdW50AwMJAGYCBQVuZXdIUAAACQAAAgUFYm9udXMCASQHCQEFYXNJbnQBCQD8BwQFDHJlc3RDb250cmFjdAINc2VuZFVzZHRQcml6ZQkAzAgCBQh1c2VyQWRkcgUDbmlsBQNuaWwAAAkAlwoFBQVuZXdIUAULZHVja0Fzc2V0SWQFCnNlbnRBbW91bnQFC25ld0xvY2F0aW9uBQhwcm9kVXNlZAEQZXhwZWRpdGlvbkNvbW1vbgQGY2FsbGVyBHR4SWQHbWVzc2FnZQNzaWcECHVzZXJBZGRyCQClCAEFBmNhbGxlcgQBZgkBDGZsaWdodENvbW1vbgMFCHVzZXJBZGRyBQdtZXNzYWdlBQNzaWcEC2R1Y2tBc3NldElkCAUBZgJfMgQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQFbUxpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8EBm5ld01hdAkAuQkCCQERc3VidHJhY3RNYXRlcmlhbHMDBgUFbUxpc3QFDEVYUE1BVEVSSUFMUwIBXwQFZXFLZXkJARBrZXlEdWNrRXF1aXBtZW50AQULZHVja0Fzc2V0SWQECWN1cnJlbnRFcQkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywEBW5ld0VxCQERc3VidHJhY3RFcXVpcG1lbnQCBQljdXJyZW50RXEIBQFmAl81AwkAZwIAAAgFAWYCXzEJAJUKAwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoAAAJAMwIAgkBC1N0cmluZ0VudHJ5AgUFZXFLZXkFBW5ld0VxBQNuaWwCAAAABAFlCQESZXhwZWRpdGlvbkludGVybmFsAgUGY2FsbGVyBQR0eElkBAJpZAgIBQFlAl8yAl8xCQCVCgMJAM0IAgkAzQgCCQDNCAIJAM0IAggFAWUCXzEJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIICAUBZQJfMgJfMgkAzAgCAgFMCQDMCAIFAmlkBQNuaWwCAV8JAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgIBQFmAl8xCQELU3RyaW5nRW50cnkCBQVlcUtleQUFbmV3RXEJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCBQZuZXdNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToFAmlkCAUBZgJfMwEMYXBwbHlCb251c2VzAgtsYW5kQXNzZXRJZAZwaWVjZXMECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAlhcnRQaWVjZXMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQAAAQEYWRkNgkAaQIFCmluZnJhTGV2ZWwABgQEYWRkNwkAaQIFCmluZnJhTGV2ZWwABwkAZAIJAGQCBQ9EQUlMWVJFU0JZUElFQ0UJAGsDBQ9EQUlMWVJFU0JZUElFQ0UJAGQCCQBkAgUKaW5mcmFMZXZlbAUEYWRkNgkAaAIAAgUEYWRkNwAFCQBrAwUPREFJTFlSRVNCWVBJRUNFBQlhcnRQaWVjZXMJAGgCBQZwaWVjZXMABQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBGFkZHIJY2xhaW1Nb2RlDWxhbmRBc3NldElkSW4EDSR0MDI5MjAzMjk3NDIDCQAAAgUJY2xhaW1Nb2RlBQtjbGFpbU1vZGVXaAkAlAoCBQ1sYW5kQXNzZXRJZEluCQELdmFsdWVPckVsc2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICAAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAoggBCQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgQDbG9jCQC1CQIJAQV2YWx1ZQEFC2N1ckxvY2F0aW9uAgFfAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUwJAAIBCQCsAgIJAKwCAgIWRHVjayBsb2NhdGlvbiB0eXBlIGlzIAkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCESwgYnV0IHNob3VsZCBiZSBMCQCUCgIJAJEDAgUDbG9jBQhsb2NJZHhJZAULZHVja0Fzc2V0SWQEC2xhbmRBc3NldElkCAUNJHQwMjkyMDMyOTc0MgJfMQQGZHVja0lkCAUNJHQwMjkyMDMyOTc0MgJfMgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBUxhbmQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwkAlgoEBQZkdWNrSWQFC2xhbmRBc3NldElkBQFkBQlzYXZlZFRpbWUBEGNsYWltUmVzSW50ZXJuYWwEBGFkZHIGYW1vdW50CWNsYWltTW9kZQ1sYW5kQXNzZXRJZEluAwkAZgIAAAUGYW1vdW50CQACAQIPTmVnYXRpdmUgYW1vdW50BAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBQRhZGRyBQljbGFpbU1vZGUFDWxhbmRBc3NldElkSW4ECGxhbmRTaXplCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIIBQFjAl8zBQtyZWNUZXJyYWlucwQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAIBQFjAl80AwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQgFAWMCXzQCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUEFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAQxhcHBseUJvbnVzZXMCCAUBYwJfMgUGcGllY2VzBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UFBnBpZWNlcwUJREFZTUlMTElTAwkAZgIFBmFtb3VudAUIYXZhaWxSZXMJAAIBCQCsAgIJAKwCAgkArAICAiJOb3QgZW5vdWdoIHJlc291cmNlcywgYXZhaWxhYmxlID0gCQCkAwEFCGF2YWlsUmVzAg4sIHJlcXVlc3RlZCA9IAkApAMBBQZhbW91bnQEDG5ld0RlbHRhVGltZQkAawMJAGUCBQhhdmFpbFJlcwUGYW1vdW50BQlEQVlNSUxMSVMJAGgCBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBQZwaWVjZXMEDG5ld1RpbWVzdGFtcAkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQxuZXdEZWx0YVRpbWUECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUECnJlc1RvQ2xhaW0JAQl2aXJ0Q2xhaW0EBQ10ZXJyYWluQ291bnRzCQBlAgUJZGVsdGFUaW1lBQxuZXdEZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFd2hLZXkJARJrZXlXYXJlaG91c2VCeUxhbmQBCAUBYwJfMgQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEIBQFjAl8yAAAECWN1cnJlbnRXaAkBDGdldFdhcmVob3VzZQMFBXdoS2V5BQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwEBGxvZnQJALUJAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAIBXwQLd2hTcGFjZUxlZnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlAwMJAAACBQljbGFpbU1vZGUFC2NsYWltTW9kZVdoCQBmAgUGYW1vdW50BQt3aFNwYWNlTGVmdAcJAAIBCQCsAgIJAKwCAgIFT25seSAJAKQDAQULd2hTcGFjZUxlZnQCGCBzcGFjZSBsZWZ0IGluIHdhcmVob3VzZQQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEIBQFjAl8xBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEDmN1cnJlbnRQYWNrUmVzCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAxjdXJyZW50V2hSZXMJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfBA0kdDAzMjExNjMyOTg3AwkAAAIFCWNsYWltTW9kZQULY2xhaW1Nb2RlV2gJAJYKBAkBBmFkZFJlcwUFDGN1cnJlbnRXaFJlcwUNdGVycmFpbkNvdW50cwkAZQIFCWRlbHRhVGltZQUMbmV3RGVsdGFUaW1lBQlsYW5kSW5kZXgFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCAUKcmVzVG9DbGFpbQJfMgkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCAUKcmVzVG9DbGFpbQJfMgMJAAACBQljbGFpbU1vZGUFDWNsYWltTW9kZUR1Y2sJAJYKBAkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzCQEGYWRkUmVzBQUOY3VycmVudFBhY2tSZXMFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQUJbGFuZEluZGV4BRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlBAVkaXN0cgkBDWRpc3RyaWJ1dGVSZXMEBQxjdXJyZW50V2hSZXMFDmN1cnJlbnRQYWNrUmVzBQpyZXNUb0NsYWltBQt3aFNwYWNlTGVmdAQEd2hBbQkAlwMBCQDMCAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQd2b2xGcmVlCQDMCAIIBQpyZXNUb0NsYWltAl8yBQNuaWwJAJYKBAgFBWRpc3RyAl8xCAUFZGlzdHICXzIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAULdm9sT2NjdXBpZWQFBHdoQW0JAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQUEd2hBbQQFd2hSZXMIBQ0kdDAzMjExNjMyOTg3Al8xBAVicFJlcwgFDSR0MDMyMTE2MzI5ODcCXzIEBWxvZnRPCAUNJHQwMzIxMTYzMjk4NwJfMwQFbG9mdEYIBQ0kdDAzMjExNjMyOTg3Al80CQCXCgUJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQgFAWMCXzIFDG5ld1RpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYCAUBYwJfMgUEYWRkcgUMbmV3VGltZXN0YW1wBQNuaWwFBWJwS2V5CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgUFYnBSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwFBXdoS2V5CQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCBQV3aFJlcwkAzAgCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQJAMwIAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAkAzAgCCQC5CQIJAMwIAgkAkQMCBQRsb2Z0BQl2b2xMb2NrZWQJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAJEDAgUEbG9mdAUIdm9sVG90YWwFA25pbAIBXwUDbmlsAQhjbGFpbUFsbAQEYWRkcgtsYW5kQXNzZXRJZAZwaWVjZXMJY2xhaW1Nb2RlBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkBAlzYXZlZFRpbWUJAQV2YWx1ZQEJAJ8IAQUHdGltZUtleQQIYXZhaWxSZXMJAGgCCQBrAwkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUJAQxhcHBseUJvbnVzZXMCBQtsYW5kQXNzZXRJZAUGcGllY2VzBQlEQVlNSUxMSVMFBnBpZWNlcwkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQhhdmFpbFJlcwUJY2xhaW1Nb2RlBQtsYW5kQXNzZXRJZAENdXBJbmZyYUNvbW1vbgQMc2hvdWxkVXNlTWF0BmNhbGxlcg1wYXltZW50QW1vdW50C2xhbmRBc3NldElkBARhZGRyCQClCAEFBmNhbGxlcgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAwUEYWRkcgUTY2xhaW1Nb2RlV2hUaGVuRHVjawULbGFuZEFzc2V0SWQEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAggFAWMCXzMFC3JlY0xhbmRTaXplBAhpbmZyYUtleQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBCAUBYwJfMgQIY3VyTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUIaW5mcmFLZXkAAAMJAGcCBQhjdXJMZXZlbAADCQACAQImQ3VycmVudGx5IG1heCBpbmZyYXN0cnVjdHVyZSBsZXZlbCA9IDMECG5ld0xldmVsCQBkAgUIY3VyTGV2ZWwAAQQEY29zdAkAawMFFUluZnJhVXBncmFkZUNvc3RTVXNkdAkAaAIFBnBpZWNlcwUIbmV3TGV2ZWwFBVNTSVpFAwMJAQEhAQUMc2hvdWxkVXNlTWF0CQECIT0CBQ1wYXltZW50QW1vdW50BQRjb3N0BwkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFBGNvc3QEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBYwJfMQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVtTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQHbWF0VXNlZAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUEBm5ld01hdAkAuQkCCQERc3VidHJhY3RNYXRlcmlhbHMDBQxzaG91bGRVc2VNYXQFBW1MaXN0BQdtYXRVc2VkAgFfBAtjbGFpbVJlc3VsdAkBCGNsYWltQWxsBAUEYWRkcggFAWMCXzIFBnBpZWNlcwUTY2xhaW1Nb2RlV2hUaGVuRHVjawQGd2hEYXRhCAULY2xhaW1SZXN1bHQCXzUEBm9sZFZvbAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQZ3aERhdGEFC3doSWR4TGV2ZWxzBApuZXdWb2xEYXRhCQC5CQIJAMwIAgkAkQMCCQC1CQIJAJEDAgUGd2hEYXRhBQt3aElkeExldmVscwIBXwAACQDMCAIJAKQDAQUIbmV3TGV2ZWwFA25pbAIBXwQGbmV3Vm9sCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBBQpuZXdWb2xEYXRhBARsb2Z0CQC1CQIJAJEDAgUGd2hEYXRhBQl3aElkeExPRlQCAV8ECm5ld0xvZnRTdHIJALkJAgkAzAgCCQCRAwIFBGxvZnQFCXZvbExvY2tlZAkAzAgCCQCRAwIFBGxvZnQFC3ZvbE9jY3VwaWVkCQDMCAIJAKQDAQkAZQIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQUGbmV3Vm9sBQZvbGRWb2wJAMwIAgkApAMBBQZuZXdWb2wFA25pbAIBXwkAlQoDCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFCGluZnJhS2V5BQhuZXdMZXZlbAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIIBQFjAl8yBQRhZGRyBQhuZXdMZXZlbAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCCAULY2xhaW1SZXN1bHQCXzMFCGJwSWR4UmVzCQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzQJALkJAgkAzAgCBQpuZXdWb2xEYXRhCQDMCAIJAJEDAgUGd2hEYXRhBQh3aElkeFJlcwkAzAgCCQCRAwIFBndoRGF0YQUId2hJZHhNYXQJAMwIAgkAkQMCBQZ3aERhdGEFCXdoSWR4UHJvZAkAzAgCBQpuZXdMb2Z0U3RyBQNuaWwCAToFA25pbAgFC2NsYWltUmVzdWx0Al8xBQhuZXdMZXZlbAUHbWF0VXNlZAEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCC2R1Y2tBc3NldElkB2RlbHRhWFADCQEBIQEFD0tTQUxMT1dYUExFVkVMUwkAlAoCBQNuaWwAAAQGbHZsS2V5CQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQEBXhwS2V5CQEJa2V5RHVja1hQAQULZHVja0Fzc2V0SWQEAnhwCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUFeHBLZXkAAAQFbmV3WFAJAGQCBQJ4cAUHZGVsdGFYUAQJbHZsUG9pbnRzCQEHbGV2ZWxVcAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQZsdmxLZXkAAAUFbmV3WFAECWtleVBvaW50cwkBEWtleUR1Y2tGcmVlUG9pbnRzAQULZHVja0Fzc2V0SWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUGbHZsS2V5CQCRAwIFCWx2bFBvaW50cwAACQDMCAIJAQxJbnRlZ2VyRW50cnkCBQV4cEtleQUFbmV3WFAJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleVBvaW50cwkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5UG9pbnRzAAAJAJEDAgUJbHZsUG9pbnRzAAEFA25pbAUFbmV3WFABFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBGFkZHIHZGVsdGFYUAMJAQEhAQUPS1NBTExPV1hQTEVWRUxTCQCUCgIFA25pbAAABAZsdmxLZXkJAQxrZXlVc2VyTGV2ZWwBBQRhZGRyBAV4cEtleQkBCWtleVVzZXJYUAEFBGFkZHIEAnhwCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAUFeHBLZXkAAAQFbmV3WFAJAGQCBQJ4cAUHZGVsdGFYUAQJbHZsUG9pbnRzCQEHbGV2ZWxVcAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQZsdmxLZXkAAAUFbmV3WFAECWtleVBvaW50cwkBEWtleVVzZXJGcmVlUG9pbnRzAQUEYWRkcgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQZsdmxLZXkJAJEDAgUJbHZsUG9pbnRzAAAJAMwIAgkBDEludGVnZXJFbnRyeQIFBXhwS2V5BQVuZXdYUAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5UG9pbnRzCQBkAgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlQb2ludHMAAAkAkQMCBQlsdmxQb2ludHMAAQUDbmlsBQVuZXdYUAESYWN0aXZhdGVPbmJvYXJkQXJ0AQRhZGRyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECHJlZkJ5S2V5CQEPa2V5QWRkcmVzc1JlZkJ5AQUEYWRkcgQFcmVmQnkJAKIIAQUIcmVmQnlLZXkDCQEBIQEJAQlpc0RlZmluZWQBBQVyZWZCeQkAAgECKVlvdSBhcmUgbm90IGVsaWdpYmxlIGZvciBPTkJPQVJEIGFydGlmYWN0BAZhcnRLZXkJARxrZXlPbmJvYXJkQXJ0RHVja0FjdGl2YXRlZEJ5AQUEYWRkcgQHYXJ0RHVjawkAoggBBQZhcnRLZXkDCQEJaXNEZWZpbmVkAQUHYXJ0RHVjawkAAgEJAKwCAgIvWW91IGFscmVhZHkgdXNlZCB5b3VyIE9OQk9BUkQgYXJ0aWZhY3Qgb24gZHVjayAJAQV2YWx1ZQEFB2FydER1Y2sEEGR1Y2tBY3RpdmF0b3JLZXkJARxrZXlPbmJvYXJkQXJ0QWN0aXZhdGVkT25EdWNrAQULZHVja0Fzc2V0SWQEDWR1Y2tBY3RpdmF0b3IJAKIIAQUQZHVja0FjdGl2YXRvcktleQMJAQlpc0RlZmluZWQBBQ1kdWNrQWN0aXZhdG9yCQACAQkArAICCQCsAgIJAKwCAgIJVGhlIGR1Y2sgBQtkdWNrQXNzZXRJZAI0IGFscmVhZHkgZ290IHBvaW50cyBmcm9tIE9OQk9BUkQgYXJ0aWZhY3QgZnJvbSB1c2VyIAkBBXZhbHVlAQUNZHVja0FjdGl2YXRvcgkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmFydEtleQULZHVja0Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUQZHVja0FjdGl2YXRvcktleQUEYWRkcgUDbmlsCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgULZHVja0Fzc2V0SWQFCXhwT25ib2FyZAJfMQESYWN0aXZhdGVQcmVzYWxlQXJ0AgRhZGRyDWxhbmRBc3NldElkSW4EAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwMFBGFkZHIFE2NsYWltTW9kZVdoVGhlbkR1Y2sFDWxhbmRBc3NldElkSW4EC2xhbmRBc3NldElkCAUBYwJfMgQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEDWFjdGl2YXRpb25LZXkJASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkAwkAZgIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUNYWN0aXZhdGlvbktleQAAAAAJAAIBAiVQcmVzYWxlIGFydGlmYWN0IGlzIGFscmVhZHkgYWN0aXZhdGVkAwkAZgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCCAUBYwJfMwUKcmVjTGFuZE51bQUPUFJFU0FMRU5VTUxBTkRTCQACAQkArAICCQCsAgIJAKwCAgUKTEFORFBSRUZJWAIBIAULbGFuZEFzc2V0SWQCJSBpcyBub3QgZWxpZ2libGUgZm9yIHByZXNhbGUgYXJ0aWZhY3QEC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwEBQRhZGRyBQtsYW5kQXNzZXRJZAUGcGllY2VzBRNjbGFpbU1vZGVXaFRoZW5EdWNrCQDNCAIJAM0IAgkAzQgCCQDNCAIIBQtjbGFpbVJlc3VsdAJfMQkBDEludGVnZXJFbnRyeQIFDWFjdGl2YXRpb25LZXkFBnBpZWNlcwkBDEludGVnZXJFbnRyeQIJASVrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQFBGFkZHIFBnBpZWNlcwkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al80CQC5CQIIBQtjbGFpbVJlc3VsdAJfNQIBOgENbWVyZ2VJbnRlcm5hbAcLbmV3TGFuZFNpemUIbmV3TGV2ZWwHZm9ybXVsYQRhZGRyDGxhbmRBc3NldElkcwR0eElkB25lZWRNYXQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAoBCmNoZWNrTWVyZ2UCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAljb250aW5lbnQJAJEDAgUBZAUMcmVjQ29udGluZW50AwMJAQIhPQIIBQNhY2MCXzMCAAkBAiE9AggFA2FjYwJfMwUJY29udGluZW50BwkAAgECLkxhbmRzIHNob3VsZCBiZSBvbiB0aGUgc2FtZSBjb250aW5lbnQgdG8gbWVyZ2UECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBAdzaXplc0luCAUDYWNjAl8xBAFpCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALMJAgUHc2l6ZXNJbgUIbGFuZFNpemUCJ1lvdSBoYXZlbid0IHBhc3NlZCBhbGwgdGhlIGxhbmRzIG5lZWRlZAQIc2l6ZXNPdXQJAKwCAgkArwICBQdzaXplc0luBQFpCQCwAgIFB3NpemVzSW4JAGQCBQFpAAEEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBARhcnRzCQBkAggFA2FjYwJfMgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQIcmVxTGV2ZWwEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAAAwMJAAACAgFNBQckbWF0Y2gwAAQDCQAAAgIBTAUHJG1hdGNoMAAFAwkAAAICAlhMBQckbWF0Y2gwAAYJAAIBAhpPbmx5IFMsIE0sIEwsIFhMIGNhbiBtZXJnZQMJAQIhPQIFCmluZnJhTGV2ZWwFCHJlcUxldmVsCQACAQIiQWxsIGxhbmRzIHNob3VsZCBiZSBtYXhlZCB0byBtZXJnZQQHbGFuZE51bQkAkQMCBQFkBQpyZWNMYW5kTnVtBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUDCQBmAgAABQlkZWx0YVRpbWUJAAIBCQCsAgIJAKwCAgkArAICAiZTYXZlZCB0aW1lc3RhbXAgaXMgaW4gZnV0dXJlLCBzYXZlZCA9IAkApAMBBQlzYXZlZFRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMECWxhbmRJbmRleAkAaQIFBnBpZWNlcwUFU1NJWkUEBWJwUmVzCQEGYWRkUmVzBQkAtQkCCAUDYWNjAl80AgFfBQ10ZXJyYWluQ291bnRzBQlkZWx0YVRpbWUFCWxhbmRJbmRleAUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQQFcHJvcHMJARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAkAtQkCCAUDYWNjAl82AgFfBQ10ZXJyYWluQ291bnRzBQlsYW5kSW5kZXgA////////////AQQFbGFuZHMIBQNhY2MCXzcEA2lkeAkAzwgCBQVsYW5kcwULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQNpZHgJAAIBCQCsAgICIFlvdXIgc3Rha2VkIGxhbmRzIGRvbid0IGNvbnRhaW4gBQtsYW5kQXNzZXRJZAQJY3VzdG9tS2V5CQEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBBQtsYW5kQXNzZXRJZAQKY3VzdG9tTmFtZQkBC3ZhbHVlT3JFbHNlAgkAoggBBQljdXN0b21LZXkCAAkAmgoIBQhzaXplc091dAUEYXJ0cwUJY29udGluZW50BQVicFJlcwkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUDYWNjAl81CQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0JAQtEZWxldGVFbnRyeQEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBJWtleUxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIDBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQkBC0RlbGV0ZUVudHJ5AQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkCQELRGVsZXRlRW50cnkBBQljdXN0b21LZXkJAQtEZWxldGVFbnRyeQEJARprZXlMYW5kQ3VzdG9tTmFtZVRvQXNzZXRJZAEFCmN1c3RvbU5hbWUJAQRCdXJuAgkA2QQBBQtsYW5kQXNzZXRJZAABBQVwcm9wcwkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4CQBkAggFA2FjYwJfOAUGcGllY2VzBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQHcHJvcFN0cgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAQIbGFuZHNLZXkJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBQRhZGRyBAhsYW5kc1N0cgkAoggBBQhsYW5kc0tleQQHbGFuZHNJbgMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsBAFyCgACJGwFDGxhbmRBc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJoKCAUHZm9ybXVsYQAAAgAJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzBQNuaWwFB3Byb3BTdHIFB2xhbmRzSW4AAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKY2hlY2tNZXJnZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUECWNvbnRpbmVudAgFAXICXzMEDGNvbnRpbmVudElkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCmNvbnRpbmVudHMFCWNvbnRpbmVudAkArAICAhNVbmtub3duIGNvbnRpbmVudDogBQljb250aW5lbnQECHRlcnJhaW5zCQELZ2VuVGVycmFpbnMCCQEDYWJzAQkAngMBBQR0eElkBQxjb250aW5lbnRJZHgEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQKbmV3TGFuZE51bQkApAMBBQdmcmVlTnVtBAVpc3N1ZQkAwggFCQEHbmZ0TmFtZQIFCm5ld0xhbmROdW0FC25ld0xhbmRTaXplCQC5CQIJAMwIAgUKbmV3TGFuZE51bQkAzAgCBQtuZXdMYW5kU2l6ZQkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBA5uZXdMYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwkAZgIFB25lZWRNYXQAAAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwUHbmVlZE1hdAIBXwQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAkAlAoCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCAUBcgJfNQMJAGYCCQCQAwEIBQFyAl83AAAJAQtTdHJpbmdFbnRyeQIFCGxhbmRzS2V5CQC7CQIIBQFyAl83AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQMJAGYCCAUBcgJfOAUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMIBQFyAl84CQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEFBWlzc3VlCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFCm5ld0xhbmROdW0FDm5ld0xhbmRBc3NldElkCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUObmV3TGFuZEFzc2V0SWQFBGFkZHIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFCm5ld0xhbmROdW0FBGFkZHIJAQxJbnRlZ2VyRW50cnkCCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQ5uZXdMYW5kQXNzZXRJZAgFAXICXzIJAQxJbnRlZ2VyRW50cnkCCQEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkFSVFBSRVNBTEUFDm5ld0xhbmRBc3NldElkBQRhZGRyCAUBcgJfMgkBDEludGVnZXJFbnRyeQIJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQUObmV3TGFuZEFzc2V0SWQFCG5ld0xldmVsCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFDm5ld0xhbmRBc3NldElkBQRhZGRyBQhuZXdMZXZlbAkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIIBQFyAl80CQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAgFAXICXzYJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIFCWNvbnRpbmVudAkAzAgCAgFMCQDMCAIFDm5ld0xhbmRBc3NldElkBQNuaWwCAV8JAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGFkZHIAAQUHYXNzZXRJZAUObmV3TGFuZEFzc2V0SWQBA3MybQMEYWRkcgxsYW5kQXNzZXRJZHMEdHhJZAkBDW1lcmdlSW50ZXJuYWwHAgFNAAMCBFNTU1MFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAAAAQNtMmwFBGFkZHIMbGFuZEFzc2V0SWRzBHR4SWQMc2hvdWxkVXNlTWF0DXBheW1lbnRBbW91bnQEBGNvc3QJAGgCBRVJbmZyYVVwZ3JhZGVDb3N0U1VzZHQABAMDCQEBIQEFDHNob3VsZFVzZU1hdAkBAiE9AgUNcGF5bWVudEFtb3VudAUEY29zdAcJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQRjb3N0CQENbWVyZ2VJbnRlcm5hbAcCAUwABAIDU01NBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwAEAQRsMnhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0AC8DAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgJYTAAFAgVTU1NNTAUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMALwEGeGwyeHhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2R0ADYDAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgNYWEwABgIDTFhMBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwA2AQttZXJnZUNvbW1vbgUMc2hvdWxkVXNlTWF0BGFkZHINcGF5bWVudEFtb3VudAxsYW5kQXNzZXRJZHMEdHhJZAQLbWVyZ2VSZXN1bHQEByRtYXRjaDAJAJADAQUMbGFuZEFzc2V0SWRzAwkAAAIABAUHJG1hdGNoMAkBA3MybQMFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAMJAAACAAMFByRtYXRjaDAJAQNtMmwFBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQFDHNob3VsZFVzZU1hdAUNcGF5bWVudEFtb3VudAMJAAACAAUFByRtYXRjaDAJAQRsMnhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQDCQAAAgACBQckbWF0Y2gwCQEGeGwyeHhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQJAAIBAg1Vbmtub3duIG1lcmdlBQttZXJnZVJlc3VsdAEGcHJvbG9nAQFpAwMJAQIhPQIIBQFpDG9yaWdpbkNhbGxlcgUMcmVzdENvbnRyYWN0CQELdmFsdWVPckVsc2UCCQCgCAEJAQprZXlCbG9ja2VkAAcHCQACAQIfQ29udHJhY3RzIGFyZSB1bmRlciBtYWludGVuYW5jZQkBC1N0cmluZ0VudHJ5AgkBEWtleUxhc3RUeElkQnlVc2VyAQkApQgBCAUBaQxvcmlnaW5DYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZCIBaQENY29uc3RydWN0b3JWMQEIcmVzdEFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBCnNldEJsb2NrZWQBCWlzQmxvY2tlZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEXBlcm1pc3Npb24gZGVuaWVkCQDMCAIJAQxCb29sZWFuRW50cnkCCQEKa2V5QmxvY2tlZAAFCWlzQmxvY2tlZAUDbmlsAWkBCXN0YWtlTGFuZAAEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKTEFORFBSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUEdGhpcwkAAgECF1Vua25vd24gaXNzdWVyIG9mIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKTEFORFBSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkxBTkRQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAtsYW5kTnVtU2l6ZQkAsAICCAUFYXNzZXQEbmFtZQAEBAdsYW5kTnVtAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCA1hYTAkAswICBQtsYW5kTnVtU2l6ZQADAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCAlhMCQCzAgIFC2xhbmROdW1TaXplAAIJALMCAgULbGFuZE51bVNpemUAAQMJAQEhAQkBCWlzRGVmaW5lZAEJALYJAQUHbGFuZE51bQkAAgEJAKwCAgIeQ2Fubm90IHBhcnNlIGxhbmQgbnVtYmVyIGZyb20gCAUFYXNzZXQEbmFtZQQLbGFuZEFzc2V0SWQJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8EDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCBQFkBQtyZWNUZXJyYWlucwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMJAGkCBQZwaWVjZXMFBVNTSVpFAAEECWFydFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAAABAhsYW5kc0tleQkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFB2FkZHJlc3MECGxhbmRzU3RyCQCiCAEFCGxhbmRzS2V5BAVsYW5kcwMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsAwkBD2NvbnRhaW5zRWxlbWVudAIFBWxhbmRzBQtsYW5kQXNzZXRJZAkAAgEJAKwCAgIiWW91ciBzdGFrZWQgbGFuZHMgYWxyZWFkeSBjb250YWluIAULbGFuZEFzc2V0SWQECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAlwaWVjZXNLZXkJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwQJb2xkUGllY2VzCQELdmFsdWVPckVsc2UCCQCfCAEFCXBpZWNlc0tleQAABAl3bGdSZXN1bHQJAQVhc0ludAEJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkAzQgCBQVsYW5kcwULbGFuZEFzc2V0SWQCAV8JAMwIAgkBDEludGVnZXJFbnRyeQIFCXBpZWNlc0tleQkAZAIFCW9sZFBpZWNlcwUGcGllY2VzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQdhZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkBQdhZGRyZXNzBQlhcnRQaWVjZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwUKaW5mcmFMZXZlbAkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5UmVzUHJvcG9ydGlvbnMABQVwcm9wcwkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAUJd2xnUmVzdWx0AWkBC3Vuc3Rha2VMYW5kAQ1sYW5kQXNzZXRJZEluBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMDBQRhZGRyBQ1jbGFpbU1vZGVEdWNrBQ1sYW5kQXNzZXRJZEluBAtsYW5kQXNzZXRJZAgFAWMCXzIECGxhbmRzS2V5CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUEYWRkcgQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIIBQFjAl8zBQtyZWNUZXJyYWlucwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEBXByb3BzCQERdXBkYXRlUHJvcG9ydGlvbnMDBQ10ZXJyYWluQ291bnRzCQBpAgUGcGllY2VzBQVTU0laRQD///////////8BBAtjbGFpbVJlc3VsdAkBCGNsYWltQWxsBAUEYWRkcgULbGFuZEFzc2V0SWQFBnBpZWNlcwUNY2xhaW1Nb2RlRHVjawQFbGFuZHMJAL0JAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQhsYW5kc0tleQIAAgFfBANpZHgJAM8IAgUFbGFuZHMFC2xhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQUDaWR4CQACAQkArAICAiBZb3VyIHN0YWtlZCBsYW5kcyBkb24ndCBjb250YWluIAULbGFuZEFzc2V0SWQEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEDmdvdlJlbGVhc2VUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFC2dvdkNvbnRyYWN0CQEVa2V5VXNlckd3bFJlbGVhc2VUaW1lAQUEYWRkcgAAAwkAZwIFDmdvdlJlbGVhc2VUaW1lBQNub3cJAAIBCQCsAgICOVlvdXIgZ1dMIGFyZSB0YWtpbmcgcGFydCBpbiB2b3RpbmcsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQ5nb3ZSZWxlYXNlVGltZQQOYXJiUmVsZWFzZVRpbWUJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFC3dsZ0NvbnRyYWN0CQEUa2V5TGFzdEFyYlRpbWVCeVVzZXIBBQRhZGRyAAAFDmFyYml0cmFnZURlbGF5AwkAZgIFDmFyYlJlbGVhc2VUaW1lBQNub3cJAAIBCQCsAgICP1lvdXIgc3Rha2VkIGxhbmRzIHRvb2sgcGFydCBpbiBhcmJpdHJhZ2UsIGNhbm5vdCB1bnN0YWtlIHVudGlsIAkApAMBBQ5hcmJSZWxlYXNlVGltZQQJcGllY2VzS2V5CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFBGFkZHIEDHN0YWtlZFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlwaWVjZXNLZXkAAAQJbmV3UGllY2VzAwkAZgIFBnBpZWNlcwUMc3Rha2VkUGllY2VzAAAJAGUCBQxzdGFrZWRQaWVjZXMFBnBpZWNlcwQJd2xnUmVzdWx0CQEFYXNJbnQBCQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUEYWRkcgUDbmlsBQNuaWwJAJQKAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQkA2QQBBQtsYW5kQXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKTEFORFBSRUZJWAULbGFuZEFzc2V0SWQFBGFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMJAMwIAgkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgkAzAgCAwkAZgIJAJADAQUFbGFuZHMAAQkBC1N0cmluZ0VudHJ5AgUIbGFuZHNLZXkJALsJAgkA0QgCBQVsYW5kcwkBBXZhbHVlAQUDaWR4AgFfCQELRGVsZXRlRW50cnkBBQhsYW5kc0tleQkAzAgCCQEMSW50ZWdlckVudHJ5AgUJcGllY2VzS2V5BQluZXdQaWVjZXMJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwFCXdsZ1Jlc3VsdAFpAQlzdGFrZUR1Y2sABAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEB2Fzc2V0SWQJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCAUDcG10BmFtb3VudAABCQACAQkArAICCQCsAgICBE5GVCAFCkRVQ0tQUkVGSVgCJCB0b2tlbiBzaG91bGQgYmUgYXR0YWNoZWQgYXMgcGF5bWVudAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAMDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQ1pbmN1YmF0b3JBZGRyCQECIT0CCAUFYXNzZXQGaXNzdWVyBQticmVlZGVyQWRkcgcJAAIBCQCsAgIJAKwCAgISVW5rbm93biBpc3N1ZXIgb2YgBQpEVUNLUFJFRklYAgYgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpEVUNLUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKRFVDS1BSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQECmFzc2V0SWRTdHIJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQphc3NldElkU3RyAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkAwkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgIdWW91IGFscmVhZHkgc3Rha2VkIG9uZSBkdWNrOiAIBQVhc3NldARuYW1lBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyBAhsb2NhdGlvbgkAoggBBQZsb2NLZXkEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQphc3NldElkU3RyBAhiYWNrcGFjawkAoggBBQVicEtleQQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFCmFzc2V0SWRTdHIEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQUKYXNzZXRJZFN0cgAABAljdXJIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQphc3NldElkU3RyBQNuaWwDCQEJaXNEZWZpbmVkAQUIbG9jYXRpb24FA25pbAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBQNuaWwDCQEJaXNEZWZpbmVkAQUIYmFja3BhY2sFA25pbAkAzQgCCQDNCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6BQNuaWwJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFCWN1ckhlYWx0aAUMcHJvbG9nQWN0aW9uAWkBC3Vuc3Rha2VEdWNrAQphc3NldElkU3RyBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB2Fzc2V0SWQJANkEAQUKYXNzZXRJZFN0cgQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQkA2AQBBQdhc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAMJAQEhAQkBCWlzRGVmaW5lZAEJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgkArAICAglUaGUgZHVjayAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEJANgEAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUHYWRkcmVzcwkAAgECF1N0YWtlZCBORlQgaXMgbm90IHlvdXJzBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQUKYXNzZXRJZFN0cgQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQphc3NldElkU3RyAAAEBmhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgFBW1heEhQAwkAZgIFBW1heEhQBQZoZWFsdGgJAAIBCQCsAgIJAKwCAgIZUGxlYXNlIGhlYWwgeW91ciBkdWNrIHRvIAkApAMBBQVtYXhIUAITaHAgYmVmb3JlIHVuc3Rha2luZwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBBQd0aW1lS2V5CQDMCAIJAQtEZWxldGVFbnRyeQEFCWtleUhlYWx0aAkAzAgCCQELRGVsZXRlRW50cnkBCQEPa2V5RHVja0xvY2F0aW9uAQUKYXNzZXRJZFN0cgkAzAgCCQELRGVsZXRlRW50cnkBCQEQa2V5RHVja0lkVG9Pd25lcgEFCmFzc2V0SWRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYBQphc3NldElkU3RyBQdhZGRyZXNzCQDMCAIJAQtEZWxldGVFbnRyeQEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwBaQEIY2xhaW1SZXMCBmFtb3VudA5sYW5kQXNzZXRJZFN0cgQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQGcmVzdWx0CQEQY2xhaW1SZXNJbnRlcm5hbAQFBGFkZHIFBmFtb3VudAUNY2xhaW1Nb2RlRHVjawUObGFuZEFzc2V0SWRTdHIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAkAlAoCCQDNCAIJAM0IAgkAzQgCCQDOCAIIBQZyZXN1bHQCXzEICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAkAawMFB3hwQ2xhaW0FBmFtb3VudAUFTVVMVDgCXzEJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzIJALkJAggFBnJlc3VsdAJfMwIBOgkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfNAkAuQkCCAUGcmVzdWx0Al81AgE6BQxwcm9sb2dBY3Rpb24JAJEDAggFBnJlc3VsdAJfMwUIYnBJZHhSZXMBaQEMY2xhaW1SZXNUb1dIAgZhbW91bnQObGFuZEFzc2V0SWRTdHIEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBnJlc3VsdAkBEGNsYWltUmVzSW50ZXJuYWwEBQRhZGRyBQZhbW91bnQFC2NsYWltTW9kZVdoBQ5sYW5kQXNzZXRJZFN0cgkAlAoCCQDNCAIJAM0IAgkAzQgCCQDOCAIIBQZyZXN1bHQCXzEICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIFBGFkZHIJAGsDBQd4cENsYWltBQZhbW91bnQFBU1VTFQ4Al8xCQELU3RyaW5nRW50cnkCCAUGcmVzdWx0Al8yCQC5CQIIBQZyZXN1bHQCXzMCAToJAQtTdHJpbmdFbnRyeQIIBQZyZXN1bHQCXzQJALkJAggFBnJlc3VsdAJfNQIBOgUMcHJvbG9nQWN0aW9uCQCRAwIIBQZyZXN1bHQCXzUFCHdoSWR4UmVzAWkBBmZsaWdodAIHbWVzc2FnZQNzaWcEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQIdXNlckFkZHIJAKUIAQgFAWkGY2FsbGVyBAFmCQEMZmxpZ2h0Q29tbW9uAwUIdXNlckFkZHIFB21lc3NhZ2UFA3NpZwQLZHVja0Fzc2V0SWQIBQFmAl8yBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUGbG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04DCQAAAggFAWYCXzQFC2N1ckxvY2F0aW9uCQACAQIiWW91IGNhbid0IGZseSB0byB0aGUgc2FtZSBsb2NhdGlvbgQFZXFLZXkJARBrZXlEdWNrRXF1aXBtZW50AQULZHVja0Fzc2V0SWQECWN1cnJlbnRFcQkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywEBW5ld0VxCQERc3VidHJhY3RFcXVpcG1lbnQCBQljdXJyZW50RXEIBQFmAl81CQCUCgIJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQZsb2NLZXkDCQBmAggFAWYCXzEAAAgFAWYCXzQFC2N1ckxvY2F0aW9uCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWVxS2V5BQVuZXdFcQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAgFAWYCXzEJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAMJAGYCCAUBZgJfMQAABQ94cFN1Y2Nlc3NGbGlnaHQFDHhwRmFpbEZsaWdodAJfMQgFAWYCXzMBaQEEaGVhbAMKcXVhbnRpdHlMMQpxdWFudGl0eUwyCnF1YW50aXR5TDMEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDAwMJAGYCAAAFCnF1YW50aXR5TDEGCQBmAgAABQpxdWFudGl0eUwyBgkAZgIAAAUKcXVhbnRpdHlMMwkAAgECG1F1YW50aXR5IGNhbm5vdCBiZSBuZWdhdGl2ZQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQDcXRzCQDMCAIFCnF1YW50aXR5TDEJAMwIAgUKcXVhbnRpdHlMMgkAzAgCBQpxdWFudGl0eUwzBQNuaWwECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQFbWF4SFAJAQltYXhIZWFsdGgBCQELdmFsdWVPckVsc2UCCQCfCAEJAQxrZXlEdWNrTGV2ZWwBBQtkdWNrQXNzZXRJZAAABAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoBQVtYXhIUAMJAGcCBQlvbGRIZWFsdGgFBW1heEhQCQACAQkArAICCQCsAgICD0hQIHNob3VsZCBiZSA8IAkApAMBBQVtYXhIUAIIIHRvIGhlYWwEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAhwcm9kTGlzdAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwoBC2l0ZXJhdGVQcm9kAgNhY2MLaWdub3JlZEl0ZW0EAW4IBQNhY2MCXzIEAXgDCQBmAgkAkAMBBQhwcm9kTGlzdAUBbgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0BQFuAAADCQBmAgADBQFuBAFxCQCRAwIFA3F0cwUBbgMJAGYCBQFxBQF4CQACAQkArAICCQCsAgIJAKwCAgIOWW91IGhhdmUgb25seSAJAKQDAQUBeAIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFAW4JAJUKAwkAzQgCCAUDYWNjAl8xCQCkAwEJAGUCBQF4BQFxCQBkAgUBbgABCQBkAggFA2FjYwJfMwkAaAIJAJEDAgUIbWVkS2l0SHAFAW4FAXEJAJUKAwkAzQgCCAUDYWNjAl8xCQCkAwEFAXgJAGQCBQFuAAEIBQNhY2MCXzMEBnJlc3VsdAoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQtpdGVyYXRlUHJvZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyBAluZXdIZWFsdGgJAJcDAQkAzAgCBQVtYXhIUAkAzAgCCQBkAgUJb2xkSGVhbHRoCAUGcmVzdWx0Al8zBQNuaWwJAJQKAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFCW5ld0hlYWx0aAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAugkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgkAuQkCCAUGcmVzdWx0Al8xAgFfBQNuaWwCAToJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAkAaAIFBnhwSGVhbAkAZAIJAGQCBQpxdWFudGl0eUwxBQpxdWFudGl0eUwyBQpxdWFudGl0eUwzAl8xBQluZXdIZWFsdGgBaQEGaGVhbEVTAAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAAwkBAiE9AggFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECGkFsbG93ZWQgVVNEVCBwYXltZW50IG9ubHkhBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQEBW1heEhQCQEJbWF4SGVhbHRoAQkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEMa2V5RHVja0xldmVsAQULZHVja0Fzc2V0SWQAAAQJb2xkSGVhbHRoCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aAUFbWF4SFADCQBmAgUJb2xkSGVhbHRoAAAJAAIBAihIUCBzaG91bGQgYmUgMCB0byBjYWxsIEVtZXJnZW5jeSBTZXJ2aWNlBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQIcHJvZExpc3QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8EDW1lZEtpdEFtb3VudDEDCQBmAgkAkAMBBQhwcm9kTGlzdAAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUIcHJvZExpc3QAAAAABA1tZWRLaXRBbW91bnQyAwkAZgIJAJADAQUIcHJvZExpc3QAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0AAEAAAQNbWVkS2l0QW1vdW50MwMJAGYCCQCQAwEFCHByb2RMaXN0AAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9kTGlzdAACAAADAwMJAGYCBQ1tZWRLaXRBbW91bnQxAAAGCQBmAgUNbWVkS2l0QW1vdW50MgAABgkAZgIFDW1lZEtpdEFtb3VudDMAAAkAAgECH1lvdSBoYXZlIHRvIHVzZSBvd24gTWVkaWNhbCBLaXQECGV4aXN0U3RyCQCdCAIFD2Vjb25vbXlDb250cmFjdAkBDmtleUVzV2FyZWhvdXNlAAQMZXhpc3RBbW91bnRzAwkBCWlzRGVmaW5lZAEFCGV4aXN0U3RyCQC1CQIJAQV2YWx1ZQEFCGV4aXN0U3RyAgFfBQNuaWwEC2V4aXN0QW1vdW50AwkAZgIJAJADAQUMZXhpc3RBbW91bnRzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxleGlzdEFtb3VudHMAAAAAAwkAZwIAAAULZXhpc3RBbW91bnQJAAIBAjlUaGVyZSBhcmUgbm8gTWVkaWNhbCBLaXRzIEwxIGF0IEVtZXJnZW5jeSBTZXJ2aWNlIHN0b3JhZ2UECW5ld0hlYWx0aAkAZAIFCW9sZEhlYWx0aAkAkQMCBQhtZWRLaXRIcAAABAVuZXdFUwkAuQkCCQDMCAIJAKQDAQkAZQIFC2V4aXN0QW1vdW50AAEJANEIAgUMZXhpc3RBbW91bnRzAAACAV8EBnJlY2lwZQkAtQkCCQCRAwIFEHByb2R1Y3Rpb25NYXRyaXgAAAIBXwQIdG90YWxNYXQJARJnZXRSZWNpcGVNYXRlcmlhbHMBBQZyZWNpcGUECXNlbGxQcmljZQkAawMJAGgCBQh0b3RhbE1hdAUKRVNTRUxMQ09FRgUQUkVTT1VSQ0VQUklDRU1JTgkAaAIACgUOUFJPRFVDVFBLR1NJWkUDCQECIT0CCAUDcG10BmFtb3VudAUJc2VsbFByaWNlCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUJc2VsbFByaWNlBAZyZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPZWNvbm9teUNvbnRyYWN0Ag91cGRhdGVFc1N0b3JhZ2UJAMwIAgUFbmV3RVMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgULdXNkdEFzc2V0SWQFCXNlbGxQcmljZQUDbmlsCQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQluZXdIZWFsdGgJAMwIAgUMcHJvbG9nQWN0aW9uBQNuaWwICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAUIeHBDYWxsRVMCXzEFBnJlc3VsdAFpAQ51cGRhdGVCYWNrcGFjawILZHVja0Fzc2V0SWQHbmV3UGFjawMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAUHbmV3UGFjawUDbmlsBQduZXdQYWNrAWkBCGJ1eVNMYW5kAAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAAwkBAiE9AggFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECGkFsbG93ZWQgVVNEVCBwYXltZW50IG9ubHkhAwkBAiE9AggFA3BtdAZhbW91bnQFB0VYUFVTRFQJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQdFWFBVU0RUBAZyZXN1bHQJARJleHBlZGl0aW9uSW50ZXJuYWwCCAUBaQZjYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQJAJQKAgkAzQgCCQDOCAIJAM0IAggFBnJlc3VsdAJfMQkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0CAUDcG10BmFtb3VudAULdXNkdEFzc2V0SWQICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIJAKUIAQgFAWkGY2FsbGVyBQp4cE5ld1NMYW5kAl8xBQxwcm9sb2dBY3Rpb24ICAUGcmVzdWx0Al8yAl8xAWkBCmV4cGVkaXRpb24CB21lc3NhZ2UDc2lnBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBnJlc3VsdAkBEGV4cGVkaXRpb25Db21tb24ECAUBaQZjYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQFB21lc3NhZ2UFA3NpZwQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAkAlAoCCQDNCAIJAM4IAggFBnJlc3VsdAJfMQgJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkBQp4cE5ld1NMYW5kAl8xBQxwcm9sb2dBY3Rpb24JAJQKAggFBnJlc3VsdAJfMggFBnJlc3VsdAJfMwFpAQx1cGdyYWRlSW5mcmEBC2xhbmRBc3NldElkBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBnJlc3VsdAkBDXVwSW5mcmFDb21tb24EBggFAWkGY2FsbGVyAAAFC2xhbmRBc3NldElkBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkCQCUCgIJAM4IAgkAzQgCCAUGcmVzdWx0Al8xBQxwcm9sb2dBY3Rpb24ICQEXdXBkYXRlRHVja1N0YXRzSW50ZXJuYWwCBQtkdWNrQXNzZXRJZAkAawMFDnhwVXBncmFkZUluZnJhCAUGcmVzdWx0Al8zBQVNVUxUOAJfMQgFBnJlc3VsdAJfMgFpARB1cGdyYWRlSW5mcmFVc2R0AQtsYW5kQXNzZXRJZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEEBnJlc3VsdAkBDXVwSW5mcmFDb21tb24EBwgFAWkGY2FsbGVyCAUDcG10BmFtb3VudAULbGFuZEFzc2V0SWQJAJQKAgkAzQgCCQDNCAIIBQZyZXN1bHQCXzEJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAgFA3BtdAZhbW91bnQFC3VzZHRBc3NldElkBQxwcm9sb2dBY3Rpb24IBQZyZXN1bHQCXzIBaQEQYWN0aXZhdGVBcnRpZmFjdAIHYXJ0TmFtZQ5sYW5kQXNzZXRJZE9wdAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpBmNhbGxlcgQGcmVzdWx0BAckbWF0Y2gwBQdhcnROYW1lAwkAAAICB1BSRVNBTEUFByRtYXRjaDAJARJhY3RpdmF0ZVByZXNhbGVBcnQCBQRhZGRyBQ5sYW5kQXNzZXRJZE9wdAMJAAACAgdPTkJPQVJEBQckbWF0Y2gwCQESYWN0aXZhdGVPbmJvYXJkQXJ0AQUEYWRkcgkAAgECEFVua25vd24gYXJ0aWZhY3QJAM0IAgUGcmVzdWx0BQxwcm9sb2dBY3Rpb24BaQEKbWVyZ2VMYW5kcwEMbGFuZEFzc2V0SWRzBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBnJlc3VsdAkBC21lcmdlQ29tbW9uBQYJAKUIAQgFAWkGY2FsbGVyAAAFDGxhbmRBc3NldElkcwgFAWkNdHJhbnNhY3Rpb25JZAkAlAoCCQDOCAIJAM0IAggFBnJlc3VsdAJfMQUMcHJvbG9nQWN0aW9uCAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCCQClCAEIBQFpBmNhbGxlcgUHeHBNZXJnZQJfMQgFBnJlc3VsdAJfMgFpAQ5tZXJnZUxhbmRzVXNkdAEMbGFuZEFzc2V0SWRzBAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQIaQWxsb3dlZCBVU0RUIHBheW1lbnQgb25seSEEBnJlc3VsdAkBC21lcmdlQ29tbW9uBQcJAKUIAQgFAWkGY2FsbGVyCAUDcG10BmFtb3VudAUMbGFuZEFzc2V0SWRzCAUBaQ10cmFuc2FjdGlvbklkCQCUCgIJAM0IAgkAzQgCCAUGcmVzdWx0Al8xCQEOU2NyaXB0VHJhbnNmZXIDBQ9lY29ub215Q29udHJhY3QIBQNwbXQGYW1vdW50BQt1c2R0QXNzZXRJZAUMcHJvbG9nQWN0aW9uCAUGcmVzdWx0Al8yAWkBDWNhcmdvRXhjaGFuZ2UCDGNhcmdvTGlzdFN0cgtsYW5kQXNzZXRJZAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBApjYXJnb1BhcnRzCQC8CQIFDGNhcmdvTGlzdFN0cgIBOgQEYWRkcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQUFU1NJWkUECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCiCAEJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OBANsb2MJALUJAgkBBXZhbHVlAQULY3VyTG9jYXRpb24CAV8DCQECIT0CCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQIBTAkAAgEJAKwCAgkArAICAhZEdWNrIGxvY2F0aW9uIHR5cGUgaXMgCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQIRLCBidXQgc2hvdWxkIGJlIEwDCQECIT0CCQCRAwIFA2xvYwUIbG9jSWR4SWQFC2xhbmRBc3NldElkCQACAQkArAICAhtEdWNrIHNob3VsZCBiZSBvbiB0aGUgbGFuZCAFC2xhbmRBc3NldElkBAV3aEtleQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBAljdXJyZW50V2gJAQxnZXRXYXJlaG91c2UDBQV3aEtleQUJbGFuZEluZGV4BQppbmZyYUxldmVsBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQGcmVzdWx0CQEJbW92ZVN0dWZmAwUKY2FyZ29QYXJ0cwUJY3VycmVudFdoBQtjdXJyZW50UGFjawQEbG9mdAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhMT0ZUAgFfBAVsb2Z0TwkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQt2b2xPY2N1cGllZAgFBnJlc3VsdAJfNwQFbG9mdEYJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUEbG9mdAUHdm9sRnJlZQgFBnJlc3VsdAJfNwkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAugkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAggFBnJlc3VsdAJfNAkAzAgCCAUGcmVzdWx0Al81CQDMCAIIBQZyZXN1bHQCXzYFA25pbAIBOgkAzAgCCQELU3RyaW5nRW50cnkCBQV3aEtleQkAugkCCQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCCAUGcmVzdWx0Al8xCQDMCAIIBQZyZXN1bHQCXzIJAMwIAggFBnJlc3VsdAJfMwkAzAgCCQC5CQIJAMwIAgkAkQMCBQRsb2Z0BQl2b2xMb2NrZWQJAMwIAgkApAMBBQVsb2Z0TwkAzAgCCQCkAwEFBWxvZnRGCQDMCAIJAJEDAgUEbG9mdAUIdm9sVG90YWwFA25pbAIBXwUDbmlsAgE6CQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAWkBDXNhdmVXYXJlaG91c2UCBXdoU3RyC2xhbmRBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBQ9lY29ub215Q29udHJhY3QJAAIBAg1BY2Nlc3MgZGVuaWVkBAV3aEtleQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBAJ3aAkAvAkCBQV3aFN0cgIBOgMJAQIhPQIJAJADAQUCd2gABQkAAgECMHdhcmVob3VzZSBzdHJpbmcgc2hvdWxkIGNvbnRhaW4gNCAnOicgc2VwYXJhdG9ycwQFbG9mdEwJAJEDAgkAtQkCCQCRAwIFAndoBQl3aElkeExPRlQCAV8FCXZvbExvY2tlZAQFbG9mdE8JARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFAndoBAVsb2Z0VAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQJ3aAULd2hJZHhMZXZlbHMEBWxvZnRGCQBlAgkAZQIFBWxvZnRUCQENcGFyc2VJbnRWYWx1ZQEFBWxvZnRMBQVsb2Z0TwQIbmV3V2hTdHIJALoJAgkAzAgCCQCRAwIFAndoBQt3aElkeExldmVscwkAzAgCCQCRAwIFAndoBQh3aElkeFJlcwkAzAgCCQCRAwIFAndoBQh3aElkeE1hdAkAzAgCCQCRAwIFAndoBQl3aElkeFByb2QJAMwIAgkAuQkCCQDMCAIFBWxvZnRMCQDMCAIJAKQDAQUFbG9mdE8JAMwIAgkApAMBBQVsb2Z0RgkAzAgCCQCkAwEFBWxvZnRUBQNuaWwCAV8FA25pbAIBOgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBXdoS2V5BQhuZXdXaFN0cgUDbmlsBQhuZXdXaFN0cgFpARJmaXhXYXJlaG91c2VGb3JtYXQBC2xhbmRBc3NldElkAwkBAiE9AggFAWkGY2FsbGVyBQxyZXN0Q29udHJhY3QJAAIBAg1BY2Nlc3MgZGVuaWVkBAV3aEtleQkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAlsYW5kSW5kZXgJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwULcmVjTGFuZFNpemUFBVNTSVpFBAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQCd2gJAQxnZXRXYXJlaG91c2UDBQV3aEtleQUJbGFuZEluZGV4BQppbmZyYUxldmVsBAVsb2Z0TAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnJlY2FsY0xvY2tlZFZvbHVtZVJFQURPTkxZCQDMCAIFC2xhbmRBc3NldElkCQDMCAIFAndoBQNuaWwFA25pbAQFbG9mdE8JARdnZXRXYXJlaG91c2VPY2N1cGllZFZvbAEFAndoBAVsb2Z0VAkBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQkAkQMCBQJ3aAULd2hJZHhMZXZlbHMEBWxvZnRGCQBlAgkAZQIFBWxvZnRUBQVsb2Z0TAUFbG9mdE8ECG5ld1doU3RyCQC6CQIJAMwIAgkAkQMCBQJ3aAULd2hJZHhMZXZlbHMJAMwIAgkAkQMCBQJ3aAUId2hJZHhSZXMJAMwIAgkAkQMCBQJ3aAUId2hJZHhNYXQJAMwIAgkAkQMCBQJ3aAUJd2hJZHhQcm9kCQDMCAIJALkJAgkAzAgCCQCkAwEFBWxvZnRMCQDMCAIJAKQDAQUFbG9mdE8JAMwIAgkApAMBBQVsb2Z0RgkAzAgCCQCkAwEFBWxvZnRUBQNuaWwCAV8FA25pbAIBOgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBXdoS2V5BQhuZXdXaFN0cgUDbmlsBQhuZXdXaFN0cgFpAQ9maXhTdGFrZWRQaWVjZXMBB2FkZHJlc3MDCQECIT0CCAUBaQZjYWxsZXIFDHJlc3RDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQEDHN0YWtlZFBpZWNlcwMJAAACBQdhZGRyZXNzAgAAAAQIbGFuZHNTdHIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUHYWRkcmVzcwQFbGFuZHMDCQEJaXNEZWZpbmVkAQUIbGFuZHNTdHIJAL0JAgkBBXZhbHVlAQUIbGFuZHNTdHICAV8FA25pbAoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQIbGFuZFNpemUJAJEDAgkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8FC3JlY0xhbmRTaXplCQBkAgUDYWNjCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUKAAIkbAUFbGFuZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB29uZUxhbmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQUHYWRkcmVzcwUMc3Rha2VkUGllY2VzBQNuaWwFDHN0YWtlZFBpZWNlcwFpAQ1zZXRDdXN0b21OYW1lAwdhc3NldElkCmN1c3RvbU5hbWUEdHlwZQQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAAwkBAiE9AggFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECGkFsbG93ZWQgVVNEVCBwYXltZW50IG9ubHkhAwkBAiE9AggFA3BtdAZhbW91bnQFDFJFTkFNSU5HQ09TVAkAAgEJAKwCAgISUGF5bWVudCBzaG91bGQgYmUgCQCkAwEFDFJFTkFNSU5HQ09TVAMJAQhjb250YWlucwIFCmN1c3RvbU5hbWUCAl9fCQACAQkArAICAh5OYW1lIHNob3VsZCBub3QgY29udGFpbiAnX18nOiAFCmN1c3RvbU5hbWUDCQBmAgkAsQIBBQpjdXN0b21OYW1lBQpNQVhOQU1FTEVOCQACAQkArAICAhlOYW1lIHRvbyBsb25nLCBtYXhMZW5ndGg9CQCkAwEFCk1BWE5BTUVMRU4EBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAdhY3Rpb25zBAckbWF0Y2gwBQR0eXBlAwkAAAICB0FDQ09VTlQFByRtYXRjaDAECnJldmVyc2VLZXkJARZrZXlDdXN0b21OYW1lVG9BZGRyZXNzAQUKY3VzdG9tTmFtZQQJbmFtZU93bmVyCQCiCAEFCnJldmVyc2VLZXkDCQEJaXNEZWZpbmVkAQUJbmFtZU93bmVyCQACAQkArAICAhlOYW1lIGFscmVhZHkgcmVnaXN0ZXJlZDogBQpjdXN0b21OYW1lBA1hZGRyVG9OYW1lS2V5CQEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEFBGFkZHIEB29sZE5hbWUJAKIIAQUNYWRkclRvTmFtZUtleQQHZnJlZU9sZAMJAQlpc0RlZmluZWQBBQdvbGROYW1lCQDMCAIJAQtEZWxldGVFbnRyeQEJARZrZXlDdXN0b21OYW1lVG9BZGRyZXNzAQkBBXZhbHVlAQUHb2xkTmFtZQUDbmlsBQNuaWwJAM4IAgkAzQgCCQDNCAIFB2ZyZWVPbGQJAQtTdHJpbmdFbnRyeQIFDWFkZHJUb05hbWVLZXkFCmN1c3RvbU5hbWUJAQtTdHJpbmdFbnRyeQIFCnJldmVyc2VLZXkFBGFkZHIICQEWdXBkYXRlQWNjU3RhdHNJbnRlcm5hbAIFBGFkZHIFDHhwQ3VzdG9tTmFtZQJfMQMJAAACAgRMQU5EBQckbWF0Y2gwBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUHYXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAggFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQdhc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBApyZXZlcnNlS2V5CQEaa2V5TGFuZEN1c3RvbU5hbWVUb0Fzc2V0SWQBBQpjdXN0b21OYW1lBAluYW1lT3duZXIJAKIIAQUKcmV2ZXJzZUtleQMJAQlpc0RlZmluZWQBBQluYW1lT3duZXIJAAIBCQCsAgICGU5hbWUgYWxyZWFkeSByZWdpc3RlcmVkOiAFCmN1c3RvbU5hbWUEDmFzc2V0VG9OYW1lS2V5CQEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBBQdhc3NldElkBAdvbGROYW1lCQCiCAEFDmFzc2V0VG9OYW1lS2V5BAdmcmVlT2xkAwkBCWlzRGVmaW5lZAEFB29sZE5hbWUJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBGmtleUxhbmRDdXN0b21OYW1lVG9Bc3NldElkAQkBBXZhbHVlAQUHb2xkTmFtZQUDbmlsBQNuaWwJAM4IAgkAzQgCCQDNCAIFB2ZyZWVPbGQJAQtTdHJpbmdFbnRyeQIFDmFzc2V0VG9OYW1lS2V5BQpjdXN0b21OYW1lCQELU3RyaW5nRW50cnkCBQpyZXZlcnNlS2V5BQdhc3NldElkCAkBFnVwZGF0ZUFjY1N0YXRzSW50ZXJuYWwCBQRhZGRyBQx4cEN1c3RvbU5hbWUCXzEDCQAAAgIERFVDSwUHJG1hdGNoMAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQdhc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFB2Fzc2V0SWQDAwkBASEBCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5BgkBASEBCQEJaXNEZWZpbmVkAQkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyCQACAQkArAICCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBEGtleUR1Y2tJZFRvT3duZXIBBQdhc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpEVUNLUFJFRklYAg0gaXMgbm90IHlvdXJzBApyZXZlcnNlS2V5CQEaa2V5RHVja0N1c3RvbU5hbWVUb0Fzc2V0SWQBBQpjdXN0b21OYW1lBAluYW1lT3duZXIJAKIIAQUKcmV2ZXJzZUtleQMJAQlpc0RlZmluZWQBBQluYW1lT3duZXIJAAIBCQCsAgICGU5hbWUgYWxyZWFkeSByZWdpc3RlcmVkOiAFCmN1c3RvbU5hbWUEDmFzc2V0VG9OYW1lS2V5CQEaa2V5RHVja0Fzc2V0SWRUb0N1c3RvbU5hbWUBBQdhc3NldElkBAdvbGROYW1lCQCiCAEFDmFzc2V0VG9OYW1lS2V5BAdmcmVlT2xkAwkBCWlzRGVmaW5lZAEFB29sZE5hbWUJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBGmtleUR1Y2tDdXN0b21OYW1lVG9Bc3NldElkAQkBBXZhbHVlAQUHb2xkTmFtZQUDbmlsBQNuaWwJAM4IAgkAzQgCCQDNCAIFB2ZyZWVPbGQJAQtTdHJpbmdFbnRyeQIFDmFzc2V0VG9OYW1lS2V5BQpjdXN0b21OYW1lCQELU3RyaW5nRW50cnkCBQpyZXZlcnNlS2V5BQdhc3NldElkCAkBF3VwZGF0ZUR1Y2tTdGF0c0ludGVybmFsAgUHYXNzZXRJZAUMeHBDdXN0b21OYW1lAl8xCQACAQITVW5rbm93biBlbnRpdHkgdHlwZQkAlAoCCQDNCAIJAM0IAgUHYWN0aW9ucwkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0CAUDcG10BmFtb3VudAULdXNkdEFzc2V0SWQFDHByb2xvZ0FjdGlvbgAAAWkBDHNldFJlZmVycmFscwIJb2xkUGxheWVyCW5ld1BsYXllcgMJAQIhPQIIBQFpD2NhbGxlclB1YmxpY0tleQUDcHViCQACAQIRUGVybWlzc2lvbiBkZW5pZWQEDHByb2xvZ0FjdGlvbgkBBnByb2xvZwEFAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAMJAQEhAQkBCWlzRGVmaW5lZAEJAKYIAQUJb2xkUGxheWVyCQACAQkArAICAhFJbnZhbGlkIGFkZHJlc3M6IAUJb2xkUGxheWVyAwkBASEBCQEJaXNEZWZpbmVkAQkApggBBQluZXdQbGF5ZXIJAAIBCQCsAgICEUludmFsaWQgYWRkcmVzczogBQluZXdQbGF5ZXIEB29sZHNLZXkJAQlrZXlPbGRpZXMABARvbGRzCQCiCAEFB29sZHNLZXkEBm9sZGllcwMJAQlpc0RlZmluZWQBBQRvbGRzCQC8CQIJAQV2YWx1ZQEFBG9sZHMCAV8FA25pbAMJAQ9jb250YWluc0VsZW1lbnQCBQZvbGRpZXMFCW5ld1BsYXllcgkAAgEJAKwCAgUJbmV3UGxheWVyAiYgaXMgbm90IG5ld2JpZSAoYWxyZWFkeSBoYXMgcmVmZXJyYWxzKQQIcmVmQnlLZXkJAQ9rZXlBZGRyZXNzUmVmQnkBBQluZXdQbGF5ZXIEBXJlZkJ5CQCiCAEFCHJlZkJ5S2V5AwMJAQlpc0RlZmluZWQBBQVyZWZCeQkBCWlzRGVmaW5lZAEJAKYIAQkBBXZhbHVlAQUFcmVmQnkHCQACAQkArAICCQCsAgIFCW5ld1BsYXllcgIUIGFscmVhZHkgaGFzIHJlZkJ5OiAJAQV2YWx1ZQEFBXJlZkJ5BAdyZWZzS2V5CQETa2V5QWRkcmVzc1JlZmVycmFscwEFCW9sZFBsYXllcgQEcmVmcwkAoggBBQdyZWZzS2V5BAlyZWZzQXJyYXkDCQEJaXNEZWZpbmVkAQUEcmVmcwkAvAkCCQEFdmFsdWUBBQRyZWZzAgFfBQNuaWwDCQEPY29udGFpbnNFbGVtZW50AgUJcmVmc0FycmF5BQluZXdQbGF5ZXIJAAIBCQCsAgIJAKwCAgkArAICBQlvbGRQbGF5ZXICEiBhbHJlYWR5IGNvbnRhaW5zIAUJbmV3UGxheWVyAhEgd2l0aGluIHJlZmVycmFscwQHbmV3UmVmcwkAugkCCQDNCAIFCXJlZnNBcnJheQUJbmV3UGxheWVyAgFfBAduZXdPbGRzAwkBD2NvbnRhaW5zRWxlbWVudAIFBm9sZGllcwUJb2xkUGxheWVyCQEFdmFsdWUBBQRvbGRzCQC6CQIJAM0IAgUGb2xkaWVzBQlvbGRQbGF5ZXICAV8JAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQhyZWZCeUtleQUJb2xkUGxheWVyCQDMCAIJAQtTdHJpbmdFbnRyeQIFB3JlZnNLZXkFB25ld1JlZnMJAMwIAgkBC1N0cmluZ0VudHJ5AgUHb2xkc0tleQUHbmV3T2xkcwkAzAgCBQxwcm9sb2dBY3Rpb24FA25pbAAAAWkBEGRpc3RyaWJ1dGVQb2ludHMFCHN0cmVuZ3RoCGFjY3VyYWN5CWludGVsbGVjdAllbmR1cmFuY2UJZGV4dGVyaXR5BAxwcm9sb2dBY3Rpb24JAQZwcm9sb2cBBQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFBGFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECmZyZWVLZXlBY2MJARFrZXlVc2VyRnJlZVBvaW50cwEFBGFkZHIEDWZyZWVQb2ludHNBY2MJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQpmcmVlS2V5QWNjAAAEC2ZyZWVLZXlEdWNrCQERa2V5RHVja0ZyZWVQb2ludHMBBQtkdWNrQXNzZXRJZAQOZnJlZVBvaW50c0R1Y2sJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0BQtmcmVlS2V5RHVjawAABAdzdW1GcmVlCQBkAgUNZnJlZVBvaW50c0FjYwUOZnJlZVBvaW50c0R1Y2sED3N1bVRvRGlzdHJpYnV0ZQkAZAIJAGQCCQBkAgkAZAIFCHN0cmVuZ3RoBQhhY2N1cmFjeQUJaW50ZWxsZWN0BQllbmR1cmFuY2UFCWRleHRlcml0eQMJAGYCBQ9zdW1Ub0Rpc3RyaWJ1dGUFB3N1bUZyZWUJAAIBCQCsAgIJAKwCAgIPVGhlcmUgYXJlIG9ubHkgCQCkAwEFB3N1bUZyZWUCGiBmcmVlIHBvaW50cyB0byBkaXN0cmlidXRlBAhjaGFyc0tleQkBDGtleUR1Y2tDaGFycwEFC2R1Y2tBc3NldElkBAVjaGFycwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAUIY2hhcnNLZXkCCTBfMF8wXzBfMAIBXwQGbmV3QWNjCQBlAgUNZnJlZVBvaW50c0FjYwUPc3VtVG9EaXN0cmlidXRlCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFCmZyZWVLZXlBY2MDCQBmAgAABQZuZXdBY2MAAAUGbmV3QWNjCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQtmcmVlS2V5RHVjawMJAGYCAAAFBm5ld0FjYwkAZAIFDmZyZWVQb2ludHNEdWNrBQZuZXdBY2MFDmZyZWVQb2ludHNEdWNrCQDMCAIJAQtTdHJpbmdFbnRyeQIFCGNoYXJzS2V5CQC5CQIJAMwIAgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWNoYXJzBQxjaGFyU3RyZW5ndGgFCHN0cmVuZ3RoCQDMCAIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVjaGFycwUMY2hhckFjY3VyYWN5BQhhY2N1cmFjeQkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJJbnRlbGxlY3QFCWludGVsbGVjdAkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJFbmR1cmFuY2UFCWVuZHVyYW5jZQkAzAgCCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFY2hhcnMFDWNoYXJEZXh0ZXJpdHkFCWRleHRlcml0eQUDbmlsAgFfCQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAAABaQEcc3BsaXRCeUdsb2JhbFdlaWdodHNSRUFET05MWQEGYW1vdW50CQCUCgIFA25pbAkBEmdldE5lZWRlZE1hdGVyaWFscwEFBmFtb3VudAFpASRzcGxpdEJ5R2xvYmFsQW5kTG9jYWxXZWlnaHRzUkVBRE9OTFkDCW1hdEFtb3VudAlyZXNBbW91bnQIdGVycmFpbnMEDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQUIdGVycmFpbnMJAJQKAgUDbmlsCQCUCgIJARJnZXROZWVkZWRNYXRlcmlhbHMBBQltYXRBbW91bnQJARNkaXN0cmlidXRlQnlXZWlnaHRzAgUJcmVzQW1vdW50BQ10ZXJyYWluQ291bnRzAWkBE2dldEJhY2twYWNrUkVBRE9OTFkBC2R1Y2tBc3NldElkCQCUCgIFA25pbAkAuQkCCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAIBOgFpARRnZXRXYXJlaG91c2VSRUFET05MWQELbGFuZEFzc2V0SWQEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQECWxhbmRJbmRleAkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBQtyZWNMYW5kU2l6ZQUFU1NJWkUECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAACQCUCgIFA25pbAkAugkCCQEMZ2V0V2FyZWhvdXNlAwkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkBQlsYW5kSW5kZXgFCmluZnJhTGV2ZWwCAToBaQEKc2F2ZUxhc3RUeAADAwkBAiE9AggFAWkGY2FsbGVyBQt3bGdDb250cmFjdAkBAiE9AggFAWkGY2FsbGVyBQ9lY29ub215Q29udHJhY3QHCQACAQINQWNjZXNzIGRlbmllZAkAlAoCCQDMCAIJAQZwcm9sb2cBBQFpBQNuaWwAKgFpAQ91cGRhdGVEdWNrU3RhdHMCC2R1Y2tBc3NldElkB2RlbHRhWFADCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQJARd1cGRhdGVEdWNrU3RhdHNJbnRlcm5hbAIFC2R1Y2tBc3NldElkBQdkZWx0YVhQAWkBDnVwZGF0ZUFjY1N0YXRzAgRhZGRyB2RlbHRhWFADCQECIT0CCAUBaQZjYWxsZXIFD2Vjb25vbXlDb250cmFjdAkAAgECDUFjY2VzcyBkZW5pZWQJARZ1cGRhdGVBY2NTdGF0c0ludGVybmFsAgUEYWRkcgUHZGVsdGFYUAFpAQllcXVpcER1Y2sBCWVxdWlwbWVudAQMcHJvbG9nQWN0aW9uCQEGcHJvbG9nAQUBaQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQRhZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAVlcUtleQkBEGtleUR1Y2tFcXVpcG1lbnQBBQtkdWNrQXNzZXRJZAQLY3VycmVudFNlZ3MJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQVlcUtleQIXLDssXyw7LF8sOyxfLDssXyw7LF8sOywCAV8EBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAVuZXdFcQkAtQkCBQllcXVpcG1lbnQCAV8DCQECIT0CCQCQAwEFBW5ld0VxBQtOVU1TRUdNRU5UUwkAAgECFldyb25nIGVxdWlwbWVudCBzdHJpbmcEBHJlcXMJAQxnZXREdWNrU3RhdHMCBQR0aGlzBQtkdWNrQXNzZXRJZAQJdGVtcFByb2RCCQEGZHJlc3NCBAULY3VycmVudFNlZ3MJAQ5wcm9kU3RyVG9CeXRlcwEJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAYFBHJlcXMECG5ld1Byb2RCCQEGZHJlc3NCBAUFbmV3RXEFCXRlbXBQcm9kQgcFBHJlcXMECm5ld1Byb2RTdHIJAQ5ieXRlc1RvUHJvZFN0cgEFCG5ld1Byb2RCCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUFZXFLZXkFCWVxdWlwbWVudAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAugkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgUKbmV3UHJvZFN0cgUDbmlsAgE6CQDMCAIFDHByb2xvZ0FjdGlvbgUDbmlsAAAAxU1jkg==",
    "height": 2678579,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

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

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