w8 · tx · Aro···i2q

tx · Arot5aPvrtF9Z1biDvDoErRFbBsukgRshkNKh6Puwi2q

3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy:  -0.01600000 Waves

2023.03.15 11:55 [2490927] smart account 3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Arot5aPvrtF9Z1biDvDoErRFbBsukgRshkNKh6Puwi2q",
    "fee": 1600000,
    "feeAssetId": null,
    "timestamp": 1678870533532,
    "version": 2,
    "chainId": 84,
    "sender": "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy",
    "senderPublicKey": "C3PaRKeL8AUKbwUqdniMQtThgcTh5DYHV1777Hkxy7rp",
    "proofs": [
        "yH6Qgv7arAZrQ3A21MgnRTFjZkLLWZNDCMEVhtJyF1nixfSnzHkpBpANrax1rhPHCGx3jZZ6N2uUKaBz8QPtVCg"
    ],
    "script": "base64:BgI5CAISBQoDCAgIEgMKAQgSBAoCCAgSBAoCCAgSBAoCCAgSAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEYOQAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC3VzZG5Bc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASC2JinDBPXOU5GkDkt1JC9kjFGx+t+vVCm9SNIdKrKq0QMJAAACAQFUBQckbWF0Y2gwASD3dur394PKZdtuE+4CO89YKZWpwdGN8kvabNgdYoDI3gkAAgECDVVua25vd24gY2hhaW4AEUluZnJhVXBncmFkZUNvc3RTBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAMbrwL8XAwkAAAIBAVQFByRtYXRjaDAA8M2JHgkAAgECDVVua25vd24gY2hhaW4ACkxBTkRQUkVGSVgCBExBTkQACkRVQ0tQUkVGSVgCBERVQ0sAA1NFUAICX18ACkFSVFBSRVNBTEUCB1BSRVNBTEUAD0RBSUxZUkVTQllQSUVDRQCA+NIBAAlEQVlNSUxMSVMAgLiZKQAGTlVNUkVTAAYABVNTSVpFABkABU1TSVpFAGQABUxTSVpFAOEBAAZYTFNJWkUAkAMAB1hYTFNJWkUA8QQACnJlY0xhbmROdW0AAAALcmVjTGFuZFNpemUAAQALcmVjVGVycmFpbnMAAgAMcmVjQ29udGluZW50AAMACHdoSWR4Vm9sAAAACHdoSWR4UmVzAAEACHdoSWR4TWF0AAIACXdoSWR4UHJvZAADAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcAEUlkeENmZ1N0YWtpbmdEYXBwAAEAEUlkeENmZ0Vjb25vbXlEYXBwAAIAFElkeENmZ0dvdmVybmFuY2VEYXBwAAMBD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAARFyZWFkUmVzdENmZ09yRmFpbAAJALwJAgkBD2dldFN0cmluZ09yRmFpbAIFBHRoaXMJAQprZXlSZXN0Q2ZnAAUDU0VQARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCB3Jlc3RDZmcDaWR4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdyZXN0Q2ZnBQNpZHgJAKwCAgIqUmVzdCBjZmcgZG9lc24ndCBjb250YWluIGFkZHJlc3MgYXQgaW5kZXggCQCkAwEFA2lkeAAHcmVzdENmZwkBEXJlYWRSZXN0Q2ZnT3JGYWlsAAAPc3Rha2luZ0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwURSWR4Q2ZnU3Rha2luZ0RhcHAAD2Vjb25vbXlDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ0Vjb25vbXlEYXBwABJnb3Zlcm5hbmNlQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAEQa2V5RHVja0lkVG9Pd25lcgEHYXNzZXRJZAkArAICAgpkdWNrT3duZXJfBQdhc3NldElkARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQdhc3NldElkCQCsAgICC3N0YWtlZFRpbWVfBQdhc3NldElkARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwduZnRUeXBlB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIgc3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcl8FB25mdFR5cGUCAV8FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgERa2V5QmFja3BhY2tCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICCWJhY2tQYWNrXwULZHVja0Fzc2V0SWQBEmtleVdhcmVob3VzZUJ5TGFuZAELbGFuZEFzc2V0SWQJAKwCAgIKd2FyZUhvdXNlXwULbGFuZEFzc2V0SWQBD2tleUR1Y2tMb2NhdGlvbgELZHVja0Fzc2V0SWQJAKwCAgINZHVja0xvY2F0aW9uXwULZHVja0Fzc2V0SWQBDWtleUR1Y2tIZWFsdGgBC2R1Y2tBc3NldElkCQCsAgICC2R1Y2tIZWFsdGhfBQtkdWNrQXNzZXRJZAEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICCW5mdE93bmVyXwUHYXNzZXRJZAEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAgtpbmZyYUxldmVsXwUHYXNzZXRJZAEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBHR5cGUHYXNzZXRJZAkAuQkCCQDMCAICDWxhbmRBcnRTdGF0dXMJAMwIAgUEdHlwZQkAzAgCBQdhc3NldElkBQNuaWwCAV8BH2tleVByZXNhbGVBcnRBY3RpdmF0ZWRCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgIUcHJlc2FsZUFydEFjdGl2YXRlZF8FB2Fzc2V0SWQBFWtleVN0YWtlZExhbmRzQnlPd25lcgEJb3duZXJBZGRyCQCsAgICE3N0YWtlZExhbmRzQnlPd25lcl8FCW93bmVyQWRkcgEIYXNTdHJpbmcBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQIYZmFpbCB0byBjYXN0IGludG8gU3RyaW5nARJhc0xpc3RJbnRDb21wYWN0ZWQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACCUxpc3RbQW55XQQKdmFsQW55TGlzdAUHJG1hdGNoMAMJAQIhPQIJAJADAQUKdmFsQW55TGlzdAUGTlVNUkVTCQACAQkArAICAg5BcnJheSBzaXplIGlzIAkApAMBCQCQAwEFCnZhbEFueUxpc3QKAQRjb252AgNhY2MEaXRlbQQHJG1hdGNoMQUEaXRlbQMJAAECBQckbWF0Y2gxAgNJbnQEAml0BQckbWF0Y2gxCQDNCAIFA2FjYwkApAMBBQJpdAkAAgECFExpc3QgdHlwZSBpcyBub3QgSW50BAFyCgACJGwFCnZhbEFueUxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBGNvbnYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwkAAgECFmZhaWwgdG8gY2FzdCBpbnRvIExpc3QBDWFzU3BsaXRSZXN1bHQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACFihMaXN0W0FueV0sIExpc3RbQW55XSkEAnQyBQckbWF0Y2gwCQCUCgIJARJhc0xpc3RJbnRDb21wYWN0ZWQBCAUCdDICXzEJARJhc0xpc3RJbnRDb21wYWN0ZWQBCAUCdDICXzIJAAIBAh5mYWlsIHRvIGNhc3QgaW50byAoTGlzdCwgTGlzdCkBDndhbGxldEludGVybmFsAQ51c2VyQWRkcmVzc09wdAQEYWRkcgkApggBBQ51c2VyQWRkcmVzc09wdAQHYmFsYW5jZQMJAQlpc0RlZmluZWQBBQRhZGRyCQDvBwEJAQV2YWx1ZQEFBGFkZHIJAQ5CYWxhbmNlRGV0YWlscwQAAAAAAAAAAAQLdXNkbkJhbGFuY2UDCQEJaXNEZWZpbmVkAQUEYWRkcgkA8AcCCQEFdmFsdWUBBQRhZGRyBQt1c2RuQXNzZXRJZAAACQC5CQIJAMwIAgIGJXMlZCVkCQDMCAICBndhbGxldAkAzAgCCQCkAwEIBQdiYWxhbmNlCWF2YWlsYWJsZQkAzAgCCQCkAwEFC3VzZG5CYWxhbmNlBQNuaWwFA1NFUAEMYXBwbHlCb251c2VzAgtsYW5kQXNzZXRJZAZwaWVjZXMECmluZnJhTGV2ZWwJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAECWFydFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIFCkFSVFBSRVNBTEUFC2xhbmRBc3NldElkAwkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ9zdGFraW5nQ29udHJhY3QJAR9rZXlQcmVzYWxlQXJ0QWN0aXZhdGVkQnlBc3NldElkAQULbGFuZEFzc2V0SWQHBQZwaWVjZXMAAAkAlQoDBQppbmZyYUxldmVsBQlhcnRQaWVjZXMJAGQCCQBkAgUPREFJTFlSRVNCWVBJRUNFCQBrAwUPREFJTFlSRVNCWVBJRUNFBQppbmZyYUxldmVsAAQJAGsDBQ9EQUlMWVJFU0JZUElFQ0UJAGgCBQlhcnRQaWVjZXMAAwkAaAIFBnBpZWNlcwAUAQ9udW1QaWVjZXNCeVNpemUBCGxhbmRTaXplBAckbWF0Y2gwBQhsYW5kU2l6ZQMJAAACAgFTBQckbWF0Y2gwBQVTU0laRQMJAAACAgFNBQckbWF0Y2gwBQVNU0laRQMJAAACAgFMBQckbWF0Y2gwBQVMU0laRQMJAAACAgJYTAUHJG1hdGNoMAUGWExTSVpFAwkAAAICA1hYTAUHJG1hdGNoMAUHWFhMU0laRQkAAgECEVVua25vd24gbGFuZCBzaXplAQxnZXRXYXJlaG91c2UDBXdoS2V5CWxhbmRJbmRleAppbmZyYUxldmVsBAl2b2xQcmVmaXgJAKwCAgkArAICCQCkAwEFCWxhbmRJbmRleAIBXwkApAMBBQppbmZyYUxldmVsBAFwCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0BQV3aEtleQkArAICBQl2b2xQcmVmaXgCGTowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoCAToJAMwIAgkAkQMCBQFwBQh3aElkeFZvbAkAzAgCAwkAAAIJAJADAQkAtQkCCQCRAwIFAXAFCHdoSWR4UmVzAgFfBQZOVU1SRVMJAJEDAgUBcAUId2hJZHhSZXMCCzBfMF8wXzBfMF8wCQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUId2hJZHhNYXQCAV8FBk5VTVJFUwkAkQMCBQFwBQh3aElkeE1hdAILMF8wXzBfMF8wXzAJAMwIAgkAkQMCBQFwBQl3aElkeFByb2QFA25pbAENZHVja0luZm9UdXBsZQELZHVja0Fzc2V0SWQJAJcKBQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULZHVja0Fzc2V0SWQA////////////AQgJAQV2YWx1ZQEJAOwHAQkA2QQBBQtkdWNrQXNzZXRJZARuYW1lCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkAgAJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkAP///////////wEJAQhhc1N0cmluZwEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AhNnZXRCYWNrcGFja1JFQURPTkxZCQDMCAIFC2R1Y2tBc3NldElkBQNuaWwFA25pbAENZHVja0luZm9BcnJheQMLZHVja0Fzc2V0SWQFb3duZXIHZHVja0luZgkAzAgCCQCsAgICDyVzJXNfX2Fzc2V0SWRfXwULZHVja0Fzc2V0SWQJAMwIAgkArAICAg0lcyVzX19vd25lcl9fBQVvd25lcgkAzAgCCQCsAgICEiVzJWRfX3N0YWtlZFRpbWVfXwkApAMBCAUHZHVja0luZgJfMQkAzAgCCQCsAgICDCVzJXNfX25hbWVfXwgFB2R1Y2tJbmYCXzIJAMwIAgkArAICAhAlcyVzX19sb2NhdGlvbl9fCAUHZHVja0luZgJfMwkAzAgCCQCsAgICDiVzJWRfX2hlYWx0aF9fCQCkAwEIBQdkdWNrSW5mAl80CQDMCAIJAKwCAgIQJXMlc19fYmFja1BhY2tfXwgFB2R1Y2tJbmYCXzUFA25pbAENbGFuZEluZm9BcnJheQMLbGFuZEFzc2V0SWQFb3duZXIKc3Rha2VkVGltZQMJAAACBQtsYW5kQXNzZXRJZAIACQACAQIXbGFuZEFzc2V0SWQgaXMgcmVxdWlyZWQEAWEJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQBZAkAtQkCCAUBYQtkZXNjcmlwdGlvbgIBXwQHbGFuZE51bQMJAGYCCAUBYQhxdWFudGl0eQAACQCRAwIFAWQFCnJlY0xhbmROdW0JAKwCAgIBLQkAkQMCBQFkBQpyZWNMYW5kTnVtBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBAxwcm9kdWN0aXZpdHkJAQxhcHBseUJvbnVzZXMCBQtsYW5kQXNzZXRJZAUGcGllY2VzBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUKc3Rha2VkVGltZQQIYXZhaWxSZXMDCQBmAgUKc3Rha2VkVGltZQAACQBrAwUJZGVsdGFUaW1lCQBoAggFDHByb2R1Y3Rpdml0eQJfMwUGcGllY2VzBQlEQVlNSUxMSVMAAAQHbmVlZE1hdAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzCQBkAggFDHByb2R1Y3Rpdml0eQJfMQABBQVTU0laRQQOZ2xvYmFsQW5kTG9jYWwDCQBmAgUKc3Rha2VkVGltZQAACQENYXNTcGxpdFJlc3VsdAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AiRzcGxpdEJ5R2xvYmFsQW5kTG9jYWxXZWlnaHRzUkVBRE9OTFkJAMwIAgUHbmVlZE1hdAkAzAgCBQhhdmFpbFJlcwkAzAgCCQCRAwIFAWQFC3JlY1RlcnJhaW5zBQNuaWwFA25pbAkAlAoCCQESYXNMaXN0SW50Q29tcGFjdGVkAQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCHHNwbGl0QnlHbG9iYWxXZWlnaHRzUkVBRE9OTFkJAMwIAgUHbmVlZE1hdAUDbmlsBQNuaWwCAAkAzAgCCQCsAgICDyVzJXNfX2Fzc2V0SWRfXwULbGFuZEFzc2V0SWQJAMwIAgkArAICAg0lcyVzX19vd25lcl9fBQVvd25lcgkAzAgCCQCsAgICEiVzJWRfX3N0YWtlZFRpbWVfXwkApAMBBQpzdGFrZWRUaW1lCQDMCAIJAKwCAgITJXMlc19fZGVzY3JpcHRpb25fXwkAuQkCCQDMCAIFB2xhbmROdW0JAMwIAgkAkQMCBQFkBQtyZWNMYW5kU2l6ZQkAzAgCCQCRAwIFAWQFC3JlY1RlcnJhaW5zCQDMCAIJAJEDAgUBZAUMcmVjQ29udGluZW50BQNuaWwCAV8JAMwIAgkArAICAhIlcyVkX19pbmZyYUxldmVsX18JAKQDAQgFDHByb2R1Y3Rpdml0eQJfMQkAzAgCCQCsAgICFiVzJXNfX2F2YWlsUmVzQnlUeXBlX18IBQ5nbG9iYWxBbmRMb2NhbAJfMgkAzAgCCQCsAgICFSVzJWRfX2F2YWlsUmVzVG90YWxfXwkApAMBBQhhdmFpbFJlcwkAzAgCCQCsAgICFCVzJXNfX25lZWRNYXRlcmlhbF9fCAUOZ2xvYmFsQW5kTG9jYWwCXzEJAMwIAgkAuQkCCQDMCAICBCVzJXMJAMwIAgINbGFuZEFydGVmYWN0cwkAzAgCCQCsAgICCFBSRVNBTEU6CQCkAwEIBQxwcm9kdWN0aXZpdHkCXzIFA25pbAUDU0VQCQDMCAIJAKwCAgIRJXMlc19fd2FyZUhvdXNlX18JALkJAgkBDGdldFdhcmVob3VzZQMJARJrZXlXYXJlaG91c2VCeUxhbmQBBQtsYW5kQXNzZXRJZAkAaQIFBnBpZWNlcwUFU1NJWkUIBQxwcm9kdWN0aXZpdHkCXzECAToFA25pbAoBaQENY29uc3RydWN0b3JWMQMPc3Rha2luZ0NvbnRyYWN0D2Vjb25vbXlDb250cmFjdBJnb3Zlcm5hbmNlQ29udHJhY3QDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhJwZXJtaXNzaW9ucyBkZW5pZWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBCmtleVJlc3RDZmcACQC5CQIJAMwIAgIGJXMlcyVzCQDMCAIFD3N0YWtpbmdDb250cmFjdAkAzAgCBQ9lY29ub215Q29udHJhY3QJAMwIAgUSZ292ZXJuYW5jZUNvbnRyYWN0BQNuaWwFA1NFUAUDbmlsAWkBEndhbGxldEluZm9SRUFET05MWQEOdXNlckFkZHJlc3NPcHQJAJQKAgUDbmlsCQEOd2FsbGV0SW50ZXJuYWwBBQ51c2VyQWRkcmVzc09wdAFpARBkdWNrSW5mb1JFQURPTkxZAgtkdWNrQXNzZXRJZA51c2VyQWRkcmVzc09wdAQEYWRkcgkApggBBQ51c2VyQWRkcmVzc09wdAQJZHVja0Fzc2V0CQDZBAEFC2R1Y2tBc3NldElkAwkAAAIFC2R1Y2tBc3NldElkAgAJAAIBAhdkdWNrQXNzZXRJZCBpcyByZXF1aXJlZAQJZHVja093bmVyCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBEGtleUR1Y2tJZFRvT3duZXIBBQtkdWNrQXNzZXRJZAQFb3duZXIDCQEJaXNEZWZpbmVkAQUJZHVja093bmVyCQEFdmFsdWUBBQlkdWNrT3duZXIDAwkBCWlzRGVmaW5lZAEFBGFkZHIJAAACCQDwBwIJAQV2YWx1ZQEFBGFkZHIFCWR1Y2tBc3NldAABBwUOdXNlckFkZHJlc3NPcHQCAAkAlAoCBQNuaWwJAJQKAgkBDWR1Y2tJbmZvQXJyYXkDBQtkdWNrQXNzZXRJZAUFb3duZXIJAQ1kdWNrSW5mb1R1cGxlAQULZHVja0Fzc2V0SWQJAQ53YWxsZXRJbnRlcm5hbAEFDnVzZXJBZGRyZXNzT3B0AWkBEGxhbmRJbmZvUkVBRE9OTFkCC2xhbmRBc3NldElkDnVzZXJBZGRyZXNzT3B0BARhZGRyCQCmCAEFDnVzZXJBZGRyZXNzT3B0BAlsYW5kQXNzZXQJANkEAQULbGFuZEFzc2V0SWQDCQAAAgULbGFuZEFzc2V0SWQCAAkAAgECF2xhbmRBc3NldElkIGlzIHJlcXVpcmVkBApzdGFrZWRUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAAABAVvd25lcgMJAGYCBQpzdGFrZWRUaW1lAAAJAQV2YWx1ZQEJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQDAwkBCWlzRGVmaW5lZAEFBGFkZHIJAAACCQDwBwIJAQV2YWx1ZQEFBGFkZHIFCWxhbmRBc3NldAABBwUOdXNlckFkZHJlc3NPcHQCAAQKc3Rha2VkRHVjawkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFDnVzZXJBZGRyZXNzT3B0BAdkdWNrSW5mAwMJAQlpc0RlZmluZWQBBQRhZGRyCQEJaXNEZWZpbmVkAQUKc3Rha2VkRHVjawcEC2R1Y2tBc3NldElkCQEFdmFsdWUBBQpzdGFrZWREdWNrCQCUCgIFC2R1Y2tBc3NldElkCQENZHVja0luZm9UdXBsZQEFC2R1Y2tBc3NldElkCQCUCgICAAkAlwoFAP///////////wECAAIAAP///////////wECAAkAlAoCBQNuaWwJAJUKAwkBDWxhbmRJbmZvQXJyYXkDBQtsYW5kQXNzZXRJZAUFb3duZXIFCnN0YWtlZFRpbWUJAQ1kdWNrSW5mb0FycmF5AwgFB2R1Y2tJbmYCXzEFDnVzZXJBZGRyZXNzT3B0CAUHZHVja0luZgJfMgkBDndhbGxldEludGVybmFsAQUOdXNlckFkZHJlc3NPcHQBaQEXc3Rha2VkTGFuZHNJbmZvUkVBRE9OTFkCCW15QWRkcmVzcxBsYW5kT3duZXJBZGRyZXNzAwkAAAIFEGxhbmRPd25lckFkZHJlc3MCAAkAAgECHGxhbmRPd25lckFkZHJlc3MgaXMgcmVxdWlyZWQEBm15QWRkcgkApggBBQlteUFkZHJlc3MECGxhbmRzU3RyCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBFWtleVN0YWtlZExhbmRzQnlPd25lcgEFEGxhbmRPd25lckFkZHJlc3MEBWxhbmRzAwkBCWlzRGVmaW5lZAEFCGxhbmRzU3RyCQC9CQIJAQV2YWx1ZQEFCGxhbmRzU3RyAgFfBQNuaWwKAQdvbmVMYW5kAgNhY2MLbGFuZEFzc2V0SWQECWxhbmRBc3NldAkA2QQBBQtsYW5kQXNzZXRJZAMJAAACBQtsYW5kQXNzZXRJZAIACQACAQIXbGFuZEFzc2V0SWQgaXMgcmVxdWlyZWQECnN0YWtlZFRpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAEBWRlc2NyCAkBBXZhbHVlAQkA7AcBBQlsYW5kQXNzZXQLZGVzY3JpcHRpb24EAWQJALUJAgUFZGVzY3ICAV8EBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEJAJEDAgUBZAULcmVjTGFuZFNpemUEDHByb2R1Y3Rpdml0eQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQpzdGFrZWRUaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIIBQxwcm9kdWN0aXZpdHkCXzMFBnBpZWNlcwUJREFZTUlMTElTCQDNCAIFA2FjYwkAzAgCCQCsAgICEyVzJXNfX2xhbmRBc3NldElkX18FC2xhbmRBc3NldElkCQDMCAIJAKwCAgISJXMlZF9fc3Rha2VkVGltZV9fCQCkAwEFCnN0YWtlZFRpbWUJAMwIAgkArAICAhMlcyVzX19kZXNjcmlwdGlvbl9fBQVkZXNjcgkAzAgCCQCsAgICEiVzJWRfX2luZnJhTGV2ZWxfXwkApAMBCAUMcHJvZHVjdGl2aXR5Al8xCQDMCAIJALkJAgkAzAgCAgQlcyVzCQDMCAICDWxhbmRBcnRlZmFjdHMJAMwIAgkArAICAghQUkVTQUxFOgkApAMBCAUMcHJvZHVjdGl2aXR5Al8yBQNuaWwFA1NFUAkAzAgCCQCsAgICECVzJXNfX2F2YWlsUmVzX18JAKQDAQUIYXZhaWxSZXMFA25pbAQBcgoAAiRsBQVsYW5kcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHb25lTGFuZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQECnN0YWtlZER1Y2sJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQlteUFkZHJlc3MEB2R1Y2tJbmYDAwkBCWlzRGVmaW5lZAEFBm15QWRkcgkBCWlzRGVmaW5lZAEFCnN0YWtlZER1Y2sHBAtkdWNrQXNzZXRJZAkBBXZhbHVlAQUKc3Rha2VkRHVjawkAlAoCBQtkdWNrQXNzZXRJZAkBDWR1Y2tJbmZvVHVwbGUBBQtkdWNrQXNzZXRJZAkAlAoCAgAJAJcKBQD///////////8BAgACAAD///////////8BAgAJAJQKAgUDbmlsCQCVCgMFAXIJAQ1kdWNrSW5mb0FycmF5AwgFB2R1Y2tJbmYCXzEFCW15QWRkcmVzcwgFB2R1Y2tJbmYCXzIJAQ53YWxsZXRJbnRlcm5hbAEFCW15QWRkcmVzcwFpARdkdWNrQnlPd25lckluZm9SRUFET05MWQELdXNlckFkZHJlc3MECnN0YWtlZER1Y2sJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQt1c2VyQWRkcmVzcwkAlAoCBQNuaWwDAwkBCWlzRGVmaW5lZAEJAKYIAQULdXNlckFkZHJlc3MJAQlpc0RlZmluZWQBBQpzdGFrZWREdWNrBwQLZHVja0Fzc2V0SWQJAQV2YWx1ZQEFCnN0YWtlZER1Y2sJAQ1kdWNrSW5mb0FycmF5AwULZHVja0Fzc2V0SWQFC3VzZXJBZGRyZXNzCQENZHVja0luZm9UdXBsZQEFC2R1Y2tBc3NldElkCQENZHVja0luZm9BcnJheQMCAAULdXNlckFkZHJlc3MJAJcKBQD///////////8BAgACAAD///////////8BAgABaQEZZHVja0J5QXNzZXRJZEluZm9SRUFET05MWQELZHVja0Fzc2V0SWQEBW93bmVyCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBEGtleUR1Y2tJZFRvT3duZXIBBQtkdWNrQXNzZXRJZAQHZHVja0luZgkBDWR1Y2tJbmZvVHVwbGUBBQtkdWNrQXNzZXRJZAkAlAoCBQNuaWwJAQ1kdWNrSW5mb0FycmF5AwULZHVja0Fzc2V0SWQDCQEJaXNEZWZpbmVkAQUFb3duZXIJAQV2YWx1ZQEFBW93bmVyAgAJAQ1kdWNrSW5mb1R1cGxlAQULZHVja0Fzc2V0SWQBaQEZbGFuZEJ5QXNzZXRJZEluZm9SRUFET05MWQELbGFuZEFzc2V0SWQDCQAAAgULbGFuZEFzc2V0SWQCAAkAAgECF2xhbmRBc3NldElkIGlzIHJlcXVpcmVkBApzdGFrZWRUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAD///////////8BBAVvd25lcgMJAGYCBQpzdGFrZWRUaW1lAAAJAQV2YWx1ZQEJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQCAAkAlAoCBQNuaWwJAQ1sYW5kSW5mb0FycmF5AwULbGFuZEFzc2V0SWQFBW93bmVyBQpzdGFrZWRUaW1lAWkBHnN0YWtlZExhbmRzQnlPd25lckluZm9SRUFET05MWQEQbGFuZE93bmVyQWRkcmVzcwMJAAACBRBsYW5kT3duZXJBZGRyZXNzAgAJAAIBAhxsYW5kT3duZXJBZGRyZXNzIGlzIHJlcXVpcmVkBAhsYW5kc1N0cgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARVrZXlTdGFrZWRMYW5kc0J5T3duZXIBBRBsYW5kT3duZXJBZGRyZXNzBAVsYW5kcwMJAQlpc0RlZmluZWQBBQhsYW5kc1N0cgkAvQkCCQEFdmFsdWUBBQhsYW5kc1N0cgIBXwUDbmlsCgEHb25lTGFuZAIDYWNjC2xhbmRBc3NldElkAwkAAAIFC2xhbmRBc3NldElkAgAJAAIBAhdsYW5kQXNzZXRJZCBpcyByZXF1aXJlZAQKc3Rha2VkVGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ9zdGFraW5nQ29udHJhY3QJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQA////////////AQkAzQgCBQNhY2MJAQ1sYW5kSW5mb0FycmF5AwULbGFuZEFzc2V0SWQFEGxhbmRPd25lckFkZHJlc3MFCnN0YWtlZFRpbWUEAXIKAAIkbAUFbGFuZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBB29uZUxhbmQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkCQCUCgIFA25pbAUBcgFpARZsYW5kc0J5SWRzSW5mb1JFQURPTkxZAQxsYW5kQXNzZXRJZHMKAQdvbmVMYW5kAgNhY2MLbGFuZEFzc2V0SWQDCQAAAgULbGFuZEFzc2V0SWQCAAkAAgECF2xhbmRBc3NldElkIGlzIHJlcXVpcmVkBApzdGFrZWRUaW1lCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAD///////////8BBAVvd25lcgMJAGYCBQpzdGFrZWRUaW1lAAAJAQV2YWx1ZQEJAJ0IAgUPc3Rha2luZ0NvbnRyYWN0CQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQCAAkAzQgCBQNhY2MJAQ1sYW5kSW5mb0FycmF5AwULbGFuZEFzc2V0SWQFBW93bmVyBQpzdGFrZWRUaW1lBAFyCgACJGwFDGxhbmRBc3NldElkcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHb25lTGFuZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAJQKAgUDbmlsBQFyAP5n7Bg=",
    "height": 2490927,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: JB12vMuVWqZxXqS7ciXoKer2SNFgmjDBMxXQjF9DSX3e
Next: BZu7CfQmyBdCjVQ7mJWi8nRFmfbM9yUBMPGgZrijQ5DZ

Diff: 
Old New Differences
214 214  
215 215  func getWarehouse (whKey,landIndex,infraLevel) = {
216 216      let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
217 -     let p = split(valueOrElse(getString(whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
217 +     let p = split(valueOrElse(getString(stakingContract, whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
218 218  [p[whIdxVol], if ((size(split(p[whIdxRes], "_")) == NUMRES))
219 219          then p[whIdxRes]
220 220          else "0_0_0_0_0_0", if ((size(split(p[whIdxMat], "_")) == NUMRES))
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 usdnAssetId = match chain {
7 7      case _ => 
8 8          if ((base58'2W' == $match0))
9 9              then base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
10 10              else if ((base58'2T' == $match0))
11 11                  then base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
12 12                  else throw("Unknown chain")
13 13  }
14 14  
15 15  let InfraUpgradeCostS = match chain {
16 16      case _ => 
17 17          if ((base58'2W' == $match0))
18 18              then 6307198406
19 19              else if ((base58'2T' == $match0))
20 20                  then 63071984
21 21                  else throw("Unknown chain")
22 22  }
23 23  
24 24  let LANDPREFIX = "LAND"
25 25  
26 26  let DUCKPREFIX = "DUCK"
27 27  
28 28  let SEP = "__"
29 29  
30 30  let ARTPRESALE = "PRESALE"
31 31  
32 32  let DAILYRESBYPIECE = 3456000
33 33  
34 34  let DAYMILLIS = 86400000
35 35  
36 36  let NUMRES = 6
37 37  
38 38  let SSIZE = 25
39 39  
40 40  let MSIZE = 100
41 41  
42 42  let LSIZE = 225
43 43  
44 44  let XLSIZE = 400
45 45  
46 46  let XXLSIZE = 625
47 47  
48 48  let recLandNum = 0
49 49  
50 50  let recLandSize = 1
51 51  
52 52  let recTerrains = 2
53 53  
54 54  let recContinent = 3
55 55  
56 56  let whIdxVol = 0
57 57  
58 58  let whIdxRes = 1
59 59  
60 60  let whIdxMat = 2
61 61  
62 62  let whIdxProd = 3
63 63  
64 64  func keyRestCfg () = "%s__restConfig"
65 65  
66 66  
67 67  let IdxCfgStakingDapp = 1
68 68  
69 69  let IdxCfgEconomyDapp = 2
70 70  
71 71  let IdxCfgGovernanceDapp = 3
72 72  
73 73  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
74 74  
75 75  
76 76  func readRestCfgOrFail () = split_4C(getStringOrFail(this, keyRestCfg()), SEP)
77 77  
78 78  
79 79  func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
80 80  
81 81  
82 82  let restCfg = readRestCfgOrFail()
83 83  
84 84  let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
85 85  
86 86  let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
87 87  
88 88  let governanceContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
89 89  
90 90  func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
91 91  
92 92  
93 93  func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
94 94  
95 95  
96 96  func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
97 97  
98 98  
99 99  func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("stakedTimeByTypeAssetIdAndOwner_" + nftType) + "_") + assetId) + "_") + ownerAddr)
100 100  
101 101  
102 102  func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
103 103  
104 104  
105 105  func keyWarehouseByLand (landAssetId) = ("wareHouse_" + landAssetId)
106 106  
107 107  
108 108  func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
109 109  
110 110  
111 111  func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
112 112  
113 113  
114 114  func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
115 115  
116 116  
117 117  func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
118 118  
119 119  
120 120  func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["landArtStatus", type, assetId], "_")
121 121  
122 122  
123 123  func keyPresaleArtActivatedByAssetId (assetId) = ("presaleArtActivated_" + assetId)
124 124  
125 125  
126 126  func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
127 127  
128 128  
129 129  func asString (v) = match v {
130 130      case s: String => 
131 131          s
132 132      case _ => 
133 133          throw("fail to cast into String")
134 134  }
135 135  
136 136  
137 137  func asListIntCompacted (val) = match val {
138 138      case valAnyList: List[Any] => 
139 139          if ((size(valAnyList) != NUMRES))
140 140              then throw(("Array size is " + toString(size(valAnyList))))
141 141              else {
142 142                  func conv (acc,item) =                                 match item {
143 143                      case it: Int => 
144 144                          (acc :+ toString(it))
145 145                      case _ => 
146 146                          throw("List type is not Int")
147 147                  }
148 148  
149 149                  let r = {
150 150                      let $l = valAnyList
151 151                      let $s = size($l)
152 152                      let $acc0 = nil
153 153                      func $f0_1 ($a,$i) =                     if (($i >= $s))
154 154                          then $a
155 155                          else conv($a, $l[$i])
156 156  
157 157                      func $f0_2 ($a,$i) =                     if (($i >= $s))
158 158                          then $a
159 159                          else throw("List size exceeds 6")
160 160  
161 161                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
162 162                      }
163 163                  makeString(r, "_")
164 164                  }
165 165      case _ => 
166 166          throw("fail to cast into List")
167 167  }
168 168  
169 169  
170 170  func asSplitResult (val) = match val {
171 171      case t2: (List[Any], List[Any]) => 
172 172          $Tuple2(asListIntCompacted(t2._1), asListIntCompacted(t2._2))
173 173      case _ => 
174 174          throw("fail to cast into (List, List)")
175 175  }
176 176  
177 177  
178 178  func walletInternal (userAddressOpt) = {
179 179      let addr = addressFromString(userAddressOpt)
180 180      let balance = if (isDefined(addr))
181 181          then wavesBalance(value(addr))
182 182          else BalanceDetails(0, 0, 0, 0)
183 183      let usdnBalance = if (isDefined(addr))
184 184          then assetBalance(value(addr), usdnAssetId)
185 185          else 0
186 186      makeString(["%s%d%d", "wallet", toString(balance.available), toString(usdnBalance)], SEP)
187 187      }
188 188  
189 189  
190 190  func applyBonuses (landAssetId,pieces) = {
191 191      let infraLevel = valueOrElse(getInteger(stakingContract, keyInfraLevelByAssetId(landAssetId)), 0)
192 192      let artPieces = valueOrElse(getInteger(stakingContract, keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), if (valueOrElse(getBoolean(stakingContract, keyPresaleArtActivatedByAssetId(landAssetId)), false))
193 193          then pieces
194 194          else 0)
195 195      $Tuple3(infraLevel, artPieces, ((DAILYRESBYPIECE + fraction(DAILYRESBYPIECE, infraLevel, 4)) + fraction(DAILYRESBYPIECE, (artPieces * 3), (pieces * 20))))
196 196      }
197 197  
198 198  
199 199  func numPiecesBySize (landSize) = match landSize {
200 200      case _ => 
201 201          if (("S" == $match0))
202 202              then SSIZE
203 203              else if (("M" == $match0))
204 204                  then MSIZE
205 205                  else if (("L" == $match0))
206 206                      then LSIZE
207 207                      else if (("XL" == $match0))
208 208                          then XLSIZE
209 209                          else if (("XXL" == $match0))
210 210                              then XXLSIZE
211 211                              else throw("Unknown land size")
212 212  }
213 213  
214 214  
215 215  func getWarehouse (whKey,landIndex,infraLevel) = {
216 216      let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
217 -     let p = split(valueOrElse(getString(whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
217 +     let p = split(valueOrElse(getString(stakingContract, whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
218 218  [p[whIdxVol], if ((size(split(p[whIdxRes], "_")) == NUMRES))
219 219          then p[whIdxRes]
220 220          else "0_0_0_0_0_0", if ((size(split(p[whIdxMat], "_")) == NUMRES))
221 221          then p[whIdxMat]
222 222          else "0_0_0_0_0_0", p[whIdxProd]]
223 223      }
224 224  
225 225  
226 226  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)))
227 227  
228 228  
229 229  func duckInfoArray (duckAssetId,owner,duckInf) = [("%s%s__assetId__" + duckAssetId), ("%s%s__owner__" + owner), ("%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)]
230 230  
231 231  
232 232  func landInfoArray (landAssetId,owner,stakedTime) = if ((landAssetId == ""))
233 233      then throw("landAssetId is required")
234 234      else {
235 235          let a = value(assetInfo(fromBase58String(landAssetId)))
236 236          let d = split(a.description, "_")
237 237          let landNum = if ((a.quantity > 0))
238 238              then d[recLandNum]
239 239              else ("-" + d[recLandNum])
240 240          let pieces = numPiecesBySize(d[recLandSize])
241 241          let productivity = applyBonuses(landAssetId, pieces)
242 242          let deltaTime = (lastBlock.timestamp - stakedTime)
243 243          let availRes = if ((stakedTime > 0))
244 244              then fraction(deltaTime, (productivity._3 * pieces), DAYMILLIS)
245 245              else 0
246 246          let needMat = fraction(InfraUpgradeCostS, (pieces * (productivity._1 + 1)), SSIZE)
247 247          let globalAndLocal = if ((stakedTime > 0))
248 248              then asSplitResult(invoke(stakingContract, "splitByGlobalAndLocalWeightsREADONLY", [needMat, availRes, d[recTerrains]], nil))
249 249              else $Tuple2(asListIntCompacted(invoke(stakingContract, "splitByGlobalWeightsREADONLY", [needMat], nil)), "")
250 250  [("%s%s__assetId__" + landAssetId), ("%s%s__owner__" + owner), ("%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), ":"))]
251 251          }
252 252  
253 253  
254 254  @Callable(i)
255 255  func constructorV1 (stakingContract,economyContract,governanceContract) = if ((i.caller != this))
256 256      then throw("permissions denied")
257 257      else [StringEntry(keyRestCfg(), makeString(["%s%s%s", stakingContract, economyContract, governanceContract], SEP))]
258 258  
259 259  
260 260  
261 261  @Callable(i)
262 262  func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
263 263  
264 264  
265 265  
266 266  @Callable(i)
267 267  func duckInfoREADONLY (duckAssetId,userAddressOpt) = {
268 268      let addr = addressFromString(userAddressOpt)
269 269      let duckAsset = fromBase58String(duckAssetId)
270 270      if ((duckAssetId == ""))
271 271          then throw("duckAssetId is required")
272 272          else {
273 273              let duckOwner = getString(stakingContract, keyDuckIdToOwner(duckAssetId))
274 274              let owner = if (isDefined(duckOwner))
275 275                  then value(duckOwner)
276 276                  else if (if (isDefined(addr))
277 277                      then (assetBalance(value(addr), duckAsset) == 1)
278 278                      else false)
279 279                      then userAddressOpt
280 280                      else ""
281 281              $Tuple2(nil, $Tuple2(duckInfoArray(duckAssetId, owner, duckInfoTuple(duckAssetId)), walletInternal(userAddressOpt)))
282 282              }
283 283      }
284 284  
285 285  
286 286  
287 287  @Callable(i)
288 288  func landInfoREADONLY (landAssetId,userAddressOpt) = {
289 289      let addr = addressFromString(userAddressOpt)
290 290      let landAsset = fromBase58String(landAssetId)
291 291      if ((landAssetId == ""))
292 292          then throw("landAssetId is required")
293 293          else {
294 294              let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), 0)
295 295              let owner = if ((stakedTime > 0))
296 296                  then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
297 297                  else if (if (isDefined(addr))
298 298                      then (assetBalance(value(addr), landAsset) == 1)
299 299                      else false)
300 300                      then userAddressOpt
301 301                      else ""
302 302              let stakedDuck = getString(stakingContract, keyStakedDuckByOwner(userAddressOpt))
303 303              let duckInf = if (if (isDefined(addr))
304 304                  then isDefined(stakedDuck)
305 305                  else false)
306 306                  then {
307 307                      let duckAssetId = value(stakedDuck)
308 308                      $Tuple2(duckAssetId, duckInfoTuple(duckAssetId))
309 309                      }
310 310                  else $Tuple2("", $Tuple5(-1, "", "", -1, ""))
311 311              $Tuple2(nil, $Tuple3(landInfoArray(landAssetId, owner, stakedTime), duckInfoArray(duckInf._1, userAddressOpt, duckInf._2), walletInternal(userAddressOpt)))
312 312              }
313 313      }
314 314  
315 315  
316 316  
317 317  @Callable(i)
318 318  func stakedLandsInfoREADONLY (myAddress,landOwnerAddress) = if ((landOwnerAddress == ""))
319 319      then throw("landOwnerAddress is required")
320 320      else {
321 321          let myAddr = addressFromString(myAddress)
322 322          let landsStr = getString(stakingContract, keyStakedLandsByOwner(landOwnerAddress))
323 323          let lands = if (isDefined(landsStr))
324 324              then split_51C(value(landsStr), "_")
325 325              else nil
326 326          func oneLand (acc,landAssetId) =         {
327 327              let landAsset = fromBase58String(landAssetId)
328 328              if ((landAssetId == ""))
329 329                  then throw("landAssetId is required")
330 330                  else {
331 331                      let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), 0)
332 332                      let descr = value(assetInfo(landAsset)).description
333 333                      let d = split(descr, "_")
334 334                      let pieces = numPiecesBySize(d[recLandSize])
335 335                      let productivity = applyBonuses(landAssetId, pieces)
336 336                      let deltaTime = (lastBlock.timestamp - stakedTime)
337 337                      let availRes = fraction(deltaTime, (productivity._3 * pieces), DAYMILLIS)
338 338                      (acc :+ [("%s%s__landAssetId__" + landAssetId), ("%s%d__stakedTime__" + toString(stakedTime)), ("%s%s__description__" + descr), ("%s%d__infraLevel__" + toString(productivity._1)), makeString(["%s%s", "landArtefacts", ("PRESALE:" + toString(productivity._2))], SEP), ("%s%s__availRes__" + toString(availRes))])
339 339                      }
340 340              }
341 341  
342 342          let r = {
343 343              let $l = lands
344 344              let $s = size($l)
345 345              let $acc0 = nil
346 346              func $f0_1 ($a,$i) =             if (($i >= $s))
347 347                  then $a
348 348                  else oneLand($a, $l[$i])
349 349  
350 350              func $f0_2 ($a,$i) =             if (($i >= $s))
351 351                  then $a
352 352                  else throw("List size exceeds 100")
353 353  
354 354              $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)
355 355              }
356 356          let stakedDuck = getString(stakingContract, keyStakedDuckByOwner(myAddress))
357 357          let duckInf = if (if (isDefined(myAddr))
358 358              then isDefined(stakedDuck)
359 359              else false)
360 360              then {
361 361                  let duckAssetId = value(stakedDuck)
362 362                  $Tuple2(duckAssetId, duckInfoTuple(duckAssetId))
363 363                  }
364 364              else $Tuple2("", $Tuple5(-1, "", "", -1, ""))
365 365          $Tuple2(nil, $Tuple3(r, duckInfoArray(duckInf._1, myAddress, duckInf._2), walletInternal(myAddress)))
366 366          }
367 367  
368 368  
369 369  
370 370  @Callable(i)
371 371  func duckByOwnerInfoREADONLY (userAddress) = {
372 372      let stakedDuck = getString(stakingContract, keyStakedDuckByOwner(userAddress))
373 373      $Tuple2(nil, if (if (isDefined(addressFromString(userAddress)))
374 374          then isDefined(stakedDuck)
375 375          else false)
376 376          then {
377 377              let duckAssetId = value(stakedDuck)
378 378              duckInfoArray(duckAssetId, userAddress, duckInfoTuple(duckAssetId))
379 379              }
380 380          else duckInfoArray("", userAddress, $Tuple5(-1, "", "", -1, "")))
381 381      }
382 382  
383 383  
384 384  
385 385  @Callable(i)
386 386  func duckByAssetIdInfoREADONLY (duckAssetId) = {
387 387      let owner = getString(stakingContract, keyDuckIdToOwner(duckAssetId))
388 388      let duckInf = duckInfoTuple(duckAssetId)
389 389      $Tuple2(nil, duckInfoArray(duckAssetId, if (isDefined(owner))
390 390          then value(owner)
391 391          else "", duckInfoTuple(duckAssetId)))
392 392      }
393 393  
394 394  
395 395  
396 396  @Callable(i)
397 397  func landByAssetIdInfoREADONLY (landAssetId) = if ((landAssetId == ""))
398 398      then throw("landAssetId is required")
399 399      else {
400 400          let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
401 401          let owner = if ((stakedTime > 0))
402 402              then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
403 403              else ""
404 404          $Tuple2(nil, landInfoArray(landAssetId, owner, stakedTime))
405 405          }
406 406  
407 407  
408 408  
409 409  @Callable(i)
410 410  func stakedLandsByOwnerInfoREADONLY (landOwnerAddress) = if ((landOwnerAddress == ""))
411 411      then throw("landOwnerAddress is required")
412 412      else {
413 413          let landsStr = getString(stakingContract, keyStakedLandsByOwner(landOwnerAddress))
414 414          let lands = if (isDefined(landsStr))
415 415              then split_51C(value(landsStr), "_")
416 416              else nil
417 417          func oneLand (acc,landAssetId) =         if ((landAssetId == ""))
418 418              then throw("landAssetId is required")
419 419              else {
420 420                  let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
421 421                  (acc :+ landInfoArray(landAssetId, landOwnerAddress, stakedTime))
422 422                  }
423 423  
424 424          let r = {
425 425              let $l = lands
426 426              let $s = size($l)
427 427              let $acc0 = nil
428 428              func $f0_1 ($a,$i) =             if (($i >= $s))
429 429                  then $a
430 430                  else oneLand($a, $l[$i])
431 431  
432 432              func $f0_2 ($a,$i) =             if (($i >= $s))
433 433                  then $a
434 434                  else throw("List size exceeds 100")
435 435  
436 436              $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)
437 437              }
438 438          $Tuple2(nil, r)
439 439          }
440 440  
441 441  
442 442  
443 443  @Callable(i)
444 444  func landsByIdsInfoREADONLY (landAssetIds) = {
445 445      func oneLand (acc,landAssetId) =     if ((landAssetId == ""))
446 446          then throw("landAssetId is required")
447 447          else {
448 448              let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
449 449              let owner = if ((stakedTime > 0))
450 450                  then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
451 451                  else ""
452 452              (acc :+ landInfoArray(landAssetId, owner, stakedTime))
453 453              }
454 454  
455 455      let r = {
456 456          let $l = landAssetIds
457 457          let $s = size($l)
458 458          let $acc0 = nil
459 459          func $f0_1 ($a,$i) =         if (($i >= $s))
460 460              then $a
461 461              else oneLand($a, $l[$i])
462 462  
463 463          func $f0_2 ($a,$i) =         if (($i >= $s))
464 464              then $a
465 465              else throw("List size exceeds 100")
466 466  
467 467          $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)
468 468          }
469 469      $Tuple2(nil, r)
470 470      }
471 471  
472 472

Old	New		Differences
214	214
215	215		func getWarehouse (whKey,landIndex,infraLevel) = {
216	216		let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
217		-	let p = split(valueOrElse(getString(whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
	217	+	let p = split(valueOrElse(getString(stakingContract, whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
218	218		[p[whIdxVol], if ((size(split(p[whIdxRes], "_")) == NUMRES))
219	219		then p[whIdxRes]
220	220		else "0_0_0_0_0_0", if ((size(split(p[whIdxMat], "_")) == NUMRES))

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 usdnAssetId = match chain {
7	7		case _ =>
8	8		if ((base58'2W' == $match0))
9	9		then base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
10	10		else if ((base58'2T' == $match0))
11	11		then base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
12	12		else throw("Unknown chain")
13	13		}
14	14
15	15		let InfraUpgradeCostS = match chain {
16	16		case _ =>
17	17		if ((base58'2W' == $match0))
18	18		then 6307198406
19	19		else if ((base58'2T' == $match0))
20	20		then 63071984
21	21		else throw("Unknown chain")
22	22		}
23	23
24	24		let LANDPREFIX = "LAND"
25	25
26	26		let DUCKPREFIX = "DUCK"
27	27
28	28		let SEP = "__"
29	29
30	30		let ARTPRESALE = "PRESALE"
31	31
32	32		let DAILYRESBYPIECE = 3456000
33	33
34	34		let DAYMILLIS = 86400000
35	35
36	36		let NUMRES = 6
37	37
38	38		let SSIZE = 25
39	39
40	40		let MSIZE = 100
41	41
42	42		let LSIZE = 225
43	43
44	44		let XLSIZE = 400
45	45
46	46		let XXLSIZE = 625
47	47
48	48		let recLandNum = 0
49	49
50	50		let recLandSize = 1
51	51
52	52		let recTerrains = 2
53	53
54	54		let recContinent = 3
55	55
56	56		let whIdxVol = 0
57	57
58	58		let whIdxRes = 1
59	59
60	60		let whIdxMat = 2
61	61
62	62		let whIdxProd = 3
63	63
64	64		func keyRestCfg () = "%s__restConfig"
65	65
66	66
67	67		let IdxCfgStakingDapp = 1
68	68
69	69		let IdxCfgEconomyDapp = 2
70	70
71	71		let IdxCfgGovernanceDapp = 3
72	72
73	73		func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
74	74
75	75
76	76		func readRestCfgOrFail () = split_4C(getStringOrFail(this, keyRestCfg()), SEP)
77	77
78	78
79	79		func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
80	80
81	81
82	82		let restCfg = readRestCfgOrFail()
83	83
84	84		let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
85	85
86	86		let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
87	87
88	88		let governanceContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
89	89
90	90		func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
91	91
92	92
93	93		func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
94	94
95	95
96	96		func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
97	97
98	98
99	99		func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("stakedTimeByTypeAssetIdAndOwner_" + nftType) + "_") + assetId) + "_") + ownerAddr)
100	100
101	101
102	102		func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
103	103
104	104
105	105		func keyWarehouseByLand (landAssetId) = ("wareHouse_" + landAssetId)
106	106
107	107
108	108		func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
109	109
110	110
111	111		func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
112	112
113	113
114	114		func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
115	115
116	116
117	117		func keyInfraLevelByAssetId (assetId) = ("infraLevel_" + assetId)
118	118
119	119
120	120		func keyLandArtStatusByTypeAndAssetId (type,assetId) = makeString(["landArtStatus", type, assetId], "_")
121	121
122	122
123	123		func keyPresaleArtActivatedByAssetId (assetId) = ("presaleArtActivated_" + assetId)
124	124
125	125
126	126		func keyStakedLandsByOwner (ownerAddr) = ("stakedLandsByOwner_" + ownerAddr)
127	127
128	128
129	129		func asString (v) = match v {
130	130		case s: String =>
131	131		s
132	132		case _ =>
133	133		throw("fail to cast into String")
134	134		}
135	135
136	136
137	137		func asListIntCompacted (val) = match val {
138	138		case valAnyList: List[Any] =>
139	139		if ((size(valAnyList) != NUMRES))
140	140		then throw(("Array size is " + toString(size(valAnyList))))
141	141		else {
142	142		func conv (acc,item) = match item {
143	143		case it: Int =>
144	144		(acc :+ toString(it))
145	145		case _ =>
146	146		throw("List type is not Int")
147	147		}
148	148
149	149		let r = {
150	150		let $l = valAnyList
151	151		let $s = size($l)
152	152		let $acc0 = nil
153	153		func $f0_1 ($a,$i) = if (($i >= $s))
154	154		then $a
155	155		else conv($a, $l[$i])
156	156
157	157		func $f0_2 ($a,$i) = if (($i >= $s))
158	158		then $a
159	159		else throw("List size exceeds 6")
160	160
161	161		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
162	162		}
163	163		makeString(r, "_")
164	164		}
165	165		case _ =>
166	166		throw("fail to cast into List")
167	167		}
168	168
169	169
170	170		func asSplitResult (val) = match val {
171	171		case t2: (List[Any], List[Any]) =>
172	172		$Tuple2(asListIntCompacted(t2._1), asListIntCompacted(t2._2))
173	173		case _ =>
174	174		throw("fail to cast into (List, List)")
175	175		}
176	176
177	177
178	178		func walletInternal (userAddressOpt) = {
179	179		let addr = addressFromString(userAddressOpt)
180	180		let balance = if (isDefined(addr))
181	181		then wavesBalance(value(addr))
182	182		else BalanceDetails(0, 0, 0, 0)
183	183		let usdnBalance = if (isDefined(addr))
184	184		then assetBalance(value(addr), usdnAssetId)
185	185		else 0
186	186		makeString(["%s%d%d", "wallet", toString(balance.available), toString(usdnBalance)], SEP)
187	187		}
188	188
189	189
190	190		func applyBonuses (landAssetId,pieces) = {
191	191		let infraLevel = valueOrElse(getInteger(stakingContract, keyInfraLevelByAssetId(landAssetId)), 0)
192	192		let artPieces = valueOrElse(getInteger(stakingContract, keyLandArtStatusByTypeAndAssetId(ARTPRESALE, landAssetId)), if (valueOrElse(getBoolean(stakingContract, keyPresaleArtActivatedByAssetId(landAssetId)), false))
193	193		then pieces
194	194		else 0)
195	195		$Tuple3(infraLevel, artPieces, ((DAILYRESBYPIECE + fraction(DAILYRESBYPIECE, infraLevel, 4)) + fraction(DAILYRESBYPIECE, (artPieces * 3), (pieces * 20))))
196	196		}
197	197
198	198
199	199		func numPiecesBySize (landSize) = match landSize {
200	200		case _ =>
201	201		if (("S" == $match0))
202	202		then SSIZE
203	203		else if (("M" == $match0))
204	204		then MSIZE
205	205		else if (("L" == $match0))
206	206		then LSIZE
207	207		else if (("XL" == $match0))
208	208		then XLSIZE
209	209		else if (("XXL" == $match0))
210	210		then XXLSIZE
211	211		else throw("Unknown land size")
212	212		}
213	213
214	214
215	215		func getWarehouse (whKey,landIndex,infraLevel) = {
216	216		let volPrefix = ((toString(landIndex) + "_") + toString(infraLevel))
217		-	let p = split(valueOrElse(getString(whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
	217	+	let p = split(valueOrElse(getString(stakingContract, whKey), (volPrefix + ":0_0_0_0_0_0:0_0_0_0_0_0:")), ":")
218	218		[p[whIdxVol], if ((size(split(p[whIdxRes], "_")) == NUMRES))
219	219		then p[whIdxRes]
220	220		else "0_0_0_0_0_0", if ((size(split(p[whIdxMat], "_")) == NUMRES))
221	221		then p[whIdxMat]
222	222		else "0_0_0_0_0_0", p[whIdxProd]]
223	223		}
224	224
225	225
226	226		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)))
227	227
228	228
229	229		func duckInfoArray (duckAssetId,owner,duckInf) = [("%s%s__assetId__" + duckAssetId), ("%s%s__owner__" + owner), ("%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)]
230	230
231	231
232	232		func landInfoArray (landAssetId,owner,stakedTime) = if ((landAssetId == ""))
233	233		then throw("landAssetId is required")
234	234		else {
235	235		let a = value(assetInfo(fromBase58String(landAssetId)))
236	236		let d = split(a.description, "_")
237	237		let landNum = if ((a.quantity > 0))
238	238		then d[recLandNum]
239	239		else ("-" + d[recLandNum])
240	240		let pieces = numPiecesBySize(d[recLandSize])
241	241		let productivity = applyBonuses(landAssetId, pieces)
242	242		let deltaTime = (lastBlock.timestamp - stakedTime)
243	243		let availRes = if ((stakedTime > 0))
244	244		then fraction(deltaTime, (productivity._3 * pieces), DAYMILLIS)
245	245		else 0
246	246		let needMat = fraction(InfraUpgradeCostS, (pieces * (productivity._1 + 1)), SSIZE)
247	247		let globalAndLocal = if ((stakedTime > 0))
248	248		then asSplitResult(invoke(stakingContract, "splitByGlobalAndLocalWeightsREADONLY", [needMat, availRes, d[recTerrains]], nil))
249	249		else $Tuple2(asListIntCompacted(invoke(stakingContract, "splitByGlobalWeightsREADONLY", [needMat], nil)), "")
250	250		[("%s%s__assetId__" + landAssetId), ("%s%s__owner__" + owner), ("%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), ":"))]
251	251		}
252	252
253	253
254	254		@Callable(i)
255	255		func constructorV1 (stakingContract,economyContract,governanceContract) = if ((i.caller != this))
256	256		then throw("permissions denied")
257	257		else [StringEntry(keyRestCfg(), makeString(["%s%s%s", stakingContract, economyContract, governanceContract], SEP))]
258	258
259	259
260	260
261	261		@Callable(i)
262	262		func walletInfoREADONLY (userAddressOpt) = $Tuple2(nil, walletInternal(userAddressOpt))
263	263
264	264
265	265
266	266		@Callable(i)
267	267		func duckInfoREADONLY (duckAssetId,userAddressOpt) = {
268	268		let addr = addressFromString(userAddressOpt)
269	269		let duckAsset = fromBase58String(duckAssetId)
270	270		if ((duckAssetId == ""))
271	271		then throw("duckAssetId is required")
272	272		else {
273	273		let duckOwner = getString(stakingContract, keyDuckIdToOwner(duckAssetId))
274	274		let owner = if (isDefined(duckOwner))
275	275		then value(duckOwner)
276	276		else if (if (isDefined(addr))
277	277		then (assetBalance(value(addr), duckAsset) == 1)
278	278		else false)
279	279		then userAddressOpt
280	280		else ""
281	281		$Tuple2(nil, $Tuple2(duckInfoArray(duckAssetId, owner, duckInfoTuple(duckAssetId)), walletInternal(userAddressOpt)))
282	282		}
283	283		}
284	284
285	285
286	286
287	287		@Callable(i)
288	288		func landInfoREADONLY (landAssetId,userAddressOpt) = {
289	289		let addr = addressFromString(userAddressOpt)
290	290		let landAsset = fromBase58String(landAssetId)
291	291		if ((landAssetId == ""))
292	292		then throw("landAssetId is required")
293	293		else {
294	294		let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), 0)
295	295		let owner = if ((stakedTime > 0))
296	296		then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
297	297		else if (if (isDefined(addr))
298	298		then (assetBalance(value(addr), landAsset) == 1)
299	299		else false)
300	300		then userAddressOpt
301	301		else ""
302	302		let stakedDuck = getString(stakingContract, keyStakedDuckByOwner(userAddressOpt))
303	303		let duckInf = if (if (isDefined(addr))
304	304		then isDefined(stakedDuck)
305	305		else false)
306	306		then {
307	307		let duckAssetId = value(stakedDuck)
308	308		$Tuple2(duckAssetId, duckInfoTuple(duckAssetId))
309	309		}
310	310		else $Tuple2("", $Tuple5(-1, "", "", -1, ""))
311	311		$Tuple2(nil, $Tuple3(landInfoArray(landAssetId, owner, stakedTime), duckInfoArray(duckInf._1, userAddressOpt, duckInf._2), walletInternal(userAddressOpt)))
312	312		}
313	313		}
314	314
315	315
316	316
317	317		@Callable(i)
318	318		func stakedLandsInfoREADONLY (myAddress,landOwnerAddress) = if ((landOwnerAddress == ""))
319	319		then throw("landOwnerAddress is required")
320	320		else {
321	321		let myAddr = addressFromString(myAddress)
322	322		let landsStr = getString(stakingContract, keyStakedLandsByOwner(landOwnerAddress))
323	323		let lands = if (isDefined(landsStr))
324	324		then split_51C(value(landsStr), "_")
325	325		else nil
326	326		func oneLand (acc,landAssetId) = {
327	327		let landAsset = fromBase58String(landAssetId)
328	328		if ((landAssetId == ""))
329	329		then throw("landAssetId is required")
330	330		else {
331	331		let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), 0)
332	332		let descr = value(assetInfo(landAsset)).description
333	333		let d = split(descr, "_")
334	334		let pieces = numPiecesBySize(d[recLandSize])
335	335		let productivity = applyBonuses(landAssetId, pieces)
336	336		let deltaTime = (lastBlock.timestamp - stakedTime)
337	337		let availRes = fraction(deltaTime, (productivity._3 * pieces), DAYMILLIS)
338	338		(acc :+ [("%s%s__landAssetId__" + landAssetId), ("%s%d__stakedTime__" + toString(stakedTime)), ("%s%s__description__" + descr), ("%s%d__infraLevel__" + toString(productivity._1)), makeString(["%s%s", "landArtefacts", ("PRESALE:" + toString(productivity._2))], SEP), ("%s%s__availRes__" + toString(availRes))])
339	339		}
340	340		}
341	341
342	342		let r = {
343	343		let $l = lands
344	344		let $s = size($l)
345	345		let $acc0 = nil
346	346		func $f0_1 ($a,$i) = if (($i >= $s))
347	347		then $a
348	348		else oneLand($a, $l[$i])
349	349
350	350		func $f0_2 ($a,$i) = if (($i >= $s))
351	351		then $a
352	352		else throw("List size exceeds 100")
353	353
354	354		$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)
355	355		}
356	356		let stakedDuck = getString(stakingContract, keyStakedDuckByOwner(myAddress))
357	357		let duckInf = if (if (isDefined(myAddr))
358	358		then isDefined(stakedDuck)
359	359		else false)
360	360		then {
361	361		let duckAssetId = value(stakedDuck)
362	362		$Tuple2(duckAssetId, duckInfoTuple(duckAssetId))
363	363		}
364	364		else $Tuple2("", $Tuple5(-1, "", "", -1, ""))
365	365		$Tuple2(nil, $Tuple3(r, duckInfoArray(duckInf._1, myAddress, duckInf._2), walletInternal(myAddress)))
366	366		}
367	367
368	368
369	369
370	370		@Callable(i)
371	371		func duckByOwnerInfoREADONLY (userAddress) = {
372	372		let stakedDuck = getString(stakingContract, keyStakedDuckByOwner(userAddress))
373	373		$Tuple2(nil, if (if (isDefined(addressFromString(userAddress)))
374	374		then isDefined(stakedDuck)
375	375		else false)
376	376		then {
377	377		let duckAssetId = value(stakedDuck)
378	378		duckInfoArray(duckAssetId, userAddress, duckInfoTuple(duckAssetId))
379	379		}
380	380		else duckInfoArray("", userAddress, $Tuple5(-1, "", "", -1, "")))
381	381		}
382	382
383	383
384	384
385	385		@Callable(i)
386	386		func duckByAssetIdInfoREADONLY (duckAssetId) = {
387	387		let owner = getString(stakingContract, keyDuckIdToOwner(duckAssetId))
388	388		let duckInf = duckInfoTuple(duckAssetId)
389	389		$Tuple2(nil, duckInfoArray(duckAssetId, if (isDefined(owner))
390	390		then value(owner)
391	391		else "", duckInfoTuple(duckAssetId)))
392	392		}
393	393
394	394
395	395
396	396		@Callable(i)
397	397		func landByAssetIdInfoREADONLY (landAssetId) = if ((landAssetId == ""))
398	398		then throw("landAssetId is required")
399	399		else {
400	400		let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
401	401		let owner = if ((stakedTime > 0))
402	402		then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
403	403		else ""
404	404		$Tuple2(nil, landInfoArray(landAssetId, owner, stakedTime))
405	405		}
406	406
407	407
408	408
409	409		@Callable(i)
410	410		func stakedLandsByOwnerInfoREADONLY (landOwnerAddress) = if ((landOwnerAddress == ""))
411	411		then throw("landOwnerAddress is required")
412	412		else {
413	413		let landsStr = getString(stakingContract, keyStakedLandsByOwner(landOwnerAddress))
414	414		let lands = if (isDefined(landsStr))
415	415		then split_51C(value(landsStr), "_")
416	416		else nil
417	417		func oneLand (acc,landAssetId) = if ((landAssetId == ""))
418	418		then throw("landAssetId is required")
419	419		else {
420	420		let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
421	421		(acc :+ landInfoArray(landAssetId, landOwnerAddress, stakedTime))
422	422		}
423	423
424	424		let r = {
425	425		let $l = lands
426	426		let $s = size($l)
427	427		let $acc0 = nil
428	428		func $f0_1 ($a,$i) = if (($i >= $s))
429	429		then $a
430	430		else oneLand($a, $l[$i])
431	431
432	432		func $f0_2 ($a,$i) = if (($i >= $s))
433	433		then $a
434	434		else throw("List size exceeds 100")
435	435
436	436		$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)
437	437		}
438	438		$Tuple2(nil, r)
439	439		}
440	440
441	441
442	442
443	443		@Callable(i)
444	444		func landsByIdsInfoREADONLY (landAssetIds) = {
445	445		func oneLand (acc,landAssetId) = if ((landAssetId == ""))
446	446		then throw("landAssetId is required")
447	447		else {
448	448		let stakedTime = valueOrElse(getInteger(stakingContract, keyStakedTimeByAssetId(landAssetId)), -1)
449	449		let owner = if ((stakedTime > 0))
450	450		then value(getString(stakingContract, keyLandAssetIdToOwner(landAssetId)))
451	451		else ""
452	452		(acc :+ landInfoArray(landAssetId, owner, stakedTime))
453	453		}
454	454
455	455		let r = {
456	456		let $l = landAssetIds
457	457		let $s = size($l)
458	458		let $acc0 = nil
459	459		func $f0_1 ($a,$i) = if (($i >= $s))
460	460		then $a
461	461		else oneLand($a, $l[$i])
462	462
463	463		func $f0_2 ($a,$i) = if (($i >= $s))
464	464		then $a
465	465		else throw("List size exceeds 100")
466	466
467	467		$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)
468	468		}
469	469		$Tuple2(nil, r)
470	470		}
471	471
472	472

github/deemru/w8io/873ac7e 
160.21 ms ◑