tx · 5hYXzNHpujRezK3uX59EtuPTNcfmz1g94C1gPvpVR763

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.03100000 Waves

2023.01.17 14:37 [2408879] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{ "type": 13, "id": "5hYXzNHpujRezK3uX59EtuPTNcfmz1g94C1gPvpVR763", "fee": 3100000, "feeAssetId": null, "timestamp": 1673955453662, "version": 2, "chainId": 84, "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm", "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX", "proofs": [ "2FLHzysA4hsoWuUQtP5nqpaiEgyCQ2fzJzu4Dytp8VqorWmjX2SMkNNpCiah4PnTxrHM7WemKHkEbwJvbZdFMYYc" ], "script": "base64:BgJTCAISABIDCgEIEgASAwoBCBIECgIBCBIECgICAhIECgIBCBIECgIBARIECgIICBIECgICAhIECgICAhIDCgEIEgMKAQgSAwoBCBIDCgEYEgMKARhcAAVjaGFpbgkAsAkBCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2RuQXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMAEgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEDCQAAAgIBVAUHJG1hdGNoMAEg93bq9/eDymXbbhPuAjvPWCmVqcHRjfJL2mzYHWKAyN4JAAIBAg1Vbmtub3duIGNoYWluAA1pbmN1YmF0b3JBZGRyBAckbWF0Y2gwBQVjaGFpbgMJAAACAgFXBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUEVrdFZ1eDJSaGNoU042M0RzRG80YjRtejRRcXpLU2VEdgMJAAACAgFUBQckbWF0Y2gwBQR0aGlzCQACAQINVW5rbm93biBjaGFpbgALYnJlZWRlckFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAICAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQRFZ1VTQ1SDdFaDVkbXROYm5STlJTdEd3VUxBN05ZNkhiAwkAAAICAVQFByRtYXRjaDAFBHRoaXMJAAIBAg1Vbmtub3duIGNoYWluAAtlY29ub215QWRkcgQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1Ayc2sxS25jU3hSYVpzOGI0Q1dHUHcyamt2dmF2NzR1NEQDCQAAAgIBVAUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM044eTR3eFgzSkM0VGRyQ0pCWFgxNlNqV2Y2WDI1NmhyZXAJAAIBAg1Vbmtub3duIGNoYWluAANwdWIBIE9T4ho/VKjWnVJOEx1GJ1W9s1PzLHvJVFSw/0PBtBQoAAhIRUFMQ09TVACQTgAKTEFORFBSRUZJWAIETEFORAAKRFVDS1BSRUZJWAIERFVDSwAPREVGQVVMVExPQ0FUSU9OAg9BZnJpY2FfRl9BZnJpY2EABk5VTVJFUwAGAAVTU0laRQAZAAVNU0laRQBkAAVMU0laRQDhAQAGWExTSVpFAJADAAdYWExTSVpFAPEEAA9EQUlMWVJFU0JZUElFQ0UAgPjSAQAJREFZTUlMTElTAIC4mSkAEUZJVkVNSU5VVEVTTUlMTElTAOCnEgAQUkVTT1VSQ0VQUklDRU1JTgDV1gkAEUluZnJhVXBncmFkZUNvc3RTBAckbWF0Y2gwBQVjaGFpbgMJAAACAgFXBQckbWF0Y2gwAMbrwL8XAwkAAAICAVQFByRtYXRjaDAA8M2JHgkAAgECDVVua25vd24gY2hhaW4AFUluZnJhVXBncmFkZUNvc3RTVXNkbgQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMACAtIkTAwkAAAICAVQFByRtYXRjaDAAgLUYCQACAQINVW5rbm93biBjaGFpbgAMRVhQTUFURVJJQUxTBAckbWF0Y2gwBQVjaGFpbgMJAAACAgFXBQckbWF0Y2gwAMuA1bPLBAMJAAACAgFUBQckbWF0Y2gwAPGa8O8FCQACAQINVW5rbm93biBjaGFpbgAHRVhQVVNETgQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMACAlOvcAwMJAAACAgFUBQckbWF0Y2gwAICt4gQJAAIBAg1Vbmtub3duIGNoYWluAAVNVUxUNgDAhD0ABUZJVkVYCQC2AgEABQAHVFdFTlRZWAkAtgIBABQACFRXRU5UWTJYCQC2AgEJAGgCABQAFAAIVFdFTlRZM1gJALYCAQkAaAIJAGgCABQAFAAUAAhUV0VOVFk0WAkAtgIBCQBoAgkAaAIJAGgCABQAFAAUABQACFRXRU5UWTVYCQC2AgEJAGgCCQBoAgkAaAIJAGgCABQAFAAUABQAFAAIbWF0VHlwZXMJAMwIAgIERnVlbAkAzAgCAgVNZXRhbAkAzAgCAgVQbGFuawkAzAgCAgVHbGFzcwkAzAgCAgdQbGFzdGljCQDMCAICB1Byb3RlaW4FA25pbAAKY29udGluZW50cwkAzAgCAgRBc2lhCQDMCAICBkV1cm9wZQkAzAgCAghBbWVyaWNhcwkAzAgCAgdPY2VhbmlhCQDMCAICBkFmcmljYQUDbmlsAApBUlRQUkVTQUxFAgdQUkVTQUxFAA9QUkVTQUxFTlVNTEFORFMA9AMBEmtleU5leHRGcmVlTGFuZE51bQACC25leHRMYW5kTnVtARBrZXlMYW5kVG9Bc3NldElkAQdsYW5kTnVtCQCsAgICDGxhbmRUb0Fzc2V0XwUHbGFuZE51bQEKa2V5TmZ0TmFtZQIHbGFuZE51bQhsYW5kU2l6ZQkArAICCQCsAgIFCkxBTkRQUkVGSVgFB2xhbmROdW0FCGxhbmRTaXplARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBB2Fzc2V0SWQJAKwCAgIJbmZ0T3duZXJfBQdhc3NldElkARBrZXlEdWNrSWRUb093bmVyAQdhc3NldElkCQCsAgICCmR1Y2tPd25lcl8FB2Fzc2V0SWQBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgILc3Rha2VkVGltZV8FB2Fzc2V0SWQBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgILaW5mcmFMZXZlbF8FB2Fzc2V0SWQBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIHYXNzZXRJZAlvd25lckFkZHIJAKwCAgkArAICCQCsAgICHGluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcl8FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgEfa2V5UHJlc2FsZUFydEFjdGl2YXRlZEJ5QXNzZXRJZAEHYXNzZXRJZAkArAICAhRwcmVzYWxlQXJ0QWN0aXZhdGVkXwUHYXNzZXRJZAEna2V5UHJlc2FsZUFydEFjdGl2YXRlZEJ5QXNzZXRJZEFuZE93bmVyAgdhc3NldElkCW93bmVyQWRkcgkArAICCQCsAgIJAKwCAgIlcHJlc2FsZUFydEFjdGl2YXRlZEJ5QXNzZXRJZEFuZE93bmVyXwUHYXNzZXRJZAIBXwUJb3duZXJBZGRyASBrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQW5kQXNzZXRJZAIEdHlwZQdhc3NldElkCQC5CQIJAMwIAgINbGFuZEFydFN0YXR1cwkAzAgCBQR0eXBlCQDMCAIFB2Fzc2V0SWQFA25pbAIBXwEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMEdHlwZQdhc3NldElkCW93bmVyQWRkcgkAuQkCCQDMCAICImxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIJAMwIAgUEdHlwZQkAzAgCBQdhc3NldElkCQDMCAIFCW93bmVyQWRkcgUDbmlsAgFfARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwduZnRUeXBlB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIgc3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcl8FB25mdFR5cGUCAV8FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgERa2V5TGFuZE51bVRvT3duZXIBB2xhbmROdW0JAKwCAgIKbGFuZE93bmVyXwUHbGFuZE51bQERa2V5QmFja3BhY2tCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICCWJhY2tQYWNrXwULZHVja0Fzc2V0SWQBD2tleUR1Y2tMb2NhdGlvbgELZHVja0Fzc2V0SWQJAKwCAgINZHVja0xvY2F0aW9uXwULZHVja0Fzc2V0SWQBDWtleUR1Y2tIZWFsdGgBC2R1Y2tBc3NldElkCQCsAgICC2R1Y2tIZWFsdGhfBQtkdWNrQXNzZXRJZAERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zAApyZWNMYW5kTnVtAAAAC3JlY0xhbmRTaXplAAEAC3JlY1RlcnJhaW5zAAIADHJlY0NvbnRpbmVudAADAA9sb2NJZHhDb250aW5lbnQAAAAKbG9jSWR4VHlwZQABAAhsb2NJZHhJZAACAApicElkeExldmVsAAAACGJwSWR4UmVzAAEACGJwSWR4TWF0AAIACWJwSWR4UHJvZAADAQhhc1N0cmluZwEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAFAXMJAAIBAhhmYWlsIHRvIGNhc3QgaW50byBTdHJpbmcBEmdldE5lZWRlZE1hdGVyaWFscwEFdG90YWwEBXByb3BzCQC1CQIJAQV2YWx1ZQEJAKIIAQkBEWtleVJlc1Byb3BvcnRpb25zAAIBXwMJAQIhPQIJAJADAQUFcHJvcHMFBk5VTVJFUwkAAgECFldyb25nIHByb3BvcnRpb25zIGRhdGEEAXIJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXByb3BzAAAJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXByb3BzAAEJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXByb3BzAAIJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXByb3BzAAMJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXByb3BzAAQJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBXByb3BzAAUFA25pbAQDc3VtCQBkAgkAZAIJAGQCCQBkAgkAZAIJAJEDAgUBcgAACQCRAwIFAXIAAQkAkQMCBQFyAAIJAJEDAgUBcgADCQCRAwIFAXIABAkAkQMCBQFyAAUDCQBnAgAABQNzdW0JAAIBAg9ObyBsYW5kcyBzdGFrZWQEBW5vcm02CQBrAwUFdG90YWwFBU1VTFQ2BQNzdW0KAQpub3JtYWxpemVyAgNhY2MEZWxlbQkAzQgCBQNhY2MJAGsDBQRlbGVtBQVub3JtNgUFTVVMVDYKAAIkbAUBcgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKbm9ybWFsaXplcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgERc3VidHJhY3RNYXRlcmlhbHMDDHNob3VsZFVzZU1hdANoYXMJdG90YWxOZWVkBARuZWVkCQESZ2V0TmVlZGVkTWF0ZXJpYWxzAQUJdG90YWxOZWVkCgEKc3VidHJhY3RvcgIDYWNjA2lkeAQGcmVzdWx0CQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2hhcwUDaWR4CQCRAwIFBG5lZWQFA2lkeAMJAGYCAAAFBnJlc3VsdAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhhOb3QgZW5vdWdoIG1hdGVyaWFsIGlkeD0JAKQDAQUDaWR4AgssIHlvdSBoYXZlIAkAkQMCBQNoYXMFA2lkeAILLCBidXQgbmVlZCAJAKQDAQkAkQMCBQRuZWVkBQNpZHgJAM0IAgUDYWNjCQCkAwEFBnJlc3VsdAMFDHNob3VsZFVzZU1hdAoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnN1YnRyYWN0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYFA2hhcwEZdXBkYXRlUHJvcG9ydGlvbnNJbnRlcm5hbAQIcHJvcExpc3QNdGVycmFpbkNvdW50cw1sYW5kU2l6ZUluZGV4BHNpZ24DCQECIT0CCQCQAwEFCHByb3BMaXN0BQZOVU1SRVMJAAIBAhZXcm9uZyBwcm9wb3J0aW9ucyBkYXRhCgEHdXBkYXRlcgIDYWNjAWkEBnJlc3VsdAkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQhwcm9wTGlzdAUBaQkAaAIJAGgCBQRzaWduCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgDCQBmAgAABQZyZXN1bHQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICFlBhbmljISBQaWVjZXMgb2YgdHlwZT0JAKQDAQUBaQIHLCBzaWduPQkApAMBBQRzaWduAhQsICB0ZXJyYWluQ291bnRzW2ldPQkApAMBCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkCECwgbGFuZFNpemVJbmRleD0JAKQDAQUNbGFuZFNpemVJbmRleAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0BAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHdXBkYXRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgkAuQkCBQFyAgFfARF1cGRhdGVQcm9wb3J0aW9ucwMNdGVycmFpbkNvdW50cw1sYW5kU2l6ZUluZGV4BHNpZ24ECHByb3BMaXN0CQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBEWtleVJlc1Byb3BvcnRpb25zAAILMF8wXzBfMF8wXzACAV8JARl1cGRhdGVQcm9wb3J0aW9uc0ludGVybmFsBAUIcHJvcExpc3QFDXRlcnJhaW5Db3VudHMFDWxhbmRTaXplSW5kZXgFBHNpZ24BDWNvdW50VGVycmFpbnMBCHRlcnJhaW5zCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUEAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFCAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQwABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUQAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFFAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRgABBQNuaWwBD251bVBpZWNlc0J5U2l6ZQEIbGFuZFNpemUEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAFBVNTSVpFAwkAAAICAU0FByRtYXRjaDAFBU1TSVpFAwkAAAICAUwFByRtYXRjaDAFBUxTSVpFAwkAAAICAlhMBQckbWF0Y2gwBQZYTFNJWkUDCQAAAgIDWFhMBQckbWF0Y2gwBQdYWExTSVpFCQACAQIRVW5rbm93biBsYW5kIHNpemUBDHN1Yk9uZUluTGlzdAMFYUxpc3QDaWR4BmFtb3VudAoBBnN1YmJlcgIDYWNjAWkJAM0IAgUDYWNjAwkAAAIFAWkFA2lkeAkApAMBCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWFMaXN0BQFpBQZhbW91bnQJAJEDAgUFYUxpc3QFAWkEAXIKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQZzdWJiZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEGYWRkUmVzBQpjdXJyZW50UmVzDXRlcnJhaW5Db3VudHMJZGVsdGFUaW1lDWxhbmRTaXplSW5kZXgXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMKAQVhZGRlcgIDYWNjAWkECXJlc09mVHlwZQkAaAIJAGgCCQBrAwUJZGVsdGFUaW1lBRdkYWlseUJ5UGllY2VXaXRoQm9udXNlcwUJREFZTUlMTElTCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgJAM0IAgUDYWNjCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKY3VycmVudFJlcwUBaQUJcmVzT2ZUeXBlBAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEDYWJzAQF4AwkAwAICBQF4CQC2AgEAAAUBeAkAvgIBBQF4AARmcmVxCQDMCAIJAMwIAgABCQDMCAIABAkAzAgCAAkJAMwIAgAKCQDMCAIADwUDbmlsCQDMCAIJAMwIAgAFCQDMCAIACAkAzAgCAA0JAMwIAgAOCQDMCAIADwUDbmlsCQDMCAIJAMwIAgAGCQDMCAIACQkAzAgCAA4JAMwIAgAPCQDMCAIAEAUDbmlsCQDMCAIJAMwIAgAECQDMCAIABwkAzAgCAAgJAMwIAgANCQDMCAIAEgUDbmlsCQDMCAIJAMwIAgABCQDMCAIABgkAzAgCAAcJAMwIAgAPCQDMCAIAEwUDbmlsBQNuaWwBB2dlbkNoYXICAW4FZnJlcXMEA3JlbQkAoAMBCQC7AgIFAW4FB1RXRU5UWVgEBmxldHRlcgMJAGYCCQCRAwIFBWZyZXFzAAAFA3JlbQIBQQMJAGYCCQCRAwIFBWZyZXFzAAEFA3JlbQIBQgMJAGYCCQCRAwIFBWZyZXFzAAIFA3JlbQIBQwMJAGYCCQCRAwIFBWZyZXFzAAMFA3JlbQIBRAMJAGYCCQCRAwIFBWZyZXFzAAQFA3JlbQIBRQIBRgUGbGV0dGVyAQtnZW5UZXJyYWlucwIEc2VlZAxjb250aW5lbnRJZHgEAWYJAJEDAgUEZnJlcQUMY29udGluZW50SWR4CgEQdGVycmFpbkdlbmVyYXRvcgIDYWNjBGVsZW0JAJQKAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIIBQNhY2MCXzEJAQdnZW5DaGFyAggFA2FjYwJfMgUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFB1RXRU5UWVgFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFkyWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTNYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZNFgFAWYJALoCAggFA2FjYwJfMgUIVFdFTlRZNVgEAXQKAAIkbAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgICAAkAugICBQRzZWVkBQVGSVZFWAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEQdGVycmFpbkdlbmVyYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUIBQF0Al8xAQtnZXRCYWNrcGFjawEFYnBLZXkEAXAJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQVicEtleQIaMDowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoCAToJAMwIAgkApAMBCQELdmFsdWVPckVsc2UCCQC2CQEJAJEDAgUBcAUKYnBJZHhMZXZlbAAACQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhSZXMCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeFJlcwILMF8wXzBfMF8wXzAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQhicElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAXAFCGJwSWR4TWF0AgswXzBfMF8wXzBfMAkAzAgCCQCRAwIFAXAFCWJwSWR4UHJvZAUDbmlsARBleHBlZGl0aW9uQ29tbW9uBQxzaG91bGRVc2VNYXQGY2FsbGVyBHR4SWQHbWVzc2FnZQNzaWcDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gEBXBhcnRzCQC1CQIJALAJAQUHbWVzc2FnZQIBOwQCaHAJALUJAgkAkQMCCQC1CQIJAJEDAgUFcGFydHMAAAIBfAAAAgFfBAVjdXJIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAAEBW5ld0hQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCaHAAAQQKbG9jQW5kVGltZQkAtQkCCQCRAwIFBXBhcnRzAAECAToEDnRhcmdldExvY2F0aW9uCQC1CQIJAJEDAgUKbG9jQW5kVGltZQAAAgFfAwkBAiE9AgkAkQMCBQ50YXJnZXRMb2NhdGlvbgABAgFFCQACAQIrZXhwZWRpdGlvbiB0YXJnZXQgbG9jYXRpb24gdHlwZSBzaG91bGQgYmUgRQQEdGltZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmxvY0FuZFRpbWUAAQMDCQBmAgUEdGltZQkAZAIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwYJAGYCCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFEUZJVkVNSU5VVEVTTUlMTElTBQR0aW1lCQACAQISc2lnbmF0dXJlIG91dGRhdGVkBAh1c2VyQWRkcgkApQgBBQZjYWxsZXIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUIdXNlckFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQMb2xkRnJvbVN0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aABkAwkBAiE9AgUMb2xkRnJvbVN0YXRlBQVjdXJIUAkAAgEJAKwCAgkArAICCQCsAgICCm9sZEhlYWx0aD0JAKQDAQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgAZAIvIGZyb20gc3RhdGUgZG9lcyBub3QgbWF0Y2ggb25lIGZyb20gZmxpZ2h0IGxvZz0JAKQDAQUFY3VySFADCQBnAgAABQVjdXJIUAkAAgECHllvdSBjYW4ndCBmbHkgd2l0aCB6ZXJvIGhlYWx0aAMJAGcCAAAFBW5ld0hQCQCUCgIJAM0IAgMJAQEhAQUMc2hvdWxkVXNlTWF0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgUHRVhQVVNETgULdXNkbkFzc2V0SWQFA25pbAUDbmlsCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoAAACAAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwUMc2hvdWxkVXNlTWF0BQVtTGlzdAUMRVhQTUFURVJJQUxTAgFfBAZiaWdOdW0JAQNhYnMBCQCeAwEFBHR4SWQEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQHbGFuZE51bQkApAMBBQdmcmVlTnVtBAxjb250aW5lbnRJZHgJAKADAQkAuwICBQZiaWdOdW0FBUZJVkVYBAh0ZXJyYWlucwkBC2dlblRlcnJhaW5zAgUGYmlnTnVtBQxjb250aW5lbnRJZHgECWNvbnRpbmVudAkAkQMCBQpjb250aW5lbnRzBQxjb250aW5lbnRJZHgEBWlzc3VlCQDCCAUJAQprZXlOZnROYW1lAgUHbGFuZE51bQIBUwkAuQkCCQDMCAIFB2xhbmROdW0JAMwIAgIBUwkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBAJpZAkA2AQBBQdhc3NldElkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUHZnJlZU51bQABCQDMCAIFBWlzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlMYW5kVG9Bc3NldElkAQUHbGFuZE51bQUCaWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFAmlkBQh1c2VyQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQh1c2VyQWRkcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleUluZnJhTGV2ZWxCeUFzc2V0SWQBBQJpZAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgUCaWQFCHVzZXJBZGRyAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkCQC5CQIJAMwIAgUJY29udGluZW50CQDMCAICAUwJAMwIAgUCaWQFA25pbAIBXwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoBQVuZXdIUAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgUGbmV3TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BQNuaWwFAmlkAQxhcHBseUJvbnVzZXMCC2xhbmRBc3NldElkBnBpZWNlcwQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAECWFydFBpZWNlcwkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAMJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBH2tleVByZXNhbGVBcnRBY3RpdmF0ZWRCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAcFBnBpZWNlcwAACQBkAgkAZAIFD0RBSUxZUkVTQllQSUVDRQkAawMFD0RBSUxZUkVTQllQSUVDRQUKaW5mcmFMZXZlbAAECQBrAwUPREFJTFlSRVNCWVBJRUNFCQBoAgUJYXJ0UGllY2VzAAMJAGgCBQZwaWVjZXMAFAEUY2hlY2tDbGFpbUNvbmRpdGlvbnMBBGFkZHIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAQLbGFuZEFzc2V0SWQJAJEDAgUDbG9jBQhsb2NJZHhJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICEFlvdXIgZHVjayBpcyBvbiAIBQVhc3NldARuYW1lAhUsIHdoaWNoIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDCBpcyBvcnBoYW5lZAMJAQIhPQIFBW93bmVyBQRhZGRyCQACAQkArAICBQpMQU5EUFJFRklYAg0gaXMgbm90IHlvdXJzBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwkAlgoEBQtkdWNrQXNzZXRJZAULbGFuZEFzc2V0SWQFAWQFCXNhdmVkVGltZQEQY2xhaW1SZXNJbnRlcm5hbAIEYWRkcgZhbW91bnQDCQBmAgAABQZhbW91bnQJAAIBAg9OZWdhdGl2ZSBhbW91bnQEAWMJARRjaGVja0NsYWltQ29uZGl0aW9ucwEFBGFkZHIECGxhbmRTaXplCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIIBQFjAl8zBQtyZWNUZXJyYWlucwQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAIBQFjAl80AwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQgFAWMCXzQCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUEFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAQxhcHBseUJvbnVzZXMCCAUBYwJfMgUGcGllY2VzBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UFBnBpZWNlcwUJREFZTUlMTElTAwkAZgIFBmFtb3VudAUIYXZhaWxSZXMJAAIBCQCsAgIJAKwCAgkArAICAiJOb3QgZW5vdWdoIHJlc291cmNlcywgYXZhaWxhYmxlID0gCQCkAwEFCGF2YWlsUmVzAg4sIHJlcXVlc3RlZCA9IAkApAMBBQZhbW91bnQEDG5ld0RlbHRhVGltZQkAawMJAGUCBQhhdmFpbFJlcwUGYW1vdW50BQlEQVlNSUxMSVMJAGgCBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBQZwaWVjZXMEDG5ld1RpbWVzdGFtcAkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQxuZXdEZWx0YVRpbWUEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBCAUBYwJfMQQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BApjdXJyZW50UmVzCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAVicFJlcwkBBmFkZFJlcwUFCmN1cnJlbnRSZXMFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQkAaQIFBnBpZWNlcwUFU1NJWkUFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UJAJUKAwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBCAUBYwJfMgUMbmV3VGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgIBQFjAl8yBQRhZGRyBQxuZXdUaW1lc3RhbXAFA25pbAUFYnBLZXkJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCBQVicFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAEIY2xhaW1BbGwDBGFkZHILbGFuZEFzc2V0SWQGcGllY2VzBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkBAlzYXZlZFRpbWUJAQV2YWx1ZQEJAJ8IAQUHdGltZUtleQQIYXZhaWxSZXMJAGgCCQBrAwkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUJAQxhcHBseUJvbnVzZXMCBQtsYW5kQXNzZXRJZAUGcGllY2VzBQlEQVlNSUxMSVMFBnBpZWNlcwkBEGNsYWltUmVzSW50ZXJuYWwCBQRhZGRyBQhhdmFpbFJlcwENdXBJbmZyYUNvbW1vbgMMc2hvdWxkVXNlTWF0BmNhbGxlcg1wYXltZW50QW1vdW50BARhZGRyCQClCAEFBmNhbGxlcgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAQUEYWRkcgQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUECGluZnJhS2V5CQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEIBQFjAl8yBAhjdXJMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQhpbmZyYUtleQAAAwkAZwIFCGN1ckxldmVsAAMJAAIBAiZDdXJyZW50bHkgbWF4IGluZnJhc3RydWN0dXJlIGxldmVsID0gMwQIbmV3TGV2ZWwJAGQCBQhjdXJMZXZlbAABBARjb3N0CQBrAwUVSW5mcmFVcGdyYWRlQ29zdFNVc2RuCQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUDAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEIBQFjAl8xBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwUMc2hvdWxkVXNlTWF0BQVtTGlzdAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzBQhuZXdMZXZlbAUFU1NJWkUCAV8EC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwDBQRhZGRyCAUBYwJfMgUGcGllY2VzCQCUCgIJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIaW5mcmFLZXkFCG5ld0xldmVsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAggFAWMCXzIFBGFkZHIFCG5ld0xldmVsCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIIBQtjbGFpbVJlc3VsdAJfMwUIYnBJZHhSZXMJAMwIAgUGbmV3TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BQNuaWwIBQtjbGFpbVJlc3VsdAJfMQUIbmV3TGV2ZWwBEmFjdGl2YXRlUHJlc2FsZUFydAEEYWRkcgQBYwkBFGNoZWNrQ2xhaW1Db25kaXRpb25zAQUEYWRkcgQLbGFuZEFzc2V0SWQIBQFjAl8yBA1hY3RpdmF0aW9uS2V5CQEfa2V5UHJlc2FsZUFydEFjdGl2YXRlZEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAwkBC3ZhbHVlT3JFbHNlAgkAoAgBBQ1hY3RpdmF0aW9uS2V5BwkAAgECJVByZXNhbGUgYXJ0aWZhY3QgaXMgYWxyZWFkeSBhY3RpdmF0ZWQDCQBmAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIIBQFjAl8zBQpyZWNMYW5kTnVtBQ9QUkVTQUxFTlVNTEFORFMJAAIBCQCsAgIJAKwCAgkArAICBQpMQU5EUFJFRklYAgEgBQtsYW5kQXNzZXRJZAIlIGlzIG5vdCBlbGlnaWJsZSBmb3IgcHJlc2FsZSBhcnRpZmFjdAQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCCAUBYwJfMwULcmVjTGFuZFNpemUEC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwDBQRhZGRyBQtsYW5kQXNzZXRJZAUGcGllY2VzCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAggFC2NsYWltUmVzdWx0Al8xCQEMQm9vbGVhbkVudHJ5AgUNYWN0aXZhdGlvbktleQYJAQxCb29sZWFuRW50cnkCCQEna2V5UHJlc2FsZUFydEFjdGl2YXRlZEJ5QXNzZXRJZEFuZE93bmVyAgULbGFuZEFzc2V0SWQFBGFkZHIGCQEMSW50ZWdlckVudHJ5AgkBIGtleUxhbmRBcnRTdGF0dXNCeVR5cGVBbmRBc3NldElkAgUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQFBnBpZWNlcwkBDEludGVnZXJFbnRyeQIJASVrZXlMYW5kQXJ0U3RhdHVzQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKQVJUUFJFU0FMRQULbGFuZEFzc2V0SWQFBGFkZHIFBnBpZWNlcwkBC1N0cmluZ0VudHJ5AggFC2NsYWltUmVzdWx0Al8yCQC5CQIIBQtjbGFpbVJlc3VsdAJfMwIBOgENbWVyZ2VJbnRlcm5hbAcLbmV3TGFuZFNpemUIbmV3TGV2ZWwHZm9ybXVsYQRhZGRyDGxhbmRBc3NldElkcwR0eElkB25lZWRNYXQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAoBCmNoZWNrTWVyZ2UCA2FjYwtsYW5kQXNzZXRJZAQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAljb250aW5lbnQJAJEDAgUBZAUMcmVjQ29udGluZW50AwMJAQIhPQIIBQNhY2MCXzMCAAkBAiE9AggFA2FjYwJfMwUJY29udGluZW50BwkAAgECLkxhbmRzIHNob3VsZCBiZSBvbiB0aGUgc2FtZSBjb250aW5lbnQgdG8gbWVyZ2UECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBAdzaXplc0luCAUDYWNjAl8xBAFpCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALMJAgUHc2l6ZXNJbgUIbGFuZFNpemUCJ1lvdSBoYXZlbid0IHBhc3NlZCBhbGwgdGhlIGxhbmRzIG5lZWRlZAQIc2l6ZXNPdXQJAKwCAgkArwICBQdzaXplc0luBQFpCQCwAgIFB3NpemVzSW4JAGQCBQFpAAEEBnBpZWNlcwkBD251bVBpZWNlc0J5U2l6ZQEFCGxhbmRTaXplBARhcnRzCQBkAggFA2FjYwJfMgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAMJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBH2tleVByZXNhbGVBcnRBY3RpdmF0ZWRCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAcFBnBpZWNlcwAABAppbmZyYUxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAQIcmVxTGV2ZWwEByRtYXRjaDAFCGxhbmRTaXplAwkAAAICAVMFByRtYXRjaDAAAwMJAAACAgFNBQckbWF0Y2gwAAQDCQAAAgIBTAUHJG1hdGNoMAAFAwkAAAICAlhMBQckbWF0Y2gwAAYJAAIBAhpPbmx5IFMsIE0sIEwsIFhMIGNhbiBtZXJnZQMJAQIhPQIFCmluZnJhTGV2ZWwFCHJlcUxldmVsCQACAQIiQWxsIGxhbmRzIHNob3VsZCBiZSBtYXhlZCB0byBtZXJnZQQHbGFuZE51bQkAkQMCBQFkBQpyZWNMYW5kTnVtBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQlzYXZlZFRpbWUDCQBmAgAABQlkZWx0YVRpbWUJAAIBCQCsAgIJAKwCAgkArAICAiZTYXZlZCB0aW1lc3RhbXAgaXMgaW4gZnV0dXJlLCBzYXZlZCA9IAkApAMBBQlzYXZlZFRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwIFC2xhbmRBc3NldElkBQZwaWVjZXMEBWJwUmVzCQEGYWRkUmVzBQkAtQkCCAUDYWNjAl80AgFfBQ10ZXJyYWluQ291bnRzBQlkZWx0YVRpbWUJAGkCBQZwaWVjZXMFBVNTSVpFBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBAVwcm9wcwkBGXVwZGF0ZVByb3BvcnRpb25zSW50ZXJuYWwECQC1CQIIBQNhY2MCXzYCAV8FDXRlcnJhaW5Db3VudHMJAGkCBQZwaWVjZXMFBVNTSVpFAP///////////wEJAJgKBgUIc2l6ZXNPdXQFBGFydHMFCWNvbnRpbmVudAUFYnBSZXMJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAggFA2FjYwJfNQkBC0RlbGV0ZUVudHJ5AQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBEGtleUxhbmRUb0Fzc2V0SWQBBQdsYW5kTnVtCQELRGVsZXRlRW50cnkBCQEKa2V5TmZ0TmFtZQIFB2xhbmROdW0FCGxhbmRTaXplCQELRGVsZXRlRW50cnkBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAQtEZWxldGVFbnRyeQEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQJAQtEZWxldGVFbnRyeQEJAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBH2tleVByZXNhbGVBcnRBY3RpdmF0ZWRCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBJ2tleVByZXNhbGVBcnRBY3RpdmF0ZWRCeUFzc2V0SWRBbmRPd25lcgIFC2xhbmRBc3NldElkBQRhZGRyCQELRGVsZXRlRW50cnkBCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAkBC0RlbGV0ZUVudHJ5AQkBJWtleUxhbmRBcnRTdGF0dXNCeVR5cGVBc3NldElkQW5kT3duZXIDBQpBUlRQUkVTQUxFBQtsYW5kQXNzZXRJZAUEYWRkcgkBC0RlbGV0ZUVudHJ5AQkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQkBBEJ1cm4CCQDZBAEFC2xhbmRBc3NldElkAAEFBXByb3BzBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQHcHJvcFN0cgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgswXzBfMF8wXzBfMAQBcgoAAiRsBQxsYW5kQXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCYCgYFB2Zvcm11bGEAAAIACQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwUDbmlsBQdwcm9wU3RyCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpjaGVja01lcmdlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA0CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQECWNvbnRpbmVudAgFAXICXzMEDGNvbnRpbmVudElkeAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCmNvbnRpbmVudHMFCWNvbnRpbmVudAkArAICAhNVbmtub3duIGNvbnRpbmVudDogBQljb250aW5lbnQECHRlcnJhaW5zCQELZ2VuVGVycmFpbnMCCQEDYWJzAQkAngMBBQR0eElkBQxjb250aW5lbnRJZHgEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQ9QUkVTQUxFTlVNTEFORFMAAQQKbmV3TGFuZE51bQkApAMBBQdmcmVlTnVtBAVpc3N1ZQkAwggFCQEKa2V5TmZ0TmFtZQIFCm5ld0xhbmROdW0FC25ld0xhbmRTaXplCQC5CQIJAMwIAgUKbmV3TGFuZE51bQkAzAgCBQtuZXdMYW5kU2l6ZQkAzAgCBQh0ZXJyYWlucwkAzAgCBQljb250aW5lbnQFA25pbAIBXwABAAAHBAdhc3NldElkCQC4CAEFBWlzc3VlBA5uZXdMYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwkAZgIFB25lZWRNYXQAAAkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAIBXwUHbmVlZE1hdAIBXwkAlAoCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIJAM0IAgkAzQgCCQDNCAIIBQFyAl81CQEMSW50ZWdlckVudHJ5AgkBEmtleU5leHRGcmVlTGFuZE51bQAJAGQCBQdmcmVlTnVtAAEFBWlzc3VlCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFCm5ld0xhbmROdW0FDm5ld0xhbmRBc3NldElkCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQUObmV3TGFuZEFzc2V0SWQFBGFkZHIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFCm5ld0xhbmROdW0FBGFkZHIJAQxJbnRlZ2VyRW50cnkCCQEga2V5TGFuZEFydFN0YXR1c0J5VHlwZUFuZEFzc2V0SWQCBQpBUlRQUkVTQUxFBQ5uZXdMYW5kQXNzZXRJZAgFAXICXzIJAQxJbnRlZ2VyRW50cnkCCQEla2V5TGFuZEFydFN0YXR1c0J5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkFSVFBSRVNBTEUFDm5ld0xhbmRBc3NldElkBQRhZGRyCAUBcgJfMgkBDEludGVnZXJFbnRyeQIJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQUObmV3TGFuZEFzc2V0SWQFCG5ld0xldmVsCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFDm5ld0xhbmRBc3NldElkBQRhZGRyBQhuZXdMZXZlbAkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIIBQFyAl80CQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAgFAXICXzYJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIFCWNvbnRpbmVudAkAzAgCAgFMCQDMCAIFDm5ld0xhbmRBc3NldElkBQNuaWwCAV8JAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGFkZHIAAQUHYXNzZXRJZAUObmV3TGFuZEFzc2V0SWQBA3MybQMEYWRkcgxsYW5kQXNzZXRJZHMEdHhJZAkBDW1lcmdlSW50ZXJuYWwHAgFNAAMCBFNTU1MFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAAAAQNtMmwFBGFkZHIMbGFuZEFzc2V0SWRzBHR4SWQMc2hvdWxkVXNlTWF0DXBheW1lbnRBbW91bnQEBGNvc3QJAGgCBRVJbmZyYVVwZ3JhZGVDb3N0U1VzZG4ABAMDCQEBIQEFDHNob3VsZFVzZU1hdAkBAiE9AgUNcGF5bWVudEFtb3VudAUEY29zdAcJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQRjb3N0CQENbWVyZ2VJbnRlcm5hbAcCAUwABAIDU01NBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwAEAQRsMnhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2RuAC8DAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgJYTAAFAgVTU1NNTAUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkCQBoAgURSW5mcmFVcGdyYWRlQ29zdFMALwEGeGwyeHhsBQRhZGRyDGxhbmRBc3NldElkcwR0eElkDHNob3VsZFVzZU1hdA1wYXltZW50QW1vdW50BARjb3N0CQBoAgUVSW5mcmFVcGdyYWRlQ29zdFNVc2RuADYDAwkBASEBBQxzaG91bGRVc2VNYXQJAQIhPQIFDXBheW1lbnRBbW91bnQFBGNvc3QHCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUEY29zdAkBDW1lcmdlSW50ZXJuYWwHAgNYWEwABgIDTFhMBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQJAGgCBRFJbmZyYVVwZ3JhZGVDb3N0UwA2AQttZXJnZUNvbW1vbgUMc2hvdWxkVXNlTWF0BGFkZHINcGF5bWVudEFtb3VudAxsYW5kQXNzZXRJZHMEdHhJZAQLbWVyZ2VSZXN1bHQEByRtYXRjaDAJAJADAQUMbGFuZEFzc2V0SWRzAwkAAAIABAUHJG1hdGNoMAkBA3MybQMFBGFkZHIFDGxhbmRBc3NldElkcwUEdHhJZAMJAAACAAMFByRtYXRjaDAJAQNtMmwFBQRhZGRyBQxsYW5kQXNzZXRJZHMFBHR4SWQFDHNob3VsZFVzZU1hdAUNcGF5bWVudEFtb3VudAMJAAACAAUFByRtYXRjaDAJAQRsMnhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQDCQAAAgACBQckbWF0Y2gwCQEGeGwyeHhsBQUEYWRkcgUMbGFuZEFzc2V0SWRzBQR0eElkBQxzaG91bGRVc2VNYXQFDXBheW1lbnRBbW91bnQJAAIBAg1Vbmtub3duIG1lcmdlBQttZXJnZVJlc3VsdBABaQEJc3Rha2VMYW5kAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AggFA3BtdAZhbW91bnQAAQkAAgEJAKwCAgkArAICAgRORlQgBQpMQU5EUFJFRklYAiQgdG9rZW4gc2hvdWxkIGJlIGF0dGFjaGVkIGFzIHBheW1lbnQEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQR0aGlzCQACAQIXVW5rbm93biBpc3N1ZXIgb2YgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpMQU5EUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKTEFORFBSRUZJWAIUIHRva2VucyBhcmUgYWNjZXB0ZWQEC2xhbmROdW1TaXplCQCwAgIIBQVhc3NldARuYW1lAAQEB2xhbmROdW0DCQEIY29udGFpbnMCBQtsYW5kTnVtU2l6ZQIDWFhMCQCzAgIFC2xhbmROdW1TaXplAAMDCQEIY29udGFpbnMCBQtsYW5kTnVtU2l6ZQICWEwJALMCAgULbGFuZE51bVNpemUAAgkAswICBQtsYW5kTnVtU2l6ZQABAwkBASEBCQEJaXNEZWZpbmVkAQkAtgkBBQdsYW5kTnVtCQACAQkArAICAh5DYW5ub3QgcGFyc2UgbGFuZCBudW1iZXIgZnJvbSAIBQVhc3NldARuYW1lBAtsYW5kQXNzZXRJZAkA2AQBBQdhc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQISIGlzIGFscmVhZHkgc3Rha2VkBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwQNdGVycmFpbkNvdW50cwkBDWNvdW50VGVycmFpbnMBCQCRAwIFAWQFC3JlY1RlcnJhaW5zBAVwcm9wcwkBEXVwZGF0ZVByb3BvcnRpb25zAwUNdGVycmFpbkNvdW50cwkAaQIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBQVTU0laRQABCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlMYW5kTnVtVG9Pd25lcgEFB2xhbmROdW0FB2FkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleVJlc1Byb3BvcnRpb25zAAUFcHJvcHMFA25pbAFpAQt1bnN0YWtlTGFuZAEObGFuZEFzc2V0SWRTdHIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAiR1bnN0YWtlIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMEBGFkZHIJAKUIAQgFAWkGY2FsbGVyBAFjCQEUY2hlY2tDbGFpbUNvbmRpdGlvbnMBBQRhZGRyBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAggFAWMCXzMFC3JlY1RlcnJhaW5zBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIIBQFjAl8zBQtyZWNMYW5kU2l6ZQQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMJAGkCBQZwaWVjZXMFBVNTSVpFAP///////////wEEC2NsYWltUmVzdWx0CQEIY2xhaW1BbGwDBQRhZGRyCAUBYwJfMgUGcGllY2VzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABCQDZBAEIBQFjAl8yCQDMCAIJAQtEZWxldGVFbnRyeQEJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQgFAWMCXzIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYCAUBYwJfMgUEYWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5UmVzUHJvcG9ydGlvbnMABQVwcm9wcwkAzAgCCQELU3RyaW5nRW50cnkCCAULY2xhaW1SZXN1bHQCXzIJALkJAggFC2NsYWltUmVzdWx0Al8zAgE6BQNuaWwBaQEJc3Rha2VEdWNrAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AggFA3BtdAZhbW91bnQAAQkAAgEJAKwCAgkArAICAgRORlQgBQpEVUNLUFJFRklYAiQgdG9rZW4gc2hvdWxkIGJlIGF0dGFjaGVkIGFzIHBheW1lbnQEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUNaW5jdWJhdG9yQWRkcgkBAiE9AggFBWFzc2V0Bmlzc3VlcgULYnJlZWRlckFkZHIHCQACAQkArAICCQCsAgICElVua25vd24gaXNzdWVyIG9mIAUKRFVDS1BSRUZJWAIGIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKRFVDS1BSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkRVQ0tQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAphc3NldElkU3RyCQDYBAEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUKYXNzZXRJZFN0cgMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAMJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAAIBCQCsAgICHVlvdSBhbHJlYWR5IHN0YWtlZCBvbmUgZHVjazogCAUFYXNzZXQEbmFtZQQGbG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQUKYXNzZXRJZFN0cgQIbG9jYXRpb24JAKIIAQUGbG9jS2V5BAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQUKYXNzZXRJZFN0cgQIYmFja3BhY2sJAKIIAQUFYnBLZXkJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUHdGltZUtleQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKRFVDS1BSRUZJWAkA2AQBBQdhc3NldElkBQdhZGRyZXNzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5RHVja0lkVG9Pd25lcgEFCmFzc2V0SWRTdHIFB2FkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwUKYXNzZXRJZFN0cgUDbmlsAwkBCWlzRGVmaW5lZAEFCGxvY2F0aW9uBQNuaWwJAM4IAgkAzAgCCQELU3RyaW5nRW50cnkCBQZsb2NLZXkFD0RFRkFVTFRMT0NBVElPTgUDbmlsAwkBCWlzRGVmaW5lZAEFCGJhY2twYWNrBQNuaWwJAM0IAgkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQIaMDowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoFA25pbAkBDEludGVnZXJFbnRyeQIJAQ1rZXlEdWNrSGVhbHRoAQUKYXNzZXRJZFN0cgBkAWkBC3Vuc3Rha2VEdWNrAQphc3NldElkU3RyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIkdW5zdGFrZSBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBAdhc3NldElkCQDZBAEFCmFzc2V0SWRTdHIEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEJANgEAQUHYXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkAwkBASEBCQEJaXNEZWZpbmVkAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgkArAICAglUaGUgZHVjayAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEJANgEAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUHYWRkcmVzcwkAAgECF1N0YWtlZCBORlQgaXMgbm90IHlvdXJzBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQUKYXNzZXRJZFN0cgQGaGVhbHRoCQCfCAEFCWtleUhlYWx0aAMJAQIhPQIFBmhlYWx0aABkCQACAQImUGxlYXNlIGhlYWwgeW91ciBkdWNrIGJlZm9yZSB1bnN0YWtpbmcJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQUHdGltZUtleQkAzAgCCQELRGVsZXRlRW50cnkBBQlrZXlIZWFsdGgJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBD2tleUR1Y2tMb2NhdGlvbgEFCmFzc2V0SWRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBEGtleUR1Y2tJZFRvT3duZXIBBQphc3NldElkU3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKRFVDS1BSRUZJWAUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELRGVsZXRlRW50cnkBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQNuaWwBaQEIY2xhaW1SZXMCBmFtb3VudA5sYW5kQXNzZXRJZFN0cgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECJWNsYWltUmVzIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMEBGFkZHIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyBAZyZXN1bHQJARBjbGFpbVJlc0ludGVybmFsAgUEYWRkcgUGYW1vdW50CQCUCgIJAM0IAggFBnJlc3VsdAJfMQkBC1N0cmluZ0VudHJ5AggFBnJlc3VsdAJfMgkAuQkCCAUGcmVzdWx0Al8zAgE6CQCRAwIIBQZyZXN1bHQCXzMFCGJwSWR4UmVzAWkBBmZsaWdodAIHbWVzc2FnZQNzaWcDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAiNmbGlnaHQgZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50cwQFcGFydHMJALUJAgkAsAkBBQdtZXNzYWdlAgE7BAJocAkAtQkCCQCRAwIJALUJAgkAkQMCBQVwYXJ0cwAAAgF8AAACAV8EBWN1ckhQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCaHAAAAQFbmV3SFAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJocAABBA1uZXdMb2NBbmRUaW1lCQC1CQIJAJEDAgUFcGFydHMAAQIBOgQLbmV3TG9jYXRpb24JAJEDAgUNbmV3TG9jQW5kVGltZQAABAR0aW1lCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUNbmV3TG9jQW5kVGltZQABAwMJAGYCBQR0aW1lCQBkAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFEUZJVkVNSU5VVEVTTUlMTElTBgkAZgIJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAURRklWRU1JTlVURVNNSUxMSVMFBHRpbWUJAAIBAhJzaWduYXR1cmUgb3V0ZGF0ZWQEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQkApQgBCAUBaQZjYWxsZXICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQMb2xkRnJvbVN0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aABkAwkBAiE9AgUMb2xkRnJvbVN0YXRlBQVjdXJIUAkAAgEJAKwCAgkArAICCQCsAgICCm9sZEhlYWx0aD0JAKQDAQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgAZAIvIGZyb20gc3RhdGUgZG9lcyBub3QgbWF0Y2ggb25lIGZyb20gZmxpZ2h0IGxvZz0JAKQDAQUFY3VySFADCQBnAgAABQVjdXJIUAkAAgECHllvdSBjYW4ndCBmbHkgd2l0aCB6ZXJvIGhlYWx0aAQGbG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQULZHVja0Fzc2V0SWQEC2N1ckxvY2F0aW9uCQELdmFsdWVPckVsc2UCCQCiCAEFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OAwkAAAIFC25ld0xvY2F0aW9uBQtjdXJMb2NhdGlvbgkAAgECIllvdSBjYW4ndCBmbHkgdG8gdGhlIHNhbWUgbG9jYXRpb24JAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQZsb2NLZXkDCQBmAgUFbmV3SFAAAAULbmV3TG9jYXRpb24FC2N1ckxvY2F0aW9uCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgFBW5ld0hQBQNuaWwFBHVuaXQBaQEJc2V0SGVhbHRoAgZoZWFsdGgLZHVja0Fzc2V0SWQDAwkAZgIAAAUGaGVhbHRoBgkAZgIFBmhlYWx0aABkCQACAQIaSFAgc2hvdWxkIGJlIHdpdGhpbiAwLi4xMDAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQFBmhlYWx0aAUDbmlsAWkBBGhlYWwCB21hdFR5cGUGYW1vdW50AwMJAGYCAAAFB21hdFR5cGUGCQBnAgUHbWF0VHlwZQUGTlVNUkVTCQACAQkArAICAhJVbmtub3duIG1hdGVyaWFsOiAJAKQDAQUHbWF0VHlwZQMJAGcCAAAFBmFtb3VudAkAAgEJAKwCAgIbQW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZSEgCQCkAwEFBmFtb3VudAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAlvbGRIZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoAGQDCQBnAgUJb2xkSGVhbHRoAGQJAAIBAhpIUCBzaG91bGQgYmUgPCAxMDAgdG8gaGVhbAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBA1jdXJyZW50QW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFbUxpc3QFB21hdFR5cGUEC2RlbHRhSGVhbHRoCQCXAwEJAMwIAgkAaQIFBmFtb3VudAUISEVBTENPU1QJAMwIAgkAZQIAZAUJb2xkSGVhbHRoBQNuaWwEC3NwZW5kQW1vdW50CQBoAgULZGVsdGFIZWFsdGgFCEhFQUxDT1NUAwkAZgIFC3NwZW5kQW1vdW50BQ1jdXJyZW50QW1vdW50CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICCVlvdSBuZWVkIAkApAMBBQtzcGVuZEFtb3VudAIEIG9mIAkAkQMCBQhtYXRUeXBlcwUHbWF0VHlwZQIkIHRvIGhlYWwsIGJ1dCB5b3UgYmFja3BhY2sgY29udGFpbnMgCQCkAwEFDWN1cnJlbnRBbW91bnQEBm5ld01hdAkBDHN1Yk9uZUluTGlzdAMFBW1MaXN0BQdtYXRUeXBlBQtzcGVuZEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoCQBkAgUJb2xkSGVhbHRoBQtkZWx0YUhlYWx0aAkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhSZXMJAMwIAgUGbmV3TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BQNuaWwBaQEOdXBkYXRlQmFja3BhY2sCC2R1Y2tBc3NldElkB25ld1BhY2sDCQECIT0CCAUBaQZjYWxsZXIFC2Vjb25vbXlBZGRyCQACAQIRcGVybWlzc2lvbiBkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAUHbmV3UGFjawUDbmlsBQduZXdQYWNrAWkBDWV4cGVkaXRpb25CdXkCB21lc3NhZ2UDc2lnAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZG5Bc3NldElkCQACAQIaQWxsb3dlZCBVU0ROIHBheW1lbnQgb25seSEDCQECIT0CCAUDcG10BmFtb3VudAUHRVhQVVNETgkAAgEJAKwCAgIbUGF5bWVudCBhdHRhY2hlZCBzaG91bGQgYmUgCQCkAwEFB0VYUFVTRE4EBnJlc3VsdAkBEGV4cGVkaXRpb25Db21tb24FBwgFAWkGY2FsbGVyCAUBaQ10cmFuc2FjdGlvbklkBQdtZXNzYWdlBQNzaWcDCQAAAggFBnJlc3VsdAJfMgIABQZyZXN1bHQJAJQKAgkAzQgCCAUGcmVzdWx0Al8xCQEOU2NyaXB0VHJhbnNmZXIDBQtlY29ub215QWRkcggFA3BtdAZhbW91bnQFC3VzZG5Bc3NldElkCAUGcmVzdWx0Al8yAWkBCmV4cGVkaXRpb24CB21lc3NhZ2UDc2lnAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQInZXhwZWRpdGlvbiBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzCQEQZXhwZWRpdGlvbkNvbW1vbgUGCAUBaQZjYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQFB21lc3NhZ2UFA3NpZwFpAQx1cGdyYWRlSW5mcmEBEmxhbmRBc3NldElkSWdub3JlZAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECM0luZnJhc3RydWN0dXJlIHVwZ3JhZGUgZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50cwkBDXVwSW5mcmFDb21tb24DBggFAWkGY2FsbGVyAAABaQEQdXBncmFkZUluZnJhVXNkbgESbGFuZEFzc2V0SWRJZ25vcmVkAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIcRXhhY3RseSBvbmUgcGF5bWVudCByZXF1aXJlZAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAADCQECIT0CCAUDcG10B2Fzc2V0SWQFC3VzZG5Bc3NldElkCQACAQIaQWxsb3dlZCBVU0ROIHBheW1lbnQgb25seSEEBnJlc3VsdAkBDXVwSW5mcmFDb21tb24DBwgFAWkGY2FsbGVyCAUDcG10BmFtb3VudAkAlAoCCQDNCAIIBQZyZXN1bHQCXzEJAQ5TY3JpcHRUcmFuc2ZlcgMFC2Vjb25vbXlBZGRyCAUDcG10BmFtb3VudAULdXNkbkFzc2V0SWQIBQZyZXN1bHQCXzIBaQEQYWN0aXZhdGVBcnRpZmFjdAEHYXJ0TmFtZQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECMEFydGlmYWN0IGFjdGl2YXRpb24gZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50cwQGcmVzdWx0BAckbWF0Y2gwBQdhcnROYW1lAwkAAAICB1BSRVNBTEUFByRtYXRjaDAJARJhY3RpdmF0ZVByZXNhbGVBcnQBCQClCAEIBQFpBmNhbGxlcgkAAgECEFVua25vd24gYXJ0aWZhY3QFBnJlc3VsdAFpAQptZXJnZUxhbmRzAQxsYW5kQXNzZXRJZHMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAipMYW5kcyBtZXJnaW5nIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMJAQttZXJnZUNvbW1vbgUGCQClCAEIBQFpBmNhbGxlcgAABQxsYW5kQXNzZXRJZHMIBQFpDXRyYW5zYWN0aW9uSWQBaQEObWVyZ2VMYW5kc1VzZG4BDGxhbmRBc3NldElkcwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECHEV4YWN0bHkgb25lIHBheW1lbnQgcmVxdWlyZWQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAAwkBAiE9AggFA3BtdAdhc3NldElkBQt1c2RuQXNzZXRJZAkAAgECGkFsbG93ZWQgVVNETiBwYXltZW50IG9ubHkhBAZyZXN1bHQJAQttZXJnZUNvbW1vbgUHCQClCAEIBQFpBmNhbGxlcggFA3BtdAZhbW91bnQFDGxhbmRBc3NldElkcwgFAWkNdHJhbnNhY3Rpb25JZAkAlAoCCQDNCAIIBQZyZXN1bHQCXzEJAQ5TY3JpcHRUcmFuc2ZlcgMFC2Vjb25vbXlBZGRyCAUDcG10BmFtb3VudAULdXNkbkFzc2V0SWQIBQZyZXN1bHQCXzIAitoKeg==", "height": 2408879, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: CSj2Lang9fny8wCZJy3ynqzQ5f1sJkfxXAFwqzFjQX6v Next: 9Sd9fKnJy22Q6qdjKALnRW5DMrLQZSXSp1rnJeVj6gbc Diff:
OldNewDifferences
5151
5252 let l = 6
5353
54-let m = 3456000
54+let m = 25
5555
56-let n = 86400000
56+let n = 100
5757
58-let o = 300000
58+let o = 225
5959
60-let p = 158549
60+let p = 400
6161
62-let q = {
62+let q = 625
63+
64+let r = 3456000
65+
66+let s = 86400000
67+
68+let t = 300000
69+
70+let u = 158549
71+
72+let v = {
6373 let c = a
6474 if (("W" == c))
6575 then 6307198406
6878 else throw("Unknown chain")
6979 }
7080
71-let r = {
81+let w = {
7282 let c = a
7383 if (("W" == c))
7484 then 40000000
7787 else throw("Unknown chain")
7888 }
7989
80-let s = {
90+let x = {
8191 let c = a
8292 if (("W" == c))
8393 then 157679960139
8696 else throw("Unknown chain")
8797 }
8898
89-let t = {
99+let y = {
90100 let c = a
91101 if (("W" == c))
92102 then 1000000000
95105 else throw("Unknown chain")
96106 }
97107
98-let u = 1000000
108+let z = 1000000
99109
100-let v = toBigInt(5)
110+let A = toBigInt(5)
101111
102-let w = toBigInt(20)
112+let B = toBigInt(20)
103113
104-let x = toBigInt((20 * 20))
114+let C = toBigInt((20 * 20))
105115
106-let y = toBigInt(((20 * 20) * 20))
116+let D = toBigInt(((20 * 20) * 20))
107117
108-let z = toBigInt((((20 * 20) * 20) * 20))
118+let E = toBigInt((((20 * 20) * 20) * 20))
109119
110-let A = toBigInt(((((20 * 20) * 20) * 20) * 20))
120+let F = toBigInt(((((20 * 20) * 20) * 20) * 20))
111121
112-let B = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
122+let G = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
113123
114-let C = ["Asia", "Europe", "Americas", "Oceania", "Africa"]
124+let H = ["Asia", "Europe", "Americas", "Oceania", "Africa"]
115125
116-let D = "PRESALE"
126+let I = "PRESALE"
117127
118-func E () = "nextLandNum"
128+let J = 500
129+
130+func K () = "nextLandNum"
119131
120132
121-func F (G) = ("landToAsset_" + G)
133+func L (M) = ("landToAsset_" + M)
122134
123135
124-func H (G,I) = ((i + G) + I)
136+func N (M,O) = ((i + M) + O)
125137
126138
127-func J (K) = ("nftOwner_" + K)
139+func P (Q) = ("nftOwner_" + Q)
128140
129141
130-func L (K) = ("duckOwner_" + K)
142+func R (Q) = ("duckOwner_" + Q)
131143
132144
133-func M (K) = ("stakedTime_" + K)
145+func S (Q) = ("stakedTime_" + Q)
134146
135147
136-func N (K) = ("infraLevel_" + K)
148+func T (Q) = ("infraLevel_" + Q)
137149
138150
139-func O (K,P) = ((("infraLevelByAssetIdAndOwner_" + K) + "_") + P)
151+func U (Q,V) = ((("infraLevelByAssetIdAndOwner_" + Q) + "_") + V)
140152
141153
142-func Q (K) = ("presaleArtActivated_" + K)
154+func W (Q) = ("presaleArtActivated_" + Q)
143155
144156
145-func R (K,P) = ((("presaleArtActivatedByAssetIdAndOwner_" + K) + "_") + P)
157+func X (Q,V) = ((("presaleArtActivatedByAssetIdAndOwner_" + Q) + "_") + V)
146158
147159
148-func S (T,K) = makeString(["landArtStatus", T, K], "_")
160+func Y (Z,Q) = makeString(["landArtStatus", Z, Q], "_")
149161
150162
151-func U (T,K,P) = makeString(["landArtStatusByTypeAssetIdAndOwner", T, K, P], "_")
163+func aa (Z,Q,V) = makeString(["landArtStatusByTypeAssetIdAndOwner", Z, Q, V], "_")
152164
153165
154-func V (P) = ("stakedDuckByOwner_" + P)
166+func ab (V) = ("stakedDuckByOwner_" + V)
155167
156168
157-func W (X,K,P) = ((((("stakedTimeByTypeAssetIdAndOwner_" + X) + "_") + K) + "_") + P)
169+func ac (ad,Q,V) = ((((("stakedTimeByTypeAssetIdAndOwner_" + ad) + "_") + Q) + "_") + V)
158170
159171
160-func Y (G) = ("landOwner_" + G)
172+func ae (M) = ("landOwner_" + M)
161173
162174
163-func Z (aa) = ("backPack_" + aa)
175+func af (ag) = ("backPack_" + ag)
164176
165177
166-func ab (aa) = ("duckLocation_" + aa)
178+func ah (ag) = ("duckLocation_" + ag)
167179
168180
169-func ac (aa) = ("duckHealth_" + aa)
181+func ai (ag) = ("duckHealth_" + ag)
170182
171183
172-func ad () = "resTypesProportions"
184+func aj () = "resTypesProportions"
173185
174186
175-let ae = 0
187+let ak = 0
176188
177-let af = 1
189+let al = 1
178190
179-let ag = 2
191+let am = 2
180192
181-let ah = 3
193+let an = 3
182194
183-let ai = 0
195+let ao = 0
184196
185-let aj = 1
197+let ap = 1
186198
187-let ak = 2
199+let aq = 2
188200
189-let al = 0
201+let ar = 0
190202
191-let am = 1
203+let as = 1
192204
193-let an = 2
205+let at = 2
194206
195-let ao = 3
207+let au = 3
196208
197-func ap (aq) = {
198- let c = aq
209+func av (aw) = {
210+ let c = aw
199211 if ($isInstanceOf(c, "String"))
200212 then {
201- let ar = c
202- ar
213+ let ax = c
214+ ax
203215 }
204216 else throw("fail to cast into String")
205217 }
206218
207219
208-func as (at) = {
209- let au = split(value(getString(ad())), "_")
210- if ((size(au) != l))
220+func ay (az) = {
221+ let aA = split(value(getString(aj())), "_")
222+ if ((size(aA) != l))
211223 then throw("Wrong proportions data")
212224 else {
213- let av = [parseIntValue(au[0]), parseIntValue(au[1]), parseIntValue(au[2]), parseIntValue(au[3]), parseIntValue(au[4]), parseIntValue(au[5])]
214- let aw = (((((av[0] + av[1]) + av[2]) + av[3]) + av[4]) + av[5])
215- if ((0 >= aw))
225+ let aB = [parseIntValue(aA[0]), parseIntValue(aA[1]), parseIntValue(aA[2]), parseIntValue(aA[3]), parseIntValue(aA[4]), parseIntValue(aA[5])]
226+ let aC = (((((aB[0] + aB[1]) + aB[2]) + aB[3]) + aB[4]) + aB[5])
227+ if ((0 >= aC))
216228 then throw("No lands staked")
217229 else {
218- let ax = fraction(at, u, aw)
219- func ay (az,aA) = (az :+ fraction(aA, ax, u))
230+ let aD = fraction(az, z, aC)
231+ func aE (aF,aG) = (aF :+ fraction(aG, aD, z))
220232
221- let aB = av
222- let aC = size(aB)
223- let aD = nil
224- func aE (aF,aG) = if ((aG >= aC))
225- then aF
226- else ay(aF, aB[aG])
233+ let aH = aB
234+ let aI = size(aH)
235+ let aJ = nil
236+ func aK (aL,aM) = if ((aM >= aI))
237+ then aL
238+ else aE(aL, aH[aM])
227239
228- func aH (aF,aG) = if ((aG >= aC))
229- then aF
240+ func aN (aL,aM) = if ((aM >= aI))
241+ then aL
230242 else throw("List size exceeds 6")
231243
232- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
244+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
233245 }
234246 }
235247 }
236248
237249
238-func aI (aJ,aK,aL) = {
239- let aM = as(aL)
240- func aN (az,aO) = {
241- let aP = (parseIntValue(aK[aO]) - aM[aO])
242- if ((0 > aP))
243- then throw(((((("Not enough material idx=" + toString(aO)) + ", you have ") + aK[aO]) + ", but need ") + toString(aM[aO])))
244- else (az :+ toString(aP))
250+func aO (aP,aQ,aR) = {
251+ let aS = ay(aR)
252+ func aT (aF,aU) = {
253+ let aV = (parseIntValue(aQ[aU]) - aS[aU])
254+ if ((0 > aV))
255+ then throw(((((("Not enough material idx=" + toString(aU)) + ", you have ") + aQ[aU]) + ", but need ") + toString(aS[aU])))
256+ else (aF :+ toString(aV))
245257 }
246258
247- if (aJ)
259+ if (aP)
248260 then {
249- let aB = [0, 1, 2, 3, 4, 5]
250- let aC = size(aB)
251- let aD = nil
252- func aE (aF,aG) = if ((aG >= aC))
253- then aF
254- else aN(aF, aB[aG])
261+ let aH = [0, 1, 2, 3, 4, 5]
262+ let aI = size(aH)
263+ let aJ = nil
264+ func aK (aL,aM) = if ((aM >= aI))
265+ then aL
266+ else aT(aL, aH[aM])
255267
256- func aH (aF,aG) = if ((aG >= aC))
257- then aF
268+ func aN (aL,aM) = if ((aM >= aI))
269+ then aL
258270 else throw("List size exceeds 6")
259271
260- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
272+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
261273 }
262- else aK
274+ else aQ
263275 }
264276
265277
266-func aQ (aR,aS,aT,aU) = if ((size(aR) != l))
278+func aW (aX,aY,aZ,ba) = if ((size(aX) != l))
267279 then throw("Wrong proportions data")
268280 else {
269- func aV (az,aW) = {
270- let aP = (parseIntValue(aR[aW]) + ((aU * aS[aW]) * aT))
271- if ((0 > aP))
272- then throw(((((((("Panic! Pieces of type=" + toString(aW)) + ", sign=") + toString(aU)) + ", terrainCounts[i]=") + toString(aS[aW])) + ", landSizeIndex=") + toString(aT)))
273- else (az :+ toString(aP))
281+ func bb (aF,bc) = {
282+ let aV = (parseIntValue(aX[bc]) + ((ba * aY[bc]) * aZ))
283+ if ((0 > aV))
284+ then throw(((((((("Panic! Pieces of type=" + toString(bc)) + ", sign=") + toString(ba)) + ", terrainCounts[i]=") + toString(aY[bc])) + ", landSizeIndex=") + toString(aZ)))
285+ else (aF :+ toString(aV))
274286 }
275287
276- let av = {
277- let aB = [0, 1, 2, 3, 4, 5]
278- let aC = size(aB)
279- let aD = nil
280- func aE (aF,aG) = if ((aG >= aC))
281- then aF
282- else aV(aF, aB[aG])
288+ let aB = {
289+ let aH = [0, 1, 2, 3, 4, 5]
290+ let aI = size(aH)
291+ let aJ = nil
292+ func aK (aL,aM) = if ((aM >= aI))
293+ then aL
294+ else bb(aL, aH[aM])
283295
284- func aH (aF,aG) = if ((aG >= aC))
285- then aF
296+ func aN (aL,aM) = if ((aM >= aI))
297+ then aL
286298 else throw("List size exceeds 6")
287299
288- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
300+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
289301 }
290- makeString(av, "_")
302+ makeString(aB, "_")
291303 }
292304
293305
294-func aX (aS,aT,aU) = {
295- let aR = split(valueOrElse(getString(ad()), "0_0_0_0_0_0"), "_")
296- aQ(aR, aS, aT, aU)
306+func bd (aY,aZ,ba) = {
307+ let aX = split(valueOrElse(getString(aj()), "0_0_0_0_0_0"), "_")
308+ aW(aX, aY, aZ, ba)
297309 }
298310
299311
300-func aY (aZ) = [(size(split(aZ, "A")) - 1), (size(split(aZ, "B")) - 1), (size(split(aZ, "C")) - 1), (size(split(aZ, "D")) - 1), (size(split(aZ, "E")) - 1), (size(split(aZ, "F")) - 1)]
312+func be (bf) = [(size(split(bf, "A")) - 1), (size(split(bf, "B")) - 1), (size(split(bf, "C")) - 1), (size(split(bf, "D")) - 1), (size(split(bf, "E")) - 1), (size(split(bf, "F")) - 1)]
301313
302314
303-func ba (I) = {
304- let c = I
315+func bg (O) = {
316+ let c = O
305317 if (("S" == c))
306- then 25
318+ then m
307319 else if (("M" == c))
308- then 100
320+ then n
309321 else if (("L" == c))
310- then 225
322+ then o
311323 else if (("XL" == c))
312- then 400
324+ then p
313325 else if (("XXL" == c))
314- then 625
326+ then q
315327 else throw("Unknown land size")
316328 }
317329
318330
319-func bb (bc,aO,bd) = {
320- func be (az,aW) = (az :+ (if ((aW == aO))
321- then toString((parseIntValue(bc[aW]) - bd))
322- else bc[aW]))
331+func bh (bi,aU,bj) = {
332+ func bk (aF,bc) = (aF :+ (if ((bc == aU))
333+ then toString((parseIntValue(bi[bc]) - bj))
334+ else bi[bc]))
323335
324- let av = {
325- let aB = [0, 1, 2, 3, 4, 5]
326- let aC = size(aB)
327- let aD = nil
328- func aE (aF,aG) = if ((aG >= aC))
329- then aF
330- else be(aF, aB[aG])
336+ let aB = {
337+ let aH = [0, 1, 2, 3, 4, 5]
338+ let aI = size(aH)
339+ let aJ = nil
340+ func aK (aL,aM) = if ((aM >= aI))
341+ then aL
342+ else bk(aL, aH[aM])
331343
332- func aH (aF,aG) = if ((aG >= aC))
333- then aF
344+ func aN (aL,aM) = if ((aM >= aI))
345+ then aL
334346 else throw("List size exceeds 6")
335347
336- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
348+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
337349 }
338- makeString(av, "_")
350+ makeString(aB, "_")
339351 }
340352
341353
342-func bf (bg,aS,bh,aT,bi) = {
343- func bj (az,aW) = {
344- let bk = ((fraction(bh, bi, n) * aS[aW]) * aT)
345- (az :+ toString((parseIntValue(bg[aW]) + bk)))
354+func bl (bm,aY,bn,aZ,bo) = {
355+ func bp (aF,bc) = {
356+ let bq = ((fraction(bn, bo, s) * aY[bc]) * aZ)
357+ (aF :+ toString((parseIntValue(bm[bc]) + bq)))
346358 }
347359
348- let av = {
349- let aB = [0, 1, 2, 3, 4, 5]
350- let aC = size(aB)
351- let aD = nil
352- func aE (aF,aG) = if ((aG >= aC))
353- then aF
354- else bj(aF, aB[aG])
360+ let aB = {
361+ let aH = [0, 1, 2, 3, 4, 5]
362+ let aI = size(aH)
363+ let aJ = nil
364+ func aK (aL,aM) = if ((aM >= aI))
365+ then aL
366+ else bp(aL, aH[aM])
355367
356- func aH (aF,aG) = if ((aG >= aC))
357- then aF
368+ func aN (aL,aM) = if ((aM >= aI))
369+ then aL
358370 else throw("List size exceeds 6")
359371
360- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
372+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
361373 }
362- makeString(av, "_")
374+ makeString(aB, "_")
363375 }
364376
365377
366-func bl (bm) = if ((bm >= toBigInt(0)))
367- then bm
368- else -(bm)
378+func br (bs) = if ((bs >= toBigInt(0)))
379+ then bs
380+ else -(bs)
369381
370382
371-let bn = [[1, 4, 9, 10, 15], [5, 8, 13, 14, 15], [6, 9, 14, 15, 16], [4, 7, 8, 13, 18], [1, 6, 7, 15, 19]]
383+let bt = [[1, 4, 9, 10, 15], [5, 8, 13, 14, 15], [6, 9, 14, 15, 16], [4, 7, 8, 13, 18], [1, 6, 7, 15, 19]]
372384
373-func bo (bp,bq) = {
374- let br = toInt((bp % w))
375- let bs = if ((bq[0] > br))
385+func bu (bv,bw) = {
386+ let bx = toInt((bv % B))
387+ let by = if ((bw[0] > bx))
376388 then "A"
377- else if ((bq[1] > br))
389+ else if ((bw[1] > bx))
378390 then "B"
379- else if ((bq[2] > br))
391+ else if ((bw[2] > bx))
380392 then "C"
381- else if ((bq[3] > br))
393+ else if ((bw[3] > bx))
382394 then "D"
383- else if ((bq[4] > br))
395+ else if ((bw[4] > bx))
384396 then "E"
385397 else "F"
386- bs
398+ by
387399 }
388400
389401
390-func bt (bu,bv) = {
391- let bw = bn[bv]
392- func bx (az,aA) = $Tuple2((((((az._1 + bo(az._2, bw)) + bo((az._2 / w), bw)) + bo((az._2 / x), bw)) + bo((az._2 / y), bw)) + bo((az._2 / z), bw)), (az._2 / A))
402+func bz (bA,bB) = {
403+ let bC = bt[bB]
404+ func bD (aF,aG) = $Tuple2((((((aF._1 + bu(aF._2, bC)) + bu((aF._2 / B), bC)) + bu((aF._2 / C), bC)) + bu((aF._2 / D), bC)) + bu((aF._2 / E), bC)), (aF._2 / F))
393405
394- let by = {
395- let aB = [1, 2, 3, 4, 5]
396- let aC = size(aB)
397- let aD = $Tuple2("", (bu / v))
398- func aE (aF,aG) = if ((aG >= aC))
399- then aF
400- else bx(aF, aB[aG])
406+ let bE = {
407+ let aH = [1, 2, 3, 4, 5]
408+ let aI = size(aH)
409+ let aJ = $Tuple2("", (bA / A))
410+ func aK (aL,aM) = if ((aM >= aI))
411+ then aL
412+ else bD(aL, aH[aM])
401413
402- func aH (aF,aG) = if ((aG >= aC))
403- then aF
414+ func aN (aL,aM) = if ((aM >= aI))
415+ then aL
404416 else throw("List size exceeds 5")
405417
406- aH(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5)
418+ aN(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5)
407419 }
408- by._1
420+ bE._1
409421 }
410422
411423
412-func bz (bA) = {
413- let bB = split(valueOrElse(getString(bA), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
414-[toString(valueOrElse(parseInt(bB[al]), 0)), if ((size(split(bB[am], "_")) == l))
415- then bB[am]
416- else "0_0_0_0_0_0", if ((size(split(bB[an], "_")) == l))
417- then bB[an]
418- else "0_0_0_0_0_0", bB[ao]]
424+func bF (bG) = {
425+ let bH = split(valueOrElse(getString(bG), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
426+[toString(valueOrElse(parseInt(bH[ar]), 0)), if ((size(split(bH[as], "_")) == l))
427+ then bH[as]
428+ else "0_0_0_0_0_0", if ((size(split(bH[at], "_")) == l))
429+ then bH[at]
430+ else "0_0_0_0_0_0", bH[au]]
419431 }
420432
421433
422-func bC (aJ,bD,bE,bF,bG) = if (!(sigVerify_8Kb(bF, bG, g)))
434+func bI (aP,bJ,bK,bL,bM) = if (!(sigVerify_8Kb(bL, bM, g)))
423435 then throw("signature does not match")
424436 else {
425- let bH = split(toUtf8String(bF), ";")
426- let bI = split(split(bH[0], "|")[0], "_")
427- let bJ = parseIntValue(bI[0])
428- let bK = parseIntValue(bI[1])
429- let bL = split(bH[1], ":")
430- let bM = split(bL[0], "_")
431- if ((bM[1] != "E"))
437+ let bN = split(toUtf8String(bL), ";")
438+ let bO = split(split(bN[0], "|")[0], "_")
439+ let bP = parseIntValue(bO[0])
440+ let bQ = parseIntValue(bO[1])
441+ let bR = split(bN[1], ":")
442+ let bS = split(bR[0], "_")
443+ if ((bS[1] != "E"))
432444 then throw("expedition target location type should be E")
433445 else {
434- let bN = parseIntValue(bL[1])
435- if (if ((bN > (lastBlock.timestamp + o)))
446+ let bT = parseIntValue(bR[1])
447+ if (if ((bT > (lastBlock.timestamp + t)))
436448 then true
437- else ((lastBlock.timestamp - o) > bN))
449+ else ((lastBlock.timestamp - t) > bT))
438450 then throw("signature outdated")
439451 else {
440- let bO = toString(bD)
441- let aa = valueOrErrorMessage(getString(V(bO)), "You don't have a duck staked")
442- let bP = ac(aa)
443- let bQ = valueOrElse(getInteger(bP), 100)
444- if ((bQ != bJ))
445- then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bP), 100))) + " from state does not match one from flight log=") + toString(bJ)))
446- else if ((0 >= bJ))
452+ let bU = toString(bJ)
453+ let ag = valueOrErrorMessage(getString(ab(bU)), "You don't have a duck staked")
454+ let bV = ai(ag)
455+ let bW = valueOrElse(getInteger(bV), 100)
456+ if ((bW != bP))
457+ then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bV), 100))) + " from state does not match one from flight log=") + toString(bP)))
458+ else if ((0 >= bP))
447459 then throw("You can't fly with zero health")
448- else if ((0 >= bK))
449- then $Tuple2(((if (!(aJ))
450- then [ScriptTransfer(bD, t, b)]
451- else nil) :+ IntegerEntry(bP, 0)), "")
460+ else if ((0 >= bQ))
461+ then $Tuple2(((if (!(aP))
462+ then [ScriptTransfer(bJ, y, b)]
463+ else nil) :+ IntegerEntry(bV, 0)), "")
452464 else {
453- let bA = Z(aa)
454- let bR = bz(bA)
455- let bS = split(bR[an], "_")
456- let bT = makeString(aI(aJ, bS, s), "_")
457- let bU = bl(toBigInt(bE))
458- let bV = valueOrElse(getInteger(E()), 501)
459- let G = toString(bV)
460- let bv = toInt((bU % v))
461- let aZ = bt(bU, bv)
462- let bW = C[bv]
463- let bX = Issue(H(G, "S"), makeString([G, "S", aZ, bW], "_"), 1, 0, false)
464- let K = calculateAssetId(bX)
465- let bY = toBase58String(K)
466- $Tuple2([IntegerEntry(E(), (bV + 1)), bX, StringEntry(F(G), bY), StringEntry(J(bY), bO), StringEntry(Y(G), bO), IntegerEntry(N(bY), 0), IntegerEntry(O(bY, bO), 0), ScriptTransfer(bD, 1, K), StringEntry(ab(aa), makeString([bW, "L", bY], "_")), IntegerEntry(bP, bK), StringEntry(bA, makeString([bR[al], bR[am], bT, bR[ao]], ":"))], bY)
465+ let bG = af(ag)
466+ let bX = bF(bG)
467+ let bY = split(bX[at], "_")
468+ let bZ = makeString(aO(aP, bY, x), "_")
469+ let ca = br(toBigInt(bK))
470+ let cb = valueOrElse(getInteger(K()), (J + 1))
471+ let M = toString(cb)
472+ let bB = toInt((ca % A))
473+ let bf = bz(ca, bB)
474+ let cc = H[bB]
475+ let cd = Issue(N(M, "S"), makeString([M, "S", bf, cc], "_"), 1, 0, false)
476+ let Q = calculateAssetId(cd)
477+ let ce = toBase58String(Q)
478+ $Tuple2([IntegerEntry(K(), (cb + 1)), cd, StringEntry(L(M), ce), StringEntry(P(ce), bU), StringEntry(ae(M), bU), IntegerEntry(T(ce), 0), IntegerEntry(U(ce, bU), 0), ScriptTransfer(bJ, 1, Q), StringEntry(ah(ag), makeString([cc, "L", ce], "_")), IntegerEntry(bV, bQ), StringEntry(bG, makeString([bX[ar], bX[as], bZ, bX[au]], ":"))], ce)
467479 }
468480 }
469481 }
470482 }
471483
472484
473-func bZ (ca,cb) = {
474- let cc = valueOrElse(getInteger(N(ca)), 0)
475- let cd = valueOrElse(getInteger(S(D, ca)), if (valueOrElse(getBoolean(Q(ca)), false))
476- then cb
485+func cf (cg,ch) = {
486+ let ci = valueOrElse(getInteger(T(cg)), 0)
487+ let cj = valueOrElse(getInteger(Y(I, cg)), if (valueOrElse(getBoolean(W(cg)), false))
488+ then ch
477489 else 0)
478- ((m + fraction(m, cc, 4)) + fraction(m, (cd * 3), (cb * 20)))
490+ ((r + fraction(r, ci, 4)) + fraction(r, (cj * 3), (ch * 20)))
479491 }
480492
481493
482-func ce (cf) = {
483- let aa = valueOrErrorMessage(getString(V(cf)), "You don't have a duck staked")
484- let cg = valueOrElse(getString(ab(aa)), k)
485- let ch = split(value(cg), "_")
486- if ((ch[aj] != "L"))
487- then throw((("Duck location type is " + ch[aj]) + ", but should be L"))
494+func ck (cl) = {
495+ let ag = valueOrErrorMessage(getString(ab(cl)), "You don't have a duck staked")
496+ let cm = valueOrElse(getString(ah(ag)), k)
497+ let cn = split(value(cm), "_")
498+ if ((cn[ap] != "L"))
499+ then throw((("Duck location type is " + cn[ap]) + ", but should be L"))
488500 else {
489- let ca = ch[ak]
490- let ci = value(assetInfo(fromBase58String(ca)))
491- let cj = M(ca)
492- let ck = valueOrErrorMessage(getInteger(cj), (("NFT " + ci.name) + " is not staked"))
493- let cl = valueOrErrorMessage(getString(J(ca)), (("NFT " + ci.name) + " is orphaned"))
494- if ((cl != cf))
501+ let cg = cn[aq]
502+ let co = value(assetInfo(fromBase58String(cg)))
503+ let cp = S(cg)
504+ let cq = valueOrErrorMessage(getInteger(cp), (("Your duck is on " + co.name) + ", which is not staked"))
505+ let cr = valueOrErrorMessage(getString(P(cg)), (("NFT " + co.name) + " is orphaned"))
506+ if ((cr != cl))
495507 then throw((i + " is not yours"))
496508 else {
497- let cm = split(ci.description, "_")
498- $Tuple4(aa, ca, cm, ck)
509+ let cs = split(co.description, "_")
510+ $Tuple4(ag, cg, cs, cq)
499511 }
500512 }
501513 }
502514
503515
504-func cn (cf,bd) = {
505- let co = ce(cf)
506- let I = co._3[af]
507- let aS = aY(co._3[ag])
508- let bh = (lastBlock.timestamp - co._4)
509- if ((0 > bh))
510- then throw(((("Saved timestamp is in future, saved = " + toString(co._4)) + ", current = ") + toString(lastBlock.timestamp)))
516+func ct (cl,bj) = if ((0 > bj))
517+ then throw("Negative amount")
518+ else {
519+ let cu = ck(cl)
520+ let O = cu._3[al]
521+ let aY = be(cu._3[am])
522+ let bn = (lastBlock.timestamp - cu._4)
523+ if ((0 > bn))
524+ then throw(((("Saved timestamp is in future, saved = " + toString(cu._4)) + ", current = ") + toString(lastBlock.timestamp)))
525+ else {
526+ let ch = bg(O)
527+ let cv = cf(cu._2, ch)
528+ let cw = fraction(bn, (cv * ch), s)
529+ if ((bj > cw))
530+ then throw(((("Not enough resources, available = " + toString(cw)) + ", requested = ") + toString(bj)))
531+ else {
532+ let cx = fraction((cw - bj), s, (cv * ch))
533+ let cy = (lastBlock.timestamp - cx)
534+ let bG = af(cu._1)
535+ let bX = bF(bG)
536+ let bm = split(bX[as], "_")
537+ let cz = bl(bm, aY, (bn - cx), (ch / m), cv)
538+ $Tuple3([IntegerEntry(S(cu._2), cy), IntegerEntry(ac(i, cu._2, cl), cy)], bG, [bX[ar], cz, bX[at], bX[au]])
539+ }
540+ }
541+ }
542+
543+
544+func cA (cl,cg,ch) = {
545+ let cp = S(cg)
546+ let cq = value(getInteger(cp))
547+ let cw = (fraction((lastBlock.timestamp - cq), cf(cg, ch), s) * ch)
548+ ct(cl, cw)
549+ }
550+
551+
552+func cB (aP,bJ,cC) = {
553+ let cl = toString(bJ)
554+ let cu = ck(cl)
555+ let ch = bg(cu._3[al])
556+ let cD = T(cu._2)
557+ let cE = valueOrElse(getInteger(cD), 0)
558+ if ((cE >= 3))
559+ then throw("Currently max infrastructure level = 3")
511560 else {
512- let cb = ba(I)
513- let cp = bZ(co._2, cb)
514- let cq = fraction(bh, (cp * cb), n)
515- if ((bd > cq))
516- then throw(((("Not enough resources, available = " + toString(cq)) + ", requested = ") + toString(bd)))
561+ let cF = (cE + 1)
562+ let cG = fraction(w, (ch * cF), m)
563+ if (if (!(aP))
564+ then (cC != cG)
565+ else false)
566+ then throw(("Payment attached should be " + toString(cG)))
517567 else {
518- let cr = fraction((cq - bd), n, (cp * cb))
519- let cs = (lastBlock.timestamp - cr)
520- let bA = Z(co._1)
521- let bR = bz(bA)
522- let bg = split(bR[am], "_")
523- let ct = bf(bg, aS, (bh - cr), (cb / 25), cp)
524- $Tuple3([IntegerEntry(M(co._2), cs), IntegerEntry(W(i, co._2, cf), cs)], bA, [bR[al], ct, bR[an], bR[ao]])
568+ let bG = af(cu._1)
569+ let bX = bF(bG)
570+ let bY = split(bX[at], "_")
571+ let bZ = makeString(aO(aP, bY, fraction(v, (ch * cF), m)), "_")
572+ let cH = cA(cl, cu._2, ch)
573+ $Tuple2(([IntegerEntry(cD, cF), IntegerEntry(U(cu._2, cl), cF), StringEntry(bG, makeString([bX[ar], cH._3[as], bZ, bX[au]], ":"))] ++ cH._1), cF)
525574 }
526575 }
527576 }
528577
529578
530-func cu (cf,ca,cb) = {
531- let cj = M(ca)
532- let ck = value(getInteger(cj))
533- let cq = (fraction((lastBlock.timestamp - ck), bZ(ca, cb), n) * cb)
534- cn(cf, cq)
535- }
536-
537-
538-func cv (aJ,bD,cw) = {
539- let cf = toString(bD)
540- let co = ce(cf)
541- let cb = ba(co._3[af])
542- let cx = N(co._2)
543- let cy = valueOrElse(getInteger(cx), 0)
544- if ((cy >= 3))
545- then throw("Currently max infrastructure level = 3")
546- else {
547- let cz = (cy + 1)
548- let cA = fraction(r, (cb * cz), 25)
549- if (if (!(aJ))
550- then (cw != cA)
551- else false)
552- then throw(("Payment attached should be " + toString(cA)))
553- else {
554- let bA = Z(co._1)
555- let bR = bz(bA)
556- let bS = split(bR[an], "_")
557- let bT = makeString(aI(aJ, bS, fraction(q, (cb * cz), 25)), "_")
558- let cB = cu(cf, co._2, cb)
559- $Tuple2(([IntegerEntry(cx, cz), IntegerEntry(O(co._2, cf), cz), StringEntry(bA, makeString([bR[al], cB._3[am], bT, bR[ao]], ":"))] ++ cB._1), cz)
560- }
561- }
562- }
563-
564-
565-func cC (cf) = {
566- let co = ce(cf)
567- let ca = co._2
568- let cD = Q(ca)
569- if (valueOrElse(getBoolean(cD), false))
579+func cI (cl) = {
580+ let cu = ck(cl)
581+ let cg = cu._2
582+ let cJ = W(cg)
583+ if (valueOrElse(getBoolean(cJ), false))
570584 then throw("Presale artifact is already activated")
571- else if ((parseIntValue(co._3[ae]) > 500))
572- then throw((((i + " ") + ca) + " is not eligible for presale artifact"))
585+ else if ((parseIntValue(cu._3[ak]) > J))
586+ then throw((((i + " ") + cg) + " is not eligible for presale artifact"))
573587 else {
574- let cb = ba(co._3[af])
575- let cB = cu(cf, ca, cb)
576- (((((cB._1 :+ BooleanEntry(cD, true)) :+ BooleanEntry(R(ca, cf), true)) :+ IntegerEntry(S(D, ca), cb)) :+ IntegerEntry(U(D, ca, cf), cb)) :+ StringEntry(cB._2, makeString(cB._3, ":")))
588+ let ch = bg(cu._3[al])
589+ let cH = cA(cl, cg, ch)
590+ (((((cH._1 :+ BooleanEntry(cJ, true)) :+ BooleanEntry(X(cg, cl), true)) :+ IntegerEntry(Y(I, cg), ch)) :+ IntegerEntry(aa(I, cg, cl), ch)) :+ StringEntry(cH._2, makeString(cH._3, ":")))
577591 }
578592 }
579593
580594
581-func cE (cF,cz,cG,cf,cH,bE,cI) = {
582- let aa = valueOrErrorMessage(getString(V(cf)), "You don't have a duck staked")
583- func cJ (az,ca) = {
584- let ci = value(assetInfo(fromBase58String(ca)))
585- let cj = M(ca)
586- let ck = valueOrErrorMessage(getInteger(cj), (("NFT " + ci.name) + " is not staked"))
587- let cl = valueOrErrorMessage(getString(J(ca)), (("NFT " + ci.name) + " is orphaned"))
588- if ((cl != cf))
595+func cK (cL,cF,cM,cl,cN,bK,cO) = {
596+ let ag = valueOrErrorMessage(getString(ab(cl)), "You don't have a duck staked")
597+ func cP (aF,cg) = {
598+ let co = value(assetInfo(fromBase58String(cg)))
599+ let cp = S(cg)
600+ let cq = valueOrErrorMessage(getInteger(cp), (("NFT " + co.name) + " is not staked"))
601+ let cr = valueOrErrorMessage(getString(P(cg)), (("NFT " + co.name) + " is orphaned"))
602+ if ((cr != cl))
589603 then throw((i + " is not yours"))
590604 else {
591- let cm = split(ci.description, "_")
592- let bW = cm[ah]
593- if (if ((az._3 != ""))
594- then (az._3 != bW)
605+ let cs = split(co.description, "_")
606+ let cc = cs[an]
607+ if (if ((aF._3 != ""))
608+ then (aF._3 != cc)
595609 else false)
596610 then throw("Lands should be on the same continent to merge")
597611 else {
598- let I = cm[af]
599- let cK = az._1
600- let aW = valueOrErrorMessage(indexOf(cK, I), "You haven't passed all the lands needed")
601- let cL = (take(cK, aW) + drop(cK, (aW + 1)))
602- let cb = ba(I)
603- let cM = (az._2 + valueOrElse(getInteger(S(D, ca)), if (valueOrElse(getBoolean(Q(ca)), false))
604- then cb
612+ let O = cs[al]
613+ let cQ = aF._1
614+ let bc = valueOrErrorMessage(indexOf(cQ, O), "You haven't passed all the lands needed")
615+ let cR = (take(cQ, bc) + drop(cQ, (bc + 1)))
616+ let ch = bg(O)
617+ let cS = (aF._2 + valueOrElse(getInteger(Y(I, cg)), if (valueOrElse(getBoolean(W(cg)), false))
618+ then ch
605619 else 0))
606- let cc = valueOrElse(getInteger(N(ca)), 0)
607- let cN = {
608- let c = I
620+ let ci = valueOrElse(getInteger(T(cg)), 0)
621+ let cT = {
622+ let c = O
609623 if (("S" == c))
610624 then 3
611625 else if (("M" == c))
616630 then 6
617631 else throw("Only S, M, L, XL can merge")
618632 }
619- if ((cc != cN))
633+ if ((ci != cT))
620634 then throw("All lands should be maxed to merge")
621635 else {
622- let G = cm[ae]
623- let aS = aY(cm[ag])
624- let bh = (lastBlock.timestamp - ck)
625- if ((0 > bh))
626- then throw(((("Saved timestamp is in future, saved = " + toString(ck)) + ", current = ") + toString(lastBlock.timestamp)))
636+ let M = cs[ak]
637+ let aY = be(cs[am])
638+ let bn = (lastBlock.timestamp - cq)
639+ if ((0 > bn))
640+ then throw(((("Saved timestamp is in future, saved = " + toString(cq)) + ", current = ") + toString(lastBlock.timestamp)))
627641 else {
628- let cp = bZ(ca, cb)
629- let ct = bf(split(az._4, "_"), aS, bh, (cb / 25), cp)
630- let au = aQ(split(az._6, "_"), aS, (cb / 25), -1)
631- $Tuple6(cL, cM, bW, ct, (((((((((((((az._5 :+ DeleteEntry(M(ca))) :+ DeleteEntry(W(i, ca, cf))) :+ DeleteEntry(F(G))) :+ DeleteEntry(H(G, I))) :+ DeleteEntry(J(ca))) :+ DeleteEntry(N(ca))) :+ DeleteEntry(O(ca, cf))) :+ DeleteEntry(Q(ca))) :+ DeleteEntry(R(ca, cf))) :+ DeleteEntry(S(D, ca))) :+ DeleteEntry(U(D, ca, cf))) :+ DeleteEntry(Y(G))) :+ Burn(fromBase58String(ca), 1)), au)
642+ let cv = cf(cg, ch)
643+ let cz = bl(split(aF._4, "_"), aY, bn, (ch / m), cv)
644+ let aA = aW(split(aF._6, "_"), aY, (ch / m), -1)
645+ $Tuple6(cR, cS, cc, cz, (((((((((((((aF._5 :+ DeleteEntry(S(cg))) :+ DeleteEntry(ac(i, cg, cl))) :+ DeleteEntry(L(M))) :+ DeleteEntry(N(M, O))) :+ DeleteEntry(P(cg))) :+ DeleteEntry(T(cg))) :+ DeleteEntry(U(cg, cl))) :+ DeleteEntry(W(cg))) :+ DeleteEntry(X(cg, cl))) :+ DeleteEntry(Y(I, cg))) :+ DeleteEntry(aa(I, cg, cl))) :+ DeleteEntry(ae(M))) :+ Burn(fromBase58String(cg), 1)), aA)
632646 }
633647 }
634648 }
635649 }
636650 }
637651
638- let bA = Z(aa)
639- let bR = bz(bA)
640- let cO = valueOrElse(getString(ad()), "0_0_0_0_0_0")
641- let av = {
642- let aB = cH
643- let aC = size(aB)
644- let aD = $Tuple6(cG, 0, "", bR[am], nil, cO)
645- func aE (aF,aG) = if ((aG >= aC))
646- then aF
647- else cJ(aF, aB[aG])
652+ let bG = af(ag)
653+ let bX = bF(bG)
654+ let cU = valueOrElse(getString(aj()), "0_0_0_0_0_0")
655+ let aB = {
656+ let aH = cN
657+ let aI = size(aH)
658+ let aJ = $Tuple6(cM, 0, "", bX[as], nil, cU)
659+ func aK (aL,aM) = if ((aM >= aI))
660+ then aL
661+ else cP(aL, aH[aM])
648662
649- func aH (aF,aG) = if ((aG >= aC))
650- then aF
663+ func aN (aL,aM) = if ((aM >= aI))
664+ then aL
651665 else throw("List size exceeds 4")
652666
653- aH(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4)
667+ aN(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4)
654668 }
655- let bW = av._3
656- let bv = valueOrErrorMessage(indexOf(C, bW), ("Unknown continent: " + bW))
657- let aZ = bt(bl(toBigInt(bE)), bv)
658- let bV = valueOrElse(getInteger(E()), 501)
659- let cP = toString(bV)
660- let bX = Issue(H(cP, cF), makeString([cP, cF, aZ, bW], "_"), 1, 0, false)
661- let K = calculateAssetId(bX)
662- let cQ = toBase58String(K)
663- let bT = makeString(aI((cI > 0), split(bR[an], "_"), cI), "_")
664- $Tuple2((((((((((((((av._5 :+ IntegerEntry(E(), (bV + 1))) :+ bX) :+ StringEntry(F(cP), cQ)) :+ StringEntry(J(cQ), cf)) :+ StringEntry(Y(cP), cf)) :+ IntegerEntry(S(D, cQ), av._2)) :+ IntegerEntry(U(D, cQ, cf), av._2)) :+ IntegerEntry(N(cQ), cz)) :+ IntegerEntry(O(cQ, cf), cz)) :+ StringEntry(bA, makeString([bR[al], av._4, bT, bR[ao]], ":"))) :+ StringEntry(ad(), av._6)) :+ StringEntry(ab(aa), makeString([bW, "L", cQ], "_"))) :+ ScriptTransfer(addressFromStringValue(cf), 1, K)), cQ)
669+ let cc = aB._3
670+ let bB = valueOrErrorMessage(indexOf(H, cc), ("Unknown continent: " + cc))
671+ let bf = bz(br(toBigInt(bK)), bB)
672+ let cb = valueOrElse(getInteger(K()), (J + 1))
673+ let cV = toString(cb)
674+ let cd = Issue(N(cV, cL), makeString([cV, cL, bf, cc], "_"), 1, 0, false)
675+ let Q = calculateAssetId(cd)
676+ let cW = toBase58String(Q)
677+ let bZ = makeString(aO((cO > 0), split(bX[at], "_"), cO), "_")
678+ $Tuple2((((((((((((((aB._5 :+ IntegerEntry(K(), (cb + 1))) :+ cd) :+ StringEntry(L(cV), cW)) :+ StringEntry(P(cW), cl)) :+ StringEntry(ae(cV), cl)) :+ IntegerEntry(Y(I, cW), aB._2)) :+ IntegerEntry(aa(I, cW, cl), aB._2)) :+ IntegerEntry(T(cW), cF)) :+ IntegerEntry(U(cW, cl), cF)) :+ StringEntry(bG, makeString([bX[ar], aB._4, bZ, bX[au]], ":"))) :+ StringEntry(aj(), aB._6)) :+ StringEntry(ah(ag), makeString([cc, "L", cW], "_"))) :+ ScriptTransfer(addressFromStringValue(cl), 1, Q)), cW)
665679 }
666680
667681
668-func cR (cf,cH,bE) = cE("M", 3, "SSSS", cf, cH, bE, 0)
682+func cX (cl,cN,bK) = cK("M", 3, "SSSS", cl, cN, bK, 0)
669683
670684
671-func cS (cf,cH,bE,aJ,cw) = {
672- let cA = (r * 4)
673- if (if (!(aJ))
674- then (cw != cA)
685+func cY (cl,cN,bK,aP,cC) = {
686+ let cG = (w * 4)
687+ if (if (!(aP))
688+ then (cC != cG)
675689 else false)
676- then throw(("Payment attached should be " + toString(cA)))
677- else cE("L", 4, "SMM", cf, cH, bE, (q * 4))
690+ then throw(("Payment attached should be " + toString(cG)))
691+ else cK("L", 4, "SMM", cl, cN, bK, (v * 4))
678692 }
679693
680694
681-func cT (cf,cH,bE,aJ,cw) = {
682- let cA = (r * 47)
683- if (if (!(aJ))
684- then (cw != cA)
695+func cZ (cl,cN,bK,aP,cC) = {
696+ let cG = (w * 47)
697+ if (if (!(aP))
698+ then (cC != cG)
685699 else false)
686- then throw(("Payment attached should be " + toString(cA)))
687- else cE("XL", 5, "SSSML", cf, cH, bE, (q * 47))
700+ then throw(("Payment attached should be " + toString(cG)))
701+ else cK("XL", 5, "SSSML", cl, cN, bK, (v * 47))
688702 }
689703
690704
691-func cU (cf,cH,bE,aJ,cw) = {
692- let cA = (r * 54)
693- if (if (!(aJ))
694- then (cw != cA)
705+func da (cl,cN,bK,aP,cC) = {
706+ let cG = (w * 54)
707+ if (if (!(aP))
708+ then (cC != cG)
695709 else false)
696- then throw(("Payment attached should be " + toString(cA)))
697- else cE("XXL", 6, "LXL", cf, cH, bE, (q * 54))
710+ then throw(("Payment attached should be " + toString(cG)))
711+ else cK("XXL", 6, "LXL", cl, cN, bK, (v * 54))
698712 }
699713
700714
701-func cV (aJ,cf,cw,cH,bE) = {
702- let cW = {
703- let c = size(cH)
715+func db (aP,cl,cC,cN,bK) = {
716+ let dc = {
717+ let c = size(cN)
704718 if ((4 == c))
705- then cR(cf, cH, bE)
719+ then cX(cl, cN, bK)
706720 else if ((3 == c))
707- then cS(cf, cH, bE, aJ, cw)
721+ then cY(cl, cN, bK, aP, cC)
708722 else if ((5 == c))
709- then cT(cf, cH, bE, aJ, cw)
723+ then cZ(cl, cN, bK, aP, cC)
710724 else if ((2 == c))
711- then cU(cf, cH, bE, aJ, cw)
725+ then da(cl, cN, bK, aP, cC)
712726 else throw("Unknown merge")
713727 }
714- cW
728+ dc
715729 }
716730
717731
718-@Callable(aW)
719-func stakeLand () = {
720- let cX = value(aW.payments[0])
721- let K = value(cX.assetId)
722- let cY = toString(aW.caller)
723- if ((cX.amount != 1))
724- then throw((("NFT " + i) + " token should be attached as payment"))
725- else {
726- let ci = value(assetInfo(K))
727- if ((ci.issuer != this))
728- then throw("Unknown issuer of token")
729- else if (!(contains(ci.name, i)))
730- then throw((("Only NFT " + i) + " tokens are accepted"))
731- else {
732- let cZ = drop(ci.name, 4)
733- let G = if (contains(cZ, "XXL"))
734- then dropRight(cZ, 3)
735- else if (contains(cZ, "XL"))
736- then dropRight(cZ, 2)
737- else dropRight(cZ, 1)
738- let da = valueOrErrorMessage(parseInt(G), ("Cannot parse land number from " + ci.name))
739- let ca = toBase58String(K)
740- let cj = M(ca)
741- if (isDefined(getInteger(cj)))
742- then throw((("NFT " + ci.name) + " is already staked"))
743- else {
744- let cm = split(ci.description, "_")
745- let aS = aY(cm[ag])
746- let au = aX(aS, (ba(cm[af]) / 25), 1)
747-[IntegerEntry(cj, lastBlock.timestamp), IntegerEntry(W(i, ca, cY), lastBlock.timestamp), StringEntry(J(ca), cY), StringEntry(Y(G), cY), StringEntry(ad(), au)]
748- }
749- }
750- }
751- }
752-
753-
754-
755-@Callable(aW)
756-func unstakeLand (db) = if ((size(aW.payments) != 0))
757- then throw("unstake doesn't require any payments")
732+@Callable(bc)
733+func stakeLand () = if ((size(bc.payments) != 1))
734+ then throw("Exactly one payment required")
758735 else {
759- let cf = toString(aW.caller)
760- let co = ce(cf)
761- let aS = aY(co._3[ag])
762- let cb = ba(co._3[af])
763- let au = aX(aS, (cb / 25), -1)
764- let cB = cu(cf, co._2, cb)
765-[ScriptTransfer(aW.caller, 1, fromBase58String(co._2)), DeleteEntry(M(co._2)), DeleteEntry(W(i, co._2, cf)), StringEntry(ad(), au), StringEntry(cB._2, makeString(cB._3, ":"))]
736+ let dd = value(bc.payments[0])
737+ let Q = value(dd.assetId)
738+ let de = toString(bc.caller)
739+ if ((dd.amount != 1))
740+ then throw((("NFT " + i) + " token should be attached as payment"))
741+ else {
742+ let co = value(assetInfo(Q))
743+ if ((co.issuer != this))
744+ then throw("Unknown issuer of token")
745+ else if (!(contains(co.name, i)))
746+ then throw((("Only NFT " + i) + " tokens are accepted"))
747+ else {
748+ let df = drop(co.name, 4)
749+ let M = if (contains(df, "XXL"))
750+ then dropRight(df, 3)
751+ else if (contains(df, "XL"))
752+ then dropRight(df, 2)
753+ else dropRight(df, 1)
754+ if (!(isDefined(parseInt(M))))
755+ then throw(("Cannot parse land number from " + co.name))
756+ else {
757+ let cg = toBase58String(Q)
758+ let cp = S(cg)
759+ if (isDefined(getInteger(cp)))
760+ then throw((("NFT " + co.name) + " is already staked"))
761+ else {
762+ let cs = split(co.description, "_")
763+ let aY = be(cs[am])
764+ let aA = bd(aY, (bg(cs[al]) / m), 1)
765+[IntegerEntry(cp, lastBlock.timestamp), IntegerEntry(ac(i, cg, de), lastBlock.timestamp), StringEntry(P(cg), de), StringEntry(ae(M), de), StringEntry(aj(), aA)]
766+ }
767+ }
768+ }
769+ }
766770 }
767771
768772
769773
770-@Callable(aW)
771-func stakeDuck () = {
772- let cX = value(aW.payments[0])
773- let K = value(cX.assetId)
774- let cY = toString(aW.caller)
775- if ((cX.amount != 1))
776- then throw((("NFT " + j) + " token should be attached as payment"))
777- else {
778- let ci = value(assetInfo(K))
779- if (if ((ci.issuer != d))
780- then (ci.issuer != e)
781- else false)
782- then throw((("Unknown issuer of " + j) + " token"))
783- else if (!(contains(ci.name, j)))
784- then throw((("Only NFT " + j) + " tokens are accepted"))
785- else {
786- let dc = toBase58String(K)
787- let cj = M(dc)
788- if (isDefined(getInteger(cj)))
789- then throw((("NFT " + ci.name) + " is already staked"))
790- else if (isDefined(getString(V(cY))))
791- then throw(("You already staked one duck: " + ci.name))
792- else {
793- let dd = ab(dc)
794- let de = getString(dd)
795- let bP = ac(dc)
796- let df = getInteger(bP)
797- let bA = Z(dc)
798- let dg = getString(bA)
799- ([IntegerEntry(cj, lastBlock.timestamp), IntegerEntry(W(j, toBase58String(K), cY), lastBlock.timestamp), StringEntry(L(dc), cY), StringEntry(V(cY), dc)] ++ (if (isDefined(de))
800- then nil
801- else ([StringEntry(dd, k)] ++ (if (isDefined(df))
802- then nil
803- else ([IntegerEntry(bP, 100)] ++ (if (isDefined(dg))
804- then nil
805- else [StringEntry(bA, "0:0_0_0_0_0_0:0_0_0_0_0_0:")]))))))
806- }
807- }
808- }
809- }
774+@Callable(bc)
775+func unstakeLand (dg) = if ((size(bc.payments) != 0))
776+ then throw("unstake doesn't require any payments")
777+ else {
778+ let cl = toString(bc.caller)
779+ let cu = ck(cl)
780+ let aY = be(cu._3[am])
781+ let ch = bg(cu._3[al])
782+ let aA = bd(aY, (ch / m), -1)
783+ let cH = cA(cl, cu._2, ch)
784+[ScriptTransfer(bc.caller, 1, fromBase58String(cu._2)), DeleteEntry(S(cu._2)), DeleteEntry(ac(i, cu._2, cl)), StringEntry(aj(), aA), StringEntry(cH._2, makeString(cH._3, ":"))]
785+ }
810786
811787
812788
813-@Callable(aW)
814-func unstakeDuck (dc) = if ((size(aW.payments) != 0))
789+@Callable(bc)
790+func stakeDuck () = if ((size(bc.payments) != 1))
791+ then throw("Exactly one payment required")
792+ else {
793+ let dd = value(bc.payments[0])
794+ let Q = value(dd.assetId)
795+ let de = toString(bc.caller)
796+ if ((dd.amount != 1))
797+ then throw((("NFT " + j) + " token should be attached as payment"))
798+ else {
799+ let co = value(assetInfo(Q))
800+ if (if ((co.issuer != d))
801+ then (co.issuer != e)
802+ else false)
803+ then throw((("Unknown issuer of " + j) + " token"))
804+ else if (!(contains(co.name, j)))
805+ then throw((("Only NFT " + j) + " tokens are accepted"))
806+ else {
807+ let dh = toBase58String(Q)
808+ let cp = S(dh)
809+ if (isDefined(getInteger(cp)))
810+ then throw((("NFT " + co.name) + " is already staked"))
811+ else if (isDefined(getString(ab(de))))
812+ then throw(("You already staked one duck: " + co.name))
813+ else {
814+ let di = ah(dh)
815+ let dj = getString(di)
816+ let bG = af(dh)
817+ let dk = getString(bG)
818+ ([IntegerEntry(cp, lastBlock.timestamp), IntegerEntry(ac(j, toBase58String(Q), de), lastBlock.timestamp), StringEntry(R(dh), de), StringEntry(ab(de), dh)] ++ (if (isDefined(dj))
819+ then nil
820+ else ([StringEntry(di, k)] ++ (if (isDefined(dk))
821+ then nil
822+ else ([StringEntry(bG, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(ai(dh), 100))))))
823+ }
824+ }
825+ }
826+ }
827+
828+
829+
830+@Callable(bc)
831+func unstakeDuck (dh) = if ((size(bc.payments) != 0))
815832 then throw("unstake doesn't require any payments")
816833 else {
817- let K = fromBase58String(dc)
818- let cY = toString(aW.caller)
819- let ci = value(assetInfo(K))
820- if (if ((ci.issuer != d))
821- then (ci.issuer != e)
822- else false)
823- then throw((("Unknown issuer of " + j) + " token"))
824- else if (!(contains(ci.name, j)))
825- then throw((("Only NFT " + j) + " tokens can be unstaked"))
834+ let Q = fromBase58String(dh)
835+ let de = toString(bc.caller)
836+ let co = value(assetInfo(Q))
837+ let cp = S(toBase58String(Q))
838+ if (!(isDefined(cp)))
839+ then throw((("NFT " + co.name) + " is not staked"))
840+ else if (!(isDefined(ab(de))))
841+ then throw((("The duck " + co.name) + " is not staked"))
826842 else {
827- let cj = M(toBase58String(K))
828- if (!(isDefined(cj)))
829- then throw((("NFT " + ci.name) + " is not staked"))
830- else if (!(isDefined(V(cY))))
831- then throw((("The duck " + ci.name) + " is not staked"))
832- else {
833- let cl = valueOrErrorMessage(getString(L(toBase58String(K))), (("NFT " + ci.name) + " is orphaned"))
834- if ((cl != cY))
835- then throw("Staked NFT is not yours")
836- else [ScriptTransfer(aW.caller, 1, K), DeleteEntry(cj), DeleteEntry(ab(dc)), DeleteEntry(L(dc)), DeleteEntry(W(j, dc, cY)), DeleteEntry(V(cY))]
837- }
843+ let cr = valueOrErrorMessage(getString(R(toBase58String(Q))), (("NFT " + co.name) + " is orphaned"))
844+ if ((cr != de))
845+ then throw("Staked NFT is not yours")
846+ else {
847+ let bV = ai(dh)
848+ let dl = getInteger(bV)
849+ if ((dl != 100))
850+ then throw("Please heal your duck before unstaking")
851+ else [ScriptTransfer(bc.caller, 1, Q), DeleteEntry(cp), DeleteEntry(bV), DeleteEntry(ah(dh)), DeleteEntry(R(dh)), DeleteEntry(ac(j, dh, de)), DeleteEntry(ab(de))]
852+ }
838853 }
839854 }
840855
841856
842857
843-@Callable(aW)
844-func claimRes (bd,db) = if ((size(aW.payments) != 0))
858+@Callable(bc)
859+func claimRes (bj,dg) = if ((size(bc.payments) != 0))
845860 then throw("claimRes doesn't require any payments")
846861 else {
847- let cf = toString(aW.originCaller)
848- let aP = cn(cf, bd)
849- $Tuple2((aP._1 :+ StringEntry(aP._2, makeString(aP._3, ":"))), aP._3[am])
862+ let cl = toString(bc.originCaller)
863+ let aV = ct(cl, bj)
864+ $Tuple2((aV._1 :+ StringEntry(aV._2, makeString(aV._3, ":"))), aV._3[as])
850865 }
851866
852867
853868
854-@Callable(aW)
855-func flight (bF,bG) = if (!(sigVerify_8Kb(bF, bG, g)))
869+@Callable(bc)
870+func flight (bL,bM) = if (!(sigVerify_8Kb(bL, bM, g)))
856871 then throw("signature does not match")
857- else if ((size(aW.payments) != 0))
872+ else if ((size(bc.payments) != 0))
858873 then throw("flight doesn't require any payments")
859874 else {
860- let bH = split(toUtf8String(bF), ";")
861- let bI = split(split(bH[0], "|")[0], "_")
862- let bJ = parseIntValue(bI[0])
863- let bK = parseIntValue(bI[1])
864- let dh = split(bH[1], ":")
865- let di = dh[0]
866- let bN = parseIntValue(dh[1])
867- if (if ((bN > (lastBlock.timestamp + o)))
875+ let bN = split(toUtf8String(bL), ";")
876+ let bO = split(split(bN[0], "|")[0], "_")
877+ let bP = parseIntValue(bO[0])
878+ let bQ = parseIntValue(bO[1])
879+ let dm = split(bN[1], ":")
880+ let dn = dm[0]
881+ let bT = parseIntValue(dm[1])
882+ if (if ((bT > (lastBlock.timestamp + t)))
868883 then true
869- else ((lastBlock.timestamp - o) > bN))
884+ else ((lastBlock.timestamp - t) > bT))
870885 then throw("signature outdated")
871886 else {
872- let aa = valueOrErrorMessage(getString(V(toString(aW.caller))), "You don't have a duck staked")
873- let bP = ac(aa)
874- let bQ = valueOrElse(getInteger(bP), 100)
875- if ((bQ != bJ))
876- then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bP), 100))) + " from state does not match one from flight log=") + toString(bJ)))
877- else if ((0 >= bJ))
887+ let ag = valueOrErrorMessage(getString(ab(toString(bc.caller))), "You don't have a duck staked")
888+ let bV = ai(ag)
889+ let bW = valueOrElse(getInteger(bV), 100)
890+ if ((bW != bP))
891+ then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bV), 100))) + " from state does not match one from flight log=") + toString(bP)))
892+ else if ((0 >= bP))
878893 then throw("You can't fly with zero health")
879894 else {
880- let dd = ab(aa)
881- let cg = valueOrElse(getString(dd), k)
882- if ((di == cg))
895+ let di = ah(ag)
896+ let cm = valueOrElse(getString(di), k)
897+ if ((dn == cm))
883898 then throw("You can't fly to the same location")
884- else $Tuple2([StringEntry(dd, if ((bK > 0))
885- then di
886- else cg), IntegerEntry(bP, bK)], unit)
899+ else $Tuple2([StringEntry(di, if ((bQ > 0))
900+ then dn
901+ else cm), IntegerEntry(bV, bQ)], unit)
887902 }
888903 }
889904 }
890905
891906
892907
893-@Callable(aW)
894-func setHealth (df,aa) = if (if ((0 > df))
908+@Callable(bc)
909+func setHealth (dl,ag) = if (if ((0 > dl))
895910 then true
896- else (df > 100))
911+ else (dl > 100))
897912 then throw("HP should be within 0..100")
898- else [IntegerEntry(ac(aa), df)]
913+ else [IntegerEntry(ai(ag), dl)]
899914
900915
901916
902-@Callable(aW)
903-func heal (dj,bd) = if (if ((0 > dj))
917+@Callable(bc)
918+func heal (do,bj) = if (if ((0 > do))
904919 then true
905- else (dj >= l))
906- then throw(("Unknown material: " + toString(dj)))
907- else if ((0 >= bd))
908- then throw(("Amount should be positive! " + toString(bd)))
920+ else (do >= l))
921+ then throw(("Unknown material: " + toString(do)))
922+ else if ((0 >= bj))
923+ then throw(("Amount should be positive! " + toString(bj)))
909924 else {
910- let aa = valueOrErrorMessage(getString(V(toString(aW.caller))), "You don't have a duck staked")
911- let bP = ac(aa)
912- let dk = valueOrElse(getInteger(bP), 100)
913- if ((dk >= 100))
925+ let ag = valueOrErrorMessage(getString(ab(toString(bc.caller))), "You don't have a duck staked")
926+ let bV = ai(ag)
927+ let dp = valueOrElse(getInteger(bV), 100)
928+ if ((dp >= 100))
914929 then throw("HP should be < 100 to heal")
915930 else {
916- let bA = Z(aa)
917- let bR = bz(bA)
918- let bS = split(bR[an], "_")
919- let dl = parseIntValue(bS[dj])
920- let dm = min([(bd / h), (100 - dk)])
921- let dn = (dm * h)
922- if ((dn > dl))
923- then throw(((((("You need " + toString(dn)) + " of ") + B[dj]) + " to heal, but you backpack contains ") + toString(dl)))
931+ let bG = af(ag)
932+ let bX = bF(bG)
933+ let bY = split(bX[at], "_")
934+ let dq = parseIntValue(bY[do])
935+ let dr = min([(bj / h), (100 - dp)])
936+ let ds = (dr * h)
937+ if ((ds > dq))
938+ then throw(((((("You need " + toString(ds)) + " of ") + G[do]) + " to heal, but you backpack contains ") + toString(dq)))
924939 else {
925- let bT = bb(bS, dj, dn)
926-[IntegerEntry(bP, (dk + dm)), StringEntry(bA, makeString([bR[al], bR[am], bT, bR[ao]], ":"))]
940+ let bZ = bh(bY, do, ds)
941+[IntegerEntry(bV, (dp + dr)), StringEntry(bG, makeString([bX[ar], bX[as], bZ, bX[au]], ":"))]
927942 }
928943 }
929944 }
930945
931946
932947
933-@Callable(aW)
934-func updateBackpack (aa,do) = if ((aW.caller != f))
948+@Callable(bc)
949+func updateBackpack (ag,dt) = if ((bc.caller != f))
935950 then throw("permission denied")
936- else $Tuple2([StringEntry(Z(aa), do)], do)
951+ else $Tuple2([StringEntry(af(ag), dt)], dt)
937952
938953
939954
940-@Callable(aW)
941-func expeditionBuy (bF,bG) = if ((size(aW.payments) != 1))
955+@Callable(bc)
956+func expeditionBuy (bL,bM) = if ((size(bc.payments) != 1))
942957 then throw("Exactly one payment required")
943958 else {
944- let cX = value(aW.payments[0])
945- if ((cX.assetId != b))
959+ let dd = value(bc.payments[0])
960+ if ((dd.assetId != b))
946961 then throw("Allowed USDN payment only!")
947- else if ((cX.amount != t))
948- then throw(("Payment attached should be " + toString(t)))
962+ else if ((dd.amount != y))
963+ then throw(("Payment attached should be " + toString(y)))
949964 else {
950- let aP = bC(false, aW.caller, aW.transactionId, bF, bG)
951- $Tuple2((aP._1 :+ ScriptTransfer(f, cX.amount, b)), aP._2)
965+ let aV = bI(false, bc.caller, bc.transactionId, bL, bM)
966+ if ((aV._2 == ""))
967+ then aV
968+ else $Tuple2((aV._1 :+ ScriptTransfer(f, dd.amount, b)), aV._2)
952969 }
953970 }
954971
955972
956973
957-@Callable(aW)
958-func expedition (bF,bG) = if ((size(aW.payments) != 0))
974+@Callable(bc)
975+func expedition (bL,bM) = if ((size(bc.payments) != 0))
959976 then throw("expedition doesn't require any payments")
960- else bC(true, aW.caller, aW.transactionId, bF, bG)
977+ else bI(true, bc.caller, bc.transactionId, bL, bM)
961978
962979
963980
964-@Callable(aW)
965-func upgradeInfra (dp) = if ((size(aW.payments) != 0))
981+@Callable(bc)
982+func upgradeInfra (du) = if ((size(bc.payments) != 0))
966983 then throw("Infrastructure upgrade doesn't require any payments")
967- else cv(true, aW.caller, 0)
984+ else cB(true, bc.caller, 0)
968985
969986
970987
971-@Callable(aW)
972-func upgradeInfraUsdn (dp) = if ((size(aW.payments) != 1))
988+@Callable(bc)
989+func upgradeInfraUsdn (du) = if ((size(bc.payments) != 1))
973990 then throw("Exactly one payment required")
974991 else {
975- let cX = value(aW.payments[0])
976- if ((cX.assetId != b))
992+ let dd = value(bc.payments[0])
993+ if ((dd.assetId != b))
977994 then throw("Allowed USDN payment only!")
978995 else {
979- let aP = cv(false, aW.caller, cX.amount)
980- $Tuple2((aP._1 :+ ScriptTransfer(f, cX.amount, b)), aP._2)
996+ let aV = cB(false, bc.caller, dd.amount)
997+ $Tuple2((aV._1 :+ ScriptTransfer(f, dd.amount, b)), aV._2)
981998 }
982999 }
9831000
9841001
9851002
986-@Callable(aW)
987-func activateArtifact (dq) = if ((size(aW.payments) != 0))
1003+@Callable(bc)
1004+func activateArtifact (dv) = if ((size(bc.payments) != 0))
9881005 then throw("Artifact activation doesn't require any payments")
9891006 else {
990- let aP = {
991- let c = dq
1007+ let aV = {
1008+ let c = dv
9921009 if (("PRESALE" == c))
993- then cC(toString(aW.caller))
1010+ then cI(toString(bc.caller))
9941011 else throw("Unknown artifact")
9951012 }
996- aP
1013+ aV
9971014 }
9981015
9991016
10001017
1001-@Callable(aW)
1002-func mergeLands (cH) = if ((size(aW.payments) != 0))
1018+@Callable(bc)
1019+func mergeLands (cN) = if ((size(bc.payments) != 0))
10031020 then throw("Lands merging doesn't require any payments")
1004- else cV(true, toString(aW.caller), 0, cH, aW.transactionId)
1021+ else db(true, toString(bc.caller), 0, cN, bc.transactionId)
10051022
10061023
10071024
1008-@Callable(aW)
1009-func mergeLandsUsdn (cH) = if ((size(aW.payments) != 1))
1025+@Callable(bc)
1026+func mergeLandsUsdn (cN) = if ((size(bc.payments) != 1))
10101027 then throw("Exactly one payment required")
10111028 else {
1012- let cX = value(aW.payments[0])
1013- if ((cX.assetId != b))
1029+ let dd = value(bc.payments[0])
1030+ if ((dd.assetId != b))
10141031 then throw("Allowed USDN payment only!")
10151032 else {
1016- let aP = cV(false, toString(aW.caller), cX.amount, cH, aW.transactionId)
1017- $Tuple2((aP._1 :+ ScriptTransfer(f, cX.amount, b)), aP._2)
1033+ let aV = db(false, toString(bc.caller), dd.amount, cN, bc.transactionId)
1034+ $Tuple2((aV._1 :+ ScriptTransfer(f, dd.amount, b)), aV._2)
10181035 }
10191036 }
10201037
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = toUtf8String(take(drop(this.bytes, 1), 1))
55
66 let b = {
77 let c = a
88 if (("W" == c))
99 then base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
1010 else if (("T" == c))
1111 then base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
1212 else throw("Unknown chain")
1313 }
1414
1515 let d = {
1616 let c = a
1717 if (("W" == c))
1818 then addressFromStringValue("3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv")
1919 else if (("T" == c))
2020 then this
2121 else throw("Unknown chain")
2222 }
2323
2424 let e = {
2525 let c = a
2626 if (("W" == c))
2727 then addressFromStringValue("3PDVuU45H7Eh5dmtNbnRNRStGwULA7NY6Hb")
2828 else if (("T" == c))
2929 then this
3030 else throw("Unknown chain")
3131 }
3232
3333 let f = {
3434 let c = a
3535 if (("W" == c))
3636 then addressFromStringValue("3P2sk1KncSxRaZs8b4CWGPw2jkvvav74u4D")
3737 else if (("T" == c))
3838 then addressFromStringValue("3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep")
3939 else throw("Unknown chain")
4040 }
4141
4242 let g = base58'6LfPuKJjLgekmncBhMg2LZyMTNVzZBccXR28ySXm9uXD'
4343
4444 let h = 10000
4545
4646 let i = "LAND"
4747
4848 let j = "DUCK"
4949
5050 let k = "Africa_F_Africa"
5151
5252 let l = 6
5353
54-let m = 3456000
54+let m = 25
5555
56-let n = 86400000
56+let n = 100
5757
58-let o = 300000
58+let o = 225
5959
60-let p = 158549
60+let p = 400
6161
62-let q = {
62+let q = 625
63+
64+let r = 3456000
65+
66+let s = 86400000
67+
68+let t = 300000
69+
70+let u = 158549
71+
72+let v = {
6373 let c = a
6474 if (("W" == c))
6575 then 6307198406
6676 else if (("T" == c))
6777 then 63071984
6878 else throw("Unknown chain")
6979 }
7080
71-let r = {
81+let w = {
7282 let c = a
7383 if (("W" == c))
7484 then 40000000
7585 else if (("T" == c))
7686 then 400000
7787 else throw("Unknown chain")
7888 }
7989
80-let s = {
90+let x = {
8191 let c = a
8292 if (("W" == c))
8393 then 157679960139
8494 else if (("T" == c))
8595 then 1576799601
8696 else throw("Unknown chain")
8797 }
8898
89-let t = {
99+let y = {
90100 let c = a
91101 if (("W" == c))
92102 then 1000000000
93103 else if (("T" == c))
94104 then 10000000
95105 else throw("Unknown chain")
96106 }
97107
98-let u = 1000000
108+let z = 1000000
99109
100-let v = toBigInt(5)
110+let A = toBigInt(5)
101111
102-let w = toBigInt(20)
112+let B = toBigInt(20)
103113
104-let x = toBigInt((20 * 20))
114+let C = toBigInt((20 * 20))
105115
106-let y = toBigInt(((20 * 20) * 20))
116+let D = toBigInt(((20 * 20) * 20))
107117
108-let z = toBigInt((((20 * 20) * 20) * 20))
118+let E = toBigInt((((20 * 20) * 20) * 20))
109119
110-let A = toBigInt(((((20 * 20) * 20) * 20) * 20))
120+let F = toBigInt(((((20 * 20) * 20) * 20) * 20))
111121
112-let B = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
122+let G = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
113123
114-let C = ["Asia", "Europe", "Americas", "Oceania", "Africa"]
124+let H = ["Asia", "Europe", "Americas", "Oceania", "Africa"]
115125
116-let D = "PRESALE"
126+let I = "PRESALE"
117127
118-func E () = "nextLandNum"
128+let J = 500
129+
130+func K () = "nextLandNum"
119131
120132
121-func F (G) = ("landToAsset_" + G)
133+func L (M) = ("landToAsset_" + M)
122134
123135
124-func H (G,I) = ((i + G) + I)
136+func N (M,O) = ((i + M) + O)
125137
126138
127-func J (K) = ("nftOwner_" + K)
139+func P (Q) = ("nftOwner_" + Q)
128140
129141
130-func L (K) = ("duckOwner_" + K)
142+func R (Q) = ("duckOwner_" + Q)
131143
132144
133-func M (K) = ("stakedTime_" + K)
145+func S (Q) = ("stakedTime_" + Q)
134146
135147
136-func N (K) = ("infraLevel_" + K)
148+func T (Q) = ("infraLevel_" + Q)
137149
138150
139-func O (K,P) = ((("infraLevelByAssetIdAndOwner_" + K) + "_") + P)
151+func U (Q,V) = ((("infraLevelByAssetIdAndOwner_" + Q) + "_") + V)
140152
141153
142-func Q (K) = ("presaleArtActivated_" + K)
154+func W (Q) = ("presaleArtActivated_" + Q)
143155
144156
145-func R (K,P) = ((("presaleArtActivatedByAssetIdAndOwner_" + K) + "_") + P)
157+func X (Q,V) = ((("presaleArtActivatedByAssetIdAndOwner_" + Q) + "_") + V)
146158
147159
148-func S (T,K) = makeString(["landArtStatus", T, K], "_")
160+func Y (Z,Q) = makeString(["landArtStatus", Z, Q], "_")
149161
150162
151-func U (T,K,P) = makeString(["landArtStatusByTypeAssetIdAndOwner", T, K, P], "_")
163+func aa (Z,Q,V) = makeString(["landArtStatusByTypeAssetIdAndOwner", Z, Q, V], "_")
152164
153165
154-func V (P) = ("stakedDuckByOwner_" + P)
166+func ab (V) = ("stakedDuckByOwner_" + V)
155167
156168
157-func W (X,K,P) = ((((("stakedTimeByTypeAssetIdAndOwner_" + X) + "_") + K) + "_") + P)
169+func ac (ad,Q,V) = ((((("stakedTimeByTypeAssetIdAndOwner_" + ad) + "_") + Q) + "_") + V)
158170
159171
160-func Y (G) = ("landOwner_" + G)
172+func ae (M) = ("landOwner_" + M)
161173
162174
163-func Z (aa) = ("backPack_" + aa)
175+func af (ag) = ("backPack_" + ag)
164176
165177
166-func ab (aa) = ("duckLocation_" + aa)
178+func ah (ag) = ("duckLocation_" + ag)
167179
168180
169-func ac (aa) = ("duckHealth_" + aa)
181+func ai (ag) = ("duckHealth_" + ag)
170182
171183
172-func ad () = "resTypesProportions"
184+func aj () = "resTypesProportions"
173185
174186
175-let ae = 0
187+let ak = 0
176188
177-let af = 1
189+let al = 1
178190
179-let ag = 2
191+let am = 2
180192
181-let ah = 3
193+let an = 3
182194
183-let ai = 0
195+let ao = 0
184196
185-let aj = 1
197+let ap = 1
186198
187-let ak = 2
199+let aq = 2
188200
189-let al = 0
201+let ar = 0
190202
191-let am = 1
203+let as = 1
192204
193-let an = 2
205+let at = 2
194206
195-let ao = 3
207+let au = 3
196208
197-func ap (aq) = {
198- let c = aq
209+func av (aw) = {
210+ let c = aw
199211 if ($isInstanceOf(c, "String"))
200212 then {
201- let ar = c
202- ar
213+ let ax = c
214+ ax
203215 }
204216 else throw("fail to cast into String")
205217 }
206218
207219
208-func as (at) = {
209- let au = split(value(getString(ad())), "_")
210- if ((size(au) != l))
220+func ay (az) = {
221+ let aA = split(value(getString(aj())), "_")
222+ if ((size(aA) != l))
211223 then throw("Wrong proportions data")
212224 else {
213- let av = [parseIntValue(au[0]), parseIntValue(au[1]), parseIntValue(au[2]), parseIntValue(au[3]), parseIntValue(au[4]), parseIntValue(au[5])]
214- let aw = (((((av[0] + av[1]) + av[2]) + av[3]) + av[4]) + av[5])
215- if ((0 >= aw))
225+ let aB = [parseIntValue(aA[0]), parseIntValue(aA[1]), parseIntValue(aA[2]), parseIntValue(aA[3]), parseIntValue(aA[4]), parseIntValue(aA[5])]
226+ let aC = (((((aB[0] + aB[1]) + aB[2]) + aB[3]) + aB[4]) + aB[5])
227+ if ((0 >= aC))
216228 then throw("No lands staked")
217229 else {
218- let ax = fraction(at, u, aw)
219- func ay (az,aA) = (az :+ fraction(aA, ax, u))
230+ let aD = fraction(az, z, aC)
231+ func aE (aF,aG) = (aF :+ fraction(aG, aD, z))
220232
221- let aB = av
222- let aC = size(aB)
223- let aD = nil
224- func aE (aF,aG) = if ((aG >= aC))
225- then aF
226- else ay(aF, aB[aG])
233+ let aH = aB
234+ let aI = size(aH)
235+ let aJ = nil
236+ func aK (aL,aM) = if ((aM >= aI))
237+ then aL
238+ else aE(aL, aH[aM])
227239
228- func aH (aF,aG) = if ((aG >= aC))
229- then aF
240+ func aN (aL,aM) = if ((aM >= aI))
241+ then aL
230242 else throw("List size exceeds 6")
231243
232- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
244+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
233245 }
234246 }
235247 }
236248
237249
238-func aI (aJ,aK,aL) = {
239- let aM = as(aL)
240- func aN (az,aO) = {
241- let aP = (parseIntValue(aK[aO]) - aM[aO])
242- if ((0 > aP))
243- then throw(((((("Not enough material idx=" + toString(aO)) + ", you have ") + aK[aO]) + ", but need ") + toString(aM[aO])))
244- else (az :+ toString(aP))
250+func aO (aP,aQ,aR) = {
251+ let aS = ay(aR)
252+ func aT (aF,aU) = {
253+ let aV = (parseIntValue(aQ[aU]) - aS[aU])
254+ if ((0 > aV))
255+ then throw(((((("Not enough material idx=" + toString(aU)) + ", you have ") + aQ[aU]) + ", but need ") + toString(aS[aU])))
256+ else (aF :+ toString(aV))
245257 }
246258
247- if (aJ)
259+ if (aP)
248260 then {
249- let aB = [0, 1, 2, 3, 4, 5]
250- let aC = size(aB)
251- let aD = nil
252- func aE (aF,aG) = if ((aG >= aC))
253- then aF
254- else aN(aF, aB[aG])
261+ let aH = [0, 1, 2, 3, 4, 5]
262+ let aI = size(aH)
263+ let aJ = nil
264+ func aK (aL,aM) = if ((aM >= aI))
265+ then aL
266+ else aT(aL, aH[aM])
255267
256- func aH (aF,aG) = if ((aG >= aC))
257- then aF
268+ func aN (aL,aM) = if ((aM >= aI))
269+ then aL
258270 else throw("List size exceeds 6")
259271
260- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
272+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
261273 }
262- else aK
274+ else aQ
263275 }
264276
265277
266-func aQ (aR,aS,aT,aU) = if ((size(aR) != l))
278+func aW (aX,aY,aZ,ba) = if ((size(aX) != l))
267279 then throw("Wrong proportions data")
268280 else {
269- func aV (az,aW) = {
270- let aP = (parseIntValue(aR[aW]) + ((aU * aS[aW]) * aT))
271- if ((0 > aP))
272- then throw(((((((("Panic! Pieces of type=" + toString(aW)) + ", sign=") + toString(aU)) + ", terrainCounts[i]=") + toString(aS[aW])) + ", landSizeIndex=") + toString(aT)))
273- else (az :+ toString(aP))
281+ func bb (aF,bc) = {
282+ let aV = (parseIntValue(aX[bc]) + ((ba * aY[bc]) * aZ))
283+ if ((0 > aV))
284+ then throw(((((((("Panic! Pieces of type=" + toString(bc)) + ", sign=") + toString(ba)) + ", terrainCounts[i]=") + toString(aY[bc])) + ", landSizeIndex=") + toString(aZ)))
285+ else (aF :+ toString(aV))
274286 }
275287
276- let av = {
277- let aB = [0, 1, 2, 3, 4, 5]
278- let aC = size(aB)
279- let aD = nil
280- func aE (aF,aG) = if ((aG >= aC))
281- then aF
282- else aV(aF, aB[aG])
288+ let aB = {
289+ let aH = [0, 1, 2, 3, 4, 5]
290+ let aI = size(aH)
291+ let aJ = nil
292+ func aK (aL,aM) = if ((aM >= aI))
293+ then aL
294+ else bb(aL, aH[aM])
283295
284- func aH (aF,aG) = if ((aG >= aC))
285- then aF
296+ func aN (aL,aM) = if ((aM >= aI))
297+ then aL
286298 else throw("List size exceeds 6")
287299
288- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
300+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
289301 }
290- makeString(av, "_")
302+ makeString(aB, "_")
291303 }
292304
293305
294-func aX (aS,aT,aU) = {
295- let aR = split(valueOrElse(getString(ad()), "0_0_0_0_0_0"), "_")
296- aQ(aR, aS, aT, aU)
306+func bd (aY,aZ,ba) = {
307+ let aX = split(valueOrElse(getString(aj()), "0_0_0_0_0_0"), "_")
308+ aW(aX, aY, aZ, ba)
297309 }
298310
299311
300-func aY (aZ) = [(size(split(aZ, "A")) - 1), (size(split(aZ, "B")) - 1), (size(split(aZ, "C")) - 1), (size(split(aZ, "D")) - 1), (size(split(aZ, "E")) - 1), (size(split(aZ, "F")) - 1)]
312+func be (bf) = [(size(split(bf, "A")) - 1), (size(split(bf, "B")) - 1), (size(split(bf, "C")) - 1), (size(split(bf, "D")) - 1), (size(split(bf, "E")) - 1), (size(split(bf, "F")) - 1)]
301313
302314
303-func ba (I) = {
304- let c = I
315+func bg (O) = {
316+ let c = O
305317 if (("S" == c))
306- then 25
318+ then m
307319 else if (("M" == c))
308- then 100
320+ then n
309321 else if (("L" == c))
310- then 225
322+ then o
311323 else if (("XL" == c))
312- then 400
324+ then p
313325 else if (("XXL" == c))
314- then 625
326+ then q
315327 else throw("Unknown land size")
316328 }
317329
318330
319-func bb (bc,aO,bd) = {
320- func be (az,aW) = (az :+ (if ((aW == aO))
321- then toString((parseIntValue(bc[aW]) - bd))
322- else bc[aW]))
331+func bh (bi,aU,bj) = {
332+ func bk (aF,bc) = (aF :+ (if ((bc == aU))
333+ then toString((parseIntValue(bi[bc]) - bj))
334+ else bi[bc]))
323335
324- let av = {
325- let aB = [0, 1, 2, 3, 4, 5]
326- let aC = size(aB)
327- let aD = nil
328- func aE (aF,aG) = if ((aG >= aC))
329- then aF
330- else be(aF, aB[aG])
336+ let aB = {
337+ let aH = [0, 1, 2, 3, 4, 5]
338+ let aI = size(aH)
339+ let aJ = nil
340+ func aK (aL,aM) = if ((aM >= aI))
341+ then aL
342+ else bk(aL, aH[aM])
331343
332- func aH (aF,aG) = if ((aG >= aC))
333- then aF
344+ func aN (aL,aM) = if ((aM >= aI))
345+ then aL
334346 else throw("List size exceeds 6")
335347
336- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
348+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
337349 }
338- makeString(av, "_")
350+ makeString(aB, "_")
339351 }
340352
341353
342-func bf (bg,aS,bh,aT,bi) = {
343- func bj (az,aW) = {
344- let bk = ((fraction(bh, bi, n) * aS[aW]) * aT)
345- (az :+ toString((parseIntValue(bg[aW]) + bk)))
354+func bl (bm,aY,bn,aZ,bo) = {
355+ func bp (aF,bc) = {
356+ let bq = ((fraction(bn, bo, s) * aY[bc]) * aZ)
357+ (aF :+ toString((parseIntValue(bm[bc]) + bq)))
346358 }
347359
348- let av = {
349- let aB = [0, 1, 2, 3, 4, 5]
350- let aC = size(aB)
351- let aD = nil
352- func aE (aF,aG) = if ((aG >= aC))
353- then aF
354- else bj(aF, aB[aG])
360+ let aB = {
361+ let aH = [0, 1, 2, 3, 4, 5]
362+ let aI = size(aH)
363+ let aJ = nil
364+ func aK (aL,aM) = if ((aM >= aI))
365+ then aL
366+ else bp(aL, aH[aM])
355367
356- func aH (aF,aG) = if ((aG >= aC))
357- then aF
368+ func aN (aL,aM) = if ((aM >= aI))
369+ then aL
358370 else throw("List size exceeds 6")
359371
360- aH(aE(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5), 6)
372+ aN(aK(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5), 6)
361373 }
362- makeString(av, "_")
374+ makeString(aB, "_")
363375 }
364376
365377
366-func bl (bm) = if ((bm >= toBigInt(0)))
367- then bm
368- else -(bm)
378+func br (bs) = if ((bs >= toBigInt(0)))
379+ then bs
380+ else -(bs)
369381
370382
371-let bn = [[1, 4, 9, 10, 15], [5, 8, 13, 14, 15], [6, 9, 14, 15, 16], [4, 7, 8, 13, 18], [1, 6, 7, 15, 19]]
383+let bt = [[1, 4, 9, 10, 15], [5, 8, 13, 14, 15], [6, 9, 14, 15, 16], [4, 7, 8, 13, 18], [1, 6, 7, 15, 19]]
372384
373-func bo (bp,bq) = {
374- let br = toInt((bp % w))
375- let bs = if ((bq[0] > br))
385+func bu (bv,bw) = {
386+ let bx = toInt((bv % B))
387+ let by = if ((bw[0] > bx))
376388 then "A"
377- else if ((bq[1] > br))
389+ else if ((bw[1] > bx))
378390 then "B"
379- else if ((bq[2] > br))
391+ else if ((bw[2] > bx))
380392 then "C"
381- else if ((bq[3] > br))
393+ else if ((bw[3] > bx))
382394 then "D"
383- else if ((bq[4] > br))
395+ else if ((bw[4] > bx))
384396 then "E"
385397 else "F"
386- bs
398+ by
387399 }
388400
389401
390-func bt (bu,bv) = {
391- let bw = bn[bv]
392- func bx (az,aA) = $Tuple2((((((az._1 + bo(az._2, bw)) + bo((az._2 / w), bw)) + bo((az._2 / x), bw)) + bo((az._2 / y), bw)) + bo((az._2 / z), bw)), (az._2 / A))
402+func bz (bA,bB) = {
403+ let bC = bt[bB]
404+ func bD (aF,aG) = $Tuple2((((((aF._1 + bu(aF._2, bC)) + bu((aF._2 / B), bC)) + bu((aF._2 / C), bC)) + bu((aF._2 / D), bC)) + bu((aF._2 / E), bC)), (aF._2 / F))
393405
394- let by = {
395- let aB = [1, 2, 3, 4, 5]
396- let aC = size(aB)
397- let aD = $Tuple2("", (bu / v))
398- func aE (aF,aG) = if ((aG >= aC))
399- then aF
400- else bx(aF, aB[aG])
406+ let bE = {
407+ let aH = [1, 2, 3, 4, 5]
408+ let aI = size(aH)
409+ let aJ = $Tuple2("", (bA / A))
410+ func aK (aL,aM) = if ((aM >= aI))
411+ then aL
412+ else bD(aL, aH[aM])
401413
402- func aH (aF,aG) = if ((aG >= aC))
403- then aF
414+ func aN (aL,aM) = if ((aM >= aI))
415+ then aL
404416 else throw("List size exceeds 5")
405417
406- aH(aE(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4), 5)
418+ aN(aK(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4), 5)
407419 }
408- by._1
420+ bE._1
409421 }
410422
411423
412-func bz (bA) = {
413- let bB = split(valueOrElse(getString(bA), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
414-[toString(valueOrElse(parseInt(bB[al]), 0)), if ((size(split(bB[am], "_")) == l))
415- then bB[am]
416- else "0_0_0_0_0_0", if ((size(split(bB[an], "_")) == l))
417- then bB[an]
418- else "0_0_0_0_0_0", bB[ao]]
424+func bF (bG) = {
425+ let bH = split(valueOrElse(getString(bG), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
426+[toString(valueOrElse(parseInt(bH[ar]), 0)), if ((size(split(bH[as], "_")) == l))
427+ then bH[as]
428+ else "0_0_0_0_0_0", if ((size(split(bH[at], "_")) == l))
429+ then bH[at]
430+ else "0_0_0_0_0_0", bH[au]]
419431 }
420432
421433
422-func bC (aJ,bD,bE,bF,bG) = if (!(sigVerify_8Kb(bF, bG, g)))
434+func bI (aP,bJ,bK,bL,bM) = if (!(sigVerify_8Kb(bL, bM, g)))
423435 then throw("signature does not match")
424436 else {
425- let bH = split(toUtf8String(bF), ";")
426- let bI = split(split(bH[0], "|")[0], "_")
427- let bJ = parseIntValue(bI[0])
428- let bK = parseIntValue(bI[1])
429- let bL = split(bH[1], ":")
430- let bM = split(bL[0], "_")
431- if ((bM[1] != "E"))
437+ let bN = split(toUtf8String(bL), ";")
438+ let bO = split(split(bN[0], "|")[0], "_")
439+ let bP = parseIntValue(bO[0])
440+ let bQ = parseIntValue(bO[1])
441+ let bR = split(bN[1], ":")
442+ let bS = split(bR[0], "_")
443+ if ((bS[1] != "E"))
432444 then throw("expedition target location type should be E")
433445 else {
434- let bN = parseIntValue(bL[1])
435- if (if ((bN > (lastBlock.timestamp + o)))
446+ let bT = parseIntValue(bR[1])
447+ if (if ((bT > (lastBlock.timestamp + t)))
436448 then true
437- else ((lastBlock.timestamp - o) > bN))
449+ else ((lastBlock.timestamp - t) > bT))
438450 then throw("signature outdated")
439451 else {
440- let bO = toString(bD)
441- let aa = valueOrErrorMessage(getString(V(bO)), "You don't have a duck staked")
442- let bP = ac(aa)
443- let bQ = valueOrElse(getInteger(bP), 100)
444- if ((bQ != bJ))
445- then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bP), 100))) + " from state does not match one from flight log=") + toString(bJ)))
446- else if ((0 >= bJ))
452+ let bU = toString(bJ)
453+ let ag = valueOrErrorMessage(getString(ab(bU)), "You don't have a duck staked")
454+ let bV = ai(ag)
455+ let bW = valueOrElse(getInteger(bV), 100)
456+ if ((bW != bP))
457+ then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bV), 100))) + " from state does not match one from flight log=") + toString(bP)))
458+ else if ((0 >= bP))
447459 then throw("You can't fly with zero health")
448- else if ((0 >= bK))
449- then $Tuple2(((if (!(aJ))
450- then [ScriptTransfer(bD, t, b)]
451- else nil) :+ IntegerEntry(bP, 0)), "")
460+ else if ((0 >= bQ))
461+ then $Tuple2(((if (!(aP))
462+ then [ScriptTransfer(bJ, y, b)]
463+ else nil) :+ IntegerEntry(bV, 0)), "")
452464 else {
453- let bA = Z(aa)
454- let bR = bz(bA)
455- let bS = split(bR[an], "_")
456- let bT = makeString(aI(aJ, bS, s), "_")
457- let bU = bl(toBigInt(bE))
458- let bV = valueOrElse(getInteger(E()), 501)
459- let G = toString(bV)
460- let bv = toInt((bU % v))
461- let aZ = bt(bU, bv)
462- let bW = C[bv]
463- let bX = Issue(H(G, "S"), makeString([G, "S", aZ, bW], "_"), 1, 0, false)
464- let K = calculateAssetId(bX)
465- let bY = toBase58String(K)
466- $Tuple2([IntegerEntry(E(), (bV + 1)), bX, StringEntry(F(G), bY), StringEntry(J(bY), bO), StringEntry(Y(G), bO), IntegerEntry(N(bY), 0), IntegerEntry(O(bY, bO), 0), ScriptTransfer(bD, 1, K), StringEntry(ab(aa), makeString([bW, "L", bY], "_")), IntegerEntry(bP, bK), StringEntry(bA, makeString([bR[al], bR[am], bT, bR[ao]], ":"))], bY)
465+ let bG = af(ag)
466+ let bX = bF(bG)
467+ let bY = split(bX[at], "_")
468+ let bZ = makeString(aO(aP, bY, x), "_")
469+ let ca = br(toBigInt(bK))
470+ let cb = valueOrElse(getInteger(K()), (J + 1))
471+ let M = toString(cb)
472+ let bB = toInt((ca % A))
473+ let bf = bz(ca, bB)
474+ let cc = H[bB]
475+ let cd = Issue(N(M, "S"), makeString([M, "S", bf, cc], "_"), 1, 0, false)
476+ let Q = calculateAssetId(cd)
477+ let ce = toBase58String(Q)
478+ $Tuple2([IntegerEntry(K(), (cb + 1)), cd, StringEntry(L(M), ce), StringEntry(P(ce), bU), StringEntry(ae(M), bU), IntegerEntry(T(ce), 0), IntegerEntry(U(ce, bU), 0), ScriptTransfer(bJ, 1, Q), StringEntry(ah(ag), makeString([cc, "L", ce], "_")), IntegerEntry(bV, bQ), StringEntry(bG, makeString([bX[ar], bX[as], bZ, bX[au]], ":"))], ce)
467479 }
468480 }
469481 }
470482 }
471483
472484
473-func bZ (ca,cb) = {
474- let cc = valueOrElse(getInteger(N(ca)), 0)
475- let cd = valueOrElse(getInteger(S(D, ca)), if (valueOrElse(getBoolean(Q(ca)), false))
476- then cb
485+func cf (cg,ch) = {
486+ let ci = valueOrElse(getInteger(T(cg)), 0)
487+ let cj = valueOrElse(getInteger(Y(I, cg)), if (valueOrElse(getBoolean(W(cg)), false))
488+ then ch
477489 else 0)
478- ((m + fraction(m, cc, 4)) + fraction(m, (cd * 3), (cb * 20)))
490+ ((r + fraction(r, ci, 4)) + fraction(r, (cj * 3), (ch * 20)))
479491 }
480492
481493
482-func ce (cf) = {
483- let aa = valueOrErrorMessage(getString(V(cf)), "You don't have a duck staked")
484- let cg = valueOrElse(getString(ab(aa)), k)
485- let ch = split(value(cg), "_")
486- if ((ch[aj] != "L"))
487- then throw((("Duck location type is " + ch[aj]) + ", but should be L"))
494+func ck (cl) = {
495+ let ag = valueOrErrorMessage(getString(ab(cl)), "You don't have a duck staked")
496+ let cm = valueOrElse(getString(ah(ag)), k)
497+ let cn = split(value(cm), "_")
498+ if ((cn[ap] != "L"))
499+ then throw((("Duck location type is " + cn[ap]) + ", but should be L"))
488500 else {
489- let ca = ch[ak]
490- let ci = value(assetInfo(fromBase58String(ca)))
491- let cj = M(ca)
492- let ck = valueOrErrorMessage(getInteger(cj), (("NFT " + ci.name) + " is not staked"))
493- let cl = valueOrErrorMessage(getString(J(ca)), (("NFT " + ci.name) + " is orphaned"))
494- if ((cl != cf))
501+ let cg = cn[aq]
502+ let co = value(assetInfo(fromBase58String(cg)))
503+ let cp = S(cg)
504+ let cq = valueOrErrorMessage(getInteger(cp), (("Your duck is on " + co.name) + ", which is not staked"))
505+ let cr = valueOrErrorMessage(getString(P(cg)), (("NFT " + co.name) + " is orphaned"))
506+ if ((cr != cl))
495507 then throw((i + " is not yours"))
496508 else {
497- let cm = split(ci.description, "_")
498- $Tuple4(aa, ca, cm, ck)
509+ let cs = split(co.description, "_")
510+ $Tuple4(ag, cg, cs, cq)
499511 }
500512 }
501513 }
502514
503515
504-func cn (cf,bd) = {
505- let co = ce(cf)
506- let I = co._3[af]
507- let aS = aY(co._3[ag])
508- let bh = (lastBlock.timestamp - co._4)
509- if ((0 > bh))
510- then throw(((("Saved timestamp is in future, saved = " + toString(co._4)) + ", current = ") + toString(lastBlock.timestamp)))
516+func ct (cl,bj) = if ((0 > bj))
517+ then throw("Negative amount")
518+ else {
519+ let cu = ck(cl)
520+ let O = cu._3[al]
521+ let aY = be(cu._3[am])
522+ let bn = (lastBlock.timestamp - cu._4)
523+ if ((0 > bn))
524+ then throw(((("Saved timestamp is in future, saved = " + toString(cu._4)) + ", current = ") + toString(lastBlock.timestamp)))
525+ else {
526+ let ch = bg(O)
527+ let cv = cf(cu._2, ch)
528+ let cw = fraction(bn, (cv * ch), s)
529+ if ((bj > cw))
530+ then throw(((("Not enough resources, available = " + toString(cw)) + ", requested = ") + toString(bj)))
531+ else {
532+ let cx = fraction((cw - bj), s, (cv * ch))
533+ let cy = (lastBlock.timestamp - cx)
534+ let bG = af(cu._1)
535+ let bX = bF(bG)
536+ let bm = split(bX[as], "_")
537+ let cz = bl(bm, aY, (bn - cx), (ch / m), cv)
538+ $Tuple3([IntegerEntry(S(cu._2), cy), IntegerEntry(ac(i, cu._2, cl), cy)], bG, [bX[ar], cz, bX[at], bX[au]])
539+ }
540+ }
541+ }
542+
543+
544+func cA (cl,cg,ch) = {
545+ let cp = S(cg)
546+ let cq = value(getInteger(cp))
547+ let cw = (fraction((lastBlock.timestamp - cq), cf(cg, ch), s) * ch)
548+ ct(cl, cw)
549+ }
550+
551+
552+func cB (aP,bJ,cC) = {
553+ let cl = toString(bJ)
554+ let cu = ck(cl)
555+ let ch = bg(cu._3[al])
556+ let cD = T(cu._2)
557+ let cE = valueOrElse(getInteger(cD), 0)
558+ if ((cE >= 3))
559+ then throw("Currently max infrastructure level = 3")
511560 else {
512- let cb = ba(I)
513- let cp = bZ(co._2, cb)
514- let cq = fraction(bh, (cp * cb), n)
515- if ((bd > cq))
516- then throw(((("Not enough resources, available = " + toString(cq)) + ", requested = ") + toString(bd)))
561+ let cF = (cE + 1)
562+ let cG = fraction(w, (ch * cF), m)
563+ if (if (!(aP))
564+ then (cC != cG)
565+ else false)
566+ then throw(("Payment attached should be " + toString(cG)))
517567 else {
518- let cr = fraction((cq - bd), n, (cp * cb))
519- let cs = (lastBlock.timestamp - cr)
520- let bA = Z(co._1)
521- let bR = bz(bA)
522- let bg = split(bR[am], "_")
523- let ct = bf(bg, aS, (bh - cr), (cb / 25), cp)
524- $Tuple3([IntegerEntry(M(co._2), cs), IntegerEntry(W(i, co._2, cf), cs)], bA, [bR[al], ct, bR[an], bR[ao]])
568+ let bG = af(cu._1)
569+ let bX = bF(bG)
570+ let bY = split(bX[at], "_")
571+ let bZ = makeString(aO(aP, bY, fraction(v, (ch * cF), m)), "_")
572+ let cH = cA(cl, cu._2, ch)
573+ $Tuple2(([IntegerEntry(cD, cF), IntegerEntry(U(cu._2, cl), cF), StringEntry(bG, makeString([bX[ar], cH._3[as], bZ, bX[au]], ":"))] ++ cH._1), cF)
525574 }
526575 }
527576 }
528577
529578
530-func cu (cf,ca,cb) = {
531- let cj = M(ca)
532- let ck = value(getInteger(cj))
533- let cq = (fraction((lastBlock.timestamp - ck), bZ(ca, cb), n) * cb)
534- cn(cf, cq)
535- }
536-
537-
538-func cv (aJ,bD,cw) = {
539- let cf = toString(bD)
540- let co = ce(cf)
541- let cb = ba(co._3[af])
542- let cx = N(co._2)
543- let cy = valueOrElse(getInteger(cx), 0)
544- if ((cy >= 3))
545- then throw("Currently max infrastructure level = 3")
546- else {
547- let cz = (cy + 1)
548- let cA = fraction(r, (cb * cz), 25)
549- if (if (!(aJ))
550- then (cw != cA)
551- else false)
552- then throw(("Payment attached should be " + toString(cA)))
553- else {
554- let bA = Z(co._1)
555- let bR = bz(bA)
556- let bS = split(bR[an], "_")
557- let bT = makeString(aI(aJ, bS, fraction(q, (cb * cz), 25)), "_")
558- let cB = cu(cf, co._2, cb)
559- $Tuple2(([IntegerEntry(cx, cz), IntegerEntry(O(co._2, cf), cz), StringEntry(bA, makeString([bR[al], cB._3[am], bT, bR[ao]], ":"))] ++ cB._1), cz)
560- }
561- }
562- }
563-
564-
565-func cC (cf) = {
566- let co = ce(cf)
567- let ca = co._2
568- let cD = Q(ca)
569- if (valueOrElse(getBoolean(cD), false))
579+func cI (cl) = {
580+ let cu = ck(cl)
581+ let cg = cu._2
582+ let cJ = W(cg)
583+ if (valueOrElse(getBoolean(cJ), false))
570584 then throw("Presale artifact is already activated")
571- else if ((parseIntValue(co._3[ae]) > 500))
572- then throw((((i + " ") + ca) + " is not eligible for presale artifact"))
585+ else if ((parseIntValue(cu._3[ak]) > J))
586+ then throw((((i + " ") + cg) + " is not eligible for presale artifact"))
573587 else {
574- let cb = ba(co._3[af])
575- let cB = cu(cf, ca, cb)
576- (((((cB._1 :+ BooleanEntry(cD, true)) :+ BooleanEntry(R(ca, cf), true)) :+ IntegerEntry(S(D, ca), cb)) :+ IntegerEntry(U(D, ca, cf), cb)) :+ StringEntry(cB._2, makeString(cB._3, ":")))
588+ let ch = bg(cu._3[al])
589+ let cH = cA(cl, cg, ch)
590+ (((((cH._1 :+ BooleanEntry(cJ, true)) :+ BooleanEntry(X(cg, cl), true)) :+ IntegerEntry(Y(I, cg), ch)) :+ IntegerEntry(aa(I, cg, cl), ch)) :+ StringEntry(cH._2, makeString(cH._3, ":")))
577591 }
578592 }
579593
580594
581-func cE (cF,cz,cG,cf,cH,bE,cI) = {
582- let aa = valueOrErrorMessage(getString(V(cf)), "You don't have a duck staked")
583- func cJ (az,ca) = {
584- let ci = value(assetInfo(fromBase58String(ca)))
585- let cj = M(ca)
586- let ck = valueOrErrorMessage(getInteger(cj), (("NFT " + ci.name) + " is not staked"))
587- let cl = valueOrErrorMessage(getString(J(ca)), (("NFT " + ci.name) + " is orphaned"))
588- if ((cl != cf))
595+func cK (cL,cF,cM,cl,cN,bK,cO) = {
596+ let ag = valueOrErrorMessage(getString(ab(cl)), "You don't have a duck staked")
597+ func cP (aF,cg) = {
598+ let co = value(assetInfo(fromBase58String(cg)))
599+ let cp = S(cg)
600+ let cq = valueOrErrorMessage(getInteger(cp), (("NFT " + co.name) + " is not staked"))
601+ let cr = valueOrErrorMessage(getString(P(cg)), (("NFT " + co.name) + " is orphaned"))
602+ if ((cr != cl))
589603 then throw((i + " is not yours"))
590604 else {
591- let cm = split(ci.description, "_")
592- let bW = cm[ah]
593- if (if ((az._3 != ""))
594- then (az._3 != bW)
605+ let cs = split(co.description, "_")
606+ let cc = cs[an]
607+ if (if ((aF._3 != ""))
608+ then (aF._3 != cc)
595609 else false)
596610 then throw("Lands should be on the same continent to merge")
597611 else {
598- let I = cm[af]
599- let cK = az._1
600- let aW = valueOrErrorMessage(indexOf(cK, I), "You haven't passed all the lands needed")
601- let cL = (take(cK, aW) + drop(cK, (aW + 1)))
602- let cb = ba(I)
603- let cM = (az._2 + valueOrElse(getInteger(S(D, ca)), if (valueOrElse(getBoolean(Q(ca)), false))
604- then cb
612+ let O = cs[al]
613+ let cQ = aF._1
614+ let bc = valueOrErrorMessage(indexOf(cQ, O), "You haven't passed all the lands needed")
615+ let cR = (take(cQ, bc) + drop(cQ, (bc + 1)))
616+ let ch = bg(O)
617+ let cS = (aF._2 + valueOrElse(getInteger(Y(I, cg)), if (valueOrElse(getBoolean(W(cg)), false))
618+ then ch
605619 else 0))
606- let cc = valueOrElse(getInteger(N(ca)), 0)
607- let cN = {
608- let c = I
620+ let ci = valueOrElse(getInteger(T(cg)), 0)
621+ let cT = {
622+ let c = O
609623 if (("S" == c))
610624 then 3
611625 else if (("M" == c))
612626 then 4
613627 else if (("L" == c))
614628 then 5
615629 else if (("XL" == c))
616630 then 6
617631 else throw("Only S, M, L, XL can merge")
618632 }
619- if ((cc != cN))
633+ if ((ci != cT))
620634 then throw("All lands should be maxed to merge")
621635 else {
622- let G = cm[ae]
623- let aS = aY(cm[ag])
624- let bh = (lastBlock.timestamp - ck)
625- if ((0 > bh))
626- then throw(((("Saved timestamp is in future, saved = " + toString(ck)) + ", current = ") + toString(lastBlock.timestamp)))
636+ let M = cs[ak]
637+ let aY = be(cs[am])
638+ let bn = (lastBlock.timestamp - cq)
639+ if ((0 > bn))
640+ then throw(((("Saved timestamp is in future, saved = " + toString(cq)) + ", current = ") + toString(lastBlock.timestamp)))
627641 else {
628- let cp = bZ(ca, cb)
629- let ct = bf(split(az._4, "_"), aS, bh, (cb / 25), cp)
630- let au = aQ(split(az._6, "_"), aS, (cb / 25), -1)
631- $Tuple6(cL, cM, bW, ct, (((((((((((((az._5 :+ DeleteEntry(M(ca))) :+ DeleteEntry(W(i, ca, cf))) :+ DeleteEntry(F(G))) :+ DeleteEntry(H(G, I))) :+ DeleteEntry(J(ca))) :+ DeleteEntry(N(ca))) :+ DeleteEntry(O(ca, cf))) :+ DeleteEntry(Q(ca))) :+ DeleteEntry(R(ca, cf))) :+ DeleteEntry(S(D, ca))) :+ DeleteEntry(U(D, ca, cf))) :+ DeleteEntry(Y(G))) :+ Burn(fromBase58String(ca), 1)), au)
642+ let cv = cf(cg, ch)
643+ let cz = bl(split(aF._4, "_"), aY, bn, (ch / m), cv)
644+ let aA = aW(split(aF._6, "_"), aY, (ch / m), -1)
645+ $Tuple6(cR, cS, cc, cz, (((((((((((((aF._5 :+ DeleteEntry(S(cg))) :+ DeleteEntry(ac(i, cg, cl))) :+ DeleteEntry(L(M))) :+ DeleteEntry(N(M, O))) :+ DeleteEntry(P(cg))) :+ DeleteEntry(T(cg))) :+ DeleteEntry(U(cg, cl))) :+ DeleteEntry(W(cg))) :+ DeleteEntry(X(cg, cl))) :+ DeleteEntry(Y(I, cg))) :+ DeleteEntry(aa(I, cg, cl))) :+ DeleteEntry(ae(M))) :+ Burn(fromBase58String(cg), 1)), aA)
632646 }
633647 }
634648 }
635649 }
636650 }
637651
638- let bA = Z(aa)
639- let bR = bz(bA)
640- let cO = valueOrElse(getString(ad()), "0_0_0_0_0_0")
641- let av = {
642- let aB = cH
643- let aC = size(aB)
644- let aD = $Tuple6(cG, 0, "", bR[am], nil, cO)
645- func aE (aF,aG) = if ((aG >= aC))
646- then aF
647- else cJ(aF, aB[aG])
652+ let bG = af(ag)
653+ let bX = bF(bG)
654+ let cU = valueOrElse(getString(aj()), "0_0_0_0_0_0")
655+ let aB = {
656+ let aH = cN
657+ let aI = size(aH)
658+ let aJ = $Tuple6(cM, 0, "", bX[as], nil, cU)
659+ func aK (aL,aM) = if ((aM >= aI))
660+ then aL
661+ else cP(aL, aH[aM])
648662
649- func aH (aF,aG) = if ((aG >= aC))
650- then aF
663+ func aN (aL,aM) = if ((aM >= aI))
664+ then aL
651665 else throw("List size exceeds 4")
652666
653- aH(aE(aE(aE(aE(aD, 0), 1), 2), 3), 4)
667+ aN(aK(aK(aK(aK(aJ, 0), 1), 2), 3), 4)
654668 }
655- let bW = av._3
656- let bv = valueOrErrorMessage(indexOf(C, bW), ("Unknown continent: " + bW))
657- let aZ = bt(bl(toBigInt(bE)), bv)
658- let bV = valueOrElse(getInteger(E()), 501)
659- let cP = toString(bV)
660- let bX = Issue(H(cP, cF), makeString([cP, cF, aZ, bW], "_"), 1, 0, false)
661- let K = calculateAssetId(bX)
662- let cQ = toBase58String(K)
663- let bT = makeString(aI((cI > 0), split(bR[an], "_"), cI), "_")
664- $Tuple2((((((((((((((av._5 :+ IntegerEntry(E(), (bV + 1))) :+ bX) :+ StringEntry(F(cP), cQ)) :+ StringEntry(J(cQ), cf)) :+ StringEntry(Y(cP), cf)) :+ IntegerEntry(S(D, cQ), av._2)) :+ IntegerEntry(U(D, cQ, cf), av._2)) :+ IntegerEntry(N(cQ), cz)) :+ IntegerEntry(O(cQ, cf), cz)) :+ StringEntry(bA, makeString([bR[al], av._4, bT, bR[ao]], ":"))) :+ StringEntry(ad(), av._6)) :+ StringEntry(ab(aa), makeString([bW, "L", cQ], "_"))) :+ ScriptTransfer(addressFromStringValue(cf), 1, K)), cQ)
669+ let cc = aB._3
670+ let bB = valueOrErrorMessage(indexOf(H, cc), ("Unknown continent: " + cc))
671+ let bf = bz(br(toBigInt(bK)), bB)
672+ let cb = valueOrElse(getInteger(K()), (J + 1))
673+ let cV = toString(cb)
674+ let cd = Issue(N(cV, cL), makeString([cV, cL, bf, cc], "_"), 1, 0, false)
675+ let Q = calculateAssetId(cd)
676+ let cW = toBase58String(Q)
677+ let bZ = makeString(aO((cO > 0), split(bX[at], "_"), cO), "_")
678+ $Tuple2((((((((((((((aB._5 :+ IntegerEntry(K(), (cb + 1))) :+ cd) :+ StringEntry(L(cV), cW)) :+ StringEntry(P(cW), cl)) :+ StringEntry(ae(cV), cl)) :+ IntegerEntry(Y(I, cW), aB._2)) :+ IntegerEntry(aa(I, cW, cl), aB._2)) :+ IntegerEntry(T(cW), cF)) :+ IntegerEntry(U(cW, cl), cF)) :+ StringEntry(bG, makeString([bX[ar], aB._4, bZ, bX[au]], ":"))) :+ StringEntry(aj(), aB._6)) :+ StringEntry(ah(ag), makeString([cc, "L", cW], "_"))) :+ ScriptTransfer(addressFromStringValue(cl), 1, Q)), cW)
665679 }
666680
667681
668-func cR (cf,cH,bE) = cE("M", 3, "SSSS", cf, cH, bE, 0)
682+func cX (cl,cN,bK) = cK("M", 3, "SSSS", cl, cN, bK, 0)
669683
670684
671-func cS (cf,cH,bE,aJ,cw) = {
672- let cA = (r * 4)
673- if (if (!(aJ))
674- then (cw != cA)
685+func cY (cl,cN,bK,aP,cC) = {
686+ let cG = (w * 4)
687+ if (if (!(aP))
688+ then (cC != cG)
675689 else false)
676- then throw(("Payment attached should be " + toString(cA)))
677- else cE("L", 4, "SMM", cf, cH, bE, (q * 4))
690+ then throw(("Payment attached should be " + toString(cG)))
691+ else cK("L", 4, "SMM", cl, cN, bK, (v * 4))
678692 }
679693
680694
681-func cT (cf,cH,bE,aJ,cw) = {
682- let cA = (r * 47)
683- if (if (!(aJ))
684- then (cw != cA)
695+func cZ (cl,cN,bK,aP,cC) = {
696+ let cG = (w * 47)
697+ if (if (!(aP))
698+ then (cC != cG)
685699 else false)
686- then throw(("Payment attached should be " + toString(cA)))
687- else cE("XL", 5, "SSSML", cf, cH, bE, (q * 47))
700+ then throw(("Payment attached should be " + toString(cG)))
701+ else cK("XL", 5, "SSSML", cl, cN, bK, (v * 47))
688702 }
689703
690704
691-func cU (cf,cH,bE,aJ,cw) = {
692- let cA = (r * 54)
693- if (if (!(aJ))
694- then (cw != cA)
705+func da (cl,cN,bK,aP,cC) = {
706+ let cG = (w * 54)
707+ if (if (!(aP))
708+ then (cC != cG)
695709 else false)
696- then throw(("Payment attached should be " + toString(cA)))
697- else cE("XXL", 6, "LXL", cf, cH, bE, (q * 54))
710+ then throw(("Payment attached should be " + toString(cG)))
711+ else cK("XXL", 6, "LXL", cl, cN, bK, (v * 54))
698712 }
699713
700714
701-func cV (aJ,cf,cw,cH,bE) = {
702- let cW = {
703- let c = size(cH)
715+func db (aP,cl,cC,cN,bK) = {
716+ let dc = {
717+ let c = size(cN)
704718 if ((4 == c))
705- then cR(cf, cH, bE)
719+ then cX(cl, cN, bK)
706720 else if ((3 == c))
707- then cS(cf, cH, bE, aJ, cw)
721+ then cY(cl, cN, bK, aP, cC)
708722 else if ((5 == c))
709- then cT(cf, cH, bE, aJ, cw)
723+ then cZ(cl, cN, bK, aP, cC)
710724 else if ((2 == c))
711- then cU(cf, cH, bE, aJ, cw)
725+ then da(cl, cN, bK, aP, cC)
712726 else throw("Unknown merge")
713727 }
714- cW
728+ dc
715729 }
716730
717731
718-@Callable(aW)
719-func stakeLand () = {
720- let cX = value(aW.payments[0])
721- let K = value(cX.assetId)
722- let cY = toString(aW.caller)
723- if ((cX.amount != 1))
724- then throw((("NFT " + i) + " token should be attached as payment"))
725- else {
726- let ci = value(assetInfo(K))
727- if ((ci.issuer != this))
728- then throw("Unknown issuer of token")
729- else if (!(contains(ci.name, i)))
730- then throw((("Only NFT " + i) + " tokens are accepted"))
731- else {
732- let cZ = drop(ci.name, 4)
733- let G = if (contains(cZ, "XXL"))
734- then dropRight(cZ, 3)
735- else if (contains(cZ, "XL"))
736- then dropRight(cZ, 2)
737- else dropRight(cZ, 1)
738- let da = valueOrErrorMessage(parseInt(G), ("Cannot parse land number from " + ci.name))
739- let ca = toBase58String(K)
740- let cj = M(ca)
741- if (isDefined(getInteger(cj)))
742- then throw((("NFT " + ci.name) + " is already staked"))
743- else {
744- let cm = split(ci.description, "_")
745- let aS = aY(cm[ag])
746- let au = aX(aS, (ba(cm[af]) / 25), 1)
747-[IntegerEntry(cj, lastBlock.timestamp), IntegerEntry(W(i, ca, cY), lastBlock.timestamp), StringEntry(J(ca), cY), StringEntry(Y(G), cY), StringEntry(ad(), au)]
748- }
749- }
750- }
751- }
752-
753-
754-
755-@Callable(aW)
756-func unstakeLand (db) = if ((size(aW.payments) != 0))
757- then throw("unstake doesn't require any payments")
732+@Callable(bc)
733+func stakeLand () = if ((size(bc.payments) != 1))
734+ then throw("Exactly one payment required")
758735 else {
759- let cf = toString(aW.caller)
760- let co = ce(cf)
761- let aS = aY(co._3[ag])
762- let cb = ba(co._3[af])
763- let au = aX(aS, (cb / 25), -1)
764- let cB = cu(cf, co._2, cb)
765-[ScriptTransfer(aW.caller, 1, fromBase58String(co._2)), DeleteEntry(M(co._2)), DeleteEntry(W(i, co._2, cf)), StringEntry(ad(), au), StringEntry(cB._2, makeString(cB._3, ":"))]
736+ let dd = value(bc.payments[0])
737+ let Q = value(dd.assetId)
738+ let de = toString(bc.caller)
739+ if ((dd.amount != 1))
740+ then throw((("NFT " + i) + " token should be attached as payment"))
741+ else {
742+ let co = value(assetInfo(Q))
743+ if ((co.issuer != this))
744+ then throw("Unknown issuer of token")
745+ else if (!(contains(co.name, i)))
746+ then throw((("Only NFT " + i) + " tokens are accepted"))
747+ else {
748+ let df = drop(co.name, 4)
749+ let M = if (contains(df, "XXL"))
750+ then dropRight(df, 3)
751+ else if (contains(df, "XL"))
752+ then dropRight(df, 2)
753+ else dropRight(df, 1)
754+ if (!(isDefined(parseInt(M))))
755+ then throw(("Cannot parse land number from " + co.name))
756+ else {
757+ let cg = toBase58String(Q)
758+ let cp = S(cg)
759+ if (isDefined(getInteger(cp)))
760+ then throw((("NFT " + co.name) + " is already staked"))
761+ else {
762+ let cs = split(co.description, "_")
763+ let aY = be(cs[am])
764+ let aA = bd(aY, (bg(cs[al]) / m), 1)
765+[IntegerEntry(cp, lastBlock.timestamp), IntegerEntry(ac(i, cg, de), lastBlock.timestamp), StringEntry(P(cg), de), StringEntry(ae(M), de), StringEntry(aj(), aA)]
766+ }
767+ }
768+ }
769+ }
766770 }
767771
768772
769773
770-@Callable(aW)
771-func stakeDuck () = {
772- let cX = value(aW.payments[0])
773- let K = value(cX.assetId)
774- let cY = toString(aW.caller)
775- if ((cX.amount != 1))
776- then throw((("NFT " + j) + " token should be attached as payment"))
777- else {
778- let ci = value(assetInfo(K))
779- if (if ((ci.issuer != d))
780- then (ci.issuer != e)
781- else false)
782- then throw((("Unknown issuer of " + j) + " token"))
783- else if (!(contains(ci.name, j)))
784- then throw((("Only NFT " + j) + " tokens are accepted"))
785- else {
786- let dc = toBase58String(K)
787- let cj = M(dc)
788- if (isDefined(getInteger(cj)))
789- then throw((("NFT " + ci.name) + " is already staked"))
790- else if (isDefined(getString(V(cY))))
791- then throw(("You already staked one duck: " + ci.name))
792- else {
793- let dd = ab(dc)
794- let de = getString(dd)
795- let bP = ac(dc)
796- let df = getInteger(bP)
797- let bA = Z(dc)
798- let dg = getString(bA)
799- ([IntegerEntry(cj, lastBlock.timestamp), IntegerEntry(W(j, toBase58String(K), cY), lastBlock.timestamp), StringEntry(L(dc), cY), StringEntry(V(cY), dc)] ++ (if (isDefined(de))
800- then nil
801- else ([StringEntry(dd, k)] ++ (if (isDefined(df))
802- then nil
803- else ([IntegerEntry(bP, 100)] ++ (if (isDefined(dg))
804- then nil
805- else [StringEntry(bA, "0:0_0_0_0_0_0:0_0_0_0_0_0:")]))))))
806- }
807- }
808- }
809- }
774+@Callable(bc)
775+func unstakeLand (dg) = if ((size(bc.payments) != 0))
776+ then throw("unstake doesn't require any payments")
777+ else {
778+ let cl = toString(bc.caller)
779+ let cu = ck(cl)
780+ let aY = be(cu._3[am])
781+ let ch = bg(cu._3[al])
782+ let aA = bd(aY, (ch / m), -1)
783+ let cH = cA(cl, cu._2, ch)
784+[ScriptTransfer(bc.caller, 1, fromBase58String(cu._2)), DeleteEntry(S(cu._2)), DeleteEntry(ac(i, cu._2, cl)), StringEntry(aj(), aA), StringEntry(cH._2, makeString(cH._3, ":"))]
785+ }
810786
811787
812788
813-@Callable(aW)
814-func unstakeDuck (dc) = if ((size(aW.payments) != 0))
789+@Callable(bc)
790+func stakeDuck () = if ((size(bc.payments) != 1))
791+ then throw("Exactly one payment required")
792+ else {
793+ let dd = value(bc.payments[0])
794+ let Q = value(dd.assetId)
795+ let de = toString(bc.caller)
796+ if ((dd.amount != 1))
797+ then throw((("NFT " + j) + " token should be attached as payment"))
798+ else {
799+ let co = value(assetInfo(Q))
800+ if (if ((co.issuer != d))
801+ then (co.issuer != e)
802+ else false)
803+ then throw((("Unknown issuer of " + j) + " token"))
804+ else if (!(contains(co.name, j)))
805+ then throw((("Only NFT " + j) + " tokens are accepted"))
806+ else {
807+ let dh = toBase58String(Q)
808+ let cp = S(dh)
809+ if (isDefined(getInteger(cp)))
810+ then throw((("NFT " + co.name) + " is already staked"))
811+ else if (isDefined(getString(ab(de))))
812+ then throw(("You already staked one duck: " + co.name))
813+ else {
814+ let di = ah(dh)
815+ let dj = getString(di)
816+ let bG = af(dh)
817+ let dk = getString(bG)
818+ ([IntegerEntry(cp, lastBlock.timestamp), IntegerEntry(ac(j, toBase58String(Q), de), lastBlock.timestamp), StringEntry(R(dh), de), StringEntry(ab(de), dh)] ++ (if (isDefined(dj))
819+ then nil
820+ else ([StringEntry(di, k)] ++ (if (isDefined(dk))
821+ then nil
822+ else ([StringEntry(bG, "0:0_0_0_0_0_0:0_0_0_0_0_0:")] :+ IntegerEntry(ai(dh), 100))))))
823+ }
824+ }
825+ }
826+ }
827+
828+
829+
830+@Callable(bc)
831+func unstakeDuck (dh) = if ((size(bc.payments) != 0))
815832 then throw("unstake doesn't require any payments")
816833 else {
817- let K = fromBase58String(dc)
818- let cY = toString(aW.caller)
819- let ci = value(assetInfo(K))
820- if (if ((ci.issuer != d))
821- then (ci.issuer != e)
822- else false)
823- then throw((("Unknown issuer of " + j) + " token"))
824- else if (!(contains(ci.name, j)))
825- then throw((("Only NFT " + j) + " tokens can be unstaked"))
834+ let Q = fromBase58String(dh)
835+ let de = toString(bc.caller)
836+ let co = value(assetInfo(Q))
837+ let cp = S(toBase58String(Q))
838+ if (!(isDefined(cp)))
839+ then throw((("NFT " + co.name) + " is not staked"))
840+ else if (!(isDefined(ab(de))))
841+ then throw((("The duck " + co.name) + " is not staked"))
826842 else {
827- let cj = M(toBase58String(K))
828- if (!(isDefined(cj)))
829- then throw((("NFT " + ci.name) + " is not staked"))
830- else if (!(isDefined(V(cY))))
831- then throw((("The duck " + ci.name) + " is not staked"))
832- else {
833- let cl = valueOrErrorMessage(getString(L(toBase58String(K))), (("NFT " + ci.name) + " is orphaned"))
834- if ((cl != cY))
835- then throw("Staked NFT is not yours")
836- else [ScriptTransfer(aW.caller, 1, K), DeleteEntry(cj), DeleteEntry(ab(dc)), DeleteEntry(L(dc)), DeleteEntry(W(j, dc, cY)), DeleteEntry(V(cY))]
837- }
843+ let cr = valueOrErrorMessage(getString(R(toBase58String(Q))), (("NFT " + co.name) + " is orphaned"))
844+ if ((cr != de))
845+ then throw("Staked NFT is not yours")
846+ else {
847+ let bV = ai(dh)
848+ let dl = getInteger(bV)
849+ if ((dl != 100))
850+ then throw("Please heal your duck before unstaking")
851+ else [ScriptTransfer(bc.caller, 1, Q), DeleteEntry(cp), DeleteEntry(bV), DeleteEntry(ah(dh)), DeleteEntry(R(dh)), DeleteEntry(ac(j, dh, de)), DeleteEntry(ab(de))]
852+ }
838853 }
839854 }
840855
841856
842857
843-@Callable(aW)
844-func claimRes (bd,db) = if ((size(aW.payments) != 0))
858+@Callable(bc)
859+func claimRes (bj,dg) = if ((size(bc.payments) != 0))
845860 then throw("claimRes doesn't require any payments")
846861 else {
847- let cf = toString(aW.originCaller)
848- let aP = cn(cf, bd)
849- $Tuple2((aP._1 :+ StringEntry(aP._2, makeString(aP._3, ":"))), aP._3[am])
862+ let cl = toString(bc.originCaller)
863+ let aV = ct(cl, bj)
864+ $Tuple2((aV._1 :+ StringEntry(aV._2, makeString(aV._3, ":"))), aV._3[as])
850865 }
851866
852867
853868
854-@Callable(aW)
855-func flight (bF,bG) = if (!(sigVerify_8Kb(bF, bG, g)))
869+@Callable(bc)
870+func flight (bL,bM) = if (!(sigVerify_8Kb(bL, bM, g)))
856871 then throw("signature does not match")
857- else if ((size(aW.payments) != 0))
872+ else if ((size(bc.payments) != 0))
858873 then throw("flight doesn't require any payments")
859874 else {
860- let bH = split(toUtf8String(bF), ";")
861- let bI = split(split(bH[0], "|")[0], "_")
862- let bJ = parseIntValue(bI[0])
863- let bK = parseIntValue(bI[1])
864- let dh = split(bH[1], ":")
865- let di = dh[0]
866- let bN = parseIntValue(dh[1])
867- if (if ((bN > (lastBlock.timestamp + o)))
875+ let bN = split(toUtf8String(bL), ";")
876+ let bO = split(split(bN[0], "|")[0], "_")
877+ let bP = parseIntValue(bO[0])
878+ let bQ = parseIntValue(bO[1])
879+ let dm = split(bN[1], ":")
880+ let dn = dm[0]
881+ let bT = parseIntValue(dm[1])
882+ if (if ((bT > (lastBlock.timestamp + t)))
868883 then true
869- else ((lastBlock.timestamp - o) > bN))
884+ else ((lastBlock.timestamp - t) > bT))
870885 then throw("signature outdated")
871886 else {
872- let aa = valueOrErrorMessage(getString(V(toString(aW.caller))), "You don't have a duck staked")
873- let bP = ac(aa)
874- let bQ = valueOrElse(getInteger(bP), 100)
875- if ((bQ != bJ))
876- then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bP), 100))) + " from state does not match one from flight log=") + toString(bJ)))
877- else if ((0 >= bJ))
887+ let ag = valueOrErrorMessage(getString(ab(toString(bc.caller))), "You don't have a duck staked")
888+ let bV = ai(ag)
889+ let bW = valueOrElse(getInteger(bV), 100)
890+ if ((bW != bP))
891+ then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bV), 100))) + " from state does not match one from flight log=") + toString(bP)))
892+ else if ((0 >= bP))
878893 then throw("You can't fly with zero health")
879894 else {
880- let dd = ab(aa)
881- let cg = valueOrElse(getString(dd), k)
882- if ((di == cg))
895+ let di = ah(ag)
896+ let cm = valueOrElse(getString(di), k)
897+ if ((dn == cm))
883898 then throw("You can't fly to the same location")
884- else $Tuple2([StringEntry(dd, if ((bK > 0))
885- then di
886- else cg), IntegerEntry(bP, bK)], unit)
899+ else $Tuple2([StringEntry(di, if ((bQ > 0))
900+ then dn
901+ else cm), IntegerEntry(bV, bQ)], unit)
887902 }
888903 }
889904 }
890905
891906
892907
893-@Callable(aW)
894-func setHealth (df,aa) = if (if ((0 > df))
908+@Callable(bc)
909+func setHealth (dl,ag) = if (if ((0 > dl))
895910 then true
896- else (df > 100))
911+ else (dl > 100))
897912 then throw("HP should be within 0..100")
898- else [IntegerEntry(ac(aa), df)]
913+ else [IntegerEntry(ai(ag), dl)]
899914
900915
901916
902-@Callable(aW)
903-func heal (dj,bd) = if (if ((0 > dj))
917+@Callable(bc)
918+func heal (do,bj) = if (if ((0 > do))
904919 then true
905- else (dj >= l))
906- then throw(("Unknown material: " + toString(dj)))
907- else if ((0 >= bd))
908- then throw(("Amount should be positive! " + toString(bd)))
920+ else (do >= l))
921+ then throw(("Unknown material: " + toString(do)))
922+ else if ((0 >= bj))
923+ then throw(("Amount should be positive! " + toString(bj)))
909924 else {
910- let aa = valueOrErrorMessage(getString(V(toString(aW.caller))), "You don't have a duck staked")
911- let bP = ac(aa)
912- let dk = valueOrElse(getInteger(bP), 100)
913- if ((dk >= 100))
925+ let ag = valueOrErrorMessage(getString(ab(toString(bc.caller))), "You don't have a duck staked")
926+ let bV = ai(ag)
927+ let dp = valueOrElse(getInteger(bV), 100)
928+ if ((dp >= 100))
914929 then throw("HP should be < 100 to heal")
915930 else {
916- let bA = Z(aa)
917- let bR = bz(bA)
918- let bS = split(bR[an], "_")
919- let dl = parseIntValue(bS[dj])
920- let dm = min([(bd / h), (100 - dk)])
921- let dn = (dm * h)
922- if ((dn > dl))
923- then throw(((((("You need " + toString(dn)) + " of ") + B[dj]) + " to heal, but you backpack contains ") + toString(dl)))
931+ let bG = af(ag)
932+ let bX = bF(bG)
933+ let bY = split(bX[at], "_")
934+ let dq = parseIntValue(bY[do])
935+ let dr = min([(bj / h), (100 - dp)])
936+ let ds = (dr * h)
937+ if ((ds > dq))
938+ then throw(((((("You need " + toString(ds)) + " of ") + G[do]) + " to heal, but you backpack contains ") + toString(dq)))
924939 else {
925- let bT = bb(bS, dj, dn)
926-[IntegerEntry(bP, (dk + dm)), StringEntry(bA, makeString([bR[al], bR[am], bT, bR[ao]], ":"))]
940+ let bZ = bh(bY, do, ds)
941+[IntegerEntry(bV, (dp + dr)), StringEntry(bG, makeString([bX[ar], bX[as], bZ, bX[au]], ":"))]
927942 }
928943 }
929944 }
930945
931946
932947
933-@Callable(aW)
934-func updateBackpack (aa,do) = if ((aW.caller != f))
948+@Callable(bc)
949+func updateBackpack (ag,dt) = if ((bc.caller != f))
935950 then throw("permission denied")
936- else $Tuple2([StringEntry(Z(aa), do)], do)
951+ else $Tuple2([StringEntry(af(ag), dt)], dt)
937952
938953
939954
940-@Callable(aW)
941-func expeditionBuy (bF,bG) = if ((size(aW.payments) != 1))
955+@Callable(bc)
956+func expeditionBuy (bL,bM) = if ((size(bc.payments) != 1))
942957 then throw("Exactly one payment required")
943958 else {
944- let cX = value(aW.payments[0])
945- if ((cX.assetId != b))
959+ let dd = value(bc.payments[0])
960+ if ((dd.assetId != b))
946961 then throw("Allowed USDN payment only!")
947- else if ((cX.amount != t))
948- then throw(("Payment attached should be " + toString(t)))
962+ else if ((dd.amount != y))
963+ then throw(("Payment attached should be " + toString(y)))
949964 else {
950- let aP = bC(false, aW.caller, aW.transactionId, bF, bG)
951- $Tuple2((aP._1 :+ ScriptTransfer(f, cX.amount, b)), aP._2)
965+ let aV = bI(false, bc.caller, bc.transactionId, bL, bM)
966+ if ((aV._2 == ""))
967+ then aV
968+ else $Tuple2((aV._1 :+ ScriptTransfer(f, dd.amount, b)), aV._2)
952969 }
953970 }
954971
955972
956973
957-@Callable(aW)
958-func expedition (bF,bG) = if ((size(aW.payments) != 0))
974+@Callable(bc)
975+func expedition (bL,bM) = if ((size(bc.payments) != 0))
959976 then throw("expedition doesn't require any payments")
960- else bC(true, aW.caller, aW.transactionId, bF, bG)
977+ else bI(true, bc.caller, bc.transactionId, bL, bM)
961978
962979
963980
964-@Callable(aW)
965-func upgradeInfra (dp) = if ((size(aW.payments) != 0))
981+@Callable(bc)
982+func upgradeInfra (du) = if ((size(bc.payments) != 0))
966983 then throw("Infrastructure upgrade doesn't require any payments")
967- else cv(true, aW.caller, 0)
984+ else cB(true, bc.caller, 0)
968985
969986
970987
971-@Callable(aW)
972-func upgradeInfraUsdn (dp) = if ((size(aW.payments) != 1))
988+@Callable(bc)
989+func upgradeInfraUsdn (du) = if ((size(bc.payments) != 1))
973990 then throw("Exactly one payment required")
974991 else {
975- let cX = value(aW.payments[0])
976- if ((cX.assetId != b))
992+ let dd = value(bc.payments[0])
993+ if ((dd.assetId != b))
977994 then throw("Allowed USDN payment only!")
978995 else {
979- let aP = cv(false, aW.caller, cX.amount)
980- $Tuple2((aP._1 :+ ScriptTransfer(f, cX.amount, b)), aP._2)
996+ let aV = cB(false, bc.caller, dd.amount)
997+ $Tuple2((aV._1 :+ ScriptTransfer(f, dd.amount, b)), aV._2)
981998 }
982999 }
9831000
9841001
9851002
986-@Callable(aW)
987-func activateArtifact (dq) = if ((size(aW.payments) != 0))
1003+@Callable(bc)
1004+func activateArtifact (dv) = if ((size(bc.payments) != 0))
9881005 then throw("Artifact activation doesn't require any payments")
9891006 else {
990- let aP = {
991- let c = dq
1007+ let aV = {
1008+ let c = dv
9921009 if (("PRESALE" == c))
993- then cC(toString(aW.caller))
1010+ then cI(toString(bc.caller))
9941011 else throw("Unknown artifact")
9951012 }
996- aP
1013+ aV
9971014 }
9981015
9991016
10001017
1001-@Callable(aW)
1002-func mergeLands (cH) = if ((size(aW.payments) != 0))
1018+@Callable(bc)
1019+func mergeLands (cN) = if ((size(bc.payments) != 0))
10031020 then throw("Lands merging doesn't require any payments")
1004- else cV(true, toString(aW.caller), 0, cH, aW.transactionId)
1021+ else db(true, toString(bc.caller), 0, cN, bc.transactionId)
10051022
10061023
10071024
1008-@Callable(aW)
1009-func mergeLandsUsdn (cH) = if ((size(aW.payments) != 1))
1025+@Callable(bc)
1026+func mergeLandsUsdn (cN) = if ((size(bc.payments) != 1))
10101027 then throw("Exactly one payment required")
10111028 else {
1012- let cX = value(aW.payments[0])
1013- if ((cX.assetId != b))
1029+ let dd = value(bc.payments[0])
1030+ if ((dd.assetId != b))
10141031 then throw("Allowed USDN payment only!")
10151032 else {
1016- let aP = cV(false, toString(aW.caller), cX.amount, cH, aW.transactionId)
1017- $Tuple2((aP._1 :+ ScriptTransfer(f, cX.amount, b)), aP._2)
1033+ let aV = db(false, toString(bc.caller), dd.amount, cN, bc.transactionId)
1034+ $Tuple2((aV._1 :+ ScriptTransfer(f, dd.amount, b)), aV._2)
10181035 }
10191036 }
10201037
10211038

github/deemru/w8io/169f3d6 
391.00 ms