tx · EJUih26gnK7JcrYUpLPafmH4zxkW3wVuFYk7k8rQG4x6

3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm:  -0.01600000 Waves

2022.12.17 18:54 [2364495] smart account 3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EJUih26gnK7JcrYUpLPafmH4zxkW3wVuFYk7k8rQG4x6",
    "fee": 1600000,
    "feeAssetId": null,
    "timestamp": 1671292469848,
    "version": 2,
    "chainId": 84,
    "sender": "3NDCyBG5q85JuaRiigUeEtainyjCQT3XpZm",
    "senderPublicKey": "EVooykMNV691Venwp1dHUTBd7KWequzUcda57Wd3LQEX",
    "proofs": [
        "Xq9y2g1SimLxFZAD2yyW3rTnX1TebABgZEkkEkHXfWaheEr8cNLrBQLNck6twCFFmVW5mjjrTc1NJJJ6omtizJR"
    ],
    "script": "base64:BgIwCAISABIDCgEIEgASAwoBCBIECgIBCBIECgICAhIECgIBCBIECgIBARIECgIICBIANwAFY2hhaW4JALAJAQkAyQECCQDKAQIIBQR0aGlzBWJ5dGVzAAEAAQALdXNkbkFzc2V0SWQEByRtYXRjaDAFBWNoYWluAwkAAAICAVcFByRtYXRjaDABILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAwkAAAICAVQFByRtYXRjaDABIPd26vf3g8pl224T7gI7z1gplanB0Y3yS9ps2B1igMjeCQACAQINVW5rbm93biBjaGFpbgANaW5jdWJhdG9yQWRkcgQHJG1hdGNoMAUFY2hhaW4DCQAAAgIBVwUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1BFa3RWdXgyUmhjaFNONjNEc0RvNGI0bXo0UXF6S1NlRHYDCQAAAgIBVAUHJG1hdGNoMAUEdGhpcwkAAgECDVVua25vd24gY2hhaW4AC2JyZWVkZXJBZGRyBAckbWF0Y2gwBQVjaGFpbgMJAAACAgFXBQckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUERWdVU0NUg3RWg1ZG10TmJuUk5SU3RHd1VMQTdOWTZIYgMJAAACAgFUBQckbWF0Y2gwBQR0aGlzCQACAQINVW5rbm93biBjaGFpbgALZWNvbm9teUFkZHIEByRtYXRjaDAFBWNoYWluAwkAAAICAVcFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQMnNrMUtuY1N4UmFaczhiNENXR1B3MmprdnZhdjc0dTREAwkAAAICAVQFByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNOOHk0d3hYM0pDNFRkckNKQlhYMTZTaldmNlgyNTZocmVwCQACAQINVW5rbm93biBjaGFpbgADcHViASBPU+IaP1So1p1SThMdRidVvbNT8yx7yVRUsP9DwbQUKAAISEVBTENPU1QAkE4ACkxBTkRQUkVGSVgCBExBTkQACkRVQ0tQUkVGSVgCBERVQ0sAD0RFRkFVTFRMT0NBVElPTgIPQWZyaWNhX0ZfQWZyaWNhAAZOVU1SRVMABgAPREFJTFlSRVNCWVBJRUNFAID40gEACURBWU1JTExJUwCAuJkpABFGSVZFTUlOVVRFU01JTExJUwDgpxIAEFJFU09VUkNFUFJJQ0VNSU4A1dYJAAxFWFBNQVRFUklBTFMAy4DVs8sEAAVGSVZFWAkAtgIBAAUAB1RXRU5UWVgJALYCAQAUAAhUV0VOVFkyWAkAtgIBCQBoAgAUABQACFRXRU5UWTNYCQC2AgEJAGgCCQBoAgAUABQAFAAIVFdFTlRZNFgJALYCAQkAaAIJAGgCCQBoAgAUABQAFAAUAAhUV0VOVFk1WAkAtgIBCQBoAgkAaAIJAGgCCQBoAgAUABQAFAAUABQACG1hdFR5cGVzCQDMCAICBEZ1ZWwJAMwIAgIFTWV0YWwJAMwIAgIFUGxhbmsJAMwIAgIFR2xhc3MJAMwIAgIHUGxhc3RpYwkAzAgCAgdQcm90ZWluBQNuaWwACmNvbnRpbmVudHMJAMwIAgIIQW1lcmljYXMJAMwIAgIGRXVyb3BlCQDMCAICBEFzaWEJAMwIAgIGQWZyaWNhCQDMCAICB09jZWFuaWEFA25pbAESa2V5TmV4dEZyZWVMYW5kTnVtAAILbmV4dExhbmROdW0BEmtleUZyZWVMYW5kTnVtc01hcAACD2ZyZWVMYW5kTnVtc01hcAEQa2V5TGFuZFRvQXNzZXRJZAEHbGFuZE51bQkArAICAgxsYW5kVG9Bc3NldF8FB2xhbmROdW0BCmtleU5mdE5hbWUCB2xhbmROdW0IbGFuZFNpemUJAKwCAgkArAICBQpMQU5EUFJFRklYBQdsYW5kTnVtBQhsYW5kU2l6ZQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQdhc3NldElkCQCsAgICCW5mdE93bmVyXwUHYXNzZXRJZAEQa2V5RHVja0lkVG9Pd25lcgEHYXNzZXRJZAkArAICAgpkdWNrT3duZXJfBQdhc3NldElkARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQdhc3NldElkCQCsAgICC3N0YWtlZFRpbWVfBQdhc3NldElkARRrZXlTdGFrZWREdWNrQnlPd25lcgEJb3duZXJBZGRyCQCsAgICEnN0YWtlZER1Y2tCeU93bmVyXwUJb3duZXJBZGRyASJrZXlTdGFrZWRUaW1lQnlUeXBlQXNzZXRJZEFuZE93bmVyAwduZnRUeXBlB2Fzc2V0SWQJb3duZXJBZGRyCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIgc3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcl8FB25mdFR5cGUCAV8FB2Fzc2V0SWQCAV8FCW93bmVyQWRkcgERa2V5TGFuZE51bVRvT3duZXIBB2xhbmROdW0JAKwCAgIKbGFuZE93bmVyXwUHbGFuZE51bQERa2V5QmFja3BhY2tCeUR1Y2sBC2R1Y2tBc3NldElkCQCsAgICCWJhY2tQYWNrXwULZHVja0Fzc2V0SWQBD2tleUR1Y2tMb2NhdGlvbgELZHVja0Fzc2V0SWQJAKwCAgINZHVja0xvY2F0aW9uXwULZHVja0Fzc2V0SWQBDWtleUR1Y2tIZWFsdGgBC2R1Y2tBc3NldElkCQCsAgICC2R1Y2tIZWFsdGhfBQtkdWNrQXNzZXRJZAAKcmVjTGFuZE51bQAAAAtyZWNMYW5kU2l6ZQABAAtyZWNUZXJyYWlucwACAAxyZWNDb250aW5lbnQAAwAPbG9jSWR4Q29udGluZW50AAAACmxvY0lkeFR5cGUAAQAIbG9jSWR4SWQAAgAKYnBJZHhMZXZlbAAAAAhicElkeFJlcwABAAhicElkeE1hdAACAAlicElkeFByb2QAAwENY291bnRUZXJyYWlucwEIdGVycmFpbnMJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBQQABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUIAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFDAAEJAMwIAgkAZQIJAJADAQkAtQkCBQh0ZXJyYWlucwIBRAABCQDMCAIJAGUCCQCQAwEJALUJAgUIdGVycmFpbnMCAUUAAQkAzAgCCQBlAgkAkAMBCQC1CQIFCHRlcnJhaW5zAgFGAAEFA25pbAEPbnVtUGllY2VzQnlTaXplAQhsYW5kU2l6ZQQHJG1hdGNoMAUIbGFuZFNpemUDCQAAAgIBUwUHJG1hdGNoMAAZAwkAAAICAU0FByRtYXRjaDAAZAMJAAACAgFMBQckbWF0Y2gwAOEBAwkAAAICAlhMBQckbWF0Y2gwAJADAwkAAAICA1hYTAUHJG1hdGNoMADxBAkAAgECEVVua25vd24gbGFuZCBzaXplAQxzdWJPbmVJbkxpc3QDBWFMaXN0A2lkeAZhbW91bnQKAQZzdWJiZXICA2FjYwFpCQDNCAIFA2FjYwMJAAACBQFpBQNpZHgJAKQDAQkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVhTGlzdAUBaQUGYW1vdW50CQCRAwIFBWFMaXN0BQFpBAFyCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUFA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGc3ViYmVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGCQC5CQIFAXICAV8BBmFkZFJlcwQKY3VycmVudFJlcw10ZXJyYWluQ291bnRzCWRlbHRhVGltZQ1sYW5kU2l6ZUluZGV4CgEFYWRkZXICA2FjYwFpBAlyZXNPZlR5cGUJAGgCCQBoAgkAawMFCWRlbHRhVGltZQUPREFJTFlSRVNCWVBJRUNFBQlEQVlNSUxMSVMJAJEDAgUNdGVycmFpbkNvdW50cwUBaQUNbGFuZFNpemVJbmRleAkAzQgCBQNhY2MJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpjdXJyZW50UmVzBQFpBQlyZXNPZlR5cGUEAXIKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQVhZGRlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgkAuQkCBQFyAgFfAQNhYnMBAXgDCQDAAgIFAXgJALYCAQAABQF4CQC+AgEFAXgABGZyZXEJAMwIAgkAzAgCAAEJAMwIAgAECQDMCAIACQkAzAgCAAoJAMwIAgAPBQNuaWwJAMwIAgkAzAgCAAUJAMwIAgAICQDMCAIADQkAzAgCAA4JAMwIAgAPBQNuaWwJAMwIAgkAzAgCAAYJAMwIAgAJCQDMCAIADgkAzAgCAA8JAMwIAgAQBQNuaWwJAMwIAgkAzAgCAAQJAMwIAgAHCQDMCAIACAkAzAgCAA0JAMwIAgASBQNuaWwJAMwIAgkAzAgCAAEJAMwIAgAGCQDMCAIABwkAzAgCAA8JAMwIAgATBQNuaWwFA25pbAEHZ2VuQ2hhcgIBbgxjb250aW5lbnRJZHgEA3JlbQkAoAMBCQC7AgIFAW4FB1RXRU5UWVgEBmxldHRlcgMJAGYCCQCRAwIJAJEDAgUEZnJlcQUMY29udGluZW50SWR4AAAFA3JlbQIBQQMJAGYCCQCRAwIJAJEDAgUEZnJlcQUMY29udGluZW50SWR4AAEFA3JlbQIBQgMJAGYCCQCRAwIJAJEDAgUEZnJlcQUMY29udGluZW50SWR4AAIFA3JlbQIBQwMJAGYCCQCRAwIJAJEDAgUEZnJlcQUMY29udGluZW50SWR4AAMFA3JlbQIBRAMJAGYCCQCRAwIJAJEDAgUEZnJlcQUMY29udGluZW50SWR4AAQFA3JlbQIBRQIBRgUGbGV0dGVyCgFpAQlzdGFrZUxhbmQABANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIIBQNwbXQGYW1vdW50AAEJAAIBCQCsAgIJAKwCAgIETkZUIAUKTEFORFBSRUZJWAIkIHRva2VuIHNob3VsZCBiZSBhdHRhY2hlZCBhcyBwYXltZW50BAVhc3NldAkBBXZhbHVlAQkA7AcBBQdhc3NldElkAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUEdGhpcwkAAgECF1Vua25vd24gaXNzdWVyIG9mIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKTEFORFBSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkxBTkRQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAtsYW5kTnVtU2l6ZQkAsAICCAUFYXNzZXQEbmFtZQAEBAdsYW5kTnVtAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCA1hYTAkAswICBQtsYW5kTnVtU2l6ZQADAwkBCGNvbnRhaW5zAgULbGFuZE51bVNpemUCAlhMCQCzAgIFC2xhbmROdW1TaXplAAIJALMCAgULbGFuZE51bVNpemUAAQMJAQEhAQkBCWlzRGVmaW5lZAEJALYJAQUHbGFuZE51bQkAAgEJAKwCAgIeQ2Fubm90IHBhcnNlIGxhbmQgbnVtYmVyIGZyb20gCAUFYXNzZXQEbmFtZQQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBCQDYBAEFB2Fzc2V0SWQDCQEJaXNEZWZpbmVkAQkAnwgBBQd0aW1lS2V5CQACAQkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAhIgaXMgYWxyZWFkeSBzdGFrZWQJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgJANgEAQUHYXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFWtleUxhbmRBc3NldElkVG9Pd25lcgEJANgEAQUHYXNzZXRJZAUHYWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQERa2V5TGFuZE51bVRvT3duZXIBBQdsYW5kTnVtBQdhZGRyZXNzBQNuaWwBaQELdW5zdGFrZUxhbmQBC2xhbmRBc3NldElkAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIkdW5zdGFrZSBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBAdhc3NldElkCQDZBAEFC2xhbmRBc3NldElkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQFYXNzZXQJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAMJAQIhPQIIBQVhc3NldAZpc3N1ZXIFBHRoaXMJAAIBAhdVbmtub3duIGlzc3VlciBvZiB0b2tlbgMJAQEhAQkBCGNvbnRhaW5zAggFBWFzc2V0BG5hbWUFCkxBTkRQUkVGSVgJAAIBCQCsAgIJAKwCAgIJT25seSBORlQgBQpMQU5EUFJFRklYAhcgdG9rZW5zIGNhbiBiZSB1bnN0YWtlZAQHdGltZUtleQkBFmtleVN0YWtlZFRpbWVCeUFzc2V0SWQBBQtsYW5kQXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQtsYW5kQXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUHYWRkcmVzcwkAAgECF1N0YWtlZCBORlQgaXMgbm90IHlvdXJzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEFB3RpbWVLZXkJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpMQU5EUFJFRklYBQtsYW5kQXNzZXRJZAUHYWRkcmVzcwUDbmlsAWkBCXN0YWtlRHVjawAEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AggFA3BtdAZhbW91bnQAAQkAAgEJAKwCAgkArAICAgRORlQgBQpEVUNLUFJFRklYAiQgdG9rZW4gc2hvdWxkIGJlIGF0dGFjaGVkIGFzIHBheW1lbnQEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUNaW5jdWJhdG9yQWRkcgkBAiE9AggFBWFzc2V0Bmlzc3VlcgULYnJlZWRlckFkZHIHCQACAQkArAICCQCsAgICElVua25vd24gaXNzdWVyIG9mIAUKRFVDS1BSRUZJWAIGIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKRFVDS1BSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkRVQ0tQUkVGSVgCFCB0b2tlbnMgYXJlIGFjY2VwdGVkBAphc3NldElkU3RyCQDYBAEFB2Fzc2V0SWQEB3RpbWVLZXkJARZrZXlTdGFrZWRUaW1lQnlBc3NldElkAQUKYXNzZXRJZFN0cgMJAQlpc0RlZmluZWQBCQCfCAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCEiBpcyBhbHJlYWR5IHN0YWtlZAMJAQlpc0RlZmluZWQBCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MJAAIBCQCsAgICHVlvdSBhbHJlYWR5IHN0YWtlZCBvbmUgZHVjazogCAUFYXNzZXQEbmFtZQQGbG9jS2V5CQEPa2V5RHVja0xvY2F0aW9uAQUKYXNzZXRJZFN0cgQIbG9jYXRpb24JAKIIAQUGbG9jS2V5BAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQUKYXNzZXRJZFN0cgQGaGVhbHRoCQCfCAEFCWtleUhlYWx0aAQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFCmFzc2V0SWRTdHIECGJhY2twYWNrCQCiCAEFBWJwS2V5CQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkRVQ0tQUkVGSVgJANgEAQUHYXNzZXRJZAUHYWRkcmVzcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEGtleUR1Y2tJZFRvT3duZXIBBQphc3NldElkU3RyBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MFCmFzc2V0SWRTdHIFA25pbAMJAQlpc0RlZmluZWQBBQhsb2NhdGlvbgUDbmlsCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUGbG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04FA25pbAMJAQlpc0RlZmluZWQBBQZoZWFsdGgFA25pbAkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgAZAUDbmlsAwkBCWlzRGVmaW5lZAEFCGJhY2twYWNrBQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6BQNuaWwBaQELdW5zdGFrZUR1Y2sBCmFzc2V0SWRTdHIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAiR1bnN0YWtlIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMEB2Fzc2V0SWQJANkEAQUKYXNzZXRJZFN0cgQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQDAwkBAiE9AggFBWFzc2V0Bmlzc3VlcgUNaW5jdWJhdG9yQWRkcgkBAiE9AggFBWFzc2V0Bmlzc3VlcgULYnJlZWRlckFkZHIHCQACAQkArAICCQCsAgICElVua25vd24gaXNzdWVyIG9mIAUKRFVDS1BSRUZJWAIGIHRva2VuAwkBASEBCQEIY29udGFpbnMCCAUFYXNzZXQEbmFtZQUKRFVDS1BSRUZJWAkAAgEJAKwCAgkArAICAglPbmx5IE5GVCAFCkRVQ0tQUkVGSVgCFyB0b2tlbnMgY2FuIGJlIHVuc3Rha2VkBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEJANgEAQUHYXNzZXRJZAMJAQEhAQkBCWlzRGVmaW5lZAEFB3RpbWVLZXkJAAIBCQCsAgIJAKwCAgIETkZUIAgFBWFzc2V0BG5hbWUCDiBpcyBub3Qgc3Rha2VkAwkBASEBCQEJaXNEZWZpbmVkAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUHYWRkcmVzcwkAAgEJAKwCAgkArAICAglUaGUgZHVjayAIBQVhc3NldARuYW1lAg4gaXMgbm90IHN0YWtlZAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEQa2V5RHVja0lkVG9Pd25lcgEJANgEAQUHYXNzZXRJZAkArAICCQCsAgICBE5GVCAIBQVhc3NldARuYW1lAgwgaXMgb3JwaGFuZWQDCQECIT0CBQVvd25lcgUHYWRkcmVzcwkAAgECF1N0YWtlZCBORlQgaXMgbm90IHlvdXJzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEFB3RpbWVLZXkJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBD2tleUR1Y2tMb2NhdGlvbgEFCmFzc2V0SWRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBImtleVN0YWtlZFRpbWVCeVR5cGVBc3NldElkQW5kT3duZXIDBQpEVUNLUFJFRklYBQphc3NldElkU3RyBQdhZGRyZXNzCQDMCAIJAQtEZWxldGVFbnRyeQEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEFB2FkZHJlc3MFA25pbAFpAQhjbGFpbVJlcwIGYW1vdW50C2xhbmRBc3NldElkAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIlY2xhaW1SZXMgZG9lc24ndCByZXF1aXJlIGFueSBwYXltZW50cwQEYWRkcgkApQgBCAUBaQZjYWxsZXIEBWFzc2V0CQEFdmFsdWUBCQDsBwEJANkEAQULbGFuZEFzc2V0SWQDCQEBIQEJAQhjb250YWlucwIIBQVhc3NldARuYW1lBQpMQU5EUFJFRklYCQACAQkArAICCQCsAgICBE5GVCAFCkxBTkRQUkVGSVgCICB0b2tlbiBzaG91bGQgYmUgcGFzc2VkIGFzIHBhcmFtBAd0aW1lS2V5CQEWa2V5U3Rha2VkVGltZUJ5QXNzZXRJZAEFC2xhbmRBc3NldElkBAlzYXZlZFRpbWUJAJ8IAQUHdGltZUtleQMJAQEhAQkBCWlzRGVmaW5lZAEFCXNhdmVkVGltZQkAAgEJAKwCAgkArAICAgRORlQgCAUFYXNzZXQEbmFtZQIOIGlzIG5vdCBzdGFrZWQEBW93bmVyCQERQGV4dHJOYXRpdmUoMTA1OCkBCQEVa2V5TGFuZEFzc2V0SWRUb093bmVyAQULbGFuZEFzc2V0SWQDCQECIT0CBQVvd25lcgUEYWRkcgkAAgEJAKwCAgUKTEFORFBSRUZJWAINIGlzIG5vdCB5b3VycwQBZAkAtQkCCAUFYXNzZXQLZGVzY3JpcHRpb24CAV8ECGxhbmRTaXplCQCRAwIFAWQFC3JlY0xhbmRTaXplBA10ZXJyYWluQ291bnRzCQENY291bnRUZXJyYWlucwEJAJEDAgUBZAULcmVjVGVycmFpbnMEBGR1Y2sJAKIIAQkBFGtleVN0YWtlZER1Y2tCeU93bmVyAQUEYWRkcgMJAQEhAQkBCWlzRGVmaW5lZAEFBGR1Y2sJAAIBAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBA5kdWNrQXNzZXRJZFN0cgkBBXZhbHVlAQUEZHVjawQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQkBD2tleUR1Y2tMb2NhdGlvbgEFDmR1Y2tBc3NldElkU3RyBQ9ERUZBVUxUTE9DQVRJT04EA2xvYwkAtQkCCQEFdmFsdWUBBQtjdXJMb2NhdGlvbgIBXwMJAQIhPQIJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAgFMCQACAQkArAICCQCsAgICFkR1Y2sgbG9jYXRpb24gdHlwZSBpcyAJAJEDAgUDbG9jBQpsb2NJZHhUeXBlAhEsIGJ1dCBzaG91bGQgYmUgTAMJAQIhPQIJAJEDAgUDbG9jBQhsb2NJZHhJZAULbGFuZEFzc2V0SWQJAAIBCQCsAgIJAKwCAgkArAICAhREdWNrIGxvY2F0aW9uIGlkIGlzIAkAkQMCBQNsb2MFCGxvY0lkeElkAhAsIGJ1dCBzaG91bGQgYmUgBQtsYW5kQXNzZXRJZAQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAQV2YWx1ZQEFCXNhdmVkVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEJAQV2YWx1ZQEFCXNhdmVkVGltZQIMLCBjdXJyZW50ID0gCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAZwaWVjZXMJAQ9udW1QaWVjZXNCeVNpemUBBQhsYW5kU2l6ZQQIYXZhaWxSZXMJAGgCCQBrAwUJZGVsdGFUaW1lBQ9EQUlMWVJFU0JZUElFQ0UFCURBWU1JTExJUwUGcGllY2VzAwkAZgIFBmFtb3VudAUIYXZhaWxSZXMJAAIBCQCsAgIJAKwCAgkArAICAiJOb3QgZW5vdWdoIHJlc291cmNlcywgYXZhaWxhYmxlID0gCQCkAwEFCGF2YWlsUmVzAg4sIHJlcXVlc3RlZCA9IAkApAMBBQZhbW91bnQEDG5ld0RlbHRhVGltZQkAawMJAGUCBQhhdmFpbFJlcwUGYW1vdW50BQlEQVlNSUxMSVMJAGgCBQZwaWVjZXMFD0RBSUxZUkVTQllQSUVDRQQMbmV3VGltZXN0YW1wCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFDG5ld0RlbHRhVGltZQQFYnBLZXkJARFrZXlCYWNrcGFja0J5RHVjawEFDmR1Y2tBc3NldElkU3RyBAtjdXJyZW50UGFjawkAtQkCCQELdmFsdWVPckVsc2UCCQCiCAEFBWJwS2V5AhowOjBfMF8wXzBfMF8wOjBfMF8wXzBfMF8wOgIBOgQKY3VycmVudFJlcwkAtQkCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwIBXwQFYnBSZXMJAQZhZGRSZXMEBQpjdXJyZW50UmVzBQ10ZXJyYWluQ291bnRzCQBlAgUJZGVsdGFUaW1lBQxuZXdEZWx0YVRpbWUJAGkCBQZwaWVjZXMAGQQHbmV3UGFjawkAuQkCCQDMCAIJAJEDAgULY3VycmVudFBhY2sFCmJwSWR4TGV2ZWwJAMwIAgUFYnBSZXMJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQVicEtleQUHbmV3UGFjawkAzAgCCQEMSW50ZWdlckVudHJ5AgUHdGltZUtleQUMbmV3VGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEia2V5U3Rha2VkVGltZUJ5VHlwZUFzc2V0SWRBbmRPd25lcgMFCkxBTkRQUkVGSVgFC2xhbmRBc3NldElkBQVvd25lcgUMbmV3VGltZXN0YW1wBQNuaWwFBHVuaXQBaQEGZmxpZ2h0AgdtZXNzYWdlA3NpZwMJAQEhAQkAxBMDBQdtZXNzYWdlBQNzaWcFA3B1YgkAAgECGHNpZ25hdHVyZSBkb2VzIG5vdCBtYXRjaAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECI2ZsaWdodCBkb2Vzbid0IHJlcXVpcmUgYW55IHBheW1lbnRzBAVwYXJ0cwkAtQkCCQCwCQEFB21lc3NhZ2UCATsEAmhwCQC1CQIJAJEDAgkAtQkCCQCRAwIFBXBhcnRzAAACAXwAAAIBXwQFY3VySFAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQJocAAABAVuZXdIUAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAmhwAAEEDW5ld0xvY0FuZFRpbWUJALUJAgkAkQMCBQVwYXJ0cwABAgE6BAtuZXdMb2NhdGlvbgkAkQMCBQ1uZXdMb2NBbmRUaW1lAAAEBHRpbWUJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ1uZXdMb2NBbmRUaW1lAAEDAwkAZgIFBHRpbWUJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAURRklWRU1JTlVURVNNSUxMSVMGCQBmAgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBRFGSVZFTUlOVVRFU01JTExJUwUEdGltZQkAAgECEnNpZ25hdHVyZSBvdXRkYXRlZAQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBCQClCAEIBQFpBmNhbGxlcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAxvbGRGcm9tU3RhdGUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoAGQDCQECIT0CBQxvbGRGcm9tU3RhdGUFBWN1ckhQCQACAQkArAICCQCsAgIJAKwCAgIKb2xkSGVhbHRoPQkApAMBCQELdmFsdWVPckVsc2UCCQCfCAEFCWtleUhlYWx0aABkAi8gZnJvbSBzdGF0ZSBkb2VzIG5vdCBtYXRjaCBvbmUgZnJvbSBmbGlnaHQgbG9nPQkApAMBBQVjdXJIUAMJAGcCAAAFBWN1ckhQCQACAQIeWW91IGNhbid0IGZseSB3aXRoIHplcm8gaGVhbHRoBAZsb2NLZXkJAQ9rZXlEdWNrTG9jYXRpb24BBQtkdWNrQXNzZXRJZAQLY3VyTG9jYXRpb24JAQt2YWx1ZU9yRWxzZQIJAKIIAQUGbG9jS2V5BQ9ERUZBVUxUTE9DQVRJT04DCQAAAgULbmV3TG9jYXRpb24FC2N1ckxvY2F0aW9uCQACAQIiWW91IGNhbid0IGZseSB0byB0aGUgc2FtZSBsb2NhdGlvbgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmxvY0tleQMJAGYCBQVuZXdIUAAABQtuZXdMb2NhdGlvbgULY3VyTG9jYXRpb24JAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUhlYWx0aAUFbmV3SFAFA25pbAUEdW5pdAFpAQlzZXRIZWFsdGgCBmhlYWx0aAtkdWNrQXNzZXRJZAMDCQBmAgAABQZoZWFsdGgGCQBmAgUGaGVhbHRoAGQJAAIBAhpIUCBzaG91bGQgYmUgd2l0aGluIDAuLjEwMAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDWtleUR1Y2tIZWFsdGgBBQtkdWNrQXNzZXRJZAUGaGVhbHRoBQNuaWwBaQEEaGVhbAIHbWF0VHlwZQZhbW91bnQDAwkAZgIAAAUHbWF0VHlwZQYJAGcCBQdtYXRUeXBlBQZOVU1SRVMJAAIBCQCsAgICElVua25vd24gbWF0ZXJpYWw6IAkApAMBBQdtYXRUeXBlAwkAZwIAAAUGYW1vdW50CQACAQkArAICAhtBbW91bnQgc2hvdWxkIGJlIHBvc2l0aXZlISAJAKQDAQUGYW1vdW50BAtkdWNrQXNzZXRJZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARRrZXlTdGFrZWREdWNrQnlPd25lcgEJAKUIAQgFAWkGY2FsbGVyAhxZb3UgZG9uJ3QgaGF2ZSBhIGR1Y2sgc3Rha2VkBAlrZXlIZWFsdGgJAQ1rZXlEdWNrSGVhbHRoAQULZHVja0Fzc2V0SWQECW9sZEhlYWx0aAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlrZXlIZWFsdGgAZAMJAGcCBQlvbGRIZWFsdGgAZAkAAgECGkhQIHNob3VsZCBiZSA8IDEwMCB0byBoZWFsBAVicEtleQkBEWtleUJhY2twYWNrQnlEdWNrAQULZHVja0Fzc2V0SWQEC2N1cnJlbnRQYWNrCQC1CQIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUFYnBLZXkCGjA6MF8wXzBfMF8wXzA6MF8wXzBfMF8wXzA6AgE6BAdtYXRMaXN0CQC1CQIJAJEDAgULY3VycmVudFBhY2sFCGJwSWR4TWF0AgFfBAVtTGlzdAMJAQIhPQIJAJADAQUHbWF0TGlzdAUGTlVNUkVTCQDMCAICATAJAMwIAgIBMAkAzAgCAgEwCQDMCAICATAJAMwIAgIBMAkAzAgCAgEwBQNuaWwFB21hdExpc3QEDWN1cnJlbnRBbW91bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQVtTGlzdAUHbWF0VHlwZQQLZGVsdGFIZWFsdGgJAJcDAQkAzAgCCQBpAgUGYW1vdW50BQhIRUFMQ09TVAkAzAgCCQBlAgBkBQlvbGRIZWFsdGgFA25pbAQLc3BlbmRBbW91bnQJAGgCBQtkZWx0YUhlYWx0aAUISEVBTENPU1QDCQBmAgULc3BlbmRBbW91bnQFDWN1cnJlbnRBbW91bnQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIJWW91IG5lZWQgCQCkAwEFC3NwZW5kQW1vdW50AgQgb2YgCQCRAwIFCG1hdFR5cGVzBQdtYXRUeXBlAiQgdG8gaGVhbCwgYnV0IHlvdSBiYWNrcGFjayBjb250YWlucyAJAKQDAQUNY3VycmVudEFtb3VudAQGbmV3TWF0CQEMc3ViT25lSW5MaXN0AwUFbUxpc3QFB21hdFR5cGUFC3NwZW5kQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlrZXlIZWFsdGgJAGQCBQlvbGRIZWFsdGgFC2RlbHRhSGVhbHRoCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWJwS2V5CQC5CQIJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUKYnBJZHhMZXZlbAkAzAgCCQCRAwIFC2N1cnJlbnRQYWNrBQhicElkeFJlcwkAzAgCBQZuZXdNYXQJAMwIAgkAkQMCBQtjdXJyZW50UGFjawUJYnBJZHhQcm9kBQNuaWwCAToFA25pbAFpAQ51cGRhdGVCYWNrcGFjawILZHVja0Fzc2V0SWQHbmV3UGFjawMJAQIhPQIIBQFpBmNhbGxlcgULZWNvbm9teUFkZHIJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJARFrZXlCYWNrcGFja0J5RHVjawEFC2R1Y2tBc3NldElkBQduZXdQYWNrBQNuaWwFB25ld1BhY2sBaQEKZXhwZWRpdGlvbgADCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAidleHBlZGl0aW9uIGRvZXNuJ3QgcmVxdWlyZSBhbnkgcGF5bWVudHMECHVzZXJBZGRyCQClCAEIBQFpBmNhbGxlcgQLZHVja0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5U3Rha2VkRHVja0J5T3duZXIBBQh1c2VyQWRkcgIcWW91IGRvbid0IGhhdmUgYSBkdWNrIHN0YWtlZAQJa2V5SGVhbHRoCQENa2V5RHVja0hlYWx0aAEFC2R1Y2tBc3NldElkBAZoZWFsdGgJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJa2V5SGVhbHRoAGQDCQBnAgAABQZoZWFsdGgJAAIBAhdZb3VyIGR1Y2sgbmVlZHMgaGVhbGluZwQLY3VycmVudFBhY2sJALUJAgkBC3ZhbHVlT3JFbHNlAgkAoggBCQERa2V5QmFja3BhY2tCeUR1Y2sBBQtkdWNrQXNzZXRJZAIaMDowXzBfMF8wXzBfMDowXzBfMF8wXzBfMDoCAToEB21hdExpc3QJALUJAgkAkQMCBQtjdXJyZW50UGFjawUIYnBJZHhNYXQCAV8ECHRvdGFsTWF0CQBkAgkAZAIJAGQCCQBkAgkAZAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0AAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0AAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0AAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0AAMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0AAQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdtYXRMaXN0AAUEBG51bXMJAL0JAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJARJrZXlGcmVlTGFuZE51bXNNYXAACQCsAgIJARJrZXlGcmVlTGFuZE51bXNNYXAAAhMgaXMgbm90IGluaXRpYWxpemVkAgFfBANsZW4JAJADAQUEbnVtcwQGYmlnTnVtCQEDYWJzAQkAngMBCAUBaQ10cmFuc2FjdGlvbklkBBBudW1BY3Rpb25BbmRTZWVkAwkAAAIFA2xlbgAABAdmcmVlTnVtCQELdmFsdWVPckVsc2UCCQCfCAEJARJrZXlOZXh0RnJlZUxhbmROdW0AAPUDCQCVCgMJAKQDAQUHZnJlZU51bQkBDEludGVnZXJFbnRyeQIJARJrZXlOZXh0RnJlZUxhbmROdW0ACQBkAgUHZnJlZU51bQABBQZiaWdOdW0EAXEJALYCAQUDbGVuBAZtYXBJZHgJAKADAQkAuwICBQZiaWdOdW0FAXEJAJUKAwkAkQMCBQRudW1zBQZtYXBJZHgJAQtTdHJpbmdFbnRyeQIJARJrZXlGcmVlTGFuZE51bXNNYXAACQC7CQIJANEIAgUEbnVtcwUGbWFwSWR4AgFfCQC6AgIFBmJpZ051bQUBcQQMY29udGluZW50SWR4CQCgAwEJALsCAggFEG51bUFjdGlvbkFuZFNlZWQCXzMFBUZJVkVYCgEQdGVycmFpbkdlbmVyYXRvcgIDYWNjBGVsZW0JAJQKAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIIBQNhY2MCXzEJAQdnZW5DaGFyAggFA2FjYwJfMgUMY29udGluZW50SWR4CQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUHVFdFTlRZWAUMY29udGluZW50SWR4CQEHZ2VuQ2hhcgIJALoCAggFA2FjYwJfMgUIVFdFTlRZMlgFDGNvbnRpbmVudElkeAkBB2dlbkNoYXICCQC6AgIIBQNhY2MCXzIFCFRXRU5UWTNYBQxjb250aW5lbnRJZHgJAQdnZW5DaGFyAgkAugICCAUDYWNjAl8yBQhUV0VOVFk0WAUMY29udGluZW50SWR4CQC6AgIIBQNhY2MCXzIFCFRXRU5UWTVYBAF0CgACJGwJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAgAJALoCAgUGYmlnTnVtBQVGSVZFWAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEQdGVycmFpbkdlbmVyYXRvcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUEBWlzc3VlCQDCCAUJAQprZXlOZnROYW1lAggFEG51bUFjdGlvbkFuZFNlZWQCXzECAVMJALkJAgkAzAgCCAUQbnVtQWN0aW9uQW5kU2VlZAJfMQkAzAgCAgFTCQDMCAIIBQF0Al8xCQDMCAIJAJEDAgUKY29udGluZW50cwUMY29udGluZW50SWR4BQNuaWwCAV8AAQAABwQHYXNzZXRJZAkAuAgBBQVpc3N1ZQQCaWQJANgEAQUHYXNzZXRJZAkAlAoCCQDMCAIIBRBudW1BY3Rpb25BbmRTZWVkAl8yCQDMCAIFBWlzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBrZXlMYW5kVG9Bc3NldElkAQgFEG51bUFjdGlvbkFuZFNlZWQCXzEFAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARVrZXlMYW5kQXNzZXRJZFRvT3duZXIBBQJpZAUIdXNlckFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBEWtleUxhbmROdW1Ub093bmVyAQgFEG51bUFjdGlvbkFuZFNlZWQCXzEFCHVzZXJBZGRyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkBQNuaWwFBHVuaXQAWzI7KQ==",
    "height": 2364495,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7wP2j5BUYgypJyKj5Jfj2m6vHu2X8fzCScUFfYcwZnES
Next: FexwAejT51B3YHBFn68M9YAGXZjjCPYDjF44bVaeCseG

Diff: 

OldNewDifferences
5757 
5858 let FIVEMINUTESMILLIS = 300000
5959 
60+let RESOURCEPRICEMIN = 158549
61+
62+let EXPMATERIALS = 157679960139
63+
64+let FIVEX = toBigInt(5)
65+
66+let TWENTYX = toBigInt(20)
67+
68+let TWENTY2X = toBigInt((20 * 20))
69+
70+let TWENTY3X = toBigInt(((20 * 20) * 20))
71+
72+let TWENTY4X = toBigInt((((20 * 20) * 20) * 20))
73+
74+let TWENTY5X = toBigInt(((((20 * 20) * 20) * 20) * 20))
75+
6076 let matTypes = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
6177 
62-func keyAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
78+let continents = ["Americas", "Europe", "Asia", "Africa", "Oceania"]
79+
80+func keyNextFreeLandNum () = "nextLandNum"
81+
82+
83+func keyFreeLandNumsMap () = "freeLandNumsMap"
84+
85+
86+func keyLandToAssetId (landNum) = ("landToAsset_" + landNum)
87+
88+
89+func keyNftName (landNum,landSize) = ((LANDPREFIX + landNum) + landSize)
90+
91+
92+func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
6393 
6494 
6595 func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
74104 func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("stakedTimeByTypeAssetIdAndOwner_" + nftType) + "_") + assetId) + "_") + ownerAddr)
75105 
76106 
77-func keyLandToOwner (landNum) = ("landOwner_" + landNum)
107+func keyLandNumToOwner (landNum) = ("landOwner_" + landNum)
78108 
79109 
80110 func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
174204     }
175205 
176206 
207+func abs (x) = if ((x >= toBigInt(0)))
208+    then x
209+    else -(x)
210+
211+
212+let freq = [[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]]
213+
214+func genChar (n,continentIdx) = {
215+    let rem = toInt((n % TWENTYX))
216+    let letter = if ((freq[continentIdx][0] > rem))
217+        then "A"
218+        else if ((freq[continentIdx][1] > rem))
219+            then "B"
220+            else if ((freq[continentIdx][2] > rem))
221+                then "C"
222+                else if ((freq[continentIdx][3] > rem))
223+                    then "D"
224+                    else if ((freq[continentIdx][4] > rem))
225+                        then "E"
226+                        else "F"
227+    letter
228+    }
229+
230+
177231 @Callable(i)
178232 func stakeLand () = {
179233     let pmt = value(i.payments[0])
200254                                 let timeKey = keyStakedTimeByAssetId(toBase58String(assetId))
201255                                 if (isDefined(getInteger(timeKey)))
202256                                     then throw((("NFT " + asset.name) + " is already staked"))
203-                                    else [IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyAssetIdToOwner(toBase58String(assetId)), address), StringEntry(keyLandToOwner(landNum), address)]
257+                                    else [IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyLandAssetIdToOwner(toBase58String(assetId)), address), StringEntry(keyLandNumToOwner(landNum), address)]
204258                                 }
205259                         }
206260             }
224278                     if (!(isDefined(timeKey)))
225279                         then throw((("NFT " + asset.name) + " is not staked"))
226280                         else {
227-                            let owner = valueOrErrorMessage(getString(keyAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
281+                            let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
228282                             if ((owner != address))
229283                                 then throw("Staked NFT is not yours")
230284                                 else [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(timeKey), DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, address))]
321375                 if (!(isDefined(savedTime)))
322376                     then throw((("NFT " + asset.name) + " is not staked"))
323377                     else {
324-                        let owner = getStringValue(keyAssetIdToOwner(landAssetId))
378+                        let owner = getStringValue(keyLandAssetIdToOwner(landAssetId))
325379                         if ((owner != addr))
326380                             then throw((LANDPREFIX + " is not yours"))
327381                             else {
456510     else $Tuple2([StringEntry(keyBackpackByDuck(duckAssetId), newPack)], newPack)
457511 
458512 
513+
514+@Callable(i)
515+func expedition () = if ((size(i.payments) != 0))
516+    then throw("expedition doesn't require any payments")
517+    else {
518+        let userAddr = toString(i.caller)
519+        let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
520+        let keyHealth = keyDuckHealth(duckAssetId)
521+        let health = valueOrElse(getInteger(keyHealth), 100)
522+        if ((0 >= health))
523+            then throw("Your duck needs healing")
524+            else {
525+                let currentPack = split(valueOrElse(getString(keyBackpackByDuck(duckAssetId)), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
526+                let matList = split(currentPack[bpIdxMat], "_")
527+                let totalMat = (((((parseIntValue(matList[0]) + parseIntValue(matList[1])) + parseIntValue(matList[2])) + parseIntValue(matList[3])) + parseIntValue(matList[4])) + parseIntValue(matList[5]))
528+                let nums = split_51C(valueOrErrorMessage(getString(keyFreeLandNumsMap()), (keyFreeLandNumsMap() + " is not initialized")), "_")
529+                let len = size(nums)
530+                let bigNum = abs(toBigInt(i.transactionId))
531+                let numActionAndSeed = if ((len == 0))
532+                    then {
533+                        let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), 501)
534+                        $Tuple3(toString(freeNum), IntegerEntry(keyNextFreeLandNum(), (freeNum + 1)), bigNum)
535+                        }
536+                    else {
537+                        let q = toBigInt(len)
538+                        let mapIdx = toInt((bigNum % q))
539+                        $Tuple3(nums[mapIdx], StringEntry(keyFreeLandNumsMap(), makeString_11C(removeByIndex(nums, mapIdx), "_")), (bigNum / q))
540+                        }
541+                let continentIdx = toInt((numActionAndSeed._3 % FIVEX))
542+                func terrainGenerator (acc,elem) =                 $Tuple2((((((acc._1 + genChar(acc._2, continentIdx)) + genChar((acc._2 / TWENTYX), continentIdx)) + genChar((acc._2 / TWENTY2X), continentIdx)) + genChar((acc._2 / TWENTY3X), continentIdx)) + genChar((acc._2 / TWENTY4X), continentIdx)), (acc._2 / TWENTY5X))
543+
544+                let t = {
545+                    let $l = [1, 2, 3, 4, 5]
546+                    let $s = size($l)
547+                    let $acc0 = $Tuple2("", (bigNum / FIVEX))
548+                    func $f0_1 ($a,$i) =                     if (($i >= $s))
549+                        then $a
550+                        else terrainGenerator($a, $l[$i])
551+
552+                    func $f0_2 ($a,$i) =                     if (($i >= $s))
553+                        then $a
554+                        else throw("List size exceeds 5")
555+
556+                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
557+                    }
558+                let issue = Issue(keyNftName(numActionAndSeed._1, "S"), makeString([numActionAndSeed._1, "S", t._1, continents[continentIdx]], "_"), 1, 0, false)
559+                let assetId = calculateAssetId(issue)
560+                let id = toBase58String(assetId)
561+                $Tuple2([numActionAndSeed._2, issue, StringEntry(keyLandToAssetId(numActionAndSeed._1), id), StringEntry(keyLandAssetIdToOwner(id), userAddr), StringEntry(keyLandNumToOwner(numActionAndSeed._1), userAddr), ScriptTransfer(i.caller, 1, assetId)], unit)
562+                }
563+        }
564+
565+

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let chain = toUtf8String(take(drop(this.bytes, 1), 1))
55 
66 let usdnAssetId = match chain {
77     case _ => 
88         if (("W" == $match0))
99             then base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
1010             else if (("T" == $match0))
1111                 then base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
1212                 else throw("Unknown chain")
1313 }
1414 
1515 let incubatorAddr = match chain {
1616     case _ => 
1717         if (("W" == $match0))
1818             then addressFromStringValue("3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv")
1919             else if (("T" == $match0))
2020                 then this
2121                 else throw("Unknown chain")
2222 }
2323 
2424 let breederAddr = match chain {
2525     case _ => 
2626         if (("W" == $match0))
2727             then addressFromStringValue("3PDVuU45H7Eh5dmtNbnRNRStGwULA7NY6Hb")
2828             else if (("T" == $match0))
2929                 then this
3030                 else throw("Unknown chain")
3131 }
3232 
3333 let economyAddr = match chain {
3434     case _ => 
3535         if (("W" == $match0))
3636             then addressFromStringValue("3P2sk1KncSxRaZs8b4CWGPw2jkvvav74u4D")
3737             else if (("T" == $match0))
3838                 then addressFromStringValue("3N8y4wxX3JC4TdrCJBXX16SjWf6X256hrep")
3939                 else throw("Unknown chain")
4040 }
4141 
4242 let pub = base58'6LfPuKJjLgekmncBhMg2LZyMTNVzZBccXR28ySXm9uXD'
4343 
4444 let HEALCOST = 10000
4545 
4646 let LANDPREFIX = "LAND"
4747 
4848 let DUCKPREFIX = "DUCK"
4949 
5050 let DEFAULTLOCATION = "Africa_F_Africa"
5151 
5252 let NUMRES = 6
5353 
5454 let DAILYRESBYPIECE = 3456000
5555 
5656 let DAYMILLIS = 86400000
5757 
5858 let FIVEMINUTESMILLIS = 300000
5959 
60+let RESOURCEPRICEMIN = 158549
61+
62+let EXPMATERIALS = 157679960139
63+
64+let FIVEX = toBigInt(5)
65+
66+let TWENTYX = toBigInt(20)
67+
68+let TWENTY2X = toBigInt((20 * 20))
69+
70+let TWENTY3X = toBigInt(((20 * 20) * 20))
71+
72+let TWENTY4X = toBigInt((((20 * 20) * 20) * 20))
73+
74+let TWENTY5X = toBigInt(((((20 * 20) * 20) * 20) * 20))
75+
6076 let matTypes = ["Fuel", "Metal", "Plank", "Glass", "Plastic", "Protein"]
6177 
62-func keyAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
78+let continents = ["Americas", "Europe", "Asia", "Africa", "Oceania"]
79+
80+func keyNextFreeLandNum () = "nextLandNum"
81+
82+
83+func keyFreeLandNumsMap () = "freeLandNumsMap"
84+
85+
86+func keyLandToAssetId (landNum) = ("landToAsset_" + landNum)
87+
88+
89+func keyNftName (landNum,landSize) = ((LANDPREFIX + landNum) + landSize)
90+
91+
92+func keyLandAssetIdToOwner (assetId) = ("nftOwner_" + assetId)
6393 
6494 
6595 func keyDuckIdToOwner (assetId) = ("duckOwner_" + assetId)
6696 
6797 
6898 func keyStakedTimeByAssetId (assetId) = ("stakedTime_" + assetId)
6999 
70100 
71101 func keyStakedDuckByOwner (ownerAddr) = ("stakedDuckByOwner_" + ownerAddr)
72102 
73103 
74104 func keyStakedTimeByTypeAssetIdAndOwner (nftType,assetId,ownerAddr) = ((((("stakedTimeByTypeAssetIdAndOwner_" + nftType) + "_") + assetId) + "_") + ownerAddr)
75105 
76106 
77-func keyLandToOwner (landNum) = ("landOwner_" + landNum)
107+func keyLandNumToOwner (landNum) = ("landOwner_" + landNum)
78108 
79109 
80110 func keyBackpackByDuck (duckAssetId) = ("backPack_" + duckAssetId)
81111 
82112 
83113 func keyDuckLocation (duckAssetId) = ("duckLocation_" + duckAssetId)
84114 
85115 
86116 func keyDuckHealth (duckAssetId) = ("duckHealth_" + duckAssetId)
87117 
88118 
89119 let recLandNum = 0
90120 
91121 let recLandSize = 1
92122 
93123 let recTerrains = 2
94124 
95125 let recContinent = 3
96126 
97127 let locIdxContinent = 0
98128 
99129 let locIdxType = 1
100130 
101131 let locIdxId = 2
102132 
103133 let bpIdxLevel = 0
104134 
105135 let bpIdxRes = 1
106136 
107137 let bpIdxMat = 2
108138 
109139 let bpIdxProd = 3
110140 
111141 func countTerrains (terrains) = [(size(split(terrains, "A")) - 1), (size(split(terrains, "B")) - 1), (size(split(terrains, "C")) - 1), (size(split(terrains, "D")) - 1), (size(split(terrains, "E")) - 1), (size(split(terrains, "F")) - 1)]
112142 
113143 
114144 func numPiecesBySize (landSize) = match landSize {
115145     case _ => 
116146         if (("S" == $match0))
117147             then 25
118148             else if (("M" == $match0))
119149                 then 100
120150                 else if (("L" == $match0))
121151                     then 225
122152                     else if (("XL" == $match0))
123153                         then 400
124154                         else if (("XXL" == $match0))
125155                             then 625
126156                             else throw("Unknown land size")
127157 }
128158 
129159 
130160 func subOneInList (aList,idx,amount) = {
131161     func subber (acc,i) =     (acc :+ (if ((i == idx))
132162         then toString((parseIntValue(aList[i]) - amount))
133163         else aList[i]))
134164 
135165     let r = {
136166         let $l = [0, 1, 2, 3, 4, 5]
137167         let $s = size($l)
138168         let $acc0 = nil
139169         func $f0_1 ($a,$i) =         if (($i >= $s))
140170             then $a
141171             else subber($a, $l[$i])
142172 
143173         func $f0_2 ($a,$i) =         if (($i >= $s))
144174             then $a
145175             else throw("List size exceeds 6")
146176 
147177         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
148178         }
149179     makeString(r, "_")
150180     }
151181 
152182 
153183 func addRes (currentRes,terrainCounts,deltaTime,landSizeIndex) = {
154184     func adder (acc,i) =     {
155185         let resOfType = ((fraction(deltaTime, DAILYRESBYPIECE, DAYMILLIS) * terrainCounts[i]) * landSizeIndex)
156186         (acc :+ toString((parseIntValue(currentRes[i]) + resOfType)))
157187         }
158188 
159189     let r = {
160190         let $l = [0, 1, 2, 3, 4, 5]
161191         let $s = size($l)
162192         let $acc0 = nil
163193         func $f0_1 ($a,$i) =         if (($i >= $s))
164194             then $a
165195             else adder($a, $l[$i])
166196 
167197         func $f0_2 ($a,$i) =         if (($i >= $s))
168198             then $a
169199             else throw("List size exceeds 6")
170200 
171201         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
172202         }
173203     makeString(r, "_")
174204     }
175205 
176206 
207+func abs (x) = if ((x >= toBigInt(0)))
208+    then x
209+    else -(x)
210+
211+
212+let freq = [[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]]
213+
214+func genChar (n,continentIdx) = {
215+    let rem = toInt((n % TWENTYX))
216+    let letter = if ((freq[continentIdx][0] > rem))
217+        then "A"
218+        else if ((freq[continentIdx][1] > rem))
219+            then "B"
220+            else if ((freq[continentIdx][2] > rem))
221+                then "C"
222+                else if ((freq[continentIdx][3] > rem))
223+                    then "D"
224+                    else if ((freq[continentIdx][4] > rem))
225+                        then "E"
226+                        else "F"
227+    letter
228+    }
229+
230+
177231 @Callable(i)
178232 func stakeLand () = {
179233     let pmt = value(i.payments[0])
180234     let assetId = value(pmt.assetId)
181235     let address = toString(i.caller)
182236     if ((pmt.amount != 1))
183237         then throw((("NFT " + LANDPREFIX) + " token should be attached as payment"))
184238         else {
185239             let asset = value(assetInfo(assetId))
186240             if ((asset.issuer != this))
187241                 then throw("Unknown issuer of token")
188242                 else if (!(contains(asset.name, LANDPREFIX)))
189243                     then throw((("Only NFT " + LANDPREFIX) + " tokens are accepted"))
190244                     else {
191245                         let landNumSize = drop(asset.name, 4)
192246                         let landNum = if (contains(landNumSize, "XXL"))
193247                             then dropRight(landNumSize, 3)
194248                             else if (contains(landNumSize, "XL"))
195249                                 then dropRight(landNumSize, 2)
196250                                 else dropRight(landNumSize, 1)
197251                         if (!(isDefined(parseInt(landNum))))
198252                             then throw(("Cannot parse land number from " + asset.name))
199253                             else {
200254                                 let timeKey = keyStakedTimeByAssetId(toBase58String(assetId))
201255                                 if (isDefined(getInteger(timeKey)))
202256                                     then throw((("NFT " + asset.name) + " is already staked"))
203-                                    else [IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyAssetIdToOwner(toBase58String(assetId)), address), StringEntry(keyLandToOwner(landNum), address)]
257+                                    else [IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyLandAssetIdToOwner(toBase58String(assetId)), address), StringEntry(keyLandNumToOwner(landNum), address)]
204258                                 }
205259                         }
206260             }
207261     }
208262 
209263 
210264 
211265 @Callable(i)
212266 func unstakeLand (landAssetId) = if ((size(i.payments) != 0))
213267     then throw("unstake doesn't require any payments")
214268     else {
215269         let assetId = fromBase58String(landAssetId)
216270         let address = toString(i.caller)
217271         let asset = value(assetInfo(assetId))
218272         if ((asset.issuer != this))
219273             then throw("Unknown issuer of token")
220274             else if (!(contains(asset.name, LANDPREFIX)))
221275                 then throw((("Only NFT " + LANDPREFIX) + " tokens can be unstaked"))
222276                 else {
223277                     let timeKey = keyStakedTimeByAssetId(landAssetId)
224278                     if (!(isDefined(timeKey)))
225279                         then throw((("NFT " + asset.name) + " is not staked"))
226280                         else {
227-                            let owner = valueOrErrorMessage(getString(keyAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
281+                            let owner = valueOrErrorMessage(getString(keyLandAssetIdToOwner(landAssetId)), (("NFT " + asset.name) + " is orphaned"))
228282                             if ((owner != address))
229283                                 then throw("Staked NFT is not yours")
230284                                 else [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(timeKey), DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, address))]
231285                             }
232286                     }
233287         }
234288 
235289 
236290 
237291 @Callable(i)
238292 func stakeDuck () = {
239293     let pmt = value(i.payments[0])
240294     let assetId = value(pmt.assetId)
241295     let address = toString(i.caller)
242296     if ((pmt.amount != 1))
243297         then throw((("NFT " + DUCKPREFIX) + " token should be attached as payment"))
244298         else {
245299             let asset = value(assetInfo(assetId))
246300             if (if ((asset.issuer != incubatorAddr))
247301                 then (asset.issuer != breederAddr)
248302                 else false)
249303                 then throw((("Unknown issuer of " + DUCKPREFIX) + " token"))
250304                 else if (!(contains(asset.name, DUCKPREFIX)))
251305                     then throw((("Only NFT " + DUCKPREFIX) + " tokens are accepted"))
252306                     else {
253307                         let assetIdStr = toBase58String(assetId)
254308                         let timeKey = keyStakedTimeByAssetId(assetIdStr)
255309                         if (isDefined(getInteger(timeKey)))
256310                             then throw((("NFT " + asset.name) + " is already staked"))
257311                             else if (isDefined(getString(keyStakedDuckByOwner(address))))
258312                                 then throw(("You already staked one duck: " + asset.name))
259313                                 else {
260314                                     let locKey = keyDuckLocation(assetIdStr)
261315                                     let location = getString(locKey)
262316                                     let keyHealth = keyDuckHealth(assetIdStr)
263317                                     let health = getInteger(keyHealth)
264318                                     let bpKey = keyBackpackByDuck(assetIdStr)
265319                                     let backpack = getString(bpKey)
266320                                     ([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, toBase58String(assetId), address), lastBlock.timestamp), StringEntry(keyDuckIdToOwner(assetIdStr), address), StringEntry(keyStakedDuckByOwner(address), assetIdStr)] ++ (if (isDefined(location))
267321                                         then nil
268322                                         else ([StringEntry(locKey, DEFAULTLOCATION)] ++ (if (isDefined(health))
269323                                             then nil
270324                                             else ([IntegerEntry(keyHealth, 100)] ++ (if (isDefined(backpack))
271325                                                 then nil
272326                                                 else [StringEntry(bpKey, "0:0_0_0_0_0_0:0_0_0_0_0_0:")]))))))
273327                                     }
274328                         }
275329             }
276330     }
277331 
278332 
279333 
280334 @Callable(i)
281335 func unstakeDuck (assetIdStr) = if ((size(i.payments) != 0))
282336     then throw("unstake doesn't require any payments")
283337     else {
284338         let assetId = fromBase58String(assetIdStr)
285339         let address = toString(i.caller)
286340         let asset = value(assetInfo(assetId))
287341         if (if ((asset.issuer != incubatorAddr))
288342             then (asset.issuer != breederAddr)
289343             else false)
290344             then throw((("Unknown issuer of " + DUCKPREFIX) + " token"))
291345             else if (!(contains(asset.name, DUCKPREFIX)))
292346                 then throw((("Only NFT " + DUCKPREFIX) + " tokens can be unstaked"))
293347                 else {
294348                     let timeKey = keyStakedTimeByAssetId(toBase58String(assetId))
295349                     if (!(isDefined(timeKey)))
296350                         then throw((("NFT " + asset.name) + " is not staked"))
297351                         else if (!(isDefined(keyStakedDuckByOwner(address))))
298352                             then throw((("The duck " + asset.name) + " is not staked"))
299353                             else {
300354                                 let owner = valueOrErrorMessage(getString(keyDuckIdToOwner(toBase58String(assetId))), (("NFT " + asset.name) + " is orphaned"))
301355                                 if ((owner != address))
302356                                     then throw("Staked NFT is not yours")
303357                                     else [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(timeKey), DeleteEntry(keyDuckLocation(assetIdStr)), DeleteEntry(keyStakedTimeByTypeAssetIdAndOwner(DUCKPREFIX, assetIdStr, address)), DeleteEntry(keyStakedDuckByOwner(address))]
304358                                 }
305359                     }
306360         }
307361 
308362 
309363 
310364 @Callable(i)
311365 func claimRes (amount,landAssetId) = if ((size(i.payments) != 0))
312366     then throw("claimRes doesn't require any payments")
313367     else {
314368         let addr = toString(i.caller)
315369         let asset = value(assetInfo(fromBase58String(landAssetId)))
316370         if (!(contains(asset.name, LANDPREFIX)))
317371             then throw((("NFT " + LANDPREFIX) + " token should be passed as param"))
318372             else {
319373                 let timeKey = keyStakedTimeByAssetId(landAssetId)
320374                 let savedTime = getInteger(timeKey)
321375                 if (!(isDefined(savedTime)))
322376                     then throw((("NFT " + asset.name) + " is not staked"))
323377                     else {
324-                        let owner = getStringValue(keyAssetIdToOwner(landAssetId))
378+                        let owner = getStringValue(keyLandAssetIdToOwner(landAssetId))
325379                         if ((owner != addr))
326380                             then throw((LANDPREFIX + " is not yours"))
327381                             else {
328382                                 let d = split(asset.description, "_")
329383                                 let landSize = d[recLandSize]
330384                                 let terrainCounts = countTerrains(d[recTerrains])
331385                                 let duck = getString(keyStakedDuckByOwner(addr))
332386                                 if (!(isDefined(duck)))
333387                                     then throw("You don't have a duck staked")
334388                                     else {
335389                                         let duckAssetIdStr = value(duck)
336390                                         let curLocation = valueOrElse(getString(keyDuckLocation(duckAssetIdStr)), DEFAULTLOCATION)
337391                                         let loc = split(value(curLocation), "_")
338392                                         if ((loc[locIdxType] != "L"))
339393                                             then throw((("Duck location type is " + loc[locIdxType]) + ", but should be L"))
340394                                             else if ((loc[locIdxId] != landAssetId))
341395                                                 then throw(((("Duck location id is " + loc[locIdxId]) + ", but should be ") + landAssetId))
342396                                                 else {
343397                                                     let deltaTime = (lastBlock.timestamp - value(savedTime))
344398                                                     if ((0 > deltaTime))
345399                                                         then throw(((("Saved timestamp is in future, saved = " + toString(value(savedTime))) + ", current = ") + toString(lastBlock.timestamp)))
346400                                                         else {
347401                                                             let pieces = numPiecesBySize(landSize)
348402                                                             let availRes = (fraction(deltaTime, DAILYRESBYPIECE, DAYMILLIS) * pieces)
349403                                                             if ((amount > availRes))
350404                                                                 then throw(((("Not enough resources, available = " + toString(availRes)) + ", requested = ") + toString(amount)))
351405                                                                 else {
352406                                                                     let newDeltaTime = fraction((availRes - amount), DAYMILLIS, (pieces * DAILYRESBYPIECE))
353407                                                                     let newTimestamp = (lastBlock.timestamp - newDeltaTime)
354408                                                                     let bpKey = keyBackpackByDuck(duckAssetIdStr)
355409                                                                     let currentPack = split(valueOrElse(getString(bpKey), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
356410                                                                     let currentRes = split(currentPack[bpIdxRes], "_")
357411                                                                     let bpRes = addRes(currentRes, terrainCounts, (deltaTime - newDeltaTime), (pieces / 25))
358412                                                                     let newPack = makeString([currentPack[bpIdxLevel], bpRes, currentPack[bpIdxMat], currentPack[bpIdxProd]], ":")
359413                                                                     $Tuple2([StringEntry(bpKey, newPack), IntegerEntry(timeKey, newTimestamp), IntegerEntry(keyStakedTimeByTypeAssetIdAndOwner(LANDPREFIX, landAssetId, owner), newTimestamp)], unit)
360414                                                                     }
361415                                                             }
362416                                                     }
363417                                         }
364418                                 }
365419                         }
366420                 }
367421         }
368422 
369423 
370424 
371425 @Callable(i)
372426 func flight (message,sig) = if (!(sigVerify_8Kb(message, sig, pub)))
373427     then throw("signature does not match")
374428     else if ((size(i.payments) != 0))
375429         then throw("flight doesn't require any payments")
376430         else {
377431             let parts = split(toUtf8String(message), ";")
378432             let hp = split(split(parts[0], "|")[0], "_")
379433             let curHP = parseIntValue(hp[0])
380434             let newHP = parseIntValue(hp[1])
381435             let newLocAndTime = split(parts[1], ":")
382436             let newLocation = newLocAndTime[0]
383437             let time = parseIntValue(newLocAndTime[1])
384438             if (if ((time > (lastBlock.timestamp + FIVEMINUTESMILLIS)))
385439                 then true
386440                 else ((lastBlock.timestamp - FIVEMINUTESMILLIS) > time))
387441                 then throw("signature outdated")
388442                 else {
389443                     let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
390444                     let keyHealth = keyDuckHealth(duckAssetId)
391445                     let oldFromState = valueOrElse(getInteger(keyHealth), 100)
392446                     if ((oldFromState != curHP))
393447                         then throw(((("oldHealth=" + toString(valueOrElse(getInteger(keyHealth), 100))) + " from state does not match one from flight log=") + toString(curHP)))
394448                         else if ((0 >= curHP))
395449                             then throw("You can't fly with zero health")
396450                             else {
397451                                 let locKey = keyDuckLocation(duckAssetId)
398452                                 let curLocation = valueOrElse(getString(locKey), DEFAULTLOCATION)
399453                                 if ((newLocation == curLocation))
400454                                     then throw("You can't fly to the same location")
401455                                     else $Tuple2([StringEntry(locKey, if ((newHP > 0))
402456                                         then newLocation
403457                                         else curLocation), IntegerEntry(keyHealth, newHP)], unit)
404458                                 }
405459                     }
406460             }
407461 
408462 
409463 
410464 @Callable(i)
411465 func setHealth (health,duckAssetId) = if (if ((0 > health))
412466     then true
413467     else (health > 100))
414468     then throw("HP should be within 0..100")
415469     else [IntegerEntry(keyDuckHealth(duckAssetId), health)]
416470 
417471 
418472 
419473 @Callable(i)
420474 func heal (matType,amount) = if (if ((0 > matType))
421475     then true
422476     else (matType >= NUMRES))
423477     then throw(("Unknown material: " + toString(matType)))
424478     else if ((0 >= amount))
425479         then throw(("Amount should be positive! " + toString(amount)))
426480         else {
427481             let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(toString(i.caller))), "You don't have a duck staked")
428482             let keyHealth = keyDuckHealth(duckAssetId)
429483             let oldHealth = valueOrElse(getInteger(keyHealth), 100)
430484             if ((oldHealth >= 100))
431485                 then throw("HP should be < 100 to heal")
432486                 else {
433487                     let bpKey = keyBackpackByDuck(duckAssetId)
434488                     let currentPack = split(valueOrElse(getString(bpKey), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
435489                     let matList = split(currentPack[bpIdxMat], "_")
436490                     let mList = if ((size(matList) != NUMRES))
437491                         then ["0", "0", "0", "0", "0", "0"]
438492                         else matList
439493                     let currentAmount = parseIntValue(mList[matType])
440494                     let deltaHealth = min([(amount / HEALCOST), (100 - oldHealth)])
441495                     let spendAmount = (deltaHealth * HEALCOST)
442496                     if ((spendAmount > currentAmount))
443497                         then throw(((((("You need " + toString(spendAmount)) + " of ") + matTypes[matType]) + " to heal, but you backpack contains ") + toString(currentAmount)))
444498                         else {
445499                             let newMat = subOneInList(mList, matType, spendAmount)
446500 [IntegerEntry(keyHealth, (oldHealth + deltaHealth)), StringEntry(bpKey, makeString([currentPack[bpIdxLevel], currentPack[bpIdxRes], newMat, currentPack[bpIdxProd]], ":"))]
447501                             }
448502                     }
449503             }
450504 
451505 
452506 
453507 @Callable(i)
454508 func updateBackpack (duckAssetId,newPack) = if ((i.caller != economyAddr))
455509     then throw("permission denied")
456510     else $Tuple2([StringEntry(keyBackpackByDuck(duckAssetId), newPack)], newPack)
457511 
458512 
513+
514+@Callable(i)
515+func expedition () = if ((size(i.payments) != 0))
516+    then throw("expedition doesn't require any payments")
517+    else {
518+        let userAddr = toString(i.caller)
519+        let duckAssetId = valueOrErrorMessage(getString(keyStakedDuckByOwner(userAddr)), "You don't have a duck staked")
520+        let keyHealth = keyDuckHealth(duckAssetId)
521+        let health = valueOrElse(getInteger(keyHealth), 100)
522+        if ((0 >= health))
523+            then throw("Your duck needs healing")
524+            else {
525+                let currentPack = split(valueOrElse(getString(keyBackpackByDuck(duckAssetId)), "0:0_0_0_0_0_0:0_0_0_0_0_0:"), ":")
526+                let matList = split(currentPack[bpIdxMat], "_")
527+                let totalMat = (((((parseIntValue(matList[0]) + parseIntValue(matList[1])) + parseIntValue(matList[2])) + parseIntValue(matList[3])) + parseIntValue(matList[4])) + parseIntValue(matList[5]))
528+                let nums = split_51C(valueOrErrorMessage(getString(keyFreeLandNumsMap()), (keyFreeLandNumsMap() + " is not initialized")), "_")
529+                let len = size(nums)
530+                let bigNum = abs(toBigInt(i.transactionId))
531+                let numActionAndSeed = if ((len == 0))
532+                    then {
533+                        let freeNum = valueOrElse(getInteger(keyNextFreeLandNum()), 501)
534+                        $Tuple3(toString(freeNum), IntegerEntry(keyNextFreeLandNum(), (freeNum + 1)), bigNum)
535+                        }
536+                    else {
537+                        let q = toBigInt(len)
538+                        let mapIdx = toInt((bigNum % q))
539+                        $Tuple3(nums[mapIdx], StringEntry(keyFreeLandNumsMap(), makeString_11C(removeByIndex(nums, mapIdx), "_")), (bigNum / q))
540+                        }
541+                let continentIdx = toInt((numActionAndSeed._3 % FIVEX))
542+                func terrainGenerator (acc,elem) =                 $Tuple2((((((acc._1 + genChar(acc._2, continentIdx)) + genChar((acc._2 / TWENTYX), continentIdx)) + genChar((acc._2 / TWENTY2X), continentIdx)) + genChar((acc._2 / TWENTY3X), continentIdx)) + genChar((acc._2 / TWENTY4X), continentIdx)), (acc._2 / TWENTY5X))
543+
544+                let t = {
545+                    let $l = [1, 2, 3, 4, 5]
546+                    let $s = size($l)
547+                    let $acc0 = $Tuple2("", (bigNum / FIVEX))
548+                    func $f0_1 ($a,$i) =                     if (($i >= $s))
549+                        then $a
550+                        else terrainGenerator($a, $l[$i])
551+
552+                    func $f0_2 ($a,$i) =                     if (($i >= $s))
553+                        then $a
554+                        else throw("List size exceeds 5")
555+
556+                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
557+                    }
558+                let issue = Issue(keyNftName(numActionAndSeed._1, "S"), makeString([numActionAndSeed._1, "S", t._1, continents[continentIdx]], "_"), 1, 0, false)
559+                let assetId = calculateAssetId(issue)
560+                let id = toBase58String(assetId)
561+                $Tuple2([numActionAndSeed._2, issue, StringEntry(keyLandToAssetId(numActionAndSeed._1), id), StringEntry(keyLandAssetIdToOwner(id), userAddr), StringEntry(keyLandNumToOwner(numActionAndSeed._1), userAddr), ScriptTransfer(i.caller, 1, assetId)], unit)
562+                }
563+        }
564+
565+
github/deemru/w8io/169f3d6 
78.41 ms ◑