tx · 7sPrQX4uBEUf6a8zCUycZiiv5tyjfbw72d7zJb1hd5UN

3PEHSJtFLJYyooEUq3sgwR7nX8vXM2qkGQi:  -0.02000000 Waves

2023.12.11 03:23 [3947159] smart account 3PEHSJtFLJYyooEUq3sgwR7nX8vXM2qkGQi > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7sPrQX4uBEUf6a8zCUycZiiv5tyjfbw72d7zJb1hd5UN",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1702254240505,
    "version": 2,
    "chainId": 87,
    "sender": "3PEHSJtFLJYyooEUq3sgwR7nX8vXM2qkGQi",
    "senderPublicKey": "AGD9BV1hvxrebUM68EhHEhphX86dVmKQXmRqxtndDQ48",
    "proofs": [
        "5GLJpGDCbUd8rTJ881vFpNQUhv5oHVAQRmtwr1doHdekJaXhQobktb8KWvJdUTkD7bEPmG2VDsA89MWivC5UNstv"
    ],
    "script": "base64:BgI7CAISBAoCCAESAwoBARIAEgASBAoCCAESBQoDCAEBEgMKAQESABIDCgEIEgASAwoBCBIDCgEBEgMKAQFCAAhNSUxMSU9ONgCAgOmDsd4WAAlEQVlNSUxMSVMAgLiZKQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyARprZXlBY3Jlc0xvY2tlZEFtb3VudEJ5VXNlcgEEYWRkcgkArAICAhhhY3Jlc0xvY2tlZEFtb3VudEJ5VXNlcl8FBGFkZHIBF2tleUFjcmVzTG9ja2VkRXRhQnlVc2VyAQRhZGRyCQCsAgICFWFjcmVzTG9ja2VkRXRhQnlVc2VyXwUEYWRkcgATYWNyZXNTdGFrZWRUb3RhbEtleQIWYWNyZXNTdGFrZWRBbW91bnRUb3RhbAAKeHBOZXdTTGFuZADAlrECAA9EQUlMWVJFU0JZUElFQ0UAgPjSAQAVVVNEVDJBQ1JFU19NVUxUSVBMSUVSAAoBGmtleUlzQXdhcmRlZEJ5UHJvbW9BbmRVc2VyAgdwcm9tb0lkBGFkZHIJALkJAgkAzAgCAh8lcyVkJXNfX2lzQXdhcmRlZEJ5UHJvbW9BbmRVc2VyCQDMCAIJAKQDAQUHcHJvbW9JZAkAzAgCBQRhZGRyBQNuaWwCAl9fARZrZXlUaWNrZXRzVG90YWxCeVByb21vAQdwcm9tb0lkCQCsAgICGyVzJWRfX3RpY2tldHNUb3RhbEJ5UHJvbW9fXwkApAMBBQdwcm9tb0lkAR5rZXlUaWNrZXRzVG90YWxCeVByb21vQW5kUm91bmQCB3Byb21vSWQHcm91bmRJZAkAuQkCCQDMCAICIyVzJWQlZF9fdGlja2V0c1RvdGFsQnlQcm9tb0FuZFJvdW5kCQDMCAIJAKQDAQUHcHJvbW9JZAkAzAgCCQCkAwEFB3JvdW5kSWQFA25pbAICX18ABWNoYWluCQDJAQIJAMoBAggFBHRoaXMFYnl0ZXMAAQABAAt1c2R0QXNzZXRJZAQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAEghNp6sggDP07Ru8qO7ouTvMmC3Qtd+geWqNQj+agP/7kDCQAAAgEBVAUHJG1hdGNoMAEgVbHYn3KHgu/l41uNrAWrZd6aQ6EvFrsF8xq3h6XxxRgJAAIBAg1Vbmtub3duIGNoYWluABVkZWZhdWx0UmVzdEFkZHJlc3NTdHIEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDACIzNQUUN1dkZidmg0TGtQVW5yblUxejNqbmJBMXA5bTNXTmh2AwkAAAIBAVQFByRtYXRjaDACIzNNdW1rR0d6dENLQVhwV0RxeGtkZG9mcVhTVWJxUWt2U0p5CQACAQINVW5rbm93biBjaGFpbgAMcHJvbW8yTWFwS2V5Aglwcm9tbzJNYXABFGtleVByb21vMk1hcEZvclJvdW5kAQdyb3VuZElkCQCsAgICE3Byb21vMk1hcEZvclJvdW5kX18JAKQDAQUHcm91bmRJZAEUa2V5UHJvbW8zTWFwRm9yUm91bmQBB3JvdW5kSWQJAKwCAgITcHJvbW8zTWFwRm9yUm91bmRfXwkApAMBBQdyb3VuZElkAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8ABUlURVI2CQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwBD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACAA1JZHhDZmdXbGdEYXBwAAQAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwABRhY3Jlc0lzc3VlZEFtb3VudEtleQIRYWNyZXNJc3N1ZWRBbW91bnQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgALSWR4RWZmVG90YWwAAAALcmFuZG9tRGVsYXkAAgEJa2V5Q29tbWl0AQdhZGRyZXNzCQCsAgICD2ZpbmlzaEJsb2NrRm9yXwUHYWRkcmVzcwERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ5hc1R3b0ludHNUdXBsZQEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQCdDIFByRtYXRjaDAFAnQyCQACAQIcZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50KQERa2V5TGFzdFR4SWRCeVVzZXIBBGFkZHIJAKwCAgIPbGFzdFR4SWRCeVVzZXJfBQRhZGRyAQ5nZXRWb3RpbmdQb3dlcgESdXNlckFkZHJTdHJPckVtcHR5BAVwcm9wcwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBEWtleVJlc1Byb3BvcnRpb25zAAILMF8wXzBfMF8wXzACAV8KAQVhZGRlcgIDYWNjBGl0ZW0JAGQCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQQKdG90YWxQb3dlcgoAAiRsBQVwcm9wcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYECnVzZXJzUG93ZXIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFEnVzZXJBZGRyU3RyT3JFbXB0eQAACQDMCAIFCnRvdGFsUG93ZXIJAMwIAgUKdXNlcnNQb3dlcgUDbmlsAQpmaXhlZFBvaW50AgN2YWwIZGVjaW1hbHMEBnRlblBvdwkAbAYACgAABQhkZWNpbWFscwAAAAAFBERPV04EB2xvd1BhcnQJAKQDAQkAagIFA3ZhbAUGdGVuUG93BAZ6ZXJvZXMJALACAgkApAMBBQZ0ZW5Qb3cJAGQCAAEJALECAQUHbG93UGFydAkArAICCQCsAgIJAKwCAgkApAMBCQBpAgUDdmFsBQZ0ZW5Qb3cCAS4FBnplcm9lcwUHbG93UGFydAEEcGFkTAIDdmFsA2xlbgQEdmFsUwkApAMBBQN2YWwEBnplcm9lcwkAsAICCQCkAwEJAGwGAAoAAAkAZQIFA2xlbgkAsQIBBQR2YWxTAAAAAAUERE9XTgABCQCsAgIFBnplcm9lcwUEdmFsUwEPZ2V0UmFuZG9tTnVtYmVyAwhtYXhWYWx1ZQRzYWx0B2VudHJvcHkDCQBnAgAABQhtYXhWYWx1ZQkAAgECFm1heFZhbHVlIHNob3VsZCBiZSA+IDAECnJhbmRvbUhhc2gJAPcDAQkAywECBQRzYWx0BQdlbnRyb3B5CQBqAgkAsQkBBQpyYW5kb21IYXNoBQhtYXhWYWx1ZQAdTUlOX0FDUkVTX0FNT1VOVF9EVVJJTkdfUFJPTU8AgK3iBAAMQkxBQ0tMSVNURUQxAt8GM1AyTkdYNFE1bmdlMU1DYXV3UVc1YXFZTGRrY2NTR2oxRXBfM1AyeEZBSFc5eWh5Tm9oWW96V2Q0SEZoRVhadTNic05Tb1JfM1AyeUthWjJndm45WGU1dHRpODFhN1A5TFpoSGdqdlRvVjlfM1AzN3pRM2NmMmVjdTU1Um1KcUVpR1NpdmR6TjlhdnQzbTlfM1A0YXo2ZHR6c3ZHQ1dGQXhhOTRVZGV2S3pYeUV3eEVpRkdfM1A0a1pVNlgzVFRMRmNTVWU1NUpTeThCeVNxaXRjUGdNQnpfM1A1aEN4QkVoM05nTml6WmhOQnJleUJTcXRiaEpZTGtLUERfM1A3SEx2dWN5MTF5eHlNSlV3anpYRkhIS01FRHdpMUV3ZkNfM1A4SnVhcUg5UFRRQXY4RDVIQkdnUWZLYXVMVFl0Mk5RZnRfM1A5Z1REQjRydERFVmJwWDNhc1U2M0g0WmluaDJFblRtWkVfM1A5aU4zcXJ0ZkppY1VWeTdhbVplVnNldFZEM3ZVTWs4YmVfM1BDYTJCc0FhNkpCTGlyc3pRZlY1cjlmSnJ1amZod3R3ZlBfM1BEM2k0WE44S3R5Z2NGeDRyeTVNN1VHcWRmSDhWWXZ0UlRfM1BERU1ubkpOYzJreDljUEVtdlZ2aFhVcjhTdmhBTktoc2FfM1BER0U5dEtRaXphZVpGZUREcTVhWVN2ODlud1liZmlycFpfM1BETUtRVENyVVBaRUNWWEVKSjhtMXNIdHV0U3UxbmFTZjFfM1BHaDJRdTZZdng4R1RDUlJWTnZCVVZaTGRhaWRZU2F4bzVfM1BLa21BdGJTSzVEMmhRZG8xUmZFZzhlWHlNYkRjUlVjOTJfM1BMTW5ieHpzc1A4VzhFOFhqSjFSTEJCZzhVWkw4Q3ozUDJfM1BNdXhvNFBDQW94OXM0YTdSMWVzemg0aXFxdThnUzdqSHZfM1BOck10RVFDaHc4N1daVTFKQUo3YUdIeWtDYThUam5ETktfM1BQdUJYZldvQnkzRUVvcnk3Yzd2Z2k5VXNqa2E3bzV0QmpfM1BRd3lleUVoVDRZNmFHQUw2dGc3M2FRV0p0VjF6UnQzblJfM1BSR0RTaHVNR2I4NE1KdFRKdnRUZzhxRGZzd2tZV2NtM2UADVBST01PMV9BTU9VTlQAwq2vAgAXUFJPTU9fMl9TVEFSVF9USU1FU1RBTVAEByRtYXRjaDAFBWNoYWluAwkAAAIBAVcFByRtYXRjaDAAgPC0+b4xAwkAAAIBAVQFByRtYXRjaDAAgOfQx74xCQACAQINVW5rbm93biBjaGFpbgAVUFJPTU9fMl9FTkRfVElNRVNUQU1QBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwAP+/zfDAMQMJAAACAQFUBQckbWF0Y2gwAICI1+u+MQkAAgECDVVua25vd24gY2hhaW4AGVBST01PXzJfRElTVFJJQlVUSU9OX0ZVTkQAgJTr3AMAF3Byb21vM051bVByaXplc1BlclJvdW5kCQDMCAIAAQkAzAgCAAUFA25pbAATcHJvbW8zQXdhcmRQZXJSb3VuZAkAzAgCAIDKte4BCQDMCAIAgMLXLwUDbmlsARNpc0JsYWNrbGlzdGVkUHJvbW8xAQRhZGRyCQEIY29udGFpbnMCBQxCTEFDS0xJU1RFRDEFBGFkZHIBBnByb2xvZwAJAQVhc0ludAEJAP0HBAUPc3Rha2luZ0NvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAESY2xhaW1BY3Jlc0ludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ1sYXN0Q2xhaW1UaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFD0RBSUxZUkVTQllQSUVDRQULYWNyZXNBbW91bnQJAGgCBQlEQVlNSUxMSVMFBU1VTFQ4BApjYW5HZXRVc2R0CQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIac2VsbFJlc291cmNlc1dvcmxkUkVBRE9OTFkJAMwIAgUIYXZhaWxSZXMFA25pbAUDbmlsBAdnb3RVc2R0CQCWAwEJAMwIAgAACQDMCAIFCmNhbkdldFVzZHQFA25pbAkAaAIFB2dvdFVzZHQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgENY2xhaW1JbnRlcm5hbAMEYWRkcgthY3Jlc0Ftb3VudA1sYXN0Q2xhaW1UaW1lBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUNbGFzdENsYWltVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEFDWxhc3RDbGFpbVRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBQ9EQUlMWVJFU0JZUElFQ0UFC2FjcmVzQW1vdW50CQBoAgUJREFZTUlMTElTBQVNVUxUOAQKY2FuR2V0VXNkdAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnNlbGxSZXNvdXJjZXNXb3JsZFJFQURPTkxZCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAQHZ290VXNkdAMJAGcCAAAFCmNhbkdldFVzZHQAAAgJAQ5hc1R3b0ludHNUdXBsZQEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhJzZWxsUmVzb3VyY2VzV29ybGQJAMwIAgUEYWRkcgkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwCXzEJAGgCBQdnb3RVc2R0BRVVU0RUMkFDUkVTX01VTFRJUExJRVIBC21lcmdlTG9ja2VkBAlvbGRBbW91bnQGb2xkRVRBCW5ld0Ftb3VudAZuZXdFVEEEA25vdwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEA2R0MQkAlgMBCQDMCAIAAAkAzAgCCQBlAgUGb2xkRVRBBQNub3cFA25pbAQDZHQyCQCWAwEJAMwIAgAACQDMCAIJAGUCBQZuZXdFVEEFA25vdwUDbmlsBANzdW0JAGQCBQlvbGRBbW91bnQFCW5ld0Ftb3VudAQCZHQDCQAAAgUDc3VtAAAAAAkAZAIJAGsDBQNkdDEFCW9sZEFtb3VudAUDc3VtCQBrAwUDZHQyBQluZXdBbW91bnQFA3N1bQkAZAIFA25vdwUCZHQNAWkBDWNvbnN0cnVjdG9yVjECCHJlc3RBZGRyDnVuc3Rha2VkUGllY2VzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQEJaXNEZWZpbmVkAQkAoQgBBQ9hY3Jlc0Fzc2V0SWRLZXkJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBAhuZnRBY3JlcwkAZAIJAJEDAgkBDmdldFZvdGluZ1Bvd2VyAQIABQtJZHhFZmZUb3RhbAUOdW5zdGFrZWRQaWVjZXMEDGlzc3VlZEFtb3VudAkAZQIFCE1JTExJT042CQBoAgUIbmZ0QWNyZXMFBU1VTFQ4BAVpc3N1ZQkAwwgHAgVBQ1JFUwImV2F2ZXNMYW5kcyBsYW5kIGFjcmVzIGludmVzdG1lbnQgdG9rZW4FDGlzc3VlZEFtb3VudAAIBwUEdW5pdAAABAdhc3NldElkCQC4CAEFBWlzc3VlCQDMCAIFBWlzc3VlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRhY3Jlc0lzc3VlZEFtb3VudEtleQUMaXNzdWVkQW1vdW50CQDMCAIJAQtCaW5hcnlFbnRyeQIFD2FjcmVzQXNzZXRJZEtleQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBDHVuc3Rha2VBY3JlcwEGYW1vdW50BAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0AwkAZwIAAAUGYW1vdW50CQACAQIZQW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAADCQBmAgUGYW1vdW50BQ5vbGRBY3Jlc0Ftb3VudAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQEKZml4ZWRQb2ludAIFDm9sZEFjcmVzQW1vdW50AAgCICBBQ1JFUyBzdGFrZWQsIHRyaWVkIHRvIHVuc3Rha2UgCQEKZml4ZWRQb2ludAIFBmFtb3VudAAIBAxsb2NrZWRBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBGmtleUFjcmVzTG9ja2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwAABAlsb2NrZWRFVEEJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBF2tleUFjcmVzTG9ja2VkRXRhQnlVc2VyAQUHYWRkcmVzcwAABANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwMJAGcCBQNub3cFF1BST01PXzJfU1RBUlRfVElNRVNUQU1QCQBnAgUVUFJPTU9fMl9FTkRfVElNRVNUQU1QBQNub3cHCQACAQImWW91IGNhbm5vdCB1bnN0YWtlIEFDUkVTIGR1cmluZyBQcm9tbzIEEHVuc3Rha2FibGVBbW91bnQDCQETaXNCbGFja2xpc3RlZFByb21vMQEFB2FkZHJlc3MJAGUCCQBlAgUOb2xkQWNyZXNBbW91bnQFDGxvY2tlZEFtb3VudAUNUFJPTU8xX0FNT1VOVAkAZQIFDm9sZEFjcmVzQW1vdW50BQxsb2NrZWRBbW91bnQDAwkAZgIFCWxvY2tlZEVUQQUDbm93CQBmAgUGYW1vdW50BRB1bnN0YWthYmxlQW1vdW50BwkAAgEJAKwCAgkArAICCQCsAgICBU9ubHkgCQEKZml4ZWRQb2ludAIFEHVuc3Rha2FibGVBbW91bnQACAInIEFDUkVTIGNhbiBiZSB1bnN0YWtlZCBub3csIHdhaXQgdW50aWwgCQCkAwEFCWxvY2tlZEVUQQQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBlAgUOb2xkQWNyZXNBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYWNyZXNTdGFrZWRUb3RhbEtleQkAZQIFCG9sZFRvdGFsBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBkAgUGYW1vdW50BQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnN0YWtlQWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsAwkAAAIFCXdsZ1Jlc3VsdAUJd2xnUmVzdWx0BANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwMJAGYCBRdQUk9NT18yX1NUQVJUX1RJTUVTVEFNUAUDbm93BgkAZgIFA25vdwUVUFJPTU9fMl9FTkRfVElNRVNUQU1QBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBA5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwUOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAM0IAgkAzQgCCQDNCAIDCQAAAgUMY2xhaW1lZEFjcmVzAAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkBDEludGVnZXJFbnRyeQIFCWFtb3VudEtleQkAZAIFDm9sZEFjcmVzQW1vdW50BQNhbXQJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFA2FtdAkAlAoCBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAMJAGYCBR1NSU5fQUNSRVNfQU1PVU5UX0RVUklOR19QUk9NTwUDYW10CQACAQkArAICCQCsAgICOU1pbiBzdGFrZWQgYW1vdW50IGR1cmluZyBwcm9tbyBhY3Rpb24gc2hvdWxkIGJlIGF0IGxlYXN0IAkBCmZpeGVkUG9pbnQCBR1NSU5fQUNSRVNfQU1PVU5UX0RVUklOR19QUk9NTwAIAgYgQUNSRVMEC3N0YWtlUmVzdWx0CQD8BwQFBHRoaXMCD3NlbmRMb2NrZWRBY3JlcwkAzAgCBQdhZGRyZXNzCQDMCAIFA2FtdAkAzAgCAB4FA25pbAUDbmlsBAlwcm9tbzJNYXAJAQt2YWx1ZU9yRWxzZQIJAKIIAQUMcHJvbW8yTWFwS2V5AgAEB25ld01hcDIDCQEIY29udGFpbnMCBQlwcm9tbzJNYXAFB2FkZHJlc3MEBXBhcnRzCQC9CQIFCXByb21vMk1hcAUHYWRkcmVzcwQJb2xkQW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAK8CAgkAsAICCQCRAwIFBXBhcnRzAAEAAQAOCQCsAgIJAKwCAgkArAICCQCsAgIJAJEDAgUFcGFydHMAAAUHYWRkcmVzcwIBOgkBBHBhZEwCCQBkAgUJb2xkQW1vdW50BQNhbXQADgkAsAICCQCRAwIFBXBhcnRzAAEADwQJZmluYWxQYXJ0CQCsAgIJAKwCAgUHYWRkcmVzcwIBOgkBBHBhZEwCBQNhbXQADgMJAAACBQlwcm9tbzJNYXACAAUJZmluYWxQYXJ0CQCsAgIJAKwCAgUJcHJvbW8yTWFwAgFfBQlmaW5hbFBhcnQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQxwcm9tbzJNYXBLZXkFB25ld01hcDIFA25pbAkAlQoDBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAULc3Rha2VSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIYnV5QWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAAAIFDHByb2xvZ1Jlc3VsdAUMcHJvbG9nUmVzdWx0BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhNVU0RUIHBheW1lbnRzIG9ubHkhAwkAZgIFBU1VTFQ2BQNhbXQJAAIBCQCsAgIJAKwCAgIWTWluIHBheW1lbnQgc2hvdWxkIGJlIAkBCmZpeGVkUG9pbnQCBQVNVUxUNgAGAgUgVVNEVAQLYWNyZXNBbW91bnQJAGgCBQNhbXQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgQOYWNjU3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVBY2NTdGF0cwkAzAgCBQdhZGRyZXNzCQDMCAIJAGsDBQp4cE5ld1NMYW5kBQthY3Jlc0Ftb3VudAkAaAIAGQUFTVVMVDgFA25pbAUDbmlsCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0BQNhbXQFC3VzZHRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYWNyZXNBbW91bnQFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUOYWNjU3RhdHNSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJc2VuZEFjcmVzAgRhZGRyBmFtb3VudAMJAQIhPQIIBQFpBmNhbGxlcgUPZWNvbm9teUNvbnRyYWN0CQACAQIRUGVybWlzc2lvbiBkZW5pZWQJAJQKAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQRhZGRyBQZhbW91bnQFDGFjcmVzQXNzZXRJZAUDbmlsBQZhbW91bnQBaQEPc2VuZExvY2tlZEFjcmVzAwRhZGRyBmFtb3VudAhsb2NrRGF5cwMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAQIhPQIIBQFpBmNhbGxlcgUMcmVzdENvbnRyYWN0BwkAAgECEVBlcm1pc3Npb24gZGVuaWVkBANub3cIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUEYWRkcgQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQRhZGRyBA5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAp0aW1lQWN0aW9uAwkBCWlzRGVmaW5lZAEJAJ8IAQUHdGltZUtleQUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5BQNub3cFA25pbAQGZXRhS2V5CQEXa2V5QWNyZXNMb2NrZWRFdGFCeVVzZXIBBQRhZGRyBA9sb2NrZWRBbW91bnRLZXkJARprZXlBY3Jlc0xvY2tlZEFtb3VudEJ5VXNlcgEFBGFkZHIED29sZExvY2tlZEFtb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQ9sb2NrZWRBbW91bnRLZXkAAAQMb2xkTG9ja2VkRVRBCQELdmFsdWVPckVsc2UCCQCfCAEFBmV0YUtleQAABAltZXJnZWRFVEEJAQttZXJnZUxvY2tlZAQFD29sZExvY2tlZEFtb3VudAUMb2xkTG9ja2VkRVRBBQZhbW91bnQJAGQCBQNub3cJAGgCBQhsb2NrRGF5cwUJREFZTUlMTElTCQCUCgIJAM0IAgkAzQgCCQDNCAIJAM0IAgUKdGltZUFjdGlvbgkBDEludGVnZXJFbnRyeQIFCWFtb3VudEtleQkAZAIFDm9sZEFjcmVzQW1vdW50BQZhbW91bnQJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFBmFtb3VudAkBDEludGVnZXJFbnRyeQIFBmV0YUtleQUJbWVyZ2VkRVRBCQEMSW50ZWdlckVudHJ5AgUPbG9ja2VkQW1vdW50S2V5CQBkAgUPb2xkTG9ja2VkQW1vdW50BQZhbW91bnQFBmFtb3VudAFpAQlidXJuQWNyZXMBBmFtb3VudAMJAQIhPQIIBQFpBmNhbGxlcgUPc3Rha2luZ0NvbnRyYWN0CQACAQIRUGVybWlzc2lvbiBkZW5pZWQECmFtb3VudExlZnQJAGUCCQELdmFsdWVPckVsc2UCCQCfCAEFFGFjcmVzSXNzdWVkQW1vdW50S2V5AAAFBmFtb3VudAMJAGYCAAAFCmFtb3VudExlZnQJAAIBAidBdHRlbXB0IHRvIGJ1cm4gbW9yZSBBQ1JFUywgdGhhbiBleGlzdHMJAJQKAgkAzAgCCQEEQnVybgIFDGFjcmVzQXNzZXRJZAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRhY3Jlc0lzc3VlZEFtb3VudEtleQUKYW1vdW50TGVmdAUDbmlsBQZhbW91bnQBaQEKY2xhaW1BY3JlcwAEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwADCQAAAgUMcHJvbG9nUmVzdWx0BQxwcm9sb2dSZXN1bHQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAJQKAgUMcHJvbG9nUmVzdWx0BQl3bGdSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQESY2xhaW1BY3Jlc1JFQURPTkxZAQdhZGRyZXNzBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBAthY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQIbGFzdFRpbWUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAABAxjbGFpbWVkQWNyZXMJARJjbGFpbUFjcmVzSW50ZXJuYWwDBQdhZGRyZXNzBQthY3Jlc0Ftb3VudAUIbGFzdFRpbWUJAJQKAgUDbmlsCQDMCAIFDGNsYWltZWRBY3JlcwkAzAgCBQhsYXN0VGltZQUDbmlsAWkBC2NsYWltUHJvbW8yAAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAMJAAACBQxwcm9sb2dSZXN1bHQFDHByb2xvZ1Jlc3VsdAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQDbm93CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAMJAGYCBRVQUk9NT18yX0VORF9USU1FU1RBTVAFA25vdwkAAgECF1Byb21vIDIgaXMgbm90IG92ZXIgeWV0BAphd2FyZGVkS2V5CQEaa2V5SXNBd2FyZGVkQnlQcm9tb0FuZFVzZXICAAIFB2FkZHJlc3MDCQELdmFsdWVPckVsc2UCCQCgCAEFCmF3YXJkZWRLZXkHCQACAQkArAICCQCsAgICDFlvdXIgd2FsbGV0IAUHYWRkcmVzcwIeIGlzIGFscmVhZHkgYXdhcmRlZCBpbiBwcm9tbyAyBAlwcm9tbzJNYXAJAQt2YWx1ZU9yRWxzZQIJAKIIAQUMcHJvbW8yTWFwS2V5AgADCQEBIQEJAQhjb250YWlucwIFCXByb21vMk1hcAUHYWRkcmVzcwkAAgECIllvdSBhcmUgbm90IHBhcnRpY2lwYW50IG9mIHByb21vIDIEBXBhcnRzCQC9CQIFCXByb21vMk1hcAUHYWRkcmVzcwQLYWNyZXNBbW91bnQJAQ1wYXJzZUludFZhbHVlAQkArwICCQCwAgIJAJEDAgUFcGFydHMAAQABAA4EB3RpY2tldHMJAGkCBQthY3Jlc0Ftb3VudAUdTUlOX0FDUkVTX0FNT1VOVF9EVVJJTkdfUFJPTU8EC3RvdGFsVGlrZXRzCQELdmFsdWVPckVsc2UCCQCfCAEJARZrZXlUaWNrZXRzVG90YWxCeVByb21vAQACAAAEDSR0MDEyNTQ3MTI5ODcDCQAAAgULdG90YWxUaWtldHMAAAoBDGNvdW50VGlja2V0cwIDYWNjAmVsCQBkAgUDYWNjCQBpAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgUCZWwCAToAAQUdTUlOX0FDUkVTX0FNT1VOVF9EVVJJTkdfUFJPTU8EDHRpY2tldHNDb3VudAoAAiRsCQC9CQIFCXByb21vMk1hcAIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMY291bnRUaWNrZXRzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBFmtleVRpY2tldHNUb3RhbEJ5UHJvbW8BAAIFDHRpY2tldHNDb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleVRpY2tldHNUb3RhbEJ5UHJvbW9BbmRSb3VuZAIAAgABBQx0aWNrZXRzQ291bnQFA25pbAUMdGlja2V0c0NvdW50CQCUCgIFA25pbAULdG90YWxUaWtldHMEDnRpY2tldHNBY3Rpb25zCAUNJHQwMTI1NDcxMjk4NwJfMQQKdG90YWxDb3VudAgFDSR0MDEyNTQ3MTI5ODcCXzIEBWF3YXJkCQBrAwUZUFJPTU9fMl9ESVNUUklCVVRJT05fRlVORAUHdGlja2V0cwUKdG90YWxDb3VudAQLc3Rha2VSZXN1bHQJAPwHBAUEdGhpcwIPc2VuZExvY2tlZEFjcmVzCQDMCAIFB2FkZHJlc3MJAMwIAgUFYXdhcmQJAMwIAgAeBQNuaWwFA25pbAkAlAoCCQDNCAIJAM0IAgUOdGlja2V0c0FjdGlvbnMJAQxCb29sZWFuRW50cnkCBQphd2FyZGVkS2V5BgkBC1N0cmluZ0VudHJ5AgkBFGtleVByb21vMk1hcEZvclJvdW5kAQABBQlwcm9tbzJNYXAFC3N0YWtlUmVzdWx0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCmluaXRQcm9tbzMBCXByb21vM01hcAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEVBlcm1pc3Npb24gZGVuaWVkCgEMY291bnRUaWNrZXRzAgNhY2MCZWwJAGQCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQkAkQMCCQC1CQIFAmVsAgE6AAEEDHRpY2tldHNUb3RhbAoAAiRsCQC9CQIFCXByb21vM01hcAIBXwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMY291bnRUaWNrZXRzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBHmtleVRpY2tldHNUb3RhbEJ5UHJvbW9BbmRSb3VuZAIAAwABBQx0aWNrZXRzVG90YWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFGtleVByb21vM01hcEZvclJvdW5kAQABBQlwcm9tbzNNYXAFA25pbAUMdGlja2V0c1RvdGFsAWkBFGNvbW1pdEZvclByb21vM1JvdW5kAQdyb3VuZElkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDAwkAZgIAAQUHcm91bmRJZAYJAGYCBQdyb3VuZElkAAIJAAIBCQCsAgICEUludmFsaWQgcm91bmRJZDogCQCkAwEFB3JvdW5kSWQEC2ZpbmlzaEJsb2NrCQBkAgUGaGVpZ2h0BQtyYW5kb21EZWxheQkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEJa2V5Q29tbWl0AQkArAICAgIzXwkApAMBBQdyb3VuZElkBQtmaW5pc2hCbG9jawUDbmlsBQtmaW5pc2hCbG9jawFpAQ9kcmF3UHJvbW8zUm91bmQBB3JvdW5kSWQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAMDCQBmAgABBQdyb3VuZElkBgkAZgIFB3JvdW5kSWQAAgkAAgEJAKwCAgIRSW52YWxpZCByb3VuZElkOiAJAKQDAQUHcm91bmRJZAQJZmluaXNoS2V5CQEJa2V5Q29tbWl0AQkArAICAgIzXwkApAMBBQdyb3VuZElkBAtmaW5pc2hCbG9jawkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFCWZpbmlzaEtleQkArAICCQCsAgICIVlvdSBoYXZlIHRvIGNvbW1pdEZvclByb21vM1JvdW5kKAkApAMBBQdyb3VuZElkAggpIGZpcnN0IQMJAGYCBQtmaW5pc2hCbG9jawUGaGVpZ2h0CQACAQkArAICCQCsAgIJAKwCAgkArAICAjRSYW5kb20gbnVtYmVyIGlzIG5vdCByZWFkeSB5ZXQsIHdhaXQgdW50aWwgaGVpZ2h0ID0gCQCkAwEFC2ZpbmlzaEJsb2NrAhMgKGN1cnJlbnQgaGVpZ2h0ID0gCQCkAwEFBmhlaWdodAIBKQQIbWF4VmFsdWUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBHmtleVRpY2tldHNUb3RhbEJ5UHJvbW9BbmRSb3VuZAIAAwUHcm91bmRJZAAAAwkAAAIFCG1heFZhbHVlAAAJAAIBAhJObyB0aWNrZXRzIHRvIGRyYXcEB2VudHJvcHkJAQV2YWx1ZQEICQEFdmFsdWUBCQDtBwEFC2ZpbmlzaEJsb2NrA3ZyZgQEc2FsdAgFAWkNdHJhbnNhY3Rpb25JZAQJcHJvbW8zTWFwCQELdmFsdWVPckVsc2UCCQCiCAEJARRrZXlQcm9tbzNNYXBGb3JSb3VuZAEFB3JvdW5kSWQCAAoBCnNpbmdsZURyYXcCAmFjAWoDCQBnAgUBagkAkQMCBRdwcm9tbzNOdW1Qcml6ZXNQZXJSb3VuZAkAZQIFB3JvdW5kSWQAAQUCYWMEBHJhbmQJAQ9nZXRSYW5kb21OdW1iZXIDCAUCYWMCXzEIBQJhYwJfMgUHZW50cm9weQQKcHJvbW8zTGlzdAMJAAACCAUCYWMCXzMCAAUDbmlsCQC9CQIIBQJhYwJfMwIBXwoBDGNvdW50VGlja2V0cwIDYWNjAmVsBAVwYXJ0cwkAtQkCBQJlbAIBOgQEYWRkcgkAkQMCBQVwYXJ0cwAABAd0aWNrZXRzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUFcGFydHMAAQQIbmV3VG90YWwJAGQCCAUDYWNjAl8xBQd0aWNrZXRzAwMJAAACCAUDYWNjAl8zAgAJAGYCBQhuZXdUb3RhbAUEcmFuZAcJAJUKAwUIbmV3VG90YWwFB3RpY2tldHMFBGFkZHIJAJUKAwUIbmV3VG90YWwIBQNhY2MCXzIIBQNhY2MCXzMEAXIKAAIkbAUKcHJvbW8zTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwAAAAACAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMY291bnRUaWNrZXRzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQEBndpbm5lcggFAXICXzMDCQAAAgUGd2lubmVyAgAFAmFjBAhtYXBQYXJ0cwkAvQkCCAUCYWMCXzMFBndpbm5lcgQGbmV3TWFwAwkAAAIJAJEDAgUIbWFwUGFydHMAAAIACQCwAgIJAJEDAgUIbWFwUGFydHMAAQAECQCsAgIJALMCAgkAkQMCBQhtYXBQYXJ0cwAAAAEJALACAgkAkQMCBQhtYXBQYXJ0cwABAAMEC3N0YWtlUmVzdWx0CQD8BwQFBHRoaXMCD3NlbmRMb2NrZWRBY3JlcwkAzAgCBQZ3aW5uZXIJAMwIAgkAkQMCBRNwcm9tbzNBd2FyZFBlclJvdW5kCQBlAgUHcm91bmRJZAABCQDMCAIAHgUDbmlsBQNuaWwEB25ld1NhbHQJANkEAQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARFrZXlMYXN0VHhJZEJ5VXNlcgEFBndpbm5lcgIHREVGQVVMVAkAlgoECQBlAggFAmFjAl8xCAUBcgJfMgUHbmV3U2FsdAUGbmV3TWFwCQDNCAIIBQJhYwJfNAULc3Rha2VSZXN1bHQEBWRyYXdzCgACJGwFBUlURVI2CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlgoEBQhtYXhWYWx1ZQgFAWkNdHJhbnNhY3Rpb25JZAUJcHJvbW8zTWFwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnNpbmdsZURyYXcCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYJAJQKAgkAzAgCCQELRGVsZXRlRW50cnkBBQlmaW5pc2hLZXkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFGtleVByb21vM01hcEZvclJvdW5kAQkAZAIFB3JvdW5kSWQAAQgFBWRyYXdzAl8zCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEea2V5VGlja2V0c1RvdGFsQnlQcm9tb0FuZFJvdW5kAgADCQBkAgUHcm91bmRJZAABCAUFZHJhd3MCXzEFA25pbAgFBWRyYXdzAl80ABq2ZMs=",
    "height": 3947159,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4a54rjFZo9uvckEWpx9PvB9JwZ8igWPTouGhF1BgYqHS
Next: 9PwKxZzYn2XfU7v3CfjJkoV45Twjn2yVaeSFkhW4VTrC

Diff: 
Old
New
Differences
653
653
 
                                                then drop(mapParts[1], 4)
654
654
 
                                                else (dropRight(mapParts[0], 1) + drop(mapParts[1], 3))
655
655
 
                                            let stakeResult = invoke(this, "sendLockedAcres", [winner, promo3AwardPerRound[(roundId - 1)], 30], nil)
656
-
                                            $Tuple4((ac._1 - r._2), fromBase58String(getStringValue(stakingContract, keyLastTxIdByUser(winner))), newMap, (ac._4 :+ stakeResult))
656
+
                                            let newSalt = fromBase58String(valueOrElse(getString(stakingContract, keyLastTxIdByUser(winner)), "DEFAULT"))
657
+
                                            $Tuple4((ac._1 - r._2), newSalt, newMap, (ac._4 :+ stakeResult))
657
658
 
                                            }
658
659
 
                                    }
659
660
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let MILLION6 = 100000000000000
5
5
 
6
6
 
let DAYMILLIS = 86400000
7
7
 
8
8
 
func keyAcresStakedAmountByUser (addr) = ("acresStakedAmountByUser_" + addr)
9
9
 
10
10
 
11
11
 
func keyAcresLockedAmountByUser (addr) = ("acresLockedAmountByUser_" + addr)
12
12
 
13
13
 
14
14
 
func keyAcresLockedEtaByUser (addr) = ("acresLockedEtaByUser_" + addr)
15
15
 
16
16
 
17
17
 
let acresStakedTotalKey = "acresStakedAmountTotal"
18
18
 
19
19
 
let xpNewSLand = 5000000
20
20
 
21
21
 
let DAILYRESBYPIECE = 3456000
22
22
 
23
23
 
let USDT2ACRES_MULTIPLIER = 10
24
24
 
25
25
 
func keyIsAwardedByPromoAndUser (promoId,addr) = makeString(["%s%d%s__isAwardedByPromoAndUser", toString(promoId), addr], "__")
26
26
 
27
27
 
28
28
 
func keyTicketsTotalByPromo (promoId) = ("%s%d__ticketsTotalByPromo__" + toString(promoId))
29
29
 
30
30
 
31
31
 
func keyTicketsTotalByPromoAndRound (promoId,roundId) = makeString(["%s%d%d__ticketsTotalByPromoAndRound", toString(promoId), toString(roundId)], "__")
32
32
 
33
33
 
34
34
 
let chain = take(drop(this.bytes, 1), 1)
35
35
 
36
36
 
let usdtAssetId = match chain {
37
37
 
    case _ => 
38
38
 
        if ((base58'2W' == $match0))
39
39
 
            then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
40
40
 
            else if ((base58'2T' == $match0))
41
41
 
                then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
42
42
 
                else throw("Unknown chain")
43
43
 
}
44
44
 
45
45
 
let defaultRestAddressStr = match chain {
46
46
 
    case _ => 
47
47
 
        if ((base58'2W' == $match0))
48
48
 
            then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
49
49
 
            else if ((base58'2T' == $match0))
50
50
 
                then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
51
51
 
                else throw("Unknown chain")
52
52
 
}
53
53
 
54
54
 
let promo2MapKey = "promo2Map"
55
55
 
56
56
 
func keyPromo2MapForRound (roundId) = ("promo2MapForRound__" + toString(roundId))
57
57
 
58
58
 
59
59
 
func keyPromo3MapForRound (roundId) = ("promo3MapForRound__" + toString(roundId))
60
60
 
61
61
 
62
62
 
let SEP = "__"
63
63
 
64
64
 
let MULT6 = 1000000
65
65
 
66
66
 
let MULT8 = 100000000
67
67
 
68
68
 
let ITER6 = [0, 1, 2, 3, 4, 5]
69
69
 
70
70
 
func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
71
71
 
72
72
 
73
73
 
let IdxCfgStakingDapp = 1
74
74
 
75
75
 
let IdxCfgEconomyDapp = 2
76
76
 
77
77
 
let IdxCfgWlgDapp = 4
78
78
 
79
79
 
let IdxCfgAcresDapp = 8
80
80
 
81
81
 
func keyRestCfg () = "%s__restConfig"
82
82
 
83
83
 
84
84
 
func keyRestAddress () = "%s__restAddr"
85
85
 
86
86
 
87
87
 
func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
88
88
 
89
89
 
90
90
 
func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
91
91
 
92
92
 
93
93
 
let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
94
94
 
95
95
 
let restCfg = readRestCfgOrFail(restContract)
96
96
 
97
97
 
let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
98
98
 
99
99
 
let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
100
100
 
101
101
 
let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
102
102
 
103
103
 
let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
104
104
 
105
105
 
let acresIssuedAmountKey = "acresIssuedAmount"
106
106
 
107
107
 
let acresAssetIdKey = "acresAssetId"
108
108
 
109
109
 
let acresAssetId = valueOrErrorMessage(getBinary(acresContract, acresAssetIdKey), "ACRES is not issued yet")
110
110
 
111
111
 
func keyAcresStakedTimeByUser (addr) = ("acresStakedTimeByUser_" + addr)
112
112
 
113
113
 
114
114
 
let IdxEffTotal = 0
115
115
 
116
116
 
let randomDelay = 2
117
117
 
118
118
 
func keyCommit (address) = ("finishBlockFor_" + address)
119
119
 
120
120
 
121
121
 
func keyResProportions () = "resTypesProportions"
122
122
 
123
123
 
124
124
 
func keyStakedPiecesByOwner (ownerAddr) = ("stakedPiecesByOwner_" + ownerAddr)
125
125
 
126
126
 
127
127
 
func asInt (v) = match v {
128
128
 
    case n: Int => 
129
129
 
        n
130
130
 
    case _ => 
131
131
 
        throw("fail to cast into Int")
132
132
 
}
133
133
 
134
134
 
135
135
 
func asTwoIntsTuple (val) = match val {
136
136
 
    case t2: (Int, Int) => 
137
137
 
        t2
138
138
 
    case _ => 
139
139
 
        throw("fail to cast into (Int, Int)")
140
140
 
}
141
141
 
142
142
 
143
143
 
func keyLastTxIdByUser (addr) = ("lastTxIdByUser_" + addr)
144
144
 
145
145
 
146
146
 
func getVotingPower (userAddrStrOrEmpty) = {
147
147
 
    let props = split(valueOrElse(getString(stakingContract, keyResProportions()), "0_0_0_0_0_0"), "_")
148
148
 
    func adder (acc,item) =     (acc + parseIntValue(item))
149
149
 
150
150
 
    let totalPower = {
151
151
 
        let $l = props
152
152
 
        let $s = size($l)
153
153
 
        let $acc0 = 0
154
154
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
155
155
 
            then $a
156
156
 
            else adder($a, $l[$i])
157
157
 
158
158
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
159
159
 
            then $a
160
160
 
            else throw("List size exceeds 6")
161
161
 
162
162
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
163
163
 
        }
164
164
 
    let usersPower = valueOrElse(getInteger(stakingContract, keyStakedPiecesByOwner(userAddrStrOrEmpty)), 0)
165
165
 
[totalPower, usersPower]
166
166
 
    }
167
167
 
168
168
 
169
169
 
func fixedPoint (val,decimals) = {
170
170
 
    let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
171
171
 
    let lowPart = toString((val % tenPow))
172
172
 
    let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
173
173
 
    (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
174
174
 
    }
175
175
 
176
176
 
177
177
 
func padL (val,len) = {
178
178
 
    let valS = toString(val)
179
179
 
    let zeroes = drop(toString(pow(10, 0, (len - size(valS)), 0, 0, DOWN)), 1)
180
180
 
    (zeroes + valS)
181
181
 
    }
182
182
 
183
183
 
184
184
 
func getRandomNumber (maxValue,salt,entropy) = if ((0 >= maxValue))
185
185
 
    then throw("maxValue should be > 0")
186
186
 
    else {
187
187
 
        let randomHash = sha256((salt + entropy))
188
188
 
        (toInt(randomHash) % maxValue)
189
189
 
        }
190
190
 
191
191
 
192
192
 
let MIN_ACRES_AMOUNT_DURING_PROMO = 10000000
193
193
 
194
194
 
let BLACKLISTED1 = "3P2NGX4Q5nge1MCauwQW5aqYLdkccSGj1Ep_3P2xFAHW9yhyNohYozWd4HFhEXZu3bsNSoR_3P2yKaZ2gvn9Xe5tti81a7P9LZhHgjvToV9_3P37zQ3cf2ecu55RmJqEiGSivdzN9avt3m9_3P4az6dtzsvGCWFAxa94UdevKzXyEwxEiFG_3P4kZU6X3TTLFcSUe55JSy8BySqitcPgMBz_3P5hCxBEh3NgNizZhNBreyBSqtbhJYLkKPD_3P7HLvucy11yxyMJUwjzXFHHKMEDwi1EwfC_3P8JuaqH9PTQAv8D5HBGgQfKauLTYt2NQft_3P9gTDB4rtDEVbpX3asU63H4Zinh2EnTmZE_3P9iN3qrtfJicUVy7amZeVsetVD3vUMk8be_3PCa2BsAa6JBLirszQfV5r9fJrujfhwtwfP_3PD3i4XN8KtygcFx4ry5M7UGqdfH8VYvtRT_3PDEMnnJNc2kx9cPEmvVvhXUr8SvhANKhsa_3PDGE9tKQizaeZFeDDq5aYSv89nwYbfirpZ_3PDMKQTCrUPZECVXEJJ8m1sHtutSu1naSf1_3PGh2Qu6Yvx8GTCRRVNvBUVZLdaidYSaxo5_3PKkmAtbSK5D2hQdo1RfEg8eXyMbDcRUc92_3PLMnbxzssP8W8E8XjJ1RLBBg8UZL8Cz3P2_3PMuxo4PCAox9s4a7R1eszh4iqqu8gS7jHv_3PNrMtEQChw87WZU1JAJ7aGHykCa8TjnDNK_3PPuBXfWoBy3EEory7c7vgi9Usjka7o5tBj_3PQwyeyEhT4Y6aGAL6tg73aQWJtV1zRt3nR_3PRGDShuMGb84MJtTJvtTg8qDfswkYWcm3e"
195
195
 
196
196
 
let PROMO1_AMOUNT = 4970178
197
197
 
198
198
 
let PROMO_2_START_TIMESTAMP = match chain {
199
199
 
    case _ => 
200
200
 
        if ((base58'2W' == $match0))
201
201
 
            then 1700524800000
202
202
 
            else if ((base58'2T' == $match0))
203
203
 
                then 1700420400000
204
204
 
                else throw("Unknown chain")
205
205
 
}
206
206
 
207
207
 
let PROMO_2_END_TIMESTAMP = match chain {
208
208
 
    case _ => 
209
209
 
        if ((base58'2W' == $match0))
210
210
 
            then 1701043199999
211
211
 
            else if ((base58'2T' == $match0))
212
212
 
                then 1700496000000
213
213
 
                else throw("Unknown chain")
214
214
 
}
215
215
 
216
216
 
let PROMO_2_DISTRIBUTION_FUND = 1000000000
217
217
 
218
218
 
let promo3NumPrizesPerRound = [1, 5]
219
219
 
220
220
 
let promo3AwardPerRound = [500000000, 100000000]
221
221
 
222
222
 
func isBlacklistedPromo1 (addr) = contains(BLACKLISTED1, addr)
223
223
 
224
224
 
225
225
 
func prolog () = asInt(reentrantInvoke(stakingContract, "saveLastTx", nil, nil))
226
226
 
227
227
 
228
228
 
func claimAcresInternal (addr,acresAmount,lastClaimTime) = {
229
229
 
    let deltaTime = (lastBlock.timestamp - lastClaimTime)
230
230
 
    let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
231
231
 
    let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
232
232
 
    let gotUsdt = max([0, canGetUsdt])
233
233
 
    (gotUsdt * USDT2ACRES_MULTIPLIER)
234
234
 
    }
235
235
 
236
236
 
237
237
 
func claimInternal (addr,acresAmount,lastClaimTime) = {
238
238
 
    let deltaTime = (lastBlock.timestamp - lastClaimTime)
239
239
 
    if ((0 > deltaTime))
240
240
 
        then throw(((("Saved timestamp is in future, saved = " + toString(lastClaimTime)) + ", current = ") + toString(lastBlock.timestamp)))
241
241
 
        else {
242
242
 
            let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
243
243
 
            let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
244
244
 
            let gotUsdt = if ((0 >= canGetUsdt))
245
245
 
                then 0
246
246
 
                else asTwoIntsTuple(invoke(economyContract, "sellResourcesWorld", [addr, availRes], nil))._1
247
247
 
            (gotUsdt * USDT2ACRES_MULTIPLIER)
248
248
 
            }
249
249
 
    }
250
250
 
251
251
 
252
252
 
func mergeLocked (oldAmount,oldETA,newAmount,newETA) = {
253
253
 
    let now = lastBlock.timestamp
254
254
 
    let dt1 = max([0, (oldETA - now)])
255
255
 
    let dt2 = max([0, (newETA - now)])
256
256
 
    let sum = (oldAmount + newAmount)
257
257
 
    let dt = if ((sum == 0))
258
258
 
        then 0
259
259
 
        else (fraction(dt1, oldAmount, sum) + fraction(dt2, newAmount, sum))
260
260
 
    (now + dt)
261
261
 
    }
262
262
 
263
263
 
264
264
 
@Callable(i)
265
265
 
func constructorV1 (restAddr,unstakedPieces) = if ((i.caller != this))
266
266
 
    then throw("Permission denied")
267
267
 
    else if (isDefined(getBinary(acresAssetIdKey)))
268
268
 
        then throw("Already initialized")
269
269
 
        else {
270
270
 
            let nftAcres = (getVotingPower("")[IdxEffTotal] + unstakedPieces)
271
271
 
            let issuedAmount = (MILLION6 - (nftAcres * MULT8))
272
272
 
            let issue = Issue("ACRES", "WavesLands land acres investment token", issuedAmount, 8, false, unit, 0)
273
273
 
            let assetId = calculateAssetId(issue)
274
274
 
[issue, IntegerEntry(acresIssuedAmountKey, issuedAmount), BinaryEntry(acresAssetIdKey, assetId), StringEntry(keyRestAddress(), restAddr)]
275
275
 
            }
276
276
 
277
277
 
278
278
 
279
279
 
@Callable(i)
280
280
 
func unstakeAcres (amount) = {
281
281
 
    let prologResult = prolog()
282
282
 
    if ((prologResult == prologResult))
283
283
 
        then if ((0 >= amount))
284
284
 
            then throw("Amount should be positive")
285
285
 
            else {
286
286
 
                let address = toString(i.caller)
287
287
 
                if ((size(i.payments) != 0))
288
288
 
                    then throw("No payments required")
289
289
 
                    else {
290
290
 
                        let timeKey = keyAcresStakedTimeByUser(address)
291
291
 
                        let amountKey = keyAcresStakedAmountByUser(address)
292
292
 
                        let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
293
293
 
                        if ((amount > oldAcresAmount))
294
294
 
                            then throw(((("You have only " + fixedPoint(oldAcresAmount, 8)) + " ACRES staked, tried to unstake ") + fixedPoint(amount, 8)))
295
295
 
                            else {
296
296
 
                                let lockedAmount = valueOrElse(getInteger(keyAcresLockedAmountByUser(address)), 0)
297
297
 
                                let lockedETA = valueOrElse(getInteger(keyAcresLockedEtaByUser(address)), 0)
298
298
 
                                let now = lastBlock.timestamp
299
299
 
                                if (if ((now >= PROMO_2_START_TIMESTAMP))
300
300
 
                                    then (PROMO_2_END_TIMESTAMP >= now)
301
301
 
                                    else false)
302
302
 
                                    then throw("You cannot unstake ACRES during Promo2")
303
303
 
                                    else {
304
304
 
                                        let unstakableAmount = if (isBlacklistedPromo1(address))
305
305
 
                                            then ((oldAcresAmount - lockedAmount) - PROMO1_AMOUNT)
306
306
 
                                            else (oldAcresAmount - lockedAmount)
307
307
 
                                        if (if ((lockedETA > now))
308
308
 
                                            then (amount > unstakableAmount)
309
309
 
                                            else false)
310
310
 
                                            then throw(((("Only " + fixedPoint(unstakableAmount, 8)) + " ACRES can be unstaked now, wait until ") + toString(lockedETA)))
311
311
 
                                            else {
312
312
 
                                                let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
313
313
 
                                                let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
314
314
 
                                                let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
315
315
 
                                                $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2(prologResult, wlgResult))
316
316
 
                                                }
317
317
 
                                        }
318
318
 
                                }
319
319
 
                        }
320
320
 
                }
321
321
 
        else throw("Strict value is not equal to itself.")
322
322
 
    }
323
323
 
324
324
 
325
325
 
326
326
 
@Callable(i)
327
327
 
func stakeAcres () = {
328
328
 
    let prologResult = prolog()
329
329
 
    if ((prologResult == prologResult))
330
330
 
        then {
331
331
 
            let address = toString(i.caller)
332
332
 
            if ((size(i.payments) != 1))
333
333
 
                then throw("exactly 1 payment must be attached")
334
334
 
                else {
335
335
 
                    let pmt = i.payments[0]
336
336
 
                    let amt = pmt.amount
337
337
 
                    if (if (!(isDefined(pmt.assetId)))
338
338
 
                        then true
339
339
 
                        else (value(pmt.assetId) != acresAssetId))
340
340
 
                        then throw("ACRES payments only!")
341
341
 
                        else {
342
342
 
                            let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
343
343
 
                            if ((wlgResult == wlgResult))
344
344
 
                                then {
345
345
 
                                    let now = lastBlock.timestamp
346
346
 
                                    if (if ((PROMO_2_START_TIMESTAMP > now))
347
347
 
                                        then true
348
348
 
                                        else (now > PROMO_2_END_TIMESTAMP))
349
349
 
                                        then {
350
350
 
                                            let timeKey = keyAcresStakedTimeByUser(address)
351
351
 
                                            let amountKey = keyAcresStakedAmountByUser(address)
352
352
 
                                            let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
353
353
 
                                            let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
354
354
 
                                            let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
355
355
 
                                            $Tuple2(((((if ((claimedAcres == 0))
356
356
 
                                                then nil
357
357
 
                                                else [ScriptTransfer(i.caller, claimedAcres, acresAssetId)]) :+ IntegerEntry(timeKey, lastBlock.timestamp)) :+ IntegerEntry(amountKey, (oldAcresAmount + amt))) :+ IntegerEntry(acresStakedTotalKey, (oldTotal + amt))), $Tuple2(prologResult, wlgResult))
358
358
 
                                            }
359
359
 
                                        else if ((MIN_ACRES_AMOUNT_DURING_PROMO > amt))
360
360
 
                                            then throw((("Min staked amount during promo action should be at least " + fixedPoint(MIN_ACRES_AMOUNT_DURING_PROMO, 8)) + " ACRES"))
361
361
 
                                            else {
362
362
 
                                                let stakeResult = invoke(this, "sendLockedAcres", [address, amt, 30], nil)
363
363
 
                                                let promo2Map = valueOrElse(getString(promo2MapKey), "")
364
364
 
                                                let newMap2 = if (contains(promo2Map, address))
365
365
 
                                                    then {
366
366
 
                                                        let parts = split_51C(promo2Map, address)
367
367
 
                                                        let oldAmount = parseIntValue(take(drop(parts[1], 1), 14))
368
368
 
                                                        ((((parts[0] + address) + ":") + padL((oldAmount + amt), 14)) + drop(parts[1], 15))
369
369
 
                                                        }
370
370
 
                                                    else {
371
371
 
                                                        let finalPart = ((address + ":") + padL(amt, 14))
372
372
 
                                                        if ((promo2Map == ""))
373
373
 
                                                            then finalPart
374
374
 
                                                            else ((promo2Map + "_") + finalPart)
375
375
 
                                                        }
376
376
 
                                                $Tuple2([StringEntry(promo2MapKey, newMap2)], $Tuple3(prologResult, wlgResult, stakeResult))
377
377
 
                                                }
378
378
 
                                    }
379
379
 
                                else throw("Strict value is not equal to itself.")
380
380
 
                            }
381
381
 
                    }
382
382
 
            }
383
383
 
        else throw("Strict value is not equal to itself.")
384
384
 
    }
385
385
 
386
386
 
387
387
 
388
388
 
@Callable(i)
389
389
 
func buyAcres () = {
390
390
 
    let prologResult = prolog()
391
391
 
    if ((prologResult == prologResult))
392
392
 
        then {
393
393
 
            let address = toString(i.caller)
394
394
 
            if ((size(i.payments) != 1))
395
395
 
                then throw("exactly 1 payment must be attached")
396
396
 
                else {
397
397
 
                    let pmt = i.payments[0]
398
398
 
                    let amt = pmt.amount
399
399
 
                    if (if (!(isDefined(pmt.assetId)))
400
400
 
                        then true
401
401
 
                        else (value(pmt.assetId) != usdtAssetId))
402
402
 
                        then throw("USDT payments only!")
403
403
 
                        else if ((MULT6 > amt))
404
404
 
                            then throw((("Min payment should be " + fixedPoint(MULT6, 6)) + " USDT"))
405
405
 
                            else {
406
406
 
                                let acresAmount = (amt * USDT2ACRES_MULTIPLIER)
407
407
 
                                let accStatsResult = asInt(invoke(stakingContract, "updateAccStats", [address, fraction(xpNewSLand, acresAmount, (25 * MULT8))], nil))
408
408
 
                                $Tuple2([ScriptTransfer(economyContract, amt, usdtAssetId), ScriptTransfer(i.caller, acresAmount, acresAssetId)], $Tuple2(prologResult, accStatsResult))
409
409
 
                                }
410
410
 
                    }
411
411
 
            }
412
412
 
        else throw("Strict value is not equal to itself.")
413
413
 
    }
414
414
 
415
415
 
416
416
 
417
417
 
@Callable(i)
418
418
 
func sendAcres (addr,amount) = if ((i.caller != economyContract))
419
419
 
    then throw("Permission denied")
420
420
 
    else $Tuple2([ScriptTransfer(addressFromStringValue(addr), amount, acresAssetId)], amount)
421
421
 
422
422
 
423
423
 
424
424
 
@Callable(i)
425
425
 
func sendLockedAcres (addr,amount,lockDays) = if (if ((i.caller != this))
426
426
 
    then (i.caller != restContract)
427
427
 
    else false)
428
428
 
    then throw("Permission denied")
429
429
 
    else {
430
430
 
        let now = lastBlock.timestamp
431
431
 
        let timeKey = keyAcresStakedTimeByUser(addr)
432
432
 
        let amountKey = keyAcresStakedAmountByUser(addr)
433
433
 
        let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
434
434
 
        let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
435
435
 
        let timeAction = if (isDefined(getInteger(timeKey)))
436
436
 
            then nil
437
437
 
            else [IntegerEntry(timeKey, now)]
438
438
 
        let etaKey = keyAcresLockedEtaByUser(addr)
439
439
 
        let lockedAmountKey = keyAcresLockedAmountByUser(addr)
440
440
 
        let oldLockedAmount = valueOrElse(getInteger(lockedAmountKey), 0)
441
441
 
        let oldLockedETA = valueOrElse(getInteger(etaKey), 0)
442
442
 
        let mergedETA = mergeLocked(oldLockedAmount, oldLockedETA, amount, (now + (lockDays * DAYMILLIS)))
443
443
 
        $Tuple2(((((timeAction :+ IntegerEntry(amountKey, (oldAcresAmount + amount))) :+ IntegerEntry(acresStakedTotalKey, (oldTotal + amount))) :+ IntegerEntry(etaKey, mergedETA)) :+ IntegerEntry(lockedAmountKey, (oldLockedAmount + amount))), amount)
444
444
 
        }
445
445
 
446
446
 
447
447
 
448
448
 
@Callable(i)
449
449
 
func burnAcres (amount) = if ((i.caller != stakingContract))
450
450
 
    then throw("Permission denied")
451
451
 
    else {
452
452
 
        let amountLeft = (valueOrElse(getInteger(acresIssuedAmountKey), 0) - amount)
453
453
 
        if ((0 > amountLeft))
454
454
 
            then throw("Attempt to burn more ACRES, than exists")
455
455
 
            else $Tuple2([Burn(acresAssetId, amount), IntegerEntry(acresIssuedAmountKey, amountLeft)], amount)
456
456
 
        }
457
457
 
458
458
 
459
459
 
460
460
 
@Callable(i)
461
461
 
func claimAcres () = {
462
462
 
    let prologResult = prolog()
463
463
 
    if ((prologResult == prologResult))
464
464
 
        then {
465
465
 
            let address = toString(i.caller)
466
466
 
            if ((size(i.payments) != 0))
467
467
 
                then throw("No payments required")
468
468
 
                else {
469
469
 
                    let timeKey = keyAcresStakedTimeByUser(address)
470
470
 
                    let amountKey = keyAcresStakedAmountByUser(address)
471
471
 
                    let acresAmount = valueOrElse(getInteger(amountKey), 0)
472
472
 
                    let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
473
473
 
                    let claimedAcres = claimInternal(address, acresAmount, valueOrElse(getInteger(timeKey), 0))
474
474
 
                    $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), ScriptTransfer(i.caller, claimedAcres, acresAssetId)], $Tuple2(prologResult, wlgResult))
475
475
 
                    }
476
476
 
            }
477
477
 
        else throw("Strict value is not equal to itself.")
478
478
 
    }
479
479
 
480
480
 
481
481
 
482
482
 
@Callable(i)
483
483
 
func claimAcresREADONLY (address) = {
484
484
 
    let timeKey = keyAcresStakedTimeByUser(address)
485
485
 
    let amountKey = keyAcresStakedAmountByUser(address)
486
486
 
    let acresAmount = valueOrElse(getInteger(amountKey), 0)
487
487
 
    let lastTime = valueOrElse(getInteger(timeKey), 0)
488
488
 
    let claimedAcres = claimAcresInternal(address, acresAmount, lastTime)
489
489
 
    $Tuple2(nil, [claimedAcres, lastTime])
490
490
 
    }
491
491
 
492
492
 
493
493
 
494
494
 
@Callable(i)
495
495
 
func claimPromo2 () = {
496
496
 
    let prologResult = prolog()
497
497
 
    if ((prologResult == prologResult))
498
498
 
        then {
499
499
 
            let address = toString(i.caller)
500
500
 
            if ((size(i.payments) != 0))
501
501
 
                then throw("No payments required")
502
502
 
                else {
503
503
 
                    let now = lastBlock.timestamp
504
504
 
                    if ((PROMO_2_END_TIMESTAMP > now))
505
505
 
                        then throw("Promo 2 is not over yet")
506
506
 
                        else {
507
507
 
                            let awardedKey = keyIsAwardedByPromoAndUser(2, address)
508
508
 
                            if (valueOrElse(getBoolean(awardedKey), false))
509
509
 
                                then throw((("Your wallet " + address) + " is already awarded in promo 2"))
510
510
 
                                else {
511
511
 
                                    let promo2Map = valueOrElse(getString(promo2MapKey), "")
512
512
 
                                    if (!(contains(promo2Map, address)))
513
513
 
                                        then throw("You are not participant of promo 2")
514
514
 
                                        else {
515
515
 
                                            let parts = split_51C(promo2Map, address)
516
516
 
                                            let acresAmount = parseIntValue(take(drop(parts[1], 1), 14))
517
517
 
                                            let tickets = (acresAmount / MIN_ACRES_AMOUNT_DURING_PROMO)
518
518
 
                                            let totalTikets = valueOrElse(getInteger(keyTicketsTotalByPromo(2)), 0)
519
519
 
                                            let $t01254712987 = if ((totalTikets == 0))
520
520
 
                                                then {
521
521
 
                                                    func countTickets (acc,el) =                                                     (acc + (parseIntValue(split(el, ":")[1]) / MIN_ACRES_AMOUNT_DURING_PROMO))
522
522
 
523
523
 
                                                    let ticketsCount = {
524
524
 
                                                        let $l = split_51C(promo2Map, "_")
525
525
 
                                                        let $s = size($l)
526
526
 
                                                        let $acc0 = 0
527
527
 
                                                        func $f0_1 ($a,$i) =                                                         if (($i >= $s))
528
528
 
                                                            then $a
529
529
 
                                                            else countTickets($a, $l[$i])
530
530
 
531
531
 
                                                        func $f0_2 ($a,$i) =                                                         if (($i >= $s))
532
532
 
                                                            then $a
533
533
 
                                                            else throw("List size exceeds 50")
534
534
 
535
535
 
                                                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
536
536
 
                                                        }
537
537
 
                                                    $Tuple2([IntegerEntry(keyTicketsTotalByPromo(2), ticketsCount), IntegerEntry(keyTicketsTotalByPromoAndRound(2, 1), ticketsCount)], ticketsCount)
538
538
 
                                                    }
539
539
 
                                                else $Tuple2(nil, totalTikets)
540
540
 
                                            let ticketsActions = $t01254712987._1
541
541
 
                                            let totalCount = $t01254712987._2
542
542
 
                                            let award = fraction(PROMO_2_DISTRIBUTION_FUND, tickets, totalCount)
543
543
 
                                            let stakeResult = invoke(this, "sendLockedAcres", [address, award, 30], nil)
544
544
 
                                            $Tuple2(((ticketsActions :+ BooleanEntry(awardedKey, true)) :+ StringEntry(keyPromo2MapForRound(1), promo2Map)), stakeResult)
545
545
 
                                            }
546
546
 
                                    }
547
547
 
                            }
548
548
 
                    }
549
549
 
            }
550
550
 
        else throw("Strict value is not equal to itself.")
551
551
 
    }
552
552
 
553
553
 
554
554
 
555
555
 
@Callable(i)
556
556
 
func initPromo3 (promo3Map) = if ((i.caller != this))
557
557
 
    then throw("Permission denied")
558
558
 
    else {
559
559
 
        func countTickets (acc,el) =         (acc + parseIntValue(split(el, ":")[1]))
560
560
 
561
561
 
        let ticketsTotal = {
562
562
 
            let $l = split_51C(promo3Map, "_")
563
563
 
            let $s = size($l)
564
564
 
            let $acc0 = 0
565
565
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
566
566
 
                then $a
567
567
 
                else countTickets($a, $l[$i])
568
568
 
569
569
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
570
570
 
                then $a
571
571
 
                else throw("List size exceeds 20")
572
572
 
573
573
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
574
574
 
            }
575
575
 
        $Tuple2([IntegerEntry(keyTicketsTotalByPromoAndRound(3, 1), ticketsTotal), StringEntry(keyPromo3MapForRound(1), promo3Map)], ticketsTotal)
576
576
 
        }
577
577
 
578
578
 
579
579
 
580
580
 
@Callable(i)
581
581
 
func commitForPromo3Round (roundId) = if ((i.caller != this))
582
582
 
    then throw("Permission denied")
583
583
 
    else if (if ((1 > roundId))
584
584
 
        then true
585
585
 
        else (roundId > 2))
586
586
 
        then throw(("Invalid roundId: " + toString(roundId)))
587
587
 
        else {
588
588
 
            let finishBlock = (height + randomDelay)
589
589
 
            $Tuple2([IntegerEntry(keyCommit(("3_" + toString(roundId))), finishBlock)], finishBlock)
590
590
 
            }
591
591
 
592
592
 
593
593
 
594
594
 
@Callable(i)
595
595
 
func drawPromo3Round (roundId) = if ((i.caller != this))
596
596
 
    then throw("Permission denied")
597
597
 
    else if (if ((1 > roundId))
598
598
 
        then true
599
599
 
        else (roundId > 2))
600
600
 
        then throw(("Invalid roundId: " + toString(roundId)))
601
601
 
        else {
602
602
 
            let finishKey = keyCommit(("3_" + toString(roundId)))
603
603
 
            let finishBlock = valueOrErrorMessage(getInteger(finishKey), (("You have to commitForPromo3Round(" + toString(roundId)) + ") first!"))
604
604
 
            if ((finishBlock > height))
605
605
 
                then throw((((("Random number is not ready yet, wait until height = " + toString(finishBlock)) + " (current height = ") + toString(height)) + ")"))
606
606
 
                else {
607
607
 
                    let maxValue = valueOrElse(getInteger(keyTicketsTotalByPromoAndRound(3, roundId)), 0)
608
608
 
                    if ((maxValue == 0))
609
609
 
                        then throw("No tickets to draw")
610
610
 
                        else {
611
611
 
                            let entropy = value(value(blockInfoByHeight(finishBlock)).vrf)
612
612
 
                            let salt = i.transactionId
613
613
 
                            let promo3Map = valueOrElse(getString(keyPromo3MapForRound(roundId)), "")
614
614
 
                            func singleDraw (ac,j) =                             if ((j >= promo3NumPrizesPerRound[(roundId - 1)]))
615
615
 
                                then ac
616
616
 
                                else {
617
617
 
                                    let rand = getRandomNumber(ac._1, ac._2, entropy)
618
618
 
                                    let promo3List = if ((ac._3 == ""))
619
619
 
                                        then nil
620
620
 
                                        else split_51C(ac._3, "_")
621
621
 
                                    func countTickets (acc,el) =                                     {
622
622
 
                                        let parts = split(el, ":")
623
623
 
                                        let addr = parts[0]
624
624
 
                                        let tickets = parseIntValue(parts[1])
625
625
 
                                        let newTotal = (acc._1 + tickets)
626
626
 
                                        if (if ((acc._3 == ""))
627
627
 
                                            then (newTotal > rand)
628
628
 
                                            else false)
629
629
 
                                            then $Tuple3(newTotal, tickets, addr)
630
630
 
                                            else $Tuple3(newTotal, acc._2, acc._3)
631
631
 
                                        }
632
632
 
633
633
 
                                    let r = {
634
634
 
                                        let $l = promo3List
635
635
 
                                        let $s = size($l)
636
636
 
                                        let $acc0 = $Tuple3(0, 0, "")
637
637
 
                                        func $f0_1 ($a,$i) =                                         if (($i >= $s))
638
638
 
                                            then $a
639
639
 
                                            else countTickets($a, $l[$i])
640
640
 
641
641
 
                                        func $f0_2 ($a,$i) =                                         if (($i >= $s))
642
642
 
                                            then $a
643
643
 
                                            else throw("List size exceeds 20")
644
644
 
645
645
 
                                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
646
646
 
                                        }
647
647
 
                                    let winner = r._3
648
648
 
                                    if ((winner == ""))
649
649
 
                                        then ac
650
650
 
                                        else {
651
651
 
                                            let mapParts = split_51C(ac._3, winner)
652
652
 
                                            let newMap = if ((mapParts[0] == ""))
653
653
 
                                                then drop(mapParts[1], 4)
654
654
 
                                                else (dropRight(mapParts[0], 1) + drop(mapParts[1], 3))
655
655
 
                                            let stakeResult = invoke(this, "sendLockedAcres", [winner, promo3AwardPerRound[(roundId - 1)], 30], nil)
656
-
                                            $Tuple4((ac._1 - r._2), fromBase58String(getStringValue(stakingContract, keyLastTxIdByUser(winner))), newMap, (ac._4 :+ stakeResult))
656
+
                                            let newSalt = fromBase58String(valueOrElse(getString(stakingContract, keyLastTxIdByUser(winner)), "DEFAULT"))
657
+
                                            $Tuple4((ac._1 - r._2), newSalt, newMap, (ac._4 :+ stakeResult))
657
658
 
                                            }
658
659
 
                                    }
659
660
 
660
661
 
                            let draws = {
661
662
 
                                let $l = ITER6
662
663
 
                                let $s = size($l)
663
664
 
                                let $acc0 = $Tuple4(maxValue, i.transactionId, promo3Map, nil)
664
665
 
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
665
666
 
                                    then $a
666
667
 
                                    else singleDraw($a, $l[$i])
667
668
 
668
669
 
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
669
670
 
                                    then $a
670
671
 
                                    else throw("List size exceeds 6")
671
672
 
672
673
 
                                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
673
674
 
                                }
674
675
 
                            $Tuple2([DeleteEntry(finishKey), StringEntry(keyPromo3MapForRound((roundId + 1)), draws._3), IntegerEntry(keyTicketsTotalByPromoAndRound(3, (roundId + 1)), draws._1)], draws._4)
675
676
 
                            }
676
677
 
                    }
677
678
 
            }
678
679
 
679
680
 

github/deemru/w8io/3ef1775 
79.78 ms ◑