tx · Ck4rsZ9mhUPotvHFdYaXXTpCq9RmNcZwxRdTA1cuMZFP

3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv:  -0.02000000 Waves

2023.06.12 16:49 [3685104] smart account 3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Ck4rsZ9mhUPotvHFdYaXXTpCq9RmNcZwxRdTA1cuMZFP",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1686577805170,
    "version": 2,
    "chainId": 87,
    "sender": "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv",
    "senderPublicKey": "5V8q3qQvKSx6YqJpXWoxT1vPdQUsiKJrcmKnoxjsEmqj",
    "proofs": [
        "661b4TQZWDNPBrg1RfN6JwxXSShG1bjNmT2GdmhBTHb4fbou4Ayx81nGdzZaV2x1wChb3uDa1fb5PVrosn3uHAaF"
    ],
    "script": "base64:BgJACAISAwoBGBIDCgEIEgMKAQgSAwoBCBIDCgEIEgMKAQgSAwoBGBIDCgEIEgMKARgSAwoBGBIDCgEYEgMKAQgSAEcABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgARSW5mcmFVcGdyYWRlQ29zdFMEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgMivoCUDCQAAAgEBVAUHJG1hdGNoMACAwtcvCQACAQINVW5rbm93biBjaGFpbgADU0VQAgJfXwAFTVVMVDYAwIQ9AApBUlRQUkVTQUxFAgdQUkVTQUxFAAZOVU1SRVMABgAFU1NJWkUAGQAFTVNJWkUAZAAFTFNJWkUA4QEABlhMU0laRQCQAwAHWFhMU0laRQDxBAAPREFJTFlSRVNCWVBJRUNFAID40gEACURBWU1JTExJUwCAuJkpAAxXSE1VTFRJUExJRVIAgMivoCUAEFJFU09VUkNFUFJJQ0VNSU4A1bUCAA1FU01BWFBBQ0tBR0VTAAMACUVTQlVZQ09FRgAEAApFU1NFTExDT0VGAAoAEHByb2R1Y3Rpb25NYXRyaXgJAMwIAgISMV8xXzFfMl8yXzVfMV8xMF8wCQDMCAICEzJfMl8yXzRfNF8xMF8xXzEwXzAJAMwIAgITM18zXzNfNl82XzE1XzFfMTBfMAkAzAgCAhMyXzVfNV8yXzdfNV8yXzEwMF8xCQDMCAICFzRfMTBfMTBfNF8xNF8xMF8yXzEwMF8xCQDMCAICFzZfMTVfMTVfNl8yMV8xNV8yXzEwMF8xCQDMCAICEjFfMV8xXzFfMV84XzFfMTBfMgkAzAgCAhMyXzJfMl8yXzJfMTZfMV8xMF8yCQDMCAICEzNfM18zXzNfM18yNF8xXzEwXzIJAMwIAgITOV85XzFfNV81XzFfNV8xMDBfMwkAzAgCAhcxOF8xOF8yXzEwXzEwXzJfNV8xMDBfMwkAzAgCAhcyN18yN18zXzE1XzE1XzNfNV8xMDBfMwkAzAgCAhIyXzJfMV8yXzJfMl8xXzEwXzQJAMwIAgISNF80XzJfNF80XzRfMV8xMF80CQDMCAICEjZfNl8zXzZfNl82XzFfMTBfNAUDbmlsABFyZWNpcGVJZHhQYWNrc2l6ZQAHAApyZWNMYW5kTnVtAAAAC3JlY0xhbmRTaXplAAEAC3JlY1RlcnJhaW5zAAIADHJlY0NvbnRpbmVudAADAQ9nZXRTdHJpbmdPckZhaWwCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAARSWR4Q2ZnU3Rha2luZ0RhcHAAAQARSWR4Q2ZnRWNvbm9teURhcHAAAgEKa2V5UmVzdENmZwACDiVzX19yZXN0Q29uZmlnAQ5rZXlSZXN0QWRkcmVzcwACDCVzX19yZXN0QWRkcgERcmVhZFJlc3RDZmdPckZhaWwBBHJlc3QJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFBHJlc3QJAQprZXlSZXN0Q2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCB3Jlc3RDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdyZXN0Q2ZnBQNpZHgJAKwCAgIqUmVzdCBjZmcgZG9lc24ndCBjb250YWluIGFkZHJlc3MgYXQgaW5kZXggCQCkAwEFA2lkeAAMcmVzdENvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQ5rZXlSZXN0QWRkcmVzcwAFFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgAHcmVzdENmZwkBEXJlYWRSZXN0Q2ZnT3JGYWlsAQUMcmVzdENvbnRyYWN0AA9zdGFraW5nQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdTdGFraW5nRGFwcAAPZWNvbm9teUNvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnRWNvbm9teURhcHABEWtleUxhc3RUeElkQnlVc2VyAQRhZGRyCQCsAgICD2xhc3RUeElkQnlVc2VyXwUEYWRkcgEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICCW5mdE93bmVyXwUHYXNzZXRJZAEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBB2Fzc2V0SWQJAKwCAgIYbGFuZEN1c3RvbU5hbWVCeUFzc2V0SWRfBQdhc3NldElkARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQdhc3NldElkCQCsAgICC3N0YWtlZFRpbWVfBQdhc3NldElkARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQdhc3NldElkCQCsAgICC2luZnJhTGV2ZWxfBQdhc3NldElkASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIEdHlwZQdhc3NldElkCQC5CQIJAMwIAgINbGFuZEFydFN0YXR1cwkAzAgCBQR0eXBlCQDMCAIFB2Fzc2V0SWQFA25pbAIBXwESa2V5V2FyZWhvdXNlQnlMYW5kAQtsYW5kQXNzZXRJZAkArAICAgp3YXJlSG91c2VfBQtsYW5kQXNzZXRJZAEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQlvd25lckFkZHIJAKwCAgITc3Rha2VkTGFuZHNCeU93bmVyXwUJb3duZXJBZGRyARprZXlEdWNrQXNzZXRJZFRvQ3VzdG9tTmFtZQEHYXNzZXRJZAkArAICAhhkdWNrQ3VzdG9tTmFtZUJ5QXNzZXRJZF8FB2Fzc2V0SWQBFmtleUFkZHJlc3NUb0N1c3RvbU5hbWUBBGFkZHIJAKwCAgIYYWNjb3VudEN1c3RvbU5hbWVCeUFkZHJfBQRhZGRyAQ9rZXlBZGRyZXNzUmVmQnkBBGFkZHIJAKwCAgIJYWNjUmVmQnlfBQRhZGRyARNrZXlBZGRyZXNzUmVmZXJyYWxzAQRhZGRyCQCsAgICDWFjY1JlZmVycmFsc18FBGFkZHIBEGtleUR1Y2tJZFRvT3duZXIBB2Fzc2V0SWQJAKwCAgIKZHVja093bmVyXwUHYXNzZXRJZAEUa2V5U3Rha2VkRHVja0J5T3duZXIBCW93bmVyQWRkcgkArAICAhJzdGFrZWREdWNrQnlPd25lcl8FCW93bmVyQWRkcgEPa2V5RHVja0xvY2F0aW9uAQtkdWNrQXNzZXRJZAkArAICAg1kdWNrTG9jYXRpb25fBQtkdWNrQXNzZXRJZAENa2V5RHVja0hlYWx0aAELZHVja0Fzc2V0SWQJAKwCAgILZHVja0hlYWx0aF8FC2R1Y2tBc3NldElkAQprZXlCbG9ja2VkAAIQY29udHJhY3RzQmxvY2tlZAEOa2V5T3JkZXJCeUxhbmQBC2xhbmRBc3NldElkCQCsAgICCmxhbmRPcmRlcl8FC2xhbmRBc3NldElkAQ5rZXlFc1dhcmVob3VzZQACGmVtZXJnZW5jeVdhcmVob3VzZVByb2R1Y3RzAQhhc1N0cmluZwEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMJAAIBAhhmYWlsIHRvIGNhc3QgaW50byBTdHJpbmcBCWFzQm9vbGVhbgEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFzBQckbWF0Y2gwBQFzCQACAQIZZmFpbCB0byBjYXN0IGludG8gQm9vbGVhbgEPbnVtUGllY2VzQnlTaXplAQhsYW5kU2l6ZQQHJG1hdGNoMAUIbGFuZFNpemUDCQAAAgIBUwUHJG1hdGNoMAUFU1NJWkUDCQAAAgIBTQUHJG1hdGNoMAUFTVNJWkUDCQAAAgIBTAUHJG1hdGNoMAUFTFNJWkUDCQAAAgICWEwFByRtYXRjaDAFBlhMU0laRQMJAAACAgNYWEwFByRtYXRjaDAFB1hYTFNJWkUJAAIBAhFVbmtub3duIGxhbmQgc2l6ZQESZ2V0UmVjaXBlTWF0ZXJpYWxzAQZyZWNpcGUKAQZhZGRNYXQCAmFjAWoJAGQCBQJhYwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBnJlY2lwZQUBagoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmFkZE1hdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgANVVNEVFBSSVpFUEFSVACgwh4BEmFzTGlzdEludENvbXBhY3RlZAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIJTGlzdFtBbnldBAp2YWxBbnlMaXN0BQckbWF0Y2gwAwkBAiE9AgkAkAMBBQp2YWxBbnlMaXN0BQZOVU1SRVMJAAIBCQCsAgICDkFycmF5IHNpemUgaXMgCQCkAwEJAJADAQUKdmFsQW55TGlzdAoBBGNvbnYCA2FjYwRpdGVtBAckbWF0Y2gxBQRpdGVtAwkAAQIFByRtYXRjaDECA0ludAQCaXQFByRtYXRjaDEJAM0IAgUDYWNjCQCkAwEFAml0CQACAQIUTGlzdCB0eXBlIGlzIG5vdCBJbnQEAXIKAAIkbAUKdmFsQW55TGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEY29udgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgkAuQkCBQFyAgFfCQACAQIWZmFpbCB0byBjYXN0IGludG8gTGlzdAENYXNTcGxpdFJlc3VsdAEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIWKExpc3RbQW55XSwgTGlzdFtBbnldKQQCdDIFByRtYXRjaDAJAJQKAgkBEmFzTGlzdEludENvbXBhY3RlZAEIBQJ0MgJfMQkBEmFzTGlzdEludENvbXBhY3RlZAEIBQJ0MgJfMgkAAgECHmZhaWwgdG8gY2FzdCBpbnRvIChMaXN0LCBMaXN0KQEOd2FsbGV0SW50ZXJuYWwBDnVzZXJBZGRyZXNzT3B0BARhZGRyCQCmCAEFDnVzZXJBZGRyZXNzT3B0BAdiYWxhbmNlAwkBCWlzRGVmaW5lZAEFBGFkZHIJAO8HAQkBBXZhbHVlAQUEYWRkcgkBDkJhbGFuY2VEZXRhaWxzBAAAAAAAAAAABAt1c2R0QmFsYW5jZQMJAQlpc0RlZmluZWQBBQRhZGRyCQDwBwIJAQV2YWx1ZQEFBGFkZHIFC3VzZHRBc3NldElkAAAECmN1c3RvbU5hbWUJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5QWRkcmVzc1RvQ3VzdG9tTmFtZQEFDnVzZXJBZGRyZXNzT3B0BQ51c2VyQWRkcmVzc09wdAQFcmVmQnkJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEPa2V5QWRkcmVzc1JlZkJ5AQUOdXNlckFkZHJlc3NPcHQCAAQEcmVmcwkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARNrZXlBZGRyZXNzUmVmZXJyYWxzAQUOdXNlckFkZHJlc3NPcHQCAAQIbGFzdFR4SWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQERa2V5TGFzdFR4SWRCeVVzZXIBBQ51c2VyQWRkcmVzc09wdAIACQDMCAIJAKwCAgISJXMlc19fY3VzdG9tTmFtZV9fBQpjdXN0b21OYW1lCQDMCAIJAKwCAgISJXMlc19fcmVmZXJyZWRCeV9fBQVyZWZCeQkAzAgCCQCsAgICESVzJXNfX3JlZmVycmFsc19fBQRyZWZzCQDMCAIJAKwCAgIQJXMlc19fbGFzdFR4SWRfXwUIbGFzdFR4SWQJAMwIAgkArAICAhYlcyVzJWRfX3dhdmVzQmFsYW5jZV9fCQCkAwEIBQdiYWxhbmNlCWF2YWlsYWJsZQkAzAgCCQCsAgICFSVzJXMlZF9fdXNkdEJhbGFuY2VfXwkApAMBBQt1c2R0QmFsYW5jZQUDbmlsAQxhcHBseUJvbnVzZXMCC2xhbmRBc3NldElkBnBpZWNlcwQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQJYXJ0UGllY2VzCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQAAAQEYWRkNgkAaQIFCmluZnJhTGV2ZWwABgQEYWRkNwkAaQIFCmluZnJhTGV2ZWwABwkAlQoDBQppbmZyYUxldmVsBQlhcnRQaWVjZXMJAGQCCQBkAgUPREFJTFlSRVNCWVBJRUNFCQBrAwUPREFJTFlSRVNCWVBJRUNFCQBkAgkAZAIFCmluZnJhTGV2ZWwFBGFkZDYJAGgCAAIFBGFkZDcABQkAawMFD0RBSUxZUkVTQllQSUVDRQUJYXJ0UGllY2VzCQBoAgUGcGllY2VzAAUBF2dldFdhcmVob3VzZVRvdGFsVm9sdW1lAQl2b2xQcmVmaXgEBXBhcnRzCQC1CQIFCXZvbFByZWZpeAIBXwkAaAIJAGgCBQxXSE1VTFRJUExJRVIJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAAEMZ2V0V2FyZWhvdXNlAwV3aEtleQlsYW5kSW5kZXgKaW5mcmFMZXZlbAQJdm9sUHJlZml4CQCsAgIJAKwCAgkApAMBBQlsYW5kSW5kZXgCAV8JAKQDAQUKaW5mcmFMZXZlbAQEdG90UwkApAMBCQEXZ2V0V2FyZWhvdXNlVG90YWxWb2x1bWUBBQl2b2xQcmVmaXgEBXdoU3RyCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAUFd2hLZXkJAKwCAgkArAICCQCsAgIJAKwCAgUJdm9sUHJlZml4Ah46MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6OjBfMF8FBHRvdFMCAV8FBHRvdFMJALUJAgUFd2hTdHICAToBDWR1Y2tJbmZvVHVwbGUBC2R1Y2tBc3NldElkCQCXCgUJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2R1Y2tBc3NldElkAP///////////wEICQEFdmFsdWUBCQDsBwEJANkEAQULZHVja0Fzc2V0SWQEbmFtZQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAIACQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAD///////////8BCQEIYXNTdHJpbmcBCQD8BwQFD3N0YWtpbmdDb250cmFjdAITZ2V0QmFja3BhY2tSRUFET05MWQkAzAgCBQtkdWNrQXNzZXRJZAUDbmlsBQNuaWwBDWR1Y2tJbmZvQXJyYXkDC2R1Y2tBc3NldElkBW93bmVyB2R1Y2tJbmYECmN1c3RvbU5hbWUJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEaa2V5RHVja0Fzc2V0SWRUb0N1c3RvbU5hbWUBBQtkdWNrQXNzZXRJZAgFB2R1Y2tJbmYCXzIJAMwIAgkArAICAg8lcyVzX19hc3NldElkX18FC2R1Y2tBc3NldElkCQDMCAIJAKwCAgINJXMlc19fb3duZXJfXwUFb3duZXIJAMwIAgkArAICAhIlcyVzX19jdXN0b21OYW1lX18FCmN1c3RvbU5hbWUJAMwIAgkArAICAhIlcyVkX19zdGFrZWRUaW1lX18JAKQDAQgFB2R1Y2tJbmYCXzEJAMwIAgkArAICAgwlcyVzX19uYW1lX18IBQdkdWNrSW5mAl8yCQDMCAIJAKwCAgIQJXMlc19fbG9jYXRpb25fXwgFB2R1Y2tJbmYCXzMJAMwIAgkArAICAg4lcyVkX19oZWFsdGhfXwkApAMBCAUHZHVja0luZgJfNAkAzAgCCQCsAgICECVzJXNfX2JhY2tQYWNrX18IBQdkdWNrSW5mAl81BQNuaWwBDWxhbmRJbmZvQXJyYXkDC2xhbmRBc3NldElkBW93bmVyCnN0YWtlZFRpbWUDCQAAAgULbGFuZEFzc2V0SWQCAAkAAgECF2xhbmRBc3NldElkIGlzIHJlcXVpcmVkBAFhCQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQEAWQJALUJAggFAWELZGVzY3JpcHRpb24CAV8EB2xhbmROdW0DCQBmAggFAWEIcXVhbnRpdHkAAAkAkQMCBQFkBQpyZWNMYW5kTnVtCQCsAgICAS0JAJEDAgUBZAUKcmVjTGFuZE51bQQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQMcHJvZHVjdGl2aXR5CQEMYXBwbHlCb251c2VzAgULbGFuZEFzc2V0SWQFBnBpZWNlcwQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFCnN0YWtlZFRpbWUECGF2YWlsUmVzAwkAZgIFCnN0YWtlZFRpbWUAAAkAawMFCWRlbHRhVGltZQkAaAIIBQxwcm9kdWN0aXZpdHkCXzMFBnBpZWNlcwUJREFZTUlMTElTAAAEB25lZWRNYXQJAGsDBRFJbmZyYVVwZ3JhZGVDb3N0UwkAaAIFBnBpZWNlcwkAZAIIBQxwcm9kdWN0aXZpdHkCXzEAAQUFU1NJWkUEDmdsb2JhbEFuZExvY2FsAwkAZgIFCnN0YWtlZFRpbWUAAAkBDWFzU3BsaXRSZXN1bHQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIkc3BsaXRCeUdsb2JhbEFuZExvY2FsV2VpZ2h0c1JFQURPTkxZCQDMCAIFB25lZWRNYXQJAMwIAgUIYXZhaWxSZXMJAMwIAgkAkQMCBQFkBQtyZWNUZXJyYWlucwUDbmlsBQNuaWwJAJQKAgkBEmFzTGlzdEludENvbXBhY3RlZAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AhxzcGxpdEJ5R2xvYmFsV2VpZ2h0c1JFQURPTkxZCQDMCAIFB25lZWRNYXQFA25pbAUDbmlsAgAECmN1c3RvbU5hbWUJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEaa2V5TGFuZEFzc2V0SWRUb0N1c3RvbU5hbWUBBQtsYW5kQXNzZXRJZAkArAICCQCsAgIJAJEDAgUBZAUMcmVjQ29udGluZW50AgEtCQCRAwIFAWQFCnJlY0xhbmROdW0JAMwIAgkArAICAg8lcyVzX19hc3NldElkX18FC2xhbmRBc3NldElkCQDMCAIJAKwCAgINJXMlc19fb3duZXJfXwUFb3duZXIJAMwIAgkArAICAhIlcyVzX19jdXN0b21OYW1lX18FCmN1c3RvbU5hbWUJAMwIAgkArAICAhIlcyVkX19zdGFrZWRUaW1lX18JAKQDAQUKc3Rha2VkVGltZQkAzAgCCQCsAgICEyVzJXNfX2Rlc2NyaXB0aW9uX18JALkJAgkAzAgCBQdsYW5kTnVtCQDMCAIJAJEDAgUBZAULcmVjTGFuZFNpemUJAMwIAgkAkQMCBQFkBQtyZWNUZXJyYWlucwkAzAgCCQCRAwIFAWQFDHJlY0NvbnRpbmVudAUDbmlsAgFfCQDMCAIJAKwCAgISJXMlZF9faW5mcmFMZXZlbF9fCQCkAwEIBQxwcm9kdWN0aXZpdHkCXzEJAMwIAgkArAICAhYlcyVzX19hdmFpbFJlc0J5VHlwZV9fCAUOZ2xvYmFsQW5kTG9jYWwCXzIJAMwIAgkArAICAhUlcyVkX19hdmFpbFJlc1RvdGFsX18JAKQDAQUIYXZhaWxSZXMJAMwIAgkArAICAhQlcyVzX19uZWVkTWF0ZXJpYWxfXwgFDmdsb2JhbEFuZExvY2FsAl8xCQDMCAIJALkJAgkAzAgCAgQlcyVzCQDMCAICDWxhbmRBcnRlZmFjdHMJAMwIAgkArAICAghQUkVTQUxFOgkApAMBCAUMcHJvZHVjdGl2aXR5Al8yBQNuaWwFA1NFUAkAzAgCCQCsAgICESVzJXNfX3dhcmVob3VzZV9fCQC5CQIJAQxnZXRXYXJlaG91c2UDCQESa2V5V2FyZWhvdXNlQnlMYW5kAQULbGFuZEFzc2V0SWQJAGkCBQZwaWVjZXMFBVNTSVpFCAUMcHJvZHVjdGl2aXR5Al8xAgE6CQDMCAIJAKwCAgIRJXMlc19fbGFuZE9yZGVyX18JAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPZWNvbm9teUNvbnRyYWN0CQEOa2V5T3JkZXJCeUxhbmQBBQtsYW5kQXNzZXRJZAIwMEAwXzBAMF8wQDBfMEAwXzBAMF8wQDA6MEAwXzBAMF8wQDBfMEAwXzBAMF8wQDA6BQNuaWwBEmxhbmRPcmRlckluZm9BcnJheQILbGFuZEFzc2V0SWQFb3duZXIDCQAAAgULbGFuZEFzc2V0SWQCAAkAAgECF2xhbmRBc3NldElkIGlzIHJlcXVpcmVkBAFhCQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQEAWQJALUJAggFAWELZGVzY3JpcHRpb24CAV8EBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgUBZAULcmVjTGFuZFNpemUEDHByb2R1Y3Rpdml0eQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMJAMwIAgkArAICAg8lcyVzX19hc3NldElkX18FC2xhbmRBc3NldElkCQDMCAIJAKwCAgINJXMlc19fb3duZXJfXwUFb3duZXIJAMwIAgkArAICAhElcyVzX193YXJlaG91c2VfXwkAuQkCCQEMZ2V0V2FyZWhvdXNlAwkBEmtleVdhcmVob3VzZUJ5TGFuZAEFC2xhbmRBc3NldElkCQBpAgUGcGllY2VzBQVTU0laRQgFDHByb2R1Y3Rpdml0eQJfMQIBOgkAzAgCCQCsAgICESVzJXNfX2xhbmRPcmRlcl9fCQELdmFsdWVPckVsc2UCCQCdCAIFD2Vjb25vbXlDb250cmFjdAkBDmtleU9yZGVyQnlMYW5kAQULbGFuZEFzc2V0SWQCMDBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwOjBAMF8wQDBfMEAwXzBAMF8wQDBfMEAwOgUDbmlsDQFpAQ1jb25zdHJ1Y3RvclYxAQljb250cmFjdHMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhJwZXJtaXNzaW9ucyBkZW5pZWQKAQpkZXNjcmlwdG9yAgNhY2MLaWdub3JlZEl0ZW0JAKwCAgUDYWNjAgIlcwQFZGVzY3IKAAIkbAUJY29udHJhY3RzCgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpkZXNjcmlwdG9yAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQprZXlSZXN0Q2ZnAAkAuQkCCQDMCAIFBWRlc2NyBQljb250cmFjdHMFA1NFUAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MACQClCAEFBHRoaXMFA25pbAFpARJ3YWxsZXRJbmZvUkVBRE9OTFkBDnVzZXJBZGRyZXNzT3B0CQCUCgIFA25pbAkBDndhbGxldEludGVybmFsAQUOdXNlckFkZHJlc3NPcHQBaQEXZHVja0J5T3duZXJJbmZvUkVBRE9OTFkBC3VzZXJBZGRyZXNzBApzdGFrZWREdWNrCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQULdXNlckFkZHJlc3MJAJQKAgUDbmlsAwMJAQlpc0RlZmluZWQBCQCmCAEFC3VzZXJBZGRyZXNzCQEJaXNEZWZpbmVkAQUKc3Rha2VkRHVjawcEC2R1Y2tBc3NldElkCQEFdmFsdWUBBQpzdGFrZWREdWNrCQENZHVja0luZm9BcnJheQMFC2R1Y2tBc3NldElkBQt1c2VyQWRkcmVzcwkBDWR1Y2tJbmZvVHVwbGUBBQtkdWNrQXNzZXRJZAkBDWR1Y2tJbmZvQXJyYXkDAgAFC3VzZXJBZGRyZXNzCQCXCgUA////////////AQIAAgAA////////////AQIAAWkBGWR1Y2tCeUFzc2V0SWRJbmZvUkVBRE9OTFkBC2R1Y2tBc3NldElkBAVvd25lcgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARBrZXlEdWNrSWRUb093bmVyAQULZHVja0Fzc2V0SWQEB2R1Y2tJbmYJAQ1kdWNrSW5mb1R1cGxlAQULZHVja0Fzc2V0SWQJAJQKAgUDbmlsCQENZHVja0luZm9BcnJheQMFC2R1Y2tBc3NldElkAwkBCWlzRGVmaW5lZAEFBW93bmVyCQEFdmFsdWUBBQVvd25lcgIACQENZHVja0luZm9UdXBsZQEFC2R1Y2tBc3NldElkAWkBGWxhbmRCeUFzc2V0SWRJbmZvUkVBRE9OTFkBC2xhbmRBc3NldElkAwkAAAIFC2xhbmRBc3NldElkAgAJAAIBAhdsYW5kQXNzZXRJZCBpcyByZXF1aXJlZAQKc3Rha2VkVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQA////////////AQQFb3duZXIDCQBmAgUKc3Rha2VkVGltZQAACQEFdmFsdWUBCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkAgAJAJQKAgUDbmlsCQENbGFuZEluZm9BcnJheQMFC2xhbmRBc3NldElkBQVvd25lcgUKc3Rha2VkVGltZQFpAR5zdGFrZWRMYW5kc0J5T3duZXJJbmZvUkVBRE9OTFkBEGxhbmRPd25lckFkZHJlc3MDCQAAAgUQbGFuZE93bmVyQWRkcmVzcwIACQACAQIcbGFuZE93bmVyQWRkcmVzcyBpcyByZXF1aXJlZAQIbGFuZHNTdHIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5U3Rha2VkTGFuZHNCeU93bmVyAQUQbGFuZE93bmVyQWRkcmVzcwQFbGFuZHMDCQEJaXNEZWZpbmVkAQUIbGFuZHNTdHIJAL0JAgkBBXZhbHVlAQUIbGFuZHNTdHICAV8FA25pbAoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAMJAAACBQtsYW5kQXNzZXRJZAIACQACAQIXbGFuZEFzc2V0SWQgaXMgcmVxdWlyZWQECnN0YWtlZFRpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAP///////////wEJAM0IAgUDYWNjCQENbGFuZEluZm9BcnJheQMFC2xhbmRBc3NldElkBRBsYW5kT3duZXJBZGRyZXNzBQpzdGFrZWRUaW1lBAFyCgACJGwFBWxhbmRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdvbmVMYW5kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAkAlAoCBQNuaWwFAXIBaQEWbGFuZHNCeUlkc0luZm9SRUFET05MWQEMbGFuZEFzc2V0SWRzCgEHb25lTGFuZAIDYWNjC2xhbmRBc3NldElkAwkAAAIFC2xhbmRBc3NldElkAgAJAAIBAhdsYW5kQXNzZXRJZCBpcyByZXF1aXJlZAQKc3Rha2VkVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQA////////////AQQFb3duZXIDCQBmAgUKc3Rha2VkVGltZQAACQEFdmFsdWUBCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkAgAJAM0IAgUDYWNjCQENbGFuZEluZm9BcnJheQMFC2xhbmRBc3NldElkBQVvd25lcgUKc3Rha2VkVGltZQQBcgoAAiRsBQxsYW5kQXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB29uZUxhbmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQCUCgIFA25pbAUBcgFpASN3YXJlaG91c2VPcmRlckJ5QXNzZXRJZEluZm9SRUFET05MWQELbGFuZEFzc2V0SWQDCQAAAgULbGFuZEFzc2V0SWQCAAkAAgECF2xhbmRBc3NldElkIGlzIHJlcXVpcmVkBApzdGFrZWRUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAD///////////8BBAVvd25lcgMJAGYCBQpzdGFrZWRUaW1lAAAJAQV2YWx1ZQEJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQCAAkAlAoCBQNuaWwJARJsYW5kT3JkZXJJbmZvQXJyYXkCBQtsYW5kQXNzZXRJZAUFb3duZXIBaQEbb3JkZXJzQnlMYW5kSWRzSW5mb1JFQURPTkxZAQxsYW5kQXNzZXRJZHMKAQdvbmVMYW5kAgNhY2MLbGFuZEFzc2V0SWQDCQAAAgULbGFuZEFzc2V0SWQCAAkAAgECF2xhbmRBc3NldElkIGlzIHJlcXVpcmVkBApzdGFrZWRUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAD///////////8BBAVvd25lcgMJAGYCBQpzdGFrZWRUaW1lAAAJAQV2YWx1ZQEJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQCAAkAzQgCBQNhY2MJARJsYW5kT3JkZXJJbmZvQXJyYXkCBQtsYW5kQXNzZXRJZAUFb3duZXIEAXIKAAIkbAUMbGFuZEFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdvbmVMYW5kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA0MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoCQCUCgIFA25pbAUBcgFpARVjYW5jZWxXYXJlaG91c2VPcmRlcnMBDGxhbmRBc3NldElkcwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEXBlcm1pc3Npb24gZGVuaWVkBAdibG9ja2VkCQCbCAIFD3N0YWtpbmdDb250cmFjdAkBCmtleUJsb2NrZWQAAwMJAQEhAQkBCWlzRGVmaW5lZAEFB2Jsb2NrZWQGCQAAAgkBBXZhbHVlAQUHYmxvY2tlZAcJAAIBAjNDb250cmFjdHMgc2hvdWxkIGJlIGJsb2NrZWQgYmVmb3JlIGNhbmNlbGluZyBvcmRlcnMKAQdvbmVMYW5kAgFhC2xhbmRBc3NldElkAwkAAAIFC2xhbmRBc3NldElkAgAJAAIBAhdsYW5kQXNzZXRJZCBpcyByZXF1aXJlZAQBYwkBCWFzQm9vbGVhbgEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhFzZXRXYXJlaG91c2VPcmRlcgkAzAgCAjAwQDBfMEAwXzBAMF8wQDBfMEAwXzBAMDowQDBfMEAwXzBAMF8wQDBfMEAwXzBAMDoJAMwIAgULbGFuZEFzc2V0SWQFA25pbAUDbmlsAwMFAWEGBQFjCQEBIQEDBQFhBQFjBwcEAXIKAAIkbAUMbGFuZEFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAcKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB29uZUxhbmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDMwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeCQCUCgIFA25pbAUBcgFpARNmaXhXYXJlaG91c2VGb3JtYXRzAQxsYW5kQXNzZXRJZHMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAoBB29uZUxhbmQCA2FjYwtsYW5kQXNzZXRJZAMJAAACBQtsYW5kQXNzZXRJZAIACQACAQIXbGFuZEFzc2V0SWQgaXMgcmVxdWlyZWQJAGQCBQNhY2MJALECAQkBCGFzU3RyaW5nAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCEmZpeFdhcmVob3VzZUZvcm1hdAkAzAgCBQtsYW5kQXNzZXRJZAUDbmlsBQNuaWwEAXIKAAIkbAUMbGFuZEFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdvbmVMYW5kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZCQCUCgIFA25pbAUBcgFpAQ1zZW5kVXNkdFByaXplAQt1c2VyQWRkcmVzcwMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQIRcGVybWlzc2lvbiBkZW5pZWQEA2FtdAkAawMJAPAHAgUEdGhpcwULdXNkdEFzc2V0SWQFDVVTRFRQUklaRVBBUlQFBU1VTFQ2CQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQULdXNlckFkZHJlc3MFA2FtdAULdXNkdEFzc2V0SWQFA25pbAUDYW10AWkBH2dldEVtZXJnZW5jeVNlcnZpY2VEYXRhUkVBRE9OTFkABAhleGlzdFN0cgkAnQgCBQ9lY29ub215Q29udHJhY3QJAQ5rZXlFc1dhcmVob3VzZQAEDGV4aXN0QW1vdW50cwMJAQlpc0RlZmluZWQBBQhleGlzdFN0cgkAtQkCCQEFdmFsdWUBBQhleGlzdFN0cgIBXwUDbmlsCgEKc2luZ2xlUHJvZAIDYWNjCXJlY2lwZVN0cgQBbggFA2FjYwJfMgQGcmVjaXBlCQC1CQIFCXJlY2lwZVN0cgIBXwQIcGFja1NpemUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQZyZWNpcGUFEXJlY2lwZUlkeFBhY2tzaXplBAltYXhBbW91bnQDCQAAAgUBbgAACQBoAgUNRVNNQVhQQUNLQUdFUwUIcGFja1NpemUAAAQLZXhpc3RBbW91bnQDCQBmAgkAkAMBBQxleGlzdEFtb3VudHMFAW4JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQxleGlzdEFtb3VudHMFAW4AAAQIdG90YWxNYXQJARJnZXRSZWNpcGVNYXRlcmlhbHMBBQZyZWNpcGUECGJ1eVByaWNlCQBrAwkAaAIFCHRvdGFsTWF0BQlFU0JVWUNPRUYFEFJFU09VUkNFUFJJQ0VNSU4JAGgCAAoFCHBhY2tTaXplBAlzZWxsUHJpY2UJAGsDCQBoAgUIdG90YWxNYXQFCkVTU0VMTENPRUYFEFJFU09VUkNFUFJJQ0VNSU4JAGgCAAoFCHBhY2tTaXplBAF5CQC5CQIJAMwIAgkApAMBBQltYXhBbW91bnQJAMwIAgkApAMBBQtleGlzdEFtb3VudAkAzAgCCQCkAwEFCGJ1eVByaWNlCQDMCAIJAKQDAQUJc2VsbFByaWNlBQNuaWwCAV8JAJQKAgkAzQgCCAUDYWNjAl8xBQF5CQBkAgUBbgABBAFzCQC6CQIICgACJGwFEHByb2R1Y3Rpb25NYXRyaXgKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpzaW5nbGVQcm9kAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADICXzECAToEBnJlc3VsdAkArAICAhwlcyVzX19lbWVyZ2VuY3lTZXJ2aWNlRGF0YV9fBQFzCQCUCgIFA25pbAUGcmVzdWx0AEF6Efw=",
    "height": 3685104,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FRMkwTsSCbeUydjtU8ApENVn6Sx2K9YicVfTUVmNGYMh
Next: CgtxriQm5c7iSkTvnuHz5CU7659LyakjyKDi4qR7aMHd

Diff: 
Old
New
Differences
12
12
 
                else throw("Unknown chain")
13
13
 
}
14
14
 
15
+
let defaultRestAddressStr = match chain {
16
+
    case _ => 
17
+
        if ((base58'2W' == $match0))
18
+
            then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
19
+
            else if ((base58'2T' == $match0))
20
+
                then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
21
+
                else throw("Unknown chain")
22
+
}
23
+
15
24
 
let InfraUpgradeCostS = match chain {
16
25
 
    case _ => 
17
26
 
        if ((base58'2W' == $match0))
21
30
 
                else throw("Unknown chain")
22
31
 
}
23
32
 
33
+
let SEP = "__"
34
+
24
35
 
let MULT6 = 1000000
25
36
 
26
-
let MULT8 = 100000000
27
-
28
-
let LANDPREFIX = "LAND"
29
-
30
-
let DUCKPREFIX = "DUCK"
31
-
32
-
let SEP = "__"
33
-
34
37
 
let ARTPRESALE = "PRESALE"
35
-
36
-
let DAILYRESBYPIECE = 3456000
37
-
38
-
let DAYMILLIS = 86400000
39
38
 
40
39
 
let NUMRES = 6
41
40
 
49
48
 
50
49
 
let XXLSIZE = 625
51
50
 
52
-
let USDTPRIZEPART = 500000
51
+
let DAILYRESBYPIECE = 3456000
52
+
53
+
let DAYMILLIS = 86400000
53
54
 
54
55
 
let WHMULTIPLIER = 10000000000
56
+
57
+
let RESOURCEPRICEMIN = 39637
58
+
59
+
let ESMAXPACKAGES = 3
60
+
61
+
let ESBUYCOEF = 4
62
+
63
+
let ESSELLCOEF = 10
64
+
65
+
let productionMatrix = ["1_1_1_2_2_5_1_10_0", "2_2_2_4_4_10_1_10_0", "3_3_3_6_6_15_1_10_0", "2_5_5_2_7_5_2_100_1", "4_10_10_4_14_10_2_100_1", "6_15_15_6_21_15_2_100_1", "1_1_1_1_1_8_1_10_2", "2_2_2_2_2_16_1_10_2", "3_3_3_3_3_24_1_10_2", "9_9_1_5_5_1_5_100_3", "18_18_2_10_10_2_5_100_3", "27_27_3_15_15_3_5_100_3", "2_2_1_2_2_2_1_10_4", "4_4_2_4_4_4_1_10_4", "6_6_3_6_6_6_1_10_4"]
66
+
67
+
let recipeIdxPacksize = 7
55
68
 
56
69
 
let recLandNum = 0
57
70
 
61
74
 
62
75
 
let recContinent = 3
63
76
 
64
-
let whIdxLevels = 0
65
-
66
-
let whIdxRes = 1
67
-
68
-
let whIdxMat = 2
69
-
70
-
let whIdxProd = 3
71
-
72
-
let whIdxLOFT = 4
73
-
74
-
let volLocked = 0
75
-
76
-
let volOccupied = 1
77
-
78
-
let volFree = 2
79
-
80
-
let volTotal = 3
81
-
82
-
func keyRestCfg () = "%s__restConfig"
77
+
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
83
78
 
84
79
 
85
80
 
let IdxCfgStakingDapp = 1
86
81
 
87
82
 
let IdxCfgEconomyDapp = 2
88
83
 
89
-
let IdxCfgGovernanceDapp = 3
90
-
91
-
let productPackages = [10, 10, 10, 100, 100, 100, 10, 10, 10, 100, 100, 100, 10, 10, 10]
92
-
93
-
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
84
+
func keyRestCfg () = "%s__restConfig"
94
85
 
95
86
 
96
-
func readRestCfgOrFail () = split_4C(getStringOrFail(this, keyRestCfg()), SEP)
87
+
func keyRestAddress () = "%s__restAddr"
88
+
89
+
90
+
func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
97
91
 
98
92
 
99
93
 
func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
100
94
 
101
95
 
102
-
let restCfg = readRestCfgOrFail()
96
+
let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
97
+
98
+
let restCfg = readRestCfgOrFail(restContract)
103
99
 
104
100
 
let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
105
101
 
106
102
 
let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
107
103
 
108
-
let governanceContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
109
-
110
-
func keyBlocked () = "contractsBlocked"
111
-
112
-
113
-
func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
114
-
115
-
116
-
func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
117
-
118
-
119
-
func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
120
-
121
-
122
-
func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("stakedTimeByTypeAssetIdAndOwner_" + nftType) + "_") + assetId) + "_") + ownerAddr)
123
-
124
-
125
-
func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
126
-
127
-
128
-
func keyWarehouseByLand (landAssetId) = ("wareHouse_" + landAssetId)
129
-
130
-
131
-
func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
132
-
133
-
134
-
func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
104
+
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
135
105
 
136
106
 
137
107
 
func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
138
108
 
139
109
 
140
110
 
func keyLandAssetIdToCustomName (assetId) = ("landCustomNameByAssetId_" + assetId)
111
+
112
+
113
+
func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
114
+
115
+
116
+
func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
117
+
118
+
119
+
func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["landArtStatus", type, assetId], "_")
120
+
121
+
122
+
func keyWarehouseByLand (landAssetId) = ("wareHouse_" + landAssetId)
123
+
124
+
125
+
func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
141
126
 
142
127
 
143
128
 
func keyDuckAssetIdToCustomName (assetId) = ("duckCustomNameByAssetId_" + assetId)
152
137
 
func keyAddressReferrals (addr) = ("accReferrals_" + addr)
153
138
 
154
139
 
155
-
func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
140
+
func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
156
141
 
157
142
 
158
-
func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["landArtStatus", type, assetId], "_")
143
+
func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
159
144
 
160
145
 
161
-
func keyPresaleArtActivatedByAssetId (assetId) = ("presaleArtActivated_" + assetId)
146
+
func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
162
147
 
163
148
 
164
-
func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
149
+
func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
165
150
 
166
151
 
167
-
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
152
+
func keyBlocked () = "contractsBlocked"
168
153
 
169
154
 
170
155
 
func keyOrderByLand (landAssetId) = ("landOrder_" + landAssetId)
156
+
157
+
158
+
func keyEsWarehouse () = "emergencyWarehouseProducts"
171
159
 
172
160
 
173
161
 
func asString (v) = match v {
178
166
 
}
179
167
 
180
168
 
181
-
func asInt (v) = match v {
182
-
    case n: Int => 
183
-
        n
184
-
    case _ => 
185
-
        throw("fail to cast into Int")
186
-
}
187
-
188
-
189
169
 
func asBoolean (v) = match v {
190
170
 
    case s: Boolean => 
191
171
 
        s
193
173
 
        throw("fail to cast into Boolean")
194
174
 
}
195
175
 
176
+
177
+
func numPiecesBySize (landSize) = match landSize {
178
+
    case _ => 
179
+
        if (("S" == $match0))
180
+
            then SSIZE
181
+
            else if (("M" == $match0))
182
+
                then MSIZE
183
+
                else if (("L" == $match0))
184
+
                    then LSIZE
185
+
                    else if (("XL" == $match0))
186
+
                        then XLSIZE
187
+
                        else if (("XXL" == $match0))
188
+
                            then XXLSIZE
189
+
                            else throw("Unknown land size")
190
+
}
191
+
192
+
193
+
func getRecipeMaterials (recipe) = {
194
+
    func addMat (ac,j) =     (ac + parseIntValue(recipe[j]))
195
+
196
+
    let $l = [0, 1, 2, 3, 4, 5]
197
+
    let $s = size($l)
198
+
    let $acc0 = 0
199
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
200
+
        then $a
201
+
        else addMat($a, $l[$i])
202
+
203
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
204
+
        then $a
205
+
        else throw("List size exceeds 6")
206
+
207
+
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
208
+
    }
209
+
210
+
211
+
let USDTPRIZEPART = 500000
196
212
 
197
213
 
func asListIntCompacted (val) = match val {
198
214
 
    case valAnyList: List[Any] => 
260
276
 
    }
261
277
 
262
278
 
263
-
func numPiecesBySize (landSize) = match landSize {
264
-
    case _ => 
265
-
        if (("S" == $match0))
266
-
            then SSIZE
267
-
            else if (("M" == $match0))
268
-
                then MSIZE
269
-
                else if (("L" == $match0))
270
-
                    then LSIZE
271
-
                    else if (("XL" == $match0))
272
-
                        then XLSIZE
273
-
                        else if (("XXL" == $match0))
274
-
                            then XXLSIZE
275
-
                            else throw("Unknown land size")
276
-
}
277
-
278
-
279
279
 
func getWarehouseTotalVolume (volPrefix) = {
280
280
 
    let parts = split(volPrefix, "_")
281
281
 
    ((WHMULTIPLIER * (parseIntValue(parts[1]) + 1)) * parseIntValue(parts[0]))
282
282
 
    }
283
283
 
284
284
 
285
-
func getWarehouseOccupiedVol (currentWh) = {
286
-
    let goods = currentWh[whIdxProd]
287
-
    func sumResMat (acc,item) =     (acc + parseIntValue(item))
288
-
289
-
    func sumProd (acc,item) =     {
290
-
        let idx = acc._1
291
-
        let pkgSize = productPackages[idx]
292
-
        let pkgs = (((parseIntValue(item) + pkgSize) - 1) / pkgSize)
293
-
        $Tuple2((idx + 1), (acc._2 + (pkgs * MULT8)))
294
-
        }
295
-
296
-
    let whResVol = {
297
-
        let $l = split(currentWh[whIdxRes], "_")
298
-
        let $s = size($l)
299
-
        let $acc0 = 0
300
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
301
-
            then $a
302
-
            else sumResMat($a, $l[$i])
303
-
304
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
305
-
            then $a
306
-
            else throw("List size exceeds 6")
307
-
308
-
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
309
-
        }
310
-
    let whMatVol = {
311
-
        let $l = split(currentWh[whIdxMat], "_")
312
-
        let $s = size($l)
313
-
        let $acc0 = 0
314
-
        func $f1_1 ($a,$i) =         if (($i >= $s))
315
-
            then $a
316
-
            else sumResMat($a, $l[$i])
317
-
318
-
        func $f1_2 ($a,$i) =         if (($i >= $s))
319
-
            then $a
320
-
            else throw("List size exceeds 6")
321
-
322
-
        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
323
-
        }
324
-
    let whGoodsVol = if ((goods == ""))
325
-
        then 0
326
-
        else (        let $l = split_4C(goods, "_")
327
-
        let $s = size($l)
328
-
        let $acc0 = $Tuple2(0, 0)
329
-
        func $f2_1 ($a,$i) =         if (($i >= $s))
330
-
            then $a
331
-
            else sumProd($a, $l[$i])
332
-
333
-
        func $f2_2 ($a,$i) =         if (($i >= $s))
334
-
            then $a
335
-
            else throw("List size exceeds 50")
336
-
337
-
        $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50))._2
338
-
    ((whResVol + whMatVol) + whGoodsVol)
339
-
    }
340
-
341
-
342
285
 
func getWarehouse (whKey,landIndex,infraLevel) = {
343
286
 
    let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
344
-
    let whTotal = getWarehouseTotalVolume(volPrefix)
345
-
    let whStr = valueOrElse(getString(stakingContract, whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0::0"))
346
-
    let wh = split(whStr, ":")
347
-
    let whOccupied = getWarehouseOccupiedVol(wh)
348
-
    let whLoft = if ((5 > size(wh)))
349
-
        then makeString(["0", toString(whOccupied), toString((whTotal - whOccupied)), toString(whTotal)], "_")
350
-
        else {
351
-
            let loft = split(wh[whIdxLOFT], "_")
352
-
            let whLocked = parseIntValue(loft[volLocked])
353
-
            let occ = if ((size(loft) > 1))
354
-
                then parseIntValue(loft[volOccupied])
355
-
                else whOccupied
356
-
            makeString([toString(whLocked), toString(occ), toString(((whTotal - whLocked) - occ)), toString(whTotal)], "_")
357
-
            }
358
-
[wh[whIdxLevels], if ((size(split(wh[whIdxRes], "_")) == NUMRES))
359
-
        then wh[whIdxRes]
360
-
        else "0_0_0_0_0_0", if ((size(split(wh[whIdxMat], "_")) == NUMRES))
361
-
        then wh[whIdxMat]
362
-
        else "0_0_0_0_0_0", wh[whIdxProd], whLoft]
287
+
    let totS = toString(getWarehouseTotalVolume(volPrefix))
288
+
    let whStr = valueOrElse(getString(stakingContract, whKey), ((((volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0::0_0_") + totS) + "_") + totS))
289
+
    split(whStr, ":")
363
290
 
    }
364
291
 
365
292
 
407
334
 
408
335
 
409
336
 
@Callable(i)
410
-
func constructorV1 (stakingContract,economyContract,governanceContract) = if ((i.caller != this))
337
+
func constructorV1 (contracts) = if ((i.caller != this))
411
338
 
    then throw("permissions denied")
412
-
    else [StringEntry(keyRestCfg(), makeString(["%s%s%s", stakingContract, economyContract, governanceContract], SEP))]
339
+
    else {
340
+
        func descriptor (acc,ignoredItem) =         (acc + "%s")
341
+
342
+
        let descr = {
343
+
            let $l = contracts
344
+
            let $s = size($l)
345
+
            let $acc0 = ""
346
+
            func $f0_1 ($a,$i) =             if (($i >= $s))
347
+
                then $a
348
+
                else descriptor($a, $l[$i])
349
+
350
+
            func $f0_2 ($a,$i) =             if (($i >= $s))
351
+
                then $a
352
+
                else throw("List size exceeds 10")
353
+
354
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
355
+
            }
356
+
[StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRestAddress(), toString(this))]
357
+
        }
413
358
 
414
359
 
415
360
 
482
427
 
483
428
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
484
429
 
                then $a
485
-
                else throw("List size exceeds 40")
430
+
                else throw("List size exceeds 100")
486
431
 
487
-
            $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($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)
432
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
488
433
 
            }
489
434
 
        $Tuple2(nil, r)
490
435
 
        }
513
458
 
514
459
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
515
460
 
            then $a
516
-
            else throw("List size exceeds 40")
461
+
            else throw("List size exceeds 100")
517
462
 
518
-
        $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($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)
463
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
519
464
 
        }
520
465
 
    $Tuple2(nil, r)
521
466
 
    }
615
560
 
    else {
616
561
 
        func oneLand (acc,landAssetId) =         if ((landAssetId == ""))
617
562
 
            then throw("landAssetId is required")
618
-
            else if (isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId))))
619
-
                then (acc + size(asString(invoke(stakingContract, "fixWarehouseFormat", [landAssetId], nil))))
620
-
                else acc
563
+
            else (acc + size(asString(invoke(stakingContract, "fixWarehouseFormat", [landAssetId], nil))))
621
564
 
622
565
 
        let r = {
623
566
 
            let $l = landAssetIds
647
590
 
        }
648
591
 
649
592
 
593
+
594
+
@Callable(i)
595
+
func getEmergencyServiceDataREADONLY () = {
596
+
    let existStr = getString(economyContract, keyEsWarehouse())
597
+
    let existAmounts = if (isDefined(existStr))
598
+
        then split(value(existStr), "_")
599
+
        else nil
600
+
    func singleProd (acc,recipeStr) =     {
601
+
        let n = acc._2
602
+
        let recipe = split(recipeStr, "_")
603
+
        let packSize = parseIntValue(recipe[recipeIdxPacksize])
604
+
        let maxAmount = if ((n == 0))
605
+
            then (ESMAXPACKAGES * packSize)
606
+
            else 0
607
+
        let existAmount = if ((size(existAmounts) > n))
608
+
            then parseIntValue(existAmounts[n])
609
+
            else 0
610
+
        let totalMat = getRecipeMaterials(recipe)
611
+
        let buyPrice = fraction((totalMat * ESBUYCOEF), RESOURCEPRICEMIN, (10 * packSize))
612
+
        let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (10 * packSize))
613
+
        let y = makeString([toString(maxAmount), toString(existAmount), toString(buyPrice), toString(sellPrice)], "_")
614
+
        $Tuple2((acc._1 :+ y), (n + 1))
615
+
        }
616
+
617
+
    let s = makeString_2C((    let $l = productionMatrix
618
+
    let $s = size($l)
619
+
    let $acc0 = $Tuple2(nil, 0)
620
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
621
+
        then $a
622
+
        else singleProd($a, $l[$i])
623
+
624
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
625
+
        then $a
626
+
        else throw("List size exceeds 50")
627
+
628
+
    $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, ":")
629
+
    let result = ("%s%s__emergencyServiceData__" + s)
630
+
    $Tuple2(nil, result)
631
+
    }
632
+
633
+

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let chain = take(drop(this.bytes, 1), 1)
5
5
 
6
6
 
let usdtAssetId = match chain {
7
7
 
    case _ => 
8
8
 
        if ((base58'2W' == $match0))
9
9
 
            then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
10
10
 
            else if ((base58'2T' == $match0))
11
11
 
                then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
12
12
 
                else throw("Unknown chain")
13
13
 
}
14
14
 
15
+
let defaultRestAddressStr = match chain {
16
+
    case _ => 
17
+
        if ((base58'2W' == $match0))
18
+
            then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
19
+
            else if ((base58'2T' == $match0))
20
+
                then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
21
+
                else throw("Unknown chain")
22
+
}
23
+
15
24
 
let InfraUpgradeCostS = match chain {
16
25
 
    case _ => 
17
26
 
        if ((base58'2W' == $match0))
18
27
 
            then 10000000000
19
28
 
            else if ((base58'2T' == $match0))
20
29
 
                then 100000000
21
30
 
                else throw("Unknown chain")
22
31
 
}
23
32
 
33
+
let SEP = "__"
34
+
24
35
 
let MULT6 = 1000000
25
36
 
26
-
let MULT8 = 100000000
27
-
28
-
let LANDPREFIX = "LAND"
29
-
30
-
let DUCKPREFIX = "DUCK"
31
-
32
-
let SEP = "__"
33
-
34
37
 
let ARTPRESALE = "PRESALE"
35
-
36
-
let DAILYRESBYPIECE = 3456000
37
-
38
-
let DAYMILLIS = 86400000
39
38
 
40
39
 
let NUMRES = 6
41
40
 
42
41
 
let SSIZE = 25
43
42
 
44
43
 
let MSIZE = 100
45
44
 
46
45
 
let LSIZE = 225
47
46
 
48
47
 
let XLSIZE = 400
49
48
 
50
49
 
let XXLSIZE = 625
51
50
 
52
-
let USDTPRIZEPART = 500000
51
+
let DAILYRESBYPIECE = 3456000
52
+
53
+
let DAYMILLIS = 86400000
53
54
 
54
55
 
let WHMULTIPLIER = 10000000000
56
+
57
+
let RESOURCEPRICEMIN = 39637
58
+
59
+
let ESMAXPACKAGES = 3
60
+
61
+
let ESBUYCOEF = 4
62
+
63
+
let ESSELLCOEF = 10
64
+
65
+
let productionMatrix = ["1_1_1_2_2_5_1_10_0", "2_2_2_4_4_10_1_10_0", "3_3_3_6_6_15_1_10_0", "2_5_5_2_7_5_2_100_1", "4_10_10_4_14_10_2_100_1", "6_15_15_6_21_15_2_100_1", "1_1_1_1_1_8_1_10_2", "2_2_2_2_2_16_1_10_2", "3_3_3_3_3_24_1_10_2", "9_9_1_5_5_1_5_100_3", "18_18_2_10_10_2_5_100_3", "27_27_3_15_15_3_5_100_3", "2_2_1_2_2_2_1_10_4", "4_4_2_4_4_4_1_10_4", "6_6_3_6_6_6_1_10_4"]
66
+
67
+
let recipeIdxPacksize = 7
55
68
 
56
69
 
let recLandNum = 0
57
70
 
58
71
 
let recLandSize = 1
59
72
 
60
73
 
let recTerrains = 2
61
74
 
62
75
 
let recContinent = 3
63
76
 
64
-
let whIdxLevels = 0
65
-
66
-
let whIdxRes = 1
67
-
68
-
let whIdxMat = 2
69
-
70
-
let whIdxProd = 3
71
-
72
-
let whIdxLOFT = 4
73
-
74
-
let volLocked = 0
75
-
76
-
let volOccupied = 1
77
-
78
-
let volFree = 2
79
-
80
-
let volTotal = 3
81
-
82
-
func keyRestCfg () = "%s__restConfig"
77
+
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
83
78
 
84
79
 
85
80
 
let IdxCfgStakingDapp = 1
86
81
 
87
82
 
let IdxCfgEconomyDapp = 2
88
83
 
89
-
let IdxCfgGovernanceDapp = 3
90
-
91
-
let productPackages = [10, 10, 10, 100, 100, 100, 10, 10, 10, 100, 100, 100, 10, 10, 10]
92
-
93
-
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
84
+
func keyRestCfg () = "%s__restConfig"
94
85
 
95
86
 
96
-
func readRestCfgOrFail () = split_4C(getStringOrFail(this, keyRestCfg()), SEP)
87
+
func keyRestAddress () = "%s__restAddr"
88
+
89
+
90
+
func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
97
91
 
98
92
 
99
93
 
func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
100
94
 
101
95
 
102
-
let restCfg = readRestCfgOrFail()
96
+
let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
97
+
98
+
let restCfg = readRestCfgOrFail(restContract)
103
99
 
104
100
 
let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
105
101
 
106
102
 
let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
107
103
 
108
-
let governanceContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
109
-
110
-
func keyBlocked () = "contractsBlocked"
111
-
112
-
113
-
func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
114
-
115
-
116
-
func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
117
-
118
-
119
-
func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
120
-
121
-
122
-
func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("stakedTimeByTypeAssetIdAndOwner_" + nftType) + "_") + assetId) + "_") + ownerAddr)
123
-
124
-
125
-
func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
126
-
127
-
128
-
func keyWarehouseByLand (landAssetId) = ("wareHouse_" + landAssetId)
129
-
130
-
131
-
func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
132
-
133
-
134
-
func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
104
+
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
135
105
 
136
106
 
137
107
 
func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
138
108
 
139
109
 
140
110
 
func keyLandAssetIdToCustomName (assetId) = ("landCustomNameByAssetId_" + assetId)
111
+
112
+
113
+
func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
114
+
115
+
116
+
func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
117
+
118
+
119
+
func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["landArtStatus", type, assetId], "_")
120
+
121
+
122
+
func keyWarehouseByLand (landAssetId) = ("wareHouse_" + landAssetId)
123
+
124
+
125
+
func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
141
126
 
142
127
 
143
128
 
func keyDuckAssetIdToCustomName (assetId) = ("duckCustomNameByAssetId_" + assetId)
144
129
 
145
130
 
146
131
 
func keyAddressToCustomName (addr) = ("accountCustomNameByAddr_" + addr)
147
132
 
148
133
 
149
134
 
func keyAddressRefBy (addr) = ("accRefBy_" + addr)
150
135
 
151
136
 
152
137
 
func keyAddressReferrals (addr) = ("accReferrals_" + addr)
153
138
 
154
139
 
155
-
func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
140
+
func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
156
141
 
157
142
 
158
-
func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["landArtStatus", type, assetId], "_")
143
+
func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
159
144
 
160
145
 
161
-
func keyPresaleArtActivatedByAssetId (assetId) = ("presaleArtActivated_" + assetId)
146
+
func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
162
147
 
163
148
 
164
-
func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
149
+
func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
165
150
 
166
151
 
167
-
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
152
+
func keyBlocked () = "contractsBlocked"
168
153
 
169
154
 
170
155
 
func keyOrderByLand (landAssetId) = ("landOrder_" + landAssetId)
156
+
157
+
158
+
func keyEsWarehouse () = "emergencyWarehouseProducts"
171
159
 
172
160
 
173
161
 
func asString (v) = match v {
174
162
 
    case s: String => 
175
163
 
        s
176
164
 
    case _ => 
177
165
 
        throw("fail to cast into String")
178
166
 
}
179
167
 
180
168
 
181
-
func asInt (v) = match v {
182
-
    case n: Int => 
183
-
        n
184
-
    case _ => 
185
-
        throw("fail to cast into Int")
186
-
}
187
-
188
-
189
169
 
func asBoolean (v) = match v {
190
170
 
    case s: Boolean => 
191
171
 
        s
192
172
 
    case _ => 
193
173
 
        throw("fail to cast into Boolean")
194
174
 
}
195
175
 
176
+
177
+
func numPiecesBySize (landSize) = match landSize {
178
+
    case _ => 
179
+
        if (("S" == $match0))
180
+
            then SSIZE
181
+
            else if (("M" == $match0))
182
+
                then MSIZE
183
+
                else if (("L" == $match0))
184
+
                    then LSIZE
185
+
                    else if (("XL" == $match0))
186
+
                        then XLSIZE
187
+
                        else if (("XXL" == $match0))
188
+
                            then XXLSIZE
189
+
                            else throw("Unknown land size")
190
+
}
191
+
192
+
193
+
func getRecipeMaterials (recipe) = {
194
+
    func addMat (ac,j) =     (ac + parseIntValue(recipe[j]))
195
+
196
+
    let $l = [0, 1, 2, 3, 4, 5]
197
+
    let $s = size($l)
198
+
    let $acc0 = 0
199
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
200
+
        then $a
201
+
        else addMat($a, $l[$i])
202
+
203
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
204
+
        then $a
205
+
        else throw("List size exceeds 6")
206
+
207
+
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
208
+
    }
209
+
210
+
211
+
let USDTPRIZEPART = 500000
196
212
 
197
213
 
func asListIntCompacted (val) = match val {
198
214
 
    case valAnyList: List[Any] => 
199
215
 
        if ((size(valAnyList) != NUMRES))
200
216
 
            then throw(("Array size is " + toString(size(valAnyList))))
201
217
 
            else {
202
218
 
                func conv (acc,item) =                                 match item {
203
219
 
                    case it: Int => 
204
220
 
                        (acc :+ toString(it))
205
221
 
                    case _ => 
206
222
 
                        throw("List type is not Int")
207
223
 
                }
208
224
 
209
225
 
                let r = {
210
226
 
                    let $l = valAnyList
211
227
 
                    let $s = size($l)
212
228
 
                    let $acc0 = nil
213
229
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
214
230
 
                        then $a
215
231
 
                        else conv($a, $l[$i])
216
232
 
217
233
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
218
234
 
                        then $a
219
235
 
                        else throw("List size exceeds 6")
220
236
 
221
237
 
                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
222
238
 
                    }
223
239
 
                makeString(r, "_")
224
240
 
                }
225
241
 
    case _ => 
226
242
 
        throw("fail to cast into List")
227
243
 
}
228
244
 
229
245
 
230
246
 
func asSplitResult (val) = match val {
231
247
 
    case t2: (List[Any], List[Any]) => 
232
248
 
        $Tuple2(asListIntCompacted(t2._1), asListIntCompacted(t2._2))
233
249
 
    case _ => 
234
250
 
        throw("fail to cast into (List, List)")
235
251
 
}
236
252
 
237
253
 
238
254
 
func walletInternal (userAddressOpt) = {
239
255
 
    let addr = addressFromString(userAddressOpt)
240
256
 
    let balance = if (isDefined(addr))
241
257
 
        then wavesBalance(value(addr))
242
258
 
        else BalanceDetails(0, 0, 0, 0)
243
259
 
    let usdtBalance = if (isDefined(addr))
244
260
 
        then assetBalance(value(addr), usdtAssetId)
245
261
 
        else 0
246
262
 
    let customName = valueOrElse(getString(stakingContract, keyAddressToCustomName(userAddressOpt)), userAddressOpt)
247
263
 
    let refBy = valueOrElse(getString(stakingContract, keyAddressRefBy(userAddressOpt)), "")
248
264
 
    let refs = valueOrElse(getString(stakingContract, keyAddressReferrals(userAddressOpt)), "")
249
265
 
    let lastTxId = valueOrElse(getString(stakingContract, keyLastTxIdByUser(userAddressOpt)), "")
250
266
 
[("%s%s__customName__" + customName), ("%s%s__referredBy__" + refBy), ("%s%s__referrals__" + refs), ("%s%s__lastTxId__" + lastTxId), ("%s%s%d__wavesBalance__" + toString(balance.available)), ("%s%s%d__usdtBalance__" + toString(usdtBalance))]
251
267
 
    }
252
268
 
253
269
 
254
270
 
func applyBonuses (landAssetId,pieces) = {
255
271
 
    let infraLevel = valueOrElse(getInteger(stakingContract, keyInfraLevelByAssetId(landAssetId)), 0)
256
272
 
    let artPieces = valueOrElse(getInteger(stakingContract, keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), 0)
257
273
 
    let add6 = (infraLevel / 6)
258
274
 
    let add7 = (infraLevel / 7)
259
275
 
    $Tuple3(infraLevel, artPieces, ((DAILYRESBYPIECE + fraction(DAILYRESBYPIECE, ((infraLevel + add6) + (2 * add7)), 5)) + fraction(DAILYRESBYPIECE, artPieces, (pieces * 5))))
260
276
 
    }
261
277
 
262
278
 
263
-
func numPiecesBySize (landSize) = match landSize {
264
-
    case _ => 
265
-
        if (("S" == $match0))
266
-
            then SSIZE
267
-
            else if (("M" == $match0))
268
-
                then MSIZE
269
-
                else if (("L" == $match0))
270
-
                    then LSIZE
271
-
                    else if (("XL" == $match0))
272
-
                        then XLSIZE
273
-
                        else if (("XXL" == $match0))
274
-
                            then XXLSIZE
275
-
                            else throw("Unknown land size")
276
-
}
277
-
278
-
279
279
 
func getWarehouseTotalVolume (volPrefix) = {
280
280
 
    let parts = split(volPrefix, "_")
281
281
 
    ((WHMULTIPLIER * (parseIntValue(parts[1]) + 1)) * parseIntValue(parts[0]))
282
282
 
    }
283
283
 
284
284
 
285
-
func getWarehouseOccupiedVol (currentWh) = {
286
-
    let goods = currentWh[whIdxProd]
287
-
    func sumResMat (acc,item) =     (acc + parseIntValue(item))
288
-
289
-
    func sumProd (acc,item) =     {
290
-
        let idx = acc._1
291
-
        let pkgSize = productPackages[idx]
292
-
        let pkgs = (((parseIntValue(item) + pkgSize) - 1) / pkgSize)
293
-
        $Tuple2((idx + 1), (acc._2 + (pkgs * MULT8)))
294
-
        }
295
-
296
-
    let whResVol = {
297
-
        let $l = split(currentWh[whIdxRes], "_")
298
-
        let $s = size($l)
299
-
        let $acc0 = 0
300
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
301
-
            then $a
302
-
            else sumResMat($a, $l[$i])
303
-
304
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
305
-
            then $a
306
-
            else throw("List size exceeds 6")
307
-
308
-
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
309
-
        }
310
-
    let whMatVol = {
311
-
        let $l = split(currentWh[whIdxMat], "_")
312
-
        let $s = size($l)
313
-
        let $acc0 = 0
314
-
        func $f1_1 ($a,$i) =         if (($i >= $s))
315
-
            then $a
316
-
            else sumResMat($a, $l[$i])
317
-
318
-
        func $f1_2 ($a,$i) =         if (($i >= $s))
319
-
            then $a
320
-
            else throw("List size exceeds 6")
321
-
322
-
        $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6)
323
-
        }
324
-
    let whGoodsVol = if ((goods == ""))
325
-
        then 0
326
-
        else (        let $l = split_4C(goods, "_")
327
-
        let $s = size($l)
328
-
        let $acc0 = $Tuple2(0, 0)
329
-
        func $f2_1 ($a,$i) =         if (($i >= $s))
330
-
            then $a
331
-
            else sumProd($a, $l[$i])
332
-
333
-
        func $f2_2 ($a,$i) =         if (($i >= $s))
334
-
            then $a
335
-
            else throw("List size exceeds 50")
336
-
337
-
        $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50))._2
338
-
    ((whResVol + whMatVol) + whGoodsVol)
339
-
    }
340
-
341
-
342
285
 
func getWarehouse (whKey,landIndex,infraLevel) = {
343
286
 
    let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
344
-
    let whTotal = getWarehouseTotalVolume(volPrefix)
345
-
    let whStr = valueOrElse(getString(stakingContract, whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0::0"))
346
-
    let wh = split(whStr, ":")
347
-
    let whOccupied = getWarehouseOccupiedVol(wh)
348
-
    let whLoft = if ((5 > size(wh)))
349
-
        then makeString(["0", toString(whOccupied), toString((whTotal - whOccupied)), toString(whTotal)], "_")
350
-
        else {
351
-
            let loft = split(wh[whIdxLOFT], "_")
352
-
            let whLocked = parseIntValue(loft[volLocked])
353
-
            let occ = if ((size(loft) > 1))
354
-
                then parseIntValue(loft[volOccupied])
355
-
                else whOccupied
356
-
            makeString([toString(whLocked), toString(occ), toString(((whTotal - whLocked) - occ)), toString(whTotal)], "_")
357
-
            }
358
-
[wh[whIdxLevels], if ((size(split(wh[whIdxRes], "_")) == NUMRES))
359
-
        then wh[whIdxRes]
360
-
        else "0_0_0_0_0_0", if ((size(split(wh[whIdxMat], "_")) == NUMRES))
361
-
        then wh[whIdxMat]
362
-
        else "0_0_0_0_0_0", wh[whIdxProd], whLoft]
287
+
    let totS = toString(getWarehouseTotalVolume(volPrefix))
288
+
    let whStr = valueOrElse(getString(stakingContract, whKey), ((((volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0::0_0_") + totS) + "_") + totS))
289
+
    split(whStr, ":")
363
290
 
    }
364
291
 
365
292
 
366
293
 
func duckInfoTuple (duckAssetId) = $Tuple5(valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(duckAssetId)), -1), value(assetInfo(fromBase58String(duckAssetId))).name, valueOrElse(getString(stakingContract, keyDuckLocation(duckAssetId)), ""), valueOrElse(getInteger(stakingContract, keyDuckHealth(duckAssetId)), -1), asString(invoke(stakingContract, "getBackpackREADONLY", [duckAssetId], nil)))
367
294
 
368
295
 
369
296
 
func duckInfoArray (duckAssetId,owner,duckInf) = {
370
297
 
    let customName = valueOrElse(getString(stakingContract, keyDuckAssetIdToCustomName(duckAssetId)), duckInf._2)
371
298
 
[("%s%s__assetId__" + duckAssetId), ("%s%s__owner__" + owner), ("%s%s__customName__" + customName), ("%s%d__stakedTime__" + toString(duckInf._1)), ("%s%s__name__" + duckInf._2), ("%s%s__location__" + duckInf._3), ("%s%d__health__" + toString(duckInf._4)), ("%s%s__backPack__" + duckInf._5)]
372
299
 
    }
373
300
 
374
301
 
375
302
 
func landInfoArray (landAssetId,owner,stakedTime) = if ((landAssetId == ""))
376
303
 
    then throw("landAssetId is required")
377
304
 
    else {
378
305
 
        let a = value(assetInfo(fromBase58String(landAssetId)))
379
306
 
        let d = split(a.description, "_")
380
307
 
        let landNum = if ((a.quantity > 0))
381
308
 
            then d[recLandNum]
382
309
 
            else ("-" + d[recLandNum])
383
310
 
        let pieces = numPiecesBySize(d[recLandSize])
384
311
 
        let productivity = applyBonuses(landAssetId, pieces)
385
312
 
        let deltaTime = (lastBlock.timestamp - stakedTime)
386
313
 
        let availRes = if ((stakedTime > 0))
387
314
 
            then fraction(deltaTime, (productivity._3 * pieces), DAYMILLIS)
388
315
 
            else 0
389
316
 
        let needMat = fraction(InfraUpgradeCostS, (pieces * (productivity._1 + 1)), SSIZE)
390
317
 
        let globalAndLocal = if ((stakedTime > 0))
391
318
 
            then asSplitResult(invoke(stakingContract, "splitByGlobalAndLocalWeightsREADONLY", [needMat, availRes, d[recTerrains]], nil))
392
319
 
            else $Tuple2(asListIntCompacted(invoke(stakingContract, "splitByGlobalWeightsREADONLY", [needMat], nil)), "")
393
320
 
        let customName = valueOrElse(getString(stakingContract, keyLandAssetIdToCustomName(landAssetId)), ((d[recContinent] + "-") + d[recLandNum]))
394
321
 
[("%s%s__assetId__" + landAssetId), ("%s%s__owner__" + owner), ("%s%s__customName__" + customName), ("%s%d__stakedTime__" + toString(stakedTime)), ("%s%s__description__" + makeString([landNum, d[recLandSize], d[recTerrains], d[recContinent]], "_")), ("%s%d__infraLevel__" + toString(productivity._1)), ("%s%s__availResByType__" + globalAndLocal._2), ("%s%d__availResTotal__" + toString(availRes)), ("%s%s__needMaterial__" + globalAndLocal._1), makeString(["%s%s", "landArtefacts", ("PRESALE:" + toString(productivity._2))], SEP), ("%s%s__warehouse__" + makeString(getWarehouse(keyWarehouseByLand(landAssetId), (pieces / SSIZE), productivity._1), ":")), ("%s%s__landOrder__" + valueOrElse(getString(economyContract, keyOrderByLand(landAssetId)), "0@0_0@0_0@0_0@0_0@0_0@0:0@0_0@0_0@0_0@0_0@0_0@0:"))]
395
322
 
        }
396
323
 
397
324
 
398
325
 
func landOrderInfoArray (landAssetId,owner) = if ((landAssetId == ""))
399
326
 
    then throw("landAssetId is required")
400
327
 
    else {
401
328
 
        let a = value(assetInfo(fromBase58String(landAssetId)))
402
329
 
        let d = split(a.description, "_")
403
330
 
        let pieces = numPiecesBySize(d[recLandSize])
404
331
 
        let productivity = applyBonuses(landAssetId, pieces)
405
332
 
[("%s%s__assetId__" + landAssetId), ("%s%s__owner__" + owner), ("%s%s__warehouse__" + makeString(getWarehouse(keyWarehouseByLand(landAssetId), (pieces / SSIZE), productivity._1), ":")), ("%s%s__landOrder__" + valueOrElse(getString(economyContract, keyOrderByLand(landAssetId)), "0@0_0@0_0@0_0@0_0@0_0@0:0@0_0@0_0@0_0@0_0@0_0@0:"))]
406
333
 
        }
407
334
 
408
335
 
409
336
 
@Callable(i)
410
-
func constructorV1 (stakingContract,economyContract,governanceContract) = if ((i.caller != this))
337
+
func constructorV1 (contracts) = if ((i.caller != this))
411
338
 
    then throw("permissions denied")
412
-
    else [StringEntry(keyRestCfg(), makeString(["%s%s%s", stakingContract, economyContract, governanceContract], SEP))]
339
+
    else {
340
+
        func descriptor (acc,ignoredItem) =         (acc + "%s")
341
+
342
+
        let descr = {
343
+
            let $l = contracts
344
+
            let $s = size($l)
345
+
            let $acc0 = ""
346
+
            func $f0_1 ($a,$i) =             if (($i >= $s))
347
+
                then $a
348
+
                else descriptor($a, $l[$i])
349
+
350
+
            func $f0_2 ($a,$i) =             if (($i >= $s))
351
+
                then $a
352
+
                else throw("List size exceeds 10")
353
+
354
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
355
+
            }
356
+
[StringEntry(keyRestCfg(), makeString(descr :: contracts, SEP)), StringEntry(keyRestAddress(), toString(this))]
357
+
        }
413
358
 
414
359
 
415
360
 
416
361
 
@Callable(i)
417
362
 
func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
418
363
 
419
364
 
420
365
 
421
366
 
@Callable(i)
422
367
 
func duckByOwnerInfoREADONLY (userAddress) = {
423
368
 
    let stakedDuck = getString(stakingContract, keyStakedDuckByOwner(userAddress))
424
369
 
    $Tuple2(nil, if (if (isDefined(addressFromString(userAddress)))
425
370
 
        then isDefined(stakedDuck)
426
371
 
        else false)
427
372
 
        then {
428
373
 
            let duckAssetId = value(stakedDuck)
429
374
 
            duckInfoArray(duckAssetId, userAddress, duckInfoTuple(duckAssetId))
430
375
 
            }
431
376
 
        else duckInfoArray("", userAddress, $Tuple5(-1, "", "", -1, "")))
432
377
 
    }
433
378
 
434
379
 
435
380
 
436
381
 
@Callable(i)
437
382
 
func duckByAssetIdInfoREADONLY (duckAssetId) = {
438
383
 
    let owner = getString(stakingContract, keyDuckIdToOwner(duckAssetId))
439
384
 
    let duckInf = duckInfoTuple(duckAssetId)
440
385
 
    $Tuple2(nil, duckInfoArray(duckAssetId, if (isDefined(owner))
441
386
 
        then value(owner)
442
387
 
        else "", duckInfoTuple(duckAssetId)))
443
388
 
    }
444
389
 
445
390
 
446
391
 
447
392
 
@Callable(i)
448
393
 
func landByAssetIdInfoREADONLY (landAssetId) = if ((landAssetId == ""))
449
394
 
    then throw("landAssetId is required")
450
395
 
    else {
451
396
 
        let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
452
397
 
        let owner = if ((stakedTime > 0))
453
398
 
            then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
454
399
 
            else ""
455
400
 
        $Tuple2(nil, landInfoArray(landAssetId, owner, stakedTime))
456
401
 
        }
457
402
 
458
403
 
459
404
 
460
405
 
@Callable(i)
461
406
 
func stakedLandsByOwnerInfoREADONLY (landOwnerAddress) = if ((landOwnerAddress == ""))
462
407
 
    then throw("landOwnerAddress is required")
463
408
 
    else {
464
409
 
        let landsStr = getString(stakingContract, keyStakedLandsByOwner(landOwnerAddress))
465
410
 
        let lands = if (isDefined(landsStr))
466
411
 
            then split_51C(value(landsStr), "_")
467
412
 
            else nil
468
413
 
        func oneLand (acc,landAssetId) =         if ((landAssetId == ""))
469
414
 
            then throw("landAssetId is required")
470
415
 
            else {
471
416
 
                let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
472
417
 
                (acc :+ landInfoArray(landAssetId, landOwnerAddress, stakedTime))
473
418
 
                }
474
419
 
475
420
 
        let r = {
476
421
 
            let $l = lands
477
422
 
            let $s = size($l)
478
423
 
            let $acc0 = nil
479
424
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
480
425
 
                then $a
481
426
 
                else oneLand($a, $l[$i])
482
427
 
483
428
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
484
429
 
                then $a
485
-
                else throw("List size exceeds 40")
430
+
                else throw("List size exceeds 100")
486
431
 
487
-
            $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($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)
432
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
488
433
 
            }
489
434
 
        $Tuple2(nil, r)
490
435
 
        }
491
436
 
492
437
 
493
438
 
494
439
 
@Callable(i)
495
440
 
func landsByIdsInfoREADONLY (landAssetIds) = {
496
441
 
    func oneLand (acc,landAssetId) =     if ((landAssetId == ""))
497
442
 
        then throw("landAssetId is required")
498
443
 
        else {
499
444
 
            let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
500
445
 
            let owner = if ((stakedTime > 0))
501
446
 
                then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
502
447
 
                else ""
503
448
 
            (acc :+ landInfoArray(landAssetId, owner, stakedTime))
504
449
 
            }
505
450
 
506
451
 
    let r = {
507
452
 
        let $l = landAssetIds
508
453
 
        let $s = size($l)
509
454
 
        let $acc0 = nil
510
455
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
511
456
 
            then $a
512
457
 
            else oneLand($a, $l[$i])
513
458
 
514
459
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
515
460
 
            then $a
516
-
            else throw("List size exceeds 40")
461
+
            else throw("List size exceeds 100")
517
462
 
518
-
        $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($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)
463
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
519
464
 
        }
520
465
 
    $Tuple2(nil, r)
521
466
 
    }
522
467
 
523
468
 
524
469
 
525
470
 
@Callable(i)
526
471
 
func warehouseOrderByAssetIdInfoREADONLY (landAssetId) = if ((landAssetId == ""))
527
472
 
    then throw("landAssetId is required")
528
473
 
    else {
529
474
 
        let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
530
475
 
        let owner = if ((stakedTime > 0))
531
476
 
            then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
532
477
 
            else ""
533
478
 
        $Tuple2(nil, landOrderInfoArray(landAssetId, owner))
534
479
 
        }
535
480
 
536
481
 
537
482
 
538
483
 
@Callable(i)
539
484
 
func ordersByLandIdsInfoREADONLY (landAssetIds) = {
540
485
 
    func oneLand (acc,landAssetId) =     if ((landAssetId == ""))
541
486
 
        then throw("landAssetId is required")
542
487
 
        else {
543
488
 
            let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
544
489
 
            let owner = if ((stakedTime > 0))
545
490
 
                then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
546
491
 
                else ""
547
492
 
            (acc :+ landOrderInfoArray(landAssetId, owner))
548
493
 
            }
549
494
 
550
495
 
    let r = {
551
496
 
        let $l = landAssetIds
552
497
 
        let $s = size($l)
553
498
 
        let $acc0 = nil
554
499
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
555
500
 
            then $a
556
501
 
            else oneLand($a, $l[$i])
557
502
 
558
503
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
559
504
 
            then $a
560
505
 
            else throw("List size exceeds 40")
561
506
 
562
507
 
        $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($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)
563
508
 
        }
564
509
 
    $Tuple2(nil, r)
565
510
 
    }
566
511
 
567
512
 
568
513
 
569
514
 
@Callable(i)
570
515
 
func cancelWarehouseOrders (landAssetIds) = if ((i.caller != this))
571
516
 
    then throw("permission denied")
572
517
 
    else {
573
518
 
        let blocked = getBoolean(stakingContract, keyBlocked())
574
519
 
        if (if (!(isDefined(blocked)))
575
520
 
            then true
576
521
 
            else (value(blocked) == false))
577
522
 
            then throw("Contracts should be blocked before canceling orders")
578
523
 
            else {
579
524
 
                func oneLand (a,landAssetId) =                 if ((landAssetId == ""))
580
525
 
                    then throw("landAssetId is required")
581
526
 
                    else {
582
527
 
                        let c = asBoolean(invoke(economyContract, "setWarehouseOrder", ["0@0_0@0_0@0_0@0_0@0_0@0:0@0_0@0_0@0_0@0_0@0_0@0:", landAssetId], nil))
583
528
 
                        if (if (a)
584
529
 
                            then true
585
530
 
                            else c)
586
531
 
                            then !(if (a)
587
532
 
                                then c
588
533
 
                                else false)
589
534
 
                            else false
590
535
 
                        }
591
536
 
592
537
 
                let r = {
593
538
 
                    let $l = landAssetIds
594
539
 
                    let $s = size($l)
595
540
 
                    let $acc0 = false
596
541
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
597
542
 
                        then $a
598
543
 
                        else oneLand($a, $l[$i])
599
544
 
600
545
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
601
546
 
                        then $a
602
547
 
                        else throw("List size exceeds 30")
603
548
 
604
549
 
                    $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($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)
605
550
 
                    }
606
551
 
                $Tuple2(nil, r)
607
552
 
                }
608
553
 
        }
609
554
 
610
555
 
611
556
 
612
557
 
@Callable(i)
613
558
 
func fixWarehouseFormats (landAssetIds) = if ((i.caller != this))
614
559
 
    then throw("permission denied")
615
560
 
    else {
616
561
 
        func oneLand (acc,landAssetId) =         if ((landAssetId == ""))
617
562
 
            then throw("landAssetId is required")
618
-
            else if (isDefined(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId))))
619
-
                then (acc + size(asString(invoke(stakingContract, "fixWarehouseFormat", [landAssetId], nil))))
620
-
                else acc
563
+
            else (acc + size(asString(invoke(stakingContract, "fixWarehouseFormat", [landAssetId], nil))))
621
564
 
622
565
 
        let r = {
623
566
 
            let $l = landAssetIds
624
567
 
            let $s = size($l)
625
568
 
            let $acc0 = 0
626
569
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
627
570
 
                then $a
628
571
 
                else oneLand($a, $l[$i])
629
572
 
630
573
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
631
574
 
                then $a
632
575
 
                else throw("List size exceeds 25")
633
576
 
634
577
 
            $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($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)
635
578
 
            }
636
579
 
        $Tuple2(nil, r)
637
580
 
        }
638
581
 
639
582
 
640
583
 
641
584
 
@Callable(i)
642
585
 
func sendUsdtPrize (userAddress) = if ((i.caller != stakingContract))
643
586
 
    then throw("permission denied")
644
587
 
    else {
645
588
 
        let amt = fraction(assetBalance(this, usdtAssetId), USDTPRIZEPART, MULT6)
646
589
 
        $Tuple2([ScriptTransfer(addressFromStringValue(userAddress), amt, usdtAssetId)], amt)
647
590
 
        }
648
591
 
649
592
 
593
+
594
+
@Callable(i)
595
+
func getEmergencyServiceDataREADONLY () = {
596
+
    let existStr = getString(economyContract, keyEsWarehouse())
597
+
    let existAmounts = if (isDefined(existStr))
598
+
        then split(value(existStr), "_")
599
+
        else nil
600
+
    func singleProd (acc,recipeStr) =     {
601
+
        let n = acc._2
602
+
        let recipe = split(recipeStr, "_")
603
+
        let packSize = parseIntValue(recipe[recipeIdxPacksize])
604
+
        let maxAmount = if ((n == 0))
605
+
            then (ESMAXPACKAGES * packSize)
606
+
            else 0
607
+
        let existAmount = if ((size(existAmounts) > n))
608
+
            then parseIntValue(existAmounts[n])
609
+
            else 0
610
+
        let totalMat = getRecipeMaterials(recipe)
611
+
        let buyPrice = fraction((totalMat * ESBUYCOEF), RESOURCEPRICEMIN, (10 * packSize))
612
+
        let sellPrice = fraction((totalMat * ESSELLCOEF), RESOURCEPRICEMIN, (10 * packSize))
613
+
        let y = makeString([toString(maxAmount), toString(existAmount), toString(buyPrice), toString(sellPrice)], "_")
614
+
        $Tuple2((acc._1 :+ y), (n + 1))
615
+
        }
616
+
617
+
    let s = makeString_2C((    let $l = productionMatrix
618
+
    let $s = size($l)
619
+
    let $acc0 = $Tuple2(nil, 0)
620
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
621
+
        then $a
622
+
        else singleProd($a, $l[$i])
623
+
624
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
625
+
        then $a
626
+
        else throw("List size exceeds 50")
627
+
628
+
    $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, ":")
629
+
    let result = ("%s%s__emergencyServiceData__" + s)
630
+
    $Tuple2(nil, result)
631
+
    }
632
+
633
+

github/deemru/w8io/6500d08 
131.30 ms ◑