tx · AreAx8kG7V8V5i5rwFUViSjZrBAJnypDtxCYXezDVzG1

3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep:  -0.05700000 Waves

2023.09.30 19:40 [2778415] smart account 3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AreAx8kG7V8V5i5rwFUViSjZrBAJnypDtxCYXezDVzG1",
    "fee": 5700000,
    "feeAssetId": null,
    "timestamp": 1696092047061,
    "version": 2,
    "chainId": 84,
    "sender": "3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep",
    "senderPublicKey": "7v5L7QkXxfkirALdyqmox38QCsa9jtfAtgUfHTh34eWq",
    "proofs": [
        "4vX1cvTjXXjUaN8RrSL3j8V3D12G5X7DU7B3YQujPUyzNANFFuxXnNBWHrx2ZooWvNTF9hF3nK7xsyGvjDx6iJ5a"
    ],
    "script": "base64:BgKGAQgCEgQKAggYEgMKAQgSBAoCERESBAoCCAESAwoBARIFCgMREQgSBgoEEREICBIECgIRERIFCgMREQgSBgoEEREICBIDCgEREgMKARESBAoCEQgSBAoCAQESBAoCCAgSBQoDCAgIEgQKAggIEgUKAwgICBIDCgEREgMKAQgSAwoBARIDCgEIZgAHeHBUcmFkZQCQTgAHeHBDcmFmdACQTgAKeHBTZWxsVG9FcwCQTgAGeHBTaG9wAJBOAApMQU5EUFJFRklYAgRMQU5EAAZOVU1SRVMABgAPREVGQVVMVExPQ0FUSU9OAg9BZnJpY2FfRl9BZnJpY2EAEFJFU09VUkNFUFJJQ0VNSU4A1bUCAA1FU01BWFBBQ0tBR0VTAAoACUVTQlVZQ09FRgAEABVNSU5fVVNEVF9GRUVfREVMSVZFUlkA0IYDABdNSU5fVVNEVF9GRUVfREVMSVZFUlkxNQD4yQQACHJlc1R5cGVzCQDMCAICA09pbAkAzAgCAgNPcmUJAMwIAgIEV29vZAkAzAgCAgRTYW5kCQDMCAICBENsYXkJAMwIAgIHT3JnYW5pYwUDbmlsAAhtYXRUeXBlcwkAzAgCAgRGdWVsCQDMCAICBU1ldGFsCQDMCAICBVBsYW5rCQDMCAICBUdsYXNzCQDMCAICB1BsYXN0aWMJAMwIAgIHUHJvdGVpbgUDbmlsAAlwcm9kVHlwZXMJAMwIAgIQRmlyc3QgQWlkIEtpdCBMMQkAzAgCAhBGaXJzdCBBaWQgS2l0IEwyCQDMCAICEEZpcnN0IEFpZCBLaXQgTDMJAMwIAgILQmFja3BhY2sgTDEJAMwIAgILQmFja3BhY2sgTDIJAMwIAgILQmFja3BhY2sgTDMJAMwIAgIORm9vZCBSYXRpb24gTDEJAMwIAgIORm9vZCBSYXRpb24gTDIJAMwIAgIORm9vZCBSYXRpb24gTDMJAMwIAgILSmV0IFBhY2sgTDEJAMwIAgILSmV0IFBhY2sgTDIJAMwIAgILSmV0IFBhY2sgTDMJAMwIAgIJU2hpZWxkIEwxCQDMCAICCVNoaWVsZCBMMgkAzAgCAglTaGllbGQgTDMJAMwIAgIHTWluZSBMMQkAzAgCAgdNaW5lIEwyCQDMCAICB01pbmUgTDMJAMwIAgIHVHJhcCBMMQkAzAgCAgdUcmFwIEwyCQDMCAICB1RyYXAgTDMFA25pbAAKY29udGluZW50cwkAzAgCAghBbWVyaWNhcwkAzAgCAgZFdXJvcGUJAMwIAgIEQXNpYQkAzAgCAgZBZnJpY2EJAMwIAgIHT2NlYW5pYQUDbmlsAAlDT0VGRjJNQVQAgK3iBAAQcHJvZHVjdGlvbk1hdHJpeAkAzAgCAiU4XzhfOF8xN18xN180Ml8xMl8wXzMwXzAsMCwwLDAsMCwwLDBfCQDMCAICJThfOF84XzE3XzE3XzQyXzI0XzBfNjBfMCwwLDUsMiwwLDAsMF8JAMwIAgInOF84XzhfMTdfMTdfNDJfMzZfMF8xMjBfMCwwLDEwLDQsMCwwLDBfCQDMCAICKThfMTlfMTlfOF8yN18xOV8yNl8xXzIwXzAsMCwwLDAsMCwwLDBfMDAxCQDMCAICKThfMTlfMTlfOF8yN18xOV81Ml8xXzQwXzAsMCwwLDAsMCwwLDBfMDAxCQDMCAICKThfMTlfMTlfOF8yN18xOV83OF8xXzgwXzAsMCwwLDAsMCwwLDBfMDAxCQDMCAICJThfOF84XzhfOF82MF8xM18yXzJfMCwwLDAsMCwwLDAsMF8wMTEJAMwIAgIlOF84XzhfOF84XzYwXzI2XzJfNF8wLDAsMCwwLDAsMCwwXzAxMQkAzAgCAiU4XzhfOF84XzhfNjBfMzlfMl84XzAsMCwwLDAsMCwwLDBfMDExCQDMCAICKTMwXzMwXzNfMTdfMTdfM18zMF8zXzMwXzAsMCwwLDAsMCwwLDBfMTExCQDMCAICKTMwXzMwXzNfMTdfMTdfM182MF8zXzUwXzAsMCwwLDAsMCwwLDBfMTExCQDMCAICKTMwXzMwXzNfMTdfMTdfM185MF8zXzcwXzAsMCwwLDAsMCwwLDBfMTExCQDMCAICKzE4XzE4XzEwXzE4XzE4XzE4XzExXzRfMTBfMCwwLDAsMCwwLDAsMF8yMDEJAMwIAgIrMThfMThfMTBfMThfMThfMThfMjJfNF8yMF8wLDAsMCwwLDAsMCwwXzIwMQkAzAgCAisxOF8xOF8xMF8xOF8xOF8xOF8zM180XzMwXzAsMCwwLDAsMCwwLDBfMjAxCQDMCAICKjRfMTNfMjJfNF8zNV8yMl8yM18wXzUwLDEsMF8wLDAsMCwwLDAsMCwwXwkAzAgCAio0XzEzXzIyXzRfMzVfMjJfNDZfMF81MCwxLDFfMCwyLDUsMCwwLDAsMF8JAMwIAgIrNF8xM18yMl80XzM1XzIyXzY5XzBfNTAsMiwxXzAsNSwxMCwwLDAsMCwwXwkAzAgCAio1XzI1XzQwXzVfMTBfMTVfMjBfMV8zMCwxLDFfMCwwLDAsMCwwLDAsMF8JAMwIAgIqNV8yNV80MF81XzEwXzE1XzQwXzFfMzAsMSwyXzIsMSwzLDAsMCwwLDBfCQDMCAICKjVfMjVfNDBfNV8xMF8xNV82MF8xXzMwLDEsM181LDIsOCwwLDAsMCwwXwUDbmlsAAlySWR4Q29lZmYABgANcklkeENvbnRpbmVudAAHAApSRUNJUEVTSVpFAAsADlBST0RVQ1RQS0dTSVpFAAoAC3doSWR4TGV2ZWxzAAAACHdoSWR4UmVzAAEACHdoSWR4TWF0AAIACXdoSWR4UHJvZAADAAl3aElkeExPRlQABAAJdm9sTG9ja2VkAAAACHZvbFRvdGFsAAMACmJwSWR4TGV2ZWwAAAAIYnBJZHhSZXMAAQAIYnBJZHhNYXQAAgAJYnBJZHhQcm9kAAMAD2xvY0lkeENvbnRpbmVudAAAAApsb2NJZHhUeXBlAAEACGxvY0lkeElkAAIBFWtleUxhbmRBc3NldElkVG9Pd25lcgEHYXNzZXRJZAkArAICAgNub18FB2Fzc2V0SWQBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgIDc3RfBQdhc3NldElkAQ9rZXlBZGRyZXNzUmVmQnkBBGFkZHIJAKwCAgIJYWNjUmVmQnlfBQRhZGRyARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyARFrZXlCYWNrcGFja0J5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIJYmFja1BhY2tfBQtkdWNrQXNzZXRJZAEPa2V5RHVja0xvY2F0aW9uAQtkdWNrQXNzZXRJZAkArAICAg1kdWNrTG9jYXRpb25fBQtkdWNrQXNzZXRJZAEOa2V5T3JkZXJCeUxhbmQBC2xhbmRBc3NldElkCQCsAgICCmxhbmRPcmRlcl8FC2xhbmRBc3NldElkAQ5rZXlFc1dhcmVob3VzZQACGmVtZXJnZW5jeVdhcmVob3VzZVByb2R1Y3RzAA9kZWxpdmVyeUZ1bmRLZXkCDGRlbGl2ZXJ5RnVuZAARZGVsaXZlcnlMb2NrZWRLZXkCDmRlbGl2ZXJ5TG9ja2VkARJnZXRSZWNpcGVNYXRlcmlhbHMBBnJlY2lwZQkAaAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZyZWNpcGUFCXJJZHhDb2VmZgUJQ09FRkYyTUFUABFLU19BTExPV19ERUxJVkVSWQcABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgADU0VQAgJfXwAFTVVMVDUAoI0GAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8ABk1VTFQxMACAyK+gJQAOTUlOU0hPUFBBWU1FTlQAoI0GAAVJVEVSNgkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQAUSWR4Q2ZnSW52ZXN0RnVuZERhcHAABgAPSWR4Q2ZnQWNyZXNEYXBwAAgBCmtleVJlc3RDZmcAAg4lc19fcmVzdENvbmZpZwEOa2V5UmVzdEFkZHJlc3MAAgwlc19fcmVzdEFkZHIBEXJlYWRSZXN0Q2ZnT3JGYWlsAQRyZXN0CQC8CQIJAQ9nZXRTdHJpbmdPckZhaWwCBQRyZXN0CQEKa2V5UmVzdENmZwAFA1NFUAEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgdyZXN0Q2ZnA2lkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHcmVzdENmZwUDaWR4CQCsAgICKlJlc3QgY2ZnIGRvZXNuJ3QgY29udGFpbiBhZGRyZXNzIGF0IGluZGV4IAkApAMBBQNpZHgADHJlc3RDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEOa2V5UmVzdEFkZHJlc3MABRVkZWZhdWx0UmVzdEFkZHJlc3NTdHIAB3Jlc3RDZmcJARFyZWFkUmVzdENmZ09yRmFpbAEFDHJlc3RDb250cmFjdAAPc3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnU3Rha2luZ0RhcHAAEmludmVzdEZ1bmRDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFFElkeENmZ0ludmVzdEZ1bmREYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwAQhhc1N0cmluZwEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMJAAIBAhhmYWlsIHRvIGNhc3QgaW50byBTdHJpbmcBBWFzSW50AQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACA0ludAQBbgUHJG1hdGNoMAUBbgkAAgECFWZhaWwgdG8gY2FzdCBpbnRvIEludAEKa2V5QmxvY2tlZAACEGNvbnRyYWN0c0Jsb2NrZWQBCmZpeGVkUG9pbnQCA3ZhbAhkZWNpbWFscwQGdGVuUG93CQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUERE9XTgQHbG93UGFydAkApAMBCQBqAgUDdmFsBQZ0ZW5Qb3cEBnplcm9lcwkAsAICCQCkAwEFBnRlblBvdwkAZAIAAQkAsQIBBQdsb3dQYXJ0CQCsAgIJAKwCAgkArAICCQCkAwEJAGkCBQN2YWwFBnRlblBvdwIBLgUGemVyb2VzBQdsb3dQYXJ0ABNGQUNUT1JZTUFYV0FSRUhPVVNFAIDIr6AlAA5TRUxMTVVMVElQTElFUgDIAQANQlVZTVVMVElQTElFUgCsAgAKQVVDVElPTkZFRQCQTgAMREVMSVZFUllfRkVFAJBOAA5ERUxJVkVSWV9GRUUxNQCYdQEea2V5RmFjdG9yeVdhcmVob3VzZUJ5SWRBbmRUeXBlAglmYWN0b3J5SWQHcmVzVHlwZQkArAICCQCsAgIJAKwCAgIbZmFjdG9yeVdoQnlDb250aW5lbnRBbmRSZXNfBQlmYWN0b3J5SWQCAV8JAKQDAQUHcmVzVHlwZQAJb3JkSWR4UmVzAAAACW9yZElkeE1hdAABAApvcmRJZHhQcm9kAAIBCGdldE9yZGVyAQZvcmRLZXkEAXAJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQZvcmRLZXkCMDBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwOjBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwOgIBOgkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCW9yZElkeFJlcwIBXwUGTlVNUkVTCQCRAwIFAXAFCW9yZElkeFJlcwIXMEAwXzBAMF8wQDBfMEAwXzBAMF8wQDAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQlvcmRJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQFwBQlvcmRJZHhNYXQCFzBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwCQDMCAIJAJEDAgUBcAUKb3JkSWR4UHJvZAUDbmlsAQh0b1ZvbHVtZQMGYW1vdW50B3BrZ1NpemUJaXNQcm9kdWN0AwUJaXNQcm9kdWN0BARwa2dzAwkAZwIFBmFtb3VudAAACQBpAgkAZQIJAGQCBQZhbW91bnQFB3BrZ1NpemUAAQUHcGtnU2l6ZQkBAS0BCQBpAgkAZQIJAGQCCQEBLQEFBmFtb3VudAUHcGtnU2l6ZQABBQdwa2dTaXplCQBoAgUEcGtncwUFTVVMVDgFBmFtb3VudAEMc2VsbEludGVybmFsBAVsb2NJZAdyZXNUeXBlBmFtb3VudAhtaW5QcmljZQQFd2hLZXkJAR5rZXlGYWN0b3J5V2FyZWhvdXNlQnlJZEFuZFR5cGUCBQVsb2NJZAUHcmVzVHlwZQQCdzAJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUFd2hLZXkAAAQCcjADCQBmAgUCdzAFE0ZBQ1RPUllNQVhXQVJFSE9VU0UAAAMJAGYCCQBkAgUCdzAFBmFtb3VudAUTRkFDVE9SWU1BWFdBUkVIT1VTRQkAZQIFE0ZBQ1RPUllNQVhXQVJFSE9VU0UFAncwBQZhbW91bnQEDHVzZHRSZWNlaXZlZAkAZAIJAGsDBQJyMAkAZQIJAGgCBQ5TRUxMTVVMVElQTElFUgUQUkVTT1VSQ0VQUklDRU1JTgkAawMJAGQCCQBoAgBkBQJ3MAkAaAIAMgUCcjAFEFJFU09VUkNFUFJJQ0VNSU4FE0ZBQ1RPUllNQVhXQVJFSE9VU0UFBk1VTFQxMAkAawMJAGUCBQZhbW91bnQFAnIwBRBSRVNPVVJDRVBSSUNFTUlOBQVNVUxUOAQFbWluOTkJAGUCBQhtaW5QcmljZQkAaQIFCG1pblByaWNlAGQDCQBmAgkAaAIFBW1pbjk5BQZhbW91bnQJAGgCBQx1c2R0UmVjZWl2ZWQFBU1VTFQ4CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAg9BY3R1YWwgcHJpY2UgPSAJAKQDAQUMdXNkdFJlY2VpdmVkAgMgLyAJAKQDAQUGYW1vdW50Ag4gPCBtaW5QcmljZSA9IAkApAMBBQhtaW5QcmljZQIDLCAoBQVsb2NJZAICLCAJAJEDAgUIcmVzVHlwZXMFB3Jlc1R5cGUCASkJAJQKAgkBDEludGVnZXJFbnRyeQIFBXdoS2V5CQBkAgUCdzAFBmFtb3VudAUMdXNkdFJlY2VpdmVkAQtidXlJbnRlcm5hbAQFbG9jSWQHbWF0VHlwZQZhbW91bnQIbWF4UHJpY2UEBXdoS2V5CQEea2V5RmFjdG9yeVdhcmVob3VzZUJ5SWRBbmRUeXBlAgUFbG9jSWQFB21hdFR5cGUEAncwCQELdmFsdWVPckVsc2UCCQCfCAEFBXdoS2V5AAAEAm0xAwkAZgIFAncwBRNGQUNUT1JZTUFYV0FSRUhPVVNFCQCXAwEJAMwIAgUGYW1vdW50CQDMCAIJAGUCBQJ3MAUTRkFDVE9SWU1BWFdBUkVIT1VTRQUDbmlsAAAEAm0wCQCXAwEJAMwIAgUCdzAJAMwIAgkAZQIFBmFtb3VudAUCbTEFA25pbAQBbQkAZAIFAm0wBQJtMQQFdzBtaW4JAJcDAQkAzAgCBQJ3MAkAzAgCBRNGQUNUT1JZTUFYV0FSRUhPVVNFBQNuaWwECXVzZHRTcGVudAkAZAIJAGsDBQJtMAkAZQIJAGgCBQ1CVVlNVUxUSVBMSUVSBRBSRVNPVVJDRVBSSUNFTUlOCQBrAwkAZQIJAGgCAGQFBXcwbWluCQBoAgAyBQJtMAUQUkVTT1VSQ0VQUklDRU1JTgUTRkFDVE9SWU1BWFdBUkVIT1VTRQUGTVVMVDEwCQBrAwUCbTEJAGgCAAIFEFJFU09VUkNFUFJJQ0VNSU4FBU1VTFQ4BAZtYXgxMDEJAGQCBQhtYXhQcmljZQkAaQIFCG1heFByaWNlAGQDCQBmAgkAaAIFCXVzZHRTcGVudAUFTVVMVDgJAGgCBQZtYXgxMDEFAW0JAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICD0FjdHVhbCBwcmljZSA9IAkApAMBBQl1c2R0U3BlbnQCAyAvIAkApAMBBQFtAg4gPiBtYXhQcmljZSA9IAkApAMBBQhtYXhQcmljZQIDLCAoBQVsb2NJZAICLCAJAJEDAgUIbWF0VHlwZXMFB21hdFR5cGUCASkJAJUKAwkBDEludGVnZXJFbnRyeQIFBXdoS2V5CQBlAgUCdzAFAW0FCXVzZHRTcGVudAUBbQELZ2V0QmFja3BhY2sBBWJwS2V5BAFwCQC8CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0BQVicEtleQIaMDowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoCAToJAMwIAgkApAMBCQELdmFsdWVPckVsc2UCCQC2CQEJAJEDAgUBcAUKYnBJZHhMZXZlbAAACQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhSZXMCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeFJlcwILMF8wXzBfMF8wXzAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQhicElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAXAFCGJwSWR4TWF0AgswXzBfMF8wXzBfMAkAzAgCCQCRAwIFAXAFCWJwSWR4UHJvZAUDbmlsAQxjaGVja0Jsb2NrZWQAAwkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ9zdGFraW5nQ29udHJhY3QJAQprZXlCbG9ja2VkAAcJAAIBAh9Db250cmFjdHMgYXJlIHVuZGVyIG1haW50ZW5hbmNlBQR1bml0AQZwcm9sb2cACQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIKc2F2ZUxhc3RUeAUDbmlsBQNuaWwBCXNldENvbW1vbgIDYWNjD2lnbm9yZWRJdGVyYXRvcgQBaggFA2FjYwJfMQQEaXRlbQMJAGYCCQCQAwEIBQNhY2MDXzEwBQFqCQCRAwIIBQNhY2MDXzEwBQFqAgMwQDAEBmlzUHJvZAgFA2FjYwJfOAQJaXRlbVBhcnRzCQC1CQIFBGl0ZW0CAUADCQECIT0CCQCQAwEFCWl0ZW1QYXJ0cwACCQACAQIuSW5jb3JyZWN0IG9yZGVyIGZvcm1hdCwgc2hvdWxkIGJlIGFtb3VudEBwcmljZQQIbmV3T3JkQW0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlpdGVtUGFydHMAAAQIbmV3T3JkUHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlpdGVtUGFydHMAAQQJbmV3T3JkVXNkAwUGaXNQcm9kCQBoAgUIbmV3T3JkQW0FCG5ld09yZFByCQBrAwUIbmV3T3JkQW0FCG5ld09yZFByBQVNVUxUOAQJbmV3T3JkVm9sCQEIdG9Wb2x1bWUDBQhuZXdPcmRBbQUOUFJPRFVDVFBLR1NJWkUFBmlzUHJvZAQGd2hJbml0AwkAZgIJAJADAQgFA2FjYwJfNgUBagkBDXBhcnNlSW50VmFsdWUBCQCRAwIIBQNhY2MCXzYFAWoAAAQLY3VyT3JkUGFydHMJALUJAgMJAGYCCQCQAwEIBQNhY2MCXzcFAWoJAJEDAggFA2FjYwJfNwUBagIDMEAwAgFABAhjdXJPcmRBbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFC2N1ck9yZFBhcnRzAAAECGN1ck9yZFByCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyT3JkUGFydHMAAQMDCQBmAgAABQhjdXJPcmRQcgYJAGYCAAAFCG5ld09yZFByCQACAQIXUHJpY2UgY2FuJ3QgYmUgbmVnYXRpdmUECWN1ck9yZFVzZAMFBmlzUHJvZAkAaAIFCGN1ck9yZEFtBQhjdXJPcmRQcgkAawMFCGN1ck9yZEFtBQhjdXJPcmRQcgUFTVVMVDgDCQAAAgUIbmV3T3JkQW0AAAMJAGYCBQhjdXJPcmRBbQAACQCcCgoJAGQCBQFqAAEJAM0IAggFA2FjYwJfMgkApAMBBQZ3aEluaXQIBQNhY2MCXzMIBQNhY2MCXzQJAGUCCAUDYWNjAl81BQljdXJPcmRVc2QIBQNhY2MCXzYIBQNhY2MCXzcFBmlzUHJvZAkAZAIIBQNhY2MCXzkJAQh0b1ZvbHVtZQMFBndoSW5pdAUOUFJPRFVDVFBLR1NJWkUFBmlzUHJvZAgFA2FjYwNfMTAJAJwKCgkAZAIFAWoAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGUCBQZ3aEluaXQFCGN1ck9yZEFtCAUDYWNjAl8zCAUDYWNjAl80CAUDYWNjAl81CAUDYWNjAl82CAUDYWNjAl83BQZpc1Byb2QJAGQCCAUDYWNjAl85CQEIdG9Wb2x1bWUDCQBlAgUGd2hJbml0BQhjdXJPcmRBbQUOUFJPRFVDVFBLR1NJWkUFBmlzUHJvZAgFA2FjYwNfMTADCQBmAgUIbmV3T3JkQW0AAAMJAGYCAAAFCGN1ck9yZEFtCQCcCgoJAGQCBQFqAAEJAM0IAggFA2FjYwJfMgkApAMBCQBlAgUGd2hJbml0BQhjdXJPcmRBbQkAZAIIBQNhY2MCXzMFCW5ld09yZFZvbAgFA2FjYwJfNAkAZAIIBQNhY2MCXzUFCW5ld09yZFVzZAgFA2FjYwJfNggFA2FjYwJfNwUGaXNQcm9kCQEIdG9Wb2x1bWUDCQBlAgUGd2hJbml0BQhjdXJPcmRBbQUOUFJPRFVDVFBLR1NJWkUFBmlzUHJvZAgFA2FjYwNfMTAJAJwKCgkAZAIFAWoAAQkAzQgCCAUDYWNjAl8yCQCkAwEFBndoSW5pdAkAZAIIBQNhY2MCXzMFCW5ld09yZFZvbAgFA2FjYwJfNAkAZQIJAGQCCAUDYWNjAl81BQluZXdPcmRVc2QFCWN1ck9yZFVzZAgFA2FjYwJfNggFA2FjYwJfNwUGaXNQcm9kCQEIdG9Wb2x1bWUDBQZ3aEluaXQFDlBST0RVQ1RQS0dTSVpFBQZpc1Byb2QIBQNhY2MDXzEwAwkAZgIAAAUIY3VyT3JkQW0EBmFtRGlmZgkAZQIFCGN1ck9yZEFtBQhuZXdPcmRBbQMJAGYCAAAJAGUCBQZ3aEluaXQFBmFtRGlmZgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBBQZhbURpZmYCGiBmcm9tIHdhcmVob3VzZSwgYnV0IG9ubHkgCQCkAwEFBndoSW5pdAIKIGF2YWlsYWJsZQkAnAoKCQBkAgUBagABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZQIFBndoSW5pdAUGYW1EaWZmCAUDYWNjAl8zCQBlAggFA2FjYwJfNAUJbmV3T3JkVm9sCAUDYWNjAl81CAUDYWNjAl82CAUDYWNjAl83BQZpc1Byb2QJAQh0b1ZvbHVtZQMJAGUCBQZ3aEluaXQFBmFtRGlmZgUOUFJPRFVDVFBLR1NJWkUFBmlzUHJvZAgFA2FjYwNfMTADCQBmAgAACQBkAgUGd2hJbml0BQhuZXdPcmRBbQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byB0YWtlIAkApAMBCQEBLQEFCG5ld09yZEFtAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQZ3aEluaXQCCiBhdmFpbGFibGUJAJwKCgkAZAIFAWoAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGQCBQZ3aEluaXQFCG5ld09yZEFtCAUDYWNjAl8zCQBlAggFA2FjYwJfNAUJbmV3T3JkVm9sCQBlAggFA2FjYwJfNQUJY3VyT3JkVXNkCAUDYWNjAl82CAUDYWNjAl83BQZpc1Byb2QJAQh0b1ZvbHVtZQMJAGQCBQZ3aEluaXQFCG5ld09yZEFtBQ5QUk9EVUNUUEtHU0laRQUGaXNQcm9kCAUDYWNjA18xMAELc2V0SW50ZXJuYWwDCWN1cnJlbnRXaApjdXJyZW50T3JkBm5ld09yZAQJY3VycldoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQJY3VycldoTWF0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwQKY3VycldoUHJvZAMJAAACCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgAFA25pbAkAvAkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgFfBA1jdXJyZW50T3JkUmVzCQC1CQIJAJEDAgUKY3VycmVudE9yZAUJb3JkSWR4UmVzAgFfBA1jdXJyZW50T3JkTWF0CQC1CQIJAJEDAgUKY3VycmVudE9yZAUJb3JkSWR4TWF0AgFfBA5jdXJyZW50T3JkUHJvZAMJAAACCQCRAwIFCmN1cnJlbnRPcmQFCm9yZElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgUKY3VycmVudE9yZAUKb3JkSWR4UHJvZAIBXwMJAQIhPQIJAJADAQUGbmV3T3JkAAMJAAIBAjNuZXdPcmRlclN0ciBzaG91bGQgY29udGFpbiBleGFjdGx5IDIgJzonIHNlcGFyYXRvcnMECHJlc1BhcnRzCQC1CQIJAJEDAgUGbmV3T3JkAAACAV8ECG1hdFBhcnRzCQC1CQIJAJEDAgUGbmV3T3JkAAECAV8ECXByb2RQYXJ0cwMJAAACCQCRAwIFBm5ld09yZAACAgAFA25pbAkAvAkCCQCRAwIFBm5ld09yZAACAgFfAwkBAiE9AgkAkAMBBQhyZXNQYXJ0cwUGTlVNUkVTCQACAQIgQWxsIDYgcmVzb3VyY2VzIHNob3VsZCBiZSBwYXNzZWQDCQECIT0CCQCQAwEFCG1hdFBhcnRzBQZOVU1SRVMJAAIBAiBBbGwgNiBtYXRlcmlhbHMgc2hvdWxkIGJlIHBhc3NlZAQBcgoAAiRsBQhyZXNUeXBlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJwKCgAABQNuaWwAAAAAAAAFCWN1cnJXaFJlcwUNY3VycmVudE9yZFJlcwcAAAUIcmVzUGFydHMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCXNldENvbW1vbgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQBbQoAAiRsBQhtYXRUeXBlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJwKCgAABQNuaWwIBQFyAl8zCAUBcgJfNAgFAXICXzUFCWN1cnJXaE1hdAUNY3VycmVudE9yZE1hdAcIBQFyAl85BQhtYXRQYXJ0cwoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc2V0Q29tbW9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAFwCgACJGwFCXByb2RUeXBlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJwKCgAABQNuaWwIBQFtAl8zCAUBbQJfNAgFAW0CXzUFCmN1cnJXaFByb2QFDmN1cnJlbnRPcmRQcm9kBggFAW0CXzkFCXByb2RQYXJ0cwoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc2V0Q29tbW9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIJAJkKBwgFAXICXzIIBQFtAl8yCAUBcAJfMggFAXACXzMIBQFwAl80CAUBcAJfNQgFAXACXzkBDGFjY2VwdENvbW1vbgIDYWNjCWJwT3JkSXRlbQQBaggFA2FjYwJfNwQGaXNQcm9kCAUDYWNjA18xMgQKYnBPcmRQYXJ0cwkAtQkCBQlicE9yZEl0ZW0CAUADCQECIT0CCQCQAwEFCmJwT3JkUGFydHMAAgkAAgECLkluY29ycmVjdCBvcmRlciBmb3JtYXQsIHNob3VsZCBiZSBhbW91bnRAcHJpY2UEB2JwT3JkQW0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpicE9yZFBhcnRzAAAEB2JwT3JkUHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpicE9yZFBhcnRzAAEDCQBmAgAABQdicE9yZFByCQACAQIXUHJpY2UgY2FuJ3QgYmUgbmVnYXRpdmUECGJwT3JkVXNkAwUGaXNQcm9kCQBoAgUHYnBPcmRBbQUHYnBPcmRQcgkAawMFB2JwT3JkQW0FB2JwT3JkUHIFBU1VTFQ4BAZicEluaXQDCQBmAgkAkAMBCAUDYWNjAl84BQFqCQENcGFyc2VJbnRWYWx1ZQEJAJEDAggFA2FjYwJfOAUBagAABAZ3aEluaXQDCQBmAgkAkAMBCAUDYWNjAl85BQFqCQENcGFyc2VJbnRWYWx1ZQEJAJEDAggFA2FjYwJfOQUBagAABAl3aE9yZEluaXQDCQBmAgkAkAMBCAUDYWNjA18xMAUBagkAkQMCCAUDYWNjA18xMAUBagIDMEAwBAp3aE9yZFBhcnRzCQC1CQIFCXdoT3JkSW5pdAIBQAQHd2hPcmRBbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCndoT3JkUGFydHMAAAQHd2hPcmRQcgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCndoT3JkUGFydHMAAQMDCQECIT0CBQdicE9yZEFtAAAJAQIhPQIFB2JwT3JkUHIFB3doT3JkUHIHCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICClByaWNlcyBvZiAJAJEDAggFA2FjYwNfMTEFAWoCFyBkb24ndCBtYXRjaCEgV0ggcHJpY2U9CQCkAwEFB3doT3JkUHICDSwgeW91ciBwcmljZT0JAKQDAQUHYnBPcmRQcgQId2hPcmRVc2QDBQZpc1Byb2QJAGgCBQd3aE9yZEFtBQd3aE9yZFByCQBrAwUHd2hPcmRBbQUHd2hPcmRQcgUFTVVMVDgECGRlbHRhVm9sCQEIdG9Wb2x1bWUDBQdicE9yZEFtBQ5QUk9EVUNUUEtHU0laRQUGaXNQcm9kAwkAAAIFB2JwT3JkQW0AAAkAnwoNCQDNCAIIBQNhY2MCXzEJAKQDAQUGd2hJbml0CQDNCAIIBQNhY2MCXzIFCXdoT3JkSW5pdAkAzQgCCAUDYWNjAl8zCQCkAwEFBmJwSW5pdAgFA2FjYwJfNAgFA2FjYwJfNQgFA2FjYwJfNgkAZAIIBQNhY2MCXzcAAQgFA2FjYwJfOAgFA2FjYwJfOQgFA2FjYwNfMTAIBQNhY2MDXzExBQZpc1Byb2QIBQNhY2MDXzEzAwkAZgIFB2JwT3JkQW0AAAMJAGYCAAAFB3doT3JkQW0DCQBmAgUHYnBPcmRBbQkBAS0BBQd3aE9yZEFtCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICD0F0dGVtcHQgdG8gYnV5IAkApAMBBQdicE9yZEFtAgQgb2YgCQCRAwIIBQNhY2MDXzExBQFqAhssIGJ1dCB3YXJlaG91c2Ugb25seSBzZWxscyAJAKQDAQkBAS0BBQd3aE9yZEFtCQCfCg0JAM0IAggFA2FjYwJfMQkApAMBBQZ3aEluaXQJAM0IAggFA2FjYwJfMgkArAICCQCsAgIJAKQDAQkAZAIFB3doT3JkQW0FB2JwT3JkQW0CAUAJAKQDAQUHd2hPcmRQcgkAzQgCCAUDYWNjAl8zCQCkAwEJAGQCBQZicEluaXQFB2JwT3JkQW0JAGQCCAUDYWNjAl80BQhkZWx0YVZvbAgFA2FjYwJfNQkAZAIIBQNhY2MCXzYFCGJwT3JkVXNkCQBkAggFA2FjYwJfNwABCAUDYWNjAl84CAUDYWNjAl85CAUDYWNjA18xMAgFA2FjYwNfMTEFBmlzUHJvZAkAZAIIBQNhY2MDXzEzAwUGaXNQcm9kCQBoAgUHYnBPcmRBbQUFTVVMVDgFB2JwT3JkQW0JAAIBCQCsAgIJAKwCAgIPQXR0ZW1wdCB0byBidXkgCQCRAwIIBQNhY2MDXzExBQFqAiAgd2hpbGUgd2FyZWhvdXNlIGRvZXNuJ3Qgc2VsbCBpdAMJAGYCBQd3aE9yZEFtAAADCQBmAgkBAS0BBQdicE9yZEFtBQd3aE9yZEFtCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gc2VsbCAJAKQDAQkBAS0BBQdicE9yZEFtAgQgb2YgCQCRAwIIBQNhY2MDXzExBQFqAhosIGJ1dCB3YXJlaG91c2Ugb25seSBidXlzIAkApAMBBQd3aE9yZEFtAwkAZgIJAQEtAQUHYnBPcmRBbQUGYnBJbml0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gc2VsbCAJAKQDAQkBAS0BBQdicE9yZEFtAhQsIGJ1dCB5b3Ugb25seSBoYXZlIAkApAMBBQZicEluaXQCBCBvZiAJAJEDAggFA2FjYwNfMTEFAWoJAJ8KDQkAzQgCCAUDYWNjAl8xCQCkAwEJAGUCBQZ3aEluaXQFB2JwT3JkQW0JAM0IAggFA2FjYwJfMgkArAICCQCsAgIJAKQDAQkAZAIFB3doT3JkQW0FB2JwT3JkQW0CAUAJAKQDAQUHd2hPcmRQcgkAzQgCCAUDYWNjAl8zCQCkAwEJAGQCBQZicEluaXQFB2JwT3JkQW0JAGUCCAUDYWNjAl80BQhkZWx0YVZvbAkAZQIIBQNhY2MCXzUFCGJwT3JkVXNkCAUDYWNjAl82CQBkAggFA2FjYwJfNwABCAUDYWNjAl84CAUDYWNjAl85CAUDYWNjA18xMAgFA2FjYwNfMTEFBmlzUHJvZAkAZQIIBQNhY2MDXzEzAwUGaXNQcm9kCQBoAgUHYnBPcmRBbQUFTVVMVDgFB2JwT3JkQW0JAAIBCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byBzZWxsIAkAkQMCCAUDYWNjA18xMQUBagIfIHdoaWxlIHdhcmVob3VzZSBkb2Vzbid0IGJ1eSBpdAETc2VsbFJlc291cmNlc0NvbW1vbgQHcmVzTGlzdAxmYWN0b3J5TG9jSWQHYW1vdW50cwltaW5QcmljZXMKAQVhZGRlcgIDYWNjAWoDCQBmAgkAkQMCBQdhbW91bnRzBQFqCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVzTGlzdAUBagkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAglZb3UgaGF2ZSAJAJEDAgUHcmVzTGlzdAUBagIEIG9mIAkAkQMCBQhyZXNUeXBlcwUBagIULCBidXQgdHJpZWQgdG8gc2VsbCAJAKQDAQkAkQMCBQdhbW91bnRzBQFqAwkAZgIAAAkAkQMCBQdhbW91bnRzBQFqCQACAQkArAICCQCsAgIJAKwCAgIlWW91IHRyaWVkIHRvIHNlbGwgbmVnYXRpdmUgYW1vdW50IG9mIAkAkQMCBQhyZXNUeXBlcwUBagICOiAJAKQDAQkAkQMCBQdhbW91bnRzBQFqAwkAZgIJAJEDAgUHYW1vdW50cwUBagAABAFiCQEMc2VsbEludGVybmFsBAUMZmFjdG9yeUxvY0lkBQFqCQCRAwIFB2Ftb3VudHMFAWoJAJEDAgUJbWluUHJpY2VzBQFqCQCWCgQJAM0IAggFA2FjYwJfMQgFAWICXzEJAM0IAggFA2FjYwJfMgkApAMBCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3Jlc0xpc3QFAWoJAJEDAgUHYW1vdW50cwUBagkAZAIIBQNhY2MCXzMIBQFiAl8yCQBkAggFA2FjYwJfNAkAkQMCBQdhbW91bnRzBQFqCQCWCgQIBQNhY2MCXzEJAM0IAggFA2FjYwJfMgkAkQMCBQdyZXNMaXN0BQFqCAUDYWNjAl8zCAUDYWNjAl80CgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEBQNuaWwFA25pbAAAAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGARJidXlNYXRlcmlhbHNDb21tb24EB21hdExpc3QMZmFjdG9yeUxvY0lkB2Ftb3VudHMJbWF4UHJpY2VzCgEIbVVwZGF0ZXICA2FjYwFqAwkAZgIAAAkAkQMCBQdhbW91bnRzBQFqCQACAQkArAICCQCsAgIJAKwCAgIkWW91IHRyaWVkIHRvIGJ1eSBuZWdhdGl2ZSBhbW91bnQgb2YgCQCRAwIFCG1hdFR5cGVzBQFqAgI6IAkApAMBCQCRAwIFB2Ftb3VudHMFAWoDCQBmAgkAkQMCBQdhbW91bnRzBQFqAAAEAWIJAQtidXlJbnRlcm5hbAQFDGZhY3RvcnlMb2NJZAUBagkAkQMCBQdhbW91bnRzBQFqCQCRAwIFCW1heFByaWNlcwUBagkAlgoECQDNCAIIBQNhY2MCXzEIBQFiAl8xCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0BQFqCAUBYgJfMwkAZAIIBQNhY2MCXzMIBQFiAl8yCQBkAggFA2FjYwJfNAkAkQMCBQdhbW91bnRzBQFqCQCWCgQIBQNhY2MCXzEJAM0IAggFA2FjYwJfMgkAkQMCBQdtYXRMaXN0BQFqCAUDYWNjAl8zCAUDYWNjAl80CgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEBQNuaWwFA25pbAAAAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCG1VcGRhdGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGARdleGNoYW5nZVJlc291cmNlc0NvbW1vbgMHcmVzTGlzdAdtYXRMaXN0B2Ftb3VudHMKAQlleGNoYW5nZXICA2FjYwFqBANhbWoJAJEDAgUHYW1vdW50cwUBagMJAGYCBQNhbWoJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXNMaXN0BQFqCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICCVlvdSBoYXZlIAkAkQMCBQdyZXNMaXN0BQFqAgQgb2YgCQCRAwIFCHJlc1R5cGVzBQFqAhgsIGJ1dCB0cmllZCB0byBleGNoYW5nZSAJAKQDAQUDYW1qAwkAZgIAAAUDYW1qCQACAQkArAICCQCsAgIJAKwCAgIpWW91IHRyaWVkIHRvIGV4Y2hhbmdlIG5lZ2F0aXZlIGFtb3VudCBvZiAJAJEDAgUIcmVzVHlwZXMFAWoCAjogCQCkAwEFA2FtagMJAGYCBQNhbWoAAAkAlgoECQDNCAIIBQNhY2MCXzEJAKQDAQkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXNMaXN0BQFqBQNhbWoJAM0IAggFA2FjYwJfMgkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB21hdExpc3QFAWoFA2FtagkAZAIIBQNhY2MCXzMJAGsDBQNhbWoFEFJFU09VUkNFUFJJQ0VNSU4FBU1VTFQ4CQBkAggFA2FjYwJfNAUDYW1qCQCWCgQJAM0IAggFA2FjYwJfMQkAkQMCBQdyZXNMaXN0BQFqCQDNCAIIBQNhY2MCXzIJAJEDAgUHbWF0TGlzdAUBaggFA2FjYwJfMwgFA2FjYwJfNAoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAUDbmlsBQNuaWwAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlleGNoYW5nZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYBEHNob3AydXNlckFjdGlvbnMDDXVzZFdoMkJwU2FsZG8KY2FsbGVyQWRkcgtyZWNlaXZlZEZlZQMJAGYCBQ11c2RXaDJCcFNhbGRvAAAEC3VzZFdoMkJwRmVlCQBrAwUNdXNkV2gyQnBTYWxkbwUKQVVDVElPTkZFRQUFTVVMVDYDCQBnAgULcmVjZWl2ZWRGZWUJAGUCBQ11c2RXaDJCcFNhbGRvCQBoAgADBQt1c2RXaDJCcEZlZQkAAgEJAKwCAgIrVGhpcyB0cmFkZSBkb2VzIG5vdCBjb3ZlciBkZWxpdmVyeSBjb3N0IG9mIAkBCmZpeGVkUG9pbnQCBQtyZWNlaXZlZEZlZQAGBAhyZWZCeUtleQkBD2tleUFkZHJlc3NSZWZCeQEFCmNhbGxlckFkZHIEBXJlZkJ5CQCdCAIFD3N0YWtpbmdDb250cmFjdAUIcmVmQnlLZXkEBmNhbGxlcgkBEUBleHRyTmF0aXZlKDEwNjIpAQUKY2FsbGVyQWRkcgkAzQgCCQDNCAIDCQEJaXNEZWZpbmVkAQUFcmVmQnkJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBXZhbHVlAQUFcmVmQnkFC3VzZFdoMkJwRmVlBQt1c2R0QXNzZXRJZAUDbmlsBQNuaWwJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgkAZQIJAGUCBQ11c2RXaDJCcFNhbGRvCQBoAgADBQt1c2RXaDJCcEZlZQULcmVjZWl2ZWRGZWUFC3VzZHRBc3NldElkCQEOU2NyaXB0VHJhbnNmZXIDBQxyZXN0Q29udHJhY3QFC3VzZFdoMkJwRmVlBQt1c2R0QXNzZXRJZAUDbmlsARB1c2VyMnNob3BBY3Rpb25zBA11c2RCcDJXaFNhbGRvBHBtdHMNc2hvcExhbmRPd25lcghzcGVudEZlZQMJAGYCBQ11c2RCcDJXaFNhbGRvAAADCQECIT0CCQCQAwEFBHBtdHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCBQRwbXRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECE1VTRFQgcGF5bWVudHMgb25seSEEEHVzZHRTcGVudFdpdGhGZWUJAGQCBQ11c2RCcDJXaFNhbGRvBQhzcGVudEZlZQMJAQIhPQIFA2FtdAUQdXNkdFNwZW50V2l0aEZlZQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICH0luc3VmZmljaWVudCBwYXltZW50ISBBdHRhY2hlZD0JAQpmaXhlZFBvaW50AgUDYW10AAYCCywgcmVxdWlyZWQ9CQEKZml4ZWRQb2ludAIFDXVzZEJwMldoU2FsZG8ABgIBKwkBCmZpeGVkUG9pbnQCBQhzcGVudEZlZQAGAg4oZGVsaXZlcnkgZmVlKQMJAGYCBQ5NSU5TSE9QUEFZTUVOVAUNdXNkQnAyV2hTYWxkbwkAAgEJAKwCAgISTWluIHNob3AgdHJhZGUgaXMgCQEKZml4ZWRQb2ludAIFDk1JTlNIT1BQQVlNRU5UAAYEC3VzZEJwMldoRmVlCQBrAwUNdXNkQnAyV2hTYWxkbwUKQVVDVElPTkZFRQUFTVVMVDYECHJlZkJ5S2V5CQEPa2V5QWRkcmVzc1JlZkJ5AQUNc2hvcExhbmRPd25lcgQFcmVmQnkJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0BQhyZWZCeUtleQkAzQgCCQDNCAIDCQEJaXNEZWZpbmVkAQUFcmVmQnkJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBXZhbHVlAQUFcmVmQnkFC3VzZEJwMldoRmVlBQt1c2R0QXNzZXRJZAUDbmlsBQNuaWwJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDXNob3BMYW5kT3duZXIJAGUCBQ11c2RCcDJXaFNhbGRvCQBoAgADBQt1c2RCcDJXaEZlZQULdXNkdEFzc2V0SWQJAQ5TY3JpcHRUcmFuc2ZlcgMFDHJlc3RDb250cmFjdAULdXNkQnAyV2hGZWUFC3VzZHRBc3NldElkAwkBAiE9AgkAkAMBBQRwbXRzAAAJAAIBAhJObyBwYXltZW50cyBuZWVkZWQFA25pbAEVYWNjZXB0U2hvcE9yZGVyQ29tbW9uBg9zaG9wTGFuZEFzc2V0SWQKY2FsbGVyQWRkcgpicE9yZGVyU3RyCWJwUmVzTGlzdAlicE1hdExpc3QKYnBQcm9kTGlzdAQJbGFuZEFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQUPc2hvcExhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUPc2hvcExhbmRBc3NldElkCQACAQkArAICCQCsAgICBE5GVCAIBQlsYW5kQXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEDXNob3BMYW5kT3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQ9zaG9wTGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUJbGFuZEFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAAACBQ1zaG9wTGFuZE93bmVyBQpjYWxsZXJBZGRyCQACAQIeWW91IGNhbm5vdCB0cmFkZSB3aXRoIHlvdXJzZWxmBAxicE9yZGVyUGFydHMJALwJAgUKYnBPcmRlclN0cgIBOgMJAQIhPQIJAJADAQUMYnBPcmRlclBhcnRzAAMJAAIBAjJicE9yZGVyU3RyIHNob3VsZCBjb250YWluIGV4YWN0bHkgMiAnOicgc2VwYXJhdG9ycwQIYnBPcmRSZXMJALUJAgkAkQMCBQxicE9yZGVyUGFydHMAAAIBXwQIYnBPcmRNYXQJALUJAgkAkQMCBQxicE9yZGVyUGFydHMAAQIBXwQJYnBPcmRQcm9kAwkAAAIJAJEDAgUMYnBPcmRlclBhcnRzAAICAAUDbmlsCQC8CQIJAJEDAgUMYnBPcmRlclBhcnRzAAICAV8DCQECIT0CCQCQAwEFCGJwT3JkUmVzBQZOVU1SRVMJAAIBAiBBbGwgNiByZXNvdXJjZXMgc2hvdWxkIGJlIHBhc3NlZAMJAQIhPQIJAJADAQUIYnBPcmRNYXQFBk5VTVJFUwkAAgECIEFsbCA2IG1hdGVyaWFscyBzaG91bGQgYmUgcGFzc2VkBAJ3aAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCFGdldFdhcmVob3VzZVJFQURPTkxZCQDMCAIFD3Nob3BMYW5kQXNzZXRJZAUDbmlsBQNuaWwECWN1cnJlbnRXaAkAvAkCBQJ3aAIBOgQJY3VycldoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQJY3VycldoTWF0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwQKY3VycldoUHJvZAMJAAACCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgAFA25pbAkAvAkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgFfBA9jdXJyV2hMb2NrZWRWb2wJAQ1wYXJzZUludFZhbHVlAQkAkQMCCQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8FCXZvbExvY2tlZAQGb3JkS2V5CQEOa2V5T3JkZXJCeUxhbmQBBQ9zaG9wTGFuZEFzc2V0SWQEBXdoT3JkCQEIZ2V0T3JkZXIBBQZvcmRLZXkECHdoT3JkUmVzCQC1CQIJAJEDAgUFd2hPcmQFCW9yZElkeFJlcwIBXwQId2hPcmRNYXQJALUJAgkAkQMCBQV3aE9yZAUJb3JkSWR4TWF0AgFfBAl3aE9yZFByb2QDCQAAAgkAkQMCBQV3aE9yZAUKb3JkSWR4UHJvZAIABQNuaWwJALwJAgkAkQMCBQV3aE9yZAUKb3JkSWR4UHJvZAIBXwQBcgoAAiRsBQhicE9yZFJlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJ8KDQUDbmlsBQNuaWwFA25pbAAAAAAAAAAABQlicFJlc0xpc3QFCWN1cnJXaFJlcwUId2hPcmRSZXMFCHJlc1R5cGVzBwAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQxhY2NlcHRDb21tb24CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYEAW0KAAIkbAUIYnBPcmRNYXQKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCfCg0FA25pbAUDbmlsBQNuaWwIBQFyAl80CAUBcgJfNQgFAXICXzYAAAUJYnBNYXRMaXN0BQljdXJyV2hNYXQFCHdoT3JkTWF0BQhtYXRUeXBlcwcIBQFyA18xMwoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYWNjZXB0Q29tbW9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAFwAwkBAiE9AgkAkAMBBQlicE9yZFByb2QAAAoAAiRsBQlicE9yZFByb2QKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCfCg0FA25pbAUDbmlsBQNuaWwIBQFtAl80CAUBbQJfNQgFAW0CXzYAAAUKYnBQcm9kTGlzdAUKY3VycldoUHJvZAUJd2hPcmRQcm9kBQlwcm9kVHlwZXMGCAUBbQNfMTMKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDGFjY2VwdENvbW1vbgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyCQCfCg0FCmN1cnJXaFByb2QFCXdoT3JkUHJvZAUKYnBQcm9kTGlzdAgFAW0CXzQIBQFtAl81CAUBbQJfNgAABQpicFByb2RMaXN0BQpjdXJyV2hQcm9kBQl3aE9yZFByb2QFCXByb2RUeXBlcwYIBQFtA18xMwQIdm9sU2FsZG8IBQFwAl80BAxuZXdMb2NrZWRWb2wDCQBmAgAACQBlAgUPY3VycldoTG9ja2VkVm9sBQh2b2xTYWxkbwAACQBlAgUPY3VycldoTG9ja2VkVm9sBQh2b2xTYWxkbwQFd2hTdHIJALoJAgkAzAgCCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMJAMwIAgkAuQkCCAUBcgJfMQIBXwkAzAgCCQC5CQIIBQFtAl8xAgFfCQDMCAIJALoJAggFAXACXzECAV8JAMwIAgkApAMBBQxuZXdMb2NrZWRWb2wFA25pbAIBOgQLbmV3V2hPcmRTdHIJALoJAgkAzAgCCQC5CQIIBQFyAl8yAgFfCQDMCAIJALkJAggFAW0CXzICAV8JAMwIAgkAugkCCAUBcAJfMgIBXwUDbmlsAgE6BAZ3aFNhdmUJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag1zYXZlV2FyZWhvdXNlCQDMCAIFBXdoU3RyCQDMCAIFD3Nob3BMYW5kQXNzZXRJZAUDbmlsBQNuaWwEDmFjY1N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQWNjU3RhdHMJAMwIAgUNc2hvcExhbmRPd25lcgkAzAgCCQBrAwUGeHBTaG9wCAUBcANfMTMFBU1VTFQ4BQNuaWwFA25pbAkAnAoKCQELU3RyaW5nRW50cnkCBQZvcmRLZXkFC25ld1doT3JkU3RyCAUBcgJfMwgFAW0CXzMIBQFwAl8zCAUBcAJfNQgFAXACXzYIBQFwA18xMwUNc2hvcExhbmRPd25lcgUGd2hTYXZlBQ5hY2NTdGF0c1Jlc3VsdAEac2VsbFJlc291cmNlc1dvcmxkSW50ZXJuYWwBBmFtb3VudAQGb25lUmVzCQBpAgUGYW1vdW50AB4EEW9uZUZhY3RvcnlBbW91bnRzCQDMCAIFBm9uZVJlcwkAzAgCBQZvbmVSZXMJAMwIAgUGb25lUmVzCQDMCAIFBm9uZVJlcwkAzAgCBQZvbmVSZXMJAMwIAgUGb25lUmVzBQNuaWwEAXMJAKQDAQUGb25lUmVzBAdyZXNMaXN0CQDMCAIFAXMJAMwIAgUBcwkAzAgCBQFzCQDMCAIFAXMJAMwIAgUBcwkAzAgCBQFzBQNuaWwECW1pblByaWNlcwkAzAgCAAAJAMwIAgAACQDMCAIAAAkAzAgCAAAJAMwIAgAACQDMCAIAAAUDbmlsCgEKb25lRmFjdG9yeQIDYWNjCWNvbnRpbmVudAQBeAkBE3NlbGxSZXNvdXJjZXNDb21tb24EBQdyZXNMaXN0BQljb250aW5lbnQFEW9uZUZhY3RvcnlBbW91bnRzBQltaW5QcmljZXMJAJUKAwkAzggCCAUDYWNjAl8xCAUBeAJfMQkAZAIIBQNhY2MCXzIIBQF4Al8zCQBkAggFA2FjYwJfMwgFAXgCXzQEDSR0MDI1MjYxMjUzNTEKAAIkbAUKY29udGluZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwUDbmlsAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKb25lRmFjdG9yeQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUEDmZhY3RvcnlBY3Rpb25zCAUNJHQwMjUyNjEyNTM1MQJfMQQMdXNkdFJlY2VpdmVkCAUNJHQwMjUyNjEyNTM1MQJfMgQIdG90YWxSZXMIBQ0kdDAyNTI2MTI1MzUxAl8zBANmZWUJAGsDBQx1c2R0UmVjZWl2ZWQFDERFTElWRVJZX0ZFRQUFTVVMVDYEEGFjdGl2aXRpZXNBbW91bnQJAGkCBQx1c2R0UmVjZWl2ZWQAZAQIdXNkdExlZnQJAGUCCQBlAgUMdXNkdFJlY2VpdmVkBRBhY3Rpdml0aWVzQW1vdW50BQNmZWUJAJcKBQUOZmFjdG9yeUFjdGlvbnMFCHVzZHRMZWZ0BQNmZWUFEGFjdGl2aXRpZXNBbW91bnQFCHRvdGFsUmVzFgFpARpyZWNhbGNMb2NrZWRWb2x1bWVSRUFET05MWQILbGFuZEFzc2V0SWQCd2gECmN1cnJlbnRPcmQJAQhnZXRPcmRlcgEJAQ5rZXlPcmRlckJ5TGFuZAEFC2xhbmRBc3NldElkBAF6CQELc2V0SW50ZXJuYWwDBQJ3aAUKY3VycmVudE9yZAUKY3VycmVudE9yZAkAlAoCBQNuaWwJAGQCCAUBegJfNAgFAXoCXzUBaQENY29uc3RydWN0b3JWMQEIcmVzdEFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBDXNlbGxSZXNvdXJjZXMCB2Ftb3VudHMJbWluUHJpY2VzBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAipzZWxsUmVzb3VyY2VzIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMEC2N1ckxvY2F0aW9uCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgIBXwMJAQIhPQIJAJEDAgULY3VyTG9jYXRpb24FCmxvY0lkeFR5cGUCAUYJAAIBCQCsAgICLUR1Y2sgbG9jYXRpb24gdHlwZSBzaG91bGQgYmUgRmFjdG9yeSwgYnV0IGlzIAkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAdyZXNMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBA0kdDAyNjgwMzI2OTI5CQETc2VsbFJlc291cmNlc0NvbW1vbgQFB3Jlc0xpc3QJAJEDAgULY3VyTG9jYXRpb24FCGxvY0lkeElkBQdhbW91bnRzBQltaW5QcmljZXMEDmZhY3RvcnlBY3Rpb25zCAUNJHQwMjY4MDMyNjkyOQJfMQQGbmV3UmVzCAUNJHQwMjY4MDMyNjkyOQJfMgQMdXNkdFJlY2VpdmVkCAUNJHQwMjY4MDMyNjkyOQJfMwQIdG90YWxSZXMIBQ0kdDAyNjgwMzI2OTI5Al80BBBhY3Rpdml0aWVzQW1vdW50CQBpAgUMdXNkdFJlY2VpdmVkAGQEB25ld1BhY2sJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJALkJAgUGbmV3UmVzAgFfCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BA5iYWNrcGFja1Jlc3VsdAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUJhY2twYWNrCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFB25ld1BhY2sFA25pbAUDbmlsBAtzdGF0c1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCD3VwZGF0ZUR1Y2tTdGF0cwkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCCQBrAwUHeHBUcmFkZQUIdG90YWxSZXMFBU1VTFQ4BQNuaWwFA25pbAkAlAoCCQDNCAIJAM0IAgUOZmFjdG9yeUFjdGlvbnMJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAZQIFDHVzZHRSZWNlaXZlZAUQYWN0aXZpdGllc0Ftb3VudAULdXNkdEFzc2V0SWQJAQ5TY3JpcHRUcmFuc2ZlcgMFDHJlc3RDb250cmFjdAUQYWN0aXZpdGllc0Ftb3VudAULdXNkdEFzc2V0SWQJAJUKAwUOYmFja3BhY2tSZXN1bHQFDHByb2xvZ1Jlc3VsdAULc3RhdHNSZXN1bHQBaQESc2VsbFJlc291cmNlc1dvcmxkAgRhZGRyBmFtb3VudAMJAQIhPQIIBQFpBmNhbGxlcgUNYWNyZXNDb250cmFjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkBA0kdDAyNzcyMTI3ODc4CQEac2VsbFJlc291cmNlc1dvcmxkSW50ZXJuYWwBBQZhbW91bnQEDmZhY3RvcnlBY3Rpb25zCAUNJHQwMjc3MjEyNzg3OAJfMQQIdXNkdExlZnQIBQ0kdDAyNzcyMTI3ODc4Al8yBANmZWUIBQ0kdDAyNzcyMTI3ODc4Al8zBBBhY3Rpdml0aWVzQW1vdW50CAUNJHQwMjc3MjEyNzg3OAJfNAQIdG90YWxSZXMIBQ0kdDAyNzcyMTI3ODc4Al81AwkAZwIAAAUIdXNkdExlZnQJAAIBCQCsAgICK1RoaXMgdHJhZGUgZG9lcyBub3QgY292ZXIgZGVsaXZlcnkgY29zdCBvZiAJAQpmaXhlZFBvaW50AgUDZmVlAAYEC3N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQWNjU3RhdHMJAMwIAgUEYWRkcgkAzAgCCQBrAwUHeHBUcmFkZQUIdG90YWxSZXMFBU1VTFQ4BQNuaWwFA25pbAkAlAoCCQDNCAIJAM0IAgkAzQgCBQ5mYWN0b3J5QWN0aW9ucwkBDEludGVnZXJFbnRyeQIFD2RlbGl2ZXJ5RnVuZEtleQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUPZGVsaXZlcnlGdW5kS2V5AAAFA2ZlZQkBDlNjcmlwdFRyYW5zZmVyAwUMcmVzdENvbnRyYWN0BRBhY3Rpdml0aWVzQW1vdW50BQt1c2R0QXNzZXRJZAkBDlNjcmlwdFRyYW5zZmVyAwUSaW52ZXN0RnVuZENvbnRyYWN0BQh1c2R0TGVmdAULdXNkdEFzc2V0SWQJAJQKAgUIdXNkdExlZnQFC3N0YXRzUmVzdWx0AWkBGnNlbGxSZXNvdXJjZXNXb3JsZFJFQURPTkxZAQZhbW91bnQECHVzZHRMZWZ0CAkBGnNlbGxSZXNvdXJjZXNXb3JsZEludGVybmFsAQUGYW1vdW50Al8yCQCUCgIFA25pbAUIdXNkdExlZnQBaQEZc2VsbFJlc291cmNlc0R1Y2tEZWxpdmVyeQMHYW1vdW50cwltaW5QcmljZXMQZmFjdG9yeUNvbnRpbmVudAMJAQEhAQURS1NfQUxMT1dfREVMSVZFUlkJAAIBAh9EZWxpdmVyeSBmZWF0dXJlIGlzIHR1cm5lZCBvZmYhBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAipzZWxsUmVzb3VyY2VzIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQHcmVzTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQNJHQwMjkxMTEyOTIzMgkBE3NlbGxSZXNvdXJjZXNDb21tb24EBQdyZXNMaXN0BRBmYWN0b3J5Q29udGluZW50BQdhbW91bnRzBQltaW5QcmljZXMEDmZhY3RvcnlBY3Rpb25zCAUNJHQwMjkxMTEyOTIzMgJfMQQGbmV3UmVzCAUNJHQwMjkxMTEyOTIzMgJfMgQMdXNkdFJlY2VpdmVkCAUNJHQwMjkxMTEyOTIzMgJfMwQIdG90YWxSZXMIBQ0kdDAyOTExMTI5MjMyAl80BAduZXdQYWNrCQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQC5CQIFBm5ld1JlcwIBXwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgQOYmFja3BhY2tSZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVCYWNrcGFjawkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQduZXdQYWNrBQNuaWwFA25pbAQLc3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag91cGRhdGVEdWNrU3RhdHMJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgkAawMFB3hwVHJhZGUFCHRvdGFsUmVzBQVNVUxUOAUDbmlsBQNuaWwEB2ZlZVBhcnQJAGsDBQx1c2R0UmVjZWl2ZWQFDERFTElWRVJZX0ZFRQUFTVVMVDYEA2ZlZQMJAGYCBRVNSU5fVVNEVF9GRUVfREVMSVZFUlkFB2ZlZVBhcnQFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQUHZmVlUGFydAQQYWN0aXZpdGllc0Ftb3VudAkAaQIFDHVzZHRSZWNlaXZlZABkAwkAZwIFA2ZlZQkAZQIFDHVzZHRSZWNlaXZlZAUQYWN0aXZpdGllc0Ftb3VudAkAAgEJAKwCAgIrVGhpcyB0cmFkZSBkb2VzIG5vdCBjb3ZlciBkZWxpdmVyeSBjb3N0IG9mIAkBCmZpeGVkUG9pbnQCBQNmZWUABgQJZnVuZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFD2RlbGl2ZXJ5RnVuZEtleQAACQCUCgIJAM0IAgkAzQgCCQDNCAIFDmZhY3RvcnlBY3Rpb25zCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGUCCQBlAgUMdXNkdFJlY2VpdmVkBRBhY3Rpdml0aWVzQW1vdW50BQNmZWUFC3VzZHRBc3NldElkCQEMSW50ZWdlckVudHJ5AgUPZGVsaXZlcnlGdW5kS2V5CQBkAgUJZnVuZFRvdGFsBQNmZWUJAQ5TY3JpcHRUcmFuc2ZlcgMFDHJlc3RDb250cmFjdAUQYWN0aXZpdGllc0Ftb3VudAULdXNkdEFzc2V0SWQJAJUKAwUOYmFja3BhY2tSZXN1bHQFDHByb2xvZ1Jlc3VsdAULc3RhdHNSZXN1bHQBaQEZc2VsbFJlc291cmNlc0xhbmREZWxpdmVyeQQHYW1vdW50cwltaW5QcmljZXMLbGFuZEFzc2V0SWQQZmFjdG9yeUNvbnRpbmVudAMJAQEhAQURS1NfQUxMT1dfREVMSVZFUlkJAAIBAh9EZWxpdmVyeSBmZWF0dXJlIGlzIHR1cm5lZCBvZmYhBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIqc2VsbFJlc291cmNlcyBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBAR1c2VyCAUBaQZjYWxsZXIEBGFkZHIJAKUIAQUEdXNlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQCd2gJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AhRnZXRXYXJlaG91c2VSRUFET05MWQkAzAgCBQtsYW5kQXNzZXRJZAUDbmlsBQNuaWwECWN1cnJlbnRXaAkAvAkCBQJ3aAIBOgQHcmVzTGlzdAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhSZXMCAV8EDSR0MDMxMjU5MzEzODAJARNzZWxsUmVzb3VyY2VzQ29tbW9uBAUHcmVzTGlzdAUQZmFjdG9yeUNvbnRpbmVudAUHYW1vdW50cwUJbWluUHJpY2VzBA5mYWN0b3J5QWN0aW9ucwgFDSR0MDMxMjU5MzEzODACXzEEBm5ld1JlcwgFDSR0MDMxMjU5MzEzODACXzIEDHVzZHRSZWNlaXZlZAgFDSR0MDMxMjU5MzEzODACXzMECHRvdGFsUmVzCAUNJHQwMzEyNTkzMTM4MAJfNAQFd2hTdHIJALoJAgkAzAgCCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMJAMwIAgkAuQkCBQZuZXdSZXMCAV8JAMwIAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0CQDMCAIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QJAMwIAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAUDbmlsAgE6BAZ3aFNhdmUJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag1zYXZlV2FyZWhvdXNlCQDMCAIFBXdoU3RyCQDMCAIFC2xhbmRBc3NldElkBQNuaWwFA25pbAQLc3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVBY2NTdGF0cwkAzAgCBQRhZGRyCQDMCAIJAGsDBQd4cFRyYWRlBQh0b3RhbFJlcwUFTVVMVDgFA25pbAUDbmlsBAdmZWVQYXJ0CQBrAwUMdXNkdFJlY2VpdmVkBQxERUxJVkVSWV9GRUUFBU1VTFQ2BANmZWUDCQBmAgUVTUlOX1VTRFRfRkVFX0RFTElWRVJZBQdmZWVQYXJ0BRVNSU5fVVNEVF9GRUVfREVMSVZFUlkFB2ZlZVBhcnQEEGFjdGl2aXRpZXNBbW91bnQJAGkCBQx1c2R0UmVjZWl2ZWQAZAMJAGcCBQNmZWUJAGUCBQx1c2R0UmVjZWl2ZWQFEGFjdGl2aXRpZXNBbW91bnQJAAIBCQCsAgICK1RoaXMgdHJhZGUgZG9lcyBub3QgY292ZXIgZGVsaXZlcnkgY29zdCBvZiAJAQpmaXhlZFBvaW50AgUDZmVlAAYECWZ1bmRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ9kZWxpdmVyeUZ1bmRLZXkAAAkAlAoCCQDNCAIJAM0IAgkAzQgCBQ5mYWN0b3J5QWN0aW9ucwkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBlAgkAZQIFDHVzZHRSZWNlaXZlZAUQYWN0aXZpdGllc0Ftb3VudAUDZmVlBQt1c2R0QXNzZXRJZAkBDEludGVnZXJFbnRyeQIFD2RlbGl2ZXJ5RnVuZEtleQkAZAIFCWZ1bmRUb3RhbAUDZmVlCQEOU2NyaXB0VHJhbnNmZXIDBQxyZXN0Q29udHJhY3QFEGFjdGl2aXRpZXNBbW91bnQFC3VzZHRBc3NldElkCQCVCgMFBndoU2F2ZQUMcHJvbG9nUmVzdWx0BQtzdGF0c1Jlc3VsdAFpAQxidXlNYXRlcmlhbHMCB2Ftb3VudHMJbWF4UHJpY2VzBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfAwkBAiE9AgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBRgkAAgEJAKwCAgItRHVjayBsb2NhdGlvbiB0eXBlIHNob3VsZCBiZSBGYWN0b3J5LCBidXQgaXMgCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEB21hdExpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8EDSR0MDMzMjQwMzMzNjIJARJidXlNYXRlcmlhbHNDb21tb24EBQdtYXRMaXN0CQCRAwIFC2N1ckxvY2F0aW9uBQhsb2NJZHhJZAUHYW1vdW50cwUJbWF4UHJpY2VzBA5mYWN0b3J5QWN0aW9ucwgFDSR0MDMzMjQwMzMzNjICXzEEBm5ld01hdAgFDSR0MDMzMjQwMzMzNjICXzIECXVzZHRTcGVudAgFDSR0MDMzMjQwMzMzNjICXzMECHRvdGFsTWF0CAUNJHQwMzMyNDAzMzM2MgJfNAMJAGYCBQl1c2R0U3BlbnQFA2FtdAkAAgEJAKwCAgkArAICCQCsAgICH0luc3VmZmljaWVudCBwYXltZW50ISBBdHRhY2hlZD0JAQpmaXhlZFBvaW50AgUDYW10AAYCCywgcmVxdWlyZWQ9CQEKZml4ZWRQb2ludAIFCXVzZHRTcGVudAAGBAduZXdQYWNrCQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCCQC5CQIFBm5ld01hdAIBXwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgQOYmFja3BhY2tSZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVCYWNrcGFjawkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQduZXdQYWNrBQNuaWwFA25pbAQEcmVzdAMJAGYCCQBlAgUDYW10BQl1c2R0U3BlbnQAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGUCBQNhbXQFCXVzZHRTcGVudAULdXNkdEFzc2V0SWQFA25pbAUDbmlsBBBhY3Rpdml0aWVzQW1vdW50CQBpAgUJdXNkdFNwZW50AGQEC3N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIPdXBkYXRlRHVja1N0YXRzCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIJAGsDBQd4cFRyYWRlBQh0b3RhbE1hdAUFTVVMVDgFA25pbAUDbmlsCQCUCgIJAM0IAgkAzggCBQ5mYWN0b3J5QWN0aW9ucwUEcmVzdAkBDlNjcmlwdFRyYW5zZmVyAwUMcmVzdENvbnRyYWN0BRBhY3Rpdml0aWVzQW1vdW50BQt1c2R0QXNzZXRJZAkAlQoDBQ5iYWNrcGFja1Jlc3VsdAUMcHJvbG9nUmVzdWx0BQtzdGF0c1Jlc3VsdAFpARhidXlNYXRlcmlhbHNEdWNrRGVsaXZlcnkDB2Ftb3VudHMJbWF4UHJpY2VzEGZhY3RvcnlDb250aW5lbnQDCQEBIQEFEUtTX0FMTE9XX0RFTElWRVJZCQACAQIfRGVsaXZlcnkgZmVhdHVyZSBpcyB0dXJuZWQgb2ZmIQQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECE1VTRFQgcGF5bWVudHMgb25seSEEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQHbWF0TGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQNJHQwMzQ4ODAzNDk5NwkBEmJ1eU1hdGVyaWFsc0NvbW1vbgQFB21hdExpc3QFEGZhY3RvcnlDb250aW5lbnQFB2Ftb3VudHMFCW1heFByaWNlcwQOZmFjdG9yeUFjdGlvbnMIBQ0kdDAzNDg4MDM0OTk3Al8xBAZuZXdNYXQIBQ0kdDAzNDg4MDM0OTk3Al8yBAl1c2R0U3BlbnQIBQ0kdDAzNDg4MDM0OTk3Al8zBAh0b3RhbE1hdAgFDSR0MDM0ODgwMzQ5OTcCXzQEB25ld1BhY2sJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIJALkJAgUGbmV3TWF0AgFfCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BA5iYWNrcGFja1Jlc3VsdAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUJhY2twYWNrCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFB25ld1BhY2sFA25pbAUDbmlsBAtzdGF0c1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCD3VwZGF0ZUR1Y2tTdGF0cwkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCCQBrAwUHeHBUcmFkZQUIdG90YWxNYXQFBU1VTFQ4BQNuaWwFA25pbAQHZmVlUGFydAkAawMFCXVzZHRTcGVudAUMREVMSVZFUllfRkVFBQVNVUxUNgQDZmVlAwkAZgIFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQUHZmVlUGFydAUVTUlOX1VTRFRfRkVFX0RFTElWRVJZBQdmZWVQYXJ0BBB1c2R0U3BlbnRXaXRoRmVlCQBkAgUJdXNkdFNwZW50BQNmZWUDCQBmAgUQdXNkdFNwZW50V2l0aEZlZQUDYW10CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIfSW5zdWZmaWNpZW50IHBheW1lbnQhIEF0dGFjaGVkPQkBCmZpeGVkUG9pbnQCBQNhbXQABgILLCByZXF1aXJlZD0JAQpmaXhlZFBvaW50AgUJdXNkdFNwZW50AAYCASsJAQpmaXhlZFBvaW50AgUDZmVlAAYCDihkZWxpdmVyeSBmZWUpBARyZXN0AwkAZgIJAGUCBQNhbXQFEHVzZHRTcGVudFdpdGhGZWUAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGUCBQNhbXQFEHVzZHRTcGVudFdpdGhGZWUFC3VzZHRBc3NldElkBQNuaWwFA25pbAQQYWN0aXZpdGllc0Ftb3VudAkAaQIFCXVzZHRTcGVudABkBAlmdW5kVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUPZGVsaXZlcnlGdW5kS2V5AAAJAJQKAgkAzQgCCQDNCAIJAM4IAgUOZmFjdG9yeUFjdGlvbnMFBHJlc3QJAQ5TY3JpcHRUcmFuc2ZlcgMFDHJlc3RDb250cmFjdAUQYWN0aXZpdGllc0Ftb3VudAULdXNkdEFzc2V0SWQJAQxJbnRlZ2VyRW50cnkCBQ9kZWxpdmVyeUZ1bmRLZXkJAGQCBQlmdW5kVG90YWwFA2ZlZQkAlQoDBQ5iYWNrcGFja1Jlc3VsdAUMcHJvbG9nUmVzdWx0BQtzdGF0c1Jlc3VsdAFpARhidXlNYXRlcmlhbHNMYW5kRGVsaXZlcnkEB2Ftb3VudHMJbWF4UHJpY2VzC2xhbmRBc3NldElkEGZhY3RvcnlDb250aW5lbnQDCQEBIQEFEUtTX0FMTE9XX0RFTElWRVJZCQACAQIfRGVsaXZlcnkgZmVhdHVyZSBpcyB0dXJuZWQgb2ZmIQQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhNVU0RUIHBheW1lbnRzIG9ubHkhBAR1c2VyCAUBaQZjYWxsZXIEBGFkZHIJAKUIAQUEdXNlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQCd2gJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AhRnZXRXYXJlaG91c2VSRUFET05MWQkAzAgCBQtsYW5kQXNzZXRJZAUDbmlsBQNuaWwECWN1cnJlbnRXaAkAvAkCBQJ3aAIBOgQHbWF0TGlzdAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQCAV8EDSR0MDM3Mjc1MzczOTIJARJidXlNYXRlcmlhbHNDb21tb24EBQdtYXRMaXN0BRBmYWN0b3J5Q29udGluZW50BQdhbW91bnRzBQltYXhQcmljZXMEDmZhY3RvcnlBY3Rpb25zCAUNJHQwMzcyNzUzNzM5MgJfMQQGbmV3TWF0CAUNJHQwMzcyNzUzNzM5MgJfMgQJdXNkdFNwZW50CAUNJHQwMzcyNzUzNzM5MgJfMwQIdG90YWxNYXQIBQ0kdDAzNzI3NTM3MzkyAl80BAV3aFN0cgkAugkCCQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhSZXMJAMwIAgkAuQkCBQZuZXdNYXQCAV8JAMwIAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAkAzAgCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhMT0ZUBQNuaWwCAToEBndoU2F2ZQkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDXNhdmVXYXJlaG91c2UJAMwIAgUFd2hTdHIJAMwIAgULbGFuZEFzc2V0SWQFA25pbAUDbmlsBAtzdGF0c1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUFjY1N0YXRzCQDMCAIFBGFkZHIJAMwIAgkAawMFB3hwVHJhZGUFCHRvdGFsTWF0BQVNVUxUOAUDbmlsBQNuaWwEB2ZlZVBhcnQJAGsDBQl1c2R0U3BlbnQFDERFTElWRVJZX0ZFRQUFTVVMVDYEA2ZlZQMJAGYCBRVNSU5fVVNEVF9GRUVfREVMSVZFUlkFB2ZlZVBhcnQFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQUHZmVlUGFydAQQdXNkdFNwZW50V2l0aEZlZQkAZAIFCXVzZHRTcGVudAUDZmVlAwkAZgIFEHVzZHRTcGVudFdpdGhGZWUFA2FtdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICH0luc3VmZmljaWVudCBwYXltZW50ISBBdHRhY2hlZD0JAQpmaXhlZFBvaW50AgUDYW10AAYCCywgcmVxdWlyZWQ9CQEKZml4ZWRQb2ludAIFCXVzZHRTcGVudAAGAgErCQEKZml4ZWRQb2ludAIFA2ZlZQAGAg4oZGVsaXZlcnkgZmVlKQQEcmVzdAMJAGYCCQBlAgUDYW10BRB1c2R0U3BlbnRXaXRoRmVlAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBlAgUDYW10BRB1c2R0U3BlbnRXaXRoRmVlBQt1c2R0QXNzZXRJZAUDbmlsBQNuaWwEEGFjdGl2aXRpZXNBbW91bnQJAGkCBQl1c2R0U3BlbnQAZAQJZnVuZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFD2RlbGl2ZXJ5RnVuZEtleQAACQCUCgIJAM0IAgkAzQgCCQDOCAIFDmZhY3RvcnlBY3Rpb25zBQRyZXN0CQEOU2NyaXB0VHJhbnNmZXIDBQxyZXN0Q29udHJhY3QFEGFjdGl2aXRpZXNBbW91bnQFC3VzZHRBc3NldElkCQEMSW50ZWdlckVudHJ5AgUPZGVsaXZlcnlGdW5kS2V5CQBkAgUJZnVuZFRvdGFsBQNmZWUJAJUKAwUGd2hTYXZlBQxwcm9sb2dSZXN1bHQFC3N0YXRzUmVzdWx0AWkBEWV4Y2hhbmdlUmVzb3VyY2VzAQdhbW91bnRzBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfAwkBAiE9AgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBRgkAAgEJAKwCAgItRHVjayBsb2NhdGlvbiB0eXBlIHNob3VsZCBiZSBGYWN0b3J5LCBidXQgaXMgCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEB3Jlc0xpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMCAV8EB21hdExpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8EDSR0MDM5NTA2Mzk2MTIJARdleGNoYW5nZVJlc291cmNlc0NvbW1vbgMFB3Jlc0xpc3QFB21hdExpc3QFB2Ftb3VudHMEBm5ld1JlcwgFDSR0MDM5NTA2Mzk2MTICXzEEBm5ld01hdAgFDSR0MDM5NTA2Mzk2MTICXzIECXVzZHRTcGVudAgFDSR0MDM5NTA2Mzk2MTICXzMEFHRvdGFsQW1vdW50Q29udmVydGVkCAUNJHQwMzk1MDYzOTYxMgJfNAMJAGYCBQl1c2R0U3BlbnQFA2FtdAkAAgEJAKwCAgkArAICCQCsAgICH0luc3VmZmljaWVudCBwYXltZW50ISBBdHRhY2hlZD0JAQpmaXhlZFBvaW50AgUDYW10AAYCCywgcmVxdWlyZWQ9CQEKZml4ZWRQb2ludAIFCXVzZHRTcGVudAAGBAduZXdQYWNrCQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQC5CQIFBm5ld1JlcwIBXwkAzAgCCQC5CQIFBm5ld01hdAIBXwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgQOYmFja3BhY2tSZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVCYWNrcGFjawkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQduZXdQYWNrBQNuaWwFA25pbAQEcmVzdAMJAGYCCQBlAgUDYW10BQl1c2R0U3BlbnQAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGUCBQNhbXQFCXVzZHRTcGVudAULdXNkdEFzc2V0SWQFA25pbAUDbmlsBBBhY3Rpdml0aWVzQW1vdW50CQBpAgUJdXNkdFNwZW50AGQEC3N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIPdXBkYXRlRHVja1N0YXRzCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIJAGsDBQd4cFRyYWRlBRR0b3RhbEFtb3VudENvbnZlcnRlZAUFTVVMVDgFA25pbAUDbmlsCQCUCgIJAM0IAgUEcmVzdAkBDlNjcmlwdFRyYW5zZmVyAwUMcmVzdENvbnRyYWN0BRBhY3Rpdml0aWVzQW1vdW50BQt1c2R0QXNzZXRJZAkAlQoDBQ5iYWNrcGFja1Jlc3VsdAUMcHJvbG9nUmVzdWx0BQtzdGF0c1Jlc3VsdAFpAR1leGNoYW5nZVJlc291cmNlc0R1Y2tEZWxpdmVyeQEHYW1vdW50cwMJAQEhAQURS1NfQUxMT1dfREVMSVZFUlkJAAIBAh9EZWxpdmVyeSBmZWF0dXJlIGlzIHR1cm5lZCBvZmYhBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAdyZXNMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAdtYXRMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBA0kdDA0MTEyNDQxMjMwCQEXZXhjaGFuZ2VSZXNvdXJjZXNDb21tb24DBQdyZXNMaXN0BQdtYXRMaXN0BQdhbW91bnRzBAZuZXdSZXMIBQ0kdDA0MTEyNDQxMjMwAl8xBAZuZXdNYXQIBQ0kdDA0MTEyNDQxMjMwAl8yBAl1c2R0U3BlbnQIBQ0kdDA0MTEyNDQxMjMwAl8zBBR0b3RhbEFtb3VudENvbnZlcnRlZAgFDSR0MDQxMTI0NDEyMzACXzQEB2ZlZVBhcnQJAGsDBQl1c2R0U3BlbnQFDkRFTElWRVJZX0ZFRTE1BQVNVUxUNgQDZmVlAwkAZgIFF01JTl9VU0RUX0ZFRV9ERUxJVkVSWTE1BQdmZWVQYXJ0BRdNSU5fVVNEVF9GRUVfREVMSVZFUlkxNQUHZmVlUGFydAQQdXNkdFNwZW50V2l0aEZlZQkAZAIFCXVzZHRTcGVudAUDZmVlAwkAZgIFEHVzZHRTcGVudFdpdGhGZWUFA2FtdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICH0luc3VmZmljaWVudCBwYXltZW50ISBBdHRhY2hlZD0JAQpmaXhlZFBvaW50AgUDYW10AAYCCywgcmVxdWlyZWQ9CQEKZml4ZWRQb2ludAIFCXVzZHRTcGVudAAGAgErCQEKZml4ZWRQb2ludAIFA2ZlZQAGAg4oZGVsaXZlcnkgZmVlKQQHbmV3UGFjawkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAuQkCBQZuZXdSZXMCAV8JAMwIAgkAuQkCBQZuZXdNYXQCAV8JAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToEDmJhY2twYWNrUmVzdWx0CQEIYXNTdHJpbmcBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQmFja3BhY2sJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgUHbmV3UGFjawUDbmlsBQNuaWwEBHJlc3QDCQBmAgkAZQIFA2FtdAUQdXNkdFNwZW50V2l0aEZlZQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAZQIFA2FtdAUQdXNkdFNwZW50V2l0aEZlZQULdXNkdEFzc2V0SWQFA25pbAUDbmlsBBBhY3Rpdml0aWVzQW1vdW50CQBpAgUJdXNkdFNwZW50AGQEC3N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIPdXBkYXRlRHVja1N0YXRzCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIJAGsDBQd4cFRyYWRlBRR0b3RhbEFtb3VudENvbnZlcnRlZAUFTVVMVDgFA25pbAUDbmlsBAlmdW5kVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUPZGVsaXZlcnlGdW5kS2V5AAAJAJQKAgkAzQgCCQDNCAIFBHJlc3QJAQ5TY3JpcHRUcmFuc2ZlcgMFDHJlc3RDb250cmFjdAUQYWN0aXZpdGllc0Ftb3VudAULdXNkdEFzc2V0SWQJAQxJbnRlZ2VyRW50cnkCBQ9kZWxpdmVyeUZ1bmRLZXkJAGQCBQlmdW5kVG90YWwFA2ZlZQkAlQoDBQ5iYWNrcGFja1Jlc3VsdAUMcHJvbG9nUmVzdWx0BQtzdGF0c1Jlc3VsdAFpAR1leGNoYW5nZVJlc291cmNlc0xhbmREZWxpdmVyeQIHYW1vdW50cwtsYW5kQXNzZXRJZAMJAQEhAQURS1NfQUxMT1dfREVMSVZFUlkJAAIBAh9EZWxpdmVyeSBmZWF0dXJlIGlzIHR1cm5lZCBvZmYhBAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQt1c2R0QXNzZXRJZAkAAgECE1VTRFQgcGF5bWVudHMgb25seSEEBHVzZXIIBQFpBmNhbGxlcgQEYWRkcgkApQgBBQR1c2VyBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAJ3aAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCFGdldFdhcmVob3VzZVJFQURPTkxZCQDMCAIFC2xhbmRBc3NldElkBQNuaWwFA25pbAQJY3VycmVudFdoCQC8CQIFAndoAgE6BAdyZXNMaXN0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQHbWF0TGlzdAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQCAV8EDSR0MDQzNTMwNDM2MzYJARdleGNoYW5nZVJlc291cmNlc0NvbW1vbgMFB3Jlc0xpc3QFB21hdExpc3QFB2Ftb3VudHMEBm5ld1JlcwgFDSR0MDQzNTMwNDM2MzYCXzEEBm5ld01hdAgFDSR0MDQzNTMwNDM2MzYCXzIECXVzZHRTcGVudAgFDSR0MDQzNTMwNDM2MzYCXzMEFHRvdGFsQW1vdW50Q29udmVydGVkCAUNJHQwNDM1MzA0MzYzNgJfNAQFd2hTdHIJALoJAgkAzAgCCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMJAMwIAgkAuQkCBQZuZXdSZXMCAV8JAMwIAgkAuQkCBQZuZXdNYXQCAV8JAMwIAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAkAzAgCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhMT0ZUBQNuaWwCAToEBndoU2F2ZQkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDXNhdmVXYXJlaG91c2UJAMwIAgUFd2hTdHIJAMwIAgULbGFuZEFzc2V0SWQFA25pbAUDbmlsBAtzdGF0c1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUFjY1N0YXRzCQDMCAIFBGFkZHIJAMwIAgkAawMFB3hwVHJhZGUFFHRvdGFsQW1vdW50Q29udmVydGVkBQVNVUxUOAUDbmlsBQNuaWwEB2ZlZVBhcnQJAGsDBQl1c2R0U3BlbnQFDkRFTElWRVJZX0ZFRTE1BQVNVUxUNgQDZmVlAwkAZgIFF01JTl9VU0RUX0ZFRV9ERUxJVkVSWTE1BQdmZWVQYXJ0BRdNSU5fVVNEVF9GRUVfREVMSVZFUlkxNQUHZmVlUGFydAQQdXNkdFNwZW50V2l0aEZlZQkAZAIFCXVzZHRTcGVudAUDZmVlAwkAZgIFEHVzZHRTcGVudFdpdGhGZWUFA2FtdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICH0luc3VmZmljaWVudCBwYXltZW50ISBBdHRhY2hlZD0JAQpmaXhlZFBvaW50AgUDYW10AAYCCywgcmVxdWlyZWQ9CQEKZml4ZWRQb2ludAIFCXVzZHRTcGVudAAGAgErCQEKZml4ZWRQb2ludAIFA2ZlZQAGAg4oZGVsaXZlcnkgZmVlKQQEcmVzdAMJAGYCCQBlAgUDYW10BRB1c2R0U3BlbnRXaXRoRmVlAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBlAgUDYW10BRB1c2R0U3BlbnRXaXRoRmVlBQt1c2R0QXNzZXRJZAUDbmlsBQNuaWwEEGFjdGl2aXRpZXNBbW91bnQJAGkCBQl1c2R0U3BlbnQAZAQJZnVuZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFD2RlbGl2ZXJ5RnVuZEtleQAACQCUCgIJAM0IAgkAzQgCBQRyZXN0CQEOU2NyaXB0VHJhbnNmZXIDBQxyZXN0Q29udHJhY3QFEGFjdGl2aXRpZXNBbW91bnQFC3VzZHRBc3NldElkCQEMSW50ZWdlckVudHJ5AgUPZGVsaXZlcnlGdW5kS2V5CQBkAgUJZnVuZFRvdGFsBQNmZWUJAJUKAwUGd2hTYXZlBQxwcm9sb2dSZXN1bHQFC3N0YXRzUmVzdWx0AWkBCmNyYWZ0R29vZHMCCnByb2R1Y3RJZHgIcXVhbnRpdHkEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCHldBVkVTIGNhbid0IGJlIHVzZWQgYXMgcGF5bWVudAMJAQIhPQIFCnBtdEFzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQMJAQIhPQIFA2FtdAUFTVVMVDYJAAIBAipleGFjdGx5IDEgVVNEVCBtdXN0IGJlIGF0dGFjaGVkIGFzIHBheW1lbnQDCQBnAgAABQhxdWFudGl0eQkAAgECG1F1YW50aXR5IHNob3VsZCBiZSBwb3NpdGl2ZQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04CAV8DCQECIT0CCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlAgFNCQACAQkArAICAjFEdWNrIGxvY2F0aW9uIHR5cGUgc2hvdWxkIGJlIE1hbnVmYWN0b3J5LCBidXQgaXMgCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlBARjb250CQCRAwIFC2N1ckxvY2F0aW9uBQ9sb2NJZHhDb250aW5lbnQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQHbWF0TGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwMDCQBmAgAABQpwcm9kdWN0SWR4BgkAZwIFCnByb2R1Y3RJZHgJAJADAQUQcHJvZHVjdGlvbk1hdHJpeAkAAgEJAKwCAgIUVW5rbm93biBwcm9kdWN0IGlkeD0JAKQDAQUKcHJvZHVjdElkeAQGcmVjaXBlCQC1CQIJAJEDAgUQcHJvZHVjdGlvbk1hdHJpeAUKcHJvZHVjdElkeAIBXwMJAQIhPQIJAJADAQUGcmVjaXBlBQpSRUNJUEVTSVpFCQACAQkArAICAhdGYXRhbDogdW5rbm93biByZWNpcGU6IAkAkQMCBRBwcm9kdWN0aW9uTWF0cml4BQpwcm9kdWN0SWR4BA5wcm9kdWN0Q29udElkeAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnJlY2lwZQUNcklkeENvbnRpbmVudAMJAQIhPQIJAJEDAgUKY29udGluZW50cwUOcHJvZHVjdENvbnRJZHgFBGNvbnQJAAIBCQCsAgIJAKwCAgkArAICAh1UaGlzIHByb2R1Y3QgaXMgYXZhaWxhYmxlIGluIAkAkQMCBQpjb250aW5lbnRzBQ5wcm9kdWN0Q29udElkeAIRLCBidXQgeW91IGFyZSBpbiAFBGNvbnQECHByb2RMaXN0AwkAAAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIABQNuaWwJALwJAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgFfCgEGZmlsbGVyAgNhY2MLaWdub3JlZEl0ZW0EAW4IBQNhY2MCXzIEAnhzAwkAZgIJAJADAQUIcHJvZExpc3QFAW4JAJEDAgUIcHJvZExpc3QFAW4CATAEAXgJAQ1wYXJzZUludFZhbHVlAQUCeHMEBmFtb3VudAkAaAIFCHF1YW50aXR5BQ5QUk9EVUNUUEtHU0laRQQBeQMJAAACBQFuBQpwcm9kdWN0SWR4CQCkAwEJAGQCBQF4BQZhbW91bnQFAnhzCQCUCgIJAM0IAggFA2FjYwJfMQUBeQkAZAIFAW4AAQQGYnBQcm9kCAoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGZmlsbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADICXzEKAQhwcm9kdWNlcgIDYWNjAWoEB25lZWRNYXQJAGgCCQBoAgkAaAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZyZWNpcGUFAWoFBU1VTFQ1BQhxdWFudGl0eQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnJlY2lwZQUJcklkeENvZWZmBAdoYXZlTWF0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHbWF0TGlzdAUBagMJAGYCBQduZWVkTWF0BQdoYXZlTWF0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAglZb3UgaGF2ZSAJAQpmaXhlZFBvaW50AgUHaGF2ZU1hdAAIAgQgb2YgCQCRAwIFCG1hdFR5cGVzBQFqAhYsIGJ1dCByZWNpcGUgcmVxdWlyZXMgCQEKZml4ZWRQb2ludAIFB25lZWRNYXQACAIOIGZvciBxdWFudGl0eSAJAKQDAQUIcXVhbnRpdHkDCQBmAgUHbmVlZE1hdAAACQCUCgIJAM0IAggFA2FjYwJfMQkApAMBCQBlAgUHaGF2ZU1hdAUHbmVlZE1hdAkAZAIIBQNhY2MCXzIFB25lZWRNYXQJAJQKAgkAzQgCCAUDYWNjAl8xCQCRAwIFB21hdExpc3QFAWoIBQNhY2MCXzIEBm1lcmdlZAoAAiRsBQVJVEVSNgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCHByb2R1Y2VyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAduZXdQYWNrCQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCCQC5CQIIBQZtZXJnZWQCXzECAV8JAMwIAgkAugkCBQZicFByb2QCAV8FA25pbAIBOgQGcmVzdWx0CQEIYXNTdHJpbmcBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQmFja3BhY2sJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgUHbmV3UGFjawUDbmlsBQNuaWwEC3N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIPdXBkYXRlRHVja1N0YXRzCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIJAGsDBQd4cENyYWZ0CAUGbWVyZ2VkAl8yBQVNVUxUOAUDbmlsBQNuaWwJAJQKAgUDbmlsCQCVCgMFBnJlc3VsdAUMcHJvbG9nUmVzdWx0BQtzdGF0c1Jlc3VsdAFpARFzZXRXYXJlaG91c2VPcmRlcgILbmV3T3JkZXJTdHILbGFuZEFzc2V0SWQEBHVzZXIIBQFpDG9yaWdpbkNhbGxlcgQEYWRkcgkApQgBBQR1c2VyBAZyZXN1bHQDCQECIT0CBQR1c2VyBQxyZXN0Q29udHJhY3QJAQxjaGVja0Jsb2NrZWQABwQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDAwkBAiE9AgUEdXNlcgUMcmVzdENvbnRyYWN0CQECIT0CBQVvd25lcgUEYWRkcgcJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMECG5ld09yZGVyCQC8CQIFC25ld09yZGVyU3RyAgE6BAJ3aAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCFGdldFdhcmVob3VzZVJFQURPTkxZCQDMCAIFC2xhbmRBc3NldElkBQNuaWwFA25pbAQJY3VycmVudFdoCQC8CQIFAndoAgE6BARsb2Z0CQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeExPRlQCAV8EB3doVG90YWwJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQRsb2Z0BQh2b2xUb3RhbAQGb3JkS2V5CQEOa2V5T3JkZXJCeUxhbmQBBQtsYW5kQXNzZXRJZAQKY3VycmVudE9yZAkBCGdldE9yZGVyAQUGb3JkS2V5BAF6CQELc2V0SW50ZXJuYWwDBQljdXJyZW50V2gFCmN1cnJlbnRPcmQFCG5ld09yZGVyBAtidXlWb2xTYWxkbwgFAXoCXzQEDHNlbGxWb2xTYWxkbwgFAXoCXzUECndoT2NjdXBpZWQIBQF6Al83BAh3aExvY2tlZAkAZAIFC2J1eVZvbFNhbGRvBQxzZWxsVm9sU2FsZG8EBndoRnJlZQkAZQIJAGUCBQd3aFRvdGFsBQp3aE9jY3VwaWVkBQh3aExvY2tlZAMJAGYCAAAFBndoRnJlZQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICE0F0dGVtcHQgdG8gcmVzZXJ2ZSAJAKQDAQULYnV5Vm9sU2FsZG8CGyBzcGFjZSBmb3IgYnV5IG9yZGVycywgYW5kIAkApAMBBQxzZWxsVm9sU2FsZG8CJSBzcGFjZSBmb3Igc2VsbCBvcmRlcnMgKGFuZCBvY2N1cGllZD0JAKQDAQUKd2hPY2N1cGllZAIfKSwgbGVhZHMgdG8gbmVnYXRpdmUgZnJlZSBzcGFjZQQFd2hTdHIJALoJAgkAzAgCCQCRAwIFCWN1cnJlbnRXaAULd2hJZHhMZXZlbHMJAMwIAgkAuQkCCAUBegJfMQIBXwkAzAgCCQC5CQIIBQF6Al8yAgFfCQDMCAIJALoJAggFAXoCXzMCAV8JAMwIAgkApAMBBQh3aExvY2tlZAUDbmlsAgE6BAZ3aFNhdmUJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag1zYXZlV2FyZWhvdXNlCQDMCAIFBXdoU3RyCQDMCAIFC2xhbmRBc3NldElkBQNuaWwFA25pbAQIdXNkU2FsZG8IBQF6Al82BAdhY3Rpb25zAwkAZgIFCHVzZFNhbGRvAAADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCHldBVkVTIGNhbid0IGJlIHVzZWQgYXMgcGF5bWVudAMJAQIhPQIFCnBtdEFzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQMJAQIhPQIFA2FtdAUIdXNkU2FsZG8JAAIBCQCsAgICElBheW1lbnQgbmVlZGVkIGlzIAkApAMBBQh1c2RTYWxkbwkAzAgCCQELU3RyaW5nRW50cnkCBQZvcmRLZXkFC25ld09yZGVyU3RyBQNuaWwDCQAAAgUIdXNkU2FsZG8AAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECEk5vIHBheW1lbnRzIG5lZWRlZAkAzAgCCQELU3RyaW5nRW50cnkCBQZvcmRLZXkFC25ld09yZGVyU3RyBQNuaWwDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhJObyBwYXltZW50cyBuZWVkZWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUFb3duZXIJAQEtAQUIdXNkU2FsZG8FC3VzZHRBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIFBm9yZEtleQULbmV3T3JkZXJTdHIFA25pbAkAlAoCBQdhY3Rpb25zCQCUCgIFBnJlc3VsdAUGd2hTYXZlAWkBFGFjY2VwdFdhcmVob3VzZU9yZGVyAwpicE9yZGVyU3RyD3Nob3BMYW5kQXNzZXRJZAtkdWNrQXNzZXRJZAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQGY2FsbGVyCAUBaQxvcmlnaW5DYWxsZXIECmNhbGxlckFkZHIJAKUIAQUGY2FsbGVyBBFzdGFrZWREdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUKY2FsbGVyQWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEPa2V5RHVja0xvY2F0aW9uAQURc3Rha2VkRHVja0Fzc2V0SWQFD0RFRkFVTFRMT0NBVElPTgQDbG9jCQC1CQIJAQV2YWx1ZQEFC2N1ckxvY2F0aW9uAgFfAwkBAiE9AgkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCAUwJAAIBCQCsAgIJAKwCAgIWRHVjayBsb2NhdGlvbiB0eXBlIGlzIAkAkQMCBQNsb2MFCmxvY0lkeFR5cGUCESwgYnV0IHNob3VsZCBiZSBMAwkBAiE9AgURc3Rha2VkRHVja0Fzc2V0SWQFC2R1Y2tBc3NldElkCQACAQkArAICCQCsAgIJAKwCAgIUWW91ciBzdGFrZWQgZHVjayBpcyAFEXN0YWtlZER1Y2tBc3NldElkAg0sIGJ1dCBwYXNzZWQgBQtkdWNrQXNzZXRJZAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkECWJwUmVzTGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQJYnBNYXRMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBApicFByb2RMaXN0AwkAAAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIABQNuaWwJALwJAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgFfBA0kdDA1MzE0ODUzMzg4CQEVYWNjZXB0U2hvcE9yZGVyQ29tbW9uBgUPc2hvcExhbmRBc3NldElkBQpjYWxsZXJBZGRyBQpicE9yZGVyU3RyBQlicFJlc0xpc3QFCWJwTWF0TGlzdAUKYnBQcm9kTGlzdAQKc2hvcEFjdGlvbggFDSR0MDUzMTQ4NTMzODgCXzEECm5ld1VzZXJSZXMIBQ0kdDA1MzE0ODUzMzg4Al8yBApuZXdVc2VyTWF0CAUNJHQwNTMxNDg1MzM4OAJfMwQLbmV3VXNlclByb2QIBQ0kdDA1MzE0ODUzMzg4Al80BA11c2RXaDJCcFNhbGRvCAUNJHQwNTMxNDg1MzM4OAJfNQQNdXNkQnAyV2hTYWxkbwgFDSR0MDUzMTQ4NTMzODgCXzYECHhwQW1vdW50CAUNJHQwNTMxNDg1MzM4OAJfNwQNc2hvcExhbmRPd25lcggFDSR0MDUzMTQ4NTMzODgCXzgECnNob3BXaFNhdmUIBQ0kdDA1MzE0ODUzMzg4Al85BA5hY2NTdGF0c1Jlc3VsdAgFDSR0MDUzMTQ4NTMzODgDXzEwBAhhY3Rpb25zMQkAzAgCBQpzaG9wQWN0aW9uCQEQc2hvcDJ1c2VyQWN0aW9ucwMFDXVzZFdoMkJwU2FsZG8FCmNhbGxlckFkZHIAAAQIYWN0aW9uczIJARB1c2VyMnNob3BBY3Rpb25zBAUNdXNkQnAyV2hTYWxkbwgFAWkIcGF5bWVudHMFDXNob3BMYW5kT3duZXIAAAQIbmV3QnBTdHIJALoJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJALkJAgUKbmV3VXNlclJlcwIBXwkAzAgCCQC5CQIFCm5ld1VzZXJNYXQCAV8JAMwIAgkAugkCBQtuZXdVc2VyUHJvZAIBXwUDbmlsAgE6BAZicFNhdmUJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVCYWNrcGFjawkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQhuZXdCcFN0cgUDbmlsBQNuaWwED2R1Y2tTdGF0c1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCD3VwZGF0ZUR1Y2tTdGF0cwkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCCQBrAwUGeHBTaG9wBQh4cEFtb3VudAUFTVVMVDgFA25pbAUDbmlsCQCUCgIJAM4IAgUIYWN0aW9uczEFCGFjdGlvbnMyCQCXCgUFDHByb2xvZ1Jlc3VsdAUKc2hvcFdoU2F2ZQUGYnBTYXZlBQ9kdWNrU3RhdHNSZXN1bHQFDmFjY1N0YXRzUmVzdWx0AWkBG2FjY2VwdFNob3BPcmRlckR1Y2tEZWxpdmVyeQIIb3JkZXJTdHIPc2hvcExhbmRBc3NldElkAwkBASEBBRFLU19BTExPV19ERUxJVkVSWQkAAgECH0RlbGl2ZXJ5IGZlYXR1cmUgaXMgdHVybmVkIG9mZiEEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwAEBmNhbGxlcggFAWkMb3JpZ2luQ2FsbGVyBApjYWxsZXJBZGRyCQClCAEFBmNhbGxlcgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFCmNhbGxlckFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BAlicFJlc0xpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMCAV8ECWJwTWF0TGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwQKYnBQcm9kTGlzdAMJAAACCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAAUDbmlsCQC8CQIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIBXwQNJHQwNTQ4Mjc1NTA2NQkBFWFjY2VwdFNob3BPcmRlckNvbW1vbgYFD3Nob3BMYW5kQXNzZXRJZAUKY2FsbGVyQWRkcgUIb3JkZXJTdHIFCWJwUmVzTGlzdAUJYnBNYXRMaXN0BQpicFByb2RMaXN0BApzaG9wQWN0aW9uCAUNJHQwNTQ4Mjc1NTA2NQJfMQQKbmV3VXNlclJlcwgFDSR0MDU0ODI3NTUwNjUCXzIECm5ld1VzZXJNYXQIBQ0kdDA1NDgyNzU1MDY1Al8zBAtuZXdVc2VyUHJvZAgFDSR0MDU0ODI3NTUwNjUCXzQEDXVzZFdoMkJwU2FsZG8IBQ0kdDA1NDgyNzU1MDY1Al81BA11c2RCcDJXaFNhbGRvCAUNJHQwNTQ4Mjc1NTA2NQJfNgQIeHBBbW91bnQIBQ0kdDA1NDgyNzU1MDY1Al83BA1zaG9wTGFuZE93bmVyCAUNJHQwNTQ4Mjc1NTA2NQJfOAQKc2hvcFdoU2F2ZQgFDSR0MDU0ODI3NTUwNjUCXzkEDmFjY1N0YXRzUmVzdWx0CAUNJHQwNTQ4Mjc1NTA2NQNfMTAED2RlbGl2ZXJ5RmVlUGFydAkAawMJAGQCBQ11c2RCcDJXaFNhbGRvBQ11c2RXaDJCcFNhbGRvBQxERUxJVkVSWV9GRUUFBU1VTFQ2BAtkZWxpdmVyeUZlZQMJAGYCBRVNSU5fVVNEVF9GRUVfREVMSVZFUlkFD2RlbGl2ZXJ5RmVlUGFydAUVTUlOX1VTRFRfRkVFX0RFTElWRVJZBQ9kZWxpdmVyeUZlZVBhcnQECHNwZW50RmVlCQBrAwULZGVsaXZlcnlGZWUFDXVzZEJwMldoU2FsZG8JAGQCBQ11c2RCcDJXaFNhbGRvBQ11c2RXaDJCcFNhbGRvBAtyZWNlaXZlZEZlZQkAZQIFC2RlbGl2ZXJ5RmVlBQhzcGVudEZlZQQJZnVuZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFD2RlbGl2ZXJ5RnVuZEtleQAABAhhY3Rpb25zMQkAzAgCBQpzaG9wQWN0aW9uCQEQc2hvcDJ1c2VyQWN0aW9ucwMFDXVzZFdoMkJwU2FsZG8FCmNhbGxlckFkZHIFC3JlY2VpdmVkRmVlBAhhY3Rpb25zMgkBEHVzZXIyc2hvcEFjdGlvbnMEBQ11c2RCcDJXaFNhbGRvCAUBaQhwYXltZW50cwUNc2hvcExhbmRPd25lcgUIc3BlbnRGZWUECG5ld0JwU3RyCQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQC5CQIFCm5ld1VzZXJSZXMCAV8JAMwIAgkAuQkCBQpuZXdVc2VyTWF0AgFfCQDMCAIJALoJAgULbmV3VXNlclByb2QCAV8FA25pbAIBOgQGYnBTYXZlCQEIYXNTdHJpbmcBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQmFja3BhY2sJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgUIbmV3QnBTdHIFA25pbAUDbmlsBA9kdWNrU3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag91cGRhdGVEdWNrU3RhdHMJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgkAawMFBnhwU2hvcAUIeHBBbW91bnQFBU1VTFQ4BQNuaWwFA25pbAkAlAoCCQDNCAIJAM4IAgUIYWN0aW9uczEFCGFjdGlvbnMyCQEMSW50ZWdlckVudHJ5AgUPZGVsaXZlcnlGdW5kS2V5CQBkAgUJZnVuZFRvdGFsBQtkZWxpdmVyeUZlZQkAlwoFBQxwcm9sb2dSZXN1bHQFCnNob3BXaFNhdmUFBmJwU2F2ZQUPZHVja1N0YXRzUmVzdWx0BQ5hY2NTdGF0c1Jlc3VsdAFpARthY2NlcHRTaG9wT3JkZXJMYW5kRGVsaXZlcnkDCG9yZGVyU3RyD3Nob3BMYW5kQXNzZXRJZA1teUxhbmRBc3NldElkAwkBASEBBRFLU19BTExPV19ERUxJVkVSWQkAAgECH0RlbGl2ZXJ5IGZlYXR1cmUgaXMgdHVybmVkIG9mZiEEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwAEBmNhbGxlcggFAWkMb3JpZ2luQ2FsbGVyBApjYWxsZXJBZGRyCQClCAEFBmNhbGxlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQ1teUxhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUNbXlMYW5kQXNzZXRJZAkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUNbXlMYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUKY2FsbGVyQWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQCd2gJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AhRnZXRXYXJlaG91c2VSRUFET05MWQkAzAgCBQ1teUxhbmRBc3NldElkBQNuaWwFA25pbAQJY3VycmVudFdoCQC8CQIFAndoAgE6BAdyZXNMaXN0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQHbWF0TGlzdAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhNYXQCAV8ECHByb2RMaXN0AwkAAAIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAAUDbmlsCQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAV8EDSR0MDU3MzA0NTc1MzYJARVhY2NlcHRTaG9wT3JkZXJDb21tb24GBQ9zaG9wTGFuZEFzc2V0SWQFCmNhbGxlckFkZHIFCG9yZGVyU3RyBQdyZXNMaXN0BQdtYXRMaXN0BQhwcm9kTGlzdAQKc2hvcEFjdGlvbggFDSR0MDU3MzA0NTc1MzYCXzEECm5ld1VzZXJSZXMIBQ0kdDA1NzMwNDU3NTM2Al8yBApuZXdVc2VyTWF0CAUNJHQwNTczMDQ1NzUzNgJfMwQLbmV3VXNlclByb2QIBQ0kdDA1NzMwNDU3NTM2Al80BA11c2RXaDJCcFNhbGRvCAUNJHQwNTczMDQ1NzUzNgJfNQQNdXNkQnAyV2hTYWxkbwgFDSR0MDU3MzA0NTc1MzYCXzYECHhwQW1vdW50CAUNJHQwNTczMDQ1NzUzNgJfNwQNc2hvcExhbmRPd25lcggFDSR0MDU3MzA0NTc1MzYCXzgECnNob3BXaFNhdmUIBQ0kdDA1NzMwNDU3NTM2Al85BA5hY2NTdGF0c1Jlc3VsdAgFDSR0MDU3MzA0NTc1MzYDXzEwBA9kZWxpdmVyeUZlZVBhcnQJAGsDCQBkAgUNdXNkQnAyV2hTYWxkbwUNdXNkV2gyQnBTYWxkbwUMREVMSVZFUllfRkVFBQVNVUxUNgQLZGVsaXZlcnlGZWUDCQBmAgUVTUlOX1VTRFRfRkVFX0RFTElWRVJZBQ9kZWxpdmVyeUZlZVBhcnQFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQUPZGVsaXZlcnlGZWVQYXJ0BAhzcGVudEZlZQkAawMFC2RlbGl2ZXJ5RmVlBQ11c2RCcDJXaFNhbGRvCQBkAgUNdXNkQnAyV2hTYWxkbwUNdXNkV2gyQnBTYWxkbwQLcmVjZWl2ZWRGZWUJAGUCBQtkZWxpdmVyeUZlZQUIc3BlbnRGZWUECWZ1bmRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ9kZWxpdmVyeUZ1bmRLZXkAAAQIYWN0aW9uczEJAMwIAgUKc2hvcEFjdGlvbgkBEHNob3AydXNlckFjdGlvbnMDBQ11c2RXaDJCcFNhbGRvBQpjYWxsZXJBZGRyBQtyZWNlaXZlZEZlZQQIYWN0aW9uczIJARB1c2VyMnNob3BBY3Rpb25zBAUNdXNkQnAyV2hTYWxkbwgFAWkIcGF5bWVudHMFDXNob3BMYW5kT3duZXIFCHNwZW50RmVlBAV3aFN0cgkAugkCCQDMCAIJAJEDAgUJY3VycmVudFdoBQt3aElkeExldmVscwkAzAgCCQC5CQIFCm5ld1VzZXJSZXMCAV8JAMwIAgkAuQkCBQpuZXdVc2VyTWF0AgFfCQDMCAIJALkJAgULbmV3VXNlclByb2QCAV8JAMwIAgkAkQMCBQljdXJyZW50V2gFCXdoSWR4TE9GVAUDbmlsAgE6BAZ3aFNhdmUJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag1zYXZlV2FyZWhvdXNlCQDMCAIFBXdoU3RyCQDMCAIFDW15TGFuZEFzc2V0SWQFA25pbAUDbmlsBAtzdGF0c1Jlc3VsdAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUFjY1N0YXRzCQDMCAIFCmNhbGxlckFkZHIJAMwIAgkAawMFBnhwU2hvcAUIeHBBbW91bnQFBU1VTFQ4BQNuaWwFA25pbAkAlAoCCQDNCAIJAM4IAgUIYWN0aW9uczEFCGFjdGlvbnMyCQEMSW50ZWdlckVudHJ5AgUPZGVsaXZlcnlGdW5kS2V5CQBkAgUJZnVuZFRvdGFsBQtkZWxpdmVyeUZlZQkAlwoFBQxwcm9sb2dSZXN1bHQFCnNob3BXaFNhdmUFBndoU2F2ZQULc3RhdHNSZXN1bHQFDmFjY1N0YXRzUmVzdWx0AWkBEHNlbGxQcm9kdWN0c1RvRVMBB2Ftb3VudHMEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhJObyBwYXltZW50cyBuZWVkZWQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfAwkBAiE9AgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBQQkAAgEJAKwCAgItRHVjayBsb2NhdGlvbiB0eXBlIHNob3VsZCBiZSBBaXJwb3J0LCBidXQgaXMgCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQECHByb2RMaXN0AwkAAAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAIABQNuaWwJALwJAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgFfBAVlc0tleQkBDmtleUVzV2FyZWhvdXNlAAQIZXhpc3RTdHIJAKIIAQUFZXNLZXkEDGV4aXN0QW1vdW50cwMJAQlpc0RlZmluZWQBBQhleGlzdFN0cgkAvAkCCQEFdmFsdWUBBQhleGlzdFN0cgIBXwUDbmlsCgEIbW92ZVByb2QCA2FjYwlyZWNpcGVTdHIEAWoIBQNhY2MCXzEECHF1YW50aXR5AwkAZgIJAJADAQUHYW1vdW50cwUBagkAkQMCBQdhbW91bnRzBQFqAAADCQBmAgAABQhxdWFudGl0eQkAAgECG1F1YW50aXR5IGNhbm5vdCBiZSBuZWdhdGl2ZQQGcmVjaXBlCQC1CQIFCXJlY2lwZVN0cgIBXwMJAQIhPQIJAJADAQUGcmVjaXBlBQpSRUNJUEVTSVpFCQACAQkArAICAhdGYXRhbDogdW5rbm93biByZWNpcGU6IAUJcmVjaXBlU3RyBAltYXhBbW91bnQJAGgCBQ1FU01BWFBBQ0tBR0VTBQ5QUk9EVUNUUEtHU0laRQQLZXhpc3RBbW91bnQDCQBmAgkAkAMBBQxleGlzdEFtb3VudHMFAWoJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxleGlzdEFtb3VudHMFAWoAAAQGY2FuQnV5CQBlAgUJbWF4QW1vdW50BQtleGlzdEFtb3VudAMJAGYCBQhxdWFudGl0eQUGY2FuQnV5CQACAQkArAICCQCsAgIJAKwCAgIXV2FyZWhvdXNlIGNhbiBidXkgb25seSAJAKQDAQUGY2FuQnV5AgQgb2YgCQCRAwIFCXByb2RUeXBlcwUBagQIdG90YWxNYXQJARJnZXRSZWNpcGVNYXRlcmlhbHMBBQZyZWNpcGUECXVuaXRQcmljZQkAawMJAGgCBQh0b3RhbE1hdAUJRVNCVVlDT0VGBRBSRVNPVVJDRVBSSUNFTUlOCQBoAgUFTVVMVDgFDlBST0RVQ1RQS0dTSVpFBAxicFByb2RBbW91bnQDCQBmAgkAkAMBBQhwcm9kTGlzdAUBagkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCHByb2RMaXN0BQFqAAADCQBmAgUIcXVhbnRpdHkFDGJwUHJvZEFtb3VudAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQCkAwEFDGJwUHJvZEFtb3VudAIEIG9mIAkAkQMCBQlwcm9kVHlwZXMFAWoJAJcKBQkAZAIFAWoAAQkAZAIIBQNhY2MCXzIJAGgCBQl1bml0UHJpY2UFCHF1YW50aXR5CQDNCAIIBQNhY2MCXzMJAKQDAQkAZQIFDGJwUHJvZEFtb3VudAUIcXVhbnRpdHkJAM0IAggFA2FjYwJfNAkApAMBCQBkAgULZXhpc3RBbW91bnQFCHF1YW50aXR5CQBkAggFA2FjYwJfNQkAaAIFCHRvdGFsTWF0BQhxdWFudGl0eQQGbWVyZ2VkCgACJGwFEHByb2R1Y3Rpb25NYXRyaXgKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCXCgUAAAAABQNuaWwFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhtb3ZlUHJvZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyBAhuZXdCcFN0cgkAugkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgkAugkCCAUGbWVyZ2VkAl8zAgFfBQNuaWwCAToEBmJwU2F2ZQkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUJhY2twYWNrCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFCG5ld0JwU3RyBQNuaWwFA25pbAQLc3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag91cGRhdGVEdWNrU3RhdHMJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgkAawMFCnhwU2VsbFRvRXMIBQZtZXJnZWQCXzUJAGgCBQVNVUxUOAAKBQNuaWwFA25pbAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWVzS2V5CQC6CQIIBQZtZXJnZWQCXzQCAV8JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCAUGbWVyZ2VkAl8yBQt1c2R0QXNzZXRJZAUDbmlsCQCVCgMFBmJwU2F2ZQUMcHJvbG9nUmVzdWx0BQtzdGF0c1Jlc3VsdAFpAQ91cGRhdGVFc1N0b3JhZ2UBCm5ld1N0b3JhZ2UDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDmtleUVzV2FyZWhvdXNlAAUKbmV3U3RvcmFnZQUDbmlsBQpuZXdTdG9yYWdlAWkBFHVwZGF0ZURlbGl2ZXJ5TG9ja2VkAQluZXdBbW91bnQDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFEWRlbGl2ZXJ5TG9ja2VkS2V5BQluZXdBbW91bnQFA25pbAUJbmV3QW1vdW50AWkBEnNlbmREZWxpdmVyeVJld2FyZAEEYWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQIRUGVybWlzc2lvbiBkZW5pZWQECWZ1bmRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ9kZWxpdmVyeUZ1bmRLZXkAAAQLbG9ja2VkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQURZGVsaXZlcnlMb2NrZWRLZXkAAAkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGFkZHIFFU1JTl9VU0RUX0ZFRV9ERUxJVkVSWQULdXNkdEFzc2V0SWQJAMwIAgkBDEludGVnZXJFbnRyeQIFD2RlbGl2ZXJ5RnVuZEtleQkAZQIFCWZ1bmRUb3RhbAUVTUlOX1VTRFRfRkVFX0RFTElWRVJZCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRFkZWxpdmVyeUxvY2tlZEtleQkAZQIFC2xvY2tlZFRvdGFsBRVNSU5fVVNEVF9GRUVfREVMSVZFUlkFA25pbAUVTUlOX1VTRFRfRkVFX0RFTElWRVJZACq43xA=",
    "height": 2778415,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DvVvyG9sqjPTU9da2MW29vLvDsT3PB8anjZd2Xqp6TnB
Next: CFCvr7Be2F22wqM8hoaisFpj9fxdubE8Kyu98mxqVrAB

Diff: 
Old
New
Differences
104
104
 
func getRecipeMaterials (recipe) = (parseIntValue(recipe[rIdxCoeff]) * COEFF2MAT)
105
105
 
106
106
 
107
-
let KS_ALLOW_DELIVERY = true
107
+
let KS_ALLOW_DELIVERY = false
108
108
 
109
109
 
let chain = take(drop(this.bytes, 1), 1)
110
110
 
1089
1089
 
1090
1090
 
1091
1091
 
@Callable(i)
1092
-
func exchangeResourcesDuckDelivery (amounts) = {
1093
-
    let prologResult = prolog()
1094
-
    let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1095
-
    if ((size(i.payments) != 1))
1096
-
        then throw("exactly 1 payment must be attached")
1097
-
        else {
1098
-
            let pmt = i.payments[0]
1099
-
            let amt = pmt.amount
1100
-
            if (if (!(isDefined(pmt.assetId)))
1101
-
                then true
1102
-
                else (value(pmt.assetId) != usdtAssetId))
1103
-
                then throw("USDT payments only!")
1104
-
                else {
1105
-
                    let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
1106
-
                    let resList = split(currentPack[bpIdxRes], "_")
1107
-
                    let matList = split(currentPack[bpIdxMat], "_")
1108
-
                    let $t04104741153 = exchangeResourcesCommon(resList, matList, amounts)
1109
-
                    let newRes = $t04104741153._1
1110
-
                    let newMat = $t04104741153._2
1111
-
                    let usdtSpent = $t04104741153._3
1112
-
                    let totalAmountConverted = $t04104741153._4
1113
-
                    let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1114
-
                    let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1115
-
                        then MIN_USDT_FEE_DELIVERY15
1116
-
                        else feePart
1117
-
                    let usdtSpentWithFee = (usdtSpent + fee)
1118
-
                    if ((usdtSpentWithFee > amt))
1119
-
                        then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1120
-
                        else {
1121
-
                            let newPack = makeString([currentPack[bpIdxLevel], makeString(newRes, "_"), makeString(newMat, "_"), currentPack[bpIdxProd]], ":")
1122
-
                            let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
1123
-
                            let rest = if (((amt - usdtSpentWithFee) > 0))
1124
-
                                then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1125
-
                                else nil
1126
-
                            let activitiesAmount = (usdtSpent / 100)
1127
-
                            let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1128
-
                            let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1129
-
                            $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(backpackResult, prologResult, statsResult))
1130
-
                            }
1131
-
                    }
1132
-
            }
1133
-
    }
1092
+
func exchangeResourcesDuckDelivery (amounts) = if (!(KS_ALLOW_DELIVERY))
1093
+
    then throw("Delivery feature is turned off!")
1094
+
    else {
1095
+
        let prologResult = prolog()
1096
+
        let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1097
+
        if ((size(i.payments) != 1))
1098
+
            then throw("exactly 1 payment must be attached")
1099
+
            else {
1100
+
                let pmt = i.payments[0]
1101
+
                let amt = pmt.amount
1102
+
                if (if (!(isDefined(pmt.assetId)))
1103
+
                    then true
1104
+
                    else (value(pmt.assetId) != usdtAssetId))
1105
+
                    then throw("USDT payments only!")
1106
+
                    else {
1107
+
                        let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
1108
+
                        let resList = split(currentPack[bpIdxRes], "_")
1109
+
                        let matList = split(currentPack[bpIdxMat], "_")
1110
+
                        let $t04112441230 = exchangeResourcesCommon(resList, matList, amounts)
1111
+
                        let newRes = $t04112441230._1
1112
+
                        let newMat = $t04112441230._2
1113
+
                        let usdtSpent = $t04112441230._3
1114
+
                        let totalAmountConverted = $t04112441230._4
1115
+
                        let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1116
+
                        let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1117
+
                            then MIN_USDT_FEE_DELIVERY15
1118
+
                            else feePart
1119
+
                        let usdtSpentWithFee = (usdtSpent + fee)
1120
+
                        if ((usdtSpentWithFee > amt))
1121
+
                            then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1122
+
                            else {
1123
+
                                let newPack = makeString([currentPack[bpIdxLevel], makeString(newRes, "_"), makeString(newMat, "_"), currentPack[bpIdxProd]], ":")
1124
+
                                let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
1125
+
                                let rest = if (((amt - usdtSpentWithFee) > 0))
1126
+
                                    then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1127
+
                                    else nil
1128
+
                                let activitiesAmount = (usdtSpent / 100)
1129
+
                                let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1130
+
                                let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1131
+
                                $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(backpackResult, prologResult, statsResult))
1132
+
                                }
1133
+
                        }
1134
+
                }
1135
+
        }
1134
1136
 
1135
1137
 
1136
1138
 
1137
1139
 
@Callable(i)
1138
-
func exchangeResourcesLandDelivery (amounts,landAssetId) = {
1139
-
    let prologResult = prolog()
1140
-
    if ((size(i.payments) != 1))
1141
-
        then throw("exactly 1 payment must be attached")
1142
-
        else {
1143
-
            let pmt = i.payments[0]
1144
-
            let amt = pmt.amount
1145
-
            if (if (!(isDefined(pmt.assetId)))
1146
-
                then true
1147
-
                else (value(pmt.assetId) != usdtAssetId))
1148
-
                then throw("USDT payments only!")
1149
-
                else {
1150
-
                    let user = i.caller
1151
-
                    let addr = toString(user)
1152
-
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
1153
-
                    if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
1154
-
                        then throw((("NFT " + asset.name) + " is not staked"))
1155
-
                        else {
1156
-
                            let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1157
-
                            if ((owner != addr))
1158
-
                                then throw((LANDPREFIX + " is not yours"))
1159
-
                                else {
1160
-
                                    let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
1161
-
                                    let currentWh = split_4C(wh, ":")
1162
-
                                    let resList = split(currentWh[whIdxRes], "_")
1163
-
                                    let matList = split(currentWh[whIdxMat], "_")
1164
-
                                    let $t04337643482 = exchangeResourcesCommon(resList, matList, amounts)
1165
-
                                    let newRes = $t04337643482._1
1166
-
                                    let newMat = $t04337643482._2
1167
-
                                    let usdtSpent = $t04337643482._3
1168
-
                                    let totalAmountConverted = $t04337643482._4
1169
-
                                    let whStr = makeString_2C([currentWh[whIdxLevels], makeString(newRes, "_"), makeString(newMat, "_"), currentWh[whIdxProd], currentWh[whIdxLOFT]], ":")
1170
-
                                    let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil))
1171
-
                                    let statsResult = asInt(invoke(stakingContract, "updateAccStats", [addr, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1172
-
                                    let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1173
-
                                    let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1174
-
                                        then MIN_USDT_FEE_DELIVERY15
1175
-
                                        else feePart
1176
-
                                    let usdtSpentWithFee = (usdtSpent + fee)
1177
-
                                    if ((usdtSpentWithFee > amt))
1178
-
                                        then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1179
-
                                        else {
1180
-
                                            let rest = if (((amt - usdtSpentWithFee) > 0))
1181
-
                                                then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1182
-
                                                else nil
1183
-
                                            let activitiesAmount = (usdtSpent / 100)
1184
-
                                            let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1185
-
                                            $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(whSave, prologResult, statsResult))
1186
-
                                            }
1187
-
                                    }
1188
-
                            }
1189
-
                    }
1190
-
            }
1191
-
    }
1140
+
func exchangeResourcesLandDelivery (amounts,landAssetId) = if (!(KS_ALLOW_DELIVERY))
1141
+
    then throw("Delivery feature is turned off!")
1142
+
    else {
1143
+
        let prologResult = prolog()
1144
+
        if ((size(i.payments) != 1))
1145
+
            then throw("exactly 1 payment must be attached")
1146
+
            else {
1147
+
                let pmt = i.payments[0]
1148
+
                let amt = pmt.amount
1149
+
                if (if (!(isDefined(pmt.assetId)))
1150
+
                    then true
1151
+
                    else (value(pmt.assetId) != usdtAssetId))
1152
+
                    then throw("USDT payments only!")
1153
+
                    else {
1154
+
                        let user = i.caller
1155
+
                        let addr = toString(user)
1156
+
                        let asset = value(assetInfo(fromBase58String(landAssetId)))
1157
+
                        if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
1158
+
                            then throw((("NFT " + asset.name) + " is not staked"))
1159
+
                            else {
1160
+
                                let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1161
+
                                if ((owner != addr))
1162
+
                                    then throw((LANDPREFIX + " is not yours"))
1163
+
                                    else {
1164
+
                                        let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
1165
+
                                        let currentWh = split_4C(wh, ":")
1166
+
                                        let resList = split(currentWh[whIdxRes], "_")
1167
+
                                        let matList = split(currentWh[whIdxMat], "_")
1168
+
                                        let $t04353043636 = exchangeResourcesCommon(resList, matList, amounts)
1169
+
                                        let newRes = $t04353043636._1
1170
+
                                        let newMat = $t04353043636._2
1171
+
                                        let usdtSpent = $t04353043636._3
1172
+
                                        let totalAmountConverted = $t04353043636._4
1173
+
                                        let whStr = makeString_2C([currentWh[whIdxLevels], makeString(newRes, "_"), makeString(newMat, "_"), currentWh[whIdxProd], currentWh[whIdxLOFT]], ":")
1174
+
                                        let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil))
1175
+
                                        let statsResult = asInt(invoke(stakingContract, "updateAccStats", [addr, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1176
+
                                        let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1177
+
                                        let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1178
+
                                            then MIN_USDT_FEE_DELIVERY15
1179
+
                                            else feePart
1180
+
                                        let usdtSpentWithFee = (usdtSpent + fee)
1181
+
                                        if ((usdtSpentWithFee > amt))
1182
+
                                            then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1183
+
                                            else {
1184
+
                                                let rest = if (((amt - usdtSpentWithFee) > 0))
1185
+
                                                    then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1186
+
                                                    else nil
1187
+
                                                let activitiesAmount = (usdtSpent / 100)
1188
+
                                                let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1189
+
                                                $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(whSave, prologResult, statsResult))
1190
+
                                                }
1191
+
                                        }
1192
+
                                }
1193
+
                        }
1194
+
                }
1195
+
        }
1192
1196
 
1193
1197
 
1194
1198
 
1379
1383
 
                let bpProdList = if ((currentPack[bpIdxProd] == ""))
1380
1384
 
                    then nil
1381
1385
 
                    else split_4C(currentPack[bpIdxProd], "_")
1382
-
                let $t05299453234 = acceptShopOrderCommon(shopLandAssetId, callerAddr, bpOrderStr, bpResList, bpMatList, bpProdList)
1383
-
                let shopAction = $t05299453234._1
1384
-
                let newUserRes = $t05299453234._2
1385
-
                let newUserMat = $t05299453234._3
1386
-
                let newUserProd = $t05299453234._4
1387
-
                let usdWh2BpSaldo = $t05299453234._5
1388
-
                let usdBp2WhSaldo = $t05299453234._6
1389
-
                let xpAmount = $t05299453234._7
1390
-
                let shopLandOwner = $t05299453234._8
1391
-
                let shopWhSave = $t05299453234._9
1392
-
                let accStatsResult = $t05299453234._10
1386
+
                let $t05314853388 = acceptShopOrderCommon(shopLandAssetId, callerAddr, bpOrderStr, bpResList, bpMatList, bpProdList)
1387
+
                let shopAction = $t05314853388._1
1388
+
                let newUserRes = $t05314853388._2
1389
+
                let newUserMat = $t05314853388._3
1390
+
                let newUserProd = $t05314853388._4
1391
+
                let usdWh2BpSaldo = $t05314853388._5
1392
+
                let usdBp2WhSaldo = $t05314853388._6
1393
+
                let xpAmount = $t05314853388._7
1394
+
                let shopLandOwner = $t05314853388._8
1395
+
                let shopWhSave = $t05314853388._9
1396
+
                let accStatsResult = $t05314853388._10
1393
1397
 
                let actions1 = [shopAction, shop2userActions(usdWh2BpSaldo, callerAddr, 0)]
1394
1398
 
                let actions2 = user2shopActions(usdBp2WhSaldo, i.payments, shopLandOwner, 0)
1395
1399
 
                let newBpStr = makeString_2C([currentPack[bpIdxLevel], makeString(newUserRes, "_"), makeString(newUserMat, "_"), makeString_2C(newUserProd, "_")], ":")
1416
1420
 
        let bpProdList = if ((currentPack[bpIdxProd] == ""))
1417
1421
 
            then nil
1418
1422
 
            else split_4C(currentPack[bpIdxProd], "_")
1419
-
        let $t05467354911 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, bpResList, bpMatList, bpProdList)
1420
-
        let shopAction = $t05467354911._1
1421
-
        let newUserRes = $t05467354911._2
1422
-
        let newUserMat = $t05467354911._3
1423
-
        let newUserProd = $t05467354911._4
1424
-
        let usdWh2BpSaldo = $t05467354911._5
1425
-
        let usdBp2WhSaldo = $t05467354911._6
1426
-
        let xpAmount = $t05467354911._7
1427
-
        let shopLandOwner = $t05467354911._8
1428
-
        let shopWhSave = $t05467354911._9
1429
-
        let accStatsResult = $t05467354911._10
1423
+
        let $t05482755065 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, bpResList, bpMatList, bpProdList)
1424
+
        let shopAction = $t05482755065._1
1425
+
        let newUserRes = $t05482755065._2
1426
+
        let newUserMat = $t05482755065._3
1427
+
        let newUserProd = $t05482755065._4
1428
+
        let usdWh2BpSaldo = $t05482755065._5
1429
+
        let usdBp2WhSaldo = $t05482755065._6
1430
+
        let xpAmount = $t05482755065._7
1431
+
        let shopLandOwner = $t05482755065._8
1432
+
        let shopWhSave = $t05482755065._9
1433
+
        let accStatsResult = $t05482755065._10
1430
1434
 
        let deliveryFeePart = fraction((usdBp2WhSaldo + usdWh2BpSaldo), DELIVERY_FEE, MULT6)
1431
1435
 
        let deliveryFee = if ((MIN_USDT_FEE_DELIVERY > deliveryFeePart))
1432
1436
 
            then MIN_USDT_FEE_DELIVERY
1466
1470
 
                        let prodList = if ((currentWh[whIdxProd] == ""))
1467
1471
 
                            then nil
1468
1472
 
                            else split(currentWh[whIdxProd], "_")
1469
-
                        let $t05715057382 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, resList, matList, prodList)
1470
-
                        let shopAction = $t05715057382._1
1471
-
                        let newUserRes = $t05715057382._2
1472
-
                        let newUserMat = $t05715057382._3
1473
-
                        let newUserProd = $t05715057382._4
1474
-
                        let usdWh2BpSaldo = $t05715057382._5
1475
-
                        let usdBp2WhSaldo = $t05715057382._6
1476
-
                        let xpAmount = $t05715057382._7
1477
-
                        let shopLandOwner = $t05715057382._8
1478
-
                        let shopWhSave = $t05715057382._9
1479
-
                        let accStatsResult = $t05715057382._10
1473
+
                        let $t05730457536 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, resList, matList, prodList)
1474
+
                        let shopAction = $t05730457536._1
1475
+
                        let newUserRes = $t05730457536._2
1476
+
                        let newUserMat = $t05730457536._3
1477
+
                        let newUserProd = $t05730457536._4
1478
+
                        let usdWh2BpSaldo = $t05730457536._5
1479
+
                        let usdBp2WhSaldo = $t05730457536._6
1480
+
                        let xpAmount = $t05730457536._7
1481
+
                        let shopLandOwner = $t05730457536._8
1482
+
                        let shopWhSave = $t05730457536._9
1483
+
                        let accStatsResult = $t05730457536._10
1480
1484
 
                        let deliveryFeePart = fraction((usdBp2WhSaldo + usdWh2BpSaldo), DELIVERY_FEE, MULT6)
1481
1485
 
                        let deliveryFee = if ((MIN_USDT_FEE_DELIVERY > deliveryFeePart))
1482
1486
 
                            then MIN_USDT_FEE_DELIVERY
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let xpTrade = 10000
5
5
 
6
6
 
let xpCraft = 10000
7
7
 
8
8
 
let xpSellToEs = 10000
9
9
 
10
10
 
let xpShop = 10000
11
11
 
12
12
 
let LANDPREFIX = "LAND"
13
13
 
14
14
 
let NUMRES = 6
15
15
 
16
16
 
let DEFAULTLOCATION = "Africa_F_Africa"
17
17
 
18
18
 
let RESOURCEPRICEMIN = 39637
19
19
 
20
20
 
let ESMAXPACKAGES = 10
21
21
 
22
22
 
let ESBUYCOEF = 4
23
23
 
24
24
 
let MIN_USDT_FEE_DELIVERY = 50000
25
25
 
26
26
 
let MIN_USDT_FEE_DELIVERY15 = 75000
27
27
 
28
28
 
let resTypes = ["Oil", "Ore", "Wood", "Sand", "Clay", "Organic"]
29
29
 
30
30
 
let matTypes = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
31
31
 
32
32
 
let prodTypes = ["First Aid Kit L1", "First Aid Kit L2", "First Aid Kit L3", "Backpack L1", "Backpack L2", "Backpack L3", "Food Ration L1", "Food Ration L2", "Food Ration L3", "Jet Pack L1", "Jet Pack L2", "Jet Pack L3", "Shield L1", "Shield L2", "Shield L3", "Mine L1", "Mine L2", "Mine L3", "Trap L1", "Trap L2", "Trap L3"]
33
33
 
34
34
 
let continents = ["Americas", "Europe", "Asia", "Africa", "Oceania"]
35
35
 
36
36
 
let COEFF2MAT = 10000000
37
37
 
38
38
 
let productionMatrix = ["8_8_8_17_17_42_12_0_30_0,0,0,0,0,0,0_", "8_8_8_17_17_42_24_0_60_0,0,5,2,0,0,0_", "8_8_8_17_17_42_36_0_120_0,0,10,4,0,0,0_", "8_19_19_8_27_19_26_1_20_0,0,0,0,0,0,0_001", "8_19_19_8_27_19_52_1_40_0,0,0,0,0,0,0_001", "8_19_19_8_27_19_78_1_80_0,0,0,0,0,0,0_001", "8_8_8_8_8_60_13_2_2_0,0,0,0,0,0,0_011", "8_8_8_8_8_60_26_2_4_0,0,0,0,0,0,0_011", "8_8_8_8_8_60_39_2_8_0,0,0,0,0,0,0_011", "30_30_3_17_17_3_30_3_30_0,0,0,0,0,0,0_111", "30_30_3_17_17_3_60_3_50_0,0,0,0,0,0,0_111", "30_30_3_17_17_3_90_3_70_0,0,0,0,0,0,0_111", "18_18_10_18_18_18_11_4_10_0,0,0,0,0,0,0_201", "18_18_10_18_18_18_22_4_20_0,0,0,0,0,0,0_201", "18_18_10_18_18_18_33_4_30_0,0,0,0,0,0,0_201", "4_13_22_4_35_22_23_0_50,1,0_0,0,0,0,0,0,0_", "4_13_22_4_35_22_46_0_50,1,1_0,2,5,0,0,0,0_", "4_13_22_4_35_22_69_0_50,2,1_0,5,10,0,0,0,0_", "5_25_40_5_10_15_20_1_30,1,1_0,0,0,0,0,0,0_", "5_25_40_5_10_15_40_1_30,1,2_2,1,3,0,0,0,0_", "5_25_40_5_10_15_60_1_30,1,3_5,2,8,0,0,0,0_"]
39
39
 
40
40
 
let rIdxCoeff = 6
41
41
 
42
42
 
let rIdxContinent = 7
43
43
 
44
44
 
let RECIPESIZE = 11
45
45
 
46
46
 
let PRODUCTPKGSIZE = 10
47
47
 
48
48
 
let whIdxLevels = 0
49
49
 
50
50
 
let whIdxRes = 1
51
51
 
52
52
 
let whIdxMat = 2
53
53
 
54
54
 
let whIdxProd = 3
55
55
 
56
56
 
let whIdxLOFT = 4
57
57
 
58
58
 
let volLocked = 0
59
59
 
60
60
 
let volTotal = 3
61
61
 
62
62
 
let bpIdxLevel = 0
63
63
 
64
64
 
let bpIdxRes = 1
65
65
 
66
66
 
let bpIdxMat = 2
67
67
 
68
68
 
let bpIdxProd = 3
69
69
 
70
70
 
let locIdxContinent = 0
71
71
 
72
72
 
let locIdxType = 1
73
73
 
74
74
 
let locIdxId = 2
75
75
 
76
76
 
func keyLandAssetIdToOwner (assetId) = ("no_" + assetId)
77
77
 
78
78
 
79
79
 
func keyStakedTimeByAssetId (assetId) = ("st_" + assetId)
80
80
 
81
81
 
82
82
 
func keyAddressRefBy (addr) = ("accRefBy_" + addr)
83
83
 
84
84
 
85
85
 
func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
86
86
 
87
87
 
88
88
 
func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
89
89
 
90
90
 
91
91
 
func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
92
92
 
93
93
 
94
94
 
func keyOrderByLand (landAssetId) = ("landOrder_" + landAssetId)
95
95
 
96
96
 
97
97
 
func keyEsWarehouse () = "emergencyWarehouseProducts"
98
98
 
99
99
 
100
100
 
let deliveryFundKey = "deliveryFund"
101
101
 
102
102
 
let deliveryLockedKey = "deliveryLocked"
103
103
 
104
104
 
func getRecipeMaterials (recipe) = (parseIntValue(recipe[rIdxCoeff]) * COEFF2MAT)
105
105
 
106
106
 
107
-
let KS_ALLOW_DELIVERY = true
107
+
let KS_ALLOW_DELIVERY = false
108
108
 
109
109
 
let chain = take(drop(this.bytes, 1), 1)
110
110
 
111
111
 
let usdtAssetId = match chain {
112
112
 
    case _ => 
113
113
 
        if ((base58'2W' == $match0))
114
114
 
            then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
115
115
 
            else if ((base58'2T' == $match0))
116
116
 
                then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
117
117
 
                else throw("Unknown chain")
118
118
 
}
119
119
 
120
120
 
let defaultRestAddressStr = match chain {
121
121
 
    case _ => 
122
122
 
        if ((base58'2W' == $match0))
123
123
 
            then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
124
124
 
            else if ((base58'2T' == $match0))
125
125
 
                then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
126
126
 
                else throw("Unknown chain")
127
127
 
}
128
128
 
129
129
 
let SEP = "__"
130
130
 
131
131
 
let MULT5 = 100000
132
132
 
133
133
 
let MULT6 = 1000000
134
134
 
135
135
 
let MULT8 = 100000000
136
136
 
137
137
 
let MULT10 = 10000000000
138
138
 
139
139
 
let MINSHOPPAYMENT = 100000
140
140
 
141
141
 
let ITER6 = [0, 1, 2, 3, 4, 5]
142
142
 
143
143
 
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
144
144
 
145
145
 
146
146
 
let IdxCfgStakingDapp = 1
147
147
 
148
148
 
let IdxCfgInvestFundDapp = 6
149
149
 
150
150
 
let IdxCfgAcresDapp = 8
151
151
 
152
152
 
func keyRestCfg () = "%s__restConfig"
153
153
 
154
154
 
155
155
 
func keyRestAddress () = "%s__restAddr"
156
156
 
157
157
 
158
158
 
func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
159
159
 
160
160
 
161
161
 
func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
162
162
 
163
163
 
164
164
 
let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
165
165
 
166
166
 
let restCfg = readRestCfgOrFail(restContract)
167
167
 
168
168
 
let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
169
169
 
170
170
 
let investFundContract = getContractAddressOrFail(restCfg, IdxCfgInvestFundDapp)
171
171
 
172
172
 
let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
173
173
 
174
174
 
func asString (v) = match v {
175
175
 
    case s: String => 
176
176
 
        s
177
177
 
    case _ => 
178
178
 
        throw("fail to cast into String")
179
179
 
}
180
180
 
181
181
 
182
182
 
func asInt (v) = match v {
183
183
 
    case n: Int => 
184
184
 
        n
185
185
 
    case _ => 
186
186
 
        throw("fail to cast into Int")
187
187
 
}
188
188
 
189
189
 
190
190
 
func keyBlocked () = "contractsBlocked"
191
191
 
192
192
 
193
193
 
func fixedPoint (val,decimals) = {
194
194
 
    let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
195
195
 
    let lowPart = toString((val % tenPow))
196
196
 
    let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
197
197
 
    (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
198
198
 
    }
199
199
 
200
200
 
201
201
 
let FACTORYMAXWAREHOUSE = 10000000000
202
202
 
203
203
 
let SELLMULTIPLIER = 200
204
204
 
205
205
 
let BUYMULTIPLIER = 300
206
206
 
207
207
 
let AUCTIONFEE = 10000
208
208
 
209
209
 
let DELIVERY_FEE = 10000
210
210
 
211
211
 
let DELIVERY_FEE15 = 15000
212
212
 
213
213
 
func keyFactoryWarehouseByIdAndType (factoryId,resType) = ((("factoryWhByContinentAndRes_" + factoryId) + "_") + toString(resType))
214
214
 
215
215
 
216
216
 
let ordIdxRes = 0
217
217
 
218
218
 
let ordIdxMat = 1
219
219
 
220
220
 
let ordIdxProd = 2
221
221
 
222
222
 
func getOrder (ordKey) = {
223
223
 
    let p = split(valueOrElse(getString(ordKey), "0@0_0@0_0@0_0@0_0@0_0@0:0@0_0@0_0@0_0@0_0@0_0@0:"), ":")
224
224
 
[if ((size(split(p[ordIdxRes], "_")) == NUMRES))
225
225
 
        then p[ordIdxRes]
226
226
 
        else "0@0_0@0_0@0_0@0_0@0_0@0", if ((size(split(p[ordIdxMat], "_")) == NUMRES))
227
227
 
        then p[ordIdxMat]
228
228
 
        else "0@0_0@0_0@0_0@0_0@0_0@0", p[ordIdxProd]]
229
229
 
    }
230
230
 
231
231
 
232
232
 
func toVolume (amount,pkgSize,isProduct) = if (isProduct)
233
233
 
    then {
234
234
 
        let pkgs = if ((amount >= 0))
235
235
 
            then (((amount + pkgSize) - 1) / pkgSize)
236
236
 
            else -((((-(amount) + pkgSize) - 1) / pkgSize))
237
237
 
        (pkgs * MULT8)
238
238
 
        }
239
239
 
    else amount
240
240
 
241
241
 
242
242
 
func sellInternal (locId,resType,amount,minPrice) = {
243
243
 
    let whKey = keyFactoryWarehouseByIdAndType(locId, resType)
244
244
 
    let w0 = valueOrElse(getInteger(whKey), 0)
245
245
 
    let r0 = if ((w0 > FACTORYMAXWAREHOUSE))
246
246
 
        then 0
247
247
 
        else if (((w0 + amount) > FACTORYMAXWAREHOUSE))
248
248
 
            then (FACTORYMAXWAREHOUSE - w0)
249
249
 
            else amount
250
250
 
    let usdtReceived = (fraction(r0, ((SELLMULTIPLIER * RESOURCEPRICEMIN) - fraction(((100 * w0) + (50 * r0)), RESOURCEPRICEMIN, FACTORYMAXWAREHOUSE)), MULT10) + fraction((amount - r0), RESOURCEPRICEMIN, MULT8))
251
251
 
    let min99 = (minPrice - (minPrice / 100))
252
252
 
    if (((min99 * amount) > (usdtReceived * MULT8)))
253
253
 
        then throw((((((((((("Actual price = " + toString(usdtReceived)) + " / ") + toString(amount)) + " < minPrice = ") + toString(minPrice)) + ", (") + locId) + ", ") + resTypes[resType]) + ")"))
254
254
 
        else $Tuple2(IntegerEntry(whKey, (w0 + amount)), usdtReceived)
255
255
 
    }
256
256
 
257
257
 
258
258
 
func buyInternal (locId,matType,amount,maxPrice) = {
259
259
 
    let whKey = keyFactoryWarehouseByIdAndType(locId, matType)
260
260
 
    let w0 = valueOrElse(getInteger(whKey), 0)
261
261
 
    let m1 = if ((w0 > FACTORYMAXWAREHOUSE))
262
262
 
        then min([amount, (w0 - FACTORYMAXWAREHOUSE)])
263
263
 
        else 0
264
264
 
    let m0 = min([w0, (amount - m1)])
265
265
 
    let m = (m0 + m1)
266
266
 
    let w0min = min([w0, FACTORYMAXWAREHOUSE])
267
267
 
    let usdtSpent = (fraction(m0, ((BUYMULTIPLIER * RESOURCEPRICEMIN) - fraction(((100 * w0min) - (50 * m0)), RESOURCEPRICEMIN, FACTORYMAXWAREHOUSE)), MULT10) + fraction(m1, (2 * RESOURCEPRICEMIN), MULT8))
268
268
 
    let max101 = (maxPrice + (maxPrice / 100))
269
269
 
    if (((usdtSpent * MULT8) > (max101 * m)))
270
270
 
        then throw((((((((((("Actual price = " + toString(usdtSpent)) + " / ") + toString(m)) + " > maxPrice = ") + toString(maxPrice)) + ", (") + locId) + ", ") + matTypes[matType]) + ")"))
271
271
 
        else $Tuple3(IntegerEntry(whKey, (w0 - m)), usdtSpent, m)
272
272
 
    }
273
273
 
274
274
 
275
275
 
func getBackpack (bpKey) = {
276
276
 
    let p = split_4C(valueOrElse(getString(stakingContract, bpKey), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
277
277
 
[toString(valueOrElse(parseInt(p[bpIdxLevel]), 0)), if ((size(split(p[bpIdxRes], "_")) == NUMRES))
278
278
 
        then p[bpIdxRes]
279
279
 
        else "0_0_0_0_0_0", if ((size(split(p[bpIdxMat], "_")) == NUMRES))
280
280
 
        then p[bpIdxMat]
281
281
 
        else "0_0_0_0_0_0", p[bpIdxProd]]
282
282
 
    }
283
283
 
284
284
 
285
285
 
func checkBlocked () = if (valueOrElse(getBoolean(stakingContract, keyBlocked()), false))
286
286
 
    then throw("Contracts are under maintenance")
287
287
 
    else unit
288
288
 
289
289
 
290
290
 
func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
291
291
 
292
292
 
293
293
 
func setCommon (acc,ignoredIterator) = {
294
294
 
    let j = acc._1
295
295
 
    let item = if ((size(acc._10) > j))
296
296
 
        then acc._10[j]
297
297
 
        else "0@0"
298
298
 
    let isProd = acc._8
299
299
 
    let itemParts = split(item, "@")
300
300
 
    if ((size(itemParts) != 2))
301
301
 
        then throw("Incorrect order format, should be amount@price")
302
302
 
        else {
303
303
 
            let newOrdAm = parseIntValue(itemParts[0])
304
304
 
            let newOrdPr = parseIntValue(itemParts[1])
305
305
 
            let newOrdUsd = if (isProd)
306
306
 
                then (newOrdAm * newOrdPr)
307
307
 
                else fraction(newOrdAm, newOrdPr, MULT8)
308
308
 
            let newOrdVol = toVolume(newOrdAm, PRODUCTPKGSIZE, isProd)
309
309
 
            let whInit = if ((size(acc._6) > j))
310
310
 
                then parseIntValue(acc._6[j])
311
311
 
                else 0
312
312
 
            let curOrdParts = split(if ((size(acc._7) > j))
313
313
 
                then acc._7[j]
314
314
 
                else "0@0", "@")
315
315
 
            let curOrdAm = parseIntValue(curOrdParts[0])
316
316
 
            let curOrdPr = parseIntValue(curOrdParts[1])
317
317
 
            if (if ((0 > curOrdPr))
318
318
 
                then true
319
319
 
                else (0 > newOrdPr))
320
320
 
                then throw("Price can't be negative")
321
321
 
                else {
322
322
 
                    let curOrdUsd = if (isProd)
323
323
 
                        then (curOrdAm * curOrdPr)
324
324
 
                        else fraction(curOrdAm, curOrdPr, MULT8)
325
325
 
                    if ((newOrdAm == 0))
326
326
 
                        then if ((curOrdAm > 0))
327
327
 
                            then $Tuple10((j + 1), (acc._2 :+ toString(whInit)), acc._3, acc._4, (acc._5 - curOrdUsd), acc._6, acc._7, isProd, (acc._9 + toVolume(whInit, PRODUCTPKGSIZE, isProd)), acc._10)
328
328
 
                            else $Tuple10((j + 1), (acc._2 :+ toString((whInit - curOrdAm))), acc._3, acc._4, acc._5, acc._6, acc._7, isProd, (acc._9 + toVolume((whInit - curOrdAm), PRODUCTPKGSIZE, isProd)), acc._10)
329
329
 
                        else if ((newOrdAm > 0))
330
330
 
                            then if ((0 > curOrdAm))
331
331
 
                                then $Tuple10((j + 1), (acc._2 :+ toString((whInit - curOrdAm))), (acc._3 + newOrdVol), acc._4, (acc._5 + newOrdUsd), acc._6, acc._7, isProd, toVolume((whInit - curOrdAm), PRODUCTPKGSIZE, isProd), acc._10)
332
332
 
                                else $Tuple10((j + 1), (acc._2 :+ toString(whInit)), (acc._3 + newOrdVol), acc._4, ((acc._5 + newOrdUsd) - curOrdUsd), acc._6, acc._7, isProd, toVolume(whInit, PRODUCTPKGSIZE, isProd), acc._10)
333
333
 
                            else if ((0 > curOrdAm))
334
334
 
                                then {
335
335
 
                                    let amDiff = (curOrdAm - newOrdAm)
336
336
 
                                    if ((0 > (whInit - amDiff)))
337
337
 
                                        then throw((((("Attempt to take " + toString(amDiff)) + " from warehouse, but only ") + toString(whInit)) + " available"))
338
338
 
                                        else $Tuple10((j + 1), (acc._2 :+ toString((whInit - amDiff))), acc._3, (acc._4 - newOrdVol), acc._5, acc._6, acc._7, isProd, toVolume((whInit - amDiff), PRODUCTPKGSIZE, isProd), acc._10)
339
339
 
                                    }
340
340
 
                                else if ((0 > (whInit + newOrdAm)))
341
341
 
                                    then throw((((("Attempt to take " + toString(-(newOrdAm))) + " from warehouse, but only ") + toString(whInit)) + " available"))
342
342
 
                                    else $Tuple10((j + 1), (acc._2 :+ toString((whInit + newOrdAm))), acc._3, (acc._4 - newOrdVol), (acc._5 - curOrdUsd), acc._6, acc._7, isProd, toVolume((whInit + newOrdAm), PRODUCTPKGSIZE, isProd), acc._10)
343
343
 
                    }
344
344
 
            }
345
345
 
    }
346
346
 
347
347
 
348
348
 
func setInternal (currentWh,currentOrd,newOrd) = {
349
349
 
    let currWhRes = split(currentWh[whIdxRes], "_")
350
350
 
    let currWhMat = split(currentWh[whIdxMat], "_")
351
351
 
    let currWhProd = if ((currentWh[whIdxProd] == ""))
352
352
 
        then nil
353
353
 
        else split_4C(currentWh[whIdxProd], "_")
354
354
 
    let currentOrdRes = split(currentOrd[ordIdxRes], "_")
355
355
 
    let currentOrdMat = split(currentOrd[ordIdxMat], "_")
356
356
 
    let currentOrdProd = if ((currentOrd[ordIdxProd] == ""))
357
357
 
        then nil
358
358
 
        else split_4C(currentOrd[ordIdxProd], "_")
359
359
 
    if ((size(newOrd) != 3))
360
360
 
        then throw("newOrderStr should contain exactly 2 ':' separators")
361
361
 
        else {
362
362
 
            let resParts = split(newOrd[0], "_")
363
363
 
            let matParts = split(newOrd[1], "_")
364
364
 
            let prodParts = if ((newOrd[2] == ""))
365
365
 
                then nil
366
366
 
                else split_4C(newOrd[2], "_")
367
367
 
            if ((size(resParts) != NUMRES))
368
368
 
                then throw("All 6 resources should be passed")
369
369
 
                else if ((size(matParts) != NUMRES))
370
370
 
                    then throw("All 6 materials should be passed")
371
371
 
                    else {
372
372
 
                        let r = {
373
373
 
                            let $l = resTypes
374
374
 
                            let $s = size($l)
375
375
 
                            let $acc0 = $Tuple10(0, nil, 0, 0, 0, currWhRes, currentOrdRes, false, 0, resParts)
376
376
 
                            func $f0_1 ($a,$i) =                             if (($i >= $s))
377
377
 
                                then $a
378
378
 
                                else setCommon($a, $l[$i])
379
379
 
380
380
 
                            func $f0_2 ($a,$i) =                             if (($i >= $s))
381
381
 
                                then $a
382
382
 
                                else throw("List size exceeds 6")
383
383
 
384
384
 
                            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
385
385
 
                            }
386
386
 
                        let m = {
387
387
 
                            let $l = matTypes
388
388
 
                            let $s = size($l)
389
389
 
                            let $acc0 = $Tuple10(0, nil, r._3, r._4, r._5, currWhMat, currentOrdMat, false, r._9, matParts)
390
390
 
                            func $f1_1 ($a,$i) =                             if (($i >= $s))
391
391
 
                                then $a
392
392
 
                                else setCommon($a, $l[$i])
393
393
 
394
394
 
                            func $f1_2 ($a,$i) =                             if (($i >= $s))
395
395
 
                                then $a
396
396
 
                                else throw("List size exceeds 6")
397
397
 
398
398
 
                            $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
399
399
 
                            }
400
400
 
                        let p = {
401
401
 
                            let $l = prodTypes
402
402
 
                            let $s = size($l)
403
403
 
                            let $acc0 = $Tuple10(0, nil, m._3, m._4, m._5, currWhProd, currentOrdProd, true, m._9, prodParts)
404
404
 
                            func $f2_1 ($a,$i) =                             if (($i >= $s))
405
405
 
                                then $a
406
406
 
                                else setCommon($a, $l[$i])
407
407
 
408
408
 
                            func $f2_2 ($a,$i) =                             if (($i >= $s))
409
409
 
                                then $a
410
410
 
                                else throw("List size exceeds 50")
411
411
 
412
412
 
                            $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)
413
413
 
                            }
414
414
 
                        $Tuple7(r._2, m._2, p._2, p._3, p._4, p._5, p._9)
415
415
 
                        }
416
416
 
            }
417
417
 
    }
418
418
 
419
419
 
420
420
 
func acceptCommon (acc,bpOrdItem) = {
421
421
 
    let j = acc._7
422
422
 
    let isProd = acc._12
423
423
 
    let bpOrdParts = split(bpOrdItem, "@")
424
424
 
    if ((size(bpOrdParts) != 2))
425
425
 
        then throw("Incorrect order format, should be amount@price")
426
426
 
        else {
427
427
 
            let bpOrdAm = parseIntValue(bpOrdParts[0])
428
428
 
            let bpOrdPr = parseIntValue(bpOrdParts[1])
429
429
 
            if ((0 > bpOrdPr))
430
430
 
                then throw("Price can't be negative")
431
431
 
                else {
432
432
 
                    let bpOrdUsd = if (isProd)
433
433
 
                        then (bpOrdAm * bpOrdPr)
434
434
 
                        else fraction(bpOrdAm, bpOrdPr, MULT8)
435
435
 
                    let bpInit = if ((size(acc._8) > j))
436
436
 
                        then parseIntValue(acc._8[j])
437
437
 
                        else 0
438
438
 
                    let whInit = if ((size(acc._9) > j))
439
439
 
                        then parseIntValue(acc._9[j])
440
440
 
                        else 0
441
441
 
                    let whOrdInit = if ((size(acc._10) > j))
442
442
 
                        then acc._10[j]
443
443
 
                        else "0@0"
444
444
 
                    let whOrdParts = split(whOrdInit, "@")
445
445
 
                    let whOrdAm = parseIntValue(whOrdParts[0])
446
446
 
                    let whOrdPr = parseIntValue(whOrdParts[1])
447
447
 
                    if (if ((bpOrdAm != 0))
448
448
 
                        then (bpOrdPr != whOrdPr)
449
449
 
                        else false)
450
450
 
                        then throw(((((("Prices of " + acc._11[j]) + " don't match! WH price=") + toString(whOrdPr)) + ", your price=") + toString(bpOrdPr)))
451
451
 
                        else {
452
452
 
                            let whOrdUsd = if (isProd)
453
453
 
                                then (whOrdAm * whOrdPr)
454
454
 
                                else fraction(whOrdAm, whOrdPr, MULT8)
455
455
 
                            let deltaVol = toVolume(bpOrdAm, PRODUCTPKGSIZE, isProd)
456
456
 
                            if ((bpOrdAm == 0))
457
457
 
                                then $Tuple13((acc._1 :+ toString(whInit)), (acc._2 :+ whOrdInit), (acc._3 :+ toString(bpInit)), acc._4, acc._5, acc._6, (acc._7 + 1), acc._8, acc._9, acc._10, acc._11, isProd, acc._13)
458
458
 
                                else if ((bpOrdAm > 0))
459
459
 
                                    then if ((0 > whOrdAm))
460
460
 
                                        then if ((bpOrdAm > -(whOrdAm)))
461
461
 
                                            then throw(((((("Attempt to buy " + toString(bpOrdAm)) + " of ") + acc._11[j]) + ", but warehouse only sells ") + toString(-(whOrdAm))))
462
462
 
                                            else $Tuple13((acc._1 :+ toString(whInit)), (acc._2 :+ ((toString((whOrdAm + bpOrdAm)) + "@") + toString(whOrdPr))), (acc._3 :+ toString((bpInit + bpOrdAm))), (acc._4 + deltaVol), acc._5, (acc._6 + bpOrdUsd), (acc._7 + 1), acc._8, acc._9, acc._10, acc._11, isProd, (acc._13 + (if (isProd)
463
463
 
                                                then (bpOrdAm * MULT8)
464
464
 
                                                else bpOrdAm)))
465
465
 
                                        else throw((("Attempt to buy " + acc._11[j]) + " while warehouse doesn't sell it"))
466
466
 
                                    else if ((whOrdAm > 0))
467
467
 
                                        then if ((-(bpOrdAm) > whOrdAm))
468
468
 
                                            then throw(((((("Attempt to sell " + toString(-(bpOrdAm))) + " of ") + acc._11[j]) + ", but warehouse only buys ") + toString(whOrdAm)))
469
469
 
                                            else if ((-(bpOrdAm) > bpInit))
470
470
 
                                                then throw(((((("Attempt to sell " + toString(-(bpOrdAm))) + ", but you only have ") + toString(bpInit)) + " of ") + acc._11[j]))
471
471
 
                                                else $Tuple13((acc._1 :+ toString((whInit - bpOrdAm))), (acc._2 :+ ((toString((whOrdAm + bpOrdAm)) + "@") + toString(whOrdPr))), (acc._3 :+ toString((bpInit + bpOrdAm))), (acc._4 - deltaVol), (acc._5 - bpOrdUsd), acc._6, (acc._7 + 1), acc._8, acc._9, acc._10, acc._11, isProd, (acc._13 - (if (isProd)
472
472
 
                                                    then (bpOrdAm * MULT8)
473
473
 
                                                    else bpOrdAm)))
474
474
 
                                        else throw((("Attempt to sell " + acc._11[j]) + " while warehouse doesn't buy it"))
475
475
 
                            }
476
476
 
                    }
477
477
 
            }
478
478
 
    }
479
479
 
480
480
 
481
481
 
func sellResourcesCommon (resList,factoryLocId,amounts,minPrices) = {
482
482
 
    func adder (acc,j) =     if ((amounts[j] > parseIntValue(resList[j])))
483
483
 
        then throw(((((("You have " + resList[j]) + " of ") + resTypes[j]) + ", but tried to sell ") + toString(amounts[j])))
484
484
 
        else if ((0 > amounts[j]))
485
485
 
            then throw(((("You tried to sell negative amount of " + resTypes[j]) + ": ") + toString(amounts[j])))
486
486
 
            else if ((amounts[j] > 0))
487
487
 
                then {
488
488
 
                    let b = sellInternal(factoryLocId, j, amounts[j], minPrices[j])
489
489
 
                    $Tuple4((acc._1 :+ b._1), (acc._2 :+ toString((parseIntValue(resList[j]) - amounts[j]))), (acc._3 + b._2), (acc._4 + amounts[j]))
490
490
 
                    }
491
491
 
                else $Tuple4(acc._1, (acc._2 :+ resList[j]), acc._3, acc._4)
492
492
 
493
493
 
    let $l = ITER6
494
494
 
    let $s = size($l)
495
495
 
    let $acc0 = $Tuple4(nil, nil, 0, 0)
496
496
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
497
497
 
        then $a
498
498
 
        else adder($a, $l[$i])
499
499
 
500
500
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
501
501
 
        then $a
502
502
 
        else throw("List size exceeds 6")
503
503
 
504
504
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
505
505
 
    }
506
506
 
507
507
 
508
508
 
func buyMaterialsCommon (matList,factoryLocId,amounts,maxPrices) = {
509
509
 
    func mUpdater (acc,j) =     if ((0 > amounts[j]))
510
510
 
        then throw(((("You tried to buy negative amount of " + matTypes[j]) + ": ") + toString(amounts[j])))
511
511
 
        else if ((amounts[j] > 0))
512
512
 
            then {
513
513
 
                let b = buyInternal(factoryLocId, j, amounts[j], maxPrices[j])
514
514
 
                $Tuple4((acc._1 :+ b._1), (acc._2 :+ toString((parseIntValue(matList[j]) + b._3))), (acc._3 + b._2), (acc._4 + amounts[j]))
515
515
 
                }
516
516
 
            else $Tuple4(acc._1, (acc._2 :+ matList[j]), acc._3, acc._4)
517
517
 
518
518
 
    let $l = ITER6
519
519
 
    let $s = size($l)
520
520
 
    let $acc0 = $Tuple4(nil, nil, 0, 0)
521
521
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
522
522
 
        then $a
523
523
 
        else mUpdater($a, $l[$i])
524
524
 
525
525
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
526
526
 
        then $a
527
527
 
        else throw("List size exceeds 6")
528
528
 
529
529
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
530
530
 
    }
531
531
 
532
532
 
533
533
 
func exchangeResourcesCommon (resList,matList,amounts) = {
534
534
 
    func exchanger (acc,j) =     {
535
535
 
        let amj = amounts[j]
536
536
 
        if ((amj > parseIntValue(resList[j])))
537
537
 
            then throw(((((("You have " + resList[j]) + " of ") + resTypes[j]) + ", but tried to exchange ") + toString(amj)))
538
538
 
            else if ((0 > amj))
539
539
 
                then throw(((("You tried to exchange negative amount of " + resTypes[j]) + ": ") + toString(amj)))
540
540
 
                else if ((amj > 0))
541
541
 
                    then $Tuple4((acc._1 :+ toString((parseIntValue(resList[j]) - amj))), (acc._2 :+ toString((parseIntValue(matList[j]) + amj))), (acc._3 + fraction(amj, RESOURCEPRICEMIN, MULT8)), (acc._4 + amj))
542
542
 
                    else $Tuple4((acc._1 :+ resList[j]), (acc._2 :+ matList[j]), acc._3, acc._4)
543
543
 
        }
544
544
 
545
545
 
    let $l = ITER6
546
546
 
    let $s = size($l)
547
547
 
    let $acc0 = $Tuple4(nil, nil, 0, 0)
548
548
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
549
549
 
        then $a
550
550
 
        else exchanger($a, $l[$i])
551
551
 
552
552
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
553
553
 
        then $a
554
554
 
        else throw("List size exceeds 6")
555
555
 
556
556
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
557
557
 
    }
558
558
 
559
559
 
560
560
 
func shop2userActions (usdWh2BpSaldo,callerAddr,receivedFee) = if ((usdWh2BpSaldo > 0))
561
561
 
    then {
562
562
 
        let usdWh2BpFee = fraction(usdWh2BpSaldo, AUCTIONFEE, MULT6)
563
563
 
        if ((receivedFee >= (usdWh2BpSaldo - (3 * usdWh2BpFee))))
564
564
 
            then throw(("This trade does not cover delivery cost of " + fixedPoint(receivedFee, 6)))
565
565
 
            else {
566
566
 
                let refByKey = keyAddressRefBy(callerAddr)
567
567
 
                let refBy = getString(stakingContract, refByKey)
568
568
 
                let caller = addressFromStringValue(callerAddr)
569
569
 
                (((if (isDefined(refBy))
570
570
 
                    then [ScriptTransfer(addressFromStringValue(value(refBy)), usdWh2BpFee, usdtAssetId)]
571
571
 
                    else nil) :+ ScriptTransfer(caller, ((usdWh2BpSaldo - (3 * usdWh2BpFee)) - receivedFee), usdtAssetId)) :+ ScriptTransfer(restContract, usdWh2BpFee, usdtAssetId))
572
572
 
                }
573
573
 
        }
574
574
 
    else nil
575
575
 
576
576
 
577
577
 
func user2shopActions (usdBp2WhSaldo,pmts,shopLandOwner,spentFee) = if ((usdBp2WhSaldo > 0))
578
578
 
    then if ((size(pmts) != 1))
579
579
 
        then throw("exactly 1 payment must be attached")
580
580
 
        else {
581
581
 
            let pmt = pmts[0]
582
582
 
            let amt = pmt.amount
583
583
 
            if (if (!(isDefined(pmt.assetId)))
584
584
 
                then true
585
585
 
                else (value(pmt.assetId) != usdtAssetId))
586
586
 
                then throw("USDT payments only!")
587
587
 
                else {
588
588
 
                    let usdtSpentWithFee = (usdBp2WhSaldo + spentFee)
589
589
 
                    if ((amt != usdtSpentWithFee))
590
590
 
                        then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdBp2WhSaldo, 6)) + "+") + fixedPoint(spentFee, 6)) + "(delivery fee)"))
591
591
 
                        else if ((MINSHOPPAYMENT > usdBp2WhSaldo))
592
592
 
                            then throw(("Min shop trade is " + fixedPoint(MINSHOPPAYMENT, 6)))
593
593
 
                            else {
594
594
 
                                let usdBp2WhFee = fraction(usdBp2WhSaldo, AUCTIONFEE, MULT6)
595
595
 
                                let refByKey = keyAddressRefBy(shopLandOwner)
596
596
 
                                let refBy = getString(stakingContract, refByKey)
597
597
 
                                (((if (isDefined(refBy))
598
598
 
                                    then [ScriptTransfer(addressFromStringValue(value(refBy)), usdBp2WhFee, usdtAssetId)]
599
599
 
                                    else nil) :+ ScriptTransfer(addressFromStringValue(shopLandOwner), (usdBp2WhSaldo - (3 * usdBp2WhFee)), usdtAssetId)) :+ ScriptTransfer(restContract, usdBp2WhFee, usdtAssetId))
600
600
 
                                }
601
601
 
                    }
602
602
 
            }
603
603
 
    else if ((size(pmts) != 0))
604
604
 
        then throw("No payments needed")
605
605
 
        else nil
606
606
 
607
607
 
608
608
 
func acceptShopOrderCommon (shopLandAssetId,callerAddr,bpOrderStr,bpResList,bpMatList,bpProdList) = {
609
609
 
    let landAsset = value(assetInfo(fromBase58String(shopLandAssetId)))
610
610
 
    if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(shopLandAssetId)))))
611
611
 
        then throw((("NFT " + landAsset.name) + " is not staked"))
612
612
 
        else {
613
613
 
            let shopLandOwner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(shopLandAssetId)), (("NFT " + landAsset.name) + " is orphaned"))
614
614
 
            if ((shopLandOwner == callerAddr))
615
615
 
                then throw("You cannot trade with yourself")
616
616
 
                else {
617
617
 
                    let bpOrderParts = split_4C(bpOrderStr, ":")
618
618
 
                    if ((size(bpOrderParts) != 3))
619
619
 
                        then throw("bpOrderStr should contain exactly 2 ':' separators")
620
620
 
                        else {
621
621
 
                            let bpOrdRes = split(bpOrderParts[0], "_")
622
622
 
                            let bpOrdMat = split(bpOrderParts[1], "_")
623
623
 
                            let bpOrdProd = if ((bpOrderParts[2] == ""))
624
624
 
                                then nil
625
625
 
                                else split_4C(bpOrderParts[2], "_")
626
626
 
                            if ((size(bpOrdRes) != NUMRES))
627
627
 
                                then throw("All 6 resources should be passed")
628
628
 
                                else if ((size(bpOrdMat) != NUMRES))
629
629
 
                                    then throw("All 6 materials should be passed")
630
630
 
                                    else {
631
631
 
                                        let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [shopLandAssetId], nil))
632
632
 
                                        let currentWh = split_4C(wh, ":")
633
633
 
                                        let currWhRes = split(currentWh[whIdxRes], "_")
634
634
 
                                        let currWhMat = split(currentWh[whIdxMat], "_")
635
635
 
                                        let currWhProd = if ((currentWh[whIdxProd] == ""))
636
636
 
                                            then nil
637
637
 
                                            else split_4C(currentWh[whIdxProd], "_")
638
638
 
                                        let currWhLockedVol = parseIntValue(split(currentWh[whIdxLOFT], "_")[volLocked])
639
639
 
                                        let ordKey = keyOrderByLand(shopLandAssetId)
640
640
 
                                        let whOrd = getOrder(ordKey)
641
641
 
                                        let whOrdRes = split(whOrd[ordIdxRes], "_")
642
642
 
                                        let whOrdMat = split(whOrd[ordIdxMat], "_")
643
643
 
                                        let whOrdProd = if ((whOrd[ordIdxProd] == ""))
644
644
 
                                            then nil
645
645
 
                                            else split_4C(whOrd[ordIdxProd], "_")
646
646
 
                                        let r = {
647
647
 
                                            let $l = bpOrdRes
648
648
 
                                            let $s = size($l)
649
649
 
                                            let $acc0 = $Tuple13(nil, nil, nil, 0, 0, 0, 0, bpResList, currWhRes, whOrdRes, resTypes, false, 0)
650
650
 
                                            func $f0_1 ($a,$i) =                                             if (($i >= $s))
651
651
 
                                                then $a
652
652
 
                                                else acceptCommon($a, $l[$i])
653
653
 
654
654
 
                                            func $f0_2 ($a,$i) =                                             if (($i >= $s))
655
655
 
                                                then $a
656
656
 
                                                else throw("List size exceeds 6")
657
657
 
658
658
 
                                            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
659
659
 
                                            }
660
660
 
                                        let m = {
661
661
 
                                            let $l = bpOrdMat
662
662
 
                                            let $s = size($l)
663
663
 
                                            let $acc0 = $Tuple13(nil, nil, nil, r._4, r._5, r._6, 0, bpMatList, currWhMat, whOrdMat, matTypes, false, r._13)
664
664
 
                                            func $f1_1 ($a,$i) =                                             if (($i >= $s))
665
665
 
                                                then $a
666
666
 
                                                else acceptCommon($a, $l[$i])
667
667
 
668
668
 
                                            func $f1_2 ($a,$i) =                                             if (($i >= $s))
669
669
 
                                                then $a
670
670
 
                                                else throw("List size exceeds 6")
671
671
 
672
672
 
                                            $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
673
673
 
                                            }
674
674
 
                                        let p = if ((size(bpOrdProd) != 0))
675
675
 
                                            then {
676
676
 
                                                let $l = bpOrdProd
677
677
 
                                                let $s = size($l)
678
678
 
                                                let $acc0 = $Tuple13(nil, nil, nil, m._4, m._5, m._6, 0, bpProdList, currWhProd, whOrdProd, prodTypes, true, m._13)
679
679
 
                                                func $f2_1 ($a,$i) =                                                 if (($i >= $s))
680
680
 
                                                    then $a
681
681
 
                                                    else acceptCommon($a, $l[$i])
682
682
 
683
683
 
                                                func $f2_2 ($a,$i) =                                                 if (($i >= $s))
684
684
 
                                                    then $a
685
685
 
                                                    else throw("List size exceeds 50")
686
686
 
687
687
 
                                                $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)
688
688
 
                                                }
689
689
 
                                            else $Tuple13(currWhProd, whOrdProd, bpProdList, m._4, m._5, m._6, 0, bpProdList, currWhProd, whOrdProd, prodTypes, true, m._13)
690
690
 
                                        let volSaldo = p._4
691
691
 
                                        let newLockedVol = if ((0 > (currWhLockedVol - volSaldo)))
692
692
 
                                            then 0
693
693
 
                                            else (currWhLockedVol - volSaldo)
694
694
 
                                        let whStr = makeString_2C([currentWh[whIdxLevels], makeString(r._1, "_"), makeString(m._1, "_"), makeString_2C(p._1, "_"), toString(newLockedVol)], ":")
695
695
 
                                        let newWhOrdStr = makeString_2C([makeString(r._2, "_"), makeString(m._2, "_"), makeString_2C(p._2, "_")], ":")
696
696
 
                                        let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, shopLandAssetId], nil))
697
697
 
                                        let accStatsResult = asInt(invoke(stakingContract, "updateAccStats", [shopLandOwner, fraction(xpShop, p._13, MULT8)], nil))
698
698
 
                                        $Tuple10(StringEntry(ordKey, newWhOrdStr), r._3, m._3, p._3, p._5, p._6, p._13, shopLandOwner, whSave, accStatsResult)
699
699
 
                                        }
700
700
 
                            }
701
701
 
                    }
702
702
 
            }
703
703
 
    }
704
704
 
705
705
 
706
706
 
func sellResourcesWorldInternal (amount) = {
707
707
 
    let oneRes = (amount / 30)
708
708
 
    let oneFactoryAmounts = [oneRes, oneRes, oneRes, oneRes, oneRes, oneRes]
709
709
 
    let s = toString(oneRes)
710
710
 
    let resList = [s, s, s, s, s, s]
711
711
 
    let minPrices = [0, 0, 0, 0, 0, 0]
712
712
 
    func oneFactory (acc,continent) =     {
713
713
 
        let x = sellResourcesCommon(resList, continent, oneFactoryAmounts, minPrices)
714
714
 
        $Tuple3((acc._1 ++ x._1), (acc._2 + x._3), (acc._3 + x._4))
715
715
 
        }
716
716
 
717
717
 
    let $t02526125351 = {
718
718
 
        let $l = continents
719
719
 
        let $s = size($l)
720
720
 
        let $acc0 = $Tuple3(nil, 0, 0)
721
721
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
722
722
 
            then $a
723
723
 
            else oneFactory($a, $l[$i])
724
724
 
725
725
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
726
726
 
            then $a
727
727
 
            else throw("List size exceeds 5")
728
728
 
729
729
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
730
730
 
        }
731
731
 
    let factoryActions = $t02526125351._1
732
732
 
    let usdtReceived = $t02526125351._2
733
733
 
    let totalRes = $t02526125351._3
734
734
 
    let fee = fraction(usdtReceived, DELIVERY_FEE, MULT6)
735
735
 
    let activitiesAmount = (usdtReceived / 100)
736
736
 
    let usdtLeft = ((usdtReceived - activitiesAmount) - fee)
737
737
 
    $Tuple5(factoryActions, usdtLeft, fee, activitiesAmount, totalRes)
738
738
 
    }
739
739
 
740
740
 
741
741
 
@Callable(i)
742
742
 
func recalcLockedVolumeREADONLY (landAssetId,wh) = {
743
743
 
    let currentOrd = getOrder(keyOrderByLand(landAssetId))
744
744
 
    let z = setInternal(wh, currentOrd, currentOrd)
745
745
 
    $Tuple2(nil, (z._4 + z._5))
746
746
 
    }
747
747
 
748
748
 
749
749
 
750
750
 
@Callable(i)
751
751
 
func constructorV1 (restAddr) = if ((i.caller != this))
752
752
 
    then throw("Permission denied")
753
753
 
    else [StringEntry(keyRestAddress(), restAddr)]
754
754
 
755
755
 
756
756
 
757
757
 
@Callable(i)
758
758
 
func sellResources (amounts,minPrices) = {
759
759
 
    let prologResult = prolog()
760
760
 
    let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
761
761
 
    if ((size(i.payments) != 0))
762
762
 
        then throw("sellResources doesn't require any payments")
763
763
 
        else {
764
764
 
            let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
765
765
 
            if ((curLocation[locIdxType] != "F"))
766
766
 
                then throw(("Duck location type should be Factory, but is " + curLocation[locIdxType]))
767
767
 
                else {
768
768
 
                    let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
769
769
 
                    let resList = split(currentPack[bpIdxRes], "_")
770
770
 
                    let $t02680326929 = sellResourcesCommon(resList, curLocation[locIdxId], amounts, minPrices)
771
771
 
                    let factoryActions = $t02680326929._1
772
772
 
                    let newRes = $t02680326929._2
773
773
 
                    let usdtReceived = $t02680326929._3
774
774
 
                    let totalRes = $t02680326929._4
775
775
 
                    let activitiesAmount = (usdtReceived / 100)
776
776
 
                    let newPack = makeString_2C([currentPack[bpIdxLevel], makeString(newRes, "_"), currentPack[bpIdxMat], currentPack[bpIdxProd]], ":")
777
777
 
                    let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
778
778
 
                    let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalRes, MULT8)], nil))
779
779
 
                    $Tuple2(((factoryActions :+ ScriptTransfer(i.caller, (usdtReceived - activitiesAmount), usdtAssetId)) :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)), $Tuple3(backpackResult, prologResult, statsResult))
780
780
 
                    }
781
781
 
            }
782
782
 
    }
783
783
 
784
784
 
785
785
 
786
786
 
@Callable(i)
787
787
 
func sellResourcesWorld (addr,amount) = if ((i.caller != acresContract))
788
788
 
    then throw("Permission denied")
789
789
 
    else {
790
790
 
        let $t02772127878 = sellResourcesWorldInternal(amount)
791
791
 
        let factoryActions = $t02772127878._1
792
792
 
        let usdtLeft = $t02772127878._2
793
793
 
        let fee = $t02772127878._3
794
794
 
        let activitiesAmount = $t02772127878._4
795
795
 
        let totalRes = $t02772127878._5
796
796
 
        if ((0 >= usdtLeft))
797
797
 
            then throw(("This trade does not cover delivery cost of " + fixedPoint(fee, 6)))
798
798
 
            else {
799
799
 
                let statsResult = asInt(invoke(stakingContract, "updateAccStats", [addr, fraction(xpTrade, totalRes, MULT8)], nil))
800
800
 
                $Tuple2((((factoryActions :+ IntegerEntry(deliveryFundKey, (valueOrElse(getInteger(deliveryFundKey), 0) + fee))) :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ ScriptTransfer(investFundContract, usdtLeft, usdtAssetId)), $Tuple2(usdtLeft, statsResult))
801
801
 
                }
802
802
 
        }
803
803
 
804
804
 
805
805
 
806
806
 
@Callable(i)
807
807
 
func sellResourcesWorldREADONLY (amount) = {
808
808
 
    let usdtLeft = sellResourcesWorldInternal(amount)._2
809
809
 
    $Tuple2(nil, usdtLeft)
810
810
 
    }
811
811
 
812
812
 
813
813
 
814
814
 
@Callable(i)
815
815
 
func sellResourcesDuckDelivery (amounts,minPrices,factoryContinent) = if (!(KS_ALLOW_DELIVERY))
816
816
 
    then throw("Delivery feature is turned off!")
817
817
 
    else {
818
818
 
        let prologResult = prolog()
819
819
 
        let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
820
820
 
        if ((size(i.payments) != 0))
821
821
 
            then throw("sellResources doesn't require any payments")
822
822
 
            else {
823
823
 
                let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
824
824
 
                let resList = split(currentPack[bpIdxRes], "_")
825
825
 
                let $t02911129232 = sellResourcesCommon(resList, factoryContinent, amounts, minPrices)
826
826
 
                let factoryActions = $t02911129232._1
827
827
 
                let newRes = $t02911129232._2
828
828
 
                let usdtReceived = $t02911129232._3
829
829
 
                let totalRes = $t02911129232._4
830
830
 
                let newPack = makeString_2C([currentPack[bpIdxLevel], makeString(newRes, "_"), currentPack[bpIdxMat], currentPack[bpIdxProd]], ":")
831
831
 
                let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
832
832
 
                let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalRes, MULT8)], nil))
833
833
 
                let feePart = fraction(usdtReceived, DELIVERY_FEE, MULT6)
834
834
 
                let fee = if ((MIN_USDT_FEE_DELIVERY > feePart))
835
835
 
                    then MIN_USDT_FEE_DELIVERY
836
836
 
                    else feePart
837
837
 
                let activitiesAmount = (usdtReceived / 100)
838
838
 
                if ((fee >= (usdtReceived - activitiesAmount)))
839
839
 
                    then throw(("This trade does not cover delivery cost of " + fixedPoint(fee, 6)))
840
840
 
                    else {
841
841
 
                        let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
842
842
 
                        $Tuple2((((factoryActions :+ ScriptTransfer(i.caller, ((usdtReceived - activitiesAmount) - fee), usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))) :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)), $Tuple3(backpackResult, prologResult, statsResult))
843
843
 
                        }
844
844
 
                }
845
845
 
        }
846
846
 
847
847
 
848
848
 
849
849
 
@Callable(i)
850
850
 
func sellResourcesLandDelivery (amounts,minPrices,landAssetId,factoryContinent) = if (!(KS_ALLOW_DELIVERY))
851
851
 
    then throw("Delivery feature is turned off!")
852
852
 
    else {
853
853
 
        let prologResult = prolog()
854
854
 
        if ((size(i.payments) != 0))
855
855
 
            then throw("sellResources doesn't require any payments")
856
856
 
            else {
857
857
 
                let user = i.caller
858
858
 
                let addr = toString(user)
859
859
 
                let asset = value(assetInfo(fromBase58String(landAssetId)))
860
860
 
                if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
861
861
 
                    then throw((("NFT " + asset.name) + " is not staked"))
862
862
 
                    else {
863
863
 
                        let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
864
864
 
                        if ((owner != addr))
865
865
 
                            then throw((LANDPREFIX + " is not yours"))
866
866
 
                            else {
867
867
 
                                let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
868
868
 
                                let currentWh = split_4C(wh, ":")
869
869
 
                                let resList = split(currentWh[whIdxRes], "_")
870
870
 
                                let $t03125931380 = sellResourcesCommon(resList, factoryContinent, amounts, minPrices)
871
871
 
                                let factoryActions = $t03125931380._1
872
872
 
                                let newRes = $t03125931380._2
873
873
 
                                let usdtReceived = $t03125931380._3
874
874
 
                                let totalRes = $t03125931380._4
875
875
 
                                let whStr = makeString_2C([currentWh[whIdxLevels], makeString(newRes, "_"), currentWh[whIdxMat], currentWh[whIdxProd], currentWh[whIdxLOFT]], ":")
876
876
 
                                let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil))
877
877
 
                                let statsResult = asInt(invoke(stakingContract, "updateAccStats", [addr, fraction(xpTrade, totalRes, MULT8)], nil))
878
878
 
                                let feePart = fraction(usdtReceived, DELIVERY_FEE, MULT6)
879
879
 
                                let fee = if ((MIN_USDT_FEE_DELIVERY > feePart))
880
880
 
                                    then MIN_USDT_FEE_DELIVERY
881
881
 
                                    else feePart
882
882
 
                                let activitiesAmount = (usdtReceived / 100)
883
883
 
                                if ((fee >= (usdtReceived - activitiesAmount)))
884
884
 
                                    then throw(("This trade does not cover delivery cost of " + fixedPoint(fee, 6)))
885
885
 
                                    else {
886
886
 
                                        let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
887
887
 
                                        $Tuple2((((factoryActions :+ ScriptTransfer(i.caller, ((usdtReceived - activitiesAmount) - fee), usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))) :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)), $Tuple3(whSave, prologResult, statsResult))
888
888
 
                                        }
889
889
 
                                }
890
890
 
                        }
891
891
 
                }
892
892
 
        }
893
893
 
894
894
 
895
895
 
896
896
 
@Callable(i)
897
897
 
func buyMaterials (amounts,maxPrices) = {
898
898
 
    let prologResult = prolog()
899
899
 
    let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
900
900
 
    if ((size(i.payments) != 1))
901
901
 
        then throw("exactly 1 payment must be attached")
902
902
 
        else {
903
903
 
            let pmt = i.payments[0]
904
904
 
            let amt = pmt.amount
905
905
 
            if (if (!(isDefined(pmt.assetId)))
906
906
 
                then true
907
907
 
                else (value(pmt.assetId) != usdtAssetId))
908
908
 
                then throw("USDT payments only!")
909
909
 
                else {
910
910
 
                    let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
911
911
 
                    if ((curLocation[locIdxType] != "F"))
912
912
 
                        then throw(("Duck location type should be Factory, but is " + curLocation[locIdxType]))
913
913
 
                        else {
914
914
 
                            let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
915
915
 
                            let matList = split(currentPack[bpIdxMat], "_")
916
916
 
                            let $t03324033362 = buyMaterialsCommon(matList, curLocation[locIdxId], amounts, maxPrices)
917
917
 
                            let factoryActions = $t03324033362._1
918
918
 
                            let newMat = $t03324033362._2
919
919
 
                            let usdtSpent = $t03324033362._3
920
920
 
                            let totalMat = $t03324033362._4
921
921
 
                            if ((usdtSpent > amt))
922
922
 
                                then throw(((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)))
923
923
 
                                else {
924
924
 
                                    let newPack = makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], makeString(newMat, "_"), currentPack[bpIdxProd]], ":")
925
925
 
                                    let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
926
926
 
                                    let rest = if (((amt - usdtSpent) > 0))
927
927
 
                                        then [ScriptTransfer(i.caller, (amt - usdtSpent), usdtAssetId)]
928
928
 
                                        else nil
929
929
 
                                    let activitiesAmount = (usdtSpent / 100)
930
930
 
                                    let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalMat, MULT8)], nil))
931
931
 
                                    $Tuple2(((factoryActions ++ rest) :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)), $Tuple3(backpackResult, prologResult, statsResult))
932
932
 
                                    }
933
933
 
                            }
934
934
 
                    }
935
935
 
            }
936
936
 
    }
937
937
 
938
938
 
939
939
 
940
940
 
@Callable(i)
941
941
 
func buyMaterialsDuckDelivery (amounts,maxPrices,factoryContinent) = if (!(KS_ALLOW_DELIVERY))
942
942
 
    then throw("Delivery feature is turned off!")
943
943
 
    else {
944
944
 
        let prologResult = prolog()
945
945
 
        let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
946
946
 
        if ((size(i.payments) != 1))
947
947
 
            then throw("exactly 1 payment must be attached")
948
948
 
            else {
949
949
 
                let pmt = i.payments[0]
950
950
 
                let amt = pmt.amount
951
951
 
                if (if (!(isDefined(pmt.assetId)))
952
952
 
                    then true
953
953
 
                    else (value(pmt.assetId) != usdtAssetId))
954
954
 
                    then throw("USDT payments only!")
955
955
 
                    else {
956
956
 
                        let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
957
957
 
                        let matList = split(currentPack[bpIdxMat], "_")
958
958
 
                        let $t03488034997 = buyMaterialsCommon(matList, factoryContinent, amounts, maxPrices)
959
959
 
                        let factoryActions = $t03488034997._1
960
960
 
                        let newMat = $t03488034997._2
961
961
 
                        let usdtSpent = $t03488034997._3
962
962
 
                        let totalMat = $t03488034997._4
963
963
 
                        let newPack = makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], makeString(newMat, "_"), currentPack[bpIdxProd]], ":")
964
964
 
                        let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
965
965
 
                        let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalMat, MULT8)], nil))
966
966
 
                        let feePart = fraction(usdtSpent, DELIVERY_FEE, MULT6)
967
967
 
                        let fee = if ((MIN_USDT_FEE_DELIVERY > feePart))
968
968
 
                            then MIN_USDT_FEE_DELIVERY
969
969
 
                            else feePart
970
970
 
                        let usdtSpentWithFee = (usdtSpent + fee)
971
971
 
                        if ((usdtSpentWithFee > amt))
972
972
 
                            then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
973
973
 
                            else {
974
974
 
                                let rest = if (((amt - usdtSpentWithFee) > 0))
975
975
 
                                    then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
976
976
 
                                    else nil
977
977
 
                                let activitiesAmount = (usdtSpent / 100)
978
978
 
                                let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
979
979
 
                                $Tuple2((((factoryActions ++ rest) :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(backpackResult, prologResult, statsResult))
980
980
 
                                }
981
981
 
                        }
982
982
 
                }
983
983
 
        }
984
984
 
985
985
 
986
986
 
987
987
 
@Callable(i)
988
988
 
func buyMaterialsLandDelivery (amounts,maxPrices,landAssetId,factoryContinent) = if (!(KS_ALLOW_DELIVERY))
989
989
 
    then throw("Delivery feature is turned off!")
990
990
 
    else {
991
991
 
        let prologResult = prolog()
992
992
 
        if ((size(i.payments) != 1))
993
993
 
            then throw("exactly 1 payment must be attached")
994
994
 
            else {
995
995
 
                let pmt = i.payments[0]
996
996
 
                let amt = pmt.amount
997
997
 
                if (if (!(isDefined(pmt.assetId)))
998
998
 
                    then true
999
999
 
                    else (value(pmt.assetId) != usdtAssetId))
1000
1000
 
                    then throw("USDT payments only!")
1001
1001
 
                    else {
1002
1002
 
                        let user = i.caller
1003
1003
 
                        let addr = toString(user)
1004
1004
 
                        let asset = value(assetInfo(fromBase58String(landAssetId)))
1005
1005
 
                        if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
1006
1006
 
                            then throw((("NFT " + asset.name) + " is not staked"))
1007
1007
 
                            else {
1008
1008
 
                                let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1009
1009
 
                                if ((owner != addr))
1010
1010
 
                                    then throw((LANDPREFIX + " is not yours"))
1011
1011
 
                                    else {
1012
1012
 
                                        let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
1013
1013
 
                                        let currentWh = split_4C(wh, ":")
1014
1014
 
                                        let matList = split(currentWh[whIdxMat], "_")
1015
1015
 
                                        let $t03727537392 = buyMaterialsCommon(matList, factoryContinent, amounts, maxPrices)
1016
1016
 
                                        let factoryActions = $t03727537392._1
1017
1017
 
                                        let newMat = $t03727537392._2
1018
1018
 
                                        let usdtSpent = $t03727537392._3
1019
1019
 
                                        let totalMat = $t03727537392._4
1020
1020
 
                                        let whStr = makeString_2C([currentWh[whIdxLevels], currentWh[whIdxRes], makeString(newMat, "_"), currentWh[whIdxProd], currentWh[whIdxLOFT]], ":")
1021
1021
 
                                        let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil))
1022
1022
 
                                        let statsResult = asInt(invoke(stakingContract, "updateAccStats", [addr, fraction(xpTrade, totalMat, MULT8)], nil))
1023
1023
 
                                        let feePart = fraction(usdtSpent, DELIVERY_FEE, MULT6)
1024
1024
 
                                        let fee = if ((MIN_USDT_FEE_DELIVERY > feePart))
1025
1025
 
                                            then MIN_USDT_FEE_DELIVERY
1026
1026
 
                                            else feePart
1027
1027
 
                                        let usdtSpentWithFee = (usdtSpent + fee)
1028
1028
 
                                        if ((usdtSpentWithFee > amt))
1029
1029
 
                                            then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1030
1030
 
                                            else {
1031
1031
 
                                                let rest = if (((amt - usdtSpentWithFee) > 0))
1032
1032
 
                                                    then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1033
1033
 
                                                    else nil
1034
1034
 
                                                let activitiesAmount = (usdtSpent / 100)
1035
1035
 
                                                let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1036
1036
 
                                                $Tuple2((((factoryActions ++ rest) :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(whSave, prologResult, statsResult))
1037
1037
 
                                                }
1038
1038
 
                                        }
1039
1039
 
                                }
1040
1040
 
                        }
1041
1041
 
                }
1042
1042
 
        }
1043
1043
 
1044
1044
 
1045
1045
 
1046
1046
 
@Callable(i)
1047
1047
 
func exchangeResources (amounts) = {
1048
1048
 
    let prologResult = prolog()
1049
1049
 
    let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1050
1050
 
    if ((size(i.payments) != 1))
1051
1051
 
        then throw("exactly 1 payment must be attached")
1052
1052
 
        else {
1053
1053
 
            let pmt = i.payments[0]
1054
1054
 
            let amt = pmt.amount
1055
1055
 
            if (if (!(isDefined(pmt.assetId)))
1056
1056
 
                then true
1057
1057
 
                else (value(pmt.assetId) != usdtAssetId))
1058
1058
 
                then throw("USDT payments only!")
1059
1059
 
                else {
1060
1060
 
                    let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1061
1061
 
                    if ((curLocation[locIdxType] != "F"))
1062
1062
 
                        then throw(("Duck location type should be Factory, but is " + curLocation[locIdxType]))
1063
1063
 
                        else {
1064
1064
 
                            let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
1065
1065
 
                            let resList = split(currentPack[bpIdxRes], "_")
1066
1066
 
                            let matList = split(currentPack[bpIdxMat], "_")
1067
1067
 
                            let $t03950639612 = exchangeResourcesCommon(resList, matList, amounts)
1068
1068
 
                            let newRes = $t03950639612._1
1069
1069
 
                            let newMat = $t03950639612._2
1070
1070
 
                            let usdtSpent = $t03950639612._3
1071
1071
 
                            let totalAmountConverted = $t03950639612._4
1072
1072
 
                            if ((usdtSpent > amt))
1073
1073
 
                                then throw(((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)))
1074
1074
 
                                else {
1075
1075
 
                                    let newPack = makeString([currentPack[bpIdxLevel], makeString(newRes, "_"), makeString(newMat, "_"), currentPack[bpIdxProd]], ":")
1076
1076
 
                                    let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
1077
1077
 
                                    let rest = if (((amt - usdtSpent) > 0))
1078
1078
 
                                        then [ScriptTransfer(i.caller, (amt - usdtSpent), usdtAssetId)]
1079
1079
 
                                        else nil
1080
1080
 
                                    let activitiesAmount = (usdtSpent / 100)
1081
1081
 
                                    let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1082
1082
 
                                    $Tuple2((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)), $Tuple3(backpackResult, prologResult, statsResult))
1083
1083
 
                                    }
1084
1084
 
                            }
1085
1085
 
                    }
1086
1086
 
            }
1087
1087
 
    }
1088
1088
 
1089
1089
 
1090
1090
 
1091
1091
 
@Callable(i)
1092
-
func exchangeResourcesDuckDelivery (amounts) = {
1093
-
    let prologResult = prolog()
1094
-
    let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1095
-
    if ((size(i.payments) != 1))
1096
-
        then throw("exactly 1 payment must be attached")
1097
-
        else {
1098
-
            let pmt = i.payments[0]
1099
-
            let amt = pmt.amount
1100
-
            if (if (!(isDefined(pmt.assetId)))
1101
-
                then true
1102
-
                else (value(pmt.assetId) != usdtAssetId))
1103
-
                then throw("USDT payments only!")
1104
-
                else {
1105
-
                    let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
1106
-
                    let resList = split(currentPack[bpIdxRes], "_")
1107
-
                    let matList = split(currentPack[bpIdxMat], "_")
1108
-
                    let $t04104741153 = exchangeResourcesCommon(resList, matList, amounts)
1109
-
                    let newRes = $t04104741153._1
1110
-
                    let newMat = $t04104741153._2
1111
-
                    let usdtSpent = $t04104741153._3
1112
-
                    let totalAmountConverted = $t04104741153._4
1113
-
                    let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1114
-
                    let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1115
-
                        then MIN_USDT_FEE_DELIVERY15
1116
-
                        else feePart
1117
-
                    let usdtSpentWithFee = (usdtSpent + fee)
1118
-
                    if ((usdtSpentWithFee > amt))
1119
-
                        then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1120
-
                        else {
1121
-
                            let newPack = makeString([currentPack[bpIdxLevel], makeString(newRes, "_"), makeString(newMat, "_"), currentPack[bpIdxProd]], ":")
1122
-
                            let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
1123
-
                            let rest = if (((amt - usdtSpentWithFee) > 0))
1124
-
                                then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1125
-
                                else nil
1126
-
                            let activitiesAmount = (usdtSpent / 100)
1127
-
                            let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1128
-
                            let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1129
-
                            $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(backpackResult, prologResult, statsResult))
1130
-
                            }
1131
-
                    }
1132
-
            }
1133
-
    }
1092
+
func exchangeResourcesDuckDelivery (amounts) = if (!(KS_ALLOW_DELIVERY))
1093
+
    then throw("Delivery feature is turned off!")
1094
+
    else {
1095
+
        let prologResult = prolog()
1096
+
        let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1097
+
        if ((size(i.payments) != 1))
1098
+
            then throw("exactly 1 payment must be attached")
1099
+
            else {
1100
+
                let pmt = i.payments[0]
1101
+
                let amt = pmt.amount
1102
+
                if (if (!(isDefined(pmt.assetId)))
1103
+
                    then true
1104
+
                    else (value(pmt.assetId) != usdtAssetId))
1105
+
                    then throw("USDT payments only!")
1106
+
                    else {
1107
+
                        let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
1108
+
                        let resList = split(currentPack[bpIdxRes], "_")
1109
+
                        let matList = split(currentPack[bpIdxMat], "_")
1110
+
                        let $t04112441230 = exchangeResourcesCommon(resList, matList, amounts)
1111
+
                        let newRes = $t04112441230._1
1112
+
                        let newMat = $t04112441230._2
1113
+
                        let usdtSpent = $t04112441230._3
1114
+
                        let totalAmountConverted = $t04112441230._4
1115
+
                        let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1116
+
                        let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1117
+
                            then MIN_USDT_FEE_DELIVERY15
1118
+
                            else feePart
1119
+
                        let usdtSpentWithFee = (usdtSpent + fee)
1120
+
                        if ((usdtSpentWithFee > amt))
1121
+
                            then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1122
+
                            else {
1123
+
                                let newPack = makeString([currentPack[bpIdxLevel], makeString(newRes, "_"), makeString(newMat, "_"), currentPack[bpIdxProd]], ":")
1124
+
                                let backpackResult = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
1125
+
                                let rest = if (((amt - usdtSpentWithFee) > 0))
1126
+
                                    then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1127
+
                                    else nil
1128
+
                                let activitiesAmount = (usdtSpent / 100)
1129
+
                                let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1130
+
                                let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1131
+
                                $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(backpackResult, prologResult, statsResult))
1132
+
                                }
1133
+
                        }
1134
+
                }
1135
+
        }
1134
1136
 
1135
1137
 
1136
1138
 
1137
1139
 
@Callable(i)
1138
-
func exchangeResourcesLandDelivery (amounts,landAssetId) = {
1139
-
    let prologResult = prolog()
1140
-
    if ((size(i.payments) != 1))
1141
-
        then throw("exactly 1 payment must be attached")
1142
-
        else {
1143
-
            let pmt = i.payments[0]
1144
-
            let amt = pmt.amount
1145
-
            if (if (!(isDefined(pmt.assetId)))
1146
-
                then true
1147
-
                else (value(pmt.assetId) != usdtAssetId))
1148
-
                then throw("USDT payments only!")
1149
-
                else {
1150
-
                    let user = i.caller
1151
-
                    let addr = toString(user)
1152
-
                    let asset = value(assetInfo(fromBase58String(landAssetId)))
1153
-
                    if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
1154
-
                        then throw((("NFT " + asset.name) + " is not staked"))
1155
-
                        else {
1156
-
                            let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1157
-
                            if ((owner != addr))
1158
-
                                then throw((LANDPREFIX + " is not yours"))
1159
-
                                else {
1160
-
                                    let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
1161
-
                                    let currentWh = split_4C(wh, ":")
1162
-
                                    let resList = split(currentWh[whIdxRes], "_")
1163
-
                                    let matList = split(currentWh[whIdxMat], "_")
1164
-
                                    let $t04337643482 = exchangeResourcesCommon(resList, matList, amounts)
1165
-
                                    let newRes = $t04337643482._1
1166
-
                                    let newMat = $t04337643482._2
1167
-
                                    let usdtSpent = $t04337643482._3
1168
-
                                    let totalAmountConverted = $t04337643482._4
1169
-
                                    let whStr = makeString_2C([currentWh[whIdxLevels], makeString(newRes, "_"), makeString(newMat, "_"), currentWh[whIdxProd], currentWh[whIdxLOFT]], ":")
1170
-
                                    let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil))
1171
-
                                    let statsResult = asInt(invoke(stakingContract, "updateAccStats", [addr, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1172
-
                                    let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1173
-
                                    let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1174
-
                                        then MIN_USDT_FEE_DELIVERY15
1175
-
                                        else feePart
1176
-
                                    let usdtSpentWithFee = (usdtSpent + fee)
1177
-
                                    if ((usdtSpentWithFee > amt))
1178
-
                                        then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1179
-
                                        else {
1180
-
                                            let rest = if (((amt - usdtSpentWithFee) > 0))
1181
-
                                                then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1182
-
                                                else nil
1183
-
                                            let activitiesAmount = (usdtSpent / 100)
1184
-
                                            let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1185
-
                                            $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(whSave, prologResult, statsResult))
1186
-
                                            }
1187
-
                                    }
1188
-
                            }
1189
-
                    }
1190
-
            }
1191
-
    }
1140
+
func exchangeResourcesLandDelivery (amounts,landAssetId) = if (!(KS_ALLOW_DELIVERY))
1141
+
    then throw("Delivery feature is turned off!")
1142
+
    else {
1143
+
        let prologResult = prolog()
1144
+
        if ((size(i.payments) != 1))
1145
+
            then throw("exactly 1 payment must be attached")
1146
+
            else {
1147
+
                let pmt = i.payments[0]
1148
+
                let amt = pmt.amount
1149
+
                if (if (!(isDefined(pmt.assetId)))
1150
+
                    then true
1151
+
                    else (value(pmt.assetId) != usdtAssetId))
1152
+
                    then throw("USDT payments only!")
1153
+
                    else {
1154
+
                        let user = i.caller
1155
+
                        let addr = toString(user)
1156
+
                        let asset = value(assetInfo(fromBase58String(landAssetId)))
1157
+
                        if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
1158
+
                            then throw((("NFT " + asset.name) + " is not staked"))
1159
+
                            else {
1160
+
                                let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1161
+
                                if ((owner != addr))
1162
+
                                    then throw((LANDPREFIX + " is not yours"))
1163
+
                                    else {
1164
+
                                        let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
1165
+
                                        let currentWh = split_4C(wh, ":")
1166
+
                                        let resList = split(currentWh[whIdxRes], "_")
1167
+
                                        let matList = split(currentWh[whIdxMat], "_")
1168
+
                                        let $t04353043636 = exchangeResourcesCommon(resList, matList, amounts)
1169
+
                                        let newRes = $t04353043636._1
1170
+
                                        let newMat = $t04353043636._2
1171
+
                                        let usdtSpent = $t04353043636._3
1172
+
                                        let totalAmountConverted = $t04353043636._4
1173
+
                                        let whStr = makeString_2C([currentWh[whIdxLevels], makeString(newRes, "_"), makeString(newMat, "_"), currentWh[whIdxProd], currentWh[whIdxLOFT]], ":")
1174
+
                                        let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil))
1175
+
                                        let statsResult = asInt(invoke(stakingContract, "updateAccStats", [addr, fraction(xpTrade, totalAmountConverted, MULT8)], nil))
1176
+
                                        let feePart = fraction(usdtSpent, DELIVERY_FEE15, MULT6)
1177
+
                                        let fee = if ((MIN_USDT_FEE_DELIVERY15 > feePart))
1178
+
                                            then MIN_USDT_FEE_DELIVERY15
1179
+
                                            else feePart
1180
+
                                        let usdtSpentWithFee = (usdtSpent + fee)
1181
+
                                        if ((usdtSpentWithFee > amt))
1182
+
                                            then throw((((((("Insufficient payment! Attached=" + fixedPoint(amt, 6)) + ", required=") + fixedPoint(usdtSpent, 6)) + "+") + fixedPoint(fee, 6)) + "(delivery fee)"))
1183
+
                                            else {
1184
+
                                                let rest = if (((amt - usdtSpentWithFee) > 0))
1185
+
                                                    then [ScriptTransfer(i.caller, (amt - usdtSpentWithFee), usdtAssetId)]
1186
+
                                                    else nil
1187
+
                                                let activitiesAmount = (usdtSpent / 100)
1188
+
                                                let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1189
+
                                                $Tuple2(((rest :+ ScriptTransfer(restContract, activitiesAmount, usdtAssetId)) :+ IntegerEntry(deliveryFundKey, (fundTotal + fee))), $Tuple3(whSave, prologResult, statsResult))
1190
+
                                                }
1191
+
                                        }
1192
+
                                }
1193
+
                        }
1194
+
                }
1195
+
        }
1192
1196
 
1193
1197
 
1194
1198
 
1195
1199
 
@Callable(i)
1196
1200
 
func craftGoods (productIdx,quantity) = {
1197
1201
 
    let prologResult = prolog()
1198
1202
 
    if ((size(i.payments) != 1))
1199
1203
 
        then throw("exactly 1 payment must be attached")
1200
1204
 
        else {
1201
1205
 
            let pmt = i.payments[0]
1202
1206
 
            let amt = pmt.amount
1203
1207
 
            let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WAVES can't be used as payment")
1204
1208
 
            if ((pmtAssetId != usdtAssetId))
1205
1209
 
                then throw("USDT payments only!")
1206
1210
 
                else if ((amt != MULT6))
1207
1211
 
                    then throw("exactly 1 USDT must be attached as payment")
1208
1212
 
                    else if ((0 >= quantity))
1209
1213
 
                        then throw("Quantity should be positive")
1210
1214
 
                        else {
1211
1215
 
                            let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1212
1216
 
                            let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1213
1217
 
                            if ((curLocation[locIdxType] != "M"))
1214
1218
 
                                then throw(("Duck location type should be Manufactory, but is " + curLocation[locIdxType]))
1215
1219
 
                                else {
1216
1220
 
                                    let cont = curLocation[locIdxContinent]
1217
1221
 
                                    let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
1218
1222
 
                                    let matList = split(currentPack[bpIdxMat], "_")
1219
1223
 
                                    if (if ((0 > productIdx))
1220
1224
 
                                        then true
1221
1225
 
                                        else (productIdx >= size(productionMatrix)))
1222
1226
 
                                        then throw(("Unknown product idx=" + toString(productIdx)))
1223
1227
 
                                        else {
1224
1228
 
                                            let recipe = split(productionMatrix[productIdx], "_")
1225
1229
 
                                            if ((size(recipe) != RECIPESIZE))
1226
1230
 
                                                then throw(("Fatal: unknown recipe: " + productionMatrix[productIdx]))
1227
1231
 
                                                else {
1228
1232
 
                                                    let productContIdx = parseIntValue(recipe[rIdxContinent])
1229
1233
 
                                                    if ((continents[productContIdx] != cont))
1230
1234
 
                                                        then throw(((("This product is available in " + continents[productContIdx]) + ", but you are in ") + cont))
1231
1235
 
                                                        else {
1232
1236
 
                                                            let prodList = if ((currentPack[bpIdxProd] == ""))
1233
1237
 
                                                                then nil
1234
1238
 
                                                                else split_4C(currentPack[bpIdxProd], "_")
1235
1239
 
                                                            func filler (acc,ignoredItem) =                                                             {
1236
1240
 
                                                                let n = acc._2
1237
1241
 
                                                                let xs = if ((size(prodList) > n))
1238
1242
 
                                                                    then prodList[n]
1239
1243
 
                                                                    else "0"
1240
1244
 
                                                                let x = parseIntValue(xs)
1241
1245
 
                                                                let amount = (quantity * PRODUCTPKGSIZE)
1242
1246
 
                                                                let y = if ((n == productIdx))
1243
1247
 
                                                                    then toString((x + amount))
1244
1248
 
                                                                    else xs
1245
1249
 
                                                                $Tuple2((acc._1 :+ y), (n + 1))
1246
1250
 
                                                                }
1247
1251
 
1248
1252
 
                                                            let bpProd = (                                                            let $l = productionMatrix
1249
1253
 
                                                            let $s = size($l)
1250
1254
 
                                                            let $acc0 = $Tuple2(nil, 0)
1251
1255
 
                                                            func $f0_1 ($a,$i) =                                                             if (($i >= $s))
1252
1256
 
                                                                then $a
1253
1257
 
                                                                else filler($a, $l[$i])
1254
1258
 
1255
1259
 
                                                            func $f0_2 ($a,$i) =                                                             if (($i >= $s))
1256
1260
 
                                                                then $a
1257
1261
 
                                                                else throw("List size exceeds 50")
1258
1262
 
1259
1263
 
                                                            $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))._1
1260
1264
 
                                                            func producer (acc,j) =                                                             {
1261
1265
 
                                                                let needMat = (((parseIntValue(recipe[j]) * MULT5) * quantity) * parseIntValue(recipe[rIdxCoeff]))
1262
1266
 
                                                                let haveMat = parseIntValue(matList[j])
1263
1267
 
                                                                if ((needMat > haveMat))
1264
1268
 
                                                                    then throw(((((((("You have " + fixedPoint(haveMat, 8)) + " of ") + matTypes[j]) + ", but recipe requires ") + fixedPoint(needMat, 8)) + " for quantity ") + toString(quantity)))
1265
1269
 
                                                                    else if ((needMat > 0))
1266
1270
 
                                                                        then $Tuple2((acc._1 :+ toString((haveMat - needMat))), (acc._2 + needMat))
1267
1271
 
                                                                        else $Tuple2((acc._1 :+ matList[j]), acc._2)
1268
1272
 
                                                                }
1269
1273
 
1270
1274
 
                                                            let merged = {
1271
1275
 
                                                                let $l = ITER6
1272
1276
 
                                                                let $s = size($l)
1273
1277
 
                                                                let $acc0 = $Tuple2(nil, 0)
1274
1278
 
                                                                func $f1_1 ($a,$i) =                                                                 if (($i >= $s))
1275
1279
 
                                                                    then $a
1276
1280
 
                                                                    else producer($a, $l[$i])
1277
1281
 
1278
1282
 
                                                                func $f1_2 ($a,$i) =                                                                 if (($i >= $s))
1279
1283
 
                                                                    then $a
1280
1284
 
                                                                    else throw("List size exceeds 6")
1281
1285
 
1282
1286
 
                                                                $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
1283
1287
 
                                                                }
1284
1288
 
                                                            let newPack = makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], makeString(merged._1, "_"), makeString_2C(bpProd, "_")], ":")
1285
1289
 
                                                            let result = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
1286
1290
 
                                                            let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpCraft, merged._2, MULT8)], nil))
1287
1291
 
                                                            $Tuple2(nil, $Tuple3(result, prologResult, statsResult))
1288
1292
 
                                                            }
1289
1293
 
                                                    }
1290
1294
 
                                            }
1291
1295
 
                                    }
1292
1296
 
                            }
1293
1297
 
            }
1294
1298
 
    }
1295
1299
 
1296
1300
 
1297
1301
 
1298
1302
 
@Callable(i)
1299
1303
 
func setWarehouseOrder (newOrderStr,landAssetId) = {
1300
1304
 
    let user = i.originCaller
1301
1305
 
    let addr = toString(user)
1302
1306
 
    let result = if ((user != restContract))
1303
1307
 
        then checkBlocked()
1304
1308
 
        else false
1305
1309
 
    let asset = value(assetInfo(fromBase58String(landAssetId)))
1306
1310
 
    if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
1307
1311
 
        then throw((("NFT " + asset.name) + " is not staked"))
1308
1312
 
        else {
1309
1313
 
            let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
1310
1314
 
            if (if ((user != restContract))
1311
1315
 
                then (owner != addr)
1312
1316
 
                else false)
1313
1317
 
                then throw((LANDPREFIX + " is not yours"))
1314
1318
 
                else {
1315
1319
 
                    let newOrder = split_4C(newOrderStr, ":")
1316
1320
 
                    let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
1317
1321
 
                    let currentWh = split_4C(wh, ":")
1318
1322
 
                    let loft = split(currentWh[whIdxLOFT], "_")
1319
1323
 
                    let whTotal = parseIntValue(loft[volTotal])
1320
1324
 
                    let ordKey = keyOrderByLand(landAssetId)
1321
1325
 
                    let currentOrd = getOrder(ordKey)
1322
1326
 
                    let z = setInternal(currentWh, currentOrd, newOrder)
1323
1327
 
                    let buyVolSaldo = z._4
1324
1328
 
                    let sellVolSaldo = z._5
1325
1329
 
                    let whOccupied = z._7
1326
1330
 
                    let whLocked = (buyVolSaldo + sellVolSaldo)
1327
1331
 
                    let whFree = ((whTotal - whOccupied) - whLocked)
1328
1332
 
                    if ((0 > whFree))
1329
1333
 
                        then throw((((((("Attempt to reserve " + toString(buyVolSaldo)) + " space for buy orders, and ") + toString(sellVolSaldo)) + " space for sell orders (and occupied=") + toString(whOccupied)) + "), leads to negative free space"))
1330
1334
 
                        else {
1331
1335
 
                            let whStr = makeString_2C([currentWh[whIdxLevels], makeString(z._1, "_"), makeString(z._2, "_"), makeString_2C(z._3, "_"), toString(whLocked)], ":")
1332
1336
 
                            let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil))
1333
1337
 
                            let usdSaldo = z._6
1334
1338
 
                            let actions = if ((usdSaldo > 0))
1335
1339
 
                                then if ((size(i.payments) != 1))
1336
1340
 
                                    then throw("exactly 1 payment must be attached")
1337
1341
 
                                    else {
1338
1342
 
                                        let pmt = i.payments[0]
1339
1343
 
                                        let amt = pmt.amount
1340
1344
 
                                        let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WAVES can't be used as payment")
1341
1345
 
                                        if ((pmtAssetId != usdtAssetId))
1342
1346
 
                                            then throw("USDT payments only!")
1343
1347
 
                                            else if ((amt != usdSaldo))
1344
1348
 
                                                then throw(("Payment needed is " + toString(usdSaldo)))
1345
1349
 
                                                else [StringEntry(ordKey, newOrderStr)]
1346
1350
 
                                        }
1347
1351
 
                                else if ((usdSaldo == 0))
1348
1352
 
                                    then if ((size(i.payments) != 0))
1349
1353
 
                                        then throw("No payments needed")
1350
1354
 
                                        else [StringEntry(ordKey, newOrderStr)]
1351
1355
 
                                    else if ((size(i.payments) != 0))
1352
1356
 
                                        then throw("No payments needed")
1353
1357
 
                                        else [ScriptTransfer(addressFromStringValue(owner), -(usdSaldo), usdtAssetId), StringEntry(ordKey, newOrderStr)]
1354
1358
 
                            $Tuple2(actions, $Tuple2(result, whSave))
1355
1359
 
                            }
1356
1360
 
                    }
1357
1361
 
            }
1358
1362
 
    }
1359
1363
 
1360
1364
 
1361
1365
 
1362
1366
 
@Callable(i)
1363
1367
 
func acceptWarehouseOrder (bpOrderStr,shopLandAssetId,duckAssetId) = {
1364
1368
 
    let prologResult = prolog()
1365
1369
 
    let caller = i.originCaller
1366
1370
 
    let callerAddr = toString(caller)
1367
1371
 
    let stakedDuckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(callerAddr)), "You don't have a duck staked")
1368
1372
 
    let curLocation = valueOrElse(getString(stakingContract, keyDuckLocation(stakedDuckAssetId)), DEFAULTLOCATION)
1369
1373
 
    let loc = split(value(curLocation), "_")
1370
1374
 
    if ((loc[locIdxType] != "L"))
1371
1375
 
        then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
1372
1376
 
        else if ((stakedDuckAssetId != duckAssetId))
1373
1377
 
            then throw(((("Your staked duck is " + stakedDuckAssetId) + ", but passed ") + duckAssetId))
1374
1378
 
            else {
1375
1379
 
                let bpKey = keyBackpackByDuck(duckAssetId)
1376
1380
 
                let currentPack = getBackpack(bpKey)
1377
1381
 
                let bpResList = split(currentPack[bpIdxRes], "_")
1378
1382
 
                let bpMatList = split(currentPack[bpIdxMat], "_")
1379
1383
 
                let bpProdList = if ((currentPack[bpIdxProd] == ""))
1380
1384
 
                    then nil
1381
1385
 
                    else split_4C(currentPack[bpIdxProd], "_")
1382
-
                let $t05299453234 = acceptShopOrderCommon(shopLandAssetId, callerAddr, bpOrderStr, bpResList, bpMatList, bpProdList)
1383
-
                let shopAction = $t05299453234._1
1384
-
                let newUserRes = $t05299453234._2
1385
-
                let newUserMat = $t05299453234._3
1386
-
                let newUserProd = $t05299453234._4
1387
-
                let usdWh2BpSaldo = $t05299453234._5
1388
-
                let usdBp2WhSaldo = $t05299453234._6
1389
-
                let xpAmount = $t05299453234._7
1390
-
                let shopLandOwner = $t05299453234._8
1391
-
                let shopWhSave = $t05299453234._9
1392
-
                let accStatsResult = $t05299453234._10
1386
+
                let $t05314853388 = acceptShopOrderCommon(shopLandAssetId, callerAddr, bpOrderStr, bpResList, bpMatList, bpProdList)
1387
+
                let shopAction = $t05314853388._1
1388
+
                let newUserRes = $t05314853388._2
1389
+
                let newUserMat = $t05314853388._3
1390
+
                let newUserProd = $t05314853388._4
1391
+
                let usdWh2BpSaldo = $t05314853388._5
1392
+
                let usdBp2WhSaldo = $t05314853388._6
1393
+
                let xpAmount = $t05314853388._7
1394
+
                let shopLandOwner = $t05314853388._8
1395
+
                let shopWhSave = $t05314853388._9
1396
+
                let accStatsResult = $t05314853388._10
1393
1397
 
                let actions1 = [shopAction, shop2userActions(usdWh2BpSaldo, callerAddr, 0)]
1394
1398
 
                let actions2 = user2shopActions(usdBp2WhSaldo, i.payments, shopLandOwner, 0)
1395
1399
 
                let newBpStr = makeString_2C([currentPack[bpIdxLevel], makeString(newUserRes, "_"), makeString(newUserMat, "_"), makeString_2C(newUserProd, "_")], ":")
1396
1400
 
                let bpSave = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newBpStr], nil))
1397
1401
 
                let duckStatsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpShop, xpAmount, MULT8)], nil))
1398
1402
 
                $Tuple2((actions1 ++ actions2), $Tuple5(prologResult, shopWhSave, bpSave, duckStatsResult, accStatsResult))
1399
1403
 
                }
1400
1404
 
    }
1401
1405
 
1402
1406
 
1403
1407
 
1404
1408
 
@Callable(i)
1405
1409
 
func acceptShopOrderDuckDelivery (orderStr,shopLandAssetId) = if (!(KS_ALLOW_DELIVERY))
1406
1410
 
    then throw("Delivery feature is turned off!")
1407
1411
 
    else {
1408
1412
 
        let prologResult = prolog()
1409
1413
 
        let caller = i.originCaller
1410
1414
 
        let callerAddr = toString(caller)
1411
1415
 
        let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(callerAddr)), "You don't have a duck staked")
1412
1416
 
        let bpKey = keyBackpackByDuck(duckAssetId)
1413
1417
 
        let currentPack = getBackpack(bpKey)
1414
1418
 
        let bpResList = split(currentPack[bpIdxRes], "_")
1415
1419
 
        let bpMatList = split(currentPack[bpIdxMat], "_")
1416
1420
 
        let bpProdList = if ((currentPack[bpIdxProd] == ""))
1417
1421
 
            then nil
1418
1422
 
            else split_4C(currentPack[bpIdxProd], "_")
1419
-
        let $t05467354911 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, bpResList, bpMatList, bpProdList)
1420
-
        let shopAction = $t05467354911._1
1421
-
        let newUserRes = $t05467354911._2
1422
-
        let newUserMat = $t05467354911._3
1423
-
        let newUserProd = $t05467354911._4
1424
-
        let usdWh2BpSaldo = $t05467354911._5
1425
-
        let usdBp2WhSaldo = $t05467354911._6
1426
-
        let xpAmount = $t05467354911._7
1427
-
        let shopLandOwner = $t05467354911._8
1428
-
        let shopWhSave = $t05467354911._9
1429
-
        let accStatsResult = $t05467354911._10
1423
+
        let $t05482755065 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, bpResList, bpMatList, bpProdList)
1424
+
        let shopAction = $t05482755065._1
1425
+
        let newUserRes = $t05482755065._2
1426
+
        let newUserMat = $t05482755065._3
1427
+
        let newUserProd = $t05482755065._4
1428
+
        let usdWh2BpSaldo = $t05482755065._5
1429
+
        let usdBp2WhSaldo = $t05482755065._6
1430
+
        let xpAmount = $t05482755065._7
1431
+
        let shopLandOwner = $t05482755065._8
1432
+
        let shopWhSave = $t05482755065._9
1433
+
        let accStatsResult = $t05482755065._10
1430
1434
 
        let deliveryFeePart = fraction((usdBp2WhSaldo + usdWh2BpSaldo), DELIVERY_FEE, MULT6)
1431
1435
 
        let deliveryFee = if ((MIN_USDT_FEE_DELIVERY > deliveryFeePart))
1432
1436
 
            then MIN_USDT_FEE_DELIVERY
1433
1437
 
            else deliveryFeePart
1434
1438
 
        let spentFee = fraction(deliveryFee, usdBp2WhSaldo, (usdBp2WhSaldo + usdWh2BpSaldo))
1435
1439
 
        let receivedFee = (deliveryFee - spentFee)
1436
1440
 
        let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1437
1441
 
        let actions1 = [shopAction, shop2userActions(usdWh2BpSaldo, callerAddr, receivedFee)]
1438
1442
 
        let actions2 = user2shopActions(usdBp2WhSaldo, i.payments, shopLandOwner, spentFee)
1439
1443
 
        let newBpStr = makeString_2C([currentPack[bpIdxLevel], makeString(newUserRes, "_"), makeString(newUserMat, "_"), makeString_2C(newUserProd, "_")], ":")
1440
1444
 
        let bpSave = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newBpStr], nil))
1441
1445
 
        let duckStatsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpShop, xpAmount, MULT8)], nil))
1442
1446
 
        $Tuple2(((actions1 ++ actions2) :+ IntegerEntry(deliveryFundKey, (fundTotal + deliveryFee))), $Tuple5(prologResult, shopWhSave, bpSave, duckStatsResult, accStatsResult))
1443
1447
 
        }
1444
1448
 
1445
1449
 
1446
1450
 
1447
1451
 
@Callable(i)
1448
1452
 
func acceptShopOrderLandDelivery (orderStr,shopLandAssetId,myLandAssetId) = if (!(KS_ALLOW_DELIVERY))
1449
1453
 
    then throw("Delivery feature is turned off!")
1450
1454
 
    else {
1451
1455
 
        let prologResult = prolog()
1452
1456
 
        let caller = i.originCaller
1453
1457
 
        let callerAddr = toString(caller)
1454
1458
 
        let asset = value(assetInfo(fromBase58String(myLandAssetId)))
1455
1459
 
        if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(myLandAssetId)))))
1456
1460
 
            then throw((("NFT " + asset.name) + " is not staked"))
1457
1461
 
            else {
1458
1462
 
                let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(myLandAssetId)), (("NFT " + asset.name) + " is orphaned"))
1459
1463
 
                if ((owner != callerAddr))
1460
1464
 
                    then throw((LANDPREFIX + " is not yours"))
1461
1465
 
                    else {
1462
1466
 
                        let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [myLandAssetId], nil))
1463
1467
 
                        let currentWh = split_4C(wh, ":")
1464
1468
 
                        let resList = split(currentWh[whIdxRes], "_")
1465
1469
 
                        let matList = split(currentWh[whIdxMat], "_")
1466
1470
 
                        let prodList = if ((currentWh[whIdxProd] == ""))
1467
1471
 
                            then nil
1468
1472
 
                            else split(currentWh[whIdxProd], "_")
1469
-
                        let $t05715057382 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, resList, matList, prodList)
1470
-
                        let shopAction = $t05715057382._1
1471
-
                        let newUserRes = $t05715057382._2
1472
-
                        let newUserMat = $t05715057382._3
1473
-
                        let newUserProd = $t05715057382._4
1474
-
                        let usdWh2BpSaldo = $t05715057382._5
1475
-
                        let usdBp2WhSaldo = $t05715057382._6
1476
-
                        let xpAmount = $t05715057382._7
1477
-
                        let shopLandOwner = $t05715057382._8
1478
-
                        let shopWhSave = $t05715057382._9
1479
-
                        let accStatsResult = $t05715057382._10
1473
+
                        let $t05730457536 = acceptShopOrderCommon(shopLandAssetId, callerAddr, orderStr, resList, matList, prodList)
1474
+
                        let shopAction = $t05730457536._1
1475
+
                        let newUserRes = $t05730457536._2
1476
+
                        let newUserMat = $t05730457536._3
1477
+
                        let newUserProd = $t05730457536._4
1478
+
                        let usdWh2BpSaldo = $t05730457536._5
1479
+
                        let usdBp2WhSaldo = $t05730457536._6
1480
+
                        let xpAmount = $t05730457536._7
1481
+
                        let shopLandOwner = $t05730457536._8
1482
+
                        let shopWhSave = $t05730457536._9
1483
+
                        let accStatsResult = $t05730457536._10
1480
1484
 
                        let deliveryFeePart = fraction((usdBp2WhSaldo + usdWh2BpSaldo), DELIVERY_FEE, MULT6)
1481
1485
 
                        let deliveryFee = if ((MIN_USDT_FEE_DELIVERY > deliveryFeePart))
1482
1486
 
                            then MIN_USDT_FEE_DELIVERY
1483
1487
 
                            else deliveryFeePart
1484
1488
 
                        let spentFee = fraction(deliveryFee, usdBp2WhSaldo, (usdBp2WhSaldo + usdWh2BpSaldo))
1485
1489
 
                        let receivedFee = (deliveryFee - spentFee)
1486
1490
 
                        let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1487
1491
 
                        let actions1 = [shopAction, shop2userActions(usdWh2BpSaldo, callerAddr, receivedFee)]
1488
1492
 
                        let actions2 = user2shopActions(usdBp2WhSaldo, i.payments, shopLandOwner, spentFee)
1489
1493
 
                        let whStr = makeString_2C([currentWh[whIdxLevels], makeString(newUserRes, "_"), makeString(newUserMat, "_"), makeString(newUserProd, "_"), currentWh[whIdxLOFT]], ":")
1490
1494
 
                        let whSave = asString(invoke(stakingContract, "saveWarehouse", [whStr, myLandAssetId], nil))
1491
1495
 
                        let statsResult = asInt(invoke(stakingContract, "updateAccStats", [callerAddr, fraction(xpShop, xpAmount, MULT8)], nil))
1492
1496
 
                        $Tuple2(((actions1 ++ actions2) :+ IntegerEntry(deliveryFundKey, (fundTotal + deliveryFee))), $Tuple5(prologResult, shopWhSave, whSave, statsResult, accStatsResult))
1493
1497
 
                        }
1494
1498
 
                }
1495
1499
 
        }
1496
1500
 
1497
1501
 
1498
1502
 
1499
1503
 
@Callable(i)
1500
1504
 
func sellProductsToES (amounts) = {
1501
1505
 
    let prologResult = prolog()
1502
1506
 
    if ((size(i.payments) != 0))
1503
1507
 
        then throw("No payments needed")
1504
1508
 
        else {
1505
1509
 
            let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
1506
1510
 
            let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
1507
1511
 
            if ((curLocation[locIdxType] != "A"))
1508
1512
 
                then throw(("Duck location type should be Airport, but is " + curLocation[locIdxType]))
1509
1513
 
                else {
1510
1514
 
                    let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
1511
1515
 
                    let prodList = if ((currentPack[bpIdxProd] == ""))
1512
1516
 
                        then nil
1513
1517
 
                        else split_4C(currentPack[bpIdxProd], "_")
1514
1518
 
                    let esKey = keyEsWarehouse()
1515
1519
 
                    let existStr = getString(esKey)
1516
1520
 
                    let existAmounts = if (isDefined(existStr))
1517
1521
 
                        then split_4C(value(existStr), "_")
1518
1522
 
                        else nil
1519
1523
 
                    func moveProd (acc,recipeStr) =                     {
1520
1524
 
                        let j = acc._1
1521
1525
 
                        let quantity = if ((size(amounts) > j))
1522
1526
 
                            then amounts[j]
1523
1527
 
                            else 0
1524
1528
 
                        if ((0 > quantity))
1525
1529
 
                            then throw("Quantity cannot be negative")
1526
1530
 
                            else {
1527
1531
 
                                let recipe = split(recipeStr, "_")
1528
1532
 
                                if ((size(recipe) != RECIPESIZE))
1529
1533
 
                                    then throw(("Fatal: unknown recipe: " + recipeStr))
1530
1534
 
                                    else {
1531
1535
 
                                        let maxAmount = (ESMAXPACKAGES * PRODUCTPKGSIZE)
1532
1536
 
                                        let existAmount = if ((size(existAmounts) > j))
1533
1537
 
                                            then parseIntValue(existAmounts[j])
1534
1538
 
                                            else 0
1535
1539
 
                                        let canBuy = (maxAmount - existAmount)
1536
1540
 
                                        if ((quantity > canBuy))
1537
1541
 
                                            then throw(((("Warehouse can buy only " + toString(canBuy)) + " of ") + prodTypes[j]))
1538
1542
 
                                            else {
1539
1543
 
                                                let totalMat = getRecipeMaterials(recipe)
1540
1544
 
                                                let unitPrice = fraction((totalMat * ESBUYCOEF), RESOURCEPRICEMIN, (MULT8 * PRODUCTPKGSIZE))
1541
1545
 
                                                let bpProdAmount = if ((size(prodList) > j))
1542
1546
 
                                                    then parseIntValue(prodList[j])
1543
1547
 
                                                    else 0
1544
1548
 
                                                if ((quantity > bpProdAmount))
1545
1549
 
                                                    then throw(((("You have only " + toString(bpProdAmount)) + " of ") + prodTypes[j]))
1546
1550
 
                                                    else $Tuple5((j + 1), (acc._2 + (unitPrice * quantity)), (acc._3 :+ toString((bpProdAmount - quantity))), (acc._4 :+ toString((existAmount + quantity))), (acc._5 + (totalMat * quantity)))
1547
1551
 
                                                }
1548
1552
 
                                        }
1549
1553
 
                                }
1550
1554
 
                        }
1551
1555
 
1552
1556
 
                    let merged = {
1553
1557
 
                        let $l = productionMatrix
1554
1558
 
                        let $s = size($l)
1555
1559
 
                        let $acc0 = $Tuple5(0, 0, nil, nil, 0)
1556
1560
 
                        func $f0_1 ($a,$i) =                         if (($i >= $s))
1557
1561
 
                            then $a
1558
1562
 
                            else moveProd($a, $l[$i])
1559
1563
 
1560
1564
 
                        func $f0_2 ($a,$i) =                         if (($i >= $s))
1561
1565
 
                            then $a
1562
1566
 
                            else throw("List size exceeds 50")
1563
1567
 
1564
1568
 
                        $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)
1565
1569
 
                        }
1566
1570
 
                    let newBpStr = makeString_2C([currentPack[bpIdxLevel], currentPack[bpIdxRes], currentPack[bpIdxMat], makeString_2C(merged._3, "_")], ":")
1567
1571
 
                    let bpSave = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newBpStr], nil))
1568
1572
 
                    let statsResult = asInt(invoke(stakingContract, "updateDuckStats", [duckAssetId, fraction(xpSellToEs, merged._5, (MULT8 * 10))], nil))
1569
1573
 
                    $Tuple2([StringEntry(esKey, makeString_2C(merged._4, "_")), ScriptTransfer(i.caller, merged._2, usdtAssetId)], $Tuple3(bpSave, prologResult, statsResult))
1570
1574
 
                    }
1571
1575
 
            }
1572
1576
 
    }
1573
1577
 
1574
1578
 
1575
1579
 
1576
1580
 
@Callable(i)
1577
1581
 
func updateEsStorage (newStorage) = if ((i.caller != stakingContract))
1578
1582
 
    then throw("Permission denied")
1579
1583
 
    else $Tuple2([StringEntry(keyEsWarehouse(), newStorage)], newStorage)
1580
1584
 
1581
1585
 
1582
1586
 
1583
1587
 
@Callable(i)
1584
1588
 
func updateDeliveryLocked (newAmount) = if ((i.caller != stakingContract))
1585
1589
 
    then throw("Permission denied")
1586
1590
 
    else $Tuple2([IntegerEntry(deliveryLockedKey, newAmount)], newAmount)
1587
1591
 
1588
1592
 
1589
1593
 
1590
1594
 
@Callable(i)
1591
1595
 
func sendDeliveryReward (addr) = if ((i.caller != stakingContract))
1592
1596
 
    then throw("Permission denied")
1593
1597
 
    else {
1594
1598
 
        let fundTotal = valueOrElse(getInteger(deliveryFundKey), 0)
1595
1599
 
        let lockedTotal = valueOrElse(getInteger(deliveryLockedKey), 0)
1596
1600
 
        $Tuple2([ScriptTransfer(addressFromStringValue(addr), MIN_USDT_FEE_DELIVERY, usdtAssetId), IntegerEntry(deliveryFundKey, (fundTotal - MIN_USDT_FEE_DELIVERY)), IntegerEntry(deliveryLockedKey, (lockedTotal - MIN_USDT_FEE_DELIVERY))], MIN_USDT_FEE_DELIVERY)
1597
1601
 
        }
1598
1602
 
1599
1603