tx · H7sffFJyLftf7NJwoYGqNt59piPRhaiLsmqv9PLR1xJW

3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep:  -0.03100000 Waves

2023.04.05 22:01 [2521639] smart account 3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "H7sffFJyLftf7NJwoYGqNt59piPRhaiLsmqv9PLR1xJW",
    "fee": 3100000,
    "feeAssetId": null,
    "timestamp": 1680721287959,
    "version": 2,
    "chainId": 84,
    "sender": "3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep",
    "senderPublicKey": "7v5L7QkXxfkirALdyqmox38QCsa9jtfAtgUfHTh34eWq",
    "proofs": [
        "n2MmvTPDpNA3Y6R9bbScostnSXFX7J8QKo3txeBLJS9gqHAdSmzQTyoQeUGB5ypzDXEApP7euskftPYwY142snt"
    ],
    "script": "base64:BgIxCAISAwoBCBIECgIRERIECgIRERIDCgEREgUKAwEBARIDCgEIEgQKAggIEgUKAwgICEsAA1NFUAICX18ABU1VTFQ2AMCEPQAFTVVMVDgAgMLXLwAGTVVMVDEwAIDIr6AlAAVjaGFpbgkAyQECCQDKAQIIBQR0aGlzBWJ5dGVzAAEAAQALdXNkbkFzc2V0SWQEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDABILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAwkAAAIBAVQFByRtYXRjaDABIPd26vf3g8pl224T7gI7z1gplanB0Y3yS9ps2B1igMjeCQACAQINVW5rbm93biBjaGFpbgAVZGVmYXVsdFJlc3RBZGRyZXNzU3RyBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAiMzUFFDdXZGYnZoNExrUFVucm5VMXozam5iQTFwOW0zV05odgMJAAACAQFUBQckbWF0Y2gwAiMzTXVta0dHenRDS0FYcFdEcXhrZGRvZnFYU1VicVFrdlNKeQkAAgECDVVua25vd24gY2hhaW4BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAAQxnZXRJbnRPckVsc2UCA2tleQpkZWZhdWx0VmFsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFA2tleQUKZGVmYXVsdFZhbAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQARSWR4Q2ZnRWNvbm9teURhcHAAAgAUSWR4Q2ZnR292ZXJuYW5jZURhcHAAAwEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ5rZXlSZXN0QWRkcmVzcwACDCVzX19yZXN0QWRkcgERcmVhZFJlc3RDZmdPckZhaWwBBHJlc3QJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFBHJlc3QJAQprZXlSZXN0Q2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCB3Jlc3RDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdyZXN0Q2ZnBQNpZHgJAKwCAgIqUmVzdCBjZmcgZG9lc24ndCBjb250YWluIGFkZHJlc3MgYXQgaW5kZXggCQCkAwEFA2lkeAAMcmVzdENvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQ5rZXlSZXN0QWRkcmVzcwAFFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgAHcmVzdENmZwkBEXJlYWRSZXN0Q2ZnT3JGYWlsAQUMcmVzdENvbnRyYWN0AA9zdGFraW5nQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdTdGFraW5nRGFwcAAPREVGQVVMVExPQ0FUSU9OAg9BZnJpY2FfRl9BZnJpY2EABk5VTVJFUwAGABNGQUNUT1JZTUFYV0FSRUhPVVNFAIDIr6AlABBSRVNPVVJDRVBSSUNFTUlOANXWCQAKTUlOUEFZTUVOVACQTgAOU0VMTE1VTFRJUExJRVIAyAEADUJVWU1VTFRJUExJRVIArAIACkxBTkRQUkVGSVgCBExBTkQACkRVQ0tQUkVGSVgCBERVQ0sADFdITVVMVElQTElFUgCAyK+gJQAKQVVDVElPTkZFRQCQTgAIcmVzVHlwZXMJAMwIAgIDT2lsCQDMCAICA09yZQkAzAgCAgRXb29kCQDMCAICBFNhbmQJAMwIAgIEQ2xheQkAzAgCAgdPcmdhbmljBQNuaWwACG1hdFR5cGVzCQDMCAICBEZ1ZWwJAMwIAgIFTWV0YWwJAMwIAgIFUGxhbmsJAMwIAgIFR2xhc3MJAMwIAgIHUGxhc3RpYwkAzAgCAgdQcm90ZWluBQNuaWwACXByb2RUeXBlcwkAzAgCAg1GaXJzdCBBaWQgS2l0CQDMCAICCEJhY2twYWNrCQDMCAICC0Zvb2QgUmF0aW9uCQDMCAICCEpldCBQYWNrCQDMCAICBVJhZGFyBQNuaWwACmNvbnRpbmVudHMJAMwIAgIIQW1lcmljYXMJAMwIAgIGRXVyb3BlCQDMCAICBEFzaWEJAMwIAgIGQWZyaWNhCQDMCAICB09jZWFuaWEFA25pbAAQcHJvZHVjdGlvbk1hdHJpeAkAzAgCAhAxXzFfMV8yXzJfNV8xXzEwCQDMCAICETJfNV81XzJfN181XzJfMTAwCQDMCAICEDFfMV8xXzJfMl81XzFfMTAJAMwIAgIROV85XzFfNV81XzFfNV8xMDAJAMwIAgIRMV81XzFfNV81XzFfMV8xMDAFA25pbAAPY29udElkeEFtZXJpY2FzAAAADWNvbnRJZHhFdXJvcGUAAQALY29udElkeEFzaWEAAgANY29udElkeEFmcmljYQADAA5jb250SWR4T2NlYW5pYQAEAR5rZXlGYWN0b3J5V2FyZWhvdXNlQnlJZEFuZFR5cGUCCWZhY3RvcnlJZAdyZXNUeXBlCQCsAgIJAKwCAgkArAICAhtmYWN0b3J5V2hCeUNvbnRpbmVudEFuZFJlc18FCWZhY3RvcnlJZAIBXwkApAMBBQdyZXNUeXBlAQ5rZXlPcmRlckJ5TGFuZAELbGFuZEFzc2V0SWQJAKwCAgIKbGFuZE9yZGVyXwULbGFuZEFzc2V0SWQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBEWtleUJhY2twYWNrQnlEdWNrAQtkdWNrQXNzZXRJZAkArAICAgliYWNrUGFja18FC2R1Y2tBc3NldElkAQ9rZXlEdWNrTG9jYXRpb24BC2R1Y2tBc3NldElkCQCsAgICDWR1Y2tMb2NhdGlvbl8FC2R1Y2tBc3NldElkAQprZXlCbG9ja2VkAAIQY29udHJhY3RzQmxvY2tlZAEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICCW5mdE93bmVyXwUHYXNzZXRJZAEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAgtzdGFrZWRUaW1lXwUHYXNzZXRJZAAPbG9jSWR4Q29udGluZW50AAAACmxvY0lkeFR5cGUAAQAIbG9jSWR4SWQAAgAKYnBJZHhMZXZlbAAAAAhicElkeFJlcwABAAhicElkeE1hdAACAAlicElkeFByb2QAAwAId2hJZHhWb2wAAAAId2hJZHhSZXMAAQAId2hJZHhNYXQAAgAJd2hJZHhQcm9kAAMADndoSWR4TG9ja2VkVm9sAAQACW9yZElkeFJlcwAAAAlvcmRJZHhNYXQAAQAKb3JkSWR4UHJvZAACAQhhc1N0cmluZwEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMJAAIBAhhmYWlsIHRvIGNhc3QgaW50byBTdHJpbmcBCGdldE9yZGVyAQZvcmRLZXkEAXAJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQZvcmRLZXkCMDBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwOjBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwOgIBOgkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCW9yZElkeFJlcwIBXwUGTlVNUkVTCQCRAwIFAXAFCW9yZElkeFJlcwIXMEAwXzBAMF8wQDBfMEAwXzBAMF8wQDAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQlvcmRJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQFwBQlvcmRJZHhNYXQCFzBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwCQDMCAIJAJEDAgUBcAUKb3JkSWR4UHJvZAUDbmlsARJnZXRXYXJlaG91c2VWb2x1bWUBCXZvbFByZWZpeAQFcGFydHMJALUJAgUJdm9sUHJlZml4AgFfCQBoAgkAaAIFDFdITVVMVElQTElFUgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwABAAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwYXJ0cwAAARlnZXRXYXJlaG91c2VDdXJyUmVzVm9sdW1lAQljdXJyZW50V2gKAQNzdW0CA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0KAAIkbAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhSZXMCAV8KAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA3N1bQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgEZZ2V0V2FyZWhvdXNlQ3Vyck1hdFZvbHVtZQEJY3VycmVudFdoCgEDc3VtAgNhY2MEaXRlbQkAZAIFA2FjYwkBDXBhcnNlSW50VmFsdWUBBQRpdGVtCgACJGwJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0AgFfCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNzdW0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYBG2dldFdhcmVob3VzZUN1cnJHb29kc1ZvbHVtZQEJY3VycmVudFdoBAVnb29kcwkAkQMCBQljdXJyZW50V2gFCXdoSWR4UHJvZAMJAAACBQVnb29kcwIAAAAKAQNzdW0CA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0KAAIkbAkAvAkCBQVnb29kcwIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDc3VtAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIBDHNlbGxJbnRlcm5hbAQFbG9jSWQHcmVzVHlwZQZhbW91bnQIbWluUHJpY2UEBXdoS2V5CQEea2V5RmFjdG9yeVdhcmVob3VzZUJ5SWRBbmRUeXBlAgUFbG9jSWQFB3Jlc1R5cGUEAncwCQELdmFsdWVPckVsc2UCCQCfCAEFBXdoS2V5AAAEAnIwAwkAZgIFAncwBRNGQUNUT1JZTUFYV0FSRUhPVVNFAAADCQBmAgkAZAIFAncwBQZhbW91bnQFE0ZBQ1RPUllNQVhXQVJFSE9VU0UJAGUCBRNGQUNUT1JZTUFYV0FSRUhPVVNFBQJ3MAUGYW1vdW50BAx1c2RuUmVjZWl2ZWQJAGQCCQBrAwUCcjAJAGUCCQBoAgUOU0VMTE1VTFRJUExJRVIFEFJFU09VUkNFUFJJQ0VNSU4JAGsDCQBkAgkAaAIAZAUCdzAJAGgCADIFAnIwBRBSRVNPVVJDRVBSSUNFTUlOBRNGQUNUT1JZTUFYV0FSRUhPVVNFBQZNVUxUMTAJAGsDCQBlAgUGYW1vdW50BQJyMAUQUkVTT1VSQ0VQUklDRU1JTgUFTVVMVDgEBW1pbjk5CQBlAgUIbWluUHJpY2UJAGkCBQhtaW5QcmljZQBkAwkAZgIJAGgCBQVtaW45OQUGYW1vdW50CQBoAgUMdXNkblJlY2VpdmVkBQVNVUxUOAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIPQWN0dWFsIHByaWNlID0gCQCkAwEFDHVzZG5SZWNlaXZlZAIDIC8gCQCkAwEFBmFtb3VudAIOIDwgbWluUHJpY2UgPSAJAKQDAQUIbWluUHJpY2UCAywgKAUFbG9jSWQCAiwgCQCRAwIFCHJlc1R5cGVzBQdyZXNUeXBlAgEpCQCUCgIJAQxJbnRlZ2VyRW50cnkCBQV3aEtleQkAZAIFAncwBQZhbW91bnQFDHVzZG5SZWNlaXZlZAELYnV5SW50ZXJuYWwEBWxvY0lkB21hdFR5cGUGYW1vdW50CG1heFByaWNlBAV3aEtleQkBHmtleUZhY3RvcnlXYXJlaG91c2VCeUlkQW5kVHlwZQIFBWxvY0lkBQdtYXRUeXBlBAJ3MAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQV3aEtleQAABAJtMQMJAGYCBQJ3MAUTRkFDVE9SWU1BWFdBUkVIT1VTRQkAlwMBCQDMCAIFBmFtb3VudAkAzAgCCQBlAgUCdzAFE0ZBQ1RPUllNQVhXQVJFSE9VU0UFA25pbAAABAJtMAkAlwMBCQDMCAIFAncwCQDMCAIJAGUCBQZhbW91bnQFAm0xBQNuaWwEAW0JAGQCBQJtMAUCbTEECXVzZG5TcGVudAkAZAIJAGsDBQJtMAkAZQIJAGgCBQ1CVVlNVUxUSVBMSUVSBRBSRVNPVVJDRVBSSUNFTUlOCQBrAwkAZQIJAGgCAGQFAncwCQBoAgAyBQJtMAUQUkVTT1VSQ0VQUklDRU1JTgUTRkFDVE9SWU1BWFdBUkVIT1VTRQUGTVVMVDEwCQBrAwUCbTEJAGgCAAIFEFJFU09VUkNFUFJJQ0VNSU4FBU1VTFQ4BAZtYXgxMDEJAGQCBQhtYXhQcmljZQkAaQIFCG1heFByaWNlAGQDCQBmAgkAaAIFCXVzZG5TcGVudAUFTVVMVDgJAGgCBQZtYXgxMDEFAW0JAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICD0FjdHVhbCBwcmljZSA9IAkApAMBBQl1c2RuU3BlbnQCAyAvIAkApAMBBQFtAg4gPiBtYXhQcmljZSA9IAkApAMBBQhtYXhQcmljZQIDLCAoBQVsb2NJZAICLCAJAJEDAgUIbWF0VHlwZXMFB21hdFR5cGUCASkJAJUKAwkBDEludGVnZXJFbnRyeQIFBXdoS2V5CQBlAgUCdzAFAW0FCXVzZG5TcGVudAUBbQELZ2V0QmFja3BhY2sBBWJwS2V5BAFwCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0BQVicEtleQIaMDowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoCAToJAMwIAgkApAMBCQELdmFsdWVPckVsc2UCCQC2CQEJAJEDAgUBcAUKYnBJZHhMZXZlbAAACQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhSZXMCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeFJlcwILMF8wXzBfMF8wXzAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQhicElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAXAFCGJwSWR4TWF0AgswXzBfMF8wXzBfMAkAzAgCCQCRAwIFAXAFCWJwSWR4UHJvZAUDbmlsAQxjaGVja0Jsb2NrZWQAAwkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ9zdGFraW5nQ29udHJhY3QJAQprZXlCbG9ja2VkAAcJAAIBAh9Db250cmFjdHMgYXJlIHVuZGVyIG1haW50ZW5hbmNlBQR1bml0AQlzZXRDb21tb24CA2FjYwRpdGVtBAFqCAUDYWNjAl8xBAlpdGVtUGFydHMJALUJAgUEaXRlbQIBQAMJAQIhPQIJAJADAQUJaXRlbVBhcnRzAAIJAAIBAi5JbmNvcnJlY3Qgb3JkZXIgZm9ybWF0LCBzaG91bGQgYmUgYW1vdW50QHByaWNlBAhuZXdPcmRBbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWl0ZW1QYXJ0cwAABAhuZXdPcmRQcgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWl0ZW1QYXJ0cwABBAluZXdPcmRVc2QJAGsDBQhuZXdPcmRBbQUIbmV3T3JkUHIFBU1VTFQ4BAN3aHAJAQ1wYXJzZUludFZhbHVlAQkAkQMCCAUDYWNjAl81BQFqBAtjdXJPcmRQYXJ0cwkAtQkCCQCRAwIIBQNhY2MCXzYFAWoCAUAECGN1ck9yZEFtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULY3VyT3JkUGFydHMAAAQIY3VyT3JkUHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtjdXJPcmRQYXJ0cwABAwkAZgIAAAUIY3VyT3JkUHIJAAIBAhdQcmljZSBjYW4ndCBiZSBuZWdhdGl2ZQQJY3VyT3JkVXNkCQBrAwUIY3VyT3JkQW0FCGN1ck9yZFByBQVNVUxUOAMJAAACBQhuZXdPcmRBbQAAAwkAZgIFCGN1ck9yZEFtAAAJAJgKBgkAZAIFAWoAAQkAzQgCCAUDYWNjAl8yCQCkAwEFA3docAkAZQIIBQNhY2MCXzMFCGN1ck9yZEFtCQBlAggFA2FjYwJfNAUJY3VyT3JkVXNkCAUDYWNjAl81CAUDYWNjAl82CQCYCgYJAGQCBQFqAAEJAM0IAggFA2FjYwJfMgkApAMBCQBlAgUDd2hwBQhjdXJPcmRBbQkAZAIIBQNhY2MCXzMFCGN1ck9yZEFtCAUDYWNjAl80CAUDYWNjAl81CAUDYWNjAl82AwkAZgIFCG5ld09yZEFtAAADCQBmAgAABQhjdXJPcmRBbQQGYW1EaWZmCQBkAgUIbmV3T3JkQW0FCGN1ck9yZEFtCQCYCgYJAGQCBQFqAAEJAM0IAggFA2FjYwJfMgkApAMBCQBlAgUDd2hwBQhjdXJPcmRBbQkAZAIIBQNhY2MCXzMFBmFtRGlmZgkAZAIIBQNhY2MCXzQFCW5ld09yZFVzZAgFA2FjYwJfNQgFA2FjYwJfNgkAmAoGCQBkAgUBagABCQDNCAIIBQNhY2MCXzIJAKQDAQUDd2hwCQBlAgkAZAIIBQNhY2MCXzMFCG5ld09yZEFtBQhjdXJPcmRBbQkAZQIJAGQCCAUDYWNjAl80BQluZXdPcmRVc2QFCWN1ck9yZFVzZAgFA2FjYwJfNQgFA2FjYwJfNgMJAGYCAAAFCGN1ck9yZEFtBAZhbURpZmYJAGUCBQhjdXJPcmRBbQUIbmV3T3JkQW0DCQBmAgAACQBlAgUDd2hwBQZhbURpZmYJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gdGFrZSAJAKQDAQUGYW1EaWZmAhogZnJvbSB3YXJlaG91c2UsIGJ1dCBvbmx5IAkApAMBBQN3aHACCiBhdmFpbGFibGUJAJgKBgkAZAIFAWoAAQkAzQgCCAUDYWNjAl8yCQCkAwEJAGUCBQN3aHAFBmFtRGlmZgkAZAIIBQNhY2MCXzMFBmFtRGlmZggFA2FjYwJfNAgFA2FjYwJfNQgFA2FjYwJfNgMJAGYCAAAJAGQCBQN3aHAFCG5ld09yZEFtCQACAQkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHRha2UgCQCkAwEJAQEtAQUIbmV3T3JkQW0CGiBmcm9tIHdhcmVob3VzZSwgYnV0IG9ubHkgCQCkAwEFA3docAIKIGF2YWlsYWJsZQkAmAoGCQBkAgUBagABCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIFA3docAUIbmV3T3JkQW0JAGUCCQBlAggFA2FjYwJfMwUIbmV3T3JkQW0FCGN1ck9yZEFtCQBlAggFA2FjYwJfNAUJY3VyT3JkVXNkCAUDYWNjAl81CAUDYWNjAl82AQxhY2NlcHRDb21tb24CA2FjYw1icE9yZFByb2RJdGVtBAFqCAUDYWNjAl83BA5icE9yZFByb2RQYXJ0cwkAtQkCBQ1icE9yZFByb2RJdGVtAgFAAwkBAiE9AgkAkAMBBQ5icE9yZFByb2RQYXJ0cwACCQACAQIuSW5jb3JyZWN0IG9yZGVyIGZvcm1hdCwgc2hvdWxkIGJlIGFtb3VudEBwcmljZQQHYnBPcmRBbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmJwT3JkUHJvZFBhcnRzAAAEB2JwT3JkUHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ5icE9yZFByb2RQYXJ0cwABAwkAZgIAAAUHYnBPcmRQcgkAAgECF1ByaWNlIGNhbid0IGJlIG5lZ2F0aXZlBAhicE9yZFVzZAkAawMFB2JwT3JkQW0FB2JwT3JkUHIFBU1VTFQ4BANicHAJAQ1wYXJzZUludFZhbHVlAQkAkQMCCAUDYWNjAl84BQFqBAN3aHAJAQ1wYXJzZUludFZhbHVlAQkAkQMCCAUDYWNjAl85BQFqBAp3aE9yZFBhcnRzCQC1CQIJAJEDAggFA2FjYwNfMTAFAWoCAUAEB3doT3JkQW0JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQp3aE9yZFBhcnRzAAAEB3doT3JkUHIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQp3aE9yZFBhcnRzAAEDAwkBAiE9AgUHYnBPcmRBbQAACQECIT0CBQdicE9yZFByBQd3aE9yZFByBwkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAgpQcmljZXMgb2YgCQCRAwIFCXByb2RUeXBlcwUBagIXIGRvbid0IG1hdGNoISBXSCBwcmljZT0JAKQDAQUHd2hPcmRQcgINLCB5b3VyIHByaWNlPQkApAMBBQdicE9yZFByBAh3aE9yZFVzZAkAawMFB3doT3JkQW0FB3doT3JkUHIFBU1VTFQ4AwkAAAIFB2JwT3JkQW0AAAkAnAoKCQDNCAIIBQNhY2MCXzEJAKQDAQUDd2hwCQDNCAIIBQNhY2MCXzIJAJEDAggFA2FjYwNfMTAFAWoJAM0IAggFA2FjYwJfMwkApAMBBQNicHAIBQNhY2MCXzQIBQNhY2MCXzUIBQNhY2MCXzYJAGQCCAUDYWNjAl83AAEIBQNhY2MCXzgIBQNhY2MCXzkIBQNhY2MDXzEwAwkAZgIFB2JwT3JkQW0AAAMJAGYCAAAFB3doT3JkQW0DCQBmAgUHYnBPcmRBbQkBAS0BBQd3aE9yZEFtCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICD0F0dGVtcHQgdG8gYnV5IAkApAMBBQdicE9yZEFtAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUBagIbLCBidXQgd2FyZWhvdXNlIG9ubHkgc2VsbHMgCQCkAwEJAQEtAQUHd2hPcmRBbQkAnAoKCQDNCAIIBQNhY2MCXzEJAKQDAQUDd2hwCQDNCAIIBQNhY2MCXzIJAKwCAgkArAICCQCkAwEJAGQCBQd3aE9yZEFtBQdicE9yZEFtAgFACQCkAwEFB3doT3JkUHIJAM0IAggFA2FjYwJfMwkApAMBCQBkAgUDYnBwBQdicE9yZEFtCQBkAggFA2FjYwJfNAUHYnBPcmRBbQgFA2FjYwJfNQkAZAIIBQNhY2MCXzYFCGJwT3JkVXNkCQBkAggFA2FjYwJfNwABCAUDYWNjAl84CAUDYWNjAl85CAUDYWNjA18xMAkAAgEJAKwCAgkArAICAg9BdHRlbXB0IHRvIGJ1eSAJAJEDAgUJcHJvZFR5cGVzBQFqAiAgd2hpbGUgd2FyZWhvdXNlIGRvZXNuJ3Qgc2VsbCBpdAMJAGYCBQd3aE9yZEFtAAADCQBmAgkBAS0BBQdicE9yZEFtBQd3aE9yZEFtCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICEEF0dGVtcHQgdG8gc2VsbCAJAKQDAQkBAS0BBQdicE9yZEFtAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUBagIaLCBidXQgd2FyZWhvdXNlIG9ubHkgYnV5cyAJAKQDAQUHd2hPcmRBbQMJAGYCCQEBLQEFB2JwT3JkQW0FA2JwcAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhBBdHRlbXB0IHRvIHNlbGwgCQCkAwEJAQEtAQUHYnBPcmRBbQIULCBidXQgeW91IG9ubHkgaGF2ZSAJAKQDAQUDYnBwAgQgb2YgCQCRAwIFCXByb2RUeXBlcwUBagkAnAoKCQDNCAIIBQNhY2MCXzEJAKQDAQkAZQIFA3docAUHYnBPcmRBbQkAzQgCCAUDYWNjAl8yCQCsAgIJAKwCAgkApAMBCQBkAgUHd2hPcmRBbQUHYnBPcmRBbQIBQAkApAMBBQd3aE9yZFByCQDNCAIIBQNhY2MCXzMJAKQDAQkAZAIFA2JwcAUHYnBPcmRBbQkAZQIIBQNhY2MCXzQFB2JwT3JkQW0JAGUCCAUDYWNjAl81BQhicE9yZFVzZAgFA2FjYwJfNgkAZAIIBQNhY2MCXzcAAQgFA2FjYwJfOAgFA2FjYwJfOQgFA2FjYwNfMTAJAAIBCQCsAgIJAKwCAgIQQXR0ZW1wdCB0byBzZWxsIAkAkQMCBQlwcm9kVHlwZXMFAWoCHyB3aGlsZSB3YXJlaG91c2UgZG9lc24ndCBidXkgaXQIAWkBDWNvbnN0cnVjdG9yVjEBCHJlc3RBZGRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDmtleVJlc3RBZGRyZXNzAAUIcmVzdEFkZHIFA25pbAFpAQ1zZWxsUmVzb3VyY2VzAgdhbW91bnRzCW1pblByaWNlcwQHYmxvY2tlZAkBDGNoZWNrQmxvY2tlZAADCQAAAgUHYmxvY2tlZAUHYmxvY2tlZAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIqc2VsbFJlc291cmNlcyBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBAtjdXJMb2NhdGlvbgkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04CAV8DCQECIT0CCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlAgFGCQACAQkArAICAi1EdWNrIGxvY2F0aW9uIHR5cGUgc2hvdWxkIGJlIEZhY3RvcnksIGJ1dCBpcyAJAJEDAgULY3VyTG9jYXRpb24FCmxvY0lkeFR5cGUEBWxvY0lkCQCRAwIFC2N1ckxvY2F0aW9uBQhsb2NJZHhJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAdyZXNMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfCgEFYWRkZXICA2FjYwFqAwkAZgIJAJEDAgUHYW1vdW50cwUBagkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3Jlc0xpc3QFAWoJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIJWW91IGhhdmUgCQCRAwIFB3Jlc0xpc3QFAWoCBCBvZiAJAJEDAgUIcmVzVHlwZXMFAWoCFCwgYnV0IHRyaWVkIHRvIHNlbGwgCQCkAwEJAJEDAgUHYW1vdW50cwUBagMJAGYCAAAJAJEDAgUHYW1vdW50cwUBagkAAgEJAKwCAgkArAICCQCsAgICJVlvdSB0cmllZCB0byBzZWxsIG5lZ2F0aXZlIGFtb3VudCBvZiAJAJEDAgUIcmVzVHlwZXMFAWoCAjogCQCkAwEJAJEDAgUHYW1vdW50cwUBagMJAGYCCQCRAwIFB2Ftb3VudHMFAWoAAAQBYgkBDHNlbGxJbnRlcm5hbAQFBWxvY0lkBQFqCQCRAwIFB2Ftb3VudHMFAWoJAJEDAgUJbWluUHJpY2VzBQFqCQCVCgMJAM0IAggFA2FjYwJfMQgFAWICXzEJAM0IAggFA2FjYwJfMgkApAMBCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3Jlc0xpc3QFAWoJAJEDAgUHYW1vdW50cwUBagkAZAIIBQNhY2MCXzMIBQFiAl8yCQCVCgMIBQNhY2MCXzEJAM0IAggFA2FjYwJfMgkAkQMCBQdyZXNMaXN0BQFqCAUDYWNjAl8zBAZtZXJnZWQKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQHbmV3UGFjawkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAuQkCCAUGbWVyZ2VkAl8yAgFfCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BAZyZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVCYWNrcGFjawkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQduZXdQYWNrBQNuaWwFA25pbAkAlAoCCQDNCAIIBQZtZXJnZWQCXzEJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcggFBm1lcmdlZAJfMwULdXNkbkFzc2V0SWQFBnJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQxidXlNYXRlcmlhbHMCB2Ftb3VudHMJbWF4UHJpY2VzBAdibG9ja2VkCQEMY2hlY2tCbG9ja2VkAAMJAAACBQdibG9ja2VkBQdibG9ja2VkBAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCHldBVkVTIGNhbid0IGJlIHVzZWQgYXMgcGF5bWVudAMJAQIhPQIFCnBtdEFzc2V0SWQFC3VzZG5Bc3NldElkCQACAQITVVNETiBwYXltZW50cyBvbmx5IQQLY3VyTG9jYXRpb24JALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OAgFfAwkBAiE9AgkAkQMCBQtjdXJMb2NhdGlvbgUKbG9jSWR4VHlwZQIBRgkAAgEJAKwCAgItRHVjayBsb2NhdGlvbiB0eXBlIHNob3VsZCBiZSBGYWN0b3J5LCBidXQgaXMgCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlBAVsb2NJZAkAkQMCBQtjdXJMb2NhdGlvbgUIbG9jSWR4SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQHbWF0TGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwoBCG1VcGRhdGVyAgNhY2MBagMJAGYCAAAJAJEDAgUHYW1vdW50cwUBagkAAgEJAKwCAgkArAICCQCsAgICJFlvdSB0cmllZCB0byBidXkgbmVnYXRpdmUgYW1vdW50IG9mIAkAkQMCBQhtYXRUeXBlcwUBagICOiAJAKQDAQkAkQMCBQdhbW91bnRzBQFqAwkAZgIJAJEDAgUHYW1vdW50cwUBagAABAFiCQELYnV5SW50ZXJuYWwEBQVsb2NJZAUBagkAkQMCBQdhbW91bnRzBQFqCQCRAwIFCW1heFByaWNlcwUBagkAlQoDCQDNCAIIBQNhY2MCXzEIBQFiAl8xCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0BQFqCAUBYgJfMwkAZAIIBQNhY2MCXzMIBQFiAl8yCQCVCgMIBQNhY2MCXzEJAM0IAggFA2FjYwJfMgkAkQMCBQdtYXRMaXN0BQFqCAUDYWNjAl8zBAZtZXJnZWQKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhtVXBkYXRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgMJAGYCCAUGbWVyZ2VkAl8zBQNhbXQJAAIBCQCsAgIJAKwCAgkArAICAh9JbnN1ZmZpY2llbnQgcGF5bWVudCEgQXR0YWNoZWQ9CQCkAwEFA2FtdAILLCByZXF1aXJlZD0JAKQDAQgFBm1lcmdlZAJfMwQHbmV3UGFjawkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgkAuQkCCAUGbWVyZ2VkAl8yAgFfCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BAZyZXN1bHQJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVCYWNrcGFjawkAzAgCBQtkdWNrQXNzZXRJZAkAzAgCBQduZXdQYWNrBQNuaWwFA25pbAQEcmVzdAMJAGYCCQBlAgUDYW10CAUGbWVyZ2VkAl8zAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBlAgUDYW10CAUGbWVyZ2VkAl8zBQt1c2RuQXNzZXRJZAUDbmlsBQNuaWwJAJQKAgkAzggCCAUGbWVyZ2VkAl8xBQRyZXN0BQZyZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQERZXhjaGFuZ2VSZXNvdXJjZXMBB2Ftb3VudHMEB2Jsb2NrZWQJAQxjaGVja0Jsb2NrZWQAAwkAAAIFB2Jsb2NrZWQFB2Jsb2NrZWQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50BApwbXRBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQNwbXQHYXNzZXRJZAIeV0FWRVMgY2FuJ3QgYmUgdXNlZCBhcyBwYXltZW50AwkBAiE9AgUKcG10QXNzZXRJZAULdXNkbkFzc2V0SWQJAAIBAhNVU0ROIHBheW1lbnRzIG9ubHkhBAtjdXJMb2NhdGlvbgkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04CAV8DCQECIT0CCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlAgFGCQACAQkArAICAi1EdWNrIGxvY2F0aW9uIHR5cGUgc2hvdWxkIGJlIEZhY3RvcnksIGJ1dCBpcyAJAJEDAgULY3VyTG9jYXRpb24FCmxvY0lkeFR5cGUEBWxvY0lkCQCRAwIFC2N1ckxvY2F0aW9uBQhsb2NJZHhJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAdyZXNMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAdtYXRMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfCgEJZXhjaGFuZ2VyAgNhY2MBagQFd2hLZXkJAR5rZXlGYWN0b3J5V2FyZWhvdXNlQnlJZEFuZFR5cGUCBQVsb2NJZAUBagQCdzAJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUFd2hLZXkAAAQDYW1qCQCRAwIFB2Ftb3VudHMFAWoDCQBmAgUDYW1qCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVzTGlzdAUBagkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAglZb3UgaGF2ZSAJAJEDAgUHcmVzTGlzdAUBagIEIG9mIAkAkQMCBQhyZXNUeXBlcwUBagIYLCBidXQgdHJpZWQgdG8gZXhjaGFuZ2UgCQCkAwEFA2FtagMJAGYCAAAFA2FtagkAAgEJAKwCAgkArAICCQCsAgICKVlvdSB0cmllZCB0byBleGNoYW5nZSBuZWdhdGl2ZSBhbW91bnQgb2YgCQCRAwIFCHJlc1R5cGVzBQFqAgI6IAkApAMBBQNhbWoDCQBmAgUDYW1qAAAJAJYKBAkAzQgCCAUDYWNjAl8xCQCkAwEJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVzTGlzdAUBagUDYW1qCQDNCAIIBQNhY2MCXzIJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0BQFqBQNhbWoJAGQCCAUDYWNjAl8zCQBrAwUDYW1qBRBSRVNPVVJDRVBSSUNFTUlOBQVNVUxUOAkAzQgCCAUDYWNjAl80CQEMSW50ZWdlckVudHJ5AgUFd2hLZXkFAncwCQCWCgQJAM0IAggFA2FjYwJfMQkAkQMCBQdyZXNMaXN0BQFqCQDNCAIIBQNhY2MCXzIJAJEDAgUHbWF0TGlzdAUBaggFA2FjYwJfMwgFA2FjYwJfNAQGbWVyZ2VkCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJYKBAUDbmlsBQNuaWwAAAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlleGNoYW5nZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYDCQBmAggFBm1lcmdlZAJfMwUDYW10CQACAQkArAICCQCsAgIJAKwCAgIfSW5zdWZmaWNpZW50IHBheW1lbnQhIEF0dGFjaGVkPQkApAMBBQNhbXQCCywgcmVxdWlyZWQ9CQCkAwEIBQZtZXJnZWQCXzMEB25ld1BhY2sJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJALkJAggFBm1lcmdlZAJfMQIBXwkAzAgCCQC5CQIIBQZtZXJnZWQCXzICAV8JAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToEBnJlc3VsdAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUJhY2twYWNrCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFB25ld1BhY2sFA25pbAUDbmlsBARyZXN0AwkAZgIJAGUCBQNhbXQIBQZtZXJnZWQCXzMAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGUCBQNhbXQIBQZtZXJnZWQCXzMFC3VzZG5Bc3NldElkBQNuaWwFA25pbAkAlAoCCQDOCAIFBHJlc3QIBQZtZXJnZWQCXzQFBnJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhidXlHb29kcwMKcHJvZHVjdElkeAVsZXZlbAhxdWFudGl0eQQHYmxvY2tlZAkBDGNoZWNrQmxvY2tlZAADCQAAAgUHYmxvY2tlZAUHYmxvY2tlZAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECJWJ1eUdvb2RzIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMDCQBmAgAABQhxdWFudGl0eQkAAgECG1F1YW50aXR5IHNob3VsZCBiZSBwb3NpdGl2ZQQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04CAV8DCQECIT0CCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlAgFNCQACAQkArAICAjFEdWNrIGxvY2F0aW9uIHR5cGUgc2hvdWxkIGJlIE1hbnVmYWN0b3J5LCBidXQgaXMgCQCRAwIFC2N1ckxvY2F0aW9uBQpsb2NJZHhUeXBlBARjb250CQCRAwIFC2N1ckxvY2F0aW9uBQ9sb2NJZHhDb250aW5lbnQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQHbWF0TGlzdAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwMDCQBmAgAABQpwcm9kdWN0SWR4BgkAZwIFCnByb2R1Y3RJZHgJAJADAQUQcHJvZHVjdGlvbk1hdHJpeAkAAgEJAKwCAgIUVW5rbm93biBwcm9kdWN0IGlkeD0JAKQDAQUKcHJvZHVjdElkeAQOcHJvZHVjdENvbnRJZHgJAGoCBQpwcm9kdWN0SWR4CQCQAwEFCmNvbnRpbmVudHMDCQECIT0CCQCRAwIFCmNvbnRpbmVudHMFDnByb2R1Y3RDb250SWR4BQRjb250CQACAQkArAICCQCsAgIJAKwCAgIdVGhpcyBwcm9kdWN0IGlzIGF2YWlsYWJsZSBpbiAJAJEDAgUKY29udGluZW50cwUOcHJvZHVjdENvbnRJZHgCESwgYnV0IHlvdSBhcmUgaW4gBQRjb250BAZyZWNpcGUJALUJAgkAkQMCBRBwcm9kdWN0aW9uTWF0cml4BQpwcm9kdWN0SWR4AgFfAwkBAiE9AgkAkAMBBQZyZWNpcGUJAGQCBQZOVU1SRVMAAgkAAgEJAKwCAgIXRmF0YWw6IHVua25vd24gcmVjaXBlOiAJAJEDAgUQcHJvZHVjdGlvbk1hdHJpeAUKcHJvZHVjdElkeAQIcHJvZExpc3QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8KAQZmaWxsZXICA2FjYwtpZ25vcmVkSXRlbQQBbggFA2FjYwJfMgQBeAMJAGYCCQCQAwEFCHByb2RMaXN0BQFuCQC1CQIJAJEDAgUIcHJvZExpc3QFAW4CASwJAMwIAgIBMAkAzAgCAgEwCQDMCAICATAFA25pbAQDeDFzCQCRAwIFAXgAAAQCeDEJAQ1wYXJzZUludFZhbHVlAQUDeDFzBAN4MnMJAJEDAgUBeAABBAJ4MgkBDXBhcnNlSW50VmFsdWUBBQN4MnMEA3gzcwkAkQMCBQF4AAIEAngzCQENcGFyc2VJbnRWYWx1ZQEFA3gzcwQGYW1vdW50CQBoAgUIcXVhbnRpdHkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZyZWNpcGUABwQBeQMJAAACBQFuBQpwcm9kdWN0SWR4BAckbWF0Y2gwBQVsZXZlbAMJAAACAAEFByRtYXRjaDAJAKwCAgkArAICCQCsAgIJAKwCAgkApAMBCQBkAgUCeDEFBmFtb3VudAIBLAUDeDJzAgEsBQN4M3MDCQAAAgACBQckbWF0Y2gwCQCsAgIJAKwCAgkArAICCQCsAgIFA3gxcwIBLAkApAMBCQBkAgUCeDIFBmFtb3VudAIBLAUDeDNzAwkAAAIAAwUHJG1hdGNoMAkArAICCQCsAgIJAKwCAgkArAICBQN4MXMCASwFA3gycwIBLAkApAMBCQBkAgUCeDMFBmFtb3VudAkAAgEJAKwCAgIiUHJvZHVjdCBsZXZlbCBzaG91bGQgYmUgMS4uMywgbm90IAkApAMBBQVsZXZlbAkArAICCQCsAgIJAKwCAgkArAICBQN4MXMCASwFA3gycwIBLAUDeDNzCQCUCgIJAM0IAggFA2FjYwJfMQUBeQkAZAIFAW4AAQQGYnBQcm9kCAoAAiRsBRBwcm9kdWN0aW9uTWF0cml4CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGZmlsbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADICXzEKAQhwcm9kdWNlcgIDYWNjAWoEB25lZWRNYXQJAGgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUGcmVjaXBlBQFqBQhxdWFudGl0eQQHaGF2ZU1hdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB21hdExpc3QFAWoDCQBmAgUHbmVlZE1hdAUHaGF2ZU1hdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIJWW91IGhhdmUgCQCRAwIFB21hdExpc3QFAWoCBCBvZiAJAJEDAgUIbWF0VHlwZXMFAWoCFiwgYnV0IHJlY2lwZSByZXF1aXJlcyAJAKQDAQUHbmVlZE1hdAIOIGZvciBxdWFudGl0eSAJAKQDAQUIcXVhbnRpdHkDCQBmAgUHbmVlZE1hdAAACQDNCAIFA2FjYwkApAMBCQBlAgUHaGF2ZU1hdAUHbmVlZE1hdAkAzQgCBQNhY2MJAJEDAgUHbWF0TGlzdAUBagQGbWVyZ2VkCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIcHJvZHVjZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYEB25ld1BhY2sJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIJALkJAgUGbWVyZ2VkAgFfCQDMCAIJALkJAgUGYnBQcm9kAgFfBQNuaWwCAToEBnJlc3VsdAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCDnVwZGF0ZUJhY2twYWNrCQDMCAIFC2R1Y2tBc3NldElkCQDMCAIFB25ld1BhY2sFA25pbAUDbmlsCQCUCgIFA25pbAUGcmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBFGFjY2VwdFNlcnZpY2VQYXltZW50AQdzZXJ2aWNlBAdibG9ja2VkCQEMY2hlY2tCbG9ja2VkAAMJAAACBQdibG9ja2VkBQdibG9ja2VkAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQECnBtdEFzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFA3BtdAdhc3NldElkAh5XQVZFUyBjYW4ndCBiZSB1c2VkIGFzIHBheW1lbnQDCQECIT0CBQpwbXRBc3NldElkBQt1c2RuQXNzZXRJZAkAAgECE1VTRE4gcGF5bWVudHMgb25seSEEBG5lZWQEByRtYXRjaDAFB3NlcnZpY2UDCQAAAgILTEFORF9SRU5BTUUFByRtYXRjaDAAgK3iBAkAAgECEFVua25vd24gc2VydmljZSEDCQECIT0CBQNhbXQFBG5lZWQJAAIBCQCsAgIJAKwCAgkArAICBQdzZXJ2aWNlAgcgY29zdHMgCQCkAwEFBG5lZWQCBSBVU0ROCQCUCgIFA25pbAUDYW10CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEXNldFdhcmVob3VzZU9yZGVyAgxjYXJnb0xpc3RTdHILbGFuZEFzc2V0SWQEBHVzZXIIBQFpDG9yaWdpbkNhbGxlcgQEYWRkcgkApQgBBQR1c2VyBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkAwkBASEBCQEJaXNEZWZpbmVkAQkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBApjYXJnb1BhcnRzCQC8CQIFDGNhcmdvTGlzdFN0cgIBOgMJAQIhPQIJAJADAQUKY2FyZ29QYXJ0cwADCQACAQI0Y2FyZ29MaXN0U3RyIHNob3VsZCBjb250YWluIGV4YWN0bHkgMiAnOicgc2VwYXJhdG9ycwQIcmVzUGFydHMJALUJAgkAkQMCBQpjYXJnb1BhcnRzAAACAV8ECG1hdFBhcnRzCQC1CQIJAJEDAgUKY2FyZ29QYXJ0cwABAgFfBAlwcm9kUGFydHMDCQAAAgkAkQMCBQpjYXJnb1BhcnRzAAICAAUDbmlsCQC1CQIJAJEDAgUKY2FyZ29QYXJ0cwACAgFfAwkBAiE9AgkAkAMBBQhyZXNQYXJ0cwUGTlVNUkVTCQACAQIgQWxsIDYgcmVzb3VyY2VzIHNob3VsZCBiZSBwYXNzZWQDCQECIT0CCQCQAwEFCG1hdFBhcnRzBQZOVU1SRVMJAAIBAiBBbGwgNiBtYXRlcmlhbHMgc2hvdWxkIGJlIHBhc3NlZAQCd2gJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AhRnZXRXYXJlaG91c2VSRUFET05MWQkAzAgCBQtsYW5kQXNzZXRJZAUDbmlsBQNuaWwECWN1cnJlbnRXaAkAvAkCBQJ3aAIBOgQJY3VycldoUmVzCQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeFJlcwIBXwQJY3VycldoTWF0CQC1CQIJAJEDAgUJY3VycmVudFdoBQh3aElkeE1hdAIBXwQKY3VycldoUHJvZAMJAAACCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFCWN1cnJlbnRXaAUJd2hJZHhQcm9kAgFfBAxjdXJyV2hSZXNWb2wJARlnZXRXYXJlaG91c2VDdXJyUmVzVm9sdW1lAQUJY3VycmVudFdoBAxjdXJyV2hNYXRWb2wJARlnZXRXYXJlaG91c2VDdXJyTWF0Vm9sdW1lAQUJY3VycmVudFdoBA5jdXJyV2hHb29kc1ZvbAkBG2dldFdhcmVob3VzZUN1cnJHb29kc1ZvbHVtZQEFCWN1cnJlbnRXaAQPY3VycldoTG9ja2VkVm9sCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJY3VycmVudFdoBQ53aElkeExvY2tlZFZvbAQLd2hTcGFjZUxlZnQJAGUCCQBlAgkAZQIJAGUCCQESZ2V0V2FyZWhvdXNlVm9sdW1lAQkAkQMCBQljdXJyZW50V2gFCHdoSWR4Vm9sBQxjdXJyV2hSZXNWb2wFDGN1cnJXaE1hdFZvbAUOY3VycldoR29vZHNWb2wFD2N1cnJXaExvY2tlZFZvbAQGb3JkS2V5CQEOa2V5T3JkZXJCeUxhbmQBBQtsYW5kQXNzZXRJZAQKY3VycmVudE9yZAkBCGdldE9yZGVyAQUGb3JkS2V5BA1jdXJyZW50T3JkUmVzCQC1CQIJAJEDAgUKY3VycmVudE9yZAUJb3JkSWR4UmVzAgFfBA1jdXJyZW50T3JkTWF0CQC1CQIJAJEDAgUKY3VycmVudE9yZAUJb3JkSWR4TWF0AgFfBA5jdXJyZW50T3JkUHJvZAMJAAACCQCRAwIFCmN1cnJlbnRPcmQFCm9yZElkeFByb2QCAAUDbmlsCQC1CQIJAJEDAgUKY3VycmVudE9yZAUKb3JkSWR4UHJvZAIBXwQNdXNkbk5lZWQyTG9jawAABAFyCgACJGwFCHJlc1BhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAmAoGAAAFA25pbAAAAAAFCWN1cnJXaFJlcwUNY3VycmVudE9yZFJlcwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJc2V0Q29tbW9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAFtCgACJGwFCG1hdFBhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAmAoGAAAFA25pbAgFAXICXzMIBQFyAl80BQljdXJyV2hNYXQFDWN1cnJlbnRPcmRNYXQKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCXNldENvbW1vbgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgQBcAoAAiRsBQlwcm9kUGFydHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCYCgYAAAUDbmlsCAUBbQJfMwgFAW0CXzQFCmN1cnJXaFByb2QFDmN1cnJlbnRPcmRQcm9kCgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlzZXRDb21tb24CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgQIdm9sU2FsZG8IBQFwAl8zAwkAZgIFCHZvbFNhbGRvBQt3aFNwYWNlTGVmdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgITQXR0ZW1wdCB0byByZXNlcnZlIAkApAMBBQh2b2xTYWxkbwIRIHNwYWNlLCBidXQgb25seSAJAKQDAQULd2hTcGFjZUxlZnQCFSB3YXJlaG91c2Ugc3BhY2UgbGVmdAQFd2hTdHIJALoJAgkAzAgCCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhWb2wJAMwIAgkAuQkCCAUBcgJfMgIBXwkAzAgCCQC5CQIIBQFtAl8yAgFfCQDMCAIJALkJAggFAXACXzICAV8JAMwIAgkApAMBBQh2b2xTYWxkbwUDbmlsAgE6BAZ3aFNhdmUJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag1zYXZlV2FyZWhvdXNlCQDMCAIFBXdoU3RyCQDMCAIFC2xhbmRBc3NldElkBQNuaWwFA25pbAMJAAACBQZ3aFNhdmUFBndoU2F2ZQQIdXNkU2FsZG8IBQFwAl80AwkAZgIFCHVzZFNhbGRvAAADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAQKcG10QXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCAUDcG10B2Fzc2V0SWQCHldBVkVTIGNhbid0IGJlIHVzZWQgYXMgcGF5bWVudAMJAQIhPQIFCnBtdEFzc2V0SWQFC3VzZG5Bc3NldElkCQACAQITVVNETiBwYXltZW50cyBvbmx5IQMJAQIhPQIFA2FtdAUIdXNkU2FsZG8JAAIBCQCsAgICElBheW1lbnQgbmVlZGVkIGlzIAkApAMBBQh1c2RTYWxkbwkAzAgCCQELU3RyaW5nRW50cnkCBQZvcmRLZXkFDGNhcmdvTGlzdFN0cgUDbmlsAwkAAAIFCHVzZFNhbGRvAAADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhJObyBwYXltZW50cyBuZWVkZWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUGb3JkS2V5BQxjYXJnb0xpc3RTdHIFA25pbAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECEk5vIHBheW1lbnRzIG5lZWRlZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQR1c2VyCQEBLQEFCHVzZFNhbGRvBQt1c2RuQXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCBQZvcmRLZXkFDGNhcmdvTGlzdFN0cgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBFGFjY2VwdFdhcmVob3VzZU9yZGVyAwpicE9yZGVyU3RyC2xhbmRBc3NldElkC2R1Y2tBc3NldElkBAZjYWxsZXIIBQFpDG9yaWdpbkNhbGxlcgQKY2FsbGVyQWRkcgkApQgBBQZjYWxsZXIEEXN0YWtlZER1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQpjYWxsZXJBZGRyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAtjdXJMb2NhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBRFzdGFrZWREdWNrQXNzZXRJZAUPREVGQVVMVExPQ0FUSU9OBANsb2MJALUJAgkBBXZhbHVlAQULY3VyTG9jYXRpb24CAV8DCQECIT0CCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQIBTAkAAgEJAKwCAgkArAICAhZEdWNrIGxvY2F0aW9uIHR5cGUgaXMgCQCRAwIFA2xvYwUKbG9jSWR4VHlwZQIRLCBidXQgc2hvdWxkIGJlIEwDCQECIT0CBRFzdGFrZWREdWNrQXNzZXRJZAULZHVja0Fzc2V0SWQJAAIBCQCsAgIJAKwCAgkArAICAhRZb3VyIHN0YWtlZCBkdWNrIGlzIAURc3Rha2VkRHVja0Fzc2V0SWQCDSwgYnV0IHBhc3NlZCAFC2R1Y2tBc3NldElkBAlsYW5kQXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkCQACAQkArAICCQCsAgICBE5GVCAIBQlsYW5kQXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQECWxhbmRPd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFCWxhbmRBc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQAAAgUJbGFuZE93bmVyBQpjYWxsZXJBZGRyCQACAQIeWW91IGNhbm5vdCB0cmFkZSB3aXRoIHlvdXJzZWxmBAxicE9yZGVyUGFydHMJALwJAgUKYnBPcmRlclN0cgIBOgMJAQIhPQIJAJADAQUMYnBPcmRlclBhcnRzAAMJAAIBAjJicE9yZGVyU3RyIHNob3VsZCBjb250YWluIGV4YWN0bHkgMiAnOicgc2VwYXJhdG9ycwQIYnBPcmRSZXMJALUJAgkAkQMCBQxicE9yZGVyUGFydHMAAAIBXwQIYnBPcmRNYXQJALUJAgkAkQMCBQxicE9yZGVyUGFydHMAAQIBXwQJYnBPcmRQcm9kAwkAAAIJAJEDAgUMYnBPcmRlclBhcnRzAAICAAUDbmlsCQC1CQIJAJEDAgUMYnBPcmRlclBhcnRzAAICAV8DCQECIT0CCQCQAwEFCGJwT3JkUmVzBQZOVU1SRVMJAAIBAiBBbGwgNiByZXNvdXJjZXMgc2hvdWxkIGJlIHBhc3NlZAMJAQIhPQIJAJADAQUIYnBPcmRNYXQFBk5VTVJFUwkAAgECIEFsbCA2IG1hdGVyaWFscyBzaG91bGQgYmUgcGFzc2VkBAJ3aAkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCFGdldFdhcmVob3VzZVJFQURPTkxZCQDMCAIFC2xhbmRBc3NldElkBQNuaWwFA25pbAQJY3VycmVudFdoCQC8CQIFAndoAgE6BAljdXJyV2hSZXMJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4UmVzAgFfBAljdXJyV2hNYXQJALUJAgkAkQMCBQljdXJyZW50V2gFCHdoSWR4TWF0AgFfBApjdXJyV2hQcm9kAwkAAAIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAAUDbmlsCQC1CQIJAJEDAgUJY3VycmVudFdoBQl3aElkeFByb2QCAV8EDGN1cnJXaFJlc1ZvbAkBGWdldFdhcmVob3VzZUN1cnJSZXNWb2x1bWUBBQljdXJyZW50V2gEDGN1cnJXaE1hdFZvbAkBGWdldFdhcmVob3VzZUN1cnJNYXRWb2x1bWUBBQljdXJyZW50V2gEDmN1cnJXaEdvb2RzVm9sCQEbZ2V0V2FyZWhvdXNlQ3Vyckdvb2RzVm9sdW1lAQUJY3VycmVudFdoBA9jdXJyV2hMb2NrZWRWb2wJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQljdXJyZW50V2gFDndoSWR4TG9ja2VkVm9sBAt3aFNwYWNlTGVmdAkAZQIJAGUCCQBlAgkAZQIJARJnZXRXYXJlaG91c2VWb2x1bWUBCQCRAwIFCWN1cnJlbnRXaAUId2hJZHhWb2wFDGN1cnJXaFJlc1ZvbAUMY3VycldoTWF0Vm9sBQ5jdXJyV2hHb29kc1ZvbAUPY3VycldoTG9ja2VkVm9sBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQJYnBSZXNMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAlicE1hdExpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8ECmJwUHJvZExpc3QDCQAAAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kAgAFA25pbAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QCAV8EBm9yZEtleQkBDmtleU9yZGVyQnlMYW5kAQULbGFuZEFzc2V0SWQEBXdoT3JkCQEIZ2V0T3JkZXIBBQZvcmRLZXkECHdoT3JkUmVzCQC1CQIJAJEDAgUFd2hPcmQFCW9yZElkeFJlcwIBXwQId2hPcmRNYXQJALUJAgkAkQMCBQV3aE9yZAUJb3JkSWR4TWF0AgFfBAl3aE9yZFByb2QDCQAAAgkAkQMCBQV3aE9yZAUKb3JkSWR4UHJvZAIABQNuaWwJALUJAgkAkQMCBQV3aE9yZAUKb3JkSWR4UHJvZAIBXwQNdXNkbk5lZWQyTG9jawAABAFyCgACJGwFCGJwT3JkUmVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAnAoKBQNuaWwFA25pbAUDbmlsAAAAAAAAAAAFCWJwUmVzTGlzdAUJY3VycldoUmVzBQh3aE9yZFJlcwoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYWNjZXB0Q29tbW9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAFtCgACJGwFCGJwT3JkTWF0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAnAoKBQNuaWwFA25pbAUDbmlsCAUBcgJfNAgFAXICXzUIBQFyAl82AAAFCWJwTWF0TGlzdAUJY3VycldoTWF0BQh3aE9yZE1hdAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYWNjZXB0Q29tbW9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAFwCgACJGwFCWJwT3JkUHJvZAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJwKCgUDbmlsBQNuaWwFA25pbAgFAW0CXzQIBQFtAl81CAUBbQJfNgAABQpicFByb2RMaXN0BQpjdXJyV2hQcm9kBQl3aE9yZFByb2QKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDGFjY2VwdENvbW1vbgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgNTAJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyBAh2b2xTYWxkbwgFAXACXzQEDG5ld0xvY2tlZFZvbAMJAGYCAAAJAGUCBQ9jdXJyV2hMb2NrZWRWb2wFCHZvbFNhbGRvAAAJAGUCBQ9jdXJyV2hMb2NrZWRWb2wFCHZvbFNhbGRvBAV3aFN0cgkAugkCCQDMCAIJAJEDAgUJY3VycmVudFdoBQh3aElkeFZvbAkAzAgCCQC5CQIIBQFyAl8xAgFfCQDMCAIJALkJAggFAW0CXzECAV8JAMwIAgkAuQkCCAUBcAJfMQIBXwkAzAgCCQCkAwEFDG5ld0xvY2tlZFZvbAUDbmlsAgE6BAtuZXdXaE9yZFN0cgkAugkCCQDMCAIJALkJAggFAXICXzICAV8JAMwIAgkAuQkCCAUBbQJfMgIBXwkAzAgCCQC5CQIIBQFwAl8yAgFfBQNuaWwCAToECG5ld0JwU3RyCQC6CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQC5CQIIBQFyAl8zAgFfCQDMCAIJALkJAggFAW0CXzMCAV8JAMwIAgkAuQkCCAUBcAJfMwIBXwUDbmlsAgE6BAZ3aFNhdmUJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag1zYXZlV2FyZWhvdXNlCQDMCAIFBXdoU3RyCQDMCAIFC2xhbmRBc3NldElkBQNuaWwFA25pbAMJAAACBQZ3aFNhdmUFBndoU2F2ZQQGYnBTYXZlCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQmFja3BhY2sJAMwIAgULZHVja0Fzc2V0SWQJAMwIAgUIbmV3QnBTdHIFA25pbAUDbmlsAwkAAAIFBmJwU2F2ZQUGYnBTYXZlBAdhY3Rpb25zCQDMCAIJAQtTdHJpbmdFbnRyeQIFBm9yZEtleQULbmV3V2hPcmRTdHIFA25pbAQLdXNkV2gyQnBGZWUJAGsDCAUBcAJfNQUKQVVDVElPTkZFRQUFTVVMVDYEDXVzZFdoMkJwU2FsZG8IBQFwAl81BAhhY3Rpb25zMQMJAGYCBQ11c2RXaDJCcFNhbGRvAAAJAM0IAgUHYWN0aW9ucwkBDlNjcmlwdFRyYW5zZmVyAwUGY2FsbGVyCQBlAggFAXACXzUFC3VzZFdoMkJwRmVlBQt1c2RuQXNzZXRJZAUHYWN0aW9ucwQLdXNkQnAyV2hGZWUJAGsDCAUBcAJfNgUKQVVDVElPTkZFRQUFTVVMVDYEDXVzZEJwMldoU2FsZG8IBQFwAl82AwkAZgIFDXVzZEJwMldoU2FsZG8AAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50BApwbXRBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQNwbXQHYXNzZXRJZAIeV0FWRVMgY2FuJ3QgYmUgdXNlZCBhcyBwYXltZW50AwkBAiE9AgUKcG10QXNzZXRJZAULdXNkbkFzc2V0SWQJAAIBAhNVU0ROIHBheW1lbnRzIG9ubHkhAwkBAiE9AgUDYW10BQ11c2RCcDJXaFNhbGRvCQACAQkArAICAhJQYXltZW50IG5lZWRlZCBpcyAJAKQDAQUNdXNkQnAyV2hTYWxkbwkAzQgCBQhhY3Rpb25zMQkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUJbGFuZE93bmVyCQBlAggFAXACXzYFC3VzZEJwMldoRmVlBQt1c2RuQXNzZXRJZAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECEk5vIHBheW1lbnRzIG5lZWRlZAUIYWN0aW9uczEJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4A8+ow/w==",
    "height": 2521639,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BmA973qTCRT6vnKXmgU6dv2eBRJp3rwREqATjmtKQmST
Next: 13sCLitBp5keM6NiRmEGEddEvQYBJBERVYBzG2E6BQZ7

Diff: 

OldNewDifferences
304304                     let curOrdUsd = fraction(curOrdAm, curOrdPr, MULT8)
305305                     if ((newOrdAm == 0))
306306                         then if ((curOrdAm > 0))
307-                            then $Tuple4((j + 1), (acc._2 :+ toString(whp)), (acc._3 - curOrdAm), (acc._4 - curOrdUsd))
308-                            else $Tuple4((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + curOrdAm), acc._4)
307+                            then $Tuple6((j + 1), (acc._2 :+ toString(whp)), (acc._3 - curOrdAm), (acc._4 - curOrdUsd), acc._5, acc._6)
308+                            else $Tuple6((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + curOrdAm), acc._4, acc._5, acc._6)
309309                         else if ((newOrdAm > 0))
310310                             then if ((0 > curOrdAm))
311311                                 then {
312312                                     let amDiff = (newOrdAm + curOrdAm)
313-                                    $Tuple4((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + amDiff), (acc._4 + newOrdUsd))
313+                                    $Tuple6((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + amDiff), (acc._4 + newOrdUsd), acc._5, acc._6)
314314                                     }
315-                                else $Tuple4((j + 1), (acc._2 :+ toString(whp)), ((acc._3 + newOrdAm) - curOrdAm), ((acc._4 + newOrdUsd) - curOrdUsd))
315+                                else $Tuple6((j + 1), (acc._2 :+ toString(whp)), ((acc._3 + newOrdAm) - curOrdAm), ((acc._4 + newOrdUsd) - curOrdUsd), acc._5, acc._6)
316316                             else if ((0 > curOrdAm))
317317                                 then {
318318                                     let amDiff = (curOrdAm - newOrdAm)
319319                                     if ((0 > (whp - amDiff)))
320320                                         then throw((((("Attempt to take " + toString(amDiff)) + " from warehouse, but only ") + toString(whp)) + " available"))
321-                                        else $Tuple4((j + 1), (acc._2 :+ toString((whp - amDiff))), (acc._3 + amDiff), acc._3)
321+                                        else $Tuple6((j + 1), (acc._2 :+ toString((whp - amDiff))), (acc._3 + amDiff), acc._4, acc._5, acc._6)
322322                                     }
323323                                 else if ((0 > (whp + newOrdAm)))
324324                                     then throw((((("Attempt to take " + toString(-(newOrdAm))) + " from warehouse, but only ") + toString(whp)) + " available"))
325-                                    else $Tuple4((j + 1), (acc._2 :+ toString((whp + newOrdAm))), ((acc._3 - newOrdAm) - curOrdAm), (acc._4 - curOrdUsd))
325+                                    else $Tuple6((j + 1), (acc._2 :+ toString((whp + newOrdAm))), ((acc._3 - newOrdAm) - curOrdAm), (acc._4 - curOrdUsd), acc._5, acc._6)
326326                     }
327327             }
328328     }

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SEP = "__"
55 
66 let MULT6 = 1000000
77 
88 let MULT8 = 100000000
99 
1010 let MULT10 = 10000000000
1111 
1212 let chain = take(drop(this.bytes, 1), 1)
1313 
1414 let usdnAssetId = match chain {
1515     case _ => 
1616         if ((base58'2W' == $match0))
1717             then base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
1818             else if ((base58'2T' == $match0))
1919                 then base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
2020                 else throw("Unknown chain")
2121 }
2222 
2323 let defaultRestAddressStr = match chain {
2424     case _ => 
2525         if ((base58'2W' == $match0))
2626             then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
2727             else if ((base58'2T' == $match0))
2828                 then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
2929                 else throw("Unknown chain")
3030 }
3131 
3232 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
3333 
3434 
3535 func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
3636 
3737 
3838 let IdxCfgStakingDapp = 1
3939 
4040 let IdxCfgEconomyDapp = 2
4141 
4242 let IdxCfgGovernanceDapp = 3
4343 
4444 func keyRestCfg () = "%s__restConfig"
4545 
4646 
4747 func keyRestAddress () = "%s__restAddr"
4848 
4949 
5050 func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
5151 
5252 
5353 func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
5454 
5555 
5656 let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
5757 
5858 let restCfg = readRestCfgOrFail(restContract)
5959 
6060 let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
6161 
6262 let DEFAULTLOCATION = "Africa_F_Africa"
6363 
6464 let NUMRES = 6
6565 
6666 let FACTORYMAXWAREHOUSE = 10000000000
6767 
6868 let RESOURCEPRICEMIN = 158549
6969 
7070 let MINPAYMENT = 10000
7171 
7272 let SELLMULTIPLIER = 200
7373 
7474 let BUYMULTIPLIER = 300
7575 
7676 let LANDPREFIX = "LAND"
7777 
7878 let DUCKPREFIX = "DUCK"
7979 
8080 let WHMULTIPLIER = 10000000000
8181 
8282 let AUCTIONFEE = 10000
8383 
8484 let resTypes = ["Oil", "Ore", "Wood", "Sand", "Clay", "Organic"]
8585 
8686 let matTypes = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
8787 
8888 let prodTypes = ["First Aid Kit", "Backpack", "Food Ration", "Jet Pack", "Radar"]
8989 
9090 let continents = ["Americas", "Europe", "Asia", "Africa", "Oceania"]
9191 
9292 let productionMatrix = ["1_1_1_2_2_5_1_10", "2_5_5_2_7_5_2_100", "1_1_1_2_2_5_1_10", "9_9_1_5_5_1_5_100", "1_5_1_5_5_1_1_100"]
9393 
9494 let contIdxAmericas = 0
9595 
9696 let contIdxEurope = 1
9797 
9898 let contIdxAsia = 2
9999 
100100 let contIdxAfrica = 3
101101 
102102 let contIdxOceania = 4
103103 
104104 func keyFactoryWarehouseByIdAndType (factoryId,resType) = ((("factoryWhByContinentAndRes_" + factoryId) + "_") + toString(resType))
105105 
106106 
107107 func keyOrderByLand (landAssetId) = ("landOrder_" + landAssetId)
108108 
109109 
110110 func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
111111 
112112 
113113 func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
114114 
115115 
116116 func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
117117 
118118 
119119 func keyBlocked () = "contractsBlocked"
120120 
121121 
122122 func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
123123 
124124 
125125 func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
126126 
127127 
128128 let locIdxContinent = 0
129129 
130130 let locIdxType = 1
131131 
132132 let locIdxId = 2
133133 
134134 let bpIdxLevel = 0
135135 
136136 let bpIdxRes = 1
137137 
138138 let bpIdxMat = 2
139139 
140140 let bpIdxProd = 3
141141 
142142 let whIdxVol = 0
143143 
144144 let whIdxRes = 1
145145 
146146 let whIdxMat = 2
147147 
148148 let whIdxProd = 3
149149 
150150 let whIdxLockedVol = 4
151151 
152152 let ordIdxRes = 0
153153 
154154 let ordIdxMat = 1
155155 
156156 let ordIdxProd = 2
157157 
158158 func asString (v) = match v {
159159     case s: String => 
160160         s
161161     case _ => 
162162         throw("fail to cast into String")
163163 }
164164 
165165 
166166 func getOrder (ordKey) = {
167167     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:"), ":")
168168 [if ((size(split(p[ordIdxRes], "_")) == NUMRES))
169169         then p[ordIdxRes]
170170         else "0@0_0@0_0@0_0@0_0@0_0@0", if ((size(split(p[ordIdxMat], "_")) == NUMRES))
171171         then p[ordIdxMat]
172172         else "0@0_0@0_0@0_0@0_0@0_0@0", p[ordIdxProd]]
173173     }
174174 
175175 
176176 func getWarehouseVolume (volPrefix) = {
177177     let parts = split(volPrefix, "_")
178178     ((WHMULTIPLIER * (parseIntValue(parts[1]) + 1)) * parseIntValue(parts[0]))
179179     }
180180 
181181 
182182 func getWarehouseCurrResVolume (currentWh) = {
183183     func sum (acc,item) =     (acc + parseIntValue(item))
184184 
185185     let $l = split(currentWh[whIdxRes], "_")
186186     let $s = size($l)
187187     let $acc0 = 0
188188     func $f0_1 ($a,$i) =     if (($i >= $s))
189189         then $a
190190         else sum($a, $l[$i])
191191 
192192     func $f0_2 ($a,$i) =     if (($i >= $s))
193193         then $a
194194         else throw("List size exceeds 6")
195195 
196196     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
197197     }
198198 
199199 
200200 func getWarehouseCurrMatVolume (currentWh) = {
201201     func sum (acc,item) =     (acc + parseIntValue(item))
202202 
203203     let $l = split(currentWh[whIdxMat], "_")
204204     let $s = size($l)
205205     let $acc0 = 0
206206     func $f0_1 ($a,$i) =     if (($i >= $s))
207207         then $a
208208         else sum($a, $l[$i])
209209 
210210     func $f0_2 ($a,$i) =     if (($i >= $s))
211211         then $a
212212         else throw("List size exceeds 6")
213213 
214214     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
215215     }
216216 
217217 
218218 func getWarehouseCurrGoodsVolume (currentWh) = {
219219     let goods = currentWh[whIdxProd]
220220     if ((goods == ""))
221221         then 0
222222         else {
223223             func sum (acc,item) =             (acc + parseIntValue(item))
224224 
225225             let $l = split_4C(goods, "_")
226226             let $s = size($l)
227227             let $acc0 = 0
228228             func $f0_1 ($a,$i) =             if (($i >= $s))
229229                 then $a
230230                 else sum($a, $l[$i])
231231 
232232             func $f0_2 ($a,$i) =             if (($i >= $s))
233233                 then $a
234234                 else throw("List size exceeds 50")
235235 
236236             $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)
237237             }
238238     }
239239 
240240 
241241 func sellInternal (locId,resType,amount,minPrice) = {
242242     let whKey = keyFactoryWarehouseByIdAndType(locId, resType)
243243     let w0 = valueOrElse(getInteger(whKey), 0)
244244     let r0 = if ((w0 > FACTORYMAXWAREHOUSE))
245245         then 0
246246         else if (((w0 + amount) > FACTORYMAXWAREHOUSE))
247247             then (FACTORYMAXWAREHOUSE - w0)
248248             else amount
249249     let usdnReceived = (fraction(r0, ((SELLMULTIPLIER * RESOURCEPRICEMIN) - fraction(((100 * w0) + (50 * r0)), RESOURCEPRICEMIN, FACTORYMAXWAREHOUSE)), MULT10) + fraction((amount - r0), RESOURCEPRICEMIN, MULT8))
250250     let min99 = (minPrice - (minPrice / 100))
251251     if (((min99 * amount) > (usdnReceived * MULT8)))
252252         then throw((((((((((("Actual price = " + toString(usdnReceived)) + " / ") + toString(amount)) + " < minPrice = ") + toString(minPrice)) + ", (") + locId) + ", ") + resTypes[resType]) + ")"))
253253         else $Tuple2(IntegerEntry(whKey, (w0 + amount)), usdnReceived)
254254     }
255255 
256256 
257257 func buyInternal (locId,matType,amount,maxPrice) = {
258258     let whKey = keyFactoryWarehouseByIdAndType(locId, matType)
259259     let w0 = valueOrElse(getInteger(whKey), 0)
260260     let m1 = if ((w0 > FACTORYMAXWAREHOUSE))
261261         then min([amount, (w0 - FACTORYMAXWAREHOUSE)])
262262         else 0
263263     let m0 = min([w0, (amount - m1)])
264264     let m = (m0 + m1)
265265     let usdnSpent = (fraction(m0, ((BUYMULTIPLIER * RESOURCEPRICEMIN) - fraction(((100 * w0) - (50 * m0)), RESOURCEPRICEMIN, FACTORYMAXWAREHOUSE)), MULT10) + fraction(m1, (2 * RESOURCEPRICEMIN), MULT8))
266266     let max101 = (maxPrice + (maxPrice / 100))
267267     if (((usdnSpent * MULT8) > (max101 * m)))
268268         then throw((((((((((("Actual price = " + toString(usdnSpent)) + " / ") + toString(m)) + " > maxPrice = ") + toString(maxPrice)) + ", (") + locId) + ", ") + matTypes[matType]) + ")"))
269269         else $Tuple3(IntegerEntry(whKey, (w0 - m)), usdnSpent, m)
270270     }
271271 
272272 
273273 func getBackpack (bpKey) = {
274274     let p = split(valueOrElse(getString(stakingContract, bpKey), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
275275 [toString(valueOrElse(parseInt(p[bpIdxLevel]), 0)), if ((size(split(p[bpIdxRes], "_")) == NUMRES))
276276         then p[bpIdxRes]
277277         else "0_0_0_0_0_0", if ((size(split(p[bpIdxMat], "_")) == NUMRES))
278278         then p[bpIdxMat]
279279         else "0_0_0_0_0_0", p[bpIdxProd]]
280280     }
281281 
282282 
283283 func checkBlocked () = if (valueOrElse(getBoolean(stakingContract, keyBlocked()), false))
284284     then throw("Contracts are under maintenance")
285285     else unit
286286 
287287 
288288 func setCommon (acc,item) = {
289289     let j = acc._1
290290     let itemParts = split(item, "@")
291291     if ((size(itemParts) != 2))
292292         then throw("Incorrect order format, should be amount@price")
293293         else {
294294             let newOrdAm = parseIntValue(itemParts[0])
295295             let newOrdPr = parseIntValue(itemParts[1])
296296             let newOrdUsd = fraction(newOrdAm, newOrdPr, MULT8)
297297             let whp = parseIntValue(acc._5[j])
298298             let curOrdParts = split(acc._6[j], "@")
299299             let curOrdAm = parseIntValue(curOrdParts[0])
300300             let curOrdPr = parseIntValue(curOrdParts[1])
301301             if ((0 > curOrdPr))
302302                 then throw("Price can't be negative")
303303                 else {
304304                     let curOrdUsd = fraction(curOrdAm, curOrdPr, MULT8)
305305                     if ((newOrdAm == 0))
306306                         then if ((curOrdAm > 0))
307-                            then $Tuple4((j + 1), (acc._2 :+ toString(whp)), (acc._3 - curOrdAm), (acc._4 - curOrdUsd))
308-                            else $Tuple4((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + curOrdAm), acc._4)
307+                            then $Tuple6((j + 1), (acc._2 :+ toString(whp)), (acc._3 - curOrdAm), (acc._4 - curOrdUsd), acc._5, acc._6)
308+                            else $Tuple6((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + curOrdAm), acc._4, acc._5, acc._6)
309309                         else if ((newOrdAm > 0))
310310                             then if ((0 > curOrdAm))
311311                                 then {
312312                                     let amDiff = (newOrdAm + curOrdAm)
313-                                    $Tuple4((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + amDiff), (acc._4 + newOrdUsd))
313+                                    $Tuple6((j + 1), (acc._2 :+ toString((whp - curOrdAm))), (acc._3 + amDiff), (acc._4 + newOrdUsd), acc._5, acc._6)
314314                                     }
315-                                else $Tuple4((j + 1), (acc._2 :+ toString(whp)), ((acc._3 + newOrdAm) - curOrdAm), ((acc._4 + newOrdUsd) - curOrdUsd))
315+                                else $Tuple6((j + 1), (acc._2 :+ toString(whp)), ((acc._3 + newOrdAm) - curOrdAm), ((acc._4 + newOrdUsd) - curOrdUsd), acc._5, acc._6)
316316                             else if ((0 > curOrdAm))
317317                                 then {
318318                                     let amDiff = (curOrdAm - newOrdAm)
319319                                     if ((0 > (whp - amDiff)))
320320                                         then throw((((("Attempt to take " + toString(amDiff)) + " from warehouse, but only ") + toString(whp)) + " available"))
321-                                        else $Tuple4((j + 1), (acc._2 :+ toString((whp - amDiff))), (acc._3 + amDiff), acc._3)
321+                                        else $Tuple6((j + 1), (acc._2 :+ toString((whp - amDiff))), (acc._3 + amDiff), acc._4, acc._5, acc._6)
322322                                     }
323323                                 else if ((0 > (whp + newOrdAm)))
324324                                     then throw((((("Attempt to take " + toString(-(newOrdAm))) + " from warehouse, but only ") + toString(whp)) + " available"))
325-                                    else $Tuple4((j + 1), (acc._2 :+ toString((whp + newOrdAm))), ((acc._3 - newOrdAm) - curOrdAm), (acc._4 - curOrdUsd))
325+                                    else $Tuple6((j + 1), (acc._2 :+ toString((whp + newOrdAm))), ((acc._3 - newOrdAm) - curOrdAm), (acc._4 - curOrdUsd), acc._5, acc._6)
326326                     }
327327             }
328328     }
329329 
330330 
331331 func acceptCommon (acc,bpOrdProdItem) = {
332332     let j = acc._7
333333     let bpOrdProdParts = split(bpOrdProdItem, "@")
334334     if ((size(bpOrdProdParts) != 2))
335335         then throw("Incorrect order format, should be amount@price")
336336         else {
337337             let bpOrdAm = parseIntValue(bpOrdProdParts[0])
338338             let bpOrdPr = parseIntValue(bpOrdProdParts[1])
339339             if ((0 > bpOrdPr))
340340                 then throw("Price can't be negative")
341341                 else {
342342                     let bpOrdUsd = fraction(bpOrdAm, bpOrdPr, MULT8)
343343                     let bpp = parseIntValue(acc._8[j])
344344                     let whp = parseIntValue(acc._9[j])
345345                     let whOrdParts = split(acc._10[j], "@")
346346                     let whOrdAm = parseIntValue(whOrdParts[0])
347347                     let whOrdPr = parseIntValue(whOrdParts[1])
348348                     if (if ((bpOrdAm != 0))
349349                         then (bpOrdPr != whOrdPr)
350350                         else false)
351351                         then throw(((((("Prices of " + prodTypes[j]) + " don't match! WH price=") + toString(whOrdPr)) + ", your price=") + toString(bpOrdPr)))
352352                         else {
353353                             let whOrdUsd = fraction(whOrdAm, whOrdPr, MULT8)
354354                             if ((bpOrdAm == 0))
355355                                 then $Tuple10((acc._1 :+ toString(whp)), (acc._2 :+ acc._10[j]), (acc._3 :+ toString(bpp)), acc._4, acc._5, acc._6, (acc._7 + 1), acc._8, acc._9, acc._10)
356356                                 else if ((bpOrdAm > 0))
357357                                     then if ((0 > whOrdAm))
358358                                         then if ((bpOrdAm > -(whOrdAm)))
359359                                             then throw(((((("Attempt to buy " + toString(bpOrdAm)) + " of ") + prodTypes[j]) + ", but warehouse only sells ") + toString(-(whOrdAm))))
360360                                             else $Tuple10((acc._1 :+ toString(whp)), (acc._2 :+ ((toString((whOrdAm + bpOrdAm)) + "@") + toString(whOrdPr))), (acc._3 :+ toString((bpp + bpOrdAm))), (acc._4 + bpOrdAm), acc._5, (acc._6 + bpOrdUsd), (acc._7 + 1), acc._8, acc._9, acc._10)
361361                                         else throw((("Attempt to buy " + prodTypes[j]) + " while warehouse doesn't sell it"))
362362                                     else if ((whOrdAm > 0))
363363                                         then if ((-(bpOrdAm) > whOrdAm))
364364                                             then throw(((((("Attempt to sell " + toString(-(bpOrdAm))) + " of ") + prodTypes[j]) + ", but warehouse only buys ") + toString(whOrdAm)))
365365                                             else if ((-(bpOrdAm) > bpp))
366366                                                 then throw(((((("Attempt to sell " + toString(-(bpOrdAm))) + ", but you only have ") + toString(bpp)) + " of ") + prodTypes[j]))
367367                                                 else $Tuple10((acc._1 :+ toString((whp - bpOrdAm))), (acc._2 :+ ((toString((whOrdAm + bpOrdAm)) + "@") + toString(whOrdPr))), (acc._3 :+ toString((bpp + bpOrdAm))), (acc._4 - bpOrdAm), (acc._5 - bpOrdUsd), acc._6, (acc._7 + 1), acc._8, acc._9, acc._10)
368368                                         else throw((("Attempt to sell " + prodTypes[j]) + " while warehouse doesn't buy it"))
369369                             }
370370                     }
371371             }
372372     }
373373 
374374 
375375 @Callable(i)
376376 func constructorV1 (restAddr) = if ((i.caller != this))
377377     then throw("Permission denied")
378378     else [StringEntry(keyRestAddress(), restAddr)]
379379 
380380 
381381 
382382 @Callable(i)
383383 func sellResources (amounts,minPrices) = {
384384     let blocked = checkBlocked()
385385     if ((blocked == blocked))
386386         then {
387387             let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
388388             if ((size(i.payments) != 0))
389389                 then throw("sellResources doesn't require any payments")
390390                 else {
391391                     let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
392392                     if ((curLocation[locIdxType] != "F"))
393393                         then throw(("Duck location type should be Factory, but is " + curLocation[locIdxType]))
394394                         else {
395395                             let locId = curLocation[locIdxId]
396396                             let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
397397                             let resList = split(currentPack[bpIdxRes], "_")
398398                             func adder (acc,j) =                             if ((amounts[j] > parseIntValue(resList[j])))
399399                                 then throw(((((("You have " + resList[j]) + " of ") + resTypes[j]) + ", but tried to sell ") + toString(amounts[j])))
400400                                 else if ((0 > amounts[j]))
401401                                     then throw(((("You tried to sell negative amount of " + resTypes[j]) + ": ") + toString(amounts[j])))
402402                                     else if ((amounts[j] > 0))
403403                                         then {
404404                                             let b = sellInternal(locId, j, amounts[j], minPrices[j])
405405                                             $Tuple3((acc._1 :+ b._1), (acc._2 :+ toString((parseIntValue(resList[j]) - amounts[j]))), (acc._3 + b._2))
406406                                             }
407407                                         else $Tuple3(acc._1, (acc._2 :+ resList[j]), acc._3)
408408 
409409                             let merged = {
410410                                 let $l = [0, 1, 2, 3, 4, 5]
411411                                 let $s = size($l)
412412                                 let $acc0 = $Tuple3(nil, nil, 0)
413413                                 func $f0_1 ($a,$i) =                                 if (($i >= $s))
414414                                     then $a
415415                                     else adder($a, $l[$i])
416416 
417417                                 func $f0_2 ($a,$i) =                                 if (($i >= $s))
418418                                     then $a
419419                                     else throw("List size exceeds 6")
420420 
421421                                 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
422422                                 }
423423                             let newPack = makeString([currentPack[bpIdxLevel], makeString(merged._2, "_"), currentPack[bpIdxMat], currentPack[bpIdxProd]], ":")
424424                             let result = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
425425                             $Tuple2((merged._1 :+ ScriptTransfer(i.caller, merged._3, usdnAssetId)), result)
426426                             }
427427                     }
428428             }
429429         else throw("Strict value is not equal to itself.")
430430     }
431431 
432432 
433433 
434434 @Callable(i)
435435 func buyMaterials (amounts,maxPrices) = {
436436     let blocked = checkBlocked()
437437     if ((blocked == blocked))
438438         then {
439439             let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
440440             if ((size(i.payments) != 1))
441441                 then throw("exactly 1 payment must be attached")
442442                 else {
443443                     let pmt = i.payments[0]
444444                     let amt = pmt.amount
445445                     let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WAVES can't be used as payment")
446446                     if ((pmtAssetId != usdnAssetId))
447447                         then throw("USDN payments only!")
448448                         else {
449449                             let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
450450                             if ((curLocation[locIdxType] != "F"))
451451                                 then throw(("Duck location type should be Factory, but is " + curLocation[locIdxType]))
452452                                 else {
453453                                     let locId = curLocation[locIdxId]
454454                                     let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
455455                                     let matList = split(currentPack[bpIdxMat], "_")
456456                                     func mUpdater (acc,j) =                                     if ((0 > amounts[j]))
457457                                         then throw(((("You tried to buy negative amount of " + matTypes[j]) + ": ") + toString(amounts[j])))
458458                                         else if ((amounts[j] > 0))
459459                                             then {
460460                                                 let b = buyInternal(locId, j, amounts[j], maxPrices[j])
461461                                                 $Tuple3((acc._1 :+ b._1), (acc._2 :+ toString((parseIntValue(matList[j]) + b._3))), (acc._3 + b._2))
462462                                                 }
463463                                             else $Tuple3(acc._1, (acc._2 :+ matList[j]), acc._3)
464464 
465465                                     let merged = {
466466                                         let $l = [0, 1, 2, 3, 4, 5]
467467                                         let $s = size($l)
468468                                         let $acc0 = $Tuple3(nil, nil, 0)
469469                                         func $f0_1 ($a,$i) =                                         if (($i >= $s))
470470                                             then $a
471471                                             else mUpdater($a, $l[$i])
472472 
473473                                         func $f0_2 ($a,$i) =                                         if (($i >= $s))
474474                                             then $a
475475                                             else throw("List size exceeds 6")
476476 
477477                                         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
478478                                         }
479479                                     if ((merged._3 > amt))
480480                                         then throw(((("Insufficient payment! Attached=" + toString(amt)) + ", required=") + toString(merged._3)))
481481                                         else {
482482                                             let newPack = makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], makeString(merged._2, "_"), currentPack[bpIdxProd]], ":")
483483                                             let result = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
484484                                             let rest = if (((amt - merged._3) > 0))
485485                                                 then [ScriptTransfer(i.caller, (amt - merged._3), usdnAssetId)]
486486                                                 else nil
487487                                             $Tuple2((merged._1 ++ rest), result)
488488                                             }
489489                                     }
490490                             }
491491                     }
492492             }
493493         else throw("Strict value is not equal to itself.")
494494     }
495495 
496496 
497497 
498498 @Callable(i)
499499 func exchangeResources (amounts) = {
500500     let blocked = checkBlocked()
501501     if ((blocked == blocked))
502502         then {
503503             let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
504504             if ((size(i.payments) != 1))
505505                 then throw("exactly 1 payment must be attached")
506506                 else {
507507                     let pmt = i.payments[0]
508508                     let amt = pmt.amount
509509                     let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WAVES can't be used as payment")
510510                     if ((pmtAssetId != usdnAssetId))
511511                         then throw("USDN payments only!")
512512                         else {
513513                             let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
514514                             if ((curLocation[locIdxType] != "F"))
515515                                 then throw(("Duck location type should be Factory, but is " + curLocation[locIdxType]))
516516                                 else {
517517                                     let locId = curLocation[locIdxId]
518518                                     let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
519519                                     let resList = split(currentPack[bpIdxRes], "_")
520520                                     let matList = split(currentPack[bpIdxMat], "_")
521521                                     func exchanger (acc,j) =                                     {
522522                                         let whKey = keyFactoryWarehouseByIdAndType(locId, j)
523523                                         let w0 = valueOrElse(getInteger(whKey), 0)
524524                                         let amj = amounts[j]
525525                                         if ((amj > parseIntValue(resList[j])))
526526                                             then throw(((((("You have " + resList[j]) + " of ") + resTypes[j]) + ", but tried to exchange ") + toString(amj)))
527527                                             else if ((0 > amj))
528528                                                 then throw(((("You tried to exchange negative amount of " + resTypes[j]) + ": ") + toString(amj)))
529529                                                 else if ((amj > 0))
530530                                                     then $Tuple4((acc._1 :+ toString((parseIntValue(resList[j]) - amj))), (acc._2 :+ toString((parseIntValue(matList[j]) + amj))), (acc._3 + fraction(amj, RESOURCEPRICEMIN, MULT8)), (acc._4 :+ IntegerEntry(whKey, w0)))
531531                                                     else $Tuple4((acc._1 :+ resList[j]), (acc._2 :+ matList[j]), acc._3, acc._4)
532532                                         }
533533 
534534                                     let merged = {
535535                                         let $l = [0, 1, 2, 3, 4, 5]
536536                                         let $s = size($l)
537537                                         let $acc0 = $Tuple4(nil, nil, 0, nil)
538538                                         func $f0_1 ($a,$i) =                                         if (($i >= $s))
539539                                             then $a
540540                                             else exchanger($a, $l[$i])
541541 
542542                                         func $f0_2 ($a,$i) =                                         if (($i >= $s))
543543                                             then $a
544544                                             else throw("List size exceeds 6")
545545 
546546                                         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
547547                                         }
548548                                     if ((merged._3 > amt))
549549                                         then throw(((("Insufficient payment! Attached=" + toString(amt)) + ", required=") + toString(merged._3)))
550550                                         else {
551551                                             let newPack = makeString([currentPack[bpIdxLevel], makeString(merged._1, "_"), makeString(merged._2, "_"), currentPack[bpIdxProd]], ":")
552552                                             let result = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
553553                                             let rest = if (((amt - merged._3) > 0))
554554                                                 then [ScriptTransfer(i.caller, (amt - merged._3), usdnAssetId)]
555555                                                 else nil
556556                                             $Tuple2((rest ++ merged._4), result)
557557                                             }
558558                                     }
559559                             }
560560                     }
561561             }
562562         else throw("Strict value is not equal to itself.")
563563     }
564564 
565565 
566566 
567567 @Callable(i)
568568 func buyGoods (productIdx,level,quantity) = {
569569     let blocked = checkBlocked()
570570     if ((blocked == blocked))
571571         then if ((size(i.payments) != 0))
572572             then throw("buyGoods doesn't require any payments")
573573             else if ((0 > quantity))
574574                 then throw("Quantity should be positive")
575575                 else {
576576                     let duckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
577577                     let curLocation = split(valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), DEFAULTLOCATION), "_")
578578                     if ((curLocation[locIdxType] != "M"))
579579                         then throw(("Duck location type should be Manufactory, but is " + curLocation[locIdxType]))
580580                         else {
581581                             let cont = curLocation[locIdxContinent]
582582                             let currentPack = getBackpack(keyBackpackByDuck(duckAssetId))
583583                             let matList = split(currentPack[bpIdxMat], "_")
584584                             if (if ((0 > productIdx))
585585                                 then true
586586                                 else (productIdx >= size(productionMatrix)))
587587                                 then throw(("Unknown product idx=" + toString(productIdx)))
588588                                 else {
589589                                     let productContIdx = (productIdx % size(continents))
590590                                     if ((continents[productContIdx] != cont))
591591                                         then throw(((("This product is available in " + continents[productContIdx]) + ", but you are in ") + cont))
592592                                         else {
593593                                             let recipe = split(productionMatrix[productIdx], "_")
594594                                             if ((size(recipe) != (NUMRES + 2)))
595595                                                 then throw(("Fatal: unknown recipe: " + productionMatrix[productIdx]))
596596                                                 else {
597597                                                     let prodList = if ((currentPack[bpIdxProd] == ""))
598598                                                         then nil
599599                                                         else split(currentPack[bpIdxProd], "_")
600600                                                     func filler (acc,ignoredItem) =                                                     {
601601                                                         let n = acc._2
602602                                                         let x = if ((size(prodList) > n))
603603                                                             then split(prodList[n], ",")
604604                                                             else ["0", "0", "0"]
605605                                                         let x1s = x[0]
606606                                                         let x1 = parseIntValue(x1s)
607607                                                         let x2s = x[1]
608608                                                         let x2 = parseIntValue(x2s)
609609                                                         let x3s = x[2]
610610                                                         let x3 = parseIntValue(x3s)
611611                                                         let amount = (quantity * parseIntValue(recipe[7]))
612612                                                         let y = if ((n == productIdx))
613613                                                             then                                                             match level {
614614                                                                 case _ => 
615615                                                                     if ((1 == $match0))
616616                                                                         then ((((toString((x1 + amount)) + ",") + x2s) + ",") + x3s)
617617                                                                         else if ((2 == $match0))
618618                                                                             then ((((x1s + ",") + toString((x2 + amount))) + ",") + x3s)
619619                                                                             else if ((3 == $match0))
620620                                                                                 then ((((x1s + ",") + x2s) + ",") + toString((x3 + amount)))
621621                                                                                 else throw(("Product level should be 1..3, not " + toString(level)))
622622                                                             }
623623                                                             else ((((x1s + ",") + x2s) + ",") + x3s)
624624                                                         $Tuple2((acc._1 :+ y), (n + 1))
625625                                                         }
626626 
627627                                                     let bpProd = (                                                    let $l = productionMatrix
628628                                                     let $s = size($l)
629629                                                     let $acc0 = $Tuple2(nil, 0)
630630                                                     func $f0_1 ($a,$i) =                                                     if (($i >= $s))
631631                                                         then $a
632632                                                         else filler($a, $l[$i])
633633 
634634                                                     func $f0_2 ($a,$i) =                                                     if (($i >= $s))
635635                                                         then $a
636636                                                         else throw("List size exceeds 50")
637637 
638638                                                     $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
639639                                                     func producer (acc,j) =                                                     {
640640                                                         let needMat = (parseIntValue(recipe[j]) * quantity)
641641                                                         let haveMat = parseIntValue(matList[j])
642642                                                         if ((needMat > haveMat))
643643                                                             then throw(((((((("You have " + matList[j]) + " of ") + matTypes[j]) + ", but recipe requires ") + toString(needMat)) + " for quantity ") + toString(quantity)))
644644                                                             else if ((needMat > 0))
645645                                                                 then (acc :+ toString((haveMat - needMat)))
646646                                                                 else (acc :+ matList[j])
647647                                                         }
648648 
649649                                                     let merged = {
650650                                                         let $l = [0, 1, 2, 3, 4, 5]
651651                                                         let $s = size($l)
652652                                                         let $acc0 = nil
653653                                                         func $f1_1 ($a,$i) =                                                         if (($i >= $s))
654654                                                             then $a
655655                                                             else producer($a, $l[$i])
656656 
657657                                                         func $f1_2 ($a,$i) =                                                         if (($i >= $s))
658658                                                             then $a
659659                                                             else throw("List size exceeds 6")
660660 
661661                                                         $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
662662                                                         }
663663                                                     let newPack = makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], makeString(merged, "_"), makeString(bpProd, "_")], ":")
664664                                                     let result = asString(invoke(stakingContract, "updateBackpack", [duckAssetId, newPack], nil))
665665                                                     $Tuple2(nil, result)
666666                                                     }
667667                                             }
668668                                     }
669669                             }
670670                     }
671671         else throw("Strict value is not equal to itself.")
672672     }
673673 
674674 
675675 
676676 @Callable(i)
677677 func acceptServicePayment (service) = {
678678     let blocked = checkBlocked()
679679     if ((blocked == blocked))
680680         then if ((size(i.payments) != 1))
681681             then throw("exactly 1 payment must be attached")
682682             else {
683683                 let pmt = i.payments[0]
684684                 let amt = pmt.amount
685685                 let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WAVES can't be used as payment")
686686                 if ((pmtAssetId != usdnAssetId))
687687                     then throw("USDN payments only!")
688688                     else {
689689                         let need =                         match service {
690690                             case _ => 
691691                                 if (("LAND_RENAME" == $match0))
692692                                     then 10000000
693693                                     else throw("Unknown service!")
694694                         }
695695                         if ((amt != need))
696696                             then throw((((service + " costs ") + toString(need)) + " USDN"))
697697                             else $Tuple2(nil, amt)
698698                         }
699699                 }
700700         else throw("Strict value is not equal to itself.")
701701     }
702702 
703703 
704704 
705705 @Callable(i)
706706 func setWarehouseOrder (cargoListStr,landAssetId) = {
707707     let user = i.originCaller
708708     let addr = toString(user)
709709     let asset = value(assetInfo(fromBase58String(landAssetId)))
710710     if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
711711         then throw((("NFT " + asset.name) + " is not staked"))
712712         else {
713713             let owner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
714714             if ((owner != addr))
715715                 then throw((LANDPREFIX + " is not yours"))
716716                 else {
717717                     let cargoParts = split_4C(cargoListStr, ":")
718718                     if ((size(cargoParts) != 3))
719719                         then throw("cargoListStr should contain exactly 2 ':' separators")
720720                         else {
721721                             let resParts = split(cargoParts[0], "_")
722722                             let matParts = split(cargoParts[1], "_")
723723                             let prodParts = if ((cargoParts[2] == ""))
724724                                 then nil
725725                                 else split(cargoParts[2], "_")
726726                             if ((size(resParts) != NUMRES))
727727                                 then throw("All 6 resources should be passed")
728728                                 else if ((size(matParts) != NUMRES))
729729                                     then throw("All 6 materials should be passed")
730730                                     else {
731731                                         let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
732732                                         let currentWh = split_4C(wh, ":")
733733                                         let currWhRes = split(currentWh[whIdxRes], "_")
734734                                         let currWhMat = split(currentWh[whIdxMat], "_")
735735                                         let currWhProd = if ((currentWh[whIdxProd] == ""))
736736                                             then nil
737737                                             else split(currentWh[whIdxProd], "_")
738738                                         let currWhResVol = getWarehouseCurrResVolume(currentWh)
739739                                         let currWhMatVol = getWarehouseCurrMatVolume(currentWh)
740740                                         let currWhGoodsVol = getWarehouseCurrGoodsVolume(currentWh)
741741                                         let currWhLockedVol = parseIntValue(currentWh[whIdxLockedVol])
742742                                         let whSpaceLeft = ((((getWarehouseVolume(currentWh[whIdxVol]) - currWhResVol) - currWhMatVol) - currWhGoodsVol) - currWhLockedVol)
743743                                         let ordKey = keyOrderByLand(landAssetId)
744744                                         let currentOrd = getOrder(ordKey)
745745                                         let currentOrdRes = split(currentOrd[ordIdxRes], "_")
746746                                         let currentOrdMat = split(currentOrd[ordIdxMat], "_")
747747                                         let currentOrdProd = if ((currentOrd[ordIdxProd] == ""))
748748                                             then nil
749749                                             else split(currentOrd[ordIdxProd], "_")
750750                                         let usdnNeed2Lock = 0
751751                                         let r = {
752752                                             let $l = resParts
753753                                             let $s = size($l)
754754                                             let $acc0 = $Tuple6(0, nil, 0, 0, currWhRes, currentOrdRes)
755755                                             func $f0_1 ($a,$i) =                                             if (($i >= $s))
756756                                                 then $a
757757                                                 else setCommon($a, $l[$i])
758758 
759759                                             func $f0_2 ($a,$i) =                                             if (($i >= $s))
760760                                                 then $a
761761                                                 else throw("List size exceeds 6")
762762 
763763                                             $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
764764                                             }
765765                                         let m = {
766766                                             let $l = matParts
767767                                             let $s = size($l)
768768                                             let $acc0 = $Tuple6(0, nil, r._3, r._4, currWhMat, currentOrdMat)
769769                                             func $f1_1 ($a,$i) =                                             if (($i >= $s))
770770                                                 then $a
771771                                                 else setCommon($a, $l[$i])
772772 
773773                                             func $f1_2 ($a,$i) =                                             if (($i >= $s))
774774                                                 then $a
775775                                                 else throw("List size exceeds 6")
776776 
777777                                             $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
778778                                             }
779779                                         let p = {
780780                                             let $l = prodParts
781781                                             let $s = size($l)
782782                                             let $acc0 = $Tuple6(0, nil, m._3, m._4, currWhProd, currentOrdProd)
783783                                             func $f2_1 ($a,$i) =                                             if (($i >= $s))
784784                                                 then $a
785785                                                 else setCommon($a, $l[$i])
786786 
787787                                             func $f2_2 ($a,$i) =                                             if (($i >= $s))
788788                                                 then $a
789789                                                 else throw("List size exceeds 50")
790790 
791791                                             $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)
792792                                             }
793793                                         let volSaldo = p._3
794794                                         if ((volSaldo > whSpaceLeft))
795795                                             then throw((((("Attempt to reserve " + toString(volSaldo)) + " space, but only ") + toString(whSpaceLeft)) + " warehouse space left"))
796796                                             else {
797797                                                 let whStr = makeString_2C([currentWh[whIdxVol], makeString(r._2, "_"), makeString(m._2, "_"), makeString(p._2, "_"), toString(volSaldo)], ":")
798798                                                 let whSave = invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil)
799799                                                 if ((whSave == whSave))
800800                                                     then {
801801                                                         let usdSaldo = p._4
802802                                                         if ((usdSaldo > 0))
803803                                                             then if ((size(i.payments) != 1))
804804                                                                 then throw("exactly 1 payment must be attached")
805805                                                                 else {
806806                                                                     let pmt = i.payments[0]
807807                                                                     let amt = pmt.amount
808808                                                                     let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WAVES can't be used as payment")
809809                                                                     if ((pmtAssetId != usdnAssetId))
810810                                                                         then throw("USDN payments only!")
811811                                                                         else if ((amt != usdSaldo))
812812                                                                             then throw(("Payment needed is " + toString(usdSaldo)))
813813                                                                             else [StringEntry(ordKey, cargoListStr)]
814814                                                                     }
815815                                                             else if ((usdSaldo == 0))
816816                                                                 then if ((size(i.payments) != 0))
817817                                                                     then throw("No payments needed")
818818                                                                     else [StringEntry(ordKey, cargoListStr)]
819819                                                                 else if ((size(i.payments) != 0))
820820                                                                     then throw("No payments needed")
821821                                                                     else [ScriptTransfer(user, -(usdSaldo), usdnAssetId), StringEntry(ordKey, cargoListStr)]
822822                                                         }
823823                                                     else throw("Strict value is not equal to itself.")
824824                                                 }
825825                                         }
826826                             }
827827                     }
828828             }
829829     }
830830 
831831 
832832 
833833 @Callable(i)
834834 func acceptWarehouseOrder (bpOrderStr,landAssetId,duckAssetId) = {
835835     let caller = i.originCaller
836836     let callerAddr = toString(caller)
837837     let stakedDuckAssetId = valueOrErrorMessage(getString(stakingContract, keyStakedDuckByOwner(callerAddr)), "You don't have a duck staked")
838838     let curLocation = valueOrElse(getString(stakingContract, keyDuckLocation(stakedDuckAssetId)), DEFAULTLOCATION)
839839     let loc = split(value(curLocation), "_")
840840     if ((loc[locIdxType] != "L"))
841841         then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
842842         else if ((stakedDuckAssetId != duckAssetId))
843843             then throw(((("Your staked duck is " + stakedDuckAssetId) + ", but passed ") + duckAssetId))
844844             else {
845845                 let landAsset = value(assetInfo(fromBase58String(landAssetId)))
846846                 if (!(isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)))))
847847                     then throw((("NFT " + landAsset.name) + " is not staked"))
848848                     else {
849849                         let landOwner = valueOrErrorMessage(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)), (("NFT " + landAsset.name) + " is orphaned"))
850850                         if ((landOwner == callerAddr))
851851                             then throw("You cannot trade with yourself")
852852                             else {
853853                                 let bpOrderParts = split_4C(bpOrderStr, ":")
854854                                 if ((size(bpOrderParts) != 3))
855855                                     then throw("bpOrderStr should contain exactly 2 ':' separators")
856856                                     else {
857857                                         let bpOrdRes = split(bpOrderParts[0], "_")
858858                                         let bpOrdMat = split(bpOrderParts[1], "_")
859859                                         let bpOrdProd = if ((bpOrderParts[2] == ""))
860860                                             then nil
861861                                             else split(bpOrderParts[2], "_")
862862                                         if ((size(bpOrdRes) != NUMRES))
863863                                             then throw("All 6 resources should be passed")
864864                                             else if ((size(bpOrdMat) != NUMRES))
865865                                                 then throw("All 6 materials should be passed")
866866                                                 else {
867867                                                     let wh = asString(invoke(stakingContract, "getWarehouseREADONLY", [landAssetId], nil))
868868                                                     let currentWh = split_4C(wh, ":")
869869                                                     let currWhRes = split(currentWh[whIdxRes], "_")
870870                                                     let currWhMat = split(currentWh[whIdxMat], "_")
871871                                                     let currWhProd = if ((currentWh[whIdxProd] == ""))
872872                                                         then nil
873873                                                         else split(currentWh[whIdxProd], "_")
874874                                                     let currWhResVol = getWarehouseCurrResVolume(currentWh)
875875                                                     let currWhMatVol = getWarehouseCurrMatVolume(currentWh)
876876                                                     let currWhGoodsVol = getWarehouseCurrGoodsVolume(currentWh)
877877                                                     let currWhLockedVol = parseIntValue(currentWh[whIdxLockedVol])
878878                                                     let whSpaceLeft = ((((getWarehouseVolume(currentWh[whIdxVol]) - currWhResVol) - currWhMatVol) - currWhGoodsVol) - currWhLockedVol)
879879                                                     let bpKey = keyBackpackByDuck(duckAssetId)
880880                                                     let currentPack = getBackpack(bpKey)
881881                                                     let bpResList = split(currentPack[bpIdxRes], "_")
882882                                                     let bpMatList = split(currentPack[bpIdxMat], "_")
883883                                                     let bpProdList = if ((currentPack[bpIdxProd] == ""))
884884                                                         then nil
885885                                                         else split(currentPack[bpIdxProd], "_")
886886                                                     let ordKey = keyOrderByLand(landAssetId)
887887                                                     let whOrd = getOrder(ordKey)
888888                                                     let whOrdRes = split(whOrd[ordIdxRes], "_")
889889                                                     let whOrdMat = split(whOrd[ordIdxMat], "_")
890890                                                     let whOrdProd = if ((whOrd[ordIdxProd] == ""))
891891                                                         then nil
892892                                                         else split(whOrd[ordIdxProd], "_")
893893                                                     let usdnNeed2Lock = 0
894894                                                     let r = {
895895                                                         let $l = bpOrdRes
896896                                                         let $s = size($l)
897897                                                         let $acc0 = $Tuple10(nil, nil, nil, 0, 0, 0, 0, bpResList, currWhRes, whOrdRes)
898898                                                         func $f0_1 ($a,$i) =                                                         if (($i >= $s))
899899                                                             then $a
900900                                                             else acceptCommon($a, $l[$i])
901901 
902902                                                         func $f0_2 ($a,$i) =                                                         if (($i >= $s))
903903                                                             then $a
904904                                                             else throw("List size exceeds 6")
905905 
906906                                                         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
907907                                                         }
908908                                                     let m = {
909909                                                         let $l = bpOrdMat
910910                                                         let $s = size($l)
911911                                                         let $acc0 = $Tuple10(nil, nil, nil, r._4, r._5, r._6, 0, bpMatList, currWhMat, whOrdMat)
912912                                                         func $f1_1 ($a,$i) =                                                         if (($i >= $s))
913913                                                             then $a
914914                                                             else acceptCommon($a, $l[$i])
915915 
916916                                                         func $f1_2 ($a,$i) =                                                         if (($i >= $s))
917917                                                             then $a
918918                                                             else throw("List size exceeds 6")
919919 
920920                                                         $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
921921                                                         }
922922                                                     let p = {
923923                                                         let $l = bpOrdProd
924924                                                         let $s = size($l)
925925                                                         let $acc0 = $Tuple10(nil, nil, nil, m._4, m._5, m._6, 0, bpProdList, currWhProd, whOrdProd)
926926                                                         func $f2_1 ($a,$i) =                                                         if (($i >= $s))
927927                                                             then $a
928928                                                             else acceptCommon($a, $l[$i])
929929 
930930                                                         func $f2_2 ($a,$i) =                                                         if (($i >= $s))
931931                                                             then $a
932932                                                             else throw("List size exceeds 50")
933933 
934934                                                         $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)
935935                                                         }
936936                                                     let volSaldo = p._4
937937                                                     let newLockedVol = if ((0 > (currWhLockedVol - volSaldo)))
938938                                                         then 0
939939                                                         else (currWhLockedVol - volSaldo)
940940                                                     let whStr = makeString_2C([currentWh[whIdxVol], makeString(r._1, "_"), makeString(m._1, "_"), makeString(p._1, "_"), toString(newLockedVol)], ":")
941941                                                     let newWhOrdStr = makeString_2C([makeString(r._2, "_"), makeString(m._2, "_"), makeString(p._2, "_")], ":")
942942                                                     let newBpStr = makeString_2C([currentPack[bpIdxLevel], makeString(r._3, "_"), makeString(m._3, "_"), makeString(p._3, "_")], ":")
943943                                                     let whSave = invoke(stakingContract, "saveWarehouse", [whStr, landAssetId], nil)
944944                                                     if ((whSave == whSave))
945945                                                         then {
946946                                                             let bpSave = invoke(stakingContract, "updateBackpack", [duckAssetId, newBpStr], nil)
947947                                                             if ((bpSave == bpSave))
948948                                                                 then {
949949                                                                     let actions = [StringEntry(ordKey, newWhOrdStr)]
950950                                                                     let usdWh2BpFee = fraction(p._5, AUCTIONFEE, MULT6)
951951                                                                     let usdWh2BpSaldo = p._5
952952                                                                     let actions1 = if ((usdWh2BpSaldo > 0))
953953                                                                         then (actions :+ ScriptTransfer(caller, (p._5 - usdWh2BpFee), usdnAssetId))
954954                                                                         else actions
955955                                                                     let usdBp2WhFee = fraction(p._6, AUCTIONFEE, MULT6)
956956                                                                     let usdBp2WhSaldo = p._6
957957                                                                     if ((usdBp2WhSaldo > 0))
958958                                                                         then if ((size(i.payments) != 1))
959959                                                                             then throw("exactly 1 payment must be attached")
960960                                                                             else {
961961                                                                                 let pmt = i.payments[0]
962962                                                                                 let amt = pmt.amount
963963                                                                                 let pmtAssetId = valueOrErrorMessage(pmt.assetId, "WAVES can't be used as payment")
964964                                                                                 if ((pmtAssetId != usdnAssetId))
965965                                                                                     then throw("USDN payments only!")
966966                                                                                     else if ((amt != usdBp2WhSaldo))
967967                                                                                         then throw(("Payment needed is " + toString(usdBp2WhSaldo)))
968968                                                                                         else (actions1 :+ ScriptTransfer(addressFromStringValue(landOwner), (p._6 - usdBp2WhFee), usdnAssetId))
969969                                                                                 }
970970                                                                         else if ((size(i.payments) != 0))
971971                                                                             then throw("No payments needed")
972972                                                                             else actions1
973973                                                                     }
974974                                                                 else throw("Strict value is not equal to itself.")
975975                                                             }
976976                                                         else throw("Strict value is not equal to itself.")
977977                                                     }
978978                                         }
979979                                 }
980980                         }
981981                 }
982982     }
983983 
984984 
github/deemru/w8io/169f3d6 
133.30 ms ◑