tx · HySWJNj8Ji6a5We8tXu1FJrcw8ChqVoZ2jjqwujqr3iy

3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg:  -0.00800000 Waves

2023.10.04 18:57 [2784101] smart account 3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HySWJNj8Ji6a5We8tXu1FJrcw8ChqVoZ2jjqwujqr3iy",
    "fee": 800000,
    "feeAssetId": null,
    "timestamp": 1696435098205,
    "version": 2,
    "chainId": 84,
    "sender": "3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg",
    "senderPublicKey": "5BN6FQeKuMm2XJYToUZvbBX4UELGpE3Z47P4q6sP46PG",
    "proofs": [
        "3iCGEuhag9NbpcA8Fu5wFk4Q5iKL1ZhRNTADaorqFLM3aEDzFA3RdVBgkVyoRSK7gLv89m2JFNWJn9dj98Nvzijj"
    ],
    "script": "base64:BgIdCAISBAoCCAESABIDCgEBEgASAwoBARIAEgMKAQgqAAhNSUxMSU9ONgCAgOmDsd4WAAlEQVlNSUxMSVMAgLiZKQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyABNhY3Jlc1N0YWtlZFRvdGFsS2V5AhZhY3Jlc1N0YWtlZEFtb3VudFRvdGFsAAp4cE5ld1NMYW5kAMCWsQIAD0RBSUxZUkVTQllQSUVDRQCA+NIBABVVU0RUMkFDUkVTX01VTFRJUExJRVIACgAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACAA1JZHhDZmdXbGdEYXBwAAQAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwABRhY3Jlc0lzc3VlZEFtb3VudEtleQIRYWNyZXNJc3N1ZWRBbW91bnQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgALSWR4RWZmVG90YWwAAAERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ5hc1R3b0ludHNUdXBsZQEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIKKEludCwgSW50KQQCdDIFByRtYXRjaDAFAnQyCQACAQIcZmFpbCB0byBjYXN0IGludG8gKEludCwgSW50KQEOZ2V0Vm90aW5nUG93ZXIBEnVzZXJBZGRyU3RyT3JFbXB0eQQFcHJvcHMJALUJAgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ9zdGFraW5nQ29udHJhY3QJARFrZXlSZXNQcm9wb3J0aW9ucwACCzBfMF8wXzBfMF8wAgFfCgEFYWRkZXICA2FjYwRpdGVtCQBkAgUDYWNjCQENcGFyc2VJbnRWYWx1ZQEFBGl0ZW0ECnRvdGFsUG93ZXIKAAIkbAUFcHJvcHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBWFkZGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGBAp1c2Vyc1Bvd2VyCQELdmFsdWVPckVsc2UCCQCaCAIFD3N0YWtpbmdDb250cmFjdAkBFmtleVN0YWtlZFBpZWNlc0J5T3duZXIBBRJ1c2VyQWRkclN0ck9yRW1wdHkAAAkAzAgCBQp0b3RhbFBvd2VyCQDMCAIFCnVzZXJzUG93ZXIFA25pbAEKZml4ZWRQb2ludAIDdmFsCGRlY2ltYWxzBAZ0ZW5Qb3cJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQRET1dOBAdsb3dQYXJ0CQCkAwEJAGoCBQN2YWwFBnRlblBvdwQGemVyb2VzCQCwAgIJAKQDAQUGdGVuUG93CQBkAgABCQCxAgEFB2xvd1BhcnQJAKwCAgkArAICCQCsAgIJAKQDAQkAaQIFA3ZhbAUGdGVuUG93AgEuBQZ6ZXJvZXMFB2xvd1BhcnQBBnByb2xvZwAJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAESY2xhaW1BY3Jlc0ludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ1sYXN0Q2xhaW1UaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFD0RBSUxZUkVTQllQSUVDRQULYWNyZXNBbW91bnQJAGgCBQlEQVlNSUxMSVMFBU1VTFQ4BApjYW5HZXRVc2R0CQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIac2VsbFJlc291cmNlc1dvcmxkUkVBRE9OTFkJAMwIAgUIYXZhaWxSZXMFA25pbAUDbmlsBAdnb3RVc2R0CQCWAwEJAMwIAgAACQDMCAIFCmNhbkdldFVzZHQFA25pbAkAaAIFB2dvdFVzZHQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgENY2xhaW1JbnRlcm5hbAMEYWRkcgthY3Jlc0Ftb3VudA1sYXN0Q2xhaW1UaW1lBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUNbGFzdENsYWltVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEFDWxhc3RDbGFpbVRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBQ9EQUlMWVJFU0JZUElFQ0UFC2FjcmVzQW1vdW50CQBoAgUJREFZTUlMTElTBQVNVUxUOAQKY2FuR2V0VXNkdAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnNlbGxSZXNvdXJjZXNXb3JsZFJFQURPTkxZCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAQHZ290VXNkdAMJAGcCAAAFCmNhbkdldFVzZHQAAAgJAQ5hc1R3b0ludHNUdXBsZQEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhJzZWxsUmVzb3VyY2VzV29ybGQJAMwIAgUEYWRkcgkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwCXzEJAGgCBQdnb3RVc2R0BRVVU0RUMkFDUkVTX01VTFRJUExJRVIHAWkBDWNvbnN0cnVjdG9yVjECCHJlc3RBZGRyDnVuc3Rha2VkUGllY2VzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQEJaXNEZWZpbmVkAQkAoQgBBQ9hY3Jlc0Fzc2V0SWRLZXkJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBAhuZnRBY3JlcwkAZAIJAJEDAgkBDmdldFZvdGluZ1Bvd2VyAQIABQtJZHhFZmZUb3RhbAUOdW5zdGFrZWRQaWVjZXMEDGlzc3VlZEFtb3VudAkAZQIFCE1JTExJT042CQBoAgUIbmZ0QWNyZXMFBU1VTFQ4BAVpc3N1ZQkAwwgHAgVBQ1JFUwImV2F2ZXNMYW5kcyBsYW5kIGFjcmVzIGludmVzdG1lbnQgdG9rZW4FDGlzc3VlZEFtb3VudAAIBwUEdW5pdAAABAdhc3NldElkCQC4CAEFBWlzc3VlCQDMCAIFBWlzc3VlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRhY3Jlc0lzc3VlZEFtb3VudEtleQUMaXNzdWVkQW1vdW50CQDMCAIJAQtCaW5hcnlFbnRyeQIFD2FjcmVzQXNzZXRJZEtleQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBCnN0YWtlQWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRNhY3Jlc1N0YWtlZFRvdGFsS2V5AAAECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwUOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIJAM0IAgkAzQgCCQDNCAIDCQAAAgUMY2xhaW1lZEFjcmVzAAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkBDEludGVnZXJFbnRyeQIFCWFtb3VudEtleQkAZAIFDm9sZEFjcmVzQW1vdW50BQNhbXQJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFA2FtdAkAlAoCBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAFpAQx1bnN0YWtlQWNyZXMBBmFtb3VudAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAMJAGcCAAAFBmFtb3VudAkAAgECGUFtb3VudCBzaG91bGQgYmUgcG9zaXRpdmUEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAAAwkAZgIFBmFtb3VudAUOb2xkQWNyZXNBbW91bnQJAAIBCQCsAgIJAKwCAgkArAICAg5Zb3UgaGF2ZSBvbmx5IAkBCmZpeGVkUG9pbnQCBQ5vbGRBY3Jlc0Ftb3VudAAIAiAgQUNSRVMgc3Rha2VkLCB0cmllZCB0byB1bnN0YWtlIAkBCmZpeGVkUG9pbnQCBQZhbW91bnQACAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBlAgUOb2xkQWNyZXNBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYWNyZXNTdGFrZWRUb3RhbEtleQkAZQIFCG9sZFRvdGFsBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBkAgUGYW1vdW50BQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0AWkBCGJ1eUFjcmVzAAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQMJAGYCBQVNVUxUNgUDYW10CQACAQkArAICCQCsAgICFk1pbiBwYXltZW50IHNob3VsZCBiZSAJAQpmaXhlZFBvaW50AgUFTVVMVDYABgIFIFVTRFQEC2FjcmVzQW1vdW50CQBoAgUDYW10BRVVU0RUMkFDUkVTX01VTFRJUExJRVIEDmFjY1N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQWNjU3RhdHMJAMwIAgUHYWRkcmVzcwkAzAgCCQBrAwUKeHBOZXdTTGFuZAULYWNyZXNBbW91bnQJAGgCABkFBU1VTFQ4BQNuaWwFA25pbAkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAUDYW10BQt1c2R0QXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2FjcmVzQW1vdW50BQxhY3Jlc0Fzc2V0SWQFA25pbAkAlAoCBQxwcm9sb2dSZXN1bHQFDmFjY1N0YXRzUmVzdWx0AWkBCWJ1cm5BY3JlcwEGYW1vdW50AwkBAiE9AggFAWkGY2FsbGVyBQ9zdGFraW5nQ29udHJhY3QJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAlAoCCQDMCAIJAQRCdXJuAgUMYWNyZXNBc3NldElkBQZhbW91bnQFA25pbAUGYW1vdW50AWkBCmNsYWltQWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBAthY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQJd2xnUmVzdWx0CQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwEDGNsYWltZWRBY3JlcwkBDWNsYWltSW50ZXJuYWwDBQdhZGRyZXNzBQthY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUHdGltZUtleQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0AWkBEmNsYWltQWNyZXNSRUFET05MWQEHYWRkcmVzcwQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQLYWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAECGxhc3RUaW1lCQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAQMY2xhaW1lZEFjcmVzCQESY2xhaW1BY3Jlc0ludGVybmFsAwUHYWRkcmVzcwULYWNyZXNBbW91bnQFCGxhc3RUaW1lCQCUCgIFA25pbAkAzAgCBQxjbGFpbWVkQWNyZXMJAMwIAgUIbGFzdFRpbWUFA25pbADEe/co",
    "height": 2784101,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6wtoAm8MX5XaLQzjHAbe1kRpigouPL7kdNGMC2QPTLUr
Next: HehUrzNui12Wkob1cB1oZ4rjcEKb2XBFDMRUnvEHjTrk

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-
153144 func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
154145 
155146 
252243 func buyAcres () = {
253244     let prologResult = prolog()
254245     let address = toString(i.caller)
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-                }
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+            }
274263     }
275264 
276265 

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-
153144 func prolog () = asInt(invoke(stakingContract, "saveLastTx", nil, nil))
154145 
155146 
156147 func claimAcresInternal (addr,acresAmount,lastClaimTime) = {
157148     let deltaTime = (lastBlock.timestamp - lastClaimTime)
158149     let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
159150     let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
160151     let gotUsdt = max([0, canGetUsdt])
161152     (gotUsdt * USDT2ACRES_MULTIPLIER)
162153     }
163154 
164155 
165156 func claimInternal (addr,acresAmount,lastClaimTime) = {
166157     let deltaTime = (lastBlock.timestamp - lastClaimTime)
167158     if ((0 > deltaTime))
168159         then throw(((("Saved timestamp is in future, saved = " + toString(lastClaimTime)) + ", current = ") + toString(lastBlock.timestamp)))
169160         else {
170161             let availRes = fraction(deltaTime, (DAILYRESBYPIECE * acresAmount), (DAYMILLIS * MULT8))
171162             let canGetUsdt = asInt(invoke(economyContract, "sellResourcesWorldREADONLY", [availRes], nil))
172163             let gotUsdt = if ((0 >= canGetUsdt))
173164                 then 0
174165                 else asTwoIntsTuple(invoke(economyContract, "sellResourcesWorld", [addr, availRes], nil))._1
175166             (gotUsdt * USDT2ACRES_MULTIPLIER)
176167             }
177168     }
178169 
179170 
180171 @Callable(i)
181172 func constructorV1 (restAddr,unstakedPieces) = if ((i.caller != this))
182173     then throw("Permission denied")
183174     else if (isDefined(getBinary(acresAssetIdKey)))
184175         then throw("Already initialized")
185176         else {
186177             let nftAcres = (getVotingPower("")[IdxEffTotal] + unstakedPieces)
187178             let issuedAmount = (MILLION6 - (nftAcres * MULT8))
188179             let issue = Issue("ACRES", "WavesLands land acres investment token", issuedAmount, 8, false, unit, 0)
189180             let assetId = calculateAssetId(issue)
190181 [issue, IntegerEntry(acresIssuedAmountKey, issuedAmount), BinaryEntry(acresAssetIdKey, assetId), StringEntry(keyRestAddress(), restAddr)]
191182             }
192183 
193184 
194185 
195186 @Callable(i)
196187 func stakeAcres () = {
197188     let prologResult = prolog()
198189     let address = toString(i.caller)
199190     if ((size(i.payments) != 1))
200191         then throw("exactly 1 payment must be attached")
201192         else {
202193             let pmt = i.payments[0]
203194             let amt = pmt.amount
204195             if (if (!(isDefined(pmt.assetId)))
205196                 then true
206197                 else (value(pmt.assetId) != acresAssetId))
207198                 then throw("ACRES payments only!")
208199                 else {
209200                     let timeKey = keyAcresStakedTimeByUser(address)
210201                     let amountKey = keyAcresStakedAmountByUser(address)
211202                     let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
212203                     let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
213204                     let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
214205                     let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
215206                     $Tuple2(((((if ((claimedAcres == 0))
216207                         then nil
217208                         else [ScriptTransfer(i.caller, claimedAcres, acresAssetId)]) :+ IntegerEntry(timeKey, lastBlock.timestamp)) :+ IntegerEntry(amountKey, (oldAcresAmount + amt))) :+ IntegerEntry(acresStakedTotalKey, (oldTotal + amt))), $Tuple2(prologResult, wlgResult))
218209                     }
219210             }
220211     }
221212 
222213 
223214 
224215 @Callable(i)
225216 func unstakeAcres (amount) = {
226217     let prologResult = prolog()
227218     if ((0 >= amount))
228219         then throw("Amount should be positive")
229220         else {
230221             let address = toString(i.caller)
231222             if ((size(i.payments) != 0))
232223                 then throw("No payments required")
233224                 else {
234225                     let timeKey = keyAcresStakedTimeByUser(address)
235226                     let amountKey = keyAcresStakedAmountByUser(address)
236227                     let oldAcresAmount = valueOrElse(getInteger(amountKey), 0)
237228                     if ((amount > oldAcresAmount))
238229                         then throw(((("You have only " + fixedPoint(oldAcresAmount, 8)) + " ACRES staked, tried to unstake ") + fixedPoint(amount, 8)))
239230                         else {
240231                             let oldTotal = valueOrElse(getInteger(acresStakedTotalKey), 0)
241232                             let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
242233                             let claimedAcres = claimInternal(address, oldAcresAmount, valueOrElse(getInteger(timeKey), 0))
243234                             $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), IntegerEntry(amountKey, (oldAcresAmount - amount)), IntegerEntry(acresStakedTotalKey, (oldTotal - amount)), ScriptTransfer(i.caller, (amount + claimedAcres), acresAssetId)], $Tuple2(prologResult, wlgResult))
244235                             }
245236                     }
246237             }
247238     }
248239 
249240 
250241 
251242 @Callable(i)
252243 func buyAcres () = {
253244     let prologResult = prolog()
254245     let address = toString(i.caller)
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-                }
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+            }
274263     }
275264 
276265 
277266 
278267 @Callable(i)
279268 func burnAcres (amount) = if ((i.caller != stakingContract))
280269     then throw("Permission denied")
281270     else $Tuple2([Burn(acresAssetId, amount)], amount)
282271 
283272 
284273 
285274 @Callable(i)
286275 func claimAcres () = {
287276     let prologResult = prolog()
288277     let address = toString(i.caller)
289278     if ((size(i.payments) != 0))
290279         then throw("No payments required")
291280         else {
292281             let timeKey = keyAcresStakedTimeByUser(address)
293282             let amountKey = keyAcresStakedAmountByUser(address)
294283             let acresAmount = valueOrElse(getInteger(amountKey), 0)
295284             let wlgResult = invoke(wlgContract, "onStakeUnstakeLand", [address], nil)
296285             let claimedAcres = claimInternal(address, acresAmount, valueOrElse(getInteger(timeKey), 0))
297286             $Tuple2([IntegerEntry(timeKey, lastBlock.timestamp), ScriptTransfer(i.caller, claimedAcres, acresAssetId)], $Tuple2(prologResult, wlgResult))
298287             }
299288     }
300289 
301290 
302291 
303292 @Callable(i)
304293 func claimAcresREADONLY (address) = {
305294     let timeKey = keyAcresStakedTimeByUser(address)
306295     let amountKey = keyAcresStakedAmountByUser(address)
307296     let acresAmount = valueOrElse(getInteger(amountKey), 0)
308297     let lastTime = valueOrElse(getInteger(timeKey), 0)
309298     let claimedAcres = claimAcresInternal(address, acresAmount, lastTime)
310299     $Tuple2(nil, [claimedAcres, lastTime])
311300     }
312301 
313302 
github/deemru/w8io/026f985 
38.98 ms ◑