tx · HZDMMmvAm4YJE5LhT21TD9pFuyZEcQWgFRnbd88xsLws

3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg:  -0.00800000 Waves

2023.09.23 00:12 [2767117] smart account 3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HZDMMmvAm4YJE5LhT21TD9pFuyZEcQWgFRnbd88xsLws",
    "fee": 800000,
    "feeAssetId": null,
    "timestamp": 1695417163829,
    "version": 2,
    "chainId": 84,
    "sender": "3N7dQeENwSgKPp9Ki4aEHhRWWKVjn1DE9Qg",
    "senderPublicKey": "5BN6FQeKuMm2XJYToUZvbBX4UELGpE3Z47P4q6sP46PG",
    "proofs": [
        "4sGFphQEgezUFBWqSBanLKyKKqRKfj2j9hcb2qjikdqRBjAS5ACqZe2nsgyaDP3Ci2TeZD9WXRc43v9sy4jzgn7p"
    ],
    "script": "base64:BgIdCAISBAoCCAESABIDCgEBEgASAwoBARIAEgMKAQgqAAhNSUxMSU9ONgCAgOmDsd4WAAlEQVlNSUxMSVMAgLiZKQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBGFkZHIJAKwCAgIYYWNyZXNTdGFrZWRBbW91bnRCeVVzZXJfBQRhZGRyABNhY3Jlc1N0YWtlZFRvdGFsS2V5AhZhY3Jlc1N0YWtlZEFtb3VudFRvdGFsAAp4cE5ld1NMYW5kAMCWsQIAD0RBSUxZUkVTQllQSUVDRQCA+NIBABVVU0RUMkFDUkVTX01VTFRJUExJRVIACgAFY2hhaW4JAMkBAgkAygECCAUEdGhpcwVieXRlcwABAAEAC3VzZHRBc3NldElkBAckbWF0Y2gwBQVjaGFpbgMJAAACAQFXBQckbWF0Y2gwASCE2nqyCAM/TtG7yo7ui5O8yYLdC136B5ao1CP5qA//uQMJAAACAQFUBQckbWF0Y2gwASBVsdifcoeC7+XjW42sBatl3ppDoS8WuwXzGreHpfHFGAkAAgECDVVua25vd24gY2hhaW4AFWRlZmF1bHRSZXN0QWRkcmVzc1N0cgQHJG1hdGNoMAUFY2hhaW4DCQAAAgEBVwUHJG1hdGNoMAIjM1BRQ3V2RmJ2aDRMa1BVbnJuVTF6M2puYkExcDltM1dOaHYDCQAAAgEBVAUHJG1hdGNoMAIjM011bWtHR3p0Q0tBWHBXRHF4a2Rkb2ZxWFNVYnFRa3ZTSnkJAAIBAg1Vbmtub3duIGNoYWluAANTRVACAl9fAAVNVUxUNgDAhD0ABU1VTFQ4AIDC1y8BD2dldFN0cmluZ09yRmFpbAIHYWRkcmVzcwNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQdhZGRyZXNzBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUHYWRkcmVzcwkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAg8gaXMgbm90IGRlZmluZWQFA25pbAIAABFJZHhDZmdTdGFraW5nRGFwcAABABFJZHhDZmdFY29ub215RGFwcAACAA1JZHhDZmdXbGdEYXBwAAQAD0lkeENmZ0FjcmVzRGFwcAAIAQprZXlSZXN0Q2ZnAAIOJXNfX3Jlc3RDb25maWcBDmtleVJlc3RBZGRyZXNzAAIMJXNfX3Jlc3RBZGRyARFyZWFkUmVzdENmZ09yRmFpbAEEcmVzdAkAvAkCCQEPZ2V0U3RyaW5nT3JGYWlsAgUEcmVzdAkBCmtleVJlc3RDZmcABQNTRVABGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIHcmVzdENmZwNpZHgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFB3Jlc3RDZmcFA2lkeAkArAICAipSZXN0IGNmZyBkb2Vzbid0IGNvbnRhaW4gYWRkcmVzcyBhdCBpbmRleCAJAKQDAQUDaWR4AAxyZXN0Q29udHJhY3QJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleVJlc3RBZGRyZXNzAAUVZGVmYXVsdFJlc3RBZGRyZXNzU3RyAAdyZXN0Q2ZnCQERcmVhZFJlc3RDZmdPckZhaWwBBQxyZXN0Q29udHJhY3QAD3N0YWtpbmdDb250cmFjdAkBGGdldENvbnRyYWN0QWRkcmVzc09yRmFpbAIFB3Jlc3RDZmcFEUlkeENmZ1N0YWtpbmdEYXBwAA9lY29ub215Q29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBRFJZHhDZmdFY29ub215RGFwcAALd2xnQ29udHJhY3QJARhnZXRDb250cmFjdEFkZHJlc3NPckZhaWwCBQdyZXN0Q2ZnBQ1JZHhDZmdXbGdEYXBwAA1hY3Jlc0NvbnRyYWN0CQEYZ2V0Q29udHJhY3RBZGRyZXNzT3JGYWlsAgUHcmVzdENmZwUPSWR4Q2ZnQWNyZXNEYXBwABRhY3Jlc0lzc3VlZEFtb3VudEtleQIRYWNyZXNJc3N1ZWRBbW91bnQAD2FjcmVzQXNzZXRJZEtleQIMYWNyZXNBc3NldElkAAxhY3Jlc0Fzc2V0SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnAgCBQ1hY3Jlc0NvbnRyYWN0BQ9hY3Jlc0Fzc2V0SWRLZXkCF0FDUkVTIGlzIG5vdCBpc3N1ZWQgeWV0ARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBGFkZHIJAKwCAgIWYWNyZXNTdGFrZWRUaW1lQnlVc2VyXwUEYWRkcgALSWR4RWZmVG90YWwAAAERa2V5UmVzUHJvcG9ydGlvbnMAAhNyZXNUeXBlc1Byb3BvcnRpb25zARZrZXlTdGFrZWRQaWVjZXNCeU93bmVyAQlvd25lckFkZHIJAKwCAgIUc3Rha2VkUGllY2VzQnlPd25lcl8FCW93bmVyQWRkcgEFYXNJbnQBAXYEByRtYXRjaDAFAXYDCQABAgUHJG1hdGNoMAIDSW50BAFuBQckbWF0Y2gwBQFuCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQ5nZXRWb3RpbmdQb3dlcgESdXNlckFkZHJTdHJPckVtcHR5BAVwcm9wcwkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIFD3N0YWtpbmdDb250cmFjdAkBEWtleVJlc1Byb3BvcnRpb25zAAILMF8wXzBfMF8wXzACAV8KAQVhZGRlcgIDYWNjBGl0ZW0JAGQCBQNhY2MJAQ1wYXJzZUludFZhbHVlAQUEaXRlbQQKdG90YWxQb3dlcgoAAiRsBQVwcm9wcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWRkZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYECnVzZXJzUG93ZXIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUPc3Rha2luZ0NvbnRyYWN0CQEWa2V5U3Rha2VkUGllY2VzQnlPd25lcgEFEnVzZXJBZGRyU3RyT3JFbXB0eQAACQDMCAIFCnRvdGFsUG93ZXIJAMwIAgUKdXNlcnNQb3dlcgUDbmlsAQpmaXhlZFBvaW50AgN2YWwIZGVjaW1hbHMEBnRlblBvdwkAbAYACgAABQhkZWNpbWFscwAAAAAFBERPV04EB2xvd1BhcnQJAKQDAQkAagIFA3ZhbAUGdGVuUG93BAZ6ZXJvZXMJALACAgkApAMBBQZ0ZW5Qb3cJAGQCAAEJALECAQUHbG93UGFydAkArAICCQCsAgIJAKwCAgkApAMBCQBpAgUDdmFsBQZ0ZW5Qb3cCAS4FBnplcm9lcwUHbG93UGFydAEOYXNUd29JbnRzVHVwbGUBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACCihJbnQsIEludCkEAnQyBQckbWF0Y2gwBQJ0MgkAAgECHGZhaWwgdG8gY2FzdCBpbnRvIChJbnQsIEludCkBBnByb2xvZwAJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AgpzYXZlTGFzdFR4BQNuaWwFA25pbAESY2xhaW1BY3Jlc0ludGVybmFsAwRhZGRyC2FjcmVzQW1vdW50DWxhc3RDbGFpbVRpbWUECWRlbHRhVGltZQkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ1sYXN0Q2xhaW1UaW1lBAhhdmFpbFJlcwkAawMFCWRlbHRhVGltZQkAaAIFD0RBSUxZUkVTQllQSUVDRQULYWNyZXNBbW91bnQJAGgCBQlEQVlNSUxMSVMFBU1VTFQ4BApjYW5HZXRVc2R0CQEFYXNJbnQBCQD8BwQFD2Vjb25vbXlDb250cmFjdAIac2VsbFJlc291cmNlc1dvcmxkUkVBRE9OTFkJAMwIAgUIYXZhaWxSZXMFA25pbAUDbmlsBAdnb3RVc2R0CQCWAwEJAMwIAgAACQDMCAIFCmNhbkdldFVzZHQFA25pbAkAaAIFB2dvdFVzZHQFFVVTRFQyQUNSRVNfTVVMVElQTElFUgENY2xhaW1JbnRlcm5hbAMEYWRkcgthY3Jlc0Ftb3VudA1sYXN0Q2xhaW1UaW1lBAlkZWx0YVRpbWUJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUNbGFzdENsYWltVGltZQMJAGYCAAAFCWRlbHRhVGltZQkAAgEJAKwCAgkArAICCQCsAgICJlNhdmVkIHRpbWVzdGFtcCBpcyBpbiBmdXR1cmUsIHNhdmVkID0gCQCkAwEFDWxhc3RDbGFpbVRpbWUCDCwgY3VycmVudCA9IAkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQIYXZhaWxSZXMJAGsDBQlkZWx0YVRpbWUJAGgCBQ9EQUlMWVJFU0JZUElFQ0UFC2FjcmVzQW1vdW50CQBoAgUJREFZTUlMTElTBQVNVUxUOAQKY2FuR2V0VXNkdAkBBWFzSW50AQkA/AcEBQ9lY29ub215Q29udHJhY3QCGnNlbGxSZXNvdXJjZXNXb3JsZFJFQURPTkxZCQDMCAIFCGF2YWlsUmVzBQNuaWwFA25pbAQHZ290VXNkdAMJAGcCAAAFCmNhbkdldFVzZHQAAAgJAQ5hc1R3b0ludHNUdXBsZQEJAPwHBAUPZWNvbm9teUNvbnRyYWN0AhJzZWxsUmVzb3VyY2VzV29ybGQJAMwIAgUEYWRkcgkAzAgCBQhhdmFpbFJlcwUDbmlsBQNuaWwCXzEJAGgCBQdnb3RVc2R0BRVVU0RUMkFDUkVTX01VTFRJUExJRVIHAWkBDWNvbnN0cnVjdG9yVjECCHJlc3RBZGRyDnVuc3Rha2VkUGllY2VzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIRUGVybWlzc2lvbiBkZW5pZWQDCQEJaXNEZWZpbmVkAQkAoQgBBQ9hY3Jlc0Fzc2V0SWRLZXkJAAIBAhNBbHJlYWR5IGluaXRpYWxpemVkBAhuZnRBY3JlcwkAZAIJAJEDAgkBDmdldFZvdGluZ1Bvd2VyAQIABQtJZHhFZmZUb3RhbAUOdW5zdGFrZWRQaWVjZXMEDGlzc3VlZEFtb3VudAkAZQIFCE1JTExJT042CQBoAgUIbmZ0QWNyZXMFBU1VTFQ4BAVpc3N1ZQkAwwgHAgVBQ1JFUwImV2F2ZXNMYW5kcyBsYW5kIGFjcmVzIGludmVzdG1lbnQgdG9rZW4FDGlzc3VlZEFtb3VudAAIBwUEdW5pdAAABAdhc3NldElkCQC4CAEFBWlzc3VlCQDMCAIFBWlzc3VlCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRhY3Jlc0lzc3VlZEFtb3VudEtleQUMaXNzdWVkQW1vdW50CQDMCAIJAQtCaW5hcnlFbnRyeQIFD2FjcmVzQXNzZXRJZEtleQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5UmVzdEFkZHJlc3MABQhyZXN0QWRkcgUDbmlsAWkBCnN0YWtlQWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECImV4YWN0bHkgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQEA3BtdAkAkQMCCAUBaQhwYXltZW50cwAABANhbXQIBQNwbXQGYW1vdW50AwMJAQEhAQkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAYJAQIhPQIJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAUMYWNyZXNBc3NldElkCQACAQIUQUNSRVMgcGF5bWVudHMgb25seSEEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAABAhvbGRUb3RhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRNhY3Jlc1N0YWtlZFRvdGFsS2V5AAAECXdsZ1Jlc3VsdAkA/AcEBQt3bGdDb250cmFjdAISb25TdGFrZVVuc3Rha2VMYW5kCQDMCAIFB2FkZHJlc3MFA25pbAUDbmlsBAxjbGFpbWVkQWNyZXMJAQ1jbGFpbUludGVybmFsAwUHYWRkcmVzcwUOb2xkQWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdGltZUtleQAACQCUCgIDCQAAAgUMY2xhaW1lZEFjcmVzAAAFA25pbAkAzQgCCQDNCAIJAM0IAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDGNsYWltZWRBY3JlcwUMYWNyZXNBc3NldElkBQNuaWwJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkBDEludGVnZXJFbnRyeQIFCWFtb3VudEtleQkAZAIFDm9sZEFjcmVzQW1vdW50BQNhbXQJAQxJbnRlZ2VyRW50cnkCBRNhY3Jlc1N0YWtlZFRvdGFsS2V5CQBkAgUIb2xkVG90YWwFA2FtdAkAlAoCBQxwcm9sb2dSZXN1bHQFCXdsZ1Jlc3VsdAFpAQx1bnN0YWtlQWNyZXMBBmFtb3VudAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAMJAGcCAAAFBmFtb3VudAkAAgECGUFtb3VudCBzaG91bGQgYmUgcG9zaXRpdmUEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUTm8gcGF5bWVudHMgcmVxdWlyZWQEB3RpbWVLZXkJARhrZXlBY3Jlc1N0YWtlZFRpbWVCeVVzZXIBBQdhZGRyZXNzBAlhbW91bnRLZXkJARprZXlBY3Jlc1N0YWtlZEFtb3VudEJ5VXNlcgEFB2FkZHJlc3MEDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFCWFtb3VudEtleQAAAwkAZgIFBmFtb3VudAUOb2xkQWNyZXNBbW91bnQJAAIBCQCsAgIJAKwCAgkArAICAg5Zb3UgaGF2ZSBvbmx5IAkBCmZpeGVkUG9pbnQCBQ5vbGRBY3Jlc0Ftb3VudAAIAiAgQUNSRVMgc3Rha2VkLCB0cmllZCB0byB1bnN0YWtlIAkBCmZpeGVkUG9pbnQCBQZhbW91bnQACAQIb2xkVG90YWwJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUTYWNyZXNTdGFrZWRUb3RhbEtleQAABAl3bGdSZXN1bHQJAPwHBAULd2xnQ29udHJhY3QCEm9uU3Rha2VVbnN0YWtlTGFuZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAQMY2xhaW1lZEFjcmVzCQENY2xhaW1JbnRlcm5hbAMFB2FkZHJlc3MFDm9sZEFjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQd0aW1lS2V5CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUJYW1vdW50S2V5CQBlAgUOb2xkQWNyZXNBbW91bnQFBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYWNyZXNTdGFrZWRUb3RhbEtleQkAZQIFCG9sZFRvdGFsBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBkAgUGYW1vdW50BQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0AWkBCGJ1eUFjcmVzAAQMcHJvbG9nUmVzdWx0CQEGcHJvbG9nAAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAiJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkBANwbXQJAJEDAggFAWkIcGF5bWVudHMAAAQDYW10CAUDcG10BmFtb3VudAMDCQEBIQEJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQGCQECIT0CCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQFC3VzZHRBc3NldElkCQACAQITVVNEVCBwYXltZW50cyBvbmx5IQMJAGYCBQVNVUxUNgUDYW10CQACAQkArAICCQCsAgICFk1pbiBwYXltZW50IHNob3VsZCBiZSAJAQpmaXhlZFBvaW50AgUFTVVMVDYABgIFIFVTRFQEC2FjcmVzQW1vdW50CQBoAgUDYW10BRVVU0RUMkFDUkVTX01VTFRJUExJRVIEDmFjY1N0YXRzUmVzdWx0CQEFYXNJbnQBCQD8BwQFD3N0YWtpbmdDb250cmFjdAIOdXBkYXRlQWNjU3RhdHMJAMwIAgUHYWRkcmVzcwkAzAgCCQBrAwUKeHBOZXdTTGFuZAULYWNyZXNBbW91bnQJAGgCABkFBU1VTFQ4BQNuaWwFA25pbAkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD2Vjb25vbXlDb250cmFjdAUDYW10BQt1c2R0QXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2FjcmVzQW1vdW50BQxhY3Jlc0Fzc2V0SWQFA25pbAkAlAoCBQxwcm9sb2dSZXN1bHQFDmFjY1N0YXRzUmVzdWx0AWkBCWJ1cm5BY3JlcwEGYW1vdW50AwkBAiE9AggFAWkGY2FsbGVyBQ9zdGFraW5nQ29udHJhY3QJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAkAlAoCCQDMCAIJAQRCdXJuAgUMYWNyZXNBc3NldElkBQZhbW91bnQFA25pbAUGYW1vdW50AWkBCmNsYWltQWNyZXMABAxwcm9sb2dSZXN1bHQJAQZwcm9sb2cABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFE5vIHBheW1lbnRzIHJlcXVpcmVkBAd0aW1lS2V5CQEYa2V5QWNyZXNTdGFrZWRUaW1lQnlVc2VyAQUHYWRkcmVzcwQJYW1vdW50S2V5CQEaa2V5QWNyZXNTdGFrZWRBbW91bnRCeVVzZXIBBQdhZGRyZXNzBAthY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQlhbW91bnRLZXkAAAQJd2xnUmVzdWx0CQD8BwQFC3dsZ0NvbnRyYWN0AhJvblN0YWtlVW5zdGFrZUxhbmQJAMwIAgUHYWRkcmVzcwUDbmlsBQNuaWwEDGNsYWltZWRBY3JlcwkBDWNsYWltSW50ZXJuYWwDBQdhZGRyZXNzBQthY3Jlc0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd0aW1lS2V5AAAJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUHdGltZUtleQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQxjbGFpbWVkQWNyZXMFDGFjcmVzQXNzZXRJZAUDbmlsCQCUCgIFDHByb2xvZ1Jlc3VsdAUJd2xnUmVzdWx0AWkBEmNsYWltQWNyZXNSRUFET05MWQEHYWRkcmVzcwQHdGltZUtleQkBGGtleUFjcmVzU3Rha2VkVGltZUJ5VXNlcgEFB2FkZHJlc3MECWFtb3VudEtleQkBGmtleUFjcmVzU3Rha2VkQW1vdW50QnlVc2VyAQUHYWRkcmVzcwQLYWNyZXNBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUJYW1vdW50S2V5AAAEDGNsYWltZWRBY3JlcwkBEmNsYWltQWNyZXNJbnRlcm5hbAMFB2FkZHJlc3MFC2FjcmVzQW1vdW50CQELdmFsdWVPckVsc2UCCQCfCAEFB3RpbWVLZXkAAAkAlAoCBQNuaWwFDGNsYWltZWRBY3JlcwApPGLr",
    "height": 2767117,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3RwkJJubCdpi2TwfMJ7Csn4TrgUY6UaRmqJo22G2F4hF
Next: DmNecg2E3Y8v32L2NieH6S5dQ6fZ28ANGcTYppW27M8J

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

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 V = split(valueOrElse(getString(E, N()), "0_0_0_0_0_0"), "_")
110
110
 
    func W (X,Y) =     (X + parseIntValue(Y))
111
111
 
112
112
 
    let Z = {
113
113
 
        let aa = V
114
114
 
        let ab = size(aa)
115
115
 
        let ac = 0
116
116
 
        func ad (ae,af) =         if ((af >= ab))
117
117
 
            then ae
118
118
 
            else W(ae, aa[af])
119
119
 
120
120
 
        func ag (ae,af) =         if ((af >= ab))
121
121
 
            then ae
122
122
 
            else throw("List size exceeds 6")
123
123
 
124
124
 
        ag(ad(ad(ad(ad(ad(ad(ac, 0), 1), 2), 3), 4), 5), 6)
125
125
 
        }
126
126
 
    let ah = valueOrElse(getInteger(E, O(U)), 0)
127
127
 
[Z, ah]
128
128
 
    }
129
129
 
130
130
 
131
131
 
func ai (aj,ak) = {
132
132
 
    let al = pow(10, 0, ak, 0, 0, DOWN)
133
133
 
    let am = toString((aj % al))
134
134
 
    let an = drop(toString(al), (1 + size(am)))
135
135
 
    (((toString((aj / al)) + ".") + an) + am)
136
136
 
    }
137
137
 
138
138
 
139
139
 
func ao (aj) = {
140
140
 
    let k = aj
141
141
 
    if ($isInstanceOf(k, "(Int, Int)"))
142
142
 
        then {
143
143
 
            let ap = k
144
144
 
            ap
145
145
 
            }
146
146
 
        else throw("fail to cast into (Int, Int)")
147
147
 
    }
148
148
 
149
149
 
150
150
 
func aq () = Q(invoke(E, "saveLastTx", nil, nil))
151
151
 
152
152
 
153
153
 
func ar (d,as,at) = {
154
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)
159
+
    }
160
+
161
+
162
+
func ay (d,as,at) = {
163
+
    let au = (lastBlock.timestamp - at)
155
164
 
    if ((0 > au))
156
165
 
        then throw(((("Saved timestamp is in future, saved = " + toString(at)) + ", current = ") + toString(lastBlock.timestamp)))
157
166
 
        else {
158
167
 
            let av = fraction(au, (g * as), (b * o))
159
-
            let aw = ao(invoke(F, "sellResourcesWorld", [d, av], nil))._1
160
-
            (aw * h)
168
+
            let aw = Q(invoke(F, "sellResourcesWorldREADONLY", [av], nil))
169
+
            let ax = if ((0 >= aw))
170
+
                then 0
171
+
                else ao(invoke(F, "sellResourcesWorld", [d, av], nil))._1
172
+
            (ax * h)
161
173
 
            }
162
174
 
    }
163
175
 
164
176
 
165
-
@Callable(ax)
166
-
func constructorV1 (ay,az) = if ((ax.caller != this))
177
+
@Callable(az)
178
+
func constructorV1 (aA,aB) = if ((az.caller != this))
167
179
 
    then throw("Permission denied")
168
180
 
    else if (isDefined(getBinary(J)))
169
181
 
        then throw("Already initialized")
170
182
 
        else {
171
-
            let aA = (T("")[M] + az)
172
-
            let aB = (a - (aA * o))
173
-
            let aC = Issue("ACRES", "WavesLands land acres investment token", aB, 8, false, unit, 0)
174
-
            let aD = calculateAssetId(aC)
175
-
[aC, IntegerEntry(I, aB), BinaryEntry(J, aD), StringEntry(x(), ay)]
183
+
            let aC = (T("")[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)]
176
188
 
            }
177
189
 
178
190
 
179
191
 
180
-
@Callable(ax)
192
+
@Callable(az)
181
193
 
func stakeAcres () = {
182
-
    let aE = aq()
183
-
    let q = toString(ax.caller)
184
-
    if ((size(ax.payments) != 1))
194
+
    let aG = aq()
195
+
    let q = toString(az.caller)
196
+
    if ((size(az.payments) != 1))
185
197
 
        then throw("exactly 1 payment must be attached")
186
198
 
        else {
187
-
            let aF = ax.payments[0]
188
-
            let aG = aF.amount
189
-
            if (if (!(isDefined(aF.assetId)))
199
+
            let aH = az.payments[0]
200
+
            let aI = aH.amount
201
+
            if (if (!(isDefined(aH.assetId)))
190
202
 
                then true
191
-
                else (value(aF.assetId) != K))
203
+
                else (value(aH.assetId) != K))
192
204
 
                then throw("ACRES payments only!")
193
205
 
                else {
194
-
                    let aH = L(q)
195
-
                    let aI = c(q)
196
-
                    let aJ = valueOrElse(getInteger(aI), 0)
197
-
                    let aK = valueOrElse(getInteger(e), 0)
198
-
                    let aL = invoke(G, "onStakeUnstakeLand", [q], nil)
199
-
                    let aM = ar(q, aJ, valueOrElse(getInteger(aH), 0))
200
-
                    $Tuple2([IntegerEntry(aH, lastBlock.timestamp), IntegerEntry(aI, (aJ + aG)), IntegerEntry(e, (aK + aG)), ScriptTransfer(ax.caller, aM, K)], $Tuple2(aE, aL))
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))
213
+
                        then nil
214
+
                        else ((([ScriptTransfer(az.caller, aO, K)] :+ IntegerEntry(aJ, lastBlock.timestamp)) :+ IntegerEntry(aK, (aL + aI))) :+ IntegerEntry(e, (aM + aI))), $Tuple2(aG, aN))
201
215
 
                    }
202
216
 
            }
203
217
 
    }
204
218
 
205
219
 
206
220
 
207
-
@Callable(ax)
208
-
func unstakeAcres (aN) = {
209
-
    let aE = aq()
210
-
    let q = toString(ax.caller)
211
-
    if ((size(ax.payments) != 0))
212
-
        then throw("No payments required")
221
+
@Callable(az)
222
+
func unstakeAcres (aP) = {
223
+
    let aG = aq()
224
+
    if ((0 >= aP))
225
+
        then throw("Amount should be positive")
213
226
 
        else {
214
-
            let aH = L(q)
215
-
            let aI = c(q)
216
-
            let aJ = valueOrElse(getInteger(aI), 0)
217
-
            if ((aN > aJ))
218
-
                then throw(((("You have only " + ai(aJ, 8)) + " ACRES staked, tried to unstake ") + ai(aN, 8)))
227
+
            let q = toString(az.caller)
228
+
            if ((size(az.payments) != 0))
229
+
                then throw("No payments required")
219
230
 
                else {
220
-
                    let aK = valueOrElse(getInteger(e), 0)
221
-
                    let aL = invoke(G, "onStakeUnstakeLand", [q], nil)
222
-
                    let aM = ar(q, aJ, valueOrElse(getInteger(aH), 0))
223
-
                    $Tuple2([IntegerEntry(aH, lastBlock.timestamp), IntegerEntry(aI, (aJ - aN)), IntegerEntry(e, (aK - aN)), ScriptTransfer(ax.caller, (aN + aM), K)], $Tuple2(aE, aL))
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 " + ai(aL, 8)) + " ACRES staked, tried to unstake ") + ai(aP, 8)))
236
+
                        else {
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))
241
+
                            }
224
242
 
                    }
225
243
 
            }
226
244
 
    }
227
245
 
228
246
 
229
247
 
230
-
@Callable(ax)
248
+
@Callable(az)
231
249
 
func buyAcres () = {
232
-
    let aE = aq()
233
-
    let q = toString(ax.caller)
234
-
    if ((size(ax.payments) != 1))
250
+
    let aG = aq()
251
+
    let q = toString(az.caller)
252
+
    if ((size(az.payments) != 1))
235
253
 
        then throw("exactly 1 payment must be attached")
236
254
 
        else {
237
-
            let aF = ax.payments[0]
238
-
            let aG = aF.amount
239
-
            if (if (!(isDefined(aF.assetId)))
255
+
            let aH = az.payments[0]
256
+
            let aI = aH.amount
257
+
            if (if (!(isDefined(aH.assetId)))
240
258
 
                then true
241
-
                else (value(aF.assetId) != j))
259
+
                else (value(aH.assetId) != j))
242
260
 
                then throw("USDT payments only!")
243
-
                else if ((n > aG))
261
+
                else if ((n > aI))
244
262
 
                    then throw((("Min payment should be " + ai(n, 6)) + " USDT"))
245
263
 
                    else {
246
-
                        let as = (aG * h)
247
-
                        let aO = Q(invoke(E, "updateAccStats", [q, fraction(f, as, (25 * o))], nil))
248
-
                        $Tuple2([ScriptTransfer(F, aG, j), ScriptTransfer(ax.caller, as, K)], $Tuple2(aE, aO))
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))
249
267
 
                        }
250
268
 
            }
251
269
 
    }
252
270
 
253
271
 
254
272
 
255
-
@Callable(ax)
256
-
func burnAcres (aN) = if ((ax.caller != E))
273
+
@Callable(az)
274
+
func burnAcres (aP) = if ((az.caller != E))
257
275
 
    then throw("Permission denied")
258
-
    else $Tuple2([Burn(K, aN)], aN)
276
+
    else $Tuple2([Burn(K, aP)], aP)
259
277
 
260
278
 
261
279
 
262
-
@Callable(ax)
280
+
@Callable(az)
263
281
 
func claimAcres () = {
264
-
    let aE = aq()
265
-
    let q = toString(ax.caller)
266
-
    if ((size(ax.payments) != 0))
282
+
    let aG = aq()
283
+
    let q = toString(az.caller)
284
+
    if ((size(az.payments) != 0))
267
285
 
        then throw("No payments required")
268
286
 
        else {
269
-
            let aH = L(q)
270
-
            let aI = c(q)
271
-
            let as = valueOrElse(getInteger(aI), 0)
272
-
            let aL = invoke(G, "onStakeUnstakeLand", [q], nil)
273
-
            let aM = ar(q, as, valueOrElse(getInteger(aH), 0))
274
-
            $Tuple2([IntegerEntry(aH, lastBlock.timestamp), ScriptTransfer(ax.caller, aM, K)], $Tuple2(aE, aL))
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))
275
293
 
            }
294
+
    }
295
+
296
+
297
+
298
+
@Callable(az)
299
+
func claimAcresREADONLY (q) = {
300
+
    let aJ = L(q)
301
+
    let aK = c(q)
302
+
    let as = valueOrElse(getInteger(aK), 0)
303
+
    let aO = ar(q, as, valueOrElse(getInteger(aJ), 0))
304
+
    $Tuple2(nil, aO)
276
305
 
    }
277
306
 
278
307
 

github/deemru/w8io/3da68e3 
59.00 ms ◑