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: 
Old
New
Differences
147
147
 
    }
148
148
 
149
149
 
150
-
let aq = ({
151
-
    let k = i
152
-
    if ((base58'2W' == k))
153
-
        then nil
154
-
        else if ((base58'2T' == k))
155
-
            then ["3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY", "3N3gSFrTwgiLAFZHMuJrEttht1nPhnkpvjs"]
156
-
            else throw("Unknown chain")
157
-
    } :+ toString(this))
158
-
159
-
func ar () = Q(invoke(E, "saveLastTx", nil, nil))
150
+
func aq () = Q(invoke(E, "saveLastTx", nil, nil))
160
151
 
161
152
 
162
-
func as (d,at,au) = {
163
-
    let av = (lastBlock.timestamp - au)
164
-
    let aw = fraction(av, (g * at), (b * o))
165
-
    let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
166
-
    let ay = max([0, ax])
167
-
    (ay * h)
153
+
func ar (d,as,at) = {
154
+
    let au = (lastBlock.timestamp - at)
155
+
    let av = fraction(au, (g * as), (b * o))
156
+
    let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
157
+
    let ax = max([0, aw])
158
+
    (ax * h)
168
159
 
    }
169
160
 
170
161
 
171
-
func az (d,at,au) = {
172
-
    let av = (lastBlock.timestamp - au)
173
-
    if ((0 > av))
174
-
        then throw(((("Saved timestamp is in future, saved = " + toString(au)) + ", current = ") + toString(lastBlock.timestamp)))
162
+
func ay (d,as,at) = {
163
+
    let au = (lastBlock.timestamp - at)
164
+
    if ((0 > au))
165
+
        then throw(((("Saved timestamp is in future, saved = " + toString(at)) + ", current = ") + toString(lastBlock.timestamp)))
175
166
 
        else {
176
-
            let aw = fraction(av, (g * at), (b * o))
177
-
            let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
178
-
            let ay = if ((0 >= ax))
167
+
            let av = fraction(au, (g * as), (b * o))
168
+
            let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
169
+
            let ax = if ((0 >= aw))
179
170
 
                then 0
180
-
                else T(invoke(F, "sellResourcesWorld", [d, aw], nil))._1
181
-
            (ay * h)
171
+
                else T(invoke(F, "sellResourcesWorld", [d, av], nil))._1
172
+
            (ax * h)
182
173
 
            }
183
174
 
    }
184
175
 
185
176
 
186
-
@Callable(aA)
187
-
func constructorV1 (aB,aC) = if ((aA.caller != this))
177
+
@Callable(az)
178
+
func constructorV1 (aA,aB) = if ((az.caller != this))
188
179
 
    then throw("Permission denied")
189
180
 
    else if (isDefined(getBinary(J)))
190
181
 
        then throw("Already initialized")
191
182
 
        else {
192
-
            let aD = (W("")[M] + aC)
193
-
            let aE = (a - (aD * o))
194
-
            let aF = Issue("ACRES", "WavesLands land acres investment token", aE, 8, false, unit, 0)
195
-
            let aG = calculateAssetId(aF)
196
-
[aF, IntegerEntry(I, aE), BinaryEntry(J, aG), StringEntry(x(), aB)]
183
+
            let aC = (W("")[M] + aB)
184
+
            let aD = (a - (aC * o))
185
+
            let aE = Issue("ACRES", "WavesLands land acres investment token", aD, 8, false, unit, 0)
186
+
            let aF = calculateAssetId(aE)
187
+
[aE, IntegerEntry(I, aD), BinaryEntry(J, aF), StringEntry(x(), aA)]
197
188
 
            }
198
189
 
199
190
 
200
191
 
201
-
@Callable(aA)
192
+
@Callable(az)
202
193
 
func stakeAcres () = {
203
-
    let aH = ar()
204
-
    let q = toString(aA.caller)
205
-
    if ((size(aA.payments) != 1))
194
+
    let aG = aq()
195
+
    let q = toString(az.caller)
196
+
    if ((size(az.payments) != 1))
206
197
 
        then throw("exactly 1 payment must be attached")
207
198
 
        else {
208
-
            let aI = aA.payments[0]
209
-
            let aJ = aI.amount
210
-
            if (if (!(isDefined(aI.assetId)))
199
+
            let aH = az.payments[0]
200
+
            let aI = aH.amount
201
+
            if (if (!(isDefined(aH.assetId)))
211
202
 
                then true
212
-
                else (value(aI.assetId) != K))
203
+
                else (value(aH.assetId) != K))
213
204
 
                then throw("ACRES payments only!")
214
205
 
                else {
215
-
                    let aK = L(q)
216
-
                    let aL = c(q)
217
-
                    let aM = valueOrElse(getInteger(aL), 0)
218
-
                    let aN = valueOrElse(getInteger(e), 0)
219
-
                    let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
220
-
                    let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
221
-
                    $Tuple2(((((if ((aP == 0))
206
+
                    let aJ = L(q)
207
+
                    let aK = c(q)
208
+
                    let aL = valueOrElse(getInteger(aK), 0)
209
+
                    let aM = valueOrElse(getInteger(e), 0)
210
+
                    let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
211
+
                    let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
212
+
                    $Tuple2(((((if ((aO == 0))
222
213
 
                        then nil
223
-
                        else [ScriptTransfer(aA.caller, aP, K)]) :+ IntegerEntry(aK, lastBlock.timestamp)) :+ IntegerEntry(aL, (aM + aJ))) :+ IntegerEntry(e, (aN + aJ))), $Tuple2(aH, aO))
214
+
                        else [ScriptTransfer(az.caller, aO, K)]) :+ IntegerEntry(aJ, lastBlock.timestamp)) :+ IntegerEntry(aK, (aL + aI))) :+ IntegerEntry(e, (aM + aI))), $Tuple2(aG, aN))
224
215
 
                    }
225
216
 
            }
226
217
 
    }
227
218
 
228
219
 
229
220
 
230
-
@Callable(aA)
231
-
func unstakeAcres (aQ) = {
232
-
    let aH = ar()
233
-
    if ((0 >= aQ))
221
+
@Callable(az)
222
+
func unstakeAcres (aP) = {
223
+
    let aG = aq()
224
+
    if ((0 >= aP))
234
225
 
        then throw("Amount should be positive")
235
226
 
        else {
236
-
            let q = toString(aA.caller)
237
-
            if ((size(aA.payments) != 0))
227
+
            let q = toString(az.caller)
228
+
            if ((size(az.payments) != 0))
238
229
 
                then throw("No payments required")
239
230
 
                else {
240
-
                    let aK = L(q)
241
-
                    let aL = c(q)
242
-
                    let aM = valueOrElse(getInteger(aL), 0)
243
-
                    if ((aQ > aM))
244
-
                        then throw(((("You have only " + al(aM, 8)) + " ACRES staked, tried to unstake ") + al(aQ, 8)))
231
+
                    let aJ = L(q)
232
+
                    let aK = c(q)
233
+
                    let aL = valueOrElse(getInteger(aK), 0)
234
+
                    if ((aP > aL))
235
+
                        then throw(((("You have only " + al(aL, 8)) + " ACRES staked, tried to unstake ") + al(aP, 8)))
245
236
 
                        else {
246
-
                            let aN = valueOrElse(getInteger(e), 0)
247
-
                            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
248
-
                            let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
249
-
                            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), IntegerEntry(aL, (aM - aQ)), IntegerEntry(e, (aN - aQ)), ScriptTransfer(aA.caller, (aQ + aP), K)], $Tuple2(aH, aO))
237
+
                            let aM = valueOrElse(getInteger(e), 0)
238
+
                            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
239
+
                            let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
240
+
                            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), IntegerEntry(aK, (aL - aP)), IntegerEntry(e, (aM - aP)), ScriptTransfer(az.caller, (aP + aO), K)], $Tuple2(aG, aN))
250
241
 
                            }
251
242
 
                    }
252
243
 
            }
254
245
 
255
246
 
256
247
 
257
-
@Callable(aA)
248
+
@Callable(az)
258
249
 
func buyAcres () = {
259
-
    let aH = ar()
260
-
    let q = toString(aA.caller)
261
-
    if (!(containsElement(aq, q)))
262
-
        then throw("Permission denied")
263
-
        else if ((size(aA.payments) != 1))
264
-
            then throw("exactly 1 payment must be attached")
265
-
            else {
266
-
                let aI = aA.payments[0]
267
-
                let aJ = aI.amount
268
-
                if (if (!(isDefined(aI.assetId)))
269
-
                    then true
270
-
                    else (value(aI.assetId) != j))
271
-
                    then throw("USDT payments only!")
272
-
                    else if ((n > aJ))
273
-
                        then throw((("Min payment should be " + al(n, 6)) + " USDT"))
274
-
                        else {
275
-
                            let at = (aJ * h)
276
-
                            let aR = Q(invoke(E, "updateAccStats", [q, fraction(f, at, (25 * o))], nil))
277
-
                            $Tuple2([ScriptTransfer(F, aJ, j), ScriptTransfer(aA.caller, at, K)], $Tuple2(aH, aR))
278
-
                            }
279
-
                }
280
-
    }
281
-
282
-
283
-
284
-
@Callable(aA)
285
-
func burnAcres (aQ) = if ((aA.caller != E))
286
-
    then throw("Permission denied")
287
-
    else $Tuple2([Burn(K, aQ)], aQ)
288
-
289
-
290
-
291
-
@Callable(aA)
292
-
func claimAcres () = {
293
-
    let aH = ar()
294
-
    let q = toString(aA.caller)
295
-
    if ((size(aA.payments) != 0))
296
-
        then throw("No payments required")
250
+
    let aG = aq()
251
+
    let q = toString(az.caller)
252
+
    if ((size(az.payments) != 1))
253
+
        then throw("exactly 1 payment must be attached")
297
254
 
        else {
298
-
            let aK = L(q)
299
-
            let aL = c(q)
300
-
            let at = valueOrElse(getInteger(aL), 0)
301
-
            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
302
-
            let aP = az(q, at, valueOrElse(getInteger(aK), 0))
303
-
            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), ScriptTransfer(aA.caller, aP, K)], $Tuple2(aH, aO))
255
+
            let aH = az.payments[0]
256
+
            let aI = aH.amount
257
+
            if (if (!(isDefined(aH.assetId)))
258
+
                then true
259
+
                else (value(aH.assetId) != j))
260
+
                then throw("USDT payments only!")
261
+
                else if ((n > aI))
262
+
                    then throw((("Min payment should be " + al(n, 6)) + " USDT"))
263
+
                    else {
264
+
                        let as = (aI * h)
265
+
                        let aQ = Q(invoke(E, "updateAccStats", [q, fraction(f, as, (25 * o))], nil))
266
+
                        $Tuple2([ScriptTransfer(F, aI, j), ScriptTransfer(az.caller, as, K)], $Tuple2(aG, aQ))
267
+
                        }
304
268
 
            }
305
269
 
    }
306
270
 
307
271
 
308
272
 
309
-
@Callable(aA)
273
+
@Callable(az)
274
+
func burnAcres (aP) = if ((az.caller != E))
275
+
    then throw("Permission denied")
276
+
    else $Tuple2([Burn(K, aP)], aP)
277
+
278
+
279
+
280
+
@Callable(az)
281
+
func claimAcres () = {
282
+
    let aG = aq()
283
+
    let q = toString(az.caller)
284
+
    if ((size(az.payments) != 0))
285
+
        then throw("No payments required")
286
+
        else {
287
+
            let aJ = L(q)
288
+
            let aK = c(q)
289
+
            let as = valueOrElse(getInteger(aK), 0)
290
+
            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
291
+
            let aO = ay(q, as, valueOrElse(getInteger(aJ), 0))
292
+
            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), ScriptTransfer(az.caller, aO, K)], $Tuple2(aG, aN))
293
+
            }
294
+
    }
295
+
296
+
297
+
298
+
@Callable(az)
310
299
 
func claimAcresREADONLY (q) = {
311
-
    let aK = L(q)
312
-
    let aL = c(q)
313
-
    let at = valueOrElse(getInteger(aL), 0)
314
-
    let aS = valueOrElse(getInteger(aK), 0)
315
-
    let aP = as(q, at, aS)
316
-
    $Tuple2(nil, [aP, aS])
300
+
    let aJ = L(q)
301
+
    let aK = c(q)
302
+
    let as = valueOrElse(getInteger(aK), 0)
303
+
    let aR = valueOrElse(getInteger(aJ), 0)
304
+
    let aO = ar(q, as, aR)
305
+
    $Tuple2(nil, [aO, aR])
317
306
 
    }
318
307
 
319
308
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = 100000000000000
5
5
 
6
6
 
let b = 86400000
7
7
 
8
8
 
func c (d) = ("acresStakedAmountByUser_" + d)
9
9
 
10
10
 
11
11
 
let e = "acresStakedAmountTotal"
12
12
 
13
13
 
let f = 5000000
14
14
 
15
15
 
let g = 3456000
16
16
 
17
17
 
let h = 10
18
18
 
19
19
 
let i = take(drop(this.bytes, 1), 1)
20
20
 
21
21
 
let j = {
22
22
 
    let k = i
23
23
 
    if ((base58'2W' == k))
24
24
 
        then base58'9wc3LXNA4TEBsXyKtoLE9mrbDD7WMHXvXrCjZvabLAsi'
25
25
 
        else if ((base58'2T' == k))
26
26
 
            then base58'6mWwf9mZBjVgkC54idpyaZLQfAosD914wT8fGf2iiY63'
27
27
 
            else throw("Unknown chain")
28
28
 
    }
29
29
 
30
30
 
let l = {
31
31
 
    let k = i
32
32
 
    if ((base58'2W' == k))
33
33
 
        then "3PQCuvFbvh4LkPUnrnU1z3jnbA1p9m3WNhv"
34
34
 
        else if ((base58'2T' == k))
35
35
 
            then "3MumkGGztCKAXpWDqxkddofqXSUbqQkvSJy"
36
36
 
            else throw("Unknown chain")
37
37
 
    }
38
38
 
39
39
 
let m = "__"
40
40
 
41
41
 
let n = 1000000
42
42
 
43
43
 
let o = 100000000
44
44
 
45
45
 
func p (q,r) = valueOrErrorMessage(getString(q, r), makeString(["mandatory ", toString(q), ".", r, " is not defined"], ""))
46
46
 
47
47
 
48
48
 
let s = 1
49
49
 
50
50
 
let t = 2
51
51
 
52
52
 
let u = 4
53
53
 
54
54
 
let v = 8
55
55
 
56
56
 
func w () = "%s__restConfig"
57
57
 
58
58
 
59
59
 
func x () = "%s__restAddr"
60
60
 
61
61
 
62
62
 
func y (z) = split_4C(p(z, w()), m)
63
63
 
64
64
 
65
65
 
func A (B,C) = valueOrErrorMessage(addressFromString(B[C]), ("Rest cfg doesn't contain address at index " + toString(C)))
66
66
 
67
67
 
68
68
 
let D = addressFromStringValue(valueOrElse(getString(this, x()), l))
69
69
 
70
70
 
let B = y(D)
71
71
 
72
72
 
let E = A(B, s)
73
73
 
74
74
 
let F = A(B, t)
75
75
 
76
76
 
let G = A(B, u)
77
77
 
78
78
 
let H = A(B, v)
79
79
 
80
80
 
let I = "acresIssuedAmount"
81
81
 
82
82
 
let J = "acresAssetId"
83
83
 
84
84
 
let K = valueOrErrorMessage(getBinary(H, J), "ACRES is not issued yet")
85
85
 
86
86
 
func L (d) = ("acresStakedTimeByUser_" + d)
87
87
 
88
88
 
89
89
 
let M = 0
90
90
 
91
91
 
func N () = "resTypesProportions"
92
92
 
93
93
 
94
94
 
func O (P) = ("stakedPiecesByOwner_" + P)
95
95
 
96
96
 
97
97
 
func Q (R) = {
98
98
 
    let k = R
99
99
 
    if ($isInstanceOf(k, "Int"))
100
100
 
        then {
101
101
 
            let S = k
102
102
 
            S
103
103
 
            }
104
104
 
        else throw("fail to cast into Int")
105
105
 
    }
106
106
 
107
107
 
108
108
 
func T (U) = {
109
109
 
    let k = U
110
110
 
    if ($isInstanceOf(k, "(Int, Int)"))
111
111
 
        then {
112
112
 
            let V = k
113
113
 
            V
114
114
 
            }
115
115
 
        else throw("fail to cast into (Int, Int)")
116
116
 
    }
117
117
 
118
118
 
119
119
 
func W (X) = {
120
120
 
    let Y = split(valueOrElse(getString(E, N()), "0_0_0_0_0_0"), "_")
121
121
 
    func Z (aa,ab) =     (aa + parseIntValue(ab))
122
122
 
123
123
 
    let ac = {
124
124
 
        let ad = Y
125
125
 
        let ae = size(ad)
126
126
 
        let af = 0
127
127
 
        func ag (ah,ai) =         if ((ai >= ae))
128
128
 
            then ah
129
129
 
            else Z(ah, ad[ai])
130
130
 
131
131
 
        func aj (ah,ai) =         if ((ai >= ae))
132
132
 
            then ah
133
133
 
            else throw("List size exceeds 6")
134
134
 
135
135
 
        aj(ag(ag(ag(ag(ag(ag(af, 0), 1), 2), 3), 4), 5), 6)
136
136
 
        }
137
137
 
    let ak = valueOrElse(getInteger(E, O(X)), 0)
138
138
 
[ac, ak]
139
139
 
    }
140
140
 
141
141
 
142
142
 
func al (U,am) = {
143
143
 
    let an = pow(10, 0, am, 0, 0, DOWN)
144
144
 
    let ao = toString((U % an))
145
145
 
    let ap = drop(toString(an), (1 + size(ao)))
146
146
 
    (((toString((U / an)) + ".") + ap) + ao)
147
147
 
    }
148
148
 
149
149
 
150
-
let aq = ({
151
-
    let k = i
152
-
    if ((base58'2W' == k))
153
-
        then nil
154
-
        else if ((base58'2T' == k))
155
-
            then ["3MtBgJTaLxPB3C7UJD1UE8qjkHthfKvFQYY", "3N3gSFrTwgiLAFZHMuJrEttht1nPhnkpvjs"]
156
-
            else throw("Unknown chain")
157
-
    } :+ toString(this))
158
-
159
-
func ar () = Q(invoke(E, "saveLastTx", nil, nil))
150
+
func aq () = Q(invoke(E, "saveLastTx", nil, nil))
160
151
 
161
152
 
162
-
func as (d,at,au) = {
163
-
    let av = (lastBlock.timestamp - au)
164
-
    let aw = fraction(av, (g * at), (b * o))
165
-
    let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
166
-
    let ay = max([0, ax])
167
-
    (ay * h)
153
+
func ar (d,as,at) = {
154
+
    let au = (lastBlock.timestamp - at)
155
+
    let av = fraction(au, (g * as), (b * o))
156
+
    let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
157
+
    let ax = max([0, aw])
158
+
    (ax * h)
168
159
 
    }
169
160
 
170
161
 
171
-
func az (d,at,au) = {
172
-
    let av = (lastBlock.timestamp - au)
173
-
    if ((0 > av))
174
-
        then throw(((("Saved timestamp is in future, saved = " + toString(au)) + ", current = ") + toString(lastBlock.timestamp)))
162
+
func ay (d,as,at) = {
163
+
    let au = (lastBlock.timestamp - at)
164
+
    if ((0 > au))
165
+
        then throw(((("Saved timestamp is in future, saved = " + toString(at)) + ", current = ") + toString(lastBlock.timestamp)))
175
166
 
        else {
176
-
            let aw = fraction(av, (g * at), (b * o))
177
-
            let ax = Q(invoke(F, "sellResourcesWorldREADONLY", [aw], nil))
178
-
            let ay = if ((0 >= ax))
167
+
            let av = fraction(au, (g * as), (b * o))
168
+
            let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
169
+
            let ax = if ((0 >= aw))
179
170
 
                then 0
180
-
                else T(invoke(F, "sellResourcesWorld", [d, aw], nil))._1
181
-
            (ay * h)
171
+
                else T(invoke(F, "sellResourcesWorld", [d, av], nil))._1
172
+
            (ax * h)
182
173
 
            }
183
174
 
    }
184
175
 
185
176
 
186
-
@Callable(aA)
187
-
func constructorV1 (aB,aC) = if ((aA.caller != this))
177
+
@Callable(az)
178
+
func constructorV1 (aA,aB) = if ((az.caller != this))
188
179
 
    then throw("Permission denied")
189
180
 
    else if (isDefined(getBinary(J)))
190
181
 
        then throw("Already initialized")
191
182
 
        else {
192
-
            let aD = (W("")[M] + aC)
193
-
            let aE = (a - (aD * o))
194
-
            let aF = Issue("ACRES", "WavesLands land acres investment token", aE, 8, false, unit, 0)
195
-
            let aG = calculateAssetId(aF)
196
-
[aF, IntegerEntry(I, aE), BinaryEntry(J, aG), StringEntry(x(), aB)]
183
+
            let aC = (W("")[M] + aB)
184
+
            let aD = (a - (aC * o))
185
+
            let aE = Issue("ACRES", "WavesLands land acres investment token", aD, 8, false, unit, 0)
186
+
            let aF = calculateAssetId(aE)
187
+
[aE, IntegerEntry(I, aD), BinaryEntry(J, aF), StringEntry(x(), aA)]
197
188
 
            }
198
189
 
199
190
 
200
191
 
201
-
@Callable(aA)
192
+
@Callable(az)
202
193
 
func stakeAcres () = {
203
-
    let aH = ar()
204
-
    let q = toString(aA.caller)
205
-
    if ((size(aA.payments) != 1))
194
+
    let aG = aq()
195
+
    let q = toString(az.caller)
196
+
    if ((size(az.payments) != 1))
206
197
 
        then throw("exactly 1 payment must be attached")
207
198
 
        else {
208
-
            let aI = aA.payments[0]
209
-
            let aJ = aI.amount
210
-
            if (if (!(isDefined(aI.assetId)))
199
+
            let aH = az.payments[0]
200
+
            let aI = aH.amount
201
+
            if (if (!(isDefined(aH.assetId)))
211
202
 
                then true
212
-
                else (value(aI.assetId) != K))
203
+
                else (value(aH.assetId) != K))
213
204
 
                then throw("ACRES payments only!")
214
205
 
                else {
215
-
                    let aK = L(q)
216
-
                    let aL = c(q)
217
-
                    let aM = valueOrElse(getInteger(aL), 0)
218
-
                    let aN = valueOrElse(getInteger(e), 0)
219
-
                    let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
220
-
                    let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
221
-
                    $Tuple2(((((if ((aP == 0))
206
+
                    let aJ = L(q)
207
+
                    let aK = c(q)
208
+
                    let aL = valueOrElse(getInteger(aK), 0)
209
+
                    let aM = valueOrElse(getInteger(e), 0)
210
+
                    let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
211
+
                    let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
212
+
                    $Tuple2(((((if ((aO == 0))
222
213
 
                        then nil
223
-
                        else [ScriptTransfer(aA.caller, aP, K)]) :+ IntegerEntry(aK, lastBlock.timestamp)) :+ IntegerEntry(aL, (aM + aJ))) :+ IntegerEntry(e, (aN + aJ))), $Tuple2(aH, aO))
214
+
                        else [ScriptTransfer(az.caller, aO, K)]) :+ IntegerEntry(aJ, lastBlock.timestamp)) :+ IntegerEntry(aK, (aL + aI))) :+ IntegerEntry(e, (aM + aI))), $Tuple2(aG, aN))
224
215
 
                    }
225
216
 
            }
226
217
 
    }
227
218
 
228
219
 
229
220
 
230
-
@Callable(aA)
231
-
func unstakeAcres (aQ) = {
232
-
    let aH = ar()
233
-
    if ((0 >= aQ))
221
+
@Callable(az)
222
+
func unstakeAcres (aP) = {
223
+
    let aG = aq()
224
+
    if ((0 >= aP))
234
225
 
        then throw("Amount should be positive")
235
226
 
        else {
236
-
            let q = toString(aA.caller)
237
-
            if ((size(aA.payments) != 0))
227
+
            let q = toString(az.caller)
228
+
            if ((size(az.payments) != 0))
238
229
 
                then throw("No payments required")
239
230
 
                else {
240
-
                    let aK = L(q)
241
-
                    let aL = c(q)
242
-
                    let aM = valueOrElse(getInteger(aL), 0)
243
-
                    if ((aQ > aM))
244
-
                        then throw(((("You have only " + al(aM, 8)) + " ACRES staked, tried to unstake ") + al(aQ, 8)))
231
+
                    let aJ = L(q)
232
+
                    let aK = c(q)
233
+
                    let aL = valueOrElse(getInteger(aK), 0)
234
+
                    if ((aP > aL))
235
+
                        then throw(((("You have only " + al(aL, 8)) + " ACRES staked, tried to unstake ") + al(aP, 8)))
245
236
 
                        else {
246
-
                            let aN = valueOrElse(getInteger(e), 0)
247
-
                            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
248
-
                            let aP = az(q, aM, valueOrElse(getInteger(aK), 0))
249
-
                            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), IntegerEntry(aL, (aM - aQ)), IntegerEntry(e, (aN - aQ)), ScriptTransfer(aA.caller, (aQ + aP), K)], $Tuple2(aH, aO))
237
+
                            let aM = valueOrElse(getInteger(e), 0)
238
+
                            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
239
+
                            let aO = ay(q, aL, valueOrElse(getInteger(aJ), 0))
240
+
                            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), IntegerEntry(aK, (aL - aP)), IntegerEntry(e, (aM - aP)), ScriptTransfer(az.caller, (aP + aO), K)], $Tuple2(aG, aN))
250
241
 
                            }
251
242
 
                    }
252
243
 
            }
253
244
 
    }
254
245
 
255
246
 
256
247
 
257
-
@Callable(aA)
248
+
@Callable(az)
258
249
 
func buyAcres () = {
259
-
    let aH = ar()
260
-
    let q = toString(aA.caller)
261
-
    if (!(containsElement(aq, q)))
262
-
        then throw("Permission denied")
263
-
        else if ((size(aA.payments) != 1))
264
-
            then throw("exactly 1 payment must be attached")
265
-
            else {
266
-
                let aI = aA.payments[0]
267
-
                let aJ = aI.amount
268
-
                if (if (!(isDefined(aI.assetId)))
269
-
                    then true
270
-
                    else (value(aI.assetId) != j))
271
-
                    then throw("USDT payments only!")
272
-
                    else if ((n > aJ))
273
-
                        then throw((("Min payment should be " + al(n, 6)) + " USDT"))
274
-
                        else {
275
-
                            let at = (aJ * h)
276
-
                            let aR = Q(invoke(E, "updateAccStats", [q, fraction(f, at, (25 * o))], nil))
277
-
                            $Tuple2([ScriptTransfer(F, aJ, j), ScriptTransfer(aA.caller, at, K)], $Tuple2(aH, aR))
278
-
                            }
279
-
                }
280
-
    }
281
-
282
-
283
-
284
-
@Callable(aA)
285
-
func burnAcres (aQ) = if ((aA.caller != E))
286
-
    then throw("Permission denied")
287
-
    else $Tuple2([Burn(K, aQ)], aQ)
288
-
289
-
290
-
291
-
@Callable(aA)
292
-
func claimAcres () = {
293
-
    let aH = ar()
294
-
    let q = toString(aA.caller)
295
-
    if ((size(aA.payments) != 0))
296
-
        then throw("No payments required")
250
+
    let aG = aq()
251
+
    let q = toString(az.caller)
252
+
    if ((size(az.payments) != 1))
253
+
        then throw("exactly 1 payment must be attached")
297
254
 
        else {
298
-
            let aK = L(q)
299
-
            let aL = c(q)
300
-
            let at = valueOrElse(getInteger(aL), 0)
301
-
            let aO = invoke(G, "onStakeUnstakeLand", [q], nil)
302
-
            let aP = az(q, at, valueOrElse(getInteger(aK), 0))
303
-
            $Tuple2([IntegerEntry(aK, lastBlock.timestamp), ScriptTransfer(aA.caller, aP, K)], $Tuple2(aH, aO))
255
+
            let aH = az.payments[0]
256
+
            let aI = aH.amount
257
+
            if (if (!(isDefined(aH.assetId)))
258
+
                then true
259
+
                else (value(aH.assetId) != j))
260
+
                then throw("USDT payments only!")
261
+
                else if ((n > aI))
262
+
                    then throw((("Min payment should be " + al(n, 6)) + " USDT"))
263
+
                    else {
264
+
                        let as = (aI * h)
265
+
                        let aQ = Q(invoke(E, "updateAccStats", [q, fraction(f, as, (25 * o))], nil))
266
+
                        $Tuple2([ScriptTransfer(F, aI, j), ScriptTransfer(az.caller, as, K)], $Tuple2(aG, aQ))
267
+
                        }
304
268
 
            }
305
269
 
    }
306
270
 
307
271
 
308
272
 
309
-
@Callable(aA)
273
+
@Callable(az)
274
+
func burnAcres (aP) = if ((az.caller != E))
275
+
    then throw("Permission denied")
276
+
    else $Tuple2([Burn(K, aP)], aP)
277
+
278
+
279
+
280
+
@Callable(az)
281
+
func claimAcres () = {
282
+
    let aG = aq()
283
+
    let q = toString(az.caller)
284
+
    if ((size(az.payments) != 0))
285
+
        then throw("No payments required")
286
+
        else {
287
+
            let aJ = L(q)
288
+
            let aK = c(q)
289
+
            let as = valueOrElse(getInteger(aK), 0)
290
+
            let aN = invoke(G, "onStakeUnstakeLand", [q], nil)
291
+
            let aO = ay(q, as, valueOrElse(getInteger(aJ), 0))
292
+
            $Tuple2([IntegerEntry(aJ, lastBlock.timestamp), ScriptTransfer(az.caller, aO, K)], $Tuple2(aG, aN))
293
+
            }
294
+
    }
295
+
296
+
297
+
298
+
@Callable(az)
310
299
 
func claimAcresREADONLY (q) = {
311
-
    let aK = L(q)
312
-
    let aL = c(q)
313
-
    let at = valueOrElse(getInteger(aL), 0)
314
-
    let aS = valueOrElse(getInteger(aK), 0)
315
-
    let aP = as(q, at, aS)
316
-
    $Tuple2(nil, [aP, aS])
300
+
    let aJ = L(q)
301
+
    let aK = c(q)
302
+
    let as = valueOrElse(getInteger(aK), 0)
303
+
    let aR = valueOrElse(getInteger(aJ), 0)
304
+
    let aO = ar(q, as, aR)
305
+
    $Tuple2(nil, [aO, aR])
317
306
 
    }
318
307
 
319
308
 

github/deemru/w8io/169f3d6 
67.23 ms ◑