w8 · tx · 3Ds···fKN

tx · 3DsgrbRAncKXuvTep9mgjJa5z9TvSmVoeUkZBPKj5fKN

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.02500000 Waves

2023.01.06 01:00 [2392231] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3DsgrbRAncKXuvTep9mgjJa5z9TvSmVoeUkZBPKj5fKN",
    "fee": 2500000,
    "feeAssetId": null,
    "timestamp": 1672956048344,
    "version": 2,
    "chainId": 84,
    "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm",
    "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX",
    "proofs": [
        "5zDHBFAP9zQXBhJvmYbYm6RfVHjJEiKKdBwZSzBC4DMjLSFzpeHSsULqGxUT4iPHVVC7XbpJv2AHow6eNWB1LMKj"
    ],
    "script": "base64:BgJECAISABIDCgEIEgASAwoBCBIECgIBCBIECgICAhIECgIBCBIECgIBARIECgIICBIECgICAhIECgICAhIDCgEIEgMKAQhIAAVjaGFpbgkAsAkBCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2RuQXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMAEgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEDCQAAAgIBVAUHJG1hdGNoMAEg93bq9/eDymXbbhPuAjvPWCmVqcHRjfJL2mzYHWKAyN4JAAIBAg1Vbmtub3duIGNoYWluAA1pbmN1YmF0b3JBZGRyBAckbWF0Y2gwBQVjaGFpbgMJAAACAgFXBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUEVrdFZ1eDJSaGNoU042M0RzRG80YjRtejRRcXpLU2VEdgMJAAACAgFUBQckbWF0Y2gwBQR0aGlzCQACAQINVW5rbm93biBjaGFpbgALYnJlZWRlckFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAICAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQRFZ1VTQ1SDdFaDVkbXROYm5STlJTdEd3VUxBN05ZNkhiAwkAAAICAVQFByRtYXRjaDAFBHRoaXMJAAIBAg1Vbmtub3duIGNoYWluAAtlY29ub215QWRkcgQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1Ayc2sxS25jU3hSYVpzOGI0Q1dHUHcyamt2dmF2NzR1NEQDCQAAAgIBVAUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM044eTR3eFgzSkM0VGRyQ0pCWFgxNlNqV2Y2WDI1NmhyZXAJAAIBAg1Vbmtub3duIGNoYWluAANwdWIBIE9T4ho/VKjWnVJOEx1GJ1W9s1PzLHvJVFSw/0PBtBQoAAhIRUFMQ09TVACQTgAKTEFORFBSRUZJWAIETEFORAAKRFVDS1BSRUZJWAIERFVDSwAPREVGQVVMVExPQ0FUSU9OAg9BZnJpY2FfRl9BZnJpY2EABk5VTVJFUwAGAA9EQUlMWVJFU0JZUElFQ0UAgPjSAQAJREFZTUlMTElTAIC4mSkAEUZJVkVNSU5VVEVTTUlMTElTAOCnEgAQUkVTT1VSQ0VQUklDRU1JTgDV1gkAEUluZnJhVXBncmFkZUNvc3RTBAckbWF0Y2gwBQVjaGFpbgMJAAACAgFXBQckbWF0Y2gwANHCwr5GAwkAAAICAVQFByRtYXRjaDAA0OmcWgkAAgECDVVua25vd24gY2hhaW4AFUluZnJhVXBncmFkZUNvc3RTVXNkbgQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMACAnJw5AwkAAAICAVQFByRtYXRjaDAAgJ9JCQACAQINVW5rbm93biBjaGFpbgAMRVhQTUFURVJJQUxTBAckbWF0Y2gwBQVjaGFpbgMJAAACAgFXBQckbWF0Y2gwAMuA1bPLBAMJAAACAgFUBQckbWF0Y2gwAPGa8O8FCQACAQINVW5rbm93biBjaGFpbgAHRVhQVVNETgQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMACAlOvcAwMJAAACAgFUBQckbWF0Y2gwAICt4gQJAAIBAg1Vbmtub3duIGNoYWluAB1QcmVzYWxlQXJ0aWZhY3RBY3RpdmF0aW9uVGltZQQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMACAmLX12DADCQAAAgIBVAUHJG1hdGNoMACAuM/Q1zAJAAIBAg1Vbmtub3duIGNoYWluAAVNVUxUNgDAhD0ABUZJVkVYCQC2AgEABQAHVFdFTlRZWAkAtgIBABQACFRXRU5UWTJYCQC2AgEJAGgCABQAFAAIVFdFTlRZM1gJALYCAQkAaAIJAGgCABQAFAAUAAhUV0VOVFk0WAkAtgIBCQBoAgkAaAIJAGgCABQAFAAUABQACFRXRU5UWTVYCQC2AgEJAGgCCQBoAgkAaAIJAGgCABQAFAAUABQAFAAIbWF0VHlwZXMJAMwIAgIERnVlbAkAzAgCAgVNZXRhbAkAzAgCAgVQbGFuawkAzAgCAgVHbGFzcwkAzAgCAgdQbGFzdGljCQDMCAICB1Byb3RlaW4FA25pbAAKY29udGluZW50cwkAzAgCAgRBc2lhCQDMCAICBkV1cm9wZQkAzAgCAghBbWVyaWNhcwkAzAgCAgdPY2VhbmlhCQDMCAICBkFmcmljYQUDbmlsARJrZXlOZXh0RnJlZUxhbmROdW0AAgtuZXh0TGFuZE51bQEQa2V5TGFuZFRvQXNzZXRJZAEHbGFuZE51bQkArAICAgxsYW5kVG9Bc3NldF8FB2xhbmROdW0BCmtleU5mdE5hbWUCB2xhbmROdW0IbGFuZFNpemUJAKwCAgkArAICBQpMQU5EUFJFRklYBQdsYW5kTnVtBQhsYW5kU2l6ZQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICCW5mdE93bmVyXwUHYXNzZXRJZAEQa2V5RHVja0lkVG9Pd25lcgEHYXNzZXRJZAkArAICAgpkdWNrT3duZXJfBQdhc3NldElkARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQdhc3NldElkCQCsAgICC3N0YWtlZFRpbWVfBQdhc3NldElkARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQdhc3NldElkCQCsAgICC2luZnJhTGV2ZWxfBQdhc3NldElkAR5rZXlJbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXICB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICAhxpbmZyYUxldmVsQnlBc3NldElkQW5kT3duZXJfBQdhc3NldElkAgFfBQlvd25lckFkZHIBH2tleXByZXNhbGVBcnRBY3RpdmF0ZWRCeUFzc2V0SWQBB2Fzc2V0SWQJAKwCAgIUcHJlc2FsZUFydEFjdGl2YXRlZF8FB2Fzc2V0SWQBFGtleVN0YWtlZER1Y2tCeU93bmVyAQlvd25lckFkZHIJAKwCAgISc3Rha2VkRHVja0J5T3duZXJfBQlvd25lckFkZHIBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDB25mdFR5cGUHYXNzZXRJZAlvd25lckFkZHIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAiBzdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyXwUHbmZ0VHlwZQIBXwUHYXNzZXRJZAIBXwUJb3duZXJBZGRyARFrZXlMYW5kTnVtVG9Pd25lcgEHbGFuZE51bQkArAICAgpsYW5kT3duZXJfBQdsYW5kTnVtARFrZXlCYWNrcGFja0J5RHVjawELZHVja0Fzc2V0SWQJAKwCAgIJYmFja1BhY2tfBQtkdWNrQXNzZXRJZAEPa2V5RHVja0xvY2F0aW9uAQtkdWNrQXNzZXRJZAkArAICAg1kdWNrTG9jYXRpb25fBQtkdWNrQXNzZXRJZAENa2V5RHVja0hlYWx0aAELZHVja0Fzc2V0SWQJAKwCAgILZHVja0hlYWx0aF8FC2R1Y2tBc3NldElkARFrZXlSZXNQcm9wb3J0aW9ucwACE3Jlc1R5cGVzUHJvcG9ydGlvbnMACnJlY0xhbmROdW0AAAALcmVjTGFuZFNpemUAAQALcmVjVGVycmFpbnMAAgAMcmVjQ29udGluZW50AAMAD2xvY0lkeENvbnRpbmVudAAAAApsb2NJZHhUeXBlAAEACGxvY0lkeElkAAIACmJwSWR4TGV2ZWwAAAAIYnBJZHhSZXMAAQAIYnBJZHhNYXQAAgAJYnBJZHhQcm9kAAMBCGFzU3RyaW5nAQF2BAckbWF0Y2gwBQF2AwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAUBcwkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwESZ2V0TmVlZGVkTWF0ZXJpYWxzAQV0b3RhbAQFcHJvcHMJALUJAgkBBXZhbHVlAQkAoggBCQERa2V5UmVzUHJvcG9ydGlvbnMAAgFfAwkBAiE9AgkAkAMBBQVwcm9wcwUGTlVNUkVTCQACAQIWV3JvbmcgcHJvcG9ydGlvbnMgZGF0YQQBcgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAQkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAgkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMAAwkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABAkAzAgCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcHJvcHMABQUDbmlsBANzdW0JAGQCCQBkAgkAZAIJAGQCCQBkAgkAkQMCBQFyAAAJAJEDAgUBcgABCQCRAwIFAXIAAgkAkQMCBQFyAAMJAJEDAgUBcgAECQCRAwIFAXIABQMJAGcCAAAFA3N1bQkAAgECD05vIGxhbmRzIHN0YWtlZAQFbm9ybTYJAGsDBQV0b3RhbAUFTVVMVDYFA3N1bQoBCm5vcm1hbGl6ZXICA2FjYwRlbGVtCQDNCAIFA2FjYwkAawMFBGVsZW0FBW5vcm02BQVNVUxUNgoAAiRsBQFyCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpub3JtYWxpemVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGARFzdWJ0cmFjdE1hdGVyaWFscwMMc2hvdWxkVXNlTWF0A2hhcwl0b3RhbE5lZWQEBG5lZWQJARJnZXROZWVkZWRNYXRlcmlhbHMBBQl0b3RhbE5lZWQKAQpzdWJ0cmFjdG9yAgNhY2MDaWR4BAZyZXN1bHQJAGUCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDaGFzBQNpZHgJAJEDAgUEbmVlZAUDaWR4AwkAZgIAAAUGcmVzdWx0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICGE5vdCBlbm91Z2ggbWF0ZXJpYWwgaWR4PQkApAMBBQNpZHgCCywgeW91IGhhdmUgCQCRAwIFA2hhcwUDaWR4AgssIGJ1dCBuZWVkIAkApAMBCQCRAwIFBG5lZWQFA2lkeAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0AwUMc2hvdWxkVXNlTWF0CgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKc3VidHJhY3RvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgUDaGFzARF1cGRhdGVQcm9wb3J0aW9ucwMNdGVycmFpbkNvdW50cw1sYW5kU2l6ZUluZGV4BHNpZ24EBXByb3BzCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQkBEWtleVJlc1Byb3BvcnRpb25zAAILMF8wXzBfMF8wXzACAV8DCQECIT0CCQCQAwEFBXByb3BzBQZOVU1SRVMJAAIBAhZXcm9uZyBwcm9wb3J0aW9ucyBkYXRhCgEHdXBkYXRlcgIDYWNjAWkEBnJlc3VsdAkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVwcm9wcwUBaQkAaAIJAGgCBQRzaWduCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgDCQBmAgAABQZyZXN1bHQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICFlBhbmljISBQaWVjZXMgb2YgdHlwZT0JAKQDAQUBaQIHLCBzaWduPQkApAMBBQRzaWduAhQsICB0ZXJyYWluQ291bnRzW2ldPQkApAMBCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkCECwgbGFuZFNpemVJbmRleD0JAKQDAQUNbGFuZFNpemVJbmRleAkAzQgCBQNhY2MJAKQDAQUGcmVzdWx0BAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHdXBkYXRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgkAuQkCBQFyAgFfAQ1jb3VudFRlcnJhaW5zAQh0ZXJyYWlucwkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFBAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQgABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUMAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFEAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRQABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUYAAQUDbmlsAQ9udW1QaWVjZXNCeVNpemUBCGxhbmRTaXplBAckbWF0Y2gwBQhsYW5kU2l6ZQMJAAACAgFTBQckbWF0Y2gwABkDCQAAAgIBTQUHJG1hdGNoMABkAwkAAAICAUwFByRtYXRjaDAA4QEDCQAAAgICWEwFByRtYXRjaDAAkAMDCQAAAgIDWFhMBQckbWF0Y2gwAPEECQACAQIRVW5rbm93biBsYW5kIHNpemUBDHN1Yk9uZUluTGlzdAMFYUxpc3QDaWR4BmFtb3VudAoBBnN1YmJlcgIDYWNjAWkJAM0IAgUDYWNjAwkAAAIFAWkFA2lkeAkApAMBCQBlAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBWFMaXN0BQFpBQZhbW91bnQJAJEDAgUFYUxpc3QFAWkEAXIKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQZzdWJiZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEGYWRkUmVzBQpjdXJyZW50UmVzDXRlcnJhaW5Db3VudHMJZGVsdGFUaW1lDWxhbmRTaXplSW5kZXgXZGFpbHlCeVBpZWNlV2l0aEJvbnVzZXMKAQVhZGRlcgIDYWNjAWkECXJlc09mVHlwZQkAaAIJAGgCCQBrAwUJZGVsdGFUaW1lBRdkYWlseUJ5UGllY2VXaXRoQm9udXNlcwUJREFZTUlMTElTCQCRAwIFDXRlcnJhaW5Db3VudHMFAWkFDWxhbmRTaXplSW5kZXgJAM0IAgUDYWNjCQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKY3VycmVudFJlcwUBaQUJcmVzT2ZUeXBlBAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJALkJAgUBcgIBXwEDYWJzAQF4AwkAwAICBQF4CQC2AgEAAAUBeAkAvgIBBQF4AARmcmVxCQDMCAIJAMwIAgABCQDMCAIABAkAzAgCAAkJAMwIAgAKCQDMCAIADwUDbmlsCQDMCAIJAMwIAgAFCQDMCAIACAkAzAgCAA0JAMwIAgAOCQDMCAIADwUDbmlsCQDMCAIJAMwIAgAGCQDMCAIACQkAzAgCAA4JAMwIAgAPCQDMCAIAEAUDbmlsCQDMCAIJAMwIAgAECQDMCAIABwkAzAgCAAgJAMwIAgANCQDMCAIAEgUDbmlsCQDMCAIJAMwIAgABCQDMCAIABgkAzAgCAAcJAMwIAgAPCQDMCAIAEwUDbmlsBQNuaWwBB2dlbkNoYXICAW4FZnJlcXMEA3JlbQkAoAMBCQC7AgIFAW4FB1RXRU5UWVgEBmxldHRlcgMJAGYCCQCRAwIFBWZyZXFzAAAFA3JlbQIBQQMJAGYCCQCRAwIFBWZyZXFzAAEFA3JlbQIBQgMJAGYCCQCRAwIFBWZyZXFzAAIFA3JlbQIBQwMJAGYCCQCRAwIFBWZyZXFzAAMFA3JlbQIBRAMJAGYCCQCRAwIFBWZyZXFzAAQFA3JlbQIBRQIBRgUGbGV0dGVyAQtnZXRCYWNrcGFjawEFYnBLZXkEAXAJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBBQVicEtleQIaMDowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoCAToJAMwIAgkApAMBCQELdmFsdWVPckVsc2UCCQC2CQEJAJEDAgUBcAUKYnBJZHhMZXZlbAAACQDMCAIDCQAAAgkAkAMBCQC1CQIJAJEDAgUBcAUIYnBJZHhSZXMCAV8FBk5VTVJFUwkAkQMCBQFwBQhicElkeFJlcwILMF8wXzBfMF8wXzAJAMwIAgMJAAACCQCQAwEJALUJAgkAkQMCBQFwBQhicElkeE1hdAIBXwUGTlVNUkVTCQCRAwIFAXAFCGJwSWR4TWF0AgswXzBfMF8wXzBfMAkAzAgCCQCRAwIFAXAFCWJwSWR4UHJvZAUDbmlsARBleHBlZGl0aW9uQ29tbW9uBQxzaG91bGRVc2VNYXQGY2FsbGVyBHR4SWQHbWVzc2FnZQNzaWcDCQEBIQEJAMQTAwUHbWVzc2FnZQUDc2lnBQNwdWIJAAIBAhhzaWduYXR1cmUgZG9lcyBub3QgbWF0Y2gEBXBhcnRzCQC1CQIJALAJAQUHbWVzc2FnZQIBOwQCaHAJALUJAgkAkQMCCQC1CQIJAJEDAgUFcGFydHMAAAIBfAAAAgFfBAVjdXJIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAAEBW5ld0hQCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUCaHAAAQQKbG9jQW5kVGltZQkAtQkCCQCRAwIFBXBhcnRzAAECAToEDnRhcmdldExvY2F0aW9uCQC1CQIJAJEDAgUKbG9jQW5kVGltZQAAAgFfAwkBAiE9AgkAkQMCBQ50YXJnZXRMb2NhdGlvbgABAgFFCQACAQIrZXhwZWRpdGlvbiB0YXJnZXQgbG9jYXRpb24gdHlwZSBzaG91bGQgYmUgRQQEdGltZQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCmxvY0FuZFRpbWUAAQMDCQBmAgUEdGltZQkAZAIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwYJAGYCCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFEUZJVkVNSU5VVEVTTUlMTElTBQR0aW1lCQACAQISc2lnbmF0dXJlIG91dGRhdGVkBAh1c2VyQWRkcgkApQgBBQZjYWxsZXIEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUIdXNlckFkZHICHFlvdSBkb24ndCBoYXZlIGEgZHVjayBzdGFrZWQECWtleUhlYWx0aAkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAQMb2xkRnJvbVN0YXRlCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aABkAwkBAiE9AgUMb2xkRnJvbVN0YXRlBQVjdXJIUAkAAgEJAKwCAgkArAICCQCsAgICCm9sZEhlYWx0aD0JAKQDAQkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgAZAIvIGZyb20gc3RhdGUgZG9lcyBub3QgbWF0Y2ggb25lIGZyb20gZmxpZ2h0IGxvZz0JAKQDAQUFY3VySFADCQBnAgAABQVjdXJIUAkAAgECHllvdSBjYW4ndCBmbHkgd2l0aCB6ZXJvIGhlYWx0aAMJAGcCAAAFBW5ld0hQCQCUCgIJAM0IAgMJAQEhAQUMc2hvdWxkVXNlTWF0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgUHRVhQVVNETgULdXNkbkFzc2V0SWQFA25pbAUDbmlsCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoAAACAAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwUMc2hvdWxkVXNlTWF0BQVtTGlzdAUMRVhQTUFURVJJQUxTAgFfBAZiaWdOdW0JAQNhYnMBCQCeAwEFBHR4SWQEB2ZyZWVOdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBEmtleU5leHRGcmVlTGFuZE51bQAA9QMEB2xhbmROdW0JAKQDAQUHZnJlZU51bQQMY29udGluZW50SWR4CQCgAwEJALsCAgUGYmlnTnVtBQVGSVZFWAQBZgkAkQMCBQRmcmVxBQxjb250aW5lbnRJZHgKARB0ZXJyYWluR2VuZXJhdG9yAgNhY2MEZWxlbQkAlAoCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAggFA2FjYwJfMQkBB2dlbkNoYXICCAUDYWNjAl8yBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUHVFdFTlRZWAUBZgkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTJYBQFmCQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZM1gFAWYJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFk0WAUBZgkAugICCAUDYWNjAl8yBQhUV0VOVFk1WAQBdAoAAiRsCQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgIACQC6AgIFBmJpZ051bQUFRklWRVgKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEHRlcnJhaW5HZW5lcmF0b3ICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBAljb250aW5lbnQJAJEDAgUKY29udGluZW50cwUMY29udGluZW50SWR4BAVpc3N1ZQkAwggFCQEKa2V5TmZ0TmFtZQIFB2xhbmROdW0CAVMJALkJAgkAzAgCBQdsYW5kTnVtCQDMCAICAVMJAMwIAggFAXQCXzEJAMwIAgUJY29udGluZW50BQNuaWwCAV8AAQAABwQHYXNzZXRJZAkAuAgBBQVpc3N1ZQQCaWQJANgEAQUHYXNzZXRJZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5TmV4dEZyZWVMYW5kTnVtAAkAZAIFB2ZyZWVOdW0AAQkAzAgCBQVpc3N1ZQkAzAgCCQELU3RyaW5nRW50cnkCCQEQa2V5TGFuZFRvQXNzZXRJZAEFB2xhbmROdW0FAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQJpZAUIdXNlckFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQUIdXNlckFkZHIJAMwIAgkBDEludGVnZXJFbnRyeQIJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQUCaWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleUluZnJhTGV2ZWxCeUFzc2V0SWRBbmRPd25lcgIFAmlkBQh1c2VyQWRkcgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAkAuQkCCQDMCAIFCWNvbnRpbmVudAkAzAgCAgFMCQDMCAIFAmlkBQNuaWwCAV8JAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUFbmV3SFAJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkJALkJAgkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQpicElkeExldmVsCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzCQDMCAIFBm5ld01hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgUDbmlsBQJpZAEMYXBwbHlCb251c2VzAQtsYW5kQXNzZXRJZAQKaW5mcmFMZXZlbAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQEWa2V5SW5mcmFMZXZlbEJ5QXNzZXRJZAEFC2xhbmRBc3NldElkAAAEDHByZXNhbGVCb251cwMJAQt2YWx1ZU9yRWxzZQIJAKAIAQkBH2tleXByZXNhbGVBcnRBY3RpdmF0ZWRCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAcAAwAACQBkAgUPREFJTFlSRVNCWVBJRUNFCQBrAwUPREFJTFlSRVNCWVBJRUNFBQppbmZyYUxldmVsAAQBCGNsYWltQWxsAgtsYW5kQXNzZXRJZAZwaWVjZXMEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQECXNhdmVkVGltZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFB3RpbWVLZXkJAKwCAgkArAICCQCsAgIFCkxBTkRQUkVGSVgCASAFC2xhbmRBc3NldElkAg4gaXMgbm90IHN0YWtlZAQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFCXNhdmVkVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEFCXNhdmVkVGltZQIMLCBjdXJyZW50ID0gCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBBZkYWlseVByb2R1Y3Rpb25CeVBpZWNlCQEMYXBwbHlCb251c2VzAQULbGFuZEFzc2V0SWQECGF2YWlsUmVzCQBoAgkAawMFCWRlbHRhVGltZQUWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQUJREFZTUlMTElTBQZwaWVjZXMJAQhhc1N0cmluZwEJAPwHBAUEdGhpcwIIY2xhaW1SZXMJAMwIAgUIYXZhaWxSZXMJAMwIAgULbGFuZEFzc2V0SWQFA25pbAUDbmlsAQ11cEluZnJhQ29tbW9uAwxzaG91bGRVc2VNYXQGY2FsbGVyC2xhbmRBc3NldElkBARhZGRyCQClCAEFBmNhbGxlcgQIaW5mcmFLZXkJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQECGN1ckxldmVsCQELdmFsdWVPckVsc2UCCQCfCAEFCGluZnJhS2V5AAADCQBnAgUIY3VyTGV2ZWwAAwkAAgECJkN1cnJlbnRseSBtYXggaW5mcmFzdHJ1Y3R1cmUgbGV2ZWwgPSAzBAhuZXdMZXZlbAkAZAIFCGN1ckxldmVsAAEEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQDCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpMQU5EUFJFRklYCQACAQkArAICCQCsAgICBE5GVCAFCkxBTkRQUkVGSVgCICB0b2tlbiBzaG91bGQgYmUgcGFzc2VkIGFzIHBhcmFtBAVvd25lcgkBEUBleHRyTmF0aXZlKDEwNTgpAQkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEFC2xhbmRBc3NldElkAwkBAiE9AgUFb3duZXIFBGFkZHIJAAIBCQCsAgIFCkxBTkRQUkVGSVgCDSBpcyBub3QgeW91cnMEAWQJALUJAggFBWFzc2V0C2Rlc2NyaXB0aW9uAgFfBAhsYW5kU2l6ZQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQUIbGFuZFNpemUEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAMJAQIhPQIJAJEDAgUDbG9jBQhsb2NJZHhJZAULbGFuZEFzc2V0SWQJAAIBCQCsAgIJAKwCAgkArAICAhREdWNrIGxvY2F0aW9uIGlkIGlzIAkAkQMCBQNsb2MFCGxvY0lkeElkAhAsIGJ1dCBzaG91bGQgYmUgBQtsYW5kQXNzZXRJZAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkEBW1MaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAZuZXdNYXQJALkJAgkBEXN1YnRyYWN0TWF0ZXJpYWxzAwUMc2hvdWxkVXNlTWF0BQVtTGlzdAkAawMFEUluZnJhVXBncmFkZUNvc3RTCQBoAgUGcGllY2VzBQhuZXdMZXZlbAAZAgFfBAZuZXdSZXMJAQhjbGFpbUFsbAIFC2xhbmRBc3NldElkBQZwaWVjZXMJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIaW5mcmFLZXkFCG5ld0xldmVsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5SW5mcmFMZXZlbEJ5QXNzZXRJZEFuZE93bmVyAgULbGFuZEFzc2V0SWQFBGFkZHIFCG5ld0xldmVsCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCBQZuZXdSZXMJAMwIAgUGbmV3TWF0CQDMCAIJAJEDAgULY3VycmVudFBhY2sFCWJwSWR4UHJvZAUDbmlsAgE6BQNuaWwFCG5ld0xldmVsDQFpAQlzdGFrZUxhbmQABANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKTEFORFBSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUEdGhpcwkAAgECF1Vua25vd24gaXNzdWVyIG9mIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKTEFORFBSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkxBTkRQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAtsYW5kTnVtU2l6ZQkAsAICCAUFYXNzZXQEbmFtZQAEBAdsYW5kTnVtAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCA1hYTAkAswICBQtsYW5kTnVtU2l6ZQADAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCAlhMCQCzAgIFC2xhbmROdW1TaXplAAIJALMCAgULbGFuZE51bVNpemUAAQQKbGFuZE51bUludAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQC2CQEFB2xhbmROdW0JAKwCAgIeQ2Fubm90IHBhcnNlIGxhbmQgbnVtYmVyIGZyb20gCAUFYXNzZXQEbmFtZQQLbGFuZEFzc2V0SWQJANgEAQUHYXNzZXRJZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8EDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCBQFkBQtyZWNUZXJyYWlucwQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMJAGkCCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQAZAAEEDXByZXNhbGVBY3RpdmUDCQBnAgD0AwUKbGFuZE51bUludAkAZgIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBR1QcmVzYWxlQXJ0aWZhY3RBY3RpdmF0aW9uVGltZQcJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQdhZGRyZXNzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQELU3RyaW5nRW50cnkCCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQFB2FkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhbmROdW1Ub093bmVyAQUHbGFuZE51bQUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5UmVzUHJvcG9ydGlvbnMABQVwcm9wcwUDbmlsAWkBC3Vuc3Rha2VMYW5kAQtsYW5kQXNzZXRJZAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECJHVuc3Rha2UgZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50cwQHYXNzZXRJZAkA2QQBBQtsYW5kQXNzZXRJZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDCQECIT0CCAUFYXNzZXQGaXNzdWVyBQR0aGlzCQACAQIXVW5rbm93biBpc3N1ZXIgb2YgdG9rZW4DCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpMQU5EUFJFRklYCQACAQkArAICCQCsAgICCU9ubHkgTkZUIAUKTEFORFBSRUZJWAIXIHRva2VucyBjYW4gYmUgdW5zdGFrZWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFB2FkZHJlc3MJAAIBCQCsAgIJAKwCAgIHU3Rha2VkIAUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8EDXRlcnJhaW5Db3VudHMJAQ1jb3VudFRlcnJhaW5zAQkAkQMCBQFkBQtyZWNUZXJyYWlucwQGcGllY2VzCQEPbnVtUGllY2VzQnlTaXplAQkAkQMCBQFkBQtyZWNMYW5kU2l6ZQQFcHJvcHMJARF1cGRhdGVQcm9wb3J0aW9ucwMFDXRlcnJhaW5Db3VudHMJAGkCBQZwaWVjZXMAGQD///////////8BBAZuZXdSZXMJAQhjbGFpbUFsbAIFC2xhbmRBc3NldElkBQZwaWVjZXMEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkArAICCQCsAgICEllvdSBjYW4ndCB1bnN0YWtlIAUKTEFORFBSRUZJWAIWIHdpdGhvdXQgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAMJAQIhPQIJAJEDAgUDbG9jBQhsb2NJZHhJZAULbGFuZEFzc2V0SWQJAAIBCQCsAgIJAKwCAgkArAICAhREdWNrIGxvY2F0aW9uIGlkIGlzIAkAkQMCBQNsb2MFCGxvY0lkeElkAhAsIGJ1dCBzaG91bGQgYmUgBQtsYW5kQXNzZXRJZAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBAtjdXJyZW50UGFjawkBC2dldEJhY2twYWNrAQUFYnBLZXkJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQUHdGltZUtleQkAzAgCCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlSZXNQcm9wb3J0aW9ucwAFBXByb3BzCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCBQZuZXdSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToFA25pbAFpAQlzdGFrZUR1Y2sABANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKRFVDS1BSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwMJAQIhPQIIBQVhc3NldAZpc3N1ZXIFDWluY3ViYXRvckFkZHIJAQIhPQIIBQVhc3NldAZpc3N1ZXIFC2JyZWVkZXJBZGRyBwkAAgEJAKwCAgkArAICAhJVbmtub3duIGlzc3VlciBvZiAFCkRVQ0tQUkVGSVgCBiB0b2tlbgMJAQEhAQkBCGNvbnRhaW5zAggFBWFzc2V0BG5hbWUFCkRVQ0tQUkVGSVgJAAIBCQCsAgIJAKwCAgIJT25seSBORlQgBQpEVUNLUFJFRklYAhQgdG9rZW5zIGFyZSBhY2NlcHRlZAQKYXNzZXRJZFN0cgkA2AQBBQdhc3NldElkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFCmFzc2V0SWRTdHIDCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAhIgaXMgYWxyZWFkeSBzdGFrZWQDCQEJaXNEZWZpbmVkAQkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzCQACAQkArAICAh1Zb3UgYWxyZWFkeSBzdGFrZWQgb25lIGR1Y2s6IAgFBWFzc2V0BG5hbWUEBmxvY0tleQkBD2tleUR1Y2tMb2NhdGlvbgEFCmFzc2V0SWRTdHIECGxvY2F0aW9uCQCiCAEFBmxvY0tleQQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFCmFzc2V0SWRTdHIEBmhlYWx0aAkAnwgBBQlrZXlIZWFsdGgEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQphc3NldElkU3RyBAhiYWNrcGFjawkAoggBBQVicEtleQkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQdhZGRyZXNzBQphc3NldElkU3RyBQNuaWwDCQEJaXNEZWZpbmVkAQUIbG9jYXRpb24FA25pbAkAzggCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQUPREVGQVVMVExPQ0FUSU9OBQNuaWwDCQEJaXNEZWZpbmVkAQUGaGVhbHRoBQNuaWwJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5SGVhbHRoAGQFA25pbAMJAQlpc0RlZmluZWQBBQhiYWNrcGFjawUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5AhowOjBfMF8wXzBfMF8wOjBfMF8wXzBfMF8wOgUDbmlsAWkBC3Vuc3Rha2VEdWNrAQphc3NldElkU3RyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIkdW5zdGFrZSBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBAdhc3NldElkCQDZBAEFCmFzc2V0SWRTdHIEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwMJAQIhPQIIBQVhc3NldAZpc3N1ZXIFDWluY3ViYXRvckFkZHIJAQIhPQIIBQVhc3NldAZpc3N1ZXIFC2JyZWVkZXJBZGRyBwkAAgEJAKwCAgkArAICAhJVbmtub3duIGlzc3VlciBvZiAFCkRVQ0tQUkVGSVgCBiB0b2tlbgMJAQEhAQkBCGNvbnRhaW5zAggFBWFzc2V0BG5hbWUFCkRVQ0tQUkVGSVgJAAIBCQCsAgIJAKwCAgIJT25seSBORlQgBQpEVUNLUFJFRklYAhcgdG9rZW5zIGNhbiBiZSB1bnN0YWtlZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBCQDYBAEFB2Fzc2V0SWQDCQEBIQEJAQlpc0RlZmluZWQBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAMJAQEhAQkBCWlzRGVmaW5lZAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAAIBCQCsAgIJAKwCAgIJVGhlIGR1Y2sgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBEGtleUR1Y2tJZFRvT3duZXIBCQDYBAEFB2Fzc2V0SWQJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIMIGlzIG9ycGhhbmVkAwkBAiE9AgUFb3duZXIFB2FkZHJlc3MJAAIBAhdTdGFrZWQgTkZUIGlzIG5vdCB5b3VycwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBBQd0aW1lS2V5CQDMCAIJAQtEZWxldGVFbnRyeQEJAQ9rZXlEdWNrTG9jYXRpb24BBQphc3NldElkU3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJARBrZXlEdWNrSWRUb093bmVyAQUKYXNzZXRJZFN0cgkAzAgCCQELRGVsZXRlRW50cnkBCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkRVQ0tQUkVGSVgFCmFzc2V0SWRTdHIFB2FkZHJlc3MJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwUDbmlsAWkBCGNsYWltUmVzAgZhbW91bnQLbGFuZEFzc2V0SWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAiVjbGFpbVJlcyBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBARhZGRyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQkA2QQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCGNvbnRhaW5zAggFBWFzc2V0BG5hbWUFCkxBTkRQUkVGSVgJAAIBCQCsAgIJAKwCAgIETkZUIAUKTEFORFBSRUZJWAIgIHRva2VuIHNob3VsZCBiZSBwYXNzZWQgYXMgcGFyYW0EB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQULbGFuZEFzc2V0SWQEBW93bmVyCQERQGV4dHJOYXRpdmUoMTA1OCkBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8ECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMEC2R1Y2tBc3NldElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFC2R1Y2tBc3NldElkBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAMJAQIhPQIJAJEDAgUDbG9jBQhsb2NJZHhJZAULbGFuZEFzc2V0SWQJAAIBCQCsAgIJAKwCAgkArAICAhREdWNrIGxvY2F0aW9uIGlkIGlzIAkAkQMCBQNsb2MFCGxvY0lkeElkAhAsIGJ1dCBzaG91bGQgYmUgBQtsYW5kQXNzZXRJZAQJc2F2ZWRUaW1lCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ8IAQUHdGltZUtleQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFCXNhdmVkVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEFCXNhdmVkVGltZQIMLCBjdXJyZW50ID0gCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBBQhsYW5kU2l6ZQQWZGFpbHlQcm9kdWN0aW9uQnlQaWVjZQkBDGFwcGx5Qm9udXNlcwEFC2xhbmRBc3NldElkBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFFmRhaWx5UHJvZHVjdGlvbkJ5UGllY2UFBnBpZWNlcwUJREFZTUlMTElTAwkAZgIFBmFtb3VudAUIYXZhaWxSZXMJAAIBCQCsAgIJAKwCAgkArAICAiJOb3QgZW5vdWdoIHJlc291cmNlcywgYXZhaWxhYmxlID0gCQCkAwEFCGF2YWlsUmVzAg4sIHJlcXVlc3RlZCA9IAkApAMBBQZhbW91bnQEDG5ld0RlbHRhVGltZQkAawMJAGUCBQhhdmFpbFJlcwUGYW1vdW50BQlEQVlNSUxMSVMJAGgCBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBQZwaWVjZXMEDG5ld1RpbWVzdGFtcAkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQxuZXdEZWx0YVRpbWUEBWJwS2V5CQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAQLY3VycmVudFBhY2sJAQtnZXRCYWNrcGFjawEFBWJwS2V5BApjdXJyZW50UmVzCQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4UmVzAgFfBAVicFJlcwkBBmFkZFJlcwUFCmN1cnJlbnRSZXMFDXRlcnJhaW5Db3VudHMJAGUCBQlkZWx0YVRpbWUFDG5ld0RlbHRhVGltZQkAaQIFBnBpZWNlcwAZBRZkYWlseVByb2R1Y3Rpb25CeVBpZWNlBAduZXdQYWNrCQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCBQVicFJlcwkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeE1hdAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQlicElkeFByb2QFA25pbAIBOgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5BQduZXdQYWNrCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5BQxuZXdUaW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwUKTEFORFBSRUZJWAULbGFuZEFzc2V0SWQFBW93bmVyBQxuZXdUaW1lc3RhbXAFA25pbAUFYnBSZXMBaQEGZmxpZ2h0AgdtZXNzYWdlA3NpZwMJAQEhAQkAxBMDBQdtZXNzYWdlBQNzaWcFA3B1YgkAAgECGHNpZ25hdHVyZSBkb2VzIG5vdCBtYXRjaAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECI2ZsaWdodCBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBAVwYXJ0cwkAtQkCCQCwCQEFB21lc3NhZ2UCATsEAmhwCQC1CQIJAJEDAgkAtQkCCQCRAwIFBXBhcnRzAAACAXwAAAIBXwQFY3VySFAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJocAAABAVuZXdIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAEEDW5ld0xvY0FuZFRpbWUJALUJAgkAkQMCBQVwYXJ0cwABAgE6BAtuZXdMb2NhdGlvbgkAkQMCBQ1uZXdMb2NBbmRUaW1lAAAEBHRpbWUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ1uZXdMb2NBbmRUaW1lAAEDAwkAZgIFBHRpbWUJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAURRklWRU1JTlVURVNNSUxMSVMGCQBmAgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwUEdGltZQkAAgECEnNpZ25hdHVyZSBvdXRkYXRlZAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAxvbGRGcm9tU3RhdGUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoAGQDCQECIT0CBQxvbGRGcm9tU3RhdGUFBWN1ckhQCQACAQkArAICCQCsAgIJAKwCAgIKb2xkSGVhbHRoPQkApAMBCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aABkAi8gZnJvbSBzdGF0ZSBkb2VzIG5vdCBtYXRjaCBvbmUgZnJvbSBmbGlnaHQgbG9nPQkApAMBBQVjdXJIUAMJAGcCAAAFBWN1ckhQCQACAQIeWW91IGNhbid0IGZseSB3aXRoIHplcm8gaGVhbHRoBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUGbG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04DCQAAAgULbmV3TG9jYXRpb24FC2N1ckxvY2F0aW9uCQACAQIiWW91IGNhbid0IGZseSB0byB0aGUgc2FtZSBsb2NhdGlvbgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQMJAGYCBQVuZXdIUAAABQtuZXdMb2NhdGlvbgULY3VyTG9jYXRpb24JAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUFbmV3SFAFA25pbAUEdW5pdAFpAQlzZXRIZWFsdGgCBmhlYWx0aAtkdWNrQXNzZXRJZAMDCQBmAgAABQZoZWFsdGgGCQBmAgUGaGVhbHRoAGQJAAIBAhpIUCBzaG91bGQgYmUgd2l0aGluIDAuLjEwMAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAUGaGVhbHRoBQNuaWwBaQEEaGVhbAIHbWF0VHlwZQZhbW91bnQDAwkAZgIAAAUHbWF0VHlwZQYJAGcCBQdtYXRUeXBlBQZOVU1SRVMJAAIBCQCsAgICElVua25vd24gbWF0ZXJpYWw6IAkApAMBBQdtYXRUeXBlAwkAZwIAAAUGYW1vdW50CQACAQkArAICAhtBbW91bnQgc2hvdWxkIGJlIHBvc2l0aXZlISAJAKQDAQUGYW1vdW50BAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQECW9sZEhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgAZAMJAGcCBQlvbGRIZWFsdGgAZAkAAgECGkhQIHNob3VsZCBiZSA8IDEwMCB0byBoZWFsBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQELZ2V0QmFja3BhY2sBBQVicEtleQQFbUxpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8EDWN1cnJlbnRBbW91bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVtTGlzdAUHbWF0VHlwZQQLZGVsdGFIZWFsdGgJAJcDAQkAzAgCCQBpAgUGYW1vdW50BQhIRUFMQ09TVAkAzAgCCQBlAgBkBQlvbGRIZWFsdGgFA25pbAQLc3BlbmRBbW91bnQJAGgCBQtkZWx0YUhlYWx0aAUISEVBTENPU1QDCQBmAgULc3BlbmRBbW91bnQFDWN1cnJlbnRBbW91bnQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIJWW91IG5lZWQgCQCkAwEFC3NwZW5kQW1vdW50AgQgb2YgCQCRAwIFCG1hdFR5cGVzBQdtYXRUeXBlAiQgdG8gaGVhbCwgYnV0IHlvdSBiYWNrcGFjayBjb250YWlucyAJAKQDAQUNY3VycmVudEFtb3VudAQGbmV3TWF0CQEMc3ViT25lSW5MaXN0AwUFbUxpc3QFB21hdFR5cGUFC3NwZW5kQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgJAGQCBQlvbGRIZWFsdGgFC2RlbHRhSGVhbHRoCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCBQZuZXdNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToFA25pbAFpAQ51cGRhdGVCYWNrcGFjawILZHVja0Fzc2V0SWQHbmV3UGFjawMJAQIhPQIIBQFpBmNhbGxlcgULZWNvbm9teUFkZHIJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBQduZXdQYWNrBQNuaWwFB25ld1BhY2sBaQENZXhwZWRpdGlvbkJ1eQIHbWVzc2FnZQNzaWcDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkbkFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRE4gcGF5bWVudCBvbmx5IQMJAQIhPQIIBQNwbXQGYW1vdW50BQdFWFBVU0ROCQACAQkArAICAhtQYXltZW50IGF0dGFjaGVkIHNob3VsZCBiZSAJAKQDAQUHRVhQVVNETgkBEGV4cGVkaXRpb25Db21tb24FBwgFAWkGY2FsbGVyCAUBaQ10cmFuc2FjdGlvbklkBQdtZXNzYWdlBQNzaWcBaQEKZXhwZWRpdGlvbgIHbWVzc2FnZQNzaWcDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAidleHBlZGl0aW9uIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMJARBleHBlZGl0aW9uQ29tbW9uBQYIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAUHbWVzc2FnZQUDc2lnAWkBDHVwZ3JhZGVJbmZyYQELbGFuZEFzc2V0SWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAjNJbmZyYXN0cnVjdHVyZSB1cGdyYWRlIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMJAQ11cEluZnJhQ29tbW9uAwYIBQFpBmNhbGxlcgULbGFuZEFzc2V0SWQBaQEQdXBncmFkZUluZnJhVXNkbgELbGFuZEFzc2V0SWQDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAhxFeGFjdGx5IG9uZSBwYXltZW50IHJlcXVpcmVkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAMJAQIhPQIIBQNwbXQHYXNzZXRJZAULdXNkbkFzc2V0SWQJAAIBAhpBbGxvd2VkIFVTRE4gcGF5bWVudCBvbmx5IQQIbmV3TGV2ZWwJAGQCCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlJbmZyYUxldmVsQnlBc3NldElkAQULbGFuZEFzc2V0SWQAAAABBAVhc3NldAkBBXZhbHVlAQkA7AcBCQDZBAEFC2xhbmRBc3NldElkBAFkCQC1CQIIBQVhc3NldAtkZXNjcmlwdGlvbgIBXwQEY29zdAkAawMFFUluZnJhVXBncmFkZUNvc3RTVXNkbgkAaAIJAQ9udW1QaWVjZXNCeVNpemUBCQCRAwIFAWQFC3JlY0xhbmRTaXplBQhuZXdMZXZlbAAZAwkBAiE9AggFA3BtdAZhbW91bnQFBGNvc3QJAAIBCQCsAgICG1BheW1lbnQgYXR0YWNoZWQgc2hvdWxkIGJlIAkApAMBBQRjb3N0CQENdXBJbmZyYUNvbW1vbgMHCAUBaQZjYWxsZXIFC2xhbmRBc3NldElkAP5yLgo=",
    "height": 2392231,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AcVVsBoj3WReYh1Y9Sx18LhYGwSeu28Pud4tdCcg5fbA
Next: Co5a3aRFimWPciBA5gBEqF9P9fbhnNUF93MbCW77BodK

Diff: 
Old New Differences
143 143  func N (K) = ("infraLevel_" + K)
144 144  
145 145  
146 - func O (K) = ("presaleArtActivated_" + K)
146 + func O (K,P) = ((("infraLevelByAssetIdAndOwner_" + K) + "_") + P)
147 147  
148 148  
149 - func P (Q) = ("stakedDuckByOwner_" + Q)
149 + func Q (K) = ("presaleArtActivated_" + K)
150 150  
151 151  
152 - func R (S,K,Q) = ((((("stakedTimeByTypeAssetIdAndOwner_" + S) + "_") + K) + "_") + Q)
152 + func R (P) = ("stakedDuckByOwner_" + P)
153 153  
154 154  
155 - func T (G) = ("landOwner_" + G)
155 + func S (T,K,P) = ((((("stakedTimeByTypeAssetIdAndOwner_" + T) + "_") + K) + "_") + P)
156 156  
157 157  
158 - func U (V) = ("backPack_" + V)
158 + func U (G) = ("landOwner_" + G)
159 159  
160 160  
161 - func W (V) = ("duckLocation_" + V)
161 + func V (W) = ("backPack_" + W)
162 162  
163 163  
164 - func X (V) = ("duckHealth_" + V)
164 + func X (W) = ("duckLocation_" + W)
165 165  
166 166  
167 - func Y () = "resTypesProportions"
167 + func Y (W) = ("duckHealth_" + W)
168 168  
169 169  
170 - let Z = 0
170 + func Z () = "resTypesProportions"
171 171  
172 - let aa = 1
173 172  
174 - let ab = 2
173 + let aa = 0
175 174  
176 - let ac = 3
175 + let ab = 1
177 176  
178 - let ad = 0
177 + let ac = 2
179 178  
180 - let ae = 1
179 + let ad = 3
181 180  
182 - let af = 2
181 + let ae = 0
183 182  
184 - let ag = 0
183 + let af = 1
185 184  
186 - let ah = 1
185 + let ag = 2
187 186  
188 - let ai = 2
187 + let ah = 0
189 188  
190 - let aj = 3
189 + let ai = 1
191 190  
192 - func ak (al) = {
193 -     let c = al
191 + let aj = 2
192 + 
193 + let ak = 3
194 + 
195 + func al (am) = {
196 +     let c = am
194 197      if ($isInstanceOf(c, "String"))
195 198          then {
196 -             let am = c
197 -             am
199 +             let an = c
200 +             an
198 201              }
199 202          else throw("fail to cast into String")
200 203      }
201 204  
202 205  
203 - func an (ao) = {
204 -     let ap = split(value(getString(Y())), "_")
205 -     if ((size(ap) != l))
206 + func ao (ap) = {
207 +     let aq = split(value(getString(Z())), "_")
208 +     if ((size(aq) != l))
206 209          then throw("Wrong proportions data")
207 210          else {
208 -             let aq = [parseIntValue(ap[0]), parseIntValue(ap[1]), parseIntValue(ap[2]), parseIntValue(ap[3]), parseIntValue(ap[4]), parseIntValue(ap[5])]
209 -             let ar = (((((aq[0] + aq[1]) + aq[2]) + aq[3]) + aq[4]) + aq[5])
210 -             if ((0 >= ar))
211 +             let ar = [parseIntValue(aq[0]), parseIntValue(aq[1]), parseIntValue(aq[2]), parseIntValue(aq[3]), parseIntValue(aq[4]), parseIntValue(aq[5])]
212 +             let as = (((((ar[0] + ar[1]) + ar[2]) + ar[3]) + ar[4]) + ar[5])
213 +             if ((0 >= as))
211 214                  then throw("No lands staked")
212 215                  else {
213 -                     let as = fraction(ao, v, ar)
214 -                     func at (au,av) =                     (au :+ fraction(av, as, v))
216 +                     let at = fraction(ap, v, as)
217 +                     func au (av,aw) =                     (av :+ fraction(aw, at, v))
215 218  
216 -                     let aw = aq
217 -                     let ax = size(aw)
218 -                     let ay = nil
219 -                     func az (aA,aB) =                     if ((aB >= ax))
220 -                         then aA
221 -                         else at(aA, aw[aB])
219 +                     let ax = ar
220 +                     let ay = size(ax)
221 +                     let az = nil
222 +                     func aA (aB,aC) =                     if ((aC >= ay))
223 +                         then aB
224 +                         else au(aB, ax[aC])
222 225  
223 -                     func aC (aA,aB) =                     if ((aB >= ax))
224 -                         then aA
226 +                     func aD (aB,aC) =                     if ((aC >= ay))
227 +                         then aB
225 228                          else throw("List size exceeds 6")
226 229  
227 -                     aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
230 +                     aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
228 231                      }
229 232              }
230 233      }
231 234  
232 235  
233 - func aD (aE,aF,aG) = {
234 -     let aH = an(aG)
235 -     func aI (au,aJ) =     {
236 -         let aK = (parseIntValue(aF[aJ]) - aH[aJ])
237 -         if ((0 > aK))
238 -             then throw(((((("Not enough material idx=" + toString(aJ)) + ", you have ") + aF[aJ]) + ", but need ") + toString(aH[aJ])))
239 -             else (au :+ toString(aK))
236 + func aE (aF,aG,aH) = {
237 +     let aI = ao(aH)
238 +     func aJ (av,aK) =     {
239 +         let aL = (parseIntValue(aG[aK]) - aI[aK])
240 +         if ((0 > aL))
241 +             then throw(((((("Not enough material idx=" + toString(aK)) + ", you have ") + aG[aK]) + ", but need ") + toString(aI[aK])))
242 +             else (av :+ toString(aL))
240 243          }
241 244  
242 -     if (aE)
245 +     if (aF)
243 246          then {
244 -             let aw = [0, 1, 2, 3, 4, 5]
245 -             let ax = size(aw)
246 -             let ay = nil
247 -             func az (aA,aB) =             if ((aB >= ax))
248 -                 then aA
249 -                 else aI(aA, aw[aB])
247 +             let ax = [0, 1, 2, 3, 4, 5]
248 +             let ay = size(ax)
249 +             let az = nil
250 +             func aA (aB,aC) =             if ((aC >= ay))
251 +                 then aB
252 +                 else aJ(aB, ax[aC])
250 253  
251 -             func aC (aA,aB) =             if ((aB >= ax))
252 -                 then aA
254 +             func aD (aB,aC) =             if ((aC >= ay))
255 +                 then aB
253 256                  else throw("List size exceeds 6")
254 257  
255 -             aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
258 +             aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
256 259              }
257 -         else aF
260 +         else aG
258 261      }
259 262  
260 263  
261 - func aL (aM,aN,aO) = {
262 -     let ap = split(valueOrElse(getString(Y()), "0_0_0_0_0_0"), "_")
263 -     if ((size(ap) != l))
264 + func aM (aN,aO,aP) = {
265 +     let aq = split(valueOrElse(getString(Z()), "0_0_0_0_0_0"), "_")
266 +     if ((size(aq) != l))
264 267          then throw("Wrong proportions data")
265 268          else {
266 -             func aP (au,aQ) =             {
267 -                 let aK = (parseIntValue(ap[aQ]) + ((aO * aM[aQ]) * aN))
268 -                 if ((0 > aK))
269 -                     then throw(((((((("Panic! Pieces of type=" + toString(aQ)) + ", sign=") + toString(aO)) + ",  terrainCounts[i]=") + toString(aM[aQ])) + ", landSizeIndex=") + toString(aN)))
270 -                     else (au :+ toString(aK))
269 +             func aQ (av,aR) =             {
270 +                 let aL = (parseIntValue(aq[aR]) + ((aP * aN[aR]) * aO))
271 +                 if ((0 > aL))
272 +                     then throw(((((((("Panic! Pieces of type=" + toString(aR)) + ", sign=") + toString(aP)) + ",  terrainCounts[i]=") + toString(aN[aR])) + ", landSizeIndex=") + toString(aO)))
273 +                     else (av :+ toString(aL))
271 274                  }
272 275  
273 -             let aq = {
274 -                 let aw = [0, 1, 2, 3, 4, 5]
275 -                 let ax = size(aw)
276 -                 let ay = nil
277 -                 func az (aA,aB) =                 if ((aB >= ax))
278 -                     then aA
279 -                     else aP(aA, aw[aB])
276 +             let ar = {
277 +                 let ax = [0, 1, 2, 3, 4, 5]
278 +                 let ay = size(ax)
279 +                 let az = nil
280 +                 func aA (aB,aC) =                 if ((aC >= ay))
281 +                     then aB
282 +                     else aQ(aB, ax[aC])
280 283  
281 -                 func aC (aA,aB) =                 if ((aB >= ax))
282 -                     then aA
284 +                 func aD (aB,aC) =                 if ((aC >= ay))
285 +                     then aB
283 286                      else throw("List size exceeds 6")
284 287  
285 -                 aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
288 +                 aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
286 289                  }
287 -             makeString(aq, "_")
290 +             makeString(ar, "_")
288 291              }
289 292      }
290 293  
291 294  
292 - func aR (aS) = [(size(split(aS, "A")) - 1), (size(split(aS, "B")) - 1), (size(split(aS, "C")) - 1), (size(split(aS, "D")) - 1), (size(split(aS, "E")) - 1), (size(split(aS, "F")) - 1)]
295 + func aS (aT) = [(size(split(aT, "A")) - 1), (size(split(aT, "B")) - 1), (size(split(aT, "C")) - 1), (size(split(aT, "D")) - 1), (size(split(aT, "E")) - 1), (size(split(aT, "F")) - 1)]
293 296  
294 297  
295 - func aT (I) = {
298 + func aU (I) = {
296 299      let c = I
297 300      if (("S" == c))
298 301          then 25
308 311      }
309 312  
310 313  
311 - func aU (aV,aJ,aW) = {
312 -     func aX (au,aQ) =     (au :+ (if ((aQ == aJ))
313 -         then toString((parseIntValue(aV[aQ]) - aW))
314 -         else aV[aQ]))
314 + func aV (aW,aK,aX) = {
315 +     func aY (av,aR) =     (av :+ (if ((aR == aK))
316 +         then toString((parseIntValue(aW[aR]) - aX))
317 +         else aW[aR]))
315 318  
316 -     let aq = {
317 -         let aw = [0, 1, 2, 3, 4, 5]
318 -         let ax = size(aw)
319 -         let ay = nil
320 -         func az (aA,aB) =         if ((aB >= ax))
321 -             then aA
322 -             else aX(aA, aw[aB])
319 +     let ar = {
320 +         let ax = [0, 1, 2, 3, 4, 5]
321 +         let ay = size(ax)
322 +         let az = nil
323 +         func aA (aB,aC) =         if ((aC >= ay))
324 +             then aB
325 +             else aY(aB, ax[aC])
323 326  
324 -         func aC (aA,aB) =         if ((aB >= ax))
325 -             then aA
327 +         func aD (aB,aC) =         if ((aC >= ay))
328 +             then aB
326 329              else throw("List size exceeds 6")
327 330  
328 -         aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
331 +         aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
329 332          }
330 -     makeString(aq, "_")
333 +     makeString(ar, "_")
331 334      }
332 335  
333 336  
334 - func aY (aZ,aM,ba,aN,bb) = {
335 -     func bc (au,aQ) =     {
336 -         let bd = ((fraction(ba, bb, n) * aM[aQ]) * aN)
337 -         (au :+ toString((parseIntValue(aZ[aQ]) + bd)))
337 + func aZ (ba,aN,bb,aO,bc) = {
338 +     func bd (av,aR) =     {
339 +         let be = ((fraction(bb, bc, n) * aN[aR]) * aO)
340 +         (av :+ toString((parseIntValue(ba[aR]) + be)))
338 341          }
339 342  
340 -     let aq = {
341 -         let aw = [0, 1, 2, 3, 4, 5]
342 -         let ax = size(aw)
343 -         let ay = nil
344 -         func az (aA,aB) =         if ((aB >= ax))
345 -             then aA
346 -             else bc(aA, aw[aB])
343 +     let ar = {
344 +         let ax = [0, 1, 2, 3, 4, 5]
345 +         let ay = size(ax)
346 +         let az = nil
347 +         func aA (aB,aC) =         if ((aC >= ay))
348 +             then aB
349 +             else bd(aB, ax[aC])
347 350  
348 -         func aC (aA,aB) =         if ((aB >= ax))
349 -             then aA
351 +         func aD (aB,aC) =         if ((aC >= ay))
352 +             then aB
350 353              else throw("List size exceeds 6")
351 354  
352 -         aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
355 +         aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
353 356          }
354 -     makeString(aq, "_")
357 +     makeString(ar, "_")
355 358      }
356 359  
357 360  
358 - func be (bf) = if ((bf >= toBigInt(0)))
359 -     then bf
360 -     else -(bf)
361 + func bf (bg) = if ((bg >= toBigInt(0)))
362 +     then bg
363 +     else -(bg)
361 364  
362 365  
363 - let bg = [[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]]
366 + let bh = [[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]]
364 367  
365 - func bh (bi,bj) = {
366 -     let bk = toInt((bi % x))
367 -     let bl = if ((bj[0] > bk))
368 + func bi (bj,bk) = {
369 +     let bl = toInt((bj % x))
370 +     let bm = if ((bk[0] > bl))
368 371          then "A"
369 -         else if ((bj[1] > bk))
372 +         else if ((bk[1] > bl))
370 373              then "B"
371 -             else if ((bj[2] > bk))
374 +             else if ((bk[2] > bl))
372 375                  then "C"
373 -                 else if ((bj[3] > bk))
376 +                 else if ((bk[3] > bl))
374 377                      then "D"
375 -                     else if ((bj[4] > bk))
378 +                     else if ((bk[4] > bl))
376 379                          then "E"
377 380                          else "F"
378 -     bl
381 +     bm
379 382      }
380 383  
381 384  
382 - func bm (bn) = {
383 -     let bo = split(valueOrElse(getString(bn), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
384 - [toString(valueOrElse(parseInt(bo[ag]), 0)), if ((size(split(bo[ah], "_")) == l))
385 -         then bo[ah]
386 -         else "0_0_0_0_0_0", if ((size(split(bo[ai], "_")) == l))
387 -         then bo[ai]
388 -         else "0_0_0_0_0_0", bo[aj]]
385 + func bn (bo) = {
386 +     let bp = split(valueOrElse(getString(bo), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
387 + [toString(valueOrElse(parseInt(bp[ah]), 0)), if ((size(split(bp[ai], "_")) == l))
388 +         then bp[ai]
389 +         else "0_0_0_0_0_0", if ((size(split(bp[aj], "_")) == l))
390 +         then bp[aj]
391 +         else "0_0_0_0_0_0", bp[ak]]
389 392      }
390 393  
391 394  
392 - func bp (aE,bq,br,bs,bt) = if (!(sigVerify_8Kb(bs, bt, g)))
395 + func bq (aF,br,bs,bt,bu) = if (!(sigVerify_8Kb(bt, bu, g)))
393 396      then throw("signature does not match")
394 397      else {
395 -         let bu = split(toUtf8String(bs), ";")
396 -         let bv = split(split(bu[0], "|")[0], "_")
397 -         let bw = parseIntValue(bv[0])
398 -         let bx = parseIntValue(bv[1])
399 -         let by = split(bu[1], ":")
400 -         let bz = split(by[0], "_")
401 -         if ((bz[1] != "E"))
398 +         let bv = split(toUtf8String(bt), ";")
399 +         let bw = split(split(bv[0], "|")[0], "_")
400 +         let bx = parseIntValue(bw[0])
401 +         let by = parseIntValue(bw[1])
402 +         let bz = split(bv[1], ":")
403 +         let bA = split(bz[0], "_")
404 +         if ((bA[1] != "E"))
402 405              then throw("expedition target location type should be E")
403 406              else {
404 -                 let bA = parseIntValue(by[1])
405 -                 if (if ((bA > (lastBlock.timestamp + o)))
407 +                 let bB = parseIntValue(bz[1])
408 +                 if (if ((bB > (lastBlock.timestamp + o)))
406 409                      then true
407 -                     else ((lastBlock.timestamp - o) > bA))
410 +                     else ((lastBlock.timestamp - o) > bB))
408 411                      then throw("signature outdated")
409 412                      else {
410 -                         let bB = toString(bq)
411 -                         let V = valueOrErrorMessage(getString(P(bB)), "You don't have a duck staked")
412 -                         let bC = X(V)
413 -                         let bD = valueOrElse(getInteger(bC), 100)
414 -                         if ((bD != bw))
415 -                             then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bC), 100))) + " from state does not match one from flight log=") + toString(bw)))
416 -                             else if ((0 >= bw))
413 +                         let bC = toString(br)
414 +                         let W = valueOrErrorMessage(getString(R(bC)), "You don't have a duck staked")
415 +                         let bD = Y(W)
416 +                         let bE = valueOrElse(getInteger(bD), 100)
417 +                         if ((bE != bx))
418 +                             then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bD), 100))) + " from state does not match one from flight log=") + toString(bx)))
419 +                             else if ((0 >= bx))
417 420                                  then throw("You can't fly with zero health")
418 -                                 else if ((0 >= bx))
419 -                                     then $Tuple2(((if (!(aE))
420 -                                         then [ScriptTransfer(bq, t, b)]
421 -                                         else nil) :+ IntegerEntry(bC, 0)), "")
421 +                                 else if ((0 >= by))
422 +                                     then $Tuple2(((if (!(aF))
423 +                                         then [ScriptTransfer(br, t, b)]
424 +                                         else nil) :+ IntegerEntry(bD, 0)), "")
422 425                                      else {
423 -                                         let bn = U(V)
424 -                                         let bE = bm(bn)
425 -                                         let bF = split(bE[ai], "_")
426 -                                         let bG = makeString(aD(aE, bF, s), "_")
427 -                                         let bH = be(toBigInt(br))
428 -                                         let bI = valueOrElse(getInteger(E()), 501)
429 -                                         let G = toString(bI)
430 -                                         let bJ = toInt((bH % w))
431 -                                         let bK = bg[bJ]
432 -                                         func bL (au,av) =                                         $Tuple2((((((au._1 + bh(au._2, bK)) + bh((au._2 / x), bK)) + bh((au._2 / y), bK)) + bh((au._2 / z), bK)) + bh((au._2 / A), bK)), (au._2 / B))
426 +                                         let bo = V(W)
427 +                                         let bF = bn(bo)
428 +                                         let bG = split(bF[aj], "_")
429 +                                         let bH = makeString(aE(aF, bG, s), "_")
430 +                                         let bI = bf(toBigInt(bs))
431 +                                         let bJ = valueOrElse(getInteger(E()), 501)
432 +                                         let G = toString(bJ)
433 +                                         let bK = toInt((bI % w))
434 +                                         let bL = bh[bK]
435 +                                         func bM (av,aw) =                                         $Tuple2((((((av._1 + bi(av._2, bL)) + bi((av._2 / x), bL)) + bi((av._2 / y), bL)) + bi((av._2 / z), bL)) + bi((av._2 / A), bL)), (av._2 / B))
433 436  
434 -                                         let bM = {
435 -                                             let aw = [1, 2, 3, 4, 5]
436 -                                             let ax = size(aw)
437 -                                             let ay = $Tuple2("", (bH / w))
438 -                                             func az (aA,aB) =                                             if ((aB >= ax))
439 -                                                 then aA
440 -                                                 else bL(aA, aw[aB])
437 +                                         let bN = {
438 +                                             let ax = [1, 2, 3, 4, 5]
439 +                                             let ay = size(ax)
440 +                                             let az = $Tuple2("", (bI / w))
441 +                                             func aA (aB,aC) =                                             if ((aC >= ay))
442 +                                                 then aB
443 +                                                 else bM(aB, ax[aC])
441 444  
442 -                                             func aC (aA,aB) =                                             if ((aB >= ax))
443 -                                                 then aA
445 +                                             func aD (aB,aC) =                                             if ((aC >= ay))
446 +                                                 then aB
444 447                                                  else throw("List size exceeds 5")
445 448  
446 -                                             aC(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5)
449 +                                             aD(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5)
447 450                                              }
448 -                                         let bN = D[bJ]
449 -                                         let bO = Issue(H(G, "S"), makeString([G, "S", bM._1, bN], "_"), 1, 0, false)
450 -                                         let K = calculateAssetId(bO)
451 -                                         let bP = toBase58String(K)
452 -                                         $Tuple2([IntegerEntry(E(), (bI + 1)), bO, StringEntry(F(G), bP), StringEntry(J(bP), bB), StringEntry(T(G), bB), IntegerEntry(N(bP), 0), ScriptTransfer(bq, 1, K), StringEntry(W(V), makeString([bN, "L", bP], "_")), IntegerEntry(bC, bx), StringEntry(bn, makeString([bE[ag], bE[ah], bG, bE[aj]], ":"))], bP)
451 +                                         let bO = D[bK]
452 +                                         let bP = Issue(H(G, "S"), makeString([G, "S", bN._1, bO], "_"), 1, 0, false)
453 +                                         let K = calculateAssetId(bP)
454 +                                         let bQ = toBase58String(K)
455 +                                         $Tuple2([IntegerEntry(E(), (bJ + 1)), bP, StringEntry(F(G), bQ), StringEntry(J(bQ), bC), StringEntry(U(G), bC), IntegerEntry(N(bQ), 0), IntegerEntry(O(bQ, bC), 0), ScriptTransfer(br, 1, K), StringEntry(X(W), makeString([bO, "L", bQ], "_")), IntegerEntry(bD, by), StringEntry(bo, makeString([bF[ah], bF[ai], bH, bF[ak]], ":"))], bQ)
453 456                                          }
454 457                          }
455 458                  }
456 459          }
457 460  
458 461  
459 - func bQ (bR) = {
460 -     let bS = valueOrElse(getInteger(N(bR)), 0)
461 -     let bT = if (valueOrElse(getBoolean(O(bR)), false))
462 + func bR (bS) = {
463 +     let bT = valueOrElse(getInteger(N(bS)), 0)
464 +     let bU = if (valueOrElse(getBoolean(Q(bS)), false))
462 465          then 3
463 466          else 0
464 -     (m + fraction(m, bS, 4))
467 +     (m + fraction(m, bT, 4))
465 468      }
466 469  
467 470  
468 - func bU (bR,bV) = {
469 -     let bW = M(bR)
470 -     let bX = valueOrErrorMessage(getInteger(bW), (((i + " ") + bR) + " is not staked"))
471 -     let ba = (lastBlock.timestamp - bX)
472 -     if ((0 > ba))
473 -         then throw(((("Saved timestamp is in future, saved = " + toString(bX)) + ", current = ") + toString(lastBlock.timestamp)))
471 + func bV (bS,bW) = {
472 +     let bX = M(bS)
473 +     let bY = valueOrErrorMessage(getInteger(bX), (((i + " ") + bS) + " is not staked"))
474 +     let bb = (lastBlock.timestamp - bY)
475 +     if ((0 > bb))
476 +         then throw(((("Saved timestamp is in future, saved = " + toString(bY)) + ", current = ") + toString(lastBlock.timestamp)))
474 477          else {
475 -             let bY = bQ(bR)
476 -             let bZ = (fraction(ba, bY, n) * bV)
477 -             ak(invoke(this, "claimRes", [bZ, bR], nil))
478 +             let bZ = bR(bS)
479 +             let ca = (fraction(bb, bZ, n) * bW)
480 +             al(invoke(this, "claimRes", [ca, bS], nil))
478 481              }
479 482      }
480 483  
481 484  
482 - func ca (aE,bq,bR) = {
483 -     let cb = toString(bq)
484 -     let cc = N(bR)
485 -     let cd = valueOrElse(getInteger(cc), 0)
486 -     if ((cd >= 3))
485 + func cb (aF,br,bS) = {
486 +     let cc = toString(br)
487 +     let cd = N(bS)
488 +     let ce = valueOrElse(getInteger(cd), 0)
489 +     if ((ce >= 3))
487 490          then throw("Currently max infrastructure level = 3")
488 491          else {
489 -             let ce = (cd + 1)
490 -             let cf = value(assetInfo(fromBase58String(bR)))
491 -             if (!(contains(cf.name, i)))
492 +             let cf = (ce + 1)
493 +             let cg = value(assetInfo(fromBase58String(bS)))
494 +             if (!(contains(cg.name, i)))
492 495                  then throw((("NFT " + i) + " token should be passed as param"))
493 496                  else {
494 -                     let cg = getStringValue(J(bR))
495 -                     if ((cg != cb))
497 +                     let ch = getStringValue(J(bS))
498 +                     if ((ch != cc))
496 499                          then throw((i + " is not yours"))
497 500                          else {
498 -                             let ch = split(cf.description, "_")
499 -                             let I = ch[aa]
500 -                             let bV = aT(I)
501 -                             let V = valueOrErrorMessage(getString(P(cb)), "You don't have a duck staked")
502 -                             let ci = valueOrElse(getString(W(V)), k)
503 -                             let cj = split(value(ci), "_")
504 -                             if ((cj[ae] != "L"))
505 -                                 then throw((("Duck location type is " + cj[ae]) + ", but should be L"))
506 -                                 else if ((cj[af] != bR))
507 -                                     then throw(((("Duck location id is " + cj[af]) + ", but should be ") + bR))
501 +                             let ci = split(cg.description, "_")
502 +                             let I = ci[ab]
503 +                             let bW = aU(I)
504 +                             let W = valueOrErrorMessage(getString(R(cc)), "You don't have a duck staked")
505 +                             let cj = valueOrElse(getString(X(W)), k)
506 +                             let ck = split(value(cj), "_")
507 +                             if ((ck[af] != "L"))
508 +                                 then throw((("Duck location type is " + ck[af]) + ", but should be L"))
509 +                                 else if ((ck[ag] != bS))
510 +                                     then throw(((("Duck location id is " + ck[ag]) + ", but should be ") + bS))
508 511                                      else {
509 -                                         let bn = U(V)
510 -                                         let bE = bm(bn)
511 -                                         let bF = split(bE[ai], "_")
512 -                                         let bG = makeString(aD(aE, bF, fraction(q, (bV * ce), 25)), "_")
513 -                                         let ck = bU(bR, bV)
514 -                                         $Tuple2([IntegerEntry(cc, ce), StringEntry(bn, makeString([bE[ag], ck, bG, bE[aj]], ":"))], ce)
512 +                                         let bo = V(W)
513 +                                         let bF = bn(bo)
514 +                                         let bG = split(bF[aj], "_")
515 +                                         let bH = makeString(aE(aF, bG, fraction(q, (bW * cf), 25)), "_")
516 +                                         let cl = bV(bS, bW)
517 +                                         $Tuple2([IntegerEntry(cd, cf), IntegerEntry(O(bS, cc), cf), StringEntry(bo, makeString([bF[ah], cl, bH, bF[ak]], ":"))], cf)
515 518                                          }
516 519                              }
517 520                      }
519 522      }
520 523  
521 524  
522 - @Callable(aQ)
525 + @Callable(aR)
523 526  func stakeLand () = {
524 -     let cl = value(aQ.payments[0])
525 -     let K = value(cl.assetId)
526 -     let cm = toString(aQ.caller)
527 -     if ((cl.amount != 1))
527 +     let cm = value(aR.payments[0])
528 +     let K = value(cm.assetId)
529 +     let cn = toString(aR.caller)
530 +     if ((cm.amount != 1))
528 531          then throw((("NFT " + i) + " token should be attached as payment"))
529 532          else {
530 -             let cf = value(assetInfo(K))
531 -             if ((cf.issuer != this))
533 +             let cg = value(assetInfo(K))
534 +             if ((cg.issuer != this))
532 535                  then throw("Unknown issuer of token")
533 -                 else if (!(contains(cf.name, i)))
536 +                 else if (!(contains(cg.name, i)))
534 537                      then throw((("Only NFT " + i) + " tokens are accepted"))
535 538                      else {
536 -                         let cn = drop(cf.name, 4)
537 -                         let G = if (contains(cn, "XXL"))
538 -                             then dropRight(cn, 3)
539 -                             else if (contains(cn, "XL"))
540 -                                 then dropRight(cn, 2)
541 -                                 else dropRight(cn, 1)
542 -                         let co = valueOrErrorMessage(parseInt(G), ("Cannot parse land number from " + cf.name))
543 -                         let bR = toBase58String(K)
544 -                         let bW = M(bR)
545 -                         if (isDefined(getInteger(bW)))
546 -                             then throw((("NFT " + cf.name) + " is already staked"))
539 +                         let co = drop(cg.name, 4)
540 +                         let G = if (contains(co, "XXL"))
541 +                             then dropRight(co, 3)
542 +                             else if (contains(co, "XL"))
543 +                                 then dropRight(co, 2)
544 +                                 else dropRight(co, 1)
545 +                         let cp = valueOrErrorMessage(parseInt(G), ("Cannot parse land number from " + cg.name))
546 +                         let bS = toBase58String(K)
547 +                         let bX = M(bS)
548 +                         if (isDefined(getInteger(bX)))
549 +                             then throw((("NFT " + cg.name) + " is already staked"))
547 550                              else {
548 -                                 let ch = split(cf.description, "_")
549 -                                 let aM = aR(ch[ab])
550 -                                 let ap = aL(aM, (aT(ch[aa]) / 25), 1)
551 -                                 let cp = if ((500 >= co))
551 +                                 let ci = split(cg.description, "_")
552 +                                 let aN = aS(ci[ac])
553 +                                 let aq = aM(aN, (aU(ci[ab]) / 25), 1)
554 +                                 let cq = if ((500 >= cp))
552 555                                      then (lastBlock.timestamp > u)
553 556                                      else false
554 - [IntegerEntry(bW, lastBlock.timestamp), IntegerEntry(R(i, bR, cm), lastBlock.timestamp), StringEntry(J(bR), cm), StringEntry(T(G), cm), StringEntry(Y(), ap)]
557 + [IntegerEntry(bX, lastBlock.timestamp), IntegerEntry(S(i, bS, cn), lastBlock.timestamp), StringEntry(J(bS), cn), StringEntry(U(G), cn), StringEntry(Z(), aq)]
555 558                                  }
556 559                          }
557 560              }
559 562  
560 563  
561 564  
562 - @Callable(aQ)
563 - func unstakeLand (bR) = if ((size(aQ.payments) != 0))
565 + @Callable(aR)
566 + func unstakeLand (bS) = if ((size(aR.payments) != 0))
564 567      then throw("unstake doesn't require any payments")
565 568      else {
566 -         let K = fromBase58String(bR)
567 -         let cm = toString(aQ.caller)
568 -         let cf = value(assetInfo(K))
569 -         if ((cf.issuer != this))
569 +         let K = fromBase58String(bS)
570 +         let cn = toString(aR.caller)
571 +         let cg = value(assetInfo(K))
572 +         if ((cg.issuer != this))
570 573              then throw("Unknown issuer of token")
571 -             else if (!(contains(cf.name, i)))
574 +             else if (!(contains(cg.name, i)))
572 575                  then throw((("Only NFT " + i) + " tokens can be unstaked"))
573 576                  else {
574 -                     let bW = M(bR)
575 -                     if (!(isDefined(bW)))
576 -                         then throw((("NFT " + cf.name) + " is not staked"))
577 +                     let bX = M(bS)
578 +                     if (!(isDefined(bX)))
579 +                         then throw((("NFT " + cg.name) + " is not staked"))
577 580                          else {
578 -                             let cg = valueOrErrorMessage(getString(J(bR)), (("NFT " + cf.name) + " is orphaned"))
579 -                             if ((cg != cm))
581 +                             let ch = valueOrErrorMessage(getString(J(bS)), (("NFT " + cg.name) + " is orphaned"))
582 +                             if ((ch != cn))
580 583                                  then throw((("Staked " + i) + " is not yours"))
581 584                                  else {
582 -                                     let ch = split(cf.description, "_")
583 -                                     let aM = aR(ch[ab])
584 -                                     let bV = aT(ch[aa])
585 -                                     let ap = aL(aM, (bV / 25), -1)
586 -                                     let ck = bU(bR, bV)
587 -                                     let V = valueOrErrorMessage(getString(P(cm)), (("You can't unstake " + i) + " without a duck staked"))
588 -                                     let ci = valueOrElse(getString(W(V)), k)
589 -                                     let cj = split(value(ci), "_")
590 -                                     if ((cj[ae] != "L"))
591 -                                         then throw((("Duck location type is " + cj[ae]) + ", but should be L"))
592 -                                         else if ((cj[af] != bR))
593 -                                             then throw(((("Duck location id is " + cj[af]) + ", but should be ") + bR))
585 +                                     let ci = split(cg.description, "_")
586 +                                     let aN = aS(ci[ac])
587 +                                     let bW = aU(ci[ab])
588 +                                     let aq = aM(aN, (bW / 25), -1)
589 +                                     let cl = bV(bS, bW)
590 +                                     let W = valueOrErrorMessage(getString(R(cn)), (("You can't unstake " + i) + " without a duck staked"))
591 +                                     let cj = valueOrElse(getString(X(W)), k)
592 +                                     let ck = split(value(cj), "_")
593 +                                     if ((ck[af] != "L"))
594 +                                         then throw((("Duck location type is " + ck[af]) + ", but should be L"))
595 +                                         else if ((ck[ag] != bS))
596 +                                             then throw(((("Duck location id is " + ck[ag]) + ", but should be ") + bS))
594 597                                              else {
595 -                                                 let bn = U(V)
596 -                                                 let bE = bm(bn)
597 - [ScriptTransfer(aQ.caller, 1, K), DeleteEntry(bW), DeleteEntry(R(i, bR, cm)), StringEntry(Y(), ap), StringEntry(bn, makeString([bE[ag], ck, bE[ai], bE[aj]], ":"))]
598 +                                                 let bo = V(W)
599 +                                                 let bF = bn(bo)
600 + [ScriptTransfer(aR.caller, 1, K), DeleteEntry(bX), DeleteEntry(S(i, bS, cn)), StringEntry(Z(), aq), StringEntry(bo, makeString([bF[ah], cl, bF[aj], bF[ak]], ":"))]
598 601                                                  }
599 602                                      }
600 603                              }
603 606  
604 607  
605 608  
606 - @Callable(aQ)
609 + @Callable(aR)
607 610  func stakeDuck () = {
608 -     let cl = value(aQ.payments[0])
609 -     let K = value(cl.assetId)
610 -     let cm = toString(aQ.caller)
611 -     if ((cl.amount != 1))
611 +     let cm = value(aR.payments[0])
612 +     let K = value(cm.assetId)
613 +     let cn = toString(aR.caller)
614 +     if ((cm.amount != 1))
612 615          then throw((("NFT " + j) + " token should be attached as payment"))
613 616          else {
614 -             let cf = value(assetInfo(K))
615 -             if (if ((cf.issuer != d))
616 -                 then (cf.issuer != e)
617 +             let cg = value(assetInfo(K))
618 +             if (if ((cg.issuer != d))
619 +                 then (cg.issuer != e)
617 620                  else false)
618 621                  then throw((("Unknown issuer of " + j) + " token"))
619 -                 else if (!(contains(cf.name, j)))
622 +                 else if (!(contains(cg.name, j)))
620 623                      then throw((("Only NFT " + j) + " tokens are accepted"))
621 624                      else {
622 -                         let cq = toBase58String(K)
623 -                         let bW = M(cq)
624 -                         if (isDefined(getInteger(bW)))
625 -                             then throw((("NFT " + cf.name) + " is already staked"))
626 -                             else if (isDefined(getString(P(cm))))
627 -                                 then throw(("You already staked one duck: " + cf.name))
625 +                         let cr = toBase58String(K)
626 +                         let bX = M(cr)
627 +                         if (isDefined(getInteger(bX)))
628 +                             then throw((("NFT " + cg.name) + " is already staked"))
629 +                             else if (isDefined(getString(R(cn))))
630 +                                 then throw(("You already staked one duck: " + cg.name))
628 631                                  else {
629 -                                     let cr = W(cq)
630 -                                     let cs = getString(cr)
631 -                                     let bC = X(cq)
632 -                                     let ct = getInteger(bC)
633 -                                     let bn = U(cq)
634 -                                     let cu = getString(bn)
635 -                                     ([IntegerEntry(bW, lastBlock.timestamp), IntegerEntry(R(j, toBase58String(K), cm), lastBlock.timestamp), StringEntry(L(cq), cm), StringEntry(P(cm), cq)] ++ (if (isDefined(cs))
632 +                                     let cs = X(cr)
633 +                                     let ct = getString(cs)
634 +                                     let bD = Y(cr)
635 +                                     let cu = getInteger(bD)
636 +                                     let bo = V(cr)
637 +                                     let cv = getString(bo)
638 +                                     ([IntegerEntry(bX, lastBlock.timestamp), IntegerEntry(S(j, toBase58String(K), cn), lastBlock.timestamp), StringEntry(L(cr), cn), StringEntry(R(cn), cr)] ++ (if (isDefined(ct))
636 639                                          then nil
637 -                                         else ([StringEntry(cr, k)] ++ (if (isDefined(ct))
640 +                                         else ([StringEntry(cs, k)] ++ (if (isDefined(cu))
638 641                                              then nil
639 -                                             else ([IntegerEntry(bC, 100)] ++ (if (isDefined(cu))
642 +                                             else ([IntegerEntry(bD, 100)] ++ (if (isDefined(cv))
640 643                                                  then nil
641 -                                                 else [StringEntry(bn, "0:0_0_0_0_0_0:0_0_0_0_0_0:")]))))))
644 +                                                 else [StringEntry(bo, "0:0_0_0_0_0_0:0_0_0_0_0_0:")]))))))
642 645                                      }
643 646                          }
644 647              }
646 649  
647 650  
648 651  
649 - @Callable(aQ)
650 - func unstakeDuck (cq) = if ((size(aQ.payments) != 0))
652 + @Callable(aR)
653 + func unstakeDuck (cr) = if ((size(aR.payments) != 0))
651 654      then throw("unstake doesn't require any payments")
652 655      else {
653 -         let K = fromBase58String(cq)
654 -         let cm = toString(aQ.caller)
655 -         let cf = value(assetInfo(K))
656 -         if (if ((cf.issuer != d))
657 -             then (cf.issuer != e)
656 +         let K = fromBase58String(cr)
657 +         let cn = toString(aR.caller)
658 +         let cg = value(assetInfo(K))
659 +         if (if ((cg.issuer != d))
660 +             then (cg.issuer != e)
658 661              else false)
659 662              then throw((("Unknown issuer of " + j) + " token"))
660 -             else if (!(contains(cf.name, j)))
663 +             else if (!(contains(cg.name, j)))
661 664                  then throw((("Only NFT " + j) + " tokens can be unstaked"))
662 665                  else {
663 -                     let bW = M(toBase58String(K))
664 -                     if (!(isDefined(bW)))
665 -                         then throw((("NFT " + cf.name) + " is not staked"))
666 -                         else if (!(isDefined(P(cm))))
667 -                             then throw((("The duck " + cf.name) + " is not staked"))
666 +                     let bX = M(toBase58String(K))
667 +                     if (!(isDefined(bX)))
668 +                         then throw((("NFT " + cg.name) + " is not staked"))
669 +                         else if (!(isDefined(R(cn))))
670 +                             then throw((("The duck " + cg.name) + " is not staked"))
668 671                              else {
669 -                                 let cg = valueOrErrorMessage(getString(L(toBase58String(K))), (("NFT " + cf.name) + " is orphaned"))
670 -                                 if ((cg != cm))
672 +                                 let ch = valueOrErrorMessage(getString(L(toBase58String(K))), (("NFT " + cg.name) + " is orphaned"))
673 +                                 if ((ch != cn))
671 674                                      then throw("Staked NFT is not yours")
672 -                                     else [ScriptTransfer(aQ.caller, 1, K), DeleteEntry(bW), DeleteEntry(W(cq)), DeleteEntry(L(cq)), DeleteEntry(R(j, cq, cm)), DeleteEntry(P(cm))]
675 +                                     else [ScriptTransfer(aR.caller, 1, K), DeleteEntry(bX), DeleteEntry(X(cr)), DeleteEntry(L(cr)), DeleteEntry(S(j, cr, cn)), DeleteEntry(R(cn))]
673 676                                  }
674 677                      }
675 678          }
676 679  
677 680  
678 681  
679 - @Callable(aQ)
680 - func claimRes (aW,bR) = if ((size(aQ.payments) != 0))
682 + @Callable(aR)
683 + func claimRes (aX,bS) = if ((size(aR.payments) != 0))
681 684      then throw("claimRes doesn't require any payments")
682 685      else {
683 -         let cb = toString(aQ.originCaller)
684 -         let cf = value(assetInfo(fromBase58String(bR)))
685 -         if (!(contains(cf.name, i)))
686 +         let cc = toString(aR.originCaller)
687 +         let cg = value(assetInfo(fromBase58String(bS)))
688 +         if (!(contains(cg.name, i)))
686 689              then throw((("NFT " + i) + " token should be passed as param"))
687 690              else {
688 -                 let bW = M(bR)
689 -                 let cg = getStringValue(J(bR))
690 -                 if ((cg != cb))
691 +                 let bX = M(bS)
692 +                 let ch = getStringValue(J(bS))
693 +                 if ((ch != cc))
691 694                      then throw((i + " is not yours"))
692 695                      else {
693 -                         let ch = split(cf.description, "_")
694 -                         let I = ch[aa]
695 -                         let aM = aR(ch[ab])
696 -                         let V = valueOrErrorMessage(getString(P(cb)), "You don't have a duck staked")
697 -                         let ci = valueOrElse(getString(W(V)), k)
698 -                         let cj = split(value(ci), "_")
699 -                         if ((cj[ae] != "L"))
700 -                             then throw((("Duck location type is " + cj[ae]) + ", but should be L"))
701 -                             else if ((cj[af] != bR))
702 -                                 then throw(((("Duck location id is " + cj[af]) + ", but should be ") + bR))
696 +                         let ci = split(cg.description, "_")
697 +                         let I = ci[ab]
698 +                         let aN = aS(ci[ac])
699 +                         let W = valueOrErrorMessage(getString(R(cc)), "You don't have a duck staked")
700 +                         let cj = valueOrElse(getString(X(W)), k)
701 +                         let ck = split(value(cj), "_")
702 +                         if ((ck[af] != "L"))
703 +                             then throw((("Duck location type is " + ck[af]) + ", but should be L"))
704 +                             else if ((ck[ag] != bS))
705 +                                 then throw(((("Duck location id is " + ck[ag]) + ", but should be ") + bS))
703 706                                  else {
704 -                                     let bX = valueOrErrorMessage(getInteger(bW), (("NFT " + cf.name) + " is not staked"))
705 -                                     let ba = (lastBlock.timestamp - bX)
706 -                                     if ((0 > ba))
707 -                                         then throw(((("Saved timestamp is in future, saved = " + toString(bX)) + ", current = ") + toString(lastBlock.timestamp)))
707 +                                     let bY = valueOrErrorMessage(getInteger(bX), (("NFT " + cg.name) + " is not staked"))
708 +                                     let bb = (lastBlock.timestamp - bY)
709 +                                     if ((0 > bb))
710 +                                         then throw(((("Saved timestamp is in future, saved = " + toString(bY)) + ", current = ") + toString(lastBlock.timestamp)))
708 711                                          else {
709 -                                             let bV = aT(I)
710 -                                             let bY = bQ(bR)
711 -                                             let bZ = fraction(ba, (bY * bV), n)
712 -                                             if ((aW > bZ))
713 -                                                 then throw(((("Not enough resources, available = " + toString(bZ)) + ", requested = ") + toString(aW)))
712 +                                             let bW = aU(I)
713 +                                             let bZ = bR(bS)
714 +                                             let ca = fraction(bb, (bZ * bW), n)
715 +                                             if ((aX > ca))
716 +                                                 then throw(((("Not enough resources, available = " + toString(ca)) + ", requested = ") + toString(aX)))
714 717                                                  else {
715 -                                                     let cv = fraction((bZ - aW), n, (bY * bV))
716 -                                                     let cw = (lastBlock.timestamp - cv)
717 -                                                     let bn = U(V)
718 -                                                     let bE = bm(bn)
719 -                                                     let aZ = split(bE[ah], "_")
720 -                                                     let cx = aY(aZ, aM, (ba - cv), (bV / 25), bY)
721 -                                                     let cy = makeString([bE[ag], cx, bE[ai], bE[aj]], ":")
722 -                                                     $Tuple2([StringEntry(bn, cy), IntegerEntry(bW, cw), IntegerEntry(R(i, bR, cg), cw)], cx)
718 +                                                     let cw = fraction((ca - aX), n, (bZ * bW))
719 +                                                     let cx = (lastBlock.timestamp - cw)
720 +                                                     let bo = V(W)
721 +                                                     let bF = bn(bo)
722 +                                                     let ba = split(bF[ai], "_")
723 +                                                     let cy = aZ(ba, aN, (bb - cw), (bW / 25), bZ)
724 +                                                     let cz = makeString([bF[ah], cy, bF[aj], bF[ak]], ":")
725 +                                                     $Tuple2([StringEntry(bo, cz), IntegerEntry(bX, cx), IntegerEntry(S(i, bS, ch), cx)], cy)
723 726                                                      }
724 727                                              }
725 728                                      }
729 732  
730 733  
731 734  
732 - @Callable(aQ)
733 - func flight (bs,bt) = if (!(sigVerify_8Kb(bs, bt, g)))
735 + @Callable(aR)
736 + func flight (bt,bu) = if (!(sigVerify_8Kb(bt, bu, g)))
734 737      then throw("signature does not match")
735 -     else if ((size(aQ.payments) != 0))
738 +     else if ((size(aR.payments) != 0))
736 739          then throw("flight doesn't require any payments")
737 740          else {
738 -             let bu = split(toUtf8String(bs), ";")
739 -             let bv = split(split(bu[0], "|")[0], "_")
740 -             let bw = parseIntValue(bv[0])
741 -             let bx = parseIntValue(bv[1])
742 -             let cz = split(bu[1], ":")
743 -             let cA = cz[0]
744 -             let bA = parseIntValue(cz[1])
745 -             if (if ((bA > (lastBlock.timestamp + o)))
741 +             let bv = split(toUtf8String(bt), ";")
742 +             let bw = split(split(bv[0], "|")[0], "_")
743 +             let bx = parseIntValue(bw[0])
744 +             let by = parseIntValue(bw[1])
745 +             let cA = split(bv[1], ":")
746 +             let cB = cA[0]
747 +             let bB = parseIntValue(cA[1])
748 +             if (if ((bB > (lastBlock.timestamp + o)))
746 749                  then true
747 -                 else ((lastBlock.timestamp - o) > bA))
750 +                 else ((lastBlock.timestamp - o) > bB))
748 751                  then throw("signature outdated")
749 752                  else {
750 -                     let V = valueOrErrorMessage(getString(P(toString(aQ.caller))), "You don't have a duck staked")
751 -                     let bC = X(V)
752 -                     let bD = valueOrElse(getInteger(bC), 100)
753 -                     if ((bD != bw))
754 -                         then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bC), 100))) + " from state does not match one from flight log=") + toString(bw)))
755 -                         else if ((0 >= bw))
753 +                     let W = valueOrErrorMessage(getString(R(toString(aR.caller))), "You don't have a duck staked")
754 +                     let bD = Y(W)
755 +                     let bE = valueOrElse(getInteger(bD), 100)
756 +                     if ((bE != bx))
757 +                         then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bD), 100))) + " from state does not match one from flight log=") + toString(bx)))
758 +                         else if ((0 >= bx))
756 759                              then throw("You can't fly with zero health")
757 760                              else {
758 -                                 let cr = W(V)
759 -                                 let ci = valueOrElse(getString(cr), k)
760 -                                 if ((cA == ci))
761 +                                 let cs = X(W)
762 +                                 let cj = valueOrElse(getString(cs), k)
763 +                                 if ((cB == cj))
761 764                                      then throw("You can't fly to the same location")
762 -                                     else $Tuple2([StringEntry(cr, if ((bx > 0))
763 -                                         then cA
764 -                                         else ci), IntegerEntry(bC, bx)], unit)
765 +                                     else $Tuple2([StringEntry(cs, if ((by > 0))
766 +                                         then cB
767 +                                         else cj), IntegerEntry(bD, by)], unit)
765 768                                  }
766 769                      }
767 770              }
768 771  
769 772  
770 773  
771 - @Callable(aQ)
772 - func setHealth (ct,V) = if (if ((0 > ct))
774 + @Callable(aR)
775 + func setHealth (cu,W) = if (if ((0 > cu))
773 776      then true
774 -     else (ct > 100))
777 +     else (cu > 100))
775 778      then throw("HP should be within 0..100")
776 -     else [IntegerEntry(X(V), ct)]
779 +     else [IntegerEntry(Y(W), cu)]
777 780  
778 781  
779 782  
780 - @Callable(aQ)
781 - func heal (cB,aW) = if (if ((0 > cB))
783 + @Callable(aR)
784 + func heal (cC,aX) = if (if ((0 > cC))
782 785      then true
783 -     else (cB >= l))
784 -     then throw(("Unknown material: " + toString(cB)))
785 -     else if ((0 >= aW))
786 -         then throw(("Amount should be positive! " + toString(aW)))
786 +     else (cC >= l))
787 +     then throw(("Unknown material: " + toString(cC)))
788 +     else if ((0 >= aX))
789 +         then throw(("Amount should be positive! " + toString(aX)))
787 790          else {
788 -             let V = valueOrErrorMessage(getString(P(toString(aQ.caller))), "You don't have a duck staked")
789 -             let bC = X(V)
790 -             let cC = valueOrElse(getInteger(bC), 100)
791 -             if ((cC >= 100))
791 +             let W = valueOrErrorMessage(getString(R(toString(aR.caller))), "You don't have a duck staked")
792 +             let bD = Y(W)
793 +             let cD = valueOrElse(getInteger(bD), 100)
794 +             if ((cD >= 100))
792 795                  then throw("HP should be < 100 to heal")
793 796                  else {
794 -                     let bn = U(V)
795 -                     let bE = bm(bn)
796 -                     let bF = split(bE[ai], "_")
797 -                     let cD = parseIntValue(bF[cB])
798 -                     let cE = min([(aW / h), (100 - cC)])
799 -                     let cF = (cE * h)
800 -                     if ((cF > cD))
801 -                         then throw(((((("You need " + toString(cF)) + " of ") + C[cB]) + " to heal, but you backpack contains ") + toString(cD)))
797 +                     let bo = V(W)
798 +                     let bF = bn(bo)
799 +                     let bG = split(bF[aj], "_")
800 +                     let cE = parseIntValue(bG[cC])
801 +                     let cF = min([(aX / h), (100 - cD)])
802 +                     let cG = (cF * h)
803 +                     if ((cG > cE))
804 +                         then throw(((((("You need " + toString(cG)) + " of ") + C[cC]) + " to heal, but you backpack contains ") + toString(cE)))
802 805                          else {
803 -                             let bG = aU(bF, cB, cF)
804 - [IntegerEntry(bC, (cC + cE)), StringEntry(bn, makeString([bE[ag], bE[ah], bG, bE[aj]], ":"))]
806 +                             let bH = aV(bG, cC, cG)
807 + [IntegerEntry(bD, (cD + cF)), StringEntry(bo, makeString([bF[ah], bF[ai], bH, bF[ak]], ":"))]
805 808                              }
806 809                      }
807 810              }
808 811  
809 812  
810 813  
811 - @Callable(aQ)
812 - func updateBackpack (V,cy) = if ((aQ.caller != f))
814 + @Callable(aR)
815 + func updateBackpack (W,cz) = if ((aR.caller != f))
813 816      then throw("permission denied")
814 -     else $Tuple2([StringEntry(U(V), cy)], cy)
817 +     else $Tuple2([StringEntry(V(W), cz)], cz)
815 818  
816 819  
817 820  
818 - @Callable(aQ)
819 - func expeditionBuy (bs,bt) = if ((size(aQ.payments) != 1))
821 + @Callable(aR)
822 + func expeditionBuy (bt,bu) = if ((size(aR.payments) != 1))
820 823      then throw("Exactly one payment required")
821 824      else {
822 -         let cl = value(aQ.payments[0])
823 -         if ((cl.assetId != b))
825 +         let cm = value(aR.payments[0])
826 +         if ((cm.assetId != b))
824 827              then throw("Allowed USDN payment only!")
825 -             else if ((cl.amount != t))
828 +             else if ((cm.amount != t))
826 829                  then throw(("Payment attached should be " + toString(t)))
827 -                 else bp(false, aQ.caller, aQ.transactionId, bs, bt)
830 +                 else bq(false, aR.caller, aR.transactionId, bt, bu)
828 831          }
829 832  
830 833  
831 834  
832 - @Callable(aQ)
833 - func expedition (bs,bt) = if ((size(aQ.payments) != 0))
835 + @Callable(aR)
836 + func expedition (bt,bu) = if ((size(aR.payments) != 0))
834 837      then throw("expedition doesn't require any payments")
835 -     else bp(true, aQ.caller, aQ.transactionId, bs, bt)
838 +     else bq(true, aR.caller, aR.transactionId, bt, bu)
836 839  
837 840  
838 841  
839 - @Callable(aQ)
840 - func upgradeInfra (bR) = if ((size(aQ.payments) != 0))
842 + @Callable(aR)
843 + func upgradeInfra (bS) = if ((size(aR.payments) != 0))
841 844      then throw("Infrastructure upgrade doesn't require any payments")
842 -     else ca(true, aQ.caller, bR)
845 +     else cb(true, aR.caller, bS)
843 846  
844 847  
845 848  
846 - @Callable(aQ)
847 - func upgradeInfraUsdn (bR) = if ((size(aQ.payments) != 1))
849 + @Callable(aR)
850 + func upgradeInfraUsdn (bS) = if ((size(aR.payments) != 1))
848 851      then throw("Exactly one payment required")
849 852      else {
850 -         let cl = value(aQ.payments[0])
851 -         if ((cl.assetId != b))
853 +         let cm = value(aR.payments[0])
854 +         if ((cm.assetId != b))
852 855              then throw("Allowed USDN payment only!")
853 856              else {
854 -                 let ce = (valueOrElse(getInteger(N(bR)), 0) + 1)
855 -                 let cf = value(assetInfo(fromBase58String(bR)))
856 -                 let ch = split(cf.description, "_")
857 -                 let cG = fraction(r, (aT(ch[aa]) * ce), 25)
858 -                 if ((cl.amount != cG))
859 -                     then throw(("Payment attached should be " + toString(cG)))
860 -                     else ca(false, aQ.caller, bR)
857 +                 let cf = (valueOrElse(getInteger(N(bS)), 0) + 1)
858 +                 let cg = value(assetInfo(fromBase58String(bS)))
859 +                 let ci = split(cg.description, "_")
860 +                 let cH = fraction(r, (aU(ci[ab]) * cf), 25)
861 +                 if ((cm.amount != cH))
862 +                     then throw(("Payment attached should be " + toString(cH)))
863 +                     else cb(false, aR.caller, bS)
861 864                  }
862 865          }
863 866  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = toUtf8String(take(drop(this.bytes, 1), 1))
5 5  
6 6  let b = {
7 7      let c = a
8 8      if (("W" == c))
9 9          then base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
10 10          else if (("T" == c))
11 11              then base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
12 12              else throw("Unknown chain")
13 13      }
14 14  
15 15  let d = {
16 16      let c = a
17 17      if (("W" == c))
18 18          then addressFromStringValue("3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv")
19 19          else if (("T" == c))
20 20              then this
21 21              else throw("Unknown chain")
22 22      }
23 23  
24 24  let e = {
25 25      let c = a
26 26      if (("W" == c))
27 27          then addressFromStringValue("3PDVuU45H7Eh5dmtNbnRNRStGwULA7NY6Hb")
28 28          else if (("T" == c))
29 29              then this
30 30              else throw("Unknown chain")
31 31      }
32 32  
33 33  let f = {
34 34      let c = a
35 35      if (("W" == c))
36 36          then addressFromStringValue("3P2sk1KncSxRaZs8b4CWGPw2jkvvav74u4D")
37 37          else if (("T" == c))
38 38              then addressFromStringValue("3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep")
39 39              else throw("Unknown chain")
40 40      }
41 41  
42 42  let g = base58'6LfPuKJjLgekmncBhMg2LZyMTNVzZBccXR28ySXm9uXD'
43 43  
44 44  let h = 10000
45 45  
46 46  let i = "LAND"
47 47  
48 48  let j = "DUCK"
49 49  
50 50  let k = "Africa_F_Africa"
51 51  
52 52  let l = 6
53 53  
54 54  let m = 3456000
55 55  
56 56  let n = 86400000
57 57  
58 58  let o = 300000
59 59  
60 60  let p = 158549
61 61  
62 62  let q = {
63 63      let c = a
64 64      if (("W" == c))
65 65          then 18921595217
66 66          else if (("T" == c))
67 67              then 189215952
68 68              else throw("Unknown chain")
69 69      }
70 70  
71 71  let r = {
72 72      let c = a
73 73      if (("W" == c))
74 74          then 120000000
75 75          else if (("T" == c))
76 76              then 1200000
77 77              else throw("Unknown chain")
78 78      }
79 79  
80 80  let s = {
81 81      let c = a
82 82      if (("W" == c))
83 83          then 157679960139
84 84          else if (("T" == c))
85 85              then 1576799601
86 86              else throw("Unknown chain")
87 87      }
88 88  
89 89  let t = {
90 90      let c = a
91 91      if (("W" == c))
92 92          then 1000000000
93 93          else if (("T" == c))
94 94              then 10000000
95 95              else throw("Unknown chain")
96 96      }
97 97  
98 98  let u = {
99 99      let c = a
100 100      if (("W" == c))
101 101          then 1673136000000
102 102          else if (("T" == c))
103 103              then 1672790400000
104 104              else throw("Unknown chain")
105 105      }
106 106  
107 107  let v = 1000000
108 108  
109 109  let w = toBigInt(5)
110 110  
111 111  let x = toBigInt(20)
112 112  
113 113  let y = toBigInt((20 * 20))
114 114  
115 115  let z = toBigInt(((20 * 20) * 20))
116 116  
117 117  let A = toBigInt((((20 * 20) * 20) * 20))
118 118  
119 119  let B = toBigInt(((((20 * 20) * 20) * 20) * 20))
120 120  
121 121  let C = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
122 122  
123 123  let D = ["Asia", "Europe", "Americas", "Oceania", "Africa"]
124 124  
125 125  func E () = "nextLandNum"
126 126  
127 127  
128 128  func F (G) = ("landToAsset_" + G)
129 129  
130 130  
131 131  func H (G,I) = ((i + G) + I)
132 132  
133 133  
134 134  func J (K) = ("nftOwner_" + K)
135 135  
136 136  
137 137  func L (K) = ("duckOwner_" + K)
138 138  
139 139  
140 140  func M (K) = ("stakedTime_" + K)
141 141  
142 142  
143 143  func N (K) = ("infraLevel_" + K)
144 144  
145 145  
146 - func O (K) = ("presaleArtActivated_" + K)
146 + func O (K,P) = ((("infraLevelByAssetIdAndOwner_" + K) + "_") + P)
147 147  
148 148  
149 - func P (Q) = ("stakedDuckByOwner_" + Q)
149 + func Q (K) = ("presaleArtActivated_" + K)
150 150  
151 151  
152 - func R (S,K,Q) = ((((("stakedTimeByTypeAssetIdAndOwner_" + S) + "_") + K) + "_") + Q)
152 + func R (P) = ("stakedDuckByOwner_" + P)
153 153  
154 154  
155 - func T (G) = ("landOwner_" + G)
155 + func S (T,K,P) = ((((("stakedTimeByTypeAssetIdAndOwner_" + T) + "_") + K) + "_") + P)
156 156  
157 157  
158 - func U (V) = ("backPack_" + V)
158 + func U (G) = ("landOwner_" + G)
159 159  
160 160  
161 - func W (V) = ("duckLocation_" + V)
161 + func V (W) = ("backPack_" + W)
162 162  
163 163  
164 - func X (V) = ("duckHealth_" + V)
164 + func X (W) = ("duckLocation_" + W)
165 165  
166 166  
167 - func Y () = "resTypesProportions"
167 + func Y (W) = ("duckHealth_" + W)
168 168  
169 169  
170 - let Z = 0
170 + func Z () = "resTypesProportions"
171 171  
172 - let aa = 1
173 172  
174 - let ab = 2
173 + let aa = 0
175 174  
176 - let ac = 3
175 + let ab = 1
177 176  
178 - let ad = 0
177 + let ac = 2
179 178  
180 - let ae = 1
179 + let ad = 3
181 180  
182 - let af = 2
181 + let ae = 0
183 182  
184 - let ag = 0
183 + let af = 1
185 184  
186 - let ah = 1
185 + let ag = 2
187 186  
188 - let ai = 2
187 + let ah = 0
189 188  
190 - let aj = 3
189 + let ai = 1
191 190  
192 - func ak (al) = {
193 -     let c = al
191 + let aj = 2
192 + 
193 + let ak = 3
194 + 
195 + func al (am) = {
196 +     let c = am
194 197      if ($isInstanceOf(c, "String"))
195 198          then {
196 -             let am = c
197 -             am
199 +             let an = c
200 +             an
198 201              }
199 202          else throw("fail to cast into String")
200 203      }
201 204  
202 205  
203 - func an (ao) = {
204 -     let ap = split(value(getString(Y())), "_")
205 -     if ((size(ap) != l))
206 + func ao (ap) = {
207 +     let aq = split(value(getString(Z())), "_")
208 +     if ((size(aq) != l))
206 209          then throw("Wrong proportions data")
207 210          else {
208 -             let aq = [parseIntValue(ap[0]), parseIntValue(ap[1]), parseIntValue(ap[2]), parseIntValue(ap[3]), parseIntValue(ap[4]), parseIntValue(ap[5])]
209 -             let ar = (((((aq[0] + aq[1]) + aq[2]) + aq[3]) + aq[4]) + aq[5])
210 -             if ((0 >= ar))
211 +             let ar = [parseIntValue(aq[0]), parseIntValue(aq[1]), parseIntValue(aq[2]), parseIntValue(aq[3]), parseIntValue(aq[4]), parseIntValue(aq[5])]
212 +             let as = (((((ar[0] + ar[1]) + ar[2]) + ar[3]) + ar[4]) + ar[5])
213 +             if ((0 >= as))
211 214                  then throw("No lands staked")
212 215                  else {
213 -                     let as = fraction(ao, v, ar)
214 -                     func at (au,av) =                     (au :+ fraction(av, as, v))
216 +                     let at = fraction(ap, v, as)
217 +                     func au (av,aw) =                     (av :+ fraction(aw, at, v))
215 218  
216 -                     let aw = aq
217 -                     let ax = size(aw)
218 -                     let ay = nil
219 -                     func az (aA,aB) =                     if ((aB >= ax))
220 -                         then aA
221 -                         else at(aA, aw[aB])
219 +                     let ax = ar
220 +                     let ay = size(ax)
221 +                     let az = nil
222 +                     func aA (aB,aC) =                     if ((aC >= ay))
223 +                         then aB
224 +                         else au(aB, ax[aC])
222 225  
223 -                     func aC (aA,aB) =                     if ((aB >= ax))
224 -                         then aA
226 +                     func aD (aB,aC) =                     if ((aC >= ay))
227 +                         then aB
225 228                          else throw("List size exceeds 6")
226 229  
227 -                     aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
230 +                     aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
228 231                      }
229 232              }
230 233      }
231 234  
232 235  
233 - func aD (aE,aF,aG) = {
234 -     let aH = an(aG)
235 -     func aI (au,aJ) =     {
236 -         let aK = (parseIntValue(aF[aJ]) - aH[aJ])
237 -         if ((0 > aK))
238 -             then throw(((((("Not enough material idx=" + toString(aJ)) + ", you have ") + aF[aJ]) + ", but need ") + toString(aH[aJ])))
239 -             else (au :+ toString(aK))
236 + func aE (aF,aG,aH) = {
237 +     let aI = ao(aH)
238 +     func aJ (av,aK) =     {
239 +         let aL = (parseIntValue(aG[aK]) - aI[aK])
240 +         if ((0 > aL))
241 +             then throw(((((("Not enough material idx=" + toString(aK)) + ", you have ") + aG[aK]) + ", but need ") + toString(aI[aK])))
242 +             else (av :+ toString(aL))
240 243          }
241 244  
242 -     if (aE)
245 +     if (aF)
243 246          then {
244 -             let aw = [0, 1, 2, 3, 4, 5]
245 -             let ax = size(aw)
246 -             let ay = nil
247 -             func az (aA,aB) =             if ((aB >= ax))
248 -                 then aA
249 -                 else aI(aA, aw[aB])
247 +             let ax = [0, 1, 2, 3, 4, 5]
248 +             let ay = size(ax)
249 +             let az = nil
250 +             func aA (aB,aC) =             if ((aC >= ay))
251 +                 then aB
252 +                 else aJ(aB, ax[aC])
250 253  
251 -             func aC (aA,aB) =             if ((aB >= ax))
252 -                 then aA
254 +             func aD (aB,aC) =             if ((aC >= ay))
255 +                 then aB
253 256                  else throw("List size exceeds 6")
254 257  
255 -             aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
258 +             aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
256 259              }
257 -         else aF
260 +         else aG
258 261      }
259 262  
260 263  
261 - func aL (aM,aN,aO) = {
262 -     let ap = split(valueOrElse(getString(Y()), "0_0_0_0_0_0"), "_")
263 -     if ((size(ap) != l))
264 + func aM (aN,aO,aP) = {
265 +     let aq = split(valueOrElse(getString(Z()), "0_0_0_0_0_0"), "_")
266 +     if ((size(aq) != l))
264 267          then throw("Wrong proportions data")
265 268          else {
266 -             func aP (au,aQ) =             {
267 -                 let aK = (parseIntValue(ap[aQ]) + ((aO * aM[aQ]) * aN))
268 -                 if ((0 > aK))
269 -                     then throw(((((((("Panic! Pieces of type=" + toString(aQ)) + ", sign=") + toString(aO)) + ",  terrainCounts[i]=") + toString(aM[aQ])) + ", landSizeIndex=") + toString(aN)))
270 -                     else (au :+ toString(aK))
269 +             func aQ (av,aR) =             {
270 +                 let aL = (parseIntValue(aq[aR]) + ((aP * aN[aR]) * aO))
271 +                 if ((0 > aL))
272 +                     then throw(((((((("Panic! Pieces of type=" + toString(aR)) + ", sign=") + toString(aP)) + ",  terrainCounts[i]=") + toString(aN[aR])) + ", landSizeIndex=") + toString(aO)))
273 +                     else (av :+ toString(aL))
271 274                  }
272 275  
273 -             let aq = {
274 -                 let aw = [0, 1, 2, 3, 4, 5]
275 -                 let ax = size(aw)
276 -                 let ay = nil
277 -                 func az (aA,aB) =                 if ((aB >= ax))
278 -                     then aA
279 -                     else aP(aA, aw[aB])
276 +             let ar = {
277 +                 let ax = [0, 1, 2, 3, 4, 5]
278 +                 let ay = size(ax)
279 +                 let az = nil
280 +                 func aA (aB,aC) =                 if ((aC >= ay))
281 +                     then aB
282 +                     else aQ(aB, ax[aC])
280 283  
281 -                 func aC (aA,aB) =                 if ((aB >= ax))
282 -                     then aA
284 +                 func aD (aB,aC) =                 if ((aC >= ay))
285 +                     then aB
283 286                      else throw("List size exceeds 6")
284 287  
285 -                 aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
288 +                 aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
286 289                  }
287 -             makeString(aq, "_")
290 +             makeString(ar, "_")
288 291              }
289 292      }
290 293  
291 294  
292 - func aR (aS) = [(size(split(aS, "A")) - 1), (size(split(aS, "B")) - 1), (size(split(aS, "C")) - 1), (size(split(aS, "D")) - 1), (size(split(aS, "E")) - 1), (size(split(aS, "F")) - 1)]
295 + func aS (aT) = [(size(split(aT, "A")) - 1), (size(split(aT, "B")) - 1), (size(split(aT, "C")) - 1), (size(split(aT, "D")) - 1), (size(split(aT, "E")) - 1), (size(split(aT, "F")) - 1)]
293 296  
294 297  
295 - func aT (I) = {
298 + func aU (I) = {
296 299      let c = I
297 300      if (("S" == c))
298 301          then 25
299 302          else if (("M" == c))
300 303              then 100
301 304              else if (("L" == c))
302 305                  then 225
303 306                  else if (("XL" == c))
304 307                      then 400
305 308                      else if (("XXL" == c))
306 309                          then 625
307 310                          else throw("Unknown land size")
308 311      }
309 312  
310 313  
311 - func aU (aV,aJ,aW) = {
312 -     func aX (au,aQ) =     (au :+ (if ((aQ == aJ))
313 -         then toString((parseIntValue(aV[aQ]) - aW))
314 -         else aV[aQ]))
314 + func aV (aW,aK,aX) = {
315 +     func aY (av,aR) =     (av :+ (if ((aR == aK))
316 +         then toString((parseIntValue(aW[aR]) - aX))
317 +         else aW[aR]))
315 318  
316 -     let aq = {
317 -         let aw = [0, 1, 2, 3, 4, 5]
318 -         let ax = size(aw)
319 -         let ay = nil
320 -         func az (aA,aB) =         if ((aB >= ax))
321 -             then aA
322 -             else aX(aA, aw[aB])
319 +     let ar = {
320 +         let ax = [0, 1, 2, 3, 4, 5]
321 +         let ay = size(ax)
322 +         let az = nil
323 +         func aA (aB,aC) =         if ((aC >= ay))
324 +             then aB
325 +             else aY(aB, ax[aC])
323 326  
324 -         func aC (aA,aB) =         if ((aB >= ax))
325 -             then aA
327 +         func aD (aB,aC) =         if ((aC >= ay))
328 +             then aB
326 329              else throw("List size exceeds 6")
327 330  
328 -         aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
331 +         aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
329 332          }
330 -     makeString(aq, "_")
333 +     makeString(ar, "_")
331 334      }
332 335  
333 336  
334 - func aY (aZ,aM,ba,aN,bb) = {
335 -     func bc (au,aQ) =     {
336 -         let bd = ((fraction(ba, bb, n) * aM[aQ]) * aN)
337 -         (au :+ toString((parseIntValue(aZ[aQ]) + bd)))
337 + func aZ (ba,aN,bb,aO,bc) = {
338 +     func bd (av,aR) =     {
339 +         let be = ((fraction(bb, bc, n) * aN[aR]) * aO)
340 +         (av :+ toString((parseIntValue(ba[aR]) + be)))
338 341          }
339 342  
340 -     let aq = {
341 -         let aw = [0, 1, 2, 3, 4, 5]
342 -         let ax = size(aw)
343 -         let ay = nil
344 -         func az (aA,aB) =         if ((aB >= ax))
345 -             then aA
346 -             else bc(aA, aw[aB])
343 +     let ar = {
344 +         let ax = [0, 1, 2, 3, 4, 5]
345 +         let ay = size(ax)
346 +         let az = nil
347 +         func aA (aB,aC) =         if ((aC >= ay))
348 +             then aB
349 +             else bd(aB, ax[aC])
347 350  
348 -         func aC (aA,aB) =         if ((aB >= ax))
349 -             then aA
351 +         func aD (aB,aC) =         if ((aC >= ay))
352 +             then aB
350 353              else throw("List size exceeds 6")
351 354  
352 -         aC(az(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5), 6)
355 +         aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
353 356          }
354 -     makeString(aq, "_")
357 +     makeString(ar, "_")
355 358      }
356 359  
357 360  
358 - func be (bf) = if ((bf >= toBigInt(0)))
359 -     then bf
360 -     else -(bf)
361 + func bf (bg) = if ((bg >= toBigInt(0)))
362 +     then bg
363 +     else -(bg)
361 364  
362 365  
363 - let bg = [[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]]
366 + let bh = [[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]]
364 367  
365 - func bh (bi,bj) = {
366 -     let bk = toInt((bi % x))
367 -     let bl = if ((bj[0] > bk))
368 + func bi (bj,bk) = {
369 +     let bl = toInt((bj % x))
370 +     let bm = if ((bk[0] > bl))
368 371          then "A"
369 -         else if ((bj[1] > bk))
372 +         else if ((bk[1] > bl))
370 373              then "B"
371 -             else if ((bj[2] > bk))
374 +             else if ((bk[2] > bl))
372 375                  then "C"
373 -                 else if ((bj[3] > bk))
376 +                 else if ((bk[3] > bl))
374 377                      then "D"
375 -                     else if ((bj[4] > bk))
378 +                     else if ((bk[4] > bl))
376 379                          then "E"
377 380                          else "F"
378 -     bl
381 +     bm
379 382      }
380 383  
381 384  
382 - func bm (bn) = {
383 -     let bo = split(valueOrElse(getString(bn), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
384 - [toString(valueOrElse(parseInt(bo[ag]), 0)), if ((size(split(bo[ah], "_")) == l))
385 -         then bo[ah]
386 -         else "0_0_0_0_0_0", if ((size(split(bo[ai], "_")) == l))
387 -         then bo[ai]
388 -         else "0_0_0_0_0_0", bo[aj]]
385 + func bn (bo) = {
386 +     let bp = split(valueOrElse(getString(bo), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
387 + [toString(valueOrElse(parseInt(bp[ah]), 0)), if ((size(split(bp[ai], "_")) == l))
388 +         then bp[ai]
389 +         else "0_0_0_0_0_0", if ((size(split(bp[aj], "_")) == l))
390 +         then bp[aj]
391 +         else "0_0_0_0_0_0", bp[ak]]
389 392      }
390 393  
391 394  
392 - func bp (aE,bq,br,bs,bt) = if (!(sigVerify_8Kb(bs, bt, g)))
395 + func bq (aF,br,bs,bt,bu) = if (!(sigVerify_8Kb(bt, bu, g)))
393 396      then throw("signature does not match")
394 397      else {
395 -         let bu = split(toUtf8String(bs), ";")
396 -         let bv = split(split(bu[0], "|")[0], "_")
397 -         let bw = parseIntValue(bv[0])
398 -         let bx = parseIntValue(bv[1])
399 -         let by = split(bu[1], ":")
400 -         let bz = split(by[0], "_")
401 -         if ((bz[1] != "E"))
398 +         let bv = split(toUtf8String(bt), ";")
399 +         let bw = split(split(bv[0], "|")[0], "_")
400 +         let bx = parseIntValue(bw[0])
401 +         let by = parseIntValue(bw[1])
402 +         let bz = split(bv[1], ":")
403 +         let bA = split(bz[0], "_")
404 +         if ((bA[1] != "E"))
402 405              then throw("expedition target location type should be E")
403 406              else {
404 -                 let bA = parseIntValue(by[1])
405 -                 if (if ((bA > (lastBlock.timestamp + o)))
407 +                 let bB = parseIntValue(bz[1])
408 +                 if (if ((bB > (lastBlock.timestamp + o)))
406 409                      then true
407 -                     else ((lastBlock.timestamp - o) > bA))
410 +                     else ((lastBlock.timestamp - o) > bB))
408 411                      then throw("signature outdated")
409 412                      else {
410 -                         let bB = toString(bq)
411 -                         let V = valueOrErrorMessage(getString(P(bB)), "You don't have a duck staked")
412 -                         let bC = X(V)
413 -                         let bD = valueOrElse(getInteger(bC), 100)
414 -                         if ((bD != bw))
415 -                             then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bC), 100))) + " from state does not match one from flight log=") + toString(bw)))
416 -                             else if ((0 >= bw))
413 +                         let bC = toString(br)
414 +                         let W = valueOrErrorMessage(getString(R(bC)), "You don't have a duck staked")
415 +                         let bD = Y(W)
416 +                         let bE = valueOrElse(getInteger(bD), 100)
417 +                         if ((bE != bx))
418 +                             then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bD), 100))) + " from state does not match one from flight log=") + toString(bx)))
419 +                             else if ((0 >= bx))
417 420                                  then throw("You can't fly with zero health")
418 -                                 else if ((0 >= bx))
419 -                                     then $Tuple2(((if (!(aE))
420 -                                         then [ScriptTransfer(bq, t, b)]
421 -                                         else nil) :+ IntegerEntry(bC, 0)), "")
421 +                                 else if ((0 >= by))
422 +                                     then $Tuple2(((if (!(aF))
423 +                                         then [ScriptTransfer(br, t, b)]
424 +                                         else nil) :+ IntegerEntry(bD, 0)), "")
422 425                                      else {
423 -                                         let bn = U(V)
424 -                                         let bE = bm(bn)
425 -                                         let bF = split(bE[ai], "_")
426 -                                         let bG = makeString(aD(aE, bF, s), "_")
427 -                                         let bH = be(toBigInt(br))
428 -                                         let bI = valueOrElse(getInteger(E()), 501)
429 -                                         let G = toString(bI)
430 -                                         let bJ = toInt((bH % w))
431 -                                         let bK = bg[bJ]
432 -                                         func bL (au,av) =                                         $Tuple2((((((au._1 + bh(au._2, bK)) + bh((au._2 / x), bK)) + bh((au._2 / y), bK)) + bh((au._2 / z), bK)) + bh((au._2 / A), bK)), (au._2 / B))
426 +                                         let bo = V(W)
427 +                                         let bF = bn(bo)
428 +                                         let bG = split(bF[aj], "_")
429 +                                         let bH = makeString(aE(aF, bG, s), "_")
430 +                                         let bI = bf(toBigInt(bs))
431 +                                         let bJ = valueOrElse(getInteger(E()), 501)
432 +                                         let G = toString(bJ)
433 +                                         let bK = toInt((bI % w))
434 +                                         let bL = bh[bK]
435 +                                         func bM (av,aw) =                                         $Tuple2((((((av._1 + bi(av._2, bL)) + bi((av._2 / x), bL)) + bi((av._2 / y), bL)) + bi((av._2 / z), bL)) + bi((av._2 / A), bL)), (av._2 / B))
433 436  
434 -                                         let bM = {
435 -                                             let aw = [1, 2, 3, 4, 5]
436 -                                             let ax = size(aw)
437 -                                             let ay = $Tuple2("", (bH / w))
438 -                                             func az (aA,aB) =                                             if ((aB >= ax))
439 -                                                 then aA
440 -                                                 else bL(aA, aw[aB])
437 +                                         let bN = {
438 +                                             let ax = [1, 2, 3, 4, 5]
439 +                                             let ay = size(ax)
440 +                                             let az = $Tuple2("", (bI / w))
441 +                                             func aA (aB,aC) =                                             if ((aC >= ay))
442 +                                                 then aB
443 +                                                 else bM(aB, ax[aC])
441 444  
442 -                                             func aC (aA,aB) =                                             if ((aB >= ax))
443 -                                                 then aA
445 +                                             func aD (aB,aC) =                                             if ((aC >= ay))
446 +                                                 then aB
444 447                                                  else throw("List size exceeds 5")
445 448  
446 -                                             aC(az(az(az(az(az(ay, 0), 1), 2), 3), 4), 5)
449 +                                             aD(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5)
447 450                                              }
448 -                                         let bN = D[bJ]
449 -                                         let bO = Issue(H(G, "S"), makeString([G, "S", bM._1, bN], "_"), 1, 0, false)
450 -                                         let K = calculateAssetId(bO)
451 -                                         let bP = toBase58String(K)
452 -                                         $Tuple2([IntegerEntry(E(), (bI + 1)), bO, StringEntry(F(G), bP), StringEntry(J(bP), bB), StringEntry(T(G), bB), IntegerEntry(N(bP), 0), ScriptTransfer(bq, 1, K), StringEntry(W(V), makeString([bN, "L", bP], "_")), IntegerEntry(bC, bx), StringEntry(bn, makeString([bE[ag], bE[ah], bG, bE[aj]], ":"))], bP)
451 +                                         let bO = D[bK]
452 +                                         let bP = Issue(H(G, "S"), makeString([G, "S", bN._1, bO], "_"), 1, 0, false)
453 +                                         let K = calculateAssetId(bP)
454 +                                         let bQ = toBase58String(K)
455 +                                         $Tuple2([IntegerEntry(E(), (bJ + 1)), bP, StringEntry(F(G), bQ), StringEntry(J(bQ), bC), StringEntry(U(G), bC), IntegerEntry(N(bQ), 0), IntegerEntry(O(bQ, bC), 0), ScriptTransfer(br, 1, K), StringEntry(X(W), makeString([bO, "L", bQ], "_")), IntegerEntry(bD, by), StringEntry(bo, makeString([bF[ah], bF[ai], bH, bF[ak]], ":"))], bQ)
453 456                                          }
454 457                          }
455 458                  }
456 459          }
457 460  
458 461  
459 - func bQ (bR) = {
460 -     let bS = valueOrElse(getInteger(N(bR)), 0)
461 -     let bT = if (valueOrElse(getBoolean(O(bR)), false))
462 + func bR (bS) = {
463 +     let bT = valueOrElse(getInteger(N(bS)), 0)
464 +     let bU = if (valueOrElse(getBoolean(Q(bS)), false))
462 465          then 3
463 466          else 0
464 -     (m + fraction(m, bS, 4))
467 +     (m + fraction(m, bT, 4))
465 468      }
466 469  
467 470  
468 - func bU (bR,bV) = {
469 -     let bW = M(bR)
470 -     let bX = valueOrErrorMessage(getInteger(bW), (((i + " ") + bR) + " is not staked"))
471 -     let ba = (lastBlock.timestamp - bX)
472 -     if ((0 > ba))
473 -         then throw(((("Saved timestamp is in future, saved = " + toString(bX)) + ", current = ") + toString(lastBlock.timestamp)))
471 + func bV (bS,bW) = {
472 +     let bX = M(bS)
473 +     let bY = valueOrErrorMessage(getInteger(bX), (((i + " ") + bS) + " is not staked"))
474 +     let bb = (lastBlock.timestamp - bY)
475 +     if ((0 > bb))
476 +         then throw(((("Saved timestamp is in future, saved = " + toString(bY)) + ", current = ") + toString(lastBlock.timestamp)))
474 477          else {
475 -             let bY = bQ(bR)
476 -             let bZ = (fraction(ba, bY, n) * bV)
477 -             ak(invoke(this, "claimRes", [bZ, bR], nil))
478 +             let bZ = bR(bS)
479 +             let ca = (fraction(bb, bZ, n) * bW)
480 +             al(invoke(this, "claimRes", [ca, bS], nil))
478 481              }
479 482      }
480 483  
481 484  
482 - func ca (aE,bq,bR) = {
483 -     let cb = toString(bq)
484 -     let cc = N(bR)
485 -     let cd = valueOrElse(getInteger(cc), 0)
486 -     if ((cd >= 3))
485 + func cb (aF,br,bS) = {
486 +     let cc = toString(br)
487 +     let cd = N(bS)
488 +     let ce = valueOrElse(getInteger(cd), 0)
489 +     if ((ce >= 3))
487 490          then throw("Currently max infrastructure level = 3")
488 491          else {
489 -             let ce = (cd + 1)
490 -             let cf = value(assetInfo(fromBase58String(bR)))
491 -             if (!(contains(cf.name, i)))
492 +             let cf = (ce + 1)
493 +             let cg = value(assetInfo(fromBase58String(bS)))
494 +             if (!(contains(cg.name, i)))
492 495                  then throw((("NFT " + i) + " token should be passed as param"))
493 496                  else {
494 -                     let cg = getStringValue(J(bR))
495 -                     if ((cg != cb))
497 +                     let ch = getStringValue(J(bS))
498 +                     if ((ch != cc))
496 499                          then throw((i + " is not yours"))
497 500                          else {
498 -                             let ch = split(cf.description, "_")
499 -                             let I = ch[aa]
500 -                             let bV = aT(I)
501 -                             let V = valueOrErrorMessage(getString(P(cb)), "You don't have a duck staked")
502 -                             let ci = valueOrElse(getString(W(V)), k)
503 -                             let cj = split(value(ci), "_")
504 -                             if ((cj[ae] != "L"))
505 -                                 then throw((("Duck location type is " + cj[ae]) + ", but should be L"))
506 -                                 else if ((cj[af] != bR))
507 -                                     then throw(((("Duck location id is " + cj[af]) + ", but should be ") + bR))
501 +                             let ci = split(cg.description, "_")
502 +                             let I = ci[ab]
503 +                             let bW = aU(I)
504 +                             let W = valueOrErrorMessage(getString(R(cc)), "You don't have a duck staked")
505 +                             let cj = valueOrElse(getString(X(W)), k)
506 +                             let ck = split(value(cj), "_")
507 +                             if ((ck[af] != "L"))
508 +                                 then throw((("Duck location type is " + ck[af]) + ", but should be L"))
509 +                                 else if ((ck[ag] != bS))
510 +                                     then throw(((("Duck location id is " + ck[ag]) + ", but should be ") + bS))
508 511                                      else {
509 -                                         let bn = U(V)
510 -                                         let bE = bm(bn)
511 -                                         let bF = split(bE[ai], "_")
512 -                                         let bG = makeString(aD(aE, bF, fraction(q, (bV * ce), 25)), "_")
513 -                                         let ck = bU(bR, bV)
514 -                                         $Tuple2([IntegerEntry(cc, ce), StringEntry(bn, makeString([bE[ag], ck, bG, bE[aj]], ":"))], ce)
512 +                                         let bo = V(W)
513 +                                         let bF = bn(bo)
514 +                                         let bG = split(bF[aj], "_")
515 +                                         let bH = makeString(aE(aF, bG, fraction(q, (bW * cf), 25)), "_")
516 +                                         let cl = bV(bS, bW)
517 +                                         $Tuple2([IntegerEntry(cd, cf), IntegerEntry(O(bS, cc), cf), StringEntry(bo, makeString([bF[ah], cl, bH, bF[ak]], ":"))], cf)
515 518                                          }
516 519                              }
517 520                      }
518 521              }
519 522      }
520 523  
521 524  
522 - @Callable(aQ)
525 + @Callable(aR)
523 526  func stakeLand () = {
524 -     let cl = value(aQ.payments[0])
525 -     let K = value(cl.assetId)
526 -     let cm = toString(aQ.caller)
527 -     if ((cl.amount != 1))
527 +     let cm = value(aR.payments[0])
528 +     let K = value(cm.assetId)
529 +     let cn = toString(aR.caller)
530 +     if ((cm.amount != 1))
528 531          then throw((("NFT " + i) + " token should be attached as payment"))
529 532          else {
530 -             let cf = value(assetInfo(K))
531 -             if ((cf.issuer != this))
533 +             let cg = value(assetInfo(K))
534 +             if ((cg.issuer != this))
532 535                  then throw("Unknown issuer of token")
533 -                 else if (!(contains(cf.name, i)))
536 +                 else if (!(contains(cg.name, i)))
534 537                      then throw((("Only NFT " + i) + " tokens are accepted"))
535 538                      else {
536 -                         let cn = drop(cf.name, 4)
537 -                         let G = if (contains(cn, "XXL"))
538 -                             then dropRight(cn, 3)
539 -                             else if (contains(cn, "XL"))
540 -                                 then dropRight(cn, 2)
541 -                                 else dropRight(cn, 1)
542 -                         let co = valueOrErrorMessage(parseInt(G), ("Cannot parse land number from " + cf.name))
543 -                         let bR = toBase58String(K)
544 -                         let bW = M(bR)
545 -                         if (isDefined(getInteger(bW)))
546 -                             then throw((("NFT " + cf.name) + " is already staked"))
539 +                         let co = drop(cg.name, 4)
540 +                         let G = if (contains(co, "XXL"))
541 +                             then dropRight(co, 3)
542 +                             else if (contains(co, "XL"))
543 +                                 then dropRight(co, 2)
544 +                                 else dropRight(co, 1)
545 +                         let cp = valueOrErrorMessage(parseInt(G), ("Cannot parse land number from " + cg.name))
546 +                         let bS = toBase58String(K)
547 +                         let bX = M(bS)
548 +                         if (isDefined(getInteger(bX)))
549 +                             then throw((("NFT " + cg.name) + " is already staked"))
547 550                              else {
548 -                                 let ch = split(cf.description, "_")
549 -                                 let aM = aR(ch[ab])
550 -                                 let ap = aL(aM, (aT(ch[aa]) / 25), 1)
551 -                                 let cp = if ((500 >= co))
551 +                                 let ci = split(cg.description, "_")
552 +                                 let aN = aS(ci[ac])
553 +                                 let aq = aM(aN, (aU(ci[ab]) / 25), 1)
554 +                                 let cq = if ((500 >= cp))
552 555                                      then (lastBlock.timestamp > u)
553 556                                      else false
554 - [IntegerEntry(bW, lastBlock.timestamp), IntegerEntry(R(i, bR, cm), lastBlock.timestamp), StringEntry(J(bR), cm), StringEntry(T(G), cm), StringEntry(Y(), ap)]
557 + [IntegerEntry(bX, lastBlock.timestamp), IntegerEntry(S(i, bS, cn), lastBlock.timestamp), StringEntry(J(bS), cn), StringEntry(U(G), cn), StringEntry(Z(), aq)]
555 558                                  }
556 559                          }
557 560              }
558 561      }
559 562  
560 563  
561 564  
562 - @Callable(aQ)
563 - func unstakeLand (bR) = if ((size(aQ.payments) != 0))
565 + @Callable(aR)
566 + func unstakeLand (bS) = if ((size(aR.payments) != 0))
564 567      then throw("unstake doesn't require any payments")
565 568      else {
566 -         let K = fromBase58String(bR)
567 -         let cm = toString(aQ.caller)
568 -         let cf = value(assetInfo(K))
569 -         if ((cf.issuer != this))
569 +         let K = fromBase58String(bS)
570 +         let cn = toString(aR.caller)
571 +         let cg = value(assetInfo(K))
572 +         if ((cg.issuer != this))
570 573              then throw("Unknown issuer of token")
571 -             else if (!(contains(cf.name, i)))
574 +             else if (!(contains(cg.name, i)))
572 575                  then throw((("Only NFT " + i) + " tokens can be unstaked"))
573 576                  else {
574 -                     let bW = M(bR)
575 -                     if (!(isDefined(bW)))
576 -                         then throw((("NFT " + cf.name) + " is not staked"))
577 +                     let bX = M(bS)
578 +                     if (!(isDefined(bX)))
579 +                         then throw((("NFT " + cg.name) + " is not staked"))
577 580                          else {
578 -                             let cg = valueOrErrorMessage(getString(J(bR)), (("NFT " + cf.name) + " is orphaned"))
579 -                             if ((cg != cm))
581 +                             let ch = valueOrErrorMessage(getString(J(bS)), (("NFT " + cg.name) + " is orphaned"))
582 +                             if ((ch != cn))
580 583                                  then throw((("Staked " + i) + " is not yours"))
581 584                                  else {
582 -                                     let ch = split(cf.description, "_")
583 -                                     let aM = aR(ch[ab])
584 -                                     let bV = aT(ch[aa])
585 -                                     let ap = aL(aM, (bV / 25), -1)
586 -                                     let ck = bU(bR, bV)
587 -                                     let V = valueOrErrorMessage(getString(P(cm)), (("You can't unstake " + i) + " without a duck staked"))
588 -                                     let ci = valueOrElse(getString(W(V)), k)
589 -                                     let cj = split(value(ci), "_")
590 -                                     if ((cj[ae] != "L"))
591 -                                         then throw((("Duck location type is " + cj[ae]) + ", but should be L"))
592 -                                         else if ((cj[af] != bR))
593 -                                             then throw(((("Duck location id is " + cj[af]) + ", but should be ") + bR))
585 +                                     let ci = split(cg.description, "_")
586 +                                     let aN = aS(ci[ac])
587 +                                     let bW = aU(ci[ab])
588 +                                     let aq = aM(aN, (bW / 25), -1)
589 +                                     let cl = bV(bS, bW)
590 +                                     let W = valueOrErrorMessage(getString(R(cn)), (("You can't unstake " + i) + " without a duck staked"))
591 +                                     let cj = valueOrElse(getString(X(W)), k)
592 +                                     let ck = split(value(cj), "_")
593 +                                     if ((ck[af] != "L"))
594 +                                         then throw((("Duck location type is " + ck[af]) + ", but should be L"))
595 +                                         else if ((ck[ag] != bS))
596 +                                             then throw(((("Duck location id is " + ck[ag]) + ", but should be ") + bS))
594 597                                              else {
595 -                                                 let bn = U(V)
596 -                                                 let bE = bm(bn)
597 - [ScriptTransfer(aQ.caller, 1, K), DeleteEntry(bW), DeleteEntry(R(i, bR, cm)), StringEntry(Y(), ap), StringEntry(bn, makeString([bE[ag], ck, bE[ai], bE[aj]], ":"))]
598 +                                                 let bo = V(W)
599 +                                                 let bF = bn(bo)
600 + [ScriptTransfer(aR.caller, 1, K), DeleteEntry(bX), DeleteEntry(S(i, bS, cn)), StringEntry(Z(), aq), StringEntry(bo, makeString([bF[ah], cl, bF[aj], bF[ak]], ":"))]
598 601                                                  }
599 602                                      }
600 603                              }
601 604                      }
602 605          }
603 606  
604 607  
605 608  
606 - @Callable(aQ)
609 + @Callable(aR)
607 610  func stakeDuck () = {
608 -     let cl = value(aQ.payments[0])
609 -     let K = value(cl.assetId)
610 -     let cm = toString(aQ.caller)
611 -     if ((cl.amount != 1))
611 +     let cm = value(aR.payments[0])
612 +     let K = value(cm.assetId)
613 +     let cn = toString(aR.caller)
614 +     if ((cm.amount != 1))
612 615          then throw((("NFT " + j) + " token should be attached as payment"))
613 616          else {
614 -             let cf = value(assetInfo(K))
615 -             if (if ((cf.issuer != d))
616 -                 then (cf.issuer != e)
617 +             let cg = value(assetInfo(K))
618 +             if (if ((cg.issuer != d))
619 +                 then (cg.issuer != e)
617 620                  else false)
618 621                  then throw((("Unknown issuer of " + j) + " token"))
619 -                 else if (!(contains(cf.name, j)))
622 +                 else if (!(contains(cg.name, j)))
620 623                      then throw((("Only NFT " + j) + " tokens are accepted"))
621 624                      else {
622 -                         let cq = toBase58String(K)
623 -                         let bW = M(cq)
624 -                         if (isDefined(getInteger(bW)))
625 -                             then throw((("NFT " + cf.name) + " is already staked"))
626 -                             else if (isDefined(getString(P(cm))))
627 -                                 then throw(("You already staked one duck: " + cf.name))
625 +                         let cr = toBase58String(K)
626 +                         let bX = M(cr)
627 +                         if (isDefined(getInteger(bX)))
628 +                             then throw((("NFT " + cg.name) + " is already staked"))
629 +                             else if (isDefined(getString(R(cn))))
630 +                                 then throw(("You already staked one duck: " + cg.name))
628 631                                  else {
629 -                                     let cr = W(cq)
630 -                                     let cs = getString(cr)
631 -                                     let bC = X(cq)
632 -                                     let ct = getInteger(bC)
633 -                                     let bn = U(cq)
634 -                                     let cu = getString(bn)
635 -                                     ([IntegerEntry(bW, lastBlock.timestamp), IntegerEntry(R(j, toBase58String(K), cm), lastBlock.timestamp), StringEntry(L(cq), cm), StringEntry(P(cm), cq)] ++ (if (isDefined(cs))
632 +                                     let cs = X(cr)
633 +                                     let ct = getString(cs)
634 +                                     let bD = Y(cr)
635 +                                     let cu = getInteger(bD)
636 +                                     let bo = V(cr)
637 +                                     let cv = getString(bo)
638 +                                     ([IntegerEntry(bX, lastBlock.timestamp), IntegerEntry(S(j, toBase58String(K), cn), lastBlock.timestamp), StringEntry(L(cr), cn), StringEntry(R(cn), cr)] ++ (if (isDefined(ct))
636 639                                          then nil
637 -                                         else ([StringEntry(cr, k)] ++ (if (isDefined(ct))
640 +                                         else ([StringEntry(cs, k)] ++ (if (isDefined(cu))
638 641                                              then nil
639 -                                             else ([IntegerEntry(bC, 100)] ++ (if (isDefined(cu))
642 +                                             else ([IntegerEntry(bD, 100)] ++ (if (isDefined(cv))
640 643                                                  then nil
641 -                                                 else [StringEntry(bn, "0:0_0_0_0_0_0:0_0_0_0_0_0:")]))))))
644 +                                                 else [StringEntry(bo, "0:0_0_0_0_0_0:0_0_0_0_0_0:")]))))))
642 645                                      }
643 646                          }
644 647              }
645 648      }
646 649  
647 650  
648 651  
649 - @Callable(aQ)
650 - func unstakeDuck (cq) = if ((size(aQ.payments) != 0))
652 + @Callable(aR)
653 + func unstakeDuck (cr) = if ((size(aR.payments) != 0))
651 654      then throw("unstake doesn't require any payments")
652 655      else {
653 -         let K = fromBase58String(cq)
654 -         let cm = toString(aQ.caller)
655 -         let cf = value(assetInfo(K))
656 -         if (if ((cf.issuer != d))
657 -             then (cf.issuer != e)
656 +         let K = fromBase58String(cr)
657 +         let cn = toString(aR.caller)
658 +         let cg = value(assetInfo(K))
659 +         if (if ((cg.issuer != d))
660 +             then (cg.issuer != e)
658 661              else false)
659 662              then throw((("Unknown issuer of " + j) + " token"))
660 -             else if (!(contains(cf.name, j)))
663 +             else if (!(contains(cg.name, j)))
661 664                  then throw((("Only NFT " + j) + " tokens can be unstaked"))
662 665                  else {
663 -                     let bW = M(toBase58String(K))
664 -                     if (!(isDefined(bW)))
665 -                         then throw((("NFT " + cf.name) + " is not staked"))
666 -                         else if (!(isDefined(P(cm))))
667 -                             then throw((("The duck " + cf.name) + " is not staked"))
666 +                     let bX = M(toBase58String(K))
667 +                     if (!(isDefined(bX)))
668 +                         then throw((("NFT " + cg.name) + " is not staked"))
669 +                         else if (!(isDefined(R(cn))))
670 +                             then throw((("The duck " + cg.name) + " is not staked"))
668 671                              else {
669 -                                 let cg = valueOrErrorMessage(getString(L(toBase58String(K))), (("NFT " + cf.name) + " is orphaned"))
670 -                                 if ((cg != cm))
672 +                                 let ch = valueOrErrorMessage(getString(L(toBase58String(K))), (("NFT " + cg.name) + " is orphaned"))
673 +                                 if ((ch != cn))
671 674                                      then throw("Staked NFT is not yours")
672 -                                     else [ScriptTransfer(aQ.caller, 1, K), DeleteEntry(bW), DeleteEntry(W(cq)), DeleteEntry(L(cq)), DeleteEntry(R(j, cq, cm)), DeleteEntry(P(cm))]
675 +                                     else [ScriptTransfer(aR.caller, 1, K), DeleteEntry(bX), DeleteEntry(X(cr)), DeleteEntry(L(cr)), DeleteEntry(S(j, cr, cn)), DeleteEntry(R(cn))]
673 676                                  }
674 677                      }
675 678          }
676 679  
677 680  
678 681  
679 - @Callable(aQ)
680 - func claimRes (aW,bR) = if ((size(aQ.payments) != 0))
682 + @Callable(aR)
683 + func claimRes (aX,bS) = if ((size(aR.payments) != 0))
681 684      then throw("claimRes doesn't require any payments")
682 685      else {
683 -         let cb = toString(aQ.originCaller)
684 -         let cf = value(assetInfo(fromBase58String(bR)))
685 -         if (!(contains(cf.name, i)))
686 +         let cc = toString(aR.originCaller)
687 +         let cg = value(assetInfo(fromBase58String(bS)))
688 +         if (!(contains(cg.name, i)))
686 689              then throw((("NFT " + i) + " token should be passed as param"))
687 690              else {
688 -                 let bW = M(bR)
689 -                 let cg = getStringValue(J(bR))
690 -                 if ((cg != cb))
691 +                 let bX = M(bS)
692 +                 let ch = getStringValue(J(bS))
693 +                 if ((ch != cc))
691 694                      then throw((i + " is not yours"))
692 695                      else {
693 -                         let ch = split(cf.description, "_")
694 -                         let I = ch[aa]
695 -                         let aM = aR(ch[ab])
696 -                         let V = valueOrErrorMessage(getString(P(cb)), "You don't have a duck staked")
697 -                         let ci = valueOrElse(getString(W(V)), k)
698 -                         let cj = split(value(ci), "_")
699 -                         if ((cj[ae] != "L"))
700 -                             then throw((("Duck location type is " + cj[ae]) + ", but should be L"))
701 -                             else if ((cj[af] != bR))
702 -                                 then throw(((("Duck location id is " + cj[af]) + ", but should be ") + bR))
696 +                         let ci = split(cg.description, "_")
697 +                         let I = ci[ab]
698 +                         let aN = aS(ci[ac])
699 +                         let W = valueOrErrorMessage(getString(R(cc)), "You don't have a duck staked")
700 +                         let cj = valueOrElse(getString(X(W)), k)
701 +                         let ck = split(value(cj), "_")
702 +                         if ((ck[af] != "L"))
703 +                             then throw((("Duck location type is " + ck[af]) + ", but should be L"))
704 +                             else if ((ck[ag] != bS))
705 +                                 then throw(((("Duck location id is " + ck[ag]) + ", but should be ") + bS))
703 706                                  else {
704 -                                     let bX = valueOrErrorMessage(getInteger(bW), (("NFT " + cf.name) + " is not staked"))
705 -                                     let ba = (lastBlock.timestamp - bX)
706 -                                     if ((0 > ba))
707 -                                         then throw(((("Saved timestamp is in future, saved = " + toString(bX)) + ", current = ") + toString(lastBlock.timestamp)))
707 +                                     let bY = valueOrErrorMessage(getInteger(bX), (("NFT " + cg.name) + " is not staked"))
708 +                                     let bb = (lastBlock.timestamp - bY)
709 +                                     if ((0 > bb))
710 +                                         then throw(((("Saved timestamp is in future, saved = " + toString(bY)) + ", current = ") + toString(lastBlock.timestamp)))
708 711                                          else {
709 -                                             let bV = aT(I)
710 -                                             let bY = bQ(bR)
711 -                                             let bZ = fraction(ba, (bY * bV), n)
712 -                                             if ((aW > bZ))
713 -                                                 then throw(((("Not enough resources, available = " + toString(bZ)) + ", requested = ") + toString(aW)))
712 +                                             let bW = aU(I)
713 +                                             let bZ = bR(bS)
714 +                                             let ca = fraction(bb, (bZ * bW), n)
715 +                                             if ((aX > ca))
716 +                                                 then throw(((("Not enough resources, available = " + toString(ca)) + ", requested = ") + toString(aX)))
714 717                                                  else {
715 -                                                     let cv = fraction((bZ - aW), n, (bY * bV))
716 -                                                     let cw = (lastBlock.timestamp - cv)
717 -                                                     let bn = U(V)
718 -                                                     let bE = bm(bn)
719 -                                                     let aZ = split(bE[ah], "_")
720 -                                                     let cx = aY(aZ, aM, (ba - cv), (bV / 25), bY)
721 -                                                     let cy = makeString([bE[ag], cx, bE[ai], bE[aj]], ":")
722 -                                                     $Tuple2([StringEntry(bn, cy), IntegerEntry(bW, cw), IntegerEntry(R(i, bR, cg), cw)], cx)
718 +                                                     let cw = fraction((ca - aX), n, (bZ * bW))
719 +                                                     let cx = (lastBlock.timestamp - cw)
720 +                                                     let bo = V(W)
721 +                                                     let bF = bn(bo)
722 +                                                     let ba = split(bF[ai], "_")
723 +                                                     let cy = aZ(ba, aN, (bb - cw), (bW / 25), bZ)
724 +                                                     let cz = makeString([bF[ah], cy, bF[aj], bF[ak]], ":")
725 +                                                     $Tuple2([StringEntry(bo, cz), IntegerEntry(bX, cx), IntegerEntry(S(i, bS, ch), cx)], cy)
723 726                                                      }
724 727                                              }
725 728                                      }
726 729                          }
727 730                  }
728 731          }
729 732  
730 733  
731 734  
732 - @Callable(aQ)
733 - func flight (bs,bt) = if (!(sigVerify_8Kb(bs, bt, g)))
735 + @Callable(aR)
736 + func flight (bt,bu) = if (!(sigVerify_8Kb(bt, bu, g)))
734 737      then throw("signature does not match")
735 -     else if ((size(aQ.payments) != 0))
738 +     else if ((size(aR.payments) != 0))
736 739          then throw("flight doesn't require any payments")
737 740          else {
738 -             let bu = split(toUtf8String(bs), ";")
739 -             let bv = split(split(bu[0], "|")[0], "_")
740 -             let bw = parseIntValue(bv[0])
741 -             let bx = parseIntValue(bv[1])
742 -             let cz = split(bu[1], ":")
743 -             let cA = cz[0]
744 -             let bA = parseIntValue(cz[1])
745 -             if (if ((bA > (lastBlock.timestamp + o)))
741 +             let bv = split(toUtf8String(bt), ";")
742 +             let bw = split(split(bv[0], "|")[0], "_")
743 +             let bx = parseIntValue(bw[0])
744 +             let by = parseIntValue(bw[1])
745 +             let cA = split(bv[1], ":")
746 +             let cB = cA[0]
747 +             let bB = parseIntValue(cA[1])
748 +             if (if ((bB > (lastBlock.timestamp + o)))
746 749                  then true
747 -                 else ((lastBlock.timestamp - o) > bA))
750 +                 else ((lastBlock.timestamp - o) > bB))
748 751                  then throw("signature outdated")
749 752                  else {
750 -                     let V = valueOrErrorMessage(getString(P(toString(aQ.caller))), "You don't have a duck staked")
751 -                     let bC = X(V)
752 -                     let bD = valueOrElse(getInteger(bC), 100)
753 -                     if ((bD != bw))
754 -                         then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bC), 100))) + " from state does not match one from flight log=") + toString(bw)))
755 -                         else if ((0 >= bw))
753 +                     let W = valueOrErrorMessage(getString(R(toString(aR.caller))), "You don't have a duck staked")
754 +                     let bD = Y(W)
755 +                     let bE = valueOrElse(getInteger(bD), 100)
756 +                     if ((bE != bx))
757 +                         then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bD), 100))) + " from state does not match one from flight log=") + toString(bx)))
758 +                         else if ((0 >= bx))
756 759                              then throw("You can't fly with zero health")
757 760                              else {
758 -                                 let cr = W(V)
759 -                                 let ci = valueOrElse(getString(cr), k)
760 -                                 if ((cA == ci))
761 +                                 let cs = X(W)
762 +                                 let cj = valueOrElse(getString(cs), k)
763 +                                 if ((cB == cj))
761 764                                      then throw("You can't fly to the same location")
762 -                                     else $Tuple2([StringEntry(cr, if ((bx > 0))
763 -                                         then cA
764 -                                         else ci), IntegerEntry(bC, bx)], unit)
765 +                                     else $Tuple2([StringEntry(cs, if ((by > 0))
766 +                                         then cB
767 +                                         else cj), IntegerEntry(bD, by)], unit)
765 768                                  }
766 769                      }
767 770              }
768 771  
769 772  
770 773  
771 - @Callable(aQ)
772 - func setHealth (ct,V) = if (if ((0 > ct))
774 + @Callable(aR)
775 + func setHealth (cu,W) = if (if ((0 > cu))
773 776      then true
774 -     else (ct > 100))
777 +     else (cu > 100))
775 778      then throw("HP should be within 0..100")
776 -     else [IntegerEntry(X(V), ct)]
779 +     else [IntegerEntry(Y(W), cu)]
777 780  
778 781  
779 782  
780 - @Callable(aQ)
781 - func heal (cB,aW) = if (if ((0 > cB))
783 + @Callable(aR)
784 + func heal (cC,aX) = if (if ((0 > cC))
782 785      then true
783 -     else (cB >= l))
784 -     then throw(("Unknown material: " + toString(cB)))
785 -     else if ((0 >= aW))
786 -         then throw(("Amount should be positive! " + toString(aW)))
786 +     else (cC >= l))
787 +     then throw(("Unknown material: " + toString(cC)))
788 +     else if ((0 >= aX))
789 +         then throw(("Amount should be positive! " + toString(aX)))
787 790          else {
788 -             let V = valueOrErrorMessage(getString(P(toString(aQ.caller))), "You don't have a duck staked")
789 -             let bC = X(V)
790 -             let cC = valueOrElse(getInteger(bC), 100)
791 -             if ((cC >= 100))
791 +             let W = valueOrErrorMessage(getString(R(toString(aR.caller))), "You don't have a duck staked")
792 +             let bD = Y(W)
793 +             let cD = valueOrElse(getInteger(bD), 100)
794 +             if ((cD >= 100))
792 795                  then throw("HP should be < 100 to heal")
793 796                  else {
794 -                     let bn = U(V)
795 -                     let bE = bm(bn)
796 -                     let bF = split(bE[ai], "_")
797 -                     let cD = parseIntValue(bF[cB])
798 -                     let cE = min([(aW / h), (100 - cC)])
799 -                     let cF = (cE * h)
800 -                     if ((cF > cD))
801 -                         then throw(((((("You need " + toString(cF)) + " of ") + C[cB]) + " to heal, but you backpack contains ") + toString(cD)))
797 +                     let bo = V(W)
798 +                     let bF = bn(bo)
799 +                     let bG = split(bF[aj], "_")
800 +                     let cE = parseIntValue(bG[cC])
801 +                     let cF = min([(aX / h), (100 - cD)])
802 +                     let cG = (cF * h)
803 +                     if ((cG > cE))
804 +                         then throw(((((("You need " + toString(cG)) + " of ") + C[cC]) + " to heal, but you backpack contains ") + toString(cE)))
802 805                          else {
803 -                             let bG = aU(bF, cB, cF)
804 - [IntegerEntry(bC, (cC + cE)), StringEntry(bn, makeString([bE[ag], bE[ah], bG, bE[aj]], ":"))]
806 +                             let bH = aV(bG, cC, cG)
807 + [IntegerEntry(bD, (cD + cF)), StringEntry(bo, makeString([bF[ah], bF[ai], bH, bF[ak]], ":"))]
805 808                              }
806 809                      }
807 810              }
808 811  
809 812  
810 813  
811 - @Callable(aQ)
812 - func updateBackpack (V,cy) = if ((aQ.caller != f))
814 + @Callable(aR)
815 + func updateBackpack (W,cz) = if ((aR.caller != f))
813 816      then throw("permission denied")
814 -     else $Tuple2([StringEntry(U(V), cy)], cy)
817 +     else $Tuple2([StringEntry(V(W), cz)], cz)
815 818  
816 819  
817 820  
818 - @Callable(aQ)
819 - func expeditionBuy (bs,bt) = if ((size(aQ.payments) != 1))
821 + @Callable(aR)
822 + func expeditionBuy (bt,bu) = if ((size(aR.payments) != 1))
820 823      then throw("Exactly one payment required")
821 824      else {
822 -         let cl = value(aQ.payments[0])
823 -         if ((cl.assetId != b))
825 +         let cm = value(aR.payments[0])
826 +         if ((cm.assetId != b))
824 827              then throw("Allowed USDN payment only!")
825 -             else if ((cl.amount != t))
828 +             else if ((cm.amount != t))
826 829                  then throw(("Payment attached should be " + toString(t)))
827 -                 else bp(false, aQ.caller, aQ.transactionId, bs, bt)
830 +                 else bq(false, aR.caller, aR.transactionId, bt, bu)
828 831          }
829 832  
830 833  
831 834  
832 - @Callable(aQ)
833 - func expedition (bs,bt) = if ((size(aQ.payments) != 0))
835 + @Callable(aR)
836 + func expedition (bt,bu) = if ((size(aR.payments) != 0))
834 837      then throw("expedition doesn't require any payments")
835 -     else bp(true, aQ.caller, aQ.transactionId, bs, bt)
838 +     else bq(true, aR.caller, aR.transactionId, bt, bu)
836 839  
837 840  
838 841  
839 - @Callable(aQ)
840 - func upgradeInfra (bR) = if ((size(aQ.payments) != 0))
842 + @Callable(aR)
843 + func upgradeInfra (bS) = if ((size(aR.payments) != 0))
841 844      then throw("Infrastructure upgrade doesn't require any payments")
842 -     else ca(true, aQ.caller, bR)
845 +     else cb(true, aR.caller, bS)
843 846  
844 847  
845 848  
846 - @Callable(aQ)
847 - func upgradeInfraUsdn (bR) = if ((size(aQ.payments) != 1))
849 + @Callable(aR)
850 + func upgradeInfraUsdn (bS) = if ((size(aR.payments) != 1))
848 851      then throw("Exactly one payment required")
849 852      else {
850 -         let cl = value(aQ.payments[0])
851 -         if ((cl.assetId != b))
853 +         let cm = value(aR.payments[0])
854 +         if ((cm.assetId != b))
852 855              then throw("Allowed USDN payment only!")
853 856              else {
854 -                 let ce = (valueOrElse(getInteger(N(bR)), 0) + 1)
855 -                 let cf = value(assetInfo(fromBase58String(bR)))
856 -                 let ch = split(cf.description, "_")
857 -                 let cG = fraction(r, (aT(ch[aa]) * ce), 25)
858 -                 if ((cl.amount != cG))
859 -                     then throw(("Payment attached should be " + toString(cG)))
860 -                     else ca(false, aQ.caller, bR)
857 +                 let cf = (valueOrElse(getInteger(N(bS)), 0) + 1)
858 +                 let cg = value(assetInfo(fromBase58String(bS)))
859 +                 let ci = split(cg.description, "_")
860 +                 let cH = fraction(r, (aU(ci[ab]) * cf), 25)
861 +                 if ((cm.amount != cH))
862 +                     then throw(("Payment attached should be " + toString(cH)))
863 +                     else cb(false, aR.caller, bS)
861 864                  }
862 865          }
863 866  
864 867

Old	New		Differences
143	143		func N (K) = ("infraLevel_" + K)
144	144
145	145
146		-	func O (K) = ("~~presaleArtActivated~~_" + K)
	146	+	func O (K,P) = ((("infraLevelByAssetIdAndOwner_" + K) + "_") + P)
147	147
148	148
149		-	func P (Q) = ("~~stakedDuckByOwner~~_" + Q)
	149	+	func Q (K) = ("presaleArtActivated_" + K)
150	150
151	151
152		-	func R (~~S,K,Q~~) = (~~((((~~"~~stakedTimeByTypeAssetIdAndOwner~~_" + S) ~~+ "_") + K) + "_") + Q)~~
	152	+	func R (P) = ("stakedDuckByOwner_" + P)
153	153
154	154
155		-	func T (G) = ("~~landOwner~~_" + G)
	155	+	func S (T,K,P) = ((((("stakedTimeByTypeAssetIdAndOwner_" + T) + "_") + K) + "_") + P)
156	156
157	157
158		-	func U (V) = ("~~backPack~~_" + V)
	158	+	func U (G) = ("landOwner_" + G)
159	159
160	160
161		-	func W (V) = ("~~duckLocation~~_" + V)
	161	+	func V (W) = ("backPack_" + W)
162	162
163	163
164		-	func X (V) = ("~~duckHealth~~_" + V)
	164	+	func X (W) = ("duckLocation_" + W)
165	165
166	166
167		-	func Y () = "~~resTypesProportions~~"
	167	+	func Y (W) = ("duckHealth_" + W)
168	168
169	169
170		-	~~let~~ Z = 0
	170	+	func Z () = "resTypesProportions"
171	171
172		-	let aa = 1
173	172
174		-	let ab = 2
	173	+	let aa = 0
175	174
176		-	let ac = 3
	175	+	let ab = 1
177	176
178		-	let ad = 0
	177	+	let ac = 2
179	178
180		-	let ae = 1
	179	+	let ad = 3
181	180
182		-	let af = 2
	181	+	let ae = 0
183	182
184		-	let ag = 0
	183	+	let af = 1
185	184
186		-	let ah = 1
	185	+	let ag = 2
187	186
188		-	let ai = 2
	187	+	let ah = 0
189	188
190		-	let aj = 3
	189	+	let ai = 1
191	190
192		-	func ak (al) = {
193		-	let c = al
	191	+	let aj = 2
	192	+
	193	+	let ak = 3
	194	+
	195	+	func al (am) = {
	196	+	let c = am
194	197		if ($isInstanceOf(c, "String"))
195	198		then {
196		-	let am = c
197		-	am
	199	+	let an = c
	200	+	an
198	201		}
199	202		else throw("fail to cast into String")
200	203		}
201	204
202	205
203		-	func an (ao) = {
204		-	let ap = split(value(getString(Y())), "_")
205		-	if ((size(ap) != l))
	206	+	func ao (ap) = {
	207	+	let aq = split(value(getString(Z())), "_")
	208	+	if ((size(aq) != l))
206	209		then throw("Wrong proportions data")
207	210		else {
208		-	let aq = [parseIntValue(ap[0]), parseIntValue(ap[1]), parseIntValue(ap[2]), parseIntValue(ap[3]), parseIntValue(ap[4]), parseIntValue(ap[5])]
209		-	let ar = (((((aq[0] + aq[1]) + aq[2]) + aq[3]) + aq[4]) + aq[5])
210		-	if ((0 >= ar))
	211	+	let ar = [parseIntValue(aq[0]), parseIntValue(aq[1]), parseIntValue(aq[2]), parseIntValue(aq[3]), parseIntValue(aq[4]), parseIntValue(aq[5])]
	212	+	let as = (((((ar[0] + ar[1]) + ar[2]) + ar[3]) + ar[4]) + ar[5])
	213	+	if ((0 >= as))
211	214		then throw("No lands staked")
212	215		else {
213		-	let as = fraction(ao, v, ar)
214		-	func at (au,av) = (au :+ fraction(av, as, v))
	216	+	let at = fraction(ap, v, as)
	217	+	func au (av,aw) = (av :+ fraction(aw, at, v))
215	218
216		-	let aw = aq
217		-	let ax = size(aw)
218		-	let ay = nil
219		-	func az (aA,aB) = if ((aB >= ax))
220		-	then aA
221		-	else at(aA, aw[aB])
	219	+	let ax = ar
	220	+	let ay = size(ax)
	221	+	let az = nil
	222	+	func aA (aB,aC) = if ((aC >= ay))
	223	+	then aB
	224	+	else au(aB, ax[aC])
222	225
223		-	func aC (aA,aB) = if ((aB >= ax))
224		-	then aA
	226	+	func aD (aB,aC) = if ((aC >= ay))
	227	+	then aB
225	228		else throw("List size exceeds 6")
226	229
227		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	230	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
228	231		}
229	232		}
230	233		}
231	234
232	235
233		-	func aD (~~aE,~~aF,aG) = {
234		-	let aH = an(aG)
235		-	func aI (au,aJ) = {
236		-	let aK = (parseIntValue(aF[aJ]) - aH[aJ])
237		-	if ((0 > aK))
238		-	then throw(((((("Not enough material idx=" + toString(aJ)) + ", you have ") + aF[aJ]) + ", but need ") + toString(aH[aJ])))
239		-	else (au :+ toString(aK))
	236	+	func aE (aF,aG,aH) = {
	237	+	let aI = ao(aH)
	238	+	func aJ (av,aK) = {
	239	+	let aL = (parseIntValue(aG[aK]) - aI[aK])
	240	+	if ((0 > aL))
	241	+	then throw(((((("Not enough material idx=" + toString(aK)) + ", you have ") + aG[aK]) + ", but need ") + toString(aI[aK])))
	242	+	else (av :+ toString(aL))
240	243		}
241	244
242		-	if (aE)
	245	+	if (aF)
243	246		then {
244		-	let aw = [0, 1, 2, 3, 4, 5]
245		-	let ax = size(aw)
246		-	let ay = nil
247		-	func az (aA,aB) = if ((aB >= ax))
248		-	then aA
249		-	else aI(aA, aw[aB])
	247	+	let ax = [0, 1, 2, 3, 4, 5]
	248	+	let ay = size(ax)
	249	+	let az = nil
	250	+	func aA (aB,aC) = if ((aC >= ay))
	251	+	then aB
	252	+	else aJ(aB, ax[aC])
250	253
251		-	func aC (aA,aB) = if ((aB >= ax))
252		-	then aA
	254	+	func aD (aB,aC) = if ((aC >= ay))
	255	+	then aB
253	256		else throw("List size exceeds 6")
254	257
255		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	258	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
256	259		}
257		-	else aF
	260	+	else aG
258	261		}
259	262
260	263
261		-	func aL (~~aM,~~aN,aO) = {
262		-	let ap = split(valueOrElse(getString(Y()), "0_0_0_0_0_0"), "_")
263		-	if ((size(ap) != l))
	264	+	func aM (aN,aO,aP) = {
	265	+	let aq = split(valueOrElse(getString(Z()), "0_0_0_0_0_0"), "_")
	266	+	if ((size(aq) != l))
264	267		then throw("Wrong proportions data")
265	268		else {
266		-	func aP (au,aQ) = {
267		-	let aK = (parseIntValue(ap[aQ]) + ((aO * aM[aQ]) * aN))
268		-	if ((0 > aK))
269		-	then throw(((((((("Panic! Pieces of type=" + toString(aQ)) + ", sign=") + toString(aO)) + ", terrainCounts[i]=") + toString(aM[aQ])) + ", landSizeIndex=") + toString(aN)))
270		-	else (au :+ toString(aK))
	269	+	func aQ (av,aR) = {
	270	+	let aL = (parseIntValue(aq[aR]) + ((aP * aN[aR]) * aO))
	271	+	if ((0 > aL))
	272	+	then throw(((((((("Panic! Pieces of type=" + toString(aR)) + ", sign=") + toString(aP)) + ", terrainCounts[i]=") + toString(aN[aR])) + ", landSizeIndex=") + toString(aO)))
	273	+	else (av :+ toString(aL))
271	274		}
272	275
273		-	let aq = {
274		-	let aw = [0, 1, 2, 3, 4, 5]
275		-	let ax = size(aw)
276		-	let ay = nil
277		-	func az (aA,aB) = if ((aB >= ax))
278		-	then aA
279		-	else aP(aA, aw[aB])
	276	+	let ar = {
	277	+	let ax = [0, 1, 2, 3, 4, 5]
	278	+	let ay = size(ax)
	279	+	let az = nil
	280	+	func aA (aB,aC) = if ((aC >= ay))
	281	+	then aB
	282	+	else aQ(aB, ax[aC])
280	283
281		-	func aC (aA,aB) = if ((aB >= ax))
282		-	then aA
	284	+	func aD (aB,aC) = if ((aC >= ay))
	285	+	then aB
283	286		else throw("List size exceeds 6")
284	287
285		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	288	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
286	289		}
287		-	makeString(aq, "_")
	290	+	makeString(ar, "_")
288	291		}
289	292		}
290	293
291	294
292		-	func aR (aS) = [(size(split(aS, "A")) - 1), (size(split(aS, "B")) - 1), (size(split(aS, "C")) - 1), (size(split(aS, "D")) - 1), (size(split(aS, "E")) - 1), (size(split(aS, "F")) - 1)]
	295	+	func aS (aT) = [(size(split(aT, "A")) - 1), (size(split(aT, "B")) - 1), (size(split(aT, "C")) - 1), (size(split(aT, "D")) - 1), (size(split(aT, "E")) - 1), (size(split(aT, "F")) - 1)]
293	296
294	297
295		-	func aT (I) = {
	298	+	func aU (I) = {
296	299		let c = I
297	300		if (("S" == c))
298	301		then 25

308	311		}
309	312
310	313
311		-	func aU (aV,aJ,aW) = {
312		-	func aX (au,aQ) = (au :+ (if ((aQ == aJ))
313		-	then toString((parseIntValue(aV[aQ]) - aW))
314		-	else aV[aQ]))
	314	+	func aV (aW,aK,aX) = {
	315	+	func aY (av,aR) = (av :+ (if ((aR == aK))
	316	+	then toString((parseIntValue(aW[aR]) - aX))
	317	+	else aW[aR]))
315	318
316		-	let aq = {
317		-	let aw = [0, 1, 2, 3, 4, 5]
318		-	let ax = size(aw)
319		-	let ay = nil
320		-	func az (aA,aB) = if ((aB >= ax))
321		-	then aA
322		-	else aX(aA, aw[aB])
	319	+	let ar = {
	320	+	let ax = [0, 1, 2, 3, 4, 5]
	321	+	let ay = size(ax)
	322	+	let az = nil
	323	+	func aA (aB,aC) = if ((aC >= ay))
	324	+	then aB
	325	+	else aY(aB, ax[aC])
323	326
324		-	func aC (aA,aB) = if ((aB >= ax))
325		-	then aA
	327	+	func aD (aB,aC) = if ((aC >= ay))
	328	+	then aB
326	329		else throw("List size exceeds 6")
327	330
328		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	331	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
329	332		}
330		-	makeString(aq, "_")
	333	+	makeString(ar, "_")
331	334		}
332	335
333	336
334		-	func aY (~~aZ,aM,~~ba,aN,bb) = {
335		-	func bc (au,aQ) = {
336		-	let bd = ((fraction(ba, bb, n) * aM[aQ]) * aN)
337		-	(au :+ toString((parseIntValue(aZ[aQ]) + bd)))
	337	+	func aZ (ba,aN,bb,aO,bc) = {
	338	+	func bd (av,aR) = {
	339	+	let be = ((fraction(bb, bc, n) * aN[aR]) * aO)
	340	+	(av :+ toString((parseIntValue(ba[aR]) + be)))
338	341		}
339	342
340		-	let aq = {
341		-	let aw = [0, 1, 2, 3, 4, 5]
342		-	let ax = size(aw)
343		-	let ay = nil
344		-	func az (aA,aB) = if ((aB >= ax))
345		-	then aA
346		-	else bc(aA, aw[aB])
	343	+	let ar = {
	344	+	let ax = [0, 1, 2, 3, 4, 5]
	345	+	let ay = size(ax)
	346	+	let az = nil
	347	+	func aA (aB,aC) = if ((aC >= ay))
	348	+	then aB
	349	+	else bd(aB, ax[aC])
347	350
348		-	func aC (aA,aB) = if ((aB >= ax))
349		-	then aA
	351	+	func aD (aB,aC) = if ((aC >= ay))
	352	+	then aB
350	353		else throw("List size exceeds 6")
351	354
352		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	355	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
353	356		}
354		-	makeString(aq, "_")
	357	+	makeString(ar, "_")
355	358		}
356	359
357	360
358		-	func be (bf) = if ((bf >= toBigInt(0)))
359		-	then bf
360		-	else -(bf)
	361	+	func bf (bg) = if ((bg >= toBigInt(0)))
	362	+	then bg
	363	+	else -(bg)
361	364
362	365
363		-	let bg = [[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]]
	366	+	let bh = [[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]]
364	367
365		-	func bh (bi,bj) = {
366		-	let bk = toInt((bi % x))
367		-	let bl = if ((bj[0] > bk))
	368	+	func bi (bj,bk) = {
	369	+	let bl = toInt((bj % x))
	370	+	let bm = if ((bk[0] > bl))
368	371		then "A"
369		-	else if ((bj[1] > bk))
	372	+	else if ((bk[1] > bl))
370	373		then "B"
371		-	else if ((bj[2] > bk))
	374	+	else if ((bk[2] > bl))
372	375		then "C"
373		-	else if ((bj[3] > bk))
	376	+	else if ((bk[3] > bl))
374	377		then "D"
375		-	else if ((bj[4] > bk))
	378	+	else if ((bk[4] > bl))
376	379		then "E"
377	380		else "F"
378		-	bl
	381	+	bm
379	382		}
380	383
381	384
382		-	func bm (bn) = {
383		-	let bo = split(valueOrElse(getString(bn), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
384		-	[toString(valueOrElse(parseInt(bo[ag]), 0)), if ((size(split(bo[ah], "_")) == l))
385		-	then bo[ah]
386		-	else "0_0_0_0_0_0", if ((size(split(bo[ai], "_")) == l))
387		-	then bo[ai]
388		-	else "0_0_0_0_0_0", bo[aj]]
	385	+	func bn (bo) = {
	386	+	let bp = split(valueOrElse(getString(bo), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
	387	+	[toString(valueOrElse(parseInt(bp[ah]), 0)), if ((size(split(bp[ai], "_")) == l))
	388	+	then bp[ai]
	389	+	else "0_0_0_0_0_0", if ((size(split(bp[aj], "_")) == l))
	390	+	then bp[aj]
	391	+	else "0_0_0_0_0_0", bp[ak]]
389	392		}
390	393
391	394
392		-	func bp (~~aE,bq~~,br,bs,bt) = if (!(sigVerify_8Kb(bs, bt, g)))
	395	+	func bq (aF,br,bs,bt,bu) = if (!(sigVerify_8Kb(bt, bu, g)))
393	396		then throw("signature does not match")
394	397		else {
395		-	let bu = split(toUtf8String(bs), ";")
396		-	let bv = split(split(bu[0], "\|")[0], "_")
397		-	let bw = parseIntValue(bv[0])
398		-	let bx = parseIntValue(bv[1])
399		-	let by = split(bu[1], ":")
400		-	let bz = split(by[0], "_")
401		-	if ((bz[1] != "E"))
	398	+	let bv = split(toUtf8String(bt), ";")
	399	+	let bw = split(split(bv[0], "\|")[0], "_")
	400	+	let bx = parseIntValue(bw[0])
	401	+	let by = parseIntValue(bw[1])
	402	+	let bz = split(bv[1], ":")
	403	+	let bA = split(bz[0], "_")
	404	+	if ((bA[1] != "E"))
402	405		then throw("expedition target location type should be E")
403	406		else {
404		-	let bA = parseIntValue(by[1])
405		-	if (if ((bA > (lastBlock.timestamp + o)))
	407	+	let bB = parseIntValue(bz[1])
	408	+	if (if ((bB > (lastBlock.timestamp + o)))
406	409		then true
407		-	else ((lastBlock.timestamp - o) > bA))
	410	+	else ((lastBlock.timestamp - o) > bB))
408	411		then throw("signature outdated")
409	412		else {
410		-	let bB = toString(bq)
411		-	let V = valueOrErrorMessage(getString(P(bB)), "You don't have a duck staked")
412		-	let bC = X(V)
413		-	let bD = valueOrElse(getInteger(bC), 100)
414		-	if ((bD != bw))
415		-	then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bC), 100))) + " from state does not match one from flight log=") + toString(bw)))
416		-	else if ((0 >= bw))
	413	+	let bC = toString(br)
	414	+	let W = valueOrErrorMessage(getString(R(bC)), "You don't have a duck staked")
	415	+	let bD = Y(W)
	416	+	let bE = valueOrElse(getInteger(bD), 100)
	417	+	if ((bE != bx))
	418	+	then throw(((("oldHealth=" + toString(valueOrElse(getInteger(bD), 100))) + " from state does not match one from flight log=") + toString(bx)))
	419	+	else if ((0 >= bx))
417	420		then throw("You can't fly with zero health")
418		-	else if ((0 >= bx))
419		-	then $Tuple2(((if (!(aE))
420		-	then [ScriptTransfer(bq, t, b)]
421		-	else nil) :+ IntegerEntry(bC, 0)), "")
	421	+	else if ((0 >= by))
	422	+	then $Tuple2(((if (!(aF))
	423	+	then [ScriptTransfer(br, t, b)]
	424	+	else nil) :+ IntegerEntry(bD, 0)), "")
422	425		else {
423		-	let bn = U(V)
424		-	let bE = bm(bn)
425		-	let bF = split(bE[ai], "_")
426		-	let bG = makeString(aD(aE, bF, s), "_")
427		-	let bH = be(toBigInt(br))
428		-	let bI = valueOrElse(getInteger(E()), 501)
429		-	let G = toString(bI)
430		-	let bJ = toInt((bH % w))
431		-	let bK = bg[bJ]
432		-	func bL (au,av) = $Tuple2((((((au._1 + bh(au._2, bK)) + bh((au._2 / x), bK)) + bh((au._2 / y), bK)) + bh((au._2 / z), bK)) + bh((au._2 / A), bK)), (au._2 / B))
	426	+	let bo = V(W)
	427	+	let bF = bn(bo)
	428	+	let bG = split(bF[aj], "_")
	429	+	let bH = makeString(aE(aF, bG, s), "_")
	430	+	let bI = bf(toBigInt(bs))
	431	+	let bJ = valueOrElse(getInteger(E()), 501)
	432	+	let G = toString(bJ)
	433	+	let bK = toInt((bI % w))
	434	+	let bL = bh[bK]
	435	+	func bM (av,aw) = $Tuple2((((((av._1 + bi(av._2, bL)) + bi((av._2 / x), bL)) + bi((av._2 / y), bL)) + bi((av._2 / z), bL)) + bi((av._2 / A), bL)), (av._2 / B))
433	436
434		-	let bM = {
435		-	let aw = [1, 2, 3, 4, 5]
436		-	let ax = size(aw)
437		-	let ay = $Tuple2("", (bH / w))
438		-	func az (aA,aB) = if ((aB >= ax))
439		-	then aA
440		-	else bL(aA, aw[aB])
	437	+	let bN = {
	438	+	let ax = [1, 2, 3, 4, 5]
	439	+	let ay = size(ax)
	440	+	let az = $Tuple2("", (bI / w))
	441	+	func aA (aB,aC) = if ((aC >= ay))
	442	+	then aB
	443	+	else bM(aB, ax[aC])
441	444
442		-	func aC (aA,aB) = if ((aB >= ax))
443		-	then aA
	445	+	func aD (aB,aC) = if ((aC >= ay))
	446	+	then aB
444	447		else throw("List size exceeds 5")
445	448
446		-	aC(az~~(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5)
	449	+	aD(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5)
447	450		}
448		-	let bN = D[bJ]
449		-	let bO = Issue(H(G, "S"), makeString([G, "S", bM._1, bN], "_"), 1, 0, false)
450		-	let K = calculateAssetId(bO)
451		-	let bP = toBase58String(K)
452		-	$Tuple2([IntegerEntry(E(), (bI + 1)), bO, StringEntry(F(G), bP), StringEntry(J(bP), bB), StringEntry(T(G), bB), IntegerEntry(N(bP), 0), ScriptTransfer(bq, 1, K), StringEntry(W(V), makeString([bN, "L", bP], "_")), IntegerEntry(bC, bx), StringEntry(bn, makeString([~~bE[ag], bE~~[ah], bG, bE[aj]], ":"))], bP)
	451	+	let bO = D[bK]
	452	+	let bP = Issue(H(G, "S"), makeString([G, "S", bN._1, bO], "_"), 1, 0, false)
	453	+	let K = calculateAssetId(bP)
	454	+	let bQ = toBase58String(K)
	455	+	$Tuple2([IntegerEntry(E(), (bJ + 1)), bP, StringEntry(F(G), bQ), StringEntry(J(bQ), bC), StringEntry(U(G), bC), IntegerEntry(N(bQ), 0), IntegerEntry(O(bQ, bC), 0), ScriptTransfer(br, 1, K), StringEntry(X(W), makeString([bO, "L", bQ], "_")), IntegerEntry(bD, by), StringEntry(bo, makeString([bF[ah], bF[ai], bH, bF[ak]], ":"))], bQ)
453	456		}
454	457		}
455	458		}
456	459		}
457	460
458	461
459		-	func bQ (bR) = {
460		-	let bS = valueOrElse(getInteger(N(bR)), 0)
461		-	let bT = if (valueOrElse(getBoolean(O(bR)), false))
	462	+	func bR (bS) = {
	463	+	let bT = valueOrElse(getInteger(N(bS)), 0)
	464	+	let bU = if (valueOrElse(getBoolean(Q(bS)), false))
462	465		then 3
463	466		else 0
464		-	(m + fraction(m, bS, 4))
	467	+	(m + fraction(m, bT, 4))
465	468		}
466	469
467	470
468		-	func bU (bR,bV) = {

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = toUtf8String(take(drop(this.bytes, 1), 1))
5	5
6	6		let b = {
7	7		let c = a
8	8		if (("W" == c))
9	9		then base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
10	10		else if (("T" == c))
11	11		then base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
12	12		else throw("Unknown chain")
13	13		}
14	14
15	15		let d = {
16	16		let c = a
17	17		if (("W" == c))
18	18		then addressFromStringValue("3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv")
19	19		else if (("T" == c))
20	20		then this
21	21		else throw("Unknown chain")
22	22		}
23	23
24	24		let e = {
25	25		let c = a
26	26		if (("W" == c))
27	27		then addressFromStringValue("3PDVuU45H7Eh5dmtNbnRNRStGwULA7NY6Hb")
28	28		else if (("T" == c))
29	29		then this
30	30		else throw("Unknown chain")
31	31		}
32	32
33	33		let f = {
34	34		let c = a
35	35		if (("W" == c))
36	36		then addressFromStringValue("3P2sk1KncSxRaZs8b4CWGPw2jkvvav74u4D")
37	37		else if (("T" == c))
38	38		then addressFromStringValue("3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep")
39	39		else throw("Unknown chain")
40	40		}
41	41
42	42		let g = base58'6LfPuKJjLgekmncBhMg2LZyMTNVzZBccXR28ySXm9uXD'
43	43
44	44		let h = 10000
45	45
46	46		let i = "LAND"
47	47
48	48		let j = "DUCK"
49	49
50	50		let k = "Africa_F_Africa"
51	51
52	52		let l = 6
53	53
54	54		let m = 3456000
55	55
56	56		let n = 86400000
57	57
58	58		let o = 300000
59	59
60	60		let p = 158549
61	61
62	62		let q = {
63	63		let c = a
64	64		if (("W" == c))
65	65		then 18921595217
66	66		else if (("T" == c))
67	67		then 189215952
68	68		else throw("Unknown chain")
69	69		}
70	70
71	71		let r = {
72	72		let c = a
73	73		if (("W" == c))
74	74		then 120000000
75	75		else if (("T" == c))
76	76		then 1200000
77	77		else throw("Unknown chain")
78	78		}
79	79
80	80		let s = {
81	81		let c = a
82	82		if (("W" == c))
83	83		then 157679960139
84	84		else if (("T" == c))
85	85		then 1576799601
86	86		else throw("Unknown chain")
87	87		}
88	88
89	89		let t = {
90	90		let c = a
91	91		if (("W" == c))
92	92		then 1000000000
93	93		else if (("T" == c))
94	94		then 10000000
95	95		else throw("Unknown chain")
96	96		}
97	97
98	98		let u = {
99	99		let c = a
100	100		if (("W" == c))
101	101		then 1673136000000
102	102		else if (("T" == c))
103	103		then 1672790400000
104	104		else throw("Unknown chain")
105	105		}
106	106
107	107		let v = 1000000
108	108
109	109		let w = toBigInt(5)
110	110
111	111		let x = toBigInt(20)
112	112
113	113		let y = toBigInt((20 * 20))
114	114
115	115		let z = toBigInt(((20 * 20) * 20))
116	116
117	117		let A = toBigInt((((20 * 20) * 20) * 20))
118	118
119	119		let B = toBigInt(((((20 * 20) * 20) * 20) * 20))
120	120
121	121		let C = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
122	122
123	123		let D = ["Asia", "Europe", "Americas", "Oceania", "Africa"]
124	124
125	125		func E () = "nextLandNum"
126	126
127	127
128	128		func F (G) = ("landToAsset_" + G)
129	129
130	130
131	131		func H (G,I) = ((i + G) + I)
132	132
133	133
134	134		func J (K) = ("nftOwner_" + K)
135	135
136	136
137	137		func L (K) = ("duckOwner_" + K)
138	138
139	139
140	140		func M (K) = ("stakedTime_" + K)
141	141
142	142
143	143		func N (K) = ("infraLevel_" + K)
144	144
145	145
146		-	func O (K) = ("~~presaleArtActivated~~_" + K)
	146	+	func O (K,P) = ((("infraLevelByAssetIdAndOwner_" + K) + "_") + P)
147	147
148	148
149		-	func P (Q) = ("~~stakedDuckByOwner~~_" + Q)
	149	+	func Q (K) = ("presaleArtActivated_" + K)
150	150
151	151
152		-	func R (~~S,K,Q~~) = (~~((((~~"~~stakedTimeByTypeAssetIdAndOwner~~_" + S) ~~+ "_") + K) + "_") + Q)~~
	152	+	func R (P) = ("stakedDuckByOwner_" + P)
153	153
154	154
155		-	func T (G) = ("~~landOwner~~_" + G)
	155	+	func S (T,K,P) = ((((("stakedTimeByTypeAssetIdAndOwner_" + T) + "_") + K) + "_") + P)
156	156
157	157
158		-	func U (V) = ("~~backPack~~_" + V)
	158	+	func U (G) = ("landOwner_" + G)
159	159
160	160
161		-	func W (V) = ("~~duckLocation~~_" + V)
	161	+	func V (W) = ("backPack_" + W)
162	162
163	163
164		-	func X (V) = ("~~duckHealth~~_" + V)
	164	+	func X (W) = ("duckLocation_" + W)
165	165
166	166
167		-	func Y () = "~~resTypesProportions~~"
	167	+	func Y (W) = ("duckHealth_" + W)
168	168
169	169
170		-	~~let~~ Z = 0
	170	+	func Z () = "resTypesProportions"
171	171
172		-	let aa = 1
173	172
174		-	let ab = 2
	173	+	let aa = 0
175	174
176		-	let ac = 3
	175	+	let ab = 1
177	176
178		-	let ad = 0
	177	+	let ac = 2
179	178
180		-	let ae = 1
	179	+	let ad = 3
181	180
182		-	let af = 2
	181	+	let ae = 0
183	182
184		-	let ag = 0
	183	+	let af = 1
185	184
186		-	let ah = 1
	185	+	let ag = 2
187	186
188		-	let ai = 2
	187	+	let ah = 0
189	188
190		-	let aj = 3
	189	+	let ai = 1
191	190
192		-	func ak (al) = {
193		-	let c = al
	191	+	let aj = 2
	192	+
	193	+	let ak = 3
	194	+
	195	+	func al (am) = {
	196	+	let c = am
194	197		if ($isInstanceOf(c, "String"))
195	198		then {
196		-	let am = c
197		-	am
	199	+	let an = c
	200	+	an
198	201		}
199	202		else throw("fail to cast into String")
200	203		}
201	204
202	205
203		-	func an (ao) = {
204		-	let ap = split(value(getString(Y())), "_")
205		-	if ((size(ap) != l))
	206	+	func ao (ap) = {
	207	+	let aq = split(value(getString(Z())), "_")
	208	+	if ((size(aq) != l))
206	209		then throw("Wrong proportions data")
207	210		else {
208		-	let aq = [parseIntValue(ap[0]), parseIntValue(ap[1]), parseIntValue(ap[2]), parseIntValue(ap[3]), parseIntValue(ap[4]), parseIntValue(ap[5])]
209		-	let ar = (((((aq[0] + aq[1]) + aq[2]) + aq[3]) + aq[4]) + aq[5])
210		-	if ((0 >= ar))
	211	+	let ar = [parseIntValue(aq[0]), parseIntValue(aq[1]), parseIntValue(aq[2]), parseIntValue(aq[3]), parseIntValue(aq[4]), parseIntValue(aq[5])]
	212	+	let as = (((((ar[0] + ar[1]) + ar[2]) + ar[3]) + ar[4]) + ar[5])
	213	+	if ((0 >= as))
211	214		then throw("No lands staked")
212	215		else {
213		-	let as = fraction(ao, v, ar)
214		-	func at (au,av) = (au :+ fraction(av, as, v))
	216	+	let at = fraction(ap, v, as)
	217	+	func au (av,aw) = (av :+ fraction(aw, at, v))
215	218
216		-	let aw = aq
217		-	let ax = size(aw)
218		-	let ay = nil
219		-	func az (aA,aB) = if ((aB >= ax))
220		-	then aA
221		-	else at(aA, aw[aB])
	219	+	let ax = ar
	220	+	let ay = size(ax)
	221	+	let az = nil
	222	+	func aA (aB,aC) = if ((aC >= ay))
	223	+	then aB
	224	+	else au(aB, ax[aC])
222	225
223		-	func aC (aA,aB) = if ((aB >= ax))
224		-	then aA
	226	+	func aD (aB,aC) = if ((aC >= ay))
	227	+	then aB
225	228		else throw("List size exceeds 6")
226	229
227		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	230	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
228	231		}
229	232		}
230	233		}
231	234
232	235
233		-	func aD (~~aE,~~aF,aG) = {
234		-	let aH = an(aG)
235		-	func aI (au,aJ) = {
236		-	let aK = (parseIntValue(aF[aJ]) - aH[aJ])
237		-	if ((0 > aK))
238		-	then throw(((((("Not enough material idx=" + toString(aJ)) + ", you have ") + aF[aJ]) + ", but need ") + toString(aH[aJ])))
239		-	else (au :+ toString(aK))
	236	+	func aE (aF,aG,aH) = {
	237	+	let aI = ao(aH)
	238	+	func aJ (av,aK) = {
	239	+	let aL = (parseIntValue(aG[aK]) - aI[aK])
	240	+	if ((0 > aL))
	241	+	then throw(((((("Not enough material idx=" + toString(aK)) + ", you have ") + aG[aK]) + ", but need ") + toString(aI[aK])))
	242	+	else (av :+ toString(aL))
240	243		}
241	244
242		-	if (aE)
	245	+	if (aF)
243	246		then {
244		-	let aw = [0, 1, 2, 3, 4, 5]
245		-	let ax = size(aw)
246		-	let ay = nil
247		-	func az (aA,aB) = if ((aB >= ax))
248		-	then aA
249		-	else aI(aA, aw[aB])
	247	+	let ax = [0, 1, 2, 3, 4, 5]
	248	+	let ay = size(ax)
	249	+	let az = nil
	250	+	func aA (aB,aC) = if ((aC >= ay))
	251	+	then aB
	252	+	else aJ(aB, ax[aC])
250	253
251		-	func aC (aA,aB) = if ((aB >= ax))
252		-	then aA
	254	+	func aD (aB,aC) = if ((aC >= ay))
	255	+	then aB
253	256		else throw("List size exceeds 6")
254	257
255		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	258	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
256	259		}
257		-	else aF
	260	+	else aG
258	261		}
259	262
260	263
261		-	func aL (~~aM,~~aN,aO) = {
262		-	let ap = split(valueOrElse(getString(Y()), "0_0_0_0_0_0"), "_")
263		-	if ((size(ap) != l))
	264	+	func aM (aN,aO,aP) = {
	265	+	let aq = split(valueOrElse(getString(Z()), "0_0_0_0_0_0"), "_")
	266	+	if ((size(aq) != l))
264	267		then throw("Wrong proportions data")
265	268		else {
266		-	func aP (au,aQ) = {
267		-	let aK = (parseIntValue(ap[aQ]) + ((aO * aM[aQ]) * aN))
268		-	if ((0 > aK))
269		-	then throw(((((((("Panic! Pieces of type=" + toString(aQ)) + ", sign=") + toString(aO)) + ", terrainCounts[i]=") + toString(aM[aQ])) + ", landSizeIndex=") + toString(aN)))
270		-	else (au :+ toString(aK))
	269	+	func aQ (av,aR) = {
	270	+	let aL = (parseIntValue(aq[aR]) + ((aP * aN[aR]) * aO))
	271	+	if ((0 > aL))
	272	+	then throw(((((((("Panic! Pieces of type=" + toString(aR)) + ", sign=") + toString(aP)) + ", terrainCounts[i]=") + toString(aN[aR])) + ", landSizeIndex=") + toString(aO)))
	273	+	else (av :+ toString(aL))
271	274		}
272	275
273		-	let aq = {
274		-	let aw = [0, 1, 2, 3, 4, 5]
275		-	let ax = size(aw)
276		-	let ay = nil
277		-	func az (aA,aB) = if ((aB >= ax))
278		-	then aA
279		-	else aP(aA, aw[aB])
	276	+	let ar = {
	277	+	let ax = [0, 1, 2, 3, 4, 5]
	278	+	let ay = size(ax)
	279	+	let az = nil
	280	+	func aA (aB,aC) = if ((aC >= ay))
	281	+	then aB
	282	+	else aQ(aB, ax[aC])
280	283
281		-	func aC (aA,aB) = if ((aB >= ax))
282		-	then aA
	284	+	func aD (aB,aC) = if ((aC >= ay))
	285	+	then aB
283	286		else throw("List size exceeds 6")
284	287
285		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	288	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
286	289		}
287		-	makeString(aq, "_")
	290	+	makeString(ar, "_")
288	291		}
289	292		}
290	293
291	294
292		-	func aR (aS) = [(size(split(aS, "A")) - 1), (size(split(aS, "B")) - 1), (size(split(aS, "C")) - 1), (size(split(aS, "D")) - 1), (size(split(aS, "E")) - 1), (size(split(aS, "F")) - 1)]
	295	+	func aS (aT) = [(size(split(aT, "A")) - 1), (size(split(aT, "B")) - 1), (size(split(aT, "C")) - 1), (size(split(aT, "D")) - 1), (size(split(aT, "E")) - 1), (size(split(aT, "F")) - 1)]
293	296
294	297
295		-	func aT (I) = {
	298	+	func aU (I) = {
296	299		let c = I
297	300		if (("S" == c))
298	301		then 25
299	302		else if (("M" == c))
300	303		then 100
301	304		else if (("L" == c))
302	305		then 225
303	306		else if (("XL" == c))
304	307		then 400
305	308		else if (("XXL" == c))
306	309		then 625
307	310		else throw("Unknown land size")
308	311		}
309	312
310	313
311		-	func aU (aV,aJ,aW) = {
312		-	func aX (au,aQ) = (au :+ (if ((aQ == aJ))
313		-	then toString((parseIntValue(aV[aQ]) - aW))
314		-	else aV[aQ]))
	314	+	func aV (aW,aK,aX) = {
	315	+	func aY (av,aR) = (av :+ (if ((aR == aK))
	316	+	then toString((parseIntValue(aW[aR]) - aX))
	317	+	else aW[aR]))
315	318
316		-	let aq = {
317		-	let aw = [0, 1, 2, 3, 4, 5]
318		-	let ax = size(aw)
319		-	let ay = nil
320		-	func az (aA,aB) = if ((aB >= ax))
321		-	then aA
322		-	else aX(aA, aw[aB])
	319	+	let ar = {
	320	+	let ax = [0, 1, 2, 3, 4, 5]
	321	+	let ay = size(ax)
	322	+	let az = nil
	323	+	func aA (aB,aC) = if ((aC >= ay))
	324	+	then aB
	325	+	else aY(aB, ax[aC])
323	326
324		-	func aC (aA,aB) = if ((aB >= ax))
325		-	then aA
	327	+	func aD (aB,aC) = if ((aC >= ay))
	328	+	then aB
326	329		else throw("List size exceeds 6")
327	330
328		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	331	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
329	332		}
330		-	makeString(aq, "_")
	333	+	makeString(ar, "_")
331	334		}
332	335
333	336
334		-	func aY (~~aZ,aM,~~ba,aN,bb) = {
335		-	func bc (au,aQ) = {
336		-	let bd = ((fraction(ba, bb, n) * aM[aQ]) * aN)
337		-	(au :+ toString((parseIntValue(aZ[aQ]) + bd)))
	337	+	func aZ (ba,aN,bb,aO,bc) = {
	338	+	func bd (av,aR) = {
	339	+	let be = ((fraction(bb, bc, n) * aN[aR]) * aO)
	340	+	(av :+ toString((parseIntValue(ba[aR]) + be)))
338	341		}
339	342
340		-	let aq = {
341		-	let aw = [0, 1, 2, 3, 4, 5]
342		-	let ax = size(aw)
343		-	let ay = nil
344		-	func az (aA,aB) = if ((aB >= ax))
345		-	then aA
346		-	else bc(aA, aw[aB])
	343	+	let ar = {
	344	+	let ax = [0, 1, 2, 3, 4, 5]
	345	+	let ay = size(ax)
	346	+	let az = nil
	347	+	func aA (aB,aC) = if ((aC >= ay))
	348	+	then aB
	349	+	else bd(aB, ax[aC])
347	350
348		-	func aC (aA,aB) = if ((aB >= ax))
349		-	then aA
	351	+	func aD (aB,aC) = if ((aC >= ay))
	352	+	then aB
350	353		else throw("List size exceeds 6")
351	354
352		-	aC(az~~(az(az(az(az(az(ay~~, 0), 1), 2), 3), 4), 5), 6)
	355	+	aD(aA(aA(aA(aA(aA(aA(az, 0), 1), 2), 3), 4), 5), 6)
353	356		}
354		-	makeString(aq, "_")
	357	+	makeString(ar, "_")
355	358		}
356	359
357	360
358		-	func be (bf) = if ((bf >= toBigInt(0)))
359		-	then bf
360		-	else -(bf)
	361	+	func bf (bg) = if ((bg >= toBigInt(0)))
	362	+	then bg
	363	+	else -(bg)
361	364
362	365
363		-	let bg = [[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]]
	366	+	let bh = [[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]]
364	367
365		-	func bh (bi,bj) = {
366		-	let bk = toInt((bi % x))
367		-	let bl = if ((bj[0] > bk))
	368	+	func bi (bj,bk) = {
	369	+	let bl = toInt((bj % x))
	370	+	let bm = if ((bk[0] > bl))
368	371		then "A"
369		-	else if ((bj[1] > bk))
	372	+	else if ((bk[1] > bl))
370	373		then "B"
371		-	else if ((bj[2] > bk))
	374	+	else if ((bk[2] > bl))
372	375		then "C"
373		-	else if ((bj[3] > bk))
	376	+	else if ((bk[3] > bl))
374	377		then "D"
375		-	else if ((bj[4] > bk))
	378	+	else if ((bk[4] > bl))
376	379		then "E"
377	380		else "F"

github/deemru/w8io/026f985 
330.50 ms ◑