tx · 6wtoAm8MX5XaLQzjHAbe1kRpigouPL7kdNGMC2QPTLUr

3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg:  -0.00900000 Waves

2023.09.30 19:41 [2778417] smart account 3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6wtoAm8MX5XaLQzjHAbe1kRpigouPL7kdNGMC2QPTLUr",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1696092136606,
    "version": 2,
    "chainId": 84,
    "sender": "3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg",
    "senderPublicKey": "5BN6FQeKuMm2XJYToUZvbBX4UELGpE3Z47P4q6sP46PG",
    "proofs": [
        "5GhiPCXCWq6ZN928BxkPjhAMqnqmY9MXrkiW2oEhX14ogco6Z2ofufRUsJ3XTTv5muSvhDHV2mJhoxw5JsDuvTDd"
    ],
    "script": "base64:BgIdCAISBAoCCAESABIDCgEBEgASAwoBARIAEgMKAQgrAAhNSUxMSU9ONgCAgOmDsd4WAAlEQVlNSUxMSVMAgLiZKQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyABNhY3Jlc1N0YWtlZFRvdGFsS2V5AhZhY3Jlc1N0YWtlZEFtb3VudFRvdGFsAAp4cE5ld1NMYW5kAMCWsQIAD0RBSUxZUkVTQllQSUVDRQCA+NIBABVVU0RUMkFDUkVTX01VTFRJUExJRVIACgAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACAA1JZHhDZmdXbGdEYXBwAAQAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwABRhY3Jlc0lzc3VlZEFtb3VudEtleQIRYWNyZXNJc3N1ZWRBbW91bnQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgALSWR4RWZmVG90YWwAAAERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ5hc1R3b0ludHNUdXBsZQEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQCdDIFByRtYXRjaDAFAnQyCQACAQIcZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50KQEOZ2V0Vm90aW5nUG93ZXIBEnVzZXJBZGRyU3RyT3JFbXB0eQQFcHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARFrZXlSZXNQcm9wb3J0aW9ucwACCzBfMF8wXzBfMF8wAgFfCgEFYWRkZXICA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0ECnRvdGFsUG93ZXIKAAIkbAUFcHJvcHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp1c2Vyc1Bvd2VyCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBRJ1c2VyQWRkclN0ck9yRW1wdHkAAAkAzAgCBQp0b3RhbFBvd2VyCQDMCAIFCnVzZXJzUG93ZXIFA25pbAEKZml4ZWRQb2ludAIDdmFsCGRlY2ltYWxzBAZ0ZW5Qb3cJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQRET1dOBAdsb3dQYXJ0CQCkAwEJAGoCBQN2YWwFBnRlblBvdwQGemVyb2VzCQCwAgIJAKQDAQUGdGVuUG93CQBkAgABCQCxAgEFB2xvd1BhcnQJAKwCAgkArAICCQCsAgIJAKQDAQkAaQIFA3ZhbAUGdGVuUG93AgEuBQZ6ZXJvZXMFB2xvd1BhcnQACndoYWxlc0xpc3QJAM0IAgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAUDbmlsAwkAAAIBAVQFByRtYXRjaDAJAMwIAgIjM010QmdKVGFMeFBCM0M3VUpEMVVFOHFqa0h0aGZLdkZRWVkJAMwIAgIjM04zZ1NGclR3Z2lMQUZaSE11SnJFdHRodDFuUGhua3B2anMFA25pbAkAAgECDVVua25vd24gY2hhaW4JAKUIAQUEdGhpcwEGcHJvbG9nAAkBBWFzSW50AQkA/AcEBQ9zdGFraW5nQ29udHJhY3QCCnNhdmVMYXN0VHgFA25pbAUDbmlsARJjbGFpbUFjcmVzSW50ZXJuYWwDBGFkZHILYWNyZXNBbW91bnQNbGFzdENsYWltVGltZQQJZGVsdGFUaW1lCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAFDWxhc3RDbGFpbVRpbWUECGF2YWlsUmVzCQBrAwUJZGVsdGFUaW1lCQBoAgUPREFJTFlSRVNCWVBJRUNFBQthY3Jlc0Ftb3VudAkAaAIFCURBWU1JTExJUwUFTVVMVDgECmNhbkdldFVzZHQJAQVhc0ludAEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhpzZWxsUmVzb3VyY2VzV29ybGRSRUFET05MWQkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwEB2dvdFVzZHQJAJYDAQkAzAgCAAAJAMwIAgUKY2FuR2V0VXNkdAUDbmlsCQBoAgUHZ290VXNkdAUVVVNEVDJBQ1JFU19NVUxUSVBMSUVSAQ1jbGFpbUludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ1sYXN0Q2xhaW1UaW1lAwkAZgIAAAUJZGVsdGFUaW1lCQACAQkArAICCQCsAgIJAKwCAgImU2F2ZWQgdGltZXN0YW1wIGlzIGluIGZ1dHVyZSwgc2F2ZWQgPSAJAKQDAQUNbGFzdENsYWltVGltZQIMLCBjdXJyZW50ID0gCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFD0RBSUxZUkVTQllQSUVDRQULYWNyZXNBbW91bnQJAGgCBQlEQVlNSUxMSVMFBU1VTFQ4BApjYW5HZXRVc2R0CQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIac2VsbFJlc291cmNlc1dvcmxkUkVBRE9OTFkJAMwIAgUIYXZhaWxSZXMFA25pbAUDbmlsBAdnb3RVc2R0AwkAZwIAAAUKY2FuR2V0VXNkdAAACAkBDmFzVHdvSW50c1R1cGxlAQkA/AcEBQ9lY29ub215Q29udHJhY3QCEnNlbGxSZXNvdXJjZXNXb3JsZAkAzAgCBQRhZGRyCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAJfMQkAaAIFB2dvdFVzZHQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgcBaQENY29uc3RydWN0b3JWMQIIcmVzdEFkZHIOdW5zdGFrZWRQaWVjZXMDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAMJAQlpc0RlZmluZWQBCQChCAEFD2FjcmVzQXNzZXRJZEtleQkAAgECE0FscmVhZHkgaW5pdGlhbGl6ZWQECG5mdEFjcmVzCQBkAgkAkQMCCQEOZ2V0Vm90aW5nUG93ZXIBAgAFC0lkeEVmZlRvdGFsBQ51bnN0YWtlZFBpZWNlcwQMaXNzdWVkQW1vdW50CQBlAgUITUlMTElPTjYJAGgCBQhuZnRBY3JlcwUFTVVMVDgEBWlzc3VlCQDDCAcCBUFDUkVTAiZXYXZlc0xhbmRzIGxhbmQgYWNyZXMgaW52ZXN0bWVudCB0b2tlbgUMaXNzdWVkQW1vdW50AAgHBQR1bml0AAAEB2Fzc2V0SWQJALgIAQUFaXNzdWUJAMwIAgUFaXNzdWUJAMwIAgkBDEludGVnZXJFbnRyeQIFFGFjcmVzSXNzdWVkQW1vdW50S2V5BQxpc3N1ZWRBbW91bnQJAMwIAgkBC0JpbmFyeUVudHJ5AgUPYWNyZXNBc3NldElkS2V5BQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlSZXN0QWRkcmVzcwAFCHJlc3RBZGRyBQNuaWwBaQEKc3Rha2VBY3JlcwAEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwAEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAQDcG10CQCRAwIIBQFpCHBheW1lbnRzAAAEA2FtdAgFA3BtdAZhbW91bnQDAwkBASEBCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkBgkBAiE9AgkBBXZhbHVlAQgFA3BtdAdhc3NldElkBQxhY3Jlc0Fzc2V0SWQJAAIBAhRBQ1JFUyBwYXltZW50cyBvbmx5IQQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECG9sZFRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFE2FjcmVzU3Rha2VkVG90YWxLZXkAAAQJd2xnUmVzdWx0CQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwEDGNsYWltZWRBY3JlcwkBDWNsYWltSW50ZXJuYWwDBQdhZGRyZXNzBQ5vbGRBY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAJAJQKAgkAzQgCCQDNCAIJAM0IAgMJAAACBQxjbGFpbWVkQWNyZXMAAAUDbmlsCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUMY2xhaW1lZEFjcmVzBQxhY3Jlc0Fzc2V0SWQFA25pbAkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBkAgUOb2xkQWNyZXNBbW91bnQFA2FtdAkBDEludGVnZXJFbnRyeQIFE2FjcmVzU3Rha2VkVG90YWxLZXkJAGQCBQhvbGRUb3RhbAUDYW10CQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0AWkBDHVuc3Rha2VBY3JlcwEGYW1vdW50BAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cAAwkAZwIAAAUGYW1vdW50CQACAQIZQW1vdW50IHNob3VsZCBiZSBwb3NpdGl2ZQQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAhRObyBwYXltZW50cyByZXF1aXJlZAQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAADCQBmAgUGYW1vdW50BQ5vbGRBY3Jlc0Ftb3VudAkAAgEJAKwCAgkArAICCQCsAgICDllvdSBoYXZlIG9ubHkgCQEKZml4ZWRQb2ludAIFDm9sZEFjcmVzQW1vdW50AAgCICBBQ1JFUyBzdGFrZWQsIHRyaWVkIHRvIHVuc3Rha2UgCQEKZml4ZWRQb2ludAIFBmFtb3VudAAIBAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRNhY3Jlc1N0YWtlZFRvdGFsS2V5AAAECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwUOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFB3RpbWVLZXkIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQlhbW91bnRLZXkJAGUCBQ5vbGRBY3Jlc0Ftb3VudAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBlAgUIb2xkVG90YWwFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGQCBQZhbW91bnQFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAJQKAgUMcHJvbG9nUmVzdWx0BQl3bGdSZXN1bHQBaQEIYnV5QWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQEhAQkBD2NvbnRhaW5zRWxlbWVudAIFCndoYWxlc0xpc3QFB2FkZHJlc3MJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAULdXNkdEFzc2V0SWQJAAIBAhNVU0RUIHBheW1lbnRzIG9ubHkhAwkAZgIFBU1VTFQ2BQNhbXQJAAIBCQCsAgIJAKwCAgIWTWluIHBheW1lbnQgc2hvdWxkIGJlIAkBCmZpeGVkUG9pbnQCBQVNVUxUNgAGAgUgVVNEVAQLYWNyZXNBbW91bnQJAGgCBQNhbXQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgQOYWNjU3RhdHNSZXN1bHQJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Ag51cGRhdGVBY2NTdGF0cwkAzAgCBQdhZGRyZXNzCQDMCAIJAGsDBQp4cE5ld1NMYW5kBQthY3Jlc0Ftb3VudAkAaAIAGQUFTVVMVDgFA25pbAUDbmlsCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUPZWNvbm9teUNvbnRyYWN0BQNhbXQFC3VzZHRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYWNyZXNBbW91bnQFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUOYWNjU3RhdHNSZXN1bHQBaQEJYnVybkFjcmVzAQZhbW91bnQDCQECIT0CCAUBaQZjYWxsZXIFD3N0YWtpbmdDb250cmFjdAkAAgECEVBlcm1pc3Npb24gZGVuaWVkCQCUCgIJAMwIAgkBBEJ1cm4CBQxhY3Jlc0Fzc2V0SWQFBmFtb3VudAUDbmlsBQZhbW91bnQBaQEKY2xhaW1BY3JlcwAEDHByb2xvZ1Jlc3VsdAkBBnByb2xvZwAEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAJQKAgUMcHJvbG9nUmVzdWx0BQl3bGdSZXN1bHQBaQESY2xhaW1BY3Jlc1JFQURPTkxZAQdhZGRyZXNzBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBAthY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQIbGFzdFRpbWUJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAABAxjbGFpbWVkQWNyZXMJARJjbGFpbUFjcmVzSW50ZXJuYWwDBQdhZGRyZXNzBQthY3Jlc0Ftb3VudAUIbGFzdFRpbWUJAJQKAgUDbmlsCQDMCAIFDGNsYWltZWRBY3JlcwkAzAgCBQhsYXN0VGltZQUDbmlsAPgVX48=",
    "height": 2778417,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6vv8YwYhwBUM2CT6p7RHVdVs6JH5KDXxvrAFjpSZaseE
Next: HySWJNj8Ji6a5We8tXu1FJrcw8ChqVoZ2jjqwujqr3iy

Diff: 

OldNewDifferences
141141     }
142142 
143143 
144+let whalesList = (match chain {
145+    case _ => 
146+        if ((base58'2W' == $match0))
147+            then nil
148+            else if ((base58'2T' == $match0))
149+                then ["3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY", "3N3gSFrTwgiLAFZHMuJrEttht1nPhnkpvjs"]
150+                else throw("Unknown chain")
151+} :+ toString(this))
152+
144153 func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
145154 
146155 
243252 func buyAcres () = {
244253     let prologResult = prolog()
245254     let address = toString(i.caller)
246-    if ((size(i.payments) != 1))
247-        then throw("exactly 1 payment must be attached")
248-        else {
249-            let pmt = i.payments[0]
250-            let amt = pmt.amount
251-            if (if (!(isDefined(pmt.assetId)))
252-                then true
253-                else (value(pmt.assetId) != usdtAssetId))
254-                then throw("USDT payments only!")
255-                else if ((MULT6 > amt))
256-                    then throw((("Min payment should be " + fixedPoint(MULT6, 6)) + " USDT"))
257-                    else {
258-                        let acresAmount = (amt * USDT2ACRES_MULTIPLIER)
259-                        let accStatsResult = asInt(invoke(stakingContract, "updateAccStats", [address, fraction(xpNewSLand, acresAmount, (25 * MULT8))], nil))
260-                        $Tuple2([ScriptTransfer(economyContract, amt, usdtAssetId), ScriptTransfer(i.caller, acresAmount, acresAssetId)], $Tuple2(prologResult, accStatsResult))
261-                        }
262-            }
255+    if (!(containsElement(whalesList, address)))
256+        then throw("Permission denied")
257+        else if ((size(i.payments) != 1))
258+            then throw("exactly 1 payment must be attached")
259+            else {
260+                let pmt = i.payments[0]
261+                let amt = pmt.amount
262+                if (if (!(isDefined(pmt.assetId)))
263+                    then true
264+                    else (value(pmt.assetId) != usdtAssetId))
265+                    then throw("USDT payments only!")
266+                    else if ((MULT6 > amt))
267+                        then throw((("Min payment should be " + fixedPoint(MULT6, 6)) + " USDT"))
268+                        else {
269+                            let acresAmount = (amt * USDT2ACRES_MULTIPLIER)
270+                            let accStatsResult = asInt(invoke(stakingContract, "updateAccStats", [address, fraction(xpNewSLand, acresAmount, (25 * MULT8))], nil))
271+                            $Tuple2([ScriptTransfer(economyContract, amt, usdtAssetId), ScriptTransfer(i.caller, acresAmount, acresAssetId)], $Tuple2(prologResult, accStatsResult))
272+                            }
273+                }
263274     }
264275 
265276 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let MILLION6 = 100000000000000
55 
66 let DAYMILLIS = 86400000
77 
88 func keyAcresStakedAmountByUser (addr) = ("acresStakedAmountByUser_" + addr)
99 
1010 
1111 let acresStakedTotalKey = "acresStakedAmountTotal"
1212 
1313 let xpNewSLand = 5000000
1414 
1515 let DAILYRESBYPIECE = 3456000
1616 
1717 let USDT2ACRES_MULTIPLIER = 10
1818 
1919 let chain = take(drop(this.bytes, 1), 1)
2020 
2121 let usdtAssetId = match chain {
2222     case _ => 
2323         if ((base58'2W' == $match0))
2424             then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
2525             else if ((base58'2T' == $match0))
2626                 then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
2727                 else throw("Unknown chain")
2828 }
2929 
3030 let defaultRestAddressStr = match chain {
3131     case _ => 
3232         if ((base58'2W' == $match0))
3333             then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
3434             else if ((base58'2T' == $match0))
3535                 then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
3636                 else throw("Unknown chain")
3737 }
3838 
3939 let SEP = "__"
4040 
4141 let MULT6 = 1000000
4242 
4343 let MULT8 = 100000000
4444 
4545 func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
4646 
4747 
4848 let IdxCfgStakingDapp = 1
4949 
5050 let IdxCfgEconomyDapp = 2
5151 
5252 let IdxCfgWlgDapp = 4
5353 
5454 let IdxCfgAcresDapp = 8
5555 
5656 func keyRestCfg () = "%s__restConfig"
5757 
5858 
5959 func keyRestAddress () = "%s__restAddr"
6060 
6161 
6262 func readRestCfgOrFail (rest) = split_4C(getStringOrFail(rest, keyRestCfg()), SEP)
6363 
6464 
6565 func getContractAddressOrFail (restCfg,idx) = valueOrErrorMessage(addressFromString(restCfg[idx]), ("Rest cfg doesn't contain address at index " + toString(idx)))
6666 
6767 
6868 let restContract = addressFromStringValue(valueOrElse(getString(this, keyRestAddress()), defaultRestAddressStr))
6969 
7070 let restCfg = readRestCfgOrFail(restContract)
7171 
7272 let stakingContract = getContractAddressOrFail(restCfg, IdxCfgStakingDapp)
7373 
7474 let economyContract = getContractAddressOrFail(restCfg, IdxCfgEconomyDapp)
7575 
7676 let wlgContract = getContractAddressOrFail(restCfg, IdxCfgWlgDapp)
7777 
7878 let acresContract = getContractAddressOrFail(restCfg, IdxCfgAcresDapp)
7979 
8080 let acresIssuedAmountKey = "acresIssuedAmount"
8181 
8282 let acresAssetIdKey = "acresAssetId"
8383 
8484 let acresAssetId = valueOrErrorMessage(getBinary(acresContract, acresAssetIdKey), "ACRES is not issued yet")
8585 
8686 func keyAcresStakedTimeByUser (addr) = ("acresStakedTimeByUser_" + addr)
8787 
8888 
8989 let IdxEffTotal = 0
9090 
9191 func keyResProportions () = "resTypesProportions"
9292 
9393 
9494 func keyStakedPiecesByOwner (ownerAddr) = ("stakedPiecesByOwner_" + ownerAddr)
9595 
9696 
9797 func asInt (v) = match v {
9898     case n: Int => 
9999         n
100100     case _ => 
101101         throw("fail to cast into Int")
102102 }
103103 
104104 
105105 func asTwoIntsTuple (val) = match val {
106106     case t2: (Int, Int) => 
107107         t2
108108     case _ => 
109109         throw("fail to cast into (Int, Int)")
110110 }
111111 
112112 
113113 func getVotingPower (userAddrStrOrEmpty) = {
114114     let props = split(valueOrElse(getString(stakingContract, keyResProportions()), "0_0_0_0_0_0"), "_")
115115     func adder (acc,item) =     (acc + parseIntValue(item))
116116 
117117     let totalPower = {
118118         let $l = props
119119         let $s = size($l)
120120         let $acc0 = 0
121121         func $f0_1 ($a,$i) =         if (($i >= $s))
122122             then $a
123123             else adder($a, $l[$i])
124124 
125125         func $f0_2 ($a,$i) =         if (($i >= $s))
126126             then $a
127127             else throw("List size exceeds 6")
128128 
129129         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
130130         }
131131     let usersPower = valueOrElse(getInteger(stakingContract, keyStakedPiecesByOwner(userAddrStrOrEmpty)), 0)
132132 [totalPower, usersPower]
133133     }
134134 
135135 
136136 func fixedPoint (val,decimals) = {
137137     let tenPow = pow(10, 0, decimals, 0, 0, DOWN)
138138     let lowPart = toString((val % tenPow))
139139     let zeroes = drop(toString(tenPow), (1 + size(lowPart)))
140140     (((toString((val / tenPow)) + ".") + zeroes) + lowPart)
141141     }
142142 
143143 
144+let whalesList = (match chain {
145+    case _ => 
146+        if ((base58'2W' == $match0))
147+            then nil
148+            else if ((base58'2T' == $match0))
149+                then ["3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY", "3N3gSFrTwgiLAFZHMuJrEttht1nPhnkpvjs"]
150+                else throw("Unknown chain")
151+} :+ toString(this))
152+
144153 func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
145154 
146155 
147156 func claimAcresInternal (addr,acresAmount,lastClaimTime) = {
148157     let deltaTime = (lastBlock.timestamp - lastClaimTime)
149158     let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
150159     let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
151160     let gotUsdt = max([0, canGetUsdt])
152161     (gotUsdt * USDT2ACRES_MULTIPLIER)
153162     }
154163 
155164 
156165 func claimInternal (addr,acresAmount,lastClaimTime) = {
157166     let deltaTime = (lastBlock.timestamp - lastClaimTime)
158167     if ((0 > deltaTime))
159168         then throw(((("Saved timestamp is in future, saved = " + toString(lastClaimTime)) + ", current = ") + toString(lastBlock.timestamp)))
160169         else {
161170             let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
162171             let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
163172             let gotUsdt = if ((0 >= canGetUsdt))
164173                 then 0
165174                 else asTwoIntsTuple(invoke(economyContract, "sellResourcesWorld", [addr, availRes], nil))._1
166175             (gotUsdt * USDT2ACRES_MULTIPLIER)
167176             }
168177     }
169178 
170179 
171180 @Callable(i)
172181 func constructorV1 (restAddr,unstakedPieces) = if ((i.caller != this))
173182     then throw("Permission denied")
174183     else if (isDefined(getBinary(acresAssetIdKey)))
175184         then throw("Already initialized")
176185         else {
177186             let nftAcres = (getVotingPower("")[IdxEffTotal] + unstakedPieces)
178187             let issuedAmount = (MILLION6 - (nftAcres * MULT8))
179188             let issue = Issue("ACRES", "WavesLands land acres investment token", issuedAmount, 8, false, unit, 0)
180189             let assetId = calculateAssetId(issue)
181190 [issue, IntegerEntry(acresIssuedAmountKey, issuedAmount), BinaryEntry(acresAssetIdKey, assetId), StringEntry(keyRestAddress(), restAddr)]
182191             }
183192 
184193 
185194 
186195 @Callable(i)
187196 func stakeAcres () = {
188197     let prologResult = prolog()
189198     let address = toString(i.caller)
190199     if ((size(i.payments) != 1))
191200         then throw("exactly 1 payment must be attached")
192201         else {
193202             let pmt = i.payments[0]
194203             let amt = pmt.amount
195204             if (if (!(isDefined(pmt.assetId)))
196205                 then true
197206                 else (value(pmt.assetId) != acresAssetId))
198207                 then throw("ACRES payments only!")
199208                 else {
200209                     let timeKey = keyAcresStakedTimeByUser(address)
201210                     let amountKey = keyAcresStakedAmountByUser(address)
202211                     let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
203212                     let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
204213                     let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
205214                     let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
206215                     $Tuple2(((((if ((claimedAcres == 0))
207216                         then nil
208217                         else [ScriptTransfer(i.caller, claimedAcres, acresAssetId)]) :+ IntegerEntry(timeKey, lastBlock.timestamp)) :+ IntegerEntry(amountKey, (oldAcresAmount + amt))) :+ IntegerEntry(acresStakedTotalKey, (oldTotal + amt))), $Tuple2(prologResult, wlgResult))
209218                     }
210219             }
211220     }
212221 
213222 
214223 
215224 @Callable(i)
216225 func unstakeAcres (amount) = {
217226     let prologResult = prolog()
218227     if ((0 >= amount))
219228         then throw("Amount should be positive")
220229         else {
221230             let address = toString(i.caller)
222231             if ((size(i.payments) != 0))
223232                 then throw("No payments required")
224233                 else {
225234                     let timeKey = keyAcresStakedTimeByUser(address)
226235                     let amountKey = keyAcresStakedAmountByUser(address)
227236                     let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
228237                     if ((amount > oldAcresAmount))
229238                         then throw(((("You have only " + fixedPoint(oldAcresAmount, 8)) + " ACRES staked, tried to unstake ") + fixedPoint(amount, 8)))
230239                         else {
231240                             let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
232241                             let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
233242                             let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
234243                             $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2(prologResult, wlgResult))
235244                             }
236245                     }
237246             }
238247     }
239248 
240249 
241250 
242251 @Callable(i)
243252 func buyAcres () = {
244253     let prologResult = prolog()
245254     let address = toString(i.caller)
246-    if ((size(i.payments) != 1))
247-        then throw("exactly 1 payment must be attached")
248-        else {
249-            let pmt = i.payments[0]
250-            let amt = pmt.amount
251-            if (if (!(isDefined(pmt.assetId)))
252-                then true
253-                else (value(pmt.assetId) != usdtAssetId))
254-                then throw("USDT payments only!")
255-                else if ((MULT6 > amt))
256-                    then throw((("Min payment should be " + fixedPoint(MULT6, 6)) + " USDT"))
257-                    else {
258-                        let acresAmount = (amt * USDT2ACRES_MULTIPLIER)
259-                        let accStatsResult = asInt(invoke(stakingContract, "updateAccStats", [address, fraction(xpNewSLand, acresAmount, (25 * MULT8))], nil))
260-                        $Tuple2([ScriptTransfer(economyContract, amt, usdtAssetId), ScriptTransfer(i.caller, acresAmount, acresAssetId)], $Tuple2(prologResult, accStatsResult))
261-                        }
262-            }
255+    if (!(containsElement(whalesList, address)))
256+        then throw("Permission denied")
257+        else if ((size(i.payments) != 1))
258+            then throw("exactly 1 payment must be attached")
259+            else {
260+                let pmt = i.payments[0]
261+                let amt = pmt.amount
262+                if (if (!(isDefined(pmt.assetId)))
263+                    then true
264+                    else (value(pmt.assetId) != usdtAssetId))
265+                    then throw("USDT payments only!")
266+                    else if ((MULT6 > amt))
267+                        then throw((("Min payment should be " + fixedPoint(MULT6, 6)) + " USDT"))
268+                        else {
269+                            let acresAmount = (amt * USDT2ACRES_MULTIPLIER)
270+                            let accStatsResult = asInt(invoke(stakingContract, "updateAccStats", [address, fraction(xpNewSLand, acresAmount, (25 * MULT8))], nil))
271+                            $Tuple2([ScriptTransfer(economyContract, amt, usdtAssetId), ScriptTransfer(i.caller, acresAmount, acresAssetId)], $Tuple2(prologResult, accStatsResult))
272+                            }
273+                }
263274     }
264275 
265276 
266277 
267278 @Callable(i)
268279 func burnAcres (amount) = if ((i.caller != stakingContract))
269280     then throw("Permission denied")
270281     else $Tuple2([Burn(acresAssetId, amount)], amount)
271282 
272283 
273284 
274285 @Callable(i)
275286 func claimAcres () = {
276287     let prologResult = prolog()
277288     let address = toString(i.caller)
278289     if ((size(i.payments) != 0))
279290         then throw("No payments required")
280291         else {
281292             let timeKey = keyAcresStakedTimeByUser(address)
282293             let amountKey = keyAcresStakedAmountByUser(address)
283294             let acresAmount = valueOrElse(getInteger(amountKey), 0)
284295             let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
285296             let claimedAcres = claimInternal(address, acresAmount, valueOrElse(getInteger(timeKey), 0))
286297             $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), ScriptTransfer(i.caller, claimedAcres, acresAssetId)], $Tuple2(prologResult, wlgResult))
287298             }
288299     }
289300 
290301 
291302 
292303 @Callable(i)
293304 func claimAcresREADONLY (address) = {
294305     let timeKey = keyAcresStakedTimeByUser(address)
295306     let amountKey = keyAcresStakedAmountByUser(address)
296307     let acresAmount = valueOrElse(getInteger(amountKey), 0)
297308     let lastTime = valueOrElse(getInteger(timeKey), 0)
298309     let claimedAcres = claimAcresInternal(address, acresAmount, lastTime)
299310     $Tuple2(nil, [claimedAcres, lastTime])
300311     }
301312 
302313 
github/deemru/w8io/026f985 
42.88 ms ◑